\\Mac\Home\Downloads\20240429\wptest\wfmcl25m.txt
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
*S*** MAP2: PROTOTYPE --- CREATED BY UNIX 8.3.4 ---
*S*** INPUT USING MAP 'XXXXXXXX'
*S*** ##COMP-NAME ##DISP-FAO ##DISP-LIT ##SID ##ST-SPECIAL ##ST-STATUS
*S*** #DISP-LIT #LABEL-PARENT #LABEL-PARENT-CV #LABEL-STUDENT
*S*** #LABEL-STUDENT-CV #MOD-MSG #TAB-PARENT #TAB-PARENT-CV #TAB-STUDENT
*S*** #TAB-STUDENT-CV WFISY25D.#DEP-TRAN WFISY25D.#FISAP
*S*** WFISY25D.#S-SC-MSK WFISY25D.#SAI WFISY25D.WF-IS-P1-FC1-AI
*S*** WFISY25D.WF-IS-P1-FC1-CA WFISY25D.WF-IS-P1-FC1-CONT
*S*** WFISY25D.WF-IS-S-FC1-CA WFISY25D.WF-IS-S-FC1-CI
*S**DEFINE DATA PARAMETER
*S**1 ##COMP-NAME (A035)
*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 #DISP-LIT (A038)
*S**1 #LABEL-PARENT (A007)
*S**1 #LABEL-PARENT-CV (C)
*S**1 #LABEL-STUDENT (A007)
*S**1 #LABEL-STUDENT-CV (C)
*S**1 #MOD-MSG (A036)
*S**1 #TAB-PARENT (A001)
*S**1 #TAB-PARENT-CV (C)
*S**1 #TAB-STUDENT (A001)
*S**1 #TAB-STUDENT-CV (C)
*S**1 WFISY25D.#DEP-TRAN (A011)
*S**1 WFISY25D.#FISAP (A020)
*S**1 WFISY25D.#S-SC-MSK (A020)
*S**1 WFISY25D.#SAI (A008)
*S**1 WFISY25D.WF-IS-P1-FC1-AI (A020)
*S**1 WFISY25D.WF-IS-P1-FC1-CA (A015)
*S**1 WFISY25D.WF-IS-P1-FC1-CONT (A020)
*S**1 WFISY25D.WF-IS-S-FC1-CA (A015)
*S**1 WFISY25D.WF-IS-S-FC1-CI (A020)
*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 CD=YE ) /*.01S010 D .
*S** 021T #DISP-LIT (AD=OD CD=YE ) /*.01U038 A038 .
*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** 043T #MOD-MSG (AD=ODR CD=RE ) /*.01U036 A036 .
*S**/
*S**/
*S** 029T 'ISIR'(BL)
*S**/
*S** 026T WFISY25D.#DEP-TRAN (AD=ODL CD=GR /*.01U011 A011 .
*S** HE='WWHELRRH','WWSYSVRD.WF-CAL-DEP ' )
*S**/
*S** 003T 'FISAP INCOME'(BL)
*S** 026T WFISY25D.#FISAP (AD=ODL CD=GR /*.01U020 A020 .
*S** HE='WWHELRRH','WFISR25D.WF-IS-C-FC1-FISAP ' )
*S**/
*S** 003T 'STUDENT AID INDEX'(BL)
*S** 038T WFISY25D.#SAI (AD=ODL CD=GR /*.01U008 A008 .
*S** HE='WWHELRRH','WFISR25D.WF-IS-C-FC1 ' )
*S**/
*S**/
*S** 001T #TAB-STUDENT (AD=AY'_' CV=#TAB-STUDENT-CV ) /*.99U001 A001 .
*S** 003T #LABEL-STUDENT (AD=OYL CD=GR /*.01U007 A007 .
*S** CV=#LABEL-STUDENT-CV )
*S**/
*S** 005T 'Contribution:'(NE)
*S** 026T WFISY25D.#S-SC-MSK (AD=ODL CD=GR /*.01U020 A020 .
*S** HE='WWHELRRH','WWSYSVRD.WF-CAL-CS ' )
*S**/
*S** 007T 'From income:'(NE)
*S** 026T WFISY25D.WF-IS-S-FC1-CI (AD=ODL CD=GR /*.01U020 A020 .
*S** HE='WWHELRRH','WWSYSVRD.WF-CAL-CFI ' )
*S**/
*S** 007T 'From assets:'(NE)
*S** 031T WFISY25D.WF-IS-S-FC1-CA (AD=ODL CD=GR /*.01U015 A015 .
*S** HE='WWHELRRH','WWSYSVRD.WF-CAL-CFA ' )
*S**/
*S** 001T #TAB-PARENT (AD=AY'_' CV=#TAB-PARENT-CV ) /*.99U001 A001 .
*S** 003T #LABEL-PARENT (AD=OYL CD=GR CV=#LABEL-PARENT-CV ) /*.01U007 A007 .
*S**/
*S** 005T 'Contribution:'(NE)
*S** 026T WFISY25D.WF-IS-P1-FC1-CONT (AD=ODL CD=GR /*.01U020 A020 .
*S** HE='WWHELRRH','WWSYSVRD.WF-CAL-CS ' )
*S**/
*S** 007T 'From income:'(NE)
*S** 026T WFISY25D.WF-IS-P1-FC1-AI (AD=ODL CD=GR /*.01U020 A020 .
*S** HE='WWHELRRH','WWSYSVRD.WF-CAL-CFI ' )
*S**/
*S** 007T 'From assets:'(NE)
*S** 031T WFISY25D.WF-IS-P1-FC1-CA (AD=ODL CD=GR /*.01U015 A015 .
*S** HE='WWHELRRH','WWSYSVRD.WF-CAL-CFA ' )
*S**/
*S**/
*S**/
*S*** MAP2: VALIDATION *****************************************************
*S*** MAP2: END OF MAP *****************************************************
*S**END
\\Mac\Home\Downloads\20240429\wpdev\wfmcl25m.txt
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
*S*** MAP2: PROTOTYPE --- CREATED BY UNIX 8.3.4 ---
*S*** INPUT USING MAP 'XXXXXXXX'
*S*** ##COMP-NAME ##DISP-FAO ##DISP-LIT ##SID ##ST-SPECIAL ##ST-STATUS
*S*** #DISP-LIT #LABEL-PARENT #LABEL-PARENT-CV #LABEL-STUDENT
*S*** #LABEL-STUDENT-CV #MOD-MSG #TAB-PARENT #TAB-PARENT-CV #TAB-STUDENT
*S*** #TAB-STUDENT-CV WFISY25D.#DEP-TRAN WFISY25D.#FISAP-MSK
*S*** WFISY25D.#P-PC-MSK WFISY25D.#P-PCA-MSK WFISY25D.#P-PCI-MSK
*S*** WFISY25D.#S-SC-MSK WFISY25D.#S-SCA-MSK WFISY25D.#S-SCI-MSK
*S*** WFISY25D.#SAI-MSK
*S**DEFINE DATA PARAMETER
*S**1 ##COMP-NAME (A035)
*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 #DISP-LIT (A038)
*S**1 #LABEL-PARENT (A007)
*S**1 #LABEL-PARENT-CV (C)
*S**1 #LABEL-STUDENT (A007)
*S**1 #LABEL-STUDENT-CV (C)
*S**1 #MOD-MSG (A036)
*S**1 #TAB-PARENT (A001)
*S**1 #TAB-PARENT-CV (C)
*S**1 #TAB-STUDENT (A001)
*S**1 #TAB-STUDENT-CV (C)
*S**1 WFISY25D.#DEP-TRAN (A011)
*S**1 WFISY25D.#FISAP-MSK (A020)
*S**1 WFISY25D.#P-PC-MSK (A020)
*S**1 WFISY25D.#P-PCA-MSK (A020)
*S**1 WFISY25D.#P-PCI-MSK (A020)
*S**1 WFISY25D.#S-SC-MSK (A020)
*S**1 WFISY25D.#S-SCA-MSK (A020)
*S**1 WFISY25D.#S-SCI-MSK (A020)
*S**1 WFISY25D.#SAI-MSK (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 CD=YE ) /*.01S010 D .
*S** 021T #DISP-LIT (AD=OD CD=YE ) /*.01U038 A038 .
*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** 043T #MOD-MSG (AD=ODR CD=RE ) /*.01U036 A036 .
*S**/
*S**/
*S** 029T 'ISIR'(BL)
*S**/
*S** 026T WFISY25D.#DEP-TRAN (AD=ODL CD=GR /*.01U011 A011 .
*S** HE='WWHELRRH','WWSYSVRD.WF-CAL-DEP ' )
*S**/
*S** 003T 'FISAP INCOME'(BL)
*S** 026T WFISY25D.#FISAP-MSK (AD=ODL CD=GR /*.01U020 A020 .
*S** HE='WWHELRRH','WFISR25D.WF-IS-C-FC1-FISAP ' )
*S**/
*S** 003T 'STUDENT AID INDEX'(BL)
*S** 038T WFISY25D.#SAI-MSK (AD=ODL CD=GR /*.01U008 A008 .
*S** HE='WWHELRRH','WFISR25D.WF-IS-C-FC1 ' )
*S**/
*S**/
*S** 001T #TAB-STUDENT (AD=AY'_' CV=#TAB-STUDENT-CV ) /*.99U001 A001 .
*S** 003T #LABEL-STUDENT (AD=OYL CD=GR /*.01U007 A007 .
*S** CV=#LABEL-STUDENT-CV )
*S**/
*S** 005T 'Contribution:'(NE)
*S** 026T WFISY25D.#S-SC-MSK (AD=ODL CD=GR /*.01U020 A020 .
*S** HE='WWHELRRH','WWSYSVRD.WF-CAL-CS ' )
*S**/
*S** 007T 'From income:'(NE)
*S** 026T WFISY25D.#S-SCI-MSK (AD=ODL CD=GR /*.01U020 A020 .
*S** HE='WWHELRRH','WWSYSVRD.WF-CAL-CFI ' )
*S**/
*S** 007T 'From assets:'(NE)
*S** 026T WFISY25D.#S-SCA-MSK (AD=ODL CD=GR /*.01U020 A020 .
*S** HE='WWHELRRH','WWSYSVRD.WF-CAL-CFA ' )
*S**/
*S** 001T #TAB-PARENT (AD=AY'_' CV=#TAB-PARENT-CV ) /*.99U001 A001 .
*S** 003T #LABEL-PARENT (AD=OYL CD=GR CV=#LABEL-PARENT-CV ) /*.01U007 A007 .
*S**/
*S** 005T 'Contribution:'(NE)
*S** 026T WFISY25D.#P-PC-MSK (AD=ODL CD=GR /*.01U020 A020 .
*S** HE='WWHELRRH','WWSYSVRD.WF-CAL-CS ' )
*S**/
*S** 007T 'From income:'(NE)
*S** 026T WFISY25D.#P-PCI-MSK (AD=ODL CD=GR /*.01U020 A020 .
*S** HE='WWHELRRH','WWSYSVRD.WF-CAL-CFI ' )
*S**/
*S** 007T 'From assets:'(NE)
*S** 026T WFISY25D.#P-PCA-MSK (AD=ODL CD=GR /*.01U020 A020 .
*S** HE='WWHELRRH','WWSYSVRD.WF-CAL-CFA ' )
*S**/
*S**/
*S**/
*S*** MAP2: VALIDATION *****************************************************
*S*** MAP2: END OF MAP *****************************************************
*S**END
10 differences: 21 lines, 67 inline differences in 21 changed lines
Added(0,13)
Deleted(0,9)
Changed(21)
Changed in changed(45)