tz_hm.prg

来自「--- 建设银行帐户管理系统 visual foxpro代码--- 。」· PRG 代码 · 共 15 行

     set compatible on

   if !used('gxdw')
       use gxdw alias gxdw in select()
   endif
   if !used('xjhm')
      use xjhm alias xjhm in select()
   endif
   if !used('sbyt')
      use sbyt alias sbyt in select()
   endif
   if !used('hmk')
      use hmk alias hmk in select()
   endif           
   do form tz_hm name tz_hm