企业管理软件代码阅读报告pkb5ijfe.doc

  1. 1、本文档共12页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
企业管理软件代码阅读报告pkb5ijfe

李龙跃 2008145551 李文龙 2008145552 刘新宇 2008145565 一.软件架构描述 《华能日照电厂管理信息系统》是一个基于C/S软件体系结构的管理信息系统,各个模块在逻辑上保持相对独立性,整个系统的逻辑结构清晰,从而提高了本系统的可维护性和扩展性,并且可以使用多个客户端,方便日常使用和管理。 二.软件功能描述 该系统客户端操作界面如上图所示,包括燃料管理、档案管理、商业运营、财务预算等,不仅功能齐全,而且界面清晰简洁,方便使用者快速掌握使用方法,并且提供了不同的使用权限,通过不同颜色提示用户的操作权限,简洁明了,既方便了使用,又简化了界面开发过程。可以预见,通过该界面可以基本满足客户的日常工作的需求,系统化生产过程,便于统筹管理,节约人力物力。 系统管理模块如上图所示,实现用户等数据的增加、修改、删除、查找。在此模块中,使用了索引,可以方便使用者的正常操作,并且可以在一定程度上避免使用者的操作错误,并且便于管理。 所用算法描述 int i,li_lendec,li_lenint int li_amout_flag string ls_numstr,a,b,c,d,bbak string ls_dxint[13],ls_dxdec[2],ls_sz[13] string ls_dxstr=万仟佰拾亿仟佰拾万仟佰拾元 string ls_szstr=零壹贰叁肆伍陆柒捌玖 if ad_amout = 0.00 then ls_dxstr = 零元整 return ls_dxstr else if ad_amout 0.00 then ad_amout = abs(ad_amout) li_amout_flag = 1 end if end if ls_numstr=string(ad_amout,#0.00) li_lenint=len(mid(ls_numstr,1,pos(ls_numstr,.) - 1)) if right(ls_numstr,2)=00 then li_lendec=0 else li_lendec=2 end if for i=1 to 13 ls_dxint[i]=mid(ls_dxstr,26 - i*2+1,2) if i11 then ls_sz[i]=mid(ls_szstr,i*2 - 1,2) else ls_sz[i]= end if next ls_dxdec[1]=角 ls_dxdec[2]=分 ls_dxstr= for i = 1 to li_lenint a = mid(mid(ls_numstr,1,li_lenint),i,1) b = ls_sz[integer(a)+1] c = ls_dxint[li_lenint - i +1] if ls_dxstr then d = mid(ls_dxstr,len(ls_dxstr) - 1 ,2) else d = end if if b=零 and (d=零 or b=bbak or c=元 or c=万 or c=亿) then b= if a=0 and c元 and c万 and c亿 then c= if (c=元 or c=万 or c=亿) and d=零 and a=0 then ls_dxstr=mid(ls_dxstr,1,len(ls_dxstr) - 2) d = mid(ls_dxstr,len(ls_dxstr) - 1,2) if (c=元 and d=万 or c=万and d=亿) then c= end if ls_dxstr=ls_dxstr + b + c bbak = b next for i=1 to li_lendec a = mid (mid(ls_numstr,li_lenint+2,li_lendec),i,1) if a=0 and ls_dxdec[i]=分 then b= else b=ls_sz[integer(a) + 1] end if if a0 then ls_dxstr=ls_dxstr+b+ls_dxdec[i] else ls_dxstr=ls_dxstr+b end if next if li_lendec=0 then ls_dxstr=ls_dxstr+整 if ad_amout 1.00 then ls_dxstr = 零 + trim(ls_dxstr ) if li_amout_flag = 1 then ls_dxstr = 负 +

文档评论(0)

beoes + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档