Properties SourceCde
txt 
1
*&---------------------------------------------------------------------*
2
*&  Include           ZSOFTCOPY_VARIABLES                              *
3
*&                                                                     *
4
*&---------------------------------------------------------------------*
5
*&                                                                     *
6
*& This file is part of ZSOFTCOPY.                                     *
7
*&                                                                     *
8
*& ZSOFTCOPY is free software: you can redistribute it and/or modify   *
9
*& it under the terms of the GNU General Public License as published   *
10
*& by the Free Software Foundation, either version 3 of the License,   *
11
*& or any later version.                                               *
12
*&                                                                     *
13
*& ZSOFTCOPY is distributed in the hope that it will be useful,        *
14
*& but WITHOUT ANY WARRANTY; without even the implied warranty of      *
15
*& MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the       *
16
*& GNU General Public License for more details.                        *
17
*&                                                                     *
18
*& You should have received a copy of the GNU General Public License   *
19
*& along with ZDOWNLOAD. If not, see <http://www.gnu.org/licenses/>.   *
20
*&                                                                     *
21
*&---------------------------------------------------------------------*
22
*&                                                                     *
23
*&  Author:     Ruediger von Creytz     ruediger.creytz@globalbit.net  *
24
*&  Copyright:  globalBIT, LLC          http://www.globalbit.net       *
25
*&                                                                     *
26
*&---------------------------------------------------------------------*
27
 
28
 
29
DATA:
30
g_add_db_content      TYPE flag      VALUE abap_true,
31
g_add_db_format_csv   TYPE flag      VALUE abap_true,
32
g_add_db_format_xml   TYPE flag      VALUE abap_true,
33
g_add_db_max_lines    TYPE i         VALUE 500,
34
g_add_elem_ddic       TYPE flag      VALUE abap_true,
35
g_add_elem_tabl       TYPE flag      VALUE abap_true,
36
g_add_elem_view       TYPE flag      VALUE abap_true,
37
g_add_elem_ttyp       TYPE flag      VALUE abap_true,
38
g_add_elem_struc      TYPE flag      VALUE abap_true,
39
g_add_elem_dtel       TYPE flag      VALUE abap_true,
40
g_add_elem_doma       TYPE flag      VALUE abap_true,
41
g_add_elem_shlp       TYPE flag      VALUE abap_true,
42
g_add_elem_enqu       TYPE flag      VALUE abap_true,
43
g_add_elem_type       TYPE flag      VALUE abap_true,
44
g_add_elem_clslib     TYPE flag      VALUE abap_true,
45
g_add_elem_clas       TYPE flag      VALUE abap_true,
46
g_add_elem_intf       TYPE flag      VALUE abap_true,
47
g_add_elem_prog       TYPE flag      VALUE abap_true,
48
g_add_elem_fugr       TYPE flag      VALUE abap_true,
49
g_add_elem_fuba       TYPE flag      VALUE abap_true,
50
g_add_elem_scr        TYPE flag      VALUE abap_true,
51
g_add_elem_fuincl     TYPE flag      VALUE abap_true,
52
g_add_elem_incl       TYPE flag      VALUE abap_true,
53
g_add_elem_msag       TYPE flag      VALUE abap_true,
54
g_add_elem_o2appl     TYPE flag      VALUE abap_true,
55
g_add_elem_o2applbsp  TYPE flag      VALUE abap_true,
56
g_add_elem_o2applctrl TYPE flag      VALUE abap_true,
57
g_add_elem_o2applincl TYPE flag      VALUE abap_true,
58
g_add_elem_o2applmime TYPE flag      VALUE abap_true,
59
g_add_elem_o2applview TYPE flag      VALUE abap_true,
60
g_add_elem_o2taglib   TYPE flag      VALUE abap_true,
61
g_add_elem_para       TYPE flag      VALUE abap_true,
62
g_add_elem_tobj       TYPE flag      VALUE abap_true,
63
g_add_elem_tran       TYPE flag      VALUE abap_true,
64
g_add_elem_xslt       TYPE flag      VALUE abap_true,
65
g_add_sourcecode      TYPE flag      VALUE abap_true,
66
g_add_report_variants TYPE flag      VALUE abap_true,
67
g_empty_tab           TYPE c         VALUE 'D',
68
g_folder              TYPE string,
69
g_pack                TYPE devclass,
70
g_cnt_elems           TYPE i         VALUE 0,
71
g_cnt_downloads       TYPE i         VALUE 0,
72
g_cnt_link_leaves     type num10,
73
 
