topic Re: Problem in Page Scroll In BDC Batch Input in Application Development and Automation Discussions

Problem in Page Scroll In BDC Batch Input

Former Member — Wed, 27 Jun 2007 18:45:24 GMT

HI Experts,

THis code is working fine for uploading delivery with batch split

but if my batch split are more than 9 its not kaking.

problem in page scroll in table control .

How can i code for that page scroll .

OK code for scrolling is '=PAUA_T'.

PLZ help me out how to do page scrolling in bdc batch input.

LOOP AT IHEAD.

IF IHEAD-VBELN <> DOCNO1.

V_CNT = 0.

PERFORM BDC_DYNPRO USING 'SAPMV50A' '4001'.

PERFORM BDC_FIELD USING 'BDC_OKCODE'

'/00'.

PERFORM BDC_FIELD USING 'LIKP-VSTEL'

IHEAD-VSTEL.

PERFORM BDC_FIELD USING 'LV50C-DATBI'

IHEAD-DATBI.

PERFORM BDC_FIELD USING 'LV50C-VBELN'

IHEAD-VBELN.

*--

item overview--

PERFORM BDC_DYNPRO USING 'SAPMV50A' '1000'.

PERFORM BDC_FIELD USING 'BDC_OKCODE'

'=T\01'.

PERFORM BDC_DYNPRO USING 'SAPMV50A' '1000'.
PERFORM BDC_FIELD USING 'BDC_OKCODE'
'/00'.

PERFORM BDC_DYNPRO USING 'SAPMV50A' '1000'.
PERFORM BDC_FIELD USING 'BDC_OKCODE'
'=T\01'.

PERFORM BDC_FIELD USING 'BDC_CURSOR'

'LIKP-BLDAT'.

PERFORM BDC_FIELD USING 'LIKP-BLDAT'

IHEAD-BLDAT.

PERFORM BDC_FIELD USING 'BDC_CURSOR'

'LIKP-WADAT_IST'.

PERFORM BDC_FIELD USING 'LIKP-WADAT'

IHEAD-WADAT.

PERFORM BDC_FIELD USING 'LIKP-WADAT_IST'

IHEAD-WADAT_IST.

**--

PICKING--

PERFORM BDC_DYNPRO USING 'SAPMV50A' '1000'.

PERFORM BDC_FIELD USING 'BDC_OKCODE'

'=T\02'.

PERFORM BDC_FIELD USING 'BDC_OKCODE'

'/00'.

PERFORM BDC_FIELD USING 'BDC_CURSOR'

'LIKP-KODAT'.

PERFORM BDC_FIELD USING 'LIKP-KODAT'

IHEAD-KODAT.

*--

IN PICKING EXTRASSS--

PERFORM BDC_DYNPRO USING 'SAPMV50A' '1000'.

PERFORM BDC_FIELD USING 'BDC_OKCODE'

'=T\03'.

PERFORM BDC_DYNPRO USING 'SAPMV50A' '1000'.

PERFORM BDC_FIELD USING 'BDC_OKCODE'

'/00'.

PERFORM BDC_FIELD USING 'BDC_CURSOR'

'LIKP-LDDAT'.

PERFORM BDC_FIELD USING 'LIKP-LDDAT'

IHEAD-LDDAT.

PERFORM BDC_DYNPRO USING 'SAPMV50A' '1000'.

PERFORM BDC_FIELD USING 'BDC_OKCODE'

'=T\02'.

*----~~FOR HEADER DETAILS~~--

PERFORM BDC_DYNPRO USING 'SAPMV50A' '1000'.

PERFORM BDC_FIELD USING 'BDC_OKCODE'

'=HTEX_T'.

PERFORM BDC_DYNPRO USING 'SAPMV50A' '2000'.

PERFORM BDC_FIELD USING 'BDC_OKCODE'

'=TP_NEXT'.

PERFORM BDC_FIELD USING 'BDC_CURSOR'

'KUWEV-KUNNR'.

PERFORM BDC_DYNPRO USING 'SAPMV50A' '2000'.

PERFORM BDC_FIELD USING 'BDC_OKCODE'

'=TP_NEXT'.

PERFORM BDC_FIELD USING 'BDC_CURSOR'

'KUWEV-KUNNR'.

PERFORM BDC_DYNPRO USING 'SAPMV50A' '2000'.

PERFORM BDC_FIELD USING 'BDC_OKCODE'

'=TP_NEXT'.

PERFORM BDC_FIELD USING 'BDC_CURSOR'

'KUWEV-KUNNR'.

PERFORM BDC_DYNPRO USING 'SAPMV50A' '2000'.

PERFORM BDC_FIELD USING 'BDC_OKCODE'

'=TP_DETAIL'.

PERFORM BDC_FIELD USING 'BDC_CURSOR'

'KUWEV-KUNNR'.

PERFORM BDC_DYNPRO USING 'SAPLSTXX' '1100'.

PERFORM BDC_FIELD USING 'BDC_CURSOR'

'RSTXT-TXLINE(02)'.

PERFORM BDC_FIELD USING 'BDC_OKCODE'

'=TXBA'.

PERFORM BDC_FIELD USING 'RSTXT-TXLINE(02)'

IHEAD-TXLINE1.

PERFORM BDC_DYNPRO USING 'SAPLSPO1' '0100'.

PERFORM BDC_FIELD USING 'BDC_OKCODE'

'=YES'.

PERFORM BDC_DYNPRO USING 'SAPMV50A' '2000'.

PERFORM BDC_FIELD USING 'BDC_OKCODE'

'=TP_NEXT'.

PERFORM BDC_FIELD USING 'BDC_CURSOR'

'KUWEV-KUNNR'.

