MODULE POOL

[Former Member]

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 .

[Former Member]

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

[Former Member]

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

[navin_khedikar2]

FI

>>>.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

[Former Member]

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.

[former_member673464]

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

[sreeramkumar_madisetty]

Hi

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