{"id":7902,"date":"2025-09-26T01:02:59","date_gmt":"2025-09-25T19:32:59","guid":{"rendered":"https:\/\/www.sapewmhelp.com\/?question=bdc-using-call-transaction"},"modified":"2025-09-26T01:02:59","modified_gmt":"2025-09-25T19:32:59","slug":"bdc-using-call-transaction","status":"publish","type":"question","link":"https:\/\/www.sapewmhelp.com\/?question=bdc-using-call-transaction","title":{"rendered":"BDC using Call Transaction"},"content":{"rendered":"

*&———————————————————————*
\n*&\u00a0Report\u00a0\u00a0ZTEST_BDC_FI01_1
\n*&
\n*&———————————————————————*
\n*&
\n*&
\n*&———————————————————————*<\/p>\n

REPORT\u00a0ztest_bdc_fi01_1.<\/p>\n

types:\u00a0begin\u00a0of\u00a0ty_error,
\nmsg\u00a0type\u00a0string,
\nlineno\u00a0type\u00a0i,
\nend\u00a0of\u00a0ty_error.<\/p>\n

*\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0Batchinputdata\u00a0of\u00a0single\u00a0transaction
\nDATA:\u00a0\u00a0 bdcdata\u00a0LIKE\u00a0bdcdata\u00a0\u00a0\u00a0 OCCURS\u00a00\u00a0WITH\u00a0HEADER\u00a0LINE.
\nPARAMETERS\u00a0:\u00a0p_data\u00a0TYPE\u00a0ibipparms-path.<\/p>\n

DATA\u00a0:\u00a0it_tab\u00a0TYPE\u00a0truxs_t_text_data,
\nlv_filename\u00a0TYPE\u00a0rlgrap-filename,
\nit_msg\u00a0type\u00a0table\u00a0of\u00a0bdcmsgcoll,
\nlv_msg\u00a0type\u00a0string,
\nlt_error\u00a0type\u00a0table\u00a0of\u00a0ty_error,
\nls_error\u00a0type\u00a0ty_error.<\/p>\n

TYPES:\u00a0BEGIN\u00a0OF\u00a0record,
\n*\u00a0data\u00a0element:\u00a0BANKS
\nbanks(003),
\n*\u00a0data\u00a0element:\u00a0BANKK
\nbankl(015),
\n*\u00a0data\u00a0element:\u00a0BANKA
\nbanka(060),
\n*\u00a0data\u00a0element:\u00a0REGIO
\nprovz(003),
\n*\u00a0data\u00a0element:\u00a0ORT01_GP
\nort01(035),
\n*\u00a0data\u00a0element:\u00a0BRNCH
\nbrnch(040),
\n**\u00a0data\u00a0element:\u00a0BANKA
\n*\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0banka_007(060),
\n**\u00a0data\u00a0element:\u00a0REGIO
\n*\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0provz_008(003),
\n**\u00a0data\u00a0element:\u00a0ORT01_GP
\n*\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0ort01_009(035),
\n**\u00a0data\u00a0element:\u00a0BRNCH
\n*\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0brnch_010(040),
\nEND\u00a0OF\u00a0record.<\/p>\n

DATA:\u00a0lt_record\u00a0TYPE\u00a0STANDARD\u00a0TABLE\u00a0OF\u00a0record,
\nls_record\u00a0TYPE\u00a0record.<\/p>\n

AT\u00a0SELECTION-SCREEN\u00a0ON\u00a0VALUE-REQUEST\u00a0FOR\u00a0p_data.
\nCALL\u00a0FUNCTION\u00a0‘F4_FILENAME’
\nEXPORTING
\nprogram_name\u00a0 =\u00a0syst-cprog
\ndynpro_number\u00a0=\u00a0syst-dynnr
\nfield_name\u00a0\u00a0\u00a0 =\u00a0‘P_DATA’
\nIMPORTING
\nfile_name\u00a0\u00a0\u00a0\u00a0 =\u00a0p_data.<\/p>\n

START-OF-SELECTION.
\n”\u00a0converting\u00a0the\u00a0file\u00a0data\u00a0into\u00a0internal\u00a0table
\nlv_filename\u00a0=\u00a0p_data.
\n”\u00a0CSV
\nCALL\u00a0FUNCTION\u00a0‘TEXT_CONVERT_XLS_TO_SAP’
\nEXPORTING
\ni_field_seperator\u00a0\u00a0\u00a0 =\u00a0‘X’
\ni_line_header\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 =\u00a0‘X’
\ni_tab_raw_data\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 =\u00a0it_tab
\ni_filename\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 =\u00a0lv_filename
\nTABLES
\ni_tab_converted_data\u00a0=\u00a0lt_record
\nEXCEPTIONS
\nconversion_failed\u00a0\u00a0\u00a0 =\u00a01
\nOTHERS\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 =\u00a02.
\nIF\u00a0sy-subrc\u00a0<>\u00a00.
\n*\u00a0Implement\u00a0suitable\u00a0error\u00a0handling\u00a0here
\nENDIF.<\/p>\n

LOOP\u00a0AT\u00a0lt_record\u00a0INTO\u00a0ls_record.
\nPERFORM\u00a0bdc_dynpro\u00a0\u00a0\u00a0\u00a0\u00a0 USING\u00a0‘SAPMF02B’\u00a0‘0100’.
\nPERFORM\u00a0bdc_field\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 USING\u00a0‘BDC_CURSOR’
\n‘BNKA-BANKL’.
\nPERFORM\u00a0bdc_field\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 USING\u00a0‘BDC_OKCODE’
\n‘\/00’.
\nPERFORM\u00a0bdc_field\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 USING\u00a0‘BNKA-BANKS’
\nls_record-banks.
\nPERFORM\u00a0bdc_field\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 USING\u00a0‘BNKA-BANKL’
\nls_record-bankl.
\nPERFORM\u00a0bdc_dynpro\u00a0\u00a0\u00a0\u00a0\u00a0 USING\u00a0‘SAPMF02B’\u00a0‘0110’.
\nPERFORM\u00a0bdc_field\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 USING\u00a0‘BDC_CURSOR’
\n‘BNKA-BRNCH’.
\nPERFORM\u00a0bdc_field\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 USING\u00a0‘BDC_OKCODE’
\n‘\/00’.
\nPERFORM\u00a0bdc_field\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 USING\u00a0‘BNKA-BANKA’
\nls_record-banka.
\nPERFORM\u00a0bdc_field\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 USING\u00a0‘BNKA-PROVZ’
\nls_record-provz.
\nPERFORM\u00a0bdc_field\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 USING\u00a0‘BNKA-ORT01’
\nls_record-ort01.
\nPERFORM\u00a0bdc_field\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 USING\u00a0‘BNKA-BRNCH’
\nls_record-brnch.
\nPERFORM\u00a0bdc_dynpro\u00a0\u00a0\u00a0\u00a0\u00a0 USING\u00a0‘SAPMF02B’\u00a0‘0110’.
\nPERFORM\u00a0bdc_field\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 USING\u00a0‘BDC_CURSOR’
\n‘BNKA-BANKA’.
\nPERFORM\u00a0bdc_field\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 USING\u00a0‘BDC_OKCODE’
\n‘=UPDA’.
\nPERFORM\u00a0bdc_field\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 USING\u00a0‘BNKA-BANKA’
\nls_record-banka.
\nPERFORM\u00a0bdc_field\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 USING\u00a0‘BNKA-PROVZ’
\nls_record-provz.
\nPERFORM\u00a0bdc_field\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 USING\u00a0‘BNKA-ORT01’
\nls_record-ort01.
\nPERFORM\u00a0bdc_field\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 USING\u00a0‘BNKA-BRNCH’
\nls_record-brnch.<\/p>\n

CALL\u00a0TRANSACTION\u00a0‘FI01’USING\u00a0bdcdata\u00a0MODE\u00a0‘A’\u00a0MESSAGES\u00a0INTO\u00a0it_msg.<\/p>\n

CLEAR:\u00a0bdcdata[],bdcdata\u00a0,ls_record.
\nENDLOOP.<\/p>\n

loop\u00a0at\u00a0it_msg\u00a0into\u00a0data(ls_msg).
\nCALL\u00a0FUNCTION\u00a0‘FORMAT_MESSAGE’
\nEXPORTING
\n*\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0ID\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0=\u00a0SY-MSGID
\n*\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0LANG\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0=\u00a0‘-D’
\nNO\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 =\u00a0ls_msg-MSGNr
\nV1\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 =\u00a0 ls_msg-MSGV1
\nV2\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 =\u00a0 ls_msg-MSGV2
\nV3\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 =\u00a0 ls_msg-MSGV3
\nV4\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 =\u00a0 ls_msg-MSGV4
\nIMPORTING
\nMSG\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 =\u00a0lv_msg
\nEXCEPTIONS
\nNOT_FOUND\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 =\u00a01
\nOTHERS\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0 =\u00a02
\n.
\nIF\u00a0sy-subrc\u00a0eq\u00a00.
\n*\u00a0Implement\u00a0suitable\u00a0error\u00a0handling\u00a0here
\nls_error-msg\u00a0=\u00a0lv_msg.
\nls_error-lineno\u00a0=\u00a0sy-tabix.
\nappend\u00a0ls_Error\u00a0to\u00a0lt_error.
\nENDIF.<\/p>\n

endloop.<\/p>\n

loop\u00a0at\u00a0lt_error\u00a0into\u00a0ls_error.
\nwrite\u00a0:\u00a0\/\u00a0ls_error-lineno,\u00a0ls_error-msg.
\nENDLOOP.<\/p>\n

*———————————————————————-*
\n*\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0Start\u00a0new\u00a0screen\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0*
\n*———————————————————————-*
\nFORM\u00a0bdc_dynpro\u00a0USING\u00a0program\u00a0dynpro.
\nCLEAR\u00a0bdcdata.
\nbdcdata-program\u00a0 =\u00a0program.
\nbdcdata-dynpro\u00a0\u00a0 =\u00a0dynpro.
\nbdcdata-dynbegin\u00a0=\u00a0‘X’.
\nAPPEND\u00a0bdcdata.
\nENDFORM.<\/p>\n

*———————————————————————-*
\n*\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0Insert\u00a0field\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0\u00a0*
\n*———————————————————————-*
\nFORM\u00a0bdc_field\u00a0USING\u00a0fnam\u00a0fval.
\n*\u00a0\u00a0IF\u00a0FVAL\u00a0<>\u00a0NODATA.
\nCLEAR\u00a0bdcdata.
\nbdcdata-fnam\u00a0=\u00a0fnam.
\nbdcdata-fval\u00a0=\u00a0fval.
\nAPPEND\u00a0bdcdata.
\n*\u00a0\u00a0ENDIF.
\nENDFORM.<\/span><\/p>\n","protected":false},"author":3,"featured_media":0,"comment_status":"open","ping_status":"closed","template":"","question-category":[158],"question_tags":[178,387,390,177],"class_list":["post-7902","question","type-question","status-publish","hentry","question-category-abap","question_tags-abap","question_tags-bdc","question_tags-call-transaction","question_tags-sap"],"_links":{"self":[{"href":"https:\/\/www.sapewmhelp.com\/index.php?rest_route=\/wp\/v2\/question\/7902","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.sapewmhelp.com\/index.php?rest_route=\/wp\/v2\/question"}],"about":[{"href":"https:\/\/www.sapewmhelp.com\/index.php?rest_route=\/wp\/v2\/types\/question"}],"author":[{"embeddable":true,"href":"https:\/\/www.sapewmhelp.com\/index.php?rest_route=\/wp\/v2\/users\/3"}],"replies":[{"embeddable":true,"href":"https:\/\/www.sapewmhelp.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=7902"}],"wp:attachment":[{"href":"https:\/\/www.sapewmhelp.com\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=7902"}],"wp:term":[{"taxonomy":"question-category","embeddable":true,"href":"https:\/\/www.sapewmhelp.com\/index.php?rest_route=%2Fwp%2Fv2%2Fquestion-category&post=7902"},{"taxonomy":"question_tags","embeddable":true,"href":"https:\/\/www.sapewmhelp.com\/index.php?rest_route=%2Fwp%2Fv2%2Fquestion_tags&post=7902"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}