Nov 10, 2011 at 09:07 AM

To change the picking qty in VL02 using BDC

86 Views

I've searched in forum.I've not got solution for that.I want to upload more than 12 line items.But the screen only for 12 items.

Then used okcode =P+ for scroll down. But its not update the remaining items.Please....

LOOP AT it.

REFRESH bdcdata.

PERFORM bdc_dynpro USING 'SAPMV50A' '0101'.

PERFORM bdc_field USING 'BDC_CURSOR'

'LIKP-VBELN'.

PERFORM bdc_field USING 'BDC_OKCODE'

'=UEKO'.

PERFORM bdc_field USING 'LIKP-VBELN'

it-vbeln.

PERFORM bdc_dynpro USING 'SAPMV50A' '0220'.

PERFORM bdc_field USING 'BDC_CURSOR' 'LIPSD-PIKMG(12)'.

PERFORM bdc_field USING 'BDC_OKCODE'

'/00'.

PERFORM bdc_field USING 'LIKP-WADAT_IST'

it-kodat.

n = 1.

LOOP AT it1 WHERE vbeln = it-vbeln.

CONCATENATE 'LIPSD-PIKMG(' n ')' INTO a.

PERFORM bdc_field USING a "it1-G_LFIMG.

it1-pikmg.

n = n + 1.

IF n gt 12 .

PERFORM bdc_field USING 'BDC_OKCODE'

'=P+'.

n = 1.

PERFORM bdc_dynpro USING 'SAPMV50A' '0220'.

ENDIF.

*b1 = b1 + 1.

ENDLOOP.

PERFORM bdc_dynpro USING 'SAPMV50A' '0220'.

PERFORM bdc_field USING 'BDC_OKCODE'

'=SICH'.

Thanks

Bala