129:
130: -- Determine the maximum line number for the negotiation
131: SELECT ah.max_internal_line_num
132: INTO l_max_line_number
133: FROM pon_auction_headers_all ah
134: WHERE ah.auction_header_id = p_auc_header_id;
135:
136: -- Define the initial batch range (line numbers are indexed from 1)
137: l_batch_start := 1;
431: -- the auction is pending or completed
432: -- ======================================================================
433: FUNCTION is_auction_request_pending
434: (
435: p_auc_header_id IN pon_auction_headers_all.auction_header_id%TYPE
436: ) RETURN VARCHAR2 IS
437: l_request_id pon_auction_headers_all.request_id%TYPE;
438: BEGIN
439:
433: FUNCTION is_auction_request_pending
434: (
435: p_auc_header_id IN pon_auction_headers_all.auction_header_id%TYPE
436: ) RETURN VARCHAR2 IS
437: l_request_id pon_auction_headers_all.request_id%TYPE;
438: BEGIN
439:
440: SELECT request_id
441: INTO l_request_id
438: BEGIN
439:
440: SELECT request_id
441: INTO l_request_id
442: FROM pon_auction_headers_all
443: WHERE auction_header_id = p_auc_header_id;
444:
445: IF (l_request_id IS null) THEN
446: RETURN 'N';
547:
548: SELECT '_' || dt.message_suffix
549: INTO l_suffix
550: FROM pon_auc_doctypes dt,
551: pon_auction_headers_all ah
552: WHERE dt.doctype_id = ah.doctype_id
553: AND ah.auction_header_id = p_auction_id
554: AND rownum =1;
555:
610:
611:
612: IF( IS_AUCTION_NOT_UPDATED( p_auction_id , p_last_update_date)) THEN
613:
614: UPDATE PON_AUCTION_HEADERS_ALL
615: SET
616: REQUEST_ID = p_request_id,
617: REQUESTED_BY = p_requested_by,
618: REQUEST_DATE = p_request_date,
691: l_return_value := TRUE;
692:
693: SELECT last_update_date
694: INTO l_current_update_date
695: FROM pon_auction_headers_all
696: WHERE auction_header_id = p_auction_header_id;
697:
698: IF (l_current_update_date = p_last_update_date) THEN
699: l_return_value := TRUE;
748: */
749:
750: delete from pon_auction_summary
751: where auction_id in (select auction_header_id
752: from pon_auction_headers_all
753: where last_update_date < sysdate - 7);
754:
755: retCode := '0';
756: errbuf := 'PURGE_INTERFACE_ERRORS_CP exited successfully';
787: BEGIN
788:
789: SELECT number_of_lines, trading_partner_id
790: INTO v_num_lines, v_tpid
791: FROM pon_auction_headers_all
792: WHERE auction_header_id = p_auction_header_id;
793:
794: BEGIN
795: SELECT to_number(preference_value)
824: BEGIN
825:
826: SELECT large_neg_enabled_flag
827: INTO v_large_neg_flag
828: FROM pon_auction_headers_all
829: WHERE auction_header_id = p_auction_header_id;
830:
831: IF (v_large_neg_flag = 'Y') THEN
832: RETURN TRUE;
849: -- It checks the complete flag
850: -- ======================================================================
851: FUNCTION IS_AUCTION_COMPLETE
852: (
853: p_auc_header_id IN pon_auction_headers_all.auction_header_id%TYPE
854: ) RETURN VARCHAR2
855: IS
856: v_complete_flag VARCHAR2(1) := 'N';
857: BEGIN
857: BEGIN
858:
859: SELECT nvl(complete_flag,'Y')
860: INTO v_complete_flag
861: FROM pon_auction_headers_all
862: WHERE auction_header_id = p_auc_header_id;
863:
864: RETURN v_complete_flag;
865:
877: -- is completed or not
878: -- ======================================================================
879: FUNCTION IS_REQUEST_COMPLETE
880: (
881: p_auc_header_id IN pon_auction_headers_all.auction_header_id%TYPE
882: ) RETURN VARCHAR2
883: IS
884: v_request_complete VARCHAR2(1) := 'Y';
885: l_request_id NUMBER;
891: l_success BOOLEAN;
892:
893: BEGIN
894: SELECT REQUEST_ID INTO l_request_id
895: FROM PON_AUCTION_HEADERS_ALL
896: WHERE AUCTION_HEADER_ID = p_auc_header_id;
897:
898: IF (l_request_id IS NULL) THEN
899: v_request_complete := 'Y';
979:
980:
981: -- Delete contract terms
982: select conterms_exist_flag into l_conterms_exist_flag
983: from pon_auction_headers_all
984: where auction_header_id = p_auc_header_id;
985:
986: if ( ( PON_CONTERMS_UTL_GRP.is_contracts_installed()= FND_API.G_TRUE ) and
987: l_conterms_exist_flag = 'Y' ) then