*CUADROS DE CAMAS HOSPITALARIAS*. 
* CUADRO 2 POBLACION ESTIMADA, NUMERO DE CAMAS.
* DISPONIBLES, EGRESOS HOSPITALARIOS .
* INDICES Y TASA, SEGUN REGIONES Y PROVINCIAS.
*
*--------------------------------------------------------------------------------------------.

compute t0 = 1.
compute t1 = 1.
compute t2 = 1.
compute tdefun = 0.
compute tdefun = falmen48 + falmas48.

* CREAR VARIABLE DE REGÍON.


NUMERIC REG_NAT (f2.0).
if (prov_ubie >= "01" and prov_ubie <= "06") REG_NAT= 1.
if (prov_ubie >= "10" and prov_ubie <= "11") REG_NAT= 1.
if (prov_ubie >= "17" and prov_ubie <= "18") REG_NAT= 1.
if (prov_ubie = "23") REG_NAT= 1.
if (prov_ubie >= "07" and prov_ubie <= "09") REG_NAT = 2.
if (prov_ubie >= "12" and prov_ubie <= "13") REG_NAT = 2.
if (prov_ubie = "24") REG_NAT= 2.
if (prov_ubie >= "14" and prov_ubie <= "16") REG_NAT = 3.
if (prov_ubie = "19") REG_NAT= 3.
if (prov_ubie >= "21" and prov_ubie <= "22") REG_NAT = 3.
if (prov_ubie = "20") REG_NAT= 4.
if (prov_ubie = "90") REG_NAT= 6.
if (prov_ubie = "88") REG_NAT= 5.
exe.
* Etiquetar variables y valores a desplegar en un reporte
*-------------------------------------------------------------------------------.
VALUE LABELS
/REG_NAT	
1 "Región Sierra: "
2 "Región Costa: "
3 "Región Amazónica:"
4 "Región Insular:"
5 "Extranjero:"
6 "Zonas no Delimitadas:".
*------------------------------------------.
*   Definición de Etiquetas.
*------------------------------------------.
VARIABLE LABELS
t0   "Total República" 
/t1  "'Total regional"
/tdefun 'Defunciones Hospitalarias' .

*** EJECUTAR CUADRO.

TABLES
/OBSERVATION camas_disp totegres tdefun dia_estad dias_cdis  
/TABLE t0+REG_NAT >(t1+prov_ubie) by camas_disp + totegres + tdefun + dia_estad + dias_cdis 
/STATISTICS COUNT(' total count') SUM((f6)"suma") MEAN((f3.1)'PROMEDIO ')
/TITLES "Cuadro N. 2"
	"Población Estimada, Numero de Camas Disponibles, Egresos Hospitalarios, Defunciones Hospitalarias, Días de Estada,"
	"Índices y Tasas,  Según Regiones y Provincias"
/CAPTION 'Anuario de Estadísticas Hospitalarias - Camas y Egresos  - INEC 2011'
/CORNER  " Regiones y  Provincias".
EXECUTE.


* CUADRO 3.-  Establecimientos hospitalarios, por numero de egresos, dias y promedio de estada, numero de camas hospitalarias disponibles.
* dias-camas disponibles, porcentaje de ocupacion y giro de camas, segun sector, clase de establecimiento y entidades a las que pertenecen.

* SECTOR PÚBLICO. 
*----------------------------------------.
*Crear variables  de trabajo.
*----------------------------------------..
compute t0 = 1.
compute t1 = 1.
compute t2 = 1.
*******************************.
* Definición de variables.
*******************************.
VARIABLE LABELS
t0   'Total' 
/t1   'Número de Establecimiento'
/t2   'Total República'
/totegres	"Número de Egresos"
/dia_estad "Días de Estada"
/camas_disp "Número de Camas Hospitalarias Disponibles"
/dias_cdis "Días - Cama Disponibles".
*----------------------------------------.
* SECTOR PUBLICO, sector 1. 
*-----------------------------------------------.
USE ALL.
COMPUTE filter_$=(sector=1).
VARIABLE LABEL filter_$ 'sector=1 (FILTER)'.
VALUE LABELS filter_$  0 'No seleccionado' 1 'Seleccionado'.
FORMAT filter_$ (f1.0).
FILTER BY filter_$.
EXECUTE .
**************.
* Etiqueta. 
**************.
VARIABLE LABELS 
t0   'Sector Público' .
****************************.
* Tabla: Sector Público. 
****************************.
TABLES
/OBSERVATION totegres dia_estad camas_disp dias_cdis 
/TABLE t0+ entidad
	 by t1 + (totegres + dia_estad + camas_disp + dias_cdis)
/STATISTICS  SUM((f6)"") 
/TITLES "Cuadro N. 3a.Sector Público"
"Establecimientos Hospitalarios, por Numero de Egresos, Días y Promedio de Estada, Numero de Camas Hospitalarias Disponibles, Días-Cama Disponibles,"
	"Porcentaje de Ocupación y Giro de Camas, Según Sector, Clase de Establecimiento y Entidades a las que Pertenecen"
/CAPTION  'Anuario de Estadísticas Hospitalarias - Camas y Egresos  - INEC 2011'
/CORNER "Sector Público".
EXECUTE.
*------------------------------------------------------------------------------------.
* HOSPITAL DE ESPECIALIDADES, sector 1 y clase 11. 
*------------------------------------------------------------------------------------.
USE ALL.
COMPUTE filter_$=(sector=1 and clase=11).
VARIABLE LABELS filter_$ 'sector=1 and clase=11 (FILTER)'.
VALUE LABELS filter_$  0 'No seleccionado' 1 'Seleccionado'.
FORMAT filter_$ (f1.0).
FILTER BY filter_$.
EXECUTE .
**************.
* Etiqueta. 
**************.
VARIABLE LABELS 
t0   'Hóspital de Especialidades' .
**********************************************.
* Tabla: Hospital de especial idades.
**********************************************.
TABLES
/OBSERVATION totegres dia_estad camas_disp dias_cdis 
/TABLE t0+ entidad
	 by t1 + (totegres + dia_estad + camas_disp + dias_cdis)
/STATISTICS SUM((f6)"") 
/TITLES "Cuadro N. 3a. Hospital de Especialidades"
"Establecimientos Hospitalarios, por Numero de Egresos, Días y Promedio de Estada, Numero de Camas Hospitalarias Disponibles, Días-Cama Disponibles,"
	"Porcentaje de Ocupación y Giro de Camas, Según Sector, Clase de Establecimiento y Entidades a las que Pertenecen"
/CAPTION  'Anuario de Estadísticas Hospitalarias - Camas y Egresos  - INEC 2011'
/CORNER "Hospital de Especialidades".
EXECUTE.

* HOSPITAL ESPECIALIZADO, sector 1, clase 03 a 10. 
*----------------------------------------------------------------------------------.
USE ALL.
COMPUTE filter_$=(sector=1 and (clase=3 or clase=4 or
  clase=5 or clase=6 or clase=7 or clase=8 or
  clase=9 or clase=10)).
VARIABLE LABELS filter_$ 'sector=1 and (clase=3 or clase=4 or'
 ' clase=5 or clase=6 or clase=7 or claes... (FILTER)'.
VALUE LABELS filter_$  0 'No seleccionado' 1 'Seleccionado'.
FORMAT filter_$ (f1.0).
FILTER BY filter_$.
EXECUTE .
**************.
* Etiqueta. 
**************.
VARIABLE LABELS 
t0   'Hospital Especializado' .
**********************************************.
* Tabla: Hospital especializado.
**********************************************.
TABLES
/OBSERVATION totegres dia_estad camas_disp dias_cdis 
/TABLE t0+ entidad
	 by t1 + (totegres + dia_estad + camas_disp + dias_cdis)
