Uploading data in MIRO Tcode
Hi friends,
In Tcode MIRO, i want to upload amount and qty for basci customes, CVD, ECESS, ECESS ON ALL DUTIES AND ADDITIONAL DUTY ON IMPORTS for a particular purchase order.
How to upload data. Thanks in advance.
regards,
senthilkumar.r
Hi Senthil,
SAP doesn't recommend to do call transactions in MIRO transactions. You should use the BAPI_INCOMINGINVOICE_CREATE BAPI Function Module. If you have any problems with this BAPI, please answer this message in the Forum.
Regards,
Daniel Carvalho.
Similar Messages
-
Problem in uploading data for the Tcode CA02
Hi,
I am trying to upload the data for the Tcode ca02 and i am facing a problem i.e. the uploading for the for the 18th inspection characterstic is not able to being uploaded. I had checked the code of it and the logic is there.
It was previously uploading the data for it,but iit is not doing now. I had cheked the program of the screen also the fields are also present..would u plz send code.so i can check
-
Uploading data in CRMD_ORDER tcode
Dear Friends,
we are uploading data in CRM 2007.
While uploading data for opportunity we want to upload the URL in attachment tab.
But we tried for recording in BDC , but it doesn't work. Also in there is no provision for same in CRM_ORDER_MAINTAIN .
kindly help me while uploading URL.
with regards,
Mehul .Hi,
I have not tried it myself but I think you can use one of the methods in the class CL_CRM_DOCUMENTS.
/Anders -
Hi: Uploading data for CN22 tcode
Hi,
Iam uploading data from flat file to sap, for CN22 transaction.
If i execute in foreground , it's working fine.
when iam trying to execute in background it is not updating.
i also used WAIT.
still it is not updating.
points will be rewarded,
thanks in advance,
ravi shankar reddyHi Ravi,
Iam using the same thing , but it is not working.
pls check the code.
REPORT zcn22networkid
NO STANDARD PAGE HEADING LINE-SIZE 255.
*include bdcrecx1.
DATA DECLARATIONS *
TYPES : BEGIN OF ty_rectab,
aufnr TYPE caufvd-aufnr,
vornr TYPE afvgd-vornr,
ltxa1 TYPE afvgd-ltxa1,
dauno(7), " TYPE afvgd-dauno,
arbei(9), " TYPE afvgd-arbei,
arbpl TYPE afvgd-arbpl,
mat_prkst(14), " TYPE afvgd-mat_prkst,
prkst(14), " TYPE afvgd-prkst,
waers TYPE afvgd-waers,
sakto TYPE afvgd-sakto,
END OF ty_rectab.
TYPES: BEGIN OF ty_msg,
msgnr(24), " TYPE bdcmsgcoll-msgnr,
msgtyp(10), "TYPE bdcmsgcoll-msgtyp,
message(500),
END OF ty_msg.
DATA : l_string(500).
DATA : fname TYPE string.
DATA : fname1 TYPE string.
DATA : l_indx(6) TYPE n.
DATA : l_indx1(6) TYPE n.
DATA : l_tab(1) TYPE c VALUE cl_abap_char_utilities=>horizontal_tab.
DATA : g_fieldname TYPE string.
DATA : opt TYPE ctu_params.
INTERNAL TABLES *
DATA : it_upload TYPE string OCCURS 0 WITH HEADER LINE.
DATA : bdcdata TYPE STANDARD TABLE OF bdcdata WITH HEADER LINE.
DATA : messtab TYPE STANDARD TABLE OF bdcmsgcoll WITH HEADER LINE.
DATA : it_rec TYPE STANDARD TABLE OF ty_rectab WITH HEADER LINE.
DATA : it_rec1 TYPE STANDARD TABLE OF ty_rectab WITH HEADER LINE.
DATA : it_msg TYPE STANDARD TABLE OF ty_msg WITH HEADER LINE.
DATA : it_rec2 TYPE STANDARD TABLE OF ty_rectab WITH HEADER LINE.
DATA : it_rec3 TYPE STANDARD TABLE OF ty_rectab WITH HEADER LINE.
SELECTION SCREEN *
SELECTION-SCREEN BEGIN OF BLOCK block1 WITH FRAME.
PARAMETERS : p_file TYPE rlgrap-filename OBLIGATORY.
PARAMETERS : r_fgrd RADIOBUTTON GROUP g1.
PARAMETERS : r_bgrd RADIOBUTTON GROUP g1.
SELECTION-SCREEN END OF BLOCK block1.
SELECTION-SCREEN BEGIN OF BLOCK block2 WITH FRAME.
PARAMETERS : p_efile TYPE rlgrap-filename. " OBLIGATORY.
SELECTION-SCREEN END OF BLOCK block2.
F4 HELP FOR FILE *
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file.
PERFORM f4_filename.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_efile.
PERFORM get_errorfile.
START-OF-SELECTION.
PERFORM upload_data.
*****FOR FOREGROUND*****
IF r_fgrd = 'X'.
opt-dismode = 'A'.
opt-updmode = 'S'.
opt-defsize = 'X'.
****FOR BACKGROUND******
ELSEIF r_bgrd = 'X'.
opt-dismode = 'N'.
opt-updmode = 'S'.
opt-defsize = 'X'.
ENDIF.
****BDC Data************
PERFORM bdc_data.
IF it_msg[] IS NOT INITIAL.
it_msg-msgnr = 'NetworkID'.
it_msg-msgtyp = 'Msgtyp'.
it_msg-message = 'Message'.
PERFORM download_errorfile.
ENDIF.
*& Form f4_filename *
FORM f4_filename .
CALL FUNCTION 'F4_FILENAME'
EXPORTING
field_name = 'P_FILE'
IMPORTING
file_name = p_file.
ENDFORM. " f4_filename
*& Form get_errorfile *
FORM get_errorfile .
CALL FUNCTION 'F4_FILENAME'
EXPORTING
field_name = 'P_EFILE'
IMPORTING
file_name = p_efile.
ENDFORM. " get_errorfile
*& FORM UPLOAD_DATA *
FORM upload_data .
fname = p_file.
CALL FUNCTION 'GUI_UPLOAD'
EXPORTING
filename = fname
filetype = 'ASC'
TABLES
data_tab = it_upload
EXCEPTIONS
file_open_error = 1
file_read_error = 2
no_batch = 3
gui_refuse_filetransfer = 4
invalid_type = 5
no_authority = 6
unknown_error = 7
bad_data_format = 8
header_not_allowed = 9
separator_not_allowed = 10
header_too_long = 11
unknown_dp_error = 12
access_denied = 13
dp_out_of_memory = 14
disk_full = 15
dp_timeout = 16
OTHERS = 17.
IF sy-subrc NE 0.
MESSAGE e001(00) WITH 'Error occurred while file reading'.
ELSE.
LOOP AT it_upload.
SPLIT it_upload AT l_tab INTO it_rec-aufnr
it_rec-vornr
it_rec-ltxa1
it_rec-dauno
it_rec-arbei
it_rec-arbpl
it_rec-mat_prkst
it_rec-prkst
it_rec-waers
it_rec-sakto IN CHARACTER MODE.
APPEND it_rec.
CLEAR it_rec.
ENDLOOP.
ENDIF.
ENDFORM. " upload_data
FORM BDC DATA
FORM bdc_data .
it_rec1[] = it_rec[].
SORT it_rec1 BY aufnr.
DELETE ADJACENT DUPLICATES FROM it_rec1 COMPARING aufnr.
LOOP AT it_rec.
IF ( ( it_rec-dauno IS NOT INITIAL ) AND
( it_rec-arbei IS NOT INITIAL ) AND
( it_rec-arbpl IS NOT INITIAL ) AND
( it_rec-mat_prkst IS NOT INITIAL ) ).
MOVE it_rec-aufnr TO it_rec2-aufnr.
MOVE it_rec-vornr TO it_rec2-vornr.
MOVE it_rec-ltxa1 TO it_rec2-ltxa1.
MOVE it_rec-dauno TO it_rec2-dauno.
MOVE it_rec-arbei TO it_rec2-arbei.
MOVE it_rec-arbpl TO it_rec2-arbpl.
MOVE it_rec-mat_prkst TO it_rec2-mat_prkst.
APPEND it_rec2.
CLEAR it_rec2.
ELSEIF ( ( it_rec-dauno IS INITIAL ) AND
( it_rec-arbei IS INITIAL ) AND
( it_rec-arbpl IS INITIAL ) AND
( it_rec-mat_prkst IS INITIAL ) ).
MOVE it_rec-aufnr TO it_rec3-aufnr.
MOVE it_rec-vornr TO it_rec3-vornr.
MOVE it_rec-ltxa1 TO it_rec3-ltxa1.
MOVE it_rec-prkst TO it_rec3-prkst.
MOVE it_rec-waers TO it_rec3-waers.
MOVE it_rec-sakto TO it_rec3-sakto.
APPEND it_rec3.
CLEAR it_rec3.
ENDIF.
ENDLOOP.
SORT it_rec2 BY aufnr.
SORT it_rec3 BY aufnr.
LOOP AT it_rec1.
CLEAR l_indx.
CLEAR l_indx1.
PERFORM bdc_dynpro USING 'SAPLCOKO' '2000'.
PERFORM bdc_field USING 'BDC_CURSOR'
'CAUFVD-AUFNR'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
PERFORM bdc_field USING 'CAUFVD-AUFNR'
it_rec1-aufnr.
PERFORM bdc_dynpro USING 'SAPLCOKO' '2100'.
PERFORM bdc_field USING 'BDC_CURSOR'
'CAUFVD-KTEXT'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=LIST'.
--table control--
LOOP AT it_rec2 WHERE aufnr = it_rec1-aufnr.
l_indx = l_indx + 1.
IF l_indx EQ 14 .
l_indx = l_indx MOD 12.
PERFORM bdc_dynpro USING 'SAPLCOVG' '2000'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=P+'.
ENDIF.
PERFORM bdc_dynpro USING 'SAPLCOVG' '2000'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
CONCATENATE 'AFVGD-DAUNO(' l_indx ')' INTO g_fieldname.
PERFORM bdc_field USING g_fieldname
'AFVGD-DAUNO'.
PERFORM bdc_dynpro USING 'SAPLCOVG' '2000'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
CONCATENATE 'AFVGD-ARBPL(' l_indx ')' INTO g_fieldname.
PERFORM bdc_field USING 'BDC_CURSOR'
g_fieldname.
CONCATENATE 'AFVGD-VORNR(' l_indx ')' INTO g_fieldname.
PERFORM bdc_field USING g_fieldname
it_rec2-vornr.
CONCATENATE 'AFVGD-LTXA1(' l_indx ')' INTO g_fieldname.
PERFORM bdc_field USING g_fieldname
it_rec2-ltxa1.
CONCATENATE 'AFVGD-DAUNO(' l_indx ')' INTO g_fieldname.
PERFORM bdc_field USING g_fieldname
it_rec2-dauno.
CONCATENATE 'AFVGD-ARBEI(' l_indx ')' INTO g_fieldname.
PERFORM bdc_field USING g_fieldname
it_rec2-arbei.
CONCATENATE 'AFVGD-ARBPL(' l_indx ')' INTO g_fieldname.
PERFORM bdc_field USING g_fieldname
it_rec2-arbpl.
PERFORM bdc_dynpro USING 'SAPLCONW' '1000'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=BACK'.
PERFORM bdc_field USING 'BDC_CURSOR'
'AFVGD-VORNR'.
PERFORM bdc_field USING 'AFVGD-VORNR'
it_rec2-vornr.
PERFORM bdc_field USING 'AFVGM-LTXA1'
it_rec2-ltxa1.
PERFORM bdc_field USING 'AFVGD-ARBPL'
it_rec2-arbpl.
PERFORM bdc_field USING 'AFVGD-ARBEI'
it_rec2-arbei.
PERFORM bdc_field USING 'AFVGD-DAUNO'
it_rec2-dauno.
PERFORM bdc_dynpro USING 'SAPLCONW' '1000'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=BACK'.
PERFORM bdc_field USING 'BDC_CURSOR'
'AFVGD-VORNR'.
PERFORM bdc_field USING 'AFVGD-VORNR'
it_rec2-vornr.
PERFORM bdc_field USING 'AFVGM-LTXA1'
it_rec2-ltxa1.
PERFORM bdc_dynpro USING 'SAPLCONW' '1000'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=BACK'.
PERFORM bdc_field USING 'BDC_CURSOR'
'AFVGD-VORNR'.
PERFORM bdc_field USING 'AFVGD-VORNR'
it_rec2-vornr.
PERFORM bdc_field USING 'AFVGM-LTXA1'
it_rec2-ltxa1.
PERFORM bdc_dynpro USING 'SAPLCONW' '1000'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=BACK'.
PERFORM bdc_field USING 'AFVGD-VORNR'
it_rec2-vornr.
PERFORM bdc_field USING 'AFVGM-LTXA1'
it_rec2-ltxa1.
PERFORM bdc_field USING 'BDC_CURSOR'
'AFVGD-MAT_PRKST'.
PERFORM bdc_field USING 'AFVGD-MAT_PRKST'
it_rec2-mat_prkst.
PERFORM bdc_dynpro USING 'SAPLCOVG' '2000'.
PERFORM bdc_field USING 'BDC_CURSOR'
'VSNETEXT-NPLNR'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=ARBL'.
ENDLOOP.
LOOP AT it_rec3 WHERE aufnr = it_rec1-aufnr.
l_indx1 = l_indx1 + 1.
IF l_indx1 EQ 14 .
l_indx1 = l_indx1 MOD 12.
PERFORM bdc_dynpro USING 'SAPLCOVG' '2000'..
PERFORM bdc_field USING 'BDC_OKCODE'
'=P+'.
ENDIF.
PERFORM bdc_dynpro USING 'SAPLCOVG' '2000'.
CONCATENATE 'AFVGD-SAKTO(' l_indx1 ')' INTO g_fieldname.
PERFORM bdc_field USING g_fieldname
'AFVGD-SAKTO'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=KOSL'.
PERFORM bdc_dynpro USING 'SAPLCOVG' '2000'.
PERFORM bdc_field USING 'BDC_CURSOR'
'VSNETEXT-NPLNR'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=KOSL'.
PERFORM bdc_dynpro USING 'SAPLCOVG' '2000'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
CONCATENATE 'AFVGD-SAKTO(' l_indx1 ')' INTO g_fieldname.
PERFORM bdc_field USING 'BDC_CURSOR'
g_fieldname.
CONCATENATE 'AFVGD-VORNR(' l_indx1 ')' INTO g_fieldname.
PERFORM bdc_field USING g_fieldname
it_rec3-vornr.
CONCATENATE 'AFVGD-LTXA1(' l_indx1 ')' INTO g_fieldname.
PERFORM bdc_field USING g_fieldname
it_rec3-ltxa1.
CONCATENATE 'AFVGD-PRKST(' l_indx1 ')' INTO g_fieldname.
PERFORM bdc_field USING g_fieldname
it_rec3-prkst.
CONCATENATE 'AFVGD-WAERS(' l_indx1')' INTO g_fieldname.
PERFORM bdc_field USING g_fieldname
it_rec3-waers.
CONCATENATE 'AFVGD-SAKTO(' l_indx1 ')' INTO g_fieldname.
PERFORM bdc_field USING g_fieldname
it_rec3-sakto.
PERFORM bdc_dynpro USING 'SAPLCONW' '1000'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=BACK'.
PERFORM bdc_field USING 'AFVGD-VORNR'
it_rec3-vornr.
PERFORM bdc_field USING 'AFVGM-LTXA1'
it_rec3-ltxa1.
PERFORM bdc_field USING 'BDC_CURSOR'
'AFVGD-PRKST'.
PERFORM bdc_field USING 'AFVGD-PRKST'
it_rec3-prkst.
PERFORM bdc_field USING 'AFVGD-WAERS'
it_rec3-waers.
PERFORM bdc_field USING 'AFVGD-SAKTO'
it_rec3-sakto.
PERFORM bdc_dynpro USING 'SAPLCONW' '1000'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=BACK'.
PERFORM bdc_field USING 'BDC_CURSOR'
'AFVGD-VORNR'.
PERFORM bdc_field USING 'AFVGD-VORNR'
it_rec3-vornr.
PERFORM bdc_field USING 'AFVGM-LTXA1'
it_rec3-ltxa1.
PERFORM bdc_dynpro USING 'SAPLCONW' '1000'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=BACK'.
PERFORM bdc_field USING 'BDC_CURSOR'
'AFVGD-VORNR'.
PERFORM bdc_field USING 'AFVGD-VORNR'
it_rec3-vornr.
PERFORM bdc_field USING 'AFVGM-LTXA1'
it_rec3-ltxa1.
PERFORM bdc_dynpro USING 'SAPLCONW' '1000'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=BACK'.
PERFORM bdc_field USING 'BDC_CURSOR'
'AFVGD-VORNR'.
PERFORM bdc_field USING 'AFVGD-VORNR'
it_rec3-vornr.
PERFORM bdc_field USING 'AFVGM-LTXA1'
it_rec3-ltxa1.
PERFORM bdc_dynpro USING 'SAPLCOVG' '2000'.
PERFORM bdc_field USING 'BDC_CURSOR'
'VSNETEXT-NPLNR'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=ARBL'.
ENDLOOP.
CLEAR it_rec.
WAIT UP TO 10 SECONDS.
PERFORM bdc_dynpro USING 'SAPLCOVG' '2000'.
PERFORM bdc_field USING 'BDC_CURSOR'
'VSNETEXT-NPLNR'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=BU'.
REFRESH messtab.
CLEAR messtab.
CALL TRANSACTION 'CN22' USING bdcdata
OPTIONS FROM opt MESSAGES INTO messtab.
********ERROR MESSAGES TABLE************
LOOP AT messtab WHERE ( msgtyp = 'E' ).
CALL FUNCTION 'FORMAT_MESSAGE'
EXPORTING
id = messtab-msgid
lang = '-D'
no = messtab-msgnr
v1 = messtab-msgv1
v2 = messtab-msgv2
v3 = messtab-msgv3
v4 = messtab-msgv4
IMPORTING
msg = l_string
EXCEPTIONS
not_found = 1
OTHERS = 2.
IF sy-subrc <> 0.
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ELSE.
it_msg-msgnr = it_rec-aufnr.
it_msg-msgtyp = messtab-msgtyp.
it_msg-message = l_string.
APPEND it_msg.
CLEAR it_msg.
CLEAR l_string.
CLEAR messtab.
ENDIF.
ENDLOOP. "IT_REC
REFRESH bdcdata.
CLEAR bdcdata.
ENDLOOP. "IT_REC1
ENDFORM. " bdc_data
Start new screen *
FORM bdc_dynpro USING program dynpro.
CLEAR bdcdata.
bdcdata-program = program.
bdcdata-dynpro = dynpro.
bdcdata-dynbegin = 'X'.
APPEND bdcdata.
ENDFORM. "BDC_DYNPRO
Insert field *
FORM bdc_field USING fnam fval.
CLEAR bdcdata.
bdcdata-fnam = fnam.
bdcdata-fval = fval.
APPEND bdcdata.
ENDFORM. "BDC_FIELD
*& Form download_errorfile *
FORM download_errorfile .
fname1 = p_efile.
CALL FUNCTION 'GUI_DOWNLOAD'
EXPORTING
filename = fname1
filetype = 'ASC'
write_field_separator = 'X'
TABLES
data_tab = it_msg[]
EXCEPTIONS
file_write_error = 1
no_batch = 2
gui_refuse_filetransfer = 3
invalid_type = 4
no_authority = 5
unknown_error = 6
header_not_allowed = 7
separator_not_allowed = 8
filesize_not_allowed = 9
header_too_long = 10
dp_error_create = 11
dp_error_send = 12
dp_error_write = 13
unknown_dp_error = 14
access_denied = 15
dp_out_of_memory = 16
disk_full = 17
dp_timeout = 18
file_not_found = 19
dataprovider_exception = 20
control_flush_error = 21
OTHERS = 22.
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDFORM. " download_errorfile -
HAI ,
pls specify how to upload data from a flat file which contains all MATERIAL TYPES IN A single flat file through call transaction or bdc session method ..
pls specify imp code atleast
thanking u.hi,
check this example.
TABLES : IBIPPARMS.
*& Types
TYPES : BEGIN OF TY_ITAB,
MATNR TYPE MATNR, "MATERIAL NO
WERKS TYPE WERKS, "PLANT
STLAN TYPE STLAN, "BOM USAGE
DATUV TYPE DATUV, "VALID DATE
BMENG TYPE BMENG, "BASE QUANTITY
IDNRK TYPE IDNRK, "COMPONENT
MENGE TYPE RC29P-MENGE, "QUANTITY
MEINS TYPE MEINS, "UNIT
POSTP TYPE POSTP, "ITEM CATEGORY
END OF TY_ITAB.
*& DATA Declaration
DATA : IT_ITAB TYPE TABLE OF TY_ITAB WITH HEADER LINE.
DATA : IT_BDCDATA TYPE TABLE OF BDCDATA WITH HEADER LINE.
DATA : IT_BDCMSGCOLL TYPE TABLE OF BDCMSGCOLL WITH HEADER LINE.
DATA : P_FILE1 TYPE STRING ,"FILE NAME
V_LINES TYPE I.
DATA : IT1_ITAB like IT_ITAB occurs 0 with header line.
*& SELECTION-SCREEN DECLARATION
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.
PARAMETERS : P_FILE TYPE LOCALFILE OBLIGATORY."FILE NAME
SELECTION-SCREEN END OF BLOCK B1 .
AT-SELECTION-SCREEN DECALRATION *
AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_FILE.
clear : P_FILE.
CALL FUNCTION 'F4_FILENAME'
EXPORTING
PROGRAM_NAME = SYST-CPROG
DYNPRO_NUMBER = SYST-DYNNR
IMPORTING
FILE_NAME = P_FILE.
IF P_FILE IS NOT INITIAL.
VALIDATE FILE TYPE
PERFORM SUB_VALIDATE_txt_TYPE.
ENDIF.
START-OF-SELECTION
start-of-selection.
perform upload.
perform bdc.
*& Form upload
text
--> p1 text
<-- p2 text
FORM upload .
clear : P_FILE1.
P_FILE1 = P_FILE.
CALL FUNCTION 'GUI_UPLOAD'
EXPORTING
FILENAME = P_FILE1
FILETYPE = 'ASC'
HAS_FIELD_SEPARATOR = 'X'
TABLES
DATA_TAB = IT_ITAB
EXCEPTIONS
FILE_OPEN_ERROR = 1
FILE_READ_ERROR = 2
NO_BATCH = 3
GUI_REFUSE_FILETRANSFER = 4
INVALID_TYPE = 5
NO_AUTHORITY = 6
UNKNOWN_ERROR = 7
BAD_DATA_FORMAT = 8
HEADER_NOT_ALLOWED = 9
SEPARATOR_NOT_ALLOWED = 10
HEADER_TOO_LONG = 11
UNKNOWN_DP_ERROR = 12
ACCESS_DENIED = 13
DP_OUT_OF_MEMORY = 14
DISK_FULL = 15
DP_TIMEOUT = 16
OTHERS = 17.
IF SY-SUBRC <> 0.
endif.
ENDFORM. " upload
form bdc.
*COPY DATA FROM IT_ITAB INTO IT_ITAB1
IT1_ITAB[] = IT_ITAB[].
*IF SY-SUBRC <> 0 OR IT_ITAB IS INITIAL.
UNABLE TO UPLOAD DATA FROM FLAT FILE
*MESSAGE I003(ZMSG).
*ENDIF.
*& Form bdc
text
--> p1 text
<-- p2 text
*FORM BDC.
LOOP AT IT_ITAB.
REFRESH IT_BDCDATA .
*FIRST SCREEN
perform bdc_dynpro using 'SAPLCSDI' '0100'.
perform bdc_field using 'BDC_CURSOR'
'RC29N-DATUV'.
perform bdc_field using 'BDC_OKCODE'
'/00'.
perform bdc_field using 'RC29N-MATNR'
IT_ITAB-MATNR.
perform bdc_field using 'RC29N-WERKS'
IT_ITAB-WERKS.
perform bdc_field using 'RC29N-STLAN'
IT_ITAB-STLAN.
perform bdc_field using 'RC29N-DATUV'
IT_ITAB-DATUV.
*SECOND SCREEN
perform bdc_dynpro using 'SAPLCSDI' '0110'.
perform bdc_field using 'BDC_CURSOR'
'RC29K-BMENG'.
perform bdc_field using 'BDC_OKCODE'
'/00'.
perform bdc_field using 'RC29K-BMENG'
IT_ITAB-BMENG.
perform bdc_field using 'RC29K-STLST'
'1'.
*THIRD SCREEN
LOOP AT IT1_ITAB WHERE MATNR = IT_ITAB-MATNR.
perform bdc_dynpro using 'SAPLCSDI' '0111'.
perform bdc_field using 'BDC_CURSOR'
'RC29K-LABOR'.
perform bdc_field using 'BDC_OKCODE'
'/00'.
perform bdc_dynpro using 'SAPLCSDI' '0140'.
perform bdc_field using 'BDC_CURSOR'
'RC29P-POSTP(02)'.
perform bdc_field using 'BDC_OKCODE'
'/00'.
*perform bdc_field using 'RC29P-IDNRK(01)'
IT_ITAB-IDNRK.
perform bdc_field using 'RC29P-IDNRK(SY-TABIX)'
IT_ITAB-IDNRK.
perform bdc_field using 'RC29P-IDNRK(02)'
'100017'.
perform bdc_field using 'RC29P-MENGE(SY-TABIX)'
IT_ITAB-MENGE.
perform bdc_field using 'RC29P-MENGE(02)'
'200'.
perform bdc_field using 'RC29P-MEINS(SY-TABIX)'
IT_ITAB-MEINS.
perform bdc_field using 'RC29P-MEINS(02)'
'kg'.
perform bdc_field using 'RC29P-POSTP(SY-TABIX)'
IT_ITAB-POSTP.
perform bdc_field using 'RC29P-POSTP(02)'
'l'.
ENDLOOP.
perform bdc_dynpro using 'SAPLCSDI' '0130'.
perform bdc_field using 'BDC_OKCODE'
'/00'.
perform bdc_field using 'BDC_CURSOR'
'RC29P-POSNR'.
perform bdc_field using 'RC29P-POSNR'
'0010'.
perform bdc_field using 'RC29P-IDNRK'
'100012'.
perform bdc_field using 'RC29P-MENGE'
'150'.
perform bdc_field using 'RC29P-MEINS'
'KG'.
perform bdc_dynpro using 'SAPLCSDI' '0131'.
perform bdc_field using 'BDC_OKCODE'
'/00'.
perform bdc_field using 'BDC_CURSOR'
'RC29P-POTX1'.
perform bdc_field using 'RC29P-SANKA'
'X'.
perform bdc_dynpro using 'SAPLCSDI' '0130'.
perform bdc_field using 'BDC_OKCODE'
'/00'.
perform bdc_field using 'BDC_CURSOR'
'RC29P-POSNR'.
perform bdc_field using 'RC29P-POSNR'
'0020'.
perform bdc_field using 'RC29P-IDNRK'
'100017'.
perform bdc_field using 'RC29P-MENGE'
'200'.
perform bdc_field using 'RC29P-MEINS'
'KG'.
perform bdc_dynpro using 'SAPLCSDI' '0131'.
perform bdc_field using 'BDC_OKCODE'
'/00'.
perform bdc_field using 'BDC_CURSOR'
'RC29P-POTX1'.
perform bdc_field using 'RC29P-SANKA'
'X'.
perform bdc_dynpro using 'SAPLCSDI' '0140'.
perform bdc_field using 'BDC_CURSOR'
'RC29P-POSNR(01)'.
perform bdc_field using 'BDC_OKCODE'
'=FCBU'.
*perform bdc_transaction using 'CS01'.
*perform close_group.
CALL TRANSACTION 'CS01' USING IT_BDCDATA MODE 'N'
UPDATE 'S'
MESSAGES INTO IT_BDCMSGCOLL.
CLEAR IT_ITAB.
ENDLOOP.
endform.
**GET THE NUMBER OF LINES
*DESCRIBE TABLE IT_BDCMSGCOLL LINES V_LINES.
**ENDFORM.
*& Form SUB_VALIDATE_TXT_TYPE
text
--> p1 text
<-- p2 text
FORM SUB_VALIDATE_txt_TYPE .
DATA : STR1 TYPE LOCALFILE,
STR2 TYPE CHAR3.
SPLIT P_FILE AT '.' INTO STR1 STR2.
TRANSLATE STR2 TO LOWER CASE.
IF STR2 NE 'txt'.
please enter '.txt' file format
MESSAGE I001(ZMSG).
LEAVE LIST-PROCESSING.
ENDIF.
ENDFORM. " SUB_VALIDATE_TXT_TYPE
*& Form bdc_dynpro
text
-->P_0160 text
-->P_0161 text
FORM bdc_dynpro USING PROGRAM DYNPRO.
CLEAR IT_BDCDATA.
IT_BDCDATA-PROGRAM = PROGRAM.
IT_BDCDATA-DYNPRO = DYNPRO.
IT_BDCDATA-DYNBEGIN = 'X'.
APPEND IT_BDCDATA.
ENDFORM. " bdc_dynpro
*& Form bdc_field
text
-->P_0160 text
-->P_ENDLOOP text
FORM bdc_field USING FNAM FVAL.
CLEAR IT_BDCDATA. .
IT_BDCDATA-FNAM = FNAM.
IT_BDCDATA-FVAL = FVAL.
APPEND IT_BDCDATA.
ENDFORM. " bdc_field -
Hi,
I want to upload data for the Tcode IW21,I tried to make BDC but i was giving only 1 problem that it is not able to capture the screen for Long Text as it is used as script handling.i am able to find a BAPI but i dont know how to use it,i tried to do work through LSMW but there is no information. Pleas provide me guidelines how to solve this problem.. I am providing the link to the code which i had developed(BDC) for the tcode IW21 .
Here's the code:-
http://docs.google.com/View?id=dfxswwff_3gtn9qsdp
Edited by: ricx .s on Jun 24, 2009 6:24 AMhi,
Thanks for your help. Can i use BAPI to upload data for IW21 and how to trace the fields of a BAPI to upload the data .
Here's the code which i searched on net bu there is no information regarding the fields tobe traced and should i include it in my code which i had provided above ?
data: i_bapi2080_nothdri type standard table of bapi2080_nothdri with header line.
data: i_bapiret2 type standard table of bapiret2 with header line.
data: i_bapi2080_nothdre type standard table of bapi2080_nothdre with header line.
data: i_bapi2080_notfulltxti type standard table of bapi2080_notfulltxti with header line.
* create header data
i_bapi2080_nothdri-refobjectkey = 'PJAREF'.
i_bapi2080_nothdri-equipment = '10000030'.
i_bapi2080_nothdri-reportedby = 'PJAREP'.
i_bapi2080_nothdri-short_text = 'PJA Short Test from BAPI'.
i_bapi2080_nothdri-priority = '1'.
* create header long text
i_bapi2080_notfulltxti-objtype = 'QMEL'.
i_bapi2080_notfulltxti-FORMAT_COL = 'U1'.
i_bapi2080_notfulltxti-text_line = 'Long text 1'.
append i_bapi2080_notfulltxti.
i_bapi2080_notfulltxti-objtype = 'QMEL'.
i_bapi2080_notfulltxti-FORMAT_COL = 'U1'.
i_bapi2080_notfulltxti-text_line = 'Long text 2'.
append i_bapi2080_notfulltxti.
call function 'BAPI_ALM_NOTIF_CREATE'
exporting
* EXTERNAL_NUMBER =
notif_type = 'M1'
notifheader = i_bapi2080_nothdri
* TASK_DETERMINATION = ' '
* SENDER =
* ORDERID =
importing
notifheader_export = i_bapi2080_nothdre
tables
* NOTITEM =
* NOTIFCAUS =
* NOTIFACTV =
* NOTIFTASK =
* NOTIFPARTNR =
longtexts = i_bapi2080_notfulltxti
* KEY_RELATIONSHIPS =
return = i_bapiret2.
call function 'BAPI_ALM_NOTIF_SAVE'
exporting
number = i_bapi2080_nothdre-notif_no
* IMPORTING
* NOTIFHEADER =
* TABLES
* RETURN =
call function 'BAPI_TRANSACTION_COMMIT'
* EXPORTING
* WAIT =
* IMPORTING
* RETURN =
Please provide me guidelines for it.Is there any way to upload the data for this Tcode IW21 through LSMW?
Edited by: ricx .s on Jun 24, 2009 10:20 AM -
Uploading data from flat file to table control
HI All,
I want to upload data to OVKK tcode using BDC. For this I wrote Z program as shown below:
REPORT ZSD_BDC_OVKK_UPLOAD
NO STANDARD PAGE HEADING LINE-SIZE 255.
*INCLUDE bdcrecx1.
DATA : BEGIN OF T_DUMMY OCCURS 0,
VAR(100) TYPE C,
END OF T_DUMMY.
DATA: BEGIN OF ITAB OCCURS 0,
KALSM(10) TYPE C,
* KARTV(10) TYPE C,
VKORG(4) TYPE C,
VTWEG(2) TYPE C,
SPART(2) TYPE C,
KALVG(1) TYPE C,
KALKS(1) TYPE C,
KALSM(6) TYPE C,
KARTV(4) TYPE C,
END OF ITAB.
DATA : IT_BDCDATA LIKE BDCDATA OCCURS 0 WITH HEADER LINE,
IT_BDCMSGCOLL LIKE BDCMSGCOLL OCCURS 0 WITH HEADER LINE.
DATA : v_filename TYPE string.
PARAMETER : filename LIKE rlgrap-filename OBLIGATORY.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR filename.
CALL FUNCTION 'KD_GET_FILENAME_ON_F4'
EXPORTING
field_name = filename
CHANGING
file_name = filename.
START-OF-SELECTION.
v_filename = filename.
CALL FUNCTION 'GUI_UPLOAD'
EXPORTING
filename = v_filename
filetype = 'ASC'
has_field_separator = 'X'
TABLES
data_tab = T_DUMMY.
LOOP AT T_DUMMY.
ITAB-VKORG = T_DUMMY-VAR+0(4).
ITAB-VTWEG = T_DUMMY-VAR+5(2).
ITAB-SPART = T_DUMMY-VAR+8(2).
ITAB-KALVG = T_DUMMY-VAR+11(1).
ITAB-KALKS = T_DUMMY-VAR+13(1).
ITAB-KALSM = T_DUMMY-VAR+15(6).
ITAB-KARTV = T_DUMMY-VAR+22(4).
APPEND ITAB.
ENDLOOP.
DATA: FNAM(20) TYPE C,
IDX TYPE C.
MOVE 1 TO IDX.
LOOP AT ITAB.
REFRESH IT_BDCDATA.
PERFORM bdc_dynpro USING 'SAPML080Z' '0100'.
PERFORM bdc_field USING 'BDC_CURSOR'
'V_T683V-KALSM(01)'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=NEWL'.
PERFORM bdc_dynpro USING 'SAPML080Z' '0100'.
PERFORM bdc_field USING 'BDC_CURSOR'
'V_T683V-VKORG(01)'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=SAVE'.
CONCATENATE 'V_T683V-KALSM(' IDX ')' INTO FNAM.
PERFORM bdc_field USING FNAM
itab-kalsm.
CONCATENATE 'V_T683V-KARTV(' IDX ')' INTO FNAM.
PERFORM bdc_field USING FNAM
itab-kartv.
CONCATENATE 'V_T683V-VKORG(' IDX ')' INTO FNAM.
PERFORM bdc_field USING FNAM
itab-vkorg.
CONCATENATE 'V_T683V-VTWEG(' IDX ')' INTO FNAM.
PERFORM bdc_field USING FNAM
itab-vtweg.
CONCATENATE 'V_T683V-SPART(' IDX ')' INTO FNAM.
PERFORM bdc_field USING FNAM
itab-spart.
CONCATENATE 'V_T683V-KALVG(' IDX ')' INTO FNAM.
PERFORM bdc_field USING FNAM
itab-kalvg.
CONCATENATE 'V_T683V-KALKS(' IDX ')' INTO FNAM.
PERFORM bdc_field USING FNAM
itab-kalks.
PERFORM bdc_dynpro USING 'SAPLSTRD' '0300'.
PERFORM bdc_field USING 'BDC_CURSOR'
'KO008-TRKORR'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=LOCK'.
PERFORM bdc_field USING 'KO008-TRKORR'
'D47K919377'.
PERFORM bdc_field USING 'BDC_CURSOR'
'V_T683V-VKORG(01)'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
PERFORM bdc_field USING 'BDC_CURSOR'
'V_T683V-VKORG(01)'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=SAVE'.
CALL TRANSACTION 'OVKK' USING IT_BDCDATA
MODE 'A'
UPDATE 'S'
MESSAGES INTO IT_BDCMSGCOLL.
IDX = IDX + 1 .
endloop.
FORM BDC_DYNPRO USING PROG SCR.
CLEAR IT_BDCDATA.
IT_BDCDATA-PROGRAM = PROG.
IT_BDCDATA-DYNPRO = SCR.
IT_BDCDATA-DYNBEGIN = 'X'.
APPEND IT_BDCDATA.
ENDFORM.
FORM BDC_FIELD USING FNAM FVAL.
CLEAR IT_BDCDATA.
IT_BDCDATA-FNAM = FNAM.
IT_BDCDATA-FVAL = FVAL.
APPEND IT_BDCDATA.
ENDFORM.
I checked in debugging mode and found that data is passed to internal table but its not uploading data to OVKK, there no data is displayed.
Please tell me solution for this.....
regards,
ravindra.Hi,
Look at the following link you will find some good example of Table control.
http://www.sap-img.com/abap/bdc-example-using-table-control-in-bdc.htm
Here you need to take care to which line of table control you are populating the data.
Make sure to take care of page down in table control.
*********Try Call Transaction in MODE 'N'.
Check your OK_CODE once again.
Try to give BACk also after saving.
The Table control is mainly used to update no.of line items at one shot. No need to come BACK for each and every record.
Try to do recording in SHDB once again and see the changes closely.
Thanks.
If this helps you reward with points.
Message was edited by: KDeepak
Message was edited by: KDeepak -
Uploading data thru BDC into APPCREATE transaction
Hi,
I have used BDC to upload data in the tcode APPCREATE. When I see the uploading using the call transaction method, I am able to see that all the screens are getting populated correctly. But, When I check the result of the upload in APPSEARCH tcode, i am not able to see the completed status. Still the status is 'In Preparation'.
But manually, I am able to do that. I just want to find out if any keys needs to be activated/changed before doing the upload thru BDC.
Thanks & Regards,
SureshHi,
I have used BDC to upload data in the tcode APPCREATE. When I see the uploading using the call transaction method, I am able to see that all the screens are getting populated correctly. But, When I check the result of the upload in APPSEARCH tcode, i am not able to see the completed status. Still the status is 'In Preparation'.
But manually, I am able to do that. I just want to find out if any keys needs to be activated/changed before doing the upload thru BDC.
Thanks & Regards,
Suresh -
Problem with uploading data from excel using BDC for tcode f-02
Hi All,
I am uploading data from excel using BDC for tcode f-02. The problem here is, while recording, the values of some fields are recording twice. I dont know why it's happening so. But if I run my abap program, I have to give those fields twice in my excel sheet. Otherwise data does not upload. But it is not the feasible way. We must give those fields once in excel. Please tell me, how I can solve the issue.
With regards,
Rosaline.Hi,
in BDC each and every action is recording. If your press enter in same screen that also recorded once aging may be this is your case repeating field values will appear. we can solve the problem for repeat fields like below.
suppose in your excel having repeated field X1 X2 X3 the X2 contains repeated field X3 means delete the X3 field.
Now In your itab having X1 and X2 fields. While in the LOOP the ITAB pass the X2 field to repeated the fields.
LOOP at ITAB to WA.
CLEAR bdcdata_wa.
bdcdata_wa-fnam = 'BDC_CURSOR'.
bdcdata_wa-fval = 'RM08M-EBELN'.
APPEND bdcdata_wa TO bdcdata_tab.
CLEAR bdcdata_wa.
bdcdata_wa-fnam = 'INVFO-BLDAT'.
bdcdata_wa-fval = wa-X2." 1st time pass the X2 fields
APPEND bdcdata_wa TO bdcdata_tab.
CLEAR bdcdata_wa.
bdcdata_wa-fnam = 'INVFO-BLDAT'.
bdcdata_wa-fval = wa-X2." pass the same value to repeated field
APPEND bdcdata_wa TO bdcdata_tab.
Endloop.
Hope you can understand.
Regards,
Dhina.. -
Tcode to upload data into CATSDB table
Hi All,
Could anyone let me know what is the TCODE that we will record and upload data into CATSDB table in HR ABAP.
Regards,
Srinivas.Hi,
I also need the same information...i.e i want to record overtime of Employees...Where to do this?
I tried creating it in PA61. I am able to create it with attendance type. But its triggering the CREATED method of ATTENDANCE Bus. Object. But i have been asked to use CREATED method CATS Bus. Object.
Can anyone help me in this??? Also tell me how make entries in CAT2 ....
Thanks,
Sivagami.R -
Tcode to upload data into CATSDB table in HR ABAP
Hi All,
Could anyone let me know what is the TCODE to upload data into CATSDB table in HR ABAP.
Regards,
Srinivas.Thanks for your reply but i'm not able to find the required fields to upload.
those are : pernr - employee number(ok)
workdate - date
awart - att./absence type
lgart - wage type
meinh - unit of measure
catsquantity- quantity number
Regards,
Srinivas -
Upload data from excel to application server
Hi all,
Is there any process to upload data from excel to application server other than reading the data from excel to z program through gui_upload and transferring the data to application server.
I want to run background job for a BDC program with the data present in the excel file.
Thanks & regards
sreehari p.Hi Sreehari,
Please use the tcode - CG3Z, where you can transfer the file from presentation server to the application server.
Regards,
Selva K. -
Problem in uploading data to psa.
Hi experts,
im having problems in uploading data to psa using info package in HR info area.
while monitoring the info package the following error comes with red traffic signal..
Request still running
Diagnosis
No errors found. The current process has probably not finished yet.
System Response
The ALE inbox of BI is identical to the ALE outbox of the source system
or
the maximum wait time for this request has not yet been exceeded
or
the background job has not yet finished in the source system.
Current status
No Idocs arrived from the source system.
So , please help me in this regard...
waiting for your reply...Hi,
You may need to check for pending TRFCs/IDOCs in source system in Tcode SM58 and BD87 and process them manually.
ProcessI DOCS Manually
http://help.sap.com/saphelp_nw04s/helpdata/en/0b/2a6620507d11d18ee90000e8366fc2/frameset.htm
http://help.sap.com/saphelp_nw04/helpdata/en/dc/6b815e43d711d1893e0000e8323c4f/content.htm
&messageID=2311994
Thanks,
JituK -
In RFC how to uploading data using bdc
Hi, Experts
In RFC how to use bdc program for uploading data
any example plz.
my requrement for tcode ME21.
thank you in advance.
with best regards
saiThank u reply
my requirement is in function moudle
( Program will be called from non-sap system with the data in the form of table as per the structure given above. Then the program will do the some validation for the data. If data validated correct, BDC will be run for creating DO
condition is )
ex:
if T_itab KNTTP = K,
Run BDC for transaction ME21.
( in that you should not use upload and ws_upload )
in put paramer is taking value for structure (non- sap ) run the bdc update in sap system.
plz any sample program
regards
sai -
Uploading data in bw 7.0 through r3
hi all,
i am very new in bw 7.0 at this time i upload data through flat file can anybody tell me the procedure to uploading data through r3 or send me any screen shots or any documentation realated to this.
mail id : [email protected]
thanksHi,
U can upload data from r3 using datasource.
U can get all datasource present in source system (r3) using tcode rsa5.
using rsa6 u get list of all active datasource. if required datasource is not active activate datasource in rsa5. After activation u can see ur datasource in rsa6.
Now u have to replicate datasource in BI.
Goto Rsa1 -> select Source System -> Select ur data source system -> Right click and select replicate datasource.
After replicating u can use datasource for ur objects.
Hope it helps.
/sachinkumar.
Maybe you are looking for
-
My Classic is a couple of years old and has been restored about three times now. For some reason(s) it crashes and have to go thru the resoration stages for it to work properly. Now it connects to iTunes but but has trouble synchronizing when music f
-
HTTP response contains status code 403 with the description Forbidden
Hello all, I have configured a simple scenario like this: File ftp Adapter -> XI -> File ftp Adapter I activate the communication channel to start the message processing. Then I am able to see my messages in transaction SXMB_MONI in the XI Integratio
-
Best architecture for testing multiple (8) serial devices
I am not new to LabVIEW but am being tasked with a challenging project I want to be prepared for as best I can. I am familiar with Event Structures and State Diagrams but feel these may not be adequate for the following specifications: 1. Most like
-
"No headers or footer ware added because Acrobat encountered an unidentified error." in adobe professional 6.0, what to do with this error?
-
Can't type the word "couldn't"
I recently started using pages 09 and turned on the autocorrect feature, which most of the time accurately changes mispelling to correct words. Unfortunately, as a type the word 'couldn't', when I get to "couldn" and then type the apostrophe ('), the