table for longtext in QA33

[Former Member]

hi,

in QA33 Transaction i wil click on Usage Decision than if the material is rejected i will enter long text details....

now i want to pull the Long text details for all materials can any one help me in which table this long text is there?

[Former Member]

hi,

in QA33 Transaction i wil click on Usage Decision than if the material is rejected i will enter long text details....

now i want to pull the Long text details for all materials can any one help me in which table this long text is there?

[Former Member]

helloo ,

u can use FM READ_TEXT to get long texts ....search in sdn forums to get sample codes on this .....

text id = QAVE

useful tcode : SE75.

regards

Prabhu

[Former Member]

Hi,

You can Check this in structure TLINE.

Regards,

Rahul

[Former Member]

hai

To Pull the Long Text Detials, Use Function Read_text

For Parameter in Read_text Function:

Give Some Data in QA33 user Decision Section, then Go to STXH table And Find out ID and Object name, And Fill in function as Given below:

CALL FUNCTION 'READ_TEXT'
        EXPORTING
          CLIENT                  = SY-MANDT
          ID                          = '0001'  "From STXH table
          LANGUAGE         = 'E'
          NAME                   = lname   
          OBJECT                = 'DOC_ITEM'   "From STXH table
        TABLES
          LINES                   = lit_text
        EXCEPTIONS
          ID                           = 1
          LANGUAGE           = 2
          NAME                     = 3
          NOT_FOUND          = 4
          OBJECT                  = 5
          REFERENCE_CHECK         = 6
          WRONG_ACCESS_TO_ARCHIVE = 7
          OTHERS                  = 8.

[Former Member]

Hi Smitha,

SAMPLE CODE FOR YOUR REQUIREMENT.

TYPES : BEGIN OF TY_TEXT,

TDOBJECT TYPE STXH-TDOBJECT, "TEXTS: APPLICATION OBJECT

TDNAME TYPE STXH-TDNAME, "NAME

TDID TYPE STXH-TDID, "TEXT ID

TDSPRAS TYPE STXH-TDSPRAS, "LANGUAGE KEY

END OF TY_TEXT.

DATA : IT_TLINE TYPE TABLE OF TLINE,

WA_TLINE TYPE TLINE,

IT_TEXT TYPE TABLE OF TY_TEXT,

WA_TEXT TYPE TY_TEXT.

SELECT TDOBJECT

TDNAME

TDID

TDSPRAS

FROM STXH INTO TABLE IT_TEXT

WHERE TDOBJECT = u2018QPRUEFLOSu2019

AND TDID = u2018QBSTu2019

AND TDSPRAS = 'EN'

AND TDNAME IN QALS - PRUEFLOS. u201CINSPECTION LOT NUMBER

IF SY-SUBRC NE 0.

MESSAGE S398(00) WITH 'NO RECORDS EXITS FOR THIS SELECTION CRITERIA'.

ELSE.

LOOP AT IT_TEXT INTO WA_TEXT.

CALL FUNCTION 'READ_TEXT'

EXPORTING

ID = WA_TEXT-TDID

LANGUAGE = WA_TEXT-TDSPRAS

NAME = WA_TEXT-TDNAME

OBJECT = WA_TEXT-TDOBJECT

TABLES

LINES = IT_TLINE

EXCEPTIONS

ID = 1

LANGUAGE = 2

NAME = 3

NOT_FOUND = 4

OBJECT = 5

REFERENCE_CHECK = 6

WRONG_ACCESS_TO_ARCHIVE = 7

OTHERS = 8.

IF SY-SUBRC = 0.

DELETE IT_TLINE WHERE TDLINE IS INITIAL.

LOOP AT IT_TLINE INTO WA_TLINE.

MOVE WA_TLINE TO YOUR IT_FINAL.

APPEND: WA_FINAL TO IT_FINAL.

CLEAR : WA_TLINE,WA_FINAL.

ENDLOOP.

ENDIF.

This will definitely work according to your requirement.

Appreciate if helpful as you know.

Regards,

Anil.

A

[Former Member]

Hi,

use this code.

TYPES : BEGIN OF ty_text,

tdobject TYPE stxh-tdobject, "TEXTS: APPLICATION OBJECT

tdname TYPE stxh-tdname, "NAME

tdid TYPE stxh-tdid, "TEXT ID

tdspras TYPE stxh-tdspras, "LANGUAGE KEY

END OF ty_text.

DATA : it_tline TYPE TABLE OF tline,

wa_tline TYPE tline,

it_text TYPE TABLE OF ty_text,

wa_text TYPE ty_text.

SELECT tdobject

tdname

tdid

tdspras

FROM stxh INTO TABLE it_text

WHERE tdobject = 'QPRUEFLOS'

AND tdid = 'QBST'

AND tdspras = 'EN'.

AND tdname IN qals-prueflos.u201Cinspection lot number

IF sy-subrc NE 0.

MESSAGE s398(00) WITH 'NO RECORDS EXITS FOR THIS SELECTION CRITERIA'.

ELSE.

LOOP AT it_text INTO wa_text.

CALL FUNCTION 'READ_TEXT'

EXPORTING

id = wa_text-tdid

language = wa_text-tdspras

name = wa_text-tdname

object = wa_text-tdobject

TABLES

lines = it_tline

EXCEPTIONS

id = 1

language = 2

name = 3

not_found = 4

object = 5

reference_check = 6

wrong_access_to_archive = 7

OTHERS = 8.

IF sy-subrc = 0.

DELETE it_tline WHERE tdline IS initial.

LOOP AT it_tline INTO wa_tline.

MOVE wa_tline to your it_final.

APPEND: wa_final TO it_final.

CLEAR : wa_tline,wa_final.

ENDLOOP.

ENDIF.

ENDLOOP.

ENDIF.