关于游标的问题--请大家指点(页 1) - PowerBuilder - 编程论坛

zuiainaitang 发表于 2007-6-13 15:58

关于游标的问题--请大家指点

最近在做课程设计--工资管理信息系统，我建了四张表：员工表employee(员工号emp_id、姓名emp_name、性别sex、部门号dept_id)、部门表dept（部门号dept_id、部门名称dept_name、月基本工资salary、津贴allow）、考勤表kaoqin(员工号emp_id、月份kmonth、加班时间jiaban、 事假天数shija)、月工资表msalary（员工号emp_id、月份mmonth、月工资m_salary） 现在做月工资的生成，月工资=部门基本工资+加班时间*津贴-事假*50 在窗口OPEN时间有如下代码，用来向ddlb_1填充1到12个数字，代表的是月份 string j int i for i=1 to 12 step 1 j=string(i) ddlb_1.additem(j) next 下面是生成按钮CLICKED下的代码 integer i,allow,jiaban,shijia i=integer(ddlb_1.text) long salary,extr=0 string emp,dept,j declare xx cursor for //定义游标 XX，从员工表employee中取出员工号emp_id和部门号dept_id select emp_id,dept_id from employee; open xx; fetch xx into :emp,:dept; do while sqlca.sqlcode=0 if trim(emp)="" then continue; end if ddlb_2.additem(dept_id)//ddlb_2是我用来检测有没有取到部门号，结果是取到了，ddlb_2出现所有的部门号 select salary,allow into :salary,:allow from dept where dept_id=:dept;//从部门表dept表中取出月基本工资salary和津贴allow
 j=string(allow) ddlb_3.additem(j) //用来检测有没有取到salary和allow,可结果是前面的全为空（没有数值），只有最后一个有数值，大概问题就出在这里 
 select jiaban,shijia into :jiaban,:shijia from kaoqin where emp_id=:emp_id and kmonth=:i; extr=salary+allow*jiaban+shijia*(-50) insert into msalary values(:emp_id,:i,:extr); extr=0 fetch xx into :emp,:dept; loop close xx; 我在一本书上看到这个时候该用游标嵌套，各位高手看看该怎么解决，为什么在游标里面用SELECT语句取不出所有数字，只能取最后一个数字， 我这个程序又该怎么写才好！ 请指教！！

路過发表于 2007-6-18 08:58

感覺寫的怪怪的，有一點煩鎖。 把上面的next放到最後（close xx;） 試一下看看行不行

sam2080 发表于 2007-6-28 16:51

可以用DEBUG跟踪下 然后判断下 ddlb_3.additem(j)的返回值是否有问题

页: [1]

编程论坛's Archiver

关于游标的问题--请大家指点