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

Skip to content

Commit f2764ea

Browse files
PazusPazus
committed
Merge branch 'develop' into issue-351
# Conflicts: # tests/RunAll.sql
2 parents ea719b2 + 9b77fda commit f2764ea

14 files changed

Lines changed: 510 additions & 301 deletions

‎source/core/ut_utils.pkb‎

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -211,7 +211,7 @@ create or replace package body ut_utils is
211211
return l_result;
212212
end;
213213

214-
function clob_to_table(a_clob clob, a_max_amount integer := 32767, a_delimiter varchar2:= chr(10)) return ut_varchar2_list is
214+
function clob_to_table(a_clob clob, a_max_amount integer := 8191, a_delimiter varchar2:= chr(10)) return ut_varchar2_list is
215215
l_offset integer := 1;
216216
l_length integer := dbms_lob.getlength(a_clob);
217217
l_amount integer;
@@ -329,4 +329,4 @@ create or replace package body ut_utils is
329329
end;
330330

331331
end ut_utils;
332-
/
332+
/

‎source/core/ut_utils.pks‎

Lines changed: 3 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -171,19 +171,20 @@ create or replace package ut_utils authid definer is
171171
Parameters:
172172
a_clob - the text to be split.
173173
a_delimiter - the delimiter character or string (default chr(10) )
174-
a_max_amount - the maximum length of returned string (default 32767)
174+
a_max_amount - the maximum length of returned string (default 8191)
175175

176176
Returns:
177177
ut_varchar2_list - table of string
178178

179179
Splits a given string into table of string by delimiter.
180+
Default value of a_max_amount is 8191 because of code can contains multibyte character.
180181
The delimiter gets removed.
181182
If null passed as any of the parameters, empty table is returned.
182183
If split text is longer than a_max_amount it gets split into pieces of a_max_amount.
183184
If no text between delimiters found then an empty row is returned, example:
184185
string_to_table( 'a,,b', ',' ) gives table ut_varchar2_list( 'a', null, 'b' );
185186
*/
186-
function clob_to_table(a_clob clob, a_max_amount integer := 32767, a_delimiter varchar2:= chr(10)) return ut_varchar2_list;
187+
function clob_to_table(a_clob clob, a_max_amount integer := 8191, a_delimiter varchar2:= chr(10)) return ut_varchar2_list;
187188

188189
function table_to_clob(a_text_table ut_varchar2_list, a_delimiter varchar2:= chr(10)) return clob;
189190

‎source/create_synonyms_and_grants_for_public.sql‎

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -17,13 +17,13 @@
1717
Create all necessary grant for the user who owns test packages and want to execute utPLSQL framework
1818
*/
1919

20+
@@define_ut3_owner_param.sql
21+
2022
set echo off
2123
set feedback on
2224
set heading off
2325
set verify off
2426

25-
define ut3_owner = &1
26-
2727
prompt Granting privileges on UTPLSQL objects in &&ut3_owner schema to PUBLIC
2828

2929
whenever sqlerror exit failure rollback

‎source/create_synonyms_and_grants_for_user.sql‎

Lines changed: 22 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -17,14 +17,33 @@
1717
Create all necessary grant for the user who owns test packages and want to execute utPLSQL framework
1818
*/
1919

20+
@@define_ut3_owner_param.sql
21+
22+
column 2 new_value 2 noprint
23+
select null as "2" from dual where 1=0;
24+
spool params.sql.tmp
25+
select
26+
case
27+
when '&&2' is null then q'[ACCEPT ut3_user CHAR PROMPT 'Provide schema name where synonyms for the utPLSQL v3 should be created ']'
28+
else 'define ut3_user=&&2'
29+
end
30+
from dual;
31+
spool off
32+
set termout on
33+
@params.sql.tmp
34+
set termout off
35+
/* cleanup temporary sql files */
36+
--try running on windows
37+
$ del params.sql.tmp
38+
--try running on linux/unix
39+
! rm params.sql.tmp
40+
set termout on
41+
2042
set echo off
2143
set feedback on
2244
set heading off
2345
set verify off
2446

25-
define ut3_owner = &1
26-
define ut3_user = &2
27-
2847
prompt Granting privileges on UTPLSQL objects in &&ut3_owner schema to user &&ut3_user
2948

3049
whenever sqlerror exit failure rollback

‎source/define_ut3_owner_param.sql‎

Lines changed: 36 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,36 @@
1+
set serveroutput on size unlimited format truncated
2+
whenever oserror continue
3+
4+
set heading off
5+
set linesize 1000
6+
set pagesize 0
7+
8+
set verify off
9+
set define on
10+
11+
set termout off
12+
set timing off
13+
set feedback off
14+
15+
column line_separator new_value line_separator noprint
16+
select '--------------------------------------------------------------' as line_separator from dual;
17+
18+
column 1 new_value 1 noprint
19+
select null as "1" from dual where 1=0;
20+
spool params.sql.tmp
21+
select
22+
case
23+
when '&&1' is null then q'[ACCEPT ut3_owner CHAR DEFAULT 'UT3' PROMPT 'Provide schema for the utPLSQL v3 (UT3)']'
24+
else 'define ut3_owner=&&1'
25+
end
26+
from dual;
27+
spool off
28+
set termout on
29+
@params.sql.tmp
30+
set termout off
31+
/* cleanup temporary sql files */
32+
--try running on windows
33+
$ del params.sql.tmp
34+
--try running on linux/unix
35+
! rm params.sql.tmp
36+
set termout on

0 commit comments

Comments
 (0)