Skip to content

Commit 3058610

Browse files
committed
Added tags for tests and tags for suite.
1 parent 0e2eaa5 commit 3058610

18 files changed

+286
-86
lines changed

source/api/ut.pkb

Lines changed: 59 additions & 29 deletions
Original file line numberDiff line numberDiff line change
@@ -120,7 +120,8 @@ create or replace package body ut is
120120
a_exclude_objects ut_varchar2_list,
121121
a_client_character_set varchar2,
122122
a_random_test_order integer,
123-
a_random_test_order_seed positive
123+
a_random_test_order_seed positive,
124+
a_tags ut_varchar2_rows := null
124125
) is
125126
pragma autonomous_transaction;
126127
begin
@@ -138,7 +139,8 @@ create or replace package body ut is
138139
a_client_character_set,
139140
false,
140141
ut_utils.int_to_boolean(a_random_test_order),
141-
a_random_test_order_seed
142+
a_random_test_order_seed,
143+
a_tags
142144
);
143145
rollback;
144146
end;
@@ -154,7 +156,8 @@ create or replace package body ut is
154156
a_exclude_objects ut_varchar2_list,
155157
a_client_character_set varchar2,
156158
a_random_test_order integer,
157-
a_random_test_order_seed positive
159+
a_random_test_order_seed positive,
160+
a_tags ut_varchar2_rows := null
158161
) is
159162
pragma autonomous_transaction;
160163
begin
@@ -172,7 +175,8 @@ create or replace package body ut is
172175
a_client_character_set,
173176
false,
174177
ut_utils.int_to_boolean(a_random_test_order),
175-
a_random_test_order_seed
178+
a_random_test_order_seed,
179+
a_tags
176180
);
177181
rollback;
178182
end;
@@ -212,7 +216,8 @@ create or replace package body ut is
212216
a_exclude_objects ut_varchar2_list := null,
213217
a_client_character_set varchar2 := null,
214218
a_random_test_order integer := 0,
215-
a_random_test_order_seed positive := null
219+
a_random_test_order_seed positive := null,
220+
a_tags varchar2 := null
216221
) return ut_varchar2_rows pipelined is
217222
l_reporter ut_reporter_base := a_reporter;
218223
l_results sys_refcursor;
@@ -228,7 +233,8 @@ create or replace package body ut is
228233
a_exclude_objects,
229234
a_client_character_set,
230235
a_random_test_order,
231-
a_random_test_order_seed
236+
a_random_test_order_seed,
237+
ut_varchar2_rows(a_tags)
232238
);
233239
if l_reporter is of (ut_output_reporter_base) then
234240
l_results := treat(l_reporter as ut_output_reporter_base).get_lines_cursor();
@@ -249,7 +255,8 @@ create or replace package body ut is
249255
a_exclude_objects ut_varchar2_list := null,
250256
a_client_character_set varchar2 := null,
251257
a_random_test_order integer := 0,
252-
a_random_test_order_seed positive := null
258+
a_random_test_order_seed positive := null,
259+
a_tags varchar2 := null
253260
) return ut_varchar2_rows pipelined is
254261
l_reporter ut_reporter_base := a_reporter;
255262
l_results sys_refcursor;
@@ -265,7 +272,8 @@ create or replace package body ut is
265272
a_exclude_objects,
266273
a_client_character_set,
267274
a_random_test_order,
268-
a_random_test_order_seed
275+
a_random_test_order_seed,
276+
ut_varchar2_rows(a_tags)
269277
);
270278
if l_reporter is of (ut_output_reporter_base) then
271279
l_results := treat(l_reporter as ut_output_reporter_base).get_lines_cursor();
@@ -287,7 +295,8 @@ create or replace package body ut is
287295
a_exclude_objects ut_varchar2_list := null,
288296
a_client_character_set varchar2 := null,
289297
a_random_test_order integer := 0,
290-
a_random_test_order_seed positive := null
298+
a_random_test_order_seed positive := null,
299+
a_tags varchar2 := null
291300
) return ut_varchar2_rows pipelined is
292301
l_reporter ut_reporter_base := a_reporter;
293302
l_results sys_refcursor;
@@ -303,7 +312,8 @@ create or replace package body ut is
303312
a_exclude_objects,
304313
a_client_character_set,
305314
a_random_test_order,
306-
a_random_test_order_seed
315+
a_random_test_order_seed,
316+
ut_varchar2_rows(a_tags)
307317
);
308318
if l_reporter is of (ut_output_reporter_base) then
309319
l_results := treat(l_reporter as ut_output_reporter_base).get_lines_cursor();
@@ -325,7 +335,8 @@ create or replace package body ut is
325335
a_exclude_objects ut_varchar2_list := null,
326336
a_client_character_set varchar2 := null,
327337
a_random_test_order integer := 0,
328-
a_random_test_order_seed positive := null
338+
a_random_test_order_seed positive := null,
339+
a_tags varchar2 := null
329340
) return ut_varchar2_rows pipelined is
330341
l_reporter ut_reporter_base := a_reporter;
331342
l_results sys_refcursor;
@@ -341,7 +352,8 @@ create or replace package body ut is
341352
a_exclude_objects,
342353
a_client_character_set,
343354
a_random_test_order,
344-
a_random_test_order_seed
355+
a_random_test_order_seed,
356+
ut_varchar2_rows(a_tags)
345357
);
346358
if l_reporter is of (ut_output_reporter_base) then
347359
l_results := treat(l_reporter as ut_output_reporter_base).get_lines_cursor();
@@ -363,7 +375,8 @@ create or replace package body ut is
363375
a_exclude_objects ut_varchar2_list := null,
364376
a_client_character_set varchar2 := null,
365377
a_random_test_order integer := 0,
366-
a_random_test_order_seed positive := null
378+
a_random_test_order_seed positive := null,
379+
a_tags varchar2 := null
367380
) return ut_varchar2_rows pipelined is
368381
l_reporter ut_reporter_base := a_reporter;
369382
l_results sys_refcursor;
@@ -379,7 +392,8 @@ create or replace package body ut is
379392
a_exclude_objects,
380393
a_client_character_set,
381394
a_random_test_order,
382-
a_random_test_order_seed
395+
a_random_test_order_seed,
396+
ut_varchar2_rows(a_tags)
383397
);
384398
if l_reporter is of (ut_output_reporter_base) then
385399
l_results := treat(l_reporter as ut_output_reporter_base).get_lines_cursor();
@@ -401,7 +415,8 @@ create or replace package body ut is
401415
a_exclude_objects ut_varchar2_list := null,
402416
a_client_character_set varchar2 := null,
403417
a_random_test_order integer := 0,
404-
a_random_test_order_seed positive := null
418+
a_random_test_order_seed positive := null,
419+
a_tags varchar2 := null
405420
) return ut_varchar2_rows pipelined is
406421
l_reporter ut_reporter_base := a_reporter;
407422
l_results sys_refcursor;
@@ -417,7 +432,8 @@ create or replace package body ut is
417432
a_exclude_objects,
418433
a_client_character_set,
419434
a_random_test_order,
420-
a_random_test_order_seed
435+
a_random_test_order_seed,
436+
ut_varchar2_rows(a_tags)
421437
);
422438
if l_reporter is of (ut_output_reporter_base) then
423439
l_results := treat(l_reporter as ut_output_reporter_base).get_lines_cursor();
@@ -440,7 +456,8 @@ create or replace package body ut is
440456
a_client_character_set varchar2 := null,
441457
a_force_manual_rollback boolean := false,
442458
a_random_test_order boolean := false,
443-
a_random_test_order_seed positive := null
459+
a_random_test_order_seed positive := null,
460+
a_tags ut_varchar2_rows := null
444461
) is
445462
l_reporter ut_reporter_base := a_reporter;
446463
begin
@@ -459,7 +476,8 @@ create or replace package body ut is
459476
a_client_character_set,
460477
a_force_manual_rollback,
461478
a_random_test_order,
462-
a_random_test_order_seed
479+
a_random_test_order_seed,
480+
a_tags
463481
);
464482
else
465483
run_autonomous(
@@ -473,7 +491,8 @@ create or replace package body ut is
473491
a_exclude_objects,
474492
a_client_character_set,
475493
ut_utils.boolean_to_int(a_random_test_order),
476-
a_random_test_order_seed
494+
a_random_test_order_seed,
495+
a_tags
477496
);
478497
end if;
479498
if l_reporter is of (ut_output_reporter_base) then
@@ -494,7 +513,8 @@ create or replace package body ut is
494513
a_client_character_set varchar2 := null,
495514
a_force_manual_rollback boolean := false,
496515
a_random_test_order boolean := false,
497-
a_random_test_order_seed positive := null
516+
a_random_test_order_seed positive := null,
517+
a_tags ut_varchar2_rows := null
498518
) is
499519
l_reporter ut_reporter_base := a_reporter;
500520
begin
@@ -510,7 +530,8 @@ create or replace package body ut is
510530
a_client_character_set,
511531
a_force_manual_rollback,
512532
a_random_test_order,
513-
a_random_test_order_seed
533+
a_random_test_order_seed,
534+
a_tags
514535
);
515536
end;
516537

