Screen number0002Active     
 
Attributes Element list Flow logic
txt
1
PROCESS BEFORE OUTPUT.
2
 MODULE LISTE_INITIALISIEREN.
3
 LOOP AT EXTRACT WITH CONTROL
4
  TCTRL_ZSOFTCOPY_TABLE CURSOR NEXTLINE.
5
   MODULE LISTE_SHOW_LISTE.
6
 ENDLOOP.
7
*
8
PROCESS AFTER INPUT.
9
 MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND.
10
 MODULE LISTE_BEFORE_LOOP.
11
 LOOP AT EXTRACT.
12
   MODULE LISTE_INIT_WORKAREA.
13
   CHAIN.
14
    FIELD ZSOFTCOPY_TABLE-ID .
15
    FIELD ZSOFTCOPY_TABLE-FIELDNAME .
16
    FIELD ZSOFTCOPY_TABLE-COLUMN_NR .
17
    FIELD ZSOFTCOPY_TABLE-TITLE_ELEM .
18
    FIELD ZSOFTCOPY_TABLE-LINK_COLUMN .
19
    FIELD ZSOFTCOPY_TABLE-COLUMN_DEF .
20
    FIELD ZSOFTCOPY_TABLE-COLORED_COLUMN .
21
    FIELD ZSOFTCOPY_TABLE-COMPARATOR .
22
    FIELD ZSOFTCOPY_TABLE-COMP_VALUE .
23
    MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST.
24
   ENDCHAIN.
25
   FIELD VIM_MARKED MODULE LISTE_MARK_CHECKBOX.
26
   CHAIN.
27
    FIELD ZSOFTCOPY_TABLE-ID .
28
    FIELD ZSOFTCOPY_TABLE-FIELDNAME .
29
    MODULE LISTE_UPDATE_LISTE.
30
   ENDCHAIN.
31
 ENDLOOP.
32
 MODULE LISTE_AFTER_LOOP.