使用隐式 cursor 编写一个 PL/SQL 程序，在屏幕上显示整个表 OILPRICE 和第三列

Question

表数据：

01-FEB-21   2.25
02-FEB-21   2.36
03-FEB-21   2.47
04-FEB-21   2.51
05-FEB-21   2.4

问题

使用隐式 cursor 编写一个 PL/SQL 程序，该程序在屏幕上显示整个表 OILPRICE，第三列（更改；表中不存在），格式如下：

Date= 01-FEB-21 Price= 2.25 Change= 0
Date= 02-FEB-21 Price= 2.36 Change= + 
Etc.

现在这里解释如何计算变化值。

• 如果当前行中的 Price 比 PREVIOUS 行中的值大 0.1 以上，则打印一个 + 作为 Change 的值。

• 如果当前行中的价格比上一行中的值小 0.1 以上，则打印 -（减号）作为 Change 的值。

• 如果当前行与上一行价格差的绝对值小于 0.1，则 Change 的值应为 0。

• 在第一行中，Change 的值应为 0。

Cursor 我做了

begin
        for implicit_cursor in
             (select * from oilprice)
        loop
            dbms_output.put_line(
            'Date= ' || implicit_cursor.dateline 
            || '  ' || 'Price= '|| implicit_cursor.price
        );
       end loop;
end;  

您可以在上面的代码中添加第三列，也可以自己制作。

谢谢！！！

Answer 1

样本数据：

SQL> alter session set nls_date_format = 'dd.mm.yyyy';

Session altered.

SQL> select * from test order by datum;

DATUM           PRICE
---------- ----------
01.02.2021       2,25
02.02.2021       2,36
03.02.2021       2,47
04.02.2021       2,51
05.02.2021        2,4

PL/SQL 匿名块，它可以满足您的需求。 如何？ 它使用lag分析 function 获取前一行的price并将其与当前行的值进行比较以计算change值。

SQL> begin
  2    for cur_r in
  3      (select datum,
  4              price,
  5              lag(price) over (order by datum) previous_price,
  6              --
  7              case when price - lag(price) over (order by datum) > 0.1 then '+'
  8                   when price - lag(price) over (order by datum) < 0.1 then '-'
  9                   else '0'
 10              end as change
 11       from test
 12       order by datum
 13      )
 14    loop
 15      dbms_output.put_line
 16      ('Date = '     || to_char(cur_r.datum, 'dd.mm.yyyy') ||
 17       '  Price = '  || to_char(cur_r.price, 'fm999G990D00') ||
 18       '  Change = ' || cur_r.change
 19      );
 20    end loop;
 21  end;
 22  /
Date = 01.02.2021  Price = 2,25  Change = 0
Date = 02.02.2021  Price = 2,36  Change = +
Date = 03.02.2021  Price = 2,47  Change = +
Date = 04.02.2021  Price = 2,51  Change = -
Date = 05.02.2021  Price = 2,40  Change = -

PL/SQL procedure successfully completed.

SQL>