DBA Data[Home] [Help]

APPS.CN_UTILS dependencies on CN_UTILS

Line 1: PACKAGE BODY CN_UTILS AS

1: PACKAGE BODY CN_UTILS AS
2: -- $Header: cnsyutlb.pls 120.6 2005/09/28 05:11:50 apink ship $
3:
4:
5:

Line 80: code IN OUT NOCOPY cn_utils.code_type) IS

76:
77:
78: PROCEDURE init_code (
79: X_object_id cn_objects.object_id%TYPE,
80: code IN OUT NOCOPY cn_utils.code_type) IS
81: BEGIN
82: code.object_id := X_object_id;
83: code.line := 1;
84: code.indent := 0;

Line 91: code IN OUT NOCOPY cn_utils.clob_code_type) IS

87:
88: -- for clob
89: PROCEDURE init_code (
90: X_object_id cn_objects.object_id%TYPE,
91: code IN OUT NOCOPY cn_utils.clob_code_type) IS
92: BEGIN
93:
94: code.object_id := X_object_id;
95: code.line := 1;

Line 104: PROCEDURE indent ( code IN OUT NOCOPY cn_utils.code_type,

100: END init_code;
101: -- end clob
102:
103:
104: PROCEDURE indent ( code IN OUT NOCOPY cn_utils.code_type,
105: nesting_level NUMBER) IS
106: BEGIN
107: code.indent := code.indent + (nesting_level * indent_by);
108: END indent;

Line 112: PROCEDURE indent ( code IN OUT NOCOPY cn_utils.clob_code_type,

108: END indent;
109:
110:
111: --for clob
112: PROCEDURE indent ( code IN OUT NOCOPY cn_utils.clob_code_type,
113: nesting_level NUMBER) IS
114: BEGIN
115: code.indent := code.indent + (nesting_level * indent_by);
116: END indent;

Line 119: PROCEDURE unindent ( code IN OUT NOCOPY cn_utils.code_type,

115: code.indent := code.indent + (nesting_level * indent_by);
116: END indent;
117: --end clob
118:
119: PROCEDURE unindent ( code IN OUT NOCOPY cn_utils.code_type,
120: nesting_level NUMBER) IS
121: BEGIN
122: code.indent := code.indent - (nesting_level * indent_by);
123: END unindent;

Line 126: PROCEDURE unindent ( code IN OUT NOCOPY cn_utils.clob_code_type,

122: code.indent := code.indent - (nesting_level * indent_by);
123: END unindent;
124:
125: --for clob
126: PROCEDURE unindent ( code IN OUT NOCOPY cn_utils.clob_code_type,
127: nesting_level NUMBER) IS
128: BEGIN
129:
130: code.indent := code.indent - (nesting_level * indent_by);

Line 135: PROCEDURE append (code IN OUT NOCOPY cn_utils.code_type,

131:
132: END unindent;
133: --end clob
134:
135: PROCEDURE append (code IN OUT NOCOPY cn_utils.code_type,
136: str2 VARCHAR2) IS
137: BEGIN
138: code.text := code.text || str2;
139: END append;

Line 142: PROCEDURE append (code IN OUT NOCOPY cn_utils.clob_code_type,

138: code.text := code.text || str2;
139: END append;
140:
141: --for clob
142: PROCEDURE append (code IN OUT NOCOPY cn_utils.clob_code_type,
143: str2 VARCHAR2) IS
144: BEGIN
145:
146: DBMS_LOB.WRITEAPPEND(code.text,length(str2),str2);

Line 152: PROCEDURE append (code IN OUT NOCOPY cn_utils.clob_code_type,

148: END append;
149: --end clob
150:
151: --for clob
152: PROCEDURE append (code IN OUT NOCOPY cn_utils.clob_code_type,
153: expr clob,
154: str2 VARCHAR2) IS
155: BEGIN
156:

Line 166: PROCEDURE appind (code IN OUT NOCOPY cn_utils.code_type,

162:
163:
164:
165:
166: PROCEDURE appind (code IN OUT NOCOPY cn_utils.code_type,
167: str2 VARCHAR2) IS
168: BEGIN
169: code.text := code.text || spaces(code.indent) || str2;
170: END appind;

Line 174: PROCEDURE appind (code IN OUT NOCOPY cn_utils.clob_code_type,

170: END appind;
171:
172:
173: --for clob
174: PROCEDURE appind (code IN OUT NOCOPY cn_utils.clob_code_type,
175: str2 VARCHAR2) IS
176: BEGIN
177:
178: DBMS_LOB.WRITEAPPEND(code.text,length(str2),str2);

Line 183: PROCEDURE appendcr (code IN OUT NOCOPY cn_utils.code_type) IS

179:
180: END appind;
181: --end clob
182:
183: PROCEDURE appendcr (code IN OUT NOCOPY cn_utils.code_type) IS
184: BEGIN
185: code.text := code.text || '
186: ';
187: cn_utils.dump_line( code );

Line 187: cn_utils.dump_line( code );

183: PROCEDURE appendcr (code IN OUT NOCOPY cn_utils.code_type) IS
184: BEGIN
185: code.text := code.text || '
186: ';
187: cn_utils.dump_line( code );
188: END appendcr;
189:
190: --for clob
191: PROCEDURE appendcr (code IN OUT NOCOPY cn_utils.clob_code_type) IS

Line 191: PROCEDURE appendcr (code IN OUT NOCOPY cn_utils.clob_code_type) IS

187: cn_utils.dump_line( code );
188: END appendcr;
189:
190: --for clob
191: PROCEDURE appendcr (code IN OUT NOCOPY cn_utils.clob_code_type) IS
192: line varchar2(32700);
193: BEGIN
194:
195: line := '

Line 199: cn_utils.dump_line( code );

195: line := '
196: ';
197:
198: DBMS_LOB.WRITEAPPEND(code.text,length(line),line);
199: cn_utils.dump_line( code );
200:
201: END appendcr;
202: --end clob
203:

Line 204: PROCEDURE appendcr (code IN OUT NOCOPY cn_utils.code_type,

200:
201: END appendcr;
202: --end clob
203:
204: PROCEDURE appendcr (code IN OUT NOCOPY cn_utils.code_type,
205: str2 VARCHAR2) IS
206: BEGIN
207: code.text := code.text || str2 || '
208: ';

Line 209: cn_utils.dump_line( code );

205: str2 VARCHAR2) IS
206: BEGIN
207: code.text := code.text || str2 || '
208: ';
209: cn_utils.dump_line( code );
210: END appendcr;
211:
212:
213: --for clob

Line 214: PROCEDURE appendcr (code IN OUT NOCOPY cn_utils.clob_code_type,

210: END appendcr;
211:
212:
213: --for clob
214: PROCEDURE appendcr (code IN OUT NOCOPY cn_utils.clob_code_type,
215: str2 VARCHAR2) IS
216: line varchar2(32700);
217: BEGIN
218:

Line 223: cn_utils.dump_line( code );

219: line := str2 || '
220: ';
221:
222: DBMS_LOB.WRITEAPPEND(code.text,length(line),line);
223: cn_utils.dump_line( code );
224:
225: END appendcr;
226: --end clob
227:

Line 228: PROCEDURE appindcr (code IN OUT NOCOPY cn_utils.code_type,

224:
225: END appendcr;
226: --end clob
227:
228: PROCEDURE appindcr (code IN OUT NOCOPY cn_utils.code_type,
229: str2 VARCHAR2) IS
230: BEGIN
231: code.text := code.text || spaces(code.indent) || str2 || '
232: ';

Line 233: cn_utils.dump_line( code );

229: str2 VARCHAR2) IS
230: BEGIN
231: code.text := code.text || spaces(code.indent) || str2 || '
232: ';
233: cn_utils.dump_line( code );
234: END appindcr;
235:
236: PROCEDURE appindcr (code IN OUT NOCOPY cn_utils.clob_code_type,
237: str2 VARCHAR2) IS

Line 236: PROCEDURE appindcr (code IN OUT NOCOPY cn_utils.clob_code_type,

232: ';
233: cn_utils.dump_line( code );
234: END appindcr;
235:
236: PROCEDURE appindcr (code IN OUT NOCOPY cn_utils.clob_code_type,
237: str2 VARCHAR2) IS
238: line varchar2(32700);
239: BEGIN
240:

Line 246: cn_utils.dump_line( code );

242: ';
243:
244: DBMS_LOB.WRITEAPPEND(code.text,length(line),line);
245:
246: cn_utils.dump_line( code );
247:
248: END appindcr;
249:
250: -- Note: STRIP works on the current line, before it is written out.

Line 251: PROCEDURE strip (code IN OUT NOCOPY cn_utils.code_type, i NUMBER) IS

247:
248: END appindcr;
249:
250: -- Note: STRIP works on the current line, before it is written out.
251: PROCEDURE strip (code IN OUT NOCOPY cn_utils.code_type, i NUMBER) IS
252: BEGIN
253: code.text := substr(code.text, 1, length(code.text) - i);
254: END strip;
255:

Line 259: PROCEDURE strip_prev (code IN OUT NOCOPY cn_utils.code_type,

255:
256:
257: -- AE 08-24-95
258: -- Note: STRIP_PREV works on the previous line, after it is written out.
259: PROCEDURE strip_prev (code IN OUT NOCOPY cn_utils.code_type,
260: i NUMBER) IS
261: BEGIN
262:
263: code.line := code.line - 1 ; -- back up to prev line.

Line 292: PROCEDURE dump_line ( code IN OUT NOCOPY cn_utils.code_type) IS

288: END strip_prev;
289:
290:
291:
292: PROCEDURE dump_line ( code IN OUT NOCOPY cn_utils.code_type) IS
293:
294: l_pos NUMBER;
295: l_text VARCHAR2(32000);
296: l_text1 VARCHAR2(1900);

Line 344: PROCEDURE dump_line (code IN OUT NOCOPY cn_utils.clob_code_type) IS

340:
341: END dump_line;
342:
343: --for clob
344: PROCEDURE dump_line (code IN OUT NOCOPY cn_utils.clob_code_type) IS
345:
346: l_curr_pos NUMBER;
347: l_text VARCHAR2(32000);
348: l_text1 VARCHAR2(1900);

Line 429: code IN OUT NOCOPY cn_utils.code_type) IS

425: PROCEDURE record_process_start (
426: audit_type VARCHAR2,
427: audit_desc VARCHAR2,
428: parent_audit_id VARCHAR2,
429: code IN OUT NOCOPY cn_utils.code_type) IS
430: BEGIN
431: cn_debug.print_msg('record_process_start>>', 1);
432:
433: cn_utils.appindcr(code, 'x_proc_audit_id := NULL; -- Will get a value in the call below');

Line 433: cn_utils.appindcr(code, 'x_proc_audit_id := NULL; -- Will get a value in the call below');

429: code IN OUT NOCOPY cn_utils.code_type) IS
430: BEGIN
431: cn_debug.print_msg('record_process_start>>', 1);
432:
433: cn_utils.appindcr(code, 'x_proc_audit_id := NULL; -- Will get a value in the call below');
434: cn_utils.appindcr(code, 'cn_process_audits_pkg.insert_row(x_rowid, x_proc_audit_id, ' || parent_audit_id || ',');
435: cn_utils.appindcr(code, ' ''' || audit_type || ''',' || audit_desc || ', NULL, NULL, NULL, NULL, NULL, SYSDATE, NULL,'||g_org_id||');');
436: --AE cn_utils.appindcr(code, 'COMMIT;');
437: cn_utils.appendcr(code);

Line 434: cn_utils.appindcr(code, 'cn_process_audits_pkg.insert_row(x_rowid, x_proc_audit_id, ' || parent_audit_id || ',');

430: BEGIN
431: cn_debug.print_msg('record_process_start>>', 1);
432:
433: cn_utils.appindcr(code, 'x_proc_audit_id := NULL; -- Will get a value in the call below');
434: cn_utils.appindcr(code, 'cn_process_audits_pkg.insert_row(x_rowid, x_proc_audit_id, ' || parent_audit_id || ',');
435: cn_utils.appindcr(code, ' ''' || audit_type || ''',' || audit_desc || ', NULL, NULL, NULL, NULL, NULL, SYSDATE, NULL,'||g_org_id||');');
436: --AE cn_utils.appindcr(code, 'COMMIT;');
437: cn_utils.appendcr(code);
438:

Line 435: cn_utils.appindcr(code, ' ''' || audit_type || ''',' || audit_desc || ', NULL, NULL, NULL, NULL, NULL, SYSDATE, NULL,'||g_org_id||');');

431: cn_debug.print_msg('record_process_start>>', 1);
432:
433: cn_utils.appindcr(code, 'x_proc_audit_id := NULL; -- Will get a value in the call below');
434: cn_utils.appindcr(code, 'cn_process_audits_pkg.insert_row(x_rowid, x_proc_audit_id, ' || parent_audit_id || ',');
435: cn_utils.appindcr(code, ' ''' || audit_type || ''',' || audit_desc || ', NULL, NULL, NULL, NULL, NULL, SYSDATE, NULL,'||g_org_id||');');
436: --AE cn_utils.appindcr(code, 'COMMIT;');
437: cn_utils.appendcr(code);
438:
439: cn_debug.print_msg('record_process_start<<', 1);

Line 436: --AE cn_utils.appindcr(code, 'COMMIT;');

432:
433: cn_utils.appindcr(code, 'x_proc_audit_id := NULL; -- Will get a value in the call below');
434: cn_utils.appindcr(code, 'cn_process_audits_pkg.insert_row(x_rowid, x_proc_audit_id, ' || parent_audit_id || ',');
435: cn_utils.appindcr(code, ' ''' || audit_type || ''',' || audit_desc || ', NULL, NULL, NULL, NULL, NULL, SYSDATE, NULL,'||g_org_id||');');
436: --AE cn_utils.appindcr(code, 'COMMIT;');
437: cn_utils.appendcr(code);
438:
439: cn_debug.print_msg('record_process_start<<', 1);
440: END record_process_start;

Line 437: cn_utils.appendcr(code);

433: cn_utils.appindcr(code, 'x_proc_audit_id := NULL; -- Will get a value in the call below');
434: cn_utils.appindcr(code, 'cn_process_audits_pkg.insert_row(x_rowid, x_proc_audit_id, ' || parent_audit_id || ',');
435: cn_utils.appindcr(code, ' ''' || audit_type || ''',' || audit_desc || ', NULL, NULL, NULL, NULL, NULL, SYSDATE, NULL,'||g_org_id||');');
436: --AE cn_utils.appindcr(code, 'COMMIT;');
437: cn_utils.appendcr(code);
438:
439: cn_debug.print_msg('record_process_start<<', 1);
440: END record_process_start;
441:

Line 453: code IN OUT NOCOPY cn_utils.code_type) IS

449: -- 22-MAR-94 Devesh Khatu Created
450: --
451: PROCEDURE record_process_success (
452: message VARCHAR2,
453: code IN OUT NOCOPY cn_utils.code_type) IS
454: BEGIN
455: cn_debug.print_msg('record_process_status>>', 1);
456: -- Generate code to record success of the process
457: cn_utils.appindcr(code, 'cn_process_audits_pkg.update_row(x_proc_audit_id, NULL, SYSDATE, 0, ' || message || ');');

Line 457: cn_utils.appindcr(code, 'cn_process_audits_pkg.update_row(x_proc_audit_id, NULL, SYSDATE, 0, ' || message || ');');

453: code IN OUT NOCOPY cn_utils.code_type) IS
454: BEGIN
455: cn_debug.print_msg('record_process_status>>', 1);
456: -- Generate code to record success of the process
457: cn_utils.appindcr(code, 'cn_process_audits_pkg.update_row(x_proc_audit_id, NULL, SYSDATE, 0, ' || message || ');');
458: --AE cn_utils.appindcr(code, 'COMMIT;');
459: cn_utils.appendcr(code);
460: cn_debug.print_msg('record_process_success<<', 1);
461: END record_process_success;

Line 458: --AE cn_utils.appindcr(code, 'COMMIT;');

454: BEGIN
455: cn_debug.print_msg('record_process_status>>', 1);
456: -- Generate code to record success of the process
457: cn_utils.appindcr(code, 'cn_process_audits_pkg.update_row(x_proc_audit_id, NULL, SYSDATE, 0, ' || message || ');');
458: --AE cn_utils.appindcr(code, 'COMMIT;');
459: cn_utils.appendcr(code);
460: cn_debug.print_msg('record_process_success<<', 1);
461: END record_process_success;
462:

Line 459: cn_utils.appendcr(code);

455: cn_debug.print_msg('record_process_status>>', 1);
456: -- Generate code to record success of the process
457: cn_utils.appindcr(code, 'cn_process_audits_pkg.update_row(x_proc_audit_id, NULL, SYSDATE, 0, ' || message || ');');
458: --AE cn_utils.appindcr(code, 'COMMIT;');
459: cn_utils.appendcr(code);
460: cn_debug.print_msg('record_process_success<<', 1);
461: END record_process_success;
462:
463:

Line 475: code IN OUT NOCOPY cn_utils.code_type) IS

471: --
472: PROCEDURE record_process_exception (
473: procedure_name cn_obj_procedures_v.name%TYPE,
474: savepoint_name VARCHAR2,
475: code IN OUT NOCOPY cn_utils.code_type) IS
476: BEGIN
477: -- Generate code to handle errors
478: cn_debug.print_msg('record_process_exception>>', 1);
479: cn_utils.unindent(code, 1);

Line 479: cn_utils.unindent(code, 1);

475: code IN OUT NOCOPY cn_utils.code_type) IS
476: BEGIN
477: -- Generate code to handle errors
478: cn_debug.print_msg('record_process_exception>>', 1);
479: cn_utils.unindent(code, 1);
480: cn_utils.appindcr(code, 'EXCEPTION');
481: cn_utils.indent(code, 1);
482: IF (savepoint_name IS NOT NULL) THEN
483: cn_utils.appindcr(code, 'WHEN OTHERS THEN ROLLBACK TO ' || savepoint_name || ';');

Line 480: cn_utils.appindcr(code, 'EXCEPTION');

476: BEGIN
477: -- Generate code to handle errors
478: cn_debug.print_msg('record_process_exception>>', 1);
479: cn_utils.unindent(code, 1);
480: cn_utils.appindcr(code, 'EXCEPTION');
481: cn_utils.indent(code, 1);
482: IF (savepoint_name IS NOT NULL) THEN
483: cn_utils.appindcr(code, 'WHEN OTHERS THEN ROLLBACK TO ' || savepoint_name || ';');
484: ELSE

Line 481: cn_utils.indent(code, 1);

477: -- Generate code to handle errors
478: cn_debug.print_msg('record_process_exception>>', 1);
479: cn_utils.unindent(code, 1);
480: cn_utils.appindcr(code, 'EXCEPTION');
481: cn_utils.indent(code, 1);
482: IF (savepoint_name IS NOT NULL) THEN
483: cn_utils.appindcr(code, 'WHEN OTHERS THEN ROLLBACK TO ' || savepoint_name || ';');
484: ELSE
485: --AE cn_utils.appindcr(code, 'WHEN OTHERS THEN ROLLBACK;');

Line 483: cn_utils.appindcr(code, 'WHEN OTHERS THEN ROLLBACK TO ' || savepoint_name || ';');

479: cn_utils.unindent(code, 1);
480: cn_utils.appindcr(code, 'EXCEPTION');
481: cn_utils.indent(code, 1);
482: IF (savepoint_name IS NOT NULL) THEN
483: cn_utils.appindcr(code, 'WHEN OTHERS THEN ROLLBACK TO ' || savepoint_name || ';');
484: ELSE
485: --AE cn_utils.appindcr(code, 'WHEN OTHERS THEN ROLLBACK;');
486: cn_utils.appindcr(code, 'WHEN OTHERS THEN ');
487: END IF;

Line 485: --AE cn_utils.appindcr(code, 'WHEN OTHERS THEN ROLLBACK;');

481: cn_utils.indent(code, 1);
482: IF (savepoint_name IS NOT NULL) THEN
483: cn_utils.appindcr(code, 'WHEN OTHERS THEN ROLLBACK TO ' || savepoint_name || ';');
484: ELSE
485: --AE cn_utils.appindcr(code, 'WHEN OTHERS THEN ROLLBACK;');
486: cn_utils.appindcr(code, 'WHEN OTHERS THEN ');
487: END IF;
488: cn_utils.appindcr(code, 'cn_process_audits_pkg.update_row(x_proc_audit_id, NULL, SYSDATE, SQLCODE,');
489: cn_utils.appindcr(code, ' SQLERRM);');

Line 486: cn_utils.appindcr(code, 'WHEN OTHERS THEN ');

482: IF (savepoint_name IS NOT NULL) THEN
483: cn_utils.appindcr(code, 'WHEN OTHERS THEN ROLLBACK TO ' || savepoint_name || ';');
484: ELSE
485: --AE cn_utils.appindcr(code, 'WHEN OTHERS THEN ROLLBACK;');
486: cn_utils.appindcr(code, 'WHEN OTHERS THEN ');
487: END IF;
488: cn_utils.appindcr(code, 'cn_process_audits_pkg.update_row(x_proc_audit_id, NULL, SYSDATE, SQLCODE,');
489: cn_utils.appindcr(code, ' SQLERRM);');
490: --AE cn_utils.appindcr(code, 'COMMIT;');

Line 488: cn_utils.appindcr(code, 'cn_process_audits_pkg.update_row(x_proc_audit_id, NULL, SYSDATE, SQLCODE,');

484: ELSE
485: --AE cn_utils.appindcr(code, 'WHEN OTHERS THEN ROLLBACK;');
486: cn_utils.appindcr(code, 'WHEN OTHERS THEN ');
487: END IF;
488: cn_utils.appindcr(code, 'cn_process_audits_pkg.update_row(x_proc_audit_id, NULL, SYSDATE, SQLCODE,');
489: cn_utils.appindcr(code, ' SQLERRM);');
490: --AE cn_utils.appindcr(code, 'COMMIT;');
491: cn_utils.appendcr(code);
492:

Line 489: cn_utils.appindcr(code, ' SQLERRM);');

485: --AE cn_utils.appindcr(code, 'WHEN OTHERS THEN ROLLBACK;');
486: cn_utils.appindcr(code, 'WHEN OTHERS THEN ');
487: END IF;
488: cn_utils.appindcr(code, 'cn_process_audits_pkg.update_row(x_proc_audit_id, NULL, SYSDATE, SQLCODE,');
489: cn_utils.appindcr(code, ' SQLERRM);');
490: --AE cn_utils.appindcr(code, 'COMMIT;');
491: cn_utils.appendcr(code);
492:
493: cn_utils.appindcr(code, 'app_exception.raise_exception;'); --AE 04-28-95

Line 490: --AE cn_utils.appindcr(code, 'COMMIT;');

486: cn_utils.appindcr(code, 'WHEN OTHERS THEN ');
487: END IF;
488: cn_utils.appindcr(code, 'cn_process_audits_pkg.update_row(x_proc_audit_id, NULL, SYSDATE, SQLCODE,');
489: cn_utils.appindcr(code, ' SQLERRM);');
490: --AE cn_utils.appindcr(code, 'COMMIT;');
491: cn_utils.appendcr(code);
492:
493: cn_utils.appindcr(code, 'app_exception.raise_exception;'); --AE 04-28-95
494: cn_utils.appendcr(code);

Line 491: cn_utils.appendcr(code);

487: END IF;
488: cn_utils.appindcr(code, 'cn_process_audits_pkg.update_row(x_proc_audit_id, NULL, SYSDATE, SQLCODE,');
489: cn_utils.appindcr(code, ' SQLERRM);');
490: --AE cn_utils.appindcr(code, 'COMMIT;');
491: cn_utils.appendcr(code);
492:
493: cn_utils.appindcr(code, 'app_exception.raise_exception;'); --AE 04-28-95
494: cn_utils.appendcr(code);
495: END record_process_exception;

Line 493: cn_utils.appindcr(code, 'app_exception.raise_exception;'); --AE 04-28-95

489: cn_utils.appindcr(code, ' SQLERRM);');
490: --AE cn_utils.appindcr(code, 'COMMIT;');
491: cn_utils.appendcr(code);
492:
493: cn_utils.appindcr(code, 'app_exception.raise_exception;'); --AE 04-28-95
494: cn_utils.appendcr(code);
495: END record_process_exception;
496:
497: --for clob

Line 494: cn_utils.appendcr(code);

490: --AE cn_utils.appindcr(code, 'COMMIT;');
491: cn_utils.appendcr(code);
492:
493: cn_utils.appindcr(code, 'app_exception.raise_exception;'); --AE 04-28-95
494: cn_utils.appendcr(code);
495: END record_process_exception;
496:
497: --for clob
498: --

Line 509: code IN OUT NOCOPY cn_utils.clob_code_type) IS

505: --
506: PROCEDURE record_process_exception (
507: procedure_name cn_obj_procedures_v.name%TYPE,
508: savepoint_name VARCHAR2,
509: code IN OUT NOCOPY cn_utils.clob_code_type) IS
510: BEGIN
511: -- Generate code to handle errors
512: cn_debug.print_msg('record_process_exception>>', 1);
513: cn_utils.unindent(code, 1);

Line 513: cn_utils.unindent(code, 1);

509: code IN OUT NOCOPY cn_utils.clob_code_type) IS
510: BEGIN
511: -- Generate code to handle errors
512: cn_debug.print_msg('record_process_exception>>', 1);
513: cn_utils.unindent(code, 1);
514: cn_utils.appindcr(code, 'EXCEPTION');
515: cn_utils.indent(code, 1);
516: IF (savepoint_name IS NOT NULL) THEN
517: cn_utils.appindcr(code, 'WHEN OTHERS THEN ROLLBACK TO ' || savepoint_name || ';');

Line 514: cn_utils.appindcr(code, 'EXCEPTION');

510: BEGIN
511: -- Generate code to handle errors
512: cn_debug.print_msg('record_process_exception>>', 1);
513: cn_utils.unindent(code, 1);
514: cn_utils.appindcr(code, 'EXCEPTION');
515: cn_utils.indent(code, 1);
516: IF (savepoint_name IS NOT NULL) THEN
517: cn_utils.appindcr(code, 'WHEN OTHERS THEN ROLLBACK TO ' || savepoint_name || ';');
518: ELSE

Line 515: cn_utils.indent(code, 1);

511: -- Generate code to handle errors
512: cn_debug.print_msg('record_process_exception>>', 1);
513: cn_utils.unindent(code, 1);
514: cn_utils.appindcr(code, 'EXCEPTION');
515: cn_utils.indent(code, 1);
516: IF (savepoint_name IS NOT NULL) THEN
517: cn_utils.appindcr(code, 'WHEN OTHERS THEN ROLLBACK TO ' || savepoint_name || ';');
518: ELSE
519: --AE cn_utils.appindcr(code, 'WHEN OTHERS THEN ROLLBACK;');

Line 517: cn_utils.appindcr(code, 'WHEN OTHERS THEN ROLLBACK TO ' || savepoint_name || ';');

513: cn_utils.unindent(code, 1);
514: cn_utils.appindcr(code, 'EXCEPTION');
515: cn_utils.indent(code, 1);
516: IF (savepoint_name IS NOT NULL) THEN
517: cn_utils.appindcr(code, 'WHEN OTHERS THEN ROLLBACK TO ' || savepoint_name || ';');
518: ELSE
519: --AE cn_utils.appindcr(code, 'WHEN OTHERS THEN ROLLBACK;');
520: cn_utils.appindcr(code, 'WHEN OTHERS THEN ');
521: END IF;

Line 519: --AE cn_utils.appindcr(code, 'WHEN OTHERS THEN ROLLBACK;');

515: cn_utils.indent(code, 1);
516: IF (savepoint_name IS NOT NULL) THEN
517: cn_utils.appindcr(code, 'WHEN OTHERS THEN ROLLBACK TO ' || savepoint_name || ';');
518: ELSE
519: --AE cn_utils.appindcr(code, 'WHEN OTHERS THEN ROLLBACK;');
520: cn_utils.appindcr(code, 'WHEN OTHERS THEN ');
521: END IF;
522: cn_utils.appindcr(code, 'cn_process_audits_pkg.update_row(x_proc_audit_id, NULL, SYSDATE, SQLCODE,');
523: cn_utils.appindcr(code, ' SQLERRM);');

Line 520: cn_utils.appindcr(code, 'WHEN OTHERS THEN ');

516: IF (savepoint_name IS NOT NULL) THEN
517: cn_utils.appindcr(code, 'WHEN OTHERS THEN ROLLBACK TO ' || savepoint_name || ';');
518: ELSE
519: --AE cn_utils.appindcr(code, 'WHEN OTHERS THEN ROLLBACK;');
520: cn_utils.appindcr(code, 'WHEN OTHERS THEN ');
521: END IF;
522: cn_utils.appindcr(code, 'cn_process_audits_pkg.update_row(x_proc_audit_id, NULL, SYSDATE, SQLCODE,');
523: cn_utils.appindcr(code, ' SQLERRM);');
524: --AE cn_utils.appindcr(code, 'COMMIT;');

Line 522: cn_utils.appindcr(code, 'cn_process_audits_pkg.update_row(x_proc_audit_id, NULL, SYSDATE, SQLCODE,');

518: ELSE
519: --AE cn_utils.appindcr(code, 'WHEN OTHERS THEN ROLLBACK;');
520: cn_utils.appindcr(code, 'WHEN OTHERS THEN ');
521: END IF;
522: cn_utils.appindcr(code, 'cn_process_audits_pkg.update_row(x_proc_audit_id, NULL, SYSDATE, SQLCODE,');
523: cn_utils.appindcr(code, ' SQLERRM);');
524: --AE cn_utils.appindcr(code, 'COMMIT;');
525: cn_utils.appendcr(code);
526:

Line 523: cn_utils.appindcr(code, ' SQLERRM);');

519: --AE cn_utils.appindcr(code, 'WHEN OTHERS THEN ROLLBACK;');
520: cn_utils.appindcr(code, 'WHEN OTHERS THEN ');
521: END IF;
522: cn_utils.appindcr(code, 'cn_process_audits_pkg.update_row(x_proc_audit_id, NULL, SYSDATE, SQLCODE,');
523: cn_utils.appindcr(code, ' SQLERRM);');
524: --AE cn_utils.appindcr(code, 'COMMIT;');
525: cn_utils.appendcr(code);
526:
527: cn_utils.appindcr(code, 'app_exception.raise_exception;'); --AE 04-28-95

Line 524: --AE cn_utils.appindcr(code, 'COMMIT;');

520: cn_utils.appindcr(code, 'WHEN OTHERS THEN ');
521: END IF;
522: cn_utils.appindcr(code, 'cn_process_audits_pkg.update_row(x_proc_audit_id, NULL, SYSDATE, SQLCODE,');
523: cn_utils.appindcr(code, ' SQLERRM);');
524: --AE cn_utils.appindcr(code, 'COMMIT;');
525: cn_utils.appendcr(code);
526:
527: cn_utils.appindcr(code, 'app_exception.raise_exception;'); --AE 04-28-95
528: cn_utils.appendcr(code);

Line 525: cn_utils.appendcr(code);

521: END IF;
522: cn_utils.appindcr(code, 'cn_process_audits_pkg.update_row(x_proc_audit_id, NULL, SYSDATE, SQLCODE,');
523: cn_utils.appindcr(code, ' SQLERRM);');
524: --AE cn_utils.appindcr(code, 'COMMIT;');
525: cn_utils.appendcr(code);
526:
527: cn_utils.appindcr(code, 'app_exception.raise_exception;'); --AE 04-28-95
528: cn_utils.appendcr(code);
529: END record_process_exception;

Line 527: cn_utils.appindcr(code, 'app_exception.raise_exception;'); --AE 04-28-95

523: cn_utils.appindcr(code, ' SQLERRM);');
524: --AE cn_utils.appindcr(code, 'COMMIT;');
525: cn_utils.appendcr(code);
526:
527: cn_utils.appindcr(code, 'app_exception.raise_exception;'); --AE 04-28-95
528: cn_utils.appendcr(code);
529: END record_process_exception;
530: --end clob
531:

Line 528: cn_utils.appendcr(code);

524: --AE cn_utils.appindcr(code, 'COMMIT;');
525: cn_utils.appendcr(code);
526:
527: cn_utils.appindcr(code, 'app_exception.raise_exception;'); --AE 04-28-95
528: cn_utils.appendcr(code);
529: END record_process_exception;
530: --end clob
531:
532: PROCEDURE pkg_init_boilerplate (

Line 533: code IN OUT NOCOPY cn_utils.code_type,

529: END record_process_exception;
530: --end clob
531:
532: PROCEDURE pkg_init_boilerplate (
533: code IN OUT NOCOPY cn_utils.code_type,
534: package_name cn_obj_packages_v.name%TYPE,
535: description cn_obj_packages_v.description%TYPE,
536: object_type VARCHAR2) IS
537:

Line 541: cn_utils.appendcr(code, '-- +======================================================================+ --');

537:
538: X_userid VARCHAR2(20);
539:
540: BEGIN
541: cn_utils.appendcr(code, '-- +======================================================================+ --');
542: cn_utils.appendcr(code, '-- | Copyright (c) 1994 Oracle Corporation | --');
543: cn_utils.appendcr(code, '-- | Redwood Shores, California, USA | --');
544: cn_utils.appendcr(code, '-- | All rights reserved. | --');
545: cn_utils.appendcr(code, '-- +======================================================================+ --');

Line 542: cn_utils.appendcr(code, '-- | Copyright (c) 1994 Oracle Corporation | --');

538: X_userid VARCHAR2(20);
539:
540: BEGIN
541: cn_utils.appendcr(code, '-- +======================================================================+ --');
542: cn_utils.appendcr(code, '-- | Copyright (c) 1994 Oracle Corporation | --');
543: cn_utils.appendcr(code, '-- | Redwood Shores, California, USA | --');
544: cn_utils.appendcr(code, '-- | All rights reserved. | --');
545: cn_utils.appendcr(code, '-- +======================================================================+ --');
546: cn_utils.appendcr(code);

Line 543: cn_utils.appendcr(code, '-- | Redwood Shores, California, USA | --');

539:
540: BEGIN
541: cn_utils.appendcr(code, '-- +======================================================================+ --');
542: cn_utils.appendcr(code, '-- | Copyright (c) 1994 Oracle Corporation | --');
543: cn_utils.appendcr(code, '-- | Redwood Shores, California, USA | --');
544: cn_utils.appendcr(code, '-- | All rights reserved. | --');
545: cn_utils.appendcr(code, '-- +======================================================================+ --');
546: cn_utils.appendcr(code);
547:

Line 544: cn_utils.appendcr(code, '-- | All rights reserved. | --');

540: BEGIN
541: cn_utils.appendcr(code, '-- +======================================================================+ --');
542: cn_utils.appendcr(code, '-- | Copyright (c) 1994 Oracle Corporation | --');
543: cn_utils.appendcr(code, '-- | Redwood Shores, California, USA | --');
544: cn_utils.appendcr(code, '-- | All rights reserved. | --');
545: cn_utils.appendcr(code, '-- +======================================================================+ --');
546: cn_utils.appendcr(code);
547:
548: SELECT user INTO X_userid FROM sys.dual;

Line 545: cn_utils.appendcr(code, '-- +======================================================================+ --');

541: cn_utils.appendcr(code, '-- +======================================================================+ --');
542: cn_utils.appendcr(code, '-- | Copyright (c) 1994 Oracle Corporation | --');
543: cn_utils.appendcr(code, '-- | Redwood Shores, California, USA | --');
544: cn_utils.appendcr(code, '-- | All rights reserved. | --');
545: cn_utils.appendcr(code, '-- +======================================================================+ --');
546: cn_utils.appendcr(code);
547:
548: SELECT user INTO X_userid FROM sys.dual;
549:

Line 546: cn_utils.appendcr(code);

542: cn_utils.appendcr(code, '-- | Copyright (c) 1994 Oracle Corporation | --');
543: cn_utils.appendcr(code, '-- | Redwood Shores, California, USA | --');
544: cn_utils.appendcr(code, '-- | All rights reserved. | --');
545: cn_utils.appendcr(code, '-- +======================================================================+ --');
546: cn_utils.appendcr(code);
547:
548: SELECT user INTO X_userid FROM sys.dual;
549:
550: cn_utils.appendcr(code, '--');

Line 550: cn_utils.appendcr(code, '--');

546: cn_utils.appendcr(code);
547:
548: SELECT user INTO X_userid FROM sys.dual;
549:
550: cn_utils.appendcr(code, '--');
551: cn_utils.appendcr(code, '-- Package Name');
552: cn_utils.appendcr(code, '-- ' || package_name);
553: cn_utils.appendcr(code, '-- Purpose');
554: cn_utils.appendcr(code, '-- ' || description);

Line 551: cn_utils.appendcr(code, '-- Package Name');

547:
548: SELECT user INTO X_userid FROM sys.dual;
549:
550: cn_utils.appendcr(code, '--');
551: cn_utils.appendcr(code, '-- Package Name');
552: cn_utils.appendcr(code, '-- ' || package_name);
553: cn_utils.appendcr(code, '-- Purpose');
554: cn_utils.appendcr(code, '-- ' || description);
555: cn_utils.appendcr(code, '-- History');

Line 552: cn_utils.appendcr(code, '-- ' || package_name);

548: SELECT user INTO X_userid FROM sys.dual;
549:
550: cn_utils.appendcr(code, '--');
551: cn_utils.appendcr(code, '-- Package Name');
552: cn_utils.appendcr(code, '-- ' || package_name);
553: cn_utils.appendcr(code, '-- Purpose');
554: cn_utils.appendcr(code, '-- ' || description);
555: cn_utils.appendcr(code, '-- History');
556: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');

Line 553: cn_utils.appendcr(code, '-- Purpose');

549:
550: cn_utils.appendcr(code, '--');
551: cn_utils.appendcr(code, '-- Package Name');
552: cn_utils.appendcr(code, '-- ' || package_name);
553: cn_utils.appendcr(code, '-- Purpose');
554: cn_utils.appendcr(code, '-- ' || description);
555: cn_utils.appendcr(code, '-- History');
556: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');
557: cn_utils.appendcr(code, '--');

Line 554: cn_utils.appendcr(code, '-- ' || description);

550: cn_utils.appendcr(code, '--');
551: cn_utils.appendcr(code, '-- Package Name');
552: cn_utils.appendcr(code, '-- ' || package_name);
553: cn_utils.appendcr(code, '-- Purpose');
554: cn_utils.appendcr(code, '-- ' || description);
555: cn_utils.appendcr(code, '-- History');
556: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');
557: cn_utils.appendcr(code, '--');
558: cn_utils.appendcr(code);

Line 555: cn_utils.appendcr(code, '-- History');

551: cn_utils.appendcr(code, '-- Package Name');
552: cn_utils.appendcr(code, '-- ' || package_name);
553: cn_utils.appendcr(code, '-- Purpose');
554: cn_utils.appendcr(code, '-- ' || description);
555: cn_utils.appendcr(code, '-- History');
556: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');
557: cn_utils.appendcr(code, '--');
558: cn_utils.appendcr(code);
559:

Line 556: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');

552: cn_utils.appendcr(code, '-- ' || package_name);
553: cn_utils.appendcr(code, '-- Purpose');
554: cn_utils.appendcr(code, '-- ' || description);
555: cn_utils.appendcr(code, '-- History');
556: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');
557: cn_utils.appendcr(code, '--');
558: cn_utils.appendcr(code);
559:
560: cn_utils.appendcr(code, 'SET VERIFY OFF');

Line 557: cn_utils.appendcr(code, '--');

553: cn_utils.appendcr(code, '-- Purpose');
554: cn_utils.appendcr(code, '-- ' || description);
555: cn_utils.appendcr(code, '-- History');
556: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');
557: cn_utils.appendcr(code, '--');
558: cn_utils.appendcr(code);
559:
560: cn_utils.appendcr(code, 'SET VERIFY OFF');
561: cn_utils.appendcr(code, 'WHENEVER SQLERROR EXIT FAILURE ROLLBACK;');

Line 558: cn_utils.appendcr(code);

554: cn_utils.appendcr(code, '-- ' || description);
555: cn_utils.appendcr(code, '-- History');
556: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');
557: cn_utils.appendcr(code, '--');
558: cn_utils.appendcr(code);
559:
560: cn_utils.appendcr(code, 'SET VERIFY OFF');
561: cn_utils.appendcr(code, 'WHENEVER SQLERROR EXIT FAILURE ROLLBACK;');
562: cn_utils.appendcr(code, 'DEFINE PACKAGE_NAME="' || LOWER(package_name) || '"');

Line 560: cn_utils.appendcr(code, 'SET VERIFY OFF');

556: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');
557: cn_utils.appendcr(code, '--');
558: cn_utils.appendcr(code);
559:
560: cn_utils.appendcr(code, 'SET VERIFY OFF');
561: cn_utils.appendcr(code, 'WHENEVER SQLERROR EXIT FAILURE ROLLBACK;');
562: cn_utils.appendcr(code, 'DEFINE PACKAGE_NAME="' || LOWER(package_name) || '"');
563:
564: IF (object_type = 'PKS') THEN

Line 561: cn_utils.appendcr(code, 'WHENEVER SQLERROR EXIT FAILURE ROLLBACK;');

557: cn_utils.appendcr(code, '--');
558: cn_utils.appendcr(code);
559:
560: cn_utils.appendcr(code, 'SET VERIFY OFF');
561: cn_utils.appendcr(code, 'WHENEVER SQLERROR EXIT FAILURE ROLLBACK;');
562: cn_utils.appendcr(code, 'DEFINE PACKAGE_NAME="' || LOWER(package_name) || '"');
563:
564: IF (object_type = 'PKS') THEN
565: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE ' || package_name || ' AS');

Line 562: cn_utils.appendcr(code, 'DEFINE PACKAGE_NAME="' || LOWER(package_name) || '"');

558: cn_utils.appendcr(code);
559:
560: cn_utils.appendcr(code, 'SET VERIFY OFF');
561: cn_utils.appendcr(code, 'WHENEVER SQLERROR EXIT FAILURE ROLLBACK;');
562: cn_utils.appendcr(code, 'DEFINE PACKAGE_NAME="' || LOWER(package_name) || '"');
563:
564: IF (object_type = 'PKS') THEN
565: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE ' || package_name || ' AS');
566: ELSE

Line 565: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE ' || package_name || ' AS');

561: cn_utils.appendcr(code, 'WHENEVER SQLERROR EXIT FAILURE ROLLBACK;');
562: cn_utils.appendcr(code, 'DEFINE PACKAGE_NAME="' || LOWER(package_name) || '"');
563:
564: IF (object_type = 'PKS') THEN
565: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE ' || package_name || ' AS');
566: ELSE
567: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE BODY ' || package_name || ' AS');
568: END IF;
569: cn_utils.appendcr(code);

Line 567: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE BODY ' || package_name || ' AS');

563:
564: IF (object_type = 'PKS') THEN
565: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE ' || package_name || ' AS');
566: ELSE
567: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE BODY ' || package_name || ' AS');
568: END IF;
569: cn_utils.appendcr(code);
570:
571: END pkg_init_boilerplate;

Line 569: cn_utils.appendcr(code);

565: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE ' || package_name || ' AS');
566: ELSE
567: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE BODY ' || package_name || ' AS');
568: END IF;
569: cn_utils.appendcr(code);
570:
571: END pkg_init_boilerplate;
572:
573:

Line 576: code IN OUT NOCOPY cn_utils.clob_code_type,

572:
573:
574: --for clob
575: PROCEDURE pkg_init_boilerplate (
576: code IN OUT NOCOPY cn_utils.clob_code_type,
577: package_name cn_obj_packages_v.name%TYPE,
578: description cn_obj_packages_v.description%TYPE,
579: object_type VARCHAR2) IS
580: X_userid VARCHAR2(20);

Line 583: cn_utils.appendcr(code, '-- +======================================================================+ --');

579: object_type VARCHAR2) IS
580: X_userid VARCHAR2(20);
581:
582: BEGIN
583: cn_utils.appendcr(code, '-- +======================================================================+ --');
584: cn_utils.appendcr(code, '-- | Copyright (c) 1994 Oracle Corporation | --');
585: cn_utils.appendcr(code, '-- | Redwood Shores, California, USA | --');
586: cn_utils.appendcr(code, '-- | All rights reserved. | --');
587: cn_utils.appendcr(code, '-- +======================================================================+ --');

Line 584: cn_utils.appendcr(code, '-- | Copyright (c) 1994 Oracle Corporation | --');

580: X_userid VARCHAR2(20);
581:
582: BEGIN
583: cn_utils.appendcr(code, '-- +======================================================================+ --');
584: cn_utils.appendcr(code, '-- | Copyright (c) 1994 Oracle Corporation | --');
585: cn_utils.appendcr(code, '-- | Redwood Shores, California, USA | --');
586: cn_utils.appendcr(code, '-- | All rights reserved. | --');
587: cn_utils.appendcr(code, '-- +======================================================================+ --');
588: cn_utils.appendcr(code);

Line 585: cn_utils.appendcr(code, '-- | Redwood Shores, California, USA | --');

581:
582: BEGIN
583: cn_utils.appendcr(code, '-- +======================================================================+ --');
584: cn_utils.appendcr(code, '-- | Copyright (c) 1994 Oracle Corporation | --');
585: cn_utils.appendcr(code, '-- | Redwood Shores, California, USA | --');
586: cn_utils.appendcr(code, '-- | All rights reserved. | --');
587: cn_utils.appendcr(code, '-- +======================================================================+ --');
588: cn_utils.appendcr(code);
589:

Line 586: cn_utils.appendcr(code, '-- | All rights reserved. | --');

582: BEGIN
583: cn_utils.appendcr(code, '-- +======================================================================+ --');
584: cn_utils.appendcr(code, '-- | Copyright (c) 1994 Oracle Corporation | --');
585: cn_utils.appendcr(code, '-- | Redwood Shores, California, USA | --');
586: cn_utils.appendcr(code, '-- | All rights reserved. | --');
587: cn_utils.appendcr(code, '-- +======================================================================+ --');
588: cn_utils.appendcr(code);
589:
590: SELECT user INTO X_userid FROM sys.dual;

Line 587: cn_utils.appendcr(code, '-- +======================================================================+ --');

583: cn_utils.appendcr(code, '-- +======================================================================+ --');
584: cn_utils.appendcr(code, '-- | Copyright (c) 1994 Oracle Corporation | --');
585: cn_utils.appendcr(code, '-- | Redwood Shores, California, USA | --');
586: cn_utils.appendcr(code, '-- | All rights reserved. | --');
587: cn_utils.appendcr(code, '-- +======================================================================+ --');
588: cn_utils.appendcr(code);
589:
590: SELECT user INTO X_userid FROM sys.dual;
591:

Line 588: cn_utils.appendcr(code);

584: cn_utils.appendcr(code, '-- | Copyright (c) 1994 Oracle Corporation | --');
585: cn_utils.appendcr(code, '-- | Redwood Shores, California, USA | --');
586: cn_utils.appendcr(code, '-- | All rights reserved. | --');
587: cn_utils.appendcr(code, '-- +======================================================================+ --');
588: cn_utils.appendcr(code);
589:
590: SELECT user INTO X_userid FROM sys.dual;
591:
592: cn_utils.appendcr(code, '--');

Line 592: cn_utils.appendcr(code, '--');

588: cn_utils.appendcr(code);
589:
590: SELECT user INTO X_userid FROM sys.dual;
591:
592: cn_utils.appendcr(code, '--');
593: cn_utils.appendcr(code, '-- Package Name');
594: cn_utils.appendcr(code, '-- ' || package_name);
595: cn_utils.appendcr(code, '-- Purpose');
596: cn_utils.appendcr(code, '-- ' || description);

Line 593: cn_utils.appendcr(code, '-- Package Name');

589:
590: SELECT user INTO X_userid FROM sys.dual;
591:
592: cn_utils.appendcr(code, '--');
593: cn_utils.appendcr(code, '-- Package Name');
594: cn_utils.appendcr(code, '-- ' || package_name);
595: cn_utils.appendcr(code, '-- Purpose');
596: cn_utils.appendcr(code, '-- ' || description);
597: cn_utils.appendcr(code, '-- History');

Line 594: cn_utils.appendcr(code, '-- ' || package_name);

590: SELECT user INTO X_userid FROM sys.dual;
591:
592: cn_utils.appendcr(code, '--');
593: cn_utils.appendcr(code, '-- Package Name');
594: cn_utils.appendcr(code, '-- ' || package_name);
595: cn_utils.appendcr(code, '-- Purpose');
596: cn_utils.appendcr(code, '-- ' || description);
597: cn_utils.appendcr(code, '-- History');
598: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');

Line 595: cn_utils.appendcr(code, '-- Purpose');

591:
592: cn_utils.appendcr(code, '--');
593: cn_utils.appendcr(code, '-- Package Name');
594: cn_utils.appendcr(code, '-- ' || package_name);
595: cn_utils.appendcr(code, '-- Purpose');
596: cn_utils.appendcr(code, '-- ' || description);
597: cn_utils.appendcr(code, '-- History');
598: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');
599: cn_utils.appendcr(code, '--');

Line 596: cn_utils.appendcr(code, '-- ' || description);

592: cn_utils.appendcr(code, '--');
593: cn_utils.appendcr(code, '-- Package Name');
594: cn_utils.appendcr(code, '-- ' || package_name);
595: cn_utils.appendcr(code, '-- Purpose');
596: cn_utils.appendcr(code, '-- ' || description);
597: cn_utils.appendcr(code, '-- History');
598: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');
599: cn_utils.appendcr(code, '--');
600: cn_utils.appendcr(code);

Line 597: cn_utils.appendcr(code, '-- History');

593: cn_utils.appendcr(code, '-- Package Name');
594: cn_utils.appendcr(code, '-- ' || package_name);
595: cn_utils.appendcr(code, '-- Purpose');
596: cn_utils.appendcr(code, '-- ' || description);
597: cn_utils.appendcr(code, '-- History');
598: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');
599: cn_utils.appendcr(code, '--');
600: cn_utils.appendcr(code);
601:

Line 598: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');

594: cn_utils.appendcr(code, '-- ' || package_name);
595: cn_utils.appendcr(code, '-- Purpose');
596: cn_utils.appendcr(code, '-- ' || description);
597: cn_utils.appendcr(code, '-- History');
598: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');
599: cn_utils.appendcr(code, '--');
600: cn_utils.appendcr(code);
601:
602: cn_utils.appendcr(code, 'SET VERIFY OFF');

Line 599: cn_utils.appendcr(code, '--');

595: cn_utils.appendcr(code, '-- Purpose');
596: cn_utils.appendcr(code, '-- ' || description);
597: cn_utils.appendcr(code, '-- History');
598: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');
599: cn_utils.appendcr(code, '--');
600: cn_utils.appendcr(code);
601:
602: cn_utils.appendcr(code, 'SET VERIFY OFF');
603: cn_utils.appendcr(code, 'WHENEVER SQLERROR EXIT FAILURE ROLLBACK;');

Line 600: cn_utils.appendcr(code);

596: cn_utils.appendcr(code, '-- ' || description);
597: cn_utils.appendcr(code, '-- History');
598: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');
599: cn_utils.appendcr(code, '--');
600: cn_utils.appendcr(code);
601:
602: cn_utils.appendcr(code, 'SET VERIFY OFF');
603: cn_utils.appendcr(code, 'WHENEVER SQLERROR EXIT FAILURE ROLLBACK;');
604: cn_utils.appendcr(code, 'DEFINE PACKAGE_NAME="' || LOWER(package_name) || '"');

Line 602: cn_utils.appendcr(code, 'SET VERIFY OFF');

598: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');
599: cn_utils.appendcr(code, '--');
600: cn_utils.appendcr(code);
601:
602: cn_utils.appendcr(code, 'SET VERIFY OFF');
603: cn_utils.appendcr(code, 'WHENEVER SQLERROR EXIT FAILURE ROLLBACK;');
604: cn_utils.appendcr(code, 'DEFINE PACKAGE_NAME="' || LOWER(package_name) || '"');
605:
606: IF (object_type = 'PKS') THEN

Line 603: cn_utils.appendcr(code, 'WHENEVER SQLERROR EXIT FAILURE ROLLBACK;');

599: cn_utils.appendcr(code, '--');
600: cn_utils.appendcr(code);
601:
602: cn_utils.appendcr(code, 'SET VERIFY OFF');
603: cn_utils.appendcr(code, 'WHENEVER SQLERROR EXIT FAILURE ROLLBACK;');
604: cn_utils.appendcr(code, 'DEFINE PACKAGE_NAME="' || LOWER(package_name) || '"');
605:
606: IF (object_type = 'PKS') THEN
607: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE ' || package_name || ' AS');

Line 604: cn_utils.appendcr(code, 'DEFINE PACKAGE_NAME="' || LOWER(package_name) || '"');

600: cn_utils.appendcr(code);
601:
602: cn_utils.appendcr(code, 'SET VERIFY OFF');
603: cn_utils.appendcr(code, 'WHENEVER SQLERROR EXIT FAILURE ROLLBACK;');
604: cn_utils.appendcr(code, 'DEFINE PACKAGE_NAME="' || LOWER(package_name) || '"');
605:
606: IF (object_type = 'PKS') THEN
607: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE ' || package_name || ' AS');
608: ELSE

Line 607: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE ' || package_name || ' AS');

603: cn_utils.appendcr(code, 'WHENEVER SQLERROR EXIT FAILURE ROLLBACK;');
604: cn_utils.appendcr(code, 'DEFINE PACKAGE_NAME="' || LOWER(package_name) || '"');
605:
606: IF (object_type = 'PKS') THEN
607: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE ' || package_name || ' AS');
608: ELSE
609: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE BODY ' || package_name || ' AS');
610: END IF;
611: cn_utils.appendcr(code);

Line 609: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE BODY ' || package_name || ' AS');

605:
606: IF (object_type = 'PKS') THEN
607: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE ' || package_name || ' AS');
608: ELSE
609: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE BODY ' || package_name || ' AS');
610: END IF;
611: cn_utils.appendcr(code);
612:
613: END pkg_init_boilerplate;

Line 611: cn_utils.appendcr(code);

607: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE ' || package_name || ' AS');
608: ELSE
609: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE BODY ' || package_name || ' AS');
610: END IF;
611: cn_utils.appendcr(code);
612:
613: END pkg_init_boilerplate;
614:
615: --end clob

Line 619: code IN OUT NOCOPY cn_utils.code_type,

615: --end clob
616:
617:
618: PROCEDURE pkg_end_boilerplate (
619: code IN OUT NOCOPY cn_utils.code_type,
620: object_type cn_obj_packages_v.object_type%TYPE) IS
621:
622: BEGIN
623: cn_utils.appendcr(code, 'END &' || 'PACKAGE_NAME;');

Line 623: cn_utils.appendcr(code, 'END &' || 'PACKAGE_NAME;');

619: code IN OUT NOCOPY cn_utils.code_type,
620: object_type cn_obj_packages_v.object_type%TYPE) IS
621:
622: BEGIN
623: cn_utils.appendcr(code, 'END &' || 'PACKAGE_NAME;');
624: cn_utils.appendcr(code, '/');
625: cn_utils.appendcr(code);
626: IF (object_type = 'PKS') THEN
627: cn_utils.appendcr(code, 'SHOW ERRORS PACKAGE &' || 'PACKAGE_NAME');

Line 624: cn_utils.appendcr(code, '/');

620: object_type cn_obj_packages_v.object_type%TYPE) IS
621:
622: BEGIN
623: cn_utils.appendcr(code, 'END &' || 'PACKAGE_NAME;');
624: cn_utils.appendcr(code, '/');
625: cn_utils.appendcr(code);
626: IF (object_type = 'PKS') THEN
627: cn_utils.appendcr(code, 'SHOW ERRORS PACKAGE &' || 'PACKAGE_NAME');
628: ELSE

Line 625: cn_utils.appendcr(code);

621:
622: BEGIN
623: cn_utils.appendcr(code, 'END &' || 'PACKAGE_NAME;');
624: cn_utils.appendcr(code, '/');
625: cn_utils.appendcr(code);
626: IF (object_type = 'PKS') THEN
627: cn_utils.appendcr(code, 'SHOW ERRORS PACKAGE &' || 'PACKAGE_NAME');
628: ELSE
629: cn_utils.appendcr(code, 'SHOW ERRORS PACKAGE BODY &' || 'PACKAGE_NAME');

Line 627: cn_utils.appendcr(code, 'SHOW ERRORS PACKAGE &' || 'PACKAGE_NAME');

623: cn_utils.appendcr(code, 'END &' || 'PACKAGE_NAME;');
624: cn_utils.appendcr(code, '/');
625: cn_utils.appendcr(code);
626: IF (object_type = 'PKS') THEN
627: cn_utils.appendcr(code, 'SHOW ERRORS PACKAGE &' || 'PACKAGE_NAME');
628: ELSE
629: cn_utils.appendcr(code, 'SHOW ERRORS PACKAGE BODY &' || 'PACKAGE_NAME');
630: END IF;
631: cn_utils.appendcr(code, 'SELECT TEXT ');

Line 629: cn_utils.appendcr(code, 'SHOW ERRORS PACKAGE BODY &' || 'PACKAGE_NAME');

625: cn_utils.appendcr(code);
626: IF (object_type = 'PKS') THEN
627: cn_utils.appendcr(code, 'SHOW ERRORS PACKAGE &' || 'PACKAGE_NAME');
628: ELSE
629: cn_utils.appendcr(code, 'SHOW ERRORS PACKAGE BODY &' || 'PACKAGE_NAME');
630: END IF;
631: cn_utils.appendcr(code, 'SELECT TEXT ');
632: cn_utils.appendcr(code, ' FROM USER_ERRORS');
633:

Line 631: cn_utils.appendcr(code, 'SELECT TEXT ');

627: cn_utils.appendcr(code, 'SHOW ERRORS PACKAGE &' || 'PACKAGE_NAME');
628: ELSE
629: cn_utils.appendcr(code, 'SHOW ERRORS PACKAGE BODY &' || 'PACKAGE_NAME');
630: END IF;
631: cn_utils.appendcr(code, 'SELECT TEXT ');
632: cn_utils.appendcr(code, ' FROM USER_ERRORS');
633:
634: IF (object_type = 'PKS') THEN
635: cn_utils.appendcr(code, ' WHERE TYPE = ''PACKAGE''');

Line 632: cn_utils.appendcr(code, ' FROM USER_ERRORS');

628: ELSE
629: cn_utils.appendcr(code, 'SHOW ERRORS PACKAGE BODY &' || 'PACKAGE_NAME');
630: END IF;
631: cn_utils.appendcr(code, 'SELECT TEXT ');
632: cn_utils.appendcr(code, ' FROM USER_ERRORS');
633:
634: IF (object_type = 'PKS') THEN
635: cn_utils.appendcr(code, ' WHERE TYPE = ''PACKAGE''');
636: ELSE

Line 635: cn_utils.appendcr(code, ' WHERE TYPE = ''PACKAGE''');

631: cn_utils.appendcr(code, 'SELECT TEXT ');
632: cn_utils.appendcr(code, ' FROM USER_ERRORS');
633:
634: IF (object_type = 'PKS') THEN
635: cn_utils.appendcr(code, ' WHERE TYPE = ''PACKAGE''');
636: ELSE
637: cn_utils.appendcr(code, ' WHERE TYPE = ''PACKAGE BODY''');
638: END IF;
639: cn_utils.appendcr(code, ' AND NAME = UPPER(''&' || 'PACKAGE_NAME'');');

Line 637: cn_utils.appendcr(code, ' WHERE TYPE = ''PACKAGE BODY''');

633:
634: IF (object_type = 'PKS') THEN
635: cn_utils.appendcr(code, ' WHERE TYPE = ''PACKAGE''');
636: ELSE
637: cn_utils.appendcr(code, ' WHERE TYPE = ''PACKAGE BODY''');
638: END IF;
639: cn_utils.appendcr(code, ' AND NAME = UPPER(''&' || 'PACKAGE_NAME'');');
640: cn_utils.appendcr(code);
641: cn_utils.appendcr(code, 'COMMIT;');

Line 639: cn_utils.appendcr(code, ' AND NAME = UPPER(''&' || 'PACKAGE_NAME'');');

635: cn_utils.appendcr(code, ' WHERE TYPE = ''PACKAGE''');
636: ELSE
637: cn_utils.appendcr(code, ' WHERE TYPE = ''PACKAGE BODY''');
638: END IF;
639: cn_utils.appendcr(code, ' AND NAME = UPPER(''&' || 'PACKAGE_NAME'');');
640: cn_utils.appendcr(code);
641: cn_utils.appendcr(code, 'COMMIT;');
642: cn_utils.appendcr(code, '-- EXIT;'); --AE 03-22-96
643: cn_utils.appendcr(code);

Line 640: cn_utils.appendcr(code);

636: ELSE
637: cn_utils.appendcr(code, ' WHERE TYPE = ''PACKAGE BODY''');
638: END IF;
639: cn_utils.appendcr(code, ' AND NAME = UPPER(''&' || 'PACKAGE_NAME'');');
640: cn_utils.appendcr(code);
641: cn_utils.appendcr(code, 'COMMIT;');
642: cn_utils.appendcr(code, '-- EXIT;'); --AE 03-22-96
643: cn_utils.appendcr(code);
644:

Line 641: cn_utils.appendcr(code, 'COMMIT;');

637: cn_utils.appendcr(code, ' WHERE TYPE = ''PACKAGE BODY''');
638: END IF;
639: cn_utils.appendcr(code, ' AND NAME = UPPER(''&' || 'PACKAGE_NAME'');');
640: cn_utils.appendcr(code);
641: cn_utils.appendcr(code, 'COMMIT;');
642: cn_utils.appendcr(code, '-- EXIT;'); --AE 03-22-96
643: cn_utils.appendcr(code);
644:
645: END pkg_end_boilerplate;

Line 642: cn_utils.appendcr(code, '-- EXIT;'); --AE 03-22-96

638: END IF;
639: cn_utils.appendcr(code, ' AND NAME = UPPER(''&' || 'PACKAGE_NAME'');');
640: cn_utils.appendcr(code);
641: cn_utils.appendcr(code, 'COMMIT;');
642: cn_utils.appendcr(code, '-- EXIT;'); --AE 03-22-96
643: cn_utils.appendcr(code);
644:
645: END pkg_end_boilerplate;
646:

Line 643: cn_utils.appendcr(code);

639: cn_utils.appendcr(code, ' AND NAME = UPPER(''&' || 'PACKAGE_NAME'');');
640: cn_utils.appendcr(code);
641: cn_utils.appendcr(code, 'COMMIT;');
642: cn_utils.appendcr(code, '-- EXIT;'); --AE 03-22-96
643: cn_utils.appendcr(code);
644:
645: END pkg_end_boilerplate;
646:
647: --for clob

Line 649: code IN OUT NOCOPY cn_utils.clob_code_type,

645: END pkg_end_boilerplate;
646:
647: --for clob
648: PROCEDURE pkg_end_boilerplate (
649: code IN OUT NOCOPY cn_utils.clob_code_type,
650: object_type cn_obj_packages_v.object_type%TYPE) IS
651:
652: BEGIN
653: cn_utils.appendcr(code, 'END &' || 'PACKAGE_NAME;');

Line 653: cn_utils.appendcr(code, 'END &' || 'PACKAGE_NAME;');

649: code IN OUT NOCOPY cn_utils.clob_code_type,
650: object_type cn_obj_packages_v.object_type%TYPE) IS
651:
652: BEGIN
653: cn_utils.appendcr(code, 'END &' || 'PACKAGE_NAME;');
654: cn_utils.appendcr(code, '/');
655: cn_utils.appendcr(code);
656: IF (object_type = 'PKS') THEN
657: cn_utils.appendcr(code, 'SHOW ERRORS PACKAGE &' || 'PACKAGE_NAME');

Line 654: cn_utils.appendcr(code, '/');

650: object_type cn_obj_packages_v.object_type%TYPE) IS
651:
652: BEGIN
653: cn_utils.appendcr(code, 'END &' || 'PACKAGE_NAME;');
654: cn_utils.appendcr(code, '/');
655: cn_utils.appendcr(code);
656: IF (object_type = 'PKS') THEN
657: cn_utils.appendcr(code, 'SHOW ERRORS PACKAGE &' || 'PACKAGE_NAME');
658: ELSE

Line 655: cn_utils.appendcr(code);

651:
652: BEGIN
653: cn_utils.appendcr(code, 'END &' || 'PACKAGE_NAME;');
654: cn_utils.appendcr(code, '/');
655: cn_utils.appendcr(code);
656: IF (object_type = 'PKS') THEN
657: cn_utils.appendcr(code, 'SHOW ERRORS PACKAGE &' || 'PACKAGE_NAME');
658: ELSE
659: cn_utils.appendcr(code, 'SHOW ERRORS PACKAGE BODY &' || 'PACKAGE_NAME');

Line 657: cn_utils.appendcr(code, 'SHOW ERRORS PACKAGE &' || 'PACKAGE_NAME');

653: cn_utils.appendcr(code, 'END &' || 'PACKAGE_NAME;');
654: cn_utils.appendcr(code, '/');
655: cn_utils.appendcr(code);
656: IF (object_type = 'PKS') THEN
657: cn_utils.appendcr(code, 'SHOW ERRORS PACKAGE &' || 'PACKAGE_NAME');
658: ELSE
659: cn_utils.appendcr(code, 'SHOW ERRORS PACKAGE BODY &' || 'PACKAGE_NAME');
660: END IF;
661: cn_utils.appendcr(code, 'SELECT TEXT ');

Line 659: cn_utils.appendcr(code, 'SHOW ERRORS PACKAGE BODY &' || 'PACKAGE_NAME');

655: cn_utils.appendcr(code);
656: IF (object_type = 'PKS') THEN
657: cn_utils.appendcr(code, 'SHOW ERRORS PACKAGE &' || 'PACKAGE_NAME');
658: ELSE
659: cn_utils.appendcr(code, 'SHOW ERRORS PACKAGE BODY &' || 'PACKAGE_NAME');
660: END IF;
661: cn_utils.appendcr(code, 'SELECT TEXT ');
662: cn_utils.appendcr(code, ' FROM USER_ERRORS');
663:

Line 661: cn_utils.appendcr(code, 'SELECT TEXT ');

657: cn_utils.appendcr(code, 'SHOW ERRORS PACKAGE &' || 'PACKAGE_NAME');
658: ELSE
659: cn_utils.appendcr(code, 'SHOW ERRORS PACKAGE BODY &' || 'PACKAGE_NAME');
660: END IF;
661: cn_utils.appendcr(code, 'SELECT TEXT ');
662: cn_utils.appendcr(code, ' FROM USER_ERRORS');
663:
664: IF (object_type = 'PKS') THEN
665: cn_utils.appendcr(code, ' WHERE TYPE = ''PACKAGE''');

Line 662: cn_utils.appendcr(code, ' FROM USER_ERRORS');

658: ELSE
659: cn_utils.appendcr(code, 'SHOW ERRORS PACKAGE BODY &' || 'PACKAGE_NAME');
660: END IF;
661: cn_utils.appendcr(code, 'SELECT TEXT ');
662: cn_utils.appendcr(code, ' FROM USER_ERRORS');
663:
664: IF (object_type = 'PKS') THEN
665: cn_utils.appendcr(code, ' WHERE TYPE = ''PACKAGE''');
666: ELSE

Line 665: cn_utils.appendcr(code, ' WHERE TYPE = ''PACKAGE''');

661: cn_utils.appendcr(code, 'SELECT TEXT ');
662: cn_utils.appendcr(code, ' FROM USER_ERRORS');
663:
664: IF (object_type = 'PKS') THEN
665: cn_utils.appendcr(code, ' WHERE TYPE = ''PACKAGE''');
666: ELSE
667: cn_utils.appendcr(code, ' WHERE TYPE = ''PACKAGE BODY''');
668: END IF;
669: cn_utils.appendcr(code, ' AND NAME = UPPER(''&' || 'PACKAGE_NAME'');');

Line 667: cn_utils.appendcr(code, ' WHERE TYPE = ''PACKAGE BODY''');

663:
664: IF (object_type = 'PKS') THEN
665: cn_utils.appendcr(code, ' WHERE TYPE = ''PACKAGE''');
666: ELSE
667: cn_utils.appendcr(code, ' WHERE TYPE = ''PACKAGE BODY''');
668: END IF;
669: cn_utils.appendcr(code, ' AND NAME = UPPER(''&' || 'PACKAGE_NAME'');');
670: cn_utils.appendcr(code);
671: cn_utils.appendcr(code, 'COMMIT;');

Line 669: cn_utils.appendcr(code, ' AND NAME = UPPER(''&' || 'PACKAGE_NAME'');');

665: cn_utils.appendcr(code, ' WHERE TYPE = ''PACKAGE''');
666: ELSE
667: cn_utils.appendcr(code, ' WHERE TYPE = ''PACKAGE BODY''');
668: END IF;
669: cn_utils.appendcr(code, ' AND NAME = UPPER(''&' || 'PACKAGE_NAME'');');
670: cn_utils.appendcr(code);
671: cn_utils.appendcr(code, 'COMMIT;');
672: cn_utils.appendcr(code, '-- EXIT;'); --AE 03-22-96
673: cn_utils.appendcr(code);

Line 670: cn_utils.appendcr(code);

666: ELSE
667: cn_utils.appendcr(code, ' WHERE TYPE = ''PACKAGE BODY''');
668: END IF;
669: cn_utils.appendcr(code, ' AND NAME = UPPER(''&' || 'PACKAGE_NAME'');');
670: cn_utils.appendcr(code);
671: cn_utils.appendcr(code, 'COMMIT;');
672: cn_utils.appendcr(code, '-- EXIT;'); --AE 03-22-96
673: cn_utils.appendcr(code);
674:

Line 671: cn_utils.appendcr(code, 'COMMIT;');

667: cn_utils.appendcr(code, ' WHERE TYPE = ''PACKAGE BODY''');
668: END IF;
669: cn_utils.appendcr(code, ' AND NAME = UPPER(''&' || 'PACKAGE_NAME'');');
670: cn_utils.appendcr(code);
671: cn_utils.appendcr(code, 'COMMIT;');
672: cn_utils.appendcr(code, '-- EXIT;'); --AE 03-22-96
673: cn_utils.appendcr(code);
674:
675: END pkg_end_boilerplate;

Line 672: cn_utils.appendcr(code, '-- EXIT;'); --AE 03-22-96

668: END IF;
669: cn_utils.appendcr(code, ' AND NAME = UPPER(''&' || 'PACKAGE_NAME'');');
670: cn_utils.appendcr(code);
671: cn_utils.appendcr(code, 'COMMIT;');
672: cn_utils.appendcr(code, '-- EXIT;'); --AE 03-22-96
673: cn_utils.appendcr(code);
674:
675: END pkg_end_boilerplate;
676: --end clob

Line 673: cn_utils.appendcr(code);

669: cn_utils.appendcr(code, ' AND NAME = UPPER(''&' || 'PACKAGE_NAME'');');
670: cn_utils.appendcr(code);
671: cn_utils.appendcr(code, 'COMMIT;');
672: cn_utils.appendcr(code, '-- EXIT;'); --AE 03-22-96
673: cn_utils.appendcr(code);
674:
675: END pkg_end_boilerplate;
676: --end clob
677:

Line 688: spec_code IN OUT NOCOPY cn_utils.code_type,

684: package_body_id IN OUT NOCOPY cn_obj_packages_v.package_id%TYPE,
685: package_spec_desc IN OUT NOCOPY cn_obj_packages_v.description%TYPE,
686: package_body_desc IN OUT NOCOPY cn_obj_packages_v.description%TYPE,
687:
688: spec_code IN OUT NOCOPY cn_utils.code_type,
689: body_code IN OUT NOCOPY cn_utils.code_type) IS
690:
691: x_rowid ROWID;
692: null_id NUMBER;

Line 689: body_code IN OUT NOCOPY cn_utils.code_type) IS

685: package_spec_desc IN OUT NOCOPY cn_obj_packages_v.description%TYPE,
686: package_body_desc IN OUT NOCOPY cn_obj_packages_v.description%TYPE,
687:
688: spec_code IN OUT NOCOPY cn_utils.code_type,
689: body_code IN OUT NOCOPY cn_utils.code_type) IS
690:
691: x_rowid ROWID;
692: null_id NUMBER;
693:

Line 701: cn_utils.find_object(package_name,'PKS',package_spec_id, package_spec_desc, g_org_id);

697: raise null_org_id;
698: end if;
699:
700: -- Find the package objects AE 01-08-96
701: cn_utils.find_object(package_name,'PKS',package_spec_id, package_spec_desc, g_org_id);
702: cn_utils.find_object(package_name,'PKB',package_body_id, package_body_desc, g_org_id);
703:
704: -- Delete module source code from cn_source
705: -- Delete module object dependencies for this module

Line 702: cn_utils.find_object(package_name,'PKB',package_body_id, package_body_desc, g_org_id);

698: end if;
699:
700: -- Find the package objects AE 01-08-96
701: cn_utils.find_object(package_name,'PKS',package_spec_id, package_spec_desc, g_org_id);
702: cn_utils.find_object(package_name,'PKB',package_body_id, package_body_desc, g_org_id);
703:
704: -- Delete module source code from cn_source
705: -- Delete module object dependencies for this module
706: cn_utils.delete_module(module_id, package_spec_id, package_body_id, g_org_id);

Line 706: cn_utils.delete_module(module_id, package_spec_id, package_body_id, g_org_id);

702: cn_utils.find_object(package_name,'PKB',package_body_id, package_body_desc, g_org_id);
703:
704: -- Delete module source code from cn_source
705: -- Delete module object dependencies for this module
706: cn_utils.delete_module(module_id, package_spec_id, package_body_id, g_org_id);
707:
708: cn_utils.init_code (package_spec_id, spec_code); -- AE 05-02-95
709: cn_utils.init_code (package_body_id, body_code); -- AE 05-02-95
710:

Line 708: cn_utils.init_code (package_spec_id, spec_code); -- AE 05-02-95

704: -- Delete module source code from cn_source
705: -- Delete module object dependencies for this module
706: cn_utils.delete_module(module_id, package_spec_id, package_body_id, g_org_id);
707:
708: cn_utils.init_code (package_spec_id, spec_code); -- AE 05-02-95
709: cn_utils.init_code (package_body_id, body_code); -- AE 05-02-95
710:
711: cn_utils.pkg_init_boilerplate(spec_code, package_name|| package_org_append, package_spec_desc, 'PKS');
712: cn_utils.pkg_init_boilerplate(body_code, package_name|| package_org_append, package_body_desc, 'PKB');

Line 709: cn_utils.init_code (package_body_id, body_code); -- AE 05-02-95

705: -- Delete module object dependencies for this module
706: cn_utils.delete_module(module_id, package_spec_id, package_body_id, g_org_id);
707:
708: cn_utils.init_code (package_spec_id, spec_code); -- AE 05-02-95
709: cn_utils.init_code (package_body_id, body_code); -- AE 05-02-95
710:
711: cn_utils.pkg_init_boilerplate(spec_code, package_name|| package_org_append, package_spec_desc, 'PKS');
712: cn_utils.pkg_init_boilerplate(body_code, package_name|| package_org_append, package_body_desc, 'PKB');
713:

Line 711: cn_utils.pkg_init_boilerplate(spec_code, package_name|| package_org_append, package_spec_desc, 'PKS');

707:
708: cn_utils.init_code (package_spec_id, spec_code); -- AE 05-02-95
709: cn_utils.init_code (package_body_id, body_code); -- AE 05-02-95
710:
711: cn_utils.pkg_init_boilerplate(spec_code, package_name|| package_org_append, package_spec_desc, 'PKS');
712: cn_utils.pkg_init_boilerplate(body_code, package_name|| package_org_append, package_body_desc, 'PKB');
713:
714: cn_utils.indent(spec_code, 1);
715: cn_utils.indent(body_code, 1);

Line 712: cn_utils.pkg_init_boilerplate(body_code, package_name|| package_org_append, package_body_desc, 'PKB');

708: cn_utils.init_code (package_spec_id, spec_code); -- AE 05-02-95
709: cn_utils.init_code (package_body_id, body_code); -- AE 05-02-95
710:
711: cn_utils.pkg_init_boilerplate(spec_code, package_name|| package_org_append, package_spec_desc, 'PKS');
712: cn_utils.pkg_init_boilerplate(body_code, package_name|| package_org_append, package_body_desc, 'PKB');
713:
714: cn_utils.indent(spec_code, 1);
715: cn_utils.indent(body_code, 1);
716:

Line 714: cn_utils.indent(spec_code, 1);

710:
711: cn_utils.pkg_init_boilerplate(spec_code, package_name|| package_org_append, package_spec_desc, 'PKS');
712: cn_utils.pkg_init_boilerplate(body_code, package_name|| package_org_append, package_body_desc, 'PKB');
713:
714: cn_utils.indent(spec_code, 1);
715: cn_utils.indent(body_code, 1);
716:
717: END pkg_init;
718:

Line 715: cn_utils.indent(body_code, 1);

711: cn_utils.pkg_init_boilerplate(spec_code, package_name|| package_org_append, package_spec_desc, 'PKS');
712: cn_utils.pkg_init_boilerplate(body_code, package_name|| package_org_append, package_body_desc, 'PKB');
713:
714: cn_utils.indent(spec_code, 1);
715: cn_utils.indent(body_code, 1);
716:
717: END pkg_init;
718:
719:

Line 724: spec_code IN OUT NOCOPY cn_utils.code_type,

720: PROCEDURE pkg_end (
721: package_name cn_obj_packages_v.name%TYPE,
722: package_spec_id cn_obj_packages_v.package_id%TYPE,
723: package_body_id cn_obj_packages_v.package_id%TYPE,
724: spec_code IN OUT NOCOPY cn_utils.code_type,
725: body_code IN OUT NOCOPY cn_utils.code_type) IS
726:
727: BEGIN
728: cn_utils.unindent(spec_code, 1);

Line 725: body_code IN OUT NOCOPY cn_utils.code_type) IS

721: package_name cn_obj_packages_v.name%TYPE,
722: package_spec_id cn_obj_packages_v.package_id%TYPE,
723: package_body_id cn_obj_packages_v.package_id%TYPE,
724: spec_code IN OUT NOCOPY cn_utils.code_type,
725: body_code IN OUT NOCOPY cn_utils.code_type) IS
726:
727: BEGIN
728: cn_utils.unindent(spec_code, 1);
729: cn_utils.unindent(body_code, 1);

Line 728: cn_utils.unindent(spec_code, 1);

724: spec_code IN OUT NOCOPY cn_utils.code_type,
725: body_code IN OUT NOCOPY cn_utils.code_type) IS
726:
727: BEGIN
728: cn_utils.unindent(spec_code, 1);
729: cn_utils.unindent(body_code, 1);
730:
731: cn_utils.pkg_end_boilerplate(spec_code, 'PKS'); --AE 04-28-95
732: cn_utils.pkg_end_boilerplate(body_code, 'PKB'); --AE 04-28-95

Line 729: cn_utils.unindent(body_code, 1);

725: body_code IN OUT NOCOPY cn_utils.code_type) IS
726:
727: BEGIN
728: cn_utils.unindent(spec_code, 1);
729: cn_utils.unindent(body_code, 1);
730:
731: cn_utils.pkg_end_boilerplate(spec_code, 'PKS'); --AE 04-28-95
732: cn_utils.pkg_end_boilerplate(body_code, 'PKB'); --AE 04-28-95
733:

Line 731: cn_utils.pkg_end_boilerplate(spec_code, 'PKS'); --AE 04-28-95

727: BEGIN
728: cn_utils.unindent(spec_code, 1);
729: cn_utils.unindent(body_code, 1);
730:
731: cn_utils.pkg_end_boilerplate(spec_code, 'PKS'); --AE 04-28-95
732: cn_utils.pkg_end_boilerplate(body_code, 'PKB'); --AE 04-28-95
733:
734: END pkg_end;
735:

Line 732: cn_utils.pkg_end_boilerplate(body_code, 'PKB'); --AE 04-28-95

728: cn_utils.unindent(spec_code, 1);
729: cn_utils.unindent(body_code, 1);
730:
731: cn_utils.pkg_end_boilerplate(spec_code, 'PKS'); --AE 04-28-95
732: cn_utils.pkg_end_boilerplate(body_code, 'PKB'); --AE 04-28-95
733:
734: END pkg_end;
735:
736: --for clob

Line 741: spec_code IN OUT NOCOPY cn_utils.clob_code_type,

737: PROCEDURE pkg_end (
738: package_name cn_obj_packages_v.name%TYPE,
739: package_spec_id cn_obj_packages_v.package_id%TYPE,
740: package_body_id cn_obj_packages_v.package_id%TYPE,
741: spec_code IN OUT NOCOPY cn_utils.clob_code_type,
742: body_code IN OUT NOCOPY cn_utils.clob_code_type) IS
743:
744: BEGIN
745: cn_utils.unindent(spec_code, 1);

Line 742: body_code IN OUT NOCOPY cn_utils.clob_code_type) IS

