**WERS 2004 Panel derived variables for FF.sps. *This syntax file derives the Panel variables used in the 2004 First Findings publication. *Last updated 28 July 2006. *Note this file first derives variables from the 2004 panel data, then derives variables from the 1998 cross-section, before matching these files together . *Before running this syntax, please ensure the file paths are changed throughout the file as necessary. *These can be found by searching on the phrase 'Note file path' . ************************************************. *List of derived variables. ************************************************. * 2004 derived variables . COMMENT All variables begin with Y, to signify that this is the second wave of the panel. ** All workplaces dummy (Yallest) . ** Size of workplace - banded (Yempsize) . ** Workplaces with 25 or more employees only - standard break that sets all other cases to sysmis (y25pluso). ** Single/Multi - single site or part of a larger organisation (Ysingle). ** Size of organization - banded (Yorgsize). ** Collapsed private / public sector variable (Yprivate). ** Size of workplace - banded (Y10plus) . ** Union recognition (Yrecog1) . ** Any non-managerial employees entitled to annual hours (yjtimear1) . ** Any non-managerial employees entitled to flexitime (yjtimear3). ** Any non-managerial employees entitled to zero hours contracts (yjtimear6). ** Any non-managerial employees entitled to parental leave (yifamily1). ** Any non-managerial employees entitled to work at or from home in normal working hours (yifamily2). ** Any non-managerial employees entitled to term-time only contracts (yifamily3). ** Any non-managerial employees entitled to switch from full-time to part-time employment (yifamily4). ** Any non-managerial employees entitled to job share (yifamily5). ** Number of days of paid paternity leave (ypatern, ypatern2) . ** Time off for family emergencies (yiifmoff, yifmoffnew) . *1998 derived variables. COMMENT All variables from the WERS98 MQ begin with X, to signify the first wave . ** All workplaces dummy (Xallest) . ** Any non-managerial employees entitled to annual hours (xjtimear1). ** Any non-managerial employees entitled to flexitime (xjtimear3). ** Any non-managerial employees entitled to zero hours contracts (xjtimear6). ** Any non-managerial employees entitled to parental leave (xifamily1). ** Any non-managerial employees entitled to work at or from home in normal working hours (xifamily2). ** Any non-managerial employees entitled to term-time only contracts (xifamily3). ** Any non-managerial employees entitled to switch from full-time to part-time employment (xifamily4). ** Any non-managerial employees entitled to job share (xifamily5). ** Number of days of paid paternity leave (xpatern, xpatern2) . ** Collapsed private / public sector variable (Xprivate). ** Time off for family emergencies (xiifmoff) . * 1998-2004 change variables . **Change in whether any non-managerial employees entitled to annual hours contract (yjtimear1c). **Change in whether any non-managerial employees entitled to flexitime (yjtimear3c). **Change in whether any non-managerial employees entitled to zero hours contracts (yjtimear6c). **Change in whether any non-managerial employees entitled to parental leave (yifamily1c). **Change in whether any non-managerial employees entitled to work at or from home in normal working hours (yifamily2c). **Change in whether any non-managerial employees entitled to term-time only contracts (yifamily3c). **Change in whether any non-managerial employees entitled to switch from full-time to part-time employment (yifamily4c). **Change in whether any non-managerial employees entitled to job share (yifamily5c). **Change in number of days of paid paternity leave provided (ypaternchng) . **Change in provision of special paid leave at short notice (yifmoffchnge) . ************************************************. *Open PQ data file. ************************************************. *Note file path . GET FILE='C:\WERS\ps9804_pq04.sav'. sort cases by serno . weight off . ************************************************. *Derived variables for 2004. ************************************************. COMMENT All workplaces dummy (Yallest) . Numeric Yallest (F3.0). compute Yallest=1. variable labels Yallest 'All workplaces'. value labels Yallest 1 ' '. execute. **************************************************************** . COMMENT Workplace size (Yempsize) . Numeric Yempsize (F3.0). recode zallemps (5 thru 9=1) (10 thru 24 = 2) (25 thru 49 = 3) (50 thru 99 = 4) (100 thru 199 = 5) (200 thru 499 = 6) (500 thru 999 = 7) (1000 thru 1999=8) (2000 thru hi=9) into Yempsize. value labels Yempsize 1 '5 to 9 employees' 2 '10 thru 24 employees' 3 '25 to 49 employees' 4 '50 to 99 employees' 5 '100 to 199 employees' 6 '200 to 499 employees' 7 '500 to 999 employees' 8 '1000 to 1999 employees' 9 '2000 or more employees'. variable labels Yempsize 'Size of establishment'. execute. **************************************************************** . COMMENT Workplaces with 25 or more employees only - standard break that sets all other cases to sysmis (y25pluso). Numeric y25pluso (f3.0). recode zallemps (25 thru highest = 1) into y25pluso. value labels y25pluso 1 'Workplaces with 25+ employees'. variable label y25pluso 'Workplaces with 25+ employees'. execute. **************************************************************** . COMMENT Single site or part of a larger organisation (Ysingle). Numeric Ysingle (F3.0). recode asingle (2=1) (1=2) (3=2) (else=Copy) INTO Ysingle . value labels Ysingle 1 'Single independent establishment' 2 'Part of a larger organisation'. variable labels Ysingle 'Single or multi'. execute. **************************************************************** . COMMENT Total number of employees within the organisation in the UK (Yorgsize) . Numeric Yorgsize (F3.0). recode auktot (else = COPY) into Yorgsize. execute. do if (asingle ne 1 & zallemps<=49). + recode Yorgsize (-1 = 1). else if (asingle ne 1 & zallemps>=50 and zallemps<=99). + recode Yorgsize (-1 = 2). else if (asingle ne 1 & zallemps>=100 and zallemps<=149). + recode Yorgsize (-1 = 3). else if (asingle ne 1 & zallemps>=150 and zallemps<=249). + recode Yorgsize (-1 = 4). else if (asingle ne 1 & zallemps>=250 and zallemps<=499). + recode Yorgsize (-1 = 5). else if (asingle ne 1 & zallemps>=500 and zallemps<=999). + recode Yorgsize (-1 = 6). else if (asingle ne 1 & zallemps>=1000 and zallemps<=1999). + recode Yorgsize (-1 = 7). else if (asingle ne 1 & zallemps>=2000 and zallemps<=4999). + recode Yorgsize (-1 = 8). else if (asingle ne 1 & zallemps>=5000 and zallemps<=9999). + recode Yorgsize (-1 = 9). else if (asingle ne 1 & zallemps>=10000 and zallemps<=49999). + recode Yorgsize (-1 = 10). else if (asingle ne 1 & zallemps>=50000 and zallemps<=99999). + recode Yorgsize (-1 = 11). else if (asingle ne 1 & zallemps>=100000). + recode Yorgsize (-1 = 12). end if . recode Yorgsize (1,2 = 1) (3,4,5,6 = 2) (7,8,9 = 3) (10,11,12 = 4) (else = COPY). execute. value labels Yorgsize 1 'Less than 100' 2 '100 to less than 1000' 3 '1,000 to less than 10,000' 4 '10,000 or more' -8 'Do not know' -9 'Refuse'. missing values Yorgsize (-8,-9). variable labels Yorgsize 'Size of organisation'. **************************************************************** . COMMENT Private sector variable (Yprivate) . Numeric Yprivate (F3.0). recode acomp01 (1 thru 7=1) (8 thru 12=2) into Yprivate. variable labels Yprivate 'Ownership'. value labels Yprivate 1 'Private sector' 2 'Public sector'. execute. **************************************************************** . COMMENT Dichotomous variable for workplace size at 10 employee break (Y10plus) . Numeric Y10plus (f3.0). recode zallemps (lowest thru 9 = 1) (10 thru highest = 2) into Y10plus. value labels Y10plus 1 'Workplaces with LESS than 10 employees' 2 'Workplaces with 10 PLUS employees'. variable label Y10plus 'Size of workplace'. execute. **************************************************************** . COMMENT Recognition (Yrecog1) . Numeric Yrecog1 (f2.0) . recode enumrec (0-1,=1) (1 thru hi=2) (-8=copy) into Yrecog1 . missing values Yrecog1 (-8). value labels Yrecog1 1 'No union' 2 'Recognised' -8 'DK/NA'. variable label Yrecog1 'Union recognition'. execute. **************************************************************** . COMMENT Any non-managerial employees entitled to annual hours (yjtimear1). numeric yjtimear1 (f3.0). do if (any(1, jtimear1 to jtimear8)=1). + compute yjtimear1=1. else if (missing(jtimear1)=1). + recode jtimear1(-1, -8, -9=copy) into yjtimear1. else. + compute yjtimear1=0. end if. execute. missing values yjtimear1 (-1, -8, -9). variable label yjtimear1 'Any non-managerial employees entitled to annual hours'. value labels yjtimear1 1 'Yes' 0 'No' -1 'Not applicable' -8 'Do not know' -9 'Refused'. **************************************************************** . COMMENT Any non-managerial employees entitled to flexitime (yjtimear3). numeric yjtimear3 (f3.0). do if (any(3, jtimear1 to jtimear8)=1). + compute yjtimear3=1. else if (missing(jtimear1)=1). + recode jtimear1(-1, -8, -9=copy) into yjtimear3. else. + compute yjtimear3=0. end if. execute. missing values yjtimear3 (-1, -8, -9). variable label yjtimear3 'Any non-managerial employees entitled to flexitime'. value labels yjtimear3 1 'Yes' 0 'No' -1 'Not applicable' -8 'Do not know' -9 'Refused'. **************************************************************** . COMMENT Any non-managerial employees entitled to zero hours contracts (yjtimear6). numeric yjtimear6 (f3.0). do if (any(6, jtimear1 to jtimear8)=1). + compute yjtimear6=1. else if (missing(jtimear1)=1). + recode jtimear1(-1, -8, -9=copy) into yjtimear6. else. + compute yjtimear6=0. end if. execute. missing values yjtimear6 (-1, -8, -9). variable label yjtimear6 'Any non-managerial employees entitled to zero hours contracts'. value labels yjtimear6 1 'Yes' 0 'No' -1 'Not applicable' -8 'Do not know' -9 'Refused'. **************************************************************** . COMMENT Family-friendly practices (Yifamily1 - Yifamily5) . COMMENT Any non-managerial employees entitled to parental leave (yifamily1). numeric yifamily1 (f3.0). do if (any(1, ifamily1 to ifamily8)=1). + compute yifamily1=1. else if (missing(ifamily1)=1). + recode ifamily1(-1, -8, -9=copy) into yifamily1. else. + compute yifamily1=0. end if. missing values yifamily1 (-1, -8, -9). variable label yifamily1 'Any non-managerial employees entitled to parental leave'. value labels yifamily1 1 'Yes' 0 'No' -1 'Not applicable' -8 'Do not know' -9 'Refused'. execute. **************************************************************** . COMMENT Any non-managerial employees entitled to work at or from home in normal working hours (yifamily2). numeric yifamily2 (f3.0). do if (any(2, ifamily1 to ifamily8)=1). + compute yifamily2=1. else if (missing(ifamily1)=1). + recode ifamily1(-1, -8, -9=copy) into yifamily2. else. + compute yifamily2=0. end if. missing values yifamily2 (-1, -8, -9). variable label yifamily2 'Any non-managerial employees entitled to work at or from home in normal working hours'. value labels yifamily2 1 'Yes' 0 'No' -1 'Not applicable' -8 'Do not know' -9 'Refused'. execute. **************************************************************** . COMMENT Any non-managerial employees entitled to term-time only contracts (yifamily3). numeric yifamily3 (f3.0). do if (any(3, ifamily1 to ifamily8)=1). + compute yifamily3=1. else if (missing(ifamily1)=1). + recode ifamily1(-1, -8, -9=copy) into yifamily3. else. + compute yifamily3=0. end if. missing values yifamily3 (-1, -8, -9). variable label yifamily3 'Any non-managerial employees entitled to term-time only contracts'. value labels yifamily3 1 'Yes' 0 'No' -1 'Not applicable' -8 'Do not know' -9 'Refused'. execute. **************************************************************** . COMMENT Any non-managerial employees entitled to switch from full-time to part-time employment (yifamily4). numeric yifamily4 (f3.0). do if (any(4, ifamily1 to ifamily8)=1). + compute yifamily4=1. else if (missing(ifamily1)=1). + recode ifamily1(-1, -8, -9=copy) into yifamily4. else. + compute yifamily4=0. end if. missing values yifamily4 (-1, -8, -9). variable label yifamily4 'Any non-managerial employees entitled to switch from full-time to part-time employment'. value labels yifamily4 1 'Yes' 0 'No' -1 'Not applicable' -8 'Do not know' -9 'Refused'. execute. **************************************************************** . COMMENT Any non-managerial employees entitled to job share (yifamily5). numeric yifamily5 (f3.0). do if (any(5, ifamily1 to ifamily8)=1). + compute yifamily5=1. else if (missing(ifamily1)=1). + recode ifamily1(-1, -8, -9=copy) into yifamily5. else. + compute yifamily5=0. end if. missing values yifamily5 (-1, -8, -9). variable label yifamily5 'Any non-managerial employees entitled to job share'. value labels yifamily5 1 'Yes' 0 'No' -1 'Not applicable' -8 'Do not know' -9 'Refused'. execute. **************************************************************** . COMMENT Number of days of paid paternity leave grouped from ipatern (ypatern, ypatern2) . Numeric ypatern (f3.0). RECODE ipatern (MISSING=Copy) (95 = 5) (0=0) (1 thru 4=1) (5=2) (6 thru 9=3) (10=4) (11 thru highest =5) INTO ypatern . Missing values ypatern (-8,-1). VARIABLE LABELS ypatern 'Number of days of paid paternity leave'. Value labels ypatern 0 'None' 1 '1 to 4 days' 2 '5 days' 3 '6 to 9 days' 4 '10 days' 5 ' More than 10 days' -8 'Dont know' -1 'Not applicable'. EXECUTE . recode ypatern (missing = copy) (0 = 0) (1=1) (2=1) (3=1) (4=2) (5=3) into ypatern2. missing values ypatern2 (-8, -1). variable label ypatern2 'Number of days of paternity leave provided in line with current statutory provision'. value labels ypatern2 0 'None' 1 '1-9 days' 2 '10 days' 3 '11 or more days' -8 'DK' -1 'Not Applicable'. execute. **************************************************************** . COMMENT Time off for family emergencies (Yiifmoff) . recode ifmoff (missing = copy) (1 thru 5 = copy) (9 = 2) (6 = 0) (7 = 6) (8 thru highest = 8) into yiifmoff. variable labels yiifmoff 'Time off for family emergencies'. missing values yiifmoff (-9 thru -1). value labels yiifmoff 0 'Not allowed/would not be granted' 1 'Time off but make it up later' 2 'Unpaid leave' 3 'Sick leave' 4 'Special paid leave' 5 'Annual leave' 6 'Never been asked' 8 'Other/Multiple responses' -9 'Refused' -8 'Dont know' -1 'Not applicable'. execute. **************************************************************** . COMMENT Time off for family emergencies (Yiifmoffnew) . numeric yifmoffnew (f3.0). recode yiifmoff (missing =copy) (else = copy) into yifmoffnew. recode xifmoff (1=1) (2=2) (3=3) (4=4) (5=5) (6=6) (7=7) (8 = 8) (9=2) (10 thru highest =8) into yifmoffnew. variable labels yifmoffnew 'Time off for family emergencies'. value labels yifmoffnew 1 'Take time off and make it up later' 2 'Unpaid leave' 3 'Sick leave' 4 'Special paid Leave' 5 'Annual leave' 6 'Not allowed/would not be granted' 7 'Never asked' 8 'Multiple combinations/other'. execute. **************************************************************** . *Save file with new 2004 derived variables. *Note file path . SAVE OUTFILE='C:\WERS\2004 panel data and derived variables.sav'. **************************************************************** . *Open the 1998 MQ to derive the same variables for 1998. *Note file path . IMPORT FILE='C:\WERS\mq98fin.por'. sort cases by serno. weight off . ************************************************************************************************************************************* . *Need to match in non-response weights and derived variables which need restricted data (contained in fsocfix.sps). ************************************************************************************************************************************* . COMMENT Match on new weight variable for 1998 Weights Zallemps and ASIC back to IDBR profile as shown in Technical Report, including an adjustment to boost smaller workplaces within 10-24 band, to provide comparable data to 2004 10+ sample Derived in "Exploring possibility of reweighting 1998 to mimic inclusion of IDBR 5-9s.sps" . *Note file path . match files file=* /table="C:\WERS\1998 dvs requiring restricted data and nr weights.sav"/by serno. execute. ************************************************. **************************************************************** . *Run the fixes. **************************************************************** . *mq98fix.sps **************************************************************** . COMMENT Relabels values and recodes missing values on CLONGHR and CLONGDY . missing values clonghr (99) . value labels clonghr 99 'Dont know' . missing values clongdy (98, 99) . value labels clongdy 98 'Not answered' 99 'Dont know' . execute . COMMENT Recode eligible cases with sysmis value on DHIGHLEV . do if ((asingle=1 and aconhead=2) or asingle=3) and sysmis(dhighlev). + recode dhighlev (sysmis=8) . end if . execute . COMMENT Relabel DOTHWAY and add missing values . value labels dothway1 to dothway5 0 "None / No" 1 "Through managers" 2 "Suggestion schemes" 3 "Staff meetings / committees" 4 "Staff representatives" 5 "Staff notices" 6 "Other specific answer, not codeable to 0-5" 97 "Other vague answer, not codeable to 0-6" 98 "Dont know" 99 "Not answered" . missing values dothway1 (98,99) . execute . COMMENT Recode EMOSTMEM in three cases . do if any(serno,12080,12807,12871) . + recode emostmem (1=99) . end if . execute . COMMENT Recode eligible case with sysmis value on KSTAMAR . do if (missing(kstamar) and serno=14425) . + compute kstamar=8 . end if . execute . ************************************************************** . COMMENT Additions in Version 1,2 of the Notes . ************************************************************* . COMMENT Sets missing values where have not been on variable ZPRO_FPT . missing values zpro_fpt (99999, 99998) . execute . *********************************************************** . COMMENT Recodes missing values to zero for those cases identified in the work on the EPQ data, i.e. where they are missing but the data adds up so variables that are missing should actually read zero . missing values zmalfull to zrou_tot () . do if serno=11005 . + recode zmng_mft (99999=0) . + recode zmng_mpt (99999=0) . + recode zcle_mft (99999=0) . + recode zcle_mpt (99999=0) . + recode zcrt_mft (99999=0) . + recode zcrt_mpt (99999=0) . + recode zptc_mft (99999=0) . + recode zptc_mpt (99999=0) . + recode zsal_mft (99999=0) . + recode zsal_mpt (99999=0) . + recode zope_mft (99999=0) . + recode zope_fft (99999=0) . + recode zope_mpt (99999=0) . + recode zope_fpt (99999=0) . + recode zrou_mft (99999=0) . + recode zrou_mpt (99999=0) . end if . do if serno=11125 . + recode zmng_mpt (99999=0) . + recode zpro_mpt (99999=0) . + recode ztec_mpt (99999=0) . + recode zcle_mpt (99999=0) . + recode zcrt_mpt (99999=0) . + recode zptc_mpt (99999=0) . + recode zope_mpt (99999=0) . + recode zrou_mpt (99999=0) . end if . do if serno=11337 . + recode zcle_mft (99999=0) . + recode zcle_fft (99999=0) . end if . do if serno=11417 . + recode zmng_mpt (99999=0) . + recode zmng_fpt (99999=0) . + recode zcle_mpt (99999=0) . + recode zcle_fpt (99999=0) . + recode zcrt_mpt (99999=0) . + recode zcrt_fpt (99999=0) . + recode zptc_mft (99999=0) . + recode zptc_fft (99999=0) . + recode zptc_mpt (99999=0) . + recode zptc_fpt (99999=0) . + recode zsal_mft (99999=0) . + recode zsal_fft (99999=0) . + recode zsal_mpt (99999=0) . + recode zsal_fpt (99999=0) . + recode zrou_mpt (99999=0) . + recode zrou_fpt (99999=0) . end if . do if serno=11581 . + recode zmng_mft (99998=0) . + recode zmng_mpt (99998=0) . + recode zmng_fpt (99998=0) . + recode zpro_mft (99998=0) . + recode zpro_fft (99998=0) . + recode zpro_mpt (99998=0) . + recode zpro_fpt (99998=0) . + recode zpro_tot (999999=0) . + recode zcle_mft (99998=0) . + recode zcle_fft (99998=0) . + recode zcle_mpt (99998=0) . + recode zcle_fpt (99998=0) . + recode zcle_tot (999999=0) . + recode zcrt_mft (99998=0) . + recode zcrt_fft (99998=0) . + recode zcrt_mpt (99998=0) . + recode zcrt_fpt (99998=0) . + recode zcrt_tot (999999=0) . + recode zptc_mft (99998=0) . + recode zptc_fft (99998=0) . + recode zptc_mpt (99998=0) . + recode zptc_fpt (99998=0) . + recode zptc_tot (999999=0) . + recode zsal_mft (99998=0) . + recode zsal_fft (99998=0) . + recode zsal_mpt (99998=0) . + recode zsal_fpt (99998=0) . + recode zsal_tot (999999=0) . + recode zope_mft (99998=0) . + recode zope_fft (99998=0) . + recode zope_mpt (99998=0) . + recode zope_fpt (99998=0) . + recode zope_tot (999999=0) . + recode zrou_mft (99998=0) . + recode zrou_fft (99998=0) . + recode zrou_mpt (99998=0) . end if . do if serno=11590 . + recode zpro_mpt (99999=0) . + recode zpro_fpt (99999=0) . + recode zpro_tot (999999=0) . + recode ztec_mpt (99999=0) . + recode ztec_fpt (99999=0) . + recode ztec_tot (999999=0) . + recode zcrt_mpt (99999=0) . + recode zcrt_fpt (99999=0) . + recode zcrt_tot (999999=0) . + recode zptc_mpt (99999=0) . + recode zptc_fpt (99999=0) . + recode zptc_tot (999999=0) . + recode zsal_mpt (99999=0) . + recode zsal_fpt (99999=0) . + recode zsal_tot (999999=0) . + recode zope_mpt (99999=0) . + recode zope_fpt (99999=0) . + recode zope_tot (999999=0) . end if . do if serno=11703 . + recode zmng_mpt (99999=0) . + recode zpro_mpt (99999=0) . + recode ztec_mpt (99999=0) . + recode zcle_mpt (99999=0) . + recode zcrt_mpt (99999=0) . + recode zope_mpt (99999=0) . + recode zrou_mpt (99999=0) . end if . do if serno=12009 . + recode ztec_mft (99999=0) . + recode ztec_fft (99999=0) . + recode ztec_mpt (99999=0) . + recode ztec_fpt (99999=0) . + recode zptc_mpt (99999=0) . + recode zptc_fpt (99999=0) . + recode zope_mft (99999=0) . + recode zope_fft (99999=0) . + recode zope_mpt (99999=0) . + recode zope_fpt (99999=0) . end if . do if serno=12902 . + recode zsal_tot (999999=0) . + recode zope_tot (999999=0) . end if . do if serno=12911 . + recode ztec_fpt (99999=0) . + recode zcle_mpt (99999=0) . + recode zcle_fpt (99999=0) . + recode zcrt_fpt (99999=0) . + recode zsal_mpt (99999=0) . + recode zsal_fpt (99999=0) . + recode zope_fpt (99999=0) . end if . do if serno=12763 . + recode zpro_tot (999999=0) . + recode ztec_tot (999999=0) . + recode zcrt_tot (999999=0) . + recode zptc_tot (999999=0) . + recode zrou_tot (999999=0) . end if . do if serno=12881 . + recode zmng_mft (99999=0) . + recode zmng_mpt (99999=0) . + recode zmng_fpt (99999=0) . end if . do if serno=12883 . + recode ztec_mpt (99999=0) . + recode zcrt_mpt (99999=0) . + recode zope_mpt (99999=0) . end if . do if serno=12902 . + recode zcrt_tot (999999=0) . + recode zrou_tot (999999=0) . end if . do if serno=12911 . + recode zmng_mpt (99999=0) . + recode zmng_fpt (99999=0) . + recode zpro_mpt (99999=0) . + recode zpro_fpt (99999=0) . + recode ztec_mpt (99999=0) . + recode zcrt_mpt (99999=0) . + recode zope_mpt (99999=0) . end if . do if serno=13231 . + recode zmng_mft (99998=0) . + recode zmng_fft (99998=0) . + recode zmng_mpt (99998=0) . + recode zmng_fpt (99998=0) . + recode zpro_mft (99998=0) . + recode zpro_fft (99998=0) . + recode zpro_mpt (99998=0) . + recode zpro_fpt (99998=0) . + recode ztec_mft (99998=0) . + recode ztec_fft (99998=0) . + recode ztec_mpt (99998=0) . + recode ztec_fpt (99998=0) . + recode zcrt_mft (99998=0) . + recode zcrt_fft (99998=0) . + recode zcrt_mpt (99998=0) . + recode zcrt_fpt (99998=0) . + recode zptc_mft (99998=0) . + recode zptc_fft (99998=0) . + recode zptc_mpt (99998=0) . + recode zptc_fpt (99998=0) . + recode zsal_mft (99998=0) . + recode zsal_fft (99998=0) . + recode zsal_mpt (99998=0) . + recode zsal_fpt (99998=0) . + recode zope_mft (99998=0) . + recode zope_fft (99998=0) . + recode zope_mpt (99998=0) . + recode zope_fpt (99998=0) . + recode zrou_mft (99998=0) . + recode zrou_fft (99998=0) . + recode zrou_mpt (99998=0) . + recode zrou_fpt (99998=0) . end if . do if serno=13308 . + recode zmng_mpt (99999=0) . + recode zmng_fpt (99999=0) . + recode zpro_mpt (99999=0) . + recode zpro_fpt (99999=0) . + recode zcle_mpt (99999=0) . + recode zcle_fpt (99999=0) . + recode zcrt_mpt (99999=0) . + recode zcrt_fpt (99999=0) . + recode zptc_mpt (99999=0) . + recode zptc_fpt (99999=0) . + recode zsal_mpt (99999=0) . + recode zsal_fpt (99999=0) . + recode zope_mpt (99999=0) . + recode zope_fpt (99999=0) . + recode zrou_mpt (99999=0) . + recode zrou_fpt (99999=0) . end if . do if serno=13341 . + recode zptc_mft (99999=0) . + recode zptc_fft (99999=0) . + recode zptc_mpt (99999=0) . + recode zptc_fpt (99999=0) . + recode zsal_mft (99999=0) . + recode zsal_fft (99999=0) . + recode zsal_mpt (99999=0) . + recode zsal_fpt (99999=0) . + recode zope_mft (99999=0) . + recode zope_fft (99999=0) . + recode zope_mpt (99999=0) . + recode zope_fpt (99999=0) . end if . execute . missing values zmalfull to zrou_tot (99997,99998,99999) . missing values zmng_tot zpro_tot ztec_tot zcle_tot zcrt_tot zptc_tot zsal_tot zope_tot zrou_tot (999997, 999998,999999) . execute . *********************************************************** . COMMENT Sets missing values where have not been on variable ADDRESS2 . missing values address2 (9) . execute . COMMENT Sets CLASSIF to missing where value is 97 (refers to 'Lots but dont know how many') . missing values classif (97, 98, 99) . value labels classif 97 'Lots but dont know how many' . execute . COMMENT Sets user missing values to missing and labels them for the variable EUNIONA1 Also adds missing value labels for two unions . missing values euniona1 (999) . add value labels euniona1 to eunioa10 42 'ASTMS' 58 'CLEARING BANK UNION' 999 'DK/NA' . execute . COMMENT Recodes case to missing for etotrec where total should not have been calculated as euionum, eniona1 and erecog01 are all missing . do if serno=11990 . + recode etotrec (0=sysmis) (else=copy) . end if . execute . COMMENT Recodes the blank case in FTYPEAP7 . recode ftypeap7 (8=5) (else=copy) . execute . COMMENT Labels the variables HRESOLV1-2 . variable labels hresolv1 hresolv2 "If an employee has a problem with some aspect of their working conditions, how do they resolve it?" . COMMENT Sets missing value that has not been set for IPATERN and labels it . value labels ipatern 97 'Vague answer' . missing values ipatern (97,98,99) . execute . COMMENT Sets missing value that has not been set for JDURATIO and labels it . value labels jduratio 97 'Vague answer' . missing values jduratio (97,98,99) . execute . COMMENT Sets the missing value 9 to missing for the variable mqloc . missing values mqloc (9) . execute . **************************************************************** . *recogfix.sps. **************************************************************** . COMMENT Purpose: Edits the recognition data in state schools in the 1998 Cross-Section Management data file, to erase recognition for teaching unions where pay is actually set by a Pay Review Body (for further details see endnote 24 on Ch 10 in Britain at Work; endnote 13 on Ch 4 of All Change at Work?) . COMMENT Cases where the number of recognised unions is recoded to zero . numeric nrecflg1 (f2.0) . numeric nrecflg2 (f2.0) . do if serno=11237 . + recode erecog01 erecog02 (1=2) . + recode etotrec (2=0) . + recode emostmem ejoint egroups (else=sysmis) . + recode enum5yr (2=0) . + recode esteward estewext (2=sysmis) . + recode ltypinv1 (3=sysmis) . + compute nrecflg1=1 . + compute nrecflg2=0 . end if . do if serno=11239 . + recode erecog01 erecog02 erecog03 (1=2) . + recode etotrec (3=0) . + recode emostmem ejoint (else=sysmis) . + recode enum5yr (3=0) . + recode esteward estewext (2=sysmis) . + recode ltypinv1 (5=sysmis) . + compute nrecflg1=1 . + compute nrecflg2=0 . end if . do if serno=11304 . + recode erecog01 erecog02 (1=2) . + recode etotrec (2=0) . + recode emostmem ejoint (else=sysmis) . + recode enum5yr (2=0) . + recode esteward estewnum estewtim (else=sysmis) . + recode eothreps (2=1) . + recode enumreps echosen1 (sysmis=3) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + compute nrecflg1=1 . + compute nrecflg2=1 . end if . do if serno=11378 . + recode erecog01 erecog02 (1=2) . + recode etotrec (2=0) . + recode emostmem ejoint (else=sysmis) . + recode enum5yr (2=0) . + recode esteward estewnum estewtim (else=sysmis) . + recode eothreps (2=1) . + recode enumreps (sysmis=2) . + recode echosen1 (sysmis=3) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + recode ltypinv1 (4=sysmis) . + compute nrecflg1=1 . + compute nrecflg2=0 . end if . do if serno=11915 . + recode erecog01 erecog02 erecog03 (1=2) . + recode etotrec (3=0) . + recode emostmem ejoint (else=sysmis) . + recode enum5yr (3=0) . + recode esteward estewnum estewtim (else=sysmis) . + recode eothreps (2=1) . + recode enumreps (sysmis=4) . + recode echosen1 (sysmis=3) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + recode ltypinv1 (5=sysmis) . + compute nrecflg1=1 . + compute nrecflg2=0 . end if . do if serno=12143 . + recode erecog01 erecog02 erecog03 (1=2) . + recode etotrec (3=0) . + recode emostmem ejoint egroups (else=sysmis) . + recode enum5yr (3=0) . + recode esteward estewnum estewtim (else=sysmis) . + recode eothreps (2=1) . + recode enumreps (sysmis=2) . + recode echosen1 (sysmis=3) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + recode ltypinv1 (5=sysmis) . + compute nrecflg1=1 . + compute nrecflg2=1 . end if . do if serno=12817 . + recode erecog01 erecog02 (1=2) . + recode etotrec (2=0) . + recode emostmem (99=sysmis) . + recode ejoint (9=sysmis) . + recode esteward (2=sysmis) . + recode estewext (9=sysmis) . + recode ltypinv1 (5=sysmis) . + compute nrecflg1=1 . + compute nrecflg2=0 . end if . do if serno=12840 . + recode erecog01 erecog02 erecog03 erecog04 erecog05 (1=2) . + recode etotrec (5=0) . + recode emostmem ejoint (else=sysmis) . + recode enum5yr (5=0) . + recode esteward estewext (else=sysmis) . + recode ltypinv1 (3=sysmis) . + compute nrecflg1=1 . + compute nrecflg2=0 . end if . do if serno=12923 . + recode erecog01 erecog02 erecog03 erecog04 erecog05 (1=2) . + recode etotrec (5=0) . + recode emostmem (1=sysmis) . + recode ejoint (2=sysmis) . + recode egroups (5=sysmis) . + recode enum5yr (5=0) . + recode esteward (1=sysmis) . + recode estewnum (5=sysmis) . + recode estewtim (2=sysmis) . + recode eothreps (2=1) . + recode enumreps (sysmis=5) . + recode echosen1 (sysmis=3) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + recode epaya to eperfora (else=sysmis). + recode etalk5yr (1=sysmis) . + recode ewhymor1 (2=sysmis) . + recode ltypinv1 (3=sysmis) . + compute nrecflg1=1 . + compute nrecflg2=1 . end if . do if serno=13067 . + recode erecog01 erecog02 erecog03 (1=2) . + recode etotrec (3=0) . + recode emostmem ejoint (else=sysmis) . + recode enum5yr (3=0) . + recode esteward estewext (else=sysmis) . + recode ltypinv1 (4=sysmis) . + compute nrecflg1=1 . + compute nrecflg2=0 . end if . do if serno=13108 . + recode erecog01 (1=2) . + recode etotrec (1=0) . + recode emostmem eformal (else=sysmis) . + recode enum5yr (7=98) . + recode ehowcom1 esteward estewnum estewtim (else=sysmis) . + recode eothreps (2=1) . + recode enumreps (sysmis=1) . + recode echosen1 (sysmis=3) . + recode esiton (sysmis=8) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + recode ltypinv1 (3=sysmis) . + compute nrecflg1=1 . + compute nrecflg2=0 . end if . do if serno=13314 . + recode erecog01 (1=2) . + recode etotrec (1=0) . + recode emostmem eformal ejoint (else=sysmis) . + recode enum5yr (1=0) . + recode esteward estewext (else=sysmis) . + recode ltypinv1 (5=sysmis) . + compute nrecflg1=1 . + compute nrecflg2=0 . end if . do if serno=13424 . + recode erecog01 erecog02 (1=2) . + recode etotrec (2=0) . + recode emostmem (1=sysmis) . + recode ejoint (1=sysmis) . + recode enum5yr (2=sysmis) . + recode esteward (2=sysmis) . + recode estewext (2=sysmis) . + recode ltypinv1 (5=sysmis) . + compute nrecflg1=1 . + compute nrecflg2=0 . end if . do if serno=13447 . + recode erecog01 (1=2) . + recode etotrec (1=0) . + recode emostmem (1=sysmis) . + recode eformal (1=sysmis) . + recode enum5yr (1=sysmis) . + recode esteward (2=sysmis) . + recode estewext (2=sysmis) . + recode ltypinv1 (5=sysmis) . + compute nrecflg1=1 . + compute nrecflg2=0 . end if . do if serno=13836 . + recode erecog01 erecog02 erecog03 erecog04 (1=2) . + recode etotrec (4=0) . + recode emostmem ejoint (else=sysmis) . + recode enum5yr (4=0) . + recode esteward estewnum estewtim (else=sysmis) . + recode eothreps (2=1) . + recode enumreps (sysmis=4) . + recode echosen1 (sysmis=3) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + recode ltypinv1 (5=sysmis) . + compute nrecflg1=1 . + compute nrecflg2=1 . end if . do if serno=13961 . + recode erecog01 erecog02 erecog03 (1=2) . + recode etotrec (3=0) . + recode emostmem ejoint (else=sysmis) . + recode enum5yr (4=98) . + recode ehowcom1 esteward estewnum estewtim (else=sysmis) . + recode eothreps (2=1) . + recode enumreps (sysmis=1) . + recode echosen1 (sysmis=3) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + recode ltypinv1 (5=sysmis) . + compute nrecflg1=1 . + compute nrecflg2=1 . end if . do if serno=14066 . + recode erecog01 erecog02 erecog03 (1=2) . + recode etotrec (3=0) . + recode emostmem ejoint (else=sysmis) . + recode enum5yr (3=0) . + recode esteward estewext (else=sysmis) . + recode ltypinv1 (5=sysmis) . + compute nrecflg1=1 . + compute nrecflg2=0 . end if . do if serno=14199 . + recode erecog01 erecog02 erecog03 erecog04 (1=2) . + recode etotrec (4=0) . + recode emostmem ejoint (else=sysmis) . + recode enum5yr (4=0) . + recode esteward estewext (else=sysmis) . + recode ltypinv1 (5=sysmis) . + compute nrecflg1=1 . + compute nrecflg2=0 . end if . do if serno=14253 . + recode erecog01 erecog02 erecog03 erecog04 (1=2) . + recode etotrec (4=0) . + recode emostmem ejoint (else=sysmis) . + recode enum5yr (4=0) . + recode ehowcom1 esteward estewnum estewtim (else=sysmis) . + recode eothreps (2=1) . + recode enumreps (sysmis=4) . + recode echosen1 (sysmis=3) . + recode esiton (sysmis=8) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + recode ltypinv1 (5=sysmis) . + compute nrecflg1=1 . + compute nrecflg2=0 . end if . do if serno=14475 . + recode erecog01 erecog02 erecog03 (1=2) . + recode etotrec (3=0) . + recode emostmem (1=sysmis) . + recode ejoint (1=sysmis) . + recode enum5yr (4=98) . + recode esteward (1=sysmis) . + recode estewnum (2=sysmis) . + recode estewtim (2=sysmis) . + recode eothreps (2=1) . + recode enumreps (sysmis=2) . + recode echosen1 (sysmis=3) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + recode ltypinv1 (5=sysmis) . + compute nrecflg1=1 . + compute nrecflg2=1 . end if . COMMENT Cases where, although the recognition variables are recoded, there are still recognised unions at the workplace, ie etotrec is not set to zero . do if serno=11015 . + recode erecog01 erecog03 erecog04 (1=2) . + recode etotrec (4=1) . + recode emostmem (1=2) . + recode eformal (sysmis=8) . + recode ejoint (3=sysmis) . + recode egroups (3=sysmis) . + recode enum5yr (4=1) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=11178 . + recode erecog01 erecog02 (1=2) . + recode etotrec (3=1) . + recode emostmem (1=3) . + recode eformal (sysmis=8) . + recode ejoint (1=sysmis) . + recode enum5yr (3=1) . + recode estewnum (3=1) . + recode eothreps (2=1) . + recode enumreps (sysmis=2) . + recode echosen1 (sysmis=3) . + recode esiton (sysmis=8) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=11183 . + recode erecog01 erecog02 (1=2) . + recode etotrec (3=1) . + recode emostmem (1=2) . + recode eformal (sysmis=8) . + recode ejoint (2=sysmis) . + recode egroups (3=sysmis) . + recode enum5yr (3=1) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=11215 . + recode erecog01 erecog04 (1=2) . + recode etotrec (4=2) . + recode emostmem (1=2) . + recode enum5yr (3=98) . + recode ehowcom1 (2=sysmis) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=11248 . + recode erecog01 (1=2) . + recode etotrec (7=6) . + recode emostmem (1=2) . + recode enum5yr (7=6) . + recode esteward (1=8) . + recode estewnum (1=sysmis) . + recode estewtim (2=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=11294 . + recode erecog01 erecog03 erecog05 (1=2) . + recode etotrec (5=2) . + recode emostmem (1=2) . + recode enum5yr (5=2) . + recode estewext (2=8) . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=11797 . + recode erecog02 (1=2) . + recode etotrec (3=2) . + recode enum5yr (3=2) . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=11809 . + recode erecog01 erecog04 erecog05 (1=2) . + recode etotrec (5=2) . + recode emostmem (1=2) . + recode egroups (5=2) . + recode enum5yr (4=98) . + recode ehowcom1 (2=sysmis) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=11871 . + recode erecog01 erecog02 erecog03 erecog04 (1=2) . + recode etotrec (5=1) . + recode emostmem (1=5) . + recode eformal (sysmis=8) . + recode ejoint (1=sysmis) . + recode enum5yr (5=1) . + recode estewnum (5=1) . + recode eothreps (2=1) . + recode enumreps (sysmis=4) . + recode echosen1 (sysmis=3) . + recode esiton (sysmis=8) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=11912 . + recode erecog01 erecog02 erecog03 erecog04 (1=2) . + recode etotrec (6=2) . + recode emostmem (1=5) . + recode egroups (99=2) . + recode enum5yr (6=2) . + recode estewext (2=8) . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=11924 . + recode erecog01 erecog02 erecog04 erecog05 (1=2) . + recode etotrec (5=1) . + recode emostmem (1=3) . + recode eformal (sysmis=8) . + recode ejoint (1=sysmis) . + recode enum5yr (5=1) . + recode estewnum (5=1) . + recode eothreps (2=1) . + recode enumreps (sysmis=4) . + recode echosen1 (sysmis=3) . + recode esiton (sysmis=8) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=12039 . + recode erecog02 erecog04 erecog05 (1=2) . + recode etotrec (5=2) . + recode egroups (5=2) . + recode esteward (1=8) . + recode estewnum (1=sysmis) . + recode estewtim (2=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=12067 . + recode erecog01 erecog02 (1=2) . + recode etotrec (4=2) . + recode emostmem (1=3) . + recode enum5yr (4=2) . + recode esteward (1=8) . + recode estewnum (2=sysmis) . + recode estewtim (2=sysmis) . + recode enumreps (1=98) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=12073 . + recode erecog02 erecog03 erecog04 erecog05 (1=2) . + recode etotrec (5=1) . + recode eformal (sysmis=8) . + recode ejoint (1=sysmis) . + recode enum5yr (5=1) . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=12080 . + recode erecog02 (1=2) . + recode etotrec (2=1) . + recode emostmem (99=3) . + recode eformal (sysmis=8) . + recode ejoint (1=sysmis) . + recode enum5yr (3=98) . + recode ehowcom1 (5=sysmis) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=12099 . + recode erecog01 erecog02 erecog03 erecog04 (1=2) . + recode etotrec (5=1) . + recode emostmem (2=5) . + recode eformal (sysmis=8) . + recode ejoint egroups (2=sysmis) . + recode enum5yr (6=98) . + recode ehowcom1 (1=sysmis) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=12127 . + recode erecog01 erecog02 erecog03 erecog04 (1=2) . + recode etotrec (5=1) . + recode emostmem (1=5) . + recode eformal (sysmis=8) . + recode ejoint (3=sysmis) . + recode egroups (5=sysmis) . + recode enum5yr (5=1) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode enumreps (1=98) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + recode fpaycut (1=8) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=12130 . + recode erecog02 erecog03 erecog04 (1=2) . + recode etotrec (4=1) . + recode eformal (sysmis=8) . + recode ejoint (1=sysmis) . + recode enum5yr (4=1) . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=12176 . + recode erecog02 erecog03 erecog04 erecog05 (1=2) . + recode etotrec (5=1) . + recode eformal (sysmis=8) . + recode ejoint (2=sysmis) . + recode egroups (5=sysmis) . + recode enum5yr (5=1) . + recode esteward (1=8) . + recode estewnum (1=sysmis) . + recode estewtim (2=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=12220 . + recode erecog01 erecog03 (1=2) . + recode etotrec (3=1) . + recode emostmem (1=2) . + recode eformal (sysmis=8) . + recode ejoint (2=sysmis) . + recode egroups (3=sysmis) . + recode enum5yr (6=4) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (1=sysmis) . + recode ewhymor1 (4=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=12252 . + recode erecog02 erecog03 erecog04 erecog05 (1=2) . + recode etotrec (5=1) . + recode eformal (sysmis=8) . + recode ejoint (2=sysmis) . + recode egroups (2=sysmis) . + recode enum5yr (5=1) . + recode estewnum (5=1) . + recode eothreps (2=1) . + recode enumreps (sysmis=4) . + recode echosen1 (sysmis=3) . + recode esiton (sysmis=8) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=12256 . + recode erecog02 erecog03 (1=2) . + recode etotrec (3=1) . + recode eformal (sysmis=8) . + recode ejoint (2=sysmis) . + recode egroups (3=sysmis) . + recode enum5yr (3=1) . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=12283 . + recode erecog01 erecog02 erecog03 erecog04 erecog09 (1=2) . + recode etotrec (9=4) . + recode emostmem (1=5) . + recode enum5yr (9=4) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode epaya to eperfora (else=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=12280 . + recode erecog01 erecog02 erecog03 (1=2) . + recode etotrec (4=1) . + recode emostmem (1=4) . + recode eformal (sysmis=8) . + recode ejoint (9=sysmis) . + recode enum5yr (5=98) . + recode ehowcom1 (5=sysmis) . + recode estewext (2=8) . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=12327 . + recode erecog01 erecog03 erecog04 (1=2) . + recode etotrec (6=3) . + recode emostmem (1=2) . + recode estewnum (6=3) . + recode eothreps (2=1) . + recode enumreps (sysmis=3) . + recode echosen1 (sysmis=3) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=12348 . + recode erecog01 erecog02 erecog03 erecog05 (1=2) . + recode etotrec (7=3) . + recode emostmem (1=4) . + recode enum5yr (7=3) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (1=sysmis) . + recode ewhymor1 (2=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=12350 . + recode erecog01 erecog03 erecog04 erecog05 erecog06 (1=2) . + recode etotrec (6=1) . + recode emostmem (1=2) . + recode eformal (sysmis=8) . + recode ejoint (2=sysmis) . + recode egroups (6=sysmis) . + recode enum5yr (6=1) . + recode estewnum (6=1) . + recode enumreps (2=7) . + recode echosen2 (sysmis=3) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=12358 . + recode erecog01 erecog02 erecog05 erecog06 erecog07 (1=2) . + recode etotrec (7=2) . + recode emostmem (1=3) . + recode enum5yr (5=98) . + recode ehowcom1 (5=sysmis) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (1=sysmis) . + recode ewhymor1 (2=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=12445 . + recode erecog01 (1=2) . + recode etotrec (5=4) . + recode emostmem (1=2) . + recode egroups (5=4) . + recode enum5yr (5=4) . + recode estewext (2=8) . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=12472 . + recode erecog01 erecog02 erecog03 erecog04 (1=2) . + recode etotrec (6=2) . + recode emostmem (1=5) . + recode ejoint (3=2) . + recode egroups (2=1) . + recode enum5yr (6=2) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (1=sysmis) . + recode ewhymor1 (2=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=12500 . + recode erecog01 erecog03 erecog04 erecog05 (1=2) . + recode etotrec (5=1) . + recode emostmem (1=2) . + recode eformal (sysmis=8) . + recode ejoint (3=sysmis) . + recode egroups (2=sysmis) . + recode estewnum (5=1) . + recode eothreps (2=1) . + recode enumreps (sysmis=4) . + recode echosen1 (sysmis=3) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=12523 . + recode erecog01 erecog02 (1=2) . + recode etotrec (6=4) . + recode emostmem (1=3) . + recode enum5yr (6=4) . + recode esteward (1=8) . + recode estewnum (5=sysmis) . + recode estewtim (2=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=12529 . + recode erecog01 erecog03 (1=2) . + recode etotrec (3=1) . + recode emostmem (1=2) . + recode eformal (sysmis=8) . + recode ejoint (2=sysmis) . + recode egroups (3=sysmis) . + recode enum5yr (3=1) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (1=sysmis) . + recode ewhymor1 (2=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=12604 . + recode erecog01 erecog02 erecog04 (1=2) . + recode etotrec (4=1) . + recode emostmem (1=3) . + recode eformal (sysmis=8) . + recode ejoint (1=sysmis) . + recode enum5yr (4=1) . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=12622 . + recode erecog02 erecog03 erecog04 erecog05 erecog06 (1=2) . + recode etotrec (7=2) . + recode enum5yr (6=98) . + recode ehowcom1 (2=sysmis) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode enumreps (9=98) . + recode echosen1 (1=98) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=12623 . + recode erecog02 erecog03 erecog04 erecog05 erecog06 (1=2) . + recode etotrec (6=1) . + recode eformal (sysmis=8) . + recode ejoint (1=sysmis) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode enumreps (7=98) . + recode echosen1 (2=98) . + recode epaya to eperfora (else=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=12625 . + recode erecog01 erecog02 erecog04 (1=2) . + recode etotrec (6=3) . + recode emostmem (1=3) . + recode ejoint (3=8) . + recode egroups (99=sysmis) . + recode enum5yr (6=3) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode enumreps (6=98) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=12633 . + recode erecog02 erecog03 erecog05 (1=2) . + recode etotrec (5=2) . + recode ejoint (3=8) . + recode egroups (4=sysmis) . + recode enum5yr (5=2) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=12640 . + recode erecog01 erecog02 erecog03 erecog05 (1=2) . + recode etotrec (5=1) . + recode emostmem (1=4) . + recode eformal (sysmis=8) . + recode ejoint (1=sysmis) . + recode enum5yr (5=1) . + recode estewnum (5=1) . + recode eothreps (2=8) . + recode enumreps (sysmis=4) . + recode echosen1 (sysmis=3) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=12641 . + recode erecog01 erecog03 erecog04 erecog05 (1=2) . + recode etotrec (5=1) . + recode emostmem (1=2) . + recode eformal (sysmis=8) . + recode ejoint (3=sysmis) . + recode egroups (3=sysmis) . + recode enum5yr (5=1) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode enumreps (2=98) . + recode echosen1 (2=98) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=12652 . + recode erecog01 erecog02 erecog03 erecog04 (1=2) . + recode etotrec (5=1) . + recode emostmem (99=5) . + recode eformal (sysmis=8) . + recode ejoint (1=sysmis) . + recode enum5yr (5=1) . + recode estewnum (5=1) . + recode eothreps (2=1) . + recode enumreps (sysmis=4) . + recode echosen1 (sysmis=3) . + recode esiton (sysmis=8) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=12674 . + recode erecog01 erecog02 erecog03 erecog04 (1=2) . + recode etotrec (6=2) . + recode emostmem (1=5) . + recode enum5yr (6=2) . + recode estewnum (6=2) . + recode eothreps (2=1) . + recode enumreps (sysmis=4) . + recode echosen1 (sysmis=3) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=12712 . + recode erecog01 erecog02 erecog03 (1=2) . + recode etotrec (5=2) . + recode emostmem (1=4) . + recode enum5yr (6=98) . + recode ehowcom1 (5=sysmis) . + recode estewnum (5=2) . + recode eothreps (2=1) . + recode enumreps (sysmis=3) . + recode echosen1 (sysmis=3) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=12728 . + recode erecog02 erecog03 erecog04 erecog05 (1=2) . + recode etotrec (5=1) . + recode eformal (sysmis=8) . + recode ejoint (1=sysmis) . + recode enum5yr (5=1) . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=12767 . + recode erecog01 erecog02 erecog04 erecog05 erecog06 (1=2) . + recode etotrec (6=1) . + recode emostmem (1=3) . + recode eformal (sysmis=8) . + recode ejoint (1=sysmis) . + recode esteward (1=8) . + recode estewnum (2=sysmis) . + recode estewtim (2=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=12806 . + recode erecog01 erecog02 erecog03 (1=2) . + recode etotrec (5=2) . + recode emostmem (1=4) . + recode enum5yr (7=98) . + recode ehowcom1 (1=sysmis) . + recode estewnum (5=2) . + recode eothreps (2=1) . + recode enumreps (sysmis=3) . + recode echosen1 (sysmis=3) . + recode esiton (sysmis=8) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=12829 . + recode erecog02 erecog03 erecog04 (1=2) . + recode etotrec (4=1) . + recode eformal (sysmis=8) . + recode ejoint (9=sysmis) . + recode enum5yr (5=98) . + recode ehowcom1 (1=sysmis) . + recode esteward (1=8) . + recode estewnum (3=sysmis) . + recode estewtim (2=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis). + recode etalk5yr (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=12847 . + recode erecog01 erecog02 erecog03 erecog04 (1=2) . + recode etotrec (5=1) . + recode emostmem (1=5) . + recode eformal (sysmis=8) . + recode ejoint (1=sysmis) . + recode enum5yr (5=1) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode enumreps (2=98) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (8=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=12864 . + recode erecog02 (1=2) . + recode etotrec (2=1) . + recode eformal (sysmis=8) . + recode ejoint (3=sysmis) . + recode egroups (2=sysmis) . + recode enum5yr (2=1) . + recode esteward (1=8) . + recode estewnum (4=sysmis) . + recode estewtim (2=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (1=sysmis) . + recode ewhymor1 (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=12887 . + recode erecog01 erecog02 erecog03 erecog05 (1=2) . + recode etotrec (5=1) . + recode emostmem (1=4) . + recode eformal (sysmis=8) . + recode ejoint (3=sysmis) . + recode egroups (2=sysmis) . + recode enum5yr (5=1) . + recode estewnum (5=1) . + recode eothreps (2=1) . + recode enumreps (sysmis=4) . + recode echosen1 (sysmis=3) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=12899 . + recode erecog01 erecog02 erecog03 erecog04 erecog06 (1=2) . + recode etotrec (6=1) . + recode emostmem (1=5) . + recode eformal (sysmis=8) . + recode ejoint (1=sysmis) . + recode enum5yr (6=1) . + recode estewnum (6=1) . + recode eothreps (2=1) . + recode enumreps (sysmis=5) . + recode echosen1 (sysmis=3) . + recode esiton (sysmis=8) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=12916 . + recode erecog02 erecog03 erecog05 (1=2) . + recode etotrec (5=2) . + recode emostmem (2=1) . + recode enum5yr (5=2) . + recode estewnum (5=2) . + recode eothreps (2=1) . + recode enumreps (sysmis=3) . + recode echosen1 (sysmis=3) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=12927 . + recode erecog01 erecog02 erecog04 (1=2) . + recode etotrec (4=1) . + recode emostmem (1=3) . + recode eformal (sysmis=8) . + recode ejoint (1=sysmis) . + recode enum5yr (4=1) . + recode estewnum (4=1) . + recode eothreps (2=1) . + recode enumreps (sysmis=3) . + recode echosen1 (sysmis=3) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=12969 . + recode erecog01 erecog02 erecog04 erecog05 (1=2) . + recode etotrec (5=1) . + recode emostmem (1=3) . + recode eformal (sysmis=8) . + recode ejoint (3=sysmis) . + recode egroups (99=sysmis) . + recode enum5yr (5=1) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=12971 . + recode erecog01 erecog03 erecog04 erecog05 erecog06 (1=2) . + recode etotrec (6=1) . + recode emostmem (1=2) . + recode eformal (sysmis=8) . + recode ejoint (2=sysmis) . + recode egroups (6=sysmis) . + recode enum5yr (6=1) . + recode estewnum (6=1) . + recode enumreps (5=10) . + recode echosen2 (sysmis=3) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=12972 . + recode erecog02 erecog03 erecog04 (1=2) . + recode etotrec (4=1) . + recode eformal (sysmis=8) . + recode ejoint (2=sysmis) . + recode egroups (99=sysmis) . + recode enum5yr (4=1) . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=12983 . + recode erecog01 erecog02 (1=2) . + recode etotrec (3=1) . + recode emostmem (1=3) . + recode eformal (sysmis=8) . + recode ejoint (1=sysmis) . + recode enum5yr (4=98) . + recode ehowcom1 (5=sysmis) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=12995 . + recode erecog01 erecog03 erecog04 erecog05 (1=2) . + recode etotrec (5=1) . + recode emostmem (1=2) . + recode eformal (sysmis=8) . + recode ejoint (2=sysmis) . + recode egroups (99=sysmis) . + recode enum5yr (5=1) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (1=sysmis) . + recode ewhymor1 (5=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=13023 . + recode erecog01 erecog03 erecog04 erecog06 (1=2) . + recode etotrec (5=1) . + recode emostmem (1=5) . + recode eformal (sysmis=8) . + recode ejoint (1=sysmis) . + recode enum5yr (6=98) . + recode ehowcom1 (1=sysmis) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=13080 . + recode erecog01 erecog03 (1=2) . + recode etotrec (3=1) . + recode emostmem (1=2) . + recode eformal (sysmis=8) . + recode ejoint (9=sysmis) . + recode enum5yr (3=1) . + recode estewext (2=8) . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=13104 . + recode erecog01 erecog02 erecog03 erecog04 (1=2) . + recode etotrec (5=1) . + recode eformal (sysmis=8) . + recode ejoint (1=sysmis) . + recode enum5yr (5=1) . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=13116 . + recode erecog01 erecog03 erecog04 (1=2) . + recode etotrec (4=1) . + recode emostmem (1=2) . + recode eformal (sysmis=8) . + recode ejoint (1=sysmis) . + recode enum5yr (4=1) . + recode estewnum (4=1) . + recode eothreps (2=1) . + recode enumreps (sysmis=3) . + recode echosen1 (sysmis=3) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=13187 . + recode erecog01 erecog02 erecog03 erecog04 (1=2) . + recode etotrec (6=2) . + recode emostmem (1=5) . + recode enum5yr (6=2) . + recode estewnum (6=2) . + recode enumreps (1=3) . + recode echosen2 (sysmis=3) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=13281 . + recode erecog01 erecog03 erecog04 (1=2) . + recode etotrec (4=1) . + recode emostmem (1=2) . + recode eformal (sysmis=8) . + recode ejoint (3=sysmis) . + recode egroups (2=sysmis) . + recode ehowcom1 (5=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=13376 . + recode erecog02 erecog03 (1=2) . + recode etotrec (3=1) . + recode eformal (sysmis=8) . + recode ejoint (3=sysmis) . + recode egroups (2=sysmis) . + recode enum5yr (3=1) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=13451 . + recode erecog01 erecog04 (1=2) . + recode etotrec (4=2) . + recode emostmem (1=2) . + recode egroups (4=2) . + recode enum5yr (4=2) . + recode esteward (1=8) . + recode estewnum (2=sysmis) . + recode estewtim (2=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr ewhymor1 (1=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=13489 . + recode erecog01 erecog02 erecog03 (1=2) . + recode etotrec (4=1) . + recode emostmem (1=4) . + recode eformal (sysmis=8) . + recode ejoint (2=sysmis) . + recode egroups (99=sysmis) . + recode estewext (2=8) . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=13509 . + recode erecog01 erecog02 (1=2) . + recode etotrec (3=1) . + recode emostmem (1=5) . + recode eformal (sysmis=8) . + recode ejoint (9=sysmis) . + recode enum5yr (3=1) . + recode estewnum (3=1) . + recode eothreps (2=1) . + recode enumreps (sysmis=2) . + recode echosen1 (sysmis=3) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=13531 . + recode erecog01 erecog02 erecog03 erecog04 (1=2) . + recode etotrec (6=2) . + recode emostmem (1=5) . + recode enum5yr (7=98) . + recode ehowcom1 (5=sysmis) . + recode estewnum (6=2) . + recode estewtim (2=8) . + recode enumreps (6=10) . + recode echosen2 (sysmis=3) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=13553 . + recode erecog01 erecog02 erecog04 (1=2) . + recode etotrec (4=1) . + recode emostmem (1=3) . + recode eformal (sysmis=8) . + recode ejoint (1=sysmis) . + recode enum5yr (4=1) . + recode estewext (2=8) . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=13629 . + recode erecog01 erecog02 erecog03 (1=2) . + recode etotrec (5=2) . + recode emostmem (1=4) . + recode enum5yr (5=2) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=13661 . + recode erecog01 erecog02 erecog03 erecog05 erecog06 (1=2) . + recode etotrec (6=1) . + recode emostmem (1=4) . + recode eformal (sysmis=8) . + recode ejoint (1=sysmis) . + recode enum5yr (6=1) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (9=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=13715 . + recode erecog01 erecog02 erecog03 erecog05 (1=2) . + recode etotrec (5=1) . + recode emostmem (1=4) . + recode eformal (sysmis=8) . + recode ejoint (1=sysmis) . + recode enum5yr (5=1) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=13741 . + recode erecog01 erecog02 erecog03 erecog05 (1=2) . + recode etotrec (5=1) . + recode emostmem (1=4) . + recode eformal (sysmis=8) . + recode ejoint (1=sysmis) . + recode enum5yr (5=1) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=13746 . + recode erecog01 erecog03 (1=2) . + recode etotrec (3=1) . + recode emostmem (1=2) . + recode eformal (sysmis=8) . + recode ejoint (3=sysmis) . + recode egroups (2=sysmis) . + recode enum5yr (4=98) . + recode ehowcom1 (1=sysmis) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=13758 . + recode erecog01 erecog03 (1=2) . + recode etotrec (3=1) . + recode emostmem (1=2) . + recode eformal (sysmis=8) . + recode ejoint (2=sysmis) . + recode egroups (2=sysmis) . + recode esteward (1=8) . + recode estewnum (1=sysmis) . + recode estewtim (2=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=13773 . + recode erecog01 erecog02 erecog03 erecog06 (1=2) . + recode etotrec (6=2) . + recode emostmem (1=4) . + recode ejoint (3=8) . + recode egroups (99=sysmis) . + recode ehowcom1 (98=sysmis) . + recode estewnum (6=2) . + recode eothreps (2=1) . + recode enumreps (sysmis=4) . + recode echosen1 (sysmis=3) . + recode esiton (sysmis=8) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=13787 . + recode erecog01 erecog02 erecog04 erecog05 (1=2) . + recode etotrec (5=1) . + recode emostmem (1=3) . + recode eformal (sysmis=8) . + recode ejoint (1=sysmis) . + recode enum5yr (5=1) . + recode estewnum (5=1) . + recode eothreps (2=1) . + recode enumreps (sysmis=4) . + recode echosen1 (sysmis=3) . + recode esiton (sysmis=8) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=13792 . + recode erecog01 erecog02 erecog03 erecog05 erecog06 (1=2) . + recode etotrec (6=1) . + recode emostmem (1=4) . + recode eformal (sysmis=8) . + recode ejoint (1=sysmis) . + recode enum5yr (6=1) . + recode estewnum (6=1) . + recode enumreps (5=10) . + recode echosen2 (sysmis=3) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=13816 . + recode erecog01 erecog02 erecog03 erecog04 erecog05 (1=2) . + recode etotrec (6=1) . + recode emostmem (1=6) . + recode eformal (sysmis=8) . + recode ejoint (3=sysmis) . + recode egroups (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=13835 . + recode erecog01 erecog02 erecog03 erecog05 (1=2) . + recode etotrec (5=1) . + recode emostmem (1=4) . + recode eformal (sysmis=8) . + recode ejoint (1=sysmis) . + recode enum5yr (5=1) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (2=sysmis) . + recode ewhyles1 (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=13842 . + recode erecog01 erecog02 erecog03 (1=2) . + recode etotrec (4=1) . + recode emostmem (1=4) . + recode eformal (sysmis=8) . + recode ejoint (1=sysmis) . + recode enum5yr (6=98) . + recode ehowcom1 (1=sysmis) . + recode estewext (1=8) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=13870 . + recode erecog02 (1=2) . + recode etotrec (3=2) . + recode egroups (3=2) . + recode enum5yr (3=2) . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=13919 . + recode erecog01 erecog02 erecog03 erecog05 erecog06 erecog07 (1=2) . + recode etotrec (9=3) . + recode emostmem (1=4) . + recode ejoint (3=8) . + recode egroups (99=sysmis) . + recode enum5yr (9=3) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=13938 . + recode erecog01 erecog02 erecog03 (1=2) . + recode etotrec (4=1) . + recode emostmem (1=4) . + recode eformal (sysmis=8) . + recode ejoint (2=sysmis) . + recode egroups (4=sysmis) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=13974 . + recode erecog01 erecog02 erecog03 erecog04 (1=2) . + recode etotrec (5=1) . + recode emostmem (1=5) . + recode eformal (sysmis=8) . + recode ejoint (9=sysmis) . + recode enum5yr (5=1) . + recode estewext (1=8) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=13977 . + recode erecog01 erecog02 erecog03 (1=2) . + recode etotrec (4=1) . + recode emostmem (1=4) . + recode eformal (sysmis=8) . + recode ejoint (3=sysmis) . + recode egroups (3=sysmis) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=13990 . + recode erecog01 erecog02 erecog05 erecog06 erecog07 (1=2) . + recode etotrec (7=2) . + recode emostmem (1=3) . + recode ejoint (3=8) . + recode egroups (99=sysmis) . + recode estewext (1=8) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=14054 . + recode erecog01 erecog03 (1=2) . + recode etotrec (3=1) . + recode emostmem (1=2) . + recode eformal (sysmis=8) . + recode ejoint (2=sysmis) . + recode egroups (99=sysmis) . + recode enum5yr (3=1) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (9=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=14133 . + recode erecog01 erecog02 erecog04 erecog05 (1=2) . + recode etotrec (5=1) . + recode emostmem (1=3) . + recode eformal (sysmis=8) . + recode ejoint (2=sysmis) . + recode egroups (5=sysmis) . + recode enum5yr (5=1) . + recode estewnum (5=1) . + recode eothreps (2=1) . + recode enumreps (sysmis=4) . + recode echosen1 (sysmis=3) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=14183 . + recode erecog01 erecog02 erecog03 erecog06 (1=2) . + recode etotrec (7=3) . + recode emostmem (1=4) . + recode ejoint (3=8) . + recode egroups (99=sysmis) . + recode enum5yr (7=3) . + recode esteward (1=8) . + recode estewnum (3=sysmis) . + recode estewtim (2=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=14198 . + recode erecog01 erecog02 erecog03 erecog04 (1=2) . + recode etotrec (6=2) . + recode emostmem (1=5) . + recode enum5yr (6=2) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=14280 . + recode erecog01 erecog02 erecog03 erecog04 (1=2) . + recode etotrec (4=0) . + recode emostmem (1=sysmis) . + recode ejoint (1=sysmis) . + recode esteward (1=sysmis) . + recode estewnum (3=sysmis) . + recode estewtim (2=sysmis) . + recode eothreps (2=1) . + recode enumreps (sysmis=3) . + recode echosen1 (sysmis=3) . + recode esiton (sysmis=8) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + recode epaya to eperfora (else=sysmis) . + recode ltypinv1 (5=sysmis) . + compute nrecflg1=1 . + compute nrecflg2=1 . end if . do if serno=14291 . + recode erecog01 erecog02 erecog03 erecog05 (1=2) . + recode etotrec (5=1) . + recode emostmem (1=4) . + recode eformal (sysmis=8) . + recode ejoint (1=sysmis) . + recode enum5yr (5=1) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=14334 . + recode erecog01 erecog03 erecog04 erecog05 (1=2) . + recode etotrec (5=1) . + recode emostmem (1=2) . + recode eformal (sysmis=8) . + recode ejoint (1=sysmis) . + recode enum5yr (5=1) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode enumreps (2=98) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=14336 . + recode erecog01 erecog02 erecog03 erecog05 erecog06 (1=2) . + recode etotrec (6=1) . + recode emostmem (1=4) . + recode eformal (sysmis=8) . + recode ejoint (1=sysmis) . + recode enum5yr (6=1) . + recode estewnum (6=1) . + recode eothreps (2=1) . + recode enumreps (sysmis=5) . + recode echosen1 (sysmis=3) . + recode esiton (sysmis=8) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=14359 . + recode erecog01 erecog02 erecog03 erecog04 erecog05 (1=2) . + recode etotrec (6=1) . + recode emostmem (1=6) . + recode eformal (sysmis=8) . + recode ejoint (1=sysmis) . + recode enum5yr (6=1) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=14438 . + recode erecog01 erecog03 (1=2) . + recode etotrec (3=1) . + recode emostmem (1=2) . + recode eformal (sysmis=8) . + recode ejoint (2=sysmis) . + recode egroups (2=sysmis) . + recode enum5yr (3=1) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=14453 . + recode erecog01 erecog02 erecog03 erecog04 erecog06 (1=2) . + recode etotrec (6=1) . + recode emostmem (1=5) . + recode eformal (sysmis=8) . + recode ejoint (1=sysmis) . + recode enum5yr (6=1) . + recode estewnum (6=1) . + recode eothreps (2=1) . + recode enumreps (sysmis=5) . + recode echosen1 (sysmis=3) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + compute nrecflg1=2 . + compute nrecflg2=0 . end if . do if serno=14456 . + recode erecog01 erecog02 (1=2) . + recode etotrec (3=1) . + recode emostmem (1=3) . + recode eformal (sysmis=8) . + recode ejoint (1=sysmis) . + recode enum5yr (3=1) . + recode estewnum (3=1) . + recode eothreps (2=1) . + recode enumreps (sysmis=2) . + recode echosen1 (sysmis=3) . + recode epaya to eperfora (else=copy) into epayb to eperforb . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=14471 . + recode erecog01 erecog02 erecog03 (1=2) . + recode etotrec (4=1) . + recode emostmem (1=4) . + recode eformal (sysmis=8) . + recode ejoint (9=sysmis) . + recode enum5yr (2=98) . + recode ehowcom1 (2=sysmis) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (3=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . do if serno=14477 . + recode erecog01 erecog02 erecog03 (1=2) . + recode etotrec (5=2) . + recode emostmem (1=4) . + recode enum5yr (3=98) . + recode ehowcom1 (2=sysmis) . + recode esteward (1=8) . + recode estewnum estewtim (else=sysmis) . + recode eothreps (2=8) . + recode epaya to eperfora (else=sysmis) . + recode etalk5yr (1=sysmis) . + recode ewhymor1 (2=sysmis) . + compute nrecflg1=2 . + compute nrecflg2=2 . end if . execute . variable labels nrecflg1 "Flags the changes to the recognition variables" . variable labels nrecflg2 "Impact of recognition fixes on the worker rep data" . value labels nrecflg1 1 'Case recoded - now has no recognized unions' 2 'Case recoded - still has some recogized unions' . value labels nrecflg2 0 'Either no WRQ or WRQ unaffected' 1 'Has WRQ but invalid - no recognized unions' 2 'Has WRQ but invalid - wrong rep' . execute . *********************************************** . *********************************************** . *Derived variables for 1998 data. *********************************************** . COMMENT All workplaces dummy (Xallest) . Numeric Xallest (F3.0). compute Xallest=1. variable labels Xallest 'All workplaces'. value labels Xallest 1 ' '. execute. **************************************************************** . COMMENT Any non-managerial employees entitled to annual hours (xjtimear1). numeric xjtimear1 (f3.0). do if (any(1, jtimear1 to jtimear6)=1). + compute xjtimear1=1. else if (missing(jtimear1)=1). + recode jtimear1(99=-8)(98=-9) into xjtimear1. else. + compute xjtimear1=0. end if. if (sysmis(jtimear1)=1) xjtimear1=-9. execute. missing values xjtimear1 (-8, -9). variable label xjtimear1 'Any non-managerial employees entitled to annual hours'. value labels xjtimear1 1 'Yes' 0 'No' -8 'Do not know' -9 'Refused'. **************************************************************** . COMMENT Any non-managerial employees entitled to flexitime (xjtimear3). numeric xjtimear3 (f3.0). do if (any(3, jtimear1 to jtimear6)=1). + compute xjtimear3=1. else if (missing(jtimear1)=1). + recode jtimear1(99=-8)(98=-9) into xjtimear3. else. + compute xjtimear3=0. end if. if (sysmis(jtimear1)=1) xjtimear3=-9. execute. missing values xjtimear3 (-8, -9). variable label xjtimear3 'Any non-managerial employees entitled to flexitime'. value labels xjtimear3 1 'Yes' 0 'No' -8 'Do not know' -9 'Refused'. **************************************************************** . COMMENT Any non-managerial employees entitled to zero hours contracts (xjtimear6). numeric xjtimear6 (f3.0). do if (any(6, jtimear1 to jtimear6)=1). + compute xjtimear6=1. else if (missing(jtimear1)=1). + recode jtimear1(99=-8)(98=-9) into xjtimear6. else. + compute xjtimear6=0. end if. if (sysmis(jtimear1)=1) xjtimear6=-9. execute. missing values xjtimear6 (-8, -9). variable label xjtimear6 'Any non-managerial employees entitled to zero hours contracts'. value labels xjtimear6 1 'Yes' 0 'No' -8 'Do not know' -9 'Refused'. **************************************************************** . COMMENT Family-friendly practices (Xifamily1 - Xifamily5) . COMMENT Any non-managerial employees entitled to parental leave (xifamily1). numeric xifamily1 (f3.0). do if (any(1, ifamily1 to ifamily7)=1). + compute xifamily1=1. else if (missing(ifamily1)=1). + recode ifamily1(-1, -8, -9=copy) into xifamily1. else. + compute xifamily1=0. end if. missing values xifamily1 (-1, -8, -9). variable label xifamily1 'Any non-managerial employees entitled to parental leave'. value labels xifamily1 1 'Yes' 0 'No' -1 'Not applicable' -8 'Do not know' -9 'Refused'. execute. **************************************************************** . COMMENT Any non-managerial employees entitled to work at or from home in normal working hours (xifamily2). numeric xifamily2 (f3.0). do if (any(2, ifamily1 to ifamily7)=1). + compute xifamily2=1. else if (missing(ifamily1)=1). + recode ifamily1(-1, -8, -9=copy) into xifamily2. else. + compute xifamily2=0. end if. missing values xifamily2 (-1, -8, -9). variable label xifamily2 'Any non-managerial employees entitled to work at or from home in normal working hours'. value labels xifamily2 1 'Yes' 0 'No' -1 'Not applicable' -8 'Do not know' -9 'Refused'. execute. **************************************************************** . COMMENT Any non-managerial employees entitled to term-time only contracts (xifamily3). numeric xifamily3 (f3.0). do if (any(3, ifamily1 to ifamily7)=1). + compute xifamily3=1. else if (missing(ifamily1)=1). + recode ifamily1(-1, -8, -9=copy) into xifamily3. else. + compute xifamily3=0. end if. missing values xifamily3 (-1, -8, -9). variable label xifamily3 'Any non-managerial employees entitled to term-time only contracts'. value labels xifamily3 1 'Yes' 0 'No' -1 'Not applicable' -8 'Do not know' -9 'Refused'. execute. **************************************************************** . COMMENT Any non-managerial employees entitled to switch from full-time to part-time employment (xifamily4). numeric xifamily4 (f3.0). do if (any(4, ifamily1 to ifamily7)=1). + compute xifamily4=1. else if (missing(ifamily1)=1). + recode ifamily1(-1, -8, -9=copy) into xifamily4. else. + compute xifamily4=0. end if. missing values xifamily4 (-1, -8, -9). variable label xifamily4 'Any non-managerial employees entitled to switch from full-time to part-time employment'. value labels xifamily4 1 'Yes' 0 'No' -1 'Not applicable' -8 'Do not know' -9 'Refused'. execute. **************************************************************** . COMMENT Any non-managerial employees entitled to job share (xifamily5). numeric xifamily5 (f3.0). do if (any(5, ifamily1 to ifamily7)=1). + compute xifamily5=1. else if (missing(ifamily1)=1). + recode ifamily1(-1, -8, -9=copy) into xifamily5. else. + compute xifamily5=0. end if. missing values xifamily5 (-1, -8, -9). variable label xifamily5 'Any non-managerial employees entitled to job share'. value labels xifamily5 1 'Yes' 0 'No' -1 'Not applicable' -8 'Do not know' -9 'Refused'. execute. **************************************************************** . COMMENT number of days of fully paid paternity leave grouped (xpatern, xpatern2) . Numeric xpatern (f3.0). RECODE ipatern (99 =-9) (-1 = -1) (missing = -8) (0=0) (1 thru 4=1) (5=2) (6 thru 9=3) (10=4) (11 thru highest =5) INTO xpatern . Missing values xpatern (-9 thru -1). VARIABLE LABELS xpatern 'Number of days of paid paternity leave'. Value labels xpatern 0 'None' 1 '1 to 4 days' 2 '5 days' 3 '6 to 9 days' 4 '10 days' 5 ' More than 10 days' -1 'Not applicable - no men employed' -8 'No paternity/discretionary leave provided' -9 'Refused'. recode xpatern (-9=copy) (-1 = copy) (-8 = 0) (0 = 0) (1=1) (2=1) (3=1) (4=2) (5=3) into xpatern2. missing values xpatern2 (-9 thru -1). variable label xpatern2 'Number of days of paternity leave provided in line with current statutory provision'. value labels xpatern2 0 'No paid paternity leave' 1 '1-9 days' 2 '10 days' 3 '11 or more days' -9 'Refused' -7 'Vague answer' -1 'Not applicable - no men employed'. execute. **************************************************************** . COMMENT Private sector variable (Xprivate) . Numeric Xprivate (F3.0). recode astatus (1,2=1) (3=2) into Xprivate. variable labels Xprivate 'Ownership'. value labels Xprivate 1 'Private sector' 2 'Public sector'. execute. **************************************************************** . COMMENT Time off for family emergencies (xiifmoff) . recode ifmoff (missing = copy) (1 thru 5 = copy) (9 = 2) (6 = 0) (7 = 6) (8 thru highest = 8) into xiifmoff. variable labels xiifmoff 'Time off for family emergencies'. missing values xiifmoff (-9 thru -1). value labels xiifmoff 0 'Not allowed/would not be granted' 1 'Time off but make it up later' 2 'Unpaid leave' 3 'Sick leave' 4 'Special paid leave' 5 'Annual leave' 6 'Never been asked' 8 'Other/Multiple responses' -9 'Refused' -8 'Dont know' -1 'Not applicable'. execute. **************************************************************** . *Save the derived variables so that they can be matched on to the 2004 panel data. *Note file path . SAVE OUTFILE='C:\WERS\1998 MQ derived variables for panel.sav'/KEEP serno Xallest xjtimear1 xjtimear3 xjtimear6 xifamily1 xifamily2 xifamily3 xifamily4 xifamily5 xpatern, xpatern2 Xprivate xiifmoff. execute. **************************************************************** . *Match the 1998 derived variables onto the 2004 panel. *Note file paths . *First open up the 2004 panel data, including the variables derived earlier in this file. GET FILE='C:\WERS\2004 panel data and derived variables.sav'. execute. *Then match with the 1998 derived variables file. match files file=*/table='C:\WERS\1998 MQ derived variables for panel.sav'/by serno. execute. **************************************************************** . **************************************************************** . *Then derive change variables. **************************************************************** . COMMENT Change in whether any non-managerial employees entitled to annual hours contract (yjtimear1c). numeric yjtimear1c (f3.0). recode yjtimear1 (-1, -8, -9=copy) into yjtimear1c. recode xjtimear1 (-8, -9=copy) into yjtimear1c. do if xjtimear1=1 & yjtimear1=0. + compute yjtimear1c=1. else if xjtimear1=0 & yjtimear1=0. + compute yjtimear1c=2. else if xjtimear1=1 & yjtimear1=1. + compute yjtimear1c=1. else if xjtimear1=0 & yjtimear1=1. + compute yjtimear1c=4. end if. execute. missing values yjtimear1c (-1, -8, -9). variable label yjtimear1c 'Change in entitlement of non-managerial employees to annual hours contracts'. value labels yjtimear1c 1 'Entitled in 1998, but not in 2004' 2 'Not entitled in either year' 3 'Entitled in both years' 4 'Entitled in 2004, but not in 1998' -1 'Not applicable' -8 'Do not know' -9 'Refused'. **************************************************************** . COMMENT Change in whether any non-managerial employees entitled to flexitime (yjtimear3c). numeric yjtimear3c (f3.0). recode yjtimear3 (-1, -8, -9=copy) into yjtimear3c. recode xjtimear3 (-8, -9=copy) into yjtimear3c. do if xjtimear3=1 & yjtimear3=0. + compute yjtimear3c=1. else if xjtimear3=0 & yjtimear3=0. + compute yjtimear3c=2. else if xjtimear3=1 & yjtimear3=1. + compute yjtimear3c=3. else if xjtimear3=0 & yjtimear3=1. + compute yjtimear3c=4. end if. execute. missing values yjtimear3c (-1, -8, -9). variable label yjtimear3c 'Change in entitlement of non-managerial employees to flexitime'. value labels yjtimear3c 1 'Entitled in 1998, but not in 2004' 2 'Not entitled in either year' 3 'Entitled in both years' 4 'Entitled in 2004, but not in 1998' -1 'Not applicable' -8 'Do not know' -9 'Refused'. **************************************************************** . COMMENT Change in whether any non-managerial employees entitled to zero hours contracts (yjtimear6c). numeric yjtimear6c (f3.0). recode yjtimear6 (-1, -8, -9=copy) into yjtimear6c. recode xjtimear6 (-8, -9=copy) into yjtimear6c. do if xjtimear6=1 & yjtimear6=0. + compute yjtimear6c=1. else if xjtimear6=0 & yjtimear6=0. + compute yjtimear6c=2. else if xjtimear6=1 & yjtimear6=1. + compute yjtimear6c=3. else if xjtimear6=0 & yjtimear6=1. + compute yjtimear6c=4. end if. execute. missing values yjtimear6c (-1, -8, -9). variable label yjtimear6c 'Change in entitlement of non-managerial employees to zero hours contracts'. value labels yjtimear6c 1 'Entitled in 1998, but not in 2004' 2 'Not entitled in either year' 3 'Entitled in both years' 4 'Entitled in 2004, but not in 1998' -1 'Not applicable' -8 'Do not know' -9 'Refused'. **************************************************************** . COMMENT Change in use of family-friendly arrangements . COMMENT Change in whether any non-managerial employees entitled to parental leave (yifamily1c). numeric yifamily1c (f3.0). recode yifamily1 (-1, -8, -9=copy) into yifamily1c. recode xifamily1 (-8, -9=copy) into yifamily1c. do if xifamily1=1 & yifamily1=0. + compute yifamily1c=1. else if xifamily1=0 & yifamily1=0. + compute yifamily1c=2. else if xifamily1=1 & yifamily1=1. + compute yifamily1c=3. else if xifamily1=0 & yifamily1=1. + compute yifamily1c=4. end if. missing values yifamily1c (-1, -8, -9). variable label yifamily1c 'Change in entitlement of non-managerial employees to parental leave'. value labels yifamily1c 1 'Entitled in 1998, but not in 2004' 2 'Not entitled in either year' 3 'Entitled in both years' 4 'Entitled in 2004, but not in 1998' -1 'Not applicable' -8 'Do not know' -9 'Refused'. execute. **************************************************************** . COMMENT Change in whether any non-managerial employees entitled to work at or from home in normal working hours (yifamily2c). numeric yifamily2c (f3.0). recode yifamily2 (-1, -8, -9=copy) into yifamily2c. recode xifamily2 (-8, -9=copy) into yifamily2c. do if xifamily2=1 & yifamily2=0. + compute yifamily2c=1. else if xifamily2=0 & yifamily2=0. + compute yifamily2c=2. else if xifamily2=1 & yifamily2=1. + compute yifamily2c=3. else if xifamily2=0 & yifamily2=1. + compute yifamily2c=4. end if. missing values yifamily2c (-1, -8, -9). variable label yifamily2c 'Change in entitlement of non-managerial employees to work from home'. value labels yifamily2c 1 'Entitled in 1998, but not in 2004' 2 'Not entitled in either year' 3 'Entitled in both years' 4 'Entitled in 2004, but not in 1998' -1 'Not applicable' -8 'Do not know' -9 'Refused'. execute. **************************************************************** . COMMENT Change in whether any non-managerial employees entitled to term-time only contracts (yifamily3c). numeric yifamily3c (f3.0). recode yifamily3 (-1, -8, -9=copy) into yifamily3c. recode xifamily3 (-8, -9=copy) into yifamily3c. do if xifamily3=1 & yifamily3=0. + compute yifamily3c=1. else if xifamily3=0 & yifamily3=0. + compute yifamily3c=2. else if xifamily3=1 & yifamily3=1. + compute yifamily3c=3. else if xifamily3=0 & yifamily3=1. + compute yifamily3c=4. end if. missing values yifamily3c (-1, -8, -9). variable label yifamily3c 'Change in entitlement of non-managerial employees to term-time only contracts'. value labels yifamily3c 1 'Entitled in 1998, but not in 2004' 2 'Not entitled in either year' 3 'Entitled in both years' 4 'Entitled in 2004, but not in 1998' -1 'Not applicable' -8 'Do not know' -9 'Refused'. execute. **************************************************************** . COMMENT Change in whether any non-managerial employees entitled to switch from full-time to part-time employment (yifamily4c). numeric yifamily4c (f3.0). recode yifamily4 (-1, -8, -9=copy) into yifamily4c. recode xifamily4 (-8, -9=copy) into yifamily4c. do if xifamily4=1 & yifamily4=0. + compute yifamily4c=1. else if xifamily4=0 & yifamily4=0. + compute yifamily4c=2. else if xifamily4=1 & yifamily4=1. + compute yifamily4c=3. else if xifamily4=0 & yifamily4=1. + compute yifamily4c=4. end if. missing values yifamily4c (-1, -8, -9). variable label yifamily4c 'Change in entitlement of non-managerial employees to switch from full-time to part-time employment'. value labels yifamily4c 1 'Entitled in 1998, but not in 2004' 2 'Not entitled in either year' 3 'Entitled in both years' 4 'Entitled in 2004, but not in 1998' -1 'Not applicable' -8 'Do not know' -9 'Refused'. execute. **************************************************************** . COMMENT Change in whether any non-managerial employees entitled to job share (yifamily5c). numeric yifamily5c (f3.0). recode yifamily5 (-1, -8, -9=copy) into yifamily5c. recode xifamily5 (-8, -9=copy) into yifamily5c. do if xifamily5=1 & yifamily5=0. + compute yifamily5c=1. else if xifamily5=0 & yifamily5=0. + compute yifamily5c=2. else if xifamily5=1 & yifamily5=1. + compute yifamily5c=3. else if xifamily5=0 & yifamily5=1. + compute yifamily5c=4. end if. missing values yifamily5c (-1, -8, -9). variable label yifamily5c 'Change in entitlement of non-managerial employees to job share'. value labels yifamily5c 1 'Entitled in 1998, but not in 2004' 2 'Not entitled in either year' 3 'Entitled in both years' 4 'Entitled in 2004, but not in 1998' -1 'Not applicable' -8 'Do not know' -9 'Refused'. execute. **************************************************************** . COMMENT Summary change variable derived from xpatern3 and ypatern3 - ypaternchng. numeric ypaternchng (f3.0). recode xpatern2 (-1, -9=copy) into ypaternchng. recode ypatern2 (-8, -1 =copy) into ypaternchng. do if (xpatern2 <= 1 & ypatern2 <=1). compute ypaternchng = 1. else if (xpatern2 =2 & ypatern2 =2). compute ypaternchng = 2. else if (xpatern2 =3 & ypatern2 =3). compute ypaternchng = 2. else if (xpatern2 <=1 & ypatern2 =2). compute ypaternchng = 3. else if (xpatern2 <=1 & ypatern2 =3). compute ypaternchng = 4. else if (xpatern2 =2 & ypatern2 =3). compute ypaternchng = 4. else if (xpatern2 = 2 & ypatern2 <=1). compute ypaternchng = 5. else if (xpatern2 = 3 & ypatern2 <=1). compute ypaternchng = 5. else if (xpatern2 =3 & ypatern2 =2). compute ypaternchng = 5. end if. execute. missing values ypaternchng (-9 thru -1). variable label ypaternchng 'Change in number of days of paid paternity leave provided'. value labels ypaternchng 1 'No change - < 10 days in both 1998 and in 2004' 2 'No change - >=10 days in both 1998 and 2004' 3 'Increase - < 10 days in 1998 and 10 days in 2004' 4 'Increase - <=10 days in 1998 and 11 or more days in 2004' 5 'Fall in the number of days provided since 1998' -9 'Refused' -8 'Dont know' -1 'Not applicable'. **************************************************************** . COMMENT Summary change variable - change in special paid leave in 1998 and 2004 (yifmoffchnge) . numeric yifmoffchnge (f3.0). do if (missing(xiifmoff) = 1| missing (yifmoffnew) =1). compute yifmoffchnge = -9. else if (xiifmoff = 4 & yifmoffnew =4). compute yifmoffchnge = 1. else if (xiifmoff ~=4 & yifmoffnew =4). compute yifmoffchnge = 2. else if (xiifmoff = 4 & yifmoffnew ~= 4). compute yifmoffchnge = 3. else if (xiifmoff ~=4 & yifmoffnew ~=4). compute yifmoffchnge = 4. END IF. variable labels yifmoffchnge 'Change in provision of special paid leave at short notice'. value labels yifmoffchnge 1 'special paid leave in both years' 2 'change - no special paid leave in 1998 but in 2004' 3 'change - no special paid leave in 2004 but in 1998' 4 'no special paid leave in 1998 or 2004' -9 'NA' -8 'DK'. MISSING VALUES yifmoffchnge (-9,-8). execute. **************************************************************** . **************************************************************** . COMMENT Save the 1998-2004 panel data file. *Note file path . SAVE OUTFILE='C:\WERS\1998-2004 panel with dvs.sav' . execute . **************************************************************** .