Tuesday, February 21, 2012
Transaction Recorder: Transaction recorder is used to record a series of transactions and their screens.
Recording Features
  • Data transfer programs that use batch input or CALL TRANSACTION
  • Batch input sessions
  • Test data
  • Function modules
Steps in Transaction recording.
  • Go to transaction SHDB and Click on New Recording button.
  •  Give Recording name and Transaction code to be record.
  • Execute the transaction in the usual way.
  • When you have finished processing the transaction, the system displays an overview of the transaction and your input. Save and Click on BACK button.
  • Select the recording and click on Program button to create program for the recording.
  • Generate the program to read from the file. 
  •  Give the title for the program & click on Source code button. 
  • Change the source wherever required. 
  • REPORT ztest_bdc NO STANDARD PAGE HEADING LINE-SIZE 255.
    INCLUDE bdcrecx1.
    PARAMETERS: dataset(132) LOWER CASE DEFAULT 'IT0006_DATA'.
    ***    DO NOT CHANGE - the generated data section - DO NOT CHANGE    ***
    *
    *   If it is nessesary to change the data section use the rules:
    *   1.) Each definition of a field exists of two lines
    *   2.) The first line shows exactly the comment
    *       '* data element: ' followed with the data element
    *       which describes the field.
    *       If you don't have a data element use the
    *       comment without a data element name
    *   3.) The second line shows the fieldname of the
    *       structure, the fieldname must consist of
    *       a fieldname and optional the character '_' and
    *       three numbers and the field length in brackets
    *   4.) Each field must be type C.
    *
    *** Generated data section with specific formatting - DO NOT CHANGE  ***
    DATA: BEGIN OF record,
    * data element: PERNR_D
            pernr_001(038),
    * data element: TIMRE
            timr6_002(001),
    * data element: CHOIC
            choic_003(035),
    * data element: SUBTY
            subty_004(004),
    * data element: BEGDA
            begda_020(010),
    * data element: ENDDA
            endda_021(010),
    * data element: ANSSA
            anssa_022(004),
    * data element: PAD_CONAM
            name2_023(040),
    * data element: PAD_STRAS
            stras_024(060),
    * data element: PSTLZ_HR
            pstlz_025(010),
    * data element: PAD_ORT01
            ort01_026(040),
    * data element: LAND1
            land1_027(003),
    * data element: TELNR
            telnr_028(014),
          END OF record.
    
    *** End generated data section ***
    
    START-OF-SELECTION.
    
      PERFORM open_dataset USING dataset.
      PERFORM open_group.
    
      DO.
    
        READ DATASET dataset INTO record.
        IF sy-subrc <> 0.
          EXIT.
        ENDIF.
    
        PERFORM bdc_dynpro      USING 'SAPMP50A'           '1000'.
        PERFORM bdc_field       USING 'BDC_OKCODE'         '=INS'.
        PERFORM bdc_field       USING 'RP50G-PERNR'        record-pernr_001.
        PERFORM bdc_field       USING 'RP50G-TIMR6'        record-timr6_002.
        PERFORM bdc_field       USING 'BDC_CURSOR'         'RP50G-SUBTY'.
        PERFORM bdc_field       USING 'RP50G-CHOIC'        record-choic_003.
        PERFORM bdc_field       USING 'RP50G-SUBTY'        record-subty_004.
    
        PERFORM bdc_dynpro      USING 'MP000600'           '2001'.
        PERFORM bdc_field       USING 'BDC_CURSOR'         'P0006-TELNR'.
        PERFORM bdc_field       USING 'BDC_OKCODE'         'UPD'.
        PERFORM bdc_field       USING 'P0006-BEGDA'        record-begda_020.
        PERFORM bdc_field       USING 'P0006-ENDDA'        record-endda_021.
        PERFORM bdc_field       USING 'P0006-ANSSA'        record-anssa_022.
        PERFORM bdc_field       USING 'P0006-NAME2'        record-name2_023.
        PERFORM bdc_field       USING 'P0006-STRAS'        record-stras_024.
        PERFORM bdc_field       USING 'P0006-PSTLZ'        record-pstlz_025.
        PERFORM bdc_field       USING 'P0006-ORT01'        record-ort01_026.
        PERFORM bdc_field       USING 'P0006-LAND1'        record-land1_027.
        PERFORM bdc_field       USING 'P0006-TELNR'        record-telnr_028.
        PERFORM bdc_transaction USING 'PA30'.
      ENDDO.
    
      PERFORM close_group.
      PERFORM close_dataset USING dataset.
    
  • Save and Activate the program.



  • Execute the program. 
  • The program Creates Address infotype record.

0 comments:

Post a Comment

Your useful comments, suggestions are appreciated.Your comments are moderated.

Followers

Contact Form

Name

Email *

Message *

Web Dynpro ABAP Book

An SAP Consultant

Follow US


Want to Contribute ?

If you are interested in writing about the new stuff you learn everyday while working, please write to the.sap.consultants@gmail.com.

Click on Contribution for more details.