738: package_name cn_obj_packages_v.name%TYPE,
739: package_spec_id cn_obj_packages_v.package_id%TYPE,
740: package_body_id cn_obj_packages_v.package_id%TYPE,
741: spec_code IN OUT NOCOPY cn_utils.clob_code_type,
742: body_code IN OUT NOCOPY cn_utils.clob_code_type) IS
743:
744: BEGIN
745: cn_utils.unindent(spec_code, 1);
746: cn_utils.unindent(body_code, 1);

Line 745: cn_utils.unindent(spec_code, 1);

741: spec_code IN OUT NOCOPY cn_utils.clob_code_type,
742: body_code IN OUT NOCOPY cn_utils.clob_code_type) IS
743:
744: BEGIN
745: cn_utils.unindent(spec_code, 1);
746: cn_utils.unindent(body_code, 1);
747:
748: cn_utils.pkg_end_boilerplate(spec_code, 'PKS'); --AE 04-28-95
749: cn_utils.pkg_end_boilerplate(body_code, 'PKB'); --AE 04-28-95

Line 746: cn_utils.unindent(body_code, 1);

742: body_code IN OUT NOCOPY cn_utils.clob_code_type) IS
743:
744: BEGIN
745: cn_utils.unindent(spec_code, 1);
746: cn_utils.unindent(body_code, 1);
747:
748: cn_utils.pkg_end_boilerplate(spec_code, 'PKS'); --AE 04-28-95
749: cn_utils.pkg_end_boilerplate(body_code, 'PKB'); --AE 04-28-95
750:

