* Data Quality:  Drug Type.

value labels losstype
'1' 'None' '2' 'Burned' '3' 'Counterfeited/Forged' '4' 'Destroyed/Damaged' '5' 'Recovered' '6' 'Seized' '7' 'Stolen' '8' 'Unk'.

*First table shows frequence of drug type when required.

COMPUTE filter_$=((losstype = '6' | losstype = '1') & p_desc = '10').
FORMAT filter_$ (f1.0).
FILTER BY filter_$.
EXECUTE .

FREQUENCIES
  VARIABLES=drugtyp1
  /ORDER=  ANALYSIS .

* The second table shows whether drugs are reported for other property entries.

USE All.
COMPUTE filter_$=(losstype ~= '6' & losstype ~= '1' & p_desc = '10').
FORMAT filter_$ (f1.0).
FILTER BY filter_$.
EXECUTE .

FREQUENCIES
  VARIABLES=drugtyp1
  /ORDER=  ANALYSIS .


* The final table shows the type of property loss associated with property listed as drug/narcotic.


USE All.
COMPUTE filter_$=(p_desc = '10').
FORMAT filter_$ (f1.0).
FILTER BY filter_$.
EXECUTE .

FREQUENCIES
  VARIABLES=losstype
  /ORDER=  ANALYSIS .