Comments
Code listings for SAPLZMESS includes
The below intructions / ABAP code is part of the SAPTAlk Instant messaging program for SAP.
Create the following include files using the code listing below: INCLUDE LZMESSTOP. " global Data INCLUDE LZMESSO01. " PBO-Modules INCLUDE LZMESSI01. " PAI-Modules
*INCLUDE LZMESSTOP
FUNCTION-POOL ZMESS. "MESSAGE-ID ..
data: ok_code like sy-ucomm,
save_ok like sy-ucomm,
sc_messagetxt(200) type c.
*INCLUDE LZMESSO01 *--------------------------------------------------------------* ***INCLUDE LZMESSO01 . *--------------------------------------------------------------* *&-------------------------------------------------------------* *& Module STATUS_0100 OUTPUT *&-------------------------------------------------------------* * text *--------------------------------------------------------------* MODULE STATUS_0100 OUTPUT. SET PF-STATUS 'MESS'. * SET TITLEBAR 'xxx'. ENDMODULE. " STATUS_0100 OU
*INCLUDE LZMESSI01
*--------------------------------------------------------------*
***INCLUDE LZMESSI01 .
*--------------------------------------------------------------*
*&-------------------------------------------------------------*
*& Module USER_COMMAND_0100 INPUT
*&-------------------------------------------------------------*
* text
*--------------------------------------------------------------*
MODULE USER_COMMAND_0100 INPUT.
save_ok = ok_code.
case ok_code.
when 'EXIT' or 'BACK' or 'CANC'.
leave to screen 0.
when 'SEND' or ' '.
leave to screen 0.
endcase.
ENDMODULE. " USER_COMMAND_0100 INPUT