[Home] [Help]
350: IF (l_Debug_Level <= 2) THEN
351: cln_debug_pub.Add('---- Entering PROCESS_HEADER API ----- ', 2);
352: END IF;
353:
354: -- Standard Start of API savepoint
355: SAVEPOINT CHECK_COLLABORATION_PUB;
356:
357: -- Initialize API return status to success
358: x_return_status := FND_API.G_RET_STS_SUCCESS;
569: cln_debug_pub.Add('PO Request Type is : ' || l_request_type,1);
570: END IF;
571:
572: -- Identify PO Type based on release number
573: l_po_type := 'STANDARD';
574:
575: IF (p_release_number IS NOT NULL AND p_release_number > 0) THEN
576: l_po_type := 'RELEASE';
577: END IF;
633: p_tp_id => l_tp_id, -- vendor_id
634: p_tp_site_id => l_tp_site_id, -- vendor_site_id
635: p_po_number => p_po_number, -- PO # of the PO being modified or the Blanket's PO #
636: p_release_number => p_release_number,-- Release number if the PO Type is release or null
637: p_po_type => l_po_type, -- PO Type?? -- RELEASE for release, STANDARD for others.
638: p_revision_num => NULL, -- Revision number of the PO or the release
639: p_ack_code => l_po_ackcode, -- 0 for accept/peding and 2 reject
640: p_ack_reason => p_note, -- comments
641: x_error_id => l_error_id, -- The error id will be 2, errors will go to the TP sysadmin
853: END IF;
854:
855: -- Identify PO Type based on release number
856:
857: l_po_type := 'STANDARD';
858:
859: IF (p_release_number IS NOT NULL AND p_release_number > 0) THEN
860: l_po_type := 'RELEASE';
861: END IF;
924: cln_debug_pub.Add('Previous and new line number are not same..',1);
925: END IF;
926: IF (p_previous_line_number <> p_line_number) THEN
927: IF (l_Debug_Level <= 1) THEN
928: cln_debug_pub.Add('Calling PO_CHG_REQUEST_GRP.store_supplier_request API For Standard PO',1);
929: cln_debug_pub.Add('Call is at Line Level......',1);
930: END IF;
931: p_previous_line_number := p_line_number;
932:
948: p_tp_site_id => p_tp_site_id,
949: p_level => 'LINE',
950: p_po_number => p_po_number,
951: p_release_number => p_release_number,
952: p_po_type => 'STANDARD',
953: p_revision_num => NULL,
954: p_line_num => p_line_number,
955: p_reason => p_reason,
956: p_shipment_num => p_shipment_number,
983: END IF;
984: END IF;
985:
986: IF (l_Debug_Level <= 1) THEN
987: cln_debug_pub.Add('Calling PO_CHG_REQUEST_GRP.store_supplier_request API For Standard PO',1);
988: cln_debug_pub.Add('Call is at Shipment Line Level......',1);
989: END IF;
990: PO_CHG_REQUEST_GRP.store_supplier_request (
991: p_requestor => p_requestor,
995: p_tp_site_id => p_tp_site_id,
996: p_level => 'SHIPMENT',
997: p_po_number => p_po_number,
998: p_release_number => p_release_number,
999: p_po_type => 'STANDARD',
1000: p_revision_num => NULL,
1001: p_line_num => p_line_number,
1002: p_reason => p_reason,
1003: p_shipment_num => p_shipment_number,
1577: IF (l_Debug_Level <= 2) THEN
1578: cln_debug_pub.Add('---- Entering PROCESS_HEADER API ----- ', 2);
1579: END IF;
1580:
1581: -- Standard Start of API savepoint
1582: SAVEPOINT CHECK_COLLABORATION_PUB;
1583:
1584: -- Initialize API return status to success
1585: x_return_status := FND_API.G_RET_STS_SUCCESS;
1752: cln_debug_pub.Add('PO Request Type is : ' || l_request_type,1);
1753: END IF;
1754:
1755: -- Identify PO Type based on release number
1756: l_po_type := 'STANDARD';
1757:
1758: IF (p_release_number IS NOT NULL AND p_release_number > 0) THEN
1759: l_po_type := 'RELEASE';
1760: END IF;
1816: p_tp_id => l_tp_id, -- vendor_id
1817: p_tp_site_id => l_tp_site_id, -- vendor_site_id
1818: p_po_number => p_po_number, -- PO # of the PO being modified or the Blanket's PO #
1819: p_release_number => p_release_number,-- Release number if the PO Type is release or null
1820: p_po_type => l_po_type, -- PO Type?? -- RELEASE for release, STANDARD for others.
1821: p_revision_num => NULL, -- Revision number of the PO or the release
1822: p_ack_code => l_po_ackcode, -- 0 for accept/peding and 2 reject
1823: p_ack_reason => p_note, -- comments
1824: x_error_id => l_error_id, -- The error id will be 2, errors will go to the TP sysadmin
2037: END IF;
2038:
2039: -- Identify PO Type based on release number
2040:
2041: l_po_type := 'STANDARD';
2042:
2043: IF (p_release_number IS NOT NULL AND p_release_number > 0) THEN
2044: l_po_type := 'RELEASE';
2045: END IF;
2108: cln_debug_pub.Add('Previous and new line number are not same..',1);
2109: END IF;
2110: IF (p_previous_line_number <> p_line_number) THEN
2111: IF (l_Debug_Level <= 1) THEN
2112: cln_debug_pub.Add('Calling PO_CHG_REQUEST_GRP.store_supplier_request API For Standard PO',1);
2113: cln_debug_pub.Add('Call is at Line Level......',1);
2114: END IF;
2115: p_previous_line_number := p_line_number;
2116:
2132: p_tp_site_id => p_tp_site_id,
2133: p_level => 'LINE',
2134: p_po_number => p_po_number,
2135: p_release_number => p_release_number,
2136: p_po_type => 'STANDARD',
2137: p_revision_num => NULL,
2138: p_line_num => p_line_number,
2139: p_reason => p_reason,
2140: p_shipment_num => p_shipment_number,
2167: END IF;
2168: END IF;
2169:
2170: IF (l_Debug_Level <= 1) THEN
2171: cln_debug_pub.Add('Calling PO_CHG_REQUEST_GRP.store_supplier_request API For Standard PO',1);
2172: cln_debug_pub.Add('Call is at Shipment Line Level......',1);
2173: END IF;
2174: PO_CHG_REQUEST_GRP.store_supplier_request (
2175: p_requestor => p_requestor,
2179: p_tp_site_id => p_tp_site_id,
2180: p_level => 'SHIPMENT',
2181: p_po_number => p_po_number,
2182: p_release_number => p_release_number,
2183: p_po_type => 'STANDARD',
2184: p_revision_num => NULL,
2185: p_line_num => p_line_number,
2186: p_reason => p_reason,
2187: p_shipment_num => p_shipment_number,