| 1 | ****************************************************************** |
| 2 | * Copyright Amazon.com, Inc. or its affiliates. |
| 3 | * All Rights Reserved. |
| 4 | * |
| 5 | * Licensed under the Apache License, Version 2.0 (the "License"). |
| 6 | * You may not use this file except in compliance with the License. |
| 7 | * You may obtain a copy of the License at |
| 8 | * |
| 9 | * http://www.apache.org/licenses/LICENSE-2.0 |
| 10 | * |
| 11 | * Unless required by applicable law or agreed to in writing, |
| 12 | * software distributed under the License is distributed on an |
| 13 | * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, |
| 14 | * either express or implied. See the License for the specific |
| 15 | * language governing permissions and limitations under the License |
| 16 | ****************************************************************** |
| 17 | 01 COUSR0AI. |
| 18 | 02 FILLER PIC X(12). |
| 19 | 02 TRNNAMEL COMP PIC S9(4). |
| 20 | 02 TRNNAMEF PICTURE X. |
| 21 | 02 FILLER REDEFINES TRNNAMEF. |
| 22 | 03 TRNNAMEA PICTURE X. |
| 23 | 02 FILLER PICTURE X(4). |
| 24 | 02 TRNNAMEI PIC X(4). |
| 25 | 02 TITLE01L COMP PIC S9(4). |
| 26 | 02 TITLE01F PICTURE X. |
| 27 | 02 FILLER REDEFINES TITLE01F. |
| 28 | 03 TITLE01A PICTURE X. |
| 29 | 02 FILLER PICTURE X(4). |
| 30 | 02 TITLE01I PIC X(40). |
| 31 | 02 CURDATEL COMP PIC S9(4). |
| 32 | 02 CURDATEF PICTURE X. |
| 33 | 02 FILLER REDEFINES CURDATEF. |
| 34 | 03 CURDATEA PICTURE X. |
| 35 | 02 FILLER PICTURE X(4). |
| 36 | 02 CURDATEI PIC X(8). |
| 37 | 02 PGMNAMEL COMP PIC S9(4). |
| 38 | 02 PGMNAMEF PICTURE X. |
| 39 | 02 FILLER REDEFINES PGMNAMEF. |
| 40 | 03 PGMNAMEA PICTURE X. |
| 41 | 02 FILLER PICTURE X(4). |
| 42 | 02 PGMNAMEI PIC X(8). |
| 43 | 02 TITLE02L COMP PIC S9(4). |
| 44 | 02 TITLE02F PICTURE X. |
| 45 | 02 FILLER REDEFINES TITLE02F. |
| 46 | 03 TITLE02A PICTURE X. |
| 47 | 02 FILLER PICTURE X(4). |
| 48 | 02 TITLE02I PIC X(40). |
| 49 | 02 CURTIMEL COMP PIC S9(4). |
| 50 | 02 CURTIMEF PICTURE X. |
| 51 | 02 FILLER REDEFINES CURTIMEF. |
| 52 | 03 CURTIMEA PICTURE X. |
| 53 | 02 FILLER PICTURE X(4). |
| 54 | 02 CURTIMEI PIC X(8). |
| 55 | 02 PAGENUML COMP PIC S9(4). |
| 56 | 02 PAGENUMF PICTURE X. |
| 57 | 02 FILLER REDEFINES PAGENUMF. |
| 58 | 03 PAGENUMA PICTURE X. |
| 59 | 02 FILLER PICTURE X(4). |
| 60 | 02 PAGENUMI PIC X(8). |
| 61 | 02 USRIDINL COMP PIC S9(4). |
| 62 | 02 USRIDINF PICTURE X. |
| 63 | 02 FILLER REDEFINES USRIDINF. |
| 64 | 03 USRIDINA PICTURE X. |
| 65 | 02 FILLER PICTURE X(4). |
| 66 | 02 USRIDINI PIC X(8). |
| 67 | 02 SEL0001L COMP PIC S9(4). |
| 68 | 02 SEL0001F PICTURE X. |
| 69 | 02 FILLER REDEFINES SEL0001F. |
| 70 | 03 SEL0001A PICTURE X. |
| 71 | 02 FILLER PICTURE X(4). |
| 72 | 02 SEL0001I PIC X(1). |
| 73 | 02 USRID01L COMP PIC S9(4). |
| 74 | 02 USRID01F PICTURE X. |
| 75 | 02 FILLER REDEFINES USRID01F. |
| 76 | 03 USRID01A PICTURE X. |
| 77 | 02 FILLER PICTURE X(4). |
| 78 | 02 USRID01I PIC X(8). |
| 79 | 02 FNAME01L COMP PIC S9(4). |
| 80 | 02 FNAME01F PICTURE X. |
| 81 | 02 FILLER REDEFINES FNAME01F. |
| 82 | 03 FNAME01A PICTURE X. |
| 83 | 02 FILLER PICTURE X(4). |
| 84 | 02 FNAME01I PIC X(20). |
| 85 | 02 LNAME01L COMP PIC S9(4). |
| 86 | 02 LNAME01F PICTURE X. |
| 87 | 02 FILLER REDEFINES LNAME01F. |
| 88 | 03 LNAME01A PICTURE X. |
| 89 | 02 FILLER PICTURE X(4). |
| 90 | 02 LNAME01I PIC X(20). |
| 91 | 02 UTYPE01L COMP PIC S9(4). |
| 92 | 02 UTYPE01F PICTURE X. |
| 93 | 02 FILLER REDEFINES UTYPE01F. |
| 94 | 03 UTYPE01A PICTURE X. |
| 95 | 02 FILLER PICTURE X(4). |
| 96 | 02 UTYPE01I PIC X(1). |
| 97 | 02 SEL0002L COMP PIC S9(4). |
| 98 | 02 SEL0002F PICTURE X. |
| 99 | 02 FILLER REDEFINES SEL0002F. |
| 100 | 03 SEL0002A PICTURE X. |
| 101 | 02 FILLER PICTURE X(4). |
| 102 | 02 SEL0002I PIC X(1). |
| 103 | 02 USRID02L COMP PIC S9(4). |
| 104 | 02 USRID02F PICTURE X. |
| 105 | 02 FILLER REDEFINES USRID02F. |
| 106 | 03 USRID02A PICTURE X. |
| 107 | 02 FILLER PICTURE X(4). |
| 108 | 02 USRID02I PIC X(8). |
| 109 | 02 FNAME02L COMP PIC S9(4). |
| 110 | 02 FNAME02F PICTURE X. |
| 111 | 02 FILLER REDEFINES FNAME02F. |
| 112 | 03 FNAME02A PICTURE X. |
| 113 | 02 FILLER PICTURE X(4). |
| 114 | 02 FNAME02I PIC X(20). |
| 115 | 02 LNAME02L COMP PIC S9(4). |
| 116 | 02 LNAME02F PICTURE X. |
| 117 | 02 FILLER REDEFINES LNAME02F. |
| 118 | 03 LNAME02A PICTURE X. |
| 119 | 02 FILLER PICTURE X(4). |
| 120 | 02 LNAME02I PIC X(20). |
| 121 | 02 UTYPE02L COMP PIC S9(4). |
| 122 | 02 UTYPE02F PICTURE X. |
| 123 | 02 FILLER REDEFINES UTYPE02F. |
| 124 | 03 UTYPE02A PICTURE X. |
| 125 | 02 FILLER PICTURE X(4). |
| 126 | 02 UTYPE02I PIC X(1). |
| 127 | 02 SEL0003L COMP PIC S9(4). |
| 128 | 02 SEL0003F PICTURE X. |
| 129 | 02 FILLER REDEFINES SEL0003F. |
| 130 | 03 SEL0003A PICTURE X. |
| 131 | 02 FILLER PICTURE X(4). |
| 132 | 02 SEL0003I PIC X(1). |
| 133 | 02 USRID03L COMP PIC S9(4). |
| 134 | 02 USRID03F PICTURE X. |
| 135 | 02 FILLER REDEFINES USRID03F. |
| 136 | 03 USRID03A PICTURE X. |
| 137 | 02 FILLER PICTURE X(4). |
| 138 | 02 USRID03I PIC X(8). |
| 139 | 02 FNAME03L COMP PIC S9(4). |
| 140 | 02 FNAME03F PICTURE X. |
| 141 | 02 FILLER REDEFINES FNAME03F. |
| 142 | 03 FNAME03A PICTURE X. |
| 143 | 02 FILLER PICTURE X(4). |
| 144 | 02 FNAME03I PIC X(20). |
| 145 | 02 LNAME03L COMP PIC S9(4). |
| 146 | 02 LNAME03F PICTURE X. |
| 147 | 02 FILLER REDEFINES LNAME03F. |
| 148 | 03 LNAME03A PICTURE X. |
| 149 | 02 FILLER PICTURE X(4). |
| 150 | 02 LNAME03I PIC X(20). |
| 151 | 02 UTYPE03L COMP PIC S9(4). |
| 152 | 02 UTYPE03F PICTURE X. |
| 153 | 02 FILLER REDEFINES UTYPE03F. |
| 154 | 03 UTYPE03A PICTURE X. |
| 155 | 02 FILLER PICTURE X(4). |
| 156 | 02 UTYPE03I PIC X(1). |
| 157 | 02 SEL0004L COMP PIC S9(4). |
| 158 | 02 SEL0004F PICTURE X. |
| 159 | 02 FILLER REDEFINES SEL0004F. |
| 160 | 03 SEL0004A PICTURE X. |
| 161 | 02 FILLER PICTURE X(4). |
| 162 | 02 SEL0004I PIC X(1). |
| 163 | 02 USRID04L COMP PIC S9(4). |
| 164 | 02 USRID04F PICTURE X. |
| 165 | 02 FILLER REDEFINES USRID04F. |
| 166 | 03 USRID04A PICTURE X. |
| 167 | 02 FILLER PICTURE X(4). |
| 168 | 02 USRID04I PIC X(8). |
| 169 | 02 FNAME04L COMP PIC S9(4). |
| 170 | 02 FNAME04F PICTURE X. |
| 171 | 02 FILLER REDEFINES FNAME04F. |
| 172 | 03 FNAME04A PICTURE X. |
| 173 | 02 FILLER PICTURE X(4). |
| 174 | 02 FNAME04I PIC X(20). |
| 175 | 02 LNAME04L COMP PIC S9(4). |
| 176 | 02 LNAME04F PICTURE X. |
| 177 | 02 FILLER REDEFINES LNAME04F. |
| 178 | 03 LNAME04A PICTURE X. |
| 179 | 02 FILLER PICTURE X(4). |
| 180 | 02 LNAME04I PIC X(20). |
| 181 | 02 UTYPE04L COMP PIC S9(4). |
| 182 | 02 UTYPE04F PICTURE X. |
| 183 | 02 FILLER REDEFINES UTYPE04F. |
| 184 | 03 UTYPE04A PICTURE X. |
| 185 | 02 FILLER PICTURE X(4). |
| 186 | 02 UTYPE04I PIC X(1). |
| 187 | 02 SEL0005L COMP PIC S9(4). |
| 188 | 02 SEL0005F PICTURE X. |
| 189 | 02 FILLER REDEFINES SEL0005F. |
| 190 | 03 SEL0005A PICTURE X. |
| 191 | 02 FILLER PICTURE X(4). |
| 192 | 02 SEL0005I PIC X(1). |
| 193 | 02 USRID05L COMP PIC S9(4). |
| 194 | 02 USRID05F PICTURE X. |
| 195 | 02 FILLER REDEFINES USRID05F. |
| 196 | 03 USRID05A PICTURE X. |
| 197 | 02 FILLER PICTURE X(4). |
| 198 | 02 USRID05I PIC X(8). |
| 199 | 02 FNAME05L COMP PIC S9(4). |
| 200 | 02 FNAME05F PICTURE X. |
| 201 | 02 FILLER REDEFINES FNAME05F. |
| 202 | 03 FNAME05A PICTURE X. |
| 203 | 02 FILLER PICTURE X(4). |
| 204 | 02 FNAME05I PIC X(20). |
| 205 | 02 LNAME05L COMP PIC S9(4). |
| 206 | 02 LNAME05F PICTURE X. |
| 207 | 02 FILLER REDEFINES LNAME05F. |
| 208 | 03 LNAME05A PICTURE X. |
| 209 | 02 FILLER PICTURE X(4). |
| 210 | 02 LNAME05I PIC X(20). |
| 211 | 02 UTYPE05L COMP PIC S9(4). |
| 212 | 02 UTYPE05F PICTURE X. |
| 213 | 02 FILLER REDEFINES UTYPE05F. |
| 214 | 03 UTYPE05A PICTURE X. |
| 215 | 02 FILLER PICTURE X(4). |
| 216 | 02 UTYPE05I PIC X(1). |
| 217 | 02 SEL0006L COMP PIC S9(4). |
| 218 | 02 SEL0006F PICTURE X. |
| 219 | 02 FILLER REDEFINES SEL0006F. |
| 220 | 03 SEL0006A PICTURE X. |
| 221 | 02 FILLER PICTURE X(4). |
| 222 | 02 SEL0006I PIC X(1). |
| 223 | 02 USRID06L COMP PIC S9(4). |
| 224 | 02 USRID06F PICTURE X. |
| 225 | 02 FILLER REDEFINES USRID06F. |
| 226 | 03 USRID06A PICTURE X. |
| 227 | 02 FILLER PICTURE X(4). |
| 228 | 02 USRID06I PIC X(8). |
| 229 | 02 FNAME06L COMP PIC S9(4). |
| 230 | 02 FNAME06F PICTURE X. |
| 231 | 02 FILLER REDEFINES FNAME06F. |
| 232 | 03 FNAME06A PICTURE X. |
| 233 | 02 FILLER PICTURE X(4). |
| 234 | 02 FNAME06I PIC X(20). |
| 235 | 02 LNAME06L COMP PIC S9(4). |
| 236 | 02 LNAME06F PICTURE X. |
| 237 | 02 FILLER REDEFINES LNAME06F. |
| 238 | 03 LNAME06A PICTURE X. |
| 239 | 02 FILLER PICTURE X(4). |
| 240 | 02 LNAME06I PIC X(20). |
| 241 | 02 UTYPE06L COMP PIC S9(4). |
| 242 | 02 UTYPE06F PICTURE X. |
| 243 | 02 FILLER REDEFINES UTYPE06F. |
| 244 | 03 UTYPE06A PICTURE X. |
| 245 | 02 FILLER PICTURE X(4). |
| 246 | 02 UTYPE06I PIC X(1). |
| 247 | 02 SEL0007L COMP PIC S9(4). |
| 248 | 02 SEL0007F PICTURE X. |
| 249 | 02 FILLER REDEFINES SEL0007F. |
| 250 | 03 SEL0007A PICTURE X. |
| 251 | 02 FILLER PICTURE X(4). |
| 252 | 02 SEL0007I PIC X(1). |
| 253 | 02 USRID07L COMP PIC S9(4). |
| 254 | 02 USRID07F PICTURE X. |
| 255 | 02 FILLER REDEFINES USRID07F. |
| 256 | 03 USRID07A PICTURE X. |
| 257 | 02 FILLER PICTURE X(4). |
| 258 | 02 USRID07I PIC X(8). |
| 259 | 02 FNAME07L COMP PIC S9(4). |
| 260 | 02 FNAME07F PICTURE X. |
| 261 | 02 FILLER REDEFINES FNAME07F. |
| 262 | 03 FNAME07A PICTURE X. |
| 263 | 02 FILLER PICTURE X(4). |
| 264 | 02 FNAME07I PIC X(20). |
| 265 | 02 LNAME07L COMP PIC S9(4). |
| 266 | 02 LNAME07F PICTURE X. |
| 267 | 02 FILLER REDEFINES LNAME07F. |
| 268 | 03 LNAME07A PICTURE X. |
| 269 | 02 FILLER PICTURE X(4). |
| 270 | 02 LNAME07I PIC X(20). |
| 271 | 02 UTYPE07L COMP PIC S9(4). |
| 272 | 02 UTYPE07F PICTURE X. |
| 273 | 02 FILLER REDEFINES UTYPE07F. |
| 274 | 03 UTYPE07A PICTURE X. |
| 275 | 02 FILLER PICTURE X(4). |
| 276 | 02 UTYPE07I PIC X(1). |
| 277 | 02 SEL0008L COMP PIC S9(4). |
| 278 | 02 SEL0008F PICTURE X. |
| 279 | 02 FILLER REDEFINES SEL0008F. |
| 280 | 03 SEL0008A PICTURE X. |
| 281 | 02 FILLER PICTURE X(4). |
| 282 | 02 SEL0008I PIC X(1). |
| 283 | 02 USRID08L COMP PIC S9(4). |
| 284 | 02 USRID08F PICTURE X. |
| 285 | 02 FILLER REDEFINES USRID08F. |
| 286 | 03 USRID08A PICTURE X. |
| 287 | 02 FILLER PICTURE X(4). |
| 288 | 02 USRID08I PIC X(8). |
| 289 | 02 FNAME08L COMP PIC S9(4). |
| 290 | 02 FNAME08F PICTURE X. |
| 291 | 02 FILLER REDEFINES FNAME08F. |
| 292 | 03 FNAME08A PICTURE X. |
| 293 | 02 FILLER PICTURE X(4). |
| 294 | 02 FNAME08I PIC X(20). |
| 295 | 02 LNAME08L COMP PIC S9(4). |
| 296 | 02 LNAME08F PICTURE X. |
| 297 | 02 FILLER REDEFINES LNAME08F. |
| 298 | 03 LNAME08A PICTURE X. |
| 299 | 02 FILLER PICTURE X(4). |
| 300 | 02 LNAME08I PIC X(20). |
| 301 | 02 UTYPE08L COMP PIC S9(4). |
| 302 | 02 UTYPE08F PICTURE X. |
| 303 | 02 FILLER REDEFINES UTYPE08F. |
| 304 | 03 UTYPE08A PICTURE X. |
| 305 | 02 FILLER PICTURE X(4). |
| 306 | 02 UTYPE08I PIC X(1). |
| 307 | 02 SEL0009L COMP PIC S9(4). |
| 308 | 02 SEL0009F PICTURE X. |
| 309 | 02 FILLER REDEFINES SEL0009F. |
| 310 | 03 SEL0009A PICTURE X. |
| 311 | 02 FILLER PICTURE X(4). |
| 312 | 02 SEL0009I PIC X(1). |
| 313 | 02 USRID09L COMP PIC S9(4). |
| 314 | 02 USRID09F PICTURE X. |
| 315 | 02 FILLER REDEFINES USRID09F. |
| 316 | 03 USRID09A PICTURE X. |
| 317 | 02 FILLER PICTURE X(4). |
| 318 | 02 USRID09I PIC X(8). |
| 319 | 02 FNAME09L COMP PIC S9(4). |
| 320 | 02 FNAME09F PICTURE X. |
| 321 | 02 FILLER REDEFINES FNAME09F. |
| 322 | 03 FNAME09A PICTURE X. |
| 323 | 02 FILLER PICTURE X(4). |
| 324 | 02 FNAME09I PIC X(20). |
| 325 | 02 LNAME09L COMP PIC S9(4). |
| 326 | 02 LNAME09F PICTURE X. |
| 327 | 02 FILLER REDEFINES LNAME09F. |
| 328 | 03 LNAME09A PICTURE X. |
| 329 | 02 FILLER PICTURE X(4). |
| 330 | 02 LNAME09I PIC X(20). |
| 331 | 02 UTYPE09L COMP PIC S9(4). |
| 332 | 02 UTYPE09F PICTURE X. |
| 333 | 02 FILLER REDEFINES UTYPE09F. |
| 334 | 03 UTYPE09A PICTURE X. |
| 335 | 02 FILLER PICTURE X(4). |
| 336 | 02 UTYPE09I PIC X(1). |
| 337 | 02 SEL0010L COMP PIC S9(4). |
| 338 | 02 SEL0010F PICTURE X. |
| 339 | 02 FILLER REDEFINES SEL0010F. |
| 340 | 03 SEL0010A PICTURE X. |
| 341 | 02 FILLER PICTURE X(4). |
| 342 | 02 SEL0010I PIC X(1). |
| 343 | 02 USRID10L COMP PIC S9(4). |
| 344 | 02 USRID10F PICTURE X. |
| 345 | 02 FILLER REDEFINES USRID10F. |
| 346 | 03 USRID10A PICTURE X. |
| 347 | 02 FILLER PICTURE X(4). |
| 348 | 02 USRID10I PIC X(8). |
| 349 | 02 FNAME10L COMP PIC S9(4). |
| 350 | 02 FNAME10F PICTURE X. |
| 351 | 02 FILLER REDEFINES FNAME10F. |
| 352 | 03 FNAME10A PICTURE X. |
| 353 | 02 FILLER PICTURE X(4). |
| 354 | 02 FNAME10I PIC X(20). |
| 355 | 02 LNAME10L COMP PIC S9(4). |
| 356 | 02 LNAME10F PICTURE X. |
| 357 | 02 FILLER REDEFINES LNAME10F. |
| 358 | 03 LNAME10A PICTURE X. |
| 359 | 02 FILLER PICTURE X(4). |
| 360 | 02 LNAME10I PIC X(20). |
| 361 | 02 UTYPE10L COMP PIC S9(4). |
| 362 | 02 UTYPE10F PICTURE X. |
| 363 | 02 FILLER REDEFINES UTYPE10F. |
| 364 | 03 UTYPE10A PICTURE X. |
| 365 | 02 FILLER PICTURE X(4). |
| 366 | 02 UTYPE10I PIC X(1). |
| 367 | 02 ERRMSGL COMP PIC S9(4). |
| 368 | 02 ERRMSGF PICTURE X. |
| 369 | 02 FILLER REDEFINES ERRMSGF. |
| 370 | 03 ERRMSGA PICTURE X. |
| 371 | 02 FILLER PICTURE X(4). |
| 372 | 02 ERRMSGI PIC X(78). |
| 373 | 01 COUSR0AO REDEFINES COUSR0AI. |
| 374 | 02 FILLER PIC X(12). |
| 375 | 02 FILLER PICTURE X(3). |
| 376 | 02 TRNNAMEC PICTURE X. |
| 377 | 02 TRNNAMEP PICTURE X. |
| 378 | 02 TRNNAMEH PICTURE X. |
| 379 | 02 TRNNAMEV PICTURE X. |
| 380 | 02 TRNNAMEO PIC X(4). |
| 381 | 02 FILLER PICTURE X(3). |
| 382 | 02 TITLE01C PICTURE X. |
| 383 | 02 TITLE01P PICTURE X. |
| 384 | 02 TITLE01H PICTURE X. |
| 385 | 02 TITLE01V PICTURE X. |
| 386 | 02 TITLE01O PIC X(40). |
| 387 | 02 FILLER PICTURE X(3). |
| 388 | 02 CURDATEC PICTURE X. |
| 389 | 02 CURDATEP PICTURE X. |
| 390 | 02 CURDATEH PICTURE X. |
| 391 | 02 CURDATEV PICTURE X. |
| 392 | 02 CURDATEO PIC X(8). |
| 393 | 02 FILLER PICTURE X(3). |
| 394 | 02 PGMNAMEC PICTURE X. |
| 395 | 02 PGMNAMEP PICTURE X. |
| 396 | 02 PGMNAMEH PICTURE X. |
| 397 | 02 PGMNAMEV PICTURE X. |
| 398 | 02 PGMNAMEO PIC X(8). |
| 399 | 02 FILLER PICTURE X(3). |
| 400 | 02 TITLE02C PICTURE X. |
| 401 | 02 TITLE02P PICTURE X. |
| 402 | 02 TITLE02H PICTURE X. |
| 403 | 02 TITLE02V PICTURE X. |
| 404 | 02 TITLE02O PIC X(40). |
| 405 | 02 FILLER PICTURE X(3). |
| 406 | 02 CURTIMEC PICTURE X. |
| 407 | 02 CURTIMEP PICTURE X. |
| 408 | 02 CURTIMEH PICTURE X. |
| 409 | 02 CURTIMEV PICTURE X. |
| 410 | 02 CURTIMEO PIC X(8). |
| 411 | 02 FILLER PICTURE X(3). |
| 412 | 02 PAGENUMC PICTURE X. |
| 413 | 02 PAGENUMP PICTURE X. |
| 414 | 02 PAGENUMH PICTURE X. |
| 415 | 02 PAGENUMV PICTURE X. |
| 416 | 02 PAGENUMO PIC X(8). |
| 417 | 02 FILLER PICTURE X(3). |
| 418 | 02 USRIDINC PICTURE X. |
| 419 | 02 USRIDINP PICTURE X. |
| 420 | 02 USRIDINH PICTURE X. |
| 421 | 02 USRIDINV PICTURE X. |
| 422 | 02 USRIDINO PIC X(8). |
| 423 | 02 FILLER PICTURE X(3). |
| 424 | 02 SEL0001C PICTURE X. |
| 425 | 02 SEL0001P PICTURE X. |
| 426 | 02 SEL0001H PICTURE X. |
| 427 | 02 SEL0001V PICTURE X. |
| 428 | 02 SEL0001O PIC X(1). |
| 429 | 02 FILLER PICTURE X(3). |
| 430 | 02 USRID01C PICTURE X. |
| 431 | 02 USRID01P PICTURE X. |
| 432 | 02 USRID01H PICTURE X. |
| 433 | 02 USRID01V PICTURE X. |
| 434 | 02 USRID01O PIC X(8). |
| 435 | 02 FILLER PICTURE X(3). |
| 436 | 02 FNAME01C PICTURE X. |
| 437 | 02 FNAME01P PICTURE X. |
| 438 | 02 FNAME01H PICTURE X. |
| 439 | 02 FNAME01V PICTURE X. |
| 440 | 02 FNAME01O PIC X(20). |
| 441 | 02 FILLER PICTURE X(3). |
| 442 | 02 LNAME01C PICTURE X. |
| 443 | 02 LNAME01P PICTURE X. |
| 444 | 02 LNAME01H PICTURE X. |
| 445 | 02 LNAME01V PICTURE X. |
| 446 | 02 LNAME01O PIC X(20). |
| 447 | 02 FILLER PICTURE X(3). |
| 448 | 02 UTYPE01C PICTURE X. |
| 449 | 02 UTYPE01P PICTURE X. |
| 450 | 02 UTYPE01H PICTURE X. |
| 451 | 02 UTYPE01V PICTURE X. |
| 452 | 02 UTYPE01O PIC X(1). |
| 453 | 02 FILLER PICTURE X(3). |
| 454 | 02 SEL0002C PICTURE X. |
| 455 | 02 SEL0002P PICTURE X. |
| 456 | 02 SEL0002H PICTURE X. |
| 457 | 02 SEL0002V PICTURE X. |
| 458 | 02 SEL0002O PIC X(1). |
| 459 | 02 FILLER PICTURE X(3). |
| 460 | 02 USRID02C PICTURE X. |
| 461 | 02 USRID02P PICTURE X. |
| 462 | 02 USRID02H PICTURE X. |
| 463 | 02 USRID02V PICTURE X. |
| 464 | 02 USRID02O PIC X(8). |
| 465 | 02 FILLER PICTURE X(3). |
| 466 | 02 FNAME02C PICTURE X. |
| 467 | 02 FNAME02P PICTURE X. |
| 468 | 02 FNAME02H PICTURE X. |
| 469 | 02 FNAME02V PICTURE X. |
| 470 | 02 FNAME02O PIC X(20). |
| 471 | 02 FILLER PICTURE X(3). |
| 472 | 02 LNAME02C PICTURE X. |
| 473 | 02 LNAME02P PICTURE X. |
| 474 | 02 LNAME02H PICTURE X. |
| 475 | 02 LNAME02V PICTURE X. |
| 476 | 02 LNAME02O PIC X(20). |
| 477 | 02 FILLER PICTURE X(3). |
| 478 | 02 UTYPE02C PICTURE X. |
| 479 | 02 UTYPE02P PICTURE X. |
| 480 | 02 UTYPE02H PICTURE X. |
| 481 | 02 UTYPE02V PICTURE X. |
| 482 | 02 UTYPE02O PIC X(1). |
| 483 | 02 FILLER PICTURE X(3). |
| 484 | 02 SEL0003C PICTURE X. |
| 485 | 02 SEL0003P PICTURE X. |
| 486 | 02 SEL0003H PICTURE X. |
| 487 | 02 SEL0003V PICTURE X. |
| 488 | 02 SEL0003O PIC X(1). |
| 489 | 02 FILLER PICTURE X(3). |
| 490 | 02 USRID03C PICTURE X. |
| 491 | 02 USRID03P PICTURE X. |
| 492 | 02 USRID03H PICTURE X. |
| 493 | 02 USRID03V PICTURE X. |
| 494 | 02 USRID03O PIC X(8). |
| 495 | 02 FILLER PICTURE X(3). |
| 496 | 02 FNAME03C PICTURE X. |
| 497 | 02 FNAME03P PICTURE X. |
| 498 | 02 FNAME03H PICTURE X. |
| 499 | 02 FNAME03V PICTURE X. |
| 500 | 02 FNAME03O PIC X(20). |
| 501 | 02 FILLER PICTURE X(3). |
| 502 | 02 LNAME03C PICTURE X. |
| 503 | 02 LNAME03P PICTURE X. |
| 504 | 02 LNAME03H PICTURE X. |
| 505 | 02 LNAME03V PICTURE X. |
| 506 | 02 LNAME03O PIC X(20). |
| 507 | 02 FILLER PICTURE X(3). |
| 508 | 02 UTYPE03C PICTURE X. |
| 509 | 02 UTYPE03P PICTURE X. |
| 510 | 02 UTYPE03H PICTURE X. |
| 511 | 02 UTYPE03V PICTURE X. |
| 512 | 02 UTYPE03O PIC X(1). |
| 513 | 02 FILLER PICTURE X(3). |
| 514 | 02 SEL0004C PICTURE X. |
| 515 | 02 SEL0004P PICTURE X. |
| 516 | 02 SEL0004H PICTURE X. |
| 517 | 02 SEL0004V PICTURE X. |
| 518 | 02 SEL0004O PIC X(1). |
| 519 | 02 FILLER PICTURE X(3). |
| 520 | 02 USRID04C PICTURE X. |
| 521 | 02 USRID04P PICTURE X. |
| 522 | 02 USRID04H PICTURE X. |
| 523 | 02 USRID04V PICTURE X. |
| 524 | 02 USRID04O PIC X(8). |
| 525 | 02 FILLER PICTURE X(3). |
| 526 | 02 FNAME04C PICTURE X. |
| 527 | 02 FNAME04P PICTURE X. |
| 528 | 02 FNAME04H PICTURE X. |
| 529 | 02 FNAME04V PICTURE X. |
| 530 | 02 FNAME04O PIC X(20). |
| 531 | 02 FILLER PICTURE X(3). |
| 532 | 02 LNAME04C PICTURE X. |
| 533 | 02 LNAME04P PICTURE X. |
| 534 | 02 LNAME04H PICTURE X. |
| 535 | 02 LNAME04V PICTURE X. |
| 536 | 02 LNAME04O PIC X(20). |
| 537 | 02 FILLER PICTURE X(3). |
| 538 | 02 UTYPE04C PICTURE X. |
| 539 | 02 UTYPE04P PICTURE X. |
| 540 | 02 UTYPE04H PICTURE X. |
| 541 | 02 UTYPE04V PICTURE X. |
| 542 | 02 UTYPE04O PIC X(1). |
| 543 | 02 FILLER PICTURE X(3). |
| 544 | 02 SEL0005C PICTURE X. |
| 545 | 02 SEL0005P PICTURE X. |
| 546 | 02 SEL0005H PICTURE X. |
| 547 | 02 SEL0005V PICTURE X. |
| 548 | 02 SEL0005O PIC X(1). |
| 549 | 02 FILLER PICTURE X(3). |
| 550 | 02 USRID05C PICTURE X. |
| 551 | 02 USRID05P PICTURE X. |
| 552 | 02 USRID05H PICTURE X. |
| 553 | 02 USRID05V PICTURE X. |
| 554 | 02 USRID05O PIC X(8). |
| 555 | 02 FILLER PICTURE X(3). |
| 556 | 02 FNAME05C PICTURE X. |
| 557 | 02 FNAME05P PICTURE X. |
| 558 | 02 FNAME05H PICTURE X. |
| 559 | 02 FNAME05V PICTURE X. |
| 560 | 02 FNAME05O PIC X(20). |
| 561 | 02 FILLER PICTURE X(3). |
| 562 | 02 LNAME05C PICTURE X. |
| 563 | 02 LNAME05P PICTURE X. |
| 564 | 02 LNAME05H PICTURE X. |
| 565 | 02 LNAME05V PICTURE X. |
| 566 | 02 LNAME05O PIC X(20). |
| 567 | 02 FILLER PICTURE X(3). |
| 568 | 02 UTYPE05C PICTURE X. |
| 569 | 02 UTYPE05P PICTURE X. |
| 570 | 02 UTYPE05H PICTURE X. |
| 571 | 02 UTYPE05V PICTURE X. |
| 572 | 02 UTYPE05O PIC X(1). |
| 573 | 02 FILLER PICTURE X(3). |
| 574 | 02 SEL0006C PICTURE X. |
| 575 | 02 SEL0006P PICTURE X. |
| 576 | 02 SEL0006H PICTURE X. |
| 577 | 02 SEL0006V PICTURE X. |
| 578 | 02 SEL0006O PIC X(1). |
| 579 | 02 FILLER PICTURE X(3). |
| 580 | 02 USRID06C PICTURE X. |
| 581 | 02 USRID06P PICTURE X. |
| 582 | 02 USRID06H PICTURE X. |
| 583 | 02 USRID06V PICTURE X. |
| 584 | 02 USRID06O PIC X(8). |
| 585 | 02 FILLER PICTURE X(3). |
| 586 | 02 FNAME06C PICTURE X. |
| 587 | 02 FNAME06P PICTURE X. |
| 588 | 02 FNAME06H PICTURE X. |
| 589 | 02 FNAME06V PICTURE X. |
| 590 | 02 FNAME06O PIC X(20). |
| 591 | 02 FILLER PICTURE X(3). |
| 592 | 02 LNAME06C PICTURE X. |
| 593 | 02 LNAME06P PICTURE X. |
| 594 | 02 LNAME06H PICTURE X. |
| 595 | 02 LNAME06V PICTURE X. |
| 596 | 02 LNAME06O PIC X(20). |
| 597 | 02 FILLER PICTURE X(3). |
| 598 | 02 UTYPE06C PICTURE X. |
| 599 | 02 UTYPE06P PICTURE X. |
| 600 | 02 UTYPE06H PICTURE X. |
| 601 | 02 UTYPE06V PICTURE X. |
| 602 | 02 UTYPE06O PIC X(1). |
| 603 | 02 FILLER PICTURE X(3). |
| 604 | 02 SEL0007C PICTURE X. |
| 605 | 02 SEL0007P PICTURE X. |
| 606 | 02 SEL0007H PICTURE X. |
| 607 | 02 SEL0007V PICTURE X. |
| 608 | 02 SEL0007O PIC X(1). |
| 609 | 02 FILLER PICTURE X(3). |
| 610 | 02 USRID07C PICTURE X. |
| 611 | 02 USRID07P PICTURE X. |
| 612 | 02 USRID07H PICTURE X. |
| 613 | 02 USRID07V PICTURE X. |
| 614 | 02 USRID07O PIC X(8). |
| 615 | 02 FILLER PICTURE X(3). |
| 616 | 02 FNAME07C PICTURE X. |
| 617 | 02 FNAME07P PICTURE X. |
| 618 | 02 FNAME07H PICTURE X. |
| 619 | 02 FNAME07V PICTURE X. |
| 620 | 02 FNAME07O PIC X(20). |
| 621 | 02 FILLER PICTURE X(3). |
| 622 | 02 LNAME07C PICTURE X. |
| 623 | 02 LNAME07P PICTURE X. |
| 624 | 02 LNAME07H PICTURE X. |
| 625 | 02 LNAME07V PICTURE X. |
| 626 | 02 LNAME07O PIC X(20). |
| 627 | 02 FILLER PICTURE X(3). |
| 628 | 02 UTYPE07C PICTURE X. |
| 629 | 02 UTYPE07P PICTURE X. |
| 630 | 02 UTYPE07H PICTURE X. |
| 631 | 02 UTYPE07V PICTURE X. |
| 632 | 02 UTYPE07O PIC X(1). |
| 633 | 02 FILLER PICTURE X(3). |
| 634 | 02 SEL0008C PICTURE X. |
| 635 | 02 SEL0008P PICTURE X. |
| 636 | 02 SEL0008H PICTURE X. |
| 637 | 02 SEL0008V PICTURE X. |
| 638 | 02 SEL0008O PIC X(1). |
| 639 | 02 FILLER PICTURE X(3). |
| 640 | 02 USRID08C PICTURE X. |
| 641 | 02 USRID08P PICTURE X. |
| 642 | 02 USRID08H PICTURE X. |
| 643 | 02 USRID08V PICTURE X. |
| 644 | 02 USRID08O PIC X(8). |
| 645 | 02 FILLER PICTURE X(3). |
| 646 | 02 FNAME08C PICTURE X. |
| 647 | 02 FNAME08P PICTURE X. |
| 648 | 02 FNAME08H PICTURE X. |
| 649 | 02 FNAME08V PICTURE X. |
| 650 | 02 FNAME08O PIC X(20). |
| 651 | 02 FILLER PICTURE X(3). |
| 652 | 02 LNAME08C PICTURE X. |
| 653 | 02 LNAME08P PICTURE X. |
| 654 | 02 LNAME08H PICTURE X. |
| 655 | 02 LNAME08V PICTURE X. |
| 656 | 02 LNAME08O PIC X(20). |
| 657 | 02 FILLER PICTURE X(3). |
| 658 | 02 UTYPE08C PICTURE X. |
| 659 | 02 UTYPE08P PICTURE X. |
| 660 | 02 UTYPE08H PICTURE X. |
| 661 | 02 UTYPE08V PICTURE X. |
| 662 | 02 UTYPE08O PIC X(1). |
| 663 | 02 FILLER PICTURE X(3). |
| 664 | 02 SEL0009C PICTURE X. |
| 665 | 02 SEL0009P PICTURE X. |
| 666 | 02 SEL0009H PICTURE X. |
| 667 | 02 SEL0009V PICTURE X. |
| 668 | 02 SEL0009O PIC X(1). |
| 669 | 02 FILLER PICTURE X(3). |
| 670 | 02 USRID09C PICTURE X. |
| 671 | 02 USRID09P PICTURE X. |
| 672 | 02 USRID09H PICTURE X. |
| 673 | 02 USRID09V PICTURE X. |
| 674 | 02 USRID09O PIC X(8). |
| 675 | 02 FILLER PICTURE X(3). |
| 676 | 02 FNAME09C PICTURE X. |
| 677 | 02 FNAME09P PICTURE X. |
| 678 | 02 FNAME09H PICTURE X. |
| 679 | 02 FNAME09V PICTURE X. |
| 680 | 02 FNAME09O PIC X(20). |
| 681 | 02 FILLER PICTURE X(3). |
| 682 | 02 LNAME09C PICTURE X. |
| 683 | 02 LNAME09P PICTURE X. |
| 684 | 02 LNAME09H PICTURE X. |
| 685 | 02 LNAME09V PICTURE X. |
| 686 | 02 LNAME09O PIC X(20). |
| 687 | 02 FILLER PICTURE X(3). |
| 688 | 02 UTYPE09C PICTURE X. |
| 689 | 02 UTYPE09P PICTURE X. |
| 690 | 02 UTYPE09H PICTURE X. |
| 691 | 02 UTYPE09V PICTURE X. |
| 692 | 02 UTYPE09O PIC X(1). |
| 693 | 02 FILLER PICTURE X(3). |
| 694 | 02 SEL0010C PICTURE X. |
| 695 | 02 SEL0010P PICTURE X. |
| 696 | 02 SEL0010H PICTURE X. |
| 697 | 02 SEL0010V PICTURE X. |
| 698 | 02 SEL0010O PIC X(1). |
| 699 | 02 FILLER PICTURE X(3). |
| 700 | 02 USRID10C PICTURE X. |
| 701 | 02 USRID10P PICTURE X. |
| 702 | 02 USRID10H PICTURE X. |
| 703 | 02 USRID10V PICTURE X. |
| 704 | 02 USRID10O PIC X(8). |
| 705 | 02 FILLER PICTURE X(3). |
| 706 | 02 FNAME10C PICTURE X. |
| 707 | 02 FNAME10P PICTURE X. |
| 708 | 02 FNAME10H PICTURE X. |
| 709 | 02 FNAME10V PICTURE X. |
| 710 | 02 FNAME10O PIC X(20). |
| 711 | 02 FILLER PICTURE X(3). |
| 712 | 02 LNAME10C PICTURE X. |
| 713 | 02 LNAME10P PICTURE X. |
| 714 | 02 LNAME10H PICTURE X. |
| 715 | 02 LNAME10V PICTURE X. |
| 716 | 02 LNAME10O PIC X(20). |
| 717 | 02 FILLER PICTURE X(3). |
| 718 | 02 UTYPE10C PICTURE X. |
| 719 | 02 UTYPE10P PICTURE X. |
| 720 | 02 UTYPE10H PICTURE X. |
| 721 | 02 UTYPE10V PICTURE X. |
| 722 | 02 UTYPE10O PIC X(1). |
| 723 | 02 FILLER PICTURE X(3). |
| 724 | 02 ERRMSGC PICTURE X. |
| 725 | 02 ERRMSGP PICTURE X. |
| 726 | 02 ERRMSGH PICTURE X. |
| 727 | 02 ERRMSGV PICTURE X. |
| 728 | 02 ERRMSGO PIC X(78). |