eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.WF_BES_FUNCS dependencies on UTL_FILE

Line 38: where name = 'utl_file_dir';

34: --Get the directory where the output file is to be generated
35: select value
36: into utl_dir
37: from v$parameter
38: where name = 'utl_file_dir';
39:
40: --The value can be a comma separeated list, So take the first location and
41: --use that as the output directory.
42: if(instr(utl_dir, ',') <> 0) then

Line 76: fh utl_file.file_type;

72: -- procedures
73: --
74: Procedure StaticQH(p_agent_names in varchar_array) AS
75:
76: fh utl_file.file_type;
77: l_generated boolean := FALSE;
78: l_atleast_one boolean;
79: l_first boolean;
80:

Line 106: fh := utl_file.fopen(utl_dir, l_filename, 'w', 32767);

102: from dual;
103:
104: l_filename := 'WFAGTDFNB'||l_timestamp||'.pls';
105:
106: fh := utl_file.fopen(utl_dir, l_filename, 'w', 32767);
107:
108: utl_file.put_line(fh, 'REM dbdrv: sql ~PROD ~PATH ~FILE none none none package '||g_amp||'phase=plb \');
109: utl_file.put_line(fh, 'REM dbdrv: checkfile(115.2=120.3):~PROD:~PATH:~FILE');
110: utl_file.put_line(fh, '/*=======================================================================*');

Line 108: utl_file.put_line(fh, 'REM dbdrv: sql ~PROD ~PATH ~FILE none none none package '||g_amp||'phase=plb \');

104: l_filename := 'WFAGTDFNB'||l_timestamp||'.pls';
105:
106: fh := utl_file.fopen(utl_dir, l_filename, 'w', 32767);
107:
108: utl_file.put_line(fh, 'REM dbdrv: sql ~PROD ~PATH ~FILE none none none package '||g_amp||'phase=plb \');
109: utl_file.put_line(fh, 'REM dbdrv: checkfile(115.2=120.3):~PROD:~PATH:~FILE');
110: utl_file.put_line(fh, '/*=======================================================================*');
111: utl_file.put_line(fh, '| Copyright (c) 2005, Oracle. All Rights Reserved |');
112: utl_file.put_line(fh, '+========================================================================+');

Line 109: utl_file.put_line(fh, 'REM dbdrv: checkfile(115.2=120.3):~PROD:~PATH:~FILE');

105:
106: fh := utl_file.fopen(utl_dir, l_filename, 'w', 32767);
107:
108: utl_file.put_line(fh, 'REM dbdrv: sql ~PROD ~PATH ~FILE none none none package '||g_amp||'phase=plb \');
109: utl_file.put_line(fh, 'REM dbdrv: checkfile(115.2=120.3):~PROD:~PATH:~FILE');
110: utl_file.put_line(fh, '/*=======================================================================*');
111: utl_file.put_line(fh, '| Copyright (c) 2005, Oracle. All Rights Reserved |');
112: utl_file.put_line(fh, '+========================================================================+');
113: utl_file.put_line(fh, '| NAME |');

Line 110: utl_file.put_line(fh, '/=======================================================================');

106: fh := utl_file.fopen(utl_dir, l_filename, 'w', 32767);
107:
108: utl_file.put_line(fh, 'REM dbdrv: sql ~PROD ~PATH ~FILE none none none package '||g_amp||'phase=plb \');
109: utl_file.put_line(fh, 'REM dbdrv: checkfile(115.2=120.3):~PROD:~PATH:~FILE');
110: utl_file.put_line(fh, '/*=======================================================================*');
111: utl_file.put_line(fh, '| Copyright (c) 2005, Oracle. All Rights Reserved |');
112: utl_file.put_line(fh, '+========================================================================+');
113: utl_file.put_line(fh, '| NAME |');
114: utl_file.put_line(fh, '| WFAGTDFNB'||l_timestamp||'.pls |');

Line 111: utl_file.put_line(fh, '| Copyright (c) 2005, Oracle. All Rights Reserved |');

107:
108: utl_file.put_line(fh, 'REM dbdrv: sql ~PROD ~PATH ~FILE none none none package '||g_amp||'phase=plb \');
109: utl_file.put_line(fh, 'REM dbdrv: checkfile(115.2=120.3):~PROD:~PATH:~FILE');
110: utl_file.put_line(fh, '/*=======================================================================*');
111: utl_file.put_line(fh, '| Copyright (c) 2005, Oracle. All Rights Reserved |');
112: utl_file.put_line(fh, '+========================================================================+');
113: utl_file.put_line(fh, '| NAME |');
114: utl_file.put_line(fh, '| WFAGTDFNB'||l_timestamp||'.pls |');
115: utl_file.put_line(fh, '| |');

Line 112: utl_file.put_line(fh, '+========================================================================+');

108: utl_file.put_line(fh, 'REM dbdrv: sql ~PROD ~PATH ~FILE none none none package '||g_amp||'phase=plb \');
109: utl_file.put_line(fh, 'REM dbdrv: checkfile(115.2=120.3):~PROD:~PATH:~FILE');
110: utl_file.put_line(fh, '/*=======================================================================*');
111: utl_file.put_line(fh, '| Copyright (c) 2005, Oracle. All Rights Reserved |');
112: utl_file.put_line(fh, '+========================================================================+');
113: utl_file.put_line(fh, '| NAME |');
114: utl_file.put_line(fh, '| WFAGTDFNB'||l_timestamp||'.pls |');
115: utl_file.put_line(fh, '| |');
116: utl_file.put_line(fh, '| DESCRIPTION |');

Line 113: utl_file.put_line(fh, '| NAME |');

109: utl_file.put_line(fh, 'REM dbdrv: checkfile(115.2=120.3):~PROD:~PATH:~FILE');
110: utl_file.put_line(fh, '/*=======================================================================*');
111: utl_file.put_line(fh, '| Copyright (c) 2005, Oracle. All Rights Reserved |');
112: utl_file.put_line(fh, '+========================================================================+');
113: utl_file.put_line(fh, '| NAME |');
114: utl_file.put_line(fh, '| WFAGTDFNB'||l_timestamp||'.pls |');
115: utl_file.put_line(fh, '| |');
116: utl_file.put_line(fh, '| DESCRIPTION |');
117: utl_file.put_line(fh, '| This is a generated file to provide static calls for |');

Line 114: utl_file.put_line(fh, '| WFAGTDFNB'||l_timestamp||'.pls |');

110: utl_file.put_line(fh, '/*=======================================================================*');
111: utl_file.put_line(fh, '| Copyright (c) 2005, Oracle. All Rights Reserved |');
112: utl_file.put_line(fh, '+========================================================================+');
113: utl_file.put_line(fh, '| NAME |');
114: utl_file.put_line(fh, '| WFAGTDFNB'||l_timestamp||'.pls |');
115: utl_file.put_line(fh, '| |');
116: utl_file.put_line(fh, '| DESCRIPTION |');
117: utl_file.put_line(fh, '| This is a generated file to provide static calls for |');
118: utl_file.put_line(fh, '| Enqueue/Dequeue functions. |');

Line 115: utl_file.put_line(fh, '| |');

111: utl_file.put_line(fh, '| Copyright (c) 2005, Oracle. All Rights Reserved |');
112: utl_file.put_line(fh, '+========================================================================+');
113: utl_file.put_line(fh, '| NAME |');
114: utl_file.put_line(fh, '| WFAGTDFNB'||l_timestamp||'.pls |');
115: utl_file.put_line(fh, '| |');
116: utl_file.put_line(fh, '| DESCRIPTION |');
117: utl_file.put_line(fh, '| This is a generated file to provide static calls for |');
118: utl_file.put_line(fh, '| Enqueue/Dequeue functions. |');
119: utl_file.put_line(fh, '| |');

Line 116: utl_file.put_line(fh, '| DESCRIPTION |');

112: utl_file.put_line(fh, '+========================================================================+');
113: utl_file.put_line(fh, '| NAME |');
114: utl_file.put_line(fh, '| WFAGTDFNB'||l_timestamp||'.pls |');
115: utl_file.put_line(fh, '| |');
116: utl_file.put_line(fh, '| DESCRIPTION |');
117: utl_file.put_line(fh, '| This is a generated file to provide static calls for |');
118: utl_file.put_line(fh, '| Enqueue/Dequeue functions. |');
119: utl_file.put_line(fh, '| |');
120: utl_file.put_line(fh, '*========================================================================*/ ');

Line 117: utl_file.put_line(fh, '| This is a generated file to provide static calls for |');

113: utl_file.put_line(fh, '| NAME |');
114: utl_file.put_line(fh, '| WFAGTDFNB'||l_timestamp||'.pls |');
115: utl_file.put_line(fh, '| |');
116: utl_file.put_line(fh, '| DESCRIPTION |');
117: utl_file.put_line(fh, '| This is a generated file to provide static calls for |');
118: utl_file.put_line(fh, '| Enqueue/Dequeue functions. |');
119: utl_file.put_line(fh, '| |');
120: utl_file.put_line(fh, '*========================================================================*/ ');
121: utl_file.put_line(fh,'SET VERIFY OFF;');

Line 118: utl_file.put_line(fh, '| Enqueue/Dequeue functions. |');

114: utl_file.put_line(fh, '| WFAGTDFNB'||l_timestamp||'.pls |');
115: utl_file.put_line(fh, '| |');
116: utl_file.put_line(fh, '| DESCRIPTION |');
117: utl_file.put_line(fh, '| This is a generated file to provide static calls for |');
118: utl_file.put_line(fh, '| Enqueue/Dequeue functions. |');
119: utl_file.put_line(fh, '| |');
120: utl_file.put_line(fh, '*========================================================================*/ ');
121: utl_file.put_line(fh,'SET VERIFY OFF;');
122: utl_file.put_line(fh,'WHENEVER SQLERROR EXIT FAILURE ROLLBACK;');

Line 119: utl_file.put_line(fh, '| |');

115: utl_file.put_line(fh, '| |');
116: utl_file.put_line(fh, '| DESCRIPTION |');
117: utl_file.put_line(fh, '| This is a generated file to provide static calls for |');
118: utl_file.put_line(fh, '| Enqueue/Dequeue functions. |');
119: utl_file.put_line(fh, '| |');
120: utl_file.put_line(fh, '*========================================================================*/ ');
121: utl_file.put_line(fh,'SET VERIFY OFF;');
122: utl_file.put_line(fh,'WHENEVER SQLERROR EXIT FAILURE ROLLBACK;');
123: utl_file.put_line(fh,'WHENEVER OSERROR EXIT FAILURE ROLLBACK;');

Line 120: utl_file.put_line(fh, '========================================================================/ ');

116: utl_file.put_line(fh, '| DESCRIPTION |');
117: utl_file.put_line(fh, '| This is a generated file to provide static calls for |');
118: utl_file.put_line(fh, '| Enqueue/Dequeue functions. |');
119: utl_file.put_line(fh, '| |');
120: utl_file.put_line(fh, '*========================================================================*/ ');
121: utl_file.put_line(fh,'SET VERIFY OFF;');
122: utl_file.put_line(fh,'WHENEVER SQLERROR EXIT FAILURE ROLLBACK;');
123: utl_file.put_line(fh,'WHENEVER OSERROR EXIT FAILURE ROLLBACK;');
124:

Line 121: utl_file.put_line(fh,'SET VERIFY OFF;');

117: utl_file.put_line(fh, '| This is a generated file to provide static calls for |');
118: utl_file.put_line(fh, '| Enqueue/Dequeue functions. |');
119: utl_file.put_line(fh, '| |');
120: utl_file.put_line(fh, '*========================================================================*/ ');
121: utl_file.put_line(fh,'SET VERIFY OFF;');
122: utl_file.put_line(fh,'WHENEVER SQLERROR EXIT FAILURE ROLLBACK;');
123: utl_file.put_line(fh,'WHENEVER OSERROR EXIT FAILURE ROLLBACK;');
124:
125: utl_file.put_line(fh,'create or replace package body WF_AGT_DYN_FUNCS as');

Line 122: utl_file.put_line(fh,'WHENEVER SQLERROR EXIT FAILURE ROLLBACK;');

118: utl_file.put_line(fh, '| Enqueue/Dequeue functions. |');
119: utl_file.put_line(fh, '| |');
120: utl_file.put_line(fh, '*========================================================================*/ ');
121: utl_file.put_line(fh,'SET VERIFY OFF;');
122: utl_file.put_line(fh,'WHENEVER SQLERROR EXIT FAILURE ROLLBACK;');
123: utl_file.put_line(fh,'WHENEVER OSERROR EXIT FAILURE ROLLBACK;');
124:
125: utl_file.put_line(fh,'create or replace package body WF_AGT_DYN_FUNCS as');
126:

Line 123: utl_file.put_line(fh,'WHENEVER OSERROR EXIT FAILURE ROLLBACK;');

119: utl_file.put_line(fh, '| |');
120: utl_file.put_line(fh, '*========================================================================*/ ');
121: utl_file.put_line(fh,'SET VERIFY OFF;');
122: utl_file.put_line(fh,'WHENEVER SQLERROR EXIT FAILURE ROLLBACK;');
123: utl_file.put_line(fh,'WHENEVER OSERROR EXIT FAILURE ROLLBACK;');
124:
125: utl_file.put_line(fh,'create or replace package body WF_AGT_DYN_FUNCS as');
126:
127: utl_file.put_line(fh,'');

Line 125: utl_file.put_line(fh,'create or replace package body WF_AGT_DYN_FUNCS as');

121: utl_file.put_line(fh,'SET VERIFY OFF;');
122: utl_file.put_line(fh,'WHENEVER SQLERROR EXIT FAILURE ROLLBACK;');
123: utl_file.put_line(fh,'WHENEVER OSERROR EXIT FAILURE ROLLBACK;');
124:
125: utl_file.put_line(fh,'create or replace package body WF_AGT_DYN_FUNCS as');
126:
127: utl_file.put_line(fh,'');
128: utl_file.put_line(fh,'--');
129: utl_file.put_line(fh,'-- Static enqueue procedure calls ');

Line 127: utl_file.put_line(fh,'');

123: utl_file.put_line(fh,'WHENEVER OSERROR EXIT FAILURE ROLLBACK;');
124:
125: utl_file.put_line(fh,'create or replace package body WF_AGT_DYN_FUNCS as');
126:
127: utl_file.put_line(fh,'');
128: utl_file.put_line(fh,'--');
129: utl_file.put_line(fh,'-- Static enqueue procedure calls ');
130: utl_file.put_line(fh,'--');
131: utl_file.put_line(fh,'PROCEDURE StaticEnqueue(p_qh_name in varchar2,');

Line 128: utl_file.put_line(fh,'--');

124:
125: utl_file.put_line(fh,'create or replace package body WF_AGT_DYN_FUNCS as');
126:
127: utl_file.put_line(fh,'');
128: utl_file.put_line(fh,'--');
129: utl_file.put_line(fh,'-- Static enqueue procedure calls ');
130: utl_file.put_line(fh,'--');
131: utl_file.put_line(fh,'PROCEDURE StaticEnqueue(p_qh_name in varchar2,');
132: utl_file.put_line(fh,' p_event in wf_event_t,');

Line 129: utl_file.put_line(fh,'-- Static enqueue procedure calls ');

125: utl_file.put_line(fh,'create or replace package body WF_AGT_DYN_FUNCS as');
126:
127: utl_file.put_line(fh,'');
128: utl_file.put_line(fh,'--');
129: utl_file.put_line(fh,'-- Static enqueue procedure calls ');
130: utl_file.put_line(fh,'--');
131: utl_file.put_line(fh,'PROCEDURE StaticEnqueue(p_qh_name in varchar2,');
132: utl_file.put_line(fh,' p_event in wf_event_t,');
133: utl_file.put_line(fh,' p_out_agent_override in wf_agent_t,');

Line 130: utl_file.put_line(fh,'--');

126:
127: utl_file.put_line(fh,'');
128: utl_file.put_line(fh,'--');
129: utl_file.put_line(fh,'-- Static enqueue procedure calls ');
130: utl_file.put_line(fh,'--');
131: utl_file.put_line(fh,'PROCEDURE StaticEnqueue(p_qh_name in varchar2,');
132: utl_file.put_line(fh,' p_event in wf_event_t,');
133: utl_file.put_line(fh,' p_out_agent_override in wf_agent_t,');
134: utl_file.put_line(fh,' p_executed out nocopy boolean)');

Line 131: utl_file.put_line(fh,'PROCEDURE StaticEnqueue(p_qh_name in varchar2,');

127: utl_file.put_line(fh,'');
128: utl_file.put_line(fh,'--');
129: utl_file.put_line(fh,'-- Static enqueue procedure calls ');
130: utl_file.put_line(fh,'--');
131: utl_file.put_line(fh,'PROCEDURE StaticEnqueue(p_qh_name in varchar2,');
132: utl_file.put_line(fh,' p_event in wf_event_t,');
133: utl_file.put_line(fh,' p_out_agent_override in wf_agent_t,');
134: utl_file.put_line(fh,' p_executed out nocopy boolean)');
135: utl_file.put_line(fh,'as');

Line 132: utl_file.put_line(fh,' p_event in wf_event_t,');

128: utl_file.put_line(fh,'--');
129: utl_file.put_line(fh,'-- Static enqueue procedure calls ');
130: utl_file.put_line(fh,'--');
131: utl_file.put_line(fh,'PROCEDURE StaticEnqueue(p_qh_name in varchar2,');
132: utl_file.put_line(fh,' p_event in wf_event_t,');
133: utl_file.put_line(fh,' p_out_agent_override in wf_agent_t,');
134: utl_file.put_line(fh,' p_executed out nocopy boolean)');
135: utl_file.put_line(fh,'as');
136: utl_file.put_line(fh,' l_qh_name varchar2(240);');

Line 133: utl_file.put_line(fh,' p_out_agent_override in wf_agent_t,');

129: utl_file.put_line(fh,'-- Static enqueue procedure calls ');
130: utl_file.put_line(fh,'--');
131: utl_file.put_line(fh,'PROCEDURE StaticEnqueue(p_qh_name in varchar2,');
132: utl_file.put_line(fh,' p_event in wf_event_t,');
133: utl_file.put_line(fh,' p_out_agent_override in wf_agent_t,');
134: utl_file.put_line(fh,' p_executed out nocopy boolean)');
135: utl_file.put_line(fh,'as');
136: utl_file.put_line(fh,' l_qh_name varchar2(240);');
137: utl_file.put_line(fh,'begin');

Line 134: utl_file.put_line(fh,' p_executed out nocopy boolean)');

130: utl_file.put_line(fh,'--');
131: utl_file.put_line(fh,'PROCEDURE StaticEnqueue(p_qh_name in varchar2,');
132: utl_file.put_line(fh,' p_event in wf_event_t,');
133: utl_file.put_line(fh,' p_out_agent_override in wf_agent_t,');
134: utl_file.put_line(fh,' p_executed out nocopy boolean)');
135: utl_file.put_line(fh,'as');
136: utl_file.put_line(fh,' l_qh_name varchar2(240);');
137: utl_file.put_line(fh,'begin');
138: utl_file.put_line(fh,' p_executed := FALSE;');

Line 135: utl_file.put_line(fh,'as');

131: utl_file.put_line(fh,'PROCEDURE StaticEnqueue(p_qh_name in varchar2,');
132: utl_file.put_line(fh,' p_event in wf_event_t,');
133: utl_file.put_line(fh,' p_out_agent_override in wf_agent_t,');
134: utl_file.put_line(fh,' p_executed out nocopy boolean)');
135: utl_file.put_line(fh,'as');
136: utl_file.put_line(fh,' l_qh_name varchar2(240);');
137: utl_file.put_line(fh,'begin');
138: utl_file.put_line(fh,' p_executed := FALSE;');
139: utl_file.put_line(fh,' l_qh_name := upper(trim(p_qh_name));');

Line 136: utl_file.put_line(fh,' l_qh_name varchar2(240);');

132: utl_file.put_line(fh,' p_event in wf_event_t,');
133: utl_file.put_line(fh,' p_out_agent_override in wf_agent_t,');
134: utl_file.put_line(fh,' p_executed out nocopy boolean)');
135: utl_file.put_line(fh,'as');
136: utl_file.put_line(fh,' l_qh_name varchar2(240);');
137: utl_file.put_line(fh,'begin');
138: utl_file.put_line(fh,' p_executed := FALSE;');
139: utl_file.put_line(fh,' l_qh_name := upper(trim(p_qh_name));');
140:

Line 137: utl_file.put_line(fh,'begin');

133: utl_file.put_line(fh,' p_out_agent_override in wf_agent_t,');
134: utl_file.put_line(fh,' p_executed out nocopy boolean)');
135: utl_file.put_line(fh,'as');
136: utl_file.put_line(fh,' l_qh_name varchar2(240);');
137: utl_file.put_line(fh,'begin');
138: utl_file.put_line(fh,' p_executed := FALSE;');
139: utl_file.put_line(fh,' l_qh_name := upper(trim(p_qh_name));');
140:
141: if (p_agent_names is not null) then

Line 138: utl_file.put_line(fh,' p_executed := FALSE;');

134: utl_file.put_line(fh,' p_executed out nocopy boolean)');
135: utl_file.put_line(fh,'as');
136: utl_file.put_line(fh,' l_qh_name varchar2(240);');
137: utl_file.put_line(fh,'begin');
138: utl_file.put_line(fh,' p_executed := FALSE;');
139: utl_file.put_line(fh,' l_qh_name := upper(trim(p_qh_name));');
140:
141: if (p_agent_names is not null) then
142: for i in p_agent_names.FIRST..p_agent_names.LAST loop

Line 139: utl_file.put_line(fh,' l_qh_name := upper(trim(p_qh_name));');

135: utl_file.put_line(fh,'as');
136: utl_file.put_line(fh,' l_qh_name varchar2(240);');
137: utl_file.put_line(fh,'begin');
138: utl_file.put_line(fh,' p_executed := FALSE;');
139: utl_file.put_line(fh,' l_qh_name := upper(trim(p_qh_name));');
140:
141: if (p_agent_names is not null) then
142: for i in p_agent_names.FIRST..p_agent_names.LAST loop
143: l_first := TRUE;

Line 148: utl_file.put_line(fh,' if (l_qh_name = '''

144: l_atleast_one := FALSE;
145: for qhandler_rec in all_Queue_handlers(upper(p_agent_names(i))) loop
146: l_atleast_one := TRUE;
147: l_generated := TRUE;
148: utl_file.put_line(fh,' if (l_qh_name = '''
149: || qhandler_rec.qhandler || ''') then');
150: utl_file.put_line(fh,' '||qhandler_rec.qhandler
151: || '.Enqueue(p_event, p_out_agent_override);');
152: utl_file.put_line(fh,' p_executed := TRUE;');

Line 150: utl_file.put_line(fh,' '||qhandler_rec.qhandler

146: l_atleast_one := TRUE;
147: l_generated := TRUE;
148: utl_file.put_line(fh,' if (l_qh_name = '''
149: || qhandler_rec.qhandler || ''') then');
150: utl_file.put_line(fh,' '||qhandler_rec.qhandler
151: || '.Enqueue(p_event, p_out_agent_override);');
152: utl_file.put_line(fh,' p_executed := TRUE;');
153: utl_file.put_line(fh,' return;');
154: utl_file.put_line(fh,' end if; ');

Line 152: utl_file.put_line(fh,' p_executed := TRUE;');

148: utl_file.put_line(fh,' if (l_qh_name = '''
149: || qhandler_rec.qhandler || ''') then');
150: utl_file.put_line(fh,' '||qhandler_rec.qhandler
151: || '.Enqueue(p_event, p_out_agent_override);');
152: utl_file.put_line(fh,' p_executed := TRUE;');
153: utl_file.put_line(fh,' return;');
154: utl_file.put_line(fh,' end if; ');
155: end loop;
156: end loop; -- p_agent_names

Line 153: utl_file.put_line(fh,' return;');

149: || qhandler_rec.qhandler || ''') then');
150: utl_file.put_line(fh,' '||qhandler_rec.qhandler
151: || '.Enqueue(p_event, p_out_agent_override);');
152: utl_file.put_line(fh,' p_executed := TRUE;');
153: utl_file.put_line(fh,' return;');
154: utl_file.put_line(fh,' end if; ');
155: end loop;
156: end loop; -- p_agent_names
157: end if; -- p_agent_names

Line 154: utl_file.put_line(fh,' end if; ');

150: utl_file.put_line(fh,' '||qhandler_rec.qhandler
151: || '.Enqueue(p_event, p_out_agent_override);');
152: utl_file.put_line(fh,' p_executed := TRUE;');
153: utl_file.put_line(fh,' return;');
154: utl_file.put_line(fh,' end if; ');
155: end loop;
156: end loop; -- p_agent_names
157: end if; -- p_agent_names
158:

Line 161: utl_file.put_line(fh, '');

157: end if; -- p_agent_names
158:
159: -- give a message within the generated file regarding the failure
160: if (not l_generated) then
161: utl_file.put_line(fh, '');
162: utl_file.put_line(fh, ' -- Package body could not be generated for the agent names given.');
163: utl_file.put_line(fh, ' -- The reason could be because the procedure(s) referred to by the');
164: utl_file.put_line(fh, ' -- agent name(s) was invalid or the agent name(s) specified do not exist');
165: utl_file.put_line(fh, '');

Line 162: utl_file.put_line(fh, ' -- Package body could not be generated for the agent names given.');

158:
159: -- give a message within the generated file regarding the failure
160: if (not l_generated) then
161: utl_file.put_line(fh, '');
162: utl_file.put_line(fh, ' -- Package body could not be generated for the agent names given.');
163: utl_file.put_line(fh, ' -- The reason could be because the procedure(s) referred to by the');
164: utl_file.put_line(fh, ' -- agent name(s) was invalid or the agent name(s) specified do not exist');
165: utl_file.put_line(fh, '');
166: end if;

Line 163: utl_file.put_line(fh, ' -- The reason could be because the procedure(s) referred to by the');

159: -- give a message within the generated file regarding the failure
160: if (not l_generated) then
161: utl_file.put_line(fh, '');
162: utl_file.put_line(fh, ' -- Package body could not be generated for the agent names given.');
163: utl_file.put_line(fh, ' -- The reason could be because the procedure(s) referred to by the');
164: utl_file.put_line(fh, ' -- agent name(s) was invalid or the agent name(s) specified do not exist');
165: utl_file.put_line(fh, '');
166: end if;
167:

Line 164: utl_file.put_line(fh, ' -- agent name(s) was invalid or the agent name(s) specified do not exist');

160: if (not l_generated) then
161: utl_file.put_line(fh, '');
162: utl_file.put_line(fh, ' -- Package body could not be generated for the agent names given.');
163: utl_file.put_line(fh, ' -- The reason could be because the procedure(s) referred to by the');
164: utl_file.put_line(fh, ' -- agent name(s) was invalid or the agent name(s) specified do not exist');
165: utl_file.put_line(fh, '');
166: end if;
167:
168: utl_file.put_line(fh,'end StaticEnqueue;');

Line 165: utl_file.put_line(fh, '');

161: utl_file.put_line(fh, '');
162: utl_file.put_line(fh, ' -- Package body could not be generated for the agent names given.');
163: utl_file.put_line(fh, ' -- The reason could be because the procedure(s) referred to by the');
164: utl_file.put_line(fh, ' -- agent name(s) was invalid or the agent name(s) specified do not exist');
165: utl_file.put_line(fh, '');
166: end if;
167:
168: utl_file.put_line(fh,'end StaticEnqueue;');
169:

Line 168: utl_file.put_line(fh,'end StaticEnqueue;');

164: utl_file.put_line(fh, ' -- agent name(s) was invalid or the agent name(s) specified do not exist');
165: utl_file.put_line(fh, '');
166: end if;
167:
168: utl_file.put_line(fh,'end StaticEnqueue;');
169:
170: utl_file.put_line(fh,'');
171: utl_file.put_line(fh,'--');
172: utl_file.put_line(fh,'-- Static dequeue procedure calls ');

Line 170: utl_file.put_line(fh,'');

166: end if;
167:
168: utl_file.put_line(fh,'end StaticEnqueue;');
169:
170: utl_file.put_line(fh,'');
171: utl_file.put_line(fh,'--');
172: utl_file.put_line(fh,'-- Static dequeue procedure calls ');
173: utl_file.put_line(fh,'--');
174:

Line 171: utl_file.put_line(fh,'--');

167:
168: utl_file.put_line(fh,'end StaticEnqueue;');
169:
170: utl_file.put_line(fh,'');
171: utl_file.put_line(fh,'--');
172: utl_file.put_line(fh,'-- Static dequeue procedure calls ');
173: utl_file.put_line(fh,'--');
174:
175: utl_file.put_line(fh,'PROCEDURE StaticDequeue(p_qh_name in varchar2,');

Line 172: utl_file.put_line(fh,'-- Static dequeue procedure calls ');

168: utl_file.put_line(fh,'end StaticEnqueue;');
169:
170: utl_file.put_line(fh,'');
171: utl_file.put_line(fh,'--');
172: utl_file.put_line(fh,'-- Static dequeue procedure calls ');
173: utl_file.put_line(fh,'--');
174:
175: utl_file.put_line(fh,'PROCEDURE StaticDequeue(p_qh_name in varchar2,');
176: utl_file.put_line(fh,' p_agent_guid in raw,');

Line 173: utl_file.put_line(fh,'--');

169:
170: utl_file.put_line(fh,'');
171: utl_file.put_line(fh,'--');
172: utl_file.put_line(fh,'-- Static dequeue procedure calls ');
173: utl_file.put_line(fh,'--');
174:
175: utl_file.put_line(fh,'PROCEDURE StaticDequeue(p_qh_name in varchar2,');
176: utl_file.put_line(fh,' p_agent_guid in raw,');
177: utl_file.put_line(fh,' p_event in out nocopy wf_event_t,');

Line 175: utl_file.put_line(fh,'PROCEDURE StaticDequeue(p_qh_name in varchar2,');

171: utl_file.put_line(fh,'--');
172: utl_file.put_line(fh,'-- Static dequeue procedure calls ');
173: utl_file.put_line(fh,'--');
174:
175: utl_file.put_line(fh,'PROCEDURE StaticDequeue(p_qh_name in varchar2,');
176: utl_file.put_line(fh,' p_agent_guid in raw,');
177: utl_file.put_line(fh,' p_event in out nocopy wf_event_t,');
178: utl_file.put_line(fh,' p_wait in binary_integer,');
179: utl_file.put_line(fh,' p_executed out nocopy boolean)');

Line 176: utl_file.put_line(fh,' p_agent_guid in raw,');

172: utl_file.put_line(fh,'-- Static dequeue procedure calls ');
173: utl_file.put_line(fh,'--');
174:
175: utl_file.put_line(fh,'PROCEDURE StaticDequeue(p_qh_name in varchar2,');
176: utl_file.put_line(fh,' p_agent_guid in raw,');
177: utl_file.put_line(fh,' p_event in out nocopy wf_event_t,');
178: utl_file.put_line(fh,' p_wait in binary_integer,');
179: utl_file.put_line(fh,' p_executed out nocopy boolean)');
180:

Line 177: utl_file.put_line(fh,' p_event in out nocopy wf_event_t,');

173: utl_file.put_line(fh,'--');
174:
175: utl_file.put_line(fh,'PROCEDURE StaticDequeue(p_qh_name in varchar2,');
176: utl_file.put_line(fh,' p_agent_guid in raw,');
177: utl_file.put_line(fh,' p_event in out nocopy wf_event_t,');
178: utl_file.put_line(fh,' p_wait in binary_integer,');
179: utl_file.put_line(fh,' p_executed out nocopy boolean)');
180:
181: utl_file.put_line(fh,'as');

Line 178: utl_file.put_line(fh,' p_wait in binary_integer,');

174:
175: utl_file.put_line(fh,'PROCEDURE StaticDequeue(p_qh_name in varchar2,');
176: utl_file.put_line(fh,' p_agent_guid in raw,');
177: utl_file.put_line(fh,' p_event in out nocopy wf_event_t,');
178: utl_file.put_line(fh,' p_wait in binary_integer,');
179: utl_file.put_line(fh,' p_executed out nocopy boolean)');
180:
181: utl_file.put_line(fh,'as');
182: utl_file.put_line(fh,' l_qh_name varchar2(240);');

Line 179: utl_file.put_line(fh,' p_executed out nocopy boolean)');

175: utl_file.put_line(fh,'PROCEDURE StaticDequeue(p_qh_name in varchar2,');
176: utl_file.put_line(fh,' p_agent_guid in raw,');
177: utl_file.put_line(fh,' p_event in out nocopy wf_event_t,');
178: utl_file.put_line(fh,' p_wait in binary_integer,');
179: utl_file.put_line(fh,' p_executed out nocopy boolean)');
180:
181: utl_file.put_line(fh,'as');
182: utl_file.put_line(fh,' l_qh_name varchar2(240);');
183: utl_file.put_line(fh,'begin');

Line 181: utl_file.put_line(fh,'as');

177: utl_file.put_line(fh,' p_event in out nocopy wf_event_t,');
178: utl_file.put_line(fh,' p_wait in binary_integer,');
179: utl_file.put_line(fh,' p_executed out nocopy boolean)');
180:
181: utl_file.put_line(fh,'as');
182: utl_file.put_line(fh,' l_qh_name varchar2(240);');
183: utl_file.put_line(fh,'begin');
184: utl_file.put_line(fh,' p_executed := FALSE;');
185: utl_file.put_line(fh,' l_qh_name := upper(trim(p_qh_name));');

Line 182: utl_file.put_line(fh,' l_qh_name varchar2(240);');

178: utl_file.put_line(fh,' p_wait in binary_integer,');
179: utl_file.put_line(fh,' p_executed out nocopy boolean)');
180:
181: utl_file.put_line(fh,'as');
182: utl_file.put_line(fh,' l_qh_name varchar2(240);');
183: utl_file.put_line(fh,'begin');
184: utl_file.put_line(fh,' p_executed := FALSE;');
185: utl_file.put_line(fh,' l_qh_name := upper(trim(p_qh_name));');
186:

Line 183: utl_file.put_line(fh,'begin');

179: utl_file.put_line(fh,' p_executed out nocopy boolean)');
180:
181: utl_file.put_line(fh,'as');
182: utl_file.put_line(fh,' l_qh_name varchar2(240);');
183: utl_file.put_line(fh,'begin');
184: utl_file.put_line(fh,' p_executed := FALSE;');
185: utl_file.put_line(fh,' l_qh_name := upper(trim(p_qh_name));');
186:
187: if (p_agent_names is not null) then

Line 184: utl_file.put_line(fh,' p_executed := FALSE;');

180:
181: utl_file.put_line(fh,'as');
182: utl_file.put_line(fh,' l_qh_name varchar2(240);');
183: utl_file.put_line(fh,'begin');
184: utl_file.put_line(fh,' p_executed := FALSE;');
185: utl_file.put_line(fh,' l_qh_name := upper(trim(p_qh_name));');
186:
187: if (p_agent_names is not null) then
188: for i in p_agent_names.FIRST..p_agent_names.LAST loop

Line 185: utl_file.put_line(fh,' l_qh_name := upper(trim(p_qh_name));');

181: utl_file.put_line(fh,'as');
182: utl_file.put_line(fh,' l_qh_name varchar2(240);');
183: utl_file.put_line(fh,'begin');
184: utl_file.put_line(fh,' p_executed := FALSE;');
185: utl_file.put_line(fh,' l_qh_name := upper(trim(p_qh_name));');
186:
187: if (p_agent_names is not null) then
188: for i in p_agent_names.FIRST..p_agent_names.LAST loop
189: l_first := TRUE;

Line 194: utl_file.put_line(fh,' if (l_qh_name = '''

190: l_atleast_one := FALSE;
191: for qhandler_rec in all_Queue_handlers(upper(p_agent_names(i))) loop
192: l_atleast_one := TRUE;
193: l_generated := TRUE;
194: utl_file.put_line(fh,' if (l_qh_name = '''
195: || qhandler_rec.qhandler || ''') then');
196: utl_file.put_line(fh,' '||qhandler_rec.qhandler
197: || '.Dequeue(p_agent_guid, p_event, p_wait);');
198: utl_file.put_line(fh,' p_executed := TRUE;');

Line 196: utl_file.put_line(fh,' '||qhandler_rec.qhandler

192: l_atleast_one := TRUE;
193: l_generated := TRUE;
194: utl_file.put_line(fh,' if (l_qh_name = '''
195: || qhandler_rec.qhandler || ''') then');
196: utl_file.put_line(fh,' '||qhandler_rec.qhandler
197: || '.Dequeue(p_agent_guid, p_event, p_wait);');
198: utl_file.put_line(fh,' p_executed := TRUE;');
199: utl_file.put_line(fh,' return;');
200: utl_file.put_line(fh,' end if; ');

Line 198: utl_file.put_line(fh,' p_executed := TRUE;');

194: utl_file.put_line(fh,' if (l_qh_name = '''
195: || qhandler_rec.qhandler || ''') then');
196: utl_file.put_line(fh,' '||qhandler_rec.qhandler
197: || '.Dequeue(p_agent_guid, p_event, p_wait);');
198: utl_file.put_line(fh,' p_executed := TRUE;');
199: utl_file.put_line(fh,' return;');
200: utl_file.put_line(fh,' end if; ');
201: end loop;
202: end loop; -- p_agent_names

Line 199: utl_file.put_line(fh,' return;');

195: || qhandler_rec.qhandler || ''') then');
196: utl_file.put_line(fh,' '||qhandler_rec.qhandler
197: || '.Dequeue(p_agent_guid, p_event, p_wait);');
198: utl_file.put_line(fh,' p_executed := TRUE;');
199: utl_file.put_line(fh,' return;');
200: utl_file.put_line(fh,' end if; ');
201: end loop;
202: end loop; -- p_agent_names
203: end if; -- p_agent_names

Line 200: utl_file.put_line(fh,' end if; ');

196: utl_file.put_line(fh,' '||qhandler_rec.qhandler
197: || '.Dequeue(p_agent_guid, p_event, p_wait);');
198: utl_file.put_line(fh,' p_executed := TRUE;');
199: utl_file.put_line(fh,' return;');
200: utl_file.put_line(fh,' end if; ');
201: end loop;
202: end loop; -- p_agent_names
203: end if; -- p_agent_names
204:

Line 207: utl_file.put_line(fh, '');

203: end if; -- p_agent_names
204:
205: -- give a message within the generated file regarding the failure
206: if (not l_generated) then
207: utl_file.put_line(fh, '');
208: utl_file.put_line(fh, ' -- Package body could not be generated for the agent name given.');
209: utl_file.put_line(fh, ' -- The reason could be because the procedure(s) referred to by the');
210: utl_file.put_line(fh, ' -- agent name(s) was invalid or the agent name(s) specified do not exist');
211: utl_file.put_line(fh, '');

Line 208: utl_file.put_line(fh, ' -- Package body could not be generated for the agent name given.');

204:
205: -- give a message within the generated file regarding the failure
206: if (not l_generated) then
207: utl_file.put_line(fh, '');
208: utl_file.put_line(fh, ' -- Package body could not be generated for the agent name given.');
209: utl_file.put_line(fh, ' -- The reason could be because the procedure(s) referred to by the');
210: utl_file.put_line(fh, ' -- agent name(s) was invalid or the agent name(s) specified do not exist');
211: utl_file.put_line(fh, '');
212: end if;

Line 209: utl_file.put_line(fh, ' -- The reason could be because the procedure(s) referred to by the');

205: -- give a message within the generated file regarding the failure
206: if (not l_generated) then
207: utl_file.put_line(fh, '');
208: utl_file.put_line(fh, ' -- Package body could not be generated for the agent name given.');
209: utl_file.put_line(fh, ' -- The reason could be because the procedure(s) referred to by the');
210: utl_file.put_line(fh, ' -- agent name(s) was invalid or the agent name(s) specified do not exist');
211: utl_file.put_line(fh, '');
212: end if;
213:

Line 210: utl_file.put_line(fh, ' -- agent name(s) was invalid or the agent name(s) specified do not exist');

206: if (not l_generated) then
207: utl_file.put_line(fh, '');
208: utl_file.put_line(fh, ' -- Package body could not be generated for the agent name given.');
209: utl_file.put_line(fh, ' -- The reason could be because the procedure(s) referred to by the');
210: utl_file.put_line(fh, ' -- agent name(s) was invalid or the agent name(s) specified do not exist');
211: utl_file.put_line(fh, '');
212: end if;
213:
214: utl_file.put_line(fh,'end StaticDequeue;');

Line 211: utl_file.put_line(fh, '');

207: utl_file.put_line(fh, '');
208: utl_file.put_line(fh, ' -- Package body could not be generated for the agent name given.');
209: utl_file.put_line(fh, ' -- The reason could be because the procedure(s) referred to by the');
210: utl_file.put_line(fh, ' -- agent name(s) was invalid or the agent name(s) specified do not exist');
211: utl_file.put_line(fh, '');
212: end if;
213:
214: utl_file.put_line(fh,'end StaticDequeue;');
215: utl_file.put_line(fh,' ');

Line 214: utl_file.put_line(fh,'end StaticDequeue;');

210: utl_file.put_line(fh, ' -- agent name(s) was invalid or the agent name(s) specified do not exist');
211: utl_file.put_line(fh, '');
212: end if;
213:
214: utl_file.put_line(fh,'end StaticDequeue;');
215: utl_file.put_line(fh,' ');
216: utl_file.put_line(fh,'end WF_AGT_DYN_FUNCS;');
217: utl_file.put_line(fh,'/');
218: utl_file.put_line(fh,'commit;');

Line 215: utl_file.put_line(fh,' ');

211: utl_file.put_line(fh, '');
212: end if;
213:
214: utl_file.put_line(fh,'end StaticDequeue;');
215: utl_file.put_line(fh,' ');
216: utl_file.put_line(fh,'end WF_AGT_DYN_FUNCS;');
217: utl_file.put_line(fh,'/');
218: utl_file.put_line(fh,'commit;');
219: utl_file.put_line(fh,'exit;');

Line 216: utl_file.put_line(fh,'end WF_AGT_DYN_FUNCS;');

212: end if;
213:
214: utl_file.put_line(fh,'end StaticDequeue;');
215: utl_file.put_line(fh,' ');
216: utl_file.put_line(fh,'end WF_AGT_DYN_FUNCS;');
217: utl_file.put_line(fh,'/');
218: utl_file.put_line(fh,'commit;');
219: utl_file.put_line(fh,'exit;');
220: utl_file.put_line(fh,' ');

Line 217: utl_file.put_line(fh,'/');

213:
214: utl_file.put_line(fh,'end StaticDequeue;');
215: utl_file.put_line(fh,' ');
216: utl_file.put_line(fh,'end WF_AGT_DYN_FUNCS;');
217: utl_file.put_line(fh,'/');
218: utl_file.put_line(fh,'commit;');
219: utl_file.put_line(fh,'exit;');
220: utl_file.put_line(fh,' ');
221: utl_file.fclose(fh);

Line 218: utl_file.put_line(fh,'commit;');

214: utl_file.put_line(fh,'end StaticDequeue;');
215: utl_file.put_line(fh,' ');
216: utl_file.put_line(fh,'end WF_AGT_DYN_FUNCS;');
217: utl_file.put_line(fh,'/');
218: utl_file.put_line(fh,'commit;');
219: utl_file.put_line(fh,'exit;');
220: utl_file.put_line(fh,' ');
221: utl_file.fclose(fh);
222:

Line 219: utl_file.put_line(fh,'exit;');

215: utl_file.put_line(fh,' ');
216: utl_file.put_line(fh,'end WF_AGT_DYN_FUNCS;');
217: utl_file.put_line(fh,'/');
218: utl_file.put_line(fh,'commit;');
219: utl_file.put_line(fh,'exit;');
220: utl_file.put_line(fh,' ');
221: utl_file.fclose(fh);
222:
223: dbms_output.put_line('File generated is '||utl_dir||'/'||l_filename);

Line 220: utl_file.put_line(fh,' ');

216: utl_file.put_line(fh,'end WF_AGT_DYN_FUNCS;');
217: utl_file.put_line(fh,'/');
218: utl_file.put_line(fh,'commit;');
219: utl_file.put_line(fh,'exit;');
220: utl_file.put_line(fh,' ');
221: utl_file.fclose(fh);
222:
223: dbms_output.put_line('File generated is '||utl_dir||'/'||l_filename);
224: exception

Line 221: utl_file.fclose(fh);

217: utl_file.put_line(fh,'/');
218: utl_file.put_line(fh,'commit;');
219: utl_file.put_line(fh,'exit;');
220: utl_file.put_line(fh,' ');
221: utl_file.fclose(fh);
222:
223: dbms_output.put_line('File generated is '||utl_dir||'/'||l_filename);
224: exception
225: when others then

Line 226: if (utl_file.is_open(fh)) then

222:
223: dbms_output.put_line('File generated is '||utl_dir||'/'||l_filename);
224: exception
225: when others then
226: if (utl_file.is_open(fh)) then
227: utl_file.fclose(fh);
228: end if;
229: raise;
230:

Line 227: utl_file.fclose(fh);

223: dbms_output.put_line('File generated is '||utl_dir||'/'||l_filename);
224: exception
225: when others then
226: if (utl_file.is_open(fh)) then
227: utl_file.fclose(fh);
228: end if;
229: raise;
230:
231: end StaticQH;

Line 242: fh utl_file.file_type;

238: --
239:
240: Procedure StaticGenerateRule(p_correlation_ids in varchar_array) AS
241:
242: fh utl_file.file_type;
243: l_generated boolean := FALSE;
244: l_atleast_one boolean;
245: l_first boolean;
246:

Line 309: fh := utl_file.fopen(utl_dir, l_filename, 'w', 32767);

305: from dual;
306:
307: l_filename := 'WFBESDFNB'||l_timestamp||'.pls';
308:
309: fh := utl_file.fopen(utl_dir, l_filename, 'w', 32767);
310:
311: utl_file.put_line(fh, 'REM dbdrv: sql ~PROD ~PATH ~FILE none none none package '||g_amp||'phase=plb \');
312: utl_file.put_line(fh, 'REM dbdrv: checkfile(115.2=120.3):~PROD:~PATH:~FILE');
313: utl_file.put_line(fh, '/*=======================================================================*');

Line 311: utl_file.put_line(fh, 'REM dbdrv: sql ~PROD ~PATH ~FILE none none none package '||g_amp||'phase=plb \');

307: l_filename := 'WFBESDFNB'||l_timestamp||'.pls';
308:
309: fh := utl_file.fopen(utl_dir, l_filename, 'w', 32767);
310:
311: utl_file.put_line(fh, 'REM dbdrv: sql ~PROD ~PATH ~FILE none none none package '||g_amp||'phase=plb \');
312: utl_file.put_line(fh, 'REM dbdrv: checkfile(115.2=120.3):~PROD:~PATH:~FILE');
313: utl_file.put_line(fh, '/*=======================================================================*');
314: utl_file.put_line(fh, '| Copyright (c) 2005, Oracle. All Rights Reserved |');
315: utl_file.put_line(fh, '+========================================================================+');

Line 312: utl_file.put_line(fh, 'REM dbdrv: checkfile(115.2=120.3):~PROD:~PATH:~FILE');

308:
309: fh := utl_file.fopen(utl_dir, l_filename, 'w', 32767);
310:
311: utl_file.put_line(fh, 'REM dbdrv: sql ~PROD ~PATH ~FILE none none none package '||g_amp||'phase=plb \');
312: utl_file.put_line(fh, 'REM dbdrv: checkfile(115.2=120.3):~PROD:~PATH:~FILE');
313: utl_file.put_line(fh, '/*=======================================================================*');
314: utl_file.put_line(fh, '| Copyright (c) 2005, Oracle. All Rights Reserved |');
315: utl_file.put_line(fh, '+========================================================================+');
316: utl_file.put_line(fh, '| NAME |');

Line 313: utl_file.put_line(fh, '/=======================================================================');

309: fh := utl_file.fopen(utl_dir, l_filename, 'w', 32767);
310:
311: utl_file.put_line(fh, 'REM dbdrv: sql ~PROD ~PATH ~FILE none none none package '||g_amp||'phase=plb \');
312: utl_file.put_line(fh, 'REM dbdrv: checkfile(115.2=120.3):~PROD:~PATH:~FILE');
313: utl_file.put_line(fh, '/*=======================================================================*');
314: utl_file.put_line(fh, '| Copyright (c) 2005, Oracle. All Rights Reserved |');
315: utl_file.put_line(fh, '+========================================================================+');
316: utl_file.put_line(fh, '| NAME |');
317: utl_file.put_line(fh, '| WFBESDFNB'||l_timestamp||'.pls |');

Line 314: utl_file.put_line(fh, '| Copyright (c) 2005, Oracle. All Rights Reserved |');

310:
311: utl_file.put_line(fh, 'REM dbdrv: sql ~PROD ~PATH ~FILE none none none package '||g_amp||'phase=plb \');
312: utl_file.put_line(fh, 'REM dbdrv: checkfile(115.2=120.3):~PROD:~PATH:~FILE');
313: utl_file.put_line(fh, '/*=======================================================================*');
314: utl_file.put_line(fh, '| Copyright (c) 2005, Oracle. All Rights Reserved |');
315: utl_file.put_line(fh, '+========================================================================+');
316: utl_file.put_line(fh, '| NAME |');
317: utl_file.put_line(fh, '| WFBESDFNB'||l_timestamp||'.pls |');
318: utl_file.put_line(fh, '| |');

Line 315: utl_file.put_line(fh, '+========================================================================+');

311: utl_file.put_line(fh, 'REM dbdrv: sql ~PROD ~PATH ~FILE none none none package '||g_amp||'phase=plb \');
312: utl_file.put_line(fh, 'REM dbdrv: checkfile(115.2=120.3):~PROD:~PATH:~FILE');
313: utl_file.put_line(fh, '/*=======================================================================*');
314: utl_file.put_line(fh, '| Copyright (c) 2005, Oracle. All Rights Reserved |');
315: utl_file.put_line(fh, '+========================================================================+');
316: utl_file.put_line(fh, '| NAME |');
317: utl_file.put_line(fh, '| WFBESDFNB'||l_timestamp||'.pls |');
318: utl_file.put_line(fh, '| |');
319: utl_file.put_line(fh, '| DESCRIPTION |');

Line 316: utl_file.put_line(fh, '| NAME |');

312: utl_file.put_line(fh, 'REM dbdrv: checkfile(115.2=120.3):~PROD:~PATH:~FILE');
313: utl_file.put_line(fh, '/*=======================================================================*');
314: utl_file.put_line(fh, '| Copyright (c) 2005, Oracle. All Rights Reserved |');
315: utl_file.put_line(fh, '+========================================================================+');
316: utl_file.put_line(fh, '| NAME |');
317: utl_file.put_line(fh, '| WFBESDFNB'||l_timestamp||'.pls |');
318: utl_file.put_line(fh, '| |');
319: utl_file.put_line(fh, '| DESCRIPTION |');
320: utl_file.put_line(fh, '| PL/SQL body for package WF_BES_DYN_FUNCS |');

Line 317: utl_file.put_line(fh, '| WFBESDFNB'||l_timestamp||'.pls |');

313: utl_file.put_line(fh, '/*=======================================================================*');
314: utl_file.put_line(fh, '| Copyright (c) 2005, Oracle. All Rights Reserved |');
315: utl_file.put_line(fh, '+========================================================================+');
316: utl_file.put_line(fh, '| NAME |');
317: utl_file.put_line(fh, '| WFBESDFNB'||l_timestamp||'.pls |');
318: utl_file.put_line(fh, '| |');
319: utl_file.put_line(fh, '| DESCRIPTION |');
320: utl_file.put_line(fh, '| PL/SQL body for package WF_BES_DYN_FUNCS |');
321: utl_file.put_line(fh, '| This is a generated file to provide static calls for |');

Line 318: utl_file.put_line(fh, '| |');

314: utl_file.put_line(fh, '| Copyright (c) 2005, Oracle. All Rights Reserved |');
315: utl_file.put_line(fh, '+========================================================================+');
316: utl_file.put_line(fh, '| NAME |');
317: utl_file.put_line(fh, '| WFBESDFNB'||l_timestamp||'.pls |');
318: utl_file.put_line(fh, '| |');
319: utl_file.put_line(fh, '| DESCRIPTION |');
320: utl_file.put_line(fh, '| PL/SQL body for package WF_BES_DYN_FUNCS |');
321: utl_file.put_line(fh, '| This is a generated file to provide static calls for |');
322: utl_file.put_line(fh, '| generate and rule functions |');

Line 319: utl_file.put_line(fh, '| DESCRIPTION |');

315: utl_file.put_line(fh, '+========================================================================+');
316: utl_file.put_line(fh, '| NAME |');
317: utl_file.put_line(fh, '| WFBESDFNB'||l_timestamp||'.pls |');
318: utl_file.put_line(fh, '| |');
319: utl_file.put_line(fh, '| DESCRIPTION |');
320: utl_file.put_line(fh, '| PL/SQL body for package WF_BES_DYN_FUNCS |');
321: utl_file.put_line(fh, '| This is a generated file to provide static calls for |');
322: utl_file.put_line(fh, '| generate and rule functions |');
323: utl_file.put_line(fh, '| |');

Line 320: utl_file.put_line(fh, '| PL/SQL body for package WF_BES_DYN_FUNCS |');

316: utl_file.put_line(fh, '| NAME |');
317: utl_file.put_line(fh, '| WFBESDFNB'||l_timestamp||'.pls |');
318: utl_file.put_line(fh, '| |');
319: utl_file.put_line(fh, '| DESCRIPTION |');
320: utl_file.put_line(fh, '| PL/SQL body for package WF_BES_DYN_FUNCS |');
321: utl_file.put_line(fh, '| This is a generated file to provide static calls for |');
322: utl_file.put_line(fh, '| generate and rule functions |');
323: utl_file.put_line(fh, '| |');
324: utl_file.put_line(fh, '| NOTES |');

Line 321: utl_file.put_line(fh, '| This is a generated file to provide static calls for |');

317: utl_file.put_line(fh, '| WFBESDFNB'||l_timestamp||'.pls |');
318: utl_file.put_line(fh, '| |');
319: utl_file.put_line(fh, '| DESCRIPTION |');
320: utl_file.put_line(fh, '| PL/SQL body for package WF_BES_DYN_FUNCS |');
321: utl_file.put_line(fh, '| This is a generated file to provide static calls for |');
322: utl_file.put_line(fh, '| generate and rule functions |');
323: utl_file.put_line(fh, '| |');
324: utl_file.put_line(fh, '| NOTES |');
325: utl_file.put_line(fh, '| This package body has static function calls for following event |');

Line 322: utl_file.put_line(fh, '| generate and rule functions |');

Line 323: utl_file.put_line(fh, '| |');

Line 324: utl_file.put_line(fh, '| NOTES |');

Line 325: utl_file.put_line(fh, '| This package body has static function calls for following event |');

Line 326: utl_file.put_line(fh, '| names or corrlation ids |');

Line 327: utl_file.put_line(fh, '| oracle.apps.wf.% |');

Line 328: utl_file.put_line(fh, '| oracle.apps.fnd.% |');

324: utl_file.put_line(fh, '| NOTES |');
325: utl_file.put_line(fh, '| This package body has static function calls for following event |');
326: utl_file.put_line(fh, '| names or corrlation ids |');
327: utl_file.put_line(fh, '| oracle.apps.wf.% |');
328: utl_file.put_line(fh, '| oracle.apps.fnd.% |');
329: utl_file.put_line(fh, '| |');
330: utl_file.put_line(fh, '*========================================================================*/ ');
331: utl_file.put_line(fh,'SET VERIFY OFF;');
332: utl_file.put_line(fh,'WHENEVER SQLERROR EXIT FAILURE ROLLBACK;');

Line 329: utl_file.put_line(fh, '| |');

325: utl_file.put_line(fh, '| This package body has static function calls for following event |');
326: utl_file.put_line(fh, '| names or corrlation ids |');
327: utl_file.put_line(fh, '| oracle.apps.wf.% |');
328: utl_file.put_line(fh, '| oracle.apps.fnd.% |');
329: utl_file.put_line(fh, '| |');
330: utl_file.put_line(fh, '*========================================================================*/ ');
331: utl_file.put_line(fh,'SET VERIFY OFF;');
332: utl_file.put_line(fh,'WHENEVER SQLERROR EXIT FAILURE ROLLBACK;');
333: utl_file.put_line(fh,'WHENEVER OSERROR EXIT FAILURE ROLLBACK;');

Line 330: utl_file.put_line(fh, '========================================================================/ ');

326: utl_file.put_line(fh, '| names or corrlation ids |');
327: utl_file.put_line(fh, '| oracle.apps.wf.% |');
328: utl_file.put_line(fh, '| oracle.apps.fnd.% |');
329: utl_file.put_line(fh, '| |');
330: utl_file.put_line(fh, '*========================================================================*/ ');
331: utl_file.put_line(fh,'SET VERIFY OFF;');
332: utl_file.put_line(fh,'WHENEVER SQLERROR EXIT FAILURE ROLLBACK;');
333: utl_file.put_line(fh,'WHENEVER OSERROR EXIT FAILURE ROLLBACK;');
334:

Line 331: utl_file.put_line(fh,'SET VERIFY OFF;');

327: utl_file.put_line(fh, '| oracle.apps.wf.% |');
328: utl_file.put_line(fh, '| oracle.apps.fnd.% |');
329: utl_file.put_line(fh, '| |');
330: utl_file.put_line(fh, '*========================================================================*/ ');
331: utl_file.put_line(fh,'SET VERIFY OFF;');
332: utl_file.put_line(fh,'WHENEVER SQLERROR EXIT FAILURE ROLLBACK;');
333: utl_file.put_line(fh,'WHENEVER OSERROR EXIT FAILURE ROLLBACK;');
334:
335: utl_file.put_line(fh,'create or replace package body WF_BES_DYN_FUNCS as');

Line 332: utl_file.put_line(fh,'WHENEVER SQLERROR EXIT FAILURE ROLLBACK;');

328: utl_file.put_line(fh, '| oracle.apps.fnd.% |');
329: utl_file.put_line(fh, '| |');
330: utl_file.put_line(fh, '*========================================================================*/ ');
331: utl_file.put_line(fh,'SET VERIFY OFF;');
332: utl_file.put_line(fh,'WHENEVER SQLERROR EXIT FAILURE ROLLBACK;');
333: utl_file.put_line(fh,'WHENEVER OSERROR EXIT FAILURE ROLLBACK;');
334:
335: utl_file.put_line(fh,'create or replace package body WF_BES_DYN_FUNCS as');
336:

Line 333: utl_file.put_line(fh,'WHENEVER OSERROR EXIT FAILURE ROLLBACK;');

329: utl_file.put_line(fh, '| |');
330: utl_file.put_line(fh, '*========================================================================*/ ');
331: utl_file.put_line(fh,'SET VERIFY OFF;');
332: utl_file.put_line(fh,'WHENEVER SQLERROR EXIT FAILURE ROLLBACK;');
333: utl_file.put_line(fh,'WHENEVER OSERROR EXIT FAILURE ROLLBACK;');
334:
335: utl_file.put_line(fh,'create or replace package body WF_BES_DYN_FUNCS as');
336:
337: utl_file.put_line(fh,'--');

Line 335: utl_file.put_line(fh,'create or replace package body WF_BES_DYN_FUNCS as');

331: utl_file.put_line(fh,'SET VERIFY OFF;');
332: utl_file.put_line(fh,'WHENEVER SQLERROR EXIT FAILURE ROLLBACK;');
333: utl_file.put_line(fh,'WHENEVER OSERROR EXIT FAILURE ROLLBACK;');
334:
335: utl_file.put_line(fh,'create or replace package body WF_BES_DYN_FUNCS as');
336:
337: utl_file.put_line(fh,'--');
338: utl_file.put_line(fh,'-- Generate functions');
339: utl_file.put_line(fh,'--');

Line 337: utl_file.put_line(fh,'--');

333: utl_file.put_line(fh,'WHENEVER OSERROR EXIT FAILURE ROLLBACK;');
334:
335: utl_file.put_line(fh,'create or replace package body WF_BES_DYN_FUNCS as');
336:
337: utl_file.put_line(fh,'--');
338: utl_file.put_line(fh,'-- Generate functions');
339: utl_file.put_line(fh,'--');
340:
341: utl_file.put_line(fh,'PROCEDURE Generate(p_func_name in varchar2,');

Line 338: utl_file.put_line(fh,'-- Generate functions');

334:
335: utl_file.put_line(fh,'create or replace package body WF_BES_DYN_FUNCS as');
336:
337: utl_file.put_line(fh,'--');
338: utl_file.put_line(fh,'-- Generate functions');
339: utl_file.put_line(fh,'--');
340:
341: utl_file.put_line(fh,'PROCEDURE Generate(p_func_name in varchar2,');
342: utl_file.put_line(fh,' p_event_name in varchar2,');

Line 339: utl_file.put_line(fh,'--');

335: utl_file.put_line(fh,'create or replace package body WF_BES_DYN_FUNCS as');
336:
337: utl_file.put_line(fh,'--');
338: utl_file.put_line(fh,'-- Generate functions');
339: utl_file.put_line(fh,'--');
340:
341: utl_file.put_line(fh,'PROCEDURE Generate(p_func_name in varchar2,');
342: utl_file.put_line(fh,' p_event_name in varchar2,');
343: utl_file.put_line(fh,' p_event_key in varchar2,');

Line 341: utl_file.put_line(fh,'PROCEDURE Generate(p_func_name in varchar2,');

337: utl_file.put_line(fh,'--');
338: utl_file.put_line(fh,'-- Generate functions');
339: utl_file.put_line(fh,'--');
340:
341: utl_file.put_line(fh,'PROCEDURE Generate(p_func_name in varchar2,');
342: utl_file.put_line(fh,' p_event_name in varchar2,');
343: utl_file.put_line(fh,' p_event_key in varchar2,');
344: utl_file.put_line(fh,' p_parameter_list in wf_parameter_list_t,');
345: utl_file.put_line(fh,' x_msg in out nocopy clob,');

Line 342: utl_file.put_line(fh,' p_event_name in varchar2,');

338: utl_file.put_line(fh,'-- Generate functions');
339: utl_file.put_line(fh,'--');
340:
341: utl_file.put_line(fh,'PROCEDURE Generate(p_func_name in varchar2,');
342: utl_file.put_line(fh,' p_event_name in varchar2,');
343: utl_file.put_line(fh,' p_event_key in varchar2,');
344: utl_file.put_line(fh,' p_parameter_list in wf_parameter_list_t,');
345: utl_file.put_line(fh,' x_msg in out nocopy clob,');
346: utl_file.put_line(fh,' x_executed out nocopy boolean)');

Line 343: utl_file.put_line(fh,' p_event_key in varchar2,');

339: utl_file.put_line(fh,'--');
340:
341: utl_file.put_line(fh,'PROCEDURE Generate(p_func_name in varchar2,');
342: utl_file.put_line(fh,' p_event_name in varchar2,');
343: utl_file.put_line(fh,' p_event_key in varchar2,');
344: utl_file.put_line(fh,' p_parameter_list in wf_parameter_list_t,');
345: utl_file.put_line(fh,' x_msg in out nocopy clob,');
346: utl_file.put_line(fh,' x_executed out nocopy boolean)');
347: utl_file.put_line(fh,'as');

Line 344: utl_file.put_line(fh,' p_parameter_list in wf_parameter_list_t,');

340:
341: utl_file.put_line(fh,'PROCEDURE Generate(p_func_name in varchar2,');
342: utl_file.put_line(fh,' p_event_name in varchar2,');
343: utl_file.put_line(fh,' p_event_key in varchar2,');
344: utl_file.put_line(fh,' p_parameter_list in wf_parameter_list_t,');
345: utl_file.put_line(fh,' x_msg in out nocopy clob,');
346: utl_file.put_line(fh,' x_executed out nocopy boolean)');
347: utl_file.put_line(fh,'as');
348: utl_file.put_line(fh,' l_funcname varchar2(240);');

Line 345: utl_file.put_line(fh,' x_msg in out nocopy clob,');

341: utl_file.put_line(fh,'PROCEDURE Generate(p_func_name in varchar2,');
342: utl_file.put_line(fh,' p_event_name in varchar2,');
343: utl_file.put_line(fh,' p_event_key in varchar2,');
344: utl_file.put_line(fh,' p_parameter_list in wf_parameter_list_t,');
345: utl_file.put_line(fh,' x_msg in out nocopy clob,');
346: utl_file.put_line(fh,' x_executed out nocopy boolean)');
347: utl_file.put_line(fh,'as');
348: utl_file.put_line(fh,' l_funcname varchar2(240);');
349: utl_file.put_line(fh,'begin');

Line 346: utl_file.put_line(fh,' x_executed out nocopy boolean)');

342: utl_file.put_line(fh,' p_event_name in varchar2,');
343: utl_file.put_line(fh,' p_event_key in varchar2,');
344: utl_file.put_line(fh,' p_parameter_list in wf_parameter_list_t,');
345: utl_file.put_line(fh,' x_msg in out nocopy clob,');
346: utl_file.put_line(fh,' x_executed out nocopy boolean)');
347: utl_file.put_line(fh,'as');
348: utl_file.put_line(fh,' l_funcname varchar2(240);');
349: utl_file.put_line(fh,'begin');
350: utl_file.put_line(fh,' x_executed := FALSE;');

Line 347: utl_file.put_line(fh,'as');

343: utl_file.put_line(fh,' p_event_key in varchar2,');
344: utl_file.put_line(fh,' p_parameter_list in wf_parameter_list_t,');
345: utl_file.put_line(fh,' x_msg in out nocopy clob,');
346: utl_file.put_line(fh,' x_executed out nocopy boolean)');
347: utl_file.put_line(fh,'as');
348: utl_file.put_line(fh,' l_funcname varchar2(240);');
349: utl_file.put_line(fh,'begin');
350: utl_file.put_line(fh,' x_executed := FALSE;');
351: utl_file.put_line(fh,' x_msg := null;');

Line 348: utl_file.put_line(fh,' l_funcname varchar2(240);');

344: utl_file.put_line(fh,' p_parameter_list in wf_parameter_list_t,');
345: utl_file.put_line(fh,' x_msg in out nocopy clob,');
346: utl_file.put_line(fh,' x_executed out nocopy boolean)');
347: utl_file.put_line(fh,'as');
348: utl_file.put_line(fh,' l_funcname varchar2(240);');
349: utl_file.put_line(fh,'begin');
350: utl_file.put_line(fh,' x_executed := FALSE;');
351: utl_file.put_line(fh,' x_msg := null;');
352: utl_file.put_line(fh,' l_funcname := upper(trim(p_func_name));');

Line 349: utl_file.put_line(fh,'begin');

345: utl_file.put_line(fh,' x_msg in out nocopy clob,');
346: utl_file.put_line(fh,' x_executed out nocopy boolean)');
347: utl_file.put_line(fh,'as');
348: utl_file.put_line(fh,' l_funcname varchar2(240);');
349: utl_file.put_line(fh,'begin');
350: utl_file.put_line(fh,' x_executed := FALSE;');
351: utl_file.put_line(fh,' x_msg := null;');
352: utl_file.put_line(fh,' l_funcname := upper(trim(p_func_name));');
353:

Line 350: utl_file.put_line(fh,' x_executed := FALSE;');

346: utl_file.put_line(fh,' x_executed out nocopy boolean)');
347: utl_file.put_line(fh,'as');
348: utl_file.put_line(fh,' l_funcname varchar2(240);');
349: utl_file.put_line(fh,'begin');
350: utl_file.put_line(fh,' x_executed := FALSE;');
351: utl_file.put_line(fh,' x_msg := null;');
352: utl_file.put_line(fh,' l_funcname := upper(trim(p_func_name));');
353:
354: if (p_correlation_ids is not null) then

Line 351: utl_file.put_line(fh,' x_msg := null;');

347: utl_file.put_line(fh,'as');
348: utl_file.put_line(fh,' l_funcname varchar2(240);');
349: utl_file.put_line(fh,'begin');
350: utl_file.put_line(fh,' x_executed := FALSE;');
351: utl_file.put_line(fh,' x_msg := null;');
352: utl_file.put_line(fh,' l_funcname := upper(trim(p_func_name));');
353:
354: if (p_correlation_ids is not null) then
355: for i in p_correlation_ids.FIRST..p_correlation_ids.LAST loop

Line 352: utl_file.put_line(fh,' l_funcname := upper(trim(p_func_name));');

348: utl_file.put_line(fh,' l_funcname varchar2(240);');
349: utl_file.put_line(fh,'begin');
350: utl_file.put_line(fh,' x_executed := FALSE;');
351: utl_file.put_line(fh,' x_msg := null;');
352: utl_file.put_line(fh,' l_funcname := upper(trim(p_func_name));');
353:
354: if (p_correlation_ids is not null) then
355: for i in p_correlation_ids.FIRST..p_correlation_ids.LAST loop
356: l_first := TRUE;

Line 363: utl_file.put_line(fh, '');

359:
360: l_atleast_one := TRUE;
361: l_generated := TRUE;
362: if (l_first) then
363: utl_file.put_line(fh, '');
364: utl_file.put_line(fh, ' -- Function calls for corrid ' || p_correlation_ids(i) || '%');
365: utl_file.put_line(fh, ' if (upper(p_event_name) like '''
366: || p_correlation_ids(i) || '%'') then ');
367: l_first := FALSE;

Line 364: utl_file.put_line(fh, ' -- Function calls for corrid ' || p_correlation_ids(i) || '%');

360: l_atleast_one := TRUE;
361: l_generated := TRUE;
362: if (l_first) then
363: utl_file.put_line(fh, '');
364: utl_file.put_line(fh, ' -- Function calls for corrid ' || p_correlation_ids(i) || '%');
365: utl_file.put_line(fh, ' if (upper(p_event_name) like '''
366: || p_correlation_ids(i) || '%'') then ');
367: l_first := FALSE;
368: end if;

Line 365: utl_file.put_line(fh, ' if (upper(p_event_name) like '''

361: l_generated := TRUE;
362: if (l_first) then
363: utl_file.put_line(fh, '');
364: utl_file.put_line(fh, ' -- Function calls for corrid ' || p_correlation_ids(i) || '%');
365: utl_file.put_line(fh, ' if (upper(p_event_name) like '''
366: || p_correlation_ids(i) || '%'') then ');
367: l_first := FALSE;
368: end if;
369:

Line 370: utl_file.put_line(fh,' if (l_funcname = '''

366: || p_correlation_ids(i) || '%'') then ');
367: l_first := FALSE;
368: end if;
369:
370: utl_file.put_line(fh,' if (l_funcname = '''
371: || genfunc_rec.function || ''') then');
372: utl_file.put_line(fh,' ' || 'x_msg := '||genfunc_rec.function
373: || '(p_event_name, p_event_key,p_parameter_list);');
374: utl_file.put_line(fh,' x_executed := TRUE;');

Line 372: utl_file.put_line(fh,' ' || 'x_msg := '||genfunc_rec.function

368: end if;
369:
370: utl_file.put_line(fh,' if (l_funcname = '''
371: || genfunc_rec.function || ''') then');
372: utl_file.put_line(fh,' ' || 'x_msg := '||genfunc_rec.function
373: || '(p_event_name, p_event_key,p_parameter_list);');
374: utl_file.put_line(fh,' x_executed := TRUE;');
375: utl_file.put_line(fh,' return;');
376: utl_file.put_line(fh,' end if; ');

Line 374: utl_file.put_line(fh,' x_executed := TRUE;');

370: utl_file.put_line(fh,' if (l_funcname = '''
371: || genfunc_rec.function || ''') then');
372: utl_file.put_line(fh,' ' || 'x_msg := '||genfunc_rec.function
373: || '(p_event_name, p_event_key,p_parameter_list);');
374: utl_file.put_line(fh,' x_executed := TRUE;');
375: utl_file.put_line(fh,' return;');
376: utl_file.put_line(fh,' end if; ');
377:
378: end loop;--for loop

Line 375: utl_file.put_line(fh,' return;');

371: || genfunc_rec.function || ''') then');
372: utl_file.put_line(fh,' ' || 'x_msg := '||genfunc_rec.function
373: || '(p_event_name, p_event_key,p_parameter_list);');
374: utl_file.put_line(fh,' x_executed := TRUE;');
375: utl_file.put_line(fh,' return;');
376: utl_file.put_line(fh,' end if; ');
377:
378: end loop;--for loop
379:

Line 376: utl_file.put_line(fh,' end if; ');

372: utl_file.put_line(fh,' ' || 'x_msg := '||genfunc_rec.function
373: || '(p_event_name, p_event_key,p_parameter_list);');
374: utl_file.put_line(fh,' x_executed := TRUE;');
375: utl_file.put_line(fh,' return;');
376: utl_file.put_line(fh,' end if; ');
377:
378: end loop;--for loop
379:
380: if (l_atleast_one) then

Line 381: utl_file.put_line(fh, ' end if;');

377:
378: end loop;--for loop
379:
380: if (l_atleast_one) then
381: utl_file.put_line(fh, ' end if;');
382: end if;
383:
384: end loop; --for loop
385:

Line 390: utl_file.put_line(fh, '');

386: end if;
387:
388: -- give a message within the generated file regarding the failure
389: if (not l_generated) then
390: utl_file.put_line(fh, '');
391: utl_file.put_line(fh, ' -- Package body could not be generated for the corrids given.');
392: utl_file.put_line(fh, ' -- The reason could be because the procedure(s) referred to by the');
393: utl_file.put_line(fh, ' -- corrid(s) was invalid or the corrid(s) specified do not exist');
394: utl_file.put_line(fh, '');

Line 391: utl_file.put_line(fh, ' -- Package body could not be generated for the corrids given.');

387:
388: -- give a message within the generated file regarding the failure
389: if (not l_generated) then
390: utl_file.put_line(fh, '');
391: utl_file.put_line(fh, ' -- Package body could not be generated for the corrids given.');
392: utl_file.put_line(fh, ' -- The reason could be because the procedure(s) referred to by the');
393: utl_file.put_line(fh, ' -- corrid(s) was invalid or the corrid(s) specified do not exist');
394: utl_file.put_line(fh, '');
395: end if;

Line 392: utl_file.put_line(fh, ' -- The reason could be because the procedure(s) referred to by the');

388: -- give a message within the generated file regarding the failure
389: if (not l_generated) then
390: utl_file.put_line(fh, '');
391: utl_file.put_line(fh, ' -- Package body could not be generated for the corrids given.');
392: utl_file.put_line(fh, ' -- The reason could be because the procedure(s) referred to by the');
393: utl_file.put_line(fh, ' -- corrid(s) was invalid or the corrid(s) specified do not exist');
394: utl_file.put_line(fh, '');
395: end if;
396:

Line 393: utl_file.put_line(fh, ' -- corrid(s) was invalid or the corrid(s) specified do not exist');

389: if (not l_generated) then
390: utl_file.put_line(fh, '');
391: utl_file.put_line(fh, ' -- Package body could not be generated for the corrids given.');
392: utl_file.put_line(fh, ' -- The reason could be because the procedure(s) referred to by the');
393: utl_file.put_line(fh, ' -- corrid(s) was invalid or the corrid(s) specified do not exist');
394: utl_file.put_line(fh, '');
395: end if;
396:
397: utl_file.put_line(fh,'end Generate;');

Line 394: utl_file.put_line(fh, '');

390: utl_file.put_line(fh, '');
391: utl_file.put_line(fh, ' -- Package body could not be generated for the corrids given.');
392: utl_file.put_line(fh, ' -- The reason could be because the procedure(s) referred to by the');
393: utl_file.put_line(fh, ' -- corrid(s) was invalid or the corrid(s) specified do not exist');
394: utl_file.put_line(fh, '');
395: end if;
396:
397: utl_file.put_line(fh,'end Generate;');
398: utl_file.put_line(fh, '');

Line 397: utl_file.put_line(fh,'end Generate;');

393: utl_file.put_line(fh, ' -- corrid(s) was invalid or the corrid(s) specified do not exist');
394: utl_file.put_line(fh, '');
395: end if;
396:
397: utl_file.put_line(fh,'end Generate;');
398: utl_file.put_line(fh, '');
399: utl_file.put_line(fh,'--');
400: utl_file.put_line(fh,'-- Rule functions');
401: utl_file.put_line(fh,'--');

Line 398: utl_file.put_line(fh, '');

394: utl_file.put_line(fh, '');
395: end if;
396:
397: utl_file.put_line(fh,'end Generate;');
398: utl_file.put_line(fh, '');
399: utl_file.put_line(fh,'--');
400: utl_file.put_line(fh,'-- Rule functions');
401: utl_file.put_line(fh,'--');
402:

Line 399: utl_file.put_line(fh,'--');

395: end if;
396:
397: utl_file.put_line(fh,'end Generate;');
398: utl_file.put_line(fh, '');
399: utl_file.put_line(fh,'--');
400: utl_file.put_line(fh,'-- Rule functions');
401: utl_file.put_line(fh,'--');
402:
403: utl_file.put_line(fh,'PROCEDURE RuleFunction(p_func_name in varchar2,');

Line 400: utl_file.put_line(fh,'-- Rule functions');

396:
397: utl_file.put_line(fh,'end Generate;');
398: utl_file.put_line(fh, '');
399: utl_file.put_line(fh,'--');
400: utl_file.put_line(fh,'-- Rule functions');
401: utl_file.put_line(fh,'--');
402:
403: utl_file.put_line(fh,'PROCEDURE RuleFunction(p_func_name in varchar2,');
404: utl_file.put_line(fh,' p_subscription_guid in raw,');

Line 401: utl_file.put_line(fh,'--');

397: utl_file.put_line(fh,'end Generate;');
398: utl_file.put_line(fh, '');
399: utl_file.put_line(fh,'--');
400: utl_file.put_line(fh,'-- Rule functions');
401: utl_file.put_line(fh,'--');
402:
403: utl_file.put_line(fh,'PROCEDURE RuleFunction(p_func_name in varchar2,');
404: utl_file.put_line(fh,' p_subscription_guid in raw,');
405: utl_file.put_line(fh,' p_event in out nocopy wf_event_t,');

Line 403: utl_file.put_line(fh,'PROCEDURE RuleFunction(p_func_name in varchar2,');

399: utl_file.put_line(fh,'--');
400: utl_file.put_line(fh,'-- Rule functions');
401: utl_file.put_line(fh,'--');
402:
403: utl_file.put_line(fh,'PROCEDURE RuleFunction(p_func_name in varchar2,');
404: utl_file.put_line(fh,' p_subscription_guid in raw,');
405: utl_file.put_line(fh,' p_event in out nocopy wf_event_t,');
406: utl_file.put_line(fh,' x_result in out nocopy varchar2,');
407: utl_file.put_line(fh,' x_executed out nocopy boolean)');

Line 404: utl_file.put_line(fh,' p_subscription_guid in raw,');

400: utl_file.put_line(fh,'-- Rule functions');
401: utl_file.put_line(fh,'--');
402:
403: utl_file.put_line(fh,'PROCEDURE RuleFunction(p_func_name in varchar2,');
404: utl_file.put_line(fh,' p_subscription_guid in raw,');
405: utl_file.put_line(fh,' p_event in out nocopy wf_event_t,');
406: utl_file.put_line(fh,' x_result in out nocopy varchar2,');
407: utl_file.put_line(fh,' x_executed out nocopy boolean)');
408: utl_file.put_line(fh,'as');

Line 405: utl_file.put_line(fh,' p_event in out nocopy wf_event_t,');

401: utl_file.put_line(fh,'--');
402:
403: utl_file.put_line(fh,'PROCEDURE RuleFunction(p_func_name in varchar2,');
404: utl_file.put_line(fh,' p_subscription_guid in raw,');
405: utl_file.put_line(fh,' p_event in out nocopy wf_event_t,');
406: utl_file.put_line(fh,' x_result in out nocopy varchar2,');
407: utl_file.put_line(fh,' x_executed out nocopy boolean)');
408: utl_file.put_line(fh,'as');
409: utl_file.put_line(fh,' l_funcname varchar2(240);');

Line 406: utl_file.put_line(fh,' x_result in out nocopy varchar2,');

402:
403: utl_file.put_line(fh,'PROCEDURE RuleFunction(p_func_name in varchar2,');
404: utl_file.put_line(fh,' p_subscription_guid in raw,');
405: utl_file.put_line(fh,' p_event in out nocopy wf_event_t,');
406: utl_file.put_line(fh,' x_result in out nocopy varchar2,');
407: utl_file.put_line(fh,' x_executed out nocopy boolean)');
408: utl_file.put_line(fh,'as');
409: utl_file.put_line(fh,' l_funcname varchar2(240);');
410: utl_file.put_line(fh,' l_event_name varchar2(240);');

Line 407: utl_file.put_line(fh,' x_executed out nocopy boolean)');

403: utl_file.put_line(fh,'PROCEDURE RuleFunction(p_func_name in varchar2,');
404: utl_file.put_line(fh,' p_subscription_guid in raw,');
405: utl_file.put_line(fh,' p_event in out nocopy wf_event_t,');
406: utl_file.put_line(fh,' x_result in out nocopy varchar2,');
407: utl_file.put_line(fh,' x_executed out nocopy boolean)');
408: utl_file.put_line(fh,'as');
409: utl_file.put_line(fh,' l_funcname varchar2(240);');
410: utl_file.put_line(fh,' l_event_name varchar2(240);');
411: utl_file.put_line(fh,'begin');

Line 408: utl_file.put_line(fh,'as');

404: utl_file.put_line(fh,' p_subscription_guid in raw,');
405: utl_file.put_line(fh,' p_event in out nocopy wf_event_t,');
406: utl_file.put_line(fh,' x_result in out nocopy varchar2,');
407: utl_file.put_line(fh,' x_executed out nocopy boolean)');
408: utl_file.put_line(fh,'as');
409: utl_file.put_line(fh,' l_funcname varchar2(240);');
410: utl_file.put_line(fh,' l_event_name varchar2(240);');
411: utl_file.put_line(fh,'begin');
412: utl_file.put_line(fh,' x_executed := FALSE;');

Line 409: utl_file.put_line(fh,' l_funcname varchar2(240);');

405: utl_file.put_line(fh,' p_event in out nocopy wf_event_t,');
406: utl_file.put_line(fh,' x_result in out nocopy varchar2,');
407: utl_file.put_line(fh,' x_executed out nocopy boolean)');
408: utl_file.put_line(fh,'as');
409: utl_file.put_line(fh,' l_funcname varchar2(240);');
410: utl_file.put_line(fh,' l_event_name varchar2(240);');
411: utl_file.put_line(fh,'begin');
412: utl_file.put_line(fh,' x_executed := FALSE;');
413: utl_file.put_line(fh,' l_funcname := upper(trim(p_func_name));');

Line 410: utl_file.put_line(fh,' l_event_name varchar2(240);');

406: utl_file.put_line(fh,' x_result in out nocopy varchar2,');
407: utl_file.put_line(fh,' x_executed out nocopy boolean)');
408: utl_file.put_line(fh,'as');
409: utl_file.put_line(fh,' l_funcname varchar2(240);');
410: utl_file.put_line(fh,' l_event_name varchar2(240);');
411: utl_file.put_line(fh,'begin');
412: utl_file.put_line(fh,' x_executed := FALSE;');
413: utl_file.put_line(fh,' l_funcname := upper(trim(p_func_name));');
414: utl_file.put_line(fh,' l_event_name := upper(p_event.event_name);');

Line 411: utl_file.put_line(fh,'begin');

407: utl_file.put_line(fh,' x_executed out nocopy boolean)');
408: utl_file.put_line(fh,'as');
409: utl_file.put_line(fh,' l_funcname varchar2(240);');
410: utl_file.put_line(fh,' l_event_name varchar2(240);');
411: utl_file.put_line(fh,'begin');
412: utl_file.put_line(fh,' x_executed := FALSE;');
413: utl_file.put_line(fh,' l_funcname := upper(trim(p_func_name));');
414: utl_file.put_line(fh,' l_event_name := upper(p_event.event_name);');
415:

Line 412: utl_file.put_line(fh,' x_executed := FALSE;');

408: utl_file.put_line(fh,'as');
409: utl_file.put_line(fh,' l_funcname varchar2(240);');
410: utl_file.put_line(fh,' l_event_name varchar2(240);');
411: utl_file.put_line(fh,'begin');
412: utl_file.put_line(fh,' x_executed := FALSE;');
413: utl_file.put_line(fh,' l_funcname := upper(trim(p_func_name));');
414: utl_file.put_line(fh,' l_event_name := upper(p_event.event_name);');
415:
416:

Line 413: utl_file.put_line(fh,' l_funcname := upper(trim(p_func_name));');

409: utl_file.put_line(fh,' l_funcname varchar2(240);');
410: utl_file.put_line(fh,' l_event_name varchar2(240);');
411: utl_file.put_line(fh,'begin');
412: utl_file.put_line(fh,' x_executed := FALSE;');
413: utl_file.put_line(fh,' l_funcname := upper(trim(p_func_name));');
414: utl_file.put_line(fh,' l_event_name := upper(p_event.event_name);');
415:
416:
417: l_first_r := TRUE;

Line 414: utl_file.put_line(fh,' l_event_name := upper(p_event.event_name);');

410: utl_file.put_line(fh,' l_event_name varchar2(240);');
411: utl_file.put_line(fh,'begin');
412: utl_file.put_line(fh,' x_executed := FALSE;');
413: utl_file.put_line(fh,' l_funcname := upper(trim(p_func_name));');
414: utl_file.put_line(fh,' l_event_name := upper(p_event.event_name);');
415:
416:
417: l_first_r := TRUE;
418: for seeded_rulefunc_rec in seeded_rule_funcs() loop

Line 420: utl_file.put_line(fh, '');

416:
417: l_first_r := TRUE;
418: for seeded_rulefunc_rec in seeded_rule_funcs() loop
419: if (l_first_r) then
420: utl_file.put_line(fh, '');
421: utl_file.put_line(fh, ' -- Seeded Rule Functions');
422: l_first_r := FALSE;
423: end if;
424:

Line 421: utl_file.put_line(fh, ' -- Seeded Rule Functions');

417: l_first_r := TRUE;
418: for seeded_rulefunc_rec in seeded_rule_funcs() loop
419: if (l_first_r) then
420: utl_file.put_line(fh, '');
421: utl_file.put_line(fh, ' -- Seeded Rule Functions');
422: l_first_r := FALSE;
423: end if;
424:
425: utl_file.put_line(fh,' if (l_funcname = '''

Line 425: utl_file.put_line(fh,' if (l_funcname = '''

421: utl_file.put_line(fh, ' -- Seeded Rule Functions');
422: l_first_r := FALSE;
423: end if;
424:
425: utl_file.put_line(fh,' if (l_funcname = '''
426: || seeded_rulefunc_rec.function || ''') then');
427: utl_file.put_line(fh,' ' || 'x_result := '||seeded_rulefunc_rec.function
428: || '(p_subscription_guid, p_event);');
429: utl_file.put_line(fh,' x_executed := TRUE;');

Line 427: utl_file.put_line(fh,' ' || 'x_result := '||seeded_rulefunc_rec.function

423: end if;
424:
425: utl_file.put_line(fh,' if (l_funcname = '''
426: || seeded_rulefunc_rec.function || ''') then');
427: utl_file.put_line(fh,' ' || 'x_result := '||seeded_rulefunc_rec.function
428: || '(p_subscription_guid, p_event);');
429: utl_file.put_line(fh,' x_executed := TRUE;');
430: utl_file.put_line(fh,' return;');
431: utl_file.put_line(fh,' end if; ');

Line 429: utl_file.put_line(fh,' x_executed := TRUE;');

425: utl_file.put_line(fh,' if (l_funcname = '''
426: || seeded_rulefunc_rec.function || ''') then');
427: utl_file.put_line(fh,' ' || 'x_result := '||seeded_rulefunc_rec.function
428: || '(p_subscription_guid, p_event);');
429: utl_file.put_line(fh,' x_executed := TRUE;');
430: utl_file.put_line(fh,' return;');
431: utl_file.put_line(fh,' end if; ');
432: end loop;
433:

Line 430: utl_file.put_line(fh,' return;');

426: || seeded_rulefunc_rec.function || ''') then');
427: utl_file.put_line(fh,' ' || 'x_result := '||seeded_rulefunc_rec.function
428: || '(p_subscription_guid, p_event);');
429: utl_file.put_line(fh,' x_executed := TRUE;');
430: utl_file.put_line(fh,' return;');
431: utl_file.put_line(fh,' end if; ');
432: end loop;
433:
434:

Line 431: utl_file.put_line(fh,' end if; ');

427: utl_file.put_line(fh,' ' || 'x_result := '||seeded_rulefunc_rec.function
428: || '(p_subscription_guid, p_event);');
429: utl_file.put_line(fh,' x_executed := TRUE;');
430: utl_file.put_line(fh,' return;');
431: utl_file.put_line(fh,' end if; ');
432: end loop;
433:
434:
435: if (p_correlation_ids is not null) then

Line 444: utl_file.put_line(fh, '');

440: for rulefunc_rec in all_rule_funcs(p_correlation_ids(i)) loop
441: l_atleast_one_r := TRUE;
442: l_generated_r := TRUE;
443: if (l_first_r) then
444: utl_file.put_line(fh, '');
445: utl_file.put_line(fh, ' -- Function calls for correlation id ' || p_correlation_ids(i) ||'%');
446: utl_file.put_line(fh, ' if (l_event_name like '''
447: || p_correlation_ids(i) || '%'') then ');
448: l_first_r := FALSE;

Line 445: utl_file.put_line(fh, ' -- Function calls for correlation id ' || p_correlation_ids(i) ||'%');

441: l_atleast_one_r := TRUE;
442: l_generated_r := TRUE;
443: if (l_first_r) then
444: utl_file.put_line(fh, '');
445: utl_file.put_line(fh, ' -- Function calls for correlation id ' || p_correlation_ids(i) ||'%');
446: utl_file.put_line(fh, ' if (l_event_name like '''
447: || p_correlation_ids(i) || '%'') then ');
448: l_first_r := FALSE;
449: end if;

Line 446: utl_file.put_line(fh, ' if (l_event_name like '''

442: l_generated_r := TRUE;
443: if (l_first_r) then
444: utl_file.put_line(fh, '');
445: utl_file.put_line(fh, ' -- Function calls for correlation id ' || p_correlation_ids(i) ||'%');
446: utl_file.put_line(fh, ' if (l_event_name like '''
447: || p_correlation_ids(i) || '%'') then ');
448: l_first_r := FALSE;
449: end if;
450:

Line 451: utl_file.put_line(fh,' if (l_funcname = '''

447: || p_correlation_ids(i) || '%'') then ');
448: l_first_r := FALSE;
449: end if;
450:
451: utl_file.put_line(fh,' if (l_funcname = '''
452: || rulefunc_rec.function || ''') then');
453: utl_file.put_line(fh,' ' || 'x_result := '||rulefunc_rec.function
454: || '(p_subscription_guid, p_event);');
455: utl_file.put_line(fh,' x_executed := TRUE;');

Line 453: utl_file.put_line(fh,' ' || 'x_result := '||rulefunc_rec.function

449: end if;
450:
451: utl_file.put_line(fh,' if (l_funcname = '''
452: || rulefunc_rec.function || ''') then');
453: utl_file.put_line(fh,' ' || 'x_result := '||rulefunc_rec.function
454: || '(p_subscription_guid, p_event);');
455: utl_file.put_line(fh,' x_executed := TRUE;');
456: utl_file.put_line(fh,' return;');
457: utl_file.put_line(fh,' end if; ');

Line 455: utl_file.put_line(fh,' x_executed := TRUE;');

451: utl_file.put_line(fh,' if (l_funcname = '''
452: || rulefunc_rec.function || ''') then');
453: utl_file.put_line(fh,' ' || 'x_result := '||rulefunc_rec.function
454: || '(p_subscription_guid, p_event);');
455: utl_file.put_line(fh,' x_executed := TRUE;');
456: utl_file.put_line(fh,' return;');
457: utl_file.put_line(fh,' end if; ');
458: end loop;
459: if (l_atleast_one_r) then

Line 456: utl_file.put_line(fh,' return;');

452: || rulefunc_rec.function || ''') then');
453: utl_file.put_line(fh,' ' || 'x_result := '||rulefunc_rec.function
454: || '(p_subscription_guid, p_event);');
455: utl_file.put_line(fh,' x_executed := TRUE;');
456: utl_file.put_line(fh,' return;');
457: utl_file.put_line(fh,' end if; ');
458: end loop;
459: if (l_atleast_one_r) then
460: utl_file.put_line(fh, ' end if;');

Line 457: utl_file.put_line(fh,' end if; ');

453: utl_file.put_line(fh,' ' || 'x_result := '||rulefunc_rec.function
454: || '(p_subscription_guid, p_event);');
455: utl_file.put_line(fh,' x_executed := TRUE;');
456: utl_file.put_line(fh,' return;');
457: utl_file.put_line(fh,' end if; ');
458: end loop;
459: if (l_atleast_one_r) then
460: utl_file.put_line(fh, ' end if;');
461: end if;

Line 460: utl_file.put_line(fh, ' end if;');

456: utl_file.put_line(fh,' return;');
457: utl_file.put_line(fh,' end if; ');
458: end loop;
459: if (l_atleast_one_r) then
460: utl_file.put_line(fh, ' end if;');
461: end if;
462: end loop; -- p_correlation_ids
463: end if; -- p_correlation_ids
464:

Line 467: utl_file.put_line(fh, '');

463: end if; -- p_correlation_ids
464:
465: -- give a message within the generated file regarding the failure
466: if (not l_generated_r) then
467: utl_file.put_line(fh, '');
468: utl_file.put_line(fh, ' -- Package body could not be generated for the corrid given.');
469: utl_file.put_line(fh, ' -- The reason could be because the procedure(s) referred to by the');
470: utl_file.put_line(fh, ' -- corrid(s) was invalid or the corrid(s) specified do not exist');
471: utl_file.put_line(fh, '');

Line 468: utl_file.put_line(fh, ' -- Package body could not be generated for the corrid given.');

464:
465: -- give a message within the generated file regarding the failure
466: if (not l_generated_r) then
467: utl_file.put_line(fh, '');
468: utl_file.put_line(fh, ' -- Package body could not be generated for the corrid given.');
469: utl_file.put_line(fh, ' -- The reason could be because the procedure(s) referred to by the');
470: utl_file.put_line(fh, ' -- corrid(s) was invalid or the corrid(s) specified do not exist');
471: utl_file.put_line(fh, '');
472: end if;

Line 469: utl_file.put_line(fh, ' -- The reason could be because the procedure(s) referred to by the');

465: -- give a message within the generated file regarding the failure
466: if (not l_generated_r) then
467: utl_file.put_line(fh, '');
468: utl_file.put_line(fh, ' -- Package body could not be generated for the corrid given.');
469: utl_file.put_line(fh, ' -- The reason could be because the procedure(s) referred to by the');
470: utl_file.put_line(fh, ' -- corrid(s) was invalid or the corrid(s) specified do not exist');
471: utl_file.put_line(fh, '');
472: end if;
473:

Line 470: utl_file.put_line(fh, ' -- corrid(s) was invalid or the corrid(s) specified do not exist');

466: if (not l_generated_r) then
467: utl_file.put_line(fh, '');
468: utl_file.put_line(fh, ' -- Package body could not be generated for the corrid given.');
469: utl_file.put_line(fh, ' -- The reason could be because the procedure(s) referred to by the');
470: utl_file.put_line(fh, ' -- corrid(s) was invalid or the corrid(s) specified do not exist');
471: utl_file.put_line(fh, '');
472: end if;
473:
474: utl_file.put_line(fh,'end RuleFunction;');

Line 471: utl_file.put_line(fh, '');

467: utl_file.put_line(fh, '');
468: utl_file.put_line(fh, ' -- Package body could not be generated for the corrid given.');
469: utl_file.put_line(fh, ' -- The reason could be because the procedure(s) referred to by the');
470: utl_file.put_line(fh, ' -- corrid(s) was invalid or the corrid(s) specified do not exist');
471: utl_file.put_line(fh, '');
472: end if;
473:
474: utl_file.put_line(fh,'end RuleFunction;');
475:

Line 474: utl_file.put_line(fh,'end RuleFunction;');

470: utl_file.put_line(fh, ' -- corrid(s) was invalid or the corrid(s) specified do not exist');
471: utl_file.put_line(fh, '');
472: end if;
473:
474: utl_file.put_line(fh,'end RuleFunction;');
475:
476:
477: utl_file.put_line(fh,'end WF_BES_DYN_FUNCS;');
478: utl_file.put_line(fh,'/');

Line 477: utl_file.put_line(fh,'end WF_BES_DYN_FUNCS;');

473:
474: utl_file.put_line(fh,'end RuleFunction;');
475:
476:
477: utl_file.put_line(fh,'end WF_BES_DYN_FUNCS;');
478: utl_file.put_line(fh,'/');
479: utl_file.put_line(fh,'commit;');
480: utl_file.put_line(fh,'exit;');
481: utl_file.put_line(fh,' ');

Line 478: utl_file.put_line(fh,'/');

474: utl_file.put_line(fh,'end RuleFunction;');
475:
476:
477: utl_file.put_line(fh,'end WF_BES_DYN_FUNCS;');
478: utl_file.put_line(fh,'/');
479: utl_file.put_line(fh,'commit;');
480: utl_file.put_line(fh,'exit;');
481: utl_file.put_line(fh,' ');
482: utl_file.fclose(fh);

Line 479: utl_file.put_line(fh,'commit;');

475:
476:
477: utl_file.put_line(fh,'end WF_BES_DYN_FUNCS;');
478: utl_file.put_line(fh,'/');
479: utl_file.put_line(fh,'commit;');
480: utl_file.put_line(fh,'exit;');
481: utl_file.put_line(fh,' ');
482: utl_file.fclose(fh);
483:

Line 480: utl_file.put_line(fh,'exit;');

476:
477: utl_file.put_line(fh,'end WF_BES_DYN_FUNCS;');
478: utl_file.put_line(fh,'/');
479: utl_file.put_line(fh,'commit;');
480: utl_file.put_line(fh,'exit;');
481: utl_file.put_line(fh,' ');
482: utl_file.fclose(fh);
483:
484: dbms_output.put_line('File generated is '||utl_dir||'/'||l_filename);

Line 481: utl_file.put_line(fh,' ');

477: utl_file.put_line(fh,'end WF_BES_DYN_FUNCS;');
478: utl_file.put_line(fh,'/');
479: utl_file.put_line(fh,'commit;');
480: utl_file.put_line(fh,'exit;');
481: utl_file.put_line(fh,' ');
482: utl_file.fclose(fh);
483:
484: dbms_output.put_line('File generated is '||utl_dir||'/'||l_filename);
485: exception

Line 482: utl_file.fclose(fh);

478: utl_file.put_line(fh,'/');
479: utl_file.put_line(fh,'commit;');
480: utl_file.put_line(fh,'exit;');
481: utl_file.put_line(fh,' ');
482: utl_file.fclose(fh);
483:
484: dbms_output.put_line('File generated is '||utl_dir||'/'||l_filename);
485: exception
486: when others then

Line 487: if (utl_file.is_open(fh)) then

483:
484: dbms_output.put_line('File generated is '||utl_dir||'/'||l_filename);
485: exception
486: when others then
487: if (utl_file.is_open(fh)) then
488: utl_file.fclose(fh);
489: end if;
490: raise;
491: end StaticGenerateRule;

Line 488: utl_file.fclose(fh);

484: dbms_output.put_line('File generated is '||utl_dir||'/'||l_filename);
485: exception
486: when others then
487: if (utl_file.is_open(fh)) then
488: utl_file.fclose(fh);
489: end if;
490: raise;
491: end StaticGenerateRule;
492: