欢迎来到Doc100.Net免费学习资源知识分享平台!
您的位置:首页 > 程序异常 >

问一个plsql的有关问题。多谢

更新时间: 2014-01-05 02:10:33 责任编辑: Author_N1

 

问一个PLSQL的问题。。。谢谢

create or replace 
PROCEDURE PAID_REPORT 
(
  PAYMENT_STATUS IN VARCHAR2  
) AS

linecount number(4);
linecounttwo number(4);
--animal varchar2 (12);
animaltype varchar2(12);
visitid number (6);
 
cursor vetCursor is 
select pb_vet.vetid,visitid,lastname,firstname
from pb_visit,pb_vet
where pb_visit.vetid = pb_vet.vetid
and pb_visit.status = PAYMENT_STATUS
order by lastname, firstname;
vetRow vetCursor%rowtype;

cursor visitCursor is
select visitid,name,lastname,firstname
from pb_client,pb_animal,pb_visit
where pb_client.cliEntid=pb_animal.clientid
and pb_visit.animalid=pb_animal.animalid
and status = PAYMENT_STATUS;
visitRow visitCursor%rowtype;

BEGIN
linecounttwo:=0;
open visitCursor;
loop
fetch visitCursor
into visitRow;
exit when visitCursor%notfound;
linecounttwo:=linecounttwo+1;

end loop;


  linecount:=0;
  open vetCursor;
  loop
  fetch vetCursor
  into vetRow;
  
  exit when vetCursor%notfound;
  dbms_output.put_line('Veterinarian ID: '||vetRow.vetid||'   '||vetRow.lastname||','||vetRow.firstname);  

   linecount:=linecount+1;
  end loop;
  close vetCursor;
END PAID_REPORT;


这个打完之后会返回几行VET ID 和ID的相关信息
      我希望在每一行下面要列出一些VET相关的信息,需要调用返回的这个vet ID,也就是说每返回一个ID的话,就需要把这个ID当成一个参数来查询一些相关信息。 现在这个vet ID就是一行行打出来,就是不知道如何调用。

怕我表达的不清楚,换个形象的例子

CLASS ID:  0001          English
         Student A    19
         Student B    21

CLASS ID:  0004          Maths
         Student A    19
         Student B    21
相当于我现在class的那行已经有了,现在就是想列出和每个class相关的student。。。。
上一篇:上一篇
下一篇:下一篇

 

随机推荐程序问答结果

 

 

如对文章有任何疑问请提交到问题反馈,或者您对内容不满意,请您反馈给我们DOC100.NET论坛发贴求解。
DOC100.NET资源网,机器学习分类整理更新日期::2014-01-05 02:10:33
如需转载,请注明文章出处和来源网址:http://www.doc100.net/bugs/t/6543/
本文WWW.DOC100.NET DOC100.NET版权所有。