setpr.prg

一个功能较单一的企业工资管理系统。用FoxPro开发

STORE PRINTSTATUS() TO glReady
IF NOT glReady
	=messagebox("打印机未准备好，请检查！",0+48,"信息提示")
ELSE
	*set printer on prompt
	sys(1037)
ENDIF
return