几十个实用的PL/SQL(3)--打印文章

几十个实用的PL/SQL(3)

作者：武汉SEO闵涛文章来源：敏韬网点击数6078 更新时间：2007/11/14 11:08:21 文章录入：mintao 责任编辑：mintao

=x.job;

vemp(i).mgr:=x.mgr;

vemp(i).hiredate:=x.hiredate;

vemp(i).sal:=x.sal;

vemp(i).comm:=x.comm;

vemp(i).deptno:=x.deptno;

i:=i+1;

END LOOP;

-- FOR j IN 1..i-1

-- LOOP

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

-- DBMS_OUTPUT.PUT(vemp(j).mgr||'''' ''''||vemp(j).hiredate||'''' ''''||vemp(j).sal);

-- DBMS_OUTPUT.PUT_line(vemp(j).comm||'''' ''''||vemp(j).deptno);

-- END LOOP;

--插入记录

DBMS_OUTPUT.PUT_LINE(''''插入记录:'''');

vemp(i).empno:=1000;

vemp(i).ename:=''''Goldens'''';

vemp(i).job:=''''Software'''';

vemp(i).mgr:=null;

vemp(i).hiredate:=''''2003-01-04'''';

vemp(i).sal:=8888;

vemp(i).comm:=10;

vemp(i).deptno:=10;

FOR j IN 1..i

LOOP

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

DBMS_OUTPUT.PUT(vemp(j).mgr||'''' ''''||vemp(j).hiredate||'''' ''''||vemp(j).sal);

DBMS_OUTPUT.PUT_line(vemp(j).comm||'''' ''''||vemp(j).deptno);

END LOOP;