/* 
  First version of mygenerate.dlg
*/  


VERSION 16.0

POSITION . . 410 250

DIALOG main, label("generate - Generate a new variable") tabtitle("Main")
BEGIN
  TEXT     tx_gen      10  10   120  .,	label("Generate variable:")
  EDIT     ed_gen      10  +20  120  .,	error("Generate variable")
  TEXT     tx_exp      10  +25  390  .,	label("Contents:")
  EXP      ex_exp      10  +20  390  ., label("Create ...")        ///
           error("Contents")
END

OK ok1,      label("OK")
CANCEL can1, label("Cancel")
SUBMIT sub1, label("Submit")
HELP hlp1,   view("help generate")
RESET res1
COPY copy1

PROGRAM command
BEGIN
    put "generate "
    require main.ed_gen
    put main.ed_gen " "
    put "= "
    require main.ex_exp
    put main.ex_exp
END