estimates_restore.dlg

是一个经济学管理应用软件 很难找的 但是经济学学生又必须用到

/*
  -estimates restore-

*!  VERSION 1.1.1  28mar2005

*/

VERSION 9.0

INCLUDE _std_medium
INCLUDE _ht210
INCLUDE header
HELP hlp1, view("help estimates")
RESET res1

DIALOG main, tabtitle("Main")	///
	label("estimates restore - Restore a stored estimation result")
BEGIN
  TEXT     tx_ename     _lft      _top      _iwd      .,	///
	label("Estimation result to restore:")
  LISTBOX  lb_ename     @         _ss       @         _ht10,	///
	contents(estimates)					///
	label("Estimation result to restore")
  CHECKBOX ck_drop      @         _vs10     _iwd      .,	///
	option(drop)						///
	label("Remove the stored result after restoring it")
END

PROGRAM command
BEGIN
	require main.lb_ename
	put "estimates restore " main.lb_ename
	beginoptions
		option main.ck_drop
	endoptions
END