*WERS 2004 PQ FF tables.sps .

*Tables syntax for the WERS 1998-2004 panel survey.

*This file creates the tables and analysis based on the PQ contained in the First Findings publication.
*Last updated 31 July 2006.

*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' .
*Please note that it is also necessary to change the file paths in the separate file 'WERS 2004 PQ derived variables for FF.sps' for this syntax to run successfully .

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

*Users need to run 'WERS 2004 PQ derived variables for FF' before running this file.
*Note file path .

include 'C:\WERS\WERS 2004 PQ derived variables for FF.sps'.

********************************************************************.
*********************.
* Additional notes .
*********************.
*Table 3: Note that the syntax to replicate the figure of 16% of workplaces in 1998 with problem-solving groups involving non-managerial employees is not replicated here as the derivation of this figure is complex, please refer to note 13 in First Findings for further details .
 

*Apply weights.
weight by pqwtnr.

********************************************************************.
*Tables syntax follows.
********************************************************************.

**************************************************************.
*Flexible working arrangements.
***************************************************************.

** Table 9 Flexible-working and leave arrangements for non-managerial employees in continuing workplaces, 1998 and 2004.

****************************************************************************.
*Incidence of any non-managerial employees entitled to flexitime.
****************************************************************************.
*Incidence of any non-managerial employees entitled to flexitime in 1998.

*By standard breaks.
*For workplaces with 10 plus employees only.

weight by pqwtnr.
temp.
select if y10plus=2 & (missing(xjtimear3) ne 1) & (missing (yjtimear3) ne 1).
tables 
	/format blank missing('.')
	/ftotal base1 'Base' total1 'All workplaces'
	/autolabel=on
	/table (yallest + yempsize + y25pluso  + ysingle + yorgsize + yprivate + ysicode + yrecog1 + total1) by (xjtimear3 + base1) 
	/statistics cpct(xjtimear3(f3) '': yempsize y25pluso ysingle yorgsize yprivate ysicode yrecog1 ) count(base1 'Weighted') u count(base1 'Unweighted') .

*Incidence of any non-managerial employees entitled to flexitime in 2004.

*By standard breaks.
*For workplaces with 10 plus employees only.

weight by pqwtnr.
temp.
select if y10plus=2 & (missing(xjtimear3) ne 1) & (missing (yjtimear3) ne 1).
tables 
	/format blank missing('.')
	/ftotal base1 'Base' total1 'All workplaces'
	/autolabel=on
	/table (yallest + yempsize + y25pluso  + ysingle + yorgsize + yprivate + ysicode + yrecog1 + total1) by (yjtimear3 + base1) 
	/statistics cpct(yjtimear3(f3) '': yempsize y25pluso ysingle yorgsize yprivate ysicode yrecog1 ) count(base1 'Weighted') u count(base1 'Unweighted') .

*Change in incidence of any non-managerial employees entitled to flexitime between 1998 and 2004.

*By standard breaks.
*For workplaces with 10 plus employees only.

weight by pqwtnr.
temp.
select if y10plus=2.
tables 
	/format blank missing('.')
	/ftotal base1 'Base' total1 'All workplaces'
	/autolabel=on
	/table (yallest + yempsize + y25pluso  + ysingle + yorgsize + yprivate + ysicode + yrecog1 + total1) by (yjtimear3c + base1) 
	/statistics cpct(yjtimear3c(f3) '': yempsize y25pluso ysingle yorgsize yprivate ysicode yrecog1 ) count(base1 'Weighted') u count(base1 'Unweighted') .

******************************************************************************************************************.
*Incidence of non-managerial employees entitled to switch from full-time to part-time employment.
******************************************************************************************************************.

*Incidence of non-managerial employees entitled to switch from full-time to part-time employment in 1998.

*By standard breaks.
*For workplaces with 10 plus employees only.

temp.
select if y10plus=2  & (missing(xifamily4) ne 1) & (missing (yifamily4) ne 1).
tables 
	/format blank missing('.')
	/ftotal base1 'Base' total1 'All workplaces'
	/autolabel=on
	/table (yallest + yempsize + y25pluso  + ysingle + yorgsize + yprivate + ysicode + yrecog1 + total1) by (xifamily4 + base1) 
	/statistics cpct(xifamily4(f3) '': yempsize y25pluso ysingle yorgsize yprivate ysicode yrecog1 ) count(base1 'Weighted') u count(base1 'Unweighted') .


*Incidence of non-managerial employees entitled to switch from full-time to part-time employment in 2004.

*By standard breaks.
*For workplaces with 10 plus employees only.

temp.
select if y10plus=2 & (missing(xifamily4) ne 1) & (missing (yifamily4) ne 1).
tables 
	/format blank missing('.')
	/ftotal base1 'Base' total1 'All workplaces'
	/autolabel=on
	/table (yallest + yempsize + y25pluso  + ysingle + yorgsize + yprivate + ysicode + yrecog1 + total1) by (yifamily4 + base1) 
	/statistics cpct(yifamily4(f3) '': yempsize y25pluso ysingle yorgsize yprivate ysicode yrecog1 ) count(base1 'Weighted') u count(base1 'Unweighted') .

*Change in incidence of non-managerial employees entitled to switch from full-time to part-time employment between 1998 and 2004.

*By standard breaks.
*For workplaces with 10 plus employees only.

temp.
select if y10plus=2.
tables 
	/format blank missing('.')
	/ftotal base1 'Base' total1 'All workplaces'
	/autolabel=on
	/table (yallest + yempsize + y25pluso  + ysingle + yorgsize + yprivate + ysicode + yrecog1 + total1) by (yifamily4c + base1) 
	/statistics cpct(yifamily4c(f3) '': yempsize y25pluso ysingle yorgsize yprivate ysicode yrecog1 ) count(base1 'Weighted') u count(base1 'Unweighted') .

******************************************************************************.
*Incidence of any non-managerial employees entitled to job-share.
******************************************************************************.

*Incidence of any non-managerial employees entitled to job-share in 1998.

*By standard breaks.
*For workplaces with 10 plus employees only.

temp.
select if y10plus=2 & (missing(xifamily5) ne 1) & (missing (yifamily5) ne 1).
tables 
	/format blank missing('.')
	/ftotal base1 'Base' total1 'All workplaces'
	/autolabel=on
	/table (yallest + yempsize + y25pluso  + ysingle + yorgsize + yprivate + ysicode + yrecog1 + total1) by (xifamily5 + base1) 
	/statistics cpct(xifamily5(f3) '': yempsize y25pluso ysingle yorgsize yprivate ysicode yrecog1 ) count(base1 'Weighted') u count(base1 'Unweighted') .

*Incidence of any non-managerial employees entitled to job-share in 2004.

*By standard breaks.
*For workplaces with 10 plus employees only.

temp.
select if y10plus=2 & (missing(xifamily5) ne 1) & (missing (yifamily5) ne 1).
tables 
	/format blank missing('.')
	/ftotal base1 'Base' total1 'All workplaces'
	/autolabel=on
	/table (yallest + yempsize + y25pluso  + ysingle + yorgsize + yprivate + ysicode + yrecog1 + total1) by (yifamily5 + base1) 
	/statistics cpct(yifamily5(f3) '': yempsize y25pluso ysingle yorgsize yprivate ysicode yrecog1 ) count(base1 'Weighted') u count(base1 'Unweighted') .

*Change in incidence of any non-managerial employees entitled to job-share between 1998 and 2004.

*By standard breaks.
*For workplaces with 10 plus employees only.

temp.
select if y10plus=2.
tables 
	/format blank missing('.')
	/ftotal base1 'Base' total1 'All workplaces'
	/autolabel=on
	/table (yallest + yempsize + y25pluso  + ysingle + yorgsize + yprivate + ysicode + yrecog1 + total1) by (yifamily5c + base1) 
	/statistics cpct(yifamily5c(f3) '': yempsize y25pluso ysingle yorgsize yprivate ysicode yrecog1 ) count(base1 'Weighted') u count(base1 'Unweighted') .

************************************************************************************************.
*Incidence of any non-managerial employees entitled to term-time only contracts.
************************************************************************************************.

*Incidence of any non-managerial employees entitled to term-time only contracts in 1998.

temp.
select if y10plus=2 & (missing(xifamily3) ne 1) & (missing (yifamily3) ne 1).
tables 
	/format blank missing('.')
	/ftotal base1 'Base' total1 'All workplaces'
	/autolabel=on
	/table (yallest + yempsize + y25pluso  + ysingle + yorgsize + yprivate + ysicode + yrecog1 + total1) by (xifamily3 + base1) 
	/statistics cpct(xifamily3(f3) '': yempsize y25pluso ysingle yorgsize yprivate ysicode yrecog1 ) count(base1 'Weighted') u count(base1 'Unweighted') .


