form_set.prg

来自「门诊收费管理系统」· PRG 代码 · 共 38 行

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


 SET TALK OFF
 SET ECHO OFF
 IF TYPE('m.gs_adt') = 'C'
    SET RESOURCE OFF
 ELSE 
    SET RESOURCE ON
 ENDIF 
 SET NOTIFY OFF
 SET EXCLUSIVE OFF
 SET SAFETY OFF
 SET DECIMALS TO 4
 SET EXACT ON
 SET DATE ansi
 SET CENTURY ON
 SET STATUS BAR OFF
 SET DEVELOPMENT ON
 SET DELETED ON
 SET LOGERRORS ON
 SET CONFIRM OFF
 SET HEADING ON
 SET DELETED ON
 SET OPTIMIZE ON
 SET UNIQUE OFF
 SET CPDIALOG OFF
 SET REFRESH TO 0 , 5
 SET BLOCKSIZE TO 64
 SET REPROCESS TO 0
 SET COLLATE TO 'PINYIN'
 SET HOURS TO 24
 SET ESCAPE OFF
 SET DATE TO ansi
*