PL / SQL过程,如果给定日期不存在,则输出给定日期,应提供最新日期

问题描述 投票:1回答:1

我具有此表的信息值及其内容:enter image description here

现在我创建一个程序,在该程序中,我需要输入一个日期参数,该参数应在给定attr的情况下输出正确的price行。如果该日期不存在,则应选择最新日期。

to_date('01-jan-19')的解决方案表如下所示:

enter image description here

这将是该过程中的输出行。

我应该选择更正元组并输出它,还是最好只是批量收集所有内容,然后使用if语句在for循环中检查我需要显示的元组。

到目前为止我所拥有的:

带有我要查找的元组的选择语句:

create or replace procedure print_inf_value(closingDate Date) is
cursor d1 (closingDate Date) is
select t.attr, t.dateOfValue, t.price
from ( 
  select i.*,
    row_number() over (
      partition by attr 
      order by case when dateOfValue = closingdate then 1 else 2 end, dateOfValue desc
    ) rn
  from InformationValues i
) t
where t.rn = 1;

BEGIN

dbms_output.put_line('Information             Value   ');
dbms_output.put_line('--------------------------------');
FOR d1_rec IN d1 LOOP
        dbms_output.put_line(d1_rec.attr || '             ' || d1_rec.price );
END LOOP;

END;

或者是一个过程,在该过程中我会大量收集所有东西,然后需要整理出所需的元组:

create or replace procedure print_inf_value(closingDate Date) is
TYPE d1 IS TABLE OF informationvalues%rowtype;
emps d1; 

begin select * bulk collect into emps 
from informationvalues;

FOR i IN 1 .. emps.COUNT LOOP
if emps(i).dateofvalue = closingDate then
dbms_output.put_line(emps(i).attr || '             ' || emps(i).price );
/*else*/

end if;
END LOOP;
END;

两者均无法正常工作,所以我缺少显示具有正确日期的元组的信息。

sql plsql procedure
1个回答
1
投票

请尝试:

CREATE OR REPLACE PROCEDURE print_inf_value (closingDate DATE)
IS
BEGIN
   DBMS_OUTPUT.put_line (RPAD ('ATTR', 20) || RPAD ('PRICE', 20));

   FOR o
      IN (select attr, trim(case when price < 1 then to_char(price,90.9) else to_char(price) end) price from (
            select attr, price, dateofvalue,
            row_number() over (partition by attr order by dateofvalue desc) rn from informationvalues
            ) i where dateofvalue = closingdate
            or (rn = 1 and not exists (select 1 from informationvalues iv where iv.attr = i.attr and dateofvalue = closingdate) ) 
        )
   LOOP
      DBMS_OUTPUT.put_line (RPAD (o.attr, 20) || RPAD ( o.price, 20));
   END LOOP;
END;

示例执行:

set serveroutput on;

begin
    print_inf_value(date'2019-01-01');
end;

输出:

ATTR                PRICE               
age                 2                   
electronics         0.5               
gender              3                   
hobbies             0.5               
homeAddress         7                   
maritalStatus       1                   
mobilePhone         5                   
musicTaste          0.1               
socialContacts      1        
© www.soinside.com 2019 - 2024. All rights reserved.