*Incidence of any non-managerial employees entitled to term-time only contracts in 2004.

*By standard breaks.
*For workplaces with 10 plus employees only.

temp.
select if y10plus=2 & (missing(xifamily3) ne 1) & (missing (yifamily3) ne 1).
tables 
	/format blank missing('.')
	/ftotal base1 'Base' total1 'All workplaces'
	/autolabel=on
	/table (yallest + yempsize + y25pluso  + ysingle + yorgsize + yprivate + ysicode + yrecog1 + total1) by (yifamily3 + base1) 
	/statistics cpct(yifamily3(f3) '': yempsize y25pluso ysingle yorgsize yprivate ysicode yrecog1 ) count(base1 'Weighted') u count(base1 'Unweighted') .

*Change in incidence of non-managerial employees entitled to term-time only contracts between 1998 and 2004.

*By standard breaks.
*For workplaces with 10 plus employees only.

temp.
select if y10plus=2.
tables 
	/format blank missing('.')
	/ftotal base1 'Base' total1 'All workplaces'
	/autolabel=on
	/table (yallest + yempsize + y25pluso  + ysingle + yorgsize + yprivate + ysicode + yrecog1 + total1) by (yifamily3c + base1) 
	/statistics cpct(yifamily3c(f3) '': yempsize y25pluso ysingle yorgsize yprivate ysicode yrecog1 ) count(base1 'Weighted') u count(base1 'Unweighted') .

*********************************************************************************.
*Incidence of non-managerial employees entitled to work from home.
*********************************************************************************.

*Incidence of non-managerial employees entitled to work from home in 1998.

*By standard breaks.
*For workplaces with 10 plus employees only.

weight by pqwtnr.
temp.
select if y10plus=2 & (missing(xifamily2) ne 1) & (missing (yifamily2) ne 1).
tables 
	/format blank missing('.')
	/ftotal base1 'Base' total1 'All workplaces'
	/autolabel=on
	/table (yallest + yempsize + y25pluso  + ysingle + yorgsize + yprivate + ysicode + yrecog1 + total1) by (xifamily2 + base1) 
	/statistics cpct(xifamily2(f3) '': yempsize y25pluso ysingle yorgsize yprivate ysicode yrecog1 ) count(base1 'Weighted') u count(base1 'Unweighted') .

*Incidence of non-managerial employees entitled to work from home in 2004.

*By standard breaks.

weight by pqwtnr.
temp.
select if y10plus=2 & (missing(xifamily2) ne 1) & (missing (yifamily2) ne 1).
tables 
	/format blank missing('.')
	/ftotal base1 'Base' total1 'All workplaces'
	/autolabel=on
	/table (yallest + yempsize + y25pluso  + ysingle + yorgsize + yprivate + ysicode + yrecog1 + total1) by (yifamily2 + base1) 
	/statistics cpct(yifamily2(f3) '': yempsize y25pluso ysingle yorgsize yprivate ysicode yrecog1 ) count(base1 'Weighted') u count(base1 'Unweighted') .

*Change in incidence of non-managerial employees entitled to work from home between 1998 and 2004.

*By standard breaks.
*For workplaces with 10 plus employees only.

weight by pqwtnr.
temp.
select if y10plus=2.
tables 
	/format blank missing('.')
	/ftotal base1 'Base' total1 'All workplaces'
	/autolabel=on
	/table (yallest + yempsize + y25pluso  + ysingle + yorgsize + yprivate + ysicode + yrecog1 + total1) by (yifamily2c + base1) 
	/statistics cpct(yifamily2c(f3) '': yempsize y25pluso ysingle yorgsize yprivate ysicode yrecog1 ) count(base1 'Weighted') u count(base1 'Unweighted') .

*********************************************************************************.
*Incidence of any non-managerial employees entitled to annual hours.
*********************************************************************************.
*Incidence of any non-managerial employees entitled to annual hours in 1998.

*By standard breaks.
*For workplaces with 10 plus employees only.

weight by pqwtnr.
temp.
select if y10plus=2 & (missing(xjtimear1) ne 1) & (missing (yjtimear1) ne 1).
tables 
	/format blank missing('.')
	/ftotal base1 'Base' total1 'All workplaces'
	/autolabel=on
	/table (yallest + yempsize + y25pluso  + ysingle + yorgsize + yprivate + ysicode + yrecog1 + total1) by (xjtimear1 + base1) 
	/statistics cpct(xjtimear1(f3) '': yempsize y25pluso ysingle yorgsize yprivate ysicode yrecog1 ) count(base1 'Weighted') u count(base1 'Unweighted') .