@@ -525,7 +546,8 @@ create or replace package body ut is
525546
a_client_character_set varchar2 := null,
526547
a_force_manual_rollback boolean := false,
527548
a_random_test_order boolean := false,
528-
a_random_test_order_seed positive := null
549+
a_random_test_order_seed positive := null,
550+
a_tags varchar2 := null
529551
) is
530552
begin
531553
ut.run(
@@ -540,7 +562,8 @@ create or replace package body ut is
540562
a_client_character_set,
541563
a_force_manual_rollback,
542564
a_random_test_order,
543-
a_random_test_order_seed
565+
a_random_test_order_seed,
566+
ut_varchar2_rows(a_tags)
544567
);
545568
end;
546569

@@ -555,7 +578,8 @@ create or replace package body ut is
555578
a_client_character_set varchar2 := null,
556579
a_force_manual_rollback boolean := false,
557580
a_random_test_order boolean := false,
558-
a_random_test_order_seed positive := null
581+
a_random_test_order_seed positive := null,
582+
a_tags varchar2 := null
559583
) is
560584
begin
561585
ut.run(
@@ -570,7 +594,8 @@ create or replace package body ut is
570594
a_client_character_set,
571595
a_force_manual_rollback,
572596
a_random_test_order,
573-
a_random_test_order_seed
597+
a_random_test_order_seed,
598+
ut_varchar2_rows(a_tags)
574599
);
575600
end;
576601

