Sie können die Transaktion SM35 aufrufen und dann auf "Aufzeichnung" klicken. Dann klicken Sie auf "Neue Aufzeichnung". Dann geben Sie nun Name der Aufzeichnung ein und die Transaktion. Dann wählen Sie Synchron aus und klicken das Feld Standardgrösse an.

Wenn du das Coding für ein eigenes Programm brauchst kannst du nach der Aufzeichnung alle BDC_SUBSCR Zeilen rauslöschen.

Wenn du dann in der Aufzeichnungsübersicht auf Programm klickst erstellt es dir ein Programm aus der Aufzeichnung.

Sie können die Transaktion SM35 aufrufen und dann auf "Aufzeichung" klicken

Oder Sie können direkt die Transaktion SHDB aufrufen. Jetzt klicken Sie auf "Neue Aufzeichnung", vergeben dieser einen Namen und geben noch den ersten Transaktionscode den Sie aufzeichnen möchten ein.

Nachdem Sie die Aufzeichnung abgeschlossen haben, zeigt es Ihnen die Aufzeichnung an.

Nun keheren Sie zur Aufzeichungsübersicht zurück. Dann wählen Sie die Aufzeichnung aus die Sie gerade erstellt haben und können einen Funktionsbaustein oder ein Programm generieren lassen ... , in dem Sie z.B.  auf den Button "Programm" drücken

Nun wie oben gezeigt habe ich aus einer Aufzeichnung ein Programm generiert und das Coding bearbeitet und minimiert.

REPORT z_anschrift.

DATA: bdcdata LIKE bdcdata    OCCURS 0 WITH HEADER LINE,
      session,
      messtab LIKE bdcmsgcoll OCCURS 0 WITH HEADER LINE,
      ctumode LIKE ctu_params-dismode VALUE 'A', "oder 'N'
      cupdate LIKE ctu_params-updmode VALUE 'S'.
PARAMETERS: pernr TYPE p_pernr,
            nachn TYPE nachn.

START-OF-SELECTION.

  PERFORM bdc_dynpro      USING 'SAPMP50A' '1000'.
  PERFORM bdc_field       USING 'BDC_OKCODE' '/00'. "Funktionscodes Gelb Grün Rot ... Button
  PERFORM bdc_field       USING 'RP50G-PERNR' pernr.
  PERFORM bdc_field       USING 'RP50G-TIMR6' 'X'.
*perform bdc_field       using 'BDC_CURSOR' 'RP50G-CHOIC'. "braucht man nicht " wenn man in ein Feld rein klickt
  PERFORM bdc_field       USING 'RP50G-CHOIC' '2'.

  PERFORM bdc_dynpro      USING 'SAPMP50A' '1000'.
*perform bdc_field       using 'BDC_CURSOR' 'RP50G-PERNR'.
  PERFORM bdc_field       USING 'BDC_OKCODE' '=MOD'.
  PERFORM bdc_field       USING 'RP50G-PERNR' '1000'.
  PERFORM bdc_field       USING 'RP50G-TIMR6' 'X'.
  PERFORM bdc_field       USING 'RP50G-CHOIC' '0002 Daten zur Person'.

  PERFORM bdc_dynpro      USING 'MP000200' '2001'.
*perform bdc_field       using 'BDC_CURSOR' 'Q0002-GBPAS'.
**perform bdc_field       using 'BDC_OKCODE' '=UPD'.
  PERFORM bdc_field       USING 'P0002-BEGDA' '05.10.2006'.
  PERFORM bdc_field       USING 'P0002-ENDDA' '31.12.9999'.
  PERFORM bdc_field       USING 'P0002-NACHN'
                                nachn.

  PERFORM bdc_transaction USING 'PA30'.
  BREAK-POINT.

END-OF-SELECTION.

*&---------------------------------------------------------------------*
*&      Form  bdc_dynpro
*&---------------------------------------------------------------------*
FORM bdc_dynpro USING program dynpro.
  CLEAR bdcdata.
  bdcdata-program  = program.
  bdcdata-dynpro   = dynpro.
  bdcdata-dynbegin = 'X'.
  APPEND bdcdata.
ENDFORM.                    "bdc_dynpro

*&---------------------------------------------------------------------*
*&      Form  bdc_field
*&---------------------------------------------------------------------*
FORM bdc_field USING fnam fval.
  CLEAR bdcdata.
  bdcdata-fnam = fnam.
  bdcdata-fval = fval.
  APPEND bdcdata.
ENDFORM.                    "bdc_field

*&---------------------------------------------------------------------*
*&      Form  bdc_transaction
*&---------------------------------------------------------------------*
FORM bdc_transaction USING tcode.
  DATA: ls_opt TYPE ctu_params.

  ls_opt-dismode  = 'E'.
  ls_opt-updmode  = 'S'.
  ls_opt-racommit = 'X'.

*A  Alle Dynpros anzeigen
*E  Fehler anzeigen
*N  Dunkel prozessieren
*P  Dunkel und debugfähig

  REFRESH messtab.
  CALL TRANSACTION tcode USING bdcdata
                         OPTIONS FROM ls_opt
                         MESSAGES INTO messtab.
ENDFORM.                    "bdc_transaction