[Home] [Help]
466: x_bid_number pon_bid_headers.bid_number%type;
467: x_order_number pon_bid_headers.order_number%type;
468: x_award_quantity pon_bid_item_prices.award_quantity%type;
469: x_line_award_status pon_auction_item_prices_all.award_status%type;
470: x_stored_note_to_rejected pon_acceptances.reason%type;
471: x_error_code VARCHAR2(20);
472:
473: x_bid_number_list integerList;
474: x_bid_number_found BOOLEAN;
521: null -- p_billType: obsolete
522: );
523: */
524: -- added for the new award flow in FPJ
525: -- Need to take care of notes in pon_acceptances.
526: update_single_bid_item_prices
527: (
528: x_bid_number,
529: x_line_number,
566: ELSE
567: -- Update acceptances for the lines with award decision already made
568: x_stored_note_to_rejected := null;
569: x_count := 0;
570: SELECT count(*) INTO x_count FROM pon_acceptances
571: WHERE auction_header_id = p_auction_header_id
572: AND line_number = x_line_number
573: AND ACCEPTANCE_TYPE = 'REJECTED';
574: --
574: --
575: IF x_count > 0 THEN
576: -- rejection note exists and carried over for rejected suppliers
577: SELECT distinct REASON INTO x_stored_note_to_rejected
578: FROM pon_acceptances
579: WHERE auction_header_id = p_auction_header_id
580: AND line_number = x_line_number
581: AND ACCEPTANCE_TYPE = 'REJECTED';
582: END IF;
1787: update_auction_headers(p_auction_header_id, p_mode, l_award_date, p_auctioneer_id, l_neg_has_lines);
1788:
1789: IF l_neg_has_lines = 'Y' THEN -- FPK: CPA
1790:
1791: bulk_update_pon_acceptances(
1792: p_auction_header_id,
1793: null, null, null,
1794: l_award_date, p_auctioneer_id, p_mode);
1795: END IF;
1801: update_single_bid_header(l_bid_list(l_index),p_auctioneer_id);
1802: END LOOP;
1803: update_auction_item_prices(p_auction_header_id,p_line_num, l_award_date, p_auctioneer_id, p_mode);
1804: update_auction_headers(p_auction_header_id, p_mode, l_award_date, p_auctioneer_id, l_neg_has_lines);
1805: bulk_update_pon_acceptances(
1806: p_auction_header_id, p_line_num,
1807: p_note_to_accepted, p_note_to_rejected,
1808: l_award_date, p_auctioneer_id, p_mode);
1809:
3097: --
3098: END update_award_agreement_amount;
3099: --
3100: --
3101: PROCEDURE bulk_update_pon_acceptances
3102: ( p_auction_header_id IN NUMBER,
3103: p_line_number IN NUMBER,
3104: p_note_to_accepted IN VARCHAR2,
3105: p_note_to_rejected IN VARCHAR2,
3113: IF (p_mode = g_AWARD_GROUP OR p_mode = g_AWARD_GROUP_H) THEN
3114: -- Group Level Awards
3115: -- Insert empty notes for group lines
3116: -- Delete notes for a line
3117: DELETE FROM pon_acceptances
3118: WHERE auction_header_id = p_auction_header_id
3119: AND line_number IN (SELECT line_number FROM pon_auction_item_prices_all
3120: WHERE parent_line_number = p_line_number
3121: AND auction_header_id = p_auction_header_id);
3118: WHERE auction_header_id = p_auction_header_id
3119: AND line_number IN (SELECT line_number FROM pon_auction_item_prices_all
3120: WHERE parent_line_number = p_line_number
3121: AND auction_header_id = p_auction_header_id);
3122: INSERT INTO pon_acceptances (
3123: acceptance_id,
3124: auction_header_id,
3125: auction_line_number,
3126: bid_number,
3129: acceptance_date,
3130: reason,
3131: creation_date,
3132: created_by)
3133: SELECT pon_acceptances_s.nextval,
3134: bi.auction_header_id,
3135: bi.auction_line_number,
3136: bi.bid_number,
3137: bi.line_number,
3152: --
3153: ELSE
3154: -- Award Line Mode
3155: -- Delete notes for a line
3156: DELETE FROM pon_acceptances
3157: WHERE auction_header_id = p_auction_header_id
3158: AND line_number = p_line_number;
3159: INSERT INTO pon_acceptances (
3160: acceptance_id,
3155: -- Delete notes for a line
3156: DELETE FROM pon_acceptances
3157: WHERE auction_header_id = p_auction_header_id
3158: AND line_number = p_line_number;
3159: INSERT INTO pon_acceptances (
3160: acceptance_id,
3161: auction_header_id,
3162: auction_line_number,
3163: bid_number,
3166: acceptance_date,
3167: reason,
3168: creation_date,
3169: created_by)
3170: SELECT pon_acceptances_s.nextval,
3171: bi.auction_header_id,
3172: bi.auction_line_number,
3173: bi.bid_number,
3174: bi.line_number,
3190: END IF;
3191: ELSE
3192: -- Header Level Award
3193: -- Delete notes for an auction
3194: DELETE FROM pon_acceptances
3195: WHERE auction_header_id = p_auction_header_id;
3196: --
3197: INSERT INTO pon_acceptances (
3198: acceptance_id,
3193: -- Delete notes for an auction
3194: DELETE FROM pon_acceptances
3195: WHERE auction_header_id = p_auction_header_id;
3196: --
3197: INSERT INTO pon_acceptances (
3198: acceptance_id,
3199: auction_header_id,
3200: auction_line_number,
3201: bid_number,
3204: acceptance_date,
3205: reason,
3206: creation_date,
3207: created_by)
3208: SELECT pon_acceptances_s.nextval,
3209: bi.auction_header_id,
3210: bi.auction_line_number,
3211: bi.bid_number,
3212: bi.line_number,
3227: AND bi.auction_header_id = ai.auction_header_id
3228: AND bi.line_number = ai.line_number
3229: AND ai.group_type IN ('LOT', 'LINE', 'GROUP_LINE');
3230: END IF;
3231: END bulk_update_pon_acceptances;
3232: --
3233: --
3234: FUNCTION get_award_status (award_outcome IN VARCHAR2)
3235: RETURN VARCHAR2
3269: IS
3270: BEGIN
3271: -- Award Line Mode
3272: -- Delete rejected notes for a line
3273: DELETE FROM pon_acceptances
3274: WHERE auction_header_id = p_auction_header_id
3275: AND line_number = p_line_number
3276: AND acceptance_type = 'REJECTED';
3277: -- insert rejection note for all rejected suppliers
3274: WHERE auction_header_id = p_auction_header_id
3275: AND line_number = p_line_number
3276: AND acceptance_type = 'REJECTED';
3277: -- insert rejection note for all rejected suppliers
3278: INSERT INTO pon_acceptances (
3279: acceptance_id,
3280: auction_header_id,
3281: auction_line_number,
3282: bid_number,
3285: acceptance_date,
3286: reason,
3287: creation_date,
3288: created_by)
3289: SELECT pon_acceptances_s.nextval,
3290: bi.auction_header_id,
3291: bi.auction_line_number,
3292: bi.bid_number,
3293: bi.line_number,
3354: )
3355: AND auction_line_number <> -1; -- Unsolicited Lines Project : Donot clear unsolicited lines awarded.
3356:
3357: -- Delete All Awards since it is a header-level awarding
3358: DELETE FROM pon_acceptances
3359: WHERE auction_header_id = p_auction_header_id
3360: AND auction_line_number <> -1; -- Unsolicited Lines Project : Donot delete unsolicited lines records.
3361:
3362:
3387: AND (line_number = p_line_number
3388: OR parent_line_number = p_line_number));
3389:
3390: -- Delete All group line awards since it is a group-level awarding
3391: DELETE FROM pon_acceptances
3392: WHERE auction_header_id = p_auction_header_id
3393: AND line_number IN (SELECT line_number
3394: FROM pon_auction_item_prices_all
3395: WHERE auction_header_id = p_auction_header_id
3637: /* FPK: CPA p_neg_has_lines parameter hardcoded to 'Y' as save_award_recommendation
3638: procedure will only be called if negotiation has lines */
3639: update_auction_headers(l_auction_header_id, p_mode, l_award_date, p_auctioneer_id, 'Y');
3640:
3641: bulk_update_pon_acceptances(
3642: l_auction_header_id,
3643: null, null, null,
3644: l_award_date, p_auctioneer_id, p_mode);
3645: --
4165:
4166: update_auction_item_prices(p_auction_header_id, l_item_list(l_index), l_award_date, p_auctioneer_id, p_mode);
4167:
4168: -- update acceptances per auction line
4169: bulk_update_pon_acceptances (
4170: p_auction_header_id, l_item_list(l_index),
4171: l_accept_list(l_item_list(l_index)), l_reject_list(l_item_list(l_index)),
4172: l_award_date, p_auctioneer_id, p_mode);
4173:
5731: WHERE auction_header_id = p_auction_header_id
5732: AND Nvl(award_status, 'NO') = 'COMPLETED');
5733:
5734: -- Delete All Awards since it is a header-level awarding
5735: DELETE FROM pon_acceptances
5736: WHERE auction_header_id = p_auction_header_id
5737: AND auction_line_number <> -1 -- Unsolicited Lines Project : Donot delete unsolicited lines records.
5738: AND auction_line_number NOT IN (SELECT line_number
5739: FROM pon_auction_item_prices_all
5769: AND (line_number = p_line_number
5770: OR parent_line_number = p_line_number));
5771:
5772: -- Delete All group line awards since it is a group-level awarding
5773: DELETE FROM pon_acceptances
5774: WHERE auction_header_id = p_auction_header_id
5775: AND line_number IN (SELECT line_number
5776: FROM pon_auction_item_prices_all
5777: WHERE auction_header_id = p_auction_header_id