*; 
*Replacement (Class Variables); 
*; 
length _RFormat $200; 
drop _RFormat; 
_RFormat = ''; 
_RFormat = put(REASON, $7.); 
%DMNORMIP(_RFormat); 
_RFormat = put(JOB, $7.); 
%DMNORMIP(_RFormat); 
*; 
*Replacement (Interval Variables); 
*; 
if LOAN lt 0 and LOAN ne . then LOAN = 0; 
if MORTDUE lt 0 and MORTDUE ne . then MORTDUE = 0; 
if VALUE lt 0 and VALUE ne . then VALUE = 0; 
if YOJ gt 60 then YOJ = 60; 
if YOJ lt 0 and YOJ ne . then YOJ = 0; 
if DEROG lt 0 and DEROG ne . then DEROG = 0; 
if DELINQ lt 0 and DELINQ ne . then DELINQ = 0; 
if CLAGE lt 0 and CLAGE ne . then CLAGE = 0; 
if NINQ lt 0 and NINQ ne . then NINQ = 0; 
if CLNO lt 0 and CLNO ne . then CLNO = 0; 
if DEBTINC lt 0 and DEBTINC ne . then DEBTINC = 0; 
*; 
*MOST FREQUENT VALUE (COUNT); 
*; 
if REASON = '' then REASON = 'DebtCon'; 
if JOB = '' then JOB = 'Other'; 
*; 
*MEAN-MEDIAN-MIDRANGE AND ROBUST ESTIMATES; 
*; 
if LOAN = . then LOAN = 16200; 
if MORTDUE = . then MORTDUE = 64674; 
if VALUE = . then VALUE = 89191; 
if YOJ = . then YOJ = 7; 
if DEROG = . then DEROG = 0; 
if DELINQ = . then DELINQ = 0; 
if CLAGE = . then CLAGE = 174.977052821834; 
if NINQ = . then NINQ = 0; 
if CLNO = . then CLNO = 21.247293049249; 
if DEBTINC = . then DEBTINC = 34.7457431518313;