74
*must be initial
75
gt_link               TYPE it_link,
76
*download database contents (all packages)
77
gt_tadir              TYPE STANDARD TABLE OF tadir,
78
*download elements
79
gt_ztadir             TYPE it_ztadir,
80
*download class methods
81
gt_zseomethod         TYPE it_zseomethod,
82
gt_tdevc              TYPE STANDARD TABLE OF tdevc,
83
gs_tdevc              TYPE tdevc,
84
gt_table_structure    TYPE it_table_structure,
85
gt_tabstrip           TYPE it_tabstrip,
86
gt_text_element       TYPE it_text_element,
87
gt_text_element_t     TYPE it_text_element_t,
88
gt_varid_broken       TYPE it_varid,
89
*suppress transfer status from GUI_DOWNLOAD
90
g_has_download_status TYPE flag.
91
 
92
CONSTANTS:
93
gc_delimiter          TYPE c         VALUE '\',
94
gc_empty_tab_disable  TYPE c         VALUE 'D',
95
gc_empty_tab_display  TYPE c         VALUE 'N',
96
gc_empty_tab_hide     TYPE c         VALUE 'H',
97
gc_extension_csv      TYPE char3     VALUE 'csv',
98
gc_extension_htm      TYPE char3     VALUE 'htm',
99
gc_extension_txt      TYPE char3     VALUE 'txt',
100
gc_extension_xml      TYPE char3     VALUE 'xml',
101
gc_extension_xsl      TYPE char3     VALUE 'xsl',
102
gc_futype_group       TYPE c         VALUE 'G',
103
gc_futype_include     TYPE c         VALUE 'I',
104
gc_futype_screen      TYPE c         VALUE 'S',
105
gc_futype_module      TYPE c         VALUE 'M',
106
gc_o2type_bsp         TYPE c         VALUE ' ',
107
gc_o2type_ctrl        TYPE c         VALUE 'C',
108
gc_o2type_incl        TYPE c         VALUE 'X',
109
gc_o2type_mime        TYPE c         VALUE 'M',
110
gc_o2type_tag         TYPE c         VALUE 'T',
111
gc_o2type_view        TYPE c         VALUE 'V',
112
gc_subrc_deselected   TYPE sysubrc   VALUE 97,
113
gc_subrc_do_not_add   TYPE sysubrc   VALUE 98,
114
gc_subrc_not_found    TYPE sysubrc   VALUE 99,
115
gc_src_max_rows       TYPE i         VALUE 16000,
116
gc_tcode_dialog       TYPE c         VALUE 'D',
117
gc_tcode_object       TYPE c         VALUE 'O',
118
gc_tcode_parameter    TYPE c         VALUE 'P',
119
gc_tcode_report       TYPE c         VALUE 'R',
120
gc_tcode_variant      TYPE c         VALUE 'V'.
121
 
122
TABLES:
123
dd02l,
124
tdevc,
125
sscrfields.
126
 
127
 
128
*-----------------------------------------------------------------------
129
* form: init
130
*-----------------------------------------------------------------------
131
FORM init.
132
  REFRESH:
133
  gt_ztadir,
134
  gt_zseomethod.
135
 
136
  g_cnt_elems = 0.
137
  g_cnt_downloads = 0.
138
ENDFORM.                    "init