dyfy.prg

来自「使用VFP编写的信用社系统专用会计报表系统,可上报,汇总,打印.是一款优秀的信用」· PRG 代码 · 共 29 行

* -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
*  文件名: DYFY.PRG <-- 本文件由 UnFoxAll 创建
* -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-


 IF 1 = 0
 SET DEFAULT TO \xbbjs
 MMBZ4 = '4'
 ENDIF 
 M_BH = '00'
 DO FORM CURDIR() + 'src\form\gong2'
 SS = M_BH
 IF SS = '00'
 CLOSE DATABASES 
 RETURN 
 ENDIF 
 IF  .NOT. USED('BZL')
 USE .\LIB\BZL.dat
 ENDIF 
 SELECT BZL
 LOCATE FOR BH = M_BH
 M_BM = BM
 USE 
 RELEASE M_BH
 DO FORM CURDIR() + 'src\form\dyfy'
 RELEASE SS
 CLOSE DATABASES 
*