Release Notes: Item 1104-01

2011-2012 Regulations Update

This release item corrects:

• Logic in the ADD Import to bypass reading of ACG input file beginning with aid year 2011-12
• Array numbering of the files in WFMAINFL, modifying the initial values defined for #FILE-ID so that the last three file names have sequential (rather than duplicate) sequence numbers.
• Defined length of the Father SSA Match field on the CPS Communications screen (map WFCPI12M, #MATCH-FA data field)
• Label of FAFSA Question 31 (map WFF122AM) to read "Interest in work/study:" (rather than "Interest in work/loans:")
• Color of some field labels on the 2011-12 NSLDS Overview, Federal (FAFSA) and Federal (Compressed) screens (maps WFNSD12M, WFF1203M, WFF121BM, WFF122AM)

In addition, the IRS Request flags are added to the Verification screen. The map WFVRF12M is modified to display the student and parent IRS request flags from the ISIR and procedure WFVRF12P is modified to retrieve the flags for display. Two new objects, WFGTREQE and WFGTR12N, are added to read a requested student’s IRS record and pass back the IRS request flags. (This is necessary because adding the ISIR file to the Verification program would exceed NATURAL buffers.)

Missing comment codes 247 and 310-314 are added to the Dictionary.

Implementation Notes

• This item is required at all client sites, but may already have been implemented at some institutions. Please verify your source code.
• Load the new and updated modules from the SYSTRANS file in the attached zip file. Or, alternatively, you may apply changes manually to the updated modules:
  • WFADDIMB
  • WFCPI12M
  • WFF1203M
  • WFF121BM
  • WFF122AM
  • WFMAINFL
  • WFNSD12M
  • WFVRF12M
  • WFVRF12P
  The new modules, WFGTR12N and WFGTREQE, must be loaded from the SYSTRANS file.
• Using the Dictionary Import program (WCDICIMB), load the Dictionary input file in the attached zip file.
• No other modules are affected.

Source Changes: WFADDIMB

     0940 *  Federal import
     0950   COMPRESS 'WFAFI' #INPUT-AID-YY 'B' INTO #FETCH-PROGRAM LEAVING NO
     0960   FETCH RETURN #FETCH-PROGRAM
     0970 *
     0980 *  ACG import
add->       IF ##AID-YEAR < '2012'
     0990   COMPRESS 'WFAGI' #INPUT-AID-YY 'B' INTO #FETCH-PROGRAM LEAVING NO
     1000   FETCH RETURN #FETCH-PROGRAM
add->       END-IF
     1010 *
     1020 *  Profile import

Map Change: WFCPI12M

Change attributes of #MATCH-FA data field (field that follows the "Father/Mother SSA:" literal) so that Length is 1 (rather than 12).

      --------------Communication Activity-------------   DOD qualif: XXXXXXXXXX X
chg-> Original app: X X XXXXXXXXXX   ETI:    X  EFC:  X   Father/Mother SSA:   X X
      Current tran: X X XXXXXXXXXX   Pushed: X  Rej:  X   High sch: XXXXXXXXXXXX X

Map Changes: WFF1203M

Change attributes of "work/study:" literal so that color is NEUTRAL (rather than NO COLOR).
Change attributes of "HS City/State:" literal so that color is NEUTRAL (rather than NO COLOR).

      STUDENT                 -------------Plans------------    --Aid Requested---
      Bachelor's degree: X    Year in col: XX    Deg/Cert: X    Interest in
chg-> Res date:  X XXXXXXX                       Housing:  X         work/study: X
      Mar date:    XXXXXXX
      HS grad/equiv:     X    --------------------High School---------------------
      Drug conviction:   X     XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
chg-> Gender:            X     HS City/State:    XXXXXXXXXXXXXXXXXXXXXXXXXXXX  XX

Map Changes: WFF121BM

Change attributes of Question 27 literals "High school name:" and "High school city/state:" so that color is NEUTRAL (rather than NO COLOR).

chg-> 27. High school name:    XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
chg->     High school city/state:                XXXXXXXXXXXXXXXXXXXXXXXXXXXX  XX

Map Changes: WFF122AM

Change attributes of Question 28 literal "First bachelor's degree:" so that color is NEUTRAL (rather than NO COLOR).
Change text of Question 31 to "Interest in work/study:" (rather than "Interest in work/loans:").

chg-> 28. First bachelor's degree:      X     32. Tax filing status:            X
                                              33. Tax return filed:             X
      29. Year in college:             XX     34. Short form eligibility:       X
      30. Degree/certificate:           X
                                              35. AGI:                    XXXXXXXX
chg-> 31. Interest in work/study:       X     36. US income tax paid:      XXXXXX
                                              37. Number of exemptions:        XX

Source Changes: WFMAINFL

     I(68)                  WF-CPS-9798                                                        
     I(69)                  WF-FEDERAL-9798                                                    
     I(70)                  WF-VERIFY-9798                                                     
del->I(68)                  WF-CPS-9697                                                        
del->I(69)                  WF-FEDERAL-9697                                                    
del->I(70)                  WF-VERIFY-9697                                                     
add->I(71)                  WF-CPS-9697                                                        
add->I(72)                  WF-FEDERAL-9697                                                    
add->I(73)                  WF-VERIFY-9697

Map Change: WFNSD12M

Change attributes of "IAAS Overpmt:" literal so that color is NEUTRAL (rather than NO COLOR).

      NSLDS transaction: XX   Satis repayment:   X   TEACH Overpmt:   X XXXXXXXX
chg->                         Active bankruptcy: X   IAAS Overpmt:    X XXXXXXXX
                              Converted TEACH:   X   SEOG Overpmt:    X XXXXXXXX

Map Change: WFVRF12M

Insert 1 line just below student key information.
Change the line below that to add "ISIR IRS requests: Student:" and "Parents:" literals and #IRSREQ-STU and #IRSREQ-PAR data fields -- user-defined, output-only, default intensity, with help pointing to WFISR12D.WF-IS-C-IRSREQ-STU and WFISR12D.WF-IS-C-IRSREQ-PAR.

     Student:  XXXXXXXXX  XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX  XXXXXXXXXXXXXXXXXXXX
               XXXX   XX  XXXXXXXXXXXXXXXXXXXX
add->
chg->   ISIR IRS requests: Student: XX Parents: XX   XXXXXXXXXXXXXXXXXXXXXXXXXXXXXX

        -----------Federal Verification-----------       -----Institutional-----

Source Changes: WFVRF12P

     000860 **SAG DEFINE EXIT LOCAL-DATA
     000870   01 #SUBPGM(A8)
     000880 *
     000890   01 #TAB-S(A1)
     000900   01 #TAB-P(A1)
     000910   01 #VER-MSG(A30)
     000920 *
     000930   01 #ORIG-VER(A1)
add->         01 #IRSREQ-STU(A2)
add->         01 #IRSREQ-PAR(A2)
     000940   01 #FE-S-UNTXD(A6)
     000950   01 #FE-P-UNTXD(A6)


     001780 **SAG DEFINE EXIT AFTER-CALL-OBJECT
     001790     /*
chg->001800     /* Get ISIR and CPS information for display
     001810     IF WWAOBJ.#FUNCTION = 'GET'
add->             PERFORM GET-ISIR-IRS-REQUEST #IRSREQ-STU #IRSREQ-PAR
add->             /*
     001820       MOVE ##STUDENT-ID TO WFCPC12D.WW-STUDENT-ID
     001830       MOVE ##FAO-ID TO WFCPC12D.WF-FAO
     001840       PERFORM CALL-OBJECT-CPS-CMP
     001850     END-IF