*H**ANAT8304202605131314296LINUX                            4CAUC     04.2          
*C**                                FATEMP  WF27FEBD                        P S   NN0000        
*D01NAT8304P FATEMP  WF27FEBD                        ZWDNH   ZWDNH           S      
*D02            2024040117345102024040117345100000047094    
*D03LINUX   
*D04                 ISO_8859-1:1987
*S****C           0   ***********************************************************************   
*S****C           0   * 
*S****C           0   *         WolffPack, Inc. 
*S****C           0   *                                            Copyright 1995 - 2026        
*S****C           0   * LDA:    WF27FEBD                              WolffPack, Inc.           
*S****C           0   * System: FINANCIER                           All rights reserved.        
*S****C           0   * 
*S****C           0   *   Note: Module copied from WF27FEDD, modified to allow for additional   
*S****C           0   *           fields and increased fields mid 2026-2027 processing year.    
*S****C           0   * 
*S****C           0   ***********************************************************************   
*S****DS          0         1WF27FEBD                        /* Object Name         
*S****C           0   * 
*S****C           0   * Transaction Identification:         
*S****C           0   *   FAFSA Identification UUID, Transaction UUID, Application and          
*S****C           0   *   Transaction Data Sources, Model, Transaction Dates, etc.  
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-C-BATCH-YR                /*         
*S****DK          0   A  36 2WF-FE-FAFSA-UUID                /*         
*S****DK          0   A  36 2WF-FE-TRANS-UUID                /*         
*S****DK          0   A  36 2WF-FE-PERSON-UUID               /*         
*S****DK          0   A   2 2WF-FE-C-TRANS-NO                /*         
*S****DK          0   A   1 2WF-FE-C-DEP-MODEL               /*         
*S****DK          0   A   1 2WF-FE-C-APP-SRCE                /*         
*S****DK          0   A   8 2WF-FE-C-APP-RCPT-DATE           /*         
*S****DK          0   A   1 2WF-FE-C-TRAN-SRCE               /*         
*S****DK          0   A   1 2WF-FE-C-TRAN-TYPE               /*         
*S****DK          0   A   1 2WF-FE-C-TRAN-LANG               /*         
*S****DK          0   A   8 2WF-FE-C-TRAN-RCPT-DATE          /*         
*S****DK          0   A   8 2WF-FE-C-TRAN-PROC-DATE          /*         
*S****DK          0   A  30 2WF-FE-C-TRAN-STATUS             /*         
*S****DK          0   A   3 2WF-FE-C-RENEWAL-DATA-USED       /*         
*S****DK          0   A   1 2WF-FE-C-FPS-CORR-RSN            /*         
*S****DK          0   A   1 2WF-FE-C-SAI-CHG-FLAG            /*         
*S****DK          0   A   6 2WF-FE-C-SAI                     /*         
*S****DK          0   A   6 2WF-FE-C-SAI-PROV                /*         
*S****DK          0   A   1 2WF-FE-C-SAI-FORMULA             /*         
*S****DK          0   A   2 2WF-FE-C-SAI-COMP-TYPE           /*         
*S****DK          0   A   1 2WF-FE-C-MAX-PELL-IND            /*         
*S****DK          0   A   1 2WF-FE-C-MIN-PELL-IND            /*         
*S****DK          0   A   1 2WF-FE-ISIR-VERSION-FLAG         /*         
*S****DK          0   A  49 2WF-FE-FILLER1                   /*         
*S****C           0   * 
*S****C           0   * Student Demographic, Identity, and Contact Information      
*S****C           0   * 
*S****DK          0   A  35 2WF-FE-NM-FIRST                  /*         
*S****DK          0   A  15 2WF-FE-NM-MIDDLE                 /*         
*S****DK          0   A  35 2WF-FE-NM-LAST                   /*         
*S****DK          0   A  10 2WF-FE-NM-SUFFIX                 /*         
*S****DK          0   A   8 2WF-FE-DOB                       /*         
*S****DK          0   A   9 2WF-FE-SSN                       /*         
*S****DK          0   A   9 2WF-FE-S-ITIN                    /*         
*S****DK          0   A  10 2WF-FE-AD-PHONE                  /*         
*S****DK          0   A  50 2WF-FE-EMAIL                     /*         
*S****DK          0   A  40 2WF-FE-AD-STRT                   /*         
*S****DK          0   A  30 2WF-FE-AD-CITY                   /*         
*S****DK          0   A   2 2WF-FE-AD-STATE                  /*         
*S****DK          0   A  10 2WF-FE-AD-ZIP                    /*         
*S****DK          0   A   2 2WF-FE-AD-COUNTRY                /*         
*S****DK          0   A  50 2WF-FE-FILLER2                   /*         
*S****C           0   * 
*S****C           0   * Student Non-Financial Information (Dependency, Marital Status, etc.)    
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-S-MAR                     /*         
*S****DK          0   A   1 2WF-FE-S-YR-COL                  /*         
*S****DK          0   A   1 2WF-FE-S-BACH-DEG                /*         
*S****DK          0   A   1 2WF-FE-S-TCH-CERT                /*         
*S****DK          0   A   1 2WF-FE-S-TEST-ACTV               /*         
*S****DK          0   A   1 2WF-FE-S-TEST-VET                /*         
*S****DK          0   A   1 2WF-FE-S-TEST-DEP                /*         
*S****DK          0   A   1 2WF-FE-S-TEST-PAR-DECD           /*         
*S****DK          0   A   1 2WF-FE-S-TEST-WARD               /*         
*S****DK          0   A   1 2WF-FE-S-TEST-FOST               /*         
*S****DK          0   A   1 2WF-FE-S-TEST-EMAN               /*         
*S****DK          0   A   1 2WF-FE-S-TEST-GUAR               /*         
*S****DK          0   A   1 2WF-FE-S-TEST-PERS-NO            /*         
*S****DK          0   A   1 2WF-FE-S-TEST-UYSS               /*         
*S****DK          0   A   1 2WF-FE-S-TEST-UGEN               /*         
*S****DK          0   A   1 2WF-FE-S-TEST-UHS                /*         
*S****DK          0   A   1 2WF-FE-S-TEST-UTRIO              /*         
*S****DK          0   A   1 2WF-FE-S-TEST-UFAA               /*         
*S****DK          0   A   1 2WF-FE-S-TEST-UOTHER-NO          /*         
*S****DK          0   A   1 2WF-FE-S-TEST-UN-CIRC            /*         
*S****DK          0   A   1 2WF-FE-S-TEST-UNSUB              /*         
*S****DK          0   A   2 2WF-FE-S-FAM-SIZE                /*         
*S****DK          0   A   2 2WF-FE-S-FAM-COL                 /*         
*S****C           0   * 
*S****C           0   * Student Demographic Information     
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-S-CIT                     /*         
*S****DK          0   A   9 2WF-FE-S-ALIEN                   /*         
*S****DK          0   A   2 2WF-FE-S-RES                     /*         
*S****DK          0   A   6 2WF-FE-S-RES-DATE                /*         
*S****DK          0   A   1 2WF-FE-S-PARS-COLG               /*         
*S****DK          0   A   1 2WF-FE-S-PARS-KDUTY              /*         
*S****DK          0   A   1 2WF-FE-S-HS-GED                  /*         
*S****DK          0   A  60 2WF-FE-S-HS-NAME                 /*         
*S****DK          0   A  28 2WF-FE-S-HS-CITY                 /*         
*S****DK          0   A   2 2WF-FE-S-HS-STATE                /*         
*S****DK          0   A   1 2WF-FE-S-HSE-NAME                /*         
*S****DK          0   A   2 2WF-FE-S-HSE-STATE               /*         
*S****C           0   * 
*S****C           0   * Student Manually Entered Financial  
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-S-MT-EITC                 /*         
*S****DK          0   A   1 2WF-FE-S-MT-HOME                 /*         
*S****DK          0   A   1 2WF-FE-S-MT-LUNCH                /*         
*S****DK          0   A   1 2WF-FE-S-MT-MEDC                 /*         
*S****DK          0   A   1 2WF-FE-S-MT-36B                  /*         
*S****DK          0   A   1 2WF-FE-S-MT-SNAP                 /*         
*S****DK          0   A   1 2WF-FE-S-MT-SSI                  /*         
*S****DK          0   A   1 2WF-FE-S-MT-TANF                 /*         
*S****DK          0   A   1 2WF-FE-S-MT-WIC                  /*         
*S****DK          0   A   1 2WF-FE-S-MT-NONE                 /*         
*S****DK          0   A   1 2WF-FE-S-1040R                   /*         
*S****DK          0   A   1 2WF-FE-S-NON-US                  /*         
*S****DK          0   A   1 2WF-FE-S-JOINT                   /*         
*S****DK          0   A   1 2WF-FE-S-FILE-STAT               /*         
*S****DK          0   A  11 2WF-FE-S-INC                     /*         
*S****DK          0   A  11 2WF-FE-S-U-INT                   /*         
*S****DK          0   A  11 2WF-FE-S-U-DST-IRA               /*         
*S****DK          0   A  11 2WF-FE-S-U-ROLL-IRA              /*         
*S****DK          0   A  11 2WF-FE-S-U-DST-PEN               /*         
*S****DK          0   A  11 2WF-FE-S-U-ROLL-PEN              /*         
*S****DK          0   A  10 2WF-FE-S-AGI                     /*         
*S****DK          0   A   9 2WF-FE-S-FED-TAX                 /*         
*S****DK          0   A   1 2WF-FE-S-TAX-CREDIT              /*         
*S****DK          0   A  11 2WF-FE-S-DED-PAY                 /*         
*S****DK          0   A   9 2WF-FE-S-EDCR                    /*         
*S****DK          0   A   1 2WF-FE-S-ABD-EFH                 /*         
*S****DK          0   A  12 2WF-FE-S-SCHEDC-AMT              /*         
*S****DK          0   A   7 2WF-FE-S-GRNT                    /*         
*S****DK          0   A  10 2WF-FE-S-FGN-INC-EXC             /*         
*S****DK          0   A   7 2WF-FE-S-U-CSUP                  /*         
*S****DK          0   A   7 2WF-FE-S-CASH                    /*         
*S****DK          0   A   7 2WF-FE-S-INV                     /*         
*S****DK          0   A   7 2WF-FE-S-BUS-FRM                 /*         
*S****C           0   * 
*S****C           0   * Student School Choices, Consent, and Signature  
*S****C           0   * 
*S****DK          0   A   6 2WF-FE-A-COL1                    /*         
*S****DK          0   A   6 2WF-FE-A-COL2                    /*         
*S****DK          0   A   6 2WF-FE-A-COL3                    /*         
*S****DK          0   A   6 2WF-FE-A-COL4                    /*         
*S****DK          0   A   6 2WF-FE-A-COL5                    /*         
*S****DK          0   A   6 2WF-FE-A-COL6                    /*         
*S****DK          0   A   6 2WF-FE-A-COL7                    /*         
*S****DK          0   A   6 2WF-FE-A-COL8                    /*         
*S****DK          0   A   6 2WF-FE-A-COL9                    /*         
*S****DK          0   A   6 2WF-FE-A-COL10                   /*         
*S****DK          0   A   6 2WF-FE-A-COL11                   /*         
*S****DK          0   A   6 2WF-FE-A-COL12                   /*         
*S****DK          0   A   6 2WF-FE-A-COL13                   /*         
*S****DK          0   A   6 2WF-FE-A-COL14                   /*         
*S****DK          0   A   6 2WF-FE-A-COL15                   /*         
*S****DK          0   A   6 2WF-FE-A-COL16                   /*         
*S****DK          0   A   6 2WF-FE-A-COL17                   /*         
*S****DK          0   A   6 2WF-FE-A-COL18                   /*         
*S****DK          0   A   6 2WF-FE-A-COL19                   /*         
*S****DK          0   A   6 2WF-FE-A-COL20                   /*         
*S****DK          0   A   1 2WF-FE-S-CONSENT                 /*         
*S****DK          0   A   1 2WF-FE-S-SGN                     /*         
*S****DK          0   A   8 2WF-FE-S-SGN-DATE                /*         
*S****DK          0   A  50 2WW-FILLER-3                     /*         
*S****C           0   * 
*S****C           0   * Student Spouse Demographic, Identity, and Contact Information           
*S****C           0   * 
*S****DK          0   A  35 2WF-FE-SP-NM-FIRST               /*         
*S****DK          0   A  15 2WF-FE-SP-NM-MIDDLE              /*         
*S****DK          0   A  35 2WF-FE-SP-NM-LAST                /*         
*S****DK          0   A  10 2WF-FE-SP-SUFFIX                 /*         
*S****DK          0   A   8 2WF-FE-SP-DOB                    /*         
*S****DK          0   A   9 2WF-FE-SP-SSN                    /*         
*S****DK          0   A   9 2WF-FE-SP-ITIN                   /*         
*S****DK          0   A  10 2WF-FE-SP-PHONE                  /*         
*S****DK          0   A  50 2WF-FE-SP-EMAIL                  /*         
*S****DK          0   A  40 2WF-FE-SP-AD-STRT                /*         
*S****DK          0   A  30 2WF-FE-SP-AD-CITY                /*         
*S****DK          0   A   2 2WF-FE-SP-AD-STATE               /*         
*S****DK          0   A  10 2WF-FE-SP-AD-ZIP                 /*         
*S****DK          0   A   2 2WF-FE-SP-AD-COUNTRY             /*         
*S****C           0   * 
*S****C           0   * Student Spouse Manually Entered Financial Information, Consent, and Sign
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-SP-1040R                  /*         
*S****DK          0   A   1 2WF-FE-SP-NON-US                 /*         
*S****DK          0   A   1 2WF-FE-SP-FILE-STAT              /*         
*S****DK          0   A  11 2WF-FE-SP-INC                    /*         
*S****DK          0   A  11 2WF-FE-SP-U-INT                  /*         
*S****DK          0   A  11 2WF-FE-SP-U-DST-IRA              /*         
*S****DK          0   A  11 2WF-FE-SP-U-ROLL-IRA             /*         
*S****DK          0   A  11 2WF-FE-SP-U-DST-PEN              /*         
*S****DK          0   A  11 2WF-FE-SP-U-ROLL-PEN             /*         
*S****DK          0   A  10 2WF-FE-SP-AGI                    /*         
*S****DK          0   A   9 2WF-FE-SP-FED-TAX                /*         
*S****DK          0   A  11 2WF-FE-SP-DED-PAY                /*         
*S****DK          0   A   9 2WF-FE-SP-EDCR                   /*         
*S****DK          0   A   1 2WF-FE-SP-ABD-EFH                /*         
*S****DK          0   A  12 2WF-FE-SP-SCHEDC-AMT             /*         
*S****DK          0   A  10 2WF-FE-SP-FGN-INC-EXC            /*         
*S****DK          0   A   1 2WF-FE-SP-CONSENT                /*         
*S****DK          0   A   1 2WF-FE-SP-SGN                    /*         
*S****DK          0   A   8 2WF-FE-SP-SGN-DATE               /*         
*S****DK          0   A  50 2WW-FILLER-4                     /*         
*S****C           0   * 
*S****C           0   * Parent Demographic, Identity, and Contact Information       
*S****C           0   * 
*S****DK          0   A  35 2WF-FE-P1-FIRST                  /*         
*S****DK          0   A  15 2WF-FE-P1-MIDDLE                 /*         
*S****DK          0   A  35 2WF-FE-P1-LAST                   /*         
*S****DK          0   A  10 2WF-FE-P1-SUFFIX                 /*         
*S****DK          0   A   8 2WF-FE-P1-DOB                    /*         
*S****DK          0   A   9 2WF-FE-P1-SSN                    /*         
*S****DK          0   A   9 2WF-FE-P1-ITIN                   /*         
*S****DK          0   A  10 2WF-FE-P1-PHONE                  /*         
*S****DK          0   A  50 2WF-FE-P1-EMAIL                  /*         
*S****DK          0   A  40 2WF-FE-P1-AD-STRT                /*         
*S****DK          0   A  30 2WF-FE-P1-AD-CITY                /*         
*S****DK          0   A   2 2WF-FE-P1-AD-STATE               /*         
*S****DK          0   A  10 2WF-FE-P1-AD-ZIP                 /*         
*S****DK          0   A   2 2WF-FE-P1-AD-COUNTRY             /*         
*S****C           0   * 
*S****C           0   * Parent Non-Financial Information    
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-P1-MAR                    /*         
*S****DK          0   A   2 2WF-FE-P1-RES                    /*         
*S****DK          0   A   6 2WF-FE-P1-RES-DATE               /*         
*S****DK          0   A   2 2WF-FE-P1-FAM-SIZE               /*         
*S****DK          0   A   2 2WF-FE-P1-FAM-COL                /*         
*S****C           0   * 
*S****C           0   * Parent Manually Entered Financial Information, Consent, and Signature   
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-P1-EITC                   /*         
*S****DK          0   A   1 2WF-FE-P1-MT-HOME                /*         
*S****DK          0   A   1 2WF-FE-P1-MT-LUNCH               /*         
*S****DK          0   A   1 2WF-FE-P1-MT-MEDC                /*         
*S****DK          0   A   1 2WF-FE-P1-MT-36B                 /*         
*S****DK          0   A   1 2WF-FE-P1-MT-SNAP                /*         
*S****DK          0   A   1 2WF-FE-P1-MT-SSI                 /*         
*S****DK          0   A   1 2WF-FE-P1-MT-TANF                /*         
*S****DK          0   A   1 2WF-FE-P1-MT-WIC                 /*         
*S****DK          0   A   1 2WF-FE-P1-MT-NONE                /*         
*S****DK          0   A   1 2WF-FE-P1-1040R                  /*         
*S****DK          0   A   1 2WF-FE-P1-NON-US                 /*         
*S****DK          0   A   1 2WF-FE-P1-JOINT                  /*         
*S****DK          0   A   1 2WF-FE-P1-FILE-STAT              /*         
*S****DK          0   A  11 2WF-FE-P1-INC                    /*         
*S****DK          0   A  11 2WF-FE-P1-U-INT                  /*         
*S****DK          0   A  11 2WF-FE-P1-U-DST-IRA              /*         
*S****DK          0   A  11 2WF-FE-P1-U-ROLL-IRA             /*         
*S****DK          0   A  11 2WF-FE-P1-U-DST-PEN              /*         
*S****DK          0   A  11 2WF-FE-P1-U-ROLL-PEN             /*         
*S****DK          0   A  10 2WF-FE-P1-AGI                    /*         
*S****DK          0   A   9 2WF-FE-P1-FED-TAX                /*         
*S****DK          0   A   1 2WF-FE-P1-TAX-CREDIT             /*         
*S****DK          0   A  11 2WF-FE-P1-DED-PAY                /*         
*S****DK          0   A   9 2WF-FE-P1-EDCR                   /*         
*S****DK          0   A   1 2WF-FE-P1-ABD-EFH                /*         
*S****DK          0   A  12 2WF-FE-P1-SCHEDC-AMT             /*         
*S****DK          0   A   7 2WF-FE-P1-A-GRANT                /*         
*S****DK          0   A  10 2WF-FE-P1-FGN-INC-EXC            /*         
*S****DK          0   A   7 2WF-FE-P1-U-CSUP                 /*         
*S****DK          0   A   7 2WF-FE-P1-CASH                   /*         
*S****DK          0   A   7 2WF-FE-P1-INV                    /*         
*S****DK          0   A   7 2WF-FE-P1-BUS-FRM                /*         
*S****DK          0   A   1 2WF-FE-P1-CONSENT                /*         
*S****DK          0   A   1 2WF-FE-P1-SGN                    /*         
*S****DK          0   A   8 2WF-FE-P1-SGN-DATE               /*         
*S****DK          0   A  50 2WW-FILLER-5                     /*         
*S****C           0   * 
*S****C           0   * Parent Spouse or Partner Demographic, Identity, and Contact Information 
*S****C           0   * 
*S****DK          0   A  35 2WF-FE-P2-NM-FIRST               /*         
*S****DK          0   A  15 2WF-FE-P2-NM-MIDDLE              /*         
*S****DK          0   A  35 2WF-FE-P2-NM-LAST                /*         
*S****DK          0   A  10 2WF-FE-P2-SUFFIX                 /*         
*S****DK          0   A   8 2WF-FE-P2-DOB                    /*         
*S****DK          0   A   9 2WF-FE-P2-SSN                    /*         
*S****DK          0   A   9 2WF-FE-P2-ITIN                   /*         
*S****DK          0   A  10 2WF-FE-P2-PHONE                  /*         
*S****DK          0   A  50 2WF-FE-P2-EMAIL                  /*         
*S****DK          0   A  40 2WF-FE-P2-AD-STRT                /*         
*S****DK          0   A  30 2WF-FE-P2-AD-CITY                /*         
*S****DK          0   A   2 2WF-FE-P2-AD-STATE               /*         
*S****DK          0   A  10 2WF-FE-P2-AD-ZIP                 /*         
*S****DK          0   A   2 2WF-FE-P2-AD-COUNTRY             /*         
*S****C           0   * 
*S****C           0   * Parent Spouse or Partner Manually Entered Financial Information, Consent
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-P2-1040R                  /*         
*S****DK          0   A   1 2WF-FE-P2-NON-US                 /*         
*S****DK          0   A   1 2WF-FE-P2-FILE-STAT              /*         
*S****DK          0   A  11 2WF-FE-P2-INC                    /*         
*S****DK          0   A  11 2WF-FE-P2-U-INT                  /*         
*S****DK          0   A  11 2WF-FE-P2-U-DST-IRA              /*         
*S****DK          0   A  11 2WF-FE-P2-U-ROLL-IRA             /*         
*S****DK          0   A  11 2WF-FE-P2-U-DST-PEN              /*         
*S****DK          0   A  11 2WF-FE-P2-U-ROLL-PEN             /*         
*S****DK          0   A  10 2WF-FE-P2-AGI                    /*         
*S****DK          0   A   9 2WF-FE-P2-FED-TAX                /*         
*S****DK          0   A  11 2WF-FE-P2-DED-PAY                /*         
*S****DK          0   A   9 2WF-FE-P2-EDCR                   /*         
*S****DK          0   A   1 2WF-FE-P2-ABD-EFH                /*         
*S****DK          0   A  12 2WF-FE-P2-SCHEDC-AMT             /*         
*S****DK          0   A  10 2WF-FE-P2-FGN-INC-EXC            /*         
*S****DK          0   A   1 2WF-FE-P2-CONSENT                /*         
*S****DK          0   A   1 2WF-FE-P2-SGN                    /*         
*S****DK          0   A   8 2WF-FE-P2-SGN-DATE               /*         
*S****DK          0   A  50 2WW-FILLER-6                     /*         
*S****C           0   * 
*S****C           0   * Preparer Information    
*S****C           0   *  Indicates that a preparer filled out the application and provided their
*S****C           0   * 
*S****DK          0   A  35 2WF-FE-A-PREP-FIRST              /*         
*S****DK          0   A  35 2WF-FE-A-PREP-LAST               /*         
*S****DK          0   A   9 2WF-FE-A-PREP-SSN                /*         
*S****DK          0   A   9 2WF-FE-A-PREP-EIN                /*         
*S****DK          0   A  30 2WF-FE-A-PREP-AFFL               /*         
*S****DK          0   A  40 2WF-FE-A-PREP-STRT               /*         
*S****DK          0   A  30 2WF-FE-A-PREP-CITY               /*         
*S****DK          0   A   2 2WF-FE-A-PREP-STATE              /*         
*S****DK          0   A  10 2WF-FE-A-PREP-ZIP                /*         
*S****DK          0   A   1 2WF-FE-A-PREP-SGN                /*         
*S****DK          0   A   8 2WF-FE-A-PREP-SGN-DT             /*         
*S****DK          0   A  50 2WW-FILLER-7                     /*         
*S****C           0   * 
*S****C           0   *  FPS Processing Information         
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-S-AFFIRM                  /*         
*S****DK          0   A   1 2WF-FE-SP-AFFIRM                 /*         
*S****DK          0   A   1 2WF-FE-P1-AFFIRM                 /*         
*S****DK          0   A   1 2WF-FE-P2-AFFIRM                 /*         
*S****DK          0   A   8 2WF-FE-S-CNST-DATE               /*         
*S****DK          0   A   8 2WF-FE-SP-CNST-DATE              /*         
*S****DK          0   A   8 2WF-FE-P1-CNST-DATE              /*         
*S****DK          0   A   8 2WF-FE-P2-CNST-DATE              /*         
*S****DK          0   A   1 2WF-FE-S-TRANU-MATCH             /*         
*S****DK          0   A   1 2WF-FE-SP-TRANU-MATCH            /*         
*S****DK          0   A   1 2WF-FE-P1-TRANU-MATCH            /*         
*S****DK          0   A   1 2WF-FE-P2-TRANU-MATCH            /*         
*S****DK          0   A   2 2WF-FE-C-COR-TRAN                /*         
*S****DK          0   A   1 2WF-FE-F-PROF-JUDG               /*         
*S****DK          0   A   1 2WF-FE-F-DEP-OVR                 /*         
*S****DK          0   A   6 2WF-FE-F-COLLEGE                 /*         
*S****DK          0   A   1 2WF-FE-F-SIGN                    /*         
*S****DK          0   A   1 2WF-FE-F-IASG                    /*         
*S****DK          0   A   1 2WF-FE-C-CHILD-HERO              /*         
*S****DK          0   A   7 2WF-FE-C-ETI-DEST                /*         
*S****DK          0   A   1 2WF-FE-S-SGN-SRC                 /*         
*S****DK          0   A   1 2WF-FE-SP-SGN-SRC                /*         
*S****DK          0   A   1 2WF-FE-P1-SGN-SRC                /*         
*S****DK          0   A   1 2WF-FE-P2-SGN-SRC                /*         
*S****DK          0   A   1 2WF-FE-SPEC-HAND                 /*         
*S****DK          0   A   1 2WF-FE-C-ADDR-CHG                /*         
*S****DK          0   A   1 2WF-FE-C-PUSHED                  /*         
*S****DK          0   A   1 2WF-FE-C-REJ-CHG                 /*         
*S****DK          0   A   2 2WF-FE-C-VER-TRACK               /*         
*S****DK          0   A   1 2WF-FE-C-VER                     /*         
*S****DK          0   A   1 2WF-FE-INCARCERATED              /*         
*S****DK          0   A   2 2WF-FE-C-NSLDS-TRAN              /*         
*S****DK          0   A   1 2WF-FE-C-VER-NSL                 /*         
*S****DK          0   A   1 2WF-FE-C-MATCH-HS                /*         
*S****DK          0   A  12 2WF-FE-S-FWS                     /*         
*S****DK          0   A  12 2WF-FE-SP-FWS                    /*         
*S****DK          0   A  12 2WF-FE-P1-FWS                    /*         
*S****DK          0   A  12 2WF-FE-P2-FWS                    /*         
*S****DK          0   A 240 2WW-FILLER-8                     /*         
*S****DK          0   A   7 2WF-FE-P1-FC1-DNW                /*         
*S****DK          0   A   7 2WF-FE-P1-FC1-NW                 /*         
*S****DK          0   A  12 2WF-FE-P1-FC1-APA                /*         
*S****DK          0   A  12 2WF-FE-P1-FC1-CA                 /*         
*S****DK          0   A   7 2WF-FE-S-FC1-NW                  /*         
*S****DK          0   A  12 2WF-FE-S-FC1-APA                 /*         
*S****DK          0   A  12 2WF-FE-S-FC1-CA                  /*         
*S****DK          0   A   3 2WF-FE-CAS-FAM-SIZE              /*         
*S****DK          0   A   3 2WF-FE-CAP-FAM-SIZE              /*         
*S****C           0   * 
*S****C           0   *  Correction, Highlight, and Verify Flags        
*S****C           0   * 
*S****DK          0   A   3 2WF-FE-CF-S-NM-FIRST             /*         
*S****DK          0   A   3 2WF-FE-CF-S-NM-MIDDLE            /*         
*S****DK          0   A   3 2WF-FE-CF-S-NM-LAST              /*         
*S****DK          0   A   3 2WF-FE-CF-S-SUFFIX               /*         
*S****DK          0   A   3 2WF-FE-CF-S-DOB                  /*         
*S****DK          0   A   3 2WF-FE-CF-S-SSN                  /*         
*S****DK          0   A   3 2WF-FE-CF-S-ITIN                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-AD-PHONE             /*         
*S****DK          0   A   3 2WF-FE-CF-S-EMAIL                /*         
*S****DK          0   A   3 2WF-FE-CF-S-AD-STRT              /*         
*S****DK          0   A   3 2WF-FE-CF-S-AD-CITY              /*         
*S****DK          0   A   3 2WF-FE-CF-S-AD-STATE             /*         
*S****DK          0   A   3 2WF-FE-CF-S-AD-ZIP               /*         
*S****DK          0   A   3 2WF-FE-CF-S-AD-COUNTRY           /*         
*S****DK          0   A   3 2WF-FE-CF-S-MAR                  /*         
*S****DK          0   A   3 2WF-FE-CF-S-YR-COL               /*         
*S****DK          0   A   3 2WF-FE-CF-S-BACH-DEG             /*         
*S****DK          0   A   3 2WF-FE-CF-S-TCH-CERT             /*         
*S****DK          0   A   3 2WF-FE-CF-S-ACTV                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-VET                  /*         
*S****DK          0   A   3 2WF-FE-CF-S-DEP                  /*         
*S****DK          0   A   3 2WF-FE-CF-S-PAR-DCSD             /*         
*S****DK          0   A   3 2WF-FE-CF-S-WARD                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-FOST                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-EMAN                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-GUAR                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-PERS-NO              /*         
*S****DK          0   A   3 2WF-FE-CF-S-UYSS                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-UGEN                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-UHS                  /*         
*S****DK          0   A   3 2WF-FE-CF-S-UTRIO                /*         
*S****DK          0   A   3 2WF-FE-CF-S-UFAA                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-UOTHER-NO            /*         
*S****DK          0   A   3 2WF-FE-CF-S-UN-CIRC              /*         
*S****DK          0   A   3 2WF-FE-CF-S-UNSUB                /*         
*S****DK          0   A   3 2WF-FE-CF-S-FAM-SIZE             /*         
*S****DK          0   A   3 2WF-FE-CF-S-FAM-COL              /*         
*S****DK          0   A   3 2WF-FE-CF-S-CIT                  /*         
*S****DK          0   A   3 2WF-FE-CF-S-ALIEN                /*         
*S****DK          0   A   3 2WF-FE-CF-S-RES                  /*         
*S****DK          0   A   3 2WF-FE-CF-S-RES-DATE             /*         
*S****DK          0   A   3 2WF-FE-CF-S-PARS-COLG            /*         
*S****DK          0   A   3 2WF-FE-CF-S-PARS-KDUTY           /*         
*S****DK          0   A   3 2WF-FE-CF-S-GED                  /*         
*S****DK          0   A   3 2WF-FE-CF-S-HS-NAME              /*         
*S****DK          0   A   3 2WF-FE-CF-S-HS-CITY              /*         
*S****DK          0   A   3 2WF-FE-CF-S-HS-STATE             /*         
*S****DK          0   A   3 2WF-FE-CF-S-HSE-NAME             /*         
*S****DK          0   A   3 2WF-FE-CF-S-HSE-STATE            /*         
*S****DK          0   A   3 2WF-FE-CF-S-EITC                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-HOME                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-LUNCH                /*         
*S****DK          0   A   3 2WF-FE-CF-S-MEDC                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-36B                  /*         
*S****DK          0   A   3 2WF-FE-CF-S-SNAP                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-SSI                  /*         
*S****DK          0   A   3 2WF-FE-CF-S-TANF                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-WIC                  /*         
*S****DK          0   A   3 2WF-FE-CF-S-NONE                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-1040R                /*         
*S****DK          0   A   3 2WF-FE-CF-S-NON-US               /*         
*S****DK          0   A   3 2WF-FE-CF-S-JOINT                /*         
*S****DK          0   A   3 2WF-FE-CF-S-FILE-STAT            /*         
*S****DK          0   A   3 2WF-FE-CF-S-INC                  /*         
*S****DK          0   A   3 2WF-FE-CF-S-U-INT                /*         
*S****DK          0   A   3 2WF-FE-CF-S-U-DST-IRA            /*         
*S****DK          0   A   3 2WF-FE-CF-S-U-ROLL-IRA           /*         
*S****DK          0   A   3 2WF-FE-CF-S-U-DST-PEN            /*         
*S****DK          0   A   3 2WF-FE-CF-S-U-ROLL-PEN           /*         
*S****DK          0   A   3 2WF-FE-CF-S-AGI                  /*         
*S****DK          0   A   3 2WF-FE-CF-S-FED-TAX              /*         
*S****DK          0   A   3 2WF-FE-CF-S-TAX-CRD              /*         
*S****DK          0   A   3 2WF-FE-CF-S-DED-PAY              /*         
*S****DK          0   A   3 2WF-FE-CF-S-EDCR                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-ABD-EFH              /*         
*S****DK          0   A   3 2WF-FE-CF-S-SCHEDC-AMT           /*         
*S****DK          0   A   3 2WF-FE-CF-S-GRNT                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-FGN-INC-EXC          /*         
*S****DK          0   A   3 2WF-FE-CF-S-CSUP                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-BUS-FRM              /*         
*S****DK          0   A   3 2WF-FE-CF-S-INV                  /*         
*S****DK          0   A   3 2WF-FE-CF-S-CASH                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL1                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL2                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL3                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL4                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL5                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL6                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL7                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL8                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL9                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL10                /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL11                /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL12                /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL13                /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL14                /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL15                /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL16                /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL17                /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL18                /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL19                /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL20                /*         
*S****DK          0   A   3 2WF-FE-CF-S-CONSENT              /*         
*S****DK          0   A   3 2WF-FE-CF-S-SGN                  /*         
*S****DK          0   A   3 2WF-FE-CF-S-SGN-DATE             /*         
*S****DK          0   A   3 2WF-FE-CF-SP-NM-FIRST            /*         
*S****DK          0   A   3 2WF-FE-CF-SP-NM-MIDDLE           /*         
*S****DK          0   A   3 2WF-FE-CF-SP-NM-LAST             /*         
*S****DK          0   A   3 2WF-FE-CF-SP-SUFFIX              /*         
*S****DK          0   A   3 2WF-FE-CF-SP-DOB                 /*         
*S****DK          0   A   3 2WF-FE-CF-SP-SSN                 /*         
*S****DK          0   A   3 2WF-FE-CF-SP-ITIN                /*         
*S****DK          0   A   3 2WF-FE-CF-SP-AD-PHONE            /*         
*S****DK          0   A   3 2WF-FE-CF-SP-EMAIL               /*         
*S****DK          0   A   3 2WF-FE-CF-SP-AD-STRT             /*         
*S****DK          0   A   3 2WF-FE-CF-SP-AD-CITY             /*         
*S****DK          0   A   3 2WF-FE-CF-SP-AD-STATE            /*         
*S****DK          0   A   3 2WF-FE-CF-SP-AD-ZIP              /*         
*S****DK          0   A   3 2WF-FE-CF-SP-AD-COUNTRY          /*         
*S****DK          0   A   3 2WF-FE-CF-SP-1040R               /*         
*S****DK          0   A   3 2WF-FE-CF-SP-NON-US              /*         
*S****DK          0   A   3 2WF-FE-CF-SP-FILE-STAT           /*         
*S****DK          0   A   3 2WF-FE-CF-SP-INC                 /*         
*S****DK          0   A   3 2WF-FE-CF-SP-U-INT               /*         
*S****DK          0   A   3 2WF-FE-CF-SP-U-DST-IRA           /*         
*S****DK          0   A   3 2WF-FE-CF-SP-U-ROLL-IRA          /*         
*S****DK          0   A   3 2WF-FE-CF-SP-U-DST-PEN           /*         
*S****DK          0   A   3 2WF-FE-CF-SP-U-ROLL-PEN          /*         
*S****DK          0   A   3 2WF-FE-CF-SP-AGI                 /*         
*S****DK          0   A   3 2WF-FE-CF-SP-FED-TAX             /*         
*S****DK          0   A   3 2WF-FE-CF-SP-DED-PAY             /*         
*S****DK          0   A   3 2WF-FE-CF-SP-EDCR                /*         
*S****DK          0   A   3 2WF-FE-CF-SP-ABD-EFH             /*         
*S****DK          0   A   3 2WF-FE-CF-SP-SCHEDC-AMT          /*         
*S****DK          0   A   3 2WF-FE-CF-SP-FGN-INC-EXC         /*         
*S****DK          0   A   3 2WF-FE-CF-SP-CONSENT             /*         
*S****DK          0   A   3 2WF-FE-CF-SP-SGN                 /*         
*S****DK          0   A   3 2WF-FE-CF-SP-SGN-DATE            /*         
*S****DK          0   A   3 2WF-FE-CF-P1-NM-FIRST            /*         
*S****DK          0   A   3 2WF-FE-CF-P1-NM-MIDDLE           /*         
*S****DK          0   A   3 2WF-FE-CF-P1-NM-LAST             /*         
*S****DK          0   A   3 2WF-FE-CF-P1-SUFFIX              /*         
*S****DK          0   A   3 2WF-FE-CF-P1-DOB                 /*         
*S****DK          0   A   3 2WF-FE-CF-P1-SSN                 /*         
*S****DK          0   A   3 2WF-FE-CF-P1-ITIN                /*         
*S****DK          0   A   3 2WF-FE-CF-P1-AD-PHONE            /*         
*S****DK          0   A   3 2WF-FE-CF-P1-EMAIL               /*         
*S****DK          0   A   3 2WF-FE-CF-P1-AD-STRT             /*         
*S****DK          0   A   3 2WF-FE-CF-P1-AD-CITY             /*         
*S****DK          0   A   3 2WF-FE-CF-P1-AD-STATE            /*         
*S****DK          0   A   3 2WF-FE-CF-P1-AD-ZIP              /*         
*S****DK          0   A   3 2WF-FE-CF-P1-AD-COUNTRY          /*         
*S****DK          0   A   3 2WF-FE-CF-P1-MAR                 /*         
*S****DK          0   A   3 2WF-FE-CF-P1-RES                 /*         
*S****DK          0   A   3 2WF-FE-CF-P1-RES-DATE            /*         
*S****DK          0   A   3 2WF-FE-CF-P1-FAM-SIZE            /*         
*S****DK          0   A   3 2WF-FE-CF-P1-FAM-COL             /*         
*S****DK          0   A   3 2WF-FE-CF-P1-EITC                /*         
*S****DK          0   A   3 2WF-FE-CF-P1-HOME                /*         
*S****DK          0   A   3 2WF-FE-CF-P1-LUNCH               /*         
*S****DK          0   A   3 2WF-FE-CF-P1-MEDC                /*         
*S****DK          0   A   3 2WF-FE-CF-P1-36B                 /*         
*S****DK          0   A   3 2WF-FE-CF-P1-SNAP                /*         
*S****DK          0   A   3 2WF-FE-CF-P1-SSI                 /*         
*S****DK          0   A   3 2WF-FE-CF-P1-TANF                /*         
*S****DK          0   A   3 2WF-FE-CF-P1-WIC                 /*         
*S****DK          0   A   3 2WF-FE-CF-P1-NONE                /*         
*S****DK          0   A   3 2WF-FE-CF-P1-1040R               /*         
*S****DK          0   A   3 2WF-FE-CF-P1-NON-US              /*         
*S****DK          0   A   3 2WF-FE-CF-P1-JOINT               /*         
*S****DK          0   A   3 2WF-FE-CF-P1-FILE-STAT           /*         
*S****DK          0   A   3 2WF-FE-CF-P1-INC                 /*         
*S****DK          0   A   3 2WF-FE-CF-P1-U-INT               /*         
*S****DK          0   A   3 2WF-FE-CF-P1-U-DST-IRA           /*         
*S****DK          0   A   3 2WF-FE-CF-P1-U-ROLL-IRA          /*         
*S****DK          0   A   3 2WF-FE-CF-P1-U-DST-PEN           /*         
*S****DK          0   A   3 2WF-FE-CF-P1-U-ROLL-PEN          /*         
*S****DK          0   A   3 2WF-FE-CF-P1-AGI                 /*         
*S****DK          0   A   3 2WF-FE-CF-P1-FED-TAX             /*         
*S****DK          0   A   3 2WF-FE-CF-P1-TAX-CRD             /*         
*S****DK          0   A   3 2WF-FE-CF-P1-DED-PAY             /*         
*S****DK          0   A   3 2WF-FE-CF-P1-EDCR                /*         
*S****DK          0   A   3 2WF-FE-CF-P1-ABD-EFH             /*         
*S****DK          0   A   3 2WF-FE-CF-P1-SCHEDC-AMT          /*         
*S****DK          0   A   3 2WF-FE-CF-P1-GRNT                /*         
*S****DK          0   A   3 2WF-FE-CF-P1-FGN-INC-EXC         /*         
*S****DK          0   A   3 2WF-FE-CF-P1-CSUP                /*         
*S****DK          0   A   3 2WF-FE-CF-P1-INV                 /*         
*S****DK          0   A   3 2WF-FE-CF-P1-CASH                /*         
*S****DK          0   A   3 2WF-FE-CF-P1-BUS-FRM             /*         
*S****DK          0   A   3 2WF-FE-CF-P1-CONSENT             /*         
*S****DK          0   A   3 2WF-FE-CF-P1-SGN                 /*         
*S****DK          0   A   3 2WF-FE-CF-P1-SGN-DATE            /*         
*S****DK          0   A   3 2WF-FE-CF-P2-NM-FIRST            /*         
*S****DK          0   A   3 2WF-FE-CF-P2-NM-MIDDLE           /*         
*S****DK          0   A   3 2WF-FE-CF-P2-NM-LAST             /*         
*S****DK          0   A   3 2WF-FE-CF-P2-SUFFIX              /*         
*S****DK          0   A   3 2WF-FE-CF-P2-DOB                 /*         
*S****DK          0   A   3 2WF-FE-CF-P2-SSN                 /*         
*S****DK          0   A   3 2WF-FE-CF-P2-ITIN                /*         
*S****DK          0   A   3 2WF-FE-CF-P2-AD-PHONE            /*         
*S****DK          0   A   3 2WF-FE-CF-P2-EMAIL               /*         
*S****DK          0   A   3 2WF-FE-CF-P2-AD-STRT             /*         
*S****DK          0   A   3 2WF-FE-CF-P2-AD-CITY             /*         
*S****DK          0   A   3 2WF-FE-CF-P2-AD-STATE            /*         
*S****DK          0   A   3 2WF-FE-CF-P2-AD-ZIP              /*         
*S****DK          0   A   3 2WF-FE-CF-P2-AD-COUNTRY          /*         
*S****DK          0   A   3 2WF-FE-CF-P2-1040R               /*         
*S****DK          0   A   3 2WF-FE-CF-P2-NON-US              /*         
*S****DK          0   A   3 2WF-FE-CF-P2-FILE-STAT           /*         
*S****DK          0   A   3 2WF-FE-CF-P2-INC                 /*         
*S****DK          0   A   3 2WF-FE-CF-P2-U-INT               /*         
*S****DK          0   A   3 2WF-FE-CF-P2-U-DST-IRA           /*         
*S****DK          0   A   3 2WF-FE-CF-P2-U-ROLL-IRA          /*         
*S****DK          0   A   3 2WF-FE-CF-P2-U-DST-PEN           /*         
*S****DK          0   A   3 2WF-FE-CF-P2-U-ROLL-PEN          /*         
*S****DK          0   A   3 2WF-FE-CF-P2-AGI                 /*         
*S****DK          0   A   3 2WF-FE-CF-P2-FED-TAX             /*         
*S****DK          0   A   3 2WF-FE-CF-P2-DED-PAY             /*         
*S****DK          0   A   3 2WF-FE-CF-P2-EDCR                /*         
*S****DK          0   A   3 2WF-FE-CF-P2-ABD-EFH             /*         
*S****DK          0   A   3 2WF-FE-CF-P2-SCHEDC-AMT          /*         
*S****DK          0   A   3 2WF-FE-CF-P2-FGN-INC-EXC         /*         
*S****DK          0   A   3 2WF-FE-CF-P2-CONSENT             /*         
*S****DK          0   A   3 2WF-FE-CF-P2-SGN                 /*         
*S****DK          0   A   3 2WF-FE-CF-P2-SGN-DATE            /*         
*S****C           0   * 
*S****C           0   *  Matches and Other Processing Information       
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-C-MATCH-DHS               /*         
*S****DK          0   A   1 2WF-FE-C-MATCH-DHS2              /*         
*S****DK          0   A  15 2WF-FE-C-VER-DHS                 /*         
*S****DK          0   A   1 2WF-FE-C-MATCH-NSL               /*         
*S****DK          0   A   2 2WF-FE-C-NSLDS-PS1               /*         
*S****DK          0   A   2 2WF-FE-C-NSLDS-PS2               /*         
*S****DK          0   A   2 2WF-FE-C-NSLDS-PS3               /*         
*S****DK          0   A   1 2WF-FE-C-MATCH-CIT               /*         
*S****DK          0   A   1 2WF-FE-C-S-MATCH-SSN             /*         
*S****DK          0   A   1 2WF-FE-C-SP-MATCH-SSN            /*         
*S****DK          0   A   1 2WF-FE-C-P1-MATCH-SSN            /*         
*S****DK          0   A   1 2WF-FE-C-P2-MATCH-SSN            /*         
*S****DK          0   A   1 2WF-FE-C-MATCH-VA                /*         
*S****DK          0   A   3 2WF-FE-C-COM01                   /*         
*S****DK          0   A   3 2WF-FE-C-COM02                   /*         
*S****DK          0   A   3 2WF-FE-C-COM03                   /*         
*S****DK          0   A   3 2WF-FE-C-COM04                   /*         
*S****DK          0   A   3 2WF-FE-C-COM05                   /*         
*S****DK          0   A   3 2WF-FE-C-COM06                   /*         
*S****DK          0   A   3 2WF-FE-C-COM07                   /*         
*S****DK          0   A   3 2WF-FE-C-COM08                   /*         
*S****DK          0   A   3 2WF-FE-C-COM09                   /*         
*S****DK          0   A   3 2WF-FE-C-COM10                   /*         
*S****DK          0   A   3 2WF-FE-C-COM11                   /*         
*S****DK          0   A   3 2WF-FE-C-COM12                   /*         
*S****DK          0   A   3 2WF-FE-C-COM13                   /*         
*S****DK          0   A   3 2WF-FE-C-COM14                   /*         
*S****DK          0   A   3 2WF-FE-C-COM15                   /*         
*S****DK          0   A   3 2WF-FE-C-COM16                   /*         
*S****DK          0   A   3 2WF-FE-C-COM17                   /*         
*S****DK          0   A   3 2WF-FE-C-COM18                   /*         
*S****DK          0   A   3 2WF-FE-C-COM19                   /*         
*S****DK          0   A   3 2WF-FE-C-COM20                   /*         
*S****DK          0   A   1 2WF-FE-C-DRUG-HOLD               /*         
*S****DK          0   A   1 2WF-FE-C-GRAD                    /*         
*S****DK          0   A   1 2WF-FE-C-PELL-ELIG               /*         
*S****DK          0   A   2 2WF-FE-C-REPROC-RSN              /*         
*S****DK          0   A   1 2WF-FE-C-CFLAG                   /*         
*S****DK          0   A   1 2WF-FE-C-CFLAG-CHG               /*         
*S****DK          0   A   2 2WF-FE-C-ELEC-INST               /*         
*S****DK          0   A 110 2WF-FE-C-REJ-RSNS                /*         
*S****DK          0   A   1 2WF-FE-C-ETI                     /*         
*S****DK          0   A   1 2WF-FE-C-SSN-NM-CHG              /*         
*S****DK          0   A  12 2WF-FE-C-VER-HS                  /*         
*S****DK          0   A   1 2WF-FE-C-VER-CHG                 /*         
*S****DK          0   A   5 2WF-FE-C-USER-DATA               /*         
*S****DK          0   A   1 2WF-FE-WORKF-PGM                 /*         
*S****DK          0   A 360 2WF-FILLER20                     /*         
*S****C           0   * 
*S****C           0   *  NSLDS Information      
*S****C           0   * 
*S****DK          0   A 250 2WF-FE-L-NSLDS1                  /*         
*S****DK          0   A 250 2WF-FE-L-NSLDS2                  /*         
*S****DK          0   A 250 2WF-FE-L-NSLDS3                  /*         
*S****DK          0   A 250 2WF-FE-L-NSLDS4                  /*         
*S****DK          0   A 250 2WF-FE-L-NSLDS5                  /*         
*S****DK          0   A 250 2WF-FE-L-NSLDS6                  /*         
*S****DK          0   A 250 2WF-FE-L-NSLDS7                  /*         
*S****DK          0   A 250 2WF-FE-L-NSLDS8                  /*         
*S****DK          0   A 250 2WF-FE-L-NSLDS9                  /*         
*S****DK          0   A 250 2WF-FE-L-NSLDS10                 /*         
*S****DK          0   A  51 2WF-FE-L-NSLDS11                 /*         
*S****C           0   * 
*S****C           0   *  FTIM Information       
*S****C           0   * 
*S****DK          0   A  36 2WF-FILLER21                     /*         
*S****C           0   * 
*S****C           0   *  Student FTI-M Information          
*S****C           0   * 
*S****DK          0   A  50 2WF-FILLER22                     /*         
*S****DK          0   A  11 2WF-FE-FTI-LABEL-START           /*         
*S****DK          0   A   4 2WF-FE-FTI-S-RET-YEAR            /*         
*S****DK          0   A   1 2WF-FE-FTI-S-FILE-STAT           /*         
*S****DK          0   A  10 2WF-FE-FTI-S-AGI                 /*         
*S****DK          0   A   2 2WF-FE-FTI-S-EXE                 /*         
*S****DK          0   A   2 2WF-FE-FTI-S-DEPS                /*         
*S****DK          0   A  11 2WF-FE-FTI-S-TOT-INC             /*         
*S****DK          0   A   9 2WF-FE-FTI-S-TOT-FED-TAX         /*         
*S****DK          0   A   9 2WF-FE-FTI-S-EDCR                /*         
*S****DK          0   A  11 2WF-FE-FTI-S-DST-IRA             /*         
*S****DK          0   A  11 2WF-FE-FTI-S-DED-PAY             /*         
*S****DK          0   A  11 2WF-FE-FTI-S-U-INT               /*         
*S****DK          0   A  11 2WF-FE-FTI-S-DST-PEN             /*         
*S****DK          0   A  12 2WF-FE-FTI-S-SCHEDC-NET          /*         
*S****DK          0   A   1 2WF-FE-FTI-S-SCHEDA              /*         
*S****DK          0   A   1 2WF-FE-FTI-S-SCHEDB              /*         
*S****DK          0   A   1 2WF-FE-FTI-S-SCHEDD              /*         
*S****DK          0   A   1 2WF-FE-FTI-S-SCHEDE              /*         
*S****DK          0   A   1 2WF-FE-FTI-S-SCHEDF              /*         
*S****DK          0   A   1 2WF-FE-FTI-S-SCHEDH              /*         
*S****DK          0   A   3 2WF-FE-FTI-S-IRS-RESP            /*         
*S****C           0   * 
*S****C           0   *  Student Spouse FTI-M Information   
*S****C           0   * 
*S****DK          0   A   4 2WF-FE-FTI-SP-RET-YEAR           /*         
*S****DK          0   A   1 2WF-FE-FTI-SP-FILE-STAT          /*         
*S****DK          0   A  10 2WF-FE-FTI-SP-AGI                /*         
*S****DK          0   A   2 2WF-FE-FTI-SP-EXE                /*         
*S****DK          0   A   2 2WF-FE-FTI-SP-DEPS               /*         
*S****DK          0   A  11 2WF-FE-FTI-SP-TOT-INC            /*         
*S****DK          0   A   9 2WF-FE-FTI-SP-TOT-FED-TAX        /*         
*S****DK          0   A   9 2WF-FE-FTI-SP-EDCR               /*         
*S****DK          0   A  11 2WF-FE-FTI-SP-DST-IRA            /*         
*S****DK          0   A  11 2WF-FE-FTI-SP-DED-PAY            /*         
*S****DK          0   A  11 2WF-FE-FTI-SP-U-INT              /*         
*S****DK          0   A  11 2WF-FE-FTI-SP-DST-PEN            /*         
*S****DK          0   A  12 2WF-FE-FTI-SP-SCHEDC-NET         /*         
*S****DK          0   A   1 2WF-FE-FTI-SP-SCHEDA             /*         
*S****DK          0   A   1 2WF-FE-FTI-SP-SCHEDB             /*         
*S****DK          0   A   1 2WF-FE-FTI-SP-SCHEDD             /*         
*S****DK          0   A   1 2WF-FE-FTI-SP-SCHEDE             /*         
*S****DK          0   A   1 2WF-FE-FTI-SP-SCHEDF             /*         
*S****DK          0   A   1 2WF-FE-FTI-SP-SCHEDH             /*         
*S****DK          0   A   3 2WF-FE-FTI-SP-IRS-RESP           /*         
*S****C           0   * 
*S****C           0   *  Parent FTI-M Information           
*S****C           0   * 
*S****DK          0   A   4 2WF-FE-FTI-P1-RET-YEAR           /*         
*S****DK          0   A   1 2WF-FE-FTI-P1-FILE-STAT          /*         
*S****DK          0   A  10 2WF-FE-FTI-P1-AGI                /*         
*S****DK          0   A   2 2WF-FE-FTI-P1-EXE                /*         
*S****DK          0   A   2 2WF-FE-FTI-P1-DEPS               /*         
*S****DK          0   A  11 2WF-FE-FTI-P1-TOT-INC            /*         
*S****DK          0   A   9 2WF-FE-FTI-P1-TOT-FED-TAX        /*         
*S****DK          0   A   9 2WF-FE-FTI-P1-EDCR               /*         
*S****DK          0   A  11 2WF-FE-FTI-P1-DST-IRA            /*         
*S****DK          0   A  11 2WF-FE-FTI-P1-DED-PAY            /*         
*S****DK          0   A  11 2WF-FE-FTI-P1-U-INT              /*         
*S****DK          0   A  11 2WF-FE-FTI-P1-DST-PEN            /*         
*S****DK          0   A  12 2WF-FE-FTI-P1-SCHEDC-NET         /*         
*S****DK          0   A   1 2WF-FE-FTI-P1-SCHEDA             /*         
*S****DK          0   A   1 2WF-FE-FTI-P1-SCHEDB             /*         
*S****DK          0   A   1 2WF-FE-FTI-P1-SCHEDD             /*         
*S****DK          0   A   1 2WF-FE-FTI-P1-SCHEDE             /*         
*S****DK          0   A   1 2WF-FE-FTI-P1-SCHEDF             /*         
*S****DK          0   A   1 2WF-FE-FTI-P1-SCHEDH             /*         
*S****DK          0   A   3 2WF-FE-FTI-P1-IRS-RESP           /*         
*S****C           0   * 
*S****C           0   *  Parent Spouse or Partner FTI-M Information     
*S****C           0   * 
*S****DK          0   A   4 2WF-FE-FTI-P2-RET-YEAR           /*         
*S****DK          0   A   1 2WF-FE-FTI-P2-FILE-STAT          /*         
*S****DK          0   A  10 2WF-FE-FTI-P2-AGI                /*         
*S****DK          0   A   2 2WF-FE-FTI-P2-EXE                /*         
*S****DK          0   A   2 2WF-FE-FTI-P2-DEPS               /*         
*S****DK          0   A  11 2WF-FE-FTI-P2-TOT-INC            /*         
*S****DK          0   A   9 2WF-FE-FTI-P2-TOT-FED-TAX        /*         
*S****DK          0   A   9 2WF-FE-FTI-P2-EDCR               /*         
*S****DK          0   A  11 2WF-FE-FTI-P2-DST-IRA            /*         
*S****DK          0   A  11 2WF-FE-FTI-P2-DED-PAY            /*         
*S****DK          0   A  11 2WF-FE-FTI-P2-U-INT              /*         
*S****DK          0   A  11 2WF-FE-FTI-P2-DST-PEN            /*         
*S****DK          0   A  12 2WF-FE-FTI-P2-SCHEDC-NET         /*         
*S****DK          0   A   1 2WF-FE-FTI-P2-SCHEDA             /*         
*S****DK          0   A   1 2WF-FE-FTI-P2-SCHEDB             /*         
*S****DK          0   A   1 2WF-FE-FTI-P2-SCHEDD             /*         
*S****DK          0   A   1 2WF-FE-FTI-P2-SCHEDE             /*         
*S****DK          0   A   1 2WF-FE-FTI-P2-SCHEDF             /*         
*S****DK          0   A   1 2WF-FE-FTI-P2-SCHEDH             /*         
*S****DK          0   A   3 2WF-FE-FTI-P2-IRS-RESP           /*         
*S****DK          0   A  61 2WF-FILLER50A                    /*         
*S****C           0   * 
*S****C           0   *  FTIM Processing Information        
*S****C           0   * 
*S****DK          0   A  15 2WF-FE-S-TOT-INC                 /*         
*S****DK          0   A  15 2WF-FE-P-TOT-INC                 /*         
*S****DK          0   A  15 2WF-FE-FISAP-TOT-INC             /*         
*S****DK          0   A  15 2WF-FE-P1-FC1-ATI                /*         
*S****DK          0   A  15 2WF-FE-P1-FC1-PAYR               /*         
*S****DK          0   A  15 2WF-FE-P1-FC1-IPA                /*         
*S****DK          0   A  15 2WF-FE-P1-FC1-EEA                /*         
*S****DK          0   A  15 2WF-FE-P1-FC1-AI                 /*         
*S****DK          0   A  15 2WF-FE-P1-FC1-AAI                /*         
*S****DK          0   A  15 2WF-FE-P1-FC1-CONT               /*         
*S****DK          0   A  15 2WF-FE-S-FC1-PAYR                /*         
*S****DK          0   A  15 2WF-FE-S-FC1-IPA                 /*         
*S****DK          0   A  15 2WF-FE-S-FC1-NEG-AAI             /*         
*S****DK          0   A  15 2WF-FE-S-FC1-EEA                 /*         
*S****DK          0   A  15 2WF-FE-S-FC1-ATI                 /*         
*S****DK          0   A  15 2WF-FE-S-FC1-AI                  /*         
*S****DK          0   A  15 2WF-FE-S-FC1-CI                  /*         
*S****DK          0   A  15 2WF-FE-S-FC1-AAI                 /*         
*S****DK          0   A  15 2WF-FE-S-FC1-AAI-CONT            /*         
*S****DK          0   A  11 2WF-FE-FTI-LABEL-END             /*         
*S****DK          0   A  39 2WF-FILLER50B                    /*         
*S****C           0   * 
*S****C           0   * No 'N' relationships exist for:      WF-2627-FEDERAL        
*S****C           0   * 
*S****DF          0   A   1 1WF27FEBL-ID                     /* Object identifier   
*S****DR          0        R1WF27FEBL-ID                     /* REDEF. BEGIN : WF27FEBL-ID      
*S****DSR         0         2STRUCTURE                       /* To allow MOVE BY NAME           
*S****DFR         0   A   1 3WF-FE-C-BATCH-YR                /*         
*C**                                FATEMP  WF27FEBL                        L S   NN0000        
*D01NAT8304L FATEMP  WF27FEBL                        ZWDNH   ZWDNH           S      
*D02            2025082823080702025082823080700000050402    
*D03LINUX   
*D04                 ISO_8859-1:1987
*S****C           0   ***********************************************************************   
*S****C           0   * 
*S****C           0   *         WolffPack, Inc. 
*S****C           0   *                                            Copyright 1995 - 2026        
*S****C           0   * LDA:    WF27FEBL                              WolffPack, Inc.           
*S****C           0   * System: FINANCIER                           All rights reserved.        
*S****C           0   * 
*S****C           0   *   Note: Module copied from WF27FEDL, modified to allow for additional   
*S****C           0   *           fields and increased fields mid 2026-2027 processing year.    
*S****C           0   * 
*S****C           0   ***********************************************************************   
*S****DS          0         1WF27FEBL                        /* Object Name         
*S****C           0   * 
*S****C           0   * Transaction Identification:         
*S****C           0   *   FAFSA Identification UUID, Transaction UUID, Application and          
*S****C           0   *   Transaction Data Sources, Model, Transaction Dates, etc.  
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-C-BATCH-YR                /*         
*S****DK          0   A  36 2WF-FE-FAFSA-UUID                /*         
*S****DK          0   A  36 2WF-FE-TRANS-UUID                /*         
*S****DK          0   A  36 2WF-FE-PERSON-UUID               /*         
*S****DK          0   A   2 2WF-FE-C-TRANS-NO                /*         
*S****DK          0   A   1 2WF-FE-C-DEP-MODEL               /*         
*S****DK          0   A   1 2WF-FE-C-APP-SRCE                /*         
*S****DK          0   A   8 2WF-FE-C-APP-RCPT-DATE           /*         
*S****DK          0   A   1 2WF-FE-C-TRAN-SRCE               /*         
*S****DK          0   A   1 2WF-FE-C-TRAN-TYPE               /*         
*S****DK          0   A   1 2WF-FE-C-TRAN-LANG               /*         
*S****DK          0   A   8 2WF-FE-C-TRAN-RCPT-DATE          /*         
*S****DK          0   A   8 2WF-FE-C-TRAN-PROC-DATE          /*         
*S****DK          0   A  30 2WF-FE-C-TRAN-STATUS             /*         
*S****DK          0   A   3 2WF-FE-C-RENEWAL-DATA-USED       /*         
*S****DK          0   A   1 2WF-FE-C-FPS-CORR-RSN            /*         
*S****DK          0   A   1 2WF-FE-C-SAI-CHG-FLAG            /*         
*S****DK          0   A   6 2WF-FE-C-SAI                     /*         
*S****DK          0   A   6 2WF-FE-C-SAI-PROV                /*         
*S****DK          0   A   1 2WF-FE-C-SAI-FORMULA             /*         
*S****DK          0   A   2 2WF-FE-C-SAI-COMP-TYPE           /*         
*S****DK          0   A   1 2WF-FE-C-MAX-PELL-IND            /*         
*S****DK          0   A   1 2WF-FE-C-MIN-PELL-IND            /*         
*S****DK          0   A   1 2WF-FE-ISIR-VERSION-FLAG         /*         
*S****DK          0   A  49 2WF-FE-FILLER1                   /*         
*S****C           0   * 
*S****C           0   * Student Demographic, Identity, and  
*S****C           0   *   Contact Information   
*S****C           0   * 
*S****DK          0   A  35 2WF-FE-NM-FIRST                  /*         
*S****DK          0   A  15 2WF-FE-NM-MIDDLE                 /*         
*S****DK          0   A  35 2WF-FE-NM-LAST                   /*         
*S****DK          0   A  10 2WF-FE-NM-SUFFIX                 /*         
*S****DK          0   A   8 2WF-FE-DOB                       /*         
*S****DK          0   A   9 2WF-FE-SSN                       /*         
*S****DK          0   A   9 2WF-FE-ITIN                      /*         
*S****DK          0   A  10 2WF-FE-AD-PHONE                  /*         
*S****DK          0   A  50 2WF-FE-EMAIL                     /*         
*S****DK          0   A  40 2WF-FE-AD-STRT                   /*         
*S****DK          0   A  30 2WF-FE-AD-CITY                   /*         
*S****DK          0   A   2 2WF-FE-AD-STATE                  /*         
*S****DK          0   A  10 2WF-FE-AD-ZIP                    /*         
*S****DK          0   A   2 2WF-FE-AD-COUNTRY                /*         
*S****DK          0   A  50 2WF-FE-FILLER2                   /*         
*S****C           0   * 
*S****C           0   * Student Non-Financial Information   
*S****C           0   *   (Dependency, Marital Status, etc.)
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-S-MAR                     /*         
*S****DK          0   A   1 2WF-FE-S-YR-COL                  /*         
*S****DK          0   A   1 2WF-FE-S-BACH-DEG                /*         
*S****DK          0   A   1 2WF-FE-S-TCH-CERT                /*         
*S****DK          0   A   1 2WF-FE-S-TEST-ACTV               /*         
*S****DK          0   A   1 2WF-FE-S-TEST-VET                /*         
*S****DK          0   A   1 2WF-FE-S-TEST-DEP                /*         
*S****DK          0   A   1 2WF-FE-S-TEST-PAR-DECD           /*         
*S****DK          0   A   1 2WF-FE-S-TEST-WARD               /*         
*S****DK          0   A   1 2WF-FE-S-TEST-FOST               /*         
*S****DK          0   A   1 2WF-FE-S-TEST-EMAN               /*         
*S****DK          0   A   1 2WF-FE-S-TEST-GUAR               /*         
*S****DK          0   A   1 2WF-FE-S-TEST-PERS-NO            /*         
*S****DK          0   A   1 2WF-FE-S-TEST-UYSS               /*         
*S****DK          0   A   1 2WF-FE-S-TEST-UGEN               /*         
*S****DK          0   A   1 2WF-FE-S-TEST-UHS                /*         
*S****DK          0   A   1 2WF-FE-S-TEST-UTRIO              /*         
*S****DK          0   A   1 2WF-FE-S-TEST-UFAA               /*         
*S****DK          0   A   1 2WF-FE-S-TEST-UOTHER-NO          /*         
*S****DK          0   A   1 2WF-FE-S-TEST-UN-CIRC            /*         
*S****DK          0   A   1 2WF-FE-S-TEST-UNSUB              /*         
*S****DK          0   A   2 2WF-FE-S-FAM-SIZE                /*         
*S****DK          0   A   2 2WF-FE-S-FAM-COL                 /*         
*S****C           0   * 
*S****C           0   * Student Demographic Information     
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-S-CIT                     /*         
*S****DK          0   A   9 2WF-FE-S-ALIEN                   /*         
*S****DK          0   A   2 2WF-FE-S-RES                     /*         
*S****DK          0   A   6 2WF-FE-S-RES-DATE                /*         
*S****DK          0   A   1 2WF-FE-S-PARS-COLG               /*         
*S****DK          0   A   1 2WF-FE-S-PARS-KDUTY              /*         
*S****DK          0   A   1 2WF-FE-S-HS-GED                  /*         
*S****DK          0   A  60 2WF-FE-S-HS-NAME                 /*         
*S****DK          0   A  28 2WF-FE-S-HS-CITY                 /*         
*S****DK          0   A   2 2WF-FE-S-HS-STATE                /*         
*S****DK          0   A   1 2WF-FE-S-HSE-NAME                /*         
*S****DK          0   A   2 2WF-FE-S-HSE-STATE               /*         
*S****C           0   * 
*S****C           0   * Student Manually Entered Financial  
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-S-MT-EITC                 /*         
*S****DK          0   A   1 2WF-FE-S-MT-HOME                 /*         
*S****DK          0   A   1 2WF-FE-S-MT-LUNCH                /*         
*S****DK          0   A   1 2WF-FE-S-MT-MEDC                 /*         
*S****DK          0   A   1 2WF-FE-S-MT-36B                  /*         
*S****DK          0   A   1 2WF-FE-S-MT-SNAP                 /*         
*S****DK          0   A   1 2WF-FE-S-MT-SSI                  /*         
*S****DK          0   A   1 2WF-FE-S-MT-TANF                 /*         
*S****DK          0   A   1 2WF-FE-S-MT-WIC                  /*         
*S****DK          0   A   1 2WF-FE-S-MT-NONE                 /*         
*S****DK          0   A   1 2WF-FE-S-1040R                   /*         
*S****DK          0   A   1 2WF-FE-S-NON-US                  /*         
*S****DK          0   A   1 2WF-FE-S-JOINT                   /*         
*S****DK          0   A   1 2WF-FE-S-FILE-STAT               /*         
*S****DK          0   A  11 2WF-FE-S-INC                     /*         
*S****DK          0   A  11 2WF-FE-S-U-INT                   /*         
*S****DK          0   A  11 2WF-FE-S-U-DST-IRA               /*         
*S****DK          0   A  11 2WF-FE-S-U-ROLL-IRA              /*         
*S****DK          0   A  11 2WF-FE-S-U-DST-PEN               /*         
*S****DK          0   A  11 2WF-FE-S-U-ROLL-PEN              /*         
*S****DK          0   A  10 2WF-FE-S-AGI                     /*         
*S****DK          0   A   9 2WF-FE-S-FED-TAX                 /*         
*S****DK          0   A   1 2WF-FE-S-TAX-CREDIT              /*         
*S****DK          0   A  11 2WF-FE-S-DED-PAY                 /*         
*S****DK          0   A   9 2WF-FE-S-EDCR                    /*         
*S****DK          0   A   1 2WF-FE-S-ABD-EFH                 /*         
*S****DK          0   A  12 2WF-FE-S-SCHEDC-AMT              /*         
*S****DK          0   A   7 2WF-FE-S-GRNT                    /*         
*S****DK          0   A  10 2WF-FE-S-FGN-INC-EXC             /*         
*S****DK          0   A   7 2WF-FE-S-U-CSUP                  /*         
*S****DK          0   A   7 2WF-FE-S-CASH                    /*         
*S****DK          0   A   7 2WF-FE-S-INV                     /*         
*S****DK          0   A   7 2WF-FE-S-BUS-FRM                 /*         
*S****C           0   * 
*S****C           0   * Student School Choices, Consent,    
*S****C           0   *    and Signature        
*S****C           0   * 
*S****DK          0   A   6 2WF-FE-A-COL1                    /*         
*S****DK          0   A   6 2WF-FE-A-COL2                    /*         
*S****DK          0   A   6 2WF-FE-A-COL3                    /*         
*S****DK          0   A   6 2WF-FE-A-COL4                    /*         
*S****DK          0   A   6 2WF-FE-A-COL5                    /*         
*S****DK          0   A   6 2WF-FE-A-COL6                    /*         
*S****DK          0   A   6 2WF-FE-A-COL7                    /*         
*S****DK          0   A   6 2WF-FE-A-COL8                    /*         
*S****DK          0   A   6 2WF-FE-A-COL9                    /*         
*S****DK          0   A   6 2WF-FE-A-COL10                   /*         
*S****DK          0   A   6 2WF-FE-A-COL11                   /*         
*S****DK          0   A   6 2WF-FE-A-COL12                   /*         
*S****DK          0   A   6 2WF-FE-A-COL13                   /*         
*S****DK          0   A   6 2WF-FE-A-COL14                   /*         
*S****DK          0   A   6 2WF-FE-A-COL15                   /*         
*S****DK          0   A   6 2WF-FE-A-COL16                   /*         
*S****DK          0   A   6 2WF-FE-A-COL17                   /*         
*S****DK          0   A   6 2WF-FE-A-COL18                   /*         
*S****DK          0   A   6 2WF-FE-A-COL19                   /*         
*S****DK          0   A   6 2WF-FE-A-COL20                   /*         
*S****DK          0   A   1 2WF-FE-S-CONSENT                 /*         
*S****DK          0   A   1 2WF-FE-S-SGN                     /*         
*S****DK          0   A   8 2WF-FE-S-SGN-DATE                /*         
*S****DK          0   A  50 2WW-FILLER-3                     /*         
*S****C           0   * 
*S****C           0   * Student Spouse Demographic, Identity,           
*S****C           0   *    and Contact Information          
*S****C           0   * 
*S****DK          0   A  35 2WF-FE-SP-NM-FIRST               /*         
*S****DK          0   A  15 2WF-FE-SP-NM-MIDDLE              /*         
*S****DK          0   A  35 2WF-FE-SP-NM-LAST                /*         
*S****DK          0   A  10 2WF-FE-SP-SUFFIX                 /*         
*S****DK          0   A   8 2WF-FE-SP-DOB                    /*         
*S****DK          0   A   9 2WF-FE-SP-SSN                    /*         
*S****DK          0   A   9 2WF-FE-SP-ITIN                   /*         
*S****DK          0   A  10 2WF-FE-SP-PHONE                  /*         
*S****DK          0   A  50 2WF-FE-SP-EMAIL                  /*         
*S****DK          0   A  40 2WF-FE-SP-AD-STRT                /*         
*S****DK          0   A  30 2WF-FE-SP-AD-CITY                /*         
*S****DK          0   A   2 2WF-FE-SP-AD-STATE               /*         
*S****DK          0   A  10 2WF-FE-SP-AD-ZIP                 /*         
*S****DK          0   A   2 2WF-FE-SP-AD-COUNTRY             /*         
*S****C           0   * 
*S****C           0   * Student Spouse Manually Entered     
*S****C           0   *   Financial Information, Consent,   
*S****C           0   *    and Sign 
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-SP-1040R                  /*         
*S****DK          0   A   1 2WF-FE-SP-NON-US                 /*         
*S****DK          0   A   1 2WF-FE-SP-FILE-STAT              /*         
*S****DK          0   A  11 2WF-FE-SP-INC                    /*         
*S****DK          0   A  11 2WF-FE-SP-U-INT                  /*         
*S****DK          0   A  11 2WF-FE-SP-U-DST-IRA              /*         
*S****DK          0   A  11 2WF-FE-SP-U-ROLL-IRA             /*         
*S****DK          0   A  11 2WF-FE-SP-U-DST-PEN              /*         
*S****DK          0   A  11 2WF-FE-SP-U-ROLL-PEN             /*         
*S****DK          0   A  10 2WF-FE-SP-AGI                    /*         
*S****DK          0   A   9 2WF-FE-SP-FED-TAX                /*         
*S****DK          0   A  11 2WF-FE-SP-DED-PAY                /*         
*S****DK          0   A   9 2WF-FE-SP-EDCR                   /*         
*S****DK          0   A   1 2WF-FE-SP-ABD-EFH                /*         
*S****DK          0   A  12 2WF-FE-SP-SCHEDC-AMT             /*         
*S****DK          0   A  10 2WF-FE-SP-FGN-INC-EXC            /*         
*S****DK          0   A   1 2WF-FE-SP-CONSENT                /*         
*S****DK          0   A   1 2WF-FE-SP-SGN                    /*         
*S****DK          0   A   8 2WF-FE-SP-SGN-DATE               /*         
*S****DK          0   A  50 2WW-FILLER-4                     /*         
*S****C           0   * 
*S****C           0   * Parent Demographic, Identity, and   
*S****C           0   *   Contact Information   
*S****C           0   * 
*S****DK          0   A  35 2WF-FE-P1-NM-FIRST               /*         
*S****DK          0   A  15 2WF-FE-P1-NM-MIDDLE              /*         
*S****DK          0   A  35 2WF-FE-P1-NM-LAST                /*         
*S****DK          0   A  10 2WF-FE-P1-SUFFIX                 /*         
*S****DK          0   A   8 2WF-FE-P1-DOB                    /*         
*S****DK          0   A   9 2WF-FE-P1-SSN                    /*         
*S****DK          0   A   9 2WF-FE-P1-ITIN                   /*         
*S****DK          0   A  10 2WF-FE-P1-PHONE                  /*         
*S****DK          0   A  50 2WF-FE-P1-EMAIL                  /*         
*S****DK          0   A  40 2WF-FE-P1-AD-STRT                /*         
*S****DK          0   A  30 2WF-FE-P1-AD-CITY                /*         
*S****DK          0   A   2 2WF-FE-P1-AD-STATE               /*         
*S****DK          0   A  10 2WF-FE-P1-AD-ZIP                 /*         
*S****DK          0   A   2 2WF-FE-P1-AD-COUNTRY             /*         
*S****C           0   * 
*S****C           0   * Parent Non-Financial Information    
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-P1-MAR                     /*        
*S****DK          0   A   2 2WF-FE-P1-RES                     /*        
*S****DK          0   A   6 2WF-FE-P1-RES-DATE                /*        
*S****DK          0   A   2 2WF-FE-P1-FAM-SIZE                /*        
*S****DK          0   A   2 2WF-FE-P1-FAM-COL                 /*        
*S****C           0   * 
*S****C           0   * Parent Manually Entered Financial Information,  
*S****C           0   *   Consent, and Signature
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-P1-EITC                    /*        
*S****DK          0   A   1 2WF-FE-P1-MT-HOME                 /*        
*S****DK          0   A   1 2WF-FE-P1-MT-LUNCH                /*        
*S****DK          0   A   1 2WF-FE-P1-MT-MEDC                 /*        
*S****DK          0   A   1 2WF-FE-P1-MT-36B                  /*        
*S****DK          0   A   1 2WF-FE-P1-MT-SNAP                 /*        
*S****DK          0   A   1 2WF-FE-P1-MT-SSI                  /*        
*S****DK          0   A   1 2WF-FE-P1-MT-TANF                 /*        
*S****DK          0   A   1 2WF-FE-P1-MT-WIC                  /*        
*S****DK          0   A   1 2WF-FE-P1-MT-NONE                 /*        
*S****DK          0   A   1 2WF-FE-P1-MT-1040R                /*        
*S****DK          0   A   1 2WF-FE-P1-MT-NON-US               /*        
*S****DK          0   A   1 2WF-FE-P1-JOINT                   /*        
*S****DK          0   A   1 2WF-FE-P1-FILE-STAT               /*        
*S****DK          0   A  11 2WF-FE-P1-INC                     /*        
*S****DK          0   A  11 2WF-FE-P1-U-INT                   /*        
*S****DK          0   A  11 2WF-FE-P1-U-DST-IRA               /*        
*S****DK          0   A  11 2WF-FE-P1-U-ROLL-IRA              /*        
*S****DK          0   A  11 2WF-FE-P1-U-DST-PEN               /*        
*S****DK          0   A  11 2WF-FE-P1-U-ROLL-PEN              /*        
*S****DK          0   A  10 2WF-FE-P1-AGI                     /*        
*S****DK          0   A   9 2WF-FE-P1-FED-TAX                 /*        
*S****DK          0   A   1 2WF-FE-P1-TAX-CREDIT              /*        
*S****DK          0   A  11 2WF-FE-P1-DED-PAY                 /*        
*S****DK          0   A   9 2WF-FE-P1-EDCR                    /*        
*S****DK          0   A   1 2WF-FE-P1-ABD-EFH                 /*        
*S****DK          0   A  12 2WF-FE-P1-SCHEDC-AMT              /*        
*S****DK          0   A   7 2WF-FE-P1-A-GRANT                 /*        
*S****DK          0   A  10 2WF-FE-P1-FGN-INC-EXC             /*        
*S****DK          0   A   7 2WF-FE-P1-U-CSUP                  /*        
*S****DK          0   A   7 2WF-FE-P1-CASH                    /*        
*S****DK          0   A   7 2WF-FE-P1-INV                     /*        
*S****DK          0   A   7 2WF-FE-P1-BUS-FRM                 /*        
*S****DK          0   A   1 2WF-FE-P1-CONSENT                 /*        
*S****DK          0   A   1 2WF-FE-P1-SGN                     /*        
*S****DK          0   A   8 2WF-FE-P1-SGN-DATE                /*        
*S****DK          0   A  50 2WW-FILLER-5                      /*        
*S****C           0   * 
*S****C           0   * Parent Spouse or Partner Demographic,           
*S****C           0   *   Identity, and Contact Information 
*S****C           0   * 
*S****DK          0   A  35 2WF-FE-P2-NM-FIRST                /*        
*S****DK          0   A  15 2WF-FE-P2-NM-MIDDLE               /*        
*S****DK          0   A  35 2WF-FE-P2-NM-LAST                 /*        
*S****DK          0   A  10 2WF-FE-P2-SUFFIX                  /*        
*S****DK          0   A   8 2WF-FE-P2-DOB                     /*        
*S****DK          0   A   9 2WF-FE-P2-SSN                     /*        
*S****DK          0   A   9 2WF-FE-P2-ITIN                    /*        
*S****DK          0   A  10 2WF-FE-P2-PHONE                   /*        
*S****DK          0   A  50 2WF-FE-P2-EMAIL                   /*        
*S****DK          0   A  40 2WF-FE-P2-AD-STRT                 /*        
*S****DK          0   A  30 2WF-FE-P2-AD-CITY                 /*        
*S****DK          0   A   2 2WF-FE-P2-AD-STATE                /*        
*S****DK          0   A  10 2WF-FE-P2-AD-ZIP                  /*        
*S****DK          0   A   2 2WF-FE-P2-AD-COUNTRY              /*        
*S****C           0   * 
*S****C           0   * Parent Spouse or Partner Manually Entered       
*S****C           0   *   Financial Information, Consent    
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-P2-1040R                   /*        
*S****DK          0   A   1 2WF-FE-P2-NON-US                  /*        
*S****DK          0   A   1 2WF-FE-P2-FILE-STAT               /*        
*S****DK          0   A  11 2WF-FE-P2-INC                     /*        
*S****DK          0   A  11 2WF-FE-P2-U-INT                   /*        
*S****DK          0   A  11 2WF-FE-P2-U-DST-IRA               /*        
*S****DK          0   A  11 2WF-FE-P2-U-ROLL-IRA              /*        
*S****DK          0   A  11 2WF-FE-P2-U-DST-PEN               /*        
*S****DK          0   A  11 2WF-FE-P2-U-ROLL-PEN              /*        
*S****DK          0   A  10 2WF-FE-P2-AGI                     /*        
*S****DK          0   A   9 2WF-FE-P2-FED-TAX                 /*        
*S****DK          0   A  11 2WF-FE-P2-DED-PAY                 /*        
*S****DK          0   A   9 2WF-FE-P2-EDCR                    /*        
*S****DK          0   A   1 2WF-FE-P2-ABD-EFH                 /*        
*S****DK          0   A  12 2WF-FE-P2-SCHEDC-AMT              /*        
*S****DK          0   A  10 2WF-FE-P2-FGN-INC-EXC             /*        
*S****DK          0   A   1 2WF-FE-P2-CONSENT                 /*        
*S****DK          0   A   1 2WF-FE-P2-SGN                     /*        
*S****DK          0   A   8 2WF-FE-P2-SGN-DATE                /*        
*S****DK          0   A  50 2WW-FILLER-6                      /*        
*S****C           0   * 
*S****C           0   * Preparer Information    
*S****C           0   *  Indicates that a preparer filled out           
*S****C           0   *    the application and provided their           
*S****C           0   * 
*S****DK          0   A  35 2WF-FE-A-PREP-FIRST               /*        
*S****DK          0   A  35 2WF-FE-A-PREP-LAST                /*        
*S****DK          0   A   9 2WF-FE-A-PREP-SSN                 /*        
*S****DK          0   A   9 2WF-FE-A-PREP-EIN                 /*        
*S****DK          0   A  30 2WF-FE-A-PREP-AFFL                /*        
*S****DK          0   A  40 2WF-FE-A-PREP-STRT                /*        
*S****DK          0   A  30 2WF-FE-A-PREP-CITY                /*        
*S****DK          0   A   2 2WF-FE-A-PREP-STATE               /*        
*S****DK          0   A  10 2WF-FE-A-PREP-ZIP                 /*        
*S****DK          0   A   1 2WF-FE-A-PREP-SGN                 /*        
*S****DK          0   A   8 2WF-FE-A-PREP-SGN-DT              /*        
*S****DK          0   A  50 2WW-FILLER-7                      /*        
*S****C           0   * 
*S****C           0   *  FPS Processing Information         
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-S-AFFIRM                   /*        
*S****DK          0   A   1 2WF-FE-SP-AFFIRM                  /*        
*S****DK          0   A   1 2WF-FE-P1-AFFIRM                  /*        
*S****DK          0   A   1 2WF-FE-P2-AFFIRM                  /*        
*S****DK          0   A   8 2WF-FE-S-CNST-DATE                /*        
*S****DK          0   A   8 2WF-FE-SP-CNST-DATE               /*        
*S****DK          0   A   8 2WF-FE-P1-CNST-DATE               /*        
*S****DK          0   A   8 2WF-FE-P2-CNST-DATE               /*        
*S****DK          0   A   1 2WF-FE-S-TRANU-MATCH              /*        
*S****DK          0   A   1 2WF-FE-SP-TRANU-MATCH             /*        
*S****DK          0   A   1 2WF-FE-P1-TRANU-MATCH             /*        
*S****DK          0   A   1 2WF-FE-P2-TRANU-MATCH             /*        
*S****DK          0   A   2 2WF-FE-C-COR-TRAN                 /*        
*S****DK          0   A   1 2WF-FE-F-PROF-JUDG                /*        
*S****DK          0   A   1 2WF-FE-F-DEP-OVR                  /*        
*S****DK          0   A   6 2WF-FE-F-COLLEGE                  /*        
*S****DK          0   A   1 2WF-FE-F-SIGN                     /*        
*S****DK          0   A   1 2WF-FE-F-IASG                     /*        
*S****DK          0   A   1 2WF-FE-C-CHILD-HERO               /*        
*S****DK          0   A   7 2WF-FE-C-ETI-DEST                 /*        
*S****DK          0   A   1 2WF-FE-S-SGN-SRC                  /*        
*S****DK          0   A   1 2WF-FE-SP-SGN-SRC                 /*        
*S****DK          0   A   1 2WF-FE-P1-SGN-SRC                 /*        
*S****DK          0   A   1 2WF-FE-P2-SGN-SRC                 /*        
*S****DK          0   A   1 2WF-FE-SPEC-HAND                  /*        
*S****DK          0   A   1 2WF-FE-C-ADDR-CHG                 /*        
*S****DK          0   A   1 2WF-FE-C-PUSHED                   /*        
*S****DK          0   A   1 2WF-FE-C-REJ-CHG                  /*        
*S****DK          0   A   2 2WF-FE-C-VER-TRACK                /*        
*S****DK          0   A   1 2WF-FE-C-VER                      /*        
*S****DK          0   A   1 2WF-FE-INCARCERATED               /*        
*S****DK          0   A   2 2WF-FE-C-NSLDS-TRAN               /*        
*S****DK          0   A   1 2WF-FE-C-VER-NSL                  /*        
*S****DK          0   A   1 2WF-FE-C-MATCH-HS                 /*        
*S****DK          0   A  12 2WF-FE-S-FWS                      /*        
*S****DK          0   A  12 2WF-FE-SP-FWS                     /*        
*S****DK          0   A  12 2WF-FE-P1-FWS                     /*        
*S****DK          0   A  12 2WF-FE-P2-FWS                     /*        
*S****DK          0   A 240 2WW-FILLER-8                      /*        
*S****DK          0   A   7 2WF-FE-P1-FC1-DNW                 /*        
*S****DK          0   A   7 2WF-FE-P1-FC1-NW                  /*        
*S****DK          0   A  12 2WF-FE-P1-FC1-APA                 /*        
*S****DK          0   A  12 2WF-FE-P1-FC1-CA                  /*        
*S****DK          0   A   7 2WF-FE-S-FC1-NW                   /*        
*S****DK          0   A  12 2WF-FE-S-FC1-APA                  /*        
*S****DK          0   A  12 2WF-FE-S-FC1-CA                   /*        
*S****DK          0   A   3 2WF-FE-CAS-FAM-SIZE               /*        
*S****DK          0   A   3 2WF-FE-CAP-FAM-SIZE               /*        
*S****C           0   * 
*S****C           0   *  Correction, Highlight, and Verify Flags        
*S****C           0   * 
*S****DK          0   A   3 2WF-FE-CF-S-NM-FIRST              /*        
*S****DK          0   A   3 2WF-FE-CF-S-NM-MIDDLE             /*        
*S****DK          0   A   3 2WF-FE-CF-S-NM-LAST               /*        
*S****DK          0   A   3 2WF-FE-CF-S-SUFFIX                /*        
*S****DK          0   A   3 2WF-FE-CF-S-DOB                   /*        
*S****DK          0   A   3 2WF-FE-CF-S-SSN                   /*        
*S****DK          0   A   3 2WF-FE-CF-S-ITIN                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-AD-PHONE              /*        
*S****DK          0   A   3 2WF-FE-CF-S-EMAIL                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-AD-STRT               /*        
*S****DK          0   A   3 2WF-FE-CF-S-AD-CITY               /*        
*S****DK          0   A   3 2WF-FE-CF-S-AD-STATE              /*        
*S****DK          0   A   3 2WF-FE-CF-S-AD-ZIP                /*        
*S****DK          0   A   3 2WF-FE-CF-S-AD-COUNTRY            /*        
*S****DK          0   A   3 2WF-FE-CF-S-MAR                   /*        
*S****DK          0   A   3 2WF-FE-CF-S-YR-COL                /*        
*S****DK          0   A   3 2WF-FE-CF-S-BACH-DEG              /*        
*S****DK          0   A   3 2WF-FE-CF-S-TCH-CERT              /*        
*S****DK          0   A   3 2WF-FE-CF-S-ACTV                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-VET                   /*        
*S****DK          0   A   3 2WF-FE-CF-S-DEP                   /*        
*S****DK          0   A   3 2WF-FE-CF-S-PAR-DCSD              /*        
*S****DK          0   A   3 2WF-FE-CF-S-WARD                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-FOST                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-EMAN                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-GUAR                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-PERS-NO               /*        
*S****DK          0   A   3 2WF-FE-CF-S-UYSS                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-UGEN                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-UHS                   /*        
*S****DK          0   A   3 2WF-FE-CF-S-UTRIO                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-UFAA                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-UOTHER-NO             /*        
*S****DK          0   A   3 2WF-FE-CF-S-UN-CIRC               /*        
*S****DK          0   A   3 2WF-FE-CF-S-UNSUB                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-FAM-SIZE              /*        
*S****DK          0   A   3 2WF-FE-CF-S-FAM-COL               /*        
*S****DK          0   A   3 2WF-FE-CF-S-CIT                   /*        
*S****DK          0   A   3 2WF-FE-CF-S-ALIEN                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-RES                   /*        
*S****DK          0   A   3 2WF-FE-CF-S-RES-DATE              /*        
*S****DK          0   A   3 2WF-FE-CF-S-PARS-COLG             /*        
*S****DK          0   A   3 2WF-FE-CF-S-PARS-KDUTY            /*        
*S****DK          0   A   3 2WF-FE-CF-S-GED                   /*        
*S****DK          0   A   3 2WF-FE-CF-S-HS-NAME               /*        
*S****DK          0   A   3 2WF-FE-CF-S-HS-CITY               /*        
*S****DK          0   A   3 2WF-FE-CF-S-HS-STATE              /*        
*S****DK          0   A   3 2WF-FE-CF-S-HSE-NAME              /*        
*S****DK          0   A   3 2WF-FE-CF-S-HSE-STATE             /*        
*S****DK          0   A   3 2WF-FE-CF-S-EITC                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-HOME                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-LUNCH                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-MEDC                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-36B                   /*        
*S****DK          0   A   3 2WF-FE-CF-S-SNAP                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-SSI                   /*        
*S****DK          0   A   3 2WF-FE-CF-S-TANF                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-WIC                   /*        
*S****DK          0   A   3 2WF-FE-CF-S-NONE                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-1040R                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-NON-US                /*        
*S****DK          0   A   3 2WF-FE-CF-S-JOINT                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-FILE-STAT             /*        
*S****DK          0   A   3 2WF-FE-CF-S-INC                   /*        
*S****DK          0   A   3 2WF-FE-CF-S-U-INT                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-U-DST-IRA             /*        
*S****DK          0   A   3 2WF-FE-CF-S-U-ROLL-IRA            /*        
*S****DK          0   A   3 2WF-FE-CF-S-U-DST-PEN             /*        
*S****DK          0   A   3 2WF-FE-CF-S-U-ROLL-PEN            /*        
*S****DK          0   A   3 2WF-FE-CF-S-AGI                   /*        
*S****DK          0   A   3 2WF-FE-CF-S-FED-TAX               /*        
*S****DK          0   A   3 2WF-FE-CF-S-TAX-CRD               /*        
*S****DK          0   A   3 2WF-FE-CF-S-DED-PAY               /*        
*S****DK          0   A   3 2WF-FE-CF-S-EDCR                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-ABD-EFH               /*        
*S****DK          0   A   3 2WF-FE-CF-S-SCHEDC-AMT            /*        
*S****DK          0   A   3 2WF-FE-CF-S-GRNT                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-FGN-INC-EXC           /*        
*S****DK          0   A   3 2WF-FE-CF-S-CSUP                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-BUS-FRM               /*        
*S****DK          0   A   3 2WF-FE-CF-S-INV                   /*        
*S****DK          0   A   3 2WF-FE-CF-S-CASH                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL1                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL2                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL3                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL4                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL5                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL6                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL7                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL8                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL9                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL10                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL11                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL12                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL13                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL14                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL15                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL16                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL17                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL18                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL19                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL20                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-CONSENT               /*        
*S****DK          0   A   3 2WF-FE-CF-S-SGN                   /*        
*S****DK          0   A   3 2WF-FE-CF-S-SGN-DATE              /*        
*S****DK          0   A   3 2WF-FE-CF-SP-NM-FIRST             /*        
*S****DK          0   A   3 2WF-FE-CF-SP-NM-MIDDLE            /*        
*S****DK          0   A   3 2WF-FE-CF-SP-NM-LAST              /*        
*S****DK          0   A   3 2WF-FE-CF-SP-SUFFIX               /*        
*S****DK          0   A   3 2WF-FE-CF-SP-DOB                  /*        
*S****DK          0   A   3 2WF-FE-CF-SP-SSN                  /*        
*S****DK          0   A   3 2WF-FE-CF-SP-ITIN                 /*        
*S****DK          0   A   3 2WF-FE-CF-SP-AD-PHONE             /*        
*S****DK          0   A   3 2WF-FE-CF-SP-EMAIL                /*        
*S****DK          0   A   3 2WF-FE-CF-SP-AD-STRT              /*        
*S****DK          0   A   3 2WF-FE-CF-SP-AD-CITY              /*        
*S****DK          0   A   3 2WF-FE-CF-SP-AD-STATE             /*        
*S****DK          0   A   3 2WF-FE-CF-SP-AD-ZIP               /*        
*S****DK          0   A   3 2WF-FE-CF-SP-AD-COUNTRY           /*        
*S****DK          0   A   3 2WF-FE-CF-SP-1040R                /*        
*S****DK          0   A   3 2WF-FE-CF-SP-NON-US               /*        
*S****DK          0   A   3 2WF-FE-CF-SP-FILE-STAT            /*        
*S****DK          0   A   3 2WF-FE-CF-SP-INC                  /*        
*S****DK          0   A   3 2WF-FE-CF-SP-U-INT                /*        
*S****DK          0   A   3 2WF-FE-CF-SP-U-DST-IRA            /*        
*S****DK          0   A   3 2WF-FE-CF-SP-U-ROLL-IRA           /*        
*S****DK          0   A   3 2WF-FE-CF-SP-U-DST-PEN            /*        
*S****DK          0   A   3 2WF-FE-CF-SP-U-ROLL-PEN           /*        
*S****DK          0   A   3 2WF-FE-CF-SP-AGI                  /*        
*S****DK          0   A   3 2WF-FE-CF-SP-FED-TAX              /*        
*S****DK          0   A   3 2WF-FE-CF-SP-DED-PAY              /*        
*S****DK          0   A   3 2WF-FE-CF-SP-EDCR                 /*        
*S****DK          0   A   3 2WF-FE-CF-SP-ABD-EFH              /*        
*S****DK          0   A   3 2WF-FE-CF-SP-SCHEDC-AMT           /*        
*S****DK          0   A   3 2WF-FE-CF-SP-FGN-INC-EXC          /*        
*S****DK          0   A   3 2WF-FE-CF-SP-CONSENT              /*        
*S****DK          0   A   3 2WF-FE-CF-SP-SGN                  /*        
*S****DK          0   A   3 2WF-FE-CF-SP-SGN-DATE             /*        
*S****DK          0   A   3 2WF-FE-CF-P1-NM-FIRST             /*        
*S****DK          0   A   3 2WF-FE-CF-P1-NM-MIDDLE            /*        
*S****DK          0   A   3 2WF-FE-CF-P1-NM-LAST              /*        
*S****DK          0   A   3 2WF-FE-CF-P1-SUFFIX               /*        
*S****DK          0   A   3 2WF-FE-CF-P1-DOB                  /*        
*S****DK          0   A   3 2WF-FE-CF-P1-SSN                  /*        
*S****DK          0   A   3 2WF-FE-CF-P1-ITIN                 /*        
*S****DK          0   A   3 2WF-FE-CF-P1-AD-PHONE             /*        
*S****DK          0   A   3 2WF-FE-CF-P1-EMAIL                /*        
*S****DK          0   A   3 2WF-FE-CF-P1-AD-STRT              /*        
*S****DK          0   A   3 2WF-FE-CF-P1-AD-CITY              /*        
*S****DK          0   A   3 2WF-FE-CF-P1-AD-STATE             /*        
*S****DK          0   A   3 2WF-FE-CF-P1-AD-ZIP               /*        
*S****DK          0   A   3 2WF-FE-CF-P1-AD-COUNTRY           /*        
*S****DK          0   A   3 2WF-FE-CF-P1-MAR                  /*        
*S****DK          0   A   3 2WF-FE-CF-P1-RES                  /*        
*S****DK          0   A   3 2WF-FE-CF-P1-RES-DATE             /*        
*S****DK          0   A   3 2WF-FE-CF-P1-FAM-SIZE             /*        
*S****DK          0   A   3 2WF-FE-CF-P1-FAM-COL              /*        
*S****DK          0   A   3 2WF-FE-CF-P1-EITC                 /*        
*S****DK          0   A   3 2WF-FE-CF-P1-HOME                 /*        
*S****DK          0   A   3 2WF-FE-CF-P1-LUNCH                /*        
*S****DK          0   A   3 2WF-FE-CF-P1-MEDC                 /*        
*S****DK          0   A   3 2WF-FE-CF-P1-36B                  /*        
*S****DK          0   A   3 2WF-FE-CF-P1-SNAP                 /*        
*S****DK          0   A   3 2WF-FE-CF-P1-SSI                  /*        
*S****DK          0   A   3 2WF-FE-CF-P1-TANF                 /*        
*S****DK          0   A   3 2WF-FE-CF-P1-WIC                  /*        
*S****DK          0   A   3 2WF-FE-CF-P1-NONE                 /*        
*S****DK          0   A   3 2WF-FE-CF-P1-1040R                /*        
*S****DK          0   A   3 2WF-FE-CF-P1-NON-US               /*        
*S****DK          0   A   3 2WF-FE-CF-P1-JOINT                /*        
*S****DK          0   A   3 2WF-FE-CF-P1-FILE-STAT            /*        
*S****DK          0   A   3 2WF-FE-CF-P1-INC                  /*        
*S****DK          0   A   3 2WF-FE-CF-P1-U-INT                /*        
*S****DK          0   A   3 2WF-FE-CF-P1-U-DST-IRA            /*        
*S****DK          0   A   3 2WF-FE-CF-P1-U-ROLL-IRA           /*        
*S****DK          0   A   3 2WF-FE-CF-P1-U-DST-PEN            /*        
*S****DK          0   A   3 2WF-FE-CF-P1-U-ROLL-PEN           /*        
*S****DK          0   A   3 2WF-FE-CF-P1-AGI                  /*        
*S****DK          0   A   3 2WF-FE-CF-P1-FED-TAX              /*        
*S****DK          0   A   3 2WF-FE-CF-P1-TAX-CRD              /*        
*S****DK          0   A   3 2WF-FE-CF-P1-DED-PAY              /*        
*S****DK          0   A   3 2WF-FE-CF-P1-EDCR                 /*        
*S****DK          0   A   3 2WF-FE-CF-P1-ABD-EFH              /*        
*S****DK          0   A   3 2WF-FE-CF-P1-SCHEDC-AMT           /*        
*S****DK          0   A   3 2WF-FE-CF-P1-GRNT                 /*        
*S****DK          0   A   3 2WF-FE-CF-P1-FGN-INC-EXC          /*        
*S****DK          0   A   3 2WF-FE-CF-P1-CSUP                 /*        
*S****DK          0   A   3 2WF-FE-CF-P1-INV                  /*        
*S****DK          0   A   3 2WF-FE-CF-P1-CASH                 /*        
*S****DK          0   A   3 2WF-FE-CF-P1-BUS-FRM              /*        
*S****DK          0   A   3 2WF-FE-CF-P1-CONSENT              /*        
*S****DK          0   A   3 2WF-FE-CF-P1-SGN                  /*        
*S****DK          0   A   3 2WF-FE-CF-P1-SGN-DATE             /*        
*S****DK          0   A   3 2WF-FE-CF-P2-NM-FIRST             /*        
*S****DK          0   A   3 2WF-FE-CF-P2-NM-MIDDLE            /*        
*S****DK          0   A   3 2WF-FE-CF-P2-NM-LAST              /*        
*S****DK          0   A   3 2WF-FE-CF-P2-SUFFIX               /*        
*S****DK          0   A   3 2WF-FE-CF-P2-DOB                  /*        
*S****DK          0   A   3 2WF-FE-CF-P2-SSN                  /*        
*S****DK          0   A   3 2WF-FE-CF-P2-ITIN                 /*        
*S****DK          0   A   3 2WF-FE-CF-P2-AD-PHONE             /*        
*S****DK          0   A   3 2WF-FE-CF-P2-EMAIL                /*        
*S****DK          0   A   3 2WF-FE-CF-P2-AD-STRT              /*        
*S****DK          0   A   3 2WF-FE-CF-P2-AD-CITY              /*        
*S****DK          0   A   3 2WF-FE-CF-P2-AD-STATE             /*        
*S****DK          0   A   3 2WF-FE-CF-P2-AD-ZIP               /*        
*S****DK          0   A   3 2WF-FE-CF-P2-AD-COUNTRY           /*        
*S****DK          0   A   3 2WF-FE-CF-P2-1040R                /*        
*S****DK          0   A   3 2WF-FE-CF-P2-NON-US               /*        
*S****DK          0   A   3 2WF-FE-CF-P2-FILE-STAT            /*        
*S****DK          0   A   3 2WF-FE-CF-P2-INC                  /*        
*S****DK          0   A   3 2WF-FE-CF-P2-U-INT                /*        
*S****DK          0   A   3 2WF-FE-CF-P2-U-DST-IRA            /*        
*S****DK          0   A   3 2WF-FE-CF-P2-U-ROLL-IRA           /*        
*S****DK          0   A   3 2WF-FE-CF-P2-U-DST-PEN            /*        
*S****DK          0   A   3 2WF-FE-CF-P2-U-ROLL-PEN           /*        
*S****DK          0   A   3 2WF-FE-CF-P2-AGI                  /*        
*S****DK          0   A   3 2WF-FE-CF-P2-FED-TAX              /*        
*S****DK          0   A   3 2WF-FE-CF-P2-DED-PAY              /*        
*S****DK          0   A   3 2WF-FE-CF-P2-EDCR                 /*        
*S****DK          0   A   3 2WF-FE-CF-P2-ABD-EFH              /*        
*S****DK          0   A   3 2WF-FE-CF-P2-SCHEDC-AMT           /*        
*S****DK          0   A   3 2WF-FE-CF-P2-FGN-INC-EXC          /*        
*S****DK          0   A   3 2WF-FE-CF-P2-CONSENT              /*        
*S****DK          0   A   3 2WF-FE-CF-P2-SGN                  /*        
*S****DK          0   A   3 2WF-FE-CF-P2-SGN-DATE             /*        
*S****C           0   * 
*S****C           0   *  Matches and Other Processing Information       
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-C-MATCH-DHS                /*        
*S****DK          0   A   1 2WF-FE-C-MATCH-DHS2               /*        
*S****DK          0   A  15 2WF-FE-C-VER-DHS                  /*        
*S****DK          0   A   1 2WF-FE-C-MATCH-NSL                /*        
*S****DK          0   A   2 2WF-FE-C-NSLDS-PS1                /*        
*S****DK          0   A   2 2WF-FE-C-NSLDS-PS2                /*        
*S****DK          0   A   2 2WF-FE-C-NSLDS-PS3                /*        
*S****DK          0   A   1 2WF-FE-C-MATCH-CIT                /*        
*S****DK          0   A   1 2WF-FE-C-S-MATCH-SSN              /*        
*S****DK          0   A   1 2WF-FE-C-SP-MATCH-SSN             /*        
*S****DK          0   A   1 2WF-FE-C-P1-MATCH-SSN             /*        
*S****DK          0   A   1 2WF-FE-C-P2-MATCH-SSN             /*        
*S****DK          0   A   1 2WF-FE-C-MATCH-VA                 /*        
*S****DK          0   A   3 2WF-FE-C-COM01                    /*        
*S****DK          0   A   3 2WF-FE-C-COM02                    /*        
*S****DK          0   A   3 2WF-FE-C-COM03                    /*        
*S****DK          0   A   3 2WF-FE-C-COM04                    /*        
*S****DK          0   A   3 2WF-FE-C-COM05                    /*        
*S****DK          0   A   3 2WF-FE-C-COM06                    /*        
*S****DK          0   A   3 2WF-FE-C-COM07                    /*        
*S****DK          0   A   3 2WF-FE-C-COM08                    /*        
*S****DK          0   A   3 2WF-FE-C-COM09                    /*        
*S****DK          0   A   3 2WF-FE-C-COM10                    /*        
*S****DK          0   A   3 2WF-FE-C-COM11                    /*        
*S****DK          0   A   3 2WF-FE-C-COM12                    /*        
*S****DK          0   A   3 2WF-FE-C-COM13                    /*        
*S****DK          0   A   3 2WF-FE-C-COM14                    /*        
*S****DK          0   A   3 2WF-FE-C-COM15                    /*        
*S****DK          0   A   3 2WF-FE-C-COM16                    /*        
*S****DK          0   A   3 2WF-FE-C-COM17                    /*        
*S****DK          0   A   3 2WF-FE-C-COM18                    /*        
*S****DK          0   A   3 2WF-FE-C-COM19                    /*        
*S****DK          0   A   3 2WF-FE-C-COM20                    /*        
*S****DK          0   A   1 2WF-FE-C-DRUG-HOLD                /*        
*S****DK          0   A   1 2WF-FE-C-GRAD                     /*        
*S****DK          0   A   1 2WF-FE-C-PELL-ELIG                /*        
*S****DK          0   A   2 2WF-FE-C-REPROC-RSN               /*        
*S****DK          0   A   1 2WF-FE-C-CFLAG                    /*        
*S****DK          0   A   1 2WF-FE-C-CFLAG-CHG                /*        
*S****DK          0   A   2 2WF-FE-C-ELEC-INST                /*        
*S****DK          0   A 110 2WF-FE-C-REJ-RSNS                 /*        
*S****DK          0   A   1 2WF-FE-C-ETI                      /*        
*S****DK          0   A   1 2WF-FE-C-SSN-NM-CHG               /*        
*S****DK          0   A  12 2WF-FE-C-VER-HS                   /*        
*S****DK          0   A   1 2WF-FE-C-VER-CHG                  /*        
*S****DK          0   A   5 2WF-FE-C-USER-DATA                /*        
*S****DK          0   A   1 2WF-FE-WORKF-PGM                  /*        
*S****DK          0   A 360 2WF-FILLER20                      /*        
*S****C           0   * 
*S****C           0   *  NSLDS Information      
*S****C           0   * 
*S****DK          0   A 250 2WF-FE-L-NSLDS1                   /*        
*S****DK          0   A 250 2WF-FE-L-NSLDS2                   /*        
*S****DK          0   A 250 2WF-FE-L-NSLDS3                   /*        
*S****DK          0   A 250 2WF-FE-L-NSLDS4                   /*        
*S****DK          0   A 250 2WF-FE-L-NSLDS5                   /*        
*S****DK          0   A 250 2WF-FE-L-NSLDS6                   /*        
*S****DK          0   A 250 2WF-FE-L-NSLDS7                   /*        
*S****DK          0   A 250 2WF-FE-L-NSLDS8                   /*        
*S****DK          0   A 250 2WF-FE-L-NSLDS9                   /*        
*S****DK          0   A 250 2WF-FE-L-NSLDS10                  /*        
*S****DK          0   A  51 2WF-FE-L-NSLDS11                  /*        
*S****C           0   * 
*S****C           0   *  FTIM Information       
*S****C           0   * 
*S****DK          0   A  36 2WF-FILLER21                      /*        
*S****C           0   * 
*S****C           0   *  Student FTI-M Information          
*S****C           0   * 
*S****DK          0   A  50 2WF-FILLER22                      /*        
*S****DK          0   A  11 2WF-FE-FTI-LABEL-START            /*        
*S****DK          0   A   4 2WF-FE-FTI-S-RET-YEAR             /*        
*S****DK          0   A   1 2WF-FE-FTI-S-FILE-STAT            /*        
*S****DK          0   A  10 2WF-FE-FTI-S-AGI                  /*        
*S****DK          0   A   2 2WF-FE-FTI-S-EXE                  /*        
*S****DK          0   A   2 2WF-FE-FTI-S-DEPS                 /*        
*S****DK          0   A  11 2WF-FE-FTI-S-TOT-INC              /*        
*S****DK          0   A   9 2WF-FE-FTI-S-TOT-FED-TAX          /*        
*S****DK          0   A   9 2WF-FE-FTI-S-EDCR                 /*        
*S****DK          0   A  11 2WF-FE-FTI-S-DST-IRA              /*        
*S****DK          0   A  11 2WF-FE-FTI-S-DED-PAY              /*        
*S****DK          0   A  11 2WF-FE-FTI-S-U-INT                /*        
*S****DK          0   A  11 2WF-FE-FTI-S-DST-PEN              /*        
*S****DK          0   A  12 2WF-FE-FTI-S-SCHEDC-NET           /*        
*S****DK          0   A   1 2WF-FE-FTI-S-SCHEDA               /*        
*S****DK          0   A   1 2WF-FE-FTI-S-SCHEDB               /*        
*S****DK          0   A   1 2WF-FE-FTI-S-SCHEDD               /*        
*S****DK          0   A   1 2WF-FE-FTI-S-SCHEDE               /*        
*S****DK          0   A   1 2WF-FE-FTI-S-SCHEDF               /*        
*S****DK          0   A   1 2WF-FE-FTI-S-SCHEDH               /*        
*S****DK          0   A   3 2WF-FE-FTI-S-IRS-RESP             /*        
*S****C           0   * 
*S****C           0   *  Student Spouse FTI-M Information   
*S****C           0   * 
*S****DK          0   A   4 2WF-FE-FTI-SP-RET-YEAR            /*        
*S****DK          0   A   1 2WF-FE-FTI-SP-FILE-STAT           /*        
*S****DK          0   A  10 2WF-FE-FTI-SP-AGI                 /*        
*S****DK          0   A   2 2WF-FE-FTI-SP-EXE                 /*        
*S****DK          0   A   2 2WF-FE-FTI-SP-DEPS                /*        
*S****DK          0   A  11 2WF-FE-FTI-SP-TOT-INC             /*        
*S****DK          0   A   9 2WF-FE-FTI-SP-TOT-FED-TAX         /*        
*S****DK          0   A   9 2WF-FE-FTI-SP-EDCR                /*        
*S****DK          0   A  11 2WF-FE-FTI-SP-DST-IRA             /*        
*S****DK          0   A  11 2WF-FE-FTI-SP-DED-PAY             /*        
*S****DK          0   A  11 2WF-FE-FTI-SP-U-INT               /*        
*S****DK          0   A  11 2WF-FE-FTI-SP-DST-PEN             /*        
*S****DK          0   A  12 2WF-FE-FTI-SP-SCHEDC-NET          /*        
*S****DK          0   A   1 2WF-FE-FTI-SP-SCHEDA              /*        
*S****DK          0   A   1 2WF-FE-FTI-SP-SCHEDB              /*        
*S****DK          0   A   1 2WF-FE-FTI-SP-SCHEDD              /*        
*S****DK          0   A   1 2WF-FE-FTI-SP-SCHEDE              /*        
*S****DK          0   A   1 2WF-FE-FTI-SP-SCHEDF              /*        
*S****DK          0   A   1 2WF-FE-FTI-SP-SCHEDH              /*        
*S****DK          0   A   3 2WF-FE-FTI-SP-IRS-RESP            /*        
*S****C           0   * 
*S****C           0   *  Parent FTI-M Information           
*S****C           0   * 
*S****DK          0   A   4 2WF-FE-FTI-P1-RET-YEAR            /*        
*S****DK          0   A   1 2WF-FE-FTI-P1-FILE-STAT           /*        
*S****DK          0   A  10 2WF-FE-FTI-P1-AGI                 /*        
*S****DK          0   A   2 2WF-FE-FTI-P1-EXE                 /*        
*S****DK          0   A   2 2WF-FE-FTI-P1-DEPS                /*        
*S****DK          0   A  11 2WF-FE-FTI-P1-TOT-INC             /*        
*S****DK          0   A   9 2WF-FE-FTI-P1-TOT-FED-TAX         /*        
*S****DK          0   A   9 2WF-FE-FTI-P1-EDCR                /*        
*S****DK          0   A  11 2WF-FE-FTI-P1-DST-IRA             /*        
*S****DK          0   A  11 2WF-FE-FTI-P1-DED-PAY             /*        
*S****DK          0   A  11 2WF-FE-FTI-P1-U-INT               /*        
*S****DK          0   A  11 2WF-FE-FTI-P1-DST-PEN             /*        
*S****DK          0   A  12 2WF-FE-FTI-P1-SCHEDC-NET          /*        
*S****DK          0   A   1 2WF-FE-FTI-P1-SCHEDA              /*        
*S****DK          0   A   1 2WF-FE-FTI-P1-SCHEDB              /*        
*S****DK          0   A   1 2WF-FE-FTI-P1-SCHEDD              /*        
*S****DK          0   A   1 2WF-FE-FTI-P1-SCHEDE              /*        
*S****DK          0   A   1 2WF-FE-FTI-P1-SCHEDF              /*        
*S****DK          0   A   1 2WF-FE-FTI-P1-SCHEDH              /*        
*S****DK          0   A   3 2WF-FE-FTI-P1-IRS-RESP            /*        
*S****C           0   * 
*S****C           0   *  Parent Spouse or Partner FTI-M Information     
*S****C           0   * 
*S****DK          0   A   4 2WF-FE-FTI-P2-RET-YEAR            /*        
*S****DK          0   A   1 2WF-FE-FTI-P2-FILE-STAT           /*        
*S****DK          0   A  10 2WF-FE-FTI-P2-AGI                 /*        
*S****DK          0   A   2 2WF-FE-FTI-P2-EXE                 /*        
*S****DK          0   A   2 2WF-FE-FTI-P2-DEPS                /*        
*S****DK          0   A  11 2WF-FE-FTI-P2-TOT-INC             /*        
*S****DK          0   A   9 2WF-FE-FTI-P2-TOT-FED-TAX         /*        
*S****DK          0   A   9 2WF-FE-FTI-P2-EDCR                /*        
*S****DK          0   A  11 2WF-FE-FTI-P2-DST-IRA             /*        
*S****DK          0   A  11 2WF-FE-FTI-P2-DED-PAY             /*        
*S****DK          0   A  11 2WF-FE-FTI-P2-U-INT               /*        
*S****DK          0   A  11 2WF-FE-FTI-P2-DST-PEN             /*        
*S****DK          0   A  12 2WF-FE-FTI-P2-SCHEDC-NET          /*        
*S****DK          0   A   1 2WF-FE-FTI-P2-SCHEDA              /*        
*S****DK          0   A   1 2WF-FE-FTI-P2-SCHEDB              /*        
*S****DK          0   A   1 2WF-FE-FTI-P2-SCHEDD              /*        
*S****DK          0   A   1 2WF-FE-FTI-P2-SCHEDE              /*        
*S****DK          0   A   1 2WF-FE-FTI-P2-SCHEDF              /*        
*S****DK          0   A   1 2WF-FE-FTI-P2-SCHEDH              /*        
*S****DK          0   A   3 2WF-FE-FTI-P2-IRS-RESP            /*        
*S****DK          0   A61   2WF-FILLER50A       
*S****C           0   * 
*S****C           0   *  FTIM Processing Information        
*S****C           0   * 
*S****DK          0   A  15 2WF-FE-S-TOT-INC                  /*        
*S****DK          0   A  15 2WF-FE-P-TOT-INC                  /*        
*S****DK          0   A  15 2WF-FE-FISAP-TOT-INC              /*        
*S****DK          0   A  15 2WF-FE-P1-FC1-ATI                 /*        
*S****DK          0   A  15 2WF-FE-P1-FC1-PAYR                /*        
*S****DK          0   A  15 2WF-FE-P1-FC1-IPA                 /*        
*S****DK          0   A  15 2WF-FE-P1-FC1-EEA                 /*        
*S****DK          0   A  15 2WF-FE-P1-FC1-AI                  /*        
*S****DK          0   A  15 2WF-FE-P1-FC1-AAI                 /*        
*S****DK          0   A  15 2WF-FE-P1-FC1-CONT                /*        
*S****DK          0   A  15 2WF-FE-S-FC1-PAYR                 /*        
*S****DK          0   A  15 2WF-FE-S-FC1-IPA                  /*        
*S****DK          0   A  15 2WF-FE-S-FC1-NEG-AAI              /*        
*S****DK          0   A  15 2WF-FE-S-FC1-EEA                  /*        
*S****DK          0   A  15 2WF-FE-S-FC1-ATI                  /*        
*S****DK          0   A  15 2WF-FE-S-FC1-AI                   /*        
*S****DK          0   A  15 2WF-FE-S-FC1-CI                   /*        
*S****DK          0   A  15 2WF-FE-S-FC1-AAI                  /*        
*S****DK          0   A  15 2WF-FE-S-FC1-AAI-CONT             /*        
*S****DK          0   A  11 2WF-FE-FTI-LABEL-END              /*        
*S****DK          0   A39   2WF-FILLER50B       
*S****DR          0        R1WF27FEBL           
*S****DFR         0   A 250 2WF-AD-REC01        
*S****DFR         0   A 250 2WF-AD-REC02        
*S****DFR         0   A 250 2WF-AD-REC03        
*S****DFR         0   A 250 2WF-AD-REC04        
*S****DFR         0   A 250 2WF-AD-REC05        
*S****DFR         0   A 250 2WF-AD-REC06        
*S****DFR         0   A 250 2WF-AD-REC07        
*S****DFR         0   A 250 2WF-AD-REC08        
*S****DFR         0   A 250 2WF-AD-REC09        
*S****DFR         0   A 250 2WF-AD-REC10        
*S****DFR         0   A 250 2WF-AD-REC11        
*S****DFR         0   A 250 2WF-AD-REC12        
*S****DFR         0   A 250 2WF-AD-REC13        
*S****DFR         0   A 250 2WF-AD-REC14        
*S****DFR         0   A 250 2WF-AD-REC15        
*S****DFR         0   A 250 2WF-AD-REC16        
*S****DFR         0   A 250 2WF-AD-REC17        
*S****DFR         0   A 250 2WF-AD-REC18        
*S****DFR         0   A 250 2WF-AD-REC19        
*S****DFR         0   A 250 2WF-AD-REC20        
*S****DFR         0   A 250 2WF-AD-REC21        
*S****DFR         0   A 250 2WF-AD-REC22        
*S****DFR         0   A 250 2WF-AD-REC23        
*S****DFR         0   A 250 2WF-AD-REC24        
*S****DFR         0   A 250 2WF-AD-REC25        
*S****DFR         0   A 250 2WF-AD-REC26        
*S****DFR         0   A 250 2WF-AD-REC27        
*S****DFR         0   A 250 2WF-AD-REC28        
*S****DFR         0   A 250 2WF-AD-REC29        
*S****DFR         0   A 250 2WF-AD-REC30        
*S****DFR         0   A 250 2WF-AD-REC31        
*S****DFR         0   A 194 2WF-AD-REC32        
*S****DR          0        R1WF27FEBL           
*S****DSR         0         2WF-ISIR
*S****DFR         0   A 250 3WF-ISIR1           
*S****DFR         0   A 250 3WF-ISIR2           
*S****DFR         0   A 250 3WF-ISIR3           
*S****DFR         0   A 250 3WF-ISIR4           
*S****DFR         0   A 250 3WF-ISIR5           
*S****DFR         0   A 250 3WF-ISIR6           
*S****DFR         0   A 250 3WF-ISIR7           
*S****DFR         0   A 250 3WF-ISIR8           
*S****DFR         0   A 250 3WF-ISIR9           
*S****DFR         0   A 250 3WF-ISIR10          
*S****DFR         0   A 250 3WF-ISIR11          
*S****DFR         0   A 250 3WF-ISIR12          
*S****DFR         0   A 250 3WF-ISIR13          
*S****DFR         0   A 250 3WF-ISIR14          
*S****DFR         0   A 250 3WF-ISIR15          
*S****DFR         0   A 250 3WF-ISIR16          
*S****DFR         0   A 250 3WF-ISIR17          
*S****DFR         0   A 198 3WF-ISIR18          
*S****DSR         0         2WF-NSLDS           
*S****DFR         0   A 250 3WF-NSLDS1          
*S****DFR         0   A 250 3WF-NSLDS2          
*S****DFR         0   A 250 3WF-NSLDS3          
*S****DFR         0   A 250 3WF-NSLDS4          
*S****DFR         0   A 250 3WF-NSLDS5          
*S****DFR         0   A 250 3WF-NSLDS6          
*S****DFR         0   A 250 3WF-NSLDS7          
*S****DFR         0   A 250 3WF-NSLDS8          
*S****DFR         0   A 250 3WF-NSLDS9          
*S****DFR         0   A 250 3WF-NSLDS10         
*S****DFR         0   A  51 3WF-NSLDS11         
*S****DSR         0         2WF-ISIRB           
*S****DFR         0   A 250 3WF-ISIR19          
*S****DFR         0   A 250 3WF-ISIR20          
*S****DFR         0   A 250 3WF-ISIR21          
*S****DFR         0   A 195 3WF-ISIR22          
*S****C           0   * 
*S****C           0   * No 'N' relationships exist for:      WF-2627-FEDERAL        
*S****C           0   * 
*S****DF          0   A   1 1WF27FEBL-ID                     /* Object identifier   
*S****DR          0        R1WF27FEBL-ID                     /* REDEF. BEGIN : WF27FEBL-ID      
*S****DSR         0         2STRUCTURE                       /* To allow MOVE BY NAME           
*S****DFR         0   A   1 3WF-FE-C-BATCH-YR                /*         
*C**                                FATEMP  WF27FEDD                        P S   NN0000        
*D01NAT8304P FATEMP  WF27FEDD                        ZWDNH   ZWDNH           S      
*D02            2024040117345102024040117345100000047003    
*D03LINUX   
*D04                 ISO_8859-1:1987
*S****C           0   ***********************************************************************   
*S****C           0   * 
*S****C           0   *         WolffPack, Inc. 
*S****C           0   *                                            Copyright 1995 - 2026        
*S****C           0   * LDA:    WF27FEDD                              WolffPack, Inc.           
*S****C           0   * System: FINANCIER                           All rights reserved.        
*S****C           0   * 
*S****C           0   ***********************************************************************   
*S****DS          0         1WF27FEDD                        /* Object Name         
*S****C           0   * 
*S****C           0   * Transaction Identification:         
*S****C           0   *   FAFSA Identification UUID, Transaction UUID, Application and          
*S****C           0   *   Transaction Data Sources, Model, Transaction Dates, etc.  
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-C-BATCH-YR                /*         
*S****DK          0   A  36 2WF-FE-FAFSA-UUID                /*         
*S****DK          0   A  36 2WF-FE-TRANS-UUID                /*         
*S****DK          0   A  36 2WF-FE-PERSON-UUID               /*         
*S****DK          0   A   2 2WF-FE-C-TRANS-NO                /*         
*S****DK          0   A   1 2WF-FE-C-DEP-MODEL               /*         
*S****DK          0   A   1 2WF-FE-C-APP-SRCE                /*         
*S****DK          0   A   8 2WF-FE-C-APP-RCPT-DATE           /*         
*S****DK          0   A   1 2WF-FE-C-TRAN-SRCE               /*         
*S****DK          0   A   1 2WF-FE-C-TRAN-TYPE               /*         
*S****DK          0   A   1 2WF-FE-C-TRAN-LANG               /*         
*S****DK          0   A   8 2WF-FE-C-TRAN-RCPT-DATE          /*         
*S****DK          0   A   8 2WF-FE-C-TRAN-PROC-DATE          /*         
*S****DK          0   A  30 2WF-FE-C-TRAN-STATUS             /*         
*S****DK          0   A   3 2WF-FE-C-RENEWAL-DATA-USED       /*         
*S****DK          0   A   1 2WF-FE-C-FPS-CORR-RSN            /*         
*S****DK          0   A   1 2WF-FE-C-SAI-CHG-FLAG            /*         
*S****DK          0   A   6 2WF-FE-C-SAI                     /*         
*S****DK          0   A   6 2WF-FE-C-SAI-PROV                /*         
*S****DK          0   A   1 2WF-FE-C-SAI-FORMULA             /*         
*S****DK          0   A   2 2WF-FE-C-SAI-COMP-TYPE           /*         
*S****DK          0   A   1 2WF-FE-C-MAX-PELL-IND            /*         
*S****DK          0   A   1 2WF-FE-C-MIN-PELL-IND            /*         
*S****DK          0   A   1 2WF-FE-ISIR-VERSION-FLAG         /*         
*S****DK          0   A  49 2WF-FE-FILLER1                   /*         
*S****C           0   * 
*S****C           0   * Student Demographic, Identity, and Contact Information      
*S****C           0   * 
*S****DK          0   A  35 2WF-FE-NM-FIRST                  /*         
*S****DK          0   A  15 2WF-FE-NM-MIDDLE                 /*         
*S****DK          0   A  35 2WF-FE-NM-LAST                   /*         
*S****DK          0   A  10 2WF-FE-NM-SUFFIX                 /*         
*S****DK          0   A   8 2WF-FE-DOB                       /*         
*S****DK          0   A   9 2WF-FE-SSN                       /*         
*S****DK          0   A   9 2WF-FE-S-ITIN                    /*         
*S****DK          0   A  10 2WF-FE-AD-PHONE                  /*         
*S****DK          0   A  50 2WF-FE-EMAIL                     /*         
*S****DK          0   A  40 2WF-FE-AD-STRT                   /*         
*S****DK          0   A  30 2WF-FE-AD-CITY                   /*         
*S****DK          0   A   2 2WF-FE-AD-STATE                  /*         
*S****DK          0   A  10 2WF-FE-AD-ZIP                    /*         
*S****DK          0   A   2 2WF-FE-AD-COUNTRY                /*         
*S****DK          0   A  50 2WF-FE-FILLER2                   /*         
*S****C           0   * 
*S****C           0   * Student Non-Financial Information (Dependency, Marital Status, etc.)    
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-S-MAR                     /*         
*S****DK          0   A   1 2WF-FE-S-YR-COL                  /*         
*S****DK          0   A   1 2WF-FE-S-BACH-DEG                /*         
*S****DK          0   A   1 2WF-FE-S-TCH-CERT                /*         
*S****DK          0   A   1 2WF-FE-S-TEST-ACTV               /*         
*S****DK          0   A   1 2WF-FE-S-TEST-VET                /*         
*S****DK          0   A   1 2WF-FE-S-TEST-DEP                /*         
*S****DK          0   A   1 2WF-FE-S-TEST-PAR-DECD           /*         
*S****DK          0   A   1 2WF-FE-S-TEST-WARD               /*         
*S****DK          0   A   1 2WF-FE-S-TEST-FOST               /*         
*S****DK          0   A   1 2WF-FE-S-TEST-EMAN               /*         
*S****DK          0   A   1 2WF-FE-S-TEST-GUAR               /*         
*S****DK          0   A   1 2WF-FE-S-TEST-PERS-NO            /*         
*S****DK          0   A   1 2WF-FE-S-TEST-UYSS               /*         
*S****DK          0   A   1 2WF-FE-S-TEST-UGEN               /*         
*S****DK          0   A   1 2WF-FE-S-TEST-UHS                /*         
*S****DK          0   A   1 2WF-FE-S-TEST-UTRIO              /*         
*S****DK          0   A   1 2WF-FE-S-TEST-UFAA               /*         
*S****DK          0   A   1 2WF-FE-S-TEST-UOTHER-NO          /*         
*S****DK          0   A   1 2WF-FE-S-TEST-UN-CIRC            /*         
*S****DK          0   A   1 2WF-FE-S-TEST-UNSUB              /*         
*S****DK          0   A   2 2WF-FE-S-FAM-SIZE                /*         
*S****DK          0   A   2 2WF-FE-S-FAM-COL                 /*         
*S****C           0   * 
*S****C           0   * Student Demographic Information     
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-S-CIT                     /*         
*S****DK          0   A   9 2WF-FE-S-ALIEN                   /*         
*S****DK          0   A   2 2WF-FE-S-RES                     /*         
*S****DK          0   A   6 2WF-FE-S-RES-DATE                /*         
*S****DK          0   A   1 2WF-FE-S-PARS-COLG               /*         
*S****DK          0   A   1 2WF-FE-S-PARS-KDUTY              /*         
*S****DK          0   A   1 2WF-FE-S-HS-GED                  /*         
*S****DK          0   A  60 2WF-FE-S-HS-NAME                 /*         
*S****DK          0   A  28 2WF-FE-S-HS-CITY                 /*         
*S****DK          0   A   2 2WF-FE-S-HS-STATE                /*         
*S****DK          0   A   1 2WF-FE-S-HSE-NAME                /*         
*S****DK          0   A   2 2WF-FE-S-HSE-STATE               /*         
*S****C           0   * 
*S****C           0   * Student Manually Entered Financial  
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-S-MT-EITC                 /*         
*S****DK          0   A   1 2WF-FE-S-MT-HOME                 /*         
*S****DK          0   A   1 2WF-FE-S-MT-LUNCH                /*         
*S****DK          0   A   1 2WF-FE-S-MT-MEDC                 /*         
*S****DK          0   A   1 2WF-FE-S-MT-36B                  /*         
*S****DK          0   A   1 2WF-FE-S-MT-SNAP                 /*         
*S****DK          0   A   1 2WF-FE-S-MT-SSI                  /*         
*S****DK          0   A   1 2WF-FE-S-MT-TANF                 /*         
*S****DK          0   A   1 2WF-FE-S-MT-WIC                  /*         
*S****DK          0   A   1 2WF-FE-S-MT-NONE                 /*         
*S****DK          0   A   1 2WF-FE-S-1040R                   /*         
*S****DK          0   A   1 2WF-FE-S-NON-US                  /*         
*S****DK          0   A   1 2WF-FE-S-JOINT                   /*         
*S****DK          0   A   1 2WF-FE-S-FILE-STAT               /*         
*S****DK          0   A  11 2WF-FE-S-INC                     /*         
*S****DK          0   A  11 2WF-FE-S-U-INT                   /*         
*S****DK          0   A  11 2WF-FE-S-U-DST-IRA               /*         
*S****DK          0   A  11 2WF-FE-S-U-ROLL-IRA              /*         
*S****DK          0   A  11 2WF-FE-S-U-DST-PEN               /*         
*S****DK          0   A  11 2WF-FE-S-U-ROLL-PEN              /*         
*S****DK          0   A  10 2WF-FE-S-AGI                     /*         
*S****DK          0   A   9 2WF-FE-S-FED-TAX                 /*         
*S****DK          0   A   1 2WF-FE-S-TAX-CREDIT              /*         
*S****DK          0   A  11 2WF-FE-S-DED-PAY                 /*         
*S****DK          0   A   9 2WF-FE-S-EDCR                    /*         
*S****DK          0   A   1 2WF-FE-S-ABD-EFH                 /*         
*S****DK          0   A  12 2WF-FE-S-SCHEDC-AMT              /*         
*S****DK          0   A   7 2WF-FE-S-GRNT                    /*         
*S****DK          0   A  10 2WF-FE-S-FGN-INC-EXC             /*         
*S****DK          0   A   7 2WF-FE-S-U-CSUP                  /*         
*S****DK          0   A   7 2WF-FE-S-CASH                    /*         
*S****DK          0   A   7 2WF-FE-S-INV                     /*         
*S****DK          0   A   7 2WF-FE-S-BUS-FRM                 /*         
*S****C           0   * 
*S****C           0   * Student School Choices, Consent, and Signature  
*S****C           0   * 
*S****DK          0   A   6 2WF-FE-A-COL1                    /*         
*S****DK          0   A   6 2WF-FE-A-COL2                    /*         
*S****DK          0   A   6 2WF-FE-A-COL3                    /*         
*S****DK          0   A   6 2WF-FE-A-COL4                    /*         
*S****DK          0   A   6 2WF-FE-A-COL5                    /*         
*S****DK          0   A   6 2WF-FE-A-COL6                    /*         
*S****DK          0   A   6 2WF-FE-A-COL7                    /*         
*S****DK          0   A   6 2WF-FE-A-COL8                    /*         
*S****DK          0   A   6 2WF-FE-A-COL9                    /*         
*S****DK          0   A   6 2WF-FE-A-COL10                   /*         
*S****DK          0   A   6 2WF-FE-A-COL11                   /*         
*S****DK          0   A   6 2WF-FE-A-COL12                   /*         
*S****DK          0   A   6 2WF-FE-A-COL13                   /*         
*S****DK          0   A   6 2WF-FE-A-COL14                   /*         
*S****DK          0   A   6 2WF-FE-A-COL15                   /*         
*S****DK          0   A   6 2WF-FE-A-COL16                   /*         
*S****DK          0   A   6 2WF-FE-A-COL17                   /*         
*S****DK          0   A   6 2WF-FE-A-COL18                   /*         
*S****DK          0   A   6 2WF-FE-A-COL19                   /*         
*S****DK          0   A   6 2WF-FE-A-COL20                   /*         
*S****DK          0   A   1 2WF-FE-S-CONSENT                 /*         
*S****DK          0   A   1 2WF-FE-S-SGN                     /*         
*S****DK          0   A   8 2WF-FE-S-SGN-DATE                /*         
*S****DK          0   A  50 2WW-FILLER-3                     /*         
*S****C           0   * 
*S****C           0   * Student Spouse Demographic, Identity, and Contact Information           
*S****C           0   * 
*S****DK          0   A  35 2WF-FE-SP-NM-FIRST               /*         
*S****DK          0   A  15 2WF-FE-SP-NM-MIDDLE              /*         
*S****DK          0   A  35 2WF-FE-SP-NM-LAST                /*         
*S****DK          0   A  10 2WF-FE-SP-SUFFIX                 /*         
*S****DK          0   A   8 2WF-FE-SP-DOB                    /*         
*S****DK          0   A   9 2WF-FE-SP-SSN                    /*         
*S****DK          0   A   9 2WF-FE-SP-ITIN                   /*         
*S****DK          0   A  10 2WF-FE-SP-PHONE                  /*         
*S****DK          0   A  50 2WF-FE-SP-EMAIL                  /*         
*S****DK          0   A  40 2WF-FE-SP-AD-STRT                /*         
*S****DK          0   A  30 2WF-FE-SP-AD-CITY                /*         
*S****DK          0   A   2 2WF-FE-SP-AD-STATE               /*         
*S****DK          0   A  10 2WF-FE-SP-AD-ZIP                 /*         
*S****DK          0   A   2 2WF-FE-SP-AD-COUNTRY             /*         
*S****C           0   * 
*S****C           0   * Student Spouse Manually Entered Financial Information,      
*S****C           0   *  Consent, and Sign      
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-SP-1040R                  /*         
*S****DK          0   A   1 2WF-FE-SP-NON-US                 /*         
*S****DK          0   A   1 2WF-FE-SP-FILE-STAT              /*         
*S****DK          0   A  11 2WF-FE-SP-INC                    /*         
*S****DK          0   A  11 2WF-FE-SP-U-INT                  /*         
*S****DK          0   A  11 2WF-FE-SP-U-DST-IRA              /*         
*S****DK          0   A  11 2WF-FE-SP-U-ROLL-IRA             /*         
*S****DK          0   A  11 2WF-FE-SP-U-DST-PEN              /*         
*S****DK          0   A  11 2WF-FE-SP-U-ROLL-PEN             /*         
*S****DK          0   A  10 2WF-FE-SP-AGI                    /*         
*S****DK          0   A   9 2WF-FE-SP-FED-TAX                /*         
*S****DK          0   A  11 2WF-FE-SP-DED-PAY                /*         
*S****DK          0   A   9 2WF-FE-SP-EDCR                   /*         
*S****DK          0   A   1 2WF-FE-SP-ABD-EFH                /*         
*S****DK          0   A  12 2WF-FE-SP-SCHEDC-AMT             /*         
*S****DK          0   A  10 2WF-FE-SP-FGN-INC-EXC            /*         
*S****DK          0   A   1 2WF-FE-SP-CONSENT                /*         
*S****DK          0   A   1 2WF-FE-SP-SGN                    /*         
*S****DK          0   A   8 2WF-FE-SP-SGN-DATE               /*         
*S****DK          0   A  50 2WW-FILLER-4                     /*         
*S****C           0   * 
*S****C           0   * Parent Demographic, Identity, and Contact Information       
*S****C           0   * 
*S****DK          0   A  35 2WF-FE-P1-FIRST                  /*         
*S****DK          0   A  15 2WF-FE-P1-MIDDLE                 /*         
*S****DK          0   A  35 2WF-FE-P1-LAST                   /*         
*S****DK          0   A  10 2WF-FE-P1-SUFFIX                 /*         
*S****DK          0   A   8 2WF-FE-P1-DOB                    /*         
*S****DK          0   A   9 2WF-FE-P1-SSN                    /*         
*S****DK          0   A   9 2WF-FE-P1-ITIN                   /*         
*S****DK          0   A  10 2WF-FE-P1-PHONE                  /*         
*S****DK          0   A  50 2WF-FE-P1-EMAIL                  /*         
*S****DK          0   A  40 2WF-FE-P1-AD-STRT                /*         
*S****DK          0   A  30 2WF-FE-P1-AD-CITY                /*         
*S****DK          0   A   2 2WF-FE-P1-AD-STATE               /*         
*S****DK          0   A  10 2WF-FE-P1-AD-ZIP                 /*         
*S****DK          0   A   2 2WF-FE-P1-AD-COUNTRY             /*         
*S****C           0   * 
*S****C           0   * Parent Non-Financial Information    
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-P1-MAR                    /*         
*S****DK          0   A   2 2WF-FE-P1-RES                    /*         
*S****DK          0   A   6 2WF-FE-P1-RES-DATE               /*         
*S****DK          0   A   2 2WF-FE-P1-FAM-SIZE               /*         
*S****DK          0   A   2 2WF-FE-P1-FAM-COL                /*         
*S****C           0   * 
*S****C           0   * Parent Manually Entered Financial Information, Consent,     
*S****C           0   *  and Signature          
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-P1-EITC                   /*         
*S****DK          0   A   1 2WF-FE-P1-MT-HOME                /*         
*S****DK          0   A   1 2WF-FE-P1-MT-LUNCH               /*         
*S****DK          0   A   1 2WF-FE-P1-MT-MEDC                /*         
*S****DK          0   A   1 2WF-FE-P1-MT-36B                 /*         
*S****DK          0   A   1 2WF-FE-P1-MT-SNAP                /*         
*S****DK          0   A   1 2WF-FE-P1-MT-SSI                 /*         
*S****DK          0   A   1 2WF-FE-P1-MT-TANF                /*         
*S****DK          0   A   1 2WF-FE-P1-MT-WIC                 /*         
*S****DK          0   A   1 2WF-FE-P1-MT-NONE                /*         
*S****DK          0   A   1 2WF-FE-P1-1040R                  /*         
*S****DK          0   A   1 2WF-FE-P1-NON-US                 /*         
*S****DK          0   A   1 2WF-FE-P1-JOINT                  /*         
*S****DK          0   A   1 2WF-FE-P1-FILE-STAT              /*         
*S****DK          0   A  11 2WF-FE-P1-INC                    /*         
*S****DK          0   A  11 2WF-FE-P1-U-INT                  /*         
*S****DK          0   A  11 2WF-FE-P1-U-DST-IRA              /*         
*S****DK          0   A  11 2WF-FE-P1-U-ROLL-IRA             /*         
*S****DK          0   A  11 2WF-FE-P1-U-DST-PEN              /*         
*S****DK          0   A  11 2WF-FE-P1-U-ROLL-PEN             /*         
*S****DK          0   A  10 2WF-FE-P1-AGI                    /*         
*S****DK          0   A   9 2WF-FE-P1-FED-TAX                /*         
*S****DK          0   A   1 2WF-FE-P1-TAX-CREDIT             /*         
*S****DK          0   A  11 2WF-FE-P1-DED-PAY                /*         
*S****DK          0   A   9 2WF-FE-P1-EDCR                   /*         
*S****DK          0   A   1 2WF-FE-P1-ABD-EFH                /*         
*S****DK          0   A  12 2WF-FE-P1-SCHEDC-AMT             /*         
*S****DK          0   A   7 2WF-FE-P1-A-GRANT                /*         
*S****DK          0   A  10 2WF-FE-P1-FGN-INC-EXC            /*         
*S****DK          0   A   7 2WF-FE-P1-U-CSUP                 /*         
*S****DK          0   A   7 2WF-FE-P1-CASH                   /*         
*S****DK          0   A   7 2WF-FE-P1-INV                    /*         
*S****DK          0   A   7 2WF-FE-P1-BUS-FRM                /*         
*S****DK          0   A   1 2WF-FE-P1-CONSENT                /*         
*S****DK          0   A   1 2WF-FE-P1-SGN                    /*         
*S****DK          0   A   8 2WF-FE-P1-SGN-DATE               /*         
*S****DK          0   A  50 2WW-FILLER-5                     /*         
*S****C           0   * 
*S****C           0   * Parent Spouse or Partner Demographic, Identity, 
*S****C           0   *  and Contact Information
*S****C           0   * 
*S****DK          0   A  35 2WF-FE-P2-NM-FIRST               /*         
*S****DK          0   A  15 2WF-FE-P2-NM-MIDDLE              /*         
*S****DK          0   A  35 2WF-FE-P2-NM-LAST                /*         
*S****DK          0   A  10 2WF-FE-P2-SUFFIX                 /*         
*S****DK          0   A   8 2WF-FE-P2-DOB                    /*         
*S****DK          0   A   9 2WF-FE-P2-SSN                    /*         
*S****DK          0   A   9 2WF-FE-P2-ITIN                   /*         
*S****DK          0   A  10 2WF-FE-P2-PHONE                  /*         
*S****DK          0   A  50 2WF-FE-P2-EMAIL                  /*         
*S****DK          0   A  40 2WF-FE-P2-AD-STRT                /*         
*S****DK          0   A  30 2WF-FE-P2-AD-CITY                /*         
*S****DK          0   A   2 2WF-FE-P2-AD-STATE               /*         
*S****DK          0   A  10 2WF-FE-P2-AD-ZIP                 /*         
*S****DK          0   A   2 2WF-FE-P2-AD-COUNTRY             /*         
*S****C           0   * 
*S****C           0   * Parent Spouse or Partner Manually Entered Financial Information,        
*S****C           0   *  Consent    
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-P2-1040R                  /*         
*S****DK          0   A   1 2WF-FE-P2-NON-US                 /*         
*S****DK          0   A   1 2WF-FE-P2-FILE-STAT              /*         
*S****DK          0   A  11 2WF-FE-P2-INC                    /*         
*S****DK          0   A  11 2WF-FE-P2-U-INT                  /*         
*S****DK          0   A  11 2WF-FE-P2-U-DST-IRA              /*         
*S****DK          0   A  11 2WF-FE-P2-U-ROLL-IRA             /*         
*S****DK          0   A  11 2WF-FE-P2-U-DST-PEN              /*         
*S****DK          0   A  11 2WF-FE-P2-U-ROLL-PEN             /*         
*S****DK          0   A  10 2WF-FE-P2-AGI                    /*         
*S****DK          0   A   9 2WF-FE-P2-FED-TAX                /*         
*S****DK          0   A  11 2WF-FE-P2-DED-PAY                /*         
*S****DK          0   A   9 2WF-FE-P2-EDCR                   /*         
*S****DK          0   A   1 2WF-FE-P2-ABD-EFH                /*         
*S****DK          0   A  12 2WF-FE-P2-SCHEDC-AMT             /*         
*S****DK          0   A  10 2WF-FE-P2-FGN-INC-EXC            /*         
*S****DK          0   A   1 2WF-FE-P2-CONSENT                /*         
*S****DK          0   A   1 2WF-FE-P2-SGN                    /*         
*S****DK          0   A   8 2WF-FE-P2-SGN-DATE               /*         
*S****DK          0   A  50 2WW-FILLER-6                     /*         
*S****C           0   * 
*S****C           0   * Preparer Information    
*S****C           0   *  Indicates that a preparer filled out the application and   
*S****C           0   *   provided their        
*S****C           0   * 
*S****DK          0   A  35 2WF-FE-A-PREP-FIRST              /*         
*S****DK          0   A  35 2WF-FE-A-PREP-LAST               /*         
*S****DK          0   A   9 2WF-FE-A-PREP-SSN                /*         
*S****DK          0   A   9 2WF-FE-A-PREP-EIN                /*         
*S****DK          0   A  30 2WF-FE-A-PREP-AFFL               /*         
*S****DK          0   A  40 2WF-FE-A-PREP-STRT               /*         
*S****DK          0   A  30 2WF-FE-A-PREP-CITY               /*         
*S****DK          0   A   2 2WF-FE-A-PREP-STATE              /*         
*S****DK          0   A  10 2WF-FE-A-PREP-ZIP                /*         
*S****DK          0   A   1 2WF-FE-A-PREP-SGN                /*         
*S****DK          0   A   8 2WF-FE-A-PREP-SGN-DT             /*         
*S****DK          0   A  50 2WW-FILLER-7                     /*         
*S****C           0   * 
*S****C           0   *  FPS Processing Information         
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-S-AFFIRM                  /*         
*S****DK          0   A   1 2WF-FE-SP-AFFIRM                 /*         
*S****DK          0   A   1 2WF-FE-P1-AFFIRM                 /*         
*S****DK          0   A   1 2WF-FE-P2-AFFIRM                 /*         
*S****DK          0   A   8 2WF-FE-S-CNST-DATE               /*         
*S****DK          0   A   8 2WF-FE-SP-CNST-DATE              /*         
*S****DK          0   A   8 2WF-FE-P1-CNST-DATE              /*         
*S****DK          0   A   8 2WF-FE-P2-CNST-DATE              /*         
*S****DK          0   A   1 2WF-FE-S-TRANU-MATCH             /*         
*S****DK          0   A   1 2WF-FE-SP-TRANU-MATCH            /*         
*S****DK          0   A   1 2WF-FE-P1-TRANU-MATCH            /*         
*S****DK          0   A   1 2WF-FE-P2-TRANU-MATCH            /*         
*S****DK          0   A   2 2WF-FE-C-COR-TRAN                /*         
*S****DK          0   A   1 2WF-FE-F-PROF-JUDG               /*         
*S****DK          0   A   1 2WF-FE-F-DEP-OVR                 /*         
*S****DK          0   A   6 2WF-FE-F-COLLEGE                 /*         
*S****DK          0   A   1 2WF-FE-F-SIGN                    /*         
*S****DK          0   A   1 2WF-FE-F-IASG                    /*         
*S****DK          0   A   1 2WF-FE-C-CHILD-HERO              /*         
*S****DK          0   A   7 2WF-FE-C-ETI-DEST                /*         
*S****DK          0   A   1 2WF-FE-S-SGN-SRC                 /*         
*S****DK          0   A   1 2WF-FE-SP-SGN-SRC                /*         
*S****DK          0   A   1 2WF-FE-P1-SGN-SRC                /*         
*S****DK          0   A   1 2WF-FE-P2-SGN-SRC                /*         
*S****DK          0   A   1 2WF-FE-SPEC-HAND                 /*         
*S****DK          0   A   1 2WF-FE-C-ADDR-CHG                /*         
*S****DK          0   A   1 2WF-FE-C-PUSHED                  /*         
*S****DK          0   A   1 2WF-FE-C-REJ-CHG                 /*         
*S****DK          0   A   2 2WF-FE-C-VER-TRACK               /*         
*S****DK          0   A   1 2WF-FE-C-VER                     /*         
*S****DK          0   A   1 2WF-FE-INCARCERATED              /*         
*S****DK          0   A   2 2WF-FE-C-NSLDS-TRAN              /*         
*S****DK          0   A   1 2WF-FE-C-VER-NSL                 /*         
*S****DK          0   A   1 2WF-FE-C-MATCH-HS                /*         
*S****DK          0   A  12 2WF-FE-S-FWS                     /*         
*S****DK          0   A  12 2WF-FE-SP-FWS                    /*         
*S****DK          0   A  12 2WF-FE-P1-FWS                    /*         
*S****DK          0   A  12 2WF-FE-P2-FWS                    /*         
*S****DK          0   A 240 2WW-FILLER-8                     /*         
*S****DK          0   A   7 2WF-FE-P1-FC1-DNW                /*         
*S****DK          0   A   7 2WF-FE-P1-FC1-NW                 /*         
*S****DK          0   A  12 2WF-FE-P1-FC1-APA                /*         
*S****DK          0   A  12 2WF-FE-P1-FC1-CA                 /*         
*S****DK          0   A   7 2WF-FE-S-FC1-NW                  /*         
*S****DK          0   A  12 2WF-FE-S-FC1-APA                 /*         
*S****DK          0   A  12 2WF-FE-S-FC1-CA                  /*         
*S****DK          0   A   3 2WF-FE-CAS-FAM-SIZE              /*         
*S****DK          0   A   3 2WF-FE-CAP-FAM-SIZE              /*         
*S****C           0   * 
*S****C           0   *  Correction, Highlight, and Verify Flags        
*S****C           0   * 
*S****DK          0   A   3 2WF-FE-CF-S-NM-FIRST             /*         
*S****DK          0   A   3 2WF-FE-CF-S-NM-MIDDLE            /*         
*S****DK          0   A   3 2WF-FE-CF-S-NM-LAST              /*         
*S****DK          0   A   3 2WF-FE-CF-S-SUFFIX               /*         
*S****DK          0   A   3 2WF-FE-CF-S-DOB                  /*         
*S****DK          0   A   3 2WF-FE-CF-S-SSN                  /*         
*S****DK          0   A   3 2WF-FE-CF-S-ITIN                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-AD-PHONE             /*         
*S****DK          0   A   3 2WF-FE-CF-S-EMAIL                /*         
*S****DK          0   A   3 2WF-FE-CF-S-AD-STRT              /*         
*S****DK          0   A   3 2WF-FE-CF-S-AD-CITY              /*         
*S****DK          0   A   3 2WF-FE-CF-S-AD-STATE             /*         
*S****DK          0   A   3 2WF-FE-CF-S-AD-ZIP               /*         
*S****DK          0   A   3 2WF-FE-CF-S-AD-COUNTRY           /*         
*S****DK          0   A   3 2WF-FE-CF-S-MAR                  /*         
*S****DK          0   A   3 2WF-FE-CF-S-YR-COL               /*         
*S****DK          0   A   3 2WF-FE-CF-S-BACH-DEG             /*         
*S****DK          0   A   3 2WF-FE-CF-S-TCH-CERT             /*         
*S****DK          0   A   3 2WF-FE-CF-S-ACTV                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-VET                  /*         
*S****DK          0   A   3 2WF-FE-CF-S-DEP                  /*         
*S****DK          0   A   3 2WF-FE-CF-S-PAR-DCSD             /*         
*S****DK          0   A   3 2WF-FE-CF-S-WARD                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-FOST                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-EMAN                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-GUAR                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-PERS-NO              /*         
*S****DK          0   A   3 2WF-FE-CF-S-UYSS                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-UGEN                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-UHS                  /*         
*S****DK          0   A   3 2WF-FE-CF-S-UTRIO                /*         
*S****DK          0   A   3 2WF-FE-CF-S-UFAA                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-UOTHER-NO            /*         
*S****DK          0   A   3 2WF-FE-CF-S-UN-CIRC              /*         
*S****DK          0   A   3 2WF-FE-CF-S-UNSUB                /*         
*S****DK          0   A   3 2WF-FE-CF-S-FAM-SIZE             /*         
*S****DK          0   A   3 2WF-FE-CF-S-FAM-COL              /*         
*S****DK          0   A   3 2WF-FE-CF-S-CIT                  /*         
*S****DK          0   A   3 2WF-FE-CF-S-ALIEN                /*         
*S****DK          0   A   3 2WF-FE-CF-S-RES                  /*         
*S****DK          0   A   3 2WF-FE-CF-S-RES-DATE             /*         
*S****DK          0   A   3 2WF-FE-CF-S-PARS-COLG            /*         
*S****DK          0   A   3 2WF-FE-CF-S-PARS-KDUTY           /*         
*S****DK          0   A   3 2WF-FE-CF-S-GED                  /*         
*S****DK          0   A   3 2WF-FE-CF-S-HS-NAME              /*         
*S****DK          0   A   3 2WF-FE-CF-S-HS-CITY              /*         
*S****DK          0   A   3 2WF-FE-CF-S-HS-STATE             /*         
*S****DK          0   A   3 2WF-FE-CF-S-HSE-NAME             /*         
*S****DK          0   A   3 2WF-FE-CF-S-HSE-STATE            /*         
*S****DK          0   A   3 2WF-FE-CF-S-EITC                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-HOME                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-LUNCH                /*         
*S****DK          0   A   3 2WF-FE-CF-S-MEDC                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-36B                  /*         
*S****DK          0   A   3 2WF-FE-CF-S-SNAP                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-SSI                  /*         
*S****DK          0   A   3 2WF-FE-CF-S-TANF                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-WIC                  /*         
*S****DK          0   A   3 2WF-FE-CF-S-NONE                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-1040R                /*         
*S****DK          0   A   3 2WF-FE-CF-S-NON-US               /*         
*S****DK          0   A   3 2WF-FE-CF-S-JOINT                /*         
*S****DK          0   A   3 2WF-FE-CF-S-FILE-STAT            /*         
*S****DK          0   A   3 2WF-FE-CF-S-INC                  /*         
*S****DK          0   A   3 2WF-FE-CF-S-U-INT                /*         
*S****DK          0   A   3 2WF-FE-CF-S-U-DST-IRA            /*         
*S****DK          0   A   3 2WF-FE-CF-S-U-ROLL-IRA           /*         
*S****DK          0   A   3 2WF-FE-CF-S-U-DST-PEN            /*         
*S****DK          0   A   3 2WF-FE-CF-S-U-ROLL-PEN           /*         
*S****DK          0   A   3 2WF-FE-CF-S-AGI                  /*         
*S****DK          0   A   3 2WF-FE-CF-S-FED-TAX              /*         
*S****DK          0   A   3 2WF-FE-CF-S-TAX-CRD              /*         
*S****DK          0   A   3 2WF-FE-CF-S-DED-PAY              /*         
*S****DK          0   A   3 2WF-FE-CF-S-EDCR                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-ABD-EFH              /*         
*S****DK          0   A   3 2WF-FE-CF-S-SCHEDC-AMT           /*         
*S****DK          0   A   3 2WF-FE-CF-S-GRNT                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-FGN-INC-EXC          /*         
*S****DK          0   A   3 2WF-FE-CF-S-CSUP                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-BUS-FRM              /*         
*S****DK          0   A   3 2WF-FE-CF-S-INV                  /*         
*S****DK          0   A   3 2WF-FE-CF-S-CASH                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL1                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL2                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL3                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL4                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL5                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL6                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL7                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL8                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL9                 /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL10                /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL11                /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL12                /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL13                /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL14                /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL15                /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL16                /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL17                /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL18                /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL19                /*         
*S****DK          0   A   3 2WF-FE-CF-S-COL20                /*         
*S****DK          0   A   3 2WF-FE-CF-S-CONSENT              /*         
*S****DK          0   A   3 2WF-FE-CF-S-SGN                  /*         
*S****DK          0   A   3 2WF-FE-CF-S-SGN-DATE             /*         
*S****DK          0   A   3 2WF-FE-CF-SP-NM-FIRST            /*         
*S****DK          0   A   3 2WF-FE-CF-SP-NM-MIDDLE           /*         
*S****DK          0   A   3 2WF-FE-CF-SP-NM-LAST             /*         
*S****DK          0   A   3 2WF-FE-CF-SP-SUFFIX              /*         
*S****DK          0   A   3 2WF-FE-CF-SP-DOB                 /*         
*S****DK          0   A   3 2WF-FE-CF-SP-SSN                 /*         
*S****DK          0   A   3 2WF-FE-CF-SP-ITIN                /*         
*S****DK          0   A   3 2WF-FE-CF-SP-AD-PHONE            /*         
*S****DK          0   A   3 2WF-FE-CF-SP-EMAIL               /*         
*S****DK          0   A   3 2WF-FE-CF-SP-AD-STRT             /*         
*S****DK          0   A   3 2WF-FE-CF-SP-AD-CITY             /*         
*S****DK          0   A   3 2WF-FE-CF-SP-AD-STATE            /*         
*S****DK          0   A   3 2WF-FE-CF-SP-AD-ZIP              /*         
*S****DK          0   A   3 2WF-FE-CF-SP-AD-COUNTRY          /*         
*S****DK          0   A   3 2WF-FE-CF-SP-1040R               /*         
*S****DK          0   A   3 2WF-FE-CF-SP-NON-US              /*         
*S****DK          0   A   3 2WF-FE-CF-SP-FILE-STAT           /*         
*S****DK          0   A   3 2WF-FE-CF-SP-INC                 /*         
*S****DK          0   A   3 2WF-FE-CF-SP-U-INT               /*         
*S****DK          0   A   3 2WF-FE-CF-SP-U-DST-IRA           /*         
*S****DK          0   A   3 2WF-FE-CF-SP-U-ROLL-IRA          /*         
*S****DK          0   A   3 2WF-FE-CF-SP-U-DST-PEN           /*         
*S****DK          0   A   3 2WF-FE-CF-SP-U-ROLL-PEN          /*         
*S****DK          0   A   3 2WF-FE-CF-SP-AGI                 /*         
*S****DK          0   A   3 2WF-FE-CF-SP-FED-TAX             /*         
*S****DK          0   A   3 2WF-FE-CF-SP-DED-PAY             /*         
*S****DK          0   A   3 2WF-FE-CF-SP-EDCR                /*         
*S****DK          0   A   3 2WF-FE-CF-SP-ABD-EFH             /*         
*S****DK          0   A   3 2WF-FE-CF-SP-SCHEDC-AMT          /*         
*S****DK          0   A   3 2WF-FE-CF-SP-FGN-INC-EXC         /*         
*S****DK          0   A   3 2WF-FE-CF-SP-CONSENT             /*         
*S****DK          0   A   3 2WF-FE-CF-SP-SGN                 /*         
*S****DK          0   A   3 2WF-FE-CF-SP-SGN-DATE            /*         
*S****DK          0   A   3 2WF-FE-CF-P1-NM-FIRST            /*         
*S****DK          0   A   3 2WF-FE-CF-P1-NM-MIDDLE           /*         
*S****DK          0   A   3 2WF-FE-CF-P1-NM-LAST             /*         
*S****DK          0   A   3 2WF-FE-CF-P1-SUFFIX              /*         
*S****DK          0   A   3 2WF-FE-CF-P1-DOB                 /*         
*S****DK          0   A   3 2WF-FE-CF-P1-SSN                 /*         
*S****DK          0   A   3 2WF-FE-CF-P1-ITIN                /*         
*S****DK          0   A   3 2WF-FE-CF-P1-AD-PHONE            /*         
*S****DK          0   A   3 2WF-FE-CF-P1-EMAIL               /*         
*S****DK          0   A   3 2WF-FE-CF-P1-AD-STRT             /*         
*S****DK          0   A   3 2WF-FE-CF-P1-AD-CITY             /*         
*S****DK          0   A   3 2WF-FE-CF-P1-AD-STATE            /*         
*S****DK          0   A   3 2WF-FE-CF-P1-AD-ZIP              /*         
*S****DK          0   A   3 2WF-FE-CF-P1-AD-COUNTRY          /*         
*S****DK          0   A   3 2WF-FE-CF-P1-MAR                 /*         
*S****DK          0   A   3 2WF-FE-CF-P1-RES                 /*         
*S****DK          0   A   3 2WF-FE-CF-P1-RES-DATE            /*         
*S****DK          0   A   3 2WF-FE-CF-P1-FAM-SIZE            /*         
*S****DK          0   A   3 2WF-FE-CF-P1-FAM-COL             /*         
*S****DK          0   A   3 2WF-FE-CF-P1-EITC                /*         
*S****DK          0   A   3 2WF-FE-CF-P1-HOME                /*         
*S****DK          0   A   3 2WF-FE-CF-P1-LUNCH               /*         
*S****DK          0   A   3 2WF-FE-CF-P1-MEDC                /*         
*S****DK          0   A   3 2WF-FE-CF-P1-36B                 /*         
*S****DK          0   A   3 2WF-FE-CF-P1-SNAP                /*         
*S****DK          0   A   3 2WF-FE-CF-P1-SSI                 /*         
*S****DK          0   A   3 2WF-FE-CF-P1-TANF                /*         
*S****DK          0   A   3 2WF-FE-CF-P1-WIC                 /*         
*S****DK          0   A   3 2WF-FE-CF-P1-NONE                /*         
*S****DK          0   A   3 2WF-FE-CF-P1-1040R               /*         
*S****DK          0   A   3 2WF-FE-CF-P1-NON-US              /*         
*S****DK          0   A   3 2WF-FE-CF-P1-JOINT               /*         
*S****DK          0   A   3 2WF-FE-CF-P1-FILE-STAT           /*         
*S****DK          0   A   3 2WF-FE-CF-P1-INC                 /*         
*S****DK          0   A   3 2WF-FE-CF-P1-U-INT               /*         
*S****DK          0   A   3 2WF-FE-CF-P1-U-DST-IRA           /*         
*S****DK          0   A   3 2WF-FE-CF-P1-U-ROLL-IRA          /*         
*S****DK          0   A   3 2WF-FE-CF-P1-U-DST-PEN           /*         
*S****DK          0   A   3 2WF-FE-CF-P1-U-ROLL-PEN          /*         
*S****DK          0   A   3 2WF-FE-CF-P1-AGI                 /*         
*S****DK          0   A   3 2WF-FE-CF-P1-FED-TAX             /*         
*S****DK          0   A   3 2WF-FE-CF-P1-TAX-CRD             /*         
*S****DK          0   A   3 2WF-FE-CF-P1-DED-PAY             /*         
*S****DK          0   A   3 2WF-FE-CF-P1-EDCR                /*         
*S****DK          0   A   3 2WF-FE-CF-P1-ABD-EFH             /*         
*S****DK          0   A   3 2WF-FE-CF-P1-SCHEDC-AMT          /*         
*S****DK          0   A   3 2WF-FE-CF-P1-GRNT                /*         
*S****DK          0   A   3 2WF-FE-CF-P1-FGN-INC-EXC         /*         
*S****DK          0   A   3 2WF-FE-CF-P1-CSUP                /*         
*S****DK          0   A   3 2WF-FE-CF-P1-INV                 /*         
*S****DK          0   A   3 2WF-FE-CF-P1-CASH                /*         
*S****DK          0   A   3 2WF-FE-CF-P1-BUS-FRM             /*         
*S****DK          0   A   3 2WF-FE-CF-P1-CONSENT             /*         
*S****DK          0   A   3 2WF-FE-CF-P1-SGN                 /*         
*S****DK          0   A   3 2WF-FE-CF-P1-SGN-DATE            /*         
*S****DK          0   A   3 2WF-FE-CF-P2-NM-FIRST            /*         
*S****DK          0   A   3 2WF-FE-CF-P2-NM-MIDDLE           /*         
*S****DK          0   A   3 2WF-FE-CF-P2-NM-LAST             /*         
*S****DK          0   A   3 2WF-FE-CF-P2-SUFFIX              /*         
*S****DK          0   A   3 2WF-FE-CF-P2-DOB                 /*         
*S****DK          0   A   3 2WF-FE-CF-P2-SSN                 /*         
*S****DK          0   A   3 2WF-FE-CF-P2-ITIN                /*         
*S****DK          0   A   3 2WF-FE-CF-P2-AD-PHONE            /*         
*S****DK          0   A   3 2WF-FE-CF-P2-EMAIL               /*         
*S****DK          0   A   3 2WF-FE-CF-P2-AD-STRT             /*         
*S****DK          0   A   3 2WF-FE-CF-P2-AD-CITY             /*         
*S****DK          0   A   3 2WF-FE-CF-P2-AD-STATE            /*         
*S****DK          0   A   3 2WF-FE-CF-P2-AD-ZIP              /*         
*S****DK          0   A   3 2WF-FE-CF-P2-AD-COUNTRY          /*         
*S****DK          0   A   3 2WF-FE-CF-P2-1040R               /*         
*S****DK          0   A   3 2WF-FE-CF-P2-NON-US              /*         
*S****DK          0   A   3 2WF-FE-CF-P2-FILE-STAT           /*         
*S****DK          0   A   3 2WF-FE-CF-P2-INC                 /*         
*S****DK          0   A   3 2WF-FE-CF-P2-U-INT               /*         
*S****DK          0   A   3 2WF-FE-CF-P2-U-DST-IRA           /*         
*S****DK          0   A   3 2WF-FE-CF-P2-U-ROLL-IRA          /*         
*S****DK          0   A   3 2WF-FE-CF-P2-U-DST-PEN           /*         
*S****DK          0   A   3 2WF-FE-CF-P2-U-ROLL-PEN          /*         
*S****DK          0   A   3 2WF-FE-CF-P2-AGI                 /*         
*S****DK          0   A   3 2WF-FE-CF-P2-FED-TAX             /*         
*S****DK          0   A   3 2WF-FE-CF-P2-DED-PAY             /*         
*S****DK          0   A   3 2WF-FE-CF-P2-EDCR                /*         
*S****DK          0   A   3 2WF-FE-CF-P2-ABD-EFH             /*         
*S****DK          0   A   3 2WF-FE-CF-P2-SCHEDC-AMT          /*         
*S****DK          0   A   3 2WF-FE-CF-P2-FGN-INC-EXC         /*         
*S****DK          0   A   3 2WF-FE-CF-P2-CONSENT             /*         
*S****DK          0   A   3 2WF-FE-CF-P2-SGN                 /*         
*S****DK          0   A   3 2WF-FE-CF-P2-SGN-DATE            /*         
*S****C           0   * 
*S****C           0   *  Matches and Other Processing Information       
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-C-MATCH-DHS               /*         
*S****DK          0   A   1 2WF-FE-C-MATCH-DHS2              /*         
*S****DK          0   A  15 2WF-FE-C-VER-DHS                 /*         
*S****DK          0   A   1 2WF-FE-C-MATCH-NSL               /*         
*S****DK          0   A   2 2WF-FE-C-NSLDS-PS1               /*         
*S****DK          0   A   2 2WF-FE-C-NSLDS-PS2               /*         
*S****DK          0   A   2 2WF-FE-C-NSLDS-PS3               /*         
*S****DK          0   A   1 2WF-FE-C-MATCH-CIT               /*         
*S****DK          0   A   1 2WF-FE-C-S-MATCH-SSN             /*         
*S****DK          0   A   1 2WF-FE-C-SP-MATCH-SSN            /*         
*S****DK          0   A   1 2WF-FE-C-P1-MATCH-SSN            /*         
*S****DK          0   A   1 2WF-FE-C-P2-MATCH-SSN            /*         
*S****DK          0   A   1 2WF-FE-C-MATCH-VA                /*         
*S****DK          0   A   3 2WF-FE-C-COM01                   /*         
*S****DK          0   A   3 2WF-FE-C-COM02                   /*         
*S****DK          0   A   3 2WF-FE-C-COM03                   /*         
*S****DK          0   A   3 2WF-FE-C-COM04                   /*         
*S****DK          0   A   3 2WF-FE-C-COM05                   /*         
*S****DK          0   A   3 2WF-FE-C-COM06                   /*         
*S****DK          0   A   3 2WF-FE-C-COM07                   /*         
*S****DK          0   A   3 2WF-FE-C-COM08                   /*         
*S****DK          0   A   3 2WF-FE-C-COM09                   /*         
*S****DK          0   A   3 2WF-FE-C-COM10                   /*         
*S****DK          0   A   3 2WF-FE-C-COM11                   /*         
*S****DK          0   A   3 2WF-FE-C-COM12                   /*         
*S****DK          0   A   3 2WF-FE-C-COM13                   /*         
*S****DK          0   A   3 2WF-FE-C-COM14                   /*         
*S****DK          0   A   3 2WF-FE-C-COM15                   /*         
*S****DK          0   A   3 2WF-FE-C-COM16                   /*         
*S****DK          0   A   3 2WF-FE-C-COM17                   /*         
*S****DK          0   A   3 2WF-FE-C-COM18                   /*         
*S****DK          0   A   3 2WF-FE-C-COM19                   /*         
*S****DK          0   A   3 2WF-FE-C-COM20                   /*         
*S****DK          0   A   1 2WF-FE-C-DRUG-HOLD               /*         
*S****DK          0   A   1 2WF-FE-C-GRAD                    /*         
*S****DK          0   A   1 2WF-FE-C-PELL-ELIG               /*         
*S****DK          0   A   2 2WF-FE-C-REPROC-RSN              /*         
*S****DK          0   A   1 2WF-FE-C-CFLAG                   /*         
*S****DK          0   A   1 2WF-FE-C-CFLAG-CHG               /*         
*S****DK          0   A   2 2WF-FE-C-ELEC-INST               /*         
*S****DK          0   A 110 2WF-FE-C-REJ-RSNS                /*         
*S****DK          0   A   1 2WF-FE-C-ETI                     /*         
*S****DK          0   A   1 2WF-FE-C-SSN-NM-CHG              /*         
*S****DK          0   A  12 2WF-FE-C-VER-HS                  /*         
*S****DK          0   A   1 2WF-FE-C-VER-CHG                 /*         
*S****DK          0   A   5 2WF-FE-C-USER-DATA               /*         
*S****DK          0   A   1 2WF-FE-WORKF-PGM                 /*         
*S****DK          0   A 360 2WF-FILLER20                     /*         
*S****C           0   * 
*S****C           0   *  NSLDS Information      
*S****C           0   * 
*S****DK          0   A 250 2WF-FE-L-NSLDS1                  /*         
*S****DK          0   A 250 2WF-FE-L-NSLDS2                  /*         
*S****DK          0   A 250 2WF-FE-L-NSLDS3                  /*         
*S****DK          0   A 250 2WF-FE-L-NSLDS4                  /*         
*S****DK          0   A 250 2WF-FE-L-NSLDS5                  /*         
*S****DK          0   A 250 2WF-FE-L-NSLDS6                  /*         
*S****DK          0   A 250 2WF-FE-L-NSLDS7                  /*         
*S****DK          0   A 250 2WF-FE-L-NSLDS8                  /*         
*S****DK          0   A 250 2WF-FE-L-NSLDS9                  /*         
*S****DK          0   A 250 2WF-FE-L-NSLDS10                 /*         
*S****DK          0   A  51 2WF-FE-L-NSLDS11                 /*         
*S****C           0   * 
*S****C           0   *  FTIM Information       
*S****C           0   * 
*S****DK          0   A  36 2WF-FILLER21                     /*         
*S****C           0   * 
*S****C           0   *  Student FTI-M Information          
*S****C           0   * 
*S****DK          0   A  50 2WF-FILLER22                     /*         
*S****DK          0   A  11 2WF-FE-FTI-LABEL-START           /*         
*S****DK          0   A   4 2WF-FE-FTI-S-RET-YEAR            /*         
*S****DK          0   A   1 2WF-FE-FTI-S-FILE-STAT           /*         
*S****DK          0   A  10 2WF-FE-FTI-S-AGI                 /*         
*S****DK          0   A   2 2WF-FE-FTI-S-EXE                 /*         
*S****DK          0   A   2 2WF-FE-FTI-S-DEPS                /*         
*S****DK          0   A  11 2WF-FE-FTI-S-TOT-INC             /*         
*S****DK          0   A   9 2WF-FE-FTI-S-TOT-FED-TAX         /*         
*S****DK          0   A   9 2WF-FE-FTI-S-EDCR                /*         
*S****DK          0   A  11 2WF-FE-FTI-S-DST-IRA             /*         
*S****DK          0   A  11 2WF-FE-FTI-S-DED-PAY             /*         
*S****DK          0   A  11 2WF-FE-FTI-S-U-INT               /*         
*S****DK          0   A  11 2WF-FE-FTI-S-DST-PEN             /*         
*S****DK          0   A  12 2WF-FE-FTI-S-SCHEDC-NET          /*         
*S****DK          0   A   1 2WF-FE-FTI-S-SCHEDA              /*         
*S****DK          0   A   1 2WF-FE-FTI-S-SCHEDB              /*         
*S****DK          0   A   1 2WF-FE-FTI-S-SCHEDD              /*         
*S****DK          0   A   1 2WF-FE-FTI-S-SCHEDE              /*         
*S****DK          0   A   1 2WF-FE-FTI-S-SCHEDF              /*         
*S****DK          0   A   1 2WF-FE-FTI-S-SCHEDH              /*         
*S****DK          0   A   3 2WF-FE-FTI-S-IRS-RESP            /*         
*S****C           0   * 
*S****C           0   *  Student Spouse FTI-M Information   
*S****C           0   * 
*S****DK          0   A   4 2WF-FE-FTI-SP-RET-YEAR           /*         
*S****DK          0   A   1 2WF-FE-FTI-SP-FILE-STAT          /*         
*S****DK          0   A  10 2WF-FE-FTI-SP-AGI                /*         
*S****DK          0   A   2 2WF-FE-FTI-SP-EXE                /*         
*S****DK          0   A   2 2WF-FE-FTI-SP-DEPS               /*         
*S****DK          0   A  11 2WF-FE-FTI-SP-TOT-INC            /*         
*S****DK          0   A   9 2WF-FE-FTI-SP-TOT-FED-TAX        /*         
*S****DK          0   A   9 2WF-FE-FTI-SP-EDCR               /*         
*S****DK          0   A  11 2WF-FE-FTI-SP-DST-IRA            /*         
*S****DK          0   A  11 2WF-FE-FTI-SP-DED-PAY            /*         
*S****DK          0   A  11 2WF-FE-FTI-SP-U-INT              /*         
*S****DK          0   A  11 2WF-FE-FTI-SP-DST-PEN            /*         
*S****DK          0   A  12 2WF-FE-FTI-SP-SCHEDC-NET         /*         
*S****DK          0   A   1 2WF-FE-FTI-SP-SCHEDA             /*         
*S****DK          0   A   1 2WF-FE-FTI-SP-SCHEDB             /*         
*S****DK          0   A   1 2WF-FE-FTI-SP-SCHEDD             /*         
*S****DK          0   A   1 2WF-FE-FTI-SP-SCHEDE             /*         
*S****DK          0   A   1 2WF-FE-FTI-SP-SCHEDF             /*         
*S****DK          0   A   1 2WF-FE-FTI-SP-SCHEDH             /*         
*S****DK          0   A   3 2WF-FE-FTI-SP-IRS-RESP           /*         
*S****C           0   * 
*S****C           0   *  Parent FTI-M Information           
*S****C           0   * 
*S****DK          0   A   4 2WF-FE-FTI-P1-RET-YEAR           /*         
*S****DK          0   A   1 2WF-FE-FTI-P1-FILE-STAT          /*         
*S****DK          0   A  10 2WF-FE-FTI-P1-AGI                /*         
*S****DK          0   A   2 2WF-FE-FTI-P1-EXE                /*         
*S****DK          0   A   2 2WF-FE-FTI-P1-DEPS               /*         
*S****DK          0   A  11 2WF-FE-FTI-P1-TOT-INC            /*         
*S****DK          0   A   9 2WF-FE-FTI-P1-TOT-FED-TAX        /*         
*S****DK          0   A   9 2WF-FE-FTI-P1-EDCR               /*         
*S****DK          0   A  11 2WF-FE-FTI-P1-DST-IRA            /*         
*S****DK          0   A  11 2WF-FE-FTI-P1-DED-PAY            /*         
*S****DK          0   A  11 2WF-FE-FTI-P1-U-INT              /*         
*S****DK          0   A  11 2WF-FE-FTI-P1-DST-PEN            /*         
*S****DK          0   A  12 2WF-FE-FTI-P1-SCHEDC-NET         /*         
*S****DK          0   A   1 2WF-FE-FTI-P1-SCHEDA             /*         
*S****DK          0   A   1 2WF-FE-FTI-P1-SCHEDB             /*         
*S****DK          0   A   1 2WF-FE-FTI-P1-SCHEDD             /*         
*S****DK          0   A   1 2WF-FE-FTI-P1-SCHEDE             /*         
*S****DK          0   A   1 2WF-FE-FTI-P1-SCHEDF             /*         
*S****DK          0   A   1 2WF-FE-FTI-P1-SCHEDH             /*         
*S****DK          0   A   3 2WF-FE-FTI-P1-IRS-RESP           /*         
*S****C           0   * 
*S****C           0   *  Parent Spouse or Partner FTI-M Information     
*S****C           0   * 
*S****DK          0   A   4 2WF-FE-FTI-P2-RET-YEAR           /*         
*S****DK          0   A   1 2WF-FE-FTI-P2-FILE-STAT          /*         
*S****DK          0   A  10 2WF-FE-FTI-P2-AGI                /*         
*S****DK          0   A   2 2WF-FE-FTI-P2-EXE                /*         
*S****DK          0   A   2 2WF-FE-FTI-P2-DEPS               /*         
*S****DK          0   A  11 2WF-FE-FTI-P2-TOT-INC            /*         
*S****DK          0   A   9 2WF-FE-FTI-P2-TOT-FED-TAX        /*         
*S****DK          0   A   9 2WF-FE-FTI-P2-EDCR               /*         
*S****DK          0   A  11 2WF-FE-FTI-P2-DST-IRA            /*         
*S****DK          0   A  11 2WF-FE-FTI-P2-DED-PAY            /*         
*S****DK          0   A  11 2WF-FE-FTI-P2-U-INT              /*         
*S****DK          0   A  11 2WF-FE-FTI-P2-DST-PEN            /*         
*S****DK          0   A  12 2WF-FE-FTI-P2-SCHEDC-NET         /*         
*S****DK          0   A   1 2WF-FE-FTI-P2-SCHEDA             /*         
*S****DK          0   A   1 2WF-FE-FTI-P2-SCHEDB             /*         
*S****DK          0   A   1 2WF-FE-FTI-P2-SCHEDD             /*         
*S****DK          0   A   1 2WF-FE-FTI-P2-SCHEDE             /*         
*S****DK          0   A   1 2WF-FE-FTI-P2-SCHEDF             /*         
*S****DK          0   A   1 2WF-FE-FTI-P2-SCHEDH             /*         
*S****DK          0   A   3 2WF-FE-FTI-P2-IRS-RESP           /*         
*S****DK          0   A  61 2WF-FILLER50A                    /*         
*S****C           0   * 
*S****C           0   *  FTIM Processing Information        
*S****C           0   * 
*S****DK          0   A  15 2WF-FE-S-TOT-INC                 /*         
*S****DK          0   A  15 2WF-FE-P-TOT-INC                 /*         
*S****DK          0   A  15 2WF-FE-FISAP-TOT-INC             /*         
*S****DK          0   A  15 2WF-FE-P1-FC1-ATI                /*         
*S****DK          0   A  15 2WF-FE-P1-FC1-PAYR               /*         
*S****DK          0   A  15 2WF-FE-P1-FC1-IPA                /*         
*S****DK          0   A  15 2WF-FE-P1-FC1-EEA                /*         
*S****DK          0   A  15 2WF-FE-P1-FC1-AI                 /*         
*S****DK          0   A  15 2WF-FE-P1-FC1-AAI                /*         
*S****DK          0   A  15 2WF-FE-P1-FC1-CONT               /*         
*S****DK          0   A  15 2WF-FE-S-FC1-PAYR                /*         
*S****DK          0   A  15 2WF-FE-S-FC1-IPA                 /*         
*S****DK          0   A  15 2WF-FE-S-FC1-NEG-AAI             /*         
*S****DK          0   A  15 2WF-FE-S-FC1-EEA                 /*         
*S****DK          0   A  15 2WF-FE-S-FC1-ATI                 /*         
*S****DK          0   A  15 2WF-FE-S-FC1-AI                  /*         
*S****DK          0   A  15 2WF-FE-S-FC1-CI                  /*         
*S****DK          0   A  15 2WF-FE-S-FC1-AAI                 /*         
*S****DK          0   A  15 2WF-FE-S-FC1-AAI-CONT            /*         
*S****DK          0   A  11 2WF-FE-FTI-LABEL-END             /*         
*S****DK          0   A  39 2WF-FILLER50B                    /*         
*S****C           0   * 
*S****C           0   * No 'N' relationships exist for:      WF-2627-FEDERAL        
*S****C           0   * 
*S****DF          0   A   1 1WF27FEDL-ID                     /* Object identifier   
*S****DR          0        R1WF27FEDL-ID                     /* REDEF. BEGIN : WF27FEDL-ID      
*S****DSR         0         2STRUCTURE                       /* To allow MOVE BY NAME           
*S****DFR         0   A   1 3WF-FE-C-BATCH-YR                /*         
*C**                                FATEMP  WF27FEDL                        L S   NN0000        
*D01NAT8304L FATEMP  WF27FEDL                        ZWDNH   ZWDNH           S      
*D02            2025082823080702025082823080700000050200    
*D03LINUX   
*D04                 ISO_8859-1:1987
*S****C           0   ***********************************************************************   
*S****C           0   * 
*S****C           0   *         WolffPack, Inc. 
*S****C           0   *                                            Copyright 1995 - 2026        
*S****C           0   * LDA:    WF27FEDL                              WolffPack, Inc.           
*S****C           0   * System: FINANCIER                           All rights reserved.        
*S****C           0   * 
*S****C           0   ***********************************************************************   
*S****DS          0         1WF27FEDL                        /* Object Name         
*S****C           0   * 
*S****C           0   * Transaction Identification:         
*S****C           0   *   FAFSA Identification UUID, Transaction UUID, Application and          
*S****C           0   *   Transaction Data Sources, Model, Transaction Dates, etc.  
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-C-BATCH-YR                /*         
*S****DK          0   A  36 2WF-FE-FAFSA-UUID                /*         
*S****DK          0   A  36 2WF-FE-TRANS-UUID                /*         
*S****DK          0   A  36 2WF-FE-PERSON-UUID               /*         
*S****DK          0   A   2 2WF-FE-C-TRANS-NO                /*         
*S****DK          0   A   1 2WF-FE-C-DEP-MODEL               /*         
*S****DK          0   A   1 2WF-FE-C-APP-SRCE                /*         
*S****DK          0   A   8 2WF-FE-C-APP-RCPT-DATE           /*         
*S****DK          0   A   1 2WF-FE-C-TRAN-SRCE               /*         
*S****DK          0   A   1 2WF-FE-C-TRAN-TYPE               /*         
*S****DK          0   A   1 2WF-FE-C-TRAN-LANG               /*         
*S****DK          0   A   8 2WF-FE-C-TRAN-RCPT-DATE          /*         
*S****DK          0   A   8 2WF-FE-C-TRAN-PROC-DATE          /*         
*S****DK          0   A  30 2WF-FE-C-TRAN-STATUS             /*         
*S****DK          0   A   3 2WF-FE-C-RENEWAL-DATA-USED       /*         
*S****DK          0   A   1 2WF-FE-C-FPS-CORR-RSN            /*         
*S****DK          0   A   1 2WF-FE-C-SAI-CHG-FLAG            /*         
*S****DK          0   A   6 2WF-FE-C-SAI                     /*         
*S****DK          0   A   6 2WF-FE-C-SAI-PROV                /*         
*S****DK          0   A   1 2WF-FE-C-SAI-FORMULA             /*         
*S****DK          0   A   2 2WF-FE-C-SAI-COMP-TYPE           /*         
*S****DK          0   A   1 2WF-FE-C-MAX-PELL-IND            /*         
*S****DK          0   A   1 2WF-FE-C-MIN-PELL-IND            /*         
*S****DK          0   A   1 2WF-FE-ISIR-VERSION-FLAG         /*         
*S****DK          0   A  49 2WF-FE-FILLER1                   /*         
*S****C           0   * 
*S****C           0   * Student Demographic, Identity, and  
*S****C           0   *   Contact Information   
*S****C           0   * 
*S****DK          0   A  35 2WF-FE-NM-FIRST                  /*         
*S****DK          0   A  15 2WF-FE-NM-MIDDLE                 /*         
*S****DK          0   A  35 2WF-FE-NM-LAST                   /*         
*S****DK          0   A  10 2WF-FE-NM-SUFFIX                 /*         
*S****DK          0   A   8 2WF-FE-DOB                       /*         
*S****DK          0   A   9 2WF-FE-SSN                       /*         
*S****DK          0   A   9 2WF-FE-ITIN                      /*         
*S****DK          0   A  10 2WF-FE-AD-PHONE                  /*         
*S****DK          0   A  50 2WF-FE-EMAIL                     /*         
*S****DK          0   A  40 2WF-FE-AD-STRT                   /*         
*S****DK          0   A  30 2WF-FE-AD-CITY                   /*         
*S****DK          0   A   2 2WF-FE-AD-STATE                  /*         
*S****DK          0   A  10 2WF-FE-AD-ZIP                    /*         
*S****DK          0   A   2 2WF-FE-AD-COUNTRY                /*         
*S****DK          0   A  50 2WF-FE-FILLER2                   /*         
*S****C           0   * 
*S****C           0   * Student Non-Financial Information   
*S****C           0   *   (Dependency, Marital Status, etc.)
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-S-MAR                     /*         
*S****DK          0   A   1 2WF-FE-S-YR-COL                  /*         
*S****DK          0   A   1 2WF-FE-S-BACH-DEG                /*         
*S****DK          0   A   1 2WF-FE-S-TCH-CERT                /*         
*S****DK          0   A   1 2WF-FE-S-TEST-ACTV               /*         
*S****DK          0   A   1 2WF-FE-S-TEST-VET                /*         
*S****DK          0   A   1 2WF-FE-S-TEST-DEP                /*         
*S****DK          0   A   1 2WF-FE-S-TEST-PAR-DECD           /*         
*S****DK          0   A   1 2WF-FE-S-TEST-WARD               /*         
*S****DK          0   A   1 2WF-FE-S-TEST-FOST               /*         
*S****DK          0   A   1 2WF-FE-S-TEST-EMAN               /*         
*S****DK          0   A   1 2WF-FE-S-TEST-GUAR               /*         
*S****DK          0   A   1 2WF-FE-S-TEST-PERS-NO            /*         
*S****DK          0   A   1 2WF-FE-S-TEST-UYSS               /*         
*S****DK          0   A   1 2WF-FE-S-TEST-UGEN               /*         
*S****DK          0   A   1 2WF-FE-S-TEST-UHS                /*         
*S****DK          0   A   1 2WF-FE-S-TEST-UTRIO              /*         
*S****DK          0   A   1 2WF-FE-S-TEST-UFAA               /*         
*S****DK          0   A   1 2WF-FE-S-TEST-UOTHER-NO          /*         
*S****DK          0   A   1 2WF-FE-S-TEST-UN-CIRC            /*         
*S****DK          0   A   1 2WF-FE-S-TEST-UNSUB              /*         
*S****DK          0   A   2 2WF-FE-S-FAM-SIZE                /*         
*S****DK          0   A   2 2WF-FE-S-FAM-COL                 /*         
*S****C           0   * 
*S****C           0   * Student Demographic Information     
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-S-CIT                     /*         
*S****DK          0   A   9 2WF-FE-S-ALIEN                   /*         
*S****DK          0   A   2 2WF-FE-S-RES                     /*         
*S****DK          0   A   6 2WF-FE-S-RES-DATE                /*         
*S****DK          0   A   1 2WF-FE-S-PARS-COLG               /*         
*S****DK          0   A   1 2WF-FE-S-PARS-KDUTY              /*         
*S****DK          0   A   1 2WF-FE-S-HS-GED                  /*         
*S****DK          0   A  60 2WF-FE-S-HS-NAME                 /*         
*S****DK          0   A  28 2WF-FE-S-HS-CITY                 /*         
*S****DK          0   A   2 2WF-FE-S-HS-STATE                /*         
*S****DK          0   A   1 2WF-FE-S-HSE-NAME                /*         
*S****DK          0   A   2 2WF-FE-S-HSE-STATE               /*         
*S****C           0   * 
*S****C           0   * Student Manually Entered Financial  
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-S-MT-EITC                 /*         
*S****DK          0   A   1 2WF-FE-S-MT-HOME                 /*         
*S****DK          0   A   1 2WF-FE-S-MT-LUNCH                /*         
*S****DK          0   A   1 2WF-FE-S-MT-MEDC                 /*         
*S****DK          0   A   1 2WF-FE-S-MT-36B                  /*         
*S****DK          0   A   1 2WF-FE-S-MT-SNAP                 /*         
*S****DK          0   A   1 2WF-FE-S-MT-SSI                  /*         
*S****DK          0   A   1 2WF-FE-S-MT-TANF                 /*         
*S****DK          0   A   1 2WF-FE-S-MT-WIC                  /*         
*S****DK          0   A   1 2WF-FE-S-MT-NONE                 /*         
*S****DK          0   A   1 2WF-FE-S-1040R                   /*         
*S****DK          0   A   1 2WF-FE-S-NON-US                  /*         
*S****DK          0   A   1 2WF-FE-S-JOINT                   /*         
*S****DK          0   A   1 2WF-FE-S-FILE-STAT               /*         
*S****DK          0   A  11 2WF-FE-S-INC                     /*         
*S****DK          0   A  11 2WF-FE-S-U-INT                   /*         
*S****DK          0   A  11 2WF-FE-S-U-DST-IRA               /*         
*S****DK          0   A  11 2WF-FE-S-U-ROLL-IRA              /*         
*S****DK          0   A  11 2WF-FE-S-U-DST-PEN               /*         
*S****DK          0   A  11 2WF-FE-S-U-ROLL-PEN              /*         
*S****DK          0   A  10 2WF-FE-S-AGI                     /*         
*S****DK          0   A   9 2WF-FE-S-FED-TAX                 /*         
*S****DK          0   A   1 2WF-FE-S-TAX-CREDIT              /*         
*S****DK          0   A  11 2WF-FE-S-DED-PAY                 /*         
*S****DK          0   A   9 2WF-FE-S-EDCR                    /*         
*S****DK          0   A   1 2WF-FE-S-ABD-EFH                 /*         
*S****DK          0   A  12 2WF-FE-S-SCHEDC-AMT              /*         
*S****DK          0   A   7 2WF-FE-S-GRNT                    /*         
*S****DK          0   A  10 2WF-FE-S-FGN-INC-EXC             /*         
*S****DK          0   A   7 2WF-FE-S-U-CSUP                  /*         
*S****DK          0   A   7 2WF-FE-S-CASH                    /*         
*S****DK          0   A   7 2WF-FE-S-INV                     /*         
*S****DK          0   A   7 2WF-FE-S-BUS-FRM                 /*         
*S****C           0   * 
*S****C           0   * Student School Choices, Consent,    
*S****C           0   *    and Signature        
*S****C           0   * 
*S****DK          0   A   6 2WF-FE-A-COL1                    /*         
*S****DK          0   A   6 2WF-FE-A-COL2                    /*         
*S****DK          0   A   6 2WF-FE-A-COL3                    /*         
*S****DK          0   A   6 2WF-FE-A-COL4                    /*         
*S****DK          0   A   6 2WF-FE-A-COL5                    /*         
*S****DK          0   A   6 2WF-FE-A-COL6                    /*         
*S****DK          0   A   6 2WF-FE-A-COL7                    /*         
*S****DK          0   A   6 2WF-FE-A-COL8                    /*         
*S****DK          0   A   6 2WF-FE-A-COL9                    /*         
*S****DK          0   A   6 2WF-FE-A-COL10                   /*         
*S****DK          0   A   6 2WF-FE-A-COL11                   /*         
*S****DK          0   A   6 2WF-FE-A-COL12                   /*         
*S****DK          0   A   6 2WF-FE-A-COL13                   /*         
*S****DK          0   A   6 2WF-FE-A-COL14                   /*         
*S****DK          0   A   6 2WF-FE-A-COL15                   /*         
*S****DK          0   A   6 2WF-FE-A-COL16                   /*         
*S****DK          0   A   6 2WF-FE-A-COL17                   /*         
*S****DK          0   A   6 2WF-FE-A-COL18                   /*         
*S****DK          0   A   6 2WF-FE-A-COL19                   /*         
*S****DK          0   A   6 2WF-FE-A-COL20                   /*         
*S****DK          0   A   1 2WF-FE-S-CONSENT                 /*         
*S****DK          0   A   1 2WF-FE-S-SGN                     /*         
*S****DK          0   A   8 2WF-FE-S-SGN-DATE                /*         
*S****DK          0   A  50 2WW-FILLER-3                     /*         
*S****C           0   * 
*S****C           0   * Student Spouse Demographic, Identity,           
*S****C           0   *    and Contact Information          
*S****C           0   * 
*S****DK          0   A  35 2WF-FE-SP-NM-FIRST               /*         
*S****DK          0   A  15 2WF-FE-SP-NM-MIDDLE              /*         
*S****DK          0   A  35 2WF-FE-SP-NM-LAST                /*         
*S****DK          0   A  10 2WF-FE-SP-SUFFIX                 /*         
*S****DK          0   A   8 2WF-FE-SP-DOB                    /*         
*S****DK          0   A   9 2WF-FE-SP-SSN                    /*         
*S****DK          0   A   9 2WF-FE-SP-ITIN                   /*         
*S****DK          0   A  10 2WF-FE-SP-PHONE                  /*         
*S****DK          0   A  50 2WF-FE-SP-EMAIL                  /*         
*S****DK          0   A  40 2WF-FE-SP-AD-STRT                /*         
*S****DK          0   A  30 2WF-FE-SP-AD-CITY                /*         
*S****DK          0   A   2 2WF-FE-SP-AD-STATE               /*         
*S****DK          0   A  10 2WF-FE-SP-AD-ZIP                 /*         
*S****DK          0   A   2 2WF-FE-SP-AD-COUNTRY             /*         
*S****C           0   * 
*S****C           0   * Student Spouse Manually Entered     
*S****C           0   *   Financial Information, Consent,   
*S****C           0   *    and Sign 
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-SP-1040R                  /*         
*S****DK          0   A   1 2WF-FE-SP-NON-US                 /*         
*S****DK          0   A   1 2WF-FE-SP-FILE-STAT              /*         
*S****DK          0   A  11 2WF-FE-SP-INC                    /*         
*S****DK          0   A  11 2WF-FE-SP-U-INT                  /*         
*S****DK          0   A  11 2WF-FE-SP-U-DST-IRA              /*         
*S****DK          0   A  11 2WF-FE-SP-U-ROLL-IRA             /*         
*S****DK          0   A  11 2WF-FE-SP-U-DST-PEN              /*         
*S****DK          0   A  11 2WF-FE-SP-U-ROLL-PEN             /*         
*S****DK          0   A  10 2WF-FE-SP-AGI                    /*         
*S****DK          0   A   9 2WF-FE-SP-FED-TAX                /*         
*S****DK          0   A  11 2WF-FE-SP-DED-PAY                /*         
*S****DK          0   A   9 2WF-FE-SP-EDCR                   /*         
*S****DK          0   A   1 2WF-FE-SP-ABD-EFH                /*         
*S****DK          0   A  12 2WF-FE-SP-SCHEDC-AMT             /*         
*S****DK          0   A  10 2WF-FE-SP-FGN-INC-EXC            /*         
*S****DK          0   A   1 2WF-FE-SP-CONSENT                /*         
*S****DK          0   A   1 2WF-FE-SP-SGN                    /*         
*S****DK          0   A   8 2WF-FE-SP-SGN-DATE               /*         
*S****DK          0   A  50 2WW-FILLER-4                     /*         
*S****C           0   * 
*S****C           0   * Parent Demographic, Identity, and   
*S****C           0   *   Contact Information   
*S****C           0   * 
*S****DK          0   A  35 2WF-FE-P1-NM-FIRST               /*         
*S****DK          0   A  15 2WF-FE-P1-NM-MIDDLE              /*         
*S****DK          0   A  35 2WF-FE-P1-NM-LAST                /*         
*S****DK          0   A  10 2WF-FE-P1-SUFFIX                 /*         
*S****DK          0   A   8 2WF-FE-P1-DOB                    /*         
*S****DK          0   A   9 2WF-FE-P1-SSN                    /*         
*S****DK          0   A   9 2WF-FE-P1-ITIN                   /*         
*S****DK          0   A  10 2WF-FE-P1-PHONE                  /*         
*S****DK          0   A  50 2WF-FE-P1-EMAIL                  /*         
*S****DK          0   A  40 2WF-FE-P1-AD-STRT                /*         
*S****DK          0   A  30 2WF-FE-P1-AD-CITY                /*         
*S****DK          0   A   2 2WF-FE-P1-AD-STATE               /*         
*S****DK          0   A  10 2WF-FE-P1-AD-ZIP                 /*         
*S****DK          0   A   2 2WF-FE-P1-AD-COUNTRY             /*         
*S****C           0   * 
*S****C           0   * Parent Non-Financial Information    
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-P1-MAR                     /*        
*S****DK          0   A   2 2WF-FE-P1-RES                     /*        
*S****DK          0   A   6 2WF-FE-P1-RES-DATE                /*        
*S****DK          0   A   2 2WF-FE-P1-FAM-SIZE                /*        
*S****DK          0   A   2 2WF-FE-P1-FAM-COL                 /*        
*S****C           0   * 
*S****C           0   * Parent Manually Entered Financial Information,  
*S****C           0   *   Consent, and Signature
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-P1-EITC                    /*        
*S****DK          0   A   1 2WF-FE-P1-MT-HOME                 /*        
*S****DK          0   A   1 2WF-FE-P1-MT-LUNCH                /*        
*S****DK          0   A   1 2WF-FE-P1-MT-MEDC                 /*        
*S****DK          0   A   1 2WF-FE-P1-MT-36B                  /*        
*S****DK          0   A   1 2WF-FE-P1-MT-SNAP                 /*        
*S****DK          0   A   1 2WF-FE-P1-MT-SSI                  /*        
*S****DK          0   A   1 2WF-FE-P1-MT-TANF                 /*        
*S****DK          0   A   1 2WF-FE-P1-MT-WIC                  /*        
*S****DK          0   A   1 2WF-FE-P1-MT-NONE                 /*        
*S****DK          0   A   1 2WF-FE-P1-MT-1040R                /*        
*S****DK          0   A   1 2WF-FE-P1-MT-NON-US               /*        
*S****DK          0   A   1 2WF-FE-P1-JOINT                   /*        
*S****DK          0   A   1 2WF-FE-P1-FILE-STAT               /*        
*S****DK          0   A  11 2WF-FE-P1-INC                     /*        
*S****DK          0   A  11 2WF-FE-P1-U-INT                   /*        
*S****DK          0   A  11 2WF-FE-P1-U-DST-IRA               /*        
*S****DK          0   A  11 2WF-FE-P1-U-ROLL-IRA              /*        
*S****DK          0   A  11 2WF-FE-P1-U-DST-PEN               /*        
*S****DK          0   A  11 2WF-FE-P1-U-ROLL-PEN              /*        
*S****DK          0   A  10 2WF-FE-P1-AGI                     /*        
*S****DK          0   A   9 2WF-FE-P1-FED-TAX                 /*        
*S****DK          0   A   1 2WF-FE-P1-TAX-CREDIT              /*        
*S****DK          0   A  11 2WF-FE-P1-DED-PAY                 /*        
*S****DK          0   A   9 2WF-FE-P1-EDCR                    /*        
*S****DK          0   A   1 2WF-FE-P1-ABD-EFH                 /*        
*S****DK          0   A  12 2WF-FE-P1-SCHEDC-AMT              /*        
*S****DK          0   A   7 2WF-FE-P1-A-GRANT                 /*        
*S****DK          0   A  10 2WF-FE-P1-FGN-INC-EXC             /*        
*S****DK          0   A   7 2WF-FE-P1-U-CSUP                  /*        
*S****DK          0   A   7 2WF-FE-P1-CASH                    /*        
*S****DK          0   A   7 2WF-FE-P1-INV                     /*        
*S****DK          0   A   7 2WF-FE-P1-BUS-FRM                 /*        
*S****DK          0   A   1 2WF-FE-P1-CONSENT                 /*        
*S****DK          0   A   1 2WF-FE-P1-SGN                     /*        
*S****DK          0   A   8 2WF-FE-P1-SGN-DATE                /*        
*S****DK          0   A  50 2WW-FILLER-5                      /*        
*S****C           0   * 
*S****C           0   * Parent Spouse or Partner Demographic,           
*S****C           0   *   Identity, and Contact Information 
*S****C           0   * 
*S****DK          0   A  35 2WF-FE-P2-NM-FIRST                /*        
*S****DK          0   A  15 2WF-FE-P2-NM-MIDDLE               /*        
*S****DK          0   A  35 2WF-FE-P2-NM-LAST                 /*        
*S****DK          0   A  10 2WF-FE-P2-SUFFIX                  /*        
*S****DK          0   A   8 2WF-FE-P2-DOB                     /*        
*S****DK          0   A   9 2WF-FE-P2-SSN                     /*        
*S****DK          0   A   9 2WF-FE-P2-ITIN                    /*        
*S****DK          0   A  10 2WF-FE-P2-PHONE                   /*        
*S****DK          0   A  50 2WF-FE-P2-EMAIL                   /*        
*S****DK          0   A  40 2WF-FE-P2-AD-STRT                 /*        
*S****DK          0   A  30 2WF-FE-P2-AD-CITY                 /*        
*S****DK          0   A   2 2WF-FE-P2-AD-STATE                /*        
*S****DK          0   A  10 2WF-FE-P2-AD-ZIP                  /*        
*S****DK          0   A   2 2WF-FE-P2-AD-COUNTRY              /*        
*S****C           0   * 
*S****C           0   * Parent Spouse or Partner Manually Entered       
*S****C           0   *   Financial Information, Consent    
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-P2-1040R                   /*        
*S****DK          0   A   1 2WF-FE-P2-NON-US                  /*        
*S****DK          0   A   1 2WF-FE-P2-FILE-STAT               /*        
*S****DK          0   A  11 2WF-FE-P2-INC                     /*        
*S****DK          0   A  11 2WF-FE-P2-U-INT                   /*        
*S****DK          0   A  11 2WF-FE-P2-U-DST-IRA               /*        
*S****DK          0   A  11 2WF-FE-P2-U-ROLL-IRA              /*        
*S****DK          0   A  11 2WF-FE-P2-U-DST-PEN               /*        
*S****DK          0   A  11 2WF-FE-P2-U-ROLL-PEN              /*        
*S****DK          0   A  10 2WF-FE-P2-AGI                     /*        
*S****DK          0   A   9 2WF-FE-P2-FED-TAX                 /*        
*S****DK          0   A  11 2WF-FE-P2-DED-PAY                 /*        
*S****DK          0   A   9 2WF-FE-P2-EDCR                    /*        
*S****DK          0   A   1 2WF-FE-P2-ABD-EFH                 /*        
*S****DK          0   A  12 2WF-FE-P2-SCHEDC-AMT              /*        
*S****DK          0   A  10 2WF-FE-P2-FGN-INC-EXC             /*        
*S****DK          0   A   1 2WF-FE-P2-CONSENT                 /*        
*S****DK          0   A   1 2WF-FE-P2-SGN                     /*        
*S****DK          0   A   8 2WF-FE-P2-SGN-DATE                /*        
*S****DK          0   A  50 2WW-FILLER-6                      /*        
*S****C           0   * 
*S****C           0   * Preparer Information    
*S****C           0   *  Indicates that a preparer filled out           
*S****C           0   *    the application and provided their           
*S****C           0   * 
*S****DK          0   A  35 2WF-FE-A-PREP-FIRST               /*        
*S****DK          0   A  35 2WF-FE-A-PREP-LAST                /*        
*S****DK          0   A   9 2WF-FE-A-PREP-SSN                 /*        
*S****DK          0   A   9 2WF-FE-A-PREP-EIN                 /*        
*S****DK          0   A  30 2WF-FE-A-PREP-AFFL                /*        
*S****DK          0   A  40 2WF-FE-A-PREP-STRT                /*        
*S****DK          0   A  30 2WF-FE-A-PREP-CITY                /*        
*S****DK          0   A   2 2WF-FE-A-PREP-STATE               /*        
*S****DK          0   A  10 2WF-FE-A-PREP-ZIP                 /*        
*S****DK          0   A   1 2WF-FE-A-PREP-SGN                 /*        
*S****DK          0   A   8 2WF-FE-A-PREP-SGN-DT              /*        
*S****DK          0   A  50 2WW-FILLER-7                      /*        
*S****C           0   * 
*S****C           0   *  FPS Processing Information         
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-S-AFFIRM                   /*        
*S****DK          0   A   1 2WF-FE-SP-AFFIRM                  /*        
*S****DK          0   A   1 2WF-FE-P1-AFFIRM                  /*        
*S****DK          0   A   1 2WF-FE-P2-AFFIRM                  /*        
*S****DK          0   A   8 2WF-FE-S-CNST-DATE                /*        
*S****DK          0   A   8 2WF-FE-SP-CNST-DATE               /*        
*S****DK          0   A   8 2WF-FE-P1-CNST-DATE               /*        
*S****DK          0   A   8 2WF-FE-P2-CNST-DATE               /*        
*S****DK          0   A   1 2WF-FE-S-TRANU-MATCH              /*        
*S****DK          0   A   1 2WF-FE-SP-TRANU-MATCH             /*        
*S****DK          0   A   1 2WF-FE-P1-TRANU-MATCH             /*        
*S****DK          0   A   1 2WF-FE-P2-TRANU-MATCH             /*        
*S****DK          0   A   2 2WF-FE-C-COR-TRAN                 /*        
*S****DK          0   A   1 2WF-FE-F-PROF-JUDG                /*        
*S****DK          0   A   1 2WF-FE-F-DEP-OVR                  /*        
*S****DK          0   A   6 2WF-FE-F-COLLEGE                  /*        
*S****DK          0   A   1 2WF-FE-F-SIGN                     /*        
*S****DK          0   A   1 2WF-FE-F-IASG                     /*        
*S****DK          0   A   1 2WF-FE-C-CHILD-HERO               /*        
*S****DK          0   A   7 2WF-FE-C-ETI-DEST                 /*        
*S****DK          0   A   1 2WF-FE-S-SGN-SRC                  /*        
*S****DK          0   A   1 2WF-FE-SP-SGN-SRC                 /*        
*S****DK          0   A   1 2WF-FE-P1-SGN-SRC                 /*        
*S****DK          0   A   1 2WF-FE-P2-SGN-SRC                 /*        
*S****DK          0   A   1 2WF-FE-SPEC-HAND                  /*        
*S****DK          0   A   1 2WF-FE-C-ADDR-CHG                 /*        
*S****DK          0   A   1 2WF-FE-C-PUSHED                   /*        
*S****DK          0   A   1 2WF-FE-C-REJ-CHG                  /*        
*S****DK          0   A   2 2WF-FE-C-VER-TRACK                /*        
*S****DK          0   A   1 2WF-FE-C-VER                      /*        
*S****DK          0   A   1 2WF-FE-INCARCERATED               /*        
*S****DK          0   A   2 2WF-FE-C-NSLDS-TRAN               /*        
*S****DK          0   A   1 2WF-FE-C-VER-NSL                  /*        
*S****DK          0   A   1 2WF-FE-C-MATCH-HS                 /*        
*S****DK          0   A  12 2WF-FE-S-FWS                      /*        
*S****DK          0   A  12 2WF-FE-SP-FWS                     /*        
*S****DK          0   A  12 2WF-FE-P1-FWS                     /*        
*S****DK          0   A  12 2WF-FE-P2-FWS                     /*        
*S****DK          0   A 240 2WW-FILLER-8                      /*        
*S****DK          0   A   7 2WF-FE-P1-FC1-DNW                 /*        
*S****DK          0   A   7 2WF-FE-P1-FC1-NW                  /*        
*S****DK          0   A  12 2WF-FE-P1-FC1-APA                 /*        
*S****DK          0   A  12 2WF-FE-P1-FC1-CA                  /*        
*S****DK          0   A   7 2WF-FE-S-FC1-NW                   /*        
*S****DK          0   A  12 2WF-FE-S-FC1-APA                  /*        
*S****DK          0   A  12 2WF-FE-S-FC1-CA                   /*        
*S****DK          0   A   3 2WF-FE-CAS-FAM-SIZE               /*        
*S****DK          0   A   3 2WF-FE-CAP-FAM-SIZE               /*        
*S****C           0   * 
*S****C           0   *  Correction, Highlight, and Verify Flags        
*S****C           0   * 
*S****DK          0   A   3 2WF-FE-CF-S-NM-FIRST              /*        
*S****DK          0   A   3 2WF-FE-CF-S-NM-MIDDLE             /*        
*S****DK          0   A   3 2WF-FE-CF-S-NM-LAST               /*        
*S****DK          0   A   3 2WF-FE-CF-S-SUFFIX                /*        
*S****DK          0   A   3 2WF-FE-CF-S-DOB                   /*        
*S****DK          0   A   3 2WF-FE-CF-S-SSN                   /*        
*S****DK          0   A   3 2WF-FE-CF-S-ITIN                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-AD-PHONE              /*        
*S****DK          0   A   3 2WF-FE-CF-S-EMAIL                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-AD-STRT               /*        
*S****DK          0   A   3 2WF-FE-CF-S-AD-CITY               /*        
*S****DK          0   A   3 2WF-FE-CF-S-AD-STATE              /*        
*S****DK          0   A   3 2WF-FE-CF-S-AD-ZIP                /*        
*S****DK          0   A   3 2WF-FE-CF-S-AD-COUNTRY            /*        
*S****DK          0   A   3 2WF-FE-CF-S-MAR                   /*        
*S****DK          0   A   3 2WF-FE-CF-S-YR-COL                /*        
*S****DK          0   A   3 2WF-FE-CF-S-BACH-DEG              /*        
*S****DK          0   A   3 2WF-FE-CF-S-TCH-CERT              /*        
*S****DK          0   A   3 2WF-FE-CF-S-ACTV                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-VET                   /*        
*S****DK          0   A   3 2WF-FE-CF-S-DEP                   /*        
*S****DK          0   A   3 2WF-FE-CF-S-PAR-DCSD              /*        
*S****DK          0   A   3 2WF-FE-CF-S-WARD                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-FOST                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-EMAN                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-GUAR                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-PERS-NO               /*        
*S****DK          0   A   3 2WF-FE-CF-S-UYSS                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-UGEN                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-UHS                   /*        
*S****DK          0   A   3 2WF-FE-CF-S-UTRIO                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-UFAA                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-UOTHER-NO             /*        
*S****DK          0   A   3 2WF-FE-CF-S-UN-CIRC               /*        
*S****DK          0   A   3 2WF-FE-CF-S-UNSUB                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-FAM-SIZE              /*        
*S****DK          0   A   3 2WF-FE-CF-S-FAM-COL               /*        
*S****DK          0   A   3 2WF-FE-CF-S-CIT                   /*        
*S****DK          0   A   3 2WF-FE-CF-S-ALIEN                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-RES                   /*        
*S****DK          0   A   3 2WF-FE-CF-S-RES-DATE              /*        
*S****DK          0   A   3 2WF-FE-CF-S-PARS-COLG             /*        
*S****DK          0   A   3 2WF-FE-CF-S-PARS-KDUTY            /*        
*S****DK          0   A   3 2WF-FE-CF-S-GED                   /*        
*S****DK          0   A   3 2WF-FE-CF-S-HS-NAME               /*        
*S****DK          0   A   3 2WF-FE-CF-S-HS-CITY               /*        
*S****DK          0   A   3 2WF-FE-CF-S-HS-STATE              /*        
*S****DK          0   A   3 2WF-FE-CF-S-HSE-NAME              /*        
*S****DK          0   A   3 2WF-FE-CF-S-HSE-STATE             /*        
*S****DK          0   A   3 2WF-FE-CF-S-EITC                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-HOME                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-LUNCH                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-MEDC                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-36B                   /*        
*S****DK          0   A   3 2WF-FE-CF-S-SNAP                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-SSI                   /*        
*S****DK          0   A   3 2WF-FE-CF-S-TANF                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-WIC                   /*        
*S****DK          0   A   3 2WF-FE-CF-S-NONE                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-1040R                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-NON-US                /*        
*S****DK          0   A   3 2WF-FE-CF-S-JOINT                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-FILE-STAT             /*        
*S****DK          0   A   3 2WF-FE-CF-S-INC                   /*        
*S****DK          0   A   3 2WF-FE-CF-S-U-INT                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-U-DST-IRA             /*        
*S****DK          0   A   3 2WF-FE-CF-S-U-ROLL-IRA            /*        
*S****DK          0   A   3 2WF-FE-CF-S-U-DST-PEN             /*        
*S****DK          0   A   3 2WF-FE-CF-S-U-ROLL-PEN            /*        
*S****DK          0   A   3 2WF-FE-CF-S-AGI                   /*        
*S****DK          0   A   3 2WF-FE-CF-S-FED-TAX               /*        
*S****DK          0   A   3 2WF-FE-CF-S-TAX-CRD               /*        
*S****DK          0   A   3 2WF-FE-CF-S-DED-PAY               /*        
*S****DK          0   A   3 2WF-FE-CF-S-EDCR                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-ABD-EFH               /*        
*S****DK          0   A   3 2WF-FE-CF-S-SCHEDC-AMT            /*        
*S****DK          0   A   3 2WF-FE-CF-S-GRNT                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-FGN-INC-EXC           /*        
*S****DK          0   A   3 2WF-FE-CF-S-CSUP                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-BUS-FRM               /*        
*S****DK          0   A   3 2WF-FE-CF-S-INV                   /*        
*S****DK          0   A   3 2WF-FE-CF-S-CASH                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL1                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL2                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL3                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL4                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL5                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL6                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL7                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL8                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL9                  /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL10                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL11                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL12                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL13                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL14                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL15                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL16                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL17                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL18                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL19                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-COL20                 /*        
*S****DK          0   A   3 2WF-FE-CF-S-CONSENT               /*        
*S****DK          0   A   3 2WF-FE-CF-S-SGN                   /*        
*S****DK          0   A   3 2WF-FE-CF-S-SGN-DATE              /*        
*S****DK          0   A   3 2WF-FE-CF-SP-NM-FIRST             /*        
*S****DK          0   A   3 2WF-FE-CF-SP-NM-MIDDLE            /*        
*S****DK          0   A   3 2WF-FE-CF-SP-NM-LAST              /*        
*S****DK          0   A   3 2WF-FE-CF-SP-SUFFIX               /*        
*S****DK          0   A   3 2WF-FE-CF-SP-DOB                  /*        
*S****DK          0   A   3 2WF-FE-CF-SP-SSN                  /*        
*S****DK          0   A   3 2WF-FE-CF-SP-ITIN                 /*        
*S****DK          0   A   3 2WF-FE-CF-SP-AD-PHONE             /*        
*S****DK          0   A   3 2WF-FE-CF-SP-EMAIL                /*        
*S****DK          0   A   3 2WF-FE-CF-SP-AD-STRT              /*        
*S****DK          0   A   3 2WF-FE-CF-SP-AD-CITY              /*        
*S****DK          0   A   3 2WF-FE-CF-SP-AD-STATE             /*        
*S****DK          0   A   3 2WF-FE-CF-SP-AD-ZIP               /*        
*S****DK          0   A   3 2WF-FE-CF-SP-AD-COUNTRY           /*        
*S****DK          0   A   3 2WF-FE-CF-SP-1040R                /*        
*S****DK          0   A   3 2WF-FE-CF-SP-NON-US               /*        
*S****DK          0   A   3 2WF-FE-CF-SP-FILE-STAT            /*        
*S****DK          0   A   3 2WF-FE-CF-SP-INC                  /*        
*S****DK          0   A   3 2WF-FE-CF-SP-U-INT                /*        
*S****DK          0   A   3 2WF-FE-CF-SP-U-DST-IRA            /*        
*S****DK          0   A   3 2WF-FE-CF-SP-U-ROLL-IRA           /*        
*S****DK          0   A   3 2WF-FE-CF-SP-U-DST-PEN            /*        
*S****DK          0   A   3 2WF-FE-CF-SP-U-ROLL-PEN           /*        
*S****DK          0   A   3 2WF-FE-CF-SP-AGI                  /*        
*S****DK          0   A   3 2WF-FE-CF-SP-FED-TAX              /*        
*S****DK          0   A   3 2WF-FE-CF-SP-DED-PAY              /*        
*S****DK          0   A   3 2WF-FE-CF-SP-EDCR                 /*        
*S****DK          0   A   3 2WF-FE-CF-SP-ABD-EFH              /*        
*S****DK          0   A   3 2WF-FE-CF-SP-SCHEDC-AMT           /*        
*S****DK          0   A   3 2WF-FE-CF-SP-FGN-INC-EXC          /*        
*S****DK          0   A   3 2WF-FE-CF-SP-CONSENT              /*        
*S****DK          0   A   3 2WF-FE-CF-SP-SGN                  /*        
*S****DK          0   A   3 2WF-FE-CF-SP-SGN-DATE             /*        
*S****DK          0   A   3 2WF-FE-CF-P1-NM-FIRST             /*        
*S****DK          0   A   3 2WF-FE-CF-P1-NM-MIDDLE            /*        
*S****DK          0   A   3 2WF-FE-CF-P1-NM-LAST              /*        
*S****DK          0   A   3 2WF-FE-CF-P1-SUFFIX               /*        
*S****DK          0   A   3 2WF-FE-CF-P1-DOB                  /*        
*S****DK          0   A   3 2WF-FE-CF-P1-SSN                  /*        
*S****DK          0   A   3 2WF-FE-CF-P1-ITIN                 /*        
*S****DK          0   A   3 2WF-FE-CF-P1-AD-PHONE             /*        
*S****DK          0   A   3 2WF-FE-CF-P1-EMAIL                /*        
*S****DK          0   A   3 2WF-FE-CF-P1-AD-STRT              /*        
*S****DK          0   A   3 2WF-FE-CF-P1-AD-CITY              /*        
*S****DK          0   A   3 2WF-FE-CF-P1-AD-STATE             /*        
*S****DK          0   A   3 2WF-FE-CF-P1-AD-ZIP               /*        
*S****DK          0   A   3 2WF-FE-CF-P1-AD-COUNTRY           /*        
*S****DK          0   A   3 2WF-FE-CF-P1-MAR                  /*        
*S****DK          0   A   3 2WF-FE-CF-P1-RES                  /*        
*S****DK          0   A   3 2WF-FE-CF-P1-RES-DATE             /*        
*S****DK          0   A   3 2WF-FE-CF-P1-FAM-SIZE             /*        
*S****DK          0   A   3 2WF-FE-CF-P1-FAM-COL              /*        
*S****DK          0   A   3 2WF-FE-CF-P1-EITC                 /*        
*S****DK          0   A   3 2WF-FE-CF-P1-HOME                 /*        
*S****DK          0   A   3 2WF-FE-CF-P1-LUNCH                /*        
*S****DK          0   A   3 2WF-FE-CF-P1-MEDC                 /*        
*S****DK          0   A   3 2WF-FE-CF-P1-36B                  /*        
*S****DK          0   A   3 2WF-FE-CF-P1-SNAP                 /*        
*S****DK          0   A   3 2WF-FE-CF-P1-SSI                  /*        
*S****DK          0   A   3 2WF-FE-CF-P1-TANF                 /*        
*S****DK          0   A   3 2WF-FE-CF-P1-WIC                  /*        
*S****DK          0   A   3 2WF-FE-CF-P1-NONE                 /*        
*S****DK          0   A   3 2WF-FE-CF-P1-1040R                /*        
*S****DK          0   A   3 2WF-FE-CF-P1-NON-US               /*        
*S****DK          0   A   3 2WF-FE-CF-P1-JOINT                /*        
*S****DK          0   A   3 2WF-FE-CF-P1-FILE-STAT            /*        
*S****DK          0   A   3 2WF-FE-CF-P1-INC                  /*        
*S****DK          0   A   3 2WF-FE-CF-P1-U-INT                /*        
*S****DK          0   A   3 2WF-FE-CF-P1-U-DST-IRA            /*        
*S****DK          0   A   3 2WF-FE-CF-P1-U-ROLL-IRA           /*        
*S****DK          0   A   3 2WF-FE-CF-P1-U-DST-PEN            /*        
*S****DK          0   A   3 2WF-FE-CF-P1-U-ROLL-PEN           /*        
*S****DK          0   A   3 2WF-FE-CF-P1-AGI                  /*        
*S****DK          0   A   3 2WF-FE-CF-P1-FED-TAX              /*        
*S****DK          0   A   3 2WF-FE-CF-P1-TAX-CRD              /*        
*S****DK          0   A   3 2WF-FE-CF-P1-DED-PAY              /*        
*S****DK          0   A   3 2WF-FE-CF-P1-EDCR                 /*        
*S****DK          0   A   3 2WF-FE-CF-P1-ABD-EFH              /*        
*S****DK          0   A   3 2WF-FE-CF-P1-SCHEDC-AMT           /*        
*S****DK          0   A   3 2WF-FE-CF-P1-GRNT                 /*        
*S****DK          0   A   3 2WF-FE-CF-P1-FGN-INC-EXC          /*        
*S****DK          0   A   3 2WF-FE-CF-P1-CSUP                 /*        
*S****DK          0   A   3 2WF-FE-CF-P1-INV                  /*        
*S****DK          0   A   3 2WF-FE-CF-P1-CASH                 /*        
*S****DK          0   A   3 2WF-FE-CF-P1-BUS-FRM              /*        
*S****DK          0   A   3 2WF-FE-CF-P1-CONSENT              /*        
*S****DK          0   A   3 2WF-FE-CF-P1-SGN                  /*        
*S****DK          0   A   3 2WF-FE-CF-P1-SGN-DATE             /*        
*S****DK          0   A   3 2WF-FE-CF-P2-NM-FIRST             /*        
*S****DK          0   A   3 2WF-FE-CF-P2-NM-MIDDLE            /*        
*S****DK          0   A   3 2WF-FE-CF-P2-NM-LAST              /*        
*S****DK          0   A   3 2WF-FE-CF-P2-SUFFIX               /*        
*S****DK          0   A   3 2WF-FE-CF-P2-DOB                  /*        
*S****DK          0   A   3 2WF-FE-CF-P2-SSN                  /*        
*S****DK          0   A   3 2WF-FE-CF-P2-ITIN                 /*        
*S****DK          0   A   3 2WF-FE-CF-P2-AD-PHONE             /*        
*S****DK          0   A   3 2WF-FE-CF-P2-EMAIL                /*        
*S****DK          0   A   3 2WF-FE-CF-P2-AD-STRT              /*        
*S****DK          0   A   3 2WF-FE-CF-P2-AD-CITY              /*        
*S****DK          0   A   3 2WF-FE-CF-P2-AD-STATE             /*        
*S****DK          0   A   3 2WF-FE-CF-P2-AD-ZIP               /*        
*S****DK          0   A   3 2WF-FE-CF-P2-AD-COUNTRY           /*        
*S****DK          0   A   3 2WF-FE-CF-P2-1040R                /*        
*S****DK          0   A   3 2WF-FE-CF-P2-NON-US               /*        
*S****DK          0   A   3 2WF-FE-CF-P2-FILE-STAT            /*        
*S****DK          0   A   3 2WF-FE-CF-P2-INC                  /*        
*S****DK          0   A   3 2WF-FE-CF-P2-U-INT                /*        
*S****DK          0   A   3 2WF-FE-CF-P2-U-DST-IRA            /*        
*S****DK          0   A   3 2WF-FE-CF-P2-U-ROLL-IRA           /*        
*S****DK          0   A   3 2WF-FE-CF-P2-U-DST-PEN            /*        
*S****DK          0   A   3 2WF-FE-CF-P2-U-ROLL-PEN           /*        
*S****DK          0   A   3 2WF-FE-CF-P2-AGI                  /*        
*S****DK          0   A   3 2WF-FE-CF-P2-FED-TAX              /*        
*S****DK          0   A   3 2WF-FE-CF-P2-DED-PAY              /*        
*S****DK          0   A   3 2WF-FE-CF-P2-EDCR                 /*        
*S****DK          0   A   3 2WF-FE-CF-P2-ABD-EFH              /*        
*S****DK          0   A   3 2WF-FE-CF-P2-SCHEDC-AMT           /*        
*S****DK          0   A   3 2WF-FE-CF-P2-FGN-INC-EXC          /*        
*S****DK          0   A   3 2WF-FE-CF-P2-CONSENT              /*        
*S****DK          0   A   3 2WF-FE-CF-P2-SGN                  /*        
*S****DK          0   A   3 2WF-FE-CF-P2-SGN-DATE             /*        
*S****C           0   * 
*S****C           0   *  Matches and Other Processing Information       
*S****C           0   * 
*S****DK          0   A   1 2WF-FE-C-MATCH-DHS                /*        
*S****DK          0   A   1 2WF-FE-C-MATCH-DHS2               /*        
*S****DK          0   A  15 2WF-FE-C-VER-DHS                  /*        
*S****DK          0   A   1 2WF-FE-C-MATCH-NSL                /*        
*S****DK          0   A   2 2WF-FE-C-NSLDS-PS1                /*        
*S****DK          0   A   2 2WF-FE-C-NSLDS-PS2                /*        
*S****DK          0   A   2 2WF-FE-C-NSLDS-PS3                /*        
*S****DK          0   A   1 2WF-FE-C-MATCH-CIT                /*        
*S****DK          0   A   1 2WF-FE-C-S-MATCH-SSN              /*        
*S****DK          0   A   1 2WF-FE-C-SP-MATCH-SSN             /*        
*S****DK          0   A   1 2WF-FE-C-P1-MATCH-SSN             /*        
*S****DK          0   A   1 2WF-FE-C-P2-MATCH-SSN             /*        
*S****DK          0   A   1 2WF-FE-C-MATCH-VA                 /*        
*S****DK          0   A   3 2WF-FE-C-COM01                    /*        
*S****DK          0   A   3 2WF-FE-C-COM02                    /*        
*S****DK          0   A   3 2WF-FE-C-COM03                    /*        
*S****DK          0   A   3 2WF-FE-C-COM04                    /*        
*S****DK          0   A   3 2WF-FE-C-COM05                    /*        
*S****DK          0   A   3 2WF-FE-C-COM06                    /*        
*S****DK          0   A   3 2WF-FE-C-COM07                    /*        
*S****DK          0   A   3 2WF-FE-C-COM08                    /*        
*S****DK          0   A   3 2WF-FE-C-COM09                    /*        
*S****DK          0   A   3 2WF-FE-C-COM10                    /*        
*S****DK          0   A   3 2WF-FE-C-COM11                    /*        
*S****DK          0   A   3 2WF-FE-C-COM12                    /*        
*S****DK          0   A   3 2WF-FE-C-COM13                    /*        
*S****DK          0   A   3 2WF-FE-C-COM14                    /*        
*S****DK          0   A   3 2WF-FE-C-COM15                    /*        
*S****DK          0   A   3 2WF-FE-C-COM16                    /*        
*S****DK          0   A   3 2WF-FE-C-COM17                    /*        
*S****DK          0   A   3 2WF-FE-C-COM18                    /*        
*S****DK          0   A   3 2WF-FE-C-COM19                    /*        
*S****DK          0   A   3 2WF-FE-C-COM20                    /*        
*S****DK          0   A   1 2WF-FE-C-DRUG-HOLD                /*        
*S****DK          0   A   1 2WF-FE-C-GRAD                     /*        
*S****DK          0   A   1 2WF-FE-C-PELL-ELIG                /*        
*S****DK          0   A   2 2WF-FE-C-REPROC-RSN               /*        
*S****DK          0   A   1 2WF-FE-C-CFLAG                    /*        
*S****DK          0   A   1 2WF-FE-C-CFLAG-CHG                /*        
*S****DK          0   A   2 2WF-FE-C-ELEC-INST                /*        
*S****DK          0   A 110 2WF-FE-C-REJ-RSNS                 /*        
*S****DK          0   A   1 2WF-FE-C-ETI                      /*        
*S****DK          0   A   1 2WF-FE-C-SSN-NM-CHG               /*        
*S****DK          0   A  12 2WF-FE-C-VER-HS                   /*        
*S****DK          0   A   1 2WF-FE-C-VER-CHG                  /*        
*S****DK          0   A   5 2WF-FE-C-USER-DATA                /*        
*S****DK          0   A   1 2WF-FE-WORKF-PGM                  /*        
*S****DK          0   A 360 2WF-FILLER20                      /*        
*S****C           0   * 
*S****C           0   *  NSLDS Information      
*S****C           0   * 
*S****DK          0   A 250 2WF-FE-L-NSLDS1                   /*        
*S****DK          0   A 250 2WF-FE-L-NSLDS2                   /*        
*S****DK          0   A 250 2WF-FE-L-NSLDS3                   /*        
*S****DK          0   A 250 2WF-FE-L-NSLDS4                   /*        
*S****DK          0   A 250 2WF-FE-L-NSLDS5                   /*        
*S****DK          0   A 250 2WF-FE-L-NSLDS6                   /*        
*S****DK          0   A 250 2WF-FE-L-NSLDS7                   /*        
*S****DK          0   A 250 2WF-FE-L-NSLDS8                   /*        
*S****DK          0   A 250 2WF-FE-L-NSLDS9                   /*        
*S****DK          0   A 250 2WF-FE-L-NSLDS10                  /*        
*S****DK          0   A  51 2WF-FE-L-NSLDS11                  /*        
*S****C           0   * 
*S****C           0   *  FTIM Information       
*S****C           0   * 
*S****DK          0   A  36 2WF-FILLER21                      /*        
*S****C           0   * 
*S****C           0   *  Student FTI-M Information          
*S****C           0   * 
*S****DK          0   A  50 2WF-FILLER22                      /*        
*S****DK          0   A  11 2WF-FE-FTI-LABEL-START            /*        
*S****DK          0   A   4 2WF-FE-FTI-S-RET-YEAR             /*        
*S****DK          0   A   1 2WF-FE-FTI-S-FILE-STAT            /*        
*S****DK          0   A  10 2WF-FE-FTI-S-AGI                  /*        
*S****DK          0   A   2 2WF-FE-FTI-S-EXE                  /*        
*S****DK          0   A   2 2WF-FE-FTI-S-DEPS                 /*        
*S****DK          0   A  11 2WF-FE-FTI-S-TOT-INC              /*        
*S****DK          0   A   9 2WF-FE-FTI-S-TOT-FED-TAX          /*        
*S****DK          0   A   9 2WF-FE-FTI-S-EDCR                 /*        
*S****DK          0   A  11 2WF-FE-FTI-S-DST-IRA              /*        
*S****DK          0   A  11 2WF-FE-FTI-S-DED-PAY              /*        
*S****DK          0   A  11 2WF-FE-FTI-S-U-INT                /*        
*S****DK          0   A  11 2WF-FE-FTI-S-DST-PEN              /*        
*S****DK          0   A  12 2WF-FE-FTI-S-SCHEDC-NET           /*        
*S****DK          0   A   1 2WF-FE-FTI-S-SCHEDA               /*        
*S****DK          0   A   1 2WF-FE-FTI-S-SCHEDB               /*        
*S****DK          0   A   1 2WF-FE-FTI-S-SCHEDD               /*        
*S****DK          0   A   1 2WF-FE-FTI-S-SCHEDE               /*        
*S****DK          0   A   1 2WF-FE-FTI-S-SCHEDF               /*        
*S****DK          0   A   1 2WF-FE-FTI-S-SCHEDH               /*        
*S****DK          0   A   3 2WF-FE-FTI-S-IRS-RESP             /*        
*S****C           0   * 
*S****C           0   *  Student Spouse FTI-M Information   
*S****C           0   * 
*S****DK          0   A   4 2WF-FE-FTI-SP-RET-YEAR            /*        
*S****DK          0   A   1 2WF-FE-FTI-SP-FILE-STAT           /*        
*S****DK          0   A  10 2WF-FE-FTI-SP-AGI                 /*        
*S****DK          0   A   2 2WF-FE-FTI-SP-EXE                 /*        
*S****DK          0   A   2 2WF-FE-FTI-SP-DEPS                /*        
*S****DK          0   A  11 2WF-FE-FTI-SP-TOT-INC             /*        
*S****DK          0   A   9 2WF-FE-FTI-SP-TOT-FED-TAX         /*        
*S****DK          0   A   9 2WF-FE-FTI-SP-EDCR                /*        
*S****DK          0   A  11 2WF-FE-FTI-SP-DST-IRA             /*        
*S****DK          0   A  11 2WF-FE-FTI-SP-DED-PAY             /*        
*S****DK          0   A  11 2WF-FE-FTI-SP-U-INT               /*        
*S****DK          0   A  11 2WF-FE-FTI-SP-DST-PEN             /*        
*S****DK          0   A  12 2WF-FE-FTI-SP-SCHEDC-NET          /*        
*S****DK          0   A   1 2WF-FE-FTI-SP-SCHEDA              /*        
*S****DK          0   A   1 2WF-FE-FTI-SP-SCHEDB              /*        
*S****DK          0   A   1 2WF-FE-FTI-SP-SCHEDD              /*        
*S****DK          0   A   1 2WF-FE-FTI-SP-SCHEDE              /*        
*S****DK          0   A   1 2WF-FE-FTI-SP-SCHEDF              /*        
*S****DK          0   A   1 2WF-FE-FTI-SP-SCHEDH              /*        
*S****DK          0   A   3 2WF-FE-FTI-SP-IRS-RESP            /*        
*S****C           0   * 
*S****C           0   *  Parent FTI-M Information           
*S****C           0   * 
*S****DK          0   A   4 2WF-FE-FTI-P1-RET-YEAR            /*        
*S****DK          0   A   1 2WF-FE-FTI-P1-FILE-STAT           /*        
*S****DK          0   A  10 2WF-FE-FTI-P1-AGI                 /*        
*S****DK          0   A   2 2WF-FE-FTI-P1-EXE                 /*        
*S****DK          0   A   2 2WF-FE-FTI-P1-DEPS                /*        
*S****DK          0   A  11 2WF-FE-FTI-P1-TOT-INC             /*        
*S****DK          0   A   9 2WF-FE-FTI-P1-TOT-FED-TAX         /*        
*S****DK          0   A   9 2WF-FE-FTI-P1-EDCR                /*        
*S****DK          0   A  11 2WF-FE-FTI-P1-DST-IRA             /*        
*S****DK          0   A  11 2WF-FE-FTI-P1-DED-PAY             /*        
*S****DK          0   A  11 2WF-FE-FTI-P1-U-INT               /*        
*S****DK          0   A  11 2WF-FE-FTI-P1-DST-PEN             /*        
*S****DK          0   A  12 2WF-FE-FTI-P1-SCHEDC-NET          /*        
*S****DK          0   A   1 2WF-FE-FTI-P1-SCHEDA              /*        
*S****DK          0   A   1 2WF-FE-FTI-P1-SCHEDB              /*        
*S****DK          0   A   1 2WF-FE-FTI-P1-SCHEDD              /*        
*S****DK          0   A   1 2WF-FE-FTI-P1-SCHEDE              /*        
*S****DK          0   A   1 2WF-FE-FTI-P1-SCHEDF              /*        
*S****DK          0   A   1 2WF-FE-FTI-P1-SCHEDH              /*        
*S****DK          0   A   3 2WF-FE-FTI-P1-IRS-RESP            /*        
*S****C           0   * 
*S****C           0   *  Parent Spouse or Partner FTI-M Information     
*S****C           0   * 
*S****DK          0   A   4 2WF-FE-FTI-P2-RET-YEAR            /*        
*S****DK          0   A   1 2WF-FE-FTI-P2-FILE-STAT           /*        
*S****DK          0   A  10 2WF-FE-FTI-P2-AGI                 /*        
*S****DK          0   A   2 2WF-FE-FTI-P2-EXE                 /*        
*S****DK          0   A   2 2WF-FE-FTI-P2-DEPS                /*        
*S****DK          0   A  11 2WF-FE-FTI-P2-TOT-INC             /*        
*S****DK          0   A   9 2WF-FE-FTI-P2-TOT-FED-TAX         /*        
*S****DK          0   A   9 2WF-FE-FTI-P2-EDCR                /*        
*S****DK          0   A  11 2WF-FE-FTI-P2-DST-IRA             /*        
*S****DK          0   A  11 2WF-FE-FTI-P2-DED-PAY             /*        
*S****DK          0   A  11 2WF-FE-FTI-P2-U-INT               /*        
*S****DK          0   A  11 2WF-FE-FTI-P2-DST-PEN             /*        
*S****DK          0   A  12 2WF-FE-FTI-P2-SCHEDC-NET          /*        
*S****DK          0   A   1 2WF-FE-FTI-P2-SCHEDA              /*        
*S****DK          0   A   1 2WF-FE-FTI-P2-SCHEDB              /*        
*S****DK          0   A   1 2WF-FE-FTI-P2-SCHEDD              /*        
*S****DK          0   A   1 2WF-FE-FTI-P2-SCHEDE              /*        
*S****DK          0   A   1 2WF-FE-FTI-P2-SCHEDF              /*        
*S****DK          0   A   1 2WF-FE-FTI-P2-SCHEDH              /*        
*S****DK          0   A   3 2WF-FE-FTI-P2-IRS-RESP            /*        
*S****DK          0   A61   2WF-FILLER50A       
*S****C           0   * 
*S****C           0   *  FTIM Processing Information        
*S****C           0   * 
*S****DK          0   A  15 2WF-FE-S-TOT-INC                  /*        
*S****DK          0   A  15 2WF-FE-P-TOT-INC                  /*        
*S****DK          0   A  15 2WF-FE-FISAP-TOT-INC              /*        
*S****DK          0   A  15 2WF-FE-P1-FC1-ATI                 /*        
*S****DK          0   A  15 2WF-FE-P1-FC1-PAYR                /*        
*S****DK          0   A  15 2WF-FE-P1-FC1-IPA                 /*        
*S****DK          0   A  15 2WF-FE-P1-FC1-EEA                 /*        
*S****DK          0   A  15 2WF-FE-P1-FC1-AI                  /*        
*S****DK          0   A  15 2WF-FE-P1-FC1-AAI                 /*        
*S****DK          0   A  15 2WF-FE-P1-FC1-CONT                /*        
*S****DK          0   A  15 2WF-FE-S-FC1-PAYR                 /*        
*S****DK          0   A  15 2WF-FE-S-FC1-IPA                  /*        
*S****DK          0   A  15 2WF-FE-S-FC1-NEG-AAI              /*        
*S****DK          0   A  15 2WF-FE-S-FC1-EEA                  /*        
*S****DK          0   A  15 2WF-FE-S-FC1-ATI                  /*        
*S****DK          0   A  15 2WF-FE-S-FC1-AI                   /*        
*S****DK          0   A  15 2WF-FE-S-FC1-CI                   /*        
*S****DK          0   A  15 2WF-FE-S-FC1-AAI                  /*        
*S****DK          0   A  15 2WF-FE-S-FC1-AAI-CONT             /*        
*S****DK          0   A  11 2WF-FE-FTI-LABEL-END              /*        
*S****DK          0   A39   2WF-FILLER50B       
*S****DR          0        R1WF27FEDL           
*S****DFR         0   A 250 2WF-AD-REC01        
*S****DFR         0   A 250 2WF-AD-REC02        
*S****DFR         0   A 250 2WF-AD-REC03        
*S****DFR         0   A 250 2WF-AD-REC04        
*S****DFR         0   A 250 2WF-AD-REC05        
*S****DFR         0   A 250 2WF-AD-REC06        
*S****DFR         0   A 250 2WF-AD-REC07        
*S****DFR         0   A 250 2WF-AD-REC08        
*S****DFR         0   A 250 2WF-AD-REC09        
*S****DFR         0   A 250 2WF-AD-REC10        
*S****DFR         0   A 250 2WF-AD-REC11        
*S****DFR         0   A 250 2WF-AD-REC12        
*S****DFR         0   A 250 2WF-AD-REC13        
*S****DFR         0   A 250 2WF-AD-REC14        
*S****DFR         0   A 250 2WF-AD-REC15        
*S****DFR         0   A 250 2WF-AD-REC16        
*S****DFR         0   A 250 2WF-AD-REC17        
*S****DFR         0   A 250 2WF-AD-REC18        
*S****DFR         0   A 250 2WF-AD-REC19        
*S****DFR         0   A 250 2WF-AD-REC20        
*S****DFR         0   A 250 2WF-AD-REC21        
*S****DFR         0   A 250 2WF-AD-REC22        
*S****DFR         0   A 250 2WF-AD-REC23        
*S****DFR         0   A 250 2WF-AD-REC24        
*S****DFR         0   A 250 2WF-AD-REC25        
*S****DFR         0   A 250 2WF-AD-REC26        
*S****DFR         0   A 250 2WF-AD-REC27        
*S****DFR         0   A 250 2WF-AD-REC28        
*S****DFR         0   A 250 2WF-AD-REC29        
*S****DFR         0   A 250 2WF-AD-REC30        
*S****DFR         0   A 250 2WF-AD-REC31        
*S****DFR         0   A 194 2WF-AD-REC32        
*S****DR          0        R1WF27FEDL           
*S****DSR         0         2WF-ISIR
*S****DFR         0   A 250 3WF-ISIR1           
*S****DFR         0   A 250 3WF-ISIR2           
*S****DFR         0   A 250 3WF-ISIR3           
*S****DFR         0   A 250 3WF-ISIR4           
*S****DFR         0   A 250 3WF-ISIR5           
*S****DFR         0   A 250 3WF-ISIR6           
*S****DFR         0   A 250 3WF-ISIR7           
*S****DFR         0   A 250 3WF-ISIR8           
*S****DFR         0   A 250 3WF-ISIR9           
*S****DFR         0   A 250 3WF-ISIR10          
*S****DFR         0   A 250 3WF-ISIR11          
*S****DFR         0   A 250 3WF-ISIR12          
*S****DFR         0   A 250 3WF-ISIR13          
*S****DFR         0   A 250 3WF-ISIR14          
*S****DFR         0   A 250 3WF-ISIR15          
*S****DFR         0   A 250 3WF-ISIR16          
*S****DFR         0   A 250 3WF-ISIR17          
*S****DFR         0   A 198 3WF-ISIR18          
*S****DSR         0         2WF-NSLDS           
*S****DFR         0   A 250 3WF-NSLDS1          
*S****DFR         0   A 250 3WF-NSLDS2          
*S****DFR         0   A 250 3WF-NSLDS3          
*S****DFR         0   A 250 3WF-NSLDS4          
*S****DFR         0   A 250 3WF-NSLDS5          
*S****DFR         0   A 250 3WF-NSLDS6          
*S****DFR         0   A 250 3WF-NSLDS7          
*S****DFR         0   A 250 3WF-NSLDS8          
*S****DFR         0   A 250 3WF-NSLDS9          
*S****DFR         0   A 250 3WF-NSLDS10         
*S****DFR         0   A  51 3WF-NSLDS11         
*S****DSR         0         2WF-ISIRB           
*S****DFR         0   A 250 3WF-ISIR19          
*S****DFR         0   A 250 3WF-ISIR20          
*S****DFR         0   A 250 3WF-ISIR21          
*S****DFR         0   A 195 3WF-ISIR22          
*S****C           0   * 
*S****C           0   * No 'N' relationships exist for:      WF-2627-FEDERAL        
*S****C           0   * 
*S****DF          0   A   1 1WF27FEDL-ID                     /* Object identifier   
*S****DR          0        R1WF27FEDL-ID                     /* REDEF. BEGIN : WF27FEDL-ID      
*S****DSR         0         2STRUCTURE                       /* To allow MOVE BY NAME           
*S****DFR         0   A   1 3WF-FE-C-BATCH-YR                /*         
*C**                                FATEMP  WFADDLDE                        S S   NN0000        
*D01NAT8304S FATEMP  WFADDLDE                        ZWDNH   ZWDNH           S      
*D02            2026051307521802026051307521800000003130    
*D03LINUX   
*D04                 ISO_8859-1:1987
*S*************************************************************************         
*S***       
*S***                              WolffPack    
*S***       
*S*** Subroutine: WFADDLDE          
*S*** System    : FINANCIER         
*S*** Title     : ADD Load subroutine           
*S*** Function  : This subroutine calls routines that load data and     
*S***             perform calculations.         
*S***       
*S***      Copyright 1995 - 2027 WolffPack, Inc.  All rights reserved.  
*S***       
*S*************************************************************************         
*S**DEFINE DATA         
*S**  GLOBAL USING WWGDA
*S**  PARAMETER         
*S**   01 #PARAMETER-FIELDS         
*S**     02 #PGM-PARAMETERS         
*S**       03 #EARLIER-REC(A1)      
*S**       03 #FED-REJ-CASE(A1)     
*S**       03 #OVRD-FED-REJ(A1)     
*S**       03 #OVRD-C-PEND(A1)      
*S**       03 #OVRD-C-XMIT(A1)      
*S**       03 #OVRD-LOCKED(A1)      
*S**       03 #OVRD-VERIFD(A1)      
*S**       03 #OVRD-PACKAGE(A1)     
*S**     02 #PASSED-PARAMETERS      
*S**       03 #INPUT-COUNTER(P7)    
*S**       03 #NEW-REJ-COUNTER(P7)  
*S**       03 #RE-REJ-COUNTER(P7)   
*S**       03 #BYPASS-COUNTER(P7)   
*S**       03 #ADD-RECORD-COUNTER(P7)           
*S**       03 #PROCESSED-RECORD(L)  
*S**  PARAMETER USING WFADDDSD      
*S***       
*S**  LOCAL 
*S**   01 #VER-STAT(A1) 
*S***       
*S**   01 #SUBPGM-ID(A8)
*S**   01 #AID-CCYY(A4) 
*S**   01 REDEFINE #AID-CCYY        
*S**     02 #AID-CC(A2) 
*S**     02 #AID-YY(A2) 
*S**   01 #BYPASS-STUDENT(L)        
*S**END-DEFINE          
*S***       
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE LOAD-STUDENT  
*S*************************************************************************         
*S***       
*S**PROG.   
*S**  REPEAT
*S**    /*  
*S**    /* Call year specific subroutine depending on data source       
*S**    MOVE ##AID-YEAR TO #AID-CCYY
*S**    DECIDE ON FIRST VALUE OF WFADDDSD.WF-AD-SOURCE      
*S**      VALUE 'B'     
*S**        COMPRESS 'WFFEB' #AID-YY 'N' INTO #SUBPGM-ID LEAVING NO     
*S**        CALLNAT #SUBPGM-ID WW-GDA #PARAMETER-FIELDS     
*S**                           WFADDDSD WFADDDSD-ID         
*S**      VALUE 'F'     
*S**        COMPRESS 'WFFEL' #AID-YY 'N' INTO #SUBPGM-ID LEAVING NO     
*S**        CALLNAT #SUBPGM-ID WW-GDA #PARAMETER-FIELDS     
*S**                           WFADDDSD WFADDDSD-ID         
*S**      VALUE 'G'     
*S**        COMPRESS 'WFFGL' #AID-YY 'N' INTO #SUBPGM-ID LEAVING NO     
*S**        CALLNAT #SUBPGM-ID WW-GDA #PARAMETER-FIELDS     
*S**                           WFADDDSD WFADDDSD-ID         
*S**      VALUE 'C'     
*S**        COMPRESS 'WFCSL' #AID-YY 'N' INTO #SUBPGM-ID LEAVING NO     
*S**        CALLNAT #SUBPGM-ID WW-GDA #PARAMETER-FIELDS     
*S**                           WFADDDSD WFADDDSD-ID         
*S**      VALUE 'N'     
*S**        COMPRESS 'WFCNL' #AID-YY 'N' INTO #SUBPGM-ID LEAVING NO     
*S**        CALLNAT #SUBPGM-ID WW-GDA #PARAMETER-FIELDS     
*S**                           WFADDDSD WFADDDSD-ID         
*S**      NONE          
*S**        IGNORE      
*S**    END-DECIDE      
*S**    IF NOT #PROCESSED-RECORD    
*S**      ESCAPE BOTTOM(PROG.)      
*S**    END-IF          
*S**    /*  
*S**    /* Perform Budget calc      
*S**    PERFORM CALC-BUDGET         
*S**    /*  
*S**    /* Calculate application requirements   
*S**    MOVE WFADDDSD.WF-AD-SOURCE TO ##PASS-ACTION         
*S**    PERFORM CALC-APPL-REQ       
*S**    RESET ##PASS-ACTION         
*S**    /*  
*S**    /* Need analysis calc       
*S**    PERFORM CALC-NEED-ANALYSIS  
*S**    /*  
*S**    /* Verification calc (if previously verified)       
*S**    IF WFADDDSD.WF-AD-SOURCE = 'F'          
*S**        PERFORM CALC-VERIFICATION #BYPASS-STUDENT       
*S**    END-IF          
*S**    /*  
*S**    ESCAPE BOTTOM(PROG.)        
*S**  END-REPEAT        
*S**END-SUBROUTINE /* LOAD-STUDENT  
*S**END     
*C**                                FATEMP  WFAFI27B                        F S   NN0000        
*D01NAT8304F FATEMP  WFAFI27B                        ZWDNH   ZWDNH           S      
*D02            2026050314583902026050314583900000016393    
*D03LINUX   
*D04                 ISO_8859-1:1987
*S*************************************************************************         
*S***       
*S***                              WolffPack    
*S***       
*S*** Program  : WFAFI27B           
*S*** System   : FINANCIER          
*S*** Title    : 2026-27 ADD File Import        
*S*** Function : This program imports federal application data          
*S***            into the ADD file. 
*S***       
*S***      Copyright 1995 - 2026 WolffPack, Inc.  All rights reserved.  
*S***       
*S*************************************************************************         
*S**DEFINE DATA         
*S**  GLOBAL USING WWGDA
*S***       
*S**  LOCAL USING WWREQIBD /* Input parameter PDA           
*S**  LOCAL USING WFADDDSD /* Passed to object subprogram   
*S**  LOCAL USING WFADDDSR /* Passed to object subprogram   
*S**  LOCAL USING WWINSTND /* Passed to object subprogram   
*S**  LOCAL USING WWINSTNR /* Passed to object subprogram   
*S**  LOCAL USING WWAOBJ   /* Used by object subprograms    
*S***       
*S**  LOCAL USING WWCONST  /* Constants LDA     
*S**  LOCAL USING WWINSTNL          
*S***       
*S**  LOCAL 
*S**  01 #MAX-READ-HOLD(P3) INIT<25>
*S**  01 #ET-READ-COUNTER(P7)       
*S**  01 #ET-WRITE-COUNTER(P7)      
*S***       
*S**  01 #INPUT-COUNTER(P7)         
*S**  01 #INPUT-COUNTER-A(P7)       
*S**  01 #INPUT-COUNTER-C(P7)       
*S**  01 #INPUT-COUNTER-R(P7)       
*S**  01 #INPUT-COUNTER-NC(P7)      
*S**  01 #NEW-COUNTER(P7)           
*S**  01 #REPLACE-COUNTER(P7)       
*S**  01 #BYPASS-COUNTER(P7)        
*S***       
*S**  01 #SUB(P3)       
*S**  01 #SUB2(P3)      
*S***       
*S**  01 #FEDERAL-TRAN(A2)          
*S**  01 #TEMP-RCVD-DATE(A8)        
*S**  01 #TRANSLATE-FIELD(A30)      
*S**  01 #TRANSLATE-CASE(A1)        
*S**  01 #REMOVE-SPEC-CH(L)         
*S**  01 #COLLEGE-FOUND(L)          
*S**  01 #COLLEGE-SENT(A6)          
*S**  01 #COLLEGE-ETI(A1)           
*S**  01 #SEND-RSN(A1)  
*S***       
*S**  01 #COLLEGES      
*S**    02 WF-FE-A-COL1(A6)         
*S**    02 WF-FE-A-COL2(A6)         
*S**    02 WF-FE-A-COL3(A6)         
*S**    02 WF-FE-A-COL4(A6)         
*S**    02 WF-FE-A-COL5(A6)         
*S**    02 WF-FE-A-COL6(A6)         
*S**    02 WF-FE-A-COL7(A6)         
*S**    02 WF-FE-A-COL8(A6)         
*S**    02 WF-FE-A-COL9(A6)         
*S**    02 WF-FE-A-COL10(A6)        
*S**    02 WF-FE-A-COL11(A6)        
*S**    02 WF-FE-A-COL12(A6)        
*S**    02 WF-FE-A-COL13(A6)        
*S**    02 WF-FE-A-COL14(A6)        
*S**    02 WF-FE-A-COL15(A6)        
*S**    02 WF-FE-A-COL16(A6)        
*S**    02 WF-FE-A-COL17(A6)        
*S**    02 WF-FE-A-COL18(A6)        
*S**    02 WF-FE-A-COL19(A6)        
*S**    02 WF-FE-A-COL20(A6)        
*S**  01 REDEFINE #COLLEGES         
*S**    02 #COLLEGE-CODE(A6/1:20)   
*S***       
*S**  01 #PASS-FIELDS   
*S**    02 #PASS-NM-LAST(A20)       
*S**    02 #PASS-NM-FIRST(A20)      
*S**    02 #PASS-NM-MI(A1)          
*S**    02 #PASS-SOURCE(A1)         
*S**    02 #PASS-SID(A9)
*S**    02 #PASS-FAO(A2)
*S**    02 #PASS-COLLEGE-CODE(A7)   
*S***       
*S**  01 #ADD-FILE-UPDATED (L)      
*S***       
*S**  LOCAL USING WF27FEDL          
*S**END-DEFINE          
*S***       
*S*** Define printers, formats, headings        
*S**EJECT OFF(1)        
*S**FORMAT(1) LS=80 PS=60 ZP=ON IS=OFF ES=OFF SG=OFF        
*S**EJECT OFF(2)        
*S**FORMAT(2) LS=80 PS=60 ZP=ON IS=OFF ES=OFF SG=OFF        
*S***       
*S**IF *DEVICE = 'BATCH' THEN       
*S**  SET CONTROL 'D' /* Set delimiter mode for batch input 
*S**END-IF  
*S***       
*S*************************************************************************         
*S***       
*S*** Load parameters   
*S**  MOVE ##PASS-TEMP TO PASS-BATCH-FLDS       
*S***       
*S*** Federal data source           
*S**  MOVE 'F' TO #PASS-SOURCE      
*S***       
*S*** Get institution table         
*S**  ASSIGN WWINSTND.WW-RECORD-TYPE = TABLE-TYPE /* Table type         
*S**  ASSIGN WWINSTND.WW-TABLE-ID = 'INSTN'       /* Institution table  
*S**  MOVE 'GET' TO WWAOBJ.#FUNCTION
*S**  CALLNAT 'WWINSTNO' WW-GDA     
*S**           WWINSTND 
*S**           WWINSTND-ID          
*S**           WWINSTNR 
*S**           WWAOBJ   
*S**  MOVE BY NAME WWINSTND TO WWINSTNL         
*S***       
*S***       
*S**PROG.   
*S**  REPEAT
*S**    /*  
*S**    /* Read Automatic ISIR file 
*S**    READ WORK FILE 1 WF27FEDL   
*S**      /*
*S**      IF WF27FEDL.WF-FE-C-BATCH-YR NE #INPUT-AID-Y2     
*S**        ESCAPE TOP  
*S**      END-IF        
*S**      /*
*S**      /* Determine college code 
*S**      RESET #COLLEGE-FOUND      
*S**      MOVE BY NAME WF27FEDL TO #COLLEGES    
*S**      FOR #SUB = 1 TO 20        
*S**        FOR #SUB2 = 1 TO #COLLEGE-MAX       
*S**          IF #COLL-CODE(#SUB2) = #COLLEGE-CODE(#SUB) AND
*S**             #ADD-SOURCE(#SUB2) = #PASS-SOURCE AND      
*S**             #FAO(#SUB2) = ##FAO-ID         
*S**            ASSIGN #COLLEGE-FOUND = TRUE    
*S**            ESCAPE BOTTOM       
*S**          END-IF    
*S**        END-FOR     
*S**        IF #COLLEGE-FOUND       
*S**          ESCAPE BOTTOM         
*S**        END-IF      
*S**      END-FOR       
*S**      IF NOT #COLLEGE-FOUND     
*S**        ADD 1 TO #INPUT-COUNTER 
*S**        ADD 1 TO #INPUT-COUNTER-NC          
*S**        ESCAPE TOP  
*S**      END-IF        
*S**      MOVE #COLLEGE-CODE(#SUB) TO #COLLEGE-SENT         
*S**      /*
*S**      /* Determine reason for record transmission       
*S**      MOVE WF27FEDL.WF-FE-C-ETI TO #COLLEGE-ETI         
*S**      /*
*S**      RESET #SEND-RSN           
*S**      IF (#COLLEGE-ETI = '2' OR = '4' OR = '6') AND      /* College generated   
*S**         WF27FEDL.WF-FE-C-TRAN-TYPE = 'C'                /* ETI - Correction    
*S**        ADD 1 TO #INPUT-COUNTER-C           
*S**        MOVE 'C' TO #SEND-RSN                            /* Corrected           
*S**      ELSE          
*S**        ADD 1 TO #INPUT-COUNTER-A           
*S**        MOVE 'A' TO #SEND-RSN                            /* Automatic           
*S**        DECIDE FOR FIRST CONDITION          
*S**          WHEN WF27FEDL.WF-FE-C-FPS-CORR-RSN = 'D'      
*S**            ASSIGN #SEND-RSN = 'H'                       /* Generated-Hold rlse 
*S**          WHEN WF27FEDL.WF-FE-C-FPS-CORR-RSN = 'L' OR = 'N'         
*S**            ASSIGN #SEND-RSN = 'N'                       /* Generated-NSLDS     
*S**          WHEN WF27FEDL.WF-FE-C-FPS-CORR-RSN = 'M'      
*S**            ASSIGN #SEND-RSN = 'I'                       /* Generated-DHS second
*S**          WHEN WF27FEDL.WF-FE-C-FPS-CORR-RSN = 'P'      
*S**            ASSIGN #SEND-RSN = 'Z'                       /* Generated-Reprocess 
*S**          WHEN WF27FEDL.WF-FE-C-FPS-CORR-RSN = 'W'      
*S**            ASSIGN #SEND-RSN = 'D'                       /* Generated-SSA death 
*S**          WHEN WF27FEDL.WF-FE-C-PUSHED = 'Y' AND        
*S**               WF27FEDL.WF-FE-C-CFLAG-CHG NE ' '        
*S**            ASSIGN #SEND-RSN = 'S'                       /* Pushed-SARC change  
*S**          WHEN WF27FEDL.WF-FE-C-PUSHED = 'Y' AND        
*S**               WF27FEDL.WF-FE-C-SAI-CHG-FLAG NE ' '     
*S**            ASSIGN #SEND-RSN = 'E'                       /* Pushed-EFC change   
*S**          WHEN WF27FEDL.WF-FE-C-PUSHED = 'Y' AND        
*S**               WF27FEDL.WF-FE-C-REJ-CHG NE ' '          
*S**            ASSIGN #SEND-RSN = 'R'                       /* Pushed-Rej change   
*S**          WHEN WF27FEDL.WF-FE-C-PUSHED = 'Y' AND        
*S**               WF27FEDL.WF-FE-C-VER-CHG NE ' '          
*S**            ASSIGN #SEND-RSN = 'V'                       /* Pushed-Ver change   
*S**          WHEN WF27FEDL.WF-FE-C-PUSHED = 'Y'
*S**            ASSIGN #SEND-RSN = 'P'                       /* Pushed  
*S**          WHEN NONE 
*S**            IGNORE  
*S**        END-DECIDE  
*S**      END-IF        
*S**      /*
*S**      PERFORM MAIN-PROCESS      
*S**      /*
*S**      /* Check for limited-run maximum      
*S**      IF (#INPUT-RUNMODE = 'TRIAL' OR = 'SAMPLE')       
*S**          AND #INPUT-LIMIT-COUNT > 0        
*S**        IF #INPUT-COUNTER GE #INPUT-LIMIT-COUNT         
*S**          ESCAPE BOTTOM(PROG.) IMMEDIATE    
*S**        END-IF      
*S**      END-IF        
*S**    END-WORK        
*S**    /*  
*S**    ESCAPE BOTTOM(PROG.) IMMEDIATE          
*S**  END-REPEAT /* PROG.           
*S***       
*S*** Issue final END TRANSACTION   
*S**  PERFORM COMMIT-OR-BACKOUT     
*S***       
*S*** Print job statistics          
*S**  ADD #INPUT-COUNTER-NC TO #BYPASS-COUNTER  
*S**  WRITE(1) NOTITLE  
*S**    15T 'Federal input:' /      
*S**    17T 'Records read:'         
*S**                        (I) 55T #INPUT-COUNTER (EM=Z,ZZZ,ZZ9) /     
*S**    19T 'Automatic ISIRs:'      
*S**                        (I) 55T #INPUT-COUNTER-A (EM=Z,ZZZ,ZZ9) /   
*S**    19T 'Corrected ISIRs:'      
*S**                        (I) 55T #INPUT-COUNTER-C (EM=Z,ZZZ,ZZ9) /   
*S**    19T 'Invalid college code:' 
*S**                        (I) 55T #INPUT-COUNTER-NC (EM=Z,ZZZ,ZZ9) /  
*S**    15T 'FINANCIER processing:' /           
*S**    17T 'ADD records added:'    
*S**                        (I) 55T #NEW-COUNTER (EM=Z,ZZZ,ZZ9) /       
*S**    17T 'ADD records updated:'  
*S**                        (I) 55T #REPLACE-COUNTER (EM=Z,ZZZ,ZZ9) /   
*S**    17T 'ISIR records bypassed:'
*S**                        (I) 55T #BYPASS-COUNTER (EM=Z,ZZZ,ZZ9) ///  
*S***       
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE MAIN-PROCESS  
*S*************************************************************************         
*S**  /*    
*S**  ADD 1 TO #INPUT-COUNTER       
*S**  ADD 1 TO #ET-READ-COUNTER     
*S**  /*    
*S**  /* SID determination          
*S**  MOVE WF27FEDL.WF-FE-NM-LAST TO #PASS-NM-LAST          
*S**  MOVE WF27FEDL.WF-FE-NM-FIRST TO #PASS-NM-FIRST        
*S**  MOVE WF27FEDL.WF-FE-NM-MIDDLE TO #PASS-NM-MI          
*S**  PERFORM DETERMINE-SID WF27FEDL.WF-FE-SSN #PASS-NM-LAST #PASS-NM-FIRST         
*S**                        #PASS-NM-MI WF-FE-DOB #PASS-SID 
*S**  /*    
*S**  /* FAO determination          
*S**  MOVE #COLLEGE-SENT TO #PASS-COLLEGE-CODE  
*S**  PERFORM DETERMINE-FAO #PASS-SID #PASS-SOURCE          
*S**                        #PASS-COLLEGE-CODE #PASS-FAO    
*S**  /*    
*S**  /* Check for existing ADD file record     
*S**  MOVE 'GET' TO WWAOBJ.#FUNCTION
*S**  MOVE ##AID-YEAR TO WFADDDSD.WF-AID-YEAR   
*S**  /*    
*S**  /* Check for new ISIR format (2026-2027)  
*S**  IF WF27FEDL.WF-FE-ISIR-VERSION-FLAG = '1' 
*S**    MOVE 'B' TO WFADDDSD.WF-AD-SOURCE       
*S**  ELSE  
*S**    MOVE #PASS-SOURCE TO WFADDDSD.WF-AD-SOURCE          
*S**  END-IF
*S**  MOVE #PASS-FAO TO WFADDDSD.WF-FAO         
*S**  MOVE WF27FEDL.WF-FE-SSN TO WFADDDSD.WW-ST-SSN         
*S**  PERFORM CALL-OBJECT-ADD       
*S**  /*    
*S**  RESET #ADD-FILE-UPDATED       
*S**  /*    
*S**  IF WWAOBJ.#EXISTS                      /* Current ADD record      
*S**    MOVE WFADDDSD.WF-AD-TRAN TO #FEDERAL-TRAN           
*S**    COMPRESS WW-ST-NM-LAST ',' INTO ##COMP-NAME LEAVING NO          
*S**    COMPRESS ##COMP-NAME WW-ST-NM-FIRST INTO ##COMP-NAME
*S**    /*  
*S**    DECIDE FOR FIRST CONDITION  
*S**      /*
*S**      /* Both records are Corrections       
*S**      WHEN WF-AD-SEND-RSN = 'C' AND #SEND-RSN = 'C'     
*S**        IF WF27FEDL.WF-FE-C-TRANS-NO GE #FEDERAL-TRAN   
*S**          /*        
*S**          /* Incoming record is more current or equal to existing   
*S**          /*  record, purge existing ADD record and add new one     
*S**          MOVE 'DELETE' TO WWAOBJ.#FUNCTION 
*S**          PERFORM CALL-OBJECT-ADD           
*S**          PERFORM CREATE-ADD-RECORD         
*S**          ASSIGN #ADD-FILE-UPDATED = TRUE   
*S**          ADD 1 TO #REPLACE-COUNTER         
*S**          WRITE(2) NOTITLE 5T WF27FEDL.WF-FE-SSN(EM=XXX'-'XX'-'XXXX)
*S**                  20T ##COMP-NAME           
*S**                  59T WF27FEDL.WF-FE-C-TRANS-NO 65T #SEND-RSN       
*S**                  72T #FEDERAL-TRAN 78T WFADDDSD.WF-AD-SEND-RSN     
*S**        ELSE        
*S**          /*        
*S**          /* Existing record is more current than incoming          
*S**          /*  record, keep existing ADD record          
*S**          ADD 1 TO #BYPASS-COUNTER          
*S**          WRITE(2) NOTITLE 5T WF27FEDL.WF-FE-SSN(EM=XXX'-'XX'-'XXXX)
*S**                  20T ##COMP-NAME           
*S**                  59T #FEDERAL-TRAN 65T WFADDDSD.WF-AD-SEND-RSN     
*S**                  72T WF27FEDL.WF-FE-C-TRANS-NO 78T #SEND-RSN       
*S**        END-IF      
*S**      /*
*S**      /* Incoming record is Correction      
*S**      WHEN #SEND-RSN = 'C'      
*S**        /*          
*S**        /* Purge existing ADD record and add new one    
*S**        MOVE 'DELETE' TO WWAOBJ.#FUNCTION   
*S**        PERFORM CALL-OBJECT-ADD 
*S**        PERFORM CREATE-ADD-RECORD           
*S**        ASSIGN #ADD-FILE-UPDATED = TRUE     
*S**        ADD 1 TO #REPLACE-COUNTER           
*S**        WRITE(2) NOTITLE 5T WF27FEDL.WF-FE-SSN(EM=XXX'-'XX'-'XXXX)  
*S**                20T ##COMP-NAME 
*S**                59T WF27FEDL.WF-FE-C-TRANS-NO 65T #SEND-RSN         
*S**                72T #FEDERAL-TRAN 78T WFADDDSD.WF-AD-SEND-RSN       
*S**      /*
*S**      /* Current ADD record is Correction   
*S**      WHEN WF-AD-SEND-RSN = 'C' 
*S**        /*          
*S**        /* Keep existing ADD record         
*S**        ADD 1 TO #BYPASS-COUNTER
*S**        WRITE(2) NOTITLE 5T WF27FEDL.WF-FE-SSN(EM=XXX'-'XX'-'XXXX)  
*S**                20T ##COMP-NAME 
*S**                59T #FEDERAL-TRAN 65T WFADDDSD.WF-AD-SEND-RSN       
*S**                72T WF27FEDL.WF-FE-C-TRANS-NO 78T #SEND-RSN         
*S**      /*
*S**      /* Incoming record is more current or equal to existing record,           
*S**      /*  purge existing ADD record and add new one     
*S**      WHEN WF27FEDL.WF-FE-C-TRANS-NO GE #FEDERAL-TRAN   
*S**        MOVE 'DELETE' TO WWAOBJ.#FUNCTION   
*S**        PERFORM CALL-OBJECT-ADD 
*S**        PERFORM CREATE-ADD-RECORD           
*S**        ASSIGN #ADD-FILE-UPDATED = TRUE     
*S**        ADD 1 TO #REPLACE-COUNTER           
*S**        WRITE(2) NOTITLE 5T WF27FEDL.WF-FE-SSN(EM=XXX'-'XX'-'XXXX)  
*S**                20T ##COMP-NAME 
*S**                59T WF27FEDL.WF-FE-C-TRANS-NO 65T #SEND-RSN         
*S**                72T #FEDERAL-TRAN 78T WFADDDSD.WF-AD-SEND-RSN       
*S**      WHEN NONE     
*S**        /*          
*S**        ADD 1 TO #BYPASS-COUNTER
*S**        WRITE(2) NOTITLE 5T WF27FEDL.WF-FE-SSN(EM=XXX'-'XX'-'XXXX)  
*S**                20T ##COMP-NAME 
*S**                59T #FEDERAL-TRAN 65T WFADDDSD.WF-AD-SEND-RSN       
*S**                72T WF27FEDL.WF-FE-C-TRANS-NO 78T #SEND-RSN         
*S**    END-DECIDE      
*S**  ELSE                                   /* No current ADD record   
*S**    PERFORM CREATE-ADD-RECORD   
*S**    ASSIGN #ADD-FILE-UPDATED = TRUE         
*S**    ADD 1 TO #NEW-COUNTER       
*S**  END-IF
*S**  /*    
*S**  IF WF27FEDL.WF-FE-ISIR-VERSION-FLAG = '1' AND         
*S**     #ADD-FILE-UPDATED          
*S**    /*  
*S**    /* If ISIR record is a post-OBBBA ISIR and          
*S**    /*  the ADD file was updated or added to,           
*S**    /*   remove any pre-OBBBA ISIRs         
*S**    MOVE ##AID-YEAR TO WFADDDSD.WF-AID-YEAR 
*S**    MOVE #PASS-FAO TO WFADDDSD.WF-FAO       
*S**    MOVE WF27FEDL.WF-FE-SSN TO WFADDDSD.WW-ST-SSN       
*S**    MOVE #PASS-SOURCE TO WFADDDSD.WF-AD-SOURCE          
*S**    MOVE 'GET' TO WWAOBJ.#FUNCTION          
*S**    PERFORM CALL-OBJECT-ADD     
*S**    IF WWAOBJ.#EXISTS           
*S**      MOVE 'DELETE' TO WWAOBJ.#FUNCTION     
*S**      PERFORM CALL-OBJECT-ADD   
*S**    END-IF          
*S**  END-IF
*S**  IF #ET-READ-COUNTER GE #MAX-READ-HOLD     
*S**    PERFORM COMMIT-OR-BACKOUT   
*S**  END-IF
*S**END-SUBROUTINE /* MAIN-PROCESS  
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE CALL-OBJECT-ADD           
*S*************************************************************************         
*S**  /*    
*S**  /* Call WF-ADD file object subprogram     
*S**  /*  (Year, SSN, source descriptor)        
*S**  CALLNAT 'WFADDDSO' WW-GDA     
*S**           WFADDDSD 
*S**           WFADDDSD-ID          
*S**           WFADDDSR 
*S**           WWAOBJ   
*S**END-SUBROUTINE /* CALL-OBJECT-ADD           
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE CREATE-ADD-RECORD         
*S*************************************************************************         
*S**  /*    
*S**  /* Call WF-ADD file object subprogram     
*S**  /*  (Year, format, SSN decsriptor)        
*S**  MOVE 'STORE' TO WWAOBJ.#FUNCTION          
*S**  RESET WFADDDSD    
*S**  MOVE ##AID-YEAR TO WFADDDSD.WF-AID-YEAR   
*S**  MOVE #PASS-FAO TO WFADDDSD.WF-FAO         
*S**  /*    
*S**  /* Check for new ISIR format (2026-2027)  
*S**  IF WF27FEDL.WF-FE-ISIR-VERSION-FLAG = '1' 
*S**    MOVE 'B' TO WFADDDSD.WF-AD-SOURCE       
*S**  ELSE  
*S**    MOVE #PASS-SOURCE TO WFADDDSD.WF-AD-SOURCE          
*S**  END-IF
*S**  MOVE WF27FEDL.WF-FE-SSN TO WFADDDSD.WW-ST-SSN         
*S**  /*    
*S**  /* Load name fields           
*S**  IF ##CNVT-CASE    
*S**    MOVE WF27FEDL.WF-FE-NM-LAST TO #TRANSLATE-FIELD     
*S**    ASSIGN #TRANSLATE-CASE = 'M'
*S**    RESET #REMOVE-SPEC-CH       
*S**    PERFORM TRANSLATE-CASE #TRANSLATE-FIELD #TRANSLATE-CASE         
*S**                           #REMOVE-SPEC-CH  
*S**    ASSIGN WFADDDSD.WW-ST-NM-LAST = #TRANSLATE-FIELD    
*S**    MOVE WF27FEDL.WF-FE-NM-FIRST TO #TRANSLATE-FIELD    
*S**    ASSIGN #TRANSLATE-CASE = 'M'
*S**    RESET #REMOVE-SPEC-CH       
*S**    PERFORM TRANSLATE-CASE #TRANSLATE-FIELD #TRANSLATE-CASE         
*S**                           #REMOVE-SPEC-CH  
*S**    ASSIGN WFADDDSD.WW-ST-NM-FIRST = #TRANSLATE-FIELD   
*S**  ELSE  
*S**    MOVE WF27FEDL.WF-FE-NM-LAST TO WFADDDSD.WW-ST-NM-LAST           
*S**    MOVE WF27FEDL.WF-FE-NM-FIRST TO WFADDDSD.WW-ST-NM-FIRST         
*S**  END-IF
*S**  /*    
*S**  /* Name sort fields           
*S**  MOVE WF27FEDL.WF-FE-NM-LAST TO #TRANSLATE-FIELD       
*S**  ASSIGN #TRANSLATE-CASE = 'U'  
*S**  ASSIGN #REMOVE-SPEC-CH = TRUE 
*S**  PERFORM TRANSLATE-CASE #TRANSLATE-FIELD #TRANSLATE-CASE           
*S**                         #REMOVE-SPEC-CH    
*S**  ASSIGN WFADDDSD.WW-NAME-LAST = #TRANSLATE-FIELD       
*S**  MOVE WF27FEDL.WF-FE-NM-FIRST TO #TRANSLATE-FIELD      
*S**  ASSIGN #TRANSLATE-CASE = 'U'  
*S**  ASSIGN #REMOVE-SPEC-CH = TRUE 
*S**  PERFORM TRANSLATE-CASE #TRANSLATE-FIELD #TRANSLATE-CASE           
*S**                         #REMOVE-SPEC-CH    
*S**  ASSIGN WFADDDSD.WW-NAME-FIRST = #TRANSLATE-FIELD      
*S**  /*    
*S**  MOVE WF27FEDL.WF-FE-NM-MIDDLE TO WFADDDSD.WW-ST-NM-MI 
*S**  IF WF27FEDL.WF-FE-DOB = MASK(YYYYMMDD)    
*S**    MOVE EDITED WF27FEDL.WF-FE-DOB TO WFADDDSD.WW-ST-DOB(EM=YYYYMMDD)           
*S**  END-IF
*S**  MOVE #SEND-RSN TO WFADDDSD.WF-AD-SEND-RSN 
*S**  MOVE #COLLEGE-SENT TO WFADDDSD.WF-AD-COLLEGE          
*S**  MOVE WF27FEDL.WF-FE-C-TRANS-NO TO WFADDDSD.WF-AD-TRAN 
*S**  IF WF27FEDL.WF-FE-C-TRAN-PROC-DATE = MASK(YYYYMMDD)   
*S**    MOVE RIGHT JUSTIFIED WF27FEDL.WF-FE-C-TRAN-PROC-DATE TO         
*S**      #TEMP-RCVD-DATE           
*S**    EXAMINE #TEMP-RCVD-DATE FOR ' ' REPLACE WITH '0'    
*S**    MOVE EDITED #TEMP-RCVD-DATE 
*S**             TO WFADDDSD.WF-AD-RCVD-DATE(EM=YYYYMMDD)   
*S**  END-IF
*S**  MOVE 'N' TO WFADDDSD.WF-AD-NEW-REJ        
*S**  /*    
*S**  /* leave reject fields initialized to space           
*S**  MOVE BY NAME WF27FEDL TO WFADDDSD.WF-ADD-RECORD       
*S**  PERFORM CALL-OBJECT-ADD       
*S**END-SUBROUTINE /* CREATE-ADD-RECORD         
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE COMMIT-OR-BACKOUT         
*S*************************************************************************         
*S**  /*    
*S**  /* Periodically issue END TRANSACTION     
*S**  IF #INPUT-RUNMODE = 'TRIAL'   
*S**    BACKOUT TRANSACTION         
*S**  ELSE  
*S**    END TRANSACTION 
*S**  END-IF
*S**  RESET #ET-READ-COUNTER #ET-WRITE-COUNTER  
*S**END-SUBROUTINE /* COMMIT-OR-BACKOUT         
*S**END     
*C**                                FATEMP  WFCPS27D                        P S   NN0000        
*D01NAT8304P FATEMP  WFCPS27D                        ZWDNH   ZWDNH           S      
*D02            2026042609512102026042609512100000007727    
*D03LINUX   
*D04                 ISO_8859-1:1987
*S****C           0   ***********************************************************************   
*S****C           0   * 
*S****C           0   *         WolffPack, Inc. 
*S****C           0   *                                            Copyright 1995 - 2026        
*S****C           0   * PDA:    WFCPS27D                              WolffPack, Inc.           
*S****C           0   * System: FINANCIER                           All rights reserved.        
*S****C           0   * 
*S****C           0   ***********************************************************************   
*S****DS          0         1WFCPS27D                        /* Object Name         
*S****DK          0   A   9 2WW-STUDENT-ID                   /*         
*S****DK          0   A   2 2WF-FAO                          /*         
*S****DS          0         2WW-SYSTEM                       /*         
*S****DK          0   N   7 3WW-HOLD                         /*         
*S****DK          0   D     3WW-CDATE                        /*         
*S****DK          0   D     3WW-MDATE                        /*         
*S****DS          0         2WF-CPS-IDENTIFICATION           /*         
*S****DK          0   A  36 3WF-CP-TRANS-UUID                /*         
*S****DK          0   A   2 3WF-CP-C-TRANS-NO                /*         
*S****DK          0   A   4 3WF-CP-DRN                       /*         
*S****DK          0   A   6 3WF-CP-COLLEGE                   /*         
*S****DS          0         2WF-CPS-APPLICATION              /*         
*S****DK          0   A   1 3WF-CP-A-VER                     /*         
*S****DK          0   A   1 3WF-CP-A-DEP-MODEL               /*         
*S****DK          0   P   8 3WF-CP-A-SAI                     /*         
*S****DK          0   P   8 3WF-CP-A-SAI-PROV                /*         
*S****DK          0   A   1 3WF-CP-A-SANAL                   /*         
*S****DK          0   P   7 3WF-CP-A-SC                      /*         
*S****DK          0   P  15 3WF-CP-A-SCI                     /*         
*S****DK          0   P  12 3WF-CP-A-SCA                     /*         
*S****DK          0   A   1 3WF-CP-A-PANAL                   /*         
*S****DK          0   P  15 3WF-CP-A-PC                      /*         
*S****DK          0   P   7 3WF-CP-A-PCI                     /*         
*S****DK          0   P  12 3WF-CP-A-PCA                     /*         
*S****DK          0   P   8 3WF-CP-A-FISAP                   /*         
*S****DS          0         2WF-CPS-CORRECTION               /*         
*S****DK          0   A   1 3WF-CP-C-DEF-OVR                 /*         
*S****DS          0         2WF-CPS-RPT-PELL                 /*         
*S****DK          0   A   1 3WF-CP-RP-AEI                    /*         
*S****DK          0   A   1 3WF-CP-RP-ACT                    /*         
*S****DK          0   A   2 3WF-CP-RP-ACT-RSN                /*         
*S****DK          0   D     3WF-CP-RP-ACT-DATE               /*         
*S****DK          0   D     3WF-CP-RP-RPT-DATE               /*         
*S****DK          0   A   1 3WF-CP-RP-O-ACK                  /*         
*S****DK          0   D     3WF-CP-RP-O-ACK-DATE             /*         
*S****DK          0   A   1 3WF-CP-RP-D-ACK                  /*         
*S****DK          0   D     3WF-CP-RP-D-ACK-DATE             /*         
*S****DS          0         3WF-CPS-RPT-PELL-FAO             /*         
*S****DK          0   A   2 4WF-CP-RP-R-FED-TRAN             /*         
*S****DK          0   P   5 4WF-CP-RP-R-COST                 /*         
*S****DK          0   A   1 4WF-CP-RP-R-VER                  /*         
*S****DK          0   D     4WF-CP-RP-R-ENR-DATE             /*         
*S****DK          0   P 5.2 4WF-CP-RP-R-AWARD                /*         
*S****DK          0   P 5.2 4WF-CP-RP-R-DISB                 /*         
*S****DS          0         3WF-CPS-RPT-PELL-COD             /*         
*S****DK          0   A   2 4WF-CP-RP-A-FED-TRAN             /*         
*S****DK          0   P   5 4WF-CP-RP-A-COST                 /*         
*S****DK          0   A   1 4WF-CP-RP-A-VER                  /*         
*S****DK          0   D     4WF-CP-RP-A-ENR-DATE             /*         
*S****DK          0   P 5.2 4WF-CP-RP-A-AWARD                /*         
*S****DK          0   P 5.2 4WF-CP-RP-A-DISB                 /*         
*S****DK          0   P   5 3WF-CP-RP-SCH-GRANT              /*         
*S****DS          0         2WF-CPS-RPT-TEACH1               /*         
*S****DK          0   A   4 3WF-CP-RT1-FY                    /*         
*S****DK          0   A   1 3WF-CP-RT1-ACT                   /*         
*S****DK          0   A   2 3WF-CP-RT1-ACT-RSN               /*         
*S****DK          0   D     3WF-CP-RT1-ACT-DATE              /*         
*S****DK          0   D     3WF-CP-RT1-RPT-DATE              /*         
*S****DK          0   A   1 3WF-CP-RT1-O-ACK                 /*         
*S****DK          0   D     3WF-CP-RT1-O-ACK-DATE            /*         
*S****DK          0   A   1 3WF-CP-RT1-D-ACK                 /*         
*S****DK          0   D     3WF-CP-RT1-D-ACK-DATE            /*         
*S****DS          0         3WF-CPS-RPT-TEACH1-FAO           /*         
*S****DK          0   N   1 4WF-CP-RT1-R-GRANT               /*         
*S****DK          0   A   2 4WF-CP-RT1-R-FED-TRAN            /*         
*S****DK          0   A2    4WF-CP-RT1-R-YR-COL 
*S****DK          0   D     4WF-CP-RT1-R-ENR-DATE            /*         
*S****DK          0   P 5.2 4WF-CP-RT1-R-AWARD               /*         
*S****DK          0   P 5.2 4WF-CP-RT1-R-DISB                /*         
*S****DS          0         3WF-CPS-RPT-TEACH1-COD           /*         
*S****DK          0   N   1 4WF-CP-RT1-A-GRANT               /*         
*S****DK          0   A   2 4WF-CP-RT1-A-FED-TRAN            /*         
*S****DK          0   A2    4WF-CP-RT1-A-YR-COL 
*S****DK          0   D     4WF-CP-RT1-A-ENR-DATE            /*         
*S****DK          0   P 5.2 4WF-CP-RT1-A-AWARD               /*         
*S****DK          0   P 5.2 4WF-CP-RT1-A-DISB                /*         
*S****DK          0   P   5 4WF-CP-RT1-SCH-GRANT             /*         
*S****DK          0   A  23 4WF-CP-RT1-ATS-ID                /*         
*S****DK          0   A   1 4WF-CP-RT1-ATS-ELEC              /*         
*S****DK          0   A   1 4WF-CP-RT1-ATS-STAT              /*         
*S****DK          0   A   1 4WF-CP-RT1-ATS-LINK              /*         
*S****DS          0         2WF-CPS-RPT-TEACH2               /*         
*S****DK          0   A   4 3WF-CP-RT2-FY                    /*         
*S****DK          0   A   1 3WF-CP-RT2-ACT                   /*         
*S****DK          0   A   2 3WF-CP-RT2-ACT-RSN               /*         
*S****DK          0   D     3WF-CP-RT2-ACT-DATE              /*         
*S****DK          0   D     3WF-CP-RT2-RPT-DATE              /*         
*S****DK          0   A   1 3WF-CP-RT2-O-ACK                 /*         
*S****DK          0   D     3WF-CP-RT2-O-ACK-DATE            /*         
*S****DK          0   A   1 3WF-CP-RT2-D-ACK                 /*         
*S****DK          0   D     3WF-CP-RT2-D-ACK-DATE            /*         
*S****DS          0         3WF-CPS-RPT-TEACH2-FAO           /*         
*S****DK          0   N   1 4WF-CP-RT2-R-GRANT               /*         
*S****DK          0   A   2 4WF-CP-RT2-R-FED-TRAN            /*         
*S****DK          0   A2    4WF-CP-RT2-R-YR-COL 
*S****DK          0   D     4WF-CP-RT2-R-ENR-DATE            /*         
*S****DK          0   P 5.2 4WF-CP-RT2-R-AWARD               /*         
*S****DK          0   P 5.2 4WF-CP-RT2-R-DISB                /*         
*S****DS          0         3WF-CPS-RPT-TEACH2-COD           /*         
*S****DK          0   N   1 4WF-CP-RT2-A-GRANT               /*         
*S****DK          0   A   2 4WF-CP-RT2-A-FED-TRAN            /*         
*S****DK          0   A2    4WF-CP-RT2-A-YR-COL 
*S****DK          0   D     4WF-CP-RT2-A-ENR-DATE            /*         
*S****DK          0   P 5.2 4WF-CP-RT2-A-AWARD               /*         
*S****DK          0   P 5.2 4WF-CP-RT2-A-DISB                /*         
*S****DK          0   P   5 4WF-CP-RT2-SCH-GRANT             /*         
*S****DK          0   A  23 4WF-CP-RT2-ATS-ID                /*         
*S****DK          0   A   1 4WF-CP-RT2-ATS-ELEC              /*         
*S****DK          0   A   1 4WF-CP-RT2-ATS-STAT              /*         
*S****DK          0   A   1 4WF-CP-RT2-ATS-LINK              /*         
*S****C           0   * 
*S****C           0   * No 'N' relationships exist for:      WF-CPS-2627
*S****C           0   * 
*S****DF          0   A  11 1WFCPS27D-ID                     /* Object identifier   
*S****DR          0        R1WFCPS27D-ID                     /* REDEF. BEGIN : WFCPS27D-ID      
*S****DSR         0         2STRUCTURE                       /* To allow MOVE BY NAME           
*S****DFR         0   A   2 3WF-FAO                          /*         
*S****DFR         0   A   9 3WW-STUDENT-ID                   /*         
*C**                                FATEMP  WFFEB27N                        N S   NN0000        
*D01NAT8304N FATEMP  WFFEB27N                        ZWDNH   ZWDNH           S      
*D02            2026051308453202026051308453200000030751    
*D03LINUX   
*D04                 ISO_8859-1:1987
*S*************************************************************************         
*S***       
*S***                              WolffPack    
*S***       
*S*** Subprogram: WFFEB27N          
*S*** System    : FINANCIER         
*S*** Title     : 2026-27 Federal Load subprogram           
*S*** Function  : This subprogram loads Federal application data from   
*S***             the ADD file into the WF-FEDERAL-2627 file.           
*S***       
*S***      Copyright 1995 - 2026 WolffPack, Inc.  All rights reserved.  
*S***       
*S***       Note: Module copied from WFFEL27N, modified to allow for    
*S***             additional fields and increased field sizes in        
*S***             mid 2026-2027 processing year.
*S***       
*S*************************************************************************         
*S**DEFINE DATA         
*S**  GLOBAL USING WWGDA
*S**  PARAMETER USING WWPDA         
*S**  PARAMETER         
*S**   01 #PARAMETER-FIELDS         
*S**     02 #PGM-PARAMETERS         
*S**       03 #EARLIER-REC(A1)      
*S**       03 #FED-REJ-CASE(A1)     
*S**       03 #OVRD-FED-REJ(A1)     
*S**       03 #OVRD-C-PEND(A1)      
*S**       03 #OVRD-C-XMIT(A1)      
*S**       03 #OVRD-LOCKED(A1)      
*S**       03 #OVRD-VERIFD(A1)      
*S**       03 #OVRD-PACKAGE(A1)     
*S**     02 #PASSED-PARAMETERS      
*S**       03 #INPUT-COUNTER(P7)    
*S**       03 #NEW-REJ-COUNTER(P7)  
*S**       03 #RE-REJ-COUNTER(P7)   
*S**       03 #BYPASS-COUNTER(P7)   
*S**       03 #ADD-RECORD-COUNTER(P7)           
*S**       03 #PROCESSED-RECORD(L)  
*S**  PARAMETER USING WFADDDSD      
*S***       
*S**  LOCAL USING WFFED27D /* Passed to object subprogram   
*S**  LOCAL USING WFFED27R /* Passed to object subprogram   
*S**  LOCAL USING WWSTDNTD /* Passed to object subprogram   
*S**  LOCAL USING WWSTDNTR /* Passed to object subprogram   
*S**  LOCAL USING WFCPC27D /* Passed to object subprogram   
*S**  LOCAL USING WFCPC27R /* Passed to object subprogram   
*S**  LOCAL USING WWAOBJ   /* Passed to object subprograms  
*S***       
*S*** LOCAL USING WWCONST  /* Constants LDA     
*S**  LOCAL 
*S**   01 SPACE (A1) INIT<' '>      
*S**   01 EDE-TYPE (A1) INIT<'E'>   
*S**   01 INIT-DATE (D) 
*S***       
*S**  LOCAL USING WWVALLDA /* Value validation LDA          
*S**  LOCAL USING WF27FEBL /* Sequential LDA    
*S***       
*S**  LOCAL 
*S**  01 #LOGICALS      
*S**    02 #ADD-FEDERAL(L)          
*S**    02 #ADD-CPS(L)  
*S**    02 #ARRAY-LOADED(L)         
*S***       
*S**  01 #SUB(P5)       
*S**  01 #SUB2(P5)      
*S***       
*S**  01 #DATA-ERROR    
*S**    02 #ERR-SID(A9) 
*S**    02 #ERR-NAM(A30)
*S**    02 #ERR-SRC(A1) 
*S**    02 #ERR-FLD(A25)
*S**    02 #ERR-VAL(A10)
*S***       
*S**  01 #TRANSLATE-FIELD(A30)      
*S**  01 #TRANSLATE-CASE(A1)        
*S**  01 #REMOVE-SPEC-CH(L)         
*S***       
*S**  01 #N(N2)         
*S**  01 #HOLD-FILE(A8) 
*S**  01 #HOLD-SAR(A3)  
*S**  01 #HOLD-EFC(A10) 
*S**  01 #PASS-KEY(A30) 
*S**  01 #PASS-TEMP(A30)
*S***       
*S*** Variables utilized by Event History routine           
*S**  01 #EVENT-TYPE(A5) CONST<'ADDLd'>         
*S**  01 #EVENT-DESC(A40)           
*S***       
*S**  01 #BLANKS-ARRAY(A200)        
*S**  01 REDEFINE #BLANKS-ARRAY     
*S**    02 #BLANK(A1/200)           
*S***       
*S**  01 #EDIT-DATE-YYYYMMDD(A8)    
*S**  01 REDEFINE #EDIT-DATE-YYYYMMDD           
*S**    02 #EDIT-DATE-YYYYMM(A6)    
*S**    02 #EDIT-DATE-DD(A2)        
*S***       
*S**  01 #HOLD-HOLD(N7) 
*S**  01 #HOLD-CDATE(D) 
*S**  01 #HOLD-MDATE(D) 
*S**  01 #HOLD-LOCK(A1) 
*S***       
*S**  01 #CNVT-NEG(L)   
*S**  01 #CNVT-BYTE(A1) 
*S**  01 #SAVE-BYTE(A1) 
*S***       
*S**  01 #HOLD-LAST(A20)
*S**  01 #HOLD-FIRST(A20)           
*S***       
*S**  01 #PASS-FIELDS   
*S**    02 #PASS-NM-LAST(A20)       
*S**    02 #PASS-NM-FIRST(A20)      
*S**    02 #PASS-NM-MI(A1)          
*S**    02 #PASS-PID(A9)
*S***       
*S**  01 #HOLD-LEU(N4.3)
*S**  01 #HOLD-LEU-FLAG(A1)         
*S**  01 #DISP-LEU(A8)  
*S**  01 #DISP-LEU-LIT(A12)         
*S**  01 #HOLD-FIELD(A50)           
*S***       
*S**  01 #START      (I4) INIT <1>  
*S**  01 #POS        (I4)           
*S**  01 #LENGTH     (I4)           
*S**  01 #COUNT      (I4) INIT <0>  
*S**  01 #STR-ARRAY  (A30/60)       
*S**  01 #STR-SUB    (P2)           
*S**  01 #HOLD-TEMP  (A100)         
*S**  01 #LARGE-FIELD-FIRST (A1)    
*S***       
*S**  LOCAL USING WWPARNTD          
*S**END-DEFINE          
*S***       
*S*** Define printers, formats, headings        
*S**FORMAT(2) LS=80 PS=60 ZP=ON IS=OFF ES=OFF SG=OFF        
*S***       
*S**FORMAT KD=ON PS=10  
*S**SET KEY ALL         
*S***       
*S**AT TOP OF PAGE(2)   
*S**  WRITE(2) NOTITLE ##PGM-ID     
*S**        27T '*** FINANCIER ADD LOAD ***'    
*S**        71T 'Page' *PAGE-NUMBER(2)(EM=ZZ9)  
*S**      / *DATX(EM=LLL' 'DD', 'YYYY)          
*S**        31T 'Field Value Errors'
*S**        71T *TIMX(EM=HH':'II' 'AP)          
*S**     // 31T 'Aid Year:' ##DISP-AY           
*S**      / 36T ##DISP-LIT ##DISP-FAO           
*S**    /// 'StudentID     Name                      Src    Error'      
*S**  SKIP(2) 1         
*S**END-TOPPAGE         
*S***       
*S*** Populate WW-GDA from WW-PDA   
*S**  MOVE BY POSITION WW-PDA TO WW-GDA         
*S***       
*S***       
*S**PROG.   
*S**  REPEAT
*S**    /*  
*S**    RESET #PROCESSED-RECORD     
*S**          #FED-REJ-CASE         
*S**          #EARLIER-REC          
*S**    MOVE ##SID TO #ERR-SID      
*S**    MOVE ##COMP-NAME TO #ERR-NAM
*S**    MOVE 'F' TO #ERR-SRC        
*S**    /*  
*S**    /* Load LDA from ADD record 
*S**    MOVE BY NAME WFADDDSD TO WF27FEBL       
*S**    /*  
*S**    /* Get Federal data record  
*S**    MOVE ##STUDENT-ID TO WFFED27D.WW-STUDENT-ID         
*S**    MOVE ##FAO-ID TO WFFED27D.WF-FAO        
*S**    /*  
*S**    ASSIGN WWAOBJ.#FUNCTION = 'GET'         
*S**    PERFORM CALL-OBJECT-FEDERAL 
*S**    /*  
*S**    IF NOT WWAOBJ.#EXISTS       
*S**      ASSIGN #ADD-FEDERAL = TRUE
*S**    END-IF          
*S**    /*  
*S**    /* Federal reject           
*S**    /*  (only applicable for Automatic records)         
*S**    IF #OVRD-FED-REJ = 'Y' OR   
*S**       WFADDDSD.WF-AD-REJ-OVERRIDE = 'O'    
*S**      IGNORE                              /* Bypass Federal Reject edit         
*S**    ELSE
*S**      IF WFADDDSD.WF-AD-SEND-RSN NE 'C'     
*S**        IF WF27FEBL.WF-FE-C-DEP-MODEL = 'X' OR ='Y'    /* Federal rejects       
*S**          ASSIGN #FED-REJ-CASE = 'F'        
*S**          ESCAPE BOTTOM(PROG.)  
*S**        END-IF      
*S**      END-IF        
*S**    END-IF          
*S**    /*  
*S**    /* Get CPS data record      
*S**    ASSIGN WWAOBJ.#FUNCTION = 'GET'         
*S**    ASSIGN WFCPC27D.WW-STUDENT-ID = ##STUDENT-ID        
*S**    ASSIGN WFCPC27D.WF-FAO = ##FAO-ID       
*S**    PERFORM CALL-OBJECT-CPS     
*S**    IF NOT WWAOBJ.#EXISTS       
*S**      ASSIGN #ADD-CPS = TRUE    
*S**    END-IF          
*S**    /*  
*S**    /* Don't allow transactions older than current      
*S**    /*   (only if processing batch, override if invoked online)     
*S**    IF ##PGM-ID = 'WFADDLDB'    
*S**      IF WF27FEBL.WF-FE-C-TRANS-NO < WFCPC27D.WF-CP-C-TRANS-NO      
*S**        ASSIGN #EARLIER-REC = 'Y'           
*S**        ESCAPE BOTTOM(PROG.)    
*S**      END-IF        
*S**    END-IF          
*S**    /*  
*S**    /* Check for rejects        
*S**    IF WFADDDSD.WF-AD-REJ-OVERRIDE NE 'O' AND           
*S**      (WFADDDSD.WF-AD-REJ1 NE SPACE OR      
*S**       WFADDDSD.WF-AD-REJ2 NE SPACE OR      
*S**       WFADDDSD.WF-AD-REJ3 NE SPACE OR      
*S**       WFADDDSD.WF-AD-REJ4 NE SPACE OR      
*S**       WFADDDSD.WF-AD-REJ5 NE SPACE)        
*S**      ESCAPE BOTTOM(PROG.)      
*S**    END-IF          
*S**    /*  
*S**    PERFORM UPDATE-STUDENT      
*S**    PERFORM UPDATE-FEDERAL      
*S**    MOVE WF27FEBL.WF-ISIR1 TO #HOLD-FIELD   
*S**    MOVE WF27FEBL.WF-ISIR19 TO #HOLD-FIELD  
*S**    PERFORM LOAD-ISIR-2627B WF27FEBL.WF-ISIR
*S**                            WF27FEBL.WF-ISIRB           
*S**    MOVE ##PASS-TEMP TO #HOLD-TEMP          
*S**    RESET ##PASS-TEMP           
*S**    PERFORM LOAD-NSLDS-2627B WF27FEBL.WF-NSLDS          
*S**    /*  
*S**    /* (2026-2027 Mid year only)
*S**    /* Check for string of OBBBA fields that were truncated,        
*S**    /*  if found report         
*S**    IF ##PASS-TEMP NOT = ' '    
*S**      RESET #LARGE-FIELD-FIRST  
*S**      PERFORM REPORT-LARGE-FIELDS           
*S**    END-IF          
*S**    /*  
*S**    MOVE #HOLD-TEMP TO ##PASS-TEMP          
*S**    /*  
*S**    PERFORM UPDATE-CPS          
*S**    PERFORM LOAD-CORRECTIONS    
*S**    /*  
*S**    /* Add event    
*S**    PERFORM GET-NSLDS-LEU #HOLD-LEU #HOLD-LEU-FLAG      
*S**    MOVE EDITED #HOLD-LEU (EM=ZZZ9.999) TO #DISP-LEU    
*S**    MOVE LEFT JUSTIFIED #DISP-LEU TO #DISP-LEU-LIT      
*S**    COMPRESS '/LEU=' #DISP-LEU-LIT INTO #DISP-LEU-LIT LEAVING NO    
*S**    /*  
*S**    IF WF27FEBL.WF-FE-C-SAI = ' '           
*S**      COMPRESS 'FedTran #' WFCPC27D.WF-CP-C-TRANS-NO '/SAI blank'   
*S**        #DISP-LEU-LIT           
*S**          INTO #EVENT-DESC LEAVING NO       
*S**    ELSE
*S**      MOVE EDITED WF-CP-A-SAI (EM=Z,ZZZ,ZZ9-) TO #HOLD-EFC          
*S**      MOVE LEFT JUSTIFIED #HOLD-EFC TO #HOLD-EFC        
*S**      COMPRESS 'FedTran #' WFCPC27D.WF-CP-C-TRANS-NO '/SAI $' #HOLD-EFC         
*S**        #DISP-LEU-LIT           
*S**          INTO #EVENT-DESC LEAVING NO       
*S**    END-IF          
*S**    PERFORM ADD-EVENT #EVENT-TYPE #EVENT-DESC           
*S**    /*  
*S**    ADD 1 TO #ADD-RECORD-COUNTER
*S**    ASSIGN #PROCESSED-RECORD = TRUE         
*S**    ASSIGN ##PASS-ACTION = 'L'                 /* Confirm load on-line          
*S**    RESET ##PASS-KEY
*S**    ESCAPE BOTTOM(PROG.)        
*S**  END-REPEAT        
*S***       
*S**  MOVE BY POSITION WW-GDA TO WW-PDA         
*S***       
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE CALL-OBJECT-CPS           
*S*************************************************************************         
*S**  /*    
*S**  /* Call the WF-CPS-xxyy object subprogram 
*S**  CALLNAT 'WFCPC27O' WW-GDA     
*S**           WFCPC27D 
*S**           WFCPC27D-ID          
*S**           WFCPC27R 
*S**           WWAOBJ   
*S**END-SUBROUTINE /* CALL-OBJECT-CPS           
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE CALL-OBJECT-FEDERAL       
*S*************************************************************************         
*S**  /*    
*S**  /* Call the WF-FEDERAL-xxyy object subprogram         
*S**  CALLNAT 'WFFED27O' WW-GDA     
*S**           WFFED27D 
*S**           WFFED27D-ID          
*S**           WFFED27R 
*S**           WWAOBJ   
*S**END-SUBROUTINE /* CALL-OBJECT-FEDERAL       
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE CALL-OBJECT-STUDENT       
*S*************************************************************************         
*S**  /*    
*S**  /* Call the WW-STUDENT object subprogram  
*S**  CALLNAT 'WWSTDNTO' WW-GDA     
*S**           WWSTDNTD 
*S**           WWSTDNTD-ID          
*S**           WWSTDNTR 
*S**           WWAOBJ   
*S**END-SUBROUTINE /* CALL-OBJECT-STUDENT       
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE LOAD-CORRECTIONS          
*S*************************************************************************         
*S**  /*    
*S**  /* First, if Corrected ISIR, delete old corrections   
*S**  IF WFADDDSD.WF-AD-SEND-RSN = 'C'          
*S**    MOVE EDE-TYPE TO ##PASS-KEY 
*S**    MOVE 'X' TO ##PASS-TEMP     
*S**    PERFORM PURGE-ECAR          
*S**  END-IF
*S**  /*    
*S**  /* If corrections were made to ADD file fields,       
*S**  /*  create correction records now that student is in FINANCIER    
*S**  DECIDE FOR EVERY CONDITION    
*S**    WHEN WFADDDSD.WF-AD-C-SSN = 'S'         
*S**      /*
*S**      /* SSN modified           
*S**      ASSIGN #PASS-KEY = 'WWSTDNTD.WW-ST-SSN'           
*S**      RESET #PASS-TEMP          
*S**      PERFORM GET-SAR-NO #PASS-KEY #PASS-TEMP           
*S**      ASSIGN #HOLD-SAR = #PASS-TEMP         
*S**      ASSIGN #VALUE = WFADDDSD.WW-ST-SSN    
*S**      SEPARATE #PASS-KEY INTO #HOLD-FILE #PASS-KEY WITH 
*S**        DELIMITER '.'           
*S**      PERFORM LOAD-UTIL-ARRAY   
*S**    WHEN WFADDDSD.WF-AD-C-DOB = 'B'         
*S**      /*
*S**      /* DOB modified           
*S**      ASSIGN #PASS-KEY = 'WWSTDNTD.WW-ST-DOB'           
*S**      RESET #PASS-TEMP          
*S**      PERFORM GET-SAR-NO #PASS-KEY #PASS-TEMP           
*S**      ASSIGN #HOLD-SAR = #PASS-TEMP         
*S**      MOVE EDITED WFADDDSD.WW-ST-DOB (EM=YYYYMMDD) TO #VALUE        
*S**      SEPARATE #PASS-KEY INTO #HOLD-FILE #PASS-KEY WITH 
*S**        DELIMITER '.'           
*S**      PERFORM LOAD-UTIL-ARRAY   
*S**    WHEN WFADDDSD.WF-AD-C-NL = 'L'          
*S**      /*
*S**      /* Last name modified     
*S**      ASSIGN #PASS-KEY = 'WWSTDNTD.WW-ST-NM-LAST'       
*S**      RESET #PASS-TEMP          
*S**      PERFORM GET-SAR-NO #PASS-KEY #PASS-TEMP           
*S**      ASSIGN #HOLD-SAR = #PASS-TEMP         
*S**      ASSIGN #VALUE = WFADDDSD.WW-ST-NM-LAST
*S**      SEPARATE #PASS-KEY INTO #HOLD-FILE #PASS-KEY WITH 
*S**        DELIMITER '.'           
*S**      PERFORM LOAD-UTIL-ARRAY   
*S**    WHEN WFADDDSD.WF-AD-C-NF = 'F'          
*S**      /*
*S**      /* First name modified    
*S**      ASSIGN #PASS-KEY = 'WWSTDNTD.WW-ST-NM-FIRST'      
*S**      RESET #PASS-TEMP          
*S**      PERFORM GET-SAR-NO #PASS-KEY #PASS-TEMP           
*S**      ASSIGN #HOLD-SAR = #PASS-TEMP         
*S**      ASSIGN #VALUE = WFADDDSD.WW-ST-NM-FIRST           
*S**      SEPARATE #PASS-KEY INTO #HOLD-FILE #PASS-KEY WITH 
*S**        DELIMITER '.'           
*S**      PERFORM LOAD-UTIL-ARRAY   
*S**    WHEN WFADDDSD.WF-AD-C-NM = 'M'          
*S**      /*
*S**      /* Middle Initial modified
*S**      ASSIGN #PASS-KEY = 'WWSTDNTD.WW-ST-NM-MI'         
*S**      RESET #PASS-TEMP          
*S**      PERFORM GET-SAR-NO #PASS-KEY #PASS-TEMP           
*S**      ASSIGN #HOLD-SAR = #PASS-TEMP         
*S**      ASSIGN #VALUE = WFADDDSD.WW-ST-NM-MI  
*S**      SEPARATE #PASS-KEY INTO #HOLD-FILE #PASS-KEY WITH 
*S**        DELIMITER '.'           
*S**      PERFORM LOAD-UTIL-ARRAY   
*S**    WHEN ANY        
*S**      CALLNAT 'WWDUTILN' WW-GDA WWVALLDA    
*S**    WHEN NONE       
*S**      IGNORE        
*S**  END-DECIDE        
*S**END-SUBROUTINE /* LOAD-CORRECTIONS          
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE LOAD-UTIL-ARRAY           
*S*************************************************************************         
*S**  /*    
*S**  /* Load utility array for correction record create    
*S**  RESET #ARRAY-LOADED           
*S**  ASSIGN #N = 1     
*S**  /*    
*S**  REPEAT WHILE NOT #ARRAY-LOADED
*S**    IF (#FILE(#N) = #HOLD-FILE AND #FIELD(#N) = #PASS-KEY) OR       
*S**       (#FILE(#N) = ' ' AND #FIELD(#N) = ' ')           
*S**      ASSIGN #SAR-FLD-NO(#N) = #HOLD-SAR          /* Found match OR 
*S**      ASSIGN #VALU(#N) = #VALUE                   /*  not yet defined           
*S**      ASSIGN #VALU-SUB = #N     
*S**      ASSIGN #ARRAY-LOADED = TRUE           
*S**      IF #FILE(#N) = ' ' AND #FIELD(#N) = ' '           
*S**        ASSIGN #FILE(#N) = #HOLD-FILE       
*S**        ASSIGN #FIELD(#N) = #PASS-KEY       
*S**      END-IF        
*S**    END-IF          
*S**    ADD 1 TO #N     
*S**  END-REPEAT        
*S**END-SUBROUTINE /* LOAD-UTIL-ARRAY           
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE REPORT-LARGE-FIELDS       
*S*************************************************************************         
*S**  /*    
*S**  /* Load utility array for correction record create    
*S**  REPEAT
*S**    /* Stop after 59 values */  
*S**    IF #COUNT >= 59 
*S**      ESCAPE BOTTOM 
*S**    END-IF          
*S**        
*S**    /* Find next comma */       
*S**    EXAMINE SUBSTRING(##PASS-TEMP, #START) FOR ','      
*S**      GIVING POSITION #POS      
*S**        
*S**    IF #POS = 0     
*S**      /* Last value (no more commas) */     
*S**      ESCAPE BOTTOM 
*S**    END-IF          
*S**        
*S**    ADD 1 TO #COUNT 
*S**        
*S**    /* Extract value */         
*S**    IF #POS = 1     
*S**      MOVE ' ' TO #FIELD(#COUNT)
*S**    ELSE
*S**      #LENGTH := #POS - 1       
*S**      MOVE SUBSTRING(##PASS-TEMP, #START, #LENGTH)      
*S**        TO #STR-ARRAY(#COUNT)   
*S**    END-IF          
*S**        
*S**    /* Move start past comma */ 
*S**    ADD #POS TO #START          
*S**        
*S**  END-REPEAT        
*S**  FOR #STR-SUB = 1 TO #COUNT    
*S**    IF #STR-ARRAY(#STR-SUB) <> ' '          
*S**      DECIDE FOR FIRST CONDITION
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'A1'    
*S**          ASSIGN #VALUE = 'WF-NS-SUB-OUT'   
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'A2'    
*S**          ASSIGN #VALUE = 'WF-NS-UNS-OUT'   
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'A3'    
*S**          ASSIGN #VALUE = 'WF-NS-CMB-OUT'   
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'A4'    
*S**          ASSIGN #VALUE = 'WF-NS-CON-OUT'   
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'A5'    
*S**          ASSIGN #VALUE = 'WF-NS-TCH-OUT'   
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'A6'    
*S**          ASSIGN #VALUE = 'WF-NS-SUB-PEND'  
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'A7'    
*S**          ASSIGN #VALUE = 'WF-NS-UNS-PEND'  
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'A8'    
*S**          ASSIGN #VALUE = 'WF-NS-CMB-PEND'  
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'A9'    
*S**          ASSIGN #VALUE = 'WF-NS-SUB-TOTAL' 
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'B1'    
*S**          ASSIGN #VALUE = 'WF-NS-UNS-TOTAL' 
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'B2'    
*S**          ASSIGN #VALUE = 'WF-NS-CMB-TOTAL' 
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'B3'    
*S**          ASSIGN #VALUE = 'WF-NS-CON-TOTAL' 
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'B4'    
*S**          ASSIGN #VALUE = 'WF-NS-TCH-TOTAL' 
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'B5'    
*S**          ASSIGN #VALUE = 'WF-NS-PERK-TOTAL'
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'B6'    
*S**          ASSIGN #VALUE = 'WF-NS-PERK-CUR'  
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'B7'    
*S**          ASSIGN #VALUE = 'WF-NS-TCH-TOTAL-UG'          
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'B8'    
*S**          ASSIGN #VALUE = 'WF-NS-TCH-TOTAL-GR'          
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'B9'    
*S**          ASSIGN #VALUE = 'WF-NS-P1-SCH-AWD'
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'C1'    
*S**          ASSIGN #VALUE = 'WF-NS-P1-PAID'   
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'C2'    
*S**          ASSIGN #VALUE = 'WF-NS-P1-AWARD'  
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'C3'    
*S**          ASSIGN #VALUE = 'WF-NS-P2-SCH-AWD'
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'C4'    
*S**          ASSIGN #VALUE = 'WF-NS-P2-PAID'   
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'C5'    
*S**          ASSIGN #VALUE = 'WF-NS-P2-AWARD'  
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'C6'    
*S**          ASSIGN #VALUE = 'WF-NS-P3-SCH-AWD'
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'C7'    
*S**          ASSIGN #VALUE = 'WF-NS-P3-PAID'   
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'C8'    
*S**          ASSIGN #VALUE = 'WF-NS-P3-AWARD'  
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'C9'    
*S**          ASSIGN #VALUE = 'WF-NS-T1-SCH-AWD'
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'D1'    
*S**          ASSIGN #VALUE = 'WF-NS-T1-PAID'   
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'D2'    
*S**          ASSIGN #VALUE = 'WF-NS-T1-AWARD'  
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'D3'    
*S**          ASSIGN #VALUE = 'WF-NS-T1-DCHG-AMT'           
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'D4'    
*S**          ASSIGN #VALUE = 'WF-NS-T1-ADJ-DSB'
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'D5'    
*S**          ASSIGN #VALUE = 'WF-NS-T2-SCH-AWD'
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'D6'    
*S**          ASSIGN #VALUE = 'WF-NS-T2-PAID'   
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'D7'    
*S**          ASSIGN #VALUE = 'WF-NS-T2-AWARD'  
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'D8'    
*S**          ASSIGN #VALUE = 'WF-NS-T2-DCHG-AMT'           
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'D9'    
*S**          ASSIGN #VALUE = 'WF-NS-T2-ADJ-DSB'
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'E1'    
*S**          ASSIGN #VALUE = 'WF-NS-T3-SCH-AWD'
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'E2'    
*S**          ASSIGN #VALUE = 'WF-NS-T3-PAID'   
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'E3'    
*S**          ASSIGN #VALUE = 'WF-NS-T3-AWARD'  
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'E4'    
*S**          ASSIGN #VALUE = 'WF-NS-T3-DCHG-AMT'           
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'E5'    
*S**          ASSIGN #VALUE = 'WF-NS-T3-ADJ-DSB'
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'E6'    
*S**          ASSIGN #VALUE = 'WF-NS-L01-AMT'   
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'E7'    
*S**          ASSIGN #VALUE = 'WF-NS-L01-OUT'   
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'E8'    
*S**          ASSIGN #VALUE = 'WF-NS-L01-DSB'   
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'E9'    
*S**          ASSIGN #VALUE = 'WF-NS-L02-AMT'   
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'F1'    
*S**          ASSIGN #VALUE = 'WF-NS-L02-OUT'   
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'F2'    
*S**          ASSIGN #VALUE = 'WF-NS-L02-DSB'   
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'F3'    
*S**          ASSIGN #VALUE = 'WF-NS-L03-AMT'   
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'F4'    
*S**          ASSIGN #VALUE = 'WF-NS-L03-OUT'   
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'F5'    
*S**          ASSIGN #VALUE = 'WF-NS-L03-DSB'   
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'F6'    
*S**          ASSIGN #VALUE = 'WF-NS-L04-AMT'   
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'F7'    
*S**          ASSIGN #VALUE = 'WF-NS-L04-OUT'   
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'F8'    
*S**          ASSIGN #VALUE = 'WF-NS-L04-DSB'   
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'F9'    
*S**          ASSIGN #VALUE = 'WF-NS-L05-AMT'   
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'G1'    
*S**          ASSIGN #VALUE = 'WF-NS-L05-OUT'   
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'G2'    
*S**          ASSIGN #VALUE = 'WF-NS-L05-DSB'   
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'G3'    
*S**          ASSIGN #VALUE = 'WF-NS-L06-AMT'   
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'G4'    
*S**          ASSIGN #VALUE = 'WF-NS-L06-OUT'   
*S**        WHEN #STR-ARRAY(#STR-SUB) = 'G5'    
*S**          ASSIGN #VALUE = 'WF-NS-L06-DSB'   
*S**        WHEN NONE   
*S**          IGNORE    
*S**      END-DECIDE    
*S**      IF #LARGE-FIELD-FIRST = ' '           
*S**        MOVE 'Y' TO #LARGE-FIELD-FIRST      
*S**        MOVE ##SID TO #ERR-SID  
*S**        MOVE ##COMP-NAME TO #ERR-NAM        
*S**      END-IF        
*S**      COMPRESS #VALUE ':'       
*S**       INTO #ERR-FLD LEAVING NO SPACE       
*S**      MOVE '> 999999' TO #ERR-VAL           
*S**      PERFORM WRITE-ERROR-LINE  
*S**    END-IF          
*S**  END-FOR           
*S**END-SUBROUTINE /* REPORT-LARGE-FIELDS       
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE PERFORM-TRANSLATE-CASE    
*S*************************************************************************         
*S**  /*    
*S**  /* Case translation routine   
*S**  PERFORM TRANSLATE-CASE #TRANSLATE-FIELD #TRANSLATE-CASE           
*S**                         #REMOVE-SPEC-CH    
*S**END-SUBROUTINE /* PERFORM-TRANSLATE-CASE    
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE UPDATE-FEDERAL
*S*************************************************************************         
*S**  /*    
*S**  /* Add or update Federal information      
*S**  IF #ADD-FEDERAL   
*S**    ASSIGN WWAOBJ.#FUNCTION = 'STORE'       
*S**  ELSE  
*S**    ASSIGN WWAOBJ.#FUNCTION = 'UPDATE'      
*S**  END-IF
*S**  /*    
*S**  CALLNAT 'WFFE227N' WW-GDA #LOGICALS #DATA-ERROR       
*S**                  WF27FEBL WF27FEBL-ID      
*S**                  WFFED27D WFFED27D-ID      
*S**                  WFADDDSD WFADDDSD-ID      
*S**                  WWVALLDA      
*S**  /*    
*S**  /* WFFE272N cannot do all FEDERAL updates - USIZE     
*S**  /*    
*S**  PERFORM CALL-OBJECT-FEDERAL   
*S**END-SUBROUTINE /* UPDATE-FEDERAL
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE UPDATE-CPS    
*S*************************************************************************         
*S**  /*    
*S**  /* Due to size restrictions, CPS is updated in WFFE327N           
*S**  /*    
*S**  CALLNAT 'WFFE327N' WW-GDA WFADDDSD WFADDDSD-ID        
*S**  /*    
*S**  /* Reread new or updated CPS record to get info for event record  
*S**  ASSIGN WWAOBJ.#FUNCTION = 'GET'           
*S**  PERFORM CALL-OBJECT-CPS       
*S**END-SUBROUTINE /* UPDATE-CPS    
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE UPDATE-PARENTS
*S*************************************************************************         
*S**  /*    
*S**  /* Add or update Parent information       
*S**  /*  and update Student record to reflect parent ids   
*S**  IF WF27FEBL.WF-FE-P1-SSN NE ' '           
*S**    /*  
*S**    /* Determine parent 1 Parent ID from the SSN, name and DOB on ISIR          
*S**    /* If parent 1 Parent ID is second one in Student record, switch
*S**    /*  the ones in the student's record    
*S**    /* If parent 1 Parent ID doesn't match first one in Student record,         
*S**    /*  move it into first slot in Student record       
*S**    MOVE WF27FEBL.WF-FE-P1-NM-LAST  TO #PASS-NM-LAST    
*S**    MOVE WF27FEBL.WF-FE-P1-NM-FIRST TO #PASS-NM-FIRST   
*S**    RESET #PASS-NM-MI           
*S**    PERFORM DETERMINE-PID WF27FEBL.WF-FE-P1-SSN         
*S**                          #PASS-NM-LAST #PASS-NM-FIRST  
*S**                          #PASS-NM-MI       
*S**                          WF27FEBL.WF-FE-P1-DOB #PASS-PID           
*S**    IF #PASS-PID NE ' '         
*S**      IF #PASS-PID = WWSTDNTD.WW-ST-PARENT-ID2          
*S**        ASSIGN WWSTDNTD.WW-ST-PARENT-ID2 = WWSTDNTD.WW-ST-PARENT-ID1
*S**        ASSIGN WWSTDNTD.WW-ST-PARENT-ID1 = #PASS-PID    
*S**      END-IF        
*S**    END-IF          
*S**    IF #PASS-PID NE ' ' AND     
*S**       #PASS-PID NE WWSTDNTD.WW-ST-PARENT-ID1           
*S**      MOVE #PASS-PID TO WWSTDNTD.WW-ST-PARENT-ID1       
*S**    END-IF          
*S**  END-IF
*S**  IF WF27FEBL.WF-FE-P2-SSN NE ' '           
*S**    /*  
*S**    /* Determine parent 2 Parent ID from the SSN, name and DOB on ISIR          
*S**    /* If parent 2 Parent ID is second one in Student record, switch
*S**    /*  the ones in the student's record    
*S**    /* If parent 2 Parent ID doesn't match first one in Student record,         
*S**    /*  move it into first slot in Student record       
*S**    MOVE WF27FEBL.WF-FE-P2-NM-LAST  TO #PASS-NM-LAST    
*S**    MOVE WF27FEBL.WF-FE-P2-NM-FIRST TO #PASS-NM-FIRST   
*S**    RESET #PASS-NM-MI           
*S**    PERFORM DETERMINE-PID WF27FEBL.WF-FE-P2-SSN         
*S**                          #PASS-NM-LAST #PASS-NM-FIRST  
*S**                          #PASS-NM-MI       
*S**                          WF27FEBL.WF-FE-P1-DOB #PASS-PID           
*S**    IF #PASS-PID NE ' '         
*S**      IF #PASS-PID = WWSTDNTD.WW-ST-PARENT-ID1          
*S**        ASSIGN WWSTDNTD.WW-ST-PARENT-ID1 = WWSTDNTD.WW-ST-PARENT-ID2
*S**        ASSIGN WWSTDNTD.WW-ST-PARENT-ID2 = #PASS-PID    
*S**      END-IF        
*S**    END-IF          
*S**    IF #PASS-PID NE ' ' AND     
*S**       #PASS-PID NE WWSTDNTD.WW-ST-PARENT-ID2           
*S**      MOVE #PASS-PID TO WWSTDNTD.WW-ST-PARENT-ID2       
*S**    END-IF          
*S**  END-IF
*S**  /*    
*S**  /* Get current information for both parents from External file    
*S**  ASSIGN ##PASS-ACTION = 'R'    
*S**  RESET WWPARNTD    
*S**  ASSIGN WWPARNTD.#PARENT1-ID = WWSTDNTD.WW-ST-PARENT-ID1           
*S**  ASSIGN WWPARNTD.#PARENT2-ID = WWSTDNTD.WW-ST-PARENT-ID2           
*S**  PERFORM PARENTS-SERVICE WWPARNTD          
*S**  /*    
*S**  /* Decide whether parent information needs to be updated          
*S**  RESET #HOLD-LAST #HOLD-FIRST  
*S**  IF WWPARNTD.#PARENT1-ID NE ' '
*S**    IF WF27FEBL.WF-FE-P1-NM-LAST NE ' '     
*S**      IF WWPARNTD.#PARENT1-NAME NE ' '      
*S**        SEPARATE WWPARNTD.#PARENT1-NAME INTO #HOLD-LAST #HOLD-FIRST 
*S**          IGNORE WITH DELIMITERS ','        
*S**        MOVE LEFT JUSTIFIED #HOLD-FIRST TO #HOLD-FIRST  
*S**        ASSIGN #TRANSLATE-CASE = 'U'        
*S**        MOVE #HOLD-LAST TO #TRANSLATE-FIELD 
*S**        PERFORM PERFORM-TRANSLATE-CASE      
*S**      END-IF        
*S**      IF WF27FEBL.WF-FE-P1-NM-LAST  NE #TRANSLATE-FIELD OR          
*S**        (WF27FEBL.WF-FE-P1-NM-FIRST NE SUBSTRING(#HOLD-FIRST,1,1) AND           
*S**         WF27FEBL.WF-FE-P1-NM-FIRST NE ' ') 
*S**        IF WF27FEBL.WF-FE-P1-NM-LAST NE #TRANSLATE-FIELD
*S**          IF ##CNVT-CASE        
*S**            ASSIGN #TRANSLATE-CASE = 'M'    
*S**            MOVE WF27FEBL.WF-FE-P1-NM-LAST TO #TRANSLATE-FIELD      
*S**            PERFORM PERFORM-TRANSLATE-CASE  
*S**            MOVE #TRANSLATE-FIELD TO #HOLD-LAST         
*S**          ELSE      
*S**            MOVE WF27FEBL.WF-FE-P1-NM-LAST TO #HOLD-LAST
*S**          END-IF    
*S**        END-IF      
*S**        IF WF27FEBL.WF-FE-P1-NM-FIRST NE SUBSTRING(#HOLD-FIRST,1,1) AND         
*S**           WF27FEBL.WF-FE-P1-NM-FIRST NE ' '
*S**          MOVE WF27FEBL.WF-FE-P1-NM-FIRST TO #HOLD-FIRST
*S**        END-IF      
*S**        COMPRESS #HOLD-LAST ',' INTO #HOLD-LAST LEAVING NO          
*S**        COMPRESS #HOLD-LAST #HOLD-FIRST INTO WWPARNTD.#PARENT1-NAME 
*S**            WITH DELIMITER ' '  
*S**      END-IF        
*S**    END-IF          
*S**    IF WF27FEBL.WF-FE-P1-SSN NE ' '         
*S**      MOVE WF27FEBL.WF-FE-P1-SSN TO WWPARNTD.#PARENT1-SSN           
*S**    END-IF          
*S**    IF WF27FEBL.WF-FE-P1-DOB = MASK(YYYYMMDD)           
*S**      MOVE EDITED WF27FEBL.WF-FE-P1-DOB     
*S**               TO WWPARNTD.#PARENT1-DOB (EM=YYYYMMDD)   
*S**    END-IF          
*S**  END-IF
*S**  /*    
*S**  RESET #HOLD-LAST #HOLD-FIRST  
*S**  IF WWPARNTD.#PARENT2-ID NE ' '
*S**    IF WF27FEBL.WF-FE-P2-NM-LAST NE ' '     
*S**      IF WWPARNTD.#PARENT2-NAME NE ' '      
*S**        SEPARATE WWPARNTD.#PARENT2-NAME INTO #HOLD-LAST #HOLD-FIRST 
*S**          IGNORE WITH DELIMITERS ','        
*S**        MOVE LEFT JUSTIFIED #HOLD-FIRST TO #HOLD-FIRST  
*S**        ASSIGN #TRANSLATE-CASE = 'U'        
*S**        MOVE #HOLD-LAST TO #TRANSLATE-FIELD 
*S**        PERFORM PERFORM-TRANSLATE-CASE      
*S**      END-IF        
*S**      IF WF27FEBL.WF-FE-P2-NM-LAST NE #TRANSLATE-FIELD OR           
*S**        (WF27FEBL.WF-FE-P2-NM-FIRST NE SUBSTRING(#HOLD-FIRST,1,1) AND           
*S**         WF27FEBL.WF-FE-P2-NM-FIRST NE ' ') 
*S**        IF WF27FEBL.WF-FE-P2-NM-LAST NE #TRANSLATE-FIELD
*S**          IF ##CNVT-CASE        
*S**            ASSIGN #TRANSLATE-CASE = 'M'    
*S**            MOVE WF27FEBL.WF-FE-P2-NM-LAST TO #TRANSLATE-FIELD      
*S**            PERFORM PERFORM-TRANSLATE-CASE  
*S**            MOVE #TRANSLATE-FIELD TO #HOLD-LAST         
*S**          ELSE      
*S**            MOVE WF27FEBL.WF-FE-P2-NM-LAST TO #HOLD-LAST
*S**          END-IF    
*S**        END-IF      
*S**        IF WF27FEBL.WF-FE-P2-NM-FIRST NE SUBSTRING(#HOLD-FIRST,1,1) AND         
*S**           WF27FEBL.WF-FE-P2-NM-FIRST NE ' '
*S**          MOVE WF27FEBL.WF-FE-P2-NM-FIRST TO #HOLD-FIRST
*S**        END-IF      
*S**        COMPRESS #HOLD-LAST ',' INTO #HOLD-LAST LEAVING NO          
*S**        COMPRESS #HOLD-LAST #HOLD-FIRST INTO WWPARNTD.#PARENT2-NAME 
*S**            WITH DELIMITER ' '  
*S**      END-IF        
*S**    END-IF          
*S**    IF WF27FEBL.WF-FE-P2-SSN NE ' '         
*S**      MOVE WF27FEBL.WF-FE-P2-SSN TO WWPARNTD.#PARENT2-SSN           
*S**    END-IF          
*S**    IF WF27FEBL.WF-FE-P2-DOB = MASK(YYYYMMDD)           
*S**      MOVE EDITED WF27FEBL.WF-FE-P2-DOB     
*S**               TO WWPARNTD.#PARENT2-DOB (EM=YYYYMMDD)   
*S**    END-IF          
*S**  END-IF
*S**  ASSIGN ##PASS-ACTION = 'U'    
*S**  PERFORM PARENTS-SERVICE WWPARNTD          
*S**END-SUBROUTINE /* UPDATE-PARENTS
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE UPDATE-STUDENT
*S*************************************************************************         
*S**  /*    
*S**  /* Add or update Student information      
*S**  ASSIGN WWAOBJ.#FUNCTION = 'GET'           
*S**  ASSIGN WWSTDNTD.WW-STUDENT-ID = ##STUDENT-ID          
*S**  ASSIGN WWSTDNTD.WF-FAO = ##FAO-ID         
*S**  MOVE 'R' TO WWSTDNTD.WW-ST-ATTRIBUTES     
*S**  MOVE 'R' TO WWSTDNTD.WW-ST-ADDRESS1       
*S**  MOVE 'R' TO WWSTDNTD.WW-ST-ADDRESS2       
*S**  MOVE 'P' TO WWSTDNTD.WW-ST-AD1-TYPE       
*S**  MOVE 'L' TO WWSTDNTD.WW-ST-AD2-TYPE       
*S**  PERFORM CALL-OBJECT-STUDENT   
*S**  IF WWAOBJ.#EXISTS 
*S**    ASSIGN WWAOBJ.#FUNCTION = 'UPDATE'      
*S**  ELSE  
*S**    ASSIGN WWAOBJ.#FUNCTION = 'STORE'       
*S**  END-IF
*S**  /*    
*S**  /* If data stored in mixed case, set up translate variables       
*S**  IF ##CNVT-CASE    
*S**    ASSIGN #TRANSLATE-CASE = 'M'
*S**    RESET #REMOVE-SPEC-CH       
*S**  END-IF
*S**  /*    
*S**  /* Load data      
*S**  MOVE ##SID TO WWSTDNTD.WW-ST-SID          
*S**  IF WFADDDSD.WW-ST-SSN = MASK(999999999)   
*S**    ASSIGN WWSTDNTD.WW-ST-SSN = WFADDDSD.WW-ST-SSN      
*S**  ELSE  
*S**    IF WFADDDSD.WW-ST-SSN NE SPACE          
*S**      MOVE 'Stu-SSN: ' TO #ERR-FLD          
*S**      MOVE WFADDDSD.WW-ST-SSN TO #ERR-VAL   
*S**      PERFORM WRITE-ERROR-LINE  
*S**    END-IF          
*S**  END-IF
*S**  MOVE WFADDDSD.WW-NAME-LAST TO WWSTDNTD.WW-NAME-LAST   
*S**  MOVE WFADDDSD.WW-NAME-FIRST TO WWSTDNTD.WW-NAME-FIRST 
*S**  MOVE WFADDDSD.WW-ST-NM-LAST TO WWSTDNTD.WW-ST-NM-LAST 
*S**  MOVE WFADDDSD.WW-ST-NM-FIRST TO WWSTDNTD.WW-ST-NM-FIRST           
*S**  MOVE WFADDDSD.WW-ST-NM-MI TO WWSTDNTD.WW-ST-NM-MI     
*S**  IF WFADDDSD.WW-ST-DOB NE INIT-DATE        
*S**    MOVE WFADDDSD.WW-ST-DOB TO WWSTDNTD.WW-ST-DOB       
*S**  END-IF
*S**  IF WF27FEBL.WF-FE-EMAIL NE ' '
*S**    MOVE WF27FEBL.WF-FE-EMAIL TO WWSTDNTD.WW-ST-EMAIL   
*S**  END-IF
*S**  IF WF27FEBL.WF-FE-S-ALIEN NE ' '          
*S**    MOVE WF27FEBL.WF-FE-S-ALIEN TO WWSTDNTD.WW-ST-ALIEN 
*S**  END-IF
*S**  IF ##CNVT-CASE    
*S**    MOVE WF27FEBL.WF-FE-AD-STRT TO #TRANSLATE-FIELD     
*S**    PERFORM PERFORM-TRANSLATE-CASE          
*S**    MOVE #TRANSLATE-FIELD TO WF27FEBL.WF-FE-AD-STRT     
*S**    MOVE WF27FEBL.WF-FE-AD-CITY TO #TRANSLATE-FIELD     
*S**    PERFORM PERFORM-TRANSLATE-CASE          
*S**    MOVE #TRANSLATE-FIELD TO WF27FEBL.WF-FE-AD-CITY     
*S**  END-IF
*S**  IF WWSTDNTD.WW-ST-AD1-TYPE = 'P' OR       /* Permanent address    
*S**      (WWSTDNTD.WW-ST-AD1-TYPE = ' ' AND    
*S**       WWSTDNTD.WW-ST-AD2-TYPE = ' ')       
*S**    MOVE 'P' TO WWSTDNTD.WW-ST-AD1-TYPE     
*S**    MOVE WF27FEBL.WF-FE-AD-STRT TO WWSTDNTD.WW-ST-AD1-STRT1         
*S**    MOVE WF27FEBL.WF-FE-AD-CITY TO WWSTDNTD.WW-ST-AD1-CITY          
*S**    MOVE WF27FEBL.WF-FE-AD-STATE TO WWSTDNTD.WW-ST-AD1-STATE        
*S**    MOVE WF27FEBL.WF-FE-AD-ZIP TO WWSTDNTD.WW-ST-AD1-ZIP
*S**    IF WF27FEBL.WF-FE-AD-PHONE IS (N10)     
*S**      ASSIGN WWSTDNTD.WW-ST-AD1-PHONE = VAL(WF27FEBL.WF-FE-AD-PHONE)
*S**    ELSE
*S**      IF WF27FEBL.WF-FE-AD-PHONE NE SPACE   
*S**        MOVE 'Stu-Phone number: ' TO #ERR-FLD           
*S**        MOVE WF27FEBL.WF-FE-AD-PHONE TO #ERR-VAL        
*S**        PERFORM WRITE-ERROR-LINE
*S**      END-IF        
*S**    END-IF          
*S**  ELSE  
*S**    IF WWSTDNTD.WW-ST-AD2-TYPE = 'P' OR = ' ' /* Permanent address  
*S**      MOVE 'P' TO WWSTDNTD.WW-ST-AD2-TYPE   
*S**      MOVE WF27FEBL.WF-FE-AD-STRT TO WWSTDNTD.WW-ST-AD2-STRT1       
*S**      MOVE WF27FEBL.WF-FE-AD-CITY TO WWSTDNTD.WW-ST-AD2-CITY        
*S**      MOVE WF27FEBL.WF-FE-AD-STATE TO WWSTDNTD.WW-ST-AD2-STATE      
*S**      MOVE WF27FEBL.WF-FE-AD-ZIP TO WWSTDNTD.WW-ST-AD2-ZIP          
*S**      IF WF27FEBL.WF-FE-AD-PHONE IS (N10)   
*S**        ASSIGN WWSTDNTD.WW-ST-AD2-PHONE = VAL(WF27FEBL.WF-FE-AD-PHONE)          
*S**      ELSE          
*S**        IF WF27FEBL.WF-FE-AD-PHONE NE SPACE 
*S**          MOVE 'Stu-Phone number: ' TO #ERR-FLD         
*S**          MOVE WF27FEBL.WF-FE-AD-PHONE TO #ERR-VAL      
*S**          PERFORM WRITE-ERROR-LINE          
*S**        END-IF      
*S**      END-IF        
*S**    END-IF          
*S**  END-IF
*S**  /*    
*S**  MOVE 'W' TO WWSTDNTD.WW-ST-ATTRIBUTES     
*S**  IF WWSTDNTD.WW-ST-AD1-TYPE = 'P'          
*S**    MOVE 'W' TO WWSTDNTD.WW-ST-ADDRESS1     
*S**    MOVE 'N' TO WWSTDNTD.WW-ST-ADDRESS2     
*S**  ELSE  
*S**    IF WWSTDNTD.WW-ST-AD2-TYPE = 'P'        
*S**      MOVE 'N' TO WWSTDNTD.WW-ST-ADDRESS1   
*S**      MOVE 'W' TO WWSTDNTD.WW-ST-ADDRESS2   
*S**    END-IF          
*S**  END-IF
*S**  /*    
*S**  PERFORM UPDATE-PARENTS        
*S**  /*    
*S**  PERFORM CALL-OBJECT-STUDENT   
*S**END-SUBROUTINE /* UPDATE-STUDENT
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE WRITE-ERROR-LINE          
*S*************************************************************************         
*S**  /*    
*S**  /* If processing batch, write out error line          
*S**  IF *DEVICE = 'BATCH'          
*S**    IF #ERR-SID NE ' '          
*S**      WRITE(2) ' '  
*S**    END-IF          
*S**    WRITE(2) #DATA-ERROR        
*S**    RESET #ERR-SID #ERR-NAM     
*S**  END-IF
*S**END-SUBROUTINE /* WRITE-ERROR-LINE          
*S**END     
*C**                                FATEMP  WFISB27E                        S S   NN0000        
*D01NAT8304S FATEMP  WFISB27E                        ZWDNH   ZWDNH           S      
*D02            2026042709161302026042709161300000002691    
*D03LINUX   
*D04                 ISO_8859-1:1987
*S*************************************************************************         
*S***       
*S***                              WolffPack    
*S***       
*S*** Subroutine: WFISB27E          
*S*** System    : FINANCIER         
*S*** Title     : 2026-27 ISIR Load subroutine  
*S*** Function  : This external subroutine loads the student's          
*S***             ISIR records from an external federal record.         
*S***             It is performed during the ADD Load process.          
*S***       
*S***       Note: Module copied from WFISR27E, modified to allow for    
*S***             additional fields and increased field sizes in        
*S***             mid 2026-2027 processing year.
*S***       
*S***      Copyright 1995 - 2026 WolffPack, Inc.  All rights reserved.  
*S***       
*S*************************************************************************         
*S**DEFINE DATA         
*S**  GLOBAL USING WWGDA
*S**  PARAMETER         
*S**   01 PASSED-ISIR   
*S**     02 WF-ISIR1 (A250)         
*S**     02 WF-ISIR2 (A250)         
*S**     02 WF-ISIR3 (A250)         
*S**     02 WF-ISIR4 (A250)         
*S**     02 WF-ISIR5 (A250)         
*S**     02 WF-ISIR6 (A250)         
*S**     02 WF-ISIR7 (A250)         
*S**     02 WF-ISIR8 (A250)         
*S**     02 WF-ISIR9 (A250)         
*S**     02 WF-ISIR10(A250)         
*S**     02 WF-ISIR11(A250)         
*S**     02 WF-ISIR12(A250)         
*S**     02 WF-ISIR13(A250)         
*S**     02 WF-ISIR14(A250)         
*S**     02 WF-ISIR15(A250)         
*S**     02 WF-ISIR16(A250)         
*S**     02 WF-ISIR17(A250)         
*S**     02 WF-ISIR18(A198)         
*S**   01 PASSED-ISIRB  
*S**     02 WF-ISIR19(A250)         
*S**     02 WF-ISIR20(A250)         
*S**     02 WF-ISIR21(A250)         
*S**     02 WF-ISIR22(A195)         
*S***       
*S**  LOCAL USING WFISR27L          
*S**  LOCAL USING WFISR27D /* Passed to object subprogram   
*S**  LOCAL USING WFISR27R /* Passed to object subprogram   
*S**  LOCAL USING WWAOBJ   /* Passed to object subprogram   
*S**  LOCAL 
*S**    01 #HOLD-FIELD(A75)         
*S**END-DEFINE          
*S***       
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE LOAD-ISIR-2627B           
*S*************************************************************************         
*S**  /*    
*S**  /* Set up record keys         
*S**  ASSIGN WFISR27D.WF-FAO = ##FAO-ID         
*S**  ASSIGN WFISR27D.WW-STUDENT-ID = ##STUDENT-ID          
*S**  /*    
*S**  /* Get ISIR record
*S**  MOVE 'GET' TO WWAOBJ.#FUNCTION
*S**  CALLNAT 'WFISR27O' WW-GDA     
*S**           WFISR27D 
*S**           WFISR27D-ID          
*S**           WFISR27R 
*S**           WWAOBJ   
*S**  IF WWAOBJ.#EXISTS 
*S**    MOVE 'UPDATE' TO WWAOBJ.#FUNCTION       
*S**  ELSE  
*S**    MOVE 'STORE' TO WWAOBJ.#FUNCTION        
*S**  END-IF
*S**  /*    
*S**  /* Load ISIR record from passed federal record        
*S**  MOVE PASSED-ISIR.WF-ISIR1 to #HOLD-FIELD  
*S**  MOVE PASSED-ISIRB.WF-ISIR20 to #HOLD-FIELD
*S**  MOVE BY NAME PASSED-ISIR TO WFISR27L.WF-ISIR          
*S**  MOVE BY NAME PASSED-ISIRB TO WFISR27L.WF-ISIR         
*S**  MOVE BY NAME WFISR27L.WF-ISIR TO WFISR27D.WF-ISIR     
*S**  /*    
*S**  /* Perform I/O to create/update record    
*S**  CALLNAT 'WFISR27O' WW-GDA     
*S**           WFISR27D 
*S**           WFISR27D-ID          
*S**           WFISR27R 
*S**           WWAOBJ   
*S**END-SUBROUTINE /* LOAD-ISIR-2627B           
*S**END     
*C**                                FATEMP  WFISR27D                        P S   NN0000        
*D01NAT8304P FATEMP  WFISR27D                        ZWDNH   ZWDNH           S      
*D02            2025091814080202025091814080200000046794    
*D03LINUX   
*D04                 ISO_8859-1:1987
*S****C           0   ***********************************************************************   
*S****C           0   * 
*S****C           0   *         WolffPack, Inc. 
*S****C           0   *                                            Copyright 1995 - 2026        
*S****C           0   * PDA:    WFISR27D                              WolffPack, Inc.           
*S****C           0   * System: FINANCIER                           All rights reserved.        
*S****C           0   * 
*S****C           0   ***********************************************************************   
*S****DS          0         1WFISR27D                        /* Object Name         
*S****DK          0   A   9 2WW-STUDENT-ID                   /*         
*S****DK          0   A   2 2WF-FAO                          /*         
*S****DS          0         2WW-SYSTEM                       /*         
*S****DK          0   N   7 3WW-HOLD                         /*         
*S****DK          0   D     3WW-CDATE                        /*         
*S****DK          0   D     3WW-MDATE                        /*         
*S****C           0   * 
*S****C           0   * Transaction Identification:         
*S****C           0   *   FAFSA Identification UUID,        
*S****C           0   *    Transaction UUID, Application and
*S****C           0   *      Transaction Data Sources, Model,           
*S****C           0   *       Transaction Dates, etc.       
*S****C           0   * 
*S****DS          0         2WF-ISIR                         /*         
*S****DK          0   A   1 3WF-IS-C-BATCH-YR                /*         
*S****DK          0   A  36 3WF-IS-FAFSA-UUID                /*         
*S****DK          0   A  36 3WF-IS-TRANS-UUID                /*         
*S****DK          0   A  36 3WF-IS-PERSON-UUID               /*         
*S****DK          0   A   2 3WF-IS-C-TRANS-NO                /*         
*S****DK          0   A   1 3WF-IS-C-DEP-MODEL               /*         
*S****DK          0   A   1 3WF-IS-C-APP-SRCE                /*         
*S****DK          0   A   8 3WF-IS-C-APP-RCPT-DATE           /*         
*S****DK          0   A   1 3WF-IS-C-TRAN-SRCE               /*         
*S****DK          0   A   1 3WF-IS-C-TRAN-TYPE               /*         
*S****DK          0   A   1 3WF-IS-C-TRAN-LANG               /*         
*S****DK          0   A   8 3WF-IS-C-TRAN-RCPT-DATE          /*         
*S****DK          0   A   8 3WF-IS-C-TRAN-PROC-DATE          /*         
*S****DK          0   A  30 3WF-IS-C-TRAN-STATUS             /*         
*S****DK          0   A   3 3WF-IS-C-RENEWAL-DATA-USED       /*         
*S****DK          0   A   1 3WF-IS-C-FPS-CORR-RSN            /*         
*S****DK          0   A   1 3WF-IS-C-SAI-CHG-FLAG            /*         
*S****DK          0   A   6 3WF-IS-C-SAI                     /*         
*S****DK          0   A   6 3WF-IS-C-SAI-PROV                /*         
*S****DK          0   A   1 3WF-IS-C-SAI-FORMULA             /*         
*S****DK          0   A   2 3WF-IS-C-SAI-COMP-TYPE           /*         
*S****DK          0   A   1 3WF-IS-C-MAX-PELL-IND            /*         
*S****DK          0   A   1 3WF-IS-C-MIN-PELL-IND            /*         
*S****DK          0   A   1 3WF-IS-ISIR-VERSION-FLAG         /*         
*S****DK          0   A  49 3WF-IS-FILLER1                   /*         
*S****C           0   * 
*S****C           0   * Student Demographic, Identity, and  
*S****C           0   *   Contact Information   
*S****C           0   * 
*S****DK          0   A  35 3WF-IS-S-NM-FIRST                /*         
*S****DK          0   A  15 3WF-IS-S-NM-MIDDLE               /*         
*S****DK          0   A  35 3WF-IS-S-NM-LAST                 /*         
*S****DK          0   A  10 3WF-IS-S-NM-SUFFIX               /*         
*S****DK          0   A   8 3WF-IS-S-DOB                     /*         
*S****DK          0   A   9 3WF-IS-S-SSN                     /*         
*S****DK          0   A   9 3WF-IS-S-ITIN                    /*         
*S****DK          0   A  10 3WF-IS-S-AD-PHONE                /*         
*S****DK          0   A  50 3WF-IS-S-EMAIL                   /*         
*S****DK          0   A  40 3WF-IS-S-AD-STRT                 /*         
*S****DK          0   A  30 3WF-IS-S-AD-CITY                 /*         
*S****DK          0   A   2 3WF-IS-S-AD-STATE                /*         
*S****DK          0   A  10 3WF-IS-S-AD-ZIP                  /*         
*S****DK          0   A   2 3WF-IS-S-AD-COUNTRY              /*         
*S****DK          0   A  50 3WF-IS-FILLER2                   /*         
*S****C           0   * 
*S****C           0   * Student Non-Financial Information   
*S****C           0   *   (Dependency, Marital Status, etc.)
*S****C           0   * 
*S****DK          0   A   1 3WF-IS-S-MAR                     /*         
*S****DK          0   A   1 3WF-IS-S-YR-COL                  /*         
*S****DK          0   A   1 3WF-IS-S-BACH-DEG                /*         
*S****DK          0   A   1 3WF-IS-S-TCH-CERT                /*         
*S****DK          0   A   1 3WF-IS-S-TEST-ACTV               /*         
*S****DK          0   A   1 3WF-IS-S-TEST-VET                /*         
*S****DK          0   A   1 3WF-IS-S-TEST-DEP                /*         
*S****DK          0   A   1 3WF-IS-S-TEST-PAR-DECD           /*         
*S****DK          0   A   1 3WF-IS-S-TEST-WARD               /*         
*S****DK          0   A   1 3WF-IS-S-TEST-FOST               /*         
*S****DK          0   A   1 3WF-IS-S-TEST-EMAN               /*         
*S****DK          0   A   1 3WF-IS-S-TEST-GUAR               /*         
*S****DK          0   A   1 3WF-IS-S-TEST-PERS-NO            /*         
*S****DK          0   A   1 3WF-IS-S-TEST-UYSS               /*         
*S****DK          0   A   1 3WF-IS-S-TEST-UGEN               /*         
*S****DK          0   A   1 3WF-IS-S-TEST-UHS                /*         
*S****DK          0   A   1 3WF-IS-S-TEST-UTRIO              /*         
*S****DK          0   A   1 3WF-IS-S-TEST-UFAA               /*         
*S****DK          0   A   1 3WF-IS-S-TEST-UOTHER-NO          /*         
*S****DK          0   A   1 3WF-IS-S-TEST-UN-CIRC            /*         
*S****DK          0   A   1 3WF-IS-S-TEST-UNSUB              /*         
*S****DK          0   A   2 3WF-IS-S-FAM-SIZE                /*         
*S****DK          0   A   2 3WF-IS-S-FAM-COL                 /*         
*S****C           0   * 
*S****C           0   * Student Demographic Information     
*S****C           0   * 
*S****DK          0   A   1 3WF-IS-S-CIT                     /*         
*S****DK          0   A   9 3WF-IS-S-ALIEN                   /*         
*S****DK          0   A   2 3WF-IS-S-RES                     /*         
*S****DK          0   A   6 3WF-IS-S-RES-DATE                /*         
*S****DK          0   A   1 3WF-IS-S-PARS-COLG               /*         
*S****DK          0   A   1 3WF-IS-S-PARS-KDUTY              /*         
*S****DK          0   A   1 3WF-IS-S-HS-GED                  /*         
*S****DK          0   A  60 3WF-IS-S-HS-NAME                 /*         
*S****DK          0   A  28 3WF-IS-S-HS-CITY                 /*         
*S****DK          0   A   2 3WF-IS-S-HS-STATE                /*         
*S****DK          0   A   1 3WF-IS-S-HSE-NAME                /*         
*S****DK          0   A   2 3WF-IS-S-HSE-STATE               /*         
*S****C           0   * 
*S****C           0   * Student Manually Entered Financial  
*S****C           0   * 
*S****DK          0   A   1 3WF-IS-S-MT-EITC                 /*         
*S****DK          0   A   1 3WF-IS-S-MT-HOME                 /*         
*S****DK          0   A   1 3WF-IS-S-MT-LUNCH                /*         
*S****DK          0   A   1 3WF-IS-S-MT-MEDC                 /*         
*S****DK          0   A   1 3WF-IS-S-MT-36B                  /*         
*S****DK          0   A   1 3WF-IS-S-MT-SNAP                 /*         
*S****DK          0   A   1 3WF-IS-S-MT-SSI                  /*         
*S****DK          0   A   1 3WF-IS-S-MT-TANF                 /*         
*S****DK          0   A   1 3WF-IS-S-MT-WIC                  /*         
*S****DK          0   A   1 3WF-IS-S-MT-NONE                 /*         
*S****DK          0   A   1 3WF-IS-S-1040R                   /*         
*S****DK          0   A   1 3WF-IS-S-NON-US                  /*         
*S****DK          0   A   1 3WF-IS-S-JOINT                   /*         
*S****DK          0   A   1 3WF-IS-S-FILE-STAT               /*         
*S****DK          0   A  11 3WF-IS-S-INC                     /*         
*S****DK          0   A  11 3WF-IS-S-U-INT                   /*         
*S****DK          0   A  11 3WF-IS-S-U-DST-IRA               /*         
*S****DK          0   A  11 3WF-IS-S-U-ROLL-IRA              /*         
*S****DK          0   A  11 3WF-IS-S-U-DST-PEN               /*         
*S****DK          0   A  11 3WF-IS-S-U-ROLL-PEN              /*         
*S****DK          0   A  10 3WF-IS-S-AGI                     /*         
*S****DK          0   A   9 3WF-IS-S-FED-TAX                 /*         
*S****DK          0   A   1 3WF-IS-S-TAX-CREDIT              /*         
*S****DK          0   A  11 3WF-IS-S-DED-PAY                 /*         
*S****DK          0   A   9 3WF-IS-S-EDCR                    /*         
*S****DK          0   A   1 3WF-IS-S-ABD-EFH                 /*         
*S****DK          0   A  12 3WF-IS-S-SCHEDC-AMT              /*         
*S****DK          0   A   7 3WF-IS-S-GRNT                    /*         
*S****DK          0   A  10 3WF-IS-S-FGN-INC-EXC             /*         
*S****DK          0   A   7 3WF-IS-S-U-CSUP                  /*         
*S****DK          0   A   7 3WF-IS-S-CASH                    /*         
*S****DK          0   A   7 3WF-IS-S-INV                     /*         
*S****DK          0   A   7 3WF-IS-S-BUS-FRM                 /*         
*S****C           0   * 
*S****C           0   * Student School Choices, Consent,    
*S****C           0   *   and Signature         
*S****C           0   * 
*S****DK          0   A   6 3WF-IS-A-COL1                    /*         
*S****DK          0   A   6 3WF-IS-A-COL2                    /*         
*S****DK          0   A   6 3WF-IS-A-COL3                    /*         
*S****DK          0   A   6 3WF-IS-A-COL4                    /*         
*S****DK          0   A   6 3WF-IS-A-COL5                    /*         
*S****DK          0   A   6 3WF-IS-A-COL6                    /*         
*S****DK          0   A   6 3WF-IS-A-COL7                    /*         
*S****DK          0   A   6 3WF-IS-A-COL8                    /*         
*S****DK          0   A   6 3WF-IS-A-COL9                    /*         
*S****DK          0   A   6 3WF-IS-A-COL10                   /*         
*S****DK          0   A   6 3WF-IS-A-COL11                   /*         
*S****DK          0   A   6 3WF-IS-A-COL12                   /*         
*S****DK          0   A   6 3WF-IS-A-COL13                   /*         
*S****DK          0   A   6 3WF-IS-A-COL14                   /*         
*S****DK          0   A   6 3WF-IS-A-COL15                   /*         
*S****DK          0   A   6 3WF-IS-A-COL16                   /*         
*S****DK          0   A   6 3WF-IS-A-COL17                   /*         
*S****DK          0   A   6 3WF-IS-A-COL18                   /*         
*S****DK          0   A   6 3WF-IS-A-COL19                   /*         
*S****DK          0   A   6 3WF-IS-A-COL20                   /*         
*S****DK          0   A   1 3WF-IS-S-CONSENT                 /*         
*S****DK          0   A   1 3WF-IS-S-SGN                     /*         
*S****DK          0   A   8 3WF-IS-S-SGN-DATE                /*         
*S****DK          0   A  50 3WF-IS-FILLER3                   /*         
*S****C           0   * 
*S****C           0   * Student Spouse Demographic,         
*S****C           0   *   Identity, and Contact Information 
*S****C           0   * 
*S****DK          0   A  35 3WF-IS-SP-NM-FIRST               /*         
*S****DK          0   A  15 3WF-IS-SP-NM-MIDDLE              /*         
*S****DK          0   A  35 3WF-IS-SP-NM-LAST                /*         
*S****DK          0   A  10 3WF-IS-SP-SUFFIX                 /*         
*S****DK          0   A   8 3WF-IS-SP-DOB                    /*         
*S****DK          0   A   9 3WF-IS-SP-SSN                    /*         
*S****DK          0   A   9 3WF-IS-SP-ITIN                   /*         
*S****DK          0   A  10 3WF-IS-SP-PHONE                  /*         
*S****DK          0   A  50 3WF-IS-SP-EMAIL                  /*         
*S****DK          0   A  40 3WF-IS-SP-AD-STRT                /*         
*S****DK          0   A  30 3WF-IS-SP-AD-CITY                /*         
*S****DK          0   A   2 3WF-IS-SP-AD-STATE               /*         
*S****DK          0   A  10 3WF-IS-SP-AD-ZIP                 /*         
*S****DK          0   A   2 3WF-IS-SP-AD-COUNTRY             /*         
*S****C           0   * 
*S****C           0   * Student Spouse Manually Entered     
*S****C           0   *   Financial Information,
*S****C           0   *    Consent, and Sign    
*S****C           0   * 
*S****DK          0   A   1 3WF-IS-SP-1040R                  /*         
*S****DK          0   A   1 3WF-IS-SP-NON-US                 /*         
*S****DK          0   A   1 3WF-IS-SP-FILE-STAT              /*         
*S****DK          0   A  11 3WF-IS-SP-INC                    /*         
*S****DK          0   A  11 3WF-IS-SP-U-INT                  /*         
*S****DK          0   A  11 3WF-IS-SP-U-DST-IRA              /*         
*S****DK          0   A  11 3WF-IS-SP-U-ROLL-IRA             /*         
*S****DK          0   A  11 3WF-IS-SP-U-DST-PEN              /*         
*S****DK          0   A  11 3WF-IS-SP-U-ROLL-PEN             /*         
*S****DK          0   A  10 3WF-IS-SP-AGI                    /*         
*S****DK          0   A   9 3WF-IS-SP-FED-TAX                /*         
*S****DK          0   A  11 3WF-IS-SP-DED-PAY                /*         
*S****DK          0   A   9 3WF-IS-SP-EDCR                   /*         
*S****DK          0   A   1 3WF-IS-SP-ABD-EFH                /*         
*S****DK          0   A  12 3WF-IS-SP-SCHEDC-AMT             /*         
*S****DK          0   A  10 3WF-IS-SP-FGN-INC-EXC            /*         
*S****DK          0   A   1 3WF-IS-SP-CONSENT                /*         
*S****DK          0   A   1 3WF-IS-SP-SGN                    /*         
*S****DK          0   A   8 3WF-IS-SP-SGN-DATE               /*         
*S****DK          0   A  50 3WF-IS-FILLER4                   /*         
*S****C           0   * 
*S****C           0   * Parent1 Demographic, Identity,      
*S****C           0   *   and Contact Information           
*S****C           0   * 
*S****DK          0   A35   3WF-IS-P1-NM-FIRST  
*S****DK          0   A15   3WF-IS-P1-NM-MIDDLE 
*S****DK          0   A35   3WF-IS-P1-NM-LAST   
*S****DK          0   A  10 3WF-IS-P1-SUFFIX                 /*         
*S****DK          0   A   8 3WF-IS-P1-DOB                    /*         
*S****DK          0   A   9 3WF-IS-P1-SSN                    /*         
*S****DK          0   A   9 3WF-IS-P1-ITIN                   /*         
*S****DK          0   A  10 3WF-IS-P1-PHONE                  /*         
*S****DK          0   A  50 3WF-IS-P1-EMAIL                  /*         
*S****DK          0   A  40 3WF-IS-P1-AD-STRT                /*         
*S****DK          0   A  30 3WF-IS-P1-AD-CITY                /*         
*S****DK          0   A   2 3WF-IS-P1-AD-STATE               /*         
*S****DK          0   A  10 3WF-IS-P1-AD-ZIP                 /*         
*S****DK          0   A   2 3WF-IS-P1-AD-COUNTRY             /*         
*S****C           0   * 
*S****C           0   * Parent1 Non-Financial Information   
*S****C           0   * 
*S****DK          0   A   1 3WF-IS-P1-MAR                    /*         
*S****DK          0   A   2 3WF-IS-P1-RES                    /*         
*S****DK          0   A   6 3WF-IS-P1-RES-DATE               /*         
*S****DK          0   A   2 3WF-IS-P1-FAM-SIZE               /*         
*S****DK          0   A   2 3WF-IS-P1-FAM-COL                /*         
*S****C           0   * 
*S****C           0   * Parent1 Manually Entered Financial  
*S****C           0   *   Information, Consent, 
*S****C           0   *     and Signature       
*S****C           0   * 
*S****DK          0   A   1 3WF-IS-P1-MT-EITC                /*         
*S****DK          0   A   1 3WF-IS-P1-MT-HOME                /*         
*S****DK          0   A   1 3WF-IS-P1-MT-LUNCH               /*         
*S****DK          0   A   1 3WF-IS-P1-MT-MEDC                /*         
*S****DK          0   A   1 3WF-IS-P1-MT-36B                 /*         
*S****DK          0   A   1 3WF-IS-P1-MT-SNAP                /*         
*S****DK          0   A   1 3WF-IS-P1-MT-SSI                 /*         
*S****DK          0   A   1 3WF-IS-P1-MT-TANF                /*         
*S****DK          0   A   1 3WF-IS-P1-MT-WIC                 /*         
*S****DK          0   A   1 3WF-IS-P1-MT-NONE                /*         
*S****DK          0   A1    3WF-IS-P1-1040R     
*S****DK          0   A1    3WF-IS-P1-NON-US    
*S****DK          0   A   1 3WF-IS-P1-JOINT                  /*         
*S****DK          0   A   1 3WF-IS-P1-FILE-STAT              /*         
*S****DK          0   A  11 3WF-IS-P1-INC                    /*         
*S****DK          0   A  11 3WF-IS-P1-U-INT                  /*         
*S****DK          0   A  11 3WF-IS-P1-U-DST-IRA              /*         
*S****DK          0   A  11 3WF-IS-P1-U-ROLL-IRA             /*         
*S****DK          0   A  11 3WF-IS-P1-U-DST-PEN              /*         
*S****DK          0   A  11 3WF-IS-P1-U-ROLL-PEN             /*         
*S****DK          0   A  10 3WF-IS-P1-AGI                    /*         
*S****DK          0   A   9 3WF-IS-P1-FED-TAX                /*         
*S****DK          0   A   1 3WF-IS-P1-TAX-CREDIT             /*         
*S****DK          0   A  11 3WF-IS-P1-DED-PAY                /*         
*S****DK          0   A   9 3WF-IS-P1-EDCR                   /*         
*S****DK          0   A   1 3WF-IS-P1-ABD-EFH                /*         
*S****DK          0   A  12 3WF-IS-P1-SCHEDC-AMT             /*         
*S****DK          0   A   7 3WF-IS-P1-GRANT                  /*         
*S****DK          0   A  10 3WF-IS-P1-FGN-INC-EXC            /*         
*S****DK          0   A   7 3WF-IS-P1-U-CSUP                 /*         
*S****DK          0   A   7 3WF-IS-P1-CASH                   /*         
*S****DK          0   A   7 3WF-IS-P1-INV                    /*         
*S****DK          0   A   7 3WF-IS-P1-BUS-FRM                /*         
*S****DK          0   A   1 3WF-IS-P1-CONSENT                /*         
*S****DK          0   A   1 3WF-IS-P1-SGN                    /*         
*S****DK          0   A   8 3WF-IS-P1-SGN-DATE               /*         
*S****DK          0   A  50 3WF-IS-FILLER5                   /*         
*S****C           0   * 
*S****C           0   * Parent Spouse or Partner Demographic,           
*S****C           0   *   Identity, and Contact Information 
*S****C           0   * 
*S****DK          0   A  35 3WF-IS-P2-NM-FIRST               /*         
*S****DK          0   A  15 3WF-IS-P2-NM-MIDDLE              /*         
*S****DK          0   A  35 3WF-IS-P2-NM-LAST                /*         
*S****DK          0   A  10 3WF-IS-P2-SUFFIX                 /*         
*S****DK          0   A   8 3WF-IS-P2-DOB                    /*         
*S****DK          0   A   9 3WF-IS-P2-SSN                    /*         
*S****DK          0   A   9 3WF-IS-P2-ITIN                   /*         
*S****DK          0   A  10 3WF-IS-P2-PHONE                  /*         
*S****DK          0   A  50 3WF-IS-P2-EMAIL                  /*         
*S****DK          0   A  40 3WF-IS-P2-AD-STRT                /*         
*S****DK          0   A  30 3WF-IS-P2-AD-CITY                /*         
*S****DK          0   A   2 3WF-IS-P2-AD-STATE               /*         
*S****DK          0   A  10 3WF-IS-P2-AD-ZIP                 /*         
*S****DK          0   A   2 3WF-IS-P2-AD-COUNTRY             /*         
*S****C           0   * 
*S****C           0   * Parent Spouse or Partner Manually Entered       
*S****C           0   *    Financial Information, Consent   
*S****C           0   * 
*S****DK          0   A   1 3WF-IS-P2-1040R                  /*         
*S****DK          0   A   1 3WF-IS-P2-NON-US                 /*         
*S****DK          0   A   1 3WF-IS-P2-FILE-STAT              /*         
*S****DK          0   A  11 3WF-IS-P2-INC                    /*         
*S****DK          0   A  11 3WF-IS-P2-U-INT                  /*         
*S****DK          0   A  11 3WF-IS-P2-U-DST-IRA              /*         
*S****DK          0   A  11 3WF-IS-P2-U-ROLL-IRA             /*         
*S****DK          0   A  11 3WF-IS-P2-U-DST-PEN              /*         
*S****DK          0   A  11 3WF-IS-P2-U-ROLL-PEN             /*         
*S****DK          0   A  10 3WF-IS-P2-AGI                    /*         
*S****DK          0   A   9 3WF-IS-P2-FED-TAX                /*         
*S****DK          0   A  11 3WF-IS-P2-DED-PAY                /*         
*S****DK          0   A   9 3WF-IS-P2-EDCR                   /*         
*S****DK          0   A   1 3WF-IS-P2-ABD-EFH                /*         
*S****DK          0   A  12 3WF-IS-P2-SCHEDC-AMT             /*         
*S****DK          0   A  10 3WF-IS-P2-FGN-INC-EXC            /*         
*S****DK          0   A   1 3WF-IS-P2-CONSENT                /*         
*S****DK          0   A   1 3WF-IS-P2-SGN                    /*         
*S****DK          0   A   8 3WF-IS-P2-SGN-DATE               /*         
*S****DK          0   A  50 3WF-IS-FILLER6                   /*         
*S****C           0   * 
*S****C           0   * Preparer Information    
*S****C           0   *  Indicates that a preparer filled out the       
*S****C           0   *    application and provided their   
*S****C           0   * 
*S****DK          0   A  35 3WF-IS-A-PREP-FIRST              /*         
*S****DK          0   A  35 3WF-IS-A-PREP-LAST               /*         
*S****DK          0   A   9 3WF-IS-A-PREP-SSN                /*         
*S****DK          0   A   9 3WF-IS-A-PREP-EIN                /*         
*S****DK          0   A  30 3WF-IS-A-PREP-AFFL               /*         
*S****DK          0   A  40 3WF-IS-A-PREP-STRT               /*         
*S****DK          0   A  30 3WF-IS-A-PREP-CITY               /*         
*S****DK          0   A   2 3WF-IS-A-PREP-STATE              /*         
*S****DK          0   A  10 3WF-IS-A-PREP-ZIP                /*         
*S****DK          0   A   1 3WF-IS-A-PREP-SGN                /*         
*S****DK          0   A   8 3WF-IS-A-PREP-SGN-DATE           /*         
*S****DK          0   A  50 3WF-IS-FILLER7                   /*         
*S****C           0   * 
*S****C           0   *  FPS Processing Information         
*S****C           0   * 
*S****DK          0   A   1 3WF-IS-S-AFFIRM                  /*         
*S****DK          0   A   1 3WF-IS-SP-AFFIRM                 /*         
*S****DK          0   A   1 3WF-IS-P1-AFFIRM                 /*         
*S****DK          0   A   1 3WF-IS-P2-AFFIRM                 /*         
*S****DK          0   A   8 3WF-IS-S-CNST-DATE               /*         
*S****DK          0   A   8 3WF-IS-SP-CNST-DATE              /*         
*S****DK          0   A   8 3WF-IS-P1-CNST-DATE              /*         
*S****DK          0   A   8 3WF-IS-P2-CNST-DATE              /*         
*S****DK          0   A   1 3WF-IS-S-TRANU-MATCH             /*         
*S****DK          0   A   1 3WF-IS-SP-TRANU-MATCH            /*         
*S****DK          0   A   1 3WF-IS-P1-TRANU-MATCH            /*         
*S****DK          0   A   1 3WF-IS-P2-TRANU-MATCH            /*         
*S****DK          0   A   2 3WF-IS-C-COR-TRAN                /*         
*S****DK          0   A   1 3WF-IS-F-PROF-JUDG               /*         
*S****DK          0   A   1 3WF-IS-F-DEP-OVR                 /*         
*S****DK          0   A   6 3WF-IS-F-COLLEGE                 /*         
*S****DK          0   A   1 3WF-IS-F-SIGN                    /*         
*S****DK          0   A   1 3WF-IS-F-IASG                    /*         
*S****DK          0   A   1 3WF-IS-C-CHILD-HERO              /*         
*S****DK          0   A   7 3WF-IS-C-ETI-DEST                /*         
*S****DK          0   A   1 3WF-IS-S-SGN-SRC                 /*         
*S****DK          0   A   1 3WF-IS-SP-SGN-SRC                /*         
*S****DK          0   A   1 3WF-IS-P1-SGN-SRC                /*         
*S****DK          0   A   1 3WF-IS-P2-SGN-SRC                /*         
*S****DK          0   A   1 3WF-IS-SPEC-HAND                 /*         
*S****DK          0   A   1 3WF-IS-C-ADDR-CHG                /*         
*S****DK          0   A   1 3WF-IS-C-PUSHED                  /*         
*S****DK          0   A   1 3WF-IS-C-REJ-CHG                 /*         
*S****DK          0   A   2 3WF-IS-C-VER-TRACK               /*         
*S****DK          0   A   1 3WF-IS-C-VER                     /*         
*S****DK          0   A   1 3WF-IS-INCARCERATED              /*         
*S****DK          0   A   2 3WF-IS-C-NSLDS-TRAN              /*         
*S****DK          0   A   1 3WF-IS-C-VER-NSL                 /*         
*S****DK          0   A   1 3WF-IS-C-MATCH-HS                /*         
*S****DK          0   A  12 3WF-IS-S-FWS                     /*         
*S****DK          0   A  12 3WF-IS-SP-FWS                    /*         
*S****DK          0   A  12 3WF-IS-P1-FWS                    /*         
*S****DK          0   A  12 3WF-IS-P2-FWS                    /*         
*S****DK          0   A240  3WF-IS-FILLER9      
*S****DK          0   A   7 3WF-IS-P1-FC1-DNW                /*         
*S****DK          0   A   7 3WF-IS-P1-FC1-NW                 /*         
*S****DK          0   A  12 3WF-IS-P1-FC1-APA                /*         
*S****DK          0   A  12 3WF-IS-P1-FC1-CA                 /*         
*S****DK          0   A   7 3WF-IS-S-FC1-NW                  /*         
*S****DK          0   A  12 3WF-IS-S-FC1-APA                 /*         
*S****DK          0   A  12 3WF-IS-S-FC1-CA                  /*         
*S****DK          0   A   3 3WF-IS-CAS-FAM-SIZE              /*         
*S****DK          0   A   3 3WF-IS-CAP-FAM-SIZE              /*         
*S****C           0   * 
*S****C           0   *  Correction, Highlight, and Verify Flags        
*S****C           0   * 
*S****DK          0   A   3 3WF-IS-CF-S-NM-FIRST             /*         
*S****DK          0   A   3 3WF-IS-CF-S-NM-MIDDLE            /*         
*S****DK          0   A   3 3WF-IS-CF-S-NM-LAST              /*         
*S****DK          0   A   3 3WF-IS-CF-S-SUFFIX               /*         
*S****DK          0   A   3 3WF-IS-CF-S-DOB                  /*         
*S****DK          0   A   3 3WF-IS-CF-S-SSN                  /*         
*S****DK          0   A   3 3WF-IS-CF-S-ITIN                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-PHONE                /*         
*S****DK          0   A   3 3WF-IS-CF-S-EMAIL                /*         
*S****DK          0   A   3 3WF-IS-CF-S-AD-STRT              /*         
*S****DK          0   A   3 3WF-IS-CF-S-AD-CITY              /*         
*S****DK          0   A   3 3WF-IS-CF-S-AD-STATE             /*         
*S****DK          0   A   3 3WF-IS-CF-S-AD-ZIP               /*         
*S****DK          0   A   3 3WF-IS-CF-S-AD-COUNTRY           /*         
*S****DK          0   A   3 3WF-IS-CF-S-MAR                  /*         
*S****DK          0   A   3 3WF-IS-CF-S-YR-COL               /*         
*S****DK          0   A   3 3WF-IS-CF-S-BACH-DEG             /*         
*S****DK          0   A   3 3WF-IS-CF-S-TCH-CERT             /*         
*S****DK          0   A   3 3WF-IS-CF-S-ACTV                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-VET                  /*         
*S****DK          0   A   3 3WF-IS-CF-S-DEP                  /*         
*S****DK          0   A   3 3WF-IS-CF-S-PAR-DECD             /*         
*S****DK          0   A   3 3WF-IS-CF-S-WARD                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-FOST                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-EMAN                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-GUAR                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-PERS-NO              /*         
*S****DK          0   A   3 3WF-IS-CF-S-UYSS                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-UGEN                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-UHS                  /*         
*S****DK          0   A   3 3WF-IS-CF-S-UTRIO                /*         
*S****DK          0   A   3 3WF-IS-CF-S-UFAA                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-UOTHER-NO            /*         
*S****DK          0   A   3 3WF-IS-CF-S-UN-CIRC              /*         
*S****DK          0   A   3 3WF-IS-CF-S-UNSUB                /*         
*S****DK          0   A   3 3WF-IS-CF-S-FAM-SIZE             /*         
*S****DK          0   A   3 3WF-IS-CF-S-FAM-COL              /*         
*S****DK          0   A   3 3WF-IS-CF-S-CIT                  /*         
*S****DK          0   A   3 3WF-IS-CF-S-ALIEN                /*         
*S****DK          0   A   3 3WF-IS-CF-S-RES                  /*         
*S****DK          0   A   3 3WF-IS-CF-S-RES-DATE             /*         
*S****DK          0   A   3 3WF-IS-CF-S-PARS-COLG            /*         
*S****DK          0   A   3 3WF-IS-CF-S-PARS-KDUTY           /*         
*S****DK          0   A   3 3WF-IS-CF-S-GED                  /*         
*S****DK          0   A   3 3WF-IS-CF-S-HS-NAME              /*         
*S****DK          0   A   3 3WF-IS-CF-S-HS-CITY              /*         
*S****DK          0   A   3 3WF-IS-CF-S-HS-STATE             /*         
*S****DK          0   A   3 3WF-IS-CF-S-HSE-NAME             /*         
*S****DK          0   A   3 3WF-IS-CF-S-HSE-STATE            /*         
*S****DK          0   A   3 3WF-IS-CF-S-EITC                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-HOME                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-LUNCH                /*         
*S****DK          0   A   3 3WF-IS-CF-S-MEDC                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-36B                  /*         
*S****DK          0   A   3 3WF-IS-CF-S-SNAP                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-SSI                  /*         
*S****DK          0   A   3 3WF-IS-CF-S-TANF                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-WIC                  /*         
*S****DK          0   A   3 3WF-IS-CF-S-NONE                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-1040R                /*         
*S****DK          0   A   3 3WF-IS-CF-S-NON-US               /*         
*S****DK          0   A   3 3WF-IS-CF-S-JOINT                /*         
*S****DK          0   A   3 3WF-IS-CF-S-FILE-STAT            /*         
*S****DK          0   A   3 3WF-IS-CF-S-INC                  /*         
*S****DK          0   A   3 3WF-IS-CF-S-U-INT                /*         
*S****DK          0   A   3 3WF-IS-CF-S-U-DST-IRA            /*         
*S****DK          0   A   3 3WF-IS-CF-S-U-ROLL-IRA           /*         
*S****DK          0   A   3 3WF-IS-CF-S-U-DST-PEN            /*         
*S****DK          0   A   3 3WF-IS-CF-S-U-ROLL-PEN           /*         
*S****DK          0   A   3 3WF-IS-CF-S-AGI                  /*         
*S****DK          0   A   3 3WF-IS-CF-S-FED-TAX              /*         
*S****DK          0   A   3 3WF-IS-CF-S-TAX-CRD              /*         
*S****DK          0   A   3 3WF-IS-CF-S-DED-PAY              /*         
*S****DK          0   A   3 3WF-IS-CF-S-EDCR                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-ABD-EFH              /*         
*S****DK          0   A   3 3WF-IS-CF-S-SCHEDC-AMT           /*         
*S****DK          0   A   3 3WF-IS-CF-S-GRNT                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-FGN-INC-EXC          /*         
*S****DK          0   A   3 3WF-IS-CF-S-CSUP                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-BUS-FRM              /*         
*S****DK          0   A   3 3WF-IS-CF-S-INV                  /*         
*S****DK          0   A   3 3WF-IS-CF-S-CASH                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL1                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL2                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL3                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL4                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL5                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL6                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL7                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL8                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL9                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL10                /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL11                /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL12                /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL13                /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL14                /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL15                /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL16                /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL17                /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL18                /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL19                /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL20                /*         
*S****DK          0   A   3 3WF-IS-CF-S-CONSENT              /*         
*S****DK          0   A   3 3WF-IS-CF-S-SGN                  /*         
*S****DK          0   A   3 3WF-IS-CF-S-SGN-DATE             /*         
*S****DK          0   A   3 3WF-IS-CF-SP-NM-FIRST            /*         
*S****DK          0   A   3 3WF-IS-CF-SP-NM-MIDDLE           /*         
*S****DK          0   A   3 3WF-IS-CF-SP-NM-LAST             /*         
*S****DK          0   A   3 3WF-IS-CF-SP-SUFFIX              /*         
*S****DK          0   A   3 3WF-IS-CF-SP-DOB                 /*         
*S****DK          0   A   3 3WF-IS-CF-SP-SSN                 /*         
*S****DK          0   A   3 3WF-IS-CF-SP-ITIN                /*         
*S****DK          0   A   3 3WF-IS-CF-SP-PHONE               /*         
*S****DK          0   A   3 3WF-IS-CF-SP-EMAIL               /*         
*S****DK          0   A   3 3WF-IS-CF-SP-AD-STRT             /*         
*S****DK          0   A   3 3WF-IS-CF-SP-AD-CITY             /*         
*S****DK          0   A   3 3WF-IS-CF-SP-AD-STATE            /*         
*S****DK          0   A   3 3WF-IS-CF-SP-AD-ZIP              /*         
*S****DK          0   A3    3WF-IS-CF-SP-COUNTRY
*S****DK          0   A   3 3WF-IS-CF-SP-1040R               /*         
*S****DK          0   A   3 3WF-IS-CF-SP-NON-US              /*         
*S****DK          0   A   3 3WF-IS-CF-SP-FILE-STAT           /*         
*S****DK          0   A   3 3WF-IS-CF-SP-INC                 /*         
*S****DK          0   A   3 3WF-IS-CF-SP-U-INT               /*         
*S****DK          0   A   3 3WF-IS-CF-SP-U-DST-IRA           /*         
*S****DK          0   A   3 3WF-IS-CF-SP-U-ROLL-IRA          /*         
*S****DK          0   A   3 3WF-IS-CF-SP-U-DST-PEN           /*         
*S****DK          0   A   3 3WF-IS-CF-SP-U-ROLL-PEN          /*         
*S****DK          0   A   3 3WF-IS-CF-SP-AGI                 /*         
*S****DK          0   A   3 3WF-IS-CF-SP-FED-TAX             /*         
*S****DK          0   A   3 3WF-IS-CF-SP-DED-PAY             /*         
*S****DK          0   A   3 3WF-IS-CF-SP-EDCR                /*         
*S****DK          0   A   3 3WF-IS-CF-SP-ABD-EFH             /*         
*S****DK          0   A   3 3WF-IS-CF-SP-SCHEDC-AMT          /*         
*S****DK          0   A   3 3WF-IS-CF-SP-FGN-INC-EXC         /*         
*S****DK          0   A   3 3WF-IS-CF-SP-CONSENT             /*         
*S****DK          0   A   3 3WF-IS-CF-SP-SGN                 /*         
*S****DK          0   A   3 3WF-IS-CF-SP-SGN-DATE            /*         
*S****DK          0   A   3 3WF-IS-CF-P1-NM-FIRST            /*         
*S****DK          0   A   3 3WF-IS-CF-P1-NM-MIDDLE           /*         
*S****DK          0   A   3 3WF-IS-CF-P1-NM-LAST             /*         
*S****DK          0   A   3 3WF-IS-CF-P1-SUFFIX              /*         
*S****DK          0   A   3 3WF-IS-CF-P1-DOB                 /*         
*S****DK          0   A   3 3WF-IS-CF-P1-SSN                 /*         
*S****DK          0   A   3 3WF-IS-CF-P1-ITIN                /*         
*S****DK          0   A   3 3WF-IS-CF-P1-PHONE               /*         
*S****DK          0   A   3 3WF-IS-CF-P1-EMAIL               /*         
*S****DK          0   A   3 3WF-IS-CF-P1-AD-STRT             /*         
*S****DK          0   A   3 3WF-IS-CF-P1-AD-CITY             /*         
*S****DK          0   A   3 3WF-IS-CF-P1-AD-STATE            /*         
*S****DK          0   A   3 3WF-IS-CF-P1-AD-ZIP              /*         
*S****DK          0   A3    3WF-IS-CF-P1-COUNTRY
*S****DK          0   A   3 3WF-IS-CF-P1-MAR                 /*         
*S****DK          0   A   3 3WF-IS-CF-P1-RES                 /*         
*S****DK          0   A   3 3WF-IS-CF-P1-RES-DATE            /*         
*S****DK          0   A   3 3WF-IS-CF-P1-FAM-SIZE            /*         
*S****DK          0   A   3 3WF-IS-CF-P1-FAM-COL             /*         
*S****DK          0   A   3 3WF-IS-CF-P1-EITC                /*         
*S****DK          0   A   3 3WF-IS-CF-P1-HOME                /*         
*S****DK          0   A   3 3WF-IS-CF-P1-LUNCH               /*         
*S****DK          0   A   3 3WF-IS-CF-P1-MEDC                /*         
*S****DK          0   A   3 3WF-IS-CF-P1-36B                 /*         
*S****DK          0   A   3 3WF-IS-CF-P1-SNAP                /*         
*S****DK          0   A   3 3WF-IS-CF-P1-SSI                 /*         
*S****DK          0   A   3 3WF-IS-CF-P1-TANF                /*         
*S****DK          0   A   3 3WF-IS-CF-P1-WIC                 /*         
*S****DK          0   A   3 3WF-IS-CF-P1-NONE                /*         
*S****DK          0   A   3 3WF-IS-CF-P1-1040R               /*         
*S****DK          0   A   3 3WF-IS-CF-P1-NON-US              /*         
*S****DK          0   A   3 3WF-IS-CF-P1-JOINT               /*         
*S****DK          0   A   3 3WF-IS-CF-P1-FILE-STAT           /*         
*S****DK          0   A   3 3WF-IS-CF-P1-INC                 /*         
*S****DK          0   A   3 3WF-IS-CF-P1-U-INT               /*         
*S****DK          0   A   3 3WF-IS-CF-P1-U-DST-IRA           /*         
*S****DK          0   A   3 3WF-IS-CF-P1-U-ROLL-IRA          /*         
*S****DK          0   A   3 3WF-IS-CF-P1-U-DST-PEN           /*         
*S****DK          0   A   3 3WF-IS-CF-P1-U-ROLL-PEN          /*         
*S****DK          0   A   3 3WF-IS-CF-P1-AGI                 /*         
*S****DK          0   A   3 3WF-IS-CF-P1-FED-TAX             /*         
*S****DK          0   A   3 3WF-IS-CF-P1-TAX-CRD             /*         
*S****DK          0   A   3 3WF-IS-CF-P1-DED-PAY             /*         
*S****DK          0   A   3 3WF-IS-CF-P1-EDCR                /*         
*S****DK          0   A   3 3WF-IS-CF-P1-ABD-EFH             /*         
*S****DK          0   A   3 3WF-IS-CF-P1-SCHEDC-AMT          /*         
*S****DK          0   A   3 3WF-IS-CF-P1-GRNT                /*         
*S****DK          0   A   3 3WF-IS-CF-P1-FGN-INC-EXC         /*         
*S****DK          0   A   3 3WF-IS-CF-P1-CSUP                /*         
*S****DK          0   A   3 3WF-IS-CF-P1-INV                 /*         
*S****DK          0   A   3 3WF-IS-CF-P1-CASH                /*         
*S****DK          0   A   3 3WF-IS-CF-P1-BUS-FRM             /*         
*S****DK          0   A   3 3WF-IS-CF-P1-CONSENT             /*         
*S****DK          0   A   3 3WF-IS-CF-P1-SGN                 /*         
*S****DK          0   A   3 3WF-IS-CF-P1-SGN-DATE            /*         
*S****DK          0   A   3 3WF-IS-CF-P2-NM-FIRST            /*         
*S****DK          0   A   3 3WF-IS-CF-P2-NM-MIDDLE           /*         
*S****DK          0   A   3 3WF-IS-CF-P2-NM-LAST             /*         
*S****DK          0   A   3 3WF-IS-CF-P2-SUFFIX              /*         
*S****DK          0   A   3 3WF-IS-CF-P2-DOB                 /*         
*S****DK          0   A   3 3WF-IS-CF-P2-SSN                 /*         
*S****DK          0   A   3 3WF-IS-CF-P2-ITIN                /*         
*S****DK          0   A   3 3WF-IS-CF-P2-PHONE               /*         
*S****DK          0   A   3 3WF-IS-CF-P2-EMAIL               /*         
*S****DK          0   A   3 3WF-IS-CF-P2-AD-STRT             /*         
*S****DK          0   A   3 3WF-IS-CF-P2-AD-CITY             /*         
*S****DK          0   A   3 3WF-IS-CF-P2-AD-STATE            /*         
*S****DK          0   A   3 3WF-IS-CF-P2-AD-ZIP              /*         
*S****DK          0   A   3 3WF-IS-CF-P2-AD-COUNTRY          /*         
*S****DK          0   A   3 3WF-IS-CF-P2-1040R               /*         
*S****DK          0   A   3 3WF-IS-CF-P2-NON-US              /*         
*S****DK          0   A   3 3WF-IS-CF-P2-FILE-STAT           /*         
*S****DK          0   A   3 3WF-IS-CF-P2-INC                 /*         
*S****DK          0   A   3 3WF-IS-CF-P2-U-INT               /*         
*S****DK          0   A   3 3WF-IS-CF-P2-U-DST-IRA           /*         
*S****DK          0   A   3 3WF-IS-CF-P2-U-ROLL-IRA          /*         
*S****DK          0   A   3 3WF-IS-CF-P2-U-DST-PEN           /*         
*S****DK          0   A   3 3WF-IS-CF-P2-U-ROLL-PEN          /*         
*S****DK          0   A   3 3WF-IS-CF-P2-AGI                 /*         
*S****DK          0   A   3 3WF-IS-CF-P2-FED-TAX             /*         
*S****DK          0   A   3 3WF-IS-CF-P2-DED-PAY             /*         
*S****DK          0   A   3 3WF-IS-CF-P2-EDCR                /*         
*S****DK          0   A   3 3WF-IS-CF-P2-ABD-EFH             /*         
*S****DK          0   A   3 3WF-IS-CF-P2-SCHEDC-AMT          /*         
*S****DK          0   A   3 3WF-IS-CF-P2-FGN-INC-EXC         /*         
*S****DK          0   A   3 3WF-IS-CF-P2-CONSENT             /*         
*S****DK          0   A   3 3WF-IS-CF-P2-SGN                 /*         
*S****DK          0   A   3 3WF-IS-CF-P2-SGN-DATE            /*         
*S****C           0   * 
*S****C           0   *  Matches and Other Processing Information       
*S****C           0   * 
*S****DK          0   A   1 3WF-IS-C-MATCH-DHS               /*         
*S****DK          0   A   1 3WF-IS-C-MATCH-DHS2              /*         
*S****DK          0   A  15 3WF-IS-C-VER-DHS                 /*         
*S****DK          0   A   1 3WF-IS-C-MATCH-NSL               /*         
*S****DK          0   A   2 3WF-IS-C-NSLDS-PS1               /*         
*S****DK          0   A   2 3WF-IS-C-NSLDS-PS2               /*         
*S****DK          0   A   2 3WF-IS-C-NSLDS-PS3               /*         
*S****DK          0   A   1 3WF-IS-C-MATCH-CIT               /*         
*S****DK          0   A   1 3WF-IS-C-S-MATCH-SSN             /*         
*S****DK          0   A   1 3WF-IS-C-SP-MATCH-SSN            /*         
*S****DK          0   A   1 3WF-IS-C-P1-MATCH-SSN            /*         
*S****DK          0   A   1 3WF-IS-C-P2-MATCH-SSN            /*         
*S****DK          0   A   1 3WF-IS-C-MATCH-VA                /*         
*S****DK          0   A   3 3WF-IS-C-COM01                   /*         
*S****DK          0   A   3 3WF-IS-C-COM02                   /*         
*S****DK          0   A   3 3WF-IS-C-COM03                   /*         
*S****DK          0   A   3 3WF-IS-C-COM04                   /*         
*S****DK          0   A   3 3WF-IS-C-COM05                   /*         
*S****DK          0   A   3 3WF-IS-C-COM06                   /*         
*S****DK          0   A   3 3WF-IS-C-COM07                   /*         
*S****DK          0   A   3 3WF-IS-C-COM08                   /*         
*S****DK          0   A   3 3WF-IS-C-COM09                   /*         
*S****DK          0   A   3 3WF-IS-C-COM10                   /*         
*S****DK          0   A   3 3WF-IS-C-COM11                   /*         
*S****DK          0   A   3 3WF-IS-C-COM12                   /*         
*S****DK          0   A   3 3WF-IS-C-COM13                   /*         
*S****DK          0   A   3 3WF-IS-C-COM14                   /*         
*S****DK          0   A   3 3WF-IS-C-COM15                   /*         
*S****DK          0   A   3 3WF-IS-C-COM16                   /*         
*S****DK          0   A   3 3WF-IS-C-COM17                   /*         
*S****DK          0   A   3 3WF-IS-C-COM18                   /*         
*S****DK          0   A   3 3WF-IS-C-COM19                   /*         
*S****DK          0   A   3 3WF-IS-C-COM20                   /*         
*S****DK          0   A   1 3WF-IS-C-DRUG-HOLD               /*         
*S****DK          0   A   1 3WF-IS-C-GRAD                    /*         
*S****DK          0   A   1 3WF-IS-C-PELL-ELIG               /*         
*S****DK          0   A   2 3WF-IS-C-REPROC-RSN              /*         
*S****DK          0   A   1 3WF-IS-C-CFLAG                   /*         
*S****DK          0   A   1 3WF-IS-C-CFLAG-CHG               /*         
*S****DK          0   A   2 3WF-IS-C-ELEC-INST               /*         
*S****DK          0   A 110 3WF-IS-C-REJ-RSNS                /*         
*S****DK          0   A   1 3WF-IS-C-ETI                     /*         
*S****DK          0   A   1 3WF-IS-C-SSN-NM-CHG              /*         
*S****DK          0   A  12 3WF-IS-C-VER-HS                  /*         
*S****DK          0   A   1 3WF-IS-C-VER-CHG                 /*         
*S****DK          0   A   5 3WF-IS-C-USER-DATA               /*         
*S****DK          0   A   1 3WF-IS-WORKF-PGM                 /*         
*S****DK          0   A250  3WF-IS-FILLER8A     
*S****DK          0   A110  3WF-IS-FILLER8B     
*S****C           0   * 
*S****C           0   *  FTIM Information       
*S****C           0   * 
*S****DK          0   A  36 3WF-IS-FILLER10                  /*         
*S****C           0   * 
*S****C           0   *  Student FTI-M Information          
*S****C           0   * 
*S****DK          0   A  50 3WF-IS-FILLER11                  /*         
*S****DK          0   A  11 3WF-IS-FTI-LABEL-START           /*         
*S****DK          0   A   4 3WF-IS-FTI-S-RET-YEAR            /*         
*S****DK          0   A   1 3WF-IS-FTI-S-FILE-STAT           /*         
*S****DK          0   A  10 3WF-IS-FTI-S-AGI                 /*         
*S****DK          0   A   2 3WF-IS-FTI-S-EXE                 /*         
*S****DK          0   A   2 3WF-IS-FTI-S-DEPS                /*         
*S****DK          0   A  11 3WF-IS-FTI-S-TOT-INC             /*         
*S****DK          0   A   9 3WF-IS-FTI-S-TOT-FED-TAX         /*         
*S****DK          0   A   9 3WF-IS-FTI-S-EDCR                /*         
*S****DK          0   A  11 3WF-IS-FTI-S-DST-IRA             /*         
*S****DK          0   A  11 3WF-IS-FTI-S-DED-PAY             /*         
*S****DK          0   A  11 3WF-IS-FTI-S-U-INT               /*         
*S****DK          0   A  11 3WF-IS-FTI-S-DST-PEN             /*         
*S****DK          0   A  12 3WF-IS-FTI-S-SCHEDC-NET          /*         
*S****DK          0   A   1 3WF-IS-FTI-S-SCHEDA              /*         
*S****DK          0   A   1 3WF-IS-FTI-S-SCHEDB              /*         
*S****DK          0   A   1 3WF-IS-FTI-S-SCHEDD              /*         
*S****DK          0   A   1 3WF-IS-FTI-S-SCHEDE              /*         
*S****DK          0   A   1 3WF-IS-FTI-S-SCHEDF              /*         
*S****DK          0   A   1 3WF-IS-FTI-S-SCHEDH              /*         
*S****DK          0   A   3 3WF-IS-FTI-S-IRS-RESP            /*         
*S****C           0   * 
*S****C           0   *  Student Spouse FTI-M Information   
*S****C           0   * 
*S****DK          0   A   4 3WF-IS-FTI-SP-RET-YEAR           /*         
*S****DK          0   A   1 3WF-IS-FTI-SP-FILE-STAT          /*         
*S****DK          0   A  10 3WF-IS-FTI-SP-AGI                /*         
*S****DK          0   A   2 3WF-IS-FTI-SP-EXE                /*         
*S****DK          0   A   2 3WF-IS-FTI-SP-DEPS               /*         
*S****DK          0   A  11 3WF-IS-FTI-SP-TOT-INC            /*         
*S****DK          0   A   9 3WF-IS-FTI-SP-TOT-FED-TAX        /*         
*S****DK          0   A   9 3WF-IS-FTI-SP-EDCR               /*         
*S****DK          0   A  11 3WF-IS-FTI-SP-DST-IRA            /*         
*S****DK          0   A  11 3WF-IS-FTI-SP-DED-PAY            /*         
*S****DK          0   A  11 3WF-IS-FTI-SP-U-INT              /*         
*S****DK          0   A  11 3WF-IS-FTI-SP-DST-PEN            /*         
*S****DK          0   A  12 3WF-IS-FTI-SP-SCHEDC-NET         /*         
*S****DK          0   A   1 3WF-IS-FTI-SP-SCHEDA             /*         
*S****DK          0   A   1 3WF-IS-FTI-SP-SCHEDB             /*         
*S****DK          0   A   1 3WF-IS-FTI-SP-SCHEDD             /*         
*S****DK          0   A   1 3WF-IS-FTI-SP-SCHEDE             /*         
*S****DK          0   A   1 3WF-IS-FTI-SP-SCHEDF             /*         
*S****DK          0   A   1 3WF-IS-FTI-SP-SCHEDH             /*         
*S****DK          0   A   3 3WF-IS-FTI-SP-IRS-RESP           /*         
*S****C           0   * 
*S****C           0   *  Parent FTI-M Information           
*S****C           0   * 
*S****DK          0   A   4 3WF-IS-FTI-P1-RET-YEAR           /*         
*S****DK          0   A   1 3WF-IS-FTI-P1-FILE-STAT          /*         
*S****DK          0   A  10 3WF-IS-FTI-P1-AGI                /*         
*S****DK          0   A   2 3WF-IS-FTI-P1-EXE                /*         
*S****DK          0   A   2 3WF-IS-FTI-P1-DEPS               /*         
*S****DK          0   A  11 3WF-IS-FTI-P1-TOT-INC            /*         
*S****DK          0   A   9 3WF-IS-FTI-P1-TOT-FED-TAX        /*         
*S****DK          0   A   9 3WF-IS-FTI-P1-EDCR               /*         
*S****DK          0   A  11 3WF-IS-FTI-P1-DST-IRA            /*         
*S****DK          0   A  11 3WF-IS-FTI-P1-DED-PAY           
*S****DK          0   A  11 3WF-IS-FTI-P1-U-INT              /*         
*S****DK          0   A  11 3WF-IS-FTI-P1-DST-PEN            /*         
*S****DK          0   A  12 3WF-IS-FTI-P1-SCHEDC-NET         /*         
*S****DK          0   A   1 3WF-IS-FTI-P1-SCHEDA             /*         
*S****DK          0   A   1 3WF-IS-FTI-P1-SCHEDB             /*         
*S****DK          0   A   1 3WF-IS-FTI-P1-SCHEDD             /*         
*S****DK          0   A   1 3WF-IS-FTI-P1-SCHEDE             /*         
*S****DK          0   A   1 3WF-IS-FTI-P1-SCHEDF             /*         
*S****DK          0   A   1 3WF-IS-FTI-P1-SCHEDH             /*         
*S****DK          0   A   3 3WF-IS-FTI-P1-IRS-RESP           /*         
*S****C           0   * 
*S****C           0   *  Parent Spouse or Partner FTI-M Information     
*S****C           0   * 
*S****DK          0   A   4 3WF-IS-FTI-P2-RET-YEAR           /*         
*S****DK          0   A   1 3WF-IS-FTI-P2-FILE-STAT          /*         
*S****DK          0   A  10 3WF-IS-FTI-P2-AGI                /*         
*S****DK          0   A   2 3WF-IS-FTI-P2-EXE                /*         
*S****DK          0   A   2 3WF-IS-FTI-P2-DEPS               /*         
*S****DK          0   A  11 3WF-IS-FTI-P2-TOT-INC            /*         
*S****DK          0   A   9 3WF-IS-FTI-P2-TOT-FED-TAX        /*         
*S****DK          0   A   9 3WF-IS-FTI-P2-EDCR               /*         
*S****DK          0   A  11 3WF-IS-FTI-P2-DST-IRA            /*         
*S****DK          0   A  11 3WF-IS-FTI-P2-DED-PAY           
*S****DK          0   A  11 3WF-IS-FTI-P2-U-INT              /*         
*S****DK          0   A  11 3WF-IS-FTI-P2-DST-PEN            /*         
*S****DK          0   A  12 3WF-IS-FTI-P2-SCHEDC-NET         /*         
*S****DK          0   A   1 3WF-IS-FTI-P2-SCHEDA             /*         
*S****DK          0   A   1 3WF-IS-FTI-P2-SCHEDB             /*         
*S****DK          0   A   1 3WF-IS-FTI-P2-SCHEDD             /*         
*S****DK          0   A   1 3WF-IS-FTI-P2-SCHEDE             /*         
*S****DK          0   A   1 3WF-IS-FTI-P2-SCHEDF             /*         
*S****DK          0   A   1 3WF-IS-FTI-P2-SCHEDH             /*         
*S****DK          0   A   3 3WF-IS-FTI-P2-IRS-RESP           /*         
*S****DK          0   A  61 3WF-IS-FILLER12                  /*         
*S****C           0   * 
*S****C           0   *  FTIM Processing Information        
*S****C           0   * 
*S****DK          0   A  15 3WF-IS-S-TOT-INC                 /*         
*S****DK          0   A  15 3WF-IS-P-TOT-INC                 /*         
*S****DK          0   A  15 3WF-IS-FISAP-TOT-INC             /*         
*S****DK          0   A  15 3WF-IS-P1-FC1-ATI                /*         
*S****DK          0   A  15 3WF-IS-P1-FC1-PAYR               /*         
*S****DK          0   A  15 3WF-IS-P1-FC1-IPA                /*         
*S****DK          0   A  15 3WF-IS-P1-FC1-EEA                /*         
*S****DK          0   A  15 3WF-IS-P1-FC1-AI                 /*         
*S****DK          0   A  15 3WF-IS-P1-FC1-AAI                /*         
*S****DK          0   A  15 3WF-IS-P1-FC1-CONT               /*         
*S****DK          0   A  15 3WF-IS-S-FC1-PAYR                /*         
*S****DK          0   A  15 3WF-IS-S-FC1-IPA                 /*         
*S****DK          0   A  15 3WF-IS-S-FC1-NEG-AAI             /*         
*S****DK          0   A  15 3WF-IS-S-FC1-EEA                 /*         
*S****DK          0   A  15 3WF-IS-S-FC1-ATI                 /*         
*S****DK          0   A  15 3WF-IS-S-FC1-AI                  /*         
*S****DK          0   A  15 3WF-IS-S-FC1-CI     
*S****DK          0   A  15 3WF-IS-S-FC1-AAI                 /*         
*S****DK          0   A  15 3WF-IS-S-FC1-AAI-CONT            /*         
*S****DK          0   A  11 3WF-IS-FTI-LABEL-END             /*         
*S****DK          0   A  39 3WF-IS-FILLER13                  /*         
*S****C           0   * 
*S****C           0   * No 'N' relationships exist for:      WF-ISIR-2627           
*S****C           0   * 
*S****DF          0   A  11 1WFISR27D-ID                     /* Object identifier   
*S****DR          0        R1WFISR27D-ID                     /* REDEF. BEGIN : WFISR27D-ID      
*S****DSR         0         2STRUCTURE                       /* To allow MOVE BY NAME           
*S****DFR         0   A   2 3WF-FAO                          /*         
*S****DFR         0   A   9 3WW-STUDENT-ID                   /*         
*C**                                FATEMP  WFISR27L                        L S   NN0000        
*D01NAT8304L FATEMP  WFISR27L                        ZWDNH   ZWDNH           S      
*D02            2025093009545102025093009545100000047170    
*D03LINUX   
*D04                 ISO_8859-1:1987
*S****C           0   ***********************************************************************   
*S****C           0   * 
*S****C           0   *         WolffPack, Inc. 
*S****C           0   *                                            Copyright 1995 - 2026        
*S****C           0   * LDA:    WFISR27L                              WolffPack, Inc.           
*S****C           0   * System: FINANCIER                           All rights reserved.        
*S****C           0   * 
*S****C           0   ***********************************************************************   
*S****DS          0         1WFISR27L                        /* Object Name         
*S****DK          0   A   9 2WW-STUDENT-ID                   /*         
*S****DK          0   A   2 2WF-FAO                          /*         
*S****DS          0         2WW-SYSTEM                       /*         
*S****DK          0   N   7 3WW-HOLD                         /*         
*S****DK          0   D     3WW-CDATE                        /*         
*S****DK          0   D     3WW-MDATE                        /*         
*S****C           0   * 
*S****C           0   * Transaction Identification:         
*S****C           0   *   FAFSA Identification UUID,        
*S****C           0   *    Transaction UUID, Application and
*S****C           0   *      Transaction Data Sources, Model,           
*S****C           0   *       Transaction Dates, etc.       
*S****C           0   * 
*S****DS          0         2WF-ISIR                         /*         
*S****DK          0   A   1 3WF-IS-C-BATCH-YR                /*         
*S****DK          0   A  36 3WF-IS-FAFSA-UUID                /*         
*S****DK          0   A  36 3WF-IS-TRANS-UUID                /*         
*S****DK          0   A  36 3WF-IS-PERSON-UUID               /*         
*S****DK          0   A   2 3WF-IS-C-TRANS-NO                /*         
*S****DK          0   A   1 3WF-IS-C-DEP-MODEL               /*         
*S****DK          0   A   1 3WF-IS-C-APP-SRCE                /*         
*S****DK          0   A   8 3WF-IS-C-APP-RCPT-DATE           /*         
*S****DK          0   A   1 3WF-IS-C-TRAN-SRCE               /*         
*S****DK          0   A   1 3WF-IS-C-TRAN-TYPE               /*         
*S****DK          0   A   1 3WF-IS-C-TRAN-LANG               /*         
*S****DK          0   A   8 3WF-IS-C-TRAN-RCPT-DATE          /*         
*S****DK          0   A   8 3WF-IS-C-TRAN-PROC-DATE          /*         
*S****DK          0   A  30 3WF-IS-C-TRAN-STATUS             /*         
*S****DK          0   A   3 3WF-IS-C-RENEWAL-DATA-USED       /*         
*S****DK          0   A   1 3WF-IS-C-FPS-CORR-RSN            /*         
*S****DK          0   A   1 3WF-IS-C-SAI-CHG-FLAG            /*         
*S****DK          0   A   6 3WF-IS-C-SAI                     /*         
*S****DK          0   A   6 3WF-IS-C-SAI-PROV                /*         
*S****DK          0   A   1 3WF-IS-C-SAI-FORMULA             /*         
*S****DK          0   A   2 3WF-IS-C-SAI-COMP-TYPE           /*         
*S****DK          0   A   1 3WF-IS-C-MAX-PELL-IND            /*         
*S****DK          0   A   1 3WF-IS-C-MIN-PELL-IND            /*         
*S****DK          0   A   1 3WF-IS-ISIR-VERSION-FLAG         /*         
*S****DK          0   A  49 3WF-IS-FILLER1                   /*         
*S****C           0   * 
*S****C           0   * Student Demographic, Identity, and  
*S****C           0   *   Contact Information   
*S****C           0   * 
*S****DK          0   A  35 3WF-IS-S-NM-FIRST                /*         
*S****DK          0   A  15 3WF-IS-S-NM-MIDDLE               /*         
*S****DK          0   A  35 3WF-IS-S-NM-LAST                 /*         
*S****DK          0   A  10 3WF-IS-S-NM-SUFFIX               /*         
*S****DK          0   A   8 3WF-IS-S-DOB                     /*         
*S****DK          0   A   9 3WF-IS-S-SSN                     /*         
*S****DK          0   A   9 3WF-IS-S-ITIN                    /*         
*S****DK          0   A10   3WF-IS-S-AD-PHONE   
*S****DK          0   A  50 3WF-IS-S-EMAIL                   /*         
*S****DK          0   A  40 3WF-IS-S-AD-STRT                 /*         
*S****DK          0   A  30 3WF-IS-S-AD-CITY                 /*         
*S****DK          0   A   2 3WF-IS-S-AD-STATE                /*         
*S****DK          0   A  10 3WF-IS-S-AD-ZIP                  /*         
*S****DK          0   A   2 3WF-IS-S-AD-COUNTRY              /*         
*S****DK          0   A  50 3WF-IS-FILLER2                   /*         
*S****C           0   * 
*S****C           0   * Student Non-Financial Information   
*S****C           0   *   (Dependency, Marital Status, etc.)
*S****C           0   * 
*S****DK          0   A   1 3WF-IS-S-MAR                     /*         
*S****DK          0   A   1 3WF-IS-S-YR-COL                  /*         
*S****DK          0   A   1 3WF-IS-S-BACH-DEG                /*         
*S****DK          0   A   1 3WF-IS-S-TCH-CERT                /*         
*S****DK          0   A   1 3WF-IS-S-TEST-ACTV               /*         
*S****DK          0   A   1 3WF-IS-S-TEST-VET                /*         
*S****DK          0   A   1 3WF-IS-S-TEST-DEP                /*         
*S****DK          0   A   1 3WF-IS-S-TEST-PAR-DECD           /*         
*S****DK          0   A   1 3WF-IS-S-TEST-WARD               /*         
*S****DK          0   A   1 3WF-IS-S-TEST-FOST               /*         
*S****DK          0   A   1 3WF-IS-S-TEST-EMAN               /*         
*S****DK          0   A   1 3WF-IS-S-TEST-GUAR               /*         
*S****DK          0   A   1 3WF-IS-S-TEST-PERS-NO            /*         
*S****DK          0   A   1 3WF-IS-S-TEST-UYSS               /*         
*S****DK          0   A   1 3WF-IS-S-TEST-UGEN               /*         
*S****DK          0   A   1 3WF-IS-S-TEST-UHS                /*         
*S****DK          0   A   1 3WF-IS-S-TEST-UTRIO              /*         
*S****DK          0   A   1 3WF-IS-S-TEST-UFAA               /*         
*S****DK          0   A   1 3WF-IS-S-TEST-UOTHER-NO          /*         
*S****DK          0   A   1 3WF-IS-S-TEST-UN-CIRC            /*         
*S****DK          0   A   1 3WF-IS-S-TEST-UNSUB              /*         
*S****DK          0   A   2 3WF-IS-S-FAM-SIZE                /*         
*S****DK          0   A   2 3WF-IS-S-FAM-COL                 /*         
*S****C           0   * 
*S****C           0   * Student Demographic Information     
*S****C           0   * 
*S****DK          0   A   1 3WF-IS-S-CIT                     /*         
*S****DK          0   A   9 3WF-IS-S-ALIEN                   /*         
*S****DK          0   A   2 3WF-IS-S-RES                     /*         
*S****DK          0   A   6 3WF-IS-S-RES-DATE                /*         
*S****DK          0   A   1 3WF-IS-S-PARS-COLG               /*         
*S****DK          0   A   1 3WF-IS-S-PARS-KDUTY              /*         
*S****DK          0   A   1 3WF-IS-S-HS-GED                  /*         
*S****DK          0   A  60 3WF-IS-S-HS-NAME                 /*         
*S****DK          0   A  28 3WF-IS-S-HS-CITY                 /*         
*S****DK          0   A   2 3WF-IS-S-HS-STATE                /*         
*S****DK          0   A   1 3WF-IS-S-HSE-NAME                /*         
*S****DK          0   A   2 3WF-IS-S-HSE-STATE               /*         
*S****C           0   * 
*S****C           0   * Student Manually Entered Financial  
*S****C           0   * 
*S****DK          0   A   1 3WF-IS-S-MT-EITC                 /*         
*S****DK          0   A   1 3WF-IS-S-MT-HOME                 /*         
*S****DK          0   A   1 3WF-IS-S-MT-LUNCH                /*         
*S****DK          0   A   1 3WF-IS-S-MT-MEDC                 /*         
*S****DK          0   A   1 3WF-IS-S-MT-36B                  /*         
*S****DK          0   A   1 3WF-IS-S-MT-SNAP                 /*         
*S****DK          0   A   1 3WF-IS-S-MT-SSI                  /*         
*S****DK          0   A   1 3WF-IS-S-MT-TANF                 /*         
*S****DK          0   A   1 3WF-IS-S-MT-WIC                  /*         
*S****DK          0   A   1 3WF-IS-S-MT-NONE                 /*         
*S****DK          0   A   1 3WF-IS-S-1040R                   /*         
*S****DK          0   A   1 3WF-IS-S-NON-US                  /*         
*S****DK          0   A   1 3WF-IS-S-JOINT                   /*         
*S****DK          0   A   1 3WF-IS-S-FILE-STAT               /*         
*S****DK          0   A  11 3WF-IS-S-INC                     /*         
*S****DK          0   A  11 3WF-IS-S-U-INT                   /*         
*S****DK          0   A  11 3WF-IS-S-U-DST-IRA               /*         
*S****DK          0   A  11 3WF-IS-S-U-ROLL-IRA              /*         
*S****DK          0   A  11 3WF-IS-S-U-DST-PEN               /*         
*S****DK          0   A  11 3WF-IS-S-U-ROLL-PEN              /*         
*S****DK          0   A  10 3WF-IS-S-AGI                     /*         
*S****DK          0   A   9 3WF-IS-S-FED-TAX                 /*         
*S****DK          0   A   1 3WF-IS-S-TAX-CREDIT              /*         
*S****DK          0   A  11 3WF-IS-S-DED-PAY                 /*         
*S****DK          0   A   9 3WF-IS-S-EDCR                    /*         
*S****DK          0   A   1 3WF-IS-S-ABD-EFH                 /*         
*S****DK          0   A  12 3WF-IS-S-SCHEDC-AMT              /*         
*S****DK          0   A   7 3WF-IS-S-GRNT                    /*         
*S****DK          0   A  10 3WF-IS-S-FGN-INC-EXC             /*         
*S****DK          0   A   7 3WF-IS-S-U-CSUP                  /*         
*S****DK          0   A   7 3WF-IS-S-CASH                    /*         
*S****DK          0   A   7 3WF-IS-S-INV                     /*         
*S****DK          0   A   7 3WF-IS-S-BUS-FRM                 /*         
*S****C           0   * 
*S****C           0   * Student School Choices, Consent,    
*S****C           0   *   and Signature         
*S****C           0   * 
*S****DK          0   A   6 3WF-IS-A-COL1                    /*         
*S****DK          0   A   6 3WF-IS-A-COL2                    /*         
*S****DK          0   A   6 3WF-IS-A-COL3                    /*         
*S****DK          0   A   6 3WF-IS-A-COL4                    /*         
*S****DK          0   A   6 3WF-IS-A-COL5                    /*         
*S****DK          0   A   6 3WF-IS-A-COL6                    /*         
*S****DK          0   A   6 3WF-IS-A-COL7                    /*         
*S****DK          0   A   6 3WF-IS-A-COL8                    /*         
*S****DK          0   A   6 3WF-IS-A-COL9                    /*         
*S****DK          0   A   6 3WF-IS-A-COL10                   /*         
*S****DK          0   A   6 3WF-IS-A-COL11                   /*         
*S****DK          0   A   6 3WF-IS-A-COL12                   /*         
*S****DK          0   A   6 3WF-IS-A-COL13                   /*         
*S****DK          0   A   6 3WF-IS-A-COL14                   /*         
*S****DK          0   A   6 3WF-IS-A-COL15                   /*         
*S****DK          0   A   6 3WF-IS-A-COL16                   /*         
*S****DK          0   A   6 3WF-IS-A-COL17                   /*         
*S****DK          0   A   6 3WF-IS-A-COL18                   /*         
*S****DK          0   A   6 3WF-IS-A-COL19                   /*         
*S****DK          0   A   6 3WF-IS-A-COL20                   /*         
*S****DK          0   A   1 3WF-IS-S-CONSENT                 /*         
*S****DK          0   A   1 3WF-IS-S-SGN                     /*         
*S****DK          0   A   8 3WF-IS-S-SGN-DATE                /*         
*S****DK          0   A  50 3WF-IS-FILLER3                   /*         
*S****C           0   * 
*S****C           0   * Student Spouse Demographic,         
*S****C           0   *   Identity, and Contact Information 
*S****C           0   * 
*S****DK          0   A  35 3WF-IS-SP-NM-FIRST               /*         
*S****DK          0   A  15 3WF-IS-SP-NM-MIDDLE              /*         
*S****DK          0   A  35 3WF-IS-SP-NM-LAST                /*         
*S****DK          0   A  10 3WF-IS-SP-SUFFIX                 /*         
*S****DK          0   A   8 3WF-IS-SP-DOB                    /*         
*S****DK          0   A   9 3WF-IS-SP-SSN                    /*         
*S****DK          0   A   9 3WF-IS-SP-ITIN                   /*         
*S****DK          0   A  10 3WF-IS-SP-PHONE                  /*         
*S****DK          0   A  50 3WF-IS-SP-EMAIL                  /*         
*S****DK          0   A  40 3WF-IS-SP-AD-STRT                /*         
*S****DK          0   A  30 3WF-IS-SP-AD-CITY                /*         
*S****DK          0   A   2 3WF-IS-SP-AD-STATE               /*         
*S****DK          0   A  10 3WF-IS-SP-AD-ZIP                 /*         
*S****DK          0   A   2 3WF-IS-SP-AD-COUNTRY             /*         
*S****C           0   * 
*S****C           0   * Student Spouse Manually Entered     
*S****C           0   *   Financial Information,
*S****C           0   *   Consent, and Sign     
*S****C           0   * 
*S****DK          0   A   1 3WF-IS-SP-1040R                  /*         
*S****DK          0   A   1 3WF-IS-SP-NON-US                 /*         
*S****DK          0   A   1 3WF-IS-SP-FILE-STAT              /*         
*S****DK          0   A  11 3WF-IS-SP-INC                    /*         
*S****DK          0   A  11 3WF-IS-SP-U-INT                  /*         
*S****DK          0   A  11 3WF-IS-SP-U-DST-IRA              /*         
*S****DK          0   A  11 3WF-IS-SP-U-ROLL-IRA             /*         
*S****DK          0   A  11 3WF-IS-SP-U-DST-PEN              /*         
*S****DK          0   A  11 3WF-IS-SP-U-ROLL-PEN             /*         
*S****DK          0   A  10 3WF-IS-SP-AGI                    /*         
*S****DK          0   A   9 3WF-IS-SP-FED-TAX                /*         
*S****DK          0   A  11 3WF-IS-SP-DED-PAY                /*         
*S****DK          0   A   9 3WF-IS-SP-EDCR                   /*         
*S****DK          0   A   1 3WF-IS-SP-ABD-EFH                /*         
*S****DK          0   A  12 3WF-IS-SP-SCHEDC-AMT             /*         
*S****DK          0   A  10 3WF-IS-SP-FGN-INC-EXC            /*         
*S****DK          0   A   1 3WF-IS-SP-CONSENT                /*         
*S****DK          0   A   1 3WF-IS-SP-SGN                    /*         
*S****DK          0   A   8 3WF-IS-SP-SGN-DATE               /*         
*S****DK          0   A  50 3WF-IS-FILLER4                   /*         
*S****C           0   * 
*S****C           0   * Parent1 Demographic, Identity,      
*S****C           0   *   and Contact Information           
*S****C           0   * 
*S****DK          0   A35   3WF-IS-P1-NM-FIRST  
*S****DK          0   A15   3WF-IS-P1-NM-MIDDLE 
*S****DK          0   A35   3WF-IS-P1-NM-LAST   
*S****DK          0   A  10 3WF-IS-P1-SUFFIX                 /*         
*S****DK          0   A   8 3WF-IS-P1-DOB                    /*         
*S****DK          0   A   9 3WF-IS-P1-SSN                    /*         
*S****DK          0   A   9 3WF-IS-P1-ITIN                   /*         
*S****DK          0   A  10 3WF-IS-P1-PHONE                  /*         
*S****DK          0   A  50 3WF-IS-P1-EMAIL                  /*         
*S****DK          0   A  40 3WF-IS-P1-AD-STRT                /*         
*S****DK          0   A  30 3WF-IS-P1-AD-CITY                /*         
*S****DK          0   A   2 3WF-IS-P1-AD-STATE               /*         
*S****DK          0   A  10 3WF-IS-P1-AD-ZIP                 /*         
*S****DK          0   A   2 3WF-IS-P1-AD-COUNTRY             /*         
*S****C           0   * 
*S****C           0   * Parent1 Non-Financial Information   
*S****C           0   * 
*S****DK          0   A   1 3WF-IS-P1-MAR                    /*         
*S****DK          0   A   2 3WF-IS-P1-RES                    /*         
*S****DK          0   A   6 3WF-IS-P1-RES-DATE               /*         
*S****DK          0   A   2 3WF-IS-P1-FAM-SIZE               /*         
*S****DK          0   A   2 3WF-IS-P1-FAM-COL                /*         
*S****C           0   * 
*S****C           0   * Parent1 Manually Entered Financial  
*S****C           0   *   Information, Consent, 
*S****C           0   *     and Signature       
*S****C           0   * 
*S****DK          0   A   1 3WF-IS-P1-MT-EITC                /*         
*S****DK          0   A   1 3WF-IS-P1-MT-HOME                /*         
*S****DK          0   A   1 3WF-IS-P1-MT-LUNCH               /*         
*S****DK          0   A   1 3WF-IS-P1-MT-MEDC                /*         
*S****DK          0   A   1 3WF-IS-P1-MT-36B                 /*         
*S****DK          0   A   1 3WF-IS-P1-MT-SNAP                /*         
*S****DK          0   A   1 3WF-IS-P1-MT-SSI                 /*         
*S****DK          0   A   1 3WF-IS-P1-MT-TANF                /*         
*S****DK          0   A   1 3WF-IS-P1-MT-WIC                 /*         
*S****DK          0   A   1 3WF-IS-P1-MT-NONE                /*         
*S****DK          0   A1    3WF-IS-P1-1040R     
*S****DK          0   A1    3WF-IS-P1-NON-US    
*S****DK          0   A   1 3WF-IS-P1-JOINT                  /*         
*S****DK          0   A   1 3WF-IS-P1-FILE-STAT              /*         
*S****DK          0   A  11 3WF-IS-P1-INC                    /*         
*S****DK          0   A  11 3WF-IS-P1-U-INT                  /*         
*S****DK          0   A  11 3WF-IS-P1-U-DST-IRA              /*         
*S****DK          0   A  11 3WF-IS-P1-U-ROLL-IRA             /*         
*S****DK          0   A  11 3WF-IS-P1-U-DST-PEN              /*         
*S****DK          0   A  11 3WF-IS-P1-U-ROLL-PEN             /*         
*S****DK          0   A  10 3WF-IS-P1-AGI                    /*         
*S****DK          0   A   9 3WF-IS-P1-FED-TAX                /*         
*S****DK          0   A   1 3WF-IS-P1-TAX-CREDIT             /*         
*S****DK          0   A  11 3WF-IS-P1-DED-PAY                /*         
*S****DK          0   A   9 3WF-IS-P1-EDCR                   /*         
*S****DK          0   A   1 3WF-IS-P1-ABD-EFH                /*         
*S****DK          0   A  12 3WF-IS-P1-SCHEDC-AMT             /*         
*S****DK          0   A   7 3WF-IS-P1-GRANT                  /*         
*S****DK          0   A  10 3WF-IS-P1-FGN-INC-EXC            /*         
*S****DK          0   A   7 3WF-IS-P1-U-CSUP                 /*         
*S****DK          0   A   7 3WF-IS-P1-CASH                   /*         
*S****DK          0   A   7 3WF-IS-P1-INV                    /*         
*S****DK          0   A   7 3WF-IS-P1-BUS-FRM                /*         
*S****DK          0   A   1 3WF-IS-P1-CONSENT                /*         
*S****DK          0   A   1 3WF-IS-P1-SGN                    /*         
*S****DK          0   A   8 3WF-IS-P1-SGN-DATE               /*         
*S****DK          0   A  50 3WF-IS-FILLER5                   /*         
*S****C           0   * 
*S****C           0   * Parent Spouse or Partner Demographic,           
*S****C           0   *   Identity, and Contact Information 
*S****C           0   * 
*S****DK          0   A  35 3WF-IS-P2-NM-FIRST               /*         
*S****DK          0   A  15 3WF-IS-P2-NM-MIDDLE              /*         
*S****DK          0   A  35 3WF-IS-P2-NM-LAST                /*         
*S****DK          0   A  10 3WF-IS-P2-SUFFIX                 /*         
*S****DK          0   A   8 3WF-IS-P2-DOB                    /*         
*S****DK          0   A   9 3WF-IS-P2-SSN                    /*         
*S****DK          0   A   9 3WF-IS-P2-ITIN                   /*         
*S****DK          0   A  10 3WF-IS-P2-PHONE                  /*         
*S****DK          0   A  50 3WF-IS-P2-EMAIL                  /*         
*S****DK          0   A  40 3WF-IS-P2-AD-STRT                /*         
*S****DK          0   A  30 3WF-IS-P2-AD-CITY                /*         
*S****DK          0   A   2 3WF-IS-P2-AD-STATE               /*         
*S****DK          0   A  10 3WF-IS-P2-AD-ZIP                 /*         
*S****DK          0   A   2 3WF-IS-P2-AD-COUNTRY             /*         
*S****C           0   * 
*S****C           0   * Parent Spouse or Partner Manually Entered       
*S****C           0   *    Financial Information, Consent   
*S****C           0   * 
*S****DK          0   A   1 3WF-IS-P2-1040R                  /*         
*S****DK          0   A   1 3WF-IS-P2-NON-US                 /*         
*S****DK          0   A   1 3WF-IS-P2-FILE-STAT              /*         
*S****DK          0   A  11 3WF-IS-P2-INC                    /*         
*S****DK          0   A  11 3WF-IS-P2-U-INT                  /*         
*S****DK          0   A  11 3WF-IS-P2-U-DST-IRA              /*         
*S****DK          0   A  11 3WF-IS-P2-U-ROLL-IRA             /*         
*S****DK          0   A  11 3WF-IS-P2-U-DST-PEN              /*         
*S****DK          0   A  11 3WF-IS-P2-U-ROLL-PEN             /*         
*S****DK          0   A  10 3WF-IS-P2-AGI                    /*         
*S****DK          0   A   9 3WF-IS-P2-FED-TAX                /*         
*S****DK          0   A  11 3WF-IS-P2-DED-PAY                /*         
*S****DK          0   A   9 3WF-IS-P2-EDCR                   /*         
*S****DK          0   A   1 3WF-IS-P2-ABD-EFH                /*         
*S****DK          0   A  12 3WF-IS-P2-SCHEDC-AMT             /*         
*S****DK          0   A  10 3WF-IS-P2-FGN-INC-EXC            /*         
*S****DK          0   A   1 3WF-IS-P2-CONSENT                /*         
*S****DK          0   A   1 3WF-IS-P2-SGN                    /*         
*S****DK          0   A   8 3WF-IS-P2-SGN-DATE               /*         
*S****DK          0   A  50 3WF-IS-FILLER6                   /*         
*S****C           0   * 
*S****C           0   * Preparer Information    
*S****C           0   *  Indicates that a preparer filled out the       
*S****C           0   *    application and provided their   
*S****C           0   * 
*S****DK          0   A  35 3WF-IS-A-PREP-FIRST              /*         
*S****DK          0   A  35 3WF-IS-A-PREP-LAST               /*         
*S****DK          0   A   9 3WF-IS-A-PREP-SSN                /*         
*S****DK          0   A   9 3WF-IS-A-PREP-EIN                /*         
*S****DK          0   A  30 3WF-IS-A-PREP-AFFL               /*         
*S****DK          0   A  40 3WF-IS-A-PREP-STRT               /*         
*S****DK          0   A  30 3WF-IS-A-PREP-CITY               /*         
*S****DK          0   A   2 3WF-IS-A-PREP-STATE              /*         
*S****DK          0   A  10 3WF-IS-A-PREP-ZIP                /*         
*S****DK          0   A   1 3WF-IS-A-PREP-SGN                /*         
*S****DK          0   A   8 3WF-IS-A-PREP-SGN-DATE           /*         
*S****DK          0   A  50 3WF-IS-FILLER7                   /*         
*S****C           0   * 
*S****C           0   *  FPS Processing Information         
*S****C           0   * 
*S****DK          0   A   1 3WF-IS-S-AFFIRM                  /*         
*S****DK          0   A   1 3WF-IS-SP-AFFIRM                 /*         
*S****DK          0   A   1 3WF-IS-P1-AFFIRM                 /*         
*S****DK          0   A   1 3WF-IS-P2-AFFIRM                 /*         
*S****DK          0   A   8 3WF-IS-S-CNST-DATE               /*         
*S****DK          0   A   8 3WF-IS-SP-CNST-DATE              /*         
*S****DK          0   A   8 3WF-IS-P1-CNST-DATE              /*         
*S****DK          0   A   8 3WF-IS-P2-CNST-DATE              /*         
*S****DK          0   A   1 3WF-IS-S-TRANU-MATCH             /*         
*S****DK          0   A   1 3WF-IS-SP-TRANU-MATCH            /*         
*S****DK          0   A   1 3WF-IS-P1-TRANU-MATCH            /*         
*S****DK          0   A   1 3WF-IS-P2-TRANU-MATCH            /*         
*S****DK          0   A   2 3WF-IS-C-COR-TRAN                /*         
*S****DK          0   A   1 3WF-IS-F-PROF-JUDG               /*         
*S****DK          0   A   1 3WF-IS-F-DEP-OVR                 /*         
*S****DK          0   A   6 3WF-IS-F-COLLEGE                 /*         
*S****DK          0   A   1 3WF-IS-F-SIGN                    /*         
*S****DK          0   A   1 3WF-IS-F-IASG                    /*         
*S****DK          0   A   1 3WF-IS-C-CHILD-HERO              /*         
*S****DK          0   A   7 3WF-IS-C-ETI-DEST                /*         
*S****DK          0   A   1 3WF-IS-S-SGN-SRC                 /*         
*S****DK          0   A   1 3WF-IS-SP-SGN-SRC                /*         
*S****DK          0   A   1 3WF-IS-P1-SGN-SRC                /*         
*S****DK          0   A   1 3WF-IS-P2-SGN-SRC                /*         
*S****DK          0   A   1 3WF-IS-SPEC-HAND                 /*         
*S****DK          0   A   1 3WF-IS-C-ADDR-CHG                /*         
*S****DK          0   A   1 3WF-IS-C-PUSHED                  /*         
*S****DK          0   A   1 3WF-IS-C-REJ-CHG                 /*         
*S****DK          0   A   2 3WF-IS-C-VER-TRACK               /*         
*S****DK          0   A   1 3WF-IS-C-VER                     /*         
*S****DK          0   A   1 3WF-IS-INCARCERATED              /*         
*S****DK          0   A   2 3WF-IS-C-NSLDS-TRAN              /*         
*S****DK          0   A   1 3WF-IS-C-VER-NSL                 /*         
*S****DK          0   A   1 3WF-IS-C-MATCH-HS                /*         
*S****DK          0   A  12 3WF-IS-S-FWS                     /*         
*S****DK          0   A  12 3WF-IS-SP-FWS                    /*         
*S****DK          0   A  12 3WF-IS-P1-FWS                    /*         
*S****DK          0   A  12 3WF-IS-P2-FWS                    /*         
*S****DK          0   A240  3WF-IS-FILLER9      
*S****DK          0   A   7 3WF-IS-P1-FC1-DNW                /*         
*S****DK          0   A   7 3WF-IS-P1-FC1-NW                 /*         
*S****DK          0   A  12 3WF-IS-P1-FC1-APA                /*         
*S****DK          0   A  12 3WF-IS-P1-FC1-CA                 /*         
*S****DK          0   A   7 3WF-IS-S-FC1-NW                  /*         
*S****DK          0   A  12 3WF-IS-S-FC1-APA                 /*         
*S****DK          0   A  12 3WF-IS-S-FC1-CA                  /*         
*S****DK          0   A   3 3WF-IS-CAS-FAM-SIZE              /*         
*S****DK          0   A   3 3WF-IS-CAP-FAM-SIZE              /*         
*S****C           0   * 
*S****C           0   *  Correction, Highlight, and Verify Flags        
*S****C           0   * 
*S****DK          0   A   3 3WF-IS-CF-S-NM-FIRST             /*         
*S****DK          0   A   3 3WF-IS-CF-S-NM-MIDDLE            /*         
*S****DK          0   A   3 3WF-IS-CF-S-NM-LAST              /*         
*S****DK          0   A   3 3WF-IS-CF-S-SUFFIX               /*         
*S****DK          0   A   3 3WF-IS-CF-S-DOB                  /*         
*S****DK          0   A   3 3WF-IS-CF-S-SSN                  /*         
*S****DK          0   A   3 3WF-IS-CF-S-ITIN                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-PHONE                /*         
*S****DK          0   A   3 3WF-IS-CF-S-EMAIL                /*         
*S****DK          0   A   3 3WF-IS-CF-S-AD-STRT              /*         
*S****DK          0   A   3 3WF-IS-CF-S-AD-CITY              /*         
*S****DK          0   A   3 3WF-IS-CF-S-AD-STATE             /*         
*S****DK          0   A   3 3WF-IS-CF-S-AD-ZIP               /*         
*S****DK          0   A   3 3WF-IS-CF-S-AD-COUNTRY           /*         
*S****DK          0   A   3 3WF-IS-CF-S-MAR                  /*         
*S****DK          0   A   3 3WF-IS-CF-S-YR-COL               /*         
*S****DK          0   A   3 3WF-IS-CF-S-BACH-DEG             /*         
*S****DK          0   A   3 3WF-IS-CF-S-TCH-CERT             /*         
*S****DK          0   A   3 3WF-IS-CF-S-ACTV                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-VET                  /*         
*S****DK          0   A   3 3WF-IS-CF-S-DEP                  /*         
*S****DK          0   A   3 3WF-IS-CF-S-PAR-DECD             /*         
*S****DK          0   A   3 3WF-IS-CF-S-WARD                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-FOST                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-EMAN                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-GUAR                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-PERS-NO              /*         
*S****DK          0   A   3 3WF-IS-CF-S-UYSS                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-UGEN                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-UHS                  /*         
*S****DK          0   A   3 3WF-IS-CF-S-UTRIO                /*         
*S****DK          0   A   3 3WF-IS-CF-S-UFAA                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-UOTHER-NO            /*         
*S****DK          0   A   3 3WF-IS-CF-S-UN-CIRC              /*         
*S****DK          0   A   3 3WF-IS-CF-S-UNSUB                /*         
*S****DK          0   A   3 3WF-IS-CF-S-FAM-SIZE             /*         
*S****DK          0   A   3 3WF-IS-CF-S-FAM-COL              /*         
*S****DK          0   A   3 3WF-IS-CF-S-CIT                  /*         
*S****DK          0   A   3 3WF-IS-CF-S-ALIEN                /*         
*S****DK          0   A   3 3WF-IS-CF-S-RES                  /*         
*S****DK          0   A   3 3WF-IS-CF-S-RES-DATE             /*         
*S****DK          0   A   3 3WF-IS-CF-S-PARS-COLG            /*         
*S****DK          0   A   3 3WF-IS-CF-S-PARS-KDUTY           /*         
*S****DK          0   A   3 3WF-IS-CF-S-GED                  /*         
*S****DK          0   A   3 3WF-IS-CF-S-HS-NAME              /*         
*S****DK          0   A   3 3WF-IS-CF-S-HS-CITY              /*         
*S****DK          0   A   3 3WF-IS-CF-S-HS-STATE             /*         
*S****DK          0   A   3 3WF-IS-CF-S-HSE-NAME             /*         
*S****DK          0   A   3 3WF-IS-CF-S-HSE-STATE            /*         
*S****DK          0   A   3 3WF-IS-CF-S-EITC                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-HOME                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-LUNCH                /*         
*S****DK          0   A   3 3WF-IS-CF-S-MEDC                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-36B                  /*         
*S****DK          0   A   3 3WF-IS-CF-S-SNAP                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-SSI                  /*         
*S****DK          0   A   3 3WF-IS-CF-S-TANF                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-WIC                  /*         
*S****DK          0   A   3 3WF-IS-CF-S-NONE                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-1040R                /*         
*S****DK          0   A   3 3WF-IS-CF-S-NON-US               /*         
*S****DK          0   A   3 3WF-IS-CF-S-JOINT                /*         
*S****DK          0   A   3 3WF-IS-CF-S-FILE-STAT            /*         
*S****DK          0   A   3 3WF-IS-CF-S-INC                  /*         
*S****DK          0   A   3 3WF-IS-CF-S-U-INT                /*         
*S****DK          0   A   3 3WF-IS-CF-S-U-DST-IRA            /*         
*S****DK          0   A   3 3WF-IS-CF-S-U-ROLL-IRA           /*         
*S****DK          0   A   3 3WF-IS-CF-S-U-DST-PEN            /*         
*S****DK          0   A   3 3WF-IS-CF-S-U-ROLL-PEN           /*         
*S****DK          0   A   3 3WF-IS-CF-S-AGI                  /*         
*S****DK          0   A   3 3WF-IS-CF-S-FED-TAX              /*         
*S****DK          0   A   3 3WF-IS-CF-S-TAX-CRD              /*         
*S****DK          0   A   3 3WF-IS-CF-S-DED-PAY              /*         
*S****DK          0   A   3 3WF-IS-CF-S-EDCR                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-ABD-EFH              /*         
*S****DK          0   A   3 3WF-IS-CF-S-SCHEDC-AMT           /*         
*S****DK          0   A   3 3WF-IS-CF-S-GRNT                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-FGN-INC-EXC          /*         
*S****DK          0   A   3 3WF-IS-CF-S-CSUP                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-BUS-FRM              /*         
*S****DK          0   A   3 3WF-IS-CF-S-INV                  /*         
*S****DK          0   A   3 3WF-IS-CF-S-CASH                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL1                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL2                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL3                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL4                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL5                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL6                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL7                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL8                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL9                 /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL10                /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL11                /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL12                /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL13                /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL14                /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL15                /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL16                /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL17                /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL18                /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL19                /*         
*S****DK          0   A   3 3WF-IS-CF-S-COL20                /*         
*S****DK          0   A   3 3WF-IS-CF-S-CONSENT              /*         
*S****DK          0   A   3 3WF-IS-CF-S-SGN                  /*         
*S****DK          0   A   3 3WF-IS-CF-S-SGN-DATE             /*         
*S****DK          0   A   3 3WF-IS-CF-SP-NM-FIRST            /*         
*S****DK          0   A   3 3WF-IS-CF-SP-NM-MIDDLE           /*         
*S****DK          0   A   3 3WF-IS-CF-SP-NM-LAST             /*         
*S****DK          0   A   3 3WF-IS-CF-SP-SUFFIX              /*         
*S****DK          0   A   3 3WF-IS-CF-SP-DOB                 /*         
*S****DK          0   A   3 3WF-IS-CF-SP-SSN                 /*         
*S****DK          0   A   3 3WF-IS-CF-SP-ITIN                /*         
*S****DK          0   A   3 3WF-IS-CF-SP-PHONE               /*         
*S****DK          0   A   3 3WF-IS-CF-SP-EMAIL               /*         
*S****DK          0   A   3 3WF-IS-CF-SP-AD-STRT             /*         
*S****DK          0   A   3 3WF-IS-CF-SP-AD-CITY             /*         
*S****DK          0   A   3 3WF-IS-CF-SP-AD-STATE            /*         
*S****DK          0   A   3 3WF-IS-CF-SP-AD-ZIP              /*         
*S****DK          0   A   3 3WF-IS-CF-SP-COUNTRY             /*         
*S****DK          0   A   3 3WF-IS-CF-SP-1040R               /*         
*S****DK          0   A   3 3WF-IS-CF-SP-NON-US              /*         
*S****DK          0   A   3 3WF-IS-CF-SP-FILE-STAT           /*         
*S****DK          0   A   3 3WF-IS-CF-SP-INC                 /*         
*S****DK          0   A   3 3WF-IS-CF-SP-U-INT               /*         
*S****DK          0   A   3 3WF-IS-CF-SP-U-DST-IRA           /*         
*S****DK          0   A   3 3WF-IS-CF-SP-U-ROLL-IRA          /*         
*S****DK          0   A   3 3WF-IS-CF-SP-U-DST-PEN           /*         
*S****DK          0   A   3 3WF-IS-CF-SP-U-ROLL-PEN          /*         
*S****DK          0   A   3 3WF-IS-CF-SP-AGI                 /*         
*S****DK          0   A   3 3WF-IS-CF-SP-FED-TAX             /*         
*S****DK          0   A   3 3WF-IS-CF-SP-DED-PAY             /*         
*S****DK          0   A   3 3WF-IS-CF-SP-EDCR                /*         
*S****DK          0   A   3 3WF-IS-CF-SP-ABD-EFH             /*         
*S****DK          0   A   3 3WF-IS-CF-SP-SCHEDC-AMT          /*         
*S****DK          0   A   3 3WF-IS-CF-SP-FGN-INC-EXC         /*         
*S****DK          0   A   3 3WF-IS-CF-SP-CONSENT             /*         
*S****DK          0   A   3 3WF-IS-CF-SP-SGN                 /*         
*S****DK          0   A   3 3WF-IS-CF-SP-SGN-DATE            /*         
*S****DK          0   A   3 3WF-IS-CF-P1-NM-FIRST            /*         
*S****DK          0   A   3 3WF-IS-CF-P1-NM-MIDDLE           /*         
*S****DK          0   A   3 3WF-IS-CF-P1-NM-LAST             /*         
*S****DK          0   A   3 3WF-IS-CF-P1-SUFFIX              /*         
*S****DK          0   A   3 3WF-IS-CF-P1-DOB                 /*         
*S****DK          0   A   3 3WF-IS-CF-P1-SSN                 /*         
*S****DK          0   A   3 3WF-IS-CF-P1-ITIN                /*         
*S****DK          0   A   3 3WF-IS-CF-P1-PHONE               /*         
*S****DK          0   A   3 3WF-IS-CF-P1-EMAIL               /*         
*S****DK          0   A   3 3WF-IS-CF-P1-AD-STRT             /*         
*S****DK          0   A   3 3WF-IS-CF-P1-AD-CITY             /*         
*S****DK          0   A   3 3WF-IS-CF-P1-AD-STATE            /*         
*S****DK          0   A   3 3WF-IS-CF-P1-AD-ZIP              /*         
*S****DK          0   A3    3WF-IS-CF-P1-COUNTRY
*S****DK          0   A   3 3WF-IS-CF-P1-MAR                 /*         
*S****DK          0   A   3 3WF-IS-CF-P1-RES                 /*         
*S****DK          0   A   3 3WF-IS-CF-P1-RES-DATE            /*         
*S****DK          0   A   3 3WF-IS-CF-P1-FAM-SIZE            /*         
*S****DK          0   A   3 3WF-IS-CF-P1-FAM-COL             /*         
*S****DK          0   A   3 3WF-IS-CF-P1-EITC                /*         
*S****DK          0   A   3 3WF-IS-CF-P1-HOME                /*         
*S****DK          0   A   3 3WF-IS-CF-P1-LUNCH               /*         
*S****DK          0   A   3 3WF-IS-CF-P1-MEDC                /*         
*S****DK          0   A   3 3WF-IS-CF-P1-36B                 /*         
*S****DK          0   A   3 3WF-IS-CF-P1-SNAP                /*         
*S****DK          0   A   3 3WF-IS-CF-P1-SSI                 /*         
*S****DK          0   A   3 3WF-IS-CF-P1-TANF                /*         
*S****DK          0   A   3 3WF-IS-CF-P1-WIC                 /*         
*S****DK          0   A   3 3WF-IS-CF-P1-NONE                /*         
*S****DK          0   A   3 3WF-IS-CF-P1-1040R               /*         
*S****DK          0   A   3 3WF-IS-CF-P1-NON-US              /*         
*S****DK          0   A   3 3WF-IS-CF-P1-JOINT               /*         
*S****DK          0   A   3 3WF-IS-CF-P1-FILE-STAT           /*         
*S****DK          0   A   3 3WF-IS-CF-P1-INC                 /*         
*S****DK          0   A   3 3WF-IS-CF-P1-U-INT               /*         
*S****DK          0   A   3 3WF-IS-CF-P1-U-DST-IRA           /*         
*S****DK          0   A   3 3WF-IS-CF-P1-U-ROLL-IRA          /*         
*S****DK          0   A   3 3WF-IS-CF-P1-U-DST-PEN           /*         
*S****DK          0   A   3 3WF-IS-CF-P1-U-ROLL-PEN          /*         
*S****DK          0   A   3 3WF-IS-CF-P1-AGI                 /*         
*S****DK          0   A   3 3WF-IS-CF-P1-FED-TAX             /*         
*S****DK          0   A   3 3WF-IS-CF-P1-TAX-CRD             /*         
*S****DK          0   A   3 3WF-IS-CF-P1-DED-PAY             /*         
*S****DK          0   A   3 3WF-IS-CF-P1-EDCR                /*         
*S****DK          0   A   3 3WF-IS-CF-P1-ABD-EFH             /*         
*S****DK          0   A   3 3WF-IS-CF-P1-SCHEDC-AMT          /*         
*S****DK          0   A   3 3WF-IS-CF-P1-GRNT                /*         
*S****DK          0   A   3 3WF-IS-CF-P1-FGN-INC-EXC         /*         
*S****DK          0   A   3 3WF-IS-CF-P1-CSUP                /*         
*S****DK          0   A   3 3WF-IS-CF-P1-INV                 /*         
*S****DK          0   A   3 3WF-IS-CF-P1-CASH                /*         
*S****DK          0   A   3 3WF-IS-CF-P1-BUS-FRM             /*         
*S****DK          0   A   3 3WF-IS-CF-P1-CONSENT             /*         
*S****DK          0   A   3 3WF-IS-CF-P1-SGN                 /*         
*S****DK          0   A   3 3WF-IS-CF-P1-SGN-DATE            /*         
*S****DK          0   A   3 3WF-IS-CF-P2-NM-FIRST            /*         
*S****DK          0   A   3 3WF-IS-CF-P2-NM-MIDDLE           /*         
*S****DK          0   A   3 3WF-IS-CF-P2-NM-LAST             /*         
*S****DK          0   A   3 3WF-IS-CF-P2-SUFFIX              /*         
*S****DK          0   A   3 3WF-IS-CF-P2-DOB                 /*         
*S****DK          0   A   3 3WF-IS-CF-P2-SSN                 /*         
*S****DK          0   A   3 3WF-IS-CF-P2-ITIN                /*         
*S****DK          0   A   3 3WF-IS-CF-P2-PHONE               /*         
*S****DK          0   A   3 3WF-IS-CF-P2-EMAIL               /*         
*S****DK          0   A   3 3WF-IS-CF-P2-AD-STRT             /*         
*S****DK          0   A   3 3WF-IS-CF-P2-AD-CITY             /*         
*S****DK          0   A   3 3WF-IS-CF-P2-AD-STATE            /*         
*S****DK          0   A   3 3WF-IS-CF-P2-AD-ZIP              /*         
*S****DK          0   A   3 3WF-IS-CF-P2-AD-COUNTRY          /*         
*S****DK          0   A   3 3WF-IS-CF-P2-1040R               /*         
*S****DK          0   A   3 3WF-IS-CF-P2-NON-US              /*         
*S****DK          0   A   3 3WF-IS-CF-P2-FILE-STAT           /*         
*S****DK          0   A   3 3WF-IS-CF-P2-INC                 /*         
*S****DK          0   A   3 3WF-IS-CF-P2-U-INT               /*         
*S****DK          0   A   3 3WF-IS-CF-P2-U-DST-IRA           /*         
*S****DK          0   A   3 3WF-IS-CF-P2-U-ROLL-IRA          /*         
*S****DK          0   A   3 3WF-IS-CF-P2-U-DST-PEN           /*         
*S****DK          0   A   3 3WF-IS-CF-P2-U-ROLL-PEN          /*         
*S****DK          0   A   3 3WF-IS-CF-P2-AGI                 /*         
*S****DK          0   A   3 3WF-IS-CF-P2-FED-TAX             /*         
*S****DK          0   A   3 3WF-IS-CF-P2-DED-PAY             /*         
*S****DK          0   A   3 3WF-IS-CF-P2-EDCR                /*         
*S****DK          0   A   3 3WF-IS-CF-P2-ABD-EFH             /*         
*S****DK          0   A   3 3WF-IS-CF-P2-SCHEDC-AMT          /*         
*S****DK          0   A   3 3WF-IS-CF-P2-FGN-INC-EXC         /*         
*S****DK          0   A   3 3WF-IS-CF-P2-CONSENT             /*         
*S****DK          0   A   3 3WF-IS-CF-P2-SGN                 /*         
*S****DK          0   A   3 3WF-IS-CF-P2-SGN-DATE            /*         
*S****C           0   * 
*S****C           0   *  Matches and Other Processing Information       
*S****C           0   * 
*S****DK          0   A   1 3WF-IS-C-MATCH-DHS               /*         
*S****DK          0   A   1 3WF-IS-C-MATCH-DHS2              /*         
*S****DK          0   A  15 3WF-IS-C-VER-DHS                 /*         
*S****DK          0   A   1 3WF-IS-C-MATCH-NSL               /*         
*S****DK          0   A   2 3WF-IS-C-NSLDS-PS1               /*         
*S****DK          0   A   2 3WF-IS-C-NSLDS-PS2               /*         
*S****DK          0   A   2 3WF-IS-C-NSLDS-PS3               /*         
*S****DK          0   A   1 3WF-IS-C-MATCH-CIT               /*         
*S****DK          0   A   1 3WF-IS-C-S-MATCH-SSN             /*         
*S****DK          0   A   1 3WF-IS-C-SP-MATCH-SSN            /*         
*S****DK          0   A   1 3WF-IS-C-P1-MATCH-SSN            /*         
*S****DK          0   A   1 3WF-IS-C-P2-MATCH-SSN            /*         
*S****DK          0   A   1 3WF-IS-C-MATCH-VA                /*         
*S****DK          0   A   3 3WF-IS-C-COM01                   /*         
*S****DK          0   A   3 3WF-IS-C-COM02                   /*         
*S****DK          0   A   3 3WF-IS-C-COM03                   /*         
*S****DK          0   A   3 3WF-IS-C-COM04                   /*         
*S****DK          0   A   3 3WF-IS-C-COM05                   /*         
*S****DK          0   A   3 3WF-IS-C-COM06                   /*         
*S****DK          0   A   3 3WF-IS-C-COM07                   /*         
*S****DK          0   A   3 3WF-IS-C-COM08                   /*         
*S****DK          0   A   3 3WF-IS-C-COM09                   /*         
*S****DK          0   A   3 3WF-IS-C-COM10                   /*         
*S****DK          0   A   3 3WF-IS-C-COM11                   /*         
*S****DK          0   A   3 3WF-IS-C-COM12                   /*         
*S****DK          0   A   3 3WF-IS-C-COM13                   /*         
*S****DK          0   A   3 3WF-IS-C-COM14                   /*         
*S****DK          0   A   3 3WF-IS-C-COM15                   /*         
*S****DK          0   A   3 3WF-IS-C-COM16                   /*         
*S****DK          0   A   3 3WF-IS-C-COM17                   /*         
*S****DK          0   A   3 3WF-IS-C-COM18                   /*         
*S****DK          0   A   3 3WF-IS-C-COM19                   /*         
*S****DK          0   A   3 3WF-IS-C-COM20                   /*         
*S****DK          0   A   1 3WF-IS-C-DRUG-HOLD               /*         
*S****DK          0   A   1 3WF-IS-C-GRAD                    /*         
*S****DK          0   A   1 3WF-IS-C-PELL-ELIG               /*         
*S****DK          0   A   2 3WF-IS-C-REPROC-RSN              /*         
*S****DK          0   A   1 3WF-IS-C-CFLAG                   /*         
*S****DK          0   A   1 3WF-IS-C-CFLAG-CHG               /*         
*S****DK          0   A   2 3WF-IS-C-ELEC-INST               /*         
*S****DK          0   A 110 3WF-IS-C-REJ-RSNS                /*         
*S****DK          0   A   1 3WF-IS-C-ETI                     /*         
*S****DK          0   A   1 3WF-IS-C-SSN-NM-CHG              /*         
*S****DK          0   A  12 3WF-IS-C-VER-HS                  /*         
*S****DK          0   A   1 3WF-IS-C-VER-CHG                 /*         
*S****DK          0   A   5 3WF-IS-C-USER-DATA               /*         
*S****DK          0   A   1 3WF-IS-C-WORKF-PGM               /*         
*S****DK          0   A 360 3WF-IS-FILLER8                   /*         
*S****C           0   * 
*S****C           0   *  FTIM Information       
*S****C           0   * 
*S****DK          0   A  36 3WF-IS-FILLER10                  /*         
*S****C           0   * 
*S****C           0   *  Student FTI-M Information          
*S****C           0   * 
*S****DK          0   A  50 3WF-IS-FILLER11                  /*         
*S****DK          0   A  11 3WF-IS-FTI-LABEL-START           /*         
*S****DK          0   A   4 3WF-IS-FTI-S-RET-YEAR            /*         
*S****DK          0   A   1 3WF-IS-FTI-S-FILE-STAT           /*         
*S****DK          0   A  10 3WF-IS-FTI-S-AGI                 /*         
*S****DK          0   A   2 3WF-IS-FTI-S-EXE                 /*         
*S****DK          0   A   2 3WF-IS-FTI-S-DEPS                /*         
*S****DK          0   A  11 3WF-IS-FTI-S-TOT-INC             /*         
*S****DK          0   A   9 3WF-IS-FTI-S-TOT-FED-TAX         /*         
*S****DK          0   A   9 3WF-IS-FTI-S-EDCR                /*         
*S****DK          0   A  11 3WF-IS-FTI-S-DST-IRA             /*         
*S****DK          0   A  11 3WF-IS-FTI-S-DED-PAY             /*         
*S****DK          0   A  11 3WF-IS-FTI-S-U-INT               /*         
*S****DK          0   A  11 3WF-IS-FTI-S-DST-PEN             /*         
*S****DK          0   A  12 3WF-IS-FTI-S-SCHEDC-NET          /*         
*S****DK          0   A   1 3WF-IS-FTI-S-SCHEDA              /*         
*S****DK          0   A   1 3WF-IS-FTI-S-SCHEDB              /*         
*S****DK          0   A   1 3WF-IS-FTI-S-SCHEDD              /*         
*S****DK          0   A   1 3WF-IS-FTI-S-SCHEDE              /*         
*S****DK          0   A   1 3WF-IS-FTI-S-SCHEDF              /*         
*S****DK          0   A   1 3WF-IS-FTI-S-SCHEDH              /*         
*S****DK          0   A   3 3WF-IS-FTI-S-IRS-RESP            /*         
*S****C           0   * 
*S****C           0   *  Student Spouse FTI-M Information   
*S****C           0   * 
*S****DK          0   A   4 3WF-IS-FTI-SP-RET-YEAR           /*         
*S****DK          0   A   1 3WF-IS-FTI-SP-FILE-STAT          /*         
*S****DK          0   A  10 3WF-IS-FTI-SP-AGI                /*         
*S****DK          0   A   2 3WF-IS-FTI-SP-EXE                /*         
*S****DK          0   A   2 3WF-IS-FTI-SP-DEPS               /*         
*S****DK          0   A  11 3WF-IS-FTI-SP-TOT-INC            /*         
*S****DK          0   A   9 3WF-IS-FTI-SP-TOT-FED-TAX        /*         
*S****DK          0   A   9 3WF-IS-FTI-SP-EDCR               /*         
*S****DK          0   A  11 3WF-IS-FTI-SP-DST-IRA            /*         
*S****DK          0   A  11 3WF-IS-FTI-SP-DED-PAY            /*         
*S****DK          0   A  11 3WF-IS-FTI-SP-U-INT              /*         
*S****DK          0   A  11 3WF-IS-FTI-SP-DST-PEN            /*         
*S****DK          0   A  12 3WF-IS-FTI-SP-SCHEDC-NET         /*         
*S****DK          0   A   1 3WF-IS-FTI-SP-SCHEDA             /*         
*S****DK          0   A   1 3WF-IS-FTI-SP-SCHEDB             /*         
*S****DK          0   A   1 3WF-IS-FTI-SP-SCHEDD             /*         
*S****DK          0   A   1 3WF-IS-FTI-SP-SCHEDE             /*         
*S****DK          0   A   1 3WF-IS-FTI-SP-SCHEDF             /*         
*S****DK          0   A   1 3WF-IS-FTI-SP-SCHEDH             /*         
*S****DK          0   A   3 3WF-IS-FTI-SP-IRS-RESP           /*         
*S****C           0   * 
*S****C           0   *  Parent FTI-M Information           
*S****C           0   * 
*S****DK          0   A   4 3WF-IS-FTI-P1-RET-YEAR           /*         
*S****DK          0   A   1 3WF-IS-FTI-P1-FILE-STAT          /*         
*S****DK          0   A  10 3WF-IS-FTI-P1-AGI                /*         
*S****DK          0   A   2 3WF-IS-FTI-P1-EXE                /*         
*S****DK          0   A   2 3WF-IS-FTI-P1-DEPS               /*         
*S****DK          0   A  11 3WF-IS-FTI-P1-TOT-INC            /*         
*S****DK          0   A   9 3WF-IS-FTI-P1-TOT-FED-TAX        /*         
*S****DK          0   A   9 3WF-IS-FTI-P1-EDCR               /*         
*S****DK          0   A  11 3WF-IS-FTI-P1-DST-IRA            /*         
*S****DK          0   A  11 3WF-IS-FTI-P1-DED-PAY            /*         
*S****DK          0   A  11 3WF-IS-FTI-P1-U-INT              /*         
*S****DK          0   A  11 3WF-IS-FTI-P1-DST-PEN            /*         
*S****DK          0   A  12 3WF-IS-FTI-P1-SCHEDC-NET         /*         
*S****DK          0   A   1 3WF-IS-FTI-P1-SCHEDA             /*         
*S****DK          0   A   1 3WF-IS-FTI-P1-SCHEDB             /*         
*S****DK          0   A   1 3WF-IS-FTI-P1-SCHEDD             /*         
*S****DK          0   A   1 3WF-IS-FTI-P1-SCHEDE             /*         
*S****DK          0   A   1 3WF-IS-FTI-P1-SCHEDF             /*         
*S****DK          0   A   1 3WF-IS-FTI-P1-SCHEDH             /*         
*S****DK          0   A   3 3WF-IS-FTI-P1-IRS-RESP           /*         
*S****C           0   * 
*S****C           0   *  Parent Spouse or Partner FTI-M Information     
*S****C           0   * 
*S****DK          0   A   4 3WF-IS-FTI-P2-RET-YEAR           /*         
*S****DK          0   A   1 3WF-IS-FTI-P2-FILE-STAT          /*         
*S****DK          0   A  10 3WF-IS-FTI-P2-AGI                /*         
*S****DK          0   A   2 3WF-IS-FTI-P2-EXE                /*         
*S****DK          0   A   2 3WF-IS-FTI-P2-DEPS               /*         
*S****DK          0   A  11 3WF-IS-FTI-P2-TOT-INC            /*         
*S****DK          0   A   9 3WF-IS-FTI-P2-TOT-FED-TAX        /*         
*S****DK          0   A   9 3WF-IS-FTI-P2-EDCR               /*         
*S****DK          0   A  11 3WF-IS-FTI-P2-DST-IRA            /*         
*S****DK          0   A  11 3WF-IS-FTI-P2-DED-PAY            /*         
*S****DK          0   A  11 3WF-IS-FTI-P2-U-INT              /*         
*S****DK          0   A  11 3WF-IS-FTI-P2-DST-PEN            /*         
*S****DK          0   A  12 3WF-IS-FTI-P2-SCHEDC-NET         /*         
*S****DK          0   A   1 3WF-IS-FTI-P2-SCHEDA             /*         
*S****DK          0   A   1 3WF-IS-FTI-P2-SCHEDB             /*         
*S****DK          0   A   1 3WF-IS-FTI-P2-SCHEDD             /*         
*S****DK          0   A   1 3WF-IS-FTI-P2-SCHEDE             /*         
*S****DK          0   A   1 3WF-IS-FTI-P2-SCHEDF             /*         
*S****DK          0   A   1 3WF-IS-FTI-P2-SCHEDH             /*         
*S****DK          0   A   3 3WF-IS-FTI-P2-IRS-RESP           /*         
*S****DK          0   A  61 3WF-IS-FILLER12                  /*         
*S****C           0   * 
*S****C           0   *  FTIM Processing Information        
*S****C           0   * 
*S****DK          0   A  15 3WF-IS-S-TOT-INC                 /*         
*S****DK          0   A  15 3WF-IS-P-TOT-INC                 /*         
*S****DK          0   A  15 3WF-IS-FISAP-TOT-INC             /*         
*S****DK          0   A  15 3WF-IS-P1-FC1-ATI                /*         
*S****DK          0   A  15 3WF-IS-P1-FC1-PAYR               /*         
*S****DK          0   A  15 3WF-IS-P1-FC1-IPA                /*         
*S****DK          0   A  15 3WF-IS-P1-FC1-EEA                /*         
*S****DK          0   A  15 3WF-IS-P1-FC1-AI                 /*         
*S****DK          0   A  15 3WF-IS-P1-FC1-AAI                /*         
*S****DK          0   A  15 3WF-IS-P1-FC1-CONT               /*         
*S****DK          0   A  15 3WF-IS-S-FC1-PAYR                /*         
*S****DK          0   A  15 3WF-IS-S-FC1-IPA                 /*         
*S****DK          0   A  15 3WF-IS-S-FC1-NEG-AAI             /*         
*S****DK          0   A  15 3WF-IS-S-FC1-EEA                 /*         
*S****DK          0   A  15 3WF-IS-S-FC1-ATI                 /*         
*S****DK          0   A  15 3WF-IS-S-FC1-AI                  /*         
*S****DK          0   A  15 3WF-IS-S-FC1-CI                  /*         
*S****DK          0   A  15 3WF-IS-S-FC1-AAI                 /*         
*S****DK          0   A  15 3WF-IS-S-FC1-AAI-CONT            /*         
*S****DK          0   A  11 3WF-IS-FTI-LABEL-END             /*         
*S****DK          0   A  39 3WF-IS-FILLER13                  /*         
*S****C           0   * 
*S****DS          0        R2WF-ISIR
*S****DK          0   A 250 3WF-ISIR1           
*S****DK          0   A 250 3WF-ISIR2           
*S****DK          0   A 250 3WF-ISIR3           
*S****DK          0   A 250 3WF-ISIR4           
*S****DK          0   A 250 3WF-ISIR5           
*S****DK          0   A 250 3WF-ISIR6           
*S****DK          0   A 250 3WF-ISIR7           
*S****DK          0   A 250 3WF-ISIR8           
*S****DK          0   A 250 3WF-ISIR9           
*S****DK          0   A 250 3WF-ISIR10          
*S****DK          0   A 250 3WF-ISIR11          
*S****DK          0   A 250 3WF-ISIR12          
*S****DK          0   A 250 3WF-ISIR13          
*S****DK          0   A 250 3WF-ISIR14          
*S****DK          0   A 250 3WF-ISIR15          
*S****DK          0   A 250 3WF-ISIR16          
*S****DK          0   A 250 3WF-ISIR17          
*S****DK          0   A 198 3WF-ISIR18          
*S****DK          0   A 250 3WF-ISIR19          
*S****DK          0   A 250 3WF-ISIR20          
*S****DK          0   A 250 3WF-ISIR21          
*S****DK          0   A 195 3WF-ISIR22          
*C**                                FATEMP  WFISR27O                        N S   NN0000        
*D01NAT8304N FATEMP  WFISR27O                        ZWDNH   ZWDNH           S      
*D02            2026050811130002026050811130000000029791    
*D03LINUX   
*D04                 ISO_8859-1:1987
*S****SAG GENERATOR: WW-OBJECT-SUBP                   Version: 3.2.2    
*S****SAG TITLE: WFISR27O           
*S****SAG SYSTEM: FINANCIER         
*S****SAG OBJECT-DESC: Record       
*S****SAG PRIME-FILE: WF-ISIR-2627  
*S****SAG PRIME-KEY: WF-ISIR-KEY    
*S****SAG HOLD-FIELD: WW-HOLD       
*S****SAG OBJECT-PDA: WFISR27D      
*S****SAG RESTRICTED-PDA: WFISR27R  
*S****SAG DESCS(1): This subprogram performs I/O functions for the      
*S****SAG DESCS(2): WF-ISIR-2627 userview/file using the WF-ISIR-KEY    
*S****SAG DESCS(3): primary superdescriptor.    
*S*************************************************************************         
*S***       
*S***                              WolffPack    
*S***       
*S*** Subprogram: WFISR27O          
*S*** System    : FINANCIER         
*S*** Title     : WFISR27O          
*S*** Function  : This subprogram performs I/O functions for the        
*S***             WF-ISIR-2627 userview/file using the WF-ISIR-KEY      
*S***             primary superdescriptor.      
*S***       
*S***       
*S***      Copyright 1995 - 2026 WolffPack, Inc.  All rights reserved.  
*S***       
*S*************************************************************************         
*S**DEFINE DATA         
*S**  GLOBAL USING WWGDA
*S**  PARAMETER USING WWPDA         
*S***       
*S**  PARAMETER USING WFISR27D      
*S**  PARAMETER USING WFISR27R      
*S**  PARAMETER USING WWAOBJ        
*S***       
*S**  LOCAL 
*S***       
*S*** Miscellaneous local variables.
*S**  01 #CURRENT-FIELD(A32) /* Current field name being proccessed     
*S**  01 #DB-CALL(A1)        /* D=Delete, U=Update, S=Store 
*S**  01 #D1(P3)             /* Temporary indices for MU and PE         
*S**  01 #D2(P3)        
*S**  01 #OBJECT(A20) INIT<'Record'>
*S**  01 #OLD-REC(L)         /* Record existed before.      
*S**  01 #SAVE-REC(L)        /* True if record is non-null. 
*S**  01 #DISP-BACKOUT(L) INIT<TRUE>    /* Display message on BACKOUT TRANS         
*S**  01 #SAVE-MSG(A79)      /* Save previously defined messages        
*S***       
*S*** Views used to build object.   
*S***       
*S*** View for histogram on NEXT action.        
*S**  01 NEXT-VIEW VIEW OF WF-ISIR-2627         
*S**    02 WF-ISIR-KEY  
*S***       
*S*** Primary object entity.        
*S**  01 WF-ISIR-2627 VIEW OF WF-ISIR-2627      
*S**    02 WW-STUDENT-ID
*S**    02 WF-FAO       
*S**    02 WW-SYSTEM    
*S**      03 WW-HOLD    
*S**      03 WW-CDATE   
*S**      03 WW-MDATE   
*S**    02 WF-ISIR      
*S**      03 WF-IS-C-BATCH-YR       
*S**      03 WF-IS-FAFSA-UUID       
*S**      03 WF-IS-TRANS-UUID       
*S**      03 WF-IS-PERSON-UUID      
*S**      03 WF-IS-C-TRANS-NO       
*S**      03 WF-IS-C-DEP-MODEL      
*S**      03 WF-IS-C-APP-SRCE       
*S**      03 WF-IS-C-APP-RCPT-DATE  
*S**      03 WF-IS-C-TRAN-SRCE      
*S**      03 WF-IS-C-TRAN-TYPE      
*S**      03 WF-IS-C-TRAN-LANG      
*S**      03 WF-IS-C-TRAN-RCPT-DATE 
*S**      03 WF-IS-C-TRAN-PROC-DATE 
*S**      03 WF-IS-C-TRAN-STATUS    
*S**      03 WF-IS-C-RENEWAL-DATA-USED          
*S**      03 WF-IS-C-FPS-CORR-RSN   
*S**      03 WF-IS-C-SAI-CHG-FLAG   
*S**      03 WF-IS-C-SAI
*S**      03 WF-IS-C-SAI-PROV       
*S**      03 WF-IS-C-SAI-FORMULA    
*S**      03 WF-IS-C-SAI-COMP-TYPE  
*S**      03 WF-IS-C-MAX-PELL-IND   
*S**      03 WF-IS-C-MIN-PELL-IND   
*S**      03 WF-IS-ISIR-VERSION-FLAG
*S**      03 WF-IS-FILLER1          
*S**      03 WF-IS-S-NM-FIRST       
*S**      03 WF-IS-S-NM-MIDDLE      
*S**      03 WF-IS-S-NM-LAST        
*S**      03 WF-IS-S-NM-SUFFIX      
*S**      03 WF-IS-S-DOB
*S**      03 WF-IS-S-SSN
*S**      03 WF-IS-S-ITIN           
*S**      03 WF-IS-S-AD-PHONE       
*S**      03 WF-IS-S-EMAIL          
*S**      03 WF-IS-S-AD-STRT        
*S**      03 WF-IS-S-AD-CITY        
*S**      03 WF-IS-S-AD-STATE       
*S**      03 WF-IS-S-AD-ZIP         
*S**      03 WF-IS-S-AD-COUNTRY     
*S**      03 WF-IS-FILLER2          
*S**      03 WF-IS-S-MAR
*S**      03 WF-IS-S-YR-COL         
*S**      03 WF-IS-S-BACH-DEG       
*S**      03 WF-IS-S-TCH-CERT       
*S**      03 WF-IS-S-TEST-ACTV      
*S**      03 WF-IS-S-TEST-VET       
*S**      03 WF-IS-S-TEST-DEP       
*S**      03 WF-IS-S-TEST-PAR-DECD  
*S**      03 WF-IS-S-TEST-WARD      
*S**      03 WF-IS-S-TEST-FOST      
*S**      03 WF-IS-S-TEST-EMAN      
*S**      03 WF-IS-S-TEST-GUAR      
*S**      03 WF-IS-S-TEST-PERS-NO   
*S**      03 WF-IS-S-TEST-UYSS      
*S**      03 WF-IS-S-TEST-UGEN      
*S**      03 WF-IS-S-TEST-UHS       
*S**      03 WF-IS-S-TEST-UTRIO     
*S**      03 WF-IS-S-TEST-UFAA      
*S**      03 WF-IS-S-TEST-UOTHER-NO 
*S**      03 WF-IS-S-TEST-UN-CIRC   
*S**      03 WF-IS-S-TEST-UNSUB     
*S**      03 WF-IS-S-FAM-SIZE       
*S**      03 WF-IS-S-FAM-COL        
*S**      03 WF-IS-S-CIT
*S**      03 WF-IS-S-ALIEN          
*S**      03 WF-IS-S-RES
*S**      03 WF-IS-S-RES-DATE       
*S**      03 WF-IS-S-PARS-COLG      
*S**      03 WF-IS-S-PARS-KDUTY     
*S**      03 WF-IS-S-HS-GED         
*S**      03 WF-IS-S-HS-NAME        
*S**      03 WF-IS-S-HS-CITY        
*S**      03 WF-IS-S-HS-STATE       
*S**      03 WF-IS-S-HSE-NAME       
*S**      03 WF-IS-S-HSE-STATE      
*S**      03 WF-IS-S-MT-EITC        
*S**      03 WF-IS-S-MT-HOME        
*S**      03 WF-IS-S-MT-LUNCH       
*S**      03 WF-IS-S-MT-MEDC        
*S**      03 WF-IS-S-MT-36B         
*S**      03 WF-IS-S-MT-SNAP        
*S**      03 WF-IS-S-MT-SSI         
*S**      03 WF-IS-S-MT-TANF        
*S**      03 WF-IS-S-MT-WIC         
*S**      03 WF-IS-S-MT-NONE        
*S**      03 WF-IS-S-1040R          
*S**      03 WF-IS-S-NON-US         
*S**      03 WF-IS-S-JOINT          
*S**      03 WF-IS-S-FILE-STAT      
*S**      03 WF-IS-S-INC
*S**      03 WF-IS-S-U-INT          
*S**      03 WF-IS-S-U-DST-IRA      
*S**      03 WF-IS-S-U-ROLL-IRA     
*S**      03 WF-IS-S-U-DST-PEN      
*S**      03 WF-IS-S-U-ROLL-PEN     
*S**      03 WF-IS-S-AGI
*S**      03 WF-IS-S-FED-TAX        
*S**      03 WF-IS-S-TAX-CREDIT     
*S**      03 WF-IS-S-DED-PAY        
*S**      03 WF-IS-S-EDCR           
*S**      03 WF-IS-S-ABD-EFH        
*S**      03 WF-IS-S-SCHEDC-AMT     
*S**      03 WF-IS-S-GRNT           
*S**      03 WF-IS-S-FGN-INC-EXC    
*S**      03 WF-IS-S-U-CSUP         
*S**      03 WF-IS-S-CASH           
*S**      03 WF-IS-S-INV
*S**      03 WF-IS-S-BUS-FRM        
*S**      03 WF-IS-A-COL1           
*S**      03 WF-IS-A-COL2           
*S**      03 WF-IS-A-COL3           
*S**      03 WF-IS-A-COL4           
*S**      03 WF-IS-A-COL5           
*S**      03 WF-IS-A-COL6           
*S**      03 WF-IS-A-COL7           
*S**      03 WF-IS-A-COL8           
*S**      03 WF-IS-A-COL9           
*S**      03 WF-IS-A-COL10          
*S**      03 WF-IS-A-COL11          
*S**      03 WF-IS-A-COL12          
*S**      03 WF-IS-A-COL13          
*S**      03 WF-IS-A-COL14          
*S**      03 WF-IS-A-COL15          
*S**      03 WF-IS-A-COL16          
*S**      03 WF-IS-A-COL17          
*S**      03 WF-IS-A-COL18          
*S**      03 WF-IS-A-COL19          
*S**      03 WF-IS-A-COL20          
*S**      03 WF-IS-S-CONSENT        
*S**      03 WF-IS-S-SGN
*S**      03 WF-IS-S-SGN-DATE       
*S**      03 WF-IS-FILLER3          
*S**      03 WF-IS-SP-NM-FIRST      
*S**      03 WF-IS-SP-NM-MIDDLE     
*S**      03 WF-IS-SP-NM-LAST       
*S**      03 WF-IS-SP-SUFFIX        
*S**      03 WF-IS-SP-DOB           
*S**      03 WF-IS-SP-SSN           
*S**      03 WF-IS-SP-ITIN          
*S**      03 WF-IS-SP-PHONE         
*S**      03 WF-IS-SP-EMAIL         
*S**      03 WF-IS-SP-AD-STRT       
*S**      03 WF-IS-SP-AD-CITY       
*S**      03 WF-IS-SP-AD-STATE      
*S**      03 WF-IS-SP-AD-ZIP        
*S**      03 WF-IS-SP-AD-COUNTRY    
*S**      03 WF-IS-SP-1040R         
*S**      03 WF-IS-SP-NON-US        
*S**      03 WF-IS-SP-FILE-STAT     
*S**      03 WF-IS-SP-INC           
*S**      03 WF-IS-SP-U-INT         
*S**      03 WF-IS-SP-U-DST-IRA     
*S**      03 WF-IS-SP-U-ROLL-IRA    
*S**      03 WF-IS-SP-U-DST-PEN     
*S**      03 WF-IS-SP-U-ROLL-PEN    
*S**      03 WF-IS-SP-AGI           
*S**      03 WF-IS-SP-FED-TAX       
*S**      03 WF-IS-SP-DED-PAY       
*S**      03 WF-IS-SP-EDCR          
*S**      03 WF-IS-SP-ABD-EFH       
*S**      03 WF-IS-SP-SCHEDC-AMT    
*S**      03 WF-IS-SP-FGN-INC-EXC   
*S**      03 WF-IS-SP-CONSENT       
*S**      03 WF-IS-SP-SGN           
*S**      03 WF-IS-SP-SGN-DATE      
*S**      03 WF-IS-FILLER4          
*S**      03 WF-IS-P1-NM-FIRST      
*S**      03 WF-IS-P1-NM-MIDDLE     
*S**      03 WF-IS-P1-NM-LAST       
*S**      03 WF-IS-P1-SUFFIX        
*S**      03 WF-IS-P1-DOB           
*S**      03 WF-IS-P1-SSN           
*S**      03 WF-IS-P1-ITIN          
*S**      03 WF-IS-P1-PHONE         
*S**      03 WF-IS-P1-EMAIL         
*S**      03 WF-IS-P1-AD-STRT       
*S**      03 WF-IS-P1-AD-CITY       
*S**      03 WF-IS-P1-AD-STATE      
*S**      03 WF-IS-P1-AD-ZIP        
*S**      03 WF-IS-P1-AD-COUNTRY    
*S**      03 WF-IS-P1-MAR           
*S**      03 WF-IS-P1-RES           
*S**      03 WF-IS-P1-RES-DATE      
*S**      03 WF-IS-P1-FAM-SIZE      
*S**      03 WF-IS-P1-FAM-COL       
*S**      03 WF-IS-P1-MT-EITC       
*S**      03 WF-IS-P1-MT-HOME       
*S**      03 WF-IS-P1-MT-LUNCH      
*S**      03 WF-IS-P1-MT-MEDC       
*S**      03 WF-IS-P1-MT-36B        
*S**      03 WF-IS-P1-MT-SNAP       
*S**      03 WF-IS-P1-MT-SSI        
*S**      03 WF-IS-P1-MT-TANF       
*S**      03 WF-IS-P1-MT-WIC        
*S**      03 WF-IS-P1-MT-NONE       
*S**      03 WF-IS-P1-1040R         
*S**      03 WF-IS-P1-NON-US        
*S**      03 WF-IS-P1-JOINT         
*S**      03 WF-IS-P1-FILE-STAT     
*S**      03 WF-IS-P1-INC           
*S**      03 WF-IS-P1-U-INT         
*S**      03 WF-IS-P1-U-DST-IRA     
*S**      03 WF-IS-P1-U-ROLL-IRA    
*S**      03 WF-IS-P1-U-DST-PEN     
*S**      03 WF-IS-P1-U-ROLL-PEN    
*S**      03 WF-IS-P1-AGI           
*S**      03 WF-IS-P1-FED-TAX       
*S**      03 WF-IS-P1-TAX-CREDIT    
*S**      03 WF-IS-P1-DED-PAY       
*S**      03 WF-IS-P1-EDCR          
*S**      03 WF-IS-P1-ABD-EFH       
*S**      03 WF-IS-P1-SCHEDC-AMT    
*S**      03 WF-IS-P1-GRANT         
*S**      03 WF-IS-P1-FGN-INC-EXC   
*S**      03 WF-IS-P1-U-CSUP        
*S**      03 WF-IS-P1-CASH          
*S**      03 WF-IS-P1-INV           
*S**      03 WF-IS-P1-BUS-FRM       
*S**      03 WF-IS-P1-CONSENT       
*S**      03 WF-IS-P1-SGN           
*S**      03 WF-IS-P1-SGN-DATE      
*S**      03 WF-IS-FILLER5          
*S**      03 WF-IS-P2-NM-FIRST      
*S**      03 WF-IS-P2-NM-MIDDLE     
*S**      03 WF-IS-P2-NM-LAST       
*S**      03 WF-IS-P2-SUFFIX        
*S**      03 WF-IS-P2-DOB           
*S**      03 WF-IS-P2-SSN           
*S**      03 WF-IS-P2-ITIN          
*S**      03 WF-IS-P2-PHONE         
*S**      03 WF-IS-P2-EMAIL         
*S**      03 WF-IS-P2-AD-STRT       
*S**      03 WF-IS-P2-AD-CITY       
*S**      03 WF-IS-P2-AD-STATE      
*S**      03 WF-IS-P2-AD-ZIP        
*S**      03 WF-IS-P2-AD-COUNTRY    
*S**      03 WF-IS-P2-1040R         
*S**      03 WF-IS-P2-NON-US        
*S**      03 WF-IS-P2-FILE-STAT     
*S**      03 WF-IS-P2-INC           
*S**      03 WF-IS-P2-U-INT         
*S**      03 WF-IS-P2-U-DST-IRA     
*S**      03 WF-IS-P2-U-ROLL-IRA    
*S**      03 WF-IS-P2-U-DST-PEN     
*S**      03 WF-IS-P2-U-ROLL-PEN    
*S**      03 WF-IS-P2-AGI           
*S**      03 WF-IS-P2-FED-TAX       
*S**      03 WF-IS-P2-DED-PAY       
*S**      03 WF-IS-P2-EDCR          
*S**      03 WF-IS-P2-ABD-EFH       
*S**      03 WF-IS-P2-SCHEDC-AMT    
*S**      03 WF-IS-P2-FGN-INC-EXC   
*S**      03 WF-IS-P2-CONSENT       
*S**      03 WF-IS-P2-SGN           
*S**      03 WF-IS-P2-SGN-DATE      
*S**      03 WF-IS-FILLER6          
*S**      03 WF-IS-A-PREP-FIRST     
*S**      03 WF-IS-A-PREP-LAST      
*S**      03 WF-IS-A-PREP-SSN       
*S**      03 WF-IS-A-PREP-EIN       
*S**      03 WF-IS-A-PREP-AFFL      
*S**      03 WF-IS-A-PREP-STRT      
*S**      03 WF-IS-A-PREP-CITY      
*S**      03 WF-IS-A-PREP-STATE     
*S**      03 WF-IS-A-PREP-ZIP       
*S**      03 WF-IS-A-PREP-SGN       
*S**      03 WF-IS-A-PREP-SGN-DATE  
*S**      03 WF-IS-FILLER7          
*S**      03 WF-IS-S-AFFIRM         
*S**      03 WF-IS-SP-AFFIRM        
*S**      03 WF-IS-P1-AFFIRM        
*S**      03 WF-IS-P2-AFFIRM        
*S**      03 WF-IS-S-CNST-DATE      
*S**      03 WF-IS-SP-CNST-DATE     
*S**      03 WF-IS-P1-CNST-DATE     
*S**      03 WF-IS-P2-CNST-DATE     
*S**      03 WF-IS-S-TRANU-MATCH    
*S**      03 WF-IS-SP-TRANU-MATCH   
*S**      03 WF-IS-P1-TRANU-MATCH   
*S**      03 WF-IS-P2-TRANU-MATCH   
*S**      03 WF-IS-C-COR-TRAN       
*S**      03 WF-IS-F-PROF-JUDG      
*S**      03 WF-IS-F-DEP-OVR        
*S**      03 WF-IS-F-COLLEGE        
*S**      03 WF-IS-F-SIGN           
*S**      03 WF-IS-F-IASG           
*S**      03 WF-IS-C-CHILD-HERO     
*S**      03 WF-IS-C-ETI-DEST       
*S**      03 WF-IS-S-SGN-SRC        
*S**      03 WF-IS-SP-SGN-SRC       
*S**      03 WF-IS-P1-SGN-SRC       
*S**      03 WF-IS-P2-SGN-SRC       
*S**      03 WF-IS-SPEC-HAND        
*S**      03 WF-IS-C-ADDR-CHG       
*S**      03 WF-IS-C-PUSHED         
*S**      03 WF-IS-C-REJ-CHG        
*S**      03 WF-IS-C-VER-TRACK      
*S**      03 WF-IS-C-VER
*S**      03 WF-IS-INCARCERATED     
*S**      03 WF-IS-C-NSLDS-TRAN     
*S**      03 WF-IS-C-VER-NSL        
*S**      03 WF-IS-C-MATCH-HS       
*S**      03 WF-IS-S-FWS
*S**      03 WF-IS-SP-FWS           
*S**      03 WF-IS-P1-FWS           
*S**      03 WF-IS-P2-FWS           
*S**      03 WF-IS-P1-FC1-DNW       
*S**      03 WF-IS-P1-FC1-NW        
*S**      03 WF-IS-P1-FC1-APA       
*S**      03 WF-IS-P1-FC1-CA        
*S**      03 WF-IS-S-FC1-NW         
*S**      03 WF-IS-S-FC1-APA        
*S**      03 WF-IS-S-FC1-CA         
*S**      03 WF-IS-CAS-FAM-SIZE     
*S**      03 WF-IS-CAP-FAM-SIZE     
*S**      03 WF-IS-CF-S-NM-FIRST    
*S**      03 WF-IS-CF-S-NM-MIDDLE   
*S**      03 WF-IS-CF-S-NM-LAST     
*S**      03 WF-IS-CF-S-SUFFIX      
*S**      03 WF-IS-CF-S-DOB         
*S**      03 WF-IS-CF-S-SSN         
*S**      03 WF-IS-CF-S-ITIN        
*S**      03 WF-IS-CF-S-PHONE       
*S**      03 WF-IS-CF-S-EMAIL       
*S**      03 WF-IS-CF-S-AD-STRT     
*S**      03 WF-IS-CF-S-AD-CITY     
*S**      03 WF-IS-CF-S-AD-STATE    
*S**      03 WF-IS-CF-S-AD-ZIP      
*S**      03 WF-IS-CF-S-AD-COUNTRY  
*S**      03 WF-IS-CF-S-MAR         
*S**      03 WF-IS-CF-S-YR-COL      
*S**      03 WF-IS-CF-S-BACH-DEG    
*S**      03 WF-IS-CF-S-TCH-CERT    
*S**      03 WF-IS-CF-S-ACTV        
*S**      03 WF-IS-CF-S-VET         
*S**      03 WF-IS-CF-S-DEP         
*S**      03 WF-IS-CF-S-PAR-DECD    
*S**      03 WF-IS-CF-S-WARD        
*S**      03 WF-IS-CF-S-FOST        
*S**      03 WF-IS-CF-S-EMAN        
*S**      03 WF-IS-CF-S-GUAR        
*S**      03 WF-IS-CF-S-PERS-NO     
*S**      03 WF-IS-CF-S-UYSS        
*S**      03 WF-IS-CF-S-UGEN        
*S**      03 WF-IS-CF-S-UHS         
*S**      03 WF-IS-CF-S-UTRIO       
*S**      03 WF-IS-CF-S-UFAA        
*S**      03 WF-IS-CF-S-UOTHER-NO   
*S**      03 WF-IS-CF-S-UN-CIRC     
*S**      03 WF-IS-CF-S-UNSUB       
*S**      03 WF-IS-CF-S-FAM-SIZE    
*S**      03 WF-IS-CF-S-FAM-COL     
*S**      03 WF-IS-CF-S-CIT         
*S**      03 WF-IS-CF-S-ALIEN       
*S**      03 WF-IS-CF-S-RES         
*S**      03 WF-IS-CF-S-RES-DATE    
*S**      03 WF-IS-CF-S-PARS-COLG   
*S**      03 WF-IS-CF-S-PARS-KDUTY  
*S**      03 WF-IS-CF-S-GED         
*S**      03 WF-IS-CF-S-HS-NAME     
*S**      03 WF-IS-CF-S-HS-CITY     
*S**      03 WF-IS-CF-S-HS-STATE    
*S**      03 WF-IS-CF-S-HSE-NAME    
*S**      03 WF-IS-CF-S-HSE-STATE   
*S**      03 WF-IS-CF-S-EITC        
*S**      03 WF-IS-CF-S-HOME        
*S**      03 WF-IS-CF-S-LUNCH       
*S**      03 WF-IS-CF-S-MEDC        
*S**      03 WF-IS-CF-S-36B         
*S**      03 WF-IS-CF-S-SNAP        
*S**      03 WF-IS-CF-S-SSI         
*S**      03 WF-IS-CF-S-TANF        
*S**      03 WF-IS-CF-S-WIC         
*S**      03 WF-IS-CF-S-NONE        
*S**      03 WF-IS-CF-S-1040R       
*S**      03 WF-IS-CF-S-NON-US      
*S**      03 WF-IS-CF-S-JOINT       
*S**      03 WF-IS-CF-S-FILE-STAT   
*S**      03 WF-IS-CF-S-INC         
*S**      03 WF-IS-CF-S-U-INT       
*S**      03 WF-IS-CF-S-U-DST-IRA   
*S**      03 WF-IS-CF-S-U-ROLL-IRA  
*S**      03 WF-IS-CF-S-U-DST-PEN   
*S**      03 WF-IS-CF-S-U-ROLL-PEN  
*S**      03 WF-IS-CF-S-AGI         
*S**      03 WF-IS-CF-S-FED-TAX     
*S**      03 WF-IS-CF-S-TAX-CRD     
*S**      03 WF-IS-CF-S-DED-PAY     
*S**      03 WF-IS-CF-S-EDCR        
*S**      03 WF-IS-CF-S-ABD-EFH     
*S**      03 WF-IS-CF-S-SCHEDC-AMT  
*S**      03 WF-IS-CF-S-GRNT        
*S**      03 WF-IS-CF-S-FGN-INC-EXC 
*S**      03 WF-IS-CF-S-CSUP        
*S**      03 WF-IS-CF-S-BUS-FRM     
*S**      03 WF-IS-CF-S-INV         
*S**      03 WF-IS-CF-S-CASH        
*S**      03 WF-IS-CF-S-COL1        
*S**      03 WF-IS-CF-S-COL2        
*S**      03 WF-IS-CF-S-COL3        
*S**      03 WF-IS-CF-S-COL4        
*S**      03 WF-IS-CF-S-COL5        
*S**      03 WF-IS-CF-S-COL6        
*S**      03 WF-IS-CF-S-COL7        
*S**      03 WF-IS-CF-S-COL8        
*S**      03 WF-IS-CF-S-COL9        
*S**      03 WF-IS-CF-S-COL10       
*S**      03 WF-IS-CF-S-COL11       
*S**      03 WF-IS-CF-S-COL12       
*S**      03 WF-IS-CF-S-COL13       
*S**      03 WF-IS-CF-S-COL14       
*S**      03 WF-IS-CF-S-COL15       
*S**      03 WF-IS-CF-S-COL16       
*S**      03 WF-IS-CF-S-COL17       
*S**      03 WF-IS-CF-S-COL18       
*S**      03 WF-IS-CF-S-COL19       
*S**      03 WF-IS-CF-S-COL20       
*S**      03 WF-IS-CF-S-CONSENT     
*S**      03 WF-IS-CF-S-SGN         
*S**      03 WF-IS-CF-S-SGN-DATE    
*S**      03 WF-IS-CF-SP-NM-FIRST   
*S**      03 WF-IS-CF-SP-NM-MIDDLE  
*S**      03 WF-IS-CF-SP-NM-LAST    
*S**      03 WF-IS-CF-SP-SUFFIX     
*S**      03 WF-IS-CF-SP-DOB        
*S**      03 WF-IS-CF-SP-SSN        
*S**      03 WF-IS-CF-SP-ITIN       
*S**      03 WF-IS-CF-SP-PHONE      
*S**      03 WF-IS-CF-SP-EMAIL      
*S**      03 WF-IS-CF-SP-AD-STRT    
*S**      03 WF-IS-CF-SP-AD-CITY    
*S**      03 WF-IS-CF-SP-AD-STATE   
*S**      03 WF-IS-CF-SP-AD-ZIP     
*S**      03 WF-IS-CF-SP-COUNTRY    
*S**      03 WF-IS-CF-SP-1040R      
*S**      03 WF-IS-CF-SP-NON-US     
*S**      03 WF-IS-CF-SP-FILE-STAT  
*S**      03 WF-IS-CF-SP-INC        
*S**      03 WF-IS-CF-SP-U-INT      
*S**      03 WF-IS-CF-SP-U-DST-IRA  
*S**      03 WF-IS-CF-SP-U-ROLL-IRA 
*S**      03 WF-IS-CF-SP-U-DST-PEN  
*S**      03 WF-IS-CF-SP-U-ROLL-PEN 
*S**      03 WF-IS-CF-SP-AGI        
*S**      03 WF-IS-CF-SP-FED-TAX    
*S**      03 WF-IS-CF-SP-DED-PAY    
*S**      03 WF-IS-CF-SP-EDCR       
*S**      03 WF-IS-CF-SP-ABD-EFH    
*S**      03 WF-IS-CF-SP-SCHEDC-AMT 
*S**      03 WF-IS-CF-SP-FGN-INC-EXC
*S**      03 WF-IS-CF-SP-CONSENT    
*S**      03 WF-IS-CF-SP-SGN        
*S**      03 WF-IS-CF-SP-SGN-DATE   
*S**      03 WF-IS-CF-P1-NM-FIRST   
*S**      03 WF-IS-CF-P1-NM-MIDDLE  
*S**      03 WF-IS-CF-P1-NM-LAST    
*S**      03 WF-IS-CF-P1-SUFFIX     
*S**      03 WF-IS-CF-P1-DOB        
*S**      03 WF-IS-CF-P1-SSN        
*S**      03 WF-IS-CF-P1-ITIN       
*S**      03 WF-IS-CF-P1-PHONE      
*S**      03 WF-IS-CF-P1-EMAIL      
*S**      03 WF-IS-CF-P1-AD-STRT    
*S**      03 WF-IS-CF-P1-AD-CITY    
*S**      03 WF-IS-CF-P1-AD-STATE   
*S**      03 WF-IS-CF-P1-AD-ZIP     
*S**      03 WF-IS-CF-P1-COUNTRY    
*S**      03 WF-IS-CF-P1-MAR        
*S**      03 WF-IS-CF-P1-RES        
*S**      03 WF-IS-CF-P1-RES-DATE   
*S**      03 WF-IS-CF-P1-FAM-SIZE   
*S**      03 WF-IS-CF-P1-FAM-COL    
*S**      03 WF-IS-CF-P1-EITC       
*S**      03 WF-IS-CF-P1-HOME       
*S**      03 WF-IS-CF-P1-LUNCH      
*S**      03 WF-IS-CF-P1-MEDC       
*S**      03 WF-IS-CF-P1-36B        
*S**      03 WF-IS-CF-P1-SNAP       
*S**      03 WF-IS-CF-P1-SSI        
*S**      03 WF-IS-CF-P1-TANF       
*S**      03 WF-IS-CF-P1-WIC        
*S**      03 WF-IS-CF-P1-NONE       
*S**      03 WF-IS-CF-P1-1040R      
*S**      03 WF-IS-CF-P1-NON-US     
*S**      03 WF-IS-CF-P1-JOINT      
*S**      03 WF-IS-CF-P1-FILE-STAT  
*S**      03 WF-IS-CF-P1-INC        
*S**      03 WF-IS-CF-P1-U-INT      
*S**      03 WF-IS-CF-P1-U-DST-IRA  
*S**      03 WF-IS-CF-P1-U-ROLL-IRA 
*S**      03 WF-IS-CF-P1-U-DST-PEN  
*S**      03 WF-IS-CF-P1-U-ROLL-PEN 
*S**      03 WF-IS-CF-P1-AGI        
*S**      03 WF-IS-CF-P1-FED-TAX    
*S**      03 WF-IS-CF-P1-TAX-CRD    
*S**      03 WF-IS-CF-P1-DED-PAY    
*S**      03 WF-IS-CF-P1-EDCR       
*S**      03 WF-IS-CF-P1-ABD-EFH    
*S**      03 WF-IS-CF-P1-SCHEDC-AMT 
*S**      03 WF-IS-CF-P1-GRNT       
*S**      03 WF-IS-CF-P1-FGN-INC-EXC
*S**      03 WF-IS-CF-P1-CSUP       
*S**      03 WF-IS-CF-P1-INV        
*S**      03 WF-IS-CF-P1-CASH       
*S**      03 WF-IS-CF-P1-BUS-FRM    
*S**      03 WF-IS-CF-P1-CONSENT    
*S**      03 WF-IS-CF-P1-SGN        
*S**      03 WF-IS-CF-P1-SGN-DATE   
*S**      03 WF-IS-CF-P2-NM-FIRST   
*S**      03 WF-IS-CF-P2-NM-MIDDLE  
*S**      03 WF-IS-CF-P2-NM-LAST    
*S**      03 WF-IS-CF-P2-SUFFIX     
*S**      03 WF-IS-CF-P2-DOB        
*S**      03 WF-IS-CF-P2-SSN        
*S**      03 WF-IS-CF-P2-ITIN       
*S**      03 WF-IS-CF-P2-PHONE      
*S**      03 WF-IS-CF-P2-EMAIL      
*S**      03 WF-IS-CF-P2-AD-STRT    
*S**      03 WF-IS-CF-P2-AD-CITY    
*S**      03 WF-IS-CF-P2-AD-STATE   
*S**      03 WF-IS-CF-P2-AD-ZIP     
*S**      03 WF-IS-CF-P2-AD-COUNTRY 
*S**      03 WF-IS-CF-P2-1040R      
*S**      03 WF-IS-CF-P2-NON-US     
*S**      03 WF-IS-CF-P2-FILE-STAT  
*S**      03 WF-IS-CF-P2-INC        
*S**      03 WF-IS-CF-P2-U-INT      
*S**      03 WF-IS-CF-P2-U-DST-IRA  
*S**      03 WF-IS-CF-P2-U-ROLL-IRA 
*S**      03 WF-IS-CF-P2-U-DST-PEN  
*S**      03 WF-IS-CF-P2-U-ROLL-PEN 
*S**      03 WF-IS-CF-P2-AGI        
*S**      03 WF-IS-CF-P2-FED-TAX    
*S**      03 WF-IS-CF-P2-DED-PAY    
*S**      03 WF-IS-CF-P2-EDCR       
*S**      03 WF-IS-CF-P2-ABD-EFH    
*S**      03 WF-IS-CF-P2-SCHEDC-AMT 
*S**      03 WF-IS-CF-P2-FGN-INC-EXC
*S**      03 WF-IS-CF-P2-CONSENT    
*S**      03 WF-IS-CF-P2-SGN        
*S**      03 WF-IS-CF-P2-SGN-DATE   
*S**      03 WF-IS-C-MATCH-DHS      
*S**      03 WF-IS-C-MATCH-DHS2     
*S**      03 WF-IS-C-VER-DHS        
*S**      03 WF-IS-C-MATCH-NSL      
*S**      03 WF-IS-C-NSLDS-PS1      
*S**      03 WF-IS-C-NSLDS-PS2      
*S**      03 WF-IS-C-NSLDS-PS3      
*S**      03 WF-IS-C-MATCH-CIT      
*S**      03 WF-IS-C-S-MATCH-SSN    
*S**      03 WF-IS-C-SP-MATCH-SSN   
*S**      03 WF-IS-C-P1-MATCH-SSN   
*S**      03 WF-IS-C-P2-MATCH-SSN   
*S**      03 WF-IS-C-MATCH-VA       
*S**      03 WF-IS-C-COM01          
*S**      03 WF-IS-C-COM02          
*S**      03 WF-IS-C-COM03          
*S**      03 WF-IS-C-COM04          
*S**      03 WF-IS-C-COM05          
*S**      03 WF-IS-C-COM06          
*S**      03 WF-IS-C-COM07          
*S**      03 WF-IS-C-COM08          
*S**      03 WF-IS-C-COM09          
*S**      03 WF-IS-C-COM10          
*S**      03 WF-IS-C-COM11          
*S**      03 WF-IS-C-COM12          
*S**      03 WF-IS-C-COM13          
*S**      03 WF-IS-C-COM14          
*S**      03 WF-IS-C-COM15          
*S**      03 WF-IS-C-COM16          
*S**      03 WF-IS-C-COM17          
*S**      03 WF-IS-C-COM18          
*S**      03 WF-IS-C-COM19          
*S**      03 WF-IS-C-COM20          
*S**      03 WF-IS-C-DRUG-HOLD      
*S**      03 WF-IS-C-GRAD           
*S**      03 WF-IS-C-PELL-ELIG      
*S**      03 WF-IS-C-REPROC-RSN     
*S**      03 WF-IS-C-CFLAG          
*S**      03 WF-IS-C-CFLAG-CHG      
*S**      03 WF-IS-C-ELEC-INST      
*S**      03 WF-IS-C-REJ-RSNS       
*S**      03 WF-IS-C-ETI
*S**      03 WF-IS-C-SSN-NM-CHG     
*S**      03 WF-IS-C-VER-HS         
*S**      03 WF-IS-C-VER-CHG        
*S**      03 WF-IS-C-USER-DATA      
*S**      03 WF-IS-WORKF-PGM        
*S**      03 WF-IS-FILLER8A         
*S**      03 WF-IS-FILLER8B         
*S**      03 WF-IS-L-NSLDS1         
*S**      03 WF-IS-L-NSLDS2         
*S**      03 WF-IS-L-NSLDS3         
*S**      03 WF-IS-L-NSLDS4         
*S**      03 WF-IS-L-NSLDS5         
*S**      03 WF-IS-L-NSLDS6         
*S**      03 WF-IS-L-NSLDS7         
*S**      03 WF-IS-L-NSLDS8         
*S**      03 WF-IS-L-NSLDS9         
*S**      03 WF-IS-L-NSLDS10        
*S**      03 WF-IS-L-NSLDS11        
*S**      03 WF-IS-FILLER10         
*S**      03 WF-IS-FILLER11         
*S**      03 WF-IS-FTI-LABEL-START  
*S**      03 WF-IS-FTI-S-RET-YEAR   
*S**      03 WF-IS-FTI-S-FILE-STAT  
*S**      03 WF-IS-FTI-S-AGI        
*S**      03 WF-IS-FTI-S-EXE        
*S**      03 WF-IS-FTI-S-DEPS       
*S**      03 WF-IS-FTI-S-TOT-INC    
*S**      03 WF-IS-FTI-S-TOT-FED-TAX
*S**      03 WF-IS-FTI-S-EDCR       
*S**      03 WF-IS-FTI-S-DST-IRA    
*S**      03 WF-IS-FTI-S-DED-PAY    
*S**      03 WF-IS-FTI-S-U-INT      
*S**      03 WF-IS-FTI-S-DST-PEN    
*S**      03 WF-IS-FTI-S-SCHEDC-NET 
*S**      03 WF-IS-FTI-S-SCHEDA     
*S**      03 WF-IS-FTI-S-SCHEDB     
*S**      03 WF-IS-FTI-S-SCHEDD     
*S**      03 WF-IS-FTI-S-SCHEDE     
*S**      03 WF-IS-FTI-S-SCHEDF     
*S**      03 WF-IS-FTI-S-SCHEDH     
*S**      03 WF-IS-FTI-S-IRS-RESP   
*S**      03 WF-IS-FTI-SP-RET-YEAR  
*S**      03 WF-IS-FTI-SP-FILE-STAT 
*S**      03 WF-IS-FTI-SP-AGI       
*S**      03 WF-IS-FTI-SP-EXE       
*S**      03 WF-IS-FTI-SP-DEPS      
*S**      03 WF-IS-FTI-SP-TOT-INC   
*S**      03 WF-IS-FTI-SP-TOT-FED-TAX           
*S**      03 WF-IS-FTI-SP-EDCR      
*S**      03 WF-IS-FTI-SP-DST-IRA   
*S**      03 WF-IS-FTI-SP-DED-PAY   
*S**      03 WF-IS-FTI-SP-U-INT     
*S**      03 WF-IS-FTI-SP-DST-PEN   
*S**      03 WF-IS-FTI-SP-SCHEDC-NET
*S**      03 WF-IS-FTI-SP-SCHEDA    
*S**      03 WF-IS-FTI-SP-SCHEDB    
*S**      03 WF-IS-FTI-SP-SCHEDD    
*S**      03 WF-IS-FTI-SP-SCHEDE    
*S**      03 WF-IS-FTI-SP-SCHEDF    
*S**      03 WF-IS-FTI-SP-SCHEDH    
*S**      03 WF-IS-FTI-SP-IRS-RESP  
*S**      03 WF-IS-FTI-P1-RET-YEAR  
*S**      03 WF-IS-FTI-P1-FILE-STAT 
*S**      03 WF-IS-FTI-P1-AGI       
*S**      03 WF-IS-FTI-P1-EXE       
*S**      03 WF-IS-FTI-P1-DEPS      
*S**      03 WF-IS-FTI-P1-TOT-INC   
*S**      03 WF-IS-FTI-P1-TOT-FED-TAX           
*S**      03 WF-IS-FTI-P1-EDCR      
*S**      03 WF-IS-FTI-P1-DST-IRA   
*S**      03 WF-IS-FTI-P1-DED-PAY   
*S**      03 WF-IS-FTI-P1-U-INT     
*S**      03 WF-IS-FTI-P1-DST-PEN   
*S**      03 WF-IS-FTI-P1-SCHEDC-NET
*S**      03 WF-IS-FTI-P1-SCHEDA    
*S**      03 WF-IS-FTI-P1-SCHEDB    
*S**      03 WF-IS-FTI-P1-SCHEDD    
*S**      03 WF-IS-FTI-P1-SCHEDE    
*S**      03 WF-IS-FTI-P1-SCHEDF    
*S**      03 WF-IS-FTI-P1-SCHEDH    
*S**      03 WF-IS-FTI-P1-IRS-RESP  
*S**      03 WF-IS-FTI-P2-RET-YEAR  
*S**      03 WF-IS-FTI-P2-FILE-STAT 
*S**      03 WF-IS-FTI-P2-AGI       
*S**      03 WF-IS-FTI-P2-EXE       
*S**      03 WF-IS-FTI-P2-DEPS      
*S**      03 WF-IS-FTI-P2-TOT-INC   
*S**      03 WF-IS-FTI-P2-TOT-FED-TAX           
*S**      03 WF-IS-FTI-P2-EDCR      
*S**      03 WF-IS-FTI-P2-DST-IRA   
*S**      03 WF-IS-FTI-P2-DED-PAY   
*S**      03 WF-IS-FTI-P2-U-INT     
*S**      03 WF-IS-FTI-P2-DST-PEN   
*S**      03 WF-IS-FTI-P2-SCHEDC-NET
*S**      03 WF-IS-FTI-P2-SCHEDA    
*S**      03 WF-IS-FTI-P2-SCHEDB    
*S**      03 WF-IS-FTI-P2-SCHEDD    
*S**      03 WF-IS-FTI-P2-SCHEDE    
*S**      03 WF-IS-FTI-P2-SCHEDF    
*S**      03 WF-IS-FTI-P2-SCHEDH    
*S**      03 WF-IS-FTI-P2-IRS-RESP  
*S**      03 WF-IS-FILLER12         
*S**      03 WF-IS-S-TOT-INC        
*S**      03 WF-IS-P-TOT-INC        
*S**      03 WF-IS-FISAP-TOT-INC    
*S**      03 WF-IS-P1-FC1-ATI       
*S**      03 WF-IS-P1-FC1-PAYR      
*S**      03 WF-IS-P1-FC1-IPA       
*S**      03 WF-IS-P1-FC1-EEA       
*S**      03 WF-IS-P1-FC1-AI        
*S**      03 WF-IS-P1-FC1-AAI       
*S**      03 WF-IS-P1-FC1-CONT      
*S**      03 WF-IS-S-FC1-PAYR       
*S**      03 WF-IS-S-FC1-IPA        
*S**      03 WF-IS-S-FC1-NEG-AAI    
*S**      03 WF-IS-S-FC1-EEA        
*S**      03 WF-IS-S-FC1-ATI        
*S**      03 WF-IS-S-FC1-AI         
*S**      03 WF-IS-S-FC1-CI         
*S**      03 WF-IS-S-FC1-AAI        
*S**      03 WF-IS-S-FC1-AAI-CONT   
*S**      03 WF-IS-FTI-LABEL-END    
*S**      03 WF-IS-FILLER13         
*S**END-DEFINE          
*S***       
*S***       
*S*** Populate WW-GDA from WW-PDA   
*S**MOVE BY POSITION WW-PDA TO WW-GDA           
*S***       
*S***       
*S*** Initialize output fields.     
*S**ASSIGN #SAVE-MSG = ##MSG        
*S**RESET WWAOBJ.OUTPUTS ##MSG ##MSG-DATA(*) ##RETURN-CODE  
*S***       
*S*** Build up prime key of the object.         
*S**MOVE BY NAME WFISR27D TO WFISR27D-ID.STRUCTURE          
*S***       
*S*************************************************************************         
*S***       
*S*** Set up repeat to allow escape from within a subroutine.           
*S**PROG.   
*S**REPEAT  
*S***       
*S*** Decide what to do based on function supplied.         
*S**  DECIDE ON FIRST VALUE WWAOBJ.#FUNCTION    
*S**    VALUE 'GET' /* Read the object          
*S**      /*
*S**      /* Object exists, get object          
*S**      PERFORM GET-OBJECT        
*S**      PERFORM SET-OBJECT-ID     
*S**    VALUE 'NEXT' /* Read the next higher object         
*S**      /*
*S**      /* Histogram for next higher value from one in object.        
*S**      HISTOGRAM(2) NEXT-VIEW FOR WF-ISIR-KEY
*S**                   STARTING FROM WFISR27D-ID
*S**        IF NEXT-VIEW.WF-ISIR-KEY NE WFISR27D-ID THEN    
*S**          ASSIGN WFISR27D-ID = NEXT-VIEW.WF-ISIR-KEY    
*S**          MOVE BY NAME WFISR27D-ID.STRUCTURE TO WFISR27D
*S**          PERFORM GET-OBJECT    
*S**          ASSIGN ##MSG-DATA(1) = #OBJECT    
*S**          ESCAPE BOTTOM         
*S**        END-IF      
*S**      END-HISTOGRAM 
*S**      /*
*S**      /* No records beyond current record.  
*S**      IF NOT WWAOBJ.#EXISTS     
*S**        ASSIGN ##MSG = 'End of data reached'
*S**        ASSIGN ##RETURN-CODE = 'W'          /* Warning. 
*S**      END-IF        
*S**    VALUE 'UPDATE','DELETE' /* Modify or purge current object       
*S**      /*
*S**      /* Make sure the record was held prior to updating.           
*S**      IF WFISR27D-ID NE WFISR27R.HELD-ID THEN           
*S**        ASSIGN ##MSG = 'Record not in held status'      
*S**        PERFORM PROCESS-ERROR   
*S**      END-IF        
*S**      PERFORM HOLD-OBJECT       
*S**      PERFORM SET-OBJECT-ID     
*S**      IF WWAOBJ.#FUNCTION = 'DELETE'        
*S**        ASSIGN ##MSG = 'Record purged successfully'     
*S**      END-IF        
*S**    VALUE 'EXISTS' /* Existence check       
*S**      PERFORM CLEAR 
*S**      PERFORM CHECK-EXISTENCE   
*S**    VALUE 'STORE' /* Add new object         
*S**      PERFORM CREATE-OBJECT     
*S**      PERFORM SET-OBJECT-ID     
*S**    VALUE 'INITIALIZE'          
*S**      PERFORM CLEAR 
*S**    ANY 
*S**      PERFORM RELOAD-MSG        
*S**      MOVE BY POSITION WW-GDA TO WW-PDA     
*S**      ESCAPE BOTTOM(PROG.) IMMEDIATE /* All done.       
*S**    NONE /* Unknown action code 
*S**      ASSIGN ##MSG-DATA(1) = #OBJECT        
*S**      ASSIGN ##MSG-DATA(2) = WWAOBJ.#FUNCTION           
*S**      ASSIGN ##MSG = 'Invalid:1:function specified::2:' 
*S**      PERFORM PROCESS-ERROR     
*S**  END-DECIDE        
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE PROCESS-ERROR 
*S*************************************************************************         
*S***       
*S**  IF ##MSG-DATA(1) = ' '               /* Set default for :1:.      
*S**    PERFORM SET-OBJECT-ID       
*S**  END-IF
*S**  ASSIGN ##RETURN-CODE = 'E' /* Error.      
*S**  IF #DISP-BACKOUT  
*S**    WRITE 'Issuing Backout transaction for action:' #FUNCTION       
*S**          / '  in subprogram' *PROGRAM      
*S**  END-IF
*S**  BACKOUT TRANSACTION           
*S**  MOVE BY POSITION WW-GDA TO WW-PDA         
*S**  ESCAPE BOTTOM(PROG.) IMMEDIATE
*S**END-SUBROUTINE /* PROCESS-ERROR 
*S***       
*S**END-REPEAT          
*S***       
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE CREATE-OBJECT 
*S*************************************************************************         
*S***       
*S**  ASSIGN WFISR27D.WW-CDATE = *DATX          
*S***       
*S*** Don't allow the key to be null.           
*S**  IF WFISR27D-ID = NEXT-VIEW.WF-ISIR-KEY /* Compare with null       
*S**    ASSIGN ##MSG-DATA(1) = #OBJECT          
*S**    ASSIGN ##MSG = ':1:identifier is required'          
*S**    PERFORM PROCESS-ERROR       
*S**  END-IF
*S**  /*    
*S**  /* If object already exist, return with error.        
*S**  PERFORM CHECK-EXISTENCE       
*S**  IF WWAOBJ.#EXISTS THEN        
*S**    ASSIGN ##MSG = ':1:already exists'      
*S**    PERFORM PROCESS-ERROR       
*S**  END-IF
*S**  PERFORM EDIT-OBJECT /* Pre-edit object header         
*S**  ASSIGN WF-ISIR-2627.WW-HOLD = *TIMN       
*S**  ASSIGN WFISR27R.INTERVENING-UPD-FLD =     
*S**    WF-ISIR-2627.WW-HOLD        
*S**  ASSIGN WFISR27R.HELD-ID = WFISR27D-ID     
*S**  STORE WF-ISIR-2627
*S**END-SUBROUTINE /* CREATE-OBJECT 
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE GET-OBJECT    
*S*************************************************************************         
*S***       
*S*** Get the primary object record.
*S**  PERFORM CLEAR     
*S**  FIND WF-ISIR-2627 WITH WF-ISIR-KEY = WFISR27D-ID      
*S**    IF NO RECORDS FOUND         
*S**      /*
*S**      /* Return the fact that the object does not exist.
*S**      ESCAPE ROUTINE
*S**    END-NOREC       
*S**    ASSIGN WWAOBJ.#EXISTS = TRUE
*S**    /*  
*S**    /* "Hold" the record by capturing the value of the update flag. 
*S**    ASSIGN WFISR27R.INTERVENING-UPD-FLD =   
*S**           WF-ISIR-2627.WW-HOLD 
*S**    /*  
*S**    /* Shift primary entity information to object       
*S**    MOVE BY NAME WF-ISIR-2627 TO WFISR27D   
*S**    ASSIGN WFISR27R.HELD-ID = WFISR27D-ID   
*S**  END-FIND          
*S**END-SUBROUTINE /* GET-OBJECT    
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE HOLD-OBJECT   
*S*************************************************************************         
*S***       
*S*** Get primary entity and process it.        
*S**  HOLD-PRIME.       
*S**  FIND WF-ISIR-2627 WITH        
*S**      WF-ISIR-KEY = WFISR27D-ID 
*S**    IF NO RECORDS FOUND         
*S**      /*
*S**      /* Trying to process an object that doesn't exist.
*S**      ASSIGN ##MSG = 'Intervening purge, please try again'          
*S**      RESET WFISR27R
*S**      PERFORM PROCESS-ERROR     
*S**    END-NOREC       
*S**    IF WFISR27R.INTERVENING-UPD-FLD NE      
*S**       WF-ISIR-2627.WW-HOLD THEN
*S**      ASSIGN ##MSG = 'Intervening update, please try again'         
*S**      RESET WFISR27R
*S**      PERFORM PROCESS-ERROR     
*S**    END-IF          
*S**    ASSIGN WWAOBJ.#EXISTS = TRUE
*S**    PERFORM EDIT-OBJECT /* Pre-edit object header       
*S**    DECIDE ON EVERY VALUE WWAOBJ.#FUNCTION  
*S**      VALUE 'UPDATE'
*S**        ASSIGN WF-ISIR-2627.WW-HOLD = *TIMN 
*S**        ASSIGN WF-ISIR-2627.WW-MDATE = *DATX
*S**        ASSIGN WFISR27R.INTERVENING-UPD-FLD =           
*S**          WF-ISIR-2627.WW-HOLD  
*S**        UPDATE(HOLD-PRIME.)     
*S**      VALUE 'DELETE'
*S**        DELETE(HOLD-PRIME.)     
*S**        RESET WFISR27R.HELD-ID  
*S**      NONE IGNORE   
*S**    END-DECIDE      
*S**  END-FIND          
*S**END-SUBROUTINE /* HOLD-OBJECT   
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE CHECK-AND-UPDATE-OBJECT /* Process all sub-entities           
*S*************************************************************************         
*S***       
*S**  ESCAPE ROUTINE /* No sub-entities         
*S**END-SUBROUTINE /* CHECK-AND-UPDATE-OBJECT   
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE EDIT-OBJECT   
*S*************************************************************************         
*S***       
*S**  IF WWAOBJ.#FUNCTION = 'UPDATE' OR = 'STORE'           
*S**    /*  
*S**    /* Load file view           
*S**    MOVE BY NAME WFISR27D TO WF-ISIR-2627   
*S**  END-IF
*S**END-SUBROUTINE /* EDIT-OBJECT   
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE CHECK-EXISTENCE           
*S*************************************************************************         
*S***       
*S*** Check whether object currently exists.    
*S**  EXISTENCE-CHECK.  
*S**  HISTOGRAM(1) NEXT-VIEW FOR WF-ISIR-KEY    
*S**               FROM WFISR27D-ID THRU WFISR27D-ID        
*S**    ASSIGN WWAOBJ.#EXISTS = TRUE
*S**  END-HISTOGRAM     
*S**END-SUBROUTINE /* CHECK-EXISTENCE           
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE CLEAR         
*S*************************************************************************         
*S***       
*S**  MOVE BY NAME WFISR27D TO WFISR27D-ID.STRUCTURE /* Capture key.    
*S**  RESET WFISR27D WFISR27R       
*S**  /*    
*S**  /* Reset redefined components whose formats differ from base field
*S*** RESET WFISR27D.WF-IS-FED-ID1  
*S**  MOVE BY NAME WFISR27D-ID.STRUCTURE TO WFISR27D /* Restore key.    
*S**END-SUBROUTINE /* CLEAR         
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE GET-DB-CALL   
*S*************************************************************************         
*S***       
*S**INCLUDE WWDBCALL    
*S**END-SUBROUTINE /* GET-DB-CALL   
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE SET-OBJECT-ID 
*S*************************************************************************         
*S***       
*S**  COMPRESS WFISR27D.WF-FAO      
*S**       '-' WFISR27D.WW-STUDENT-ID           
*S**        TO ##MSG-DATA(1) LEAVING NO         
*S**  COMPRESS #OBJECT ##MSG-DATA(1) TO ##MSG-DATA(1)       
*S**END-SUBROUTINE /* SET-OBJECT-ID 
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE RELOAD-MSG    
*S*************************************************************************         
*S***       
*S*** If no messages set in subprogram, reset passed message
*S**  IF ##MSG = ' '    
*S**    ASSIGN ##MSG = #SAVE-MSG    
*S**  END-IF
*S**END-SUBROUTINE /* RELOAD-MSG    
*S**END     
*C**                                FATEMP  WFN27TGM                        M S   NN0000        
*D01NAT8304M FATEMP  WFN27TGM                        ZWDNH   ZWDNH           S      
*D02            2026051312180202026051312180200000004978    
*D03LINUX   
*D04                 ISO_8859-1:1987
*S*** MAP2: PROTOTYPE             --- CREATED BY UNIX 8.3.4 ---         
*S*** INPUT USING MAP 'XXXXXXXX'    
*S***     WFNSL27D.WF-NS-T1-AWDYEAR WFNSL27D.WF-NS-T1-CONV  
*S***     WFNSL27D.WF-NS-T1-LEVEL WFNSL27D.WF-NS-T1-SCHOOL  
*S***     WFNSL27D.WF-NS-T1-TRAN WFNSL27D.WF-NS-T2-AWDYEAR  
*S***     WFNSL27D.WF-NS-T2-CONV WFNSL27D.WF-NS-T2-LEVEL    
*S***     WFNSL27D.WF-NS-T2-SCHOOL WFNSL27D.WF-NS-T2-TRAN   
*S***     WFNSL27D.WF-NS-T3-AWDYEAR WFNSL27D.WF-NS-T3-CONV  
*S***     WFNSL27D.WF-NS-T3-LEVEL WFNSL27D.WF-NS-T3-SCHOOL  
*S***     WFNSL27D.WF-NS-T3-TRAN WFNSL27S.WF-NS-T1-AWARD    
*S***     WFNSL27S.WF-NS-T1-DATE WFNSL27S.WF-NS-T1-PAID     
*S***     WFNSL27S.WF-NS-T1-SCH-AWD WFNSL27S.WF-NS-T2-AWARD 
*S***     WFNSL27S.WF-NS-T2-DATE WFNSL27S.WF-NS-T2-PAID     
*S***     WFNSL27S.WF-NS-T2-SCH-AWD WFNSL27S.WF-NS-T3-AWARD 
*S***     WFNSL27S.WF-NS-T3-DATE WFNSL27S.WF-NS-T3-PAID     
*S***     WFNSL27S.WF-NS-T3-SCH-AWD 
*S**DEFINE DATA PARAMETER           
*S**1 WFNSL27D.WF-NS-T1-AWDYEAR (A004)          
*S**1 WFNSL27D.WF-NS-T1-CONV (A001) 
*S**1 WFNSL27D.WF-NS-T1-LEVEL (A003)
*S**1 WFNSL27D.WF-NS-T1-SCHOOL (A008)           
*S**1 WFNSL27D.WF-NS-T1-TRAN (A002) 
*S**1 WFNSL27D.WF-NS-T2-AWDYEAR (A004)          
*S**1 WFNSL27D.WF-NS-T2-CONV (A001) 
*S**1 WFNSL27D.WF-NS-T2-LEVEL (A003)
*S**1 WFNSL27D.WF-NS-T2-SCHOOL (A008)           
*S**1 WFNSL27D.WF-NS-T2-TRAN (A002) 
*S**1 WFNSL27D.WF-NS-T3-AWDYEAR (A004)          
*S**1 WFNSL27D.WF-NS-T3-CONV (A001) 
*S**1 WFNSL27D.WF-NS-T3-LEVEL (A003)
*S**1 WFNSL27D.WF-NS-T3-SCHOOL (A008)           
*S**1 WFNSL27D.WF-NS-T3-TRAN (A002) 
*S**1 WFNSL27S.WF-NS-T1-AWARD (A007)
*S**1 WFNSL27S.WF-NS-T1-DATE (A010) 
*S**1 WFNSL27S.WF-NS-T1-PAID (A007) 
*S**1 WFNSL27S.WF-NS-T1-SCH-AWD (A007)          
*S**1 WFNSL27S.WF-NS-T2-AWARD (A007)
*S**1 WFNSL27S.WF-NS-T2-DATE (A010) 
*S**1 WFNSL27S.WF-NS-T2-PAID (A007) 
*S**1 WFNSL27S.WF-NS-T2-SCH-AWD (A007)          
*S**1 WFNSL27S.WF-NS-T3-AWARD (A007)
*S**1 WFNSL27S.WF-NS-T3-DATE (A010) 
*S**1 WFNSL27S.WF-NS-T3-PAID (A007) 
*S**1 WFNSL27S.WF-NS-T3-SCH-AWD (A007)          
*S**END-DEFINE          
*S**FORMAT PS=006 LS=074 ZP=OFF SG=OFF KD=ON  IP=OFF        
*S*** MAP2: MAP PROFILES *****************************        200***********        
*S*** .TOTOTOOOMOA NENEYEYEBLBL4YGR5YREN    ^"`+={};!@ 'WWHELPRH',=        *        
*S*** 008074        N1NNLCN____         X        01 SYSDBA  YL           1 *        
*S**************************************************************************        
*S**INPUT          (     IP=OFF      HE='WWHELPRH',=                      /*        
*S**                                                                       )        
*S**/       
*S** 002T 'School Trn Converted Cl Year'(BL)    
*S** 032T 'SchAwd'(BL)  
*S** 040T 'Award'(BL)   
*S** 049T 'Paid'(BL)    
*S** 067T 'Date'(BL)    
*S**/       
*S** 002T WFNSL27D.WF-NS-T1-SCHOOL  (AD=ODL CD=GR AL=006  /*.01U006 A008 .          
*S**      HE='WWHELPRH',= )         
*S** 010T WFNSL27D.WF-NS-T1-TRAN  (AD=ODL CD=GR /*.01U002 A002 .        
*S**      HE='WWHELPRH',= )         
*S** 018T WFNSL27D.WF-NS-T1-CONV  (AD=ODL CD=GR /*.01U001 A001 .        
*S**      HE='WWHELPRH',= )         
*S** 022T WFNSL27D.WF-NS-T1-LEVEL  (AD=ODL CD=GR /*.01U003 A003 .       
*S**      HE='WWHELPRH',= )         
*S** 026T WFNSL27D.WF-NS-T1-AWDYEAR  (AD=ODL CD=GR /*.01U004 A004 .     
*S**      HE='WWHELPRH',= )         
*S** 031T WFNSL27S.WF-NS-T1-SCH-AWD  (AD=ODL CD=GR /*.01U007 A007 .     
*S**      HE='WWHELPRH',= )         
*S** 039T WFNSL27S.WF-NS-T1-AWARD  (AD=ODL CD=GR /*.01U007 A007 .       
*S**      HE='WWHELPRH',= )         
*S** 047T WFNSL27S.WF-NS-T1-PAID  (AD=ODL CD=GR /*.01U007 A007 .        
*S**      HE='WWHELPRH',= )         
*S** 064T WFNSL27S.WF-NS-T1-DATE  (AD=ODL CD=GR /*.01U010 A010 .        
*S**      HE='WWHELPRH',= )         
*S**/       
*S** 002T WFNSL27D.WF-NS-T2-SCHOOL  (AD=ODL CD=GR AL=006  /*.01U006 A008 .          
*S**      HE='WWHELPRH',= )         
*S** 010T WFNSL27D.WF-NS-T2-TRAN  (AD=ODL CD=GR /*.01U002 A002 .        
*S**      HE='WWHELPRH',= )         
*S** 018T WFNSL27D.WF-NS-T2-CONV  (AD=ODL CD=GR /*.01U001 A001 .        
*S**      HE='WWHELPRH',= )         
*S** 022T WFNSL27D.WF-NS-T2-LEVEL  (AD=ODL CD=GR /*.01U003 A003 .       
*S**      HE='WWHELPRH',= )         
*S** 026T WFNSL27D.WF-NS-T2-AWDYEAR  (AD=ODL CD=GR /*.01U004 A004 .     
*S**      HE='WWHELPRH',= )         
*S** 031T WFNSL27S.WF-NS-T2-SCH-AWD  (AD=ODL CD=GR /*.01U007 A007 .     
*S**      HE='WWHELPRH',= )         
*S** 039T WFNSL27S.WF-NS-T2-AWARD  (AD=ODL CD=GR /*.01U007 A007 .       
*S**      HE='WWHELPRH',= )         
*S** 047T WFNSL27S.WF-NS-T2-PAID  (AD=ODL CD=GR /*.01U007 A007 .        
*S**      HE='WWHELPRH',= )         
*S** 064T WFNSL27S.WF-NS-T2-DATE  (AD=ODL CD=GR /*.01U010 A010 .        
*S**      HE='WWHELPRH',= )         
*S**/       
*S** 002T WFNSL27D.WF-NS-T3-SCHOOL  (AD=ODL CD=GR AL=006  /*.01U006 A008 .          
*S**      HE='WWHELPRH',= )         
*S** 010T WFNSL27D.WF-NS-T3-TRAN  (AD=ODL CD=GR /*.01U002 A002 .        
*S**      HE='WWHELPRH',= )         
*S** 018T WFNSL27D.WF-NS-T3-CONV  (AD=ODL CD=GR /*.01U001 A001 .        
*S**      HE='WWHELPRH',= )         
*S** 022T WFNSL27D.WF-NS-T3-LEVEL  (AD=ODL CD=GR /*.01U003 A003 .       
*S**      HE='WWHELPRH',= )         
*S** 026T WFNSL27D.WF-NS-T3-AWDYEAR  (AD=ODL CD=GR /*.01U004 A004 .     
*S**      HE='WWHELPRH',= )         
*S** 031T WFNSL27S.WF-NS-T3-SCH-AWD  (AD=ODL CD=GR /*.01U007 A007 .     
*S**      HE='WWHELPRH',= )         
*S** 039T WFNSL27S.WF-NS-T3-AWARD  (AD=ODL CD=GR /*.01U007 A007 .       
*S**      HE='WWHELPRH',= )         
*S** 047T WFNSL27S.WF-NS-T3-PAID  (AD=ODL CD=GR /*.01U007 A007 .        
*S**      HE='WWHELPRH',= )         
*S** 064T WFNSL27S.WF-NS-T3-DATE  (AD=ODL CD=GR /*.01U010 A010 .        
*S**      HE='WWHELPRH',= )         
*S**/       
*S*** MAP2: VALIDATION *****************************************************        
*S*** MAP2: END OF MAP *****************************************************        
*S**END     
*C**                                FATEMP  WFNSB27E                        S S   NN0000        
*D01NAT8304S FATEMP  WFNSB27E                        ZWDNH   ZWDNH           S      
*D02            2026051213454402026051213454400000030477    
*D03LINUX   
*D04                 ISO_8859-1:1987
*S*************************************************************************         
*S***       
*S***                              WolffPack    
*S***       
*S*** Subroutine: WFNSB27E          
*S*** System    : FINANCIER         
*S*** Title     : 2026-27 NSLDS Load subroutine 
*S*** Function  : This external subroutine loads the student's          
*S***             NSLDS record from an external federal record.         
*S***             It is performed during the ADD Load process.          
*S***       
*S***       Note: Module copied from WFNSL27E, modified to allow for    
*S***             additional fields and increased field sizes in        
*S***             mid 2026-2027 processing year.
*S***       
*S***      Copyright 1995 - 2026 WolffPack, Inc.  All rights reserved.  
*S***       
*S*************************************************************************         
*S**DEFINE DATA         
*S**  GLOBAL USING WWGDA
*S**  PARAMETER         
*S**   01 PASSED-NSLDS  
*S**     02 WF-NSLDS1(A250)         
*S**     02 WF-NSLDS2(A250)         
*S**     02 WF-NSLDS3(A250)         
*S**     02 WF-NSLDS4(A250)         
*S**     02 WF-NSLDS5(A250)         
*S**     02 WF-NSLDS6(A250)         
*S**     02 WF-NSLDS7(A250)         
*S**     02 WF-NSLDS8(A250)         
*S**     02 WF-NSLDS9(A250)         
*S**     02 WF-NSLDS10(A250)        
*S**     02 WF-NSLDS11(A51)         
*S***       
*S**  LOCAL USING WFNSB27L          
*S**  LOCAL USING WFNSL27D /* Passed to object subprogram   
*S**  LOCAL USING WFNSL27R /* Passed to object subprogram   
*S**  LOCAL USING WWAOBJ   /* Passed to object subprogram   
*S**  LOCAL 
*S**    01 #FIELD-COUNT (N2) INIT<0>
*S**    01 #LENGTH (N3) INIT<0>     
*S**END-DEFINE          
*S***       
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE LOAD-NSLDS-2627B          
*S*************************************************************************         
*S**  /*    
*S**  /* Set up record keys         
*S**  ASSIGN WFNSL27D.WF-FAO = ##FAO-ID         
*S**  ASSIGN WFNSL27D.WW-STUDENT-ID = ##STUDENT-ID          
*S**  /*    
*S**  /* Get NSLDS record           
*S**  MOVE 'GET' TO WWAOBJ.#FUNCTION
*S**  CALLNAT 'WFNSL27O' WW-GDA     
*S**           WFNSL27D 
*S**           WFNSL27D-ID          
*S**           WFNSL27R 
*S**           WWAOBJ   
*S**  IF WWAOBJ.#EXISTS 
*S**    MOVE 'UPDATE' TO WWAOBJ.#FUNCTION       
*S**  ELSE  
*S**    MOVE 'STORE' TO WWAOBJ.#FUNCTION        
*S**  END-IF
*S**  /*    
*S**  /* Load NSLDS record from passed federal record       
*S**  MOVE BY NAME PASSED-NSLDS TO WFNSB27L.WF-NSLDS        
*S**  /*    
*S**  /* year specific logic due to OBBBA modifications     
*S**  /*   (for fields not increased in size, max out at 999999)        
*S**  IF WFNSB27L.WF-NS-SUB-OUT = MASK(999999999999999) AND 
*S**     WFNSB27L.WF-NS-SUB-OUT > '000000000999999'         
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-SUB-OUT    
*S**    COMPRESS 'A1' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-SUB-OUT = 'N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-SUB-OUT  
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-SUB-OUT = MASK(999999999999999) AND 
*S**     WFNSB27L.WF-NS-SUB-OUT > '000000000999999'         
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-SUB-OUT    
*S**    COMPRESS 'A2' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-SUB-OUT = 'N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-SUB-OUT  
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-UNS-OUT = MASK(999999999999999) AND 
*S**     WFNSB27L.WF-NS-UNS-OUT > '000000000999999'         
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-UNS-OUT    
*S**    COMPRESS 'A3' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-UNS-OUT = 'N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-UNS-OUT  
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-CMB-OUT = MASK(999999999999999) AND 
*S**     WFNSB27L.WF-NS-CMB-OUT > '000000000999999'         
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-CMB-OUT    
*S**    COMPRESS 'A4' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-CMB-OUT = 'N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-CMB-OUT  
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-CON-OUT = MASK(999999999999999) AND 
*S**     WFNSB27L.WF-NS-CON-OUT > '000000000999999'         
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-CON-OUT    
*S**    COMPRESS 'A5' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-CON-OUT = 'N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-CON-OUT  
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-TCH-OUT = MASK(999999999999999) AND 
*S**     WFNSB27L.WF-NS-TCH-OUT > '000000000999999'         
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-TCH-OUT    
*S**    COMPRESS 'A6' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-TCH-OUT = 'N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-TCH-OUT  
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-SUB-PEND = MASK(999999999999999) AND
*S**     WFNSB27L.WF-NS-SUB-PEND > '000000000999999'        
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-SUB-PEND   
*S**    COMPRESS 'A7' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-SUB-PEND ='N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-SUB-PEND 
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-UNS-PEND = MASK(999999999999999) AND
*S**     WFNSB27L.WF-NS-UNS-PEND > '000000000999999'        
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-UNS-PEND   
*S**    COMPRESS 'A8' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-UNS-PEND ='N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-UNS-PEND 
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-CMB-PEND = MASK(999999999999999) AND
*S**     WFNSB27L.WF-NS-CMB-PEND > '000000000999999'        
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-CMB-PEND   
*S**    COMPRESS 'A9' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-CMB-PEND ='N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-CMB-PEND 
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-SUB-TOTAL = MASK(999999999999999) AND           
*S**     WFNSB27L.WF-NS-SUB-TOTAL > '000000000999999'       
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-SUB-TOTAL  
*S**    COMPRESS 'B1' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-SUB-TOTAL = 'N/A            '     
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-SUB-TOTAL
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-UNS-TOTAL = MASK(999999999999999) AND           
*S**     WFNSB27L.WF-NS-UNS-TOTAL > '000000000999999'       
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-UNS-TOTAL  
*S**    COMPRESS 'B2' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-UNS-TOTAL = 'N/A            '     
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-UNS-TOTAL
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-CMB-TOTAL = MASK(999999999999999) AND           
*S**     WFNSB27L.WF-NS-CMB-TOTAL > '000000000999999'       
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-CMB-TOTAL  
*S**    COMPRESS 'B3' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-CMB-TOTAL = 'N/A            '     
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-CMB-TOTAL
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-CON-TOTAL = MASK(999999999999999) AND           
*S**     WFNSB27L.WF-NS-CON-TOTAL > '000000000999999'       
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-CON-TOTAL  
*S**    COMPRESS 'B4' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-CON-TOTAL = 'N/A            '     
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-CON-TOTAL
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-TCH-TOTAL = MASK(999999999999999) AND           
*S**     WFNSB27L.WF-NS-TCH-TOTAL > '000000000999999'       
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-TCH-TOTAL  
*S**    COMPRESS 'B5' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-TCH-TOTAL = 'N/A            '     
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-TCH-TOTAL
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-PERK-TOTAL = MASK(999999999999999) AND          
*S**     WFNSB27L.WF-NS-PERK-TOTAL > '000000000999999'      
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-PERK-TOTAL 
*S**    COMPRESS 'B6' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-PERK-TOTAL = 'N/A            '    
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-PERK-TOTAL           
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-PERK-CUR = MASK(999999999999999) AND
*S**     WFNSB27L.WF-NS-PERK-CUR > '000000000999999'        
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-PERK-CUR   
*S**    COMPRESS 'B7' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-PERK-CUR = 'N/A            '      
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-PERK-CUR 
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-TCH-TOTAL-UG = MASK(999999999999999) AND        
*S**     WFNSB27L.WF-NS-TCH-TOTAL-UG > '000000000999999'    
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-TCH-TOTAL-UG           
*S**    COMPRESS 'B8' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-TCH-TOTAL-UG = 'N/A            '  
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-TCH-TOTAL-UG         
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-TCH-TOTAL-GR = MASK(999999999999999) AND        
*S**     WFNSB27L.WF-NS-TCH-TOTAL-GR > '000000000999999'    
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-TCH-TOTAL-GR           
*S**    COMPRESS 'B9' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-TCH-TOTAL-GR = 'N/A            '  
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-TCH-TOTAL-GR         
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-P1-SCH-AWD = MASK(999999999999999) AND          
*S**     WFNSB27L.WF-NS-P1-SCH-AWD > '000000000999999'      
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-P1-SCH-AWD 
*S**    COMPRESS 'C1' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-P1-SCH-AWD = 'N/A            '    
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-P1-SCH-AWD           
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-P1-PAID = MASK(999999999999999) AND 
*S**     WFNSB27L.WF-NS-P1-PAID > '000000000999999'         
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-P1-PAID    
*S**    COMPRESS 'C2' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-P1-PAID = 'N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-P1-PAID  
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-P1-AWARD = MASK(999999999999999) AND
*S**     WFNSB27L.WF-NS-P1-AWARD > '000000000999999'        
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-P1-AWARD   
*S**    COMPRESS 'C3' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-P1-AWARD ='N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-P1-AWARD 
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-P2-SCH-AWD = MASK(999999999999999) AND          
*S**     WFNSB27L.WF-NS-P2-SCH-AWD > '000000000999999'      
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-P2-SCH-AWD 
*S**    COMPRESS 'C4' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-P2-SCH-AWD = 'N/A            '    
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-P2-SCH-AWD           
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-P2-PAID = MASK(999999999999999) AND 
*S**     WFNSB27L.WF-NS-P2-PAID > '000000000999999'         
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-P2-PAID    
*S**    COMPRESS 'C5' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-P2-PAID = 'N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-P2-PAID  
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-P2-AWARD = MASK(999999999999999) AND
*S**     WFNSB27L.WF-NS-P2-AWARD > '000000000999999'        
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-P2-AWARD   
*S**    COMPRESS 'C6' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-P2-AWARD ='N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-P2-AWARD 
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-P3-SCH-AWD = MASK(999999999999999) AND          
*S**     WFNSB27L.WF-NS-P3-SCH-AWD > '000000000999999'      
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-P3-SCH-AWD 
*S**    COMPRESS 'C7' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-P3-SCH-AWD = 'N/A            '    
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-P3-SCH-AWD           
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-P3-PAID = MASK(999999999999999) AND 
*S**     WFNSB27L.WF-NS-P3-PAID > '000000000999999'         
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-P3-PAID    
*S**    COMPRESS 'C8' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-P3-PAID = 'N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-P3-PAID  
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-P3-AWARD = MASK(999999999999999) AND
*S**     WFNSB27L.WF-NS-P3-AWARD > '000000000999999'        
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-P3-AWARD   
*S**    COMPRESS 'C9' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-P3-AWARD ='N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-P3-AWARD 
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-T1-SCH-AWD = MASK(999999999999999) AND          
*S**     WFNSB27L.WF-NS-T1-SCH-AWD > '000000000999999'      
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-T1-SCH-AWD 
*S**    COMPRESS 'D1' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-T1-SCH-AWD = 'N/A            '    
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-T1-SCH-AWD           
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-T1-PAID = MASK(999999999999999) AND 
*S**     WFNSB27L.WF-NS-T1-PAID > '000000000999999'         
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-T1-PAID    
*S**    COMPRESS 'D2' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-T1-PAID = 'N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-T1-PAID  
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-T1-AWARD = MASK(999999999999999) AND
*S**     WFNSB27L.WF-NS-T1-AWARD > '000000000999999'        
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-T1-AWARD   
*S**    COMPRESS 'D3' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-T1-AWARD ='N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-T1-AWARD 
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-T1-DCHG-AMT = MASK(999999999999999) AND         
*S**     WFNSB27L.WF-NS-T1-DCHG-AMT > '000000000999999'     
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-T1-DCHG-AMT
*S**    COMPRESS 'D4' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-T1-DCHG-AMT = 'N/A            '   
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-T1-DCHG-AMT          
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-T1-ADJ-DSB = MASK(999999999999999) AND          
*S**     WFNSB27L.WF-NS-T1-ADJ-DSB > '000000000999999'      
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-T1-ADJ-DSB 
*S**    COMPRESS 'D5' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-T1-ADJ-DSB = 'N/A            '    
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-T1-ADJ-DSB           
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-T2-SCH-AWD = MASK(999999999999999) AND          
*S**     WFNSB27L.WF-NS-T2-SCH-AWD > '000000000999999'      
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-T2-SCH-AWD 
*S**    COMPRESS 'D6' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-T2-SCH-AWD = 'N/A            '    
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-T2-SCH-AWD           
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-T2-PAID = MASK(999999999999999) AND 
*S**     WFNSB27L.WF-NS-T2-PAID > '000000000999999'         
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-T2-PAID    
*S**    COMPRESS 'D7' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-T2-PAID = 'N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-T2-PAID  
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-T2-AWARD = MASK(999999999999999) AND
*S**     WFNSB27L.WF-NS-T2-AWARD > '000000000999999'        
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-T2-AWARD   
*S**    COMPRESS 'D8' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-T2-AWARD ='N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-T2-AWARD 
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-T2-DCHG-AMT = MASK(999999999999999) AND         
*S**     WFNSB27L.WF-NS-T2-DCHG-AMT > '000000000999999'     
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-T2-DCHG-AMT
*S**    COMPRESS 'D9' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-T2-DCHG-AMT = 'N/A            '   
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-T2-DCHG-AMT          
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-T2-ADJ-DSB = MASK(999999999999999) AND          
*S**     WFNSB27L.WF-NS-T2-ADJ-DSB > '000000000999999'      
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-T2-ADJ-DSB 
*S**    COMPRESS 'E1' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-T2-ADJ-DSB = 'N/A            '    
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-T2-ADJ-DSB           
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-T3-SCH-AWD = MASK(999999999999999) AND          
*S**     WFNSB27L.WF-NS-T3-SCH-AWD > '000000000999999'      
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-T3-SCH-AWD 
*S**    COMPRESS 'E2' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-T3-SCH-AWD = 'N/A            '    
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-T3-SCH-AWD           
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-T3-PAID = MASK(999999999999999) AND 
*S**     WFNSB27L.WF-NS-T3-PAID > '000000000999999'         
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-T3-PAID    
*S**    COMPRESS 'E3' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-T3-PAID = 'N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-T3-PAID  
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-T3-AWARD = MASK(999999999999999) AND
*S**     WFNSB27L.WF-NS-T3-AWARD > '000000000999999'        
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-T3-AWARD   
*S**    COMPRESS 'E4' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-T3-AWARD ='N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-T3-AWARD 
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-T3-DCHG-AMT = MASK(999999999999999) AND         
*S**     WFNSB27L.WF-NS-T3-DCHG-AMT > '000000000999999'     
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-T3-DCHG-AMT
*S**    COMPRESS 'E5' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-T3-DCHG-AMT = 'N/A            '   
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-T3-DCHG-AMT          
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-T3-ADJ-DSB = MASK(999999999999999) AND          
*S**     WFNSB27L.WF-NS-T3-ADJ-DSB > '000000000999999'      
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-T3-ADJ-DSB 
*S**    COMPRESS 'E6' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-T3-ADJ-DSB = 'N/A            '    
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-T3-ADJ-DSB           
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-L01-AMT = MASK(999999999999999) AND 
*S**     WFNSB27L.WF-NS-L01-AMT > '000000000999999'         
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-L01-AMT    
*S**    COMPRESS 'E7' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-L01-AMT = 'N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-L01-AMT  
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-L01-OUT = MASK(999999999999999) AND 
*S**     WFNSB27L.WF-NS-L01-OUT > '000000000999999'         
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-L01-OUT    
*S**    COMPRESS 'E8' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-L01-OUT = 'N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-L01-OUT  
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-L01-DSB = MASK(999999999999999) AND 
*S**     WFNSB27L.WF-NS-L01-DSB > '000000000999999'         
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-L01-DSB    
*S**    COMPRESS 'E9' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-L01-DSB = 'N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-L01-DSB  
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-L02-AMT = MASK(999999999999999) AND 
*S**     WFNSB27L.WF-NS-L02-AMT > '000000000999999'         
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-L02-AMT    
*S**    COMPRESS 'F1' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-L02-AMT = 'N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-L02-AMT  
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-L02-OUT = MASK(999999999999999) AND 
*S**     WFNSB27L.WF-NS-L02-OUT > '000000000999999'         
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-L02-OUT    
*S**    COMPRESS 'F2' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-L02-OUT = 'N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-L02-OUT  
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-L02-DSB = MASK(999999999999999) AND 
*S**     WFNSB27L.WF-NS-L02-DSB > '000000000999999'         
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-L02-DSB    
*S**    COMPRESS 'F3' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-L02-DSB = 'N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-L02-DSB  
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-L03-AMT = MASK(999999999999999) AND 
*S**     WFNSB27L.WF-NS-L03-AMT > '000000000999999'         
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-L03-AMT    
*S**    COMPRESS 'F4' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-L03-AMT = 'N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-L03-AMT  
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-L03-OUT = MASK(999999999999999) AND 
*S**     WFNSB27L.WF-NS-L03-OUT > '000000000999999'         
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-L03-OUT    
*S**    COMPRESS 'F5' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-L03-OUT = 'N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-L03-OUT  
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-L03-DSB = MASK(999999999999999) AND 
*S**     WFNSB27L.WF-NS-L03-DSB > '000000000999999'         
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-L03-DSB    
*S**    COMPRESS 'F6' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-L03-DSB = 'N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-L03-DSB  
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-L04-AMT = MASK(999999999999999) AND 
*S**     WFNSB27L.WF-NS-L04-AMT > '000000000999999'         
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-L04-AMT    
*S**    COMPRESS 'F7' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-L04-AMT = 'N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-L04-AMT  
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-L04-OUT = MASK(999999999999999) AND 
*S**     WFNSB27L.WF-NS-L04-OUT > '000000000999999'         
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-L04-OUT    
*S**    COMPRESS 'F8' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-L04-OUT = 'N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-L04-OUT  
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-L04-DSB = MASK(999999999999999) AND 
*S**     WFNSB27L.WF-NS-L04-DSB > '000000000999999'         
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-L04-DSB    
*S**    COMPRESS 'F9' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-L04-DSB = 'N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-L04-DSB  
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-L05-AMT = MASK(999999999999999) AND 
*S**     WFNSB27L.WF-NS-L05-AMT > '000000000999999'         
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-L05-AMT    
*S**    COMPRESS 'G1' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-L05-AMT = 'N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-L05-AMT  
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-L05-OUT = MASK(999999999999999) AND 
*S**     WFNSB27L.WF-NS-L05-OUT > '000000000999999'         
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-L05-OUT    
*S**    COMPRESS 'G2' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-L05-OUT = 'N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-L05-OUT  
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-L05-DSB = MASK(999999999999999) AND 
*S**     WFNSB27L.WF-NS-L05-DSB > '000000000999999'         
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-L05-DSB    
*S**    COMPRESS 'G3' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-L05-DSB = 'N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-L05-DSB  
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-L06-AMT = MASK(999999999999999) AND 
*S**     WFNSB27L.WF-NS-L06-AMT > '000000000999999'         
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-L06-AMT    
*S**    COMPRESS 'G4' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-L06-AMT = 'N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-L06-AMT  
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-L06-OUT = MASK(999999999999999) AND 
*S**     WFNSB27L.WF-NS-L06-OUT > '000000000999999'         
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-L06-OUT    
*S**    COMPRESS 'G5' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-L06-OUT = 'N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-L06-OUT  
*S**    END-IF          
*S**  END-IF
*S**  IF WFNSB27L.WF-NS-L06-DSB = MASK(999999999999999) AND 
*S**     WFNSB27L.WF-NS-L06-DSB > '000000000999999'         
*S**    MOVE '000000000999999' TO WFNSB27L.WF-NS-L06-DSB    
*S**    COMPRESS 'G6' ',' ##PASS-TEMP INTO ##PASS-TEMP      
*S**      LEAVING NO SPACE          
*S**  ELSE  
*S**    IF WFNSB27L.WF-NS-L06-DSB = 'N/A            '       
*S**      MOVE '         N/A   ' TO WFNSB27L.WF-NS-L06-DSB  
*S**    END-IF          
*S**  END-IF
*S**  /*    
*S**  /* Remove last byte if it's a comma       
*S**  EXAMINE ##PASS-TEMP FOR ',' GIVING LENGTH IN #LENGTH  
*S**  IF #LENGTH > 0 AND SUBSTRING(##PASS-TEMP, #LENGTH, 1) = ','       
*S**    ASSIGN #LENGTH = #LENGTH - 1
*S**    MOVE SUBSTRING(##PASS-TEMP, 1, #LENGTH) TO ##PASS-TEMP          
*S**  END-IF
*S**  /*    
*S**  MOVE BY NAME WFNSB27L.WF-NSLDS TO WFNSL27D.WF-NSLDS   
*S**  /*    
*S**  /* Need to move last six bytes of 59 fields not increased         
*S**  /*  with mid year 2026-2027 mods          
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-SUB-OUT,10,6) TO        
*S**       WFNSL27D.WF-NS-SUB-OUT   
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-UNS-OUT,10,6) TO        
*S**       WFNSL27D.WF-NS-UNS-OUT   
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-CMB-OUT,10,6) TO        
*S**       WFNSL27D.WF-NS-CMB-OUT   
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-CON-OUT,10,6) TO        
*S**       WFNSL27D.WF-NS-CON-OUT   
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-TCH-OUT,10,6) TO        
*S**       WFNSL27D.WF-NS-TCH-OUT   
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-SUB-PEND,10,6) TO       
*S**       WFNSL27D.WF-NS-SUB-PEND  
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-UNS-PEND,10,6) TO       
*S**       WFNSL27D.WF-NS-UNS-PEND  
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-CMB-PEND,10,6) TO       
*S**       WFNSL27D.WF-NS-CMB-PEND  
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-SUB-TOTAL,10,6) TO      
*S**       WFNSL27D.WF-NS-SUB-TOTAL 
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-UNS-TOTAL,10,6) TO      
*S**       WFNSL27D.WF-NS-UNS-TOTAL 
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-CMB-TOTAL,10,6) TO      
*S**       WFNSL27D.WF-NS-CMB-TOTAL 
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-CON-TOTAL,10,6) TO      
*S**       WFNSL27D.WF-NS-CON-TOTAL 
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-TCH-TOTAL,10,6) TO      
*S**       WFNSL27D.WF-NS-TCH-TOTAL 
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-PERK-TOTAL,10,6) TO     
*S**       WFNSL27D.WF-NS-PERK-TOTAL
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-PERK-CUR,10,6) TO       
*S**       WFNSL27D.WF-NS-PERK-CUR  
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-TCH-TOTAL-UG,10,6) TO   
*S**       WFNSL27D.WF-NS-TCH-TOTAL-UG          
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-TCH-TOTAL-GR,10,6) TO   
*S**       WFNSL27D.WF-NS-TCH-TOTAL-GR          
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-P1-SCH-AWD,10,6) TO     
*S**       WFNSL27D.WF-NS-P1-SCH-AWD
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-P1-PAID,10,6) TO        
*S**       WFNSL27D.WF-NS-P1-PAID   
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-P1-AWARD,10,6) TO       
*S**       WFNSL27D.WF-NS-P1-AWARD  
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-P2-SCH-AWD,10,6) TO     
*S**       WFNSL27D.WF-NS-P2-SCH-AWD
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-P2-PAID,10,6) TO        
*S**       WFNSL27D.WF-NS-P2-PAID   
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-P2-AWARD,10,6) TO       
*S**       WFNSL27D.WF-NS-P2-AWARD  
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-P3-SCH-AWD,10,6) TO     
*S**       WFNSL27D.WF-NS-P3-SCH-AWD
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-P3-PAID,10,6) TO        
*S**       WFNSL27D.WF-NS-P3-PAID   
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-P3-AWARD,10,6) TO       
*S**       WFNSL27D.WF-NS-P3-AWARD  
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-T1-SCH-AWD,10,6) TO     
*S**       WFNSL27D.WF-NS-T1-SCH-AWD
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-T1-PAID,10,6) TO        
*S**       WFNSL27D.WF-NS-T1-PAID   
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-T1-AWARD,10,6) TO       
*S**       WFNSL27D.WF-NS-T1-AWARD  
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-T1-DCHG-AMT,10,6) TO    
*S**       WFNSL27D.WF-NS-T1-DCHG-AMT           
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-T1-ADJ-DSB,10,6) TO     
*S**       WFNSL27D.WF-NS-T1-ADJ-DSB
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-T2-SCH-AWD,10,6) TO     
*S**       WFNSL27D.WF-NS-T2-SCH-AWD
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-T2-PAID,10,6) TO        
*S**       WFNSL27D.WF-NS-T2-PAID   
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-T2-AWARD,10,6) TO       
*S**       WFNSL27D.WF-NS-T2-AWARD  
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-T2-DCHG-AMT,10,6) TO    
*S**       WFNSL27D.WF-NS-T2-DCHG-AMT           
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-T2-ADJ-DSB,10,6) TO     
*S**       WFNSL27D.WF-NS-T2-ADJ-DSB
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-T3-SCH-AWD,10,6) TO     
*S**       WFNSL27D.WF-NS-T3-SCH-AWD
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-T3-PAID,10,6) TO        
*S**       WFNSL27D.WF-NS-T3-PAID   
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-T3-AWARD,10,6) TO       
*S**       WFNSL27D.WF-NS-T3-AWARD  
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-T3-DCHG-AMT,10,6) TO    
*S**       WFNSL27D.WF-NS-T3-DCHG-AMT           
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-T3-ADJ-DSB,10,6) TO     
*S**       WFNSL27D.WF-NS-T3-ADJ-DSB
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-L01-AMT,10,6) TO        
*S**       WFNSL27D.WF-NS-L01-AMT   
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-L01-OUT,10,6) TO        
*S**       WFNSL27D.WF-NS-L01-OUT   
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-L01-DSB,10,6) TO        
*S**       WFNSL27D.WF-NS-L01-DSB   
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-L02-AMT,10,6) TO        
*S**       WFNSL27D.WF-NS-L02-AMT   
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-L02-OUT,10,6) TO        
*S**       WFNSL27D.WF-NS-L02-OUT   
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-L02-DSB,10,6) TO        
*S**       WFNSL27D.WF-NS-L02-DSB   
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-L03-AMT,10,6) TO        
*S**       WFNSL27D.WF-NS-L03-AMT   
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-L03-OUT,10,6) TO        
*S**       WFNSL27D.WF-NS-L03-OUT   
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-L03-DSB,10,6) TO        
*S**       WFNSL27D.WF-NS-L03-DSB   
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-L04-AMT,10,6) TO        
*S**       WFNSL27D.WF-NS-L04-AMT   
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-L04-OUT,10,6) TO        
*S**       WFNSL27D.WF-NS-L04-OUT   
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-L04-DSB,10,6) TO        
*S**       WFNSL27D.WF-NS-L04-DSB   
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-L05-AMT,10,6) TO        
*S**       WFNSL27D.WF-NS-L05-AMT   
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-L05-OUT,10,6) TO        
*S**       WFNSL27D.WF-NS-L05-OUT   
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-L05-DSB,10,6) TO        
*S**       WFNSL27D.WF-NS-L05-DSB   
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-L06-AMT,10,6) TO        
*S**       WFNSL27D.WF-NS-L06-AMT   
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-L06-OUT,10,6) TO        
*S**       WFNSL27D.WF-NS-L06-OUT   
*S**  MOVE SUBSTRING(WFNSB27L.WF-NS-L06-DSB,10,6) TO        
*S**       WFNSL27D.WF-NS-L06-DSB   
*S**  /*    
*S**  /* Perform I/O to create/update record    
*S**  CALLNAT 'WFNSL27O' WW-GDA     
*S**           WFNSL27D 
*S**           WFNSL27D-ID          
*S**           WFNSL27R 
*S**           WWAOBJ   
*S**END-SUBROUTINE /* LOAD-NSLDS-2627B          
*S**END     
*C**                                FATEMP  WFNSB27L                        L S   NN0000        
*D01NAT8304L FATEMP  WFNSB27L                        ZWDNH   ZWDNH           S      
*D02            2026043008201702026043008201700000019102    
*D03LINUX   
*D04                 ISO_8859-1:1987
*S****C           0   ***********************************************************************   
*S****C           0   * 
*S****C           0   *         WolffPack, Inc. 
*S****C           0   *                                            Copyright 1995 - 2026        
*S****C           0   * LDA:    WFNSB27L                              WolffPack, Inc.           
*S****C           0   * System: FINANCIER                           All rights reserved.        
*S****C           0   * 
*S****C           0   *   Note: Module copied from WFNSL27L, modified to allow for additional   
*S****C           0   *           fields and increased fields mid 2026-2027 processing year.    
*S****C           0   * 
*S****C           0   ***********************************************************************   
*S****DS          0         1WFNSB27L                        /* Object Name         
*S****DK          0   A   9 2WW-STUDENT-ID                   /*         
*S****DK          0   A   2 2WF-FAO                          /*         
*S****DS          0         2WW-SYSTEM                       /*         
*S****DK          0   N   7 3WW-HOLD                         /*         
*S****DK          0   D     3WW-CDATE                        /*         
*S****DK          0   D     3WW-MDATE                        /*         
*S****DS          0         2WF-NSLDS                        /*         
*S****DK          0   A   1 3WF-NS-PELL-OVP                  /*         
*S****DK          0   A   8 3WF-NS-PELL-OVP-CTC              /*         
*S****DK          0   A   1 3WF-NS-SEOG-OVP                  /*         
*S****DK          0   A   8 3WF-NS-SEOG-OVP-CTC              /*         
*S****DK          0   A   1 3WF-NS-PERK-OVP                  /*         
*S****DK          0   A   8 3WF-NS-PERK-OVP-CTC              /*         
*S****DK          0   A   1 3WF-NS-TCH-OVP                   /*         
*S****DK          0   A   8 3WF-NS-TCH-OVP-CTC               /*         
*S****DK          0   A   1 3WF-NS-IAAS-OVP                  /*         
*S****DK          0   A   8 3WF-NS-IAAS-OVP-CTC              /*         
*S****DK          0   A   1 3WF-NS-LOAN-DEF                  /*         
*S****DK          0   A   1 3WF-NS-LOAN-DIS                  /*         
*S****DK          0   A   1 3WF-NS-LOAN-FRD                  /*         
*S****DK          0   A   1 3WF-NS-LOAN-REP                  /*         
*S****DK          0   A   1 3WF-NS-BANKRUPT                  /*         
*S****DK          0   A   1 3WF-NS-TCH-CONV                  /*         
*S****DK          0   A1    3WF-NS-LIMIT-EXCP   
*S****DK          0   A   1 3WF-NS-DSB-DATE-FLAG             /*         
*S****DK          0   A  15 3WF-NS-SUB-OUT                   /*         
*S****DK          0   A  15 3WF-NS-UNS-OUT                   /*         
*S****DK          0   A  15 3WF-NS-CMB-OUT                   /*         
*S****DK          0   A  15 3WF-NS-CON-OUT                   /*         
*S****DK          0   A  15 3WF-NS-TCH-OUT                   /*         
*S****DK          0   A  15 3WF-NS-SUB-PEND                  /*         
*S****DK          0   A  15 3WF-NS-UNS-PEND                  /*         
*S****DK          0   A  15 3WF-NS-CMB-PEND                  /*         
*S****DK          0   A  15 3WF-NS-SUB-TOTAL                 /*         
*S****DK          0   A  15 3WF-NS-UNS-TOTAL                 /*         
*S****DK          0   A  15 3WF-NS-CMB-TOTAL                 /*         
*S****DK          0   A  15 3WF-NS-CON-TOTAL                 /*         
*S****DK          0   A  15 3WF-NS-TCH-TOTAL                 /*         
*S****DK          0   A  15 3WF-NS-PERK-TOTAL                /*         
*S****DK          0   A  15 3WF-NS-PERK-CUR                  /*         
*S****DK          0   A  15 3WF-NS-TCH-TOTAL-UG              /*         
*S****DK          0   A  15 3WF-NS-TCH-TOTAL-GR              /*         
*S****DK          0   A  15 3WF-NS-PLUS-TOTAL                /*         
*S****DK          0   A  15 3WF-NS-LIFE-MAX-TOT              /*         
*S****DK          0   A   1 3WF-NS-LOAN-DEF-CHG              /*         
*S****DK          0   A   1 3WF-NS-LOAN-FRD-CHG              /*         
*S****DK          0   A   1 3WF-NS-LOAN-DIS-CHG              /*         
*S****DK          0   A   1 3WF-NS-LOAN-REP-CHG              /*         
*S****DK          0   A   1 3WF-NS-BANKRUPT-CHG              /*         
*S****DK          0   A   1 3WF-NS-TCH-CONV-CHG              /*         
*S****DK          0   A   1 3WF-NS-OVPMT-CHG                 /*         
*S****DK          0   A   1 3WF-NS-LOAN-CHG                  /*         
*S****DK          0   A   1 3WF-NS-PERKINS-CHG               /*         
*S****DK          0   A   1 3WF-NS-PELL-CHG                  /*         
*S****DK          0   A   1 3WF-NS-TCH-CHG                   /*         
*S****DK          0   A   1 3WF-NS-PELL-ADTNL                /*         
*S****DK          0   A   1 3WF-NS-LOAN-ADTNL                /*         
*S****DK          0   A   1 3WF-NS-TCH-ADTNL                 /*         
*S****DK          0   A   1 3WF-NS-DL-MPN                    /*         
*S****DK          0   A   1 3WF-NS-DLP-MPN                   /*         
*S****DK          0   A   1 3WF-NS-DLG-MPN                   /*         
*S****DK          0   A   1 3WF-NS-SUB-LIMIT-UG              /*         
*S****DK          0   A   1 3WF-NS-CMB-LIMIT-UG              /*         
*S****DK          0   A   1 3WF-NS-SUB-LIMIT-GR              /*         
*S****DK          0   A   1 3WF-NS-CMB-LIMIT-GR              /*         
*S****DK          0   A   1 3WF-NS-CMB-LIMIT-GRAD            /*         
*S****DK          0   A   1 3WF-NS-CMB-LIMIT-PROF            /*         
*S****DK          0   A   1 3WF-NS-PLUS-LIMIT-FLAG           /*         
*S****DK          0   A   1 3WF-NS-LIFE-MAX-LIMIT            /*         
*S****DK          0   A   1 3WF-NS-C-LEU-FLAG                /*         
*S****DK          0   A   7 3WF-NS-C-LEU                     /*         
*S****DK          0   A   1 3WF-NS-C-SUB-LE-FLAG             /*         
*S****DK          0   A   6 3WF-NS-C-SUB-USAGE-PD            /*         
*S****DK          0   A   1 3WF-NS-C-ENR-PATTERN             /*         
*S****DK          0   A  20 3WF-NS-FILLER-020A               /*         
*S****DK          0   A   2 3WF-NS-P1-SEQ                    /*         
*S****DK          0   A   3 3WF-NS-P1-VER                    /*         
*S****DK          0   A   6 3WF-NS-P1-SAI                    /*         
*S****DK          0   A   8 3WF-NS-P1-SCHOOL                 /*         
*S****DK          0   A   2 3WF-NS-P1-TRAN                   /*         
*S****DK          0   A   8 3WF-NS-P1-DATE                   /*         
*S****DK          0   A  15 3WF-NS-P1-SCH-AWD                /*         
*S****DK          0   A  15 3WF-NS-P1-PAID                   /*         
*S****DK          0   A   7 3WF-NS-P1-SCH-PCT                /*         
*S****DK          0   A  15 3WF-NS-P1-AWARD                  /*         
*S****DK          0   A   1 3WF-NS-P1-ADDL-ELIG              /*         
*S****DK          0   A  20 3WW-FILLER-020B                  /*         
*S****DK          0   A   2 3WF-NS-P2-SEQ                    /*         
*S****DK          0   A   3 3WF-NS-P2-VER                    /*         
*S****DK          0   A   6 3WF-NS-P2-SAI                    /*         
*S****DK          0   A   8 3WF-NS-P2-SCHOOL                 /*         
*S****DK          0   A   2 3WF-NS-P2-TRAN                   /*         
*S****DK          0   A   8 3WF-NS-P2-DATE                   /*         
*S****DK          0   A  15 3WF-NS-P2-SCH-AWD                /*         
*S****DK          0   A  15 3WF-NS-P2-PAID                   /*         
*S****DK          0   A   7 3WF-NS-P2-SCH-PCT                /*         
*S****DK          0   A  15 3WF-NS-P2-AWARD                  /*         
*S****DK          0   A   1 3WF-NS-P2-ADDL-ELIG              /*         
*S****DK          0   A  20 3WW-FILLER-020C                  /*         
*S****DK          0   A   2 3WF-NS-P3-SEQ                    /*         
*S****DK          0   A   3 3WF-NS-P3-VER                    /*         
*S****DK          0   A   6 3WF-NS-P3-SAI                    /*         
*S****DK          0   A   8 3WF-NS-P3-SCHOOL                 /*         
*S****DK          0   A   2 3WF-NS-P3-TRAN                   /*         
*S****DK          0   A   8 3WF-NS-P3-DATE                   /*         
*S****DK          0   A  15 3WF-NS-P3-SCH-AWD                /*         
*S****DK          0   A  15 3WF-NS-P3-PAID                   /*         
*S****DK          0   A   7 3WF-NS-P3-SCH-PCT                /*         
*S****DK          0   A  15 3WF-NS-P3-AWARD                  /*         
*S****DK          0   A   1 3WF-NS-P3-ADDL-ELIG              /*         
*S****DK          0   A  20 3WW-FILLER-020D                  /*         
*S****DK          0   A   2 3WF-NS-T1-SEQ                    /*         
*S****DK          0   A   8 3WF-NS-T1-SCHOOL                 /*         
*S****DK          0   A   2 3WF-NS-T1-TRAN                   /*         
*S****DK          0   A   8 3WF-NS-T1-DATE                   /*         
*S****DK          0   A  15 3WF-NS-T1-SCH-AWD                /*         
*S****DK          0   A  15 3WF-NS-T1-PAID                   /*         
*S****DK          0   A  15 3WF-NS-T1-AWARD                  /*         
*S****DK          0   A   3 3WF-NS-T1-LEVEL                  /*         
*S****DK          0   A   4 3WF-NS-T1-AWDYEAR                /*         
*S****DK          0   A   1 3WF-NS-T1-CONV                   /*         
*S****DK          0   A   4 3WF-NS-T1-DCHG                   /*         
*S****DK          0   A  15 3WF-NS-T1-DCHG-AMT               /*         
*S****DK          0   A  15 3WF-NS-T1-ADJ-DSB                /*         
*S****DK          0   A  20 3WW-FILLER-020E                  /*         
*S****DK          0   A   2 3WF-NS-T2-SEQ                    /*         
*S****DK          0   A   8 3WF-NS-T2-SCHOOL                 /*         
*S****DK          0   A   2 3WF-NS-T2-TRAN                   /*         
*S****DK          0   A   8 3WF-NS-T2-DATE                   /*         
*S****DK          0   A  15 3WF-NS-T2-SCH-AWD                /*         
*S****DK          0   A  15 3WF-NS-T2-PAID                   /*         
*S****DK          0   A  15 3WF-NS-T2-AWARD                  /*         
*S****DK          0   A   3 3WF-NS-T2-LEVEL                  /*         
*S****DK          0   A   4 3WF-NS-T2-AWDYEAR                /*         
*S****DK          0   A   1 3WF-NS-T2-CONV                   /*         
*S****DK          0   A   4 3WF-NS-T2-DCHG                   /*         
*S****DK          0   A  15 3WF-NS-T2-DCHG-AMT               /*         
*S****DK          0   A  15 3WF-NS-T2-ADJ-DSB                /*         
*S****DK          0   A  20 3WW-FILLER-020F                  /*         
*S****DK          0   A   2 3WF-NS-T3-SEQ                    /*         
*S****DK          0   A   8 3WF-NS-T3-SCHOOL                 /*         
*S****DK          0   A   2 3WF-NS-T3-TRAN                   /*         
*S****DK          0   A   8 3WF-NS-T3-DATE                   /*         
*S****DK          0   A  15 3WF-NS-T3-SCH-AWD                /*         
*S****DK          0   A  15 3WF-NS-T3-PAID                   /*         
*S****DK          0   A  15 3WF-NS-T3-AWARD                  /*         
*S****DK          0   A   3 3WF-NS-T3-LEVEL                  /*         
*S****DK          0   A   4 3WF-NS-T3-AWDYEAR                /*         
*S****DK          0   A   1 3WF-NS-T3-CONV                   /*         
*S****DK          0   A   4 3WF-NS-T3-DCHG                   /*         
*S****DK          0   A  15 3WF-NS-T3-DCHG-AMT               /*         
*S****DK          0   A  15 3WF-NS-T3-ADJ-DSB                /*         
*S****DK          0   A  20 3WW-FILLER-020G                  /*         
*S****DK          0   A   2 3WF-NS-L01-SEQ                   /*         
*S****DK          0   A   1 3WF-NS-L01-DFLT                  /*         
*S****DK          0   A   1 3WF-NS-L01-CHG                   /*         
*S****DK          0   A   2 3WF-NS-L01-TYPE                  /*         
*S****DK          0   A  15 3WF-NS-L01-AMT                   /*         
*S****DK          0   A   2 3WF-NS-L01-STA                   /*         
*S****DK          0   A   8 3WF-NS-L01-STA-DATE              /*         
*S****DK          0   A  15 3WF-NS-L01-OUT                   /*         
*S****DK          0   A   8 3WF-NS-L01-OUT-DATE              /*         
*S****DK          0   A   8 3WF-NS-L01-BEG-DATE              /*         
*S****DK          0   A   8 3WF-NS-L01-END-DATE              /*         
*S****DK          0   A   3 3WF-NS-L01-GA                    /*         
*S****DK          0   A   3 3WF-NS-L01-CTC-TYPE              /*         
*S****DK          0   A   8 3WF-NS-L01-SCHOOL                /*         
*S****DK          0   A   8 3WF-NS-L01-CONTACT               /*         
*S****DK          0   A   3 3WF-NS-L01-LEVEL                 /*         
*S****DK          0   A   1 3WF-NS-L01-XUNS                  /*         
*S****DK          0   A   1 3WF-NS-L01-CAP                   /*         
*S****DK          0   A  15 3WF-NS-L01-DSB                   /*         
*S****DK          0   A   8 3WF-NS-L01-DSB-DATE              /*         
*S****DK          0   A   1 3WF-NS-L01-SUBSIDY               /*         
*S****DK          0   A   8 3WF-NS-L01-SUBSIDY-DT            /*         
*S****DK          0   A  20 3WW-FILLER-020H                  /*         
*S****DK          0   A   2 3WF-NS-L02-SEQ                   /*         
*S****DK          0   A   1 3WF-NS-L02-DFLT                  /*         
*S****DK          0   A   1 3WF-NS-L02-CHG                   /*         
*S****DK          0   A   2 3WF-NS-L02-TYPE                  /*         
*S****DK          0   A  15 3WF-NS-L02-AMT                   /*         
*S****DK          0   A   2 3WF-NS-L02-STA                   /*         
*S****DK          0   A   8 3WF-NS-L02-STA-DATE              /*         
*S****DK          0   A  15 3WF-NS-L02-OUT                   /*         
*S****DK          0   A   8 3WF-NS-L02-OUT-DATE              /*         
*S****DK          0   A   8 3WF-NS-L02-BEG-DATE              /*         
*S****DK          0   A   8 3WF-NS-L02-END-DATE              /*         
*S****DK          0   A   3 3WF-NS-L02-GA                    /*         
*S****DK          0   A   3 3WF-NS-L02-CTC-TYPE              /*         
*S****DK          0   A   8 3WF-NS-L02-SCHOOL                /*         
*S****DK          0   A   8 3WF-NS-L02-CONTACT               /*         
*S****DK          0   A   3 3WF-NS-L02-LEVEL                 /*         
*S****DK          0   A   1 3WF-NS-L02-XUNS                  /*         
*S****DK          0   A   1 3WF-NS-L02-CAP                   /*         
*S****DK          0   A  15 3WF-NS-L02-DSB                   /*         
*S****DK          0   A   8 3WF-NS-L02-DSB-DATE              /*         
*S****DK          0   A   1 3WF-NS-L02-SUBSIDY               /*         
*S****DK          0   A   8 3WF-NS-L02-SUBSIDY-DT            /*         
*S****DK          0   A  20 3WW-FILLER-020I                  /*         
*S****DK          0   A   2 3WF-NS-L03-SEQ                   /*         
*S****DK          0   A   1 3WF-NS-L03-DFLT                  /*         
*S****DK          0   A   1 3WF-NS-L03-CHG                   /*         
*S****DK          0   A   2 3WF-NS-L03-TYPE                  /*         
*S****DK          0   A  15 3WF-NS-L03-AMT                   /*         
*S****DK          0   A   2 3WF-NS-L03-STA                   /*         
*S****DK          0   A   8 3WF-NS-L03-STA-DATE              /*         
*S****DK          0   A  15 3WF-NS-L03-OUT                   /*         
*S****DK          0   A   8 3WF-NS-L03-OUT-DATE              /*         
*S****DK          0   A   8 3WF-NS-L03-BEG-DATE              /*         
*S****DK          0   A   8 3WF-NS-L03-END-DATE              /*         
*S****DK          0   A   3 3WF-NS-L03-GA                    /*         
*S****DK          0   A   3 3WF-NS-L03-CTC-TYPE              /*         
*S****DK          0   A   8 3WF-NS-L03-SCHOOL                /*         
*S****DK          0   A   8 3WF-NS-L03-CONTACT               /*         
*S****DK          0   A   3 3WF-NS-L03-LEVEL                 /*         
*S****DK          0   A   1 3WF-NS-L03-XUNS                  /*         
*S****DK          0   A   1 3WF-NS-L03-CAP                   /*         
*S****DK          0   A  15 3WF-NS-L03-DSB                   /*         
*S****DK          0   A   8 3WF-NS-L03-DSB-DATE              /*         
*S****DK          0   A   1 3WF-NS-L03-SUBSIDY               /*         
*S****DK          0   A   8 3WF-NS-L03-SUBSIDY-DT            /*         
*S****DK          0   A  20 3WW-FILLER-020J                  /*         
*S****DK          0   A   2 3WF-NS-L04-SEQ                   /*         
*S****DK          0   A   1 3WF-NS-L04-DFLT                  /*         
*S****DK          0   A   1 3WF-NS-L04-CHG                   /*         
*S****DK          0   A   2 3WF-NS-L04-TYPE                  /*         
*S****DK          0   A  15 3WF-NS-L04-AMT                   /*         
*S****DK          0   A   2 3WF-NS-L04-STA                   /*         
*S****DK          0   A   8 3WF-NS-L04-STA-DATE              /*         
*S****DK          0   A  15 3WF-NS-L04-OUT                   /*         
*S****DK          0   A   8 3WF-NS-L04-OUT-DATE              /*         
*S****DK          0   A   8 3WF-NS-L04-BEG-DATE              /*         
*S****DK          0   A   8 3WF-NS-L04-END-DATE              /*         
*S****DK          0   A   3 3WF-NS-L04-GA                    /*         
*S****DK          0   A   3 3WF-NS-L04-CTC-TYPE              /*         
*S****DK          0   A   8 3WF-NS-L04-SCHOOL                /*         
*S****DK          0   A   8 3WF-NS-L04-CONTACT               /*         
*S****DK          0   A   3 3WF-NS-L04-LEVEL                 /*         
*S****DK          0   A   1 3WF-NS-L04-XUNS                  /*         
*S****DK          0   A   1 3WF-NS-L04-CAP                   /*         
*S****DK          0   A  15 3WF-NS-L04-DSB                   /*         
*S****DK          0   A   8 3WF-NS-L04-DSB-DATE              /*         
*S****DK          0   A   1 3WF-NS-L04-SUBSIDY               /*         
*S****DK          0   A   8 3WF-NS-L04-SUBSIDY-DT            /*         
*S****DK          0   A  20 3WW-FILLER-020K                  /*         
*S****DK          0   A   2 3WF-NS-L05-SEQ                   /*         
*S****DK          0   A   1 3WF-NS-L05-DFLT                  /*         
*S****DK          0   A   1 3WF-NS-L05-CHG                   /*         
*S****DK          0   A   2 3WF-NS-L05-TYPE                  /*         
*S****DK          0   A  15 3WF-NS-L05-AMT                   /*         
*S****DK          0   A   2 3WF-NS-L05-STA                   /*         
*S****DK          0   A   8 3WF-NS-L05-STA-DATE              /*         
*S****DK          0   A  15 3WF-NS-L05-OUT                   /*         
*S****DK          0   A   8 3WF-NS-L05-OUT-DATE              /*         
*S****DK          0   A   8 3WF-NS-L05-BEG-DATE              /*         
*S****DK          0   A   8 3WF-NS-L05-END-DATE              /*         
*S****DK          0   A   3 3WF-NS-L05-GA                    /*         
*S****DK          0   A   3 3WF-NS-L05-CTC-TYPE              /*         
*S****DK          0   A   8 3WF-NS-L05-SCHOOL                /*         
*S****DK          0   A   8 3WF-NS-L05-CONTACT               /*         
*S****DK          0   A   3 3WF-NS-L05-LEVEL                 /*         
*S****DK          0   A   1 3WF-NS-L05-XUNS                  /*         
*S****DK          0   A   1 3WF-NS-L05-CAP                   /*         
*S****DK          0   A  15 3WF-NS-L05-DSB                   /*         
*S****DK          0   A   8 3WF-NS-L05-DSB-DATE              /*         
*S****DK          0   A   1 3WF-NS-L05-SUBSIDY               /*         
*S****DK          0   A   8 3WF-NS-L05-SUBSIDY-DT            /*         
*S****DK          0   A  20 3WW-FILLER-020L                  /*         
*S****DK          0   A   2 3WF-NS-L06-SEQ                   /*         
*S****DK          0   A   1 3WF-NS-L06-DFLT                  /*         
*S****DK          0   A   1 3WF-NS-L06-CHG                   /*         
*S****DK          0   A   2 3WF-NS-L06-TYPE                  /*         
*S****DK          0   A  15 3WF-NS-L06-AMT                   /*         
*S****DK          0   A   2 3WF-NS-L06-STA                   /*         
*S****DK          0   A   8 3WF-NS-L06-STA-DATE              /*         
*S****DK          0   A  15 3WF-NS-L06-OUT                   /*         
*S****DK          0   A   8 3WF-NS-L06-OUT-DATE              /*         
*S****DK          0   A   8 3WF-NS-L06-BEG-DATE              /*         
*S****DK          0   A   8 3WF-NS-L06-END-DATE              /*         
*S****DK          0   A   3 3WF-NS-L06-GA                    /*         
*S****DK          0   A   3 3WF-NS-L06-CTC-TYPE              /*         
*S****DK          0   A   8 3WF-NS-L06-SCHOOL                /*         
*S****DK          0   A   8 3WF-NS-L06-CONTACT               /*         
*S****DK          0   A   3 3WF-NS-L06-LEVEL                 /*         
*S****DK          0   A   1 3WF-NS-L06-XUNS                  /*         
*S****DK          0   A   1 3WF-NS-L06-CAP                   /*         
*S****DK          0   A  15 3WF-NS-L06-DSB                   /*         
*S****DK          0   A   8 3WF-NS-L06-DSB-DATE              /*         
*S****DK          0   A   1 3WF-NS-L06-SUBSIDY               /*         
*S****DK          0   A   8 3WF-NS-L06-SUBSIDY-DT            /*         
*S****DK B        0   A     3WW-FILLER-591      
*S****DE                     LE=591 
*S****DR          0        R2WF-NSLDS           
*S****DFR         0   A 250 3WF-NSLDS1                       /*         
*S****DFR         0   A 250 3WF-NSLDS2                       /*         
*S****DFR         0   A 250 3WF-NSLDS3                       /*         
*S****DFR         0   A 250 3WF-NSLDS4                       /*         
*S****DFR         0   A 250 3WF-NSLDS5                       /*         
*S****DFR         0   A 250 3WF-NSLDS6          
*S****DFR         0   A 250 3WF-NSLDS7          
*S****DFR         0   A 250 3WF-NSLDS8          
*S****DFR         0   A 250 3WF-NSLDS9          
*S****DFR         0   A 250 3WF-NSLDS10         
*S****DFR         0   A  51 3WF-NSLDS11         
*C**                                FATEMP  WFNSD27M                        M S   NN0000        
*D01NAT8304M FATEMP  WFNSD27M                        ZWDNH   ZWDNH           S      
*D02            2026050700484702026050700484700000011564    
*D03LINUX   
*D04                 ISO_8859-1:1987
*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     
*C**                                FATEMP  WFNSL27D                        P S   NN0000        
*D01NAT8304P FATEMP  WFNSL27D                        ZWDNH   ZWDNH           S      
*D02            2026051311153802026051311153800000018715    
*D03LINUX   
*D04                 ISO_8859-1:1987
*S****C           0   ***********************************************************************   
*S****C           0   * 
*S****C           0   *         WolffPack, Inc. 
*S****C           0   *                                            Copyright 1995 - 2026        
*S****C           0   * PDA:    WFNSL27D                              WolffPack, Inc.           
*S****C           0   * System: FINANCIER                           All rights reserved.        
*S****C           0   * 
*S****C           0   ***********************************************************************   
*S****DS          0         1WFNSL27D                        /* Object Name         
*S****DK          0   A   9 2WW-STUDENT-ID                   /*         
*S****DK          0   A   2 2WF-FAO                          /*         
*S****DS          0         2WW-SYSTEM                       /*         
*S****DK          0   N   7 3WW-HOLD                         /*         
*S****DK          0   D     3WW-CDATE                        /*         
*S****DK          0   D     3WW-MDATE                        /*         
*S****DS          0         2WF-NSLDS                        /*         
*S****DK          0   A   1 3WF-NS-PELL-OVP                  /*         
*S****DK          0   A   8 3WF-NS-PELL-OVP-CTC              /*         
*S****DK          0   A   1 3WF-NS-SEOG-OVP                  /*         
*S****DK          0   A   8 3WF-NS-SEOG-OVP-CTC              /*         
*S****DK          0   A   1 3WF-NS-PERK-OVP                  /*         
*S****DK          0   A   8 3WF-NS-PERK-OVP-CTC              /*         
*S****DK          0   A   1 3WF-NS-TCH-OVP                   /*         
*S****DK          0   A   8 3WF-NS-TCH-OVP-CTC               /*         
*S****DK          0   A   1 3WF-NS-IAAS-OVP                  /*         
*S****DK          0   A   8 3WF-NS-IAAS-OVP-CTC              /*         
*S****DK          0   A   1 3WF-NS-LOAN-DEF                  /*         
*S****DK          0   A   1 3WF-NS-LOAN-DIS                  /*         
*S****DK          0   A   1 3WF-NS-LOAN-FRD                  /*         
*S****DK          0   A   1 3WF-NS-LOAN-REP                  /*         
*S****DK          0   A   1 3WF-NS-BANKRUPT                  /*         
*S****DK          0   A   1 3WF-NS-TCH-CONV                  /*         
*S****DK          0   A1    3WF-NS-LIMIT-EXCP   
*S****DK          0   A   1 3WF-NS-DSB-DATE-FLAG             /*         
*S****DK          0   A   6 3WF-NS-SUB-OUT                   /*         
*S****DK          0   A   6 3WF-NS-UNS-OUT                   /*         
*S****DK          0   A   6 3WF-NS-CMB-OUT                   /*         
*S****DK          0   A   6 3WF-NS-CON-OUT                   /*         
*S****DK          0   A   6 3WF-NS-TCH-OUT                   /*         
*S****DK          0   A   6 3WF-NS-SUB-PEND                  /*         
*S****DK          0   A   6 3WF-NS-UNS-PEND                  /*         
*S****DK          0   A   6 3WF-NS-CMB-PEND                  /*         
*S****DK          0   A   6 3WF-NS-SUB-TOTAL                 /*         
*S****DK          0   A   6 3WF-NS-UNS-TOTAL                 /*         
*S****DK          0   A   6 3WF-NS-CMB-TOTAL                 /*         
*S****DK          0   A   6 3WF-NS-CON-TOTAL                 /*         
*S****DK          0   A   6 3WF-NS-TCH-TOTAL                 /*         
*S****DK          0   A   6 3WF-NS-PERK-TOTAL                /*         
*S****DK          0   A   6 3WF-NS-PERK-CUR                  /*         
*S****DK          0   A   6 3WF-NS-TCH-TOTAL-UG              /*         
*S****DK          0   A   6 3WF-NS-TCH-TOTAL-GR              /*         
*S****DK          0   A  15 3WF-NS-PLUS-TOTAL                /*         
*S****DK          0   A  15 3WF-NS-LIFE-MAX-TOT              /*         
*S****DK          0   A1    3WF-NS-CMB-LIMIT-GRAD           
*S****DK          0   A1    3WF-NS-CMB-LIMIT-PROF           
*S****DK          0   A1    3WF-NS-PLUS-LIMIT-FLAG          
*S****DK          0   A1    3WF-NS-LIFE-MAX-LIMIT           
*S****DK          0   A   1 3WF-NS-LOAN-DEF-CHG              /*         
*S****DK          0   A   1 3WF-NS-LOAN-FRD-CHG              /*         
*S****DK          0   A   1 3WF-NS-LOAN-DIS-CHG              /*         
*S****DK          0   A   1 3WF-NS-LOAN-REP-CHG              /*         
*S****DK          0   A   1 3WF-NS-BANKRUPT-CHG              /*         
*S****DK          0   A   1 3WF-NS-TCH-CONV-CHG              /*         
*S****DK          0   A   1 3WF-NS-OVPMT-CHG                 /*         
*S****DK          0   A   1 3WF-NS-LOAN-CHG                  /*         
*S****DK          0   A   1 3WF-NS-PERKINS-CHG               /*         
*S****DK          0   A   1 3WF-NS-PELL-CHG                  /*         
*S****DK          0   A   1 3WF-NS-TCH-CHG                   /*         
*S****DK          0   A   1 3WF-NS-PELL-ADTNL                /*         
*S****DK          0   A   1 3WF-NS-LOAN-ADTNL                /*         
*S****DK          0   A   1 3WF-NS-TCH-ADTNL                 /*         
*S****DK          0   A   1 3WF-NS-DL-MPN                    /*         
*S****DK          0   A   1 3WF-NS-DLP-MPN                   /*         
*S****DK          0   A   1 3WF-NS-DLG-MPN                   /*         
*S****DK          0   A   1 3WF-NS-SUB-LIMIT-UG              /*         
*S****DK          0   A   1 3WF-NS-CMB-LIMIT-UG              /*         
*S****DK          0   A   1 3WF-NS-SUB-LIMIT-GR              /*         
*S****DK          0   A   1 3WF-NS-CMB-LIMIT-GR              /*         
*S****DK          0   A   1 3WF-NS-C-LEU-FLAG                /*         
*S****DK          0   A   7 3WF-NS-C-LEU                     /*         
*S****DK          0   A   1 3WF-NS-C-SUB-LE-FLAG             /*         
*S****DK          0   A   6 3WF-NS-C-SUB-USAGE-PD            /*         
*S****DK          0   A   1 3WF-NS-C-ENR-PATTERN             /*         
*S****DK          0   A  20 3WW-NS-FILLER1                   /*         
*S****DK          0   A   2 3WF-NS-P1-SEQ                    /*         
*S****DK          0   A   3 3WF-NS-P1-VER                    /*         
*S****DK          0   A   6 3WF-NS-P1-SAI                    /*         
*S****DK          0   A   8 3WF-NS-P1-SCHOOL                 /*         
*S****DK          0   A   2 3WF-NS-P1-TRAN                   /*         
*S****DK          0   A   8 3WF-NS-P1-DATE                   /*         
*S****DK          0   A   6 3WF-NS-P1-SCH-AWD                /*         
*S****DK          0   A   6 3WF-NS-P1-PAID                   /*         
*S****DK          0   A   7 3WF-NS-P1-SCH-PCT                /*         
*S****DK          0   A   6 3WF-NS-P1-AWARD                  /*         
*S****DK          0   A   1 3WF-NS-P1-ADDL-ELIG              /*         
*S****DK          0   A  20 3WW-FILLER2                      /*         
*S****DK          0   A   2 3WF-NS-P2-SEQ                    /*         
*S****DK          0   A   3 3WF-NS-P2-VER                    /*         
*S****DK          0   A   6 3WF-NS-P2-SAI                    /*         
*S****DK          0   A   8 3WF-NS-P2-SCHOOL                 /*         
*S****DK          0   A   2 3WF-NS-P2-TRAN                   /*         
*S****DK          0   A   8 3WF-NS-P2-DATE                   /*         
*S****DK          0   A   6 3WF-NS-P2-SCH-AWD                /*         
*S****DK          0   A   6 3WF-NS-P2-PAID                   /*         
*S****DK          0   A   7 3WF-NS-P2-SCH-PCT                /*         
*S****DK          0   A   6 3WF-NS-P2-AWARD                  /*         
*S****DK          0   A   1 3WF-NS-P2-ADDL-ELIG              /*         
*S****DK          0   A  20 3WW-FILLER3                      /*         
*S****DK          0   A   2 3WF-NS-P3-SEQ                    /*         
*S****DK          0   A   3 3WF-NS-P3-VER                    /*         
*S****DK          0   A   6 3WF-NS-P3-SAI                    /*         
*S****DK          0   A   8 3WF-NS-P3-SCHOOL                 /*         
*S****DK          0   A   2 3WF-NS-P3-TRAN                   /*         
*S****DK          0   A   8 3WF-NS-P3-DATE                   /*         
*S****DK          0   A   6 3WF-NS-P3-SCH-AWD                /*         
*S****DK          0   A   6 3WF-NS-P3-PAID                   /*         
*S****DK          0   A   7 3WF-NS-P3-SCH-PCT                /*         
*S****DK          0   A   6 3WF-NS-P3-AWARD                  /*         
*S****DK          0   A   1 3WF-NS-P3-ADDL-ELIG              /*         
*S****DK          0   A  20 3WW-FILLER4                      /*         
*S****DK          0   A   2 3WF-NS-T1-SEQ                    /*         
*S****DK          0   A   8 3WF-NS-T1-SCHOOL                 /*         
*S****DK          0   A   2 3WF-NS-T1-TRAN                   /*         
*S****DK          0   A   8 3WF-NS-T1-DATE                   /*         
*S****DK          0   A   6 3WF-NS-T1-SCH-AWD                /*         
*S****DK          0   A   6 3WF-NS-T1-PAID                   /*         
*S****DK          0   A   6 3WF-NS-T1-AWARD                  /*         
*S****DK          0   A3    3WF-NS-T1-LEVEL     
*S****DK          0   A   4 3WF-NS-T1-AWDYEAR                /*         
*S****DK          0   A   1 3WF-NS-T1-CONV                   /*         
*S****DK          0   A   4 3WF-NS-T1-DCHG                   /*         
*S****DK          0   A   6 3WF-NS-T1-DCHG-AMT               /*         
*S****DK          0   A   6 3WF-NS-T1-ADJ-DSB                /*         
*S****DK          0   A  20 3WW-FILLER5                      /*         
*S****DK          0   A   2 3WF-NS-T2-SEQ                    /*         
*S****DK          0   A   8 3WF-NS-T2-SCHOOL                 /*         
*S****DK          0   A   2 3WF-NS-T2-TRAN                   /*         
*S****DK          0   A   8 3WF-NS-T2-DATE                   /*         
*S****DK          0   A   6 3WF-NS-T2-SCH-AWD                /*         
*S****DK          0   A   6 3WF-NS-T2-PAID                   /*         
*S****DK          0   A   6 3WF-NS-T2-AWARD                  /*         
*S****DK          0   A3    3WF-NS-T2-LEVEL     
*S****DK          0   A   4 3WF-NS-T2-AWDYEAR                /*         
*S****DK          0   A   1 3WF-NS-T2-CONV                   /*         
*S****DK          0   A   4 3WF-NS-T2-DCHG                   /*         
*S****DK          0   A   6 3WF-NS-T2-DCHG-AMT               /*         
*S****DK          0   A   6 3WF-NS-T2-ADJ-DSB                /*         
*S****DK          0   A  20 3WW-FILLER6                      /*         
*S****DK          0   A   2 3WF-NS-T3-SEQ                    /*         
*S****DK          0   A   8 3WF-NS-T3-SCHOOL                 /*         
*S****DK          0   A   2 3WF-NS-T3-TRAN                   /*         
*S****DK          0   A   8 3WF-NS-T3-DATE                   /*         
*S****DK          0   A   6 3WF-NS-T3-SCH-AWD                /*         
*S****DK          0   A   6 3WF-NS-T3-PAID                   /*         
*S****DK          0   A   6 3WF-NS-T3-AWARD                  /*         
*S****DK          0   A3    3WF-NS-T3-LEVEL     
*S****DK          0   A   4 3WF-NS-T3-AWDYEAR                /*         
*S****DK          0   A   1 3WF-NS-T3-CONV                   /*         
*S****DK          0   A   4 3WF-NS-T3-DCHG                   /*         
*S****DK          0   A   6 3WF-NS-T3-DCHG-AMT               /*         
*S****DK          0   A   6 3WF-NS-T3-ADJ-DSB                /*         
*S****DK          0   A  20 3WW-FILLER7                      /*         
*S****DK          0   A   2 3WF-NS-L01-SEQ                   /*         
*S****DK          0   A   1 3WF-NS-L01-DFLT                  /*         
*S****DK          0   A   1 3WF-NS-L01-CHG                   /*         
*S****DK          0   A   2 3WF-NS-L01-TYPE                  /*         
*S****DK          0   A   6 3WF-NS-L01-AMT                   /*         
*S****DK          0   A   2 3WF-NS-L01-STA                   /*         
*S****DK          0   A   8 3WF-NS-L01-STA-DATE              /*         
*S****DK          0   A   6 3WF-NS-L01-OUT                   /*         
*S****DK          0   A   8 3WF-NS-L01-OUT-DATE              /*         
*S****DK          0   A   8 3WF-NS-L01-BEG-DATE              /*         
*S****DK          0   A   8 3WF-NS-L01-END-DATE              /*         
*S****DK          0   A   3 3WF-NS-L01-GA                    /*         
*S****DK          0   A   3 3WF-NS-L01-CTC-TYPE              /*         
*S****DK          0   A   8 3WF-NS-L01-SCHOOL                /*         
*S****DK          0   A   8 3WF-NS-L01-CONTACT               /*         
*S****DK          0   A   3 3WF-NS-L01-LEVEL                 /*         
*S****DK          0   A   1 3WF-NS-L01-XUNS                  /*         
*S****DK          0   A   1 3WF-NS-L01-CAP                   /*         
*S****DK          0   A   6 3WF-NS-L01-DSB                   /*         
*S****DK          0   A   8 3WF-NS-L01-DSB-DATE              /*         
*S****DK          0   A   1 3WF-NS-L01-SUBSIDY               /*         
*S****DK          0   A   8 3WF-NS-L01-SUBSIDY-DT            /*         
*S****DK          0   A  20 3WW-FILLER8                      /*         
*S****DK          0   A   2 3WF-NS-L02-SEQ                   /*         
*S****DK          0   A   1 3WF-NS-L02-DFLT                  /*         
*S****DK          0   A   1 3WF-NS-L02-CHG                   /*         
*S****DK          0   A   2 3WF-NS-L02-TYPE                  /*         
*S****DK          0   A   6 3WF-NS-L02-AMT                   /*         
*S****DK          0   A   2 3WF-NS-L02-STA                   /*         
*S****DK          0   A   8 3WF-NS-L02-STA-DATE              /*         
*S****DK          0   A   6 3WF-NS-L02-OUT                   /*         
*S****DK          0   A   8 3WF-NS-L02-OUT-DATE              /*         
*S****DK          0   A   8 3WF-NS-L02-BEG-DATE              /*         
*S****DK          0   A   8 3WF-NS-L02-END-DATE              /*         
*S****DK          0   A   3 3WF-NS-L02-GA                    /*         
*S****DK          0   A   3 3WF-NS-L02-CTC-TYPE              /*         
*S****DK          0   A   8 3WF-NS-L02-SCHOOL                /*         
*S****DK          0   A   8 3WF-NS-L02-CONTACT               /*         
*S****DK          0   A   3 3WF-NS-L02-LEVEL                 /*         
*S****DK          0   A   1 3WF-NS-L02-XUNS                  /*         
*S****DK          0   A   1 3WF-NS-L02-CAP                   /*         
*S****DK          0   A   6 3WF-NS-L02-DSB                   /*         
*S****DK          0   A   8 3WF-NS-L02-DSB-DATE              /*         
*S****DK          0   A   1 3WF-NS-L02-SUBSIDY               /*         
*S****DK          0   A   8 3WF-NS-L02-SUBSIDY-DT            /*         
*S****DK          0   A  20 3WW-FILLER9                      /*         
*S****DK          0   A   2 3WF-NS-L03-SEQ                   /*         
*S****DK          0   A   1 3WF-NS-L03-DFLT                  /*         
*S****DK          0   A   1 3WF-NS-L03-CHG                   /*         
*S****DK          0   A   2 3WF-NS-L03-TYPE                  /*         
*S****DK          0   A   6 3WF-NS-L03-AMT                   /*         
*S****DK          0   A   2 3WF-NS-L03-STA                   /*         
*S****DK          0   A   8 3WF-NS-L03-STA-DATE              /*         
*S****DK          0   A   6 3WF-NS-L03-OUT                   /*         
*S****DK          0   A   8 3WF-NS-L03-OUT-DATE              /*         
*S****DK          0   A   8 3WF-NS-L03-BEG-DATE              /*         
*S****DK          0   A   8 3WF-NS-L03-END-DATE              /*         
*S****DK          0   A   3 3WF-NS-L03-GA                    /*         
*S****DK          0   A   3 3WF-NS-L03-CTC-TYPE              /*         
*S****DK          0   A   8 3WF-NS-L03-SCHOOL                /*         
*S****DK          0   A   8 3WF-NS-L03-CONTACT               /*         
*S****DK          0   A   3 3WF-NS-L03-LEVEL                 /*         
*S****DK          0   A   1 3WF-NS-L03-XUNS                  /*         
*S****DK          0   A   1 3WF-NS-L03-CAP                   /*         
*S****DK          0   A   6 3WF-NS-L03-DSB                   /*         
*S****DK          0   A   8 3WF-NS-L03-DSB-DATE              /*         
*S****DK          0   A   1 3WF-NS-L03-SUBSIDY               /*         
*S****DK          0   A   8 3WF-NS-L03-SUBSIDY-DT            /*         
*S****DK          0   A  20 3WW-FILLER1O                     /*         
*S****DK          0   A   2 3WF-NS-L04-SEQ                   /*         
*S****DK          0   A   1 3WF-NS-L04-DFLT                  /*         
*S****DK          0   A   1 3WF-NS-L04-CHG                   /*         
*S****DK          0   A   2 3WF-NS-L04-TYPE                  /*         
*S****DK          0   A   6 3WF-NS-L04-AMT                   /*         
*S****DK          0   A   2 3WF-NS-L04-STA                   /*         
*S****DK          0   A   8 3WF-NS-L04-STA-DATE              /*         
*S****DK          0   A   6 3WF-NS-L04-OUT                   /*         
*S****DK          0   A   8 3WF-NS-L04-OUT-DATE              /*         
*S****DK          0   A   8 3WF-NS-L04-BEG-DATE              /*         
*S****DK          0   A   8 3WF-NS-L04-END-DATE              /*         
*S****DK          0   A   3 3WF-NS-L04-GA                    /*         
*S****DK          0   A   3 3WF-NS-L04-CTC-TYPE              /*         
*S****DK          0   A   8 3WF-NS-L04-SCHOOL                /*         
*S****DK          0   A   8 3WF-NS-L04-CONTACT               /*         
*S****DK          0   A   3 3WF-NS-L04-LEVEL                 /*         
*S****DK          0   A   1 3WF-NS-L04-XUNS                  /*         
*S****DK          0   A   1 3WF-NS-L04-CAP                   /*         
*S****DK          0   A   6 3WF-NS-L04-DSB                   /*         
*S****DK          0   A   8 3WF-NS-L04-DSB-DATE              /*         
*S****DK          0   A   1 3WF-NS-L04-SUBSIDY               /*         
*S****DK          0   A   8 3WF-NS-L04-SUBSIDY-DT            /*         
*S****DK          0   A  20 3WW-FILLER11                     /*         
*S****DK          0   A   2 3WF-NS-L05-SEQ                   /*         
*S****DK          0   A   1 3WF-NS-L05-DFLT                  /*         
*S****DK          0   A   1 3WF-NS-L05-CHG                   /*         
*S****DK          0   A   2 3WF-NS-L05-TYPE                  /*         
*S****DK          0   A   6 3WF-NS-L05-AMT                   /*         
*S****DK          0   A   2 3WF-NS-L05-STA                   /*         
*S****DK          0   A   8 3WF-NS-L05-STA-DATE              /*         
*S****DK          0   A   6 3WF-NS-L05-OUT                   /*         
*S****DK          0   A   8 3WF-NS-L05-OUT-DATE              /*         
*S****DK          0   A   8 3WF-NS-L05-BEG-DATE              /*         
*S****DK          0   A   8 3WF-NS-L05-END-DATE              /*         
*S****DK          0   A   3 3WF-NS-L05-GA                    /*         
*S****DK          0   A   3 3WF-NS-L05-CTC-TYPE              /*         
*S****DK          0   A   8 3WF-NS-L05-SCHOOL                /*         
*S****DK          0   A   8 3WF-NS-L05-CONTACT               /*         
*S****DK          0   A   3 3WF-NS-L05-LEVEL                 /*         
*S****DK          0   A   1 3WF-NS-L05-XUNS                  /*         
*S****DK          0   A   1 3WF-NS-L05-CAP                   /*         
*S****DK          0   A   6 3WF-NS-L05-DSB                   /*         
*S****DK          0   A   8 3WF-NS-L05-DSB-DATE              /*         
*S****DK          0   A   1 3WF-NS-L05-SUBSIDY               /*         
*S****DK          0   A   8 3WF-NS-L05-SUBSIDY-DT            /*         
*S****DK          0   A  20 3WW-FILLER12                     /*         
*S****DK          0   A   2 3WF-NS-L06-SEQ                   /*         
*S****DK          0   A   1 3WF-NS-L06-DFLT                  /*         
*S****DK          0   A   1 3WF-NS-L06-CHG                   /*         
*S****DK          0   A   2 3WF-NS-L06-TYPE                  /*         
*S****DK          0   A   6 3WF-NS-L06-AMT                   /*         
*S****DK          0   A   2 3WF-NS-L06-STA                   /*         
*S****DK          0   A   8 3WF-NS-L06-STA-DATE              /*         
*S****DK          0   A   6 3WF-NS-L06-OUT                   /*         
*S****DK          0   A   8 3WF-NS-L06-OUT-DATE              /*         
*S****DK          0   A   8 3WF-NS-L06-BEG-DATE              /*         
*S****DK          0   A   8 3WF-NS-L06-END-DATE              /*         
*S****DK          0   A   3 3WF-NS-L06-GA                    /*         
*S****DK          0   A   3 3WF-NS-L06-CTC-TYPE              /*         
*S****DK          0   A   8 3WF-NS-L06-SCHOOL                /*         
*S****DK          0   A   8 3WF-NS-L06-CONTACT               /*         
*S****DK          0   A   3 3WF-NS-L06-LEVEL                 /*         
*S****DK          0   A   1 3WF-NS-L06-XUNS                  /*         
*S****DK          0   A   1 3WF-NS-L06-CAP                   /*         
*S****DK          0   A   6 3WF-NS-L06-DSB                   /*         
*S****DK          0   A   8 3WF-NS-L06-DSB-DATE              /*         
*S****DK          0   A   1 3WF-NS-L06-SUBSIDY               /*         
*S****DK          0   A   8 3WF-NS-L06-SUBSIDY-DT            /*         
*S****DK B        0   A     3WW-FILLER-1164     
*S****DE                     LE=1164
*S****C           0   * 
*S****C           0   * No 'N' relationships exist for:      WF-NSLDS-2627          
*S****C           0   * 
*S****DF          0   A  11 1WFNSL27D-ID                     /* Object identifier   
*S****DR          0        R1WFNSL27D-ID                     /* REDEF. BEGIN : WFNSL27D-ID      
*S****DSR         0         2STRUCTURE                       /* To allow MOVE BY NAME           
*S****DFR         0   A   2 3WF-FAO                          /*         
*S****DFR         0   A   9 3WW-STUDENT-ID                   /*         
*C**                                FATEMP  WFNSL27L                        L S   NN0000        
*D01NAT8304L FATEMP  WFNSL27L                        ZWDNH   ZWDNH           S      
*D02            2026051307285402026051307285400000018076    
*D03LINUX   
*D04                 ISO_8859-1:1987
*S****C           0   ***********************************************************************   
*S****C           0   * 
*S****C           0   *         WolffPack, Inc. 
*S****C           0   *                                            Copyright 1995 - 2026        
*S****C           0   * LDA:    WFNSL27L                              WolffPack, Inc.           
*S****C           0   * System: FINANCIER                           All rights reserved.        
*S****C           0   * 
*S****C           0   ***********************************************************************   
*S****DS          0         1WFNSL27L                        /* Object Name         
*S****DK          0   A   9 2WW-STUDENT-ID                   /*         
*S****DK          0   A   2 2WF-FAO                          /*         
*S****DS          0         2WW-SYSTEM                       /*         
*S****DK          0   N   7 3WW-HOLD                         /*         
*S****DK          0   D     3WW-CDATE                        /*         
*S****DK          0   D     3WW-MDATE                        /*         
*S****DS          0         2WF-NSLDS                        /*         
*S****DK          0   A   1 3WF-NS-PELL-OVP                  /*         
*S****DK          0   A   8 3WF-NS-PELL-OVP-CTC              /*         
*S****DK          0   A   1 3WF-NS-SEOG-OVP                  /*         
*S****DK          0   A   8 3WF-NS-SEOG-OVP-CTC              /*         
*S****DK          0   A   1 3WF-NS-PERK-OVP                  /*         
*S****DK          0   A   8 3WF-NS-PERK-OVP-CTC              /*         
*S****DK          0   A   1 3WF-NS-TCH-OVP                   /*         
*S****DK          0   A   8 3WF-NS-TCH-OVP-CTC               /*         
*S****DK          0   A   1 3WF-NS-IAAS-OVP                  /*         
*S****DK          0   A   8 3WF-NS-IAAS-OVP-CTC              /*         
*S****DK          0   A   1 3WF-NS-LOAN-DEF                  /*         
*S****DK          0   A   1 3WF-NS-LOAN-DIS                  /*         
*S****DK          0   A   1 3WF-NS-LOAN-FRD                  /*         
*S****DK          0   A   1 3WF-NS-LOAN-REP                  /*         
*S****DK          0   A   1 3WF-NS-BANKRUPT                  /*         
*S****DK          0   A   1 3WF-NS-TCH-CONV                  /*         
*S****DK          0   A1    3WF-NS-LIMIT-EXCP   
*S****DK          0   A   1 3WF-NS-DSB-DATE-FLAG             /*         
*S****DK          0   A   6 3WF-NS-SUB-OUT                   /*         
*S****DK          0   A   6 3WF-NS-UNS-OUT                   /*         
*S****DK          0   A   6 3WF-NS-CMB-OUT                   /*         
*S****DK          0   A   6 3WF-NS-CON-OUT                   /*         
*S****DK          0   A   6 3WF-NS-TCH-OUT                   /*         
*S****DK          0   A   6 3WF-NS-SUB-PEND                  /*         
*S****DK          0   A   6 3WF-NS-UNS-PEND                  /*         
*S****DK          0   A   6 3WF-NS-CMB-PEND                  /*         
*S****DK          0   A   6 3WF-NS-SUB-TOTAL                 /*         
*S****DK          0   A   6 3WF-NS-UNS-TOTAL                 /*         
*S****DK          0   A   6 3WF-NS-CMB-TOTAL                 /*         
*S****DK          0   A   6 3WF-NS-CON-TOTAL                 /*         
*S****DK          0   A   6 3WF-NS-TCH-TOTAL                 /*         
*S****DK          0   A   6 3WF-NS-PERK-TOTAL                /*         
*S****DK          0   A   6 3WF-NS-PERK-CUR                  /*         
*S****DK          0   A   6 3WF-NS-TCH-TOTAL-UG              /*         
*S****DK          0   A   6 3WF-NS-TCH-TOTAL-GR              /*         
*S****DK          0   A  15 3WF-NS-PLUS-TOTAL                /*         
*S****DK          0   A  15 3WF-NS-LIFE-MAX-TOT              /*         
*S****DK          0   A1    3WF-NS-CMB-LIMIT-GRAD           
*S****DK          0   A1    3WF-NS-CMB-LIMIT-PROF           
*S****DK          0   A1    3WF-NS-PLUS-LIMIT-FLAG          
*S****DK          0   A1    3WF-NS-LIFE-MAX-LIMIT           
*S****DK          0   A   1 3WF-NS-LOAN-DEF-CHG              /*         
*S****DK          0   A   1 3WF-NS-LOAN-FRD-CHG              /*         
*S****DK          0   A   1 3WF-NS-LOAN-DIS-CHG              /*         
*S****DK          0   A   1 3WF-NS-LOAN-REP-CHG              /*         
*S****DK          0   A   1 3WF-NS-BANKRUPT-CHG              /*         
*S****DK          0   A   1 3WF-NS-TCH-CONV-CHG              /*         
*S****DK          0   A   1 3WF-NS-OVPMT-CHG                 /*         
*S****DK          0   A   1 3WF-NS-LOAN-CHG                  /*         
*S****DK          0   A   1 3WF-NS-PERKINS-CHG               /*         
*S****DK          0   A   1 3WF-NS-PELL-CHG                  /*         
*S****DK          0   A   1 3WF-NS-TCH-CHG                   /*         
*S****DK          0   A   1 3WF-NS-PELL-ADTNL                /*         
*S****DK          0   A   1 3WF-NS-LOAN-ADTNL                /*         
*S****DK          0   A   1 3WF-NS-TCH-ADTNL                 /*         
*S****DK          0   A   1 3WF-NS-DL-MPN                    /*         
*S****DK          0   A   1 3WF-NS-DLP-MPN                   /*         
*S****DK          0   A   1 3WF-NS-DLG-MPN                   /*         
*S****DK          0   A   1 3WF-NS-SUB-LIMIT-UG              /*         
*S****DK          0   A   1 3WF-NS-CMB-LIMIT-UG              /*         
*S****DK          0   A   1 3WF-NS-SUB-LIMIT-GR              /*         
*S****DK          0   A   1 3WF-NS-CMB-LIMIT-GR              /*         
*S****DK          0   A   1 3WF-NS-C-LEU-FLAG                /*         
*S****DK          0   A   7 3WF-NS-C-LEU                     /*         
*S****DK          0   A   1 3WF-NS-C-SUB-LE-FLAG             /*         
*S****DK          0   A   6 3WF-NS-C-SUB-USAGE-PD            /*         
*S****DK          0   A   1 3WF-NS-C-ENR-PATTERN             /*         
*S****DK          0   A20   3WF-NS-FILLER-020A  
*S****DK          0   A   2 3WF-NS-P1-SEQ                    /*         
*S****DK          0   A   3 3WF-NS-P1-VER                    /*         
*S****DK          0   A6    3WF-NS-P1-SAI       
*S****DK          0   A   8 3WF-NS-P1-SCHOOL                 /*         
*S****DK          0   A   2 3WF-NS-P1-TRAN                   /*         
*S****DK          0   A   8 3WF-NS-P1-DATE                   /*         
*S****DK          0   A   6 3WF-NS-P1-SCH-AWD                /*         
*S****DK          0   A   6 3WF-NS-P1-PAID                   /*         
*S****DK          0   A   7 3WF-NS-P1-SCH-PCT                /*         
*S****DK          0   A   6 3WF-NS-P1-AWARD                  /*         
*S****DK          0   A   1 3WF-NS-P1-ADDL-ELIG              /*         
*S****DK          0   A20   3WW-FILLER-020B     
*S****DK          0   A   2 3WF-NS-P2-SEQ                    /*         
*S****DK          0   A   3 3WF-NS-P2-VER                    /*         
*S****DK          0   A6    3WF-NS-P2-SAI       
*S****DK          0   A   8 3WF-NS-P2-SCHOOL                 /*         
*S****DK          0   A   2 3WF-NS-P2-TRAN                   /*         
*S****DK          0   A   8 3WF-NS-P2-DATE                   /*         
*S****DK          0   A   6 3WF-NS-P2-SCH-AWD                /*         
*S****DK          0   A   6 3WF-NS-P2-PAID                   /*         
*S****DK          0   A   7 3WF-NS-P2-SCH-PCT                /*         
*S****DK          0   A   6 3WF-NS-P2-AWARD                  /*         
*S****DK          0   A   1 3WF-NS-P2-ADDL-ELIG              /*         
*S****DK          0   A20   3WW-FILLER-020C     
*S****DK          0   A   2 3WF-NS-P3-SEQ                    /*         
*S****DK          0   A   3 3WF-NS-P3-VER                    /*         
*S****DK          0   A6    3WF-NS-P3-SAI       
*S****DK          0   A   8 3WF-NS-P3-SCHOOL                 /*         
*S****DK          0   A   2 3WF-NS-P3-TRAN                   /*         
*S****DK          0   A   8 3WF-NS-P3-DATE                   /*         
*S****DK          0   A   6 3WF-NS-P3-SCH-AWD                /*         
*S****DK          0   A   6 3WF-NS-P3-PAID                   /*         
*S****DK          0   A   7 3WF-NS-P3-SCH-PCT                /*         
*S****DK          0   A   6 3WF-NS-P3-AWARD                  /*         
*S****DK          0   A   1 3WF-NS-P3-ADDL-ELIG              /*         
*S****DK          0   A20   3WW-FILLER-020D     
*S****DK          0   A   2 3WF-NS-T1-SEQ                    /*         
*S****DK          0   A   8 3WF-NS-T1-SCHOOL                 /*         
*S****DK          0   A   2 3WF-NS-T1-TRAN                   /*         
*S****DK          0   A   8 3WF-NS-T1-DATE                   /*         
*S****DK          0   A   6 3WF-NS-T1-SCH-AWD                /*         
*S****DK          0   A   6 3WF-NS-T1-PAID                   /*         
*S****DK          0   A   6 3WF-NS-T1-AWARD                  /*         
*S****DK          0   A3    3WF-NS-T1-LEVEL     
*S****DK          0   A   4 3WF-NS-T1-AWDYEAR                /*         
*S****DK          0   A   1 3WF-NS-T1-CONV                   /*         
*S****DK          0   A4    3WF-NS-T1-DCHG      
*S****DK          0   A6    3WF-NS-T1-DCHG-AMT  
*S****DK          0   A6    3WF-NS-T1-ADJ-DSB   
*S****DK          0   A20   3WW-FILLER-020E     
*S****DK          0   A   2 3WF-NS-T2-SEQ                    /*         
*S****DK          0   A   8 3WF-NS-T2-SCHOOL                 /*         
*S****DK          0   A   2 3WF-NS-T2-TRAN                   /*         
*S****DK          0   A   8 3WF-NS-T2-DATE                   /*         
*S****DK          0   A   6 3WF-NS-T2-SCH-AWD                /*         
*S****DK          0   A   6 3WF-NS-T2-PAID                   /*         
*S****DK          0   A   6 3WF-NS-T2-AWARD                  /*         
*S****DK          0   A3    3WF-NS-T2-LEVEL     
*S****DK          0   A   4 3WF-NS-T2-AWDYEAR                /*         
*S****DK          0   A   1 3WF-NS-T2-CONV                   /*         
*S****DK          0   A4    3WF-NS-T2-DCHG      
*S****DK          0   A6    3WF-NS-T2-DCHG-AMT  
*S****DK          0   A6    3WF-NS-T2-ADJ-DSB   
*S****DK          0   A20   3WW-FILLER-020F     
*S****DK          0   A   2 3WF-NS-T3-SEQ                    /*         
*S****DK          0   A   8 3WF-NS-T3-SCHOOL                 /*         
*S****DK          0   A   2 3WF-NS-T3-TRAN                   /*         
*S****DK          0   A   8 3WF-NS-T3-DATE                   /*         
*S****DK          0   A   6 3WF-NS-T3-SCH-AWD                /*         
*S****DK          0   A   6 3WF-NS-T3-PAID                   /*         
*S****DK          0   A   6 3WF-NS-T3-AWARD                  /*         
*S****DK          0   A3    3WF-NS-T3-LEVEL     
*S****DK          0   A   4 3WF-NS-T3-AWDYEAR                /*         
*S****DK          0   A   1 3WF-NS-T3-CONV                   /*         
*S****DK          0   A4    3WF-NS-T3-DCHG      
*S****DK          0   A6    3WF-NS-T3-DCHG-AMT  
*S****DK          0   A6    3WF-NS-T3-ADJ-DSB   
*S****DK          0   A20   3WW-FILLER-020G     
*S****DK          0   A   2 3WF-NS-L01-SEQ                   /*         
*S****DK          0   A1    3WF-NS-L01-DFLT     
*S****DK          0   A   1 3WF-NS-L01-CHG                   /*         
*S****DK          0   A2    3WF-NS-L01-TYPE     
*S****DK          0   A   6 3WF-NS-L01-AMT                   /*         
*S****DK          0   A   2 3WF-NS-L01-STA                   /*         
*S****DK          0   A   8 3WF-NS-L01-STA-DATE              /*         
*S****DK          0   A   6 3WF-NS-L01-OUT                   /*         
*S****DK          0   A   8 3WF-NS-L01-OUT-DATE              /*         
*S****DK          0   A   8 3WF-NS-L01-BEG-DATE              /*         
*S****DK          0   A   8 3WF-NS-L01-END-DATE              /*         
*S****DK          0   A   3 3WF-NS-L01-GA                    /*         
*S****DK          0   A   3 3WF-NS-L01-CTC-TYPE              /*         
*S****DK          0   A   8 3WF-NS-L01-SCHOOL                /*         
*S****DK          0   A   8 3WF-NS-L01-CONTACT               /*         
*S****DK          0   A   3 3WF-NS-L01-LEVEL                 /*         
*S****DK          0   A   1 3WF-NS-L01-XUNS                  /*         
*S****DK          0   A   1 3WF-NS-L01-CAP                   /*         
*S****DK          0   A   6 3WF-NS-L01-DSB                   /*         
*S****DK          0   A   8 3WF-NS-L01-DSB-DATE              /*         
*S****DK          0   A   1 3WF-NS-L01-SUBSIDY               /*         
*S****DK          0   A   8 3WF-NS-L01-SUBSIDY-DT            /*         
*S****DK          0   A20   3WW-FILLER-020H     
*S****DK          0   A   2 3WF-NS-L02-SEQ                   /*         
*S****DK          0   A1    3WF-NS-L02-DFLT     
*S****DK          0   A   1 3WF-NS-L02-CHG                   /*         
*S****DK          0   A2    3WF-NS-L02-TYPE     
*S****DK          0   A   6 3WF-NS-L02-AMT                   /*         
*S****DK          0   A   2 3WF-NS-L02-STA                   /*         
*S****DK          0   A   8 3WF-NS-L02-STA-DATE              /*         
*S****DK          0   A   6 3WF-NS-L02-OUT                   /*         
*S****DK          0   A   8 3WF-NS-L02-OUT-DATE              /*         
*S****DK          0   A   8 3WF-NS-L02-BEG-DATE              /*         
*S****DK          0   A   8 3WF-NS-L02-END-DATE              /*         
*S****DK          0   A   3 3WF-NS-L02-GA                    /*         
*S****DK          0   A   3 3WF-NS-L02-CTC-TYPE              /*         
*S****DK          0   A   8 3WF-NS-L02-SCHOOL                /*         
*S****DK          0   A   8 3WF-NS-L02-CONTACT               /*         
*S****DK          0   A   3 3WF-NS-L02-LEVEL                 /*         
*S****DK          0   A   1 3WF-NS-L02-XUNS                  /*         
*S****DK          0   A   1 3WF-NS-L02-CAP                   /*         
*S****DK          0   A   6 3WF-NS-L02-DSB                   /*         
*S****DK          0   A   8 3WF-NS-L02-DSB-DATE              /*         
*S****DK          0   A   1 3WF-NS-L02-SUBSIDY               /*         
*S****DK          0   A   8 3WF-NS-L02-SUBSIDY-DT            /*         
*S****DK          0   A20   3WW-FILLER-020I     
*S****DK          0   A   2 3WF-NS-L03-SEQ                   /*         
*S****DK          0   A1    3WF-NS-L03-DFLT     
*S****DK          0   A   1 3WF-NS-L03-CHG                   /*         
*S****DK          0   A2    3WF-NS-L03-TYPE     
*S****DK          0   A   6 3WF-NS-L03-AMT                   /*         
*S****DK          0   A   2 3WF-NS-L03-STA                   /*         
*S****DK          0   A   8 3WF-NS-L03-STA-DATE              /*         
*S****DK          0   A   6 3WF-NS-L03-OUT                   /*         
*S****DK          0   A   8 3WF-NS-L03-OUT-DATE              /*         
*S****DK          0   A   8 3WF-NS-L03-BEG-DATE              /*         
*S****DK          0   A   8 3WF-NS-L03-END-DATE              /*         
*S****DK          0   A   3 3WF-NS-L03-GA                    /*         
*S****DK          0   A   3 3WF-NS-L03-CTC-TYPE              /*         
*S****DK          0   A   8 3WF-NS-L03-SCHOOL                /*         
*S****DK          0   A   8 3WF-NS-L03-CONTACT               /*         
*S****DK          0   A   3 3WF-NS-L03-LEVEL                 /*         
*S****DK          0   A   1 3WF-NS-L03-XUNS                  /*         
*S****DK          0   A   1 3WF-NS-L03-CAP                   /*         
*S****DK          0   A   6 3WF-NS-L03-DSB                   /*         
*S****DK          0   A   8 3WF-NS-L03-DSB-DATE              /*         
*S****DK          0   A   1 3WF-NS-L03-SUBSIDY               /*         
*S****DK          0   A   8 3WF-NS-L03-SUBSIDY-DT            /*         
*S****DK          0   A20   3WW-FILLER-020J     
*S****DK          0   A   2 3WF-NS-L04-SEQ                   /*         
*S****DK          0   A1    3WF-NS-L04-DFLT     
*S****DK          0   A   1 3WF-NS-L04-CHG                   /*         
*S****DK          0   A2    3WF-NS-L04-TYPE     
*S****DK          0   A   6 3WF-NS-L04-AMT                   /*         
*S****DK          0   A   2 3WF-NS-L04-STA                   /*         
*S****DK          0   A   8 3WF-NS-L04-STA-DATE              /*         
*S****DK          0   A   6 3WF-NS-L04-OUT                   /*         
*S****DK          0   A   8 3WF-NS-L04-OUT-DATE              /*         
*S****DK          0   A   8 3WF-NS-L04-BEG-DATE              /*         
*S****DK          0   A   8 3WF-NS-L04-END-DATE              /*         
*S****DK          0   A   3 3WF-NS-L04-GA                    /*         
*S****DK          0   A   3 3WF-NS-L04-CTC-TYPE              /*         
*S****DK          0   A   8 3WF-NS-L04-SCHOOL                /*         
*S****DK          0   A   8 3WF-NS-L04-CONTACT               /*         
*S****DK          0   A   3 3WF-NS-L04-LEVEL                 /*         
*S****DK          0   A   1 3WF-NS-L04-XUNS                  /*         
*S****DK          0   A   1 3WF-NS-L04-CAP                   /*         
*S****DK          0   A   6 3WF-NS-L04-DSB                   /*         
*S****DK          0   A   8 3WF-NS-L04-DSB-DATE              /*         
*S****DK          0   A   1 3WF-NS-L04-SUBSIDY               /*         
*S****DK          0   A   8 3WF-NS-L04-SUBSIDY-DT            /*         
*S****DK          0   A20   3WW-FILLER-020K     
*S****DK          0   A   2 3WF-NS-L05-SEQ                   /*         
*S****DK          0   A1    3WF-NS-L05-DFLT     
*S****DK          0   A   1 3WF-NS-L05-CHG                   /*         
*S****DK          0   A2    3WF-NS-L05-TYPE     
*S****DK          0   A   6 3WF-NS-L05-AMT                   /*         
*S****DK          0   A   2 3WF-NS-L05-STA                   /*         
*S****DK          0   A   8 3WF-NS-L05-STA-DATE              /*         
*S****DK          0   A   6 3WF-NS-L05-OUT                   /*         
*S****DK          0   A   8 3WF-NS-L05-OUT-DATE              /*         
*S****DK          0   A   8 3WF-NS-L05-BEG-DATE              /*         
*S****DK          0   A   8 3WF-NS-L05-END-DATE              /*         
*S****DK          0   A   3 3WF-NS-L05-GA                    /*         
*S****DK          0   A   3 3WF-NS-L05-CTC-TYPE              /*         
*S****DK          0   A   8 3WF-NS-L05-SCHOOL                /*         
*S****DK          0   A   8 3WF-NS-L05-CONTACT               /*         
*S****DK          0   A   3 3WF-NS-L05-LEVEL                 /*         
*S****DK          0   A   1 3WF-NS-L05-XUNS                  /*         
*S****DK          0   A   1 3WF-NS-L05-CAP                   /*         
*S****DK          0   A   6 3WF-NS-L05-DSB                   /*         
*S****DK          0   A   8 3WF-NS-L05-DSB-DATE              /*         
*S****DK          0   A   1 3WF-NS-L05-SUBSIDY               /*         
*S****DK          0   A   8 3WF-NS-L05-SUBSIDY-DT            /*         
*S****DK          0   A20   3WW-FILLER-020L     
*S****DK          0   A   2 3WF-NS-L06-SEQ                   /*         
*S****DK          0   A1    3WF-NS-L06-DFLT     
*S****DK          0   A   1 3WF-NS-L06-CHG                   /*         
*S****DK          0   A2    3WF-NS-L06-TYPE     
*S****DK          0   A   6 3WF-NS-L06-AMT                   /*         
*S****DK          0   A   2 3WF-NS-L06-STA                   /*         
*S****DK          0   A   8 3WF-NS-L06-STA-DATE              /*         
*S****DK          0   A   6 3WF-NS-L06-OUT                   /*         
*S****DK          0   A   8 3WF-NS-L06-OUT-DATE              /*         
*S****DK          0   A   8 3WF-NS-L06-BEG-DATE              /*         
*S****DK          0   A   8 3WF-NS-L06-END-DATE              /*         
*S****DK          0   A   3 3WF-NS-L06-GA                    /*         
*S****DK          0   A   3 3WF-NS-L06-CTC-TYPE              /*         
*S****DK          0   A   8 3WF-NS-L06-SCHOOL                /*         
*S****DK          0   A   8 3WF-NS-L06-CONTACT               /*         
*S****DK          0   A   3 3WF-NS-L06-LEVEL                 /*         
*S****DK          0   A   1 3WF-NS-L06-XUNS                  /*         
*S****DK          0   A   1 3WF-NS-L06-CAP                   /*         
*S****DK          0   A   6 3WF-NS-L06-DSB                   /*         
*S****DK          0   A   8 3WF-NS-L06-DSB-DATE              /*         
*S****DK          0   A   1 3WF-NS-L06-SUBSIDY               /*         
*S****DK          0   A   8 3WF-NS-L06-SUBSIDY-DT            /*         
*S****DK B        0   A     3WW-FILLER-1164     
*S****DE                     LE=1164
*S****DR          0        R2WF-NSLDS           
*S****DFR         0   A 250 3WF-NSLDS1                       /*         
*S****DFR         0   A 250 3WF-NSLDS2                       /*         
*S****DFR         0   A 250 3WF-NSLDS3                       /*         
*S****DFR         0   A 250 3WF-NSLDS4                       /*         
*S****DFR         0   A 250 3WF-NSLDS5                       /*         
*S****DFR         0   A250  3WF-NSLDS6          
*S****DK          0   A250  2WF-NSLDS7          
*S****DK          0   A250  2WF-NSLDS8          
*S****DK          0   A250  2WF-NSLDS9          
*S****DK          0   A250  2WF-NSLDS10         
*S****DK          0   A51   2WF-NSLDS11         
*C**                                FATEMP  WFNSL27O                        N S   NN0000        
*D01NAT8304N FATEMP  WFNSL27O                        ZWDNH   ZWDNH           S      
*D02            2026051209593702026051209593700000017651    
*D03LINUX   
*D04                 ISO_8859-1:1987
*S****SAG GENERATOR: WW-OBJECT-SUBP                   Version: 3.2.2    
*S****SAG TITLE: WFNSL27O           
*S****SAG SYSTEM: FINANCIER         
*S****SAG OBJECT-DESC: Record       
*S****SAG PRIME-FILE: WF-NSLDS-2627 
*S****SAG PRIME-KEY: WF-NSLDS-KEY   
*S****SAG HOLD-FIELD: WW-HOLD       
*S****SAG OBJECT-PDA: WFNSL27D      
*S****SAG RESTRICTED-PDA: WFNSL27R  
*S****SAG DESCS(1): This subprogram performs I/O functions for the      
*S****SAG DESCS(2): WF-NSLDS-2627 userview/file using the WF-NSLDS-KEY  
*S****SAG DESCS(3): primary superdescriptor.    
*S*************************************************************************         
*S***       
*S***                              WolffPack    
*S***       
*S*** Subprogram: WFNSL27O          
*S*** System    : FINANCIER         
*S*** Title     : WFNSL27O          
*S*** Function  : This subprogram performs I/O functions for the        
*S***             WF-NSLDS-2627 userview/file using the WF-NSLDS-KEY    
*S***             primary superdescriptor.      
*S***       
*S***       
*S***      Copyright 1995 - 2026 WolffPack, Inc.  All rights reserved.  
*S***       
*S*************************************************************************         
*S**DEFINE DATA         
*S**  GLOBAL USING WWGDA
*S**  PARAMETER USING WWPDA         
*S***       
*S**  PARAMETER USING WFNSL27D      
*S**  PARAMETER USING WFNSL27R      
*S**  PARAMETER USING WWAOBJ        
*S***       
*S**  LOCAL 
*S***       
*S*** Miscellaneous local variables.
*S**  01 #CURRENT-FIELD(A32) /* Current field name being proccessed     
*S**  01 #DB-CALL(A1)        /* D=Delete, U=Update, S=Store 
*S**  01 #D1(P3)             /* Temporary indices for MU and PE         
*S**  01 #D2(P3)        
*S**  01 #OBJECT(A20) INIT<'Record'>
*S**  01 #OLD-REC(L)         /* Record existed before.      
*S**  01 #SAVE-REC(L)        /* True if record is non-null. 
*S**  01 #DISP-BACKOUT(L) INIT<TRUE>    /* Display message on BACKOUT TRANS         
*S**  01 #SAVE-MSG(A79)      /* Save previously defined messages        
*S***       
*S*** Views used to build object.   
*S***       
*S*** View for histogram on NEXT action.        
*S**  01 NEXT-VIEW VIEW OF WF-NSLDS-2627        
*S**    02 WF-NSLDS-KEY 
*S***       
*S*** Primary object entity.        
*S**  01 WF-NSLDS-2627 VIEW OF WF-NSLDS-2627    
*S**    02 WW-STUDENT-ID
*S**    02 WF-FAO       
*S**    02 WW-SYSTEM    
*S**      03 WW-HOLD    
*S**      03 WW-CDATE   
*S**      03 WW-MDATE   
*S**    02 WF-NSLDS     
*S**      03 WF-NS-PELL-OVP         
*S**      03 WF-NS-PELL-OVP-CTC     
*S**      03 WF-NS-SEOG-OVP         
*S**      03 WF-NS-SEOG-OVP-CTC     
*S**      03 WF-NS-PERK-OVP         
*S**      03 WF-NS-PERK-OVP-CTC     
*S**      03 WF-NS-TCH-OVP          
*S**      03 WF-NS-TCH-OVP-CTC      
*S**      03 WF-NS-IAAS-OVP         
*S**      03 WF-NS-IAAS-OVP-CTC     
*S**      03 WF-NS-LOAN-DEF         
*S**      03 WF-NS-LOAN-DIS         
*S**      03 WF-NS-LOAN-FRD         
*S**      03 WF-NS-LOAN-REP         
*S**      03 WF-NS-BANKRUPT         
*S**      03 WF-NS-TCH-CONV         
*S**      03 WF-NS-SUB-OUT          
*S**      03 WF-NS-UNS-OUT          
*S**      03 WF-NS-CMB-OUT          
*S**      03 WF-NS-CON-OUT          
*S**      03 WF-NS-TCH-OUT          
*S**      03 WF-NS-SUB-PEND         
*S**      03 WF-NS-UNS-PEND         
*S**      03 WF-NS-CMB-PEND         
*S**      03 WF-NS-SUB-TOTAL        
*S**      03 WF-NS-UNS-TOTAL        
*S**      03 WF-NS-CMB-TOTAL        
*S**      03 WF-NS-CON-TOTAL        
*S**      03 WF-NS-TCH-TOTAL        
*S**      03 WF-NS-PERK-TOTAL       
*S**      03 WF-NS-PERK-CUR         
*S**      03 WF-NS-TCH-TOTAL-UG     
*S**      03 WF-NS-TCH-TOTAL-GR     
*S**      03 WF-NS-LOAN-DEF-CHG     
*S**      03 WF-NS-LOAN-FRD-CHG     
*S**      03 WF-NS-LOAN-DIS-CHG     
*S**      03 WF-NS-LOAN-REP-CHG     
*S**      03 WF-NS-BANKRUPT-CHG     
*S**      03 WF-NS-TCH-CONV-CHG     
*S**      03 WF-NS-OVPMT-CHG        
*S**      03 WF-NS-LOAN-CHG         
*S**      03 WF-NS-PERKINS-CHG      
*S**      03 WF-NS-PELL-CHG         
*S**      03 WF-NS-TCH-CHG          
*S**      03 WF-NS-PELL-ADTNL       
*S**      03 WF-NS-LOAN-ADTNL       
*S**      03 WF-NS-TCH-ADTNL        
*S**      03 WF-NS-DL-MPN           
*S**      03 WF-NS-DLP-MPN          
*S**      03 WF-NS-DLG-MPN          
*S**      03 WF-NS-SUB-LIMIT-UG     
*S**      03 WF-NS-CMB-LIMIT-UG     
*S**      03 WF-NS-SUB-LIMIT-GR     
*S**      03 WF-NS-CMB-LIMIT-GR     
*S**      03 WF-NS-C-LEU-FLAG       
*S**      03 WF-NS-C-LEU
*S**      03 WF-NS-C-SUB-LE-FLAG    
*S**      03 WF-NS-C-SUB-USAGE-PD   
*S**      03 WF-NS-C-ENR-PATTERN    
*S**      03 WW-FILLER1 
*S**      03 WF-NS-P1-SEQ           
*S**      03 WF-NS-P1-VER           
*S**      03 WF-NS-P1-SAI           
*S**      03 WF-NS-P1-SCHOOL        
*S**      03 WF-NS-P1-TRAN          
*S**      03 WF-NS-P1-DATE          
*S**      03 WF-NS-P1-SCH-AWD       
*S**      03 WF-NS-P1-PAID          
*S**      03 WF-NS-P1-SCH-PCT       
*S**      03 WF-NS-P1-AWARD         
*S**      03 WF-NS-P1-ADDL-ELIG     
*S**      03 WW-FILLER2 
*S**      03 WF-NS-P2-SEQ           
*S**      03 WF-NS-P2-VER           
*S**      03 WF-NS-P2-SAI           
*S**      03 WF-NS-P2-SCHOOL        
*S**      03 WF-NS-P2-TRAN          
*S**      03 WF-NS-P2-DATE          
*S**      03 WF-NS-P2-SCH-AWD       
*S**      03 WF-NS-P2-PAID          
*S**      03 WF-NS-P2-SCH-PCT       
*S**      03 WF-NS-P2-AWARD         
*S**      03 WF-NS-P2-ADDL-ELIG     
*S**      03 WW-FILLER3 
*S**      03 WF-NS-P3-SEQ           
*S**      03 WF-NS-P3-VER           
*S**      03 WF-NS-P3-SAI           
*S**      03 WF-NS-P3-SCHOOL        
*S**      03 WF-NS-P3-TRAN          
*S**      03 WF-NS-P3-DATE          
*S**      03 WF-NS-P3-SCH-AWD       
*S**      03 WF-NS-P3-PAID          
*S**      03 WF-NS-P3-SCH-PCT       
*S**      03 WF-NS-P3-AWARD         
*S**      03 WF-NS-P3-ADDL-ELIG     
*S**      03 WW-FILLER4 
*S**      03 WF-NS-T1-SEQ           
*S**      03 WF-NS-T1-SCHOOL        
*S**      03 WF-NS-T1-TRAN          
*S**      03 WF-NS-T1-DATE          
*S**      03 WF-NS-T1-SCH-AWD       
*S**      03 WF-NS-T1-PAID          
*S**      03 WF-NS-T1-AWARD         
*S**      03 WF-NS-T1-LEVEL         
*S**      03 WF-NS-T1-AWDYEAR       
*S**      03 WF-NS-T1-CONV          
*S**      03 WF-NS-T1-DCHG          
*S**      03 WF-NS-T1-DCHG-AMT      
*S**      03 WF-NS-T1-ADJ-DSB       
*S**      03 WW-FILLER5 
*S**      03 WF-NS-T2-SEQ           
*S**      03 WF-NS-T2-SCHOOL        
*S**      03 WF-NS-T2-TRAN          
*S**      03 WF-NS-T2-DATE          
*S**      03 WF-NS-T2-SCH-AWD       
*S**      03 WF-NS-T2-PAID          
*S**      03 WF-NS-T2-AWARD         
*S**      03 WF-NS-T2-LEVEL         
*S**      03 WF-NS-T2-AWDYEAR       
*S**      03 WF-NS-T2-CONV          
*S**      03 WF-NS-T2-DCHG          
*S**      03 WF-NS-T2-DCHG-AMT      
*S**      03 WF-NS-T2-ADJ-DSB       
*S**      03 WW-FILLER6 
*S**      03 WF-NS-T3-SEQ           
*S**      03 WF-NS-T3-SCHOOL        
*S**      03 WF-NS-T3-TRAN          
*S**      03 WF-NS-T3-DATE          
*S**      03 WF-NS-T3-SCH-AWD       
*S**      03 WF-NS-T3-PAID          
*S**      03 WF-NS-T3-AWARD         
*S**      03 WF-NS-T3-LEVEL         
*S**      03 WF-NS-T3-AWDYEAR       
*S**      03 WF-NS-T3-CONV          
*S**      03 WF-NS-T3-DCHG          
*S**      03 WF-NS-T3-DCHG-AMT      
*S**      03 WF-NS-T3-ADJ-DSB       
*S**      03 WW-FILLER7 
*S**      03 WF-NS-L01-SEQ          
*S**      03 WF-NS-L01-DFLT         
*S**      03 WF-NS-L01-CHG          
*S**      03 WF-NS-L01-TYPE         
*S**      03 WF-NS-L01-AMT          
*S**      03 WF-NS-L01-STA          
*S**      03 WF-NS-L01-STA-DATE     
*S**      03 WF-NS-L01-OUT          
*S**      03 WF-NS-L01-OUT-DATE     
*S**      03 WF-NS-L01-BEG-DATE     
*S**      03 WF-NS-L01-END-DATE     
*S**      03 WF-NS-L01-GA           
*S**      03 WF-NS-L01-CTC-TYPE     
*S**      03 WF-NS-L01-SCHOOL       
*S**      03 WF-NS-L01-CONTACT      
*S**      03 WF-NS-L01-LEVEL        
*S**      03 WF-NS-L01-XUNS         
*S**      03 WF-NS-L01-CAP          
*S**      03 WF-NS-L01-DSB          
*S**      03 WF-NS-L01-DSB-DATE     
*S**      03 WF-NS-L01-SUBSIDY      
*S**      03 WF-NS-L01-SUBSIDY-DT   
*S**      03 WW-FILLER8 
*S**      03 WF-NS-L02-SEQ          
*S**      03 WF-NS-L02-DFLT         
*S**      03 WF-NS-L02-CHG          
*S**      03 WF-NS-L02-TYPE         
*S**      03 WF-NS-L02-AMT          
*S**      03 WF-NS-L02-STA          
*S**      03 WF-NS-L02-STA-DATE     
*S**      03 WF-NS-L02-OUT          
*S**      03 WF-NS-L02-OUT-DATE     
*S**      03 WF-NS-L02-BEG-DATE     
*S**      03 WF-NS-L02-END-DATE     
*S**      03 WF-NS-L02-GA           
*S**      03 WF-NS-L02-CTC-TYPE     
*S**      03 WF-NS-L02-SCHOOL       
*S**      03 WF-NS-L02-CONTACT      
*S**      03 WF-NS-L02-LEVEL        
*S**      03 WF-NS-L02-XUNS         
*S**      03 WF-NS-L02-CAP          
*S**      03 WF-NS-L02-DSB          
*S**      03 WF-NS-L02-DSB-DATE     
*S**      03 WF-NS-L02-SUBSIDY      
*S**      03 WF-NS-L02-SUBSIDY-DT   
*S**      03 WW-FILLER9 
*S**      03 WF-NS-L03-SEQ          
*S**      03 WF-NS-L03-DFLT         
*S**      03 WF-NS-L03-CHG          
*S**      03 WF-NS-L03-TYPE         
*S**      03 WF-NS-L03-AMT          
*S**      03 WF-NS-L03-STA          
*S**      03 WF-NS-L03-STA-DATE     
*S**      03 WF-NS-L03-OUT          
*S**      03 WF-NS-L03-OUT-DATE     
*S**      03 WF-NS-L03-BEG-DATE     
*S**      03 WF-NS-L03-END-DATE     
*S**      03 WF-NS-L03-GA           
*S**      03 WF-NS-L03-CTC-TYPE     
*S**      03 WF-NS-L03-SCHOOL       
*S**      03 WF-NS-L03-CONTACT      
*S**      03 WF-NS-L03-LEVEL        
*S**      03 WF-NS-L03-XUNS         
*S**      03 WF-NS-L03-CAP          
*S**      03 WF-NS-L03-DSB          
*S**      03 WF-NS-L03-DSB-DATE     
*S**      03 WF-NS-L03-SUBSIDY      
*S**      03 WF-NS-L03-SUBSIDY-DT   
*S**      03 WW-FILLER10
*S**      03 WF-NS-L04-SEQ          
*S**      03 WF-NS-L04-DFLT         
*S**      03 WF-NS-L04-CHG          
*S**      03 WF-NS-L04-TYPE         
*S**      03 WF-NS-L04-AMT          
*S**      03 WF-NS-L04-STA          
*S**      03 WF-NS-L04-STA-DATE     
*S**      03 WF-NS-L04-OUT          
*S**      03 WF-NS-L04-OUT-DATE     
*S**      03 WF-NS-L04-BEG-DATE     
*S**      03 WF-NS-L04-END-DATE     
*S**      03 WF-NS-L04-GA           
*S**      03 WF-NS-L04-CTC-TYPE     
*S**      03 WF-NS-L04-SCHOOL       
*S**      03 WF-NS-L04-CONTACT      
*S**      03 WF-NS-L04-LEVEL        
*S**      03 WF-NS-L04-XUNS         
*S**      03 WF-NS-L04-CAP          
*S**      03 WF-NS-L04-DSB          
*S**      03 WF-NS-L04-DSB-DATE     
*S**      03 WF-NS-L04-SUBSIDY      
*S**      03 WF-NS-L04-SUBSIDY-DT   
*S**      03 WW-FILLER11
*S**      03 WF-NS-L05-SEQ          
*S**      03 WF-NS-L05-DFLT         
*S**      03 WF-NS-L05-CHG          
*S**      03 WF-NS-L05-TYPE         
*S**      03 WF-NS-L05-AMT          
*S**      03 WF-NS-L05-STA          
*S**      03 WF-NS-L05-STA-DATE     
*S**      03 WF-NS-L05-OUT          
*S**      03 WF-NS-L05-OUT-DATE     
*S**      03 WF-NS-L05-BEG-DATE     
*S**      03 WF-NS-L05-END-DATE     
*S**      03 WF-NS-L05-GA           
*S**      03 WF-NS-L05-CTC-TYPE     
*S**      03 WF-NS-L05-SCHOOL       
*S**      03 WF-NS-L05-CONTACT      
*S**      03 WF-NS-L05-LEVEL        
*S**      03 WF-NS-L05-XUNS         
*S**      03 WF-NS-L05-CAP          
*S**      03 WF-NS-L05-DSB          
*S**      03 WF-NS-L05-DSB-DATE     
*S**      03 WF-NS-L05-SUBSIDY      
*S**      03 WF-NS-L05-SUBSIDY-DT   
*S**      03 WW-FILLER12
*S**      03 WF-NS-L06-SEQ          
*S**      03 WF-NS-L06-DFLT         
*S**      03 WF-NS-L06-CHG          
*S**      03 WF-NS-L06-TYPE         
*S**      03 WF-NS-L06-AMT          
*S**      03 WF-NS-L06-STA          
*S**      03 WF-NS-L06-STA-DATE     
*S**      03 WF-NS-L06-OUT          
*S**      03 WF-NS-L06-OUT-DATE     
*S**      03 WF-NS-L06-BEG-DATE     
*S**      03 WF-NS-L06-END-DATE     
*S**      03 WF-NS-L06-GA           
*S**      03 WF-NS-L06-CTC-TYPE     
*S**      03 WF-NS-L06-SCHOOL       
*S**      03 WF-NS-L06-CONTACT      
*S**      03 WF-NS-L06-LEVEL        
*S**      03 WF-NS-L06-XUNS         
*S**      03 WF-NS-L06-CAP          
*S**      03 WF-NS-L06-DSB          
*S**      03 WF-NS-L06-DSB-DATE     
*S**      03 WF-NS-L06-SUBSIDY      
*S**      03 WF-NS-L06-SUBSIDY-DT   
*S**      03 WW-FILLER13
*S**    02 WF-NSLDS2    
*S**      03 WF-NS-LIMIT-EXCP       
*S**      03 WF-NS-DSB-DATE-FLAG    
*S**      03 WF-NS-PLUS-TOTAL       
*S**      03 WF-NS-LIFE-MAX-TOT     
*S**      03 WF-NS-CMB-LIMIT-GRAD   
*S**      03 WF-NS-CMB-LIMIT-PROF   
*S**      03 WF-NS-PLUS-LIMIT-FLAG  
*S**      03 WF-NS-LIFE-MAX-LIMIT   
*S**END-DEFINE          
*S***       
*S***       
*S*** Populate WW-GDA from WW-PDA   
*S**MOVE BY POSITION WW-PDA TO WW-GDA           
*S***       
*S***       
*S*** Initialize output fields.     
*S**ASSIGN #SAVE-MSG = ##MSG        
*S**RESET WWAOBJ.OUTPUTS ##MSG ##MSG-DATA(*) ##RETURN-CODE  
*S***       
*S*** Build up prime key of the object.         
*S**MOVE BY NAME WFNSL27D TO WFNSL27D-ID.STRUCTURE          
*S***       
*S*************************************************************************         
*S***       
*S*** Set up repeat to allow escape from within a subroutine.           
*S**PROG.   
*S**REPEAT  
*S***       
*S*** Decide what to do based on function supplied.         
*S**  DECIDE ON FIRST VALUE WWAOBJ.#FUNCTION    
*S**    VALUE 'GET' /* Read the object          
*S**      /*
*S**      /* Object exists, get object          
*S**      PERFORM GET-OBJECT        
*S**      PERFORM SET-OBJECT-ID     
*S**    VALUE 'NEXT' /* Read the next higher object         
*S**      /*
*S**      /* Histogram for next higher value from one in object.        
*S**      HISTOGRAM(2) NEXT-VIEW FOR WF-NSLDS-KEY           
*S**                   STARTING FROM WFNSL27D-ID
*S**        IF NEXT-VIEW.WF-NSLDS-KEY NE WFNSL27D-ID THEN   
*S**          ASSIGN WFNSL27D-ID = NEXT-VIEW.WF-NSLDS-KEY   
*S**          MOVE BY NAME WFNSL27D-ID.STRUCTURE TO WFNSL27D
*S**          PERFORM GET-OBJECT    
*S**          ASSIGN ##MSG-DATA(1) = #OBJECT    
*S**          ESCAPE BOTTOM         
*S**        END-IF      
*S**      END-HISTOGRAM 
*S**      /*
*S**      /* No records beyond current record.  
*S**      IF NOT WWAOBJ.#EXISTS     
*S**        ASSIGN ##MSG = 'End of data reached'
*S**        ASSIGN ##RETURN-CODE = 'W'          /* Warning. 
*S**      END-IF        
*S**    VALUE 'UPDATE','DELETE' /* Modify or purge current object       
*S**      /*
*S**      /* Make sure the record was held prior to updating.           
*S**      IF WFNSL27D-ID NE WFNSL27R.HELD-ID THEN           
*S**        ASSIGN ##MSG = 'Record not in held status'      
*S**        PERFORM PROCESS-ERROR   
*S**      END-IF        
*S**      PERFORM HOLD-OBJECT       
*S**      PERFORM SET-OBJECT-ID     
*S**      IF WWAOBJ.#FUNCTION = 'DELETE'        
*S**        ASSIGN ##MSG = 'Record purged successfully'     
*S**      END-IF        
*S**    VALUE 'EXISTS' /* Existence check       
*S**      PERFORM CLEAR 
*S**      PERFORM CHECK-EXISTENCE   
*S**    VALUE 'STORE' /* Add new object         
*S**      PERFORM CREATE-OBJECT     
*S**      PERFORM SET-OBJECT-ID     
*S**    VALUE 'INITIALIZE'          
*S**      PERFORM CLEAR 
*S**    ANY 
*S**      PERFORM RELOAD-MSG        
*S**      MOVE BY POSITION WW-GDA TO WW-PDA     
*S**      ESCAPE BOTTOM(PROG.) IMMEDIATE /* All done.       
*S**    NONE /* Unknown action code 
*S**      ASSIGN ##MSG-DATA(1) = #OBJECT        
*S**      ASSIGN ##MSG-DATA(2) = WWAOBJ.#FUNCTION           
*S**      ASSIGN ##MSG = 'Invalid:1:function specified::2:' 
*S**      PERFORM PROCESS-ERROR     
*S**  END-DECIDE        
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE PROCESS-ERROR 
*S*************************************************************************         
*S***       
*S**  IF ##MSG-DATA(1) = ' '               /* Set default for :1:.      
*S**    PERFORM SET-OBJECT-ID       
*S**  END-IF
*S**  ASSIGN ##RETURN-CODE = 'E' /* Error.      
*S**  IF #DISP-BACKOUT  
*S**    WRITE 'Issuing Backout transaction for action:' #FUNCTION       
*S**          / '  in subprogram' *PROGRAM      
*S**  END-IF
*S**  BACKOUT TRANSACTION           
*S**  MOVE BY POSITION WW-GDA TO WW-PDA         
*S**  ESCAPE BOTTOM(PROG.) IMMEDIATE
*S**END-SUBROUTINE /* PROCESS-ERROR 
*S***       
*S**END-REPEAT          
*S***       
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE CREATE-OBJECT 
*S*************************************************************************         
*S***       
*S**  ASSIGN WFNSL27D.WW-CDATE = *DATX          
*S***       
*S*** Don't allow the key to be null.           
*S**  IF WFNSL27D-ID = NEXT-VIEW.WF-NSLDS-KEY /* Compare with null      
*S**    ASSIGN ##MSG-DATA(1) = #OBJECT          
*S**    ASSIGN ##MSG = ':1:identifier is required'          
*S**    PERFORM PROCESS-ERROR       
*S**  END-IF
*S**  /*    
*S**  /* If object already exist, return with error.        
*S**  PERFORM CHECK-EXISTENCE       
*S**  IF WWAOBJ.#EXISTS THEN        
*S**    ASSIGN ##MSG = ':1:already exists'      
*S**    PERFORM PROCESS-ERROR       
*S**  END-IF
*S**  PERFORM EDIT-OBJECT /* Pre-edit object header         
*S**  ASSIGN WF-NSLDS-2627.WW-HOLD = *TIMN      
*S**  ASSIGN WFNSL27R.INTERVENING-UPD-FLD =     
*S**    WF-NSLDS-2627.WW-HOLD       
*S**  ASSIGN WFNSL27R.HELD-ID = WFNSL27D-ID     
*S**  STORE WF-NSLDS-2627           
*S**END-SUBROUTINE /* CREATE-OBJECT 
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE GET-OBJECT    
*S*************************************************************************         
*S***       
*S*** Get the primary object record.
*S**  PERFORM CLEAR     
*S**  FIND WF-NSLDS-2627 WITH WF-NSLDS-KEY = WFNSL27D-ID    
*S**    IF NO RECORDS FOUND         
*S**      /*
*S**      /* Return the fact that the object does not exist.
*S**      ESCAPE ROUTINE
*S**    END-NOREC       
*S**    ASSIGN WWAOBJ.#EXISTS = TRUE
*S**    /*  
*S**    /* "Hold" the record by capturing the value of the update flag. 
*S**    ASSIGN WFNSL27R.INTERVENING-UPD-FLD =   
*S**           WF-NSLDS-2627.WW-HOLD
*S**    /*  
*S**    /* Shift primary entity information to object       
*S**    MOVE BY NAME WF-NSLDS-2627 TO WFNSL27D  
*S**    ASSIGN WFNSL27R.HELD-ID = WFNSL27D-ID   
*S**  END-FIND          
*S**END-SUBROUTINE /* GET-OBJECT    
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE HOLD-OBJECT   
*S*************************************************************************         
*S***       
*S*** Get primary entity and process it.        
*S**  HOLD-PRIME.       
*S**  FIND WF-NSLDS-2627 WITH       
*S**      WF-NSLDS-KEY = WFNSL27D-ID
*S**    IF NO RECORDS FOUND         
*S**      /*
*S**      /* Trying to process an object that doesn't exist.
*S**      ASSIGN ##MSG = 'Intervening purge, please try again'          
*S**      RESET WFNSL27R
*S**      PERFORM PROCESS-ERROR     
*S**    END-NOREC       
*S**    IF WFNSL27R.INTERVENING-UPD-FLD NE      
*S**       WF-NSLDS-2627.WW-HOLD THEN           
*S**      ASSIGN ##MSG = 'Intervening update, please try again'         
*S**      RESET WFNSL27R
*S**      PERFORM PROCESS-ERROR     
*S**    END-IF          
*S**    ASSIGN WWAOBJ.#EXISTS = TRUE
*S**    PERFORM EDIT-OBJECT /* Pre-edit object header       
*S**    DECIDE ON EVERY VALUE WWAOBJ.#FUNCTION  
*S**      VALUE 'UPDATE'
*S**        ASSIGN WF-NSLDS-2627.WW-HOLD = *TIMN
*S**        ASSIGN WF-NSLDS-2627.WW-MDATE = *DATX           
*S**        ASSIGN WFNSL27R.INTERVENING-UPD-FLD =           
*S**          WF-NSLDS-2627.WW-HOLD 
*S**        UPDATE(HOLD-PRIME.)     
*S**      VALUE 'DELETE'
*S**        DELETE(HOLD-PRIME.)     
*S**        RESET WFNSL27R.HELD-ID  
*S**      NONE IGNORE   
*S**    END-DECIDE      
*S**  END-FIND          
*S**END-SUBROUTINE /* HOLD-OBJECT   
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE CHECK-AND-UPDATE-OBJECT /* Process all sub-entities           
*S*************************************************************************         
*S***       
*S**  ESCAPE ROUTINE /* No sub-entities         
*S**END-SUBROUTINE /* CHECK-AND-UPDATE-OBJECT   
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE EDIT-OBJECT   
*S*************************************************************************         
*S***       
*S**  IF WWAOBJ.#FUNCTION = 'UPDATE' OR = 'STORE'           
*S**    /*  
*S**    /* Load file view           
*S**    MOVE BY NAME WFNSL27D TO WF-NSLDS-2627  
*S**  END-IF
*S**END-SUBROUTINE /* EDIT-OBJECT   
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE CHECK-EXISTENCE           
*S*************************************************************************         
*S***       
*S*** Check whether object currently exists.    
*S**  EXISTENCE-CHECK.  
*S**  HISTOGRAM(1) NEXT-VIEW FOR WF-NSLDS-KEY   
*S**               FROM WFNSL27D-ID THRU WFNSL27D-ID        
*S**    ASSIGN WWAOBJ.#EXISTS = TRUE
*S**  END-HISTOGRAM     
*S**END-SUBROUTINE /* CHECK-EXISTENCE           
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE CLEAR         
*S*************************************************************************         
*S***       
*S**  MOVE BY NAME WFNSL27D TO WFNSL27D-ID.STRUCTURE /* Capture key.    
*S**  RESET WFNSL27D WFNSL27R       
*S**  MOVE BY NAME WFNSL27D-ID.STRUCTURE TO WFNSL27D /* Restore key.    
*S**END-SUBROUTINE /* CLEAR         
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE GET-DB-CALL   
*S*************************************************************************         
*S***       
*S**INCLUDE WWDBCALL    
*S**END-SUBROUTINE /* GET-DB-CALL   
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE SET-OBJECT-ID 
*S*************************************************************************         
*S***       
*S**  COMPRESS WFNSL27D.WF-FAO      
*S**       '-' WFNSL27D.WW-STUDENT-ID           
*S**        TO ##MSG-DATA(1) LEAVING NO         
*S**  COMPRESS #OBJECT ##MSG-DATA(1) TO ##MSG-DATA(1)       
*S**END-SUBROUTINE /* SET-OBJECT-ID 
*S***       
*S*************************************************************************         
*S**DEFINE SUBROUTINE RELOAD-MSG    
*S*************************************************************************         
*S***       
*S*** If no messages set in subprogram, reset passed message
*S**  IF ##MSG = ' '    
*S**    ASSIGN ##MSG = #SAVE-MSG    
*S**  END-IF
*S**END-SUBROUTINE /* RELOAD-MSG    
*S**END     
*C**                                FATEMP  WFNSL27S                        P S   NN0000        
*D01NAT8304P FATEMP  WFNSL27S                        ZWDNH   ZWDNH           S      
*D02            2026051307310302026051307310300000013766    
*D03LINUX   
*D04                 ISO_8859-1:1987
*S****C           0   ***********************************************************************   
*S****C           0   * 
*S****C           0   *         WolffPack, Inc. 
*S****C           0   *                                            Copyright 1995 - 2026        
*S****C           0   * PDA:    WFNSL27S                              WolffPack, Inc.           
*S****C           0   * System: FINANCIER                           All rights reserved.        
*S****C           0   * 
*S****C           0   ***********************************************************************   
*S****C           0   * 
*S****C           0   * 
*S****DS          0         1WFNSL27S                        /* WF-NSLDS-2627 Shadow File       
*S****DS          0         2WF-NSLDS-2627-SHADOW-FILE       /*         
*S****DK          0   A  10 3WW-CDATE                        /*         
*S****DK          0   A  10 3WW-MDATE                        /*         
*S****DK          0   A   8 3WF-NS-PELL-OVP-CTC              /*         
*S****DK          0   A   8 3WF-NS-SEOG-OVP-CTC              /*         
*S****DK          0   A   8 3WF-NS-PERK-OVP-CTC              /*         
*S****DK          0   A   8 3WF-NS-TCH-OVP-CTC               /*         
*S****DK          0   A   8 3WF-NS-IAAS-OVP-CTC              /*         
*S****DK          0   A   6 3WF-NS-SUB-OUT                   /*         
*S****DK          0   A   6 3WF-NS-UNS-OUT                   /*         
*S****DK          0   A   6 3WF-NS-CMB-OUT                   /*         
*S****DK          0   A   6 3WF-NS-CON-OUT                   /*         
*S****DK          0   A   6 3WF-NS-TCH-OUT                   /*         
*S****DK          0   A   6 3WF-NS-SUB-PEND                  /*         
*S****DK          0   A   6 3WF-NS-UNS-PEND                  /*         
*S****DK          0   A   6 3WF-NS-CMB-PEND                  /*         
*S****DK          0   A   6 3WF-NS-SUB-TOTAL                 /*         
*S****DK          0   A   6 3WF-NS-UNS-TOTAL                 /*         
*S****DK          0   A   6 3WF-NS-CMB-TOTAL                 /*         
*S****DK          0   A   6 3WF-NS-CON-TOTAL                 /*         
*S****DK          0   A   6 3WF-NS-TCH-TOTAL                 /*         
*S****DK          0   A   6 3WF-NS-PERK-TOTAL                /*         
*S****DK          0   A   6 3WF-NS-PERK-CUR                  /*         
*S****DK          0   A   6 3WF-NS-TCH-TOTAL-UG              /*         
*S****DK          0   A   6 3WF-NS-TCH-TOTAL-GR              /*         
*S****DK          0   A   7 3WF-NS-C-LEU                     /*         
*S****DK          0   A   6 3WF-NS-C-SUB-USAGE-PD            /*         
*S****DK          0   A   2 3WF-NS-P1-SEQ                    /*         
*S****DK          0   A   3 3WF-NS-P1-VER                    /*         
*S****DK          0   A   8 3WF-NS-P1-SAI                    /*         
*S****DK          0   A   2 3WF-NS-P1-TRAN                   /*         
*S****DK          0   A  10 3WF-NS-P1-DATE                   /*         
*S****DK          0   A   7 3WF-NS-P1-SCH-AWD                /*         
*S****DK          0   A   7 3WF-NS-P1-PAID                   /*         
*S****DK          0   A   7 3WF-NS-P1-SCH-PCT                /*         
*S****DK          0   A   7 3WF-NS-P1-AWARD                  /*         
*S****DK          0   A   1 3WF-NS-P1-ADDL-ELIG              /*         
*S****DK          0   A   2 3WF-NS-P2-SEQ                    /*         
*S****DK          0   A   3 3WF-NS-P2-VER                    /*         
*S****DK          0   A   8 3WF-NS-P2-SAI                    /*         
*S****DK          0   A   2 3WF-NS-P2-TRAN                   /*         
*S****DK          0   A  10 3WF-NS-P2-DATE                   /*         
*S****DK          0   A   7 3WF-NS-P2-SCH-AWD                /*         
*S****DK          0   A   7 3WF-NS-P2-PAID                   /*         
*S****DK          0   A   7 3WF-NS-P2-SCH-PCT                /*         
*S****DK          0   A   7 3WF-NS-P2-AWARD                  /*         
*S****DK          0   A   1 3WF-NS-P2-ADDL-ELIG              /*         
*S****DK          0   A   2 3WF-NS-P3-SEQ                    /*         
*S****DK          0   A   3 3WF-NS-P3-VER                    /*         
*S****DK          0   A   8 3WF-NS-P3-SAI                    /*         
*S****DK          0   A   2 3WF-NS-P3-TRAN                   /*         
*S****DK          0   A  10 3WF-NS-P3-DATE                   /*         
*S****DK          0   A   7 3WF-NS-P3-SCH-AWD                /*         
*S****DK          0   A   7 3WF-NS-P3-PAID                   /*         
*S****DK          0   A   7 3WF-NS-P3-SCH-PCT                /*         
*S****DK          0   A   7 3WF-NS-P3-AWARD                  /*         
*S****DK          0   A   1 3WF-NS-P3-ADDL-ELIG              /*         
*S****DK          0   A   2 3WF-NS-T1-SEQ                    /*         
*S****DK          0   A   2 3WF-NS-T1-TRAN                   /*         
*S****DK          0   A  10 3WF-NS-T1-DATE                   /*         
*S****DK          0   A   7 3WF-NS-T1-SCH-AWD                /*         
*S****DK          0   A   7 3WF-NS-T1-PAID                   /*         
*S****DK          0   A   7 3WF-NS-T1-AWARD                  /*         
*S****DK          0   A3    3WF-NS-T1-LEVEL     
*S****DK          0   A   4 3WF-NS-T1-AWDYEAR                /*         
*S****DK          0   A   1 3WF-NS-T1-CONV                   /*         
*S****DK          0   A   4 3WF-NS-T1-DCHG                   /*         
*S****DK          0   A   6 3WF-NS-T1-DCHG-AMT               /*         
*S****DK          0   A   6 3WF-NS-T1-ADJ-DSB                /*         
*S****DK          0   A   2 3WF-NS-T2-SEQ                    /*         
*S****DK          0   A   2 3WF-NS-T2-TRAN                   /*         
*S****DK          0   A  10 3WF-NS-T2-DATE                   /*         
*S****DK          0   A   7 3WF-NS-T2-SCH-AWD                /*         
*S****DK          0   A   7 3WF-NS-T2-PAID                   /*         
*S****DK          0   A   7 3WF-NS-T2-AWARD                  /*         
*S****DK          0   A3    3WF-NS-T2-LEVEL     
*S****DK          0   A   4 3WF-NS-T2-AWDYEAR                /*         
*S****DK          0   A   1 3WF-NS-T2-CONV                   /*         
*S****DK          0   A   4 3WF-NS-T2-DCHG                   /*         
*S****DK          0   A   6 3WF-NS-T2-DCHG-AMT               /*         
*S****DK          0   A   6 3WF-NS-T2-ADJ-DSB                /*         
*S****DK          0   A   2 3WF-NS-T3-SEQ                    /*         
*S****DK          0   A   2 3WF-NS-T3-TRAN                   /*         
*S****DK          0   A  10 3WF-NS-T3-DATE                   /*         
*S****DK          0   A   7 3WF-NS-T3-SCH-AWD                /*         
*S****DK          0   A   7 3WF-NS-T3-PAID                   /*         
*S****DK          0   A   7 3WF-NS-T3-AWARD                  /*         
*S****DK          0   A3    3WF-NS-T3-LEVEL     
*S****DK          0   A   4 3WF-NS-T3-AWDYEAR                /*         
*S****DK          0   A   1 3WF-NS-T3-CONV                   /*         
*S****DK          0   A   4 3WF-NS-T3-DCHG                   /*         
*S****DK          0   A   6 3WF-NS-T3-DCHG-AMT               /*         
*S****DK          0   A   6 3WF-NS-T3-ADJ-DSB                /*         
*S****DK          0   A   2 3WF-NS-L01-SEQ                   /*         
*S****DK          0   A   1 3WF-NS-L01-DFLT                  /*         
*S****DK          0   A   1 3WF-NS-L01-CHG                   /*         
*S****DK          0   A20   3WF-NS-L01-TYPE     
*S****DK          0   A   7 3WF-NS-L01-AMT                   /*         
*S****DK          0   A20   3WF-NS-L01-STA      
*S****DK          0   A  10 3WF-NS-L01-STA-DATE              /*         
*S****DK          0   A7    3WF-NS-L01-OUT      
*S****DK          0   A  10 3WF-NS-L01-OUT-DATE              /*         
*S****DK          0   A  10 3WF-NS-L01-BEG-DATE              /*         
*S****DK          0   A  10 3WF-NS-L01-END-DATE              /*         
*S****DK          0   A   3 3WF-NS-L01-GA                    /*         
*S****DK          0   A   3 3WF-NS-L01-CTC-TYPE              /*         
*S****DK          0   A   8 3WF-NS-L01-CONTACT               /*         
*S****DK          0   A   3 3WF-NS-L01-LEVEL                 /*         
*S****DK          0   A   1 3WF-NS-L01-XUNS                  /*         
*S****DK          0   A   1 3WF-NS-L01-CAP                   /*         
*S****DK          0   A7    3WF-NS-L01-DSB      
*S****DK          0   A  10 3WF-NS-L01-DSB-DATE              /*         
*S****DK          0   A20   3WF-NS-L01-SUBSIDY  
*S****DK          0   A  10 3WF-NS-L01-SUBSIDY-DT            /*         
*S****DK          0   A   2 3WF-NS-L02-SEQ                   /*         
*S****DK          0   A   1 3WF-NS-L02-DFLT                  /*         
*S****DK          0   A   1 3WF-NS-L02-CHG                   /*         
*S****DK          0   A20   3WF-NS-L02-TYPE     
*S****DK          0   A   7 3WF-NS-L02-AMT                   /*         
*S****DK          0   A20   3WF-NS-L02-STA      
*S****DK          0   A  10 3WF-NS-L02-STA-DATE              /*         
*S****DK          0   A7    3WF-NS-L02-OUT      
*S****DK          0   A  10 3WF-NS-L02-OUT-DATE              /*         
*S****DK          0   A  10 3WF-NS-L02-BEG-DATE              /*         
*S****DK          0   A  10 3WF-NS-L02-END-DATE              /*         
*S****DK          0   A   3 3WF-NS-L02-GA                    /*         
*S****DK          0   A   3 3WF-NS-L02-CTC-TYPE              /*         
*S****DK          0   A   8 3WF-NS-L02-CONTACT               /*         
*S****DK          0   A   3 3WF-NS-L02-LEVEL                 /*         
*S****DK          0   A   1 3WF-NS-L02-XUNS                  /*         
*S****DK          0   A   1 3WF-NS-L02-CAP                   /*         
*S****DK          0   A7    3WF-NS-L02-DSB      
*S****DK          0   A  10 3WF-NS-L02-DSB-DATE              /*         
*S****DK          0   A20   3WF-NS-L02-SUBSIDY  
*S****DK          0   A  10 3WF-NS-L02-SUBSIDY-DT            /*         
*S****DK          0   A   2 3WF-NS-L03-SEQ                   /*         
*S****DK          0   A   1 3WF-NS-L03-DFLT                  /*         
*S****DK          0   A   1 3WF-NS-L03-CHG                   /*         
*S****DK          0   A20   3WF-NS-L03-TYPE     
*S****DK          0   A   7 3WF-NS-L03-AMT                   /*         
*S****DK          0   A20   3WF-NS-L03-STA      
*S****DK          0   A  10 3WF-NS-L03-STA-DATE              /*         
*S****DK          0   A7    3WF-NS-L03-OUT      
*S****DK          0   A  10 3WF-NS-L03-OUT-DATE              /*         
*S****DK          0   A  10 3WF-NS-L03-BEG-DATE              /*         
*S****DK          0   A  10 3WF-NS-L03-END-DATE              /*         
*S****DK          0   A   3 3WF-NS-L03-GA                    /*         
*S****DK          0   A   3 3WF-NS-L03-CTC-TYPE              /*         
*S****DK          0   A   8 3WF-NS-L03-CONTACT               /*         
*S****DK          0   A   3 3WF-NS-L03-LEVEL                 /*         
*S****DK          0   A   1 3WF-NS-L03-XUNS                  /*         
*S****DK          0   A   1 3WF-NS-L03-CAP                   /*         
*S****DK          0   A7    3WF-NS-L03-DSB      
*S****DK          0   A  10 3WF-NS-L03-DSB-DATE              /*         
*S****DK          0   A20   3WF-NS-L03-SUBSIDY  
*S****DK          0   A  10 3WF-NS-L03-SUBSIDY-DT            /*         
*S****DK          0   A   2 3WF-NS-L04-SEQ                   /*         
*S****DK          0   A   1 3WF-NS-L04-DFLT                  /*         
*S****DK          0   A   1 3WF-NS-L04-CHG                   /*         
*S****DK          0   A20   3WF-NS-L04-TYPE     
*S****DK          0   A   7 3WF-NS-L04-AMT                   /*         
*S****DK          0   A20   3WF-NS-L04-STA      
*S****DK          0   A  10 3WF-NS-L04-STA-DATE              /*         
*S****DK          0   A7    3WF-NS-L04-OUT      
*S****DK          0   A  10 3WF-NS-L04-OUT-DATE              /*         
*S****DK          0   A  10 3WF-NS-L04-BEG-DATE              /*         
*S****DK          0   A  10 3WF-NS-L04-END-DATE              /*         
*S****DK          0   A   3 3WF-NS-L04-GA                    /*         
*S****DK          0   A   3 3WF-NS-L04-CTC-TYPE              /*         
*S****DK          0   A   8 3WF-NS-L04-CONTACT               /*         
*S****DK          0   A   3 3WF-NS-L04-LEVEL                 /*         
*S****DK          0   A   1 3WF-NS-L04-XUNS                  /*         
*S****DK          0   A   1 3WF-NS-L04-CAP                   /*         
*S****DK          0   A7    3WF-NS-L04-DSB      
*S****DK          0   A  10 3WF-NS-L04-DSB-DATE              /*         
*S****DK          0   A20   3WF-NS-L04-SUBSIDY  
*S****DK          0   A  10 3WF-NS-L04-SUBSIDY-DT            /*         
*S****DK          0   A   2 3WF-NS-L05-SEQ                   /*         
*S****DK          0   A   1 3WF-NS-L05-DFLT                  /*         
*S****DK          0   A   1 3WF-NS-L05-CHG                   /*         
*S****DK          0   A20   3WF-NS-L05-TYPE     
*S****DK          0   A   7 3WF-NS-L05-AMT                   /*         
*S****DK          0   A20   3WF-NS-L05-STA      
*S****DK          0   A  10 3WF-NS-L05-STA-DATE              /*         
*S****DK          0   A7    3WF-NS-L05-OUT      
*S****DK          0   A  10 3WF-NS-L05-OUT-DATE              /*         
*S****DK          0   A  10 3WF-NS-L05-BEG-DATE              /*         
*S****DK          0   A  10 3WF-NS-L05-END-DATE              /*         
*S****DK          0   A   3 3WF-NS-L05-GA                    /*         
*S****DK          0   A   3 3WF-NS-L05-CTC-TYPE              /*         
*S****DK          0   A   8 3WF-NS-L05-CONTACT               /*         
*S****DK          0   A   3 3WF-NS-L05-LEVEL                 /*         
*S****DK          0   A   1 3WF-NS-L05-XUNS                  /*         
*S****DK          0   A   1 3WF-NS-L05-CAP                   /*         
*S****DK          0   A7    3WF-NS-L05-DSB      
*S****DK          0   A  10 3WF-NS-L05-DSB-DATE              /*         
*S****DK          0   A20   3WF-NS-L05-SUBSIDY  
*S****DK          0   A  10 3WF-NS-L05-SUBSIDY-DT            /*         
*S****DK          0   A   2 3WF-NS-L06-SEQ                   /*         
*S****DK          0   A   1 3WF-NS-L06-DFLT                  /*         
*S****DK          0   A   1 3WF-NS-L06-CHG                   /*         
*S****DK          0   A20   3WF-NS-L06-TYPE     
*S****DK          0   A   7 3WF-NS-L06-AMT                   /*         
*S****DK          0   A20   3WF-NS-L06-STA      
*S****DK          0   A  10 3WF-NS-L06-STA-DATE              /*         
*S****DK          0   A7    3WF-NS-L06-OUT      
*S****DK          0   A  10 3WF-NS-L06-OUT-DATE              /*         
*S****DK          0   A  10 3WF-NS-L06-BEG-DATE              /*         
*S****DK          0   A  10 3WF-NS-L06-END-DATE              /*         
*S****DK          0   A   3 3WF-NS-L06-GA                    /*         
*S****DK          0   A   3 3WF-NS-L06-CTC-TYPE              /*         
*S****DK          0   A   8 3WF-NS-L06-CONTACT               /*         
*S****DK          0   A   3 3WF-NS-L06-LEVEL                 /*         
*S****DK          0   A   1 3WF-NS-L06-XUNS                  /*         
*S****DK          0   A   1 3WF-NS-L06-CAP                   /*         
*S****DK          0   A7    3WF-NS-L06-DSB      
*S****DK          0   A  10 3WF-NS-L06-DSB-DATE              /*         
*S****DK          0   A20   3WF-NS-L06-SUBSIDY  
*S****DK          0   A  10 3WF-NS-L06-SUBSIDY-DT            /*         
*S****C           0   * 
*S****C           0   * 
*S****DS          0         2NSLDS-2627-LOGICALS             /* WF-NSLDS-2627 Edit Logicals     
*S****DK          0   L     3STUDENT-ID-F                    /* WW-STUDENT-ID       
*S****C           0   * 
*S****C           0   * 
*S****DS          0         2NSLDS-2627-CNTL-VARS            /* WF-NSLDS-2627 Control Variabl   
*S****DK          0   C     3STUDENT-ID-CV                   /* WW-STUDENT-ID       
*E          