Line 748: cn_utils.pkg_end_boilerplate(spec_code, 'PKS'); --AE 04-28-95

744: BEGIN
745: cn_utils.unindent(spec_code, 1);
746: cn_utils.unindent(body_code, 1);
747:
748: cn_utils.pkg_end_boilerplate(spec_code, 'PKS'); --AE 04-28-95
749: cn_utils.pkg_end_boilerplate(body_code, 'PKB'); --AE 04-28-95
750:
751: END pkg_end;
752: --end clob

Line 749: cn_utils.pkg_end_boilerplate(body_code, 'PKB'); --AE 04-28-95

745: cn_utils.unindent(spec_code, 1);
746: cn_utils.unindent(body_code, 1);
747:
748: cn_utils.pkg_end_boilerplate(spec_code, 'PKS'); --AE 04-28-95
749: cn_utils.pkg_end_boilerplate(body_code, 'PKB'); --AE 04-28-95
750:
751: END pkg_end;
752: --end clob
753:

Line 756: PROCEDURE pkg_init_boilerplate (code IN OUT NOCOPY cn_utils.code_type,

752: --end clob
753:
754:
755: -- overloaded for use in formula generation
756: PROCEDURE pkg_init_boilerplate (code IN OUT NOCOPY cn_utils.code_type,
757: package_name cn_obj_packages_v.name%TYPE,
758: description cn_obj_packages_v.description%TYPE,
759: object_type VARCHAR2,
760: package_flag VARCHAR2 ) IS

Line 764: cn_utils.appendcr(code, '-- +======================================================================+ --');

760: package_flag VARCHAR2 ) IS
761:
762: X_userid VARCHAR2(20);
763: BEGIN
764: cn_utils.appendcr(code, '-- +======================================================================+ --');
765: cn_utils.appendcr(code, '-- | Copyright (c) 1994 Oracle Corporation | --');
766: cn_utils.appendcr(code, '-- | Redwood Shores, California, USA | --');
767: cn_utils.appendcr(code, '-- | All rights reserved. | --');
768: cn_utils.appendcr(code, '-- +======================================================================+ --');

