Thanks to visit codestin.com
Credit goes to github.com

Skip to content
Merged
Show file tree
Hide file tree
Changes from 1 commit
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
Next Next commit
Fixed issue with parsing by trigger when source contains leading comm…
…ents.
  • Loading branch information
jgebal committed Jun 16, 2019
commit e0d6768ea76f6134ce1bafeac6bce410b8d235b5
3 changes: 2 additions & 1 deletion source/core/annotations/ut_annotation_manager.pkb
Original file line number Diff line number Diff line change
Expand Up @@ -267,10 +267,11 @@ create or replace package body ut_annotation_manager as
l_sql_text ora_name_list_t := a_sql_text;
Comment thread
jgebal marked this conversation as resolved.
Outdated
begin
if a_parts > 0 then
l_sql_text(1) := regexp_replace(l_sql_text(1),'^\s*create(\s+or\s+replace){0,1}(\s+(editionable|noneditionable)){0,1}\s+{0,1}', modifier => 'i');
for i in 1..a_parts loop
ut_utils.append_to_clob(l_sql_clob, l_sql_text(i));
end loop;
l_sql_clob := ut3.ut_utils.replace_multiline_comments(l_sql_clob);
l_sql_clob := regexp_replace(l_sql_clob, '^(.*?[^-]{2,}\s*create(\s+or\s+replace){0,1}(\s+(editionable|noneditionable))?\s+?)((package|type).*)', '\5', 1, 1, 'ni');
l_sql_lines := ut_utils.convert_collection( ut_utils.clob_to_table(l_sql_clob) );
end if;
open l_result for
Expand Down
15 changes: 12 additions & 3 deletions test/ut3_tester/core/annotations/test_annotation_manager.pkb
Original file line number Diff line number Diff line change
Expand Up @@ -39,10 +39,19 @@ create or replace package body test_annotation_manager is
procedure create_dummy_test_package is
pragma autonomous_transaction;
begin
execute immediate q'[create or replace package dummy_test_package as
execute immediate q'[
/*
* Some multiline comments before package spec
create or replace package dummy_test_package dummy comment to prove that we pick the right piece of code
*/
-- create or replace package dummy_test_package dummy comment to prove that we pick the right piece of code
--Some single-line comment before package spec
create or replace package dummy_test_package as
--%suite(dummy_test_suite)
--%rollback(manual)

--create or replace package dummy_test_package dummy comment to prove that we pick the right piece of code

--%test(dummy_test)
--%beforetest(some_procedure)
procedure some_dummy_test_procedure;
Expand Down Expand Up @@ -142,9 +151,9 @@ create or replace package body test_annotation_manager is
from dual union all
select 3, 'rollback' , 'manual', '' as subobject_name
from dual union all
select 5, 'test' , 'dummy_test', 'some_dummy_test_procedure' as subobject_name
select 7, 'test' , 'dummy_test', 'some_dummy_test_procedure' as subobject_name
from dual union all
select 6, 'beforetest' , 'some_procedure', 'some_dummy_test_procedure' as subobject_name
select 8, 'beforetest' , 'some_procedure', 'some_dummy_test_procedure' as subobject_name
from dual;

ut.expect(l_actual).to_equal(l_expected);
Expand Down