游标使用出错
li_cs=1
declare lcur_yb cursor for
select MS_CF01.fphm from MS_CF01, MS_MZXX where MS_MZXX.BRID = MS_CF01.BRID and kfrq>= :ld_begin and kfrq<= :ld_end and ysdm=:ls_sle and fyck=1 and MS_MZXX.brxz=:ll_brxz and MS_MZXX.sjfp = MS_CF01.fphm and MS_MZXX.zfpb=0;
open lcur_yb;
fetch lcur_yb into :ls_fphm

do while sqlca.sqlcode = 0
a=ls_fphm

fetch lcur_yb into :ls_fphm
b=ls_fphm
if a <> b then
li_cs+=
end if
loop
close lcur_yb;
dw_1.object.cfs[ll_row] = li_cs

[解决办法]

C/C++ code

li_cs=1declare lcur_yb cursor forselect MS_CF01.fphm from MS_CF01, MS_MZXX where MS_MZXX.BRID = MS_CF01.BRID and kfrq>= :ld_begin and kfrq<= :ld_end and ysdm=:ls_sle and fyck=1 and MS_MZXX.brxz=:ll_brxz and MS_MZXX.sjfp = MS_CF01.fphm and MS_MZXX.zfpb=0;open lcur_yb;fetch lcur_yb into :ls_fphm;    do while sqlca.sqlcode = 0       a=ls_fphm    fetch lcur_yb into :ls_fphm;    b=ls_fphm    if a <> b then        li_cs += 1    end if  loop  close lcur_yb;dw_1.object.cfs[ll_row] = li_cs
[解决办法]
fetch lcur_yb into :ls_fphm
后面要加分号
fetch lcur_yb into :ls_fphm;

li_cs+=
语法错误，应为
li_cs += 1
或者
li_cs ++

[解决办法]
fetch lcur_yb into :ls_fphm 之后少了分号
[解决办法]
三楼正解，遗漏两个分号和一个常量值