Line 765: cn_utils.appendcr(code, '-- | Copyright (c) 1994 Oracle Corporation | --');

761:
762: X_userid VARCHAR2(20);
763: BEGIN
764: cn_utils.appendcr(code, '-- +======================================================================+ --');
765: cn_utils.appendcr(code, '-- | Copyright (c) 1994 Oracle Corporation | --');
766: cn_utils.appendcr(code, '-- | Redwood Shores, California, USA | --');
767: cn_utils.appendcr(code, '-- | All rights reserved. | --');
768: cn_utils.appendcr(code, '-- +======================================================================+ --');
769: cn_utils.appendcr(code);

Line 766: cn_utils.appendcr(code, '-- | Redwood Shores, California, USA | --');

762: X_userid VARCHAR2(20);
763: BEGIN
764: cn_utils.appendcr(code, '-- +======================================================================+ --');
765: cn_utils.appendcr(code, '-- | Copyright (c) 1994 Oracle Corporation | --');
766: cn_utils.appendcr(code, '-- | Redwood Shores, California, USA | --');
767: cn_utils.appendcr(code, '-- | All rights reserved. | --');
768: cn_utils.appendcr(code, '-- +======================================================================+ --');
769: cn_utils.appendcr(code);
770:

Line 767: cn_utils.appendcr(code, '-- | All rights reserved. | --');

763: BEGIN
764: cn_utils.appendcr(code, '-- +======================================================================+ --');
765: cn_utils.appendcr(code, '-- | Copyright (c) 1994 Oracle Corporation | --');
766: cn_utils.appendcr(code, '-- | Redwood Shores, California, USA | --');
767: cn_utils.appendcr(code, '-- | All rights reserved. | --');
768: cn_utils.appendcr(code, '-- +======================================================================+ --');
769: cn_utils.appendcr(code);
770:
771: SELECT user INTO X_userid FROM sys.dual;

Line 768: cn_utils.appendcr(code, '-- +======================================================================+ --');

764: cn_utils.appendcr(code, '-- +======================================================================+ --');
765: cn_utils.appendcr(code, '-- | Copyright (c) 1994 Oracle Corporation | --');
766: cn_utils.appendcr(code, '-- | Redwood Shores, California, USA | --');
767: cn_utils.appendcr(code, '-- | All rights reserved. | --');
768: cn_utils.appendcr(code, '-- +======================================================================+ --');
769: cn_utils.appendcr(code);
770:
771: SELECT user INTO X_userid FROM sys.dual;
772:

Line 769: cn_utils.appendcr(code);

765: cn_utils.appendcr(code, '-- | Copyright (c) 1994 Oracle Corporation | --');
766: cn_utils.appendcr(code, '-- | Redwood Shores, California, USA | --');
767: cn_utils.appendcr(code, '-- | All rights reserved. | --');
768: cn_utils.appendcr(code, '-- +======================================================================+ --');
769: cn_utils.appendcr(code);
770:
771: SELECT user INTO X_userid FROM sys.dual;
772:
773: cn_utils.appendcr(code, '--');

Line 773: cn_utils.appendcr(code, '--');

769: cn_utils.appendcr(code);
770:
771: SELECT user INTO X_userid FROM sys.dual;
772:
773: cn_utils.appendcr(code, '--');
774: cn_utils.appendcr(code, '-- Package Name');
775: cn_utils.appendcr(code, '-- ' || package_name);
776: cn_utils.appendcr(code, '-- Purpose');
777: cn_utils.appendcr(code, '-- ' || description);

Line 774: cn_utils.appendcr(code, '-- Package Name');

770:
771: SELECT user INTO X_userid FROM sys.dual;
772:
773: cn_utils.appendcr(code, '--');
774: cn_utils.appendcr(code, '-- Package Name');
775: cn_utils.appendcr(code, '-- ' || package_name);
776: cn_utils.appendcr(code, '-- Purpose');
777: cn_utils.appendcr(code, '-- ' || description);
778: cn_utils.appendcr(code, '-- History');

Line 775: cn_utils.appendcr(code, '-- ' || package_name);

771: SELECT user INTO X_userid FROM sys.dual;
772:
773: cn_utils.appendcr(code, '--');
774: cn_utils.appendcr(code, '-- Package Name');
775: cn_utils.appendcr(code, '-- ' || package_name);
776: cn_utils.appendcr(code, '-- Purpose');
777: cn_utils.appendcr(code, '-- ' || description);
778: cn_utils.appendcr(code, '-- History');
779: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');

Line 776: cn_utils.appendcr(code, '-- Purpose');

772:
773: cn_utils.appendcr(code, '--');
774: cn_utils.appendcr(code, '-- Package Name');
775: cn_utils.appendcr(code, '-- ' || package_name);
776: cn_utils.appendcr(code, '-- Purpose');
777: cn_utils.appendcr(code, '-- ' || description);
778: cn_utils.appendcr(code, '-- History');
779: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');
780: cn_utils.appendcr(code, '--');

Line 777: cn_utils.appendcr(code, '-- ' || description);

773: cn_utils.appendcr(code, '--');
774: cn_utils.appendcr(code, '-- Package Name');
775: cn_utils.appendcr(code, '-- ' || package_name);
776: cn_utils.appendcr(code, '-- Purpose');
777: cn_utils.appendcr(code, '-- ' || description);
778: cn_utils.appendcr(code, '-- History');
779: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');
780: cn_utils.appendcr(code, '--');
781: cn_utils.appendcr(code);

Line 778: cn_utils.appendcr(code, '-- History');

774: cn_utils.appendcr(code, '-- Package Name');
775: cn_utils.appendcr(code, '-- ' || package_name);
776: cn_utils.appendcr(code, '-- Purpose');
777: cn_utils.appendcr(code, '-- ' || description);
778: cn_utils.appendcr(code, '-- History');
779: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');
780: cn_utils.appendcr(code, '--');
781: cn_utils.appendcr(code);
782:

Line 779: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');

775: cn_utils.appendcr(code, '-- ' || package_name);
776: cn_utils.appendcr(code, '-- Purpose');
777: cn_utils.appendcr(code, '-- ' || description);
778: cn_utils.appendcr(code, '-- History');
779: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');
780: cn_utils.appendcr(code, '--');
781: cn_utils.appendcr(code);
782:
783: IF (object_type = 'PKS') THEN

Line 780: cn_utils.appendcr(code, '--');

776: cn_utils.appendcr(code, '-- Purpose');
777: cn_utils.appendcr(code, '-- ' || description);
778: cn_utils.appendcr(code, '-- History');
779: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');
780: cn_utils.appendcr(code, '--');
781: cn_utils.appendcr(code);
782:
783: IF (object_type = 'PKS') THEN
784: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE ' || package_name || ' AS');

Line 781: cn_utils.appendcr(code);

777: cn_utils.appendcr(code, '-- ' || description);
778: cn_utils.appendcr(code, '-- History');
779: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');
780: cn_utils.appendcr(code, '--');
781: cn_utils.appendcr(code);
782:
783: IF (object_type = 'PKS') THEN
784: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE ' || package_name || ' AS');
785: ELSE

Line 784: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE ' || package_name || ' AS');

780: cn_utils.appendcr(code, '--');
781: cn_utils.appendcr(code);
782:
783: IF (object_type = 'PKS') THEN
784: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE ' || package_name || ' AS');
785: ELSE
786: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE BODY ' || package_name || ' AS');
787: END IF;
788: cn_utils.appendcr(code);

Line 786: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE BODY ' || package_name || ' AS');

782:
783: IF (object_type = 'PKS') THEN
784: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE ' || package_name || ' AS');
785: ELSE
786: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE BODY ' || package_name || ' AS');
787: END IF;
788: cn_utils.appendcr(code);
789:
790: END pkg_init_boilerplate;

Line 788: cn_utils.appendcr(code);

784: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE ' || package_name || ' AS');
785: ELSE
786: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE BODY ' || package_name || ' AS');
787: END IF;
788: cn_utils.appendcr(code);
789:
790: END pkg_init_boilerplate;
791:
792: --for clob

Line 795: PROCEDURE pkg_init_boilerplate (code IN OUT NOCOPY cn_utils.clob_code_type,

791:
792: --for clob
793:
794: -- overloaded for use in formula generation
795: PROCEDURE pkg_init_boilerplate (code IN OUT NOCOPY cn_utils.clob_code_type,
796: package_name cn_obj_packages_v.name%TYPE,
797: description cn_obj_packages_v.description%TYPE,
798: object_type VARCHAR2,
799: package_flag VARCHAR2 ) IS

Line 803: cn_utils.appendcr(code, '-- +======================================================================+ --');

799: package_flag VARCHAR2 ) IS
800:
801: X_userid VARCHAR2(20);
802: BEGIN
803: cn_utils.appendcr(code, '-- +======================================================================+ --');
804: cn_utils.appendcr(code, '-- | Copyright (c) 1994 Oracle Corporation | --');
805: cn_utils.appendcr(code, '-- | Redwood Shores, California, USA | --');
806: cn_utils.appendcr(code, '-- | All rights reserved. | --');
807: cn_utils.appendcr(code, '-- +======================================================================+ --');

Line 804: cn_utils.appendcr(code, '-- | Copyright (c) 1994 Oracle Corporation | --');

800:
801: X_userid VARCHAR2(20);
802: BEGIN
803: cn_utils.appendcr(code, '-- +======================================================================+ --');
804: cn_utils.appendcr(code, '-- | Copyright (c) 1994 Oracle Corporation | --');
805: cn_utils.appendcr(code, '-- | Redwood Shores, California, USA | --');
806: cn_utils.appendcr(code, '-- | All rights reserved. | --');
807: cn_utils.appendcr(code, '-- +======================================================================+ --');
808: cn_utils.appendcr(code);

Line 805: cn_utils.appendcr(code, '-- | Redwood Shores, California, USA | --');

801: X_userid VARCHAR2(20);
802: BEGIN
803: cn_utils.appendcr(code, '-- +======================================================================+ --');
804: cn_utils.appendcr(code, '-- | Copyright (c) 1994 Oracle Corporation | --');
805: cn_utils.appendcr(code, '-- | Redwood Shores, California, USA | --');
806: cn_utils.appendcr(code, '-- | All rights reserved. | --');
807: cn_utils.appendcr(code, '-- +======================================================================+ --');
808: cn_utils.appendcr(code);
809:

Line 806: cn_utils.appendcr(code, '-- | All rights reserved. | --');

802: BEGIN
803: cn_utils.appendcr(code, '-- +======================================================================+ --');
804: cn_utils.appendcr(code, '-- | Copyright (c) 1994 Oracle Corporation | --');
805: cn_utils.appendcr(code, '-- | Redwood Shores, California, USA | --');
806: cn_utils.appendcr(code, '-- | All rights reserved. | --');
807: cn_utils.appendcr(code, '-- +======================================================================+ --');
808: cn_utils.appendcr(code);
809:
810: SELECT user INTO X_userid FROM sys.dual;

Line 807: cn_utils.appendcr(code, '-- +======================================================================+ --');

803: cn_utils.appendcr(code, '-- +======================================================================+ --');
804: cn_utils.appendcr(code, '-- | Copyright (c) 1994 Oracle Corporation | --');
805: cn_utils.appendcr(code, '-- | Redwood Shores, California, USA | --');
806: cn_utils.appendcr(code, '-- | All rights reserved. | --');
807: cn_utils.appendcr(code, '-- +======================================================================+ --');
808: cn_utils.appendcr(code);
809:
810: SELECT user INTO X_userid FROM sys.dual;
811:

Line 808: cn_utils.appendcr(code);

804: cn_utils.appendcr(code, '-- | Copyright (c) 1994 Oracle Corporation | --');
805: cn_utils.appendcr(code, '-- | Redwood Shores, California, USA | --');
806: cn_utils.appendcr(code, '-- | All rights reserved. | --');
807: cn_utils.appendcr(code, '-- +======================================================================+ --');
808: cn_utils.appendcr(code);
809:
810: SELECT user INTO X_userid FROM sys.dual;
811:
812: cn_utils.appendcr(code, '--');

Line 812: cn_utils.appendcr(code, '--');

808: cn_utils.appendcr(code);
809:
810: SELECT user INTO X_userid FROM sys.dual;
811:
812: cn_utils.appendcr(code, '--');
813: cn_utils.appendcr(code, '-- Package Name');
814: cn_utils.appendcr(code, '-- ' || package_name);
815: cn_utils.appendcr(code, '-- Purpose');
816: cn_utils.appendcr(code, '-- ' || description);

Line 813: cn_utils.appendcr(code, '-- Package Name');

809:
810: SELECT user INTO X_userid FROM sys.dual;
811:
812: cn_utils.appendcr(code, '--');
813: cn_utils.appendcr(code, '-- Package Name');
814: cn_utils.appendcr(code, '-- ' || package_name);
815: cn_utils.appendcr(code, '-- Purpose');
816: cn_utils.appendcr(code, '-- ' || description);
817: cn_utils.appendcr(code, '-- History');

Line 814: cn_utils.appendcr(code, '-- ' || package_name);

810: SELECT user INTO X_userid FROM sys.dual;
811:
812: cn_utils.appendcr(code, '--');
813: cn_utils.appendcr(code, '-- Package Name');
814: cn_utils.appendcr(code, '-- ' || package_name);
815: cn_utils.appendcr(code, '-- Purpose');
816: cn_utils.appendcr(code, '-- ' || description);
817: cn_utils.appendcr(code, '-- History');
818: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');

Line 815: cn_utils.appendcr(code, '-- Purpose');

811:
812: cn_utils.appendcr(code, '--');
813: cn_utils.appendcr(code, '-- Package Name');
814: cn_utils.appendcr(code, '-- ' || package_name);
815: cn_utils.appendcr(code, '-- Purpose');
816: cn_utils.appendcr(code, '-- ' || description);
817: cn_utils.appendcr(code, '-- History');
818: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');
819: cn_utils.appendcr(code, '--');