@@ -586,7 +611,8 @@ create or replace package body ut is
586611
a_client_character_set varchar2 := null,
587612
a_force_manual_rollback boolean := false,
588613
a_random_test_order boolean := false,
589-
a_random_test_order_seed positive := null
614+
a_random_test_order_seed positive := null,
615+
a_tags varchar2 := null
590616
) is
591617
begin
592618
ut.run(
@@ -601,7 +627,8 @@ create or replace package body ut is
601627
a_client_character_set,
602628
a_force_manual_rollback,
603629
a_random_test_order,
604-
a_random_test_order_seed
630+
a_random_test_order_seed,
631+
ut_varchar2_rows(a_tags)
605632
);
606633
end;
607634

@@ -617,7 +644,8 @@ create or replace package body ut is
617644
a_client_character_set varchar2 := null,
618645
a_force_manual_rollback boolean := false,
619646
a_random_test_order boolean := false,
620-
a_random_test_order_seed positive := null
647+
a_random_test_order_seed positive := null,
648+
a_tags varchar2 := null
621649
) is
622650
begin
623651
ut.run(
@@ -632,10 +660,12 @@ create or replace package body ut is
632660
a_client_character_set,
633661
a_force_manual_rollback,
634662
a_random_test_order,
635-
a_random_test_order_seed
663+
a_random_test_order_seed,
664+
ut_varchar2_rows(a_tags)
636665
);
637666
end;
638667

668+
639669
procedure set_nls is
640670
begin
641671
if g_nls_date_format is null then

0 commit comments

Comments
 (0)