mirror of
https://github.com/abapGit/abapGit.git
synced 2025-05-01 12:20:51 +08:00
* Determination transaction type * Determine TX type * abaplint checks
This commit is contained in:
parent
a85db8c8b8
commit
c9ae5ac122
|
@ -78,7 +78,7 @@ ENDCLASS.
|
|||
|
||||
|
||||
|
||||
CLASS ZCL_ABAPGIT_OBJECT_TRAN IMPLEMENTATION.
|
||||
CLASS zcl_abapgit_object_tran IMPLEMENTATION.
|
||||
|
||||
|
||||
METHOD add_data.
|
||||
|
@ -532,10 +532,10 @@ CLASS ZCL_ABAPGIT_OBJECT_TRAN IMPLEMENTATION.
|
|||
METHOD zif_abapgit_object~deserialize.
|
||||
|
||||
CONSTANTS: lc_hex_tra TYPE x VALUE '00',
|
||||
* c_hex_men TYPE x VALUE '01',
|
||||
* lc_hex_men TYPE x VALUE '01',
|
||||
lc_hex_par TYPE x VALUE '02',
|
||||
lc_hex_rep TYPE x VALUE '80',
|
||||
* c_hex_rpv TYPE x VALUE '10',
|
||||
* lc_hex_rpv TYPE x VALUE '10',
|
||||
lc_hex_obj TYPE x VALUE '08'.
|
||||
|
||||
DATA: lv_dynpro TYPE d020s-dnum,
|
||||
|
@ -563,19 +563,18 @@ CLASS ZCL_ABAPGIT_OBJECT_TRAN IMPLEMENTATION.
|
|||
|
||||
lv_dynpro = ls_tstc-dypno.
|
||||
|
||||
CASE ls_tstc-cinfo.
|
||||
WHEN lc_hex_tra.
|
||||
lv_type = ststc_c_type_dialog.
|
||||
WHEN lc_hex_rep.
|
||||
IF ls_tstc-cinfo O lc_hex_rep.
|
||||
lv_type = ststc_c_type_report.
|
||||
WHEN lc_hex_par.
|
||||
lv_type = ststc_c_type_parameters.
|
||||
WHEN lc_hex_obj.
|
||||
ELSEIF ls_tstc-cinfo O lc_hex_obj.
|
||||
lv_type = ststc_c_type_object.
|
||||
* todo, or ststc_c_type_variant?
|
||||
WHEN OTHERS.
|
||||
" todo, or ststc_c_type_variant?
|
||||
ELSEIF ls_tstc-cinfo O lc_hex_par.
|
||||
lv_type = ststc_c_type_parameters.
|
||||
ELSEIF ls_tstc-cinfo O lc_hex_tra.
|
||||
lv_type = ststc_c_type_dialog.
|
||||
ELSE.
|
||||
zcx_abapgit_exception=>raise( 'Transaction, unknown CINFO' ).
|
||||
ENDCASE.
|
||||
ENDIF.
|
||||
|
||||
IF ls_tstcp IS NOT INITIAL.
|
||||
split_parameters(
|
||||
|
|
Loading…
Reference in New Issue
Block a user