topic Help in Upload program for T-code FF67 in Application Development and Automation Discussions

Help in Upload program for T-code FF67

Former Member — Thu, 29 Oct 2009 11:11:27 GMT

Hi Freinds.

I am writing a BDC for FF67(Process Manual Bank Statement). In that in the second screen No. of rows are not fixed it changes dynamically.so i am unable to make data flow in the second screen(Line Item screen).

I found BAPI_BANK_STATEMENT_EXEC for the same FF67 T-code as someone has adviced to use this BAPI. I am not aware of the parameters to be filled in the BAPI. I am familiar, how to use BAPis for data uploadation. But for this BAPI i am not certain that it will help.or if it fulfills the purpose ,what parameters are to be passed.

So ,if anyone of you has done BDC or Used that BAPI for FF67,then please help me with the code.

All suggestions are most welcome.

Thank you all.

Prashant Tiwari.

Re: Help in Upload program for T-code FF67

former_member206396 — Thu, 29 Oct 2009 13:29:22 GMT

Try this sample code:

LOOP AT IT_BRS into wa_brs.

IF FLAG = 0.

PERFORM BDC_DYNPRO USING 'SAPMF40K' '0101'.

PERFORM BDC_FIELD USING 'BDC_CURSOR'

'FEBMKA-BUDTM'.

PERFORM BDC_FIELD USING 'BDC_OKCODE'

'/00'.

PERFORM BDC_FIELD USING 'FEBMKA-BUKRS'

wa_BRS-BUKRS.

PERFORM BDC_FIELD USING 'FEBMKA-HBKID'

wa_BRS-HBKID.

PERFORM BDC_FIELD USING 'FEBMKA-HKTID'

wa_BRS-HKTID.

PERFORM BDC_FIELD USING 'FEBMKA-AZNUM'

wa_BRS-AZNUM.

PERFORM BDC_FIELD USING 'FEBMKA-AZDAT'

wa_BRS-AZDAT.

PERFORM BDC_FIELD USING 'FEBMKA-SSALD'

wa_BRS-SSALD.

PERFORM BDC_FIELD USING 'FEBMKA-ESALD'

wa_BRS-ESALD.

PERFORM BDC_FIELD USING 'FEBMKA-BUDTM'

wa_BRS-BUDTM.

FLAG = 1.

PERFORM BDC_DYNPRO USING 'SAPMF40K' '8000'.

PERFORM BDC_FIELD USING 'BDC_CURSOR'

'FEBEP-VALUT(01)'.

PERFORM BDC_FIELD USING 'BDC_OKCODE'

'=ZINS'.

PERFORM ITEMDATA. " go bottom for code...

ELSE.

PERFORM ITEMDATA.

ENDIF.

ENDLOOP.

PERFORM POSTDATA. " go bottom for code...

*******************************************************

&----

*& Form ITEMDATA

&----

FORM ITEMDATA .

PERFORM BDC_FIELD USING 'FEBMKA-VGMAN(01)'

wa_BRS-VGMAN.

PERFORM BDC_FIELD USING 'FEBMKA-KWBTR(01)'

wa_BRS-KWBTR.

PERFORM BDC_FIELD USING 'FEBMKK-CHECT_KF(01)'

wa_BRS-CHECT_KF.

PERFORM BDC_FIELD USING'FEBEP-VALUT(01)'

wa_BRS-VALUT.

PERFORM BDC_DYNPRO USING 'SAPMF40K' '8000'.

PERFORM BDC_FIELD USING 'BDC_CURSOR'

'FEBEP-VALUT(01)'.

PERFORM BDC_FIELD USING 'BDC_OKCODE'

'=ZINS'.

ENDFORM. " ITEMDATA

&----

*& Form POSTDATA

&----

FORM POSTDATA .

PERFORM BDC_DYNPRO USING 'SAPMF40K' '8000'.

PERFORM BDC_FIELD USING 'BDC_CURSOR'

'FEBEP-VALUT(01)'.

PERFORM BDC_FIELD USING 'BDC_OKCODE'

'/00'.

PERFORM BDC_FIELD USING 'FEBMKA-VGMAN(01)'

wa_BRS-VGMAN.

PERFORM BDC_FIELD USING 'FEBMKA-KWBTR(01)'

wa_BRS-KWBTR.

PERFORM BDC_FIELD USING 'FEBMKK-CHECT_KF(01)'

wa_BRS-CHECT_KF.

PERFORM BDC_FIELD USING'FEBEP-VALUT(01)'

wa_BRS-VALUT.

PERFORM BDC_DYNPRO USING 'SAPMF40K' '8000'.

PERFORM BDC_FIELD USING 'BDC_CURSOR'

'FEBEP-VALUT(01)'.

PERFORM BDC_FIELD USING 'BDC_OKCODE'

'=SICH'.

PERFORM BDC_TRANSACTION USING 'FF67'. " write call trasaction code...

ENDFORM. " POSTDATA

hope this helps.

regards

ram

Re: Help in Upload program for T-code FF67

Former Member — Fri, 30 Oct 2009 12:02:07 GMT

Hi,

Sample code for Table control dynamic changes number of lines.Take the key field in the upload file,for one document there will few lines items . I will provide you some sample code to work with table control logic.IDX is initially '01' which changes based on number of rows.

IT_HEAD1 = IT_DATA1.

SORT IT_HEAD1 BY VTWEG WERKS.

SORT IT_DATA1 BY VTWEG WERKS.

DELETE ADJACENT DUPLICATES FROM IT_HEAD1 COMPARING VTWEG WERKS.

LOOP AT IT_HEAD1 INTO WA_HEAD1.

LOOP AT it_data1 INTO wa_data1 WHERE VTWEG = WA_HEAD1-VTWEG AND WERKS = WA_HEAD1-WERKS .

IF IDX = 01.

perform bdc_dynpro using 'SAPMV13A' '0100'.

.......

intial screen

........................

endif

if idx = 01.

perform bdc_field using 'KOMG-VTWEG'

WA_DATA1-VTWEG.

perform bdc_field using 'KOMG-WERKS'

WA_DATA1-WERKS.

ENDIF.

Table control part

CONCATENATE 'KOMG-KONDA(' IDX ')' INTO FNAM.

perform bdc_field using FNAM

WA_DATA1-KONDA.

CONCATENATE 'KOMG-MATNR(' IDX ')' INTO FNAM.

perform bdc_field using FNAM

WA_DATA1-MATNR.

CONCATENATE 'KONP-KBETR(' IDX ')' INTO FNAM.

perform bdc_field using FNAM

WA_DATA1-KBETR.

.............

IDX = IDX + 1.

ENDLOOP.

.............

after entering all line items and saving will be done here

CALL TRANSACTION 'VK11' USING it_BDCDATA MODE 'N'

MESSAGES INTO IT_MESSTAB1.

Regards,

Manesh.R

Edited by: manesh ramachandran on Oct 30, 2009 5:32 PM