From 92262adb67b40a9d1f209f0784718ee5011edf2b Mon Sep 17 00:00:00 2001 From: larshp Date: Sat, 5 Aug 2017 07:24:38 +0000 Subject: [PATCH] fix compiler warning --- src/zabapgit_file_status.prog.abap | 3 ++- src/zabapgit_tadir.prog.abap | 6 ++++-- src/zabapgit_unit_test.prog.abap | 3 ++- 3 files changed, 8 insertions(+), 4 deletions(-) diff --git a/src/zabapgit_file_status.prog.abap b/src/zabapgit_file_status.prog.abap index 416b901d3..d7402cfa1 100644 --- a/src/zabapgit_file_status.prog.abap +++ b/src/zabapgit_file_status.prog.abap @@ -27,7 +27,8 @@ CLASS lcl_file_status DEFINITION FINAL it_local TYPE lif_defs=>ty_files_item_tt it_remote TYPE lif_defs=>ty_files_tt it_cur_state TYPE lif_defs=>ty_file_signatures_tt - RETURNING VALUE(rt_results) TYPE lif_defs=>ty_results_tt, + RETURNING VALUE(rt_results) TYPE lif_defs=>ty_results_tt + RAISING lcx_exception, run_checks IMPORTING io_log TYPE REF TO lcl_log it_results TYPE lif_defs=>ty_results_tt diff --git a/src/zabapgit_tadir.prog.abap b/src/zabapgit_tadir.prog.abap index f0252bd56..bd0436200 100644 --- a/src/zabapgit_tadir.prog.abap +++ b/src/zabapgit_tadir.prog.abap @@ -21,7 +21,8 @@ CLASS lcl_tadir DEFINITION FINAL. IMPORTING iv_pgmid TYPE tadir-pgmid DEFAULT 'R3TR' iv_object TYPE tadir-object iv_obj_name TYPE tadir-obj_name - RETURNING VALUE(rs_tadir) TYPE tadir, + RETURNING VALUE(rs_tadir) TYPE tadir + RAISING lcx_exception, read_single_sicf IMPORTING iv_pgmid TYPE tadir-pgmid DEFAULT 'R3TR' iv_obj_name TYPE tadir-obj_name @@ -31,7 +32,8 @@ CLASS lcl_tadir DEFINITION FINAL. IMPORTING iv_pgmid TYPE tadir-pgmid DEFAULT 'R3TR' iv_object TYPE tadir-object iv_obj_name TYPE tadir-obj_name - RETURNING VALUE(rv_devclass) TYPE tadir-devclass. + RETURNING VALUE(rv_devclass) TYPE tadir-devclass + RAISING lcx_exception. PRIVATE SECTION. CLASS-METHODS: diff --git a/src/zabapgit_unit_test.prog.abap b/src/zabapgit_unit_test.prog.abap index 8d743b21a..7bb5a034d 100644 --- a/src/zabapgit_unit_test.prog.abap +++ b/src/zabapgit_unit_test.prog.abap @@ -2208,7 +2208,8 @@ CLASS ltcl_file_status DEFINITION FOR TESTING RISK LEVEL HARMLESS INHERITING FROM cl_aunit_assert. PUBLIC SECTION. - METHODS calculate_status FOR TESTING. + METHODS calculate_status FOR TESTING + RAISING lcx_exception. ENDCLASS. "ltcl_file_status