topic Re: Module Pool in Application Development and Automation Discussions

Module Pool

Former Member — Thu, 01 Mar 2007 08:51:43 GMT

Hi,

I have a text field and a button in the screen.

the value in the text field in 1 initially.

my requirement is that when i press that button the value in the text field must be incremented by 1 each time.

can someone help me out with this please.

Thanks,

Supriya Manik.

Re: Module Pool

Former Member — Thu, 01 Mar 2007 08:58:07 GMT

MODULE PBO.

data : v_ince type i value '1'..

v_text = v_inc

MODULE PAI.

MODULE INCREMENT.

case sy-ucomm.

when 'PUSH1'.

v_inc = v_inc + 1.

v_field = v_inc.

endcase.

ENDMODULE.

Re: Module Pool

Former Member — Thu, 01 Mar 2007 09:01:27 GMT

I hope text field doesn't mean label, becuase you can change it.

U should replace the text field with a char variable and insert it in the screen setting the attribute ONLY OUTPUT, in this way the variable will be shown as a text field.

So in the user command you have to increment it:

MODULE USER_COMMAND.
   CASE OK_CODE.
      WHEN <BUTTON>. TEXT = TEXT + 1.
   ...........................................................
ENDMODULE.

Max

Re: Module Pool

Former Member — Thu, 01 Mar 2007 09:18:06 GMT

i am having a condition like i have to increment it for 5 times

i have a internal table where i have some data.

according to the no. of records in the table i am incrementing it.

how can i do that.

Re: Module Pool

Former Member — Thu, 01 Mar 2007 09:24:37 GMT

hi,

if it depends on the no of records in your internal table.

then find out number of records in table using describe table statement to get no of records in the table and then increment the counter accordingly.

describe table itab line v_lines.

v_text = v_text + v_lines.

Hope this helps.

Regards,

Richa

Re: Module Pool

Former Member — Thu, 01 Mar 2007 09:28:26 GMT

MODULE PBO.

describe table itab lines v_lines.

data : v_ince type i value '1'..

v_text = v_inc

MODULE PAI.

MODULE INCREMENT.

case sy-ucomm.

when 'PUSH1'.

if v_inc LE v_lines.

v_inc = v_inc + 1.

v_field = v_inc.

endif.

endcase.

ENDMODULE.

Re: Module Pool

Former Member — Thu, 01 Mar 2007 09:28:27 GMT

the text box must be incremented v_lines number of times.

V_lines + v_text.

Re: Module Pool

Former Member — Thu, 01 Mar 2007 09:44:20 GMT

Hi,

you need to use Do..endo loop for the v_lines number of times and increment within the loop.

case sy-ucomm.

when 'PUSH1'.

do v_lines times.

v_inc = v_inc + 1.

enddo.

endcase.

Regards,

Saumya