Line 816: cn_utils.appendcr(code, '-- ' || description);

812: cn_utils.appendcr(code, '--');
813: cn_utils.appendcr(code, '-- Package Name');
814: cn_utils.appendcr(code, '-- ' || package_name);
815: cn_utils.appendcr(code, '-- Purpose');
816: cn_utils.appendcr(code, '-- ' || description);
817: cn_utils.appendcr(code, '-- History');
818: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');
819: cn_utils.appendcr(code, '--');
820: cn_utils.appendcr(code);

Line 817: cn_utils.appendcr(code, '-- History');

813: cn_utils.appendcr(code, '-- Package Name');
814: cn_utils.appendcr(code, '-- ' || package_name);
815: cn_utils.appendcr(code, '-- Purpose');
816: cn_utils.appendcr(code, '-- ' || description);
817: cn_utils.appendcr(code, '-- History');
818: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');
819: cn_utils.appendcr(code, '--');
820: cn_utils.appendcr(code);
821:

Line 818: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');

814: cn_utils.appendcr(code, '-- ' || package_name);
815: cn_utils.appendcr(code, '-- Purpose');
816: cn_utils.appendcr(code, '-- ' || description);
817: cn_utils.appendcr(code, '-- History');
818: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');
819: cn_utils.appendcr(code, '--');
820: cn_utils.appendcr(code);
821:
822: IF (object_type = 'PKS') THEN

Line 819: cn_utils.appendcr(code, '--');

815: cn_utils.appendcr(code, '-- Purpose');
816: cn_utils.appendcr(code, '-- ' || description);
817: cn_utils.appendcr(code, '-- History');
818: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');
819: cn_utils.appendcr(code, '--');
820: cn_utils.appendcr(code);
821:
822: IF (object_type = 'PKS') THEN
823: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE ' || package_name || ' AS');

Line 820: cn_utils.appendcr(code);

816: cn_utils.appendcr(code, '-- ' || description);
817: cn_utils.appendcr(code, '-- History');
818: cn_utils.appendcr(code, '-- ' || SYSDATE || ' ' || X_userid || ' Created');
819: cn_utils.appendcr(code, '--');
820: cn_utils.appendcr(code);
821:
822: IF (object_type = 'PKS') THEN
823: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE ' || package_name || ' AS');
824: ELSE

Line 823: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE ' || package_name || ' AS');

819: cn_utils.appendcr(code, '--');
820: cn_utils.appendcr(code);
821:
822: IF (object_type = 'PKS') THEN
823: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE ' || package_name || ' AS');
824: ELSE
825: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE BODY ' || package_name || ' AS');
826: END IF;
827: cn_utils.appendcr(code);

Line 825: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE BODY ' || package_name || ' AS');

821:
822: IF (object_type = 'PKS') THEN
823: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE ' || package_name || ' AS');
824: ELSE
825: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE BODY ' || package_name || ' AS');
826: END IF;
827: cn_utils.appendcr(code);
828:
829: END pkg_init_boilerplate;

Line 827: cn_utils.appendcr(code);

823: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE ' || package_name || ' AS');
824: ELSE
825: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE BODY ' || package_name || ' AS');
826: END IF;
827: cn_utils.appendcr(code);
828:
829: END pkg_init_boilerplate;
830:
831:

Line 845: spec_code IN OUT NOCOPY cn_utils.code_type,

841: package_spec_id IN OUT NOCOPY cn_obj_packages_v.package_id%TYPE,
842: package_body_id IN OUT NOCOPY cn_obj_packages_v.package_id%TYPE,
843: package_spec_desc IN OUT NOCOPY cn_obj_packages_v.description%TYPE,
844: package_body_desc IN OUT NOCOPY cn_obj_packages_v.description%TYPE,
845: spec_code IN OUT NOCOPY cn_utils.code_type,
846: body_code IN OUT NOCOPY cn_utils.code_type) IS
847:
848: x_rowid ROWID;
849: null_id NUMBER;

Line 846: body_code IN OUT NOCOPY cn_utils.code_type) IS

842: package_body_id IN OUT NOCOPY cn_obj_packages_v.package_id%TYPE,
843: package_spec_desc IN OUT NOCOPY cn_obj_packages_v.description%TYPE,
844: package_body_desc IN OUT NOCOPY cn_obj_packages_v.description%TYPE,
845: spec_code IN OUT NOCOPY cn_utils.code_type,
846: body_code IN OUT NOCOPY cn_utils.code_type) IS
847:
848: x_rowid ROWID;
849: null_id NUMBER;
850:

Line 858: cn_utils.find_object(package_name,'PKS',package_spec_id, package_spec_desc, g_org_id);

854: raise null_org_id;
855: end if;
856:
857: -- Find the package objects AE 01-08-96
858: cn_utils.find_object(package_name,'PKS',package_spec_id, package_spec_desc, g_org_id);
859: cn_utils.find_object(package_name,'PKB',package_body_id, package_body_desc, g_org_id);
860:
861: -- Delete module source code from cn_source
862: -- Delete module object dependencies for this module

Line 859: cn_utils.find_object(package_name,'PKB',package_body_id, package_body_desc, g_org_id);

855: end if;
856:
857: -- Find the package objects AE 01-08-96
858: cn_utils.find_object(package_name,'PKS',package_spec_id, package_spec_desc, g_org_id);
859: cn_utils.find_object(package_name,'PKB',package_body_id, package_body_desc, g_org_id);
860:
861: -- Delete module source code from cn_source
862: -- Delete module object dependencies for this module
863: cn_utils.delete_module(module_id, package_spec_id, package_body_id, g_org_id);

Line 863: cn_utils.delete_module(module_id, package_spec_id, package_body_id, g_org_id);

859: cn_utils.find_object(package_name,'PKB',package_body_id, package_body_desc, g_org_id);
860:
861: -- Delete module source code from cn_source
862: -- Delete module object dependencies for this module
863: cn_utils.delete_module(module_id, package_spec_id, package_body_id, g_org_id);
864:
865: cn_utils.init_code (package_spec_id, spec_code); -- AE 05-02-95
866: cn_utils.init_code (package_body_id, body_code); -- AE 05-02-95
867:

Line 865: cn_utils.init_code (package_spec_id, spec_code); -- AE 05-02-95

861: -- Delete module source code from cn_source
862: -- Delete module object dependencies for this module
863: cn_utils.delete_module(module_id, package_spec_id, package_body_id, g_org_id);
864:
865: cn_utils.init_code (package_spec_id, spec_code); -- AE 05-02-95
866: cn_utils.init_code (package_body_id, body_code); -- AE 05-02-95
867:
868: cn_utils.pkg_init_boilerplate(spec_code, package_name, package_spec_desc, 'PKS', package_flag);
869: cn_utils.pkg_init_boilerplate(body_code, package_name, package_body_desc, 'PKB', package_flag);

Line 866: cn_utils.init_code (package_body_id, body_code); -- AE 05-02-95

862: -- Delete module object dependencies for this module
863: cn_utils.delete_module(module_id, package_spec_id, package_body_id, g_org_id);
864:
865: cn_utils.init_code (package_spec_id, spec_code); -- AE 05-02-95
866: cn_utils.init_code (package_body_id, body_code); -- AE 05-02-95
867:
868: cn_utils.pkg_init_boilerplate(spec_code, package_name, package_spec_desc, 'PKS', package_flag);
869: cn_utils.pkg_init_boilerplate(body_code, package_name, package_body_desc, 'PKB', package_flag);
870:

Line 868: cn_utils.pkg_init_boilerplate(spec_code, package_name, package_spec_desc, 'PKS', package_flag);

864:
865: cn_utils.init_code (package_spec_id, spec_code); -- AE 05-02-95
866: cn_utils.init_code (package_body_id, body_code); -- AE 05-02-95
867:
868: cn_utils.pkg_init_boilerplate(spec_code, package_name, package_spec_desc, 'PKS', package_flag);
869: cn_utils.pkg_init_boilerplate(body_code, package_name, package_body_desc, 'PKB', package_flag);
870:
871: cn_utils.indent(spec_code, 1);
872: cn_utils.indent(body_code, 1);

Line 869: cn_utils.pkg_init_boilerplate(body_code, package_name, package_body_desc, 'PKB', package_flag);

865: cn_utils.init_code (package_spec_id, spec_code); -- AE 05-02-95
866: cn_utils.init_code (package_body_id, body_code); -- AE 05-02-95
867:
868: cn_utils.pkg_init_boilerplate(spec_code, package_name, package_spec_desc, 'PKS', package_flag);
869: cn_utils.pkg_init_boilerplate(body_code, package_name, package_body_desc, 'PKB', package_flag);
870:
871: cn_utils.indent(spec_code, 1);
872: cn_utils.indent(body_code, 1);
873:

Line 871: cn_utils.indent(spec_code, 1);

867:
868: cn_utils.pkg_init_boilerplate(spec_code, package_name, package_spec_desc, 'PKS', package_flag);
869: cn_utils.pkg_init_boilerplate(body_code, package_name, package_body_desc, 'PKB', package_flag);
870:
871: cn_utils.indent(spec_code, 1);
872: cn_utils.indent(body_code, 1);
873:
874: END pkg_init;
875:

Line 872: cn_utils.indent(body_code, 1);

868: cn_utils.pkg_init_boilerplate(spec_code, package_name, package_spec_desc, 'PKS', package_flag);
869: cn_utils.pkg_init_boilerplate(body_code, package_name, package_body_desc, 'PKB', package_flag);
870:
871: cn_utils.indent(spec_code, 1);
872: cn_utils.indent(body_code, 1);
873:
874: END pkg_init;
875:
876: --for clob

Line 888: spec_code IN OUT NOCOPY cn_utils.clob_code_type,

884: package_spec_id IN OUT NOCOPY cn_obj_packages_v.package_id%TYPE,
885: package_body_id IN OUT NOCOPY cn_obj_packages_v.package_id%TYPE,
886: package_spec_desc IN OUT NOCOPY cn_obj_packages_v.description%TYPE,
887: package_body_desc IN OUT NOCOPY cn_obj_packages_v.description%TYPE,
888: spec_code IN OUT NOCOPY cn_utils.clob_code_type,
889: body_code IN OUT NOCOPY cn_utils.clob_code_type) IS
890:
891: x_rowid ROWID;
892: null_id NUMBER;

Line 889: body_code IN OUT NOCOPY cn_utils.clob_code_type) IS

885: package_body_id IN OUT NOCOPY cn_obj_packages_v.package_id%TYPE,
886: package_spec_desc IN OUT NOCOPY cn_obj_packages_v.description%TYPE,
887: package_body_desc IN OUT NOCOPY cn_obj_packages_v.description%TYPE,
888: spec_code IN OUT NOCOPY cn_utils.clob_code_type,
889: body_code IN OUT NOCOPY cn_utils.clob_code_type) IS
890:
891: x_rowid ROWID;
892: null_id NUMBER;
893:

Line 901: cn_utils.find_object(package_name,'PKS',package_spec_id, package_spec_desc, g_org_id);

897: raise null_org_id;
898: end if;
899:
900: -- Find the package objects AE 01-08-96
901: cn_utils.find_object(package_name,'PKS',package_spec_id, package_spec_desc, g_org_id);
902: cn_utils.find_object(package_name,'PKB',package_body_id, package_body_desc, g_org_id);
903:
904: -- Delete module source code from cn_source
905: -- Delete module object dependencies for this module

Line 902: cn_utils.find_object(package_name,'PKB',package_body_id, package_body_desc, g_org_id);

898: end if;
899:
900: -- Find the package objects AE 01-08-96
901: cn_utils.find_object(package_name,'PKS',package_spec_id, package_spec_desc, g_org_id);
902: cn_utils.find_object(package_name,'PKB',package_body_id, package_body_desc, g_org_id);
903:
904: -- Delete module source code from cn_source
905: -- Delete module object dependencies for this module
906: cn_utils.delete_module(module_id, package_spec_id, package_body_id, g_org_id);

Line 906: cn_utils.delete_module(module_id, package_spec_id, package_body_id, g_org_id);

902: cn_utils.find_object(package_name,'PKB',package_body_id, package_body_desc, g_org_id);
903:
904: -- Delete module source code from cn_source
905: -- Delete module object dependencies for this module
906: cn_utils.delete_module(module_id, package_spec_id, package_body_id, g_org_id);
907:
908: cn_utils.init_code (package_spec_id, spec_code); -- AE 05-02-95
909: cn_utils.init_code (package_body_id, body_code); -- AE 05-02-95
910:

Line 908: cn_utils.init_code (package_spec_id, spec_code); -- AE 05-02-95

904: -- Delete module source code from cn_source
905: -- Delete module object dependencies for this module
906: cn_utils.delete_module(module_id, package_spec_id, package_body_id, g_org_id);
907:
908: cn_utils.init_code (package_spec_id, spec_code); -- AE 05-02-95
909: cn_utils.init_code (package_body_id, body_code); -- AE 05-02-95
910:
911: cn_utils.pkg_init_boilerplate(spec_code, package_name, package_spec_desc, 'PKS', package_flag);
912: cn_utils.pkg_init_boilerplate(body_code, package_name, package_body_desc, 'PKB', package_flag);

Line 909: cn_utils.init_code (package_body_id, body_code); -- AE 05-02-95

905: -- Delete module object dependencies for this module
906: cn_utils.delete_module(module_id, package_spec_id, package_body_id, g_org_id);
907:
908: cn_utils.init_code (package_spec_id, spec_code); -- AE 05-02-95
909: cn_utils.init_code (package_body_id, body_code); -- AE 05-02-95
910:
911: cn_utils.pkg_init_boilerplate(spec_code, package_name, package_spec_desc, 'PKS', package_flag);
912: cn_utils.pkg_init_boilerplate(body_code, package_name, package_body_desc, 'PKB', package_flag);
913:

Line 911: cn_utils.pkg_init_boilerplate(spec_code, package_name, package_spec_desc, 'PKS', package_flag);

907:
908: cn_utils.init_code (package_spec_id, spec_code); -- AE 05-02-95
909: cn_utils.init_code (package_body_id, body_code); -- AE 05-02-95
910:
911: cn_utils.pkg_init_boilerplate(spec_code, package_name, package_spec_desc, 'PKS', package_flag);
912: cn_utils.pkg_init_boilerplate(body_code, package_name, package_body_desc, 'PKB', package_flag);
913:
914: cn_utils.indent(spec_code, 1);
915: cn_utils.indent(body_code, 1);

Line 912: cn_utils.pkg_init_boilerplate(body_code, package_name, package_body_desc, 'PKB', package_flag);

908: cn_utils.init_code (package_spec_id, spec_code); -- AE 05-02-95
909: cn_utils.init_code (package_body_id, body_code); -- AE 05-02-95
910:
911: cn_utils.pkg_init_boilerplate(spec_code, package_name, package_spec_desc, 'PKS', package_flag);
912: cn_utils.pkg_init_boilerplate(body_code, package_name, package_body_desc, 'PKB', package_flag);
913:
914: cn_utils.indent(spec_code, 1);
915: cn_utils.indent(body_code, 1);
916:

Line 914: cn_utils.indent(spec_code, 1);

910:
911: cn_utils.pkg_init_boilerplate(spec_code, package_name, package_spec_desc, 'PKS', package_flag);
912: cn_utils.pkg_init_boilerplate(body_code, package_name, package_body_desc, 'PKB', package_flag);
913:
914: cn_utils.indent(spec_code, 1);
915: cn_utils.indent(body_code, 1);
916:
917: END pkg_init;
918: --end clob

Line 915: cn_utils.indent(body_code, 1);

911: cn_utils.pkg_init_boilerplate(spec_code, package_name, package_spec_desc, 'PKS', package_flag);
912: cn_utils.pkg_init_boilerplate(body_code, package_name, package_body_desc, 'PKB', package_flag);
913:
914: cn_utils.indent(spec_code, 1);
915: cn_utils.indent(body_code, 1);
916:
917: END pkg_init;
918: --end clob
919:

Line 922: PROCEDURE pkg_end_boilerplate (code IN OUT NOCOPY cn_utils.code_type,

918: --end clob
919:
920:
921: -- overloaded procedure used for formula generation
922: PROCEDURE pkg_end_boilerplate (code IN OUT NOCOPY cn_utils.code_type,
923: package_name cn_obj_packages_v.name%TYPE,
924: object_type cn_obj_packages_v.object_type%TYPE) IS
925:
926: BEGIN

Line 927: cn_utils.appendcr(code, 'END ' || package_name || ' ;');

923: package_name cn_obj_packages_v.name%TYPE,
924: object_type cn_obj_packages_v.object_type%TYPE) IS
925:
926: BEGIN
927: cn_utils.appendcr(code, 'END ' || package_name || ' ;');
928: cn_utils.appendcr(code);
929: END pkg_end_boilerplate;
930:
931: --for clob

Line 928: cn_utils.appendcr(code);

924: object_type cn_obj_packages_v.object_type%TYPE) IS
925:
926: BEGIN
927: cn_utils.appendcr(code, 'END ' || package_name || ' ;');
928: cn_utils.appendcr(code);
929: END pkg_end_boilerplate;
930:
931: --for clob
932: PROCEDURE pkg_end_boilerplate (code IN OUT NOCOPY cn_utils.clob_code_type,

Line 932: PROCEDURE pkg_end_boilerplate (code IN OUT NOCOPY cn_utils.clob_code_type,

928: cn_utils.appendcr(code);
929: END pkg_end_boilerplate;
930:
931: --for clob
932: PROCEDURE pkg_end_boilerplate (code IN OUT NOCOPY cn_utils.clob_code_type,
933: package_name cn_obj_packages_v.name%TYPE,
934: object_type cn_obj_packages_v.object_type%TYPE) IS
935:
936: BEGIN

Line 937: cn_utils.appendcr(code, 'END ' || package_name || ' ;');

933: package_name cn_obj_packages_v.name%TYPE,
934: object_type cn_obj_packages_v.object_type%TYPE) IS
935:
936: BEGIN
937: cn_utils.appendcr(code, 'END ' || package_name || ' ;');
938: cn_utils.appendcr(code);
939: END pkg_end_boilerplate;
940: --end clob
941:

Line 938: cn_utils.appendcr(code);

934: object_type cn_obj_packages_v.object_type%TYPE) IS
935:
936: BEGIN
937: cn_utils.appendcr(code, 'END ' || package_name || ' ;');
938: cn_utils.appendcr(code);
939: END pkg_end_boilerplate;
940: --end clob
941:
942: -- overloaded procedure for use in formula generation

Line 944: spec_code IN OUT NOCOPY cn_utils.code_type,

940: --end clob
941:
942: -- overloaded procedure for use in formula generation
943: PROCEDURE pkg_end (package_name cn_obj_packages_v.name%TYPE,
944: spec_code IN OUT NOCOPY cn_utils.code_type,
945: body_code IN OUT NOCOPY cn_utils.code_type) IS
946:
947: BEGIN
948: cn_utils.unindent(spec_code, 1);

Line 945: body_code IN OUT NOCOPY cn_utils.code_type) IS

941:
942: -- overloaded procedure for use in formula generation
943: PROCEDURE pkg_end (package_name cn_obj_packages_v.name%TYPE,
944: spec_code IN OUT NOCOPY cn_utils.code_type,
945: body_code IN OUT NOCOPY cn_utils.code_type) IS
946:
947: BEGIN
948: cn_utils.unindent(spec_code, 1);
949: cn_utils.unindent(body_code, 1);

Line 948: cn_utils.unindent(spec_code, 1);

944: spec_code IN OUT NOCOPY cn_utils.code_type,
945: body_code IN OUT NOCOPY cn_utils.code_type) IS
946:
947: BEGIN
948: cn_utils.unindent(spec_code, 1);
949: cn_utils.unindent(body_code, 1);
950:
951: cn_utils.pkg_end_boilerplate(spec_code, package_name,'PKS');
952: cn_utils.pkg_end_boilerplate(body_code, package_name,'PKB');

Line 949: cn_utils.unindent(body_code, 1);

945: body_code IN OUT NOCOPY cn_utils.code_type) IS
946:
947: BEGIN
948: cn_utils.unindent(spec_code, 1);
949: cn_utils.unindent(body_code, 1);
950:
951: cn_utils.pkg_end_boilerplate(spec_code, package_name,'PKS');
952: cn_utils.pkg_end_boilerplate(body_code, package_name,'PKB');
953: END pkg_end;

Line 951: cn_utils.pkg_end_boilerplate(spec_code, package_name,'PKS');

947: BEGIN
948: cn_utils.unindent(spec_code, 1);
949: cn_utils.unindent(body_code, 1);
950:
951: cn_utils.pkg_end_boilerplate(spec_code, package_name,'PKS');
952: cn_utils.pkg_end_boilerplate(body_code, package_name,'PKB');
953: END pkg_end;
954:
955: --for clob

Line 952: cn_utils.pkg_end_boilerplate(body_code, package_name,'PKB');

948: cn_utils.unindent(spec_code, 1);
949: cn_utils.unindent(body_code, 1);
950:
951: cn_utils.pkg_end_boilerplate(spec_code, package_name,'PKS');
952: cn_utils.pkg_end_boilerplate(body_code, package_name,'PKB');
953: END pkg_end;
954:
955: --for clob
956: -- overloaded procedure for use in formula generation

Line 958: spec_code IN OUT NOCOPY cn_utils.clob_code_type,

954:
955: --for clob
956: -- overloaded procedure for use in formula generation
957: PROCEDURE pkg_end (package_name cn_obj_packages_v.name%TYPE,
958: spec_code IN OUT NOCOPY cn_utils.clob_code_type,
959: body_code IN OUT NOCOPY cn_utils.clob_code_type) IS
960:
961: BEGIN
962: cn_utils.unindent(spec_code, 1);

Line 959: body_code IN OUT NOCOPY cn_utils.clob_code_type) IS

955: --for clob
956: -- overloaded procedure for use in formula generation
957: PROCEDURE pkg_end (package_name cn_obj_packages_v.name%TYPE,
958: spec_code IN OUT NOCOPY cn_utils.clob_code_type,
959: body_code IN OUT NOCOPY cn_utils.clob_code_type) IS
960:
961: BEGIN
962: cn_utils.unindent(spec_code, 1);
963: cn_utils.unindent(body_code, 1);

Line 962: cn_utils.unindent(spec_code, 1);

958: spec_code IN OUT NOCOPY cn_utils.clob_code_type,
959: body_code IN OUT NOCOPY cn_utils.clob_code_type) IS
960:
961: BEGIN
962: cn_utils.unindent(spec_code, 1);
963: cn_utils.unindent(body_code, 1);
964:
965: cn_utils.pkg_end_boilerplate(spec_code, package_name,'PKS');
966: cn_utils.pkg_end_boilerplate(body_code, package_name,'PKB');

Line 963: cn_utils.unindent(body_code, 1);

959: body_code IN OUT NOCOPY cn_utils.clob_code_type) IS
960:
961: BEGIN
962: cn_utils.unindent(spec_code, 1);
963: cn_utils.unindent(body_code, 1);
964:
965: cn_utils.pkg_end_boilerplate(spec_code, package_name,'PKS');
966: cn_utils.pkg_end_boilerplate(body_code, package_name,'PKB');
967: END pkg_end;

Line 965: cn_utils.pkg_end_boilerplate(spec_code, package_name,'PKS');

961: BEGIN
962: cn_utils.unindent(spec_code, 1);
963: cn_utils.unindent(body_code, 1);
964:
965: cn_utils.pkg_end_boilerplate(spec_code, package_name,'PKS');
966: cn_utils.pkg_end_boilerplate(body_code, package_name,'PKB');
967: END pkg_end;
968:
969: --end clob

Line 966: cn_utils.pkg_end_boilerplate(body_code, package_name,'PKB');

962: cn_utils.unindent(spec_code, 1);
963: cn_utils.unindent(body_code, 1);
964:
965: cn_utils.pkg_end_boilerplate(spec_code, package_name,'PKS');
966: cn_utils.pkg_end_boilerplate(body_code, package_name,'PKB');
967: END pkg_end;
968:
969: --end clob
970:

Line 973: code IN OUT NOCOPY cn_utils.code_type,

969: --end clob
970:
971:
972: PROCEDURE proc_init_boilerplate (
973: code IN OUT NOCOPY cn_utils.code_type,
974: procedure_name cn_obj_procedures_v.name%TYPE,
975: description cn_obj_procedures_v.description%TYPE) IS
976:
977: X_userid VARCHAR2(20);

Line 982: cn_utils.appendcr(code, '--');

