в 13:45, 26 мая 2010

2010-05-26T13:45:19Z

Admin: 1 версия

2010-05-26T09:59:10Z

1 версия

Новая страница

==Compare date type variable in PL/SQL block==



<source lang="sql">

SQL> -- create demo table
SQL> create table emp(
2 ID VARCHAR2(4 BYTE) NOT NULL,
3 fname VARCHAR2(10 BYTE),
4 lname VARCHAR2(10 BYTE),
5 Start_Date DATE,
6 End_Date DATE,
7 Salary Number(8,2),
8 City VARCHAR2(10 BYTE),
9 Description VARCHAR2(15 BYTE)
10 )
11 /
Table created.
SQL>
SQL>
SQL>
SQL> -- prepare data
SQL> insert into emp(ID, fname, lname, Start_Date, End_Date
, Salary, City, Description)
2 values ("01","Jason", "Martin", to_date("19960725","YYYYMM
DD"), to_date("20060725","YYYYMMDD"), 1234.56, "Toronto", "Programmer")
3 /
1 row created.
SQL> insert into emp(ID, fname, lname, Start_Date, End_Date
, Salary, City, Description)
2 values("02","Alison", "Mathews", to_date("19760321","YYYYMM
DD"), to_date("19860221","YYYYMMDD"), 6661.78, "Vancouver","Tester")
3 /
1 row created.
SQL>
SQL>
SQL> declare
2 dateValue date;
3 s Number(8,2);
4 begin
5 select start_date into dateValue from emp where rownum = 1;
6 select salary into s from emp where rownum = 1;
7
8 IF dateValue > "11-APR-63" then
9 s := s * 1.15;
10 END IF;
11
12
13 dbms_output.put_line(s);
14 end;
15 /
1419.74
PL/SQL procedure successfully completed.
SQL>
SQL> drop table emp;
Table dropped.
SQL>

</source>

==Date comparison example==



<source lang="sql">

SQL> -- Date comparison example.
SQL> SET SERVEROUTPUT ON
SQL>
SQL> DECLARE
2 payment_due_date DATE;
3 BEGIN
4 payment_due_date := TO_DATE("1-Jun-1997","dd-mon-yyyy");
5
6 DBMS_OUTPUT.PUT_LINE("Today is " || TO_CHAR(SYSDATE,"dd-Mon-yyyy"));
7 DBMS_OUTPUT.PUT_LINE("Payment is due on " || TO_CHAR(payment_due_date,"dd-Mon-yyyy"));
8
9 IF payment_due_date = SYSDATE THEN
10 DBMS_OUTPUT.PUT_LINE("Payment is due today.");
11 ELSE
12 DBMS_OUTPUT.PUT_LINE("Payment can wait a while.");
13 END IF;
14
15 IF TRUNC(payment_due_date) = TRUNC(SYSDATE) THEN
16 DBMS_OUTPUT.PUT_LINE("Wrong! Payment is due today!");
17 ELSE
18 DBMS_OUTPUT.PUT_LINE("Wrong! Payment can wait a while.");
19 END IF;
20 END;
21 /
Today is 31-Aug-2006
Payment is due on 01-Jun-1997
Payment can wait a while.
Wrong! Payment can wait a while.
PL/SQL procedure successfully completed.
SQL>
SQL>

</source>

← Предыдущая	Версия 13:45, 26 мая 2010
(нет различий)

Oracle PL/SQL/PL SQL/DATE Compare - История изменений

в 13:45, 26 мая 2010

Admin: 1 версия