/STATISTICS SUM((f6)"") 
/TITLES "Cuadro N. 3a. Hospital Especializado"
"Establecimientos Hospitalarios, por Numero de Egresos, Días y Promedio de Estada, Numero de Camas Hospitalarias Disponibles, Días-Cama Disponibles,"
	"Porcentaje de Ocupación y Giro de Camas, Según Sector, Clase de Establecimiento y Entidades a las que Pertenecen"
/CAPTION  'Anuario de Estadísticas Hospitalarias - Camas y Egresos  - INEC 2011'
/CORNER "Hospital de Especialidades".
EXECUTE.

*------------------------------------------------------------------------------------------.
* HOSPITAL GENERAL, sector 1, clase: 02 . 
*------------------------------------------------------------------------------------------.
USE ALL.
COMPUTE filter_$=(sector=1 and clase=2).
VARIABLE LABEL filter_$ "sector=1 and clase=2 (FILTER)".
VALUE LABELS filter_$  0 'No seleccionado' 1 'Seleccionado'.
FORMAT filter_$ (f1.0).
FILTER BY filter_$.
EXECUTE .

**************.
* Etiqueta. 
**************.
VARIABLE LABELS 
t0   'Hospital General' .
**********************************************.
* Tabla: Hospital General . 
**********************************************.
TABLES
/OBSERVATION totegres dia_estad camas_disp dias_cdis 
/TABLE t0+ entidad
	 by t1 + (totegres + dia_estad + camas_disp + dias_cdis)
/STATISTICS SUM((f6)"") 
/TITLES "Cuadro N. 3a. Hospital General "
"Establecimientos Hospitalarios, por Numero de Egresos, Días y Promedio de Estada, Numero de Camas Hospitalarias Disponibles, Días-Cama Disponibles,"
	"Porcentaje de Ocupación y Giro de Camas, Según Sector, Clase de Establecimiento y Entidades a las que Pertenecen"
/CAPTION  'Anuario de Estadísticas Hospitalarias - Camas y Egresos  - INEC 2011'
/CORNER "Hospital General".
EXECUTE.

*------------------------------------------------------------------------------------------.
* HOSPITAL BASICO,  sector 1, clase: 01 . 
*------------------------------------------------------------------------------------------.
USE ALL.
COMPUTE filter_$=(sector=1 and clase=1).
VARIABLE LABELS filter_$ "sector=1 and clase=1 (FILTER)".
VALUE LABELS filter_$  0 'No seleccionado' 1 'Seleccionado'.
FORMAT filter_$ (f1.0).
FILTER BY filter_$.
EXECUTE .

**************.
* Etiqueta. 
**************.
VARIABLE LABELS
t0   'Hospital Básico' .
**********************************************.
* Tabla: Hospital Básico . 
**********************************************.
TABLES
/OBSERVATION totegres dia_estad camas_disp dias_cdis 
/TABLE t0+ entidad
	 by t1 + (totegres + dia_estad + camas_disp + dias_cdis)
/STATISTICS SUM((f6)"") 
/TITLES "Cuadro  N. 3a. Hospital Básico "
"Establecimientos Hospitalarios, por Numero de Egresos, Días y Promedio de Estada, Numero de Camas Hospitalarias Disponibles, Días-Cama Disponibles,"
	"Porcentaje de Ocupación y Giro de Camas, Según Sector, Clase de Establecimiento y Entidades a las que Pertenecen"
/CAPTION  'Anuario de Estadísticas Hospitalarias - Camas y Egresos  - INEC 2011'
/CORNER "Hospital Básico".
EXECUTE.



* CUADRO 3.-  Parte B. 
* EStablecimientos hospitalarios, pro numero de egresos, dias y promedio de estada, numero de camas hospitalarias disponibles, .
* dias-camas disponibles, porcentaje de ocupacion y giro de camas, segun sector, clase de establecimiento y entidades a las que pertenecen.
* SECTOR PRIVADO SIN FINES DE LUCRO  sector 3, entidad 17 y . 

*  SECTOR PRIVADO SFL.
USE ALL.
COMPUTE filter_$=((sector=3 and (clase=1 or clase=2 or
  clase=3 or clase=4 or clase=5 or clase=6 or
  clase=7 or clase=8 or clase=9 or clase=10 or
  clase=11 or clase=12 or clase=13 or clase=14 or
  clase=15 or clase=16 or clase=17))).
VARIABLE LABELS filter_$ '(sector=3 and (clase=1 or clase=2 or clase=3 or clase=4 or clase=5 or c... (FILTER)'.
VALUE LABELS filter_$  0 'No seleccionado' 1 'Seleccionado'.
FORMAT filter_$ (f1.0).
FILTER BY filter_$.
EXECUTE.
*----------------------------------------.
*Crear variables  de trabajo.
*----------------------------------------.
compute t0 = 1.
compute t1 = 1.
compute t2 = 1.
* Variable adicional para sector privado. 
STRING wsector (A1).
EXECUTE .
*******************************.
* Definición de variables.
*******************************.
STRING wclase1 (A1).
COMPUTE wclase1 = '9'.
if (sector = 3) and (entidad=12 or entidad =17) and (clase =1 or clase =2  or clase =3  or clase =4  or clase =5  or clase =6  or clase = 7  or clase = 8 or clase = 9 or clase = 10 or clase = 11) wclase1 = '1'.
if (sector = 3) and entidad = 17  and  (clase = 13  or clase = 14 or clase = 15 or clase = 16 or clase = 17 ) wclase1 = '2'.
if (sector = 3) and entidad = 17  and  (clase = 12 ) wclase1 = '3'.

* Resto de clases  y tipos.
*------------------------------------------.
*   Definición de Etiquetas.
*------------------------------------------.
VARIABLE LABELS
t0   'Total SFL' 
/t1   'Total Establecimeintos'
/t2   'Total Clase'
/totegres	"Número de Egresos"
/dia_estad "Días de Estada"
/camas_disp "Número de Camas Hospitalarias Disponibles"
/dias_cdis "Días - Cama Disponiobles".

VALUE LABELS 
t0 1 ' '
/t1 1      ' '
/t2 1      ' '
/wclase1
'1' 'Hospitales Privados SFL'
'2' 'Clínica Especializada'
'3' 'Clínica General'
'9' 'ERRADA'.
*----------------------------------------------------------------------------------------.
* Para los totales del sector Privado SFL.

TABLES
/OBSERVATION totegres dia_estad camas_disp dias_cdis 
/TABLE t0+ wclase1
	 by t1 +  (totegres + dia_estad + camas_disp + dias_cdis)
/STATISTICS SUM((f6)"") 
/TITLES "Cuadro N. 3b Sector Privado sin Fines de Lucro "
"Establecimientos Hospitalarios, por Numero de Egresos, Días y Promedio de Estada, Numero de Camas Hospitalarias Disponibles, Días-Cama Disponibles,"
	"Porcentaje de Ocupación y Giro de Camas, Según Sector, Clase de Establecimiento y Entidades a las que Pertenecen"
/CAPTION  'Anuario de Estadísticas Hospitalarias - Camas y Egresos  - INEC 2011'
/CORNER "Sector Privado sin fines de lucro".
EXECUTE.


* CUADRO 3.-  Parte C. 
* EStablecimientos hospitalarios, pro numero de egresos, dias y promedio de estada, numero de camas hospitalarias disponibles, .
* dias-camas disponibles, porcentaje de ocupacion y giro de camas, segun sector, clase de establecimiento y entidades a las que pertenecen.
* SECTOR PRIVADO CON FINES DE LUCRO  sector 2, entidad 18 y . 

*  SECTOR PRIVADO CFL.
COMPUTE filter_$=(((sector=2 and (clase=1 or clase=2 or
  clase=3 or clase=4 or clase=5 or clase=6 or
  clase=7 or clase=8 or clase=9 or clase=10 or
  clase=11 or clase=12 or clase=13 or clase=14 or
  clase=15 or clase=16 or clase=17)))).
VARIABLE LABELS filter_$ '((sector=2 and (clase=1 or clase=2 or clase=3 or clase=4 or clase=5 or ... (FILTER)'.
VALUE LABELS filter_$  0 'No seleccionado' 1 'Seleccionado'.
FORMAT filter_$ (f1.0).
FILTER BY filter_$.
EXECUTE .
*----------------------------------------.
*Crear variables  de trabajo.
*----------------------------------------.
compute t0 = 1.
compute t1 = 1.
compute t2 = 1.
* Variable adicional para sector privado. 
STRING wsector (A1).
EXECUTE .
*******************************.
* Definición de variables.
*******************************.
STRING wclase1 (A1).
COMPUTE wclase1 = '9'.
if (sector = 2) and (entidad=12 or entidad = 18)  and  (clase = 1 or clase = 2  or clase = 3  or clase = 4  or clase = 5 
or clase = 6  or clase = 7  or clase = 8 or clase = 9 or clase = 10 or clase = 11  )  wclase1 = '1'.
if (sector = 2) and entidad = 18  and  (clase = 13  or clase = 14 or clase = 15 or clase = 16 or clase = 17 ) wclase1 = '2'.
if (sector = 2) and entidad = 18  and  (clase = 12 ) wclase1 = '3'.
*******if (sector = '2') and entidad = '18'  and  (clase = '12' or clase = '24'  ) wclase1 = '3'.

* Resto de clases  y tipos.
*------------------------------------------.
*   Definición de Etiquetas.
*------------------------------------------.
VARIABLE LABELS 
t0   'Total CFL' 
/t1   'Total Establecimientos'
/t2   'Total Clase'
/totegres	"Número de Egresos"
/dia_estad "Días de Estada"
/camas_disp "Número de Camas Hopitalarios Disponibles"
/dias_cdis "Días _Cama Disponibles".

VALUE LABELS 
t0 1	' '
/t1 1      ' '
/t2 1      ' '
/wclase1
'1'	'Hospitales Privados CFL'
'2'	'Clínica Especializada'
'3'	'Clínica General'
'9'         'ERRADA'.
*----------------------------------------------------------------------------------------.
* Para los totales del sector Privado SFL.

TABLES
/OBSERVATION totegres dia_estad camas_disp dias_cdis 
/TABLE t0+ wclase1
	 by t1 +  (totegres + dia_estad + camas_disp + dias_cdis)
/STATISTICS SUM((f6)"") 
/TITLES "Cuadro N. 3c.Sector Privado con fines de Lucro"
/TITLES "Cuadro N. 3b Sector Privado con Fines de Lucro "
"Establecimientos Hospitalarios, por Numero de Egresos, Días y Promedio de Estada, Numero de Camas Hospitalarias Disponibles, Días-Cama Disponibles,"
	"Porcentaje de Ocupación y Giro de Camas, Según Sector, Clase de Establecimiento y Entidades a las que Pertenecen"
/CAPTION  'Anuario de Estadísticas Hospitalarias - Camas y Egresos  - INEC 2011'
/CORNER "Sector Privado sin fines de lucro".
EXECUTE.

---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------.
* Proceso 2011. 
* CUADRO 3.-  EStablecimientos hospitalarios, pro numero de egresos, dias y promedio de estada, numero de camas hospitalarias disponibles, 
* dias-camas disponibles, porcentaje de ocupacion y giro de camas, segun sector, clase de establecimiento y entidades a las que pertenecen.
*----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------.

compute t0 = 1.
compute t1 = 1.
compute t2 = 1.
*******************************.
* Definición de variables.
*******************************.
VARIABLE LABELS
t0   'Total' 
/t1   'Número de establecimientos'
/t2   'Total República'
/totegres	"Número de Egresos"
/dia_estad "Días de Estada"
/camas_disp "Número de Camas Hospitalarias Disponibles"
/dias_cdis "Días_Cama Disponibles".

*-----------------------------------------------.
* TOTAL. 
*-----------------------------------------------.
USE ALL.
**************.
* Etiqueta. 
**************.
VARIABLE LABELS
t0   'Nacional ' .
****************************.
* Tabla: Sector Público. 
****************************.
TABLES
/OBSERVATION totegres dia_estad camas_disp dias_cdis 
/TABLE t0 + sector > entidad 
BY t1 + (totegres + dia_estad + camas_disp + dias_cdis)
/STATISTICS  SUM((f6)"") 
/TITLES "Cuadro N. 3	Nacional"
"Establecimientos Hospitalarios, por Numero de Egresos, Días y Promedio de Estada, Numero de Camas Hospitalarias Disponibles, Días-Cama Disponibles,"
	"Porcentaje de Ocupación y Giro de Camas, Según Sector, Clase de Establecimiento y Entidades a las que Pertenecen"
/CAPTION  'Anuario de Estadísticas Hospitalarias - Camas y Egresos  - INEC 2011'
/CORNER. "Nacional".
EXECUTE.


* CUADRO 4a NUMERO DE CAMAS HOSPITALARIAS DISPONIBLES, DIAS-CAMA DISPONIBLES, PORCENTAJE DE OCUPACION CAMAS, .
* GIRO DE CAMAS,  PROMEDIO DIARIO DE CAMAS OCUPADAS, LUGAR DONDE FUNCIONA Y ENTIDAD, SEGUN SECTOR, CLASE Y .
* ESTABLECIMIENTO HOSPITALARIO.

compute t0 = 1.
compute t1 = 1.

* seleccionar el SECTOR PUBLICO. 
USE ALL.
COMPUTE filter_$=(sector=1).
VARIABLE LABEL filter_$ 'sector=1 (FILTER)'.
VALUE LABELS filter_$  0 'No seleccionado' 1 'Seleccionado'.
FORMAT filter_$ (f1.0).
FILTER BY filter_$.
EXECUTE.
*---------------------------------------.
*Crear variables  de trabajo.
*---------------------------------------.
compute t0 = 1.
compute t1 = 1.
*------------------------------------------------------------.
* Para agrupar las sectores con entidades.
*------------------------------------------------------------.
STRING wclase1 (A1).
*COMPUTE wclase1 = '1'.
COMPUTE wclase1 = '9'.

if (sector = 1 and clase = 11)  and (entidad=1 or entidad=2 or entidad=3 or entidad=4 
or entidad=5 or entidad=6 or entidad=7 or entidad=8 or entidad=9 or entidad=10 or entidad=11 or entidad=12 or entidad=13 or entidad=14 or entidad=15 or entidad=16) wclase1 = '1'.
if sector = 1 and (clase = 3 or clase = 4  or clase = 5  or clase = 6  or clase = 7  or clase = 8  
or clase = 9  or clase = 10) and  (entidad=1 or entidad=2 or entidad=3 or entidad=4 or entidad=5 
or entidad=6 or entidad=7 or entidad=8 or entidad=9 or entidad=10 or entidad=11 or entidad=12 or entidad=13 or entidad=14 or entidad=15 or entidad=16)  wclase1 = '2'.
if (sector = 1 and clase = 2)   and   (entidad=1 or entidad=2 or entidad=3 or entidad=4 or entidad=5 
or entidad=6 or entidad=7 or entidad=8 or entidad=9 or entidad=10 or entidad=11 or entidad=12 or entidad=13 or entidad=14 or entidad=15 or entidad=16) wclase1 = '3'.
if (sector = 1 and clase = 1)    and (entidad=1 or entidad=2 or entidad=3 or entidad=4 or entidad=5 
or entidad=6 or entidad=7 or entidad=8 or entidad=9 or entidad=10 or entidad=11 or entidad=12 or entidad=13 or entidad=14 or entidad=15 or entidad=16) wclase1 = '4'.

* resto de clases  y tipos.
*------------------------------------------.
*   Definición de Etiquetas.
*------------------------------------------.
VARIABLE LABELS
t0   'Sector Público' 
/t1   'Total'
/entidad	' '
/parr_ubie	' ' 
/cod_est	' '
/camas_disp 'N. Camas Hospitalarias Disponibles'
/dias_cdis	'Días-Cama Disponibles'.

