*S*** MAP2: PROTOTYPE             --- CREATED BY UNIX 8.3.4 ---         
*S*** INPUT USING MAP 'XXXXXXXX'    
*S***     ##COMP-NAME ##DISP-AY ##DISP-FAO ##DISP-LIT ##SID ##ST-SPECIAL
*S***     ##ST-STATUS #CMB-OUT #CMB-PEND #CMB-TOTAL #CNT-LOAN #CNT-PELL 
*S***     #CNT-TCH #CON-OUT #CON-TOTAL #ENROLLMENT #LEU-FLAG #MATCH-NSLDS           
*S***     #PELL-LEU #PERK-CUR #PERK-TOTAL #PS1-NSLDS #PS2-NSLDS #PS3-NSLDS          
*S***     #SUB-OUT #SUB-PEND #SUB-TOTAL #SUB-USAGE-PD #TAB-LOAN #TAB-PELL           
*S***     #TAB-TCH #TCH-OUT #TCH-TOTAL #TEACH-TOTAL-GR #TEACH-TOTAL-UG  
*S***     #TRAN-NSLDS #UNS-OUT #UNS-PEND #UNS-TOTAL #VER-NSLDS          
*S***     WFNSL27D.WF-NS-BANKRUPT WFNSL27D.WF-NS-C-SUB-LE-FLAG          
*S***     WFNSL27D.WF-NS-CMB-LIMIT-GR WFNSL27D.WF-NS-CMB-LIMIT-UG       
*S***     WFNSL27D.WF-NS-DL-MPN WFNSL27D.WF-NS-DLG-MPN WFNSL27D.WF-NS-DLP-MPN       
*S***     WFNSL27D.WF-NS-IAAS-OVP WFNSL27D.WF-NS-IAAS-OVP-CTC           
*S***     WFNSL27D.WF-NS-LIMIT-EXCP WFNSL27D.WF-NS-LOAN-ADTNL           
*S***     WFNSL27D.WF-NS-LOAN-DEF WFNSL27D.WF-NS-LOAN-DIS   
*S***     WFNSL27D.WF-NS-LOAN-FRD WFNSL27D.WF-NS-LOAN-REP   
*S***     WFNSL27D.WF-NS-PELL-ADTNL WFNSL27D.WF-NS-PELL-OVP 
*S***     WFNSL27D.WF-NS-PELL-OVP-CTC WFNSL27D.WF-NS-PERK-OVP           
*S***     WFNSL27D.WF-NS-PERK-OVP-CTC WFNSL27D.WF-NS-SEOG-OVP           
*S***     WFNSL27D.WF-NS-SEOG-OVP-CTC WFNSL27D.WF-NS-SUB-LIMIT-GR       
*S***     WFNSL27D.WF-NS-SUB-LIMIT-UG WFNSL27D.WF-NS-TCH-ADTNL          
*S***     WFNSL27D.WF-NS-TCH-CONV WFNSL27D.WF-NS-TCH-OVP    
*S***     WFNSL27D.WF-NS-TCH-OVP-CTC
*S**DEFINE DATA PARAMETER           
*S**1 ##COMP-NAME (A035)
*S**1 ##DISP-AY (A007)  
*S**1 ##DISP-FAO (A002) 
*S**1 ##DISP-LIT (A004) 
*S**1 ##SID (A009)      
*S**1 ##ST-SPECIAL (A020)           
*S**1 ##ST-STATUS (A020)
*S**1 #CMB-OUT (A007)   
*S**1 #CMB-PEND (A007)  
*S**1 #CMB-TOTAL (A007) 
*S**1 #CNT-LOAN (A002)  
*S**1 #CNT-PELL (A002)  
*S**1 #CNT-TCH (A002)   
*S**1 #CON-OUT (A007)   
*S**1 #CON-TOTAL (A007) 
*S**1 #ENROLLMENT (A001)
*S**1 #LEU-FLAG (A001)  
*S**1 #MATCH-NSLDS (A001)           
*S**1 #PELL-LEU (A008)  
*S**1 #PERK-CUR (A007)  
*S**1 #PERK-TOTAL (A007)
*S**1 #PS1-NSLDS (A002) 
*S**1 #PS2-NSLDS (A002) 
*S**1 #PS3-NSLDS (A002) 
*S**1 #SUB-OUT (A007)   
*S**1 #SUB-PEND (A007)  
*S**1 #SUB-TOTAL (A007) 
*S**1 #SUB-USAGE-PD (A007)          
*S**1 #TAB-LOAN (A001)  
*S**1 #TAB-PELL (A001)  
*S**1 #TAB-TCH (A001)   
*S**1 #TCH-OUT (A007)   
*S**1 #TCH-TOTAL (A007) 
*S**1 #TEACH-TOTAL-GR (A007)        
*S**1 #TEACH-TOTAL-UG (A007)        
*S**1 #TRAN-NSLDS (A002)
*S**1 #UNS-OUT (A007)   
*S**1 #UNS-PEND (A007)  
*S**1 #UNS-TOTAL (A007) 
*S**1 #VER-NSLDS (A001) 
*S**1 WFNSL27D.WF-NS-BANKRUPT (A001)
*S**1 WFNSL27D.WF-NS-C-SUB-LE-FLAG (A001)       
*S**1 WFNSL27D.WF-NS-CMB-LIMIT-GR (A001)        
*S**1 WFNSL27D.WF-NS-CMB-LIMIT-UG (A001)        
*S**1 WFNSL27D.WF-NS-DL-MPN (A001)  
*S**1 WFNSL27D.WF-NS-DLG-MPN (A001) 
*S**1 WFNSL27D.WF-NS-DLP-MPN (A001) 
*S**1 WFNSL27D.WF-NS-IAAS-OVP (A001)
*S**1 WFNSL27D.WF-NS-IAAS-OVP-CTC (A008)        
*S**1 WFNSL27D.WF-NS-LIMIT-EXCP (A001)          
*S**1 WFNSL27D.WF-NS-LOAN-ADTNL (A001)          
*S**1 WFNSL27D.WF-NS-LOAN-DEF (A001)
*S**1 WFNSL27D.WF-NS-LOAN-DIS (A001)
*S**1 WFNSL27D.WF-NS-LOAN-FRD (A001)
*S**1 WFNSL27D.WF-NS-LOAN-REP (A001)
*S**1 WFNSL27D.WF-NS-PELL-ADTNL (A001)          
*S**1 WFNSL27D.WF-NS-PELL-OVP (A001)
*S**1 WFNSL27D.WF-NS-PELL-OVP-CTC (A008)        
*S**1 WFNSL27D.WF-NS-PERK-OVP (A001)
*S**1 WFNSL27D.WF-NS-PERK-OVP-CTC (A008)        
*S**1 WFNSL27D.WF-NS-SEOG-OVP (A001)
*S**1 WFNSL27D.WF-NS-SEOG-OVP-CTC (A008)        
*S**1 WFNSL27D.WF-NS-SUB-LIMIT-GR (A001)        
*S**1 WFNSL27D.WF-NS-SUB-LIMIT-UG (A001)        
*S**1 WFNSL27D.WF-NS-TCH-ADTNL (A001)           
*S**1 WFNSL27D.WF-NS-TCH-CONV (A001)
*S**1 WFNSL27D.WF-NS-TCH-OVP (A001) 
*S**1 WFNSL27D.WF-NS-TCH-OVP-CTC (A008)         
*S**END-DEFINE          
*S**FORMAT PS=021 LS=079 ZP=OFF SG=OFF KD=ON  IP=OFF        
*S*** MAP2: MAP PROFILES *****************************        200***********        
*S*** .TOTOTOOOMOA NENEYEYEBLBL4YGR5YREN    ^"`+={};!@ 'WWHELPRH',=        *        
*S*** 023079        N1NNLCN____         X        01 NCST    YL           1 *        
*S**************************************************************************        
*S**INPUT          (     IP=OFF      HE='WWHELPRH',=                      /*        
*S**                                                                       )        
*S** 001T *DATX  (AD=OD EM=MM'/'DD'/'YYYY ) /*.01S008 D    .
*S** 031T '-'(YE)       
*S** 033T ##DISP-AY  (AD=ODL CD=YE ) /*.01U007 A007 .       
*S** 041T 'NSLDS -'(YE) 
*S** 070T *TIMX  (AD=OD EM=' 'HH':'II' 'AP CD=YE ) /*.01S009 T    .     
*S**/       
*S**/       
*S** 001T 'Student:'(YE)
*S** 011T ##SID  (AD=ODL CD=GR HE='WWHELPRH',= ) /*.01U009 A009 .       
*S** 022T ##COMP-NAME  (AD=ODL CD=GR HE='WWHELPRH',= ) /*.01U035 A035 . 
*S** 059T ##ST-STATUS  (AD=ODR CD=GR HE='WWHELPRH',= ) /*.01U020 A020 . 
*S**/       
*S** 011T ##DISP-LIT  (AD=ODL CD=YE ) /*.01U004 A004 .      
*S** 018T ##DISP-FAO  (AD=ODR CD=GR HE='WWHELPRH',= ) /*.01U002 A002 .  
*S** 022T ##ST-SPECIAL  (AD=ODL CD=RE HE='WWHELPRH',= ) /*.01U020 A020 .
*S**/       
*S**/       
*S** 003T 'NSLDS match:'(NE)        
*S** 023T #MATCH-NSLDS  (AD=ODL CD=GR /*.01U001 A001 .      
*S**      HE='WWHELRRH','WFISR27D.WF-IS-C-MATCH-NSL   ' )   
*S** 027T 'Defaulted loans:'(NE)    
*S** 046T WFNSL27D.WF-NS-LOAN-DEF  (AD=ODL CD=GR /*.01U001 A001 .       
*S**      HE='WWHELPRH',= )         
*S** 050T 'Pell Overpmt:'(NE)       
*S** 067T WFNSL27D.WF-NS-PELL-OVP  (AD=ODL CD=GR /*.01U001 A001 .       
*S**      HE='WWHELPRH',= )         
*S** 069T WFNSL27D.WF-NS-PELL-OVP-CTC  (AD=ODL CD=GR /*.01U008 A008 .   
*S**      HE='WWHELPRH',= )         
*S**/       
*S** 003T 'NSLDS results:'(NE)      
*S** 023T #VER-NSLDS  (AD=ODL CD=GR /*.01U001 A001 .        
*S**      HE='WWHELRRH','WFISR27D.WF-IS-C-VER-NSL     ' )   
*S** 027T 'Discharged loans:'(NE)   
*S** 046T WFNSL27D.WF-NS-LOAN-DIS  (AD=ODL CD=GR /*.01U001 A001 .       
*S**      HE='WWHELPRH',= )         
*S** 050T 'TEACH Overpmt:'(NE)      
*S** 067T WFNSL27D.WF-NS-TCH-OVP  (AD=ODL CD=GR /*.01U001 A001 .        
*S**      HE='WWHELPRH',= )         
*S** 069T WFNSL27D.WF-NS-TCH-OVP-CTC  (AD=ODL CD=GR /*.01U008 A008 .    
*S**      HE='WWHELPRH',= )         
*S**/       
*S** 003T 'NSLDS post:'(NE)         
*S** 016T #PS1-NSLDS  (AD=ODL CD=GR /*.01U002 A002 .        
*S**      HE='WWHELRRH','WFISR27D.WF-IS-C-NSLDS-PS1   ' )   
*S** 019T #PS2-NSLDS  (AD=ODL CD=GR /*.01U002 A002 .        
*S**      HE='WWHELRRH','WFISR27D.WF-IS-C-NSLDS-PS2   ' )   
*S** 022T #PS3-NSLDS  (AD=ODL CD=GR /*.01U002 A002 .        
*S**      HE='WWHELRRH','WFISR27D.WF-IS-C-NSLDS-PS3   ' )   
*S** 027T 'Fraud loans:'(NE)        
*S** 046T WFNSL27D.WF-NS-LOAN-FRD  (AD=ODL CD=GR /*.01U001 A001 .       
*S**      HE='WWHELPRH',= )         
*S** 050T 'IAAS Overpmt:'(NE)       
*S** 067T WFNSL27D.WF-NS-IAAS-OVP  (AD=ODL CD=GR /*.01U001 A001 .       
*S**      HE='WWHELPRH',= )         
*S** 069T WFNSL27D.WF-NS-IAAS-OVP-CTC  (AD=ODL CD=GR /*.01U008 A008 .   
*S**      HE='WWHELPRH',= )         
*S**/       
*S** 003T 'NSLDS transaction:'(NE)  
*S** 022T #TRAN-NSLDS  (AD=ODL CD=GR /*.01U002 A002 .       
*S**      HE='WWHELRRH','WFISR27D.WF-IS-C-NSLDS-TRAN  ' )   
*S** 027T 'Satis repayment:'(NE)    
*S** 046T WFNSL27D.WF-NS-LOAN-REP  (AD=ODL CD=GR /*.01U001 A001 .       
*S**      HE='WWHELPRH',= )         
*S** 050T 'SEOG Overpmt:'(NE)       
*S** 067T WFNSL27D.WF-NS-SEOG-OVP  (AD=ODL CD=GR /*.01U001 A001 .       
*S**      HE='WWHELPRH',= )         
*S** 069T WFNSL27D.WF-NS-SEOG-OVP-CTC  (AD=ODL CD=GR /*.01U008 A008 .   
*S**      HE='WWHELPRH',= )         
*S**/       
*S** 027T 'Active bankruptcy:'(NE)  
*S** 046T WFNSL27D.WF-NS-BANKRUPT  (AD=ODL CD=GR /*.01U001 A001 .       
*S**      HE='WWHELPRH',= )         
*S** 050T 'Perkins Overpmt:'(NE)    
*S** 067T WFNSL27D.WF-NS-PERK-OVP  (AD=ODL CD=GR /*.01U001 A001 .       
*S**      HE='WWHELPRH',= )         
*S** 069T WFNSL27D.WF-NS-PERK-OVP-CTC  (AD=ODL CD=GR /*.01U008 A008 .   
*S**      HE='WWHELPRH',= )         
*S**/       
*S** 003T 'Pell LEU:'(NE)           
*S** 014T #LEU-FLAG  (AD=ODL'_' CD=GR /*.99U001 A001 .      
*S**      HE='WWHELRRH','WFNSL27D.WF-NS-C-LEU-FLAG    ' )   
*S** 016T #PELL-LEU  (AD=ODL'_' CD=GR /*.99U008 A008 .      
*S**      HE='WWHELRRH','WFNSL27D.WF-NS-C-LEU         ' )   
*S** 027T 'Converted TEACH:'(NE)    
*S** 046T WFNSL27D.WF-NS-TCH-CONV  (AD=ODL CD=GR /*.01U001 A001 .       
*S**      HE='WWHELPRH',= )         
*S** 050T 'TEACH Unsub Agg:'(NE)    
*S** 070T #TEACH-TOTAL-UG  (AD=ODL CD=GR /*.99U007 A007 .   
*S**      HE='WWHELRRH','WFNSL27D.WF-NS-TCH-TOTAL-UG  ' )   
*S**/       
*S** 003T 'Enrollment pattrn:'(NE)  
*S** 023T #ENROLLMENT  (AD=ODL'_' CD=GR /*.99U001 A001 .    
*S**      HE='WWHELRRH','WFNSL27D.WF-NS-C-ENR-PATTERN ' )   
*S** 027T 'Loan Limit EX Flag:'(NE) 
*S** 046T WFNSL27D.WF-NS-LIMIT-EXCP  (AD=ODL CD=GR /*.99U001 A001 .     
*S**      HE='WWHELRRH','WFNSL27D.WF-NS-LIMIT-EXCP    ' )   
*S** 050T 'TEACH Grad Agg:'(NE)     
*S** 070T #TEACH-TOTAL-GR  (AD=ODL CD=GR /*.99U007 A007 .   
*S**      HE='WWHELRRH','WFNSL27D.WF-NS-TCH-TOTAL-GR  ' )   
*S**/       
*S** 003T '-----------------Direct/FFEL----------------'(BL)
*S** 050T '----------Perkins----------'(BL)     
*S**/       
*S** 015T 'Limit Principal Pending'(NE)         
*S** 041T 'Total'(NE)   
*S** 050T 'Cumulative:'(NE)         
*S** 070T #PERK-TOTAL  (AD=ODL CD=GR /*.01U007 A007 .       
*S**      HE='WWHELRRH','WFNSL27D.WF-NS-PERK-TOTAL    ' )   
*S**/       
*S** 003T 'Subsidized:'(NE)         
*S** 017T WFNSL27D.WF-NS-SUB-LIMIT-UG  (AD=ODL CD=GR /*.01U001 A001 .   
*S**      HE='WWHELPRH',= )         
*S** 019T WFNSL27D.WF-NS-SUB-LIMIT-GR  (AD=ODL CD=GR /*.01U001 A001 .   
*S**      HE='WWHELPRH',= )         
*S** 022T #SUB-OUT  (AD=ODL CD=GR /*.01U007 A007 .          
*S**      HE='WWHELRRH','WFNSL27D.WF-NS-SUB-OUT       ' )   
*S** 031T #SUB-PEND  (AD=ODL CD=GR /*.01U007 A007 .         
*S**      HE='WWHELRRH','WFNSL27D.WF-NS-SUB-PEND      ' )   
*S** 040T #SUB-TOTAL  (AD=ODL CD=GR /*.01U007 A007 .        
*S**      HE='WWHELRRH','WFNSL27D.WF-NS-SUB-TOTAL     ' )   
*S** 050T 'Current year:'(NE)       
*S** 070T #PERK-CUR  (AD=ODL CD=GR /*.01U007 A007 .         
*S**      HE='WWHELRRH','WFNSL27D.WF-NS-PERK-CUR      ' )   
*S**/       
*S** 003T 'Unsubsidized:'(NE)       
*S** 022T #UNS-OUT  (AD=ODL CD=GR /*.01U007 A007 .          
*S**      HE='WWHELRRH','WFNSL27D.WF-NS-UNS-OUT       ' )   
*S** 031T #UNS-PEND  (AD=ODL CD=GR /*.01U007 A007 .         
*S**      HE='WWHELRRH','WFNSL27D.WF-NS-UNS-PEND      ' )   
*S** 040T #UNS-TOTAL  (AD=ODL CD=GR /*.01U007 A007 .        
*S**      HE='WWHELRRH','WFNSL27D.WF-NS-UNS-TOTAL     ' )   
*S**/       
*S** 003T 'Combined:'(NE)           
*S** 017T WFNSL27D.WF-NS-CMB-LIMIT-UG  (AD=ODL CD=GR /*.01U001 A001 .   
*S**      HE='WWHELPRH',= )         
*S** 019T WFNSL27D.WF-NS-CMB-LIMIT-GR  (AD=ODL CD=GR /*.01U001 A001 .   
*S**      HE='WWHELPRH',= )         
*S** 022T #CMB-OUT  (AD=ODL CD=GR /*.01U007 A007 .          
*S**      HE='WWHELRRH','WFNSL27D.WF-NS-CMB-OUT       ' )   
*S** 031T #CMB-PEND  (AD=ODL CD=GR /*.01U007 A007 .         
*S**      HE='WWHELRRH','WFNSL27D.WF-NS-CMB-PEND      ' )   
*S** 040T #CMB-TOTAL  (AD=ODL CD=GR /*.01U007 A007 .        
*S**      HE='WWHELRRH','WFNSL27D.WF-NS-CMB-TOTAL     ' )   
*S** 050T 'Pell paymts:'(YE)        
*S** 064T #TAB-PELL  (AD=AN'_' ) /*.99U001 A001 .           
*S** 066T #CNT-PELL  (AD=ODL CD=GR /*.01U002 A002 .         
*S**      HE='WWHELRRH','WWSYSVRD.WF-PGM-NSLDS-CNT    ' )   
*S** 069T 'Addnl:'(NE)  
*S** 076T WFNSL27D.WF-NS-PELL-ADTNL  (AD=ODL CD=GR /*.01U001 A001 .     
*S**      HE='WWHELPRH',= )         
*S**/       
*S** 003T 'Consolidated:'(NE)       
*S** 022T #CON-OUT  (AD=ODL CD=GR /*.01U007 A007 .          
*S**      HE='WWHELRRH','WFNSL27D.WF-NS-CON-OUT       ' )   
*S** 040T #CON-TOTAL  (AD=ODL CD=GR /*.01U007 A007 .        
*S**      HE='WWHELRRH','WFNSL27D.WF-NS-CON-TOTAL     ' )   
*S** 050T 'TEACH paymts:'(YE)       
*S** 064T #TAB-TCH  (AD=AN'_' ) /*.99U001 A001 .
*S** 066T #CNT-TCH  (AD=ODL CD=GR /*.01U002 A002 .          
*S**      HE='WWHELRRH','WWSYSVRD.WF-PGM-NSLDS-CNT    ' )   
*S** 069T 'Addnl:'(NE)  
*S** 076T WFNSL27D.WF-NS-TCH-ADTNL  (AD=ODL CD=GR /*.01U001 A001 .      
*S**      HE='WWHELPRH',= )         
*S**/       
*S** 003T 'Convrtd TEACH:'(NE)      
*S** 022T #TCH-OUT  (AD=ODL CD=GR /*.01U007 A007 .          
*S**      HE='WWHELRRH','WFNSL27D.WF-NS-TCH-OUT       ' )   
*S** 040T #TCH-TOTAL  (AD=ODL CD=GR /*.01U007 A007 .        
*S**      HE='WWHELRRH','WFNSL27D.WF-NS-TCH-TOTAL     ' )   
*S** 050T 'Loan detail:'(YE)        
*S** 064T #TAB-LOAN  (AD=AN'_' ) /*.99U001 A001 .           
*S** 066T #CNT-LOAN  (AD=ODL CD=GR /*.01U002 A002 .         
*S**      HE='WWHELRRH','WWSYSVRD.WF-PGM-NSLDS-CNT    ' )   
*S** 069T 'Addnl:'(NE)  
*S** 076T WFNSL27D.WF-NS-LOAN-ADTNL  (AD=ODL CD=GR /*.01U001 A001 .     
*S**      HE='WWHELPRH',= )         
*S**/       
*S** 003T 'DL Sub Usage Per:'(NE)   
*S** 024T WFNSL27D.WF-NS-C-SUB-LE-FLAG  (AD=LDO' ' CD=GR /*.01D001 A001 .           
*S**      HE='WWHELPRH',= )         
*S** 027T #SUB-USAGE-PD  (AD=ODL' ' CD=GR /*.01U007 A007 .  
*S**      HE='WWHELRRH','WFNSL27D.WF-NS-C-SUB-USAGE-PD' )   
*S**/       
*S** 003T 'Direct MPN:'(NE)         
*S** 015T WFNSL27D.WF-NS-DL-MPN  (AD=ODL CD=GR /*.01U001 A001 .         
*S**      HE='WWHELPRH',= )         
*S** 018T 'PLUS:'(NE)   
*S** 024T WFNSL27D.WF-NS-DLP-MPN  (AD=ODL CD=GR /*.01U001 A001 .        
*S**      HE='WWHELPRH',= )         
*S** 027T 'GradPLUS:'(NE)           
*S** 037T WFNSL27D.WF-NS-DLG-MPN  (AD=ODL CD=GR /*.01U001 A001 .        
*S**      HE='WWHELPRH',= )         
*S*** MAP2: VALIDATION *****************************************************        
*S*** MAP2: END OF MAP *****************************************************        
*S**END     
