213: into l_seq from sys.dual;
214:
215: l_itemkey:=to_char(p_asl_id)||'-'||l_seq;
216:
217: wf_engine.createProcess ( ItemType => l_ItemType,
218: ItemKey => l_ItemKey,
219: Process => 'UPDATE_CAPACITY');
220:
221:
218: ItemKey => l_ItemKey,
219: Process => 'UPDATE_CAPACITY');
220:
221:
222: wf_engine.SetItemAttrNumber ( itemtype => l_itemtype,
223: itemkey => l_itemkey,
224: aname => 'ASL_ID',
225: avalue => p_asl_id);
226: wf_engine.StartProcess ( ItemType => l_ItemType,
222: wf_engine.SetItemAttrNumber ( itemtype => l_itemtype,
223: itemkey => l_itemkey,
224: aname => 'ASL_ID',
225: avalue => p_asl_id);
226: wf_engine.StartProcess ( ItemType => l_ItemType,
227: ItemKey => l_ItemKey );
228:
229: end StartWorkflow;
230:
276: end loop;
277:
278: l_document := l_document || '';
279:
280: wf_engine.SetItemAttrText ( itemtype => itemtype,
281: itemkey => itemkey,
282: aname => 'OLD_MFG_CAPACITY_TABLE',
283: avalue => l_document);
284:
332: end loop;
333:
334: l_document := l_document || '' || NL;
335:
336: wf_engine.SetItemAttrText ( itemtype => itemtype,
337: itemkey => itemkey,
338: aname => 'NEW_MFG_CAPACITY_TABLE',
339: avalue => l_document);
340:
389: end loop;
390:
391: l_document := l_document || '';
392:
393: wf_engine.SetItemAttrText ( itemtype => itemtype,
394: itemkey => itemkey,
395: aname => 'OLD_CAPACITY_TOLERANCE_TABLE',
396: avalue => l_document);
397:
445: end loop;
446:
447: l_document := l_document || '';
448:
449: wf_engine.SetItemAttrText ( itemtype => itemtype,
450: itemkey => itemkey,
451: aname => 'NEW_CAPACITY_TOLERANCE_TABLE',
452: avalue => l_document);
453:
477: l_approval_required_by varchar2(20);
478: l_progress varchar2(3):='0';
479:
480: begin
481: if (funcmode <> wf_engine.eng_run) then
482: resultout := wf_engine.eng_null;
483: return;
484: end if;
485: l_progress:='1';
478: l_progress varchar2(3):='0';
479:
480: begin
481: if (funcmode <> wf_engine.eng_run) then
482: resultout := wf_engine.eng_null;
483: return;
484: end if;
485: l_progress:='1';
486: l_asl_id:=wf_engine.GetItemAttrNumber ( itemtype => itemtype,
482: resultout := wf_engine.eng_null;
483: return;
484: end if;
485: l_progress:='1';
486: l_asl_id:=wf_engine.GetItemAttrNumber ( itemtype => itemtype,
487: itemkey => itemkey,
488: aname => 'ASL_ID');
489: select DESCRIPTION,
490: BUYER_ID,
503: from POS_ORD_MODIFIERS_V
504: where asl_id=l_asl_id;
505:
506: l_progress:='2';
507: wf_engine.SetItemAttrText ( itemtype => itemtype,
508: itemkey => itemkey,
509: aname => 'ITEM_DESCRIPTION',
510: avalue => l_item_description);
511: wf_engine.SetItemAttrText ( itemtype => itemtype,
507: wf_engine.SetItemAttrText ( itemtype => itemtype,
508: itemkey => itemkey,
509: aname => 'ITEM_DESCRIPTION',
510: avalue => l_item_description);
511: wf_engine.SetItemAttrText ( itemtype => itemtype,
512: itemkey => itemkey,
513: aname => 'ITEM_NUM',
514: avalue => l_item_number);
515: wf_engine.SetItemAttrText ( itemtype => itemtype,
511: wf_engine.SetItemAttrText ( itemtype => itemtype,
512: itemkey => itemkey,
513: aname => 'ITEM_NUM',
514: avalue => l_item_number);
515: wf_engine.SetItemAttrText ( itemtype => itemtype,
516: itemkey => itemkey,
517: aname => 'SUPPLIER_ITEM',
518: avalue => l_supplier_item_number);
519: wf_engine.SetItemAttrText ( itemtype => itemtype,
515: wf_engine.SetItemAttrText ( itemtype => itemtype,
516: itemkey => itemkey,
517: aname => 'SUPPLIER_ITEM',
518: avalue => l_supplier_item_number);
519: wf_engine.SetItemAttrText ( itemtype => itemtype,
520: itemkey => itemkey,
521: aname => 'SUPPLIER_ITEM_NVL',
522: avalue => nvl(l_supplier_item_number,
523: l_item_number));
520: itemkey => itemkey,
521: aname => 'SUPPLIER_ITEM_NVL',
522: avalue => nvl(l_supplier_item_number,
523: l_item_number));
524: wf_engine.SetItemAttrText ( itemtype => itemtype,
525: itemkey => itemkey,
526: aname => 'PURCHASING_UOM',
527: avalue => l_uom);
528:
542: where vendor_id=l_vendor_id;
543: end if;
544:
545: l_progress:='6';
546: wf_engine.SetItemAttrText ( itemtype => itemtype,
547: itemkey => itemkey,
548: aname => 'SUPPLIER_ORG_NAME',
549: avalue => l_supplier_username);
550:
580: if(l_vendor_id is not null) then
581: wf_directory.GetUserName('FND_USR', l_vendor_id, l_supplier_username, l_supplier_displayname);
582: end if;
583: l_progress:='12';
584: wf_engine.SetItemAttrText ( itemtype => itemtype,
585: itemkey => itemkey,
586: aname => 'BUYER_NAME',
587: avalue => l_buyer_username);
588: wf_engine.SetItemAttrText ( itemtype => itemtype,
584: wf_engine.SetItemAttrText ( itemtype => itemtype,
585: itemkey => itemkey,
586: aname => 'BUYER_NAME',
587: avalue => l_buyer_username);
588: wf_engine.SetItemAttrText ( itemtype => itemtype,
589: itemkey => itemkey,
590: aname => 'BUYER_DISPLAY_NAME',
591: avalue => l_buyer_displayname);
592: wf_engine.SetItemAttrText ( itemtype => itemtype,
588: wf_engine.SetItemAttrText ( itemtype => itemtype,
589: itemkey => itemkey,
590: aname => 'BUYER_DISPLAY_NAME',
591: avalue => l_buyer_displayname);
592: wf_engine.SetItemAttrText ( itemtype => itemtype,
593: itemkey => itemkey,
594: aname => 'PLANNER_NAME',
595: avalue => l_planner_username);
596: wf_engine.SetItemAttrText ( itemtype => itemtype,
592: wf_engine.SetItemAttrText ( itemtype => itemtype,
593: itemkey => itemkey,
594: aname => 'PLANNER_NAME',
595: avalue => l_planner_username);
596: wf_engine.SetItemAttrText ( itemtype => itemtype,
597: itemkey => itemkey,
598: aname => 'PLANNER_DISPLAY_NAME',
599: avalue => l_planner_displayname);
600: wf_engine.SetItemAttrText ( itemtype => itemtype,
596: wf_engine.SetItemAttrText ( itemtype => itemtype,
597: itemkey => itemkey,
598: aname => 'PLANNER_DISPLAY_NAME',
599: avalue => l_planner_displayname);
600: wf_engine.SetItemAttrText ( itemtype => itemtype,
601: itemkey => itemkey,
602: aname => 'SUPPLIER_NAME',
603: avalue => l_supplier_username);
604: wf_engine.SetItemAttrText ( itemtype => itemtype,
600: wf_engine.SetItemAttrText ( itemtype => itemtype,
601: itemkey => itemkey,
602: aname => 'SUPPLIER_NAME',
603: avalue => l_supplier_username);
604: wf_engine.SetItemAttrText ( itemtype => itemtype,
605: itemkey => itemkey,
606: aname => 'SUPPLIER_DISPLAY_NAME',
607: avalue => l_supplier_displayname);
608:
609: l_progress:='13';
610: FND_PROFILE.get('POS_ASL_MOD_APPR_REQD_BY', l_approval_required_by);
611: l_progress:='14';
612: if(upper(l_approval_required_by)='BUYER') then
613: wf_engine.SetItemAttrText ( itemtype => itemtype,
614: itemkey => itemkey,
615: aname => 'APPROVAL_REQUIRED_BY',
616: avalue => 'BUYER');
617: elsif(upper(l_approval_required_by)='PLANNER') then
614: itemkey => itemkey,
615: aname => 'APPROVAL_REQUIRED_BY',
616: avalue => 'BUYER');
617: elsif(upper(l_approval_required_by)='PLANNER') then
618: wf_engine.SetItemAttrText ( itemtype => itemtype,
619: itemkey => itemkey,
620: aname => 'APPROVAL_REQUIRED_BY',
621: avalue => 'PLANNER');
622: else
619: itemkey => itemkey,
620: aname => 'APPROVAL_REQUIRED_BY',
621: avalue => 'PLANNER');
622: else
623: wf_engine.SetItemAttrText ( itemtype => itemtype,
624: itemkey => itemkey,
625: aname => 'APPROVAL_REQUIRED_BY',
626: avalue => 'NONE');
627: end if;
627: end if;
628:
629: l_progress:='15';
630:
631: wf_engine.SetItemAttrText (itemtype => itemtype,
632: itemkey => itemkey,
633: aname => 'POS_NOTIFY_APPROVER',
634: avalue => 'PLSQL:POS_UPDATE_CAPACITY_PKG.GENERATE_CAP_APP_NOTIF/'|| itemtype || ':' || itemkey);
635:
632: itemkey => itemkey,
633: aname => 'POS_NOTIFY_APPROVER',
634: avalue => 'PLSQL:POS_UPDATE_CAPACITY_PKG.GENERATE_CAP_APP_NOTIF/'|| itemtype || ':' || itemkey);
635:
636: wf_engine.SetItemAttrText (itemtype => itemtype,
637: itemkey => itemkey,
638: aname => 'POS_SUPP_NOTIF_APPR',
639: avalue => 'PLSQL:POS_UPDATE_CAPACITY_PKG.GENERATE_SUPPL_CAP_NOTIF_APPR/'|| itemtype || ':' || itemkey);
640:
637: itemkey => itemkey,
638: aname => 'POS_SUPP_NOTIF_APPR',
639: avalue => 'PLSQL:POS_UPDATE_CAPACITY_PKG.GENERATE_SUPPL_CAP_NOTIF_APPR/'|| itemtype || ':' || itemkey);
640:
641: wf_engine.SetItemAttrText (itemtype => itemtype,
642: itemkey => itemkey,
643: aname => 'POS_SUPP_NOTIF_REJ',
644: avalue => 'PLSQL:POS_UPDATE_CAPACITY_PKG.GENERATE_SUPPL_CAP_NOTIF_REJ/'|| itemtype || ':' || itemkey);
645:
666: actid in number,
667: funcmode in varchar2,
668: resultout out NOCOPY varchar2 ) is
669: begin
670: if (funcmode <> wf_engine.eng_run) then
671: resultout := wf_engine.eng_null;
672: return;
673: end if;
674: end;
667: funcmode in varchar2,
668: resultout out NOCOPY varchar2 ) is
669: begin
670: if (funcmode <> wf_engine.eng_run) then
671: resultout := wf_engine.eng_null;
672: return;
673: end if;
674: end;
675:
678: actid in number,
679: funcmode in varchar2,
680: resultout out NOCOPY varchar2 ) is
681: begin
682: if (funcmode <> wf_engine.eng_run) then
683: resultout := wf_engine.eng_null;
684: return;
685: end if;
686: end;
679: funcmode in varchar2,
680: resultout out NOCOPY varchar2 ) is
681: begin
682: if (funcmode <> wf_engine.eng_run) then
683: resultout := wf_engine.eng_null;
684: return;
685: end if;
686: end;
687:
693:
694: l_approval_required_by varchar2(20);
695: l_buyer_name varchar2(180);
696: begin
697: if (funcmode <> wf_engine.eng_run) then
698: resultout := wf_engine.eng_null;
699: return;
700: end if;
701: l_approval_required_by:=wf_engine.GetItemAttrText ( itemtype => itemtype,
694: l_approval_required_by varchar2(20);
695: l_buyer_name varchar2(180);
696: begin
697: if (funcmode <> wf_engine.eng_run) then
698: resultout := wf_engine.eng_null;
699: return;
700: end if;
701: l_approval_required_by:=wf_engine.GetItemAttrText ( itemtype => itemtype,
702: itemkey => itemkey,
697: if (funcmode <> wf_engine.eng_run) then
698: resultout := wf_engine.eng_null;
699: return;
700: end if;
701: l_approval_required_by:=wf_engine.GetItemAttrText ( itemtype => itemtype,
702: itemkey => itemkey,
703: aname => 'APPROVAL_REQUIRED_BY');
704: if(l_approval_required_by='BUYER') then
705: l_buyer_name:=wf_engine.GetItemAttrText ( itemtype => itemtype,
701: l_approval_required_by:=wf_engine.GetItemAttrText ( itemtype => itemtype,
702: itemkey => itemkey,
703: aname => 'APPROVAL_REQUIRED_BY');
704: if(l_approval_required_by='BUYER') then
705: l_buyer_name:=wf_engine.GetItemAttrText ( itemtype => itemtype,
706: itemkey => itemkey,
707: aname => 'BUYER_NAME');
708: wf_engine.SetItemAttrText ( itemtype => itemtype,
709: itemkey => itemkey,
704: if(l_approval_required_by='BUYER') then
705: l_buyer_name:=wf_engine.GetItemAttrText ( itemtype => itemtype,
706: itemkey => itemkey,
707: aname => 'BUYER_NAME');
708: wf_engine.SetItemAttrText ( itemtype => itemtype,
709: itemkey => itemkey,
710: aname => 'RESPONSE_FROM_ROLE',
711: avalue => l_buyer_name);
712: resultout := wf_engine.eng_completed || ':' || 'Y';
708: wf_engine.SetItemAttrText ( itemtype => itemtype,
709: itemkey => itemkey,
710: aname => 'RESPONSE_FROM_ROLE',
711: avalue => l_buyer_name);
712: resultout := wf_engine.eng_completed || ':' || 'Y';
713: else
714: resultout := wf_engine.eng_completed || ':' || 'N';
715: end if;
716:
710: aname => 'RESPONSE_FROM_ROLE',
711: avalue => l_buyer_name);
712: resultout := wf_engine.eng_completed || ':' || 'Y';
713: else
714: resultout := wf_engine.eng_completed || ':' || 'N';
715: end if;
716:
717: end;
718:
723: resultout out NOCOPY varchar2 ) is
724:
725: l_buyer_name varchar2(100);
726: begin
727: if (funcmode <> wf_engine.eng_run) then
728: resultout := wf_engine.eng_null;
729: return;
730: end if;
731: l_buyer_name:=wf_engine.GetItemAttrText ( itemtype => itemtype,
724:
725: l_buyer_name varchar2(100);
726: begin
727: if (funcmode <> wf_engine.eng_run) then
728: resultout := wf_engine.eng_null;
729: return;
730: end if;
731: l_buyer_name:=wf_engine.GetItemAttrText ( itemtype => itemtype,
732: itemkey => itemkey,
727: if (funcmode <> wf_engine.eng_run) then
728: resultout := wf_engine.eng_null;
729: return;
730: end if;
731: l_buyer_name:=wf_engine.GetItemAttrText ( itemtype => itemtype,
732: itemkey => itemkey,
733: aname => 'BUYER_NAME');
734: if(l_buyer_name is not null) then
735: resultout := wf_engine.eng_completed || ':' || 'Y';
731: l_buyer_name:=wf_engine.GetItemAttrText ( itemtype => itemtype,
732: itemkey => itemkey,
733: aname => 'BUYER_NAME');
734: if(l_buyer_name is not null) then
735: resultout := wf_engine.eng_completed || ':' || 'Y';
736: else
737: resultout := wf_engine.eng_completed || ':' || 'N';
738: end if;
739: end;
733: aname => 'BUYER_NAME');
734: if(l_buyer_name is not null) then
735: resultout := wf_engine.eng_completed || ':' || 'Y';
736: else
737: resultout := wf_engine.eng_completed || ':' || 'N';
738: end if;
739: end;
740:
741: procedure PLANNER_APPROVAL_REQUIRED( itemtype in varchar2,
747: l_approval_required_by varchar2(20);
748: l_planner_name varchar2(180);
749: l_supplier_name varchar2(180);
750: begin
751: if (funcmode <> wf_engine.eng_run) then
752: resultout := wf_engine.eng_null;
753: return;
754: end if;
755: l_approval_required_by:=wf_engine.GetItemAttrText ( itemtype => itemtype,
748: l_planner_name varchar2(180);
749: l_supplier_name varchar2(180);
750: begin
751: if (funcmode <> wf_engine.eng_run) then
752: resultout := wf_engine.eng_null;
753: return;
754: end if;
755: l_approval_required_by:=wf_engine.GetItemAttrText ( itemtype => itemtype,
756: itemkey => itemkey,
751: if (funcmode <> wf_engine.eng_run) then
752: resultout := wf_engine.eng_null;
753: return;
754: end if;
755: l_approval_required_by:=wf_engine.GetItemAttrText ( itemtype => itemtype,
756: itemkey => itemkey,
757: aname => 'APPROVAL_REQUIRED_BY');
758: if(l_approval_required_by='PLANNER') then
759: l_planner_name:=wf_engine.GetItemAttrText ( itemtype => itemtype,
755: l_approval_required_by:=wf_engine.GetItemAttrText ( itemtype => itemtype,
756: itemkey => itemkey,
757: aname => 'APPROVAL_REQUIRED_BY');
758: if(l_approval_required_by='PLANNER') then
759: l_planner_name:=wf_engine.GetItemAttrText ( itemtype => itemtype,
760: itemkey => itemkey,
761: aname => 'PLANNER_NAME');
762: wf_engine.SetItemAttrText ( itemtype => itemtype,
763: itemkey => itemkey,
758: if(l_approval_required_by='PLANNER') then
759: l_planner_name:=wf_engine.GetItemAttrText ( itemtype => itemtype,
760: itemkey => itemkey,
761: aname => 'PLANNER_NAME');
762: wf_engine.SetItemAttrText ( itemtype => itemtype,
763: itemkey => itemkey,
764: aname => 'RESPONSE_FROM_ROLE',
765: avalue => l_planner_name);
766: resultout := wf_engine.eng_completed || ':' || 'Y';
762: wf_engine.SetItemAttrText ( itemtype => itemtype,
763: itemkey => itemkey,
764: aname => 'RESPONSE_FROM_ROLE',
765: avalue => l_planner_name);
766: resultout := wf_engine.eng_completed || ':' || 'Y';
767: else
768: l_supplier_name:=wf_engine.GetItemAttrText ( itemtype => itemtype,
769: itemkey => itemkey,
770: aname => 'SUPPLIER_NAME');
764: aname => 'RESPONSE_FROM_ROLE',
765: avalue => l_planner_name);
766: resultout := wf_engine.eng_completed || ':' || 'Y';
767: else
768: l_supplier_name:=wf_engine.GetItemAttrText ( itemtype => itemtype,
769: itemkey => itemkey,
770: aname => 'SUPPLIER_NAME');
771: wf_engine.SetItemAttrText ( itemtype => itemtype,
772: itemkey => itemkey,
767: else
768: l_supplier_name:=wf_engine.GetItemAttrText ( itemtype => itemtype,
769: itemkey => itemkey,
770: aname => 'SUPPLIER_NAME');
771: wf_engine.SetItemAttrText ( itemtype => itemtype,
772: itemkey => itemkey,
773: aname => 'RESPONSE_FROM_ROLE',
774: avalue => l_supplier_name);
775: resultout := wf_engine.eng_completed || ':' || 'N';
771: wf_engine.SetItemAttrText ( itemtype => itemtype,
772: itemkey => itemkey,
773: aname => 'RESPONSE_FROM_ROLE',
774: avalue => l_supplier_name);
775: resultout := wf_engine.eng_completed || ':' || 'N';
776: end if;
777:
778: end;
779:
784: resultout out NOCOPY varchar2 ) is
785:
786: l_planner_name varchar2(100);
787: begin
788: if (funcmode <> wf_engine.eng_run) then
789: resultout := wf_engine.eng_null;
790: return;
791: end if;
792: l_planner_name:=wf_engine.GetItemAttrText ( itemtype => itemtype,
785:
786: l_planner_name varchar2(100);
787: begin
788: if (funcmode <> wf_engine.eng_run) then
789: resultout := wf_engine.eng_null;
790: return;
791: end if;
792: l_planner_name:=wf_engine.GetItemAttrText ( itemtype => itemtype,
793: itemkey => itemkey,
788: if (funcmode <> wf_engine.eng_run) then
789: resultout := wf_engine.eng_null;
790: return;
791: end if;
792: l_planner_name:=wf_engine.GetItemAttrText ( itemtype => itemtype,
793: itemkey => itemkey,
794: aname => 'PLANNER_NAME');
795: if(l_planner_name is not null) then
796: resultout := wf_engine.eng_completed || ':' || 'Y';
792: l_planner_name:=wf_engine.GetItemAttrText ( itemtype => itemtype,
793: itemkey => itemkey,
794: aname => 'PLANNER_NAME');
795: if(l_planner_name is not null) then
796: resultout := wf_engine.eng_completed || ':' || 'Y';
797: else
798: resultout := wf_engine.eng_completed || ':' || 'N';
799: end if;
800: end;
794: aname => 'PLANNER_NAME');
795: if(l_planner_name is not null) then
796: resultout := wf_engine.eng_completed || ':' || 'Y';
797: else
798: resultout := wf_engine.eng_completed || ':' || 'N';
799: end if;
800: end;
801:
802: procedure UPDATE_ASL( itemtype in varchar2,
828: from_date, to_date, capacity_per_day, capacity_id, created_by, status
829: FROM POS_MFG_CAPACITY_TEMP
830: WHERE asl_id=id and status in ('NEW', 'OLD', 'DEL', 'MOD');
831: begin
832: if (funcmode <> wf_engine.eng_run) then
833: resultout := wf_engine.eng_null;
834: return;
835: end if;
836: l_asl_id:=wf_engine.GetItemAttrNumber ( itemtype => itemtype,
829: FROM POS_MFG_CAPACITY_TEMP
830: WHERE asl_id=id and status in ('NEW', 'OLD', 'DEL', 'MOD');
831: begin
832: if (funcmode <> wf_engine.eng_run) then
833: resultout := wf_engine.eng_null;
834: return;
835: end if;
836: l_asl_id:=wf_engine.GetItemAttrNumber ( itemtype => itemtype,
837: itemkey => itemkey,
832: if (funcmode <> wf_engine.eng_run) then
833: resultout := wf_engine.eng_null;
834: return;
835: end if;
836: l_asl_id:=wf_engine.GetItemAttrNumber ( itemtype => itemtype,
837: itemkey => itemkey,
838: aname => 'ASL_ID');
839:
840: pos_supplier_item_tol_pkg.delete(l_asl_id);
926: resultout out NOCOPY varchar2 ) is
927:
928: l_default_mode varchar2(20);
929: begin
930: if (funcmode <> wf_engine.eng_run) then
931: resultout := wf_engine.eng_null;
932: return;
933: end if;
934: l_default_mode:=wf_engine.GetItemAttrText ( itemtype => itemtype,
927:
928: l_default_mode varchar2(20);
929: begin
930: if (funcmode <> wf_engine.eng_run) then
931: resultout := wf_engine.eng_null;
932: return;
933: end if;
934: l_default_mode:=wf_engine.GetItemAttrText ( itemtype => itemtype,
935: itemkey => itemkey,
930: if (funcmode <> wf_engine.eng_run) then
931: resultout := wf_engine.eng_null;
932: return;
933: end if;
934: l_default_mode:=wf_engine.GetItemAttrText ( itemtype => itemtype,
935: itemkey => itemkey,
936: aname => 'DEFAULT_MODE');
937: if(upper(l_default_mode)='APPROVE') then
938: resultout := wf_engine.eng_completed || ':' || 'APPROVED';
934: l_default_mode:=wf_engine.GetItemAttrText ( itemtype => itemtype,
935: itemkey => itemkey,
936: aname => 'DEFAULT_MODE');
937: if(upper(l_default_mode)='APPROVE') then
938: resultout := wf_engine.eng_completed || ':' || 'APPROVED';
939: else
940: resultout := wf_engine.eng_completed || ':' || 'REJECTED';
941: end if;
942:
936: aname => 'DEFAULT_MODE');
937: if(upper(l_default_mode)='APPROVE') then
938: resultout := wf_engine.eng_completed || ':' || 'APPROVED';
939: else
940: resultout := wf_engine.eng_completed || ':' || 'REJECTED';
941: end if;
942:
943: end;
944:
949: resultout out NOCOPY varchar2 ) is
950:
951: l_asl_id number;
952: begin
953: if (funcmode <> wf_engine.eng_run) then
954: resultout := wf_engine.eng_null;
955: return;
956: end if;
957:
950:
951: l_asl_id number;
952: begin
953: if (funcmode <> wf_engine.eng_run) then
954: resultout := wf_engine.eng_null;
955: return;
956: end if;
957:
958: l_asl_id:=wf_engine.GetItemAttrNumber ( itemtype => itemtype,
954: resultout := wf_engine.eng_null;
955: return;
956: end if;
957:
958: l_asl_id:=wf_engine.GetItemAttrNumber ( itemtype => itemtype,
959: itemkey => itemkey,
960: aname => 'ASL_ID');
961:
962: update POS_MFG_CAPACITY_TEMP
979:
980: l_buyer_name varchar2(100);
981: l_planner_name varchar2(100);
982: begin
983: if (funcmode <> wf_engine.eng_run) then
984: resultout := wf_engine.eng_null;
985: return;
986: end if;
987: l_buyer_name:=wf_engine.GetItemAttrText ( itemtype => itemtype,
980: l_buyer_name varchar2(100);
981: l_planner_name varchar2(100);
982: begin
983: if (funcmode <> wf_engine.eng_run) then
984: resultout := wf_engine.eng_null;
985: return;
986: end if;
987: l_buyer_name:=wf_engine.GetItemAttrText ( itemtype => itemtype,
988: itemkey => itemkey,
983: if (funcmode <> wf_engine.eng_run) then
984: resultout := wf_engine.eng_null;
985: return;
986: end if;
987: l_buyer_name:=wf_engine.GetItemAttrText ( itemtype => itemtype,
988: itemkey => itemkey,
989: aname => 'BUYER_NAME');
990: l_planner_name:=wf_engine.GetItemAttrText ( itemtype => itemtype,
991: itemkey => itemkey,
986: end if;
987: l_buyer_name:=wf_engine.GetItemAttrText ( itemtype => itemtype,
988: itemkey => itemkey,
989: aname => 'BUYER_NAME');
990: l_planner_name:=wf_engine.GetItemAttrText ( itemtype => itemtype,
991: itemkey => itemkey,
992: aname => 'PLANNER_NAME');
993:
994: if(l_planner_name is not null) then
992: aname => 'PLANNER_NAME');
993:
994: if(l_planner_name is not null) then
995: if(l_planner_name=l_buyer_name) then
996: resultout := wf_engine.eng_completed || ':' || 'Y';
997: else
998: resultout := wf_engine.eng_completed || ':' || 'N';
999: end if;
1000: else
994: if(l_planner_name is not null) then
995: if(l_planner_name=l_buyer_name) then
996: resultout := wf_engine.eng_completed || ':' || 'Y';
997: else
998: resultout := wf_engine.eng_completed || ':' || 'N';
999: end if;
1000: else
1001: resultout := wf_engine.eng_completed || ':' || 'Y';
1002: end if;
997: else
998: resultout := wf_engine.eng_completed || ':' || 'N';
999: end if;
1000: else
1001: resultout := wf_engine.eng_completed || ':' || 'Y';
1002: end if;
1003: end;
1004:
1005:
1032:
1033: generate_header(l_document,l_item_type,l_item_key);
1034:
1035:
1036: x_old_capacity_tolerance := wf_engine.GetItemAttrText ( itemtype => l_item_type,
1037: itemkey => l_item_key,
1038: aname => 'OLD_CAPACITY_TOLERANCE_TABLE');
1039:
1040: x_new_capacity_tolerance := wf_engine.GetItemAttrText ( itemtype => l_item_type,
1036: x_old_capacity_tolerance := wf_engine.GetItemAttrText ( itemtype => l_item_type,
1037: itemkey => l_item_key,
1038: aname => 'OLD_CAPACITY_TOLERANCE_TABLE');
1039:
1040: x_new_capacity_tolerance := wf_engine.GetItemAttrText ( itemtype => l_item_type,
1041: itemkey => l_item_key,
1042: aname => 'NEW_CAPACITY_TOLERANCE_TABLE');
1043:
1044: x_new_mfg_capacity_table := wf_engine.GetItemAttrText ( itemtype => l_item_type,
1040: x_new_capacity_tolerance := wf_engine.GetItemAttrText ( itemtype => l_item_type,
1041: itemkey => l_item_key,
1042: aname => 'NEW_CAPACITY_TOLERANCE_TABLE');
1043:
1044: x_new_mfg_capacity_table := wf_engine.GetItemAttrText ( itemtype => l_item_type,
1045: itemkey => l_item_key,
1046: aname => 'NEW_MFG_CAPACITY_TABLE');
1047:
1048: x_old_mfg_capacity_table := wf_engine.GetItemAttrText ( itemtype => l_item_type,
1044: x_new_mfg_capacity_table := wf_engine.GetItemAttrText ( itemtype => l_item_type,
1045: itemkey => l_item_key,
1046: aname => 'NEW_MFG_CAPACITY_TABLE');
1047:
1048: x_old_mfg_capacity_table := wf_engine.GetItemAttrText ( itemtype => l_item_type,
1049: itemkey => l_item_key,
1050: aname => 'OLD_MFG_CAPACITY_TABLE');
1051:
1052:
1101: x_uom varchar2(25);
1102:
1103: begin
1104:
1105: x_item_desc := wf_engine.GetItemAttrText ( itemtype => itemtype,
1106: itemkey => itemkey,
1107: aname => 'ITEM_DESCRIPTION');
1108:
1109: x_item_num := wf_engine.GetItemAttrText ( itemtype => itemtype,
1105: x_item_desc := wf_engine.GetItemAttrText ( itemtype => itemtype,
1106: itemkey => itemkey,
1107: aname => 'ITEM_DESCRIPTION');
1108:
1109: x_item_num := wf_engine.GetItemAttrText ( itemtype => itemtype,
1110: itemkey => itemkey,
1111: aname => 'ITEM_NUM');
1112:
1113: x_supp_item := wf_engine.GetItemAttrText ( itemtype => itemtype,
1109: x_item_num := wf_engine.GetItemAttrText ( itemtype => itemtype,
1110: itemkey => itemkey,
1111: aname => 'ITEM_NUM');
1112:
1113: x_supp_item := wf_engine.GetItemAttrText ( itemtype => itemtype,
1114: itemkey => itemkey,
1115: aname => 'SUPPLIER_ITEM');
1116:
1117: x_uom := wf_engine.GetItemAttrText ( itemtype => itemtype,
1113: x_supp_item := wf_engine.GetItemAttrText ( itemtype => itemtype,
1114: itemkey => itemkey,
1115: aname => 'SUPPLIER_ITEM');
1116:
1117: x_uom := wf_engine.GetItemAttrText ( itemtype => itemtype,
1118: itemkey => itemkey,
1119: aname => 'PURCHASING_UOM');
1120:
1121:
1174: l_document := l_document || '' || NL;
1175:
1176: generate_header(l_document,l_item_type,l_item_key);
1177:
1178: x_new_mfg_capacity_table := wf_engine.GetItemAttrText ( itemtype => l_item_type,
1179: itemkey => l_item_key,
1180: aname => 'NEW_MFG_CAPACITY_TABLE');
1181:
1182: x_new_capacity_tolerance_table := wf_engine.GetItemAttrText ( itemtype => l_item_type,
1178: x_new_mfg_capacity_table := wf_engine.GetItemAttrText ( itemtype => l_item_type,
1179: itemkey => l_item_key,
1180: aname => 'NEW_MFG_CAPACITY_TABLE');
1181:
1182: x_new_capacity_tolerance_table := wf_engine.GetItemAttrText ( itemtype => l_item_type,
1183: itemkey => l_item_key,
1184: aname => 'NEW_CAPACITY_TOLERANCE_TABLE');
1185:
1186:
1241: l_document := l_document || '' || NL;
1242:
1243: generate_header(l_document,l_item_type,l_item_key);
1244:
1245: x_new_mfg_capacity_table := wf_engine.GetItemAttrText ( itemtype => l_item_type,
1246: itemkey => l_item_key,
1247: aname => 'NEW_MFG_CAPACITY_TABLE');
1248:
1249: x_new_capacity_tolerance_table := wf_engine.GetItemAttrText ( itemtype => l_item_type,
1245: x_new_mfg_capacity_table := wf_engine.GetItemAttrText ( itemtype => l_item_type,
1246: itemkey => l_item_key,
1247: aname => 'NEW_MFG_CAPACITY_TABLE');
1248:
1249: x_new_capacity_tolerance_table := wf_engine.GetItemAttrText ( itemtype => l_item_type,
1250: itemkey => l_item_key,
1251: aname => 'NEW_CAPACITY_TOLERANCE_TABLE');
1252:
1253: