topic Re: MODULE POOL in Application Development and Automation Discussions

MODULE POOL

Former Member — Fri, 16 Mar 2007 07:27:39 GMT

MY REQUIREMENT IN MODULE POOL IS IN MY SCREEN I HAD 4 PUSHBUTTONS THEY ARE BACK,DISPLAY,UPDATE, INSERT

1) AFTER MAKING ENTRIES IN ALL THE FIELDS AND CLICK <b>INSERT PUSHBUTTON</b> ALL OTHER PUSHBUTTONS SHOULD BE DISABLED

2) HOW TO DISPLAY POPUP SCREEN IN MODULE POOL

IS THERE ANY BUILT IN FUNCTION MODULE IS THERE OR IS THERE CODE

AVAILABLE PLZ SEND TO ME .

Re: MODULE POOL

Former Member — Fri, 16 Mar 2007 07:33:12 GMT

hi,

1) in the okcode of insert push button write

loop at screen.

screen-name = 'button name'.

screen-invisible = '1'.

modify screen.

endloop.

2) use the following function

reuse_alv_popup_to_select

reward points if useful

rgds,

Prajith

Re: MODULE POOL

Former Member — Fri, 16 Mar 2007 07:35:32 GMT

hi,

You need to use the LOOP AT SCREEN statment in the PBO event,

Loop at screen.

CASE SY-UCOMM.

WHEN 'INSERT'. "Sales order select

SCREEN-ACTIVE = '1'. "1=Active, 0=Don't display

MODIFY SCREEN.

Endloop.

http://www.sap-img.com/abap/common-used-of-dialog-screen-for-display-change-delete.htm

2) To display the popup in the Module pool 'POPUP_WITH_TABLE_DISPLAY' . if you want to other Pop up, then goto SE37 and enterPopup and Press F4, you will get all the Function moduels

http://www.sap-img.com/abap/abap-pop-up-window.htm

Regards

Sudheer

Re: MODULE POOL

Former Member — Fri, 16 Mar 2007 07:36:49 GMT

>>>.for first one

LOOP AT SCREEN

IF SCREEN-NAME = <BTN NAME>

SCREEN-ACTIVE = 0 <for deactive> 1<for active>

ENDIF

ENDLOOP.

>>>second one

No facility for popup Plz select LISTBOX

**Please reward suitable points***

With Regards

Navin Khedikar

Re: MODULE POOL

Former Member — Fri, 16 Mar 2007 08:57:40 GMT

hi,

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

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

<b>call screen 100.

MODULE STATUS_0100 OUTPUT.

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

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

ENDMODULE.

MODULE STATUS_0100 INPUT.

CASE okcode.

when 'INSERT'.

loop at screen.

if screen-group eq ' '. " <----

mention group as in screen

screen-active = '0'.

endif.

modify screen.

endloop.

endcase.

ENDMODULE.</b>

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

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

Regards,

Naresh.

Re: MODULE POOL

former_member673464 — Fri, 16 Mar 2007 09:41:52 GMT

Hi,

You can group three push buttons in the screen to single group and assign screen properties to them using the below code.

DATA: ok_code TYPE sy-ucomm,

save_ok TYPE sy-ucomm.

DATA flag(1) TYPE c.

CALL SCREEN 100.

MODULE status_0100 OUTPUT.

SET PF-STATUS 'SCREEN_100'.

LOOP AT SCREEN.

IF screen-group1 = 'MOD'.

IF flag = ' '.

screen-input = '0'.

ELSEIF flag = 'X'.

screen-input = '1'.

ENDIF.

MODIFY SCREEN.

ENDIF.

ENDLOOP.

ENDMODULE.

MODULE cancel.

LEAVE PROGRAM.

ENDMODULE.

MODULE user_command_0100 INPUT.

save_ok = ok_code.

CLEAR ok_code.

CASE save_ok.

WHEN 'TOGGLE'.

IF flag = ' '.

flag = 'X'.

ELSEIF flag = 'X'.

flag = ' '.

ENDIF.

ENDCASE.

ENDMODULE.

regards,

veeresh

Re: MODULE POOL

sreeramkumar_madisetty — Fri, 16 Mar 2007 09:46:01 GMT

In Module Pool we will do any functionality using SY-UCOMM only.

Use the sy-ucomm and map the sy-ucomm with the concerned function codes.

DATA: ok_code TYPE sy-ucomm,

save_ok TYPE sy-ucomm.

DATA flag(1) TYPE c.

CALL SCREEN 100.

MODULE status_0100 OUTPUT.

SET PF-STATUS 'SCREEN_100'.

LOOP AT SCREEN.

IF screen-group1 = 'MOD'.

IF flag = ' '.

screen-input = '0'.

ELSEIF flag = 'X'.

screen-input = '1'.

ENDIF.

MODIFY SCREEN.

ENDIF.

ENDLOOP.

ENDMODULE.

MODULE cancel.

LEAVE PROGRAM.

ENDMODULE.

MODULE user_command_0100 INPUT.

save_ok = ok_code.

CLEAR ok_code.

CASE save_ok.

WHEN 'TOGGLE'.

IF flag = ' '.

flag = 'X'.

ELSEIF flag = 'X'.

flag = ' '.

ENDIF.

ENDCASE.

ENDMODULE.

Regards,

kumar