test.dlg

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

  CHECKBOX ck_notest       @         _ms        @        .,		/*
  		*/label("Suppress the output") option(notest)
  CHECKBOX ck_common       @         _ms        @        .,		/*
  		*/label("Test only variables common to all the equations")/*
  		*/option(common)
  CHECKBOX ck_const        @         _ms        @        .,		/*
  		*/label("Include the constant in coefficients to be tested")/*
  		*/option(constant)
  CHECKBOX ck_nosvy        _lft      _xls       _iwd     .,		/*
*/label("With svy estimation commands, the Wald test is to be carried out as")/*
		*/option(nosvyadjust)
  TEXT     tx_nosvy        _cksep    _vss       _inwd     .,		/*
  */label(`"W/k ~ F(k,d) rather than (d-k+1)W/(kd) ~ F(k, d-k+1)"')
  CHECKBOX ck_min          _lft      _ls        _iwd     .,		/*
*/label("Perform test with the constant, then drop terms until the test becomes")/*
  		*/option(minimum)
  TEXT     tx_min          _cksep    _vss       _inwd    .,		/*
*/label("nonsingular, then test without the constant on the remaining terms")

/* matvlc() option omitted as it is a programmers option") */

END

SCRIPT example
BEGIN
  view help test_example##|_new
END

SCRIPT mtest_on
BEGIN
	opt.tx_mtest2.enable
	opt.rb_noad.enable
	opt.rb_bonf.enable
	opt.rb_holm.enable
	opt.rb_sidak.enable
	opt.ck_accum.disable
END

SCRIPT mtest_off
BEGIN
	opt.tx_mtest2.disable
	opt.rb_noad.disable
	opt.rb_bonf.disable
	opt.rb_holm.disable
	opt.rb_sidak.disable
	opt.ck_accum.enable
END

PROGRAM hide_all
  BEGIN
  	call gaction main.bu_example.hide
	call gaction main.tx_spec.hide
    	if !H(main.vl_coef1) | !H(main.vl_coef1a) | !H(main.cb_eqn1a)  {
    		call gaction main.vl_coef1.hide
    		call gaction main.vl_coef1a.hide
		call gaction main.tx_coef1b.hide
		call gaction main.vl_coef1b.hide
		call gaction main.tx_spec1b.hide
		call gaction main.cb_eqn1a.hide
		call gaction main.cb_eqn1b.hide
		call gaction main.tx_spec1c.hide
		call gaction main.tx_spec1d.hide
		call gaction main.cb_eqn1c.hide
		call gaction main.cb_eqn1d.hide
		call gaction main.tx_spec1e.hide
		call gaction main.tx_spec1f.hide
		call gaction main.cb_eqn1e.hide
		call gaction main.cb_eqn1f.hide
		call gaction main.tx_coef1c.hide
		call gaction main.vl_coef1c.hide
    	}
    	if !H(main.vl_coef2) | !H(main.vl_coef2a) | !H(main.cb_eqn2a)  {
    		call gaction main.vl_coef2.hide
    		call gaction main.vl_coef2a.hide
		call gaction main.tx_coef2b.hide
		call gaction main.vl_coef2b.hide
		call gaction main.tx_spec2b.hide
		call gaction main.cb_eqn2a.hide
		call gaction main.cb_eqn2b.hide
		call gaction main.tx_spec2c.hide
		call gaction main.tx_spec2d.hide
		call gaction main.cb_eqn2c.hide
		call gaction main.cb_eqn2d.hide
		call gaction main.tx_spec2e.hide
		call gaction main.tx_spec2f.hide
		call gaction main.cb_eqn2e.hide
		call gaction main.cb_eqn2f.hide
		call gaction main.tx_coef2c.hide
		call gaction main.vl_coef2c.hide
    	}
    	if !H(main.vl_coef3) | !H(main.vl_coef3a) | !H(main.cb_eqn3a)  {
    		call gaction main.vl_coef3.hide
    		call gaction main.vl_coef3a.hide
		call gaction main.tx_coef3b.hide
		call gaction main.vl_coef3b.hide
		call gaction main.tx_spec3b.hide
		call gaction main.cb_eqn3a.hide
		call gaction main.cb_eqn3b.hide
		call gaction main.tx_spec3c.hide
		call gaction main.tx_spec3d.hide
		call gaction main.cb_eqn3c.hide
		call gaction main.cb_eqn3d.hide
		call gaction main.tx_spec3e.hide
		call gaction main.tx_spec3f.hide
		call gaction main.cb_eqn3e.hide
		call gaction main.cb_eqn3f.hide
		call gaction main.tx_coef3c.hide
		call gaction main.vl_coef3c.hide
    	}
    	if !H(main.vl_coef4) | !H(main.vl_coef4a) | !H(main.cb_eqn4a)  {
    		call gaction main.vl_coef4.hide
    		call gaction main.vl_coef4a.hide
		call gaction main.tx_coef4b.hide
		call gaction main.vl_coef4b.hide
		call gaction main.tx_spec4b.hide
		call gaction main.cb_eqn4a.hide
		call gaction main.cb_eqn4b.hide
		call gaction main.tx_spec4c.hide
		call gaction main.tx_spec4d.hide
		call gaction main.cb_eqn4c.hide
		call gaction main.cb_eqn4d.hide
		call gaction main.tx_spec4e.hide
		call gaction main.tx_spec4f.hide
		call gaction main.cb_eqn4e.hide
		call gaction main.cb_eqn4f.hide
		call gaction main.tx_coef4c.hide
		call gaction main.vl_coef4c.hide
    	}
    	if !H(main.vl_coef5) | !H(main.vl_coef5a) | !H(main.cb_eqn5a)  {
    		call gaction main.vl_coef5.hide
    		call gaction main.vl_coef5a.hide
		call gaction main.tx_coef5b.hide
		call gaction main.vl_coef5b.hide
		call gaction main.tx_spec5b.hide
		call gaction main.cb_eqn5a.hide
		call gaction main.cb_eqn5b.hide
		call gaction main.tx_spec5c.hide
		call gaction main.tx_spec5d.hide
		call gaction main.cb_eqn5c.hide
		call gaction main.cb_eqn5d.hide
		call gaction main.tx_spec5e.hide
		call gaction main.tx_spec5f.hide
		call gaction main.cb_eqn5e.hide
		call gaction main.cb_eqn5f.hide
		call gaction main.tx_coef5c.hide
		call gaction main.vl_coef5c.hide
    	}
    	if !H(main.vl_coef6) | !H(main.vl_coef6a) | !H(main.cb_eqn6a)  {
    		call gaction main.vl_coef6.hide
    		call gaction main.vl_coef6a.hide
		call gaction main.tx_coef6b.hide
		call gaction main.vl_coef6b.hide
		call gaction main.tx_spec6b.hide
		call gaction main.cb_eqn6a.hide
		call gaction main.cb_eqn6b.hide
		call gaction main.tx_spec6c.hide
		call gaction main.tx_spec6d.hide
		call gaction main.cb_eqn6c.hide
		call gaction main.cb_eqn6d.hide
		call gaction main.tx_spec6e.hide
		call gaction main.tx_spec6f.hide
		call gaction main.cb_eqn6e.hide
		call gaction main.cb_eqn6f.hide
		call gaction main.tx_coef6c.hide
		call gaction main.vl_coef6c.hide
	}
  END

LIST test_change_1
  BEGIN
    script coef0_1
    script expeq_1
    script eqncoef0_1
    script eqeqncoef_1
  END

SCRIPT expeq_1
  BEGIN
    program hide_all
    main.tx_spec.setlabel "Specification 1, linear expression:"
    main.tx_spec.show
    main.bu_example.show
    main.vl_coef1a.setlabel "Specification 1, linear expression"
    main.vl_coef1a.show
  END

SCRIPT eqncoef0_1
  BEGIN
    program hide_all
    main.tx_spec.setlabel "Specification 1, equation: (required)"
    main.tx_spec.show
    main.cb_eqn1a.show
    main.tx_coef1b.show
    main.vl_coef1b.show
  END

SCRIPT eqeqncoef_1
  BEGIN
    program hide_all
    main.tx_spec.setlabel "Specification 1, equation 1: (required)"
    main.tx_spec.show
    main.tx_spec1b.show
    main.cb_eqn1a.show
    main.cb_eqn1b.show
    main.tx_spec1c.show
    main.tx_spec1d.show
    main.cb_eqn1c.show
    main.cb_eqn1d.show
    main.tx_spec1e.show
    main.tx_spec1f.show
    main.cb_eqn1e.show
    main.cb_eqn1f.show
    main.tx_coef1c.show
    main.vl_coef1c.show
  END

SCRIPT coef0_1
  BEGIN
    program hide_all
    main.vl_coef1.show
    main.tx_spec.setlabel "Specification 1, test these coefficients:"
    main.tx_spec.show
  END

LIST test_change_2
  BEGIN
    script coef0_2
    script expeq_2
    script eqncoef0_2
    script eqeqncoef_2
  END

SCRIPT expeq_2
  BEGIN
    program hide_all
    main.tx_spec.setlabel "Specification 2, linear expression:"
    main.tx_spec.show
    main.bu_example.show
    main.vl_coef2a.setlabel "Specification 2, linear expression"
    main.vl_coef2a.show
  END

SCRIPT eqncoef0_2
  BEGIN
    program hide_all
    main.tx_spec.setlabel "Specification 2, equation: (required)"
    main.tx_spec.show
    main.cb_eqn2a.show
    main.tx_coef2b.show
    main.vl_coef2b.show
  END

SCRIPT eqeqncoef_2
  BEGIN
    program hide_all
    main.tx_spec.setlabel "Specification 2, equation 1: (required)"
    main.tx_spec.show
    main.tx_spec2b.show
    main.cb_eqn2a.show
    main.cb_eqn2b.show
    main.tx_spec2c.show
    main.tx_spec2d.show
    main.cb_eqn2c.show
    main.cb_eqn2d.show
    main.tx_spec2e.show
    main.tx_spec2f.show
    main.cb_eqn2e.show
    main.cb_eqn2f.show
    main.tx_coef2c.show
    main.vl_coef2c.show
  END

SCRIPT coef0_2
  BEGIN
    program hide_all
    main.tx_spec.setlabel "Specification 2, test these coefficients:"
    main.vl_coef2.show
    main.tx_spec.show
  END

LIST test_change_3
  BEGIN
    script coef0_3
    script expeq_3
    script eqncoef0_3
    script eqeqncoef_3
  END

SCRIPT expeq_3
  BEGIN
    program hide_all
    main.tx_spec.setlabel "Specification 3, linear expression:"
    main.tx_spec.show
    main.bu_example.show
    main.vl_coef3a.setlabel "Specification 3, linear expression"
    main.vl_coef3a.show
  END

SCRIPT eqncoef0_3
  BEGIN
    program hide_all
    main.tx_spec.setlabel "Specification 3, equation: (required)"
    main.tx_spec.show
    main.cb_eqn3a.show
    main.tx_coef3b.show
    main.vl_coef3b.show
  END

SCRIPT eqeqncoef_3
  BEGIN
    program hide_all
    main.tx_spec.setlabel "Specification 3, equation 1: (required)"
    main.tx_spec.show
    main.tx_spec3b.show
    main.cb_eqn3a.show
    main.cb_eqn3b.show
    main.tx_spec3c.show
    main.tx_spec3d.show
    main.cb_eqn3c.show
    main.cb_eqn3d.show
    main.tx_spec3e.show
    main.tx_spec3f.show
    main.cb_eqn3e.show
    main.cb_eqn3f.show
    main.tx_coef3c.show
    main.vl_coef3c.show
  END

SCRIPT coef0_3
  BEGIN
    program hide_all
    main.tx_spec.setlabel "Specification 3, test these coefficients:"
    main.vl_coef3.show
    main.tx_spec.show
  END

LIST test_change_4
  BEGIN
    script coef0_4
    script expeq_4
    script eqncoef0_4
    script eqeqncoef_4
  END

SCRIPT expeq_4
  BEGIN
    program hide_all
    main.tx_spec.setlabel "Specification 4, linear expression:"
    main.tx_spec.show
    main.bu_example.show
    main.vl_coef4a.setlabel "Specification 4, linear expression"
    main.vl_coef4a.show
  END

SCRIPT eqncoef0_4
  BEGIN
    program hide_all
    main.tx_spec.setlabel "Specification 4, equation: (required)"
    main.tx_spec.show
    main.cb_eqn4a.show
    main.tx_coef4b.show
    main.vl_coef4b.show
  END

SCRIPT eqeqncoef_4
  BEGIN
    program hide_all
    main.tx_spec.setlabel "Specification 4, equation 1: (required)"
    main.tx_spec.show
    main.tx_spec4b.show
    main.cb_eqn4a.show
    main.cb_eqn4b.show
    main.tx_spec4c.show
    main.tx_spec4d.show
    main.cb_eqn4c.show
    main.cb_eqn4d.show
    main.tx_spec4e.show
    main.tx_spec4f.show
    main.cb_eqn4e.show
    main.cb_eqn4f.show
    main.tx_coef4c.show
    main.vl_coef4c.show
  END

SCRIPT coef0_4
  BEGIN
    program hide_all
    main.tx_spec.setlabel "Specification 4, test these coefficients:"
    main.vl_coef4.show
    main.tx_spec.show
  END

LIST test_change_5
  BEGIN
    script coef0_5
    script expeq_5
    script eqncoef0_5
    script eqeqncoef_5
  END