tz_hm.prg

来自「建设银行设备台帐管理程序 固定资产管理 VB数据库编程」· 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