RT

解决方案 »

  1.   

    select a.kfbh,b.kfmc,char(nf)||char(yf) ny,a.wlbh,c.wlmc,c.ggxh,syyl,syye,(cgrkl+dbrkl+pyrkl+bsrkl+ykrkl) rkzl,(cgrke+dbrke+pyrke+bsrke+ykrke) rkze,(xsckl+dbckl+ykckl) ckzl,(xscke+dbcke+ykcke) ckze,a.nf,a.yf
    from T_kcsp3jz a,T_kf b,T_wldy c
    where a.wlbh=c.wlbh and a.jgbh=b.jgbh and a.kfbh=b.kfbh and  a.jgbh='003-02'
    and (nf*12+yf)=(select case when min(nf*12+yf) is null then 0 else min(nf*12+yf) end from T_kcsp3jz d
    where d.jgbh=a.jgbh and jzbj='0') and a.jzbj='0'
      

  2.   

    呵呵,如何执行的,提示什么错误,是不是用string类型,字符长度超限了。
      

  3.   

    FSQL='UpDate  VplateRitfy set Re1='''+Trim(Mre1.Text)     +''',state=''233'' ';
      

  4.   

    入彀,在delphi里看不清楚这个SQL语句,那把这句话赋值给一个lable,看执行生成的SQL语句到底是什么。在lable中看到的SQL语句跟SQL EXPLORE中一样,可能就行了。
    我一般就用这个方法调试程序,100%高效!