[Home] [Help]
1227: x_progress := 40;
1228:
1229: /* 958792 kbenjami 8/25/99. Proprogated fix from R11.
1230: 849493 - SVAIDYAN: Do a sum(round()) instead of round(sum()) since what
1231: we pass to GL is the round of individual dist. amounts
1232: and the sum of these rounded values is what should be
1233: displayed as the header total.
1234: */
1235: --
1352: rate conversion */
1353:
1354: /* 958792 kbenjami 8/25/99. Proprogated fix from R11.
1355: 849493 - SVAIDYAN: Do a sum(round()) instead of round(sum()) since what
1356: we pass to GL is the round of individual dist. amounts
1357: and the sum of these rounded values is what should be
1358: displayed as the header total.
1359: */
1360:
1489: x_progress := 90;
1490:
1491: /* 958792 kbenjami 8/25/99. Proprogated fix from R11.
1492: 849493 - SVAIDYAN: Do a sum(round()) instead of round(sum()) since what
1493: we pass to GL is the round of individual dist. amounts
1494: and the sum of these rounded values is what should be
1495: displayed as the header total.
1496: */
1497: --< Bug 3549096 > Use _ALL tables instead of org-striped views.
1578: AND C.currency_code = PH.CURRENCY_CODE;
1579:
1580: /* 958792 kbenjami 8/25/99. Proprogated fix from R11.
1581: 849493 - SVAIDYAN: Do a sum(round()) instead of round(sum()) since what
1582: we pass to GL is the round of individual dist. amounts
1583: and the sum of these rounded values is what should be
1584: displayed as the header total.
1585: */
1586: if x_min_unit is null then
1841: one distribution exists. */
1842:
1843: /* 958792 kbenjami 8/25/99. Proprogated fix from R11.
1844: 849493 - SVAIDYAN: Do a sum(round()) instead of round(sum()) since what
1845: we pass to GL is the round of individual dist. amounts
1846: and the sum of these rounded values is what should be
1847: displayed as the header total.
1848: */
1849: /*Bug3760487:Purchase Order form was displaying incorrect released
1883: else
1884:
1885: /* 958792 kbenjami 8/25/99. Proprogated fix from R11.
1886: 849493 - SVAIDYAN: Do a sum(round()) instead of round(sum()) since what
1887: we pass to GL is the round of individual dist. amounts
1888: and the sum of these rounded values is what should be
1889: displayed as the header total.
1890: */
1891: x_progress := 174;
1953: x_progress := 210;
1954:
1955: /* 958792 kbenjami 8/25/99. Proprogated fix from R11.
1956: 849493 - SVAIDYAN: Do a sum(round()) instead of round(sum()) since what
1957: we pass to GL is the round of individual dist. amounts
1958: and the sum of these rounded values is what should be
1959: displayed as the header total.
1960: */
1961: --
2069: if x_min_unit is null then
2070:
2071: /* 958792 kbenjami 8/25/99. Proprogated fix from R11.
2072: 849493 - SVAIDYAN: Do a sum(round()) instead of round(sum()) since what
2073: we pass to GL is the round of individual dist. amounts
2074: and the sum of these rounded values is what should be
2075: displayed as the header total.
2076: */
2077: x_progress := 222;
2787: if l_min_unit is null then
2788:
2789: /* 958792 kbenjami 8/25/99. Proprogated fix from R11.
2790: 849493 - SVAIDYAN: Do a sum(round()) instead of round(sum()) since what
2791: we pass to GL is the round of individual dist. amounts
2792: and the sum of these rounded values is what should be
2793: displayed as the header total.
2794: */
2795: l_progress := '222';
5687: l_progress := '010';
5688:
5689: SELECT 'N'
5690: into l_duplicate_exists
5691: from sys.dual
5692: where not exists
5693: (SELECT 'po number is not unique'
5694: FROM po_headers_all ph
5695: WHERE ph.segment1 = p_segment1
5700: l_Progress := '020';
5701:
5702: SELECT 'N'
5703: into l_duplicate_exists
5704: from sys.dual
5705: where not exists
5706: (SELECT 'po number is not unique'
5707: FROM po_history_pos_all ph
5708: WHERE ph.segment1 = p_segment1
5735: l_progress := '030';
5736:
5737: SELECT 'N'
5738: into l_duplicate_exists
5739: from sys.dual
5740: where not exists
5741: (SELECT 'rfq number is not unique'
5742: FROM po_headers_all ph
5743: WHERE ph.segment1 = p_segment1
5747: l_Progress := '040';
5748:
5749: SELECT 'N'
5750: into l_duplicate_exists
5751: from sys.dual
5752: where not exists
5753: (SELECT 'rfq number is not unique'
5754: FROM po_history_pos_all ph
5755: WHERE ph.segment1 = p_segment1
5767: l_progress := '050';
5768:
5769: SELECT 'N'
5770: into l_duplicate_exists
5771: from sys.dual
5772: where not exists
5773: (SELECT 'quote number is not unique'
5774: FROM po_headers_all ph
5775: WHERE ph.segment1 = p_segment1
5779: l_Progress := '060';
5780:
5781: SELECT 'N'
5782: into l_duplicate_exists
5783: from sys.dual
5784: where not exists
5785: (SELECT 'quote number is not unique'
5786: FROM po_history_pos_all ph
5787: WHERE ph.segment1 = p_segment1
6330: , PO_REQUISITION_LINES_ALL PRL
6331: , (
6332: SELECT
6333: p_doc_level_id dist_id
6334: FROM DUAL
6335: WHERE p_doc_level = g_doc_level_DISTRIBUTION
6336: UNION ALL
6337: SELECT
6338: PRD1.distribution_id dist_id
6943: l_progress := '010';
6944:
6945: SELECT PO_SESSION_GT_S.nextval
6946: INTO x_nextval
6947: FROM DUAL
6948: ;
6949:
6950: l_progress := '900';
6951: