打印本文 打印本文 关闭窗口 关闭窗口
几十个实用的PL/SQL(4)
作者:武汉SEO闵涛  文章来源:敏韬网  点击数3822  更新时间:2007/11/14 11:08:09  文章录入:mintao  责任编辑:mintao
       vsal emp.sal%TYPE;

       vmesg CHAR(50);

BEGIN

       SELECT job,sal INTO vjob,vsal FROM emp WHERE empno=no;

       IF vjob=''''CLERK'''' THEN

              IF vsal>=1500 AND vsal<=2500 THEN

                     vmesg:=''''Salary is OK.'''';

              ELSE

                     vsal:=1500;

                     vmesg:=''''Have updated your salary to ''''||TO_CHAR(vsal);

              END IF;

       ELSIF vjob=''''SALESMAN'''' THEN

              IF vsal>=2501 AND vsal<=3500 THEN

                     vmesg:=''''Salary is OK.'''';

              ELSE

                     vsal:=2501;

                     vmesg:=''''Have updated your salary to ''''||TO_CHAR(vsal);

              END IF;

       ELSIF vjob=''''ANALYST'''' THEN

              IF vsal>=3501 AND vsal<=4500 THEN

                     vmesg:=''''Salary is OK.'''';

              ELSE

                     vsal:=3501;

                     vmesg:=''''Have updated your salary to ''''||TO_CHAR(vsal);

              END IF;

       ELSE

              IF vsal>=4501 THEN

                     vmesg:=''''Salary is OK.'''';

              ELSE

                     vsal:=4501;

                     vmesg:=''''Have updated your salary to ''''||TO_CHAR(vsal);

    

上一页  [1] [2] [3] [4]  下一页

打印本文 打印本文 关闭窗口 关闭窗口