[Home] [Help]
159: /* Complex Work Start.
160: * We have a separate procedure derive_matching_basis
161: * to get the matching basis now. This is because we
162: * are going to get the matching_basis from
163: * po_line_locations and hence moved it from
164: * derive_po_line_info.
165: */
166: IF (g_asn_debug = 'Y') THEN
167: asn_debug.put_line('Before calling derive matching basis ');
229: pl.job_id,
230: pll.value_basis , --Complex Work
231: pl.purchase_basis,
232: pll.matching_basis --Complex Work
233: FROM po_line_locations pll,
234: po_lines pl,
235: po_headers ph
236: WHERE ph.po_header_id = pl.po_header_id
237: AND pl.po_line_id = pll.po_line_id
2560: * for use in all transaction types*/
2561: BEGIN
2562: SELECT drop_ship_flag
2563: INTO x_drop_ship_flag
2564: FROM po_line_locations_all
2565: WHERE line_location_id = x_cascaded_table(n).po_line_location_id;
2566: -- if no data found, do nothing
2567: EXCEPTION
2568: WHEN NO_DATA_FOUND THEN
2723: pll.ship_to_location_id,
2724: NVL(pll.enforce_ship_to_location_code, 'NONE') enforce_ship_to_location_code,
2725: TO_NUMBER(NULL) shipment_line_id, --shipment_line_id
2726: pl.item_id
2727: FROM po_line_locations pll,
2728: po_lines pl,
2729: po_headers ph
2730: WHERE ph.po_header_id = header_id
2731: AND pll.po_header_id = header_id
2756: v_ship_to_location_id NUMBER,
2757: v_vendor_product_num VARCHAR2
2758: ) IS
2759: SELECT COUNT(*)
2760: FROM po_line_locations pll,
2761: po_lines pl,
2762: po_headers ph
2763: WHERE ph.po_header_id = header_id
2764: AND pll.po_header_id = header_id
2779: AND NVL(pl.vendor_product_num, '-999') = NVL(v_vendor_product_num, NVL(pl.vendor_product_num, '-999'));
2780:
2781: /***** Bug # 1553154
2782: ***** There was a performance issue since the cursor COUNT_DISTRIBUTIONS
2783: ***** was driving through PO_LINE_LOCATIONS_ALL. Modified the Select
2784: ***** statement so that it will drive through PO_HEADERS_ALL
2785: ***** followed by PO_LINES_ALL which is followed by PO_LINE_LOCATIONS_ALL
2786: ***** so that there is an improvement in performance.
2787: *****/
2781: /***** Bug # 1553154
2782: ***** There was a performance issue since the cursor COUNT_DISTRIBUTIONS
2783: ***** was driving through PO_LINE_LOCATIONS_ALL. Modified the Select
2784: ***** statement so that it will drive through PO_HEADERS_ALL
2785: ***** followed by PO_LINES_ALL which is followed by PO_LINE_LOCATIONS_ALL
2786: ***** so that there is an improvement in performance.
2787: *****/
2788: CURSOR distributions(
2789: header_id NUMBER,
2836: NVL(pll.enforce_ship_to_location_code, 'NONE') enforce_ship_to_location_code,
2837: TO_NUMBER(NULL) shipment_line_id, -- shipment_line_id
2838: pl.item_id
2839: FROM po_distributions pod,
2840: po_line_locations pll,
2841: po_lines pl,
2842: po_headers ph
2843: WHERE ph.po_header_id = header_id
2844: AND pl.po_header_id = ph.po_header_id
2865: ***** There was a performance issue since the cursor DISTRIBUTIONS
2866: ***** was driving through PO_HEADERS_ALL followed by PO_DISTRIBUTIONS_ALL
2867: ***** Modified the Select statement so that it will drive through
2868: ***** PO_HEADERS_ALL followed by PO_LINES_ALL which is followed by
2869: ***** PO_LINE_LOCATIONS_ALL which in turn is followed by
2870: ***** PO_DISTRIBUTIONS_ALL so that there is an improvement in
2871: ***** Performance
2872: *****/
2873: CURSOR count_distributions(
2882: v_vendor_product_num VARCHAR2
2883: ) IS
2884: SELECT COUNT(*)
2885: FROM po_distributions pod,
2886: po_line_locations pll,
2887: po_lines pl,
2888: po_headers ph
2889: WHERE ph.po_header_id = header_id
2890: AND pl.po_header_id = ph.po_header_id
2927: x_first_trans BOOLEAN := TRUE;
2928: x_sysdate DATE := SYSDATE;
2929: current_n BINARY_INTEGER := 0;
2930: insert_into_table BOOLEAN := FALSE;
2931: x_qty_rcv_exception_code po_line_locations.qty_rcv_exception_code%TYPE;
2932: tax_amount_factor NUMBER;
2933: lastrecord BOOLEAN := FALSE;
2934: po_asn_uom_qty NUMBER;
2935: po_primary_uom_qty NUMBER;
3080: AND temp_cascaded_table(current_n).po_line_location_id IS NOT NULL THEN --{
3081: BEGIN
3082: SELECT shipment_num
3083: INTO temp_cascaded_table(current_n).document_shipment_line_num
3084: FROM po_line_locations
3085: WHERE line_location_id = temp_cascaded_table(current_n).po_line_location_id;
3086: EXCEPTION
3087: WHEN OTHERS THEN
3088: IF (g_asn_debug = 'Y') THEN
3113: Enter error message in po_interface_errors if the enforcement is "Warning"
3114: Enter error message in po_interface_errors if the enforcement is "Reject"
3115: and error out.
3116: This validation is done by comparing the enforce_ship_location_code from
3117: po_line_locations and assigning the proper ship_location_id into a
3118: temporary variable temp_mirror_ship_to_loc_id and passing the temp
3119: variable as a parameter to open the cursor "Distributions".
3120: */
3121: IF ( x_cascaded_table(n).transaction_type <> 'DELIVER'
3527: IF rows_fetched > 0
3528: AND NOT x_first_trans THEN --{
3529: -- we had got atleast some rows from our shipments cursor
3530: -- we have atleast one row cascaded (not null line_location_id)
3531: SELECT NVL(po_line_locations.qty_rcv_exception_code, 'NONE')
3532: INTO x_qty_rcv_exception_code
3533: FROM po_line_locations
3534: WHERE line_location_id = temp_cascaded_table(current_n).po_line_location_id;
3535:
3529: -- we had got atleast some rows from our shipments cursor
3530: -- we have atleast one row cascaded (not null line_location_id)
3531: SELECT NVL(po_line_locations.qty_rcv_exception_code, 'NONE')
3532: INTO x_qty_rcv_exception_code
3533: FROM po_line_locations
3534: WHERE line_location_id = temp_cascaded_table(current_n).po_line_location_id;
3535:
3536: IF (g_asn_debug = 'Y') THEN
3537: asn_debug.put_line('Qty tolerance exception code ' || NVL(x_qty_rcv_exception_code, 'NONE1'));
3715:
3716: IF (x_is_asn = FALSE) THEN --{
3717: SELECT COUNT(*)
3718: INTO x_temp_count
3719: FROM po_line_locations pll,
3720: po_lines pl,
3721: po_headers ph
3722: WHERE ph.po_header_id = temp_cascaded_table(current_n).po_header_id
3723: AND pll.po_header_id = ph.po_header_id
3757: x_shipment_type,
3758: x_ship_to_organization_id,
3759: x_ship_to_location_id,
3760: x_vendor_product_num
3761: FROM po_line_locations pll,
3762: po_lines pl,
3763: po_headers ph
3764: WHERE ph.po_header_id = temp_cascaded_table(current_n).po_header_id
3765: AND pll.po_header_id = ph.po_header_id
3790: IF (x_is_asn = FALSE) THEN --{
3791: SELECT COUNT(*)
3792: INTO x_temp_count
3793: FROM po_distributions pod,
3794: po_line_locations pll,
3795: po_lines pl,
3796: po_headers ph
3797: WHERE ph.po_header_id = temp_cascaded_table(current_n).po_header_id
3798: AND pll.po_header_id = ph.po_header_id
3835: x_ship_to_organization_id,
3836: x_ship_to_location_id,
3837: x_vendor_product_num
3838: FROM po_distributions pod,
3839: po_line_locations pll,
3840: po_lines pl,
3841: po_headers ph
3842: WHERE ph.po_header_id = temp_cascaded_table(current_n).po_header_id
3843: AND pll.po_header_id = ph.po_header_id
3889: x_vendor_product_num,
3890: l_receipt_source_code,
3891: l_shipment_line_status_code,
3892: l_asn_line_flag
3893: FROM po_line_locations pll,
3894: po_lines pl,
3895: po_headers ph,
3896: rcv_shipment_headers rsh,
3897: rcv_shipment_lines rsl
5274: '' ussgl_transaction_code,
5275: pll.ship_to_location_id,
5276: NVL(pll.enforce_ship_to_location_code, 'NONE') enforce_ship_to_location_code,
5277: pl.item_id
5278: FROM po_line_locations pll,
5279: po_lines pl,
5280: po_headers ph
5281: WHERE pl.po_line_id = v_po_line_id
5282: AND pll.po_line_id = v_po_line_id
5297: v_po_line_location_id NUMBER,
5298: v_po_release_id NUMBER
5299: ) IS
5300: SELECT COUNT(*)
5301: FROM po_line_locations pll,
5302: po_lines pl,
5303: po_headers ph
5304: WHERE pl.po_line_id = v_po_line_id
5305: AND pll.po_line_id = v_po_line_id
5355: pll.ship_to_location_id,
5356: NVL(pll.enforce_ship_to_location_code, 'NONE') enforce_ship_to_location_code,
5357: pl.item_id
5358: FROM po_distributions pod,
5359: po_line_locations pll,
5360: po_lines pl,
5361: po_headers ph
5362: WHERE pl.po_line_id = v_po_line_id
5363: AND pll.po_line_id = v_po_line_id
5382: v_po_release_id NUMBER
5383: ) IS
5384: SELECT COUNT(*)
5385: FROM po_distributions pod,
5386: po_line_locations pll,
5387: po_lines pl,
5388: po_headers ph
5389: WHERE pl.po_line_id = v_po_line_id
5390: AND pll.po_line_id = v_po_line_id
5420: x_first_trans BOOLEAN := TRUE;
5421: x_sysdate DATE := SYSDATE;
5422: current_n BINARY_INTEGER := 0;
5423: insert_into_table BOOLEAN := FALSE;
5424: x_qty_rcv_exception_code po_line_locations.qty_rcv_exception_code%TYPE;
5425: tax_amount_factor NUMBER;
5426: lastrecord BOOLEAN := FALSE;
5427: already_allocated_amt NUMBER := 0;
5428: x_release_id NUMBER;
5598: AND temp_cascaded_table(current_n).po_line_location_id IS NOT NULL THEN --{
5599: BEGIN
5600: SELECT shipment_num
5601: INTO temp_cascaded_table(current_n).document_shipment_line_num
5602: FROM po_line_locations
5603: WHERE line_location_id = temp_cascaded_table(current_n).po_line_location_id;
5604: EXCEPTION
5605: WHEN OTHERS THEN
5606: IF (g_asn_debug = 'Y') THEN
5631: Enter error message in po_interface_errors if the enforcement is "Warning"
5632: Enter error message in po_interface_errors if the enforcement is "Reject"
5633: and error out.
5634: This validation is done by comparing the enforce_ship_location_code from
5635: po_line_locations and assigning the proper ship_location_id into a
5636: temporary variable temp_mirror_ship_to_loc_id and passing the temp
5637: variable as a parameter to open the cursor "Distributions".
5638: */
5639: IF ( x_cascaded_table(n).transaction_type <> 'DELIVER'
5823: IF rows_fetched > 0
5824: AND NOT x_first_trans THEN --{
5825: -- we had got atleast some rows from our shipments cursor
5826: -- we have atleast one row cascaded (not null line_location_id)
5827: SELECT NVL(po_line_locations.qty_rcv_exception_code, 'NONE')
5828: INTO x_qty_rcv_exception_code
5829: FROM po_line_locations
5830: WHERE line_location_id = temp_cascaded_table(current_n).po_line_location_id;
5831:
5825: -- we had got atleast some rows from our shipments cursor
5826: -- we have atleast one row cascaded (not null line_location_id)
5827: SELECT NVL(po_line_locations.qty_rcv_exception_code, 'NONE')
5828: INTO x_qty_rcv_exception_code
5829: FROM po_line_locations
5830: WHERE line_location_id = temp_cascaded_table(current_n).po_line_location_id;
5831:
5832: IF (g_asn_debug = 'Y') THEN
5833: asn_debug.put_line('Qty tolerance exception code ' || NVL(x_qty_rcv_exception_code, 'NONE1'));
5940: SELECT COUNT(*)
5941: INTO x_temp_count
5942: FROM DUAL
5943: WHERE EXISTS(SELECT 1
5944: FROM po_line_locations pll,
5945: po_lines pl
5946: WHERE pl.po_line_id = temp_cascaded_table(current_n).po_line_id
5947: AND NVL(pll.po_release_id, 0) = NVL(temp_cascaded_table(current_n).po_release_id, NVL(pll.po_release_id, 0))
5948: AND pll.line_location_id = NVL(temp_cascaded_table(current_n).po_line_location_id, pll.line_location_id)
5963: x_approved_flag,
5964: x_cancel_flag,
5965: x_closed_code,
5966: x_shipment_type
5967: FROM po_line_locations pll,
5968: po_lines pl,
5969: po_headers ph
5970: WHERE ph.po_header_id = temp_cascaded_table(current_n).po_header_id
5971: AND pll.po_header_id = ph.po_header_id
5979: OR NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') = 'DELIVER') THEN --{
5980: SELECT COUNT(*)
5981: INTO x_temp_count
5982: FROM po_distributions pod,
5983: po_line_locations pll,
5984: po_lines pl,
5985: po_headers ph
5986: WHERE ph.po_header_id = temp_cascaded_table(current_n).po_header_id
5987: AND pll.po_header_id = ph.po_header_id
6008: x_cancel_flag,
6009: x_closed_code,
6010: x_shipment_type
6011: FROM po_distributions pod,
6012: po_line_locations pll,
6013: po_lines pl,
6014: po_headers ph
6015: WHERE ph.po_header_id = temp_cascaded_table(current_n).po_header_id
6016: AND pll.po_header_id = ph.po_header_id
7657:
7658: BEGIN
7659: SELECT (description)
7660: INTO l_item_description
7661: FROM po_line_locations
7662: WHERE line_location_id =
7663: x_cascaded_table(n).po_line_location_id
7664: AND description = x_cascaded_table(n).item_description;
7665:
9341: x_first_trans BOOLEAN := TRUE;
9342: x_sysdate DATE := SYSDATE;
9343: current_n BINARY_INTEGER := 0;
9344: insert_into_table BOOLEAN := FALSE;
9345: x_qty_rcv_exception_code po_line_locations.qty_rcv_exception_code%TYPE;
9346: tax_amount_factor NUMBER;
9347: lastrecord BOOLEAN := FALSE;
9348: po_asn_uom_qty NUMBER;
9349: po_primary_uom_qty NUMBER;
9795: l_total_rec_quantity NUMBER;
9796: l_converted_distribution_qty NUMBER;
9797: l_distribution_qty NUMBER;
9798: l_converted_transaction_qty NUMBER;
9799: l_ship_unit po_line_locations.unit_meas_lookup_code%TYPE;
9800: l_po_header_id po_headers_all.po_header_id%type;
9801: l_return_status VARCHAR2(1) :='S';
9802: l_complex_flag varchar2(1);
9803:
10349: where po_line_id = x_po_transferrec.po_line_id;
10350:
10351: select shipment_num
10352: into l_po_line_loc_num
10353: from po_line_locations_all
10354: where line_location_id = x_po_transferrec.po_line_location_id;
10355:
10356: select distribution_num
10357: into l_po_dist_num
10815: AND supply_type_code = 'RECEIVING';
10816:
10817: SELECT unit_meas_lookup_code
10818: INTO l_ship_unit
10819: FROM po_line_locations
10820: WHERE line_location_id = x_cascaded_table(n).po_line_location_id;
10821:
10822: EXCEPTION
10823: WHEN NO_DATA_FOUND THEN
11056: poll.unit_meas_lookup_code
11057: INTO l_distribution_qty,
11058: l_ship_unit
11059: FROM mtl_supply ms,
11060: po_line_locations poll
11061: WHERE ms.supply_source_id = x_po_transferrec.rcv_transaction_id
11062: AND ms.po_distribution_id = x_po_transferrec.po_distribution_id
11063: AND poll.line_location_id = ms.po_line_location_id
11064: AND ms.supply_type_code = 'RECEIVING';
11718: */
11719: IF (x_cascaded_table(n).receipt_source_code = 'VENDOR') THEN --{
11720: SELECT NVL(pll.price_override, pl.unit_price)
11721: INTO x_cascaded_table(n).po_unit_price
11722: FROM po_line_locations pll,
11723: po_lines pl
11724: WHERE pll.line_location_id = x_cascaded_table(n).po_line_location_id
11725: AND pl.po_line_id = x_cascaded_table(n).po_line_id
11726: AND pl.po_line_id = pll.po_line_id;
11997: x_first_trans BOOLEAN := TRUE;
11998: x_sysdate DATE := SYSDATE;
11999: current_n BINARY_INTEGER := 0;
12000: insert_into_table BOOLEAN := FALSE;
12001: x_qty_rcv_exception_code po_line_locations.qty_rcv_exception_code%TYPE;
12002: tax_amount_factor NUMBER;
12003: lastrecord BOOLEAN := FALSE;
12004: po_asn_uom_qty NUMBER;
12005: po_primary_uom_qty NUMBER;
12104: AND rti.transaction_type = 'MATCH')
12105: )
12106: )
12107: AND NOT EXISTS(SELECT 'purchase order shipment cancelled or fc'
12108: FROM po_line_locations pll
12109: WHERE pll.line_location_id = rt.po_line_location_id
12110: AND ( NVL(pll.cancel_flag, 'N') = 'Y'
12111: OR NVL(pll.closed_code, 'OPEN') = 'FINALLY CLOSED'))
12112: AND (rt.shipment_line_id = rsl.shipment_line_id)
12167: already_derived BOOLEAN := FALSE;
12168: cascaded_table_index NUMBER;
12169: l_grand_parent_trx_id rcv_transactions.parent_transaction_id%TYPE;
12170: temp_index NUMBER;
12171: l_line_loc_id po_line_locations.line_location_id%TYPE;
12172: l_exist VARCHAR2(30);
12173: l_exist1 VARCHAR2(30);
12174: l_exist2 VARCHAR2(30);
12175: l_destination_type_code rcv_transactions.destination_type_code%TYPE;
12487: IF (g_asn_debug = 'Y') THEN
12488: asn_debug.put_line('Need to check qty tolerances');
12489: END IF;
12490:
12491: SELECT NVL(po_line_locations.qty_rcv_exception_code, 'NONE')
12492: INTO x_qty_rcv_exception_code
12493: FROM po_line_locations
12494: WHERE line_location_id = temp_cascaded_table(current_n).po_line_location_id;
12495:
12489: END IF;
12490:
12491: SELECT NVL(po_line_locations.qty_rcv_exception_code, 'NONE')
12492: INTO x_qty_rcv_exception_code
12493: FROM po_line_locations
12494: WHERE line_location_id = temp_cascaded_table(current_n).po_line_location_id;
12495:
12496: IF (g_asn_debug = 'Y') THEN
12497: asn_debug.put_line('Qty tolerance exception code ' || NVL(x_qty_rcv_exception_code, 'NONE1'));
12733: END IF; --}
12734:
12735: SELECT MAX('record_exist')
12736: INTO l_exist2
12737: FROM po_line_locations pll
12738: WHERE pll.line_location_id = l_line_loc_id
12739: AND ( NVL(pll.cancel_flag, 'N') = 'Y'
12740: OR NVL(pll.closed_code, 'OPEN') = 'FINALLY CLOSED');
12741:
13153: x_first_trans BOOLEAN := TRUE;
13154: x_sysdate DATE := SYSDATE;
13155: current_n BINARY_INTEGER := 0;
13156: insert_into_table BOOLEAN := FALSE;
13157: x_qty_rcv_exception_code po_line_locations.qty_rcv_exception_code%TYPE;
13158: tax_amount_factor NUMBER;
13159: lastrecord BOOLEAN := FALSE;
13160: already_allocated_amt NUMBER := 0;
13161: x_item_id NUMBER;
13233: AND rti.transaction_type = 'MATCH')
13234: )
13235: )
13236: AND NOT EXISTS(SELECT 'purchase order shipment cancelled or fc'
13237: FROM po_line_locations pll
13238: WHERE pll.line_location_id = rt.po_line_location_id
13239: AND ( NVL(pll.cancel_flag, 'N') = 'Y'
13240: OR NVL(pll.closed_code, 'OPEN') = 'FINALLY CLOSED'))
13241: AND (rt.shipment_line_id = rsl.shipment_line_id)
13279: already_derived BOOLEAN := FALSE;
13280: cascaded_table_index NUMBER;
13281: l_grand_parent_trx_id rcv_transactions.parent_transaction_id%TYPE;
13282: temp_index NUMBER;
13283: l_line_loc_id po_line_locations.line_location_id%TYPE;
13284: l_exist VARCHAR2(30);
13285: l_exist1 VARCHAR2(30);
13286: l_exist2 VARCHAR2(30);
13287: l_destination_type_code rcv_transactions.destination_type_code%TYPE;
13622: IF (g_asn_debug = 'Y') THEN
13623: asn_debug.put_line('Need to check amount tolerances');
13624: END IF;
13625:
13626: SELECT NVL(po_line_locations.qty_rcv_exception_code, 'NONE')
13627: INTO x_qty_rcv_exception_code
13628: FROM po_line_locations
13629: WHERE line_location_id = temp_cascaded_table(current_n).po_line_location_id;
13630:
13624: END IF;
13625:
13626: SELECT NVL(po_line_locations.qty_rcv_exception_code, 'NONE')
13627: INTO x_qty_rcv_exception_code
13628: FROM po_line_locations
13629: WHERE line_location_id = temp_cascaded_table(current_n).po_line_location_id;
13630:
13631: IF (g_asn_debug = 'Y') THEN
13632: asn_debug.put_line('Qty tolerance exception code ' || NVL(x_qty_rcv_exception_code, 'NONE1'));
13838: END IF; --}
13839:
13840: SELECT MAX('record_exist')
13841: INTO l_exist2
13842: FROM po_line_locations pll
13843: WHERE pll.line_location_id = l_line_loc_id
13844: AND ( NVL(pll.cancel_flag, 'N') = 'Y'
13845: OR NVL(pll.closed_code, 'OPEN') = 'FINALLY CLOSED');
13846:
14213: AND rti.transaction_type = 'MATCH')
14214: )
14215: )
14216: AND NOT EXISTS(SELECT 'purchase order shipment cancelled or fc'
14217: FROM po_line_locations pll
14218: WHERE pll.line_location_id = rt.po_line_location_id
14219: AND ( NVL(pll.cancel_flag, 'N') = 'Y'
14220: OR NVL(pll.closed_code, 'OPEN') = 'FINALLY CLOSED'))
14221: AND (rt.shipment_line_id = rsl.shipment_line_id)
14440: */
14441: IF (x_cascaded_table(n).receipt_source_code = 'VENDOR') THEN --{
14442: SELECT NVL(pll.price_override, pl.unit_price)
14443: INTO x_cascaded_table(n).po_unit_price
14444: FROM po_line_locations pll,
14445: po_lines pl
14446: WHERE pll.line_location_id = x_cascaded_table(n).po_line_location_id
14447: AND pl.po_line_id = x_cascaded_table(n).po_line_id
14448: AND pl.po_line_id = pll.po_line_id;
14753: SELECT quantity,
14754: secondary_quantity
14755: INTO l_quantity_shipped,
14756: l_secondary_quantity_shipped
14757: FROM po_line_locations
14758: WHERE line_location_id = x_cascaded_table(n).po_line_location_id;
14759: EXCEPTION
14760: WHEN OTHERS THEN
14761: NULL;
15421: * Only for Complex Work POs we can have mixed
15422: * Service and quantity shipments. And for this
15423: * PO we will always have the line and shipment
15424: * information provided. So first get the
15425: * matching_basis from po_line_locations. For
15426: * non complex work POs, all the shipment will
15427: * have the same matching_basis as that of the
15428: * line and hence there wont be a problem if
15429: * the shipment number is given for a service or
15450: NVL(pl.purchase_basis,'GOODS')
15451: INTO x_cascaded_table(n).value_basis,
15452: x_cascaded_table(n).matching_basis,
15453: x_cascaded_table(n).purchase_basis
15454: FROM po_line_locations_all pll,
15455: po_lines_all pl
15456: WHERE pl.po_line_id = x_cascaded_table(n).po_line_id
15457: and pl.po_line_id = pll.po_line_id
15458: and pll.line_location_id =x_cascaded_table(n).po_line_location_id;
15493: NVL(pl.purchase_basis,'GOODS')
15494: INTO x_cascaded_table(n).value_basis,
15495: x_cascaded_table(n).matching_basis,
15496: x_cascaded_table(n).purchase_basis
15497: FROM po_line_locations_all pll,
15498: po_lines_all pl
15499: WHERE pl.po_line_id = x_cascaded_table(n).po_line_id
15500: and pl.po_line_id = pll.po_line_id
15501: and pll.shipment_num =
15994:
15995: SELECT set_of_books_id
15996: into v_sobid
15997: FROM financials_system_params_all
15998: WHERE org_id = (SELECT org_id FROM po_line_locations_all
15999: WHERE line_location_id = x_cascaded_table(n).po_line_location_id);
16000:
16001: l_rate := gl_currency_api.get_rate(v_sobid, l_po_currency, l_lcm_date, l_po_rate_type);
16002: