C:\Users\pslfe\Downloads\2406_02\old\wfc25ism.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
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
*S*** MAP2: PROTOTYPE --- CREATED BY UNIX 8.3.4 ---
*S*** INPUT USING MAP 'XXXXXXXX'
*S*** WFISR25D.WF-IS-P1-DOB WFISR25D.WF-IS-P1-FIRST
*S*** WFISR25D.WF-IS-P1-LAST WFISR25D.WF-IS-P1-MIDDLE
*S*** WFISR25D.WF-IS-P1-SSN WFISR25D.WF-IS-P2-NM-FIRST
*S*** WFISR25D.WF-IS-P2-NM-LAST WFISR25D.WF-IS-P2-SSN
*S*** WFISR25D.WF-IS-S-AD-CITY WFISR25D.WF-IS-S-AD-STATE
*S*** WFISR25D.WF-IS-S-AD-STRT WFISR25D.WF-IS-S-AD-ZIP
*S*** WFISR25D.WF-IS-S-DOB WFISR25D.WF-IS-S-NM-FIRST
*S*** WFISR25D.WF-IS-S-NM-LAST WFISR25D.WF-IS-S-NM-MIDDLE
*S*** WFISR25D.WF-IS-S-SSN WFISR25D.WF-IS-SP-NM-FIRST
*S*** WFISR25D.WF-IS-SP-NM-LAST WFISR25D.WF-IS-SP-SSN
*S**DEFINE DATA PARAMETER
*S**1 WFISR25D.WF-IS-P1-DOB (A008)
*S**1 WFISR25D.WF-IS-P1-FIRST (A035)
*S**1 WFISR25D.WF-IS-P1-LAST (A035)
*S**1 WFISR25D.WF-IS-P1-MIDDLE (A015)
*S**1 WFISR25D.WF-IS-P1-SSN (A009)
*S**1 WFISR25D.WF-IS-P2-NM-FIRST (A035)
*S**1 WFISR25D.WF-IS-P2-NM-LAST (A035)
*S**1 WFISR25D.WF-IS-P2-SSN (A009)
*S**1 WFISR25D.WF-IS-S-AD-CITY (A030)
*S**1 WFISR25D.WF-IS-S-AD-STATE (A002)
*S**1 WFISR25D.WF-IS-S-AD-STRT (A040)
*S**1 WFISR25D.WF-IS-S-AD-ZIP (A010)
*S**1 WFISR25D.WF-IS-S-DOB (A008)
*S**1 WFISR25D.WF-IS-S-NM-FIRST (A035)
*S**1 WFISR25D.WF-IS-S-NM-LAST (A035)
*S**1 WFISR25D.WF-IS-S-NM-MIDDLE (A015)
*S**1 WFISR25D.WF-IS-S-SSN (A009)
*S**1 WFISR25D.WF-IS-SP-NM-FIRST (A035)
*S**1 WFISR25D.WF-IS-SP-NM-LAST (A035)
*S**1 WFISR25D.WF-IS-SP-SSN (A009)
*S**END-DEFINE
*S**FORMAT PS=023 LS=074 ZP=OFF SG=OFF KD=ON IP=OFF
*S*** MAP2: MAP PROFILES ***************************** 200***********
*S*** .TOTOTOOOMOA NENEYEYEBLBL4YGR5YREN ^"`+={};!@ 'WWHELPRH',= *
*S*** 025074 N1NNLCN____ X 01 SYSDBA YL 1 *
*S**************************************************************************
*S**INPUT ( IP=OFF HE='WWHELPRH',= /*
*S** )
*S**/
*S** 003T '---------------Student---------------'(BL)
*S** 042T '---------- Parent 1 ------------'(BL)
*S**/
*S** 003T 'Last name:'(NE)
*S** 019T WFISR25D.WF-IS-S-NM-LAST (AD=ODR CD=GR AL=020 /*.01U020 A035 .
*S** HE='WWHELPRH',= )
*S** 042T 'Last name:'(NE)
*S** 054T WFISR25D.WF-IS-P1-LAST (AD=ODR CD=GR AL=020 /*.99U020 A035 .
*S** HE='WWHELPRH',= )
*S**/
*S** 003T 'First name:'(NE)
*S** 019T WFISR25D.WF-IS-S-NM-FIRST (AD=ODR CD=GR AL=020 /*.01U020 A035 .
*S** HE='WWHELPRH',= )
*S** 042T 'First name:'(NE)
*S** 054T WFISR25D.WF-IS-P1-FIRST (AD=ODR CD=GR AL=020 /*.99U020 A035 .
*S** HE='WWHELP1H',= )
*S**/
*S** 003T 'Middle name:'(NE)
*S** 024T WFISR25D.WF-IS-S-NM-MIDDLE (AD=ODR CD=GR /*.01U015 A015 .
*S** HE='WWHELPRH',= )
*S** 042T 'Middle name:'(NE)
*S** 059T WFISR25D.WF-IS-P1-MIDDLE (AD=ODR CD=GR /*.01U015 A015 .
*S** HE='WWHELPRH',= )
*S**/
*S** 003T 'SSN:'(NE)
*S** 030T WFISR25D.WF-IS-S-SSN (AD=ODR CD=GR /*.01U009 A009 .
*S** HE='WWHELPRH',= )
*S** 042T 'SSN:'(NE)
*S** 065T WFISR25D.WF-IS-P1-SSN (AD=ODR CD=GR /*.99U009 A009 .
*S** HE='WWHELPRH',= )
*S**/
*S** 003T 'Birthdate:'(NE)
*S** 031T WFISR25D.WF-IS-S-DOB (AD=ODR CD=GR /*.01U008 A008 .
*S** HE='WWHELPRH',= )
*S** 042T 'Birthdate:'(NE)
*S** 066T WFISR25D.WF-IS-P1-DOB (AD=ODR CD=GR /*.99U008 A008 .
*S** HE='WWHELPRH',= )
*S**/
*S** 003T '---------------Spouse----------------'(BL)
*S** 042T '---------- Parent 2 ------------'(BL)
*S**/
*S** 003T 'Last name:'(NE)
*S** 019T WFISR25D.WF-IS-SP-NM-LAST (AD=ODR CD=GR AL=020 /*.99U020 A035 .
*S** HE='WWHELPRH',= )
*S** 042T 'Last name:'(NE)
*S** 054T WFISR25D.WF-IS-P2-NM-LAST (AD=ODR CD=GR AL=020 /*.99U020 A035 .
*S** HE='WWHELPRH',= )
*S**/
*S** 003T 'First name:'(NE)
*S** 019T WFISR25D.WF-IS-SP-NM-FIRST (AD=ODR CD=GR /*.99U020 A035 .
*S** AL=020 HE='WWHELPRH',= )
*S** 042T 'First name:'(NE)
*S** 054T WFISR25D.WF-IS-P2-NM-FIRST (AD=ODR CD=GR /*.99U020 A035 .
*S** AL=020 HE='WWHELPRH',= )
*S**/
*S** 003T 'SSN:'(NE)
*S** 030T WFISR25D.WF-IS-SP-SSN (AD=ODR CD=GR /*.99U009 A009 .
*S** HE='WWHELPRH',= )
*S** 042T 'SSN:'(NE)
*S** 065T WFISR25D.WF-IS-P2-SSN (AD=ODR CD=GR /*.99U009 A009 .
*S** HE='WWHELPRH',= )
*S**/
*S** 003T 'Birthdate:'(NE)
*S** 031T WFISR25D.WF-IS-S-DOB (AD=ODR CD=GR /*.01U008 A008 .
*S** HE='WWHELPRH',= )
*S** 042T 'Birthdate:'(NE)
*S** 066T WFISR25D.WF-IS-P1-DOB (AD=ODR CD=GR /*.99U008 A008 .
*S** HE='WWHELPRH',= )
*S**/
*S**/
*S** 003T '--------------Address----------------'(BL)
*S**/
*S** 008T WFISR25D.WF-IS-S-AD-STRT (AD=ODR CD=GR /*.99U040 A040 .
*S** HE='WWHELPRH',= )
*S**/
*S** 003T WFISR25D.WF-IS-S-AD-CITY (AD=ODR CD=GR /*.99U030 A030 .
*S** HE='WWHELPRH',= )
*S** 035T WFISR25D.WF-IS-S-AD-STATE (AD=ODR CD=GR /*.99U002 A002 .
*S** HE='WWHELPRH',= )
*S** 038T WFISR25D.WF-IS-S-AD-ZIP (AD=ODR CD=GR /*.99U010 A010 .
*S** HE='WWHELPRH',= )
*S**/
*S**/
*S**/
*S**/
*S**/
*S**/
*S**/
*S*** MAP2: VALIDATION *****************************************************
*S*** MAP2: END OF MAP *****************************************************
*S**END
C:\Users\pslfe\Downloads\2406_02\new\wfc25ism.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
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
*S*** MAP2: PROTOTYPE --- CREATED BY UNIX 8.3.4 ---
*S*** INPUT USING MAP 'XXXXXXXX'
*S*** WFISR25D.WF-IS-P1-DOB WFISR25D.WF-IS-P1-NM-FIRST
*S*** WFISR25D.WF-IS-P1-NM-LAST WFISR25D.WF-IS-P1-NM-MIDDLE
*S*** WFISR25D.WF-IS-P1-SSN WFISR25D.WF-IS-P2-NM-FIRST
*S*** WFISR25D.WF-IS-P2-NM-LAST WFISR25D.WF-IS-P2-SSN
*S*** WFISR25D.WF-IS-S-AD-CITY WFISR25D.WF-IS-S-AD-STATE
*S*** WFISR25D.WF-IS-S-AD-STRT WFISR25D.WF-IS-S-AD-ZIP
*S*** WFISR25D.WF-IS-S-DOB WFISR25D.WF-IS-S-NM-FIRST
*S*** WFISR25D.WF-IS-S-NM-LAST WFISR25D.WF-IS-S-NM-MIDDLE
*S*** WFISR25D.WF-IS-S-SSN WFISR25D.WF-IS-SP-NM-FIRST
*S*** WFISR25D.WF-IS-SP-NM-LAST WFISR25D.WF-IS-SP-SSN
*S**DEFINE DATA PARAMETER
*S**1 WFISR25D.WF-IS-P1-DOB (A008)
*S**1 WFISR25D.WF-IS-P1-NM-FIRST (A035)
*S**1 WFISR25D.WF-IS-P1-NM-LAST (A035)
*S**1 WFISR25D.WF-IS-P1-NM-MIDDLE (A015)
*S**1 WFISR25D.WF-IS-P1-SSN (A009)
*S**1 WFISR25D.WF-IS-P2-NM-FIRST (A035)
*S**1 WFISR25D.WF-IS-P2-NM-LAST (A035)
*S**1 WFISR25D.WF-IS-P2-SSN (A009)
*S**1 WFISR25D.WF-IS-S-AD-CITY (A030)
*S**1 WFISR25D.WF-IS-S-AD-STATE (A002)
*S**1 WFISR25D.WF-IS-S-AD-STRT (A040)
*S**1 WFISR25D.WF-IS-S-AD-ZIP (A010)
*S**1 WFISR25D.WF-IS-S-DOB (A008)
*S**1 WFISR25D.WF-IS-S-NM-FIRST (A035)
*S**1 WFISR25D.WF-IS-S-NM-LAST (A035)
*S**1 WFISR25D.WF-IS-S-NM-MIDDLE (A015)
*S**1 WFISR25D.WF-IS-S-SSN (A009)
*S**1 WFISR25D.WF-IS-SP-NM-FIRST (A035)
*S**1 WFISR25D.WF-IS-SP-NM-LAST (A035)
*S**1 WFISR25D.WF-IS-SP-SSN (A009)
*S**END-DEFINE
*S**FORMAT PS=023 LS=074 ZP=OFF SG=OFF KD=ON IP=OFF
*S*** MAP2: MAP PROFILES ***************************** 200***********
*S*** .TOTOTOOOMOA NENEYEYEBLBL4YGR5YREN ^"`+={};!@ 'WWHELPRH',= *
*S*** 025074 N1NNLCN____ X 01 SYSDBA YL 1 *
*S**************************************************************************
*S**INPUT ( IP=OFF HE='WWHELPRH',= /*
*S** )
*S**/
*S** 003T '---------------Student---------------'(BL)
*S** 042T '---------- Parent 1 ------------'(BL)
*S**/
*S** 003T 'Last name:'(NE)
*S** 019T WFISR25D.WF-IS-S-NM-LAST (AD=ODR CD=GR AL=020 /*.01U020 A035 .
*S** HE='WWHELPRH',= )
*S** 042T 'Last name:'(NE)
*S** 054T WFISR25D.WF-IS-P1-NM-LAST (AD=ODR CD=GR AL=020 /*.99U020 A035 .
*S** HE='WWHELPRH',= )
*S**/
*S** 003T 'First name:'(NE)
*S** 019T WFISR25D.WF-IS-S-NM-FIRST (AD=ODR CD=GR AL=020 /*.01U020 A035 .
*S** HE='WWHELPRH',= )
*S** 042T 'First name:'(NE)
*S** 054T WFISR25D.WF-IS-P1-NM-FIRST (AD=ODR CD=GR /*.99U020 A035 .
*S** AL=020 HE='WWHELP1H',= )
*S**/
*S** 003T 'Middle name:'(NE)
*S** 024T WFISR25D.WF-IS-S-NM-MIDDLE (AD=ODR CD=GR /*.01U015 A015 .
*S** HE='WWHELPRH',= )
*S** 042T 'Middle name:'(NE)
*S** 059T WFISR25D.WF-IS-P1-NM-MIDDLE (AD=ODR CD=GR /*.01U015 A015 .
*S** HE='WWHELPRH',= )
*S**/
*S** 003T 'SSN:'(NE)
*S** 030T WFISR25D.WF-IS-S-SSN (AD=ODR CD=GR /*.01U009 A009 .
*S** HE='WWHELPRH',= )
*S** 042T 'SSN:'(NE)
*S** 065T WFISR25D.WF-IS-P1-SSN (AD=ODR CD=GR /*.99U009 A009 .
*S** HE='WWHELPRH',= )
*S**/
*S** 003T 'Birthdate:'(NE)
*S** 031T WFISR25D.WF-IS-S-DOB (AD=ODR CD=GR /*.01U008 A008 .
*S** HE='WWHELPRH',= )
*S** 042T 'Birthdate:'(NE)
*S** 066T WFISR25D.WF-IS-P1-DOB (AD=ODR CD=GR /*.99U008 A008 .
*S** HE='WWHELPRH',= )
*S**/
*S** 003T '---------------Spouse----------------'(BL)
*S** 042T '---------- Parent 2 ------------'(BL)
*S**/
*S** 003T 'Last name:'(NE)
*S** 019T WFISR25D.WF-IS-SP-NM-LAST (AD=ODR CD=GR AL=020 /*.99U020 A035 .
*S** HE='WWHELPRH',= )
*S** 042T 'Last name:'(NE)
*S** 054T WFISR25D.WF-IS-P2-NM-LAST (AD=ODR CD=GR AL=020 /*.99U020 A035 .
*S** HE='WWHELPRH',= )
*S**/
*S** 003T 'First name:'(NE)
*S** 019T WFISR25D.WF-IS-SP-NM-FIRST (AD=ODR CD=GR /*.99U020 A035 .
*S** AL=020 HE='WWHELPRH',= )
*S** 042T 'First name:'(NE)
*S** 054T WFISR25D.WF-IS-P2-NM-FIRST (AD=ODR CD=GR /*.99U020 A035 .
*S** AL=020 HE='WWHELPRH',= )
*S**/
*S** 003T 'SSN:'(NE)
*S** 030T WFISR25D.WF-IS-SP-SSN (AD=ODR CD=GR /*.99U009 A009 .
*S** HE='WWHELPRH',= )
*S** 042T 'SSN:'(NE)
*S** 065T WFISR25D.WF-IS-P2-SSN (AD=ODR CD=GR /*.99U009 A009 .
*S** HE='WWHELPRH',= )
*S**/
*S** 003T 'Birthdate:'(NE)
*S** 031T WFISR25D.WF-IS-S-DOB (AD=ODR CD=GR /*.01U008 A008 .
*S** HE='WWHELPRH',= )
*S** 042T 'Birthdate:'(NE)
*S** 066T WFISR25D.WF-IS-P1-DOB (AD=ODR CD=GR /*.99U008 A008 .
*S** HE='WWHELPRH',= )
*S**/
*S**/
*S** 003T '--------------Address----------------'(BL)
*S**/
*S** 008T WFISR25D.WF-IS-S-AD-STRT (AD=ODR CD=GR /*.99U040 A040 .
*S** HE='WWHELPRH',= )
*S**/
*S** 003T WFISR25D.WF-IS-S-AD-CITY (AD=ODR CD=GR /*.99U030 A030 .
*S** HE='WWHELPRH',= )
*S** 035T WFISR25D.WF-IS-S-AD-STATE (AD=ODR CD=GR /*.99U002 A002 .
*S** HE='WWHELPRH',= )
*S** 038T WFISR25D.WF-IS-S-AD-ZIP (AD=ODR CD=GR /*.99U010 A010 .
*S** HE='WWHELPRH',= )
*S**/
*S**/
*S**/
*S**/
*S**/
*S**/
*S**/
*S*** MAP2: VALIDATION *****************************************************
*S*** MAP2: END OF MAP *****************************************************
*S**END
5 differences: 9 lines, 11 inline differences in 9 changed lines
Added(0,10)
Deleted(0,1)
Changed(9)
Changed in changed(0)
Ignored