VALUE LABELS 
t0 1	' '
/t1 1      ' '
/wclase1
'1'	'Hospital de Especialidades'
'2'	'Hospital Especializado'
'3'	'Hospital General'
'4'	'Hospital Básico'
'9'	'ERRADO'.

*Para los totales del sector Público.
*------------------------------------------------------.
TABLES
/OBSERVATION camas_disp dias_cdis dia_estad totegres 
/TABLE t0 +  (t1>wclase1)
	 by (camas_disp+dias_cdis+totegres+dia_estad)
/STATISTICS SUM((f6)"") 
/TITLES 'Cuadro N. 4a.Totales	Sector Publico' 
'Numero de Camas Hospitalarias Disponibles, Días-Cama Disponibles, Porcentaje de Ocupación Camas, Giro de Camas,  Promedio Diario de Camas Ocupadas, '
	'Lugar Donde Funciona y Entidad, Según Sector, Clase y Establecimiento Hospitalario'
/CAPTION  'Anuario de Estadísticas Hospitalarias - Camas y Egresos  - INEC 2011'
/CORNER "Sector Público".
EXECUTE.


********************************************************.
* Detalle del cuadro   PARTE aaaaaaa. 
********************************************************.
TABLES
/OBSERVATION camas_disp dias_cdis dia_estad totegres 
/TABLE t0 + (wclase1)>(cod_est>parr_ubie>entidad)
	 by (camas_disp+dias_cdis+dia_estad+totegres)
/STATISTICS SUM((f6)"") 
/TITLES 'Cuadro N. 4a.Totales	Sector Publico' 
'Numero de Camas Hospitalarias Disponibles, Días-Cama Disponibles, Porcentaje de Ocupación Camas, Giro de Camas,  Promedio Diario de Camas Ocupadas, '
	'Lugar Donde Funciona y Entidad, Según Sector, Clase y Establecimiento Hospitalario'
/CAPTION  'Anuario de Estadísticas Hospitalarias - Camas y Egresos  - INEC 2011'
/CORNER "Sector Público".
EXECUTE.


* FIN CUADRO. 
**************************.
* Después de ejecutar el cuadro para seleccionar todos los casos.
FILTER OFF.
USE ALL.
EXECUTE .

* CUADRO 4b NUMERO DE CAMAS HOSPITALARIAS DISPONIBLES, DIAS-CAMA DISPONIBLES, PORCENTAJE DE OCUPACION CAMAS, .
* GIRO DE CAMAS,  PROMEDIO DIARIO DE CAMAS OCUPADAS, LUGAR DONDE FUNCIONA Y ENTIDAD, SEGUN SECTOR, CLASE Y .
* ESTABLECIMIENTO HOSPITALARIO.

*---------------------------------------------------------------------------------------------------------.
* seleccionar el SECTOR PRIVADO. 
USE ALL.
COMPUTE filter_$=((sector=3) and (entidad =12 or entidad=17) and
 (clase=1 or  clase=2 or clase=3 or clase=4 or clase=5 or
  clase=6 or clase=7 or clase=8 or clase=9 or
  clase=10 or clase=11 or clase=12 or clase=13 or
  clase=14 or clase=15 or clase=16 or clase=17)).
VARIABLE LABELS filter_$ "(sector=3) and (entidad =12 or entidad=17) and (clase=1 or  clase=2 or clase=3... (FILTER)".
VALUE LABELS filter_$  0 'No seleccionado' 1 'Seleccionado'.
FORMAT filter_$ (f1.0).
FILTER BY filter_$.
EXECUTE .

*---------------------------------------.
*Crear variables  de trabajo.
*---------------------------------------.
compute t0 = 1.
compute t1 = 1.


*----------------------------------------------------------------------------.
* Para agrupar los sectores con clases y entidades.
*----------------------------------------------------------------------------.
STRING wclase1 (A1).
COMPUTE wclase1 = '9'.

if (sector = 3) and (entidad=12 or entidad=17) and (clase = 1 or clase = 2  or clase = 3  or clase = 4  or clase = 5  or clase = 6  
or clase = 7  or clase = 8 or clase = 9 or clase = 10 or clase = 11  )  wclase1 = '1'.
if (sector = 3) and (entidad=17) and (clase = 13  or clase = 14 or clase = 15 or clase = 16 or clase = 17) wclase1 = '2'.
if (sector = 3) and (entidad=17) and (clase = 12) wclase1 = '3'.

* resto de clases  y tipos.
*------------------------------------------.
*   Definición de Etiquetas.
*------------------------------------------.
VARIABLE LABELS 
t0   'Sector Privado' 
/t1   'Total'
/entidad	' '
/parr_ubie	' ' 
/cod_est	' '
/camas_disp 'N. Camas Hospitalarias Disponibles'
/dias_cdis	'Días-Cama Disponibles'.

VALUE LABELS 
t0 1 ' '
/t1 1 ' '
/wclase1
'1' 'Hospital Privado SFL'
'2' 'Clinica Especializada'
'3' 'Clínica General'
'9' 'ERRADO'.

*Para los totales del sector Privado.
*------------------------------------------------------.
TABLES
/OBSERVATION camas_disp dias_cdis dia_estad totegres 
/TABLE t0 > (t1 + wclase1)
	 by (camas_disp+dias_cdis+totegres+dia_estad)
/STATISTICS SUM((f6)"") 
/TITLES 'Cuadro N. 4b.Totales Sector Privado Sin Fines de Lucro' 
'Numero de Camas Hospitalarias Disponibles, Días-Cama Disponibles, Porcentaje de Ocupación Camas, Giro de Camas,  Promedio Diario de Camas Ocupadas, '
	'Lugar Donde Funciona y Entidad, Según Sector, Clase y Establecimiento Hospitalario'
/CAPTION  'Anuario de Estadísticas Hospitalarias - Camas y Egresos  - INEC 2011'
/CORNER "Sector Privado sin Fines de lucro".
EXECUTE.
********************************************************.
* Detalle del cuadro   PARTE 	bbbbbbb. 
********************************************************.
TABLES
/OBSERVATION camas_disp dias_cdis dia_estad totegres 
/TABLE t0 + (wclase1)>(cod_est>parr_ubie>entidad)
	 by t0 + (camas_disp+dias_cdis+dia_estad+totegres)
/STATISTICS SUM((f6)"") 
/TITLES 'Cuadro N. 4b. Sector Privado  Sin fines de Lucro detalle'  
'Numero de Camas Hospitalarias Disponibles, Días-Cama Disponibles, Porcentaje de Ocupación Camas, Giro de Camas,  Promedio Diario de Camas Ocupadas, '
	'Lugar Donde Funciona y Entidad, Según Sector, Clase y Establecimiento Hospitalario'
/CAPTION  'Anuario de Estadísticas Hospitalarias - Camas y Egresos  - INEC 2011'
/CORNER "Sector Privado sin Fines de lucro".
EXECUTE.
****************
**************************.
* FIN CUADRO. 
**************************.
* Después de ejecutar el cuadro para seleccionar todos los casos.
FILTER OFF.
USE ALL.
EXECUTE .


*-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------.
* Proceso 2011. 
* CUADRO 4c NUMERO DE CAMAS HOSPITALARIAS DISPONIBLES, DIAS-CAMA DISPONIBLES, PORCENTAJE DE OCUPACION CAMAS, .
* GIRO DE CAMAS,  PROMEDIO DIARIO DE CAMAS OCUPADAS, LUGAR DONDE FUNCIONA Y ENTIDAD, SEGUN SECTOR, CLASE Y .
* ESTABLECIMIENTO HOSPITALARIO.

