topic Re: Problem with BDC program for ABZON transaction in Application Development and Automation Discussions

Problem with BDC program for ABZON transaction

Former Member — Tue, 08 Mar 2011 07:30:50 GMT

Hi Experts,

I have a requirement that posting of Asset values to ABZON transaction. for that i created one bdc program for ABZON transaction, but i am not able to handle page down in that program. when i trying to excute the bdc program, it is working fine for first 6 lines, after that records are over writting. so how can i solve this problem.

please see below mentioned code

loop at t_upload_item into wa_upload_item where asset = wa_upload_hd-asset.

v_indx1 = v_indx1 + 1.

v_indx = v_indx1.

v_indx = sy-tabix.

CONCATENATE 'EL1(' v_indx ')' INTO v_fnam.

perform bdc_field using v_fnam wa_upload_item-asset.

CONCATENATE 'EL2(' v_indx ')' INTO v_fnam.

perform bdc_field using v_fnam wa_upload_item-Asset_Sub.

CONCATENATE 'ELR1(' v_indx ')' INTO v_fnam.

perform bdc_field using v_fnam wa_upload_item-Amou_post.

if v_indx1 gt 6.

perform bdc_dynpro using 'SAPLAMDP' '0110'.

perform bdc_field using 'BDC_OKCODE' '=P+'.

'=TC_115_INSERT_LINE'.

clear v_indx.

clear v_indx1.

v_indx1 = v_indx1 + 1.

v_indx = v_indx1.

CONCATENATE 'EL1(' v_indx ')' INTO v_fnam.

perform bdc_field using v_fnam wa_upload_item-asset.

CONCATENATE 'EL2(' v_indx ')' INTO v_fnam.

perform bdc_field using v_fnam wa_upload_item-Asset_Sub.

CONCATENATE 'ELR1(' v_indx ')' INTO v_fnam.

perform bdc_field using v_fnam wa_upload_item-Amou_post.

endif.

endloop.

regards,

gsreddy.

Re: Problem with BDC program for ABZON transaction

Former Member — Tue, 08 Mar 2011 08:57:25 GMT

Check that index value after pagedown wheather the INDEX is getting incremental or set to initial index.if index after 6th record is one, then you can use the MOD value to set the index counter.

Re: Problem with BDC program for ABZON transaction

nirajgadre — Tue, 08 Mar 2011 09:07:12 GMT

Hi ,

it seems there is some countr problem..

Try to use below code...

clear v_indx.

loop at t_upload_item into wa_upload_item where asset = wa_upload_hd-asset.

v_indx = v_indx + 1.

CONCATENATE 'EL1(' v_indx ')' INTO v_fnam.

perform bdc_field using v_fnam wa_upload_item-asset.

CONCATENATE 'EL2(' v_indx ')' INTO v_fnam.

perform bdc_field using v_fnam wa_upload_item-Asset_Sub.

CONCATENATE 'ELR1(' v_indx ')' INTO v_fnam.

perform bdc_field using v_fnam wa_upload_item-Amou_post.

if v_indx EQ 6.

perform bdc_dynpro using 'SAPLAMDP' '0110'.

perform bdc_field using 'BDC_OKCODE' '=P+'.

clear v_indx.

ENDIF.

clear wa_upload_item .

ENDLOOP.

Re: Problem with BDC program for ABZON transaction

Former Member — Tue, 08 Mar 2011 09:09:44 GMT

Hi Check this out,

IF  v_index1 =6.
*     if you press page down after filling all the rows
*     then the last entry appears in the first row by default
*     so we need to fill the data from the 2 row
      v_index1= 1.
*   Page down
      PERFORM fill_bdc_field USING 'BDC_OKCODE' '=P+'
                                   CHANGING it_bdcdata.

    ENDIF.

Re: Problem with BDC program for ABZON transaction

Former Member — Tue, 08 Mar 2011 09:50:38 GMT

Hi try this code:

v_indx1 = 0.

loop at t_upload_item into wa_upload_item where asset = wa_upload_hd-asset.

if v_indx1 gt 6.

perform bdc_dynpro using 'SAPLAMDP' '0110'.

perform bdc_field using 'BDC_OKCODE' '=P+'.

v_indx1 = 2.

perform bdc_dynpro using 'SAPLAMDP' '0110'.

