SAP/abapGit
1
0
Fork 0
mirror of https://github.com/abapGit/abapGit.git synced 2025-04-30 20:03:20 +08:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

first steps #911

Browse Source
This commit is contained in:
larshp 2017-09-11 17:53:06 +00:00
parent 23c9b69fbb
commit 9f126932cc
2 changed files with 84 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

66
src/zcl_abapgit_syntax_check.clas.abap Normal file
View File

@ -0,0 +1,66 @@
class ZCL_ABAPGIT_SYNTAX_CHECK definition
public
create public .
public section.
class-methods RUN
importing
!IV_PACKAGE type DEVCLASS .
protected section.
class-methods CREATE_OBJECTSET
importing
!IV_PACKAGE type DEVCLASS
returning
value(RO_SET) type ref to CL_CI_OBJECTSET .
private section.
ENDCLASS.
CLASS ZCL_ABAPGIT_SYNTAX_CHECK IMPLEMENTATION.
METHOD create_objectset.
CONSTANTS: lc_anonymous TYPE sci_objs VALUE ''.
DATA: lt_objects TYPE scistadir,
ls_flags TYPE sci_flgl.
FIELD-SYMBOLS: <ls_package> LIKE LINE OF lt_objects-sodevc.
ro_set = cl_ci_objectset=>create(
p_user = sy-uname
p_name = lc_anonymous ).
APPEND INITIAL LINE TO lt_objects-sodevc ASSIGNING <ls_package>.
<ls_package>-sign = 'I'.
<ls_package>-option = 'CP'.
CONCATENATE iv_package '*' INTO <ls_package>-low.
* todo, find all subpackages
ls_flags-class = abap_true.
ls_flags-fugrs = abap_true.
ls_flags-repos = abap_true.
ls_flags-wdyns = abap_true.
ls_flags-ddics = abap_true.
ls_flags-typps = abap_true.
ro_set->save_objectset(
p_tadir = lt_objects
p_sel_flags = ls_flags ).
ENDMETHOD.
METHOD run.
create_objectset( iv_package ).
* todo: add returning parameter
ENDMETHOD.
ENDCLASS.

18
src/zcl_abapgit_syntax_check.clas.xml Normal file
View File

@ -0,0 +1,18 @@
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_CLAS" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<VSEOCLASS>
<CLSNAME>ZCL_ABAPGIT_SYNTAX_CHECK</CLSNAME>
<VERSION>1</VERSION>
<LANGU>E</LANGU>
<DESCRIPT>abapGit - Syntax check</DESCRIPT>
<EXPOSURE>2</EXPOSURE>
<STATE>1</STATE>
<CLSCCINCL>X</CLSCCINCL>
<FIXPT>X</FIXPT>
<UNICODE>X</UNICODE>
</VSEOCLASS>
</asx:values>
</asx:abap>
</abapGit>