*---------------------------------------------------------------------------------------------------------.
* seleccionar el SECTOR PRIVADO CFL. 
USE ALL.
COMPUTE filter_$=((sector=2) and (entidad=12 or entidad=18) and
 (clase=1 or clase=2 or clase=3 or clase=4 or clase=5 or
 clase=6 or clase=7 or clase=8 or clase=9 or
 clase=10 or clase=11 or clase=12 or clase=13 or
 clase=14 or clase=15 or clase=16 or clase=17)).
VARIABLE LABELS filter_$ "(sector=2) and (entidad=12 or entidad=18) and (clase=1 or clase=2 or clase=3... (FILTER)".
VALUE LABELS filter_$  0 'No seleccionado' 1 'Seleccionado'.
FORMAT filter_$ (f1.0).
FILTER BY filter_$.
EXECUTE .
*---------------------------------------.
*Crear variables  de trabajo.
*---------------------------------------.
compute t0 = 1.
compute t1 = 1.


* Para agrupar los sectores con clases y entidades.
*----------------------------------------------------------------------------.
STRING wclase1 (A1).
COMPUTE wclase1 = '9'.

if (sector =2) and (entidad = 12 or entidad = 18) and (clase = 1 or clase = 2  or clase = 3  or clase = 4  or clase = 5  or clase = 6  
or clase = 7  or clase = 8 or clase = 9 or clase = 10 or clase = 11)  wclase1 = '1'.
if (sector =2) and (entidad = 18) and (clase = 13  or clase = 14 or clase = 15 or clase = 16 or clase = 17) wclase1 = '2'.
if (sector =2) and (entidad = 18) and (clase = 12) wclase1 = '3'.

* resto de clases  y tipos.
*------------------------------------------.
*   Definición de Etiquetas.
*------------------------------------------.
VARIABLE LABELS
t0   'Sector Privado' 
/t1   'Total'
/entidad	' '
/parr_ubie	' ' 
/cod_est	' '
/camas_disp 'N. Camas Hospitalarias Disponibles'
/dias_cdis	'Días - Cama Disponibles'.

VALUE LABELS 
t0 1	' '
/t1 1      ' '
/wclase1
'1' 'Hospital Privado CFL'
'2' 'Clínica Especializada'
'3' 'Clinica General'
'9' 'ERRADO'.	

*Para los totales del sector Privado.
*------------------------------------------------------.
TABLES
/OBSERVATION camas_disp dias_cdis dia_estad totegres 
/TABLE t0 > (t1 + wclase1)
	 by (camas_disp+dias_cdis+dia_estad+totegres)
/STATISTICS SUM((f6)"") 
/TITLES 'Cuadro N. 4c.Total Sector Privado Con Fines de Lucro' 
'Numero de Camas Hospitalarias Disponibles, Días-Cama Disponibles, Porcentaje de Ocupación Camas, Giro de Camas,  Promedio Diario de Camas Ocupadas, '
	'Lugar Donde Funciona y Entidad, Según Sector, Clase y Establecimiento Hospitalario'
/CAPTION  'Anuario de Estadísticas Hospitalarias - Camas y Egresos  - INEC 2011'
/CORNER "Sector Privado con Fines de lucro".
EXECUTE.
********************************************************.
* Detalle del cuadro   PARTE 	ccccccc. 
********************************************************.
TABLES
/OBSERVATION camas_disp dias_cdis dia_estad totegres 
/TABLE t0 + (wclase1)>(cod_est>parr_ubie>entidad)
	 by t0 + (camas_disp+dias_cdis+totegres+dia_estad)
/STATISTICS SUM((f6)"") 
/TITLES 'Cuadro N. 4c.Total Sector Privado Con Fines de Lucro' 
'Numero de Camas Hospitalarias Disponibles, Días-Cama Disponibles, Porcentaje de Ocupación Camas, Giro de Camas,  Promedio Diario de Camas Ocupadas, '
	'Lugar Donde Funciona y Entidad, Según Sector, Clase y Establecimiento Hospitalario'
/CAPTION  'Anuario de Estadísticas Hospitalarias - Camas y Egresos  - INEC 2011'
/CORNER "Sector Privado con Fines de lucro".
EXECUTE.
**************************.
* FIN CUADRO. 
**************************.
* Después de ejecutar el cuadro para seleccionar todos los casos.
FILTER OFF.
USE ALL.
EXECUTE .

*-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------.
* Proceso 2011. 
* CUADRO 4 nacional NUMERO DE CAMAS HOSPITALARIAS DISPONIBLES, DIAS-CAMA DISPONIBLES, PORCENTAJE DE OCUPACION CAMAS, .
* GIRO DE CAMAS,  PROMEDIO DIARIO DE CAMAS OCUPADAS, LUGAR DONDE FUNCIONA Y ENTIDAD, SEGUN SECTOR, CLASE Y .
* ESTABLECIMIENTO HOSPITALARIO.

*---------------------------------------.
compute t0 = 1.
compute t1 = 1.

*------------------------------------------.
*   Definición de Etiquetas.
*------------------------------------------.
VARIABLE LABELS 
t0   'Total República' 
/t1   'Total'
/entidad	' '
/parr_ubie	' ' 
/cod_est	' '
/camas_disp 'N. Camas Hospitalarias Disponibles'
/dias_cdis	'Días -Cama Disponibles'.

VALUE LABELS 
t0 1 ' '
/t1 1 ' '.
*Para los totales de TOTAL REPUBLICA.
*------------------------------------------------------------.
TABLES
/OBSERVATION camas_disp dias_cdis dia_estad totegres 
/TABLE t0 
	 by (camas_disp+dias_cdis+totegres+dia_estad)
/STATISTICS SUM((f6)"") 
/TITLES 'Cuadro N. 4 	Total República' 
'Numero de Camas Hospitalarias Disponibles, Días-Cama Disponibles, Porcentaje de Ocupación Camas, Giro de Camas,  Promedio Diario de Camas Ocupadas, '
	'Lugar Donde Funciona y Entidad, Según Sector, Clase y Establecimiento Hospitalario'
/CAPTION  "Anuario de Estadísticas Hospitalarias - Camas y Egresos  - INEC 2011"
/CORNER.
EXECUTE.

**************************.
* FIN CUADRO. 
**************************.
* Después de ejecutar el cuadro para seleccionar todos los casos.
FILTER OFF.
USE ALL.
EXECUTE .

*------------------------------------------------------------------------------------------------------------------------------------------------------------------.
* Proceso 2011. 
* CUADRO 5 NUMERO DE ESTABLECIMIENTOS Y NUMERO DE CAMAS HOSPITALARIAS DISPONIBLES, .
* POR CLASE DE ESTABLECIMIENTO, SEGUN REGIONES PROVINCIAS .
*Crear variables  de trabajo.
*------------------------------------------.
compute t0 = 1.
compute t1 = 1.
*-----------------------------------------------------------------.
*Para agrupar las sectores con entidades.
*-----------------------------------------------------------------.
STRING wclase (A1).
COMPUTE wclase = '9'.
EXECUTE .

if clase = 11 wclase = '1'.
if (clase = 3 or clase = 4 or clase = 5) wclase = "2".
if (clase = 6 or clase = 7 or clase = 8 or clase = 9 or clase = 10) wclase = "3".
if (clase =  2) wclase = "4".
if (clase = 1) wclase = "5".
if (clase = 13 or clase = 14 or clase = 15 or clase = 16 or clase = 17) wclase = "6".
if clase = 12 wclase = '7'.
EXECUTE.

STRING wtipo (A1).
COMPUTE wtipo = '9'.
EXECUTE .

if wclase = '1' wtipo = '1'.
if wclase = '2' wtipo = '2'.
if wclase = '3' wtipo = '2'.
if wclase = '4' wtipo = '3'.
if wclase = '5' wtipo = '3'.
if wclase = '6' wtipo = '4'.
if wclase = '7' wtipo = '5'.
EXECUTE.


