[Home] [Help]
209: -- =============== END DEBUG LOG ==================
210:
211: FOR J IN 1..7 LOOP
212: -- Get all the du attribute
213: l_du := wf_engine.GetItemAttrText ( itemtype => itemtype,
214: itemkey => itemkey,
215: aname => 'ADD_ATTR'||J);
216:
217: -- =============== START DEBUG LOG ================
418: -- with the work item context required to execute
419: -- the workflow
420: --fnd_profile.get (name=>'ORG_ID', val=> l_session_org_id);
421: l_session_org_id := mo_global.get_current_org_id(); -- Bug# 5905190 MOAC changes
422: l_work_item_org_id := wf_engine.GetItemAttrNumber
423: (itemtype,
424: itemkey,
425: 'ORG_ID');
426: IF nvl(l_session_org_id,-99) = l_work_item_org_id
433: END IF;
434:
435: ELSIF funcmode = 'SET_CTX'
436: THEN
437: l_user_id := wf_engine.GetItemAttrNumber
438: (itemtype,
439: itemkey,
440: 'USER_ID');
441: l_resp_id := wf_engine.GetItemAttrNumber
437: l_user_id := wf_engine.GetItemAttrNumber
438: (itemtype,
439: itemkey,
440: 'USER_ID');
441: l_resp_id := wf_engine.GetItemAttrNumber
442: (itemtype,
443: itemkey,
444: 'RESPONSIBILITY_ID');
445: l_appl_id := wf_engine.GetItemAttrNumber
441: l_resp_id := wf_engine.GetItemAttrNumber
442: (itemtype,
443: itemkey,
444: 'RESPONSIBILITY_ID');
445: l_appl_id := wf_engine.GetItemAttrNumber
446: (itemtype,
447: itemkey,
448: 'RESP_APPL_ID');
449:
449:
450: /* Bug# 5905190 MOAC changes starts.
451: Get org_id from Item Attribute and set policy context with same value
452: */
453: l_work_item_org_id := wf_engine.GetItemAttrNumber
454: (itemtype,
455: itemkey,
456: 'ORG_ID');
457:
554: ' l_itemkey --> ' || l_itemkey);
555: -- =============== END DEBUG LOG ==================
556:
557: -- Kick Off Workflow Process
558: wf_engine.CreateProcess (itemtype => l_itemtype,
559: itemkey => l_itemkey,
560: process => 'EXP_APPROVAL_TOP');
561:
562: -- =============== START DEBUG LOG ================
564: ' Create process ');
565: -- =============== END DEBUG LOG ==================
566:
567: -- Set Item User Key
568: wf_engine.SetItemUserKey( itemtype => l_itemtype,
569: itemkey => l_itemkey,
570: userkey => p_tu_order_number);
571:
572: -- =============== START DEBUG LOG ================
574: ' SetItemUserKey p_tu_order_number');
575: -- =============== END DEBUG LOG ==================
576:
577: -- Set Process Owner
578: wf_engine.SetItemOwner( itemtype => l_itemtype,
579: itemkey => l_itemkey,
580: owner => p_tu_transmitter_name);
581:
582: -- =============== START DEBUG LOG ================
584: ' SetItemOwner p_tu_transmitter_name');
585: -- =============== END DEBUG LOG ==================
586:
587: -- Set TU id
588: wf_engine.SetItemAttrNumber( itemtype => l_itemtype,
589: itemkey => l_itemkey,
590: aname => 'TU_ID',
591: avalue => p_tu_id);
592:
595: ' SetItemAttrNumber TU_ID --> ' || p_tu_id);
596: -- =============== END DEBUG LOG ==================
597:
598: -- Set TU Order Number
599: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
600: itemkey => l_itemkey,
601: aname => 'TU_ORDER_NUM',
602: avalue => p_tu_order_number);
603:
606: ' SetItemAttrText TU_ORDER_NUM --> ' || p_tu_order_number);
607: -- =============== END DEBUG LOG ==================
608:
609:
610: /* wf_engine.SetItemAttrText ( itemtype => l_itemtype, ---- Changes for Bug 6640095 - FP Bug 6847238
611: itemkey => l_itemkey,
612: aname => 'TU_FULL_NUMBER',
613: avalue => p_tu_order_number);
614: */
623:
624: IF (l_tu_legal_number is NULL) then
625:
626: -- Set TU Full Number
627: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
628: itemkey => l_itemkey,
629: aname => 'TU_FULL_NUMBER',
630: avalue => p_tu_order_number);
631:
631:
632: ELSE
633:
634: -- Set TU Full Number
635: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
636: itemkey => l_itemkey,
637: aname => 'TU_FULL_NUMBER',
638: avalue => l_tu_legal_number);
639:
647: ' SetItemAttrText TU_FULL_NUMBER --> ' || p_tu_order_number);
648: -- =============== END DEBUG LOG ==================
649:
650: -- Set TU Transmitter User Name
651: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
652: itemkey => l_itemkey,
653: aname => 'TRANSMITTER_FND_NAME',
654: avalue => p_tu_transmitter_name);
655:
658: ' SetItemAttrText TRANSMITTER_FND_NAME --> ' || p_tu_transmitter_name);
659: -- =============== END DEBUG LOG ==================
660:
661: -- Set TU Transmitter User Id
662: wf_engine.SetItemAttrNumber( itemtype => l_itemtype,
663: itemkey => l_itemkey,
664: aname => 'TRANSMITTER_FND_ID',
665: avalue => p_tu_transmitter_id);
666:
669: ' SetItemAttrText TRANSMITTER_FND_ID --> ' || p_tu_transmitter_id);
670: -- =============== END DEBUG LOG ==================
671:
672: -- Set current authorizer role
673: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
674: itemkey => l_itemkey,
675: aname => 'CURRENT_AUTHORIZER_ROLE',
676: avalue => p_tu_transmitter_name);
677:
681: -- =============== END DEBUG LOG ==================
682:
683:
684: -- Add Transmitter to Authorizer History List
685: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
686: itemkey => l_itemkey,
687: aname => 'AUTHORIZER_HISTORY_LIST',
688: avalue => p_tu_transmitter_name);
689:
693: -- =============== END DEBUG LOG ==================
694:
695: -- Set user id, responsibility id , org id and application id context values
696: -- Bug 4063076 , Start
697: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
698: itemkey => l_itemkey,
699: aname => 'ORG_ID',
700: avalue => mo_global.get_current_org_id());
701:
708: -- =============== END DEBUG LOG ==================
709:
710:
711:
712: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
713: itemkey => l_itemkey,
714: aname => 'USER_ID',
715: avalue => FND_PROFILE.VALUE('USER_ID'));
716:
722:
723: -- =============== END DEBUG LOG ==================
724:
725:
726: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
727: itemkey => l_itemkey,
728: aname => 'RESPONSIBILITY_ID',
729: avalue => FND_PROFILE.VALUE('RESP_ID'));
730:
736: ' SetItemAttrText RESPONSIBILITY_ID --> ' || FND_PROFILE.VALUE('RESPONSIBILITY_ID'));
737:
738: -- =============== END DEBUG LOG ==================
739:
740: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
741: itemkey => l_itemkey,
742: aname => 'RESP_APPL_ID',
743: avalue => FND_PROFILE.VALUE('RESP_APPL_ID'));
744:
764: ' SetItemAttrText IGI_EXP_APP_PROC_ERROR --> ' || nvl(l_msg,' NULL '));
765:
766: -- =============== END DEBUG LOG ==================
767:
768: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
769: itemkey => l_itemkey,
770: aname => 'APP_PROC_ERROR',
771: avalue => l_msg);
772:
779: -- =============== END DEBUG LOG ==================
780:
781: fnd_message.set_name ('IGI', 'IGI_EXP_DU_AUTH_REQ');
782: l_msg := fnd_message.get;
783: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
784: itemkey => l_itemkey,
785: aname => 'DU_AUTH_REQ',
786: avalue => l_msg);
787:
786: avalue => l_msg);
787:
788: fnd_message.set_name ('IGI', 'IGI_EXP_DU_HOLD');
789: l_msg := fnd_message.get;
790: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
791: itemkey => l_itemkey,
792: aname => 'DU_HOLD',
793: avalue => l_msg);
794:
793: avalue => l_msg);
794:
795: fnd_message.set_name ('IGI', 'IGI_EXP_DU_NO_APP_ACTION');
796: l_msg := fnd_message.get;
797: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
798: itemkey => l_itemkey,
799: aname => 'DU_NO_APP_ACTION',
800: avalue => l_msg);
801:
800: avalue => l_msg);
801:
802: fnd_message.set_name ('IGI', 'IGI_EXP_DU_PER_AUTH_ACTION');
803: l_msg := fnd_message.get;
804: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
805: itemkey => l_itemkey,
806: aname => 'DU_PER_AUTH_ACTION',
807: avalue => l_msg);
808:
807: avalue => l_msg);
808:
809: fnd_message.set_name ('IGI', 'IGI_EXP_LEGAL_NUM_ERROR');
810: l_msg := fnd_message.get;
811: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
812: itemkey => l_itemkey,
813: aname => 'LEGAL_NUM_ERROR',
814: avalue => l_msg);
815:
814: avalue => l_msg);
815:
816: fnd_message.set_name ('IGI', 'IGI_EXP_NTFY_DU_FAILED');
817: l_msg := fnd_message.get;
818: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
819: itemkey => l_itemkey,
820: aname => 'NTFY_DU_FAILED',
821: avalue => l_msg);
822:
821: avalue => l_msg);
822:
823: fnd_message.set_name ('IGI', 'IGI_EXP_NTFY_DU_REJECT');
824: l_msg := fnd_message.get;
825: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
826: itemkey => l_itemkey,
827: aname => 'NTFY_DU_REJECT',
828: avalue => l_msg);
829:
828: avalue => l_msg);
829:
830: fnd_message.set_name ('IGI', 'IGI_EXP_NTFY_LEGAL_DU_REJECT');
831: l_msg := fnd_message.get;
832: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
833: itemkey => l_itemkey,
834: aname => 'NTFY_LEGAL_DU_REJECT',
835: avalue => l_msg);
836:
835: avalue => l_msg);
836:
837: fnd_message.set_name ('IGI', 'IGI_EXP_NTFY_TU_SUCCESS');
838: l_msg := fnd_message.get;
839: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
840: itemkey => l_itemkey,
841: aname => 'NTFY_TU_SUCCESS',
842: avalue => l_msg);
843:
842: avalue => l_msg);
843:
844: fnd_message.set_name ('IGI', 'IGI_EXP_TU_ACTION_ASSIGNMENTS');
845: l_msg := fnd_message.get;
846: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
847: itemkey => l_itemkey,
848: aname => 'TU_ACTION_ASSIGNMENTS',
849: avalue => l_msg);
850:
849: avalue => l_msg);
850:
851: fnd_message.set_name ('IGI', 'IGI_EXP_TU_ACTION_ERROR');
852: l_msg := fnd_message.get;
853: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
854: itemkey => l_itemkey,
855: aname => 'TU_ACTION_ERROR',
856: avalue => l_msg);
857:
856: avalue => l_msg);
857:
858: fnd_message.set_name ('IGI', 'IGI_EXP_TU_AUTH_ACTION');
859: l_msg := fnd_message.get;
860: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
861: itemkey => l_itemkey,
862: aname => 'TU_AUTH_ACTION',
863: avalue => l_msg);
864:
863: avalue => l_msg);
864:
865: fnd_message.set_name ('IGI', 'IGI_EXP_TU_DU_AUTH_ACTION');
866: l_msg := fnd_message.get;
867: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
868: itemkey => l_itemkey,
869: aname => 'TU_DU_AUTH_ACTION',
870: avalue => l_msg);
871:
870: avalue => l_msg);
871:
872: fnd_message.set_name ('IGI', 'IGI_EXP_TU_DU_COMPLETE');
873: l_msg := fnd_message.get;
874: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
875: itemkey => l_itemkey,
876: aname => 'TU_DU_COMPLETE',
877: avalue => l_msg);
878:
877: avalue => l_msg);
878:
879: fnd_message.set_name ('IGI', 'IGI_EXP_TU_DU_HOLD');
880: l_msg := fnd_message.get;
881: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
882: itemkey => l_itemkey,
883: aname => 'TU_DU_HOLD',
884: avalue => l_msg);
885:
884: avalue => l_msg);
885:
886: fnd_message.set_name ('IGI', 'IGI_EXP_TU_DU_HOLD_REMOVE');
887: l_msg := fnd_message.get;
888: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
889: itemkey => l_itemkey,
890: aname => 'TU_DU_HOLD_REMOVE',
891: avalue => l_msg);
892:
891: avalue => l_msg);
892:
893: fnd_message.set_name ('IGI', 'IGI_EXP_TU_DU_NO_APP_ACTION');
894: l_msg := fnd_message.get;
895: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
896: itemkey => l_itemkey,
897: aname => 'TU_DU_NO_APP_ACTION',
898: avalue => l_msg);
899:
898: avalue => l_msg);
899:
900: fnd_message.set_name ('IGI', 'IGI_EXP_TU_DU_PER_AUTH_ACTION');
901: l_msg := fnd_message.get;
902: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
903: itemkey => l_itemkey,
904: aname => 'TU_DU_PER_AUTH_ACTION',
905: avalue => l_msg);
906:
905: avalue => l_msg);
906:
907: fnd_message.set_name ('IGI', 'IGI_EXP_TU_DU_REMAIN');
908: l_msg := fnd_message.get;
909: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
910: itemkey => l_itemkey,
911: aname => 'TU_DU_REMAIN',
912: avalue => l_msg);
913:
912: avalue => l_msg);
913:
914: fnd_message.set_name ('IGI', 'IGI_EXP_TU_DU_REMOVE');
915: l_msg := fnd_message.get;
916: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
917: itemkey => l_itemkey,
918: aname => 'TU_DU_REMOVE',
919: avalue => l_msg);
920:
919: avalue => l_msg);
920:
921: fnd_message.set_name ('IGI', 'IGI_EXP_TU_EMP_SETUP_ERROR');
922: l_msg := fnd_message.get;
923: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
924: itemkey => l_itemkey,
925: aname => 'TU_EMP_SETUP_ERROR',
926: avalue => l_msg);
927:
926: avalue => l_msg);
927:
928: fnd_message.set_name ('IGI', 'IGI_EXP_TU_LEGAL_NUM_ERROR');
929: l_msg := fnd_message.get;
930: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
931: itemkey => l_itemkey,
932: aname => 'TU_LEGAL_NUM_ERROR',
933: avalue => l_msg);
934:
933: avalue => l_msg);
934:
935: fnd_message.set_name ('IGI', 'IGI_EXP_TU_NO_PARENT');
936: l_msg := fnd_message.get;
937: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
938: itemkey => l_itemkey,
939: aname => 'TU_NO_PARENT',
940: avalue => l_msg);
941:
940: avalue => l_msg);
941:
942: fnd_message.set_name ('IGI', 'IGI_EXP_TU_NO_USER_ERROR');
943: l_msg := fnd_message.get;
944: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
945: itemkey => l_itemkey,
946: aname => 'TU_NO_USER_ERROR',
947: avalue => l_msg);
948:
947: avalue => l_msg);
948:
949: fnd_message.set_name ('IGI', 'IGI_EXP_TU_NOT_ASSG_POS_ERROR');
950: l_msg := fnd_message.get;
951: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
952: itemkey => l_itemkey,
953: aname => 'TU_NOT_ASSG_POS_ERROR',
954: avalue => l_msg);
955:
954: avalue => l_msg);
955:
956: fnd_message.set_name ('IGI', 'IGI_EXP_TU_NOT_SETUP_EMP_ERR');
957: l_msg := fnd_message.get;
958: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
959: itemkey => l_itemkey,
960: aname => 'TU_NOT_SETUP_EMP_ERROR',
961: avalue => l_msg);
962:
961: avalue => l_msg);
962:
963: fnd_message.set_name ('IGI', 'IGI_EXP_TU_PICK_AUTH');
964: l_msg := fnd_message.get;
965: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
966: itemkey => l_itemkey,
967: aname => 'TU_PICK_AUTH',
968: avalue => l_msg);
969:
968: avalue => l_msg);
969:
970: fnd_message.set_name ('IGI', 'IGI_EXP_TU_PICK_NEW_AUTH');
971: l_msg := fnd_message.get;
972: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
973: itemkey => l_itemkey,
974: aname => 'TU_PICK_NEW_AUTH',
975: avalue => l_msg);
976:
975: avalue => l_msg);
976:
977: fnd_message.set_name ('IGI', 'IGI_EXP_TU_PICK_NEW_AUTH_LIST');
978: l_msg := fnd_message.get;
979: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
980: itemkey => l_itemkey,
981: aname => 'TU_PICK_NEW_AUTH_LIST',
982: avalue => l_msg);
983:
982: avalue => l_msg);
983:
984: fnd_message.set_name ('IGI', 'IGI_EXP_TU_POS_ASSG_ERROR');
985: l_msg := fnd_message.get;
986: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
987: itemkey => l_itemkey,
988: aname => 'TU_POS_ASSG_ERROR',
989: avalue => l_msg);
990:
989: avalue => l_msg);
990:
991: fnd_message.set_name ('IGI', 'IGI_EXP_TU_REQ_AUTHORIZATION');
992: l_msg := fnd_message.get;
993: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
994: itemkey => l_itemkey,
995: aname => 'TU_REQ_AUTHORIZATION',
996: avalue => l_msg);
997:
996: avalue => l_msg);
997:
998: fnd_message.set_name ('IGI', 'IGI_EXP_TU_RET_ATTN');
999: l_msg := fnd_message.get;
1000: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
1001: itemkey => l_itemkey,
1002: aname => 'TU_RET_ATTN',
1003: avalue => l_msg);
1004:
1003: avalue => l_msg);
1004:
1005: fnd_message.set_name ('IGI', 'IGI_EXP_TU_VAL_HIER_POS_ERROR');
1006: l_msg := fnd_message.get;
1007: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
1008: itemkey => l_itemkey,
1009: aname => 'TU_VAL_HIER_POS_ERROR',
1010: avalue => l_msg);
1011:
1010: avalue => l_msg);
1011:
1012: fnd_message.set_name ('IGI', 'IGI_EXP_TU_VAL_HR_POS_PRF_ERR');
1013: l_msg := fnd_message.get;
1014: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
1015: itemkey => l_itemkey,
1016: aname => 'TU_VAL_HIER_POS_PROF_ERROR',
1017: avalue => l_msg);
1018:
1017: avalue => l_msg);
1018:
1019: fnd_message.set_name ('IGI', 'IGI_EXP_TU_VALIDATION_ERROR');
1020: l_msg := fnd_message.get;
1021: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
1022: itemkey => l_itemkey,
1023: aname => 'TU_VALIDATION_ERROR',
1024: avalue => l_msg);
1025:
1024: avalue => l_msg);
1025:
1026: fnd_message.set_name ('IGI', 'IGI_EXP_TU_VALIDATION_HR_ERR');
1027: l_msg := fnd_message.get;
1028: wf_engine.SetItemAttrText ( itemtype => l_itemtype,
1029: itemkey => l_itemkey,
1030: aname => 'TU_VALIDATION_HIER_ERROR',
1031: avalue => l_msg);
1032:
1032:
1033: --Bug 5872277 End
1034:
1035: -- Start the workflow process
1036: wf_engine.StartProcess( itemtype => l_itemtype,
1037: itemkey => l_itemkey);
1038:
1039: -- =============== START DEBUG LOG ================
1040: DEBUG_LOG_STRING (l_proc_level, 'Start_approval_workflow.Msg16',
1086: IF (funcmode = 'RUN') THEN
1087:
1088: -- Get the fnd user id of the TU transmitter
1089: l_transmitter_fnd_id
1090: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
1091: itemkey => itemkey,
1092: aname => 'TRANSMITTER_FND_ID');
1093:
1094: -- =============== START DEBUG LOG ================
1121:
1122: ELSE -- TU Transmitter is an employee
1123:
1124: -- Set the transmitter_emp_id attribute
1125: wf_engine.SetItemAttrNumber( itemtype => itemtype,
1126: itemkey => itemkey,
1127: aname => 'TRANSMITTER_EMP_ID',
1128: avalue => l_transmitter_emp_id);
1129:
1144: ||' l_display_name -> ' || l_display_name );
1145: -- =============== END DEBUG LOG ==================
1146:
1147: -- Set the transmitter_emp_name attribute
1148: wf_engine.SetItemAttrText ( itemtype => itemtype,
1149: itemkey => itemkey,
1150: aname => 'TRANSMITTER_EMP_NAME',
1151: avalue => l_transmitter_emp_name);
1152:
1249: IF (funcmode = 'RUN') THEN
1250:
1251: -- Get the employee id for the TU Transmitter
1252: l_transmitter_emp_id
1253: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
1254: itemkey => itemkey,
1255: aname => 'TRANSMITTER_EMP_ID');
1256:
1257: -- =============== START DEBUG LOG ================
1286:
1287: ELSE -- TU Transmitter is an employee, and has been assigned a position
1288:
1289: -- Set the transmitter_position_id attribute
1290: wf_engine.SetItemAttrNumber( itemtype => itemtype,
1291: itemkey => itemkey,
1292: aname => 'TRANSMITTER_POSITION_ID',
1293: avalue => l_position_id);
1294:
1297: ' SetItemAttrNumber TRANSMITTER_POSITION_ID --> '|| l_position_id);
1298: -- =============== END DEBUG LOG ==================
1299:
1300: -- Set the business_group_id attribute
1301: wf_engine.SetItemAttrNumber( itemtype => itemtype,
1302: itemkey => itemkey,
1303: aname => 'BUSINESS_GROUP_ID',
1304: avalue => l_business_group_id);
1305:
1308: ' SetItemAttrNumber BUSINESS_GROUP_ID --> ' ||l_business_group_id );
1309: -- =============== END DEBUG LOG ==================
1310:
1311: -- Set the organization_id attribute
1312: wf_engine.SetItemAttrNumber( itemtype => itemtype,
1313: itemkey => itemkey,
1314: aname => 'ORGANIZATION_ID',
1315: avalue => l_organization_id);
1316:
1319: ' SetItemAttrNumber ORGANIZATION_ID --> ' || l_organization_id);
1320: -- =============== END DEBUG LOG ==================
1321:
1322: -- Set the current_position_id attribute to the position id of the transmitter
1323: wf_engine.SetItemAttrNumber( itemtype => itemtype,
1324: itemkey => itemkey,
1325: aname => 'CURRENT_POSITION_ID',
1326: avalue => l_position_id);
1327:
1330: ' SetItemAttrNumber CURRENT_POSITION_ID --> '|| l_position_id);
1331: -- =============== END DEBUG LOG ==================
1332:
1333: -- Set the current_position_name attribute to the position name of the transmitter
1334: wf_engine.SetItemAttrText ( itemtype => itemtype,
1335: itemkey => itemkey,
1336: aname => 'CURRENT_POSITION_NAME',
1337: avalue => l_position_name);
1338:
1473: -- hierarchy attached to the approval profile chosen for the TU.
1474:
1475: -- First get the TU id
1476: l_tu_id
1477: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
1478: itemkey => itemkey,
1479: aname => 'TU_ID');
1480:
1481: -- =============== START DEBUG LOG ================
1484: -- =============== END DEBUG LOG ==================
1485:
1486: -- Fetch the position id of the transmitter
1487: l_position_id
1488: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
1489: itemkey => itemkey,
1490: aname => 'TRANSMITTER_POSITION_ID');
1491:
1492: -- =============== START DEBUG LOG ================
1526:
1527: -- Set the corresponding workflow attributes with this information
1528:
1529: -- Set the pos_structure_id attribute
1530: wf_engine.SetItemAttrNumber( itemtype => itemtype,
1531: itemkey => itemkey,
1532: aname => 'POS_STRUCTURE_ID',
1533: avalue => l_pos_hierarchy_id);
1534:
1537: ' SetItemAttrNumber POS_STRUCTURE_ID --> '|| l_pos_hierarchy_id);
1538: -- =============== END DEBUG LOG ==================
1539:
1540: -- Set the legal_num_pos_id attribute
1541: wf_engine.SetItemAttrNumber( itemtype => itemtype,
1542: itemkey => itemkey,
1543: aname => 'LEGAL_NUM_POS_ID',
1544: avalue => l_legal_num_pos_id);
1545:
1548: ' SetItemAttrNumber LEGAL_NUM_POS_ID --> '|| l_legal_num_pos_id);
1549: -- =============== END DEBUG LOG ==================
1550:
1551: -- Set the final_apprv_pos_id attribute
1552: wf_engine.SetItemAttrNumber( itemtype => itemtype,
1553: itemkey => itemkey,
1554: aname => 'FINAL_APPRV_POS_ID',
1555: avalue => l_final_apprv_pos_id);
1556:
1562: -- Now need to find the current version of the position hierarchy.
1563:
1564: -- Get the business group id
1565: l_business_group_id
1566: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
1567: itemkey => itemkey,
1568: aname => 'BUSINESS_GROUP_ID');
1569:
1570: -- =============== START DEBUG LOG ================
1597:
1598: CLOSE c_get_pos_hier_ver;
1599:
1600: -- Set the pos_structure_version_id attribute
1601: wf_engine.SetItemAttrNumber( itemtype => itemtype,
1602: itemkey => itemkey,
1603: aname => 'POS_STRUCTURE_VERSION_ID',
1604: avalue => l_pos_structure_version_id);
1605:
1698: -- The position exists in the hierarchy.
1699: -- Set the pos_structure_element_id for reference purposes.
1700:
1701: -- Set the pos_structure_element_id attribute
1702: wf_engine.SetItemAttrNumber( itemtype => itemtype,
1703: itemkey => itemkey,
1704: aname => 'POS_STRUCTURE_ELEMENT_ID',
1705: avalue => l_pos_structure_element_id);
1706:
1810: -- Position structure version, transmitter's position, final approver position
1811: -- and business group.
1812:
1813: l_pos_structure_version_id
1814: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
1815: itemkey => itemkey,
1816: aname => 'POS_STRUCTURE_VERSION_ID');
1817:
1818: -- =============== START DEBUG LOG ================
1820: ' ** BEGIN IS_POSITION_GT_FINAL_POS ** ');
1821: -- =============== END DEBUG LOG ==================
1822:
1823: l_business_group_id
1824: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
1825: itemkey => itemkey,
1826: aname => 'BUSINESS_GROUP_ID');
1827:
1828: -- =============== START DEBUG LOG ================
1830: ' GetItemAttrNumber BUSINESS_GROUP_ID --> '|| l_business_group_id);
1831: -- =============== END DEBUG LOG ==================
1832:
1833: l_transmitter_position_id
1834: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
1835: itemkey => itemkey,
1836: aname => 'TRANSMITTER_POSITION_ID');
1837:
1838: -- =============== START DEBUG LOG ================
1840: ' GetItemAttrNumber TRANSMITTER_POSITION_ID --> ' || l_transmitter_position_id);
1841: -- =============== END DEBUG LOG ==================
1842:
1843: l_final_apprv_pos_id
1844: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
1845: itemkey => itemkey,
1846: aname => 'FINAL_APPRV_POS_ID');
1847:
1848: -- =============== START DEBUG LOG ================
2018: -- transmitted again.
2019:
2020: -- Get the tu id
2021: l_tu_id
2022: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
2023: itemkey => itemkey,
2024: aname => 'TU_ID');
2025:
2026: -- =============== START DEBUG LOG ================
2101: -- transmitted again.
2102:
2103: -- Get the tu id
2104: l_tu_id
2105: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
2106: itemkey => itemkey,
2107: aname => 'TU_ID');
2108:
2109: -- =============== START DEBUG LOG ================
2217: -- =============== END DEBUG LOG ==================
2218:
2219: -- Get the current position id
2220: l_current_position_id
2221: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
2222: itemkey => itemkey,
2223: aname => 'CURRENT_POSITION_ID');
2224:
2225: -- =============== START DEBUG LOG ================
2228: -- =============== END DEBUG LOG ==================
2229:
2230: -- Get the business group id
2231: l_business_group_id
2232: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
2233: itemkey => itemkey,
2234: aname => 'BUSINESS_GROUP_ID');
2235:
2236: -- =============== START DEBUG LOG ================
2239: -- =============== END DEBUG LOG ==================
2240:
2241: -- Get the organization id
2242: l_organization_id
2243: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
2244: itemkey => itemkey,
2245: aname => 'ORGANIZATION_ID');
2246:
2247: -- =============== START DEBUG LOG ================
2300: -- =============== END DEBUG LOG ==================
2301:
2302: -- Set the current_authoriser_role attribute to the user
2303: -- at the current position
2304: wf_engine.SetItemAttrText ( itemtype => itemtype,
2305: itemkey => itemkey,
2306: aname => 'CURRENT_AUTHORIZER_ROLE',
2307: avalue => l_user_name);
2308:
2326: -- =============== END DEBUG LOG ==================
2327:
2328: -- Now get the TU id
2329: l_tu_id
2330: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
2331: itemkey => itemkey,
2332: aname => 'TU_ID');
2333:
2334:
2360:
2361: ELSE -- multiple users were found for the current position
2362:
2363: -- Set the user_list attribute to the list of users found
2364: wf_engine.SetItemAttrText ( itemtype => itemtype,
2365: itemkey => itemkey,
2366: aname => 'USER_LIST',
2367: avalue => l_user_list);
2368:
2372: ' SetItemAttrText USER_LIST --> ' || l_user_list);
2373: -- =============== END DEBUG LOG ==================
2374:
2375: -- Clear the picked authorizer attribute for the notification
2376: wf_engine.SetItemAttrText ( itemtype => itemtype,
2377: itemkey => itemkey,
2378: aname => 'PICKED_AUTHORIZER',
2379: avalue => null);
2380:
2459: DEBUG_LOG_STRING (l_proc_level, 'Check_user_position.Msg2',
2460: ' funcmode = RESPOND ');
2461: -- =============== END DEBUG LOG ==================
2462:
2463: l_nid := wf_engine.context_nid;
2464:
2465: -- =============== START DEBUG LOG ================
2466: DEBUG_LOG_STRING (l_proc_level, 'Check_user_position.Msg3',
2467: ' l_nid --> ' || l_nid);
2490: -- =============== END DEBUG LOG ==================
2491:
2492: -- Get the current position id
2493: l_current_position_id
2494: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
2495: itemkey => itemkey,
2496: aname => 'CURRENT_POSITION_ID');
2497:
2498: -- =============== START DEBUG LOG ================
2586: IF (funcmode = 'RUN') THEN
2587:
2588: -- Get the current position id
2589: l_current_position_id
2590: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
2591: itemkey => itemkey,
2592: aname => 'CURRENT_POSITION_ID');
2593:
2594: -- =============== START DEBUG LOG ================
2603: ' l_current_auth_role -->' || l_current_auth_role);
2604: -- =============== END DEBUG LOG ==================
2605:
2606: -- Set the current_authorizer_role attribute to the position
2607: wf_engine.SetItemAttrText ( itemtype => itemtype,
2608: itemkey => itemkey,
2609: aname => 'CURRENT_AUTHORIZER_ROLE',
2610: avalue => l_current_auth_role);
2611:
2620: -- there.
2621: -- First get the TU id
2622:
2623: l_tu_id
2624: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
2625: itemkey => itemkey,
2626: aname => 'TU_ID');
2627:
2628: -- =============== START DEBUG LOG ================
2691: IF (funcmode = 'RUN') THEN
2692:
2693: -- Get the picked authorizer role
2694: l_current_auth_role
2695: := wf_engine.GetItemAttrText ( itemtype => itemtype,
2696: itemkey => itemkey,
2697: aname => 'PICKED_AUTHORIZER');
2698:
2699: -- =============== START DEBUG LOG ================
2703:
2704: -- Need to update the TU table to show the next authorizer of the TU
2705: -- First get the TU id
2706: l_tu_id
2707: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
2708: itemkey => itemkey,
2709: aname => 'TU_ID');
2710:
2711: -- =============== START DEBUG LOG ================
2734: ' UPDATE igi_exp_tus with ' || l_auth_id || ' for ' || l_tu_id);
2735: -- =============== END DEBUG LOG ==================
2736:
2737: -- Set the current_authorizer_role attribute
2738: wf_engine.SetItemAttrText ( itemtype => itemtype,
2739: itemkey => itemkey,
2740: aname => 'CURRENT_AUTHORIZER_ROLE',
2741: avalue => l_current_auth_role);
2742:
2809: -- no authorizer to return it to).
2810:
2811: -- Get the authorizer history list
2812: l_authorizer_history_list
2813: := wf_engine.GetItemAttrText ( itemtype => itemtype,
2814: itemkey => itemkey,
2815: aname => 'AUTHORIZER_HISTORY_LIST');
2816:
2817: -- =============== START DEBUG LOG ================
2849: -- action assignment setup.
2850: -- Get the position id of the current authorizer
2851:
2852: l_current_position_id
2853: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
2854: itemkey => itemkey,
2855: aname => 'CURRENT_POSITION_ID');
2856:
2857: -- =============== START DEBUG LOG ================
2966: DEBUG_LOG_STRING (l_proc_level, 'Set_curr_auth_to_responder.Msg2',
2967: ' funcmode = RESPOND ');
2968: -- =============== END DEBUG LOG ==================
2969:
2970: l_nid := wf_engine.context_nid;
2971:
2972: -- =============== START DEBUG LOG ================
2973: DEBUG_LOG_STRING (l_proc_level, 'Set_curr_auth_to_responder.Msg3',
2974: ' l_nid --> ' || l_nid);
2975: -- =============== END DEBUG LOG ==================
2976:
2977: -- Get the current authoriser role item attribute
2978: l_current_auth_role
2979: := wf_engine.GetItemAttrText ( itemtype => itemtype,
2980: itemkey => itemkey,
2981: aname => 'CURRENT_AUTHORIZER_ROLE');
2982:
2983: -- =============== START DEBUG LOG ================
3008: -- The current authorizer role is set as a position, so want to set it to
3009: -- the responder user instead.
3010:
3011: -- Get the responder
3012: l_current_auth_role := wf_engine.context_text;
3013:
3014: -- =============== START DEBUG LOG ================
3015: DEBUG_LOG_STRING (l_proc_level, 'Set_curr_auth_to_responder.Msg7',
3016: ' l_num > 0 -- l_current_auth_role --> ' || l_current_auth_role);
3016: ' l_num > 0 -- l_current_auth_role --> ' || l_current_auth_role);
3017: -- =============== END DEBUG LOG ==================
3018:
3019: -- Set the current authorizer role attribute to the responder
3020: wf_engine.SetItemAttrText ( itemtype => itemtype,
3021: itemkey => itemkey,
3022: aname => 'CURRENT_AUTHORIZER_ROLE',
3023: avalue => l_current_auth_role);
3024:
3098: -- list.
3099:
3100: -- Get the current authorizer
3101: l_current_auth_role
3102: := wf_engine.GetItemAttrText ( itemtype => itemtype,
3103: itemkey => itemkey,
3104: aname => 'CURRENT_AUTHORIZER_ROLE');
3105:
3106: -- =============== START DEBUG LOG ================
3109: -- =============== END DEBUG LOG ==================
3110:
3111: -- Get the authorizer history list
3112: l_authorizer_history_list
3113: := wf_engine.GetItemAttrText ( itemtype => itemtype,
3114: itemkey => itemkey,
3115: aname => 'AUTHORIZER_HISTORY_LIST');
3116:
3117: -- =============== START DEBUG LOG ================
3128: ' l_authorizer_history_list --> ' || l_authorizer_history_list);
3129: -- =============== END DEBUG LOG ==================
3130:
3131: -- Set the authorizer_history_list attribute
3132: wf_engine.SetItemAttrText ( itemtype => itemtype,
3133: itemkey => itemkey,
3134: aname => 'AUTHORIZER_HISTORY_LIST',
3135: avalue => l_authorizer_history_list);
3136:
3218: -- below the TU transmitter's level
3219:
3220: -- Get the position id of the TU transmitter
3221: l_transmitter_position_id
3222: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
3223: itemkey => itemkey,
3224: aname => 'TRANSMITTER_POSITION_ID');
3225:
3226: -- =============== START DEBUG LOG ================
3229: -- =============== END DEBUG LOG ==================
3230:
3231: -- Get the current position id
3232: l_current_position_id
3233: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
3234: itemkey => itemkey,
3235: aname => 'CURRENT_POSITION_ID');
3236:
3237: -- =============== START DEBUG LOG ================
3252: -- Position structure version and business group.
3253:
3254: -- Get the position structure version id
3255: l_pos_structure_version_id
3256: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
3257: itemkey => itemkey,
3258: aname => 'POS_STRUCTURE_VERSION_ID');
3259:
3260: -- =============== START DEBUG LOG ================
3263: -- =============== END DEBUG LOG ==================
3264:
3265: -- Get the business group
3266: l_business_group_id
3267: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
3268: itemkey => itemkey,
3269: aname => 'BUSINESS_GROUP_ID');
3270:
3271: -- =============== START DEBUG LOG ================
3274: -- =============== END DEBUG LOG ==================
3275:
3276: -- Get the organization_id
3277: l_organization_id
3278: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
3279: itemkey => itemkey,
3280: aname => 'ORGANIZATION_ID');
3281:
3282: -- =============== START DEBUG LOG ================
3317: ' l_subord_position_name --> ' || l_subord_position_name);
3318: -- =============== END DEBUG LOG ==================
3319:
3320: -- Set the current position id attribute to the subordinate position
3321: wf_engine.SetItemAttrNumber( itemtype => itemtype,
3322: itemkey => itemkey,
3323: aname => 'CURRENT_POSITION_ID',
3324: avalue => l_subord_position_id);
3325:
3328: ' SetItemAttrNumber CURRENT_POSITION_ID --> ' || l_subord_position_id);
3329: -- =============== END DEBUG LOG ==================
3330:
3331: -- Set the current position name attribute to the subordinate position
3332: wf_engine.SetItemAttrText ( itemtype => itemtype,
3333: itemkey => itemkey,
3334: aname => 'CURRENT_POSITION_NAME',
3335: avalue => l_subord_position_name);
3336:
3410:
3411: -- Firstly, we need to find the returner of the TU
3412: -- Get the current authoriser
3413: l_returner_name
3414: := wf_engine.GetItemAttrText ( itemtype => itemtype,
3415: itemkey => itemkey,
3416: aname => 'CURRENT_AUTHORIZER_ROLE');
3417:
3418: -- =============== START DEBUG LOG ================
3420: ' GetItemAttrText CURRENT_AUTHORIZER_ROLE --> ' || l_returner_name);
3421: -- =============== END DEBUG LOG ==================
3422:
3423: -- Set the returner_name attribute
3424: wf_engine.SetItemAttrText ( itemtype => itemtype,
3425: itemkey => itemkey,
3426: aname => 'RETURNER_NAME',
3427: avalue => l_returner_name);
3428:
3436: -- authorizer history list
3437:
3438: -- Get the authorizer history list
3439: l_authorizer_history_list
3440: := wf_engine.GetItemAttrText ( itemtype => itemtype,
3441: itemkey => itemkey,
3442: aname => 'AUTHORIZER_HISTORY_LIST');
3443:
3444: -- =============== START DEBUG LOG ================
3473: ' l_new_auth_history_list --> ' || l_new_auth_history_list);
3474: -- =============== END DEBUG LOG ==================
3475:
3476: -- Set the authorizer_history_list attribute
3477: wf_engine.SetItemAttrText ( itemtype => itemtype,
3478: itemkey => itemkey,
3479: aname => 'AUTHORIZER_HISTORY_LIST',
3480: avalue => l_new_auth_history_list);
3481:
3514: -- =============== END DEBUG LOG ==================
3515: END IF;
3516:
3517: -- Set the current_authorizer_role attribute to the previous authorizer
3518: wf_engine.SetItemAttrText ( itemtype => itemtype,
3519: itemkey => itemkey,
3520: aname => 'CURRENT_AUTHORIZER_ROLE',
3521: avalue => l_prev_authorizer);
3522:
3601: -- the approval request).
3602:
3603: -- Get the TU id
3604: l_tu_id
3605: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
3606: itemkey => itemkey,
3607: aname => 'TU_ID');
3608:
3609: -- =============== START DEBUG LOG ================
3705: IF (funcmode = 'RUN') THEN
3706:
3707: -- Get the TU id
3708: l_tu_id
3709: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
3710: itemkey => itemkey,
3711: aname => 'TU_ID');
3712:
3713: -- =============== START DEBUG LOG ================
3795:
3796: -- Need to set approved DUs to status 'Approved and Transmitted'
3797: -- Get the TU id
3798: l_tu_id
3799: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
3800: itemkey => itemkey,
3801: aname => 'TU_ID');
3802:
3803: -- =============== START DEBUG LOG ================
3875: IF (funcmode = 'RUN') THEN
3876:
3877: -- Get the TU id
3878: l_tu_id
3879: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
3880: itemkey => itemkey,
3881: aname => 'TU_ID');
3882:
3883: -- =============== START DEBUG LOG ================
3942:
3943: END LOOP;
3944:
3945: -- Set the all_dus_list attribute
3946: wf_engine.SetItemAttrText ( itemtype => itemtype,
3947: itemkey => itemkey,
3948: aname => 'ADD_ATTR1',
3949: avalue => substr(l_du_hold_list, 1, 4000));
3950:
3952: DEBUG_LOG_STRING (l_proc_level, 'List_any_dus_on_hold.Msg7',
3953: ' SetItemAttrText ADD_ATTR1 --> ' || substr(l_du_hold_list, 1, 4000));
3954: -- =============== END DEBUG LOG ==================
3955:
3956: wf_engine.SetItemAttrText ( itemtype => itemtype,
3957: itemkey => itemkey,
3958: aname => 'ADD_ATTR2',
3959: avalue => substr(l_du_hold_list, 4001, 4000));
3960:
3962: DEBUG_LOG_STRING (l_proc_level, 'List_any_dus_on_hold.Msg8',
3963: ' SetItemAttrText ADD_ATTR2 --> ' || substr(l_du_hold_list, 4001, 4000));
3964: -- =============== END DEBUG LOG ==================
3965:
3966: wf_engine.SetItemAttrText ( itemtype => itemtype,
3967: itemkey => itemkey,
3968: aname => 'ADD_ATTR3',
3969: avalue => substr(l_du_hold_list, 8001, 4000));
3970:
3972: DEBUG_LOG_STRING (l_proc_level, 'List_any_dus_on_hold.Msg9',
3973: ' SetItemAttrText ADD_ATTR3 --> ' || substr(l_du_hold_list, 8001, 4000));
3974: -- =============== END DEBUG LOG ==================
3975:
3976: wf_engine.SetItemAttrText ( itemtype => itemtype,
3977: itemkey => itemkey,
3978: aname => 'ADD_ATTR4',
3979: avalue => substr(l_du_hold_list, 12001, 4000));
3980:
3982: DEBUG_LOG_STRING (l_proc_level, 'List_any_dus_on_hold.Msg10',
3983: ' SetItemAttrText ADD_ATTR4 --> ' || substr(l_du_hold_list, 12001, 4000));
3984: -- =============== END DEBUG LOG ==================
3985:
3986: wf_engine.SetItemAttrText ( itemtype => itemtype,
3987: itemkey => itemkey,
3988: aname => 'ADD_ATTR5',
3989: avalue => substr(l_du_hold_list, 16001, 4000));
3990:
3992: DEBUG_LOG_STRING (l_proc_level, 'List_any_dus_on_hold.Msg11',
3993: ' SetItemAttrText ADD_ATTR5 --> ' || substr(l_du_hold_list, 16001, 4000));
3994: -- =============== END DEBUG LOG ==================
3995:
3996: wf_engine.SetItemAttrText ( itemtype => itemtype,
3997: itemkey => itemkey,
3998: aname => 'ADD_ATTR6',
3999: avalue => substr(l_du_hold_list, 20001, 4000));
4000:
4002: DEBUG_LOG_STRING (l_proc_level, 'List_any_dus_on_hold.Msg12',
4003: ' SetItemAttrText ADD_ATTR6 --> ' || substr(l_du_hold_list, 20001, 4000));
4004: -- =============== END DEBUG LOG ==================
4005:
4006: wf_engine.SetItemAttrText ( itemtype => itemtype,
4007: itemkey => itemkey,
4008: aname => 'ADD_ATTR7',
4009: avalue => substr(l_du_hold_list, 24001, 4000));
4010:
4014: ' SetItemAttrText ADD_ATTR7 --> ' || substr(l_du_hold_list, 24001, 4000));
4015: -- =============== END DEBUG LOG ==================
4016:
4017: -- Set the all_dus_list attribute
4018: wf_engine.SetItemAttrText ( itemtype => itemtype,
4019: itemkey => itemkey,
4020: aname => 'ALL_DUS_LIST',
4021: avalue => 'plsqlclob:igi_exp_approval_pkg.Create_du_list/'||itemtype||':'||itemkey);
4022:
4110: IF (funcmode = 'RUN') THEN
4111:
4112: -- Get the TU id
4113: l_tu_id
4114: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
4115: itemkey => itemkey,
4116: aname => 'TU_ID');
4117:
4118: -- =============== START DEBUG LOG ================
4139: ELSE
4140:
4141: -- The next DU has been fetched
4142: -- Set the temp_du_preparer_id attribute
4143: wf_engine.SetItemAttrNumber( itemtype => itemtype,
4144: itemkey => itemkey,
4145: aname => 'TEMP_DU_PREPARER_ID',
4146: avalue => l_du_prep_id);
4147:
4161: ' l_du_prep_name --> ' || l_du_prep_name);
4162: -- =============== END DEBUG LOG ==================
4163:
4164: -- Set the temp_du_preparer_name attribute
4165: wf_engine.SetItemAttrText ( itemtype => itemtype,
4166: itemkey => itemkey,
4167: aname => 'TEMP_DU_PREPARER_NAME',
4168: avalue => l_du_prep_name);
4169:
4206:
4207: END LOOP;
4208:
4209: -- Set the all_dus_list attribute
4210: wf_engine.SetItemAttrText ( itemtype => itemtype,
4211: itemkey => itemkey,
4212: aname => 'ADD_ATTR1',
4213: avalue => substr(l_du_by_prep_list, 1, 4000));
4214:
4216: DEBUG_LOG_STRING (l_proc_level, 'Get_next_du_on_hold.Msg10',
4217: ' SetItemAttrText ADD_ATTR1 --> ' || substr(l_du_by_prep_list, 1, 4000));
4218: -- =============== END DEBUG LOG ==================
4219:
4220: wf_engine.SetItemAttrText ( itemtype => itemtype,
4221: itemkey => itemkey,
4222: aname => 'ADD_ATTR2',
4223: avalue => substr(l_du_by_prep_list, 4001, 4000));
4224:
4226: DEBUG_LOG_STRING (l_proc_level, 'Get_next_du_on_hold.Msg11',
4227: ' SetItemAttrText ADD_ATTR2 --> ' || substr(l_du_by_prep_list, 4001, 4000));
4228: -- =============== END DEBUG LOG ==================
4229:
4230: wf_engine.SetItemAttrText ( itemtype => itemtype,
4231: itemkey => itemkey,
4232: aname => 'ADD_ATTR3',
4233: avalue => substr(l_du_by_prep_list, 8001, 4000));
4234:
4236: DEBUG_LOG_STRING (l_proc_level, 'Get_next_du_on_hold.Msg12',
4237: ' SetItemAttrText ADD_ATTR3 --> ' || substr(l_du_by_prep_list, 8001, 4000));
4238: -- =============== END DEBUG LOG ==================
4239:
4240: wf_engine.SetItemAttrText ( itemtype => itemtype,
4241: itemkey => itemkey,
4242: aname => 'ADD_ATTR4',
4243: avalue => substr(l_du_by_prep_list, 12001, 4000));
4244:
4246: DEBUG_LOG_STRING (l_proc_level, 'Get_next_du_on_hold.Msg13',
4247: ' SetItemAttrText ADD_ATTR4 --> ' || substr(l_du_by_prep_list, 12001, 4000));
4248: -- =============== END DEBUG LOG ==================
4249:
4250: wf_engine.SetItemAttrText ( itemtype => itemtype,
4251: itemkey => itemkey,
4252: aname => 'ADD_ATTR5',
4253: avalue => substr(l_du_by_prep_list, 16001, 4000));
4254:
4256: DEBUG_LOG_STRING (l_proc_level, 'Get_next_du_on_hold.Msg14',
4257: ' SetItemAttrText ADD_ATTR5 --> ' || substr(l_du_by_prep_list, 16001, 4000));
4258: -- =============== END DEBUG LOG ==================
4259:
4260: wf_engine.SetItemAttrText ( itemtype => itemtype,
4261: itemkey => itemkey,
4262: aname => 'ADD_ATTR6',
4263: avalue => substr(l_du_by_prep_list, 20001, 4000));
4264:
4266: DEBUG_LOG_STRING (l_proc_level, 'Get_next_du_on_hold.Msg15',
4267: ' SetItemAttrText ADD_ATTR6 --> ' || substr(l_du_by_prep_list, 20001, 4000));
4268: -- =============== END DEBUG LOG ==================
4269:
4270: wf_engine.SetItemAttrText ( itemtype => itemtype,
4271: itemkey => itemkey,
4272: aname => 'ADD_ATTR7',
4273: avalue => substr(l_du_by_prep_list, 24001, 4000));
4274:
4278: ' SetItemAttrText ADD_ATTR7 --> ' || substr(l_du_by_prep_list, 24001, 4000));
4279: -- =============== END DEBUG LOG ==================
4280:
4281: -- Set the temp_du_by_prep_list attribute
4282: wf_engine.SetItemAttrText ( itemtype => itemtype,
4283: itemkey => itemkey,
4284: aname => 'TEMP_DU_BY_PREP_LIST',
4285: avalue => 'plsqlclob:igi_exp_approval_pkg.Create_du_list/'||itemtype||':'||itemkey);
4286:
4356: IF (funcmode = 'RUN') THEN
4357:
4358: -- Get the TU id
4359: l_tu_id
4360: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
4361: itemkey => itemkey,
4362: aname => 'TU_ID');
4363:
4364: -- =============== START DEBUG LOG ================
4367: -- =============== END DEBUG LOG ==================
4368:
4369: -- Get the DU Preparer id
4370: l_du_prep_id
4371: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
4372: itemkey => itemkey,
4373: aname => 'TEMP_DU_PREPARER_ID');
4374:
4375: -- =============== START DEBUG LOG ================
4484: IF (funcmode = 'RUN') THEN
4485:
4486: -- Get the TU id
4487: l_tu_id
4488: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
4489: itemkey => itemkey,
4490: aname => 'TU_ID');
4491:
4492: -- =============== START DEBUG LOG ================
4553:
4554: END LOOP;
4555:
4556: -- Set the all_dus_list attribute
4557: wf_engine.SetItemAttrText ( itemtype => itemtype,
4558: itemkey => itemkey,
4559: aname => 'ADD_ATTR1',
4560: avalue => substr(l_du_rej_list, 1, 4000));
4561:
4563: DEBUG_LOG_STRING (l_proc_level, 'List_any_rejected_dus.Msg7',
4564: ' SetItemAttrText ADD_ATTR1 --> ' || substr(l_du_rej_list, 1, 4000));
4565: -- =============== END DEBUG LOG ==================
4566:
4567: wf_engine.SetItemAttrText ( itemtype => itemtype,
4568: itemkey => itemkey,
4569: aname => 'ADD_ATTR2',
4570: avalue => substr(l_du_rej_list, 4001, 4000));
4571:
4573: DEBUG_LOG_STRING (l_proc_level, 'List_any_rejected_dus.Msg8',
4574: ' SetItemAttrText ADD_ATTR2 --> ' || substr(l_du_rej_list, 4001, 4000));
4575: -- =============== END DEBUG LOG ==================
4576:
4577: wf_engine.SetItemAttrText ( itemtype => itemtype,
4578: itemkey => itemkey,
4579: aname => 'ADD_ATTR3',
4580: avalue => substr(l_du_rej_list, 8001, 4000));
4581:
4583: DEBUG_LOG_STRING (l_proc_level, 'List_any_rejected_dus.Msg9',
4584: ' SetItemAttrText ADD_ATTR3 --> ' || substr(l_du_rej_list, 8001, 4000));
4585: -- =============== END DEBUG LOG ==================
4586:
4587: wf_engine.SetItemAttrText ( itemtype => itemtype,
4588: itemkey => itemkey,
4589: aname => 'ADD_ATTR4',
4590: avalue => substr(l_du_rej_list, 12001, 4000));
4591:
4593: DEBUG_LOG_STRING (l_proc_level, 'List_any_rejected_dus.Msg10',
4594: ' SetItemAttrText ADD_ATTR4 --> ' || substr(l_du_rej_list, 12001, 4000));
4595: -- =============== END DEBUG LOG ==================
4596:
4597: wf_engine.SetItemAttrText ( itemtype => itemtype,
4598: itemkey => itemkey,
4599: aname => 'ADD_ATTR5',
4600: avalue => substr(l_du_rej_list, 16001, 4000));
4601:
4603: DEBUG_LOG_STRING (l_proc_level, 'List_any_rejected_dus.Msg11',
4604: ' SetItemAttrText ADD_ATTR5 --> ' || substr(l_du_rej_list, 16001, 4000));
4605: -- =============== END DEBUG LOG ==================
4606:
4607: wf_engine.SetItemAttrText ( itemtype => itemtype,
4608: itemkey => itemkey,
4609: aname => 'ADD_ATTR6',
4610: avalue => substr(l_du_rej_list, 20001, 4000));
4611:
4613: DEBUG_LOG_STRING (l_proc_level, 'List_any_rejected_dus.Msg12',
4614: ' SetItemAttrText ADD_ATTR6 --> ' || substr(l_du_rej_list, 20001, 4000));
4615: -- =============== END DEBUG LOG ==================
4616:
4617: wf_engine.SetItemAttrText ( itemtype => itemtype,
4618: itemkey => itemkey,
4619: aname => 'ADD_ATTR7',
4620: avalue => substr(l_du_rej_list, 24001, 4000));
4621:
4624: ' SetItemAttrText ADD_ATTR7 --> ' || substr(l_du_rej_list, 24001, 4000));
4625: -- =============== END DEBUG LOG ==================
4626:
4627: -- Set the temp_du_by_prep_list attribute
4628: wf_engine.SetItemAttrText ( itemtype => itemtype,
4629: itemkey => itemkey,
4630: aname => 'ALL_DUS_LIST',
4631: avalue => 'plsqlclob:igi_exp_approval_pkg.Create_du_list/'||itemtype||':'||itemkey);
4632:
4725: IF (funcmode = 'RUN') THEN
4726:
4727: -- Get the TU id
4728: l_tu_id
4729: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
4730: itemkey => itemkey,
4731: aname => 'TU_ID');
4732:
4733: -- =============== START DEBUG LOG ================
4757: ELSE
4758:
4759: -- The next rejected DU has been fetched
4760: -- Set the temp_du_preparer_id attribute
4761: wf_engine.SetItemAttrNumber( itemtype => itemtype,
4762: itemkey => itemkey,
4763: aname => 'TEMP_DU_PREPARER_ID',
4764: avalue => l_du_prep_id);
4765:
4779: ' l_du_prep_name --> ' || l_du_prep_name);
4780: -- =============== END DEBUG LOG ==================
4781:
4782: -- Set the temp_du_preparer_name attribute
4783: wf_engine.SetItemAttrText ( itemtype => itemtype,
4784: itemkey => itemkey,
4785: aname => 'TEMP_DU_PREPARER_NAME',
4786: avalue => l_du_prep_name);
4787:
4821:
4822: END LOOP;
4823:
4824: -- Set the all_dus_list attribute
4825: wf_engine.SetItemAttrText ( itemtype => itemtype,
4826: itemkey => itemkey,
4827: aname => 'ADD_ATTR1',
4828: avalue => substr(l_du_rej_list, 1, 4000));
4829:
4831: DEBUG_LOG_STRING (l_proc_level, 'Get_next_rejected_du.Msg10',
4832: ' SetItemAttrText ADD_ATTR1 --> ' || substr(l_du_rej_list, 1, 4000));
4833: -- =============== END DEBUG LOG ==================
4834:
4835: wf_engine.SetItemAttrText ( itemtype => itemtype,
4836: itemkey => itemkey,
4837: aname => 'ADD_ATTR2',
4838: avalue => substr(l_du_rej_list, 4001, 4000));
4839:
4841: DEBUG_LOG_STRING (l_proc_level, 'Get_next_rejected_du.Msg11',
4842: ' SetItemAttrText ADD_ATTR2 --> ' || substr(l_du_rej_list, 4001, 4000));
4843: -- =============== END DEBUG LOG ==================
4844:
4845: wf_engine.SetItemAttrText ( itemtype => itemtype,
4846: itemkey => itemkey,
4847: aname => 'ADD_ATTR3',
4848: avalue => substr(l_du_rej_list, 8001, 4000));
4849:
4851: DEBUG_LOG_STRING (l_proc_level, 'Get_next_rejected_du.Msg12',
4852: ' SetItemAttrText ADD_ATTR3 --> ' || substr(l_du_rej_list, 8001, 4000));
4853: -- =============== END DEBUG LOG ==================
4854:
4855: wf_engine.SetItemAttrText ( itemtype => itemtype,
4856: itemkey => itemkey,
4857: aname => 'ADD_ATTR4',
4858: avalue => substr(l_du_rej_list, 12001, 4000));
4859:
4861: DEBUG_LOG_STRING (l_proc_level, 'Get_next_rejected_du.Msg13',
4862: ' SetItemAttrText ADD_ATTR4 --> ' || substr(l_du_rej_list, 12001, 4000));
4863: -- =============== END DEBUG LOG ==================
4864:
4865: wf_engine.SetItemAttrText ( itemtype => itemtype,
4866: itemkey => itemkey,
4867: aname => 'ADD_ATTR5',
4868: avalue => substr(l_du_rej_list, 16001, 4000));
4869:
4871: DEBUG_LOG_STRING (l_proc_level, 'Get_next_rejected_du.Msg14',
4872: ' SetItemAttrText ADD_ATTR5 --> ' || substr(l_du_rej_list, 16001, 4000));
4873: -- =============== END DEBUG LOG ==================
4874:
4875: wf_engine.SetItemAttrText ( itemtype => itemtype,
4876: itemkey => itemkey,
4877: aname => 'ADD_ATTR6',
4878: avalue => substr(l_du_rej_list, 20001, 4000));
4879:
4881: DEBUG_LOG_STRING (l_proc_level, 'Get_next_rejected_du.Msg15',
4882: ' SetItemAttrText ADD_ATTR6 --> ' || substr(l_du_rej_list, 20001, 4000));
4883: -- =============== END DEBUG LOG ==================
4884:
4885: wf_engine.SetItemAttrText ( itemtype => itemtype,
4886: itemkey => itemkey,
4887: aname => 'ADD_ATTR7',
4888: avalue => substr(l_du_rej_list, 24001, 4000));
4889:
4892: DEBUG_LOG_STRING (l_proc_level, 'Get_next_rejected_du.Msg16',
4893: ' SetItemAttrText ADD_ATTR7 --> ' || substr(l_du_rej_list, 24001, 4000));
4894: -- =============== END DEBUG LOG ==================
4895:
4896: wf_engine.SetItemAttrText ( itemtype => itemtype,
4897: itemkey => itemkey,
4898: aname => 'TEMP_DU_BY_PREP_LIST',
4899: avalue => 'plsqlclob:igi_exp_approval_pkg.Create_du_list/'||itemtype||':'||itemkey);
4900:
4992: -- dialog units
4993:
4994: -- Get the TU id
4995: l_tu_id
4996: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
4997: itemkey => itemkey,
4998: aname => 'TU_ID');
4999:
5000: -- =============== START DEBUG LOG ================
5003: -- =============== END DEBUG LOG ==================
5004:
5005: -- Get the DU preparer id
5006: l_du_prep_id
5007: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
5008: itemkey => itemkey,
5009: aname => 'TEMP_DU_PREPARER_ID');
5010:
5011: -- =============== START DEBUG LOG ================
5128: IF (funcmode = 'RUN') THEN
5129:
5130: -- Get the legal numbering position id
5131: l_legal_num_pos_id
5132: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
5133: itemkey => itemkey,
5134: aname => 'LEGAL_NUM_POS_ID');
5135:
5136: -- =============== START DEBUG LOG ================
5141: -- If the current position is the legal numbering position
5142: -- the we need to generate legal numbers for the TU and DUs
5143: -- Get the current position id
5144: l_current_pos_id
5145: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
5146: itemkey => itemkey,
5147: aname => 'CURRENT_POSITION_ID');
5148:
5149: -- =============== START DEBUG LOG ================
5223: IF (funcmode = 'RUN') THEN
5224:
5225: -- Get the TU id
5226: l_tu_id
5227: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
5228: itemkey => itemkey,
5229: aname => 'TU_ID');
5230:
5231: -- =============== START DEBUG LOG ================
5267: -- Set the error message attribute to be used in the
5268: -- notification sent to the system administrator
5269:
5270: -- Set the error_message attribute
5271: wf_engine.SetItemAttrText ( itemtype => itemtype,
5272: itemkey => itemkey,
5273: aname => 'ERROR_MESSAGE',
5274: avalue => l_error_message);
5275:
5304:
5305: -- OPSF(I) EXP Bug 2567802 26-Sep-2002 S Brewer Start(2)
5306: -- Set the TU Full Number attribute to include the legal number
5307: l_tu_full_number
5308: := wf_engine.GetItemAttrText ( itemtype => itemtype,
5309: itemkey => itemkey,
5310: aname => 'TU_FULL_NUMBER');
5311:
5312: -- =============== START DEBUG LOG ================
5320: DEBUG_LOG_STRING (l_proc_level, 'Apply_tu_legal_num.Msg10',
5321: ' l_tu_full_number --> ' || l_tu_full_number);
5322: -- =============== END DEBUG LOG ==================
5323:
5324: wf_engine.SetItemAttrText ( itemtype => itemtype,
5325: itemkey => itemkey,
5326: aname => 'TU_FULL_NUMBER',
5327: avalue => l_tu_legal_number);
5328:
5411: IF (funcmode = 'RUN') THEN
5412:
5413: -- Get the tu id
5414: l_tu_id
5415: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
5416: itemkey => itemkey,
5417: aname => 'TU_ID');
5418:
5419: -- =============== START DEBUG LOG ================
5469: -- Set the error message attribute to be used in the
5470: -- notification sent to the system administrator
5471:
5472: -- Set the error_message attribute
5473: wf_engine.SetItemAttrText ( itemtype => itemtype,
5474: itemkey => itemkey,
5475: aname => 'ERROR_MESSAGE',
5476: avalue => l_error_message);
5477:
5480: ' SetItemAttrText ERROR_MESSAGE --> ' || l_error_message);
5481: -- =============== END DEBUG LOG ==================
5482:
5483: -- Set the legal_num_failed_du attribute
5484: wf_engine.SetItemAttrText ( itemtype => itemtype,
5485: itemkey => itemkey,
5486: aname => 'LEGAL_NUM_FAILED_DU',
5487: avalue => l_du_order_number);
5488:
5614: IF (funcmode = 'RUN') THEN
5615:
5616: -- Get the TU id
5617: l_tu_id
5618: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
5619: itemkey => itemkey,
5620: aname => 'TU_ID');
5621:
5622: -- =============== START DEBUG LOG ================
5740: IF (funcmode = 'RUN') THEN
5741:
5742: -- Get the current position id
5743: l_position_id
5744: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
5745: itemkey => itemkey,
5746: aname => 'CURRENT_POSITION_ID');
5747:
5748: -- =============== START DEBUG LOG ================
5751: -- =============== END DEBUG LOG ==================
5752:
5753: -- Get the final approver position id
5754: l_final_apprv_pos_id
5755: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
5756: itemkey => itemkey,
5757: aname => 'FINAL_APPRV_POS_ID');
5758:
5759: -- =============== START DEBUG LOG ================
5775:
5776: -- Now need to check if there is a parent position in the HR hierarchy
5777: -- Get the position structure version id
5778: l_pos_structure_version_id
5779: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
5780: itemkey => itemkey,
5781: aname => 'POS_STRUCTURE_VERSION_ID');
5782:
5783: -- =============== START DEBUG LOG ================
5786: -- =============== END DEBUG LOG ==================
5787:
5788: -- Get the business group id
5789: l_business_group_id
5790: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
5791: itemkey => itemkey,
5792: aname => 'BUSINESS_GROUP_ID');
5793:
5794: -- =============== START DEBUG LOG ================
5819: return;
5820: ELSE
5821: -- The current position has a parent
5822: -- Set the workflow attribute current_position_id to the parent position
5823: wf_engine.SetItemAttrNumber( itemtype => itemtype,
5824: itemkey => itemkey,
5825: aname => 'CURRENT_POSITION_ID',
5826: avalue => l_parent_pos_id);
5827:
5841: ' l_parent_pos_name --> ' || l_parent_pos_name);
5842: -- =============== END DEBUG LOG ==================
5843:
5844: -- Set the workflow attribute current_position_name to the parent position
5845: wf_engine.SetItemAttrText ( itemtype => itemtype,
5846: itemkey => itemkey,
5847: aname => 'CURRENT_POSITION_NAME',
5848: avalue => l_parent_pos_name);
5849:
5917: IF (funcmode = 'RUN') THEN
5918:
5919: -- Get the TU id
5920: l_tu_id
5921: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
5922: itemkey => itemkey,
5923: aname => 'TU_ID');
5924:
5925: -- =============== START DEBUG LOG ================
5944: ' ** START GET_NEXT_INCOMPLETE_DU ** ');
5945: -- =============== END DEBUG LOG ==================
5946:
5947: -- Set the du_id_for_completion attribute
5948: wf_engine.SetItemAttrNumber( itemtype => itemtype,
5949: itemkey => itemkey,
5950: aname => 'DU_ID_FOR_COMPLETION',
5951: avalue => l_du_id);
5952:
5955: ' ** START GET_NEXT_INCOMPLETE_DU ** ');
5956: -- =============== END DEBUG LOG ==================
5957:
5958: -- Set the du_prep_name_for_com attribute
5959: wf_engine.SetItemAttrText ( itemtype => itemtype,
5960: itemkey => itemkey,
5961: aname => 'DU_PREP_NAME_FOR_COM',
5962: avalue => l_du_prep_name);
5963:
6023: IF (funcmode = 'RUN') THEN
6024:
6025: -- Get the DU id
6026: l_du_id
6027: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
6028: itemkey => itemkey,
6029: aname => 'DU_ID_FOR_COMPLETION');
6030:
6031: -- =============== START DEBUG LOG ================
6130: END IF;
6131:
6132:
6133: -- Set the failed_du attribute
6134: wf_engine.SetItemAttrText ( itemtype => itemtype,
6135: itemkey => itemkey,
6136: aname => 'FAILED_DU',
6137: avalue => l_failed_du);
6138:
6141: ' SetItemAttrText FAILED_DU --> ' || l_failed_du);
6142: -- =============== END DEBUG LOG ==================
6143:
6144: -- Set the failed_trx attribute
6145: wf_engine.SetItemAttrText ( itemtype => itemtype,
6146: itemkey => itemkey,
6147: aname => 'FAILED_TRX',
6148: avalue => l_failed_trx);
6149:
6158: -- and append this DU_ID and error message to it.
6159:
6160: -- Get the current error message
6161: l_trx_failed_err_mess
6162: := wf_engine.GetItemAttrText ( itemtype => itemtype,
6163: itemkey => itemkey,
6164: aname => 'TRX_FAILED_ERROR_MESSAGE');
6165:
6166: -- =============== START DEBUG LOG ================
6177: ' l_trx_failed_err_mess --> ' || l_trx_failed_err_mess);
6178: -- =============== END DEBUG LOG ==================
6179:
6180: -- Set the trx_failed_error_message attribute
6181: wf_engine.SetItemAttrText ( itemtype => itemtype,
6182: itemkey => itemkey,
6183: aname => 'TRX_FAILED_ERROR_MESSAGE',
6184: avalue => l_trx_failed_err_mess);
6185:
6251: IF (funcmode = 'RUN') THEN
6252:
6253: -- Get the DU id
6254: l_du_id
6255: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
6256: itemkey => itemkey,
6257: aname => 'DU_ID_FOR_COMPLETION');
6258:
6259: -- =============== START DEBUG LOG ================
6321: IF (funcmode = 'RUN') THEN
6322:
6323: -- Get the DU id
6324: l_du_id
6325: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
6326: itemkey => itemkey,
6327: aname => 'DU_ID_FOR_COMPLETION');
6328:
6329: -- =============== START DEBUG LOG ================
6391: IF (funcmode = 'RUN') THEN
6392:
6393: -- Get the TU id
6394: l_tu_id
6395: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
6396: itemkey => itemkey,
6397: aname => 'TU_ID');
6398:
6399: -- =============== START DEBUG LOG ================
6489: IF (funcmode = 'RUN') THEN
6490:
6491: -- Get the TU id
6492: l_tu_id
6493: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
6494: itemkey => itemkey,
6495: aname => 'TU_ID');
6496:
6497: -- =============== START DEBUG LOG ================
6553:
6554: END LOOP;
6555:
6556: -- Set the all_dus_list attribute
6557: wf_engine.SetItemAttrText ( itemtype => itemtype,
6558: itemkey => itemkey,
6559: aname => 'ADD_ATTR1',
6560: avalue => substr(l_du_hold_list, 1, 4000));
6561:
6563: DEBUG_LOG_STRING (l_proc_level, 'Any_dus_with_trx_fail.Msg7',
6564: ' SetItemAttrText ADD_ATTR1 --> ' || substr(l_du_hold_list, 1, 4000));
6565: -- =============== END DEBUG LOG ==================
6566:
6567: wf_engine.SetItemAttrText ( itemtype => itemtype,
6568: itemkey => itemkey,
6569: aname => 'ADD_ATTR2',
6570: avalue => substr(l_du_hold_list, 4001, 4000));
6571:
6573: DEBUG_LOG_STRING (l_proc_level, 'Any_dus_with_trx_fail.Msg8',
6574: ' SetItemAttrText ADD_ATTR2 --> ' || substr(l_du_hold_list, 4001, 4000));
6575: -- =============== END DEBUG LOG ==================
6576:
6577: wf_engine.SetItemAttrText ( itemtype => itemtype,
6578: itemkey => itemkey,
6579: aname => 'ADD_ATTR3',
6580: avalue => substr(l_du_hold_list, 8001, 4000));
6581:
6583: DEBUG_LOG_STRING (l_proc_level, 'Any_dus_with_trx_fail.Msg9',
6584: ' SetItemAttrText ADD_ATTR3 --> ' || substr(l_du_hold_list, 8001, 4000));
6585: -- =============== END DEBUG LOG ==================
6586:
6587: wf_engine.SetItemAttrText ( itemtype => itemtype,
6588: itemkey => itemkey,
6589: aname => 'ADD_ATTR4',
6590: avalue => substr(l_du_hold_list, 12001, 4000));
6591:
6593: DEBUG_LOG_STRING (l_proc_level, 'Any_dus_with_trx_fail.Msg10',
6594: ' SetItemAttrText ADD_ATTR4 --> ' || substr(l_du_hold_list, 12001, 4000));
6595: -- =============== END DEBUG LOG ==================
6596:
6597: wf_engine.SetItemAttrText ( itemtype => itemtype,
6598: itemkey => itemkey,
6599: aname => 'ADD_ATTR5',
6600: avalue => substr(l_du_hold_list, 16001, 4000));
6601:
6603: DEBUG_LOG_STRING (l_proc_level, 'Any_dus_with_trx_fail.Msg11',
6604: ' SetItemAttrText ADD_ATTR5 --> ' || substr(l_du_hold_list, 16001, 4000));
6605: -- =============== END DEBUG LOG ==================
6606:
6607: wf_engine.SetItemAttrText ( itemtype => itemtype,
6608: itemkey => itemkey,
6609: aname => 'ADD_ATTR6',
6610: avalue => substr(l_du_hold_list, 20001, 4000));
6611:
6613: DEBUG_LOG_STRING (l_proc_level, 'Any_dus_with_trx_fail.Msg12',
6614: ' SetItemAttrText ADD_ATTR6 --> ' || substr(l_du_hold_list, 20001, 4000));
6615: -- =============== END DEBUG LOG ==================
6616:
6617: wf_engine.SetItemAttrText ( itemtype => itemtype,
6618: itemkey => itemkey,
6619: aname => 'ADD_ATTR7',
6620: avalue => substr(l_du_hold_list, 24001, 4000));
6621:
6623: DEBUG_LOG_STRING (l_proc_level, 'Any_dus_with_trx_fail.Msg13',
6624: ' SetItemAttrText ADD_ATTR7 --> ' || substr(l_du_hold_list, 24001, 4000));
6625: -- =============== END DEBUG LOG ==================
6626:
6627: wf_engine.SetItemAttrText ( itemtype => itemtype,
6628: itemkey => itemkey,
6629: aname => 'ALL_DUS_LIST',
6630: avalue => 'plsqlclob:igi_exp_approval_pkg.Create_du_list/'||itemtype||':'||itemkey);
6631:
6698: IF (funcmode = 'RUN') THEN
6699:
6700: -- Get the TU id
6701: l_tu_id
6702: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
6703: itemkey => itemkey,
6704: aname => 'TU_ID');
6705:
6706: -- =============== START DEBUG LOG ================
6804: IF (funcmode = 'RUN') THEN
6805:
6806: -- Get the TU id
6807: l_tu_id
6808: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
6809: itemkey => itemkey,
6810: aname => 'TU_ID');
6811:
6812: -- =============== START DEBUG LOG ================
6899: IF (funcmode = 'RUN') THEN
6900:
6901: -- Get the TU id
6902: l_tu_id
6903: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
6904: itemkey => itemkey,
6905: aname => 'TU_ID');
6906:
6907: -- =============== START DEBUG LOG ================
6921: END LOOP;
6922: CLOSE c_prep_list;
6923:
6924: -- Set the all_dus_list attribute
6925: wf_engine.SetItemAttrText ( itemtype => itemtype,
6926: itemkey => itemkey,
6927: aname => 'COM_DU_PREP_LIST',
6928: avalue => l_user_list);
6929:
6998: IF (funcmode = 'RUN') THEN
6999:
7000: -- Get the list of preparers of completed DUS
7001: l_prep_list
7002: := wf_engine.GetItemAttrText ( itemtype => itemtype,
7003: itemkey => itemkey,
7004: aname => 'COM_DU_PREP_LIST');
7005:
7006: -- =============== START DEBUG LOG ================
7039: ' l_next_prep --> ' || l_next_prep);
7040: -- =============== END DEBUG LOG ==================
7041:
7042: -- Set the temp_du_preparer_id attribute
7043: wf_engine.SetItemAttrNumber( itemtype => itemtype,
7044: itemkey => itemkey,
7045: aname => 'TEMP_DU_PREPARER_ID',
7046: avalue => l_next_prep);
7047:
7060: ' l_next_prep_name --> ' || l_next_prep_name);
7061: -- =============== END DEBUG LOG ==================
7062:
7063: -- Set the temp_du_preparer attribute
7064: wf_engine.SetItemAttrText ( itemtype => itemtype,
7065: itemkey => itemkey,
7066: aname => 'TEMP_DU_PREPARER_NAME',
7067: avalue => l_next_prep_name);
7068:
7072: -- =============== END DEBUG LOG ==================
7073:
7074: -- Get the TU id
7075: l_tu_id
7076: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
7077: itemkey => itemkey,
7078: aname => 'TU_ID');
7079:
7080:
7110: END LOOP;
7111:
7112:
7113: -- Set the all_dus_list attribute
7114: wf_engine.SetItemAttrText ( itemtype => itemtype,
7115: itemkey => itemkey,
7116: aname => 'ADD_ATTR1',
7117: avalue => substr(l_com_du_list, 1, 4000));
7118:
7120: DEBUG_LOG_STRING (l_proc_level, 'Get_next_prep.Msg11',
7121: ' SetItemAttrText ADD_ATTR1 --> ' || substr(l_com_du_list, 1, 4000));
7122: -- =============== END DEBUG LOG ==================
7123:
7124: wf_engine.SetItemAttrText ( itemtype => itemtype,
7125: itemkey => itemkey,
7126: aname => 'ADD_ATTR2',
7127: avalue => substr(l_com_du_list, 4001, 4000));
7128:
7130: DEBUG_LOG_STRING (l_proc_level, 'Get_next_prep.Msg12',
7131: ' SetItemAttrText ADD_ATTR2 --> ' || substr(l_com_du_list, 4001, 4000));
7132: -- =============== END DEBUG LOG ==================
7133:
7134: wf_engine.SetItemAttrText ( itemtype => itemtype,
7135: itemkey => itemkey,
7136: aname => 'ADD_ATTR3',
7137: avalue => substr(l_com_du_list, 8001, 4000));
7138:
7140: DEBUG_LOG_STRING (l_proc_level, 'Get_next_prep.Msg13',
7141: ' SetItemAttrText ADD_ATTR3 --> ' || substr(l_com_du_list, 8001, 4000));
7142: -- =============== END DEBUG LOG ==================
7143:
7144: wf_engine.SetItemAttrText ( itemtype => itemtype,
7145: itemkey => itemkey,
7146: aname => 'ADD_ATTR4',
7147: avalue => substr(l_com_du_list, 12001, 4000));
7148:
7150: DEBUG_LOG_STRING (l_proc_level, 'Get_next_prep.Msg14',
7151: ' SetItemAttrText ADD_ATTR4 --> ' || substr(l_com_du_list, 12001, 4000));
7152: -- =============== END DEBUG LOG ==================
7153:
7154: wf_engine.SetItemAttrText ( itemtype => itemtype,
7155: itemkey => itemkey,
7156: aname => 'ADD_ATTR5',
7157: avalue => substr(l_com_du_list, 16001, 4000));
7158:
7160: DEBUG_LOG_STRING (l_proc_level, 'Get_next_prep.Msg15',
7161: ' SetItemAttrText ADD_ATTR5 --> ' || substr(l_com_du_list, 16001, 4000));
7162: -- =============== END DEBUG LOG ==================
7163:
7164: wf_engine.SetItemAttrText ( itemtype => itemtype,
7165: itemkey => itemkey,
7166: aname => 'ADD_ATTR6',
7167: avalue => substr(l_com_du_list, 20001, 4000));
7168:
7170: DEBUG_LOG_STRING (l_proc_level, 'Get_next_prep.Msg16',
7171: ' SetItemAttrText ADD_ATTR6 --> ' || substr(l_com_du_list, 20001, 4000));
7172: -- =============== END DEBUG LOG ==================
7173:
7174: wf_engine.SetItemAttrText ( itemtype => itemtype,
7175: itemkey => itemkey,
7176: aname => 'ADD_ATTR7',
7177: avalue => substr(l_com_du_list, 24001, 4000));
7178:
7181: DEBUG_LOG_STRING (l_proc_level, 'Get_next_prep.Msg17',
7182: ' SetItemAttrText ADD_ATTR7 --> ' || substr(l_com_du_list, 24001, 4000));
7183: -- =============== END DEBUG LOG ==================
7184:
7185: wf_engine.SetItemAttrText(itemtype => itemtype,
7186: itemkey => itemkey,
7187: aname => 'TEMP_DU_BY_PREP_LIST',
7188: avalue => 'plsqlclob:igi_exp_approval_pkg.Create_du_list/'||itemtype||':'||itemkey);
7189:
7254: IF (funcmode = 'RUN') THEN
7255:
7256: -- Get the list of preparers of completed dus
7257: l_prep_list
7258: := wf_engine.GetItemAttrText ( itemtype => itemtype,
7259: itemkey => itemkey,
7260: aname => 'COM_DU_PREP_LIST');
7261:
7262: -- =============== START DEBUG LOG ================
7273: ' l_num --> ' || l_num || ' l_new_prep_list --> ' || l_new_prep_list);
7274: -- =============== END DEBUG LOG ==================
7275:
7276: -- Set the com_du_prep_list attribute to the new list
7277: wf_engine.SetItemAttrText ( itemtype => itemtype,
7278: itemkey => itemkey,
7279: aname => 'COM_DU_PREP_LIST',
7280: avalue => l_new_prep_list);
7281:
7334: IF (funcmode = 'RUN') THEN
7335:
7336: -- Get the TU id
7337: l_tu_id
7338: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
7339: itemkey => itemkey,
7340: aname => 'TU_ID');
7341:
7342: -- =============== START DEBUG LOG ================
7418: IF (funcmode = 'RUN') THEN
7419:
7420: -- Get the TU id
7421: l_tu_id
7422: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
7423: itemkey => itemkey,
7424: aname => 'TU_ID');
7425:
7426: -- =============== START DEBUG LOG ================
7505: IF (funcmode = 'RUN') THEN
7506:
7507: -- Get the TU id
7508: l_tu_id
7509: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
7510: itemkey => itemkey,
7511: aname => 'TU_ID');
7512:
7513: -- =============== START DEBUG LOG ================
7516: -- =============== END DEBUG LOG ==================
7517:
7518: -- Get the DU preparer id
7519: l_du_prep_id
7520: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
7521: itemkey => itemkey,
7522: aname => 'TEMP_DU_PREPARER_ID');
7523:
7524:
7629: IF (funcmode = 'RUN') THEN
7630:
7631: -- Get the TU id
7632: l_tu_id
7633: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
7634: itemkey => itemkey,
7635: aname => 'TU_ID');
7636:
7637: -- =============== START DEBUG LOG ================
7660:
7661: ELSE
7662: -- The next rejected DU has been fetched
7663: -- Set the temp_du_preparer_id attribute
7664: wf_engine.SetItemAttrNumber( itemtype => itemtype,
7665: itemkey => itemkey,
7666: aname => 'TEMP_DU_PREPARER_ID',
7667: avalue => l_du_prep_id);
7668:
7682: ' l_du_prep_name --> ' || l_du_prep_name);
7683: -- =============== END DEBUG LOG ==================
7684:
7685: -- Set the temp_du_preparer_name attribute
7686: wf_engine.SetItemAttrText ( itemtype => itemtype,
7687: itemkey => itemkey,
7688: aname => 'TEMP_DU_PREPARER_NAME',
7689: avalue => l_du_prep_name);
7690:
7724:
7725: END LOOP;
7726:
7727: -- Set the all_dus_list attribute
7728: wf_engine.SetItemAttrText ( itemtype => itemtype,
7729: itemkey => itemkey,
7730: aname => 'ADD_ATTR1',
7731: avalue => substr(l_du_rej_list, 1, 4000));
7732:
7734: DEBUG_LOG_STRING (l_proc_level, 'Get_next_rejected_legal_du.Msg10',
7735: ' SetItemAttrText ADD_ATTR1 --> ' || substr(l_du_rej_list, 1, 4000));
7736: -- =============== END DEBUG LOG ==================
7737:
7738: wf_engine.SetItemAttrText ( itemtype => itemtype,
7739: itemkey => itemkey,
7740: aname => 'ADD_ATTR2',
7741: avalue => substr(l_du_rej_list, 4001, 4000));
7742:
7744: DEBUG_LOG_STRING (l_proc_level, 'Get_next_rejected_legal_du.Msg11',
7745: ' SetItemAttrText ADD_ATTR2 --> ' || substr(l_du_rej_list, 4001, 4000));
7746: -- =============== END DEBUG LOG ==================
7747:
7748: wf_engine.SetItemAttrText ( itemtype => itemtype,
7749: itemkey => itemkey,
7750: aname => 'ADD_ATTR3',
7751: avalue => substr(l_du_rej_list, 8001, 4000));
7752:
7754: DEBUG_LOG_STRING (l_proc_level, 'Get_next_rejected_legal_du.Msg12',
7755: ' SetItemAttrText ADD_ATTR3 --> ' || substr(l_du_rej_list, 8001, 4000));
7756: -- =============== END DEBUG LOG ==================
7757:
7758: wf_engine.SetItemAttrText ( itemtype => itemtype,
7759: itemkey => itemkey,
7760: aname => 'ADD_ATTR4',
7761: avalue => substr(l_du_rej_list, 12001, 4000));
7762:
7764: DEBUG_LOG_STRING (l_proc_level, 'Get_next_rejected_legal_du.Msg13',
7765: ' SetItemAttrText ADD_ATTR4 --> ' || substr(l_du_rej_list, 12001, 4000));
7766: -- =============== END DEBUG LOG ==================
7767:
7768: wf_engine.SetItemAttrText ( itemtype => itemtype,
7769: itemkey => itemkey,
7770: aname => 'ADD_ATTR5',
7771: avalue => substr(l_du_rej_list, 16001, 4000));
7772:
7774: DEBUG_LOG_STRING (l_proc_level, 'Get_next_rejected_legal_du.Msg14',
7775: ' SetItemAttrText ADD_ATTR5 --> ' || substr(l_du_rej_list, 16001, 4000));
7776: -- =============== END DEBUG LOG ==================
7777:
7778: wf_engine.SetItemAttrText ( itemtype => itemtype,
7779: itemkey => itemkey,
7780: aname => 'ADD_ATTR6',
7781: avalue => substr(l_du_rej_list, 20001, 4000));
7782:
7784: DEBUG_LOG_STRING (l_proc_level, 'Get_next_rejected_legal_du.Msg15',
7785: ' SetItemAttrText ADD_ATTR6 --> ' || substr(l_du_rej_list, 20001, 4000));
7786: -- =============== END DEBUG LOG ==================
7787:
7788: wf_engine.SetItemAttrText ( itemtype => itemtype,
7789: itemkey => itemkey,
7790: aname => 'ADD_ATTR7',
7791: avalue => substr(l_du_rej_list, 24001, 4000));
7792:
7796: ' SetItemAttrText ADD_ATTR7 --> ' || substr(l_du_rej_list, 24001, 4000));
7797: -- =============== END DEBUG LOG ==================
7798:
7799: -- Set the temp_du_by_prep_list attribute
7800: wf_engine.SetItemAttrText ( itemtype => itemtype,
7801: itemkey => itemkey,
7802: aname => 'TEMP_DU_BY_PREP_LIST',
7803: avalue => 'plsqlclob:igi_exp_approval_pkg.Create_du_list/'||itemtype||':'||itemkey);
7804:
7878: IF (funcmode = 'RUN') THEN
7879:
7880: -- Get the transmitter position id
7881: l_transmitter_position_id
7882: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
7883: itemkey => itemkey,
7884: aname => 'TRANSMITTER_POSITION_ID');
7885:
7886: -- =============== START DEBUG LOG ================
7889: -- =============== END DEBUG LOG ==================
7890:
7891: -- Get the final approver position id
7892: l_final_apprv_pos_id
7893: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
7894: itemkey => itemkey,
7895: aname => 'FINAL_APPRV_POS_ID');
7896:
7897: -- =============== START DEBUG LOG ================