Understanding Society User Support

----------------------------------------------------------------------------------

      name:  <unnamed>

       log:  D:\USF\issues\2066\2066 (option2).log

  log type:  text

 opened on:   7 Mar 2024, 21:49:13

. /*  Note: The data file produced will be at the individual level and cover all a

> ges, irrespective of the variables requested. 

/ is not a valid command name

r(199);

. 

.  In this current version of the tool, it is not possible to select variables by 

> wave - though you may edit the code below to do so. */

command In is unrecognized

r(199);

. 

. 

. 

. /*******************************************************************************

> *********

/ is not a valid command name

r(199);

. 

. * Sample Code for your request:  7a400d9a784848fd9e94ac517185bf40       *

. 

. ********************************************************************************

> *********/

. 

. clear all

. 

. set more off

. 

. 

. 

. // Replace "where" with the filepath of the working folder (where any temporary 

> files created by this programme will be stored)   eg:  c:\ukhls\temp

/ is not a valid command name

r(199);

. 

. cd "where" 

unable to change to where

r(170);

. 

. 

. 

. // Replace "where" with the folderpath where the data has been downloaded and un

> zipped   eg:   c:\ukhls_data\UKDA-6614-stata\stata\stata13_se\ukhls

/ is not a valid command name

r(199);

. 

. global ukhls "where\UKDA-6614-stata\stata\stata13_se\ukhls"

. 

. 

. 

. // Replace "where" with the filepath of the folder where you want to store the f

> inal dataset produced by this programme.  eg:  c:\ukhls\results

/ is not a valid command name

r(199);

. 

. global outputpath "where"

. 

. 

. 

. // The file produced by this programme will be named as below. If you want to ch

> ange the name do it here.

/ is not a valid command name

r(199);

. 

. local outputfilename "UKHLS_wide_hij"

. 

. 

. 

. // By default the data will be extracted from the waves whose letter prefixes ar

> e written below, and merged. If you want to a different selection of waves, make

>  the change here

/ is not a valid command name

r(199);

. 

. local allWaves = "h i j"

. 

. 

. 

. // These variables from the indall files will be included. These include some ke

> y variables as determined by us PLUS any variables requested by you. 

/ is not a valid command name

r(199);

. 

. local indallvars "age_dv country ethn_dv gor_dv hhsize hidp mastat_dv nchild_dv 

> pidp pno psnen01_lw psnen01_xw psnen91_lw psnen91_xw psnen99_lw psnen99_xw psnen

> ub_lw psnenub_xw psnenui_lw psnenui_xw psnenus_lw psnenus_xw psu racel_dv sex_dv

>  strata urban_dv"

. 

. 

. 

. // These variables from the indresp files will be included. These include some k

> ey variables as determined by us PLUS any variables requested by you. 

/ is not a valid command name

r(199);

. 

. local indvars "age_dv country ethn_dv gor_dv hhsize hhtype_dv hidp ind5mus_lw in

> d5mus_xw indbd91_lw indbdub_lw indin01_lw indin01_xw indin91_lw indin91_xw indin

> 99_lw indin99_xw indinub_lw indinub_xw indinui_lw indinui_xw indinus_lw indinus_

> xw indns91_lw indnsub_lw indpxub_lw indpxub_xw indpxui_lw indpxui_xw indpxus_lw 

> indpxus_xw indscub_lw indscub_xw indscui_lw indscui_xw indscus_lw indscus_xw jbb

> gy jbsat jbsemp jbstat jsboss jspart jssize mastat_dv nchild_dv pidp pno psu rac

> el_dv sclfsato sex_dv strata tenure_dv ukborn urban_dv wkaut1 wkaut2 wkaut3 wkau

> t4 wkaut5"

. 

. 

. 

. // These variables from the child files will be included. These include some key

>  variables as determined by us PLUS any variables requested by you. 

/ is not a valid command name

r(199);

. 

. local chvars "age_dv chddvub_lw chddvub_xw chddvui_lw chddvui_xw country gor_dv 

> hhsize hidp pidp pno psnen01_lw psnen91_lw psnenub_lw psnenub_xw psnenui_lw psne

> nui_xw psnenus_lw psnenus_xw psu sex_dv strata urban_dv"

. 

. 

. 

. // These variables from the hhresp files will be included. These include some ke

> y variables as determined by us PLUS any variables requested by you. 

/ is not a valid command name

r(199);

. 

. local hhvars "country fihhmnnet1_dv gor_dv hhden01_xw hhden91_xw hhden99_xw hhde

> nub_xw hhdenui_xw hhdenus_xw hhsize hhtype_dv hidp ieqmoecd_dv nkids_dv psu stra

> ta tenure_dv urban_dv"

. 

. 

. 

. // These variables from the youth files will be included. These include some key

>  variables as determined by us PLUS any variables requested by you. 

/ is not a valid command name

r(199);

. 

. local youthvars "age_dv country ethn_dv gor_dv hidp pidp pno psu racel_dv sex_dv

>  strata urban_dv ythscub_xw ythscui_xw ythscus_xw"

. 

. 

. 

. 

. 

. ////////////////////////////////////////////////////////////////////////////////

> /////////////////////////////////////////////////////////////////////////

/ is not a valid command name

r(199);

. 

. // Anything below this line should not be changed! Any changes to the selection 

> of variables and waves, and location of folders, should be made above. //

/ is not a valid command name

r(199);

. 

. ////////////////////////////////////////////////////////////////////////////////

> /////////////////////////////////////////////////////////////////////////

/ is not a valid command name

r(199);

. 

. 

. 

. // this program returns all variable names with the wave prefix

/ is not a valid command name

r(199);

. 

. program define getVars, rclass

  1. 

.     version 14.0

  2. 

. if ("`1'" != "") {

  3. 

. local wavemyvars = " `1'"

  4. 

. local wavemyvars = subinstr("`wavemyvars'"," "," `2'_",.)

  5. 

. local wavemyvars = substr("`wavemyvars'",2,.)

  6. 

. }

  7. 

. else local wavemyvars = ""

  8. 

. return local fixedVars "`wavemyvars'"

  9. 

. end

. 

. 

. 

. // this program to returns  which variables exist in this wave

/ is not a valid command name

r(199);

. 

. program define getExistingVars, rclass

  1. 

.     version 14.0

  2. 

. local all = ""

  3. 

. foreach var in `1' {

  4. 

. capture confirm variable `var'

  5. 

. if !_rc {

  6. 

. local all = "`all' `var'"

  7. 

. }

  8. 

. }

  9. 

. return local existingVars "`all'"

 10. 

. end  

. 

. 

. 

. //loop through each wave

/ is not a valid command name

r(199);

. 

. foreach wave in `allWaves' {

  2. 

. // find the wave number

  3. 

. local waveno=strpos("abcdefghijklmnopqrstuvwxyz","`wave'")

  4. 

. 

. 

. // find the wave household vars

  5. 

. getVars "`hhvars'" `wave'

  6. 

. local wavehhvars = "`r(fixedVars)'"

  7. 

. 

. 

. // find the wave individual vars

  8. 

. getVars "`indvars'" `wave'

  9. 

. local waveindvars = "`r(fixedVars)'"

 10. 

. 

. 

. // find the wave all individual vars

 11. 

. getVars "`indallvars'" `wave'

 12. 

. local waveindallvars = "`r(fixedVars)'"

 13. 

. 

. 

. // find the wave child vars

 14. 

. getVars "`chvars'" `wave'

 15. 

. local wavechvars = "`r(fixedVars)'"

 16. 

. 

. 

. // find the wave youth vars

 17. 

. getVars "`youthvars'" `wave'

 18. 

. local waveyouthvars = "`r(fixedVars)'"

 19. 

. 

. 

. // open the the household level file with the required variables

 20. 

. use "$ukhls/`wave'_hhresp", clear

 21. 

. getExistingVars "`wave'_hidp `wavehhvars'"

 22. 

. keep `r(existingVars)'

 23. 

. 

. 

. // if only household variables are required, skip this part and return all house

> holds

 24. 

. if ("`indvars'" != "" || "`chvars'" != "" || "`youthvars'" != "") {

 25. 

. // if any individual variable is required, first  merge INDALL keeping the pipd 

> (and possibly some default variables?), so that other files can merge on it.

 26. 

. merge 1:m `wave'_hidp using "$ukhls/`wave'_indall"

 27. 

