Programa de inicializaçao do VTIN
This commit is contained in:
34
src/zbos_initi_vtin.prog.abap
Normal file
34
src/zbos_initi_vtin.prog.abap
Normal file
@@ -0,0 +1,34 @@
|
|||||||
|
*&---------------------------------------------------------------------*
|
||||||
|
*& Report ZBOS_INITI_VTIN
|
||||||
|
*&---------------------------------------------------------------------*
|
||||||
|
*&
|
||||||
|
*&---------------------------------------------------------------------*
|
||||||
|
REPORT zbos_initi_vtin.
|
||||||
|
|
||||||
|
|
||||||
|
*TR_INSERT_REQUEST_WITH_TASKS
|
||||||
|
|
||||||
|
*----------------------------------------------------------------------
|
||||||
|
* Declarações Globais
|
||||||
|
*----------------------------------------------------------------------
|
||||||
|
INCLUDE zbos_initi_vtin_top.
|
||||||
|
|
||||||
|
*----------------------------------------------------------------------
|
||||||
|
* Selection Screen
|
||||||
|
*----------------------------------------------------------------------
|
||||||
|
INCLUDE zbos_initi_vtin_scr.
|
||||||
|
|
||||||
|
*----------------------------------------------------------------------
|
||||||
|
* Classes locais
|
||||||
|
*----------------------------------------------------------------------
|
||||||
|
INCLUDE zbos_initi_vtin_i01.
|
||||||
|
|
||||||
|
*----------------------------------------------------------------------
|
||||||
|
* Start of Selection
|
||||||
|
*----------------------------------------------------------------------
|
||||||
|
INCLUDE zbos_initi_vtin_start.
|
||||||
|
|
||||||
|
*----------------------------------------------------------------------
|
||||||
|
* Perform
|
||||||
|
*----------------------------------------------------------------------
|
||||||
|
INCLUDE zbos_initi_vtin_f01.
|
||||||
21
src/zbos_initi_vtin.prog.xml
Normal file
21
src/zbos_initi_vtin.prog.xml
Normal file
@@ -0,0 +1,21 @@
|
|||||||
|
<?xml version="1.0" encoding="utf-8"?>
|
||||||
|
<abapGit version="v1.0.0" serializer="LCL_OBJECT_PROG" serializer_version="v1.0.0">
|
||||||
|
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||||
|
<asx:values>
|
||||||
|
<PROGDIR>
|
||||||
|
<NAME>ZBOS_INITI_VTIN</NAME>
|
||||||
|
<SUBC>1</SUBC>
|
||||||
|
<RLOAD>E</RLOAD>
|
||||||
|
<FIXPT>X</FIXPT>
|
||||||
|
<UCCHECK>X</UCCHECK>
|
||||||
|
</PROGDIR>
|
||||||
|
<TPOOL>
|
||||||
|
<item>
|
||||||
|
<ID>R</ID>
|
||||||
|
<ENTRY>Inicializaçao do VTIN</ENTRY>
|
||||||
|
<LENGTH>21</LENGTH>
|
||||||
|
</item>
|
||||||
|
</TPOOL>
|
||||||
|
</asx:values>
|
||||||
|
</asx:abap>
|
||||||
|
</abapGit>
|
||||||
3
src/zbos_initi_vtin_f01.prog.abap
Normal file
3
src/zbos_initi_vtin_f01.prog.abap
Normal file
@@ -0,0 +1,3 @@
|
|||||||
|
*&---------------------------------------------------------------------*
|
||||||
|
*& Include ZBOS_INITI_VTIN_F01
|
||||||
|
*&---------------------------------------------------------------------*
|
||||||
20
src/zbos_initi_vtin_f01.prog.xml
Normal file
20
src/zbos_initi_vtin_f01.prog.xml
Normal file
@@ -0,0 +1,20 @@
|
|||||||
|
<?xml version="1.0" encoding="utf-8"?>
|
||||||
|
<abapGit version="v1.0.0" serializer="LCL_OBJECT_PROG" serializer_version="v1.0.0">
|
||||||
|
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||||
|
<asx:values>
|
||||||
|
<PROGDIR>
|
||||||
|
<NAME>ZBOS_INITI_VTIN_F01</NAME>
|
||||||
|
<SUBC>I</SUBC>
|
||||||
|
<RLOAD>E</RLOAD>
|
||||||
|
<UCCHECK>X</UCCHECK>
|
||||||
|
</PROGDIR>
|
||||||
|
<TPOOL>
|
||||||
|
<item>
|
||||||
|
<ID>R</ID>
|
||||||
|
<ENTRY>Include ZBOS_INITI_VTIN_F01</ENTRY>
|
||||||
|
<LENGTH>27</LENGTH>
|
||||||
|
</item>
|
||||||
|
</TPOOL>
|
||||||
|
</asx:values>
|
||||||
|
</asx:abap>
|
||||||
|
</abapGit>
|
||||||
3
src/zbos_initi_vtin_i01.prog.abap
Normal file
3
src/zbos_initi_vtin_i01.prog.abap
Normal file
@@ -0,0 +1,3 @@
|
|||||||
|
*&---------------------------------------------------------------------*
|
||||||
|
*& Include ZBOS_INITI_VTIN_I01
|
||||||
|
*&---------------------------------------------------------------------*
|
||||||
20
src/zbos_initi_vtin_i01.prog.xml
Normal file
20
src/zbos_initi_vtin_i01.prog.xml
Normal file
@@ -0,0 +1,20 @@
|
|||||||
|
<?xml version="1.0" encoding="utf-8"?>
|
||||||
|
<abapGit version="v1.0.0" serializer="LCL_OBJECT_PROG" serializer_version="v1.0.0">
|
||||||
|
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||||
|
<asx:values>
|
||||||
|
<PROGDIR>
|
||||||
|
<NAME>ZBOS_INITI_VTIN_I01</NAME>
|
||||||
|
<SUBC>I</SUBC>
|
||||||
|
<RLOAD>E</RLOAD>
|
||||||
|
<UCCHECK>X</UCCHECK>
|
||||||
|
</PROGDIR>
|
||||||
|
<TPOOL>
|
||||||
|
<item>
|
||||||
|
<ID>R</ID>
|
||||||
|
<ENTRY>Include ZBOS_INITI_VTIN_I01</ENTRY>
|
||||||
|
<LENGTH>27</LENGTH>
|
||||||
|
</item>
|
||||||
|
</TPOOL>
|
||||||
|
</asx:values>
|
||||||
|
</asx:abap>
|
||||||
|
</abapGit>
|
||||||
3
src/zbos_initi_vtin_scr.prog.abap
Normal file
3
src/zbos_initi_vtin_scr.prog.abap
Normal file
@@ -0,0 +1,3 @@
|
|||||||
|
*&---------------------------------------------------------------------*
|
||||||
|
*& Include ZBOS_INITI_VTIN_SCR
|
||||||
|
*&---------------------------------------------------------------------*
|
||||||
20
src/zbos_initi_vtin_scr.prog.xml
Normal file
20
src/zbos_initi_vtin_scr.prog.xml
Normal file
@@ -0,0 +1,20 @@
|
|||||||
|
<?xml version="1.0" encoding="utf-8"?>
|
||||||
|
<abapGit version="v1.0.0" serializer="LCL_OBJECT_PROG" serializer_version="v1.0.0">
|
||||||
|
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||||
|
<asx:values>
|
||||||
|
<PROGDIR>
|
||||||
|
<NAME>ZBOS_INITI_VTIN_SCR</NAME>
|
||||||
|
<SUBC>I</SUBC>
|
||||||
|
<RLOAD>E</RLOAD>
|
||||||
|
<UCCHECK>X</UCCHECK>
|
||||||
|
</PROGDIR>
|
||||||
|
<TPOOL>
|
||||||
|
<item>
|
||||||
|
<ID>R</ID>
|
||||||
|
<ENTRY>Include ZBOS_INITI_VTIN_SCR</ENTRY>
|
||||||
|
<LENGTH>27</LENGTH>
|
||||||
|
</item>
|
||||||
|
</TPOOL>
|
||||||
|
</asx:values>
|
||||||
|
</asx:abap>
|
||||||
|
</abapGit>
|
||||||
3
src/zbos_initi_vtin_start.prog.abap
Normal file
3
src/zbos_initi_vtin_start.prog.abap
Normal file
@@ -0,0 +1,3 @@
|
|||||||
|
*&---------------------------------------------------------------------*
|
||||||
|
*& Include ZBOS_INITI_VTIN_START
|
||||||
|
*&---------------------------------------------------------------------*
|
||||||
20
src/zbos_initi_vtin_start.prog.xml
Normal file
20
src/zbos_initi_vtin_start.prog.xml
Normal file
@@ -0,0 +1,20 @@
|
|||||||
|
<?xml version="1.0" encoding="utf-8"?>
|
||||||
|
<abapGit version="v1.0.0" serializer="LCL_OBJECT_PROG" serializer_version="v1.0.0">
|
||||||
|
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||||
|
<asx:values>
|
||||||
|
<PROGDIR>
|
||||||
|
<NAME>ZBOS_INITI_VTIN_START</NAME>
|
||||||
|
<SUBC>I</SUBC>
|
||||||
|
<RLOAD>E</RLOAD>
|
||||||
|
<UCCHECK>X</UCCHECK>
|
||||||
|
</PROGDIR>
|
||||||
|
<TPOOL>
|
||||||
|
<item>
|
||||||
|
<ID>R</ID>
|
||||||
|
<ENTRY>Include ZBOS_INITI_VTIN_START</ENTRY>
|
||||||
|
<LENGTH>29</LENGTH>
|
||||||
|
</item>
|
||||||
|
</TPOOL>
|
||||||
|
</asx:values>
|
||||||
|
</asx:abap>
|
||||||
|
</abapGit>
|
||||||
3
src/zbos_initi_vtin_top.prog.abap
Normal file
3
src/zbos_initi_vtin_top.prog.abap
Normal file
@@ -0,0 +1,3 @@
|
|||||||
|
*&---------------------------------------------------------------------*
|
||||||
|
*& Include ZBOS_INITI_VTIN_TOP
|
||||||
|
*&---------------------------------------------------------------------*
|
||||||
20
src/zbos_initi_vtin_top.prog.xml
Normal file
20
src/zbos_initi_vtin_top.prog.xml
Normal file
@@ -0,0 +1,20 @@
|
|||||||
|
<?xml version="1.0" encoding="utf-8"?>
|
||||||
|
<abapGit version="v1.0.0" serializer="LCL_OBJECT_PROG" serializer_version="v1.0.0">
|
||||||
|
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||||
|
<asx:values>
|
||||||
|
<PROGDIR>
|
||||||
|
<NAME>ZBOS_INITI_VTIN_TOP</NAME>
|
||||||
|
<SUBC>I</SUBC>
|
||||||
|
<RLOAD>E</RLOAD>
|
||||||
|
<UCCHECK>X</UCCHECK>
|
||||||
|
</PROGDIR>
|
||||||
|
<TPOOL>
|
||||||
|
<item>
|
||||||
|
<ID>R</ID>
|
||||||
|
<ENTRY>Include ZBOS_INITI_VTIN_TOP</ENTRY>
|
||||||
|
<LENGTH>27</LENGTH>
|
||||||
|
</item>
|
||||||
|
</TPOOL>
|
||||||
|
</asx:values>
|
||||||
|
</asx:abap>
|
||||||
|
</abapGit>
|
||||||
@@ -18,8 +18,13 @@ FORM f_processo_principal .
|
|||||||
BREAK-POINT.
|
BREAK-POINT.
|
||||||
|
|
||||||
* DATA: lt_dados TYPE TABLE OF e071.
|
* DATA: lt_dados TYPE TABLE OF e071.
|
||||||
|
DATA: lv_request TYPE trkorr.
|
||||||
|
|
||||||
|
CALL FUNCTION 'TR_REQUEST_CHOICE'
|
||||||
|
EXPORTING
|
||||||
|
iv_category = 'SYST'
|
||||||
|
IMPORTING
|
||||||
|
ev_request = lv_request.
|
||||||
SELECT *
|
SELECT *
|
||||||
FROM e071
|
FROM e071
|
||||||
INTO TABLE @DATA(lt_dados)
|
INTO TABLE @DATA(lt_dados)
|
||||||
@@ -47,7 +52,7 @@ FORM f_processo_principal .
|
|||||||
SELECT *
|
SELECT *
|
||||||
FROM e071
|
FROM e071
|
||||||
INTO TABLE lt_dados2
|
INTO TABLE lt_dados2
|
||||||
WHERE trkorr = 'DESK968145'.
|
WHERE trkorr = 'A4HK900111'.
|
||||||
|
|
||||||
SELECT *
|
SELECT *
|
||||||
FROM e071
|
FROM e071
|
||||||
|
|||||||
6
src/zbos_teste.fugr.lzbos_testef00.abap
Normal file
6
src/zbos_teste.fugr.lzbos_testef00.abap
Normal file
@@ -0,0 +1,6 @@
|
|||||||
|
*---------------------------------------------------------------------*
|
||||||
|
* view related FORM routines
|
||||||
|
*---------------------------------------------------------------------*
|
||||||
|
|
||||||
|
* base table related FORM-routines.............
|
||||||
|
INCLUDE LSVIMFTX .
|
||||||
19
src/zbos_teste.fugr.lzbos_testef00.xml
Normal file
19
src/zbos_teste.fugr.lzbos_testef00.xml
Normal file
@@ -0,0 +1,19 @@
|
|||||||
|
<?xml version="1.0" encoding="utf-8"?>
|
||||||
|
<abapGit version="v1.0.0">
|
||||||
|
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||||
|
<asx:values>
|
||||||
|
<PROGDIR>
|
||||||
|
<NAME>LZBOS_TESTEF00</NAME>
|
||||||
|
<SQLX>X</SQLX>
|
||||||
|
<DBAPL>S</DBAPL>
|
||||||
|
<DBNA>D$</DBNA>
|
||||||
|
<SUBC>I</SUBC>
|
||||||
|
<APPL>S</APPL>
|
||||||
|
<RLOAD>E</RLOAD>
|
||||||
|
<FIXPT>X</FIXPT>
|
||||||
|
<LDBNAME>D$S</LDBNAME>
|
||||||
|
<UCCHECK>X</UCCHECK>
|
||||||
|
</PROGDIR>
|
||||||
|
</asx:values>
|
||||||
|
</asx:abap>
|
||||||
|
</abapGit>
|
||||||
5
src/zbos_teste.fugr.lzbos_testei00.abap
Normal file
5
src/zbos_teste.fugr.lzbos_testei00.abap
Normal file
@@ -0,0 +1,5 @@
|
|||||||
|
*---------------------------------------------------------------------*
|
||||||
|
* view related PAI modules
|
||||||
|
*---------------------------------------------------------------------*
|
||||||
|
|
||||||
|
INCLUDE LSVIMITX . "base table related PAI modules
|
||||||
19
src/zbos_teste.fugr.lzbos_testei00.xml
Normal file
19
src/zbos_teste.fugr.lzbos_testei00.xml
Normal file
@@ -0,0 +1,19 @@
|
|||||||
|
<?xml version="1.0" encoding="utf-8"?>
|
||||||
|
<abapGit version="v1.0.0">
|
||||||
|
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||||
|
<asx:values>
|
||||||
|
<PROGDIR>
|
||||||
|
<NAME>LZBOS_TESTEI00</NAME>
|
||||||
|
<SQLX>X</SQLX>
|
||||||
|
<DBAPL>S</DBAPL>
|
||||||
|
<DBNA>D$</DBNA>
|
||||||
|
<SUBC>I</SUBC>
|
||||||
|
<APPL>S</APPL>
|
||||||
|
<RLOAD>E</RLOAD>
|
||||||
|
<FIXPT>X</FIXPT>
|
||||||
|
<LDBNAME>D$S</LDBNAME>
|
||||||
|
<UCCHECK>X</UCCHECK>
|
||||||
|
</PROGDIR>
|
||||||
|
</asx:values>
|
||||||
|
</asx:abap>
|
||||||
|
</abapGit>
|
||||||
15
src/zbos_teste.fugr.lzbos_testet00.abap
Normal file
15
src/zbos_teste.fugr.lzbos_testet00.abap
Normal file
@@ -0,0 +1,15 @@
|
|||||||
|
*---------------------------------------------------------------------*
|
||||||
|
* view related data declarations
|
||||||
|
*---------------------------------------------------------------------*
|
||||||
|
*...processing: ZBOS_TESTE......................................*
|
||||||
|
DATA: BEGIN OF STATUS_ZBOS_TESTE . "state vector
|
||||||
|
INCLUDE STRUCTURE VIMSTATUS.
|
||||||
|
DATA: END OF STATUS_ZBOS_TESTE .
|
||||||
|
CONTROLS: TCTRL_ZBOS_TESTE
|
||||||
|
TYPE TABLEVIEW USING SCREEN '0001'.
|
||||||
|
*.........table declarations:.................................*
|
||||||
|
TABLES: *ZBOS_TESTE .
|
||||||
|
TABLES: ZBOS_TESTE .
|
||||||
|
|
||||||
|
* general table data declarations..............
|
||||||
|
INCLUDE LSVIMTDT .
|
||||||
18
src/zbos_teste.fugr.lzbos_testet00.xml
Normal file
18
src/zbos_teste.fugr.lzbos_testet00.xml
Normal file
@@ -0,0 +1,18 @@
|
|||||||
|
<?xml version="1.0" encoding="utf-8"?>
|
||||||
|
<abapGit version="v1.0.0">
|
||||||
|
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||||
|
<asx:values>
|
||||||
|
<PROGDIR>
|
||||||
|
<NAME>LZBOS_TESTET00</NAME>
|
||||||
|
<DBAPL>S</DBAPL>
|
||||||
|
<DBNA>D$</DBNA>
|
||||||
|
<SUBC>I</SUBC>
|
||||||
|
<APPL>S</APPL>
|
||||||
|
<RLOAD>E</RLOAD>
|
||||||
|
<FIXPT>X</FIXPT>
|
||||||
|
<LDBNAME>D$S</LDBNAME>
|
||||||
|
<UCCHECK>X</UCCHECK>
|
||||||
|
</PROGDIR>
|
||||||
|
</asx:values>
|
||||||
|
</asx:abap>
|
||||||
|
</abapGit>
|
||||||
5
src/zbos_teste.fugr.lzbos_testetop.abap
Normal file
5
src/zbos_teste.fugr.lzbos_testetop.abap
Normal file
@@ -0,0 +1,5 @@
|
|||||||
|
FUNCTION-POOL ZBOS_TESTE MESSAGE-ID SV.
|
||||||
|
|
||||||
|
* INCLUDE LZBOS_TESTED... " Local class definition
|
||||||
|
INCLUDE LSVIMDAT . "general data decl.
|
||||||
|
INCLUDE LZBOS_TESTET00 . "view rel. data dcl.
|
||||||
17
src/zbos_teste.fugr.lzbos_testetop.xml
Normal file
17
src/zbos_teste.fugr.lzbos_testetop.xml
Normal file
@@ -0,0 +1,17 @@
|
|||||||
|
<?xml version="1.0" encoding="utf-8"?>
|
||||||
|
<abapGit version="v1.0.0">
|
||||||
|
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||||
|
<asx:values>
|
||||||
|
<PROGDIR>
|
||||||
|
<NAME>LZBOS_TESTETOP</NAME>
|
||||||
|
<DBAPL>S</DBAPL>
|
||||||
|
<DBNA>D$</DBNA>
|
||||||
|
<SUBC>I</SUBC>
|
||||||
|
<APPL>S</APPL>
|
||||||
|
<FIXPT>X</FIXPT>
|
||||||
|
<LDBNAME>D$S</LDBNAME>
|
||||||
|
<UCCHECK>X</UCCHECK>
|
||||||
|
</PROGDIR>
|
||||||
|
</asx:values>
|
||||||
|
</asx:abap>
|
||||||
|
</abapGit>
|
||||||
20
src/zbos_teste.fugr.saplzbos_teste.abap
Normal file
20
src/zbos_teste.fugr.saplzbos_teste.abap
Normal file
@@ -0,0 +1,20 @@
|
|||||||
|
*******************************************************************
|
||||||
|
* System-defined Include-files. *
|
||||||
|
*******************************************************************
|
||||||
|
INCLUDE LZBOS_TESTETOP. " Global Declarations
|
||||||
|
INCLUDE LZBOS_TESTEUXX. " Function Modules
|
||||||
|
|
||||||
|
*******************************************************************
|
||||||
|
* User-defined Include-files (if necessary). *
|
||||||
|
*******************************************************************
|
||||||
|
* INCLUDE LZBOS_TESTEF... " Subroutines
|
||||||
|
* INCLUDE LZBOS_TESTEO... " PBO-Modules
|
||||||
|
* INCLUDE LZBOS_TESTEI... " PAI-Modules
|
||||||
|
* INCLUDE LZBOS_TESTEE... " Events
|
||||||
|
* INCLUDE LZBOS_TESTEP... " Local class implement.
|
||||||
|
* INCLUDE LZBOS_TESTET99. " ABAP Unit tests
|
||||||
|
INCLUDE LZBOS_TESTEF00 . " subprograms
|
||||||
|
INCLUDE LZBOS_TESTEI00 . " PAI modules
|
||||||
|
INCLUDE LSVIMFXX . " subprograms
|
||||||
|
INCLUDE LSVIMOXX . " PBO modules
|
||||||
|
INCLUDE LSVIMIXX . " PAI modules
|
||||||
19
src/zbos_teste.fugr.saplzbos_teste.xml
Normal file
19
src/zbos_teste.fugr.saplzbos_teste.xml
Normal file
@@ -0,0 +1,19 @@
|
|||||||
|
<?xml version="1.0" encoding="utf-8"?>
|
||||||
|
<abapGit version="v1.0.0">
|
||||||
|
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||||
|
<asx:values>
|
||||||
|
<PROGDIR>
|
||||||
|
<NAME>SAPLZBOS_TESTE</NAME>
|
||||||
|
<SQLX>X</SQLX>
|
||||||
|
<DBAPL>S</DBAPL>
|
||||||
|
<DBNA>D$</DBNA>
|
||||||
|
<SUBC>F</SUBC>
|
||||||
|
<APPL>S</APPL>
|
||||||
|
<RLOAD>E</RLOAD>
|
||||||
|
<FIXPT>X</FIXPT>
|
||||||
|
<LDBNAME>D$S</LDBNAME>
|
||||||
|
<UCCHECK>X</UCCHECK>
|
||||||
|
</PROGDIR>
|
||||||
|
</asx:values>
|
||||||
|
</asx:abap>
|
||||||
|
</abapGit>
|
||||||
10
src/zbos_teste.fugr.tableframe_zbos_teste.abap
Normal file
10
src/zbos_teste.fugr.tableframe_zbos_teste.abap
Normal file
@@ -0,0 +1,10 @@
|
|||||||
|
*---------------------------------------------------------------------*
|
||||||
|
* program for: TABLEFRAME_ZBOS_TESTE
|
||||||
|
*---------------------------------------------------------------------*
|
||||||
|
FUNCTION TABLEFRAME_ZBOS_TESTE .
|
||||||
|
|
||||||
|
PERFORM TABLEFRAME TABLES X_HEADER X_NAMTAB DBA_SELLIST DPL_SELLIST
|
||||||
|
EXCL_CUA_FUNCT
|
||||||
|
USING CORR_NUMBER VIEW_ACTION VIEW_NAME.
|
||||||
|
|
||||||
|
ENDFUNCTION.
|
||||||
8
src/zbos_teste.fugr.tableproc_zbos_teste.abap
Normal file
8
src/zbos_teste.fugr.tableproc_zbos_teste.abap
Normal file
@@ -0,0 +1,8 @@
|
|||||||
|
*---------------------------------------------------------------------*
|
||||||
|
* program for: TABLEPROC_ZBOS_TESTE
|
||||||
|
*---------------------------------------------------------------------*
|
||||||
|
FUNCTION TABLEPROC_ZBOS_TESTE .
|
||||||
|
|
||||||
|
PERFORM TABLEPROC.
|
||||||
|
|
||||||
|
ENDFUNCTION.
|
||||||
535
src/zbos_teste.fugr.xml
Normal file
535
src/zbos_teste.fugr.xml
Normal file
@@ -0,0 +1,535 @@
|
|||||||
|
<?xml version="1.0" encoding="utf-8"?>
|
||||||
|
<abapGit version="v1.0.0" serializer="LCL_OBJECT_FUGR" serializer_version="v1.0.0">
|
||||||
|
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||||
|
<asx:values>
|
||||||
|
<AREAT>Extended Table Maintenance (Generated)</AREAT>
|
||||||
|
<INCLUDES>
|
||||||
|
<SOBJ_NAME>LZBOS_TESTEF00</SOBJ_NAME>
|
||||||
|
<SOBJ_NAME>LZBOS_TESTEI00</SOBJ_NAME>
|
||||||
|
<SOBJ_NAME>LZBOS_TESTET00</SOBJ_NAME>
|
||||||
|
<SOBJ_NAME>LZBOS_TESTETOP</SOBJ_NAME>
|
||||||
|
<SOBJ_NAME>SAPLZBOS_TESTE</SOBJ_NAME>
|
||||||
|
</INCLUDES>
|
||||||
|
<FUNCTIONS>
|
||||||
|
<item>
|
||||||
|
<FUNCNAME>TABLEFRAME_ZBOS_TESTE</FUNCNAME>
|
||||||
|
<SHORT_TEXT>Upper-level extended table maintenance</SHORT_TEXT>
|
||||||
|
<IMPORT>
|
||||||
|
<RSIMP>
|
||||||
|
<PARAMETER>VIEW_ACTION</PARAMETER>
|
||||||
|
<DEFAULT>'S'</DEFAULT>
|
||||||
|
</RSIMP>
|
||||||
|
<RSIMP>
|
||||||
|
<PARAMETER>VIEW_NAME</PARAMETER>
|
||||||
|
<DBFIELD>DD02V-TABNAME</DBFIELD>
|
||||||
|
</RSIMP>
|
||||||
|
<RSIMP>
|
||||||
|
<PARAMETER>CORR_NUMBER</PARAMETER>
|
||||||
|
<DBFIELD>E070-TRKORR</DBFIELD>
|
||||||
|
<DEFAULT>' '</DEFAULT>
|
||||||
|
</RSIMP>
|
||||||
|
</IMPORT>
|
||||||
|
<TABLES>
|
||||||
|
<RSTBL>
|
||||||
|
<PARAMETER>DBA_SELLIST</PARAMETER>
|
||||||
|
<DBSTRUCT>VIMSELLIST</DBSTRUCT>
|
||||||
|
</RSTBL>
|
||||||
|
<RSTBL>
|
||||||
|
<PARAMETER>DPL_SELLIST</PARAMETER>
|
||||||
|
<DBSTRUCT>VIMSELLIST</DBSTRUCT>
|
||||||
|
</RSTBL>
|
||||||
|
<RSTBL>
|
||||||
|
<PARAMETER>EXCL_CUA_FUNCT</PARAMETER>
|
||||||
|
<DBSTRUCT>VIMEXCLFUN</DBSTRUCT>
|
||||||
|
</RSTBL>
|
||||||
|
<RSTBL>
|
||||||
|
<PARAMETER>X_HEADER</PARAMETER>
|
||||||
|
<DBSTRUCT>VIMDESC</DBSTRUCT>
|
||||||
|
</RSTBL>
|
||||||
|
<RSTBL>
|
||||||
|
<PARAMETER>X_NAMTAB</PARAMETER>
|
||||||
|
<DBSTRUCT>VIMNAMTAB</DBSTRUCT>
|
||||||
|
</RSTBL>
|
||||||
|
</TABLES>
|
||||||
|
<EXCEPTION>
|
||||||
|
<RSEXC>
|
||||||
|
<EXCEPTION>MISSING_CORR_NUMBER</EXCEPTION>
|
||||||
|
</RSEXC>
|
||||||
|
</EXCEPTION>
|
||||||
|
<DOCUMENTATION>
|
||||||
|
<RSFDO>
|
||||||
|
<PARAMETER>VIEW_ACTION</PARAMETER>
|
||||||
|
<KIND>P</KIND>
|
||||||
|
<STEXT>Aktion mit Tabelle: anz./änd./transp. (S/U/T)</STEXT>
|
||||||
|
</RSFDO>
|
||||||
|
<RSFDO>
|
||||||
|
<PARAMETER>VIEW_NAME</PARAMETER>
|
||||||
|
<KIND>P</KIND>
|
||||||
|
<STEXT>Name der Tabelle</STEXT>
|
||||||
|
</RSFDO>
|
||||||
|
<RSFDO>
|
||||||
|
<PARAMETER>CORR_NUMBER</PARAMETER>
|
||||||
|
<KIND>P</KIND>
|
||||||
|
<STEXT>Korrekturnummer für durchgeführte Änderungen</STEXT>
|
||||||
|
</RSFDO>
|
||||||
|
<RSFDO>
|
||||||
|
<PARAMETER>DBA_SELLIST</PARAMETER>
|
||||||
|
<KIND>P</KIND>
|
||||||
|
<STEXT>Selektionsbedingungen für den DB-Zugriff</STEXT>
|
||||||
|
</RSFDO>
|
||||||
|
<RSFDO>
|
||||||
|
<PARAMETER>DPL_SELLIST</PARAMETER>
|
||||||
|
<KIND>P</KIND>
|
||||||
|
<STEXT>Selektionsbedingungen für die Anzeige</STEXT>
|
||||||
|
</RSFDO>
|
||||||
|
<RSFDO>
|
||||||
|
<PARAMETER>EXCL_CUA_FUNCT</PARAMETER>
|
||||||
|
<KIND>P</KIND>
|
||||||
|
<STEXT>Tabelle mit dynam. zu deaktivierenden CUA-Funkt.</STEXT>
|
||||||
|
</RSFDO>
|
||||||
|
<RSFDO>
|
||||||
|
<PARAMETER>X_HEADER</PARAMETER>
|
||||||
|
<KIND>P</KIND>
|
||||||
|
<STEXT>Kontrollblocktabelle für die Tabelle</STEXT>
|
||||||
|
</RSFDO>
|
||||||
|
<RSFDO>
|
||||||
|
<PARAMETER>X_NAMTAB</PARAMETER>
|
||||||
|
<KIND>P</KIND>
|
||||||
|
<STEXT>Kontrollblocktabelle für die Tabellen-Felder</STEXT>
|
||||||
|
</RSFDO>
|
||||||
|
<RSFDO>
|
||||||
|
<PARAMETER>MISSING_CORR_NUMBER</PARAMETER>
|
||||||
|
<KIND>X</KIND>
|
||||||
|
<STEXT>Korrekturnummer fehlt</STEXT>
|
||||||
|
</RSFDO>
|
||||||
|
</DOCUMENTATION>
|
||||||
|
</item>
|
||||||
|
<item>
|
||||||
|
<FUNCNAME>TABLEPROC_ZBOS_TESTE</FUNCNAME>
|
||||||
|
<GLOBAL_FLAG>X</GLOBAL_FLAG>
|
||||||
|
<SHORT_TEXT>Lower-level extended table maintenance</SHORT_TEXT>
|
||||||
|
<IMPORT>
|
||||||
|
<RSIMP>
|
||||||
|
<PARAMETER>FCODE</PARAMETER>
|
||||||
|
<DEFAULT>'RDED'</DEFAULT>
|
||||||
|
</RSIMP>
|
||||||
|
<RSIMP>
|
||||||
|
<PARAMETER>VIEW_ACTION</PARAMETER>
|
||||||
|
<DEFAULT>'S'</DEFAULT>
|
||||||
|
</RSIMP>
|
||||||
|
<RSIMP>
|
||||||
|
<PARAMETER>VIEW_NAME</PARAMETER>
|
||||||
|
<DBFIELD>DD02V-TABNAME</DBFIELD>
|
||||||
|
</RSIMP>
|
||||||
|
<RSIMP>
|
||||||
|
<PARAMETER>CORR_NUMBER</PARAMETER>
|
||||||
|
<DBFIELD>E070-TRKORR</DBFIELD>
|
||||||
|
<DEFAULT>' '</DEFAULT>
|
||||||
|
</RSIMP>
|
||||||
|
</IMPORT>
|
||||||
|
<EXPORT>
|
||||||
|
<RSEXP>
|
||||||
|
<PARAMETER>LAST_ACT_ENTRY</PARAMETER>
|
||||||
|
</RSEXP>
|
||||||
|
<RSEXP>
|
||||||
|
<PARAMETER>UCOMM</PARAMETER>
|
||||||
|
</RSEXP>
|
||||||
|
<RSEXP>
|
||||||
|
<PARAMETER>UPDATE_REQUIRED</PARAMETER>
|
||||||
|
</RSEXP>
|
||||||
|
</EXPORT>
|
||||||
|
<TABLES>
|
||||||
|
<RSTBL>
|
||||||
|
<PARAMETER>CORR_KEYTAB</PARAMETER>
|
||||||
|
<DBSTRUCT>E071K</DBSTRUCT>
|
||||||
|
</RSTBL>
|
||||||
|
<RSTBL>
|
||||||
|
<PARAMETER>DBA_SELLIST</PARAMETER>
|
||||||
|
<DBSTRUCT>VIMSELLIST</DBSTRUCT>
|
||||||
|
</RSTBL>
|
||||||
|
<RSTBL>
|
||||||
|
<PARAMETER>DPL_SELLIST</PARAMETER>
|
||||||
|
<DBSTRUCT>VIMSELLIST</DBSTRUCT>
|
||||||
|
</RSTBL>
|
||||||
|
<RSTBL>
|
||||||
|
<PARAMETER>EXCL_CUA_FUNCT</PARAMETER>
|
||||||
|
<DBSTRUCT>VIMEXCLFUN</DBSTRUCT>
|
||||||
|
</RSTBL>
|
||||||
|
<RSTBL>
|
||||||
|
<PARAMETER>EXTRACT</PARAMETER>
|
||||||
|
</RSTBL>
|
||||||
|
<RSTBL>
|
||||||
|
<PARAMETER>TOTAL</PARAMETER>
|
||||||
|
</RSTBL>
|
||||||
|
<RSTBL>
|
||||||
|
<PARAMETER>X_HEADER</PARAMETER>
|
||||||
|
<DBSTRUCT>VIMDESC</DBSTRUCT>
|
||||||
|
</RSTBL>
|
||||||
|
<RSTBL>
|
||||||
|
<PARAMETER>X_NAMTAB</PARAMETER>
|
||||||
|
<DBSTRUCT>VIMNAMTAB</DBSTRUCT>
|
||||||
|
</RSTBL>
|
||||||
|
</TABLES>
|
||||||
|
<EXCEPTION>
|
||||||
|
<RSEXC>
|
||||||
|
<EXCEPTION>MISSING_CORR_NUMBER</EXCEPTION>
|
||||||
|
</RSEXC>
|
||||||
|
<RSEXC>
|
||||||
|
<EXCEPTION>SAVING_CORRECTION_FAILED</EXCEPTION>
|
||||||
|
</RSEXC>
|
||||||
|
</EXCEPTION>
|
||||||
|
<DOCUMENTATION>
|
||||||
|
<RSFDO>
|
||||||
|
<PARAMETER>FCODE</PARAMETER>
|
||||||
|
<KIND>P</KIND>
|
||||||
|
<STEXT>gewünschte Funktion des Bausteins</STEXT>
|
||||||
|
</RSFDO>
|
||||||
|
<RSFDO>
|
||||||
|
<PARAMETER>VIEW_ACTION</PARAMETER>
|
||||||
|
<KIND>P</KIND>
|
||||||
|
<STEXT>Aktion mit Tabelle: anz./änd./transp. (S/U/T)</STEXT>
|
||||||
|
</RSFDO>
|
||||||
|
<RSFDO>
|
||||||
|
<PARAMETER>VIEW_NAME</PARAMETER>
|
||||||
|
<KIND>P</KIND>
|
||||||
|
<STEXT>Name der Tabelle</STEXT>
|
||||||
|
</RSFDO>
|
||||||
|
<RSFDO>
|
||||||
|
<PARAMETER>CORR_NUMBER</PARAMETER>
|
||||||
|
<KIND>P</KIND>
|
||||||
|
<STEXT>Korrekturnummer für durchgeführte Änderungen</STEXT>
|
||||||
|
</RSFDO>
|
||||||
|
<RSFDO>
|
||||||
|
<PARAMETER>LAST_ACT_ENTRY</PARAMETER>
|
||||||
|
<KIND>P</KIND>
|
||||||
|
<STEXT>Index der Cursorposition in der Anzeigetabelle</STEXT>
|
||||||
|
</RSFDO>
|
||||||
|
<RSFDO>
|
||||||
|
<PARAMETER>UCOMM</PARAMETER>
|
||||||
|
<KIND>P</KIND>
|
||||||
|
<STEXT>letztes User-command innerhalb der Viewpflege</STEXT>
|
||||||
|
</RSFDO>
|
||||||
|
<RSFDO>
|
||||||
|
<PARAMETER>UPDATE_REQUIRED</PARAMETER>
|
||||||
|
<KIND>P</KIND>
|
||||||
|
<STEXT>Flag: Einträge verändert, Sichern erforderlich</STEXT>
|
||||||
|
</RSFDO>
|
||||||
|
<RSFDO>
|
||||||
|
<PARAMETER>CORR_KEYTAB</PARAMETER>
|
||||||
|
<KIND>P</KIND>
|
||||||
|
<STEXT>Tabelle mit den Keys der zu transport. Einträge</STEXT>
|
||||||
|
</RSFDO>
|
||||||
|
<RSFDO>
|
||||||
|
<PARAMETER>DBA_SELLIST</PARAMETER>
|
||||||
|
<KIND>P</KIND>
|
||||||
|
<STEXT>Selektionsbedingungen für den DB-Zugriff</STEXT>
|
||||||
|
</RSFDO>
|
||||||
|
<RSFDO>
|
||||||
|
<PARAMETER>DPL_SELLIST</PARAMETER>
|
||||||
|
<KIND>P</KIND>
|
||||||
|
<STEXT>Selektionsbedingungen für die Anzeige</STEXT>
|
||||||
|
</RSFDO>
|
||||||
|
<RSFDO>
|
||||||
|
<PARAMETER>EXCL_CUA_FUNCT</PARAMETER>
|
||||||
|
<KIND>P</KIND>
|
||||||
|
<STEXT>Tab. der nicht zu aktivierenden CUA-Funktionen</STEXT>
|
||||||
|
</RSFDO>
|
||||||
|
<RSFDO>
|
||||||
|
<PARAMETER>EXTRACT</PARAMETER>
|
||||||
|
<KIND>P</KIND>
|
||||||
|
<STEXT>Tab. der gerade sichtbaren Daten (Anzeigetabelle</STEXT>
|
||||||
|
</RSFDO>
|
||||||
|
<RSFDO>
|
||||||
|
<PARAMETER>TOTAL</PARAMETER>
|
||||||
|
<KIND>P</KIND>
|
||||||
|
<STEXT>Tabelle, mit allen von der DB gelesenen Daten</STEXT>
|
||||||
|
</RSFDO>
|
||||||
|
<RSFDO>
|
||||||
|
<PARAMETER>X_HEADER</PARAMETER>
|
||||||
|
<KIND>P</KIND>
|
||||||
|
<STEXT>Kontrollblocktabelle für die Tabelle</STEXT>
|
||||||
|
</RSFDO>
|
||||||
|
<RSFDO>
|
||||||
|
<PARAMETER>X_NAMTAB</PARAMETER>
|
||||||
|
<KIND>P</KIND>
|
||||||
|
<STEXT>Kontrollblocktabelle für die Tabellen-Felder</STEXT>
|
||||||
|
</RSFDO>
|
||||||
|
<RSFDO>
|
||||||
|
<PARAMETER>MISSING_CORR_NUMBER</PARAMETER>
|
||||||
|
<KIND>X</KIND>
|
||||||
|
<STEXT>Korrekturnummer fehlt</STEXT>
|
||||||
|
</RSFDO>
|
||||||
|
<RSFDO>
|
||||||
|
<PARAMETER>SAVING_CORRECTION_FAILED</PARAMETER>
|
||||||
|
<KIND>X</KIND>
|
||||||
|
<STEXT>Fehler beim Sichern der Korrektureinträge</STEXT>
|
||||||
|
</RSFDO>
|
||||||
|
</DOCUMENTATION>
|
||||||
|
</item>
|
||||||
|
</FUNCTIONS>
|
||||||
|
<DYNPROS>
|
||||||
|
<item>
|
||||||
|
<HEADER>
|
||||||
|
<PROGRAM>SAPLZBOS_TESTE</PROGRAM>
|
||||||
|
<SCREEN>0001</SCREEN>
|
||||||
|
<LANGUAGE>E</LANGUAGE>
|
||||||
|
<DESCRIPT>View Maintenance: Overview Screen ZBOS_TESTE</DESCRIPT>
|
||||||
|
<TYPE>N</TYPE>
|
||||||
|
<NEXTSCREEN>0001</NEXTSCREEN>
|
||||||
|
<LINES>061</LINES>
|
||||||
|
<COLUMNS>255</COLUMNS>
|
||||||
|
</HEADER>
|
||||||
|
<CONTAINERS>
|
||||||
|
<RPY_DYCATT>
|
||||||
|
<TYPE>SCREEN</TYPE>
|
||||||
|
<NAME>SCREEN</NAME>
|
||||||
|
</RPY_DYCATT>
|
||||||
|
<RPY_DYCATT>
|
||||||
|
<TYPE>TABLE_CTRL</TYPE>
|
||||||
|
<NAME>TCTRL_ZBOS_TESTE</NAME>
|
||||||
|
<ELEMENT_OF>SCREEN</ELEMENT_OF>
|
||||||
|
<LINE>001</LINE>
|
||||||
|
<COLUMN>001</COLUMN>
|
||||||
|
<LENGTH>255</LENGTH>
|
||||||
|
<HEIGHT>059</HEIGHT>
|
||||||
|
<C_RESIZE_V>X</C_RESIZE_V>
|
||||||
|
<C_RESIZE_H>X</C_RESIZE_H>
|
||||||
|
<C_SCROLL_V>X</C_SCROLL_V>
|
||||||
|
<C_SCROLL_H>X</C_SCROLL_H>
|
||||||
|
<TC_TABTYPE>ENTRY</TC_TABTYPE>
|
||||||
|
<TC_SEPAR_V>X</TC_SEPAR_V>
|
||||||
|
<TC_SEPAR_H>X</TC_SEPAR_H>
|
||||||
|
<TC_TITLE>X</TC_TITLE>
|
||||||
|
<TC_HEADER>X</TC_HEADER>
|
||||||
|
<TC_CONFIG>X</TC_CONFIG>
|
||||||
|
<TC_SEL_LNS>MULTIPLE</TC_SEL_LNS>
|
||||||
|
<TC_SEL_CLS>NONE</TC_SEL_CLS>
|
||||||
|
<TC_LSEL_CL>X</TC_LSEL_CL>
|
||||||
|
<TC_FIXCOL>001</TC_FIXCOL>
|
||||||
|
</RPY_DYCATT>
|
||||||
|
</CONTAINERS>
|
||||||
|
<FIELDS>
|
||||||
|
<RPY_DYFATC>
|
||||||
|
<CONT_TYPE>SCREEN</CONT_TYPE>
|
||||||
|
<CONT_NAME>SCREEN</CONT_NAME>
|
||||||
|
<TYPE>PUSH_TMPL</TYPE>
|
||||||
|
<NAME>VIM_POSI_PUSH</NAME>
|
||||||
|
<TEXT>____________________</TEXT>
|
||||||
|
<LINE>061</LINE>
|
||||||
|
<COLUMN>019</COLUMN>
|
||||||
|
<LENGTH>020</LENGTH>
|
||||||
|
<VISLENGTH>020</VISLENGTH>
|
||||||
|
<HEIGHT>001</HEIGHT>
|
||||||
|
<PUSH_FCODE>POSI</PUSH_FCODE>
|
||||||
|
<FORMAT>CHAR</FORMAT>
|
||||||
|
<OUTPUT_FLD>X</OUTPUT_FLD>
|
||||||
|
<REQU_ENTRY>N</REQU_ENTRY>
|
||||||
|
</RPY_DYFATC>
|
||||||
|
<RPY_DYFATC>
|
||||||
|
<CONT_TYPE>SCREEN</CONT_TYPE>
|
||||||
|
<CONT_NAME>SCREEN</CONT_NAME>
|
||||||
|
<TYPE>TEMPLATE</TYPE>
|
||||||
|
<NAME>VIM_POSITION_INFO</NAME>
|
||||||
|
<TEXT>______________________________</TEXT>
|
||||||
|
<LINE>061</LINE>
|
||||||
|
<COLUMN>040</COLUMN>
|
||||||
|
<LENGTH>030</LENGTH>
|
||||||
|
<VISLENGTH>030</VISLENGTH>
|
||||||
|
<HEIGHT>001</HEIGHT>
|
||||||
|
<FORMAT>CHAR</FORMAT>
|
||||||
|
<UP_LOWER>X</UP_LOWER>
|
||||||
|
<OUTPUT_FLD>X</OUTPUT_FLD>
|
||||||
|
<OUTPUTONLY>X</OUTPUTONLY>
|
||||||
|
<REQU_ENTRY>N</REQU_ENTRY>
|
||||||
|
<_--32_DIMENS>X</_--32_DIMENS>
|
||||||
|
</RPY_DYFATC>
|
||||||
|
<RPY_DYFATC>
|
||||||
|
<CONT_TYPE>SCREEN</CONT_TYPE>
|
||||||
|
<CONT_NAME>SCREEN</CONT_NAME>
|
||||||
|
<TYPE>OKCODE</TYPE>
|
||||||
|
<NAME>OK_CODE</NAME>
|
||||||
|
<TEXT>____________________</TEXT>
|
||||||
|
<LENGTH>020</LENGTH>
|
||||||
|
<VISLENGTH>020</VISLENGTH>
|
||||||
|
<HEIGHT>001</HEIGHT>
|
||||||
|
<FORMAT>CHAR</FORMAT>
|
||||||
|
<INPUT_FLD>X</INPUT_FLD>
|
||||||
|
</RPY_DYFATC>
|
||||||
|
<RPY_DYFATC>
|
||||||
|
<CONT_TYPE>TABLE_CTRL</CONT_TYPE>
|
||||||
|
<CONT_NAME>TCTRL_ZBOS_TESTE</CONT_NAME>
|
||||||
|
<TYPE>TEMPLATE</TYPE>
|
||||||
|
<NAME>VIM_FRAME_FIELD</NAME>
|
||||||
|
<TEXT>____________________________________________________________</TEXT>
|
||||||
|
<LINE>001</LINE>
|
||||||
|
<LENGTH>060</LENGTH>
|
||||||
|
<VISLENGTH>060</VISLENGTH>
|
||||||
|
<HEIGHT>001</HEIGHT>
|
||||||
|
<FORMAT>CHAR</FORMAT>
|
||||||
|
<UP_LOWER>X</UP_LOWER>
|
||||||
|
<OUTPUT_FLD>X</OUTPUT_FLD>
|
||||||
|
<REQU_ENTRY>N</REQU_ENTRY>
|
||||||
|
<TC_TITLE>X</TC_TITLE>
|
||||||
|
</RPY_DYFATC>
|
||||||
|
<RPY_DYFATC>
|
||||||
|
<CONT_TYPE>TABLE_CTRL</CONT_TYPE>
|
||||||
|
<CONT_NAME>TCTRL_ZBOS_TESTE</CONT_NAME>
|
||||||
|
<TYPE>TEXT</TYPE>
|
||||||
|
<NAME>*ZBOS_TESTE-CARRID</NAME>
|
||||||
|
<LINE>001</LINE>
|
||||||
|
<COLUMN>001</COLUMN>
|
||||||
|
<LENGTH>040</LENGTH>
|
||||||
|
<VISLENGTH>003</VISLENGTH>
|
||||||
|
<HEIGHT>001</HEIGHT>
|
||||||
|
<FORMAT>CHAR</FORMAT>
|
||||||
|
<FROM_DICT>X</FROM_DICT>
|
||||||
|
<MODIFIC>V</MODIFIC>
|
||||||
|
<REQU_ENTRY>N</REQU_ENTRY>
|
||||||
|
<TC_HEADING>X</TC_HEADING>
|
||||||
|
</RPY_DYFATC>
|
||||||
|
<RPY_DYFATC>
|
||||||
|
<CONT_TYPE>TABLE_CTRL</CONT_TYPE>
|
||||||
|
<CONT_NAME>TCTRL_ZBOS_TESTE</CONT_NAME>
|
||||||
|
<TYPE>TEXT</TYPE>
|
||||||
|
<NAME>*ZBOS_TESTE-PLANETYPE</NAME>
|
||||||
|
<LINE>001</LINE>
|
||||||
|
<COLUMN>002</COLUMN>
|
||||||
|
<LENGTH>040</LENGTH>
|
||||||
|
<VISLENGTH>010</VISLENGTH>
|
||||||
|
<HEIGHT>001</HEIGHT>
|
||||||
|
<FORMAT>CHAR</FORMAT>
|
||||||
|
<FROM_DICT>X</FROM_DICT>
|
||||||
|
<MODIFIC>V</MODIFIC>
|
||||||
|
<REQU_ENTRY>N</REQU_ENTRY>
|
||||||
|
<TC_HEADING>X</TC_HEADING>
|
||||||
|
</RPY_DYFATC>
|
||||||
|
<RPY_DYFATC>
|
||||||
|
<CONT_TYPE>TABLE_CTRL</CONT_TYPE>
|
||||||
|
<CONT_NAME>TCTRL_ZBOS_TESTE</CONT_NAME>
|
||||||
|
<TYPE>CHECK</TYPE>
|
||||||
|
<NAME>VIM_MARKED</NAME>
|
||||||
|
<LINE>001</LINE>
|
||||||
|
<LENGTH>001</LENGTH>
|
||||||
|
<VISLENGTH>001</VISLENGTH>
|
||||||
|
<HEIGHT>001</HEIGHT>
|
||||||
|
<FORMAT>CHAR</FORMAT>
|
||||||
|
<INPUT_FLD>X</INPUT_FLD>
|
||||||
|
<OUTPUT_FLD>X</OUTPUT_FLD>
|
||||||
|
<TC_SELCOL>X</TC_SELCOL>
|
||||||
|
</RPY_DYFATC>
|
||||||
|
<RPY_DYFATC>
|
||||||
|
<CONT_TYPE>TABLE_CTRL</CONT_TYPE>
|
||||||
|
<CONT_NAME>TCTRL_ZBOS_TESTE</CONT_NAME>
|
||||||
|
<TYPE>TEMPLATE</TYPE>
|
||||||
|
<NAME>ZBOS_TESTE-CARRID</NAME>
|
||||||
|
<TEXT>___</TEXT>
|
||||||
|
<LINE>001</LINE>
|
||||||
|
<COLUMN>001</COLUMN>
|
||||||
|
<LENGTH>003</LENGTH>
|
||||||
|
<VISLENGTH>003</VISLENGTH>
|
||||||
|
<HEIGHT>001</HEIGHT>
|
||||||
|
<GROUP1>KEY</GROUP1>
|
||||||
|
<FORMAT>CHAR</FORMAT>
|
||||||
|
<FROM_DICT>X</FROM_DICT>
|
||||||
|
<MODIFIC>X</MODIFIC>
|
||||||
|
<PARAM_ID>CAR</PARAM_ID>
|
||||||
|
<OUTPUT_FLD>X</OUTPUT_FLD>
|
||||||
|
<REQU_ENTRY>N</REQU_ENTRY>
|
||||||
|
</RPY_DYFATC>
|
||||||
|
<RPY_DYFATC>
|
||||||
|
<CONT_TYPE>TABLE_CTRL</CONT_TYPE>
|
||||||
|
<CONT_NAME>TCTRL_ZBOS_TESTE</CONT_NAME>
|
||||||
|
<TYPE>TEMPLATE</TYPE>
|
||||||
|
<NAME>ZBOS_TESTE-PLANETYPE</NAME>
|
||||||
|
<TEXT>__________</TEXT>
|
||||||
|
<LINE>001</LINE>
|
||||||
|
<COLUMN>002</COLUMN>
|
||||||
|
<LENGTH>010</LENGTH>
|
||||||
|
<VISLENGTH>010</VISLENGTH>
|
||||||
|
<HEIGHT>001</HEIGHT>
|
||||||
|
<FORMAT>CHAR</FORMAT>
|
||||||
|
<FROM_DICT>X</FROM_DICT>
|
||||||
|
<MODIFIC>X</MODIFIC>
|
||||||
|
<INPUT_FLD>X</INPUT_FLD>
|
||||||
|
<OUTPUT_FLD>X</OUTPUT_FLD>
|
||||||
|
</RPY_DYFATC>
|
||||||
|
</FIELDS>
|
||||||
|
<FLOW_LOGIC>
|
||||||
|
<RPY_DYFLOW>
|
||||||
|
<LINE>PROCESS BEFORE OUTPUT.</LINE>
|
||||||
|
</RPY_DYFLOW>
|
||||||
|
<RPY_DYFLOW>
|
||||||
|
<LINE> MODULE LISTE_INITIALISIEREN.</LINE>
|
||||||
|
</RPY_DYFLOW>
|
||||||
|
<RPY_DYFLOW>
|
||||||
|
<LINE> LOOP AT EXTRACT WITH CONTROL</LINE>
|
||||||
|
</RPY_DYFLOW>
|
||||||
|
<RPY_DYFLOW>
|
||||||
|
<LINE> TCTRL_ZBOS_TESTE CURSOR NEXTLINE.</LINE>
|
||||||
|
</RPY_DYFLOW>
|
||||||
|
<RPY_DYFLOW>
|
||||||
|
<LINE> MODULE LISTE_SHOW_LISTE.</LINE>
|
||||||
|
</RPY_DYFLOW>
|
||||||
|
<RPY_DYFLOW>
|
||||||
|
<LINE> ENDLOOP.</LINE>
|
||||||
|
</RPY_DYFLOW>
|
||||||
|
<RPY_DYFLOW>
|
||||||
|
<LINE>*</LINE>
|
||||||
|
</RPY_DYFLOW>
|
||||||
|
<RPY_DYFLOW>
|
||||||
|
<LINE>PROCESS AFTER INPUT.</LINE>
|
||||||
|
</RPY_DYFLOW>
|
||||||
|
<RPY_DYFLOW>
|
||||||
|
<LINE> MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND.</LINE>
|
||||||
|
</RPY_DYFLOW>
|
||||||
|
<RPY_DYFLOW>
|
||||||
|
<LINE> MODULE LISTE_BEFORE_LOOP.</LINE>
|
||||||
|
</RPY_DYFLOW>
|
||||||
|
<RPY_DYFLOW>
|
||||||
|
<LINE> LOOP AT EXTRACT.</LINE>
|
||||||
|
</RPY_DYFLOW>
|
||||||
|
<RPY_DYFLOW>
|
||||||
|
<LINE> MODULE LISTE_INIT_WORKAREA.</LINE>
|
||||||
|
</RPY_DYFLOW>
|
||||||
|
<RPY_DYFLOW>
|
||||||
|
<LINE> CHAIN.</LINE>
|
||||||
|
</RPY_DYFLOW>
|
||||||
|
<RPY_DYFLOW>
|
||||||
|
<LINE> FIELD ZBOS_TESTE-CARRID .</LINE>
|
||||||
|
</RPY_DYFLOW>
|
||||||
|
<RPY_DYFLOW>
|
||||||
|
<LINE> FIELD ZBOS_TESTE-PLANETYPE .</LINE>
|
||||||
|
</RPY_DYFLOW>
|
||||||
|
<RPY_DYFLOW>
|
||||||
|
<LINE> MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST.</LINE>
|
||||||
|
</RPY_DYFLOW>
|
||||||
|
<RPY_DYFLOW>
|
||||||
|
<LINE> ENDCHAIN.</LINE>
|
||||||
|
</RPY_DYFLOW>
|
||||||
|
<RPY_DYFLOW>
|
||||||
|
<LINE> FIELD VIM_MARKED MODULE LISTE_MARK_CHECKBOX.</LINE>
|
||||||
|
</RPY_DYFLOW>
|
||||||
|
<RPY_DYFLOW>
|
||||||
|
<LINE> CHAIN.</LINE>
|
||||||
|
</RPY_DYFLOW>
|
||||||
|
<RPY_DYFLOW>
|
||||||
|
<LINE> FIELD ZBOS_TESTE-CARRID .</LINE>
|
||||||
|
</RPY_DYFLOW>
|
||||||
|
<RPY_DYFLOW>
|
||||||
|
<LINE> MODULE LISTE_UPDATE_LISTE.</LINE>
|
||||||
|
</RPY_DYFLOW>
|
||||||
|
<RPY_DYFLOW>
|
||||||
|
<LINE> ENDCHAIN.</LINE>
|
||||||
|
</RPY_DYFLOW>
|
||||||
|
<RPY_DYFLOW>
|
||||||
|
<LINE> ENDLOOP.</LINE>
|
||||||
|
</RPY_DYFLOW>
|
||||||
|
<RPY_DYFLOW>
|
||||||
|
<LINE> MODULE LISTE_AFTER_LOOP.</LINE>
|
||||||
|
</RPY_DYFLOW>
|
||||||
|
</FLOW_LOGIC>
|
||||||
|
</item>
|
||||||
|
</DYNPROS>
|
||||||
|
</asx:values>
|
||||||
|
</asx:abap>
|
||||||
|
</abapGit>
|
||||||
55
src/zbos_teste.tabl.xml
Normal file
55
src/zbos_teste.tabl.xml
Normal file
@@ -0,0 +1,55 @@
|
|||||||
|
<?xml version="1.0" encoding="utf-8"?>
|
||||||
|
<abapGit version="v1.0.0" serializer="LCL_OBJECT_TABL" serializer_version="v1.0.0">
|
||||||
|
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||||
|
<asx:values>
|
||||||
|
<DD02V>
|
||||||
|
<TABNAME>ZBOS_TESTE</TABNAME>
|
||||||
|
<DDLANGUAGE>E</DDLANGUAGE>
|
||||||
|
<TABCLASS>TRANSP</TABCLASS>
|
||||||
|
<CLIDEP>X</CLIDEP>
|
||||||
|
<DDTEXT>teste</DDTEXT>
|
||||||
|
<CONTFLAG>C</CONTFLAG>
|
||||||
|
<EXCLASS>1</EXCLASS>
|
||||||
|
</DD02V>
|
||||||
|
<DD09L>
|
||||||
|
<TABNAME>ZBOS_TESTE</TABNAME>
|
||||||
|
<AS4LOCAL>A</AS4LOCAL>
|
||||||
|
<TABKAT>0</TABKAT>
|
||||||
|
<TABART>APPL0</TABART>
|
||||||
|
<PROTOKOLL>X</PROTOKOLL>
|
||||||
|
<BUFALLOW>N</BUFALLOW>
|
||||||
|
</DD09L>
|
||||||
|
<DD03P_TABLE>
|
||||||
|
<DD03P>
|
||||||
|
<FIELDNAME>MANDT</FIELDNAME>
|
||||||
|
<KEYFLAG>X</KEYFLAG>
|
||||||
|
<ROLLNAME>MANDT</ROLLNAME>
|
||||||
|
<ADMINFIELD>0</ADMINFIELD>
|
||||||
|
<NOTNULL>X</NOTNULL>
|
||||||
|
<COMPTYPE>E</COMPTYPE>
|
||||||
|
</DD03P>
|
||||||
|
<DD03P>
|
||||||
|
<FIELDNAME>CARRID</FIELDNAME>
|
||||||
|
<KEYFLAG>X</KEYFLAG>
|
||||||
|
<ROLLNAME>S_CARR_ID</ROLLNAME>
|
||||||
|
<ADMINFIELD>0</ADMINFIELD>
|
||||||
|
<NOTNULL>X</NOTNULL>
|
||||||
|
<SHLPORIGIN>D</SHLPORIGIN>
|
||||||
|
<COMPTYPE>E</COMPTYPE>
|
||||||
|
</DD03P>
|
||||||
|
<DD03P>
|
||||||
|
<FIELDNAME>PLANETYPE</FIELDNAME>
|
||||||
|
<ROLLNAME>S_PLANETYE</ROLLNAME>
|
||||||
|
<ADMINFIELD>0</ADMINFIELD>
|
||||||
|
<COMPTYPE>E</COMPTYPE>
|
||||||
|
</DD03P>
|
||||||
|
</DD03P_TABLE>
|
||||||
|
<TABL_EXTRAS>
|
||||||
|
<TDDAT>
|
||||||
|
<TABNAME>ZBOS_TESTE</TABNAME>
|
||||||
|
<CCLASS>&NC&</CCLASS>
|
||||||
|
</TDDAT>
|
||||||
|
</TABL_EXTRAS>
|
||||||
|
</asx:values>
|
||||||
|
</asx:abap>
|
||||||
|
</abapGit>
|
||||||
43
src/zbos_testes.tobj.xml
Normal file
43
src/zbos_testes.tobj.xml
Normal file
@@ -0,0 +1,43 @@
|
|||||||
|
<?xml version="1.0" encoding="utf-8"?>
|
||||||
|
<abapGit version="v1.0.0" serializer="LCL_OBJECT_TOBJ" serializer_version="v1.0.0">
|
||||||
|
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||||
|
<asx:values>
|
||||||
|
<OBJH>
|
||||||
|
<OBJECTNAME>ZBOS_TESTE</OBJECTNAME>
|
||||||
|
<OBJECTTYPE>S</OBJECTTYPE>
|
||||||
|
<CLIDEP>X</CLIDEP>
|
||||||
|
<OBJCATEG>CUST</OBJCATEG>
|
||||||
|
<OBJTRANSP>2</OBJTRANSP>
|
||||||
|
<IMPORTABLE>3</IMPORTABLE>
|
||||||
|
</OBJH>
|
||||||
|
<OBJT>
|
||||||
|
<LANGUAGE>E</LANGUAGE>
|
||||||
|
<OBJECTNAME>ZBOS_TESTE</OBJECTNAME>
|
||||||
|
<OBJECTTYPE>S</OBJECTTYPE>
|
||||||
|
<DDTEXT>teste</DDTEXT>
|
||||||
|
</OBJT>
|
||||||
|
<OBJS>
|
||||||
|
<OBJS>
|
||||||
|
<OBJECTNAME>ZBOS_TESTE</OBJECTNAME>
|
||||||
|
<OBJECTTYPE>S</OBJECTTYPE>
|
||||||
|
<TABNAME>ZBOS_TESTE</TABNAME>
|
||||||
|
<DDIC>X</DDIC>
|
||||||
|
<PRIM_TABLE>X</PRIM_TABLE>
|
||||||
|
</OBJS>
|
||||||
|
</OBJS>
|
||||||
|
<TOBJ>
|
||||||
|
<TDDAT>
|
||||||
|
<TABNAME>ZBOS_TESTE</TABNAME>
|
||||||
|
<CCLASS>&NC&</CCLASS>
|
||||||
|
</TDDAT>
|
||||||
|
<TVDIR>
|
||||||
|
<TABNAME>ZBOS_TESTE</TABNAME>
|
||||||
|
<AREA>ZBOS_TESTE</AREA>
|
||||||
|
<TYPE>1</TYPE>
|
||||||
|
<LISTE>0001</LISTE>
|
||||||
|
<BASTAB>X</BASTAB>
|
||||||
|
</TVDIR>
|
||||||
|
</TOBJ>
|
||||||
|
</asx:values>
|
||||||
|
</asx:abap>
|
||||||
|
</abapGit>
|
||||||
Reference in New Issue
Block a user