[Home] [Help]
576: /* Complex Work Start.
577: * We have a separate procedure derive_matching_basis
578: * to get the matching basis now. This is because we
579: * are going to get the matching_basis from
580: * po_line_locations and hence moved it from
581: * derive_po_line_info.
582: */
583: IF (g_asn_debug = 'Y') THEN
584: asn_debug.put_line('Before calling derive matching basis ');
646: pl.job_id,
647: pll.value_basis , --Complex Work
648: pl.purchase_basis,
649: pll.matching_basis --Complex Work
650: FROM po_line_locations pll,
651: po_lines pl,
652: po_headers ph
653: WHERE ph.po_header_id = pl.po_header_id
654: AND pl.po_line_id = pll.po_line_id
3042: * for use in all transaction types*/
3043: BEGIN
3044: SELECT drop_ship_flag
3045: INTO x_drop_ship_flag
3046: FROM po_line_locations_all
3047: WHERE line_location_id = x_cascaded_table(n).po_line_location_id;
3048: -- if no data found, do nothing
3049: EXCEPTION
3050: WHEN NO_DATA_FOUND THEN
3207: pll.ship_to_location_id,
3208: NVL(pll.enforce_ship_to_location_code, 'NONE') enforce_ship_to_location_code,
3209: TO_NUMBER(NULL) shipment_line_id, --shipment_line_id
3210: pl.item_id
3211: FROM po_line_locations pll,
3212: po_lines pl,
3213: po_headers ph
3214: WHERE ph.po_header_id = header_id
3215: AND pll.po_header_id = header_id
3240: v_ship_to_location_id NUMBER,
3241: v_vendor_product_num VARCHAR2
3242: ) IS
3243: SELECT COUNT(*)
3244: FROM po_line_locations pll,
3245: po_lines pl,
3246: po_headers ph
3247: WHERE ph.po_header_id = header_id
3248: AND pll.po_header_id = header_id
3263: AND NVL(pl.vendor_product_num, '-999') = NVL(v_vendor_product_num, NVL(pl.vendor_product_num, '-999'));
3264:
3265: /***** Bug # 1553154
3266: ***** There was a performance issue since the cursor COUNT_DISTRIBUTIONS
3267: ***** was driving through PO_LINE_LOCATIONS_ALL. Modified the Select
3268: ***** statement so that it will drive through PO_HEADERS_ALL
3269: ***** followed by PO_LINES_ALL which is followed by PO_LINE_LOCATIONS_ALL
3270: ***** so that there is an improvement in performance.
3271: *****/
3265: /***** Bug # 1553154
3266: ***** There was a performance issue since the cursor COUNT_DISTRIBUTIONS
3267: ***** was driving through PO_LINE_LOCATIONS_ALL. Modified the Select
3268: ***** statement so that it will drive through PO_HEADERS_ALL
3269: ***** followed by PO_LINES_ALL which is followed by PO_LINE_LOCATIONS_ALL
3270: ***** so that there is an improvement in performance.
3271: *****/
3272: CURSOR distributions(
3273: header_id NUMBER,
3322: NVL(pll.enforce_ship_to_location_code, 'NONE') enforce_ship_to_location_code,
3323: TO_NUMBER(NULL) shipment_line_id, -- shipment_line_id
3324: pl.item_id
3325: FROM po_distributions pod,
3326: po_line_locations pll,
3327: po_lines pl,
3328: po_headers ph
3329: WHERE ph.po_header_id = header_id
3330: AND pl.po_header_id = ph.po_header_id
3351: ***** There was a performance issue since the cursor DISTRIBUTIONS
3352: ***** was driving through PO_HEADERS_ALL followed by PO_DISTRIBUTIONS_ALL
3353: ***** Modified the Select statement so that it will drive through
3354: ***** PO_HEADERS_ALL followed by PO_LINES_ALL which is followed by
3355: ***** PO_LINE_LOCATIONS_ALL which in turn is followed by
3356: ***** PO_DISTRIBUTIONS_ALL so that there is an improvement in
3357: ***** Performance
3358: *****/
3359: CURSOR count_distributions(
3368: v_vendor_product_num VARCHAR2
3369: ) IS
3370: SELECT COUNT(*)
3371: FROM po_distributions pod,
3372: po_line_locations pll,
3373: po_lines pl,
3374: po_headers ph
3375: WHERE ph.po_header_id = header_id
3376: AND pl.po_header_id = ph.po_header_id
3413: x_first_trans BOOLEAN := TRUE;
3414: x_sysdate DATE := SYSDATE;
3415: current_n BINARY_INTEGER := 0;
3416: insert_into_table BOOLEAN := FALSE;
3417: x_qty_rcv_exception_code po_line_locations.qty_rcv_exception_code%TYPE;
3418: tax_amount_factor NUMBER;
3419: lastrecord BOOLEAN := FALSE;
3420: po_asn_uom_qty NUMBER;
3421: po_primary_uom_qty NUMBER;
3574: AND temp_cascaded_table(current_n).po_line_location_id IS NOT NULL THEN --{
3575: BEGIN
3576: SELECT shipment_num
3577: INTO temp_cascaded_table(current_n).document_shipment_line_num
3578: FROM po_line_locations
3579: WHERE line_location_id = temp_cascaded_table(current_n).po_line_location_id;
3580: EXCEPTION
3581: WHEN OTHERS THEN
3582: IF (g_asn_debug = 'Y') THEN
3607: Enter error message in po_interface_errors if the enforcement is "Warning"
3608: Enter error message in po_interface_errors if the enforcement is "Reject"
3609: and error out.
3610: This validation is done by comparing the enforce_ship_location_code from
3611: po_line_locations and assigning the proper ship_location_id into a
3612: temporary variable temp_mirror_ship_to_loc_id and passing the temp
3613: variable as a parameter to open the cursor "Distributions".
3614: */
3615: IF ( x_cascaded_table(n).transaction_type <> 'DELIVER'
4021: IF rows_fetched > 0
4022: AND NOT x_first_trans THEN --{
4023: -- we had got atleast some rows from our shipments cursor
4024: -- we have atleast one row cascaded (not null line_location_id)
4025: SELECT NVL(po_line_locations.qty_rcv_exception_code, 'NONE')
4026: INTO x_qty_rcv_exception_code
4027: FROM po_line_locations
4028: WHERE line_location_id = temp_cascaded_table(current_n).po_line_location_id;
4029:
4023: -- we had got atleast some rows from our shipments cursor
4024: -- we have atleast one row cascaded (not null line_location_id)
4025: SELECT NVL(po_line_locations.qty_rcv_exception_code, 'NONE')
4026: INTO x_qty_rcv_exception_code
4027: FROM po_line_locations
4028: WHERE line_location_id = temp_cascaded_table(current_n).po_line_location_id;
4029:
4030: IF (g_asn_debug = 'Y') THEN
4031: asn_debug.put_line('Qty tolerance exception code ' || NVL(x_qty_rcv_exception_code, 'NONE1'));
4240:
4241: IF (x_is_asn = FALSE) THEN --{
4242: SELECT COUNT(*)
4243: INTO x_temp_count
4244: FROM po_line_locations pll,
4245: po_lines pl,
4246: po_headers ph
4247: WHERE ph.po_header_id = temp_cascaded_table(current_n).po_header_id
4248: AND pll.po_header_id = ph.po_header_id
4282: x_shipment_type,
4283: x_ship_to_organization_id,
4284: x_ship_to_location_id,
4285: x_vendor_product_num
4286: FROM po_line_locations pll,
4287: po_lines pl,
4288: po_headers ph
4289: WHERE ph.po_header_id = temp_cascaded_table(current_n).po_header_id
4290: AND pll.po_header_id = ph.po_header_id
4315: IF (x_is_asn = FALSE) THEN --{
4316: SELECT COUNT(*)
4317: INTO x_temp_count
4318: FROM po_distributions pod,
4319: po_line_locations pll,
4320: po_lines pl,
4321: po_headers ph
4322: WHERE ph.po_header_id = temp_cascaded_table(current_n).po_header_id
4323: AND pll.po_header_id = ph.po_header_id
4360: x_ship_to_organization_id,
4361: x_ship_to_location_id,
4362: x_vendor_product_num
4363: FROM po_distributions pod,
4364: po_line_locations pll,
4365: po_lines pl,
4366: po_headers ph
4367: WHERE ph.po_header_id = temp_cascaded_table(current_n).po_header_id
4368: AND pll.po_header_id = ph.po_header_id
4414: x_vendor_product_num,
4415: l_receipt_source_code,
4416: l_shipment_line_status_code,
4417: l_asn_line_flag
4418: FROM po_line_locations pll,
4419: po_lines pl,
4420: po_headers ph,
4421: rcv_shipment_headers rsh,
4422: rcv_shipment_lines rsl
5917: '' ussgl_transaction_code,
5918: pll.ship_to_location_id,
5919: NVL(pll.enforce_ship_to_location_code, 'NONE') enforce_ship_to_location_code,
5920: pl.item_id
5921: FROM po_line_locations pll,
5922: po_lines pl,
5923: po_headers ph
5924: WHERE pl.po_line_id = v_po_line_id
5925: AND pll.po_line_id = v_po_line_id
5940: v_po_line_location_id NUMBER,
5941: v_po_release_id NUMBER
5942: ) IS
5943: SELECT COUNT(*)
5944: FROM po_line_locations pll,
5945: po_lines pl,
5946: po_headers ph
5947: WHERE pl.po_line_id = v_po_line_id
5948: AND pll.po_line_id = v_po_line_id
5998: pll.ship_to_location_id,
5999: NVL(pll.enforce_ship_to_location_code, 'NONE') enforce_ship_to_location_code,
6000: pl.item_id
6001: FROM po_distributions pod,
6002: po_line_locations pll,
6003: po_lines pl,
6004: po_headers ph
6005: WHERE pl.po_line_id = v_po_line_id
6006: AND pll.po_line_id = v_po_line_id
6025: v_po_release_id NUMBER
6026: ) IS
6027: SELECT COUNT(*)
6028: FROM po_distributions pod,
6029: po_line_locations pll,
6030: po_lines pl,
6031: po_headers ph
6032: WHERE pl.po_line_id = v_po_line_id
6033: AND pll.po_line_id = v_po_line_id
6063: x_first_trans BOOLEAN := TRUE;
6064: x_sysdate DATE := SYSDATE;
6065: current_n BINARY_INTEGER := 0;
6066: insert_into_table BOOLEAN := FALSE;
6067: x_qty_rcv_exception_code po_line_locations.qty_rcv_exception_code%TYPE;
6068: tax_amount_factor NUMBER;
6069: lastrecord BOOLEAN := FALSE;
6070: already_allocated_amt NUMBER := 0;
6071: x_release_id NUMBER;
6246: AND temp_cascaded_table(current_n).po_line_location_id IS NOT NULL THEN --{
6247: BEGIN
6248: SELECT shipment_num
6249: INTO temp_cascaded_table(current_n).document_shipment_line_num
6250: FROM po_line_locations
6251: WHERE line_location_id = temp_cascaded_table(current_n).po_line_location_id;
6252: EXCEPTION
6253: WHEN OTHERS THEN
6254: IF (g_asn_debug = 'Y') THEN
6279: Enter error message in po_interface_errors if the enforcement is "Warning"
6280: Enter error message in po_interface_errors if the enforcement is "Reject"
6281: and error out.
6282: This validation is done by comparing the enforce_ship_location_code from
6283: po_line_locations and assigning the proper ship_location_id into a
6284: temporary variable temp_mirror_ship_to_loc_id and passing the temp
6285: variable as a parameter to open the cursor "Distributions".
6286: */
6287: IF ( x_cascaded_table(n).transaction_type <> 'DELIVER'
6471: IF rows_fetched > 0
6472: AND NOT x_first_trans THEN --{
6473: -- we had got atleast some rows from our shipments cursor
6474: -- we have atleast one row cascaded (not null line_location_id)
6475: SELECT NVL(po_line_locations.qty_rcv_exception_code, 'NONE')
6476: INTO x_qty_rcv_exception_code
6477: FROM po_line_locations
6478: WHERE line_location_id = temp_cascaded_table(current_n).po_line_location_id;
6479:
6473: -- we had got atleast some rows from our shipments cursor
6474: -- we have atleast one row cascaded (not null line_location_id)
6475: SELECT NVL(po_line_locations.qty_rcv_exception_code, 'NONE')
6476: INTO x_qty_rcv_exception_code
6477: FROM po_line_locations
6478: WHERE line_location_id = temp_cascaded_table(current_n).po_line_location_id;
6479:
6480: IF (g_asn_debug = 'Y') THEN
6481: asn_debug.put_line('Qty tolerance exception code ' || NVL(x_qty_rcv_exception_code, 'NONE1'));
6618: SELECT COUNT(*)
6619: INTO x_temp_count
6620: FROM DUAL
6621: WHERE EXISTS(SELECT 1
6622: FROM po_line_locations pll,
6623: po_lines pl
6624: WHERE pl.po_line_id = temp_cascaded_table(current_n).po_line_id
6625: AND NVL(pll.po_release_id, 0) = NVL(temp_cascaded_table(current_n).po_release_id, NVL(pll.po_release_id, 0))
6626: AND pll.line_location_id = NVL(temp_cascaded_table(current_n).po_line_location_id, pll.line_location_id)
6641: x_approved_flag,
6642: x_cancel_flag,
6643: x_closed_code,
6644: x_shipment_type
6645: FROM po_line_locations pll,
6646: po_lines pl,
6647: po_headers ph
6648: WHERE ph.po_header_id = temp_cascaded_table(current_n).po_header_id
6649: AND pll.po_header_id = ph.po_header_id
6657: OR NVL(x_cascaded_table(n).auto_transact_code, 'RECEIVE') = 'DELIVER') THEN --{
6658: SELECT COUNT(*)
6659: INTO x_temp_count
6660: FROM po_distributions pod,
6661: po_line_locations pll,
6662: po_lines pl,
6663: po_headers ph
6664: WHERE ph.po_header_id = temp_cascaded_table(current_n).po_header_id
6665: AND pll.po_header_id = ph.po_header_id
6686: x_cancel_flag,
6687: x_closed_code,
6688: x_shipment_type
6689: FROM po_distributions pod,
6690: po_line_locations pll,
6691: po_lines pl,
6692: po_headers ph
6693: WHERE ph.po_header_id = temp_cascaded_table(current_n).po_header_id
6694: AND pll.po_header_id = ph.po_header_id
8600:
8601: BEGIN
8602: SELECT (description)
8603: INTO l_item_description
8604: FROM po_line_locations
8605: WHERE line_location_id =
8606: x_cascaded_table(n).po_line_location_id
8607: AND description = x_cascaded_table(n).item_description;
8608:
10363: x_first_trans BOOLEAN := TRUE;
10364: x_sysdate DATE := SYSDATE;
10365: current_n BINARY_INTEGER := 0;
10366: insert_into_table BOOLEAN := FALSE;
10367: x_qty_rcv_exception_code po_line_locations.qty_rcv_exception_code%TYPE;
10368: tax_amount_factor NUMBER;
10369: lastrecord BOOLEAN := FALSE;
10370: po_asn_uom_qty NUMBER;
10371: po_primary_uom_qty NUMBER;
10812: * from po_transfer%ROWTYPE since po_deliver has all the columns
10813: * that are required for deliver and using po_transfer gives
10814: * PL/SQL conversion error.
10815: */
10816: l_unit_of_measure po_line_locations.unit_meas_lookup_code%TYPE;
10817: x_po_transferrec po_deliver%ROWTYPE;
10818: x_temp_parent_trx_qty NUMBER := 0;
10819: x_converted_parent_trx_qty NUMBER := 0;
10820: x_temp_convert_parent_trx_qty NUMBER := 0;
10837: l_total_rec_quantity NUMBER;
10838: l_converted_distribution_qty NUMBER;
10839: l_distribution_qty NUMBER;
10840: l_converted_transaction_qty NUMBER;
10841: l_ship_unit po_line_locations.unit_meas_lookup_code%TYPE;
10842: l_po_header_id po_headers_all.po_header_id%type;
10843: l_return_status VARCHAR2(1) :='S';
10844: l_complex_flag varchar2(1);
10845:
11412: where po_line_id = x_po_transferrec.po_line_id;
11413:
11414: select shipment_num
11415: into l_po_line_loc_num
11416: from po_line_locations_all
11417: where line_location_id = x_po_transferrec.po_line_location_id;
11418:
11419: select distribution_num
11420: into l_po_dist_num
11928: AND supply_type_code = 'RECEIVING';
11929:
11930: SELECT unit_meas_lookup_code
11931: INTO l_ship_unit
11932: FROM po_line_locations
11933: WHERE line_location_id = x_cascaded_table(n).po_line_location_id;
11934:
11935: EXCEPTION
11936: WHEN NO_DATA_FOUND THEN
13014: */
13015: IF (x_cascaded_table(n).receipt_source_code = 'VENDOR') THEN --{
13016: SELECT NVL(pll.price_override, pl.unit_price)
13017: INTO x_cascaded_table(n).po_unit_price
13018: FROM po_line_locations pll,
13019: po_lines pl
13020: WHERE pll.line_location_id = x_cascaded_table(n).po_line_location_id
13021: AND pl.po_line_id = x_cascaded_table(n).po_line_id
13022: AND pl.po_line_id = pll.po_line_id;
13253: x_cascaded_table(n).matching_basis := 'QUANTITY';
13254: x_cascaded_table(n).purchase_basis := 'GOODS';
13255: END IF;
13256:
13257: /**Bug 9534775 wc -ve correct , fetch value_basis/matching_basis from po_line_locations **/
13258: IF x_cascaded_table(n).po_line_location_id IS NOT NULL
13259: AND l_complex_flag = 'Y' THEN
13260:
13261: SELECT NVL(value_basis, 'QUANTITY'),
13261: SELECT NVL(value_basis, 'QUANTITY'),
13262: NVL(matching_basis, 'QUANTITY')
13263: INTO x_cascaded_table(n).value_basis,
13264: x_cascaded_table(n).matching_basis
13265: FROM po_line_locations
13266: WHERE line_location_id = x_cascaded_table(n).po_line_location_id;
13267:
13268: END IF;
13269: /**End Bug 9534775**/
13321: x_first_trans BOOLEAN := TRUE;
13322: x_sysdate DATE := SYSDATE;
13323: current_n BINARY_INTEGER := 0;
13324: insert_into_table BOOLEAN := FALSE;
13325: x_qty_rcv_exception_code po_line_locations.qty_rcv_exception_code%TYPE;
13326: tax_amount_factor NUMBER;
13327: lastrecord BOOLEAN := FALSE;
13328: po_asn_uom_qty NUMBER;
13329: po_primary_uom_qty NUMBER;
13428: AND rti.transaction_type = 'MATCH')
13429: )
13430: )
13431: AND NOT EXISTS(SELECT 'purchase order shipment cancelled or fc'
13432: FROM po_line_locations pll
13433: WHERE pll.line_location_id = rt.po_line_location_id
13434: AND ( NVL(pll.cancel_flag, 'N') = 'Y'
13435: OR NVL(pll.closed_code, 'OPEN') = 'FINALLY CLOSED'))
13436: AND (rt.shipment_line_id = rsl.shipment_line_id)
13491: already_derived BOOLEAN := FALSE;
13492: cascaded_table_index NUMBER;
13493: l_grand_parent_trx_id rcv_transactions.parent_transaction_id%TYPE;
13494: temp_index NUMBER;
13495: l_line_loc_id po_line_locations.line_location_id%TYPE;
13496: l_exist VARCHAR2(30);
13497: l_exist1 VARCHAR2(30);
13498: l_exist2 VARCHAR2(30);
13499: l_destination_type_code rcv_transactions.destination_type_code%TYPE;
13827: IF (g_asn_debug = 'Y') THEN
13828: asn_debug.put_line('Need to check qty tolerances');
13829: END IF;
13830:
13831: SELECT NVL(po_line_locations.qty_rcv_exception_code, 'NONE')
13832: INTO x_qty_rcv_exception_code
13833: FROM po_line_locations
13834: WHERE line_location_id = temp_cascaded_table(current_n).po_line_location_id;
13835:
13829: END IF;
13830:
13831: SELECT NVL(po_line_locations.qty_rcv_exception_code, 'NONE')
13832: INTO x_qty_rcv_exception_code
13833: FROM po_line_locations
13834: WHERE line_location_id = temp_cascaded_table(current_n).po_line_location_id;
13835:
13836: IF (g_asn_debug = 'Y') THEN
13837: asn_debug.put_line('Qty tolerance exception code ' || NVL(x_qty_rcv_exception_code, 'NONE1'));
14102: END IF; --}
14103:
14104: SELECT MAX('record_exist')
14105: INTO l_exist2
14106: FROM po_line_locations pll
14107: WHERE pll.line_location_id = l_line_loc_id
14108: AND ( NVL(pll.cancel_flag, 'N') = 'Y'
14109: OR NVL(pll.closed_code, 'OPEN') = 'FINALLY CLOSED');
14110:
14523: x_first_trans BOOLEAN := TRUE;
14524: x_sysdate DATE := SYSDATE;
14525: current_n BINARY_INTEGER := 0;
14526: insert_into_table BOOLEAN := FALSE;
14527: x_qty_rcv_exception_code po_line_locations.qty_rcv_exception_code%TYPE;
14528: tax_amount_factor NUMBER;
14529: lastrecord BOOLEAN := FALSE;
14530: already_allocated_amt NUMBER := 0;
14531: x_item_id NUMBER;
14603: AND rti.transaction_type = 'MATCH')
14604: )
14605: )
14606: AND NOT EXISTS(SELECT 'purchase order shipment cancelled or fc'
14607: FROM po_line_locations pll
14608: WHERE pll.line_location_id = rt.po_line_location_id
14609: AND ( NVL(pll.cancel_flag, 'N') = 'Y'
14610: OR NVL(pll.closed_code, 'OPEN') = 'FINALLY CLOSED'))
14611: AND (rt.shipment_line_id = rsl.shipment_line_id)
14649: already_derived BOOLEAN := FALSE;
14650: cascaded_table_index NUMBER;
14651: l_grand_parent_trx_id rcv_transactions.parent_transaction_id%TYPE;
14652: temp_index NUMBER;
14653: l_line_loc_id po_line_locations.line_location_id%TYPE;
14654: l_exist VARCHAR2(30);
14655: l_exist1 VARCHAR2(30);
14656: l_exist2 VARCHAR2(30);
14657: l_destination_type_code rcv_transactions.destination_type_code%TYPE;
15008: IF (g_asn_debug = 'Y') THEN
15009: asn_debug.put_line('Need to check amount tolerances');
15010: END IF;
15011:
15012: SELECT NVL(po_line_locations.qty_rcv_exception_code, 'NONE')
15013: INTO x_qty_rcv_exception_code
15014: FROM po_line_locations
15015: WHERE line_location_id = temp_cascaded_table(current_n).po_line_location_id;
15016:
15010: END IF;
15011:
15012: SELECT NVL(po_line_locations.qty_rcv_exception_code, 'NONE')
15013: INTO x_qty_rcv_exception_code
15014: FROM po_line_locations
15015: WHERE line_location_id = temp_cascaded_table(current_n).po_line_location_id;
15016:
15017: IF (g_asn_debug = 'Y') THEN
15018: asn_debug.put_line('Qty tolerance exception code ' || NVL(x_qty_rcv_exception_code, 'NONE1'));
15253: END IF; --}
15254:
15255: SELECT MAX('record_exist')
15256: INTO l_exist2
15257: FROM po_line_locations pll
15258: WHERE pll.line_location_id = l_line_loc_id
15259: AND ( NVL(pll.cancel_flag, 'N') = 'Y'
15260: OR NVL(pll.closed_code, 'OPEN') = 'FINALLY CLOSED');
15261:
15628: AND rti.transaction_type = 'MATCH')
15629: )
15630: )
15631: AND NOT EXISTS(SELECT 'purchase order shipment cancelled or fc'
15632: FROM po_line_locations pll
15633: WHERE pll.line_location_id = rt.po_line_location_id
15634: AND ( NVL(pll.cancel_flag, 'N') = 'Y'
15635: OR NVL(pll.closed_code, 'OPEN') = 'FINALLY CLOSED'))
15636: AND (rt.shipment_line_id = rsl.shipment_line_id)
15855: */
15856: IF (x_cascaded_table(n).receipt_source_code = 'VENDOR') THEN --{
15857: SELECT NVL(pll.price_override, pl.unit_price)
15858: INTO x_cascaded_table(n).po_unit_price
15859: FROM po_line_locations pll,
15860: po_lines pl
15861: WHERE pll.line_location_id = x_cascaded_table(n).po_line_location_id
15862: AND pl.po_line_id = x_cascaded_table(n).po_line_id
15863: AND pl.po_line_id = pll.po_line_id;
16169: SELECT quantity,
16170: secondary_quantity
16171: INTO l_quantity_shipped,
16172: l_secondary_quantity_shipped
16173: FROM po_line_locations
16174: WHERE line_location_id = x_cascaded_table(n).po_line_location_id;
16175: EXCEPTION
16176: WHEN OTHERS THEN
16177: NULL;
16840: * Only for Complex Work POs we can have mixed
16841: * Service and quantity shipments. And for this
16842: * PO we will always have the line and shipment
16843: * information provided. So first get the
16844: * matching_basis from po_line_locations. For
16845: * non complex work POs, all the shipment will
16846: * have the same matching_basis as that of the
16847: * line and hence there wont be a problem if
16848: * the shipment number is given for a service or
16869: NVL(pl.purchase_basis,'GOODS')
16870: INTO x_cascaded_table(n).value_basis,
16871: x_cascaded_table(n).matching_basis,
16872: x_cascaded_table(n).purchase_basis
16873: FROM po_line_locations_all pll,
16874: po_lines_all pl
16875: WHERE pl.po_line_id = x_cascaded_table(n).po_line_id
16876: and pl.po_line_id = pll.po_line_id
16877: and pll.line_location_id =x_cascaded_table(n).po_line_location_id;
16912: NVL(pl.purchase_basis,'GOODS')
16913: INTO x_cascaded_table(n).value_basis,
16914: x_cascaded_table(n).matching_basis,
16915: x_cascaded_table(n).purchase_basis
16916: FROM po_line_locations_all pll,
16917: po_lines_all pl
16918: WHERE pl.po_line_id = x_cascaded_table(n).po_line_id
16919: and pl.po_line_id = pll.po_line_id
16920: and pll.shipment_num =