Skip to Content
0
Apr 16, 2014 at 07:35 PM

Save check box as checked status

28 Views

Hi,

I'm trying to change a check box status, when I input data (through t-code ME21N) and save it the check box is unmarked and I go to t-code ME29N to release the new Create Purchase Order.

Is possible to change it just in PBO Module below or should I change something else?

Please guys, could anyone help me?

**The available Screen Exit are:**

PROCESS BEFORE OUTPUT.

MODULE STATUS_0101.

MODULE clear_screen_101.

MODULE modify_screen_101.

MODULE load_data_101.

*

PROCESS AFTER INPUT.

MODULE USER_COMMAND_0101.

**There is nothing in MODULE STATUS_101**

MODULE CLEAR_SCREEN_101 OUTPUT.

CHECK sy-ucomm EQ 'MESAVE'.

* CLEAR: ekko_ci-zzxfield.

ENDMODULE. " CLEAR_SCREEN_101 OUTPUT



MODULE MODIFY_SCREEN_101 OUTPUT.

IF sy-tcode EQ 'ME21N'.

LOOP AT SCREEN.

CHECK screen-name EQ 'EKKO-ZZXFIELD'.

screen-input = 1.

MODIFY SCREEN.

ENDLOOP.

ELSEIF sy-tcode EQ 'ME22N'.

LOOP AT SCREEN.

CHECK screen-name EQ 'EKKO-ZZXFIELD'.

screen-input = 1.

MODIFY SCREEN.

ENDLOOP.

ELSEIF sy-tcode EQ 'ME23N'.

LOOP AT SCREEN.

CHECK screen-name EQ 'EKKO-ZZXFIELD'.

screen-input = 0.

MODIFY SCREEN.

ENDLOOP.

ENDIF.

ENDMODULE. " MODIFY_SCREEN_101 OUTPUT


**And finally the last PBO

MODULE LOAD_DATA_101 OUTPUT.

ekko-zzxfield = ekko_ci-zzxfield.

ENDMODULE. " LOAD_DATA_101 OUTPUT

Attachments

error2.jpg (247.2 kB)
error1.jpg (195.9 kB)