打印本文 打印本文 关闭窗口 关闭窗口
几十个实用的PL/SQL(3)
作者:武汉SEO闵涛  文章来源:敏韬网  点击数6078  更新时间:2007/11/14 11:08:21  文章录入:mintao  责任编辑:mintao
       --删除第56条记录

       DBMS_OUTPUT.PUT_LINE(''''删除第56条记录:'''');

       FOR j IN 5..i-2

       LOOP

              vemp(j).empno:=vemp(j+2).empno;

              vemp(j).ename:=vemp(j+2).ename;

              vemp(j).job:=vemp(j+2).job;

              vemp(j).mgr:=vemp(j+2).mgr;

              vemp(j).hiredate:=vemp(j+1).hiredate;

              vemp(j).sal:=vemp(j+2).sal;

              vemp(j).comm:=vemp(j+2).comm;

              vemp(j).deptno:=vemp(j+2).deptno;

       END LOOP;

       vemp(i-1).empno:=null;

       vemp(i-1).ename:=null;

       vemp(i-1).job:=null;

       vemp(i-1).mgr:=null;

       vemp(i-1).hiredate:=null;

       vemp(i-1).sal:=null;

       vemp(i-1).comm:=null;

       vemp(i-1).deptno:=null;

       vemp(i).empno:=null;

       vemp(i).ename:=null;

       vemp(i).job:=null;

       vemp(i).mgr:=null;

       vemp(i).hiredate:=null;

       vemp(i).sal:=null;

       vemp(i).comm:=null;

       vemp(i).deptno:=null;

 

       FOR j IN 1..i-2

       LOOP

              DBMS_OUTPUT.PUT(vemp(j).empno||''''  ''''||vemp(j).ename||'''' ''''||vemp(j).job);

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

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