[Home] [Help]
746: CURSOR c_base_trx(cp_transaction_id IN NUMBER) IS
747: SELECT shipment_header_id, shipment_line_id, transaction_type, organization_id, location_id,
748: quantity, unit_of_measure, subinventory, vendor_id, vendor_site_id,
749: source_document_code, po_header_id, po_line_id, po_line_location_id, po_release_id
750: FROM rcv_transactions
751: WHERE transaction_id = cp_transaction_id;
752:
753: r_base_trx c_base_trx%ROWTYPE;
754:
1119: p_shipment_line_id NUMBER,
1120: p_to_organization_id NUMBER,
1121: p_ship_to_location_id NUMBER,
1122: p_item_id NUMBER,
1123: p_tran_type RCV_TRANSACTIONS.transaction_type%TYPE,
1124: p_rcv_tran_qty RCV_TRANSACTIONS.quantity%TYPE,
1125: p_new_primary_unit_of_measure RCV_SHIPMENT_LINES.primary_unit_of_measure%TYPE,
1126: p_old_primary_unit_of_measure RCV_SHIPMENT_LINES.primary_unit_of_measure%TYPE,
1127: p_unit_of_measure RCV_SHIPMENT_LINES.unit_of_measure%TYPE,
1120: p_to_organization_id NUMBER,
1121: p_ship_to_location_id NUMBER,
1122: p_item_id NUMBER,
1123: p_tran_type RCV_TRANSACTIONS.transaction_type%TYPE,
1124: p_rcv_tran_qty RCV_TRANSACTIONS.quantity%TYPE,
1125: p_new_primary_unit_of_measure RCV_SHIPMENT_LINES.primary_unit_of_measure%TYPE,
1126: p_old_primary_unit_of_measure RCV_SHIPMENT_LINES.primary_unit_of_measure%TYPE,
1127: p_unit_of_measure RCV_SHIPMENT_LINES.unit_of_measure%TYPE,
1128: p_po_header_id NUMBER,
1181: AND location_id = p_ship_to_location_id
1182: -- AND (source = 'PURCHASE ORDER' OR source = 'PO RELEASE' OR source = 'RETURN TO VENDOR')
1183: AND NVL(primary_flag,'N') = 'Y'; --added on 06-jan-2000 gaurav.
1184:
1185: --**********FETCHING VALUES FROM RCV_TRANSACTIONS**********
1186: CURSOR c_get_rcv_trans IS
1187: SELECT wip_entity_id
1188: FROM po_distributions_all
1189: WHERE line_location_id = p_po_line_location_id
1694:
1695:
1696: v_bal_qty := v_comp_balance_qty;
1697:
1698: IF v_match_type = 1 THEN -- this handles +ve quantity RECEIVE / CORRECTed through RCV_TRANSACTIONS base form
1699:
1700: IF v_bal_qty >= v_received_qty THEN
1701: v_temp_qty := v_received_qty * v_comp_qty_pa;
1702: v_left_received_qty := 0;
1713:
1714: END IF;
1715:
1716: -- 2746952
1717: -- this handles -ve quantity CORRECTed through RCV_TRANSACTIONS base form
1718: ELSIF v_match_type = -1 THEN
1719:
1720: -- v_bal_qty is +ve and v_received_qty is -ve if code enters this path
1721: -- v_bal_qty is assigned with return_qty in this case