[Home] [Help]
1237: x_progress := 40;
1238:
1239: /* 958792 kbenjami 8/25/99. Proprogated fix from R11.
1240: 849493 - SVAIDYAN: Do a sum(round()) instead of round(sum()) since what
1241: we pass to GL is the round of individual dist. amounts
1242: and the sum of these rounded values is what should be
1243: displayed as the header total.
1244: */
1245: --
1367: rate conversion */
1368:
1369: /* 958792 kbenjami 8/25/99. Proprogated fix from R11.
1370: 849493 - SVAIDYAN: Do a sum(round()) instead of round(sum()) since what
1371: we pass to GL is the round of individual dist. amounts
1372: and the sum of these rounded values is what should be
1373: displayed as the header total.
1374: */
1375:
1504: x_progress := 90;
1505:
1506: /* 958792 kbenjami 8/25/99. Proprogated fix from R11.
1507: 849493 - SVAIDYAN: Do a sum(round()) instead of round(sum()) since what
1508: we pass to GL is the round of individual dist. amounts
1509: and the sum of these rounded values is what should be
1510: displayed as the header total.
1511: */
1512: --< Bug 3549096 > Use _ALL tables instead of org-striped views.
1593: AND C.currency_code = PH.CURRENCY_CODE;
1594:
1595: /* 958792 kbenjami 8/25/99. Proprogated fix from R11.
1596: 849493 - SVAIDYAN: Do a sum(round()) instead of round(sum()) since what
1597: we pass to GL is the round of individual dist. amounts
1598: and the sum of these rounded values is what should be
1599: displayed as the header total.
1600: */
1601: if x_min_unit is null then
1859: one distribution exists. */
1860:
1861: /* 958792 kbenjami 8/25/99. Proprogated fix from R11.
1862: 849493 - SVAIDYAN: Do a sum(round()) instead of round(sum()) since what
1863: we pass to GL is the round of individual dist. amounts
1864: and the sum of these rounded values is what should be
1865: displayed as the header total.
1866: */
1867: /*Bug3760487:Purchase Order form was displaying incorrect released
1962: else
1963:
1964: /* 958792 kbenjami 8/25/99. Proprogated fix from R11.
1965: 849493 - SVAIDYAN: Do a sum(round()) instead of round(sum()) since what
1966: we pass to GL is the round of individual dist. amounts
1967: and the sum of these rounded values is what should be
1968: displayed as the header total.
1969: */
1970: x_progress := 174;
2085: x_progress := 210;
2086:
2087: /* 958792 kbenjami 8/25/99. Proprogated fix from R11.
2088: 849493 - SVAIDYAN: Do a sum(round()) instead of round(sum()) since what
2089: we pass to GL is the round of individual dist. amounts
2090: and the sum of these rounded values is what should be
2091: displayed as the header total.
2092: */
2093: --
2201: if x_min_unit is null then
2202:
2203: /* 958792 kbenjami 8/25/99. Proprogated fix from R11.
2204: 849493 - SVAIDYAN: Do a sum(round()) instead of round(sum()) since what
2205: we pass to GL is the round of individual dist. amounts
2206: and the sum of these rounded values is what should be
2207: displayed as the header total.
2208: */
2209: x_progress := 222;
2919: if l_min_unit is null then
2920:
2921: /* 958792 kbenjami 8/25/99. Proprogated fix from R11.
2922: 849493 - SVAIDYAN: Do a sum(round()) instead of round(sum()) since what
2923: we pass to GL is the round of individual dist. amounts
2924: and the sum of these rounded values is what should be
2925: displayed as the header total.
2926: */
2927: l_progress := '222';
5895: l_progress := '010';
5896:
5897: SELECT 'N'
5898: into l_duplicate_exists
5899: from sys.dual
5900: where not exists
5901: (SELECT 'po number is not unique'
5902: FROM po_headers_all ph
5903: WHERE ph.segment1 = p_segment1
5908: l_Progress := '020';
5909:
5910: SELECT 'N'
5911: into l_duplicate_exists
5912: from sys.dual
5913: where not exists
5914: (SELECT 'po number is not unique'
5915: FROM po_history_pos_all ph
5916: WHERE ph.segment1 = p_segment1
5943: l_progress := '030';
5944:
5945: SELECT 'N'
5946: into l_duplicate_exists
5947: from sys.dual
5948: where not exists
5949: (SELECT 'rfq number is not unique'
5950: FROM po_headers_all ph
5951: WHERE ph.segment1 = p_segment1
5955: l_Progress := '040';
5956:
5957: SELECT 'N'
5958: into l_duplicate_exists
5959: from sys.dual
5960: where not exists
5961: (SELECT 'rfq number is not unique'
5962: FROM po_history_pos_all ph
5963: WHERE ph.segment1 = p_segment1
5975: l_progress := '050';
5976:
5977: SELECT 'N'
5978: into l_duplicate_exists
5979: from sys.dual
5980: where not exists
5981: (SELECT 'quote number is not unique'
5982: FROM po_headers_all ph
5983: WHERE ph.segment1 = p_segment1
5987: l_Progress := '060';
5988:
5989: SELECT 'N'
5990: into l_duplicate_exists
5991: from sys.dual
5992: where not exists
5993: (SELECT 'quote number is not unique'
5994: FROM po_history_pos_all ph
5995: WHERE ph.segment1 = p_segment1
6538: , PO_REQUISITION_LINES_ALL PRL
6539: , (
6540: SELECT
6541: p_doc_level_id dist_id
6542: FROM DUAL
6543: WHERE p_doc_level = g_doc_level_DISTRIBUTION
6544: UNION ALL
6545: SELECT
6546: PRD1.distribution_id dist_id
7151: l_progress := '010';
7152:
7153: SELECT PO_SESSION_GT_S.nextval
7154: INTO x_nextval
7155: FROM DUAL
7156: ;
7157:
7158: l_progress := '900';
7159: