新手请教,这个错误在哪
//s_fltz中定义了string xh string bh demi tjcs demi jzcs 在s_tjrz中定义了string xh string bh data syrq demi cs
s_fltz fltz
s_tjrz tjrz[]
int fltzrow
int rzrow
int i,j
string sqlsource
dw_tj.dataobject="d_tj2"
dw_tj.settransobject(sqlca)
sqlsource=dw_tj.getsqlselect()
dw_tj.setsqlselect(sqlsource)
dw_tj.retrieve()
fltzrow=dw_tj.rowcount()
fltz[]=dw_tj.object.data
dw_tj.dataobject="d_tj1"
dw_tj.settransobject(sqlca)
sqlsource=dw_tj.getsqlselect()
dw_tj.setsqlselect(sqlsource)
dw_tj.retrieve()
rzrow=dw_tj.rowcount()
tjrz[]=dw_tj.object.data
For i=1 to rzrow
j=1
again:if tjrz[i].xh=fltz[j].xh and tjrz[i].bh=fltz[j].bh
then fltz[j].tjcs=fltz[j].tjcs+tjrz[i].cs
else
j=j+1
do until j>fltzrow
goto again
loop
end if
next
for j=1 to fltzrow
fltz[j].tjcs=fltz[j].jzcs+fltz[j].tjcs
next