** user=**** 
** password=**** 
** package=stata
** project=les

#delimit;

* Slovakia LES 1995 : Example CAMSIS matching ;
* Current occ unit (isco88's 4 digit)=fj04; 
* (no role to empst for Slovak data);


use $sk95e;

gen isco88=-999;
replace isco88=fj04 if (fj04 > 0 & fj04 < 9400 );
tabulate db02 if (fj04 > 0 & fj04 < 9400 ), 
       summarize(isco88) mean standard freq ;
sort isco88 ;
save cstemp, replace;
clear;
infile isco88 mcam fcam siops isei 
      using $mydata\camsis\csskes95.dat;
summarize;
sort isco88 ;
merge isco88  using cstemp;
gen occinfo=_merge;
tab occinfo; 
drop if (occinfo==1);
* (this removes those values which are not represented in the LES sample);
tab occinfo db02; 

* Current values are within gender; 
* also can make a cross-gender CAMSIS variable : ;
gen cgentcs=-999;
replace cgentcs=mcam if (db02==1);
replace cgentcs=fcam if (db02==2);

summarize isco88  cgentcs siops isei ;
summarize isco88  cgentcs siops isei if (fj04 > 0 & fj04 < 9400) ;
summarize isco88  cgentcs siops isei if (fj04 > 0 & fj04 < 9400 & siops > 0); 


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

* Quick assessment: compare values by an education recode;
gen educ=et01; 
recode educ 1 2=1 3 4 5 6=2 7 8=3 ;
label define edu  1 "Primary or less" 2 "Intermediate" 3 "Degree level"; 
label values educ edu;
label variable educ "education categories";
drop if (educ < 1);
tab educ et01 ;
sort db02;
by db02:
  summarize educ 
      cgentcs siops isei if fj04 > 0; 
by db02: 
 oneway cgentcs educ  if (fj04 > 0 & educ > 0), tabulate;
by db02: 
 oneway siops educ  if (fj04 > 0 & siops > 0 & educ > 0), tabulate;
by db02: 
 oneway isei educ  if (fj04 > 0 & isei > 0 & educ > 0), tabulate;


****************************************;