ZFI_BOC_PAYMENT_SCREEN_QUERY
*----------------------------------------------------------------------*
***INCLUDE ZFI_BOC_PAYMENT_SCREEN_QUERY .
*----------------------------------------------------------------------*
*&---------------------------------------------------------------------*
*& Module STATUS_9002 OUTPUT
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
module status_9002 output.
set pf-status '9002'.
set titlebar '9002'.
endmodule. " STATUS_9002 OUTPUT
*&---------------------------------------------------------------------*
*& Module USER_COMMAND_9002 INPUT
*&---------------------------------------------------------------------*
* text
*----------------------------------------------------------------------*
module user_command_9002 input.
case ok_