592: RAISE OKC_API.G_EXCEPTION_ERROR;
593: END IF;
594: IF FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
595: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
596: ' wf_engine.CreateProcess(ItemType=>'||L_WF_NAME||
597: ' ItemKey=>'||L_KEY||' process=>'||L_WF_PROCESS_NAME||')');
598: END IF;
599: wf_engine.CreateProcess( ItemType => L_WF_NAME,
600: ItemKey => L_KEY,
595: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
596: ' wf_engine.CreateProcess(ItemType=>'||L_WF_NAME||
597: ' ItemKey=>'||L_KEY||' process=>'||L_WF_PROCESS_NAME||')');
598: END IF;
599: wf_engine.CreateProcess( ItemType => L_WF_NAME,
600: ItemKey => L_KEY,
601: process => L_WF_PROCESS_NAME);
602: wf_engine.SetItemUserKey (ItemType => L_WF_NAME,
603: ItemKey => L_KEY,
598: END IF;
599: wf_engine.CreateProcess( ItemType => L_WF_NAME,
600: ItemKey => L_KEY,
601: process => L_WF_PROCESS_NAME);
602: wf_engine.SetItemUserKey (ItemType => L_WF_NAME,
603: ItemKey => L_KEY,
604: UserKey => L_KEY);
605: IF FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
606: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
606: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
607: 'Setting wf item attributes');
608: END IF;
609: begin
610: wf_engine.SetItemAttrNumber (itemtype => L_WF_NAME,
611: itemkey => L_KEY,
612: aname => 'PROCESS_ID',
613: avalue => p_process_id);
614: exception
612: aname => 'PROCESS_ID',
613: avalue => p_process_id);
614: exception
615: when others then
616: wf_engine.AddItemAttr (itemtype => L_WF_NAME,
617: itemkey => L_KEY,
618: aname => 'PROCESS_ID');
619: wf_engine.SetItemAttrNumber (itemtype => L_WF_NAME,
620: itemkey => L_KEY,
615: when others then
616: wf_engine.AddItemAttr (itemtype => L_WF_NAME,
617: itemkey => L_KEY,
618: aname => 'PROCESS_ID');
619: wf_engine.SetItemAttrNumber (itemtype => L_WF_NAME,
620: itemkey => L_KEY,
621: aname => 'PROCESS_ID',
622: avalue => p_process_id);
623: end;
622: avalue => p_process_id);
623: end;
624: --
625: begin
626: wf_engine.SetItemAttrNumber (itemtype => L_WF_NAME,
627: itemkey => L_KEY,
628: aname => 'CONTRACT_ID',
629: avalue => p_contract_id);
630: exception
628: aname => 'CONTRACT_ID',
629: avalue => p_contract_id);
630: exception
631: when others then
632: wf_engine.AddItemAttr (itemtype => L_WF_NAME,
633: itemkey => L_KEY,
634: aname => 'CONTRACT_ID');
635: wf_engine.SetItemAttrNumber (itemtype => L_WF_NAME,
636: itemkey => L_KEY,
631: when others then
632: wf_engine.AddItemAttr (itemtype => L_WF_NAME,
633: itemkey => L_KEY,
634: aname => 'CONTRACT_ID');
635: wf_engine.SetItemAttrNumber (itemtype => L_WF_NAME,
636: itemkey => L_KEY,
637: aname => 'CONTRACT_ID',
638: avalue => p_contract_id);
639: end;
637: aname => 'CONTRACT_ID',
638: avalue => p_contract_id);
639: end;
640: begin
641: wf_engine.SetItemAttrText (itemtype => L_WF_NAME,
642: itemkey => L_KEY,
643: aname => 'CONTRACT_NUMBER',
644: avalue => l_contract_number);
645: exception
643: aname => 'CONTRACT_NUMBER',
644: avalue => l_contract_number);
645: exception
646: when others then
647: wf_engine.AddItemAttr (itemtype => L_WF_NAME,
648: itemkey => L_KEY,
649: aname => 'CONTRACT_NUMBER');
650: wf_engine.SetItemAttrText (itemtype => L_WF_NAME,
651: itemkey => L_KEY,
646: when others then
647: wf_engine.AddItemAttr (itemtype => L_WF_NAME,
648: itemkey => L_KEY,
649: aname => 'CONTRACT_NUMBER');
650: wf_engine.SetItemAttrText (itemtype => L_WF_NAME,
651: itemkey => L_KEY,
652: aname => 'CONTRACT_NUMBER',
653: avalue => l_contract_number);
654: end;
652: aname => 'CONTRACT_NUMBER',
653: avalue => l_contract_number);
654: end;
655: begin
656: wf_engine.SetItemAttrText (itemtype => L_WF_NAME,
657: itemkey => L_KEY,
658: aname => 'CONTRACT_NUMBER_MODIFIER',
659: avalue => l_contract_number_MODIFIER);
660: exception
658: aname => 'CONTRACT_NUMBER_MODIFIER',
659: avalue => l_contract_number_MODIFIER);
660: exception
661: when others then
662: wf_engine.AddItemAttr (itemtype => L_WF_NAME,
663: itemkey => L_KEY,
664: aname => 'CONTRACT_NUMBER_MODIFIER');
665: wf_engine.SetItemAttrText (itemtype => L_WF_NAME,
666: itemkey => L_KEY,
661: when others then
662: wf_engine.AddItemAttr (itemtype => L_WF_NAME,
663: itemkey => L_KEY,
664: aname => 'CONTRACT_NUMBER_MODIFIER');
665: wf_engine.SetItemAttrText (itemtype => L_WF_NAME,
666: itemkey => L_KEY,
667: aname => 'CONTRACT_NUMBER_MODIFIER',
668: avalue => l_contract_number_MODIFIER);
669: end;
667: aname => 'CONTRACT_NUMBER_MODIFIER',
668: avalue => l_contract_number_MODIFIER);
669: end;
670: begin
671: wf_engine.SetItemAttrNumber (itemtype => L_WF_NAME,
672: itemkey => L_KEY,
673: aname => 'USER_ID',
674: avalue => NVL(p_user_id,fnd_global.user_id));
675: exception
673: aname => 'USER_ID',
674: avalue => NVL(p_user_id,fnd_global.user_id));
675: exception
676: when others then
677: wf_engine.AddItemAttr (itemtype => L_WF_NAME,
678: itemkey => L_KEY,
679: aname => 'USER_ID');
680: wf_engine.SetItemAttrNumber(itemtype => L_WF_NAME,
681: itemkey => L_KEY,
676: when others then
677: wf_engine.AddItemAttr (itemtype => L_WF_NAME,
678: itemkey => L_KEY,
679: aname => 'USER_ID');
680: wf_engine.SetItemAttrNumber(itemtype => L_WF_NAME,
681: itemkey => L_KEY,
682: aname => 'USER_ID',
683: avalue => NVL(p_user_id,fnd_global.user_id));
684: end;
682: aname => 'USER_ID',
683: avalue => NVL(p_user_id,fnd_global.user_id));
684: end;
685: begin
686: wf_engine.SetItemAttrNumber (itemtype => L_WF_NAME,
687: itemkey => L_KEY,
688: aname => 'RESP_ID',
689: avalue => NVL(p_resp_id,fnd_global.resp_id));
690: exception
688: aname => 'RESP_ID',
689: avalue => NVL(p_resp_id,fnd_global.resp_id));
690: exception
691: when others then
692: wf_engine.AddItemAttr (itemtype => L_WF_NAME,
693: itemkey => L_KEY,
694: aname => 'RESP_ID');
695: wf_engine.SetItemAttrNumber(itemtype => L_WF_NAME,
696: itemkey => L_KEY,
691: when others then
692: wf_engine.AddItemAttr (itemtype => L_WF_NAME,
693: itemkey => L_KEY,
694: aname => 'RESP_ID');
695: wf_engine.SetItemAttrNumber(itemtype => L_WF_NAME,
696: itemkey => L_KEY,
697: aname => 'RESP_ID',
698: avalue => NVL(p_resp_id,fnd_global.resp_id));
699: end;
697: aname => 'RESP_ID',
698: avalue => NVL(p_resp_id,fnd_global.resp_id));
699: end;
700: begin
701: wf_engine.SetItemAttrNumber (itemtype => L_WF_NAME,
702: itemkey => L_KEY,
703: aname => 'RESP_APPL_ID',
704: avalue => NVL(p_resp_appl_id,fnd_global.RESP_APPL_id));
705: exception
703: aname => 'RESP_APPL_ID',
704: avalue => NVL(p_resp_appl_id,fnd_global.RESP_APPL_id));
705: exception
706: when others then
707: wf_engine.AddItemAttr (itemtype => L_WF_NAME,
708: itemkey => L_KEY,
709: aname => 'RESP_APPL_ID');
710: wf_engine.SetItemAttrNumber(itemtype => L_WF_NAME,
711: itemkey => L_KEY,
706: when others then
707: wf_engine.AddItemAttr (itemtype => L_WF_NAME,
708: itemkey => L_KEY,
709: aname => 'RESP_APPL_ID');
710: wf_engine.SetItemAttrNumber(itemtype => L_WF_NAME,
711: itemkey => L_KEY,
712: aname => 'RESP_APPL_ID',
713: avalue => NVL(p_resp_appl_id,fnd_global.RESP_APPL_id));
714: end;
712: aname => 'RESP_APPL_ID',
713: avalue => NVL(p_resp_appl_id,fnd_global.RESP_APPL_id));
714: end;
715: begin
716: wf_engine.SetItemAttrNumber (itemtype => L_WF_NAME,
717: itemkey => L_KEY,
718: aname => 'SECURITY_GROUP_ID',
719: avalue => NVL(p_security_group_id,fnd_global.SECURITY_GROUP_id));
720: exception
718: aname => 'SECURITY_GROUP_ID',
719: avalue => NVL(p_security_group_id,fnd_global.SECURITY_GROUP_id));
720: exception
721: when others then
722: wf_engine.AddItemAttr (itemtype => L_WF_NAME,
723: itemkey => L_KEY,
724: aname => 'SECURITY_GROUP_ID');
725: wf_engine.SetItemAttrNumber(itemtype => L_WF_NAME,
726: itemkey => L_KEY,
721: when others then
722: wf_engine.AddItemAttr (itemtype => L_WF_NAME,
723: itemkey => L_KEY,
724: aname => 'SECURITY_GROUP_ID');
725: wf_engine.SetItemAttrNumber(itemtype => L_WF_NAME,
726: itemkey => L_KEY,
727: aname => 'SECURITY_GROUP_ID',
728: avalue => NVL(p_security_group_id,fnd_global.SECURITY_GROUP_id));
729: end;
730: select value into L_NLS_VALUE
731: from NLS_SESSION_PARAMETERS
732: where PARAMETER='NLS_LANGUAGE';
733: begin
734: wf_engine.SetItemAttrText (itemtype => L_WF_NAME,
735: itemkey => L_KEY,
736: aname => 'NLS_LANGUAGE',
737: avalue => L_NLS_VALUE);
738: exception
736: aname => 'NLS_LANGUAGE',
737: avalue => L_NLS_VALUE);
738: exception
739: when others then
740: wf_engine.AddItemAttr (itemtype => L_WF_NAME,
741: itemkey => L_KEY,
742: aname => 'NLS_LANGUAGE');
743: wf_engine.SetItemAttrText (itemtype => L_WF_NAME,
744: itemkey => L_KEY,
739: when others then
740: wf_engine.AddItemAttr (itemtype => L_WF_NAME,
741: itemkey => L_KEY,
742: aname => 'NLS_LANGUAGE');
743: wf_engine.SetItemAttrText (itemtype => L_WF_NAME,
744: itemkey => L_KEY,
745: aname => 'NLS_LANGUAGE',
746: avalue => L_NLS_VALUE);
747: end;
748: select value into L_NLS_VALUE
749: from NLS_SESSION_PARAMETERS
750: where PARAMETER='NLS_DATE_FORMAT';
751: begin
752: wf_engine.SetItemAttrText (itemtype => L_WF_NAME,
753: itemkey => L_KEY,
754: aname => 'NLS_DATE_FORMAT',
755: avalue => L_NLS_VALUE);
756: exception
754: aname => 'NLS_DATE_FORMAT',
755: avalue => L_NLS_VALUE);
756: exception
757: when others then
758: wf_engine.AddItemAttr (itemtype => L_WF_NAME,
759: itemkey => L_KEY,
760: aname => 'NLS_DATE_FORMAT');
761: wf_engine.SetItemAttrText (itemtype => L_WF_NAME,
762: itemkey => L_KEY,
757: when others then
758: wf_engine.AddItemAttr (itemtype => L_WF_NAME,
759: itemkey => L_KEY,
760: aname => 'NLS_DATE_FORMAT');
761: wf_engine.SetItemAttrText (itemtype => L_WF_NAME,
762: itemkey => L_KEY,
763: aname => 'NLS_DATE_FORMAT',
764: avalue => L_NLS_VALUE);
765: end;
766: select value into L_NLS_VALUE
767: from NLS_SESSION_PARAMETERS
768: where PARAMETER='NLS_DATE_LANGUAGE';
769: begin
770: wf_engine.SetItemAttrText (itemtype => L_WF_NAME,
771: itemkey => L_KEY,
772: aname => 'NLS_DATE_LANGUAGE',
773: avalue => L_NLS_VALUE);
774: exception
772: aname => 'NLS_DATE_LANGUAGE',
773: avalue => L_NLS_VALUE);
774: exception
775: when others then
776: wf_engine.AddItemAttr (itemtype => L_WF_NAME,
777: itemkey => L_KEY,
778: aname => 'NLS_DATE_LANGUAGE');
779: wf_engine.SetItemAttrText (itemtype => L_WF_NAME,
780: itemkey => L_KEY,
775: when others then
776: wf_engine.AddItemAttr (itemtype => L_WF_NAME,
777: itemkey => L_KEY,
778: aname => 'NLS_DATE_LANGUAGE');
779: wf_engine.SetItemAttrText (itemtype => L_WF_NAME,
780: itemkey => L_KEY,
781: aname => 'NLS_DATE_LANGUAGE',
782: avalue => L_NLS_VALUE);
783: end;
784: select '"'||value||'"' into L_NLS_VALUE
785: from NLS_SESSION_PARAMETERS
786: where PARAMETER='NLS_NUMERIC_CHARACTERS';
787: begin
788: wf_engine.SetItemAttrText (itemtype => L_WF_NAME,
789: itemkey => L_KEY,
790: aname => 'NLS_NUMERIC_CHARACTERS',
791: avalue => L_NLS_VALUE);
792: exception
790: aname => 'NLS_NUMERIC_CHARACTERS',
791: avalue => L_NLS_VALUE);
792: exception
793: when others then
794: wf_engine.AddItemAttr (itemtype => L_WF_NAME,
795: itemkey => L_KEY,
796: aname => 'NLS_NUMERIC_CHARACTERS');
797: wf_engine.SetItemAttrText (itemtype => L_WF_NAME,
798: itemkey => L_KEY,
793: when others then
794: wf_engine.AddItemAttr (itemtype => L_WF_NAME,
795: itemkey => L_KEY,
796: aname => 'NLS_NUMERIC_CHARACTERS');
797: wf_engine.SetItemAttrText (itemtype => L_WF_NAME,
798: itemkey => L_KEY,
799: aname => 'NLS_NUMERIC_CHARACTERS',
800: avalue => L_NLS_VALUE);
801: end;
798: itemkey => L_KEY,
799: aname => 'NLS_NUMERIC_CHARACTERS',
800: avalue => L_NLS_VALUE);
801: end;
802: wf_engine.SetItemOwner ( itemtype => L_WF_NAME,
803: itemkey => L_KEY,
804: owner => fnd_global.user_name);
805: IF FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
806: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
807: 'Starting approval wf');
808: END IF;
809:
810: BEGIN
811: wf_engine.StartProcess( itemtype => L_WF_NAME,
812: itemkey => L_KEY);
813: IF FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
814: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
815: 'Successfully started approval wf');
1112: IF FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1113: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1114: 'Got wf details l_wf_name_active=>'||l_wf_name_active);
1115: END IF;
1116: wf_engine.abortprocess(l_wf_name_active,l_key);
1117: IF FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1118: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name||'.external_call.before',
1119: 'k_erase_approved p_contract_id=>'||p_contract_id);
1120: END IF;
1144: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1145: 'Abort process defined ');
1146: END IF;
1147: -- previous initiator Uname
1148: L_INITIATOR_NAME := wf_engine.GetItemAttrText(l_wf_name_active,L_KEY,'INITIATOR_NAME');
1149: -- last approver Uname
1150: L_FINAL_APPROVER_UNAME := NVL(
1151: wf_engine.GetItemAttrText(l_wf_name_active,L_KEY,'NEXT_PERFORMER_USERNAME'),
1152: wf_engine.GetItemAttrText(l_wf_name_active,L_KEY,'FINAL_APPROVER_UNAME')
1147: -- previous initiator Uname
1148: L_INITIATOR_NAME := wf_engine.GetItemAttrText(l_wf_name_active,L_KEY,'INITIATOR_NAME');
1149: -- last approver Uname
1150: L_FINAL_APPROVER_UNAME := NVL(
1151: wf_engine.GetItemAttrText(l_wf_name_active,L_KEY,'NEXT_PERFORMER_USERNAME'),
1152: wf_engine.GetItemAttrText(l_wf_name_active,L_KEY,'FINAL_APPROVER_UNAME')
1153: );
1154: if (L_FINAL_APPROVER_UNAME = L_INITIATOR_NAME) then
1155: L_FINAL_APPROVER_UNAME := NULL;
1148: L_INITIATOR_NAME := wf_engine.GetItemAttrText(l_wf_name_active,L_KEY,'INITIATOR_NAME');
1149: -- last approver Uname
1150: L_FINAL_APPROVER_UNAME := NVL(
1151: wf_engine.GetItemAttrText(l_wf_name_active,L_KEY,'NEXT_PERFORMER_USERNAME'),
1152: wf_engine.GetItemAttrText(l_wf_name_active,L_KEY,'FINAL_APPROVER_UNAME')
1153: );
1154: if (L_FINAL_APPROVER_UNAME = L_INITIATOR_NAME) then
1155: L_FINAL_APPROVER_UNAME := NULL;
1156: end if;
1172: p_token2_value => L_KEY);
1173: raise OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1174: end;
1175: end;
1176: wf_engine.CreateProcess( ItemType => l_wf_name_active,
1177: ItemKey => L_KEY,
1178: process => 'ABORT_PROCESS');
1179: wf_engine.SetItemUserKey (ItemType => l_wf_name_active,
1180: ItemKey => L_KEY,
1175: end;
1176: wf_engine.CreateProcess( ItemType => l_wf_name_active,
1177: ItemKey => L_KEY,
1178: process => 'ABORT_PROCESS');
1179: wf_engine.SetItemUserKey (ItemType => l_wf_name_active,
1180: ItemKey => L_KEY,
1181: UserKey => L_KEY);
1182: --+
1183: --+ attributes
1182: --+
1183: --+ attributes
1184: --+
1185: begin
1186: wf_engine.SetItemAttrNumber (itemtype => l_wf_name_active,
1187: itemkey => L_KEY,
1188: aname => 'CONTRACT_ID',
1189: avalue => p_contract_id);
1190: exception
1188: aname => 'CONTRACT_ID',
1189: avalue => p_contract_id);
1190: exception
1191: when others then
1192: wf_engine.AddItemAttr (itemtype => l_wf_name_active,
1193: itemkey => L_KEY,
1194: aname => 'CONTRACT_ID');
1195: wf_engine.SetItemAttrNumber (itemtype => l_wf_name_active,
1196: itemkey => L_KEY,
1191: when others then
1192: wf_engine.AddItemAttr (itemtype => l_wf_name_active,
1193: itemkey => L_KEY,
1194: aname => 'CONTRACT_ID');
1195: wf_engine.SetItemAttrNumber (itemtype => l_wf_name_active,
1196: itemkey => L_KEY,
1197: aname => 'CONTRACT_ID',
1198: avalue => p_contract_id);
1199: end;
1197: aname => 'CONTRACT_ID',
1198: avalue => p_contract_id);
1199: end;
1200: begin
1201: wf_engine.SetItemAttrText (itemtype => l_wf_name_active,
1202: itemkey => L_KEY,
1203: aname => 'CONTRACT_NUMBER',
1204: avalue => l_contract_number);
1205: exception
1203: aname => 'CONTRACT_NUMBER',
1204: avalue => l_contract_number);
1205: exception
1206: when others then
1207: wf_engine.AddItemAttr (itemtype => l_wf_name_active,
1208: itemkey => L_KEY,
1209: aname => 'CONTRACT_NUMBER');
1210: wf_engine.SetItemAttrText (itemtype => l_wf_name_active,
1211: itemkey => L_KEY,
1206: when others then
1207: wf_engine.AddItemAttr (itemtype => l_wf_name_active,
1208: itemkey => L_KEY,
1209: aname => 'CONTRACT_NUMBER');
1210: wf_engine.SetItemAttrText (itemtype => l_wf_name_active,
1211: itemkey => L_KEY,
1212: aname => 'CONTRACT_NUMBER',
1213: avalue => l_contract_number);
1214: end;
1212: aname => 'CONTRACT_NUMBER',
1213: avalue => l_contract_number);
1214: end;
1215: begin
1216: wf_engine.SetItemAttrText (itemtype => l_wf_name_active,
1217: itemkey => L_KEY,
1218: aname => 'CONTRACT_NUMBER_MODIFIER',
1219: avalue => l_contract_number_MODIFIER);
1220: exception
1218: aname => 'CONTRACT_NUMBER_MODIFIER',
1219: avalue => l_contract_number_MODIFIER);
1220: exception
1221: when others then
1222: wf_engine.AddItemAttr (itemtype => l_wf_name_active,
1223: itemkey => L_KEY,
1224: aname => 'CONTRACT_NUMBER_MODIFIER');
1225: wf_engine.SetItemAttrText (itemtype => l_wf_name_active,
1226: itemkey => L_KEY,
1221: when others then
1222: wf_engine.AddItemAttr (itemtype => l_wf_name_active,
1223: itemkey => L_KEY,
1224: aname => 'CONTRACT_NUMBER_MODIFIER');
1225: wf_engine.SetItemAttrText (itemtype => l_wf_name_active,
1226: itemkey => L_KEY,
1227: aname => 'CONTRACT_NUMBER_MODIFIER',
1228: avalue => l_contract_number_MODIFIER);
1229: end;
1227: aname => 'CONTRACT_NUMBER_MODIFIER',
1228: avalue => l_contract_number_MODIFIER);
1229: end;
1230: begin
1231: wf_engine.SetItemAttrText (itemtype => l_wf_name_active,
1232: itemkey => L_KEY,
1233: aname => 'K_SHORT_DESCRIPTION',
1234: avalue => L_K_SHORT_DESCRIPTION);
1235: exception
1233: aname => 'K_SHORT_DESCRIPTION',
1234: avalue => L_K_SHORT_DESCRIPTION);
1235: exception
1236: when others then
1237: wf_engine.AddItemAttr (itemtype => l_wf_name_active,
1238: itemkey => L_KEY,
1239: aname => 'K_SHORT_DESCRIPTION');
1240: wf_engine.SetItemAttrText (itemtype => l_wf_name_active,
1241: itemkey => L_KEY,
1236: when others then
1237: wf_engine.AddItemAttr (itemtype => l_wf_name_active,
1238: itemkey => L_KEY,
1239: aname => 'K_SHORT_DESCRIPTION');
1240: wf_engine.SetItemAttrText (itemtype => l_wf_name_active,
1241: itemkey => L_KEY,
1242: aname => 'K_SHORT_DESCRIPTION',
1243: avalue => L_K_SHORT_DESCRIPTION);
1244: end;
1246: open C_INITIATOR_DISPLAY_NAME;
1247: fetch C_INITIATOR_DISPLAY_NAME into L_INITIATOR_DISPLAY_NAME;
1248: close C_INITIATOR_DISPLAY_NAME;
1249: begin
1250: wf_engine.SetItemAttrText (itemtype => l_wf_name_active,
1251: itemkey => L_KEY,
1252: aname => 'INITIATOR_DISPLAY_NAME',
1253: avalue => L_INITIATOR_DISPLAY_NAME);
1254: exception
1252: aname => 'INITIATOR_DISPLAY_NAME',
1253: avalue => L_INITIATOR_DISPLAY_NAME);
1254: exception
1255: when others then
1256: wf_engine.AddItemAttr (itemtype => l_wf_name_active,
1257: itemkey => L_KEY,
1258: aname => 'INITIATOR_DISPLAY_NAME');
1259: wf_engine.SetItemAttrText (itemtype => l_wf_name_active,
1260: itemkey => L_KEY,
1255: when others then
1256: wf_engine.AddItemAttr (itemtype => l_wf_name_active,
1257: itemkey => L_KEY,
1258: aname => 'INITIATOR_DISPLAY_NAME');
1259: wf_engine.SetItemAttrText (itemtype => l_wf_name_active,
1260: itemkey => L_KEY,
1261: aname => 'INITIATOR_DISPLAY_NAME',
1262: avalue => L_INITIATOR_DISPLAY_NAME);
1263: end;
1262: avalue => L_INITIATOR_DISPLAY_NAME);
1263: end;
1264: -- previous initiator Uname
1265: begin
1266: wf_engine.SetItemAttrText (itemtype => l_wf_name_active,
1267: itemkey => L_KEY,
1268: aname => 'INITIATOR_NAME',
1269: avalue => L_INITIATOR_NAME);
1270: exception
1268: aname => 'INITIATOR_NAME',
1269: avalue => L_INITIATOR_NAME);
1270: exception
1271: when others then
1272: wf_engine.AddItemAttr (itemtype => l_wf_name_active,
1273: itemkey => L_KEY,
1274: aname => 'INITIATOR_NAME');
1275: wf_engine.SetItemAttrText (itemtype => l_wf_name_active,
1276: itemkey => L_KEY,
1271: when others then
1272: wf_engine.AddItemAttr (itemtype => l_wf_name_active,
1273: itemkey => L_KEY,
1274: aname => 'INITIATOR_NAME');
1275: wf_engine.SetItemAttrText (itemtype => l_wf_name_active,
1276: itemkey => L_KEY,
1277: aname => 'INITIATOR_NAME',
1278: avalue => L_INITIATOR_NAME);
1279: end;
1278: avalue => L_INITIATOR_NAME);
1279: end;
1280: -- previous approver Uname
1281: begin
1282: wf_engine.SetItemAttrText (itemtype => l_wf_name_active,
1283: itemkey => L_KEY,
1284: aname => 'FINAL_APPROVER_UNAME',
1285: avalue => L_FINAL_APPROVER_UNAME);
1286: exception
1284: aname => 'FINAL_APPROVER_UNAME',
1285: avalue => L_FINAL_APPROVER_UNAME);
1286: exception
1287: when others then
1288: wf_engine.AddItemAttr (itemtype => l_wf_name_active,
1289: itemkey => L_KEY,
1290: aname => 'FINAL_APPROVER_UNAME');
1291: wf_engine.SetItemAttrText (itemtype => l_wf_name_active,
1292: itemkey => L_KEY,
1287: when others then
1288: wf_engine.AddItemAttr (itemtype => l_wf_name_active,
1289: itemkey => L_KEY,
1290: aname => 'FINAL_APPROVER_UNAME');
1291: wf_engine.SetItemAttrText (itemtype => l_wf_name_active,
1292: itemkey => L_KEY,
1293: aname => 'FINAL_APPROVER_UNAME',
1294: avalue => L_FINAL_APPROVER_UNAME);
1295: end;
1296: --
1297: -- environment
1298: --
1299: begin
1300: wf_engine.SetItemAttrNumber (itemtype => l_wf_name_active,
1301: itemkey => L_KEY,
1302: aname => 'USER_ID',
1303: avalue => fnd_global.user_id);
1304: exception
1302: aname => 'USER_ID',
1303: avalue => fnd_global.user_id);
1304: exception
1305: when others then
1306: wf_engine.AddItemAttr (itemtype => l_wf_name_active,
1307: itemkey => L_KEY,
1308: aname => 'USER_ID');
1309: wf_engine.SetItemAttrNumber(itemtype => l_wf_name_active,
1310: itemkey => L_KEY,
1305: when others then
1306: wf_engine.AddItemAttr (itemtype => l_wf_name_active,
1307: itemkey => L_KEY,
1308: aname => 'USER_ID');
1309: wf_engine.SetItemAttrNumber(itemtype => l_wf_name_active,
1310: itemkey => L_KEY,
1311: aname => 'USER_ID',
1312: avalue => fnd_global.user_id);
1313: end;
1311: aname => 'USER_ID',
1312: avalue => fnd_global.user_id);
1313: end;
1314: begin
1315: wf_engine.SetItemAttrNumber (itemtype => l_wf_name_active,
1316: itemkey => L_KEY,
1317: aname => 'RESP_ID',
1318: avalue => fnd_global.resp_id);
1319: exception
1317: aname => 'RESP_ID',
1318: avalue => fnd_global.resp_id);
1319: exception
1320: when others then
1321: wf_engine.AddItemAttr (itemtype => l_wf_name_active,
1322: itemkey => L_KEY,
1323: aname => 'RESP_ID');
1324: wf_engine.SetItemAttrNumber(itemtype => l_wf_name_active,
1325: itemkey => L_KEY,
1320: when others then
1321: wf_engine.AddItemAttr (itemtype => l_wf_name_active,
1322: itemkey => L_KEY,
1323: aname => 'RESP_ID');
1324: wf_engine.SetItemAttrNumber(itemtype => l_wf_name_active,
1325: itemkey => L_KEY,
1326: aname => 'RESP_ID',
1327: avalue => fnd_global.resp_id);
1328: end;
1326: aname => 'RESP_ID',
1327: avalue => fnd_global.resp_id);
1328: end;
1329: begin
1330: wf_engine.SetItemAttrNumber (itemtype => l_wf_name_active,
1331: itemkey => L_KEY,
1332: aname => 'RESP_APPL_ID',
1333: avalue => fnd_global.RESP_APPL_id);
1334: exception
1332: aname => 'RESP_APPL_ID',
1333: avalue => fnd_global.RESP_APPL_id);
1334: exception
1335: when others then
1336: wf_engine.AddItemAttr (itemtype => l_wf_name_active,
1337: itemkey => L_KEY,
1338: aname => 'RESP_APPL_ID');
1339: wf_engine.SetItemAttrNumber(itemtype => l_wf_name_active,
1340: itemkey => L_KEY,
1335: when others then
1336: wf_engine.AddItemAttr (itemtype => l_wf_name_active,
1337: itemkey => L_KEY,
1338: aname => 'RESP_APPL_ID');
1339: wf_engine.SetItemAttrNumber(itemtype => l_wf_name_active,
1340: itemkey => L_KEY,
1341: aname => 'RESP_APPL_ID',
1342: avalue => fnd_global.RESP_APPL_id);
1343: end;
1341: aname => 'RESP_APPL_ID',
1342: avalue => fnd_global.RESP_APPL_id);
1343: end;
1344: begin
1345: wf_engine.SetItemAttrNumber (itemtype => l_wf_name_active,
1346: itemkey => L_KEY,
1347: aname => 'SECURITY_GROUP_ID',
1348: avalue => fnd_global.SECURITY_GROUP_id);
1349: exception
1347: aname => 'SECURITY_GROUP_ID',
1348: avalue => fnd_global.SECURITY_GROUP_id);
1349: exception
1350: when others then
1351: wf_engine.AddItemAttr (itemtype => l_wf_name_active,
1352: itemkey => L_KEY,
1353: aname => 'SECURITY_GROUP_ID');
1354: wf_engine.SetItemAttrNumber(itemtype => l_wf_name_active,
1355: itemkey => L_KEY,
1350: when others then
1351: wf_engine.AddItemAttr (itemtype => l_wf_name_active,
1352: itemkey => L_KEY,
1353: aname => 'SECURITY_GROUP_ID');
1354: wf_engine.SetItemAttrNumber(itemtype => l_wf_name_active,
1355: itemkey => L_KEY,
1356: aname => 'SECURITY_GROUP_ID',
1357: avalue => fnd_global.SECURITY_GROUP_id);
1358: end;
1359: select value into L_NLS_VALUE
1360: from NLS_SESSION_PARAMETERS
1361: where PARAMETER='NLS_LANGUAGE';
1362: begin
1363: wf_engine.SetItemAttrText (itemtype => l_wf_name_active,
1364: itemkey => L_KEY,
1365: aname => 'NLS_LANGUAGE',
1366: avalue => L_NLS_VALUE);
1367: exception
1365: aname => 'NLS_LANGUAGE',
1366: avalue => L_NLS_VALUE);
1367: exception
1368: when others then
1369: wf_engine.AddItemAttr (itemtype => l_wf_name_active,
1370: itemkey => L_KEY,
1371: aname => 'NLS_LANGUAGE');
1372: wf_engine.SetItemAttrText (itemtype => l_wf_name_active,
1373: itemkey => L_KEY,
1368: when others then
1369: wf_engine.AddItemAttr (itemtype => l_wf_name_active,
1370: itemkey => L_KEY,
1371: aname => 'NLS_LANGUAGE');
1372: wf_engine.SetItemAttrText (itemtype => l_wf_name_active,
1373: itemkey => L_KEY,
1374: aname => 'NLS_LANGUAGE',
1375: avalue => L_NLS_VALUE);
1376: end;
1377: select value into L_NLS_VALUE
1378: from NLS_SESSION_PARAMETERS
1379: where PARAMETER='NLS_DATE_FORMAT';
1380: begin
1381: wf_engine.SetItemAttrText (itemtype => l_wf_name_active,
1382: itemkey => L_KEY,
1383: aname => 'NLS_DATE_FORMAT',
1384: avalue => L_NLS_VALUE);
1385: exception
1383: aname => 'NLS_DATE_FORMAT',
1384: avalue => L_NLS_VALUE);
1385: exception
1386: when others then
1387: wf_engine.AddItemAttr (itemtype => l_wf_name_active,
1388: itemkey => L_KEY,
1389: aname => 'NLS_DATE_FORMAT');
1390: wf_engine.SetItemAttrText (itemtype => l_wf_name_active,
1391: itemkey => L_KEY,
1386: when others then
1387: wf_engine.AddItemAttr (itemtype => l_wf_name_active,
1388: itemkey => L_KEY,
1389: aname => 'NLS_DATE_FORMAT');
1390: wf_engine.SetItemAttrText (itemtype => l_wf_name_active,
1391: itemkey => L_KEY,
1392: aname => 'NLS_DATE_FORMAT',
1393: avalue => L_NLS_VALUE);
1394: end;
1395: select value into L_NLS_VALUE
1396: from NLS_SESSION_PARAMETERS
1397: where PARAMETER='NLS_DATE_LANGUAGE';
1398: begin
1399: wf_engine.SetItemAttrText (itemtype => l_wf_name_active,
1400: itemkey => L_KEY,
1401: aname => 'NLS_DATE_LANGUAGE',
1402: avalue => L_NLS_VALUE);
1403: exception
1401: aname => 'NLS_DATE_LANGUAGE',
1402: avalue => L_NLS_VALUE);
1403: exception
1404: when others then
1405: wf_engine.AddItemAttr (itemtype => l_wf_name_active,
1406: itemkey => L_KEY,
1407: aname => 'NLS_DATE_LANGUAGE');
1408: wf_engine.SetItemAttrText (itemtype => l_wf_name_active,
1409: itemkey => L_KEY,
1404: when others then
1405: wf_engine.AddItemAttr (itemtype => l_wf_name_active,
1406: itemkey => L_KEY,
1407: aname => 'NLS_DATE_LANGUAGE');
1408: wf_engine.SetItemAttrText (itemtype => l_wf_name_active,
1409: itemkey => L_KEY,
1410: aname => 'NLS_DATE_LANGUAGE',
1411: avalue => L_NLS_VALUE);
1412: end;
1413: select '"'||value||'"' into L_NLS_VALUE
1414: from NLS_SESSION_PARAMETERS
1415: where PARAMETER='NLS_NUMERIC_CHARACTERS';
1416: begin
1417: wf_engine.SetItemAttrText (itemtype => l_wf_name_active,
1418: itemkey => L_KEY,
1419: aname => 'NLS_NUMERIC_CHARACTERS',
1420: avalue => L_NLS_VALUE);
1421: exception
1419: aname => 'NLS_NUMERIC_CHARACTERS',
1420: avalue => L_NLS_VALUE);
1421: exception
1422: when others then
1423: wf_engine.AddItemAttr (itemtype => l_wf_name_active,
1424: itemkey => L_KEY,
1425: aname => 'NLS_NUMERIC_CHARACTERS');
1426: wf_engine.SetItemAttrText (itemtype => l_wf_name_active,
1427: itemkey => L_KEY,
1422: when others then
1423: wf_engine.AddItemAttr (itemtype => l_wf_name_active,
1424: itemkey => L_KEY,
1425: aname => 'NLS_NUMERIC_CHARACTERS');
1426: wf_engine.SetItemAttrText (itemtype => l_wf_name_active,
1427: itemkey => L_KEY,
1428: aname => 'NLS_NUMERIC_CHARACTERS',
1429: avalue => L_NLS_VALUE);
1430: end;
1430: end;
1431: --
1432: -- start
1433: --
1434: wf_engine.SetItemOwner ( itemtype => l_wf_name_active,
1435: itemkey => L_KEY,
1436: owner => fnd_global.user_name);
1437: wf_engine.StartProcess( itemtype => l_wf_name_active,
1438: itemkey => L_KEY);
1433: --
1434: wf_engine.SetItemOwner ( itemtype => l_wf_name_active,
1435: itemkey => L_KEY,
1436: owner => fnd_global.user_name);
1437: wf_engine.StartProcess( itemtype => l_wf_name_active,
1438: itemkey => L_KEY);
1439:
1440: IF FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
1441: FND_LOG.STRING( FND_LOG.LEVEL_STATEMENT ,G_MODULE||l_api_name,
1572: L_NLS_VALUE1 varchar2(40);
1573: L_NLS_VALUE2 varchar2(40);
1574: L_NLS_VALUE3 varchar2(40);
1575: L_NLS_VALUE4 varchar2(40);
1576: L_NLS_VALUE11 varchar2(40) := wf_engine.GetItemAttrText(p_item_type,p_item_key,'NLS_LANGUAGE');
1577: L_NLS_VALUE12 varchar2(40) := wf_engine.GetItemAttrText(p_item_type,p_item_key,'NLS_DATE_FORMAT');
1578: L_NLS_VALUE13 varchar2(40) := wf_engine.GetItemAttrText(p_item_type,p_item_key,'NLS_DATE_LANGUAGE');
1579: L_NLS_VALUE14 varchar2(40) := wf_engine.GetItemAttrText(p_item_type,p_item_key,'NLS_NUMERIC_CHARACTERS');
1580: cursor c1(p varchar2) is
1573: L_NLS_VALUE2 varchar2(40);
1574: L_NLS_VALUE3 varchar2(40);
1575: L_NLS_VALUE4 varchar2(40);
1576: L_NLS_VALUE11 varchar2(40) := wf_engine.GetItemAttrText(p_item_type,p_item_key,'NLS_LANGUAGE');
1577: L_NLS_VALUE12 varchar2(40) := wf_engine.GetItemAttrText(p_item_type,p_item_key,'NLS_DATE_FORMAT');
1578: L_NLS_VALUE13 varchar2(40) := wf_engine.GetItemAttrText(p_item_type,p_item_key,'NLS_DATE_LANGUAGE');
1579: L_NLS_VALUE14 varchar2(40) := wf_engine.GetItemAttrText(p_item_type,p_item_key,'NLS_NUMERIC_CHARACTERS');
1580: cursor c1(p varchar2) is
1581: select value
1574: L_NLS_VALUE3 varchar2(40);
1575: L_NLS_VALUE4 varchar2(40);
1576: L_NLS_VALUE11 varchar2(40) := wf_engine.GetItemAttrText(p_item_type,p_item_key,'NLS_LANGUAGE');
1577: L_NLS_VALUE12 varchar2(40) := wf_engine.GetItemAttrText(p_item_type,p_item_key,'NLS_DATE_FORMAT');
1578: L_NLS_VALUE13 varchar2(40) := wf_engine.GetItemAttrText(p_item_type,p_item_key,'NLS_DATE_LANGUAGE');
1579: L_NLS_VALUE14 varchar2(40) := wf_engine.GetItemAttrText(p_item_type,p_item_key,'NLS_NUMERIC_CHARACTERS');
1580: cursor c1(p varchar2) is
1581: select value
1582: from NLS_SESSION_PARAMETERS
1575: L_NLS_VALUE4 varchar2(40);
1576: L_NLS_VALUE11 varchar2(40) := wf_engine.GetItemAttrText(p_item_type,p_item_key,'NLS_LANGUAGE');
1577: L_NLS_VALUE12 varchar2(40) := wf_engine.GetItemAttrText(p_item_type,p_item_key,'NLS_DATE_FORMAT');
1578: L_NLS_VALUE13 varchar2(40) := wf_engine.GetItemAttrText(p_item_type,p_item_key,'NLS_DATE_LANGUAGE');
1579: L_NLS_VALUE14 varchar2(40) := wf_engine.GetItemAttrText(p_item_type,p_item_key,'NLS_NUMERIC_CHARACTERS');
1580: cursor c1(p varchar2) is
1581: select value
1582: from NLS_SESSION_PARAMETERS
1583: where PARAMETER=p;
1610: end if;
1611: fnd_global.apps_initialize
1612: (
1613: user_id =>
1614: wf_engine.GetItemAttrNumber(p_item_type,p_item_key,'USER_ID'),
1615: resp_id =>
1616: wf_engine.GetItemAttrNumber(p_item_type,p_item_key,'RESP_ID'),
1617: resp_appl_id =>
1618: wf_engine.GetItemAttrNumber(p_item_type,p_item_key,'RESP_APPL_ID'),
1612: (
1613: user_id =>
1614: wf_engine.GetItemAttrNumber(p_item_type,p_item_key,'USER_ID'),
1615: resp_id =>
1616: wf_engine.GetItemAttrNumber(p_item_type,p_item_key,'RESP_ID'),
1617: resp_appl_id =>
1618: wf_engine.GetItemAttrNumber(p_item_type,p_item_key,'RESP_APPL_ID'),
1619: security_group_id =>
1620: wf_engine.GetItemAttrNumber(p_item_type,p_item_key,'SECURITY_GROUP_ID')
1614: wf_engine.GetItemAttrNumber(p_item_type,p_item_key,'USER_ID'),
1615: resp_id =>
1616: wf_engine.GetItemAttrNumber(p_item_type,p_item_key,'RESP_ID'),
1617: resp_appl_id =>
1618: wf_engine.GetItemAttrNumber(p_item_type,p_item_key,'RESP_APPL_ID'),
1619: security_group_id =>
1620: wf_engine.GetItemAttrNumber(p_item_type,p_item_key,'SECURITY_GROUP_ID')
1621: );
1622: -- okc_context.set_okc_org_context;
1616: wf_engine.GetItemAttrNumber(p_item_type,p_item_key,'RESP_ID'),
1617: resp_appl_id =>
1618: wf_engine.GetItemAttrNumber(p_item_type,p_item_key,'RESP_APPL_ID'),
1619: security_group_id =>
1620: wf_engine.GetItemAttrNumber(p_item_type,p_item_key,'SECURITY_GROUP_ID')
1621: );
1622: -- okc_context.set_okc_org_context;
1623: end wf_copy_env;
1624: