This release item corrects:
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.
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
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
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
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
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
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
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
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-----
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