hur.cn - 华软网

 热门搜索

在PB9.0 Build 5507下,我以前用PB6.5写的程序出现问题了?

  作者:未知    来源:网络    更新时间:2019/4/16
PB9.0 Build 5507下,我以前用PB6.5写的程序出现问题了?


我是动态Modify数据窗口的值,数据窗口是GRID型的,MODIFY前往值是成功的,
然则显示出来不正确,不知道为什么?在PB6.5下是好用的,可升到PB9.0下确欠好用了,
究竟是怎么回事呀?请能帮帮我呀?


/*-------------------------隐藏所有的字段--------------------------*/
k = gds_ddf.retrieve(gs_pd)

for i = 1 to k
ls_en = gds_ddf.getitemstring(i,"f_en")
ls_modi_str = ls_modi_str+ls_en + ".width = 0 "+ls_en + ".visible = 0 " + ls_en + ".tabsequence = 0 "
next

ls_modi_str = dw_dtl.modify(ls_modi_str)
if ls_modi_str<>'' then MESSAGEBOX('',ls_modi_str)

if ii_book3_f <> 1 then return//不存留三级帐科目




/*-------------------------显示指定字段---------------------------*/
ls_en = 'F_SUBREC'
ls_modi_str = ""
n = gds_ddf.find("upper(f_en)='"+ls_en+"'",1,k)
if n > 0 and ii_fmt_rows <> 0 then
ls_cn = gds_ddf.getitemstring(n,"f_cn")
ls_width = gds_ddf.getitemstring(n,"f_width")
ls_modi_str = ls_modi_str +ls_en + "_t.width = "+ls_width+" "+&
ls_en + "_t.text='"+ls_cn+"' "+&
ls_en + "_t.visible = 1 "+&
                     ' t_'+ls_en + ".width = "+ls_width+" "+&
' t_'+ls_en + ".text = '合计' "+&
' t_'+ls_en + ".visible = 1 "+&
ls_en + ".width = "+ls_width+" "+&
ls_en + ".visible = 1 "+&
ls_en + ".color = '0 ~tIf(getrow()=currentRow(), rgb(217,231,240),rgb(255,255,255))'"
messagebox('',ls_modi_str)
ls_modi_str = dw_dtl.modify(ls_modi_str)

if ls_modi_str<>'' then MESSAGEBOX('F_SUBREC',ls_modi_str)
end if   id='topic-extra-info'>   class='social-share' > 更多 分享到:       marginwidth="0" marginheight="0" scrolling="no" width="100%">   id="bd_ad_2" style="margin:0; padding-bottom:5px; display:block; text-align: center">     class="adtxt">
          id="topic-suggest">   id="real_topic">   class="related-tags" id="suggest_tags">     class="related-topics tracking-ad" data-pid="bbs" data-mod="popu_18" id="suggest_topics">     class="related-topics" data-pid="bbs" data-mod="popu_84" id="suggest_course">        
华软声明:本内容来自网络,如有侵犯您版权请来信指出,本站立即删除。