Community
Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Turn on suggestions
Auto-suggest helps you quickly narrow down your search results by suggesting possible matches as you type.
Showing results for 
Search instead for 
Did you mean: 
Read only

Passing range table(from Report) to select-option(Module pool) using Call transaction

Former Member

‎2014 May 31 10:28 PM

0 Likes
1,039

Hello Guys,

As the title suggests, i have to call a transaction which is a Module Pool Prograrom. I need to fill the multiple values of a Select-option of the module pool from my report program. I am using Call Transaction using BDCDATA. I am able to fill only the first 8 values of the select-option. I should be able to fill more than 8 values and i need some help from you guys.

I am pasting my code here, please suggest the changes i need to do to my program:

   PERFORM BDC_DYNPRO USING 'ZBASA_MODULE_POOL' '100' 'X'.
   PERFORM BDC_FIELD  USING 'PA_LAUFD' GW_DATUM.
   PERFORM BDC_FIELD  USING 'BDC_CURSOR' 'SO_VKONT-LOW'.
   PERFORM BDC_FIELD  USING 'SO_VKONT-LOW' '100001234'.

   PERFORM BDC_DYNPRO USING 'SAPLALDB' '3000' 'X'.
   PERFORM BDC_FIELD  USING 'BDC_SUBSCR' 'SAPLALDB                                3010SCREEN_HEADER'.

   IDX = 1.
  CONCATENATE 'RSCSEL_255-SLOW_I(' IDX ')' INTO GW_FIELD.
  PERFORM BDC_FIELD       USING GW_FIELD
                                 '100001234'.

  IDX = IDX + 1.

  CLEAR GW_FIELD.
  CONCATENATE 'RSCSEL_255-SLOW_I(' IDX ')' INTO GW_FIELD.
  PERFORM BDC_FIELD       USING GW_FIELD
                                 '100001235'.

  IDX = IDX + 1.

  CLEAR GW_FIELD.
  CONCATENATE 'RSCSEL_255-SLOW_I(' IDX ')' INTO GW_FIELD.
  PERFORM BDC_FIELD       USING GW_FIELD
                                 '100001236'.

  IDX = IDX + 1.

  CLEAR GW_FIELD.
  CONCATENATE 'RSCSEL_255-SLOW_I(' IDX ')' INTO GW_FIELD.
  PERFORM BDC_FIELD       USING GW_FIELD
                                 '100001237'.

  IDX = IDX + 1.

  CLEAR GW_FIELD.
  CONCATENATE 'RSCSEL_255-SLOW_I(' IDX ')' INTO GW_FIELD.
  PERFORM BDC_FIELD       USING GW_FIELD
                                 '100001238'.

  IDX = IDX + 1.

  CLEAR GW_FIELD.
  CONCATENATE 'RSCSEL_255-SLOW_I(' IDX ')' INTO GW_FIELD.
  PERFORM BDC_FIELD       USING GW_FIELD
                                 '100001239'.


  IDX = IDX + 1.

  CLEAR GW_FIELD.
  CONCATENATE 'RSCSEL_255-SLOW_I(' IDX ')' INTO GW_FIELD.
  PERFORM BDC_FIELD       USING GW_FIELD
                                 '100001240'.


  IDX = IDX + 1.

  CLEAR GW_FIELD.
  CONCATENATE 'RSCSEL_255-SLOW_I(' IDX ')' INTO GW_FIELD.
  PERFORM BDC_FIELD       USING GW_FIELD
                                 '100001241'.


  IDX = IDX + 1.

  CLEAR GW_FIELD.
  CONCATENATE 'RSCSEL_255-SLOW_I(' IDX ')' INTO GW_FIELD.
  PERFORM BDC_FIELD       USING GW_FIELD
                                 '100001242'.


  IDX = IDX + 1.

  CLEAR GW_FIELD.
  CONCATENATE 'RSCSEL_255-SLOW_I(' IDX ')' INTO GW_FIELD.
  PERFORM BDC_FIELD       USING GW_FIELD
                                 '100001243'.


