Code: Alles auswählen.
FUNCTION zisu_zmetmethod.
*"----------------------------------------------------------------------
*"*"Lokale Schnittstelle:
*" IMPORTING
*" VALUE(Y_ANLAGE) LIKE EANL-ANLAGE
*" EXPORTING
*" VALUE(YT_ZMETMETHOD) LIKE ZMETMETHOD STRUCTURE ZMETMETHOD
*"----------------------------------------------------------------------
DATA: it_zmetmethod LIKE TABLE OF zmetmethod.
DATA: wa_zmetmethod LIKE zmetmethod.
* Beispiel:
SELECT * FROM zmetmethod
INTO TABLE it_zmetmethod
WHERE anlage = y_anlage.
CALL SCREEN 0500.
ENDFUNCTION.
*&---------------------------------------------------------------------*
*& Module STATUS_0500 OUTPUT
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
MODULE status_0500 OUTPUT.
SET PF-STATUS '0500'.
SET TITLEBAR '0500'.
ENDMODULE. " STATUS_0500 OUTPUT
*&---------------------------------------------------------------------*
*& Module USER_COMMAND_0500 INPUT
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
MODULE user_command_0500 INPUT.
* CASE ok_code.
* WHEN 'EXIT'. LEAVE TO SCREEN 0.
* WHEN 'CANC'. LEAVE TO SCREEN 0.
* WHEN 'BACK'. LEAVE TO SCREEN 0.
* WHEN 'SAVE'.
** ......
* LEAVE TO SCREEN 0.
* WHEN 'ENTER'. LEAVE TO SCREEN 0.
* ENDCASE.
ENDMODULE.