321: --
322: -- Bug 457417 - Just checking if PO has been installed or not is no longer
323: -- sufficient in a multi-org environment, we need to know not only if PO has
324: -- been installed but if it has been setup. We assume that if PO has been
325: -- installed the table po_system_parameters exists and if it has been setup
326: -- it contains a record. (mhtaylor 30/Jan/98)
327: --
328: debug_info := 'Check to see if PO has been setup';
329: --
330: l_po_setup := 0;
331: --
332: SELECT count(*)
333: INTO l_po_setup
334: FROM po_system_parameters
335: WHERE nvl(org_id,-99) = nvl(x_org_id,-99);
336: --
337: IF l_po_setup > 0 THEN
338: --
335: WHERE nvl(org_id,-99) = nvl(x_org_id,-99);
336: --
337: IF l_po_setup > 0 THEN
338: --
339: debug_info := 'Select from rcv_parameters, po_lookup_codes, po_system_parameters';
340:
341: SELECT rp.enforce_ship_to_location_code,
342: rp.receiving_routing_id,
343: rp.qty_rcv_tolerance,
371: FROM rcv_parameters rp,
372: po_lookup_codes pc1,
373: po_lookup_codes pc2,
374: po_lookup_codes pc3,
375: po_system_parameters po
376: WHERE rp.organization_id = x_inventory_organization_id
377: AND pc1.lookup_type(+) = 'RECEIVING CONTROL LEVEL'
378: AND pc1.lookup_code(+) = rp.enforce_ship_to_location_code
379: AND pc2.lookup_type(+) = 'RECEIVING CONTROL LEVEL'