为什么会重复打印??

beyondxuwei 2004-10-08 01:46:05
总是重复打同一个,而且都是最后一个数据的内容

代码如下 :
int pid,cid
long job

pid = message.DoubleParm

declare cursor1 cursor for select autoid from preciousstone where pid=:pid ;
open cursor1;

datastore pt_datastore
pt_datastore = create datastore
pt_datastore.dataobject = "d_precious_print_big"
pt_datastore.settransobject(sqlca)

do while sqlca.sqlcode =0
fetch cursor1 into :cid;
job = PrintOpen()
pt_datastore.retrieve(cid)
PrintDataWindow(job, pt_datastore)
loop
close cursor1;
...全文
142 5 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
beyondxuwei 2004-10-09
  • 打赏
  • 举报
回复
是不是作业号相同就会出来这个问题?
我试了一下楼上大哥的代码,不行哦,一样的
yzh963 2004-10-08
  • 打赏
  • 举报
回复
你只分配了一个业号,打印时只有最后一个被打印,并且打印后要关闭作业:
试试下面的代码,如查不行只能循环设置作业号:
do while sqlca.sqlcode =0
fetch cursor1 into :cid;
if sqlca.sqlcode = 0 then
job = PrintOpen()
pt_datastore.retrieve(cid)
PrintDataWindow(job, pt_datastore)
printclose(job)
else
exit
end if
loop

yl_yz 2004-10-08
  • 打赏
  • 举报
回复
试试
do while sqlca.sqlcode =0
fetch cursor1 into :cid;
if sqlca.sqlcode = 0 then
job = PrintOpen()
pt_datastore.retrieve(cid)
PrintDataWindow(job, pt_datastore)
else
exit
end if
loop
beyondxuwei 2004-10-08
  • 打赏
  • 举报
回复
没有人知道吗??
你们是怎样连续打印的?
beyondxuwei 2004-10-08
  • 打赏
  • 举报
回复
还有,在打印的时候,那个打印的窗口总是不响应

611

社区成员

发帖
与我相关
我的任务
社区描述
PowerBuilder DataWindow
社区管理员
  • DataWindow社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