Added new member-function has_output to easily check

pesse · pesse · commit b4ece733c11d · 2018-02-27T22:31:15.000+01:00
whether a reporter has an output to buffer or not.
The way with types is too cumbersome from java side
diff --git a/source/core/types/ut_output_reporter_base.tpb b/source/core/types/ut_output_reporter_base.tpb
@@ -28,6 +28,11 @@ create or replace type body ut_output_reporter_base is
     self.set_reporter_id(self.output_buffer.output_id);
   end;
 
+  overriding member function has_output return int is
+  begin
+    return 1;
+  end;
+
   overriding member procedure set_reporter_id(self in out nocopy ut_output_reporter_base, a_reporter_id raw) is
   begin
     self.id := a_reporter_id;
diff --git a/source/core/types/ut_output_reporter_base.tps b/source/core/types/ut_output_reporter_base.tps
@@ -18,6 +18,7 @@ create or replace type ut_output_reporter_base under ut_reporter_base(
   output_buffer ut_output_buffer_base,
   constructor function ut_output_reporter_base(self in out nocopy ut_output_reporter_base) return self as result,
   member procedure init(self in out nocopy ut_output_reporter_base, a_self_type varchar2, a_output_buffer ut_output_buffer_base := null),
+  overriding member function has_output return int,
   overriding member procedure set_reporter_id(self in out nocopy ut_output_reporter_base, a_reporter_id raw),
   overriding member procedure before_calling_run(self in out nocopy ut_output_reporter_base, a_run in ut_run),
   
diff --git a/source/core/types/ut_reporter_base.tpb b/source/core/types/ut_reporter_base.tpb
@@ -33,6 +33,11 @@ create or replace type body ut_reporter_base is
     return self.id;
   end;
 
+  member function has_output return int is
+  begin
+    return 0;
+  end;
+
   -- run hooks
   member procedure before_calling_run(self in out nocopy ut_reporter_base, a_run in ut_run) is
   begin
diff --git a/source/core/types/ut_reporter_base.tps b/source/core/types/ut_reporter_base.tps
@@ -20,6 +20,7 @@ create or replace type ut_reporter_base authid current_user as object(
   final member procedure init(self in out nocopy ut_reporter_base, a_self_type varchar2),
   member procedure set_reporter_id(self in out nocopy ut_reporter_base, a_reporter_id raw),
   member function  get_reporter_id return raw,
+  member function  has_output return int,
 
   -- run hooks
   member procedure before_calling_run(self in out nocopy ut_reporter_base, a_run in ut_run),
