define init_nrsp_pdb_key
<<<
declare
cursor nrsp_c is
select distinct nrsp.rowid rid, dbinc.db_key db_key
from nrsp, dbinc
where nrsp.pdb_key is null
and nrsp.dbinc_key = dbinc.dbinc_key
order by dbinc.db_key;
prev_db_key number := 0;
local_pdb_key number;
begin
for r in nrsp_c loop
if (r.db_key <> prev_db_key) then
prev_db_key := r.db_key;
select pdb_key into local_pdb_key
from pdb
where pdb.con_id in (1, 0);
end if;
改为:
define init_nrsp_pdb_key
<<<
declare
cursor nrsp_c is
select distinct nrsp.rowid rid, dbinc.db_key db_key
from nrsp, dbinc
where nrsp.pdb_key is null
and nrsp.dbinc_key = dbinc.dbinc_key
order by dbinc.db_key;
prev_db_key number := 0;
local_pdb_key number;
begin
for r in nrsp_c loop
if (r.db_key <> prev_db_key) then
prev_db_key := r.db_key;
select pdb_key into local_pdb_key
from pdb
where pdb.con_id in (1, 0)
and pdb.db_key = r.db_key;
end if;
并且改变:
define init_grsp_pdb_key
<<<
declare
cursor grsp_c is
select distinct grsp.rowid rid, dbinc.db_key db_key
from grsp, dbinc
where grsp.pdb_key is null
and grsp.dbinc_key = dbinc.dbinc_key
order by dbinc.db_key;
prev_db_key number := 0;
local_pdb_key number;
begin
for r in grsp_c loop
if (r.db_key <> prev_db_key) then
prev_db_key := r.db_key;
select pdb_key into local_pdb_key
from pdb
where pdb.con_id in (1, 0);
end if;
改为:
define init_grsp_pdb_key
<<<
declare
cursor grsp_c is
select distinct grsp.rowid rid, dbinc.db_key db_key
from grsp, dbinc
where grsp.pdb_key is null
and grsp.dbinc_key = dbinc.dbinc_key
order by dbinc.db_key;
prev_db_key number := 0;
local_pdb_key number;
begin
for r in grsp_c loop
if (r.db_key <> prev_db_key) then
prev_db_key := r.db_key;
select pdb_key into local_pdb_key
from pdb
where pdb.con_id in (1, 0)
and pdb.db_key = r.db_key;
end if;
保存文件。