DBC記録画面

(1)トランザクションコード実行SHDBを、」次のインターフェイス、新しいレコード入力-レコード名を記入する、トランザクションコードネーム呼び出しを-記録を開始するために、次の画面に行くことができます:

 

(2)配信順序番号は、入力した入力、ファンクションキーをクリックして次のインターフェイスを入力するために「削除」:

  

 

(3)保存してに戻ります。

  

(4)をクリックして、自分自身のレコードを選択し、「プログラム」:

 

に示すように、(5)、プログラムの名前を入力します。

  

(6)に示すように、プログラムに保存します。

(7)プログラムに、プログラムは、残りの部分は簡略することができ、この画面を記録する必要があります:

用い'SAPMV50A '4004 bdc_dynpro実行'。"画面SAPMV50A、画面番号4004
使用bdc_field実行' BDC_CURSOR 'LIKP-VBELNを'。"フィールドLIKP-VBELNへの参照を
使用して'BDC_OKCODE' '/ 00' bdc_field行います。"入力するファンクションキーに適用される
。使用「LIKP-VBELN」'80、000783' bdc_field行う『必要な出荷伝票番号
。SAPMV50A『『1000』を使用してbdc_dynpro実行』』画面SAPMV50Aを入力し、画面番号1000
使用]をbdc_field行いますBDC_OKCODE「」/ ELOES_T」。『を削除するファンクションキーに適用される
使用して『VL02N』をbdc_transaction行う。』トランザクションコードVL02Nを呼び出します

(8)試験の過送達のための口座番号を入力 80000675

次のように最終的にプログラムを変更します。

zdbcdeldelivery REPORT
       標準的なページ見出しのLINE-SIZE 255


bdcdata LIKE gt_itab_bdcdataヘッダ行0を発生していない:DATAが。
DATA:HEADER LINE、WITH bdcmsgcoll OF it_bdcmsgタイプテーブル
   wa_returnタイプbdcmsgcoll。
DATA:g_mode(1)の値'E'、
   g_updt(1)の値'S'。

DATA:ERRMSG(1000)。

START-OF-SELECTION。

  REFRESH:gt_itab_bdcdata、it_bdcmsg。
  'SAPMV50A' '4004' 'X'、:使用したfrm_fill_bdcdataを行う
                     ' 'BDC_CURSOR' 'LIKP-VBELN''、"
                    '' '/ 00' BDC_OKCODEを'' "
                    ' 'LIKP-VBELN'
                    'SAPMV50A' '1000年' 'X'、"
                    'BDC_OKCODE' '/ ELOES_T' ''。"

  gt_itab_bdcdata使用してコールのTRANSACTION 'VL02N'
                           MODEのg_modeの
                           UPDATE g_updt
                           it_bdcmsgにメッセージを。
  IF SY-SUBRC EQ 0
    「提交所做得更改
    'BAPI_TRANSACTION_COMMIT' CALL機能
      EXPORTINGオプション
        待機= 'X'。

    。= 'S' KEY MSGTYP WITH wa_return INTO TABLEのit_bdcmsgをREAD
    SY-SUBRC = IF '0'。

    ENDIF。
    EXIT 。
  ELSE。

    IF SY-SUBRCのEQ 0
      通話機能'MESSAGE_TEXT_BUILD'
        EXPORTING
          MSGID = it_bdcmsg-MSGID
          msgnr = it_bdcmsg-msgnr
          MSGV1 = it_bdcmsg-MSGV1
          msgv2 = it_bdcmsg-msgv2
        IMPORTING
          message_text_output = ERRMSGを。
    ENDIF。
  ENDIF。

 


*&------------------------------------------------ -------------------- *
*&フォームfrm_fill_bdcdata
*&----------------------- --------------------------------------------- *
* DBC录屏填值
* ----------------------------------------------- ---------------------- *
u_par1 u_par2 u_par3を使用してフォームfrm_fill_bdcdata。
  CLEAR gt_itab_bdcdata。
  u_par3はINITIALされた場合。
    gt_itab_bdcdata-FNAM = u_par1。
    gt_itab_bdcdata-FVAL = u_par2。
    IF gt_itab_bdcdata-FNAMのCP 'LIKP-VBELN *'。
      SHIFTのgt_itab_bdcdata-FVAL LEFT DELETING先頭にスペース。
    ENDIF。
  ELSE。
    gt_itab_bdcdataプログラム= u_par1。
    gt_itab_bdcdata-Dynproの= u_par2。
    gt_itab_bdcdata-dynbegin = u_par3。
  ENDIF。
  gt_itab_bdcdataを追加します。
ENDFORM。                    「frm_fill_bdcdata

おすすめ

転載: www.cnblogs.com/moqi222/p/11770069.html