(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