NUMERIC REG_NAT (f2.0).
if (prov_ubie >= "01" and prov_ubie <= "06") REG_NAT= 1.
if (prov_ubie >= "10" and prov_ubie <= "11") REG_NAT= 1.
if (prov_ubie >= "17" and prov_ubie <= "18") REG_NAT= 1.
if (prov_ubie = "23") REG_NAT= 1.
if (prov_ubie >= "07" and prov_ubie <= "09") REG_NAT = 2.
if (prov_ubie >= "12" and prov_ubie <= "13") REG_NAT = 2.
if (prov_ubie = "24") REG_NAT= 2.
if (prov_ubie >= "14" and prov_ubie <= "16") REG_NAT = 3.
if (prov_ubie = "19") REG_NAT= 3.
if (prov_ubie >= "21" and prov_ubie <= "22") REG_NAT = 3.
if (prov_ubie = "20") REG_NAT= 4.
if (prov_ubie = "90") REG_NAT= 5.
execute.


VALUE LABELS
/REG_NAT  
1 'Regipon Sierra'
2 'Región Costa'
3 'Región Amazónica'
4 'Región Insular'
5 'Zonas no Delimitadas'.


*   Definición de Etiquetas.*
*------------------------------------------.
VARIABLE LABELS 
t0   'Total República' 
/t1   'Total '
/prov_ubie	' '.

VALUE LABELS 
t0 1	' '
/t1 1	' '
/wclase
'1'	'Hospital de Especialidades'
'2'	'Agudo'
'3'	'Crónico'
'4'	'Hospital General'
'5'	'Hospital Básico'
'6'	'Clínica Especializada'
'7'	'Clínica General'
'9'	'Raros CLASE'
/wtipo
'1'	'Hospital de Especialidades'
'2'	'Hospital Especializado'
'3'	'Hospital Básico y General'
'4'	'Clínica Especializada'
'5'	'Clínica General'
'9'	'RAROS TIPO'.

*----------------------------.
* CUADRO BASE. 
*----------------------------.
TABLES
/OBSERVATION camas_disp 
/TABLE t0+REG_NAT >(t1+prov_ubie) by camas_disp + (wtipo>wclase>camas_disp)
/STATISTICS COUNT('N. DE ESTABLECIMIENTOS') SUM((f6)"") 
/TITLES "Cuadro N. 5"
"Número de Establecimientos y Numero de Camas Hospitalarias Disponibles, por Clase de Establecimiento"
	"Según Regiones y  Provincias"	
/CAPTION  "Anuario de Estadísticas Hospitalarias - Camas y Egresos  - INEC 2011"
/CORNER.
EXECUTE.

*-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------.
* Proceso 2011. 
* CUADRO 6 NUMERO DE ESTABLECIMIENTOS Y NUMERO DE CAMAS HOSPITALARIAS DE DOTACION NORMAL .
* POR CLASE DE ESTABLECIMIENTO, SEGUN REGIONES PROVINCIAS.
*-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------.
*------------------------------------------.
compute t0 = 1.
compute t1 = 1.
*-----------------------------------------------------------------.
*Para agrupar las sectores con entidades.
*-----------------------------------------------------------------.
STRING wclase (A1).
COMPUTE wclase = '9'.
EXECUTE .

if clase = 11 wclase = '1'.
if (clase = 3 or clase = 4 or clase = 5) wclase = "2".
if (clase = 6 or clase = 7 or clase = 8 or clase = 9 or clase = 10) wclase = "3".
if (clase =  2) wclase = "4".
if (clase = 1) wclase = "5".
if (clase = 13 or clase = 14 or clase = 15 or clase = 16 or clase = 17) wclase = "6".
if clase = 12 wclase = '7'.
EXECUTE.

STRING wtipo (A1).
COMPUTE wtipo = '9'.
EXECUTE .

if wclase = '1' wtipo = '1'.
if wclase = '2' wtipo = '2'.
if wclase = '3' wtipo = '2'.
if wclase = '4' wtipo = '3'.
if wclase = '5' wtipo = '3'.
if wclase = '6' wtipo = '4'.
if wclase = '7' wtipo = '5'.
EXECUTE.

* CODIGOS DE PROVINCIAS Y REGIONES.

NUMERIC REG_NAT (f2.0).
if (prov_ubie >= "01" and prov_ubie <= "06") REG_NAT= 1.
if (prov_ubie >= "10" and prov_ubie <= "11") REG_NAT= 1.
if (prov_ubie >= "17" and prov_ubie <= "18") REG_NAT= 1.
if (prov_ubie = "23") REG_NAT= 1.
if (prov_ubie >= "07" and prov_ubie <= "09") REG_NAT = 2.
if (prov_ubie >= "12" and prov_ubie <= "13") REG_NAT = 2.
if (prov_ubie = "24") REG_NAT= 2.
if (prov_ubie >= "14" and prov_ubie <= "16") REG_NAT = 3.
if (prov_ubie = "19") REG_NAT= 3.
if (prov_ubie >= "21" and prov_ubie <= "22") REG_NAT = 3.
if (prov_ubie = "20") REG_NAT= 4.
if (prov_ubie = "90") REG_NAT= 5.
execute.


VALUE LABELS
/REG_NAT  
1 'Regipon Sierra'
2 'Región Costa'
3 'Región Amazónica'
4 'Región Insular'
5 'Zonas no Delimitadas'.

*------------------------------------------.
*   Definición de Etiquetas.
*------------------------------------------.
VARIABLE LABELS 
t0   'Total República' 
/t1   'Total '
/prov_ubie	' '.

VALUE LABELS 
t0 1	' '
/t1 1	' '
/wclase
'1'	'Hospital de Especialidades'
'2'	'Agudo'
'3'	'Crónico'
'4'	'Hospital General'
'5'	'Hospital Básico'
'6'	'Clínica Especializada'
'7'	'Clínica General'
'9'	'RAROS CLASE'
/wtipo
'1'	'Hospital de Especialidades'
'2'	'Hospital Especializado'
'3'	'Hospital Básico y General'
'4'	'Clínica Especializada'
'5'	'Clínica General'
'9'	'RAROS TIPO'.
*----------------------------.
* CUADRO BASE. 
*----------------------------.
TABLES
/OBSERVATION camas_dnor
/TABLE t0+REG_NAT>(t1+prov_ubie) by camas_dnor + (wtipo>wclase>camas_dnor)
/STATISTICS COUNT('N. DE ESTABLECIMIENTOS') SUM((f6)"") 
/TITLES "Cuadro N. 6"
"Número de Establecimientos y Número de Camas de Dotación Normal por Clase de Establecimiento"
	"según Regiones y  Provincias"
/CAPTION  "Anuario de Estadísticas Hospitalarias - Camas y Egresos  - INEC 2011"
/CORNER.
EXECUTE.



*-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------.
* Proceso 2011. 
* CUADRO 7 NUMERO DE ESTABLECIMIENTOS HOSPITALARIOS Y NUMERO DE CAMAS HOSPITALARIAS DISPONIBLES  .
* POR SECTOR Y ENTIDAD A LA QUE PERTENECEN, SEGUN REGIONES Y PROVINCIAS .
*-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------.

*Crear variables  de trabajo.
*------------------------------------------.
compute t0 = 1.
compute t1 = 1.
*-----------------------------------------------------------------.
*Para agrupar las sectores con entidades.
*-----------------------------------------------------------------.
STRING wenti (A2).
COMPUTE wenti = '10'.
EXECUTE .

if entidad = 1 and sector =1 wenti = "1".
if entidad = 2 and sector =1 wenti = "2".
if entidad = 3 and sector =1 wenti = "3".
if (entidad = 6 or entidad = 7 or entidad = 8) and (sector =1) wenti = "4".
if entidad = 13 and sector =1 wenti = "5".
if entidad = 15 and sector =1 wenti = "6".
if (entidad = 4 or entidad = 5 or entidad = 9 or entidad = 10 or entidad = 11 or entidad = 12 or entidad = 14 or entidad = 16) and sector =1 wenti = "7".
if (entidad = 17 or entidad = 12) and (sector =3) wenti = "8".
if (entidad = 18 or entidad = 12) and (sector =2) wenti = "9".
EXECUTE.

* CODIGOS DE PROVINCIAS Y REGIONES.

NUMERIC REG_NAT (f2.0).
if (prov_ubie >= "01" and prov_ubie <= "06") REG_NAT= 1.
if (prov_ubie >= "10" and prov_ubie <= "11") REG_NAT= 1.
if (prov_ubie >= "17" and prov_ubie <= "18") REG_NAT= 1.
if (prov_ubie = "23") REG_NAT= 1.
if (prov_ubie >= "07" and prov_ubie <= "09") REG_NAT = 2.
if (prov_ubie >= "12" and prov_ubie <= "13") REG_NAT = 2.
if (prov_ubie = "24") REG_NAT= 2.
if (prov_ubie >= "14" and prov_ubie <= "16") REG_NAT = 3.
if (prov_ubie = "19") REG_NAT= 3.
if (prov_ubie >= "21" and prov_ubie <= "22") REG_NAT = 3.
if (prov_ubie = "20") REG_NAT= 4.
if (prov_ubie = "90") REG_NAT= 5.
execute.


VALUE LABELS
/REG_NAT  
1 'Regipon Sierra'
2 'Región Costa'
3 'Región Amazónica'
4 'Región Insular'
5 'Zonas no Delimitadas'.

STRING wsector (A1).
COMPUTE wsector = '9'.
EXECUTE .

if (wenti = '1'  or wenti = '2'  or wenti = '3'  or wenti = '4'  or wenti = '5'  or  wenti = '6'  or wenti = '7' ) 	wsector = "1".
if (wenti = '8'  or wenti = '9') wsector = "2".
EXECUTE .
*--------------------------------------------------------------.
* Filtrar registros que cumplen condicones. 
*--------------------------------------------------------------.
USE ALL.
COMPUTE filter_$=(wsector<>'9').
VARIABLE LABEL filter_$ "wsector<>'9' (FILTER)".
VALUE LABELS filter_$  0 'No seleccionado' 1 'Seleccionado'.
FORMAT filter_$ (f1.0).
FILTER BY filter_$.
EXECUTE .
*------------------------------------------.
*   Definición de Etiquetas.
*------------------------------------------.
VARIABLE LABELS
t0   'Total República' 
/t1   'Total '
/prov_ubie	' '
/camas_disp 'Camas '.

VALUE LABELS 
t0 1	' '
/t1 1	' '
/wenti
'1'	'Ministerio de Salud Pública'
'2'	'Ministerio de Gobierno y Policía'
'3'	'Ministerio de Defensa Nacional'
'4'	'Seguro Social (IESS)'
'5'	'Junta de Beneficiencia de Guayaquil'
'6'	'Sociedad de Lucha contra el Cáncer'
'7'	'Otras /1'
'8'	'Sin Fines de Lucro'
'9'	'Con Fines de Lucro'
'10'	'ERRADO ENTI'
/wsector	
'1'	'Sector Público'
'2'	'Sector Privado'
'9'	'ERRADO SECTOR'.

*----------------------------.
* CUADRO BASE. 
*----------------------------.
TABLES
/OBSERVATION camas_disp 
/TABLE t0+REG_NAT>(t1+prov_ubie) by camas_disp + (wsector>wenti>camas_disp)
/STATISTICS COUNT('N. DE ESTABLECIMIENTOS') SUM((f6)"") 
/TITLES "Cuadro N. 7"
"Número de Establecimientos Hospitalarios y Numero de Camas Hospitalarias Disponibles por Sector y Entidad a la que Pertenecen"
	"Según Regiones y  Provincias"
/CAPTION  "Anuario de Estadísticas Hospitalarias - Camas y Egresos  - INEC 2011"
/CORNER.
EXECUTE.


*------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------.
* Proceso 2011. 
* CUADRO 8 NÚMERO DE ESTABLECIMIENTOS HOSPITALARIOS Y NÙMERO DE CAMAS HOSPITALARIAS DE DOTACION NORMAL. 
* POR SECTOR Y ENTIDAD A LA QUE PERTENECEN, SEGUN REGIONES Y PROVINCIAS .
*------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------.

*Crear variables  de trabajo.
*------------------------------------------.
compute t0 = 1.
compute t1 = 1.
*-----------------------------------------------------------------.
*Para agrupar las sectores con entidades.
*-----------------------------------------------------------------.
STRING wenti (A2).
COMPUTE wenti = '10'.
EXECUTE .

if entidad = 1 and sector =1 wenti = "1".
if entidad = 2 and sector =1 wenti = "2".
if entidad = 3 and sector =1 wenti = "3".
if (entidad = 6 or entidad = 7 or entidad = 8) and (sector =1) wenti = "4".
if entidad = 13 and sector =1 wenti = "5".
if entidad = 15 and sector =1 wenti = "6".
if (entidad = 4 or entidad = 5 or entidad = 9 or entidad = 10 or entidad = 11 or entidad = 12 or entidad = 14 or entidad = 16) and sector =1 wenti = "7".
if (entidad = 17 or entidad = 12)  and (sector =3) wenti = "8".
if (entidad = 18 or entidad = 12) and (sector =2) wenti = "9".
EXECUTE.

STRING wsector (A1).
COMPUTE wsector = '9'.
EXECUTE .

if (wenti = '1'  or wenti = '2'  or wenti = '3'  or wenti = '4'  or wenti = '5'  or  wenti = '6'  or wenti = '7' ) 	wsector = "1".
if (wenti = '8'  or wenti = '9')		wsector = "2".
EXECUTE .
*--------------------------------------------------------------.
* Filtrar registros que cumplen condicones. 
*--------------------------------------------------------------.
USE ALL.
COMPUTE filter_$=(wsector<>'9').
VARIABLE LABELS filter_$ "wsector<>'9' (FILTER)".
VALUE LABELS filter_$  0 'No seleccionado' 1 'Seleccionado'.
FORMAT filter_$ (f1.0).
FILTER BY filter_$.
EXECUTE .

* CODIGOS DE PROVINCIAS Y REGIONES.

NUMERIC REG_NAT (f2.0).
if (prov_ubie >= "01" and prov_ubie <= "06") REG_NAT= 1.
if (prov_ubie >= "10" and prov_ubie <= "11") REG_NAT= 1.
if (prov_ubie >= "17" and prov_ubie <= "18") REG_NAT= 1.
if (prov_ubie = "23") REG_NAT= 1.
if (prov_ubie >= "07" and prov_ubie <= "09") REG_NAT = 2.
if (prov_ubie >= "12" and prov_ubie <= "13") REG_NAT = 2.
if (prov_ubie = "24") REG_NAT= 2.
if (prov_ubie >= "14" and prov_ubie <= "16") REG_NAT = 3.
if (prov_ubie = "19") REG_NAT= 3.
if (prov_ubie >= "21" and prov_ubie <= "22") REG_NAT = 3.
if (prov_ubie = "20") REG_NAT= 4.
if (prov_ubie = "90") REG_NAT= 5.
execute.


VALUE LABELS
/REG_NAT  
1 'Regipon Sierra'
2 'Región Costa'
3 'Región Amazónica'
4 'Región Insular'
5 'Zonas no Delimitadas'.

*------------------------------------------.
*   Definición de Etiquetas.
*------------------------------------------.
VARIABLE LABELS 
t0   'Total República' 
/t1   'Total '
/prov_ubie	' '
/camas_dnor	'Camas '.

VALUE LABELS 
t0 1	' '
/t1 1	' '
/wenti
'1'	'Ministerio de Salud Pública'
'2'	'Ministerio de Gobierno y Policía'
'3'	'Ministerio de Defensa Nacional'
'4'	'Seguro Social (IESS)'
'5'	'Junta de Beneficiencia de Guayaquil'
'6'	'Sociedad de Lucha contra el Cáncer'
'7'	'Otras /1'
'8'	'Sin Fines de Lucro'
'9'	'Con Fines de Lucro'
'10'	'ERRADO ENTI'
/wsector	
'1'	'Sector Público'
'2'	'Sector Privado'
'9'	'ERRADO SECTOR'.

