estimates_change.dlg

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

/*
  -estimates change-

*!  VERSION 1.1.1  28mar2005

*/

VERSION 9.0

INCLUDE _std_medium
DEFINE  _dlght 210
INCLUDE header
HELP hlp1, view("help estimates")
RESET res1

DIALOG main, /*
 */ label("estimates change - Set stored estimation title") tabtitle("Main")
BEGIN
  TEXT     tx_ename     _lft      _top      _iwd      .,		/*
		*/ label("Stored estimation result:")
  LISTBOX  lb_ename     @         _ss       @         _ht8,		/*
		*/ contents(estimates)					/*
		*/ label("Stored estimation result name")
  TEXT     tx_title     @         _vs8      @         .,		/*
		*/ label("New title:")
  EDIT     ed_title     @         _ss       @         .,		/*
		*/ option(title)					/*
		*/ label("New title")
END

/* Purposely not including the scorevars() option in this dialog because it
   is both a rare and advanced option. */


PROGRAM command
BEGIN
	require main.lb_ename main.ed_title
	put "estimates change " main.lb_ename
	beginoptions
		optionarg main.ed_title
	endoptions
END