Code: Select all
PROC DATA_QUESTIONNAIRE_TYPE
if DATA_QUESTIONNAIRE_TYPE = 1 then
//GETOTHER(2); {parameter = question number}
loadcase(SABSSM_V_HOUSEHOLD_QUEST_DICT);
enter SABSSM_V_HOUSEHOLD_QUESTIONNA_FF;
writecase (SABSSM_V_HOUSEHOLD_QUEST_DICT);
elseif DATA_QUESTIONNAIRE_TYPE = 2 then
//GETOTHER(2); {parameter = question number}
loadcase(SABSSM_V_FIFTEENANDOLDER_DICT);
enter FIFTEEN_AND_OLDER_QUESTIONNAI_FF;
writecase (SABSSM_V_FIFTEENANDOLDER_DICT);
elseif DATA_QUESTIONNAIRE_TYPE = 3 then
//GETOTHER(2); {parameter = question number}
loadcase(QUESTIONNAIRE_FOR_CHILDR_DICT);
enter CHILDREN_AGED_12_TO_14_YEARS_FF;
writecase (QUESTIONNAIRE_FOR_CHILDR_DICT);
elseif DATA_QUESTIONNAIRE_TYPE = 4 then
//GETOTHER(2); {parameter = question number}
loadcase(GUARDIAN_OF_CHILDREN_0_1_DICT);
enter GUARDIAN_OF_CHILDREN_0_11_YEA_FF;
writecase (GUARDIAN_OF_CHILDREN_0_1_DICT);
endif;
please advice.