// Revised 10/24/2010 // Version 3.0 VERSION 10.0 POSITION . . 340 330 DIALOG main, label("ICISS") BEGIN GROUPBOX gb_dx_prefix_infile 10 10 320 60, /// label("Diagnosis Code Variable Name Prefix (Input File)") EDIT ed_dx_prefix_infile 20 35 50 20, /// error("Diagnosis Code Variable Name Prefix (Input File)") TEXT tx_dx_prefix_infile 75 35 245 20, /// label("Enter diagnosis code prefix") GROUPBOX gb_dx_name_srr_table 10 80 320 60, /// label("Diagnosis Code Variable Name (SRR\SRRi Table)") EDIT ed_dx_name_srr_table 20 105 50 20, /// error("Diagnosis Code Variable Name (SRR\SRRi Table)") /// default("dx") TEXT tx_dx_name_srr_iciss 75 105 245 20, /// label("Enter diagnosis code variable name") GROUPBOX gb_srr_table_file 10 150 320 60, /// label("Select SRR\SRRi Table File") FILE fn_srr_table 20 175 300 20, /// label("Browse SRR\SRRi Table File") /// error("SRR\SRRi Table File Name") /// buttonwidth(150) /// filter("Stata Dataset (*.dta)|*.dta|All Files (*.*)|*.*") GROUPBOX gb_in_out_files 10 220 320 90, /// label("Select Input and Output Files") FILE fn_in 20 245 300 20, /// label("Browse Input File") /// error("Input File Name") /// buttonwidth(100) /// filter("Stata Dataset (*.dta)|*.dta|All Files (*.*)|*.*") FILE fn_out 20 275 300 20, /// label("Browse Output File") /// error("Output File Name") /// buttonwidth(100) /// save /// filter("Stata Dataset (*.dta)|*.dta|All Files (*.*)|*.*") END OK ok1, label("OK") CANCEL can1, label("Cancel") SUBMIT sub1, label("Submit") HELP hlp1, view("help iciss") RESET res1 COPY copy1 PROGRAM command BEGIN require main.ed_dx_prefix_infile require main.ed_dx_name_srr_table require main.fn_srr_table require main.fn_in require main.fn_out put "iciss " put `"""' put main.fn_in put `"""' put " " put `"""' put main.fn_out put `"""' put " " put `"""' put main.fn_srr_table put `"""' put " " put main.ed_dx_prefix_infile put " " put main.ed_dx_name_srr_table END