Best regards,

rama

Hello Guys,

As the title suggests, i have to call a transaction which is a Module Pool Prograrom. I need to fill the multiple values of a Select-option of the module pool from my report program. I am using Call Transaction using BDCDATA. I am able to fill only the first 8 values of the select-option. I should be able to fill more than 8 values and i need some help from you guys.

I am pasting my code here, please suggest the changes i need to do to my program:

   PERFORM BDC_DYNPRO USING 'ZBASA_MODULE_POOL' '100' 'X'.
   PERFORM BDC_FIELD  USING 'PA_LAUFD' GW_DATUM.
   PERFORM BDC_FIELD  USING 'BDC_CURSOR' 'SO_VKONT-LOW'.
   PERFORM BDC_FIELD  USING 'SO_VKONT-LOW' '100001234'.

   PERFORM BDC_DYNPRO USING 'SAPLALDB' '3000' 'X'.
   PERFORM BDC_FIELD  USING 'BDC_SUBSCR' 'SAPLALDB                                3010SCREEN_HEADER'.

   IDX = 1.
  CONCATENATE 'RSCSEL_255-SLOW_I(' IDX ')' INTO GW_FIELD.
  PERFORM BDC_FIELD       USING GW_FIELD
                                 '100001234'.

  IDX = IDX + 1.

  CLEAR GW_FIELD.
  CONCATENATE 'RSCSEL_255-SLOW_I(' IDX ')' INTO GW_FIELD.
  PERFORM BDC_FIELD       USING GW_FIELD
                                 '100001235'.

  IDX = IDX + 1.

  CLEAR GW_FIELD.
  CONCATENATE 'RSCSEL_255-SLOW_I(' IDX ')' INTO GW_FIELD.
  PERFORM BDC_FIELD       USING GW_FIELD
                                 '100001236'.

  IDX = IDX + 1.

  CLEAR GW_FIELD.
  CONCATENATE 'RSCSEL_255-SLOW_I(' IDX ')' INTO GW_FIELD.
  PERFORM BDC_FIELD       USING GW_FIELD
                                 '100001237'.

  IDX = IDX + 1.

  CLEAR GW_FIELD.
  CONCATENATE 'RSCSEL_255-SLOW_I(' IDX ')' INTO GW_FIELD.
  PERFORM BDC_FIELD       USING GW_FIELD
                                 '100001238'.

  IDX = IDX + 1.

  CLEAR GW_FIELD.
  CONCATENATE 'RSCSEL_255-SLOW_I(' IDX ')' INTO GW_FIELD.
  PERFORM BDC_FIELD       USING GW_FIELD
                                 '100001239'.


  IDX = IDX + 1.

  CLEAR GW_FIELD.
  CONCATENATE 'RSCSEL_255-SLOW_I(' IDX ')' INTO GW_FIELD.
  PERFORM BDC_FIELD       USING GW_FIELD
                                 '100001240'.


  IDX = IDX + 1.

  CLEAR GW_FIELD.
  CONCATENATE 'RSCSEL_255-SLOW_I(' IDX ')' INTO GW_FIELD.
  PERFORM BDC_FIELD       USING GW_FIELD
                                 '100001241'.


  IDX = IDX + 1.

  CLEAR GW_FIELD.
  CONCATENATE 'RSCSEL_255-SLOW_I(' IDX ')' INTO GW_FIELD.
  PERFORM BDC_FIELD       USING GW_FIELD
                                 '100001242'.


  IDX = IDX + 1.

  CLEAR GW_FIELD.
  CONCATENATE 'RSCSEL_255-SLOW_I(' IDX ')' INTO GW_FIELD.
  PERFORM BDC_FIELD       USING GW_FIELD
                                 '100001243'.


Best regards,

rama

Reply
1 REPLY 1
Read only

Former Member

‎2014 Jun 01 11:31 AM

0 Likes
773

I came across a wiki by Sandra Rossi and it was really helpful. I still have problem with the indexes but i should be able to finish it off. I will mark this thread as Answered.