DBA Data[Home] [Help]

APPS.BEN_DM_BUSINESS dependencies on BEN_DM_UTILITY

Line 32: PROCEDURE rule_8_source(r_migration_data IN ben_dm_utility.r_migration_rec,

28: -- ------------------------------------------------------------------------
29:
30:
31: --
32: PROCEDURE rule_8_source(r_migration_data IN ben_dm_utility.r_migration_rec,
33: p_valid IN OUT nocopy VARCHAR2,
34: p_warning IN OUT nocopy VARCHAR2) IS
35: --
36:

Line 54: ben_dm_utility.message('ROUT','entry:ben_dm_business.rule_8_source', 5);

50:
51: BEGIN
52: --
53:
54: ben_dm_utility.message('ROUT','entry:ben_dm_business.rule_8_source', 5);
55: ben_dm_utility.message('PARA','(r_migration_data - record)' ||
56: '(p_valid - ' || p_valid ||
57: ')(p_warning - ' || p_warning || ')', 10);
58:

Line 55: ben_dm_utility.message('PARA','(r_migration_data - record)' ||

51: BEGIN
52: --
53:
54: ben_dm_utility.message('ROUT','entry:ben_dm_business.rule_8_source', 5);
55: ben_dm_utility.message('PARA','(r_migration_data - record)' ||
56: '(p_valid - ' || p_valid ||
57: ')(p_warning - ' || p_warning || ')', 10);
58:
59: ben_dm_utility.message('INFO','req id '||fnd_global.conc_request_id, 5);

Line 59: ben_dm_utility.message('INFO','req id '||fnd_global.conc_request_id, 5);

55: ben_dm_utility.message('PARA','(r_migration_data - record)' ||
56: '(p_valid - ' || p_valid ||
57: ')(p_warning - ' || p_warning || ')', 10);
58:
59: ben_dm_utility.message('INFO','req id '||fnd_global.conc_request_id, 5);
60:
61: open c_req_stat;
62: fetch c_req_stat into l_dummy;
63: if c_req_stat%found then

Line 65: ben_dm_utility.message('INFO','Business rule 8 broken - ' ||

61: open c_req_stat;
62: fetch c_req_stat into l_dummy;
63: if c_req_stat%found then
64: p_valid := 'E';
65: ben_dm_utility.message('INFO','Business rule 8 broken - ' ||
66: r_migration_data.database_location ||
67: ' - Only one migration can proceed at any one' ||
68: ' time. Only one migration at any one time may' ||
69: ' have a status of S - Started, NS - Not Started' ||

Line 89: ben_dm_utility.message('INFO','Validated rule 8', 215);

85: end if;
86: close c_req_stat;
87:
88:
89: ben_dm_utility.message('INFO','Validated rule 8', 215);
90: ben_dm_utility.message('SUMM','Validated rule 8', 220);
91: ben_dm_utility.message('ROUT','exit:ben_dm_business.rule_8_source', 225);
92: ben_dm_utility.message('PARA','(p_valid - ' || p_valid ||
93: ')(p_warning - ' || p_warning || ')', 230);

Line 90: ben_dm_utility.message('SUMM','Validated rule 8', 220);

86: close c_req_stat;
87:
88:
89: ben_dm_utility.message('INFO','Validated rule 8', 215);
90: ben_dm_utility.message('SUMM','Validated rule 8', 220);
91: ben_dm_utility.message('ROUT','exit:ben_dm_business.rule_8_source', 225);
92: ben_dm_utility.message('PARA','(p_valid - ' || p_valid ||
93: ')(p_warning - ' || p_warning || ')', 230);
94:

Line 91: ben_dm_utility.message('ROUT','exit:ben_dm_business.rule_8_source', 225);

87:
88:
89: ben_dm_utility.message('INFO','Validated rule 8', 215);
90: ben_dm_utility.message('SUMM','Validated rule 8', 220);
91: ben_dm_utility.message('ROUT','exit:ben_dm_business.rule_8_source', 225);
92: ben_dm_utility.message('PARA','(p_valid - ' || p_valid ||
93: ')(p_warning - ' || p_warning || ')', 230);
94:
95:

Line 92: ben_dm_utility.message('PARA','(p_valid - ' || p_valid ||

88:
89: ben_dm_utility.message('INFO','Validated rule 8', 215);
90: ben_dm_utility.message('SUMM','Validated rule 8', 220);
91: ben_dm_utility.message('ROUT','exit:ben_dm_business.rule_8_source', 225);
92: ben_dm_utility.message('PARA','(p_valid - ' || p_valid ||
93: ')(p_warning - ' || p_warning || ')', 230);
94:
95:
96: -- error handling

Line 99: ben_dm_utility.error(SQLCODE,'ben_dm_business.rule_8_source',

95:
96: -- error handling
97: EXCEPTION
98: WHEN OTHERS THEN
99: ben_dm_utility.error(SQLCODE,'ben_dm_business.rule_8_source',
100: '(none)','R');
101: RAISE;
102:
103: --

Line 127: PROCEDURE rule_9_source(r_migration_data IN ben_dm_utility.r_migration_rec,

123: -- ------------------------------------------------------------------------
124:
125:
126: --
127: PROCEDURE rule_9_source(r_migration_data IN ben_dm_utility.r_migration_rec,
128: p_valid IN OUT nocopy VARCHAR2,
129: p_warning IN OUT nocopy VARCHAR2) IS
130: --
131:

Line 143: ben_dm_utility.message('ROUT','entry:ben_dm_business.rule_9_source', 5);

139: --
140: BEGIN
141: --
142:
143: ben_dm_utility.message('ROUT','entry:ben_dm_business.rule_9_source', 5);
144: ben_dm_utility.message('PARA','(r_migration_data - record)' ||
145: '(p_valid - ' || p_valid ||
146: ')(p_warning - ' || p_warning || ')', 10);
147:

Line 144: ben_dm_utility.message('PARA','(r_migration_data - record)' ||

140: BEGIN
141: --
142:
143: ben_dm_utility.message('ROUT','entry:ben_dm_business.rule_9_source', 5);
144: ben_dm_utility.message('PARA','(r_migration_data - record)' ||
145: '(p_valid - ' || p_valid ||
146: ')(p_warning - ' || p_warning || ')', 10);
147:
148: OPEN csr_mig_status;

Line 154: ben_dm_utility.message('INFO','Business rule 9 broken - ' ||

150: CLOSE csr_mig_status;
151:
152: IF (l_status NOT IN ('NS', 'E')) THEN
153: p_valid := 'E';
154: ben_dm_utility.message('INFO','Business rule 9 broken - ' ||
155: r_migration_data.database_location ||
156: ' - A migration can only be rerun if it has a status' ||
157: ' of NS - Not Started or E - Error.', 45);
158: END IF;

Line 161: ben_dm_utility.message('INFO','Validated rule 9', 215);

157: ' of NS - Not Started or E - Error.', 45);
158: END IF;
159:
160:
161: ben_dm_utility.message('INFO','Validated rule 9', 215);
162: ben_dm_utility.message('SUMM','Validated rule 9', 220);
163: ben_dm_utility.message('ROUT','exit:ben_dm_business.rule_9_source', 225);
164: ben_dm_utility.message('PARA','(p_valid - ' || p_valid ||
165: ')(p_warning - ' || p_warning || ')', 230);

Line 162: ben_dm_utility.message('SUMM','Validated rule 9', 220);

158: END IF;
159:
160:
161: ben_dm_utility.message('INFO','Validated rule 9', 215);
162: ben_dm_utility.message('SUMM','Validated rule 9', 220);
163: ben_dm_utility.message('ROUT','exit:ben_dm_business.rule_9_source', 225);
164: ben_dm_utility.message('PARA','(p_valid - ' || p_valid ||
165: ')(p_warning - ' || p_warning || ')', 230);
166:

Line 163: ben_dm_utility.message('ROUT','exit:ben_dm_business.rule_9_source', 225);

159:
160:
161: ben_dm_utility.message('INFO','Validated rule 9', 215);
162: ben_dm_utility.message('SUMM','Validated rule 9', 220);
163: ben_dm_utility.message('ROUT','exit:ben_dm_business.rule_9_source', 225);
164: ben_dm_utility.message('PARA','(p_valid - ' || p_valid ||
165: ')(p_warning - ' || p_warning || ')', 230);
166:
167:

Line 164: ben_dm_utility.message('PARA','(p_valid - ' || p_valid ||

160:
161: ben_dm_utility.message('INFO','Validated rule 9', 215);
162: ben_dm_utility.message('SUMM','Validated rule 9', 220);
163: ben_dm_utility.message('ROUT','exit:ben_dm_business.rule_9_source', 225);
164: ben_dm_utility.message('PARA','(p_valid - ' || p_valid ||
165: ')(p_warning - ' || p_warning || ')', 230);
166:
167:
168: -- error handling

Line 171: ben_dm_utility.error(SQLCODE,'ben_dm_business.rule_9_source',

167:
168: -- error handling
169: EXCEPTION
170: WHEN OTHERS THEN
171: ben_dm_utility.error(SQLCODE,'ben_dm_business.rule_9_source',
172: '(none)','R');
173: RAISE;
174:
175: --

Line 201: PROCEDURE rule_10_source(r_migration_data IN ben_dm_utility.r_migration_rec,

197: -- ------------------------------------------------------------------------
198:
199:
200: --
201: PROCEDURE rule_10_source(r_migration_data IN ben_dm_utility.r_migration_rec,
202: p_valid IN OUT nocopy VARCHAR2,
203: p_warning IN OUT nocopy VARCHAR2) IS
204: --
205:

Line 224: ben_dm_utility.message('ROUT','entry:ben_dm_business.rule_10_source', 5);

220: --
221: BEGIN
222: --
223:
224: ben_dm_utility.message('ROUT','entry:ben_dm_business.rule_10_source', 5);
225: ben_dm_utility.message('PARA','(r_migration_data - record)' ||
226: '(p_valid - ' || p_valid ||
227: ')(p_warning - ' || p_warning || ')', 10);
228:

Line 225: ben_dm_utility.message('PARA','(r_migration_data - record)' ||

221: BEGIN
222: --
223:
224: ben_dm_utility.message('ROUT','entry:ben_dm_business.rule_10_source', 5);
225: ben_dm_utility.message('PARA','(r_migration_data - record)' ||
226: '(p_valid - ' || p_valid ||
227: ')(p_warning - ' || p_warning || ')', 10);
228:
229: -- check if a slave has errored

Line 243: ben_dm_utility.message('INFO','Business rule 10 broken - ' ||

239: -- this includes any of normal (ie finished sucessfully), error, warning,
240: -- cancelled or terminated.
241: IF ( NOT(l_dev_phase = 'COMPLETE')) THEN
242: p_valid := 'E';
243: ben_dm_utility.message('INFO','Business rule 10 broken - ' ||
244: r_migration_data.database_location ||
245: ' - A migration can only be rerun if all the' ||
246: ' slaves and sub-slaves launched by the' ||
247: ' previous run have either completed or' ||

Line 255: ben_dm_utility.message('INFO','Validated rule 10', 215);

251: END LOOP;
252: CLOSE csr_requests;
253:
254:
255: ben_dm_utility.message('INFO','Validated rule 10', 215);
256: ben_dm_utility.message('SUMM','Validated rule 10', 220);
257: ben_dm_utility.message('ROUT','exit:ben_dm_business.rule_10_source', 225);
258: ben_dm_utility.message('PARA','(p_valid - ' || p_valid ||
259: ')(p_warning - ' || p_warning || ')', 230);

Line 256: ben_dm_utility.message('SUMM','Validated rule 10', 220);

252: CLOSE csr_requests;
253:
254:
255: ben_dm_utility.message('INFO','Validated rule 10', 215);
256: ben_dm_utility.message('SUMM','Validated rule 10', 220);
257: ben_dm_utility.message('ROUT','exit:ben_dm_business.rule_10_source', 225);
258: ben_dm_utility.message('PARA','(p_valid - ' || p_valid ||
259: ')(p_warning - ' || p_warning || ')', 230);
260:

Line 257: ben_dm_utility.message('ROUT','exit:ben_dm_business.rule_10_source', 225);

253:
254:
255: ben_dm_utility.message('INFO','Validated rule 10', 215);
256: ben_dm_utility.message('SUMM','Validated rule 10', 220);
257: ben_dm_utility.message('ROUT','exit:ben_dm_business.rule_10_source', 225);
258: ben_dm_utility.message('PARA','(p_valid - ' || p_valid ||
259: ')(p_warning - ' || p_warning || ')', 230);
260:
261:

Line 258: ben_dm_utility.message('PARA','(p_valid - ' || p_valid ||

254:
255: ben_dm_utility.message('INFO','Validated rule 10', 215);
256: ben_dm_utility.message('SUMM','Validated rule 10', 220);
257: ben_dm_utility.message('ROUT','exit:ben_dm_business.rule_10_source', 225);
258: ben_dm_utility.message('PARA','(p_valid - ' || p_valid ||
259: ')(p_warning - ' || p_warning || ')', 230);
260:
261:
262: -- error handling

Line 265: ben_dm_utility.error(SQLCODE,'ben_dm_business.rule_10_source',

261:
262: -- error handling
263: EXCEPTION
264: WHEN OTHERS THEN
265: ben_dm_utility.error(SQLCODE,'ben_dm_business.rule_10_source',
266: '(none)','R');
267: RAISE;
268:
269: --

Line 299: PROCEDURE rule_7_dest(r_migration_data IN ben_dm_utility.r_migration_rec,

295: -- ------------------------------------------------------------------------
296:
297:
298: --
299: PROCEDURE rule_7_dest(r_migration_data IN ben_dm_utility.r_migration_rec,
300: p_valid IN OUT nocopy VARCHAR2,
301: p_warning IN OUT nocopy VARCHAR2) IS
302: --
303:

Line 322: ben_dm_utility.message('ROUT','entry:ben_dm_business.rule_7_dest', 5);

318: --
319: BEGIN
320: --
321:
322: ben_dm_utility.message('ROUT','entry:ben_dm_business.rule_7_dest', 5);
323: ben_dm_utility.message('PARA','(r_migration_data - record)' ||
324: '(p_valid - ' || p_valid ||
325: ')(p_warning - ' || p_warning || ')', 10);
326:

Line 323: ben_dm_utility.message('PARA','(r_migration_data - record)' ||

319: BEGIN
320: --
321:
322: ben_dm_utility.message('ROUT','entry:ben_dm_business.rule_7_dest', 5);
323: ben_dm_utility.message('PARA','(r_migration_data - record)' ||
324: '(p_valid - ' || p_valid ||
325: ')(p_warning - ' || p_warning || ')', 10);
326:
327: ben_dm_utility.message('INFO','req id '||fnd_global.conc_request_id, 5);

Line 327: ben_dm_utility.message('INFO','req id '||fnd_global.conc_request_id, 5);

323: ben_dm_utility.message('PARA','(r_migration_data - record)' ||
324: '(p_valid - ' || p_valid ||
325: ')(p_warning - ' || p_warning || ')', 10);
326:
327: ben_dm_utility.message('INFO','req id '||fnd_global.conc_request_id, 5);
328:
329: open c_req_stat;
330: fetch c_req_stat into l_dummy;
331: if c_req_stat%found then

Line 333: ben_dm_utility.message('INFO','Business rule 7 broken - ' ||

329: open c_req_stat;
330: fetch c_req_stat into l_dummy;
331: if c_req_stat%found then
332: p_valid := 'E';
333: ben_dm_utility.message('INFO','Business rule 7 broken - ' ||
334: r_migration_data.database_location ||
335: ' - Only one migration can proceed at any one' ||
336: ' time. Only one migration at any one time may' ||
337: ' have a status of S - Started, NS - Not Started' ||

Line 357: ben_dm_utility.message('INFO','Validated rule 7', 215);

353: end if;
354: close c_req_stat;
355:
356:
357: ben_dm_utility.message('INFO','Validated rule 7', 215);
358: ben_dm_utility.message('SUMM','Validated rule 7', 220);
359: ben_dm_utility.message('ROUT','exit:ben_dm_business.rule_7_dest', 225);
360: ben_dm_utility.message('PARA','(p_valid - ' || p_valid ||
361: ')(p_warning - ' || p_warning || ')', 230);

Line 358: ben_dm_utility.message('SUMM','Validated rule 7', 220);

354: close c_req_stat;
355:
356:
357: ben_dm_utility.message('INFO','Validated rule 7', 215);
358: ben_dm_utility.message('SUMM','Validated rule 7', 220);
359: ben_dm_utility.message('ROUT','exit:ben_dm_business.rule_7_dest', 225);
360: ben_dm_utility.message('PARA','(p_valid - ' || p_valid ||
361: ')(p_warning - ' || p_warning || ')', 230);
362:

Line 359: ben_dm_utility.message('ROUT','exit:ben_dm_business.rule_7_dest', 225);

355:
356:
357: ben_dm_utility.message('INFO','Validated rule 7', 215);
358: ben_dm_utility.message('SUMM','Validated rule 7', 220);
359: ben_dm_utility.message('ROUT','exit:ben_dm_business.rule_7_dest', 225);
360: ben_dm_utility.message('PARA','(p_valid - ' || p_valid ||
361: ')(p_warning - ' || p_warning || ')', 230);
362:
363:

Line 360: ben_dm_utility.message('PARA','(p_valid - ' || p_valid ||

356:
357: ben_dm_utility.message('INFO','Validated rule 7', 215);
358: ben_dm_utility.message('SUMM','Validated rule 7', 220);
359: ben_dm_utility.message('ROUT','exit:ben_dm_business.rule_7_dest', 225);
360: ben_dm_utility.message('PARA','(p_valid - ' || p_valid ||
361: ')(p_warning - ' || p_warning || ')', 230);
362:
363:
364: -- error handling

Line 367: ben_dm_utility.error(SQLCODE,'ben_dm_business.rule_7_dest',

363:
364: -- error handling
365: EXCEPTION
366: WHEN OTHERS THEN
367: ben_dm_utility.error(SQLCODE,'ben_dm_business.rule_7_dest',
368: '(none)','R');
369: RAISE;
370:
371: --

Line 402: PROCEDURE rule_8_dest(r_migration_data IN ben_dm_utility.r_migration_rec,

398: -- ------------------------------------------------------------------------
399:
400:
401: --
402: PROCEDURE rule_8_dest(r_migration_data IN ben_dm_utility.r_migration_rec,
403: p_valid IN OUT nocopy VARCHAR2,
404: p_warning IN OUT nocopy VARCHAR2) IS
405: --
406:

Line 418: ben_dm_utility.message('ROUT','entry:ben_dm_business.rule_8_dest', 5);

414: --
415: BEGIN
416: --
417:
418: ben_dm_utility.message('ROUT','entry:ben_dm_business.rule_8_dest', 5);
419: ben_dm_utility.message('PARA','(r_migration_data - record)' ||
420: '(p_valid - ' || p_valid ||
421: ')(p_warning - ' || p_warning || ')', 10);
422:

Line 419: ben_dm_utility.message('PARA','(r_migration_data - record)' ||

415: BEGIN
416: --
417:
418: ben_dm_utility.message('ROUT','entry:ben_dm_business.rule_8_dest', 5);
419: ben_dm_utility.message('PARA','(r_migration_data - record)' ||
420: '(p_valid - ' || p_valid ||
421: ')(p_warning - ' || p_warning || ')', 10);
422:
423: OPEN csr_mig_status;

Line 429: ben_dm_utility.message('INFO','Business rule 8 broken - ' ||

425: CLOSE csr_mig_status;
426:
427: IF (l_status NOT IN ('NS', 'E')) THEN
428: p_valid := 'E';
429: ben_dm_utility.message('INFO','Business rule 8 broken - ' ||
430: r_migration_data.database_location ||
431: ' - A migration can only be rerun if it has a status' ||
432: ' of NS - Not Started or E - Error.', 45);
433: END IF;

Line 435: ben_dm_utility.message('INFO','Validated rule 8', 215);

431: ' - A migration can only be rerun if it has a status' ||
432: ' of NS - Not Started or E - Error.', 45);
433: END IF;
434:
435: ben_dm_utility.message('INFO','Validated rule 8', 215);
436: ben_dm_utility.message('SUMM','Validated rule 8', 220);
437: ben_dm_utility.message('ROUT','exit:ben_dm_business.rule_8_dest', 225);
438: ben_dm_utility.message('PARA','(p_valid - ' || p_valid ||
439: ')(p_warning - ' || p_warning || ')', 230);

Line 436: ben_dm_utility.message('SUMM','Validated rule 8', 220);

432: ' of NS - Not Started or E - Error.', 45);
433: END IF;
434:
435: ben_dm_utility.message('INFO','Validated rule 8', 215);
436: ben_dm_utility.message('SUMM','Validated rule 8', 220);
437: ben_dm_utility.message('ROUT','exit:ben_dm_business.rule_8_dest', 225);
438: ben_dm_utility.message('PARA','(p_valid - ' || p_valid ||
439: ')(p_warning - ' || p_warning || ')', 230);
440:

Line 437: ben_dm_utility.message('ROUT','exit:ben_dm_business.rule_8_dest', 225);

433: END IF;
434:
435: ben_dm_utility.message('INFO','Validated rule 8', 215);
436: ben_dm_utility.message('SUMM','Validated rule 8', 220);
437: ben_dm_utility.message('ROUT','exit:ben_dm_business.rule_8_dest', 225);
438: ben_dm_utility.message('PARA','(p_valid - ' || p_valid ||
439: ')(p_warning - ' || p_warning || ')', 230);
440:
441:

Line 438: ben_dm_utility.message('PARA','(p_valid - ' || p_valid ||

434:
435: ben_dm_utility.message('INFO','Validated rule 8', 215);
436: ben_dm_utility.message('SUMM','Validated rule 8', 220);
437: ben_dm_utility.message('ROUT','exit:ben_dm_business.rule_8_dest', 225);
438: ben_dm_utility.message('PARA','(p_valid - ' || p_valid ||
439: ')(p_warning - ' || p_warning || ')', 230);
440:
441:
442: -- error handling

Line 445: ben_dm_utility.error(SQLCODE,'ben_dm_business.rule_8_dest',

441:
442: -- error handling
443: EXCEPTION
444: WHEN OTHERS THEN
445: ben_dm_utility.error(SQLCODE,'ben_dm_business.rule_8_dest',
446: '(none)','R');
447: RAISE;
448:
449: --

Line 476: PROCEDURE rule_9_dest(r_migration_data IN ben_dm_utility.r_migration_rec,

472: -- ------------------------------------------------------------------------
473:
474:
475: --
476: PROCEDURE rule_9_dest(r_migration_data IN ben_dm_utility.r_migration_rec,
477: p_valid IN OUT nocopy VARCHAR2,
478: p_warning IN OUT nocopy VARCHAR2) IS
479: --
480:

Line 492: ben_dm_utility.message('ROUT','entry:ben_dm_business.rule_9_dest', 5);

488: --
489: BEGIN
490: --
491:
492: ben_dm_utility.message('ROUT','entry:ben_dm_business.rule_9_dest', 5);
493: ben_dm_utility.message('PARA','(r_migration_data - record)' ||
494: '(p_valid - ' || p_valid ||
495: ')(p_warning - ' || p_warning || ')', 9);
496:

Line 493: ben_dm_utility.message('PARA','(r_migration_data - record)' ||

489: BEGIN
490: --
491:
492: ben_dm_utility.message('ROUT','entry:ben_dm_business.rule_9_dest', 5);
493: ben_dm_utility.message('PARA','(r_migration_data - record)' ||
494: '(p_valid - ' || p_valid ||
495: ')(p_warning - ' || p_warning || ')', 9);
496:
497: OPEN csr_mig_status;

Line 503: ben_dm_utility.message('INFO','Business rule 9 broken - ' ||

499: CLOSE csr_mig_status;
500:
501: IF (l_status NOT IN ('NS', 'E')) THEN
502: p_valid := 'E';
503: ben_dm_utility.message('INFO','Business rule 9 broken - ' ||
504: r_migration_data.database_location ||
505: ' - A migration can only be rerun if it has a status' ||
506: ' of NS - Not Started or E - Error.', 45);
507: END IF;

Line 509: ben_dm_utility.message('INFO','Validated rule 9', 215);

505: ' - A migration can only be rerun if it has a status' ||
506: ' of NS - Not Started or E - Error.', 45);
507: END IF;
508:
509: ben_dm_utility.message('INFO','Validated rule 9', 215);
510: ben_dm_utility.message('SUMM','Validated rule 9', 220);
511: ben_dm_utility.message('ROUT','exit:ben_dm_business.rule_9_dest', 225);
512: ben_dm_utility.message('PARA','(p_valid - ' || p_valid ||
513: ')(p_warning - ' || p_warning || ')', 230);

Line 510: ben_dm_utility.message('SUMM','Validated rule 9', 220);

506: ' of NS - Not Started or E - Error.', 45);
507: END IF;
508:
509: ben_dm_utility.message('INFO','Validated rule 9', 215);
510: ben_dm_utility.message('SUMM','Validated rule 9', 220);
511: ben_dm_utility.message('ROUT','exit:ben_dm_business.rule_9_dest', 225);
512: ben_dm_utility.message('PARA','(p_valid - ' || p_valid ||
513: ')(p_warning - ' || p_warning || ')', 230);
514:

Line 511: ben_dm_utility.message('ROUT','exit:ben_dm_business.rule_9_dest', 225);

507: END IF;
508:
509: ben_dm_utility.message('INFO','Validated rule 9', 215);
510: ben_dm_utility.message('SUMM','Validated rule 9', 220);
511: ben_dm_utility.message('ROUT','exit:ben_dm_business.rule_9_dest', 225);
512: ben_dm_utility.message('PARA','(p_valid - ' || p_valid ||
513: ')(p_warning - ' || p_warning || ')', 230);
514:
515:

Line 512: ben_dm_utility.message('PARA','(p_valid - ' || p_valid ||

508:
509: ben_dm_utility.message('INFO','Validated rule 9', 215);
510: ben_dm_utility.message('SUMM','Validated rule 9', 220);
511: ben_dm_utility.message('ROUT','exit:ben_dm_business.rule_9_dest', 225);
512: ben_dm_utility.message('PARA','(p_valid - ' || p_valid ||
513: ')(p_warning - ' || p_warning || ')', 230);
514:
515:
516: -- error handling

Line 519: ben_dm_utility.error(SQLCODE,'ben_dm_business.rule_9_dest',

515:
516: -- error handling
517: EXCEPTION
518: WHEN OTHERS THEN
519: ben_dm_utility.error(SQLCODE,'ben_dm_business.rule_9_dest',
520: '(none)','R');
521: RAISE;
522:
523: --

Line 554: r_migration_data IN ben_dm_utility.r_migration_rec)

550:
551:
552: --
553: FUNCTION last_migration_date(
554: r_migration_data IN ben_dm_utility.r_migration_rec)
555: RETURN DATE IS
556: --
557:
558: l_last_migration_date DATE;

Line 574: ben_dm_utility.message('ROUT','entry:ben_dm_business.last_migration_date', 5);

570: --
571: BEGIN
572: --
573:
574: ben_dm_utility.message('ROUT','entry:ben_dm_business.last_migration_date', 5);
575: ben_dm_utility.message('PARA','(r_migration_data - record)', 10);
576:
577: l_last_migration_date := NULL;
578:

Line 575: ben_dm_utility.message('PARA','(r_migration_data - record)', 10);

571: BEGIN
572: --
573:
574: ben_dm_utility.message('ROUT','entry:ben_dm_business.last_migration_date', 5);
575: ben_dm_utility.message('PARA','(r_migration_data - record)', 10);
576:
577: l_last_migration_date := NULL;
578:
579: -- find the date of last Completed 'C' migration

Line 594: ben_dm_utility.message('INFO','l_last_mig_date - ' || l_last_mig_date, 10);

590: END IF;
591: CLOSE csr_mig_date;
592:
593:
594: ben_dm_utility.message('INFO','l_last_mig_date - ' || l_last_mig_date, 10);
595: ben_dm_utility.message('INFO','l_last_date - ' || l_last_date, 10);
596: ben_dm_utility.message('INFO','Found last migration date', 15);
597: ben_dm_utility.message('SUMM','Found last migration date', 20);
598: ben_dm_utility.message('ROUT','exit:ben_dm_business.last_migration_date', 25);

Line 595: ben_dm_utility.message('INFO','l_last_date - ' || l_last_date, 10);

591: CLOSE csr_mig_date;
592:
593:
594: ben_dm_utility.message('INFO','l_last_mig_date - ' || l_last_mig_date, 10);
595: ben_dm_utility.message('INFO','l_last_date - ' || l_last_date, 10);
596: ben_dm_utility.message('INFO','Found last migration date', 15);
597: ben_dm_utility.message('SUMM','Found last migration date', 20);
598: ben_dm_utility.message('ROUT','exit:ben_dm_business.last_migration_date', 25);
599: ben_dm_utility.message('PARA','(l_last_migration_date - ' ||

Line 596: ben_dm_utility.message('INFO','Found last migration date', 15);

592:
593:
594: ben_dm_utility.message('INFO','l_last_mig_date - ' || l_last_mig_date, 10);
595: ben_dm_utility.message('INFO','l_last_date - ' || l_last_date, 10);
596: ben_dm_utility.message('INFO','Found last migration date', 15);
597: ben_dm_utility.message('SUMM','Found last migration date', 20);
598: ben_dm_utility.message('ROUT','exit:ben_dm_business.last_migration_date', 25);
599: ben_dm_utility.message('PARA','(l_last_migration_date - ' ||
600: l_last_migration_date || ')', 30);

Line 597: ben_dm_utility.message('SUMM','Found last migration date', 20);

593:
594: ben_dm_utility.message('INFO','l_last_mig_date - ' || l_last_mig_date, 10);
595: ben_dm_utility.message('INFO','l_last_date - ' || l_last_date, 10);
596: ben_dm_utility.message('INFO','Found last migration date', 15);
597: ben_dm_utility.message('SUMM','Found last migration date', 20);
598: ben_dm_utility.message('ROUT','exit:ben_dm_business.last_migration_date', 25);
599: ben_dm_utility.message('PARA','(l_last_migration_date - ' ||
600: l_last_migration_date || ')', 30);
601:

Line 598: ben_dm_utility.message('ROUT','exit:ben_dm_business.last_migration_date', 25);

594: ben_dm_utility.message('INFO','l_last_mig_date - ' || l_last_mig_date, 10);
595: ben_dm_utility.message('INFO','l_last_date - ' || l_last_date, 10);
596: ben_dm_utility.message('INFO','Found last migration date', 15);
597: ben_dm_utility.message('SUMM','Found last migration date', 20);
598: ben_dm_utility.message('ROUT','exit:ben_dm_business.last_migration_date', 25);
599: ben_dm_utility.message('PARA','(l_last_migration_date - ' ||
600: l_last_migration_date || ')', 30);
601:
602:

Line 599: ben_dm_utility.message('PARA','(l_last_migration_date - ' ||

595: ben_dm_utility.message('INFO','l_last_date - ' || l_last_date, 10);
596: ben_dm_utility.message('INFO','Found last migration date', 15);
597: ben_dm_utility.message('SUMM','Found last migration date', 20);
598: ben_dm_utility.message('ROUT','exit:ben_dm_business.last_migration_date', 25);
599: ben_dm_utility.message('PARA','(l_last_migration_date - ' ||
600: l_last_migration_date || ')', 30);
601:
602:
603:

Line 609: ben_dm_utility.error(SQLCODE,'ben_dm_business.last_migration_date','(none)',

605:
606: -- error handling
607: EXCEPTION
608: WHEN OTHERS THEN
609: ben_dm_utility.error(SQLCODE,'ben_dm_business.last_migration_date','(none)',
610: 'R');
611: RAISE;
612:
613:

Line 642: ben_dm_utility.r_migration_rec)

638:
639:
640: --
641: FUNCTION validate_migration(r_migration_data IN
642: ben_dm_utility.r_migration_rec)
643: RETURN VARCHAR2 IS
644: --
645:
646: l_valid VARCHAR2(1);

Line 655: ben_dm_utility.message('ROUT','entry:ben_dm_business.validate_migration', 5);

651: --
652: BEGIN
653: --
654:
655: ben_dm_utility.message('ROUT','entry:ben_dm_business.validate_migration', 5);
656: ben_dm_utility.message('PARA','(r_migration_data - record)', 10);
657:
658:
659: -- assume that migration is valid - then test to see if there are problems

Line 656: ben_dm_utility.message('PARA','(r_migration_data - record)', 10);

652: BEGIN
653: --
654:
655: ben_dm_utility.message('ROUT','entry:ben_dm_business.validate_migration', 5);
656: ben_dm_utility.message('PARA','(r_migration_data - record)', 10);
657:
658:
659: -- assume that migration is valid - then test to see if there are problems
660: l_valid := 'V';

Line 687: ben_dm_utility.message('INFO','Validated migration', 215);

683: IF (l_valid = 'Y' AND l_warning = 'V') THEN
684: l_valid := 'W';
685: END IF;
686:
687: ben_dm_utility.message('INFO','Validated migration', 215);
688: ben_dm_utility.message('SUMM','Validated migration', 220);
689: ben_dm_utility.message('ROUT','exit:ben_dm_business.validate_migration', 225);
690: ben_dm_utility.message('PARA','(l_valid - ' || l_valid || ')', 230);
691:

Line 688: ben_dm_utility.message('SUMM','Validated migration', 220);

684: l_valid := 'W';
685: END IF;
686:
687: ben_dm_utility.message('INFO','Validated migration', 215);
688: ben_dm_utility.message('SUMM','Validated migration', 220);
689: ben_dm_utility.message('ROUT','exit:ben_dm_business.validate_migration', 225);
690: ben_dm_utility.message('PARA','(l_valid - ' || l_valid || ')', 230);
691:
692:

Line 689: ben_dm_utility.message('ROUT','exit:ben_dm_business.validate_migration', 225);

685: END IF;
686:
687: ben_dm_utility.message('INFO','Validated migration', 215);
688: ben_dm_utility.message('SUMM','Validated migration', 220);
689: ben_dm_utility.message('ROUT','exit:ben_dm_business.validate_migration', 225);
690: ben_dm_utility.message('PARA','(l_valid - ' || l_valid || ')', 230);
691:
692:
693: -- overide

Line 690: ben_dm_utility.message('PARA','(l_valid - ' || l_valid || ')', 230);

686:
687: ben_dm_utility.message('INFO','Validated migration', 215);
688: ben_dm_utility.message('SUMM','Validated migration', 220);
689: ben_dm_utility.message('ROUT','exit:ben_dm_business.validate_migration', 225);
690: ben_dm_utility.message('PARA','(l_valid - ' || l_valid || ')', 230);
691:
692:
693: -- overide
694: -- uncomment to turn off business rule validation for testing purposes

Line 703: ben_dm_utility.error(SQLCODE,'ben_dm_business.validate_migration',

699:
700: -- error handling
701: EXCEPTION
702: WHEN OTHERS THEN
703: ben_dm_utility.error(SQLCODE,'ben_dm_business.validate_migration',
704: '(none)','R');
705: RAISE;
706:
707: --