*Incidence of any non-managerial employees entitled to annual hours in 2004.

*By standard breaks.
*For workplaces with 10 plus employees only.

weight by pqwtnr.
temp.
select if y10plus=2 & (missing(xjtimear1) ne 1) & (missing (yjtimear1) ne 1).
tables 
	/format blank missing('.')
	/ftotal base1 'Base' total1 'All workplaces'
	/autolabel=on
	/table (yallest + yempsize + y25pluso  + ysingle + yorgsize + yprivate + ysicode + yrecog1 + total1) by (yjtimear1 + base1) 
	/statistics cpct(yjtimear1(f3) '': yempsize y25pluso ysingle yorgsize yprivate ysicode yrecog1 ) count(base1 'Weighted') u count(base1 'Unweighted') .

*Change in incidence of any non-managerial employees entitled to annual hours between 1998 and 2004.

*By standard breaks.
*For workplaces with 10 plus employees only.

weight by pqwtnr.
temp.
select if y10plus=2.
tables 
	/format blank missing('.')
	/ftotal base1 'Base' total1 'All workplaces'
	/autolabel=on
	/table (yallest + yempsize + y25pluso  + ysingle + yorgsize + yprivate + ysicode + yrecog1 + total1) by (yjtimear1c + base1) 
	/statistics cpct(yjtimear1c(f3) '': yempsize y25pluso ysingle yorgsize yprivate ysicode yrecog1 ) count(base1 'Weighted') u count(base1 'Unweighted') .

***************************************************************************************************.
*Incidence of any non-managerial employees entitled to zero hours.
***************************************************************************************************.
*Incidence of any non-managerial employees entitled to zero hours in 1998.

*By standard breaks.
*For workplaces with 10 plus employees only.

weight by pqwtnr.
temp.
select if y10plus=2 & (missing(xjtimear6) ne 1) & (missing (yjtimear6) ne 1).
tables 
	/format blank missing('.')
	/ftotal base1 'Base' total1 'All workplaces'
	/autolabel=on
	/table (yallest + yempsize + y25pluso  + ysingle + yorgsize + yprivate + ysicode + yrecog1 + total1) by (xjtimear6 + base1) 
	/statistics cpct(xjtimear6(f3) '': yempsize y25pluso ysingle yorgsize yprivate ysicode yrecog1 ) count(base1 'Weighted') u count(base1 'Unweighted') .

*Incidence of any non-managerial employees entitled to zero hours in 2004.

*By standard breaks.
*For workplaces with 10 plus employees only.

weight by pqwtnr.
temp.
select if y10plus=2 & (missing(xjtimear6) ne 1) & (missing (yjtimear6) ne 1).
tables 
	/format blank missing('.')
	/ftotal base1 'Base' total1 'All workplaces'
	/autolabel=on
	/table (yallest + yempsize + y25pluso  + ysingle + yorgsize + yprivate + ysicode + yrecog1 + total1) by (yjtimear6 + base1) 
	/statistics cpct(yjtimear6(f3) '': yempsize y25pluso ysingle yorgsize yprivate ysicode yrecog1 ) count(base1 'Weighted') u count(base1 'Unweighted') .

*Change in incidence of any non-managerial employees entitled to zero hours between 1998 and 2004.

*By standard breaks.
*For workplaces with 10 plus employees only.

weight by pqwtnr.
temp.
select if y10plus=2.
tables 
	/format blank missing('.')
	/ftotal base1 'Base' total1 'All workplaces'
	/autolabel=on
	/table (yallest + yempsize + y25pluso  + ysingle + yorgsize + yprivate + ysicode + yrecog1 + total1) by (yjtimear6c + base1) 
	/statistics cpct(yjtimear6c(f3) '': yempsize y25pluso ysingle yorgsize yprivate ysicode yrecog1 ) count(base1 'Weighted') u count(base1 'Unweighted') .

***************************************************************.
*Leave arrangements to support employees with caring responsibilities.
***************************************************************.
** Table 9 Flexible-working and leave arrangements for non-managerial employees in continuing workplaces, 1998 and 2004 (continued).

weight by pqwtnr.

*Parental leave in 1998.