*	12345678901234567890123456789012345678901234567890123456789012345678901234567890.
*	         1         2         3         4         5         6         7         8.
*----------------------------.
* CUADRO BASE. 
*----------------------------.
TABLES
/OBSERVATION camas_dnor
/TABLE t0+REG_NAT>(t1+prov_ubie) by camas_dnor+ (wsector>wenti>camas_dnor)
/STATISTICS COUNT('N. DE ESTABLECIMIENTOS') SUM((f6)"") 
/TITLES "Cuadro N. 8"
"Número de Establecimientos Hospitalarios y Número de Camas Hospitalarias de Dotación Normal"
	"por Sector y Entidad a la que Pertenecen según Regiones y  Provincias"
/CAPTION  "Anuario de Estadísticas Hospitalarias - Camas y Egresos  - INEC 2011"
/CORNER.
EXECUTE.

*-------------------------------------------------------------------------------------------------------------------------------------.
* Proceso 2011. 
* CUADRO 9 CAMAS HOSPITALARIAS DE DOTACION NORMAL, POR SERVICIOS .
* SEGUN REGIONES PROVINCIAS Y ESTABLECIMIENTOS HOSPITALARIOS.
* Y CUADROS DE TOTALES DE REGIONES Y TOTALES POR PROVINCIA.
*-----------------------------------------.
compute t0 = 1.
compute t1 = 1.

STRING wclase (A1).
COMPUTE wclase = '9'.
EXECUTE .

if sector = 1 and (clase = 1 or clase = 2 or clase = 3 or clase = 4 or clase = 5 or clase = 6 or clase = 7 or  clase = 8 or clase = 9 or clase = 10 or clase = 11) wclase = '1'.
if (sector = 2 or sector = 3) and (clase = 1 or clase = 2 or clase = 3 or clase = 4 or clase = 5 or clase = 6 or clase = 7 or  clase = 8 or clase = 9 or clase = 10 or clase = 11) wclase = '2'.
if (sector = 2 or sector = 3) and (clase = 12 or clase = 13 or clase = 14 or clase = 15 or clase = 16 or clase = 17) wclase = '3'.
EXECUTE.
*------------------------------------------------------------------------------------------.
* CODIGOS DE PROVINCIAS Y REGIONES.

NUMERIC REG_NAT (f2.0).
if (prov_ubie >= "01" and prov_ubie <= "06") REG_NAT= 1.
if (prov_ubie >= "10" and prov_ubie <= "11") REG_NAT= 1.
if (prov_ubie >= "17" and prov_ubie <= "18") REG_NAT= 1.
if (prov_ubie = "23") REG_NAT= 1.
if (prov_ubie >= "07" and prov_ubie <= "09") REG_NAT = 2.
if (prov_ubie >= "12" and prov_ubie <= "13") REG_NAT = 2.
if (prov_ubie = "24") REG_NAT= 2.
if (prov_ubie >= "14" and prov_ubie <= "16") REG_NAT = 3.
if (prov_ubie = "19") REG_NAT= 3.
if (prov_ubie >= "21" and prov_ubie <= "22") REG_NAT = 3.
if (prov_ubie = "20") REG_NAT= 4.
if (prov_ubie = "90") REG_NAT= 5.
execute.


VALUE LABELS
/REG_NAT  
1 'Región Sierra'
2 'Región Costa'
3 'Región Amazónica'
4 'Región Insular'
5 'Zonas no Delimitadas'.


*   Definición de Etiquetas.
*------------------------------------------.
VARIABLE LABELS 
t0   'Total República' 
/t1    'Total'
/cod_est	' '
/prov_ubie	' '
/sector	' '
/dotmedic	'Médicina'
/dotcirug	'Cirugía'
/dotginob	'Ginecología y Obstetricia'
/dotpedia	'Pediatría (cunas e incubadoras)'
/dotcardi	'Cardiología'
/dotneumo	'Neumología'
/dotpsiqu	'Psiquiatría'
/dottraum	'Traumatología'
/dotinfec	'Infectología'
/dotoftal	'Oftalmología y Otorrinolaringología'
/doturolo	'Urología'
/dotgastr	'Gastroenterología'
/dototrse	'Otros Servicios 1/'
/dotserin	'Servicios Indiferenciados'
/dotemerg	'Cmas Emergencias'
/dotcinte	'Camas Cuidados Intensivos'.

VALUE LABELS 
t0 1	' '
/t1 1	' '
/wclase
'1'	'Sector Público, Clase: 01-11'
'2'	'Sector Privado, Clase 01-11'
'3'	'Sector Privado, Clase 12-17'
'9'	'RAROS CLASE'.

* CUADRO GENERAL.

TABLES
/OBSERVATION camas_dnor dotmedic dotcirug dotginob dotpedia dotcardi dotneumo dotpsiqu dottraum dotinfec dotoftal doturolo dotgastr dototrse dotserin dotemerg dotcinte
/TABLE t0+ (REG_NAT>prov_ubie>wclase>cod_est>parr_ubie) by (dotmedic+dotcirug+dotginob+dotpedia+dotcardi+dotneumo+dotpsiqu+dottraum+dotinfec+dotoftal+doturolo+dotgastr+dototrse+dotserin+dotemerg+dotcinte)
/STATISTICS  SUM((f6)"") 
/TITLES "Cuadro N. 9"
 "Camas Hospitalarias de Dotación Normal, por Servicios, según Regiones Provincias y Establecimientos Hospitalarios"
/Caption "Anuario de Estadísticas Hospitalarias - Camas y Egresos 2011"
/CORNER.
EXECUTE.

* CUADRO GENERAL Nota:PARA LOS TOTALES DE CLINICAS PARTICULARES.

TABLES
/OBSERVATION camas_dnor dotmedic dotcirug dotginob dotpedia dotcardi dotneumo dotpsiqu dottraum dotinfec dotoftal doturolo dotgastr dototrse dotserin dotemerg dotcinte
/TABLE t0+ (REG_NAT  >prov_ubie>wclase) by (dotmedic+dotcirug+dotginob+dotpedia+dotcardi+dotneumo+dotpsiqu+dottraum+dotinfec+dotoftal+doturolo+dotgastr+dototrse+dotserin+dotemerg+dotcinte)
/STATISTICS  SUM((f6)"") 
/TITLES "Cuadro N. 9	Última Línea de Clínicas Particulares"
 "Camas Hospitalarias de Dotación Normal, por Servicios, según Regiones Provincias y Establecimientos Hospitalarios"
/Caption "Anuario de Estadísticas Hospitalarias - Camas y Egresos 2011"
/CORNER.
EXECUTE.

* CUADRO TOTALES POR PROVINCIAS

TABLES
/OBSERVATION camas_dnor dotmedic dotcirug dotginob dotpedia dotcardi dotneumo dotpsiqu dottraum dotinfec dotoftal doturolo dotgastr dototrse dotserin dotemerg dotcinte
/TABLE t0+REG_NAT >(t1+prov_ubie) by (dotmedic+dotcirug+dotginob+dotpedia+dotcardi+dotneumo+dotpsiqu+dottraum+dotinfec+dotoftal+doturolo+dotgastr+dototrse+dotserin+dotemerg+dotcinte)
/STATISTICS  SUM((f6)"") 
/TITLES "Cuadro N. 9	Totales por Provincias"
	 " Camas Hospitalarias de Dotación Normal, Por Servicios, según Regiones, Provincias y Establecimientos Hospitalarios"
/CAPTION "Anuario de Estadísticas Hospitalarias - Camas y Egresos 2011"
/CORNER.
EXECUTE.

