[Home] [Help]
1540: --check if the negotiation has requistion based line
1541: BEGIN
1542: SELECT 'REQUISITION'
1543: INTO x_requistion_based
1544: FROM DUAL
1545: WHERE EXISTS(
1546: SELECT '1'
1547: FROM pon_auction_item_prices_all
1548: WHERE auction_header_id = p_auction_header_id
1770: , pbip.recoupment_rate_percent
1771: , pbip.progress_pymt_rate_percent
1772: , pbip.retainage_rate_percent
1773: , pbip.bid_curr_max_retainage_amt
1774: , decode(pbip.has_bid_payments_flag, 'Y', decode((select 1 from dual where exists
1775: ( select 1 from pon_bid_payments_shipments where
1776: auction_header_id = pbip.auction_header_id and
1777: bid_number= pbip.bid_number and bid_line_number=pbip.line_number
1778: and bid_currency_price <> 0
1829: log_message(x_progress);
1830:
1831: SELECT po_headers_interface_s.nextval
1832: INTO x_interface_header_id
1833: FROM dual;
1834:
1835: OPEN headerLevelInfo;
1836: FETCH headerLevelInfo
1837: INTO x_pdoi_header;
2494: , pbip.recoupment_rate_percent
2495: , pbip.progress_pymt_rate_percent
2496: , pbip.retainage_rate_percent
2497: , pbip.Bid_curr_max_retainage_amt
2498: , decode(pbip.has_bid_payments_flag, 'Y', decode((select 1 from dual where exists
2499: ( select 1 from pon_bid_payments_shipments where
2500: auction_header_id = pbip.auction_header_id and
2501: bid_number= pbip.bid_number and bid_line_number=pbip.line_number
2502: and bid_currency_price <> 0
3377: l_cur_interface_line_id := descriptor.interface_line_id;
3378:
3379: select po_attr_values_interface_s.nextval
3380: into l_cur_attr_values_id
3381: from dual;
3382:
3383: select po_attr_values_tlp_interface_s.nextval
3384: into l_cur_attr_values_tlp_id
3385: from dual;
3381: from dual;
3382:
3383: select po_attr_values_tlp_interface_s.nextval
3384: into l_cur_attr_values_tlp_id
3385: from dual;
3386:
3387: l_cur_item_description := descriptor.item_description;
3388: l_cur_ip_category_id := descriptor.ip_category_id;
3389: l_cur_item_id := descriptor.item_id;
3944: /* Get the unique sequence to make sure item key will be unique */
3945:
3946: SELECT to_char(PO_WF_ITEMKEY_S.NEXTVAL)
3947: INTO x_seq_for_item_key
3948: FROM dual;
3949:
3950: SELECT employee_id
3951: INTO x_preparer_id
3952: FROM fnd_user
4598: --check if the negotiation has requistion based line
4599: BEGIN
4600: SELECT 'REQUISITION'
4601: INTO x_requistion_based
4602: FROM DUAL
4603: WHERE EXISTS(
4604: SELECT '1'
4605: FROM pon_auction_item_prices_all
4606: WHERE auction_header_id = p_auction_header_id
4843: -- Get next value in sequence for itemkey
4844:
4845: SELECT pon_auction_wf_createpo_s.nextval
4846: INTO x_sequence
4847: FROM dual;
4848:
4849: x_itemkey := (to_char(p_auction_header_id)||'-'||to_char(x_sequence));
4850:
4851: -- update pon_auction_headers_all.wf_poncompl_current_round by incrementing by one