/*START_NOCLEAN_*/                                                            
*--------------------------------------------------------------*;             
* ENSEMBLE T1_Z8QYC : score code;                                             
*--------------------------------------------------------------*;             
*--------------------------------------------------------------*;             
* Number of imported models: 2;                                               
* Temporary variables;                                                        
DROP C_T1_Z8QYC_P_DEBTINC;                                                    
C_T1_Z8QYC_P_DEBTINC= 0.0;                                                    
*--------------------------------------------------------------*;             
* ENSEMBLE T1_Z8QYC;                                                          
* Scoring code for model: 1 of 2;                                             
                                                                              
*-------------------------------------------------------------*;              
*  START_CHUNK 1422917425.1:T12BSJ53                          *;              
*-------------------------------------------------------------*;              
*  END_CHUNK 1422917425.1:T12BSJ53                            *;              
*-------------------------------------------------------------*;              
                                                                              
*-------------------------------------------------------------*;              
*  START_CHUNK 1483026618.9:T1Q8AFGX                          *;              
*-------------------------------------------------------------*;              
*  END_CHUNK 1483026618.9:T1Q8AFGX                            *;              
*-------------------------------------------------------------*;              
                                                                              
*-------------------------------------------------------------*;              
*  START_CHUNK 1483026621.5:T3W_1NDF                          *;              
*-------------------------------------------------------------*;              
*                                                              ;              
*  TOOL : Neural Network                                       ;              
*  TYPE : MODEL                                                ;              
*  NODE : Neural Network [T3W_1NDF]                            ;              
*                                                              ;              
*-------------------------------------------------------------*;              
*                                                              ;              
*  MODEL NAME : Untitled                                       ;              
*  DESCRIPTION :                                               ;              
*                                                              ;              
*  TARGET : DEBTINC                                            ;              
*-------------------------------------------------------------*;              
***********************************;                                          
*** Begin Scoring Code for Neural;                                            
***********************************;                                          
DROP _DM_BAD _EPS _NOCL_ _MAX_ _MAXP_ _SUM_ _NTRIALS;                         
 _DM_BAD = 0;                                                                 
 _NOCL_ = .;                                                                  
 _MAX_ = .;                                                                   
 _MAXP_ = .;                                                                  
 _SUM_ = .;                                                                   
 _NTRIALS = .;                                                                
 _EPS =                1E-10;                                                 
LENGTH _WARN_ $4                                                              
;                                                                             
      label S_LOAN = 'Standard: LOAN' ;                                       
                                                                              
      label H11 = 'Hidden: H1=1' ;                                            
                                                                              
      label H12 = 'Hidden: H1=2' ;                                            
                                                                              
      label P_DEBTINC = 'Predicted: DEBTINC' ;                                
                                                                              
      label  _WARN_ = "Warnings";                                             
                                                                              
*** *************************;                                                
*** Checking missing input Interval                                           
*** *************************;                                                
                                                                              
IF NMISS(                                                                     
   LOAN   ) THEN DO;                                                          
   SUBSTR(_WARN_, 1, 1) = 'M';                                                
                                                                              
   _DM_BAD = 1;                                                               
END;                                                                          
*** *************************;                                                
*** Writing the Node interval ;                                               
*** *************************;                                                
IF _DM_BAD EQ 0 THEN DO;                                                      
   S_LOAN  =     -1.6285693967052 +      0.0000868957196 * LOAN ;             
END;                                                                          
ELSE DO;                                                                      
   IF MISSING( LOAN ) THEN S_LOAN  = . ;                                      
   ELSE S_LOAN  =     -1.6285693967052 +      0.0000868957196 * LOAN ;        
END;                                                                          
*** *************************;                                                
*** Writing the Node H1 ;                                                     
*** *************************;                                                
IF _DM_BAD EQ 0 THEN DO;                                                      
   H11  =    -0.10151987308653 * S_LOAN ;                                     
   H12  =    -0.37071350059357 * S_LOAN ;                                     
   H11  =    -0.25179928374683 + H11 ;                                        
   H12  =    -0.27759142556545 + H12 ;                                        
   H11  = TANH(H11 );                                                         
   H12  = TANH(H12 );                                                         
END;                                                                          
ELSE DO;                                                                      
   H11  = .;                                                                  
   H12  = .;                                                                  
END;                                                                          
*** *************************;                                                
*** Writing the Node T_INTRVL ;                                               
*** *************************;                                                
IF _DM_BAD EQ 0 THEN DO;                                                      
   P_DEBTINC  =     0.16486879761051 * H11  +    -2.28227853256132 * H12 ;    
   P_DEBTINC  =     33.2320024185238 + P_DEBTINC ;                            
END;                                                                          
ELSE DO;                                                                      
   P_DEBTINC  = .;                                                            
END;                                                                          
IF _DM_BAD EQ 1 THEN DO;                                                      
   P_DEBTINC  =     33.8095114986872;                                         