temp.
select if  xifamily1>=0 & yifamily1>=0.

tables	
            /format blank missing('.')
	/ftotal base1 'Base' total1 'All workplaces'
	/autolabel=on
	/table (xifamily1+ base1) by yallest
	/statistics cpct(xifamily1 (f3) '': yallest) count(base1 'Weighted') u count(base1 'Unweighted') .

*Parental leave in 2004.

temp.
select if xifamily1>=0 & yifamily1>=0.

tables	
            /format blank missing('.')
	/ftotal base1 'Base' total1 'All workplaces'
	/autolabel=on
	/table (yifamily1+ base1) by yallest
	/statistics cpct(yifamily1 (f3) '': yallest) count(base1 'Weighted') u count(base1 'Unweighted') .

*Change in parental leave provision since 98 by sector.

temp.
select if xifamily1>=0 & yifamily1>=0.

tables 
	/format blank missing('.')
	/ftotal base1 'Base' total1 'All workplaces'
	/autolabel=on
	/table (yifamily1c+ base1) by yallest
	/statistics cpct(yifamily1c(f3) '': yallest ) count(base1 'Weighted') u count(base1 'Unweighted') .


*Availability of paid paternity leave by sector 1998 .

temp.
select if xpatern2>=0 & ypatern2>=0.
tables 
	/format blank missing('.')
	/ftotal base1 'Base' total1 'All workplaces'
	/autolabel=on
	/table (yallest +  xprivate +  total1) by (xpatern2 + base1) 
	/statistics cpct(xpatern2 (f3) '':   xprivate  ) count(base1 'Weighted') u count(base1 'Unweighted') .

*Availability of paid paternity leave by sector 2004 .

temp.
select if xpatern2>=0 & ypatern2>=0.
tables 
	/format blank missing('.')
	/ftotal base1 'Base' total1 'All workplaces'
	/autolabel=on
	/table (yallest + yprivate +  total1) by (ypatern2 + base1) 
	/statistics cpct(ypatern2 (f3) '':   yprivate  ) count(base1 'Weighted') u count(base1 'Unweighted') .

*Summary change variable - whether change in number of days off for fathers of new babies.

temp.
select if xpatern2>=0 & ypatern2>=0 .

tables 
	/format blank missing('.')
	/ftotal base1 'Base' total1 'All workplaces'
	/autolabel=on
	/missing=include
	/base=qualified
	/table (ypaternchng + base1) by yallest
	/statistics cpct(ypaternchng(f3) '': yallest) count(base1 'Weighted') u count(base1 'Unweighted') .

*Special paid leave in emergencies in 1998 .

temp.
select if xiifmoff>=0 & yiifmoff>=0.

tables	
            /format blank missing('.')
	/ftotal base1 'Base' total1 'All workplaces'
	/autolabel=on
	/table (xiifmoff+ base1) by yallest
	/statistics cpct(xiifmoff (f3) '': yallest) count(base1 'Weighted') u count(base1 'Unweighted') .

*Special paid leave in emergencies in 2004 .

temp.
select if xiifmoff>=0 & yiifmoff>=0.

tables	
            /format blank missing('.')
	/ftotal base1 'Base' total1 'All workplaces'
	/autolabel=on
	/table (yifmoffnew+ base1) by yallest
	/statistics cpct(yifmoffnew (f3) '': yallest) count(base1 'Weighted') u count(base1 'Unweighted') .

*Change in special paid leave provision since 98 by sector.                                                                                                                                                                

temp.
select if xiifmoff>=0 & yiifmoff>=0.

tables 
	/format blank missing('.')
	/ftotal base1 'Base' total1 'All workplaces'
	/autolabel=on
	/table (yallest  + yprivate + total1) by (YIFMOFFCHNGE+ base1) 
	/statistics cpct(YIFMOFFCHNGE(f3) '': yprivate ) count(base1 'Weighted') u count(base1 'Unweighted') .


***************************************************************.
*Management-employee relations.
***************************************************************.

* Whether management-employee relations had improved or not in continuing workplaces .

weight by pqwtnr .

temp.
select if y10plus=2.

tables 
	/format blank missing('.')
	/ftotal base1 'Base' total1 'All workplaces' 
	/ptotal total2 'All workplaces in 2004' 
	/autolabel=on
	/table (mrel + base1) 
	/statistics cpct(mrel(f3) '') count(base1 'Weighted') u count(base1 'Unweighted') .


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