. drop _merge

 28. 

. // drop loose households with no individuals

 29. 

. drop if (pidp == .)

 30. 

. 

. 

. // keep only variables that were requested and exist in this wave

 31. 

. getExistingVars "pidp `wave'_hidp `wavehhvars' `waveindallvars'"

 32. 

. keep `r(existingVars)'

 33. 

. 

. 

. // add any requested individual variables

 34. 

. if ("`indvars'" != "") {

 35. 

. merge 1:1 pidp using "$ukhls/`wave'_indresp"

 36. 

. drop _merge

 37. 

. // keep only variables that were requested and exist in this wave

 38. 

. getExistingVars "pidp `wave'_hidp `wavehhvars' `waveindvars' `waveyouthvars' `wa

> vechvars' `waveindallvars'"

 39. 

. keep `r(existingVars)'

 40. 

. }

 41. 

. // add any requested youth variables

 42. 

. if ("`waveyouthvars'" != "") {

 43. 

. merge 1:1 pidp using "$ukhls/`wave'_youth"

 44. 

. drop _merge

 45. 

. // keep only variables that were requested and exist in this wave

 46. 

. getExistingVars "pidp `wave'_hidp `wavehhvars' `waveindvars' `waveyouthvars' `wa

> vechvars' `waveindallvars'"

 47. 

. keep `r(existingVars)'

 48. 

. }

 49. 

. // add any requested child variables

 50. 

. if ("`wavechvars'" != "") {

 51. 

. merge 1:1 pidp using "$ukhls/`wave'_child"

 52. 

. drop _merge

 53. 

. // keep only variables that were requested and exist in this wave

 54. 

. getExistingVars "pidp `wave'_hidp `wavehhvars' `waveindvars' `waveyouthvars' `wa

> vechvars' `waveindallvars'"

 55. 

. keep `r(existingVars)'

 56. 

. }

 57. 

. }

 58. 

. 

. 

. // save the file that was created

 59. 

. save temp_`wave', replace

 60. 

. }

/ is not a valid command name

r(199);

. 

. 

. 

. local firstWave = substr("`allWaves'", 1, 1)

. 

. 

. 

. // open the individual level file for wave 1 containing the variables to use

/ is not a valid command name

r(199);

. 

. local firstvar = subinstr("`joinvars'","#","`firstWave'",.)

. 

. use pidp `firstvar' using "temp_`firstWave'", clear

file temp_h.dta not found

r(601);

. 

. 

. 

. //sort by pidp and save

/ is not a valid command name

r(199);

. 

. sort pidp

no variables defined

r(111);

. 

. save "$outputpath/`outputfilename'", replace

no variables defined

r(111);

. 

. 

. 

. // loop through the remaining waves

/ is not a valid command name

r(199);

. 

. local remainingWaves = substr("`allWaves'", 1, .)

. 

. 

. 

. 

. 

. foreach wave in `remainingWaves' {

  2. 

. // open the individual level file for that wave

  3. 

. use * using "temp_`wave'", clear

  4. 

. 

. 

. // sort by pidp

  5. 

. sort pidp

  6. 

. 

. 

. // merge with the file previously saved

  7. 

. merge 1:1 pidp using "$outputpath/`outputfilename'"

  8. 

. drop _merge

  9. 

. 

. 

. // sort by pidp

 10. 

. sort pidp

 11. 

. 

. 

.         // save the file to be used in the next merge

 12. 

.         order pidp, first

 13. 

. save "$outputpath/`outputfilename'", replace

 14. 

. }

/ is not a valid command name

r(199);

. 

. 

. 

. // erase temporary files

/ is not a valid command name

r(199);

. 

. foreach w in `allWaves' {

  2. 

. erase temp_`w'.dta

  3. 

. }

file temp_h.dta not found

r(601);

. log close

      name:  <unnamed>

       log:  D:\USF\issues\2066\2066 (option2).log

  log type:  text

 closed on:   7 Mar 2024, 21:49:40

----------------------------------------------------------------------------------