zOs/TX/MF15HLOA
//YMF15LOA JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBTF
//S1 EXEC PGM=DSNUTILB,PARM='DBTF,YMF15LOA.LOAD'
//SYSPRINT DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSTEMPL DD DSN=DBTF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
TEMPLATE TIN
DSN('A540769.TMPUL.MF150H.P&PA..UNL')
DISP(OLD,KEEP,KEEP)
LOAD DATA
EBCDIC CCSID(00500,00000,00000)
-- STATISTICS INDEX(ALL) KEYCARD UPDATE ALL
LOG NO
SORTDEVT DISK SORTNUM 150
WORKDDN(TSYUTS, TSOUTS)
SORTKEYS 124141645
INTO TABLE
"OA1T".
"TMF150H1"
PART 00064 INDDN TIN
RESUME NO REPLACE COPYDDN(TCOPYD)
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
)
INTO TABLE
"OA1T".
"TMF150H1"
PART 00065 INDDN TIN
RESUME NO REPLACE COPYDDN(TCOPYD)
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
)
INTO TABLE
"OA1T".
"TMF150H1"
PART 00066 INDDN TIN
RESUME NO REPLACE COPYDDN(TCOPYD)
( "MF150001"
POSITION( 00003:00018) CHAR(00016)
, "MF150002"
POSITION( 00019:00019) CHAR(00001)
, "MF150003"
POSITION( 00020:00024) CHAR(00005)
, "MF150004"
POSITION( 00025:00049) CHAR(00025)
, "MF150005"
POSITION( 00050:00050) CHAR(00001)
, "MF150006"
POSITION( 00051:00051) CHAR(00001)
, "MF150007"
POSITION( 00052:00052) CHAR(00001)
, "MF150008"
POSITION( 00053:00055) CHAR(00003)
, "MF150009"
POSITION( 00056:00060) CHAR(00005)
, "MF150010"
POSITION( 00061:00064) CHAR(00004)
, "MF150011"
POSITION( 00065:00065) CHAR(00001)
, "MF150012"
POSITION( 00066:00066) CHAR(00001)
, "MF150013"
POSITION( 00067:00076) DATE EXTERNAL
, "MF150014"
POSITION( 00077:00080) CHAR(00004)
, "MF150015"
POSITION( 00081:00084) CHAR(00004)
, "MF150016"
POSITION( 00085:00088) CHAR(00004)
, "MF150017"
POSITION( 00089:00100) CHAR(00012)
, "MF150018"
POSITION( 00101:00108) DECIMAL
, "MF150019"
POSITION( 00109:00116) DECIMAL
, "MF150020"
POSITION( 00117:00124) CHAR(00008)
, "MF150021"
POSITION( 00125:00150) TIMESTAMP EXTERNAL
, "MF150022"
POSITION( 00151:00154) CHAR(00004)
, "MF150023"
POSITION( 00155:00166) CHAR(00012)
, "MF150024"
POSITION( 00167:00167) CHAR(00001)
, "MF150025"
POSITION( 00168:00170) CHAR(00003)
, "MF150026"
POSITION( 00171:00173) CHAR(00003)
, "MF150027"
POSITION( 00174:00176) CHAR(00003)
, "MF150028"
POSITION( 00177:00179) CHAR(00003)
, "MF150029"
POSITION( 00180:00182) CHAR(00003)
, "MF150030"
POSITION( 00183:00198) CHAR(00016)
, "MF150031"
POSITION( 00199:00200) CHAR(00002)
, "MF150032"
POSITION( 00201:00207) CHAR(00007)
, "MF150033"
POSITION( 00208:00214) CHAR(00007)
, "MF150034"
POSITION( 00215:00218) CHAR(00004)
, "MF150035"
POSITION( 00219:00219) CHAR(00001)
, "MF150036"
POSITION( 00220:00237) CHAR(00018)
, "MF150037"
POSITION( 00238:00245) DECIMAL
, "MF150038"
POSITION( 00246:00261) CHAR(00016)
, "MF150039"
POSITION( 00262:00263) CHAR(00002)
, "MF150040"
POSITION( 00264:00265) CHAR(00002)
, "MF150041"
POSITION( 00266:00267) CHAR(00002)
, "MF150042"
POSITION( 00268:00271) CHAR(00004)
, "MF150043"
POSITION( 00272:00279) DECIMAL
, "MF150044"
POSITION( 00280:00284) CHAR(00005)
, "MF150045"
POSITION( 00285:00288) CHAR(00004)
, "MF150046"
POSITION( 00289:00292) CHAR(00004)
, "MF150047"
POSITION( 00293:00293) CHAR(00001)
, "MF150051"
POSITION( 00294:00296) CHAR(00003)
, "MF150052"
POSITION( 00297:00299) CHAR(00003)
, "MF150053"
POSITION( 00300:00307) DECIMAL
, "MF150054"
POSITION( 00308:00314) CHAR(00007)
, "MF150055"
POSITION( 00315:00315) CHAR(00001)
, "MF150056"
POSITION( 00316:00323) CHAR(00008)
, "MF150059"
POSITION( 00324:00328) CHAR(00005)
, "MF150060"
POSITION( 00329:00354) TIMESTAMP EXTERNAL
, "MF150062"
POSITION( 00355:00355) CHAR(00001)
, "MF150063"
POSITION( 00356:00356) CHAR(00001)
, "MF150064"
POSITION( 00357:00366) DATE EXTERNAL
, "MF150065"
POSITION( 00367:00376) DATE EXTERNAL
, "MF150066"
POSITION( 00377:00392) CHAR(00016)
, "MF150067"
POSITION( 00393:00408) CHAR(00016)
, "MF150068"
POSITION( 00409:00424) CHAR(00016)
, "MF150069"
POSITION( 00425:00428) CHAR(00004)
, "MF150070"
POSITION( 00429:00435) CHAR(00007)
, "MF150071"
POSITION( 00436:00436) CHAR(00001)
, "MF150072"
POSITION( 00437:00437) CHAR(00001)
, "MF150073"
POSITION( 00438:00438) CHAR(00001)
, "MF150074"
POSITION( 00439:00439) CHAR(00001)
, "MF150075"
POSITION( 00440:00440) CHAR(00001)
, "MF150076"
POSITION( 00441:00441) CHAR(00001)
, "MF150077"
POSITION( 00442:00447) CHAR(00006)
, "MF150078"
POSITION( 00448:00448) CHAR(00001)
, "MF150079"
POSITION( 00449:00449) CHAR(00001)
, "MF150080"
POSITION( 00450:00459) DATE EXTERNAL
, "MF150081"
POSITION( 00460:00464) CHAR(00005)
, "MF150082"
POSITION( 00465:00490) CHAR(00026)
, "MF150083"
POSITION( 00491:00492) SMALLINT
, "MF150084"
POSITION( 00493:00494) SMALLINT
, "MF150085"
POSITION( 00495:00496) SMALLINT
, "MF150086"
POSITION( 00497:00531) CHAR(00035)
, "MF150087"
POSITION( 00532:00566) CHAR(00035)
, "MF150088"
POSITION( 00567:00601) CHAR(00035)
, "MF150089"
POSITION( 00602:00636) CHAR(00035)
, "MF150090"
POSITION( 00637:00638) SMALLINT
, "MF150091"
POSITION( 00639:00640) SMALLINT
, "MF150092"
POSITION( 00641:00656) CHAR(00016)
, "MF150019A"
POSITION( 00657:00660) CHAR(00004)
)