[Home] [Help]
85: AND line_id= nvl(p_line_id, line_id);
86:
87: CURSOR c_qty_app_on_receipt( p_receipt_id IN NUMBER ) IS
88: SELECT SUM(receipt_quantity_applied)
89: FROM JAI_CMN_MATCH_RECEIPTS
90: WHERE receipt_id = p_receipt_id
91: AND ship_status IS NULL; -- cbabu for Bug# 2689425
92:
93: CURSOR c_qty_matched(p_delivery_detail_id IN NUMBER) IS
91: AND ship_status IS NULL; -- cbabu for Bug# 2689425
92:
93: CURSOR c_qty_matched(p_delivery_detail_id IN NUMBER) IS
94: SELECT SUM(quantity_applied)
95: FROM JAI_CMN_MATCH_RECEIPTS
96: WHERE ref_line_id = p_delivery_detail_id
97: and order_invoice = 'O';
98:
99: -- this is commented in this cursor because, the subquery is taken care programmatically and if included in this cursor
110:
111: v_exist NUMBER;
112: CURSOR c_duplicate_record(p_register_id IN NUMBER, p_delivery_detail_id IN NUMBER) IS
113: SELECT count(receipt_id)
114: FROM JAI_CMN_MATCH_RECEIPTS
115: WHERE receipt_id = p_register_id
116: AND ref_line_id = p_delivery_detail_id
117: AND order_invoice = 'O';
118:
205: Fetch c_duplicate_record Into v_exist;
206: Close c_duplicate_record;
207: --fnd_file.put_line(fnd_file.log, '2 v_QtyToMatch = '||v_QtyToMatch||', v_RctQtyAvailableInIssueUOM = '||v_RctQtyAvailableInIssueUOM);
208: IF NVL(v_exist,0) <> 1 Then
209: INSERT INTO JAI_CMN_MATCH_RECEIPTS (
210: receipt_id, ref_line_id,
211: subinventory, quantity_applied,
212: issue_uom, receipt_quantity_applied, receipt_quantity_uom,
213: order_invoice, ship_status,
218: match_detail.requested_quantity_uom, v_QtyAppliedInRcptUom, rg23d_entry.primary_uom_code
219: , 'O', null,
220: sysdate, p_created_by, sysdate, p_last_update_login, p_created_by);
221: ELSE
222: UPDATE JAI_CMN_MATCH_RECEIPTS
223: SET quantity_applied = v_QtyApplied,
224: receipt_quantity_applied = v_QtyAppliedInRcptUom,
225: last_update_login = p_last_update_login,
226: last_update_date = sysdate