493: and moq.subinventory_code = csi.secondary_inventory_name
494: and moq.inventory_item_id = crpt.alternate_item_id);
495:
496: l_geometry mdsys.sdo_geometry;
497: l_point mdsys.sdo_point_type := mdsys.sdo_point_type(-9999,-9999,0);
498: l_test number := 0;
499: cursor c_compare(p_point mdsys.sdo_point_type) is
500: select 1 from dual
501: where l_point <> nvl(p_point,l_point);
495:
496: l_geometry mdsys.sdo_geometry;
497: l_point mdsys.sdo_point_type := mdsys.sdo_point_type(-9999,-9999,0);
498: l_test number := 0;
499: cursor c_compare(p_point mdsys.sdo_point_type) is
500: select 1 from dual
501: where l_point <> nvl(p_point,l_point);
502:
503: begin