Properties | SourceCde
Title | SoftCopy - variables |
Original language | DE | Englisch
Created | 04.01.2013 |  | CREYTZ |
Last changed by | 01.03.2021 |  | CREYTZ |
Status | Active |
Attributes
Type | INCLUDE program |
Status | Customer production program |
Application |  |
Authorization Group |  |
Package | ZSOFTCOPY | SoftCopy
| Editor lock
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