main.prg

来自「利用计算机支持企业高效率完成进销存管理的日常事务」· PRG 代码 · 共 16 行

set talk off
set safety off
set delete on
set century on
set date to ymd
set debug off
close all
ZOOM window screen max
release window standard
public mypath
mypath=SYS(5)+SYS(2003)
set default to (mypath)
do form 111111
read events
clear events
quit