perform bdc_field using 'BDC_CURSOR'

'EL1(02)'.

perform bdc_field using 'BDC_OKCODE'

'/00'.

else.

v_indx1 = v_indx1 + 1.

endif.

CONCATENATE 'EL1(' v_indx ')' INTO v_fnam.

perform bdc_field using v_fnam wa_upload_item-asset.

CONCATENATE 'EL2(' v_indx ')' INTO v_fnam.

perform bdc_field using v_fnam wa_upload_item-Asset_Sub.

CONCATENATE 'ELR1(' v_indx ')' INTO v_fnam.

perform bdc_field using v_fnam wa_upload_item-Amou_post.

endloop.

Re: Problem with BDC program for ABZON transaction

Former Member — Tue, 08 Mar 2011 10:37:56 GMT

Hi Niraj,

Thanks for your reply.

i tried with your code, but it is over writting the eariler values,

i.e. when i execute the program first it displaying 6(1 to 6) rows, after when i press enter

the earlier values are overwrite and next 6 records are dispalying (7 to 12).

so please help me to reslove my issue.

regards,

suresh.

Re: Problem with BDC program for ABZON transaction

Former Member — Tue, 08 Mar 2011 11:31:46 GMT

Check what is the INDEX value for the 7 the record, Is it 01 or 07.

Re: Problem with BDC program for ABZON transaction

nirajgadre — Tue, 08 Mar 2011 12:03:23 GMT

Hi,

Add the Enter command at the 6th line item in your BDC so that previos line gets stored.

if v_indx EQ 6.

perform bdc_field using 'BDC_OKCODE'

'/00'.

perform bdc_dynpro using 'SAPLAMDP' '0110'.

perform bdc_field using 'BDC_OKCODE' '=P+'.

clear v_indx.

ENDIF.

Re: Problem with BDC program for ABZON transaction

Former Member — Wed, 09 Mar 2011 04:26:39 GMT

Hi,

index value for seventh record is 1, but it should be 7.

i am not able to handle page down, all records are coming on first page, but we need to do page down.

regards,

gsreddy.

Re: Problem with BDC program for ABZON transaction

Former Member — Wed, 09 Mar 2011 08:54:23 GMT

If the index value is 7 for the 7th record, you can keep the counter as 7, for the 8th record keep the counter as 8 .... etc and Do the page down when remainder(MOD) value is 0 when it is dived by 6.then it can work.

Re: Problem with BDC program for ABZON transaction

Former Member — Wed, 09 Mar 2011 09:47:56 GMT

v_indx1 = 1.

loop at t_upload_item into wa_upload_item where asset = wa_upload_hd-asset.

if v_mod = 0 and v_indx1 > 6.

perform bdc_dynpro using 'SAPLAMDP' '0110'.

perform bdc_field using 'BDC_OKCODE' '=P+'.

'=TC_115_INSERT_LINE'.

CONCATENATE 'EL1(' v_indx1 ')' INTO v_fnam.

perform bdc_field using v_fnam wa_upload_item-asset.

CONCATENATE 'EL2(' v_indx1 ')' INTO v_fnam.

perform bdc_field using v_fnam wa_upload_item-Asset_Sub.

CONCATENATE 'ELR1(' v_indx1 ')' INTO v_fnam.

perform bdc_field using v_fnam wa_upload_item-Amou_post.

endif.

if v_indx1 < 7

CONCATENATE 'EL1(' v_indx1 ')' INTO v_fnam.

perform bdc_field using v_fnam wa_upload_item-asset.

CONCATENATE 'EL2(' v_indx1 ')' INTO v_fnam.

perform bdc_field using v_fnam wa_upload_item-Asset_Sub.

CONCATENATE 'ELR1(' v_indx1 ')' INTO v_fnam.

perform bdc_field using v_fnam wa_upload_item-Amou_post.

Endif.

v_mod = v_indx1 / 6.

v_indx1 = v_indx1 + 1.

endloop.

Re: Problem with BDC program for ABZON transaction

Former Member — Thu, 10 Mar 2011 05:23:13 GMT

Sorry, you can use the mod value as

"v_mod = v_indx1 MOD 6" instead of "v_mod = v_indx1 / 6" in the above code.

i think now it can work.