add dbname to samples

Author: kikitux

samples/errtoevent.sql

@@ -1,7 +1,6 @@
 set serveroutput on
 
 declare
-  name varchar2(50);
   tag varchar2(50);
   result varchar2(10);
   cursor c_table is
@@ -19,7 +18,8 @@ begin
   end loop;
 EXCEPTION
   WHEN errorsysdate THEN
-    event_rmsg := eventtoddog('sample event','sample: error counting sysdate, expected 2 or more','sample');
+    tag := 'sample' || ',dbname:' || sys_context('USERENV','DB_NAME') ;
+    event_rmsg := eventtoddog('sample event','sample: error counting sysdate, expected 2 or more',tag);
     raise_application_error(-20101, 'error counting from sysdate, event to ddog:' || event_rmsg);
   WHEN OTHERS THEN
     err_num := SQLCODE;

samples/rowcount.sql

@@ -13,7 +13,7 @@ declare
 begin
   name := 'sample.rowcount';
   for t in c_table loop
-    tag := 'table_name:' || t.table_name || ',schema:' || t.owner || ',dbname:' || sys_context('USERENV','DB_NAME');
+    tag := 'table_name:' || t.table_name || ',schema:' || t.owner;
     dbms_output.put_line(name || ':' || t.num_rows || ',' || tag);
     result := gaugetoddog(name,t.num_rows,tag);
     IF result != 'done' THEN

samples/rowcount_job.sql

@@ -13,7 +13,7 @@ CREATE OR REPLACE PROCEDURE proc_rowcount_toddog AS
 begin
   name := 'sample.rowcount';
   for t in c_table loop
-    tag := 'table_name:' || t.table_name || ',schema:' || t.owner || ',dbname:' || sys_context('USERENV','DB_NAME');
+    tag := 'table_name:' || t.table_name || ',schema:' || t.owner ;
     result := gaugetoddog(name,t.num_rows,tag);
     IF result != 'done' THEN
       RAISE errorinloop;