topic Re: This is a query in module pool program in Application Development and Automation Discussions

This is a query in module pool program

Former Member — Thu, 21 Aug 2008 05:40:18 GMT

Hi all,

In table control (with wizard) based on checkbox selection,

multiple records has to be deleted. (in Module pool - programs)

Is it possible to do that..?

If yes how..? pl explain.

Thanks & Regards

Nagaraj.B

Re: This is a query in module pool program

Former Member — Thu, 21 Aug 2008 05:48:34 GMT

using wizard u create the table control

after creating the table cotrol

u can find a option in the screen called check box.

click on that and paste it in the table control.

Regards

Anbu

Re: This is a query in module pool program

former_member200872 — Thu, 21 Aug 2008 05:54:31 GMT

Hi,

Multiple records can be deleted based on the value of checkbox.

But, i need to ask whether the chekbox is inside (within) the table control as a column or

outside the table control ?

Regards,

Wajid Hussain P.

Re: This is a query in module pool program

Former Member — Thu, 21 Aug 2008 06:27:26 GMT

Hi Wajid Hussain,

check box is inside the table control.

& check box is one of the field in RESB table..,

added to RESB table thru structure.

If possible, send coadings.

Regards

Nagaraj.B

Re: This is a query in module pool program

former_member200872 — Thu, 21 Aug 2008 06:45:32 GMT

Hi,

Convert the relevant field to be checkbox. (using right click option)

In PAI, loop and read TC (move screen field data to program fields).

Use the below statement in a module after loop:

delete it_tc where <field_name> = 'X'.

Regards,

Wajid Hussain P.

Re: This is a query in module pool program

Former Member — Thu, 21 Aug 2008 12:35:30 GMT

Hi,

can u explain it in a little bit elaberated way..?

I'm still unable to delete multiple records at a time based on check box selection..

Regards

Nagaraju.B

Re: This is a query in module pool program

Former Member — Thu, 21 Aug 2008 13:09:10 GMT

After

PROCESS AFTER INPUT

LOOP

MODIFY..e.t.c (which will be modify the TC after you put the select the check box)

ENDLOOP

MODULE USER-COMMAND.

Inside the above module

Code Like This

IF SY-UCOMM= 'DELETE' --> (Your Case)

LOOP AT TC1 INTO WA_TC1 WHERE CHECKBOX = 'X'.

DELETE TC1 INDEX SY-TABIX .

ENDLOOP.

ENDIF.

Thanks & Regards

Mallikharjuna Reddy

Re: This is a query in module pool program

former_member200872 — Fri, 22 Aug 2008 07:09:24 GMT

Hi,

You may go through the comments and code given below.

Regards,

Wajid Hussain P.

" * * * * * * *

Convert the relevant field to be checkbox. (using right click option).

In PAI, loop and read TC (move screen field data to program fields).

" * * * Top include

TYPES: BEGIN OF ty_itab,

resb TYPE resb,

check TYPE c LENGTH 1,

END OF ty_itab.

DATA: it_resb TYPE TABLE OF ty_itab,

wa_resb TYPE ty_itab.

" * * * PBO

PROCESS BEFORE OUTPUT.

loop at it_resb into wa_resb with control tc .

module show_tc.

endloop.

" * * * PAI

PROCESS AFTER INPUT.

loop at it_resb .

module read_tc.

endloop.

module change_tc_itab.

" -

Modules

" * * *

MODULE READ_TC.

move-corresponding RSEB to wa_resb. " RESB in screen

modify it_resb from wa_resb index tc-current_line.

ENDMODULE.

Use the below statement in a module after loop:

delete it_resb where <field_name> = 'X'.

MODULE CHANGE_TC_ITAB.

data: lv_lines type i.

delete itab where check = 'X'. " check is a column in itab

describe table itab lines lv_lines.

tc-lines = lv_lines.

ENDMODULE.

MODULE SHOW_TC.

move-corresponding wa_resb to RSEB . " RESB in screen

ENDMODULE.