oracle的学习之基本语法

比较简单直接上代码

--使用基本变量类型
declare 
--定义基本变量类型
--基本数据类型
pnumber number(7,2);
--字符串变量
pname varchar2(20);
--日期变量
pdate date;

begin 
    pnumber := 1;
    dbms_output.put_line(pnumber);

    pname := 'Tom';
    dbms_output.put_line(pname);

    pdate := sysdate;
    dbms_output.put_line(pdate);

    --计算明天的日期
    dbms_output.put_line(pdate + 3);
end;
/

----------------------------------------------


--引用型变量
set SERVEROUTPUT ON

DECLARE
--定义和引用性变量：查询并打印7839的姓名和薪水
--pname varchar2(20);
--psal number;
pename emp.ename%type;
psal emp.sal%type;

begin
    select ename,sal into pename,psal from emp where EMPNO=7839;
    dbms_output.put_line('员工姓名：'||pename||'----员工薪水：'||psal);
end;
/


------------------



--使用记录性变量,查询并打印7839的姓名和薪水
set SERVEROUTPUT ON


declare 
--定义记录性变量：注意代表一行
emp_rec  emp%rowtype;
begin
    --得到7839 一行的信息
    select * into emp_rec from emp where empno=7839;

    dbms_output.put_line(emp_rec.ename);
end;
/



-------------------------------
/*
判断用户从键盘输入的数字
1.如何使用if语句
2.接收一个键盘的输入（字符串）
*/
set SERVEROUTPUT ON

--接受一个键盘输入
--num是在一个地址值，含义是：在该地址上保存了输入的值
accept num prompt '请输入一个数字';

DECLARE
--定义变量保存用户从键盘输入的数字
pnum number := #

begin 
--执行if语句进行条件判断
    if pnum = 0 then dbms_output.put_line('您输入的值为0');
    elsif pnum = 1 then dbms_output.put_line('您输入的数字为1');
    elsif pnum = 2 then dbms_output.put_line('您输入的数字为2');
    else DBMS_OUTPUT.PUT_LINE('其他数字');
    end if;
end;
/

--------------------------------------
--使用while循环打印数字的1-10
set SERVEROUTPUT ON


DECLARE
--定义一个变量
pnum number := 1;

begin 
    while pnum <= 10 loop
        --循环体
        dbms_output.put_line(pnum);
        pnum := pnum + 1;
    end loop;
end;
/

---------------------------------------------
-- 使用loop循环打印数字的1-10
set SERVEROUTPUT ON

declare 

--定义循环变量
pnum number:=1;

begin
    loop
        DBMS_OUTPUT.PUT_LINE(pnum);
        --退出循环条件：循环变量大于10；
        exit when pnum > 10;

        --打印该变量的值
        DBMS_OUTPUT.PUT_LINE(pnum);
        pnum := pnum+1;
    end loop;

end;
/


---------------------------------------


set SERVEROUTPUT ON

declare
punum number := 1;
begin
    for pnum in 1..10 loop
        DBMS_OUTPUT.PUT_LINE(pnum);
    end loop;
end;
/