‎2007 May 24 4:15 PM
I experts,
I'm facing a problem with batch input, 'cause it's giving me the message "No batch input data for screen SAPMF02D 0310" although i'm filling all the fields in that screen, but when i call the transaction in foreground doesn't give me any error, only when i run with the "mode flag" = 'N'. Can anyone help me out ?
Thx in advance.
Here's the code:
PERFORM bdc_dynpro USING 'SAPMF02D' '0100'.
PERFORM bdc_field USING 'BDC_CURSOR' 'USE_ZAV'.
PERFORM bdc_field USING 'BDC_OKCODE' '/00'.
PERFORM bdc_field USING 'RF02D-KUNNR' l_tbl_int_cli-kunnr.
PERFORM bdc_field USING 'RF02D-BUKRS' l_tbl_int_cli-bukrs.
PERFORM bdc_field USING 'RF02D-VKORG' l_tbl_int_cli-vkorg.
PERFORM bdc_field USING 'RF02D-VTWEG' l_tbl_int_cli-vtweg.
PERFORM bdc_field USING 'RF02D-SPART' l_tbl_int_cli-spart.
PERFORM bdc_field USING 'RF02D-REF_KUNNR' ' '.
PERFORM bdc_field USING 'RF02D-REF_BUKRS' ' '.
PERFORM bdc_field USING 'RF02D-REF_VKORG' ' '.
PERFORM bdc_field USING 'RF02D-REF_VTWEG' ' '.
PERFORM bdc_field USING 'RF02D-REF_SPART' ' '.
PERFORM bdc_field USING 'RF02D-KTOKD' l_tbl_int_cli-ktokd.
PERFORM bdc_field USING 'USE_ZAV' 'X'.
PERFORM bdc_dynpro USING 'SAPMF02D' '0111'.
PERFORM bdc_field USING 'BDC_OKCODE' '=$MCO'.
PERFORM bdc_field USING 'BDC_SUBSCR' 'SAPLSZA1 0300ADDRESS'.
PERFORM bdc_field USING 'BDC_SUBSCR' 'SAPLSZA1 0301COUNTRY_SCREEN'.
PERFORM bdc_field USING 'BDC_CURSOR' 'ADDR1_DATA-DONT_USE_S'.
PERFORM bdc_field USING 'SZA1_D0100-TITLE_MEDI' l_tbl_int_cli-formofaddr.
PERFORM bdc_field USING 'ADDR1_DATA-NAME1' l_tbl_int_cli-name.
PERFORM bdc_field USING 'ADDR1_DATA-NAME2' l_tbl_int_cli-name_2.
PERFORM bdc_field USING 'ADDR1_DATA-NAME3' l_tbl_int_cli-name_3.
PERFORM bdc_field USING 'ADDR1_DATA-NAME4' l_tbl_int_cli-name_4.
PERFORM bdc_field USING 'ADDR1_DATA-SORT1' l_tbl_int_cli-sort1.
PERFORM bdc_field USING 'ADDR1_DATA-SORT2' l_tbl_int_cli-sort2.
PERFORM bdc_field USING 'ADDR1_DATA-NAME_CO' l_tbl_int_cli-c_o_name.
PERFORM bdc_field USING 'ADDR1_DATA-STR_SUPPL1' l_tbl_int_cli-str_suppl1.
PERFORM bdc_field USING 'ADDR1_DATA-STR_SUPPL2' l_tbl_int_cli-str_suppl2.
PERFORM bdc_field USING 'ADDR1_DATA-STREET' l_tbl_int_cli-street_lng.
PERFORM bdc_field USING 'ADDR1_DATA-HOUSE_NUM1' l_tbl_int_cli-house_no.
PERFORM bdc_field USING 'ADDR1_DATA-HOUSE_NUM2' l_tbl_int_cli-house_no2.
PERFORM bdc_field USING 'ADDR1_DATA-STR_SUPPL3' l_tbl_int_cli-str_suppl3.
PERFORM bdc_field USING 'ADDR1_DATA-LOCATION' l_tbl_int_cli-location.
PERFORM bdc_field USING 'ADDR1_DATA-CITY2' l_tbl_int_cli-district.
PERFORM bdc_field USING 'ADDR1_DATA-POST_CODE1' l_tbl_int_cli-postl_cod1.
PERFORM bdc_field USING 'ADDR1_DATA-CITY1' l_tbl_int_cli-city.
PERFORM bdc_field USING 'ADDR1_DATA-COUNTRY' l_tbl_int_cli-country.
PERFORM bdc_field USING 'ADDR1_DATA-REGION' l_tbl_int_cli-region.
PERFORM bdc_field USING 'ADDR1_DATA-REGIOGROUP' l_tbl_int_cli-regiogroup.
PERFORM bdc_field USING 'ADDR1_DATA-DONT_USE_S' l_tbl_int_cli-dont_use_p.
PERFORM bdc_field USING 'ADDR1_DATA-LANGU' l_tbl_int_cli-langu.
PERFORM bdc_field USING 'BDC_SUBSCR' 'SAPLSZA1 1300APPL_SUB_T'.
PERFORM bdc_field USING 'BDC_SUBSCR' 'SAPLSEXM 0200APPL_SUB'.
PERFORM bdc_dynpro USING 'SAPMSSY0' '0120'.
PERFORM bdc_field USING 'BDC_CURSOR' '14/03'.
PERFORM bdc_field USING 'BDC_OKCODE' '=&ONT'.
PERFORM bdc_dynpro USING 'SAPLSZA6' '1200'.
PERFORM bdc_field USING 'BDC_CURSOR' 'ADURI-URI_SCREEN(01)'.
PERFORM bdc_field USING 'BDC_OKCODE' '=CONT'.
PERFORM bdc_field USING 'ADURI-URI_SCREEN(01)' l_tbl_int_cli-ad_uriscr.
PERFORM bdc_dynpro USING 'SAPMF02D' '0111'.
PERFORM bdc_field USING 'BDC_OKCODE' '=VW'.
PERFORM bdc_field USING 'BDC_SUBSCR' 'SAPLSZA1 0300ADDRESS'.
PERFORM bdc_field USING 'BDC_SUBSCR' 'SAPLSZA1 0301COUNTRY_SCREEN'.
PERFORM bdc_field USING 'BDC_CURSOR' 'ADDR1_DATA-REMARK'.
PERFORM bdc_field USING 'SZA1_D0100-TITLE_MEDI' l_tbl_int_cli-formofaddr.
PERFORM bdc_field USING 'ADDR1_DATA-NAME1' l_tbl_int_cli-name.
PERFORM bdc_field USING 'ADDR1_DATA-NAME2' l_tbl_int_cli-name_2.
PERFORM bdc_field USING 'ADDR1_DATA-NAME3' l_tbl_int_cli-name_3.
PERFORM bdc_field USING 'ADDR1_DATA-NAME4' l_tbl_int_cli-name_4.
PERFORM bdc_field USING 'ADDR1_DATA-SORT1' l_tbl_int_cli-sort1.
PERFORM bdc_field USING 'ADDR1_DATA-SORT2' l_tbl_int_cli-sort2.
PERFORM bdc_field USING 'ADDR1_DATA-NAME_CO' l_tbl_int_cli-c_o_name.
PERFORM bdc_field USING 'ADDR1_DATA-STR_SUPPL1' l_tbl_int_cli-str_suppl1.
PERFORM bdc_field USING 'ADDR1_DATA-STR_SUPPL2' l_tbl_int_cli-str_suppl2.
PERFORM bdc_field USING 'ADDR1_DATA-STREET' l_tbl_int_cli-street_lng.
PERFORM bdc_field USING 'ADDR1_DATA-HOUSE_NUM1' l_tbl_int_cli-house_no.
PERFORM bdc_field USING 'ADDR1_DATA-HOUSE_NUM2' l_tbl_int_cli-house_no2.
PERFORM bdc_field USING 'ADDR1_DATA-STR_SUPPL3' l_tbl_int_cli-str_suppl3.
PERFORM bdc_field USING 'ADDR1_DATA-LOCATION' l_tbl_int_cli-location.
PERFORM bdc_field USING 'ADDR1_DATA-CITY2' l_tbl_int_cli-district.
PERFORM bdc_field USING 'ADDR1_DATA-POST_CODE1' l_tbl_int_cli-postl_cod1.
PERFORM bdc_field USING 'ADDR1_DATA-CITY1' l_tbl_int_cli-city.
PERFORM bdc_field USING 'ADDR1_DATA-COUNTRY' l_tbl_int_cli-country.
PERFORM bdc_field USING 'ADDR1_DATA-REGION' l_tbl_int_cli-region.
PERFORM bdc_field USING 'ADDR1_DATA-DONT_USE_S' l_tbl_int_cli-dont_use_p.
PERFORM bdc_field USING 'ADDR1_DATA-PO_BOX' l_tbl_int_cli-po_box.
PERFORM bdc_field USING 'ADDR1_DATA-PO_BOX_NUM' l_tbl_int_cli-po_w_o_no.
PERFORM bdc_field USING 'ADDR1_DATA-POST_CODE2' l_tbl_int_cli-postl_cod2.
PERFORM bdc_field USING 'ADDR1_DATA-PO_BOX_CTY' l_tbl_int_cli-land1.
PERFORM bdc_field USING 'ADDR1_DATA-LANGU' l_tbl_int_cli-langu.
PERFORM bdc_field USING 'SZA1_D0100-TEL_NUMBER' l_tbl_int_cli-telefone.
PERFORM bdc_field USING 'SZA1_D0100-TEL_EXTENS' l_tbl_int_cli-extensao.
PERFORM bdc_field USING 'SZA1_D0100-MOB_NUMBER' l_tbl_int_cli-telf1.
PERFORM bdc_field USING 'SZA1_D0100-FAX_NUMBER' l_tbl_int_cli-fax.
PERFORM bdc_field USING 'SZA1_D0100-FAX_EXTENS' l_tbl_int_cli-ext_fax.
PERFORM bdc_field USING 'SZA1_D0100-SMTP_ADDR' l_tbl_int_cli-e_mail.
PERFORM bdc_field USING 'ADDR1_DATA-DEFLT_COMM' l_tbl_int_cli-comm_type.
PERFORM bdc_field USING 'ADDR1_DATA-EXTENSION1' l_tbl_int_cli-datlt.
PERFORM bdc_field USING 'ADDR1_DATA-EXTENSION2' l_tbl_int_cli-telbx.
PERFORM bdc_field USING 'ADDR1_DATA-REMARK' l_tbl_int_cli-adr_notes.
PERFORM bdc_field USING 'BDC_SUBSCR' 'SAPLSZA1 1300APPL_SUB_T'.
PERFORM bdc_field USING 'BDC_SUBSCR' 'SAPLSEXM 0200APPL_SUB'.
PERFORM bdc_dynpro USING 'SAPMF02D' '0120'.
PERFORM bdc_field USING 'BDC_CURSOR' 'KNA1-BRSCH'.
PERFORM bdc_field USING 'BDC_OKCODE' '=VW'.
PERFORM bdc_field USING 'KNA1-LIFNR' l_tbl_int_cli-lifnr.
PERFORM bdc_field USING 'KNA1-STCD1' l_tbl_int_cli-stcd1.
PERFORM bdc_field USING 'KNA1-STKZU' l_tbl_int_cli-stkzu.
PERFORM bdc_field USING 'KNA1-STCEG' l_tbl_int_cli-stceg.
PERFORM bdc_field USING 'KNA1-BRSCH' l_tbl_int_cli-brsch.
PERFORM bdc_dynpro USING 'SAPMF02D' '0125'.
PERFORM bdc_field USING 'BDC_CURSOR' 'KNA1-GFORM'.
PERFORM bdc_field USING 'BDC_OKCODE' '=VW'.
PERFORM bdc_field USING 'KNA1-RPMKR' l_tbl_int_cli-rpmkr.
PERFORM bdc_field USING 'KNA1-KUKLA' l_tbl_int_cli-kukla.
PERFORM bdc_field USING 'KNA1-BRSCH' l_tbl_int_cli-brsch.
DATA: l_fvalue TYPE fvalue.
CLEAR l_fvalue.
WRITE l_tbl_int_cli-umsa1 TO l_fvalue.
CONDENSE l_fvalue NO-GAPS.
PERFORM bdc_field USING 'KNA1-UMSA1' l_fvalue.
PERFORM bdc_field USING 'KNA1-UWAER' l_tbl_int_cli-waers.
PERFORM bdc_field USING 'KNA1-UMJAH' l_tbl_int_cli-umjah.
PERFORM bdc_field USING 'KNA1-GFORM' l_tbl_int_cli-gform.
PERFORM bdc_dynpro USING 'SAPMF02D' '0130'.
PERFORM bdc_field USING 'BDC_CURSOR' 'KNBK-BANKS(01)'.
PERFORM bdc_field USING 'BDC_OKCODE' '=VW'.
PERFORM bdc_dynpro USING 'SAPMF02D' '0340'.
PERFORM bdc_field USING 'BDC_CURSOR' 'RF02D-KUNNR'.
PERFORM bdc_field USING 'BDC_OKCODE' '=VW'.
PERFORM bdc_dynpro USING 'SAPMF02D' '0370'.
PERFORM bdc_field USING 'BDC_CURSOR' 'RF02D-KUNNR'.
PERFORM bdc_field USING 'BDC_OKCODE' '=VW'.
PERFORM bdc_field USING 'KNA1-CIVVE' 'X'. " ?!?!?
PERFORM bdc_dynpro USING 'SAPMF02D' '0360'.
PERFORM bdc_field USING 'BDC_CURSOR' 'KNVK-PAFKT(01)'.
PERFORM bdc_field USING 'BDC_OKCODE' '=VW'.
PERFORM bdc_field USING 'KNVK-NAMEV(01)' l_tbl_int_cli-namev.
PERFORM bdc_field USING 'KNVK-NAME1(01)' l_tbl_int_cli-name1.
PERFORM bdc_field USING 'KNVK-ABTNR(01)' l_tbl_int_cli-abtnr.
PERFORM bdc_field USING 'KNVK-PAFKT(01)' l_tbl_int_cli-pafkt.
PERFORM bdc_dynpro USING 'SAPMF02D' '0210'.
PERFORM bdc_field USING 'BDC_CURSOR' 'KNB1-GRICD'.
PERFORM bdc_field USING 'BDC_OKCODE' '=VW'.
PERFORM bdc_field USING 'KNB1-AKONT' l_tbl_int_cli-akont.
PERFORM bdc_field USING 'KNB1-ZUAWA' l_tbl_int_cli-zuawa.
PERFORM bdc_field USING 'KNB1-EKVBD' l_tbl_int_cli-ekvbd.
PERFORM bdc_dynpro USING 'SAPMF02D' '0215'.
PERFORM bdc_field USING 'BDC_CURSOR' 'KNB1-ZWELS'.
PERFORM bdc_field USING 'BDC_OKCODE' '=VW'.
PERFORM bdc_field USING 'KNB1-ZTERM' l_tbl_int_cli-zterm.
PERFORM bdc_field USING 'KNB1-TOGRU' l_tbl_int_cli-togru.
PERFORM bdc_field USING 'KNB1-XZVER' l_tbl_int_cli-xzver.
PERFORM bdc_field USING 'KNB1-ZWELS' l_tbl_int_cli-zwels.
PERFORM bdc_dynpro USING 'SAPMF02D' '0220'.
PERFORM bdc_field USING 'BDC_CURSOR' 'KNB5-MAHNA'.
PERFORM bdc_field USING 'BDC_OKCODE' '=VW'.
PERFORM bdc_dynpro USING 'SAPMF02D' '0310'.
PERFORM bdc_field USING 'BDC_CURSOR' 'KNVV-WAERS'.
PERFORM bdc_field USING 'BDC_OKCODE' '=VW'.
PERFORM bdc_field USING 'KNVV-VKBUR' l_tbl_int_cli-vkbur.
PERFORM bdc_field USING 'KNVV-EIKTO' l_tbl_int_cli-eikto.
PERFORM bdc_field USING 'KNVV-WAERS' l_tbl_int_cli-waers.
PERFORM bdc_field USING 'KNVV-KONDA' l_tbl_int_cli-konda.
PERFORM bdc_field USING 'KNVV-KALKS' l_tbl_int_cli-kalks.
PERFORM bdc_field USING 'BDC_OKCODE' '/00'.
PERFORM bdc_dynpro USING 'SAPMF02D' '0315'.
PERFORM bdc_field USING 'BDC_CURSOR' 'KNVV-PODKZ'.
PERFORM bdc_field USING 'BDC_OKCODE' '/00'.
PERFORM bdc_field USING 'KNVV-KZAZU' 'X'. " ?!?!?!
PERFORM bdc_field USING 'KNVV-VSBED' l_tbl_int_cli-vsbed.
PERFORM bdc_dynpro USING 'SAPMF02D' '0320'.
PERFORM bdc_field USING 'BDC_CURSOR' 'KNVV-PERRL'.
PERFORM bdc_field USING 'BDC_OKCODE' '=VW'.
PERFORM bdc_field USING 'KNVV-PERFK' l_tbl_int_cli-perfk.
PERFORM bdc_field USING 'KNVV-PERRL' l_tbl_int_cli-perrl.
PERFORM bdc_dynpro USING 'SAPMF02D' '1350'.
PERFORM bdc_field USING 'BDC_CURSOR' 'KNVI-TATYP(01)'.
PERFORM bdc_field USING 'BDC_OKCODE' '=ENTR'.
PERFORM bdc_field USING 'KNVI-TAXKD(01)' l_tbl_int_cli-taxkd.
PERFORM bdc_dynpro USING 'SAPMF02D' '1350'.
PERFORM bdc_field USING 'BDC_CURSOR' 'RF02D-KUNNR'.
PERFORM bdc_field USING 'BDC_OKCODE' '=UPDA'.
‎2007 May 24 4:30 PM
Hi
It appears that some OK_CODE function is missing for the screen
SAPMF02D 0310
check that
from SE51 go to that screen and see in display mode
you will know what's that screen is
so check when that screen is coming in the program and add the ok code of ENTER (if needed ) and run and see
Reward points if useful
Regards
Anji