[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:
4732: IF (funcmode = 'RUN') THEN
4733:
4734: -- Get the TU id
4735: l_tu_id
4736: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
4737: itemkey => itemkey,
4738: aname => 'TU_ID');
4739:
4740: -- =============== START DEBUG LOG ================
4764: ELSE
4765:
4766: -- The next rejected DU has been fetched
4767: -- Set the temp_du_preparer_id attribute
4768: wf_engine.SetItemAttrNumber( itemtype => itemtype,
4769: itemkey => itemkey,
4770: aname => 'TEMP_DU_PREPARER_ID',
4771: avalue => l_du_prep_id);
4772:
4786: ' l_du_prep_name --> ' || l_du_prep_name);
4787: -- =============== END DEBUG LOG ==================
4788:
4789: -- Set the temp_du_preparer_name attribute
4790: wf_engine.SetItemAttrText ( itemtype => itemtype,
4791: itemkey => itemkey,
4792: aname => 'TEMP_DU_PREPARER_NAME',
4793: avalue => l_du_prep_name);
4794:
4828:
4829: END LOOP;
4830:
4831: -- Set the all_dus_list attribute
4832: wf_engine.SetItemAttrText ( itemtype => itemtype,
4833: itemkey => itemkey,
4834: aname => 'ADD_ATTR1',
4835: avalue => substr(l_du_rej_list, 1, 4000));
4836:
4838: DEBUG_LOG_STRING (l_proc_level, 'Get_next_rejected_du.Msg10',
4839: ' SetItemAttrText ADD_ATTR1 --> ' || substr(l_du_rej_list, 1, 4000));
4840: -- =============== END DEBUG LOG ==================
4841:
4842: wf_engine.SetItemAttrText ( itemtype => itemtype,
4843: itemkey => itemkey,
4844: aname => 'ADD_ATTR2',
4845: avalue => substr(l_du_rej_list, 4001, 4000));
4846:
4848: DEBUG_LOG_STRING (l_proc_level, 'Get_next_rejected_du.Msg11',
4849: ' SetItemAttrText ADD_ATTR2 --> ' || substr(l_du_rej_list, 4001, 4000));
4850: -- =============== END DEBUG LOG ==================
4851:
4852: wf_engine.SetItemAttrText ( itemtype => itemtype,
4853: itemkey => itemkey,
4854: aname => 'ADD_ATTR3',
4855: avalue => substr(l_du_rej_list, 8001, 4000));
4856:
4858: DEBUG_LOG_STRING (l_proc_level, 'Get_next_rejected_du.Msg12',
4859: ' SetItemAttrText ADD_ATTR3 --> ' || substr(l_du_rej_list, 8001, 4000));
4860: -- =============== END DEBUG LOG ==================
4861:
4862: wf_engine.SetItemAttrText ( itemtype => itemtype,
4863: itemkey => itemkey,
4864: aname => 'ADD_ATTR4',
4865: avalue => substr(l_du_rej_list, 12001, 4000));
4866:
4868: DEBUG_LOG_STRING (l_proc_level, 'Get_next_rejected_du.Msg13',
4869: ' SetItemAttrText ADD_ATTR4 --> ' || substr(l_du_rej_list, 12001, 4000));
4870: -- =============== END DEBUG LOG ==================
4871:
4872: wf_engine.SetItemAttrText ( itemtype => itemtype,
4873: itemkey => itemkey,
4874: aname => 'ADD_ATTR5',
4875: avalue => substr(l_du_rej_list, 16001, 4000));
4876:
4878: DEBUG_LOG_STRING (l_proc_level, 'Get_next_rejected_du.Msg14',
4879: ' SetItemAttrText ADD_ATTR5 --> ' || substr(l_du_rej_list, 16001, 4000));
4880: -- =============== END DEBUG LOG ==================
4881:
4882: wf_engine.SetItemAttrText ( itemtype => itemtype,
4883: itemkey => itemkey,
4884: aname => 'ADD_ATTR6',
4885: avalue => substr(l_du_rej_list, 20001, 4000));
4886:
4888: DEBUG_LOG_STRING (l_proc_level, 'Get_next_rejected_du.Msg15',
4889: ' SetItemAttrText ADD_ATTR6 --> ' || substr(l_du_rej_list, 20001, 4000));
4890: -- =============== END DEBUG LOG ==================
4891:
4892: wf_engine.SetItemAttrText ( itemtype => itemtype,
4893: itemkey => itemkey,
4894: aname => 'ADD_ATTR7',
4895: avalue => substr(l_du_rej_list, 24001, 4000));
4896:
4899: DEBUG_LOG_STRING (l_proc_level, 'Get_next_rejected_du.Msg16',
4900: ' SetItemAttrText ADD_ATTR7 --> ' || substr(l_du_rej_list, 24001, 4000));
4901: -- =============== END DEBUG LOG ==================
4902:
4903: wf_engine.SetItemAttrText ( itemtype => itemtype,
4904: itemkey => itemkey,
4905: aname => 'TEMP_DU_BY_PREP_LIST',
4906: avalue => 'plsqlclob:igi_exp_approval_pkg.Create_du_list/'||itemtype||':'||itemkey);
4907:
4999: -- dialog units
5000:
5001: -- Get the TU id
5002: l_tu_id
5003: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
5004: itemkey => itemkey,
5005: aname => 'TU_ID');
5006:
5007: -- =============== START DEBUG LOG ================
5010: -- =============== END DEBUG LOG ==================
5011:
5012: -- Get the DU preparer id
5013: l_du_prep_id
5014: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
5015: itemkey => itemkey,
5016: aname => 'TEMP_DU_PREPARER_ID');
5017:
5018: -- =============== START DEBUG LOG ================
5135: IF (funcmode = 'RUN') THEN
5136:
5137: -- Get the legal numbering position id
5138: l_legal_num_pos_id
5139: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
5140: itemkey => itemkey,
5141: aname => 'LEGAL_NUM_POS_ID');
5142:
5143: -- =============== START DEBUG LOG ================
5148: -- If the current position is the legal numbering position
5149: -- the we need to generate legal numbers for the TU and DUs
5150: -- Get the current position id
5151: l_current_pos_id
5152: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
5153: itemkey => itemkey,
5154: aname => 'CURRENT_POSITION_ID');
5155:
5156: -- =============== START DEBUG LOG ================
5230: IF (funcmode = 'RUN') THEN
5231:
5232: -- Get the TU id
5233: l_tu_id
5234: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
5235: itemkey => itemkey,
5236: aname => 'TU_ID');
5237:
5238: -- =============== START DEBUG LOG ================
5274: -- Set the error message attribute to be used in the
5275: -- notification sent to the system administrator
5276:
5277: -- Set the error_message attribute
5278: wf_engine.SetItemAttrText ( itemtype => itemtype,
5279: itemkey => itemkey,
5280: aname => 'ERROR_MESSAGE',
5281: avalue => l_error_message);
5282:
5311:
5312: -- OPSF(I) EXP Bug 2567802 26-Sep-2002 S Brewer Start(2)
5313: -- Set the TU Full Number attribute to include the legal number
5314: l_tu_full_number
5315: := wf_engine.GetItemAttrText ( itemtype => itemtype,
5316: itemkey => itemkey,
5317: aname => 'TU_FULL_NUMBER');
5318:
5319: -- =============== START DEBUG LOG ================
5327: DEBUG_LOG_STRING (l_proc_level, 'Apply_tu_legal_num.Msg10',
5328: ' l_tu_full_number --> ' || l_tu_full_number);
5329: -- =============== END DEBUG LOG ==================
5330:
5331: wf_engine.SetItemAttrText ( itemtype => itemtype,
5332: itemkey => itemkey,
5333: aname => 'TU_FULL_NUMBER',
5334: avalue => l_tu_legal_number);
5335:
5418: IF (funcmode = 'RUN') THEN
5419:
5420: -- Get the tu id
5421: l_tu_id
5422: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
5423: itemkey => itemkey,
5424: aname => 'TU_ID');
5425:
5426: -- =============== START DEBUG LOG ================
5476: -- Set the error message attribute to be used in the
5477: -- notification sent to the system administrator
5478:
5479: -- Set the error_message attribute
5480: wf_engine.SetItemAttrText ( itemtype => itemtype,
5481: itemkey => itemkey,
5482: aname => 'ERROR_MESSAGE',
5483: avalue => l_error_message);
5484:
5487: ' SetItemAttrText ERROR_MESSAGE --> ' || l_error_message);
5488: -- =============== END DEBUG LOG ==================
5489:
5490: -- Set the legal_num_failed_du attribute
5491: wf_engine.SetItemAttrText ( itemtype => itemtype,
5492: itemkey => itemkey,
5493: aname => 'LEGAL_NUM_FAILED_DU',
5494: avalue => l_du_order_number);
5495:
5621: IF (funcmode = 'RUN') THEN
5622:
5623: -- Get the TU id
5624: l_tu_id
5625: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
5626: itemkey => itemkey,
5627: aname => 'TU_ID');
5628:
5629: -- =============== START DEBUG LOG ================
5747: IF (funcmode = 'RUN') THEN
5748:
5749: -- Get the current position id
5750: l_position_id
5751: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
5752: itemkey => itemkey,
5753: aname => 'CURRENT_POSITION_ID');
5754:
5755: -- =============== START DEBUG LOG ================
5758: -- =============== END DEBUG LOG ==================
5759:
5760: -- Get the final approver position id
5761: l_final_apprv_pos_id
5762: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
5763: itemkey => itemkey,
5764: aname => 'FINAL_APPRV_POS_ID');
5765:
5766: -- =============== START DEBUG LOG ================
5782:
5783: -- Now need to check if there is a parent position in the HR hierarchy
5784: -- Get the position structure version id
5785: l_pos_structure_version_id
5786: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
5787: itemkey => itemkey,
5788: aname => 'POS_STRUCTURE_VERSION_ID');
5789:
5790: -- =============== START DEBUG LOG ================
5793: -- =============== END DEBUG LOG ==================
5794:
5795: -- Get the business group id
5796: l_business_group_id
5797: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
5798: itemkey => itemkey,
5799: aname => 'BUSINESS_GROUP_ID');
5800:
5801: -- =============== START DEBUG LOG ================
5826: return;
5827: ELSE
5828: -- The current position has a parent
5829: -- Set the workflow attribute current_position_id to the parent position
5830: wf_engine.SetItemAttrNumber( itemtype => itemtype,
5831: itemkey => itemkey,
5832: aname => 'CURRENT_POSITION_ID',
5833: avalue => l_parent_pos_id);
5834:
5848: ' l_parent_pos_name --> ' || l_parent_pos_name);
5849: -- =============== END DEBUG LOG ==================
5850:
5851: -- Set the workflow attribute current_position_name to the parent position
5852: wf_engine.SetItemAttrText ( itemtype => itemtype,
5853: itemkey => itemkey,
5854: aname => 'CURRENT_POSITION_NAME',
5855: avalue => l_parent_pos_name);
5856:
5924: IF (funcmode = 'RUN') THEN
5925:
5926: -- Get the TU id
5927: l_tu_id
5928: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
5929: itemkey => itemkey,
5930: aname => 'TU_ID');
5931:
5932: -- =============== START DEBUG LOG ================
5951: ' ** START GET_NEXT_INCOMPLETE_DU ** ');
5952: -- =============== END DEBUG LOG ==================
5953:
5954: -- Set the du_id_for_completion attribute
5955: wf_engine.SetItemAttrNumber( itemtype => itemtype,
5956: itemkey => itemkey,
5957: aname => 'DU_ID_FOR_COMPLETION',
5958: avalue => l_du_id);
5959:
5962: ' ** START GET_NEXT_INCOMPLETE_DU ** ');
5963: -- =============== END DEBUG LOG ==================
5964:
5965: -- Set the du_prep_name_for_com attribute
5966: wf_engine.SetItemAttrText ( itemtype => itemtype,
5967: itemkey => itemkey,
5968: aname => 'DU_PREP_NAME_FOR_COM',
5969: avalue => l_du_prep_name);
5970:
6030: IF (funcmode = 'RUN') THEN
6031:
6032: -- Get the DU id
6033: l_du_id
6034: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
6035: itemkey => itemkey,
6036: aname => 'DU_ID_FOR_COMPLETION');
6037:
6038: -- =============== START DEBUG LOG ================
6137: END IF;
6138:
6139:
6140: -- Set the failed_du attribute
6141: wf_engine.SetItemAttrText ( itemtype => itemtype,
6142: itemkey => itemkey,
6143: aname => 'FAILED_DU',
6144: avalue => l_failed_du);
6145:
6148: ' SetItemAttrText FAILED_DU --> ' || l_failed_du);
6149: -- =============== END DEBUG LOG ==================
6150:
6151: -- Set the failed_trx attribute
6152: wf_engine.SetItemAttrText ( itemtype => itemtype,
6153: itemkey => itemkey,
6154: aname => 'FAILED_TRX',
6155: avalue => l_failed_trx);
6156:
6165: -- and append this DU_ID and error message to it.
6166:
6167: -- Get the current error message
6168: l_trx_failed_err_mess
6169: := wf_engine.GetItemAttrText ( itemtype => itemtype,
6170: itemkey => itemkey,
6171: aname => 'TRX_FAILED_ERROR_MESSAGE');
6172:
6173: -- =============== START DEBUG LOG ================
6184: ' l_trx_failed_err_mess --> ' || l_trx_failed_err_mess);
6185: -- =============== END DEBUG LOG ==================
6186:
6187: -- Set the trx_failed_error_message attribute
6188: wf_engine.SetItemAttrText ( itemtype => itemtype,
6189: itemkey => itemkey,
6190: aname => 'TRX_FAILED_ERROR_MESSAGE',
6191: avalue => l_trx_failed_err_mess);
6192:
6258: IF (funcmode = 'RUN') THEN
6259:
6260: -- Get the DU id
6261: l_du_id
6262: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
6263: itemkey => itemkey,
6264: aname => 'DU_ID_FOR_COMPLETION');
6265:
6266: -- =============== START DEBUG LOG ================
6328: IF (funcmode = 'RUN') THEN
6329:
6330: -- Get the DU id
6331: l_du_id
6332: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
6333: itemkey => itemkey,
6334: aname => 'DU_ID_FOR_COMPLETION');
6335:
6336: -- =============== START DEBUG LOG ================
6398: IF (funcmode = 'RUN') THEN
6399:
6400: -- Get the TU id
6401: l_tu_id
6402: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
6403: itemkey => itemkey,
6404: aname => 'TU_ID');
6405:
6406: -- =============== START DEBUG LOG ================
6496: IF (funcmode = 'RUN') THEN
6497:
6498: -- Get the TU id
6499: l_tu_id
6500: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
6501: itemkey => itemkey,
6502: aname => 'TU_ID');
6503:
6504: -- =============== START DEBUG LOG ================
6560:
6561: END LOOP;
6562:
6563: -- Set the all_dus_list attribute
6564: wf_engine.SetItemAttrText ( itemtype => itemtype,
6565: itemkey => itemkey,
6566: aname => 'ADD_ATTR1',
6567: avalue => substr(l_du_hold_list, 1, 4000));
6568:
6570: DEBUG_LOG_STRING (l_proc_level, 'Any_dus_with_trx_fail.Msg7',
6571: ' SetItemAttrText ADD_ATTR1 --> ' || substr(l_du_hold_list, 1, 4000));
6572: -- =============== END DEBUG LOG ==================
6573:
6574: wf_engine.SetItemAttrText ( itemtype => itemtype,
6575: itemkey => itemkey,
6576: aname => 'ADD_ATTR2',
6577: avalue => substr(l_du_hold_list, 4001, 4000));
6578:
6580: DEBUG_LOG_STRING (l_proc_level, 'Any_dus_with_trx_fail.Msg8',
6581: ' SetItemAttrText ADD_ATTR2 --> ' || substr(l_du_hold_list, 4001, 4000));
6582: -- =============== END DEBUG LOG ==================
6583:
6584: wf_engine.SetItemAttrText ( itemtype => itemtype,
6585: itemkey => itemkey,
6586: aname => 'ADD_ATTR3',
6587: avalue => substr(l_du_hold_list, 8001, 4000));
6588:
6590: DEBUG_LOG_STRING (l_proc_level, 'Any_dus_with_trx_fail.Msg9',
6591: ' SetItemAttrText ADD_ATTR3 --> ' || substr(l_du_hold_list, 8001, 4000));
6592: -- =============== END DEBUG LOG ==================
6593:
6594: wf_engine.SetItemAttrText ( itemtype => itemtype,
6595: itemkey => itemkey,
6596: aname => 'ADD_ATTR4',
6597: avalue => substr(l_du_hold_list, 12001, 4000));
6598:
6600: DEBUG_LOG_STRING (l_proc_level, 'Any_dus_with_trx_fail.Msg10',
6601: ' SetItemAttrText ADD_ATTR4 --> ' || substr(l_du_hold_list, 12001, 4000));
6602: -- =============== END DEBUG LOG ==================
6603:
6604: wf_engine.SetItemAttrText ( itemtype => itemtype,
6605: itemkey => itemkey,
6606: aname => 'ADD_ATTR5',
6607: avalue => substr(l_du_hold_list, 16001, 4000));
6608:
6610: DEBUG_LOG_STRING (l_proc_level, 'Any_dus_with_trx_fail.Msg11',
6611: ' SetItemAttrText ADD_ATTR5 --> ' || substr(l_du_hold_list, 16001, 4000));
6612: -- =============== END DEBUG LOG ==================
6613:
6614: wf_engine.SetItemAttrText ( itemtype => itemtype,
6615: itemkey => itemkey,
6616: aname => 'ADD_ATTR6',
6617: avalue => substr(l_du_hold_list, 20001, 4000));
6618:
6620: DEBUG_LOG_STRING (l_proc_level, 'Any_dus_with_trx_fail.Msg12',
6621: ' SetItemAttrText ADD_ATTR6 --> ' || substr(l_du_hold_list, 20001, 4000));
6622: -- =============== END DEBUG LOG ==================
6623:
6624: wf_engine.SetItemAttrText ( itemtype => itemtype,
6625: itemkey => itemkey,
6626: aname => 'ADD_ATTR7',
6627: avalue => substr(l_du_hold_list, 24001, 4000));
6628:
6630: DEBUG_LOG_STRING (l_proc_level, 'Any_dus_with_trx_fail.Msg13',
6631: ' SetItemAttrText ADD_ATTR7 --> ' || substr(l_du_hold_list, 24001, 4000));
6632: -- =============== END DEBUG LOG ==================
6633:
6634: wf_engine.SetItemAttrText ( itemtype => itemtype,
6635: itemkey => itemkey,
6636: aname => 'ALL_DUS_LIST',
6637: avalue => 'plsqlclob:igi_exp_approval_pkg.Create_du_list/'||itemtype||':'||itemkey);
6638:
6705: IF (funcmode = 'RUN') THEN
6706:
6707: -- Get the TU id
6708: l_tu_id
6709: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
6710: itemkey => itemkey,
6711: aname => 'TU_ID');
6712:
6713: -- =============== START DEBUG LOG ================
6811: IF (funcmode = 'RUN') THEN
6812:
6813: -- Get the TU id
6814: l_tu_id
6815: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
6816: itemkey => itemkey,
6817: aname => 'TU_ID');
6818:
6819: -- =============== START DEBUG LOG ================
6906: IF (funcmode = 'RUN') THEN
6907:
6908: -- Get the TU id
6909: l_tu_id
6910: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
6911: itemkey => itemkey,
6912: aname => 'TU_ID');
6913:
6914: -- =============== START DEBUG LOG ================
6928: END LOOP;
6929: CLOSE c_prep_list;
6930:
6931: -- Set the all_dus_list attribute
6932: wf_engine.SetItemAttrText ( itemtype => itemtype,
6933: itemkey => itemkey,
6934: aname => 'COM_DU_PREP_LIST',
6935: avalue => l_user_list);
6936:
7005: IF (funcmode = 'RUN') THEN
7006:
7007: -- Get the list of preparers of completed DUS
7008: l_prep_list
7009: := wf_engine.GetItemAttrText ( itemtype => itemtype,
7010: itemkey => itemkey,
7011: aname => 'COM_DU_PREP_LIST');
7012:
7013: -- =============== START DEBUG LOG ================
7046: ' l_next_prep --> ' || l_next_prep);
7047: -- =============== END DEBUG LOG ==================
7048:
7049: -- Set the temp_du_preparer_id attribute
7050: wf_engine.SetItemAttrNumber( itemtype => itemtype,
7051: itemkey => itemkey,
7052: aname => 'TEMP_DU_PREPARER_ID',
7053: avalue => l_next_prep);
7054:
7067: ' l_next_prep_name --> ' || l_next_prep_name);
7068: -- =============== END DEBUG LOG ==================
7069:
7070: -- Set the temp_du_preparer attribute
7071: wf_engine.SetItemAttrText ( itemtype => itemtype,
7072: itemkey => itemkey,
7073: aname => 'TEMP_DU_PREPARER_NAME',
7074: avalue => l_next_prep_name);
7075:
7079: -- =============== END DEBUG LOG ==================
7080:
7081: -- Get the TU id
7082: l_tu_id
7083: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
7084: itemkey => itemkey,
7085: aname => 'TU_ID');
7086:
7087:
7117: END LOOP;
7118:
7119:
7120: -- Set the all_dus_list attribute
7121: wf_engine.SetItemAttrText ( itemtype => itemtype,
7122: itemkey => itemkey,
7123: aname => 'ADD_ATTR1',
7124: avalue => substr(l_com_du_list, 1, 4000));
7125:
7127: DEBUG_LOG_STRING (l_proc_level, 'Get_next_prep.Msg11',
7128: ' SetItemAttrText ADD_ATTR1 --> ' || substr(l_com_du_list, 1, 4000));
7129: -- =============== END DEBUG LOG ==================
7130:
7131: wf_engine.SetItemAttrText ( itemtype => itemtype,
7132: itemkey => itemkey,
7133: aname => 'ADD_ATTR2',
7134: avalue => substr(l_com_du_list, 4001, 4000));
7135:
7137: DEBUG_LOG_STRING (l_proc_level, 'Get_next_prep.Msg12',
7138: ' SetItemAttrText ADD_ATTR2 --> ' || substr(l_com_du_list, 4001, 4000));
7139: -- =============== END DEBUG LOG ==================
7140:
7141: wf_engine.SetItemAttrText ( itemtype => itemtype,
7142: itemkey => itemkey,
7143: aname => 'ADD_ATTR3',
7144: avalue => substr(l_com_du_list, 8001, 4000));
7145:
7147: DEBUG_LOG_STRING (l_proc_level, 'Get_next_prep.Msg13',
7148: ' SetItemAttrText ADD_ATTR3 --> ' || substr(l_com_du_list, 8001, 4000));
7149: -- =============== END DEBUG LOG ==================
7150:
7151: wf_engine.SetItemAttrText ( itemtype => itemtype,
7152: itemkey => itemkey,
7153: aname => 'ADD_ATTR4',
7154: avalue => substr(l_com_du_list, 12001, 4000));
7155:
7157: DEBUG_LOG_STRING (l_proc_level, 'Get_next_prep.Msg14',
7158: ' SetItemAttrText ADD_ATTR4 --> ' || substr(l_com_du_list, 12001, 4000));
7159: -- =============== END DEBUG LOG ==================
7160:
7161: wf_engine.SetItemAttrText ( itemtype => itemtype,
7162: itemkey => itemkey,
7163: aname => 'ADD_ATTR5',
7164: avalue => substr(l_com_du_list, 16001, 4000));
7165:
7167: DEBUG_LOG_STRING (l_proc_level, 'Get_next_prep.Msg15',
7168: ' SetItemAttrText ADD_ATTR5 --> ' || substr(l_com_du_list, 16001, 4000));
7169: -- =============== END DEBUG LOG ==================
7170:
7171: wf_engine.SetItemAttrText ( itemtype => itemtype,
7172: itemkey => itemkey,
7173: aname => 'ADD_ATTR6',
7174: avalue => substr(l_com_du_list, 20001, 4000));
7175:
7177: DEBUG_LOG_STRING (l_proc_level, 'Get_next_prep.Msg16',
7178: ' SetItemAttrText ADD_ATTR6 --> ' || substr(l_com_du_list, 20001, 4000));
7179: -- =============== END DEBUG LOG ==================
7180:
7181: wf_engine.SetItemAttrText ( itemtype => itemtype,
7182: itemkey => itemkey,
7183: aname => 'ADD_ATTR7',
7184: avalue => substr(l_com_du_list, 24001, 4000));
7185:
7188: DEBUG_LOG_STRING (l_proc_level, 'Get_next_prep.Msg17',
7189: ' SetItemAttrText ADD_ATTR7 --> ' || substr(l_com_du_list, 24001, 4000));
7190: -- =============== END DEBUG LOG ==================
7191:
7192: wf_engine.SetItemAttrText(itemtype => itemtype,
7193: itemkey => itemkey,
7194: aname => 'TEMP_DU_BY_PREP_LIST',
7195: avalue => 'plsqlclob:igi_exp_approval_pkg.Create_du_list/'||itemtype||':'||itemkey);
7196:
7261: IF (funcmode = 'RUN') THEN
7262:
7263: -- Get the list of preparers of completed dus
7264: l_prep_list
7265: := wf_engine.GetItemAttrText ( itemtype => itemtype,
7266: itemkey => itemkey,
7267: aname => 'COM_DU_PREP_LIST');
7268:
7269: -- =============== START DEBUG LOG ================
7280: ' l_num --> ' || l_num || ' l_new_prep_list --> ' || l_new_prep_list);
7281: -- =============== END DEBUG LOG ==================
7282:
7283: -- Set the com_du_prep_list attribute to the new list
7284: wf_engine.SetItemAttrText ( itemtype => itemtype,
7285: itemkey => itemkey,
7286: aname => 'COM_DU_PREP_LIST',
7287: avalue => l_new_prep_list);
7288:
7341: IF (funcmode = 'RUN') THEN
7342:
7343: -- Get the TU id
7344: l_tu_id
7345: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
7346: itemkey => itemkey,
7347: aname => 'TU_ID');
7348:
7349: -- =============== START DEBUG LOG ================
7425: IF (funcmode = 'RUN') THEN
7426:
7427: -- Get the TU id
7428: l_tu_id
7429: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
7430: itemkey => itemkey,
7431: aname => 'TU_ID');
7432:
7433: -- =============== START DEBUG LOG ================
7512: IF (funcmode = 'RUN') THEN
7513:
7514: -- Get the TU id
7515: l_tu_id
7516: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
7517: itemkey => itemkey,
7518: aname => 'TU_ID');
7519:
7520: -- =============== START DEBUG LOG ================
7523: -- =============== END DEBUG LOG ==================
7524:
7525: -- Get the DU preparer id
7526: l_du_prep_id
7527: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
7528: itemkey => itemkey,
7529: aname => 'TEMP_DU_PREPARER_ID');
7530:
7531:
7632: IF (funcmode = 'RUN') THEN
7633:
7634: -- Get the TU id
7635: l_tu_id
7636: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
7637: itemkey => itemkey,
7638: aname => 'TU_ID');
7639:
7640: -- =============== START DEBUG LOG ================
7663:
7664: ELSE
7665: -- The next rejected DU has been fetched
7666: -- Set the temp_du_preparer_id attribute
7667: wf_engine.SetItemAttrNumber( itemtype => itemtype,
7668: itemkey => itemkey,
7669: aname => 'TEMP_DU_PREPARER_ID',
7670: avalue => l_du_prep_id);
7671:
7685: ' l_du_prep_name --> ' || l_du_prep_name);
7686: -- =============== END DEBUG LOG ==================
7687:
7688: -- Set the temp_du_preparer_name attribute
7689: wf_engine.SetItemAttrText ( itemtype => itemtype,
7690: itemkey => itemkey,
7691: aname => 'TEMP_DU_PREPARER_NAME',
7692: avalue => l_du_prep_name);
7693:
7727:
7728: END LOOP;
7729:
7730: -- Set the all_dus_list attribute
7731: wf_engine.SetItemAttrText ( itemtype => itemtype,
7732: itemkey => itemkey,
7733: aname => 'ADD_ATTR1',
7734: avalue => substr(l_du_rej_list, 1, 4000));
7735:
7737: DEBUG_LOG_STRING (l_proc_level, 'Get_next_rejected_legal_du.Msg10',
7738: ' SetItemAttrText ADD_ATTR1 --> ' || substr(l_du_rej_list, 1, 4000));
7739: -- =============== END DEBUG LOG ==================
7740:
7741: wf_engine.SetItemAttrText ( itemtype => itemtype,
7742: itemkey => itemkey,
7743: aname => 'ADD_ATTR2',
7744: avalue => substr(l_du_rej_list, 4001, 4000));
7745:
7747: DEBUG_LOG_STRING (l_proc_level, 'Get_next_rejected_legal_du.Msg11',
7748: ' SetItemAttrText ADD_ATTR2 --> ' || substr(l_du_rej_list, 4001, 4000));
7749: -- =============== END DEBUG LOG ==================
7750:
7751: wf_engine.SetItemAttrText ( itemtype => itemtype,
7752: itemkey => itemkey,
7753: aname => 'ADD_ATTR3',
7754: avalue => substr(l_du_rej_list, 8001, 4000));
7755:
7757: DEBUG_LOG_STRING (l_proc_level, 'Get_next_rejected_legal_du.Msg12',
7758: ' SetItemAttrText ADD_ATTR3 --> ' || substr(l_du_rej_list, 8001, 4000));
7759: -- =============== END DEBUG LOG ==================
7760:
7761: wf_engine.SetItemAttrText ( itemtype => itemtype,
7762: itemkey => itemkey,
7763: aname => 'ADD_ATTR4',
7764: avalue => substr(l_du_rej_list, 12001, 4000));
7765:
7767: DEBUG_LOG_STRING (l_proc_level, 'Get_next_rejected_legal_du.Msg13',
7768: ' SetItemAttrText ADD_ATTR4 --> ' || substr(l_du_rej_list, 12001, 4000));
7769: -- =============== END DEBUG LOG ==================
7770:
7771: wf_engine.SetItemAttrText ( itemtype => itemtype,
7772: itemkey => itemkey,
7773: aname => 'ADD_ATTR5',
7774: avalue => substr(l_du_rej_list, 16001, 4000));
7775:
7777: DEBUG_LOG_STRING (l_proc_level, 'Get_next_rejected_legal_du.Msg14',
7778: ' SetItemAttrText ADD_ATTR5 --> ' || substr(l_du_rej_list, 16001, 4000));
7779: -- =============== END DEBUG LOG ==================
7780:
7781: wf_engine.SetItemAttrText ( itemtype => itemtype,
7782: itemkey => itemkey,
7783: aname => 'ADD_ATTR6',
7784: avalue => substr(l_du_rej_list, 20001, 4000));
7785:
7787: DEBUG_LOG_STRING (l_proc_level, 'Get_next_rejected_legal_du.Msg15',
7788: ' SetItemAttrText ADD_ATTR6 --> ' || substr(l_du_rej_list, 20001, 4000));
7789: -- =============== END DEBUG LOG ==================
7790:
7791: wf_engine.SetItemAttrText ( itemtype => itemtype,
7792: itemkey => itemkey,
7793: aname => 'ADD_ATTR7',
7794: avalue => substr(l_du_rej_list, 24001, 4000));
7795:
7799: ' SetItemAttrText ADD_ATTR7 --> ' || substr(l_du_rej_list, 24001, 4000));
7800: -- =============== END DEBUG LOG ==================
7801:
7802: -- Set the temp_du_by_prep_list attribute
7803: wf_engine.SetItemAttrText ( itemtype => itemtype,
7804: itemkey => itemkey,
7805: aname => 'TEMP_DU_BY_PREP_LIST',
7806: avalue => 'plsqlclob:igi_exp_approval_pkg.Create_du_list/'||itemtype||':'||itemkey);
7807:
7881: IF (funcmode = 'RUN') THEN
7882:
7883: -- Get the transmitter position id
7884: l_transmitter_position_id
7885: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
7886: itemkey => itemkey,
7887: aname => 'TRANSMITTER_POSITION_ID');
7888:
7889: -- =============== START DEBUG LOG ================
7892: -- =============== END DEBUG LOG ==================
7893:
7894: -- Get the final approver position id
7895: l_final_apprv_pos_id
7896: := wf_engine.GetItemAttrNumber( itemtype => itemtype,
7897: itemkey => itemkey,
7898: aname => 'FINAL_APPRV_POS_ID');
7899:
7900: -- =============== START DEBUG LOG ================