Problem solve Get help with specific problems with your technologies, process and projects.

Long text retrieval in HR

If you need to retrieve long texts for a particular infotype, this is the way to go.

If you need to retrieve long texts for a particular infotype you just need to run the macro: RP-IMP-C1-TX. The code below was written in version 4.5B.
REPORT ZHUGE_LONGTEXTS .
TABLES: PCL1,PA0000,T582S.
DATA: TX-KEY LIKE PSKEY.
DATA: BEGIN OF TEXT-VERSION,
        NUMMER TYPE X VALUE '02',
      END OF TEXT-VERSION.
DATA: BEGIN OF PTEXT OCCURS 200.
DATA:  LINE(78).
DATA: END OF PTEXT.
DATA: KEY1 LIKE PCL1-SRTFD.
DATA: KEY2 LIKE PCL1-SRTFD.
DATA: FINAL_KEY LIKE PCL1-SRTFD.
DATA: BLANK(7).
DATA: BLANK1(3).
PARAMETERS: PERNR LIKE PA0000-PERNR,
            INFTY LIKE T582S-INFTY,
            SUBTY LIKE PA0000-SUBTY,
            ENDDA LIKE PA0000-ENDDA,
            BEGDA LIKE PA0000-BEGDA.

IF SUBTY IS INITIAL.
 CONCATENATE PERNR INFTY INTO KEY1.
 CONCATENATE ENDDA BEGDA '000' INTO KEY2.
 CONCATENATE KEY1 KEY2 INTO FINAL_KEY SEPARATED BY BLANK.
 ELSE.
*-- if with subtypes
  CONCATENATE PERNR INFTY SUBTY INTO KEY1.
  CONCATENATE ENDDA BEGDA '000' INTO KEY2.
  CONCATENATE KEY1 KEY2 INTO FINAL_KEY SEPARATED BY BLANK1.
 ENDIF.

 MOVE FINAL_KEY TO TX-KEY.
 RP-IMP-C1-TX.

LOOP AT PTEXT.
 WRITE:/ PTEXT.
ENDLOOP.
This was last published in June 2003

Dig Deeper on SAP HR management

PRO+

Content

Find more PRO+ content and other member only offers, here.

Start the conversation

Send me notifications when other members comment.

By submitting you agree to receive email from TechTarget and its partners. If you reside outside of the United States, you consent to having your personal data transferred to and processed in the United States. Privacy

Please create a username to comment.

-ADS BY GOOGLE

SearchManufacturingERP

SearchOracle

SearchDataManagement

SearchAWS

SearchBusinessAnalytics

SearchCRM

SearchContentManagement

SearchFinancialApplications

Close