102: FND_MSG_PUB.INITIALIZE;
103:
104: l_return_status := FND_API.G_RET_STS_SUCCESS;
105:
106: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
107: THEN
108: fnd_log.string
109: (
110: fnd_log.level_procedure,
104: l_return_status := FND_API.G_RET_STS_SUCCESS;
105:
106: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
107: THEN
108: fnd_log.string
109: (
110: fnd_log.level_procedure,
111: l_debug_module||'.begin',
112: 'At the start of PLSQL procedure'
106: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
107: THEN
108: fnd_log.string
109: (
110: fnd_log.level_procedure,
111: l_debug_module||'.begin',
112: 'At the start of PLSQL procedure'
113: );
114: END IF;
126: itemkey => itemkey,
127: aname => 'OBJECT_VER'
128: );
129:
130: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
131: THEN
132: fnd_log.string
133: (
134: fnd_log.level_statement,
128: );
129:
130: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
131: THEN
132: fnd_log.string
133: (
134: fnd_log.level_statement,
135: l_debug_module,
136: 'OBJECT_ID='||l_object_id||' OBJECT_VER='||l_object_ovn
130: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
131: THEN
132: fnd_log.string
133: (
134: fnd_log.level_statement,
135: l_debug_module,
136: 'OBJECT_ID='||l_object_id||' OBJECT_VER='||l_object_ovn
137: );
138: END IF;
155: fnd_message.set_name('AHL', 'AHL_MEL_CDL_NTF_ID_INVALID');
156: fnd_message.set_token('HRD_ID', l_object_id, false);
157: fnd_msg_pub.add;
158:
159: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
160: THEN
161: fnd_log.message
162: (
163: fnd_log.level_exception,
157: fnd_msg_pub.add;
158:
159: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
160: THEN
161: fnd_log.message
162: (
163: fnd_log.level_exception,
164: l_debug_module,
165: false
159: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
160: THEN
161: fnd_log.message
162: (
163: fnd_log.level_exception,
164: l_debug_module,
165: false
166: );
167: END IF;
187: aname => 'FORWARD_SUBJECT',
188: avalue => l_subject
189: );
190:
191: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
192: THEN
193: fnd_log.string
194: (
195: fnd_log.level_statement,
189: );
190:
191: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
192: THEN
193: fnd_log.string
194: (
195: fnd_log.level_statement,
196: l_debug_module,
197: 'FORWARD_SUBJECT='||l_subject
191: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
192: THEN
193: fnd_log.string
194: (
195: fnd_log.level_statement,
196: l_debug_module,
197: 'FORWARD_SUBJECT='||l_subject
198: );
199: END IF;
213: aname => 'APPROVAL_SUBJECT',
214: avalue => l_subject
215: );
216:
217: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
218: THEN
219: fnd_log.string
220: (
221: fnd_log.level_statement,
215: );
216:
217: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
218: THEN
219: fnd_log.string
220: (
221: fnd_log.level_statement,
222: l_debug_module,
223: 'APPROVAL_SUBJECT='||l_subject
217: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
218: THEN
219: fnd_log.string
220: (
221: fnd_log.level_statement,
222: l_debug_module,
223: 'APPROVAL_SUBJECT='||l_subject
224: );
225: END IF;
239: aname => 'REJECT_SUBJECT',
240: avalue => l_subject
241: );
242:
243: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
244: THEN
245: fnd_log.string
246: (
247: fnd_log.level_statement,
241: );
242:
243: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
244: THEN
245: fnd_log.string
246: (
247: fnd_log.level_statement,
248: l_debug_module,
249: 'REJECT_SUBJECT='||l_subject
243: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
244: THEN
245: fnd_log.string
246: (
247: fnd_log.level_statement,
248: l_debug_module,
249: 'REJECT_SUBJECT='||l_subject
250: );
251: END IF;
265: aname => 'APPROVED_SUBJECT',
266: avalue => l_subject
267: );
268:
269: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
270: THEN
271: fnd_log.string
272: (
273: fnd_log.level_statement,
267: );
268:
269: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
270: THEN
271: fnd_log.string
272: (
273: fnd_log.level_statement,
274: l_debug_module,
275: 'APPROVED_SUBJECT='||l_subject
269: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
270: THEN
271: fnd_log.string
272: (
273: fnd_log.level_statement,
274: l_debug_module,
275: 'APPROVED_SUBJECT='||l_subject
276: );
277: END IF;
291: aname => 'FINAL_SUBJECT',
292: avalue => l_subject
293: );
294:
295: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
296: THEN
297: fnd_log.string
298: (
299: fnd_log.level_statement,
293: );
294:
295: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
296: THEN
297: fnd_log.string
298: (
299: fnd_log.level_statement,
300: l_debug_module,
301: 'FINAL_SUBJECT='||l_subject
295: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
296: THEN
297: fnd_log.string
298: (
299: fnd_log.level_statement,
300: l_debug_module,
301: 'FINAL_SUBJECT='||l_subject
302: );
303: END IF;
317: aname => 'REMIND_SUBJECT',
318: avalue => l_subject
319: );
320:
321: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
322: THEN
323: fnd_log.string
324: (
325: fnd_log.level_statement,
319: );
320:
321: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
322: THEN
323: fnd_log.string
324: (
325: fnd_log.level_statement,
326: l_debug_module,
327: 'REMIND_SUBJECT='||l_subject
321: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
322: THEN
323: fnd_log.string
324: (
325: fnd_log.level_statement,
326: l_debug_module,
327: 'REMIND_SUBJECT='||l_subject
328: );
329: END IF;
343: aname => 'ERROR_SUBJECT',
344: avalue => l_subject
345: );
346:
347: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
348: THEN
349: fnd_log.string
350: (
351: fnd_log.level_statement,
345: );
346:
347: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
348: THEN
349: fnd_log.string
350: (
351: fnd_log.level_statement,
352: l_debug_module,
353: 'ERROR_SUBJECT='||l_subject
347: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
348: THEN
349: fnd_log.string
350: (
351: fnd_log.level_statement,
352: l_debug_module,
353: 'ERROR_SUBJECT='||l_subject
354: );
355: END IF;
374: aname => 'RULE_ID',
375: avalue => l_approval_rule_id
376: );
377:
378: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
379: THEN
380: fnd_log.string
381: (
382: fnd_log.level_statement,
376: );
377:
378: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
379: THEN
380: fnd_log.string
381: (
382: fnd_log.level_statement,
383: l_debug_module,
384: 'RULE_ID='||l_approval_rule_id
378: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
379: THEN
380: fnd_log.string
381: (
382: fnd_log.level_statement,
383: l_debug_module,
384: 'RULE_ID='||l_approval_rule_id
385: );
386: END IF;
392: aname => 'APPROVER_SEQ',
393: avalue => l_approver_seq
394: );
395:
396: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
397: THEN
398: fnd_log.string
399: (
400: fnd_log.level_statement,
394: );
395:
396: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
397: THEN
398: fnd_log.string
399: (
400: fnd_log.level_statement,
401: l_debug_module,
402: 'APPROVER_SEQ='||l_approver_seq
396: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
397: THEN
398: fnd_log.string
399: (
400: fnd_log.level_statement,
401: l_debug_module,
402: 'APPROVER_SEQ='||l_approver_seq
403: );
404: END IF;
428: resultout := 'COMPLETE:';
429: RETURN;
430: END IF;
431:
432: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
433: THEN
434: fnd_log.string
435: (
436: fnd_log.level_procedure,
430: END IF;
431:
432: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
433: THEN
434: fnd_log.string
435: (
436: fnd_log.level_procedure,
437: l_debug_module||'.end',
438: 'At the end of PLSQL procedure'
432: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
433: THEN
434: fnd_log.string
435: (
436: fnd_log.level_procedure,
437: l_debug_module||'.end',
438: 'At the end of PLSQL procedure'
439: );
440: END IF;
457: p_attr_name => 'ERROR_MSG',
458: x_error_msg => l_error_msg
459: );
460:
461: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
462: THEN
463: fnd_log.string
464: (
465: fnd_log.level_exception,
459: );
460:
461: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
462: THEN
463: fnd_log.string
464: (
465: fnd_log.level_exception,
466: l_debug_module,
467: l_error_msg
461: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
462: THEN
463: fnd_log.string
464: (
465: fnd_log.level_exception,
466: l_debug_module,
467: l_error_msg
468: );
469: END IF;
520: l_error_msg VARCHAR2(2000);
521:
522: BEGIN
523:
524: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
525: THEN
526: fnd_log.string
527: (
528: fnd_log.level_procedure,
522: BEGIN
523:
524: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
525: THEN
526: fnd_log.string
527: (
528: fnd_log.level_procedure,
529: l_debug_module||'.begin',
530: 'At the start of PLSQL procedure'
524: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
525: THEN
526: fnd_log.string
527: (
528: fnd_log.level_procedure,
529: l_debug_module||'.begin',
530: 'At the start of PLSQL procedure'
531: );
532: END IF;
568: fnd_message.set_name('AHL', 'AHL_MEL_CDL_NTF_ID_INVALID');
569: fnd_message.set_token('HRD_ID', l_object_id, false);
570: fnd_msg_pub.add;
571:
572: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
573: THEN
574: fnd_log.message
575: (
576: fnd_log.level_exception,
570: fnd_msg_pub.add;
571:
572: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
573: THEN
574: fnd_log.message
575: (
576: fnd_log.level_exception,
577: l_debug_module,
578: false
572: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
573: THEN
574: fnd_log.message
575: (
576: fnd_log.level_exception,
577: l_debug_module,
578: false
579: );
580: END IF;
595: END IF;
596:
597: document := document || l_body;
598:
599: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
600: THEN
601: fnd_log.string
602: (
603: fnd_log.level_statement,
597: document := document || l_body;
598:
599: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
600: THEN
601: fnd_log.string
602: (
603: fnd_log.level_statement,
604: l_debug_module,
605: 'document='||document
599: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
600: THEN
601: fnd_log.string
602: (
603: fnd_log.level_statement,
604: l_debug_module,
605: 'document='||document
606: );
607: END IF;
605: 'document='||document
606: );
607: END IF;
608:
609: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
610: THEN
611: fnd_log.string
612: (
613: fnd_log.level_procedure,
607: END IF;
608:
609: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
610: THEN
611: fnd_log.string
612: (
613: fnd_log.level_procedure,
614: l_debug_module||'.end',
615: 'At the end of PLSQL procedure'
609: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
610: THEN
611: fnd_log.string
612: (
613: fnd_log.level_procedure,
614: l_debug_module||'.end',
615: 'At the end of PLSQL procedure'
616: );
617: END IF;
636: p_attr_name => 'ERROR_MSG',
637: x_error_msg => l_error_msg
638: );
639:
640: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
641: THEN
642: fnd_log.string
643: (
644: fnd_log.level_exception,
638: );
639:
640: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
641: THEN
642: fnd_log.string
643: (
644: fnd_log.level_exception,
645: l_debug_module,
646: l_error_msg
640: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
641: THEN
642: fnd_log.string
643: (
644: fnd_log.level_exception,
645: l_debug_module,
646: l_error_msg
647: );
648: END IF;
693: l_error_msg VARCHAR2(2000);
694:
695: BEGIN
696:
697: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
698: THEN
699: fnd_log.string
700: (
701: fnd_log.level_procedure,
695: BEGIN
696:
697: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
698: THEN
699: fnd_log.string
700: (
701: fnd_log.level_procedure,
702: l_debug_module||'.begin',
703: 'At the start of PLSQL procedure'
697: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
698: THEN
699: fnd_log.string
700: (
701: fnd_log.level_procedure,
702: l_debug_module||'.begin',
703: 'At the start of PLSQL procedure'
704: );
705: END IF;
741: fnd_message.set_name('AHL', 'AHL_MEL_CDL_NTF_ID_INVALID');
742: fnd_message.set_token('HRD_ID', l_object_id, false);
743: fnd_msg_pub.add;
744:
745: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
746: THEN
747: fnd_log.message
748: (
749: fnd_log.level_exception,
743: fnd_msg_pub.add;
744:
745: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
746: THEN
747: fnd_log.message
748: (
749: fnd_log.level_exception,
750: l_debug_module,
751: false
745: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
746: THEN
747: fnd_log.message
748: (
749: fnd_log.level_exception,
750: l_debug_module,
751: false
752: );
753: END IF;
768: END IF;
769:
770: document := document || l_body;
771:
772: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
773: THEN
774: fnd_log.string
775: (
776: fnd_log.level_statement,
770: document := document || l_body;
771:
772: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
773: THEN
774: fnd_log.string
775: (
776: fnd_log.level_statement,
777: l_debug_module,
778: 'document='||document
772: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
773: THEN
774: fnd_log.string
775: (
776: fnd_log.level_statement,
777: l_debug_module,
778: 'document='||document
779: );
780: END IF;
778: 'document='||document
779: );
780: END IF;
781:
782: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
783: THEN
784: fnd_log.string
785: (
786: fnd_log.level_procedure,
780: END IF;
781:
782: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
783: THEN
784: fnd_log.string
785: (
786: fnd_log.level_procedure,
787: l_debug_module||'.end',
788: 'At the end of PLSQL procedure'
782: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
783: THEN
784: fnd_log.string
785: (
786: fnd_log.level_procedure,
787: l_debug_module||'.end',
788: 'At the end of PLSQL procedure'
789: );
790: END IF;
809: p_attr_name => 'ERROR_MSG',
810: x_error_msg => l_error_msg
811: );
812:
813: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
814: THEN
815: fnd_log.string
816: (
817: fnd_log.level_exception,
811: );
812:
813: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
814: THEN
815: fnd_log.string
816: (
817: fnd_log.level_exception,
818: l_debug_module,
819: l_error_msg
813: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
814: THEN
815: fnd_log.string
816: (
817: fnd_log.level_exception,
818: l_debug_module,
819: l_error_msg
820: );
821: END IF;
865: l_error_msg VARCHAR2(2000);
866:
867: BEGIN
868:
869: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
870: THEN
871: fnd_log.string
872: (
873: fnd_log.level_procedure,
867: BEGIN
868:
869: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
870: THEN
871: fnd_log.string
872: (
873: fnd_log.level_procedure,
874: l_debug_module||'.begin',
875: 'At the start of PLSQL procedure'
869: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
870: THEN
871: fnd_log.string
872: (
873: fnd_log.level_procedure,
874: l_debug_module||'.begin',
875: 'At the start of PLSQL procedure'
876: );
877: END IF;
906: fnd_message.set_name('AHL', 'AHL_MEL_CDL_NTF_ID_INVALID');
907: fnd_message.set_token('HRD_ID', l_object_id, false);
908: fnd_msg_pub.add;
909:
910: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
911: THEN
912: fnd_log.message
913: (
914: fnd_log.level_exception,
908: fnd_msg_pub.add;
909:
910: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
911: THEN
912: fnd_log.message
913: (
914: fnd_log.level_exception,
915: l_debug_module,
916: false
910: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
911: THEN
912: fnd_log.message
913: (
914: fnd_log.level_exception,
915: l_debug_module,
916: false
917: );
918: END IF;
932: END IF;
933:
934: document := document || l_body;
935:
936: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
937: THEN
938: fnd_log.string
939: (
940: fnd_log.level_statement,
934: document := document || l_body;
935:
936: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
937: THEN
938: fnd_log.string
939: (
940: fnd_log.level_statement,
941: l_debug_module,
942: 'document='||document
936: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
937: THEN
938: fnd_log.string
939: (
940: fnd_log.level_statement,
941: l_debug_module,
942: 'document='||document
943: );
944: END IF;
942: 'document='||document
943: );
944: END IF;
945:
946: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
947: THEN
948: fnd_log.string
949: (
950: fnd_log.level_procedure,
944: END IF;
945:
946: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
947: THEN
948: fnd_log.string
949: (
950: fnd_log.level_procedure,
951: l_debug_module||'.end',
952: 'At the end of PLSQL procedure'
946: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
947: THEN
948: fnd_log.string
949: (
950: fnd_log.level_procedure,
951: l_debug_module||'.end',
952: 'At the end of PLSQL procedure'
953: );
954: END IF;
973: p_attr_name => 'ERROR_MSG',
974: x_error_msg => l_error_msg
975: );
976:
977: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
978: THEN
979: fnd_log.string
980: (
981: fnd_log.level_exception,
975: );
976:
977: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
978: THEN
979: fnd_log.string
980: (
981: fnd_log.level_exception,
982: l_debug_module,
983: l_error_msg
977: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
978: THEN
979: fnd_log.string
980: (
981: fnd_log.level_exception,
982: l_debug_module,
983: l_error_msg
984: );
985: END IF;
1030: l_error_msg VARCHAR2(2000);
1031:
1032: BEGIN
1033:
1034: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
1035: THEN
1036: fnd_log.string
1037: (
1038: fnd_log.level_procedure,
1032: BEGIN
1033:
1034: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
1035: THEN
1036: fnd_log.string
1037: (
1038: fnd_log.level_procedure,
1039: l_debug_module||'.begin',
1040: 'At the start of PLSQL procedure'
1034: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
1035: THEN
1036: fnd_log.string
1037: (
1038: fnd_log.level_procedure,
1039: l_debug_module||'.begin',
1040: 'At the start of PLSQL procedure'
1041: );
1042: END IF;
1078: fnd_message.set_name('AHL', 'AHL_MEL_CDL_NTF_ID_INVALID');
1079: fnd_message.set_token('HRD_ID', l_object_id, false);
1080: fnd_msg_pub.add;
1081:
1082: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
1083: THEN
1084: fnd_log.message
1085: (
1086: fnd_log.level_exception,
1080: fnd_msg_pub.add;
1081:
1082: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
1083: THEN
1084: fnd_log.message
1085: (
1086: fnd_log.level_exception,
1087: l_debug_module,
1088: false
1082: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
1083: THEN
1084: fnd_log.message
1085: (
1086: fnd_log.level_exception,
1087: l_debug_module,
1088: false
1089: );
1090: END IF;
1105: END IF;
1106:
1107: document := document || l_body;
1108:
1109: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
1110: THEN
1111: fnd_log.string
1112: (
1113: fnd_log.level_statement,
1107: document := document || l_body;
1108:
1109: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
1110: THEN
1111: fnd_log.string
1112: (
1113: fnd_log.level_statement,
1114: l_debug_module,
1115: 'document='||document
1109: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
1110: THEN
1111: fnd_log.string
1112: (
1113: fnd_log.level_statement,
1114: l_debug_module,
1115: 'document='||document
1116: );
1117: END IF;
1115: 'document='||document
1116: );
1117: END IF;
1118:
1119: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
1120: THEN
1121: fnd_log.string
1122: (
1123: fnd_log.level_procedure,
1117: END IF;
1118:
1119: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
1120: THEN
1121: fnd_log.string
1122: (
1123: fnd_log.level_procedure,
1124: l_debug_module||'.end',
1125: 'At the end of PLSQL procedure'
1119: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
1120: THEN
1121: fnd_log.string
1122: (
1123: fnd_log.level_procedure,
1124: l_debug_module||'.end',
1125: 'At the end of PLSQL procedure'
1126: );
1127: END IF;
1146: p_attr_name => 'ERROR_MSG',
1147: x_error_msg => l_error_msg
1148: );
1149:
1150: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
1151: THEN
1152: fnd_log.string
1153: (
1154: fnd_log.level_exception,
1148: );
1149:
1150: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
1151: THEN
1152: fnd_log.string
1153: (
1154: fnd_log.level_exception,
1155: l_debug_module,
1156: l_error_msg
1150: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
1151: THEN
1152: fnd_log.string
1153: (
1154: fnd_log.level_exception,
1155: l_debug_module,
1156: l_error_msg
1157: );
1158: END IF;
1204: l_error_msg VARCHAR2(2000);
1205:
1206: BEGIN
1207:
1208: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
1209: THEN
1210: fnd_log.string
1211: (
1212: fnd_log.level_procedure,
1206: BEGIN
1207:
1208: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
1209: THEN
1210: fnd_log.string
1211: (
1212: fnd_log.level_procedure,
1213: l_debug_module||'.begin',
1214: 'At the start of PLSQL procedure'
1208: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
1209: THEN
1210: fnd_log.string
1211: (
1212: fnd_log.level_procedure,
1213: l_debug_module||'.begin',
1214: 'At the start of PLSQL procedure'
1215: );
1216: END IF;
1259: fnd_message.set_name('AHL', 'AHL_MEL_CDL_NTF_ID_INVALID');
1260: fnd_message.set_token('HRD_ID', l_object_id, false);
1261: fnd_msg_pub.add;
1262:
1263: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
1264: THEN
1265: fnd_log.message
1266: (
1267: fnd_log.level_exception,
1261: fnd_msg_pub.add;
1262:
1263: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
1264: THEN
1265: fnd_log.message
1266: (
1267: fnd_log.level_exception,
1268: l_debug_module,
1269: false
1263: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
1264: THEN
1265: fnd_log.message
1266: (
1267: fnd_log.level_exception,
1268: l_debug_module,
1269: false
1270: );
1271: END IF;
1287: END IF;
1288:
1289: document := document || l_body;
1290:
1291: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
1292: THEN
1293: fnd_log.string
1294: (
1295: fnd_log.level_statement,
1289: document := document || l_body;
1290:
1291: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
1292: THEN
1293: fnd_log.string
1294: (
1295: fnd_log.level_statement,
1296: l_debug_module,
1297: 'document='||document
1291: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
1292: THEN
1293: fnd_log.string
1294: (
1295: fnd_log.level_statement,
1296: l_debug_module,
1297: 'document='||document
1298: );
1299: END IF;
1297: 'document='||document
1298: );
1299: END IF;
1300:
1301: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
1302: THEN
1303: fnd_log.string
1304: (
1305: fnd_log.level_procedure,
1299: END IF;
1300:
1301: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
1302: THEN
1303: fnd_log.string
1304: (
1305: fnd_log.level_procedure,
1306: l_debug_module||'.end',
1307: 'At the end of PLSQL procedure'
1301: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
1302: THEN
1303: fnd_log.string
1304: (
1305: fnd_log.level_procedure,
1306: l_debug_module||'.end',
1307: 'At the end of PLSQL procedure'
1308: );
1309: END IF;
1328: p_attr_name => 'ERROR_MSG',
1329: x_error_msg => l_error_msg
1330: );
1331:
1332: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
1333: THEN
1334: fnd_log.string
1335: (
1336: fnd_log.level_exception,
1330: );
1331:
1332: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
1333: THEN
1334: fnd_log.string
1335: (
1336: fnd_log.level_exception,
1337: l_debug_module,
1338: l_error_msg
1332: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
1333: THEN
1334: fnd_log.string
1335: (
1336: fnd_log.level_exception,
1337: l_debug_module,
1338: l_error_msg
1339: );
1340: END IF;
1386: l_error_msg VARCHAR2(2000);
1387:
1388: BEGIN
1389:
1390: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
1391: THEN
1392: fnd_log.string
1393: (
1394: fnd_log.level_procedure,
1388: BEGIN
1389:
1390: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
1391: THEN
1392: fnd_log.string
1393: (
1394: fnd_log.level_procedure,
1395: l_debug_module||'.begin',
1396: 'At the start of PLSQL procedure'
1390: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
1391: THEN
1392: fnd_log.string
1393: (
1394: fnd_log.level_procedure,
1395: l_debug_module||'.begin',
1396: 'At the start of PLSQL procedure'
1397: );
1398: END IF;
1441: fnd_message.set_name('AHL', 'AHL_MEL_CDL_NTF_ID_INVALID');
1442: fnd_message.set_token('HRD_ID', l_object_id, false);
1443: fnd_msg_pub.add;
1444:
1445: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
1446: THEN
1447: fnd_log.message
1448: (
1449: fnd_log.level_exception,
1443: fnd_msg_pub.add;
1444:
1445: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
1446: THEN
1447: fnd_log.message
1448: (
1449: fnd_log.level_exception,
1450: l_debug_module,
1451: false
1445: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
1446: THEN
1447: fnd_log.message
1448: (
1449: fnd_log.level_exception,
1450: l_debug_module,
1451: false
1452: );
1453: END IF;
1469: END IF;
1470:
1471: document := document || l_body;
1472:
1473: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
1474: THEN
1475: fnd_log.string
1476: (
1477: fnd_log.level_statement,
1471: document := document || l_body;
1472:
1473: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
1474: THEN
1475: fnd_log.string
1476: (
1477: fnd_log.level_statement,
1478: l_debug_module,
1479: 'document='||document
1473: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
1474: THEN
1475: fnd_log.string
1476: (
1477: fnd_log.level_statement,
1478: l_debug_module,
1479: 'document='||document
1480: );
1481: END IF;
1479: 'document='||document
1480: );
1481: END IF;
1482:
1483: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
1484: THEN
1485: fnd_log.string
1486: (
1487: fnd_log.level_procedure,
1481: END IF;
1482:
1483: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
1484: THEN
1485: fnd_log.string
1486: (
1487: fnd_log.level_procedure,
1488: l_debug_module||'.end',
1489: 'At the end of PLSQL procedure'
1483: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
1484: THEN
1485: fnd_log.string
1486: (
1487: fnd_log.level_procedure,
1488: l_debug_module||'.end',
1489: 'At the end of PLSQL procedure'
1490: );
1491: END IF;
1510: p_attr_name => 'ERROR_MSG',
1511: x_error_msg => l_error_msg
1512: );
1513:
1514: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
1515: THEN
1516: fnd_log.string
1517: (
1518: fnd_log.level_exception,
1512: );
1513:
1514: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
1515: THEN
1516: fnd_log.string
1517: (
1518: fnd_log.level_exception,
1519: l_debug_module,
1520: l_error_msg
1514: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
1515: THEN
1516: fnd_log.string
1517: (
1518: fnd_log.level_exception,
1519: l_debug_module,
1520: l_error_msg
1521: );
1522: END IF;
1566: l_error_msg VARCHAR2(2000);
1567:
1568: BEGIN
1569:
1570: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
1571: THEN
1572: fnd_log.string
1573: (
1574: fnd_log.level_procedure,
1568: BEGIN
1569:
1570: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
1571: THEN
1572: fnd_log.string
1573: (
1574: fnd_log.level_procedure,
1575: l_debug_module||'.begin',
1576: 'At the start of PLSQL procedure'
1570: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
1571: THEN
1572: fnd_log.string
1573: (
1574: fnd_log.level_procedure,
1575: l_debug_module||'.begin',
1576: 'At the start of PLSQL procedure'
1577: );
1578: END IF;
1614: fnd_message.set_name('AHL', 'AHL_MEL_CDL_NTF_ID_INVALID');
1615: fnd_message.set_token('HRD_ID', l_object_id, false);
1616: fnd_msg_pub.add;
1617:
1618: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
1619: THEN
1620: fnd_log.message
1621: (
1622: fnd_log.level_exception,
1616: fnd_msg_pub.add;
1617:
1618: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
1619: THEN
1620: fnd_log.message
1621: (
1622: fnd_log.level_exception,
1623: l_debug_module,
1624: false
1618: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
1619: THEN
1620: fnd_log.message
1621: (
1622: fnd_log.level_exception,
1623: l_debug_module,
1624: false
1625: );
1626: END IF;
1641: END IF;
1642:
1643: document := document || l_body;
1644:
1645: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
1646: THEN
1647: fnd_log.string
1648: (
1649: fnd_log.level_statement,
1643: document := document || l_body;
1644:
1645: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
1646: THEN
1647: fnd_log.string
1648: (
1649: fnd_log.level_statement,
1650: l_debug_module,
1651: 'document='||document
1645: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
1646: THEN
1647: fnd_log.string
1648: (
1649: fnd_log.level_statement,
1650: l_debug_module,
1651: 'document='||document
1652: );
1653: END IF;
1651: 'document='||document
1652: );
1653: END IF;
1654:
1655: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
1656: THEN
1657: fnd_log.string
1658: (
1659: fnd_log.level_procedure,
1653: END IF;
1654:
1655: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
1656: THEN
1657: fnd_log.string
1658: (
1659: fnd_log.level_procedure,
1660: l_debug_module||'.end',
1661: 'At the end of PLSQL procedure'
1655: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
1656: THEN
1657: fnd_log.string
1658: (
1659: fnd_log.level_procedure,
1660: l_debug_module||'.end',
1661: 'At the end of PLSQL procedure'
1662: );
1663: END IF;
1682: p_attr_name => 'ERROR_MSG',
1683: x_error_msg => l_error_msg
1684: );
1685:
1686: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
1687: THEN
1688: fnd_log.string
1689: (
1690: fnd_log.level_exception,
1684: );
1685:
1686: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
1687: THEN
1688: fnd_log.string
1689: (
1690: fnd_log.level_exception,
1691: l_debug_module,
1692: l_error_msg
1686: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
1687: THEN
1688: fnd_log.string
1689: (
1690: fnd_log.level_exception,
1691: l_debug_module,
1692: l_error_msg
1693: );
1694: END IF;
1754: l_prev_expired_date DATE;
1755:
1756: BEGIN
1757:
1758: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
1759: THEN
1760: fnd_log.string
1761: (
1762: fnd_log.level_procedure,
1756: BEGIN
1757:
1758: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
1759: THEN
1760: fnd_log.string
1761: (
1762: fnd_log.level_procedure,
1763: l_debug_module||'.begin',
1764: 'At the start of PLSQL procedure'
1758: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
1759: THEN
1760: fnd_log.string
1761: (
1762: fnd_log.level_procedure,
1763: l_debug_module||'.begin',
1764: 'At the start of PLSQL procedure'
1765: );
1766: END IF;
1794: fnd_message.set_name('AHL', 'AHL_MEL_CDL_NTF_ID_INVALID');
1795: fnd_message.set_token('HRD_ID', l_object_id, false);
1796: fnd_msg_pub.add;
1797:
1798: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
1799: THEN
1800: fnd_log.message
1801: (
1802: fnd_log.level_exception,
1796: fnd_msg_pub.add;
1797:
1798: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
1799: THEN
1800: fnd_log.message
1801: (
1802: fnd_log.level_exception,
1803: l_debug_module,
1804: false
1798: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
1799: THEN
1800: fnd_log.message
1801: (
1802: fnd_log.level_exception,
1803: l_debug_module,
1804: false
1805: );
1806: END IF;
1876: resultout := 'COMPLETE:';
1877: RETURN;
1878: END IF;
1879:
1880: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
1881: THEN
1882: fnd_log.string
1883: (
1884: fnd_log.level_procedure,
1878: END IF;
1879:
1880: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
1881: THEN
1882: fnd_log.string
1883: (
1884: fnd_log.level_procedure,
1885: l_debug_module||'.end',
1886: 'At the end of PLSQL procedure'
1880: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
1881: THEN
1882: fnd_log.string
1883: (
1884: fnd_log.level_procedure,
1885: l_debug_module||'.end',
1886: 'At the end of PLSQL procedure'
1887: );
1888: END IF;
1905: p_attr_name => 'ERROR_MSG',
1906: x_error_msg => l_error_msg
1907: );
1908:
1909: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
1910: THEN
1911: fnd_log.string
1912: (
1913: fnd_log.level_exception,
1907: );
1908:
1909: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
1910: THEN
1911: fnd_log.string
1912: (
1913: fnd_log.level_exception,
1914: l_debug_module,
1915: l_error_msg
1909: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
1910: THEN
1911: fnd_log.string
1912: (
1913: fnd_log.level_exception,
1914: l_debug_module,
1915: l_error_msg
1916: );
1917: END IF;
1964: l_error_msg VARCHAR2(2000);
1965:
1966: BEGIN
1967:
1968: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
1969: THEN
1970: fnd_log.string
1971: (
1972: fnd_log.level_procedure,
1966: BEGIN
1967:
1968: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
1969: THEN
1970: fnd_log.string
1971: (
1972: fnd_log.level_procedure,
1973: l_debug_module||'.begin',
1974: 'At the start of PLSQL procedure'
1968: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
1969: THEN
1970: fnd_log.string
1971: (
1972: fnd_log.level_procedure,
1973: l_debug_module||'.begin',
1974: 'At the start of PLSQL procedure'
1975: );
1976: END IF;
2004: fnd_message.set_name('AHL', 'AHL_MEL_CDL_NTF_ID_INVALID');
2005: fnd_message.set_token('HRD_ID', l_object_id, false);
2006: fnd_msg_pub.add;
2007:
2008: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
2009: THEN
2010: fnd_log.message
2011: (
2012: fnd_log.level_exception,
2006: fnd_msg_pub.add;
2007:
2008: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
2009: THEN
2010: fnd_log.message
2011: (
2012: fnd_log.level_exception,
2013: l_debug_module,
2014: false
2008: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
2009: THEN
2010: fnd_log.message
2011: (
2012: fnd_log.level_exception,
2013: l_debug_module,
2014: false
2015: );
2016: END IF;
2057: resultout := 'COMPLETE:';
2058: RETURN;
2059: END IF;
2060:
2061: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
2062: THEN
2063: fnd_log.string
2064: (
2065: fnd_log.level_procedure,
2059: END IF;
2060:
2061: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
2062: THEN
2063: fnd_log.string
2064: (
2065: fnd_log.level_procedure,
2066: l_debug_module||'.end',
2067: 'At the end of PLSQL procedure'
2061: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
2062: THEN
2063: fnd_log.string
2064: (
2065: fnd_log.level_procedure,
2066: l_debug_module||'.end',
2067: 'At the end of PLSQL procedure'
2068: );
2069: END IF;
2086: p_attr_name => 'ERROR_MSG',
2087: x_error_msg => l_error_msg
2088: );
2089:
2090: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
2091: THEN
2092: fnd_log.string
2093: (
2094: fnd_log.level_exception,
2088: );
2089:
2090: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
2091: THEN
2092: fnd_log.string
2093: (
2094: fnd_log.level_exception,
2095: l_debug_module,
2096: l_error_msg
2090: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
2091: THEN
2092: fnd_log.string
2093: (
2094: fnd_log.level_exception,
2095: l_debug_module,
2096: l_error_msg
2097: );
2098: END IF;
2179: and udf.unit_deferral_id = p_deferral_id;
2180:
2181: -- Declare local variables
2182: l_debug_module CONSTANT VARCHAR2(100) := 'ahl.plsql.'||G_PKG_NAME||'.NR_SET_ACTIVITY_DETAILS';
2183: l_debug_stmt CONSTANT NUMBER := fnd_log.level_statement;
2184: l_debug_proc CONSTANT NUMBER := fnd_log.level_procedure;
2185: l_debug_runtime CONSTANT NUMBER := fnd_log.g_current_runtime_level;
2186: l_debug_exception CONSTANT NUMBER := fnd_log.level_exception;
2187:
2180:
2181: -- Declare local variables
2182: l_debug_module CONSTANT VARCHAR2(100) := 'ahl.plsql.'||G_PKG_NAME||'.NR_SET_ACTIVITY_DETAILS';
2183: l_debug_stmt CONSTANT NUMBER := fnd_log.level_statement;
2184: l_debug_proc CONSTANT NUMBER := fnd_log.level_procedure;
2185: l_debug_runtime CONSTANT NUMBER := fnd_log.g_current_runtime_level;
2186: l_debug_exception CONSTANT NUMBER := fnd_log.level_exception;
2187:
2188: l_return_status VARCHAR2(1);
2181: -- Declare local variables
2182: l_debug_module CONSTANT VARCHAR2(100) := 'ahl.plsql.'||G_PKG_NAME||'.NR_SET_ACTIVITY_DETAILS';
2183: l_debug_stmt CONSTANT NUMBER := fnd_log.level_statement;
2184: l_debug_proc CONSTANT NUMBER := fnd_log.level_procedure;
2185: l_debug_runtime CONSTANT NUMBER := fnd_log.g_current_runtime_level;
2186: l_debug_exception CONSTANT NUMBER := fnd_log.level_exception;
2187:
2188: l_return_status VARCHAR2(1);
2189: l_msg_count NUMBER;
2182: l_debug_module CONSTANT VARCHAR2(100) := 'ahl.plsql.'||G_PKG_NAME||'.NR_SET_ACTIVITY_DETAILS';
2183: l_debug_stmt CONSTANT NUMBER := fnd_log.level_statement;
2184: l_debug_proc CONSTANT NUMBER := fnd_log.level_procedure;
2185: l_debug_runtime CONSTANT NUMBER := fnd_log.g_current_runtime_level;
2186: l_debug_exception CONSTANT NUMBER := fnd_log.level_exception;
2187:
2188: l_return_status VARCHAR2(1);
2189: l_msg_count NUMBER;
2190: l_msg_data VARCHAR2(2000);
2208: l_return_status := FND_API.G_RET_STS_SUCCESS;
2209:
2210: IF (l_debug_proc >= l_debug_runtime)
2211: THEN
2212: fnd_log.string
2213: (
2214: l_debug_proc,
2215: l_debug_module||'.begin',
2216: 'At the start of PLSQL procedure'
2232: );
2233:
2234: IF (l_debug_stmt >= l_debug_runtime)
2235: THEN
2236: fnd_log.string
2237: (
2238: l_debug_stmt,
2239: l_debug_module,
2240: 'OBJECT_ID='||l_object_id||' OBJECT_VER='||l_object_ovn
2261: fnd_msg_pub.add;
2262:
2263: IF (l_debug_exception >= l_debug_runtime)
2264: THEN
2265: fnd_log.message
2266: (
2267: l_debug_exception,
2268: l_debug_module,
2269: false
2303: fnd_date.outputDT_mask));
2304:
2305: l_requester_note := l_requester_note || fnd_message.get;
2306:
2307: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2308: fnd_log.string
2309: (
2310: l_debug_stmt,
2311: l_debug_module,
2304:
2305: l_requester_note := l_requester_note || fnd_message.get;
2306:
2307: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
2308: fnd_log.string
2309: (
2310: l_debug_stmt,
2311: l_debug_module,
2312: 'SUBJECT : ' || l_temp_subject
2310: l_debug_stmt,
2311: l_debug_module,
2312: 'SUBJECT : ' || l_temp_subject
2313: );
2314: fnd_log.string
2315: (
2316: l_debug_stmt,
2317: l_debug_module,
2318: 'REQUESTER NOTE : ' || l_requester_note
2340: );
2341:
2342: IF (l_debug_stmt >= l_debug_runtime)
2343: THEN
2344: fnd_log.string
2345: (
2346: l_debug_stmt,
2347: l_debug_module,
2348: 'FORWARD_SUBJECT='||l_subject
2362: );
2363:
2364: IF (l_debug_stmt >= l_debug_runtime)
2365: THEN
2366: fnd_log.string
2367: (
2368: l_debug_stmt,
2369: l_debug_module,
2370: 'APPROVAL_SUBJECT='||l_subject
2384: );
2385:
2386: IF (l_debug_stmt >= l_debug_runtime)
2387: THEN
2388: fnd_log.string
2389: (
2390: l_debug_stmt,
2391: l_debug_module,
2392: 'REJECT_SUBJECT='||l_subject
2406: );
2407:
2408: IF (l_debug_stmt >= l_debug_runtime)
2409: THEN
2410: fnd_log.string
2411: (
2412: l_debug_stmt,
2413: l_debug_module,
2414: 'APPROVED_SUBJECT='||l_subject
2428: );
2429:
2430: IF (l_debug_stmt >= l_debug_runtime)
2431: THEN
2432: fnd_log.string
2433: (
2434: l_debug_stmt,
2435: l_debug_module,
2436: 'FINAL_SUBJECT='||l_subject
2450: );
2451:
2452: IF (l_debug_stmt >= l_debug_runtime)
2453: THEN
2454: fnd_log.string
2455: (
2456: l_debug_stmt,
2457: l_debug_module,
2458: 'REMIND_SUBJECT='||l_subject
2472: );
2473:
2474: IF (l_debug_stmt >= l_debug_runtime)
2475: THEN
2476: fnd_log.string
2477: (
2478: l_debug_stmt,
2479: l_debug_module,
2480: 'ERROR_SUBJECT='||l_subject
2503: );
2504:
2505: IF (l_debug_stmt >= l_debug_runtime)
2506: THEN
2507: fnd_log.string
2508: (
2509: fnd_log.level_statement,
2510: l_debug_module,
2511: 'RULE_ID='||l_approval_rule_id
2505: IF (l_debug_stmt >= l_debug_runtime)
2506: THEN
2507: fnd_log.string
2508: (
2509: fnd_log.level_statement,
2510: l_debug_module,
2511: 'RULE_ID='||l_approval_rule_id
2512: );
2513: END IF;
2521: );
2522:
2523: IF (l_debug_stmt >= l_debug_runtime)
2524: THEN
2525: fnd_log.string
2526: (
2527: fnd_log.level_statement,
2528: l_debug_module,
2529: 'APPROVER_SEQ='||l_approver_seq
2523: IF (l_debug_stmt >= l_debug_runtime)
2524: THEN
2525: fnd_log.string
2526: (
2527: fnd_log.level_statement,
2528: l_debug_module,
2529: 'APPROVER_SEQ='||l_approver_seq
2530: );
2531: END IF;
2556: END IF;
2557:
2558: IF (l_debug_proc >= l_debug_runtime)
2559: THEN
2560: fnd_log.string
2561: (
2562: l_debug_proc,
2563: l_debug_module||'.end',
2564: 'At the end of PLSQL procedure'
2585: );
2586:
2587: IF (l_debug_exception >= l_debug_runtime)
2588: THEN
2589: fnd_log.string
2590: (
2591: l_debug_exception,
2592: l_debug_module,
2593: l_error_msg
2641:
2642: -- Declare local variables
2643: l_debug_module CONSTANT VARCHAR2(100) := 'ahl.plsql.'||G_PKG_NAME||'.NR_NTF_FORWARD_FYI';
2644:
2645: l_debug_stmt CONSTANT NUMBER := fnd_log.level_statement;
2646: l_debug_proc CONSTANT NUMBER := fnd_log.level_procedure;
2647: l_debug_runtime CONSTANT NUMBER := fnd_log.g_current_runtime_level;
2648: l_debug_exception CONSTANT NUMBER := fnd_log.level_exception;
2649:
2642: -- Declare local variables
2643: l_debug_module CONSTANT VARCHAR2(100) := 'ahl.plsql.'||G_PKG_NAME||'.NR_NTF_FORWARD_FYI';
2644:
2645: l_debug_stmt CONSTANT NUMBER := fnd_log.level_statement;
2646: l_debug_proc CONSTANT NUMBER := fnd_log.level_procedure;
2647: l_debug_runtime CONSTANT NUMBER := fnd_log.g_current_runtime_level;
2648: l_debug_exception CONSTANT NUMBER := fnd_log.level_exception;
2649:
2650:
2643: l_debug_module CONSTANT VARCHAR2(100) := 'ahl.plsql.'||G_PKG_NAME||'.NR_NTF_FORWARD_FYI';
2644:
2645: l_debug_stmt CONSTANT NUMBER := fnd_log.level_statement;
2646: l_debug_proc CONSTANT NUMBER := fnd_log.level_procedure;
2647: l_debug_runtime CONSTANT NUMBER := fnd_log.g_current_runtime_level;
2648: l_debug_exception CONSTANT NUMBER := fnd_log.level_exception;
2649:
2650:
2651: l_return_status VARCHAR2(1);
2644:
2645: l_debug_stmt CONSTANT NUMBER := fnd_log.level_statement;
2646: l_debug_proc CONSTANT NUMBER := fnd_log.level_procedure;
2647: l_debug_runtime CONSTANT NUMBER := fnd_log.g_current_runtime_level;
2648: l_debug_exception CONSTANT NUMBER := fnd_log.level_exception;
2649:
2650:
2651: l_return_status VARCHAR2(1);
2652: l_msg_count NUMBER;
2665: BEGIN
2666:
2667: IF (l_debug_proc >= l_debug_runtime)
2668: THEN
2669: fnd_log.string
2670: (
2671: l_debug_proc,
2672: l_debug_module||'.begin',
2673: 'At the start of PLSQL procedure'
2716: document := l_body || l_requester_note;
2717:
2718: IF (l_debug_stmt >= l_debug_runtime)
2719: THEN
2720: fnd_log.string
2721: (
2722: l_debug_stmt,
2723: l_debug_module,
2724: 'document='||document
2726: END IF;
2727:
2728: IF (l_debug_proc >= l_debug_runtime)
2729: THEN
2730: fnd_log.string
2731: (
2732: l_debug_proc,
2733: l_debug_module||'.end',
2734: 'At the end of PLSQL procedure'
2757: );
2758:
2759: IF (l_debug_exception >= l_debug_runtime)
2760: THEN
2761: fnd_log.string
2762: (
2763: l_debug_exception,
2764: l_debug_module,
2765: l_error_msg
2808:
2809: -- Declare local variables
2810: l_debug_module CONSTANT VARCHAR2(100) := 'ahl.plsql.'||G_PKG_NAME||'.NR_NTF_APPROVED_FYI';
2811:
2812: l_debug_stmt CONSTANT NUMBER := fnd_log.level_statement;
2813: l_debug_proc CONSTANT NUMBER := fnd_log.level_procedure;
2814: l_debug_runtime CONSTANT NUMBER := fnd_log.g_current_runtime_level;
2815: l_debug_exception CONSTANT NUMBER := fnd_log.level_exception;
2816:
2809: -- Declare local variables
2810: l_debug_module CONSTANT VARCHAR2(100) := 'ahl.plsql.'||G_PKG_NAME||'.NR_NTF_APPROVED_FYI';
2811:
2812: l_debug_stmt CONSTANT NUMBER := fnd_log.level_statement;
2813: l_debug_proc CONSTANT NUMBER := fnd_log.level_procedure;
2814: l_debug_runtime CONSTANT NUMBER := fnd_log.g_current_runtime_level;
2815: l_debug_exception CONSTANT NUMBER := fnd_log.level_exception;
2816:
2817:
2810: l_debug_module CONSTANT VARCHAR2(100) := 'ahl.plsql.'||G_PKG_NAME||'.NR_NTF_APPROVED_FYI';
2811:
2812: l_debug_stmt CONSTANT NUMBER := fnd_log.level_statement;
2813: l_debug_proc CONSTANT NUMBER := fnd_log.level_procedure;
2814: l_debug_runtime CONSTANT NUMBER := fnd_log.g_current_runtime_level;
2815: l_debug_exception CONSTANT NUMBER := fnd_log.level_exception;
2816:
2817:
2818: l_return_status VARCHAR2(1);
2811:
2812: l_debug_stmt CONSTANT NUMBER := fnd_log.level_statement;
2813: l_debug_proc CONSTANT NUMBER := fnd_log.level_procedure;
2814: l_debug_runtime CONSTANT NUMBER := fnd_log.g_current_runtime_level;
2815: l_debug_exception CONSTANT NUMBER := fnd_log.level_exception;
2816:
2817:
2818: l_return_status VARCHAR2(1);
2819: l_msg_count NUMBER;
2830: l_requester_note VARCHAR2(4000);
2831:
2832: BEGIN
2833:
2834: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
2835: THEN
2836: fnd_log.string
2837: (
2838: fnd_log.level_procedure,
2832: BEGIN
2833:
2834: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
2835: THEN
2836: fnd_log.string
2837: (
2838: fnd_log.level_procedure,
2839: l_debug_module||'.begin',
2840: 'At the start of PLSQL procedure'
2834: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
2835: THEN
2836: fnd_log.string
2837: (
2838: fnd_log.level_procedure,
2839: l_debug_module||'.begin',
2840: 'At the start of PLSQL procedure'
2841: );
2842: END IF;
2881: l_body := fnd_message.get;
2882:
2883: document := document || l_body || l_requester_note;
2884:
2885: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
2886: THEN
2887: fnd_log.string
2888: (
2889: fnd_log.level_statement,
2883: document := document || l_body || l_requester_note;
2884:
2885: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
2886: THEN
2887: fnd_log.string
2888: (
2889: fnd_log.level_statement,
2890: l_debug_module,
2891: 'document='||document
2885: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
2886: THEN
2887: fnd_log.string
2888: (
2889: fnd_log.level_statement,
2890: l_debug_module,
2891: 'document='||document
2892: );
2893: END IF;
2891: 'document='||document
2892: );
2893: END IF;
2894:
2895: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
2896: THEN
2897: fnd_log.string
2898: (
2899: fnd_log.level_procedure,
2893: END IF;
2894:
2895: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
2896: THEN
2897: fnd_log.string
2898: (
2899: fnd_log.level_procedure,
2900: l_debug_module||'.end',
2901: 'At the end of PLSQL procedure'
2895: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
2896: THEN
2897: fnd_log.string
2898: (
2899: fnd_log.level_procedure,
2900: l_debug_module||'.end',
2901: 'At the end of PLSQL procedure'
2902: );
2903: END IF;
2921: p_attr_name => 'ERROR_MSG',
2922: x_error_msg => l_error_msg
2923: );
2924:
2925: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
2926: THEN
2927: fnd_log.string
2928: (
2929: fnd_log.level_exception,
2923: );
2924:
2925: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
2926: THEN
2927: fnd_log.string
2928: (
2929: fnd_log.level_exception,
2930: l_debug_module,
2931: l_error_msg
2925: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
2926: THEN
2927: fnd_log.string
2928: (
2929: fnd_log.level_exception,
2930: l_debug_module,
2931: l_error_msg
2932: );
2933: END IF;
2990: l_requester_note VARCHAR2(4000);
2991:
2992: BEGIN
2993:
2994: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
2995: THEN
2996: fnd_log.string
2997: (
2998: fnd_log.level_procedure,
2992: BEGIN
2993:
2994: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
2995: THEN
2996: fnd_log.string
2997: (
2998: fnd_log.level_procedure,
2999: l_debug_module||'.begin',
3000: 'At the start of PLSQL procedure'
2994: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
2995: THEN
2996: fnd_log.string
2997: (
2998: fnd_log.level_procedure,
2999: l_debug_module||'.begin',
3000: 'At the start of PLSQL procedure'
3001: );
3002: END IF;
3033: l_body := fnd_message.get;
3034:
3035: document := l_body || l_requester_note;
3036:
3037: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
3038: THEN
3039: fnd_log.string
3040: (
3041: fnd_log.level_statement,
3035: document := l_body || l_requester_note;
3036:
3037: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
3038: THEN
3039: fnd_log.string
3040: (
3041: fnd_log.level_statement,
3042: l_debug_module,
3043: 'document='||document
3037: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
3038: THEN
3039: fnd_log.string
3040: (
3041: fnd_log.level_statement,
3042: l_debug_module,
3043: 'document='||document
3044: );
3045: END IF;
3043: 'document='||document
3044: );
3045: END IF;
3046:
3047: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
3048: THEN
3049: fnd_log.string
3050: (
3051: fnd_log.level_procedure,
3045: END IF;
3046:
3047: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
3048: THEN
3049: fnd_log.string
3050: (
3051: fnd_log.level_procedure,
3052: l_debug_module||'.end',
3053: 'At the end of PLSQL procedure'
3047: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
3048: THEN
3049: fnd_log.string
3050: (
3051: fnd_log.level_procedure,
3052: l_debug_module||'.end',
3053: 'At the end of PLSQL procedure'
3054: );
3055: END IF;
3074: p_attr_name => 'ERROR_MSG',
3075: x_error_msg => l_error_msg
3076: );
3077:
3078: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
3079: THEN
3080: fnd_log.string
3081: (
3082: fnd_log.level_exception,
3076: );
3077:
3078: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
3079: THEN
3080: fnd_log.string
3081: (
3082: fnd_log.level_exception,
3083: l_debug_module,
3084: l_error_msg
3078: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
3079: THEN
3080: fnd_log.string
3081: (
3082: fnd_log.level_exception,
3083: l_debug_module,
3084: l_error_msg
3085: );
3086: END IF;
3146: l_approver_note VARCHAR2(4000);
3147:
3148: BEGIN
3149:
3150: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
3151: THEN
3152: fnd_log.string
3153: (
3154: fnd_log.level_procedure,
3148: BEGIN
3149:
3150: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
3151: THEN
3152: fnd_log.string
3153: (
3154: fnd_log.level_procedure,
3155: l_debug_module||'.begin',
3156: 'At the start of PLSQL procedure'
3150: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
3151: THEN
3152: fnd_log.string
3153: (
3154: fnd_log.level_procedure,
3155: l_debug_module||'.begin',
3156: 'At the start of PLSQL procedure'
3157: );
3158: END IF;
3204: l_body := fnd_message.get;
3205:
3206: document := l_body || l_requester_note;
3207:
3208: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
3209: THEN
3210: fnd_log.string
3211: (
3212: fnd_log.level_statement,
3206: document := l_body || l_requester_note;
3207:
3208: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
3209: THEN
3210: fnd_log.string
3211: (
3212: fnd_log.level_statement,
3213: l_debug_module,
3214: 'document='||document
3208: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
3209: THEN
3210: fnd_log.string
3211: (
3212: fnd_log.level_statement,
3213: l_debug_module,
3214: 'document='||document
3215: );
3216: END IF;
3214: 'document='||document
3215: );
3216: END IF;
3217:
3218: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
3219: THEN
3220: fnd_log.string
3221: (
3222: fnd_log.level_procedure,
3216: END IF;
3217:
3218: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
3219: THEN
3220: fnd_log.string
3221: (
3222: fnd_log.level_procedure,
3223: l_debug_module||'.end',
3224: 'At the end of PLSQL procedure'
3218: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
3219: THEN
3220: fnd_log.string
3221: (
3222: fnd_log.level_procedure,
3223: l_debug_module||'.end',
3224: 'At the end of PLSQL procedure'
3225: );
3226: END IF;
3243: p_attr_name => 'ERROR_MSG',
3244: x_error_msg => l_error_msg
3245: );
3246:
3247: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
3248: THEN
3249: fnd_log.string
3250: (
3251: fnd_log.level_exception,
3245: );
3246:
3247: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
3248: THEN
3249: fnd_log.string
3250: (
3251: fnd_log.level_exception,
3252: l_debug_module,
3253: l_error_msg
3247: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
3248: THEN
3249: fnd_log.string
3250: (
3251: fnd_log.level_exception,
3252: l_debug_module,
3253: l_error_msg
3254: );
3255: END IF;
3314: l_error_msg VARCHAR2(2000);
3315:
3316: BEGIN
3317:
3318: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
3319: THEN
3320: fnd_log.string
3321: (
3322: fnd_log.level_procedure,
3316: BEGIN
3317:
3318: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
3319: THEN
3320: fnd_log.string
3321: (
3322: fnd_log.level_procedure,
3323: l_debug_module||'.begin',
3324: 'At the start of PLSQL procedure'
3318: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
3319: THEN
3320: fnd_log.string
3321: (
3322: fnd_log.level_procedure,
3323: l_debug_module||'.begin',
3324: 'At the start of PLSQL procedure'
3325: );
3326: END IF;
3371: l_body := fnd_message.get;
3372:
3373: document := l_body || l_requester_note;
3374:
3375: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
3376: THEN
3377: fnd_log.string
3378: (
3379: fnd_log.level_statement,
3373: document := l_body || l_requester_note;
3374:
3375: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
3376: THEN
3377: fnd_log.string
3378: (
3379: fnd_log.level_statement,
3380: l_debug_module,
3381: 'document='||document
3375: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
3376: THEN
3377: fnd_log.string
3378: (
3379: fnd_log.level_statement,
3380: l_debug_module,
3381: 'document='||document
3382: );
3383: END IF;
3381: 'document='||document
3382: );
3383: END IF;
3384:
3385: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
3386: THEN
3387: fnd_log.string
3388: (
3389: fnd_log.level_procedure,
3383: END IF;
3384:
3385: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
3386: THEN
3387: fnd_log.string
3388: (
3389: fnd_log.level_procedure,
3390: l_debug_module||'.end',
3391: 'At the end of PLSQL procedure'
3385: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
3386: THEN
3387: fnd_log.string
3388: (
3389: fnd_log.level_procedure,
3390: l_debug_module||'.end',
3391: 'At the end of PLSQL procedure'
3392: );
3393: END IF;
3410: p_attr_name => 'ERROR_MSG',
3411: x_error_msg => l_error_msg
3412: );
3413:
3414: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
3415: THEN
3416: fnd_log.string
3417: (
3418: fnd_log.level_exception,
3412: );
3413:
3414: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
3415: THEN
3416: fnd_log.string
3417: (
3418: fnd_log.level_exception,
3419: l_debug_module,
3420: l_error_msg
3414: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
3415: THEN
3416: fnd_log.string
3417: (
3418: fnd_log.level_exception,
3419: l_debug_module,
3420: l_error_msg
3421: );
3422: END IF;
3480: l_error_msg VARCHAR2(2000);
3481:
3482: BEGIN
3483:
3484: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
3485: THEN
3486: fnd_log.string
3487: (
3488: fnd_log.level_procedure,
3482: BEGIN
3483:
3484: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
3485: THEN
3486: fnd_log.string
3487: (
3488: fnd_log.level_procedure,
3489: l_debug_module||'.begin',
3490: 'At the start of PLSQL procedure'
3484: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
3485: THEN
3486: fnd_log.string
3487: (
3488: fnd_log.level_procedure,
3489: l_debug_module||'.begin',
3490: 'At the start of PLSQL procedure'
3491: );
3492: END IF;
3533: CLOSE get_ue_mel_cdl_details;
3534: fnd_message.set_name('AHL', 'AHL_MEL_CDL_NTF_ID_INVALID');
3535: fnd_message.set_token('HDR_ID', l_object_id, false);
3536: fnd_msg_pub.add;
3537: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
3538: THEN
3539: fnd_log.message
3540: (
3541: fnd_log.level_exception,
3535: fnd_message.set_token('HDR_ID', l_object_id, false);
3536: fnd_msg_pub.add;
3537: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
3538: THEN
3539: fnd_log.message
3540: (
3541: fnd_log.level_exception,
3542: l_debug_module,
3543: false
3537: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
3538: THEN
3539: fnd_log.message
3540: (
3541: fnd_log.level_exception,
3542: l_debug_module,
3543: false
3544: );
3545: END IF;
3554: l_body := fnd_message.get;
3555:
3556: document := l_body || l_requester_note;
3557:
3558: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
3559: THEN
3560: fnd_log.string
3561: (
3562: fnd_log.level_statement,
3556: document := l_body || l_requester_note;
3557:
3558: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
3559: THEN
3560: fnd_log.string
3561: (
3562: fnd_log.level_statement,
3563: l_debug_module,
3564: 'document='||document
3558: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
3559: THEN
3560: fnd_log.string
3561: (
3562: fnd_log.level_statement,
3563: l_debug_module,
3564: 'document='||document
3565: );
3566: END IF;
3564: 'document='||document
3565: );
3566: END IF;
3567:
3568: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
3569: THEN
3570: fnd_log.string
3571: (
3572: fnd_log.level_procedure,
3566: END IF;
3567:
3568: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
3569: THEN
3570: fnd_log.string
3571: (
3572: fnd_log.level_procedure,
3573: l_debug_module||'.end',
3574: 'At the end of PLSQL procedure'
3568: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
3569: THEN
3570: fnd_log.string
3571: (
3572: fnd_log.level_procedure,
3573: l_debug_module||'.end',
3574: 'At the end of PLSQL procedure'
3575: );
3576: END IF;
3593: p_attr_name => 'ERROR_MSG',
3594: x_error_msg => l_error_msg
3595: );
3596:
3597: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
3598: THEN
3599: fnd_log.string
3600: (
3601: fnd_log.level_exception,
3595: );
3596:
3597: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
3598: THEN
3599: fnd_log.string
3600: (
3601: fnd_log.level_exception,
3602: l_debug_module,
3603: l_error_msg
3597: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
3598: THEN
3599: fnd_log.string
3600: (
3601: fnd_log.level_exception,
3602: l_debug_module,
3603: l_error_msg
3604: );
3605: END IF;
3664: l_requester_note VARCHAR2(4000);
3665:
3666: BEGIN
3667:
3668: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
3669: THEN
3670: fnd_log.string
3671: (
3672: fnd_log.level_procedure,
3666: BEGIN
3667:
3668: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
3669: THEN
3670: fnd_log.string
3671: (
3672: fnd_log.level_procedure,
3673: l_debug_module||'.begin',
3674: 'At the start of PLSQL procedure'
3668: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
3669: THEN
3670: fnd_log.string
3671: (
3672: fnd_log.level_procedure,
3673: l_debug_module||'.begin',
3674: 'At the start of PLSQL procedure'
3675: );
3676: END IF;
3714: l_body := fnd_message.get;
3715:
3716: document := l_body || l_requester_note;
3717:
3718: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
3719: THEN
3720: fnd_log.string
3721: (
3722: fnd_log.level_statement,
3716: document := l_body || l_requester_note;
3717:
3718: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
3719: THEN
3720: fnd_log.string
3721: (
3722: fnd_log.level_statement,
3723: l_debug_module,
3724: 'document='||document
3718: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
3719: THEN
3720: fnd_log.string
3721: (
3722: fnd_log.level_statement,
3723: l_debug_module,
3724: 'document='||document
3725: );
3726: END IF;
3724: 'document='||document
3725: );
3726: END IF;
3727:
3728: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
3729: THEN
3730: fnd_log.string
3731: (
3732: fnd_log.level_procedure,
3726: END IF;
3727:
3728: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
3729: THEN
3730: fnd_log.string
3731: (
3732: fnd_log.level_procedure,
3733: l_debug_module||'.end',
3734: 'At the end of PLSQL procedure'
3728: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
3729: THEN
3730: fnd_log.string
3731: (
3732: fnd_log.level_procedure,
3733: l_debug_module||'.end',
3734: 'At the end of PLSQL procedure'
3735: );
3736: END IF;
3755: p_attr_name => 'ERROR_MSG',
3756: x_error_msg => l_error_msg
3757: );
3758:
3759: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
3760: THEN
3761: fnd_log.string
3762: (
3763: fnd_log.level_exception,
3757: );
3758:
3759: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
3760: THEN
3761: fnd_log.string
3762: (
3763: fnd_log.level_exception,
3764: l_debug_module,
3765: l_error_msg
3759: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
3760: THEN
3761: fnd_log.string
3762: (
3763: fnd_log.level_exception,
3764: l_debug_module,
3765: l_error_msg
3766: );
3767: END IF;
3846: l_deferral_rec ue_deferral_csr%ROWTYPE;
3847: l_ue_rec unit_effect_csr%ROWTYPE;
3848:
3849: BEGIN
3850: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
3851: fnd_log.string
3852: (
3853: fnd_log.level_procedure,
3854: l_debug_module || '.begin',
3847: l_ue_rec unit_effect_csr%ROWTYPE;
3848:
3849: BEGIN
3850: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
3851: fnd_log.string
3852: (
3853: fnd_log.level_procedure,
3854: l_debug_module || '.begin',
3855: 'At the start of PLSQL procedure'
3849: BEGIN
3850: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
3851: fnd_log.string
3852: (
3853: fnd_log.level_procedure,
3854: l_debug_module || '.begin',
3855: 'At the start of PLSQL procedure'
3856: );
3857: END IF;
3892: SOURCE_LANG = userenv('LANG')
3893: WHERE unit_deferral_id = l_object_id
3894: AND userenv('LANG') IN (LANGUAGE, SOURCE_LANG);
3895:
3896: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
3897: fnd_log.string
3898: (
3899: fnd_log.level_statement,
3900: l_debug_module,
3893: WHERE unit_deferral_id = l_object_id
3894: AND userenv('LANG') IN (LANGUAGE, SOURCE_LANG);
3895:
3896: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
3897: fnd_log.string
3898: (
3899: fnd_log.level_statement,
3900: l_debug_module,
3901: 'unit_deferral_id : ' || l_object_id
3895:
3896: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
3897: fnd_log.string
3898: (
3899: fnd_log.level_statement,
3900: l_debug_module,
3901: 'unit_deferral_id : ' || l_object_id
3902: );
3903: fnd_log.string
3899: fnd_log.level_statement,
3900: l_debug_module,
3901: 'unit_deferral_id : ' || l_object_id
3902: );
3903: fnd_log.string
3904: (
3905: fnd_log.level_statement,
3906: l_debug_module,
3907: 'object_version_number : ' || l_object_version_number
3901: 'unit_deferral_id : ' || l_object_id
3902: );
3903: fnd_log.string
3904: (
3905: fnd_log.level_statement,
3906: l_debug_module,
3907: 'object_version_number : ' || l_object_version_number
3908: );
3909: fnd_log.string
3905: fnd_log.level_statement,
3906: l_debug_module,
3907: 'object_version_number : ' || l_object_version_number
3908: );
3909: fnd_log.string
3910: (
3911: fnd_log.level_statement,
3912: l_debug_module,
3913: 'approval status : ' || l_approval_status
3907: 'object_version_number : ' || l_object_version_number
3908: );
3909: fnd_log.string
3910: (
3911: fnd_log.level_statement,
3912: l_debug_module,
3913: 'approval status : ' || l_approval_status
3914: );
3915:
3985: x_return_status => l_return_status
3986: );
3987: END IF;
3988:
3989: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
3990: fnd_log.string
3991: (
3992: fnd_log.level_statement,
3993: l_debug_module,
3986: );
3987: END IF;
3988:
3989: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
3990: fnd_log.string
3991: (
3992: fnd_log.level_statement,
3993: l_debug_module,
3994: 'new status : ' || l_new_status
3988:
3989: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
3990: fnd_log.string
3991: (
3992: fnd_log.level_statement,
3993: l_debug_module,
3994: 'new status : ' || l_new_status
3995: );
3996: fnd_log.string
3992: fnd_log.level_statement,
3993: l_debug_module,
3994: 'new status : ' || l_new_status
3995: );
3996: fnd_log.string
3997: (
3998: fnd_log.level_statement,
3999: l_debug_module,
4000: 'return status after process_approval_rejected API call : ' || l_return_status
3994: 'new status : ' || l_new_status
3995: );
3996: fnd_log.string
3997: (
3998: fnd_log.level_statement,
3999: l_debug_module,
4000: 'return status after process_approval_rejected API call : ' || l_return_status
4001: );
4002: END IF;
4010: ELSIF (funcmode IN ('CANCEL','TIMEOUT'))THEN
4011: resultout := 'COMPLETE:';
4012: END IF;
4013:
4014: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
4015: fnd_log.string
4016: (
4017: fnd_log.level_procedure,
4018: l_debug_module,
4011: resultout := 'COMPLETE:';
4012: END IF;
4013:
4014: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
4015: fnd_log.string
4016: (
4017: fnd_log.level_procedure,
4018: l_debug_module,
4019:
4013:
4014: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
4015: fnd_log.string
4016: (
4017: fnd_log.level_procedure,
4018: l_debug_module,
4019:
4020: 'At the end of PLSQL procedure'
4021: );
4045: 'NR_UPDATE_STATUS',
4046: itemtype,itemkey,l_error_msg);
4047:
4048:
4049: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
4050: fnd_log.string
4051: (
4052: fnd_log.level_statement,
4053: l_debug_module,
4046: itemtype,itemkey,l_error_msg);
4047:
4048:
4049: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
4050: fnd_log.string
4051: (
4052: fnd_log.level_statement,
4053: l_debug_module,
4054: 'Processing Exception'
4048:
4049: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
4050: fnd_log.string
4051: (
4052: fnd_log.level_statement,
4053: l_debug_module,
4054: 'Processing Exception'
4055: );
4056: END IF;
4149: l_error_msg VARCHAR2(2000);
4150:
4151: BEGIN
4152:
4153: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
4154: THEN
4155: fnd_log.string
4156: (
4157: fnd_log.level_procedure,
4151: BEGIN
4152:
4153: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
4154: THEN
4155: fnd_log.string
4156: (
4157: fnd_log.level_procedure,
4158: l_debug_module||'.begin',
4159: 'At the start of PLSQL procedure'
4153: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
4154: THEN
4155: fnd_log.string
4156: (
4157: fnd_log.level_procedure,
4158: l_debug_module||'.begin',
4159: 'At the start of PLSQL procedure'
4160: );
4161: END IF;
4203: fnd_message.set_name('AHL', 'AHL_MEL_CDL_NTF_ID_INVALID');
4204: fnd_message.set_token('HDR_ID', l_object_id, false);
4205: fnd_msg_pub.add;
4206:
4207: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
4208: THEN
4209: fnd_log.message
4210: (
4211: fnd_log.level_exception,
4205: fnd_msg_pub.add;
4206:
4207: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
4208: THEN
4209: fnd_log.message
4210: (
4211: fnd_log.level_exception,
4212: l_debug_module,
4213: false
4207: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
4208: THEN
4209: fnd_log.message
4210: (
4211: fnd_log.level_exception,
4212: l_debug_module,
4213: false
4214: );
4215: END IF;
4227: p_new_status => l_orig_status,
4228: x_return_status => l_return_status
4229: );
4230:
4231: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
4232: fnd_log.string
4233: (
4234: fnd_log.level_statement,
4235: l_debug_module,
4228: x_return_status => l_return_status
4229: );
4230:
4231: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
4232: fnd_log.string
4233: (
4234: fnd_log.level_statement,
4235: l_debug_module,
4236: 'return status after process_approval_rejected API call : ' || l_return_status
4230:
4231: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
4232: fnd_log.string
4233: (
4234: fnd_log.level_statement,
4235: l_debug_module,
4236: 'return status after process_approval_rejected API call : ' || l_return_status
4237: );
4238: END IF;
4262: THEN
4263: resultout := 'COMPLETE:';
4264: END IF;
4265:
4266: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
4267: THEN
4268: fnd_log.string
4269: (
4270: fnd_log.level_procedure,
4264: END IF;
4265:
4266: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
4267: THEN
4268: fnd_log.string
4269: (
4270: fnd_log.level_procedure,
4271: l_debug_module||'.end',
4272: 'At the end of PLSQL procedure'
4266: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)
4267: THEN
4268: fnd_log.string
4269: (
4270: fnd_log.level_procedure,
4271: l_debug_module||'.end',
4272: 'At the end of PLSQL procedure'
4273: );
4274: END IF;
4293: p_attr_name => 'ERROR_MSG',
4294: x_error_msg => l_error_msg
4295: );
4296:
4297: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
4298: THEN
4299: fnd_log.string
4300: (
4301: fnd_log.level_exception,
4295: );
4296:
4297: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
4298: THEN
4299: fnd_log.string
4300: (
4301: fnd_log.level_exception,
4302: l_debug_module,
4303: l_error_msg
4297: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
4298: THEN
4299: fnd_log.string
4300: (
4301: fnd_log.level_exception,
4302: l_debug_module,
4303: l_error_msg
4304: );
4305: END IF;
4393:
4394: l_error_msg VARCHAR2(2000);
4395:
4396: BEGIN
4397: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
4398: fnd_log.string
4399: (
4400: fnd_log.level_statement,
4401: 'NR_Rollback_Status',
4394: l_error_msg VARCHAR2(2000);
4395:
4396: BEGIN
4397: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
4398: fnd_log.string
4399: (
4400: fnd_log.level_statement,
4401: 'NR_Rollback_Status',
4402: 'Start of API call'
4396: BEGIN
4397: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
4398: fnd_log.string
4399: (
4400: fnd_log.level_statement,
4401: 'NR_Rollback_Status',
4402: 'Start of API call'
4403: );
4404: END IF;
4409: p_new_status => p_new_status,
4410: x_return_status => l_return_status
4411: );
4412:
4413: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
4414: fnd_log.string
4415: (
4416: fnd_log.level_statement,
4417: l_debug_module,
4410: x_return_status => l_return_status
4411: );
4412:
4413: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
4414: fnd_log.string
4415: (
4416: fnd_log.level_statement,
4417: l_debug_module,
4418: 'return status after process_approval_rejected API call : ' || l_return_status
4412:
4413: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
4414: fnd_log.string
4415: (
4416: fnd_log.level_statement,
4417: l_debug_module,
4418: 'return status after process_approval_rejected API call : ' || l_return_status
4419: );
4420: END IF;
4444: p_attr_name => 'ERROR_MSG',
4445: x_error_msg => l_error_msg
4446: );
4447:
4448: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
4449: THEN
4450: fnd_log.string
4451: (
4452: fnd_log.level_exception,
4446: );
4447:
4448: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
4449: THEN
4450: fnd_log.string
4451: (
4452: fnd_log.level_exception,
4453: l_debug_module,
4454: l_error_msg
4448: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)
4449: THEN
4450: fnd_log.string
4451: (
4452: fnd_log.level_exception,
4453: l_debug_module,
4454: l_error_msg
4455: );
4456: END IF;