sznew.txt

DOS下一个完整的大型程序源代码

  *** 两张盘的内容完全一样 ***

  先在08机脱机台运行A:\NEWSZ.BAT, 把A:\SZ目录的文件拷入C:\SZ

一.话费现场收缴系统:

  1.更新软件之前, 请仍从原脱机台拷贝出MONBU文件, 任何月份的都可以, 最好是
3月份的, 使用旧的软件装入数据, 脱收序号段可以随便设置.
    数据装入的目的只在于汇总出2月份的欠费和催缴数据, 供新软件转换后使用.
    数据装入后使用原软件可以查询(输入电话号码后按光标向上移动键使光标回到
电话号码栏)到2月份未交费的用户有欠费和滞纳金.

  2.退出原软件, 进入A驱动器, 在A:\>提示符下运行NEWSJ.EXE即可. 该程序自动
完成软件的更新和旧软件数据到新软件的转换.
    在新软件中, 可以查询2月份的日志, 可以统计2月份的收费情况.

    NEWSJ.EXE的运行过程如下:  *** 自动执行, 无需人工干预 ***
  1)检查原软件SJ子目录有没有2月份的欠费数据, 如果没有, 则提示:
Please install March data first using the old SJ software! ( 请先使用原
软件装入3月份的数据! ) 即要求执行步骤1.
  2)把原软件的子目录SJ更名为SJ.OLD, 即保留旧软件. ( Now keeping old SJ: )
  3)重建SJ子目录, 并把C盘SJ.OLD子目录下的文件拷到C盘SJ子目录(调用XCOPY).
    ( Now copying  SJ: ) 并把A盘SJ子目录下的文件拷到C盘SJ子目录(调用XCOPY).
    ( Now updating SJ: 即更新四个文件: Sj.exe Sj.dbf Log.dbf Qf.dbf )
    新旧软件的文件数目和各文件的文件名都不变.
  4)转换旧软件的日志数据LOG.DBF到新软件中来.( Now converting LOG.DBF: ... )
  5)转换旧软件的欠费数据 Qf.DBF到新软件中来.( Now converting QF.DBF: ... )
  6)完毕! ( The end. OK!!! )

  3.新软件和旧软件的功能和操作方法都完全一样. 插好数据盘(由sz.bat生成)
后选择[维护]菜单下的[重装当月数据], 装完后即可进行收缴.

    数据装入时设置脱收序号段的序号就是指的合同号, 与旧软件不一样!!!

二.磁卡查询系统:
  在磁卡查询系统运行A:\NEWCC.BAT即完成软件更新.

  收缴系统的收缴数据库(现为monbu.dbf)以及磁卡查询系统的用户档案数据库
ccuser.dbf和长话话单数据库cc.dbf直接在新计费台由sz子目录下的sz.bat
(调用foxbase程序sz.prg)生成. 生成完后monbu.dbf, ccuser.dbf
拷到一张软盘上, cc.dbf压缩到几张软盘上. 过程如下:
  1.进入sz子目录, 运行sz.bat
  2.自动进入foxbase生成monbu.dbf, ccuser.dbf和cc.dbf, 提示
      "正在生成收缴数据库..."( 运行MakeSj.prg ) 和
      "正在生成用户档案数据库..."( 运行MakeSj.prg )  和
      "正在生成长话话单数据库..."
    生成完后先提示:
      "请准备好软盘以拷贝收缴库MONBU.DBF, 按任意键开始..."( 运行CopyFile.bat )
  4.拷完后提示:
      "请准备好软盘以拷贝用户档案数据库CCUSER.DBF, 按任意键开始..."
  5.拷完后提示:
      "请准备好几张空盘以压缩长话话单数据库CC.DBF, 按任意键开始...
       (压缩命令为: arj a -v1440 a:\cc.arj cc.dbf)"
    准备好几张空盘, 压缩完一张后ARJ会提示换盘, 敲y键回车后继续.
  4.每张盘最好写上标签. 第一张盘文件为cc.arj, 第二张为cc.a01, 第二张为cc.a02,
    依此类推.

  *** 磁卡查询系统的用户档案更新:
  把装有ccuser.dbf文件的软盘插入软驱, 选择[维护]菜单下[更新用户档案].

  *** 磁卡查询系统的数据装入:
  1.退出系统, 进入cc子目录. 把话单的第一张盘插入软驱.
  2.运行n.exe即可.
    n.exe自动调用arj.exe进行解压缩(命令为arj e -v a:\cc), 解压缩完一张后
  ARJ会提示换盘, 敲y键回车后继续.

  *** 重装当月数据:
  命令为: n /r

  *** n.exe的提示:
  Reinstall current month data
    -> 重装当月数据
  Current month data had been installed, you can reinstall it
    -> 本月数据已装入，您可以重装当月数据

另: TW.EXE为世界上最小的汉字系统