@@ -328,5 +328,111 @@ end;]';
328328%2 tests, 0 failed, 0 errored, 0 disabled, 0 warning(s)%');
329329 end;
330330
331+ procedure pass_varch_test_csl_spc is
332+ l_results ut3.ut_varchar2_list;
333+ l_actual clob;
334+ begin
335+ select *
336+ bulk collect into l_results
337+ from table(ut3.ut.run('test_csl_names1.one_is_one, test_csl_names2.one_is_one'));
338+
339+ l_actual := ut3.ut_utils.table_to_clob(l_results);
340+ ut.expect(l_actual).to_be_like('%Finished in % seconds
341+ %2 tests, 0 failed, 0 errored, 0 disabled, 0 warning(s)%');
342+ end;
343+
344+ procedure pass_csl_with_srcfile is
345+ l_results ut3.ut_varchar2_list;
346+ l_actual clob;
347+ begin
348+
349+ select *
350+ bulk collect into l_results
351+ from table(
352+ ut3.ut.run(
353+ a_path => 'test_csl_names1.one_is_one,test_csl_names2.one_is_one',
354+ a_source_files => ut3.ut_varchar2_list('ut3.ut'),
355+ a_test_files => ut3.ut_varchar2_list('ut3_tester.test_csl_names2')
356+ )
357+ );
358+
359+ l_actual := ut3.ut_utils.table_to_clob(l_results);
360+ ut.expect(l_actual).to_be_like('%Finished in % seconds
361+ %2 tests, 0 failed, 0 errored, 0 disabled, 0 warning(s)%');
362+ end;
363+
364+ procedure pass_singlevar_with_proc is
365+ l_output_data dbms_output.chararr;
366+ l_num_lines integer := 100000;
367+ l_packages_executed integer := 0;
368+ begin
369+ --act
370+ ut3.ut.run('test_csl_names1');
371+ dbms_output.get_lines( l_output_data, l_num_lines);
372+
373+ for i in 1 .. l_num_lines loop
374+ if l_output_data(i) like '%test_csl_names1%' then
375+ l_packages_executed := l_packages_executed + 1;
376+ end if;
377+ end loop;
378+ ut.expect(l_packages_executed ).to_equal(1);
379+ end;
380+
381+ procedure pass_vlist_with_proc is
382+ l_output_data dbms_output.chararr;
383+ l_num_lines integer := 100000;
384+ l_packages_executed integer := 0;
385+ begin
386+ --act
387+ ut3.ut.run(ut3.ut_varchar2_list('test_csl_names1','test_csl_names2'));
388+ dbms_output.get_lines( l_output_data, l_num_lines);
389+
390+ for i in 1 .. l_num_lines loop
391+ if l_output_data(i) like '%test_csl_names1%'
392+ or l_output_data(i) like '%test_csl_names2%' then
393+ l_packages_executed := l_packages_executed + 1;
394+ end if;
395+ end loop;
396+ ut.expect(l_packages_executed ).to_equal(2);
397+ end;
398+
399+ procedure pass_csl_with_proc is
400+ l_output_data dbms_output.chararr;
401+ l_num_lines integer := 100000;
402+ l_packages_executed integer := 0;
403+ begin
404+ --act
405+ ut3.ut.run('test_csl_names1,test_csl_names2');
406+ dbms_output.get_lines( l_output_data, l_num_lines);
407+
408+ for i in 1 .. l_num_lines loop
409+ if l_output_data(i) like '%test_csl_names1%'
410+ or l_output_data(i) like '%test_csl_names2%' then
411+ l_packages_executed := l_packages_executed + 1;
412+ end if;
413+ end loop;
414+ ut.expect(l_packages_executed ).to_equal(2);
415+ end;
416+
417+ procedure pass_csl_src_proc is
418+ l_output_data dbms_output.chararr;
419+ l_num_lines integer := 100000;
420+ l_packages_executed integer := 0;
421+ begin
422+ --act
423+ ut3.ut.run(a_path => 'test_csl_names1,test_csl_names2',
424+ a_source_files => ut3.ut_varchar2_list('ut3.ut'),
425+ a_test_files => ut3.ut_varchar2_list('ut3_tester.test_csl_names2'));
426+ dbms_output.get_lines( l_output_data, l_num_lines);
427+
428+ for i in 1 .. l_num_lines loop
429+ if l_output_data(i) like '%test_csl_names1%'
430+ or l_output_data(i) like '%test_csl_names2%' then
431+ l_packages_executed := l_packages_executed + 1;
432+ end if;
433+ end loop;
434+ ut.expect(l_packages_executed ).to_equal(2);
435+ end;
436+
331437end;
332438/
0 commit comments