540: REM CALLED BY
541: REM process_po, process_po_line, process_po_shipment_line
542: REM +================================================================================================+
543: */
544: PROCEDURE process_po_tax_wrapper (prec_po_header IN po_headers_all%ROWTYPE DEFAULT NULL--Added by Wenqiong for bug16288154
545: ,prec_po_line IN PO_LINES_ALL%ROWTYPE DEFAULT NULL
546: ,prec_po_location IN PO_LINE_LOCATIONS_ALL%ROWTYPE DEFAULT NULL
547: ,pv_retro_price_flag IN VARCHAR2 DEFAULT 'N'
548: )
577: v_type_lookup_code VARCHAR2(25);
578: v_uom_code VARCHAR2(25);
579:
580: v_quot_class_code VARCHAR2(25);
581: v_vendor_id PO_HEADERS_ALL.vendor_id%TYPE;
582: v_vendor_site_id PO_HEADERS_ALL.vendor_site_id%TYPE;
583: v_currency PO_HEADERS_ALL.currency_code%TYPE;
584: v_default_curr PO_HEADERS_ALL.currency_code%TYPE;
585: v_currency_conv_rate PO_HEADERS_ALL.rate%TYPE;
578: v_uom_code VARCHAR2(25);
579:
580: v_quot_class_code VARCHAR2(25);
581: v_vendor_id PO_HEADERS_ALL.vendor_id%TYPE;
582: v_vendor_site_id PO_HEADERS_ALL.vendor_site_id%TYPE;
583: v_currency PO_HEADERS_ALL.currency_code%TYPE;
584: v_default_curr PO_HEADERS_ALL.currency_code%TYPE;
585: v_currency_conv_rate PO_HEADERS_ALL.rate%TYPE;
586:
579:
580: v_quot_class_code VARCHAR2(25);
581: v_vendor_id PO_HEADERS_ALL.vendor_id%TYPE;
582: v_vendor_site_id PO_HEADERS_ALL.vendor_site_id%TYPE;
583: v_currency PO_HEADERS_ALL.currency_code%TYPE;
584: v_default_curr PO_HEADERS_ALL.currency_code%TYPE;
585: v_currency_conv_rate PO_HEADERS_ALL.rate%TYPE;
586:
587: v_line_amt NUMBER;
580: v_quot_class_code VARCHAR2(25);
581: v_vendor_id PO_HEADERS_ALL.vendor_id%TYPE;
582: v_vendor_site_id PO_HEADERS_ALL.vendor_site_id%TYPE;
583: v_currency PO_HEADERS_ALL.currency_code%TYPE;
584: v_default_curr PO_HEADERS_ALL.currency_code%TYPE;
585: v_currency_conv_rate PO_HEADERS_ALL.rate%TYPE;
586:
587: v_line_amt NUMBER;
588:
581: v_vendor_id PO_HEADERS_ALL.vendor_id%TYPE;
582: v_vendor_site_id PO_HEADERS_ALL.vendor_site_id%TYPE;
583: v_currency PO_HEADERS_ALL.currency_code%TYPE;
584: v_default_curr PO_HEADERS_ALL.currency_code%TYPE;
585: v_currency_conv_rate PO_HEADERS_ALL.rate%TYPE;
586:
587: v_line_amt NUMBER;
588:
589: v_conv_rate_type PO_HEADERS_ALL.rate_type%TYPE;
585: v_currency_conv_rate PO_HEADERS_ALL.rate%TYPE;
586:
587: v_line_amt NUMBER;
588:
589: v_conv_rate_type PO_HEADERS_ALL.rate_type%TYPE;
590: v_conv_rate_date PO_HEADERS_ALL.rate_date%TYPE;
591: v_conv_rate PO_HEADERS_ALL.rate%TYPE;
592: v_gl_set_of_bks_id gl_sets_of_books.set_of_books_id%type ;
593: flag VARCHAR2(10);
586:
587: v_line_amt NUMBER;
588:
589: v_conv_rate_type PO_HEADERS_ALL.rate_type%TYPE;
590: v_conv_rate_date PO_HEADERS_ALL.rate_date%TYPE;
591: v_conv_rate PO_HEADERS_ALL.rate%TYPE;
592: v_gl_set_of_bks_id gl_sets_of_books.set_of_books_id%type ;
593: flag VARCHAR2(10);
594: v_tax_amount NUMBER;
587: v_line_amt NUMBER;
588:
589: v_conv_rate_type PO_HEADERS_ALL.rate_type%TYPE;
590: v_conv_rate_date PO_HEADERS_ALL.rate_date%TYPE;
591: v_conv_rate PO_HEADERS_ALL.rate%TYPE;
592: v_gl_set_of_bks_id gl_sets_of_books.set_of_books_id%type ;
593: flag VARCHAR2(10);
594: v_tax_amount NUMBER;
595: v_assessable_value NUMBER;
598: v_inv_org_id NUMBER;
599: CURSOR Check_Rfq_Quot_Cur(v_po_hdr_id NUMBER) IS
600: SELECT Type_Lookup_Code, Quotation_Class_Code,vendor_id, vendor_site_id
601: ,Currency_Code, Ship_To_Location_Id,rate_type, rate_date, rate
602: FROM Po_Headers_All
603: WHERE Po_Header_Id = v_po_hdr_id;
604:
605: CURSOR c_line_tax_modified_flag(c_po_line_id NUMBER) IS
606: SELECT tax_modified_flag
1025: -- Cursor definition for picking line_location_id from po_line_locations_all
1026: CURSOR Fetch_Line_Loc_Id_Cur IS
1027: SELECT jpll.Line_Location_Id
1028: FROM po_line_locations_all plla, JAI_PO_LINE_LOCATIONS jpll,
1029: po_lines_all pla, po_headers_all pha
1030: WHERE pha.po_header_id = pla.po_header_id
1031: AND jpll.line_location_id = plla.line_location_id
1032: AND pha.po_header_id = plla.po_header_id
1033: AND pla.po_line_id = plla.po_line_id
1039: /* move to function get_line_id since mutating error.
1040: -- Cursor definition for picking po_line_id from po_lines_all
1041: CURSOR fetch_line_id_cur IS
1042: SELECT pla.Po_Line_Id
1043: FROM po_lines_all pla, po_headers_all pha
1044: WHERE pha.Po_Header_Id = p_from_hdr_id
1045: AND pla.line_num = p_line_num
1046: AND pha.po_header_id =pla.po_header_id;*/
1047:
1143: WHERE Line_Location_Id = v_ln_loc_id;
1144:
1145: cursor fetch_vendor_id_cur IS
1146: select vendor_id,vendor_site_id
1147: from po_headers_all
1148: where po_header_id=p_po_hdr_id;
1149:
1150:
1151: fetch_ja_in_po_ln_loc_rec FETCH_JA_IN_PO_LN_LOC_CUR%ROWTYPE;
1360:
1361: v_tax_amt NUMBER;
1362: dummy NUMBER;
1363:
1364: v_vendor_id po_headers_all.vendor_id%TYPE;
1365: v_vendor_site_id po_headers_all.vendor_site_id%TYPE;
1366: v_currency po_headers_all.currency_code%TYPE;
1367: v_item_id po_lines_all.item_id%TYPE;
1368: v_assessable_value NUMBER;
1361: v_tax_amt NUMBER;
1362: dummy NUMBER;
1363:
1364: v_vendor_id po_headers_all.vendor_id%TYPE;
1365: v_vendor_site_id po_headers_all.vendor_site_id%TYPE;
1366: v_currency po_headers_all.currency_code%TYPE;
1367: v_item_id po_lines_all.item_id%TYPE;
1368: v_assessable_value NUMBER;
1369: v_vat_assess_value NUMBER;
1362: dummy NUMBER;
1363:
1364: v_vendor_id po_headers_all.vendor_id%TYPE;
1365: v_vendor_site_id po_headers_all.vendor_site_id%TYPE;
1366: v_currency po_headers_all.currency_code%TYPE;
1367: v_item_id po_lines_all.item_id%TYPE;
1368: v_assessable_value NUMBER;
1369: v_vat_assess_value NUMBER;
1370: v_tax_category_id_holder JAI_PO_LINE_LOCATIONS.tax_category_id%TYPE;
1411:
1412: CURSOR cur_vendor_curr
1413: IS
1414: SELECT vendor_id,vendor_site_id,currency_code
1415: FROM po_headers_all
1416: WHERE po_header_id = p_po_hdr_id;
1417:
1418: /* Replace it with separate function since trigger mutating
1419: CURSOR cur_item
1625: SELECT * FROM PO_LINES_ALL
1626: WHERE Po_Header_Id = pn_header_id;
1627:
1628: CURSOR c_po_header IS
1629: SELECT * FROM PO_HEADERS_ALL
1630: WHERE po_header_id = pn_header_id;
1631:
1632:
1633: CURSOR c_old_curr_vendor IS
1642:
1643: l_api_name CONSTANT VARCHAR2(30) := 'process_po';
1644: lv_action VARCHAR2(10);
1645: r_po_line PO_LINES_ALL%ROWTYPE;
1646: r_po_header PO_HEADERS_ALL%ROWTYPE;
1647:
1648: v_old_currency PO_HEADERS_ALL.currency_code%TYPE;
1649: v_old_vendor_id PO_HEADERS_ALL.vendor_id%TYPE;
1650:
1644: lv_action VARCHAR2(10);
1645: r_po_line PO_LINES_ALL%ROWTYPE;
1646: r_po_header PO_HEADERS_ALL%ROWTYPE;
1647:
1648: v_old_currency PO_HEADERS_ALL.currency_code%TYPE;
1649: v_old_vendor_id PO_HEADERS_ALL.vendor_id%TYPE;
1650:
1651: v_old_vendor_site_id PO_HEADERS_ALL.vendor_site_id%TYPE;
1652:
1645: r_po_line PO_LINES_ALL%ROWTYPE;
1646: r_po_header PO_HEADERS_ALL%ROWTYPE;
1647:
1648: v_old_currency PO_HEADERS_ALL.currency_code%TYPE;
1649: v_old_vendor_id PO_HEADERS_ALL.vendor_id%TYPE;
1650:
1651: v_old_vendor_site_id PO_HEADERS_ALL.vendor_site_id%TYPE;
1652:
1653:
1647:
1648: v_old_currency PO_HEADERS_ALL.currency_code%TYPE;
1649: v_old_vendor_id PO_HEADERS_ALL.vendor_id%TYPE;
1650:
1651: v_old_vendor_site_id PO_HEADERS_ALL.vendor_site_id%TYPE;
1652:
1653:
1654: v_curr VARCHAR2(100);
1655: v_Last_Upd_Dt Date;
1855: REM
1856: REM Parameter IN/OUT Type Required Description and Purpose
1857: REM -------------------- ------ ------------------------ ---------- ------------------------------------
1858: REM pn_line_id IN NUMBER Y Indiate which PO line is processed.
1859: REM pr_po_header IN PO_HEADERS_ALL%ROWTYPE N PO header info.
1860: REM pv_action IN VARCHAR2 Y Indiate action is inserting/updating.
1861: REM CALLED BY
1862: REM jai_po_proc_pkg.process_po
1863: REM +=========================================================================================================+
1861: REM CALLED BY
1862: REM jai_po_proc_pkg.process_po
1863: REM +=========================================================================================================+
1864: */
1865: PROCEDURE process_po_line (pn_line_id IN NUMBER,pr_po_header IN PO_HEADERS_ALL%ROWTYPE DEFAULT NULL, pv_action IN VARCHAR2) IS
1866:
1867: l_api_name CONSTANT VARCHAR2(30) := 'process_po_line';
1868: v_po_line_id NUMBER;
1869: v_po_hdr_id NUMBER;
1868: v_po_line_id NUMBER;
1869: v_po_hdr_id NUMBER;
1870: v_frm_hdr_id NUMBER;
1871: v_frm_po_line_id NUMBER;
1872: v_currency po_headers_all.Currency_Code%TYPE;
1873: v_type_lookup_code po_headers_all.type_lookup_code%TYPE;
1874: v_from_type_lookup_code po_headers_all.from_type_lookup_code%TYPE;
1875: v_quot_class_code po_headers_all.from_type_lookup_code%TYPE;
1876: v_qty NUMBER;
1869: v_po_hdr_id NUMBER;
1870: v_frm_hdr_id NUMBER;
1871: v_frm_po_line_id NUMBER;
1872: v_currency po_headers_all.Currency_Code%TYPE;
1873: v_type_lookup_code po_headers_all.type_lookup_code%TYPE;
1874: v_from_type_lookup_code po_headers_all.from_type_lookup_code%TYPE;
1875: v_quot_class_code po_headers_all.from_type_lookup_code%TYPE;
1876: v_qty NUMBER;
1877: v_price NUMBER;
1870: v_frm_hdr_id NUMBER;
1871: v_frm_po_line_id NUMBER;
1872: v_currency po_headers_all.Currency_Code%TYPE;
1873: v_type_lookup_code po_headers_all.type_lookup_code%TYPE;
1874: v_from_type_lookup_code po_headers_all.from_type_lookup_code%TYPE;
1875: v_quot_class_code po_headers_all.from_type_lookup_code%TYPE;
1876: v_qty NUMBER;
1877: v_price NUMBER;
1878: v_uom_code VARCHAR2(30);
1871: v_frm_po_line_id NUMBER;
1872: v_currency po_headers_all.Currency_Code%TYPE;
1873: v_type_lookup_code po_headers_all.type_lookup_code%TYPE;
1874: v_from_type_lookup_code po_headers_all.from_type_lookup_code%TYPE;
1875: v_quot_class_code po_headers_all.from_type_lookup_code%TYPE;
1876: v_qty NUMBER;
1877: v_price NUMBER;
1878: v_uom_code VARCHAR2(30);
1879: v_line_uom VARCHAR2(30);
1920: WHERE Line_Location_Id = cn_line_loc_id;
1921:
1922: CURSOR c_po_hdr(cn_po_hdr_id NUMBER) IS
1923: SELECT *
1924: FROM PO_HEADERS_ALL
1925: WHERE po_header_id = cn_po_hdr_id;
1926:
1927:
1928: -- Cursor definition for picking po_line_id from po_lines_all
1927:
1928: -- Cursor definition for picking po_line_id from po_lines_all
1929: CURSOR fetch_line_id_cur(p_from_hdr_id NUMBER, p_line_num NUMBER) IS
1930: SELECT pla.Po_Line_Id
1931: FROM po_lines_all pla, po_headers_all pha
1932: WHERE pha.Po_Header_Id = p_from_hdr_id
1933: AND pla.line_num = p_line_num
1934: AND pha.po_header_id =pla.po_header_id;
1935:
1932: WHERE pha.Po_Header_Id = p_from_hdr_id
1933: AND pla.line_num = p_line_num
1934: AND pha.po_header_id =pla.po_header_id;
1935:
1936: r_po_header PO_HEADERS_ALL%ROWTYPE;
1937: r_po_line PO_LINES_ALL%ROWTYPE;
1938: r_po_line_loc PO_LINE_LOCATIONS_ALL%ROWTYPE;
1939: r_jai_po_line_loc c_get_po_line_loc_details%ROWTYPE;
1940:
2198: REM
2199: REM Parameter IN/OUT Type Required Description and Purpose
2200: REM -------------------- ------ ------------------------ ---------- ------------------------------------
2201: REM pn_line_loc_id IN NUMBER Y Indiate which PO shipment line is processed.
2202: REM pr_po_header IN PO_HEADERS_ALL%ROWTYPE N PO header info.
2203: REM pr_po_line IN PO_LINES_ALL%ROWTYPE N PO line info.
2204: REM pv_action IN VARCHAR2 Y Indiate action is inserting/updating.
2205: REM CALLED BY
2206: REM jai_po_proc_pkg.process_po
2205: REM CALLED BY
2206: REM jai_po_proc_pkg.process_po
2207: REM +=========================================================================================================+
2208: */
2209: PROCEDURE process_po_shipment_line (pn_line_loc_id IN NUMBER,pr_po_header IN PO_HEADERS_ALL%ROWTYPE DEFAULT NULL,pr_po_line IN PO_LINES_ALL%ROWTYPE DEFAULT NULL, pv_action IN VARCHAR2) IS
2210: l_api_name CONSTANT VARCHAR2(30) := 'process_po_shipment_line';
2211: r_get_po_line_loc_details JAI_PO_LINE_LOCATIONS%ROWTYPE;
2212: po_line_loc_rec PO_LINE_LOCATIONS_ALL%ROWTYPE;
2213: old_po_line_loce_rec PO_LINE_LOCATIONS_ALL%ROWTYPE;
2277: WHERE Po_Header_Id = cn_po_hdr_id ;
2278:
2279: CURSOR c_po_hdr(cn_po_hdr_id NUMBER) IS
2280: SELECT *
2281: FROM PO_HEADERS_ALL
2282: WHERE po_header_id = cn_po_hdr_id;
2283:
2284: CURSOR c_po_line(cn_po_line_id NUMBER) IS
2285: SELECT *
2289: -- Cursor definition for picking line_location_id from po_line_locations_all
2290: CURSOR Fetch_Line_Loc_Id_Cur(p_from_hdr_id NUMBER,p_line_num NUMBER ,p_item_id NUMBER, p_ship_num NUMBER) IS
2291: SELECT jpll.Line_Location_Id
2292: FROM po_line_locations_all plla, JAI_PO_LINE_LOCATIONS jpll,
2293: po_lines_all pla, po_headers_all pha
2294: WHERE pha.po_header_id = pla.po_header_id
2295: AND jpll.line_location_id = plla.line_location_id
2296: AND pha.po_header_id = plla.po_header_id
2297: AND pla.po_line_id = plla.po_line_id
2299: AND pla.line_num = p_line_num
2300: AND pla.item_id = p_item_id
2301: AND plla.shipment_num = p_ship_num;
2302:
2303: r_po_header PO_HEADERS_ALL%ROWTYPE;
2304: r_po_line PO_LINES_ALL%ROWTYPE;
2305:
2306: BEGIN
2307:
3345: v_last_upd_login PO_DISTRIBUTIONS_ALL.Last_Update_Login%TYPE;
3346:
3347: v_line_location_id PO_DISTRIBUTIONS_ALL.line_location_id%TYPE;
3348:
3349: v_type_lookup_code po_headers_all.type_lookup_code%TYPE;
3350: v_Quot_Class_Code po_headers_all.Quotation_Class_Code%TYPE;
3351: v_Ship_Loc_Id po_headers_all.Ship_To_Location_Id%TYPE;
3352: v_vendor_id po_headers_all.Vendor_id%TYPE;
3353: v_vendor_site_id po_headers_all.vendor_Site_Id%TYPE;
3346:
3347: v_line_location_id PO_DISTRIBUTIONS_ALL.line_location_id%TYPE;
3348:
3349: v_type_lookup_code po_headers_all.type_lookup_code%TYPE;
3350: v_Quot_Class_Code po_headers_all.Quotation_Class_Code%TYPE;
3351: v_Ship_Loc_Id po_headers_all.Ship_To_Location_Id%TYPE;
3352: v_vendor_id po_headers_all.Vendor_id%TYPE;
3353: v_vendor_site_id po_headers_all.vendor_Site_Id%TYPE;
3354: v_curr po_headers_all.currency_code%TYPE;
3347: v_line_location_id PO_DISTRIBUTIONS_ALL.line_location_id%TYPE;
3348:
3349: v_type_lookup_code po_headers_all.type_lookup_code%TYPE;
3350: v_Quot_Class_Code po_headers_all.Quotation_Class_Code%TYPE;
3351: v_Ship_Loc_Id po_headers_all.Ship_To_Location_Id%TYPE;
3352: v_vendor_id po_headers_all.Vendor_id%TYPE;
3353: v_vendor_site_id po_headers_all.vendor_Site_Id%TYPE;
3354: v_curr po_headers_all.currency_code%TYPE;
3355: v_rate po_headers_all.rate%TYPE;
3348:
3349: v_type_lookup_code po_headers_all.type_lookup_code%TYPE;
3350: v_Quot_Class_Code po_headers_all.Quotation_Class_Code%TYPE;
3351: v_Ship_Loc_Id po_headers_all.Ship_To_Location_Id%TYPE;
3352: v_vendor_id po_headers_all.Vendor_id%TYPE;
3353: v_vendor_site_id po_headers_all.vendor_Site_Id%TYPE;
3354: v_curr po_headers_all.currency_code%TYPE;
3355: v_rate po_headers_all.rate%TYPE;
3356: v_rate_type po_headers_all.rate_type%TYPE;
3349: v_type_lookup_code po_headers_all.type_lookup_code%TYPE;
3350: v_Quot_Class_Code po_headers_all.Quotation_Class_Code%TYPE;
3351: v_Ship_Loc_Id po_headers_all.Ship_To_Location_Id%TYPE;
3352: v_vendor_id po_headers_all.Vendor_id%TYPE;
3353: v_vendor_site_id po_headers_all.vendor_Site_Id%TYPE;
3354: v_curr po_headers_all.currency_code%TYPE;
3355: v_rate po_headers_all.rate%TYPE;
3356: v_rate_type po_headers_all.rate_type%TYPE;
3357: v_rate_date po_headers_all.rate_date%TYPE;
3350: v_Quot_Class_Code po_headers_all.Quotation_Class_Code%TYPE;
3351: v_Ship_Loc_Id po_headers_all.Ship_To_Location_Id%TYPE;
3352: v_vendor_id po_headers_all.Vendor_id%TYPE;
3353: v_vendor_site_id po_headers_all.vendor_Site_Id%TYPE;
3354: v_curr po_headers_all.currency_code%TYPE;
3355: v_rate po_headers_all.rate%TYPE;
3356: v_rate_type po_headers_all.rate_type%TYPE;
3357: v_rate_date po_headers_all.rate_date%TYPE;
3358:
3351: v_Ship_Loc_Id po_headers_all.Ship_To_Location_Id%TYPE;
3352: v_vendor_id po_headers_all.Vendor_id%TYPE;
3353: v_vendor_site_id po_headers_all.vendor_Site_Id%TYPE;
3354: v_curr po_headers_all.currency_code%TYPE;
3355: v_rate po_headers_all.rate%TYPE;
3356: v_rate_type po_headers_all.rate_type%TYPE;
3357: v_rate_date po_headers_all.rate_date%TYPE;
3358:
3359: v_style_id po_headers_all.style_id%TYPE;
3352: v_vendor_id po_headers_all.Vendor_id%TYPE;
3353: v_vendor_site_id po_headers_all.vendor_Site_Id%TYPE;
3354: v_curr po_headers_all.currency_code%TYPE;
3355: v_rate po_headers_all.rate%TYPE;
3356: v_rate_type po_headers_all.rate_type%TYPE;
3357: v_rate_date po_headers_all.rate_date%TYPE;
3358:
3359: v_style_id po_headers_all.style_id%TYPE;
3360: v_override_flag JAI_CMN_VENDOR_SITES.override_flag%TYPE;
3353: v_vendor_site_id po_headers_all.vendor_Site_Id%TYPE;
3354: v_curr po_headers_all.currency_code%TYPE;
3355: v_rate po_headers_all.rate%TYPE;
3356: v_rate_type po_headers_all.rate_type%TYPE;
3357: v_rate_date po_headers_all.rate_date%TYPE;
3358:
3359: v_style_id po_headers_all.style_id%TYPE;
3360: v_override_flag JAI_CMN_VENDOR_SITES.override_flag%TYPE;
3361: v_tax_modified_flag JAI_PO_LINE_LOCATIONS.tax_modified_flag%TYPE;
3355: v_rate po_headers_all.rate%TYPE;
3356: v_rate_type po_headers_all.rate_type%TYPE;
3357: v_rate_date po_headers_all.rate_date%TYPE;
3358:
3359: v_style_id po_headers_all.style_id%TYPE;
3360: v_override_flag JAI_CMN_VENDOR_SITES.override_flag%TYPE;
3361: v_tax_modified_flag JAI_PO_LINE_LOCATIONS.tax_modified_flag%TYPE;
3362: */
3363: CURSOR c_dist IS
3370: /*CURSOR get_po_hdr(c_po_header_id number) IS
3371: SELECT type_lookup_code,Quotation_Class_Code,Ship_To_Location_Id,
3372: rate, rate_type, rate_date,currency_code,
3373: nvl(Vendor_id,0), nvl(vendor_Site_Id,0),style_id
3374: FROM po_headers_all
3375: WHERE po_header_id = v_po_hdr_id;
3376:
3377: CURSOR tax_override_flag_cur(c_supplier_id number, c_supp_site_id number) IS
3378: SELECT override_flag
4839: v_loc_count NUMBER;
4840:
4841: v_tax_category_id JAI_PO_TAXES.tax_category_id%TYPE;
4842: v_tax_category_id_holder JAI_PO_LINE_LOCATIONS.tax_category_id%TYPE;
4843: v_style_id po_headers_all.style_id%TYPE;
4844:
4845: ------------------------------>
4846: -- Check the vendor btn the vendor present in tax lines and that of suggested vendor in requisition lines
4847: -- If they are same or any one is null then insert po vendor else keep the vendor in tact.
4859: v_ship_to_location_id NUMBER;
4860: v_price_override PO_LINE_LOCATIONS_ALL.price_override%TYPE;
4861: v_unit_meas_lookup_code PO_LINE_LOCATIONS_ALL.unit_meas_lookup_code%TYPE;
4862: v_line_uom PO_LINES_ALL.unit_meas_lookup_code%TYPE;
4863: v_type_lookup_code PO_HEADERS_ALL.type_lookup_code%TYPE;
4864: v_quot_class_code PO_HEADERS_ALL.quotation_class_code%TYPE;
4865:
4866:
4867: CURSOR Fetch_Unit_Measure_Cur IS
4860: v_price_override PO_LINE_LOCATIONS_ALL.price_override%TYPE;
4861: v_unit_meas_lookup_code PO_LINE_LOCATIONS_ALL.unit_meas_lookup_code%TYPE;
4862: v_line_uom PO_LINES_ALL.unit_meas_lookup_code%TYPE;
4863: v_type_lookup_code PO_HEADERS_ALL.type_lookup_code%TYPE;
4864: v_quot_class_code PO_HEADERS_ALL.quotation_class_code%TYPE;
4865:
4866:
4867: CURSOR Fetch_Unit_Measure_Cur IS
4868: SELECT Unit_Meas_Lookup_Code
4878: CURSOR Fetch_Po_Vendor_Id_Cur( hdr_id IN NUMBER ) IS
4879: SELECT Vendor_Id, Vendor_SIte_Id, Currency_Code, Rate_Date, Rate_Type, Rate
4880: , type_lookup_code, quotation_class_code,
4881: style_id
4882: FROM Po_Headers_All
4883: WHERE Po_Header_Id = hdr_id;
4884:
4885:
4886:
5752: AND Tax_Type <> jai_constants.tax_type_tds; --'TDS';
5753:
5754: CURSOR Get_Assessable_Val_Cur IS
5755: SELECT Vendor_Id, Vendor_Site_Id, Currency_Code
5756: FROM Po_Headers_All
5757: WHERE Po_Header_Id = v_po_hdr_id;
5758:
5759: CURSOR Get_Item_Id_Cur IS
5760: SELECT Item_Id
5781: lv_last_upd_by NUMBER;
5782: lv_last_upd_login NUMBER;
5783: lv_price NUMBER;
5784: lv_org_id NUMBER ;
5785: lv_curr PO_HEADERS_ALL.CURRENCY_CODE%TYPE ;
5786: lv_conv_rate number ;
5787: lv_type_lookup_code VARCHAR2(30);
5788: lv_quot_class_code VARCHAR2(30);
5789: lv_rate PO_HEADERS_ALL.RATE%TYPE ;
5785: lv_curr PO_HEADERS_ALL.CURRENCY_CODE%TYPE ;
5786: lv_conv_rate number ;
5787: lv_type_lookup_code VARCHAR2(30);
5788: lv_quot_class_code VARCHAR2(30);
5789: lv_rate PO_HEADERS_ALL.RATE%TYPE ;
5790: lv_ship_to_location_id PO_HEADERS_ALL.ship_to_location_id%type ;
5791:
5792: lv_rate_type PO_HEADERS_ALL.RATE_TYPE%TYPE DEFAULT NULL ;
5793: lv_rate_date PO_HEADERS_ALL.RATE_DATE%TYPE DEFAULT NULL ;
5786: lv_conv_rate number ;
5787: lv_type_lookup_code VARCHAR2(30);
5788: lv_quot_class_code VARCHAR2(30);
5789: lv_rate PO_HEADERS_ALL.RATE%TYPE ;
5790: lv_ship_to_location_id PO_HEADERS_ALL.ship_to_location_id%type ;
5791:
5792: lv_rate_type PO_HEADERS_ALL.RATE_TYPE%TYPE DEFAULT NULL ;
5793: lv_rate_date PO_HEADERS_ALL.RATE_DATE%TYPE DEFAULT NULL ;
5794: lv_func_curr VARCHAR2(15);
5788: lv_quot_class_code VARCHAR2(30);
5789: lv_rate PO_HEADERS_ALL.RATE%TYPE ;
5790: lv_ship_to_location_id PO_HEADERS_ALL.ship_to_location_id%type ;
5791:
5792: lv_rate_type PO_HEADERS_ALL.RATE_TYPE%TYPE DEFAULT NULL ;
5793: lv_rate_date PO_HEADERS_ALL.RATE_DATE%TYPE DEFAULT NULL ;
5794: lv_func_curr VARCHAR2(15);
5795:
5796: flag1 VARCHAR2(10);
5789: lv_rate PO_HEADERS_ALL.RATE%TYPE ;
5790: lv_ship_to_location_id PO_HEADERS_ALL.ship_to_location_id%type ;
5791:
5792: lv_rate_type PO_HEADERS_ALL.RATE_TYPE%TYPE DEFAULT NULL ;
5793: lv_rate_date PO_HEADERS_ALL.RATE_DATE%TYPE DEFAULT NULL ;
5794: lv_func_curr VARCHAR2(15);
5795:
5796: flag1 VARCHAR2(10);
5797: lv_cum_flag VARCHAR2(20);
5807: FROM JAI_CMN_VENDOR_SITES
5808: WHERE vendor_id = c_vendor_id
5809: AND vendor_site_id = nvl(c_vendor_site_id,0) ;
5810:
5811: cursor fetch_vendor_id_cur(p_po_hdr_id po_headers_all.po_header_id%type ) IS
5812: select vendor_id,vendor_site_id , currency_code , rate ,RATE_TYPE , RATE_DATE ,ship_to_location_id
5813: from po_headers_all
5814: where po_header_id=p_po_hdr_id;
5815:
5809: AND vendor_site_id = nvl(c_vendor_site_id,0) ;
5810:
5811: cursor fetch_vendor_id_cur(p_po_hdr_id po_headers_all.po_header_id%type ) IS
5812: select vendor_id,vendor_site_id , currency_code , rate ,RATE_TYPE , RATE_DATE ,ship_to_location_id
5813: from po_headers_all
5814: where po_header_id=p_po_hdr_id;
5815:
5816: CURSOR Fetch_Dtls1_Cur( lineid IN NUMBER, linelocid IN NUMBER ) IS
5817: SELECT Price_Override ,Unit_Meas_Lookup_Code
6488: END get_func_currency;
6489:
6490: FUNCTION rfq_quotation_related
6491: (
6492: pr_po_header po_headers_all%ROWTYPE DEFAULT NULL
6493: ,pr_po_line po_lines_all%ROWTYPE DEFAULT NULL
6494: ,pr_po_line_loc po_line_locations_all%ROWTYPE DEFAULT NULL
6495: ) RETURN BOOLEAN IS
6496: lv_type_lookup_code po_headers_all.type_lookup_code%TYPE;
6492: pr_po_header po_headers_all%ROWTYPE DEFAULT NULL
6493: ,pr_po_line po_lines_all%ROWTYPE DEFAULT NULL
6494: ,pr_po_line_loc po_line_locations_all%ROWTYPE DEFAULT NULL
6495: ) RETURN BOOLEAN IS
6496: lv_type_lookup_code po_headers_all.type_lookup_code%TYPE;
6497: lv_from_type_lookup_code po_headers_all.from_type_lookup_code%TYPE;
6498: ln_from_line_id po_lines_all.from_line_id%TYPE;
6499: lb_related BOOLEAN := FALSE;
6500: CURSOR c_po_hdr(c_po_hdr_id NUMBER) IS
6493: ,pr_po_line po_lines_all%ROWTYPE DEFAULT NULL
6494: ,pr_po_line_loc po_line_locations_all%ROWTYPE DEFAULT NULL
6495: ) RETURN BOOLEAN IS
6496: lv_type_lookup_code po_headers_all.type_lookup_code%TYPE;
6497: lv_from_type_lookup_code po_headers_all.from_type_lookup_code%TYPE;
6498: ln_from_line_id po_lines_all.from_line_id%TYPE;
6499: lb_related BOOLEAN := FALSE;
6500: CURSOR c_po_hdr(c_po_hdr_id NUMBER) IS
6501: SELECT * FROM
6498: ln_from_line_id po_lines_all.from_line_id%TYPE;
6499: lb_related BOOLEAN := FALSE;
6500: CURSOR c_po_hdr(c_po_hdr_id NUMBER) IS
6501: SELECT * FROM
6502: PO_HEADERS_ALL
6503: WHERE po_header_id = c_po_hdr_id;
6504:
6505: CURSOR c_po_line(c_po_line_id NUMBER) IS
6506: SELECT * FROM
6506: SELECT * FROM
6507: PO_LINES_ALL
6508: WHERE po_line_id = c_po_line_id;
6509:
6510: r_po_hdr po_headers_all%ROWTYPE;
6511: r_po_line po_lines_all%ROWTYPE;
6512: l_api_name CONSTANT VARCHAR2(30) := 'ref_quotation_related';
6513: BEGIN
6514:
6567: v_po_line_id NUMBER;
6568: v_po_hdr_id NUMBER;
6569: v_frm_hdr_id NUMBER;
6570: v_frm_po_line_id NUMBER;
6571: v_currency po_headers_all.Currency_Code%TYPE;
6572: v_type_lookup_code po_headers_all.type_lookup_code%TYPE;
6573: v_from_type_lookup_code po_headers_all.from_type_lookup_code%TYPE;
6574: v_quot_class_code po_headers_all.from_type_lookup_code%TYPE;
6575: v_qty NUMBER;
6568: v_po_hdr_id NUMBER;
6569: v_frm_hdr_id NUMBER;
6570: v_frm_po_line_id NUMBER;
6571: v_currency po_headers_all.Currency_Code%TYPE;
6572: v_type_lookup_code po_headers_all.type_lookup_code%TYPE;
6573: v_from_type_lookup_code po_headers_all.from_type_lookup_code%TYPE;
6574: v_quot_class_code po_headers_all.from_type_lookup_code%TYPE;
6575: v_qty NUMBER;
6576: v_price NUMBER;
6569: v_frm_hdr_id NUMBER;
6570: v_frm_po_line_id NUMBER;
6571: v_currency po_headers_all.Currency_Code%TYPE;
6572: v_type_lookup_code po_headers_all.type_lookup_code%TYPE;
6573: v_from_type_lookup_code po_headers_all.from_type_lookup_code%TYPE;
6574: v_quot_class_code po_headers_all.from_type_lookup_code%TYPE;
6575: v_qty NUMBER;
6576: v_price NUMBER;
6577: v_uom_code VARCHAR2(30);
6570: v_frm_po_line_id NUMBER;
6571: v_currency po_headers_all.Currency_Code%TYPE;
6572: v_type_lookup_code po_headers_all.type_lookup_code%TYPE;
6573: v_from_type_lookup_code po_headers_all.from_type_lookup_code%TYPE;
6574: v_quot_class_code po_headers_all.from_type_lookup_code%TYPE;
6575: v_qty NUMBER;
6576: v_price NUMBER;
6577: v_uom_code VARCHAR2(30);
6578: v_line_uom VARCHAR2(30);
6586: v_Cre_By Number;
6587: v_Last_Upd_Dt Date;
6588: v_Last_Upd_By Number;
6589: v_Last_Upd_Login Number;
6590: r_po_header PO_HEADERS_ALL%ROWTYPE;
6591:
6592: CURSOR c_po_hdr(cn_po_hdr_id NUMBER) IS
6593: SELECT *
6594: FROM PO_HEADERS_ALL
6590: r_po_header PO_HEADERS_ALL%ROWTYPE;
6591:
6592: CURSOR c_po_hdr(cn_po_hdr_id NUMBER) IS
6593: SELECT *
6594: FROM PO_HEADERS_ALL
6595: WHERE po_header_id = cn_po_hdr_id;
6596:
6597: CURSOR Fetch_UOMCode_Cur( v_uom IN VARCHAR2 ) IS
6598: SELECT Uom_Code
6868: v_src_loc_id NUMBER;
6869: v_src_line_id NUMBER;
6870: CURSOR c_po_hdr(cn_po_hdr_id NUMBER) IS
6871: SELECT *
6872: FROM PO_HEADERS_ALL
6873: WHERE po_header_id = cn_po_hdr_id;
6874:
6875: CURSOR fetch_uomcode_cur IS
6876: SELECT uom_code
6886: SELECT COUNT(Line_Location_Id)
6887: FROM JAI_PO_LINE_LOCATIONS
6888: WHERE Po_Header_Id = cn_po_hdr_id ;
6889:
6890: r_po_header PO_HEADERS_ALL%ROWTYPE;
6891: r_po_line PO_LINES_ALL%ROWTYPE;
6892:
6893: l_api_name CONSTANT VARCHAR2(30) := 'process_quotation_line_loc';
6894: BEGIN
7159: END IF;
7160: app_exception.raise_exception;
7161:
7162: END process_quotation_line_loc;
7163: PROCEDURE process_vendor_change(prec_po_header IN PO_HEADERS_ALL%ROWTYPE,pn_old_vendor_id IN NUMBER)
7164: IS
7165: CURSOR Lines_Cur IS
7166: SELECT DISTINCT Po_Line_Id
7167: FROM JAI_PO_LINE_LOCATIONS
7194:
7195:
7196: r_po_line PO_LINES_ALL%ROWTYPE;
7197: r_po_line_loc PO_LINE_LOCATIONS_ALL%ROWTYPE;
7198: ln_po_header_id PO_HEADERS_ALL.PO_HEADER_ID%TYPE := prec_po_header.po_header_id;
7199: v_po_line_id PO_LINE_LOCATIONS_ALL.PO_LINE_ID%TYPE;
7200: v_line_loc_id PO_LINE_LOCATIONS_ALL.LINE_LOCATION_ID%TYPE;
7201:
7202:
7334: -- Cursor definition for picking line_location_id from po_line_locations_all
7335: CURSOR fetch_line_loc_id_cur IS
7336: SELECT jpll.line_location_id
7337: FROM po_line_locations_all plla, jai_po_line_locations jpll,
7338: po_lines_all pla, po_headers_all pha
7339: WHERE pha.po_header_id = pla.po_header_id AND
7340: jpll.line_location_id = plla.line_location_id AND
7341: pha.po_header_id = plla.po_header_id AND
7342: pla.po_line_id = plla.po_line_id AND pha.po_header_id = p_from_hdr_id AND
7371: ) RETURN NUMBER IS
7372: PRAGMA AUTONOMOUS_TRANSACTION;
7373: CURSOR fetch_line_id_cur IS
7374: SELECT pla.Po_Line_Id
7375: FROM po_lines_all pla, po_headers_all pha
7376: WHERE pha.Po_Header_Id = p_from_hdr_id
7377: AND pla.line_num = p_line_num
7378: AND pha.po_header_id =pla.po_header_id;
7379: l_api_name CONSTANT VARCHAR2(30) := 'get_line_id';
7662: CURSOR get_po_hdr(c_po_header_id number) IS
7663: SELECT type_lookup_code,Quotation_Class_Code,Ship_To_Location_Id,
7664: rate, rate_type, rate_date,currency_code,
7665: nvl(Vendor_id,0), nvl(vendor_Site_Id,0),style_id
7666: FROM po_headers_all
7667: WHERE po_header_id = c_po_header_id;
7668:
7669: CURSOR tax_override_flag_cur(c_supplier_id number, c_supp_site_id number) IS
7670: SELECT override_flag
7691: v_last_upd_login PO_DISTRIBUTIONS_ALL.Last_Update_Login%TYPE;
7692:
7693: v_line_location_id PO_DISTRIBUTIONS_ALL.line_location_id%TYPE;
7694:
7695: v_type_lookup_code po_headers_all.type_lookup_code%TYPE;
7696: v_Quot_Class_Code po_headers_all.Quotation_Class_Code%TYPE;
7697: v_Ship_Loc_Id po_headers_all.Ship_To_Location_Id%TYPE;
7698: v_vendor_id po_headers_all.Vendor_id%TYPE;
7699: v_vendor_site_id po_headers_all.vendor_Site_Id%TYPE;
7692:
7693: v_line_location_id PO_DISTRIBUTIONS_ALL.line_location_id%TYPE;
7694:
7695: v_type_lookup_code po_headers_all.type_lookup_code%TYPE;
7696: v_Quot_Class_Code po_headers_all.Quotation_Class_Code%TYPE;
7697: v_Ship_Loc_Id po_headers_all.Ship_To_Location_Id%TYPE;
7698: v_vendor_id po_headers_all.Vendor_id%TYPE;
7699: v_vendor_site_id po_headers_all.vendor_Site_Id%TYPE;
7700: v_curr po_headers_all.currency_code%TYPE;
7693: v_line_location_id PO_DISTRIBUTIONS_ALL.line_location_id%TYPE;
7694:
7695: v_type_lookup_code po_headers_all.type_lookup_code%TYPE;
7696: v_Quot_Class_Code po_headers_all.Quotation_Class_Code%TYPE;
7697: v_Ship_Loc_Id po_headers_all.Ship_To_Location_Id%TYPE;
7698: v_vendor_id po_headers_all.Vendor_id%TYPE;
7699: v_vendor_site_id po_headers_all.vendor_Site_Id%TYPE;
7700: v_curr po_headers_all.currency_code%TYPE;
7701: v_rate po_headers_all.rate%TYPE;
7694:
7695: v_type_lookup_code po_headers_all.type_lookup_code%TYPE;
7696: v_Quot_Class_Code po_headers_all.Quotation_Class_Code%TYPE;
7697: v_Ship_Loc_Id po_headers_all.Ship_To_Location_Id%TYPE;
7698: v_vendor_id po_headers_all.Vendor_id%TYPE;
7699: v_vendor_site_id po_headers_all.vendor_Site_Id%TYPE;
7700: v_curr po_headers_all.currency_code%TYPE;
7701: v_rate po_headers_all.rate%TYPE;
7702: v_rate_type po_headers_all.rate_type%TYPE;
7695: v_type_lookup_code po_headers_all.type_lookup_code%TYPE;
7696: v_Quot_Class_Code po_headers_all.Quotation_Class_Code%TYPE;
7697: v_Ship_Loc_Id po_headers_all.Ship_To_Location_Id%TYPE;
7698: v_vendor_id po_headers_all.Vendor_id%TYPE;
7699: v_vendor_site_id po_headers_all.vendor_Site_Id%TYPE;
7700: v_curr po_headers_all.currency_code%TYPE;
7701: v_rate po_headers_all.rate%TYPE;
7702: v_rate_type po_headers_all.rate_type%TYPE;
7703: v_rate_date po_headers_all.rate_date%TYPE;
7696: v_Quot_Class_Code po_headers_all.Quotation_Class_Code%TYPE;
7697: v_Ship_Loc_Id po_headers_all.Ship_To_Location_Id%TYPE;
7698: v_vendor_id po_headers_all.Vendor_id%TYPE;
7699: v_vendor_site_id po_headers_all.vendor_Site_Id%TYPE;
7700: v_curr po_headers_all.currency_code%TYPE;
7701: v_rate po_headers_all.rate%TYPE;
7702: v_rate_type po_headers_all.rate_type%TYPE;
7703: v_rate_date po_headers_all.rate_date%TYPE;
7704:
7697: v_Ship_Loc_Id po_headers_all.Ship_To_Location_Id%TYPE;
7698: v_vendor_id po_headers_all.Vendor_id%TYPE;
7699: v_vendor_site_id po_headers_all.vendor_Site_Id%TYPE;
7700: v_curr po_headers_all.currency_code%TYPE;
7701: v_rate po_headers_all.rate%TYPE;
7702: v_rate_type po_headers_all.rate_type%TYPE;
7703: v_rate_date po_headers_all.rate_date%TYPE;
7704:
7705: v_style_id po_headers_all.style_id%TYPE;
7698: v_vendor_id po_headers_all.Vendor_id%TYPE;
7699: v_vendor_site_id po_headers_all.vendor_Site_Id%TYPE;
7700: v_curr po_headers_all.currency_code%TYPE;
7701: v_rate po_headers_all.rate%TYPE;
7702: v_rate_type po_headers_all.rate_type%TYPE;
7703: v_rate_date po_headers_all.rate_date%TYPE;
7704:
7705: v_style_id po_headers_all.style_id%TYPE;
7706: v_override_flag JAI_CMN_VENDOR_SITES.override_flag%TYPE;
7699: v_vendor_site_id po_headers_all.vendor_Site_Id%TYPE;
7700: v_curr po_headers_all.currency_code%TYPE;
7701: v_rate po_headers_all.rate%TYPE;
7702: v_rate_type po_headers_all.rate_type%TYPE;
7703: v_rate_date po_headers_all.rate_date%TYPE;
7704:
7705: v_style_id po_headers_all.style_id%TYPE;
7706: v_override_flag JAI_CMN_VENDOR_SITES.override_flag%TYPE;
7707: v_tax_modified_flag JAI_PO_LINE_LOCATIONS.tax_modified_flag%TYPE;
7701: v_rate po_headers_all.rate%TYPE;
7702: v_rate_type po_headers_all.rate_type%TYPE;
7703: v_rate_date po_headers_all.rate_date%TYPE;
7704:
7705: v_style_id po_headers_all.style_id%TYPE;
7706: v_override_flag JAI_CMN_VENDOR_SITES.override_flag%TYPE;
7707: v_tax_modified_flag JAI_PO_LINE_LOCATIONS.tax_modified_flag%TYPE;
7708: v_count NUMBER;
7709: l_api_name CONSTANT VARCHAR2(200) := 'process_distribution_line';
7861: lv_process_flag VARCHAR2(10);
7862: lv_process_message VARCHAR2(2000);
7863: CURSOR c_po_hdr(cn_po_hdr_id NUMBER) IS
7864: SELECT *
7865: FROM PO_HEADERS_ALL
7866: WHERE po_header_id = cn_po_hdr_id;
7867:
7868: CURSOR fetch_uomcode_cur IS
7869: SELECT uom_code
7885: FROM JAI_PO_LINE_LOCATIONS
7886: WHERE line_location_id = p_line_location_id;
7887:
7888:
7889: r_po_header PO_HEADERS_ALL%ROWTYPE;
7890: r_po_line PO_LINES_ALL%ROWTYPE;
7891: r_get_po_line_loc_details JAI_PO_LINE_LOCATIONS%ROWTYPE;
7892: l_api_name CONSTANT VARCHAR2(30) := 'process_quotation_line_loc';
7893: BEGIN
8267: v_loc_count NUMBER;
8268:
8269: v_tax_category_id JAI_PO_TAXES.tax_category_id%TYPE;
8270: v_tax_category_id_holder JAI_PO_LINE_LOCATIONS.tax_category_id%TYPE;
8271: v_style_id po_headers_all.style_id%TYPE;
8272:
8273: ------------------------------>
8274: -- Check the vendor btn the vendor present in tax lines and that of suggested vendor in requisition lines
8275: -- If they are same or any one is null then insert po vendor else keep the vendor in tact.
8287: v_ship_to_location_id NUMBER;
8288: v_price_override PO_LINE_LOCATIONS_ALL.price_override%TYPE;
8289: v_unit_meas_lookup_code PO_LINE_LOCATIONS_ALL.unit_meas_lookup_code%TYPE;
8290: v_line_uom PO_LINES_ALL.unit_meas_lookup_code%TYPE;
8291: v_type_lookup_code PO_HEADERS_ALL.type_lookup_code%TYPE;
8292: v_quot_class_code PO_HEADERS_ALL.quotation_class_code%TYPE;
8293:
8294:
8295: CURSOR Fetch_Unit_Measure_Cur IS
8288: v_price_override PO_LINE_LOCATIONS_ALL.price_override%TYPE;
8289: v_unit_meas_lookup_code PO_LINE_LOCATIONS_ALL.unit_meas_lookup_code%TYPE;
8290: v_line_uom PO_LINES_ALL.unit_meas_lookup_code%TYPE;
8291: v_type_lookup_code PO_HEADERS_ALL.type_lookup_code%TYPE;
8292: v_quot_class_code PO_HEADERS_ALL.quotation_class_code%TYPE;
8293:
8294:
8295: CURSOR Fetch_Unit_Measure_Cur IS
8296: SELECT Unit_Meas_Lookup_Code
8306: CURSOR Fetch_Po_Vendor_Id_Cur( hdr_id IN NUMBER ) IS
8307: SELECT Vendor_Id, Vendor_SIte_Id, Currency_Code, Rate_Date, Rate_Type, Rate
8308: , type_lookup_code, quotation_class_code,
8309: style_id
8310: FROM Po_Headers_All
8311: WHERE Po_Header_Id = hdr_id;
8312:
8313:
8314: