CASE sy-ucomm. WHEN 'READ'. SET PF-STATUS 'CHECK' EXCLUDING 'READ'. box = space. DO lines TIMES. READ LINE sy-index FIELD VALUE box. IF box = 'X'. WRITE: / 'Line', num, 'was selected'. box = space. MODIFY LINE sy-index FIELD VALUE box FIELD FORMAT box INPUT OFF num...
DATA: ok_code TYPE sy-ucomm, save_ok TYPE sy-ucomm.mytabstrip-activetab = 'PUSH2'.CALL SCREEN 100.MODULE status_0100 OUTPUT. SET PF-STATUS 'SCREEN_100'. ENDMODULE.MODULE cancel INPUT. LEAVE PROGRAM. ENDMODULE.MODULE user_command INPUT. save_ok = ok_code. CLEAR ok_code. IF...
Commlytics 会社の連絡先 CRM 会社の雇用プロジェクト管理 コンペテラ コンタクト センター Conceptboard 推す 条件管理 Conferences i/o Confluence Cloud Confluence Connector by MWF コンタクト センター コンタクト センター |ROGER365.io QR に問い合わせる XPhone による連絡先 連絡先マネー...
35、elfield .响应 后的事件DATA lr_gridTYPE REF TO cl_gui_alv_gridlc_iTYPE i , lv_subrc TYPE sy-subrc .CALL FUNCTION GET_GLOBALS_FROM_SLVC_FULLSCRIMPORTINGe_gridlr_gridCALL METHOD lr_grid - check_changed_data rs_selfield - refresh = X .CASE r_ucomm 当点击打印按钮时,执行打印操作WHE...
例外として、ENTER を選択した場合は、PAI がトリガされ、SY-UCOMM に別の機能コードが転送される場合があります。 ●ツールバーのコマンドフィールドにエントリがある場合は、このエントリが機能コードとして SY-UCOMM に転送されます。 ●...
各 PAI イベントでは、機能コードは空白の場合を除いてシステム項目 syst-ucomm (sy-ucomm) に取り込まれ、OK_CODE 項目に割り当てられます。空白の機能コードは、項目 sy-ucomm にも OK_CODE 項目にも取り込まれません。OK_CODE 項目を処理するには、事前にスクリーンペインタでこの...
DATA: ok_code TYPE sy-ucomm, carrier TYPE spfli-carrid, connect TYPE spfli-connid.CALL SCREEN 100.MODULE init_screen_0100 OUTPUT. SET PF-STATUS 'STATUS_100'. ENDMODULE.MODULE cancel INPUT. LEAVE PROGRAM. ENDMODULE.MODULE module_1 INPUT. MESSAGE i888(sabapdocu) WITH text-001 carrier...
CASE sy-ucomm. WHEN 'INP1'. SET CURSOR FIELD 'INPUT1' LINE 6 OFFSET 4. WHEN 'INP2'. SET CURSOR FIELD 'INPUT2' LINE 7 OFFSET 4. WHEN 'INP3'. SET CURSOR FIELD 'INPUT3' LINE 8 OFFSET 4. ENDCASE.このプログラムでは、3 つの入力項目を含む基本一覧が登録されます。ステー...
DATA: ok_code TYPE sy-ucomm, save_ok TYPE sy-ucomm.START-OF-SELECTION.DO 40 TIMES. wa-col1 = sy-index. wa-col2 = sy-index ** 2. APPEND wa TO itab. ENDDO.DESCRIBE TABLE itab LINES fill.CALL SCREEN 100.MODULE status_0100 OUTPUT. SET PF-STATUS 'STATUS_100' EXCLUDING ...
CASE sy-ucomm. WHEN 'READ'. box = space. SET PF-STATUS 'CHECK' EXCLUDING 'READ'. DO lines TIMES. READ LINE sy-index FIELD VALUE box. IF box = 'X'. free = sflight-seatsmax - sflight-seatsocc. IF free > 0. NEW-PAGE. WRITE: 'Company:', sflight-carrid, 'Connection: '...