AT SELECTION SCREEN

AT SELECTION-SCREEN OUTPUT

"*  SELECTION-SCREEN COMMENT /1(79) note MODIF ID int.
 LOOP AT SCREEN.
   IF screen-group1 = 'INT'.
     screen-intensified = 1.
   ENDIF.
   MODIFY SCREEN.
 ENDLOOP.

AT SELECTION-SCREEN ON p_xyz.

IF p_xyz IS INITIAL.
 MESSAGE e003(zbc_general).
ENDIF.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_xyz.

 TRY.
     p_doshow = .
     p_dodown = .
     IF p_doshow <> abap_true AND p_dodown <> abap_true.
       gv_title = 'Download file selection for template'(001).
       cl_gui_frontend_services=>file_open_dialog( EXPORTING window_title = gv_title
                                                   CHANGING file_table  = gt_filename
                                                            rc          = gv_cnt
                                                            user_action = gv_action ).
       IF gv_cnt > 1.
         MESSAGE e062(cacsib_edt).
       ELSE.
         IF NOT gv_cnt < 1.
           READ TABLE gt_filename INTO p_up INDEX 1.
         ENDIF.
       ENDIF.
     ENDIF.
   CATCH zcx_bc_basic INTO go_cx_bc_basic.
     gs_message_bal_msg = go_cx_bc_basic->get_msg_in_bal_structure( ).
     APPEND gs_message_bal_msg TO gt_messages_bal_msg.
 ENDTRY.