[Home] [Help]
171: ,p_auction_tp_contact_name IN VARCHAR2) IS
172: BEGIN
173:
174: /* Setting the Company header attribute */
175: wf_engine.SetItemAttrText(itemtype => p_itemtype
176: ,itemkey => p_itemkey
177: ,aname => 'PREPARER_TP_NAME'
178: ,avalue => p_auction_tp_name);
179:
177: ,aname => 'PREPARER_TP_NAME'
178: ,avalue => p_auction_tp_name);
179:
180: /* Setting the negotiation title header attribute */
181: wf_engine.SetItemAttrText(itemtype => p_itemtype
182: ,itemkey => p_itemkey
183: ,aname => 'AUCTION_TITLE'
184: ,avalue => pon_auction_pkg.replaceHtmlChars(p_auction_title));
185:
183: ,aname => 'AUCTION_TITLE'
184: ,avalue => pon_auction_pkg.replaceHtmlChars(p_auction_title));
185:
186: /* Setting the negotiation document number attribute */
187: wf_engine.SetItemAttrText(itemtype => p_itemtype
188: ,itemkey => p_itemkey
189: ,aname => 'DOC_NUMBER'
190: ,avalue => p_document_number);
191:
189: ,aname => 'DOC_NUMBER'
190: ,avalue => p_document_number);
191:
192: /* Setting the #From role attribute */
193: wf_engine.SetItemAttrText (itemtype => p_itemtype
194: ,itemkey => p_itemkey
195: ,aname => 'PREPARER_TP_CONTACT_NAME'
196: ,avalue => p_auction_tp_contact_name);
197:
382: -- From now on, any new item attribute that gets created to hold auction id
383: -- in new item types should have its item attribute name named 'AUCTION_ID' for
384: -- consistency
385: IF (p_itemtype = 'PONAPPRV' or p_itemtype = 'PONAWAPR') THEN
386: x_auction_id := wf_engine.GetItemAttrNumber (itemtype => p_itemtype,
387: itemkey => p_itemkey,
388: aname => 'AUCTION_HEADER_ID');
389: ELSE
390: x_auction_id := wf_engine.GetItemAttrNumber (itemtype => p_itemtype,
386: x_auction_id := wf_engine.GetItemAttrNumber (itemtype => p_itemtype,
387: itemkey => p_itemkey,
388: aname => 'AUCTION_HEADER_ID');
389: ELSE
390: x_auction_id := wf_engine.GetItemAttrNumber (itemtype => p_itemtype,
391: itemkey => p_itemkey,
392: aname => 'AUCTION_ID');
393: END IF;
394: IF (p_itemtype = 'PONCNCT' ) THEN
391: itemkey => p_itemkey,
392: aname => 'AUCTION_ID');
393: END IF;
394: IF (p_itemtype = 'PONCNCT' ) THEN
395: x_request_id := wf_engine.GetItemAttrNumber (itemtype => p_itemtype,
396: itemkey => p_itemkey,
397: aname => 'REQUEST_ID');
398: x_documentnumber := wf_engine.GetItemAttrText (itemtype => p_itemtype,
399: itemkey => p_itemkey,
394: IF (p_itemtype = 'PONCNCT' ) THEN
395: x_request_id := wf_engine.GetItemAttrNumber (itemtype => p_itemtype,
396: itemkey => p_itemkey,
397: aname => 'REQUEST_ID');
398: x_documentnumber := wf_engine.GetItemAttrText (itemtype => p_itemtype,
399: itemkey => p_itemkey,
400: aname => 'DOC_NUMBER');
401: END IF;
402:
414: name = 'VENDOR_SITE_ID';
415:
416: ELSE
417:
418: x_site_id := wf_engine.GetItemAttrNumber (itemtype => p_itemtype,
419: itemkey => p_itemkey,
420: aname => 'VENDOR_SITE_ID');
421: END IF;
422:
424:
425: -- getting parameters needed to access View Quote page
426: -- constant parameters are being set in the NotificationLinkRedirectAMImpl.java
427: IF p_dest_page = 'PONRESENQ_VIEWBID' or p_dest_page = 'PONENQMGDR_MANAGEDRAFT' or p_dest_page = 'PONENQMGDR_MANAGEDRAFT_SURROG' THEN
428: x_bid_number := wf_engine.GetItemAttrNumber (itemtype => p_itemtype,
429: itemkey => p_itemkey,
430: aname => 'BID_ID');
431: END IF;
432:
432:
433: -- getting parameters needed to access Concurrent Errors page
434: -- constant parameters are being set in the NotificationLinkRedirectAMImpl.java
435: IF p_dest_page = 'PON_CONCURRENT_ERRORS' THEN
436: x_bid_number := wf_engine.GetItemAttrNumber (itemtype => p_itemtype,
437: itemkey => p_itemkey,
438: aname => 'BID_ID');
439: END IF;
440:
442:
443: -- getting parameters to access Allocation by Item or Allocation Summary pages
444: -- constant parameters are being set in the NotificationLinkRedirectAMImpl.java
445: IF (p_dest_page = 'PONCPOABI_ALLOCATEBYITEM' or p_dest_page = 'PONCPOSUM_ALLOCSUMMARY') THEN
446: x_doc_type_id := wf_engine.GetItemAttrNumber (itemtype => p_itemtype,
447: itemkey => p_itemkey,
448: aname => 'DOCTYPE_ID');
449: END IF;
450:
450:
451: -- getting parameters to access Review and Submit page
452: -- constant parameters are being set in the NotificationLinkRedirectAMImpl.java
453: IF (p_dest_page = 'PON_NEG_CRT_HEADER') THEN
454: x_reviewpg_redirect_func := wf_engine.GetItemAttrText (itemtype => p_itemtype,
455: itemkey => p_itemkey,
456: aname => 'REVIEWPG_REDIRECTFUNC');
457: END IF;
458:
457: END IF;
458:
459:
460: IF (p_dest_page = 'PON_VIEW_MESSAGE_DETAILS' ) THEN
461: x_entry_id := wf_engine.GetItemAttrNumber (itemtype => p_itemtype,
462: itemkey => p_itemkey,
463: aname => 'MESSAGE_ENTRY_ID');
464: x_message_type := wf_engine.GetItemAttrText (itemtype => p_itemtype,
465: itemkey => p_itemkey,
460: IF (p_dest_page = 'PON_VIEW_MESSAGE_DETAILS' ) THEN
461: x_entry_id := wf_engine.GetItemAttrNumber (itemtype => p_itemtype,
462: itemkey => p_itemkey,
463: aname => 'MESSAGE_ENTRY_ID');
464: x_message_type := wf_engine.GetItemAttrText (itemtype => p_itemtype,
465: itemkey => p_itemkey,
466: aname => 'MESSAGE_TYPE');
467: x_discussion_id := wf_engine.GetItemAttrNumber (itemtype => p_itemtype,
468: itemkey => p_itemkey,
463: aname => 'MESSAGE_ENTRY_ID');
464: x_message_type := wf_engine.GetItemAttrText (itemtype => p_itemtype,
465: itemkey => p_itemkey,
466: aname => 'MESSAGE_TYPE');
467: x_discussion_id := wf_engine.GetItemAttrNumber (itemtype => p_itemtype,
468: itemkey => p_itemkey,
469: aname => 'DISCUSSION_ID');
470: END IF;
471:
539: resultout out NOCOPY varchar2) IS
540:
541: BEGIN
542:
543: resultout := wf_engine.GetItemAttrText (itemtype => itemtype,
544: itemkey => itemkey,
545: aname => 'CONCPROGRAM_TYPE');
546:
547: END GetConcProgramType;
598:
599: l_msg_suffix := PON_AUCTION_PKG.get_message_suffix(l_doctype_group_name);
600: l_doctypemsgval := PON_AUCTION_PKG.getmessage('PON_AUCTION',l_msg_suffix);
601: if p_messagetype ='S' then
602: wf_engine.CreateProcess(itemtype => l_item_type,
603: itemkey => l_item_key,
604: process => 'REPORT_SUCCESS');
605:
606: else
603: itemkey => l_item_key,
604: process => 'REPORT_SUCCESS');
605:
606: else
607: wf_engine.CreateProcess(itemtype => l_item_type,
608: itemkey => l_item_key,
609: process => 'REPORT_FAILURE');
610: end if;
611: -- set standard notification header attributes
616: l_document_number,
617: l_trading_partner_contact_name);
618:
619: -- set other core attributes
620: wf_engine.SetItemAttrNumber(itemtype => l_item_type,
621: itemkey => l_item_key,
622: aname => 'AUCTION_ID',
623: avalue => p_auction_header_id);
624:
621: itemkey => l_item_key,
622: aname => 'AUCTION_ID',
623: avalue => p_auction_header_id);
624:
625: wf_engine.SetItemAttrNumber(itemtype => l_item_type,
626: itemkey => l_item_key,
627: aname => 'BID_ID',
628: avalue => p_bid_number);
629:
626: itemkey => l_item_key,
627: aname => 'BID_ID',
628: avalue => p_bid_number);
629:
630: wf_engine.SetItemAttrNumber(itemtype => l_item_type,
631: itemkey => l_item_key,
632: aname => 'REQUEST_ID',
633: avalue => p_request_id);
634:
631: itemkey => l_item_key,
632: aname => 'REQUEST_ID',
633: avalue => p_request_id);
634:
635: wf_engine.SetItemAttrText(itemtype => l_item_type,
636: itemkey => l_item_key,
637: aname => 'CONCPROGRAM_TYPE',
638: avalue => p_ProgramTypeCode);
639:
636: itemkey => l_item_key,
637: aname => 'CONCPROGRAM_TYPE',
638: avalue => p_ProgramTypeCode);
639:
640: wf_engine.SetItemAttrText(itemtype => l_item_type,
641: itemkey => l_item_key,
642: aname => 'DESTINATION_PAGE_CODE',
643: avalue => p_DestinationPageCode);
644:
641: itemkey => l_item_key,
642: aname => 'DESTINATION_PAGE_CODE',
643: avalue => p_DestinationPageCode);
644:
645: wf_engine.SetItemAttrText(itemtype => l_item_type,
646: itemkey => l_item_key,
647: aname => 'RECEPIENT_USERNAME',
648: avalue => p_RecepientUsername);
649:
646: itemkey => l_item_key,
647: aname => 'RECEPIENT_USERNAME',
648: avalue => p_RecepientUsername);
649:
650: wf_engine.SetItemAttrText(itemtype => l_item_type,
651: itemkey => l_item_key,
652: aname => 'DESTINATION_URL',
653: avalue => get_dest_page_url(p_dest_func=>p_DestinationPageCode,
654: p_notif_performer=>p_recepientType));
653: avalue => get_dest_page_url(p_dest_func=>p_DestinationPageCode,
654: p_notif_performer=>p_recepientType));
655:
656:
657: wf_engine.SetItemAttrText(itemtype => l_item_type,
658: itemkey => l_item_key,
659: aname => 'NOTIFICATION_SUBJECT',
660: avalue => PON_AUCTION_PKG.getMessage('PONCPG' || p_messagetype || '_' || p_ProgramTypeCode,
661: l_msg_suffix,
668: 'DOC_TITLE',
669: l_auction_title
670: ));
671:
672: wf_engine.SetItemAttrText(itemtype => l_item_type,
673: itemkey => l_item_key,
674: aname => 'MAX_SUCCESS_LAST_BATCH_LINE_NO',
675: avalue => to_char(p_max_good_line_num));
676:
674: aname => 'MAX_SUCCESS_LAST_BATCH_LINE_NO',
675: avalue => to_char(p_max_good_line_num));
676:
677:
678: wf_engine.SetItemAttrText(itemtype => l_item_type,
679: itemkey => l_item_key,
680: aname => 'LAST_SUCCESS_BATCH_WORKSHEET',
681: avalue => p_last_goodline_worksheet);
682:
679: itemkey => l_item_key,
680: aname => 'LAST_SUCCESS_BATCH_WORKSHEET',
681: avalue => p_last_goodline_worksheet);
682:
683: wf_engine.StartProcess(itemtype => l_item_type,
684: itemkey => l_item_key );
685: END ReportConcProgramStatus;
686:
687:
694:
695: BEGIN
696:
697: BEGIN
698: resultout := wf_engine.GetItemAttrText (itemtype => itemtype,
699: itemkey => itemkey,
700: aname => 'MAX_SUCCESS_LAST_BATCH_LINE_NO');
701: EXCEPTION
702: when others then resultout := -1;
713: uncmode in varchar2,
714: resultout out NOCOPY varchar2) IS
715: BEGIN
716: BEGIN
717: resultout := wf_engine.GetItemAttrText (
718: itemtype => itemtype,
719: itemkey => itemkey,
720: aname => 'LAST_SUCCESS_BATCH_WORKSHEET');
721: