lcl_services_bkg to global

This commit is contained in:
larshp 2018-02-15 12:48:45 +00:00
parent eae23e8e9c
commit 4b2aad107e
5 changed files with 28 additions and 34 deletions

View File

@ -120,7 +120,7 @@ CLASS lcl_gui_page_bkg IMPLEMENTATION.
WHEN zif_abapgit_definitions=>gc_action-bg_update.
ls_bg_task = zcl_abapgit_html_action_utils=>decode_bg_update( iv_getdata ).
ls_bg_task-key = mv_key.
lcl_services_bkg=>update_task( ls_bg_task ).
zcl_abapgit_services_bkg=>update_task( ls_bg_task ).
ev_state = zif_abapgit_definitions=>gc_event_state-re_render.
ENDCASE.

View File

@ -6,4 +6,3 @@ INCLUDE zabapgit_services_git.
INCLUDE zabapgit_services_repo.
INCLUDE zabapgit_services_abapgit.
INCLUDE zabapgit_services_db.
INCLUDE zabapgit_services_background.

View File

@ -1,22 +0,0 @@
<?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>ZABAPGIT_SERVICES_BACKGROUND</NAME>
<STATE>A</STATE>
<VARCL>X</VARCL>
<SUBC>I</SUBC>
<RLOAD>E</RLOAD>
<UCCHECK>X</UCCHECK>
</PROGDIR>
<TPOOL>
<item>
<ID>R</ID>
<ENTRY>Include ZABAPGIT_SERVICES_BACKGROUND</ENTRY>
<LENGTH>36</LENGTH>
</item>
</TPOOL>
</asx:values>
</asx:abap>
</abapGit>

View File

@ -1,8 +1,4 @@
*&---------------------------------------------------------------------*
*& Include ZABAPGIT_SERVICES_BACKGROUND
*&---------------------------------------------------------------------*
CLASS lcl_services_bkg DEFINITION FINAL.
CLASS zcl_abapgit_services_bkg DEFINITION PUBLIC FINAL CREATE PUBLIC.
PUBLIC SECTION.
@ -10,9 +6,12 @@ CLASS lcl_services_bkg DEFINITION FINAL.
IMPORTING is_bg_task TYPE zcl_abapgit_persist_background=>ty_background
RAISING zcx_abapgit_exception.
ENDCLASS. "lcl_services_background
ENDCLASS.
CLASS ZCL_ABAPGIT_SERVICES_BKG IMPLEMENTATION.
CLASS lcl_services_bkg IMPLEMENTATION.
METHOD update_task.
@ -30,6 +29,5 @@ CLASS lcl_services_bkg IMPLEMENTATION.
COMMIT WORK.
ENDMETHOD. "update_task
ENDCLASS. "lcl_services_background
ENDMETHOD.
ENDCLASS.

View File

@ -0,0 +1,19 @@
<?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_SERVICES_BKG</CLSNAME>
<VERSION>1</VERSION>
<LANGU>E</LANGU>
<DESCRIPT>Background services</DESCRIPT>
<EXPOSURE>2</EXPOSURE>
<STATE>1</STATE>
<CLSFINAL>X</CLSFINAL>
<CLSCCINCL>X</CLSCCINCL>
<FIXPT>X</FIXPT>
<UNICODE>X</UNICODE>
</VSEOCLASS>
</asx:values>
</asx:abap>
</abapGit>