978:
979: BEGIN
980: SELECT user INTO X_userid FROM sys.dual;
981:
982: cn_utils.appendcr(code, '--');
983: cn_utils.appendcr(code, '-- Procedure Name');
984: cn_utils.appendcr(code, '-- ' || procedure_name);
985: cn_utils.appendcr(code, '-- Purpose');
986: cn_utils.appendcr(code, '-- ' || description);

Line 983: cn_utils.appendcr(code, '-- Procedure Name');

979: BEGIN
980: SELECT user INTO X_userid FROM sys.dual;
981:
982: cn_utils.appendcr(code, '--');
983: cn_utils.appendcr(code, '-- Procedure Name');
984: cn_utils.appendcr(code, '-- ' || procedure_name);
985: cn_utils.appendcr(code, '-- Purpose');
986: cn_utils.appendcr(code, '-- ' || description);
987: cn_utils.appendcr(code, '-- History');

Line 984: cn_utils.appendcr(code, '-- ' || procedure_name);

980: SELECT user INTO X_userid FROM sys.dual;
981:
982: cn_utils.appendcr(code, '--');
983: cn_utils.appendcr(code, '-- Procedure Name');
984: cn_utils.appendcr(code, '-- ' || procedure_name);
985: cn_utils.appendcr(code, '-- Purpose');
986: cn_utils.appendcr(code, '-- ' || description);
987: cn_utils.appendcr(code, '-- History');
988: cn_utils.appendcr(code, '-- ' || TO_CHAR(SYSDATE,'DD-MON-YYYY HH24:MI') || ' ' || X_userid || ' Created');

Line 985: cn_utils.appendcr(code, '-- Purpose');

981:
982: cn_utils.appendcr(code, '--');
983: cn_utils.appendcr(code, '-- Procedure Name');
984: cn_utils.appendcr(code, '-- ' || procedure_name);
985: cn_utils.appendcr(code, '-- Purpose');
986: cn_utils.appendcr(code, '-- ' || description);
987: cn_utils.appendcr(code, '-- History');
988: cn_utils.appendcr(code, '-- ' || TO_CHAR(SYSDATE,'DD-MON-YYYY HH24:MI') || ' ' || X_userid || ' Created');
989: cn_utils.appendcr(code, '--');

Line 986: cn_utils.appendcr(code, '-- ' || description);

982: cn_utils.appendcr(code, '--');
983: cn_utils.appendcr(code, '-- Procedure Name');
984: cn_utils.appendcr(code, '-- ' || procedure_name);
985: cn_utils.appendcr(code, '-- Purpose');
986: cn_utils.appendcr(code, '-- ' || description);
987: cn_utils.appendcr(code, '-- History');
988: cn_utils.appendcr(code, '-- ' || TO_CHAR(SYSDATE,'DD-MON-YYYY HH24:MI') || ' ' || X_userid || ' Created');
989: cn_utils.appendcr(code, '--');
990:

Line 987: cn_utils.appendcr(code, '-- History');

983: cn_utils.appendcr(code, '-- Procedure Name');
984: cn_utils.appendcr(code, '-- ' || procedure_name);
985: cn_utils.appendcr(code, '-- Purpose');
986: cn_utils.appendcr(code, '-- ' || description);
987: cn_utils.appendcr(code, '-- History');
988: cn_utils.appendcr(code, '-- ' || TO_CHAR(SYSDATE,'DD-MON-YYYY HH24:MI') || ' ' || X_userid || ' Created');
989: cn_utils.appendcr(code, '--');
990:
991: END proc_init_boilerplate;

Line 988: cn_utils.appendcr(code, '-- ' || TO_CHAR(SYSDATE,'DD-MON-YYYY HH24:MI') || ' ' || X_userid || ' Created');

984: cn_utils.appendcr(code, '-- ' || procedure_name);
985: cn_utils.appendcr(code, '-- Purpose');
986: cn_utils.appendcr(code, '-- ' || description);
987: cn_utils.appendcr(code, '-- History');
988: cn_utils.appendcr(code, '-- ' || TO_CHAR(SYSDATE,'DD-MON-YYYY HH24:MI') || ' ' || X_userid || ' Created');
989: cn_utils.appendcr(code, '--');
990:
991: END proc_init_boilerplate;
992:

Line 989: cn_utils.appendcr(code, '--');

985: cn_utils.appendcr(code, '-- Purpose');
986: cn_utils.appendcr(code, '-- ' || description);
987: cn_utils.appendcr(code, '-- History');
988: cn_utils.appendcr(code, '-- ' || TO_CHAR(SYSDATE,'DD-MON-YYYY HH24:MI') || ' ' || X_userid || ' Created');
989: cn_utils.appendcr(code, '--');
990:
991: END proc_init_boilerplate;
992:
993: --for clob

Line 995: code IN OUT NOCOPY cn_utils.clob_code_type,

991: END proc_init_boilerplate;
992:
993: --for clob
994: PROCEDURE proc_init_boilerplate (
995: code IN OUT NOCOPY cn_utils.clob_code_type,
996: procedure_name cn_obj_procedures_v.name%TYPE,
997: description cn_obj_procedures_v.description%TYPE) IS
998:
999: X_userid VARCHAR2(20);

Line 1004: cn_utils.appendcr(code, '--');

1000:
1001: BEGIN
1002: SELECT user INTO X_userid FROM sys.dual;
1003:
1004: cn_utils.appendcr(code, '--');
1005: cn_utils.appendcr(code, '-- Procedure Name');
1006: cn_utils.appendcr(code, '-- ' || procedure_name);
1007: cn_utils.appendcr(code, '-- Purpose');
1008: cn_utils.appendcr(code, '-- ' || description);

Line 1005: cn_utils.appendcr(code, '-- Procedure Name');

1001: BEGIN
1002: SELECT user INTO X_userid FROM sys.dual;
1003:
1004: cn_utils.appendcr(code, '--');
1005: cn_utils.appendcr(code, '-- Procedure Name');
1006: cn_utils.appendcr(code, '-- ' || procedure_name);
1007: cn_utils.appendcr(code, '-- Purpose');
1008: cn_utils.appendcr(code, '-- ' || description);
1009: cn_utils.appendcr(code, '-- History');

Line 1006: cn_utils.appendcr(code, '-- ' || procedure_name);

1002: SELECT user INTO X_userid FROM sys.dual;
1003:
1004: cn_utils.appendcr(code, '--');
1005: cn_utils.appendcr(code, '-- Procedure Name');
1006: cn_utils.appendcr(code, '-- ' || procedure_name);
1007: cn_utils.appendcr(code, '-- Purpose');
1008: cn_utils.appendcr(code, '-- ' || description);
1009: cn_utils.appendcr(code, '-- History');
1010: cn_utils.appendcr(code, '-- ' || TO_CHAR(SYSDATE,'DD-MON-YYYY HH24:MI') || ' ' || X_userid || ' Created');

Line 1007: cn_utils.appendcr(code, '-- Purpose');

1003:
1004: cn_utils.appendcr(code, '--');
1005: cn_utils.appendcr(code, '-- Procedure Name');
1006: cn_utils.appendcr(code, '-- ' || procedure_name);
1007: cn_utils.appendcr(code, '-- Purpose');
1008: cn_utils.appendcr(code, '-- ' || description);
1009: cn_utils.appendcr(code, '-- History');
1010: cn_utils.appendcr(code, '-- ' || TO_CHAR(SYSDATE,'DD-MON-YYYY HH24:MI') || ' ' || X_userid || ' Created');
1011: cn_utils.appendcr(code, '--');

Line 1008: cn_utils.appendcr(code, '-- ' || description);

1004: cn_utils.appendcr(code, '--');
1005: cn_utils.appendcr(code, '-- Procedure Name');
1006: cn_utils.appendcr(code, '-- ' || procedure_name);
1007: cn_utils.appendcr(code, '-- Purpose');
1008: cn_utils.appendcr(code, '-- ' || description);
1009: cn_utils.appendcr(code, '-- History');
1010: cn_utils.appendcr(code, '-- ' || TO_CHAR(SYSDATE,'DD-MON-YYYY HH24:MI') || ' ' || X_userid || ' Created');
1011: cn_utils.appendcr(code, '--');
1012:

Line 1009: cn_utils.appendcr(code, '-- History');

1005: cn_utils.appendcr(code, '-- Procedure Name');
1006: cn_utils.appendcr(code, '-- ' || procedure_name);
1007: cn_utils.appendcr(code, '-- Purpose');
1008: cn_utils.appendcr(code, '-- ' || description);
1009: cn_utils.appendcr(code, '-- History');
1010: cn_utils.appendcr(code, '-- ' || TO_CHAR(SYSDATE,'DD-MON-YYYY HH24:MI') || ' ' || X_userid || ' Created');
1011: cn_utils.appendcr(code, '--');
1012:
1013: END proc_init_boilerplate;

Line 1010: cn_utils.appendcr(code, '-- ' || TO_CHAR(SYSDATE,'DD-MON-YYYY HH24:MI') || ' ' || X_userid || ' Created');

1006: cn_utils.appendcr(code, '-- ' || procedure_name);
1007: cn_utils.appendcr(code, '-- Purpose');
1008: cn_utils.appendcr(code, '-- ' || description);
1009: cn_utils.appendcr(code, '-- History');
1010: cn_utils.appendcr(code, '-- ' || TO_CHAR(SYSDATE,'DD-MON-YYYY HH24:MI') || ' ' || X_userid || ' Created');
1011: cn_utils.appendcr(code, '--');
1012:
1013: END proc_init_boilerplate;
1014: --end clob

Line 1011: cn_utils.appendcr(code, '--');

1007: cn_utils.appendcr(code, '-- Purpose');
1008: cn_utils.appendcr(code, '-- ' || description);
1009: cn_utils.appendcr(code, '-- History');
1010: cn_utils.appendcr(code, '-- ' || TO_CHAR(SYSDATE,'DD-MON-YYYY HH24:MI') || ' ' || X_userid || ' Created');
1011: cn_utils.appendcr(code, '--');
1012:
1013: END proc_init_boilerplate;
1014: --end clob
1015:

Line 1024: spec_code IN OUT NOCOPY cn_utils.code_type,

1020: procedure_type cn_obj_procedures_v.procedure_type%TYPE,
1021: return_type cn_obj_procedures_v.return_type%TYPE,
1022: package_id cn_obj_procedures_v.package_id%TYPE,
1023: repository_id cn_obj_procedures_v.repository_id%TYPE,
1024: spec_code IN OUT NOCOPY cn_utils.code_type,
1025: body_code IN OUT NOCOPY cn_utils.code_type) IS
1026:
1027: X_rowid ROWID;
1028:

Line 1025: body_code IN OUT NOCOPY cn_utils.code_type) IS

1021: return_type cn_obj_procedures_v.return_type%TYPE,
1022: package_id cn_obj_procedures_v.package_id%TYPE,
1023: repository_id cn_obj_procedures_v.repository_id%TYPE,
1024: spec_code IN OUT NOCOPY cn_utils.code_type,
1025: body_code IN OUT NOCOPY cn_utils.code_type) IS
1026:
1027: X_rowid ROWID;
1028:
1029: BEGIN

Line 1033: cn_utils.proc_init_boilerplate(spec_code, procedure_name, description);

1029: BEGIN
1030: cn_debug.print_msg('proc_init>>', 1);
1031:
1032: -- Generate boilerplate comments
1033: cn_utils.proc_init_boilerplate(spec_code, procedure_name, description);
1034: cn_utils.proc_init_boilerplate(body_code, procedure_name, description);
1035:
1036: -- Generate procedure header and parameters in both spec and body
1037: IF (procedure_type = 'P') THEN

Line 1034: cn_utils.proc_init_boilerplate(body_code, procedure_name, description);

1030: cn_debug.print_msg('proc_init>>', 1);
1031:
1032: -- Generate boilerplate comments
1033: cn_utils.proc_init_boilerplate(spec_code, procedure_name, description);
1034: cn_utils.proc_init_boilerplate(body_code, procedure_name, description);
1035:
1036: -- Generate procedure header and parameters in both spec and body
1037: IF (procedure_type = 'P') THEN
1038: cn_utils.appind(spec_code, 'PROCEDURE ' || procedure_name);

Line 1038: cn_utils.appind(spec_code, 'PROCEDURE ' || procedure_name);

1034: cn_utils.proc_init_boilerplate(body_code, procedure_name, description);
1035:
1036: -- Generate procedure header and parameters in both spec and body
1037: IF (procedure_type = 'P') THEN
1038: cn_utils.appind(spec_code, 'PROCEDURE ' || procedure_name);
1039: cn_utils.appind(body_code, 'PROCEDURE ' || procedure_name);
1040: ELSIF (procedure_type = 'F') THEN
1041: cn_utils.appind(spec_code, 'FUNCTION ' || procedure_name);
1042: cn_utils.appind(body_code, 'FUNCTION ' || procedure_name);

Line 1039: cn_utils.appind(body_code, 'PROCEDURE ' || procedure_name);

1035:
1036: -- Generate procedure header and parameters in both spec and body
1037: IF (procedure_type = 'P') THEN
1038: cn_utils.appind(spec_code, 'PROCEDURE ' || procedure_name);
1039: cn_utils.appind(body_code, 'PROCEDURE ' || procedure_name);
1040: ELSIF (procedure_type = 'F') THEN
1041: cn_utils.appind(spec_code, 'FUNCTION ' || procedure_name);
1042: cn_utils.appind(body_code, 'FUNCTION ' || procedure_name);
1043: END IF;

Line 1041: cn_utils.appind(spec_code, 'FUNCTION ' || procedure_name);

1037: IF (procedure_type = 'P') THEN
1038: cn_utils.appind(spec_code, 'PROCEDURE ' || procedure_name);
1039: cn_utils.appind(body_code, 'PROCEDURE ' || procedure_name);
1040: ELSIF (procedure_type = 'F') THEN
1041: cn_utils.appind(spec_code, 'FUNCTION ' || procedure_name);
1042: cn_utils.appind(body_code, 'FUNCTION ' || procedure_name);
1043: END IF;
1044:
1045: IF (parameter_list IS NOT NULL) THEN

Line 1042: cn_utils.appind(body_code, 'FUNCTION ' || procedure_name);

1038: cn_utils.appind(spec_code, 'PROCEDURE ' || procedure_name);
1039: cn_utils.appind(body_code, 'PROCEDURE ' || procedure_name);
1040: ELSIF (procedure_type = 'F') THEN
1041: cn_utils.appind(spec_code, 'FUNCTION ' || procedure_name);
1042: cn_utils.appind(body_code, 'FUNCTION ' || procedure_name);
1043: END IF;
1044:
1045: IF (parameter_list IS NOT NULL) THEN
1046: cn_utils.append(spec_code, ' (' || parameter_list || ')');

Line 1046: cn_utils.append(spec_code, ' (' || parameter_list || ')');

1042: cn_utils.appind(body_code, 'FUNCTION ' || procedure_name);
1043: END IF;
1044:
1045: IF (parameter_list IS NOT NULL) THEN
1046: cn_utils.append(spec_code, ' (' || parameter_list || ')');
1047: cn_utils.append(body_code, ' (' || parameter_list || ')');
1048: END IF;
1049:
1050: IF (procedure_type = 'F') THEN

Line 1047: cn_utils.append(body_code, ' (' || parameter_list || ')');

1043: END IF;
1044:
1045: IF (parameter_list IS NOT NULL) THEN
1046: cn_utils.append(spec_code, ' (' || parameter_list || ')');
1047: cn_utils.append(body_code, ' (' || parameter_list || ')');
1048: END IF;
1049:
1050: IF (procedure_type = 'F') THEN
1051: cn_utils.append(spec_code, ' RETURN ' || return_type);

Line 1051: cn_utils.append(spec_code, ' RETURN ' || return_type);

1047: cn_utils.append(body_code, ' (' || parameter_list || ')');
1048: END IF;
1049:
1050: IF (procedure_type = 'F') THEN
1051: cn_utils.append(spec_code, ' RETURN ' || return_type);
1052: cn_utils.append(body_code, ' RETURN ' || return_type);
1053: END IF;
1054:
1055: cn_utils.appendcr(spec_code, ';');

Line 1052: cn_utils.append(body_code, ' RETURN ' || return_type);

1048: END IF;
1049:
1050: IF (procedure_type = 'F') THEN
1051: cn_utils.append(spec_code, ' RETURN ' || return_type);
1052: cn_utils.append(body_code, ' RETURN ' || return_type);
1053: END IF;
1054:
1055: cn_utils.appendcr(spec_code, ';');
1056: cn_utils.appendcr(spec_code);

Line 1055: cn_utils.appendcr(spec_code, ';');

1051: cn_utils.append(spec_code, ' RETURN ' || return_type);
1052: cn_utils.append(body_code, ' RETURN ' || return_type);
1053: END IF;
1054:
1055: cn_utils.appendcr(spec_code, ';');
1056: cn_utils.appendcr(spec_code);
1057: cn_utils.appendcr(body_code, ' IS');
1058:
1059: cn_debug.print_msg('proc_init<<', 1);

Line 1056: cn_utils.appendcr(spec_code);

1052: cn_utils.append(body_code, ' RETURN ' || return_type);
1053: END IF;
1054:
1055: cn_utils.appendcr(spec_code, ';');
1056: cn_utils.appendcr(spec_code);
1057: cn_utils.appendcr(body_code, ' IS');
1058:
1059: cn_debug.print_msg('proc_init<<', 1);
1060: END proc_init;

Line 1057: cn_utils.appendcr(body_code, ' IS');

1053: END IF;
1054:
1055: cn_utils.appendcr(spec_code, ';');
1056: cn_utils.appendcr(spec_code);
1057: cn_utils.appendcr(body_code, ' IS');
1058:
1059: cn_debug.print_msg('proc_init<<', 1);
1060: END proc_init;
1061:

Line 1071: spec_code IN OUT NOCOPY cn_utils.clob_code_type,

1067: procedure_type cn_obj_procedures_v.procedure_type%TYPE,
1068: return_type cn_obj_procedures_v.return_type%TYPE,
1069: package_id cn_obj_procedures_v.package_id%TYPE,
1070: repository_id cn_obj_procedures_v.repository_id%TYPE,
1071: spec_code IN OUT NOCOPY cn_utils.clob_code_type,
1072: body_code IN OUT NOCOPY cn_utils.clob_code_type) IS
1073:
1074: X_rowid ROWID;
1075:

Line 1072: body_code IN OUT NOCOPY cn_utils.clob_code_type) IS

1068: return_type cn_obj_procedures_v.return_type%TYPE,
1069: package_id cn_obj_procedures_v.package_id%TYPE,
1070: repository_id cn_obj_procedures_v.repository_id%TYPE,
1071: spec_code IN OUT NOCOPY cn_utils.clob_code_type,
1072: body_code IN OUT NOCOPY cn_utils.clob_code_type) IS
1073:
1074: X_rowid ROWID;
1075:
1076: BEGIN

Line 1080: cn_utils.proc_init_boilerplate(spec_code, procedure_name, description);

1076: BEGIN
1077: cn_debug.print_msg('proc_init>>', 1);
1078:
1079: -- Generate boilerplate comments
1080: cn_utils.proc_init_boilerplate(spec_code, procedure_name, description);
1081: cn_utils.proc_init_boilerplate(body_code, procedure_name, description);
1082:
1083: -- Generate procedure header and parameters in both spec and body
1084: IF (procedure_type = 'P') THEN

Line 1081: cn_utils.proc_init_boilerplate(body_code, procedure_name, description);

1077: cn_debug.print_msg('proc_init>>', 1);
1078:
1079: -- Generate boilerplate comments
1080: cn_utils.proc_init_boilerplate(spec_code, procedure_name, description);
1081: cn_utils.proc_init_boilerplate(body_code, procedure_name, description);
1082:
1083: -- Generate procedure header and parameters in both spec and body
1084: IF (procedure_type = 'P') THEN
1085: cn_utils.appind(spec_code, 'PROCEDURE ' || procedure_name);

Line 1085: cn_utils.appind(spec_code, 'PROCEDURE ' || procedure_name);

1081: cn_utils.proc_init_boilerplate(body_code, procedure_name, description);
1082:
1083: -- Generate procedure header and parameters in both spec and body
1084: IF (procedure_type = 'P') THEN
1085: cn_utils.appind(spec_code, 'PROCEDURE ' || procedure_name);
1086: cn_utils.appind(body_code, 'PROCEDURE ' || procedure_name);
1087: ELSIF (procedure_type = 'F') THEN
1088: cn_utils.appind(spec_code, 'FUNCTION ' || procedure_name);
1089: cn_utils.appind(body_code, 'FUNCTION ' || procedure_name);

Line 1086: cn_utils.appind(body_code, 'PROCEDURE ' || procedure_name);

1082:
1083: -- Generate procedure header and parameters in both spec and body
1084: IF (procedure_type = 'P') THEN
1085: cn_utils.appind(spec_code, 'PROCEDURE ' || procedure_name);
1086: cn_utils.appind(body_code, 'PROCEDURE ' || procedure_name);
1087: ELSIF (procedure_type = 'F') THEN
1088: cn_utils.appind(spec_code, 'FUNCTION ' || procedure_name);
1089: cn_utils.appind(body_code, 'FUNCTION ' || procedure_name);
1090: END IF;

Line 1088: cn_utils.appind(spec_code, 'FUNCTION ' || procedure_name);

1084: IF (procedure_type = 'P') THEN
1085: cn_utils.appind(spec_code, 'PROCEDURE ' || procedure_name);
1086: cn_utils.appind(body_code, 'PROCEDURE ' || procedure_name);
1087: ELSIF (procedure_type = 'F') THEN
1088: cn_utils.appind(spec_code, 'FUNCTION ' || procedure_name);
1089: cn_utils.appind(body_code, 'FUNCTION ' || procedure_name);
1090: END IF;
1091:
1092: IF (parameter_list IS NOT NULL) THEN

Line 1089: cn_utils.appind(body_code, 'FUNCTION ' || procedure_name);

1085: cn_utils.appind(spec_code, 'PROCEDURE ' || procedure_name);
1086: cn_utils.appind(body_code, 'PROCEDURE ' || procedure_name);
1087: ELSIF (procedure_type = 'F') THEN
1088: cn_utils.appind(spec_code, 'FUNCTION ' || procedure_name);
1089: cn_utils.appind(body_code, 'FUNCTION ' || procedure_name);
1090: END IF;
1091:
1092: IF (parameter_list IS NOT NULL) THEN
1093: cn_utils.append(spec_code, ' (' || parameter_list || ')');

Line 1093: cn_utils.append(spec_code, ' (' || parameter_list || ')');

1089: cn_utils.appind(body_code, 'FUNCTION ' || procedure_name);
1090: END IF;
1091:
1092: IF (parameter_list IS NOT NULL) THEN
1093: cn_utils.append(spec_code, ' (' || parameter_list || ')');
1094: cn_utils.append(body_code, ' (' || parameter_list || ')');
1095: END IF;
1096:
1097: IF (procedure_type = 'F') THEN

Line 1094: cn_utils.append(body_code, ' (' || parameter_list || ')');

1090: END IF;
1091:
1092: IF (parameter_list IS NOT NULL) THEN
1093: cn_utils.append(spec_code, ' (' || parameter_list || ')');
1094: cn_utils.append(body_code, ' (' || parameter_list || ')');
1095: END IF;
1096:
1097: IF (procedure_type = 'F') THEN
1098: cn_utils.append(spec_code, ' RETURN ' || return_type);

Line 1098: cn_utils.append(spec_code, ' RETURN ' || return_type);

1094: cn_utils.append(body_code, ' (' || parameter_list || ')');
1095: END IF;
1096:
1097: IF (procedure_type = 'F') THEN
1098: cn_utils.append(spec_code, ' RETURN ' || return_type);
1099: cn_utils.append(body_code, ' RETURN ' || return_type);
1100: END IF;
1101:
1102: cn_utils.appendcr(spec_code, ';');

Line 1099: cn_utils.append(body_code, ' RETURN ' || return_type);

1095: END IF;
1096:
1097: IF (procedure_type = 'F') THEN
1098: cn_utils.append(spec_code, ' RETURN ' || return_type);
1099: cn_utils.append(body_code, ' RETURN ' || return_type);
1100: END IF;
1101:
1102: cn_utils.appendcr(spec_code, ';');
1103: cn_utils.appendcr(spec_code);

Line 1102: cn_utils.appendcr(spec_code, ';');

1098: cn_utils.append(spec_code, ' RETURN ' || return_type);
1099: cn_utils.append(body_code, ' RETURN ' || return_type);
1100: END IF;
1101:
1102: cn_utils.appendcr(spec_code, ';');
1103: cn_utils.appendcr(spec_code);
1104: cn_utils.appendcr(body_code, ' IS');
1105:
1106: cn_debug.print_msg('proc_init<<', 1);

