📄 svyset.dlg
字号:
/*
svyset
*! VERSION 1.2.5 31mar2005
*/
VERSION 9.0
INCLUDE _std_large
INCLUDE header
HELP hlp1, view("help svyset")
RESET res1
DIALOG main, label("svyset - Survey data settings") tabtitle("Main")
BEGIN
DEFINE col1 70
DEFINE col2 210
DEFINE col3 350
DEFINE colwd0 55
DEFINE colwd1 130
DEFINE _x _xsetbu
DEFINE _y _top
BUTTON bu_reset _xsetbu _top _setbuwd ., ///
onpush(script clear_all) ///
label("Clear settings")
TEXT tx_stages _lft _top 105 ., ///
label("Number of stages:") right
COMBOBOX cb_stages +110 @ 50 _ht8, ///
default(char _dta[_svy_stages]) ///
contents(stage_contents) ///
values(stage_values) ///
onselchangelist(stage_change) ///
dropdownlist ///
nomemory
TEXT tx_strata col1 _ms colwd1 ., ///
label("Sampling units")
TEXT tx_su col2 @ @ ., ///
label("Strata")
TEXT tx_fpc col3 @ @ ., ///
label("Finite pop. correction")
TEXT tx_stage1 _lft _ss colwd0 ., ///
label("Stage 1:") right
VARNAME vn_su1 col1 @ colwd1 ., ///
default(char _dta[_svy_su1]) ///
label("Sampling unit variable for stage 1") ///
nomemory
VARNAME vn_str1 col2 @ @ ., ///
default(char _dta[_svy_strata1]) ///
option(strata) ///
label("Strata variable for stage 1") ///
nomemory
VARNAME vn_fpc1 col3 @ @ ., ///
default(char _dta[_svy_fpc1]) ///
option(fpc) ///
label("Finite pop. correction for stage 1") ///
nomemory
TEXT tx_stage2 _lft _ms colwd0 ., ///
label("Stage 2:") right
VARNAME vn_su2 col1 @ colwd1 ., ///
default(char _dta[_svy_su2]) ///
option(strata) ///
label("Sampling unit variable for stage 2") ///
nomemory
VARNAME vn_str2 col2 @ @ ., ///
default(char _dta[_svy_strata2]) ///
option(strata) ///
label("Strata variable for stage 2")
VARNAME vn_fpc2 col3 @ @ ., ///
default(char _dta[_svy_fpc2]) ///
option(fpc) ///
label("Finite pop. correction for stage 2") ///
nomemory
TEXT tx_stage3 _lft _ms colwd0 ., ///
label("Stage 3:") right
VARNAME vn_su3 col1 @ colwd1 ., ///
default(char _dta[_svy_su3]) ///
option(strata) ///
label("Sampling unit variable for stage 3") ///
nomemory
VARNAME vn_str3 col2 @ @ ., ///
default(char _dta[_svy_strata3]) ///
option(strata) ///
label("Strata variable for stage 3") ///
nomemory
VARNAME vn_fpc3 col3 @ @ ., ///
default(char _dta[_svy_fpc3]) ///
option(fpc) ///
label("Finite pop. correction for stage 3") ///
nomemory
TEXT tx_stage4 _lft _ms colwd0 ., ///
label("Stage 4:") right
VARNAME vn_su4 col1 @ colwd1 ., ///
default(char _dta[_svy_su4]) ///
option(strata) ///
label("Sampling unit variable for stage 4") ///
nomemory
VARNAME vn_str4 col2 @ @ ., ///
default(char _dta[_svy_strata4]) ///
option(strata) ///
label("Strata variable for stage 4") ///
nomemory
VARNAME vn_fpc4 col3 @ @ ., ///
default(char _dta[_svy_fpc4]) ///
option(fpc) ///
label("Finite pop. correction for stage 4") ///
nomemory
TEXT tx_stage5 _lft _ms colwd0 ., ///
label("Stage 5:") right
VARNAME vn_su5 col1 @ colwd1 ., ///
default(char _dta[_svy_su5]) ///
option(strata) ///
label("Sampling unit variable for stage 5") ///
nomemory
VARNAME vn_str5 col2 @ @ ., ///
default(char _dta[_svy_strata5]) ///
option(strata) ///
label("Strata variable for stage 5") ///
nomemory
VARNAME vn_fpc5 col3 @ @ ., ///
default(char _dta[_svy_fpc5]) ///
option(fpc) ///
label("Finite pop. correction for stage 5") ///
nomemory
TEXT tx_stage6 _lft _ms colwd0 ., ///
label("Stage 6:") right
VARNAME vn_su6 col1 @ colwd1 ., ///
default(char _dta[_svy_su6]) ///
option(strata) ///
label("Sampling unit variable for stage 6") ///
nomemory
VARNAME vn_str6 col2 @ @ ., ///
default(char _dta[_svy_strata6]) ///
option(strata) ///
label("Strata variable for stage 6") ///
nomemory
VARNAME vn_fpc6 col3 @ @ ., ///
default(char _dta[_svy_fpc6]) ///
option(fpc) ///
label("Finite pop. correction for stage 6") ///
nomemory
TEXT tx_stage7 _lft _ms colwd0 ., ///
label("Stage 7:") right
VARNAME vn_su7 col1 @ colwd1 ., ///
default(char _dta[_svy_su7]) ///
option(strata) ///
label("Sampling unit variable for stage 7") ///
nomemory
VARNAME vn_str7 col2 @ @ ., ///
default(char _dta[_svy_strata7]) ///
option(strata) ///
label("Strata variable for stage 7") ///
nomemory
VARNAME vn_fpc7 col3 @ @ ., ///
default(char _dta[_svy_fpc7]) ///
option(fpc) ///
label("Finite pop. correction for stage 7") ///
nomemory
TEXT tx_stage8 _lft _ms colwd0 ., ///
label("Stage 8:") right
VARNAME vn_su8 col1 @ colwd1 ., ///
default(char _dta[_svy_su8]) ///
option(strata) ///
label("Sampling unit variable for stage 8") ///
nomemory
VARNAME vn_str8 col2 @ @ ., ///
default(char _dta[_svy_strata8]) ///
option(strata) ///
label("Strata variable for stage 8") ///
nomemory
VARNAME vn_fpc8 col3 @ @ ., ///
default(char _dta[_svy_fpc8]) ///
option(fpc) ///
label("Finite pop. correction for stage 8") ///
nomemory
TEXT tx_note1 _lft _ms _iwd ., ///
label(`"Note: Empty or "_n" in "Sampling units" above indicates sampling of observations."')
TEXT tx_note2 _lft _ss _iwd ., ///
label(`"Note: See the "More" tab for the rest of the stages"')
END
SCRIPT clear_all
BEGIN
main.cb_stages.setvalue "1"
main.vn_su1.setvalue ""
main.vn_str1.setvalue ""
main.vn_fpc1.setvalue ""
main.vn_su2.setvalue ""
main.vn_str2.setvalue ""
main.vn_fpc2.setvalue ""
main.vn_su3.setvalue ""
main.vn_str3.setvalue ""
main.vn_fpc3.setvalue ""
main.vn_su4.setvalue ""
main.vn_str4.setvalue ""
main.vn_fpc4.setvalue ""
main.vn_su5.setvalue ""
main.vn_str5.setvalue ""
main.vn_fpc5.setvalue ""
main.vn_su6.setvalue ""
main.vn_str6.setvalue ""
main.vn_fpc6.setvalue ""
main.vn_su7.setvalue ""
main.vn_str7.setvalue ""
main.vn_fpc7.setvalue ""
main.vn_su8.setvalue ""
main.vn_str8.setvalue ""
main.vn_fpc8.setvalue ""
more.vn_su9.setvalue ""
more.vn_str9.setvalue ""
more.vn_fpc9.setvalue ""
more.vn_su10.setvalue ""
more.vn_str10.setvalue ""
more.vn_fpc10.setvalue ""
more.vn_su11.setvalue ""
more.vn_str11.setvalue ""
more.vn_fpc11.setvalue ""
more.vn_su12.setvalue ""
more.vn_str12.setvalue ""
more.vn_fpc12.setvalue ""
more.vn_su13.setvalue ""
more.vn_str13.setvalue ""
more.vn_fpc13.setvalue ""
more.vn_su14.setvalue ""
more.vn_str14.setvalue ""
more.vn_fpc14.setvalue ""
more.vn_su15.setvalue ""
more.vn_str15.setvalue ""
more.vn_fpc15.setvalue ""
more.vn_su16.setvalue ""
more.vn_str16.setvalue ""
more.vn_fpc16.setvalue ""
more.vn_su17.setvalue ""
more.vn_str17.setvalue ""
more.vn_fpc17.setvalue ""
weights.ed_wtype.setvalue ""
weights.rb_none.seton
weights.vn_pw.setvalue ""
weights.vn_iw.setvalue ""
weights.vl_brr.setvalue ""
weights.vl_jkr.setvalue ""
post.vn_posts.setvalue ""
post.vn_postw.setvalue ""
script svy_se_clear
END
DIALOG more, tabtitle("More")
BEGIN
DEFINE col1 70
DEFINE col2 210
DEFINE col3 350
DEFINE colwd0 55
DEFINE colwd1 130
TEXT tx_note _lft _top _iwd ., ///
label(`"If more than 8 stages are selected on the "Main" tab, they will show up here."')
TEXT tx_strata col1 _top colwd1 ., ///
label("Sampling units")
TEXT tx_su col2 @ @ ., ///
label("Strata")
TEXT tx_fpc col3 @ @ ., ///
label("Finite pop. correction")
TEXT tx_stage9 _lft _ss colwd0 ., ///
label("Stage 9:") right
VARNAME vn_su9 col1 @ colwd1 ., ///
default(char _dta[_svy_su9]) ///
label("Sampling unit variable for stage 9") ///
nomemory
VARNAME vn_str9 col2 @ @ ., ///
default(char _dta[_svy_strata9]) ///
option(strata) ///
label("Strata variable for stage 9") ///
nomemory
VARNAME vn_fpc9 col3 @ @ ., ///
default(char _dta[_svy_fpc9]) ///
option(fpc) ///
label("Finite pop. correction for stage 9") ///
nomemory
TEXT tx_stage10 _lft _ms colwd0 ., ///
label("Stage 10:") right
VARNAME vn_su10 col1 @ colwd1 ., ///
default(char _dta[_svy_su10]) ///
option(strata) ///
label("Sampling unit variable for stage 10") ///
nomemory
VARNAME vn_str10 col2 @ @ ., ///
default(char _dta[_svy_strata10]) ///
option(strata) ///
label("Strata variable for stage 10") ///
nomemory
VARNAME vn_fpc10 col3 @ @ ., ///
default(char _dta[_svy_fpc10]) ///
option(fpc) ///
label("Finite pop. correction for stage 10") ///
nomemory
TEXT tx_stage11 _lft _ms colwd0 ., ///
label("Stage 11:") right
VARNAME vn_su11 col1 @ colwd1 ., ///
default(char _dta[_svy_su11]) ///
option(strata) ///
label("Sampling unit variable for stage 11") ///
nomemory
VARNAME vn_str11 col2 @ @ ., ///
default(char _dta[_svy_strata11]) ///
option(strata) ///
label("Strata variable for stage 11") ///
nomemory
VARNAME vn_fpc11 col3 @ @ ., ///
default(char _dta[_svy_fpc11]) ///
option(fpc) ///
label("Finite pop. correction for stage 11") ///
nomemory
TEXT tx_stage12 _lft _ms colwd0 ., ///
label("Stage 12:") right
VARNAME vn_su12 col1 @ colwd1 ., ///
default(char _dta[_svy_su12]) ///
option(strata) ///
label("Sampling unit variable for stage 12") ///
nomemory
VARNAME vn_str12 col2 @ @ ., ///
default(char _dta[_svy_strata12]) ///
option(strata) ///
label("Strata variable for stage 12") ///
nomemory
VARNAME vn_fpc12 col3 @ @ ., ///
default(char _dta[_svy_fpc12]) ///
option(fpc) ///
label("Finite pop. correction for stage 12") ///
nomemory
TEXT tx_stage13 _lft _ms colwd0 ., ///
label("Stage 13:") right
VARNAME vn_su13 col1 @ colwd1 ., ///
default(char _dta[_svy_su13]) ///
option(strata) ///
label("Sampling unit variable for stage 13") ///
nomemory
VARNAME vn_str13 col2 @ @ ., ///
default(char _dta[_svy_strata13]) ///
option(strata) ///
label("Strata variable for stage 13") ///
nomemory
VARNAME vn_fpc13 col3 @ @ ., ///
default(char _dta[_svy_fpc13]) ///
option(fpc) ///
label("Finite pop. correction for stage 13") ///
nomemory
TEXT tx_stage14 _lft _ms colwd0 ., ///
label("Stage 14:") right
VARNAME vn_su14 col1 @ colwd1 ., ///
default(char _dta[_svy_su14]) ///
option(strata) ///
label("Sampling unit variable for stage 14") ///
nomemory
VARNAME vn_str14 col2 @ @ ., ///
default(char _dta[_svy_strata14]) ///
option(strata) ///
label("Strata variable for stage 14") ///
nomemory
VARNAME vn_fpc14 col3 @ @ ., ///
default(char _dta[_svy_fpc14]) ///
option(fpc) ///
label("Finite pop. correction for stage 14") ///
nomemory
TEXT tx_stage15 _lft _ms colwd0 ., ///
label("Stage 15:") right
VARNAME vn_su15 col1 @ colwd1 ., ///
default(char _dta[_svy_su15]) ///
option(strata) ///
label("Sampling unit variable for stage 15") ///
nomemory
VARNAME vn_str15 col2 @ @ ., ///
default(char _dta[_svy_strata15]) ///
option(strata) ///
label("Strata variable for stage 15") ///
nomemory
VARNAME vn_fpc15 col3 @ @ ., ///
default(char _dta[_svy_fpc15]) ///
option(fpc) ///
label("Finite pop. correction for stage 15") ///
nomemory
TEXT tx_stage16 _lft _ms colwd0 ., ///
label("Stage 16:") right
VARNAME vn_su16 col1 @ colwd1 ., ///
default(char _dta[_svy_su16]) ///
option(strata) ///
label("Sampling unit variable for stage 16") ///
nomemory
VARNAME vn_str16 col2 @ @ ., ///
default(char _dta[_svy_strata16]) ///
option(strata) ///
label("Strata variable for stage 16") ///
nomemory
VARNAME vn_fpc16 col3 @ @ ., ///
default(char _dta[_svy_fpc16]) ///
option(fpc) ///
label("Finite pop. correction for stage 16") ///
nomemory
TEXT tx_stage17 _lft _ms colwd0 ., ///
label("Stage 17:") right
VARNAME vn_su17 col1 @ colwd1 ., ///
default(char _dta[_svy_su17]) ///
option(strata) ///
label("Sampling unit variable for stage 17") ///
nomemory
VARNAME vn_str17 col2 @ @ ., ///
default(char _dta[_svy_strata17]) ///
option(strata) ///
label("Strata variable for stage 17") ///
nomemory
VARNAME vn_fpc17 col3 @ @ ., ///
default(char _dta[_svy_fpc17]) ///
option(fpc) ///
label("Finite pop. correction for stage 17") ///
nomemory
TEXT tx_note1 _lft _ms _iwd ., ///
label(`"Note: Empty or "_n" in "Sampling units" above indicates sampling of observations."')
END
SCRIPT PREINIT
BEGIN
create BOOLEAN has_stage1
create BOOLEAN has_stage2
create BOOLEAN has_stage3
create BOOLEAN has_stage4
create BOOLEAN has_stage5
create BOOLEAN has_stage6
create BOOLEAN has_stage7
create BOOLEAN has_stage8
create BOOLEAN has_stage9
create BOOLEAN has_stage10
create BOOLEAN has_stage11
create BOOLEAN has_stage12
create BOOLEAN has_stage13
create BOOLEAN has_stage14
create BOOLEAN has_stage15
create BOOLEAN has_stage16
create BOOLEAN has_stage17
END
SCRIPT weights_POSTINIT
BEGIN
weights.ed_wtype.hide
program weights_check_wtype
END
PROGRAM weights_check_wtype
BEGIN
if weights.ed_wtype.equals("pweight") {
call weights.rb_pw.seton
call program wgt_on
}
if weights.ed_wtype.equals("iweight") {
call weights.rb_iw.seton
call program wgt_on
}
END
LIST stage_contents
BEGIN
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
END
LIST stage_change
BEGIN
script stage1
script stage2
script stage3
script stage4
script stage5
script stage6
script stage7
script stage8
script stage9
script stage10
script stage11
script stage12
script stage13
script stage14
script stage15
script stage16
script stage17
END
SCRIPT stage1
BEGIN
has_stage1.settrue
has_stage2.setfalse
has_stage3.setfalse
has_stage4.setfalse
has_stage5.setfalse
has_stage6.setfalse
has_stage7.setfalse
has_stage8.setfalse
has_stage9.setfalse
has_stage10.setfalse
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -