*              PARTNER

IF: HHSAM<5

COMPUTE: PARTNER=1

ELSEIF: HHSAM=7&GBJP<>NVT

COMPUTE: PARTNER=1

ELSE

COMPUTE: PARTNER=0

ENDIF

 

*              LFTOP

COMPUTE : LFTOP=2009-GBJOP

 

*              LFTP

COMPUTE : LFTOP=2009-GBJP

 

*              HOIN

IF: GESLOP=1&HHSAM<5

COMPUTE: HOOFD=1

ELSEIF: HHSAM=5|HHSAM=6

COMPUTE: HOOFD=1

ELSEIF: HHG=1

COMPUTE: HOOFD=1

ELSEIF: HHSAM=7&LFTOP>LFTP

COMPUTE: HOOFD=1

ELSE

COMPUTE: HOOFD=0

ENDIF

 

 

IF: HOOFD=1

COMPUTE: HOIN=1

ELSE

COMPUTE: HOIN=2

ENDIF

 

*              LFTHH

IF: HOIN=1

COMPUTE: LFTHH=LFTOP

ELSE

COMPUTE: LFTHH=LFTP

ENDIF

 

*              LFTEP

IF: PARTNER=0

COMPUTE: LFTEP=NVT

ELSEIF: HOIN=2

COMPUTE: LFTEP=LFTOP

ELSE

COMPUTE: LFTEP=LFTP

ENDIF

 

*              VERHUUR

 IF: HUUR>0

 COMPUTE: VERHUUR=HUUR-(BSKI+BLWI+BCAI+BKAB+BSVI)

 ELSE

 COMPUTE: VERHUUR=NVT

 ENDIF

 

 IF: EXCLBYD=1&IHSBM>0

 COMPUTE: VERHUUR=VERHUUR+IHSBM

 ENDIF

*              Toekenning forfaitaire bedragen (in euro's)

*              water

 IF: HRINC1=1

 COMPUTE: BLWI=BWATER09

 ELSE

 COMPUTE: BLWI=0

 ENDIF

 

*       onderscheid: meergezins en aantal vertrekken

*       aanname: aantal vertrekken = aantal kamers + 1

*       bij eengezinswoningen zelfde bedrag aanhouden,  ongeacht het aantal kamers (vanwege kleine steekproef 

        huurenquete CBS)

 

COMPUTE: AVERTR=AK+1

 

IF: HUKO=1&HVORMK=1

COMPUTE: BKV=BVEGZ09

ELSEIF: HUKO=1&HVORMK=2&AVERTR<=3

COMPUTE: BKV=BVMK09

ELSEIF: HUKO=1&HVORMK=2&(AVERTR=4|AVERTR=5)

COMPUTE: BKV=BVMM09

ELSEIF: HUKO=1&HVORMK=2&AVERTR>5

COMPUTE: BKV=BVMG09

ELSE

COMPUTE: BKV=0

ENDIF

 

*       stookkosten

 IF: HRINC2=1

 COMPUTE: BSKI=BKV

 ELSE

 COMPUTE: BSKI=0

 ENDIF

 

*       centraal antennesysteem

 IF: HRINC4=1

 COMPUTE: BCAI=BCAI09

 ELSE

 COMPUTE: BCAI=0

 ENDIF

 

*       kabelaansluiting

 IF: HRINC5=1

 COMPUTE: BKAB=BKABEL

 ELSE

 COMPUTE: BKAB=0

 ENDIF

 

*       servicekosten, onderscheid eengezins/meergezins en verhuurder

IF: HVORMK=1&(VERHDR=1|VERHDR=2)

COMPUTE: BOS=SVSE09

ELSEIF: HVORMK=2&(VERHDR=1|VERHDR=2)

COMPUTE: BOS=SVSM09

ELSEIF: HVORMK=1&VERHDR=3

COMPUTE: BOS=SVPE09

ELSEIF: HUKO=1HVORMK=2&VERHDR=3

COMPUTE: BOS=SVPM09

ELSEIF: HVORMK=1&(VERHDR=4|VERHDR=5)

COMPUTE: BOS=SVPPE09

ELSEIF: HVORMK=2&(VERHDR=4|VERHDR=5)

COMPUTE: BOS=SVPPM09

ELSEIF: HVORMK=1&VERHDR=6

COMPUTE: BOS=SVAE09

ELSEIF: HVORMK=2&VERHDR=6

COMPUTE: BOS=SVAM09

ELSE

COMPUTE: BOS=0

ENDIF

 

*       servicekosten

 IF: HRINC7=1

 COMPUTE: BSVI=BOS

 ELSE

 COMPUTE: BSVI=0

 ENDIF

*              BETHUUR

COMPUTE: BETHUUR=VERHUUR

 

 IF: IHS=1&IHSBM>0

 COMPUTE: BETHUUR=BETHUUR-IHSBM

 ENDIF

 

*              VHUKO

*              VHSOPN komt overeen met vraag 7.9 in de enquête

IF: VHSOPN=1

COMPUTE: VHUKO=1

ELSEIF: VHSOPN=2

COMPUTE: VHUKO=2

ELSE

COMPUTE: VHUKO=NVT

ENDIF

 

*              ACHTW

COMPUTE: ACHTW=0

 

*              VHSPN komt overeen met vraag 7.8 in de enquête

IF: VHSPN=1|VHSPN=2

COMPUTE: ACHTW=ACHTW+1

ELSE

COMPUTE: ACHTW=ACHTW

ENDIF

 

IF: VHSOPN=1|VHSOPN=2

COMPUTE: ACHTW=ACHTW+1

ELSE

COMPUTE: ACHTW=ACHTW

ENDIF

 

*              STROSTAR

IF: VHSOPN=1|VHSOPN=2

COMPUTE: DSTRSTA=1

ELSEIF: VHSOPN=TOGA

COMPUTE: DSTRSTA=TOGA

ELSE

COMPUTE: DSTRSTA=2

ENDIF

 

IF: VHSPN=NVT

COMPUTE: DSTRSTP=NVT

ELSEIF: VHSPN=1|VHSPN=2

COMPUTE: DSTRSTP=1

ELSEIF: VHSPN=TOGA

COMPUTE: DSTRSTP=TOGA

ELSE

COMPUTE: DSTRSTP=2

ENDIF

 

IF: DSTRSTA=1&DSTRSTP=1                                                  

COMPUTE: STROSTAR=1

ELSEIF: DSTRSTA=2&DSTRSTP=1                                                  

COMPUTE: STROSTAR=2

ELSEIF: DSTRSTA=1&DSTRSTP=2                                                   

COMPUTE: STROSTAR=2

ELSEIF: DSTRSTA=2&DSTRSTP=2                                                  

COMPUTE: STROSTAR=3

ELSEIF: DSTRSTA=1                                                            

COMPUTE: STROSTAR=4

ELSEIF: DSTRSTA=2&PARTNER=1                                                           

COMPUTE: STROSTAR=3

ELSEIF: DSTRSTA=2                                                            

COMPUTE: STROSTAR=5

ELSE

COMPUTE: STROSTAR=NVT

ENDIF

 

*              DSST

IF: STROSTAR<3|STROSTAR=4                                                   

COMPUTE: DSST=1

ELSE

COMPUTE: DSST=2

ENDIF

 

*              VVEHUUR

IF: VHUUR>0

 COMPUTE: VVEHUUR=VHUUR-(VBSKI+VBLWI+VBSVI)

 ELSE

 COMPUTE: VVEHUUR=NVT

 ENDIF

 

 IF: VEXCLBY=1&VIHSBM>0

 COMPUTE: VVEHUUR=VVEHUUR+VIHSBM

 ENDIF

 

*       Toekenning forfaitaire bedragen (in euro's)

IF: VHRINC1=1

 COMPUTE: VBLWI=BWATER08

 ELSE

 COMPUTE: VBLWI=0

 ENDIF

 

*       onderscheid: meergezins en aantal vertrekken

*       aanname: aantal vertrekken = aantal kamers + 1

*       bij eengezinswoningen zelfde bedrag aanhouden,  ongeacht het aantal kamers (vanwege kleine steekproef 

        huurenquete CBS)

 

COMPUTE: VAVERTR=VAK+1

 

IF: VHUKO=1&VVORMK=1

COMPUTE: VBKV=BVEGZ08

ELSEIF: VHUKO=1&VVORMK=2&VAVERTR<=3

COMPUTE: VBKV=BVMK08

ELSEIF: VHUKO=1&VVORMK=2&(VAVERTR=4|VAVERTR=5)

COMPUTE: VBKV=BVMM08

ELSEIF: VHUKO=1&VVORMK=2&VAVERTR>5

COMPUTE: VBKV=BVMG08

ELSE

COMPUTE: VBKV=0

ENDIF

 

*       stookkosten

IF: VHRINC2=1

COMPUTE: VBSKI=VBKV

ELSE

COMPUTE: VBSKI=0

ENDIF

 

*       servicekosten, onderscheid eengezins/meergezins

IF: VHUKO=1&VVORMK=1

COMPUTE: VBOS=(SVSE08+SVPE08)/2

ELSEIF: VHUKO=1&VVORMK=2

COMPUTE: VBOS=(SVSM08+SVPM08)/2

ELSE

COMPUTE: VBOS=0

ENDIF

 

*       overige kosten

IF: VHRINC3=1

COMPUTE: VBSVI=VBOS+BCAI08+BKABEL08

ELSE

COMPUTE: VBSVI=0

ENDIF

 

*              VBEHUUR

 COMPUTE: VBEHUUR=VVEHUUR

 

 IF: VIHS=1&VIHSBM>0

 COMPUTE: VBEHUUR=VBEHUUR-VIHSBM

 ENDIF