Line 1103: cn_utils.appendcr(spec_code);

1099: cn_utils.append(body_code, ' RETURN ' || return_type);
1100: END IF;
1101:
1102: cn_utils.appendcr(spec_code, ';');
1103: cn_utils.appendcr(spec_code);
1104: cn_utils.appendcr(body_code, ' IS');
1105:
1106: cn_debug.print_msg('proc_init<<', 1);
1107: END proc_init;

Line 1104: cn_utils.appendcr(body_code, ' IS');

1100: END IF;
1101:
1102: cn_utils.appendcr(spec_code, ';');
1103: cn_utils.appendcr(spec_code);
1104: cn_utils.appendcr(body_code, ' IS');
1105:
1106: cn_debug.print_msg('proc_init<<', 1);
1107: END proc_init;
1108:

Line 1115: code IN OUT NOCOPY cn_utils.code_type) IS

1111:
1112: PROCEDURE proc_begin (
1113: procedure_name cn_obj_procedures_v.name%TYPE,
1114: generate_debug_pipe VARCHAR2,
1115: code IN OUT NOCOPY cn_utils.code_type) IS
1116:
1117: BEGIN
1118: cn_debug.print_msg('proc_begin>>', 1);
1119:

Line 1121: cn_utils.appindcr(code, 'BEGIN');

1117: BEGIN
1118: cn_debug.print_msg('proc_begin>>', 1);
1119:
1120: -- Generate begin procedure statement
1121: cn_utils.appindcr(code, 'BEGIN');
1122: cn_utils.indent(code, 1);
1123:
1124: IF (generate_debug_pipe = 'Y') THEN
1125: -- Generate code to initialize a debug pipe if a pipename has been specified

Line 1122: cn_utils.indent(code, 1);

1118: cn_debug.print_msg('proc_begin>>', 1);
1119:
1120: -- Generate begin procedure statement
1121: cn_utils.appindcr(code, 'BEGIN');
1122: cn_utils.indent(code, 1);
1123:
1124: IF (generate_debug_pipe = 'Y') THEN
1125: -- Generate code to initialize a debug pipe if a pipename has been specified
1126: cn_utils.appindcr(code, 'IF (debug_pipe IS NOT NULL) THEN');

Line 1126: cn_utils.appindcr(code, 'IF (debug_pipe IS NOT NULL) THEN');

1122: cn_utils.indent(code, 1);
1123:
1124: IF (generate_debug_pipe = 'Y') THEN
1125: -- Generate code to initialize a debug pipe if a pipename has been specified
1126: cn_utils.appindcr(code, 'IF (debug_pipe IS NOT NULL) THEN');
1127: cn_utils.appindcr(code, ' cn_debug.init_pipe(debug_pipe, debug_level);');
1128: cn_utils.appindcr(code, 'END IF;');
1129: END IF;
1130:

Line 1127: cn_utils.appindcr(code, ' cn_debug.init_pipe(debug_pipe, debug_level);');

1123:
1124: IF (generate_debug_pipe = 'Y') THEN
1125: -- Generate code to initialize a debug pipe if a pipename has been specified
1126: cn_utils.appindcr(code, 'IF (debug_pipe IS NOT NULL) THEN');
1127: cn_utils.appindcr(code, ' cn_debug.init_pipe(debug_pipe, debug_level);');
1128: cn_utils.appindcr(code, 'END IF;');
1129: END IF;
1130:
1131: cn_utils.appendcr(code);

Line 1128: cn_utils.appindcr(code, 'END IF;');

1124: IF (generate_debug_pipe = 'Y') THEN
1125: -- Generate code to initialize a debug pipe if a pipename has been specified
1126: cn_utils.appindcr(code, 'IF (debug_pipe IS NOT NULL) THEN');
1127: cn_utils.appindcr(code, ' cn_debug.init_pipe(debug_pipe, debug_level);');
1128: cn_utils.appindcr(code, 'END IF;');
1129: END IF;
1130:
1131: cn_utils.appendcr(code);
1132:

Line 1131: cn_utils.appendcr(code);

1127: cn_utils.appindcr(code, ' cn_debug.init_pipe(debug_pipe, debug_level);');
1128: cn_utils.appindcr(code, 'END IF;');
1129: END IF;
1130:
1131: cn_utils.appendcr(code);
1132:
1133: cn_debug.print_msg('proc_begin<<', 1);
1134: END proc_begin;
1135:

Line 1140: code IN OUT NOCOPY cn_utils.clob_code_type) IS

1136: --for clob
1137: PROCEDURE proc_begin (
1138: procedure_name cn_obj_procedures_v.name%TYPE,
1139: generate_debug_pipe VARCHAR2,
1140: code IN OUT NOCOPY cn_utils.clob_code_type) IS
1141: BEGIN
1142: cn_debug.print_msg('proc_begin>>', 1);
1143:
1144: -- Generate begin procedure statement

Line 1145: cn_utils.appindcr(code, 'BEGIN');

1141: BEGIN
1142: cn_debug.print_msg('proc_begin>>', 1);
1143:
1144: -- Generate begin procedure statement
1145: cn_utils.appindcr(code, 'BEGIN');
1146: cn_utils.indent(code, 1);
1147:
1148: IF (generate_debug_pipe = 'Y') THEN
1149: -- Generate code to initialize a debug pipe if a pipename has been specified

Line 1146: cn_utils.indent(code, 1);

1142: cn_debug.print_msg('proc_begin>>', 1);
1143:
1144: -- Generate begin procedure statement
1145: cn_utils.appindcr(code, 'BEGIN');
1146: cn_utils.indent(code, 1);
1147:
1148: IF (generate_debug_pipe = 'Y') THEN
1149: -- Generate code to initialize a debug pipe if a pipename has been specified
1150: cn_utils.appindcr(code, 'IF (debug_pipe IS NOT NULL) THEN');

Line 1150: cn_utils.appindcr(code, 'IF (debug_pipe IS NOT NULL) THEN');

1146: cn_utils.indent(code, 1);
1147:
1148: IF (generate_debug_pipe = 'Y') THEN
1149: -- Generate code to initialize a debug pipe if a pipename has been specified
1150: cn_utils.appindcr(code, 'IF (debug_pipe IS NOT NULL) THEN');
1151: cn_utils.appindcr(code, ' cn_debug.init_pipe(debug_pipe, debug_level);');
1152: cn_utils.appindcr(code, 'END IF;');
1153: END IF;
1154:

Line 1151: cn_utils.appindcr(code, ' cn_debug.init_pipe(debug_pipe, debug_level);');

1147:
1148: IF (generate_debug_pipe = 'Y') THEN
1149: -- Generate code to initialize a debug pipe if a pipename has been specified
1150: cn_utils.appindcr(code, 'IF (debug_pipe IS NOT NULL) THEN');
1151: cn_utils.appindcr(code, ' cn_debug.init_pipe(debug_pipe, debug_level);');
1152: cn_utils.appindcr(code, 'END IF;');
1153: END IF;
1154:
1155: cn_utils.appendcr(code);

Line 1152: cn_utils.appindcr(code, 'END IF;');

1148: IF (generate_debug_pipe = 'Y') THEN
1149: -- Generate code to initialize a debug pipe if a pipename has been specified
1150: cn_utils.appindcr(code, 'IF (debug_pipe IS NOT NULL) THEN');
1151: cn_utils.appindcr(code, ' cn_debug.init_pipe(debug_pipe, debug_level);');
1152: cn_utils.appindcr(code, 'END IF;');
1153: END IF;
1154:
1155: cn_utils.appendcr(code);
1156:

Line 1155: cn_utils.appendcr(code);

1151: cn_utils.appindcr(code, ' cn_debug.init_pipe(debug_pipe, debug_level);');
1152: cn_utils.appindcr(code, 'END IF;');
1153: END IF;
1154:
1155: cn_utils.appendcr(code);
1156:
1157: cn_debug.print_msg('proc_begin<<', 1);
1158: END proc_begin;
1159: --end clob

Line 1165: code IN OUT NOCOPY cn_utils.code_type) IS

1161:
1162: PROCEDURE proc_end (
1163: procedure_name cn_obj_procedures_v.name%TYPE,
1164: exception_flag VARCHAR2,
1165: code IN OUT NOCOPY cn_utils.code_type) IS
1166:
1167: BEGIN
1168: cn_debug.print_msg('proc_end>>', 1);
1169:

Line 1170: cn_utils.appendcr(code);

1166:
1167: BEGIN
1168: cn_debug.print_msg('proc_end>>', 1);
1169:
1170: cn_utils.appendcr(code);
1171: cn_utils.appendcr(code);
1172: IF (exception_flag = 'Y') THEN
1173: cn_utils.record_process_exception(procedure_name, NULL, code);
1174: END IF;

Line 1171: cn_utils.appendcr(code);

1167: BEGIN
1168: cn_debug.print_msg('proc_end>>', 1);
1169:
1170: cn_utils.appendcr(code);
1171: cn_utils.appendcr(code);
1172: IF (exception_flag = 'Y') THEN
1173: cn_utils.record_process_exception(procedure_name, NULL, code);
1174: END IF;
1175:

Line 1173: cn_utils.record_process_exception(procedure_name, NULL, code);

1169:
1170: cn_utils.appendcr(code);
1171: cn_utils.appendcr(code);
1172: IF (exception_flag = 'Y') THEN
1173: cn_utils.record_process_exception(procedure_name, NULL, code);
1174: END IF;
1175:
1176: -- Generate end of procedure statement
1177: cn_utils.appendcr(code);

Line 1177: cn_utils.appendcr(code);

1173: cn_utils.record_process_exception(procedure_name, NULL, code);
1174: END IF;
1175:
1176: -- Generate end of procedure statement
1177: cn_utils.appendcr(code);
1178: cn_utils.unindent(code, 1);
1179: cn_utils.appindcr(code, 'END ' || procedure_name || ';');
1180: cn_utils.appendcr(code);
1181:

Line 1178: cn_utils.unindent(code, 1);

1174: END IF;
1175:
1176: -- Generate end of procedure statement
1177: cn_utils.appendcr(code);
1178: cn_utils.unindent(code, 1);
1179: cn_utils.appindcr(code, 'END ' || procedure_name || ';');
1180: cn_utils.appendcr(code);
1181:
1182: cn_debug.print_msg('proc_end<<', 1);

Line 1179: cn_utils.appindcr(code, 'END ' || procedure_name || ';');

1175:
1176: -- Generate end of procedure statement
1177: cn_utils.appendcr(code);
1178: cn_utils.unindent(code, 1);
1179: cn_utils.appindcr(code, 'END ' || procedure_name || ';');
1180: cn_utils.appendcr(code);
1181:
1182: cn_debug.print_msg('proc_end<<', 1);
1183: END proc_end;

Line 1180: cn_utils.appendcr(code);

1176: -- Generate end of procedure statement
1177: cn_utils.appendcr(code);
1178: cn_utils.unindent(code, 1);
1179: cn_utils.appindcr(code, 'END ' || procedure_name || ';');
1180: cn_utils.appendcr(code);
1181:
1182: cn_debug.print_msg('proc_end<<', 1);
1183: END proc_end;
1184:

Line 1189: code IN OUT NOCOPY cn_utils.clob_code_type) IS

1185: --for clob
1186: PROCEDURE proc_end (
1187: procedure_name cn_obj_procedures_v.name%TYPE,
1188: exception_flag VARCHAR2,
1189: code IN OUT NOCOPY cn_utils.clob_code_type) IS
1190:
1191: BEGIN
1192: cn_debug.print_msg('proc_end>>', 1);
1193:

Line 1194: cn_utils.appendcr(code);

1190:
1191: BEGIN
1192: cn_debug.print_msg('proc_end>>', 1);
1193:
1194: cn_utils.appendcr(code);
1195: cn_utils.appendcr(code);
1196: IF (exception_flag = 'Y') THEN
1197: cn_utils.record_process_exception(procedure_name, NULL, code);
1198: END IF;

Line 1195: cn_utils.appendcr(code);

1191: BEGIN
1192: cn_debug.print_msg('proc_end>>', 1);
1193:
1194: cn_utils.appendcr(code);
1195: cn_utils.appendcr(code);
1196: IF (exception_flag = 'Y') THEN
1197: cn_utils.record_process_exception(procedure_name, NULL, code);
1198: END IF;
1199:

Line 1197: cn_utils.record_process_exception(procedure_name, NULL, code);

1193:
1194: cn_utils.appendcr(code);
1195: cn_utils.appendcr(code);
1196: IF (exception_flag = 'Y') THEN
1197: cn_utils.record_process_exception(procedure_name, NULL, code);
1198: END IF;
1199:
1200: -- Generate end of procedure statement
1201: cn_utils.appendcr(code);

Line 1201: cn_utils.appendcr(code);

1197: cn_utils.record_process_exception(procedure_name, NULL, code);
1198: END IF;
1199:
1200: -- Generate end of procedure statement
1201: cn_utils.appendcr(code);
1202: cn_utils.unindent(code, 1);
1203: cn_utils.appindcr(code, 'END ' || procedure_name || ';');
1204: cn_utils.appendcr(code);
1205:

Line 1202: cn_utils.unindent(code, 1);

1198: END IF;
1199:
1200: -- Generate end of procedure statement
1201: cn_utils.appendcr(code);
1202: cn_utils.unindent(code, 1);
1203: cn_utils.appindcr(code, 'END ' || procedure_name || ';');
1204: cn_utils.appendcr(code);
1205:
1206: cn_debug.print_msg('proc_end<<', 1);

Line 1203: cn_utils.appindcr(code, 'END ' || procedure_name || ';');

1199:
1200: -- Generate end of procedure statement
1201: cn_utils.appendcr(code);
1202: cn_utils.unindent(code, 1);
1203: cn_utils.appindcr(code, 'END ' || procedure_name || ';');
1204: cn_utils.appendcr(code);
1205:
1206: cn_debug.print_msg('proc_end<<', 1);
1207: END proc_end;

Line 1204: cn_utils.appendcr(code);

1200: -- Generate end of procedure statement
1201: cn_utils.appendcr(code);
1202: cn_utils.unindent(code, 1);
1203: cn_utils.appindcr(code, 'END ' || procedure_name || ';');
1204: cn_utils.appendcr(code);
1205:
1206: cn_debug.print_msg('proc_end<<', 1);
1207: END proc_end;
1208:

Line 1223: code IN OUT NOCOPY cn_utils.code_type) IS

1219: -- 18-NOV-93 Devesh Khatu Created
1220: --+
1221: PROCEDURE gen_create_table (
1222: X_table_id cn_obj_tables_v.table_id%TYPE,
1223: code IN OUT NOCOPY cn_utils.code_type) IS
1224:
1225: -- Declare cursor for getting columns that need to be created
1226: CURSOR columns_cursor IS
1227: SELECT cocv.name column_name, data_type, data_length, data_scale,

Line 1238: table_name := cn_utils.get_object_name(X_table_id);

1234:
1235: BEGIN
1236: cn_debug.print_msg('gen_create_table>>', 1);
1237:
1238: table_name := cn_utils.get_object_name(X_table_id);
1239:
1240: cn_utils.init_code( X_table_id, code);
1241:
1242: appendcr(code, 'CREATE TABLE ' || LOWER(table_name) || ' (');

Line 1240: cn_utils.init_code( X_table_id, code);

1236: cn_debug.print_msg('gen_create_table>>', 1);
1237:
1238: table_name := cn_utils.get_object_name(X_table_id);
1239:
1240: cn_utils.init_code( X_table_id, code);
1241:
1242: appendcr(code, 'CREATE TABLE ' || LOWER(table_name) || ' (');
1243: FOR c IN columns_cursor LOOP
1244: cn_utils.append(code, ' ' || LOWER(c.column_name) || ' ' || UPPER(c.data_type));

Line 1244: cn_utils.append(code, ' ' || LOWER(c.column_name) || ' ' || UPPER(c.data_type));

1240: cn_utils.init_code( X_table_id, code);
1241:
1242: appendcr(code, 'CREATE TABLE ' || LOWER(table_name) || ' (');
1243: FOR c IN columns_cursor LOOP
1244: cn_utils.append(code, ' ' || LOWER(c.column_name) || ' ' || UPPER(c.data_type));
1245: IF (c.data_length IS NOT NULL) THEN
1246: IF (c.data_scale IS NOT NULL) THEN
1247: cn_utils.append(code, '(' || c.data_length || ',' || c.data_scale || ') ');
1248: ELSE

Line 1247: cn_utils.append(code, '(' || c.data_length || ',' || c.data_scale || ') ');

1243: FOR c IN columns_cursor LOOP
1244: cn_utils.append(code, ' ' || LOWER(c.column_name) || ' ' || UPPER(c.data_type));
1245: IF (c.data_length IS NOT NULL) THEN
1246: IF (c.data_scale IS NOT NULL) THEN
1247: cn_utils.append(code, '(' || c.data_length || ',' || c.data_scale || ') ');
1248: ELSE
1249: cn_utils.append(code, '(' || c.data_length || ') ');
1250: END IF;
1251: END IF;

Line 1249: cn_utils.append(code, '(' || c.data_length || ') ');

1245: IF (c.data_length IS NOT NULL) THEN
1246: IF (c.data_scale IS NOT NULL) THEN
1247: cn_utils.append(code, '(' || c.data_length || ',' || c.data_scale || ') ');
1248: ELSE
1249: cn_utils.append(code, '(' || c.data_length || ') ');
1250: END IF;
1251: END IF;
1252: IF (c.primary_key = 'Y') THEN
1253: cn_utils.append(code, ' PRIMARY KEY');

Line 1253: cn_utils.append(code, ' PRIMARY KEY');

1249: cn_utils.append(code, '(' || c.data_length || ') ');
1250: END IF;
1251: END IF;
1252: IF (c.primary_key = 'Y') THEN
1253: cn_utils.append(code, ' PRIMARY KEY');
1254: END IF;
1255: IF (c.nullable = 'N') THEN
1256: cn_utils.appendcr(code, ' NOT NULL,');
1257: ELSE

Line 1256: cn_utils.appendcr(code, ' NOT NULL,');

1252: IF (c.primary_key = 'Y') THEN
1253: cn_utils.append(code, ' PRIMARY KEY');
1254: END IF;
1255: IF (c.nullable = 'N') THEN
1256: cn_utils.appendcr(code, ' NOT NULL,');
1257: ELSE
1258: cn_utils.appendcr(code, ' NULL,');
1259: END IF;
1260: END LOOP;

Line 1258: cn_utils.appendcr(code, ' NULL,');

1254: END IF;
1255: IF (c.nullable = 'N') THEN
1256: cn_utils.appendcr(code, ' NOT NULL,');
1257: ELSE
1258: cn_utils.appendcr(code, ' NULL,');
1259: END IF;
1260: END LOOP;
1261: IF (SQL%FOUND) THEN
1262: strip(code, 2); -- remove trailing comma

Line 1264: cn_utils.appendcr(code, ')');

1260: END LOOP;
1261: IF (SQL%FOUND) THEN
1262: strip(code, 2); -- remove trailing comma
1263: END IF;
1264: cn_utils.appendcr(code, ')');
1265:
1266: -- Note: How does one get storage parameters for the table?
1267: cn_debug.print_msg('gen_create_table<<', 1);
1268: END gen_create_table;

Line 1281: code IN OUT NOCOPY cn_utils.code_type) IS

1277: -- 02-FEB-94 Devesh Khatu Created
1278: --+
1279: PROCEDURE gen_create_index (
1280: X_index_id cn_obj_indexes_v.index_id%TYPE,
1281: code IN OUT NOCOPY cn_utils.code_type) IS
1282:
1283: CURSOR index_columns IS
1284: SELECT cocv.name column_name
1285: FROM cn_obj_columns_v cocv, cn_column_ind_maps ccim

Line 1301: cn_utils.init_code( X_index_id, code);

1297: FROM cn_obj_indexes_v coiv, cn_obj_tables_v cotv
1298: WHERE cotv.table_id = coiv.table_id
1299: AND coiv.index_id = X_index_id;
1300:
1301: cn_utils.init_code( X_index_id, code);
1302: cn_utils.appind(code, 'CREATE ');
1303: IF (X_unique_flag = 'Y') THEN
1304: cn_utils.appind(code, 'UNIQUE ');
1305: END IF;

Line 1302: cn_utils.appind(code, 'CREATE ');

1298: WHERE cotv.table_id = coiv.table_id
1299: AND coiv.index_id = X_index_id;
1300:
1301: cn_utils.init_code( X_index_id, code);
1302: cn_utils.appind(code, 'CREATE ');
1303: IF (X_unique_flag = 'Y') THEN
1304: cn_utils.appind(code, 'UNIQUE ');
1305: END IF;
1306: cn_utils.appindcr(code, 'INDEX ' || LOWER(X_name) || ' ON ' || LOWER(X_table_name) || '(');

Line 1304: cn_utils.appind(code, 'UNIQUE ');

1300:
1301: cn_utils.init_code( X_index_id, code);
1302: cn_utils.appind(code, 'CREATE ');
1303: IF (X_unique_flag = 'Y') THEN
1304: cn_utils.appind(code, 'UNIQUE ');
1305: END IF;
1306: cn_utils.appindcr(code, 'INDEX ' || LOWER(X_name) || ' ON ' || LOWER(X_table_name) || '(');
1307: FOR ic IN index_columns LOOP
1308: cn_utils.appindcr(code, LOWER(ic.column_name) || ',');

Line 1306: cn_utils.appindcr(code, 'INDEX ' || LOWER(X_name) || ' ON ' || LOWER(X_table_name) || '(');

1302: cn_utils.appind(code, 'CREATE ');
1303: IF (X_unique_flag = 'Y') THEN
1304: cn_utils.appind(code, 'UNIQUE ');
1305: END IF;
1306: cn_utils.appindcr(code, 'INDEX ' || LOWER(X_name) || ' ON ' || LOWER(X_table_name) || '(');
1307: FOR ic IN index_columns LOOP
1308: cn_utils.appindcr(code, LOWER(ic.column_name) || ',');
1309: END LOOP;
1310: cn_utils.strip(code, 2); -- remove trailing comma

Line 1308: cn_utils.appindcr(code, LOWER(ic.column_name) || ',');

1304: cn_utils.appind(code, 'UNIQUE ');
1305: END IF;
1306: cn_utils.appindcr(code, 'INDEX ' || LOWER(X_name) || ' ON ' || LOWER(X_table_name) || '(');
1307: FOR ic IN index_columns LOOP
1308: cn_utils.appindcr(code, LOWER(ic.column_name) || ',');
1309: END LOOP;
1310: cn_utils.strip(code, 2); -- remove trailing comma
1311: cn_utils.appindcr(code, ')');
1312: -- Shouldn't the next statement be customizable? -- Devesh

Line 1310: cn_utils.strip(code, 2); -- remove trailing comma

1306: cn_utils.appindcr(code, 'INDEX ' || LOWER(X_name) || ' ON ' || LOWER(X_table_name) || '(');
1307: FOR ic IN index_columns LOOP
1308: cn_utils.appindcr(code, LOWER(ic.column_name) || ',');
1309: END LOOP;
1310: cn_utils.strip(code, 2); -- remove trailing comma
1311: cn_utils.appindcr(code, ')');
1312: -- Shouldn't the next statement be customizable? -- Devesh
1313: cn_utils.appindcr(code, 'PCTFREE 10');
1314:

Line 1311: cn_utils.appindcr(code, ')');

1307: FOR ic IN index_columns LOOP
1308: cn_utils.appindcr(code, LOWER(ic.column_name) || ',');
1309: END LOOP;
1310: cn_utils.strip(code, 2); -- remove trailing comma
1311: cn_utils.appindcr(code, ')');
1312: -- Shouldn't the next statement be customizable? -- Devesh
1313: cn_utils.appindcr(code, 'PCTFREE 10');
1314:
1315: cn_debug.print_msg('gen_create_index<<', 1);

Line 1313: cn_utils.appindcr(code, 'PCTFREE 10');

1309: END LOOP;
1310: cn_utils.strip(code, 2); -- remove trailing comma
1311: cn_utils.appindcr(code, ')');
1312: -- Shouldn't the next statement be customizable? -- Devesh
1313: cn_utils.appindcr(code, 'PCTFREE 10');
1314:
1315: cn_debug.print_msg('gen_create_index<<', 1);
1316: END gen_create_index;
1317:

Line 1329: code IN OUT NOCOPY cn_utils.code_type) IS

1325: -- 02-FEB-94 Devesh Khatu Created
1326: --+
1327: PROCEDURE gen_create_sequence (
1328: X_sequence_id cn_obj_sequences_v.sequence_id%TYPE,
1329: code IN OUT NOCOPY cn_utils.code_type) IS
1330: X_name cn_obj_sequences_v.name%TYPE;
1331: X_start_value cn_obj_sequences_v.start_value%TYPE;
1332: X_increment_value cn_obj_sequences_v.increment_value%TYPE;
1333: BEGIN

Line 1341: cn_utils.init_code( X_sequence_id, code);

1337: INTO X_name, X_start_value, X_increment_value
1338: FROM cn_obj_sequences_v cosv
1339: WHERE cosv.sequence_id = X_sequence_id;
1340:
1341: cn_utils.init_code( X_sequence_id, code);
1342: cn_utils.appindcr(code, 'CREATE SEQUENCE ' || LOWER(X_name));
1343: cn_utils.indent(code, 1);
1344:
1345: IF (X_increment_value IS NOT NULL) THEN

Line 1342: cn_utils.appindcr(code, 'CREATE SEQUENCE ' || LOWER(X_name));

1338: FROM cn_obj_sequences_v cosv
1339: WHERE cosv.sequence_id = X_sequence_id;
1340:
1341: cn_utils.init_code( X_sequence_id, code);
1342: cn_utils.appindcr(code, 'CREATE SEQUENCE ' || LOWER(X_name));
1343: cn_utils.indent(code, 1);
1344:
1345: IF (X_increment_value IS NOT NULL) THEN
1346: cn_utils.appindcr(code, 'INCREMENT BY ' || X_increment_value);

Line 1343: cn_utils.indent(code, 1);

1339: WHERE cosv.sequence_id = X_sequence_id;
1340:
1341: cn_utils.init_code( X_sequence_id, code);
1342: cn_utils.appindcr(code, 'CREATE SEQUENCE ' || LOWER(X_name));
1343: cn_utils.indent(code, 1);
1344:
1345: IF (X_increment_value IS NOT NULL) THEN
1346: cn_utils.appindcr(code, 'INCREMENT BY ' || X_increment_value);
1347: END IF;

Line 1346: cn_utils.appindcr(code, 'INCREMENT BY ' || X_increment_value);

1342: cn_utils.appindcr(code, 'CREATE SEQUENCE ' || LOWER(X_name));
1343: cn_utils.indent(code, 1);
1344:
1345: IF (X_increment_value IS NOT NULL) THEN
1346: cn_utils.appindcr(code, 'INCREMENT BY ' || X_increment_value);
1347: END IF;
1348: IF (X_start_value IS NOT NULL) THEN
1349: cn_utils.appindcr(code, 'START WITH ' || X_start_value);
1350: END IF;

Line 1349: cn_utils.appindcr(code, 'START WITH ' || X_start_value);

1345: IF (X_increment_value IS NOT NULL) THEN
1346: cn_utils.appindcr(code, 'INCREMENT BY ' || X_increment_value);
1347: END IF;
1348: IF (X_start_value IS NOT NULL) THEN
1349: cn_utils.appindcr(code, 'START WITH ' || X_start_value);
1350: END IF;
1351:
1352: cn_utils.appindcr(code, 'NOMINVALUE');
1353: cn_utils.appindcr(code, 'NOMAXVALUE');

Line 1352: cn_utils.appindcr(code, 'NOMINVALUE');

1348: IF (X_start_value IS NOT NULL) THEN
1349: cn_utils.appindcr(code, 'START WITH ' || X_start_value);
1350: END IF;
1351:
1352: cn_utils.appindcr(code, 'NOMINVALUE');
1353: cn_utils.appindcr(code, 'NOMAXVALUE');
1354: cn_utils.appindcr(code, 'NOCYCLE');
1355: cn_utils.appindcr(code, 'CACHE 20');
1356: cn_utils.appindcr(code, 'NOORDER');

Line 1353: cn_utils.appindcr(code, 'NOMAXVALUE');

1349: cn_utils.appindcr(code, 'START WITH ' || X_start_value);
1350: END IF;
1351:
1352: cn_utils.appindcr(code, 'NOMINVALUE');
1353: cn_utils.appindcr(code, 'NOMAXVALUE');
1354: cn_utils.appindcr(code, 'NOCYCLE');
1355: cn_utils.appindcr(code, 'CACHE 20');
1356: cn_utils.appindcr(code, 'NOORDER');
1357: cn_utils.unindent(code, 1);

Line 1354: cn_utils.appindcr(code, 'NOCYCLE');

1350: END IF;
1351:
1352: cn_utils.appindcr(code, 'NOMINVALUE');
1353: cn_utils.appindcr(code, 'NOMAXVALUE');
1354: cn_utils.appindcr(code, 'NOCYCLE');
1355: cn_utils.appindcr(code, 'CACHE 20');
1356: cn_utils.appindcr(code, 'NOORDER');
1357: cn_utils.unindent(code, 1);
1358:

Line 1355: cn_utils.appindcr(code, 'CACHE 20');

1351:
1352: cn_utils.appindcr(code, 'NOMINVALUE');
1353: cn_utils.appindcr(code, 'NOMAXVALUE');
1354: cn_utils.appindcr(code, 'NOCYCLE');
1355: cn_utils.appindcr(code, 'CACHE 20');
1356: cn_utils.appindcr(code, 'NOORDER');
1357: cn_utils.unindent(code, 1);
1358:
1359: cn_debug.print_msg('gen_create_sequence<<', 1);

Line 1356: cn_utils.appindcr(code, 'NOORDER');

1352: cn_utils.appindcr(code, 'NOMINVALUE');
1353: cn_utils.appindcr(code, 'NOMAXVALUE');
1354: cn_utils.appindcr(code, 'NOCYCLE');
1355: cn_utils.appindcr(code, 'CACHE 20');
1356: cn_utils.appindcr(code, 'NOORDER');
1357: cn_utils.unindent(code, 1);
1358:
1359: cn_debug.print_msg('gen_create_sequence<<', 1);
1360: END gen_create_sequence;

Line 1357: cn_utils.unindent(code, 1);

1353: cn_utils.appindcr(code, 'NOMAXVALUE');
1354: cn_utils.appindcr(code, 'NOCYCLE');
1355: cn_utils.appindcr(code, 'CACHE 20');
1356: cn_utils.appindcr(code, 'NOORDER');
1357: cn_utils.unindent(code, 1);
1358:
1359: cn_debug.print_msg('gen_create_sequence<<', 1);
1360: END gen_create_sequence;
1361:

Line 1373: code IN OUT NOCOPY cn_utils.code_type) IS

1369: -- 11-JUN-94 Devesh Khatu Created
1370: --+
1371: PROCEDURE gen_create_dblink (
1372: X_dblink_id cn_obj_dblinks_v.dblink_id%TYPE,
1373: code IN OUT NOCOPY cn_utils.code_type) IS
1374: X_name cn_obj_dblinks_v.name%TYPE;
1375: X_connect_to_username cn_obj_dblinks_v.connect_to_username%TYPE;
1376: X_connect_to_password cn_obj_dblinks_v.connect_to_password%TYPE;
1377: X_connect_to_host cn_obj_dblinks_v.connect_to_host%TYPE;

Line 1386: cn_utils.init_code( X_dblink_id, code);

1382: INTO X_name, X_connect_to_username, X_connect_to_password, X_connect_to_host
1383: FROM cn_obj_dblinks_v codv
1384: WHERE codv.dblink_id = X_dblink_id;
1385:
1386: cn_utils.init_code( X_dblink_id, code);
1387: cn_utils.appindcr(code, 'CREATE DATABASE LINK ' || LOWER(X_name));
1388: cn_utils.indent(code, 1);
1389: cn_utils.appind(code, 'CONNECT TO ' || LOWER(X_connect_to_username));
1390: cn_utils.appendcr(code, ' IDENTIFIED BY ' || LOWER(X_connect_to_password));

Line 1387: cn_utils.appindcr(code, 'CREATE DATABASE LINK ' || LOWER(X_name));

1383: FROM cn_obj_dblinks_v codv
1384: WHERE codv.dblink_id = X_dblink_id;
1385:
1386: cn_utils.init_code( X_dblink_id, code);
1387: cn_utils.appindcr(code, 'CREATE DATABASE LINK ' || LOWER(X_name));
1388: cn_utils.indent(code, 1);
1389: cn_utils.appind(code, 'CONNECT TO ' || LOWER(X_connect_to_username));
1390: cn_utils.appendcr(code, ' IDENTIFIED BY ' || LOWER(X_connect_to_password));
1391: cn_utils.appindcr(code, 'USING ''' || LOWER(X_connect_to_host) || '''');

Line 1388: cn_utils.indent(code, 1);

1384: WHERE codv.dblink_id = X_dblink_id;
1385:
1386: cn_utils.init_code( X_dblink_id, code);
1387: cn_utils.appindcr(code, 'CREATE DATABASE LINK ' || LOWER(X_name));
1388: cn_utils.indent(code, 1);
1389: cn_utils.appind(code, 'CONNECT TO ' || LOWER(X_connect_to_username));
1390: cn_utils.appendcr(code, ' IDENTIFIED BY ' || LOWER(X_connect_to_password));
1391: cn_utils.appindcr(code, 'USING ''' || LOWER(X_connect_to_host) || '''');
1392: cn_utils.unindent(code, 1);

Line 1389: cn_utils.appind(code, 'CONNECT TO ' || LOWER(X_connect_to_username));

1385:
1386: cn_utils.init_code( X_dblink_id, code);
1387: cn_utils.appindcr(code, 'CREATE DATABASE LINK ' || LOWER(X_name));
1388: cn_utils.indent(code, 1);
1389: cn_utils.appind(code, 'CONNECT TO ' || LOWER(X_connect_to_username));
1390: cn_utils.appendcr(code, ' IDENTIFIED BY ' || LOWER(X_connect_to_password));
1391: cn_utils.appindcr(code, 'USING ''' || LOWER(X_connect_to_host) || '''');
1392: cn_utils.unindent(code, 1);
1393:

Line 1390: cn_utils.appendcr(code, ' IDENTIFIED BY ' || LOWER(X_connect_to_password));

1386: cn_utils.init_code( X_dblink_id, code);
1387: cn_utils.appindcr(code, 'CREATE DATABASE LINK ' || LOWER(X_name));
1388: cn_utils.indent(code, 1);
1389: cn_utils.appind(code, 'CONNECT TO ' || LOWER(X_connect_to_username));
1390: cn_utils.appendcr(code, ' IDENTIFIED BY ' || LOWER(X_connect_to_password));
1391: cn_utils.appindcr(code, 'USING ''' || LOWER(X_connect_to_host) || '''');
1392: cn_utils.unindent(code, 1);
1393:
1394: cn_debug.print_msg('gen_create_dblink<<', 1);

Line 1391: cn_utils.appindcr(code, 'USING ''' || LOWER(X_connect_to_host) || '''');

1387: cn_utils.appindcr(code, 'CREATE DATABASE LINK ' || LOWER(X_name));
1388: cn_utils.indent(code, 1);
1389: cn_utils.appind(code, 'CONNECT TO ' || LOWER(X_connect_to_username));
1390: cn_utils.appendcr(code, ' IDENTIFIED BY ' || LOWER(X_connect_to_password));
1391: cn_utils.appindcr(code, 'USING ''' || LOWER(X_connect_to_host) || '''');
1392: cn_utils.unindent(code, 1);
1393:
1394: cn_debug.print_msg('gen_create_dblink<<', 1);
1395: END gen_create_dblink;

Line 1392: cn_utils.unindent(code, 1);

1388: cn_utils.indent(code, 1);
1389: cn_utils.appind(code, 'CONNECT TO ' || LOWER(X_connect_to_username));
1390: cn_utils.appendcr(code, ' IDENTIFIED BY ' || LOWER(X_connect_to_password));
1391: cn_utils.appindcr(code, 'USING ''' || LOWER(X_connect_to_host) || '''');
1392: cn_utils.unindent(code, 1);
1393:
1394: cn_debug.print_msg('gen_create_dblink<<', 1);
1395: END gen_create_dblink;
1396:

Line 1408: code IN OUT NOCOPY cn_utils.code_type) IS

1404: -- 18-NOV-93 Devesh Khatu Created
1405: --+
1406: PROCEDURE gen_create_subprogram (
1407: X_object_id cn_objects.object_id%TYPE,
1408: code IN OUT NOCOPY cn_utils.code_type) IS
1409:
1410: X_statement_text cn_obj_packages_v.statement_text%TYPE;
1411: BEGIN
1412: cn_debug.print_msg('gen_create_subprogram>>', 1);

Line 1419: cn_utils.init_code( X_object_id, code);

1415: INTO X_statement_text
1416: FROM cn_objects co
1417: WHERE co.object_id = X_object_id;
1418:
1419: cn_utils.init_code( X_object_id, code);
1420: cn_utils.appendcr(code, 'CREATE OR REPLACE ' || X_statement_text);
1421:
1422: cn_debug.print_msg('gen_create_subprogram<<', 1);
1423: END gen_create_subprogram;

Line 1420: cn_utils.appendcr(code, 'CREATE OR REPLACE ' || X_statement_text);

1416: FROM cn_objects co
1417: WHERE co.object_id = X_object_id;
1418:
1419: cn_utils.init_code( X_object_id, code);
1420: cn_utils.appendcr(code, 'CREATE OR REPLACE ' || X_statement_text);
1421:
1422: cn_debug.print_msg('gen_create_subprogram<<', 1);
1423: END gen_create_subprogram;
1424:

Line 1438: code IN OUT NOCOPY cn_utils.code_type) IS

1434: --+
1435: PROCEDURE gen_create_package (
1436: X_object_id cn_objects.object_id%TYPE,
1437: dump_to_file VARCHAR2,
1438: code IN OUT NOCOPY cn_utils.code_type) IS
1439:
1440: X_statement_text cn_obj_packages_v.statement_text%TYPE;
1441: X_object_type cn_obj_packages_v.object_type%TYPE;
1442: X_name cn_obj_packages_v.name%TYPE;

Line 1453: cn_utils.init_code( X_object_id, code);

1449: INTO X_statement_text, X_object_type, X_name, X_description
1450: FROM cn_objects co
1451: WHERE co.object_id = X_object_id;
1452:
1453: cn_utils.init_code( X_object_id, code);
1454:
1455: IF (dump_to_file = 'N') THEN
1456: IF (X_object_type = 'PKS') THEN
1457: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE ' || LOWER(X_name) || ' AS');

Line 1457: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE ' || LOWER(X_name) || ' AS');

1453: cn_utils.init_code( X_object_id, code);
1454:
1455: IF (dump_to_file = 'N') THEN
1456: IF (X_object_type = 'PKS') THEN
1457: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE ' || LOWER(X_name) || ' AS');
1458: ELSE
1459: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE BODY ' || LOWER(X_name) || ' AS');
1460: END IF;
1461:

Line 1459: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE BODY ' || LOWER(X_name) || ' AS');

1455: IF (dump_to_file = 'N') THEN
1456: IF (X_object_type = 'PKS') THEN
1457: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE ' || LOWER(X_name) || ' AS');
1458: ELSE
1459: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE BODY ' || LOWER(X_name) || ' AS');
1460: END IF;
1461:
1462: cn_utils.appendcr(code, X_statement_text);
1463: cn_utils.appendcr(code, 'END ' || LOWER(X_name) || ';');

Line 1462: cn_utils.appendcr(code, X_statement_text);

1458: ELSE
1459: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE BODY ' || LOWER(X_name) || ' AS');
1460: END IF;
1461:
1462: cn_utils.appendcr(code, X_statement_text);
1463: cn_utils.appendcr(code, 'END ' || LOWER(X_name) || ';');
1464:
1465: ELSIF (dump_to_file = 'Y') THEN
1466: cn_utils.pkg_init_boilerplate(code, X_name, X_description, X_object_type);

Line 1463: cn_utils.appendcr(code, 'END ' || LOWER(X_name) || ';');

1459: cn_utils.appendcr(code, 'CREATE OR REPLACE PACKAGE BODY ' || LOWER(X_name) || ' AS');
1460: END IF;
1461:
1462: cn_utils.appendcr(code, X_statement_text);
1463: cn_utils.appendcr(code, 'END ' || LOWER(X_name) || ';');
1464:
1465: ELSIF (dump_to_file = 'Y') THEN
1466: cn_utils.pkg_init_boilerplate(code, X_name, X_description, X_object_type);
1467: cn_utils.appendcr(code, X_statement_text);

Line 1466: cn_utils.pkg_init_boilerplate(code, X_name, X_description, X_object_type);

1462: cn_utils.appendcr(code, X_statement_text);
1463: cn_utils.appendcr(code, 'END ' || LOWER(X_name) || ';');
1464:
1465: ELSIF (dump_to_file = 'Y') THEN
1466: cn_utils.pkg_init_boilerplate(code, X_name, X_description, X_object_type);
1467: cn_utils.appendcr(code, X_statement_text);
1468: cn_utils.pkg_end_boilerplate(code, X_object_type);
1469: END IF;
1470:

Line 1467: cn_utils.appendcr(code, X_statement_text);

1463: cn_utils.appendcr(code, 'END ' || LOWER(X_name) || ';');
1464:
1465: ELSIF (dump_to_file = 'Y') THEN
1466: cn_utils.pkg_init_boilerplate(code, X_name, X_description, X_object_type);
1467: cn_utils.appendcr(code, X_statement_text);
1468: cn_utils.pkg_end_boilerplate(code, X_object_type);
1469: END IF;
1470:
1471: cn_debug.print_msg('gen_create_package<<', 1);

Line 1468: cn_utils.pkg_end_boilerplate(code, X_object_type);

1464:
1465: ELSIF (dump_to_file = 'Y') THEN
1466: cn_utils.pkg_init_boilerplate(code, X_name, X_description, X_object_type);
1467: cn_utils.appendcr(code, X_statement_text);
1468: cn_utils.pkg_end_boilerplate(code, X_object_type);
1469: END IF;
1470:
1471: cn_debug.print_msg('gen_create_package<<', 1);
1472: END gen_create_package;

Line 1485: code IN OUT NOCOPY cn_utils.code_type) IS

1481: -- 14-DEC-93 Devesh Khatu Created
1482: --+
1483: PROCEDURE gen_create_trigger (
1484: X_trigger_id cn_obj_triggers_v.trigger_id%TYPE,
1485: code IN OUT NOCOPY cn_utils.code_type) IS
1486:
1487: row cn_obj_triggers_v%ROWTYPE;
1488: table_name cn_obj_tables_v.name%TYPE;
1489:

Line 1498: cn_utils.init_code( X_trigger_id, code);

1494: AND cctm.trigger_id = X_trigger_id;
1495:
1496: BEGIN
1497: cn_debug.print_msg('gen_create_trigger>>', 1);
1498: cn_utils.init_code( X_trigger_id, code);
1499:
1500: row.trigger_id := X_trigger_id;
1501: cn_obj_triggers_v_pkg.select_row(row);
1502: cn_utils.appendcr(code, 'CREATE OR REPLACE TRIGGER ' || LOWER(row.name));

Line 1502: cn_utils.appendcr(code, 'CREATE OR REPLACE TRIGGER ' || LOWER(row.name));

1498: cn_utils.init_code( X_trigger_id, code);
1499:
1500: row.trigger_id := X_trigger_id;
1501: cn_obj_triggers_v_pkg.select_row(row);
1502: cn_utils.appendcr(code, 'CREATE OR REPLACE TRIGGER ' || LOWER(row.name));
1503: cn_utils.append(code, 'AFTER ');
1504:
1505: IF (row.triggering_event = 'I') THEN
1506: cn_utils.append(code, 'INSERT OF ');

Line 1503: cn_utils.append(code, 'AFTER ');

1499:
1500: row.trigger_id := X_trigger_id;
1501: cn_obj_triggers_v_pkg.select_row(row);
1502: cn_utils.appendcr(code, 'CREATE OR REPLACE TRIGGER ' || LOWER(row.name));
1503: cn_utils.append(code, 'AFTER ');
1504:
1505: IF (row.triggering_event = 'I') THEN
1506: cn_utils.append(code, 'INSERT OF ');
1507: ELSIF (row.triggering_event = 'U') THEN

Line 1506: cn_utils.append(code, 'INSERT OF ');

1502: cn_utils.appendcr(code, 'CREATE OR REPLACE TRIGGER ' || LOWER(row.name));
1503: cn_utils.append(code, 'AFTER ');
1504:
1505: IF (row.triggering_event = 'I') THEN
1506: cn_utils.append(code, 'INSERT OF ');
1507: ELSIF (row.triggering_event = 'U') THEN
1508: cn_utils.append(code, 'UPDATE OF ');
1509: ELSIF (row.triggering_event = 'D') THEN
1510: cn_utils.append(code, 'DELETE OF ');

Line 1508: cn_utils.append(code, 'UPDATE OF ');

1504:
1505: IF (row.triggering_event = 'I') THEN
1506: cn_utils.append(code, 'INSERT OF ');
1507: ELSIF (row.triggering_event = 'U') THEN
1508: cn_utils.append(code, 'UPDATE OF ');
1509: ELSIF (row.triggering_event = 'D') THEN
1510: cn_utils.append(code, 'DELETE OF ');
1511: END IF;
1512:

Line 1510: cn_utils.append(code, 'DELETE OF ');

1506: cn_utils.append(code, 'INSERT OF ');
1507: ELSIF (row.triggering_event = 'U') THEN
1508: cn_utils.append(code, 'UPDATE OF ');
1509: ELSIF (row.triggering_event = 'D') THEN
1510: cn_utils.append(code, 'DELETE OF ');
1511: END IF;
1512:
1513: FOR tc IN triggering_columns LOOP
1514: cn_utils.append(code, tc.name || ', ');

Line 1514: cn_utils.append(code, tc.name || ', ');

1510: cn_utils.append(code, 'DELETE OF ');
1511: END IF;
1512:
1513: FOR tc IN triggering_columns LOOP
1514: cn_utils.append(code, tc.name || ', ');
1515: END LOOP;
1516:
1517: strip(code, 2); -- remove trailing comma
1518: cn_utils.append(code, ' ON ');

Line 1518: cn_utils.append(code, ' ON ');

1514: cn_utils.append(code, tc.name || ', ');
1515: END LOOP;
1516:
1517: strip(code, 2); -- remove trailing comma
1518: cn_utils.append(code, ' ON ');
1519:
1520: SELECT name INTO table_name
1521: FROM cn_obj_tables_v
1522: WHERE table_id = row.table_id;

Line 1524: cn_utils.appendcr(code, LOWER(table_name));

1520: SELECT name INTO table_name
1521: FROM cn_obj_tables_v
1522: WHERE table_id = row.table_id;
1523:
1524: cn_utils.appendcr(code, LOWER(table_name));
1525: cn_utils.appendcr(code, 'FOR EACH ROW');
1526:
1527: IF (row.when_clause IS NOT NULL) THEN
1528: cn_utils.appendcr(code, 'WHEN ' || row.when_clause);

Line 1525: cn_utils.appendcr(code, 'FOR EACH ROW');

1521: FROM cn_obj_tables_v
1522: WHERE table_id = row.table_id;
1523:
1524: cn_utils.appendcr(code, LOWER(table_name));
1525: cn_utils.appendcr(code, 'FOR EACH ROW');
1526:
1527: IF (row.when_clause IS NOT NULL) THEN
1528: cn_utils.appendcr(code, 'WHEN ' || row.when_clause);
1529: END IF;

Line 1528: cn_utils.appendcr(code, 'WHEN ' || row.when_clause);

1524: cn_utils.appendcr(code, LOWER(table_name));
1525: cn_utils.appendcr(code, 'FOR EACH ROW');
1526:
1527: IF (row.when_clause IS NOT NULL) THEN
1528: cn_utils.appendcr(code, 'WHEN ' || row.when_clause);
1529: END IF;
1530:
1531: cn_utils.appendcr(code, row.statement_text);
1532: cn_debug.print_msg('gen_create_trigger<<', 1);

Line 1531: cn_utils.appendcr(code, row.statement_text);

1527: IF (row.when_clause IS NOT NULL) THEN
1528: cn_utils.appendcr(code, 'WHEN ' || row.when_clause);
1529: END IF;
1530:
1531: cn_utils.appendcr(code, row.statement_text);
1532: cn_debug.print_msg('gen_create_trigger<<', 1);
1533: END gen_create_trigger;
1534:
1535:

Line 1541: code cn_utils.code_type;

1537: X_object_id cn_objects.object_id%TYPE,
1538: dump_to_file VARCHAR2,
1539: code_text IN OUT NOCOPY VARCHAR2) IS
1540:
1541: code cn_utils.code_type;
1542: X_object_type cn_objects.object_type%TYPE;
1543:
1544: BEGIN
1545: cn_debug.print_msg('gen_instantiation_code>>', 1);

Line 1716: END cn_utils;

1712: WHEN no_data_found THEN
1713: RETURN NULL;
1714: END next_period;
1715:
1716: END cn_utils;