[Home] [Help]
83: l_hyphen_pos1 := INSTR (document_id, ':');
84: l_item_type := SUBSTR (document_id, 1, l_hyphen_pos1 - 1);
85: l_item_key := SUBSTR (document_id, l_hyphen_pos1 + 1);
86: l_object_type :=
87: wf_engine.getitemattrtext (itemtype => l_item_type,
88: itemkey => l_item_key,
89: aname => 'AMW_OBJECT_TYPE'
90: );
91: l_object_meaning :=
88: itemkey => l_item_key,
89: aname => 'AMW_OBJECT_TYPE'
90: );
91: l_object_meaning :=
92: wf_engine.getitemattrtext (itemtype => l_item_type,
93: itemkey => l_item_key,
94: aname => 'AMW_APPROVAL_OBJECT_MEANING'
95: );
96: l_ap_rev_id :=
93: itemkey => l_item_key,
94: aname => 'AMW_APPROVAL_OBJECT_MEANING'
95: );
96: l_ap_rev_id :=
97: wf_engine.getitemattrtext (itemtype => l_item_type,
98: itemkey => l_item_key,
99: aname => 'AMW_OBJECT_ID'
100: );
101: /*7/2/2003 mpande not required
99: aname => 'AMW_OBJECT_ID'
100: );
101: /*7/2/2003 mpande not required
102: l_note :=
103: wf_engine.getitemattrtext (
104: itemtype=> l_item_type,
105: itemkey=> l_item_key,
106: aname => 'AMW_NOTES_FROM_REQUESTOR'
107: );
106: aname => 'AMW_NOTES_FROM_REQUESTOR'
107: );
108: */
109: l_approver :=
110: wf_engine.getitemattrtext (itemtype => l_item_type,
111: itemkey => l_item_key,
112: aname => 'AMW_APPROVER_DISPLAY_NAME'
113: );
114: OPEN c_ap_rec (l_ap_rev_id);
121: fnd_message.set_token ('NAME', l_ap_name, FALSE);
122: fnd_message.set_token ('OBJECT_TYPE', l_object_meaning, FALSE);
123: l_string := SUBSTR (fnd_message.get, 1, 1000);
124: /*
125: wf_engine.setitemattrtext (
126: itemtype=> l_item_type,
127: itemkey=> l_item_key,
128: aname => 'FYI_SUBJECT',
129: avalue=> l_string
134: fnd_message.set_token ('APPROVER_NAME', l_approver, FALSE);
135: fnd_message.set_token ('REQUESTOR_NAME', l_requestor_name, FALSE);
136: l_string1 := SUBSTR (fnd_message.get, 1, 2500);
137: /*
138: l_note := wf_engine.getitemattrtext(
139: itemtype => l_item_type
140: ,itemkey => l_item_key
141: ,aname => 'NOTE');
142:
141: ,aname => 'NOTE');
142:
143:
144: l_forwarder :=
145: wf_engine.getitemattrtext(
146: itemtype => l_item_type
147: ,itemkey => l_item_key
148: ,aname => 'AMW_FORWARD_FROM_USERNAME');
149: */
250: l_hyphen_pos1 := INSTR (document_id, ':');
251: l_item_type := SUBSTR (document_id, 1, l_hyphen_pos1 - 1);
252: l_item_key := SUBSTR (document_id, l_hyphen_pos1 + 1);
253: l_object_type :=
254: wf_engine.getitemattrtext (itemtype => l_item_type,
255: itemkey => l_item_key,
256: aname => 'AMW_OBJECT_TYPE'
257: );
258: l_object_meaning :=
255: itemkey => l_item_key,
256: aname => 'AMW_OBJECT_TYPE'
257: );
258: l_object_meaning :=
259: wf_engine.getitemattrtext (itemtype => l_item_type,
260: itemkey => l_item_key,
261: aname => 'AMW_APPROVAL_OBJECT_MEANING'
262: );
263: l_ap_rev_id :=
260: itemkey => l_item_key,
261: aname => 'AMW_APPROVAL_OBJECT_MEANING'
262: );
263: l_ap_rev_id :=
264: wf_engine.getitemattrtext (itemtype => l_item_type,
265: itemkey => l_item_key,
266: aname => 'AMW_OBJECT_ID'
267: );
268: l_note :=
265: itemkey => l_item_key,
266: aname => 'AMW_OBJECT_ID'
267: );
268: l_note :=
269: wf_engine.getitemattrtext (itemtype => l_item_type,
270: itemkey => l_item_key,
271: aname => 'AMW_NOTES_FROM_REQUESTOR'
272: );
273: l_approver :=
270: itemkey => l_item_key,
271: aname => 'AMW_NOTES_FROM_REQUESTOR'
272: );
273: l_approver :=
274: wf_engine.getitemattrtext (itemtype => l_item_type,
275: itemkey => l_item_key,
276: aname => 'AMW_APPROVER_DISPLAY_NAME'
277: );
278: OPEN c_ap_rec (l_ap_rev_id);
290: fnd_message.set_token ('APPROVER_NAME', l_approver, FALSE);
291: fnd_message.set_token ('REQUESTOR_NAME', l_requestor_name, FALSE);
292: l_string1 := SUBSTR (fnd_message.get, 1, 2500);
293: /*
294: l_note := wf_engine.getitemattrtext(
295: itemtype => l_item_type
296: ,itemkey => l_item_key
297: ,aname => 'NOTE');
298:
297: ,aname => 'NOTE');
298:
299:
300: l_forwarder :=
301: wf_engine.getitemattrtext(
302: itemtype => l_item_type
303: ,itemkey => l_item_key
304: ,aname => 'AMW_FORWARD_FROM_USERNAME');
305: */
303: ,itemkey => l_item_key
304: ,aname => 'AMW_FORWARD_FROM_USERNAME');
305: */
306: l_approver_note :=
307: wf_engine.getitemattrtext (itemtype => l_item_type,
308: itemkey => l_item_key,
309: aname => 'APPROVAL_NOTE'
310: );
311: SELECT SYSDATE
416: l_hyphen_pos1 := INSTR (document_id, ':');
417: l_item_type := SUBSTR (document_id, 1, l_hyphen_pos1 - 1);
418: l_item_key := SUBSTR (document_id, l_hyphen_pos1 + 1);
419: l_object_type :=
420: wf_engine.getitemattrtext (itemtype => l_item_type,
421: itemkey => l_item_key,
422: aname => 'AMW_OBJECT_TYPE'
423: );
424: l_object_meaning :=
421: itemkey => l_item_key,
422: aname => 'AMW_OBJECT_TYPE'
423: );
424: l_object_meaning :=
425: wf_engine.getitemattrtext (itemtype => l_item_type,
426: itemkey => l_item_key,
427: aname => 'AMW_APPROVAL_OBJECT_MEANING'
428: );
429: l_ap_rev_id :=
426: itemkey => l_item_key,
427: aname => 'AMW_APPROVAL_OBJECT_MEANING'
428: );
429: l_ap_rev_id :=
430: wf_engine.getitemattrtext (itemtype => l_item_type,
431: itemkey => l_item_key,
432: aname => 'AMW_OBJECT_ID'
433: );
434: l_note :=
431: itemkey => l_item_key,
432: aname => 'AMW_OBJECT_ID'
433: );
434: l_note :=
435: wf_engine.getitemattrtext (itemtype => l_item_type,
436: itemkey => l_item_key,
437: aname => 'AMW_NOTES_FROM_REQUESTOR'
438: );
439: l_approver :=
436: itemkey => l_item_key,
437: aname => 'AMW_NOTES_FROM_REQUESTOR'
438: );
439: l_approver :=
440: wf_engine.getitemattrtext (itemtype => l_item_type,
441: itemkey => l_item_key,
442: aname => 'AMW_APPROVER'
443: );
444: /*
442: aname => 'AMW_APPROVER'
443: );
444: /*
445: l_requestor :=
446: wf_engine.getitemattrtext (
447: itemtype=> l_item_type,
448: itemkey=> l_item_key,
449: aname => 'AMW_REQUESTOR'
450: );
457: fnd_message.set_token ('NAME', l_ap_name, FALSE);
458: fnd_message.set_token ('OBJECT_TYPE', l_object_meaning, FALSE);
459: l_string := SUBSTR (fnd_message.get, 1, 1000);
460: /*
461: wf_engine.setitemattrtext (
462: itemtype=> l_item_type,
463: itemkey=> l_item_key,
464: aname => 'REJECT_SUBJECT',
465: avalue=> l_string
475: fnd_message.set_token ('REQUESTOR_NAME', '-', FALSE);
476: --fnd_message.set_token ('DESCRIPTION', l_note, FALSE);
477: l_string1 := SUBSTR (fnd_message.get, 1, 2500);
478: /*
479: l_note := wf_engine.getitemattrtext(
480: itemtype => l_item_type
481: ,itemkey => l_item_key
482: ,aname => 'NOTE');
483:
482: ,aname => 'NOTE');
483:
484:
485: l_forwarder :=
486: wf_engine.getitemattrtext(
487: itemtype => l_item_type
488: ,itemkey => l_item_key
489: ,aname => 'AMW_FORWARD_FROM_USERNAME');
490: */
488: ,itemkey => l_item_key
489: ,aname => 'AMW_FORWARD_FROM_USERNAME');
490: */
491: l_note :=
492: wf_engine.getitemattrtext (itemtype => l_item_type,
493: itemkey => l_item_key,
494: aname => 'APPROVAL_NOTE'
495: );
496: fnd_message.set_name ('AMW', 'AMW_WF_NTF_APPROVER_NOTE');
583: l_hyphen_pos1 := INSTR (document_id, ':');
584: l_item_type := SUBSTR (document_id, 1, l_hyphen_pos1 - 1);
585: l_item_key := SUBSTR (document_id, l_hyphen_pos1 + 1);
586: l_object_type :=
587: wf_engine.getitemattrtext (itemtype => l_item_type,
588: itemkey => l_item_key,
589: aname => 'AMW_OBJECT_TYPE'
590: );
591: l_ap_rev_id :=
588: itemkey => l_item_key,
589: aname => 'AMW_OBJECT_TYPE'
590: );
591: l_ap_rev_id :=
592: wf_engine.getitemattrtext (itemtype => l_item_type,
593: itemkey => l_item_key,
594: aname => 'AMW_OBJECT_ID'
595: );
596: l_note :=
593: itemkey => l_item_key,
594: aname => 'AMW_OBJECT_ID'
595: );
596: l_note :=
597: wf_engine.getitemattrtext (itemtype => l_item_type,
598: itemkey => l_item_key,
599: aname => 'AMW_NOTES_FROM_REQUESTOR'
600: );
601: l_approver :=
598: itemkey => l_item_key,
599: aname => 'AMW_NOTES_FROM_REQUESTOR'
600: );
601: l_approver :=
602: wf_engine.getitemattrtext (itemtype => l_item_type,
603: itemkey => l_item_key,
604: aname => 'AMW_APPROVER_DISPLAY_NAME'
605: );
606: /*
604: aname => 'AMW_APPROVER_DISPLAY_NAME'
605: );
606: /*
607: l_requestor :=
608: wf_engine.getitemattrtext (
609: itemtype=> l_item_type,
610: itemkey=> l_item_key,
611: aname => 'AMW_REQUESTOR'
612: );
621: fnd_message.set_token ('NAME', l_ap_name, FALSE);
622: fnd_message.set_token ('OBJECT_TYPE', l_lookup_meaning, FALSE);
623: l_string := SUBSTR (fnd_message.get, 1, 1000);
624: /*
625: wf_engine.setitemattrtext (
626: itemtype=> l_item_type,
627: itemkey=> l_item_key,
628: aname => 'APP_SUBJECT',
629: avalue=> l_string
637: fnd_message.set_token ('APPROVER_NAME', l_approver, FALSE);
638: --fnd_message.set_token ('DESCRIPTION', l_note, FALSE);
639: l_string1 := SUBSTR (fnd_message.get, 1, 2500);
640: l_note :=
641: NVL (wf_engine.getitemattrtext (itemtype => l_item_type,
642: itemkey => l_item_key,
643: aname => 'AMW_PREV_APPROVER_NOTE'
644: ),
645: '-'
644: ),
645: '-'
646: );
647: l_forwarder :=
648: NVL (wf_engine.getitemattrtext (itemtype => l_item_type,
649: itemkey => l_item_key,
650: aname => 'AMW_PREV_APPROVER_DISP_NAME'
651: ),
652: '-'
651: ),
652: '-'
653: );
654: l_approval_date :=
655: NVL (TO_CHAR (wf_engine.getitemattrdate (itemtype => l_item_type,
656: itemkey => l_item_key,
657: aname => 'AMW_APPROVAL_DATE'
658: )
659: ),
762: l_hyphen_pos1 := INSTR (document_id, ':');
763: l_item_type := SUBSTR (document_id, 1, l_hyphen_pos1 - 1);
764: l_item_key := SUBSTR (document_id, l_hyphen_pos1 + 1);
765: l_object_type :=
766: wf_engine.getitemattrtext (itemtype => l_item_type,
767: itemkey => l_item_key,
768: aname => 'AMW_OBJECT_TYPE'
769: );
770: l_object_meaning :=
767: itemkey => l_item_key,
768: aname => 'AMW_OBJECT_TYPE'
769: );
770: l_object_meaning :=
771: wf_engine.getitemattrtext (itemtype => l_item_type,
772: itemkey => l_item_key,
773: aname => 'AMW_APPROVAL_OBJECT_MEANING'
774: );
775: l_ap_rev_id :=
772: itemkey => l_item_key,
773: aname => 'AMW_APPROVAL_OBJECT_MEANING'
774: );
775: l_ap_rev_id :=
776: wf_engine.getitemattrtext (itemtype => l_item_type,
777: itemkey => l_item_key,
778: aname => 'AMW_OBJECT_ID'
779: );
780: l_note :=
777: itemkey => l_item_key,
778: aname => 'AMW_OBJECT_ID'
779: );
780: l_note :=
781: wf_engine.getitemattrtext (itemtype => l_item_type,
782: itemkey => l_item_key,
783: aname => 'AMW_NOTES_FROM_REQUESTOR'
784: );
785: l_approver :=
782: itemkey => l_item_key,
783: aname => 'AMW_NOTES_FROM_REQUESTOR'
784: );
785: l_approver :=
786: wf_engine.getitemattrtext (itemtype => l_item_type,
787: itemkey => l_item_key,
788: aname => 'AMW_APPROVER_DISPLAY_NAME'
789: );
790: l_requestor :=
787: itemkey => l_item_key,
788: aname => 'AMW_APPROVER_DISPLAY_NAME'
789: );
790: l_requestor :=
791: wf_engine.getitemattrtext (itemtype => l_item_type,
792: itemkey => l_item_key,
793: aname => 'AMW_REQUESTOR'
794: );
795: OPEN c_ap_rec (l_ap_rev_id);
800: fnd_message.set_token ('AP_NAME', l_ap_name, FALSE);
801: fnd_message.set_token ('OBJECT_TYPE', l_object_meaning, FALSE);
802: l_string := SUBSTR (fnd_message.get, 1, 1000);
803: /*
804: wf_engine.setitemattrtext (
805: itemtype=> l_item_type,
806: itemkey=> l_item_key,
807: aname => 'APP_SUBJECT',
808: avalue=> l_string
814: fnd_message.set_token ('REQUESTOR_NAME', l_approver, FALSE);
815: --fnd_message.set_token ('DESCRIPTION', l_note, FALSE);
816: l_string1 := SUBSTR (fnd_message.get, 1, 2500);
817: l_note :=
818: NVL (wf_engine.getitemattrtext (itemtype => l_item_type,
819: itemkey => l_item_key,
820: aname => 'AMW_PREV_APPROVER_NOTE'
821: ),
822: '-'
821: ),
822: '-'
823: );
824: l_forwarder :=
825: NVL (wf_engine.getitemattrtext (itemtype => l_item_type,
826: itemkey => l_item_key,
827: aname => 'AMW_PREV_APPROVER_DISP_NAME'
828: ),
829: '-'
828: ),
829: '-'
830: );
831: l_approval_date :=
832: NVL (TO_CHAR (wf_engine.getitemattrdate (itemtype => l_item_type,
833: itemkey => l_item_key,
834: aname => 'AMW_APPROVAL_DATE'
835: )
836: ),
841: fnd_message.set_token ('APPROVAL_DATE', l_approval_date, FALSE);
842: fnd_message.set_token ('COMMENTS', l_note, FALSE);
843: l_string2 := SUBSTR (fnd_message.get, 1, 2500);
844: /*
845: l_note := wf_engine.getitemattrtext(
846: itemtype => l_item_type
847: ,itemkey => l_item_key
848: ,aname => 'NOTE');
849:
848: ,aname => 'NOTE');
849:
850:
851: l_forwarder :=
852: wf_engine.getitemattrtext(
853: itemtype => l_item_type
854: ,itemkey => l_item_key
855: ,aname => 'AMW_FORWARD_FROM_USERNAME');
856: */
938: WHERE audit_procedure_rev_id = p_ap_rev_id;
939: BEGIN
940: fnd_msg_pub.initialize;
941: l_object_id :=
942: wf_engine.getitemattrnumber (itemtype => itemtype,
943: itemkey => itemkey,
944: aname => 'AMW_OBJECT_ID'
945: );
946: IF (funcmode = 'RUN') THEN
955: fnd_message.set_name ('AMW', 'AMW_WF_NTF_REQUESTOR_FYI_SUB');
956: fnd_message.set_token ('NAME', l_ap_name, FALSE);
957: fnd_message.set_token ('OBJECT_TYPE', l_lookup_meaning, FALSE);
958: l_string := SUBSTR (fnd_message.get, 1, 1000);
959: wf_engine.setitemattrtext (itemtype => itemtype,
960: itemkey => itemkey,
961: aname => 'FYI_SUBJECT',
962: avalue => l_string
963: );
964: fnd_message.set_name ('AMW', 'AMW_WF_NTF_REQUESTOR_APP_SUB');
965: fnd_message.set_token ('NAME', l_ap_name, FALSE);
966: fnd_message.set_token ('OBJECT_TYPE', l_lookup_meaning, FALSE);
967: l_string := SUBSTR (fnd_message.get, 1, 1000);
968: wf_engine.setitemattrtext (itemtype => itemtype,
969: itemkey => itemkey,
970: aname => 'APRV_SUBJECT',
971: avalue => l_string
972: );
973: fnd_message.set_name ('AMW', 'AMW_WF_NTF_REQUESTOR_REJ_SUB');
974: fnd_message.set_token ('NAME', l_ap_name, FALSE);
975: fnd_message.set_token ('OBJECT_TYPE', l_lookup_meaning, FALSE);
976: l_string := SUBSTR (fnd_message.get, 1, 1000);
977: wf_engine.setitemattrtext (itemtype => itemtype,
978: itemkey => itemkey,
979: aname => 'REJECT_SUBJECT',
980: avalue => l_string
981: );
982: fnd_message.set_name ('AMW', 'AMW_WF_NTF_APPROVER_OF_REQ_SUB');
983: fnd_message.set_token ('NAME', l_ap_name, FALSE);
984: fnd_message.set_token ('OBJECT_TYPE', l_lookup_meaning, FALSE);
985: l_string := SUBSTR (fnd_message.get, 1, 1000);
986: wf_engine.setitemattrtext (itemtype => itemtype,
987: itemkey => itemkey,
988: aname => 'APP_SUBJECT',
989: avalue => l_string
990: );
987: itemkey => itemkey,
988: aname => 'APP_SUBJECT',
989: avalue => l_string
990: );
991: wf_engine.setitemattrtext (itemtype => itemtype,
992: itemkey => itemkey,
993: aname => 'AMW_APPROVAL_OBJECT_MEANING',
994: avalue => l_lookup_meaning
995: );
992: itemkey => itemkey,
993: aname => 'AMW_APPROVAL_OBJECT_MEANING',
994: avalue => l_lookup_meaning
995: );
996: wf_engine.setitemattrtext (itemtype => itemtype,
997: itemkey => itemkey,
998: aname => 'AMW_APPROVAL_OBJECT_NAME',
999: avalue => l_ap_name
1000: );
1121: IF (funcmode = 'RUN') THEN
1122: -- Item attribute UPDATE_GEN_STATUS will be'set to APPROVED'if the Object is approved
1123: -- and 'REJECTED' if the object is rejected.
1124: l_update_status :=
1125: wf_engine.getitemattrtext (itemtype => itemtype,
1126: itemkey => itemkey,
1127: aname => 'UPDATE_GEN_STATUS'
1128: );
1129: l_approver :=
1126: itemkey => itemkey,
1127: aname => 'UPDATE_GEN_STATUS'
1128: );
1129: l_approver :=
1130: wf_engine.getitemattrtext (itemtype => itemtype,
1131: itemkey => itemkey,
1132: aname => 'AMW_APPROVER'
1133: );
1134: l_approver_id :=
1131: itemkey => itemkey,
1132: aname => 'AMW_APPROVER'
1133: );
1134: l_approver_id :=
1135: wf_engine.getitemattrtext (itemtype => itemtype,
1136: itemkey => itemkey,
1137: aname => 'AMW_APPROVER_ID'
1138: );
1139: l_requestor_id :=
1136: itemkey => itemkey,
1137: aname => 'AMW_APPROVER_ID'
1138: );
1139: l_requestor_id :=
1140: wf_engine.getitemattrtext (itemtype => itemtype,
1141: itemkey => itemkey,
1142: aname => 'AMW_REQUESTOR_ID'
1143: );
1144: l_object_version_number :=
1141: itemkey => itemkey,
1142: aname => 'AMW_REQUESTOR_ID'
1143: );
1144: l_object_version_number :=
1145: wf_engine.getitemattrnumber (itemtype => itemtype,
1146: itemkey => itemkey,
1147: aname => 'AMW_OBJECT_VERSION_NUMBER'
1148: );
1149: l_ap_rev_id :=
1146: itemkey => itemkey,
1147: aname => 'AMW_OBJECT_VERSION_NUMBER'
1148: );
1149: l_ap_rev_id :=
1150: wf_engine.getitemattrnumber (itemtype => itemtype,
1151: itemkey => itemkey,
1152: aname => 'AMW_OBJECT_ID'
1153: );
1154: OPEN c_old_appr_ap (l_ap_rev_id);