create or replace procedure pro_anyue(c1 in out 患者结算记录.结算时间%type, c2 in out 患者结算记录.结算时间%type) is
p_c1 患者结算记录.结算时间%type;
p_c2 患者结算记录.结算时间%type;
i 患者结算记录.结算时间%type;
begin
select hj.结算时间 into p_c1
from 患者结算记录 hj
where hj.结算时间 =c1;
select hj.结算时间 into p_c2
from 患者结算记录 hj
where hj.结算时间 =c2;
i:=p_c1+30;
if (p_c2 <= p_c1+30) then
dbms_output.put_line('p_c1'||'---'||'p_c1+30');
else if (p_c2 > p_c1+30) then
i:=i+30;
while i>p_c2 loop
dbms_output.put_line('p_c1'||'---'||'i');
end loop;
end if;
commit;
这是怎么回事呢