UPLOAD PO TEXT - MM01, MM02
HI experts,
is there anyway to upload Material PO TEXT in Material master (ie. in mm01 or mm02)?
I tried through SHDB but it is not at all working...
The recorder doesn't record the text entered in that Editor.
Here my Keyuser wants to upload this text for certain materials only..(mass upload)
PLs help ASAP.
Regards Snehal
Hello Snehal,
The Texts are normally created/uploaded using the Function Module CREATE_TEXT.
They can be retrieved using READ_TEXT.
Pls reward if the info helps you.
With Regards
Vijay Gajavalli
Similar Messages
-
How to upload material text in mm02 using bdc table control
i have problem to upload material Description in mm02 using bdc.
my text file is like
2000251 AF A12345
2000251 AR B12345
2000251 BG C12345
2000252 AF F12345
2000252 AR G12345
2000252 AF H12345
i want to upload material number, language, and material description, how can i upload pls help me.Hi,
Try with bapi , bapi_material_save_data.. didn't exactly remember it,Please check the same.
Regards,
Nagaraj -
Hi ,
I want to Uplaod Material text in MM02 . Around more than upto 2000 materials.
i m trying to uplaod using call function 'CREATE_TEXT'. But it gives error in mm02 like, no text maintained.
give me proper solution,
thnxs
Regards,
Swapnil VaidyaSwapnil
Check whether you are passing correct Text ID, Text Object and Text Name to the function module..
Thanks
Amol Lohade -
Hi Experts,
We are trying to upload sales text in MM02 transaction, which does not have screen field. Please advise whether I can use SAVE_TEXT or BAPI to change material. Sample code will be very much helpful.
Thanks in advance.Hi
You have to use the CREATE_TEXT fun module and to pass the paramters OBJECT,ID, OBJECTNAME and LANGUAGE correctly after declaring them correctly
see the sample code for long text creation
REPORT zmm_longtext
NO STANDARD PAGE HEADING
LINE-SIZE 255.
Internal Table for Upload of Long Texts Data
DATA: BEGIN OF itab1 OCCURS 0,
matnr LIKE mara-matnr, " Material
text1 LIKE tline-tdline, " Long Text
text2 LIKE tline-tdline, " Long Text
text3 LIKE tline-tdline, " Long Text
text4 LIKE tline-tdline, " Long Text
text5 LIKE tline-tdline, " Long Text
text6 LIKE tline-tdline, " Long Text
text7 LIKE tline-tdline, " Long Text
text8 LIKE tline-tdline, " Long Text
text9 LIKE tline-tdline, " Long Text
text10 LIKE tline-tdline, " Long Text
text11 LIKE tline-tdline, " Long Text
text12 LIKE tline-tdline, " Long Text
text13 LIKE tline-tdline, " Long Text
text14 LIKE tline-tdline, " Long Text
text15 LIKE tline-tdline, " Long Text
text16 LIKE tline-tdline, " Long Text
text17 LIKE tline-tdline, " Long Text
text18 LIKE tline-tdline, " Long Text
text19 LIKE tline-tdline, " Long Text
text20 LIKE tline-tdline, " Long Text
text21 LIKE tline-tdline, " Long Text
text22 LIKE tline-tdline, " Long Text
text23 LIKE tline-tdline, " Long Text
text24 LIKE tline-tdline, " Long Text
text25 LIKE tline-tdline, " Long Text
END OF itab1.
Internal Table for Upload of Long Texts Data
DATA: BEGIN OF itab OCCURS 0,
matnr LIKE mara-matnr, " Material
text LIKE tline-tdline, " Long Text
END OF itab.
To create Long Text lines for CREATE_TEXT function module
DATA:BEGIN OF dt_lines OCCURS 0.
INCLUDE STRUCTURE tline. " Long Text
DATA:END OF dt_lines.
Variable declarations for CREATE_TEXT function module
DATA : dl_name TYPE thead-tdname, " Object Name
dl_lan TYPE thead-tdspras, " Language
gv_matnr TYPE matnr.
Constants
CONSTANTS:
Object ID for Long Text of Material Basic Data 1
c_best TYPE thead-tdid VALUE 'GRUN',
c_material TYPE thead-tdobject VALUE 'MATERIAL'. " Object
Parameters
PARAMETERS p_file LIKE rlgrap-filename.
At selection-screen on Value Request for file Name
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file.
Get the F4 Values for the File
CALL FUNCTION 'F4_FILENAME'
EXPORTING
program_name = syst-cprog
dynpro_number = syst-dynnr
IMPORTING
file_name = p_file.
Start Of Selection
START-OF-SELECTION.
*To Upload Flat file
CALL FUNCTION 'UPLOAD'
EXPORTING
filename = p_file
filetype = 'DAT'
TABLES
data_tab = itab1
EXCEPTIONS
conversion_error = 1
invalid_table_width = 2
invalid_type = 3
no_batch = 4
unknown_error = 5
gui_refuse_filetransfer = 6
OTHERS = 7.
SORT itab1 BY matnr.
LOOP AT itab1.
CLEAR gv_matnr.
SELECT SINGLE matnr INTO gv_matnr
FROM mara WHERE bismt = itab1-matnr.
IF itab1-text25 NE ' '.
itab-matnr = gv_matnr.
itab-text = itab1-text25.
APPEND itab.
ENDIF.
IF itab1-text24 NE ' '.
itab-matnr = gv_matnr.
itab-text = itab1-text24.
APPEND itab.
ENDIF.
IF itab1-text23 NE ' '.
itab-matnr = gv_matnr.
itab-text = itab1-text23.
APPEND itab.
ENDIF.
IF itab1-text22 NE ' '.
itab-matnr = gv_matnr.
itab-text = itab1-text22.
APPEND itab.
ENDIF.
IF itab1-text21 NE ' '.
itab-matnr = gv_matnr.
itab-text = itab1-text21.
APPEND itab.
ENDIF.
IF itab1-text20 NE ' '.
itab-matnr = gv_matnr.
itab-text = itab1-text20.
APPEND itab.
ENDIF.
IF itab1-text19 NE ' '.
itab-matnr = gv_matnr.
itab-text = itab1-text19.
APPEND itab.
ENDIF.
IF itab1-text18 NE ' '.
itab-matnr = gv_matnr.
itab-text = itab1-text18.
APPEND itab.
ENDIF.
IF itab1-text17 NE ' '.
itab-matnr = gv_matnr.
itab-text = itab1-text17.
APPEND itab.
ENDIF.
IF itab1-text16 NE ' '.
itab-matnr = gv_matnr.
itab-text = itab1-text16.
APPEND itab.
ENDIF.
IF itab1-text15 NE ' '.
itab-matnr = gv_matnr.
itab-text = itab1-text15.
APPEND itab.
ENDIF.
IF itab1-text14 NE ' '.
itab-matnr = gv_matnr.
itab-text = itab1-text14.
APPEND itab.
ENDIF.
IF itab1-text13 NE ' '.
itab-matnr = gv_matnr.
itab-text = itab1-text13.
APPEND itab.
ENDIF.
IF itab1-text12 NE ' '.
itab-matnr = gv_matnr.
itab-text = itab1-text12.
APPEND itab.
ENDIF.
IF itab1-text11 NE ' '.
itab-matnr = gv_matnr.
itab-text = itab1-text11.
APPEND itab.
ENDIF.
IF itab1-text10 NE ' '.
itab-matnr = gv_matnr.
itab-text = itab1-text10.
APPEND itab.
ENDIF.
IF itab1-text9 NE ' '.
itab-matnr = gv_matnr.
itab-text = itab1-text9.
APPEND itab.
ENDIF.
IF itab1-text8 NE ' '.
itab-matnr = gv_matnr.
itab-text = itab1-text8.
APPEND itab.
ENDIF.
IF itab1-text7 NE ' '.
itab-matnr = gv_matnr.
itab-text = itab1-text7.
APPEND itab.
ENDIF.
IF itab1-text6 NE ' '.
itab-matnr = gv_matnr.
itab-text = itab1-text6.
APPEND itab.
ENDIF.
IF itab1-text5 NE ' '.
itab-matnr = gv_matnr.
itab-text = itab1-text5.
APPEND itab.
ENDIF.
IF itab1-text4 NE ' '.
itab-matnr = gv_matnr.
itab-text = itab1-text4.
APPEND itab.
ENDIF.
IF itab1-text3 NE ' '.
itab-matnr = gv_matnr.
itab-text = itab1-text3.
APPEND itab.
ENDIF.
IF itab1-text2 NE ' '.
itab-matnr = gv_matnr.
itab-text = itab1-text2.
APPEND itab.
ENDIF.
IF itab1-text1 NE ' '.
itab-matnr = gv_matnr.
itab-text = itab1-text1.
APPEND itab.
ENDIF.
CLEAR itab.
ENDLOOP.
DELETE itab WHERE matnr EQ ' '.
Upload the Texts
SORT itab BY matnr.
LOOP AT itab.
dt_lines-tdformat = 'ST'.
dt_lines-tdline = itab-text.
APPEND dt_lines.
dl_lan = sy-langu.
dl_name = itab-matnr.
Call the Function Module to Create Text
CALL FUNCTION 'CREATE_TEXT'
EXPORTING
fid = c_best
flanguage = dl_lan
fname = dl_name
fobject = c_material
save_direct = 'X'
fformat = '*'
TABLES
flines = dt_lines
EXCEPTIONS
no_init = 1
no_save = 2
OTHERS = 3.
IF sy-subrc <> 0.
WRITE:/ 'Long Text Creation failed for Material'(001),
itab-matnr.
ELSE.
WRITE:/ 'Long Text Created Successfully for Material'(002),
itab-matnr.
ENDIF.
AT END OF matnr.
REFRESH dt_lines.
ENDAT.
ENDLOOP.
<b>Reward points for useful Answers</b>
Regards
Anji -
Purchase Order Text in MM01, MM02 dependant on Planyt ??
Hello,
In SAP standard, the purchase order text in MM01, MM02, MM03 will not be depedant on the plan , Is there any ways or configuration that allows user to create this text dependant on the plan in MM01 ?
ThanksHello,
I am afraid I must confirm you, that the System is working as designed.
Although the System asks for a plant when maintaining the Purchase Order Text view, the text is stored at client level and not at plant level.
The basic data text, the inspection text, the internal comment, the material description and the sales text are as well maintained at client level. The only text that can be maintained at plant level is the material memo in the MRP 4 view.
You can maintain plant specific texts in the purchasing info record.
Regards,
Mauro -
Protecting long text in MM01 MM02
Hi all
my requirements is to protect material basic data long text (trx MM01, MM02) for a specific user. How can I do that?
Note that I can't use authority object M_MATE_MAN, cause only long text need to be protected.
My SAP release is 4.6C
RegardsHi Stefano,
We had a similar requirement and we used the userexit to do prevent the changes. You can create a dummy auth and then if the field changes you can check this object to allow or disallow the changes.
EXIT_SAPLMGMU_001
Hope this helps
Deep -
Problem updating basic data text for a certain language via MM01 / MM02
We are facing the following problem :
We have materials where we maintain the basic data text via MM02 in different languages ( Dutch, English, French, German, Japanese and polish).
When we copy a material to a new one and we would like to update the basic data text we can do this directly except for some reason for Japanese.
For japanese we first must press the Editor Icon, we than get the editor were we can change the text and from that moment on everyting is ok.
But we would like to update the text like we do for the other languages without first pressing the editor icon.
We are running 4.7 and the sapgui is 7.1 patch 18.We are facing the following problem :
We have materials where we maintain the basic data text via MM02 in different languages ( Dutch, English, French, German, Japanese and polish).
When we copy a material to a new one and we would like to update the basic data text we can do this directly except for some reason for Japanese.
For japanese we first must press the Editor Icon, we than get the editor were we can change the text and from that moment on everyting is ok.
But we would like to update the text like we do for the other languages without first pressing the editor icon.
We are running 4.7 and the sapgui is 7.1 patch 18. -
Upload material description in mm02
i want to upload material description in mm02 using bdc but i dont know how to upload it. Moderator Message: This is not a training forum and we cant help you there
my text file is like
2000251 AF A12345
2000251 AR B12345
2000251 BG C12345
2000252 AF F12345
2000252 AR G12345
2000252 AF H12345
in same material number there r more then one text then how can i upload .
'SKTEXT-MAKTX(02)'.
clear COUNTER.
counter = 1.
LOOP AT IT_TAB INTO WA_TAB WHERE MATNR = WA_ITAB-MATNR.
counter = counter + 1.
CONCATENATE 'MAKT-SPRAS(0' COUNTER ')' INTO V_CHAR. "(02)
PERFORM BDC_FIELD USING V_CHAR
WA_TAB-SPRAS.
CLEAR V_CHAR.
CONCATENATE 'MAKT-MAKTX(0' COUNTER ')' INTO V_CHAR. "(02)
perform bdc_field using V_CHAR
WA_TAB-MAKTX.
*perform bdc_field using 'SKTEXT-SPRAS(02)'
'AF'.
*perform bdc_field using 'SKTEXT-SPRAS(03)'
'BG'.
*perform bdc_field using 'SKTEXT-SPRAS(04)'
'CS'.
*perform bdc_field using 'SKTEXT-MAKTX(02)'
'avani'.
*perform bdc_field using 'SKTEXT-MAKTX(03)'
'avani1'.
*perform bdc_field using 'SKTEXT-MAKTX(04)'
'avani2'.
clear wa_tab.
ENDLOOP.
Edited by: kishan P on Nov 13, 2010 2:32 PMin mm02 Basic Data -> additional data -> material description and language
i want to upload language and material description -
Addtional field display in search help for plant in MM01/MM02/MM03
Hi Experts,
my requirment is that when see search values of ( F4) plant field in MM01/MM02/MM03 t.codes only avilable plant and name1 values . i need to display name2 values also. How i can search help of plant field should be enhanced.
Regards
JayaHi,
You need to:
1/ append ALV grid structure PLM_ALV_116 with field (in SE11)
2/ in form WERKS_LISTE in include LMATEFLI you need to implement following modyfication selecting NAME2 for all the plants which are to be shown:
FORM werks_liste.
* convert into ALV list
DATA: c_structure_name TYPE tabname VALUE 'PLM_ALV_116'.
DATA: status_set TYPE slis_formname VALUE 'ALV_PF_STATUS1' .
DATA: et_list TYPE TABLE OF gs_list_type_06 .
DATA: l_et_list LIKE LINE OF et_list .
DATA: l_seqwerk LIKE LINE OF seqwerk .
* Prapering data to be display
* SET TITLEBAR 'TIT' WITH text-003. Note 821186
G_titlebar = text-003.
LOOP AT seqwerk INTO l_seqwerk .
MOVE-CORRESPONDING l_seqwerk TO l_et_list .
APPEND l_et_list TO et_list .
ENDLOOP .
"-------->INSERT
SELECT name2 FROM t001W
INTO CORRESPONDING-FIELDS OF TABLE et_list
FOR ALL ENTRIES IN et_list
WHERE werks EQ et_list-werks.
"<--------
* Praper fields for ALV Disply
PERFORM alv_list_fieldcat_create
USING lt_fieldcat c_structure_name .
* Diplay ALV list
PERFORM alv_list_display TABLES et_list[]
USING c_structure_name
status_set
space.
ENDFORM. "WERKS_LISTE
Regards,
Marcin -
Open Transaction MM01/MM02 with multiple views using CALL TRANSACTION
Hi All,
I want to open MM01/MM02 with multiple views using call transaction but in the parameter ID for Views (MMX) I can pass status of only one View.
SET PARAMETER ID 'MAT' FIELD v_mat.
SET PARAMETER ID 'VKO' FIELD ' '.
SET PARAMETER ID 'MTA' FIELD IT_MOFF-MTART.
SET PARAMETER ID 'MTP' FIELD IT_MOFF-MBRSH.
SET PARAMETER ID 'VTW' FIELD ' '.
SET PARAMETER ID 'BWT' FIELD ' '.
SET PARAMETER ID 'LGT' FIELD ' '.
SET PARAMETER ID 'MXX' FIELD 'K'. "Sales View
SET PARAMETER ID 'MM5' FIELD ' '.
CALL TRANSACTION 'MM02' AND SKIP FIRST SCREEN
Please suggest.
Regards,
DivyaI do not exactly understand what you mean, but what i already did:
- I checked that the fields are from the same type.
- KUNNR is initialized! I already had a look to the debugger, that's why i'm posting this in this forum.
any more comments on this ?
maybe i have to change anything in the z-transaction. Btw, this is what the parameter looks like in the transaction:
SELECTION-SCREEN BEGIN OF BLOCK Debitoren WITH FRAME TITLE text-001.
PARAMETERS pkunnr type kna1-kunnr OBLIGATORY.
SELECTION-SCREEN END OF BLOCK Debitoren.
Edited by: Sven Delangle on Sep 3, 2010 2:42 PM -
Change the field description of a field in MM01,MM02, and MM03 Transaction
Hi Experts,
I had a requirement to change the field description of a field in MM01,MM02, and MM03. I know how to change the description of field in CMOD. In my requirement they need this new description only in the above mention transaction. So please let me know how we can do this?
Regards,
RamHi you can do this by SPRO transaction. Here you can copy the subscreen where you want the description of the field changed. And in the custom subscreen go to the Element list- >Texts I/O templates , Here you can change the description. After all this the customized subscreen is assigned in the proper sequence. The step by step process is below:
Step 1:
Click on the button u2018SAP Reference IMGu2019. Then follow the path Logistics-General -> Material Master -> Configuring the Material Master. When this particular node is expanded, a drop down list of 7 different executable options appears.
Step 2: Execute the option u2018Create Program for Customized Subscreensu2019
Step 3: Copy the screens required to the custom function group.
Step 4: In transaction SPRO, execute the option u2018Define Structure of Data Screens for each Screen sequenceu2019.
Step 5: Now in transaction SPRO execute the option Assign Screen sequences to User/ Material Type/ Transaction/ Industry Sector. -
How to upload a text file from a shared folder and provide an o/p
how to upload a text file from a shared folder and provide an o/p containing the details in each order in the text file
Hi,
Use <b>GUI_UPLOAD</b> to upload a text file from a shared folder.
Use <b>GUI_DOWNLOAD</b> to download data in a file on the presentation server or use <b>OPEN DATASET, TRANSFER</b> and <b>CLOSE DATASET</b> statements to download data to the application server.
Now, I hope the code for data fetching, if required, is already present in the report.
Reward points if the answer is helpful.
Regards,
Mukul -
Uploading Importing text file & crosstab display
<p> I want to upload a text tab delimited file into our db, currently we
are uploading it to a temp table in the db, do some validation checks and write
to a table when done. I have two questions:</P>
<p> 1) Is there a more efficient way of upload/importing flat files into
the db via forms, like loading data into a non db data block and working on the
data via loops rather than sql in a temp table.</P>
<P> 2) I want to present the data to the user(for verification) via a form
screen as they have read it in, the only way I can think of doing this, is
populating a temp table and then using a data block based on a stored procedure
that contains a dynamic pivot query package since I don't know the
number of columns that the file will contain. Data blocks can do either
vertical or horizontal alignment but not grid.</P>
<P> File will take the format of: </P>
col1 col2 col3
row1 data_r1c1 data_r1c2 data_r1c3
row2 data_r2c1 data_r2c2 data_r2c3
row3 data_r3c1 data_r3c2 data_r3c3
row4 data_r4c1 data_r4c2 data_r4c3
<BR>
<P>Thank you in advance </P>Thank you for your reply
1) It's a utility for users and so it has to be through forms
Presently I think it is better to read it in to a temp table then I can use sql for validation which would be faster than looping through blocks. But with this approach I'm just a little worried about Lost Updates e.g. what if someone is changing scores in the regular update screen while another person is trying to import them via the import utility.
2) I have to use a stored procedure because I don't know how many columns a user will want to load in, sometimes it could be 2,3 or 5 etc. So basically I am looking at a way of presenting the data from it's stored format in it's read in format i.e. file format
File format =
col1 col2 col3 coln
row1 data_r1c1 data_r1c2 data_r1c3 data_r1cn
row2 data_r2c1 data_r2c2 data_r2c3 data_r2cn
row3 data_r3c1 data_r3c2 data_r3c3 data_r3cn
rown data_rnc1 data_rnc2 data_rnc3 data_rncn
It is stored in the temp table as
row1 col1 data_r1c1
row2 col1 data_r2c1
row1 col2 data_r1c2
row2 col2 data_r2c2
Example
Test1 Test2 Test3 Test4
John 54 45 70 65
Jane 38 55 72 70
Stored in the temp and subsequently written to Student Score table as
Student Test Score
John Test1 54
John Test2 45
John Test3 70
John Test4 65
Jane Test1 38
Jane Test2 55
Jane Test3 72
Jane Test4 70 -
How to upload a text in .pdf to convert it?
How to upload a text in .pdf to convert it?
How to upload a text in .pdf to convert it?
-
How to upload a text in the customer master?
hiall,
in vd02 u go to extras->texts.
Now I have to upload a text there..
so i passed the text objetct-knvv
name-kunnrvkorgvtweg+spart
id-the rewuired agains which i have to upload
lang-en
i used fm save_text in badi method read_add_on_data in prog sapmvf02d.
though the fm is working but when i am executing vd02 again the text is not appearing in vd02..Can u help me with this..Hi,
Upload Program for Xk01 ..
REPORT Y730_BDC5 .
DATA : BEGIN OF IT_DUMMY OCCURS 0,
DUMMY(100) TYPE C,
END OF IT_DUMMY.
DATA : BEGIN OF IT_XK01 OCCURS 0,
LIFNR(10) TYPE C,
BUKRS(4) TYPE C,
EKORG(4) TYPE C,
KTOKK(4) TYPE C,
NAME1(30) TYPE C,
SORTL(10) TYPE C,
LAND1(3) TYPE C,
SPRAS(2) TYPE C,
AKONT(6) TYPE C,
FDGRV(2) TYPE C,
WAERS(3) TYPE C,
END OF IT_XK01,
BEGIN OF IT_BANK OCCURS 0,
BANKS(3) TYPE C,
BANKL(10) TYPE C,
BANKN(10) TYPE C,
KOINH(30) TYPE C,
LIFNR(10) TYPE C,
END OF IT_BANK.
DATA : IT_BDCDATA LIKE BDCDATA OCCURS 0 WITH HEADER LINE,
IT_BDCMSGCOLL LIKE BDCMSGCOLL OCCURS 0 WITH HEADER LINE.
CALL FUNCTION 'WS_UPLOAD'
EXPORTING
FILENAME = 'C:\VENDOR.TXT'
FILETYPE = 'ASC'
TABLES
DATA_TAB = IT_DUMMY.
LOOP AT IT_DUMMY.
IF IT_DUMMY-DUMMY+0(2) = '11'.
IT_XK01-LIFNR = IT_DUMMY-DUMMY+2(10).
IT_XK01-BUKRS = IT_DUMMY-DUMMY+12(4).
IT_XK01-EKORG = IT_DUMMY-DUMMY+16(4).
IT_XK01-KTOKK = IT_DUMMY-DUMMY+20(4).
IT_XK01-NAME1 = IT_DUMMY-DUMMY+24(30).
IT_XK01-SORTL = IT_DUMMY-DUMMY+54(10).
IT_XK01-LAND1 = IT_DUMMY-DUMMY+64(3).
IT_XK01-SPRAS = IT_DUMMY-DUMMY+67(2).
IT_XK01-AKONT = IT_DUMMY-DUMMY+69(6).
IT_XK01-FDGRV = IT_DUMMY-DUMMY+75(2).
IT_XK01-WAERS = IT_DUMMY-DUMMY+77(3).
APPEND IT_XK01.
ELSE.
IT_BANK-BANKS = IT_DUMMY-DUMMY+2(3).
IT_BANK-BANKL = IT_DUMMY-DUMMY+5(10).
IT_BANK-BANKN = IT_DUMMY-DUMMY+15(10).
IT_BANK-KOINH = IT_DUMMY-DUMMY+25(30).
IT_BANK-LIFNR = IT_DUMMY-DUMMY+55(10).
APPEND IT_BANK.
ENDIF.
ENDLOOP.
LOOP AT IT_XK01.
REFRESH IT_BDCDATA.
perform bdc_dynpro using 'SAPMF02K' '0100'.
perform bdc_field using 'BDC_CURSOR'
'RF02K-REF_LIFNR'.
perform bdc_field using 'BDC_OKCODE'
'/00'.
perform bdc_field using 'RF02K-LIFNR'
IT_XK01-LIFNR.
perform bdc_field using 'RF02K-BUKRS'
IT_XK01-BUKRS.
perform bdc_field using 'RF02K-EKORG'
IT_XK01-EKORG.
perform bdc_field using 'RF02K-KTOKK'
IT_XK01-KTOKK.
perform bdc_dynpro using 'SAPMF02K' '0110'.
perform bdc_field using 'BDC_CURSOR'
'LFA1-TELX1'.
perform bdc_field using 'BDC_OKCODE'
'/00'.
perform bdc_field using 'LFA1-NAME1'
IT_XK01-NAME1.
perform bdc_field using 'LFA1-SORTL'
IT_XK01-SORTL.
perform bdc_field using 'LFA1-LAND1'
IT_XK01-LAND1.
perform bdc_field using 'LFA1-SPRAS'
IT_XK01-SPRAS.
perform bdc_dynpro using 'SAPMF02K' '0120'.
perform bdc_field using 'BDC_CURSOR'
'LFA1-KUNNR'.
perform bdc_field using 'BDC_OKCODE'
'/00'.
perform bdc_dynpro using 'SAPMF02K' '0130'.
perform bdc_field using 'BDC_CURSOR'
'LFBK-KOINH(02)'.
perform bdc_field using 'BDC_OKCODE'
'=ENTR'.
DATA : FNAM(20) TYPE C,
IDX TYPE C.
MOVE 1 TO IDX.
LOOP AT IT_BANK WHERE LIFNR = IT_XK01-LIFNR.
CONCATENATE 'LFBK-BANKS(' IDX ')' INTO FNAM.
perform bdc_field using FNAM
IT_BANK-BANKS.
CONCATENATE 'LFBK-BANKL(' IDX ')' INTO FNAM.
perform bdc_field using FNAM
IT_BANK-BANKL.
CONCATENATE 'LFBK-BANKN(' IDX ')' INTO FNAM.
perform bdc_field using FNAM
IT_BANK-BANKN.
CONCATENATE 'LFBK-KOINH(' IDX ')' INTO FNAM.
perform bdc_field using FNAM
IT_BANK-KOINH.
IDX = IDX + 1.
ENDLOOP.
perform bdc_dynpro using 'SAPMF02K' '0130'.
perform bdc_field using 'BDC_CURSOR'
'LFBK-BANKS(01)'.
perform bdc_field using 'BDC_OKCODE'
'=ENTR'.
perform bdc_dynpro using 'SAPMF02K' '0210'.
perform bdc_field using 'BDC_CURSOR'
'LFB1-FDGRV'.
perform bdc_field using 'BDC_OKCODE'
'/00'.
perform bdc_field using 'LFB1-AKONT'
IT_XK01-AKONT.
perform bdc_field using 'LFB1-FDGRV'
IT_XK01-FDGRV.
perform bdc_dynpro using 'SAPMF02K' '0215'.
perform bdc_field using 'BDC_CURSOR'
'LFB1-ZTERM'.
perform bdc_field using 'BDC_OKCODE'
'/00'.
perform bdc_dynpro using 'SAPMF02K' '0220'.
perform bdc_field using 'BDC_CURSOR'
'LFB5-MAHNA'.
perform bdc_field using 'BDC_OKCODE'
'/00'.
perform bdc_dynpro using 'SAPMF02K' '0310'.
perform bdc_field using 'BDC_CURSOR'
'LFM1-WAERS'.
perform bdc_field using 'BDC_OKCODE'
'/00'.
perform bdc_field using 'LFM1-WAERS'
IT_XK01-WAERS.
perform bdc_dynpro using 'SAPMF02K' '0320'.
perform bdc_field using 'BDC_CURSOR'
'WYT3-PARVW(01)'.
perform bdc_field using 'BDC_OKCODE'
'=ENTR'.
perform bdc_dynpro using 'SAPLSPO1' '0300'.
perform bdc_field using 'BDC_OKCODE'
'=YES'.
CALL TRANSACTION 'XK01' USING IT_BDCDATA
MODE 'A'
UPDATE 'S'
MESSAGES INTO IT_BDCMSGCOLL.
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.
Regards
Maybe you are looking for
-
PSE7 for Mac crashes as soon as I try to open it.
My PSE7 has been working perfectly, and I went to open it a few days ago and it crashed as soon as I tried to open it. The blue screen comes up and then an error message appears that says: The application Photoshop Elements quit unexpectedly. I've
-
Firefox 4.0 dmg not recognized on mac os 10.5.8
trying to upgrade from firefox 3.6. downloaded firefox 4.0 dmg file not recognized. working with mac operating system 10.5.8.
-
I am trying to download Adobe Reader but it won't take my password.
I have tried repeatedly to download Adobe Reader but after getting the installation program, my password is rejected. I type in the password (accurately, as I've changed it 3x), and it just shakes in place. Has anyone else had this problem?
-
Opening new window in a same Session
Can anyone let me know how can I open a new window in same SAP session ?
-
I use ( DATABASE 10g , FORMS 6i , FORMS 10g , WIN XP SP2 ) I installed both forms 6i , 10g ...... both work correctly , but just when I be in the beginning onto Run Time in forms 10g ... this error occur to me :- http://img79.imageshack.us/img79/6555