END;                                                                          
********************************;                                             
*** End Scoring Code for Neural;                                              
********************************;                                             
*-------------------------------------------------------------*;              
*  END_CHUNK 1483026621.5:T3W_1NDF                            *;              
*-------------------------------------------------------------*;              
*;                                                                            
* ENSEMBLE T1_Z8QYC;                                                          
* Probabilities for 1 of 2 imported models;                                   
*;                                                                            
C_T1_Z8QYC_P_DEBTINC= C_T1_Z8QYC_P_DEBTINC + P_DEBTINC;                       
* ENSEMBLE T1_Z8QYC;                                                          
* Scoring code for model: 2 of 2;                                             
*-------------------------------------------------------------*;              
* CODE_CLEAN *                                                *;              
* Code substitution: GOTO  RGDR1->G2099                       *;              
*-------------------------------------------------------------*;              
                                                                              
*-------------------------------------------------------------*;              
*-------------------------------------------------------------*;              
                                                                              
*-------------------------------------------------------------*;              
*-------------------------------------------------------------*;              
                                                                              
*-------------------------------------------------------------*;              
*  START_CHUNK 1483026625.8:T0LFLN0C                          *;              
*-------------------------------------------------------------*;              
*                                                              ;              
*  TOOL : Regression                                           ;              
*  TYPE : MODEL                                                ;              
*  NODE : Regression [T0LFLN0C]                                ;              
*                                                              ;              
*-------------------------------------------------------------*;              
*                                                              ;              
*  MODEL NAME : Untitled                                       ;              
*  DESCRIPTION :                                               ;              
*                                                              ;              
*  TARGET : DEBTINC                                            ;              
*-------------------------------------------------------------*;              
*************************************;                                        
*** begin scoring code for regression;                                        
*************************************;                                        
                                                                              
length _WARN_ $4;                                                             
label _WARN_ = 'Warnings' ;                                                   
                                                                              
drop _Y;                                                                      
_Y = DEBTINC ;                                                                
                                                                              
drop _DM_BAD;                                                                 
_DM_BAD=0;                                                                    
                                                                              
*** Check LOAN for missing values ;                                           
if missing( LOAN ) then do;                                                   
   substr(_warn_,1,1) = 'M';                                                  
   _DM_BAD = 1;                                                               
end;                                                                          
*** If missing inputs, use averages;                                          
if _DM_BAD > 0 then do;                                                       
   _LP0 =     33.8095114986872;                                               
   goto G2099;                                                                
end;                                                                          
                                                                              
*** Compute Linear Predictor;                                                 
drop _TEMP;                                                                   
drop _LP0;                                                                    
_LP0 = 0;                                                                     
                                                                              
***  Effect: LOAN ;                                                           
_TEMP = LOAN ;                                                                
_LP0 = _LP0 + (    0.00005528831381 * _TEMP);                                 
*--- Intercept ---*;                                                          
_LP0 = _LP0 + (    32.7401945551459);                                         
                                                                              
G2099:                                                                        
                                                                              
*** Predicted Value, Error, and Residual;                                     
label P_DEBTINC = 'Predicted: DEBTINC' ;                                      
P_DEBTINC = _LP0;                                                             
                                                                              
drop _R;                                                                      
if _Y = . then do;                                                            
   R_DEBTINC = .;                                                             
end;                                                                          
else do;                                                                      
   _R = _Y - _LP0;                                                            
    label R_DEBTINC = 'Residual: DEBTINC' ;                                   
   R_DEBTINC = _R;                                                            
end;                                                                          
                                                                              
*************************************;                                        
***** end scoring code for regression;                                        
*************************************;                                        
*-------------------------------------------------------------*;              
*  END_CHUNK 1483026625.8:T0LFLN0C                            *;              
*-------------------------------------------------------------*;              
*;                                                                            
* ENSEMBLE T1_Z8QYC;                                                          
* Probabilities for 2 of 2 imported models;                                   
*;                                                                            
C_T1_Z8QYC_P_DEBTINC= C_T1_Z8QYC_P_DEBTINC + P_DEBTINC;                       
*--------------------------------------------------------------*;             
* ENSEMBLE T1_Z8QYC : average imported probabilities;                         
P_DEBTINC= C_T1_Z8QYC_P_DEBTINC / 2;                                          
C_T1_Z8QYC_P_DEBTINC= 0.0;                                                    
*--------------------------------------------------------------*;             
*--------------------------------------------------------------*;             
* Ensemble: DEBTINC: Decisions;                                               
*--------------------------------------------------------------*;             
**** NO DECISION CODE;                                                        
*--------------------------------------------------------------*;             
* ENSEMBLE T1_Z8QYC - END OF CODE;                                            
*--------------------------------------------------------------*;             
/*END_NOCLEAN_*/