Category: Uncategorized

  DATA : lr_custom_cont TYPE REF TO cl_gui_custom_container, lr_text_edit TYPE REF TO cl_gui_textedit. START-OF-SELECTION.   CALL SCREEN 0001. *———————————————————————-* *  MODULE create_container OUTPUT *———————————————————————- MODULE create_container OUTPUT. CREATE OBJECT lr_custom_cont EXPORTING container_name = ‘EDITOR’ ” Name of the Screen CustCtrl repid          = sy–repid dynnr          = sy–dynnr. ENDMODULE.                    “create_container OUTPUT *———————————————————————-* *  MODULE create_text_editor OUTPUT *———————————————————————-* MODULE create_text_editor OUTPUT. CREATE OBJECT lr_text_edit EXPORTING parent = lr_custom_cont.     ” Parent Container ENDMODULE.                    “create_text_editor OUTPUT Step1. Here

DATA :   lr_cust TYPE REF TO cl_gui_custom_container, lr_tree TYPE REF TO cl_gui_alv_tree, lt_scarr TYPE TABLE OF scarr, ls_scarr TYPE  scarr, lt_spfli TYPE TABLE OF spfli, gt_spfli TYPE TABLE OF spfli, ls_spfli TYPE spfli, ls_header TYPE treev_hhdr, lv_node_key1 TYPE lvc_nkey, lv_node_key2 TYPE lvc_nkey, lv_node_key3 TYPE lvc_nkey, lv_node_text TYPE lvc_value. START-OF-SELECTION. CALL SCREEN 0001. *&———————————————————————* *&      Module  STATUS_0001  OUTPUT *&———————————————————————* MODULE status_0001 OUTPUT. SET PF-STATUS ‘STATUS’. *  SET TITLEBAR ‘xxx’. ENDMODULE.                 ” STATUS_0001  OUTPUT *&———————————————————————* *&      Module  GET_DATA  OUTPUT *&———————————————————————*

DATA :   lr_cust TYPE REF TO cl_gui_custom_container, lr_tree TYPE REF TO cl_gui_alv_tree, lt_scarr TYPE TABLE OF scarr, gt_scarr TYPE TABLE OF scarr, ls_scarr TYPE scarr, ls_header TYPE treev_hhdr, lv_node_key1 TYPE lvc_nkey, lv_node_key2 TYPE lvc_nkey, lv_node_text TYPE lvc_value. START-OF-SELECTION. CALL SCREEN 0001. *&———————————————————————* *&      Module  STATUS_0001  OUTPUT *&———————————————————————* MODULE status_0001 OUTPUT. SET PF-STATUS ‘STATUS’. *  SET TITLEBAR ‘xxx’. ENDMODULE.                 ” STATUS_0001  OUTPUT *&———————————————————————* *&      Module  GET_DATA  OUTPUT *&———————————————————————* MODULE get_data OUTPUT. IF lt_scarr IS INITIAL. SELECT * FROM scarr INTO TABLE lt_scarr.

  DATA :   lr_cust TYPE REF TO cl_gui_custom_container, lr_tree TYPE REF TO cl_gui_simple_tree, lt_scarr TYPE TABLE OF scarr, ls_scarr TYPE scarr, lt_spfli TYPE TABLE OF spfli, ls_spfli TYPE spfli, lt_node TYPE TABLE OF mtreesnode, ls_node TYPE mtreesnode. START-OF-SELECTION. CALL SCREEN 0001. *&———————————————————————* *&      Module  STATUS_0001  OUTPUT *&———————————————————————* MODULE status_0001 OUTPUT. SET PF-STATUS ‘STATUS’. *  SET TITLEBAR ‘xxx’. ENDMODULE.                 ” STATUS_0001  OUTPUT *&———————————————————————* *&      Module  GET_DATA  OUTPUT *&———————————————————————* MODULE get_data OUTPUT. IF lt_scarr IS INITIAL. SELECT * FROM scarr INTO TABLE lt_scarr.

DATA :   lr_cust TYPE REF TO cl_gui_custom_container, lr_tree TYPE REF TO cl_gui_simple_tree, lt_scarr TYPE TABLE OF scarr, ls_scarr TYPE scarr, lt_node TYPE TABLE OF mtreesnode, ls_node TYPE mtreesnode. START-OF-SELECTION. CALL SCREEN 0001. *&———————————————————————* *&      Module  STATUS_0001  OUTPUT *&———————————————————————* MODULE status_0001 OUTPUT. SET PF-STATUS ‘STATUS’. *  SET TITLEBAR ‘xxx’. ENDMODULE.                 ” STATUS_0001  OUTPUT *&———————————————————————* *&      Module  GET_DATA  OUTPUT *&———————————————————————* MODULE get_data OUTPUT. IF lt_scarr IS INITIAL. SELECT * FROM scarr INTO TABLE lt_scarr. ENDIF. ENDMODULE.                 ” GET_DATA  OUTPUT *&———————————————————————*

DATA :    lr_cust TYPE REF TO cl_gui_custom_container, lr_list_tree TYPE REF TO cl_gui_list_tree, lt_flight TYPE TABLE OF scarr, ls_flight TYPE scarr, lt_spfli TYPE TABLE OF spfli, ls_spfli TYPE spfli, lt_node TYPE  treev_ntab, ls_node TYPE LINE OF treev_ntab, lt_item TYPE TABLE OF mtreeitm, ls_item TYPE mtreeitm . START-OF-SELECTION. CALL SCREEN 0001. *&———————————————————————* *&      Module  STATUS_0001  OUTPUT *&———————————————————————* MODULE status_0001 OUTPUT. SET PF-STATUS ‘LIST_STATUS’. ENDMODULE.                 ” STATUS_0001  OUTPUT *&———————————————————————* *&      Module  GET_DATA  OUTPUT *&———————————————————————* MODULE get_data OUTPUT. IF lt_flight IS INITIAL.