PERFORM BDC_DYNPRO USING 'SAPMV50A' '2000'.

PERFORM BDC_FIELD USING 'BDC_OKCODE'

'=TP_NEXT'.

PERFORM BDC_FIELD USING 'LV70T-SPRAS'

'EN'.

PERFORM BDC_DYNPRO USING 'SAPMV50A' '2000'.

PERFORM BDC_FIELD USING 'BDC_OKCODE'

'=TP_DETAIL'.

PERFORM BDC_DYNPRO USING 'SAPLSTXX' '1100'.

PERFORM BDC_FIELD USING 'BDC_CURSOR'

'RSTXT-TXLINE(02)'.

PERFORM BDC_FIELD USING 'BDC_OKCODE'

'=TXBA'.

PERFORM BDC_FIELD USING 'RSTXT-TXLINE(02)'

IHEAD-TXLINE2.

PERFORM BDC_DYNPRO USING 'SAPLSPO1' '0100'.

PERFORM BDC_FIELD USING 'BDC_OKCODE'

'=YES'.

PERFORM BDC_DYNPRO USING 'SAPMV50A' '2000'.

PERFORM BDC_FIELD USING 'BDC_OKCODE'

'=BACK_T'.

LOOP AT IDET.

IF IDET-VBELN = IHEAD-VBELN .

ON CHANGE OF IDET-POSNR.

V_CNT = V_CNT + 1.

PERFORM BDC_DYNPRO USING 'SAPMV50A' '1000'.

PERFORM BDC_FIELD USING 'BDC_OKCODE' '=T\02'.

CLEAR TEXT1.

CONCATENATE 'RV50A-LIPS_SELKZ(' V_CNT ')' INTO TEXT1.

PERFORM BDC_FIELD USING TEXT1

'X'.

PERFORM BDC_FIELD USING 'BDC_OKCODE' '=CHSP_T'.

perform BDC_DYNPRO using 'SAPMV50A' '3000'.

ENDON.

CNT = CNT + 1 .

CLEAR TEXT1.

CONCATENATE 'LIPS-LGORT(' CNT ')' INTO TEXT1.

PERFORM BDC_FIELD USING TEXT1

IDET-LGORT.

CLEAR TEXT1.

CONCATENATE 'LIPS-LFIMG(' CNT ')' INTO TEXT1.

PERFORM BDC_FIELD USING TEXT1

IDET-LFIMG.

CLEAR TEXT1.

CONCATENATE 'LIPS-CHARG(' CNT ')' INTO TEXT1.

PERFORM BDC_FIELD USING TEXT1

IDET-CHARG.

AT END OF POSNR.

PERFORM BDC_FIELD USING 'BDC_OKCODE'

'=BACK_T'.

CNT = 0.

ENDAT.

ENDIF.

ENDLOOP.

DOCNO1 = IHEAD-VBELN.

PERFORM BDC_DYNPRO USING 'SAPMV50A' '1000'.

PERFORM BDC_FIELD USING 'BDC_OKCODE'

'/00'.

PERFORM BDC_DYNPRO USING 'SAPMV50A' '1000'.

PERFORM BDC_FIELD USING 'BDC_OKCODE'

'=T\02'.

PERFORM BDC_DYNPRO USING 'SAPMV50A' '1000'.

PERFORM BDC_FIELD USING 'BDC_OKCODE'

'=SICH_T'.

PERFORM BDC_FIELD USING 'BDC_OKCODE'

'=WABU_T'.

PERFORM BDC_TRANSACTION USING 'VL01N'.

perform bdc_close_group.

Endloop.

ENDLOOP.

Regards,

Reddy

Re: Problem in Page Scroll In BDC Batch Input

amit_khare — Wed, 27 Jun 2007 18:50:49 GMT

Refer this link might be use ful -

Regards,

Amit

reward all helpful replies.

Re: Problem in Page Scroll In BDC Batch Input

former_member194669 — Wed, 27 Jun 2007 18:53:06 GMT

Hi,

Instead of using scrolling use "place cursor" option , i think there will be button bottom of the screen 6th

a®

Re: Problem in Page Scroll In BDC Batch Input

Former Member — Wed, 27 Jun 2007 19:07:39 GMT

Yes there is button at the bottom of table control but how can i code that ok_code

when should it trigger, can you plz ealabrate this .

Regards ,

Francis.

Re: Problem in Page Scroll In BDC Batch Input

Former Member — Wed, 27 Jun 2007 19:10:44 GMT

VL01N is an EnjoySAP transaction and not well suited to batch input. See note 457925. You may run into problems with it if you try to use certain functions. You can use transaction VL01 instead.

Rob

Re: Problem in Page Scroll In BDC Batch Input

former_member194669 — Wed, 27 Jun 2007 19:15:51 GMT

Hi,

Suggested by Rob, its an enjoy sap screen., better to use Vl01 or check for some fm or BAPI.

still if you want , then ok code is POPO_T

aRs

Re: Problem in Page Scroll In BDC Batch Input

Former Member — Wed, 27 Jun 2007 19:21:37 GMT

HI ars,

Thanks for the reply. Ok_code for this is '=PAUA_T' but the problem is

how should i check the condition and press this ok_code.

How can i code for this ok_code.

Regards,

Reddy.

Re: Problem in Page Scroll In BDC Batch Input

Former Member — Wed, 27 Jun 2007 19:44:59 GMT

Hi Francis,

This way you should press page down every 9th time(Assuming that you have 10 lines in the table control.

count = 1.

loop at <your item table>.

if count = 9.

preform BDC_DYNFIELD using 'BDC_OKCODE' '<Fcode for page down>'.

count = 1.

endif.

YOur regular code to fill the table control

count = count + 1.

endloop.

REgards,

Ravi