Upload condition record

[Former Member]

Hi,

I am trying to upload condition records. How to do it via LSMW using 0070 object with program RV14BTCI. The structures that are used by the program are BGR00, BKOND1, BKOND2,,BKOND3.

I have not previously worked on lsmw using direct input program.

First, source structures should be created corresponding to BGR00, BKOND1, BKOND2, BKOND3. Do 4 input files need to fill up the structures?

Please guide me how to use program RV14BTCI using LSMW and what should be input format? Or If the program RV14BTCI has to be used directly, is there any standard program to download the condition record data that the program RV14BTCI will accept.

Thanks in advance,

Vishnu Priya

[Former Member]

Hi

See the BDC program for uploading the Condition records using VK11

report ZSDBDCP_PRICING no standard page heading

line-size 255.

include zbdcrecx1.

*--Internal Table To hold condition records data from flat file.

Data: begin of it_pricing occurs 0,

key(4),

f1(4),

f2(4),

f3(2),

f4(18),

f5(16),

end of it_pricing.

*--Internal Table To hold condition records header .

data : begin of it_header occurs 0,

key(4),

f1(4),

f2(4),

f3(2),

end of it_header.

*--Internal Table To hold condition records details .

data : begin of it_details occurs 0,

key(4),

f4(18),

f5(16),

end of it_details.

data : v_sno(2),

v_rows type i,

v_fname(40).

start-of-selection.

refresh : it_pricing,it_header,it_details.

clear : it_pricing,it_header,it_details.

• CALL FUNCTION 'UPLOAD'

• EXPORTING

• FILENAME = 'C:\WINDOWS\Desktop\pricing.txt'

• FILETYPE = 'DAT'

• TABLES

• DATA_TAB = it_pricing

• EXCEPTIONS

• CONVERSION_ERROR = 1

• INVALID_TABLE_WIDTH = 2

• INVALID_TYPE = 3

• NO_BATCH = 4

• UNKNOWN_ERROR = 5

• GUI_REFUSE_FILETRANSFER = 6

• OTHERS = 7.

WRITE : / 'Condition Records ', P_FNAME, ' on ', SY-DATUM.

OPEN DATASET P_FNAME FOR INPUT IN TEXT MODE.

if sy-subrc ne 0.

write : / 'File could not be uploaded.. Check file name.'.

stop.

endif.

CLEAR : it_pricing[], it_pricing.

DO.

READ DATASET P_FNAME INTO V_STR.

IF SY-SUBRC NE 0.

EXIT.

ENDIF.

• write v_str.

• translate v_str using '#/'.

SPLIT V_STR AT ',' INTO it_pricing-key

it_pricing-F1 it_pricing-F2 it_pricing-F3

it_pricing-F4 it_pricing-F5 .

APPEND it_pricing.

CLEAR it_pricing.

ENDDO.

IF it_pricing[] IS INITIAL.

WRITE : / 'No data found to upload'.

STOP.

ENDIF.

loop at it_pricing.

At new key.

read table it_pricing index sy-tabix.

move-corresponding it_pricing to it_header.

append it_header.

clear it_header.

endat.

move-corresponding it_pricing to it_details.

append it_details.

clear it_details.

endloop.

perform open_group.

v_rows = sy-srows - 8.

loop at it_header.

perform bdc_dynpro using 'SAPMV13A' '0100'.

perform bdc_field using 'BDC_CURSOR'

'RV13A-KSCHL'.

perform bdc_field using 'BDC_OKCODE'

'/00'.

perform bdc_field using 'RV13A-KSCHL'

it_header-f1.

perform bdc_dynpro using 'SAPMV13A' '1004'.

perform bdc_field using 'BDC_CURSOR'

'KONP-KBETR(01)'.

perform bdc_field using 'BDC_OKCODE'

'/00'.

perform bdc_field using 'KOMG-VKORG'

it_header-f2.

perform bdc_field using 'KOMG-VTWEG'

it_header-f3.

**Table Control

v_sno = 0.

loop at it_details where key eq it_header-key.

v_sno = v_sno + 1.

clear v_fname.

CONCATENATE 'KOMG-MATNR(' V_SNO ')' INTO V_FNAME.

perform bdc_field using v_fname

it_details-f4.

clear v_fname.

CONCATENATE 'KONP-KBETR(' V_SNO ')' INTO V_FNAME.

perform bdc_field using v_fname

it_details-f5.

if v_sno eq v_rows.

v_sno = 0.

perform bdc_dynpro using 'SAPMV13A' '1004'.

perform bdc_field using 'BDC_OKCODE'

'=P+'.

perform bdc_dynpro using 'SAPMV13A' '1004'.

perform bdc_field using 'BDC_OKCODE'

'/00'.

endif.

endloop.

*--Save

perform bdc_dynpro using 'SAPMV13A' '1004'.

perform bdc_field using 'BDC_OKCODE'

'=SICH'.

perform bdc_transaction using 'VK11'.

endloop.

perform close_group.

for LSMW see the following doc

http://www.sapbrain.com/TOOLS/LSMW/SAP_LSMW_steps_introduction.html

http://esnips.com/doc/8e732760-5548-44cc-a0bb-5982c9424f17/lsmw_sp.ppt

http://esnips.com/doc/f55fef40-fb82-4e89-9000-88316699c323/Data-Transfer-Using-LSMW.zip

http://esnips.com/doc/1cd73c19-4263-42a4-9d6f-ac5487b0ebcb/LSMW-with-Idocs.ppt

http://esnips.com/doc/ef04c89f-f3a2-473c-beee-6db5bb3dbb0e/LSMW-with-BAPI.ppt

http://esnips.com/doc/7582d072-6663-4388-803b-4b2b94d7f85e/LSMW.pdf

for Long texts Upload

Please take a look at this..

http://help.sap.com/saphelp_erp2005/helpdata/en/e1/c6d30210e6cf4eac7b054a73f8fb1d/frameset.htm

Reward points if useful

Regards

Anji

[Former Member]

Hi,

u can fill the 4 diffrent structures thru 1 source file which contains data for all the 4 structures.

The program RV14BTCI will take care of the screens sequence and u have to just map the fields.

Maintain the code page as ASCII format.

Revert back if any issues.

Reward with points if helpful.

Regards,

Naveen

[Former Member]

Hi,

Can you please explain in detail. How do I give the input data and to map the source file and structures...

Is there any standard program which will download the data in the format required by the program RV14BTCI.

Thanks in advance,

Vishnu Priya

[Former Member]

Hi,

How do I give the input data ?

actually a flat file/dataset (in application server) is alraedy maintained on ur dektop with the required data.

In 6th step u r going to specify the fielname which is on dektop/app server.

from that the data will be uploaded to the structure u mainatained.

After that we can see, whether the exact data has been downloaded or not in the 8th step.

Is there any standard program which will download the data in the format required by the program RV14BTCI.???

In the 6th step wen u r going to specify the filename, at the sametime u r going to specify the format u required (like tabulator or comma...)

There wiill be no standard program to download the data in the format required by the program RV14BTCI.

if u still required to change the format , then in 5th step(conversion rule) u can code according to ur required conversions(like date format...)

Revert back if any issues.

Reward with points if helpful.

Regards

Naveen