147: /* 12.1 - Buy/Sell Subcontracting - Changes */
148: /* For Buy/Sell subcontracting - return the purchase price variance account*/
149: SELECT mip.subcontracting_type, jso.oem_organization_id
150: INTO l_subcontracting_type , l_oem_organization_id
151: FROM mtl_interorg_parameters mip, jmf_subcontract_orders jso
152: WHERE jso.subcontract_po_shipment_id = p_po_shipment_id
153: AND jso.oem_organization_id = mip.from_organization_id
154: AND jso.tp_organization_id = mip.to_organization_id;
155:
178: x_subcontracting_type := 1 ; -- Bug 6679369
179: SELECT mip.shikyu_oem_var_account_id
180: INTO x_variance_account
181: FROM mtl_interorg_parameters mip,
182: jmf_subcontract_orders jso
183: WHERE jso.subcontract_po_shipment_id = p_po_shipment_id
184: AND jso.oem_organization_id = mip.from_organization_id
185: AND jso.tp_organization_id = mip.to_organization_id;
186:
327: --
328: BEGIN
329: SELECT jso.oem_organization_id
330: INTO l_oem_org_id
331: FROM mtl_interorg_parameters mip, jmf_subcontract_orders jso
332: WHERE jso.subcontract_po_shipment_id = p_po_shipment_id
333: AND jso.oem_organization_id = mip.from_organization_id
334: AND jso.tp_organization_id = mip.to_organization_id;
335: EXCEPTION