|
DataMuseum.dkPresents historical artifacts from the history of: Philips Data Systems |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Philips Data Systems Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metricsIndex: / A C D E F G L M N O P R S T X p ½
Length: 3839616 (0x3a9680)
Description: Bits:30009675 Philips computer tape "600209"
Types: SimhTapContainer, ½" Magnetic Tape
| name | artifact |
|---|---|
| CON10 | «none» |
| CON10/CNFT.UF | ⟦fa5dbcf41⟧ pts_type |
| CON10/CNJA.UF | ⟦c7926765f⟧ pts_type |
| CON10/CNJP.UF | ⟦1467dff57⟧ pts_type |
| CON10/CONFP.UF | ⟦f4bc89a2c⟧ pts_type |
| CON10/CONFT.UF | ⟦23636c7f3⟧ pts_type |
| CON10/CONFU.UF | ⟦14b788a42⟧ pts_type |
| CON10/CTAB01.SC | ⟦258636d74⟧ pts_type |
| CON10/CTAB03.SC | ⟦00fb8af8d⟧ pts_type |
| CON10/LIST.UF | ⟦5bcd7217d⟧ pts_type |
| CON10/LISTC.UF | ⟦087604e5e⟧ pts_type |
| DEN10 | «none» |
| DEN10//OBJCT.OB | ⟦e27e8ad4a⟧ pts_type |
| DEN10/A.UF | ⟦bf4e6e542⟧ pts_type |
| DEN10/ASSRUT.SC | ⟦0b9ef813c⟧ pts_type |
| DEN10/CDVASM.SC | ⟦7c7ee4621⟧ pts_type |
| DEN10/CDVRUT.SC | ⟦ffe964796⟧ pts_type |
| DEN10/CONV.SC | ⟦ba1a0566b⟧ pts_type |
| DEN10/DATCHK.SC | ⟦923b55e3b⟧ pts_type |
| DEN10/DATUM.SC | ⟦33623db94⟧ pts_type |
| DEN10/DCCONV.SC | ⟦de9f58a5f⟧ pts_type |
| DEN10/DCTASK.SC | ⟦941192c76⟧ pts_type |
| DEN10/DE10ST.SC | ⟦aa875cf0b⟧ pts_type |
| DEN10/DE11ST.SC | ⟦032c79167⟧ pts_type |
| DEN10/DE1201.SC | ⟦093741ad6⟧ pts_type |
| DEN10/DE12ST.SC | ⟦68eee43d7⟧ pts_type |
| DEN10/DE14ST.SC | ⟦bd5bb27d7⟧ pts_type |
| DEN10/DE15ST.SC | ⟦974326a54⟧ pts_type |
| DEN10/DE16ST.SC | ⟦4925c6dfc⟧ pts_type |
| DEN10/DE20FS.SC | ⟦e2ee000b2⟧ pts_type |
| DEN10/DE20ST.SC | ⟦a3ba606c0⟧ pts_type |
| DEN10/DE21ST.SC | ⟦714111792⟧ pts_type |
| DEN10/DE23ST.SC | ⟦94b6e3650⟧ pts_type |
| DEN10/DE24ST.SC | ⟦92f413222⟧ pts_type |
| DEN10/DE30ST.SC | ⟦0a02e20cd⟧ pts_type |
| DEN10/DE31ST.SC | ⟦64e49c079⟧ pts_type |
| DEN10/DE40ST.SC | ⟦731cd18bb⟧ pts_type |
| DEN10/DE50ST.SC | ⟦c539d1bda⟧ pts_type |
| DEN10/DE60ST.SC | ⟦c6ab6694c⟧ pts_type |
| DEN10/DE70ST.SC | ⟦62dd111bc⟧ pts_type |
| DEN10/DE80ST.SC | ⟦beb16bc2a⟧ pts_type |
| DEN10/DE90ST.SC | ⟦c461edced⟧ pts_type |
| DEN10/DEACCU.SC | ⟦2f1e284ba⟧ pts_type |
| DEN10/DEAPPU.SC | ⟦b300b0130⟧ pts_type |
| DEN10/DEATNY.SC | ⟦7b48d47a5⟧ pts_type |
| DEN10/DEATTF.SC | ⟦337ce44f8⟧ pts_type |
| DEN10/DECOMP.SC | ⟦20c7b5de6⟧ pts_type |
| DEN10/DECONV.SC | ⟦4276d18a3⟧ pts_type |
| DEN10/DECVRT.SC | ⟦6242cf40f⟧ pts_type |
| DEN10/DEDDIV.SC | ⟦3fb109942⟧ pts_type |
| DEN10/DEDICO.SC | ⟦e2b52107a⟧ pts_type |
| DEN10/DEDISC.SC | ⟦60afd2eca⟧ pts_type |
| DEN10/DEDSHB.SC | ⟦fe402fec3⟧ pts_type |
| DEN10/DEFDSC.SC | ⟦4342a4ae7⟧ pts_type |
| DEN10/DEGENE.SC | ⟦f2f32db77⟧ pts_type |
| DEN10/DEKEYS.SC | ⟦fdcc8e037⟧ pts_type |
| DEN10/DELBUG.LM | ⟦b566ff812⟧ pts_type |
| DEN10/DELBUG.UF | ⟦9db2bd284⟧ pts_type |
| DEN10/DELINK.LM | ⟦ad6c21b28⟧ pts_type |
| DEN10/DELINK.UF | ⟦efdc980c7⟧ pts_type |
| DEN10/DELITT.SC | ⟦9aef0c402⟧ pts_type |
| DEN10/DELOCK.SC | ⟦6f0389acf⟧ pts_type |
| DEN10/DENT01.SC | ⟦2e920a1f9⟧ pts_type |
| DEN10/DENT02.SC | ⟦101fcb91f⟧ pts_type |
| DEN10/DENT03.SC | ⟦6472285fc⟧ pts_type |
| DEN10/DENTER.SC | ⟦4e8dea24b⟧ pts_type |
| DEN10/DENVAL.SC | ⟦60781a5f5⟧ pts_type |
| DEN10/DEPOOL.SC | ⟦7fa27c7ef⟧ pts_type |
| DEN10/DEPRFG.SC | ⟦76e7074e0⟧ pts_type |
| DEN10/DEPROC.SC | ⟦d3416cf1e⟧ pts_type |
| DEN10/DEPROD.LM | ⟦e1cf8b74f⟧ pts_type |
| DEN10/DEREC2.SC | ⟦3625ab594⟧ pts_type |
| DEN10/DERECS.SC | ⟦65644ef85⟧ pts_type |
| DEN10/DERROR.SC | ⟦6b013827f⟧ pts_type |
| DEN10/DESTAT.SC | ⟦d3e07e0de⟧ pts_type |
| DEN10/DEUNPF.SC | ⟦12c847657⟧ pts_type |
| DEN10/DEVGAC.SC | ⟦17bc0b58a⟧ pts_type |
| DEN10/DKCONV.SC | ⟦47a6816c9⟧ pts_type |
| DEN10/DKRUT1.SC | ⟦2ed2a5aab⟧ pts_type |
| DEN10/DKRUT2.SC | ⟦ad6c2cdcf⟧ pts_type |
| DEN10/DKRUT3.SC | ⟦18172b0ef⟧ pts_type |
| DEN10/DKRUT4.SC | ⟦4419f226d⟧ pts_type |
| DEN10/DLINK.LM | ⟦9bc4e021a⟧ pts_type |
| DEN10/FDIO.SC | ⟦009e225aa⟧ pts_type |
| DEN10/LIST.UF | ⟦05da566f3⟧ pts_type |
| DEN10/M:PROC.UF | ⟦cd4b9e00b⟧ pts_type |
| DEN10/NJLINK.UF | ⟦0132975cd⟧ pts_type |
| DEN10/NYCONV.SC | ⟦83d80a92f⟧ pts_type |
| DEN10/OBDIR.UF | ⟦f5f432061⟧ pts_type |
| DEN10/PTSDE.SC | ⟦8d438c597⟧ pts_type |
| DEN10/TEST.LM | ⟦84f26e079⟧ pts_type |
| DEN10/TEST.UF | ⟦80ecb5fce⟧ pts_type |
| DEN10/TRALL.UF | ⟦77cbfce07⟧ pts_type |
| M:DENJ | «none» |
| M:DENJ//OBJCT.OB | ⟦792e040ce⟧ pts_type |
| M:DENJ/CTAB01.SC | ⟦0406a51b2⟧ pts_type |
| M:DENJ/CTABSH.SC | ⟦01295d7e4⟧ pts_type |
| M:DENJ/CTABX.SC | ⟦49a9ecc16⟧ pts_type |
| M:DENJ/DFTAB.SC | ⟦8aba3c997⟧ pts_type |
| M:DENJ/DRDY01.SC | ⟦5f7b4b945⟧ pts_type |
| M:DENJ/DRFD01.SC | ⟦a98d41941⟧ pts_type |
| M:DENJ/DRFDDE.SC | ⟦e8ebaa513⟧ pts_type |
| M:DENJ/DRFDDE.UF | ⟦c1448b70e⟧ pts_type |
| M:DENJ/DRGP01.SC | ⟦91bbcbc8c⟧ pts_type |
| M:DENJ/DRKB03.SC | ⟦a28b00c6b⟧ pts_type |
| M:DENJ/DRLP01.SC | ⟦21ba5f1e8⟧ pts_type |
| M:DENJ/DRLT01.SC | ⟦325f830b0⟧ pts_type |
| M:DENJ/DRSOP1.SC | ⟦76ab4b8cb⟧ pts_type |
| M:DENJ/DRSW01.SC | ⟦d3e28b9d9⟧ pts_type |
| M:DENJ/DRTW01.SC | ⟦c2a09e8f8⟧ pts_type |
| M:DENJ/DSKSUB.SC | ⟦ffa43e8f3⟧ pts_type |
| M:DENJ/DVDY00.SC | ⟦54f15c4fa⟧ pts_type |
| M:DENJ/DVDY02.SC | ⟦215ddbacd⟧ pts_type |
| M:DENJ/DVGP01.SC | ⟦302c4713f⟧ pts_type |
| M:DENJ/DVGP03.SC | ⟦1f1630103⟧ pts_type |
| M:DENJ/DVKB00.SC | ⟦64f64dcfe⟧ pts_type |
| M:DENJ/DVTDY.SC | ⟦3c39c30b7⟧ pts_type |
| M:DENJ/DVTGP.SC | ⟦11577f13d⟧ pts_type |
| M:DENJ/DVTKB.SC | ⟦b24d4eb7d⟧ pts_type |
| M:DENJ/EBCDIC.SC | ⟦63de8dd9d⟧ pts_type |
| M:DENJ/FMTASK.SC | ⟦aa6d4b2ae⟧ pts_type |
| M:DENJ/LDTASK.SC | ⟦8952a3d4a⟧ pts_type |
| M:DENJ/LKMAL.SC | ⟦8aaca8f58⟧ pts_type |
| M:DENJ/LRPINT.SC | ⟦c00e1bd0e⟧ pts_type |
| M:DENJ/M:DEBF.LM | ⟦396497040⟧ pts_type |
| M:DENJ/M:DEBG.LM | ⟦0d27c4aae⟧ pts_type |
| M:DENJ/M:DENJ.LM | ⟦6cd8abf23⟧ pts_type |
| M:DENJ/M:DENJ.UF | ⟦547029210⟧ pts_type |
| M:DENJ/MONTAB.SC | ⟦f4f15a1fc⟧ pts_type |
| M:DENJ/MONTIM.SC | ⟦e4789fca8⟧ pts_type |
| M:DENJ/MSUBS.SC | ⟦f8e41038c⟧ pts_type |
| M:DENJ/PFTAB.SC | ⟦2a16e7327⟧ pts_type |
| M:DENJ/SCLASS.SC | ⟦7197f86c1⟧ pts_type |
| M:DENJ/ST8000.SC | ⟦89ba753c3⟧ pts_type |
| M:DENJ/SYSBUG.SC | ⟦915e787be⟧ pts_type |
| M:DENJ/SYSLDA.SC | ⟦fde14e388⟧ pts_type |
| M:DENJ/SYSLDM.SC | ⟦b16d0dd46⟧ pts_type |
| M:DENJ/SYSTAB.SC | ⟦a18ce9919⟧ pts_type |
| M:DENJ/TABORT.SC | ⟦8299350d0⟧ pts_type |
| M:DENJ/TCLASS.SC | ⟦3749de2fe⟧ pts_type |
| M:DENJ/TDISP.SC | ⟦9e314f7ef⟧ pts_type |
| M:DENJ/TIMER.SC | ⟦9d1d919a9⟧ pts_type |
| M:DENJ/TIODMX.SC | ⟦e121b9d8b⟧ pts_type |
| M:DENJ/TLDSEG.SC | ⟦38351437f⟧ pts_type |
| M:DENJ/TMMLKM.SC | ⟦45fd0c009⟧ pts_type |
| M:DENJ/TOSSFM.SC | ⟦1d5b02fe2⟧ pts_type |
| M:DENJ/TOSSIO.SC | ⟦3a9c8922c⟧ pts_type |
| M:DENJ/TPROC.SC | ⟦9a1eb7b30⟧ pts_type |
| M:DENJ/TTMJOB.SC | ⟦e2ea3318f⟧ pts_type |
| SAG | «none» |
| SAG//OBJCT.OB | ⟦de9a7344c⟧ pts_type |
| SAG/ASM.LM | ⟦6be3e01a8⟧ pts_type |
| SAG/CCI.LM | ⟦5f8d9acc6⟧ pts_type |
| SAG/CPLGEN.LM | ⟦c47c4076b⟧ pts_type |
| SAG/CSEG1.LM | ⟦3ee5d13e8⟧ pts_type |
| SAG/CSEG2.LM | ⟦c411922d3⟧ pts_type |
| SAG/CSEG3.LM | ⟦5655b5a5c⟧ pts_type |
| SAG/CSEG4.LM | ⟦06be61e35⟧ pts_type |
| SAG/CSEG5.LM | ⟦75697e1eb⟧ pts_type |
| SAG/CSEG7.LM | ⟦226ec5670⟧ pts_type |
| SAG/CSEG8.LM | ⟦77d6ab6f3⟧ pts_type |
| SAG/CSEG9.LM | ⟦4ba546904⟧ pts_type |
| SAG/CSEGA.LM | ⟦8f8becaa2⟧ pts_type |
| SAG/CSEGB.LM | ⟦fa442af97⟧ pts_type |
| SAG/CSEGC.LM | ⟦0593961db⟧ pts_type |
| SAG/CSEGD.LM | ⟦0327e3157⟧ pts_type |
| SAG/CSEGE.LM | ⟦a00e77c57⟧ pts_type |
| SAG/DMPGEF.LM | ⟦05176f858⟧ pts_type |
| SAG/DMPGEN.LM | ⟦716dfe07b⟧ pts_type |
| SAG/DUMPA.LM | ⟦937c7e685⟧ pts_type |
| SAG/EDIT.LM | ⟦0bdc280ee⟧ pts_type |
| SAG/LED.LM | ⟦90e64be69⟧ pts_type |
| SAG/LKE.LM | ⟦35fb19e1e⟧ pts_type |
| SAG/M:PROC.UF | ⟦2e1ae69fa⟧ pts_type |
| SAG/OBX.LM | ⟦cdb6a5c8a⟧ pts_type |
| SAG/PCAS.LM | ⟦2833a2312⟧ pts_type |
| SAG/PDISC.LM | ⟦5526ef80f⟧ pts_type |
| SAG/PMPTS.LM | ⟦8843024f4⟧ pts_type |
| SAG/PRDUMP.LM | ⟦1859c4a11⟧ pts_type |
| SAG/READFL.LM | ⟦81e08261d⟧ pts_type |
| SAG/RUM.LM | ⟦066729252⟧ pts_type |
| SAG/SUM.LM | ⟦085d40662⟧ pts_type |
| SAG/SUP.LM | ⟦cb602d037⟧ pts_type |
| SAG/SUP600.LM | ⟦1fc82bd6c⟧ pts_type |
| SAG/SUP60M.LM | ⟦f1b4e12f1⟧ pts_type |
| SAG/SUP800.LM | ⟦709f77a19⟧ pts_type |
| SAG/SYSGEN.LM | ⟦1a3bedfa2⟧ pts_type |
| SAG/TLK.LM | ⟦5d9da5d34⟧ pts_type |
| SAG/TOSSUT.LM | ⟦93de6c66f⟧ pts_type |
| SAG/TRA.LM | ⟦1ee307c49⟧ pts_type |
| SAG/XRF.LM | ⟦fc8a96bdf⟧ pts_type |
| TOOL | «none» |
| TOOL/ASCEBC.SC | ⟦f7e417b2d⟧ pts_type |
| TOOL/ASMRUT.SC | ⟦808b4c962⟧ pts_type |
| TOOL/CPDKMT.SC | ⟦f064d59dd⟧ pts_type |
| TOOL/LIST.UF | ⟦874ee3a70⟧ pts_type |
| TOOL/P1370.SC | ⟦7e7d293f6⟧ pts_type |
| TOOL/TSUTL1.SC | ⟦422fc5aca⟧ pts_type |
0x000000…000ca0 (0, 0) DirGranule ((0, 0)) {
0x000000…000ca0 DirEnt {nam=»SAG «, typ=» «, f00=0x0000, f01=0x0000, f02=0x0000, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SUP «, typ=»LM«, f00=0x019a, f01=0x0198, f02=0x0010, f03=0x0008}
0x000000…000ca0 DirEnt {nam=»CCI «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0070, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEG1 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0090, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEG2 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0098, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEG3 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x00a8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEG4 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x00b8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEG5 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x00c0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»LED «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x00e0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEG7 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x00f0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEG8 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x00f8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEG9 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0108, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEGA «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0110, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEGB «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0118, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEGC «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0120, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEGD «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0128, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CSEGE «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0130, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»PRDUMP«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0158, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»DMPGEN«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0170, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»XRF «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0178, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»DMPGEF«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0180, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»CPLGEN«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0188, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SUP800«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0190, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»LKE «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x01d8, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»EDIT «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x01f0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»M:PROC«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x02e0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SUM «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x02f0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»RUM «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0300, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»DUMPA «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0318, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»OBX «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0340, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»PDISC «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x03a0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»TOSSUT«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x03e0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»PCAS «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0430, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»PMPTS «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0440, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SUP600«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0480, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»ASM «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x04d0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»TLK «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x04f0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»TRA «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0558, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x0000, f01=0x0000, f02=0x05c0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SYSGEN«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x06c0, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»SUP60M«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0720, f03=0x0000}
0x000000…000ca0 DirEnt {nam=»READFL«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0760, f03=0x0000}
0x000000…000ca0 }
0x000ca0…000e34 (0, 1) Opaque[0x194]
0x000e34…000fc8 # DirEnt {nam=»SUP «, typ=»LM«, f00=0x019a, f01=0x0198, f02=0x0010, f03=0x0008}
0x000e34…000fc8 IdxSect {
0x000e34…000fc8 f00 = 0x0000 // 0xe34 @0x0
0x000e34…000fc8 f01 = 0x0018 // 0xe36 @0x2
0x000e34…000fc8 gno = [ // 0xe38 @0x4
0x000e34…000fc8 [0x00]: C0x0000.0x2.0
0x000e34…000fc8 [0x01]: C0x0000.0x3.0
0x000e34…000fc8 [0x02]: C0x0001.0x0.0
0x000e34…000fc8 [0x03]: C0x0001.0x1.0
0x000e34…000fc8 [0x04]: C0x0001.0x2.0
0x000e34…000fc8 [0x05]: C0x0001.0x3.0
0x000e34…000fc8 [0x06]: C0x0002.0x0.0
0x000e34…000fc8 [0x07]: C0x0002.0x1.0
0x000e34…000fc8 [0x08]: C0x0002.0x2.0
0x000e34…000fc8 [0x09]: C0x0002.0x3.0
0x000e34…000fc8 [0x0a]: C0x0003.0x0.0
0x000e34…000fc8 [0x0b]: C0x0003.0x1.0
0x000e34…000fc8 ]
0x000e34…000fc8 }
0x000fc8…00115c Dummy {f00=0x0000, f01=0x0190, f02=»i LoX # # #$ A~ X - _ H*f* + + ,0-T
0x00115c…0012f0 Dummy {f00=0x0000, f01=0x0190, f02=»
0x0012f0…001484 Dummy {f00=0x0000, f01=0x0190, f02=» i ( "D r !f9 : G p R $ $ %Z&>F E % 9 J DMC,MCGBHDB&WMC RYD RDD ASE0ABF PSF RSG & TY J- LP / TK M
0x001484…001618 Dummy {f00=0x0000, f01=0x0190, f02=» $ DK _ DK 8 _ P DK _ DK ( _ DK U ^ DK U 8DK ) U
0x001618…0017ac Dummy {f00=0x0000, f01=0x0190, f02=» ? ? ? ? ? ? ? Q~ & ? ? ? ? ? ? ? MX ? ? ? ? ? ? ? L 2b
0x0017ac…001940 Dummy {f00=0x0000, f01=0x0190, f02=» f l Z f Z f D Z
0x001940…001ad4 (0, 2) Dummy {f00=0x0000, f01=0x0190, f02=» Z V f R . Z | f ? ? ? ? ? ? ? fN ? ? ? ? ? ? ?
0x001ad4…001c68 Dummy {f00=0x0000, f01=0x0190, f02=» ? ? ? Y ? ? ? ? ? ? ? l Y j & L r 0 V |
0x001c68…001dfc Dummy {f00=0x0000, f01=0x0190, f02=» 6 6 6 6 6
0x001dfc…001f90 Dummy {f00=0x0000, f01=0x0190, f02=» 6 6
0x001f90…002124 Dummy {f00=0x0000, f01=0x0190, f02=» :
0x002124…0022b8 Dummy {f00=0x0000, f01=0x0190, f02=»
[…0x2…]
0x0025e0…002774 (0, 3) Dummy {f00=0x0001, f01=0x0190, f02=»
[…0x1…]
0x002908…002a9c Dummy {f00=0x0001, f01=0x0190, f02=» P
0x002a9c…002c30 Dummy {f00=0x0001, f01=0x0190, f02=»
[…0x1…]
0x002dc4…002f58 Dummy {f00=0x0001, f01=0x0190, f02=» *
0x002f58…0030ec Dummy {f00=0x0001, f01=0x0190, f02=»
[…0x2…]
0x003414…0035a8 Dummy {f00=0x0001, f01=0x0190, f02=» @
0x0035a8…00373c Dummy {f00=0x0001, f01=0x0190, f02=» A A R$ A A R A A R A @#" > > > > > > > > ? ? ? ? ? ? ? U ^ ( H ( P F" _ Q 4&? ?R _ 5 H _ ^ ;j >P @ * Q 9A D *P _ P A ( @ Q A ' A"T ( A A)F_ @ A
0x00373c…0038d0 Dummy {f00=0x0001, f01=0x0190, f02=» @ ? ? > "D P P Q P ! P @ $ H @ P W ( < JZ @ 9a:a R0 "Z Q Q" ?A <P @"N %J & _ ( _ _ 0 % JZ T @ W @ R (P& P (_ =a:a =A:A Z P Z _" TR @
0x0038d0…003a64 Dummy {f00=0x0001, f01=0x0190, f02=» @% L F" 0 JZ @ PR 0=a @ ?a RX @ ?a VN=A 0 ( P>P< , T T 1W 1W T )W )W ( , _ C ( _ 5 H A& A& A& A& A& A& A' A& ' ( D >a @ =a (@ D U@ x ',W U, @
0x003a64…003bf8 Dummy {f00=0x0001, f01=0x0190, f02=» B :a Y B R A& _ @& ' W4 @& A& ,Xp _ < @ A' A( A( A( A( A( A( ( =a @ >a V _ @ >a Y A' A' 4 T ' ( "^ 5 U P" @' @( @( @( @( @( @( ( @' x @& 8
0x003bf8…003d8c Dummy {f00=0x0001, f01=0x0190, f02=» @ !@ *V @ P @ X0 , *V A _< U` A)F @ , L ? ? , L L L L L L ? ? ? ? ? ? ? @" Px @ > > > > > > > ; [ [ [ [ [ [ > > [ [ A @" H" " ? A" >
0x003d8c…003f20 Dummy {f00=0x0001, f01=0x0190, f02=»? V :!9 V @ P R W ;A [ [ : _4 Pj T Pf V Q UF V Ud Q4P P 9A?A:AV R Z _ P*R R P ;A [ [ : V X"Z(_( L _P S
0x003f20…0040b4 (0, 5) Dummy {f00=0x0001, f01=0x0190, f02=»R _ ;A [ [ : # P| ' PL , ; R <a V 9A:A ; V ; V V W V < V < V H T P R ;H [ [ : _ T P ; R4 < S , _ _ W < R $ <A Q" T" U" :$ _ < Z& - W _ < <A9 R :a
0x0040b4…004248 Dummy {f00=0x0001, f01=0x0190, f02=» R Q ;H [ [ : " _J ? ? ? ? ? ? ? Q _ ^ ( H Z - W . W / X I I R P8 X RlP RrT Y Y W x Y Y $ 0T W W 6 X ? ? ? ? ? ? ? .^ 7 X #? P ? ? ? ? ? ? ? . 7 6 (@ 7P %
0x004248…0043dc Dummy {f00=0x0001, f01=0x0190, f02=»7 (@_~ 52X R Y _ X D $! TR ? ? ? ? ? ? ? /F 7 8 M ? ? ? ? ? ? ? /l 7 % > > > > > > > > ? ? ? ? ? ? ? / 7 P X 7^ 7v / 4 8 TRT X 5P 4 $ <A 52 Pl 52 X X X M M
0x0043dc…004570 Dummy {f00=0x0001, f01=0x0190, f02=»_ X X X U 5 X E _ X 4 Y 5 X 4 Y ! 1P, 0P +P Q Q W W Q Q R P Q 5 Y / ? ? ? ? ? ? ? 1 7 Qv 1& 4 " PF X Q< X P P ? ? ? ? ? ? ? 1X 7 (@ Y C^ X X X R
0x004570…004704 Dummy {f00=0x0001, f01=0x0190, f02=»1 7 > > > > > > > > 52R X X Q Y ( O` ? ? ? ? ? ? ? 2D 7 ? ? ? ? ? ? ? 2 7 (@ 7P ? ? ? ? ? ? ? 2z 7 2 4 X M X ! 40" P2 O` X ? ? ? ? ? ? ? 2 7 (@ C^ X 4Q W 9AY T Q P
0x004704…004898 Dummy {f00=0x0001, f01=0x0190, f02=» Qz 9AY Tn9ATj @3 D4 @3 $W 1 Y $ D ! P 2 Y 0 P :ET OFP OST Y Y X 5Z X M _d3 4 4 ABCDEFGHI JKLMNOPQR /STUVWXYZ 4 4$4*[.<(+^!$*);] ,%_>?" P X 2 ' Q X 4 X X R ( 5
0x004898…004a2c Dummy {f00=0x0001, f01=0x0190, f02=» A , DKP L X X L ! X L P L @ _ C C # ( _R _ _ _ _ _ X T 5b 4 X ! TH X X X T" $ :ET D OFT W OST X P % Y X R X 4 ! X Y T T Y Y
0x004a2c…004bc0 Dummy {f00=0x0001, f01=0x0190, f02=» X R 8 TYX WH H6 Y _8 X X: X R X ( _$ _* $ XtRX P Y _ A6 X X Y X Y _ $ P4R P6 X Q Y Y <dW Y W $ P R , _ X X*Y$ X X X6 Y Z(P A6 ZrP Y _8 _< _@ ! 4 $ X
0x004bc0…004d54 (0, 6) Dummy {f00=0x0001, f01=0x0190, f02=» > > > > > 7 V <a W X ' ?A q A82 > > > > > > > 80 , 0W 0T _ l P$ X X ] X * A8aJ " * - X ( 7P = V X X C^ X 4 L ! L % T< L P4 M ^ L X 4 _ ? ? ? ?
0x004d54…004ee8 Dummy {f00=0x0001, f01=0x0190, f02=»9J: 9l9l: : 9~9~9~9~: 9b9t < W* = W" < W ?: L :AR| M W M M 4 L T M M L PH=GV L L 4 9 M 2 ;6 M L 9G L 4 L M L M M L 4 : W M " A< L P L 9JR@ P P T A, 5 U P T Q P P
0x004ee8…00507c Dummy {f00=0x0001, f01=0x0190, f02=» L ' 7P P p Y "(@ P P $ M : P ( M P Q P P P W P T Q (@ L " A<(@ H H T A, E $ I 4P _ 5 % E (@ L 2 ( P _ 4 ) % ] M (@ L 2 A$ T!fR Q @!f] A,>
0x00507c…005210 Dummy {f00=0x0001, f01=0x0190, f02=» T V P T"W L >F A$ L & A$ < M 4 ; M L M L " P M < : M L M A< L ! PT L M L M L & P L E E M < : M M L L % T D V L ! P L ! XfWn L M L M M =0 : L :c:A L D
0x005210…0053a4 Dummy {f00=0x0001, f01=0x0190, f02=» D Q = M 2 < L L $:BV W $:AV M " M A L L $ M 0 D L U M " V L R L M ( M * M , L X L U M W > M 2 < L D L L 0U L 0 L (U L ( L L R $ 9 _ R $ 9 M , L M M
0x0053a4…005538 Dummy {f00=0x0001, f01=0x0190, f02=» L L , U A< L A$ L U ?X M 2 < L M $ L M & L L I P0% P L X =h P W P L X T M . L 9 M L A$ L L . Q L L L R 0 % _ M M L . P M . ? M 2 < L U @, M 2 < L
0x005538…0056cc Dummy {f00=0x0001, f01=0x0190, f02=»P0W" M L A$ @ M ( L U @ M 2 < L L ( E L % E L E L E M A M 2 < L P$ A< M 2 ;r M "W F" = JZW ( L 4 5 L L " C m M ^ U L ( L L ? ? ? ? ? ? ? A A H 4 R W 7
0x0056cc…005860 Dummy {f00=0x0001, f01=0x0190, f02=» d _ AB0 B AH 5 T6 @H P H BD BH BL BP BT @H AH AB0 ( 5 4 X _8 B P W M: B ( "^ B, B . L ER B H L L . Q L L L R 0 % _ M M L . P M . ? M 2 5 B J I B P
0x005860…0059f4 (0, 7) Dummy {f00=0x0002, f01=0x0190, f02=»D X W* 8 AD T AD D (@( 4 4 : 0 :R - Y PU,DNXX,STAT,RY C ;r 5 J ? B C 1P C Y _ @B RDP A P 8 FL B X X ! R V Y AD 8 TKP Y LPP MTP Y
0x0059f4…005b88 Dummy {f00=0x0002, f01=0x0190, f02=»B. 4 X X ? ? ? ? ? ? ? E. 7 _ 5 J B @ Q P P T Z B W P B $>H $ NOT W0 J @ ! $ T P Y B C C R ] B, 0 % E M 0AB CD ADDR @ 9a:a;a R R AF F AH
0x005b88…005d1c Dummy {f00=0x0002, f01=0x0190, f02=»U AE E il E ( "^ F = JZ @ A @ !? $> A"T H _* 5 @H B @ A B, 0 JZ AG AG G ( "^ @ A ( C 5 @ 4 B P J _ 5 B, 5 J AG J R: P J R( G ( "^ G ^ @ T G (
0x005d1c…005eb0 Dummy {f00=0x0002, f01=0x0190, f02=»PP , X QD il Hl Y , il Hl Z H @H P : HV ` : B I il _* AHB H> ( "^ : ; ;<A ' R `R Q QB _ QB <a : : : - A ~(@ A" AH A A A A AH AH AH a H @ ? ? > "D P :b
0x005eb0…006044 Dummy {f00=0x0002, f01=0x0190, f02=» @ @ @ @ Y Y Y Y " A "; V W # @ A AH @ ? ? > Q @ ? ? ? ? ? ? ? I F" @ P <a:a B :A : P6 $ R, Z R R Q $ :D P $ R ^& : B P R( AJH AJJ AJL AJN AJP AJR AJT
0x006044…0061d8 Dummy {f00=0x0002, f01=0x0190, f02=» ? JX ( < JZ B @ 9a:a R @ @J @"N %J '~ %J :EOS:EOV _* AHB H> ( AK< K> !? QM P ^ 52 V X 58 58 X AK AK0 AK2 KR @K@T AK@ !L PM !L L Q AK2P !L _ MF !L P Y !L !L AK2X _
0x0061d8…00636c Dummy {f00=0x0002, f01=0x0190, f02=»9C^ W| !L _ !L Wn !L _ K8 Y Y _ X r s W4 X @ _ W$ AW @W $W %W W !W W X 9d)` AKB AK0A T 7P 9CV * 9AV 9AV X 1P * 9EV )@ X Q6{ X Y Q& X $ :ET D OSP OVT * W * W Y AK0 Y 4 @K0J P Mj
0x00636c…006500 Dummy {f00=0x0002, f01=0x0190, f02=» :EOS:EOV ( < "$&1368 AM M !? QM P ^ 52 AN X AQ X AQ Q R x % =A Y X Y4 Z8 AM $ $ T D i M !Q. X "! T( !Q^ P Y " @M !? 1P P !Qb Y !P HN N N N N N N Q N Q(P P Q Q Q P P AQ !QV " P* AN
0x006500…006694 (0, 8) Dummy {f00=0x0002, f01=0x0190, f02=» D P X &Q Y W Y 4 X $;H D :ET $;H D OSP OVT W W !ON X ! P X 1P W @ X U W W W !ON X ! . @Wp !ON X ! Tb AW^ X P& T "P R Q W 8T Y W, W< O P6 4 X Q @Q Y _ X R Q @
0x006694…006828 Dummy {f00=0x0002, f01=0x0190, f02=» AP X 9c T DM EM 4 X B X :c HM % P^ !Qn_N !Qr !P _X !Qv_^ !Qf Y " !P _p M _ X # ;dC Y AM AM 7P AQ _ _ _( _, _0 _4 _8 _< _@ _D _H @M @M J P* P8 AQ X Q I -W ,A W @M ;I U @M M 4A @
0x006828…0069bc Dummy {f00=0x0002, f01=0x0190, f02=» C _: DL P H C _ P X( DD _Z :EOS :EOF 52 5J 5 @ !? ?R _ R 4 ' !? 0X A "! X6 @ Q P ^L_ P XP P R :AV L D I I "R (@(@ ^ :j >Z ^ @ P _ A $ M (@ M M M B
0x0069bc…006b50 Dummy {f00=0x0002, f01=0x0190, f02=» X M W M W y Y Y Y # C B 58 B 58 $? U P R Rx P R U8 RxP P| P Pv P $P &PN "P< /P :P ;P <P =P >P ?P 1 Rx 8 RxWv T W RrW T W Rl W W T W Wx
0x006b50…006ce4 Dummy {f00=0x0002, f01=0x0190, f02=» $ X _0 8 TCX< TKXB MTXH DYXN _Z OS :EOF 52 5J 5 @ ( 0 $ , V X Y X W B Y % W L Wb M B P 58 X P P P P 52 B P P 4 ^ :A HU W W M B M
0x006ce4…006e78 Dummy {f00=0x0002, f01=0x0190, f02=» L M UxR> U Q8 U|R M M M M W M M M M y W _ @U P M WR AU L " * AW/- AWG L " X ! Y M T(% T$ ! R L W L A T M AUZ AUX X 7P B M W~ i Z| M _* Up Y B AUf X P PD P@
0x006e78…00700c Dummy {f00=0x0002, f01=0x0190, f02=» Y V AUd AUb AU` X P< P P4 P M @Uf M M !Z !X P @ W M @Uf M M !Z !X X X ? ? ? ? ? ? ? 7 X M AUZ AUX AUh X 7P AU^ ! T @Ub AU^ @Ud Y @U`U AUf X& M X 4 X ?
0x00700c…0071a0 Dummy {f00=0x0002, f01=0x0190, f02=» Y ? ? ? ? ? ? ? 7 X M M W Y ? ? ? ? ? ? ? 7 X 7P =b%0 X $ L <B<j P L 4 $ _ L =AV L <AR A"R<B M 4 X Z X % Z L % 4 L ? 4 W M AU 8 4 M @Uh 7P
0x0071a0…007334 (0, 9) Dummy {f00=0x0002, f01=0x0190, f02=» 8P F" X % !X %`X P % X. R" X>W % P T % XT <A P X^<a P @ p @ $ " P $^ F" " A] A] A] A] A] A] A] ] > > > > > > > a] @] E E E E E E ] >
0x007334…0074c8 Dummy {f00=0x0002, f01=0x0190, f02=» " H Wx " Wn & P >b& >AW >a& @T " X X T$W. " P X ` `T 8 P X 8 T" T" T "<A U" U" T" U" T" T" ? ? U" : V: T" T" T" T" T" T" " " " " " " " T" >" H]
0x0074c8…00765c Dummy {f00=0x0002, f01=0x0190, f02=» 8P F" X % !X %`X P % X. R X>W % P T % XT <A P X^<a P @ p @ $ " P $^ F" " A A A A A A A > > > > > > > a @ E E E E E E >
0x00765c…0077f0 Dummy {f00=0x0002, f01=0x0190, f02=» " H Wx " Wn & P >b& _ X M M Y X a a B Y ! a L a6 X P P P P 52 B 58 @_ P M L 7P A_ ^ !` B !` X X ! P L y !aXW !a~ L x P !a M Q W ! P M L ZZ a6 B Y
0x0077f0…007984 Dummy {f00=0x0002, f01=0x0190, f02=» Q a6 4 ! 9A " ! M 4 P P L P P ! _ 4 B aF i ` L :C* WL WH:a L ! 9A r X L :B* W":a L ! 9A r X L :B L !? B M A^ L 7P ^ M Y B A^ ^ Y X P P P P P P8
0x007984…007b18 Dummy {f00=0x0002, f01=0x0190, f02=» !aXW A_ !f !aX" P !aT M L ZL M A^ V !f !f ` B P2 A^ B T$ B S @] T !f @^H A] ! P W ` B <b :b ^ A^ A^ A^ R>P A^ A^ !d` A^ W& !d` A^ R !d` W !d` A^ P A^ V !d` !d`
0x007b18…007cac Dummy {f00=0x0002, f01=0x0190, f02=» !d` A^ Z X Td @] ! P W @^ P Q Y @^ @^ A^ A^ !d` @] ! P W Y A^ & B Y ` @^ :e L Pv !a M Q !aJ !f @] ! P L PP !a~" T" L @^ P<W !a~" T L @_ P$ M L Q !aT_Z M Q ` T X
0x007cac…007e40 Dummy {f00=0x0002, f01=0x0190, f02=» " T A^ W A^ T P A^ Y T U 4 !f @] ! P !aXW !aX" P M L Z2 ` 4 !f @] ! P !a~" T W( !a~" P M L 6 ` @_ L 4 @^ L " P $ M 4 @^ ^ ( = Y 4 @^ ^ < ) Y 4 X ! J $ <b
0x007e40…007fd4 (0, 10) Dummy {f00=0x0002, f01=0x0190, f02=» a6 4 !aT !a M Q A^ M !a~ 4 @^8 TOTD @^@ 1T: B A^H @] ! P !aXW !aX" P M L ZJ ` 4 @ _ X X X X $ Pgjgrg hzh % P Y Y Y >% X P Y _" P" P& R| ^T Y _D _T X _ X
0x007fd4…008168 Dummy {f00=0x0002, f01=0x0190, f02=» P Q X Q % _" Y Y Y 4 % X P Y $ W Y =D %_ X P V % P Y X XT Q _ g Q g 0DKER UNIT CYLD STAT h i 4 h i W2 h i& X W$ h i2 W h ( X =
0x008168…0082fc Dummy {f00=0x0002, f01=0x0190, f02=» M M Y$ #? @ P R P T T T Y" P T _ X D D E E ] @ E @ jV ? ? > ? ? ? ? ? ? ? mv C ( "^ @m k U T " P " P @m W C "& # ( "^ A p @
0x0082fc…008490 Dummy {f00=0x0002, f01=0x0190, f02=» [ [ [ @ L ! P Y _ @ M ^ U > > > > > > >WZ A p ^ T " T0 ! P W SY SD AD _ ! P _, J _2 mv # C ( "^ P m m m m CCT I T P Q _, A
0x008490…008624 Dummy {f00=0x0002, f01=0x0190, f02=»( "^ B P @ !? M @m P M L R ! _ PP I H P _ A i A A A @ ~ mN A ~ @mV A ~ @ oL( A~ A A "^ H (@_0 $ ( , 0 4 8 < m T " P " P @ W C "& # ( "^ A p @
0x008624…0087b8 Dummy {f00=0x0002, f01=0x0190, f02=» [ [ [ @ L ! P Y _ @ M ^ U > > > > > > >W A p ^ T " T ! P W SY SD AD _ ! P _, J _2 # C ( "^ P CCT I T DOS - PTS
0x0087b8…00894c Dummy {f00=0x0002, f01=0x0190, f02=» y : f P C W $0 P C w : C "!@P ") # B C B % C :d d d evfbd fZk i i j m oHoHe e e e f&d e e rBw@v v v w@vbf f~f f ~ W V 7 @? ! P ~ P W d e 9c Dd4 gN f Q dBW j :aW
0x00894c…008ae0 Dummy {f00=0x0002, f01=0x0190, f02=»T V P V ~ W V _ 8^n Dd` 2 ! 9B V T SZW V P D $ V 6 V % V E @? ' T 2 % 7_ 2 # LR gN 2" &] Y $! 6P Q $ T 9B e _ _ 6 @? " T 7 $ V P ~ W _ d
0x008ae0…008c74 (0, 11) Dummy {f00=0x0003, f01=0x0190, f02=»@ M ^ U > > > > > > >W A p ^ T " T ! P W SY SD AD _ ! P _, J _2 # C ( "^ P CCT I T DOS - PTS 6000 REL. 10.0 sb
0x008c74…008e08 Dummy {f00=0x0003, f01=0x0012, f02=» # # 'x(p(x) ) )
0x008e08…008f9c Dummy {f00=0x0003, f01=0x0190, f02=» P IDENT INIMON < P* 781128 - B.VINK - PC1964 - SET BIT SY IN DCTHD $ L P* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * d P* . P* P860 DISK OPERATING SYSTEM P* P* B P*
0x008f9c…009130 Dummy {f00=0x0003, f01=0x0190, f02=»ING TO THE ^ P* 6 P* SYSTEM DISK ADDRESS P* X L P* SCANNING OF SYSTEM DIRECTORY , FIND CCI DISK ADDRESS b P* P* L P* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
0x009130…0092c4 Dummy {f00=0x0003, f01=0x0190, f02=» P EXTRN M:LDNX P EXTRN CVTSTB $ P EXTRN CPT D P EXTRN CVTMSZ b P EXTRN CVTBKA P EXTRN PCT61 P EXTRN T:DCT P EXTRN CVTSBA P
0x0092c4…009458 Dummy {f00=0x0003, f01=0x0190, f02=»ST A2,0 n P* P* 8 P* SUPERVISOR COMMUNICATION VECTOR EQUIVALENCE $ P* ` P* j P* t P* ~ P* P* 8 PCVEADR EQU /82 ADDR OF SUPERVISOR CVT P* . PCVEMSZ EQU 0 MEMORY S
0x009458…0095ec Dummy {f00=0x0003, f01=0x0190, f02=»CVESBA+2 BIGGEST BUFFER ADDR ~ 2 PCVEBKA EQU CVEBBA+2 BACKGROUND ADDR ( : PCVEDSP EQU CVEBKA+2 START ADDR OF DISPATCHER ^ 8 PCVEPLS EQU CVEDSP+2 BASIC PULSE FOR RTC 2 PCVEFCT EQU CVEDSP+6 FILE CODE TABLE
0x0095ec…009780 Dummy {f00=0x0003, f01=0x018e, f02=»CVEDCT+2 JOB PARAMETER TABLE ~ . PCVEBPL EQU CVEJPT+2 BUFFER POOL ( @ PCVELFT EQU CVEBPL+2 LOGICAL FILE DESCRIPTION TABLE Z < PCVEYAR EQU CVELFT+2 CURRENT YEAR, 2 ASCIL CHAR < PCVEMON EQU CVEYAR+2 CURRENT MONT
0x009780…009914 (0, 12) Dummy {f00=0x0003, f01=0x0190, f02=» ` @H ` " B !( 9 ! +b L * b dX B ,i p$ A j z dH&g S xzx j `@ ` `0 H q@% H @R z@u ` `@ : @ `H ja @ `H @ z@U x @ [ ` x d @8 U ! ` ` @Z @ @ ` @ @P ` `p ( ( ` @ ` `X ` @ X @ `
0x009914…009aa8 Dummy {f00=0x0003, f01=0x0190, f02=» @l p JGz S 3 f ` w @ 3 H! S d j Z S Q @ S H! 3 d 6 | @Bh ' 4 _{ N4`w l ` `PZ 4 P0 2 t0 ` @ c@ % @ @ bH @ @ D@ F ( C0 @ @ ` ` B @ ` d `[ `h C 4 4 @ ` @ { W E @ `P` E ` `X @Q ` E
0x009aa8…009c3c Dummy {f00=0x0003, f01=0x018e, f02=»CIEVED 7 2 P********************************************* 8 PADI120 EQU * 8 D P LDK A1,0 NEGATIVE RESPONSE 8 X P ST A1,DWTA4,A7 8 | P ABL INIDLE 8 P EJECT 8 0 P******************************************* 8 P* TCA BUSY 8 0 P******
0x009c3c…009dd0 Dummy {f00=0x0003, f01=0x0190, f02=» 8 l PADI900 EQU * 9 P LDR A2,A6 SAVE A6 9 P LDR A6,A7 9 6 P CF A15,TENDIO 9 H P LDR A6,A2 RESTORE A6 9 ^ P ABL LDISP GO TO DISPATCHER 9 | P EJECT 9 > P********************************************************** 9 P* 9 , P* DELAY RO
0x009dd0…009f64 Dummy {f00=0x0003, f01=0x018e, f02=»=2 NEGATIVE RESPONSE 9 P* : > P********************************************************** : ( PDELAYL LD* A2,4,A5 : j " P CF A5,ILABEL SET INPUT LABEL : P LDK A2,2 : P ADS A2,4,A5 : PDELAY EQU * : P LDK A2,0 : * P ST A2,READY,A6 CL
0x009f64…00a0f8 Dummy {f00=0x0003, f01=0x0190, f02=» : p P LDK A2,SYN ; P CF A5,WRITE ; P RB DEL100 ; 0 PDEL110 EQU * ; B P LDR A4,A2 ; V PDEL120 ADK A5,4 SKIP STACK ; h P ADK A4,0 SET CR ; P ABR* A5 ; P EJECT ; P* ; P* ; P* HALT INPUT SYLCU ; P* ; P* ; PHALTIN
0x00a0f8…00a28c Dummy {f00=0x0003, f01=0x0190, f02=» ; n P RTN A5 < P* < P* < " PHIDLE CF A5,HALTIN < , PINIDLE CF A5,READ < F P RB INIDLE < ` P EJECT < r P* < P* < P* DISCONNECT MODEMS < P* < P* < ( PDISCON LDR* A2,A6 GET DEVICE ADDRESS < . P ADKL A2,CIOH COMPUTE CI
0x00a28c…00a420 Dummy {f00=0x0003, f01=0x0190, f02=» < r PDISC20 HLT HALT INPUT SYLCU = P RTN A5 = , P* = < P* = F P* START OUTPUT SYLCU = P P* = l P* = v PSTOUT EQU * = " P LDR* A2,A6 GET DEVICE ADDRESS = P ADKL A2,CIOST = P ST A2,STO100 = P LDK A2,/60 = P INH = " PST
0x00a420…00a5b4 (0, 13) Opaque[0x194]
0x00a5b4…00a748 # DirEnt {nam=»CCI «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0070, f03=0x0000}
0x00a5b4…00a748 IdxSect {
0x00a5b4…00a748 f00 = 0x0003 // 0xa5b4 @0x0
0x00a5b4…00a748 f01 = 0x0008 // 0xa5b6 @0x2
0x00a5b4…00a748 gno = [ // 0xa5b8 @0x4
0x00a5b4…00a748 [0x00]: C0x0003.0x2.0
0x00a5b4…00a748 [0x01]: C0x0003.0x3.0
0x00a5b4…00a748 [0x02]: C0x0004.0x0.0
0x00a5b4…00a748 [0x03]: C0x0004.0x1.0
0x00a5b4…00a748 ]
0x00a5b4…00a748 }
0x00a748…00a8dc Dummy {f00=0x0003, f01=0x0190, f02=» ' d H v z X $ v ` . R ^ D $ * < h L p DCU DLU LIC PRC RSU ` RDS RDO PRT LST RDA PRD LSD PCH POB PLD DUF INC
0x00a8dc…00aa70 Dummy {f00=0x0003, f01=0x0190, f02=» TCD p FCL p BCL p FRT p FOR p LKE p LED DEB p EDT SVD ` SVU REW ULD FFS FBS RFS RBS WEF WES WEV SDM HSF p JOB END MES PSE
0x00aa70…00ac04 Dummy {f00=0x0003, f01=0x0190, f02=»L P ( PRV LSV TRA p * TLK p , . XRF P 0 2 BUG p TLT p 4 . LKF p 6 N P 9B 9A R D P < N P N 9 V O O N 9CV < N 9 R N 9AV < N 9 V O W $
0x00ac04…00ad98 Dummy {f00=0x0003, f01=0x0190, f02=»_t r R W W W W O & < f O , P^ PZ P R T TYT O , P T O , P4 P0 T O T O : W 0 V T _^ @ D H ;DRR , PH I H P6 H P0 @ " P _ D 4 #
0x00ad98…00af2c Dummy {f00=0x0003, f01=0x0190, f02=» C R W _ _ _ T 4 & C , R WL_ _ _ B , ,9c f[ Y W YD l R W _ _ _ W V V W V N C R W _ _ _ V W W V V * 4T _ R
0x00af2c…00b0c0 Dummy {f00=0x0003, f01=0x0190, f02=» W < B # , P P| Q& P R 9AR Wl B V T C F # C P W W P W ( B R29 R<9 R49 R&9 R0' Q B H R&9AR 9AR W B < B W H_ _ _ _ B P R&? R ? R ? R ? R ? R B W B < B
0x00b0c0…00b254 (0, 14) Dummy {f00=0x0003, f01=0x0190, f02=» T U U _& W W W V C B , X PD P QL QN T 9 R29 RJ T C H R W W W W @ K V V V V P R W W ( R _$W W W _4 :W W W ( V R S: :WxWv_ T TY * < (
0x00b254…00b3e8 Dummy {f00=0x0003, f01=0x0190, f02=» , P P P R W W A n W W W W ~ W2 W W V V 5 W _* V P W V | W | V P V /P 0R$ :RTW V W ~ V W ~ V _" V V 8H V ! T 8 _ 4 WHW V V ! T 8 _ R
0x00b3e8…00b57c Dummy {f00=0x0003, f01=0x0190, f02=» v | W | P ,P :P V | $:H $ F0Z F9U FAZ& FFY, A n p p v | !AAZ !ZZY v | W | ! P !,,P @ n Q 5 A n _( @ n X ! P _$W W ~ : _ W V | W | : 8D R 0 P P 9H _ W _(
0x00b57c…00b710 Dummy {f00=0x0003, f01=0x0190, f02=» L T P*_ 0R" 9Q 0 P 9C L _( W 0 R _ 8H 0 dR _ 8H 0 d R _ 8H : : W j H # W | H W R WNW _*_, B B P B ) Y N 9 V" j j (XB * R *P _ V : N :IV :B
0x00b710…00b8a4 Dummy {f00=0x0003, f01=0x0190, f02=» PH P8=A 1 * * 1 1 ZHW _4 N ! QPP: O V ~ P8 h H JW*W W W W d W W W W W _ W W R W W W W V ~ : " ( . 4 B L X b h
0x00b8a4…00ba38 Dummy {f00=0x0003, f01=0x0190, f02=» DISK NOT OPERATIONAL ALREADY CATALOGED OVERFLOW I/O TOO MANY COMMAND ALLOWED DEVICE NAME MISSING 2ND ADDRESS UNKNOWN FCT LFT ASSIGNED EQU ASSIGN CORE INPUT OUTPUT /L EMPTY PROGRAM CLOSED DIRECTORY SYSTEM SESSION
0x00ba38…00bbcc Dummy {f00=0x0003, f01=0x0190, f02=» % P P P0 2 U N ! T W h O h H rWz N % T U O 0 W i _0 ]$ Z & W & < U Z & r W R W W W W X~ X Q P N 4
0x00bbcc…00bd60 Dummy {f00=0x0003, f01=0x0190, f02=» V : DATE HX /HX /HX TIME HXH-HXM-HXS- A $ )T P _ @ W = W | < , P V 8 W W V | W R W W W W W H R *P N R *T < , T W | < V 8 W R WLW WHWFWD
0x00bd60…00bef4 (0, 15) Dummy {f00=0x0004, f01=0x0190, f02=» T V _( P # Q V W V : , T _. F Z _j W W W F W P ) F W P W F 4 V # @ R W _ _ _ W G W 6 W V F T W V P v Pd P &Qp T
0x00bef4…00c088 Dummy {f00=0x0004, f01=0x0190, f02=» W ]<_ V T8 V 4 W W V W W V D W V W V : V W _ V X _ W , P* 09AR R P F F G W W W V : L P< R R" T T T G :W @ 2T
0x00c088…00c21c Dummy {f00=0x0004, f01=0x0190, f02=» ?L 0 P X L =CR =AR =CRH WB =CR: W4 =l P* W$ ' ' ( J G G G G G G G G G L ' P< L # 4 C C C d R W:_ _ _ B RW L # 4
0x00c21c…00c3b0 Dummy {f00=0x0004, f01=0x0190, f02=» G G G G G G G G G G G W Q Z P F G V : P G G "P P _ < # @ 2 P P _ : A B P @ B R _ : X _$ X _, 2
0x00c3b0…00c544 Dummy {f00=0x0004, f01=0x0190, f02=» W ; W Z " [ Z : ! @ Z 9c Z P L U _< :` % _H % _P XV _Z W j 2 V , 5 V 9D9k D f W( W W W W W W W W W 2 W V # T , 0V U V j : V NO @ X
0x00c544…00c6d8 Dummy {f00=0x0004, f01=0x0190, f02=» t @ U . M - t F G U W D V 4 F V # f = Z V R W W W W ' C R WdW W W V SCP" OBP LMP UFP , K V
0x00c6d8…00c86c Dummy {f00=0x0004, f01=0x0190, f02=» V , W @ _ V Q # T $ : V V , T W W W V : 0 Q Q X*Q R U V_> ._D @ , H Q R W H T T .W H T I I Y2 X_ , P P , P P C U T
0x00c86c…00ca00 Dummy {f00=0x0004, f01=0x0190, f02=» F 4 T C R _ _ _ _ B , @ T * ,9cP f Y _ :` W O QH ?A R $T$ $P, W P ?a W ( W ;h P V : 8 V : OPTION NOT AVAILABLE CSEG1 LMCSEG2 LMCSEG3 LMCSEG4 LMCSEG5 LMLED LMCSEG
0x00ca00…00cb94 (0, 16) Dummy {f00=0x0004, f01=0x0190, f02=»CORE OVERFLOW ** @ !6 O N W P ( - Y j O P: 4 9 Y <=h R O & = Y N P N P : N P 9B 9A R H P #v W f T P : $T !V R HW
0x00cb94…00cd28 Dummy {f00=0x0004, f01=0x0190, f02=»W W W W j ! R JW W W W B PL ( XB " R _L YR U " V l8h Xf "$ R _p ;Yv < $ $~ "R R HW W W W j "j R JW W W W B P YD b P :h " R _`W @ X 8<h 8# LP 8P W T X
0x00cd28…00cebc Dummy {f00=0x0004, f01=0x0190, f02=» #J R _x V 0 V PW !NN O : ( $ 8 5 Y @ P N N V O U $:h U # U " N N V < O U N N V < O U N N V U ( $& R W W W W W 1 5 C $D R W W
0x00cebc…00d050 Dummy {f00=0x0004, f01=0x0190, f02=»0MS- W @ 4 4 " Y%X %X 8 QR F%B _& Q$ & 4 " 9 Z _P &L 8 & 8 V :%n% % % % % & & & & PROG ABORTED AT OVERFLOW IN SIMULATION ROUTINE SAVE AREA NOT WIRED INSTRUCTION MEMORY PROTECT
0x00d050…00d1e4 Dummy {f00=0x0004, f01=0x0190, f02=»A4 =HEXA A5 =HEXA A6 =HEXA A7 =HEXA A8 =HEXA A9 =HEXA A10=HEXA A11=HEXA A12=HEXA A13=HEXA A14=HEXA BUFFER ALLOCATION OVERFLOW DISK OVERFLOW DISK QUEUE OVERFLOW MEMORY OVERFLOW DURING LOADING PHASE R W W W W W 1 5 C R W W
0x00d1e4…00d378 Dummy {f00=0x0004, f01=0x0190, f02=» C:HXBI,A12 CONVERT DEVICE ADDRESS R PINCVTG EQU * S , P RB INCVT9 S H 0 P LDR A3,A1 DEVICE ADDRESS S h $ P LD A2,W:PARV,A13 S @ P LDKL A1,/1E0 ASSIGN TYPE U ; FILE CODE /E0 S 8 P
0x00d378…00d50c Dummy {f00=0x0004, f01=0x0190, f02=»SB7,A13 ASSIGN STATUS S x P RB(4) INCVT9 T , P* ASSIGNEMENT HAS BEEN PROCESSED T @ PINCVTH EQU * T p H P LDK A1,/50 BATCH PROCESSING,SET BIT 13 IN JPTMOD T P RF INCVTD T P* T PINCVTC
0x00d50c…00d6a0 Dummy {f00=0x0004, f01=0x0190, f02=» EQU * *PTS T L P LDK A1,0 RESPONSE = N, NO BATCH PROCESSING DESIRED U P* U d 4 PINCVTD EQU * SET BIT IN JPTMOD U n $ P ORS A1,JPTMOD,A11 U P* U P RTN A14 U P* U P
0x00d6a0…00d834 (0, 17) Opaque[0x194]
0x00d834…00d9c8 # DirEnt {nam=»CSEG1 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0090, f03=0x0000}
0x00d834…00d9c8 IdxSect {
0x00d834…00d9c8 f00 = 0x0004 // 0xd834 @0x0
0x00d834…00d9c8 f01 = 0x0002 // 0xd836 @0x2
0x00d834…00d9c8 gno = [ // 0xd838 @0x4
0x00d834…00d9c8 [0x00]: C0x0004.0x2.0
0x00d834…00d9c8 ]
0x00d834…00d9c8 }
0x00d9c8…00db5c Dummy {f00=0x0004, f01=0x0190, f02=» : W N j , R W W W W W V ~ W W J R W W W W W V V P T T n r W R W W W W ' W V T V P V P 4 # R Wt_ _ _ B T V ,P6R 9 :AW H - 9a:K8G
0x00db5c…00dcf0 Dummy {f00=0x0004, f01=0x0190, f02=» V # V ' V R W _ _ _ V C R W _ _ _ V V < = V ] PD V R* G R W^_ _ _ C B P W = G 0 R W,_ _ _ V : W. W* W& W" W W W W W $W (W ,W 0 L 8
0x00dcf0…00de84 Dummy {f00=0x0004, f01=0x0190, f02=»V R W W W W W V A V P T T , A @ R W W W W , P P F ' 4 + ' R WtW W W V T Tj V N LMT` V HPZ PV K R WBW W W V 6;a 8 0 PT 0X W$ W W W W
0x00de84…00e018 Dummy {f00=0x0004, f01=0x0190, f02=» _fW W W$ | R _xW W W G K _. P 8 V : C ! % + TOO BIG N W R W^W WZWX W" | W R W W W W 8 V V P T T 6 R R W W W W W F P
0x00e018…00e1ac Dummy {f00=0x0004, f01=0x0190, f02=» Y P W R 4W6 C Y^W _" W* W& W" W W W W $W ~ (W ,W 0 P J 8 V : + IN CATALOG B C R _nW W W 8I9A:l:A H B V % R _ W W W V : N j R W(W&
0x00e1ac…00e340 Dummy {f00=0x0004, f01=0x0190, f02=» Z` T PD # 4 C C R W W W W B D K V _ DL = ON = F ! " / = _ DD = F D ! " = : F P F F = J K , R W W W W k : , P T 9CQ 9FR T ! T~
0x00e340…00e4d4 (0, 18) Opaque[0x194]
0x00e4d4…00e668 # DirEnt {nam=»CSEG2 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0098, f03=0x0000}
0x00e4d4…00e668 IdxSect {
0x00e4d4…00e668 f00 = 0x0004 // 0xe4d4 @0x0
0x00e4d4…00e668 f01 = 0x0004 // 0xe4d6 @0x2
0x00e4d4…00e668 gno = [ // 0xe4d8 @0x4
0x00e4d4…00e668 [0x00]: C0x0004.0x3.0
0x00e4d4…00e668 [0x01]: C0x0005.0x0.0
0x00e4d4…00e668 ]
0x00e4d4…00e668 }
0x00e668…00e7fc Dummy {f00=0x0004, f01=0x0190, f02=» d d l ^ 8 > $ R W*W(W&W P X 8 : V U R V W" _& _* W R W W W W W, V U Q W , P| Px R WrWpWnWl V Q R , P T 9IV OBW UFW SC V N 0 V P.
0x00e7fc…00e990 Dummy {f00=0x0004, f01=0x0190, f02=»WPW W P @P @T ` 2( _> F K V U 5 W R WrWpW Wl_v V R P V X V Q W R FWF V ] R W4 V P R W : V YPZ( V Y , R FW : W V W 2 P L 8 : EOV ON INPUT FILE,MOUNT NEW
0x00e990…00eb24 Dummy {f00=0x0004, f01=0x0190, f02=» 8 R @ : R W W W W W V R ' Q ' W 2 R WtWrWpW V W W V R^ ' QX V RR W b R WPWNWLWJWZ V | SC N N _ V | UF_ V U Q _ W W W W W < W V , X X P Rb T W A
0x00eb24…00ecb8 Dummy {f00=0x0004, f01=0x0190, f02=» V V V W _6 V W F ; V F F );A F ( R ?U ) Y ) ( T Y W V K V QD R W W W W W W V V V ' ] W _ V R _ WNWvWf V K > R W W W W C V C c l R WjW
0x00ecb8…00ee4c Dummy {f00=0x0004, f01=0x0190, f02=» 8 W 2 : LINE NUMBER INPUT FILE CAN NOT BE ASSIGNED OUTPUT NOT ASSIGNED W f R WVWTWRW W V ~ R WFWDWBW@ P4 1 ) R W"W W W 0 O : W W 8 : 00 W
0x00ee4c…00efe0 Dummy {f00=0x0004, f01=0x0190, f02=» Z` T PD # 4 C C R W W W W B D K V _ DL = ON = F ! " / = _ DD = F D ! " = : F P F F = J K , R W W W W k : , P T 9CQ 9FV0 N "
0x00efe0…00f174 (0, 19) Dummy {f00=0x0005, f01=0x0190, f02=» D V P L Q M V I R Wf_ _ _ V U j P . R W4W2W W. ( P T R FW : W W W W W W P z 8 : '( #( ( D N N OB DI R UF 0 V P *
0x00f174…00f308 Dummy {f00=0x0005, f01=0x0190, f02=» A D W V V A j @ W W W W W OBJECT FILE DIRECTORY **** SECTORS Q Q" & U W W W W W R W 4 V W # R R
0x00f308…00f49c Dummy {f00=0x0005, f01=0x0190, f02=» W (>a ( % P _ V % V % P _" ( % P _ P P _ A ( ` " PROGRAM NAME SECTOR STRT INIT ACTL DATE W
0x00f49c…00f630 Dummy {f00=0x0005, f01=0x0190, f02=» ( ' $ ' $! h P x R W W W W W V % P _ V & ( % & j ( < ( % W P& ( % P ( % W P _& W W & ( W V W j Z
0x00f630…00f7c4 Dummy {f00=0x0005, f01=0x0190, f02=» W ($ < R < R W h 2 V % V % j z @ LR R W A % @ NR S % A L A N V L A L_ A N_ A A EN D z @ @ z (; V A A A V % V
0x00f7c4…00f958 Dummy {f00=0x0005, f01=0x0190, f02=» P _ " W 2 V R : 8 ` R @ & R W W W W W V % P _ V & ( % & j ( < ( % W P ( % P ( % W P _& W W & ( W V W j
0x00f958…00faec Dummy {f00=0x0005, f01=0x0190, f02=» 6 ,NOD 5 781215 NODPROK $ 8POD 7 781215 PODPROK PODPST FCSEG3 @ 781215 SEG3Y ODIGEN GODPST |KPF >ODIGEN L 781215 ODIGENK bKPF GODPST 8ACCTNG T 781215
0x00faec…00fc80 Dummy {f00=0x0005, f01=0x0190, f02=» SEG8Y DUFPRO *CSEG9 s 781215 SEG9Y R VD:CADI | 781215 CADPROK PRC06 PRD53 S:PRC PRD59 SKIPY ~ *CSEGB 781215 SEGBY *CSEGD 781215 SEGDY ,I:DDRQ
0x00fc80…00fe14 (0, 20) Opaque[0x194]
0x00fe14…00ffa8 # DirEnt {nam=»CSEG3 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x00a8, f03=0x0000}
0x00fe14…00ffa8 IdxSect {
0x00fe14…00ffa8 f00 = 0x0005 // 0xfe14 @0x0
0x00fe14…00ffa8 f01 = 0x0004 // 0xfe16 @0x2
0x00fe14…00ffa8 gno = [ // 0xfe18 @0x4
0x00fe14…00ffa8 [0x00]: C0x0005.0x1.0
0x00fe14…00ffa8 [0x01]: C0x0005.0x2.0
0x00fe14…00ffa8 ]
0x00fe14…00ffa8 }
0x00ffa8…01013c Dummy {f00=0x0005, f01=0x0190, f02=» * . W & R W W WDW W ^ 8 : _ _ $ _ !_ _& h_0 IDENT V 8 V /O W /LP /S V W : SC W R _ W>_~_ 4 # R _ W _ ( V X W V Z
0x01013c…0102d0 Dummy {f00=0x0005, f01=0x0190, f02=» : UF W _D F R, F T V LW W W R 4W W X N ! 4 V # R _* V 4 4Pv Tp V 9$ TR V 6 W 6 V V PP W N ! V # W X R _ W U V 6 W 6 V 5 U
0x0102d0…010464 Dummy {f00=0x0005, f01=0x0190, f02=» # R W 6 0=a 08g9A:l @ 8 A 8;` $ 9(@ 4 N ! # p R W* V T U V T W 2 : X W V , P8 PB W T W T 9 VH9 V # R W& V V P W
0x010464…0105f8 Dummy {f00=0x0005, f01=0x0190, f02=» W j W - Z N " N /OBJCTOB W 0 V P < W 0 V < W W 4 V # V P W j W R W W W W" W V < NOT V > D T C _: ( B W V T" W B U V T W V
0x0105f8…01078c Dummy {f00=0x0005, f01=0x0190, f02=» R W W W W W C _( W ( W" C V J " R _4 W _ W _" B U W 6 L R WNW W V T$ C h R W2 W U _: U W _D C R W W W W W U _ T T Y T T W j_( C 5 Z V
0x01078c…010920 Dummy {f00=0x0005, f01=0x0190, f02=»_ _ V 6 8 V <A W 6 V 6 b 6 V Q Z 4 % Y # R W _ _ _ , T 4<A $ % 4 % Y j W 4P6 T V W jW4 V 5 Z B W V W P V W _R C , U V R _ V T@ V
0x010920…010ab4 (0, 21) Dummy {f00=0x0005, f01=0x0190, f02=»Y" V W j V T V R * V _& O 8 : 4_ MODULE O 8 V R @W : _H _P W V 4 V # V V # R W W _ W C _ V R _ _ W _ W V
0x010ab4…010c48 Dummy {f00=0x0005, f01=0x0190, f02=»OB N N 0 V P P W , W N UF 0 R @W~ W W 4 W W W W V D 9 W< '( 8 : ( 8 : 8 : $ 8 W 2 : W : R JWJWLWFW@ B W | B
0x010c48…010ddc Dummy {f00=0x0005, f01=0x0190, f02=»T~ V W W V W 8 W W V V W R V V W < ~ R W W W _f 8 . * 8 . R J_8WD_<_> " P P P 4 0 W " ?A W
0x010ddc…010f70 Dummy {f00=0x0005, f01=0x0190, f02=» 8 W P R T0 4 @ % V C z R W W W W W B 9 < V 9 V V 9 V 9 C R W(W&W$W" j j W | D W . 8W, B_ 8W _2 _: W 2 @
0x010f70…011104 Dummy {f00=0x0005, f01=0x0190, f02=» V C R W:W8W:W4 V P* W B 9 V P> W W _z V P$ " T W _ W _ W _ V $ Pl V PN C # ` R W4W2W0W. B $ $ - $ X R _ _ _ _ #_V B $ $ - $_r
0x011104…011298 Dummy {f00=0x0005, f01=0x0190, f02=» RDO PRT | , ( LST RDA PRD , ( LSD PCH POB L , ( PLD DUF INC MO | , ( V SCR KPF p DEL , ( ) p ASG SEG RUN p
0x011298…01142c Dummy {f00=0x0005, f01=0x0190, f02=» LK l , ( E p LED DEB p EDT , ( SVD ` SVU REW < , ( ULD FFS FBS l , ( RFS RBS WEF , ( ) WES WEV SDM HS , ( I F p
0x01142c…0115c0 Dummy {f00=0x0005, f01=0x413c, f02=» LSF GOD P POD , ( OLE P " $ NOD MAC P & RT , , ( L P ( PRV LSV TRA , ( p 0 TLK p 2 4 XRF P 6 8 BUG p , ( ) TLT p : 4 LKF p < " I
0x0115c0…011754 (0, 22) Opaque[0x194]
0x011754…0118e8 # DirEnt {nam=»CSEG4 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x00b8, f03=0x0000}
0x011754…0118e8 IdxSect {
0x011754…0118e8 f00 = 0x0005 // 0x11754 @0x0
0x011754…0118e8 f01 = 0x0002 // 0x11756 @0x2
0x011754…0118e8 gno = [ // 0x11758 @0x4
0x011754…0118e8 [0x00]: C0x0005.0x3.0
0x011754…0118e8 ]
0x011754…0118e8 }
0x0118e8…011a7c Dummy {f00=0x0005, f01=0x0190, f02=» d $ j > R W W W W N 9 V r W F F $ $ I P6 ! P0 R$ Q $ W T D L ;FV 2 V R $V # _& YF N 4 # R WP_ _ _ @ H * ( B T 4 Q W 4 ) Y P ) Y :WP W W
0x011a7c…011c10 Dummy {f00=0x0005, f01=0x0190, f02=»A CAT. PROC. , P( P$ P R 9AQ O P F 9AV W 2 Y4 N P0 , P8 P4 F 9AV G . N jW W 2 @ D H ;AV I , H R ;H;h _ O : F ! # 4 C C C ( V P G : O x R WbW W^W
0x011c10…011da4 Dummy {f00=0x0005, f01=0x0190, f02=» N 9B 9 O : 8 : W @P O v |9H W | v | W | v |:H W | v | W |WV v |;H W | v | W | v |<H W | v | W | v |=H W | v | W | v |>H W | v | W | W p > : : b W W W v | W | !,,P V Q 5 W _" W _ *, , P
0x011da4…011f38 Dummy {f00=0x0005, f01=0x0190, f02=» P` 0R RV PP @ :PJ @ <PD V> W T0 T 9FR T D ! A :W W 0 O W 2 Yp N 9 Rh N 9DV. # . C C C R HW W W W # j C C C < R JW(W _0_2 N 9CV j $ / W
0x011f38…0120cc Dummy {f00=0x0005, f01=0x0190, f02=»_" ! _ W v |9H W | v | W | v |:H W | v | W | v |;H W | v | W | v |<H W | v | W t , W | p ,8h 00 ^ R WV RP QJ V R W T T n ' ' ' W & R *T N O O O W
0x0120cc…012260 Dummy {f00=0x0005, f01=0x0190, f02=»W W W W D j B &P< N ? O & O F O j D T _ 8 8 + 8 & A P ( O : L 11CCI (PTS VERSION 800118)
0x012260…0123f4 (0, 23) Opaque[0x194]
0x0123f4…012588 # DirEnt {nam=»CSEG5 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x00c0, f03=0x0000}
0x0123f4…012588 IdxSect {
0x0123f4…012588 f00 = 0x0006 // 0x123f4 @0x0
0x0123f4…012588 f01 = 0x0008 // 0x123f6 @0x2
0x0123f4…012588 gno = [ // 0x123f8 @0x4
0x0123f4…012588 [0x00]: C0x0006.0x0.0
0x0123f4…012588 [0x01]: C0x0006.0x1.0
0x0123f4…012588 [0x02]: C0x0006.0x2.0
0x0123f4…012588 [0x03]: C0x0006.0x3.0
0x0123f4…012588 ]
0x0123f4…012588 }
0x012588…01271c Dummy {f00=0x0006, f01=0x0190, f02=» !* . F N P R < z @ t ( H W" LKF W LKE A W W - Y ` O O R W W W W W V PVQ V CP P& P6 P8 Tv O W XD 0 W O W X^ b_ _0 _6 V DEP T.
0x01271c…0128b0 Dummy {f00=0x0006, f01=0x0190, f02=» 9AV~ N N 0 V P2 8 R @W W 2 W 2 Y : V P& > D N N 0 V P L_Z N 9BVF D 0 V P _ V P > D 0 V P f_ , T 8_ X 4
0x0128b0…012a44 Dummy {f00=0x0006, f01=0x0190, f02=» 8_8 N B N 9H _N COMMON VALUE REDUNDANT LIBRARY OPTION REDUNDANT DEBUG OPTION REDUNDANT MAP OPTION REDUNDANT START ADDR. REDUNDANT USER LIB ASSIGN ERR : /OBJCTOB SYSTEM LIB ASSIGN ERR : /O EMPTY /O CLOSE ERROR /L ASSIGN ERR :
0x012a44…012bd8 Dummy {f00=0x0006, f01=0x0190, f02=»SYST OBDIR ASSIGN ERR : OLE LM j 4 4 = Y < Y N & Q O 8 = Y F O ( W W W W@ O _ _ W W W W O
0x012bd8…012d6c Dummy {f00=0x0006, f01=0x0190, f02=» !DDP& !RRTR W QP O _: W QF O _J W QP O _Z V /ST , P P _t Wz Wv Wr W * Wd H_ WZ WV WR :_ V T , P P T 9IV. N OB 0 V P R P 8 : , T ! T~ N T #
0x012d6c…012f00 Dummy {f00=0x0006, f01=0x0190, f02=» R W V T& D F:ERMSUF 0 V P d V V j N " N W 2 L W 2 N T N 9HR : W 2 : ( /S ASSIGN ERR : R OPTION ERR NL OPTION ERR D OPTION ERR /S EMPTY /O ASSIGN ER
0x012f00…013094 (0, 24) Dummy {f00=0x0006, f01=0x0190, f02=»R LM FCL LM BCL LM BEA LM BEB LM TRA LM XRF LM TCD LM HSF LMFX1 LMFX2 LMFX3 LMFX4 LMFX5 LMFX6 LMFX7 LMFX8 LMFX9 LMFXA LMFXB LMFXC LMFXD LMFXE LM R W W W W , T X 4 R WR R
0x013094…013228 Dummy {f00=0x0006, f01=0x0190, f02=» 8 N N 9HZ W 0_( 8 : MAC LM 8 : RTL LM TLT W TLK A f j H 4 % Y GOD W j n W | W j H $ 5 Y j W | D W - Y ` O O
0x013228…0133bc Dummy {f00=0x0006, f01=0x0190, f02=» _6 O _z W V O O _ P 8 : N 9AVt N N 0 V P. 8 2 R @W W 2 W Y : > D N N 0 V P L_P N 9BV@ D 0 V P _x > D 0 V P f_ , T
0x0133bc…013550 Dummy {f00=0x0006, f01=0x0190, f02=»W W 2 4 N OB 0 V P$ 8 z R @W W 2_P N OB 0 V P$ 8 R @W W 2_N N OB 0 V P$ 8 R @W W 2_N N OB 0 V P$ 8 : R @W W
0x013550…0136e4 Dummy {f00=0x0006, f01=0x0190, f02=» W 0_ W V O O _ P 8 : N 9AV N N 0 V W W A r W W W W ~ : W: D W&W W V V 5 W _, A r V P W V | W | V P V /P 0R. :RrW& V t @ r P W ~ V
0x0136e4…013878 Dummy {f00=0x0006, f01=0x0190, f02=» W* @ rP U @Q 9JW P W @ W ~ V W ~ V W ~ V 0R :R AR GV V | V P v | W | P ,P KP L T P6_ L tW$ @R 0 P 9D _( W L
0x013878…013a0c Dummy {f00=0x0006, f01=0x0190, f02=»W 8 : _ _ $ _ !_ _& _0 IDENT V 8 V /O W /LP /S V W : SC W * R _ W>_~_ 4 # P R _ W _ ( V X W V Z V W N N W^ W
0x013a0c…013ba0 Dummy {f00=0x0006, f01=0x0190, f02=» W W . R 4W W N ! 4 V # Z R _* V 4 4Pv Tp V 9$ TR V 6 W 6 V V PP W N ! V # W R _ W U V 6 W 6 V 5 U U U V U N ! 4 V #
0x013ba0…013d34 (0, 25) Dummy {f00=0x0006, f01=0x0190, f02=»8g9A:l @ A ;` $ 9(@ 4 N ! # R W* V T U V T W 2 : W V , P8 PB W T W T 9 VH9 V # V R W& V V P W ! O 8 V _ W
0x013d34…013ec8 Dummy {f00=0x0006, f01=0x0190, f02=»/OBJCTOB W 0 V P W 0 V W W 4 V # V P W j W | R W W W W" W V < NOT V > D T C _: ( PW V T" W B U V T W V T C R _l W W U C V X B W
0x013ec8…01405c Dummy {f00=0x0006, f01=0x0190, f02=»W" C V J R _4 W _ W _" B U W 6 R WNW W V T$ C R W2 W U _: U W _D C R W W W W W U _ T T Y T T W 4 _( C 5 Z B V j W (P. H U W V W W H W
0x01405c…0141f0 Dummy {f00=0x0006, f01=0x0190, f02=» 4 % Y # R W _ _ _ , T 4<A $ % 4 % Y j W 4P6 T V W t W4 V 5 Z B W V W P V W _R C , U R _ V T@ V 8 , T 9 V( OB W W :
0x0141f0…014384 Dummy {f00=0x0006, f01=0x0190, f02=» z R * V _& O 8 : _ MODULE O 8 R @W : _H _P W V 4 V # V V # R W W _ W C _ V < R _ _ W _ W V C C _NW" V P GOD W j n W | W
0x014384…014518 Dummy {f00=0x0006, f01=0x0190, f02=» N UF 0 R @W~ W W 4 W W W W V D 9 W< '( 8 : ( 8 : 8 : $ 8 W 2 : W R JWJWLWFW@ B W | B W R W W W W W R W W W
0x014518…0146ac Dummy {f00=0x0006, f01=0x0190, f02=» W V V W V V W W W W _f f t 8 * 8 R J_8WD_<_> " P P P 4 0 W " ?A W ?a H V X^ Z R JW W W W W
0x0146ac…014840 Dummy {f00=0x0006, f01=0x0190, f02=» V C R W W W W W B 9 V 9 V V 9 V 9 C < R W(W&W$W" j j W | D W 8W, _ 8W _2 d_: W 2 @ : V D : W W V 9a:a
0x014840…0149d4 (0, 26) Dummy {f00=0x0006, f01=0x0190, f02=» 9 V P> W W _z V P$ " T W _ W _ W _ V $ Pl V PN C # R W4W2W0W. B $ $ - $ X R _ _ _ _ #_V f B $ $ - $_r ?a V X^ R JW W W W W
0x0149d4…014b68 Dummy {f00=0x0006, f01=0x0190, f02=» A1,W:ASB7,A13 F : P RF(0) TLK260 OK. ASSIGN SYSTEM LIBR. OBJECT DIRECTORY G P* G X 6 P* PRINT ERROR MESSAGE G b P LDK.L A3,SYSLBR G P RB TLK210 G P EJECT G P* G , P* ASSIGN SYSTEM
0x014b68…014cfc Dummy {f00=0x0006, f01=0x0190, f02=»TE PROTECT, ASGTYP=4 G p P LDK A2,/F0 DISK FILE CODE H P LDK A3,8 DIRECTORY ADDRESS H > & P MS 7,W:ASB0,A13 SET ASSIGN BLOCK H b & P CFI A14,C:ASG,A12 REQUEST ASSIGN H " P LD A1,W:ASB7,A13 STATUS OK ? H P RF(0) TLK300 YES H P* PRINT ERROR MESS
0x014cfc…014e90 Dummy {f00=0x0006, f01=0x0190, f02=» * H " P* CHECK OBJECT INPUT FILE * I " P* * I @ " P****************************** I f P I 8 PTLK300 EQU * CHECK IF /O IS PRESENT I P LDK A3,/D5 I $ P CFI A14,C:
0x014e90…015024 Dummy {f00=0x0006, f01=0x0190, f02=»QU * PRINT ERROR MESSAGE I P LDK.L A3,LKEORR J 0 PTLK315 LDK.L A1,/FF00 J T P LDK A2,0 J v $ P CFI A14,C:ERMS,A12 J H P RB TLK230 THEN DELETE FILE CODES ASSIGNED TO LIB J P
0x015024…0151b8 Dummy {f00=0x0006, f01=0x0190, f02=»ICE J V P EJECT K P K P******************* K " P* * K > P* CLOSE /O FILE * K Z P* * K v P******************* K P K P LDR A8,A13 K P ADK.L A8,W:DEC1 K , P LDK
0x0151b8…01534c Dummy {f00=0x0006, f01=0x018e, f02=»10 REQ LENGTH K z * P MSR 3,A8 SET ECB L P* L H 8 P LDK.L A4,TLK330 WRITE EOF ON THE FILE L R P ABI C:WEOF,A12 L PTLK330 EQU * L , P RF TLK340 I/O ERROR L P* L : P
0x01534c…0154e0 Dummy {f00=0x0006, f01=0x018e, f02=» L P P LDK.L A3,LKEOR1 M 6 P RB TLK315 WRITE ERROR MESSAGE M , P* M f 6 PTLK350 EQU * NOW REWIND THE FILE M p P LDK.L A4,TLK360 M P ABI C:REWD,A12 M PTLK360 EQU * M
0x0154e0…015674 (0, 27) Opaque[0x194]
0x015674…015808 # DirEnt {nam=»LED «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x00e0, f03=0x0000}
0x015674…015808 IdxSect {
0x015674…015808 f00 = 0x0007 // 0x15674 @0x0
0x015674…015808 f01 = 0x0004 // 0x15676 @0x2
0x015674…015808 gno = [ // 0x15678 @0x4
0x015674…015808 [0x00]: C0x0007.0x0.0
0x015674…015808 [0x01]: C0x0007.0x1.0
0x015674…015808 ]
0x015674…015808 }
0x015808…01599c Dummy {f00=0x0007, f01=0x0190, f02=» D " W w @ D P 9aW W F R _ W W W W V | D N N SC v R W W W W W$ V /SP W V R Q UF W 0 V T R WjW W W W W W2 V UR QN , PF PB W R W6W W W0 !!W V R" V
0x01599c…015b30 Dummy {f00=0x0007, f01=0x0190, f02=» (P> R *P _& V n ! T$ JW R W W W W * JW N ; RF W W W W B X _ _, X _ W W W W W W P 8 N T N 9HV V W 2 W 2 W 2 : 8 j @W _L _ _T
0x015b30…015cc4 Dummy {f00=0x0007, f01=0x0190, f02=» R W*W(W W _j R FW _ R W _ W : " 4 R W W W W 8 V R ' Q ' W R W W W W V R 8 z R W W~W|W Wx V Rr ' Ql V Rv W R WXWVWTW W W$ V RF ' Q@ R< W R W.W,W*W( V V P W V W 8
0x015cc4…015e58 Dummy {f00=0x0007, f01=0x0190, f02=» D N N W R _ _ _ W _ V Z ' Y W W R _ _ _ W W V Z ' Y Z W R _ _ _ _ 0 V P V V Q A V V W W P W 0 W V W B W A V W 8 V Td d T V
0x015e58…015fec Dummy {f00=0x0007, f01=0x0190, f02=»_ W _ V Z ' Y" V W T V X@ V V =a=A T V Xb V @ V =a=A W V V P W l W V w V ) W _( w 8 V W T V X V j P ( + R W,W*W.
0x015fec…016180 Dummy {f00=0x0007, f01=0x0190, f02=» W W V | V P v | W | W $$P 9H_ W : W : V | V :H v | W | Y $$ V :a V Q V % v % W Y j W | V V | V V | $ R * W | ^ _$ W V $V : D V_bW v W
0x016180…016314 (0, 28) Dummy {f00=0x0007, f01=0x0190, f02=» V D V_ W W W j P ( V ) Y ( R WfWdWdWx V Q RH W 2 V j UUT PW " * ( x R W W W W W V V _ W V Z Qn R FW _( " ! T . R Wl p @ *
0x016314…0164a8 Dummy {f00=0x0007, f01=0x0190, f02=»_ _ V j @ b ` NW V j P ~ R _L_NW W _P N ; " W W W W B Xz_h Xl_2 # , T TYT F C R HW W W W j W | P W P % Y P C R J B B B V 1 L: W
0x0164a8…01663c Dummy {f00=0x0007, f01=0x0190, f02=» , , V , ( h 00 ) J R W W W W ( <V # N < V # N < V O 00 ) L R W W W W , , P P P # z R W W W W :!!DL rIL ,EN vAB tJN CH VLS RE COMM
0x01663c…0167d0 Dummy {f00=0x0007, f01=0x0190, f02=»D DSK OUTPUT ERR,UPD ABORTED SYNTAX ERR,TRY AGAIN EOF,UPD TERMINATED INPUT FILE CAN NOT BE ASSIGNED /S CAN NOT BE ASSIGNED * AUX. INPUT CAN NOT BE ASSIGNED,TRY AGAIN ( CMND NOT ALLOWED IN EXE MODE,TRY AGAIN TABLE O'FLOW,TRY AGAIN EOF IN AUXI IN
0x0167d0…016964 Dummy {f00=0x0007, f01=0x0190, f02=»BI C:RDSC,A12 READ GRANTB INTO W:DBF2 I P* J 8 P* J B P* J L PPRD60 RF *+2 J V P RF *+2 J t P RF *+2 J P RF *+2 J B P ADKL A10,4 A10= CURRENT GRANULE ADD
0x016964…016af8 Dummy {f00=0x0007, f01=0x0190, f02=»EADING J P* K P LDKL A1,PRDBU1 K & P ST A1,W:REC1+2,A13 K < P LDK A1,37 K f & P ST A1,W:REC1+4,A13 K P LDR A8,A13 K P ADKL A8,W:REC1 K P LDKL A4
0x016af8…016c8c Dummy {f00=0x0007, f01=0x0190, f02=» P RF *+2 L P LDKL A4,PRD63 L " P LDKL A1,PRDBU3 L D & P ST A1,W:REC1+2,A13 L h P LDK A1,24 L & P ST A1,W:REC1+4,A13 L F P LDKL A5,-6 A5= SECTOR
0x016c8c…016e20 Dummy {f00=0x0007, f01=0x0190, f02=» *+2 L P RF *+2 M P RF *+2 M 0 P RF *+2 M N P LDR A1,A13 M l P ADKL A1,W:DBF1 M & P ST A1,W:DEC1+2,A13 M @ P LDKL A6,-1 SET EOS FLAG
0x016e20…016fb4 (0, 29) Opaque[0x194]
0x016fb4…017148 # DirEnt {nam=»CSEG7 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x00f0, f03=0x0000}
0x016fb4…017148 IdxSect {
0x016fb4…017148 f00 = 0x0007 // 0x16fb4 @0x0
0x016fb4…017148 f01 = 0x0002 // 0x16fb6 @0x2
0x016fb4…017148 gno = [ // 0x16fb8 @0x4
0x016fb4…017148 [0x00]: C0x0007.0x2.0
0x016fb4…017148 ]
0x016fb4…017148 }
0x017148…0172dc Dummy {f00=0x0007, f01=0x0190, f02=» W ( R V W W PW _ W _ , P P j P X R W d R W ( V V F K R JW W WpW P* F 0 NOT P D T R JW W~_D_ _ F C P R P R W`W _h_j_l @TT R RWH x 2( _
0x0172dc…017470 Dummy {f00=0x0007, f01=0x0190, f02=» R _J_L_NW W V W ( j P V ^| R W W W W B W | B W R W W W W W d R *T R W W W W W : R *Tx F K X P R P R W W8W W F K r R WvWtW W _>
0x017470…017604 Dummy {f00=0x0007, f01=0x0190, f02=» RW :W bW P 8_4( ! ( ( MODULE /O /O CLOSE ILLEGAL EOS IN IDENT OBJECT LIB EOV ON OUTPUT FILE,MOUNT NEW TAPE THEN RESTART W R W W W W h V l l , P p R W W W W W V
0x017604…017798 Dummy {f00=0x0007, f01=0x0190, f02=» K v R W0W _P_R_T @T R RW x 2( _pW W W W W W.W R FW V _ R W W 2 : V | D N N UF R W W W6W W V W 0 V P 8 R @ V /STD SC_: V /ST , P W& W" W W
0x017798…01792c Dummy {f00=0x0007, f01=0x0190, f02=»CVEMIN+2 SECONDS ^ ~ 4 PCVEFIT EQU CVESEC+2 FIFTETHS OF SEC ^ & 2 PCVEBTB EQU CVEFIT+2 ALLOCATION TABLE ^ P* P* P* P* & P* FCT FILE CODE TABLE P* , PFCTFC EQU 0
0x01792c…017ac0 Dummy {f00=0x0007, f01=0x0190, f02=»F LFI ASSIGNED TO THE FILE CODE l P* ( P* 2 ( P* DCT DISK CONTROL TABLE < . PDCTLG EQU -14 ENTRY LENGTH h F PDCTEB0 EQU DCTLG+2 EVENT BYTE / LOGICAL DISK FILE CODE : PDCTEB1 EQU DCTEB0+2 BUFFER
0x017ac0…017c54 (0, 30) Opaque[0x194]
0x017c54…017de8 # DirEnt {nam=»CSEG8 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x00f8, f03=0x0000}
0x017c54…017de8 IdxSect {
0x017c54…017de8 f00 = 0x0007 // 0x17c54 @0x0
0x017c54…017de8 f01 = 0x0004 // 0x17c56 @0x2
0x017c54…017de8 gno = [ // 0x17c58 @0x4
0x017c54…017de8 [0x00]: C0x0007.0x3.0
0x017c54…017de8 [0x01]: C0x0008.0x0.0
0x017c54…017de8 ]
0x017c54…017de8 }
0x017de8…017f7c Dummy {f00=0x0007, f01=0x0190, f02=» @ 8 N FILE TYPE MISSING FILE TYPE ERROR D A 6 R W W W W W W l R W W W W@ W $W V /LT LM W W, /S ( SC W W Z@ YF UF W R W W W W D W N N W W V W R W W
0x017f7c…018110 Dummy {f00=0x0007, f01=0x0190, f02=» B &P$ V W W D W 8W _ 0 V P 8WB R W W W W W _> N W 0 V P 8 R @Wx 4 ' ! + @ R WhW W W R R WVW W W G K _. B $ V UFT F > &
0x018110…0182a4 Dummy {f00=0x0007, f01=0x0190, f02=» RN V T. T T P: P4 P6 A R W W W W W8 W W W W + 8 V V < : @ 4 C 4 C 0 I D C C R C F ! C B
0x0182a4…018438 Dummy {f00=0x0007, f01=0x0190, f02=» X v A X A 8 T ( B B A ^ A ` A b F A l F A x F A F A F A F . A C N C T W < A 0
0x018438…0185cc Dummy {f00=0x0007, f01=0x0190, f02=»RACK SEC/GRAN INTERLACE P W A 4 W ( @ R W W W W,W 8 W 2 V : _" V P@ , P8 P R V P T T~ P P + _^ _h _r D N " N UF W 0
0x0185cc…018760 Dummy {f00=0x0007, f01=0x0190, f02=» R W W W W WZ R T @ T W R _._0_2W WZ Z> R W W W W W@ R @ Q W 1 W ( R W W W W V W P Q W " R W W W WTW R D R W W W W ` W
0x018760…0188f4 (0, 31) Dummy {f00=0x0008, f01=0x0190, f02=» W _ _ SECTOR # W AGRANTBID 4 W 9 , PH , X Q: Y , Z H ]d V X 4 _ W , W ( R W W W W : W W
0x0188f4…018a88 Dummy {f00=0x0008, f01=0x0190, f02=»,A12 v x PPRT375 EQU * w P RF PRER07 w ( P RF *+2 w H P RF *+2 w f P RF *+2 w PPRT376 EQU * w . P IM S:CUR,A13 NEXT LINE # w P LDKL A1,/20
0x018a88…018c1c Dummy {f00=0x0008, f01=0x0190, f02=»PRT379 NOT NEGATIVE,THERE IS A LIMIT w ~ * P* NEGATIVE x 2 " P LD A1,S:CUR,A13 x ` P SUK.L A1,9999 x 0 P RB(5) PRT340 LESS OR EQUAL x B P LDK A1,0 GREATER THAN 9
0x018c1c…018db0 Dummy {f00=0x0008, f01=0x0190, f02=»QU * x " P CW A1,S:CUR,A13 y L P RF(2) PRTEND LIN2 LESS THAN CUR ,THEN END,OTHEWISE,NEXT y 8 & P RB PRT340 LINE y P* y PART390 RF PRT390 y PART600 RF PRT600 y PART400 RF
0x018db0…018f44 Dummy {f00=0x0008, f01=0x0190, f02=» A1,ECBRL,A10 y P LDR A8,A10 z P LDK.L A4,PRT382 z 8 B P ABI C:WREC,A12 WRITE THE 1ST PART OF THE RECORD z PPRT382 EQU * z P RF PRER07 z P RF *+2 z P RF
0x018f44…0190d8 Dummy {f00=0x0008, f01=0x0190, f02=» SUK A1,8 MAXLG-8 z L P ADS A1,ECBBF,A8 BEGINNING OF 2ND PART = BEG OF REC -8+MXLG { & " P LD A1,S:LNG,A13 { v P ADK A1,8 { B P SUS A1,ECBRL,A8 REQUEST LENGTH OF THE 2ND PART = { B P*
0x0190d8…01926c Dummy {f00=0x0008, f01=0x0190, f02=» LDR A3,A2 BLANK OUT THE 1ST 8 CHARACTERS { P LDR A4,A2 | < P MS* 4,ECBBF,A8 | P* | P* | P LDK.L A4,PRT383 | P ABI C:WREC,A12 | PPRT383 EQU * | P RF
0x01926c…019400 Dummy {f00=0x0008, f01=0x0190, f02=»NEXT LINE | r P* } P* } P* } & P* } 0 P* } : P* } D P* } N P* } X P EJECT } b P* } x P* } PPRT390 EQU * } P ADK A7,0 } 2 PPRT395 ABL(0) PRT360 INCORRECT LENGTH } 8 P SUK
0x019400…019594 (0, 32) Opaque[0x194]
0x019594…019728 # DirEnt {nam=»CSEG9 «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0108, f03=0x0000}
0x019594…019728 IdxSect {
0x019594…019728 f00 = 0x0008 // 0x19594 @0x0
0x019594…019728 f01 = 0x0002 // 0x19596 @0x2
0x019594…019728 gno = [ // 0x19598 @0x4
0x019594…019728 [0x00]: C0x0008.0x1.0
0x019594…019728 ]
0x019594…019728 }
0x019728…0198bc Dummy {f00=0x0008, f01=0x0190, f02=» Z W R W W W W 8 V : _ W N R _ _"W W D W N W N W LM W 0 V P T _t _~ W , 4 Q ') * _ W W W W` V W Z WH V /L W , Xb Xf W W
0x0198bc…019a50 Dummy {f00=0x0008, f01=0x0190, f02=» W R &_ _ W W V 8! B V 9oP V 8 A V : W V < A 9a 4 48D 5 Z H W _t_vW W W W 4 V * +9A P X _ V V Q Q P A Y W _ Z _$ 4 A Z A ?A
0x019a50…019be4 Dummy {f00=0x0008, f01=0x0190, f02=» W W R _ _ W W R FW * R W @ * W 2 * 8 & W LM W 0 V P T _t IDENT PRNAME SEGMENTED PROGRAM.PLD COMMAND CANNOT BE USED WARNING:IDENT HAS BEEN PUNCHED ON OUTP
0x019be4…019d78 Dummy {f00=0x0008, f01=0x0190, f02=» 8 V : _ _$ _, _4 ( 8 R @W V : '( _& D5 LIBRARY R * | W V Yt R _ W _ _ N ! W N W W V W W W F R W W W W WH _ V V P T
0x019d78…019f0c Dummy {f00=0x0008, f01=0x0190, f02=» R W W W W W WF W 4 V # W V TV * R W W W$W W$ W _$ 8WP " 8WB W ` ( v R *T2 W W B W _ W 2 V : V P W _ W R _ _ _ _ _ W V 4 V
0x019f0c…01a0a0 Dummy {f00=0x0008, f01=0x0190, f02=»_$ V : _ _$ _, _4 ( 8 R @W V : '( _& D5 LIBRARY R * | W V Yt R _ W _ _ N ! W N W W V W W W R W W W W W _ V V P T
0x01a0a0…01a234 (0, 33) Opaque[0x194]
0x01a234…01a3c8 # DirEnt {nam=»CSEGA «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0110, f03=0x0000}
0x01a234…01a3c8 IdxSect {
0x01a234…01a3c8 f00 = 0x0008 // 0x1a234 @0x0
0x01a234…01a3c8 f01 = 0x0002 // 0x1a236 @0x2
0x01a234…01a3c8 gno = [ // 0x1a238 @0x4
0x01a234…01a3c8 [0x00]: C0x0008.0x2.0
0x01a234…01a3c8 ]
0x01a234…01a3c8 }
0x01a3c8…01a55c Dummy {f00=0x0008, f01=0x0190, f02=» W W N R %& 8 V : W W LW W W W W W W p R W W W W W _ W W W W W " R W W W W _ _ V T T( P + ( _ _ 4
0x01a55c…01a6f0 Dummy {f00=0x0008, f01=0x0190, f02=»+ ( W F L A F A F A 2 0*********DD: ********* 0*****GENERAL CATALOGUE***** 0****USERIDNT****ADDRESS**** W W W W " R W W W W V PJ N ! 4 # X R W W W W 0 I V D x R W W W W
0x01a6f0…01a884 Dummy {f00=0x0008, f01=0x0190, f02=» V A $ _ '( _. < W W 0 R W W W W + b W % W R W W W W | W W _$W W W W 4 W *P W R W W W W V 6R 9BR PtQ ( V 8 V : R < W
0x01a884…01aa18 Dummy {f00=0x0008, f01=0x0190, f02=»*****LIBRARY DIRECTORY********* 0****FILENAME****TYPE****ADDRESS**** 0****OBJECT MODULES****/OB 0 MODULE **USERIDNT****ADDRESS**** W W W W R W W W 0 A j A 4 W W N R W W W W R P* W _0
0x01aa18…01abac Dummy {f00=0x0008, f01=0x0190, f02=» j W W R W W W W A j A _ < Y Z < P2 Y < " Y Y W W R OB V 0 USERIDNT ADDR 0 FILENM TP ADDR V ! P : R W W W W O :11 W
0x01abac…01ad40 Dummy {f00=0x0008, f01=0x0190, f02=» TABLE Z < PCVEYAR EQU CVELFT+2 CURRENT YEAR, 2 ASCIL CHAR < PCVEMON EQU CVEYAR+2 CURRENT MONTH,2 ASCIL*CHAR N < PCVEDAY EQU CVEMON+2 CURRENT DAY, 2 ASCIL CHAR 4 PCVEHOR EQU CVEDAY+2 HOURS ] @ PCV
0x01ad40…01aed4 (0, 34) Opaque[0x194]
0x01aed4…01b068 # DirEnt {nam=»CSEGB «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0118, f03=0x0000}
0x01aed4…01b068 IdxSect {
0x01aed4…01b068 f00 = 0x0008 // 0x1aed4 @0x0
0x01aed4…01b068 f01 = 0x0002 // 0x1aed6 @0x2
0x01aed4…01b068 gno = [ // 0x1aed8 @0x4
0x01aed4…01b068 [0x00]: C0x0008.0x3.0
0x01aed4…01b068 ]
0x01aed4…01b068 }
0x01b068…01b1fc Dummy {f00=0x0008, f01=0x0190, f02=» 6 < r p W V TY 0 W W A B R W8W6W4W W2 V U. P* R R" V V W r R W W~W W W W W W V V P W W P P D P R W W W W V 0 V! R @ : : V R P0 T V
0x01b1fc…01b390 Dummy {f00=0x0008, f01=0x0190, f02=» V W R W W W W N W _~ | R W W W W WZ V V P T T P P W A W W V R T R W W:W W D W D B V V Ph W A UF
0x01b390…01b524 Dummy {f00=0x0008, f01=0x0190, f02=» 8 V : + W W N R WnW W WtWz V /OTh V B T^ W x R WDWpWnWl N " N /O BJ CT OB V R4 V P$ W ~ 8 : _ _ _ _( _0 "
0x01b524…01b6b8 Dummy {f00=0x0008, f01=0x0190, f02=» V Z V X W 4 V - N ! V # R _ W W R 4_ V P$ DEL OBDIR j n W | W < : W N " N /OBJCTOB W 0 V P4 P 8 L R 0W : OBJECT LIBRARY W
0x01b6b8…01b84c Dummy {f00=0x0008, f01=0x0190, f02=» R _D W C _ C _t W 6 R _hW W V T C $ R _ W _6 W _< : B V T C L R _* W C _ C f R _DW W W C C _$ DEL /OB W j n W | W < : N N R WbW W^W W LM 5 _" Pv '
0x01b84c…01b9e0 Dummy {f00=0x0008, f01=0x0190, f02=» : _2 _8 z R W WVW W , P P N O T O N V R V O P ( - Y ( | N N LM N O F T" V | ' O F P, . R W$W"W W _ O _ O _ W W W P ` 8 :
0x01b9e0…01bb74 (0, 35) Opaque[0x194]
0x01bb74…01bd08 # DirEnt {nam=»CSEGC «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0120, f03=0x0000}
0x01bb74…01bd08 IdxSect {
0x01bb74…01bd08 f00 = 0x0009 // 0x1bb74 @0x0
0x01bb74…01bd08 f01 = 0x0002 // 0x1bb76 @0x2
0x01bb74…01bd08 gno = [ // 0x1bb78 @0x4
0x01bb74…01bd08 [0x00]: C0x0009.0x0.0
0x01bb74…01bd08 ]
0x01bb74…01bd08 }
0x01bd08…01be9c Dummy {f00=0x0009, f01=0x0190, f02=» H V @ A A A A N R P 8 V V : N R W W W W ~ V V P T T P _` A F T 9C9nP 9aP F F " A R W W W W W V V P T T P P _ A ! P
0x01be9c…01c030 Dummy {f00=0x0009, f01=0x0190, f02=» R , _ , _ , , _* _._ _ _ _ R _ W W W T R _4W W W T & * Q * & + Y P8R. @ A ( A . 8@ 8` K (@ + Y @ K @ @ R _ W W W > V 4 P C Y
0x01c030…01c1c4 Dummy {f00=0x0009, f01=0x0190, f02=» + FIRST SECOND TYPE BUG W DEB A Z R W W W W , P P T W( V | LM N N F P W R W~W|WzWx D DEB LM 0 V P PZ 8 L R @ N W 0
0x01c1c4…01c358 Dummy {f00=0x0009, f01=0x0190, f02=»W # v R _:W W W C _r B " W 2 , N O O T V O O ( " ! " PROCESSOR SYSTEM USER Y P R @ A A 8@ 8` K (@ + Y @ K @ @ R _ W W W > V 4 P C Y
0x01c358…01c4ec Dummy {f00=0x0009, f01=0x0190, f02=» , ( V W R _ _^W _V UFW V , ( ! /O /ST SCW /L 4 , ( A LM W N " N d , ( a V Z V X W , ( 4 V - N ! V # , ( R _
0x01c4ec…01c680 Dummy {f00=0x0009, f01=0x0190, f02=» N /OBJCTOB W 0 V , ( ! P 8 $ , ( A R 0W : OBJECT LIBRARY W T , ( a 4 # , ( R W W W W W C _ W W , ( ( R *
0x01c680…01c814 (0, 36) Opaque[0x194]
0x01c814…01c9a8 # DirEnt {nam=»CSEGD «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0128, f03=0x0000}
0x01c814…01c9a8 IdxSect {
0x01c814…01c9a8 f00 = 0x0009 // 0x1c814 @0x0
0x01c814…01c9a8 f01 = 0x0002 // 0x1c816 @0x2
0x01c814…01c9a8 gno = [ // 0x1c818 @0x4
0x01c814…01c9a8 [0x00]: C0x0009.0x1.0
0x01c814…01c9a8 ]
0x01c814…01c9a8 }
0x01c9a8…01cb3c Dummy {f00=0x0009, f01=0x0190, f02=» " ~ z F L T X ` j t n W . R W W W|Wz W V W J R WhWfWdW Wx V V P T T PL PDWR W R W0W.W,W* F P W W0 W W W W W W W $ P 8 V : W V V # R
0x01cb3c…01ccd0 Dummy {f00=0x0009, f01=0x0190, f02=» ' + R _ W W2W W. V OBT$ G F >P _2 B T V UFP Wn R W^W W W K _< W V R W W V P $ P 8 W 2 W 2 : ( 8 R @ ,_ 0_4 , U T W C b R _. C C R
0x01ccd0…01ce64 Dummy {f00=0x0009, f01=0x0190, f02=» B V M R _ R 4_ V T. ON V W J R 4W 4 8 V C h R _R_ _ _ V * V K K K T R _ _ K V R$ R _ C B $ X _L =_R
0x01ce64…01cff8 Dummy {f00=0x0009, f01=0x0190, f02=»W W _ _ W W R W W W W W V W Q W Y , T W T : V P$ T MTP MLP TCP TKP TLP _F W R WBW W>W(WL W R4 W R* V ALT L T W _8 W R V _ W W W P j 8 : j P V V PlRv
0x01cff8…01d18c Dummy {f00=0x0009, f01=0x0190, f02=» _4 : ( R _ W _ W> B C C c # $ R W W W W V # ( : NO LABEL W j j ` R : : : : : R W W W W < V W , T : V P ( ( ) Y
0x01d18c…01d320 Dummy {f00=0x0009, f01=0x0190, f02=» ^ R _ h R _$W W _ ' R W ) Y R _DW W W R _ Y ( : V P T MTP MLP TCP TKP TLP _F W R W W W W W W R W R V ALT L T W _8 W R V _ W W W P 8 : j P V V P R
0x01d320…01d4b4 (0, 37) Opaque[0x194]
0x01d4b4…01d648 # DirEnt {nam=»CSEGE «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0130, f03=0x0000}
0x01d4b4…01d648 IdxSect {
0x01d4b4…01d648 f00 = 0x0009 // 0x1d4b4 @0x0
0x01d4b4…01d648 f01 = 0x000a // 0x1d4b6 @0x2
0x01d4b4…01d648 gno = [ // 0x1d4b8 @0x4
0x01d4b4…01d648 [0x00]: C0x0009.0x2.0
0x01d4b4…01d648 [0x01]: C0x0009.0x3.0
0x01d4b4…01d648 [0x02]: C0x000a.0x0.0
0x01d4b4…01d648 [0x03]: C0x000a.0x1.0
0x01d4b4…01d648 [0x04]: C0x000a.0x2.0
0x01d4b4…01d648 ]
0x01d4b4…01d648 }
0x01d648…01d7dc Dummy {f00=0x0009, f01=0x0190, f02=» #3` ' .z R W W W W W 8 t _ V V _$ , T _8 t A R W W W W _F _X V , X6 4 MT A R W W W W WD _ V CK V A R W W W W W 0 _ A @
0x01d7dc…01d970 Dummy {f00=0x0009, f01=0x0190, f02=» * A2 H . A2 H 2 A2 F ! P8 "# # C C ( B @ A3Z VW( @3 t Q W A & A * A 6_4 A 6 A . A A ( B ( B @ P( A ( ( ( B A
0x01d970…01db04 Dummy {f00=0x0009, f01=0x0190, f02=» T P A : P P + W W 0 N A A N C A A W T A L A _ W R _* W. @ T B @ L @ R X4 B L_@ T( &Q L M _ A A B @ C @
0x01db04…01dc98 Dummy {f00=0x0009, f01=0x0190, f02=» W A @ T @ C T W A W0 @ P< B L L ^ W @ T @ P ( B :_4 A A A A ( @ @ ( Y ( ( ( f ( A p 6
0x01dc98…01de2c Dummy {f00=0x0009, f01=0x0190, f02=» P : P $VTOC A W T A A _ W R _* W @ T B @ @ R X4 B _@ T &Q L M _ A A B @ C @
0x01de2c…01dfc0 Dummy {f00=0x0009, f01=0x0190, f02=» W A @ T @ C T W A W @ P B L L ^ W @ T @ P ( B :_4 A A A A ( @ @ ( Y ( ( ( ( A 6
0x01dfc0…01e154 (0, 38) Dummy {f00=0x0009, f01=0x0190, f02=» P : P $VTOC A W T A A _ W R _* W @ T B @ @ R X4 B _@ T &Q L M _ A A B @ C @
0x01e154…01e2e8 Dummy {f00=0x0009, f01=0x0190, f02=» W A @ T @ C T W A W @ P B L L ^ W @ T @ P ( B :_4 A A A A ( @ @ ( Y ( ( ( ( A 6
0x01e2e8…01e47c Dummy {f00=0x0009, f01=0x0190, f02=» P : P $VTOC A W T A A _ W R _* W @ T B @ @ R X4 B _@ T &Q L M _ A A B @ C @
0x01e47c…01e610 Dummy {f00=0x0009, f01=0x0190, f02=» W A @ T @ C T W A W @ P B L L ^ W @ T @ P ( B :_4 A A A A ( @ @ ( Y ( ( ( ( A 6
0x01e610…01e7a4 Dummy {f00=0x0009, f01=0x0190, f02=» P : P $VTOC A W T A A _ W R _* W @ T B @ @ R X4 B _@ T &Q L M _ A A B @ C @
0x01e7a4…01e938 Dummy {f00=0x0009, f01=0x0190, f02=» W A @ T @ C T W A W @ P B L L ^ W @ T @ P ( B :_4 A A A A ( @ @ ( Y ( ( ( ( A 6
0x01e938…01eacc Dummy {f00=0x0009, f01=0x0190, f02=» P : P $VTOC A W T A A _ W R _* W @ T B @ @ R X4 B _@ T &Q L M _ A A B @ C @
0x01eacc…01ec60 Dummy {f00=0x0009, f01=0x0190, f02=» W A @ T @ C T W A W @ P B L L ^ W @ T @ P ( B :_4 A A A A ( @ @ ( Y ( ( ( ( A 6
0x01ec60…01edf4 (0, 39) Dummy {f00=0x000a, f01=0x0190, f02=» P : P $VTOC A W T A A _ W R _* W @ T B @ @ R X4 B _@ T &Q L M _ A A B @ C @
0x01edf4…01ef88 Dummy {f00=0x000a, f01=0x0190, f02=» W A @ T @ C T W A W @ P B L L ^ W @ T @ P ( B :_4 A A A A ( @ @ ( Y ( ( ( ( A 6
0x01ef88…01f11c Dummy {f00=0x000a, f01=0x0190, f02=» P : P $VTOC A W T A A _ W R _* W @ T B @ @ R X4 B _@ T &Q L M _ A A B @ C @
0x01f11c…01f2b0 Dummy {f00=0x000a, f01=0x0190, f02=» W A @ T @ C T W A W @ P B L L ^ W @ T @ P ( B :_4 A A A A ( @ @ ( Y ( ( ( ( A 6
0x01f2b0…01f444 Dummy {f00=0x000a, f01=0x0190, f02=» P : P $VTOC A W T A A _ W R _* W @ T B @ @ R X4 B _@ T &Q L M _ A A B @ C @
0x01f444…01f5d8 Dummy {f00=0x000a, f01=0x0190, f02=» W A @ T @ C T W A W @ P B L L ^ W @ T @ P ( B :_4 A A A A ( @ @ ( Y ( ( ( ( A 6
0x01f5d8…01f76c Dummy {f00=0x000a, f01=0x0190, f02=» P : P $VTOC A W T A A _ W R _* W @ T B @ @ R X4 B _@ T &Q L M _ A A B @ C @
0x01f76c…01f900 Dummy {f00=0x000a, f01=0x0190, f02=» W A @ T @ C T W A W @ P B L L ^ W @ T @ P ( B :_4 A A A A ( @ @ ( Y ( ( ( ( A 6
0x01f900…01fa94 (0, 40) Dummy {f00=0x000a, f01=0x0190, f02=» P : P $VTOC A W T A A _ W R _* W @ T B @ @ R X4 B _@ T &Q L M _ A A B @ C @
0x01fa94…01fc28 Dummy {f00=0x000a, f01=0x0190, f02=» W A @ T @ C T W A W @ P B L L ^ W @ T @ P ( B :_4 A A A A ( @ @ ( Y ( ( ( ( A 6
0x01fc28…01fdbc Dummy {f00=0x000a, f01=0x0190, f02=» P : P $VTOC A W T A A _ W R _* W @ T B @ @ R X4 B _@ T &Q L M _ A A B @ C @
0x01fdbc…01ff50 Dummy {f00=0x000a, f01=0x0190, f02=» W A @ T @ C T W A W @ P B L L ^ W @ T @ P ( B :_4 A A A A ( @ @ ( Y ( ( ( ( A 6
0x01ff50…0200e4 Dummy {f00=0x000a, f01=0x0190, f02=» P : P $VTOC A W T A A _ W R _* W @ T B @ @ R X4 B _@ T &Q L M _ A A B @ C @
0x0200e4…020278 Dummy {f00=0x000a, f01=0x0190, f02=» W A N " N M:PROCUF W 0 V T W 4 P ) Y : ( R @W j W | H W (" . _ 4 P ' (D R W W W WxW P W 4 4 P _ V ~T j ( R * ) ' ( R W W W W$W P W END 4
0x020278…02040c Dummy {f00=0x000a, f01=0x0190, f02=»)` 8W W 2 W 2 O : 8_ )l 8_. PROCEDURE IN PROCEDURE DEFINITION z ) W r ) . W V ~R ) - W Wx ) * W| V x =Td ) . WZ V ~ QP ) * WT 5 V x ,X` T0WV V ~ P ~ V r ( P 5
0x02040c…0205a0 Dummy {f00=0x000a, f01=0x0190, f02=» W v H % Y j P ) Y j # * R W W W WlW P W 4 H ( * R FWj_ )( )l ~ h J ( I +6 R W2_ _ _ ~ 8 *| + 8 )( END MISSING 8 )( + ~ H j 4 ( % Y _
0x0205a0…020734 (0, 41) Dummy {f00=0x000a, f01=0x0190, f02=» + , - W 4 4 ,0 . _ Y V x ,D R WJW6 =P _ ,X R W ,b R W,W ,n R W ,x R W W _ , . W + +x T" , . W + ! + _* W , R W , . W _ ( , R W _ _ _ *| +j V x =P - R W W8_ - R W - R
0x020734…0208c8 Dummy {f00=0x000a, f01=0x0190, f02=» 2 , U O O : W p z ~ 4 T V p $T - R *P - - _2 - V p 4 P : V t V vP % W t W p W ~ W .< R W$ .F R W&W$ =P W ~ V ~Z( 5 _. V ~Q V p W x V p , P P P V
0x0208c8…020a5c Dummy {f00=0x000a, f01=0x0190, f02=» T W P HWr A A ! 9A A A @ ( t <W: & @ Q .X T @ x A P _ N ?a A A A N A N ! A " A @ P A @ @ Z O W O O T _ N T: @
0x020a5c…020bf0 Dummy {f00=0x000a, f01=0x0190, f02=» @ 87P P D b 8 :EOVP ZLW$ $ A v A _r P W R W N t N T T @ NOT ( Jp T q r 9D 9B W 9E A A _r p <A B Y A
0x020bf0…020d84 Dummy {f00=0x000a, f01=0x0190, f02=»ADDRESS : DISK I/O ERROR MAG TAPE I/O ERROR END OF RESTORING UNKNOWN ADDRESS COPIED DISK VOLUME LABEL : A P _ N ?a A A A N A N ! A " A @ DATE OF COPY : 01 01 78 WRITING THE VOLUME LABEL ? . CO
0x020d84…020f18 Dummy {f00=0x000a, f01=0x0190, f02=» X : P***DAY EQU 32 CURRENT DAY, 2 ASCII CHAR 2 P***HOR EQU 34 HOURS, ^ F @ P***MIN EQU 36 MINUTES ^ BINARY VALUES | 2 P***SEC EQU 38 SECONDS ^ 2 P***FIT EQU
0x020f18…0210ac Dummy {f00=0x000a, f01=0x0190, f02=» | P***DMP EQU 48 * PCVEDP EQU 50 DADCT-POOL $ P EJECT R P* h * P* CCI WORK AREA EQUIVALENCES r P* P* ROOT WORK AREA P* P* NOTE '**'='W:' L P**DFRE EQU 0
0x0210ac…021240 Dummy {f00=0x000a, f01=0x0190, f02=» J P**SFRE EQU 2 ABSOLUTE SECTOR ADDR OF THE SECTOR WHERE F P* THE 1ST FREE ENTRY OF CAT OR DIR IS R 6 PW:DEC1 EQU 4 DISK ECB1 , 6 WORDS 6 P**DEC2 EQU W:DEC1+12 DISK ECB2 , 6 WORDS
0x021240…0213d4 (0, 42) Opaque[0x194]
0x0213d4…021568 # DirEnt {nam=»PRDUMP«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0158, f03=0x0000}
0x0213d4…021568 IdxSect {
0x0213d4…021568 f00 = 0x000a // 0x213d4 @0x0
0x0213d4…021568 f01 = 0x0006 // 0x213d6 @0x2
0x0213d4…021568 gno = [ // 0x213d8 @0x4
0x0213d4…021568 [0x00]: C0x000a.0x3.0
0x0213d4…021568 [0x01]: C0x000b.0x0.0
0x0213d4…021568 [0x02]: C0x000b.0x1.0
0x0213d4…021568 ]
0x0213d4…021568 }
0x021568…0216fc Dummy {f00=0x000a, f01=0x0190, f02=» & A @ x D A D A D A D A @ @ @ @ W" @ T @ A A _< @ A @ A @ @ @ @ W $ | @ A A < @ FDT T T W R T T @
0x0216fc…021890 Dummy {f00=0x000a, f01=0x0190, f02=» @ _ @ @ T @ P ^ A @ z @ Pl @ x A x * @ @ @ T A @ |P @ ~T ^ @ A @ A @ T @ @ P ^ @ @ X | ` ^ D)hH P D >~ `" f >~ $ d p 4d @u { H
0x021890…021a24 Dummy {f00=0x000a, f01=0x0190, f02=»AST AREAEN REVLOP N DMP1 RET1 h NDLOC1 LOCEOF RET2 EXIT $ LOOP CASTST yERR yEOF DMP25 DMP3 > RET3 & RET6 8 DLLOOP Z JMP2 v RET4 OFLOP1 JMP1 RET5 , NUMEOF EOF1 OFLTST OFLOP2 $ C C ( : $ - -
0x021a24…021bb8 Dummy {f00=0x000a, f01=0x0190, f02=» @ 4 Y : T @ " p 0 5 0 P R D U M P REL 10.0 5 ==================== K 0 PRINTOUT OF MEMORY DUMP FROM F L E X I B L E - DISC
0x021bb8…021d4c Dummy {f00=0x000a, f01=0x0190, f02=»E EDITDT EDLOOP DATFLD SLASK CVALOP TIMFLD DAYLOP > TITWRT f NEWMOV Z TXTCAS CASFLX R TITECB TITLNO TITTAB TITLOP t PRTR TXT1 TXT6 TXT7 TXT11 " TXT9 p TXT10 9 $ Y :0123456789ABCDEF
0x021d4c…021ee0 Dummy {f00=0x000a, f01=0x0190, f02=» - f ( : r P XLOOP HEXDIG LINE t NILOC WXLOOP WXL001 ( WALOOP < WADOT J WASCR L LINECB f PRTFC @ TKT D E ~ ^ @ j A j T l( :
0x021ee0…022074 (0, 43) Dummy {f00=0x000b, f01=0x0190, f02=» C A S E T T E ADDPAG @ NEWMOV 4 TXTCAS PAGTXT x PAGENO j PNOFLD PAGECB l SPAECB PRTR SPATXT ; ; ; ; ; ; R Q @ - WL @ - A R* X R X _ Q @ X" A T - _0 D - Z
0x022074…022208 Dummy {f00=0x000b, f01=0x0190, f02=» J 6 @ NOP YE , @ S P _8 A ~ A : $ J 6 @ NOT@ A A A A @ |T A @ ~P A A zW YE l @ S v A z A x A z @ z @ U d WJ @ z _ T J J
0x022208…02239c Dummy {f00=0x000b, f01=0x0190, f02=» !00T !00T @ ~P @ @ !00P !00P @ W x S @ 9H @ @ :H @ $Wf S @ WR S @ 9H @ @ :H @ $W4 S R R R R W r @ x A x A A A A A A A A A A C C ( @ $
0x02239c…022530 Dummy {f00=0x000b, f01=0x0190, f02=» C C ( : I : @ FDP 8 ( J 6 @ YE : @ S D A G T :R Q Z [ Z [ : R W U Z [ : A L 0R 4V 0 Z [ : A A " L 0R,
0x022530…0226c4 Dummy {f00=0x000b, f01=0x0190, f02=» CASETTE: E1; FLOPPY: F4 - F7; ANSWER 00000-FFFFF D f * D ANSWER NOT 11 CHARACTERS &IF AREA 1 ANSWER CAN NOT BE ONLY "CR" 6:TH CHARACTER NOT A HYPHEN "-" ,IF ONE SIDE ENDADR MUST BE LESS THEN 0FFFF .IF ONE SIDE STARTADR MUST BE LESS
0x0226c4…022858 Dummy {f00=0x000b, f01=0x0190, f02=»F STARTADR NOT HEXADECIMAL ENDADR NOT HEXADECIMAL ENDADR LESS THEN STARTADR : R W 6 0PRDUMP REL 10.0 DATE 80.03.14 12NC=8701 359 41000 # SELECTIO
0x022858…0229ec Dummy {f00=0x000b, f01=0x0190, f02=» SIDE1 (0-63K) ? INSERTED SIDE2 ? A ( A * @ A 8 , ! T ( @ * 8 , @ * P 8 , @ ( A ( A * @ FDP 1 ( V , @ (& T ( n @ * T 4 -
0x0229ec…022b80 Dummy {f00=0x000b, f01=0x0190, f02=» Z , : HEX 0END OF PRDUMP 0FINIS. ( 0THERE WAS BLOCKS/SECTORS IN DUMP. 0XX ERROR STATUS WORD: 0 0INPUT-DEVICE MUST BE CASSETTE OR FLEXIBLE-DISC NOT OPERABLE D 0REQUESTE
0x022b80…022d14 (0, 44) Dummy {f00=0x000b, f01=0x0190, f02=» FDP @ C ( A @ T A A @ FDT THW RB _^ @ FDP @ C ( A @ T A A W W : @ T` B @ FDT P W V A ( @ C @ FDP ( @ A @
0x022d14…022ea8 Dummy {f00=0x000b, f01=0x0190, f02=» ( : J 6 @ ? T n_< D @ T$ D - - - D - : D :_zE1TK F4FD F5FD F6FD F7FD FILECODE: ASSETTE OR FLEXIBLE-DISC NOT OPERABLE D 0REQUESTE
0x022ea8…02303c Dummy {f00=0x000b, f01=0x0190, f02=» FDP @ C ( A @ T A A @ FDT T W R _^ @ ( A @ T A A W W : @ T B @ FDT P W V A ( @ C @ FDP ( @ A @
0x02303c…0231d0 Dummy {f00=0x000b, f01=0x0190, f02=»ASKFL QE1 QF4 QF5 QF6 QF7 ECBFC ECBBA ECBRL ECBEL ECBRC ECBCW1 ECBCW2 BUFF1 INLOOP INLAST SECTOR NILOC1 CTEST1 INEOF yOK1 NILOC2 INRTN * LASTBU EOFCND GETRTN CTEST2 ` WAIT j ERR2 d NILOC3 REWRTN
0x0231d0…023364 Dummy {f00=0x000b, f01=0x0190, f02=»1 LINK1 BUFF2 BUF2 LINK2 T A A @ FDT T W R _^ @ ( A @ T A A W W : @ T B @ FDT P W V A ( @ C @ FDP ( @ A @
0x023364…0234f8 Dummy {f00=0x000b, f01=0x0190, f02=»CTER p P SLL A1,8 ( P LC A1,SELBUF+8 GET THIRD CHARACTER ( P LC A2,SELBUF+9 GET FOURTH CHARACTER J P SLL A2,8 v ( P LC A2,SELBUF+/A GET FIFTH CHARACTER 4 P CF A14,HXBIN2 CONVERSION FROM STRING TO BINARY & P RF SERR9 ERROR RETURN FROM
0x0234f8…02368c Dummy {f00=0x000b, f01=0x018e, f02=» LD A1,0,A12 GET FIRST PART OF START ADDRESS . P LD A2,4,A12 GET FIRST PART OF END ADDRESS 4 " P CF A14,ADCMP1 COMPARE ADDRESS f 0 P LD A1,2,A12 GET SECOND PART OFSTART ADDRESS , P LD A2,6,A12 GET SECOND OF END ADDRESS $ P CF A14,ADCMP2 COMPARE A
0x02368c…023820 Dummy {f00=0x000b, f01=0x0190, f02=» 0 P* INCREMENT POINTER TO ADDRESS-FIELD TABLE, ( P* AND GO TO SELECTION OF NEXT AREA. 8 P* d P LD A1,TABREF n P ADK A1,8 P ST A1,TABREF P ABL SELLOP P EJECT P* . P* SUBROUTINE TO PRINT A LINE TO TELL WHAT &
0x023820…0239b4 (0, 45) Opaque[0x194]
0x0239b4…023b48 # DirEnt {nam=»DMPGEN«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0170, f03=0x0000}
0x0239b4…023b48 IdxSect {
0x0239b4…023b48 f00 = 0x000b // 0x239b4 @0x0
0x0239b4…023b48 f01 = 0x0002 // 0x239b6 @0x2
0x0239b4…023b48 gno = [ // 0x239b8 @0x4
0x0239b4…023b48 [0x00]: C0x000b.0x2.0
0x0239b4…023b48 ]
0x0239b4…023b48 }
0x023b48…023cdc Dummy {f00=0x000b, f01=0x0190, f02=» ( d ( d ( d ( d ( d( d ( ( B T `T : f 0 T T B P D D W* B P 0 0
0x023cdc…023e70 Dummy {f00=0x000b, f01=0x0190, f02=» 4c @S{ D d 2Z $"z y B % y D Dbf d j 0TK ERROR 6 0DMPGEN REL 10.0 DATE 80.03.14 12NC=8701 361 41000 WRITE PROTECTED NOT OPERABLE STATUS WORD: $ A. A
0x023e70…024004 Dummy {f00=0x000b, f01=0x0190, f02=» V @ W @ A @ @ UU A @ T P A x _ W _ K _ A K : T `T : B P W B UU
0x024004…024198 Dummy {f00=0x000b, f01=0x018c, f02=» PDUMP80 SST A3,CHCR * P RB(NA) DUMP60 TRY OTR IF NOT ACCEPTED " P P & PERRORD LDK A1,/02 IND ERROR ON SOP X P RB DUMP10 P P* ( P* EXCOM SUBR TO EXECUTE CHCR COMMAND P* P PEXCOM CIO A1,1,CHCR P SST A3,
0x024198…02432c Dummy {f00=0x000b, f01=0x2008, f02=» DUMP80 SST A3,CHCR * P RB(NA) DUMP60 TRY OTR IF NOT ACCEPTED " P P & PERRORD LDK A1,/02 IND ERROR ON SOP X P RB DUMP10 P P* ( P* EXCOM SUBR TO EXECUTE CHCR COMMAND P* P PEXCOM CIO A1,1,CHCR P SST A3,
0x02432c…0244c0 Dummy {f00=0x000b, f01=0x018e, f02=»YS SET TO 1 BY DRIVER DRTC02 TO INDICATE I/O-ERROR, AND @ P* BITS 2-15 ARE THE EXACT BIT-CONFIGURATION RETURNED BY THE @ P* CASSETTE HARDWARE. P* P EJECT P* > P* CASSETTE SOFTWARE-STATUS BITS, RETURNED BY DRIVER DRTC02 P*
0x0244c0…024654 (0, 46) Opaque[0x194]
0x024654…0247e8 # DirEnt {nam=»XRF «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0178, f03=0x0000}
0x024654…0247e8 IdxSect {
0x024654…0247e8 f00 = 0x000b // 0x24654 @0x0
0x024654…0247e8 f01 = 0x0002 // 0x24656 @0x2
0x024654…0247e8 gno = [ // 0x24658 @0x4
0x024654…0247e8 [0x00]: C0x000b.0x3.0
0x024654…0247e8 ]
0x024654…0247e8 }
0x0247e8…02497c Dummy {f00=0x000b, f01=0x0190, f02=» 8 8 P )I w x b # g $ ^ : 9 i $ 7 f w |4r tV u ' qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ ' 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x02497c…024b10 Dummy {f00=0x000b, f01=0x0190, f02=» RLINES INPUT. 1XRF 10.0 CROSS REFERENCE LISTING OF MODULE: &&&&&& DATE: YYMMDD PAGE: 0 SYMBOL DEF REFERENCES NO MORE SPACE AVAILABLE 0RESTARTED AFTER MEMORY OVERFLOW v P jW ( R ( @ R$ # " P
0x024b10…024ca4 Dummy {f00=0x000b, f01=0x0190, f02=»' X )R X*_ (" X, E PP _ D # P : A @ ( ? (T , ) , ( T ( )T ) P 4 @ ( BOT ( OLP @ : Q A > @ ( *P H ( CT A > ( CT A > : 9a : @ x! RP$ @ A9Q A1R Q
0x024ca4…024e38 Dummy {f00=0x000b, f01=0x0190, f02=»_( W @ 7 @ 7 W 7 : V * J R K W _$ _4 !A ZH !Z YN R ) 0 !' X` ! P !, P !+ P !- P !0 Z< !: YB_8 [ : . @ D :a A : A D 1 ( @ !
0x024e38…024fcc Dummy {f00=0x000b, f01=0x0190, f02=» : @ >Q W ! X 0 ! Xf_ !' T ! Xx !, X" !+ X( !- X. 0_ F( C R8Q> F l C ( C D E ^ _X 0 A " : R / *^ * !0 P P ' Y$ : A A (
0x024fcc…025160 Dummy {f00=0x000b, f01=0x0190, f02=» T W& *** . R Q + G Tl H r @ < 0 A @ z A $ F( @ P A H " A J F( A H C ( @ x' U A x_ gZ H_ ( P !+ P !- P !0 Z< !: YB_8 [ : . @ D :a A : A D 1 ( @ !
0x025160…0252f4 (0, 47) Opaque[0x194]
0x0252f4…025488 # DirEnt {nam=»DMPGEF«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0180, f03=0x0000}
0x0252f4…025488 IdxSect {
0x0252f4…025488 f00 = 0x000c // 0x252f4 @0x0
0x0252f4…025488 f01 = 0x0002 // 0x252f6 @0x2
0x0252f4…025488 gno = [ // 0x252f8 @0x4
0x0252f4…025488 [0x00]: C0x000c.0x0.0
0x0252f4…025488 ]
0x0252f4…025488 }
0x025488…02561c Dummy {f00=0x000c, f01=0x0190, f02=» L ( ( ( J @ ? T ^_< D @ T D -W D $_d ( @ " Pf $ @ ( @ 4 ( 4 @ " P ( 4 ( $ C C
0x02561c…0257b0 Dummy {f00=0x000c, f01=0x0190, f02=» $ ( ( : FLOPPY: FD1 - FD4 n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` 0FL ERROR 6 0DMPGEF REL 10.0 DATE 80.03.14 12NC=8701 376
0x0257b0…025944 Dummy {f00=0x000c, f01=0x0190, f02=» l ~ UU ' &P _ A. A I. L A 9 Z F. " :D # P& W W t W t W W W W W Th T TRWH ) T _ r v A T L :L W A 8B Tt A L : @ @
0x025944…025ad8 Dummy {f00=0x000c, f01=0x0190, f02=» &b CCn 1 d J < R:R: ` 0FL ERROR 6 0DMPGEF REL 10.0 DATE 80.03.14 12NC=8701 376
0x025ad8…025c6c Dummy {f00=0x000c, f01=0x018e, f02=»NUMBER (LEAST SIGNIFICANT BIT) P* BIT 10: RETRY & P* BIT 11: PROGRAM ERROR > P* BIT 12: INCORRECT LENGTH ^ P* BIT 13: DATA FAULT P* BIT 14: ZERO P* BIT 15: NOT OPERABLE DRIVE P* P* H P*SIGNIFICANT BITS IN STATUS RE
0x025c6c…025e00 Dummy {f00=0x000c, f01=0x018e, f02=» 6 PDUMPFD EQU * FIRST BYTE TO BE LOADED BY BOOTSTRAP * P DATA ' ' UNUSED DISC-FORMAT BYTES > P l PEXEC EQU * START ADDRESS t P LDR A13,P PROGRAM POINTER PBASE EQU * 4 P SUKL A13,BASE-DUMPFD A13:= DUMPFD START ADDRESS P P
0x025e00…025f94 (0, 48) Opaque[0x194]
0x025f94…026128 # DirEnt {nam=»CPLGEN«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0188, f03=0x0000}
0x025f94…026128 IdxSect {
0x025f94…026128 f00 = 0x000c // 0x25f94 @0x0
0x025f94…026128 f01 = 0x0002 // 0x25f96 @0x2
0x025f94…026128 gno = [ // 0x25f98 @0x4
0x025f94…026128 [0x00]: C0x000c.0x1.0
0x025f94…026128 ]
0x025f94…026128 }
0x026128…0262bc Dummy {f00=0x000c, f01=0x0190, f02=» L f N( N ( N Z( N ( N( B T `T : ~ f ~ r f r Z( ( $ C C ( : 9 $ Y :0123456789ABCDEF ^ lFZF H 2 Z j z
0x0262bc…026450 Dummy {f00=0x000c, f01=0x0190, f02=» 0TK ERROR 4 0CPLGEN REL 10.0 DATE 80.03.14 12NC=8701 363 41000 STATUS WORD: [ A P UU x ' &P _ B A. R:R: ` T l` % l` ;d# A I T P^ 1 I T: P 0V W XB X"9A_
0x026450…0265e4 Dummy {f00=0x000c, f01=0x0190, f02=» & P* CASSETTE STATUS BITS. GENERAL. P* . 6 P* HARDWARE STATUS IS RETURNED BY DRIVER DRTC02 IF 8 H P* AT LEAST ONE OF THE STATUS BITS 6, 12-15, RETURNED BY THE CASSETTE r 8 P* HARDWARE, IS SET TO 1, THUS INDICATING I/O-ERROR, : P* ELSE I/O IS
0x0265e4…026778 Dummy {f00=0x000c, f01=0x0190, f02=»S, r P* RETURNED BY DRIVER DRTC02 P* . P* BIT 0: 1 8 P* BIT 1: ZERO L P* BIT 2: BOT MISSING b P* BIT 3: TAPE-MARK DETECTED P* BIT 4: NO DATA/ERASED P* BIT 5: BOT/EOT-HOLE P* BIT 6: WRITE PROTECTED P* BI
0x026778…02690c Dummy {f00=0x000c, f01=0x018e, f02=»11: ZERO P* BIT 12: INCORRECT LENGTH P* BIT 13: CRC-ERROR 2 P* BIT 14: THROUGHPUT ERROR N P* BIT 15: NOT OPERABLE p P* P* @ P* IN HARDWARE STATUS,RETURNED BY DRIVER DRTC02, BIT ZERO IS B P* ALWAYS SET TO 1 BY DRIVER DRTC02
0x02690c…026aa0 Dummy {f00=0x000c, f01=0x0190, f02=» P EJECT P* > P* CASSETTE SOFTWARE-STATUS BITS, RETURNED BY DRIVER DRTC02 P* b P* BIT 0: ZERO l P* BIT 1: ZERO P* BIT 2: ZERO P* BIT 3: ZERO P* BIT 4: ZERO P* BIT 5: ZERO P* BIT 6: ZERO P*
0x026aa0…026c34 (0, 49) Opaque[0x194]
0x026c34…026dc8 # DirEnt {nam=»SUP800«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0190, f03=0x0000}
0x026c34…026dc8 IdxSect {
0x026c34…026dc8 f00 = 0x000c // 0x26c34 @0x0
0x026c34…026dc8 f01 = 0x0012 // 0x26c36 @0x2
0x026c34…026dc8 gno = [ // 0x26c38 @0x4
0x026c34…026dc8 [0x00]: C0x000c.0x2.0
0x026c34…026dc8 [0x01]: C0x000c.0x3.0
0x026c34…026dc8 [0x02]: C0x000d.0x0.0
0x026c34…026dc8 [0x03]: C0x000d.0x1.0
0x026c34…026dc8 [0x04]: C0x000d.0x2.0
0x026c34…026dc8 [0x05]: C0x000d.0x3.0
0x026c34…026dc8 [0x06]: C0x000e.0x0.0
0x026c34…026dc8 [0x07]: C0x000e.0x1.0
0x026c34…026dc8 [0x08]: C0x000e.0x2.0
0x026c34…026dc8 ]
0x026c34…026dc8 }
0x026dc8…026f5c Dummy {f00=0x000c, f01=0x0190, f02=»VT ? 2 :7 &| _ <
0x026f5c…0270f0 Dummy {f00=0x000c, f01=0x0190, f02=»
0x0270f0…027284 Dummy {f00=0x000c, f01=0x0190, f02=» VT$ l ~ /^1*> B<! 0!p"T=B<L !$/^ AZDM9 MC= HD8 WM9`RY:tRD:tAS; AB= PS=,RS=z & TY J& LP ( DK LP
0x027284…027418 Dummy {f00=0x000c, f01=0x0190, f02=» DK ) Ef T ? ? ? ? ? ? ? ' ? ? ? ? ? ? ? ) Z , Z b
0x027418…0275ac Dummy {f00=0x000c, f01=0x0190, f02=» Z L f : Z r f p ? ? ? ? ? ? ? R ? ? ? ? ? ? ? F R ? ? ? ? ? ? ? I ? ? ? ?
0x0275ac…027740 Dummy {f00=0x000c, f01=0x0190, f02=» r & L 6 6
0x027740…0278d4 (0, 50) Dummy {f00=0x000c, f01=0x0190, f02=» 6 6 6 6
0x0278d4…027a68 Dummy {f00=0x000c, f01=0x0190, f02=»
[…0x4…]
0x0280b8…02824c Dummy {f00=0x000c, f01=0x0190, f02=» 6
0x02824c…0283e0 Dummy {f00=0x000c, f01=0x0190, f02=»
0x0283e0…028574 (0, 51) Dummy {f00=0x000d, f01=0x0190, f02=»
[…0x3…]
0x028a30…028bc4 Dummy {f00=0x000d, f01=0x0190, f02=» L
0x028bc4…028d58 Dummy {f00=0x000d, f01=0x0190, f02=»
[…0x1…]
0x028eec…029080 Dummy {f00=0x000d, f01=0x0190, f02=» @ _ ? ? ? ? ? ? ? A R2 @ A A R$ A A R A A R A @ 8 > > > > > > > > ? ? ? ? ? ? ? U ^ ( H ( P < _ Q
0x029080…029214 (0, 52) Dummy {f00=0x000d, f01=0x0190, f02=»% _ @ A ^ 9j ?R > > > > > > > A @ E E E E E E > > a @ E @ ? ? > P P Q P ! P @ ! ? @ P W $ < @ @ 9a:a R0 Q Q" ?A <P @
0x029214…0293a8 Dummy {f00=0x000d, f01=0x0190, f02=» @ ;a=a R W* @ =a Z ;a RP ) i " E $ @ ;a=a R @ =a V ;A , P = - - _F @" L < 0 @ @ PR 0=a @ ?a RX @ ?a VN=A 0 ( P>P< , T T 1W 1W T )W )W ( , _ C
0x0293a8…02953c Dummy {f00=0x000d, f01=0x0190, f02=»W U, @" x # W @" A" ,P$ _: @" @" @" @" @" @" _ A" A" A" A" A" A" B A$ A" B :a Y B R A" _ @" # W4 @" A" ,Xp _ < @ A$ A$ A$ A$ A$ A$ A$ $"
0x02953c…0296d0 Dummy {f00=0x000d, f01=0x0190, f02=» x @" 8R P =A_ %_ XJ _ P0 @ !@T @ @ R < E A A ^ 9j =Q > > > > > > > > P @ !@ &l @ P @ X0 , &l A _< U` A% @ , L ? ? , L L L L L L ? ? ? ? ? ? ?
0x0296d0…029864 Dummy {f00=0x000d, f01=0x0190, f02=» ? A > @ P ,V$ A % @ 9 % T A T @ &z ? ? >_ ? ? ? ? ? ? ? Q _ ^ ( H & W '~ W ' X I I R P8 X B$P B*T Y Y W x Y Y $ 0T W W ,^ X ? ? ? ? ? ? ? '0 - X #?
0x029864…0299f8 Dummy {f00=0x000d, f01=0x0190, f02=» ? ? ? ? ' - ? ? ? ? ? ? ? ' - (@_~ + X R Y _ X D $! TR ? ? ? ? ? ? ? ( . 8 M ? ? ? ? ? ? ? (> - % > > > > > > > > ? ? ? ? ? ? ? (j . P X - - ( * 8 TRT X + + ? ? + Pl
0x0299f8…029b8c Dummy {f00=0x000d, f01=0x0190, f02=»B$P B*T" Y 0 Y Y X Q Y _ X X X U 5 X E _ X 4 Y 5 X 4 Y ! 1P, 0P +P Q Q W W Q Q R P Q 5 Y ( ? ? ? ? ? ? ? ) . Qv ) * " PF X Q< X P P ? ? ? ? ? ? ? **
0x029b8c…029d20 Dummy {f00=0x000d, f01=0x0190, f02=» - Y Y X X T ? ? ? ? ? ? ? * - > > > > > > > > ? @ ? > X B A* B (@ $ X X W W $ # C C P L L m A , DKP L X X L ! X L P L @ _ C C # $ _R _ _ _
0x029d20…029eb4 (0, 53) Dummy {f00=0x000d, f01=0x0190, f02=» R X + ! X Y T T Y Y Y Y Y U U X @ _ X X X X P,~, , -0, P $ Y Y Y Y > * Y 8 TPP" X R 8 TYX WH H, Y _8 X X: X R X ( _$ _* $ XtRX P Y _ A-& X
0x029eb4…02a048 Dummy {f00=0x000d, f01=0x0190, f02=» A-& ZrP Y _8 _< _@ ! * ! X M A- T S * X X B A- P X $ ,^_" B W B W A W I W J X %?W X %? A.4 A.8 > > > > > > > .6 V <a W X ' ?A q A. > > > > > > > .
0x02a048…02a1dc Dummy {f00=0x000d, f01=0x0190, f02=»% T> L % T6 L % T. L %?P& P" L % - A/-M T % T L T 4 L R % _X R _ 1 @ M " L '? L U "T 6 WP T 7 WF T 6 / 0`/ / 0`0`/ / / / 0`/ / 2v W* 3 W" 2v W 5 L :AR| M W M M 4 L T
0x02a1dc…02a370 Dummy {f00=0x000d, f01=0x0190, f02=» L 9JR@ P P T 7 5 U P T Q P P W Q P T@(@ L D " Q L Q Q L Q L ( L ! TNW P T P P W Q L ' - P p Y "(@ P P $ M 0r P ( M P Q P P P W P T Q
0x02a370…02a504 Dummy {f00=0x000d, f01=0x0190, f02=» M (@ L 2 7 T R Q @ ] 7 > 9C 9C > ^ U (@ L T U U U M L M L M M L 4 0r L 7 ! :c:A 7 L T V P T"W L >F 7 L & 7 2v M 4 1 M L M L " P M 2 0r M L M
0x02a504…02a698 Dummy {f00=0x000d, f01=0x0190, f02=»! XfWn L M L M M 3 0r L :c:A L D V D M L ! T*_ L < 7 < R M M "W 3 M 4 1 L E M L "! 7 L 2 L T L P L D Q 4( M 2 2 L L $:BV W $:AV M " M 7j L L $ M 0 D L U M "
0x02a698…02a82c Dummy {f00=0x000d, f01=0x0190, f02=» L L R $ 9 _ R $ 9 M , L M M M M M ( M ( M 0 M 0 L D L Z L L *R L * L P( ' P 5 R 5 _ T 5 M , M L L , U 7 L 7 L U 5 M 2 2 L M $ L M & L L I P0% P L X =h
0x02a82c…02a9c0 Dummy {f00=0x000d, f01=0x0190, f02=» L . P M . 6 M 2 2 L U 6 M 2 2 L L L & ) L $ I L M L L U M 7 @ M L M M M W L 7 @ M M ( L P0W" M L 7 @ M ( L U 7. M 2 2 L L ( E L % E L E L E M
0x02a9c0…02ab54 (0, 54) Dummy {f00=0x000d, f01=0x0190, f02=» L L ? ? ? ? ? ? ? M.A A ? 4 R W 7 @ Q 8 8 8 8 8 ? 7 5 8 ( "^ 9 ( "^ 5 9 $ @9 b 4T W j b H bP H d _ A8 8 A? 5 T6 @? P ? 8 8 8 8 8 @? A? A8 $ 5 4 X _8 8
0x02ab54…02ace8 Dummy {f00=0x000d, f01=0x0190, f02=» L . P M . 6 M 2 5 8 @l @R 8 P @l - _ 8 5 @l @R @l @R* :a;a 8 :A ;A > 8 T :> 0P :TY _ 1 X 1 9 :cW8 9 :^ X W* 8 A:^ T A:n :j(@( * + : 0 :R - Y
0x02ace8…02ae7c Dummy {f00=0x000d, f01=0x0190, f02=»! R V Y A; 8 TKP Y LPP MTP Y Y T T Y Y U U 0!? 5T W 1 Q TKP MTT Y P ; Y (@ 8 P Q 1 8 + X X ? ? ? ? ? ? ? ; .:_ 5 @l 8 @ l Q mP P lT Z 8 W P l
0x02ae7c…02b010 Dummy {f00=0x000d, f01=0x0190, f02=» L 0AB CD ADDR @ 9a:a;a R R A<| <~ A? _ $ _ P A @? P$ @<| = ^ ] ] @<~ _ A? $ = <0 A _ = @ 0 9U A<B <F V <2 ( "^ = = @ @ A @ !? T A ? _* 5 @? 8 @ A
0x02b010…02b1a4 Dummy {f00=0x000d, f01=0x0190, f02=» R: P @l R( > ( "^ > ^ @ T = ( "^ 8 8 = I/0 ERROR 5> W 1 1 A9 A? A? > A> A9 9 V 9 , PP , X QD V > Y , V > Z H @? P : > ` : 9 I V _* A
0x02b1a4…02b338 Dummy {f00=0x000d, f01=0x0190, f02=» A A A A? A? A? a ?T @ ? ? > P :b" Q P T4 P Q Q @ @ @ @ Y Y Y Y P AAX ( Qh Q P( @ @ @ @ Y Y Y Y " A "; V W # @ A A? @ ? ? > Q
0x02b338…02b4cc Dummy {f00=0x000d, f01=0x0190, f02=» : 8 P R( A@ A@ A@ A@ A@ A@ A@ @ ,:j Z ( I ^ - ^ *@9J M @ @@ @@ @@ @@ @@ @@ @@ @ ? ? ? ? ? ? ? @ $ < @ B @ 9a:a R @ @AX @ !` # !` C "! PX @ l Q mP
0x02b4cc…02b660 Dummy {f00=0x000d, f01=0x0190, f02=»X( DD _Z :EOS :EOF + + +v @ !? ?R _ BT * ' !? 0X A "! X6 @ l Q mP ^L_ P nXP P lR :AV L D I I "R (@(@ ^ :j >Z ^ @ P _ A ! M (@ M M M B B M M # C C @
0x02b660…02b7f4 (0, 55) Dummy {f00=0x000e, f01=0x0190, f02=» Y # C B + B + $? D P R B0 P R D B0P P| P Pv P $P &PN "P< /P :P ;P <P =P >P ?P 1 B0 8 B0Wv DPW B*W D W B$ W W DrW Wx 8 MTPp DYPj X T Y $ WZ
0x02b7f4…02b988 Dummy {f00=0x000e, f01=0x0190, f02=» DYXN _Z :EOS :EOF + + +v ; / = ? : > < . - ' ( 0 $ , G< X AEH X G B Y % G L G M L F B P + X P P P P + B P P 4 ^ :A HEJW W M W B
0x02b988…02bb1c Dummy {f00=0x000e, f01=0x0190, f02=» . P* - P$ L P :g: L :C ? W L Q W L M L M E.RX EHQR E:R M M M M M W2 M M M M M L T y W _ X L " * AGe- AG} L " X ! Y M T(% T$ ! R L W L A T M
0x02bb1c…02bcb0 Dummy {f00=0x000e, f01=0x0190, f02=»G< E& Y B AE X P PD P@ P< P8 P4 Ix !K B T B @E( ) @E* I @E, I Ix B P,9 Q$ B < R :A R V Q AE AE W Ix V AE AE AE X P< P P4 P M @E M M !K !I P @ W M @E M
0x02bcb0…02be44 Dummy {f00=0x000e, f01=0x0190, f02=» AE H M @EH + X ? ? ? ? ? ? ? I . P @E @E L T8 L Pj M I ? ? ? ? ? ? ? . X m M M WR L P2 M l J ? ? ? ? ? ? ? - X M M W JF ? ? ? ? ? ? ? - @EH - =b%0 X $ L <B<j P L *
0x02be44…02bfd8 Dummy {f00=0x000e, f01=0x0190, f02=» P W` X : P ; P W L P< M F$ < P > P W$ L P M @ ~ F X X U K` * M + . M @E 7P < $ <C ! 9 4 @E 9C @E : 4 M E( M !I Ix 4 ; % / : ! - .
0x02bfd8…02c16c Dummy {f00=0x000e, f01=0x0190, f02=» O$ B Y ! O$ L S B L ? ! P ! T< B T B Sx M 9A DK L P$:a P V` P :A M W ! T W M K K + 4 Y T T W _ X $ P W M ! B < V < + L :LR :l" HK < B Y B Y L ! P L ?a M
0x02c16c…02c300 Dummy {f00=0x000e, f01=0x0190, f02=» MWT ! X ! T @W" ! T W ! T W @ L X U X Y X Y X L P M M M W M M M W _ ? * AN N " :A AN * AN L " X I [ ! T, L :EV W L L q r B M T X
0x02c300…02c494 (0, 56) Dummy {f00=0x000e, f01=0x0190, f02=»P4 Q| !Q B T B @LB ) @LD I @LF I Q| AL0 M AL. !QF" T @ AL. !QF" T M L ]*W M L ZB Q| B P ! T B R AL, S [hU Q| h AL( AL4 AL2 !Q !Q X ! P !P W !Q P M L Z$ Q| Y AL6 AL,P L AL( @L(
0x02c494…02c628 Dummy {f00=0x000e, f01=0x0190, f02=» L AL( @L( hZD AL( _L L :B* Wl @L6 Q ? .: @L*:B @L.* WH O @L6 Q: ? .: O LF Q: ? .: @L*:B @L.W L :B @L. @L0* W Qd ? - X M AL8 X - X + L P& M !P P M L Z M Q| 4 AL. @L( 4R 4 @ AL. DN L
0x02c628…02c7bc Dummy {f00=0x000e, f01=0x0190, f02=» L * ! _ L X S S X % S @ P& L <AR A <B M * @ M * L * L * S X P % S L ? ! P ! T S S L P X M M L ? ! P ! P X P M M MR P X P2
0x02c7bc…02c950 Dummy {f00=0x000e, f01=0x0190, f02=»X( M Nn M 9 V 9c ! Q| @L8 4 @ _ X X X X $ PT T"T:U*UH % P Y Y Y >% X P Y _" P" P& R| ^T Y _D _T X _ X _ X" X& T: X P4 0' P. 1R P _ 0$
0x02c950…02cae4 Dummy {f00=0x000e, f01=0x0190, f02=»P Y $ W Y =D %_ X P V % P Y X XT Q _ Tn Q Tn 0DKER UNIT CYLD STAT U U * U U W2 U U X W$ U U W U ( X = 0 :R # Y ; ; ? 0 :R 9
0x02cae4…02cc78 Dummy {f00=0x000e, f01=0x0190, f02=»T Y" P T _ X n D n D E E l ] l @ E @ W ? ? > ? ? ? ? ? ? ? Z0 C ( "^ @Z XD U T " P " P @Z W C "& # ( "^ 0 A @ZR @ZT @ZV @ZX<h @ZX% @ZZ @Z Z^ Z` [ [
0x02cc78…02ce0c Dummy {f00=0x000e, f01=0x0190, f02=» > > > > > > >WZ 0 A ^ T " T0 ! P W SY SD AD _ ! P _, J _2 Z0 # C ( "^ P ZR ZT ZV ZX CCT I T P Q _, AZ: _V LM Z^ A AZ: Z0 L 9 !? AYL
0x02ce0c…02cfa0 Dummy {f00=0x000e, f01=0x0190, f02=» L R ! _ PP I H P _ A VT A A A @ ~ Z A ~ @Z A ~ @ [ ( 7 A A "^ ? (@_0 $ ( , 0 4 8 < Z> " P @ W C "& # ( "^ 0 A @ @ @ @ <h @ % @ @ [ [
0x02cfa0…02d134 (0, 57) Dummy {f00=0x000e, f01=0x0190, f02=» > > > > > > >W 0 A ^ T " T ! P W SY SD AD _ ! P _, J _2 # C ( "^ P CCT I T P DOS - PTS 8000 REL. 10.0 [ L 9 !? A
0x02d134…02d2c8 Dummy {f00=0x000e, f01=0x0190, f02=» z PMES PASG /02,NO PLED D:CDD & P!!IL 17 8 P EXTRN S:TIO H P!!IL 220 ( PECBCW1 EQU 10 MSB OF SECTOR ADDRESS l ( PECBCW2 EQU 12 LSB OF SECTOR ADDRESS P!!IL 223 P* TOSS DISC WORK AREA P!!IL 225 & PNRYMAX
0x02d2c8…02d45c Dummy {f00=0x000e, f01=0x0190, f02=»LSEC RES 1 INTERLACED AND SKEWED SECTOR NUMBER , PSECTST RES 1 1:ST PHYSICAL SECTOR NUMBER 6 * PSECPOS RES 1 SECTOR POSITION INDICATOR f ( PSCOUNT RES 1 LOGICAL SECTOR COUNTER $ PUBUFFP RES 1 USER BUFFER POINTER PA5SAVE RES 1 STACK POINTER
0x02d45c…02d5f0 Dummy {f00=0x000e, f01=0x018e, f02=» P LD A5,DWTORD,A6 ORDER * PTS & P ABL(Z) D:TOSSD TEST STATUS * PTS ( P SUK A5,/1F * PTS R ( P ABL(Z) D:TOSSD FORMAT VOLUME * PTS r & P LD A8,DWTECB,A6 ECB ADDRESS * PTS * P LD A5,ECBRL,A8 REQUESTED LENGTH * PTS P ST A5,DWTRLG,A6 *
0x02d5f0…02d784 Dummy {f00=0x000e, f01=0x0190, f02=» | P* P* TOSS DISC REQUEST HANDLER P* 6 $ P* CALL: REGISTER INPUT @ $ P* -------- ----- h * P* A3 DCT ADDRESS * P* A6 DWT ADDRESS $ P* A8 ECB ADD
0x02d784…02d918 Dummy {f00=0x000e, f01=0x018e, f02=»RY,A3 RESET RETRY COUNTER ( P CM DWTELG,A6 RESET EFFECTIVE LENGTH " P LD A1,ECBBF,A8 N . P ST A1,UBUFFP INITIATE USER BUFFER POINTER f $ P LD A1,DWTORD,A6 A1:= ORDER CODE P RF(Z) TESTST TEST STATUS P SUK A1,1 P RF(Z) DUA:10 BASIC
0x02d918…02daac Dummy {f00=0x000e, f01=0x0190, f02=» P RF(Z) DUA:10 PHYSICAL WRITE P SUK A1,10 ( P RF(Z) FORMAT FORMAT VOLUME : P ^ P LDKL A2,/8010 ILLEGAL ORDER f P ABL END:20 P EJECT P********************* P* * P* TEST STATUS * P*
0x02daac…02dc40 Dummy {f00=0x000e, f01=0x018e, f02=»R+48 $ P ST A1,TYPE DISK FORMAT AND TYPE P LD A1,ECBRL,A8 4 P SUK A1,6 L ( P RF(NZ) TEST10 REQUESTED LENGTH >< 6 ^ P* $ P* PUT VOLUME NAME IN USER BUFFER P* , P LD A2,ECBBF,A8 A2:= USER BUFFER ADDRESS P LD A1,BUFFER
0x02dc40…02ddd4 (0, 58) Opaque[0x194]
0x02ddd4…02df68 # DirEnt {nam=»LKE «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x01d8, f03=0x0000}
0x02ddd4…02df68 IdxSect {
0x02ddd4…02df68 f00 = 0x000e // 0x2ddd4 @0x0
0x02ddd4…02df68 f01 = 0x0006 // 0x2ddd6 @0x2
0x02ddd4…02df68 gno = [ // 0x2ddd8 @0x4
0x02ddd4…02df68 [0x00]: C0x000e.0x3.0
0x02ddd4…02df68 [0x01]: C0x000f.0x0.0
0x02ddd4…02df68 [0x02]: C0x000f.0x1.0
0x02ddd4…02df68 ]
0x02ddd4…02df68 }
0x02df68…02e0fc Dummy {f00=0x000e, f01=0x0190, f02=» p ^~ @ s> d 2Z $"z yd M P yz $ D ^ O " R>x2 +u K w [ ? d +b% L M "~ T &b ACn 1 d < ~R:R:L `{ ^ Z% ^ Dd z `,d x : t ` ^ D `H P D >~ m `" f >~ $ d p 4d @ X
0x02e0fc…02e290 Dummy {f00=0x000e, f01=0x0190, f02=» b z $ ^a : b 9 z i $ w z4r{ > tV u 3 qC zuq $ % > P ZD m c r zuq Z %C7 h > @Bh $/} F 4` 1 ` O PZ-8 T0 Hp tB / ^Tg t z ^ Z D D H Z2 Z } n zP bd ` z R:4d d z$(Rd0 Gt
0x02e290…02e424 Dummy {f00=0x000e, f01=0x0190, f02=» z $ 4c ^~ @ s> d 2Z $"z yd M P yz $ D ^ O " R>x2 +u K w [ ? d +b% L M "~ T &b ACn 1 d < ~R:R:L `{ ^ Z% ^ Dd z `,d x : t ` ^ D `H P D >~ m `" f >~ $ d p 4d @ X
0x02e424…02e5b8 Dummy {f00=0x000e, f01=0x0190, f02=» b z $ ^a : b 9 z i $ w z4r{ > tV u 3 qC zuq $ % > P ZD m c r zuq Z %C7 h > @Bh $/} F 4` 1 ` O PZ-8 T0 Hp tB / ^Tg t z ^ Z D D H Z2 Z } n zP bd ` z R:4d d z$(Rd0 Gt
0x02e5b8…02e74c Dummy {f00=0x000e, f01=0x0190, f02=» z $ 4c ^~ @ s> d 2Z $"z yd M P yz $ D ^ O " R>x2 +u K w R? d L PT Cn < ~R:R: ` ^ Z% ^ Dd z `,d x : t ` D `H D >~ m `" f >~ $ d p 4d @ X
0x02e74c…02e8e0 Dummy {f00=0x000e, f01=0x0190, f02=»DEF.INV.LGH.ABS.STR.TBL.OVL.INV.IDT.END.MIS.UNS.EXT.ERR.LKE.BLK.COM.NO STRT.PRG.OVL IDT.MIS.INV.STR.ERR.NOD. 9 R : ) Y : @ Pt %T _ . $ 5T` PX Y %T PJ_ $ 5 R8 P2 % @P 5 _ P %X = = $ 5 P :
0x02e8e0…02ea74 (0, 59) Dummy {f00=0x000f, f01=0x0190, f02=» A _" @ |R0 @ @ P& T < _ (;CZ A | A : @ |P. @ $" % A 6 L 5 @ P _* : @ |Pb @ < < @ A < < V @ A R0 A A N A L @ N @ L @ = > A @ @ : = > < @ $ A $" P $"
0x02ea74…02ec08 Dummy {f00=0x000f, f01=0x0190, f02=» @ @ = @ B : @ |P @ @ PR $" % (% P A 0 K.COM.NO (% P A ( T.MIS.IN $) ) ,! P @ 1 _X : @ |Pn @ @ Pd $" * % (% T A ( T` ( =e T ( T , 0Q W ,& T 1 0Q _ A 0 , _ : A x @ |Pj ` P P`
0x02ec08…02ed9c Dummy {f00=0x000f, f01=0x0190, f02=»T @ ( _ @ A T @ T ( @ A @ A @ A : H % : R 1( A R A Z A b A : $;e (<e P : 4 9P : Y : $;e (<e 4 9P Q : P Y : Y : @ ?a @ =a UL?A $=KR W6 <
0x02ed9c…02ef30 Dummy {f00=0x000f, f01=0x0190, f02=» 1 0 A _4 A r : A @ A A @ @ P 89D A 9A A < A @ P 8:GR _6 A @ A A T A V 8 A A A A N_ A A @ A A : W W W W W W
0x02ef30…02f0c4 Dummy {f00=0x000f, f01=0x0190, f02=» @ @ @ : W A A @ @ :a Q. @ @ @ :b Q A @ _8 @ P @ A : @ A : @ @ 9a @ :a Q2 A > A @ @ @ 9b Q @ @ A @ @ >_$ @ @ A : @ x ` A x @ A
0x02f0c4…02f258 Dummy {f00=0x000f, f01=0x0190, f02=» A r : A < A F A D A N A A A R A R % 1 a PTSLKF (790507) A 4 V A A I ^ 00 A : A V 8 A A A A N_ A A @ A A : W W W ` p A A
0x02f258…02f3ec Dummy {f00=0x000f, f01=0x0190, f02=» ` R NPH @ H A _, @ x ` " :A @ A A 9A _T f P 6 @ A ` NO ` NO _ @ xT ` ` @ ~R0 A ~ @ T @ P6 A S A f V6_ _ @ A SX0 @ a ` _F f V : @ a @ ` T" @
0x02f3ec…02f580 Dummy {f00=0x000f, f01=0x0190, f02=» 9A 9B A <a V :A A A J @ a @ M <a L 9a <A A @ @ P @ A A S A A ~ ` NO ` R NP8 @ H A _& @ x ` " :A @ A A 9A _N ` NO J @ A A
0x02f580…02f714 (0, 60) Dummy {f00=0x000f, f01=0x0190, f02=» A @ A @ :a9a A @ ` P P F @ tP R r ( @ @ T W @ P A _ : ` @ P& @ F $ ) Y @ L 4 : , @ 1 = *** SYMBOL TABLE ^ 4 @ 0 =W
0x02f714…02f8a8 Dummy {f00=0x000f, f01=0x0190, f02=» @ :a9a ^~ 4 @ _ 4 @ 0 = ** = ] ] 4 @ 0 = START = = @ LENGTH = @ REGION = @ U _ 4 : , 1 P , 1 : < , 1 : L P @ $;e $ ) a
0x02f8a8…02fa3c Dummy {f00=0x000f, f01=0x0190, f02=» : F @ A P @ A H I ( @ A A A : W f( : <A 0 R ( ) : (_ @ <a @ =a @ 9b9A A , ) Z A : @ @ <a @ =a :b:A A , ) Y A : @ @ P >a @ 9a Vp9A A A
0x02fa3c…02fbd0 Dummy {f00=0x000f, f01=0x0190, f02=» : < $ P A A B $ ) 9 @ P 9 : $<e :9C D 4 @ 5 A A : @ @ ;a<a V $:CR E P : _& ( ^ : @ p @ T : P @ A p :( B d A d : @ 9a R _ @ P @
0x02fbd0…02fd64 Dummy {f00=0x000f, f01=0x0190, f02=» LABEL = FIXS3-1 DATE = 790507 PACK NBR = 001 f P Y _( Y M : ] =IR E
[…0x3…]
0x030220…0303b4 (0, 61) Opaque[0x194]
0x0303b4…030548 # DirEnt {nam=»EDIT «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x01f0, f03=0x0000}
0x0303b4…030548 IdxSect {
0x0303b4…030548 f00 = 0x000f // 0x303b4 @0x0
0x0303b4…030548 f01 = 0x003c // 0x303b6 @0x2
0x0303b4…030548 gno = [ // 0x303b8 @0x4
0x0303b4…030548 [0x00]: C0x000f.0x2.0
0x0303b4…030548 [0x01]: C0x000f.0x3.0
0x0303b4…030548 [0x02]: C0x0010.0x0.0
0x0303b4…030548 [0x03]: C0x0010.0x1.0
0x0303b4…030548 [0x04]: C0x0010.0x2.0
0x0303b4…030548 [0x05]: C0x0010.0x3.0
0x0303b4…030548 [0x06]: C0x0011.0x0.0
0x0303b4…030548 [0x07]: C0x0011.0x1.0
0x0303b4…030548 [0x08]: C0x0011.0x2.0
0x0303b4…030548 [0x09]: C0x0011.0x3.0
0x0303b4…030548 [0x0a]: C0x0012.0x0.0
0x0303b4…030548 [0x0b]: C0x0012.0x1.0
0x0303b4…030548 [0x0c]: C0x0012.0x2.0
0x0303b4…030548 [0x0d]: C0x0012.0x3.0
0x0303b4…030548 [0x0e]: C0x0013.0x0.0
0x0303b4…030548 [0x0f]: C0x0013.0x1.0
0x0303b4…030548 [0x10]: C0x0013.0x2.0
0x0303b4…030548 [0x11]: C0x0013.0x3.0
0x0303b4…030548 [0x12]: C0x0014.0x0.0
0x0303b4…030548 [0x13]: C0x0014.0x1.0
0x0303b4…030548 [0x14]: C0x0014.0x2.0
0x0303b4…030548 [0x15]: C0x0014.0x3.0
0x0303b4…030548 [0x16]: C0x0015.0x0.0
0x0303b4…030548 [0x17]: C0x0015.0x1.0
0x0303b4…030548 [0x18]: C0x0015.0x2.0
0x0303b4…030548 [0x19]: C0x0015.0x3.0
0x0303b4…030548 [0x1a]: C0x0016.0x0.0
0x0303b4…030548 [0x1b]: C0x0016.0x1.0
0x0303b4…030548 [0x1c]: C0x0016.0x2.0
0x0303b4…030548 [0x1d]: C0x0016.0x3.0
0x0303b4…030548 ]
0x0303b4…030548 }
0x030548…0306dc Dummy {f00=0x000f, f01=0x0190, f02=» D ( b D F b J, b i d b o b w b y b } h h b b , b b 0@ :C H A M t H R M t PB " P :C_ @ 9C E ^ t V V ( T # Y$ @ z f
0x0306dc…030870 Dummy {f00=0x000f, f01=0x0190, f02=» ? : ? : a b @ P , 4 6 @ T h " b
0x030870…030a04 Dummy {f00=0x000f, f01=0x0190, f02=» @ T $ . @ P L ` " @ P 6 4 v
0x030a04…030b98 Dummy {f00=0x000f, f01=0x0190, f02=» Z @ 8 @ @ @ @ P @ 8 A @ : A @ < A @ > A b& > @ @ P @ 8 A @ : A @ < A @ > A b2 > @ @ P : b @ 8 A @ : A @ > A b> > @ @
0x030b98…030d2c Dummy {f00=0x000f, f01=0x0190, f02=» > A bV > @ @ P < @ 8 A @ : A @ > A bb > @ @ P Z @ 8 A @ : A @ > A bn > @ @ P @ 8 A @ : A @ > A bz > @ @ " P @
0x030d2c…030ec0 Dummy {f00=0x000f, f01=0x0190, f02=» P j @ > A $ @ * @ @ P & > @ @ ( P @" @ P " ( > @ @ , P , : @ & @ Z @ 8 B ` B @ ( P
0x030ec0…031054 (0, 62) Dummy {f00=0x000f, f01=0x0190, f02=» @ & P @ @ > > , : * @ *" " " " "
0x031054…0311e8 Dummy {f00=0x000f, f01=0x0190, f02=» H A @ : p @ P0 @ A @ P ( A A ( A P J A
0x0311e8…03137c Dummy {f00=0x000f, f01=0x0190, f02=» A : A A A : 0 I @" @ P 0 " " @" @" Q @" U @ r :
0x03137c…031510 Dummy {f00=0x000f, f01=0x0190, f02=» ` @ P Z > @ Z " " " @ A @ A @ A b @ P : @ A @ A @ A . @ P 2 : Z
0x031510…0316a4 Dummy {f00=0x000f, f01=0x0190, f02=» 0 I ` @ R " 6 @ ` U f | @ _2 v v _8 "
0x0316a4…031838 Dummy {f00=0x000f, f01=0x0190, f02=» R P $ INPUT I/O-ERROR FC:/XXXX, ST:/YYYY > z ~ P A : A t A v p A 8 8( @ @T0 @ : @ >P ( T A > t r z :R P T _ p @ 8! f D( ( 0 I
0x031838…0319cc Dummy {f00=0x000f, f01=0x0190, f02=» 0 I " " @ @ @" Q : TYDY R J 0 I V N . @ $ P x @ * $ @ $ @ & T Z @ $ @ (
0x0319cc…031b60 Dummy {f00=0x000f, f01=0x0190, f02=» B B r , D H * J : 0 aN , * ^ 0 I j b @ j A R R j j @ p l @ l ` l U l @ p l_2 X v_ p l @ l @ j U * L l @ p
0x031b60…031cf4 (0, 63) Dummy {f00=0x0010, f01=0x0190, f02=» : T$ @ , @ H P ( ( _0 @ , @ T @ , @ P A ,_R _ 6 P A v _ : @ ! @ @ , I p A P &P ^ P P P ^ _ Q & P A , P A A :
0x031cf4…031e88 Dummy {f00=0x0010, f01=0x0190, f02=»
0x031e88…03201c Dummy {f00=0x0010, f01=0x0190, f02=» NO @ ! @ P A 0 ( @ A @ D . @ , @ LPP DYP< TYP6 A PV 1 _ A ( @ P A , Q : A ) P$ $ T _ T _ P ) _( .
0x03201c…0321b0 Dummy {f00=0x0010, f01=0x0190, f02=» + . ) P 8 T I _ ) _ . A ( T 1 A . A ( . < 2 b 0 I n f n @ @
0x0321b0…032344 Dummy {f00=0x0010, f01=0x0190, f02=» P P p U 4 P P 9 Y P 4 9 : 8D Q 0 - : 7_ P 0 P R _ P 0V P - , 0 R - : d ' p 0 A 0 ( @ : P p V <A 0 _ :
0x032344…0324d8 Dummy {f00=0x0010, f01=0x0190, f02=» Z @ p @ p t @ t @ ~ U @ v ` V @ J_v ` @ ~ R @ v ` R @ v @ | v l Z @ v @ | r | x @ x @ v R ^ x @ |
0x0324d8…03266c Dummy {f00=0x0010, f01=0x0190, f02=» r x : | v t x 0 F: 0 0 $ P 8H , A ( ( Z P @ P ( ( @ < : ER 0123456789ABCDEF 8 *** ERROR NUMBER ***: W W W W
0x03266c…032800 Dummy {f00=0x0010, f01=0x0190, f02=» 0 4P&R ! P 8 S =aP 8 Sr _ : Pj_ p Uf p S^ TZ p UT SN p SH TD p U> p S4 P T( : _: _( p p Q S : W W f P 0 4T D f 0V S : :
0x032800…032994 (0, 64) Dummy {f00=0x0010, f01=0x0190, f02=»
[…0x17…]
0x034de0…034f74 (0, 67) Dummy {f00=0x0011, f01=0x0190, f02=»
[…0x13…]
0x036d70…036f04 Dummy {f00=0x0011, f01=0x0190, f02=» A
0x036f04…037098 Dummy {f00=0x0011, f01=0x0190, f02=» _| A z _ A z * _ A z _
0x037098…03722c Dummy {f00=0x0011, f01=0x0190, f02=» @ c c b " @" @b R b b c6 " @b " _2 c Z " c " @b c " @b c c Z " c b c _d " @b c c Z " c b c b " b b c g c g b " b
0x03722c…0373c0 Dummy {f00=0x0011, f01=0x0190, f02=» e 0 Ie e e " d c d d @e Ae e e d @e T e e&
0x0373c0…037554 (0, 70) Dummy {f00=0x0011, f01=0x0190, f02=» d c e :c d d d d d g 0 Ig g e e e e f Z @g g `g @e T f" f( f _2 @g Af f g e e @e P fd fx e e f f e f
0x037554…0376e8 Dummy {f00=0x0011, f01=0x0190, f02=»e e e e g 0 Ig g g @g g g Z " g g g g @g g g Z " g g g g :g g i 0 Ii i g g iz jN i g `i P
0x0376e8…03787c Dummy {f00=0x0011, f01=0x0190, f02=» i i g h iz g i g g @g P h h @i Ai @i Ai i g g @g P i i @i Ai i i g i : i @g i i| Z " i g i i @g i i| Z " i g i g i :
0x03787c…037a10 Dummy {f00=0x0011, f01=0x0190, f02=»" jD i jD jB " j, @jB Aj2 j2 Z " jD " jD jB " j6 : i j 0 Ij j @" @jH P j j jJ jF j " jF j Z " j j " jF j :" jL
0x037a10…037ba4 Dummy {f00=0x0011, f01=0x0190, f02=» G X e| 0 Ie e @e Aeb eb Z @e e e b @b @b T e @b @b T @e c c. b e eP @b @b P cL cX b b c` b b e @b e @e Aef @e Aeh ef l e b
0x037ba4…037d38 Dummy {f00=0x0011, f01=0x0190, f02=» e " b @b @" U d4 dJ d b @b b _2 ep b er k& @b P dz d b @b e ev Z " e b e d b @b e ev Z " e b e _ ez b @b @" T d e e@ ep b _. ep
0x037d38…037ecc Dummy {f00=0x0011, f01=0x0190, f02=» , ; g 0 Ig g e " e " @g Ag @g Ag @g Ag g g g e @g P f" f( f _P " " e " " @e " @g Ag g Z @g g g e @e @e T g @e @e
0x037ecc…038060 Dummy {f00=0x0011, f01=0x0190, f02=» e " @" @e P g g( " " @" @e U gF gN " " e `g T gv g e g g e e g : e e + - k 0 Ik k k g g k @k A
0x038060…0381f4 (0, 71) Dummy {f00=0x0012, f01=0x0190, f02=»k Aj j nN @k Aj j Z @k k k g @g @g T k @g @g T @k h h g k j @g @g P i i g g i& g g k @g k @k Aj @k Aj j nN @k Aj @k Aj @k Ak j r k g
0x0381f4…038388 Dummy {f00=0x0012, f01=0x0190, f02=» `k T j hh g `k R k `k @" Q @k jP j` g k g `k P j j g g j `k @g U j j g g j g g g k g k :
0x038388…03851c Dummy {f00=0x0012, f01=0x0190, f02=» T kt k k k @k k _B @k Ak @k Ak k n @k" Q k k k k k k :_Z k" k k k :k k$ k n2 0 In> n6 @n@ An n Z @n> nB `nB @l P lZ ln l n@
0x03851c…0386b0 Dummy {f00=0x0012, f01=0x0190, f02=»n@ @l nD n" Z @n> nF `nB `nF P m m* n@ @l n@ mn n@ @l nB @n@ An n Z @n> nD @n> An& @nD An* n& vJ n@ n. Z nB `nB @l P m m l n@ l `n@ P m n n. Z
0x0386b0…038844 Dummy {f00=0x0012, f01=0x0190, f02=» 0 In n @n An n Z @n n `n @nH P n n n @nJ n _H n : nL * r 0 Irh r` n n rj n n n r8 Z @rl rn `rn @n T o@ ob r& @rl Ar< r< ~ @n
0x038844…0389d8 Dummy {f00=0x0012, f01=0x0190, f02=» T o o p _2 @rh ArD @rl ArH rD z @n P p p p _< n @n rn rL Z @rl rp n @n rp n @n rn rL Z @rl rp n rp n n r" @rh ArP @rl ArT rP z @n P p r" @n @n Q p p
0x0389d8…038b6c Dummy {f00=0x0012, f01=0x0190, f02=» @n @n U q` qr n n n r : n @n rn rL Z @rl rp n @n rr rX Z @rl rt rt @n rp n @n n n @n rn rL Z @rl rp n @n rr rX Z @rl rt rp `rt n oD n n n r :n n n n n n
0x038b6c…038d00 Dummy {f00=0x0012, f01=0x0190, f02=» r rv @uL Au* u* Z @uJ uR uR r u. u @r Q s sv @uJ Au2 @uL Au4 u2 uN r `uN P sR sb r rv uL @r uL t @r @r P s s " uN t @r @r P s s "
0x038d00…038e94 (0, 72) Dummy {f00=0x0012, f01=0x0190, f02=» P tF tZ r rv t @uL Au* u* Z @uJ uR `uR @r P t t @uN Au8 u6 rv t r uR @uN Au< u: rv t r rv r @rv P u u uL @r uL rv uP rv u> : r rxr r
0x038e94…039028 Dummy {f00=0x0012, f01=0x0190, f02=» u uT @uV uT_B v Z @v v `v `v P u u uT v :_L uX uT uT v :uTuZ ? % $ [ * A zB 0 IzN zF v4 v$ v4 v& v6 v( zP v* y Z @zN zV zV v, @v, `zR T zV
0x039028…0391bc Dummy {f00=0x0012, f01=0x0190, f02=» zV @v* `zP P @zV wJ wb @zT Az z . v0 y> @v, @v> P zV v* @v4 zX z Z @zN zZ `zZ `zR P @zV w w @zT Az z . v0 y> @v, @v@ P w x< @zN Az @zT Az z | zV vB @zV P
0x0391bc…039350 Dummy {f00=0x0012, f01=0x0190, f02=»v< P zV @v2 @v> P @zV zX @v2 @vD P @zX x x yr @zT Az" z" v( y> @zT Az, z* . v0 @zN Az z zV @zT Az4 z2 . v0 v. v& v* @v4 v* y Z @zN zV zV v, v @v, `zR T y y vB v"
0x039350…0394e4 Dummy {f00=0x0012, f01=0x0190, f02=»v$v: v* v$v.vH v$v&v(vF v$v:zV v$v:v6 v$v: ERROR IN OMATCH CAN'T HAPPEN A % ? $ [ N } 0 I} } z z @} A} } Z @} } } z^ @} A} } Z @} } } z` @z^ @z P { { z
0x0394e4…039678 Dummy {f00=0x0012, f01=0x0190, f02=»{ z zb }^ @z` @z P { { `} @z P { { z zb }^ @z` @z P { |( @z^ @z T | |$ z zb }^ @z` @z P |F |p @z^ @z P |d |l z zb }^ @z` @z P | | }
0x039678…03980c Dummy {f00=0x0012, f01=0x0190, f02=»T } } @z } @} A} } L @z P @} }J }R z zb }^ } @zb @z V }| } } @zb } z z z } : z } z z^ } z^ } z zd ERROR IN PATSIZ CAN'T HAPPEN A % $ ? [ N * z
0x03980c…0399a0 Dummy {f00=0x0012, f01=0x0190, f02=» @} @} P @ @} @} P @ ~ ~ } } d @} @} P @} @} P @ ~ 2 @} r Z @ @} } d @} @} P P ~ } d v } z : } } ~ }
0x0399a0…039b34 (0, 73) Dummy {f00=0x0012, f01=0x0190, f02=» @ A 4 @ A k& @ P > X : ` @" P t_ : aN * 0 I @ @ ` V
0x039b34…039cc8 Dummy {f00=0x0012, f01=0x0190, f02=» @ A @ A . @ A @ A . @ " A @ A @ A . @ A @ A . : 0 I ` ` Q f r ( &
0x039cc8…039e5c Dummy {f00=0x0012, f01=0x0190, f02=» d 0 I p h @ p A Z @ r A Z nN @ r A Z @ p t ` t @ T R h P r @ r_J @ r A Z @ p t t @ @ R t @ @ Q @ t P @ @ @ Q t
0x039e5c…039ff0 Dummy {f00=0x0012, f01=0x0190, f02=» @ N T 0 I @ A Z @ z @ z @ | T z x @ ~ Z @ ` @ P . : | x @ ~ @ A Z @
0x039ff0…03a184 Dummy {f00=0x0012, f01=0x0190, f02=» T 0 I ` X @ ` A N @ b A P N ` ` ` ` P @ H R T : N [ ] , 0 I 8 0 : @ j : @ : A Z @ 8 @ ` @ @ l P
0x03a184…03a318 Dummy {f00=0x0012, f01=0x0190, f02=» f @ 8 A @ : A @ < A " @ > A $ ( Z @ < @ > @ h @ j @ @ : A Z @ 8 @ ` @ @ v P x d z d d , : x n p r p t p v p h x
0x03a318…03a4ac Dummy {f00=0x0012, f01=0x0190, f02=» Z @ * . ` ( ` . P F B B :_T H B B : J D J 0 I @ 2 0 2 @ 0 R " 0 0 : 0 1 2 3 4 5 6 7 8 9 A B C D E F G
0x03a4ac…03a640 Dummy {f00=0x0012, f01=0x0190, f02=» @ ` D T P @ @ T @ P r @ @ P @ F A @ H A P @ J A @ L A @ N A . @ @ T @ J A @ L A @ N A . ` L @ U P H @ R
0x03a640…03a7d4 (0, 74) Dummy {f00=0x0012, f01=0x0190, f02=» @ J R @ R A " u @ Q @ F A " @ H A $ @ J A & @ L A ( @ N A * ` L @ P Z @ J R @ R A . , u @ Q f @ F A . @ H A 0 @ J A 2 @ L A 4 @ N A 6 , ` @ J A @ L A @ N A .
0x03a7d4…03a968 Dummy {f00=0x0012, f01=0x0190, f02=» 0 I @ @ @ A t @ A v t @ A v v u V @ A z z Z @ @ A t @ A v t u X @ X @ V U 0 n X @ X_2
0x03a968…03aafc Dummy {f00=0x0012, f01=0x0190, f02=»
0x03aafc…03ac90 Dummy {f00=0x0012, f01=0x0190, f02=» c6 0 IcB c: cD @b cJ c. Z @cB cL `cL @b P b c @cF Ac4 c2 d cH c b cH cH b b c6 :cJb "
0x03ac90…03ae24 Dummy {f00=0x0012, f01=0x0190, f02=» . e 0 Ie e `e @d P dH d d cN e e " e 6 d cN @cN @d P d d e _" e e d @e P d d d cN e e Z cP e `e @d P e e Z cP
0x03ae24…03afb8 Dummy {f00=0x0012, f01=0x0190, f02=» cN e e 6 d cN e :d c cPd d d d d c g 0 Ig, g$ e e e e g Z @g, g. `g. @e T f@ fF f _2 @g, Ag g g e e @e P f f e
0x03afb8…03b14c Dummy {f00=0x0012, f01=0x0190, f02=»_ e g :e e e e " g.e e e e e e g 0 Ig g g @g0 g g Z " g g g g @g2 g g Z " g g g g :g g4 i 0 Ii i g g i jl
0x03b14c…03b2e0 Dummy {f00=0x0012, f01=0x0190, f02=»h i @g i i Z " i i g h i g i g g @g P h h @i Ai @i Ai i g g @g P i$ i> @i Ai i i g i : i @g i i Z " i g i i @g i i
0x03b2e0…03b474 (0, 75) Dummy {f00=0x0013, f01=0x0190, f02=» i j" @j` AjP jP Z " jb i jb j` " jJ @j` AjP jP Z " jb " jb j` " jT : i j 0 Ij j @" @jf P j j jh jd j " jd j Z " j j " jd j :" jj
0x03b474…03b608 Dummy {f00=0x0013, f01=0x0190, f02=» c 0 Ic c b c c @b c c Z @c c `c @b P c c @c Ac c c b @c P c@ c @c Ac c fl c b @c P c| c c i c @c Ac c d
0x03b608…03b79c Dummy {f00=0x0013, f01=0x0190, f02=» A : A : . fF 0 IfR fJ `fT @d P d d d c f* fR " f4 6 d c @c @d P
0x03b79c…03b930 Dummy {f00=0x0013, f01=0x0190, f02=» P fX f> Z c fZ `fZ @d P @fX e e d c f& f8 h fV d @fV P f f d c f& fB 6 e c fF :d d c d d d d d d g 0 Ig g `g
0x03b930…03bac4 Dummy {f00=0x0013, f01=0x0190, f02=»g `g @fh " " @g Ag g i " g fb @fb `g V gT gj g fb @fh fb_2 g g g g _( g jR fj g g f f g : g fbf^f`f^f` hf 0 Ihr hj @" @g P
0x03bac4…03bc58 Dummy {f00=0x0013, f01=0x0190, f02=» i 0 Ii i h hv h hx i Z @i i `i @h T h h i _2 @i Ai i j hx h @hx P i( i< h hv i i h| i i i h~ i jR i jR " @h
0x03bc58…03bdec Dummy {f00=0x0013, f01=0x0190, f02=» jB jJ @i i i @i R j, j4 " i i j> : j 0 Ij j j @jL j j Z " j j j j @jN j j Z " j j j j :j jP l
0x03bdec…03bf80 Dummy {f00=0x0013, f01=0x0190, f02=» l Z " l `l @j V k k l @j l l Z " l l j k l j l j j @j P k l @l Al @l Al l j j @j P l@ lZ @l Al l g j l : l @j l
0x03bf80…03c114 (0, 76) Dummy {f00=0x0013, f01=0x0190, f02=» mX 0 Imd m @" @l P m m* l l mJ " l mT Z " mf mf " l mX :" l
0x03c114…03c2a8 Dummy {f00=0x0013, f01=0x0190, f02=» cp 0 Ic| ct b c c~ @b c @c| Ac^ @c Acb @c Acd c^ c c b @c P c$ cL cf b ch v cl v cn b c b b cp : c b " b b b P
0x03c2a8…03c43c Dummy {f00=0x0013, f01=0x0190, f02=»d dp Z @d d `d @c P d: dN c d d^ c d d c c dt :c c
0x03c43c…03c5d0 Dummy {f00=0x0013, f01=0x0190, f02=» c 0 Id d b d d @b d @d Ac @d Ac @d Ac c d& d b @d P c c @d Ac c d b @d P c c @d Ac c e( d b @d P c c
0x03c5d0…03c764 Dummy {f00=0x0013, f01=0x0190, f02=» P e 0 Ie e e d d Z @e e `e @d P dv d d e d @d d d d e d Z @e e `e @d P d d d" e d d$ e e d d e :d d"
0x03c764…03c8f8 Dummy {f00=0x0013, f01=0x0190, f02=»g6 f fh e @f Aff ff f fh e f `f @e$ " " @f Aff ff g6 " f e @e `f V f f& f< e @e$ e _2 fj f fh f _( fl g e& f f e e ft : f e e e e e
0x03c8f8…03ca8c Dummy {f00=0x0013, f01=0x0190, f02=»g Z " g0 " g0 g. " g" : f g 0 Ig g g @g4 g2 g4 @g2 R g g " g2 g2 g : h" 0 Ih. h& h0 @g h6 h Z " h8 h. h8 h2 @g h6
0x03ca8c…03cc20 Dummy {f00=0x0013, f01=0x0190, f02=»
[…0x1…]
0x03cdb4…03cf48 Dummy {f00=0x0013, f01=0x0190, f02=» gJ 0 IgV gN e gZ gX @e gX @gV Ag4 @gX Ag6 g4 hh g^ e @g^ P f: g" @gV Ag4 @gX Ag6 g4 ht g^ e @g^ P f~ g" gX @e
0x03cf48…03d0dc Dummy {f00=0x0013, f01=0x0190, f02=» @g^ P g g" g8 h gZ gZ b b gJ : b e g^ " " P hN 0 IhZ hR h gd hJ Z @hZ hb `hb @gf P g g gh h^ gd @gh gd g gj h^ hJ Z @hZ hb `hb @gl
0x03d0dc…03d270 Dummy {f00=0x0013, f01=0x0190, f02=»_ A z _ A z > _(
0x03d270…03d404 Dummy {f00=0x0013, f01=0x0190, f02=»
[…0x1…]
0x03d598…03d72c Dummy {f00=0x0013, f01=0x0190, f02=» p` 0 Ipl pd k h k @" U l l& h p` : " k @k @" U lJ l` p$ k @k k _2 k k k k p. k k k
0x03d72c…03d8c0 Dummy {f00=0x0013, f01=0x0190, f02=»m p4 q2 k m k k @k @k Q pp @k @k T @pp mF mf k k @pl Ap@ p: t k k @k @k P pp @k @k P @pp m m p0 Z aN pp @pp Ap@ p@ p| k k @k k m k k l @k @k P n
0x03d8c0…03da54 (0, 78) Dummy {f00=0x0013, f01=0x0190, f02=»k p0 Z h pp `pp @k T n o p. k k @k T n o p0 k k @k pp p4 y @pp @k Q o o p$ pP vn k @k k k k p0 Z aN pp `pp @k T oh o~ o k @k
0x03da54…03dbe8 Dummy {f00=0x0013, f01=0x0190, f02=» k @h P p p p$ k h lN h p` :k k k aNk aNk k h k k k h k k k k k k k k k k q 0 Iq q `q `q Q p p pv pt p @q Aq q Z @q q q q q @px
0x03dbe8…03dd7c Dummy {f00=0x0013, f01=0x0190, f02=» q( q" t Z @t t `t @q& T q q tv @t At t } @q" q"_N t Z @t t `t @q* P q r q" q q" @q, q" q q$ t Z @t t `t @q& T r, r2 rl_2 @t At @t At t z" @q& P rf
0x03dd7c…03df10 Dummy {f00=0x0013, f01=0x0190, f02=» At @t At t z" @q& P s tr @q @q& Q s sN s q @q0 t t Z @t t t q _J q @q( t t Z @t t `t @q& Q s s s _n @q @q& U s s q& q q t : q @q( t t Z @
0x03df10…03e0a4 Dummy {f00=0x0013, f01=0x0190, f02=» t t Z @t t t `t q q q q q t :q"q0 q"q$q0 q$ q"t q0 q q"t q0 vB 0 IvN vF t t v2 Z @vT v `v @t T u" u8 v, t @t t _B v2 Z @vT v t
0x03e0a4…03e238 Dummy {f00=0x0013, f01=0x0190, f02=»vV Av< @vX Av> @vZ Av@ v: p| t _P v( v2 Z @vT v @v Av: @vV Av< @vX Av> @vZ Av@ v: p| t u& vB :t t t t w 0 Iw w `w @vf R v v vh w w @w Aw w
0x03e238…03e3cc Dummy {f00=0x0013, f01=0x0190, f02=»vd `w V wV wl w vd @vj vd_2 w w w w _( w vl w w v^ v^ w : w vdv`vbv`vb xh 0 Ixt xl @" @w P x x6 @xt Axd xd Z " xv w xv xt " x^ @xt Axd xd
0x03e3cc…03e560 Dummy {f00=0x0013, f01=0x0190, f02=» x xz y Z @y y `y @x T x x y _2 @y Ay y . xz x @xz P y* y> x xx y y x~ y y y x y y " @x " " @x " x xx_ xx y :xzx xzx|" y
0x03e560…03e6f4 (0, 79) Dummy {f00=0x0014, f01=0x0190, f02=» I}N }F z y @}P A}* }* Z @}N }V }V y @}T A}* }* Z @}R }V }V y @y @z P z z y }B : z y @y @z P z {$ }T @z }V }. Z @}R }X @y `}X P { { z y | @y @z P
0x03e6f4…03e888 Dummy {f00=0x0014, f01=0x0190, f02=» { z y | @y @z P { { @y @z P { { z y | @y @z P | |b }T @z }V @}R A}4 }2 . @z P |V |^ z y | @y @z P | | @y @z T }V }T @z }X @}R A
0x03e888…03ea1c Dummy {f00=0x0014, f01=0x0190, f02=» y y }B : z }Vz y }Vy }Xz y ERROR IN PATSIZ CAN'T HAPPEN A % $ ? [ N * 0 I @ A~ ~ Z @ } @} @}z P } } }| }Z ~ @} @}~ P @} @} P @
0x03ea1c…03ebb0 Dummy {f00=0x0014, f01=0x0190, f02=» ~ Z @ @}| }Z ~ @} @} P ~ ~ } }Z ~ }Z : }| }|} }^ 0 I @ @ R p x " :
0x03ebb0…03ed44 Dummy {f00=0x0014, f01=0x0190, f02=» 0 I ( " ( ` P " : @ * Z " ` @ , V @ * Z " & &
0x03ed44…03eed8 Dummy {f00=0x0014, f01=0x0190, f02=» @ A w " : @ * Z " & @ ( Z " , " : $ * & 0 I @ A | @ A ~ | ` ` P n v :
0x03eed8…03f06c Dummy {f00=0x0014, f01=0x0190, f02=» " " " :" 0 I @ A Z @ ` & @ & ` Q & @ ( &_2 Z @ ` ` P ( $ $ :_T * $ $ : , & ,
0x03f06c…03f200 Dummy {f00=0x0014, f01=0x0190, f02=» G jT 0 Ij` jX h h @jb AjD jD Z @j` jh `jh @h P h i h jT : jb @h jh jH Z @j` jj `jj @h P i@ iJ h jT : jb @h jh @jb AjD jD Z @j` jj @j` AjL @jj AjP @jd AjR jL q
0x03f200…03f394 (0, 80) Dummy {f00=0x0014, f01=0x0190, f02=»j" jb @h jb h jf j* h jf h h h jT : h jhh jh l 0 Il l @l Al l Z @l l `l @jn P j j jp l k l @jr l l Z @l l `l @jn P
0x03f394…03f528 Dummy {f00=0x0014, f01=0x0190, f02=»k k l @jr l k l @jr l @l Al l Z @l l @l Al @l Al l l l l Z l `l @jn P l l jp l jp `l P l@ ll l Z l jn l jp jl l| jt jl jl l
0x03f528…03f6bc Dummy {f00=0x0014, f01=0x0190, f02=»p l l l l l l p l p Z @p p p l @l `p T p @l @l T @p mf p l l @l @l P m m @p Ap p th l o @l @l P p @l `p P @p m m @p Ap p th l o @l @l
0x03f6bc…03f850 Dummy {f00=0x0014, f01=0x0190, f02=» P n n @p Ap @p Ap p v p l @p P n n p o @l @l P p @l `p Q @p o o l l p Z @p p p l @l @l P p @l @l P @p p @l @l P @p ox
0x03f850…03f9e4 Dummy {f00=0x0014, f01=0x0190, f02=» l p Z @p p p l m. @l `p T p" p6 l l p~ @p Ap p th @l P pb pv l l p~ l l l p :l l l l l l l l p l l l l l l l l l l l l l l p l l l l l
0x03f9e4…03fb78 Dummy {f00=0x0014, f01=0x0190, f02=»r r `r @p T @r q q r p @p p _l r Z @r r `r @p P q q p r @r Ar r th p r @r Ar r u r @r Ar r th p _ r Z @r r `r `r T rF rZ p p r @r Ar
0x03fb78…03fd0c Dummy {f00=0x0014, f01=0x0190, f02=» * tJ 0 ItV tN tX @r r @r `tZ V s8 sN s r @r r _2 r @r r t& Z @tV t^ @t^ At* @tV At, t* th r _P tX @r tX tZ r @tV At4 @tZ At6 t2 th r @tV At< @tZ At> t: th r
0x03fd0c…03fea0 Dummy {f00=0x0014, f01=0x0190, f02=» t 0 It t `u `u Q t t tb t` t @u At t Z @u u t u u @td u td t` t` t : tf @ N T vh 0 Ivt vl @vv Av` v` Z @vt vx vx
0x03fea0…040034 (0, 81) Dummy {f00=0x0014, f01=0x0190, f02=»u vV vv @u vv @vv Av` v` Z @vt vx vx u @u @u P v v$ u u vV @u @u P vB vN u u vV u u u vh : u vxu N [ ] xD 0 IxP xH xR @v xR @xR Ax x
0x040034…0401c8 Dummy {f00=0x0014, f01=0x0190, f02=» v~ xV v @xT Ax. @xV Ax0 x, th v~ @xP Ax6 @xR Ax8 @xT Ax: @xV Ax< x4 x x@ Z @xT xX xV @v @v xX @xR Ax x Z @xP xX `xX @v P w w v v| x v v| v| xD : v v v v v v v v v v v
0x0401c8…04035c Dummy {f00=0x0014, f01=0x0190, f02=» { 0 I{ { @{ A{ { Z @{ | | x @x `{ T | @x @x T @| y& { @x @x P yD y @{ A{ @{ A{ { u | @{ A{ @| A{ @| A{ { th x {r @x @x T y y @{ A{ @| A{ @| A
0x04035c…0404f0 Dummy {f00=0x0014, f01=0x0190, f02=»{ @| A{ @| A{ { th x {r | @x | { Z @{ | @| A{ { | @x Q z z @{ A{ @{ A{ @{ A{ @| A{ @| A{ { | {r | @x | { Z @{ | @| A{ { | @x Q { {N @{ A{ @{ A{ @{ A{ @
0x0404f0…040684 Dummy {f00=0x0014, f01=0x0190, f02=»x { : x | x | x x | x xZ xp | 0 I| | | | | Z @| | `| @| T |` |v | | @| | _B | Z @| | `| `| P | | | |
0x040684…040818 Dummy {f00=0x0014, f01=0x0190, f02=» @~ A} @~ A} } u ~$ @~ A} } | | @~ A} } Z @~ ~$ @~ A} @~$ A} } | | @| @| U } } } | @| | _2 ~ Z @~ ~$ @~$ A~ @~ A~ @~ A~ @~" A~ ~ th | _P ~ : ~$ | | |
0x040818…0409ac Dummy {f00=0x0014, f01=0x0190, f02=» c@ 0 IcL cD b cR cN @b cT c6 Z @cL cV `cV @b P c c$ c: g> cT @cP Ac> c< d cR cR b b c@ :cTb " cT
0x0409ac…040b40 Dummy {f00=0x0014, f01=0x0190, f02=» . e 0 Ie e `e @d P dR df d cX e e " e 6 d cX @cX @d P d d e _" e e d @e P d d d cX e e Z cZ e `e @d P e e
0x040b40…040cd4 (0, 82) Dummy {f00=0x0014, f01=0x0190, f02=»e e d cX e e 6 d cX e :d c cZd d d d d d g* 0 Ig6 g. e e e e g Z @g6 g8 `g8 @e T fJ fP g _2 @g6 Ag g hN e e @e P f
0x040cd4…040e68 Dummy {f00=0x0014, f01=0x0190, f02=» e _ e g* :e e e e " g8e e e e e e g 0 Ig g g @g< g: g< @g: R g g " g: g: g : h* 0 Ih6 h. h8 @g h> h& Z " h@ h6 h@ h: @g
0x040e68…040ffc Dummy {f00=0x0014, f01=0x0190, f02=» hB j j j4 hH `j4 P h h hB j$ : j4 @hJ j6 j Z " j8 `j8 @hL V h i j4 @hJ j6 j Z " j8 j8 hF i, j hF j hB hJ @hB P i` i| @j0 Aj @j2 Aj" j
0x040ffc…041190 Dummy {f00=0x0014, f01=0x0190, f02=» @hH j6 j Z " j8 hL j8 hB j$ :hDj6hJhF j 0 Ij j @" @j: P jv j @j Aj j Z " j j: j j " j @j Aj j Z " j " j j " j : j< kf
0x041190…041324 Dummy {f00=0x0014, f01=0x0190, f02=»" j
0x041324…0414b8 Dummy {f00=0x0014, f01=0x0190, f02=» d 0 Id( d b d, d* @b d* @d( Ad @d* Ad @d, Ad d eH d0 b @d0 P c" c2 b d, b `d, P cZ c @d( Ad @d* Ad @d. Ad @d, Ad d dB d0 b @d0
0x0414b8…04164c Dummy {f00=0x0014, f01=0x0190, f02=» b " " P e 0 Ie* e" e, d4 e Z @e* e2 `e2 @d6 P d d d8 e. d4 @d8 d4 d d: e. e Z @e* e2 `e2 @d< P d d d> e0 e d@ e0 e0 d2
0x04164c…0417e0 Dummy {f00=0x0014, f01=0x0190, f02=» @h Ahp hn k @h Ahn @h Ahp @h Ahr @h Aht hn l8 h e@ @h P e g @h Ahn @h Ahp hn k @h Aht ht Z @h h h e8 @e8 @eB T h @e8 @eD T @h fV fj e> h g @e8 @eB P f f
0x0417e0…041974 (0, 83) Dummy {f00=0x0015, f01=0x0190, f02=» @h P g g, h `h h e> `h P gT gd eF h e@ `h T g e e> `h R h `h @" Q @h g g eF h eF `h P h
0x041974…041b08 Dummy {f00=0x0015, f01=0x0190, f02=» e@ e< e:e< jp 0 Ij| jt h @" U j~ @" `j| U j `j| @" U @j @j~ i$ i8 h h jJ jT j j~ jV h jX j~ jV h jT h jX
0x041b08…041c9c Dummy {f00=0x0015, f01=0x0190, f02=» `j| " @j| Ajb jb h @j| Ajb jb j~ jV h jd j jh j h h h jp :" j~" h h h h h h h h h h j 0 Ij j j @j j j @j R j j " j j j :
0x041c9c…041e30 Dummy {f00=0x0015, f01=0x0190, f02=»k k kr :k j k 0 Il l @l Ak k Z @l l `l @k P k k l @k l _H k : k 0 1 2 3 4 5 6 7 8 9 . $ / n 0 In n l( l @n An
0x041e30…041fc4 Dummy {f00=0x0015, f01=0x0190, f02=»P l l l, l n @l. n nx @l& @l0 P m, m8 " n nx @l& @l2 P mV mb " n nx @l& @l4 P n @l& @l6 P @n m nh @n An @n An n o n l, @n P m m l,
0x041fc4…042158 Dummy {f00=0x0015, f01=0x0190, f02=»n An n r l nx l. l l( @l P n n n @l. n l n l n : l(l l& l* n o 0 Io o n n o Z @o o `o @n T oB oX o n @n n _B
0x042158…0422ec Dummy {f00=0x0015, f01=0x0190, f02=» 0 Iq q @q Aq q Z @q q `q @o P p p( o q q( q @o q q Z @q q `q @o P pf pz o q q( @q Aq q Z @q q q @o q q Z @q r `q `r P p p
0x0422ec…042480 Dummy {f00=0x0015, f01=0x0190, f02=» P qV qf o q o `q P q q q Z q o q o o q o o o q : o q o q o q o o s 0 Is s " s `s @r P rN
0x042480…042614 (0, 84) Dummy {f00=0x0015, f01=0x0190, f02=» r r s : `s @" P r _ r r r s : aN 0 9 t 0 It t @t At @t At t k s s @t At t Z @t t `t @s T s s t t @s t _J @t At t Z
0x042614…0427a8 Dummy {f00=0x0015, f01=0x0190, f02=»t @s @s$ P t @s @s& V @t @t tp t s( s t t @s s _ s t : s,s s* ? % $ [ * A x 0 Ix x t t t t t t x t x Z @x x x
0x0427a8…04293c Dummy {f00=0x0015, f01=0x0190, f02=» t w @t @t P x @t `x P @x u v @x Ax x {j t w @t @t P x t @t x x Z @x x `x `x P @x vZ vr @x Ax x {j t w @t @t P v v @x Ax @x Ax x @ x t
0x04293c…042ad0 Dummy {f00=0x0015, f01=0x0190, f02=» Z @x x x t @t @t P x @t @t P @x x @t @t P @x w w x @x Ax x y t w @x Ax x {j t @x Ax x x @x Ax x {j t t t t @t t x Z @x x x t u< @t `x T
0x042ad0…042c64 Dummy {f00=0x0015, f01=0x0190, f02=»t t t t t t x t t t t t t t t t t t t t t x t t t t t y 0 Iy y y x y Z @y y `y @y T yT yj y x @y x _B @y Ay @y Ay y | @y Q y y y
0x042c64…042df8 Dummy {f00=0x0015, f01=0x0190, f02=» @y y @y `{ V z: zP z y @y y _2 y @y y {( Z @{X {` @{` A{, @{X A{. {, {j y _P {Z @y {Z { y @{X A{6 @{ A{8 {4 {j y @{X A{> @{ A{@ {< {j y @{^ A{D @{X A{F @{ A{H {D {j y @{X A{> @{ A{@ {< {j
0x042df8…042f8c Dummy {f00=0x0015, f01=0x0190, f02=»| Q { { {d {b { @| A{ { Z @| | | | | @{f | {f {b {b { : {h * 0 I | | | | | v Z @ ` @| T |~ | d @ A z z
0x042f8c…043120 Dummy {f00=0x0015, f01=0x0190, f02=» @| T } } }Z_2 @ A @ A @ @| P }T }X }Z_< | @| Z @ | @| | @| Z @ | | | ` @ A @ A @ @| P } ` @| @| Q ~
0x043120…0432b4 (0, 85) Dummy {f00=0x0015, f01=0x0190, f02=» ~ _n @| @| U ~ ~ | | | : | @| Z @ | @| Z @ @| | @| | | @| Z @ | @| Z @ ` | | | | | :| | | | |
0x0432b4…043448 Dummy {f00=0x0015, f01=0x0190, f02=» @ $ $ @ @ T , " @ $ Z @ & ` & @ P j v " @ " @ " A Z @ $ $ @ @ P @ @ P
0x043448…0435dc Dummy {f00=0x0015, f01=0x0190, f02=» @ A Z @ ` @ 0 P @ A @ A {j * @ . @ A @ A {j * , @ A @ A {j * @ A @ A @ A @ A Z @ @ , @ . @ A Z @
0x0435dc…043770 Dummy {f00=0x0015, f01=0x0190, f02=» 4 , < ERROR IN OMATCH CAN'T HAPPEN A % ? $ [ N ` 0 I l d * @ n A H H Z @ l t t @ r A H H Z @ p t t @ @ * P ` : , @ @ . P
0x043770…043904 Dummy {f00=0x0015, f01=0x0190, f02=» ` ` n @ , P ~ * @ @ 2 P @ @ 4 T , @ @ 6 P @ @ 4 P * @ @ 8 P 8 r @ , t @ p A R P j @ ,
0x043904…043a98 Dummy {f00=0x0015, f01=0x0190, f02=» j @ * P @ t , < @ @ * V & > n @ n , ` : > t > t v < ERROR IN PATSIZ CAN'T HAPPEN A % $ ? [ N * $ 0 I 0 ( @ 2 A Z @
0x043a98…043c2c Dummy {f00=0x0015, f01=0x0190, f02=» P @ 6 d p x @ z @ P 4 @ z @ P @ 4 2 @ 4 Z @ 0 6 6 @ x @ z @ P x < x $ : 4 | 0 I
0x043c2c…043dc0 Dummy {f00=0x0015, f01=0x0190, f02=» 9 A B C D E F G H I J K L M N O P Q R S T U V W X Y Z @ - B 0 I N F @ R A Z @ P Z Z @ ` N T Z @ @ T @ Z | @ @ P @ P A @ R A Z @ T A @ V A @ X
0x043dc0…043f54 (0, 86) Dummy {f00=0x0015, f01=0x0190, f02=» R @ Z @ P ^ ` ^ @ P @ Z | @ T A @ V A " @ X A $ {j V @ Z & Z @ T @ A , * n @ Q $ @ P A , @ R A . @ T A 0 @ V A 2 @ X A 4 * X V @ Z & Z @ T
0x043f54…0440e8 Dummy {f00=0x0015, f01=0x0190, f02=» " @ X A $ {j R @ R @ R A Z @ P Z Z D B : Z Z : 0 I F > @ J A 2 2 Z @ H L J ` L b @ b ` J
0x0440e8…04427c Dummy {f00=0x0015, f01=0x0190, f02=» ` : : h b h 0 I @ T @ T @ A l @ A n l @ A n n n N @ A r r Z @ @ A l @ A n l n P @ P @ N U ( f P @ T P_2 v Z @
0x04427c…044410 Dummy {f00=0x0015, f01=0x0190, f02=» c, 0 Ic8 c0 b c< @c< Ac$ c c> b @c> P c c c& cN c< c< b b c, :b " " " b dB 0 IdN dF @dR Ad2 d2 cB dN cD @cD `dP U
0x044410…0445a4 Dummy {f00=0x0015, f01=0x0190, f02=» v d8 cF cL c@ c@ dB : cDaNcBcHdTcHcJ
0x0445a4…044738 Dummy {f00=0x0015, f01=0x0190, f02=» d 0 Id( d d* @b d* b d, @d( Ad @d* Ad @d, Ad d f d0 b @d0 P c" c2 b d, b `d, P cZ c @d( Ad @d* Ad @d. Ad @d, Ad d dB d0 b @d0
0x044738…0448cc Dummy {f00=0x0015, f01=0x0190, f02=» b " " P e 0 Ie* e" e, d4 e Z @e* e2 `e2 @d6 P d d d8 e. d4 @d8 d4 d d: e. e Z @e* e2 `e2 @d< P d d d> e0 e d@ e0 e0 d2
0x0448cc…044a60 Dummy {f00=0x0015, f01=0x0190, f02=»f U f `f @" U @f @f e e e> e4 f f " " e6 " e8 @e8 @" U f f f e8 @e< e8_2 f e: f j6 e4 e> @e4 P fV fZ f @" `f U fx f e6 @e< e6
0x044a60…044bf4 (0, 87) Dummy {f00=0x0016, f01=0x0190, f02=» j @j Ai @j Ai i l @j Ai @j Ai @j Ai @j Ai i of j" f @j" P gp i @j Ai @j Ai i l @j Ai i Z @j j" j" f @f @f T j" @f @f T @j" g g f j i @f @f
0x044bf4…044d88 Dummy {f00=0x0016, f01=0x0190, f02=» of j" f @j" P h h j `j j f `j P h h f j f `j T i gp f `j R j" `j @" Q @j" iX ih f j f `j
0x044d88…044f1c Dummy {f00=0x0016, f01=0x0190, f02=» j f j : f f f f kt 0 Ik kx j. j$ j0 j& kZ Z @k k `k @j2 T j j kP_2 @k Ak^ k^ l j& j. @j& P j j j. j$ kP kd
0x044f1c…0450b0 Dummy {f00=0x0016, f01=0x0190, f02=»j(" k j*j(j(j,j*j( k 0 Il l l @k l k Z " l l l l @k l k Z " l l l k :l k l 0 Il l @l Al l Z @l l `l @l P ll
0x0450b0…045244 Dummy {f00=0x0016, f01=0x0190, f02=»n l `n P m m l n| : n @l n nr Z " n `n @l V mL mx n @l n nr Z " n n l m np l nv l l @l P m m @n Anx @n Anz nx l l
0x045244…0453d8 Dummy {f00=0x0016, f01=0x0190, f02=» Z " n l n l n| :l n l l o, 0 Io8 o0 @" @n P n n @o8 Ao( o( Z " o: n o: o8 " o" @o8 Ao( o( Z " o: " o: o8 " o, : n 0 1 2 3 4 5 6 7 8 9
0x0453d8…04556c Dummy {f00=0x0016, f01=0x0190, f02=» o p< @r Aq @r Aq q v r oZ `r P p p( oZ o< r @o r q @oT @o^ P pZ pf " r q @oT @o` P p p " r q @oT @ob P r @oT @od P @r p q @r Aq @
0x04556c…045700 Dummy {f00=0x0016, f01=0x0190, f02=» P qV qn @r Aq q u o< q o r @r Ar r u o< q o o< oV @o< P q q r @o r o< r o< r : oVo>oT oX r r 0 Ir r @" @r
0x045700…045894 (0, 88) Dummy {f00=0x0016, f01=0x0190, f02=» 0 Ist sl r r sd Z @st sx `sx @r T s s sR r @r r _B sd Z @st sx `sv `sx P sF sP r sh :_L r r r sh :r r u 0 Iu u @u Au u Z @u u `u @s|
0x045894…045a28 Dummy {f00=0x0016, f01=0x0190, f02=» u t @u Au u Z @u u u @s u u Z @u u `u `u P t t u @s u t u @s u @u Au u Z @u u @u Au @u Au u x u u Z u `u @s| P u u& s~ u s~ `u
0x045a28…045bbc Dummy {f00=0x0016, f01=0x0190, f02=»s v 0 Iv v " v `v @u P v v& @v Av v v v: @v Av v } v @v Av v u v | @u P vr v u u u v : `v @" P v _ u
0x045bbc…045d50 Dummy {f00=0x0016, f01=0x0190, f02=»v v @x| Axf xf Z @xz x~ `x~ @v T w wr xZ x| @v x|_J @x| Axf xf Z @xz x~ x~ v @v @v R x~ @v @v Q @x~ w w xZ v @v v @v @v Q x~ @v @v P x @v @v V @x @x~
0x045d50…045ee4 Dummy {f00=0x0016, f01=0x0190, f02=» % $ [ * A | 0 I| | x x x x x x | x |V Z @| | | x @x `| T | @x @x T @| y4 { x x @x @x P yZ yr @| A| |Z x { @x @x P | @x `| P @|
0x045ee4…046078 Dummy {f00=0x0016, f01=0x0190, f02=» z z2 @| A|p |n x { @x @x P zP z @| A|v @| A|z |v v | x @| P z z { { @x @x P | @x `| Q @| z {b x x |~ Z @| | | x @x @x P | @x @x P
0x046078…04620c Dummy {f00=0x0016, f01=0x0190, f02=» @| A| | x x x x @x x |V Z @| | | x x @x `| T { | x x |L @| A| | @x P |0 |D x x |L x x x | :x x x x x x x x | x x x x x x x x x x x x x x
0x04620c…0463a0 Dummy {f00=0x0016, f01=0x0190, f02=» T } }* }r | @| | _B @} A} @} A} } V @| Q }^ }p | | | } :_Z | | | } :| | | ~ 0 I~ ~ ~ @} } } @} R } } " } } ~ :
0x0463a0…046534 (0, 89) Dummy {f00=0x0016, f01=0x0190, f02=»~ ~ _2 ~ @~ ~ ^ Z @ @ A b @ A d b ~ _P @~ ~ @ A l @ A n j ~ @ A t @ A v r ~ @ A z @ A | @ A ~ z ~ @ A t @ A v r ~ ~ :~ ~( ~ ~"~$ ~"~& ~" ~"
0x046534…0466c8 Dummy {f00=0x0016, f01=0x0190, f02=» Z @ 8 > 6 > : @ : * : * 0 I J B D L F Z @ ` @ J T @ A @ F F_N Z @ ` @ N P
0x0466c8…04685c Dummy {f00=0x0016, f01=0x0190, f02=» v @ J P _< B @ L Z @ H @ D B @ R Z @ D H D @ A @ A v @ J P ( @ B @ J Q D r B @ T Z @ B_J
0x04685c…0469f0 Dummy {f00=0x0016, f01=0x0190, f02=» : B @ L Z @ B @ L Z @ @ L B @ P F B @ R Z @ B @ L Z @ ` D D @ @ : F T F H T H F T D F T
0x0469f0…046b84 Dummy {f00=0x0016, f01=0x0190, f02=» 8 X @ Z F Z @ V ` @ P 8 X @ X @ X A B B Z @ V Z Z @ @ P 8 @ @ P $ 0 8 J : Z
0x046b84…046d18 Dummy {f00=0x0016, f01=0x0190, f02=» @ 6 A @ 8 A ` 4 @ d 4 " @ 6 A @ 8 A ` 8 b @ 6 A @ 8 A ` @ 2 A @ 4 A @ 6 A @ 8 A @ " Z @ 6 : 8 @ b @ d : @ 4 A Z @ 2 : ` : @ p P r
0x046d18…046eac Dummy {f00=0x0016, f01=0x0190, f02=»IN OMATCH CAN'T HAPPEN A % ? $ [ N 0 I ` < @ A ~ ~ Z @ > @ A ~ ~ Z @ @ @ > @ ` P < : b B @ @ @ d P . x @ b Z @ @ >
0x046eac…047040 Dummy {f00=0x0016, f01=0x0190, f02=» @ @ h P @ > @ j T b B > @ @ @ l P & P @ > @ j P D L ` B > @ @ @ n P n @ b @ A @ b P b B > @ @ @ p P
0x047040…0471d4 (0, 90) Dummy {f00=0x0016, f01=0x0190, f02=» r @ B @ ` V t @ B b < < : t t > > r D ERROR IN PATSIZ CAN'T HAPPEN A % $ ? [ N * Z 0 I f ^ @ h A N N Z @ f j j @ @ P < H
0x0471d4…047368 Dummy {f00=0x0016, f01=0x0190, f02=» P j @ @ P @ j h @ j R Z @ f l l @ D @ @ P 0 < D V r Z : j 0 I @ A @ A ` ` P
0x047368…0474fc Dummy {f00=0x0016, f01=0x0190, f02=» X Y Z @ - x 0 I | @ A 8 8 Z @ 2 @ 2 ` T @ 2 @ 6 T @ 2 @ 2 @ 8 P @ A < @ A > < @ A B @ A D @ A F @ 4 @ 2 @ : T 2 Z
0x0474fc…047690 Dummy {f00=0x0016, f01=0x0190, f02=» @ @ A V @ A X @ A Z T 4 @ < Z @ @ A b ` r @ 6 Q & Z @ A b @ A d @ A f @ A h @ A j ` @ < Z @ @ A n l r @ 6 Q @
0x047690…047824 Dummy {f00=0x0016, f01=0x0190, f02=» Z @ 2 z x : > 2 > : > p 0 I | t @ A h h Z @ ~ ` @ ` Q V @ _2 l Z @ ~
0x047824…0479b8 Dummy {f00=0x0016, f01=0x0190, f02=» 0 I @ @ @ A @ A @ A r @ A Z @ @ A @ A r @ @ U H ^ @ _2 Z @ @ A @ A @ A @ A
0x0479b8…047b4c Dummy {f00=0x0016, f01=0x0190, f02=»# $ U U W : 50 50 Aq Aq Aq Aq q Aq :o p,p p p SWALLOW CARD TIMEOUT (MULTIPLES OF 2.56 S) : TRANSMISSION TIMEOUT (MULTIPLES OF 2.56 S) : PIN LOADING TIMEOUT (MULTIPLES OF 2.56 S) : BUZZER TIMEOUT (MULTIPLES OF
0x047b4c…047ce0 Dummy {f00=0x0016, f01=0x0190, f02=»$ / $$ PIN CALCULATION FIELDS : @d P` q a Z Y rl q r ( q a Z Y rf r rB " : @d P q q :PARTITION LENGTH IN BYTES ( HEXA ) : NUMBER OF PARTITIONS : !!CH $$ X:A$$ / $$ !!CH $$ X:B$$ $$ # 0 !00R !
0x047ce0…047e74 (0, 91) Opaque[0x194]
0x047e74…048008 # DirEnt {nam=»M:PROC«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x02e0, f03=0x0000}
0x047e74…048008 IdxSect {
0x047e74…048008 f00 = 0x0017 // 0x47e74 @0x0
0x047e74…048008 f01 = 0x0004 // 0x47e76 @0x2
0x047e74…048008 gno = [ // 0x47e78 @0x4
0x047e74…048008 [0x00]: C0x0017.0x0.0
0x047e74…048008 [0x01]: C0x0017.0x1.0
0x047e74…048008 ]
0x047e74…048008 }
0x048008…04819c Dummy {f00=0x0017, f01=0x0190, f02=» P$PCAS PASG 3,@DA=TK0E PREW 3 ( PWEF 3 M=@M= 6 PRUN CPLGEN @M= J PMOV @M=,/L,@MU ` PRUN PCAS @M= v PWEF 3 @A= PMOV @A=,/L,@AU PRUN PCAS @A= 2 P$PCASC M=@M=,A=@A=,C=@C=,CU=@CU=,D=@D=,DU=@DU= * P$PCASC M=@M=
0x04819c…048330 Dummy {f00=0x0017, f01=0x0190, f02=»A=,C=@C=,D=@D= P$PCASC M=@M=,A=@A=,C=@C= P$PCASF C=@C= 6 P$PCASF D=@D= J P$PCASF CU=@CU= ^ P$PCASF DU=@DU= t P$PCASE M=@M=,A=@A= P$PCASE M=@M= P$PCASE A=@A= PMES PARAMETER ?? PEND P$PCASC PWEF 3
0x048330…0484c4 Dummy {f00=0x0017, f01=0x0190, f02=»MES @D= P$PCASE PEND P$PCASF * * PMES ILLEGEL PARAMETER COMBINATION!!!! 8 2 PMES M,M+A,A,M+A+C,M+A+C+D IS OK SO TRY AGAIN! f * PMES AND DON'T DO ANY MORE MISTAKES!!!! P$PCASE PEND P$PCASE PWEF 3,2 PULD /3
0x0484c4…048658 Dummy {f00=0x0017, f01=0x018e, f02=»=,/L,@MU PRUN PDISC,0 M=@M= , POPT OUT=@MOUT=@M=,FC=@FC=F4,FT=M,INP=@M= * PSCR /A A=@A= Z PSCR /L A=@A= n PMOV @A=,/L,@AU PRUN PDISC,0 A=@A= , POPT OUT=@AOUT=@A,FC=@FC=F4,FT=A,INP=@A= PSCR /A C=@C= PSCR /L C=@C=
0x048658…0487ec Dummy {f00=0x0017, f01=0x0190, f02=» P$PDISCE P=@C= * PMES ILLEGAL PARAMETER COMBINATION !!! * PMES FOLLOWING COMBINATIONS ARE VALID: L " PMES 1 A,A+AU,A+AOUT,A+AU+AOUT z " PMES 2 C,C+CU,C+COUT,C+CU+COUT " PMES 3 M,M+MU,M+MOUT,M+MU+MOUT PMES 4 FC : PMES ANY COMB
0x0487ec…048980 Dummy {f00=0x0017, f01=0x403e, f02=»IF NEEDED n PEND P$PDISCE PEND .@ :N !!! * PMES FOLLOWING COMBINATIONS ARE VALID: L " PMES 1 A,A+AU,A+AOUT,A+AU+AOUT z " PMES 2 C,C+CU,C+COUT,C+CU+COUT " PMES 3 M,M+MU,M+MOUT,M+MU+MOUT PMES 4 FC : PMES ANY COMB
0x048980…048b14 (0, 92) Dummy {f00=0x0017, f01=0x4008, f02=»@ PRUN CCDD,0 C=@C= P$PDISCE M=@M=,A=@A=,C=@C= ( P$PDISCE M=@M=,A=@A= J P$PDISCE M=@M=,C=@C= f P$PDISCE A=@A=,C=@C= P$PDISCE M=@M= P$PDISCE A=@A= P$PDISCE C=@C= PMES PARAMETER? PEND P$PDISC
0x048b14…048ca8 Dummy {f00=0x0017, f01=0x2008, f02=» REF /A PRDS /A PKPF /S $ PEND 2 P$RDAFL > PASG /E1,@D=FL09 L PASG /A,DK d PRUN READFL v PKPF /A,@N PEND P$ASGFL PASG /E1,@D=FL09 PASG /A,DK PRUN READFL PKPF /A,@N PASG /E
0x048ca8…048e3c Dummy {f00=0x0017, f01=0x0190, f02=» 6 6 6 6 6
0x048e3c…048fd0 Dummy {f00=0x0017, f01=0x0190, f02=» 6 6
0x048fd0…049164 Dummy {f00=0x0017, f01=0x0190, f02=» :
0x049164…0492f8 Dummy {f00=0x0017, f01=0x0190, f02=»
[…0x2…]
0x049620…0497b4 (0, 93) Opaque[0x194]
0x0497b4…049948 # DirEnt {nam=»SUM «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x02f0, f03=0x0000}
0x0497b4…049948 IdxSect {
0x0497b4…049948 f00 = 0x0017 // 0x497b4 @0x0
0x0497b4…049948 f01 = 0x0004 // 0x497b6 @0x2
0x0497b4…049948 gno = [ // 0x497b8 @0x4
0x0497b4…049948 [0x00]: C0x0017.0x2.0
0x0497b4…049948 [0x01]: C0x0017.0x3.0
0x0497b4…049948 ]
0x0497b4…049948 }
0x049948…049adc Dummy {f00=0x0017, f01=0x0190, f02=» 5 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x049adc…049c70 Dummy {f00=0x0017, f01=0x0190, f02=»R * Z ` D L R L A L W W ` * @ bV& L | ** - Z ` d h X 8 8 ( 8Y, W W : ( " f SUM 10.0 (800314) *** SAV
0x049c70…049e04 Dummy {f00=0x0017, f01=0x0190, f02=»1 357 41000 0SAVE D I S C ONTO MAGTAPE 0SAVE U S E R ONTO MAGTAPE 0MEMORY OVERFLOW STATISTICS TOTAL NUMBER OF SAVED USERS: SAVED FILES: SAVED GRANULES: A X z USERID: @ bV
0x049e04…049f98 Dummy {f00=0x0017, f01=0x0190, f02=» A v : A B @ bV T X 9! A | bV ( @ bV(W @ bV " T F Z2 @ bV @ V D F X _ A z :( " f SUM 10.0 (800314) *** SAV
0x049f98…04a12c Dummy {f00=0x0017, f01=0x0190, f02=»1 357 41000 0SAVE D I S C ONTO MAGTAPE 0SAVE U S E R ONTO MAGTAPE 0MEMORY OVERFLOW STATISTICS TOTAL NUMBER OF SAVED USERS: SAVED FILES: SAVED GRANULES: A USERID: @ bV T Z
0x04a12c…04a2c0 Dummy {f00=0x0017, f01=0x0190, f02=» STATUS WORD: @ * P WRITE PROTECTED @ * P NOT OPERABLE @ * P END OF TAPE ( < $" = A A ( : A B A D @( L A B A D < ! X !XXT L( ( @ L! : h A B A D (
0x04a2c0…04a454 (0, 94) Dummy {f00=0x0017, f01=0x0190, f02=»_ 0Z2 U ]@ YF< Y< ZT L A ` * R P b bZ : h bZ : F SA?? DISC FILE CODE ? OK ? LISTING OF FILENAMES ETC.? < $" = @ 0 A 0 A 2 A 0 : A 2W @ n A 2 A R A U "
0x04a454…04a5e8 Dummy {f00=0x0017, f01=0x0190, f02=» A 2 : ; [ [ [ Z Z Z : : < , = = $ - Y : - : " :d H - " H - :0123456789ABCDEF A 9h _@ - Y : @ nY : @ U " : @ A R _ : N A : J (
0x04a5e8…04a77c Dummy {f00=0x0017, f01=0x0190, f02=» 1 0Z2 U ]@ YF< Y< ZT L A ` R P b bZ : hPAGE: J F SA?? DISC FILE CODE ? OK ? LISTING OF FILENAMES ETC.? < $" = @ A A A : A W @ Z V Z W Z R` P WX
0x04a77c…04a910 Dummy {f00=0x0017, f01=0x0190, f02=» 4X X [ Z _ TV 4P P _ lWJ U : l R O T O O W O U W W @ * @ A &P @ : _ _ _ 1^ _ 1Y P . 0^& Q *_8 W ?B?e + A "
0x04a910…04aaa4 Dummy {f00=0x0017, f01=0x0190, f02=»C P @ * XXXXING SECTOR: XXXX, STATUS WORD: XXXX ( READWRIT , %Q R Y W W Z ' [ : ; [ [ [ [ [ R Q @ - WJ @ - A R( X R X _ Q @ X A T -
0x04aaa4…04ac38 Dummy {f00=0x0017, f01=0x0190, f02=» 8 P A_A ( A_1 ) { l A_A [ P [ T 4 A . @ 0 8A:a @ . 8A:a V [ T @ . Z [ 8 T Z & & T @ . Z 8 TB . F ' & F % G A_: = A_1
0x04ac38…04adcc Dummy {f00=0x0017, f01=0x0190, f02=» [ U F A_;P [ _$ [ X Z @ . ! Z @ . H A_: , A_1X A_: _1 G^,U A_A @_1 . C ( A_1P A_A _ _ A l A A_A A_: = A
0x04adcc…04af60 Dummy {f00=0x0017, f01=0x0190, f02=»_2 _ G A_: , A_1X W A_: ( A_1 A_AT A_AW( A_A @_2 8A:a OQf @_2 . G A_: , A_1T0 : A_A @_2 8A:a PQ @_2 . G . F G U A_A A_: ) A_1P A_A
0x04af60…04b0f4 (0, 95) Opaque[0x194]
0x04b0f4…04b288 # DirEnt {nam=»RUM «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0300, f03=0x0000}
0x04b0f4…04b288 IdxSect {
0x04b0f4…04b288 f00 = 0x0018 // 0x4b0f4 @0x0
0x04b0f4…04b288 f01 = 0x0006 // 0x4b0f6 @0x2
0x04b0f4…04b288 gno = [ // 0x4b0f8 @0x4
0x04b0f4…04b288 [0x00]: C0x0018.0x0.0
0x04b0f4…04b288 [0x01]: C0x0018.0x1.0
0x04b0f4…04b288 [0x02]: C0x0018.0x2.0
0x04b0f4…04b288 ]
0x04b0f4…04b288 }
0x04b288…04b41c Dummy {f00=0x0018, f01=0x0190, f02=» 4 X 5 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x04b41c…04b5b0 Dummy {f00=0x0018, f01=0x0190, f02=» V b @ X D 4D;a<a * A A A R$S D L R( L A L 2 W v 0MT AT EOF! W H 2 A R Sr @ ^ _& @ V& 4 ** - &Z b N 0 8
0x04b5b0…04b744 Dummy {f00=0x0018, f01=0x0190, f02=» (800314) *** RESTORED FILES WITH GRANULE ADDRESSES ************** DATE OF RUN: YYMMDD 0RUM REL 10.0 DATE 80. 03. 14 12NC=8701 356 41000 0RESTORE D I S C FROM MAGTAPE 0RESTORE U S E R FROM MAGTAPE 0MEMORY OVERFLOW STATISTICS TOTAL NUMBER OF RESTOR
0x04b744…04b8d8 Dummy {f00=0x0018, f01=0x0190, f02=» P zW D * A x @ Q @ lT T A W 0 0 A | A K @ 4 K K @ T W N 4 0 @ 0 @ | V @ V N H @ vT @
0x04b8d8…04ba6c Dummy {f00=0x0018, f01=0x0190, f02=» OVFL W v 0CATALOG OVFL @ $ 4 v WHEN CREATING USER UUUUUUUU NEW USERID: N:O OF FILES RESTORED:, N:O OF GRANULES ALLOCATED: zE D I S C FROM MAGTAPE 0RESTORE U S E R FROM MAGTAPE 0MEMORY OVERFLOW STATISTICS TOTAL NUMBER OF RESTOR
0x04ba6c…04bc00 Dummy {f00=0x0018, f01=0x0190, f02=» lT z T RW A | A A K V6 B @ K B @ 0 0 ~ J @ | 9! A t V P R P v 0DISC OVFL W X V8 | 9! W ! T V B T ~ | Z$ V AQ, @ @ ~
0x04bc00…04bd94 (0, 96) Dummy {f00=0x0018, f01=0x0190, f02=» 4 v* WHEN RESTORING FFFFFFTT OF USER UUUUUUUU V A v @ v d ~ J ]x _ W S v UNEXPECTED TAPE MARK A v v RESTORED FILE NO GOOD _ < $" = 8 A A ( : A A ( A A ! X !XX
0x04bd94…04bf28 Dummy {f00=0x0018, f01=0x0190, f02=» A W ! T _ !//T ( _ 0Z2 U ]@ YF< Y< ZT A R 8 P Z : Z : 0DISC?? DISC FILE CODE ? OK ? LISTING OF FILENAMES ETC.? < $" = @ A A j A :
0x04bf28…04c0bc Dummy {f00=0x0018, f01=0x0190, f02=» @ d #U. A b @ b A d f p @ 8 N A : ; [ [ [ Z Z Z : : < , = = $ - Y : - : " :d H l - " H l - :0123456789ABCDEF A 9h R _@ - Y : @ ` nY : @ dU : @ ` A `R Z_
0x04c0bc…04c250 Dummy {f00=0x0018, f01=0x0190, f02=» A W ! T _ !//T 1 0Z2 U ]@ YF< Y< ZT A R P Z : PAGE: 0DISC?? DISC FILE CODE ? OK ? LISTING OF FILENAMES ETC.? < $" = @ A A A :
0x04c250…04c3e4 Dummy {f00=0x0018, f01=0x0190, f02=» : : W _" ~ n J 4X X [ Z _ ~ n JTV 4P P _ WJ U 4 : R O T O O W O U W W x A P @ : _ _ _ 1^ _ 1Y
0x04c3e4…04c578 Dummy {f00=0x0018, f01=0x0190, f02=» : A ]B v 0TOO MANY I/O ERRORS ON DISC P 4 @ v* XXXXING SECTOR: XXXX, STATUS WORD: XXXX ( READWRIT A ( @ P P,QT @ P0WH @ @ P> A Q8 ( ( _6 ( @ P W W @
0x04c578…04c70c Dummy {f00=0x0018, f01=0x0190, f02=» v LENGTH ERROR _ ( : , %Q R Y W W Z ' [ : V T(= @ | M ~ A | _ @ | V I ~ _ U X W @ | R A | L ~ M ~9# Z : _ _ _ 1^ _ 1Y
0x04c70c…04c8a0 Dummy {f00=0x0018, f01=0x0190, f02=» : A ]B v 0TOO MANY I/O ERRORS ON DISC P 4 @ v* XXXXING SECTOR: XXXX, STATUS WORD: XXXX ( READWRIT A ( @ P P Q @ P W @ @ P A Q ( ( _6 ( @ P W W @ ;
0x04c8a0…04ca34 (0, 97) Dummy {f00=0x0018, f01=0x0190, f02=» Z Z Z Z Z : :- 0123456789 d ' A A @ x 4 R" 4X @ x =C R 9 W - 9W: - 9W. ;c ` xQ( $ ,` A 5 <` @ x+ z @ x : W ~ M ~9# Z : _ _ _ 1^ _ 1Y
0x04ca34…04cbc8 Dummy {f00=0x0018, f01=0x0190, f02=» A W ! T _ !//T ( _ 0Z2 U ]@ YF< Y< ZT A R 8 P Z : Z : 0DISC?? DISC FILE CODE ? OK ? LISTING OF FILENAMES ETC.? < $" = @ A A j A :
0x04cbc8…04cd5c Dummy {f00=0x0018, f01=0x0190, f02=» @ d #U. A b @ b A d f p @ 8 N A : ; [ [ [ Z Z Z : : < , = = $ - Y : - : " :d H l - " H l - :0123456789ABCDEF A 9h R _@ - Y : @ ` nY : @ dU : @ ` A `R Z_
0x04cd5c…04cef0 Dummy {f00=0x0018, f01=0x0190, f02=» A W ! T _ !//T 1 0Z2 U ]@ YF< Y< ZT A R P Z : PAGE: 0DISC?? DISC FILE CODE ? OK ? LISTING OF FILENAMES ETC.? < $" = @ A A A :
0x04cef0…04d084 Dummy {f00=0x0018, f01=0x0190, f02=» : : W _" ~ n J 4X X [ Z _ ~ n JTV 4P P _ WJ U 4 : R O T O O W O U W W x A P @ : _ _ _ 1^ _ 1Y
0x04d084…04d218 Dummy {f00=0x0018, f01=0x0190, f02=» : A ]B v 0TOO MANY I/O ERRORS ON DISC P 4 @ v* XXXXING SECTOR: XXXX, STATUS WORD: XXXX ( READWRIT A ( @ P P,QT @ P0WH @ @ P> A Q8 ( ( _6 ( @ P W W @
0x04d218…04d3ac Dummy {f00=0x0018, f01=0x0190, f02=» v LENGTH ERROR _ ( : , %Q R Y W W Z ' [ : V T(= @ | M ~ A | _ @ | V I ~ _ U X W @ | R A | L ~ M ~9# Z : _ _ _ 1^ _ 1Y
0x04d3ac…04d540 Dummy {f00=0x0018, f01=0x0190, f02=» : A ]B v 0TOO MANY I/O ERRORS ON DISC P 4 @ v* XXXXING SECTOR: XXXX, STATUS WORD: XXXX ( READWRIT A ( @ P P Q @ P W @ @ P A Q ( ( _6 ( @ P W W @ ;
0x04d540…04d6d4 (0, 98) Opaque[0x194]
0x04d6d4…04d868 # DirEnt {nam=»DUMPA «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0318, f03=0x0000}
0x04d6d4…04d868 IdxSect {
0x04d6d4…04d868 f00 = 0x0018 // 0x4d6d4 @0x0
0x04d6d4…04d868 f01 = 0x000a // 0x4d6d6 @0x2
0x04d6d4…04d868 gno = [ // 0x4d6d8 @0x4
0x04d6d4…04d868 [0x00]: C0x0018.0x3.0
0x04d6d4…04d868 [0x01]: C0x0019.0x0.0
0x04d6d4…04d868 [0x02]: C0x0019.0x1.0
0x04d6d4…04d868 [0x03]: C0x0019.0x2.0
0x04d6d4…04d868 [0x04]: C0x0019.0x3.0
0x04d6d4…04d868 ]
0x04d6d4…04d868 }
0x04d868…04d9fc Dummy {f00=0x0018, f01=0x0190, f02=» l #2 5 8 fY%w x b # g $ ^ : 9 i $ 7 f w |4r tV u 3 j @ @ h @ z @ FLT T W A l A rQ P A v_B z A tT A r :
0x04d9fc…04db90 Dummy {f00=0x0018, f01=0x0190, f02=»_ @ v P d A v : < d = v = R 0W 1 v Y Y = YF> X d J 4 ` NO DATA.W ` END OF VOLUME W ` END OF TAPE Wn ` BEGIN OF TAPE WL ` END OF SEGMENT A nW ` END OF FILE A p A n
0x04db90…04dd24 Dummy {f00=0x0018, f01=0x0190, f02=»G W % ` PARITY ERRORW DUMP IN ^ BLOCK NO: SIZE: UNKNOWN STATUS WORD: BLOCKS SKIPPED. PRINTED: ' U8 ! T v ! T v 4 4 ~# T . 9 Y< F " v d " v Q
0x04dd24…04deb8 Dummy {f00=0x0018, f01=0x0190, f02=»" = @ A A A : A W @ n A A , A U , ( @ @ A A h ( : U h W @ #U. A @ 1 A p @ l A : ; [ [ [ Z Z Z : : < , = = $ -
0x04deb8…04e04c Dummy {f00=0x0018, f01=0x0190, f02=» @ U : @ A R _ : 1 A : $ SIZE: UNKNOWN STATUS WORD: BLOCKS SKIPPED. PRINTED: ' U8 ! T ! T 1 4 # T . 9 Y< F " " Q
0x04e04c…04e1e0 Dummy {f00=0x0018, f01=0x0190, f02=»" = @ A A A : A W @ ! R ?U : : $ - - Y : @ 4 Q $ 1 ^ ` 1 Y j d ~ d $ d T T d ^ @ @
0x04e1e0…04e374 (0, 99) Dummy {f00=0x0019, f01=0x0190, f02=»ME: : : FORMAT: R EDITDT EDLOOP DATFLD SLASK CVALOP TIMFLD LOOP TXT5 j TXT5:L TXT6 ~ TXT6:L TXT1 TXT1:L $ LOOOP : TXTAB LENTAB TXT4 TXT3 TXT2 TXT4:L TXT3:L TXT2:L A A l !AAPN !EE
0x04e374…04e508 Dummy {f00=0x0019, f01=0x0190, f02=» A A A W ` A ^ " : 0 d : [ R 8 !--P # 0Z Y" W W 9H [ : 4 Q $ d !SST@ vR<Q l vU0 vR P 9 _ rW t l / "( A z_ A ( A A
0x04e508…04e69c Dummy {f00=0x0019, f01=0x0190, f02=» ASCII OR EBCDIC ? ASCII OR HEXA/ASCII ? C: Q1:L yECB QUEST1 GETPAR l HEXAQA TABLEN MOVTAB LOOP EBCDIC FMTFLG HEXAQE Q2:L QUEST2 RETURN T NOHEXA 8 RORDER V COMND SCLAB ` INPREQ ^ PRMPTP " QUESTN 0 GET
0x04e69c…04e830 Dummy {f00=0x0019, f01=0x0190, f02=» LKM3 PROMPT PRPT:L IBF:L SPALOP L LOOPP l L001 | L002 ~ CTWECB TEXT1 CODE1 CODE2 ASCII A @ FDP 1 ! ( : @ FDP ! ( 1 @ FDT @ C A C W ( : 1 ( B @ FDT" T$ @ C A
0x04e830…04e9c4 Dummy {f00=0x0019, f01=0x0190, f02=» "( B T : C C ( LP NOT OPERABLE . x LOOP EBCDIC FMTFLG HEXAQE Q2:L QUEST2 R C C ( $ : &CASETTE:E1
0x04e9c4…04eb58 Dummy {f00=0x0019, f01=0x0190, f02=» - ! - - D - ( B R : @ ) D _ E1TK E4MT F4FD F5FD F6FD F7FD FILECODE: XX NOT OPERABLE A C ! @ FDT T @ C A
0x04eb58…04ecec Dummy {f00=0x0019, f01=0x0190, f02=» ( B T : C C ( LP NOT OPERABLE x LOOP EBCDIC FMTFLG HEXAQE Q2:L QUEST2 R C C ( $ : &CASETTE:E1
0x04ecec…04ee80 Dummy {f00=0x0019, f01=0x0190, f02=» - - - D - ( B R : @ ) D _ E1TK E4MT F4FD F5FD F6FD F7FD FILECODE: XX NOT OPERABLE A C @ FDT T @ C A
0x04ee80…04f014 (0, 100) Dummy {f00=0x0019, f01=0x0190, f02=» ( B T : C C ( LP NOT OPERABLE x LOOP EBCDIC FMTFLG HEXAQE Q2:L QUEST2 R C C ( $ : &CASETTE:E1
0x04f014…04f1a8 Dummy {f00=0x0019, f01=0x0190, f02=» - - - D - ( B R : @ ) D _ E1TK E4MT F4FD F5FD F6FD F7FD FILECODE: XX NOT OPERABLE A C @ FDT T @ C A
0x04f1a8…04f33c Dummy {f00=0x0019, f01=0x0190, f02=» ( B T : C C ( LP NOT OPERABLE x LOOP EBCDIC FMTFLG HEXAQE Q2:L QUEST2 R C C ( $ : &CASETTE:E1
0x04f33c…04f4d0 Dummy {f00=0x0019, f01=0x0190, f02=» - - - D - ( B R : @ ) D _ E1TK E4MT F4FD F5FD F6FD F7FD FILECODE: XX NOT OPERABLE A C @ FDT T @ C A
0x04f4d0…04f664 Dummy {f00=0x0019, f01=0x0190, f02=» ( B T : C C ( LP NOT OPERABLE x LOOP EBCDIC FMTFLG HEXAQE Q2:L QUEST2 R C C ( $ : &CASETTE:E1
0x04f664…04f7f8 Dummy {f00=0x0019, f01=0x0190, f02=» - - - D - ( B R : @ ) D _ E1TK E4MT F4FD F5FD F6FD F7FD FILECODE: XX NOT OPERABLE A C @ FDT T @ C A
0x04f7f8…04f98c Dummy {f00=0x0019, f01=0x0190, f02=» ( B T : C C ( LP NOT OPERABLE x LOOP EBCDIC FMTFLG HEXAQE Q2:L QUEST2 R C C ( $ : &CASETTE:E1
0x04f98c…04fb20 Dummy {f00=0x0019, f01=0x0190, f02=» - - - D - ( B R : @ ) D _ E1TK E4MT F4FD F5FD F6FD F7FD FILECODE: XX NOT OPERABLE A C @ FDT T @ C A
0x04fb20…04fcb4 (0, 101) Dummy {f00=0x0019, f01=0x0190, f02=» ( B T : C C ( LP NOT OPERABLE x LOOP EBCDIC FMTFLG HEXAQE Q2:L QUEST2 R ! ( $ : &CASETTE:E1
0x04fcb4…04fe48 Dummy {f00=0x0019, f01=0x0190, f02=» - - - D - ( B R : @ ) D _ E1TK E4MT F4FD F5FD F6FD F7FD FILECODE: XX NOT OPERABLE A C @ FDT T @ C A
0x04fe48…04ffdc Dummy {f00=0x0019, f01=0x0190, f02=» ( B T : C C ( LP NOT OPERABLE x LOOP EBCDIC FMTFLG HEXAQE Q2:L QUEST2 R ( $ : &CASETTE:E1
0x04ffdc…050170 Dummy {f00=0x0019, f01=0x0190, f02=» - - - D - ( B R : @ ) D _ E1TK E4MT F4FD F5FD F6FD F7FD FILECODE: XX NOT OPERABLE A C @ FDT T @ C A
0x050170…050304 Dummy {f00=0x0019, f01=0x0190, f02=» ( B T : C C ( LP NOT OPERABLE x LOOP EBCDIC FMTFLG HEXAQE Q2:L QUEST2 R ( $ : &CASETTE:E1
0x050304…050498 Dummy {f00=0x0019, f01=0x0190, f02=» - - - D - ( B R : @ ) D _ E1TK E4MT F4FD F5FD F6FD F7FD FILECODE: XX NOT OPERABLE A C @ FDT T @ C A
0x050498…05062c Dummy {f00=0x0019, f01=0x0190, f02=» ( B T : C C ( LP NOT OPERABLE x LOOP EBCDIC FMTFLG HEXAQE Q2:L QUEST2 R ( $ : &CASETTE:E1
0x05062c…0507c0 Dummy {f00=0x0019, f01=0x0190, f02=» - - - D - ( B R : @ ) D _ E1TK E4MT F4FD F5FD F6FD F7FD FILECODE: XX NOT OPERABLE A C @ FDT T @ C A
0x0507c0…050954 (0, 102) Dummy {f00=0x0019, f01=0x0190, f02=» ( B T : C C ( LP NOT OPERABLE x LOOP EBCDIC FMTFLG HEXAQE Q2:L QUEST2 R ( $ : &CASETTE:E1
0x050954…050ae8 Dummy {f00=0x0019, f01=0x0190, f02=» - - - D - ( B R : @ ) D _ E1TK E4MT F4FD F5FD F6FD F7FD FILECODE: XX NOT OPERABLE A C @ FDT T @ C A
0x050ae8…050c7c Dummy {f00=0x0019, f01=0x0190, f02=» ( B T : C C ( LP NOT OPERABLE x LOOP EBCDIC FMTFLG HEXAQE Q2:L QUEST2 R ( $ : &CASETTE:E1
0x050c7c…050e10 Dummy {f00=0x0019, f01=0x0190, f02=» - - - D - ( B R : @ ) D _ E1TK E4MT F4FD F5FD F6FD F7FD FILECO ; [ [ [ [ [ R Q @1 - WJ @1 - A1 R( X1 R X1 _ Q @1 X A1 T1
0x050e10…050fa4 Dummy {f00=0x0019, f01=0x0190, f02=» !$*); ??? &%->? :#@'=" ABCDEFGHI JKLMNOPQR STUVWXYZ 0123456789 ( R * 2| Y _ : ~ & P$ U ?V W _ vW 2 dW $UN # v v : $ : &CASETTE:E1
0x050fa4…051138 Dummy {f00=0x0019, f01=0x0190, f02=» - - - D - ( B R : @ ) D _ E1TK E4MT F4FD F5FD F6FD F7FD FILECODE: XX NOT OPERABLE A C @ FDT T @ C A
0x051138…0512cc Dummy {f00=0x0019, f01=0x0190, f02=» ( B T : C C ( LP NOT OPERABLE x LOOP EBCDIC FMTFLG HEXAQE Q2:L QUEST2 R ( $ : &CASETTE:E1
0x0512cc…051460 Dummy {f00=0x0019, f01=0x0190, f02=» - - - D - ( B R : @ ) D _ E1TK E4MT F4FD F5FD F6FD F7FD FILECODE: XX NOT OPERABLE A C @ FDT T @ C A
0x051460…0515f4 (0, 103) Opaque[0x194]
0x0515f4…051788 # DirEnt {nam=»OBX «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0340, f03=0x0000}
0x0515f4…051788 IdxSect {
0x0515f4…051788 f00 = 0x001a // 0x515f4 @0x0
0x0515f4…051788 f01 = 0x0018 // 0x515f6 @0x2
0x0515f4…051788 gno = [ // 0x515f8 @0x4
0x0515f4…051788 [0x00]: C0x001a.0x0.0
0x0515f4…051788 [0x01]: C0x001a.0x1.0
0x0515f4…051788 [0x02]: C0x001a.0x2.0
0x0515f4…051788 [0x03]: C0x001a.0x3.0
0x0515f4…051788 [0x04]: C0x001b.0x0.0
0x0515f4…051788 [0x05]: C0x001b.0x1.0
0x0515f4…051788 [0x06]: C0x001b.0x2.0
0x0515f4…051788 [0x07]: C0x001b.0x3.0
0x0515f4…051788 [0x08]: C0x001c.0x0.0
0x0515f4…051788 [0x09]: C0x001c.0x1.0
0x0515f4…051788 [0x0a]: C0x001c.0x2.0
0x0515f4…051788 [0x0b]: C0x001c.0x3.0
0x0515f4…051788 ]
0x0515f4…051788 }
0x051788…05191c Dummy {f00=0x001a, f01=0x0190, f02=» [ X R p X T0 x <~< ^ ^:^T^x^ ^ _ _ T0 * _ 8 0 d 0 0 $ 0 D F 0
0x05191c…051ab0 Dummy {f00=0x001a, f01=0x0190, f02=»
[…0x7…]
0x0525bc…052750 Dummy {f00=0x001a, f01=0x0190, f02=» *UD* *MD*
0x052750…0528e4 Dummy {f00=0x001a, f01=0x0190, f02=»
[…0x7…]
0x0533f0…053584 Dummy {f00=0x001a, f01=0x0190, f02=» ! !
0x053584…053718 Dummy {f00=0x001a, f01=0x0190, f02=»
[…0xa…]
0x0546e0…054874 (0, 107) Dummy {f00=0x001b, f01=0x0190, f02=»
[…0xa…]
0x05583c…0559d0 Dummy {f00=0x001b, f01=0x0190, f02=» ! !
0x0559d0…055b64 Dummy {f00=0x001b, f01=0x0190, f02=»
[…0x13…]
0x057960…057af4 (0, 111) Dummy {f00=0x001c, f01=0x0190, f02=»
[…0x1…]
0x057c88…057e1c Dummy {f00=0x001c, f01=0x0190, f02=» 0 0 0 0 0 0 0" $ & ( '00 0 ! # % ' $ 100 80-03-14MODULEIDENT=YYMMDDENTRY REFERRED FROM M
0x057e1c…057fb0 Dummy {f00=0x001c, f01=0x0190, f02=» STATISTICS E $ * 0 6 < B H J 0 ijk J 0 JB6B % _ _ _ F " A 1 1 , P PA PA P P 1 4 h J b 1 P PE P PD PC P P PC P P P@ P P PC P P ED
0x057fb0…058144 Dummy {f00=0x001c, f01=0x0190, f02=»Q P J Q R VP VP_ WP WP_& QA@4 P ED !B P EP P4 DP P4 # A R QR Q R R Q R Q _ J A A 4 P A% Q R Q$ R R0Q RA S R* S QR_ 0P PW 0P0Q 0QP P 4 "@ @ @ 4 $ A 1 "1 " 1 1 DC E 4 c&1 . ` 4 @`
0x058144…0582d8 Dummy {f00=0x001c, f01=0x0190, f02=»GA 4 Q G P Q(PA 4 p q r s t u v w x y z { - Q A PA"4 T P T P0P4 G F(GA )4 G0G GA 4 Q G P Q PA 0PA Q A S P P0P PA 4 4 UE h J b U G U U 4 SG R G(RA RIW 0RA 0HR RH P G(PA Q R W Q R p q r s t u v w x y + S A R0R PA& RA*4 @
0x0582d8…05846c Dummy {f00=0x001c, f01=0x0190, f02=»MBOLS* UNDEFINED *INPUT I/O ERROR* MULTIDEFINED ** UNREFERENCED *DOUBLE DEF MODULEINPUT FORMAT ERRORNAMES AREA OVERFLOWCHAIN ITEM AREA OVERFLOWINTERNAL ERROR IN INPUT ROUTINE -TTTT9 $ % # & Q la 0 # % 0 S: X ! $ & S ob
0x05846c…058600 Dummy {f00=0x001c, f01=0x0190, f02=»= d . e f NO EXTERNAL REFERENCES NO ENTRIES IN THIS MODULE ! p # q + r 3 s ; t C u K v S w [ x c y 1 OBX REL= d . e f 8701 378 4 d _ p q r ( s 0 t 8 u @ v H w P x X y ` z h { ( OBJECT CROSS REFERENCE: 8 ob G h J W DATE: i - j - k f
0x058600…058794 (0, 112) Dummy {f00=0x001c, f01=0x0190, f02=» 0 flc f d f d ( W W W > i* i i % Y m C n. & R V C n. h ' ( gZ( $ i^ P C C h i / "!@P n. C B h~ & % _ i W i i n. / W i h x g
0x058794…058928 Dummy {f00=0x001c, f01=0x0190, f02=» C W4781"&$ 39#$;< i B n. 'W i ( W C C C ( ' Pl i I "%@T^ B P B PR B 5W B TD P B % P C + j B P ! T B B U ( 5 _ "( l V I C B :( ' P i I : 6 V ?d ( # V "
0x058928…058abc Dummy {f00=0x001c, f01=0x0190, f02=» #? o ;D:B : n. C : m #0 T & C C : C C V W V Q (W Q W Q W j j 4 ! P T 0P(W$ 8 C S W C C 0 P C ;a 6 4 ZH T : 49d_Z B@5 @
0x058abc…058c50 Dummy {f00=0x001c, f01=0x0190, f02=» Lk R R _ R _ # Q R V > _V ' P _d P & 1 P 1_ , @ - R T U :B@ ' d k l l l m$m l m r.p p q0t4u u l mHmHm m m l m m x }>| |`| }>|:l m m m m l l l l @ t , V
0x058c50…058de4 Dummy {f00=0x001c, f01=0x0190, f02=»YPP > @l0] @l0]f 8_l ( 2 P W _ 2 # P LcjP " 2 P V D ! R T P _l 8^: Dl ! Pn DcxPh 6 7_* 2 # PR LclPL n. 2" &]P R W ^^ $! 6P Q $ T P DcjP _z _j _ _ _ 6 7
0x058de4…058f78 Dummy {f00=0x001c, f01=0x0190, f02=» W< 6 2 " T v n. : " # o ;b , (V ; [ n. Z H (;AR H & z ;AV: Z H # o ; 6 n. : & & Z 4 o : ,P T 4W
0x058f78…05910c Dummy {f00=0x001c, f01=0x0190, f02=» 7 : 4 ( ; V Y : 2! : 2 6 " # o ;b ; : W # " T & T + : * & !@P `1` P q Q ; 8 V W Q P # P ! P 4 V W Q P
0x05910c…0592a0 Dummy {f00=0x001c, f01=0x0190, f02=»T 9e! = K : #0 P8" T * & : * & !`P :J +_ +Q q _0 , V W R V W R XV W 1 ^ _0 R W ( V W Q P W ! W V P , V W Q P W $ W V P T
0x0592a0…059434 (0, 113) Dummy {f00=0x001c, f01=0x0190, f02=» 9 : & P Q r ,^ , < r # ; [ _n' d V W V 4! P < S S S X 4 9d * & ! R + : V W R 4 0R Y 7 Y& P Z,;D 9_8 8 _< V W YL T 9 : &9d
0x059434…0595c8 Dummy {f00=0x001c, f01=0x0190, f02=» Q 9d! )0 + P 7 Y Z $ _ : V ) 0 !0 " TV *V &V : V S W P 9 S W _ V P W T V E + : & 6 [ [ [ [ $ [ [ >h ; w r. w r. w p
0x0595c8…05975c Dummy {f00=0x001c, f01=0x0190, f02=» I Z ! : 4 P 9 59D_ ! :d" 5 : 0 !0 " Tz *V &V PP= ;@ R P W ;a=a P " R & R V T W V E + : & 6 [ [ [ [ $ [
0x05975c…0598f0 Dummy {f00=0x001c, f01=0x0190, f02=» _ T { [ w w [ QB [ w p { R [ _ w p w u Z ! Z $ Z %_P [ Q* w p w q R [ Z { w p z 9e! W Z : V I _ , " -! 9H X" ,9 -9d_ Z H D & H D % [
0x0598f0…059a84 Dummy {f00=0x001c, f01=0x0190, f02=»y { { y y x 6W4 K K K K : n. xV xF x n y P 2 " T W "@T '?W "? Hx " K :e J J " J _T Z ; 6 [ 7 J Q : Z 7 : Pd 4
0x059a84…059c18 Dummy {f00=0x001c, f01=0x0190, f02=» + n. [ [ < !AAP !TTT W !**T * [ R !FFP !EET W I{ 6 * B Z 9 ! ; *X 8 ! D{ 0P Wt 0W@ Wl :T& *W4 FP . :T Z ! XBW *X& FWF :P # U J 1 zX !00 ;_ _ 9P F " X<# ; W )0_@ J R
0x059c18…059dac Dummy {f00=0x001c, f01=0x0190, f02=»zX 8 !++P !-- z ;$# + ^" _( Z z^. PT*AXYZ9 y2 { : ! P ! P ! P ! P n. ! P m W : ! )P9H " # T &W &" :I : |. : P & _ &X _ : : : : ~H x : { : ~0$0T
0x059dac…059f40 Dummy {f00=0x001c, f01=0x0190, f02=» _( : ~0$0TH $ R W R # P W ) V E ~H$0T Wp W W ( ~0 [ ~H : Z !0 , !0P2 0 > 4 R :d" 8 R ! :DW ! 9 R R Y, : rL : n. n.#03 T jP kT T : &
0x059f40…05a0d4 (0, 114) Dummy {f00=0x001c, f01=0x0190, f02=»W ( ~d p *1 TID ADDR OP CR LVL MODIFIED OPERAND CREDIT 2.1 TRACE * A~dT ~X ( A~ A~d( ~d p A~ ) Y V A~h ~l V _ v A~ : ~ Wr ~ 2 n.
0x05a0d4…05a268 Dummy {f00=0x001c, f01=0x0190, f02=» W WX WT WP WL WH WD W@ W< W8 W4 W0 W, W( W$ W W W W W W W W W ~ ** A~f A~j ER A~~ R A~ ~ R 4 4 A~ ~ U 4 - _ ~~ @~ lb ILLEGAL OPERATION MIXED ARITHMETIC ILLEGA
0x05a268…05a3fc Dummy {f00=0x001c, f01=0x0190, f02=»ERFLOW INDEX OVERFLOW ILL INDEX TYPE DIV BY ZERO EDIT BUFFER OVFL EDIT PICTURE OVERFLOW "ALLOCATION ERR AT INITIALIZATION ILLEGAL INSTRUCTION ADDRESS ILLEGAL FORMAT CODE NO FIX BUFFER ALLOCATED FIX BUFFER NOT ALLOWED ILLEGAL CONTROL CODE ILLEGAL IN
0x05a3fc…05a590 Dummy {f00=0x001c, f01=0x0190, f02=» _ <a R f <a V : ( P W W W W W W W W W W W W ~ ** A~f A~j ERIDENT ( d n. J G ' n. J G ' n. J G ' l n. n. @ PB @ $;m @ P P $ + Y @
0x05a590…05a724 Dummy {f00=0x001c, f01=0x0190, f02=»P P % A dW A A @ ' l ( : ( B RBP T2! T>W4 @ ! P4 U ! T( A B A B A : A : A : d_^ n. &9! ' l : ( v N @ X W 7 W N P <!@P ] ]
0x05a724…05a8b8 Dummy {f00=0x001c, f01=0x0190, f02=» Z h * & K [ * & i [ 6 * & [ d * & [ * & [ * &
0x05a8b8…05aa4c Dummy {f00=0x001c, f01=0x0190, f02=» [ x * & Y * & w D * & r * & * & * &
0x05aa4c…05abe0 Dummy {f00=0x001c, f01=0x4090, f02=» * & !g ] $ $ ! ] R !g! ] z@ ] r * & * & * &
0x05abe0…05ad74 (0, 115) Opaque[0x194]
0x05ad74…05af08 # DirEnt {nam=»PDISC «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x03a0, f03=0x0000}
0x05ad74…05af08 IdxSect {
0x05ad74…05af08 f00 = 0x001d // 0x5ad74 @0x0
0x05ad74…05af08 f01 = 0x0010 // 0x5ad76 @0x2
0x05ad74…05af08 gno = [ // 0x5ad78 @0x4
0x05ad74…05af08 [0x00]: C0x001d.0x0.0
0x05ad74…05af08 [0x01]: C0x001d.0x1.0
0x05ad74…05af08 [0x02]: C0x001d.0x2.0
0x05ad74…05af08 [0x03]: C0x001d.0x3.0
0x05ad74…05af08 [0x04]: C0x001e.0x0.0
0x05ad74…05af08 [0x05]: C0x001e.0x1.0
0x05ad74…05af08 [0x06]: C0x001e.0x2.0
0x05ad74…05af08 [0x07]: C0x001e.0x3.0
0x05ad74…05af08 ]
0x05ad74…05af08 }
0x05af08…05b09c Dummy {f00=0x001d, f01=0x0190, f02=» > :T:
0x05b09c…05b230 Dummy {f00=0x001d, f01=0x0190, f02=»
[…0x9…]
0x05c064…05c1f8 Dummy {f00=0x001d, f01=0x0190, f02=» :01 p
0x05c1f8…05c38c Dummy {f00=0x001d, f01=0x0190, f02=»
[…0x1…]
0x05c520…05c6b4 (0, 117) Dummy {f00=0x001d, f01=0x0190, f02=» P
0x05c6b4…05c848 Dummy {f00=0x001d, f01=0x0190, f02=»
[…0x3…]
0x05cd04…05ce98 Dummy {f00=0x001d, f01=0x0190, f02=» VOLUME 2 L VOLUME 365 2 & 0 F ` x * < V j 600PDISC REL 10.0 DATE 80.12.10 12NC=8701 082 41000 STATUS WORD: XXXX , IN
0x05ce98…05d02c Dummy {f00=0x001d, f01=0x0190, f02=» NO TOSS DISC FORMAT BADSPOT ON TRACK ZERO MORE THAN 5 BADSPOTS FLEXIBLE DISC WRITE PROTECTED ONE OR MORE VOLUMES UNKNOWN DISC OVERFLOW TOO MANY EXTENTS ILLEGAL BLOCKLENGTH VTOC OVERFLOW FILENAME ALREADY USED FILENAME UNKNO
0x05d02c…05d1c0 Dummy {f00=0x001d, f01=0x0190, f02=»LE INPUT DISC I/O ERROR TOO MANY SECTORS IN FILE , &| ' ' @ "T A A &0 "l @ 8 ! P $l @ " A &0 @ A A @ A L A NV P A @ "U H COP T A X *$ A
0x05d1c0…05d354 (0, 118) Dummy {f00=0x001d, f01=0x0190, f02=» @ J A Pd @ @P0 @ NP @ LT$ %@ % & A &0 @ A B * W. &0_d Y A f @ R )z )j A 8 f @ NP %@ % & A "l @ @ A A G "N A , A A @ A @ A A A X A ( E X Y X E Y
0x05d354…05d4e8 Dummy {f00=0x001d, f01=0x0190, f02=» R A _ & _ XPD @ @ P @ RB @ A ( @ R )z )j ( A A 8 f @ Z6 @ @ Y@W & X "l @ G @ G G ) & &| &|( "rW$ A A % @ ! : A N . A % @ P T P _
0x05d4e8…05d67c Dummy {f00=0x001d, f01=0x0190, f02=» 8 + : A % @ P T V _ 11P . D : 00 :: " _l : & 0 P 1 Q 1 Q 0 P @ "P 1 Q F A d A & : &X : p 0V , - P X 9A_ : $BR" ;D (!
0x05d67c…05d810 Dummy {f00=0x001d, f01=0x0190, f02=» x V W U A L + A R : @ P % @ T p R: 8 :p P <` D E ;@ % _> @ T " A TT A P : h @ R A J R A J U @ N A N + h + A R : P 8 @ P @ T R U +
0x05d810…05d9a4 Dummy {f00=0x001d, f01=0x0190, f02=» @ "P @ ( @ @ , T~ A : M R W - M : P V 0 : W W W p l C P l C ( : & &| & W W W W _$ W _, W & "d ? $ & Y :0123456789ABCDEF A A % v < (
0x05d9a4…05db38 Dummy {f00=0x001d, f01=0x0190, f02=»& A ( @ @ , & xPT Z ( P T T _. P P @ Z < ! X" !,,X( 5 _ @ !@@TV @ ! CT< $ % Q ( ! P R| ! Qv % _ . + W( + @ ! AP P T8 A " T ( $8
0x05db38…05dccc Dummy {f00=0x001d, f01=0x0190, f02=» QB_ P ( ! X W0 P& ( ! X !::P !00R !99Q _$ T : & W > P W A $ 8 + @ &T4 @ "P Q, 9H A dW" S A 6 A a A b A d A f @ ( A h + 0 A & @ $P 7D W ,v + P T P W @ "T @ h Y A : P 8 $ "d @
0x05dccc…05de60 Dummy {f00=0x001d, f01=0x0190, f02=»P & % _h &0_n @ DP & [ : A D D A F A H +b R4Q@ A & A H A D @ D @ @V2 &0 @ D D @ @ H E B_T A & A H_L &0 _V A @ @ @ A @ A % A A 2 *$ : T E A FQ W V |Z" : Q ( % _ : ;
0x05de60…05dff4 (0, 119) Dummy {f00=0x001e, f01=0x0190, f02=» A,$ A, A, A,& A, A,( , P A, @, P 7` @, : R !LLP< R 1 R 2 Y A,r A,p A,n Y A,n A,p @,rW S 1 A,n S 2 A,p A, -
0x05dff4…05e188 Dummy {f00=0x001e, f01=0x0190, f02=» W Q ( , X "' "' A,V @,$ / R 0 $' R T W $ T A,V R !LLP @, T A,8 A,: R 1 R 8 A,J R 6! A,HPJ A,N A,P @,8 @,: :` A,8 A,:S$ @,N @,P : Y4 @,8 A,H @,: A,JW : A, A, @, @, @,p :` A, A, @,H @,J : A,H A
0x05e188…05e31c Dummy {f00=0x001e, f01=0x0190, f02=» A, A, R A, A, A, . A,j9H A,h A,f A, A, A, @,&P A, A,& B A/ ( B 1& @/ C C @,h C ( C B / 1 : @,h:c A,l A,< A,> A,@ A,B @, A,4 @, A,6 A,N @,4 @,6 :` A,4 A,6 @,N R 14 0 A,8 0 A,:
0x05e31c…05e4b0 Dummy {f00=0x001e, f01=0x0190, f02=» @,:Y A,L @,8 A,@ @,: A,B_ @,8 A,< @,: A,> @, A,8 @, A,:W 5 T^ Q 1 Q Q ,Z R A, @, A,d A,f @,h C ( C @,b /T @,tT 4 A,t : W W : _ @,$T _ _ R @, A,8 @, A,: !LLPJ @,< T @,> @,p 30 P A,D P A,F @,< @,> @
0x05e4b0…05e644 Dummy {f00=0x001e, f01=0x0190, f02=» @,> 1 5 0 P A,< 0 A,> A,8 A,: @,p : A,8 A,: @,8 @,: @,p :` A,8 A,: @,< @,> @,p : A,< A,>^6 @,8 @,: P P :` Q Q P A,< 0 A,> @,< @,8 @,: : A,< A,>T Q Q @,< Q @,> 1 @, @, @,8 @,: : A, A, A,< A,> @,VP @,H @,J @,8 @
0x05e644…05e7d8 Dummy {f00=0x001e, f01=0x0190, f02=» @,X A,p -$ / : : A, @, @,j A, 2 C A, @, @, 1" A,d A,f ( @,b / 1 , 6 P J S T $ 1T P _ , X`_2 A," : @, T 3 @, 1 Q : ,, 3 @, 9 @, K @, K @,8 K @,: K @,D K @,F K K
0x05e7d8…05e96c Dummy {f00=0x001e, f01=0x0190, f02=» 4 K & K ( K ) ( @,b / 1 : @, T 3 @, 1 Q : ,, 3 @, 3~ A," 6 2 A, @,n % @, R 2 R 1 % Y @,8 A,N @,: A,P @,D @,F A,R A,T :` A,8 A,: ,Z @,n C @,R A,d @,T A,f( C @,R @,T @,p @,VP @,X :` A,R A,T @
0x05e96c…05eb00 Dummy {f00=0x001e, f01=0x0190, f02=»:` A,R A,T @,8 @,RY`R @,: @,TYl @,N A,8 @,P A,: : A, @, Q6 A, 9 9 9 A9 ( 9 9 A9 ( : 9 @, 0 A:0 @,D @,F :9 K6 @,8 @,: :I K6 ,, :O @,$T :X 9 : A A: ( ,Z @, : A,( 7 T @,"T : A,
0x05eb00…05ec94 (0, 120) Dummy {f00=0x001e, f01=0x0190, f02=»,b / 1 J A, J A,8 J A,: J A,D J A,F 6 R @,h9c A,l @,l 9l 0 A7@ 0 A7B @7@T @7B 9f P @,DT P @,F 7p A,N A,P A7> @7@ @7B P P :` A7@ A7B @,N @,P @7> @,D @7@Tr @,F @7BTh P A,D P A,F A,N A,P A7> P 0 @,8 @,: :` Q 1 P
0x05ec94…05ee28 Dummy {f00=0x001e, f01=0x0190, f02=» @,F @7B 8 @,D Q @,F Q _ 8 7p 3, @,8 I @,: ) @,D I @,F I 7p ( - : 9 FILE 9 9 VOLUME NAME FILE EXT.NO EXTENT BASE EXTENT LENGTH : A
0x05ee28…05efbc Dummy {f00=0x001e, f01=0x0190, f02=» Q S W S Q R S P W S _ R _ ;A [ :; ;J ;
0x05efbc…05f150 Dummy {f00=0x001e, f01=0x0190, f02=» NUMBER OF BADSPOTS = -WRITING THE SECTORS -FORMATTING THE DISC -CHECKING THE SECTORS TOSS REL 10.0 Z $ A< D A< D A< D A< D A< [ : Z $ A< D A< D A<
0x05f150…05f2e4 Dummy {f00=0x001e, f01=0x0190, f02=» V : = = = : = = = : << 2 C C ( B & D B .P " T D : A< @ A<@ A<2 =& R ' P P =XN$N$O$ < M ? =XO P Q < [+ [h 4 =&[4 4 P =XRHRHRH < rS
0x05f2e4…05f478 Dummy {f00=0x001e, f01=0x0190, f02=»&? &@ Wf R =XRHRHRH < L L P@ =XRHSHTH < 1g 1h P =XKxLxMx < L L W 2 A<> A<0 $ A<K $ A</ A<= R ! T << A< ( B D " D P C C ( @T C In D << 2 C I I " C
0x05f478…05f60c Dummy {f00=0x001e, f01=0x0190, f02=» C In A<> A<> D << R R C ' P ( C ( B R % R E R E B N< % Z R R E ( ( ( A<V A<X A<, ; A; ;J A;J ; A; ; A; 2 <x = << A<@ A< 2
0x05f60c…05f7a0 Dummy {f00=0x001e, f01=0x0190, f02=» A;J = @< @< U, Y A<@ Y A<@_ A< A<@_ < A<@ A<2 = <. ( $ A<> = << ( = <. B & D B P Wl @<2 Y 2 < < P W T = T P < < W( $ Y
0x05f7a0…05f934 (0, 121) Dummy {f00=0x001e, f01=0x0190, f02=» <<( <. ( = << B & D B P W @<@ Y , < < P W T = T P < < W $ Y P = _2 < < = = @< TP @< U| QB A<@ Q4 A<@W* T P6 @; ;JV. A; = =
0x05f934…05fac8 Dummy {f00=0x001e, f01=0x0190, f02=»W <,^` - $ M _> H <,^| - ( M _ @; Q> <,^ ( M H - _" @;JQ <,^ $ M D - _" A; <u J0 <^ = <, ; @; QT @; 4 T = : 1 Q @; Q4 4 T : = 1 Q @; Q _* @; W @
0x05fac8…05fc5c Dummy {f00=0x001e, f01=0x0190, f02=»_4 _ % <, R @< Y Y 2 T T 4 R _ T 4 : U 5 <Z = < A<@ G A< @< Q U( _ 2 % 2 * % Y : ; G 2 * @; Q Pl * BA % DS % PO % T % 5
0x05fc5c…05fdf0 Dummy {f00=0x001e, f01=0x0190, f02=»< 9A D< 2 @< R V 2 U A< = ]D 2 2 @< % % <Z ) % % Z @< % @< % @< % < ( % Y 2 % @< O . R O 1 R O 0 = <.( @<6 D H : @< T <.
0x05fdf0…05ff84 Dummy {f00=0x001e, f01=0x0190, f02=» I< $ ) Y I& IB I IB AI I ( I IB `I YP 2 : R _ P 0 - : ; [ V - - ' I I d I I I Z : : ; J* I : V *W R - _ 1 T R PJ* - _ :
0x05ff84…060118 Dummy {f00=0x001e, f01=0x0190, f02=» Jt d Jt Jt J Z Z Z Z : : ; K. J : V *W R - _ 1 T R PK. - _ :
0x060118…0602ac Dummy {f00=0x001e, f01=0x0190, f02=» 0 R _ <d?d U ?e R P S ?C/ G O % R ' P % =B S t w E M % t R.Q& @ Q R %| _B _& : T G.G K. A ;A; G. T ] S .
0x0602ac…060440 Dummy {f00=0x001e, f01=0x0190, f02=» #P & B. T P ' " P : P S P S P " ^_" F t v @0 UU 3 2P _ 4 , ) T G.G K. A ;A; G. ] $ ] S <% T V S @- S S < M % T S "
0x060440…0605d4 (0, 122) Dummy {f00=0x001e, f01=0x0190, f02=» " P #P ( B. T P ' " P : P S P S P " `_"O =D @ t w E M T 1 E _ M @ p : 6 "? UU t 3 2P _ 4 , 5 T G.G K. A ;A; G. ( ] ]
0x0605d4…060768 Dummy {f00=0x001e, f01=0x0190, f02=» P X _ R R "? R R P h:B* S R P S B J 4R 4 :B 4 R : V V 49B R 4R @ t w A I ! j :Qh P #P ( B. T P ' " P : P S P S P % `_" X1
0x060768…0608fc Dummy {f00=0x001e, f01=0x0190, f02=» : Z : %? v S : S f S 6 S b% =A S ^ S ` x UU 3 2P _ | , ) p ?e =e Q P ?e R P S ?C/ G O % R ' P % =B S t w E M % n : T G.G K. A ;A;
0x0608fc…060a90 Dummy {f00=0x001e, f01=0x0190, f02=» P X _ R z R 6"( R ~ | S P #P & B. T P ' " P : P S | P S ~ P " ^_" @ t w A I ! j :Qh P #P ( B. T P ' " P : P S P S P % `_" X1
0x060a90…060c24 Dummy {f00=0x001e, f01=0x0190, f02=» !@P !-v$ P !-v !-v 26 !-v T X " C T Y " + X Y " Y > X " X "" Y %Q Y > X Z2<BR > - Y !-v T X !-v Y " Zn 2. T _ !-v X $ P !3 0 R V P P" !-v 2FW 26 ." X $ X !3 _
0x060c24…060db8 Dummy {f00=0x001e, f01=0x0190, f02=» )X R@ X X "" Y & X % V Y !3 X $ X " !3 X & 0 0 `R Y !-v !-v !-v 4 !-v V !-v V W :h !-v 4 X %" X ## R 4 26 > 42 6 Y U R -P 6 X ( ) Y * 6 X " PP:A:
0x060db8…060f4c Dummy {f00=0x001e, f01=0x0190, f02=» % 5 X (T !- W 76 Y * V 7& !- B P X " _Z B P$ $$ R % C 7&* !- W Y 'PH Y &P> Y $P Y %P 7& R _Q P OR R W " !- B 4` Wr W 0 Z 7& !- B Z Z& X * ,T @ W X (P Y * 0 %_. % Y * W
0x060f4c…0610e0 Dummy {f00=0x001e, f01=0x0190, f02=» 76 X *T * W Y ( - + ? X :a Z T T W P X :d Y > > ? 8 R @RT V @% =cWP R`P R&P8 R P W 9 WD $ P W _ $ P _$ _*_, _ %0=c X 0P > 0 > >_ B 1 > @T , _ ' "?:B ] d
0x0610e0…061274 (0, 123) Opaque[0x194]
0x061274…061408 # DirEnt {nam=»TOSSUT«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x03e0, f03=0x0000}
0x061274…061408 IdxSect {
0x061274…061408 f00 = 0x001f // 0x61274 @0x0
0x061274…061408 f01 = 0x0014 // 0x61276 @0x2
0x061274…061408 gno = [ // 0x61278 @0x4
0x061274…061408 [0x00]: C0x001f.0x0.0
0x061274…061408 [0x01]: C0x001f.0x1.0
0x061274…061408 [0x02]: C0x001f.0x2.0
0x061274…061408 [0x03]: C0x001f.0x3.0
0x061274…061408 [0x04]: C0x0020.0x0.0
0x061274…061408 [0x05]: C0x0020.0x1.0
0x061274…061408 [0x06]: C0x0020.0x2.0
0x061274…061408 [0x07]: C0x0020.0x3.0
0x061274…061408 [0x08]: C0x0021.0x0.0
0x061274…061408 [0x09]: C0x0021.0x1.0
0x061274…061408 ]
0x061274…061408 }
0x061408…06159c Dummy {f00=0x001f, f01=0x0190, f02=» Ii : j 0 $ ^ : 9 i $ 7 f w |4r tV u 3 qC 5 * zuqV $ ' > P ZD o c r P| sV i % 9Zj Q > - D $ 4` 1P -8 T r tB l`Tg t z ^ + RC: 6 F j z
0x06159c…061730 Dummy {f00=0x001f, f01=0x0190, f02=» ;PROGRAM ABORTED BY OPERATOR; TP TO > R > C ( B P 0_ B C : $ !; P I , =Z I , * C C ( : $ !; P I , =Z I , * _: [ * N` Z : [ [ [ [ QxP~
0x061730…0618c4 Dummy {f00=0x001f, f01=0x0190, f02=» : [ _ $6 Y R $6 Y$R $6 $> Y6 _ [ [ Q. , 0R" 9U AR FQ 0 P =D _, [ Z Z : = ! U 9 - Y : [ [ [ [ [ [ [ Rd 0=A O T R !LLT
0x0618c4…061a58 Dummy {f00=0x001f, f01=0x0190, f02=» : TO >EV UP ZN j TO >BV 0W,_d>AV* b P P~ >Px Pr PlW _ A h TO >FV :A HQD @ hY HQF @ hZ >AV R W _ _ @ h @ l >BV -Wp>AV -Wh>AVd B j RV _ @ l T T S S S S >T T S S S S @ j - -
0x061a58…061bec Dummy {f00=0x001f, f01=0x0190, f02=» 0_ @Nj @ j EXT ( HNlP X$_ @ l INn :a A f ;a LO # A A ^ P A ^ TH N #( W0 @ ^P N #( : d M ^ R _ N| W `_ * @ P8 P2 R " R Q N #( @
0x061bec…061d80 Dummy {f00=0x001f, f01=0x0190, f02=» @ f:A HNl A x HNn A z p ( A A A A A A 8 P A @ P @ : R !LLP< R 1 R 2 Y A A
0x061d80…061f14 (0, 124) Dummy {f00=0x001f, f01=0x0190, f02=»FD J T ( B TH ( B T< C C ( B P ! W B Q* ( , X "' ` _ "' A @ R 0 $' R T W $ T A R !LLP @ T A A R 1 R 8 A R 6! A PJ A A @ @ 5| A A
0x061f14…0620a8 Dummy {f00=0x001f, f01=0x0190, f02=» A A @ PZ @ A @ A @ A @ Y P8 @ A @ @ @ 5 P Y @ @ 5 A A A R A A A . A 9H A A A A A @ P A A B A H ( B @ H C C @ C ( C B / : @ :c
0x0620a8…06223c Dummy {f00=0x001f, f01=0x0190, f02=» @ @ R Q @ @ R @ A @ A @ @ ZTQ @ @ Z` @ @ R:Q @ @ U. @ @ Y R @ @ Y A @ A @ A _ @ A @ A @ A @ A W T^ Q 1 Q Q R A @ A A @ C ( C @ /T @ T A : W
0x06223c…0623d0 Dummy {f00=0x001f, f01=0x0190, f02=» A RnX W4 @ @ @ @ 5 A A ( @ P A P A @ @ P P 5| Q Q @ Q @ 1 z P A 0 A A A @ 5 A A @ @ @ 5| A A @ @ @ 5 A A ^6 @ @ P P 5| Q Q P A 0 A @
0x0623d0…062564 Dummy {f00=0x001f, f01=0x0190, f02=» z A A @ J : A z : P2 . P* @ P @ A @ A @ A J : : A @ @ A 2 C A @ @ A A ( @ / 6 P J S T $ 1T P _ X`_2 A : @ T
0x062564…0626f8 Dummy {f00=0x001f, f01=0x0190, f02=» R 1:H R K R !LLT R 4:H R 5 K K $ K & A ( F . " F R !LLP R 6 K % R 4 K & K ( K ) ( @ / : @ T , @ Q : , @ * A 8 2 A @ % @ R 2 R 1 % Y @ A @ A @ @
0x0626f8…06288c Dummy {f00=0x001f, f01=0x0190, f02=» @ Yd @ A @ A @ C @ A @ A ( C @ / @ @ @ @ P @ 5| A A @ @ Y`R @ @ Yl @ A @ A : A @ Q6 A T h F A X ( p 9 A t ( F @ 0 A @ @ 5: @
0x06288c…062a20 Dummy {f00=0x001f, f01=0x0190, f02=» T> , @ P. T& A z : P . P _> : F @ - ( @ / J A J A J A J A J A 8 R @ 9c A @ 0 A 0 A @ T @ P @ T P @ A A A @ @ P P
0x062a20…062bb4 (0, 125) Dummy {f00=0x001f, f01=0x0190, f02=» @ @ T _ ] = ] ] A A A P P @ @ 5 A A @ @ @ @ @ @ @ @ Q @ Q _ @ I @ ) @ I @ I ( - : ` FILE | 9 VOLUME NAME FILE EXT.NO
0x062bb4…062d48 Dummy {f00=0x001f, f01=0x0190, f02=»ETEDDU1 DU2 DU3 DU4 MD1 MD2 FD1 FD2 1 0 0VOLUME NAME: DISC: 0FREE SPACE TABLE 0EXT BASE EXT LENGTH OF ENTRIES USED 0VOLUME TABLE OF CONTENTS 0FILE FILE FILE
0x062d48…062edc Dummy {f00=0x001f, f01=0x0190, f02=»LEN ORG LENGTH FACT REC NO SEC NO EXT NO DATE PER FILES ADDRESS NO NO/SOP 0NUMBER OF FREE ENTRIES IN VTOC = ( - : C ( B z : 2 A A p A R A R A A , ` @ , P _ ,
0x062edc…063070 Dummy {f00=0x001f, f01=0x0190, f02=» t 2 H , 9 TO 4 4 I ` Y 0 * 8 $ * ^ * , A | , A t , A v " , A x @ x A >c A z C ( B . t B & ~ A 4 * ~ * * 2 z 4P 4W 4P4 A p 5: 4 4
0x063070…063204 Dummy {f00=0x001f, f01=0x0190, f02=» * | t r x r D ( B . t B & ~ v v]B *% 8 R p v R J U !LLT2 J " c 44 J " k 44 - U 8 U T U ZW - U d U l J 8 44 J ? 44 J J 5:
0x063204…063398 Dummy {f00=0x001f, f01=0x0190, f02=» T 44 J & X 44 v R p $ ! R !__Q Y . % Y p * W A @ 44 4 * & * 4 * W W W W :LPOP XLS TK1 TK2 MT1 MT2 pqCSH @ j !NNP !YYP D A h : @ j! P P D A h
0x063398…06352c Dummy {f00=0x001f, f01=0x0190, f02=» j ` Z D A h : W D @ j CDP FDP MDP DUT : W W S : @ j $P Wj 9a D A h : @ j I P ^ WF : R I j W6 : R !LLT : @ j! YT A h @ f &T : X #2 A W* A A A A W$ A A
0x06352c…0636c0 Dummy {f00=0x001f, f01=0x0190, f02=» P _ @ T A A! W @ P A _ A _ @ f F ] F ( = F F ( = P P P P _* _0 F ] @ @! ! A! ( B ( @F LP F ] : ] < ( A! @! @ T A
0x0636c0…063854 (0, 126) Dummy {f00=0x001f, f01=0x0190, f02=»F F ( = P P P P _& _, @ f *T $ @ f *T F B C W @ P F B C @ f *T %T T" B A! F A! ! : ( B T : ! P ! L' P< ( @! P W ! ( Q 9A DV2T
0x063854…0639e8 Dummy {f00=0x001f, f01=0x0190, f02=» @ j DKTj A : @ j DKP WX A : @ j DKX. W6 S DK ! A H H P Y S ( a S : W D ! P !TTP " W0 " W& " E P " A W " A h : @ j @ l "P ^ Wp C ;b : @
0x0639e8…063b7c Dummy {f00=0x001f, f01=0x0190, f02=» A "@W 0 _ A W< ! @ h # ( B # TlW IBM LABEL;TOSS LABEL; A W ! ( B ' @ h #( B P R P $ T W T # P :' P P #xW # _ j $6 Z rQ0 , 0 $6 Z %U #2 : ,! 9D ,"
0x063b7c…063d10 Dummy {f00=0x001f, f01=0x0190, f02=» : "_ _ S : 6 W @6 A h : 6 &P P @W W F < ) F < ) P P P P _& _, : &PV T 6 6> % T@ @ A W2 6 6^ % T @ A W 6> 6^ % T @ A W : $ ) :
0x063d10…063ea4 Dummy {f00=0x001f, f01=0x0190, f02=» A "@W 0 _ A W ! @ h # ( &^ B # T W IBM LABEL;TOSS LABEL; A W ! ( B ' @ h #( & P R P $ T W T # P :' P P #xW # Z % NUMBER OF BADSPO
0x063ea4…064038 Dummy {f00=0x001f, f01=0x0190, f02=» Z $ A' D A' D A' D A' D A' [ : Z $ A' D A' D A' D A' D A' [ : Z $ A' D A' D A' D A' D A' [ : ' C C ( : S : : V : (f (f (f : (v (v (v : ' 2 C
0x064038…0641cc Dummy {f00=0x001f, f01=0x0190, f02=» ' M *` ( h i j ' [+ [h 4 ' [4 4 P ( a a a ' rS S E ' q+ W R ' &? &@ ( a a a P ( a b c ' P ( c d e ' &? &@ Wf R ( a a a ' L L P@ ( a b
0x0641cc…064360 Dummy {f00=0x001f, f01=0x0190, f02=» B / " /~ P C C ( + C `x / ' 2 C I I " C ( + ( + C W B 9 R ! T : /~ / ' C C C ( B ! : /~ C `x A' A' / ' R R C ' P (
0x064360…0644f4 (0, 127) Dummy {f00=0x0020, f01=0x0190, f02=» A% & A& &^ A& & A& 2 '@ (R ' A' A' 2 (f ' T (f ( ' Tv B & /~ B /~ P& T /v @& & /z ) I A& (f @' @' U, Y A' Y A' _
0x0644f4…064688 Dummy {f00=0x0020, f01=0x0190, f02=» P Wl @& Y 2 ' ' P W T (f T P ' ' W( $ Y P (f_2 ' ' W& T /v @% & /z A% ( ( @' T& @' /j Q A& Q @ A& ' ( & ( ( ' B & /~ B P W
0x064688…06481c Dummy {f00=0x0020, f01=0x0190, f02=»( ( @' TP @' U| QB A' Q4 A' W* T P6 @% & V. A% ( ( & ( -` ' ( .r W W W W W 3 : A& A' @& % & @% Qv @& QN $ (Q*R D H R Q W & ^` - $ M _> H & ^| - ( M _
0x06481c…0649b0 Dummy {f00=0x0020, f01=0x0190, f02=» 4 T ( 5 1 Q @& Q4 4 T 5 ( 1 Q @& Q _* @& W @' @' 5 Q 1 Q A& @' A' &Z & 2 P T 0P( 0 % % @& Q ( _4 _ % & R @' Y Y 2 T T 4
0x0649b0…064b44 Dummy {f00=0x0020, f01=0x0190, f02=» * % Y : & 1 2 * @& Q Pl * BA % DS % PO % T % 5 Y 5 Y % % , % , % B % % (_x ( ^ W ( Y A' R " T `' A' 9A D' 2 @' R V 2 U
0x064b44…064cd8 Dummy {f00=0x0020, f01=0x0190, f02=» ( % Y 2 % @' O . R O 1 R O 0 ( & ( @& /~ 3 : @' T & : R _ P 0 - : ; [ V - - ' 3 3 d 3 3 3 Z : : ; 4. 3 : V *W R - _ 1 T R P4. -
0x064cd8…064e6c Dummy {f00=0x0020, f01=0x0190, f02=»' 4x 4x d 4x 4x 4 Z Z Z Z : : ; 52 4 : V *W R - _ 1 T R P52 - _ : [ S Q"R S P W S _ R Q _ ;A [ : [ Q S W
0x064e6c…065000 Dummy {f00=0x0020, f01=0x0190, f02=» ( % Y 2 % @' O . R O 1 R O 0 ( & ( @& /~ 3 : @' T & : R _ P 0 - : ; [ V - - ' 3 3 d 3 3 3 Z : : ; 4. 3 : V *W R - _ 1 T R P4. -
0x065000…065194 (0, 128) Dummy {f00=0x0020, f01=0x0190, f02=»' 4x 4x d 4x 4x 4 Z Z Z Z : : ; 52 4 : V *W R - _ 1 T R P52 - _ : [ S Q"R S P W S _ R Q _ ;A [ : [ Q S W
0x065194…065328 Dummy {f00=0x0020, f01=0x0190, f02=» ( % Y 2 % @' O . R O 1 R O 0 ( & ( @& /~ 3 : @' T & : R _ P 0 - : ; [ V - - ' 3 3 d 3 3 3 Z : : ; 4. 3 : V *W R - _ 1 T R P4. -
0x065328…0654bc Dummy {f00=0x0020, f01=0x0190, f02=»' 4x 4x d 4x 4x 4 Z Z Z Z : : ; 52 4 : V *W R - _ 1 T R P52 - _ : [ S Q"R S P W S _ R Q _ ;A [ : [ Q S W
0x0654bc…065650 Dummy {f00=0x0020, f01=0x0190, f02=» ( % Y 2 % @' O . R O 1 R O 0 ( & ( @& /~ 3 : @' T & : R _ P 0 - : ; [ V - - ' 3 3 d 3 3 3 Z : : ; 4. 3 : V *W R - _ 1 T R P4. -
0x065650…0657e4 Dummy {f00=0x0020, f01=0x0190, f02=»' 4x 4x d 4x 4x 4 Z Z Z Z : : ; 52 4 : V *W R - _ 1 T R P52 - _ : [ S Q"R S P W S _ R Q _ ;A [ : [ Q S W
0x0657e4…065978 Dummy {f00=0x0020, f01=0x0190, f02=» ( % Y 2 % @' O . R O 1 R O 0 ( & ( @& /~ 3 : @' T & : R _ P 0 - : ; [ V - - ' 3 3 d 3 3 3 Z : : ; 4. 3 : V *W R - _ 1 T R P4. -
0x065978…065b0c Dummy {f00=0x0020, f01=0x0190, f02=»' 4x 4x d 4x 4x 4 Z Z Z Z : : ; 52 4 : V *W R - _ 1 T R P52 - _ : [ S Q"R S P W S _ R Q _ ;A [ : [ Q S W
0x065b0c…065ca0 Dummy {f00=0x0020, f01=0x0190, f02=» ( % Y 2 % @' O . R O 1 R O 0 ( & ( @& /~ 3 : @' T & : R _ P 0 - : ; [ V - - ' 3 3 d 3 3 3 Z : : ; 4. 3 : V *W R - _ 1 T R P4. -
0x065ca0…065e34 (0, 129) Dummy {f00=0x0020, f01=0x0190, f02=»' 4x 4x d 4x 4x 4 Z Z Z Z : : ; 52 4 : V *W R - _ 1 T R P52 - _ : [ S Q"R S P W S _ R Q _ ;A [ : [ Q S W
0x065e34…065fc8 Dummy {f00=0x0020, f01=0x0190, f02=» ( % Y 2 % @' O . R O 1 R O 0 ( & ( @& /~ 3 : @' T & : R _ P 0 - : ; [ V - - ' 3 3 d 3 3 3 Z : : ; 4. 3 : V *W R - _ 1 T R P4. -
0x065fc8…06615c Dummy {f00=0x0020, f01=0x0190, f02=»' 4x 4x d 4x 4x 4 Z Z Z Z : : ; 52 4 : V *W R - _ 1 T R P52 - _ : [ S Q"R S P W S _ R Q _ ;A [ : [ Q S W
0x06615c…0662f0 Dummy {f00=0x0020, f01=0x0190, f02=» ( % Y 2 % @' O . R O 1 R O 0 ( & ( @& /~ 3 : @' T & : R _ P 0 - : ; [ V - - ' 3 3 d 3 3 3 Z : : ; 4. 3 : V *W R - _ 1 T R P4. -
0x0662f0…066484 Dummy {f00=0x0020, f01=0x0190, f02=»' 4x 4x d 4x 4x 4 Z Z Z Z : : ; 52 4 : V *W R - _ 1 T R P52 - _ : [ S Q"R S P W S _ R Q _ ;A [ : [ Q S W
0x066484…066618 Dummy {f00=0x0020, f01=0x0190, f02=» ( % Y 2 % @' O . R O 1 R O 0 ( & ( @& /~ 3 : @' T & : R _ P 0 - : ; [ V - - ' 3 3 d 3 3 3 Z : : ; 4. 3 : V *W R - _ 1 T R P4. -
0x066618…0667ac Dummy {f00=0x0020, f01=0x0190, f02=»' 4x 4x d 4x 4x 4 Z Z Z Z : : ; 52 4 : V *W R - _ 1 T R P52 - _ : [ S Q"R S P W S _ R Q _ ;A [ : [ Q S W
0x0667ac…066940 Dummy {f00=0x0020, f01=0x0190, f02=» ( % Y 2 % @' O . R O 1 R O 0 ( & ( @TOSS UTILITIES REL 10.0 DATE: 80-03-14 12NC=870136641000 ; CC: WHAT?? CRV CRF DLF PVC XEY , 9:)*+ W
0x066940…066ad4 (0, 130) Dummy {f00=0x0020, f01=0x0190, f02=» 67 - 4.5/0123 - <= 8 GHF@ 8J KLMVQRSTO 8 NP B AI A A V! VAW!T T"V"$, B A A A A A A AVAVA T A A A A V!VAVA A A E E AV!E A VAV! AV!V!
0x066ad4…066c68 Dummy {f00=0x0020, f01=0x0190, f02=» ' |
0x066c68…066dfc Dummy {f00=0x0020, f01=0x0190, f02=» d N ""@"F" " " " # "# " $ $ " $b " t ! $ ! $ ! j ` $
0x066dfc…066f90 Dummy {f00=0x0020, f01=0x0190, f02=» " ( . 5 6 4 * H ( F # #: VdV V V V V V V V W W*W>WNWXWdVrV WnW W Y W W W W W W X X*X*X:XJXXXtVd X X X X V X X X V X Y Y(W X W YBYZY YZYzY W
0x066f90…067124 Dummy {f00=0x0020, f01=0x0190, f02=»[|[ [ [ ^ [T[.] ] [ ^ Z [.[>[ Z [.[>^ Z [.^ ^ _Z ] [ [n[ ^ _rZ [. 4 J h_ ] ]*]@]V]j] ]V JZ [.[>_8Z [.] Z [.^ ~ Z [. 4 J h^T] Z [. 4 J h^T] ^ Z [.] ^8^ ^ Z [.[>^l [ ^ ^ _ 4 J h [ ^ ^ ^ 4 J h ^ _ ^ J h 4Z [ ^ ^ _$ 4 J_ _ _
0x067124…0672b8 Dummy {f00=0x0020, f01=0x0190, f02=» NAMES:;FILE NAME:; NUMBER OF VTOC ENTRIES:;CREATION DATE:; RETENTION PERIOD:;BLOCKING FACTOR:; EFFECTIVE RECORD LENGTH:; MAXIMUM NUMBER OF RECORDS:; SECTOR NUMBER:; POSITION:;HEX.VALUE:; FILE ORG:;***INPUT DEFINITION***; ***OUTPUT DEFINITION***;PACK:;OUTPUT DEVIC
0x0672b8…06744c Dummy {f00=0x0020, f01=0x0190, f02=»PUT TAPE:;TAPE VOLUME ID:;RECORD LIMITS:; PRINT FORMAT:;RECORD NUMBERS IN LISTING:; CHARACTER CODE:;PROGRAM LENGTH:;MONITOR NUMBER:;START SWITCH ON SOP:; MORE THAN ONE APPLICATION :;DATA SET NAME:; BOE-SECTOR:;EOE-SECTOR:;EXPIRATION DATE:; VOLUME INITIALIZATION:;
0x06744c…0675e0 Dummy {f00=0x0020, f01=0x0190, f02=»CORD LENGTH INPUT TAPE:;LOAD FACTOR:; INDEX FILE NAME:; MASTER INDEX FILE NAME:;INPUT DEVICE:;PTS 6876 DISC :;MAX NO OF RECORDS ON OUTPUT INDEX FILE:;SUB-KEY ADDRESSES IN RECORD:; SUB-KEY LENGTHS IN RECORD:; ***WORK FILE DEFINITION***; WORK FILE NAME:;SORTING IN A
0x0675e0…067774 (0, 131) Dummy {f00=0x0021, f01=0x0190, f02=»N 18 BADSPOTS.DISC NOT USABLE;DISC I/O ERROR.;PRINTER NOT OPERABLE; TOO MANY SECTORS IN FILE; DISC OVERFLOW;MORE THAN 4 EXTENTS NEEDED; ILLEGAL BLOCK LENGTH; VTOC OVERFLOW;NO FREE SPACE ENTRY AVAILABLE;FILE NAME ALREADY USED; NO TOSS DISC FORMAT;TAPE UNIT NOT OPER
0x067774…067908 Dummy {f00=0x0021, f01=0x0190, f02=»NOT LOCKED/LOADED;INCORRECT TNR;OUTPUT I/O ERROR, ;INPUT I/O ERROR, ; BLOCK FACTOR ON OUTPUT TOO LARGE; TAPE MARK MISSING;TAPE MARK MISSING AFTER LABEL RECORD; LABEL RECORD MISSING; UNEXPECTED TAPE MARK; LABEL RECORD ERROR; ILLEGAL BLOCK LENGTH ON INPUT;EOF INSI
0x067908…067a9c Dummy {f00=0x0021, f01=0x0190, f02=»OCKED;FLEX. DISC NOT LOCKED;FLEX. DISC WRITE PROTECTED; DATA SET NAME ALREADY USED; DATA SET NAME NOT FOUND;NO IBM DISC FORMAT; BLOCK SEQUENCE ERROR; KEY DEF. ERROR; LOAD FACTOR TOO SMALL;KEY SEQUENCE ERROR; DATA SET DEF. ERROR;ILLEGAL SECTOR NUMBER;CARD READER NO
0x067a9c…067c30 Dummy {f00=0x0021, f01=0x0190, f02=»LOWED TO MIX DISCSIZES; NOT ENOUGH CORE;OVERFLOW; WRONG FD PARAMETER; ILLEGAL FILE-CODE;ILLEGAL ECB PARAMETER;UNKNOWN FILE; ILLEGAL VOLUME/FILE NAME; BE`& CORD; LABEL RECORD MIS OK? 0OUTPUT VOLUME NAME: ` C C R A` " P A` ( : : B
0x067c30…067dc4 Dummy {f00=0x0021, f01=0x0190, f02=» [ ; @` H` -P Z : : H` M :B L # ;A H` @ P 0!? T P $ _@ P ZH P ! _ DU2 DU1 DU4 DU3 MD1 MD2 MD3 MD4 FD1 FD2 FD3 FD4 CD1 CD2 %? v S : S f S 6 S b% =A S ^ S ` x UU
0x067dc4…067f58 Dummy {f00=0x0021, f01=0x0190, f02=» R ' P % =B S t w E M % n : T G.G K. A ;A; G. x ] S z | . N 0 N S W P X _ R z R 6"( R ~ | c< P #P & B.
0x067f58…0680ec Dummy {f00=0x0021, f01=0x0190, f02=» [ ; @` H` -P Z : : H` M :B L # ;A %? v S @ S l S < S h% =A S d S f V UU H 3 2P _ , ) 0 R _ <d?d U ?e R P S ?C/ G O % R ' P
0x0680ec…068280 Dummy {f00=0x0021, f01=0x0190, f02=» G. T ] S . N 0 R N S 4 W P X _ R R <"( R e P #P & B. T P ' " P : P S P S P " ^_" F t v @0
0x068280…068414 (0, 132) Dummy {f00=0x0021, f01=0x0190, f02=»% T V S @- S S < M % T S " . N 0 " N S W " P X _ R R <" R R gp " P #P ( B. T P ' " P : P S P S P " `_"g
0x068414…0685a8 Dummy {f00=0x0021, f01=0x0190, f02=» G.G K. A ;A; G. ( ] ] S S S S " :A S S S . N 0 S & N S W P X _ R R "? R R i h:B* S R P S B J 4R 4 :B
0x0685a8…06873c Dummy {f00=0x0021, f01=0x0190, f02=» T P ' " P : P S P S P % `_" " . N 0 " N S W " P X _ R R <" R R gp " P #P ( B. T P ' " P : P S P S P " `_"g
0x06873c…0688d0 Dummy {f00=0x0021, f01=0x0190, f02=» P* * PBADSTP DATA BADSTP TABLE FOR BADSPOTS P RES QBADSP STORAGE, READ < PBADSTE EQU * ^ P* r & PWRSTP DATA WRSTP TAB FOR BADSPOTS | P RES QBADSP STORAGE, WRITE PWRSTE EQU * P* * PSPADTP DATA SPADET TAB FOR FREE SP
0x0688d0…068a64 Dummy {f00=0x0021, f01=0x018e, f02=» P* P* PWBUF DATA 0 P* 0 P EJECT CRVOL : P* P P* Z " PECBR DATA 0 ECB FOR DISC READ d PECBBF EQU *-ECBR P DATA 0 PECBRL EQU *-ECBR P DATA QSECL2 PECBEL EQU *-ECBR P DATA 0 PEC
0x068a64…068bf8 Dummy {f00=0x0021, f01=0x0190, f02=» P EJECT CRVOL P* P* $ PECBW DATA 0 ECB FOR WRITING . P DATA 0 R P DATA QSECL2 b P DATA 0,0,0 ECBEL, -RC, -CW v P DATA 0 CW2 =1 P* P* " PPRECB DATA 0 ECB FOR PRINTING $ P RES 5 ECBBF, -RL, -EL, -RC, -
0x068bf8…068d8c Dummy {f00=0x0021, f01=0x0190, f02=»BA DATA 0 VTOC BASE PVTOCLE DATA 0 VTOC LENGTH P* > ( PBSSET DATA ' NUMBER OF BADSPOTS =' H PBSPNO DATA ' ' t P DATA ' ' PQBSSEL EQU *-BSSET P* P EJECT CRVOL P* P* * PWRSET DATA ' -WRITING THE S
0x068d8c…068f20 Dummy {f00=0x0021, f01=0x0190, f02=»ING THE SECTORS' | PQRDSEL EQU *-RDSET P DATA 0 2 PTOSREL DATA 'TOSS REL 10.0' B P* f P EJECT CRVOL p P* P* P* =1 P* RETRY DELETED =30 PQCYLNR DATA 0 TOT NO OF CYL $ PQSECND DATA 0 LAST USABLE SECTOR
0x068f20…0690b4 (0, 133) Opaque[0x194]
0x0690b4…069248 # DirEnt {nam=»PCAS «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0430, f03=0x0000}
0x0690b4…069248 IdxSect {
0x0690b4…069248 f00 = 0x0021 // 0x690b4 @0x0
0x0690b4…069248 f01 = 0x0004 // 0x690b6 @0x2
0x0690b4…069248 gno = [ // 0x690b8 @0x4
0x0690b4…069248 [0x00]: C0x0021.0x2.0
0x0690b4…069248 [0x01]: C0x0021.0x3.0
0x0690b4…069248 ]
0x0690b4…069248 }
0x069248…0693dc Dummy {f00=0x0021, f01=0x0190, f02=» ^ ^ 0XX ERROR 2 0PCAS REL 10.0 DATE 80.03.14 12NC=8701 362 41000 0TO MANY SEGMENTS STATUS WORD: D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x0693dc…069570 Dummy {f00=0x0021, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' d p 4d @ B
0x069570…069704 Dummy {f00=0x0021, f01=0x0190, f02=» ^F < 0XX ERROR 2 0PCAS REL 10.0 DATE 80.03.14 12NC=8701 362 41000 0TO MANY SEGMENTS STATUS WORD: D $ 4` 1P -8 T r tB l`Tg t z ^ lFZF H 2 Z j z
0x069704…069898 Dummy {f00=0x0021, f01=0x0190, f02=» 4c @]u N d 2Z $"z y L / y N Dl` n $ @ 4Z wL a [ ? d d% L & "~ T &b CCn 1 d J < R:R: ` T l` % l`zF :| Fb fvzn : v ` ^* D3bH P D' >~ `" f >~ $' 4d @ B
0x069898…069a2c Dummy {f00=0x0021, f01=0x0190, f02=» @ A A @ A A A @ A A A @ CRP W0 A P (R 2 @ 9a @ A 0 ) A A ^ W ,= V % @ QB @ @ P8 @ U A W* @ P A W A , a A A A T
0x069a2c…069bc0 Dummy {f00=0x0021, f01=0x0190, f02=»Pd A A A A T ` 9a A A @ A A ^ A 0% ) ( A : ( % @ E A A ( ( @ " ` T( : @ 0 @ Q( &( @ . T A 0 : TKW DKW FM A N J
0x069bc0…069d54 (0, 134) Dummy {f00=0x0021, f01=0x0190, f02=»P P Q : $ C C ( : 9 $ Y :0123456789ABCDEF P (R 2 @ 9a @ A 0 ) A A ^ W ,= V % @ Q @ @ P @ U A W @ P A W A , a A A A T
0x069d54…069ee8 Dummy {f00=0x0021, f01=0x000c, f02=» @ X
0x069ee8…06a07c Dummy {f00=0x0021, f01=0x018e, f02=» 0 P IDENT PCAS REL 10.0 80-03-14 8701 362 41000 P 8 P @ P H P P P X P ` P* h 0 P* PCAS WRITE PROGRAM FROM /L ON CASSETTE /3 r P* P* BLOCK LAYOUT: P* P* CCCC P* .... $ P* .... UP TO 240 BYTES OF
0x06a07c…06a210 Dummy {f00=0x0021, f01=0x0190, f02=» P* REGISTER USE: $ P* A1: PNTR IN CTBUF CODE WORDS $ P* A2: PNTR IN CTREL RELOC BYTES H $ P* A3: PNTR IN DKBUF CODE WORDS p $ P* A4: PNTR IN DKBUF RELOC BYTES P* A5: RELOCATION MASK P* A6: SCRATCH P* A7: ORDER P
0x06a210…06a3a4 Dummy {f00=0x0021, f01=0x0190, f02=»* P EJECT P* P* " & P* CASSETTE STATUS BITS. GENERAL. , P* V 6 P* HARDWARE STATUS IS RETURNED BY DRIVER DRTC02 IF ` H P* AT LEAST ONE OF THE STATUS BITS 6, 12-15, RETURNED BY THE CASSETTE 8 P* HARDWARE, IS SET TO 1, THUS INDI
0x06a3a4…06a538 Dummy {f00=0x0021, f01=0x0190, f02=»* $ P* CASSETTE HARDWARE-STATUS BITS, P* RETURNED BY DRIVER DRTC02 2 P* V P* BIT 0: 1 ` P* BIT 1: ZERO t P* BIT 2: BOT MISSING P* BIT 3: TAPE-MARK DETECTED P* BIT 4: NO DATA/ERASED P* BIT 5: BOT/EOT-HOLE
0x06a538…06a6cc Dummy {f00=0x0021, f01=0x0190, f02=»RROR ~ P* BIT 10: ZERO P* BIT 11: ZERO " P* BIT 12: INCORRECT LENGTH 8 P* BIT 13: CRC-ERROR Z P* BIT 14: THROUGHPUT ERROR v P* BIT 15: NOT OPERABLE P* P* @ P* IN HARDWARE STATUS,RETURNED BY DRIVER DRTC02, BIT ZERO IS
0x06a6cc…06a860 Dummy {f00=0x0021, f01=0x0190, f02=» T P* CASSETTE HARDWARE. P* $ P EJECT . P* < > P* CASSETTE SOFTWARE-STATUS BITS, RETURNED BY DRIVER DRTC02 F P* P* BIT 0: ZERO P* BIT 1: ZERO P* BIT 2: ZERO P* BIT 3: ZERO P* BIT 4: ZERO P* BIT 5
0x06a860…06a9f4 (0, 135) Opaque[0x194]
0x06a9f4…06ab88 # DirEnt {nam=»PMPTS «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0440, f03=0x0000}
0x06a9f4…06ab88 IdxSect {
0x06a9f4…06ab88 f00 = 0x0022 // 0x6a9f4 @0x0
0x06a9f4…06ab88 f01 = 0x0010 // 0x6a9f6 @0x2
0x06a9f4…06ab88 gno = [ // 0x6a9f8 @0x4
0x06a9f4…06ab88 [0x00]: C0x0022.0x0.0
0x06a9f4…06ab88 [0x01]: C0x0022.0x1.0
0x06a9f4…06ab88 [0x02]: C0x0022.0x2.0
0x06a9f4…06ab88 [0x03]: C0x0022.0x3.0
0x06a9f4…06ab88 [0x04]: C0x0023.0x0.0
0x06a9f4…06ab88 [0x05]: C0x0023.0x1.0
0x06a9f4…06ab88 [0x06]: C0x0023.0x2.0
0x06a9f4…06ab88 [0x07]: C0x0023.0x3.0
0x06a9f4…06ab88 ]
0x06a9f4…06ab88 }
0x06ab88…06ad1c Dummy {f00=0x0022, f01=0x0190, f02=» :U ` % C 8 C ( #( #WN < C C ( P C C ( b @ P !VVT A W !WW A T C C ( h C % C ( @ h ? T & _B @ h F0ZL F9YR T h *L 00 @ h '
0x06ad1c…06aeb0 Dummy {f00=0x0022, f01=0x0190, f02=» A$ $ F &> C C ( C % E C ( @ NOT *L YE Z *L & S * * C C ( 8 C C ( @ b ? T & _> D b AB 88T B D 63 d E 68 n B D 75T
0x06aeb0…06b044 Dummy {f00=0x0022, f01=0x0190, f02=»* 01PMPTS REL 10.0 DATE 80.03.14 12NC=8701 364 41000 DISK TYPE : C COMPLETE PREMARK: C DISC FILE CODE : VV XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? ? T F0ZL F9YR 00 @
0x06b044…06b1d8 Dummy {f00=0x0022, f01=0x0190, f02=» A F C C ( C % E C ( @ NOT YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 68 n B D 75T
0x06b1d8…06b36c Dummy {f00=0x0022, f01=0x0190, f02=» 01PMPTS REL 10.0 DATE 80.03.14 12NC=8701 364 41000 DISK TYPE : C COMPLETE PREMARK: C DISC FILE CODE : VV XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? ? T F0ZL F9YR 00 @
0x06b36c…06b500 Dummy {f00=0x0022, f01=0x0190, f02=» A F C C ( C % E C ( @ NOT YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 68 n B D 75T
0x06b500…06b694 (0, 136) Dummy {f00=0x0022, f01=0x0190, f02=» 01PMPTS REL 10.0 DATE 80.03.14 12NC=8701 364 41000 DISK TYPE : C COMPLETE PREMARK: C DISC FILE CODE : VV XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? ? T F0ZL F9YR 00 @
0x06b694…06b828 Dummy {f00=0x0022, f01=0x0190, f02=» A F C C ( C % E C ( @ NOT YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 68 n B D 75T
0x06b828…06b9bc Dummy {f00=0x0022, f01=0x0190, f02=» 01PMPTS REL 10.0 DATE 80.03.14 12NC=8701 364 41000 DISK TYPE : C COMPLETE PREMARK: C DISC FILE CODE : VV XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? ? T F0ZL F9YR 00 @
0x06b9bc…06bb50 Dummy {f00=0x0022, f01=0x0190, f02=» A F C C ( C % E C ( @ NOT YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 68 n B D 75T
0x06bb50…06bce4 Dummy {f00=0x0022, f01=0x0190, f02=» 01PMPTS REL 10.0 DATE 80.03.14 12NC=8701 364 41000 DISK TYPE : C COMPLETE PREMARK: C DISC FILE CODE : VV XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? ? T F0ZL F9YR 00 @
0x06bce4…06be78 Dummy {f00=0x0022, f01=0x0190, f02=» A F C C ( C % E C ( @ NOT YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 68 n B D 75T
0x06be78…06c00c Dummy {f00=0x0022, f01=0x0190, f02=» 01PMPTS REL 10.0 DATE 80.03.14 12NC=8701 364 41000 DISK TYPE : C COMPLETE PREMARK: C DISC FILE CODE : VV XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? ? T F0ZL F9YR 00 @
0x06c00c…06c1a0 Dummy {f00=0x0022, f01=0x0190, f02=» A F C C ( C % E C ( @ NOT YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 68 n B D 75T
0x06c1a0…06c334 (0, 137) Dummy {f00=0x0022, f01=0x0190, f02=» 01PMPTS REL 10.0 DATE 80.03.14 12NC=8701 364 41000 DISK TYPE : C COMPLETE PREMARK: C DISC FILE CODE : VV XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? ? T F0ZL F9YR 00 @
0x06c334…06c4c8 Dummy {f00=0x0022, f01=0x0190, f02=» A F C C ( C % E C ( @ NOT YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 68 n B D 75T
0x06c4c8…06c65c Dummy {f00=0x0022, f01=0x0190, f02=» 01PMPTS REL 10.0 DATE 80.03.14 12NC=8701 364 41000 DISK TYPE : C COMPLETE PREMARK: C DISC FILE CODE : VV XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? ? T F0ZL F9YR 00 @
0x06c65c…06c7f0 Dummy {f00=0x0022, f01=0x0190, f02=» A F C C ( C % E C ( @ NOT YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 68 n B D 75T
0x06c7f0…06c984 Dummy {f00=0x0022, f01=0x0190, f02=» 01PMPTS REL 10.0 DATE 80.03.14 12NC=8701 364 41000 DISK TYPE : C COMPLETE PREMARK: C DISC FILE CODE : VV XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? ? T F0ZL F9YR 00 @
0x06c984…06cb18 Dummy {f00=0x0022, f01=0x0190, f02=» A F C C ( C % E C ( @ NOT YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 68 n B D 75T
0x06cb18…06ccac Dummy {f00=0x0022, f01=0x0190, f02=» 01PMPTS REL 10.0 DATE 80.03.14 12NC=8701 364 41000 DISK TYPE : C COMPLETE PREMARK: C DISC FILE CODE : VV XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? ? T F0ZL F9YR 00 @
0x06ccac…06ce40 Dummy {f00=0x0022, f01=0x0190, f02=» A F C C ( C % E C ( @ NOT YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 68 n B D 75T
0x06ce40…06cfd4 (0, 138) Dummy {f00=0x0022, f01=0x0190, f02=» 01PMPTS REL 10.0 DATE 80.03.14 12NC=8701 364 41000 DISK TYPE : C COMPLETE PREMARK: C DISC FILE CODE : VV XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? ? T F0ZL F9YR 00 @
0x06cfd4…06d168 Dummy {f00=0x0022, f01=0x0190, f02=» A F C C ( C % E C ( @ NOT YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 68 n B D 75T
0x06d168…06d2fc Dummy {f00=0x0022, f01=0x0190, f02=» 01PMPTS REL 10.0 DATE 80.03.14 12NC=8701 364 41000 DISK TYPE : C COMPLETE PREMARK: C DISC FILE CODE : VV XX NOT OPERABLE END OF PMPTS VOLUME LABEL MISSING OR UNREADABLE OK ? ? T F0ZL F9YR 00 @
0x06d2fc…06d490 Dummy {f00=0x0022, f01=0x0190, f02=» A F C C ( C % E C ( @ NOT YE Z S * C C ( C C ( @ b ? T _> D b AB 88T B D 63 d 68 n B D 75T
0x06d490…06d624 Dummy {f00=0x0022, f01=0x0190, f02=» 01PMPTS RE C C ( #( # : $ ! R !__Q P _ : : & # $ C C C ( B : 0 & "! #( B : ' C C ( ' $ $ &> ' C C ( : ' '"'`'j' F0 - F9 :6875 - 2,5 MB; 6876
0x06d624…06d7b8 Dummy {f00=0x0022, f01=0x0190, f02=» P !00R* !::R !AAR !FFQ Y& 8 9 Y 9 8 9 W? W? W? W? W? A? A? 9D: " @? :D R 0 P P 9H _4 W? _< W? V? V? V? V? V? : W? W? W? W? W? ? L T PF_ L ( ) W4 @R 0 P 9D _( W? V? V
0x06d7b8…06d94c Dummy {f00=0x0022, f01=0x0190, f02=»9C L _( V? V? V? V? V? W? V? V? V? V? V? 0 R _ A? A? 9H: " @? :H 0 dR _ A? 9H: " @? :H 0 d R _ A? 9H: " @? :H : : 0R :R AR GV A* A* @* (@ $$T * ( A* : A* A* (@
0x06d94c…06dae0 Dummy {f00=0x0022, f01=0x0190, f02=»( : * & ) * ) _ SYSTEM HALTED, PLEASE RESTART SYSTEM +$ A A 9D: " @ :D R 0 P P 9H _4 W _< W V V V V V : W W W W W L T P _ L S r S t S S S S A5 A
0x06dae0…06dc74 (0, 139) Dummy {f00=0x0023, f01=0x0190, f02=» C ( #( 7r *0(@ ," # C C ( #( (@ * 5b # X V -| 8 C ( X 9DVr X C X # P $ A4 % P _ ( X 8 *L X $ ? T X ! P 9b & _~ W _ X X _ -" C % E
0x06dc74…06de08 Dummy {f00=0x0023, f01=0x0190, f02=» R R S R R S 5 LABEL = S < DATE = S h S l S p PACK NBR = S v 0 $ S f S h S j S l S n S . S S 8 R * $P 1 1 _ 8 " $P 1 1 _ 8 :A $P 1 1 _ R &N N 9 @ 0< S 9* . 3L
0x06de08…06df9c Dummy {f00=0x0023, f01=0x0190, f02=» / 3 W W: $T R T R T R 4 B8 > B8 T 0< . W /( S 9jN R S S >E s S R B9 Q2>A R Q( 7 (@ + 7 _ 7 _ 7 _ R / Qd A7 A7 7 _< 8 _D / Q A8x / _ A8| 0 _ A
0x06df9c…06e130 Dummy {f00=0x0023, f01=0x0190, f02=» R % R 9J 0 3fW R B8 R R R V 9d9A S - ] " :A H8 M ? S - Y < R R . % A1B 9J 1 3fW Q B9 R R 9J 1, 3fW R % Z $CATALOG S R S R S R R 2 QN
0x06e130…06e2c4 Dummy {f00=0x0023, f01=0x0190, f02=» R 2 A5r 7 (@ *0(@ ," # C C ( #( ,` & 3 2R 3L R R 3 2p 3 3 _ _ S R 9H R R R R S R O R 2 N 3 0 3L R R R R 9J 2 3f
0x06e2c4…06e458 Dummy {f00=0x0023, f01=0x0190, f02=»SbY ?T > Z > RP> > RL> ^ 7 / N S2Y ?T $ > ZT> R > V > R > _ / / / / A4L R R @4L : R 8 OKP NOT 2 [ : : R 8 YET [ W NOT ," [ : : A4L R 4F Q S S R : 4L 6 6 7
0x06e458…06e5ec Dummy {f00=0x0023, f01=0x0190, f02=» * / T 4L : R Y R R 8 0_: 4L R r @5Z ^ R t @5 T S S &_X R t @5` S _ 6875687660 8 3 6" 8 4 6J L 6R 0 6Z 466 r 5 6f * 6 4 6 6 4 6 " 6
0x06e5ec…06e780 Dummy {f00=0x0023, f01=0x0190, f02=»: PACK NBR: DISK UNIT PHYSICAL ADDRESS: DAD NAME: NBR. OF CYL OF DDDDDD : NBR. OF INT OF / : DK TYPE(1215 OR 1216): NBR. OF SEC./ GRAN. OF : : NBR. OF SEC./ TRACK OF ," [ : SEC. LENGTH(IN CHAR) OF S : SYST. USERID: PASSWORD :
0x06e780…06e914 (0, 140) Dummy {f00=0x0023, f01=0x0190, f02=»D TRACK IN FIRST CYL. TOO MANY DEF. TRACKS: DAD TOO BIG,BITAB OFLOW NBR. OF INT NOT COMPATIBLE WITH NBR. OF SECT/TRNBR. OF INT NOT LESS THAN NBR. OF SECT/TRXPCTD: 0 READ: 46 r.p.r3L. 3 /X3f3 3 3,2 3 3"3:3>
0x06e914…06eaa8 Dummy {f00=0x0023, f01=0x0190, f02=»3 3030 3030 3030 3030 ( ( P8P8 P8P8 SYST. USERID: / GRAN. -DEVICE ADDRESS UNKNOWN -I/O ERROR NO SYSTEM USER POSSIBLE RUN AGAIN ? : END OF PMPTS
0x06eaa8…06ec3c Dummy {f00=0x0023, f01=0x0190, f02=»
0x06ec3c…06edd0 Dummy {f00=0x0023, f01=0x0190, f02=» CATALOG
0x06edd0…06ef64 Dummy {f00=0x0023, f01=0x0190, f02=» ( 0 $ ,
0x06ef64…06f0f8 Dummy {f00=0x0023, f01=0x0190, f02=» CATALOG LABEL: DATE: PACK NBR: A* ? *0 ? ) :^ * ? ) :x *
0x06f0f8…06f28c Dummy {f00=0x0023, f01=0x0190, f02=» : $ ? T & _( @9 A9 9 ) 9 * @9 ? T & _& NOT 9 T 9 ?z ?| :N = I AA2 A AA8 I AA>I ! P A S I AA2 AA8 AA> ? $ D( 9 A :N D0 T AD> P D A @ ! 8 @?z @= P 8A A?z
0x06f28c…06f420 Dummy {f00=0x0023, f01=0x0190, f02=» @?z8A A?z! T: A= @= T = @?z O: ?z N: A?| @:N A:N_P D` P D A:N @:N! v @= T @?z O: = ?z A A= B D( :N @?z @= 9@ AB 9@ O: @: 9AR 9 : ) 9 P ? A: D0 P D A:N R AD> D0 P D @<T A=
0x06f420…06f5b4 (0, 141) Dummy {f00=0x0023, f01=0x0190, f02=» D @= A<T A<D :N AD> AD( ADL ADV ADZ ADz AD AD AD0 ADD AD` ADr :0 ) :> * NO @:>P YE @:> ( ? A AD :> $$ A* ) (@ * I ! :I ! D ) :N @?xA SvY (D Q ^ A SdI Y :I ! D = @?xA SHY (L Q ^ A S6I Y : @:N P
0x06f5b4…06f748 Dummy {f00=0x0023, f01=0x0190, f02=») ( S S S S SUPERV AM AM AM AM W2 *0(@ Ez # C C ( (@ ( Mz l # X V W 8 C ( X 9DV0 X C X # P $ AP. ( W _ X XD B_L E C ( A ! T 8 Y X ;E
0x06f748…06f8dc Dummy {f00=0x0023, f01=0x0190, f02=» S l S p PACK NBR = S v 8863 S r 0 f S . S S O R * $P 1 1 _ O " $P 1 1 _ O " :A $P 1 1 _ R & N N @ H K G0 K W BP$ T _" S Kn G LX S S Kv R R BP& " BP$ <
0x06f8dc…06fa70 Dummy {f00=0x0023, f01=0x0190, f02=» R BP(Q:>A R Q0 N (@ EP N _ N _ O _ O _& R HL Qd AO> AO@ O( _D OB _L Hp Q AO H|_ AO H _ AO R H _* AO R H _8 AO R H _F AO O $_ R H Qd AO> AO@ NBR OF O* Kn H LX R S R %
0x06fa70…06fc04 Dummy {f00=0x0023, f01=0x0190, f02=» P Kv Q S| BP6 R Kv R % Z $CATALOG S R S R S R R K QJ VTOC S BP$ R BP* S R 9H R R R R K R S S S S R K AM~ AM (@ E O*
0x06fc04…06fd98 Dummy {f00=0x0023, f01=0x0190, f02=» R K N Kn I LX H6 Kv : Lr AL =h KP K. L W @L KP KL L W : :a :Av v >L >B F : >B _ Lr AL =h K K K W @L K K K W : :a :Av v >L >B _f N H >L >B _| >A >K >B
0x06fd98…06ff2c Dummy {f00=0x0023, f01=0x0190, f02=» ? > Z > Z > Z(_ AL R DL @L :0 $(,1 !%)-2 "&*.3 #'+/ AL R L Q S Q VTOC : R 8 YEP( NOT$ # M C C ( * : END OF PMPTS L : L : L R r @MXP _" S & @MZ S r_(888863 R T
0x06ff2c…0700c0 Dummy {f00=0x0023, f01=0x0190, f02=» Nn M^ RUN AGAIN ?: LABEL: DATE: PACK NBR: DISK UNIT PHYSICAL ADDRESS: DAD NAME: NBR. OF CYL OF DDDDDD : NBR. OF INT OF A : SYST. USERID: DYN AREA OVF. F.C. MISSINGINVALID PARAM F.C. NOT ASGN INV. F.C. INV. DEVICE SEEK ERRORUNKNOWN DEVI
0x0700c0…070254 (0, 142) Dummy {f00=0x0023, f01=0x0190, f02=»TAB OFLOW NBR. OF INT NOT COMPATIBLE WITH NBR. OF SECT/TRNBR. OF INT NOT LESS THAN NBR. OF SECT/TRXPCTD: S READ:VTOC : R 8 SELECTED G G LXL K Kj KZK^K K R r @ S0 ; :P _
0x070254…0703e8 Dummy {f00=0x0023, f01=0x0190, f02=»:i q r E x T 4 &: 4: V - P Y _( Y M : $ ] $ =IR E : $_ AQ Q 0 1 Y SINGIN AQ Q 4 0R, ! Q& P 8 8 W Y( AQ @Q @
0x0703e8…07057c Dummy {f00=0x0023, f01=0x0190, f02=» f z ~ P P 4 ^ :A D W W =C W E I Q W P _ A _ M Y @ | T T &: 4: V - P Y _( ( ( 0 $ , ; :P
0x07057c…070710 Dummy {f00=0x0023, f01=0x0190, f02=» Z : X ] X W X ] X f X ] X f x T& P Z : T ] f_^ T &: 4: V - P Y _( Y 3P Q Q / ] f : 0 ] f : ] f : h P W ] Z : 0 ] f ] h ::L
0x070710…0708a4 Dummy {f00=0x0023, f01=0x0190, f02=»V DADGRN,A12 DIV / # OF SECT / GRANULES = # OF GRANULES I P INH *PTS J F 0 P LD A5,SLNG,A12 SECTOR LENGTH J X B P SUK A5,BITAB+2-DBUF1 REMAINING WORDS FOR BITAB J , P LDR A1,A2 # OF GRAN J P
0x0708a4…070a38 Dummy {f00=0x0023, f01=0x0190, f02=» ST A1,BITAB,A12 J 8 P LDK A3,BITAB+2 1ST WORD OF ALLOC BIT K & P ADR A3,A12 K b 0 P LDKL A4,-1 BITS SET TO 1 K PPK740 EQU * K , P STR A4,A3 SET BITAB K 6 P
0x070a38…070bcc Dummy {f00=0x0023, f01=0x0190, f02=» A3,2 NEXT WORD ADDR K * P SUK A1,2 COUNT -2 L & * P RB(4) PK740 NOT DONE L T P* L D P* RESET LAST WORD TO THE RIGHT VALUE L < P ANK A2,/F # OF GRANULES IN LAST
0x070bcc…070d60 Dummy {f00=0x0023, f01=0x0190, f02=»ITAB L ` P* M L P LDKL A4,/3FFF RESET 1ST BIT OF BITAB WHICH IS THE CATAL M $ P ANS A4,BITAB+2,A12 M f J PPK755 EQU * RESET TO ZERO REMAINING WORDS IN SECTOR M P CMR A3 M 0 P ADK
0x070d60…070ef4 (0, 143) Opaque[0x194]
0x070ef4…071088 # DirEnt {nam=»SUP600«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0480, f03=0x0000}
0x070ef4…071088 IdxSect {
0x070ef4…071088 f00 = 0x0024 // 0x70ef4 @0x0
0x070ef4…071088 f01 = 0x0014 // 0x70ef6 @0x2
0x070ef4…071088 gno = [ // 0x70ef8 @0x4
0x070ef4…071088 [0x00]: C0x0024.0x0.0
0x070ef4…071088 [0x01]: C0x0024.0x1.0
0x070ef4…071088 [0x02]: C0x0024.0x2.0
0x070ef4…071088 [0x03]: C0x0024.0x3.0
0x070ef4…071088 [0x04]: C0x0025.0x0.0
0x070ef4…071088 [0x05]: C0x0025.0x1.0
0x070ef4…071088 [0x06]: C0x0025.0x2.0
0x070ef4…071088 [0x07]: C0x0025.0x3.0
0x070ef4…071088 [0x08]: C0x0026.0x0.0
0x070ef4…071088 [0x09]: C0x0026.0x1.0
0x070ef4…071088 ]
0x070ef4…071088 }
0x071088…07121c Dummy {f00=0x0024, f01=0x0190, f02=»i LoX # # #$ A~ X - _ H*f* + + ,0-T
0x07121c…0713b0 Dummy {f00=0x0024, f01=0x0190, f02=»
0x0713b0…071544 Dummy {f00=0x0024, f01=0x0190, f02=» i ( "D r !f9 : G p R $ $ %Z&>F E % 9 J DMC,MCGBHDB&WMC RYD RDD ASE0ABF PSF RSG & TY J- LP / TK M
0x071544…0716d8 Dummy {f00=0x0024, f01=0x0190, f02=» $ DK _ DK 8 _ P DK _ DK ( _ DK U ^ DK U 8DK ) U
0x0716d8…07186c Dummy {f00=0x0024, f01=0x0190, f02=» ? ? ? ? ? ? ? Q~ & ? ? ? ? ? ? ? MX ? ? ? ? ? ? ? L 2b
0x07186c…071a00 Dummy {f00=0x0024, f01=0x0190, f02=» f l Z f Z f D Z
0x071a00…071b94 (0, 144) Dummy {f00=0x0024, f01=0x0190, f02=» Z V f R . Z | f ? ? ? ? ? ? ? fN ? ? ? ? ? ? ?
0x071b94…071d28 Dummy {f00=0x0024, f01=0x0190, f02=» ? ? ? Y ? ? ? ? ? ? ? l Y j & L r 0 V |
0x071d28…071ebc Dummy {f00=0x0024, f01=0x0190, f02=» 6 6 6 6 6
0x071ebc…072050 Dummy {f00=0x0024, f01=0x0190, f02=» 6 6
0x072050…0721e4 Dummy {f00=0x0024, f01=0x0190, f02=» :
0x0721e4…072378 Dummy {f00=0x0024, f01=0x0190, f02=»
[…0x4…]
0x0729c8…072b5c Dummy {f00=0x0024, f01=0x0190, f02=» P
0x072b5c…072cf0 Dummy {f00=0x0024, f01=0x0190, f02=»
[…0x1…]
0x072e84…073018 Dummy {f00=0x0024, f01=0x0190, f02=» *
0x073018…0731ac Dummy {f00=0x0024, f01=0x0190, f02=»
[…0x2…]
0x0734d4…073668 Dummy {f00=0x0024, f01=0x0190, f02=» @
0x073668…0737fc Dummy {f00=0x0024, f01=0x0190, f02=» A A R$ A A R A A R A @#" > > > > > > > > ? ? ? ? ? ? ? U ^ ( H ( P F" _ Q 4&? ?R _ 5 H _ ^ ;j >P @ * Q 9A D *P _ P A ( @ Q A ' A"T ( A A)F_ @ A
0x0737fc…073990 Dummy {f00=0x0024, f01=0x0190, f02=» @ ? ? > "D P P Q P ! P @ $ H @ P W ( < JZ @ 9a:a R0 "Z Q Q" ?A <P @"N %J & _ ( _ _ 0 % JZ T @ W @ R (P& P (_ =a:a =A:A Z P Z _" TR @
0x073990…073b24 Dummy {f00=0x0024, f01=0x0190, f02=» @% L F" 0 JZ @ PR 0=a @ ?a RX @ ?a VN=A 0 ( P>P< , T T 1W 1W T )W )W ( , _ C ( _ 5 H A& A& A& A& A& A& A' A& ' ( D >a @ =a (@ D U@ x ',W U, @
0x073b24…073cb8 Dummy {f00=0x0024, f01=0x0190, f02=» B :a Y B R A& _ @& ' W4 @& A& ,Xp _ < @ A' A( A( A( A( A( A( ( =a @ >a V _ @ >a Y A' A' 4 T ' ( "^ 5 U P" @' @( @( @( @( @( @( ( @' x @& 8
0x073cb8…073e4c Dummy {f00=0x0024, f01=0x0190, f02=» @ !@ *V @ P @ X0 , *V A _< U` A)F @ , L ? ? , L L L L L L ? ? ? ? ? ? ? @" Px @ > > > > > > > ; [ [ [ [ [ [ > > [ [ A @" H" " ? A" >
0x073e4c…073fe0 Dummy {f00=0x0024, f01=0x0190, f02=»? V :!9 V @ P R W ;A [ [ : _4 Pj T Pf V Q UF V Ud Q4P P 9A?A:AV R Z _ P*R R P ;A [ [ : V X"Z(_( L _P S
0x073fe0…074174 (0, 147) Dummy {f00=0x0025, f01=0x0190, f02=»R _ ;A [ [ : # P| ' PL , ; R <a V 9A:A ; V ; V V W V < V < V H T P R ;H [ [ : _ T P ; R4 < S , _ _ W < R $ <A Q" T" U" :$ _ < Z& - W _ < <A9 R :a
0x074174…074308 Dummy {f00=0x0025, f01=0x0190, f02=» R Q ;H [ [ : " _J ? ? ? ? ? ? ? Q _ ^ ( H Z - W . W / X I I R P8 X RlP RrT Y Y W x Y Y $ 0T W W 6 X ? ? ? ? ? ? ? .^ 7 X #? P ? ? ? ? ? ? ? . 7 6 (@ 7P %
0x074308…07449c Dummy {f00=0x0025, f01=0x0190, f02=»7 (@_~ 52X R Y _ X D $! TR ? ? ? ? ? ? ? /F 7 8 M ? ? ? ? ? ? ? /l 7 % > > > > > > > > ? ? ? ? ? ? ? / 7 P X 7^ 7v / 4 8 TRT X 5P 4 $ <A 52 Pl 52 X X X M M
0x07449c…074630 Dummy {f00=0x0025, f01=0x0190, f02=»_ X X X U 5 X E _ X 4 Y 5 X 4 Y ! 1P, 0P +P Q Q W W Q Q R P Q 5 Y / ? ? ? ? ? ? ? 1 7 Qv 1& 4 " PF X Q< X P P ? ? ? ? ? ? ? 1X 7 (@ Y C^ X X X R
0x074630…0747c4 Dummy {f00=0x0025, f01=0x0190, f02=»1 7 > > > > > > > > 52R X X Q Y ( O` ? ? ? ? ? ? ? 2D 7 ? ? ? ? ? ? ? 2 7 (@ 7P ? ? ? ? ? ? ? 2z 7 2 4 X M X ! 40" P2 O` X ? ? ? ? ? ? ? 2 7 (@ C^ X 4Q W 9AY T Q P
0x0747c4…074958 Dummy {f00=0x0025, f01=0x0190, f02=» Qz 9AY Tn9ATj @3 D4 @3 $W 1 Y $ D ! P 2 Y 0 P :ET OFP OST Y Y X 5Z X M _d3 4 4 ABCDEFGHI JKLMNOPQR /STUVWXYZ 4 4$4*[.<(+^!$*);] ,%_>?" P X 2 ' Q X 4 X X R ( 5
0x074958…074aec Dummy {f00=0x0025, f01=0x0190, f02=» A , DKP L X X L ! X L P L @ _ C C # ( _R _ _ _ _ _ X T 5b 4 X ! TH X X X T" $ :ET D OFT W OST X P % Y X R X 4 ! X Y T T Y Y
0x074aec…074c80 Dummy {f00=0x0025, f01=0x0190, f02=» X R 8 TYX WH H6 Y _8 X X: X R X ( _$ _* $ XtRX P Y _ A6 X X Y X Y _ $ P4R P6 X Q Y Y <dW Y W $ P R , _ X X*Y$ X X X6 Y Z(P A6 ZrP Y _8 _< _@ ! 4 $ X
0x074c80…074e14 (0, 148) Dummy {f00=0x0025, f01=0x0190, f02=» > > > > > 7 V <a W X ' ?A q A82 > > > > > > > 80 , 0W 0T _ l P$ X X ] X * A8aJ " * - X ( 7P = V X X C^ X 4 L ! L % T< L P4 M ^ L X 4 _ ? ? ? ?
0x074e14…074fa8 Dummy {f00=0x0025, f01=0x0190, f02=»9J: 9l9l: : 9~9~9~9~: 9b9t < W* = W" < W ?: L :AR| M W M M 4 L T M M L PH=GV L L 4 9 M 2 ;6 M L 9G L 4 L M L M M L 4 : W M " A< L P L 9JR@ P P T A, 5 U P T Q P P
0x074fa8…07513c Dummy {f00=0x0025, f01=0x0190, f02=» L ' 7P P p Y "(@ P P $ M : P ( M P Q P P P W P T Q (@ L " A<(@ H H T A, E $ I 4P _ 5 % E (@ L 2 ( P _ 4 ) % ] M (@ L 2 A$ T!fR Q @!f] A,>
0x07513c…0752d0 Dummy {f00=0x0025, f01=0x0190, f02=» T V P T"W L >F A$ L & A$ < M 4 ; M L M L " P M < : M L M A< L ! PT L M L M L & P L E E M < : M M L L % T D V L ! P L ! XfWn L M L M M =0 : L :c:A L D
0x0752d0…075464 Dummy {f00=0x0025, f01=0x0190, f02=» D Q = M 2 < L L $:BV W $:AV M " M A L L $ M 0 D L U M " V L R L M ( M * M , L X L U M W > M 2 < L D L L 0U L 0 L (U L ( L L R $ 9 _ R $ 9 M , L M M
0x075464…0755f8 Dummy {f00=0x0025, f01=0x0190, f02=» L L , U A< L A$ L U ?X M 2 < L M $ L M & L L I P0% P L X =h P W P L X T M . L 9 M L A$ L L . Q L L L R 0 % _ M M L . P M . ? M 2 < L U @, M 2 < L
0x0755f8…07578c Dummy {f00=0x0025, f01=0x0190, f02=»P0W" M L A$ @ M ( L U @ M 2 < L L ( E L % E L E L E M A M 2 < L P$ A< M 2 ;r M "W F" = JZW ( L 4 5 L L " C m M ^ U L ( L L ? ? ? ? ? ? ? A A H 4 R W 7
0x07578c…075920 Dummy {f00=0x0025, f01=0x0190, f02=» d _ AB0 B AH 5 T6 @H P H BD BH BL BP BT @H AH AB0 ( 5 4 X _8 B P W M: B ( "^ B, B . L ER B H L L . Q L L L R 0 % _ M M L . P M . ? M 2 5 B J I B P
0x075920…075ab4 (0, 149) Dummy {f00=0x0025, f01=0x0190, f02=»D X W* 8 AD T AD D (@( 4 4 : 0 :R - Y PU,DNXX,STAT,RY C ;r 5 J ? B C 1P C Y _ @B RDP A P 8 FL B X X ! R V Y AD 8 TKP Y LPP MTP Y
0x075ab4…075c48 Dummy {f00=0x0025, f01=0x0190, f02=»B. 4 X X ? ? ? ? ? ? ? E. 7 _ 5 J B @ Q P P T Z B W P B $>H $ NOT W0 J @ ! $ T P Y B C C R ] B, 0 % E M 0AB CD ADDR @ 9a:a;a R R AF F AH
0x075c48…075ddc Dummy {f00=0x0025, f01=0x0190, f02=»U AE E il E ( "^ F = JZ @ A @ !? $> A"T H _* 5 @H B @ A B, 0 JZ AG AG G ( "^ @ A ( C 5 @ 4 B P J _ 5 B, 5 J AG J R: P J R( G ( "^ G ^ @ T G (
0x075ddc…075f70 Dummy {f00=0x0025, f01=0x0190, f02=»PP , X QD il Hl Y , il Hl Z H @H P : HV ` : B I il _* AHB H> ( "^ : ; ;<A ' R `R Q QB _ QB <a : : : - A ~(@ A" AH A A A A AH AH AH a H @ ? ? > "D P :b
0x075f70…076104 Dummy {f00=0x0025, f01=0x0190, f02=» @ @ @ @ Y Y Y Y " A "; V W # @ A AH @ ? ? > Q @ ? ? ? ? ? ? ? I F" @ P <a:a B :A : P6 $ R, Z R R Q $ :D P $ R ^& : B P R( AJH AJJ AJL AJN AJP AJR AJT
0x076104…076298 Dummy {f00=0x0025, f01=0x0190, f02=» ? JX ( < JZ B @ 9a:a R @ @J @"N %J '~ %J :EOS:EOV _* AHB H> ( AK< K> !? QM P ^ 52 V X 58 58 X AK AK0 AK2 KR @K@T AK@ !L PM !L L Q AK2P !L _ MF !L P Y !L !L AK2X _
0x076298…07642c Dummy {f00=0x0025, f01=0x0190, f02=»9C^ W| !L _ !L Wn !L _ K8 Y Y _ X r s W4 X @ _ W$ AW @W $W %W W !W W X 9d)` AKB AK0A T 7P 9CV * 9AV 9AV X 1P * 9EV )@ X Q6{ X Y Q& X $ :ET D OSP OVT * W * W Y AK0 Y 4 @K0J P Mj
0x07642c…0765c0 Dummy {f00=0x0025, f01=0x0190, f02=» :EOS:EOV ( < "$&1368 AM M !? QM P ^ 52 AN X AQ X AQ Q R x % =A Y X Y4 Z8 AM $ $ T D i M !Q. X "! T( !Q^ P Y " @M !? 1P P !Qb Y !P HN N N N N N N Q N Q(P P Q Q Q P P AQ !QV " P* AN
0x0765c0…076754 (0, 150) Dummy {f00=0x0025, f01=0x0190, f02=» D P X &Q Y W Y 4 X $;H D :ET $;H D OSP OVT W W !ON X ! P X 1P W @ X U W W W !ON X ! . @Wp !ON X ! Tb AW^ X P& T "P R Q W 8T Y W, W< O P6 4 X Q @Q Y _ X R Q @
0x076754…0768e8 Dummy {f00=0x0025, f01=0x0190, f02=» AP X 9c T DM EM 4 X B X :c HM % P^ !Qn_N !Qr !P _X !Qv_^ !Qf Y " !P _p M _ X # ;dC Y AM AM 7P AQ _ _ _( _, _0 _4 _8 _< _@ _D _H @M @M J P* P8 AQ X Q I -W ,A W @M ;I U @M M 4A @
0x0768e8…076a7c Dummy {f00=0x0025, f01=0x0190, f02=» C _: DL P H C _ P X( DD _Z :EOS :EOF 52 5J 5 @ !? ?R _ R 4 ' !? 0X A "! X6 @ Q P ^L_ P XP P R :AV L D I I "R (@(@ ^ :j >Z ^ @ P _ A $ M (@ M M M B
0x076a7c…076c10 Dummy {f00=0x0025, f01=0x0190, f02=» X M W M W y Y Y Y # C B 58 B 58 $? U P R Rx P R U8 RxP P| P Pv P $P &PN "P< /P :P ;P <P =P >P ?P 1 Rx 8 RxWv T W RrW T W Rl W W T W Wx
0x076c10…076da4 Dummy {f00=0x0025, f01=0x0190, f02=» $ X _0 8 TCX< TKXB MTXH DYXN _Z OS :EOF 52 5J 5 @ ( 0 $ , V X Y X W B Y % W L Wb M B P 58 X P P P P 52 B P P 4 ^ :A HU W W M B M
0x076da4…076f38 Dummy {f00=0x0025, f01=0x0190, f02=» L M UxR> U Q8 U|R M M M M W M M M M y W _ @U P M WR AU L " * AW/- AWG L " X ! Y M T(% T$ ! R L W L A T M AUZ AUX X 7P B M W~ i Z| M _* Up Y B AUf X P PD P@
0x076f38…0770cc Dummy {f00=0x0025, f01=0x0190, f02=» Y V AUd AUb AU` X P< P P4 P M @Uf M M !Z !X P @ W M @Uf M M !Z !X X X ? ? ? ? ? ? ? 7 X M AUZ AUX AUh X 7P AU^ ! T @Ub AU^ @Ud Y @U`U AUf X& M X 4 X ?
0x0770cc…077260 Dummy {f00=0x0025, f01=0x0190, f02=» Y ? ? ? ? ? ? ? 7 X M M W Y ? ? ? ? ? ? ? 7 X 7P =b%0 X $ L <B<j P L 4 $ _ L =AV L <AR A"R<B M 4 X Z X % Z L % 4 L ? 4 W M AU 8 4 M @Uh 7P
0x077260…0773f4 (0, 151) Dummy {f00=0x0026, f01=0x0190, f02=» 8P F" X % !X %`X P % X. R" X>W % P T % XT <A P X^<a P @ p @ $ " P $^ F" " A] A] A] A] A] A] A] ] > > > > > > > a] @] E E E E E E ] >
0x0773f4…077588 Dummy {f00=0x0026, f01=0x0190, f02=» " H Wx " Wn & P >b& >AW >a& @T " X X T$W. " P X ` `T 8 P X 8 T" T" T "<A U" U" T" U" T" T" ? ? U" : V: T" T" T" T" T" T" " " " " " " " T" >" H]
0x077588…07771c Dummy {f00=0x0026, f01=0x0190, f02=» 8P F" X % !X %`X P % X. R X>W % P T % XT <A P X^<a P @ p @ $ " P $^ F" " A A A A A A A > > > > > > > a @ E E E E E E >
0x07771c…0778b0 Dummy {f00=0x0026, f01=0x0190, f02=» " H Wx " Wn & P >b& _ X M M Y X a a B Y ! a L a6 X P P P P 52 B 58 @_ P M L 7P A_ ^ !` B !` X X ! P L y !aXW !a~ L x P !a M Q W ! P M L ZZ a6 B Y
0x0778b0…077a44 Dummy {f00=0x0026, f01=0x0190, f02=» Q a6 4 ! 9A " ! M 4 P P L P P ! _ 4 B aF i ` L :C* WL WH:a L ! 9A r X L :B* W":a L ! 9A r X L :B L !? B M A^ L 7P ^ M Y B A^ ^ Y X P P P P P P8
0x077a44…077bd8 Dummy {f00=0x0026, f01=0x0190, f02=» !aXW A_ !f !aX" P !aT M L ZL M A^ V !f !f ` B P2 A^ B T$ B S @] T !f @^H A] ! P W ` B <b :b ^ A^ A^ A^ R>P A^ A^ !d` A^ W& !d` A^ R !d` W !d` A^ P A^ V !d` !d`
0x077bd8…077d6c Dummy {f00=0x0026, f01=0x0190, f02=» !d` A^ Z X Td @] ! P W @^ P Q Y @^ @^ A^ A^ !d` @] ! P W Y A^ & B Y ` @^ :e L Pv !a M Q !aJ !f @] ! P L PP !a~" T" L @^ P<W !a~" T L @_ P$ M L Q !aT_Z M Q ` T X
0x077d6c…077f00 Dummy {f00=0x0026, f01=0x0190, f02=» " T A^ W A^ T P A^ Y T U 4 !f @] ! P !aXW !aX" P M L Z2 ` 4 !f @] ! P !a~" T W( !a~" P M L 6 ` @_ L 4 @^ L " P $ M 4 @^ ^ ( = Y 4 @^ ^ < ) Y 4 X ! J $ <b
0x077f00…078094 (0, 152) Dummy {f00=0x0026, f01=0x0190, f02=» a6 4 !aT !a M Q A^ M !a~ 4 @^8 TOTD @^@ 1T: B A^H @] ! P !aXW !aX" P M L ZJ ` 4 @ _ X X X X $ Pgjgrg hzh % P Y Y Y >% X P Y _" P" P& R| ^T Y _D _T X _ X
0x078094…078228 Dummy {f00=0x0026, f01=0x0190, f02=» P Q X Q % _" Y Y Y 4 % X P Y $ W Y =D %_ X P V % P Y X XT Q _ g Q g 0DKER UNIT CYLD STAT h i 4 h i W2 h i& X W$ h i2 W h ( X =
0x078228…0783bc Dummy {f00=0x0026, f01=0x0190, f02=» M M Y$ #? @ P R P T T T Y" P T _ X D D E E ] @ E @ jV ? ? > ? ? ? ? ? ? ? mv C ( "^ @m k U T " P " P @m W C "& # ( "^ A p @
0x0783bc…078550 Dummy {f00=0x0026, f01=0x0190, f02=» [ [ [ @ L ! P Y _ @ M ^ U > > > > > > >WZ A p ^ T " T0 ! P W SY SD AD _ ! P _, J _2 mv # C ( "^ P m m m m CCT I T P Q _, A
0x078550…0786e4 Dummy {f00=0x0026, f01=0x0190, f02=»( "^ B P @ !? M @m P M L R ! _ PP I H P _ A i A A A @ ~ mN A ~ @mV A ~ @ oL( A~ A A "^ H (@_0 $ ( , 0 4 8 < m T " P " P @ W C "& # ( "^ A p @
0x0786e4…078878 Dummy {f00=0x0026, f01=0x0190, f02=» [ [ [ @ L ! P Y _ @ M ^ U > > > > > > >W A p ^ T " T ! P W SY SD AD _ ! P _, J _2 # C ( "^ P CCT I T DOS - PTS
0x078878…078a0c Dummy {f00=0x0026, f01=0x0190, f02=» y : f P C W $0 P C w : C "!@P ") # B C B % C :d d d evfbd fZk i i j m oHoHe e e e f&d e e rBw@v v v w@vbf f~f f ~ W V 7 @? ! P ~ P W d e 9c Dd4 gN f Q dBW j :aW
0x078a0c…078ba0 Dummy {f00=0x0026, f01=0x0190, f02=»T V P V ~ W V _ 8^n Dd` 2 ! 9B V T SZW V P D $ V 6 V % V E @? ' T 2 % 7_ 2 # LR gN 2" &] Y $! 6P Q $ T 9B e _ _ 6 @? " T 7 $ V P ~ W _ d
0x078ba0…078d34 (0, 153) Opaque[0x194]
0x078d34…078ec8 # DirEnt {nam=»ASM «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x04d0, f03=0x0000}
0x078d34…078ec8 IdxSect {
0x078d34…078ec8 f00 = 0x0026 // 0x78d34 @0x0
0x078d34…078ec8 f01 = 0x0008 // 0x78d36 @0x2
0x078d34…078ec8 gno = [ // 0x78d38 @0x4
0x078d34…078ec8 [0x00]: C0x0026.0x2.0
0x078d34…078ec8 [0x01]: C0x0026.0x3.0
0x078d34…078ec8 [0x02]: C0x0027.0x0.0
0x078d34…078ec8 [0x03]: C0x0027.0x1.0
0x078d34…078ec8 ]
0x078d34…078ec8 }
0x078ec8…07905c Dummy {f00=0x0026, f01=0x0190, f02=» H % #N. q [::Z B Y%o=fr b Fr ? ^a T : 6 9 i %(TLw z~+ *S Nwm 3 C # 7 x zl L $=Tu Z<K m c mjv z L _^ z F$T$ %@$V$ %@% % 4` @ @ . Pn b~
0x07905c…0791f0 Dummy {f00=0x0026, f01=0x0190, f02=» + @J <Z % !2Z "z y :s % H D 6 Y d ~ { & B P y:p W [~ 7]d +b% L M >) E: ( : @ < z R:R: ` B@ ^% g 0~ "<d# c ( B R Q : B | B p ( 0IO ERROR
0x0791f0…079384 Dummy {f00=0x0026, f01=0x0190, f02=» @ c A A ( & $( 4 :a;a : MW& XW" CW RW EW IW LW FW SW OW P @ A b * A a @ A @ A @ P a @ a x @ vP 8 ) A _ * I a ^ a A @ P A @ END A A E A A
0x079384…079518 Dummy {f00=0x0026, f01=0x0190, f02=» + @J <Z % !2Z "z y :s % H a f A f : A f a f ` f : $:f:A $# Q $# P W WL $$ X $$ <A $# P _ ; $$ X, ; A $ 4 & X <a<A : : @ W @ AZQ4 > 09Q& ::Q ..Y
0x079518…0796ac Dummy {f00=0x0026, f01=0x0190, f02=» &<E P" "$ T" 4 %T W _> W W @ @ $<E % @ $$ Q ) A : A W 09U ( 9 S = S 0 S _ : 2 A 09Q AFR ( 9Q R V =D _( : 2 ` A ''Q Y
0x0796ac…079840 Dummy {f00=0x0026, f01=0x0190, f02=» + A ++Q --Q W W V . **Qx ''Qb //Q XXU ''Q Wl AZQf 09Q< 4W W> A ''R W& 09Q AF 2 A : W '' 2 W Z @ @ Wx Z A 6 T 2 $ P P A # P"#
0x079840…0799d4 (0, 154) Dummy {f00=0x0026, f01=0x0190, f02=» @ @ Q F 4 1 A : 2" P0 P, P( V P T * @ P . 60 FOR.O/R.1 SYMBOL TABLE0 UND.ENT.0 UND.LAB.0 ASS.ERR.1 ^ $ ) $ 0P P $ ) _ : d ' L R L _ 0 ) ^ : 9 R : ) Y : @
0x0799d4…079b68 Dummy {f00=0x0026, f01=0x0190, f02=» @ T @ @ A A Z 9! D A _ _ A A @ @ :a;a R R : T T _( O @ T& P 4 l ^ ~ ^ ( l ^ ^ : W W d Pj a d @ Q4 P.
0x079b68…079cfc Dummy {f00=0x0026, f01=0x0190, f02=» @ @ Q @ 4 1 A : 2" P0 P, P( V P T * @ P D 60 FOR.O/R.1 SYMBOL TABLE0 UND.ENT.0 UND.LAB.0 ASS.ERR.1
0x079cfc…079e90 Dummy {f00=0x0026, f01=0x0190, f02=» F @ 2P R A v H A A F 4 I >! A >!P H A I 0 @ tP ( A A _, A Q @ U ( D @ A $ U A : @ PH @ @ T 2 $" B $" P A t $ A A A ( A ) >C
0x079e90…07a024 Dummy {f00=0x0026, f01=0x0190, f02=» A ( @ A A A @ A A < h A f @ A @ A r I 0 ^ z A & . x A v **QX LRRQ 6 L J . T@ @$TP T P A . R A BW F *W _ ( @ P P @ I @ T~ Ut A
0x07a024…07a1b8 Dummy {f00=0x0026, f01=0x0190, f02=» V @ @ Q @ P 2 r 4 "( 4 ( 0FATAL ERROR HAS OCCURRED,NO OBJECT CODE PRODUCED W W 1 @ B L J 1P A A ^_ @ TZ ,W @ TN ( @ T LU> 6 B ,,Y R ,
0x07a1b8…07a34c Dummy {f00=0x0026, f01=0x0190, f02=» % @ @ ) I ((R * ))R U > S S ,,Y` R a B J T ( % a A : $ B : W @ B T B L J 2 @ 0 A a P2 6 ,,RR F $" T @ = ," W A 2 = ] ]
0x07a34c…07a4e0 Dummy {f00=0x0026, f01=0x0190, f02=»W. < Pz T W Tn @ W T * ] ] P 9A Y T2 < = T$ P &T F T W R ,,Y W ,,Y F @ 2 P R ^ ` " a Qx T //Q J Y 9a 09R, YV D 4" Y^ E 4 9 E T ,,Q - = _4 ZN
0x07a4e0…07a674 (0, 155) Dummy {f00=0x0027, f01=0x0190, f02=» @ , _2 @ A A A A $T @ A A A J @ B LPLQ @ @ P8 $T % _ 6 R $ R % ,,Y" J LU6 * @ T* R$ @ j 9a R S 9 @ J @ B L J
0x07a674…07a808 Dummy {f00=0x0027, f01=0x0190, f02=» . @ T 6 ! : J L J ''Q2 8 Y 4 Y T @ T P X ,,RD Q Z4 R ''Q X A ( Y 4 A _ ''Y X* XB Y 4 _L Z A 0 A 2 J Y 9a 09R, YV D 4" Y^ E 4 9 E T ,,Q - = _4 ZN
0x07a808…07a99c Dummy {f00=0x0027, f01=0x0190, f02=»PN 8 I 4 ;a P _ ] ] T ] " 2 YP _T T 8 P "T x _ R T* " P" P F 4 P @ G 4 @ P n _> G 4 4 G T_ PX P 8 @V "P ,,Q R A
0x07a99c…07ab30 Dummy {f00=0x0027, f01=0x0190, f02=»R P 9A G 4 Z_ T| @ @ J PX X @ O O O _ 2! Q : F A 2 : ,,Q R A : Z J R R @ R : P P * : 8 : 2 : 2' ?A 2&p : @ P @ P P P
0x07ab30…07acc4 Dummy {f00=0x0027, f01=0x0190, f02=» W @ B LUL * ==R@ * R4 P P A A B LV _ J 1 A @ T @ B LU A 6 @ %P % 6 A 6 A 6 R 4 F A D z E ^ ( A I ^ @ A @ A A F
0x07acc4…07ae58 Dummy {f00=0x0027, f01=0x0190, f02=»,,R 6 + J @ @ P& T 2 j 4 A _, P ( @ @ A PT $ $# P $ ] T A A @ T A 0_Z ] A @ P W P @
0x07ae58…07afec Dummy {f00=0x0027, f01=0x0190, f02=»# Q A W R W ** A $# Q W ( W X ~ _ P J j P T j A ( 4 & ( 4 ^ j A P 4 0^ ( ASS.ERR.Q D @ "1 I T A I D
0x07afec…07b180 Dummy {f00=0x0027, f01=0x0190, f02=» @ I W j @ I C ` @ I C V A Q M A a ! I 2 A i 1S A q BI @ " Q L @ " I S A I C A I U @ I V @ I A @ I S ~ @ I X t A I M j A I L @ I S A i AD L @ ADS B A i SU 6 @ SUS , A i MU
0x07b180…07b314 (0, 156) Dummy {f00=0x0027, f01=0x0190, f02=»"1 p TR ! 1 h DR DRS !h UR URS !h NR NRS !h RR RRS !h RR RRS !h FR h 1R h WR | h CR h CR z !h CR r p MR ! a h 2R ! 1RS !h TN p BR " H M 6 h NM . ` DK DKL 1 h DK DK
0x07b314…07b4a8 Dummy {f00=0x0027, f01=0x0190, f02=» t P B q BL ` IO@ @ h NR H h TR @ ` STH ? h ST H ` NB(@ h LT h NH h KM ( ` IT > p LR h SR !h CR !p UR a ! h VR h AR h SR ` LK i CK ! a UK i VK b AK j SK
0x07b4a8…07b63c Dummy {f00=0x0027, f01=0x0190, f02=» 8 h RC 8 p LN8 h RN 8 h ER p h ER x h GR h MR r !p XR a ! a XK ! h LR h SR ! ADR > ADRS 4 ! SUR * SURS ! MUR MURS ! DVR DVRS !h VF p h VB x VUS x VSU p STR ! LDR h LR h SR !h FL
0x07b63c…07b7d0 Dummy {f00=0x0027, f01=0x0190, f02=»x FF tx FT px IF TAB ORM FORM x EN J8 8 8 X Z X P X N 8 8 8 X E X G X L 8 8 8 8 X A X R :P ZA1 ZA2 ZA3 ZA4 ZA5 ZA6 ZA7 ZA8 ZA9 zA10 zA11 zA12 zA13 zA14 zA15 b AK j SK
0x07b7d0…07b964 Dummy {f00=0x0027, f01=0x0190, f02=» LABEL = FIXS3 DATE = 790404 PACK NBR = 001 f 4: V - P Y _( Y M : ] =IR E
[…0x3…]
0x07be20…07bfb4 (0, 157) Opaque[0x194]
0x07bfb4…07c148 # DirEnt {nam=»TLK «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x04f0, f03=0x0000}
0x07bfb4…07c148 IdxSect {
0x07bfb4…07c148 f00 = 0x0027 // 0x7bfb4 @0x0
0x07bfb4…07c148 f01 = 0x001a // 0x7bfb6 @0x2
0x07bfb4…07c148 gno = [ // 0x7bfb8 @0x4
0x07bfb4…07c148 [0x00]: C0x0027.0x2.0
0x07bfb4…07c148 [0x01]: C0x0027.0x3.0
0x07bfb4…07c148 [0x02]: C0x0028.0x0.0
0x07bfb4…07c148 [0x03]: C0x0028.0x1.0
0x07bfb4…07c148 [0x04]: C0x0028.0x2.0
0x07bfb4…07c148 [0x05]: C0x0028.0x3.0
0x07bfb4…07c148 [0x06]: C0x0029.0x0.0
0x07bfb4…07c148 [0x07]: C0x0029.0x1.0
0x07bfb4…07c148 [0x08]: C0x0029.0x2.0
0x07bfb4…07c148 [0x09]: C0x0029.0x3.0
0x07bfb4…07c148 [0x0a]: C0x002a.0x0.0
0x07bfb4…07c148 [0x0b]: C0x002a.0x1.0
0x07bfb4…07c148 [0x0c]: C0x002a.0x2.0
0x07bfb4…07c148 ]
0x07bfb4…07c148 }
0x07c148…07c2dc Dummy {f00=0x0027, f01=0x0190, f02=» D E % 6 % . % A / H < / W :C H A M 4 H R M 4 PB " P :C_ @ 9C E ^ 4 V V ( T # Y$ @ : ( @ D A V A X D ( A ;FR A W H T A Z 2 >
0x07c2dc…07c470 Dummy {f00=0x0027, f01=0x0190, f02=» H A N A T A $ @ A @ $ A " @ ( A & @ , A * @ N @ T A R A P A < A @ X A V V $P D " X E _ @ P @ A @ " A $ @ & A ( @ * A , @ P > H > H $ > > > >
0x07c470…07c604 Dummy {f00=0x0027, f01=0x0190, f02=» > % @ T8 @ P ! ! > > > > ( _ MR:FC W MR:OPN : D D ! L Qz L , % X P$ P P V G = G 0 G X <A @ BQ( P D G X G = X G X G V
0x07c604…07c798 Dummy {f00=0x0027, f01=0x0190, f02=» < N M N M T - Y : < V ;AP N N MR:RS W MR:GER F % P F P G G 0 1 G T G W F P~ N G G = U : H 4 8 U : L H V V V V V F P 0 G T G F F
0x07c798…07c92c Dummy {f00=0x0027, f01=0x0190, f02=»U : H W MR:PUR F % P F P F G G F G T G W 9 F TX F PR F U : D x F P 0 G T G F F W MR:ENR F ! P
0x07c92c…07cac0 Dummy {f00=0x0027, f01=0x0190, f02=» 1 G T G W F PH N G G = U : H F Pd 0 G T G F P " F P. 0 G T G F P U : H l " " " W MR:PUW F % P F P F G G F G T G W 9 F T0 F P 0 G
0x07cac0…07cc54 (0, 158) Dummy {f00=0x0027, f01=0x0190, f02=» G W % U : H F P. 0 G T G F P U : H MR:AR W MR:ASB & P P 2 F P F D E T %W ) G G 2 W MR:REL & P P D G G P 0 E T E MR:L
0x07cc54…07cde8 Dummy {f00=0x0027, f01=0x0190, f02=» W MR:WAI F R R G < ( B F B ] B P W B P ; R _ D G G R W MR:INF < ( B MR:RWR W MR:RBR F P $ T F T F P@ 0 G T G F
0x07cde8…07cf7c Dummy {f00=0x0027, f01=0x0190, f02=» F U : H N G G = MR:PC W MR:EXI D ( W MR:DAT @ T I Y 6 W MR:TIM @ " T I I Y I < I I 2 I p MR:ES
0x07cf7c…07d110 Dummy {f00=0x0027, f01=0x0190, f02=»T( " U : H T X N W MR:REW F $ P P p 1 U : H N p # " 'Q R # : A A A A A A A A A A A A A A A A A A A A
0x07d110…07d2a4 Dummy {f00=0x0027, f01=0x0190, f02=» L ! 0 5 1 L # # :* CREDIT CODE LINKER REL 10.0 800314 * * DATE XXXXXX * PAGE 0000 *
0x07d2a4…07d438 Dummy {f00=0x0027, f01=0x0190, f02=» UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUU
0x07d438…07d5cc Dummy {f00=0x0027, f01=0x0190, f02=»UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUU IDENT O T:D TRA NOD P:PIL T:FMT P:S001T:KEY S:GTABT:LIT P:BAS T:BAT T:PAT P:
0x07d5cc…07d760 Dummy {f00=0x0027, f01=0x0190, f02=»P : < = G T . F P _ F =h P8 T* . F P _ F P _ : & A ' : @ ' : # HT W T W ( < ) = # : # H P n P ( ) = # : ^ V H H
0x07d760…07d8f4 (0, 159) Dummy {f00=0x0028, f01=0x0190, f02=» V H H ` V H H V H H
0x07d8f4…07da88 Dummy {f00=0x0028, f01=0x0190, f02=» b V H H V H H `
0x07da88…07dc1c Dummy {f00=0x0028, f01=0x0190, f02=»
[…0x3…]
0x07e0d8…07e26c Dummy {f00=0x0028, f01=0x0190, f02=» | n n
0x07e26c…07e400 Dummy {f00=0x0028, f01=0x0190, f02=» ( p !
0x07e400…07e594 (0, 160) Dummy {f00=0x0028, f01=0x0190, f02=»! :f Q P # :b TD A! A! [ T 9h A! & A! T A! T 9h A! & A! A! W P@ P Z P Q0 0P* P$ P T [ # : # ! H #b A!( A!D A!J > NO 3 D S S H S > > # :
0x07e594…07e728 Dummy {f00=0x0028, f01=0x0190, f02=» # @ X @ dW& # @ d @ X @ ` @ U A =a>a R, @ V A =A>A A d A X " # : A A F ; &P _ # : : T : _ # %T # :
0x07e728…07e8bc Dummy {f00=0x0028, f01=0x0190, f02=»T # : )P _ [ [ [ [ ; Z [ : [ [ : Z # Z # Z Z Z Z Z Z Z : = $> % D $N % $X ( ( I/O ERROR FILE = STAT
0x07e8bc…07ea50 Dummy {f00=0x0028, f01=0x0190, f02=» " : : : G P W l : J A : _ A : _ A : _( A : _4 A : _@ A : b _L A : _X A : j _d A : x _p A : _| A : _ A : _ A : _
0x07ea50…07ebe4 Dummy {f00=0x0028, f01=0x0190, f02=» B A ` A d A ( C ( C ( C A(D ($ @(D ,P T (F @ X A @ @ A PWF A @(DT R2 ]B @ D !CCT A N A J C _n > A V $P$ D D X D * E _( A P @(DP T&
0x07ebe4…07ed78 Dummy {f00=0x0028, f01=0x0190, f02=» l % @(D A' A'& > > _ @ 9CV @ NT DW D A E A @ V A X @ ` A d A A > V @ d $P( D X ) # - M M _, ) V $P ! # ) A _ ) @ P A A N N J C C @ 9D % N A J
0x07ed78…07ef0c Dummy {f00=0x0028, f01=0x0190, f02=» : A ( : 2 R > : 5 v@7 7 > - - 7 ( - 2 #b @ V : " T. T Tn B P, B $ PZ B P Y<PL P T T W4 P4 W0 : )P ;M C W # : #b A,: T
0x07ef0c…07f0a0 Dummy {f00=0x0028, f01=0x0190, f02=» T| N ` N" :A B ;m )t " )t # )t ( T B ! T @)r! T A)r Z`_ A)r WB ! T. N T A)r @)r! T _ A)rW ! T A)r ) # : @)l @)n @)r" T P, @)pU +vWv R V $Rp A)l A)nWB
0x07f0a0…07f234 (0, 161) Dummy {f00=0x0028, f01=0x0190, f02=»_ _ @)p R V$ H N " @)p (" :A + : + @)p A)p_8 R @)p N R W )p T W # V8 A)j ,$ R @)l @)n A)n A)l A)p R S _P )p : # @)j R P S > R V A)j_" # : #b A-j R R @ ZR -b_ $:ARL:A
0x07f234…07f3c8 Dummy {f00=0x0028, f01=0x0190, f02=» A @ S b S # : @ 9FV@ @ b C E T A ET6W& D E P E DDP R E P D A D -b _^ _ S > R Z R S A Z : #b @ 9CV 9IR 4 # : 2 R >_ #b @ 9L . @ 9C 4 R P C / 0` 0 L n
0x07f3c8…07f55c Dummy {f00=0x0028, f01=0x0190, f02=» ~ 1 1 2J 2 ' 2| 2 A A A A A A A A n A z A A A @ ` A d @ P A # : R @ P " R P / @0^P 6 ,P _ P 2 0` 0 @ :DV W 1 2J = = R
0x07f55c…07f6f0 Dummy {f00=0x0028, f01=0x0190, f02=» $P 0Pj D L , 1 L P L 8 - 9 W6 @ =LR L V( 8 @ =LV X R Y _t X~ A0^_ : (P: (T _ ,P L P ^ P X" X&_ I ( 9 5 ) 4 _: : $P D H R I _ 0 _ : # H T"
0x07f6f0…07f884 Dummy {f00=0x0028, f01=0x0190, f02=» 9 P 9 Pz 9: C T @ , A ,W D C C ( # U :x D T A > D C C B U P :x 1 1 1 4P _ 4 9 1 # : $P D
0x07f884…07fa18 Dummy {f00=0x0028, f01=0x0190, f02=» : > R : #b x 4 f # @ 9C 4x @ T R < 4 PW R < P @ @ A A C h H " 4 . < X P & ;D _ R % ;D @ b 4 H " 4 < 0 4 A 4 ` H
0x07fa18…07fbac Dummy {f00=0x0028, f01=0x0190, f02=» @ T A A @ P R > S # > # : : A gP A _ @ TL f d T A R > S # > _V @ * A A _ _ @ _ @ $ @ b _. * & " , ( $ @ T R :h -Q 5R : @ T 4
0x07fbac…07fd40 Dummy {f00=0x0028, f01=0x0190, f02=» # # : #b R 9i @ :LRn 7z 9 P( 7r 7 9 P D7 D7 6 R ;a T C :OV C ;NV R Wp 7z 9 P4 @ <DR" 7 7 9 P D7 W 9: 6 ! Z C 8 W
0x07fd40…07fed4 (0, 162) Dummy {f00=0x0028, f01=0x0190, f02=» R P*?A S ?i R :x S # : n z f r ~ j v 9B9B9B9: $ ( #b 2>iP & R W R @ 9C 4 # : f " 2?m f # X8 8 8t f f Pd f @ T ( @
0x07fed4…080068 Dummy {f00=0x0028, f01=0x0190, f02=» T. B P P& Q @ P Q # : _ >_ # 8 8 2 0P ( 1 " P$ " ) # @8 I W P I # : @8 >_ #b W #b Q 9 U 9g D9 $ $ T2 @ n A n F P > S S M H > ;
0x080068…0801fc Dummy {f00=0x0028, f01=0x0190, f02=» 8 5R6Q0 Q, ;^ _` Q < X T _t W #b " P W ;t V W ;t R R T T R Q ; ; ; ; V R T(W # Q
0x0801fc…080390 Dummy {f00=0x0028, f01=0x0190, f02=» W : #b @ n D HP A n @ n D HT D F [ A n # : A n @ n F R P > S E H > S _< # P, Q B ^ _ @ T C _0 # : #b $P D D P V L PF =h & >A D R _ " P W
0x080390…080524 Dummy {f00=0x0028, f01=0x0190, f02=» C A # : # (P:W (P4 H V W P&Q =t P _ 5 ( 9 ) =t 8 # : >_F <T 5 9 : #b @ PF R ! @ R P : A @ S R B> 4T # : #b R ? ? ? ?, X?H #b W #b R ! TR
0x080524…0806b8 Dummy {f00=0x0028, f01=0x0190, f02=»! D?` D?f P # P Tr T Q !CCP @ P Ap P @ 9EV 9GR P B C @ P 8 # : 2 R >_ B_ R 0P Y P : P ! P P P Q P :>~> ? ? >x? > ? >x? ? > B C P Z b ^ #b R # p
0x0806b8…08084c Dummy {f00=0x0028, f01=0x0190, f02=» U :xW @ ! P& R ! ^ # A A p A # : [ A _ #b A p A A A ^ @ P A # : #b W #b @ 9B ^ A A C C P6 ' ?A ^ :x ^ :x p ^ C @
0x08084c…0809e0 Dummy {f00=0x0028, f01=0x0190, f02=» ' ?A B2 B0 !CCT W2 T W, X ' P" X A T R " P B< B< R P4W C C W$ , P - C - A > P Y # : @ C _ ^ 2 Z . b 0 #b @ P @ Y A 8P X V W QL V W Y"
0x0809e0…080b74 (0, 163) Dummy {f00=0x0029, f01=0x0190, f02=» ( > @L A ` A d A @ 9 R A A 9 R| 'J > A Z A . A ^ A 2 A j A v A A A A A A B 2 A > A @ V A X A @ P A V $P D " X E _ ` P 'Z D A T A P @ :DR$ D @ > A > @ R W R @ BP W 'd A B @ BR @ 9DR
0x080b74…080d08 Dummy {f00=0x0029, f01=0x0190, f02=» V % @ P @ < ( A < A H A L A ' A % @ P T ) A P ' @ T @ X A V : A _ D ? :n R S Z S A Z @ <P. A' @ <R A' > A <:A H' A' > : N J P D C V A : E $ N J " P C _ :
0x080d08…080e9c Dummy {f00=0x0029, f01=0x0190, f02=» * / #b N r ( @ X ( # : #b R S > P R # S _ # : R S S U W S # > S 4 S R > : #b A*H R R @ ZR *@_ $:ARL:ARB H b " b $ D @ Z R
0x080e9c…081030 Dummy {f00=0x0029, f01=0x0190, f02=» E T A ET6W& D E P E DDP R E P D A D *@ _^ _ S > R Z R S A Z : #b @ 9CV 9IR 1 # : 2 R >_ #b @ 9L + @ 9C 1 R P C , -> - L n 8 n f - L z 8
0x081030…0811c4 Dummy {f00=0x0029, f01=0x0190, f02=»/ A A A A A A A A n A z A A A @ ` A d @ P A # : R @ P " R P , @-<P 6 ,P _ P 2 -> - @ :DV W - /( : : R > S # > > / /Z '
0x0811c4…081358 Dummy {f00=0x0029, f01=0x0190, f02=» L 8 - 9 W6 @ =LR L V( 5 @ =LV X R Y _t X~ A-<_ : (P: (T _ ,P L P ^ P X" X&_ I ( 9 5 ) 4 _: : $P D H R I _ - _ : # H T" I $P D H R I _ - _ # : # $ /"
0x081358…0814ec Dummy {f00=0x0029, f01=0x0190, f02=»6 C T @ , A ,W D C C ( # U 7V D T A > D C C B U P 7V - - - 4P _ 4 9 - # : $P D H ^ E _ $P D H ^ E _ : R W
0x0814ec…081680 Dummy {f00=0x0029, f01=0x0190, f02=»# @ 9C 1V @ T R 9 1 PW R 9 P @ @ A A C h H " 1 . < X P & ;D _ R % ;D @ b 1 H " 1 < 0 1 A 1 ` H " 1 < 1P T A @ P& @ P
0x081680…081814 (0, 164) Dummy {f00=0x0029, f01=0x0190, f02=» # : : A gP A _ @ TL f d T A R > S # > _V @ * A A _ _ @ _ @ $ @ b _. * & " , ( $ @ T R :h -Q 20 : @ T 1 2 R > :; ; ;`; 2 2$2$2$2 2 2 2 2 2 2 2 > > >
0x081814…0819a8 Dummy {f00=0x0029, f01=0x0190, f02=» 6 P( 4P 4h 6 P D4x D4h 3 R ;a T C :OV C ;NV R Wp 4X 6 P4 @ <DR" 4` 4p 6 P D4pW 6 3 ! Z C 5 W " @ C C @ # # : # >
0x0819a8…081b3c Dummy {f00=0x0029, f01=0x0190, f02=» 7V S # : n z f r ~ j v 6 6 6 6 $ ( #b 2>iP & R W R @ 9C 1 # : f " 2?m f # X4 4 5R f f Pd f @ T 9 @ <CV C @ <CV : C P C $P _
0x081b3c…081cd0 Dummy {f00=0x0029, f01=0x0190, f02=» _ >_ # 5 5 2 0P ( 1 " P$ " ) # @5 I W P I # : @5 >_ #b W #b Q 6 U 9g D6 $ $ T2 @ n A n F P > S S M H > 8~ :a # R R S > _ S <H % [ [
0x081cd0…081e64 Dummy {f00=0x0029, f01=0x0190, f02=» Q, 8< _` Q < X T _t W #b " P W 8R V W 8R R R T T R Q 8~ 8~ 8f 8f V R T(W # Q P R Zf _n R 6 P
0x081e64…081ff8 Dummy {f00=0x0029, f01=0x0190, f02=» n # : A n @ n F R P > S E H > S _< # P, Q B ^ _ @ T C _0 # : #b $P D D P V L PF =h & >A D R _ " P W 7V " P W D Y T
0x081ff8…08218c Dummy {f00=0x0029, f01=0x0190, f02=» T Tn B P, B $ PZ B P Y<PL P T T W4 P4 W0 : )P ;M C W # : # (P:W (P4 H V W P&Q : P _ 5 ( 9 ) : 8 # : >_F <T 5 9 : #b @ PF R ! @ R
0x08218c…082320 Dummy {f00=0x0029, f01=0x0190, f02=»! TR @ P D< D< (P* H ;AZ H P # X P T A , > W| < P < X< W R ! D< D< P # P Tr T Q !CCP @ P > P @ 9EV 9GR P B C @ P 5 # : 2 R >_ B_
0x082320…0824b4 (0, 165) Dummy {f00=0x0029, f01=0x0190, f02=» & S PD " @ ^ D U 7VW A @ ! P ! @ ^ ) A @ R` @ ^ D U 7VW @ ! P& R ! ^ # A A p A # : [ A _ #b A p A A A ^ @ P A # : #b W
0x0824b4…082648 Dummy {f00=0x0029, f01=0x0190, f02=» C @ # R 3 #b < RJ @ ^ D " :AT 9h P _ R " S P 9H R @ ^ 2x # : # ' ?A ? ? !CCT W2 T W, X ' P" X A T R " P ? ? R P4W C C W$ , P -
0x082648…0827dc Dummy {f00=0x0029, f01=0x0190, f02=» W Y" X P X P 5 X T A A W 5 ( 8 ) 9 + _b # :
0x0827dc…082970 Dummy {f00=0x0029, f01=0x0190, f02=» F .R F 0 F *Q &< G . F .?DV ?d' % G . 2 F M M G =T p M P G * : F * F 0R 2 R&P 0 G * G * F M M _, : F 1 I I G * G ( ' F .>A ' + ' F n #
0x082970…082b04 Dummy {f00=0x0029, f01=0x0190, f02=» F 0 U U F .?BV F X ,?d'> )f " # U 2 U G * F .?CV@ F X ,?A'> )t " # U 2 U G * G . G / : F - n " p U U G * : G . G / : G .
0x082b04…082c98 Dummy {f00=0x0029, f01=0x0190, f02=» _()0 :R ' : # T V u0 ' )>9d A( )> d )> )> A( ( ( (X ( R W( ( ( P( !00X R !00P P % ( ( P _" % # : R _ 9D :) ) ) * * *$*>*V*d*x* * * * * + +&+X+Z+p+ + + + , ,",8,N,
0x082c98…082e2c Dummy {f00=0x0029, f01=0x0190, f02=»ABLE CALL TABLE PERFORM TABLE LITERAL POOL CROSS REFERENCE LISTING UNSATISFIED EXTERNALS PICTURE POOL LINKER STATISTICS KEYTABLE POOL FORMAT POOL SEGMENT MAP LINKER STATISTICS TOTAL &LOC MODULE ERROR COMMENT $LOC DATA IX SY
0x082e2c…082fc0 Dummy {f00=0x0029, f01=0x0190, f02=»AL 2 S E G M E N T N U M B E R O F 0NUMBER TYPE LENGTH USAGE MODULES ERRORS MEMORY OVERFLOW SYMBOL TYPE CONFLICT ILLEGAL INPUT LOAD ADR INCORRECT UNREFERRED LITERALS UNDEFINED LITERALS NO START ADR DBL DEF MODULES UNSATI
0x082fc0…083154 (0, 166) Dummy {f00=0x0029, f01=0x0190, f02=» TOO MANY LITERALS FORMAT LENGTH ERROR MULTI DEF ENTRY NOD TYPE ERROR MODULE LONGER THAN SEGMENT SIZE IDENT MISSING ADDRESSING MODE CONFLICT NOD SEQUENCE ERROR CALL TABLE PERFORM TABLE LB TABLE LITERAL DESCRIPTOR TABLE PICTURE DESCRIPTOR TAB
0x083154…0832e8 Dummy {f00=0x0029, f01=0x0190, f02=» PROGRAM LENGTH = NUMBER OF ERRORS KEYTABLE DESCRIPTOR TABLE KEYTABLE POOL SIZE AVAILABLE WORKSPACE USED WORKSPACE UNUSED WORKSPACE MAX WORKSPACE PER MODULE SEGMENT SIZE PERCENTUAL USAGEPROGRAM LENGTH =LINKAGE ERROR : : XXXXX BYTES, XXXXX ENTRIES: XXXX
0x0832e8…08347c Dummy {f00=0x0029, f01=0x0190, f02=» f ~ @ D A ` A d A @ @ P } ( : A } S A ~ |W > p ?H/ 2 Tr Q / 2 2 2 2 2 2 2 v 2 /@ 2 U`/ 2 38 6z N J " @ A T
0x08347c…083610 Dummy {f00=0x0029, f01=0x0190, f02=» 6> A 8 W 8x T U`/ 2 1| > P ! @ M A @ M A @ M A A A A : # A1 A1 > 3 S S @ S @ S S > # : # <: @ T U` 2 P <: #
0x083610…0837a4 Dummy {f00=0x0029, f01=0x0190, f02=» A2 > R :R8W @2 P.> > & 3 @2 S :a S @20 A2 > A2 # : # # A2 > " Z # ?h # S A3 > # : f j r v ~ " $ * , # @ @ P 3 3 =B < P L A P O W L P
0x0837a4…083938 Dummy {f00=0x0029, f01=0x0190, f02=»o W K =^ & A 3( < P F q P * W F P * =^ 34 # : f j ~ # @ P @ A4Z 4N > @ A4 @4Z A 4 4R > @ A4^ @4 A 6 T > @ A4` T @4^ A 8 4V > @ @4` A : A @
0x083938…083acc Dummy {f00=0x0029, f01=0x0190, f02=» C T 1 e 4b <: 4Z <: <: @ Q T 1 e 4d <: 4 <: <: T* 1 e 4f <: 4^ <: <: @ Q T v 1 e 4h <: 4` <: <: # : # 9a :a ; S < S dR _ Q R
0x083acc…083c60 Dummy {f00=0x0029, f01=0x0190, f02=»PD R( " # 0 C P C P C _, @ P = _ Z P " %W ! # 0 C P C _ > 2! P( ! P ! R A _& @ @&_8 R ! R R 9 Zd <: _ 7 8 8&848P8j) ) )
0x083c60…083df4 (0, 167) Dummy {f00=0x002a, f01=0x0190, f02=» 4 6 : # W # W # > X7 > > A7 @7 X7 V > 7 " # X7 0 P" P P /`W /D # @ P % " ) X7 $ $ T 9A P 9a ( P P 7 W )
0x083df4…083f88 Dummy {f00=0x002a, f01=0x0190, f02=» P 5 X T A A W 5 ( 8 ) 9 + _b # : # > D: > > 8 ; U @ ;L > (X X V * " Wr X 9AV" (X (XWH X L T X " G W" (X
0x083f88…08411c Dummy {f00=0x002a, f01=0x0190, f02=» > X X VL H 9a @ / 2 / <: X R / <: :09AR H XZ H V % <: % R <: :0 # : # 8P* X ^ X % <: % <: A _. # : ; % <P %_ : : # @ P <8
0x08411c…0842b0 Dummy {f00=0x002a, f01=0x0190, f02=»;a A<4= V A = V U A<6W^ @<4PV @<4 9a :A 3& A= > # S @= A=, > A<4 A<6 # : # "P _ P # : # P, Q B ^ _ @ T C _0 # : #b $P D D P V L PF =h &
0x0842b0…084444 Dummy {f00=0x002a, f01=0x0190, f02=»# _ # = : >V>f>n>rSTR BIN BCD PIC KEY FMT FTB #b A>L > T>D > > 8 @ X ^ @ VP > " T (X X 9l9B @>L >N # (X T R > _z Q W: X '
0x084444…0845d8 Dummy {f00=0x002a, f01=0x0190, f02=» - @> Q A> W A> @ V > (X > R <: _ Q @ V > > @> @ ^ > > _ # : # x P R * " B @ P _ > # (X h H " P T # >
0x0845d8…08476c Dummy {f00=0x002a, f01=0x0190, f02=» 8P X Y R X R W ^ # # : I E I I W I E E E I E E E E I E E E I E E # W # AA 8 B > @A T" P $ X P 8 B A @A P P /4 # W * " A ( AX " !WWP A
0x08476c…084900 Dummy {f00=0x002a, f01=0x0190, f02=» A # > A # : #b *Pp Z Z R 8 4 U 8 5R6Q0 Q, D$ _` Q < X T _t W #b " P W D: V W D: R R T T R Q
0x084900…084a94 (0, 168) Dummy {f00=0x002a, f01=0x0190, f02=»P B [ # : D $ ! 9A : R W : #b @ n D HP A n @ n D HT D F [ A n # : A n @ n F R P > S E H > S _<
0x084a94…084c28 Dummy {f00=0x002a, f01=0x0190, f02=» / 00 TLK.ERR. # ?$ A ` A d A @ @ TD A A 20 > 0 A A 4 > 7 6 @ P & @ T . > 5 @ T T @ P W ;< @ ?a @ A 5V A @ A 1 :> P / ( / ( A/ ( # :
0x084c28…084dbc Dummy {f00=0x002a, f01=0x0190, f02=» 3P 3Pj_: 2$ <A ]H f " 4?m f # f 3R P $P _ " C _^ 4V W >AX R _ T , L X L L T 5_( G _0 @0 V > > T S # 0 : # N E 8P E _
0x084dbc…084f50 Dummy {f00=0x002a, f01=0x0190, f02=» H 2 ";L = <J ( <J_T N $P. D ' X ( <J <J <J_2 <J = # : # # A3 > " Z # ?h # S A3J > # : #b @ V : " T. T Tn
0x084f50…0850e4 Dummy {f00=0x002a, f01=0x0190, f02=» # : & " * 4N4V4^4f4n4v4~4 4 4 4 4 4 4 P:END T:FMT T:PIC T:KEY T:LIT T:PAT T:CAT T:BAT P:BAS I:NTPA U:BTAB T:ATAB S:BTAB I:RST # 2 aH = eh eh = 3 $PNR
0x0850e4…085278 Dummy {f00=0x002a, f01=0x0190, f02=»S < S dR _ Q R _ # : I E I I W I E E E I E E E E I E E E I E E # W # A5 8 6 > @5 T" P $ X P 8 6 5 @5 P P /4 # W * " 5 ( 5 " !WWP A 5
0x085278…08540c Dummy {f00=0x002a, f01=0x0190, f02=»5 # > 5 # : # > > > > N 8P > X % (X X 9h S ( X ! P X 5V ( % G R $P D _ ! ( ) ( > _ # : # A7 A7 A > P R > _
0x08540c…0855a0 Dummy {f00=0x002a, f01=0x0190, f02=» H X ?a @/ = _* V $X H X ?a ` H L P / / = _: 2$ <A ] f " 4?m f # f 3R B ! X $P _ " C A7 _d 3TN 2$ <A 4 $P0 ( V S W* R >A_ % H
0x0855a0…085734 (0, 169) Dummy {f00=0x002a, f01=0x0190, f02=» L d ` h 4 6 8 : ` l 4 6 : # W # W # > X9 > > A9 @9 X9 V > 9 " # X9 0 P" P P /`W /D # @ P % " ) X9 $ $
0x085734…0858c8 Dummy {f00=0x002a, f01=0x0190, f02=» > > > 8P X T > > $ X* > ?m # P S S ! 9bT W D;8 S X ! Pj X T * " S WH (X (X (X - ' # & > 8 # : # @
0x0858c8…085a5c Dummy {f00=0x002a, f01=0x0190, f02=»= V S = V S ;a A<D= V A = V U A<FW^ @<DPV @<D 9a :A 3& A= > # S @= A=< > A<D A<F # : # A=b N =c J " T" =P $R ( <J_ <J # : # A= A= > 3 S S
0x085a5c…085bf0 Dummy {f00=0x002a, f01=0x0190, f02=» ' # > V ' @= # A= > R :R8W @= P.> > & 3 @= S :a S @> A> > A= # : # 4P [R > , > (X - ' # ( G ( ) ' _` P P > # :
0x085bf0…085d84 Dummy {f00=0x002a, f01=0x2008, f02=» B h p x
0x085d84…085f18 Dummy {f00=0x002a, f01=0x40a8, f02=» @ F IDENT Z:TB70 TRA 3.3 79-11-16 O111 REL 79-03-01/JATE Z:TB70 H Z:TB70T Z & 2 n 4 @ SREGCOSTREG VOL2 4 @
0x085f18…0860ac Dummy {f00=0x002a, f01=0x409e, f02=» @ F IDENT D:TB80 TRA 3.3 79-11-16 O111 REL 79-03-01/JATE D:TB80 H D:TB80T Z h n :T @ @ SREGCOSTREG VOL2 4 @
0x0860ac…086240 Dummy {f00=0x002a, f01=0x4168, f02=» @ F IDENT Z:TB80 TRA 3.3 79-11-16 O111 REL 79-03-01/JATE Z:TB80 H Z:TB80T Z & n & & = & [ & y & & & & &
0x086240…0863d4 (0, 170) Opaque[0x194]
0x0863d4…086568 # DirEnt {nam=»TRA «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0558, f03=0x0000}
0x0863d4…086568 IdxSect {
0x0863d4…086568 f00 = 0x002a // 0x863d4 @0x0
0x0863d4…086568 f01 = 0x001a // 0x863d6 @0x2
0x0863d4…086568 gno = [ // 0x863d8 @0x4
0x0863d4…086568 [0x00]: C0x002a.0x3.0
0x0863d4…086568 [0x01]: C0x002b.0x0.0
0x0863d4…086568 [0x02]: C0x002b.0x1.0
0x0863d4…086568 [0x03]: C0x002b.0x2.0
0x0863d4…086568 [0x04]: C0x002b.0x3.0
0x0863d4…086568 [0x05]: C0x002c.0x0.0
0x0863d4…086568 [0x06]: C0x002c.0x1.0
0x0863d4…086568 [0x07]: C0x002c.0x2.0
0x0863d4…086568 [0x08]: C0x002c.0x3.0
0x0863d4…086568 [0x09]: C0x002d.0x0.0
0x0863d4…086568 [0x0a]: C0x002d.0x1.0
0x0863d4…086568 [0x0b]: C0x002d.0x2.0
0x0863d4…086568 [0x0c]: C0x002d.0x3.0
0x0863d4…086568 ]
0x0863d4…086568 }
0x086568…0866fc Dummy {f00=0x002a, f01=0x0190, f02=» #M M 2 # " 2 3 l 2 D h Fp R Fp W Fp [ d 2 ` :C H A M D H R M D PB " P :C_ @ 9C E ^ D V V ( T # Y$ @ J ( B A b 9o A
0x0866fc…086890 Dummy {f00=0x002a, f01=0x0190, f02=» N $ @ H | @ A @ P A A N A @ Q -J % : A A& ' N @ P A A W - @ A A n A < A > A @ A A A : . @ n @-H . A . ., ( @ p A r A p 1 (J - (J (J TD
0x086890…086a24 Dummy {f00=0x002a, f01=0x0190, f02=» @ BP .8 @ R .D @ - P T ~ P : T : _&.P. @ P R 2 d T @ R : @ P @ RP & P z T @ T A .h A L @ TL @ BP .8 F : z ` H :
0x086a24…086bb8 Dummy {f00=0x002a, f01=0x0190, f02=»% P< . W2 @ :P A : ! P"% T .8 -J W % T .8 : @ = V A J . @ T @ P T : * AZ AZ 09 .. '' < * '' * < J A p A A A-F M u
0x086bb8…086d4c Dummy {f00=0x002a, f01=0x0190, f02=» W* A U -J @ T n N @ V4 # b U -J N P A P @ V> @ XP <W * # b IQb N T P @ IV2 J +R IP W + # b IQ N PF J # W
0x086d4c…086ee0 Dummy {f00=0x002a, f01=0x0190, f02=» : Q : M M N N N N$N0N<NHNTN`NnN`N`N`N`N`N`N`N`N`N`N`N` (STACKTOP
0x086ee0…087074 (0, 171) Dummy {f00=0x002b, f01=0x0190, f02=» IDENT MODNAM TRA XX.Y - - F1 O1111 = , ( Z J , j ) z Z ) z , j , & , C X W D ' , , @' @' ,
0x087074…087208 Dummy {f00=0x002b, f01=0x0190, f02=» , " B+ - AZ f AZ f 09 f .. f AZ AZ 09 .. , TERM . TWB . UWB . CWB . SWB . DWB . DSET . START . REENTER . STACK . FMTCTL . BLK . DBLK . BIN / BCD / BOOL / STRG
0x087208…08739c Dummy {f00=0x002b, f01=0x0190, f02=»CMP SET A CLEAR @ TEST C XCOPY j COPY b EDIT ` EDSUB l INV B IB 6 B W BZ P BP Q BN R BOFL S BNZ T BNP U BNN V BE P BG Q BL R BNE T BNG U BNL V BF P BT T BOK
0x08739c…087530 Dummy {f00=0x002b, f01=0x0190, f02=» $ CBNE ( CBNG * CBNL , CALL 0 RET 4 INSERT d INSRT d MATCH h DELETE f DLETE f EXIT 0 "PAUSE 0 "KI 0 <NKI 0 <RSTRT 0 .USE 0 2UNUSE 0 8ACTV 0 &EDWRT 0 HDSC0 0 NDSC1 0 TDSC2 0 XSTAT 0 hWAIT 0 nMWAIT 0 rSWITCH 0 "
0x087530…0876c4 Dummy {f00=0x002b, f01=0x0190, f02=»DOWN 0 "TDOWN 0 "TUP 0 "DUPL 0 GETABX 0 |SETCUR 0 "GETCTL 0 TSTCTL 0 GETFLD 0 DISPLAY0 ERASE 0 PRINT 0 DYKI 0 UPDFLD 0 EDFLD 0 ATTFMT 0 DETFMT 0 "RREAD 0 RWRITE 0 READ 0 WRITE 0 ,REWRITE0 TDISCARD0 pPOSIT 0 OPEN 0 CLOSE 0 nRSTAT
0x0876c4…087858 Dummy {f00=0x002b, f01=0x0190, f02=» O $ @ 5 h ! Q ! Q O " " Q :
0x087858…0879ec Dummy {f00=0x002b, f01=0x0190, f02=» QIDENT H EJECT SPACE LIST NLIST DDIV DDUM OPTNS / CON /hPERF /tPERFI / PLIST / END / FTABLE / INCLUDE / KTAB / FRMT / FMEL / FMELI / FCTL / FCOPY / FXCOPY 0 FTEXT 0 FLINK
0x0879ec…087b80 Dummy {f00=0x002b, f01=0x0190, f02=»FBNZ 0 FBNP 0 FBNN 0 FB 0 FBF 0 FBT 0 FSL 0 FNL 1 FKI 1 FINP 1 FEOR 1,FMEND 18ENTRY 1DEXT 1PEXPROC 1 EQU 1hPROC 1tPFRMT 1 PKTAB 1 PLIT 1 PBIN 1 PBCD 1 PSTRG 1 PFREE 1 PBOOL 1 PDSET 1 PEND
0x087b80…087d14 (0, 172) Dummy {f00=0x002b, f01=0x0190, f02=»XXXXXX * PAGE 0000 * DATA DIVISION PROCEDURE DIVISION PROCEDURE LABELS DATA ITEM NAME TABLE nLOC OC OPERANDS LINE LABEL OPCODE OPERANDS COMMENT C n IX
0x087d14…087ea8 Dummy {f00=0x002b, f01=0x0190, f02=»PE NAME REF TYPE NAME REF TYPE NAME REF TYPE IX TYPE VALUE PROGRAM LENGTH = ERROR = REL 10.0 800314 * ! @ Pn $ T < ! T` @ <aP @ Q % % (J - R * A uX6 @ U -J @ U
0x087ea8…08803c Dummy {f00=0x002b, f01=0x0190, f02=» @ 4W W 2 : 9l:D 0 :R = : Q2 T W. 6 !0 R" !: R !A R !F Q $ =D _2 :END PDIV DDUM IDENT FRMT FMEND PEND ***GENERATED STATEMENT*** @ 9 V^ ?C & , R P Q W
0x08803c…0881d0 Dummy {f00=0x002b, f01=0x0190, f02=»! T ! : W @ ! Q A < ! P @ Q A / @ Q -J : @ ! Y A " ! T -J : : @& ) A& A B : B @ Q % % A L A : @ P @ P A& B : < ! P # 6
0x0881d0…088364 Dummy {f00=0x002b, f01=0x0190, f02=» V @ N @ P : A -J % % ( T : ' _ A " @ J ~ Q f 4 R W ~ @ f 4 Y P _P L R < # P _ ! @ J %
0x088364…0884f8 Dummy {f00=0x002b, f01=0x0190, f02=»P _ W @! R ! ! A! ! : ! U : R _ $ : 0 4T Y ::a Y : @ U4 u @ Q 9AR W 9CV - W : T 9 : .
0x0884f8…08868c Dummy {f00=0x002b, f01=0x0190, f02=»! # A Z P 6 P R* - W( @ 8P" @ W ! P W T - W - $0P A ZWn P # P - @TT # A! L A L R T2 @ P A X _B # - W A! A! T Q W P - Z
0x08868c…088820 Dummy {f00=0x002b, f01=0x0190, f02=» ! T P U U W" ! P P U n P h @ A L R P F P ! P: 6 !+ P !- P P Q W % # T W @ 3 T <D P _ A L A L R 9 _
0x088820…0889b4 (0, 173) Dummy {f00=0x002b, f01=0x0190, f02=» P @ Y =h 9 W @ W T ! @ # P P, 6 !0 R !9 U !A R !F Q % W W P 3 T <D_B 9 A L R_R @ @ W ! T" *>H J V >d _ K >h + P4 ! 9 V - 9 V - 9 V - 9 V - A! !
0x0889b4…088b48 Dummy {f00=0x002b, f01=0x0190, f02=» E E E E E E $ : ! W ! D D D D D D $ : [ [ [ [ ; Z [ Z [ : [ [ : " Z " Z Z Z Z Z
0x088b48…088cdc Dummy {f00=0x002b, f01=0x0190, f02=» P _ >hX> : Z ] _$ _ _&MEMORY OVERFLOW SEQUENCE ERROR DIRECTIVE MISSING SYNTAX ERROR LENGTH TRUNCATION MULTIDEFINED UNDEFINED UNEXPECTED VALUE UNDEFINED TYPE UNEXPECTED TYPE ILLEGAL CONSTANT
0x088cdc…088e70 Dummy {f00=0x002b, f01=0x0190, f02=» BLOCKS TOO MANY DATA ITEMS BLOCK SIZE OVERFLOW TOO MANY DATASETS TOO MANY PARAMETERS TOO MANY START STMTSILLEGAL DIMENSION TOO MANY VALUES OUT OF RANGE UNSPECIFIED PARAM PARAMETER LIST OVFL NO START DEFINITION @ >aPH @-FP@ & ** '
0x088e70…089004 Dummy {f00=0x002b, f01=0x0190, f02=»& " @ U - A& < V M u & ' n & " : P W V W # C ( : @& % - A& < Rf @& @ V < < R0<
0x089004…089198 Dummy {f00=0x002b, f01=0x0190, f02=» n + , A& @& " @& ?d' & n 6 * n 2 , - n * n 2 , 0 , @& ' . " * 2 , 2 , A& '2 P (r P )< &j ,| R : ( ( ( ( P ( P
0x089198…08932c Dummy {f00=0x002b, f01=0x0190, f02=» )N )Z )f )f P ) P * *( *4 *4
0x08932c…0894c0 Dummy {f00=0x002b, f01=0x0190, f02=» * * * * +v
0x0894c0…089654 (0, 174) Dummy {f00=0x002b, f01=0x0190, f02=» R& R W T R = ( B T B P : : * + &j ,| - : + _$ * @, P ?a 9H + *
0x089654…0897e8 Dummy {f00=0x002b, f01=0x0190, f02=»= STATUS = ":H - " - 2 + & -v + ( 0 , ( @ P u -J : Z A J _ A J v _ A J _( A J _4 A J _@ A J N _L A J _X A J T _d A J z _p A J _| A J _ A J _ A J
0x0897e8…08997c Dummy {f00=0x002b, f01=0x0190, f02=» _ A J _( A J _4 A J * _@ A J _L A J _X A J _d A J _p A J $ _| A J _ A J _ A J _ A J * _ A J l _ A J _ A J _ A J 8 _ A J f _ A J _ Z A J _ A J _ A J _(
0x08997c…089b10 Dummy {f00=0x002b, f01=0x0190, f02=» _ A J _ A J _ A J _ A J _ A J _ A J * _ A J D _ Z A J P _ A J _ A J h _( A J t _4 A J 6 _@ A J _L A J _X A J _d A J _p A J _| A J _ A J _ A J d _ A J | _
0x089b10…089ca4 Dummy {f00=0x002b, f01=0x0190, f02=» A J _4 A J j _@
0x089ca4…089e38 Dummy {f00=0x002b, f01=0x0190, f02=»2 TRUE 2 T 2 FALSE 2 F 2 @ <V @ 7 Rr u @2 @ P 9D 3 9 ( T@ 2 =P P =T . -JW @ A3 @ ?A A A3 <, - : T:A000T:D000 *0 : CZ
0x089e38…089fcc Dummy {f00=0x002b, f01=0x0190, f02=» F ! P A2 8 A2 8 & 3 # >HQ >AR -J W -J P -J E @ A2 A2 A2 A2 9h A2 A2 2 . A L L R 2 A2 @ P ?D A2 : 2 @2 8 @ ~ !DD 5 #
0x089fcc…08a160 Dummy {f00=0x002b, f01=0x0190, f02=» Q A A R( 3 T -JWJ 2 PD -JW< 2 P T A3 3 W A3 3 2 ! 3 @2 P$ @d 7 @3 7 A2 : 3< # A2 2 >HV - W* # >HZ U - V -
0x08a160…08a2f4 (0, 175) Dummy {f00=0x002c, f01=0x0190, f02=» 2 0 ' 2 @ 4 A2 W A2 @ 7 7 u 8 & 8 8 & P @2 T -JW @2 2 3 E A @ @2 P A2 A 8 2 @ ! P^ u 7 @ 8Q> @3 u 7 D AA A^ A n
0x08a2f4…08a488 Dummy {f00=0x002c, f01=0x0190, f02=» 0 ' : W W W W W W -J : 9pFC= 9 BUFL= 9 DEV= 9 BUFDS= @ R P u R $@P 2 T W( @2 @ P 9jT W 9fT 2 @ u @2 :D @ Q :D & A2 A8" A8& A8( A86 A88 A
0x08a488…08a61c Dummy {f00=0x002c, f01=0x0190, f02=»-J_ W - _^ @86 Y A8#_x @88 ( 6 0 A8& @ A8"_ @8< D ZR$@XV @2 ]` A8(_ @8: h_ (9 099 (,9 ) 099 8) W W W ! @3 ? 8 W $ W " A V A9 2 @ P @3 <V @3 <R @ 7 R u
0x08a61c…08a7b0 Dummy {f00=0x002c, f01=0x0190, f02=»P # ! T _ ^ X A9 A9 < 9 RF @9 9 T U4 @9 $ T ^ P @9 P - @9 A9 < _> P @9 ! Q - W - @2 @ P 9D 3 9 9 ( @9 P @ ! PV @ @ V=L @9 9 @3 Y 9 R @
0x08a7b0…08a944 Dummy {f00=0x002c, f01=0x0190, f02=»W W -J : 6 Q R P =oT >BV U - W - : @ ! P* @ 8Q$ ": @ A< 0 D " : = INDS= = OUTDS= @= T A= !?A < A=$ A=& =
0x08a944…08aad8 Dummy {f00=0x002c, f01=0x0190, f02=» A< _l @=&T0 R"$@P @ P A< _ W W - _ >dADRMOD= > LITADR= @>*P -J A>* > # P $ & : @>(T A>( T T R X( Q A % A 2 A A A A A _R @ Qj T` TX RRXn TH
0x08aad8…08ac6c Dummy {f00=0x002c, f01=0x0190, f02=»V B A2 A n & : # 6 T = V - =A a : - :? @? ? P< # >HR$ U - ? A? A : - : -J : @@ T. # >HR( U - A@
0x08ac6c…08ae00 Dummy {f00=0x002c, f01=0x0190, f02=» D @ n G @3 G G @ n D @ @ S AA D A^ A n P 2 D _ D @ n A n D @ A A A 8 : E E A E E : :BTABT:ATAB : T:A000 @ ! P @A P : AA @3 ;B
0x08ae00…08af94 (0, 176) Dummy {f00=0x002c, f01=0x0190, f02=» % H E _D @ _( 2 AA 9h AA A A A A A D AA A^ P E _ E A n D P D _ D @ n D @ AA @ AA U AA AA C* @ AA @ AA S AA AA C* @ A : A D
0x08af94…08b128 Dummy {f00=0x002c, f01=0x0190, f02=» D A A P. D " D @A _4 D @ n D : * F @, T @ n- K K J =A?A R , T^ : R T, ' A nSd : R<W* T - W ' / =A>A?A ' A nS8 A nS2 R :AR K K A, :=A?A>A^ A, K K !
0x08b128…08b2bc Dummy {f00=0x002c, f01=0x0190, f02=», T <GQ @, TJ : @* P <E, # ! T = V A, :R , : @ ! G G D @ @ AE AA A^ P E _ E A n @E P " D _ @ AE E " D
0x08b2bc…08b450 Dummy {f00=0x002c, f01=0x0190, f02=»D AA A^ @@ P @ E ? ? P E _ E E A n " D @E @ 9 Q * D @@ T D D W D D @? D P D D _" D @ n D
0x08b450…08b5e4 Dummy {f00=0x002c, f01=0x0190, f02=», P =A>A^ A, C ! , :
0x08b5e4…08b778 Dummy {f00=0x002c, f01=0x0190, f02=» 2pLIST 2 # ! 2 2 8 ! TV T 2 P . - W @ A2 @ Q @ P % % @ A @2 A A N - A :
0x08b778…08b90c Dummy {f00=0x002c, f01=0x0190, f02=»
[…0x2…]
0x08bc34…08bdc8 Dummy {f00=0x002c, f01=0x0190, f02=» 9 9 G ? ? 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 9 IH> 9 <t9 9 9 9 9 9 9 9 ?:9 9 9 9 9 9 9 B E E I )> "R
0x08bdc8…08bf5c Dummy {f00=0x002c, f01=0x0190, f02=» H :H 9 2 + 9 + ( 0 , ( DOS SYSTEM ERROR ON ADDRESS = W j 2 V 9 , : 5 V 9D9k D9 :J: : ; W( W W W W W W W W W 2 W V # T , 0V U V j : V NO 9 @ X 8<h 8
0x08bf5c…08c0f0 Dummy {f00=0x002c, f01=0x0190, f02=» @ U 9 . : M - <X F G U W D V : F V # f = Z V ;d R W W W W ' C ; R WdW W W V SCP" OBP LMP UFP : K V K K K
0x08c0f0…08c284 Dummy {f00=0x002c, f01=0x0190, f02=» @ _ V Q # T : : V V , T W W W V : 0 Q Q X*Q R U < V_> = _D @ , H Q R W H T T = W H T I I Y2 X_ , P P , P P C U T P
0x08c284…08c418 Dummy {f00=0x002c, f01=0x0190, f02=» 4 T C = R _ _ _ _ B , @ T * ,9cP J Y _ :` @ T T P T R ?A?i _ U U U W : W V C >n R W _ _ _ T 4 & C > R WL_ _ _ B , ,9c J [
0x08c418…08c5ac Dummy {f00=0x002c, f01=0x0190, f02=» V * 4T _ R ; J S6 T J 9C # 2 Q ? R W _ _ _ V V : W _ W _ V P ;B L? 8 W < B # , P P| Q& P R 9AR Wl B V T C F # C P W W
0x08c5ac…08c740 Dummy {f00=0x002c, f01=0x0190, f02=»? R ? R B W B < B , PX PN P RT T MTP TCP TKT2 ( B :ER ( B P ( A6 R W W W W W B < U T U U _& W W W V C B , X PD P QL QN T 9 R29 RJ T C
0x08c740…08c8d4 (0, 178) Dummy {f00=0x002c, f01=0x0190, f02=»B WxWv_ T TY * < B' ( < _L W W V W V W < B B W$W(W V <_x B B W W _, T TPX>_8 W C _ V B , P P P R W , P* 09AR R C* P F F G W W W V : L
0x08c8d4…08ca68 Dummy {f00=0x002c, f01=0x0190, f02=» G G F G , P D D @ U F L ?L D P X C L =CR =AR DP=CRH DJWB D =CR: DVW4 Db=l P* DhW$ ' ' ( J G G G G G G G G G C L '
0x08ca68…08cbfc Dummy {f00=0x002c, f01=0x0190, f02=»W D B P8 R R H T H T H P < 6 D G G G G G G G G G G G C W Q Z P F G V : P G G "P P _ < # @ 2 P P _ : AF<
0x08cbfc…08cd90 Dummy {f00=0x002c, f01=0x0190, f02=» F R *P G. F R *T < , T W | < V 8 W F R WLW WHWFWD 1P 1P 0 ) ] V :IDENT IDENT* W _ W G G G T P G F T V _( P # Q V W
0x08cd90…08cf24 Dummy {f00=0x002c, f01=0x0190, f02=» V # H R W _ _ _ W G W 6 W V F T W V P v Pd P &Qp T P _ V < 4T" < 5 W W Pp U _R _H W V V Px_ V T V W V 4 W V W ]<_ V T8 V 4 W W V W
0x08cf24…08d0b8 Dummy {f00=0x002c, f01=0x0190, f02=»9AR W W @I : I AI B P @I B R _ : X _$ X _, 2 <_(I I I ; J W" ; JbW ; JjW Z " [ Z : ! @JZ Z 9c Z P L U _< :` % _H % _P XV _Z
0x08d0b8…08d24c Dummy {f00=0x002c, f01=0x0190, f02=» # VF @ 3$ $ 3$ R $@P T $ P $ P W @ Q @ T W @ P $ TB $ T <HRv # P @ n @ Q ;hP - D8 4 @ BPv <CVp Pj 2 @T 2 3PR U2 - W( $ P4 $ P B KW F R A
0x08d24c…08d3e0 Dummy {f00=0x002c, f01=0x0190, f02=» J6 F6 < 6 5 2 >. = FL FX 86 9h = ;V Fd J9 4 O 4 U 34"@ 5 4. O D O A @ ! " @ A
0x08d3e0…08d574 (0, 179) Dummy {f00=0x002d, f01=0x0190, f02=» 3 @3N @ P @3HP @ P W @ P 4 5 0 1 $@P WH $0T # - _ &<BV A T W &R <CV &<CV _ & T - @ Q @ A n @ BT W E @ BP A 3R A3N A A3J A3F A :5 NW, 6 NE, ! < !..T< 5 P . %
0x08d574…08d708 Dummy {f00=0x002d, f01=0x0190, f02=»W - _$:FMTITEM # : V @ : V $ < 6| T P _ W R> R4 "@PP P: @ BP A "!T( @ QV TN @ PHW R $ T W W - @ P " P W " P " P :JV A @ Q @ D8 Q $0
0x08d708…08d89c Dummy {f00=0x002d, f01=0x0190, f02=»NW, 8|SEQ, 8 DIR, 8 CUR, 8 IXSEQ, 8 IXDIR, T:WRITT:LWRIT: $ P $ P < !..T 7 . -J 5 $`X $ PR XW S W( D W C W X W I W X A82 A9 9 83W A9 9 82 ~ 80 @ Q
0x08d89c…08da30 Dummy {f00=0x002d, f01=0x0190, f02=» A 56 $ T B 56 = 56 ? T P Q 56 D8_ - 56 J A3H A9 # V~ $ P( R ;> !0P @ D8 T 56 @ ;> ;:$@T $ ;>_: @ BP A $ Tf ;> @ Qb $ TP @ T WH $ P @ P< @ DT @ BT(
0x08da30…08dbc4 Dummy {f00=0x002d, f01=0x0190, f02=» R $pTX @ D8 0 @9 T 56 R4$ P4_& <E 56 @ B 4 A3H @9 4 @ P 4 W W W W - 9 @ U &:HR @= 9B @ @ n @ ,$ T, L R - W - R Q @ @ Z. W Q L P M W F @ <" A
0x08dbc4…08dd58 Dummy {f00=0x002d, f01=0x0190, f02=» ^ P( @ BV R W @ V$ P ? A! ! @ T @ B P* @ D8 56 @ A @ BQ P$ A P @ $ D8 56 L A @ DT @ D8 @ 56 4 <U - < A! ! D8 @ D8 Y @3FP A B @ U8 @ A @ 3 - @! M . M
0x08dd58…08deec Dummy {f00=0x002d, f01=0x0190, f02=» A= A= 56 # R4$ P4 T* = @= D8 @= <d D8 56 W - = _8 ? @ BP " Tf P ?^ < R ?b @ U =cT ; R& P ; V P& T W % P 9AW T 4 R2 >, D8 >, P T W -
0x08deec…08e080 Dummy {f00=0x002d, f01=0x0190, f02=»W T < V A A D8 56 W - <H^ _* ! @ U> @ P W0 u @3P ) u @ " : >U - > @ BP , @ <R A < @ P BP : - _ A? @ A? A? # $0P T W # ! P < R*< R6 P R $ P W2
0x08e080…08e214 (0, 180) Dummy {f00=0x002d, f01=0x0190, f02=»- W W W &0T # ? :$$$TRA ! @ P> A @ U2 A4 @ B B A4 A4 ! : P0 R P"? R ? R T B _6 B : * @, T @ n K Q A n ' A, FR @, P K ,
0x08e214…08e3a8 Dummy {f00=0x002d, f01=0x0190, f02=» T $ @3R @3T C A ! : <a$ @3JP * $ P * @ < W @ n @ L ABN=N=b C @BN : ! @ n @ @3JP * C ! : @, T <GQ @, TJ : @* P <E, # ! T = V A, :R , : @ P @ P @* U
0x08e3a8…08e53c Dummy {f00=0x002d, f01=0x0190, f02=» A @ n @ BP @3L A A* : ! * ,| - ! " K K :H K ?a + P$ @ BP ! U 3V ! * &j : P @ BT A A @ Q : <C R @ Q: Dn R A A @ @ A L R # U : V ;h XF A A
0x08e53c…08e6d0 Dummy {f00=0x002d, f01=0x0190, f02=» A @D6P * Q U A A3N : @D6P @ Q"W @ B R A A3N : W " 5 1 A3N A A : A A* @ BTX @ n A P, R C" R A~ Y" C"W % % @ A A L : @3L A 3 P" 2 C" A3L Y
0x08e6d0…08e864 Dummy {f00=0x002d, f01=0x0190, f02=»H APPL= I DUPL= J NUM J$ALPHA J<MINL= JpMAXL= J REWRT J ME J NEOI J NCLR J CTAB K VERIF K*USATTR KBSCHK= AG4 8 F AG 44 4~ AG4 F AF AG
0x08e864…08e9f8 Dummy {f00=0x002d, f01=0x0190, f02=» @F P Q @G2 AG W @G2 AG @F P 9dT @ P 9A G, G @G( IG @G) IG @G* IG G W$ G @F P Q @G2 W W @G2 W W AG6 D8 @G6P _ A : 44 56 @F G AF A3D ? T2 A3D G2 :hP AF 9H @G4T AG G AG
0x08e9f8…08eb8c Dummy {f00=0x002d, f01=0x0190, f02=» # G F & G # <HZ X& @ R R "@TnW Rf$ Pb @ P G.W G- @F ! Xh& Xf # <HZp @ R R "@T$W R P @ P G0_ G._ W - _ @G G AG G @G G AG @ AG( G @G G AG ? T @V G( G
0x08eb8c…08ed20 Dummy {f00=0x002d, f01=0x0190, f02=» AG( G @G G AG @ AG* G @G G AG AG* G @G G AG AG* G @G G AG AG* G @G G AG ? ^ G* G 4XW 4X A3F W 4@ A3F A B A < !==T ?r M @3FP D8 M ?r A B 48
0x08ed20…08eeb4 (0, 181) Dummy {f00=0x002d, f01=0x0190, f02=»W 4D AKlW 4D AKlW 4F AKlW 4F AKlWz 4F AKlWn 4F AKlWb 4F AKlWV 4V AKlWH 4F AKlW< 4L AKlW0 4P AKlW$ 4P AKlW 4D AKlW 4D AKlW A B ?r D8 Kl 4~
0x08eeb4…08f048 Dummy {f00=0x002d, f01=0x0190, f02=»:FMTITEM ?r A B A D 40 4~ ? P P @? F # < V A < 6 Fp ( 1T P _ @ Wr @ R2 R($ 9 $@XD $ T @ QJ T< @ P<WJ R<$ 9 $ P0 Fx @T( Fx 3PR @ D8 56 W W W
0x08f048…08f1dc Dummy {f00=0x002d, f01=0x0190, f02=» : @ U T A3P A3L A B @ <Rb A < @ Q( u @ < ) : u @ < C A 3R A3N B : -J_ -JW T K K A3P A3L A B @ <ZF A < @ Q K _ K @ < C A
0x08f1dc…08f370 Dummy {f00=0x002d, f01=0x0190, f02=» )W4 u * @ < C W -J : -J_p # AH AH T - WD AH @ P: Rz $ P $ P - " @ ! P ** C @H @H ! r @ P ( C : @ " P @H AH H : @ P R $@P $ P $ P
0x08f370…08f504 Dummy {f00=0x002d, f01=0x0190, f02=» AJ u ? P P W - @ A L A L R A > Z> @ J @ <R8 A < @ Q @ < )W0 # >U -J > < # BPW W -J : ?D ?P ! @ < V& @K K AK K K
0x08f504…08f698 Dummy {f00=0x002d, f01=0x0190, f02=»:FMTITEM 4 4b 4 A3JW 4 A L 4b @ LP A L 4, A3J_2 -J : A @3JT ? P P @? F # < V A < @ R, R"$ 9 $@P @ Q T @ P W 6 Fp ( 1T P _ @ Wj R @P @ PT WN RX
0x08f698…08f82c Dummy {f00=0x002d, f01=0x0190, f02=» I| @ P B % % @ P @ U H W AH @ P 0 H @ u ! P -J @H P # >HRT U - @H T V @ Q4 H W: @H 9CV $ P W,$PP W W W W - W -J AH : @ R.P. T" AH
0x08f82c…08f9c0 Dummy {f00=0x002d, f01=0x0190, f02=» A P _ : T_@ ***WARNING***FOLLOWING FORMAL PARAMETERS ARE NOT TYPE DEFINED: 8 W4 4 W. 2 W( > W" 0 W 0 W 0AW 0DW 0`W 1@ @ P -JW AI
0x08f9c0…08fb54 (0, 182) Dummy {f00=0x002d, f01=0x0190, f02=» P* @ P: A H @ @ P P V Q _ & X : W W W W - $0 & K # _0 ! @ Pd P I I @ @ P H _" P( > I & % I & % ! : AZK ,K K K AZK 09K ..K @(K ,K K K
0x08fb54…08fce8 Dummy {f00=0x002d, f01=0x0190, f02=» V VR VH V> $@P # <HR&;D+ @ A & X : W - $0 K # _$ - _&
0x08fce8…08fe7c Dummy {f00=0x002d, f01=0x0190, f02=» - # & . ( @& Q , A& ' x & @ n & @-H & " ' - # & ' @-HPD 2 + + + " 2 + ( 0 , :TRA.ERR.BIN BCD STR BOL FTB FOR EQU EXT ADR KEY PRO FLB @ P d 3 D
0x08fe7c…090010 Dummy {f00=0x002d, f01=0x0190, f02=» ! P 9 R _ & W * 9AV MW 9AV U Q& nZ % _ P % :
0x090010…0901a4 Dummy {f00=0x002d, f01=0x0000, f02=»
[…0x3…]
0x090660…0907f4 (0, 183) Opaque[0x194]
0x0907f4…090988 # DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x0000, f01=0x0000, f02=0x05c0, f03=0x0000}
0x0907f4…090988 IdxSect {
0x0907f4…090988 f00 = 0x002e // 0x907f4 @0x0
0x0907f4…090988 f01 = 0x0040 // 0x907f6 @0x2
0x0907f4…090988 gno = [ // 0x907f8 @0x4
0x0907f4…090988 [0x00]: C0x002e.0x0.0
0x0907f4…090988 [0x01]: C0x002e.0x1.0
0x0907f4…090988 [0x02]: C0x002e.0x2.0
0x0907f4…090988 [0x03]: C0x002e.0x3.0
0x0907f4…090988 [0x04]: C0x002f.0x0.0
0x0907f4…090988 [0x05]: C0x002f.0x1.0
0x0907f4…090988 [0x06]: C0x002f.0x2.0
0x0907f4…090988 [0x07]: C0x002f.0x3.0
0x0907f4…090988 [0x08]: C0x0030.0x0.0
0x0907f4…090988 [0x09]: C0x0030.0x1.0
0x0907f4…090988 [0x0a]: C0x0030.0x2.0
0x0907f4…090988 [0x0b]: C0x0030.0x3.0
0x0907f4…090988 [0x0c]: C0x0031.0x0.0
0x0907f4…090988 [0x0d]: C0x0031.0x1.0
0x0907f4…090988 [0x0e]: C0x0031.0x2.0
0x0907f4…090988 [0x0f]: C0x0031.0x3.0
0x0907f4…090988 [0x10]: C0x0032.0x0.0
0x0907f4…090988 [0x11]: C0x0032.0x1.0
0x0907f4…090988 [0x12]: C0x0032.0x2.0
0x0907f4…090988 [0x13]: C0x0032.0x3.0
0x0907f4…090988 [0x14]: C0x0033.0x0.0
0x0907f4…090988 [0x15]: C0x0033.0x1.0
0x0907f4…090988 [0x16]: C0x0033.0x2.0
0x0907f4…090988 [0x17]: C0x0033.0x3.0
0x0907f4…090988 [0x18]: C0x0034.0x0.0
0x0907f4…090988 [0x19]: C0x0034.0x1.0
0x0907f4…090988 [0x1a]: C0x0034.0x2.0
0x0907f4…090988 [0x1b]: C0x0034.0x3.0
0x0907f4…090988 [0x1c]: C0x0035.0x0.0
0x0907f4…090988 [0x1d]: C0x0035.0x1.0
0x0907f4…090988 [0x1e]: C0x0035.0x2.0
0x0907f4…090988 [0x1f]: C0x0035.0x3.0
0x0907f4…090988 ]
0x0907f4…090988 }
0x090988…090b1c Dummy {f00=0x002e, f01=0x4144, f02=» > @ IDENT FMOVE T,REL=10.0,800314,870137141000 FMOVE F FMOVE V I:EVA0 h I:ERR2 z I:EVA5 , ( D #0 & + I:ER18 I:RT1 * & $ P _
0x090b1c…090cb0 Dummy {f00=0x002e, f01=0x40f8, f02=» > @ IDENT TYPET T,REL=10.0,800314,870137141000 TYPET F TYPET V I:EVA0 h I:ERR2 z I:RT1 , ( B #03 ;d # + @ @
0x090cb0…090e44 Dummy {f00=0x002e, f01=0x40fc, f02=» > @ IDENT ICLEAR T,REL=10.0,800314,870137141000 ICLEAR F ICLEAR X I:EVA0 l I:RT1 ~ , ( @ #0 0T ' ' _ T $ @
0x090e44…090fd8 Dummy {f00=0x002e, f01=0x411c, f02=» > @ IDENT EMPTYT T,REL=10.0,800314,870137141000 EMPTYT F EMPTYT X I:EVA0 l , ( @ #0 0T & ! T ~ I:RT1 , ( P & ! X T C T T !P
0x090fd8…09116c Dummy {f00=0x002e, f01=0x0190, f02=» > @ IDENT T:STIN T,REL=10.0,800314,870137141000 STRIN1 F STRIN1 X T:STEV l , ( @ X x & Y " X R W ~ T:RNOK T:LOFS , ( P _ Y $ I:E
0x09116c…091300 Dummy {f00=0x002e, f01=0x416a, f02=» ! P " P z I:ERR2 , ( s W " P X $ X " R W , , ( V R W V % _ I:MOV T:GRFC , ( $ " D $ D X T:ROK $ X y &
0x091300…091494 (0, 184) Dummy {f00=0x002e, f01=0x018e, f02=» > @ IDENT T:STOU T,REL=10.0,800314,870137141000 STROU1 F STROU1 X T:STEV l T:LOFS ~ * & @ X x & Y " I:EVA0 T:LOPS I:ER17 , (
0x091494…091628 Dummy {f00=0x002e, f01=0x4158, f02=» f , ( s ?A W ?AW <! P , ( X " X R W V y 8 T:DUPX h T:GRFC z , ( & Y $ 8 " X X T:ROK T:RNOK x ( y $ < 8 9
0x091628…0917bc Dummy {f00=0x002e, f01=0x414a, f02=» > @ IDENT T:STEV T,REL=10.0,800314,870137141000 T:STEV F T:STEV X T:GRFC l I:EVA0 ~ * & H #0T Y Y , ( ! T # P & #0T ( I:ERR2 7
0x0917bc…091950 Dummy {f00=0x002e, f01=0x0190, f02=» > @ IDENT T:EDFL T,REL=10.0,800314,870137141000 T:EDFL F T:EDFL X T:PM1 l T:PM2 | T:CASP , ( I Y ( x P Y * , ( x y W X " T:DUPX
0x091950…091ae4 Dummy {f00=0x002e, f01=0x0190, f02=» , ( w V X ( x C T:SCUW 4 , ( ( Y * X Y , X F , ( X C & C C v T:IOER , ( ( B P 9 R 9 X , ( !@P X X * b ) Y *
0x091ae4…091c78 Dummy {f00=0x002e, f01=0x0190, f02=» B U C Q C D T:CLR1 * T:CLR2 < , ( mP X X * $" ~_> @ Y N , ( X * _R X !@XX y X # ~ , ( x V y X X * P , ( P 1 _ 1 X * X
0x091c78…091e0c Dummy {f00=0x002e, f01=0x4148, f02=» X n T:CLIT T:EKEY , ( C $ " P y _ x T 2 , ( a@ X H X X * , )$ b P _ : H D !T P d )Wv 9 T UP m d yV& Ph R^ PP #P =T QU [Q e r g t 4 0 i k m
0x091e0c…091fa0 Dummy {f00=0x002e, f01=0x0190, f02=» > @ IDENT T:DYKI T,REL=10.0,800314,870137141000 J F " T:DYKI T:PM1 T:PM2 T:CLR1 T:CLIT T:CLR2 T:IOER T:EKEY T:BELL F T:DYKI I:EVA7 , ( @ ' Y y , ( x C y X
0x091fa0…092134 (0, 185) Dummy {f00=0x002e, f01=0x0190, f02=»:CLRD , ( C Q " T X , ( ! X X ! x Y~ Y > , ( _ X "@P B R y C B n , ( P 9 V _F9 V X ! T X !@ T:EKEY , ( X y C _d y C C X
0x092134…0922c8 Dummy {f00=0x002e, f01=0x0190, f02=» _$ _ y z T:CLR2 ^ T:SCUW . * & Y @_6 x X@ X X # @ , ( u C _. B ]d P C n , ( Q X8_H x XD @ Y c C y , ( XR X x x T:BELL
0x0922c8…09245c Dummy {f00=0x002e, f01=0x0190, f02=» T:LOFS I:EVA0 T:LOPS , , ( @H ( ( > T:CLMI n , ( #H : B C _J + T:PM1 @ T:GRFC , ( ? . X 9 V ! P @ Y I
0x09245c…0925f0 Dummy {f00=0x002e, f01=0x4124, f02=» j , ( " ( $ $ : ! P # P : : H D ! ! @ YTf a eR k B uT y Q T , P R P V f H D ! VV T P #Q( S P Q8 , 3 < MV SP P P
0x0925f0…092784 Dummy {f00=0x002e, f01=0x0190, f02=» > @ IDENT T:UPDF T,REL=10.0,800314,870137141000 T:UPDF F T:UPDF X T:GRFC l I:ER14 ~ , ( @ 2! Y " T:LOFS I:EVA0 T:LOPS , (
0x092784…092918 Dummy {f00=0x002e, f01=0x406a, f02=»R T:RCTS $ O X MT D ` T@ f T:GRFC l I:ER14 ~ , ( @ 2! Y " T:LOFS I:EVA0 T:LOPS , (
0x092918…092aac Dummy {f00=0x002e, f01=0x0190, f02=» > @ IDENT T:DUPL T,REL=10.0,800314,870137141000 T:DUPL T:DUPX F T:DUPL ` T:GRFC t I:EVA0 I:ERR2 T:RNOK , ( HB !0 X T:ROK T:DUPX
0x092aac…092c40 Dummy {f00=0x002e, f01=0x406c, f02=» I:MOV & " S V : KT WV > h V@ h ` T:GRFC t I:EVA0 I:ERR2 T:RNOK , ( HB !0 X T:ROK T:DUPX
0x092c40…092dd4 (0, 186) Dummy {f00=0x002e, f01=0x4186, f02=» > @ IDENT T:GETC T,REL=10.0,800314,870137141000 T:GETC F T:GETC X T:GRFC l I:ER14 ~ I:EVA0 , ( @ 2' I:ERR2 I:RT1 , ( " P # P
0x092dd4…092f68 Dummy {f00=0x002e, f01=0x415a, f02=» > @ IDENT T:GETA T,REL=10.0,800314,870137141000 T:GETA F T:GETA X T:GRFC l I:EVA0 ~ I:ERR2 , ( H ! P # P X T:RNOK T:ROK T:RCR ( $
0x092f68…0930fc Dummy {f00=0x002e, f01=0x413a, f02=» > @ IDENT T:TSTC T,REL=10.0,800314,870137141000 T:TSTC F T:TSTC X T:GRFC l , ( @ X " 9b! X :c 2" ~ I:ER14 T:RTES , ( H @ ;
0x0930fc…093290 Dummy {f00=0x002e, f01=0x0190, f02=» > @ IDENT T:TFWD T,REL=10.0,800314,870137141000 D @ T:TLEF T:TRIG T:TLDO T:TDOW T:TUP T:TFWD T:TBWD T:THOM F T:TLEF T:TRIG T:TLDO T:TDOW T:TUP T:TFWD T
0x093290…093424 Dummy {f00=0x002e, f01=0x411a, f02=» Y 4 Y n T:TABE , ( ? 2 Y 69h Q X :h Y 0 W T:SCR2 P T:TABC b T:TABN t * & ] U X Q W Y 0 w 8 4 W W W W W W !W IQ YW ]U eQ kW
0x093424…0935b8 Dummy {f00=0x002e, f01=0x0190, f02=» > @ IDENT T:DISP T,REL=10.0,800314,870137141000 T:PRIN T:DISP T:ERAS F T:PRIN h T:FDSP | T:EDWI T:GRFC T:GTIP , ( D 9H Y * T:DISP
0x0935b8…09374c Dummy {f00=0x002e, f01=0x0190, f02=» *9h p I:ER14 , ( S P R Y >_ P R P R " T:TABD R , ( q Y +W Y + W d , ( T R W Q W Y , ( + U Q Y T:TABC , (
0x09374c…0938e0 Dummy {f00=0x002e, f01=0x418c, f02=»Y , ( X 0 Y 8 P Y , ( # 0 X 0 X 2] X 8 Y 0 : X 0 : T:WRDY j , ( C :H* : X 2T Y 2 : | T:EDIO $ a @ C 1 B ] : H D ! 1 W !W 7T SP: WR aP cR i
0x0938e0…093a74 (0, 187) Dummy {f00=0x002f, f01=0x0190, f02=» > @ IDENT T:GETF T,REL=10.0,800314,870137141000 T:GETF T:GTIT T:GTIP F T:GETF h I:ER14 | , ( X +! X +! U 9K T:TABC T:TABN T:GTIT 0 T:GRFC , (
0x093a74…093c08 Dummy {f00=0x002f, f01=0x40c8, f02=» I:EVA2 I:ER15 , ( W 4 0 6 2 X 0 " I:ERR2 R & " u@ : ! P # T : d 0 U S z e z P T @ T:TABN T:GTIT 0 T:GRFC , (
0x093c08…093d9c Dummy {f00=0x002f, f01=0x0190, f02=» > @ IDENT T:REWR T,REL=10.0,800314,870137141000 . * T:REWR T:SCUW T:CLRD T:IOWR T:CASP F T:IOWR x T:SCUW , ( C ( C : T:CLRD * T:REWR 0 , ( ! C B
0x093d9c…093f30 Dummy {f00=0x002f, f01=0x4148, f02=» D : K + Q | I:EVA3 ! I:EPIC ! . , ( } 2 P P ! @ T:LOPS ! p , ( ( B X # V : ! I:EVA0 ! I:ECPY ! I:EVI ! ( $ $ _0
0x093f30…0940c4 Dummy {f00=0x002f, f01=0x0190, f02=» > @ IDENT T:DEDT T,REL=10.0,800314,870137141000 " . * T:TABC T:TABD T:TABE T:TABN T:SCR2 " F I:EVNO " x I:ESKI " I:EVA0 " I:EBRI " I:EBRB " I:EBR " , (
0x0940c4…094258 Dummy {f00=0x002f, f01=0x0190, f02=» " z T:DSL # I:EXPY # * T:TABC ( # < T:TABD , # P T:TABE 0 # d , ( ! W W X 0Q # x T:EDWI # I:EVT # , ( 9 Y ( Y *P # I:EDSK #
0x094258…0943ec Dummy {f00=0x002f, f01=0x0190, f02=» V _` " P T " P & # T:LOPS $ 0 , ( (W " P Y 0] Y $ B , ( (_z P P T " X _@ $ r T:EDWF $ , ( " P * X *# P B 1 $ I:ER16 $ , ( " *W
0x0943ec…094580 Dummy {f00=0x002f, f01=0x4130, f02=» . C $ | , ( a W @ X (T W X y 6 Y ( % T:TABN % L T:RCR % ` : X (;n 0 % p H D ! +W /W 7Q ; . ? , KP Q P PR V PL T Ph Wp P P % < 8 P T0 P" P W P 9P ?P ET OP c
0x094580…094714 (0, 188) Dummy {f00=0x002f, f01=0x0190, f02=» > @ IDENT T:ENLI T,REL=10.0,800314,870137141000 & T:DNL T:DSL & F I:EVNO & I:ECPY & n I:EPIC & I:ETXT & I:ETAB & I:EBRI & I:EBRB & I:EBR & * &
0x094714…0948a8 Dummy {f00=0x002f, f01=0x0190, f02=» & I:ESKI ' . I:EXPY ' @ T:DSL ( ' R T:GRFC ' d T:DNL 6 ' v , ( ! " $ Y . Y ,W ' , ( 9 $ Y . X ( X ." P X 0R T ' T:WRDY ' , ( W Y *P
0x0948a8…094a3c Dummy {f00=0x002f, f01=0x4182, f02=» Q Y *T , : " P X 0U ' , ( X *# P P T " T : ( , I:ER16 ( T:ENIN ( n , ( " . Y . 0 Y ( ( , ( $ Y *T " T ! 1 W ( ! ) , : ( H D ! 6
0x094a3c…094bd0 Dummy {f00=0x002f, f01=0x0190, f02=» > @ IDENT T:EINP T,REL=10.0,800314,870137141000 ) " T:PKI T:PINP T:TKI T:TINP ) F T:PKI ) l T:PINP ) ~ T:GRFC ) I:ETAB ) I:EVIN ) , ( I P & ) , ( Y *T
0x094bd0…094d64 Dummy {f00=0x002f, f01=0x0190, f02=» & V D ! P $ ) | T:TINP * T:TKI * 0 , ( u ! P %_ : V * B , ( Y " X .9H $ P * r , ( & X ( " Q Y +Q R " P W * I:ER16 * , ( " U Y , " Q "
0x094d64…094ef8 Dummy {f00=0x002f, f01=0x0190, f02=» P * t , ( I W X ! X $" P Q X (# P X + , ( i # :! R W T @ Y ( + D T:ENIN + t T:ENI + I:EXIT + , ( W Y , W Y ( + , ( : X *:h X (! # P X & V + , (
0x094ef8…09508c Dummy {f00=0x002f, f01=0x0190, f02=» + h , ( # P Y (_ P P Y , T:WRDY , 8 , ( C 8 & X 8 X $ W _ , J , ( a " P X ( T X & V H "@T , z , ( P V Y X (P , T:CLMI , , ( X (
0x09508c…095220 Dummy {f00=0x002f, f01=0x0190, f02=» 8 V Y 8 : " P X & V , , ( ( P : : "0P - , , ( 7 $ T W %T : : Y - , ( W ( X $ Y X " Y X & Y X < Y - , ( w @ : Y : X : X ( - , ( T X & V H " V
0x095220…0953b4 (0, 189) Dummy {f00=0x002f, f01=0x4146, f02=» P - P H D ! W U Q R P" P PD W #Pt )Pn /P 5P A EP< I R . H D ! KWZ [P< ]Q eP2 sR$ uW y R } T$ W W P Tb W P@ . X H D !$ T, T R #P 3P* ; * ?P| [Wh cP mT }TF * P6 P z P . < 8 P V T P
0x0953b4…095548 Dummy {f00=0x002f, f01=0x0190, f02=» > @ IDENT T:ENIN T,REL=10.0,800314,870137141000 / T:ENIN T:ENI T:EVOU / F T:ENIN / f T:ENI / z , ( X Y " X Y $ X Y & X @W X / T:LOFS / , ( ! < Y = " / I:EGTB
0x095548…0956dc Dummy {f00=0x002f, f01=0x0190, f02=» X (P / n T:WRDY 0 , ( W X & V D ! P @ W X 0 , ( W Y ( : X , Y X $ Y 0 P , ( X &T Y Y Y W V $ 0 , ( :H D Y D :H Y ! P V 0 I:EVA0 0 I:EVA1 0 , (
0x0956dc…095870 Dummy {f00=0x002f, f01=0x411a, f02=» 0 , ( Q : 2' " P T 1 I:EVA3 1 8 I:EPIC 1 J , ( mD W : N : 1 H D ! W CT IW SP a mT" }T W4 W, P W" P W W T WD 1 ( $ P W )P /W A X aP gT qW 1
0x095870…095a04 Dummy {f00=0x002f, f01=0x4144, f02=» > @ IDENT T:SETC T,REL=10.0,800314,870137141000 2 T:SETC T:SCUR 2 F T:SETC 2 ` T:GRFC 2 t T:EDWI 2 T:RCTS 2 T:SCUR 2 , ( A C 2 T:WRDY 2
0x095a04…095b98 Dummy {f00=0x002f, f01=0x40e2, f02=» > @ IDENT T:CLMI T,REL=10.0,800314,870137141000 3 T:CLMI 3 F T:CLMI 3 X , ( "0P ' Q W ' 3 l ! Y : 3 P Q W 3 ( 3 @ 3 A2,0 PCLRM20 EQU * P SCR
0x095b98…095d2c Dummy {f00=0x002f, f01=0x0190, f02=» > @ IDENT T:ATTF T,REL=10.0,800314,870137141000 4 J F " T:ATTF T:DETF T:ROK T:RNOK T:RCR T:RCTS T:RTES T:GRFC T:WRDY 4 F T:CLDY 4 T:DETF 4 T:ATTF 4 I:EVA6 4 I:FFSN 4 , ( W
0x095d2c…095ec0 Dummy {f00=0x002f, f01=0x4100, f02=» < V E B 4 ~ T:RNOK < 5 T:GRFC @ 5 2 T:WRDY H 5 F T:EDIO 5 Z * & ; X _ v : C C 5 l T:CLDY 5 $ Y @ : C : 5 @ W @ 5 l 5 @ 5 W
0x095ec0…096054 (0, 190) Dummy {f00=0x002f, f01=0x0190, f02=» > @ IDENT T:LSEG T,REL=10.0,800314,870137141000 6 & " T:LOFS T:LOPS T:LSEG T:CSEG 6 F T:LSEG 6 p T:CSEG 6 , ( ( R : V E V D ' 6 I:ER1C 6 , ( ! $ W P 6
0x096054…0961e8 Dummy {f00=0x002f, f01=0x402c, f02=»R ;P OW YP 6 d 7 @ 7 (00314,870137141000 6 & " T:LOFS T:LOPS T:LSEG T:CSEG 6 F T:LSEG 6 p T:CSEG 6 , ( ( R : V E V D ' 6 I:ER1C 6 , ( ! $ W P 6
0x0961e8…09637c Dummy {f00=0x002f, f01=0x4146, f02=» > @ IDENT T:DC00 T,REL=10.0,800314,870137141000 8 DCREAD DCWRTE DCEXCH 8 F T:FDS0 8 h DCREAD 8 z T:DCR1 8 DCWRTE 8 T:DCW1 8 DCEXCH 8 T:DCE1 8 , ( I$
0x09637c…096510 Dummy {f00=0x002f, f01=0x40aa, f02=» > @ IDENT T:SWI0 T,REL=10.0,800314,870137141000 9 SWITCH 9 F T:SWIT 9 X SWITCH 9 j @ 9 ~ 9 @ 9 ~ . P* CREDIT ASSEMBLER SUBROUTINE ENTRIES * . P*
0x096510…0966a4 Dummy {f00=0x002f, f01=0x40da, f02=» > @ IDENT T:TEI0 T,REL=10.0,800314,870137141000 : TESTIO ABORT : F T:TEST : ^ TESTIO : p T:ABOR : ABORT : H : : @ : . P*
0x0966a4…096838 Dummy {f00=0x002f, f01=0x40de, f02=» > @ IDENT T:CLO0 T,REL=10.0,800314,870137141000 ; SETTIM GETTIM ; F T:SETT ; ` SETTIM ; r T:GETT ; GETTIM ; H ; ; @ ; . P*
0x096838…0969cc Dummy {f00=0x002f, f01=0x40a6, f02=» > @ IDENT T:DEL0 T,REL=10.0,800314,870137141000 < DELAY < F T:DELA < V DELAY < h @ < z < @ < * ~ . P* CREDIT ASSEMBLER SUBROUTINE ENTRIES * . P*
0x0969cc…096b60 Dummy {f00=0x002f, f01=0x40aa, f02=» > @ IDENT T:GTI0 T,REL=10.0,800314,870137141000 = GETTID = F T:GETI = X GETTID = j @ = ~ = @ = ~ . P* CREDIT ASSEMBLER SUBROUTINE ENTRIES * . P*
0x096b60…096cf4 (0, 191) Dummy {f00=0x0030, f01=0x0190, f02=» > @ IDENT T:DC T,REL=10.0,800314,870137141000 > 6 2 T:DCRE T:DCR1 T:DCWR T:DCW1 T:DCEX T:DCE1 > F T:DCRE > T:FDSP > T:DCR1 > T:DCWR > T:DCW1 > T:EDIO > , ( @@ /
0x096cf4…096e88 Dummy {f00=0x0030, f01=0x416e, f02=» 6 > * & 5 / "!@P ? I:EVA0 ? 8 , ( O ' / #0T ? J , ( i C #0T C ? z , ( #0 T ' P &R &P C ? * & #0 T & C : W ?
0x096e88…09701c Dummy {f00=0x0030, f01=0x40b6, f02=» > @ IDENT T:SWI T,REL=10.0,800314,870137141000 @ T:SWIT @ F T:SWIT @ X I:RT1 @ l ( @ | @ @ @ E LEVEL P* PT:SWIT EQU * P LDK A7,0 " P SU PP,CSB,TCA GET
0x09701c…0971b0 Dummy {f00=0x0030, f01=0x4174, f02=» > @ IDENT T:TEI T,REL=10.0,800314,870137141000 A T:TEST T:ABOR A F T:TEST A ` T:FDSP A t I:RT1 A T:ABOR A * & @ "R V I A T:KIAA A , ( ( T
0x0971b0…097344 Dummy {f00=0x0030, f01=0x410e, f02=» > @ IDENT T:DEL T,REL=10.0,800314,870137141000 C T:DELA C F T:DELA C X I:EVA0 C l I:ERR C ~ , ( @ #0 P ( C I:RT1 C C P C $ C @
0x097344…0974d8 Dummy {f00=0x0030, f01=0x4124, f02=» > @ IDENT T:MSK0 T,REL=10.0,800314,870137141000 D MASK D F MASK D V I:EVA0 D h , ( @ #0 T #0 T V D z I:RT1 D D I:ERR D # D T T D
0x0974d8…09766c Dummy {f00=0x0030, f01=0x0190, f02=» > @ IDENT T:SCD T,REL=10.0,800314,870137141000 E T:ACTV T:PAUS T:RSTR E F T:ACTV E h , ( 2 ;BP P J E | P:BAS E I:ERR4 E , ( ! T ( E I:NTPB
0x09766c…097800 Dummy {f00=0x0030, f01=0x4092, f02=» W & F : ( E I:RT1 F * w F : $ P P4 %T 1 ^ EW4 O ^ ]W F T ~ F |@ F
0x097800…097994 (0, 192) Dummy {f00=0x0030, f01=0x018e, f02=» > @ IDENT T:USE T,REL=10.0,800314,870137141000 G T:USE T:UERR G F T:USE G ^ I:ERR4 G p , ( 2 & >A >A 2 G I:EVA0 G , ( $ & V D 9a 9 G P:MTAB G , (
0x097994…097b28 Dummy {f00=0x0030, f01=0x0190, f02=» G f , ( @ 9 X ( H , ( 9 8 ? X Q , V H 8 , ( ( - 4T H h , ( V 5 ( W V H , ( P W U V X 9T H T:UERR B H
0x097b28…097cbc Dummy {f00=0x0030, f01=0x4010, f02=» H H @ I @ 9 X ( H , ( 9 8 ? X Q , V H 8 , ( ( - 4T H h , ( V 5 ( W V H , ( P W U V X 9T H T:UERR B H
0x097cbc…097e50 Dummy {f00=0x0030, f01=0x0190, f02=» > @ IDENT T:UNUS T,REL=10.0,800314,870137141000 J T:UNUS J F T:UNUS J X I:ERR4 J l , ( 2 ' >A >A 2 J ~ P:MTAB J , ( $ V L ;a ; R @ ( 8 J , ( = ? X
0x097e50…097fe4 Dummy {f00=0x0030, f01=0x402a, f02=» 5R@ OQ* J K @ K &,800314,870137141000 J T:UNUS J F T:UNUS J X I:ERR4 J l , ( 2 ' >A >A 2 J ~ P:MTAB J , ( $ V L ;a ; R @ ( 8 J , ( = ? X
0x097fe4…098178 Dummy {f00=0x0030, f01=0x4096, f02=» > @ IDENT T:EXIT T,REL=10.0,800314,870137141000 L T:EXIT L F T:EXIT L X ( L l L @ L KM P DATA 3 P* P END @ LDKL A6,-1 P ABL T:UERR END @ P ADR
0x098178…09830c Dummy {f00=0x0030, f01=0x4138, f02=» > @ IDENT T:GTCW T,REL=10.0,800314,870137141000 M GETCW M F T:FDSP M V GETCW M h I:EVA0 M z T:BINB M , ( H "$ P B B M T:GTCW M I:RT1 M $ W M
0x09830c…0984a0 Dummy {f00=0x0030, f01=0x4128, f02=» > @ IDENT T:GTID T,REL=10.0,800314,870137141000 N T:GETI N F T:GETI N X I:EVA0 N l , ( @ #0T R W T V G 9h N ~ I:RT1 N I:ERR N ' W N T R W T '
0x0984a0…098634 (0, 193) Dummy {f00=0x0030, f01=0x018e, f02=» > @ IDENT T:DM T,REL=10.0,800314,870137141000 O & " T:OPEN T:CLOS T:COMM T:RSTA O F T:OPEN O p T:FDSP O , ( @ # 9 2! P T O T:WRIO O T:IO2 O T:CLOS . O , (
0x098634…0987c8 Dummy {f00=0x0030, f01=0x4090, f02=» T:RSTA X P T:SCW2 P T:IO3 P * ( $ W C P : P T P f j P z@ P , ( @ # 9 2! P T O T:WRIO O T:IO2 O T:CLOS . O , (
0x0987c8…09895c Dummy {f00=0x0030, f01=0x018c, f02=» > @ IDENT T:DMR T,REL=10.0,800314,870137141000 Q & " T:DREA T:IREA T:XREA T:IXID Q F T:DREA Q p T:REAX Q T:SCW2 Q T:IO3 Q T:IREA Q T:IO2 Q , ( $ Q
0x09895c…098af0 Dummy {f00=0x0030, f01=0x4008, f02=»@ R IDENT T:DMR T,REL=10.0,800314,870137141000 Q & " T:DREA T:IREA T:XREA T:IXID Q F T:DREA Q p T:REAX Q T:SCW2 Q T:IO3 Q T:IREA Q T:IO2 Q , ( $ Q
0x098af0…098c84 Dummy {f00=0x0030, f01=0x0190, f02=» > @ IDENT T:DMW T,REL=10.0,800314,870137141000 S 6 2 T:SWRI T:DWRI T:IWRI T:DREW T:CREW T:IREW S F T:SWRI S T:WRIX S T:IO4 S T:DWRI S T:SCW2 S , ( / / S
0x098c84…098e18 Dummy {f00=0x0030, f01=0x40fc, f02=» 5D / C S , ( O ( B B @ C T , , ( o ( ( B B T , ( C C ( C T T:IO5 T C T T @ T / S
0x098e18…098fac Dummy {f00=0x0030, f01=0x4182, f02=» > @ IDENT T:DMDI T,REL=10.0,800314,870137141000 U T:DDIS T:CDIS T:IDIS U F T:DDIS U h T:FDSP U | T:SCW2 U T:IO3 U T:CDIS U , ( $ C <H / U T:IDIS $ U
0x098fac…099140 Dummy {f00=0x0030, f01=0x4168, f02=» > @ IDENT T:DMPO T,REL=10.0,800314,870137141000 V T:DPOS T:IPOS V F T:DPOS V ` T:FDSP V t T:SCW2 V T:GTBY V T:IO4 V , ( H@ C <H / V T:IPOS V T:WRIX
0x099140…0992d4 (0, 194) Dummy {f00=0x0030, f01=0x0190, f02=» > @ IDENT T:IO T,REL=10.0,800314,870137141000 W J F " T:WRIT T:READ T:SREA T:KI T:NKI T:EDWR T:DSC0 T:DSC1 T:DSC2 W F H D ! T:EDWE T:EDWF T:EDWI T:EDIO T:XSTA T:WAIT T:IO1 T:IO2 T:IO3 W J F " T:IO4 T:IO5 T:FDS0 T:FDSP T:GDSP T
0x0992d4…099468 Dummy {f00=0x0030, f01=0x0190, f02=»:WRIT W T:LWRI X , ( W / X $ T:WRIX " X T T:WRIO & X h I:EVA0 X | , ( ! _ P <H X T:SREA B X T:READ B X T:REAX J X , ( ? :
0x099468…0995fc Dummy {f00=0x0030, f01=0x0190, f02=» , ( { C C W C C J Y , ( ' W 781"&$ 39#$;< '()*+,-! Y 4 T:DSC2 Y d , ( P Y x T:XSTA Y T:WAIT Y , ( _D B 'W ( Y T:MWA
0x0995fc…099790 Dummy {f00=0x0030, f01=0x0190, f02=» Y T:IO3 D Z T:IO4 H Z I:ER19 Z , , ( 5 1W C C C " Z > T:IO5 Z Z n T:IORE ^ Z T:GCW2 Z * & S ( ' P P "! P Z T:GTCW Z I:RT1 Z , ( q W B
0x099790…099924 Dummy {f00=0x0030, f01=0x0190, f02=» Z j T:EDWR [ I:EDW [ , ( 5 P C : [ . T:EDWE [ ^ T:EDWF [ r , ( C C B B P C [ T:EDWI [ I:ERR [ , ( : "!@T V I C [
0x099924…099ab8 Dummy {f00=0x0030, f01=0x018e, f02=» Y [ t I:ERR5 , ( e C & & , ( B C "!@ V , ( : B T T T:FDS0 T:FDSP T:GDSP P:MTAB , (
0x099ab8…099c4c Dummy {f00=0x0030, f01=0x0190, f02=» , ( @ V H ;D:B " ] , ( : _, C ] 8 T:GTBY 2 ] h T:SCW2 ] | , ( P / : : 2 "! P ] T:DSCX R ] I:EVA2 ] , ( O : P C W
0x099c4c…099de0 Dummy {f00=0x0030, f01=0x415e, f02=» ] h H D ! Y W L D " H % ) - " 1P G J IW M Q " ]P cV { ^ H D ! V 2 W > W > " P W Wb 2 ;W" ^ T H D !B ]P. a gP$ mP sW }P P P& P P P P ^ H D ! 0 T ?P C O S "
0x099de0…099f74 (0, 195) Dummy {f00=0x0031, f01=0x0190, f02=» > @ IDENT T:CW T,REL=10.0,800314,870137141000 _ F B T:GCW2 T:GTCW T:SCW2 T:STCW T:SCW0 T:BCDB T:BINB T:KIAA _ F T:KIAC _ T:STCW _ I:EVA2 _ T:SCW0 _ , ( @ #0 T & C C : C _
0x099f74…09a108 Dummy {f00=0x0031, f01=0x0190, f02=» X R _ V _ T:GTCW ` I:ERR2 ` 4 , ( 4 _P :#0 T B 'W B ` F T:BINB ` v , ( B " : ` , ( P P L R ` , ( R _ R _
0x09a108…09a29c Dummy {f00=0x0031, f01=0x0190, f02=» T U :J ` z , ( ] a B@ ' d w5 1 a T:KIAA a J T:KIAC a ^ T:GCW2 a r , ( } #0 T a T:SCW2 a , ( B ' : B B : a , (
0x09a29c…09a430 Dummy {f00=0x0031, f01=0x4062, f02=» PR a T 8 4 Z R R Q !P )P 9P IR T P T b b L@ b ^:KIAC a ^ T:GCW2 a r , ( } #0 T a T:SCW2 a , ( B ' : B B : a , (
0x09a430…09a5c4 Dummy {f00=0x0031, f01=0x0190, f02=» > @ IDENT T:ADIT T,REL=10.0,800314,870137141000 c & " T:RREA T:RRE1 T:RWRI T:RWR1 c F T:RREA c p T:FDSP c T:RRE1 c I:EVA0 c , ( A #0 T &R c T:STCW c I:ERR c
0x09a5c4…09a758 Dummy {f00=0x0031, f01=0x40ac, f02=» / "!@P c v T:IO1 d , ( S #0T C : d & m W d V X TX RX A X _T oW d r v d @ d I:EVA0 c , ( A #0 T &R c T:STCW c I:ERR c
0x09a758…09a8ec Dummy {f00=0x0031, f01=0x0190, f02=» > @ IDENT T:KIA T,REL=10.0,800314,870137141000 e T:KIA T:NKIA e F T:KIA e ^ T:NKIA e p T:ABUF e , ( W P 6 V :a L e T:KIPR e , ( Q ' ( ( e
0x09a8ec…09aa80 Dummy {f00=0x0031, f01=0x0190, f02=» 6 K e , ( u V K V V K V K f , ( V 6V ( - _ : J 7 f P , ( J V W J :A f * & V 6V $ - _ * + : f , ( D T E D :A D ;A f
0x09aa80…09ac14 (0, 196) Dummy {f00=0x0031, f01=0x410a, f02=» I @P _ W *) + : f , ( g $: R P $ : D V D g 0 ( $ V ( < C C _, g ` H D !L W PZ !QJ % p 7 < ST WP c V V T> Q U 3 d AP g IP QW mR oP g g @ g
0x09ac14…09ada8 Dummy {f00=0x0031, f01=0x4098, f02=» > @ IDENT T:ABUF T,REL=10.0,800314,870137141000 h T:ABUF h F M h X T:ABUF h n h @ h IN T:ABUF f & !T:ABUF RES SIZE KIA/NKIA SAVEAREA P EJECT T:ABUF END @
0x09ada8…09af3c Dummy {f00=0x0031, f01=0x018e, f02=» > @ IDENT WRITEL T,REL=10.0,800314,870137141000 i WRITEL i F WRITEL i X T:FDS0 i l I:EVA0 i ~ , ( D / #0T C i , ( #0 T &R &P C i T:IO2 i , ( 9
0x09af3c…09b0d0 Dummy {f00=0x0031, f01=0x400c, f02=» i @ j IDENT WRITEL T,REL=10.0,800314,870137141000 i WRITEL i F WRITEL i X T:FDS0 i l I:EVA0 i ~ , ( D / #0T C i , ( #0 T &R &P C i T:IO2 i , ( 9
0x09b0d0…09b264 Dummy {f00=0x0031, f01=0x0190, f02=» > @ IDENT I:NTP T,REL=10.0,800314,870137141000 k B > I:TRC I:NTP I:NTPA I:NTPB I:NTPR I:RST I:RT0 I:RT1 I:RT2 k F I:MOV k I:ADD k I:SUB k I:CMP k I:MUL k * & T k
0x09b264…09b3f8 Dummy {f00=0x0031, f01=0x0190, f02=» k I:XCP l I:EDS l , ( / l ( A l X I:TRC N l v I:RST P l T:CSEG l I:NTPA T l I:NTPB X l P:MTAB l , ( O W V 7 @
0x09b3f8…09b58c Dummy {f00=0x0031, f01=0x0190, f02=» I:CHK l , ( B " $ m I:EVA0 m > I:EVA2 m P , ( pV 9c D & ( m b I:RT2 m , ( Q W :aW @ NYR m I:TRA m I:RT1 m I:TRB m
0x09b58c…09b720 Dummy {f00=0x0031, f01=0x0190, f02=» V m j T:BAT n , ( W _ 2 # ;B V T n , ( 7 2W V P L , V 2 n J , ( U P " 2 P V D ! R T V n z , ( u P V W V P _ 8 n T:PAT n , ( ^t D . 2 ! 9BP V
0x09b720…09b8b4 (0, 197) Dummy {f00=0x0031, f01=0x0190, f02=» 7_ 2 # P L 6P n , ( @ & 2" &] Y $! o * , ( @ + 6P Q $ T 9BP . _ _ o Z , ( K W 6 @ & " T 7 $ o , ( i V P W _ o I:EVB o , ( P
0x09b8b4…09ba48 Dummy {f00=0x0031, f01=0x40f4, f02=» o N H D ! = ? A C E G I K M kP uP VP Q W p H D ! W, P P W< - L 3T 9W UP [P kR oT uP P P T W p V 8 4 T PH PB -P /Q 3T 7P KW ]T oP W W p U p @ p , ( P
0x09ba48…09bbdc Dummy {f00=0x0031, f01=0x018e, f02=» > @ IDENT I:EVA T,REL=10.0,800821,870137141000 J F " I:EVA0 I:EVA1 I:EVA2 I:EVA3 I:EVA5 I:EVA6 I:EVA7 I:EVB I:EVI F I:FML I:EVTO P:MTAB , ( :l:d:h I:EVA2 I:E
0x09bbdc…09bd70 Dummy {f00=0x0031, f01=0x0190, f02=» f , ( 9 # W @ $ E " T ; [ , ( W # :H 2 T Z L 8 , ( @ w L D V W # h , ( L E V $ W D V I:EVA0 , ( @ L , W 6 2 W "
0x09bd70…09bf04 Dummy {f00=0x0031, f01=0x0190, f02=» Z Z , ( 3 : R ; 0 I:ERR9 ` , ( S 6 : F _v r , ( s :B , (V ; H [ [ , ( [ Z (;AR H W I:E
0x09bf04…09c098 Dummy {f00=0x0031, f01=0x0190, f02=» & Z t , ( 4 : Z , ( ' 4 " 2@P : [ D , ( G [ & @ $ ! P t , ( e Z [ 6 [ Z I:FML , ( 7 . Z 7
0x09c098…09c22c Dummy {f00=0x0031, f01=0x4182, f02=» :;h : ; V I:EVI * I:EVB < , ( Y : 2! : 6 2 N , ( @ W " # ;b ~ " ? ; : ;f" #?_" H D ! #W 'W -P 1W = ?W4 KT> [ kT V, W
0x09c22c…09c3c0 Dummy {f00=0x0031, f01=0x018e, f02=» > @ IDENT I:ADS T,REL=10.0,800314,870137141000 v I:ADD I:SUB v F I:ADD v I:SUB v n I:ERR2 v I:ERR1 v * & @ W # v , ( " T & T + : * v I:C
0x09c3c0…09c554 (0, 198) Dummy {f00=0x0031, f01=0x0190, f02=» , ( ! X # P 4 V W w , ( Q P [ " X $ P T w 4 , ( R R ` ; <( w d , ( Q P # W " <! =# T W = Z w , ( P _ V ^< `_@ w , ( ) R Q <# =_
0x09c554…09c6e8 Dummy {f00=0x0031, f01=0x4056, f02=» W T6 W P )R +Q 7P w h AP GU KP QT x $ l x @@ x R T w 4 , ( R R ` ; <( w d , ( Q P # W " <! =# T W = Z w , ( P _ V ^< `_@ w , ( ) R Q <# =_
0x09c6e8…09c87c Dummy {f00=0x0031, f01=0x4184, f02=» > @ IDENT I:CMP T,REL=10.0,800314,870137141000 y I:CMP y F I:CMP y V I:ERR1 y h , ( #0 P " T * & y z , ( : * & !`P :J +_ +Q y I:CPA y , ( ? _0
0x09c87c…09ca10 Dummy {f00=0x0031, f01=0x4172, f02=» > @ IDENT I:CPA T,REL=10.0,800314,870137141000 z I:CPA z F I:CPA z V * & R W z h , ( ( V W Q P W ! W V z , ( ? P , V W Q P W $ W V z * & _ P
0x09ca10…09cba4 Dummy {f00=0x0031, f01=0x0190, f02=» > @ IDENT I:MOV T,REL=10.0,800314,870137141000 { I:MOV I:MVC { F I:MOV { I:MVC { n , ( $0#0;b P P P P { , ( ! 0 - P _ 4 V { , ( A W Q P ) P 9_ &" ! 9 :
0x09cba4…09cd38 Dummy {f00=0x0031, f01=0x0190, f02=»V { p , ( 4! P < S S S X | , ( 4 9d * & ! R + : | @ , ( V W R 4 0R Y | p , ( ! 7 Y& P Z,;D 9_8 8 _< | I:ERR8 | , ( A V W YL T 9 :
0x09cd38…09cecc Dummy {f00=0x0031, f01=0x40fc, f02=»V 7 Y | r , ( P _& & Q 9d! )0 + P 7 Y } Z $ _ : } B H D ! ^ P P PF P -P0 EQ GP OP gP kQ s S S S } f 0 , R R R )P oP( T WJ V P. P } } @ } 9 :
0x09cecc…09d060 Dummy {f00=0x0031, f01=0x018e, f02=» > @ IDENT I:MUL T,REL=10.0,800314,870137141000 ~ I:MUL I:SH1L ~ F I:MUL ~ ^ I:ERR2 ~ p I:ERR1 ~ , ( V ) 0 !0 ~ , ( " T *V &V : V ~ , ( = S W P
0x09d060…09d1f4 (0, 199) Dummy {f00=0x0032, f01=0x0190, f02=» ~ f , ( [ [ $ [ [ I:MOV I:NTFA 8 * & P>h [ [ P I:SUB ~ , ( Z P , ( [ 9a Z $" T 9d! P P [ I:ADD , ( P
0x09d1f4…09d388 Dummy {f00=0x0032, f01=0x40e6, f02=» I:SH1L z , ( g ! I Z ! : 4 P 9 , ( 59D_ " P P [ ! :d" B 5 : r D @ @ TV 9V GP WV cW PP P6 P( P 5 z AR IP P P P @ I:ADD , ( P
0x09d388…09d51c Dummy {f00=0x0032, f01=0x018e, f02=» > @ IDENT I:DIV T,REL=10.0,800314,870137141000 I:DIV I:SH1R F I:DIV ^ I:ERR2 p I:ERR1 , ( 0 !0 " T , ( *V &V P = , ( ; ;@
0x09d51c…09d6b0 Dummy {f00=0x0032, f01=0x0190, f02=» , ( V & 6 , ( [ [ [ [ $ 8 I:MOV I:NTFA h , ( [ [ &! P I:SUB , ( , ( z " ! !
0x09d6b0…09d844 Dummy {f00=0x0032, f01=0x018e, f02=» r e P _ , ( i T { [ [ Q [ & I:ADD V , ( P { R [ _ f , ( Z ! Z $ * & P Z %_N [ Q * & R
0x09d844…09d9d8 Dummy {f00=0x0032, f01=0x40b2, f02=» f + X" ,9 -9d_ H D ! Tz V 'V 5PP KR QP UW aP iR qR yV T W P +P $ ( $ YQ eP y Q@ R Q* R W p 6 @ ! Z $ * & P Z %_N [ Q * & R
0x09d9d8…09db6c Dummy {f00=0x0032, f01=0x40da, f02=» > @ IDENT I:NTF T,REL=10.0,800314,870137141000 I:NTFA F I:NTFA X , ( Z H D & H l $ ! D % [ ( 8 @ P ABR* WK2 P P END ,PS
0x09db6c…09dd00 Dummy {f00=0x0032, f01=0x0190, f02=» > @ IDENT I:EDT T,REL=10.0,800314,870137141000 F B I:EDT I:EDW I:ED1 I:EDSK I:EVT I:ETAB I:EXIT I:ETXT I:ECPY F D @ I:ECTR I:ESL I:ENL I:EOR I:ECW I:ECWC I:EFIL I:EFLA I:SCB I:FFSN I:EXPY , ( !!
0x09dd00…09de94 (0, 200) Dummy {f00=0x0032, f01=0x0190, f02=»5 I:EVB I:EGTB I:EVI , I:EVA3 < I:EVA0 N * & AUT ` I:EVNO I:EPIC I:ESKI I:EBRI I:EBRB I:EBR * & Q T
0x09de94…09e028 Dummy {f00=0x0032, f01=0x0190, f02=» { 6 K K I:EDT . I:ED1 @ I:EDW R , ( K K V K : d I:EVA6 , ( * R B " V , ( V Z P 2 " T W , (
0x09e028…09e1bc Dummy {f00=0x0032, f01=0x0190, f02=» 7 [ Z P I:ERR9 * , ( U $ [ V < I:EXIT z l P:MTAB , ( s & 7_ Z @ " (! * & P $ Z 7 Z Z P I:FFSN , (
0x09e1bc…09e350 Dummy {f00=0x0032, f01=0x0190, f02=» : R J P v I < : I:ETXT ( I:ECPY < , ( J Q : P 4 P I:EXPY * I:ECTR < , ( % ! T _ P 4 W K I:ESL F I:ENL P , ( E W
0x09e350…09e4e4 Dummy {f00=0x0032, f01=0x418c, f02=»_& X ,W X & . J K I:EFIL ( I:SCB < I:ERRD N , ( : V : J T 0 1 ` H D ! U Y [ e f g z i p k 4 m P s u F y * < < H D ! P T W T W ;
0x09e4e4…09e678 Dummy {f00=0x0032, f01=0x0190, f02=» > @ IDENT I:EPIC T,REL=10.0,800314,870137141000 I:EPIC F I:EPIC X I:EVA0 l : + ~ [ [ < , ( ! !AAP !TTT W !**T * [ R A
0x09e678…09e80c Dummy {f00=0x0032, f01=0x0190, f02=»T j , ( *W FP . :T Z ! XBW *X& I:ERRD : , ( W :P # U J 1 p ! L I:SCB | , ( 00T ; _ 9P F " X> # ; W )0_B , ( J R Z R 4! P ;)0
0x09e80c…09e9a0 Dummy {f00=0x0032, f01=0x4158, f02=» , ( k ,_ 8 _ : W 8W p 8 ! , ( ++P !-- z ;$# + ^" _( 4 " |`. PT*AXYZ9 d H D ! ` %P +T /W 5T ?R EP KT OW S P Wv W@ Wn H D ! T& W4 P T W F WH P" U T P
0x09e9a0…09eb34 (0, 201) Dummy {f00=0x0032, f01=0x0190, f02=» > @ IDENT I:EDTE T,REL=10.0,800314,870137141000 D @ I:EKIH I:EINH I:EVIN I:EBRI I:EBRB I:EBR I:ESKI I:EVNO F I:EGTD I:EGTB I:EKIH I:EINH I:ETAB I:EVIN , ( @
0x09eb34…09ecc8 Dummy {f00=0x0032, f01=0x018a, f02=»:ERR2 * & ; W : ! )P9H " I:EBR r < , ( W # T &W &" :I : N I:EBRB v ~ I:ESKI I:EVNO I:ER11 I:EGTD I:EGTB , ( u : P &
0x09ecc8…09ee5c Dummy {f00=0x0032, f01=0x4008, f02=»@ * & ; W : ! )P9H " I:EBR r < , ( W # T &W &" :I : N I:EBRB v ~ I:ESKI I:EVNO I:ER11 I:EGTD I:EGTB , ( u : P &
0x09ee5c…09eff0 Dummy {f00=0x0032, f01=0x40ea, f02=» > @ IDENT I:EDS T,REL=10.0,800314,870137141000 I:EDS F I:EDS V I:EVS2 h I:ED1 z , ( : { : & @ P2E,OP1E END OF MAIN STRING
0x09eff0…09f184 Dummy {f00=0x0032, f01=0x0190, f02=» > @ IDENT I:STR T,REL=10.0,800314,870137141000 $ I:INS I:DLT I:MCH I:CPY I:XCP F I:DLT n I:EVS1 , ( @ $0T P 9 I:MCH " * & _ $0T [ , ( ;
0x09f184…09f318 Dummy {f00=0x0032, f01=0x0190, f02=» $ t , ( R W R # P W ) V E I:EVS2 D , ( $0T W W V I:ERR I:CPY I:XCP , ( W [ , ( : Z !0 ,
0x09f318…09f4ac Dummy {f00=0x0032, f01=0x409c, f02=» : H D !@ T H Pb )T ?T UR$ ]P cT mTd oW TH R W R P W ( $ T Wr W W P4 R* R %W Z P @ PY I:XCP , ( W [ , ( : Z !0 ,
0x09f4ac…09f640 Dummy {f00=0x0032, f01=0x0190, f02=» > @ IDENT I:EVS T,REL=10.0,800314,870137141000 I:EVS1 I:EVS2 F I:EVA0 ` , ( @ #03 T jP r , ( kT T : & 9! " : $ , ( = : T W V 9! , ( ]
0x09f640…09f7d4 (0, 202) Dummy {f00=0x0032, f01=0x4082, f02=»2 I:ERR _^ W , ( T )T GT KW eQ< qQ0 }Q$ T W < l@ ~ #03 T jP r , ( kT T : & 9! " : $ , ( = : T W V 9! , ( ]
0x09f7d4…09f968 Dummy {f00=0x0032, f01=0x0190, f02=» > @ IDENT I:TRA T,REL=10.0,800314,870137141000 2 . I:NTR I:PRT I:TRA0 I:TRA I:TRB I:BUF I:ECB F I:ECB | I:BUF , ( *1 TID ADDR OP CR LVL MOD ( / IFIED OPERAND
0x09f968…09fafc Dummy {f00=0x0032, f01=0x0190, f02=» ( z , ( ! @ ' $ * A T ( , ( A A ( J , ( p A ) Y V A V z I:HEX I:HEXB , ( V . 1 V v I:TRA0 8
0x09fafc…09fc90 Dummy {f00=0x0032, f01=0x0190, f02=» I:EVA0 I:HEXW , ( e & ( @ |Q X I:TRB | , ( R A W # V D ! )0 1 , ( @ & # T 6 V ^ I:NTPR I:PRT
0x09fc90…09fe24 Dummy {f00=0x0032, f01=0x4028, f02=»W> T n @ $ e & ( @ |Q X I:TRB | , ( R A W # V D ! )0 1 , ( @ & # T 6 V ^ I:NTPR I:PRT
0x09fe24…09ffb8 Dummy {f00=0x0032, f01=0x0190, f02=» > @ IDENT I:ERR T,REL=10.0,800314,870137141000 D @ I:ERR I:ERR0 I:ERR1 I:ERR2 I:ERR3 I:ERR4 I:ERR5 I:ERR6 F F B I:ERR7 I:ERR8 I:ERR9 I:ERRA I:ERRB I:ERRC I:ERRD I:ERRE F B I:ERRF I:ER10 I:ER11 I:ER12 I:ER13 I:ER1
0x09ffb8…0a014c Dummy {f00=0x0032, f01=0x0190, f02=» I:ERR3 I:ERR4 I:ERR5 0 I:ERR6 D I:ERR7 X , ( W W W W W W W W l I:ERR8 I:ERR9 $ I:ERRA ( I:ERRB , I:ERRC 0 I:ERR
0x0a014c…0a02e0 Dummy {f00=0x0032, f01=0x018e, f02=» I:ER12 H I:ER13 L I:ER14 P , I:ER15 T @ I:ER16 X T I:ER17 h , ( A W W W W W W W W | I:ER18 ` I:ER19 d I:ER1A h I:ER1B l I:ER1C p
0x0a02e0…0a0474 (0, 203) Dummy {f00=0x0033, f01=0x0190, f02=» f I:HEXB , ( $ ER A R A " I:ECB J * & @ R 4 4 $ A Z I:PRT , ( & U 4 - _ TC:ERR I:NTPR , ( @
0x0a0474…0a0608 Dummy {f00=0x0033, f01=0x0190, f02=» ILLEGAL REQUESTED | , ( W LENGTH STACK UNDERFLOW ARIT , ( w HM OVERFLOW STACK OVERFLOW IN L , ( DEX OVERFLOW ILL INDEX TYPE DI | , ( V BY ZERO EDIT BUFFER OVFL ED , ( IT PICTURE OVERFLOW ALLOCATION
0x0a0608…0a079c Dummy {f00=0x0033, f01=0x0190, f02=»LOCA l , ( W TED FIX BUFFER NOT ALLOWED IL , ( w LEGAL CONTROL CODE ILLEGAL INDE < , ( X VALUE FORMAT CONDITIONS CHAN l , ( GED ILLEGAL PARAMETER LENGTH , ( ERROR DATASET BUSY ILLEGAL DA , ( TASE
0x0a079c…0a0930 Dummy {f00=0x0033, f01=0x412a, f02=» W` W WX WT #WP 'WL +WH /WD 3W@ 7W< ;W8 ?W4 | H D ! CW0 GW, KW( OW$ SW WW [W _W cW gW kW oW sW R D 8 H D ! U # 3 C ] _ q @ < " + A [ s
0x0a0930…0a0ac4 Dummy {f00=0x0033, f01=0x4108, f02=» > @ IDENT I:HEX T,REL=10.0,800314,870137141000 I:HEXB I:HEXW I:HEX F I:HEXB f I:HEXW z I:HEX , ( W 9 " R 0 1 Y ! : W " @
0x0a0ac4…0a0c58 Dummy {f00=0x0033, f01=0x413c, f02=» > @ IDENT I:CHK T,REL=10.0,800314,870137141000 I:CHK F I:CHK V P:BAS h P:END x , ( ;a V P V P W TC:CHK I:ERR , ( B <a R 9a V :
0x0a0c58…0a0dec Dummy {f00=0x0033, f01=0x0190, f02=» > @ IDENT TRACHK T,REL=10.0,800314,870137141000 & " TC:CHK TC:ABT TC:ERR TC:RDC F TC:CHK p , ( @ P ( TT:HLT TT:TRP , ( !" _ @ P @ P P V
0x0a0dec…0a0f80 Dummy {f00=0x0033, f01=0x0190, f02=» P n TT:VER TT:VMM , ( s $ $P T , D 2 , ( @ E : @ P A H A b TT:TID TT:PRC TT:SNO , ( W TW V A V TB:ENT ,
0x0a0f80…0a1114 (0, 204) Dummy {f00=0x0033, f01=0x0190, f02=» TC:RDC TB:RDC TC:ERR & TT:MSG : * & TB( : TB( : A L , ( A E A V A z P:MTAB , ( 3 @ " # P ( R , ( @ M TB( ( A
0x0a1114…0a12a8 Dummy {f00=0x0033, f01=0x4042, f02=» W W P R ;P CR4 kP sR ~ ,@ >G : * & TB( : TB( : A L , ( A E A V A z P:MTAB , ( 3 @ " # P ( R , ( @ M TB( ( A
0x0a12a8…0a143c Dummy {f00=0x0033, f01=0x0190, f02=» > @ IDENT TRATAB T,REL=10.0,800314,870137141000 F B TT:TON TT:TRP TT:LOP TT:VON TT:VER TT:VMM TT:HLT TT:PRC F & " TT:TID TT:MSG TT:SNO TT:TRS TT:TON TT:TRP , (
0x0a143c…0a15d0 Dummy {f00=0x0033, f01=0x418a, f02=» j , ( a TT:VON : TT:VER N , ( b , ( TT:VMM @ TT:HLT
0x0a15d0…0a1764 Dummy {f00=0x0033, f01=0x0190, f02=» > @ IDENT TRABUG T,REL=10.0,800314,870137141000 TB:ENT TB:ABT TB:RDC F h P:BAS z , ( , ( , (
0x0a1764…0a18f8 Dummy {f00=0x0033, f01=0x0190, f02=»( ( ( TT:PRC $ TT:SNO 6 , ( i D "! A * @ @ H , ( @ *P ( V x , ( R V W Z T , ( _" = T , (
0x0a18f8…0a1a8c Dummy {f00=0x0033, f01=0x0190, f02=»B:RDC 8 , ( ! P @ A A , , ( ; A . "V # ( A , @ , ( @ [ P UW T A ,P p , ( { @ = W Q M / , ( S I J T Y G L P , (
0x0a1a8c…0a1c20 Dummy {f00=0x0033, f01=0x0190, f02=» UU A A A A A A A A , ( B ; A P A A , 0 , ( [ + - ; : ( . ` , ( { X " , A L A L @ A , ( @ A _T X ,T X , ( ) A A
0x0a1c20…0a1db4 (0, 205) Dummy {f00=0x0033, f01=0x0190, f02=» @ V " @ T , ( ( ; " @ @ P A A " @ , ( [ 8T @ 4 A @ : A @ @ A P , ( * { @ F A @ A @ A @ @ A , ( F @ A :P W @ T @ , ( @ Z @ A 4 W
0x0a1db4…0a1f48 Dummy {f00=0x0033, f01=0x0190, f02=» p , ( ; 0 P P P @ , ( [ R _ @ , ( { _T p , ( 8 4 T P W , ( T @R W , ( U
0x0a1f48…0a20dc Dummy {f00=0x0033, f01=0x0190, f02=» ; D @ A 8P W @ T @ , ( [ Z A @ 8 0 , ( { @ A 2 ` , ( A 8 @ R V ;a , ( @ Q _ 1 8 @ A , ( 2_ 0 A
0x0a20dc…0a2270 Dummy {f00=0x0033, f01=0x0190, f02=» @ 6 A @ < A @ B A , ( EU [ @ A @ A < @ A B @ A 6 , ( { P W @ T @ V @ P , ( @ A 0 0 P , ( @ @ P @ 1 8 A , ( @ @ < A @ 6 A _
0x0a2270…0a2404 Dummy {f00=0x0033, f01=0x0190, f02=» 0 p , ( $ W ! T @ P @ " 1 , ( P w 8 P @ @ @ @ T @ , ( @ @ R A *9l! P p , ( &9d! ) W P &9d , ( & _ & , ( P
0x0a2404…0a2598 Dummy {f00=0x0033, f01=0x018e, f02=» S P R % < < ! , ( H s T @ P @ ! 0 , ( D 5 = 8 8P @ ` TT:TRP TT:TRS , ( W $ TT:TON * & @
0x0a2598…0a272c Dummy {f00=0x0033, f01=0x0190, f02=» , ( @ ! @ @ T I _: TT:HLT 8 * & ( = P @ _ A , A J I:TRC x , ( Y @ A 8 @ ! A , ( s 8P @ @ P @ P , ( @ R @ T @
0x0a272c…0a28c0 Dummy {f00=0x0033, f01=0x0190, f02=» R )W A | , ( 8 , A A :B A , ( @ Q (P _ H @ T @ L , ( @ H A " EQ GT | , ( = LT NE NG NL P @ * R , ( ] @ P Q (
0x0a28c0…0a2a54 (0, 206) Dummy {f00=0x0033, f01=0x0190, f02=» A l , ( :B A (P _ @ , ( @ @ P @ < , ( V @ Q 1 @ Q Q l , ( +D A " ( R ( @ , ( G$ V @ H ) I " , ( a $
0x0a2a54…0a2be8 Dummy {f00=0x0033, f01=0x0190, f02=» P ,T n P )T , ( @ A T @ R ?aP * , , ( :l" T & W T C B B , ( B B B " A A A , ( ? A A A A R Q , ( _ ! 9D# 9hP Q
0x0a2be8…0a2d7c Dummy {f00=0x0033, f01=0x0190, f02=»Q L % Q | , ( W , ( C L , ( " _* Q P Q V | , ( ? _ W " A < V , ( _ " F <P
0x0a2d7c…0a2f10 Dummy {f00=0x0033, f01=0x0190, f02=» A l , ( .T @ *P P " A " , ( X X " , , A A < , ( :B A Q (P _ # # H A " l , ( ; A A 4 4 @ , ( [ I T A A A T A , ( @ { T
0x0a2f10…0a30a4 Dummy {f00=0x0033, f01=0x0190, f02=» n , ( "( @ " :S :X , ( :Y :Z $P W A > , ( + A 0R 9Q 0 A :B n , ( K _" A " , ( k A 0R 9U AR FQ , (
0x0a30a4…0a3238 Dummy {f00=0x0033, f01=0x0190, f02=» "! R _U .W A : , ( A " 9d ! R . , ( + :W W W W ? ^ , ( K W :W .W / a A T " , ( k @ T A ( , ( @ A "
0x0a3238…0a33cc Dummy {f00=0x0033, f01=0x0190, f02=» ! 1 ~ u 4 H D ! . K W e : y V } 6 P R V W V T 0 6 W P H D ! V $ P P 6 L #P ' 0 / ; t CV U : [P H D !o _W e V i 6 oP s w {
0x0a33cc…0a3560 Dummy {f00=0x0033, f01=0x0190, f02=» W . [ t _ c g k o s $ { d n T n j H D ! . 4 P 4 )V - 1 4 9T EP ] cT < H D ! P W T T W D W : 0 W H D ! 0 V 'PZ 9 T ? EP I L U
0x0a3560…0a36f4 (0, 207) Dummy {f00=0x0034, f01=0x0190, f02=» # / ? : IP M QW WT c l H D ! k u t } 0 0 < 0 0 R Q : j ( H D ! D 6 0 P P P P -P 9T a {P W T t H D ! V 6 P P D 0 T P V T
0x0a36f4…0a3888 Dummy {f00=0x0034, f01=0x0190, f02=» 9 =P` KT X H D ! Q S 4 WPF m T u $ y 6 T P P 0 W" b T W R % H D !1 3T =P A I 0 uPd PL P j j 0 R T V ` H D ! Rt W P RV W b * * * Q P T ' * MP2 UR* H D ! p Y j ] _
0x0a3888…0a3a1c Dummy {f00=0x0034, f01=0x0190, f02=» !A T 4 R: P T* W T 7 ; ? C G K O S j UR H D ! [Q kP oQ Pl ( P R PL W~ Pz R Tr Qj W" P` QV L H D !`C QL N N W /Q 3P 5Q 9V IW Q f wP W* P T j j H D ! j T P d P d :
0x0a3a1c…0a3bb0 Dummy {f00=0x0034, f01=0x018a, f02=» j P WH # j + b 1 Z 7R =Q C b Q j | H D ! _ b g j o wR$ }U R Q j T j 0 8 H D !q T R U WV $ ! $ )R /W& 5 V 9W ? V H D ! CW GW KW OW SW Y ] cT g m oT s w
0x0a3bb0…0a3d44 Dummy {f00=0x0034, f01=0x4008, f02=»@ j P WH # j + b 1 Z 7R =Q C b Q j | H D ! _ b g j o wR$ }U R Q j T j 0 8 H D !q T R U WV $ ! $ )R /W& 5 V 9W ? V H D ! CW GW KW OW SW Y ] cT g m oT s w
0x0a3d44…0a3ed8 Dummy {f00=0x0034, f01=0x0190, f02=» > @ IDENT SYSLOD REL 10.0 80-03-15 870105041000 & " SYSLOD SYSBAS NUMSEG PRGLG1 F NUMSEG p PRGLG1 SYSBAS SYSLOD SCTSFA SCTIPL , ( ($SWAP A
0x0a3ed8…0a406c Dummy {f00=0x0034, f01=0x0190, f02=» @ A. SCTOPT ( TABBE : * & Q UU @ @ ! P >B @ A J , ( k @ E D P _ x SCTMSZ SCTEFA , ( D $ % $P _ % A >f A , ( $ A
0x0a406c…0a4200 Dummy {f00=0x0034, f01=0x0190, f02=» A l , ( P _ * A W * , ( @ A W :a2 * A < SAVE09 l SAVE04 ~ APPTYP , ( - & W F W @ F W , ( G CRP BAP COP A SCT
0x0a4200…0a4394 (0, 208) Dummy {f00=0x0034, f01=0x0190, f02=» , ( W =J : R F P W W " SAVE05 8 SAVE01 J , ( B @ $ P @ R W $ W SAVE03 SAVE13 CMPADR , ( & ( * ,R SAVE07 S
0x0a4394…0a4528 Dummy {f00=0x0034, f01=0x0190, f02=» W ( t SCTNOP * & /D W 0 V ( V 0 V $P A & , ( E 2 @ , T , ( [ U U A Q SAVE22 , ( u@$ ,V Y2 W 4 V @ , ( " T W
0x0a4528…0a46bc Dummy {f00=0x0034, f01=0x0190, f02=» , ( 6 Y , ( P @ P @ 2T 4 , ( W - 6P _ T <B d SCTLAP TTB:MT SCTMMP , ( 7 B :L A 8 W 0 : SCTNPE
0x0a46bc…0a4850 Dummy {f00=0x0034, f01=0x0190, f02=» j SCTMMC , ( W Y( P Z& = : , ( A @:L . < P W L * & <9B @ V W Q | SCTLAC , ( W & @ A , ( B 0 @
0x0a4850…0a49e4 Dummy {f00=0x0034, f01=0x0190, f02=» a$ P V V " W _> , ( { @ , , ( H . V V " , ( $ P W @ @ ! T _ , ( P 8 , ( :l D
0x0a49e4…0a4b78 Dummy {f00=0x0034, f01=0x0190, f02=»P W T | , ( ] W , ( }A W 0 @ W ( L , ( | , ( , ( V * 00P
0x0a4b78…0a4d0c Dummy {f00=0x0034, f01=0x0190, f02=» j , ( S _ 0 !;; _ S A A , ( s @ R @ ! T A : , ( A @ V ( V & I j MOVE M:REL , ( F W & H V LDALEN , ( " &
0x0a4d0c…0a4ea0 Dummy {f00=0x0034, f01=0x0190, f02=»E20 , ( F LX 0T , ( 3 : T : < , ( Q : 0 !TTT 0 !;;T : l , ( q W W 0 !99Q P !00R P , ( 00W 11 A P =H_, !11R T , ( 0 !
0x0a4ea0…0a5034 (0, 209) Dummy {f00=0x0034, f01=0x0190, f02=» : : : : , ( / : : 0 )T : !00 , , ( O T W * : TID=TCL= , ( k LEV=TDC=T0LC=0SDC=S0A I. : , ( C. ~ X C.9h! , ( # "
0x0a5034…0a51c8 Dummy {f00=0x0034, f01=0x0190, f02=» @ " P P | , ( ' A A A A W A , ( G A A A A A A P A A L , ( g : 9e :e Q | , ( P 9e @ P A 9C) A I , ( " @ ! P " :B A
0x0a51c8…0a535c Dummy {f00=0x0034, f01=0x0190, f02=» l , ( @ ' " @ $ P " :B A t w B , ( G J " r R Q @ ( = < , ( g @ Q @ "| _@ _$ l , ( : A A A A A A P A , ( A : h:B* A @ P A , ( B
0x0a535c…0a54f0 Dummy {f00=0x0034, f01=0x0190, f02=» ' A P A A A ! T W , ( G A A I ! : 9D @ , , ( ! g @ r s @ A I T - , ( A _ I N T V S : , ( , ( 9P
0x0a54f0…0a5684 Dummy {f00=0x0034, f01=0x0190, f02=» : YX d C !CCT xB. ~ , ( ? <X B.9 H Q _ . SCTSWB ^ * & _ _ !SST 0 U P A p SAVE25 SAVE26 , ( } P X X W R W T X X SAVE27 S
0x0a5684…0a5818 Dummy {f00=0x0034, f01=0x0190, f02=» P V ZT W Z , ( F P P V . W ( , ( . @ $ P p W F T : X , ( ' A _ 0V , - , ( G P X 9A_ : @ ! P (W ( : H D ! [P$ {P P Q" U R> P0
0x0a5818…0a59ac Dummy {f00=0x0034, f01=0x0190, f02=» [U _U^ oQ yVD TJ P P P T W %P /T H D ! _W sT W V V W P P W V W Q % 1 5P < H D !/ GP UP* Y T aP q T T $ PZ T P V^ 4 # + H D ! = A IPH M Q 6 SW> W [T a e gW m
0x0a59ac…0a5b40 Dummy {f00=0x0034, f01=0x0190, f02=» : l x P J # 2 l H D ! ' : + r / GT O S X a Z e m q - u }R T v P ( H D ! P PN T -T 1 N 9 Q P _T iT qW wW Q P R P W t H D ! P. R T$ P P P P W W T~ Rr U Rf Q` TR
0x0a5b40…0a5cd4 (0, 210) Dummy {f00=0x0034, f01=0x418a, f02=» O S D W H X H D ! [ . c g Q P P P R U P /P UR, WQ$ oQ H D ! . P R V V R ! % . - 1 5 v ` H D !x` 9T = A z I z O v }T T V S PJ T@ T: Tr P H D ! P$ T 3Tx
0x0a5cd4…0a5e68 Dummy {f00=0x0034, f01=0x018c, f02=» > @ IDENT T:CLO T,REL=10.0,800314,870137141000 T:SETT T:GETT F T:SETT ` I:EVA0 t I:RT1 T:GETT , ( @ ( ( $ @ ( _
0x0a5e68…0a5ffc Dummy {f00=0x0034, f01=0x4008, f02=»@ IDENT T:CLO T,REL=10.0,800314,870137141000 T:SETT T:GETT F T:SETT ` I:EVA0 t I:RT1 T:GETT , ( @ ( ( $ @ ( _
0x0a5ffc…0a6190 Dummy {f00=0x0034, f01=0x2008, f02=» L = REL 10.0 DATE = 800317 1216PACK NBR = 0001 8
0x0a6190…0a6324 Dummy {f00=0x0034, f01=0x0000, f02=»
[…0x3…]
0x0a67e0…0a6974 (0, 211) Dummy {f00=0x0035, f01=0x0000, f02=»
[…0x1…]
0x0a6b08…0a6c9c Dummy {f00=0x0035, f01=0x0190, f02=» IN SCLASS r 6 P ST A2,SAVE11,A13 SAVE RELOCATED POINTER TO SCLASS P* L & P* CLEAR ALL WORDS IN SYSTEM AREA V P* P LD A1,SCTEFA P LD A2,SCTSFA PCLRSYS EQU * P SUK A1,2 P CMR A1 P CWR A1,A2 P RB(NE) CL
0x0a6c9c…0a6e30 Dummy {f00=0x0035, f01=0x018e, f02=»* b 4 /* CHPTRS - CHANGE POINTERS IN TCLASS/SCLASS * 4 /*********************************************** B * z , (* ENTRY: A2 - POINTER TO TCLASS/SCLASS ( P* A11 - SYSLOD START ADDRESS ( #* A12 - RELOCATION CONSTANT
0x0a6e30…0a6fc4 Dummy {f00=0x0035, f01=0x0190, f02=» ~ * PCHPTRS EQU * P ADR A2,A12 RELOCATE POINTER & 2 . LDR A3,A2 GET POINTER TO ORIGIN TCLASS/SCLASS J , ' LDR* A4,A3 GET LENGTH OF TCLASS/SCLASS CHPT10 EQU * . ) SUK A4,2 MOORE ENTRIES I TCLASS/SCLASS ? RF(Z) CHPT30 NO!
0x0a6fc4…0a7158 Dummy {f00=0x0035, f01=0x0190, f02=»,A5 GET LENGTH OF CLASS CHPT20 EQU * * & SUK A6,4 MOORE DEVICES IN THIS CLASS? 4 P RB(NP) CHPT10 NO! b ADK A5,4 NEXT DEVICE | LDR* A7,A5 GET DWT-ADDRESS P LDR A9,A7 GET DWT-ADDRESS " P CALL CMPADR COMPARE ADDRESSES P R
0x0a7158…0a72ec Dummy {f00=0x0035, f01=0x0190, f02=»D t P ANKL A8,1 MMU IN SYSTEM? P RB(Z) CHPT20 NO! , , P LD A8,DWTMEC,A7 GET MONITOR ECB ADDRESS F & P LDR A9,A8 GET MONITOR ECB ADDRESS v * P ANKL A9,1 ADDRESS ALREADY RELOCATED? P RB(NZ) CHPT20 YES! P ADR A8,A12 RELOCATE . P A
0x0a72ec…0a7480 Dummy {f00=0x0035, f01=0x018e, f02=»TN A14 P EJECT 6 2************************************************** 6 2* B:TCT - BUILD TASK CONTROL TABLE * V 6 2************************************************** * * REFERENCED IN: MONCON * 2 P* ENTRY:
0x0a7480…0a7614 (0, 212) Dummy {f00=0x0035, f01=0x0190, f02=» * WORK REGISTERS: A2,A3 * * * SUBROUTINES: 4 * L . )* TASK CONTROL TABLE LAYOUT V . )* _________________________ . ** I LENGTH I . )* ____________
0x0a7614…0a77a8 Dummy {f00=0x0035, f01=0x0190, f02=» I MONITOR TASKS I . )* _________________________ $ . ** I USER TASKS I V . )* __________________________ * EJECT PB:TCT EQU * 6 P ST P,SAVE03,A13 TEMPORARY STORAGE
0x0a77a8…0a793c Dummy {f00=0x0035, f01=0x0190, f02=» SAVE & " LDKL A2,TTMJOB GET TTMJOB ADDRESS ST A2,2,A7 STORE IN TC:TAB 8 * % ADK A7,4 CONTINUE WITH MONITOR TASKS ( P LD A2,SCTOPT ANY OPTIONS AVALIABLE? P RF(Z) BTCT15 NO! @ P********************************************************
0x0a793c…0a7ad0 Dummy {f00=0x0035, f01=0x0190, f02=» * X @ P*********************************************************** P EJECT P PBTCT15 EQU * ^ " P LD A2,SCTDMT DATA MANAGEMENT? r $ PBTCT20 ANK A2,/F MOORE DM-TASKS? P RF(Z) BTCT30 NO! P SRC A2,1 CHECK NEXT P RF(NN) BTCT25 NOT
0x0a7ad0…0a7c64 Dummy {f00=0x0035, f01=0x0190, f02=»OF TASKS AND RESERV SPACE IN TC:TAB ~ * , . )* A11 - POINTER TO TASK DEFINITION BLOCK 6 * h 2 P ST A7,SAVE13,A13 SAVE CURRENT USER TASK ENTRY r , P ST A7,SAVE02,A13 FIRST USER TASK ENTRY LCR A2,A11 GET BLOCK TYPE ( # CCK A2,'TT' T
0x0a7c64…0a7df8 Dummy {f00=0x0035, f01=0x0190, f02=» 0 ,* COMPUTE NUMBER OF TASK IN EACH TASK CLASS ! * ! < PBTCT40 EQU * ! F $ CALL GETTSK GET NUMBER OF TASKS ! Z PBTCT50 EQU * ! , P ADK A7,2 RESERV ANOTHER ENTRY IN TC:TAB ! & P CW A7,SCTEFA CHECK IF MEMORY LEFT ! P RF(NE) BTCT55 YES! !
0x0a7df8…0a7f8c Dummy {f00=0x0035, f01=0x0190, f02=»B(P) BTCT50 YES ! $ CALL NXTBLK SKIP TO NEXT BLOCK " ( # CCK A2,'TT' TASK DEFINITION BLOCK? " @ RB(E) BTCT40 YES " l * " 4 0* ENTRIES FOR ALL USER TASKS RESERVED IN TC:TAB " * " * % ST A7,SCTSFA UPDATE END OF FREE AREA " SUR A7,
0x0a7f8c…0a8120 Dummy {f00=0x0035, f01=0x0190, f02=»CT " 8 P*************************************************** # 8 P* * # F 8 P* B:FWT - BUILD FILE WORK TABLE * # 8 P* ============================= * # 8 P*
0x0a8120…0a82b4 (0, 213) Dummy {f00=0x0035, f01=0x0190, f02=» * # r 8 P* REFERENCED IN: CONMON * $ 8 P* * $ Z 8 P* ENTRY: SCTNFT - NUMBER OF FM-FILES PER TASK * $ 8 P* SCTNOF - NUMBER OF GENERAL FM-FILES * $
0x0a82b4…0a8448 Dummy {f00=0x0035, f01=0x0190, f02=» * $ 8 P* EXIT: SCTFWT - ADDRESS TO FIRST FWT * % 2 8 P* SCTNOF - TOTAL NUMBER OF FM-FILES * % n 8 P* * % 8 P* WORK REGISTERS: A2,A3
0x0a8448…0a85dc Dummy {f00=0x0035, f01=0x0190, f02=»* % ^ 8 P* * & 8 P* FUNCTIONAL DESCRIPTION: * & F 8 P* THIS SUBROUTINE RESERVES MEMORY AREA FOR * & 8 P* FILE WORK TABLES. * & 8 P* SIZE OF THE
0x0a85dc…0a8770 Dummy {f00=0x0035, f01=0x0190, f02=»TES * & r 8 P* L= FWT LENGTH IN BYTES * ' 8 P* G=NUMBER OF GENERAL FM-FILES * ' Z 8 P* T=NUMBER OF FM-FILES PER TASK * ' 8 P* N=NUMBER OF USER TASKS * '
0x0a8770…0a8904 Dummy {f00=0x0035, f01=0x0190, f02=» PB:FWT EQU * ( & P LD* A2,SCTTCT GET LENGTH OF TCTAB ( & P AD A2,SCTTCT COMPUTE END OF TCTAB ( B * P SU A2,SAVE02,A13 LENGTH OF USER PART ( l " P SRL A2,1 NUMBER OF USER TASKS ( 2 P LD A3,SCTNFT GET NUMBER OF FM-FILES PER TASK ( P CALL MULT MULTIPL
0x0a8904…0a8a98 Dummy {f00=0x0035, f01=0x0190, f02=» WORK TABLE LENGTH ( z P CALL MULT MULTIPLY ) , P SRL A3,1 NUMBER OF WORDS TO BE RESERVED ) 6 P ADK A3,0 ANY FWT:S AT ALL? ) f P RF(Z) FWT70 NO! ) 2 P ST A3,SAVE05,A13 SAVE FWT AREA SIZE IN WORDS ) ( P LD A2,SCTSFA GET START OF FREE AREA ) , P ST
0x0a8a98…0a8c2c Dummy {f00=0x0035, f01=0x0190, f02=»CATE MEMORY OVERFLOW ) ~ P CALL ERROR * ( PFWT60 ADK A2,2 RESERVE ANOTHER WORD * 0 $ P SUK A3,1 DECREMENT WORD COUNTER * * P RB(NZ) FWT50 CHECK IF MEMORY OVERFLOW * , P ST A2,SCTSFA UPDATE START OF FREE AREA * PFWT70 RTN A14 * EJECT * * &**
0x0a8c2c…0a8dc0 Dummy {f00=0x0035, f01=0x0190, f02=»* * ( $* NUMBER OF BLOCKS TO BE GENERATED: + ( P* 20+N*(NUMBER OF TASKS IN SYSTEM) + 6 $ P* WHERE N IS A SYSTEM CONSTANT + b $ P* DEFINED AT SYSTEM GENERATION + P* + * + * REFERENCED IN: SYSLOD + * + * &* ENTRY: SCTSFA - STAR
0x0a8dc0…0a8f54 (0, 214) Dummy {f00=0x0035, f01=0x018e, f02=»* WORK REGISTERS: A1,A2,A7,A12 + * , ( * SUBROUTINES: BLKGEN , 2 * , R EJECT , PMONBLK EQU * , j LDK A1,0 , ~ & ! LD A12,SCTSFA START OF FREE AREA , . P ST A12,FREQUE SAVE POINTER TO FIRST BLOCK , * , $ * GET NUMBER OF T
0x0a8f54…0a90e8 Dummy {f00=0x0035, f01=0x0190, f02=» P* - P LD A2,SCTBLK - PMON:10 EQU * - $ SUK A7,2 MOORE TASKS? - 8 RF(Z) MON:20 NO - V P CALL BLKGEN - p RB MON:10 - PMON:20 EQU * - * - * GENERATE 19 MOORE BLOCKS - * - LDK A2,19 - P CALL BLKGEN -
0x0a90e8…0a927c Dummy {f00=0x0035, f01=0x0000, f02=»
[…0x5…]
0x0a9a60…0a9bf4 (0, 215) Opaque[0x194]
0x0a9bf4…0a9d88 # DirEnt {nam=»SYSGEN«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x06c0, f03=0x0000}
0x0a9bf4…0a9d88 IdxSect {
0x0a9bf4…0a9d88 f00 = 0x0036 // 0xa9bf4 @0x0
0x0a9bf4…0a9d88 f01 = 0x0018 // 0xa9bf6 @0x2
0x0a9bf4…0a9d88 gno = [ // 0xa9bf8 @0x4
0x0a9bf4…0a9d88 [0x00]: C0x0036.0x0.0
0x0a9bf4…0a9d88 [0x01]: C0x0036.0x1.0
0x0a9bf4…0a9d88 [0x02]: C0x0036.0x2.0
0x0a9bf4…0a9d88 [0x03]: C0x0036.0x3.0
0x0a9bf4…0a9d88 [0x04]: C0x0037.0x0.0
0x0a9bf4…0a9d88 [0x05]: C0x0037.0x1.0
0x0a9bf4…0a9d88 [0x06]: C0x0037.0x2.0
0x0a9bf4…0a9d88 [0x07]: C0x0037.0x3.0
0x0a9bf4…0a9d88 [0x08]: C0x0038.0x0.0
0x0a9bf4…0a9d88 [0x09]: C0x0038.0x1.0
0x0a9bf4…0a9d88 [0x0a]: C0x0038.0x2.0
0x0a9bf4…0a9d88 [0x0b]: C0x0038.0x3.0
0x0a9bf4…0a9d88 ]
0x0a9bf4…0a9d88 }
0x0a9d88…0a9f1c Dummy {f00=0x0036, f01=0x0190, f02=»r ] @ . A > @ 4 A @ @x @s @s @yzP& @hf A` @hh A` @hdP A`| @hbP A` W @y P A[ A[ A[ @a( A[ A[ A[ @y A[ @`z A[ @`t @`v A[ @y A[ A[ @ @`~ A[ @ 0P A[ @` A[ @ T @ * A[ @` A[ A[ @ @`~P @ T A
0x0a9f1c…0aa0b0 Dummy {f00=0x0036, f01=0x0190, f02=» $ @`z A[ A @`r A[ A @`t @`v A[ A @a( A[ A[ A A A[ A[ A[ A[ A[ A[ A[ A[ PH @ 4" H A[ A[ A[ A[ @ A[ A[ A[ A[ A[ P( 6W" A[ A[ A[ A[ A[ P @ 6 @` A[ A[ A[ @` A A[ @`~ A @` A @`| A A
0x0aa0b0…0aa244 Dummy {f00=0x0036, f01=0x0190, f02=» F A v % @ r A W A r @x T . @y P W@ @a P Z ` [ $ ZW @a(P [ W [ Z 8 A r l A v [ L[ R M[ _ @`z A[ @`r A[ @`t @`v A[ @ * @ A[ @` A[ A[ A[ @` A[ @`~ A
0x0aa244…0aa3d8 Dummy {f00=0x0036, f01=0x0190, f02=» D A D AT A F A A H $R % _ A [ 8 B 8 u : DATA ILLINT122123124125126127128129130131132133134135136138139140141142145149150155156159163 04204304404504604704804905005105205305405505605705805906
0x0aa3d8…0aa56c Dummy {f00=0x0036, f01=0x0190, f02=»CH $$CHRT1$$IHLP$$LED SYSTABLED PFTAB LED INITAB!!IL 63 !!CH $$IHINPT$$TRAP$$ !!DL 85 ! D @ J R V Z ^ A[ A[ A[ A[ A[ : @ P@ A[ @ P 2T A[ A[ W A[ A[ W A[ @ *P @ _< :_$!!RE 127,$$ILLINT$$CHRT1$$!!RE 128,$$ILLINT$
0x0aa56c…0aa700 Dummy {f00=0x0036, f01=0x0190, f02=»56159163 : 3L<c P | & & : & & : & : & : ` & : & & : : A n A m X ( A p A o X ( x Y ( T T ' X ( A p A o X ( x Y ( T T ' : A P V V : X ( A R
0x0aa700…0aa894 (0, 216) Dummy {f00=0x0036, f01=0x0190, f02=» . F R ^ p z !!IL 12 !!IL 41 A h A x A w A g :!!IL 55 010101010101010101 EXTRN IH0000!!CH $$ILLINT XX$$IHAABB XX$$ !!CH $$CHLT1 14$$ILLINT 14$$!!CH $$IHFD 15$$ ILLINT 15$$!!CH $$CHRT3
0x0aa894…0aaa28 Dummy {f00=0x0036, f01=0x0190, f02=» 21$$ILLINT 21$$!!CH $$IHCC3 23$$ILLINT 23$$!!CH $$CHLT3 26$$ILLINT 26$$!!CH $$CHLT4 27$$ILLINT 27$$ DC A N ON A R L T M A P < : 3D T R X L 4P _ _ : 0715178182 2213 @s P
0x0aaa28…0aabbc Dummy {f00=0x0036, f01=0x0190, f02=»G$$*$$ @x Pl @`|P @` P @` P @` P D B A W C A @s n : E A @s _ D A @s _ @a( @ P G A _2 : F A @ _@ L pR _ L p,0 ) $ ) I :' d !!CH $$ X:A$$ $$ 4R P Z T 5 _$ : 4P^R`
0x0aabbc…0aad50 Dummy {f00=0x0036, f01=0x0190, f02=» _ 4R T _ : 4R T $X R l _$ : A 0 ) A W W W W W # C C ( B RF : _( $ @ $ A !YYP$ !NNP !$$T L !## u W : u _x _ t W
0x0aad50…0aaee4 Dummy {f00=0x0036, f01=0x0190, f02=»******************* P R D ! P ) _ _ : A _, ~ DTOSS TOSSWORK A T A X A A ` A d A h A l p t x | A A : A W ( -R _ : ( =R2 ( =
0x0aaee4…0ab078 Dummy {f00=0x0036, f01=0x0190, f02=» _ 4R T _ : 4R T $X R _$ :MOV ,/S,TOSSWORKINC ,TOSSWORK KPF /S,0 ASG /E0,TY10!!EN DATA 00!!DL LED KPF /O I/O ERROR SCR J 9 `r 8R T
0x0ab078…0ab20c Dummy {f00=0x0036, f01=0x0190, f02=»'Z A( A(j A( A( A*r A' A ( A n A) A A A A A A A' A( A(l A( A( A! A! A# A# A$ A% A%| A&X A*t A' A) A A( @ P DR A @ @ A X A * A 0 A A 6> X @` P DR A * @` P DR A 0 X +~ , 1n @a T W
0x0ab20c…0ab3a0 Dummy {f00=0x0036, f01=0x0190, f02=» A B (W ! T R 4 Y : 7F 7R 8 6 @ *P @ SP NUT 1 A @ P @ SP NUT 1 A 2 A 4 @ < SP 1P AE A62 1 @ SP NUT A @ X @ SP 1P AE 7& L 00 @ @ *T A : @y T A > @y T A B
0x0ab3a0…0ab534 (0, 217) Dummy {f00=0x0036, f01=0x0190, f02=»CD01DRMS02DROD01DRTP03DRGP02DRAS01DRSL01DRTC01DRSOP1DRSOP1DRMT01DRTW01DRDU01DRLP01DRFD01DRMD01DRCD01 DM01DRCR01DRIC01000000DRDC07DRDC15DRDC17DRDC81DRDC82DRDCXXDRDCYYDRDC22DRDC13DRCC01 ******************** D R I V E R S ********************* D & Z
0x0ab534…0ab6c8 Dummy {f00=0x0036, f01=0x0190, f02=»+r+r+r +r+r+r+r+r+r+r+r+r RETURN CODE UPON RECOVERY : CUT/PERFORATE JOURNAL TAPE : SPECIAL CHARACTER /13 : SPECIAL CHARACTER /14 : COMPLETION OF REQUEST IF PRINT OBJECT IS REMOVED : END OF REQUEST WHEN SELECTOR UNIT OR PRINTER IS INACTIVE : ROOM
0x0ab6c8…0ab85c Dummy {f00=0x0036, f01=0x0190, f02=»L CHARACTER /13 : SPECIAL CHARACTER /14 : COMPLETION OF REQUEST IF PRINT OBJECT IS REMOVED : INDICATION OF RECOVERY IN RETURN CODE (/80) : END OF REQUEST WHEN SELECTOR UNIT OR PRINTER IS INACTIVE : ROOMLESS POINT CODES : MMU BUFFER SIZE (BYTES) :
0x0ab85c…0ab9f0 Dummy {f00=0x0036, f01=0x0190, f02=»ON OF READ REQUEST AT POWER ON : CIRCULAR INPUT BUFFER SIZE : CODE CONVERSION/8-BIT SETTING : NUMERIC SHIFT FUNCTION : KEYBOARD LOCK IF NO KEYLOCK ON : MMU BUFFER SIZE (BYTES) : MMU KEY TABLE SIZE : ROOMLESS POINT CODES : SPECIAL CHARACTER
0x0ab9f0…0abb84 Dummy {f00=0x0036, f01=0x0190, f02=»F TRAILING BLANKS : END OF REQUEST WHEN SELECTOR UNIT OR PRINTER IS INACTIVE : MMU BUFFER SIZE (BYTES) : ORDER,WRITE NUMERIC DISPLAY : MMU BUFFER SIZE (BYTES) : ORDER,WRITE PROGRAM DISPLAY : FLASH FUNCTION : LOGG FUNCTION FOR INPUT/OUTPUT
0x0abb84…0abd18 Dummy {f00=0x0036, f01=0x0190, f02=»S : SOFTWARE TIMEOUT HANDLING MISSING DATA REQUESTS FROM PRINTERS : 01 NUMBER OF CASSETTE DRIVES : ORDERS LOCK,ERASE AND REVERSE ONE BLOCK : MMU BUFFER SIZE (WORDS) : LOGG FUNCTION FOR INPUT/OUTPUT CHRS : NUMBER OF LOCAL CHANNEL UNITS : ACKUMU
0x0abd18…0abeac Dummy {f00=0x0036, f01=0x0190, f02=»EST FILE CODE : 01 KEYBOARD TIMEOUT : COMPLETION OF READ REQUEST AT POWER ON : MMU BUFFER SIZE (WORDS) : GRAPHIC MODE : ONLY 6344/46 : LOWER CASE CHARACTERS : ECHO OF EOR-KEY : SUPRESSION OF TRAILING BLANKS : CURSOR STEADY ON 6386/6385 (
0x0abeac…0ac040 Dummy {f00=0x0036, f01=0x0190, f02=»F DISC UNITS : UNPACKED DISC FORMAT (A2) : PACKED DISC FORMAT (A3) : 00 EXTRA SOP INPUT DWT : FLASH FUNCTION : RECIEVE BUFFER LENGTH : DC-TASK DATCOM FILE CODE : INTERRUPT LOGGING : POLL TIMEOUT VALUE : STATUS AND RVI HANDLING : READ
0x0ac040…0ac1d4 (0, 218) Dummy {f00=0x0036, f01=0x0190, f02=» SPEED HIGH : SIEMENS MSV1 PROCEDURE : NUMBER OF RECEIVE BUFFERS : 00 PHYSICAL LINE NUMBER : IBM CHARACTER HANDLING : MESSAGE PASSING TO DC:TASK : IBM-3270 PACKAGE : MMU BUFFER SIZE (WORDS) : RECEIVE BUFFER LENGTH : DC-TASK DATCOM FILE CO
0x0ac1d4…0ac368 Dummy {f00=0x0036, f01=0x0190, f02=»PHYSICAL LINE NUMBER : MMU BUFFER SIZE (WORDS) : NUMBER OF LINES : BSC PROCEDURE (ELSE SIEMENS MSV2) : EBCDIC CODE (IF NO ASCII) : EBCDIC TRANSPARANCY : BID TIME OUT VALUE : LOGG AREA LENGTH PER LINE : 00 PHYSICAL LINE NUMBER : 34 04 05
0x0ac368…0ac4fc Dummy {f00=0x0036, f01=0x0190, f02=»NES : POLL LIST LENGTH : MAX BLOCK LENGTH : INTERRUPT LOGGING : RETRY LIMIT : 00 PHYSICAL LINE NUMBER : 34 04 05 06 07 32 33 35 36 37 38 MMU BUFFER SIZE (WORDS) : NUMBER OF LINES : POLL LIST LENGTH : INTERRUPT LOGGING : RETR
0x0ac4fc…0ac690 Dummy {f00=0x0036, f01=0x0190, f02=»RECEIVE BUFFER LENGTH : DC-TASK DATCOM FILE CODE : PHYSICAL LINE NUMBER : MMU BUFFER SIZE (WORDS) : RECEIVE BUFFER LENGTH : DC-TASK DATCOM FILE CODE : PHYSICAL LINE NUMBER : MMU DEVICE BUFFER : RECEIVE BUFFER LENGTH : DC-TASK DATCOM FILE
0x0ac690…0ac824 Dummy {f00=0x0036, f01=0x0190, f02=»S. : 00 PHYSICAL LINE NUMBER : MMU BUFFER SIZE (WORDS) : RECEIVE BUFFER LENGTH : DC-TASK DATCOM FILE CODE : INTERRUPT LOGGING : NUMBER OF RECEIVE BUFFERS (2-4) : POLL TIME-OUT VALUE : 00 PHYSICAL LINE NUMBER : MMU BUFFER SIZE : LP ON
0x0ac824…0ac9b8 Dummy {f00=0x0036, f01=0x0190, f02=» TO TOSS FORMAT (DM & PAGING) : IBM LABELLED DISC HANDLING : ORDERS OPEN,CLOSE : MMU BUFFER SIZE (WORDS) : COMPLETION OF READ REQUEST AT POWER ON : CIRCULAR INPUT BUFFER SIZE : MMU BUFFER SIZE (BYTES) : MMU KEY TABLE SIZE : CR ON PROGRAMMED
0x0ac9b8…0acb4c Dummy {f00=0x0036, f01=0x0190, f02=»ATION (0-9) : LOWER CASE CHARACTERS : CHARACTER PITCH DOCUMENT (2-0) : JOURNAL STATION IN PRINTER : CHARACTER PITCH JOURNAL (2-0) : PARAMETER ORDERS : MMU BUFFER SIZE (BYTES) : MMU BUFFER SIZE (WORDS) : NATIONAL CHARACTER VARIATION (0-15) :
0x0acb4c…0acce0 Dummy {f00=0x0036, f01=0x0190, f02=» : NUMBER OF DISC UNITS : READ AFTER WRITE : LOGG FUNCTION FOR INPUT/OUTPUT CHRS : NUMBER OF LOCAL CHANNEL UNITS : 01 LOGG FUNCTION FOR INPUT/OUTPUT CHRS : NUMBER OF LOCAL CHANNEL UNITS : 01 A/ W &P +r & + A,R 8R P &
0x0acce0…0ace74 (0, 219) Dummy {f00=0x0037, f01=0x0190, f02=» @q P 1XW @q T 0 W$ 0 W @s @s @{ @x @s P 1X 0 _ : @,R 4 A4 a4 _t 4R>" :Q [N A, W$ [N A, P , Z6T 5W _B : - R R P @D 5 P @D U P @D U @, D P P P
0x0ace74…0ad008 Dummy {f00=0x0037, f01=0x0190, f02=» P : 4 0Q 0 A) : : _ > @, D / / 1 7 3, @ 7 T # R dR W ! 0| 0~ 0|P( R D D _ 00 D ^ 0| @D :HV. !YYT 1;BV 8W !NNT 0;BV : A2 _ PD !00Z !99Y @
0x0ad008…0ad19c Dummy {f00=0x0037, f01=0x0190, f02=» dR _ _ @, D ! _ 4R [N A/ P T A4. A4- / A4,W@ 4 !SSPZ P T # R dR W ! P P A4, T A4. 4 W A4 3 W A4 4 A4 A4 A4( _ P A/ 4@ E : ! P@ .l @D !SSP& .l !NN .l @,
0x0ad19c…0ad330 Dummy {f00=0x0037, f01=0x0190, f02=» _f TL PH QB A0 A0 A0 D D ( - 0 D R - _ .@ .l @q P 5Z # @s P 5~ # @{ P 5 # @x P 5 # @s P 5 # @s P 6 # P 8 : 64 0 < : A : 3 @` P @
0x0ad330…0ad4c4 Dummy {f00=0x0037, f01=0x0190, f02=» 0 : A2 A2 A2 D ,,P <H .l .l 2 .l A2 @2 P @2 A2 .l X 17P 81P 82T @2 .lW @2 _ @2 _ <C 3L X Q 0 a2 @, A2 X 17T @2 A2 W 9B A2 @2 T A2 _ , @3L 5_ 9
0x0ad4c4…0ad658 Dummy {f00=0x0037, f01=0x0190, f02=»19 062021 072223 322627 332829 353233 363637 373839 384243 394647 EBCDIC LED EBCDIC!!DL 34,65!!DL 75,91!!CH $$EQU X:B$$EQU 0$$ !!CH $$ X:A$$ $$ !!CH $$ X:A$$ $$!!CH $$ X:A$$ $$ LED DVTKB : !!CH $$/2122,/2426,/3B3C,/3E40,/5E5F$$/ ,/
0x0ad658…0ad7ec Dummy {f00=0x0037, f01=0x0190, f02=» 0 : A A A ,,P <H .l .l .l A @ P @ A .l X 17P 81P 82!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ !!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ !!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!CH $$ASSOLY EQU 0$$ASSOLY EQU 1$
0x0ad7ec…0ad980 Dummy {f00=0x0037, f01=0x0190, f02=» T 6 : 6 @ KEP A A4 A4 A4( / 0 :DRKB03 LED DRKB03 @ PT 7 4 @(J SP CIT Q 0W @(J A B ( 7F ( 7R 8 :LED DVTOD @` T 7 :DRIC0X @ SP ECP 1P AE :DC : 7| : ( SP MMT
0x0ad980…0adb14 (0, 220) Dummy {f00=0x0037, f01=0x0190, f02=»R U Q P <H9D_( : : 9 5W : 9 @7 A, A, @7 A, : : 9 , ;v v Z P2 ; ; @y P B A; ; 8 @7 A, A, @7 A, @q P" TA A:& @s @s P TM A:P A:V A: T A: @x P TL
0x0adb14…0adca8 Dummy {f00=0x0037, f01=0x0190, f02=»x @yzP TO A:D : :l B : : Z 8 A: A:8 ;X A A4 0 @:2P 1 A4 3 8 A : : 7 0W @(J ( ( L K M - P R O C E S S O R S IMER TPROC MLKM DSEGTABORT MONTIM NTIM SSFM SSFM
0x0adca8…0ade3c Dummy {f00=0x0037, f01=0x0190, f02=»9050051 LED LKMAL P <H9D_(DELAY/DELAY AND ACTIVATION : ABORT FUNCTION : GET/SET TIME : LED LRPINT ; tl :LED TABORTATTACH/DETACH : LED TOSSIO!!CH $$ X:A$$ 1$$ @: A; @: A; @: A; @: A; @:&
0x0ade3c…0adfd0 Dummy {f00=0x0037, f01=0x0190, f02=»P A`V @`ZP A`Z M P E Id 7W DH E Id IX v Z PP 01 7 > `P E A> =vT _@ 7 @Ib Id AIb @62R ML C _h @LnPV AWp @IbP Id ALr ALn Lp E AIY 01 AIZ M T Dh
0x0adfd0…0ae164 Dummy {f00=0x0037, f01=0x0190, f02=» A> (R> [N A> P" (P W T N 7 W > _D W W X B C , D _ L 4P 1 A> @Ib 7 Id 01 7 @L , 7 4 W V T1P G1P TPT, 1 0P 1T W A> / A> @> W A> AIb
0x0ae164…0ae2f8 Dummy {f00=0x0037, f01=0x0190, f02=» D DE = 01 W L @D > R *Pr_ 7 A P^ "T @ . 1T V SIT TF P, LD !,,T2 U, LD LD 9H # A _4 # AL : ?0 @D 7 A : V @D P KB L V MTT 0P C @ I 7 P& @D !,,
0x0ae2f8…0ae48c Dummy {f00=0x0037, f01=0x0190, f02=»P ?0 @D W @D $ @IbP E@ @D _D T :h" P 0R U Q P <H9D_( : ?0 M ?0 ? ?0 @D A 9H @D A A A ?0 V KBT$ bqP brP b6T L @62
0x0ae48c…0ae620 Dummy {f00=0x0037, f01=0x0190, f02=»D !NNP !YY ?0 W : M ?0 V W ?0 Bl ?0 B W : D 0 0R Q ; W : # +0 !99U :d" *0 !99U :H : T TP M T1 NH G1 NH D4 Nn D5 Nn MD N CD N TWP DUP FDT MVW MVW 7 V
0x0ae620…0ae7b4 (0, 221) Dummy {f00=0x0037, f01=0x0190, f02=» 8 : AC4 f Ae$ : @IZ aWp !99R ?0W AIZ : 1R Q : ?0 L "P. @ P , 7 B W AL : T SIT* @ . 1T" 7 @L P @L W 02 W AL : DEFINE TERMINAL DEVICE CLASSES DEFINE ECHO DEVICE CLASSES
0x0ae7b4…0ae948 Dummy {f00=0x0037, f01=0x0190, f02=»JxJ KN J<J<K K FILE CODE : DEVICE ADDRESS : PTS NUMBER : BACKSPACE KEY : CANCEL KEY : END OF RECORD KEY : MULTIPLE ZERO KEY : ECHO DEVICE : KEYBOARD TIME-OUT : CODE CONVERSION : ?<? APA@A@A@A@@R B B LB6BFT1
0x0ae948…0aeadc Dummy {f00=0x0037, f01=0x0190, f02=»
[…0x1…]
0x0aec70…0aee04 Dummy {f00=0x0037, f01=0x0190, f02=» b2c1e1b3b1cBb4b6bqbr bAbBb2c1b3b4b6bqbr cBcQcRcDc c cF 20203000003010909090 000010100010101010 10101000202000 FILE CODE : DEVICE ADDRESS :
0x0aee04…0aef98 Dummy {f00=0x0037, f01=0x0190, f02=»MBER : NUMBER OF LINES : NUMBER OF CHARACTERS/LINE : KEYBOARD FILE CODE : PIN CHARACTER : DISPLAY FILE CODE : FILE CODE JOURNAL : DEVICE ADRESS : FILE CODE DOCUMENT :
0x0aef98…0af12c Dummy {f00=0x0037, f01=0x0190, f02=» LEVEL: ********* : LED DRTW01!!CH $$ X:F$$ / $$ b2c1e1b3b1cBb4b6bqbr bAbBb2c1b3b4b6bqbr cBcQcRcDc c cF M W M( Et $ ! P ) _ :END OF RECORD KEY : TRIPLE ZERO KEY : AE b6 : CO AE : 7 V W V W
0x0af12c…0af2c0 Dummy {f00=0x0037, f01=0x0190, f02=» P W @D AD 0 AD @D : : @q C 7 W V W 0 W V W 2 W V W V W 1 W C 7 V W 0 W V W 1 W C 7 V W V W W : V W : A @z P V AS Id Sd 4 8R @ObV @LpP O Rx O X *0 T1P@
0x0af2c0…0af454 (0, 222) Dummy {f00=0x0037, f01=0x0190, f02=» AV _ / P Q$ AOb T _ ` AO AOb b Ud_ : 8R F_ P _ : AR AR AR Id9a R _ :H 00 00 AR AS R : A16 0 R : X P Id D@ 00 AS X Wf X NT2 @V 90R R V U U
0x0af454…0af5e8 Dummy {f00=0x0037, f01=0x0190, f02=»10T V W X AV X AV V X X W 1 AS$ !99U W 1 AS$ 40 Q W 1 AS$ Q 8 DIT : @V AV P AS& 1 AS$ X 90R V X 90R X Q X AS6 X AS8 S* X ASX X ASZ SL Q O T !99U AS#:h AS% @z P
0x0af5e8…0af77c Dummy {f00=0x0037, f01=0x0190, f02=» U 10 AV _Z @ 0Tf P P " 9U AVb VR P P8 ! " R _ EV P AVL AV} AV~ V8 Vf A :LED DVT Q2Q$Q$Q P P QBQ P Q P Q !!CH $$DVT $$DV $$!!CH $$ECH$$DW $$!!CH $$/1111$$/ 000$$ !!CH $$BCA$$ $$
0x0af77c…0af910 Dummy {f00=0x0037, f01=0x0190, f02=»
0x0af910…0afaa4 Dummy {f00=0x0037, f01=0x0190, f02=» !!DL 07 !!DL 29 DATA 1 !!CH $$2010$$0000$$ !!CH $$DATA /3F4F,/5F6F$$ $$
0x0afaa4…0afc38 Dummy {f00=0x0037, f01=0x0190, f02=»B0 !!CH $$KBAD$$KBAD3$$!!CH $$0 CODE $$CTAB00 CODE $$ Id9a R _ :H 00 AV : 32 @ P" @ P W AWx 16 @ 4P X$ AWzW @ *P @ P W AWx : W~ : T E SWr0000000000 * W
0x0afc38…0afdcc Dummy {f00=0x0037, f01=0x0190, f02=»00 : 4T : 3T 12 : 2T 08 : 1T 04 : 00 : _ a v Z P [ [N 0R _ _ W AY AY > X, D ( H <H% [h V2 ` A[l A[v [h _ A[l A[v _ A[l A[v Zn Y`rW E`P H !,,P
0x0afdcc…0aff60 Dummy {f00=0x0037, f01=0x0190, f02=»s P" @` T @a @y P FD A` W DU A`| 1 A_ Y @a(P @` P Z0 @x Aa @` P$ 2 A_ Z0 @x A 4 Aq Aq Aq Aq @a Ph A . Aq Aq Aq Aq WP _ : Av| u @x Ax Ax A . 01 Ax Av| DW Ax x 8 : @`PP a* a `P ` $R T )
0x0aff60…0b00f4 (0, 223) Dummy {f00=0x0038, f01=0x0190, f02=» ` tl NU A ^ @a Q 00 A ^ A z A @y P 01 A ( : 09HR _ _ : F_ P F_ ^ : Z _ KB KEYBOARD TP TELLER TERMINAL PRINTER GP GENERAL PRINTER DN NUMERIC DISPLAY DI INDICATOR DISPLAY/KEYBOARD LAMPS DY VI
0x0b00f4…0b0288 Dummy {f00=0x0038, f01=0x0190, f02=»OPTICAL DOCUMENT READER T1 TELLER TERMINAL PRINTER (TP71) G1 GENERAL PRINTER AS LOCAL TERMINALS (PTS 8000) SL LOCAL AND REMOTE TERMINALS (PTS 8000) TC TAPE CASSETTE SI SOP INPUT SO SOP OUTPUT MT MAGNETIC TAPE UNIT TW
0x0b0288…0b041c Dummy {f00=0x0038, f01=0x0190, f02=»DGE DISC (80MB) CR CARD READER II INTERTASK COMMUNICATION INPUT IO INTERTASK COMMUNICATION OUTPUT D1 DATA COM DRIVER DRDC07 D2 DATA COM DRIVER DRDC15 D3 DATA COM DRIVER DRDC17 D4 DATA COM DRIVER DRDC81 D5 DATA C
0x0b041c…0b05b0 Dummy {f00=0x0038, f01=0x0190, f02=»RIVER DRDC22 D9 DATA COM DRIVER DRDC13 DEVICE ABBREVIATIONS DEFINE DEVICES : DC-DRIVER1 NAME,USERID : KBTPGPDNDIDYLTRT MSODT1G1ASSL TCSISOMTTWDULPFDMDCDDMCRIIIOD1D2D3D4D5D6D7D8D9
0x0b05b0…0b0744 Dummy {f00=0x0038, f01=0x0190, f02=»VTDY DVTMS DVTOD DVTT1 DVTG1 aX v Z T Aa W az v Z P Aa W Aa :KEYBOARD 6236/71/72 IN SYSTEM : ONLY KEYBOARD 6236/71/72 : @a @y P 01 A A! A" A&8 A& : ` $ ` P DC Aa( : DEVICE LIST (Y/N) :
0x0b0744…0b08d8 Dummy {f00=0x0038, f01=0x0190, f02=» b b < 7 :
0x0b08d8…0b0a6c Dummy {f00=0x0038, f01=0x0190, f02=»
0x0b0a6c…0b0c00 Dummy {f00=0x0038, f01=0x0190, f02=»ECIAL DEVICE-CLASSES FILE CODE FIXED DISC : UNIT NUMBER : FILE CODE CARTRIDGE DISC : FILE CODE : UNIT NUMBER : FILE CODE : INPUT FILE CODE : OUTPUT FILE CODE :
0x0b0c00…0b0d94 (0, 224) Dummy {f00=0x0038, f01=0x0190, f02=» FILE CODE LEFT DISC : DISC UNIT NUMBER : FILE CODE RIGHT DISC : FILE CODE : LINE NUMBER : INPUT FILE CODE : LINE NUMBER : OUTPUT FILE CODE : FILE CODE :
0x0b0d94…0b0f28 Dummy {f00=0x0038, f01=0x0190, f02=» Ahh A` @x P DM A` : L`r P T _ : @ . Al @ 4 Al @z T DW Am^ l @a(P @mH 4 k l md 8Rt X Am` KBT @l T Al CGT @l TL Al G1T @q T< Aq TPT @l T, Al T1T @l T Al UdT m T mL _x X P" mb
0x0b0f28…0b10bc Dummy {f00=0x0038, f01=0x0190, f02=» @s T W l mr l mj @mH 00 Al Am Am m @mH @l k / Am@ 0 T T1P* G1P$ MDP CDP DUP FDP TPP MTT T CGT @l TH Al 0 AmA AmB T nd DV Am@ T AmB @mJ AmD @mH UdT m m. 4^ m Al T T$ @l PT @a(
0x0b10bc…0b1250 Dummy {f00=0x0038, f01=0x0190, f02=»T AmH mJ mr mb mr 00 Al Am Am Am T P AmJ Amb h S Al W Ajs Am_ Ud Al @x @s @s @yz @ Xl $ p l md o l 00 Al Am Am Am l mj m pP m 8 Ud_ :
0x0b1250…0b13e4 Dummy {f00=0x0038, f01=0x0190, f02=» 0715178182 2213 ASM DC:TABLED TCLASS!!IL 11 DATA TC00TC00 DATA TC00E-* TC00E EQU * DATA +1Sd00 EXTRN DV 00!!IL 6!!IL 12 $ !99R % : LPPl MTPf MDP` CDPZ DMPT FDPN DUT PF 02WD D1
0x0b13e4…0b1578 Dummy {f00=0x0038, f01=0x0190, f02=» CDP FDP MTP DUT W X ! P Hl T Il W : AmC AmD m. : 00 Amb @` P n @` P n @` P n @` P n @` P n @` P n @ P q o : 07W 15W @ .W @ 4W 22W 13W Am` mL : @` P o @` P o @` P o @` P o
0x0b1578…0b170c Dummy {f00=0x0038, f01=0x0190, f02=» .W @%B @ 4W Al /0 Am@ AmB nd DW Am@ @l AmB 00 AmD m. : @x @s @s @yzP@ @` Am`P pJ @` Am`P pJ @`| Am`P @ 0P pJ @` Am`P pJ : Amb mL : 01_ @x @s @s @yz @ q @` P> 01 q MD Aq Aq 0 F4 q 1 F5 q 2 F6 q 3 F7
0x0b170c…0b18a0 Dummy {f00=0x0038, f01=0x0190, f02=»q 3 F3 q 01 q 0 F0 q 1 F1 q @` q 01 q FD Aq Aq 0 F8 q 1 F9 q 2 FA q 3 FB q : AmB /0 Am@ nd q : q : DATA DWDU01 Aq Aq : EXTRN DWREMU DATA /015 DATA DWREMU : : P A 4 v : : :w8 w
0x0b18a0…0b1a34 (0, 225) Dummy {f00=0x0038, f01=0x0190, f02=» Iy Iy AwJ Av Az wL A { > X @D 82P UKP 68 0 @D H{ Z< P _ H{ Aa A{ W. A{ Ay W A{ Ay W A{ zh v Z P As M Ay# | v Z P As y| Ax P AS Aw A Ay# { v Z As x v Z P$ Ay @s T x W x
0x0b1a34…0b1bc8 Dummy {f00=0x0038, f01=0x0190, f02=» @x P W A { |Z { { @yzP { @x P A B A{ { 0 v tl WX @s @{ @s @x @q @s P0 t 4R(P 9 T Y T Y t 0 _0 :LED Aw Dv P @w _ A y w y B {" @` P {d
0x0b1bc8…0b1d5c Dummy {f00=0x0038, f01=0x0190, f02=» y @y P y y$ y [N d @r A xp ( x| v Z P W^ > x Pv D ( 1 PH !,, D T$ DW @D T Ax DC @D T Ax @D Ax / 1 S Q Q _T x AZt x 8 W^_ :XV
0x0b1d5c…0b1ef0 Dummy {f00=0x0038, f01=0x0190, f02=»OC MSUBSTTMJOB OINT TASKTOSSIOSYSLDMSYSLDALDTASKDRSW01ST8000 PFTAB LKMAL CTABX TCLASSSCLASSMONTAB @ @s @ @q @s P 4R P 9 T Y T Y 0 _0 :LED A D P DC:TABIN:LT1IN:LT2IN:LT3IN:LT4IN:RT1IN:RT2IN:RT3IN:RT4 S Y S
0x0b1ef0…0b2084 Dummy {f00=0x0038, f01=0x0190, f02=»SYSGEN ENDEDEXTRA MONITOR MODULES : MOV LED DWDC00 DEBUGGER : INC DEBUG,TOSSWORK INC DEBUGM,TOSSWORK KPF /O INC SYSTABINC DEBUG LKE M ASG /02,LP0FSCR CREDIT APPLICATION : DATA MANAGEMENT : FILE MANAGEMENT :
0x0b2084…0b2218 Dummy {f00=0x0038, f01=0x0190, f02=»025026027028029030031032033034035036041042043044045046047048049 052053054055056057058059060061062063064065066067057058059060061 MEMORY MANAGEMENT UNIT : !!DL 20 !!DL 51 @a P P P W W A XW @z P z W @a(X : {| z z : {
0x0b2218…0b23ac Dummy {f00=0x0038, f01=0x0190, f02=»BXX EXTRN ITAD DATA ITAD !!IL 50 LED DSKSUB!!CH $$ X:A$$ 1$$ DSKSUB ****!!IL 19 { :TIODMX 050113101200s s$s s>s>s COMPUTER TYPE : SWAPPABLE WORK BLOCK HANDLING : DISC PAGING : L|0 :0102030405060708091011121314151617181920 @s @{ @s @
0x0b23ac…0b2540 Dummy {f00=0x0038, f01=0x0190, f02=» ~ | ~ , @ AD A A~ ~, @~ AD @~ AD ^ ;a B A~ ~, 0 A , } : A} A ,Wn @`|P A A @ 1T A @` A @` A @` P A A @* 1T A B @
0x0b2540…0b26d4 (0, 226) Dummy {f00=0x0038, f01=0x0190, f02=» @ r! B A~ ~, 0 A tl : : L~ R _ L~ ,0 ) $ ) I : :d B 9C :' d !!CH $$ X:A$$ $$ MAX BLOCK SIZE IN BYTES : MAX NUMBER OF DISC BLOCK BUFFERS : MAX NUMBER OF CURRENCY BUFFERS : MAX NUMBER
0x0b26d4…0b2868 Dummy {f00=0x0038, f01=0x0190, f02=» : LED DMBUF LED DFTAB !!CH $$F0F1,/F2F3$$F0F1$$ !!DL 22 DATA MANAGEMENT PARAMETERS LED DMFDB LED DMTASK!!DL 20 @ r! T A j @ * AD @ , AD B A~ ~, @ AD @ AD C A~ ~, D A~ @~ 9A ~, A A~ : : @ r! B A~ ~, @
0x0b2868…0b29fc Dummy {f00=0x0038, f01=0x0190, f02=» 00 A A A A : : A A @ r 1R @ ~ @ " 9a A~ @ @ : D 0 0R Q ; W : TIODMDMTASKDMINITDMOPCL DMBUF DMFDB DFTABDMSUBXADDMODDSUMODMPYMODDIVMODDMSUBR @yzP &
0x0b29fc…0b2b90 Dummy {f00=0x0038, f01=0x0190, f02=»ILE MANAGEMENT PARAMETERS NUMBER OF FILES FOR ALL TASKS : NUMBER OF FILES/TASK : LED DMOPCLLED FMTASKFMTASK DFTAB @`|P @ 1P @` P @` P @` P @* 1P ' M V M P
0x0b2b90…0b2d24 Dummy {f00=0x0038, f01=0x0190, f02=»01010101000000000101010102020202 DATA /0000,/0000,/0000,/0000,/0000,/0000,/0000,/0000,/0000 /0000 DATA /0000,/0000,/0000,/0000,/0000,/0000,/0000,/0000,/0000,/0000 !!IL 29 !!IL 30 022023024025026027 | @D ?0 !NNPF !YY
0x0b2d24…0b2eb8 Dummy {f00=0x0038, f01=0x0190, f02=» A : !::T <h !00R !77Q @ T( A @IZ A @ I A A : HD !,,T T> W& !00R4 !FFQ. !99U !AAR" P E B J : @ P A | ?0 @ I :LED CTABX 8-BIT SETTING : !!CH $$X$$
0x0b2eb8…0b304c Dummy {f00=0x0038, f01=0x0190, f02=»010101010000 : @x P` v Z Y ( v Z Y V 2 " : @x P :PARTITION LENGTH IN BYTES ( HEXA ) : NUMBER OF PARTITIONS : !!CH $$ X:A$$ / $$ !!CH $$ X:B$$ $$ D 0 !00R !FFQ !99U !AAR -
0x0b304c…0b31e0 Dummy {f00=0x0038, f01=0x0000, f02=»
0x0b31e0…0b3374 (0, 227) Opaque[0x194]
0x0b3374…0b3508 # DirEnt {nam=»SUP60M«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0720, f03=0x0000}
0x0b3374…0b3508 IdxSect {
0x0b3374…0b3508 f00 = 0x0039 // 0xb3374 @0x0
0x0b3374…0b3508 f01 = 0x0010 // 0xb3376 @0x2
0x0b3374…0b3508 gno = [ // 0xb3378 @0x4
0x0b3374…0b3508 [0x00]: C0x0039.0x0.0
0x0b3374…0b3508 [0x01]: C0x0039.0x1.0
0x0b3374…0b3508 [0x02]: C0x0039.0x2.0
0x0b3374…0b3508 [0x03]: C0x0039.0x3.0
0x0b3374…0b3508 [0x04]: C0x003a.0x0.0
0x0b3374…0b3508 [0x05]: C0x003a.0x1.0
0x0b3374…0b3508 [0x06]: C0x003a.0x2.0
0x0b3374…0b3508 [0x07]: C0x003a.0x3.0
0x0b3374…0b3508 ]
0x0b3374…0b3508 }
0x0b3508…0b369c Dummy {f00=0x0039, f01=0x0190, f02=»T >Zt R : Z | D )v _ H&2& ' ' ' )
0x0b369c…0b3830 Dummy {f00=0x0039, f01=0x0190, f02=»
0x0b3830…0b39c4 Dummy {f00=0x0039, f01=0x0190, f02=» T $ r > 22V4" C6 !&" ? > 2V BTRY= AS>(AB? & TY J) V jLP + r DK J DK 8 J
0x0b39c4…0b3b58 Dummy {f00=0x0039, f01=0x0190, f02=» r * ? ? ? ? ? ? ? , Z f Z f D Z f
0x0b3b58…0b3cec Dummy {f00=0x0039, f01=0x0190, f02=» ? ? ? ? ? ? ? Qj ? ? ? ? ? ? ? Qj ? ? ? ? ? ? ? ^ Qj ? ? ? ? ? ? ? Qj V t r r r r 0
0x0b3cec…0b3e80 Dummy {f00=0x0039, f01=0x0190, f02=» 6 6 6 6 6
0x0b3e80…0b4014 (0, 228) Dummy {f00=0x0039, f01=0x0190, f02=» 6 6 6 h
0x0b4014…0b41a8 Dummy {f00=0x0039, f01=0x0190, f02=»
[…0x4…]
0x0b47f8…0b498c Dummy {f00=0x0039, f01=0x0190, f02=» ~
0x0b498c…0b4b20 Dummy {f00=0x0039, f01=0x0190, f02=»
[…0x1…]
0x0b4cb4…0b4e48 Dummy {f00=0x0039, f01=0x0190, f02=» X
0x0b4e48…0b4fdc Dummy {f00=0x0039, f01=0x0190, f02=»
[…0x3…]
0x0b5498…0b562c Dummy {f00=0x0039, f01=0x0190, f02=» @
0x0b562c…0b57c0 Dummy {f00=0x0039, f01=0x0190, f02=» _ ? ? ? ? ? ? ? A R2 @ A A R$ A A R A A R A @ > > > > > > > > ? ? ? ? ? ? ? U ^ ( H ( P ? _ Q 4&? ?R _ 5 H _ ^ ;j >P @ * Q 9A D *P _ P A
0x0b57c0…0b5954 (0, 230) Dummy {f00=0x0039, f01=0x0190, f02=» E > > a @ E @ ? ? > P P Q P ! P @ @ @ P W $ < A @ 9a:a R0 & Q Q" ?A <P @ ! " _ $ _ _ 0 ! A T @ W @ R (P& P
0x0b5954…0b5ae8 Dummy {f00=0x0039, f01=0x0190, f02=» E $ @ ;a=a R @ =a V ;A , P = - - _F @! L ? 0 A @ PR 0=a @ ?a RX @ ?a VN=A 0 ( P>P< , T T 1W 1W T )W )W ( , _ C $ _ 5 H A" A" A" A" A" A" A# A" " # D
0x0b5ae8…0b5c7c Dummy {f00=0x0039, f01=0x0190, f02=» @" _ A" A" A" A" A" A" B A# A" B :a Y B R A" _ @" # W4 @" A" ,Xp _ < @ A# A# A# A# A# A# A# # =a @ >a V _ @ >a Y A# A# 4 T # ( "^ 5 U P" @
0x0b5c7c…0b5e10 Dummy {f00=0x0039, f01=0x0190, f02=» A A ^ 9j =Q > > > > > > > > P @ !@ &" @ P @ X0 , &" A _< U` A% @ , L ? ? , L L L L L L ? ? ? ? ? ? ? @ Px @ > > > > > > > ; [ [ [ [ [ [
0x0b5e10…0b5fa4 Dummy {f00=0x0039, f01=0x0190, f02=»_ T PT PJV P>V SH? V :!9 V @ P R W ;A [ [ : _4 Pj T Pf V Q UF V Ud Q4P P 9A?A:AV R Z _ P*R R P ;A [ [
0x0b5fa4…0b6138 Dummy {f00=0x0039, f01=0x0190, f02=» Q S W S Q R S P W S _ R _ ;A [ [ : # P| ' PL (T ; R <a V 9A:A ; V ; V V W V < V < V H T P R ;H [ [ : _ T P ; R4 < S ( _ _ W < R $ <A
0x0b6138…0b62cc Dummy {f00=0x0039, f01=0x0190, f02=»; RJ P 0 9 T ^ T V T Z U x : R Q ;H [ [ : _J ? ? ? ? ? ? ? Q _ ^ ( H F ) W *x W * X I I R P8 X C P C$T Y Y W x Y Y $ 0T W W /X X ? ? ? ? ? ? ? **
0x0b62cc…0b6460 Dummy {f00=0x0039, f01=0x0190, f02=» 0 ? ? ? ? ? ? ? * 0 ? ? ? ? ? ? ? * 0 (@_~ . X R Y _ X D $! TR ? ? ? ? ? ? ? + 1 8 M ? ? ? ? ? ? ? +8 0 % > > > > > > > > ? ? ? ? ? ? ? +d 1 P X 0 0 +| - 8 TRT X . - $ <A
0x0b6460…0b65f4 (0, 231) Dummy {f00=0x003a, f01=0x0190, f02=» 0 X C P C$T" Y 0 Y Y X Q Y _ X X X U 5 X E _ X 4 Y 5 X 4 Y ! 1P, 0P +P Q Q W W Q Q R P Q 5 Y + ? ? ? ? ? ? ? , 1 Qv , - " PF X Q< X P P ? ? ? ? ? ?
0x0b65f4…0b6788 Dummy {f00=0x003a, f01=0x0190, f02=» ? ? - 0 Y Y X X T ? ? ? ? ? ? ? - 0 > > > > > > > > ? @ ? > X B A- B (@ $ X X W W $ # C C P L L m A , DKP L X X L ! X L P L @ _ C C # $ _R _
0x0b6788…0b691c Dummy {f00=0x003a, f01=0x0190, f02=» % Y X R X . ! X Y T T Y Y Y Y Y U U X @ _ X X X X P/x/ / 0*/ P $ Y Y Y Y > - Y 8 TPP" X R 8 TYX WH H/ Y _8 X X: X R X ( _$ _* $ XtRX P Y _
0x0b691c…0b6ab0 Dummy {f00=0x003a, f01=0x0190, f02=» Y Z(P A0 ZrP Y _8 _< _@ ! - X M A0 T Rf - X X B A0 P X $ /X_" B W B W A W I W J X %?W X %? A1. A12 > > > > > > > 10 V <a W X ' ?A q A1 > > > > >
0x0b6ab0…0b6c44 Dummy {f00=0x003a, f01=0x0190, f02=» L % T< L P4 M ^ L X 4 _ ? ? ? ? ? ? ? L W L R % _R ^ 1 A M " L '? L U "T 9 WP T 9 WF T 9 2 3X2 2 3X3X2 2 2 2 3X2 2 5n W* 6 W" 5n W 8 L :AR| M W M M 4
0x0b6c44…0b6dd8 Dummy {f00=0x003a, f01=0x0190, f02=»: L P L 9JR@ P P T : 5 U P T Q P P W Q P T@(@ L D " Q L Q Q L Q L ( L ! TNW P T P P W Q L ' 0 P p Y "(@ P P $ M 3j P ( M P Q P P P W P
0x0b6dd8…0b6f6c Dummy {f00=0x003a, f01=0x0190, f02=» % ] M (@ L 2 :x T 2R Q @ 2] : > 9C 9C > ^ U 2(@ L T U U U M L M L M M L 4 3j L :x ! :c:A :x L T V P T"W L >F :x L & :x 5n M 4 4 M L M L " P M 5 3j M
0x0b6f6c…0b7100 Dummy {f00=0x003a, f01=0x0190, f02=»! P L ! XfWn L M L M M 6 3j L :c:A L D V D M L ! T*_ L < :x< R M M "W 6 M 4 4 L E M L "! :x L 2 L T L P L D Q 7 M 2 5 L L $:BV W $:AV M " M :b L L $ M 0 D L
0x0b7100…0b7294 (0, 232) Dummy {f00=0x003a, f01=0x0190, f02=» (U L ( L L R $ 9 _ R $ 9 M , L M M M M M ( M ( M 0 M 0 L D L Z L L *R L * L P( ' P 5 R 5 _ T 5 M , M L L , U : L :x L U 8 M 2 5 L M $ L M & L L I P0% P L
0x0b7294…0b7428 Dummy {f00=0x003a, f01=0x0190, f02=»_ M M L . P M . 9 M 2 5 L U 9 M 2 5 L L L & ) L $ I L M L L U M : @ M L M M M W L :x @ M M ( L P0W" M L :x @ M ( L U :& M 2 5 L L ( E L % E L E L E
0x0b7428…0b75bc Dummy {f00=0x003a, f01=0x0190, f02=» U L ( L L ? ? ? ? ? ? ? A A @ 4 R W 7 A Q ; ; ; ; ; @ : 5 ; ( "^ ; ( "^ 5 < $ @< b 4T W b b H bP H d _ A; ; A@ 5 T6 @@ P @ ; ; ; ; ; @@ A@ A; $ 5 4 X
0x0b75bc…0b7750 Dummy {f00=0x003a, f01=0x0190, f02=»_ M M L . P M . 9 M 2 T < 0P < Y _ 1 X 1 < < W8 < < X W* 8 A< T A= = (@( - - : 0 :R - Y PU,DNXX,STAT,RY < U 5 Af ? ; < 1P < Y _ @< RDP A
0x0b7750…0b78e4 Dummy {f00=0x003a, f01=0x0190, f02=» 0!? LT W 1 Q TKP MTT Y P ; Y (@ ; P Q 1 ; . X X ? ? ? ? ? ? ? >& 14_ 5 Af ; @ Q P P T Z ; W P ; $>H $ NOT W0 Af @ p ! $ rT tP Y ; C r C R
0x0b78e4…0b7a78 Dummy {f00=0x003a, f01=0x0190, f02=»@ P$ @? = ^ ] ] @? _ A@ $ ? > A _ = A 0 9U A> > T > ( "^ ? = A @ A @ !? A @ _* 5 @@ ; @ A ; 0 A A@ A@ @ ( "^ @ A $ < )v A ~(@ A
0x0b7a78…0b7c0c Dummy {f00=0x003a, f01=0x0190, f02=» Y Y Y P ABR ( Qh Q P( @ @ @ @ Y Y Y Y " A "; V W # @ A A@ @ ? ? > Q @ ? ? ? ? ? ? ? AX ? P6 $ R, Z R R Q $ :D P $ R ^& : ; R
0x0b7c0c…0b7da0 Dummy {f00=0x003a, f01=0x0190, f02=» @A @A @A @A @A @A A ? ? ? ? ? ? ? A $ < A B @ 9a:a R @ @BR @ ! #J ! C "! PX @ Q P VF_ P RN;AR P P4 0 P P C C C LPT P P C # $ C _: DL P H C _ P X( DD _Z :E
0x0b7da0…0b7f34 (0, 233) Dummy {f00=0x003a, f01=0x0190, f02=» D I I "R (@(@ ^ :j >Z ^ @ P _ A M (@ M M M B B M M # C C @ _ "ZN(@(@ ^ :j >Z _ m (@ M M 8 DKT X X T X M W M W y Y Y Y # C
0x0b7f34…0b80c8 Dummy {f00=0x003a, f01=0x0190, f02=» /P :P ;P <P =P >P ?P 1 C* 8 C*Wv EJW C$W EVW C W W ElW Wx 8 MTPp DYPj X T Y $ WZ E WX $ # T $ T Y B W0 %@ R b " Y Y Y Y Y $ X _0 8 TCX< TKXB MTXH DYXN ^
0x0b80c8…0b825c Dummy {f00=0x003a, f01=0x0190, f02=»% XT <A P X^<a P @ p @ $ XP $^ ? AI AI AI AI AI AI AI I > > > > > > > aI @I E E E E E E I > > aI @I E @I @I @I @I @I @I @I I Q (@ T W@ &_T@ H P
0x0b825c…0b83f0 Dummy {f00=0x003a, f01=0x0190, f02=»W. X P X ` `T 8 P X 8 T T ^ T "<A U U ^ T x U Z T X T Z ? ? U X: V: T T ^ T ` T b T f T h j l n p r t v T d >" HI AI T T ^ T ` T b T f T h j l n p r t v T d AI > ?f' _ 8
0x0b83f0…0b8584 Dummy {f00=0x003a, f01=0x0190, f02=»% XT <A P X^<a P @ p @ $ XP $^ ? A A A A A A A > > > > > > > a @ E E E E E E > > a @ E @ @ @ @ @ @ @ Q (@ T W &_T H P
0x0b8584…0b8718 Dummy {f00=0x003a, f01=0x0190, f02=» L LR X P P P P . B . @J P M L 0 AJ I0 !K B !L X X ! P L y !LtW !L L x P !L0 M Q W ! P M L ZZ LR B Y K AJ 1 - B :e L P !L0 M Q !Lf B !L !L L x P2 x X$ M L
0x0b8718…0b88ac Dummy {f00=0x003a, f01=0x0190, f02=»T" K L :C* WL WH:a L ! 9A r X L :B* W":a L ! 9A r X L :B L !? B M AI2 L 0 I0 M Y B AI$ I4 Y X P P P P P P8 K !Q AI B T B @I4 ) @I6 I @I8 I K 4 B AI ! T h AI" M !
0x0b88ac…0b8a40 Dummy {f00=0x003a, f01=0x0190, f02=» T$ B S @I T !Q @Id AI ! P W K B <b :b ^ AI AI AI R>P AI AI !O| AI"W& !O| AI"R !O| W !O| AI"P AI"V !O| !O| _ P& AI"R Ql !O| Wb !O| !O| WP !O| !O| W> B <e
0x0b8a40…0b8bd4 (0, 234) Dummy {f00=0x003a, f01=0x0190, f02=» @I ! P W Y AI" & B Y K @I :e L Pv !L0 M Q !Lf !Q, @I ! P L PP !L " T" L @I4P<W !L " T L @J P$ M L Q !Lp_Z M Q K T X $ P@ D R: P @I ! P !P T D $ !QT @I ! T L AJ !P W !P T D R@
0x0b8bd4…0b8d68 Dummy {f00=0x003a, f01=0x0190, f02=» M L Z2 K 4 !Q" @I ! P !L " T W( !L " P M L 6 K @J L 4 @I L " P $ M 4 @I$ I4 ( = Y 4 @I$ I4 < ) Y 4 X ! J $ <b! L !? P L ! _ @I2 L T !L0 L 9AV$ !L0 M Q A @ M
0x0b8d68…0b8efc Dummy {f00=0x003a, f01=0x0190, f02=» !LtW !Lt" P M L ZJ K 4 @ _ X X X X $ PR R R S S % P Y Y Y >% X P Y _" P" P& R| ^T Y _D _T X _ X _ X" X& T: X P4 0' P. 1R P _ 0$ XT % X` Z _f % _n
0x0b8efc…0b9090 Dummy {f00=0x003a, f01=0x0190, f02=» P V % P Y X XT Q _ R Q R 0DKER UNIT CYLD STAT S T* - T T4W2 T TB X W$ T TN W T ( X = 0 :R # Y ; ; ? 0 :R 9 Y 9 9 : : :
0x0b9090…0b9224 Dummy {f00=0x003a, f01=0x0190, f02=» D D E E ] @ E @ Ur ? ? > ? ? ? ? ? ? ? X C ( "^ @X V U T " P " P @X W C "& # ( "^ | A @X @X @X @X <h @X % @X @X X X f [ [ [ [ [ [ [
0x0b9224…0b93b8 Dummy {f00=0x003a, f01=0x0190, f02=» > > >WZ | A ^ T " T0 ! P W SY SD AD _ ! P _, J _2 X # C ( "^ P X X X X CCT I T P Q _, AX _V LM X A $ AX X L 9 !? AW AW AW AW AW AW J AW
0x0b93b8…0b954c Dummy {f00=0x003a, f01=0x0190, f02=» T A A A @ ~ Xj A ~ @Xr A ~ @ Zh( : A A "^ @ (@_0 $ ( , 0 4 8 < X T " P " P @ W C "& # ( "^ | A @ @ @ @ <h @ % @ @ f [ [ [ [ [ [ [
0x0b954c…0b96e0 Dummy {f00=0x003a, f01=0x0190, f02=» > > >W | A ^ T " T ! P W SY SD AD _ ! P _, J _2 # C ( "^ P CCT I T DOS - PTS 6000 REL. 10.01 80-09-29 Z< , L 9 !? AW AW AW AW AW AW J AW
0x0b96e0…0b9874 (0, 235) Opaque[0x194]
0x0b9874…0b9a08 # DirEnt {nam=»READFL«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0760, f03=0x0000}
0x0b9874…0b9a08 IdxSect {
0x0b9874…0b9a08 f00 = 0x003b // 0xb9874 @0x0
0x0b9874…0b9a08 f01 = 0x0002 // 0xb9876 @0x2
0x0b9874…0b9a08 gno = [ // 0xb9878 @0x4
0x0b9874…0b9a08 [0x00]: C0x003b.0x0.0
0x0b9874…0b9a08 ]
0x0b9874…0b9a08 }
0x0b9a08…0b9b9c Dummy {f00=0x003b, f01=0x0190, f02=» f f f B $ ? T f_8 FD L $:h 1ZX 4Y^" $ # B B - C ( B P A A Wb B L L :ET OFP, B C ( B Xx A A W B
0x0b9b9c…0b9d30 Dummy {f00=0x003b, f01=0x0190, f02=» 9 $ Y :0123456789ABCDEFL / y N Dl m < 0Z sL a [ ? d `% L % "~ T &b ?Cn 1 d l X% l zB :x F^ bvvm : r ` ^* D3^H P D' >~ `" f >~ $' d p 4d @~ >
0x0b9d30…0b9ec4 Dummy {f00=0x003b, f01=0x0190, f02=» 0 0FD1 FD2 FD3 OR FD4 B $ ? T _8 FD L $:h 1ZX 4Y^" $ # B B - C ( B P A A W B L L :ET OFP B C ( B Xx A A W B
0x0b9ec4…0ba058 Dummy {f00=0x003b, f01=0x0190, f02=» " P # POPNU LDKL A5,UREGS # P # * P # 2 ( PREGS LDR A2,A2 CHECK IF REG NO GIVEN # : ( P RF(Z) REGS20 NO PRINT ALL REISTERS # f " PREGS05 LDR A7,A1 SAVE REG TYPE # P LD A6,ARG2+2 GET REG NO # P # PREGS10 ANK A6,/F # " P LDR A4,A5 CALC
0x0ba058…0ba1ec Dummy {f00=0x003b, f01=0x0190, f02=» CWK A5,QREGS # P RF(NE) REGS15 $ P ST A5,QRSWI $ , P LD A3,QREGSM-QREGS,A4 $ @ P RF(Z) REGS15 $ ^ P CF A8,PRCOL PRINT ADDR MODE $ t P LDR A1,A3 $ P CF A8,PRCHAR $ & PREGS15 CF A8,GETNSA GET NEW VALUE $ P RB OPEN30 @ INDIRECT $ P
0x0ba1ec…0ba380 Dummy {f00=0x003b, f01=0x0190, f02=»1,A7 $ P CF A8,PRCHAR % P RB REGS10 % " P % 4 P % < ( PREGS20 LDK A3,2 PRINT ALL REGISTERS % D P % p PREGS30 LDR A4,A5 % x P CM ADDRMD % PREGS40 CF A8,PRCRLF % P CF A8,PR8WDS % P SUK A3,1 % P RB(NZ) REGS40 % P ABL RDCOM %
0x0ba380…0bb020 (1, 0) DirGranule ((1, 0)) {
0x0ba380…0bb020 DirEnt {nam=»DEN10 «, typ=» «, f00=0x0000, f01=0x0000, f02=0x0768, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DE70ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0770, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DELINK«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x15d0, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DEUNPF«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0858, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DECOMP«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0888, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x0000, f01=0x0000, f02=0x0890, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»OBDIR «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1890, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»PTSDE «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0c30, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DE10ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0c58, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DE11ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0c68, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DE30ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0c70, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DE40ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0c80, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DE20ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0c98, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DEDDIV«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x14c0, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DLINK «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0cf8, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»M:PROC«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0db8, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»CDVRUT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2e70, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DE50ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0dd8, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DE31ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0e00, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DE14ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0e20, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DEACCU«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0e30, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DE60ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0e50, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DE80ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0e68, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DELITT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0e78, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»ASSRUT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0e88, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DENTER«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1118, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DERROR«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0f18, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DEKEYS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0f38, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DEFDSC«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0f40, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DE24ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0f80, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DEPOOL«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0f90, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»CDVASM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0fd0, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DE21ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0fe0, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DE12ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1008, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DE15ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1018, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DE23ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1028, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DEGENE«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1048, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DEVGAC«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1068, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DERECS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1098, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DECONV«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1528, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DEDISC«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1128, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DKRUT1«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1138, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DKRUT2«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1160, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DKRUT3«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1188, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DE20FS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x11a8, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DEDICO«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x11e0, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DKRUT4«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x11f8, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DE16ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1218, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DELOCK«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1228, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DATCHK«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1238, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DENT01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0bf8, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»CONV «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1280, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DENT03«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1290, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DEAPPU«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x12a0, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DEPRFG«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x12a8, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DECVRT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x12d0, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DENVAL«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1300, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DEREC2«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1338, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DENT02«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1360, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DEPROC«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1388, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DATUM «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x13c0, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DE1201«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x13d0, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DEATTF«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x13f0, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DESTAT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1408, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DE90ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1410, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»TRALL «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1418, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DEATNY«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1420, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DCTASK«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1438, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»FDIO «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1440, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»LIST «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2038, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DEDSHB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2990, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DELINK«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0f00, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DKCONV«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x07e8, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DELBUG«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x15c8, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DELBUG«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x2d58, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»TEST «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1508, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DEPROD«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x2f38, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»NJLINK«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x07c0, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»TEST «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0798, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»NYCONV«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0800, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»DCCONV«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1740, f03=0x0000}
0x0ba380…0bb020 DirEnt {nam=»A «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0788, f03=0x0000}
0x0ba380…0bb020 }
0x0bb020…0bb1b4 (1, 1) Opaque[0x194]
0x0bb1b4…0bb348 # DirEnt {nam=»DE70ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0770, f03=0x0000}
0x0bb1b4…0bb348 IdxSect {
0x0bb1b4…0bb348 f00 = 0x003b // 0xbb1b4 @0x0
0x0bb1b4…0bb348 f01 = 0x000c // 0xbb1b6 @0x2
0x0bb1b4…0bb348 gno = [ // 0xbb1b8 @0x4
0x0bb1b4…0bb348 [0x00]: C0x003b.0x2.0
0x0bb1b4…0bb348 [0x01]: C0x00ad.0x1.0
0x0bb1b4…0bb348 [0x02]: C0x00b3.0x1.0
0x0bb1b4…0bb348 [0x03]: C0x00b3.0x2.0
0x0bb1b4…0bb348 [0x04]: C0x00b3.0x3.0
0x0bb1b4…0bb348 [0x05]: C0x00b4.0x0.0
0x0bb1b4…0bb348 ]
0x0bb1b4…0bb348 }
0x0bb348…0bb4dc Dummy {f00=0x003b, f01=0x0190, f02=» ( P IDENT DE70ST REL 10.0 82-02-24/ERVR P UPD 80-11-18/DALI 0 P UPD 80-03-24/DALI L P DDUM DEDDIV h P PDIV | P ENTRY DE70ST P ENTRY DEAP7A P* * P* EXTERNAL REFERENCES TO SCREEN P* P EXT DECLRA
0x0bb4dc…0bb670 Dummy {f00=0x003b, f01=0x018e, f02=» p & P EXT DECONV USER OR STANDARDCODED P CONVERSION ROUTINE 2 & P EXT DELAST WRITE AND READ ON LAST P P ROW OF DISPLAY. z ( P EXT DERROR WRITE AND READ A KEY ON P LAST ROW OF THE DISPLAY P EXT DEOPBC OPEN BATCH P EXT DEP
0x0bb670…0bb804 Dummy {f00=0x003b, f01=0x018e, f02=» l P EXT DEDISC FILE HANDLING P* * P EXT RESTOR RESTOR WORKBLOCK 4 P AND DESCRIPTORADRESSES X P EXT EMPTYT z P EXT UPDBOL P EXT UPDBIN P EXT GETIND $ P EXT DEANOK NOT OK RET FROM APPL P EXT DEAOK0 OK RET FRO
0x0bb804…0bb998 Dummy {f00=0x003b, f01=0x0190, f02=» 0 P* STSAVE(W3) HOLDING THE DEVICE-TYPE . P* STSAVE(W4) HOLDING THE FILE-NAME 8 P* j ( P* PERF DECONV,<FC1>,<FC2>,<RETCODE> t P* ( P* <FC1> = 1 TRANSMIT & P* = 2 RECEIVE . P*
0x0bb998…0bbb2c Dummy {f00=0x003b, f01=0x0190, f02=»D d 2 P* = 3 DATARECORD ATTACHED 0 P* = 4 BALANCE ATTACHED @ 0 P* = 5 CLOSE CONVERSION t 2 P* <RETCODE> = 0 NO ERRORS DETECTED . P* /= 0 ERROR DETECTED
0x0bbb2c…0bbcc0 Dummy {f00=0x003b, f01=0x018e, f02=» =-2 MAKE BALANCE CURRENT @ P* =-3 GET CURRENT BATCH FROM BEGINNING 2 6 P* =-4 RETURN FROM CONVERSION v 4 P* =-5 DELETE CURRENT BATCH 8 P* =-6 GET C
0x0bbcc0…0bbe54 (1, 2) Dummy {f00=0x00ad, f01=0x0190, f02=» h P* P EJECT 2 P********************************************* 0 P* START OF CONVERSION. HANDLE PRORAMSCREEN- V $ P* LAYOUTS 70,71 CONVERSION MODE. , P* THESE ROUTINES USE THE DENTER-SCREEN. 2 P**************************************
0x0bbe54…0bbfe8 Dummy {f00=0x00ad, f01=0x0190, f02=» PDEST00 & P SET BOOL1 PART OF FORMAT DISPLAY PDEST10 < $ P TBT BOOL2,DEST20 JUMP IF NOT 70 J P ATTFMT F70ST r P B DEST30 PDEST20 P IB BIN2,DEST21,DEST22 PDEST21 PROGRAM 71 P ATTFMT F71ST P B DEST30
0x0bbfe8…0bc17c Dummy {f00=0x00ad, f01=0x0190, f02=»E P TBT BOOL2,DEST55 P PERF DECLRA $ P B DEST60 8 PDEST55 J P PERF DECLRS X PDEST60 l 0 P IB DEBINW2,DE70CA,DE70RE,DE70EN CAN,RET,ENT z P MOVE DEBINW4,W0 PDE70ER P CLEAR DOOL3 P BNZ D70ER2 P MOVE BIN3,D
0x0bc17c…0bc310 Dummy {f00=0x00ad, f01=0x0190, f02=»RESSED P* PDE70CA P CLEAR DEPROMPT & P B DEST50 > P* P P* RETURN-KEY PRESSED Z P* v PDE70RE * P CLEAR DOOL3 DATAENTERING ON USERFILE P PERF OPCL,W4 CLOSE USERFILE P BNERR DERE20 P MOVE DEBINW1,W0
0x0bc310…0bc4a4 Dummy {f00=0x00ad, f01=0x0190, f02=»,W1 RETURN FROM THIS MODE P MOVE BIN1,W0 " PDERE30 8 P RET F PDERE50 R " P CLEAR BOOL2 CHANGE TO FRMT 70 ` P CLEAR BOOL1 P MOVE BIN1,W7 P MUL BIN1,W10 P MOVE PRNUM,BIN1 PDERE55 P PERF DEPRUT,PRNUM,BIN1,BIN2
0x0bc4a4…0bc638 Dummy {f00=0x00ad, f01=0x0190, f02=»ERSION MODE r * P* THESE ROUTINES USE THE DENTER-SCREEN * P************************************** B P* p P* ENTER-KEY PRESSED z P* PDE70EN P TBT BOOL2,DEOPEN PDEEN10 P CBNE BIN1,W7,DERE30 P CLEAR BOOL3 PROGRAM 7
0x0bc638…0bc7cc Dummy {f00=0x00ad, f01=0x0190, f02=»LEAR BOOL1 PART OF FORMAT P B DEST20 " PDEOPEN 4 " P IB BIN2,DE71ST,DE72ST,DE73ST B P EJECT h PDE71ST START OF DATACOMM v PDE72ST * P MOVE WORK(W8),W0 USED FOR CHECKING OF P PART CONVERSION. P 0 = THE WHOLE USERFIL
0x0bc7cc…0bc960 Dummy {f00=0x00ad, f01=0x0190, f02=»0 NO JOBNAME P MOVE WORK(W8),W1 PCO7110 . ( P CALL EMPTYT,BATCH LOOK IF BATCHNAME < P BNZ CO7130 NO BATCHNAME h P CBE WORK(W8),W1,CO7120 ( P MOVE DEBINW4,W5 JOBNAME NOT ENTERED P GETFLD 0,W2,DEBINW3 P B DE70ER PCO7120
0x0bc960…0bcaf4 (1, 3) Dummy {f00=0x00b3, f01=0x0190, f02=»40 P PERF DELAST,W13,DEKTAB8 PCO7145 * . P CBE DEBINW2,W1,DE70CA JUMP ON CANCEL-KEY 8 PCO7150 j P MOVE DEBINW2,W0 x P PERF DEOPBC,DEBINW2 , P IB DEBINW2,CO7160,CO7160,DE70RE,DE70ER PCO7160 " P SET SOOL2 IF SET LINE IS OPEN
0x0bcaf4…0bcc88 Dummy {f00=0x00b3, f01=0x0190, f02=»EBINW4,W0,CO7161 JUMP IF OKEY P B ERRCO1 JUMP ON ERROR & PCO7161 F P IB WORK(W8),CO7170,CO7186 T PCO7162 SEND WHOLE FILE v P MOVE BATCH,HEX00 & P PERF DEDISC,W21 GET NEXT JOBNAME P BOK CO7164 P CBNE DEBINW4,W9,CO7183
0x0bcc88…0bce1c Dummy {f00=0x00b3, f01=0x0190, f02=»CC,DEBINW3,STRG10A | * P PERF DEPOOL,W6,PINDFR,DEBINW3,STRG10A PCO7170 H * P MOVE STSAVE(W4),BATCH SAVE BATCHNAME V ( P MOVE BIN3,=W'34' GET NEXT BATCHNAME 0 P CALL RESTOR,W0,W4,PWBDB4 RESTORE RBUF WB10 P PERF DEDISC,BIN3 P BOK CO718
0x0bce1c…0bcfb0 Dummy {f00=0x00b3, f01=0x018e, f02=»75 * P PERF DEPOOL,W6,PINACC,DEBINW3,STRG10A * P PERF DEPOOL,W6,PINDFR,DEBINW3,STRG10A 8 PCO7180 f , P MOVE BCDI21(W3),W0 SET WANTED RECNO = 0 t P PERF DERECS,W11 P BOK CO7186 " P CBG DEBINW4,W11,CO7183 ERROR P CBL DEBINW4,W8,CO
0x0bcfb0…0bd144 Dummy {f00=0x00b3, f01=0x0190, f02=» P IB WORK(W8),CO7185,ERRCO2 PCO7185 * P B CO7166 GET NEXT BATCH 8 PCO7186 X P PERF DERECS,W5 GET CURRENT f P BNOK ERRCO2 P CBNE BIN3,W10,CONVNO * P IB WORK(W8),CO7166,RETUBC EMPTY BATCH PCONVNO 4 P CBNE NUMBER,=D'
0x0bd144…0bd2d8 Dummy {f00=0x00b3, f01=0x0190, f02=» CBNE DEBINW4,W0,ERRCO1 JUMP IF NOT OKEY 2 PCONVE1 MOVE DEBINW4,NUMBER CURRENT REC.NUMBER 0 0 P CBE DEBINW4,BDPOIN(W2),CONVE2 JUMP IF LAST f 0 P ADD BCDI21(W3),=D'1' INCREASE WANTED RECNO $ P PERF DERECS,W4 GET NEXT RECORD " P BNOK ERRCO2 JUMP
0x0bd2d8…0bd46c Dummy {f00=0x00b3, f01=0x0190, f02=»RRCO1 JUMP IF NOT OKEY ~ P B CONVE1 PCONVE2 0 P MOVE DEINPUT,HEX00 > 4 P COPY DEINPUT,W0,W6,FORTAB(W21),W0 BALANCEFORMAT Z P MOVE FRMTPNTR,SYMREC(W11) PCONVEF P PERF DEDISC,W10 GET FORMAT P BOK CONVE3 * P CBNE DEBINW4,
0x0bd46c…0bd600 Dummy {f00=0x00b3, f01=0x0190, f02=» ATTACH DUMMYFORMAT P DISPLAY 0,W1,W0 P THOME 4 P MOVE FORMAT,HEX00 B P B CONVEF PCONVE3 n * P MOVE FORMAT,FORTAB(W21) BALANCE NAME | $ P CALL ATTDB,BPOOL(PINDFR),W6,W10 P MOVE BIN16,FLIND(W1) P ATTFMT BPOOL(BIN16)
0x0bd600…0bd794 (1, 4) Dummy {f00=0x00b3, f01=0x0190, f02=» 0 P CALL RESTOR,W0,W4,PWBDB4 RESTORE RBUF WB10 P CBE PINACC,W0,CONVEC < P CLEAR BDAACT Z P CALL UPDBIN,BDSTAT p ( P PERF DEDISC,W18 WRITE ACCUMULATORS P BNOK ERRCO2 PCONVEC P MOVE DEBINW2,W0 P IB WORK(W8),CONVE5,RE
0x0bd794…0bd928 Dummy {f00=0x00b3, f01=0x0190, f02=»B10 h P MOVE BIN13,=W'27' $ P PERF DEDISC,BIN13 DELETE BATCH & P BNOK ERRCO1 N P MOVE BATCH,STSAVE(W4) b P B CONVEC PGETCUR 4 P CBNE DEBINW4,W6,CONVEA JUMP IF NOT GET CURRENT P SET DOOL4 EXISTING DATA P PERF DERECS,W5
0x0bd928…0bdabc Dummy {f00=0x00b3, f01=0x018e, f02=» PERRCO1 P CBG DEBINW4,W0,ERRCO3 P MUL DEBINW4,=W'-1' 4 : P IB DEBINW4,CONVE4,CONVE2 JUMP ON NEGATIV ERROR-CODE C P P CO7175,RETUBC,DELCUR P B ERRCLR PERRCO3 P PERF DERROR,DEKTABS & P MOVE DEBINW4,W0 ZEROIZE ERRORME
0x0bdabc…0bdc50 Dummy {f00=0x00b3, f01=0x0190, f02=» T P CLEAR SOOL2 PERRCO2 P PERF DERROR,DEKTABS * P IB DEBINW2,ERRCO2,CONVE4 F PRETUBC h 0 PRETBC2 PERF DEPOOL,W6,PINDFR,DEBINW3,STRG10A v , P PERF DEPOOL,W6,PJOBCUR,DEBINW3,STRG10A < P CALL RESTOR,W0,W16,PWBDB4 RESTORE ORIGINATE A
0x0bdc50…0bdde4 Dummy {f00=0x00b3, f01=0x0190, f02=» PERF DEDISC,W18 WRITE ACCUMULATORS * P PERF DEPOOL,W6,PINACC,DEBINW3,STRG10A , PRETBC3 Z P CLEAR SOOL2 CONVERSION OPEN h P BZ RETBC4 P PERF DECONV,BIN5,W5,DEBINW4 PRETBC4 P CLEAR DOOL3 P PERF DEPRUT,PRNUM,BIN1,BIN2 P
0x0bdde4…0bdf78 Dummy {f00=0x00b3, f01=0x018e, f02=»* APPL-VALUE HANDLING ROUTINE P* * PDEAP7A PROC 4 P IB DEBINW3,DEA71 H P B DEANOK ILLEGAL APPL-VALUE b P* 0 P* APPL-VALUE = 1(101) OUTPUT:BIN6 = FILECODE < P* BIN5 = <FC>,FUNCTION-CLASS P*
0x0bdf78…0be10c Dummy {f00=0x00b3, f01=0x018e, f02=» * P MATCH DEVTYP,DEBIN3,W3,DEINPUT,W0,W3 P BOK DEA71B 2 " P ADD DEBIN2,W5 GET NEXT DEVICE F * P CBE DEBIN2,DEBIN1,DEA71E LAST DEVICE l P B DEA71A PDEA71B & P ADD DEBIN3,W3 ADJUST FOR FILECODE 2 P XCOPY BIN6,W1,W1,DEVTYP,DEBIN3 SAVE
0x0be10c…0be2a0 Dummy {f00=0x00b3, f01=0x0190, f02=» P MOVE DEBINW4,W9 NOT FOUND P B DEANOK & P PEND 8 P EJECT F P* T P* FORMATS ^ P* v PF70ST FRMT P FSL P FTEXT '70 ' P FCOPY =C'CONVERSION' $$ P FNL P FCOPY =C'PROGRAM:' ( P FKI 9,MINL=2,
0x0be2a0…0be434 (1, 5) Dummy {f00=0x00b3, f01=0x018e, f02=»LINK F72S PF70OUT P FMEND PF71ST FRMT . P FSL @ P FLINK F71S L P FNL ` P FLINK F71UV l P FNL P FLINK F71JOB P FTAB 20 P FLINK F71BAT P FNL P FLINK F71DEV ERVR P FLINK F71END P FME
0x0be434…0be5c8 Dummy {f00=0x00b3, f01=0x018e, f02=» P FLINK F71BAT P FNL P FLINK F72DEV * P FLINK F71END @ P FMEND V PF71S FRMT d P FTEXT '71 ' v P FCOPY =C'CONVERSION' P FILLR ' ',1 P FCOPY =C'VIA' P FILLR ' ',1 P FCOPY =C'DATA COMM' P FMEND
0x0be5c8…0be75c Dummy {f00=0x00b3, f01=0x0190, f02=» P FCOPY =C'OTHER MEDIA' P FMEND " PF73S FRMT 0 P FTEXT '73 ' B P FCOPY =C'BATCH LINKING' V P FMEND v PF71UV FRMT P FCOPY =C'UNIT' P FTEXT ':U' ( P FKI 7,MINL=1,MAXL=1,NEOI,ME,APPL=2 P FMEL 'X',USERFILE P
0x0be75c…0be8f0 Dummy {f00=0x00b3, f01=0x0190, f02=»PY =C'JOB' P FCOPY =C'NAME' ! P FILLR ':',1 ! * : P FKI 9,ALPHA,MINL=1,MAXL=6,NEOI,APPL=3,DUPL=STSAVE(W1) ! > P FCOPY JOBNAME ! | P FMEND ! PF71BAT FRMT ! P FCOPY =C'BATCH' ! P FCOPY =C'NAME' ! P FILLR ':',1 ! < P FKI 30,ALPHA,MI
0x0be8f0…0bea84 Dummy {f00=0x00b3, f01=0x0190, f02=»EX00 ! P FMEND " PF71DEV FRMT ERVR " P FCOPY =C'DEVICE ' " 4 P FILLR ':',1 " N 0 P FKI 9,ALPHA,MINL=2,MAXL=3,NEOI,ME,APPL=101 " b P FCOPY STSAVE(W3) " P FNL " P FTEXT =C'BRUGERNAVN' " P FKI 12,MINL=1,MAXL=12,ME " $ P FMEL 'AAAAA
0x0bea84…0bec18 Dummy {f00=0x00b3, f01=0x0190, f02=»ND ERVR " PF72DEV FRMT # P FCOPY =C'DEVICE ' # $ P FILLR ':',1 # > 0 P FKI 9,ALPHA,MINL=2,MAXL=3,NEOI,ME,APPL=101 # R P FCOPY STSAVE(W3) # P FTAB 20 # P FCOPY =C'FILE' # P FILLR '-',1 # P FCOPY =C'NAME' # P FILLR ':',1 # P
0x0bec18…0bedac Dummy {f00=0x00b3, f01=0x408c, f02=»COPY DEINPUT # P FTEXT ' FROM DISC.' $ P FNL $ 0 P FKI 1,ALPHA $ < P FCOPY HEX00 $ P P FMEND $ d P* $ r END $ |@ $ STSAVE(W3) # P FTAB 20 # P FCOPY =C'FILE' # P FILLR '-',1 # P FCOPY =C'NAME' # P FILLR ':',1 # P
0x0bedac…0bef40 Dummy {f00=0x00b3, f01=0x2008, f02=» % FTEXT '50 SEARCH/CORRECTION' FNL . FTEXT '60 VERIFICATION' : FNL Z FTEXT '70 CONVERTION' f FNL FTEXT '80 FILE HANDLING' F00OUT FMEND END @ '10 SUPERVISORY FUNCTIONS' FNL
0x0bef40…0bf0d4 (1, 6) Dummy {f00=0x00b4, f01=0x0190, f02=»T " T : " HP Y . 0 Y ( = 22 Y *T " T ! 1 W ! ) > : 22 >J E^ P & Y *T , : X > T X & V D ! T W > 1v 22 X >P( R Q" X & V D ! P $ ! P %_ > : 22 V Y " X .9H $ E^ P & X ( " Q
0x0bf0d4…0bf268 Dummy {f00=0x00b4, f01=0x0190, f02=» P P HP /f P< / WZ X ! X $" P<Q X (# P2 X # :! R$W / /f T$ @ Y (W Y , 0 W 0< Y ( = : X *:h X (! # P X & V L TbW X , X 0P@ /f T, X *:h XF XL X (!@T @ Y ( X , Y t X 0 l / _r X ( P Y (_ P*
0x0bf268…0bf3fc Dummy {f00=0x00b4, f01=0x0190, f02=» X (P /J 1 8 Y 0 X 2P X 0V _z Y ( " T Y ( : 8 1v 7 8 V Y 8 : " P X & V ( P / : : /J "0P $ T W %T : : Y ( X $ Y X " Y X & Y X < Y @ : Y : 22 X : X ( T X & V H " V Y
0x0bf3fc…0bf590 Dummy {f00=0x00b4, f01=0x0190, f02=»E 0 X *! T" X y 4 @ X (T y 6W4 X y 6W, @ X (P W" X & V D ! P @ W X 2:W Y ( : X , Y X $ Y X &T Y Y Y WD V $:H D Y D :H Y ! P V Y 7 W Y ! P 7(W V Y 1v V Y : 7 >b : 2' " P
0x0bf590…0bf724 Dummy {f00=0x00b4, f01=0x0190, f02=» : W 70 V > 22 Y Y Y < V E C B X _ v : C C 5 : C 5 :( R : V E V D ' $ Hh W 2^ P C X =' V W V Y =P 2^ : ( C 60 "R V I C 60 (
0x0bf724…0bf8b8 Dummy {f00=0x00b4, f01=0x0190, f02=» 5 4 3 / 4 _ 60 6 6 P 7 <H : 3 W 60 6 7 &P B V C / <H "!@ HD : 60 6 C C W 6 C C J4 ' W 781"&$ 39#$;< '()*+,-! 6 6 6 7 P _D 60 B 7 'W 60 ( Wb 7 6 60
0x0bf8b8…0bfa4c Dummy {f00=0x00b4, f01=0x0190, f02=» C + A4 C 5 I "%@P "% P& B C C 4 "5 # B P B P B 5 P C : 60 5n = 5X C 4 C B B P C 5 : "!@T Hl V I C B : ( ' P 5 I : 60 6 % Y 7: C 7 & H H C
0x0bfa4c…0bfbe0 Dummy {f00=0x00b4, f01=0x0190, f02=» V H H` ;D:B " : _, 7 C : : 60 6 "! P Bd : 7 P C W $0 P H C @ : C "!@P ") # B C B % C : :l:d:h 7 W W P W 6 2# 9 W4 @ E7 " T> ; [ #
0x0bfbe0…0bfd74 (1, 7) Opaque[0x194]
0x0bfd74…0bff08 # DirEnt {nam=»DELINK«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x15d0, f03=0x0000}
0x0bfd74…0bff08 IdxSect {
0x0bfd74…0bff08 f00 = 0x00ae // 0xbfd74 @0x0
0x0bfd74…0bff08 f01 = 0x0030 // 0xbfd76 @0x2
0x0bfd74…0bff08 gno = [ // 0xbfd78 @0x4
0x0bfd74…0bff08 [0x00]: C0x00ae.0x2.0
0x0bfd74…0bff08 [0x01]: C0x00af.0x3.0
0x0bfd74…0bff08 [0x02]: C0x00b0.0x0.0
0x0bfd74…0bff08 [0x03]: C0x00b0.0x1.0
0x0bfd74…0bff08 [0x04]: C0x00b0.0x2.0
0x0bfd74…0bff08 [0x05]: C0x00b0.0x3.0
0x0bfd74…0bff08 [0x06]: C0x00b1.0x0.0
0x0bfd74…0bff08 [0x07]: C0x00b2.0x1.0
0x0bfd74…0bff08 [0x08]: C0x00b2.0x2.0
0x0bfd74…0bff08 [0x09]: C0x00b2.0x3.0
0x0bfd74…0bff08 [0x0a]: C0x0139.0x3.0
0x0bfd74…0bff08 [0x0b]: C0x0161.0x2.0
0x0bfd74…0bff08 [0x0c]: C0x0161.0x3.0
0x0bfd74…0bff08 [0x0d]: C0x0162.0x0.0
0x0bfd74…0bff08 [0x0e]: C0x0162.0x1.0
0x0bfd74…0bff08 [0x0f]: C0x0162.0x3.0
0x0bfd74…0bff08 [0x10]: C0x0163.0x0.0
0x0bfd74…0bff08 [0x11]: C0x0163.0x1.0
0x0bfd74…0bff08 [0x12]: C0x0163.0x2.0
0x0bfd74…0bff08 [0x13]: C0x0163.0x3.0
0x0bfd74…0bff08 [0x14]: C0x0164.0x0.0
0x0bfd74…0bff08 [0x15]: C0x0164.0x1.0
0x0bfd74…0bff08 [0x16]: C0x0164.0x2.0
0x0bfd74…0bff08 [0x17]: C0x0164.0x3.0
0x0bfd74…0bff08 ]
0x0bfd74…0bff08 }
0x0bff08…0c009c Dummy {f00=0x00ae, f01=0x0190, f02=»@ g CR R G |R P ~R [ R f R q LR { R R R R xR rR nCB1 @
0x0c009c…0c0230 Dummy {f00=0x00ae, f01=0x0190, f02=» a 6 P F T1 n b @ $ X T p t t t t 8T1 x *
0x0c0230…0c03c4 Dummy {f00=0x00ae, f01=0x0190, f02=» > P P h 0
0x0c03c4…0c0558 Dummy {f00=0x00ae, f01=0x0190, f02=» 8 F
0x0c0558…0c06ec Dummy {f00=0x00ae, f01=0x0190, f02=»LP 0 GP 6 FD DLU FRO GPL6 LPL0 B . D Z p - r 7
0x0c06ec…0c0880 Dummy {f00=0x00ae, f01=0x0190, f02=» SYSVOLSYSVOLSYSVOLSYSVOLSYSVOLSYSVOLSYSVOLSYSVOLPFJESVCHM/=><DL!ASUFTCE+-*:;&V?'ZGRNX()MEVTFCAB/,LRAPTXZY+S,.><0-VEX * >0 0 0 M U t ~ 0
0x0c0880…0c0a14 (1, 8) Dummy {f00=0x00af, f01=0x0190, f02=» * B 0 0 0 " ( . F @ B D F H J L N P R T V @ f $ B
0x0c0a14…0c0ba8 Dummy {f00=0x00af, f01=0x0190, f02=» T > < >
0x0c0ba8…0c0d3c Dummy {f00=0x00af, f01=0x0190, f02=» F Q 0 [0 0 ^ e f h n t ~ ^ b@ F 3
0x0c0d3c…0c0ed0 Dummy {f00=0x00af, f01=0x0190, f02=» 6 ## _ jX 3 0 0}@d "P n_r 4 # 6 P 7MW (j "M ( 0 P 0 * 1W 'W 1 1 1 1 v j !!Ov v" Cv 0 "" VvW 0 0 )W`0 "" Vv 0 !!W6 'WH ! W+ " W% h * h `h h
0x0c0ed0…0c1064 Dummy {f00=0x00af, f01=0x0190, f02=»!!L 0 /P /0 f 4 0 f 4 4 0 0 0 $0 T 0 0 W 0 W 0 4P +W 4 0 4 j !! % !j !! 0 ) 4 4 @p@q@r@t@v@ @x 2 # !"#$% H ! ( Hx 4 $ !"4 "!4 !!4 I @w 0 0
0x0c1064…0c11f8 Dummy {f00=0x00af, f01=0x0190, f02=»a0 ` b#$ ! 0 `f `f b" c$" ! b c b" W !4 ( #M0 T ! ! P.W< !0 P) * 2 *#U 1 * * 4 & !4 _ 4 J " b 4 ,0 8 t % z% R1 1 0 2R2B0 1 $ 0 n 6 n j d1@ Z N$ &p3>$F/ 1l# 4 | # " , j $ $ $ 1h P @
0x0c11f8…0c138c Dummy {f00=0x00af, f01=0x0190, f02=» @ | H B " Y # , 6 Q d F J S:T JOBPTS GETDATAMODE NO.:ENTRYTYPE:999999FORMATSEARCHVERIFY CREATEELEMENTNAME: TPROGRAM:REL 10.0SIZE OF DEFINI
0x0c138c…0c1520 Dummy {f00=0x00af, f01=0x0190, f02=»
0x0c1520…0c16b4 (1, 9) Dummy {f00=0x00b0, f01=0x0190, f02=» U U RETURN FROM DATA-ENTRY U h d ' . ) e e @ " f d f @ , ( f d T g T ( f ! ~ ! + * h dG 0 20 $ - - 30 - - 40 ! 50 % 60
0x0c16b4…0c1848 Dummy {f00=0x00b0, f01=0x0190, f02=» V ] d l t | 0 0 ! ' . 5 < D L T ] f p { ( < S k ! & A C g g & 4 @ 5 5 & 5 &9B %W _
0x0c1848…0c19dc Dummy {f00=0x00b0, f01=0x0190, f02=»<A <a ^ <h = F F ) 5 ' A 5 & X X X* T Z0 I R < _ <h =_H ^L _ _R 5 & G _d 5 F '_p R : <<H P < : 5 5 & R P _v _| V V Q WR _< _B 46 5
0x0c19dc…0c1b70 Dummy {f00=0x00b0, f01=0x0190, f02=» 5 5 5 P < C 9h9G & C 9b! 8 #_h B " ' ""? 99g! ":e" B =_ _f 5 5 & 9_ 46 @ # 5 C _ 5 #0P T # P W & ?_ . 8 ! P& P P P T 5 _. W P 8 _> 5 5 5 5
0x0c1b70…0c1d04 Dummy {f00=0x00b0, f01=0x0190, f02=»46 5 & C 5 5 & C 5 & C C ( B X _ W & Y < * C _& 46 5 5 P ) 5 B & 9 5 & 9 ( B +_ @ P V E $ E & E ( E 0 E , Y E . A 5 08 X '
0x0c1d04…0c1e98 Dummy {f00=0x00b0, f01=0x0190, f02=» Y T P U U T W _F T P Y P 5 V E A 5 5 P P V V V E A _H ^ 9C : T _4 4 !00Z !99Y ! : 46 2 ' 5 5 & C
0x0c1e98…0c202c Dummy {f00=0x00b0, f01=0x0190, f02=»5 ;d # + A 5 #0 0T & ! T P & ! X T C A "t " 'H Y ( x P Y * x y Wv X " X X . 8 #| 08 X 0P X T 5 ! Y * y X V& X ( '$ x C ( Y * X Y , ' X X C
0x0c202c…0c21c0 Dummy {f00=0x00b0, f01=0x0190, f02=» x Y X " T Y _ " _ B U C Q C D . @ ! ! X X * $" ~_> @ Y X * J_R X !@XX y X # x V y X X * '$ P P 1 _ 1 X * 2 X X * $" X D % " X # X * '$ y _< X # X * y '$ X 1 1 X
0x0c21c0…0c2354 (1, 10) Dummy {f00=0x00b0, f01=0x0190, f02=» y x C y X C C X ( x Tf B ! 9 R 9 !v X ! T " _ y C Q " T 'H '$ X ! "` X X ! x Y~ Y _ X "@P B R y C B P 9 V " _F9 VV X ! T X !@X y C _d y C C X !? x P Q(
0x0c2354…0c24e8 Dummy {f00=0x00b0, f01=0x0190, f02=»X8_H x XD @ Y c C y XR X x ' "` x X X # '$_ B ", C & : + 'H X ' '$ ( 0 5 ( 0 / : B "p C _J + . 08 X 9 V ! P @ Y 5 #0 F Y Y . X ! F : 5@ 5 "
0x0c24e8…0c267c Dummy {f00=0x00b0, f01=0x0190, f02=» 08 X "T X 0" '* 0. 08 5 !0 F X 04 #| 0 0 ' 5 ! Y 0T V 0 8b : 08 2' FN 5 " P # P F R P P X ' ' A X _ X ' _ X '?_ 08 5 ! P # P F X ' 04 X ! 0 0"
0x0c267c…0c2810 Dummy {f00=0x00b0, f01=0x0190, f02=» * Y 4 Y 2 Y 69h Q X :h Y 0 ' W U X Q ( W Y 0 ' )H 46 3t 08 9H Y * & W W & 3t X 0T FR X 2Z X +" X *9h P: R Y >_ P R P R FN Y +Wl &T Y + &F ' WZ T R( &F & WJ Q W Y + U Q FN Y
0x0c2810…0c29a4 Dummy {f00=0x00b0, f01=0x0190, f02=» &6 : X 0 :H* 0@ : X 2T Y 2 : C 1 B ] 3 : & X +! FN X +! U 9K Y ( Y + ' )H 089H Y * 2 Y ( Y > Y + 5 & 4 0 5& & 6 2 X 0 FR : ! P # T : F C ( C : C B _( _ X ' 'H
0x0c29a4…0c2b38 Dummy {f00=0x00b0, f01=0x0190, f02=»V : 5 <h_0 8 _>C C 5 C C C C C C < ; < ; ) * * C )zC <~ W W X 0Q ( ( Y ( Y *P 3t : ' X <' X X : 08 X *# X ( " Q " P X 0PR V _` " PL T " Ph .$ 0 Wp " P Y 0] Y (_z P P T0 " X _@
0x0c2b38…0c2ccc Dummy {f00=0x00b0, f01=0x0190, f02=» / C W @ X (T W X y 6 Y ( : X (;n 0"C <h< <h<P*>C C C < ; < ; ) *b*b< )zC <~ 08 Y . Y ,W 08 Y . X ( X ." PV X 0RzT$ Y *P U :H 0@ )R K T < W < X . X 2QP Y *T2 < : " P$ X 0U X *# P P T " T : " FV
0x0c2ccc…0c2e60 Dummy {f00=0x00b0, f01=0x0190, f02=» D ! T W < /| 08 X >P( R Q" X & V D ! P $ ! P %_ < : 08 V Y " X .9H $ Cd P & X ( " Q Y +Q R " P W " U -8 Y , " Q " FV X . X 0R P" X *:h P PD FV) Y (W X *:h Pt Pn P P FV
0x0c2e60…0c2ff4 (1, 11) Dummy {f00=0x00b0, f01=0x0190, f02=» X (! # P X & V L TbW X , X 0P@ -l T, X *:h XF XL X (!@T @ Y ( X , Y t X 0 l - _r X ( P Y (_ P* - P| Y 8 * X 8 X $ 0@Wh_ " P X ( T X & V H "@TF - P6 V Y X (P /| - X (P
0x0c2ff4…0c3188 Dummy {f00=0x00b0, f01=0x0190, f02=» : -P "0P $ T W %T : : Y ( X $ Y X " Y X & Y X < Y @ : Y : 08 X : X ( T X & V H " V Y : X $ 0@ X : 0T : X Y " X Y $ X Y & X @W X < Y = " 0 ! T W C ! P =H C . X *!
0x0c3188…0c331c Dummy {f00=0x00b0, f01=0x0190, f02=» &T Y Y Y WD V $:H D Y D :H Y ! P V Y 5 W Y ! P 5.W V Y /| V Y : 5 <h : 2' " P T 8 W 52 < : /r : 08 3t / C 0. X 0@ : "0P ' Q W ' Y : W 56 V
0x0c331c…0c34b0 Dummy {f00=0x00b0, f01=0x0190, f02=» V D ' $ Fn W 0d P A X =' V W V Y =P 0d : ( A 46 "R V I A 46 ( T _& @@8X, @@: _6 5 #0 P Fr ( A 5 #0 T 5 #0 T V A Fr W 3 2 1 /
0x0c34b0…0c3644 Dummy {f00=0x00b0, f01=0x0190, f02=»W 4 C C J2 ' W 781"&$ 39#$;< '()*+,-! 4 4 4 5 P _D 46 B 5 'W 46 ( Wb 5 4 46 ( 1W" C C C " Fb ( ' P. 2 P$ "! P @<W B % P C + ?: A
0x0c3644…0c37d8 Dummy {f00=0x00b0, f01=0x0190, f02=» C 3 : "!@T Fr V I C B : ( ' P 4 I : 46 4 % Y 5@ C 5 & F F C 5 "!@ FJ : B T T T V : 2 ' W 2 6 2 @ " T # ' ?D 7 W.' #? 7 V H Ff
0x0c37d8…0c396c Dummy {f00=0x00b0, f01=0x0190, f02=» > : C "!@P ") # B C B % C : :l:d:h 5 W W P W 6 2# 7 W4 @ E5 " T> ; [ # 7 :H 2 T Z L L5 D V, W # 7 L5 E V $ W D V L5 , W 6 2 7 W$ " P&
0x0c396c…0c3b00 Dummy {f00=0x00b0, f01=0x0190, f02=» 5 6 : F _v F":B , (V ; H [ [ [ 5 Z (;AR H WD F& F& Z H # 8 ; 6 F" 5 : Z L # & F& F& & Z 4 8 : Z 4 " 2@P : [ [ 5
0x0c3b00…0c3c94 (1, 12) Dummy {f00=0x00b0, f01=0x0190, f02=»" P ! P [ :;H 2 6 6H;h 7 : ; V Y : 2! : 6 2 7 W& " # 7 ;b ; : ;f" #?_"$0#0;b 9 P P PF P 0 - P0 _ 4 V W Q P ) P 9_ &" ! 9 : & P Q 9
0x0c3c94…0c3e28 Dummy {f00=0x00b0, f01=0x0190, f02=»9d * & ! R + : V W R 4 0R Y 7 Y& P Z,;D 9_8 8 _< V W YL T 9 : F &9d! + P( & T 9d! T 7 V Y " WJ Q V V 7 Y P._& & Q 9d! )0 + P 7 Y Z $
0x0c3e28…0c3fbc Dummy {f00=0x00b0, f01=0x0190, f02=»< CZCZ< < C <~ : 6 ; K K K K V K : 5 : : : 56 V < ; <: V Z P 2 " T W "@T '?W "? H:V" K :e J J " J _Z Z < [ Z P 0d [ V F"
0x0c3fbc…0c4150 Dummy {f00=0x00b0, f01=0x0190, f02=» : : J P v I < : J Qx : Pn 4 ! Th_ PX 4 WT K < WJ < W +_ < < K W. _& X 3 W X & 3X J K : V : J T F2 1 : + 5 [ [ < !AAP !TTT W !**T * [ R !FFP !EET
0x0c4150…0c42e4 Dummy {f00=0x00b0, f01=0x0190, f02=» :P"# U J F2 1 =d !00T ; < _ 9P F " X># ; W )0_B J R( Z R 4! P ;)0 9U ? F6 Z ] 49d_4 _HU ; :X _ _ z 9d! ) ^ _ ,_ 8 _ : W 8W =d 8 !++P !-- z ;$# + ^" _( |`. PT*AXYZ9 5&
0x0c42e4…0c4478 Dummy {f00=0x00b0, f01=0x0190, f02=»V 4 _P :#0 T B 'W F B B " ?^ : P@" @8PR L@ R R _ R _ # Q R V > _V X^ ' h P P & 1_ P 1_ , @ - R T U :J a B@ ' d w5 1
0x0c4478…0c460c Dummy {f00=0x00b0, f01=0x0190, f02=» :ATATATB0C0A C(8b_ _ `nabc c A B B B B B A B B ; f~f e e f~e|A CPCLCVCXA A A A 0h W V 7 @ ! P 0d P W A. @@ R E If B< pVP 9c D@ 5 5& Q @ W `n :aW, @@ YRP E6 @@ ]^ E @@ ]h E0_n Fr 2
0x0c460c…0c47a0 Dummy {f00=0x00b0, f01=0x0190, f02=» V 0d W V P _ 8^t D@ 2 ! 9BP V T W V P D $ V 6 V % V E @ ' T 2 % 7_ 2 # PH L PB 5 2" &] Y $! 6P Q $ T 9BP A _ _ W A 6 @ " T 7 $ V P 0d W
0x0c47a0…0c4934 (1, 13) Dummy {f00=0x00b1, f01=0x0190, f02=»P 5.W : ! )P9H " F # T &W &" :I : C : P & _ &X _ : FB : : : D p *1 TID ADDR OP CR LVL MODIFIED OPERAND CREDIT 5.0 TRACE @D P ( _ AD AD
0x0c4934…0c4ac8 Dummy {f00=0x00b1, f01=0x0190, f02=» IJ . 1 V ID v ID AC : DxW Dx 2 D# ID @ # T R ID 5 IJ & ID DtQ D AC W> Dx D V D ! )0 1 @ # T 6 V ^ ID AC E A. C ( ( AD : Wp Wl Wh Wd
0x0c4ac8…0c4c5c Dummy {f00=0x00b1, f01=0x0190, f02=» ** AD AD ER AD$ R AD& D( ID F R 4 IB 4 $ AC D, U 4 - _ E D$ @C J A. ILLEGAL OPERATION MIXED ARITHMETIC ILLEGAL TYPE ODD WORD ADDR MISSING ENTRY ILLEGAL REQUESTED LENGTH STACK UNDERFLOW ARITHM OVERFLOW STACK
0x0c4c5c…0c4df0 Dummy {f00=0x00b1, f01=0x0190, f02=» AT INITIALIZATION ILLEGAL INSTRUCTION ADDRESS ILLEGAL FORMAT CODE NO FIX BUFFER ALLOCATED FIX BUFFER NOT ALLOWED ILLEGAL CONTROL CODE ILLEGAL INDEX VALUE FORMAT CONDITIONS CHANGED ILLEGAL PARAMETER LENGTH ERROR DATASET BUSY ILLEGAL DATASET REFERE
0x0c4df0…0c4f84 Dummy {f00=0x00b1, f01=0x0190, f02=» V P W <a R 9a V I : Fr @I P ( _ @L(P @L*Pj Pf K V $ $T$ D BR V T D P T D @PL E @W . @K P$ JN K $ $P BT , D E @ : @I P AI H AL(W TW V AI L. L, V AL0 TB( M ( A
0x0c4f84…0c5118 Dummy {f00=0x00b1, f01=0x0190, f02=»L, TB( M ( AI L, @L0 V P ( R W : T REFERE
0x0c5118…0c52ac Dummy {f00=0x00b1, f01=0x0190, f02=» V P W <a R 9a V : Fr @I P ( _ @ P @ P P V $ $T D R V T D P T D P E W . @ P L6
0x0c52ac…0c5440 Dummy {f00=0x00b1, f01=0x0190, f02=»]6 R M V W Z TM@ _" = ] T M ]6 ]f ]lW ]6 , ] 9a ]Z @M`P ] ]P ]l ] L. ] @L2P ]f @L4 ] AL2 AMb ^ AMd "V # ( L ]p AMbP UW T ] ]l AMbP ] O8 [>N @O$ O =P WP QQR MR /Sn STP IT JUr T
0x0c5440…0c55d4 (1, 14) Dummy {f00=0x00b2, f01=0x0190, f02=» AO, AO$ AO& AO( AO* AO6 AO. AO2 AO4 X P AO2 AO4 [>O Pd ,O +P -P ;P, :PR (O .PZ M X " , AO4 L AO0 L @ AO, AO2_T X X ,T X X ) AO( AO* ] [>P Pd ;P, :PR Pj @O2P AO61+X AO6_ Pj @O$ AO @O& AO @O( AO @O* AO"_ Z A
0x0c55d4…0c5768 Dummy {f00=0x00b2, f01=0x0190, f02=»Mv @O. AM| @O0 AMpP [ W @O.T @O,Z T0 @ 4 AMj ] S W ]zW 0 ]p A 4 ]fW ]f A 4 A 4 @ 4 ]6 W ] @Mv AO, @Mp AO0_x M AMd PZ @O&& ] 0 ]6 P P ] ] P @R ] ]P S _ ]z ]f ]Z ] _T ]p ]f Q
0x0c5768…0c58fc Dummy {f00=0x00b2, f01=0x0190, f02=» @O&W @O @O& @O,R T0 >a A 4 AMt @O. AMz ]p @O0 AMnP [ W @O.T @O,Z T0 A 4 @^ Nn @ 4 AMh ]f ]6 ]f [r ]f ]f [ ] A] Nn @O,R V ;a Q ]p_ ] 1 Nn ]z @ 4 AMh_ 0 ]6 ]l ASf O8 P 3P O C @O$P @O&
0x0c58fc…0c5a90 Dummy {f00=0x00b2, f01=0x0190, f02=»W @O.T T0 @O,V @ 4 AMf 0 ]P ]l O8 P O @O$P @O& 1 Nn ]z ]f A 4 @ 4 ]6 ] @Mr AO, @Ml AO0_ @M`P @O,V @L0( O V " @O0T @L. Z TP @O$P @O& A 4 AMp AMv P ] 0! ]Z ]l O8 T @O$P @O&" 1 Nn O Px @O& @
0x0c5a90…0c5c24 Dummy {f00=0x00b2, f01=0x0190, f02=»O AUN AUR ]p @^ Z ]f " ! U 0 AURU U2_ ]$ "P` @O& @O0T @L. Yj PF R % < < ] ! ]Z ]l O8 T @O$P @O&! 5 = Nn O O W NnP @O& O XfW" K X K $ B % AK NnT @L,W @O& AMb O @O,R AL0
0x0c5c24…0c5db8 Dummy {f00=0x00b2, f01=0x0190, f02=»NnPd @O& @O PL @O P ] ] [>WfR @O0T @L. W V [>K Rt ) I I @ I B AK W P W RV )W K X AK Nn K , AW` AW`:B AW`Q (P _ H B @O0T @L. H AW` " O EQ GT LT NE NG NL P2 @M` R* ] [>W @O&P Q W (
0x0c5db8…0c5f4c Dummy {f00=0x00b2, f01=0x0190, f02=» B @O& @O @O P W O @O,V @L0 Q B 1 @O0 Q Q @ AK " K ( R$ ( @O,V @L0 H B ) I B " O $ % " ] # C C C C *T W #T AO. ] NP PR (T X Pl ,T X P^ )TX ] Z AO0 T @L.
0x0c5f4c…0c60e0 Dummy {f00=0x00b2, f01=0x0190, f02=»# 9hP Q " ;B 2 Pl L ?b Z^ P ,R PLW~ Pz9AR Tr L Qj W" P` L $ QV L % QL Z Z W C " _* Q P Q V _ W " AZ < V "
0x0c60e0…0c6274 (1, 15) Dummy {f00=0x00b2, f01=0x0190, f02=»O, .T @M`P P " AO, " X X O " , , A[p A[p:B A[pQ (P _ # # H A[p " A] A] 4 ]f ]6 4 @] I[ T A] A 4 A 4T A] T [ @O,R T0 A] N @ 4 " P P (T @M`! PD @O0T @L. [> 6 Q";H @ 4;d ( @
0x0c6274…0c6408 Dummy {f00=0x00b2, f01=0x0190, f02=»_" A " ] A 0R$ 9U AR FQ 0:D A ] _* 'T ] :H_ A " A] A] 4 ]f ]6 T A] A] " , ]$ "! R _U .WV A]N: ]Z A]N " 9d ]Z ! R :W& ] W ] W W ?W :W .W / a^D
0x0c6408…0c659c Dummy {f00=0x00b2, f01=0x0190, f02=» @^D ^FP A^: ^6( ^F A^D " !^C 1^F ^F Q (P _ # # H A " A A 4 4 @ I T A A A T A T @ 5 ^ ( A 5 ^ ( _ R #0T : F^ Fr W
0x0c659c…0c6730 Dummy {f00=0x00b2, f01=0x0190, f02=» W Q P [ ! X # P 4 V W Q P [ " X $ P TF R R ` ; <( Q P # W " <! =# T6W = Z P _ V ^< `_@ R Q <# =_ P :" P * U P 1`! T "# 9e! # K : #0 F
0x0c6730…0c68c4 Dummy {f00=0x00b2, f01=0x0190, f02=» R W ( V W Q P W ! W V P , V W Q P W $ W V P T V W Z : V ) 0 F !0 F " TV *V &V : V S W P 9 S W _ V P W T V E + : & 6 F" [
0x0c68c4…0c6a58 Dummy {f00=0x00b2, f01=0x0190, f02=»P( [ Z w [ P eD_ V H )_ eDb _X z R z ! P 1` { V (9h T W z 9e! I Z ! : 4 P 9 59D_ " P P [ ! :d" 5 : 0 F !0 F " Tz *V &V PP= ;@ R P W ;a=a P
0x0c6a58…0c6bec Dummy {f00=0x00b2, f01=0x0190, f02=» $ [ [ &! P e eD8b eD8b eD_ z " ! ! R 2` { z " P ! R 2` { 1 ! { [ Z eD` Q eDb P _ T { [ eDe& [ Q@ [ eD_ { R [ _ eD_ eDb Z ! Z $ Z %_N [ Q* eD_ eD`
0x0c6bec…0c6d80 Dummy {f00=0x00b2, f01=0x0190, f02=» & H D % [ ( g ; : { : gr$0T f Pb 9 _ gr$0T [ gr$0T Z : R$ P $ 1T Y TdW 5 _& : gr$0TH $ R W R # P W ) V E
0x0c6d80…0c6f14 (1, 16) Dummy {f00=0x00b2, f01=0x0190, f02=»R R _. : 8 : 5 5 #03 T jP kT T : & 9! " : $ : T W V 9! R W Q< R W Q0 R W Q$ : f 5 T $_X f _^ W Fr _ b Z ! Z $ Z %_N [ Q* _ `
0x0c6f14…0c70a8 Dummy {f00=0x00b2, f01=0x0190, f02=» | 7 F l p t x6 &90 A! P K 4 0 A! P K 4 0 Av P K 4 0 Av P K 4 0 Av e 4 0 Av e 4 @ 0 >0 P 64 <0 P 54 0 P A 4 !0 P 34 E bR * )bR* I 0 A R V 4 0 A R V K E I b )*R b R*
0x0c70a8…0c723c Dummy {f00=0x00b2, f01=0x0190, f02=»$"` uV> av uajb " " b ( bR#j $"u b^&jb "R" b bR j $" b 5W j ""u j $" j &"* u`Hp *? v? u? ` _ u) 5 ? j` " $ `: 0 ja " " a ua j $" ` )? u`? j` " "_2As ua? @u@v E 0 ? !"? 1AxW-j " - R R _9 W I
0x0c723c…0c73d0 Dummy {f00=0x00b2, f01=0x0190, f02=» -jc " c c R c R _a _) +_% 0 c c 4 ! ! ! " V 0 _ " b )*R b R* !4 "bR * )bR* & 4 @k@lja " "j` " $(` AlW= ` Rgjd " "j ""a (a # d ja " $ a a RCj ""d a d`W ` (a AkIl'W a R jd " $j $"` a R `vIs `! d` 4
0x0c73d0…0c7564 Dummy {f00=0x00b2, f01=0x0190, f02=»! "R! ! ! " Q E! "! [ 3@ 4 H #@ C!!"C! !T !!RT "!R0" A!R 4 H 0 _ #! R R W A T A @p Cv! Cv! H Vv0! Av Tg `vP Ap ?v` #! RTj v " % j !! jGv " ! Apj !'! $! P Ap R$ ! ! " T Ev "v P Ev & 0" AvR 5@ Cv!W Hp ?@
0x0c7564…0c76f8 Dummy {f00=0x00b2, f01=0x0190, f02=» / s 4 : m `!: )`W} d$ bd !bRV ! 55? jc "R&#c91j " b "&m j (" ) bRc* c*jR&"c "dR? b W jd "R$ d U d!: jR$"d "bR c* REjR""b jR$" _` b{ ! a ja!! b(jR(" b1 a A c!V a ) ) !aR: ? jR$"c bR* b "`R: Hp _ ba `=jR "` `c_V c Ap_1Ar 0 mP r
0x0c76f8…0c788c Dummy {f00=0x00b2, f01=0x0190, f02=»t` t*_- t: `"_- `" Ab !&R`bm &R` m? < m@s $R*: ` a&j` "R&fRa* `*jR&"` "`* @s R: " R: ab !aR: "V )( ) )? j` "R$jR " "aR: a! ` % !`R: b "R A9 `!j` "R$_! r : '6c ( ]@s $R*: Cq< RU !bR "V ! 6 ! 7 AvT ? )? bjd
0x0c788c…0c7a20 Dummy {f00=0x00b2, f01=0x0190, f02=»{c? 8? Hq ` j`!! b'$`! _ ? %_5Aq_ : RF `* a!bR`1 a `1 a! a+ "%R? : !%RP RU `* a!b a 1R` `1 a! a+ ? ApWg RBbR(" 1bR* "cR? a!: jR$"a "cR: ca_0AqW3jRd" "'R< !`R< ja "R$ `!< a & `a_ %6c : b " ! d %d8 !? !'RP 5<
0x0c7a20…0c7bb4 (1, 17) Dummy {f00=0x0139, f01=0x0190, f02=»_ )? Cp< b! a! !ba < b b)*R b b R* $ba & a b? 4? ` a*Hs `W ` V ! 50W< a"j " &h a& &V! a a! a j " $ ` _E )W a&jb " a 4 d"@s$ " As d R jd " $jc " * c d ? 4 j " " & 6 jR " 4 j "R !"4 !!4
0x0c7bb4…0c7d48 Dummy {f00=0x0139, f01=0x0190, f02=» _ F " DSF T X AC FC SV TC PTS-DE SYSFIL " % ( + . 50 < p p !`R< ja "R$ `!< a & `a_ %6c : b " ! d %d8 !? !'RP 5<
0x0c7d48…0c7edc Dummy {f00=0x0139, f01=0x0190, f02=» ~ W f T r v zApAt : As k # *V ) ? Ht ? l b ,V ) ? Ht ? It (? cv: a*mja " &"asz kj a"c a"j &"a `: ` a* ?j ""` j $" l `v: j a"` a" uv: j a"u a"j &"a c: Uj &"* W @ `#j "" j $" a*_zj $"c `: @j ""` `c cv_(ja " &"as c`_z cv
0x0c7edc…0c8070 Dummy {f00=0x0139, f01=0x0190, f02=» uv ud d , ) v )? jo !v bo!&k bo'&l ) oV5 ! ! " : * o | Uj |)"` It ? u) 5 ? 4? : VJ! 5 ) ? `b b W `!: RBjR""b bR* z "`R: b !bR: jR$"` "bR? bR* z "bR? '6c @rT `# : !`RV ! 5 ? )? a7b &Ra0
0x0c8070…0c8204 Dummy {f00=0x0139, f01=0x0190, f02=» Kq %_1Aq_ : @s RHl Hk RU "#R? a$W a" k `#0 kT : j` "Ra ` >Ar_ ApAs0 kTY k # *RnHp. a$*a j " $ Z : j` " &*`*K a,Hp bk & a? 0 lT$ l b ,R. a& a =bl & a? #X;! 5 ? b: ja " &*a* a,_' )? c# bc !bRR)jc "R&"c* 5W d7b &Rd k jc "R$ c
0x0c8204…0c8398 Dummy {f00=0x0139, f01=0x0190, f02=» h~ !X8H !( @ h~ U !j~ ! ! !P !0# ! N_m ? j !! '( !1j !& !j !! ( * j +& 'j !! ( j ! ! ! 9 ? jy " $ j !! 1 j !! 2 j !! (I !Y A ! p ! ? ! 0 !h & !&P !0# !< _ ( ) +h & '&
0x0c8398…0c852c Dummy {f00=0x0139, f01=0x0190, f02=» h^ !T f^ ! !j^ !U !j '! !j !! ( _N ! ( + ~UWhj !! ' !QU I N! 9 ! : ;b ! W:0 ^ h^ U !P :! ;j !!^ b ! f^ ! !A j ! !d^ ! j '! !j !! (( + b +$~ WR j !! '( ! j !! 0 (j ! !W0 )W# + Aj !
0x0c852c…0c86c0 Dummy {f00=0x0139, f01=0x0190, f02=» 6 <W U j !!~ W j !! (W Uj ! j '!!! !j !!~ j (!~ _+( # j (! !j !!~ 4 I H~*H $H !@~ W 0$@mI~ Hn @f $U W I~ W I Ao 2 H~ I Ao { _ H{ 2 _ 2 b & . #K~M g "pK s_W!gC ? /_>Iz H 0
0x0c86c0…0c8854 (1, 18) Dummy {f00=0x0161, f01=0x0190, f02=»Hm @ P&@jP A W3Ao ,P !_ g  L@mAo? H 0 Hm ! &@h@jP #W @fPO $0 TF 8 h ! !T #P ( -& Ub & ? Ub & @ .P )gC Ao? AzAzT @mA *P @ ? @ @m8 @xP 2 !! h ( & H #: W ? Im1I~ I & h ( & H I ) ?"I ) ?#I H
0x0c8854…0c89e8 Dummy {f00=0x0161, f01=0x0190, f02=»({ % H~ - !gC Az? @z? H~ C < I 0 ! W 0 ! W /8 0 ! 0$? Az % h ( & J K @o?(@m!gC C~8)?(@zC~8*?(?$Km Jz I gC T Io Ao #: _3Ao@ T / 2 %% + % # #g W ! #g #20 ! &_ I~ Jo K _@ @ !0$@o ( A P W @ 6 / A _ Hm 0 ! A %
0x0c89e8…0c8b7c Dummy {f00=0x0161, f01=0x0190, f02=»%% 10 ! !0$ (V ? ##2 2 2 322 1& _ Co<$Cm<$Cz8$0 ! 2 %% 4 !X b !U *8 0% ? h ! & ? C <$ h ( & H I ?0 g( " @oW $ 2 %% 5 ): @oA ?6C <$Hz @ T Cm<$Io I~ #V - ? @o@z Ub & 5 +@mA{ *V#( - 1 0 ! 0$ { &{ mU_"@{Ao?
0x0c8b7c…0c8d10 Dummy {f00=0x0161, f01=0x0190, f02=»% !g2 @m?:?;@ _/0 + 0 , A~4 @~P + , 4 _ ; $ - ; Y i . & E 3 N + n | i Q m
0x0c8d10…0c8ea4 Dummy {f00=0x0161, f01=0x0190, f02=» " ! I Y R *FTX J BC JC FTJBJD FETCHING FORMAT: FROM DISC. @ UF 0 % * & j j Ub & 5 +@mA{ *V#( - 1 0 ! 0$ { &{ mU_"@{Ao?
0x0c8ea4…0c9038 Dummy {f00=0x0161, f01=0x0190, f02=» !4 "4 #4 $4 4 @} 8 In06 W 0 ! WP0 ! WII~ 0 ! W?H 0 ! W50 !! W.@n6 0 ! W 0 ! I~ 0 ! W H 0 ! W 0 ! (0 : H~ ? 0% P : _ 0' P C{P A )? H ? 0(HoO !H~ 0) $ W 0) # ! 2 W 0 0 /1& _5K~|0 ! _
0x0c9038…0c91cc Dummy {f00=0x0161, f01=0x0190, f02=»( 2" + " ( " # I ? & 0, P ? 0 Pm0* 0 -8 Wa0* 6 > W<( , ! :d # !_'0* P 0' P o8W o;d o "_HI 0* 2 W @ @ @ @ @h@j #U 0- ! Td$ + " , 0( %@|PI0' T /hZ " !T f ! j !! H{ ? 0' P 0. P H !?
0x0c91cc…0c9360 Dummy {f00=0x0161, f01=0x0190, f02=»88" .4 #H 0Hj 0 #T @m?#@hP !PP01 02 V 0 !_ $ + ?$I 03WL0' P 0 9%0 !01 02 T10' T2WO0 ! 04W #I{ H~ I K 0% 0(? A 0$P#:&;%Io 0. P H 2 ' ' ' ? JA J K{ 0* ?( !01 02 8 _^J #H 0' P 0. P T 2 ' 0' T 2 )
0x0c9360…0c94f4 (1, 19) Dummy {f00=0x0161, f01=0x0190, f02=» /P 06 & ?.06 " ?.0(_.0 0 H ,W H +0* 0' P 0 Q ,8/?0A 0 !01 02 P : SqW 0' X70. P J ? EK{H ,LH 0' P 0. P T +_bH KAk0* 1& ? Am #4 0% S 0' P 0 Q I ) *&KA)? 0% % 0' P-0. P H % !W/ ?1 #? 08 $+ %'0
0x0c94f4…0c9688 Dummy {f00=0x0161, f01=0x0190, f02=»W > "j 0 0 #4 @ 0, P j !!!WP U0' P m ( &W 6) D b !Z/h U ! !Q !4 !0(@ T 07 j %! !0& ! 08 % ! 6 cv6 C & 4 W 9W :0' P " "Jh !U !TA0' T h ! !T00/ _ A 0' T f !07 0(0& _ 0 0 (P h !
0x0c9688…0c981c Dummy {f00=0x0161, f01=0x0190, f02=» 7jo " 1& W % 4 "1& M 0(W 1& !0) ! 6 W"0 0 $( # _.0 ! _y $5 !( * @ . !4 80 4 o? o0 0 6 4 Am4 0 0 4 6 v k | _ O x T u T
0x0c981c…0c99b0 Dummy {f00=0x0161, f01=0x0190, f02=» * ! & 3 8 ? P + +-0? 1 BATCH IN USESYMBOLICVALUE-SET XXXXTTT9TTTT9XXXXX- o A . 1 . . : k A C : A $ : A NOT . TIME-OUT CDV-ERROR NOT FOUND I/O-ERROR DATE ERR
0x0c99b0…0c9b44 Dummy {f00=0x0161, f01=0x0190, f02=»ERED BATCH RECOVERY RUNNING. DISC NOT OPERABLE @ : l IN : k A CHANGE FLOPPY DISC DISC I/O-ERROR : ILLEGAL FORMAT NAME PRESS ENT TO CONFIRM NO WORKSPACE IN CORE FUNCTION NOT ALLOWED USERFILE ASSIGN-ERROR 95 % OF FILESPACE USED PRESS EN
0x0c9b44…0c9cd8 Dummy {f00=0x0161, f01=0x0190, f02=»EXECUTED TOO FEW INPUT CHARACTERS OUTPUT DEVICE NOT OPERABLE COMPULSORY FIELD NOT FILLED DEFINED LINE MAXIMUM EXCEEDED MAXIMUM RECORD-LENGTH EXCEEDED !MAXIMUM FORMAT-CODE SIZE EXCEEDED !MAXIMUM NUMBER OF FIELDS EXCEEDED (USERFILE NOT CLOSED IN PREVIOU
0x0c9cd8…0c9e6c Dummy {f00=0x0161, f01=0x0190, f02=» : h y : k : l : : z : n : : g : ASD 5 PAGE : WARNING:REFERENCE TO FIELD (F ) OUTSIDE FORMAT DEFINITION ,OCCUPIED RECORDLENGTH CHANGED WITHIN FORMAT: m . SIZE ON DISC: . B $ : ! DOES NOT EXIST IN JOB-DEFINITION OR ON SYSTEM-D
0x0c9e6c…0ca000 Dummy {f00=0x0161, f01=0x0190, f02=» ! )0 2 ' 0 9 B M Y e q ~ 3 H ] s 6 Q l ! $ $ ' + K / v 4 ? ? F W J @7 z
0x0ca000…0ca194 (1, 20) Dummy {f00=0x0162, f01=0x0190, f02=» @g@i@k@ "0 ( #W H % W % 6 0* 2 W ? A o W o ~H h~ ) !PL@ < ~E h~ ' !< A ! & !@ W 2 W 09 #XA _ 2 !j !! j ! !$ 60 ! ? A _ !A <
0x0ca194…0ca328 Dummy {f00=0x0162, f01=0x0190, f02=» ? A _ 0# !< " ? #@ T 0' P9W I 46 0 ! W 0 ! : 6 h W h 8 ? 6 0# !< " ? 0# !< " ? ( 09 ( #)0* A h U ! < h 8 ? " ? < 9h ! !P !W !j !! ! =f "d "!U d !
0x0ca328…0ca4bc Dummy {f00=0x0162, f01=0x0190, f02=» ? & ? ? 0 9 ? " W @g@k !Ai !? $@kAgW #@gAk@i ! j !! ! Uj ? 60 < h !TL j !! ! 4 ) 5 ! h ! !T ! R h !U !P7 !_& h ! !X&W#@ T 0' P! W I h P Wk ~Ub~ "~
0x0ca4bc…0ca650 Dummy {f00=0x0162, f01=0x0190, f02=» ! _6j " - 8 & ?!@ P 5Ii Ik Ig A|W 4@|@ & , 3hZ !PDj !! 0 (P 60 !_<( 4 !, @h $ !ThI|m2 ? 2 """"#$"$$$#$$"""""%&&"""#''" !_h( !? 4( !_ "_ _ ! j !! ! _ _ A| "
0x0ca650…0ca7e4 Dummy {f00=0x0162, f01=0x0190, f02=» Af4 L@d@g0 @ W< %Ad01 02 R Ag00 ! T 01 02 @dW Hd 01 02 @ 4 ! ! L Ah $ !6 00 W. "0 @| uA j !! ! j !! 60 _N ! 6 iiWJ@e !L ! ;h ! !P !@i ! 9( Jh * !TX6 rr rrW !
0x0ca7e4…0ca978 Dummy {f00=0x0162, f01=0x0190, f02=»! 6 & ) 0# !<) W30# !P(?)0# !<) $W ( 09 # W a / " Hi b " !P 6 ! "?* ! "?* ! "?* ! "He U m " 0# !<) ?+( 01 02 0* 0' TJ U m ! P Q 0* , ~8d ! ~ W f ! ! 0 0/ 0% ?+ h X
0x0ca978…0cab0c Dummy {f00=0x0162, f01=0x0190, f02=» U j ! !0 P b ![ ! ! ( 4 @h0B ! P # ( + ?,0. <-AhW %hZ ( !<- % (:- ! ! ( $ 2hZ ! !T !j !! W % 2 .../ !X b !U ( W )W =f "d "!U d ! 8T 0: (+0; + j !! 1 ! & 0' T/0* V
0x0cab0c…0caca0 Dummy {f00=0x0162, f01=0x0190, f02=»! 4 ! U 6 _l; 2*0# !T Wo0 "T j !! !b WX WU Wb Sf !WAH{ W<09 " m W W 0# !T3m W 0# !T&m W 7h U ! V !!4 !"4 80 1& 0 6 ''' ' y ''' "W% ," "0 We08 W "_ '_ !08
0x0caca0…0cae34 (1, 21) Dummy {f00=0x0162, f01=0x0190, f02=» T O j & % . i } 8 [ D S q d E = G B 0 M 8 7 > D Z ^ L q - Y c + ? P0:;=
0x0cae34…0cafc8 Dummy {f00=0x0162, f01=0x0190, f02=»TTTTTTTTTTT9 ! I D DELETED INSERTED + ON UNIT:U i + WITHIN JOB: k RECOVERY RUNNING. RECORD CORRECTION F FREEZING OF BATCH l CONFIRM RECORD INSERT CONFIRM RECORD DELETE: RECORD MUST BE VERIFIED ENTER
0x0cafc8…0cb15c Dummy {f00=0x0162, f01=0x0190, f02=» FF* RECOVERY OF : k B : l RUNNING. ( ',!.%)$&"#-* $ * 0 7 ? G P Y c0 m * 5 A Q c w
0x0cb15c…0cb2f0 Dummy {f00=0x0162, f01=0x0190, f02=» L @ D H( &Ad1 An@m 6 0 _ @n_ ( !'( _&3 @d0 0} h* h _? ! 4 6 99 W 2 !8 "8 #8 W j " # L j " "# P|j " $# Pr? ! !6 +; ^# 8Zb !" Xj !# 'bc (c" 3? 1? ? @ W' ## 7 ! ? " 5 " " ! T T
0x0cb2f0…0cb484 Dummy {f00=0x0162, f01=0x0190, f02=»2 _ !0 #$} & 2 _,4 j 1! ! !j 2! ! 4 R ! 4 Hd ? ! 8T & ( !0 #$}? ) _ ! Zb "" " < $ U@f@e0 " An 2 _ ! : ! @ ; W < " ! j " j $" Af07~ 0 "P 07~ j~#!
0x0cb484…0cb618 Dummy {f00=0x0162, f01=0x0190, f02=»e ! 8R AnW* ! " _W) !$ ! $ W !W 8P )B? 0: (+0; +@eAf ! ! 0 %%In 0 $%Ao 2 W ) !Ao _ ! 8T !_ ! 8 ! ( TJ? ! & ! Xb !# ~ " ~ T $ 0: (+? - !?
0x0cb618…0cb7ac Dummy {f00=0x0162, f01=0x0190, f02=»~ ~ RR j !! !07~ j " V0 "P W07~ " !j~#! ! T j " $ j !! 1j !! 2 !!4 1 W 3P W An 2 _ 4 4 ! ! ! P 2 _ 0: +1 0 ! !G! "?! !r ! " ! ! # !An@m 6 p _ 0 ! _7Hm_ #P Q 2 ! " _ 0$ 6 A _ $Gv ?
0x0cb7ac…0cb940 Dummy {f00=0x0162, f01=0x0190, f02=»0} # * h h _? ! 4 1 Ad!hq @dAn@mAe 6 ?$ " &z 2 %&%4 5W 6Jd P AoHe @o W 0: z ,AnAo@e 2 ''()*++ _( (z T &PU 1 2 ,,-./. # %XjAo _9 z! X#b !& "z <0 $z zU0: z ,@e0 " *k0 " _ He% k0 k<1Id $P )SW "T k
0x0cb940…0cbad4 (1, 22) Dummy {f00=0x0162, f01=0x0190, f02=» = =_=0 !P #_R * , !" 3 h &U !T , , _ ,& !8'W:6 1? >h ! !P 0 /8 W 0 /< ? W %W ( ?2 2 j k | d t 1 2 s 3 R
0x0cbad4…0cbc68 Dummy {f00=0x0162, f01=0x0190, f02=» c ! Y f P ] c *AN010203040506070809101:232:3:4:595:6:7:8:9:A N T GETTT FILESIZEDATE:TIME:CREATEBALANCE:JOBNAME:USERFILEFREE %SYMBOLIC:BATCHHEAD:SYSTEMFILEVOLUME-NAME:15 FILE SPACE15 FILE-SPACEUSERFILE UNITNAME CONTENT
0x0cbc68…0cbdfc Dummy {f00=0x0162, f01=0x0190, f02=»XE-XXXXE.XXE.XX T 0 * h d m p n o i m ] f ! ^ g T U h d ' l a e k e k 30 - - * 3 h d 31 _ - - 32 Y - - h j :U i g [ c f ! " # # b $ % # & U
0x0cbdfc…0cbf90 Dummy {f00=0x0162, f01=0x0190, f02=»@ ( X% I @ ) X% J @ * U e f 4 ` &g 5 $ K fA ! d &A + $ M fA " d &A , $ N fA # d &A - $ O fA $ d &A . $ Q fA % d &A / $ R fA & d &A 0 $ S fA ' d &A 1
0x0cbf90…0cc124 Dummy {f00=0x0162, f01=0x0190, f02=» " $ & ( * , . 0 2 4 6 8 : < > @ B D F H K N R V [ ` f n v ~ (0 <0 > ! # # & F < l Q
0x0cc124…0cc2b8 Dummy {f00=0x0162, f01=0x0190, f02=» T ( !Ad1 9An@m 6 6 W,@n_ ( "2( _!@j3 @ @d0 0} 4 h _= _< ! 4 6 Sfl{ W j ! Ii ! 9 W ) 9 m ,P ) ? ;j !& 'bc c b W 0* ! 6 $ r"? 7" v$ !r? 8 Tj *P ? 1? " Q$ FWK $ $< ?
0x0cc2b8…0cc44c Dummy {f00=0x0162, f01=0x0190, f02=»/ !T; 6 MMMMMM~~MM~~MW|Iiy ! %n h / !T ,JWX ! %P h / ! 6 3 W1Ak_+ !" %% h / !T , W Hk ! c % c c _ & !? 0 %% 8? !6 (DTdt_ * ? + ? ,< j ! ! 9 @iW Ai? P ! : ? A W @ ! < A ? @ ?
0x0cc44c…0cc5e0 Dummy {f00=0x0162, f01=0x0190, f02=»% A0; ,0: , $ ? "r= ( 2 07 6 'h #Q !j , w j 1!w!Ii j 2! ! !j "" j $" mHj -P !2 _ &{ { )P !Ix 6 * ? &{ { *P !2 _ ({ P !2 _ -P !2 _ { + Ii 0; {$* p!0
0x0cc5e0…0cc774 (1, 23) Dummy {f00=0x0163, f01=0x0190, f02=» !* & & & ! 5 0 "}H{ Ij 4 !6 H" W 0; {$*0 P _4 0 "}_? 1 !6 TT _P - PJ !6 ??_&Aj p! u # $ j $!! {1j #!! {2 $ #? &{ @jP { &{ W &{ @jP H{ m *" ! I{ ? % & 4 0 6 55 555555555W 'I ( W Ij I
0x0cc774…0cc908 Dummy {f00=0x0163, f01=0x0190, f02=»Hi! ' 0 (T W $0% "W 0% 4 @g0 0} { 1 7An@ An2 _ 0 0}@n_ 6 5 ? Ag@ij !m ) 9 AiW 0; {$* p!0 AnP 0 ! 0% 4 2 _Q 4W XT 8 2 Jgwjm & {!_: 2 _ ({ P _ &! 1 2 -P 7 nn &{
0x0cc908…0cca9c Dummy {f00=0x0163, f01=0x0190, f02=» "|Bn { |? 3? @n ! " P W0 % A0; ,0: , T W % & 0 ($}2 ? &{ 0 0}4 0 0} { 1 8An 6 _ @n_ 2 Wm * ;j !& 0; {$* p!0 0 ! 0% 3 6 ++3 ({ T j !&m j {!& ! )P R W 2 W &{ _
0x0cca9c…0ccc30 Dummy {f00=0x0163, f01=0x0190, f02=» 4 & ( $j ! ! !4 & ! c # ( % !j ! !! !j ! ` !4 & " c # ( & "j ! "! !j " ` "4 & # c # ( ' #j ! #! !j # ` #4 & $ ( ( $j ! $! !j $ $4 0
0x0ccc30…0ccdc4 Dummy {f00=0x0163, f01=0x0190, f02=» w! 0 ""j !Q W = ! +W !@ !@ 4 j !Q * & ' @d@ 4 % ( H + "20 !!" " !)I 0 # W 0 # & ' % y %Ad W < ! !4 I /W . ( a - !+ 7 !) !< # j ! ! ! # 7 j ! !
0x0ccdc4…0ccf58 Dummy {f00=0x0163, f01=0x0190, f02=» wHj $ # 4 j y C o 7 7 $ l 0 C v h o 9 - X ! Y G ~ y 7 N & " ' v
0x0ccf58…0cd0ec Dummy {f00=0x0163, f01=0x0190, f02=» h @ m 24 COPY $ $ TO BE COPIED: q @ NEW $ NAME: v @ m U 20 $ - - * h d7 21 ? - $ - 22 @ - $ - 23 > $ 24 COPY $10/.-,+*)('&%$#"! 2 0 ;
0x0cd0ec…0cd280 Dummy {f00=0x0163, f01=0x0190, f02=» ! # * M C Q @ : : 7 7 $ l 0 C v h o 9 - X ! Y G ~ y 7 N & " ' v
0x0cd280…0cd414 (1, 24) Dummy {f00=0x0163, f01=0x0190, f02=» e t 4 $ f c# # d# 7hZ c! 7 c! #2 W bch b!Z7!T W c N? b% ! b_ b$ " b ,# c bch b!Z2! } c! b$ " b_DW ( % $N b/hZb" c!T b/ >j c! b c! b$ " a W b# # b*a & &a_ a c! ac bch baZ7!
0x0cd414…0cd5a8 Dummy {f00=0x0163, f01=0x0190, f02=»)c ' ) ' j (! '!f c! ! d!? ` 4 j b c a j c!a! b b! c!f cb db4 j b u a4 u $ #@g c hZ a b! +2 jc!! b"c W 6 b! !jc!! b"c b! !W, ! b! !Hg ( 'b `3d b!Z` b! ! !@g _ " ,0 b! ! `bh `!Z2
0x0cd5a8…0cd73c Dummy {f00=0x0163, f01=0x0190, f02=»b! ! ' j '!! b ' j b!Z= 'b '!Ag_ 4 b!jc!! b c ` m ` f b!d b` `! ` b` ` !Hg '`4 1& P # W !05 p! u ! " !! w jw!! {1j !! {2 w d "2@h u" ! Kh !@k ~60 oT @j~ # # - b o -( q0 TF b , ! , " , # E h )
0x0cd73c…0cd8d0 Dummy {f00=0x0163, f01=0x0190, f02=» &%W #$d &%( A b ~6Ak_Dj~ b #* Ii !"d &%W #$d &% ~6Ak4 + 1& P W !2 1& P # W ! 4 @l #hQ 0 !0 6 F MMMMMM? !j !! !_9 "_> Hj j !! {(j { ! % { $! 0 ""Il _h !Ah? Al - ! j !!
0x0cd8d0…0cda64 Dummy {f00=0x0163, f01=0x0190, f02=» !: ":H "< #:H #< $:H $< %<H %:H "8 # oU U b ! " # $ + ~E U # hQ 0 !T 2 W W #_) !j !! !( "Q Ii "_H ! `! a! !07 h )Q ! ! # `" a j a` j a` ! ( !_ $ 6 1j b#~ W j b#~#W j
0x0cda64…0cdbf8 Dummy {f00=0x0163, f01=0x0190, f02=» ! " `" a j a` j a` ! p 4 !jo ! - h] $ !T 6 #+jo ! ! !" %_*jo ! )_ jo ! +_ ! !_+J .jo ! ._/jo ! , !4 6 b @h@k hQ 2 !0 2 ? !j b! - b! !j !! H ;W 9j ba baj b! , ! b!__ j b o "
0x0cdbf8…0cdd8c Dummy {f00=0x0163, f01=0x0190, f02=» _ %b!b5 j b!U b!_ HkJ cWE , a ! b jb!! b!+ b"$ $ # !07 h )Q ! 0F a #? !4 = 0 !01 02 T$0* 0' P 0* ( " ;_* 9_/ _44 0 i } - p ; [ s = e 9 ; 6 ` e 0
0x0cdd8c…0cdf20 Dummy {f00=0x0163, f01=0x0190, f02=»GTH#V:#G:#A:GENERATION VALIDATION ACCUMULATION 9Z9999XXXZZ9XE+XXZZVZZ9ZZVZZZ! 1 k " ( % & ) 0 ~ k: " $ % & ' ! " # $ % ) 0 ~ 1 $ : m ( NUMBER OF POOL-UNITS: # d A : ! C ACCUMULATOR POSI
0x0cdf20…0ce0b4 (1, 25) Dummy {f00=0x0163, f01=0x0190, f02=»# d A : ! C B - MAX/MIN K M A V I DUPLIC. SPEC. #L:< B LAYOUT> #V: G #G: F #A: H NO NO/POS - D I E T E C -ITEM HANDL. % + 4 ? J
0x0ce0b4…0ce248 Dummy {f00=0x0163, f01=0x0190, f02=» f 0 !P * 0 "P + , * , +! *5: + 5 5 *f * 8 j % , + , +5 *5W * , + c : E bch b! !Tk c! h & c"T " "Hi #L c" bc a , ach ba "T cb c!W. bc :h ba !P b , b T ( # A c ,T c!_hHi 0 -.0 &' &W 0 120 ,-
0x0ce248…0ce3dc Dummy {f00=0x0163, f01=0x0190, f02=» Wf b2 W? ;2 W Ik Ak 2 ? W c c! bch b!Z7!P c!WF c! c % a=hZa! c!P "5 c!W)Ag >W @gT _F c! c _ ? !T 0#a !T _ "T ( ) , $a #a7 W60#a !T W-0#a !T W$$
0x0ce3dc…0ce570 Dummy {f00=0x0163, f01=0x0190, f02=» a ac bch baZ7!T( bc*b !,b : ; W "b& cb_ c!,c _C( $ c ! & ! W Kg !!4 c! bc b "b Uj c b m b b a 4 Ii 1 W 1 4 Ii " !W ! 0 " P !, ! ? Ij { j 1! !j 2! !Hj ;j !&m $ r"Ii' U ! ( j !! (
0x0ce570…0ce704 Dummy {f00=0x0163, f01=0x0190, f02=» ! @n ! Ij 0 : 0% P8: _ 0 && du d ! 0 ## #_* 4 ! !( % A _ 0(I I I I Ij& # x 0+ )+ W20+ *+ W(0+ ,, W ! $ 0) / T W 0) - T ! 2 W "? I I I I IjO2 !0* / 2 W$0/ Am6 ! b
0x0ce704…0ce898 Dummy {f00=0x0163, f01=0x0190, f02=»T %y0 %%_ W}? ( 0(W !0* ( 1& ? 06 . ? Hi He 0 ( #0 T ,I ! He $W I # 0% ? 0^ $ % 0 0 < 2 ? 2 #? 0 0 ? $ 2 !" #$% &'(2 !" ) *0 %% ( @h u!He8Kh 0 % $
0x0ce898…0cea2c Dummy {f00=0x0163, f01=0x0190, f02=» @ #?+A @ u!Jh _ @ !^A _DA ( .He @h u!Kh ( ! u! du d ! _3 $? $? , 2 O > ! , + @ z f Y { @ Z ^ o m w ` 8 J # 1
0x0cea2c…0cebc0 Dummy {f00=0x0163, f01=0x0190, f02=»HFIELDLINE STARTLENGTHNUMBERRECORDSTART:V:G:A:(#A:...)(#G:...)(#V:...)123456789 1234567890CORRECTIONGENERATION VALIDATION ACCUMULATION AAZ9ZZXXXTTTTXE+XXAAAAAAZZVZZZ 1 $ : e ` m < SIZE: f ` ! ? B : + " . B OF POOL-UNITS: D # 1 2 3 ( 4
0x0cebc0…0ced54 (1, 26) Dummy {f00=0x0163, f01=0x0190, f02=» = -ACCUMULATOR:A m ( . SPECIAL HANDLING: @k M H L G o@ ! p@ " U 21 USER $ - j # K > : F $ D % A : & & . OCCUPIED C A : E ( KEYED INPUT ( Y /N/C): l@ ! . MINIMUM A > : @i ' MUST EN
0x0ced54…0ceee8 Dummy {f00=0x0163, f01=0x0190, f02=» ) : @t@ $ INITIAL CLEAR ( Y /N): u@ % . SPECIAL HANDLING: @k M H L G 2 N F o@ ! p@ " U # ( . 4 : @ F N V ^ h r |
0x0ceee8…0cf07c Dummy {f00=0x0163, f01=0x0190, f02=» R ` @e kU lU( .AdIe 1 0W 1 ,An@mIe W 6 . _ @n_ Ief( $A6 _<A W A W A A Ae@d_D@ $V 1 ,An@m _L@ T Ie ! 4 @e@dKeN@ @ @ $ * h h _ + , 2 _ 0 1 ,0% _ @e kU lU( ,AdIe'1 *An@m 6 $ @ P $ _
0x0cf07c…0cf210 Dummy {f00=0x0163, f01=0x0190, f02=»(+0; +( > " 1 W 1 "An@m h 2 _ _ 0: (+0; +0% _ "l lU h " 1 W 1 " l "2 ! 4W 5 T ! +T | j " &| W E !" ! 0 %, ! b &l b &!Z2b '( "lW b &k !k # 0 # 8~@ P $0 #$@m0
0x0cf210…0cf3a4 Dummy {f00=0x0163, f01=0x0190, f02=»2 _ _ 0 ~P + , @z6 Az _ @ @z $XP@ ~U 0 , P& b~ ![) !0 + T b~ ![( !b~ ![ ! ! (41 .0 %%0 &&0% $ _ 6 ? ? + , 6 h[ * !T06 $ $$ 0 , T 0 , @ T 0 + !_6A X @ T ? &? @e( +AdIe 1 /W 1 +An@m 6 -
0x0cf3a4…0cf538 Dummy {f00=0x0163, f01=0x0190, f02=» 2 _ 0 1 +0% _ kU lU( xAdIe 1 (W 6 1 #W 1 An@mIe W 6 K @ T $ _ @n_)@ $V 6 Ie ! 4 @e@d ' * h h _sIe ' @f6 _ AfAe@d_ 2 ( 0 kT (!0 lT (! %0% " _ ("6 ( , W - ! 2 AzT ! '
0x0cf538…0cf6cc Dummy {f00=0x0163, f01=0x0190, f02=»6 ( _W %T ( * 2 ( )gK " '"( g " #2 $T # '#( _ Ub & 5 + *P ( - { &{ 1 -0 ! 0$ mU_" m 50; {&* p!0 $ '$( D0 $} | @ 0 2TX 6 ( W? 0 $} 3 T l $_ & A %T @ _ @ W'" 2 !W 2 " 2 ' #$%&@z 7
0x0cf6cc…0cf860 Dummy {f00=0x0163, f01=0x0190, f02=»b? )? ( h < Q j p % t " d w ( h X " ! Y "TOKEYVIAFILENAMETESTUNIT
0x0cf860…0cf9f4 (1, 27) Dummy {f00=0x0164, f01=0x0190, f02=»X U & U 45 ? - < & ' 1 71 I 5 J 71 I 7 F ' ! 9 : ! k < 9 : " l 9 : !A k < 9 : "A l % ' ! 1 ' ! ) 53 % A = 52 % < = 51 % = ; :U
0x0cf9f4…0cfb88 Dummy {f00=0x0164, f01=0x0190, f02=»> 6 / : ' h ! : ' FETCHING FORMAT: FROM DISC. @ U $ ' A - @ : # A - B : -e@ ~ 60 * h d0 61 6 62 > 63 6 / : 64 > / : 40 ! * h d3 41 G <
0x0cfb88…0cfd1c Dummy {f00=0x0164, f01=0x0190, f02=» ) / 0 1 ) 2 3 4 ) 5 6 7 ) 8 ! & + 1 7 = C I P W ` i r |0 " 0 ? N ] m } + # I $ l & * 2 F
0x0cfd1c…0cfeb0 Dummy {f00=0x0164, f01=0x0190, f02=» x ; J l p t2 $WU6 _ PCWD1& *T !05 T W/ W- W)6 ! W @( ( SUW 6 W W W W W 4 6 _ 6 D I 5 W W4 %Q / 1 3 @ @ @ @ T U0C T 1& " R_R AW A _[K H 1& 'A _lK !05 % - ! _ _ W'W
0x0cfeb0…0d0044 Dummy {f00=0x0164, f01=0x0190, f02=»& %_- 2 I i W Wh ' 80G 40 TP W WJ %Q / 1 3 @ @ A T, U0C T 1& # W W 6 ! W W ? AW A ? ' 80G 6? K "H 1& 'A ? K 3I $ " W !05 E - ! ? W W W W %_e _j _ W WA !_% W W 8 '0
0x0d0044…0d01d8 Dummy {f00=0x0164, f01=0x0190, f02=» 8 '0G 6 2 W _ W _&2 W _2 8 0G _H0 @ ' 80G @ ' 80G 0 & ? U0C T 1& )_D U0C T 1& (_S # # " T - ! B4 4 8 " '0G 0 <0 T@ 7j & j ( % 6j !% 5j " 1 -An0 !
0x0d01d8…0d036c Dummy {f00=0x0164, f01=0x0190, f02=»$2 / b /W b $ 'I ` F `!*` a`h a! ! aW W j b b ` ` j ` 1 % `* ` 1j 0 1 ` 3 $ `* ` 3j 2 3 `" W-d " ` `"0H `f " f !X 4 d " ` `"0H `f "4 0 0 0 "P 4 90 : 6 ? B j
0x0d036c…0d0500 Dummy {f00=0x0164, f01=0x0190, f02=» 1 % `* ` 1j 0 1 ` 3 $ `* ` 3j 2 3 `" Ej ! !WRH ` ( ` ! ! Dj ! ! 8 0G f !8 4 Ba & j W 8 0G 4 4 ' 80G 0 0 %P 30 T 4 ' 80G 4 " C $Q @ H A !01 02 P : ? 0*
0x0d0500…0d0694 (1, 28) Dummy {f00=0x0164, f01=0x0190, f02=» ) @ _ _ ) A _ & m W @ _ ) H 0 T 0* 0' P R m Wf" 5 R 0* 0 /P%H ) m WBm W m 6 !W H ) m W m W m 5 f () m H ( # $ / @ /! ! " ? 4 4 4 4 4 % v } K
0x0d0694…0d0828 Dummy {f00=0x0164, f01=0x0190, f02=» ` b j } & V A ! - 7 B O o ! &&FILENAME KLARDEVICELISTNING AFBRYDESEXPIRATION DATE:FLOPPY DISC SKRIVNINGOLD VOLUME SEQUENCE NO:OLD DATA SET IDENTIFIER: 99999999999999999-99-9999999999999999999999
0x0d0828…0d09bc Dummy {f00=0x0164, f01=0x0190, f02=» S l K , N , K L , K I , SLUTD % + EJ GODKENDT N KLAR , N AFBRYDES , 1 * NUMBER: g JOBNAME: k BATCHNAME: l DATO: S TID: T IND: g UD: % J : # G - H : M
0x0d09bc…0d0b50 Dummy {f00=0x0164, f01=0x0190, f02=» 1 7 ? H X m 0 0 , A V l & 1 < J Z j ~ # 0 5 d EQUENCE NO:OLD DATA SET IDENTIFIER: 99999999999999999-99-9999999999999999999999
0x0d0b50…0d0ce4 Dummy {f00=0x0164, f01=0x0190, f02=» r f j n 0 Hf ( Hg ( j I 0 ##Ie !l_0 ! $ % & Ii I " " ( I 0 $'Ii # 3 " . I 0 $ W .W 0 ! ( % ( % !4 @e@f@g 6@l l eIe ( 5@l l f( If 7Al l g !Af( hIg !W` 6@l l eIeJ(
0x0d0ce4…0d0e78 Dummy {f00=0x0164, f01=0x0190, f02=» " !P I A ! ! ! % _2 ! W ! !4 % @e@f@g@ 4 ! " # $ * + , 4 o5 Hi 0 h / !Tr 6 )'''''48fD]]NW[A A A jo ! ! ! ! h / ! ,p_ A jo ! !W:A W.jo !] A A W*A jo !]!W jo !]#A A !W jo !]" !A jo !
0x0d0e78…0d100c Dummy {f00=0x0164, f01=0x0190, f02=» 8 h ) c#T # # d0 3 ( `c_*0 T ` c d H 0 $ 4 I 4 " " j " " j " " $ . ! # T ! 0 "" U W !+ !4 0 *0I 0 0 "X 0 *P A _ @ 0 )X$_ 0 n : 8 E I w U _
0x0d100c…0d11a0 Dummy {f00=0x0164, f01=0x0190, f02=» < f M f M A ! ! ! % _2 ! W ! !4 % @e@f@g@ 4 ! " # $ * + , 4 o5 Hi 0 h / !Tr 6 )'''''48fD]]NW[A A A jo ! ! ! ! h / ! ,p_ A jo ! !W:A W.jo !] A A W*A jo !]!W jo !]#A A !W jo !]" !A jo !
0x0d11a0…0d1334 (1, 29) Dummy {f00=0x0164, f01=0x0190, f02=» d 0 $}j *!! x0 @l 2 ? j x! ! wx xyj &"x !g:e x y" e @ TW( ' )g: @l? j xy wj x! { W< .V xwj &"w W j ! " "Hn ' wxjx " & wx wxf xwj x! { wxj !! x( % j " &W ( ' j ! " " { 0; {$* p!0 0: x*6 VVVVOVOVV V "!H '0 **P I %!@ A W
0x0d1334…0d14c8 Dummy {f00=0x0164, f01=0x0190, f02=» x* !u uv_ 0 j x! ! 7 ZH_ j " "jx " &"x* ( 3 Zf_q 1Zm u ? !u (R j "" j &"x u !? ! _ j " & wx x 'jy " xy x u$x Aj " $( xw u 4 /_ /Z j " &( * 1Z)_5 x* wx x 'jy " g2 #gYuP W j ! x0 , + & # ( #2_
0x0d14c8…0d165c Dummy {f00=0x0164, f01=0x0190, f02=» : ? ,wx W x* WY uj " "( ? j " &( * % 1W 0 : j " & *1 1 W u ! u ! u ! 4 : jx " & 1 w*j " w wx wx j &"w xw? w w !( % _ ' xw g2 # ( ( #g? g "b & AlW '2 : 1 _ : ? $ )g: ' 4WAH !W9AlHl
0x0d165c…0d17f0 Dummy {f00=0x0164, f01=0x0190, f02=» *PE - { ) ? 1 0 ! 0$({ ' x( ' ' wj " jy " ? &{ mU_ m $ ' ( @lW !g: ( nmW *W * n An xIl j ! { W . ( ' !g: j x) w < ? < ? !j &m &j "y ( + ? A ? < 0 @vP C 8 ? ' ( % 2 ! C 8 0 @v< "!_y # "= g "
0x0d17f0…0d1984 Dummy {f00=0x0164, f01=0x0190, f02=» ) 0 @v $W &z &| &{ 0 @v_U &z &| &{ 0 $} 5 ^ # + "@ X& ! : !0# !X 0 " %P @ 0 0 $} 2_R * ' #2 $T -_ #_-@ P 0 $}A 3 W Ay@m 4 @ 0 0 $} 2V @y@z@oA # &{ &z &| h Ae0 0} 4 2 $%%&' uf
0x0d1984…0d1b18 Dummy {f00=0x0164, f01=0x0190, f02=»* u$x j $" 7 :(W .:( uf *y x *j &" _* u 4 :(j "" 7 :(W j ! "u u 4 :( w* x*j x! { ?) h ( ' 0 kP W1( $ ( % W ( % # 0 @vP (z Ub &k "V 0% " ?(I + #P R 0 @v0% # b &l ?*A 0 @vP 6 &z ?+0 @vT/( ' z W ( % 6 !
0x0d1b18…0d1cac Dummy {f00=0x0164, f01=0x0190, f02=» I H 4W I 5W H~ I (W ' A P A WB0 @vT ( ' $W3 $W I K @ 0 0 $} 2TmH 7 Uj &"* W 4 TT0: z , { 0 @vT % 4 * *T4 m 4W mU x*0 @vT % I S2 * An0: |"- wx g 0 WYH ( 3 # W &| 0% ' 0 @vT &z @ P $0 $
0x0d1cac…0d1e40 Dummy {f00=0x0164, f01=0x0190, f02=»_B 4 ! ! + 9h # !T}6 ,, !0 @|Thj !! ! j !! 80 _K ! $ !A !@( "90# !T2@e@i@k !" ? 'hZ 2 !TP &6 " _ Ai_8Ae_<" v :WpAkW ! ( ~ !~W)j !! C 80 U !b ! !
0x0d1e40…0d1fd4 (1, 30) Dummy {f00=0x0164, f01=0x0190, f02=» = N D ^ P R 1 y s n G a 3 4 X Y ! - ! " % & ?MDA FETCHING FORMAT:
0x0d1fd4…0d2168 Dummy {f00=0x0164, f01=0x406c, f02=» ( > : 8 @RRR_,4 j 1! ! !j 2! ! L R R ! 4 t V@ h & n XX | " T & & g XX " T & ELEMENT
0x0d2168…0d22fc Dummy {f00=0x0164, f01=0x018e, f02=» @ H IDENT DE1201 TRA 10.0 80-10-10 F1 O1111 REL 10.0 80-04-11 ENT12 H $$$TRA1 X ENT12 j > : hA20 ATTDB ATTWB CANC110 CANC12F CLEARB DECLRN. DEDISC- | B > DEPOOL DERR DERROR FMOVE RESTOR T:DISP T:ERAS T:GETF T
0x0d22fc…0d2490 Dummy {f00=0x0164, f01=0x0190, f02=» % 4 TT ( < < J F " D Hd ?R ! R8T R& ( RK !0R#$}?R ) _ ! Lb "" R" L B ! D R Y ] ^ _ g
0x0d2490…0d2624 Dummy {f00=0x0164, f01=0x0190, f02=» ! L ! L L W b 0 " @ P ` J F " D L " ! j " j $" Af0R~F0R "P 0R~Fj~#! ! ! !W p c $ !
0x0d2624…0d27b8 Dummy {f00=0x0164, f01=0x0190, f02=» $$ %0X 0X %%0X %% ` . > N ^ n ~ $ ! $ +
0x0d27b8…0d294c Dummy {f00=0x0164, f01=0x0190, f02=» d { J F " D @ !$ ! $ W !W R8P )B?R0R (+0R +@eAf ! ! 0X %%I j z R 3 @ , ,
0x0d294c…0d2ae0 Dummy {f00=0x0164, f01=0x0190, f02=» !_ ! R8 Z ( 8 T H J F " D ! R( TJ?R ! R& ! Lb !# ~ Z % &
0x0d2ae0…0d2c74 (1, 31) Opaque[0x194]
0x0d2c74…0d2e08 # DirEnt {nam=»DEUNPF«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0858, f03=0x0000}
0x0d2c74…0d2e08 IdxSect {
0x0d2c74…0d2e08 f00 = 0x0042 // 0xd2c74 @0x0
0x0d2c74…0d2e08 f01 = 0x000c // 0xd2c76 @0x2
0x0d2c74…0d2e08 gno = [ // 0xd2c78 @0x4
0x0d2c74…0d2e08 [0x00]: C0x0042.0x3.0
0x0d2c74…0d2e08 [0x01]: C0x0043.0x0.0
0x0d2c74…0d2e08 [0x02]: C0x0043.0x1.0
0x0d2c74…0d2e08 [0x03]: C0x0043.0x2.0
0x0d2c74…0d2e08 [0x04]: C0x0043.0x3.0
0x0d2c74…0d2e08 [0x05]: C0x0044.0x0.0
0x0d2c74…0d2e08 ]
0x0d2c74…0d2e08 }
0x0d2e08…0d2f9c Dummy {f00=0x0042, f01=0x0190, f02=» $ P IDENT DEUNPF REL 10.0 80-04-11 P 80-02-19/JAER , * D , '* THIS PROGRAM UNPACKS NEXT FIELD N , (* FROM CURRENT ATTACHED FORMAT AND ~ . )* MOVES THE UNPAKED VALUES IN THEIR . ** CORRESPONDING ITEMS. THIS COULD
0x0d2f9c…0d3130 Dummy {f00=0x0042, f01=0x0190, f02=»ETERS : BUFPOS = CURRENT BUFFER POSITION z > P* OPT = 1 = CORRECTION MODE 0 < P* = 2 = PRINTOUT MODE r @ P* -INPUT VARIABLES : PINDCB = FORMAT BUFFER INDEX @ ;*
0x0d3130…0d32c4 Dummy {f00=0x0042, f01=0x0190, f02=»ES : z H P* FBIN1 = NUMBER OF CONVERTED POSITIONS > P* BOOL9 = F FKI NOT FOUND YET Z 6 P* = T FKI FOUND P* 0 +* -OUTPUT VARIABLE : DEBINW2= 0
0x0d32c4…0d3458 Dummy {f00=0x0042, f01=0x0190, f02=»HARACTERS X H P* FMTWK(W1) = NUMBER OF VALIDATION CHARACTERS H P* FMTWK(W2) = NUMBER OF GENERATION CHARACTERS ^ J P* FMTWK(W3) = NUMBER OF ACCUMULATION CHARACTERS J P*
0x0d3458…0d35ec Dummy {f00=0x0042, f01=0x0190, f02=»**************************************************** ~ DDUM DEDDIV < PDIV P $ ENTRY DEUNPF UNPACK NEXT FIELD ^ * P ENTRY FEDIT FORMAT EDITING P* " P ENTRY DEUNPL UNPACK NEXT LINE $ P EXT NOPOOL NUMBER OF USED POOLS
0x0d35ec…0d3780 Dummy {f00=0x0042, f01=0x0190, f02=» FROM CURRENT | P EXT ADJUST P* * P* EQUATES 4 P* L PALPHA EQU X'00' ALPHANUMERIC V PSCHK EQU X'03' SPECIAL CHECK z EJECT PDEUNPF PROC BUFPOS,OPT P CLEAR BOOL9 NO FKI FOUND UNPM P MOVE BIN16,W3 M
0x0d3780…0d3914 (1, 32) Dummy {f00=0x0043, f01=0x018e, f02=» 1-4 C n . P UNPELB,UNPELB,UNPELB,UNPELB,UNP9, 5-9 C . P UNP10,UNP11,UNPELB,UNP13,UNP13, 10-14 C @ P UNP13,UNP13,UNP13,UNP13 15 r PUNPELB P B UNPE END OF FORMAT P EJECT PUNP3 MOVE BIN15,W0 P ADD BUFPOS,W1 NEXT BU
0x0d3914…0d3aa8 Dummy {f00=0x0043, f01=0x0190, f02=» P ADD BUFPOS,W1 NEXT BUFPOS B UNPM GO ON * UNP4 (FTAB) @ P ADD BUFPOS,W2 V B UNPM GO ON l EJECT UNP9 (FLINK) 6 P PERF UNPFLK,BUFPOS UNPACK FLINK INIT NEXT BUFFER * P TBF BOOL7,UNP9A JUMP IF NOT CORR-MODE
0x0d3aa8…0d3c3c Dummy {f00=0x0043, f01=0x0190, f02=»X'-FREEMARK j $ P MOVE PINDFR,DEBINW3 NEXT BUFFER . P SUB WORK(W4),W1 REDUCE NUMB OF OLD FPOOLS < & P PERF NOPOOL NUMBER OF USED POOLS n 0 P DISPLAY 2,W2,W2 DISPLAY DITO WHILE CHANGED PUNP9A & P TBT BOOL9,UNPMF JUMP IF FKI FOUND B U
0x0d3c3c…0d3dd0 Dummy {f00=0x0043, f01=0x0190, f02=» P SET BOOL9 FKI FOUND SUB BIN16,W13 $ P ADD BUFPOS,W1 NEXT BUFPOS : MOVE BIN15,W0 6 P XCOPY BIN15,W1,W1,BPOOL(PINDCB),BUFPOS GET TABPOS r , P CBE BIN15,W1,UNPELB JUMP IF DUMMY-FIELD * % MOVE FDVBCD(W5),BIN15 STORE FIELDPOS (
0x0d3dd0…0d3f64 Dummy {f00=0x0043, f01=0x0190, f02=»13Y,U13X JUMP ON FKI-CODE v P B U13Z " PU13X 2 , P XCOPY BIN15,W0,W2,BPOOL(PINDCB),BUFPOS > & P ADD BUFPOS,W2 ADJUST NEXT BUFFPOS n P B U13Z PU13Y , P XCOPY BIN15,W1,W1,BPOOL(PINDCB),BUFPOS & P ADD BUFPOS,W1 ADJUST NEXT BUFPOS
0x0d3f64…0d40f8 Dummy {f00=0x0043, f01=0x0190, f02=»A,IND1 FETCH INDEX-ITEMADRESS=1 ~ & P MATCH STRG10A,BIN15,W9,FDIR,W0,W1 ( * P ADD BUFPOS,BIN15 ADJUST NEXT BUFFPOS R U13A > P CALL RCNTRL,BPOOL(PINDCB),BUFPOS,DEBINW1,BIN15,BIN7 CTLS * P MOVE FDVBCD(W6),BIN7 STORE MAXLENGTH * P MOVE FDVBCD
0x0d40f8…0d428c Dummy {f00=0x0043, f01=0x018e, f02=» TBF CTAB,U13V JUMP IF KEYED INPUT P MOVE FDVSTR(W1),='C' * P CBL BIN16,W3,U13V H ( P MOVE FDVSTR(W1),='N' NO KEYED INPUT b PU13V MOVE FDVSTR(W2),='N' ME=N P TBF ME,U13B MOVE FDVSTR(W2),='Y' ME=Y U13B $ MOVE FDVS
0x0d428c…0d4420 Dummy {f00=0x0043, f01=0x0190, f02=» p P TBF VERIFY,U13D " MOVE FDVSTR(W4),='Y' VERIFY=Y U13D F & P MOVE FDVSTR(W5),='Y' INIT.CLEAR=Y R P TBF NCLR,U13E | & P MOVE FDVSTR(W5),='N' INIT.CLEAR=N U13E P TBF SCHK4,U13F MOVE FDVSTR(W2),='C' ME=C U13F
0x0d4420…0d45b4 (1, 33) Dummy {f00=0x0043, f01=0x0190, f02=»POINTER:=0 v " P MOVE FMTWK(W1),W0 VALCARS:=0 " P MOVE FMTWK(W2),W0 GENCHARS:=0 8 " P MOVE FMTWK(W3),W0 ACCCHARS:=0 ^ " P MOVE FMTWK(W4),W0 DUPCHARS:=0 P MOVE FMTWK(W11),W0 P MOVE STR64A,=C'#V:#G:#A:' P MOVE DUPL,HEX00 PUNPMF
0x0d45b4…0d4748 Dummy {f00=0x0043, f01=0x0190, f02=» & P BNOK U13G NO FVAL,FGEN,FACC,FDUPL & P CBE BIN16,W0,UNPLB END OF FORMAT . ( P IB BIN16,UNP1,UNP2,UNLB,UNLB, 1-4 C X " P UNP2,UNP2,UNP2,UNP2,UNP9 5-9 PUNLB $ P B U13G NO FVAL,FGEN,FACC,FDUPL PUNPLB P B UNPE UNP1 P
0x0d4748…0d48dc Dummy {f00=0x0043, f01=0x0190, f02=» v > P XCOPY BIN15,W1,W1,BPOOL(PINDCB),BUFPOS GET NUMB OF CHARS P ADD BUFPOS,W1 1ST CHAR.-POS J * P CBNE BIN16,W2,UNP2A JUMP IF NOT FMELI n . P PERF UNPICT,BUFPOS UNPACK PICTURE LAYOUT * P TBT BOOL6,PICB JUMP IF BALANCE FORMAT P ADD BUFPOS,
0x0d48dc…0d4a70 Dummy {f00=0x0043, f01=0x0190, f02=»OVE DEBIN2,W1 WORK:=1 P MOVE BIN15,W1 WORK:=1 6 P CALL FMOVE,STRG10A,IND1 FETCH INDEX-ITEMADRESS=1 < & P MATCH STRG10A,BIN15,W9,FDIR,W0,W1 v * P CBE BIN15,W1,PICB1 JUMP IF 1BYTE ADR * P ADD BUFPOS,W3 ADJUST BUFFERPOS 2B-ADR 0 P MOVE DEBIN1
0x0d4a70…0d4c04 Dummy {f00=0x0043, f01=0x0190, f02=»,DEBIN2,DEBIN1,BPOOL(PINDCB),BUFPOS INDEX-ITEMADR P MOVE BIN16,W0 WORK:=0 : > P XCOPY BIN16,DEBIN2,DEBIN1,STRG10A,W0 LOAD IND-ITEM ADR=1 X P SUB BIN16,W1 FIX MASK X0 * P SUB BIN15,BIN16 MASKOUT=>INDEX VALUE ( P MOVE FDVBCD(W8),BIN15 STORE A
0x0d4c04…0d4d98 Dummy {f00=0x0043, f01=0x0190, f02=»NW1,BIN16 SAVE FUNCINDEX & P IB BIN16,UNP2B,UNP2C,UNP2D,UNP2E PUNP2B (FVAL) J , P XCOPY JOBSPC,DEBIN3,W3,STR64A,W0 '#V:' ` P B UNP2F PUNP2C (FGEN) , P XCOPY JOBSPC,DEBIN3,W3,STR64A,W3 '#G:' P B UNP2F ADJUST PUNP2D
0x0d4d98…0d4f2c Dummy {f00=0x0043, f01=0x0190, f02=»T BINNUM=>STRG n 0 P ADD FMTWK(W11),BIN15 ADD NUMB OF CONV CHARS , P CBE OPT,W2,UNP2G JUMP IF PRINTOUT MODE J 8 P MOVE FMTWK(DEBINW1),DEBIN3 SAVE NUMB OF ACCUM.CHARS z P B UNPMF PUNP2G 4 P MOVE FMTWK(DEBINW1),BIN15 SAVE NUMB CONV CHARS
0x0d4f2c…0d50c0 Dummy {f00=0x0043, f01=0x0190, f02=»BINCON,DUPL,DEBINW1 CONVERT BINNUM=>STRG 2 P MOVE FMTWK(W4),BIN15 SAVE NUMB OF DUPL.CHARS 0 P B UNPMF GO ON f P EJECT | PU13G * P CBE OPT,W2,U13I JUMP IF PRINTOUT MODE 0 P MOVE FMTWK(W10),=X'50' NUMB OF CHARS 1:=80 < P CBL FMTWK(W10),
0x0d50c0…0d5254 (1, 34) Dummy {f00=0x0043, f01=0x0190, f02=»F CHARS2:=0 v P B U13I PU13H $ 4 P SUB FMTWK(W11),FMTWK(W10) COMPUT NUMB OF CHARS1 0 PU13I h MOVE DEBINW2,W0 OK t B UNRET UNPE " P MOVE DEBINW2,W1 END-OF-FORMAT UNRET RET PEND P EJECT P
0x0d5254…0d53e8 Dummy {f00=0x0043, f01=0x0190, f02=»ST BUFPOINTER 1B-ADR ~ 0 P MOVE DEBIN1,W1 NUMB OF CHARS TO COPY 1B-ADR $ P MOVE DEBIN2,W1 STARTPOS 1B-ADR P $ P MOVE BIN15,W1 MATCH STARTPOS:=1 x 4 P CALL FMOVE,STRG10A,IND1 FETCH IND-ITEM-ADRESS=1 & P MATCH STRG10A,BIN15,W9,FDIR,W0,W1 ( P CBE B
0x0d53e8…0d557c Dummy {f00=0x0043, f01=0x0190, f02=»OVE DEBIN2,W0 STPOS 2B-ADR PUNPFL2 " P MOVE BIN15,W0 WORK:=0 0 @ P XCOPY BIN15,DEBIN2,DEBIN1,BPOOL(PINDCB),POINT INDEX-ITEMADR N P MOVE BIN16,W0 WORK:=0 < P XCOPY BIN16,DEBIN2,DEBIN1,STRG10A,W0 INDEX-ITEMADRESS=1 P SUB BIN16,W1 FIX MASK X
0x0d557c…0d5710 Dummy {f00=0x0043, f01=0x018e, f02=»N NEXT BUFFER x P RET P PEND " P EJECT 0 P* > 4 P* UNPACK AND EDIT PICTURE LAYOUT IN LDISP H P* PUNPICT PROC POINT P MOVE BIN12,W1 LDES-POINTER , P XCOPY STATSH,W0,W1,PICSTR,W13 COPY '<' PPICM PICTUREST
0x0d5710…0d58a4 Dummy {f00=0x0043, f01=0x018e, f02=» x * P CBE BIN16,W0,PICS JUMP IF 'S'-CONVERT P IB BIN16,PICP,PICE,PICX 6 PPINC V . P XCOPY STATSH,BIN12,W1,BPOOL(PINDCB),POINT b PPI00 P ADD POINT,W1 NEXT BUFFERPOS P ADD BIN12,W1 NEXT LDES POS 4 P CBG BIN12,BIN15,PICR END OF PIC
0x0d58a4…0d5a38 Dummy {f00=0x0043, f01=0x0190, f02=» PPICP '.'-CONVERT . P XCOPY STATSH,BIN12,W1,PICSTR,W11 COPY '.' P B PI00 P PPICE 'E'-CONVERT ` & P ADD POINT,W1 TAKE NEXT BUFFERPOS z ( P SUB BIN15,W1 ADJUST NUMBER OF CHARS P B PINC PPICX . P TBF SCHK2,PINC JUMP IF NOT
0x0d5a38…0d5bcc Dummy {f00=0x0043, f01=0x0190, f02=»STR,W12 COPY '>' v ( P ADD BIN12,W1 =NUMB OF LAYOUT CHARS P RET D P PEND P P EJECT ^ P* l B P* THIS ROUTINE UNPACKS NEXT LINE FROM CURRENT ATTACHED v D P* FORMAT AND EDITS THE FORMAT PARTS IN 'LINE-DESIGN'-ITEM P*
0x0d5bcc…0d5d60 Dummy {f00=0x0043, f01=0x0190, f02=» DEBIN2 = MAXLENGTH ALPHANUM-FIELDS L P* DEBIN3 = POINTER POSITIONER LDES-ITEM F L P* DEBIN4 = SAVED BUFFER-IDEX IF ALTERED D P*
0x0d5d60…0d5ef4 (1, 35) Dummy {f00=0x0043, f01=0x0190, f02=»S' t $ P MOVE DEBIN3,W0 POINTER LDES:=0 * P CLEAR BOOL5 F=END-OF-LINE NOT REACHED 2 $ P CLEAR BOOL8 F=NO BUFFER ALTERED ` PLUPM $ P MOVE BIN16,W0 MATCHING INDEX:=0 2 P MATCH FDIR,BIN16,W18,BPOOL(PINDCB),BUFPOS,W1 P SWITCH ( P IB BI
0x0d5ef4…0d6088 Dummy {f00=0x0043, f01=0x0190, f02=»3, 13-16 C x P LUP13,LUP13 17-18 PLUPRLB . P B LUPR END OF FORMAT < P EJECT Z PLUP1 FCOPY h P MOVE BIN15,W0 WORK:=0 | " P ADD BUFPOS,W1 NEXT BUFFERPOS . P XCOPY LDES,DEBIN3,W1,PICSTR,W13 COPY '<' $ P ADD DEBIN3,W1 NEXT LD
0x0d6088…0d621c Dummy {f00=0x0043, f01=0x0190, f02=»P IF LEFT ADJUSTED | & P MOVE DEINPUT,='R' LOAD WITH 'R':S P B LUP1B D PLUP1A T & P MOVE DEINPUT,='L' LOAD WITH 'L':S b PLUP1B B P XCOPY LDES,DEBIN3,DEBIN2,DEINPUT,W0 COPY NUMBER OF 'R'/'L':S * P ADD DEBIN3,DEBIN2 ADJUST LDESPOINTER
0x0d621c…0d63b0 Dummy {f00=0x0043, f01=0x0190, f02=»CT PLUP2 FMELI ! 2 P PERF UNPICT,BUFPOS UNPACK/EDUT PICTURELAYOUT ! & P XCOPY LDES,DEBIN3,BIN12,STATSH,W0 ! T $ P ADD BUFPOS,W2 ADJUST BUFFERPOS ! ~ $ P ADD DEBIN3,BIN12 ADJUST POINTER ! * P TBF BOOL6,LUPM JUMP IF GENERAL FORMAT ! P MOVE BIN15,
0x0d63b0…0d6544 Dummy {f00=0x0043, f01=0x018e, f02=»B-ADR ! t ( P ADD BUFPOS,W2 ADJUST BUFPOS 2B-ADR " P B LUPM GO ON " : P EJECT " P PLUP3 FTEXT " ^ P MOVE BIN15,W0 WORK:=0 " r " P ADD BUFPOS,W1 ADJUST BUFFPOS " > P XCOPY BIN15,W1,W1,BPOOL(PINDCB),BUFPOS GET NUMB CHARCTERS " ( P ADD BUFPOS,W1 1
0x0d6544…0d66d8 Dummy {f00=0x0043, f01=0x0190, f02=» ( P ADD DEBIN3,BIN15 ADJUST POINTERPOS # P B LUPM GO ON # 0 P EJECT # F PLUP4 FTAB # T P MOVE DEBIN3,W0 POINTER:=0 # h P ADD BUFPOS,W1 NEXT BUFFPOS # 4 P XCOPY DEBIN3,W1,W1,BPOOL(PINDCB),BUFPOS TABPOS # P SUB DEBIN3,W1 ADJUST TABPOS #
0x0d66d8…0d686c Dummy {f00=0x0043, f01=0x0190, f02=»OVE BIN15,W0 WORK:=0 # P ADD BUFPOS,W1 NEXT BUFFPOS $ B P XCOPY BIN15,W1,W1,BPOOL(PINDCB),BUFPOS GET NUMB OF CHARACTERS $ @ ( P ADD BUFPOS,W1 1ST CHARCTERPOSITION $ $ P CBE BIN16,W2,LUP2 JUMP IF FMELI $ . P ADD BUFPOS,BIN15 ADJUST FOR NUMB OF CHARS $
0x0d686c…0d6a00 Dummy {f00=0x0043, f01=0x0190, f02=» $ h * P MOVE DEBIN4,PINDCB SAVE BUFFERNUMBER % PLUP9A % 6 6 P PERF UNPFLK,BUFPOS UNPACK FLINK INIT NEXT BUFFER % D P B LUPM GO ON % ~ P EJECT % PLUP11 FNL % 6 P MOVE FMTWK(W5),DEBIN3 SAVE NUMBERS OF LDES CHARS % PLUP11A % 2 P CBE DEBIN
0x0d6a00…0d6b94 (1, 36) Dummy {f00=0x0044, f01=0x0190, f02=»11A % PLUP11B & . P TBF BOOL8,LUPR JUMP IF NO BUFF.ALTERATION & 0 P MOVE PINDCB,DEBIN4 RESTORE BUFFER'POINTER' & L P B LUPR END-OF-LINE & P EJECT & PLUP13 FKI:S & P SUB BIN16,W12 & P MOVE DEBIN2,W0 WORK:=0 & P ADD BUFPOS,W1 NEX
0x0d6b94…0d6d28 Dummy {f00=0x0044, f01=0x0190, f02=»,LUPREF DUMMY-FORMAT FOUND & P SUB DEBIN3,W2 ' " 2 P CBL BIN16,W4,LUP13A JUMP IF FKI WITHOUT DUPL ' 8 * P SUB BIN16,W3 ADJUST FOR FKI WITH DUPL ' n P MOVE BIN15,W1 ' P CALL FMOVE,STRG10A,IND1 ' 8 P MATCH STRG10A,BIN15,W9,FDIR,W0,W1 CHECK ADRESS-TYPE '
0x0d6d28…0d6ebc Dummy {f00=0x0044, f01=0x0190, f02=»OL(PINDCB),BUFPOS,DEBINW1,BIN16,DEBIN2 ' " P ADD BUFPOS,W3 ADJUST BUFFPOS ( . P B LUPM GO ON ( T P EJECT ( j PLUPREF ( x " P MOVE DEBINW2,W1 E-O-F-SIGNAL ( PLUPR ( P RET ( P PEND ( P EJECT ( P* ( 2 P* THIS ROUTINE EDITS AN
0x0d6ebc…0d7050 Dummy {f00=0x0044, f01=0x018e, f02=» ( V < P* 'RRR......' IN RIGHTADJUSTED ALPHANUMERIC ITEMS ) P* ) H L P*********************************************************************** ) R P* ) PFEDIT PROC ) , P MOVE DEINPUT,='-9' LOAD WITH -999999... ) , P MOVE DEBINW3,W0 INITIATE
0x0d7050…0d71e4 Dummy {f00=0x0044, f01=0x0190, f02=» P CALL ADJUST,BIN16 * P BNOK FEDITR * " P GETCTL 1,DEBINW4 GETMAXLENGTH * 2 2 P CBE DEBINW4,W0,FEDITR MAXL=0 => END-OF-FORMAT * X P TSTCTL ALPHA * P BZ FEDBCD JUMP IF NUMERIC * . P GETCTL SCHK,DEBINW4 GET SPECIAL CHECK NR * * P CBNE DEBINW4,W2
0x0d71e4…0d7378 Dummy {f00=0x0044, f01=0x4108, f02=»L' LOAD ITEM WITH 'L':S * ~ P B FEDITL GO ON + PFEDBCD + 8 0 P MOVE :FMTITEM,DEINPUT LOAD ITEM WITH '-9':S + F P B FEDITL GO ON + z PFEDITR + P RET + P PEND + P EJECT + PIND1 FRMT + P FCTL W1 + P FMEND + END + @ +
0x0d7378…0d750c Dummy {f00=0x0044, f01=0x2008, f02=» , JUMP IF NOT 2 ( . P MOVE :FMTITEM,=C'R' LOAD ITEM WITH 'R':S ) P B FEDITL GO ON ) P PFELEFT ) h . P MOVE :FMTITEM,=C'L' LOAD ITEM WITH 'L':S ) v P B FEDITL GO ON ) PFEDBCD ) 0 P MOVE :FMTITEM,DEINPUT LOAD ITEM WITH '-9':S ) P B FED
0x0d750c…0d76a0 Dummy {f00=0x0044, f01=0x0190, f02=» 8 8 4 D P$ E @ # P H I K T + Y@ _`R& @ @ @ % P V 4 4 4 _r @ @ T Ev : W V F !SST WJ !AAT W> V V 0 V P _ W $ q > R P >b W >b & 8
0x0d76a0…0d7834 (1, 37) Opaque[0x194]
0x0d7834…0d79c8 # DirEnt {nam=»DECOMP«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0888, f03=0x0000}
0x0d7834…0d79c8 IdxSect {
0x0d7834…0d79c8 f00 = 0x0044 // 0xd7834 @0x0
0x0d7834…0d79c8 f01 = 0x0002 // 0xd7836 @0x2
0x0d7834…0d79c8 gno = [ // 0xd7838 @0x4
0x0d7834…0d79c8 [0x00]: C0x0044.0x1.0
0x0d7834…0d79c8 ]
0x0d7834…0d79c8 }
0x0d79c8…0d7b5c Dummy {f00=0x0044, f01=0x0190, f02=» 0 P IDENT DECOMP REL 10.0 80-04-11,81-07-10,EV " P 81-07-10,EV, CDVDK, DENMARK 8 P 79-03-06/DALI ^ P DDUM DEDDIV v P PDIV P ENTRY DECOMP P EXT CDV10 MODULO 10 CHECK P EXT CDV110 MODULO 11 CHECK P LAST BYTE 0 WEIGH
0x0d7b5c…0d7cf0 Dummy {f00=0x0044, f01=0x0190, f02=»MDDCK P EXT DDMMCK PDECOMP PROC FC " 0 P IB FC,DEC001,DEC002,DEC003,DEC004,DEC005 C 8 , P DEC006,DEC007,DEC008,DEC009,DEC010 C l ( P DEC011,DEC012,DEC013,DEC014,DEC015 PDEC001 P CALL MMDDCK,W0,DEINPUT P RET PDEC002
0x0d7cf0…0d7e84 Dummy {f00=0x0044, f01=0x0190, f02=» P RET PDEC004 P RET PDEC005 * P RET 8 PDEC006 D P RET R PDEC007 ^ P RET l PDEC008 x P RET PDEC009 P RET PDEC010 P CALL CDV10,DEINPUT,BIN7 P RET PDEC011 P CALL CDVDK,DEINPUT,
0x0d7e84…0d8018 Dummy {f00=0x0044, f01=0x405a, f02=» PDEC014 P RET PDEC015 " P RET 0 PEND < END J@ V PDEC007 ^ P RET l PDEC008 x P RET PDEC009 P RET PDEC010 P CALL CDV10,DEINPUT,BIN7 P RET PDEC011 P CALL CDVDK,DEINPUT,
0x0d8018…0d81ac Dummy {f00=0x0044, f01=0x2008, f02=» NT DE12ST DDUM DEDDIV PDIV . ENTRY DE12ST < DE12ST R PROC ` RET n PEND z END @ KITEM PSTR6A STRG 6 WORKITEM PSTRG10A STRG 10 WORKITEM PDIV END @ ARIABL
0x0d81ac…0d8340 Dummy {f00=0x0044, f01=0x0190, f02=»g! J F " D T " e_Z Y Y0X ""_g T X)DL W L ( Y 0 X j z H J F " D Y!DL 0X ##_ 0X ##_ 4 _ P P P( R0R P0R H
0x0d8340…0d84d4 (1, 38) Opaque[0x194]
0x0d84d4…0d8668 # DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x0000, f01=0x0000, f02=0x0890, f03=0x0000}
0x0d84d4…0d8668 IdxSect {
0x0d84d4…0d8668 f00 = 0x0044 // 0xd84d4 @0x0
0x0d84d4…0d8668 f01 = 0x010e // 0xd84d6 @0x2
0x0d84d4…0d8668 gno = [ // 0xd84d8 @0x4
0x0d84d4…0d8668 [0x00]: C0x0044.0x2.0
0x0d84d4…0d8668 [0x01]: C0x0044.0x3.0
0x0d84d4…0d8668 [0x02]: C0x0045.0x0.0
0x0d84d4…0d8668 [0x03]: C0x0045.0x1.0
0x0d84d4…0d8668 [0x04]: C0x0045.0x2.0
0x0d84d4…0d8668 [0x05]: C0x0045.0x3.0
0x0d84d4…0d8668 [0x06]: C0x0046.0x0.0
0x0d84d4…0d8668 [0x07]: C0x0046.0x1.0
0x0d84d4…0d8668 [0x08]: C0x0046.0x2.0
0x0d84d4…0d8668 [0x09]: C0x0046.0x3.0
0x0d84d4…0d8668 [0x0a]: C0x0047.0x0.0
0x0d84d4…0d8668 [0x0b]: C0x0047.0x1.0
0x0d84d4…0d8668 [0x0c]: C0x0047.0x2.0
0x0d84d4…0d8668 [0x0d]: C0x0047.0x3.0
0x0d84d4…0d8668 [0x0e]: C0x0048.0x0.0
0x0d84d4…0d8668 [0x0f]: C0x0048.0x1.0
0x0d84d4…0d8668 [0x10]: C0x0048.0x2.0
0x0d84d4…0d8668 [0x11]: C0x0048.0x3.0
0x0d84d4…0d8668 [0x12]: C0x0049.0x0.0
0x0d84d4…0d8668 [0x13]: C0x0049.0x1.0
0x0d84d4…0d8668 [0x14]: C0x0049.0x2.0
0x0d84d4…0d8668 [0x15]: C0x0049.0x3.0
0x0d84d4…0d8668 [0x16]: C0x004a.0x0.0
0x0d84d4…0d8668 [0x17]: C0x004a.0x1.0
0x0d84d4…0d8668 [0x18]: C0x004a.0x2.0
0x0d84d4…0d8668 [0x19]: C0x004a.0x3.0
0x0d84d4…0d8668 [0x1a]: C0x004b.0x0.0
0x0d84d4…0d8668 [0x1b]: C0x004b.0x1.0
0x0d84d4…0d8668 [0x1c]: C0x004b.0x2.0
0x0d84d4…0d8668 [0x1d]: C0x004b.0x3.0
0x0d84d4…0d8668 [0x1e]: C0x004c.0x0.0
0x0d84d4…0d8668 [0x1f]: C0x004c.0x1.0
0x0d84d4…0d8668 [0x20]: C0x004c.0x2.0
0x0d84d4…0d8668 [0x21]: C0x004c.0x3.0
0x0d84d4…0d8668 [0x22]: C0x004d.0x0.0
0x0d84d4…0d8668 [0x23]: C0x004d.0x1.0
0x0d84d4…0d8668 [0x24]: C0x004d.0x2.0
0x0d84d4…0d8668 [0x25]: C0x004d.0x3.0
0x0d84d4…0d8668 [0x26]: C0x004e.0x0.0
0x0d84d4…0d8668 [0x27]: C0x004e.0x1.0
0x0d84d4…0d8668 [0x28]: C0x004e.0x2.0
0x0d84d4…0d8668 [0x29]: C0x004e.0x3.0
0x0d84d4…0d8668 [0x2a]: C0x004f.0x0.0
0x0d84d4…0d8668 [0x2b]: C0x004f.0x1.0
0x0d84d4…0d8668 [0x2c]: C0x004f.0x2.0
0x0d84d4…0d8668 [0x2d]: C0x004f.0x3.0
0x0d84d4…0d8668 [0x2e]: C0x0050.0x0.0
0x0d84d4…0d8668 [0x2f]: C0x0050.0x1.0
0x0d84d4…0d8668 [0x30]: C0x0050.0x2.0
0x0d84d4…0d8668 [0x31]: C0x0050.0x3.0
0x0d84d4…0d8668 [0x32]: C0x0051.0x0.0
0x0d84d4…0d8668 [0x33]: C0x0051.0x1.0
0x0d84d4…0d8668 [0x34]: C0x0051.0x2.0
0x0d84d4…0d8668 [0x35]: C0x0051.0x3.0
0x0d84d4…0d8668 [0x36]: C0x0052.0x0.0
0x0d84d4…0d8668 [0x37]: C0x0052.0x1.0
0x0d84d4…0d8668 [0x38]: C0x0052.0x2.0
0x0d84d4…0d8668 [0x39]: C0x0052.0x3.0
0x0d84d4…0d8668 [0x3a]: C0x0053.0x0.0
0x0d84d4…0d8668 [0x3b]: C0x0053.0x1.0
0x0d84d4…0d8668 [0x3c]: C0x0053.0x2.0
0x0d84d4…0d8668 [0x3d]: C0x0053.0x3.0
0x0d84d4…0d8668 [0x3e]: C0x0054.0x0.0
0x0d84d4…0d8668 [0x3f]: C0x0054.0x1.0
0x0d84d4…0d8668 [0x40]: C0x0054.0x2.0
0x0d84d4…0d8668 [0x41]: C0x0054.0x3.0
0x0d84d4…0d8668 [0x42]: C0x0055.0x0.0
0x0d84d4…0d8668 [0x43]: C0x0055.0x1.0
0x0d84d4…0d8668 [0x44]: C0x0055.0x2.0
0x0d84d4…0d8668 [0x45]: C0x0055.0x3.0
0x0d84d4…0d8668 [0x46]: C0x0056.0x0.0
0x0d84d4…0d8668 [0x47]: C0x0056.0x1.0
0x0d84d4…0d8668 [0x48]: C0x0056.0x2.0
0x0d84d4…0d8668 [0x49]: C0x0056.0x3.0
0x0d84d4…0d8668 [0x4a]: C0x0057.0x0.0
0x0d84d4…0d8668 [0x4b]: C0x0057.0x1.0
0x0d84d4…0d8668 [0x4c]: C0x0057.0x2.0
0x0d84d4…0d8668 [0x4d]: C0x0057.0x3.0
0x0d84d4…0d8668 [0x4e]: C0x0058.0x0.0
0x0d84d4…0d8668 [0x4f]: C0x0058.0x1.0
0x0d84d4…0d8668 [0x50]: C0x0058.0x2.0
0x0d84d4…0d8668 [0x51]: C0x0058.0x3.0
0x0d84d4…0d8668 [0x52]: C0x0059.0x0.0
0x0d84d4…0d8668 [0x53]: C0x0059.0x1.0
0x0d84d4…0d8668 [0x54]: C0x0059.0x2.0
0x0d84d4…0d8668 [0x55]: C0x0059.0x3.0
0x0d84d4…0d8668 [0x56]: C0x005a.0x0.0
0x0d84d4…0d8668 [0x57]: C0x005a.0x1.0
0x0d84d4…0d8668 [0x58]: C0x005a.0x2.0
0x0d84d4…0d8668 [0x59]: C0x005a.0x3.0
0x0d84d4…0d8668 [0x5a]: C0x005b.0x0.0
0x0d84d4…0d8668 [0x5b]: C0x005b.0x1.0
0x0d84d4…0d8668 [0x5c]: C0x005b.0x2.0
0x0d84d4…0d8668 [0x5d]: C0x005b.0x3.0
0x0d84d4…0d8668 [0x5e]: C0x005c.0x0.0
0x0d84d4…0d8668 [0x5f]: C0x005c.0x1.0
0x0d84d4…0d8668 [0x60]: C0x005c.0x2.0
0x0d84d4…0d8668 [0x61]: C0x005c.0x3.0
0x0d84d4…0d8668 [0x62]: C0x005d.0x0.0
0x0d84d4…0d8668 [0x63]: C0x005d.0x1.0
0x0d84d4…0d8668 [0x64]: C0x005d.0x2.0
0x0d84d4…0d8668 [0x65]: C0x005d.0x3.0
0x0d84d4…0d8668 [0x66]: C0x005e.0x0.0
0x0d84d4…0d8668 [0x67]: C0x005e.0x1.0
0x0d84d4…0d8668 [0x68]: C0x005e.0x2.0
0x0d84d4…0d8668 [0x69]: C0x005e.0x3.0
0x0d84d4…0d8668 [0x6a]: C0x005f.0x0.0
0x0d84d4…0d8668 [0x6b]: C0x005f.0x1.0
0x0d84d4…0d8668 [0x6c]: C0x006e.0x2.0
0x0d84d4…0d8668 [0x6d]: C0x0042.0x1.0
0x0d84d4…0d8668 [0x6e]: C0x006e.0x1.0
0x0d84d4…0d8668 [0x6f]: C0x0078.0x2.0
0x0d84d4…0d8668 [0x70]: C0x00a7.0x3.0
0x0d84d4…0d8668 [0x71]: C0x00a8.0x2.0
0x0d84d4…0d8668 [0x72]: C0x00aa.0x0.0
0x0d84d4…0d8668 [0x73]: C0x00aa.0x1.0
0x0d84d4…0d8668 [0x74]: C0x00aa.0x2.0
0x0d84d4…0d8668 [0x75]: C0x00aa.0x3.0
0x0d84d4…0d8668 [0x76]: C0x00ae.0x3.0
0x0d84d4…0d8668 [0x77]: C0x00af.0x0.0
0x0d84d4…0d8668 [0x78]: C0x00af.0x1.0
0x0d84d4…0d8668 [0x79]: C0x00af.0x2.0
0x0d84d4…0d8668 [0x7a]: C0x0162.0x2.0
0x0d84d4…0d8668 [0x7b]: C0x00b1.0x1.0
0x0d84d4…0d8668 [0x7c]: C0x00b1.0x2.0
0x0d84d4…0d8668 [0x7d]: C0x00b1.0x3.0
0x0d84d4…0d8668 [0x7e]: C0x00b2.0x0.0
0x0d84d4…0d8668 [0x7f]: C0x00b4.0x2.0
0x0d84d4…0d8668 [0x80]: C0x00b4.0x3.0
0x0d84d4…0d8668 [0x81]: C0x013a.0x0.0
0x0d84d4…0d8668 [0x82]: C0x013a.0x1.0
0x0d84d4…0d8668 [0x83]: C0x013b.0x0.0
0x0d84d4…0d8668 [0x84]: C0x00ac.0x2.0
0x0d84d4…0d8668 [0x85]: C0x0040.0x2.0
0x0d84d4…0d8668 [0x86]: C0x0040.0x3.0
0x0d84d4…0d8668 ]
0x0d84d4…0d8668 }
0x0d8668…0d87fc Dummy {f00=0x0044, f01=0x0190, f02=» L H IDENT T:AT10 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV T:AT10 T T:AT10A f > : T:DT10 D:CB10 U:CB10 D:CB20 C:CB20 D:CB30 C:CB30 z > : D:CB40A C:CB40A D:CB503 C:CB50F D:TB20 Z:TB20. D:TB30- > : Z:TB30
0x0d87fc…0d8990 Dummy {f00=0x0044, f01=0x0190, f02=»B60 C:CB60 * & * & B * & = a p * & [ 6 * & y P * &
0x0d8990…0d8b24 Dummy {f00=0x0044, f01=0x4090, f02=» " $ , ( & ( * , . 0 2 4 & 6 8 : < > V z@ a p * & [ 6 * & y P * &
0x0d8b24…0d8cb8 Dummy {f00=0x0044, f01=0x40ec, f02=» L H IDENT T:DT10 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV T:DT10 T T:DT10D f PTSDE z * & 8T1 x * * @ * &
0x0d8cb8…0d8e4c Dummy {f00=0x0044, f01=0x40c4, f02=» L H IDENT T:ATAB TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV T:ATAB T T:ATABA f T:AD20 T:AT10 z P :A @ * @
0x0d8e4c…0d8fe0 Dummy {f00=0x0044, f01=0x40bc, f02=» L H IDENT U:BTAB TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV U:BTAB T U:BTABB f U:CB10 z @ CB1 :C @ @ * @
0x0d8fe0…0d9174 (1, 39) Dummy {f00=0x0044, f01=0x40a2, f02=» L H IDENT S:BTAB TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV S:BTAB T S:BTABB f z :B @ :C @ @ * @
0x0d9174…0d9308 Dummy {f00=0x0044, f01=0x4138, f02=» L H IDENT Z:TB10 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV Z:TB10 T Z:TB10T f & z & & = & [ & y & & & &
0x0d9308…0d949c Dummy {f00=0x0044, f01=0xc13e, f02=» & & ; & Y $ & w 4 & D & T & d & t & & + & I & g & & & &
0x0d949c…0d9630 Dummy {f00=0x0044, f01=0x40aa, f02=» L H IDENT D:TB10 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV D:TB10 T D:TB10T f z :T @ & [ & y & & & &
0x0d9630…0d97c4 Dummy {f00=0x0044, f01=0x40fe, f02=» L H IDENT D:DB10 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV D:DB10 T D:DB10D f * & > P P h z * & 0 = > @
0x0d97c4…0d9958 Dummy {f00=0x0044, f01=0x40be, f02=» L H IDENT D:DB20 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV D:DB20 T D:DB20D f * & z @ = > @
0x0d9958…0d9aec Dummy {f00=0x0044, f01=0x40be, f02=» L H IDENT D:DB30 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV D:DB30 T D:DB30D f * & J z @
0x0d9aec…0d9c80 Dummy {f00=0x0044, f01=0x414a, f02=» L H IDENT U:CB10 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV U:CB10 T U:CB10C f * & @ z & & = & [ & y & &
0x0d9c80…0d9e14 (1, 40) Dummy {f00=0x0045, f01=0x40ea, f02=» L H IDENT D:CB10 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV D:CB10 T D:CB10C f * & : z ( $ : @ & &
0x0d9e14…0d9fa8 Dummy {f00=0x0045, f01=0x40e8, f02=» L H IDENT C:CB20 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV C:CB20 T C:CB20C f * & z $ $ @ & &
0x0d9fa8…0da13c Dummy {f00=0x0045, f01=0x4102, f02=» L H IDENT D:CB20 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV D:CB20 T D:CB20C f * & B z * & = B @
0x0da13c…0da2d0 Dummy {f00=0x0045, f01=0x40fc, f02=» L H IDENT C:CB30 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV C:CB30 T C:CB30C f * & z & " 8 8 @
0x0da2d0…0da464 Dummy {f00=0x0045, f01=0x4106, f02=» L H IDENT D:CB30 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV D:CB30 T D:CB30C f * & F z * & = F @
0x0da464…0da5f8 Dummy {f00=0x0045, f01=0x0190, f02=» L H IDENT C:CB40 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV C:CB40 T C:CB40C f * & z * & * & = * &
0x0da5f8…0da78c Dummy {f00=0x0045, f01=0x4096, f02=» a LP 0 GP 6 FD * & DLU FRO GPL6 LPL0 , Z l @
0x0da78c…0da920 Dummy {f00=0x0045, f01=0x4102, f02=» L H IDENT D:CB40 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV D:CB40 T D:CB40C f * & B . z * & D Z p - r 7 = B @
0x0da920…0daab4 (1, 41) Dummy {f00=0x0045, f01=0x0190, f02=» L H IDENT C:CB50 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV C:CB50 T C:CB50C f $ & z & & = & [ & y & & &
0x0daab4…0dac48 Dummy {f00=0x0045, f01=0x40b8, f02=»ESVCHM/=><DL!ASUFTCE ~ * & i +-*:;&V?'ZGRNX()MEVTFCAB/,LRAP & TXZY+S,.><0-VEX J & j * z @ & [ & y & & &
0x0dac48…0daddc Dummy {f00=0x0045, f01=0x40fe, f02=» L H IDENT D:CB50 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV D:CB50 T D:CB50C f * & >0 0 0 z * & M U t ~ 0 = > @ &
0x0daddc…0daf70 Dummy {f00=0x0045, f01=0x4132, f02=» L H IDENT Z:TB20 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV Z:TB20 T Z:TB20T f & & z & & = & [ & y & *
0x0daf70…0db104 Dummy {f00=0x0045, f01=0x4102, f02=» L H IDENT D:TB20 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV D:TB20 T D:TB20T f * & B z * & 0 0 0 " = ( . B @
0x0db104…0db298 Dummy {f00=0x0045, f01=0x4106, f02=» L H IDENT D:TB30 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV D:TB30 T D:TB30T f * & F @ B D F H z * & J L N P R T V @ = f F @
0x0db298…0db42c Dummy {f00=0x0045, f01=0x40e8, f02=» L H IDENT Z:TB40 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV Z:TB40 T Z:TB40T f * & z $ $ @ F @
0x0db42c…0db5c0 Dummy {f00=0x0045, f01=0x4102, f02=» L H IDENT D:TB40 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV ! D:TB40 ! T D:TB40T ! f * & B ! z * & ! = ! B ! @ !
0x0db5c0…0db754 (1, 42) Dummy {f00=0x0045, f01=0x018e, f02=» L H IDENT Z:TB50 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV " Z:TB50 " T Z:TB50T " f & " z & " & = " & [ " * & y " * &
0x0db754…0db8e8 Dummy {f00=0x0045, f01=0x401a, f02=» # @ # 0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV " Z:TB50 " T Z:TB50T " f & " z & " & = " & [ " * & y " * &
0x0db8e8…0dba7c Dummy {f00=0x0045, f01=0x4128, f02=» L H IDENT Z:TB60 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV % Z:TB60 % T Z:TB60T % f * & % z * & % $ = % T
0x0dba7c…0dbc10 Dummy {f00=0x0045, f01=0x40fe, f02=» L H IDENT D:TB60 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV & D:TB60 & T D:TB60T & f * & > & z * & < > F0 & = N & > & @ &
0x0dbc10…0dbda4 Dummy {f00=0x0045, f01=0x0190, f02=» @ H IDENT DEDISC TRA 10.0 80-10-10 F1 O1111 REL 10.0 80-04-11 ; : 6 COND DEDISC RELEAS RETURN SCHPOO STRT01 WAIT ; H $$$TRAD ; @ < COND M DEDISCR RELEAST RETURNO 7 SCHPOO STRT01 ; WAITR d ; > : CHANFCM CLSBTHR DELBTCA
0x0dbda4…0dbf38 Dummy {f00=0x0045, f01=0x0190, f02=»REVT NEXFMTS NEXJOB NXBTH NXJOB ; r > : OPNEBCd OPNNBCA PREFMT0 PREJOBF RECURR SCHFMT. SCHJOB- < ( 2 . T:DSC1M T:SWITR WRFSP WRIACCE WRICURM WRTCO < j < < 7 < : < < 0 < .
0x0dbf38…0dc0cc Dummy {f00=0x0045, f01=0x0190, f02=» # $ < $ = % B = & = 0 ' = @ ( , = P ) 7 = ` * F = p + = , = - = . = / 7 = 0 ( = 1 4 = 2 & = 3 2
0x0dc0cc…0dc260 Dummy {f00=0x0045, f01=0x4170, f02=»RRRRRRRRRRRRRH R! R( = ` H > J M > 0 n Q > @ p > R t < > b ~ M > r J F " D @ Hx L R4 $ !"4 "!4 !!4 I @w L0R 0X V # R4 > > > Q > >
0x0dc260…0dc3f4 (1, 43) Dummy {f00=0x0045, f01=0x0190, f02=» @ H IDENT DKRUT1 TRA 10.0 80-10-10 F1 O1111 REL10.0 80-04-11 ? B > CLSBTH DISU DLCURR DLRCCH FREESP GTNEXT GTPREV OFRSP ? H B > HRDT RDACC RDDSA RECURR0 REFSP RFRSPHWR WRDS0 WRFSP WRIACC ? WRICUR WRTCO ? $$$TRAA ? @ < CLSBTH
0x0dc3f4…0dc588 Dummy {f00=0x0045, f01=0x018e, f02=»HWRD WRDSD _ WRFSP WRIACC` WRICUR- W WRTCO ? B > CONDE DEPOOLR GETFRER MASKA READDKD RETURNC SETFRER SETOCC @ : $ T:SWIT T:XSTAW WAIT_ WRITDK @ @ k @ @ @ % k @ * @
0x0dc588…0dc71c Dummy {f00=0x0045, f01=0x0190, f02=» @ K k A P A T A ( A 8 ` A H h A X n A h v " A x x A J F " D @0R Av P RK R4 0R Av e R4 0R Av e R4 @ 0X L0R P 6 A A A
0x0dc71c…0dc8b0 Dummy {f00=0x0045, f01=0x0190, f02=»R E bR * )bR* A ^ B k B , B < B L B k B l B | J F " D I 0R A R V R R4 R0R A R V RK E I b )*R b R* R4 Is B B B B
0x0dc8b0…0dca44 Dummy {f00=0x0045, f01=0x0190, f02=» _ R R#`RR b | R*j |)"` R4 R RL B n O C , T C < X - C L a DS C o _ C n t - C ~ J F " D @bR* | j` " |) R$`R R4 R`vV Ap Lb " j $"` RuV> Rav uajb " " C S C _ C S C
0x0dca44…0dcbd8 Dummy {f00=0x0045, f01=0x0190, f02=» C D _ D D * S D : D J D S D l D | J F " D "* u`Hp *?R R Rv?R Ru?R ` _ Ru) L ?Rj` " $ R`:R 0 ja " " D _ D D D
0x0dcbd8…0dcd6c Dummy {f00=0x0045, f01=0x0190, f02=» D _ E d E j F E ( n F E 8 J F " D @ ? !"? 1AxW-j " - R R R R R R_9 RW Iu Au "_ *" E H E E E E J F " D ! A R4 R 0R c c ? !( ! A R4 ! ! e
0x0dcd6c…0dcf00 Dummy {f00=0x0045, f01=0x0190, f02=»jc " c c R R R Rc R R E d F F " F 2 F B # F R + F b J F " D _a R_) +_% R 0R c c 4 ! ! ! R" V 0X_ " b )*R b R* F r Y F y F J F " D @ !4 "bR * )bR* R& 4 @k
0x0dcf00…0dd094 (1, 44) Dummy {f00=0x0046, f01=0x40ba, f02=» Ra RCj ""d Ra d`W R` (a AkIl'W F n G , G < G L G 4 / - Ra R jd " $j $"` Ra R `vIs `! Rd` R4 " G l G @ G r Y F y F J F " D @ !4 "bR * )bR* R& 4 @k
0x0dd094…0dd228 Dummy {f00=0x0046, f01=0x018e, f02=» @ H IDENT DKRUT2 TRA 10.0 80-10-10 F1 O1111 REL 10.0 80-04-11 H , ( DELFMT ENTFMT NEXFMT OPCL PREFMT H H $$$TRAR H x 6 2 DELFMT ENTFMTN NEXFMTC OPCLM PREFMT H @ < ALGOR CLOSEFT CMPIND COND- DEDISC1 DEPOOLL DISU DLRCCH1 H B >
0x0dd228…0dd3bc Dummy {f00=0x0046, f01=0x0190, f02=» I I | I $ ( I 4 $ SYSFIL I D * I Z 4 I j J F " D 2 RRRRH 0X_ A T|A @s C!!"C!!o L kV!0R A!R kP 0R A!R @ 4 I z L I U X I I d I
0x0dd3bc…0dd550 Dummy {f00=0x0046, f01=0x0190, f02=» I , J J J ( J 8 J H J F " D Q E! R"! [ R3@ R4 H #@ C!!"C! R!T R!!RT R"!R0R A!R R4 J X ( J J J PTS-DE J J J
0x0dd550…0dd6e4 Dummy {f00=0x0046, f01=0x0190, f02=»?v` R#! RTj v " % j !! jGv " ! Apj !'! R$! P Ap RR$ ! ! J A K H M K X Q K h Y K x _ K u K y K J F " D @ R" T Ev R"v RP Ev R& 0R AvR 5@ Cv!W Hp L@ R4 H 4@ K
0x0dd6e4…0dd878 Dummy {f00=0x0046, f01=0x0190, f02=» R& R#! T j ! ! R$! T 0R AvR R4 j " )( K x L 6 L H 0 L X L j * L z " L L " L J F " D Lj " '( ! 0R * 6 LW e / s R4 R:R m R`!:R L
0x0dd878…0dda0c Dummy {f00=0x0046, f01=0x0190, f02=»jR L L E M J " M ^ M * b " M : j M J s FC M Z H F " D @&"c R"dR?R b W jd "R$ d U Rd!:RjR$"d R"bR c* RLjR""b jR$" M n M M M " M M J
0x0dda0c…0ddba0 Dummy {f00=0x0046, f01=0x0190, f02=» M J F " D R"`R:RHp _ ba `LjR "` `c_V c Ap_1Ar 0RmP r$ t Ir t4(r N & N X " N h * N x " N N N " " N * " N J F " D m R$R*:R r` ta t( R:R R!rRV ! L ?R ) r
0x0ddba0…0ddd34 (1, 45) Dummy {f00=0x0046, f01=0x0190, f02=» & N L O * O " O * & O : " O J O Z " O j O z J F " D R` m?R R<R m@s R$R*:R ` a&j` "R&fRa* `*jR&"` "`* @s RR:R R" R O " O O " O
0x0ddd34…0ddec8 Dummy {f00=0x0046, f01=0x4092, f02=» )( ) )?Rj` "R$jR " R"aR:R Ra! ` % R!`R:R O x F P 6 $ P H b "R L9 R`!j` "R$_! P X P |@ P m?R R<R m@s R$R*:R ` a&j` "R&fRa* `*jR&"` "`* @s RR:R R" R O " O O " O
0x0ddec8…0de05c Dummy {f00=0x0046, f01=0x0190, f02=» @ H IDENT DKRUT3 TRA 10.0 80-10-10 F1 O1111 REL 10.0 80-04-11 Q D @ ALGO DELTBL ENTSYS ENTTBL GETFMT GETSYS GETTBL NOFFRE Q H NXPRFMR SCHFMTA SFMTCH0 Q $$$TRAD Q @ < ALGOF DELTBLA o ENTSYS1 ENTTBL1 ; GETFMT1 GETSYS- Q 8 4
0x0de05c…0de1f0 Dummy {f00=0x0046, f01=0x0190, f02=»POOD STRT01R WAITN Q R R * R : F R J x R # R l ' R | , R 1 R : R > R J F " D r R:R RL '6c ( ]@s R$R*:RCq<R RU R!bR R
0x0de1f0…0de384 Dummy {f00=0x0046, f01=0x0190, f02=»!R( `b c jc!!R) R!bc V -?R b _Y cb R n S , S < S L S J F " D j b R*j b)*R `! ` ! R!dRV R&cb _ojd "R$jb!! b(_3 cb R$c` R&{ S l S S S S F S
0x0de384…0de518 Dummy {f00=0x0046, f01=0x0190, f02=» S T T T . T > : T N A T T ^ J F " D `1 a! a+ R"%R?R R:R R!%RP RU `* a!b a 1R` `1 a! a+ ?RApWg T p Q T V T X T T d T
0x0de518…0de6ac Dummy {f00=0x0046, f01=0x0190, f02=» T U U U , U < T U L U ^ U n _ U ~ U U J F " D R!`R<Rja "R$ R`!<R a & `a_ RL %6c R:Rb " ! d %dL !?R U
0x0de6ac…0de840 Dummy {f00=0x0046, f01=0x0190, f02=» J F " D R!'RP L<R Hpl RL R"'R:R d" d*j` "Rd(` HpO R`!:RjRd"` R"'R: V V R V b J F " D R c`_ Cq R!`R<R c` ` j`!!R)* `!j` "R$ ` !Hp a1h a!R(!X _ ) V r A V E B V M V S V c
0x0de840…0de9d4 (1, 46) Dummy {f00=0x0046, f01=0x416a, f02=» ` a*Hs V R W W W 0 J F " D R`W R` V ! L0W< a"j " &h a& &V! a a! a j " $ ` _E W B W W W J F " D )W a&jb " a R4 d"@s$ " As Rd R jd " $jc " * c d ? R4 W
0x0de9d4…0deb68 Dummy {f00=0x0046, f01=0x0190, f02=» @ H IDENT DKRUT4 TRA 10.0 80-10-10 F1 O1111 REL 10.0 80-04-11 X B > DELBTC DELJOB ENTJOB GETJOB NEXJOB NXBTH NXJOB OPNEBC X H & " OPNNBCR PREJOBA READJB0 SCHJOBF X $$$TRA X @ < DELBTCR DELJOBR ENTJOBH GETJOB1 6 NEXJOB. NXBTH 4 X
0x0deb68…0decfc Dummy {f00=0x0046, f01=0x0190, f02=» @ < RELEAS2 RETURN RFRSP SCHPOOP SFMTCH T:SWITH WAITH WRDS Y WRFSP Y H Y X Y h Y x Y Y # Y . Y 3 Y ; Y = Y J F " D ApAt R:RAs
0x0decfc…0dee90 Dummy {f00=0x0046, f01=0x0190, f02=» R Y } Z Z J F " D @:R a*mja " &"asz Rkj a"c a"j &"a R`:R ` a* Lj ""` j $" Rl Z * Z x Z Z Z Z JC m Z J F " D R`v:Rj a"` a" Ruv:Rj a"u a"j &"a Rc
0x0dee90…0df024 Dummy {f00=0x0046, f01=0x0190, f02=» D $" a*_zj $"c R`:R Lj ""` `c Rcv_(ja " &"as c`_z Rcv:Rj $" Z [ L [ : [ l J F " D c R`:R a*_ jd " ajc " & a"ju " aIp `dWY a* c,j &"c f a, R`R7"c [ | C [ F [ J [ L [
0x0df024…0df1b8 Dummy {f00=0x0046, f01=0x0190, f02=» ud d , ) Rv ) [ * : J Z J F " D ?Rjo !v bo!&k bo'&l R) oV5 ! ! R" :R R* o | Uj |)"` It j
0x0df1b8…0df34c Dummy {f00=0x0046, f01=0x018e, f02=» JD & ] J F " D ?R R Ru) L ?R L?R R:R RVJ! L ) ?R `b b W R`!:R RLjR"" ] ( ] v ] ] ] " ] ' ] 0 ] 5 ] : ]
0x0df34c…0df4e0 Dummy {f00=0x0046, f01=0x0190, f02=» ] W ^ Z ^ _ ^ * b ^ : j ^ L y ^ J F " D @ @rT `# R:R R!`RV ! L ?R )?R aLb &Ra0R Hr R_Cj` " ^ l ^ ^ J ^ ^ ^
0x0df4e0…0df674 (1, 47) Dummy {f00=0x0046, f01=0x0190, f02=» ^ _ _ _ . _ > _ N _ ^ J F " D & bcbk & ! R&zb R ba zb?R k L?RKq %_1Aq_ R R:R@s RRHl Hk _ n _ _ _ _ _
0x0df674…0df808 Dummy {f00=0x0046, f01=0x0190, f02=» Z _ ] ` u ` w ` , ` < J F " D @# *RnHp. a$*a j " $ Z R :Rj` " &*`*K a,Hp bk & a?R0RlT$ l R ` L ` ` ` ` ` ` `
0x0df808…0df99c Dummy {f00=0x0046, f01=0x4086, f02=» ` J F " D !bRR)jc "R&"c* LW dLb &Rd k jc "R$ c 0 ) R4 j a" a"b a& a a&4 a a p@ a ?R0RlT$ l R ` L ` ` ` ` ` ` `
0x0df99c…0dfb30 Dummy {f00=0x0046, f01=0x0190, f02=» @ H IDENT PTSDE TRA 10.0 81-02-27 F1 O1111 REL 10.0 80-04-11 > : ATTDEV ATTPRT DEANOK DEAOK0 DEAOK1 DEAOK2 DEAOK4 H < 8 DEAPPLS DEFINDA DEPMSK1 DEPRUTF DETCHK DETPRT. PTSDE $$$TRA B > ATTDEVS ATTPRTD DEANOKP DEAOK0H j D
0x0dfb30…0dfcc4 Dummy {f00=0x0046, f01=0x0190, f02=»HANFCP CONDD DE10ST- DE20STK DE30STU DE40STT DE50ST > : DE60STS DE70STE DEAP1AA DEAP2AD DEAP3Aj DEAP5A. DEAP7AK < @ < DECLRA DERRF GETINDD GETVOL- MSKOUTK OPCLS POOLA RESTOR5 ~ D @ SAVES T:ABORS T:ATTF1 T:DELA2 T:DISP3 T:DSC05 T:DSC17 T:ERAS 4
0x0dfcc4…0dfe58 Dummy {f00=0x0046, f01=0x0190, f02=» 2 P d |
0x0dfe58…0dffec Dummy {f00=0x0046, f01=0x0190, f02=» 0 0 @ P $ ` , p 4 " - " 5 4 6 ' : J F " D 0R 0}0R o0R oA T 0
0x0dffec…0e0180 Dummy {f00=0x0046, f01=0x0190, f02=» h i j k . l > m N n ^ o n q ~ s . ~ * J F " D @) R!P V R_, R6 ## _ jX 3 RRRRRRRRRR R0R 0}@d R" "
0x0e0180…0e0314 (1, 48) Dummy {f00=0x0047, f01=0x0190, f02=» 4 8 4 , : < 4 L ( J F " D R * R 1W 'W 1XF1XF1XF 1 v j !!Ov v" C l > & " > . 8 J
0x0e0314…0e04a8 Dummy {f00=0x0047, f01=0x0190, f02=» c ~ d e ~ * f : g ~ J J F " D @ " W% L h * h `h h h 2` RRRRRRRRW 4 !4 "4 $4 Z J F " D & #4 H "4 4 * 4 | z { !V f 4 * H
0x0e04a8…0e063c Dummy {f00=0x0047, f01=0x0190, f02=» /0R f 4 0 f 4 L R 4 0R 0X 0X$0X T x D 6 F F 2 V < f ! # v # ' < 6 J F " D 0X 0X W 0X W 0X 4P +W L R4 0X 4 j !! % L !j !!
0x0e063c…0e07d0 Dummy {f00=0x0047, f01=0x018e, f02=»DATA $ & ENTRY * $ @ & P REL 10.0 ^ $ v & & & PROGRAM: $ & XX " h
0x0e07d0…0e0964 Dummy {f00=0x0047, f01=0x0190, f02=» $ 0 & - DEFINITION & $ 0 @ & P & 30 ^ JOB n $ 0 & - DEFINITION $ 0 & & 40 ENTRY $ 0
0x0e0964…0e0af8 Dummy {f00=0x0047, f01=0x018e, f02=» " MODE $ "0 & $ & 60 2 # VERIFY B $ #0 X & h $ MODE v $ $0 & % 70 CONVERSIONY $ %0 & & MODE $ &0
0x0e0af8…0e0c8c Dummy {f00=0x0047, f01=0x0190, f02=» ( ( & & U ) 99 . " )h @ & d P * CREATEO ` $ * x & + GET $ + , VALUE-SETSA $ , & - NAME: TS
0x0e0c8c…0e0e20 Dummy {f00=0x0047, f01=0x0190, f02=» ( . C & / TYPE:F . $ / D & f T & d d & t & & & f @ & & 0 SIZE OF $ 0 1 ELEMENT
0x0e0e20…0e0fb4 (1, 49) Dummy {f00=0x0047, f01=0x018e, f02=»& & g 4 XX " 4T 0 & 4 @ 5 ELEMENTO N $ 5 f 6 NO.:F v $ 6 & f & 7 XX " 7 ! & 7 & ~ (
0x0e0fb4…0e1148 Dummy {f00=0x0047, f01=0x40a4, f02=» : & & , & : & U L ( Z $ @ 0X ) L 4 4 f Y @
0x0e1148…0e12dc Dummy {f00=0x0047, f01=0x0190, f02=» D H IDENT DENTER TRA 10.0 81-08-28 F1 O1111 REL 10.0 81-08-27/EV , ( DECLRA DECLRD DECLRN DECLRS DERR L $$$TRAN | 6 2 DECLRA DECLRDD DECLRNC DECLRS DERR B > ADJUSTN ATTPRTA CANC DEAPPL8 DEFORC1 DEGEN DELAST1 DELOCKE
0x0e12dc…0e1470 Dummy {f00=0x0047, f01=0x0190, f02=» P > : T:DYKI T:EDFLR T:EDWRC T:ERASD T:GETA T:GETC T:GETF D @ T:NKI T:PRINE T:SETCW T:TBWDE T:TFWDA T:THOMD T:TSTCD T:UPDF J T:XSTA TESTB & "
0x0e1470…0e1604 Dummy {f00=0x0047, f01=0x0190, f02=» < T n
0x0e1604…0e1798 Dummy {f00=0x0047, f01=0x0190, f02=» 8 6 J F " D R!4 R"4 R#4 R$4 R 4 @} 8RIn06 W 0X ! WP0X ! WII~ B , f L , v S , c 6 j 6 r , | , J F " D @ 0X ! W?H 0X ! W50X!! W.@n6 0X ! W 0X
0x0e1798…0e192c Dummy {f00=0x0047, f01=0x0190, f02=» ] ] B $ J F " D W 0X ! (0X :RH~ ?R0X P :R _ 0X P C{P A )?RH ?R0XHoO 4 > >
0x0e192c…0e1ac0 Dummy {f00=0x0047, f01=0x0190, f02=» K W 0X K R! 2 RRRW 0X 0R /1X F_5K~|0X ! _D2 RR @ P x ` p s : P $ 0 & ' . 0 0 1
0x0e1ac0…0e1c54 (1, 50) Dummy {f00=0x0047, f01=0x0190, f02=» RRRW P E G 8 J , . U j > V F N W j ^ X n Y ~ Z g [ j j ] j ^ j _ j ` j a
0x0e1c54…0e1de8 Dummy {f00=0x0047, f01=0x0190, f02=» ?R N " , s < L : P l | : -" J F " D & 0R P RK?R0R Pm0X 0R -8RWa0X 6 > W<( , ! Ld :
0x0e1de8…0e1f7c Dummy {f00=0x0047, f01=0x0190, f02=» D # !_'0X P 0X P oLW oLd o "_HI 0X R2 RRRW ( L ) B + l 6 J | J F " D @ @ @ @ @h@j #U 0R ! Td$ + " , 0X R %@|PI0X T /hZ ] ^ ` s
0x0e1f7c…0e2110 Dummy {f00=0x0047, f01=0x018e, f02=» L 5 * J F " D @" !T f ! j !! H{ RK?R0X P 0X P H RK?R RK?R0X W 2 : L J . & J . J J F
0x0e2110…0e22a4 Dummy {f00=0x0047, f01=0x018e, f02=» ( O 8 ] H t X h x
0x0e22a4…0e2438 Dummy {f00=0x0047, f01=0x0190, f02=» % * F . J ( 3 8 6 0 H 8 8 X > $ h J F " D !PP0R 0R V 0X !_ $ + ?RI 0XWL0X P 0R 9R0X !0R x D I J P 8 W D
0x0e2438…0e25cc Dummy {f00=0x0047, f01=0x018e, f02=» K 0X 0X?RA 0XP#:R;RI f . $ 4 D T d t O :
0x0e25cc…0e2760 Dummy {f00=0x0047, f01=0x018e, f02=» . $ 4 j D J T d t h . C C
0x0e2760…0e28f4 (1, 51) Dummy {f00=0x0047, f01=0x018e, f02=» 4 @ $ 4 D # T % d , J t 1 . > J F " D ?R R<R1X F !0X R?RH{ A W B R.K #_ 0X P 0X P H %@m?R G : O
0x0e28f4…0e2a88 Dummy {f00=0x0047, f01=0x0190, f02=» j o 5 q B $ u 8 4 x 6 D J F " D @ - !0X ( 1X F?R0X 0R /P 0X K ?R0X K ?R0X_.0X 0X H T : J 8
0x0e2a88…0e2c1c Dummy {f00=0x0047, f01=0x0190, f02=» . J . 0 @ : P 4 ` p J F " D 70X P J ? R EK{H ,LH 0X P 0X P RT +_bH KAk0X 1X F?R < J
0x0e2c1c…0e2db0 Dummy {f00=0x0047, f01=0x0190, f02=»X P N D E I , K < P L U F _ N l c * | g A l m q r z { |
0x0e2db0…0e2f44 Dummy {f00=0x0047, f01=0x4176, f02=»W RK ! 2 RRRRRR J * . : J Z j z O & & ( &
0x0e2f44…0e30d8 Dummy {f00=0x0047, f01=0x0190, f02=» H H IDENT DENT01 TRA 10.0 81-08-27 F1 O1111 10.0 80-04-11,81-08-27/EV DENT01 P $$$TRAN b DENT01 t D @ CLEARBN DEACC DECLRA DECLRD7 DECLRN1 DECLRS DEDISC1 DELAST2 B > DEPOOL DEPRUT DERECS DERR DERROR EMPTYT RESTOR
0x0e30d8…0e326c Dummy {f00=0x0047, f01=0x0190, f02=» 2 H f z
0x0e326c…0e3400 Dummy {f00=0x0047, f01=0x0190, f02=» ( F . V # f * v 3 7 8 9 : ; < G =
0x0e3400…0e3594 (1, 52) Dummy {f00=0x0048, f01=0x0190, f02=» U V ] $ ^ _ 4 _ ~ D e l T f l d g t h i j k & s J F " D @R H~ I Ao { R_ RKH{ 2 RRR_ 2 RRRRRRRb
0x0e3594…0e3728 Dummy {f00=0x0048, f01=0x0190, f02=» 0X_ H %?RIm)I~ Rh ( & g" " H I t 2 ( B R ( b r ( ~ ~ J F " D R@o0X ! _ R_ 0X ! R%Z @m@n
0x0e3728…0e38bc Dummy {f00=0x0048, f01=0x0190, f02=» + - 8 4 = 0 J F " D <R R" ?RHm R @ P&@jP A W3Ao R,P R!_ g R&K7 L@mAo?RH 0R @ D [ b *R t J F " D @Hm R! &@h@jP #W @fPO $0R TF L h ! !T
0x0e38bc…0e3a50 Dummy {f00=0x0048, f01=0x0190, f02=» " D & ?R Ub & @ R.P )gL Ao?RAzAzT @mA R*P @ ?R@ @m8R@xP N ` p D
0x0e3a50…0e3be4 Dummy {f00=0x0048, f01=0x0190, f02=» . A > % N (0 L ^ 5 p 7 ; W < W = > d ? J F " D )K?RI R)K?RI H W Io ?R g( "
0x0e3be4…0e3d78 Dummy {f00=0x0048, f01=0x0190, f02=»g #g &?R #* " #g_> ! & #g #L_ 0X ! R$PE;R@ 0 > T P T ` p $ $ $ . J F " D }({ % H~ - !gL Az?R@z?RH~ C <RI 0X ! W 0X !
0x0e3d78…0e3f0c Dummy {f00=0x0048, f01=0x0190, f02=» 0 - A 0 0 J F " D ?RAz % Rh ( & J RK @o?R@m!gL C~8R?R@zC~8R?R?RKm Jz I gL B D W W
0x0e3f0c…0e40a0 Dummy {f00=0x0048, f01=0x0190, f02=»g #L0X R C U X . 0 @ ^ P b ` f p j y ( J F " D @! R&_ I~ Jo K _@ @ R!0X@o R(KA RP RW R@ 6 / A R_ Hm 0
0x0e40a0…0e4234 (1, 53) Dummy {f00=0x0048, f01=0x0190, f02=» ( , . > J F " D X ! A R%V @ _ @ R"@m0X2 RRRRRRR R" 1 80X !"W 0X ! @m Rh N 2 4 A A
0x0e4234…0e43c8 Dummy {f00=0x0048, f01=0x0190, f02=» ( J F " D ( & H I R?RAo( ! ?R R?RAoW I~ Co8RC <RCz8R RAo R"K2 RRRR0X Z . j z ~
0x0e43c8…0e455c Dummy {f00=0x0048, f01=0x0190, f02=» A 1 A 3 * 6 * 8 : < W J = W Z > j ? 5 z J F " D ! R!0X R(V RK?R R#K2 RRRRRRRR1X F_ Co<RCm<RCz8R0X R!K2 RRRR L O Q ,
0x0e455c…0e46f0 Dummy {f00=0x0048, f01=0x0190, f02=»!X b !U R*8R0X ?R Rh ! & R?RC <R Rh ( & H I R?R F V W f W v D A A
0x0e46f0…0e4884 Dummy {f00=0x0048, f01=0x0190, f02=» $ . $ 4 D D J F " D ?R@o@z Ub & 5 +@mA{ R*V#( - 1XF0X ! 0X { R&{ mU_"@{Ao?R T " ' ) / 1
0x0e4884…0e4a18 Dummy {f00=0x0048, f01=0x018e, f02=»RA #W R D ( N V 0 d @ i P s ` v0 5 p { & } J F " D @ 80X _5 R_:A @{0R $} !4 @{Az R'P ;R -pA{_% R!gL @m?R?R@
0x0e4a18…0e4bac Dummy {f00=0x0048, f01=0x409a, f02=» & FROM DISC.R & & @ O , & U > ( L ( $ " _/0R + 0R , A~4 @~P + , 4 X @ J F " D @ 80X _5 R_:A @{0R $} !4 @{Az R'P ;R -pA{_% R!gL @m?R?R@
0x0e4bac…0e4d40 Dummy {f00=0x0048, f01=0x0190, f02=» @ H IDENT DENT03 TRA 10.0 80-10-10 F1 O1111 REL 10.0 80-04-11 DEFORC DEVERI H $$$TRAN b DEFORC DEVERI : t B > DELOCKN DERRORA DESTAT0 FMOVE FORCED1 MASKL T:DISP0 T:EDWR B > T:GETA T:GETCR T:KI T:SETC T:TSTC T:UPDF
0x0e4d40…0e4ed4 (1, 54) Dummy {f00=0x0048, f01=0x0190, f02=» , @ X l
0x0e4ed4…0e5068 Dummy {f00=0x0048, f01=0x018e, f02=» ~ ? . > N # ` . r 1 J F " D A 0X P L W 0X "0R /P LW L "j 0X 0X #4 @ C S ]
0x0e5068…0e51fc Dummy {f00=0x0048, f01=0x0190, f02=» $ 4 D T J F " D !4 !0X@ T 0R F j %! !0X ! 0X K R! 6 cv6 C d +4 -4
0x0e51fc…0e5390 Dummy {f00=0x0048, f01=0x0190, f02=» $ 4 D T - d / t 3 5 : ? J F " D _ A 0X T f !0R F0X0X _ 0X 0R (P h ! !P 1X F_ 1X F !0X X
0x0e5390…0e5524 Dummy {f00=0x0048, f01=0x40f0, f02=» & & ( , & < & . J & . Z ( h t & . & ( * & $ @ 0X O _U "4 #4 $4 ` @ ! !P 1X F_ 1X F !0X X
0x0e5524…0e56b8 Dummy {f00=0x0048, f01=0x018e, f02=» @ H IDENT DEPOOL TRA 10.0 80-10-10 F1 O1111 REL 10.0 80-04-11 DEPOOL H $$$TRAP Z DEPOOL l CMPINDP GETINDA SETB ' '
0x0e56b8…0e584c Dummy {f00=0x0048, f01=0x0190, f02=» J F " D @ 2 RRRRRRRRRRR A ! ~U ! L& !0R !T J _ R:R J F " D @I !_) _7j ! ! h~ !X8H !( @ h~ U !j~ ! ! !P R E J F " D !0R ! N_m R ?R j !! '( !1j !& !j !!
0x0e584c…0e59e0 Dummy {f00=0x0048, f01=0x0190, f02=» & 1 J F " D j !! (I !Y A ! p ! ?R ! 0R !h & !&P E l J | J F " D @ !0R !<R_ ( ) +h & '&Z h ! !R !W h ! !Z< " ! J F " D ) L
0x0e59e0…0e5b74 (1, 55) Dummy {f00=0x0048, f01=0x0190, f02=»!j !! ( _N Z - Fj 1 Tj * 5 Xj < @ N J F " D ! ( + ~UWhj !! ' !QU I N! L ! L Lb ! W:0 ^ R T V X J F " D @R^ h^ U !P L! Lj !!^ b ! f^ ! !A j !
0x0e5b74…0e5d08 Dummy {f00=0x0048, f01=0x4176, f02=» " D )W# + Lj ! h $ !T 8 W - !"4 !!4 j !!^ XW N 3 ` J F " D ( !"4 Lj ! j !! ( j (! ! _ f^ !0R^ !j^ !U p S J F " D @ !!4 6 LW U j !!~ W j !! (W
0x0e5d08…0e5e9c Dummy {f00=0x0048, f01=0x0190, f02=» @ H IDENT DE10ST TRA 10.0 80-10-10 F1 O1111 REL 10.0 80-04-11 DE10ST DEAP1A H $$$TRA1 b DE10ST DEAP1A M t > : DE11ST1 DE12STA DE14ST0 DE15STF DEANOK DEAOK0. DECLRA- < 8 DECOMP DEPMSK1 DEPOOL DEPRUT DERR RESTOR T:A
0x0e5e9c…0e6030 Dummy {f00=0x0048, f01=0x0190, f02=» 1 5 = $ J F " D ( &Ad1XFAn@m R6 0 R_ @n_ ( !'( _&3 RRRRR@d0R 0} h* Rh 4 B Z [ ] n ^ a c f h
0x0e6030…0e61c4 Dummy {f00=0x0048, f01=0x0190, f02=» 59 ] & T 8 J Z J F " D L|j " $# Lr?R ! !6 +; ^# LZb !" Lj !# R'bc (c" L l A N P
0x0e61c4…0e6358 Dummy {f00=0x0048, f01=0x0190, f02=» & $ 10 SUPERVISORY FUNCTIONS $ 6 & F & T PROGRAM: b $ z & XX " h & d & d 11 DATE AND TIME $
0x0e6358…0e64ec Dummy {f00=0x0048, f01=0x40b0, f02=»& 14 SYSTEM-VARIABLESS $ 0 & @ 15 FILE-SPACEI N $ l ( | &?RP @ " h & d & d 11 DATE AND TIME $
0x0e64ec…0e6680 Dummy {f00=0x0048, f01=0x0190, f02=» @ H IDENT DE11ST TRA 10.0 80-10-10 F1 O1111 REL 10.0 80-04-11 DE11ST H $$$TRA1 Z DE11ST l 6 2 DECLRN1 DERRORA T:ATTF0 T:DISPF T:GETT T:SETT.
0x0e6680…0e6814 (1, 56) Dummy {f00=0x0049, f01=0x0190, f02=»K ! _ @n0X T !S0X ! _*a F0X n # , & < 11 DATE AND TIME J $ j & z DATE: $ & f XXE-XXE-XX " ! & TIME:
0x0e6814…0e69a8 Dummy {f00=0x0049, f01=0x4070, f02=» 999999 " T * ( : @S !4 F E Z@ l j & z DATE: $ & f XXE-XXE-XX " ! & TIME:
0x0e69a8…0e6b3c Dummy {f00=0x0049, f01=0x0190, f02=» @ H IDENT DE12ST TRA 10.0 80-10-10 F1 O1111 REL 10.0 80-04-11 * & hA20 CANC11 CANC12 DE12ST WRIT12 H $$$TRA1 v 4 0 hA20 CANC11C / CANC121 2 DE12ST1 WRIT12 G : 6 DECLRA1 DEDISCA DEPOOL0 DERR0 ENT12 RESTORL T:ATTF0 T
0x0e6b3c…0e6cd0 Dummy {f00=0x0049, f01=0x0190, f02=» 8 @ A E B 0 J F " D L1XFAd # @d An@mAe@f R 2 RRR R_ !0R#$} R& 2 @ ] _ & & 99 " h & d
0x0e6cd0…0e6e64 Dummy {f00=0x0049, f01=0x0190, f02=» NAME: TS $ & e , & < & J & X & e @ f & x & $ ( C & TYPE: $ & f &
0x0e6e64…0e6ff8 Dummy {f00=0x0049, f01=0x0190, f02=» ELEMENT $ S: , $ > & f N & d ^ & n XX | " T & & g XX " T & ELEMENT
0x0e6ff8…0e718c Dummy {f00=0x0049, f01=0x406c, f02=» ( > : 8 @RRR_,4 j 1! ! !j 2! ! L R R ! 4 t V@ h & n XX | " T & & g XX " T & ELEMENT
0x0e718c…0e7320 Dummy {f00=0x0049, f01=0x018e, f02=» @ H IDENT DE1201 TRA 10.0 80-10-10 F1 O1111 REL 10.0 80-04-11 ENT12 H $$$TRA1 X ENT12 j > : hA20 ATTDB ATTWB CANC110 CANC12F CLEARB DECLRN. DEDISC- | B > DEPOOL DERR DERROR FMOVE RESTOR T:DISP T:ERAS T:GETF T
0x0e7320…0e74b4 (1, 57) Dummy {f00=0x0049, f01=0x0190, f02=» % 4 TT ( < < J F " D Hd ?R ! R8T R& ( RK !0R#$}?R ) _ ! Lb "" R" L B ! D R Y ] ^ _ g
0x0e74b4…0e7648 Dummy {f00=0x0049, f01=0x0190, f02=» ! L ! L L W b 0 " @ P ` J F " D L " ! j " j $" Af0R~F0R "P 0R~Fj~#! ! ! !W p c $ !
0x0e7648…0e77dc Dummy {f00=0x0049, f01=0x0190, f02=» $$ %0X 0X %%0X %% ` . > N ^ n ~ $ ! $ +
0x0e77dc…0e7970 Dummy {f00=0x0049, f01=0x0190, f02=» d { J F " D @ !$ ! $ W !W R8P )B?R0R (+0R +@eAf ! ! 0X %%I j z R 3 @ , ,
0x0e7970…0e7b04 Dummy {f00=0x0049, f01=0x0190, f02=» !_ ! R8 Z ( 8 T H J F " D ! R( TJ?R ! R& ! Lb !# ~ Z % &
0x0e7b04…0e7c98 Dummy {f00=0x0049, f01=0x0190, f02=» 0R (+?R - RK !?R &A R$ 1 RK !2 x K 6 S F Y V b f d x g n r z ~ J F " D @ RRR_
0x0e7c98…0e7e2c Dummy {f00=0x0049, f01=0x0190, f02=» i ( 8 A H " Z J F " D R R_ L R (0X % 0R ?R ~ R ~ RR j !! !0R~Fj " L0 j N &
0x0e7e2c…0e7fc0 Dummy {f00=0x0049, f01=0x40aa, f02=» & & & U 0 ( > F A ? R "P L0R~F " !j~#! ! T j " $ j !! 1j !! 2 !!4 2 J @ L0 j N &
0x0e7fc0…0e8154 (1, 58) Dummy {f00=0x0049, f01=0x0190, f02=» @ H IDENT DE14ST TRA 10.0 80-10-10 F1 O1111 REL 10.0 80-04-11 DE14ST H $$$TRA1 Z DE14ST l $ DECLRN1 DEDISCA DERR T:ATTF0
0x0e8154…0e82e8 Dummy {f00=0x0049, f01=0x0190, f02=» NAME CONTENTS $ & & 6 & X% D 01 T $ f & @ v & ! & & X% 02 $ & @ & " &
0x0e82e8…0e847c Dummy {f00=0x0049, f01=0x0190, f02=» & @ & $ & . & X% < 05 L $ ^ & @ n & % & & X% 06 $ & @ & & & & X%
0x0e847c…0e8610 Dummy {f00=0x0049, f01=0x416c, f02=» & @ & ( & & & X% 4 09 D $ V & @ f & ) x & & X% 10 $ & @ & * & &
0x0e8610…0e87a4 Dummy {f00=0x0049, f01=0x0190, f02=» @ H IDENT DE15ST TRA 10.0 80-10-10 F1 O1111 REL 10.0 80-04-11 DE15ST H $$$TRA1 Z DE15ST l @ < ATTWB DECLRNT DEPOOL DERR- OPCL T:ATTFR T:DISP T:ERAS1 T:THOM
0x0e87a4…0e8938 Dummy {f00=0x0049, f01=0x018e, f02=» !G! "?! !L ! " ! ! # !A h D & O 6 S F ] V d f h A v i j q s J F " D @n@m R6 p R_ 0X ! _7Hm_ R#P Q R2 RRR _ 0X R6 A
0x0e8938…0e8acc Dummy {f00=0x0049, f01=0x018e, f02=» J F " D $Gv ?v !L "?v ! " ! $ & ! % 0X & R$Xm R2 RRR _ R& V Q f & v 15 FILE SPACE? $ & USERFILE UNIT? $ & :U &
0x0e8acc…0e8c60 Dummy {f00=0x0049, f01=0x0190, f02=» FILE $ & , SIZE : $ N & ^ FREE %M l $ & SYSTEMFILE $ & ZZZZ9 " ! &
0x0e8c60…0e8df4 (1, 59) Dummy {f00=0x0049, f01=0x410c, f02=»$ # & ZZZZ9 " $ 2 & B ZZZZ9 P " % f & # v ZZ9 " & & & & U ( R$4 @
0x0e8df4…0e8f88 Dummy {f00=0x0049, f01=0x018e, f02=» @ H IDENT DE20ST TRA 10.0 80-10-10 F1 O1111 REL 10.0 80-04-11 DE20ST DEAP2A H $$$TRA2 b DE20ST DEAP2A S t > : CMPIND2 CNTNUMA DE21ST0 DE23STF DE24ST DEANOK. DEAOK0- > : DEAOK4 DECLRA2 DEDISC DEPMSK DEPOOL DEPRUT D
0x0e8f88…0e911c Dummy {f00=0x0049, f01=0x0190, f02=» + , - ( 3 8 ; H @ X J F " D ( !Ad1XFAn@m R6 6 W,@n_ ( "2( _!@j3 RRRR@ @d0R 0} 4 Rh h G H l *! r *! | J
0x0e911c…0e92b0 Dummy {f00=0x0049, f01=0x0190, f02=» $ v , J F " D ) ?R Lj !& R'bc c b W 0X ! L R$ r"?R 7" v$ <
0x0e92b0…0e9444 Dummy {f00=0x0049, f01=0x0190, f02=» C? Y? 0 @ $ P / ` 4 p 9 > J F " D RP ! L W+! L A ?R@ ?R 0R !T ?R )6 W ?R "?R &?R (?R C J F " D @ ?R
0x0e9444…0e95d8 Dummy {f00=0x0049, f01=0x0190, f02=» 6 L J F " D 3 W1Ak_+ !" %% h / !T , W Hk ! c % c c X h x " 3 9 > J F " D _ & RK !?R 0X %%
0x0e95d8…0e976c Dummy {f00=0x0049, f01=0x0190, f02=» 5 f N k o , q < s 5 L v N { n ~ J F " D @<Rj ! ! L @iW Ai?R RP ! L ?RA W @ ! L A ?R@ ?R R<R! L A ?R@ ?R 5 N
0x0e976c…0e9900 Dummy {f00=0x0049, f01=0x0190, f02=» N Y Q $ & 4 & 20 B FORMAT R $ 0 h & - x DEFINITION $ 0 & PROGRAM: $ 0 & XX
0x0e9900…0e9a94 (1, 60) Dummy {f00=0x004a, f01=0x0190, f02=» $ 1 DEFINITION $ 1 * & : & 22 H BALANCE X $ 2 p & - FORMAT $ 2 DEFINITION $ 2 & & 23 GET
0x0e9a94…0e9c28 Dummy {f00=0x004a, f01=0x4082, f02=»AT $ O ( B = ; R<R! L A ?R@ ?R R<R! L @ ?RA ?R?R ! L ! L !W 4 & l@ ~& - FORMAT $ 2 DEFINITION $ 2 & & 23 GET
0x0e9c28…0e9dbc Dummy {f00=0x004a, f01=0x0190, f02=» @ H IDENT DE21ST TRA 10.0 80-10-10 F1 O1111 REL 10.0 80-04-11 DE21ST DEFGTC H $$$TRA2 b DE21ST DEFGTC t B > ATTDB ATTPRTT ATTWB DEDISC- DEFDSC1 DEPOOLL DERROR0 DETPRT D @ EMPTYT FCODE FEDIT FLINK FMOVE MTEXT PRFGUF
0x0e9dbc…0e9f50 Dummy {f00=0x004a, f01=0x0190, f02=» ! ( r , * % # 0 P 1 < 2 j 8 z > J F " D AnIj @{ " @iW Ai ! R" P RK7 ?R % L0R ,0R , R D J P
0x0e9f50…0ea0e4 Dummy {f00=0x004a, f01=0x0190, f02=» 2 RRRR0R F 'h #Q !j R, w j 1!w!I x 6 F V J f J v J F " D i j 2! ! !j "" j $" mHj R-P RK !2 RR_ R&{ { R
0x0ea0e4…0ea278 Dummy {f00=0x004a, f01=0x0190, f02=» J F " D )P RK !Ix 6 * ?R R&{ { R*P RK !2 RR_ R({ P RK $ J r J J J ) 3
0x0ea278…0ea40c Dummy {f00=0x004a, f01=0x0190, f02=» Z ( e * v { 0 @ P J F " D @i, ! 0X Q R A ! 0X Q R A 0R j { ! !jm & {!0R "} R)P ` ( '
0x0ea40c…0ea5a0 Dummy {f00=0x004a, f01=0x0190, f02=» " 0 @ P ` p J F " D "}H{ Ij L RK !6 H" W 0R {$*0X R RP RK_4 R R0R "}_? 1
0x0ea5a0…0ea734 (1, 61) Dummy {f00=0x004a, f01=0x0190, f02=» K X ` p , z = < L J F " D @ {2 $ #?R R&{ @jP { R&{ W R&{ @jP H{ m R*" ! I{ ?R % & J F " D R& 4 0X 6 55 555555555W 'I ( W Ij I }I ( 'A He !
0x0ea734…0ea8c8 Dummy {f00=0x004a, f01=0x418c, f02=» ? ? ? ( 8 J F " D &Hdx #t #Wj #k &g2 RRRRRRRRRRRRRWHHdR #W;IeJ_J # & H # . ( ; ( J F " D '<W- RA ( %Ie,I ) xW Hi! ' 0R (T W
0x0ea8c8…0eaa5c Dummy {f00=0x004a, f01=0x0190, f02=» @ H IDENT DEATTF TRA 10.0 80-10-10 F1 O1111 REL 10.0 80-04-11 DEATTF H $$$TRAA Z DEATTF l T:ATTFA & & 21 USER
0x0eaa5c…0eabf0 Dummy {f00=0x004a, f01=0x0190, f02=» CORRECTION $ 1 & * & 8 & F $ %1 T & d & r FIELD $ 1 & : FU & XXXE " $ & START:
0x0eabf0…0ead84 Dummy {f00=0x004a, f01=0x018e, f02=» & & ZZ " & & . 0 & OCCUPIED > RECORD T $ C j LENGTH z $ C & : & E TTTT " ( & & &
0x0ead84…0eaf18 Dummy {f00=0x004a, f01=0x0190, f02=» & . & MINIMUM LENGTH ( $ I > & > N & : & @i j XX | " ' & & & MUST ENTER & (Y/T & & N & N
0x0eaf18…0eb0ac Dummy {f00=0x004a, f01=0x0190, f02=» & N & N & ): & @s@ 0 & #@ B & R & ` & DUPLICATE n & & : & jA & & . & VERIFY & 9 & (Y/I &
0x0eb0ac…0eb240 Dummy {f00=0x004a, f01=0x0190, f02=»ITIAL CLEAR & ( & ( " & Y 0 & Y > & /N): L & u@ ^ & %@ p & . & SPECIAL HANDLING: & @k ZZVZZZ " & &
0x0eb240…0eb3d4 (1, 62) Dummy {f00=0x004a, f01=0x0190, f02=» (#G:...) $ & 2 $ ACCUMULATION 2 $ N (#A:...) ^ $ v & & o@ & !@ & & p@ & "@ & & &
0x0eb3d4…0eb568 Dummy {f00=0x004a, f01=0x0190, f02=»DEFINITION $ 2 & j 2 " & # 2 & # @ CORRECTION N $ 2 h & x & $ %2 & & & STARTN $ 2 & & :
0x0eb568…0eb6fc Dummy {f00=0x004a, f01=0x018e, f02=» & @ ZZ " & & 0 & > BATCHN L $ & b & -ACCUMULATOR:A r & m XX " ( & . & SPECIAL HANDLING: & @k
0x0eb6fc…0eb890 Dummy {f00=0x004a, f01=0x018e, f02=» & # GENERATION $ # 0 $ (#G:...) @ $ $ X & h & o@ v & !@ & & p@ & "@ & & & U ( %
0x0eb890…0eba24 Dummy {f00=0x004a, f01=0x018e, f02=» & SIZE: & f ` ( AA . " ( ! @ & P ) LINE ^ $ )! r * NUMBER $ *! & : & + + Z9 " + " & . , NUMBER
0x0eba24…0ebbb8 Dummy {f00=0x004a, f01=0x0190, f02=» & & 2 & $ & 3 2 & ( @ & 4 N & 2 & 5 j & < x & 6 & F & 7 & & & . 1234567890 $ .#
0x0ebbb8…0ebd4c Dummy {f00=0x004a, f01=0x413e, f02=»7890 $ 2# 3 1234567890 $ 3# 6 4 1234567890 F $ 4# ` 5 123456789 p $ 5# & & & & & & n @ & (
0x0ebd4c…0ebee0 Dummy {f00=0x004a, f01=0x0190, f02=» @ H IDENT DE23ST TRA 10.0 80-10-10 F1 O1111 REL 10.0 80-04-11 DE23ST H $$$TRA2 Z DE23ST l @ < ATTDB ATTPRTT ATTWB DE21ST- DECLRA1 DEDISCL DEPOOL0 DERR1 D @ DERROR DESTAT DETPRT FEDIT PRFGUF RESTOR T:ATTF T:DISP
0x0ebee0…0ec074 (1, 63) Dummy {f00=0x004a, f01=0x0190, f02=» $ ( 8 7 H ~ X h ! x % . / 6 J F " D @g0R 0} { 1XFAn@ RAn2 RRRRR R_ 0R 0}@n_ RK6 5 ?RAg@
0x0ec074…0ec208 Dummy {f00=0x004a, f01=0x0190, f02=» o s j t * u : v ~ J w Z x j y z z { c J F " D @ ) L AiW 0R {$* p!0X RAnP 0X ! 0X L RK2 RRRRRRRRR_Q
0x0ec208…0ec39c Dummy {f00=0x004a, f01=0x018e, f02=» ~ * : J J F " D LW R XT 8 RK2 RRRJgwjm & {!_: RK2 RRRRR_ R({ P _ &! Z j j
0x0ec39c…0ec530 Dummy {f00=0x004a, f01=0x018e, f02=» H J F " D $!! {1Ii=j #!! {2 $ #j !! {(j ' { j {'" j { ! % { ! # _)j G V [ 7 f ] v b - l t u * % # P J F " D @ { ' R@j@{
0x0ec530…0ec6c4 Dummy {f00=0x004a, f01=0x0190, f02=» $ 4 7 D T d 7 t & & 23 GET FORMAT $ 3 &
0x0ec6c4…0ec858 Dummy {f00=0x004a, f01=0x403c, f02=» 0R($}2 RRR?R R&{ 0R 0}4 _ j &@ 8 x h p
0x0ec858…0ec9ec Dummy {f00=0x004a, f01=0x0190, f02=» @ H IDENT DE24ST TRA 10.0 80-10-10 F1 O1111 REL 10.0 80-04-11 DE24ST H $$$TRA2 Z DE24ST l @ < ATTDB DECLRAT DEDISC DEPOOL0 DERR1 DERRORL FEDIT RESTOR1 T:ATTF T:DISP T:GETF D
0x0ec9ec…0ecb80 Dummy {f00=0x004a, f01=0x0190, f02=» ' . 4 F < 2 J F " D 0R 0} { 1XFAn R6 R_ @n_ RK2 RRWm R* Lj !& 0R {$ B F J L T Z ] e
0x0ecb80…0ecd14 (1, 64) Dummy {f00=0x004b, f01=0x0190, f02=» d 0 @ P ` M p & & 24 COPY FORMAT $ 4 & FORMAT $ 4 & TO
0x0ecd14…0ecea8 Dummy {f00=0x004b, f01=0x40aa, f02=» & v @ & m & m ( & @ 6 & U H ( V . * ( RKW RK2 RRW R&{ _ R&{ 0R 0}4 b @ FORMAT $ 4 & FORMAT $ 4 & TO
0x0ecea8…0ed03c Dummy {f00=0x004b, f01=0x0190, f02=» @ H IDENT DE30ST TRA 10.0 80-10-10 F1 O1111 REL 10.0 80-04-11 DE30ST H $$$TRA3 Z DE30ST l < 8 DE31ST3 DECLRAA DEPMSK0 DEPRUTF DERR1 RESTOR1 T:ATTF0 +
0x0ed03c…0ed1d0 Dummy {f00=0x004b, f01=0x018e, f02=» < & & 30 JOB , $ 0 @ & - P DEFINITION ^ $ 0 x & PROGRAM: $ 0 & 3 & XX " h & d
0x0ed1d0…0ed364 Dummy {f00=0x004b, f01=0x4118, f02=» DEFINITION $ 1 & . & 32 < GET L $ 2 ` & p JOB ~ $ 2 & - DEFINITION $ 2 ( @ R_? ! 4 D
0x0ed364…0ed4f8 Dummy {f00=0x004b, f01=0x0190, f02=» @ H IDENT DE31ST TRA 10.0 80-10-10 F1 O1111 REL 10.0 80-04-11 DE31ST DEAP3A H $$$TRA3 b DE31ST DEAP3A t B > ATTWB DEANOKT DEAOK0 DECLRA0 DECLRN1 DEDISC1 DEPOOL0 DERR < 8 DERROR EMPTYT3 T:ATTF T:DISP T:ERAS T:GET
0x0ed4f8…0ed68c Dummy {f00=0x004b, f01=0x018e, f02=» & : R f
0x0ed68c…0ed820 Dummy {f00=0x004b, f01=0x0190, f02=» x 0 2 ( : J ! Z ) j * , z + 0 5 : J F " D 1XFAd!hL @dAn@mAe R6 ?R " R&z 2 RRR4 LW
0x0ed820…0ed9b4 (1, 65) Dummy {f00=0x004b, f01=0x0190, f02=» ^ 3 _ f ` f g , w < x L | Q } Q l ~ | s s J F " D @He @o RW 0R z ,AnAo@e R2 RRRRRRR _( R(z T &PU 1 RK2 RRRR
0x0ed9b4…0edb48 Dummy {f00=0x004b, f01=0x018e, f02=» z! X#b !& R"z <R R$z zU0R z ,@e0X " z 8 H X h x J F " D *k0X " R_ He% k0Rk<RId R$P )SW R"T k _ kLW @f !" )*
0x0edb48…0edcdc Dummy {f00=0x004b, f01=0x0190, f02=» c g k , J F " D @" )&0R * * L L_=0R !P #_R * , !" < *& J F " D 3 h &U !T , , _ ,& R!8RW:6 1?R
0x0edcdc…0ede70 Dummy {f00=0x004b, f01=0x0190, f02=» & & 99 " h * & d : CREATE J $ b & r GET $ JOB-DEFINITION $ & JOBNAME: $
0x0ede70…0ee004 Dummy {f00=0x004b, f01=0x0190, f02=» & BATCHHEAD: $ 6 & f F & 4 X & h BALANCE: v $ & &g & 5 & FORMAT $ &
0x0ee004…0ee198 Dummy {f00=0x004b, f01=0x0190, f02=» & + & FORMAT $ 4 & D 2: R $ d & fA r & "A & ! SYMBOLIC: $ !A & &A & , & " FORM
0x0ee198…0ee32c Dummy {f00=0x004b, f01=0x0190, f02=»IC: $ $A & &A & - . & > % FORMAT L $ % b & r & 4: $ & & fA & $A & ' SYMBOLIC: $ 'A & &A
0x0ee32c…0ee4c0 Dummy {f00=0x004b, f01=0x0190, f02=» & %A & * SYMBOLIC: " $ *A < & &A L & / ^ & n + FORMAT | $ + & , 6: $ , & fA & &A & -
0x0ee4c0…0ee654 (1, 66) Dummy {f00=0x004b, f01=0x0190, f02=» / 7: $ / & fA " & 'A 4 & D 0 SYMBOLIC: R $ 0A l & &A | & 1 & 1 FORMAT $ 1 & 2 8: $ 2 &
0x0ee654…0ee7e8 Dummy {f00=0x004b, f01=0x4154, f02=» 4 FORMAT $ 4 & " 5 9: 0 $ 5 B & fA R & )A d & t 6 SYMBOLIC: $ 6A & &A & 3 & & & U ( 2 -
0x0ee7e8…0ee97c Dummy {f00=0x004b, f01=0x018e, f02=» @ H IDENT DE40ST TRA 10.0 80-10-10 F1 O1111 REL 10.0 80-04-11 DE40ST H $$$TRA4 Z DE40ST l > : DECLRA4 DECLRNA DECLRS0 DENT01F DEOPBC DEPMSK. DEPRUT- 2 . DERRS DERROR OPCL T:ATTF T:GETA T:GETF & "
0x0ee97c…0eeb10 Dummy {f00=0x004b, f01=0x0190, f02=» x 4 H j
0x0eeb10…0eeca4 Dummy {f00=0x004b, f01=0x0190, f02=» " ! ( % 8 0 H J F " D @e kU lU( .AdIe 1XFW 1XFAn@mIe RW R6 . R_ @n_ Ief( $A6 X ] e f h i " o J F "
0x0eeca4…0eee38 Dummy {f00=0x004b, f01=0x0190, f02=» Z $ 4 D T " d t J F " D @e@dKeN@ @ @ $ * h Rh R_ + , R 2 RRRR R_ 0X 1XF0 M & & 40
0x0eee38…0eefcc Dummy {f00=0x004b, f01=0x018e, f02=»& XX " h " & d3 2 & d B & 41 P OPEN NEW ` $ 1 x BATCH $ 1 & & 42 OPEN OLD $ 2 BATCH
0x0eefcc…0ef160 Dummy {f00=0x004b, f01=0x018e, f02=» BATCH $ 3 & * & 44 8 OPEN OLD H $ 4 ` TEST p $ & - ! BATCH $ !4 & $ '4 ( " & &
0x0ef160…0ef2f4 (1, 67) Dummy {f00=0x004b, f01=0x018e, f02=» & % MODE $ %4 & & 4 6 & F & TEST T $ &4 h & x $ *4 & $ .4 & $ 14 & $ 44 ( '
0x0ef2f4…0ef488 Dummy {f00=0x004b, f01=0x0190, f02=» + UNIT $ +5 & :U ( & 8 , X J " ,i & l - VOLUME z $ - & : & & ( . / JOB $ /
0x0ef488…0ef61c Dummy {f00=0x004b, f01=0x410e, f02=» $ 2 3 NAME $ 3 $ & : 4 & " B & l V ( d 4 p & & U ( 5 & U & ( X _ @
0x0ef61c…0ef7b0 Dummy {f00=0x004b, f01=0x018e, f02=» @ H IDENT DE20FS TRA 10.0 80-10-10 F1 O1111 REL 10.0 80-04-11 > : FACC FCODE FCOPY FDUPL FGEN FITEMhFKI FLINK FMELIhFNL H $ hFSL FTABF FTEXT FVAL NOPOOL0 $$$TRAF D @ FACCF FCODE FCOPY FDUPL 1 FGEN1 FITEM .hFKI FLINK d
0x0ef7b0…0ef944 Dummy {f00=0x004b, f01=0x0190, f02=» . > N " ^ $ n & . ~ 6 8 ; . ? J F " D R! R4 R"j ! ! !j o Hi 0R F R ! " !
0x0ef944…0efad8 Dummy {f00=0x004b, f01=0x0190, f02=»& R ( R$j ! d * : J F " D ! !4 & ! c # R ( R% R !j ! !! !j ! ` !4 J d J F " D & " c # R ( R& R "j ! "! !j " ` "4
0x0efad8…0efc6c Dummy {f00=0x004b, f01=0x0190, f02=» & $ R ( V D G $ k 4 m D J F " D @ R( R $j ! $! !j $ $4 0R F !h )Q ! ! #* T .
0x0efc6c…0efe00 Dummy {f00=0x004b, f01=0x0190, f02=» D 0 @ P J F " D r!H (W% ! m R# T+ w! R0X ""j !Q W = RK ! ` 2 < d J F " D R+W
0x0efe00…0eff94 (1, 68) Dummy {f00=0x004c, f01=0x0190, f02=» ` x ! J F " D @ H R+ "L0X !!" " !)I 0X # W 0X # & ' % y %Ad R W ! ! l ! | d ! ! N ! J F " D < RK ! !4 I /W . R ( a - !+ L !) ! !
0x0eff94…0f0128 Dummy {f00=0x004c, f01=0x0190, f02=»j ! ! ! # L j ! ! !W j " ") !L 0R F R '0 ! J F " D R #4 j !Q !4 j !*! !j ! ! !4 !h )Q !j " @ T d " " & ! " ( " " & p! " ( " " &
0x0f0128…0f02bc Dummy {f00=0x004c, f01=0x0190, f02=» " " " # " # " # * " # 8 " # F " # T " # b " # p " # ~ " # " # " # " # " # " # " # " # " #
0x0f02bc…0f0450 Dummy {f00=0x004c, f01=0x0190, f02=» $ & #! $ ( $ " $ . & $! $ > ( $ L $ X & %! $ h ( $ v $ & &! $ ( $ $ & '! $ ( $ $ & (! $ ( $
0x0f0450…0f05e4 Dummy {f00=0x004c, f01=0x018e, f02=»& ,! $ ( % % & -! % ( ( % 6 % B & .! % R ( % ` % l & /! % | ( % % & 0! % ( % % & 1! % ( % % & 2! %
0x0f05e4…0f0778 Dummy {f00=0x004c, f01=0x0190, f02=» & & 6! & ( & " & . & 7! & > ( & L & X & 8! & h ( & v & & 9! & ( & & & :! & ( & & & ;! & ( & !
0x0f0778…0f090c Dummy {f00=0x004c, f01=0x400e, f02=» & @ ' & 6! & ( & " & . & 7! & > ( & L & X & 8! & h ( & v & & 9! & ( & & & :! & ( & & & ;! & ( & !
0x0f090c…0f0aa0 Dummy {f00=0x004c, f01=0x0190, f02=» @ H IDENT DEUNPF TRA 10.0 80-10-10 F1 O1111 REL 10.0 80-04-11 ( DEUNPF DEUNPL FEDIT ( H $$$TRAU ( h " DEUNPF DEUNPLF FEDIT G ( z D @ ADJUSTU BINCONA FMOVE GETFWD0 NOPOOL1 RCNTRL1 T:DISP0 T:GETC ( T:SWIT T:TSTCP (
0x0f0aa0…0f0c34 (1, 69) Dummy {f00=0x004c, f01=0x0190, f02=» a ( p F ) J F " D @ R Hj j !! {(j { ! % { $! R0X ""Il _h !Ah?RAl - ! j !! ) ) n ) ~ J F " D !c % $ ! 6 W j " "W j !! ! $ # !0 ) ) Y ) C
0x0f0c34…0f0dc8 Dummy {f00=0x004c, f01=0x0190, f02=»L "LH "L ) X Yh * Nh * ( Yh * : Yh * L Nh * ^ % Ch * p J F " D #LH #L $LH $L %LH %LH "L # oU U b ! " # * H #V:#G:#A:$ * c p * d u *
0x0f0dc8…0f0f5c Dummy {f00=0x004c, f01=0x0190, f02=» hQ 0 !T 2 RRRRRRRRRW W #_) !j !! * z + 8 + H + X J F " D !( "Q R Ii "_H ! `! a! !0R Fh )Q ! ! # `" a j a` + h J F " D j a` ! ( !_ $ 6 1j b#~ W j b#~#W j b#~& b# +
0x0f0f5c…0f10f0 Dummy {f00=0x004c, f01=0x0190, f02=» _ , J F " D @ + * W !4 # `! a! !0R Fh )Q ! ! " `" a j a` , J F " D j a` ! p 4 !jo ! - h] $ !T 6 #+jo ! ! , b , J F " D !" %_*jo ! )_ jo ! +_ ! !_+J .jo ! ._/jo ! , !4 L b ,
0x0f10f0…0f1284 Dummy {f00=0x004c, f01=0x0190, f02=» , - - - . E - > - N ! - ^ " - n # - ~ $ - % - ' E - J F " D @h@k hQ 2 !0X2 RRRRRRRRRRRRRRRRRR?R !j b! - b! !j !! -
0x0f1284…0f1418 Dummy {f00=0x004c, f01=0x0190, f02=»o " b Jiq !0R Fh ) - ` J F " D Q ! ! "_ !j !! !j b b _ b !jb!! b! !_ . P . l P . | J F " D !j !! ! "q _ AkT c R _ %b!bL j b!U b!_ HkJ cWE . % . ' . 6 .
0x0f1418…0f15ac Dummy {f00=0x004c, f01=0x4110, f02=» S . Y / ^ / f / , k / < t R9 / L y L9 / ^ J F " D @?R !4 L 0X !0R 0R T$0X 0X P 0X ( " L_* L_/ _ / p / & ! / ( / 44 9 / /
0x0f15ac…0f1740 Dummy {f00=0x004c, f01=0x0190, f02=» @ H IDENT DEPRFG TRA 10.0 80-10-10 F1 O1111 REL 10.0 80-04-11 0 PRFGUF 0 H $$$TRAP 0 Z PRFGUF 0 l 6 2 DERRORP DEUNPFA EMPTYT0 NOPOOLF T:EDWR T:PRIN. 0 0 0 ' 0 0 0
0x0f1740…0f18d4 (1, 70) Dummy {f00=0x004c, f01=0x0190, f02=» P 0 d 1 f 1 l #L: 1 . ~ 1 B J F " D @2 w R d "L@h Ru" ! Kh !@k ~L0RoT Lj~ # # - b Ro 1 R 1 #V:#G:#A:" 1 1 J F " D -( q0R TF b , ! , " , # L h
0x0f18d4…0f1a68 Dummy {f00=0x004c, f01=0x0190, f02=» ( 0 , b _1Ii R!"dL&%( _ R#$dL&% W 1X F 4 1 n 2 J , 2 Z n 2 l $ , 2 | 8 2 J F " D $ 9 j~ bIi R!"dL&%W R#$dL&%( A b ~LAk_Dj~ 2 S n 2 W , 2
0x0f1a68…0f1bfc Dummy {f00=0x004c, f01=0x0190, f02=»&%W R#$dL&% ~LAk4 + 1X F P W 2 r 3 0 3 @ 3 P 3 ` * 3 p " 3 " 3 " 3 " ! 3 ( 3 3 & 1 3 FORMAT 3 $ 1 3
0x0f1bfc…0f1d90 Dummy {f00=0x004c, f01=0x0190, f02=» PAGE 3 $ # 4 & : 4 ZZ9R 4 . " ! 4 B & 4 R & 4 ` & 4 n & 4 | LINE 4 $ ! 4 FIELDO 4 $ ! 4 & - 4 & MAX/MIN 4 " & K M A V I
0x0f1d90…0f1f24 Dummy {f00=0x004c, f01=0x0190, f02=» A 4 & #G: 5 GENERATION 5 $ # 5 6 & #A: 5 F ACCUMULATION 5 X $ # 5 t & 5 & 5 & NO NO/POS -L 5 LENGTH 5 $ N 5 $ & I E T E C -ITEM HANDL. 5
0x0f1f24…0f20b8 Dummy {f00=0x004c, f01=0x0190, f02=»" " 5 & 6 XXXT 6 " $ 6 0 & 6 @ Z9 6 N " % 6 ` & 6 p Z9 6 ~ " & 6 & 6 Z9 6 " ' 6 & 6 & !' 6 & 6 & "' 6
0x0f20b8…0f224c Dummy {f00=0x004c, f01=0x018e, f02=» ZZVZZZ 6 " ' 7 & 0 7 & & ~ 7 4 & ~ 7 B ( 7 P 7 & 1 7 l FORMAT 7 | $ 1 7 & : 7 & m 7 & ( 7 & NUMBER OF POOL-UNITS:N 7 XE+XXO 7
0x0f224c…0f23e0 Dummy {f00=0x004c, f01=0x018e, f02=» 7 & 8 & 8 LINE 8 $ $ ! 8 8 & ACCUMULATOR 8 H & POSITION 8 b LENGTH 8 x $ O 8 & ( 8 & SPECIAL 8 & #L:< 8 FIELD 8 $ L 8 & LAYOUT>
0x0f23e0…0f2574 (1, 71) Dummy {f00=0x004c, f01=0x0190, f02=» 8 NOT 9 $ # 9 & 9 , NOT 9 : $ 9 N & ' 9 & HANDLING 9 j & 9 & 9 & 9 ( 9 ! " 9 & 9 & k A 9 & 9 " Z9 9 "
0x0f2574…0f2708 Dummy {f00=0x004c, f01=0x40f0, f02=» " % & : & ) : & ZZVZZ9 : " " & & : 8 & 0 : H & ~ : V & ~ : d ( : r ' : ~ & 1 : ( : , ( & !L 1X F P # RKW ! 4 : : @ : " Z9 9 "
0x0f2708…0f289c Dummy {f00=0x004c, f01=0x0190, f02=» @ H IDENT DEPROC TRA 10.0 80-10-29 F1 O1111 REL 10.0 80-04-11 DESC FDIR LINIT MTEXT H $$$TRAP j & " DESC & FDIRL LINIT MTEXT | @ < DEPOOLP DERRORA EMPTYT0 FACC9 FCOPY FDUPL FGEN.hFKI FMELI D @ hFNL FTABF FTEXT FVALT NOPOO
0x0f289c…0f2a30 Dummy {f00=0x004c, f01=0x0190, f02=» # J F " D 0X RHf R( Hg R( j I 0X ##Ie !l_0 ! $ % & I _ j h z s x J F " D @i I " " ( I 0X $'Ii # L " . I 0X $ RW .W
0x0f2a30…0f2bc4 Dummy {f00=0x004c, f01=0x0190, f02=»@f@g L@l R l eIe ( L@l R l l < * J < < L J ^ J F " D f( If LAl R l g !Af( hIg !W` L@l R l eIeJ( M_5 c n J < $ J J F " D d
0x0f2bc4…0f2d58 Dummy {f00=0x004c, f01=0x018e, f02=»!P I A ! ! J F " D ! % _2 ! W ! !4 % @e@f@g@ R4 ! " # $ * x $ J F " D * + , 4 oL Hi 0R h / !Tr 6 )'''''48fD J F " D ]]NW[A A A jo ! ! ! !
0x0f2d58…0f2eec Dummy {f00=0x004c, f01=0x018e, f02=» , * * $ * 4 * D * T 7 d ; t i G ` Q " &
0x0f2eec…0f3080 Dummy {f00=0x004c, f01=0x0190, f02=» #V:#G:#A:R " . > N ^ J F " D Rj I 0X ##AdA 0R T3 ` c d L h ) c#T # # d0X3 n 1 0 J F " D RRR(
0x0f3080…0f3214 (1, 72) Dummy {f00=0x004d, f01=0x408e, f02=» " " $ . ! R# T ! R0X "" U | : J W RK !+ !4 T Z x@
0x0f3214…0f33a8 Dummy {f00=0x004d, f01=0x018e, f02=» @ H IDENT DECVRT TRA 10.0 80-10-29 F1 O1111 REL 10.0 80-04-11 BINCON CONNUM H $$$TRAC b BINCON CONNUM t 0 - [ . [ / [ 0 [ 1
0x0f33a8…0f353c Dummy {f00=0x004d, f01=0x0190, f02=» ; [ < [ = [ ( > [ 8 ? [ H @ [ X A [ h B [ x C D [ E - F M G M H [ I [ J e J F
0x0f353c…0f36d0 Dummy {f00=0x004d, f01=0x018e, f02=»RRRRRRRW bch b!Z7!T W c N?R b% R ! b_ b$ R " b ,# c D T J F " D bch b!Z2! } c! b$ R " b_DW ( % $N b/hZb" c!T b/ Lj c! f J F " D b c! b$ R " a W b# R # b*a & &a_ a c!
0x0f36d0…0f3864 Dummy {f00=0x004d, f01=0x018e, f02=» J F " D @c a ac bc Lh baZ ! )b c! bc 'b?R c! )c ' ) ' j (! '!f c [ R J F " D ! ! d!?R ` 4 j b c a j c!a! b b! c!f cb db4 j b b / / / /
0x0f3864…0f39f8 Dummy {f00=0x004d, f01=0x0190, f02=» / / / $ / 4 / D / T / d / t / / { / J F " D u aL u $
0x0f39f8…0f3b8c Dummy {f00=0x004d, f01=0x0190, f02=» !W, R ! b! !Hg ( 'b `L d X " v 2 J F " D @d b!Z` b! ! !@g _ R " ,0 b! ! `bh `!Z2! R "_L( % B J F " D !T b! L ` h `" b!T `/j b!Z` !_L b! R #_} c j b!Z7 bc b! c J F " D !d
0x0f3b8c…0f3d20 Dummy {f00=0x004d, f01=0x4134, f02=» ` b` ` !Hg '`4 ^ * " , " : " H ( V b 9! r " ( 99 " ( 999 "
0x0f3d20…0f3eb4 (1, 73) Dummy {f00=0x004d, f01=0x0190, f02=» @ H IDENT DE50ST TRA 10.0 80-10-10 F1 O1111 REL 10.0 80-04-11 O DE50ST DEAP5A O H $$$TRA5 O b DE50ST DEAP5A O t B > ATTDB ATTWB DEANOK. DEAOK0- DECLRA1 DECLRNL DECLRS0 DEDISC O D @ DENT01 DEOPBC5 DEPOOL DEPRUT DERECS DERR
0x0f3eb4…0f4048 Dummy {f00=0x004d, f01=0x0190, f02=» O ~ P P : P X P n P P P P
0x0f4048…0f41dc Dummy {f00=0x004d, f01=0x0190, f02=» P v Q Q Q : Q N * Q l Q | Q + $ Q 1 Q ? h Q @ h Q A Q J F " D @e kU lU( ,AdIe'1XFAn
0x0f41dc…0f4370 Dummy {f00=0x004d, f01=0x018e, f02=» RKIe ! 4 @e@d@ @ _Z@dAe " " R" J Q z R 8 R H * R X R h * R x R J F " D ! U Uj ! !j !!/!j %!8!0R (+0R +( > " 1XFW 1XFAn@m R R R
0x0f4370…0f4504 Dummy {f00=0x004d, f01=0x0190, f02=» R S J F " D R Rh 2 RRR R_ R_ 0R (+0R +0X _ "l lU R R S * S f S v * S S S S S S " S ' S
0x0f4504…0f4698 Dummy {f00=0x004d, f01=0x0190, f02=» USE S U 0 T J F " D @ R&| W L !" ! 0X %, ! b &l b &!Z2b '( "lW b &k T , T j $ T z , T . T T T T } T T T J
0x0f4698…0f482c Dummy {f00=0x004d, f01=0x0190, f02=» T } U " U } U ( } U 8 & U H U X J F " D ) Rh @ P R$ R_+ Rh " $ kU?R % 0Rk >?R lU?R0R 0} R U h D U * U U U ) U
0x0f482c…0f49c0 Dummy {f00=0x004d, f01=0x0190, f02=» R_ R_ 0R~P + , R U f L V $ T $ V 4 d 4 V D x 4 V T J F " D @@z6 Az R_ @ @z R$XP@ ~U 0R , P& b~ ![) !0R + T b~ V d * V V , V , V 2 V
0x0f49c0…0f4b54 (1, 74) Dummy {f00=0x004d, f01=0x0190, f02=» ( V W J F " D 6 h[ * !T06 $ $$ 0R , T 0R , @ T 0R + !_6A X @ T ?R W W n # W ~ & W & 50 W SEARCH W $ 0 W & W MODE W $ 0 W &
0x0f4b54…0f4ce8 Dummy {f00=0x004d, f01=0x0190, f02=» W & X $ % X & X ( $ * X 6 ( X F X R & X b $ X p & X ~ $ / X & X $ 3 X $ @ X & X $ ? X ( X X &
0x0f4ce8…0f4e7c Dummy {f00=0x004d, f01=0x0190, f02=» X $ ? Y ( Y 2 Y & & Y 6 $ * Y D & Y T $ / Y b & Y r $ 6 Y & Y $ < Y & Y RECORD Y $ Y & - Y NUMBER Y
0x0f4e7c…0f5010 Dummy {f00=0x004d, f01=0x0190, f02=»& - Y STATUS Z $ # Z " & : Z 2 & -e@ Z @ & ~ Z R $ @@ Z ` ( Z p Z | & 51 Z ! SEARCH Z $ !1 Z & Z " MODE Z $ "1 Z & Z #
0x0f5010…0f51a4 Dummy {f00=0x004d, f01=0x018e, f02=»ARCH Z $ &2 [ & [ ' MODE [ * $ '2 [ > & [ N ( BATCH [ $ (2 [ r & [ ) LEVEL [ $ )2 [ ( [ * [ & 53 [ + SEARCH [ $ +3 [
0x0f51a4…0f5338 Dummy {f00=0x004d, f01=0x018e, f02=» $ .3 ( / 0 UNIT 0 $ 03 D & :U T & d 1 X v " 1i & 2 VOLUME $ 2 & : & & ( 3
0x0f5338…0f54cc Dummy {f00=0x004d, f01=0x0190, f02=» 6 ] 7 JOB ] $ 7 ] , 8 NAME ] < $ 8 ] P & : ] ` & ! ] n & k ] ( ] 9 ] : BATCH ] $ : ] ; NAME ] $ ; ] & : ] &
0x0f54cc…0f5660 Dummy {f00=0x004d, f01=0x0190, f02=» : ] & " ^ & l ^ ( ^ , ? ^ 8 & ^ H & ! ^ V & ^ f & " ^ t & ) ^ & # ^ & ^ & ^ & $ ^ & ^ & % ^ & ) ^ & & ^
0x0f5660…0f57f4 (1, 75) Dummy {f00=0x004d, f01=0x0190, f02=»& * ^ & _ & + _ & ) _ , & , _ : & _ J & _ X & - _ f & _ v & . _ & ) _ & / _ & _ & _ & 0 _ & _ & 1 _ & ) _
0x0f57f4…0f5988 Dummy {f00=0x004d, f01=0x40da, f02=» & _ & 6 ` & ` & 7 ` , & ) ` < & 8 ` J ( ` Z @ ` f & ` v & ` & U ` ( ` &?R ` ` @ ` & _ & 1 _ & ) _
0x0f5988…0f5b1c Dummy {f00=0x004d, f01=0x018e, f02=» @ H IDENT DE60ST TRA 10.0 80-10-10 F1 O1111 REL 10.0 80-04-11 a DE60ST a H $$$TRA6 a Z DE60ST a l B > DECLRA6 DECLRNA DENT010 DEOPBCF DERR1 DERROR1 OPCL0 T:ATTF a T:GETA T:GETF a & " a
0x0f5b1c…0f5cb0 Dummy {f00=0x004d, f01=0x0190, f02=» b b b 0 b R b t b b b b
0x0f5cb0…0f5e44 Dummy {f00=0x004d, f01=0x0190, f02=» b c ' c J F " D @e( +AdIe 1XFW 1XFAn@m R6 - @~@ R_ @n_ IeW( &@6 _8A c 0 O c ~ W c X c ^ c _ c e c J F " D @W A A Ae@d_<@ R$V RK@ P 1XFAn@m
0x0f5e44…0f5fd8 Dummy {f00=0x004d, f01=0x0190, f02=» c d d d , F d < & d L & 60 d Z $ !0 d j & d z PROGRAM: d $ 0 d & d XX d " h d & d0 d & d d &
0x0f5fd8…0f616c Dummy {f00=0x004d, f01=0x0190, f02=» 2 d & e & 63 e $ !3 e ( KEY e 8 $ 3 e L & / e TEST e j $ 3 e ~ & e & 64 e $ !4 e SIGHT e $ 4 e & / e TEST e $
0x0f616c…0f6300 Dummy {f00=0x004d, f01=0x0190, f02=» SIGHT e $ 4 f & f $ KEY f 2 $ 4 f F & 4 f V & / f f TEST f t $ f & f $ $4 f & f $ (4 f & f $ +4 f & f $ .4 f
0x0f6300…0f6494 (1, 76) Dummy {f00=0x004e, f01=0x018e, f02=» ( f $ g % UNIT g $ %4 g 0 & :U g @ & g P & X g b " &i g t & g ' VOLUME g $ ' g & : g & g & g ( g ( g ) JO
0x0f6494…0f6628 Dummy {f00=0x004e, f01=0x414a, f02=» , BATCH h $ , h - NAME h * $ - h > & : h N & " h & l h p ( h ~ . h & h & U h ( h / h & U h & h ( h 2 . , @ @
0x0f6628…0f67bc Dummy {f00=0x004e, f01=0x8190, f02=» @ H IDENT DE70ST TRA 10.0 81-07-14 F1 O1111 REL 10.0 80-12-17 DE70ST DEAP7A H $$$TRA7 b DE70ST DEAP7A t D @ ATTDB DEANOKT DEAOK0 DECLRA4 DECLRS1 DECONV1 DEDISC1 DELAST D @ DEOPBC DEPMSK7 DEPOOL DEPRUT DERECS DER
0x0f67bc…0f6950 Dummy {f00=0x004e, f01=0x8190, f02=» & D Z x
0x0f6950…0f6ae4 Dummy {f00=0x004e, f01=0x818e, f02=» & : ( X h ( x ( ) - ? $ J F " D kU lU( xAdIe 1XFW 6 1
0x0f6ae4…0f6c78 Dummy {f00=0x004e, f01=0x8190, f02=» J F " D @$ R_ @n_)@ R$V RK6 Ie ! 4 @e@d ' * h Rh R_sI V f v , J F " D e ' @f6 _ AfAe@d_ 2 RRR ( 0RkT (!0RlT (! %0X " _
0x0f6c78…0f6e0c Dummy {f00=0x004e, f01=0x818e, f02=» : $ J F " D ("6 ( R,KW R-K ! R 2 RRRRAzT R ! '! ?R6 ( k lU 4 i " " $ & ) 5 i
0x0f6e0c…0f6fa0 Dummy {f00=0x004e, f01=0x8190, f02=» h t u i $ x0 4 { F J F " D @&{ # R+P " + $ ( ( * ?R( $ 6 ( _W R%T ( * 2 ( RR)gL R " V 0 J F " D '"( g " #L R$T R #
0x0f6fa0…0f7134 (1, 77) Dummy {f00=0x004e, f01=0x8190, f02=» ( & $ J F " D R&{ 1XF0X ! 0X mU_" m 50R {&* p!0X R $ '$( D0R $} | @ 4 0 & . @ J F "
0x0f7134…0f72c8 Dummy {f00=0x004e, f01=0x818e, f02=» H L M $ T W 4 U D V i T [ d g t ] ' ^ b c j p v & J F " D @L2 RRRRRW RK
0x0f72c8…0f745c Dummy {f00=0x004e, f01=0x8190, f02=» $ , $ 4 " D J F " D 0R R2 R&| @zP R % @ Rh R$8R?R6 ?R0RN`a a bahNb# #P a% T & & 70 CONVERSION
0x0f745c…0f75f0 Dummy {f00=0x004e, f01=0x8190, f02=» & d $ ( " . & > $ L & $ # j & z $ ' & $ * $ - ( & $ &
0x0f75f0…0f7784 Dummy {f00=0x004e, f01=0x818e, f02=» & 71 CONVERSION $ $ 1 > & N VIA $ 1 p & DATA COMMN $ 1 ( & 71 CONVERSION $ 1
0x0f7784…0f7918 Dummy {f00=0x004e, f01=0x818e, f02=» & 73 " BATCH LINKING $ "3 2 ( B # N $ UNIT ^ $ $3 r & :U & % X " %i & & VOLUME $ & & :
0x0f7918…0f7aac Dummy {f00=0x004e, f01=0x8190, f02=» & !A & k ( * * 6 + BATCH F $ + , NAME l $ , & : & "A & l ( - & l & A & U
0x0f7aac…0f7c40 Dummy {f00=0x004e, f01=0xc16c, f02=» FILE $ 0 & - 1 NAME , $ 1 @ & : P & @ ^ & p ( ~ 2 * & & FETCHING FORMAT: & & FROM DISC.R & & @ O
0x0f7c40…0f7dd4 (1, 78) Dummy {f00=0x004e, f01=0x0190, f02=» D H IDENT DE80ST TRA 10.0 80-10-10 F1 O1111 REL 1.0 79-08-14/DALI w DE80ST DEAP8A w L $$$TRA8 w f DE80ST DEAP8A 0 w x 4 0 DEANOK8 DEAOK0A DECLRA0 DECONVF DERR1 T:ATTF1 w w w w w
0x0f7dd4…0f7f68 Dummy {f00=0x004e, f01=0x0190, f02=» 2 w N G x M YA x Q NA x . T x @ x P & x ` & 80 x n RECEIVE MODE x ~ $ 0 x & x UNIT x $ 0 x & :U x & x X
0x0f7f68…0f80fc Dummy {f00=0x004e, f01=0x0190, f02=» TYPE: x & e y X y " " y 4 & y D & 1= LINE TO PRINTER y R & y r & 2= LINE TO DISKT y & y & 3= DISK TO PRINTER y & y & RESTART(Y/N):I y & f y
0x0f80fc…0f8290 Dummy {f00=0x004e, f01=0x4026, f02=» L ?RD y | U z @ z " X y " " y 4 & y D & 1= LINE TO PRINTER y R & y r & 2= LINE TO DISKT y & y & 3= DISK TO PRINTER y & y & RESTART(Y/N):I y & f y
0x0f8290…0f8424 Dummy {f00=0x004e, f01=0x018e, f02=» @ H IDENT DERROR TRA 10.0 80-12-03 F1 O1111 REL 10.0 80-04-11 CANC DERROR H $$$TRAR ` CANC DERROR r D @ DELASTR DELOCKA MASK MSKOUT3 T:DISP1 T:EDWR1 T:ERAS0 T:GETA T:NKI T:SETCO T:XSTA * 7
0x0f8424…0f85b8 Dummy {f00=0x004e, f01=0x0190, f02=» " " " " . " < " J " X " f " t " " " " " " # " & " ) " - " .
0x0f85b8…0f874c Dummy {f00=0x004e, f01=0x0190, f02=» ; " D " D " D & " D 4 " D B " D P " D ^ " D l " D z " = " > " ? " @ " A " B " C (
0x0f874c…0f88e0 Dummy {f00=0x004e, f01=0x0190, f02=» & & I/O-ERROR ( 4 @ & P & FUNCTION NOT ALLOWED ^ ( & & ! & COMPULSORY FIELD NOT FILLED ( & & ILLE
0x0f88e0…0f8a74 (1, 79) Dummy {f00=0x004e, f01=0x018e, f02=»ALREADY DEFINED/EXECUTED ( , & < & NOT FOUNDE J ( b n & ~ & NO DISC SPACEE ( & IN USEP $ O (
0x0f8a74…0f8c08 Dummy {f00=0x004e, f01=0x0190, f02=» ! & ( $ &" MAXIMUM RECORD-LENGTH EXCEEDED & ( R ^ & n & NO RECORD FOUNDL | ( $ & , ' &% !MAXIMUM NUMBER OF FIELDS EXCEEDED (
0x0f8c08…0f8d9c Dummy {f00=0x004e, f01=0x0190, f02=» SYMBOLIC $ R & " FORMAT 0 $ R F & : V & : d & r , ' &% ! DOES NOT EXIST IN JOB-DEFINITION & D & OR ON SYSTEM-DISC ( ? &
0x0f8d9c…0f8f30 Dummy {f00=0x004e, f01=0x0190, f02=» & : & & : TTTT9S * " O @ & z O P & : ` & n n & : | & & : TTTT9S " gO & O & : & ASD & 5
0x0f8f30…0f90c4 Dummy {f00=0x004e, f01=0x0190, f02=»RORD v ( & ( & USERFILE ASSIGN-ERRORO 6 ( Z f & v & DISC I/O-ERROR & : XXXXX- " I ( & & DISC
0x0f90c4…0f9258 Dummy {f00=0x004e, f01=0x0190, f02=» IN USEO $ "I ( " # . & > $ VALUE-SETE L $ $I f & : v & % IN USEE $ %I ( & & ' JOBN $ 'I
0x0f9258…0f93ec Dummy {f00=0x004e, f01=0x0190, f02=» *I & : & l & IN ( + JOBN : $ +I N & : ^ & k l , IN USEO z $ ,I ( - & ( # &! DEFINED LINE MAXIMUM EXCEEDEDT (
0x0f93ec…0f9580 Dummy {f00=0x004e, f01=0x018e, f02=»ONFIRM | ( 0 4 & * 1 FORMAT 8 $ 1R N & : ^ & m l & : z 4 / &- )CONFIRM WANTED FUNCTION (CORR,RDEL,PRINT) ( 2 & ) & ILLEGAL FORMAT NAMET
0x0f9580…0f9714 (1, 80) Dummy {f00=0x004f, f01=0x0190, f02=» ( 5 & TEST ENTERED BATCH ( @ 6 L & $ & OUTPUT DEVICE NOT OPERABLE j ( 7 / & 6 2 &0 ,END OF FORMAT FOUND PRESS RINS FOR NEW LINES ( 8
0x0f9714…0f98a8 Dummy {f00=0x004f, f01=0x0190, f02=»THIN FORMAT: j & m & . " & SIZE ON DISC:R 0 : TTT9 L " : I ` & . p ( ~ ; ? & . ( # &! WARNING:REFERENCE TO FIELD (F < XXXN " < A & ! & ) OUTSIDE
0x0f98a8…0f9a3c Dummy {f00=0x004f, f01=0x0190, f02=» > & ( & 95 % OF FILESPACE USED ( @ ? L & & CDV-ERRORI j ( @ & & DATE ERROR ( A & & TIME-OUT (
0x0f9a3c…0f9bd0 Dummy {f00=0x004f, f01=0x0190, f02=»Y DISC ~ ( D & * " & THIS IS A DUMMY MESSAGEN 8 ( ^ j F z 3 ) ? + : + J F " D !1X F P Q LU80X 88 R*j !!
0x0f9bd0…0f9d64 Dummy {f00=0x004f, f01=0x0190, f02=» Q T X * Z F : _ J f Z r j v z J F " D @ 1X FW % L "1X F 0XW 1X F !0X R! 6 W"0X 0R $(
0x0f9d64…0f9ef8 Dummy {f00=0x004f, f01=0x4090, f02=» F & o ( & 6 ( D & " 6 4 Am4 0X 0X 4 P z@ 1X FW % L "1X F 0XW 1X F !0X R! 6 W"0X 0R $(
0x0f9ef8…0fa08c Dummy {f00=0x004f, f01=0x0190, f02=» @ H IDENT DERECS TRA 10.0 80-10-10 F1 O1111 REL 10.0 80-04-11 DERECS DEREFO H $$$TRAR b DERECS DEREFO w t @ < ATTDB ATTWB DEDISC. DEPOOL- DEREC21 MSKOUTL OFRSP RESTOR1 4 0 T:ATTF T:DISPF T:THOM TESTB UPDBIN UPDBOL
0x0fa08c…0fa220 Dummy {f00=0x004f, f01=0x0190, f02=» / 40 J F " D 0R $}j *!! x0R @l 2 RRRRRRR?Rj x! ! wx xyj &"x !gLe x y" e 0 J0 $ ~ O ` J F " D @@ TW( ' )gL @l?Rj xy wj x! { W< R.V xwj &"w W j ! " "Hn ' wx
0x0fa220…0fa3b4 (1, 81) Dummy {f00=0x004f, f01=0x0190, f02=» $* p!0X 0R x*6 VVVVOVOVV V "!H '0R **P I %!@ A W I J 50 Z 7 l J F " D " W %!T A @ 0R *,T H $!A W I $!T @ " , , gL0R #g !! | G M _0 t
0x0fa3b4…0fa548 Dummy {f00=0x004f, f01=0x0190, f02=» @ , J F " D ! 7 R ZH_ j " "jx " &"x* ( L R Zf_q R1Zm u ?R !u R(R j " < N J F " D " j &"x u !?R ! _ j " & wx x 'jy " xy x u$x Aj " $( !
0x0fa548…0fa6dc Dummy {f00=0x004f, f01=0x0190, f02=» p0 w u0 w z0 w . J F " D @ gL #gYuP W j ! x0R , + & # ( #L_ !gL #LWl x @ 0 L 6 P J F " D !?RI W!gLSj " $(wx WW ! wb &
0x0fa6dc…0fa870 Dummy {f00=0x004f, f01=0x0190, f02=» " D "u u j $" x*j &"x ( m ?RAn?R L R :R?R,wx W x* WY uj " "( N ^ n J F " D ?Rj " &( * % 1W 0 R :Rj " & *1 1 W u ! u ! u ! ~ B ! D G v
0x0fa870…0faa04 Dummy {f00=0x004f, f01=0x0190, f02=» # r . k > N ^ n J F " D ( % _ ' xw gL # ( ( #g?R g "b & AlW '2 RRRRRRR R :R ~ B 0
0x0faa04…0fab98 Dummy {f00=0x004f, f01=0x0190, f02=» ! Hl " * W 2?RIl * (m Hl . W H ?R?R Ub & H0 J ^ o B l q | r t y J F " D @$ ' )gL *W ( W R*PE - { ) ?R1XF0X ! 0X({
0x0fab98…0fad2c Dummy {f00=0x004f, f01=0x0190, f02=»0 x w e 6 , J F " D nmW *W * n An xIl j ! { W . ( ' !gL j x) w R<R? < w e " 6 $ ' ` )
0x0fad2c…0faec0 Dummy {f00=0x004f, f01=0x0190, f02=» ?R R <R0R@vP C 8R?R ' ( % 2 R j F ( H 8 L H D X b h h x q ` s v y J F " D @RRRC 8R0R@v<R "!_y # "=R g " R&| R&z )?R R ?R ' xj
0x0faec0…0fb054 (1, 82) Dummy {f00=0x004f, f01=0x4062, f02=»@ O & U ( " " ( y !!4 L 4 y & L@ ^ X b h h x q ` s v y J F " D @RRRC 8R0R@v<R "!_y # "=R g " R&| R&z )?R R ?R ' xj
0x0fb054…0fb1e8 Dummy {f00=0x004f, f01=0x0190, f02=» @ H IDENT DEREC2 TRA 10.0 80-10-10 F1 O1111 REL 10.0 80-04-11 DEOPBC DEREC2 H $$$TRAR b DEOPBC DEREC2 7 t B > ATTWB CLEARBT CMPIND DEACC DEDISC1 DELASTL DEPOOL0 DEPRUT B > DERECS DEREFOC DERROR EMPTYT OPCL RESTOR
0x0fb1e8…0fb37c Dummy {f00=0x004f, f01=0x0190, f02=» . L ` x
0x0fb37c…0fb510 Dummy {f00=0x004f, f01=0x0190, f02=» , < " L % n " ~ " * ? J F " D 2 RR0R@vP LW2 R+P 0R@vP'A T# R*K kU lU R5P7 # k
0x0fb510…0fb6a4 Dummy {f00=0x004f, f01=0x0190, f02=» x ~ " J F " D @@v $W R&z R&| R&{ 0R@v_U R&z R&| R&{ 0R $} L . | 0 & $ J F " D R ^
0x0fb6a4…0fb838 Dummy {f00=0x004f, f01=0x0190, f02=» . > P $ ` p J F " D R'K R #L R$T R-_ R#_-@ P 0R $}A L R W Ay@m 4 @ 0R 0R $
0x0fb838…0fb9cc Dummy {f00=0x004f, f01=0x0190, f02=» > 9 J F " D } R2V RK@y@z@oA # R&{ R&z R&| Rh Ae0R 0} 4 2 RRRRR n q J l J F " D @ uf xyj " & yj &" * 7W (u ! j ! " " 1 R :R "!H $! g | E E E
0x0fb9cc…0fbb60 Dummy {f00=0x004f, f01=0x0190, f02=» J ! * J : J F " D $" 7 R :RW R.:R uf *y x *j &" _* u L R :Rj "" J J ! J ( E -
0x0fbb60…0fbcf4 (1, 83) Dummy {f00=0x004f, f01=0x018e, f02=» l J q x ( | 8 J F " D @( % W ( % # 0R@vP (z Ub &k R"V 0X " ?RI + R#P R 0R@v0X # H " % / " E J F
0x0fbcf4…0fbe88 Dummy {f00=0x004f, f01=0x0190, f02=» E * & : " J J F " D l W H R&P$?R R'T j " &( * )?R Lb %f #j?R0R |"-0R 0R@vP Z E E 4 ! < " J F " D I N?R( % #@H A ?R(
0x0fbe88…0fc01c Dummy {f00=0x004f, f01=0x0190, f02=»P A WB0R@vT ( ' $W3 $W I K @ 0R 0R $} R2TmH z ! 8 J Z " j z J F " D 7 Uj &"* W L R TT0R z , { 0R@vT % 4 * R*T4 m 4W m "
0x0fc01c…0fc1b0 Dummy {f00=0x004f, f01=0x40da, f02=» " # ( - 8 0 H J F " D # W R&| 0X ' 0R@vT R&z @ P R$0R $} W xyj &" X @x x* !!4 ! 4 O @
0x0fc1b0…0fc344 Dummy {f00=0x004f, f01=0x0190, f02=» @ H IDENT DEFDSC TRA 10.0 80-10-10 F1 O1111 REL 10.0 80-04-11 DEFDSC H $$$TRAF Z DEFDSC l D @ ATTPRTF CANCT DEAPPL DEATTF0 DEFGTC1 DELOCK1 DEPOOL0 DERROR B > DESTAT DETPRT DEUNPF DEUNPL EMPTYT FDIR hFNLhFSL MASK
0x0fc344…0fc4d8 Dummy {f00=0x004f, f01=0x0190, f02=»:TFWD V . * T:THOMN T:UPDFT T:XSTAT UPDBOLT VGACNTT @ d $
0x0fc4d8…0fc66c Dummy {f00=0x004f, f01=0x0190, f02=» J & ' , 3 < J F " D Ii " !W ! 0R R" P RK !, ! ?RIj { j L P F X J F " D @1! !j 2! !Hj Lj !&m R$ r"Ii' U ! ( j !! ( ) x.
0x0fc66c…0fc800 Dummy {f00=0x004f, f01=0x018e, f02=» J ( ( ( 4 8 H 8 X J F " D !U 'U U & Ii ( R In 0X ! W 0X ! @n ! Ij 0X :R0X h 2 ( ' $
0x0fc800…0fc994 (1, 84) Dummy {f00=0x0050, f01=0x018e, f02=» V W ^ , ( ` 8 a H h , X j h k x | : J F " D @ I I Ij& # x 0X KK W20X KK W(0X KK W ! $ 0X K :
0x0fc994…0fcb28 Dummy {f00=0x0050, f01=0x018e, f02=» ( 8 H X h x J F " D T W 0X K T R! 2 RRRW "?RI I I I
0x0fcb28…0fccbc Dummy {f00=0x0050, f01=0x0190, f02=» J F " D RR !0X / R2 RRRRW$0X Am6 ! bC I .4 ?R F f B v @ D " 4 0 6 : > 0 @ J F "
0x0fccbc…0fce50 Dummy {f00=0x0050, f01=0x018e, f02=» O S T $ U 4 W : D Y T ` * d i 2 t u { > J F " D @F !0X R?R RK2 RRR?R RW #0X T %y0X %%_ W}?R( 0XW 6
0x0fce50…0fcfe4 Dummy {f00=0x0050, f01=0x0190, f02=» $ J F " D !0X ( 1X F?R0X K ?RHi He 0R ( #0R T R ,I R ! R $ r 8 : H "
0x0fcfe4…0fd178 Dummy {f00=0x0050, f01=0x0190, f02=» ?R 0^ $ % 0X 0R <R RK2 RRRR?R R2 r 0 4 @ ( P : ` p 1 1 ! " #
0x0fd178…0fd30c Dummy {f00=0x0050, f01=0x0190, f02=» , - l . / 0 0 @ 1 P 5 ` 6 p 7 8 9 1 : 1 ; < = > ?
0x0fd30c…0fd4a0 Dummy {f00=0x0050, f01=0x0190, f02=» H I J J F " D RR #?R0X 0X ?R $ 2 RRRRRRRRRRRRRRRRRRRRRRRR2 RRRRRRRRRRR 0 L 2 ~ Q $ Y c ( k m 2 t $ | J F " D @RRRR
0x0fd4a0…0fd634 (1, 85) Dummy {f00=0x0050, f01=0x0190, f02=» 2 , J F " D e Kh R( ! u!0X #'@ @ @ R( ?R@ R( !"_cA $?R0X && < 2 $ J F " D Ru! !eJh ?R0X &&A % Ad@ @ #?RA @ R
0x0fd634…0fd7c8 Dummy {f00=0x0050, f01=0x40c6, f02=» & & & ( 4 @ & 1 P ( ` @ < : .He @h Ru!Kh R( ! Ru! R du Rd ! _3 $?R $?R l 6 @ $ J F " D Ru! !eJh ?R0X &&A % Ad@ @ #?RA @ R
0x0fd7c8…0fd95c Dummy {f00=0x0050, f01=0x0190, f02=» @ H IDENT DEACCU TRA 10.0 80-10-28 F1 O1111 REL 10.0 80-04-11 DEACC SETERR H $$$TRAA ` DEACC SETERR r > : ADJUSTA CMPINDA DEFIND0 DENVALF EMPTYT GETACC. GETFWD- MSKOUT T:GETA & "
0x0fd95c…0fdaf0 Dummy {f00=0x0050, f01=0x0190, f02=» $ 8 Z |
0x0fdaf0…0fdc84 Dummy {f00=0x0050, f01=0x0190, f02=» # / 5 * : : J F " D @l L H KAd6 @d !0R 0R R40R ! T&Hl 0R 0R @l0R T W J G M R s MDA J F " D @ 0Al0R 0R X/ R"_B 4 !
0x0fdc84…0fde18 Dummy {f00=0x0050, f01=0x0190, f02=» @|Thj !! ! j !! L0R _K ! R $ !A !@( | : J J F " D "90R !T2@e@i@k !" ? 'hZ 2 !TP &6 R" Z 0 R @ ? J F " D _ Ai_8Ae_<" v LWpAkW ! R (
0x0fde18…0fdfac Dummy {f00=0x0050, f01=0x40a2, f02=» J @ d 0 ( 0 : < 7 5 R#Ik ! 9R 3hZ ! ! ?R6 PW LW L4 W L @ Z 0 R @ ? J F " D _ Ai_8Ae_<" v LWpAkW ! R (
0x0fdfac…0fe140 Dummy {f00=0x0050, f01=0x0190, f02=» @ H IDENT DEGENE TRA 10.0 80-11-06 F1 O1111 REL 10.0 80-04-11 DEGEN H $$$TRAG X DEGEN j > : ADJUSTG CMPINDA DEFIND0 DENVALF EMPTYT GETFWD. GETGEN- | > : MSKOUT T:ERAS T:GETA T:GETC T:GETF T:TSTC T:UPDF TYPET
0x0fe140…0fe2d4 (1, 86) Dummy {f00=0x0050, f01=0x0190, f02=» 2 J ^
0x0fe2d4…0fe468 Dummy {f00=0x0050, f01=0x0190, f02=»* " " " * " 8 ( F R & b ( r ~ & ( " +TTTTTTTTTTTTTTTTTTTT9 " ! (
0x0fe468…0fe5fc Dummy {f00=0x0050, f01=0x0190, f02=» 1 ; J F " D L@d@g0X @ W< %Ad0R 0R R Ag0R ! T 0R 0R @dW Hd 0R A j b DUFM z z } J F " D @0R @ 4 ! ! L Lh $ !6 00 W. R"0X @ ?
0x0fe5fc…0fe790 Dummy {f00=0x0050, f01=0x0190, f02=» ! L R !UF+-*:;AS J F " D h ! !P !@i ! 9R Lh * !TX6 rr rrW ! : 8 ;! J F " D _ AiAe_<Ae #_F0R Xo@ s( " { Lh B
0x0fe790…0fe924 Dummy {f00=0x0050, f01=0x0190, f02=» ( 8 H X h J F " D 0R !<R W30R !P(?R0R !<R $W ( 0R # W a F x J F "
0x0fe924…0feab8 Dummy {f00=0x0050, f01=0x4156, f02=» " $ / 4 ; D J F " D 0R !<R ?R( 0R 0R 0X 0X TJ U m F ! P Q 0X , T G 0 ] b j o S H D ! B @ ~Ld ! ~
0x0feab8…0fec4c Dummy {f00=0x0050, f01=0xc18a, f02=» @ H IDENT DECOMP TRA 10.0 80-10-10 F1 O1111 REL 10.0 80-04-11 DECOMP H $$$TRAC Z DECOMP l , ( CDV10 CDV110T CDV111 DDMMCK0 MMDDCK1 1 7 =
0x0fec4c…0fede0 Dummy {f00=0x0050, f01=0x0190, f02=» @ H IDENT DELOCK TRA 10.0 80-10-10 F1 O1111 REL 10.0 80-04-11 DELOCK H $$$TRAL Z DELOCK l , ( CLEARBL MSKOUTA SETB UPDBIN0 UPDBOL1 . ; ? J F " D c b"R b! b
0x0fede0…0fef74 (1, 87) Dummy {f00=0x0050, f01=0x4010, f02=» n @ ( 0 8 ( 0 8 @ H P X ` h p x h p x " " " " " " " # # # # # #(#0#8
0x0fef74…0ff108 Dummy {f00=0x0050, f01=0x0190, f02=» @ H IDENT DESTAT TRA 10.0 80-10-10 F1 O1111 REL 10.0 80-04-11 DESTAT DESTAU H $$$TRAS b DESTAT DESTAU t TESTB UPDBINT & "
0x0ff108…0ff29c Dummy {f00=0x0050, f01=0x0190, f02=» < T n
0x0ff29c…0ff430 Dummy {f00=0x0050, f01=0x4064, f02=»z 0R R 34 U j ! !0R P b ![ x @! ! ( 4 6 J N@ ` T n
0x0ff430…0ff5c4 Dummy {f00=0x0050, f01=0x0190, f02=» > F IDENT ASSRUT REL 10.0 80-04-11 H D ! ATTWB ATTDB SAVEY RESTOR GETFREA SETFREA SETOCC CHANFC` GETVOL F J F " UPDBOLN UPDBIN SETBY TESTB CLEARB MSKOUTL RCNTRLD WCNTRL GETVAL F B GETACC GETGEN GETDUPV ATTBUF FORCE
0x0ff5c4…0ff758 Dummy {f00=0x0050, f01=0x018e, f02=» & &9B ATTDB $ CHANFC` $ 6 T:FDSP J SAVEY 6 , ( @ %W _ F C W n RESTOR L , ( 7 ( = W GETFREA n , ( W" _ &
0x0ff758…0ff8ec Dummy {f00=0x0050, f01=0x0190, f02=» SETFREA , ( ) ' , ( & X X X* T Z0 L , ( I R < _ <h =_H ^L | SETOCC UPDBOLN UPDBIN , ( _ _R & G _d
0x0ff8ec…0ffa80 Dummy {f00=0x0050, f01=0x018e, f02=»ARB , ( c P _v _| V V Q W TESTB > GETVOL P , ( _< _B d , ( C ( B T B , ( " $ ' Y ' , ( _
0x0ffa80…0ffc14 (1, 88) Dummy {f00=0x0051, f01=0x0190, f02=» f , ( ) 9h9G & C 9b! 8 #_h B " ' " WCNTRL b 8 MSKOUTL f L , ( I "? 99g! ":e" B =_ _f ` ATTBUF v , ( i & 9_ @ # FORCED~ , ( @ C _ #0
0x0ffc14…0ffda8 Dummy {f00=0x0051, f01=0x0190, f02=» T l , ( _. W P 8 _> , ( " < , ( P 8# ' Y = # l GETACC < GETGEN @ GETDUPV D GETIND H , ( 3 x _ _ _ _
0x0ffda8…0fff3c Dummy {f00=0x0051, f01=0x0190, f02=» ]8 Z YB_J W , ( A & C & C ( , ( & C C ( B X X CLOSEF OPENF * & _ W & Y < * C _& , (
0x0fff3c…1000d0 Dummy {f00=0x0051, f01=0x0190, f02=» 3 ( B +_ @ P V , ( Q E $ E & E ( E 0 E , Y 0 GETFWD ~ ` T:GRFC t , ( q H E . X , ( ' X P &V Y , X T:GETF( ADJUST
0x1000d0…100264 Dummy {f00=0x0051, f01=0x4092, f02=» -R AP T H D ! aR cP uV WR T !P P P W P& P P P T W P P }W W P V |@ E . X , ( ' X P &V Y , X T:GETF( ADJUST
0x100264…1003f8 Dummy {f00=0x0051, f01=0x0190, f02=» > F IDENT CDVRUT REL 10.0 80-04-11 " CDV10 CDV110 CDV111 CDVDK F CDVDK l CDV110 ~ CDV111 CDV10 I:EVA0 , ( W W _ , ( P T
0x1003f8…10058c Dummy {f00=0x0051, f01=0x4084, f02=»T1 } V E @ < W W PB )R4 /Q. =T CP GU QU WT [W iT mP sP * n@ 110 ~ CDV111 CDV10 I:EVA0 , ( W W _ , ( P T
0x10058c…100720 Dummy {f00=0x0051, f01=0x0190, f02=» > F IDENT DATCHK REL 10.0 80-04-11 DATCHKK DDMMCK MMDDCK F DATCHKK h MMDDCK | I:EVA0 , ( " P , ( P V V V I:R
0x100720…1008b4 (1, 89) Dummy {f00=0x0051, f01=0x4062, f02=»! : 0 , J P % J )P /V 3 7V M b W b eT L@ ^" " # # # # # #(#0#8#@#H
0x1008b4…100a48 Dummy {f00=0x0051, f01=0xc07c, f02=» L H IDENT DEDDIV TRA 10.0 82-02-17 F1 O1111 REL 10.0 80-04-11,81-08-27,EV % $$$TRA % T % f@ % x & $ z 0 $ & $ @ $ = N " > " @ " T
0x100a48…100bdc Dummy {f00=0x0051, f01=0x4162, f02=» H H IDENT DCTASK TRA 10.0 80-11-19 F1 O1111 REL=1.0 VER=1 801027-SHB V DCTASK V P $$$TRAT V b DCTASK V t $ T:DSC1T T:READA T:XSTA0 TESTB V V V V V V '
0x100bdc…100d70 Dummy {f00=0x0051, f01=0x0190, f02=» B H IDENT DEAPPU TRA 10.0 80-11-19 F1 O1111 CE SYSTEM 80-10-29 W DEAPPU W J $$$TRAA W DEAPPU W n DEDISCA EMPTYTA W & " W W W
0x100d70…100f04 Dummy {f00=0x0051, f01=0x0190, f02=» W z X X . X F X ` X x X X X X
0x100f04…101098 Dummy {f00=0x0051, f01=0x407c, f02=» T ! ! P.W< !0R P) * L *LU L * * R X @4 & !4 _ 4 Y B V Y f@ Y x X x X X X X
0x101098…10122c Dummy {f00=0x0051, f01=0x40ee, f02=» L H IDENT T:DD20 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV T:DD20 T T:DD20D f DCTASK z * & D2 x * * @
0x10122c…1013c0 Dummy {f00=0x0051, f01=0xc0d8, f02=» L H IDENT C:CB60 TRA 10.0 83-02-17 F1 O1111 REL 10.0 80-04-11,81-08-27,EV # C:CB60 # T C:CB60C # f & `@ @ # z # ( # ( # @ # = N " > " @ " T
0x1013c0…101554 (1, 90) Dummy {f00=0x0051, f01=0x40d6, f02=» L H IDENT D:CB60 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV ) D:CB60 ) T D:CB60C ) f * & & ) z 0 ) & ) @ ) ' & ' & ' & '
0x101554…1016e8 Dummy {f00=0x0051, f01=0x0190, f02=» L H IDENT T:AD20 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV T:AD20 T T:AD20A " f > : T:DD20 D:CB10 U:CB10 D:CB20 C:CB20 D:CB30. C:CB30- z > : D:CB40A C:CB40A D:CB503 C:CB50F D:DU10 Z:DU10. D:DU20- > : Z:DU20
0x1016e8…10187c Dummy {f00=0x0051, f01=0x412a, f02=»B60 C:CB60 * & ` * & T D2 B , ( 1 p , ( A " $ & ( * , , ( Q . 0 2 4 6 8 : < a
0x10187c…101a10 Dummy {f00=0x0051, f01=0x40b8, f02=» L H IDENT Z:DU10 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV * Z:DU10 * T Z:DU10D * f * z * * @ * ) & ) @ ) ' & ' & ' & '
0x101a10…101ba4 Dummy {f00=0x0051, f01=0x40a2, f02=» L H IDENT D:DU10 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV + D:DU10 + T D:DU10D + f + z :D + @ + * @ * ) & ) @ ) ' & ' & ' & '
0x101ba4…101d38 Dummy {f00=0x0051, f01=0x40b8, f02=» L H IDENT Z:DU20 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV , Z:DU20 , T Z:DU20D , f , z , , @ , ) & ) @ ) ' & ' & ' & '
0x101d38…101ecc Dummy {f00=0x0051, f01=0x40a2, f02=» L H IDENT D:DU20 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV - D:DU20 - T D:DU20D - f - z :D - @ - , @ , ) & ) @ ) ' & ' & ' & '
0x101ecc…102060 Dummy {f00=0x0051, f01=0x40b8, f02=» L H IDENT Z:DU30 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV . Z:DU30 . T Z:DU30D . f . z . . @ .
0x102060…1021f4 (1, 91) Dummy {f00=0x0051, f01=0x40a2, f02=» L H IDENT D:DU30 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV / D:DU30 / T D:DU30D / f / z :D / @ / . @ .
0x1021f4…102388 Dummy {f00=0x0051, f01=0x40b8, f02=» L H IDENT Z:DU40 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV 0 Z:DU40 0 T Z:DU40D 0 f 0 z 0 0 @ 0
0x102388…10251c Dummy {f00=0x0051, f01=0x40a2, f02=» L H IDENT D:DU40 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV 1 D:DU40 1 T D:DU40D 1 f 1 z :D 1 @ 1 0 @ 0
0x10251c…1026b0 Dummy {f00=0x0051, f01=0x40b8, f02=» L H IDENT Z:DU50 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV 2 Z:DU50 2 T Z:DU50D 2 f 2 z 2 2 @ 2
0x1026b0…102844 Dummy {f00=0x0051, f01=0x40a2, f02=» L H IDENT D:DU50 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV 3 D:DU50 3 T D:DU50D 3 f 3 z :D 3 @ 3 2 @ 2
0x102844…1029d8 Dummy {f00=0x0051, f01=0x40b8, f02=» L H IDENT Z:DU60 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV 4 Z:DU60 4 T Z:DU60D 4 f 4 z 4 4 @ 4
0x1029d8…102b6c Dummy {f00=0x0051, f01=0x40a2, f02=» L H IDENT D:DU60 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV 5 D:DU60 5 T D:DU60D 5 f 5 z :D 5 @ 5 4 @ 4
0x102b6c…102d00 Dummy {f00=0x0051, f01=0x40b8, f02=» L H IDENT Z:DU70 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV 6 Z:DU70 6 T Z:DU70D 6 f 6 z 6 6 @ 6
0x102d00…102e94 (1, 92) Dummy {f00=0x0052, f01=0x40a2, f02=» L H IDENT D:DU70 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV 7 D:DU70 7 T D:DU70D 7 f 7 z :D 7 @ 7 6 @ 6
0x102e94…103028 Dummy {f00=0x0052, f01=0x40b8, f02=» L H IDENT Z:DU80 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV 8 Z:DU80 8 T Z:DU80D 8 f 8 z 8 8 @ 8
0x103028…1031bc Dummy {f00=0x0052, f01=0x40a2, f02=» L H IDENT D:DU80 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV 9 D:DU80 9 T D:DU80D 9 f 9 z :D 9 @ 9 8 @ 8
0x1031bc…103350 Dummy {f00=0x0052, f01=0x40b8, f02=» L H IDENT Z:DU90 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV : Z:DU90 : T Z:DU90D : f : z : : @ :
0x103350…1034e4 Dummy {f00=0x0052, f01=0x40a2, f02=» L H IDENT D:DU90 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV ; D:DU90 ; T D:DU90D ; f ; z :D ; @ ; : @ :
0x1034e4…103678 Dummy {f00=0x0052, f01=0x4160, f02=» 8 F IDENT FDIO 801022REL10 FDIOY @ FDIOY P T:FDSP b I:EVA0 t * & @ 2 ' T:SCW2 , ( & C T # T:IO3 ( $
0x103678…10380c Dummy {f00=0x0052, f01=0x0190, f02=» @ H IDENT DEVGAC TRA 10.0 80-10-29 F1 O1111 REL 10.0 80-04-11 CNTNUM VGACNT H $$$TRAV b CNTNUM 9 VGACNT t 6 2 CMPINDV DERRORA EMPTYT0 T:DISPF T:ERAS T:GETF. R !
0x10380c…1039a0 Dummy {f00=0x0052, f01=0x0190, f02=» M P Q P b #P , e V:G:A: > J F " D @% ,L + , +L *LW * , + c L L bch b! !Tk c! h & c"T T #L J F " D " "Hi #L c" bc a , ach ba "T cb c!W. bc Lh ba !P b
0x1039a0…103b34 (1, 93) Dummy {f00=0x0052, f01=0x0190, f02=»X &' &W 0X 120X ,- , ! d Q " 4 D T ; d J F " D L c !%cL ! !0X & RKj ! W * + !!4 L@k@g v Z $ [ $ $ ] $
0x103b34…103cc8 Dummy {f00=0x0052, f01=0x0190, f02=» g $ h $ i $ $ j $ 4 k $ D l $ T m $ d n $ t o $ p q r s t u $ $
0x103cc8…103e5c Dummy {f00=0x0052, f01=0x018e, f02=» A A $ $ 4 $ D $ T $ d $ t $ $ $ $
0x103e5c…103ff0 Dummy {f00=0x0052, f01=0x0190, f02=» $ $ $ $ $ 4 D A T $ d t A 0 A A $ $ $
0x103ff0…104184 Dummy {f00=0x0052, f01=0x0190, f02=» $ 4 D J F " D RRRRRRRRRRRRRRRRRRRRRRRRRRRRRW? ;2 RRRRRRRRRRRRRRRRRRRRRRRRRR T $
0x104184…104318 Dummy {f00=0x0052, f01=0x0190, f02=»RRRRRR?RW c c! bch b!Z7!P c!WF c! c r / 2 0 1 : @ 9 P J F " D % a=hZa! c!P "5 c!W)Ag >W @gT _F c! c _ ?R R !T 0Ra !T _ ` B : [ c ` i w ^ J F " D @
0x104318…1044ac Dummy {f00=0x0052, f01=0x4186, f02=»T $o b/i_u c! R #T ` J F " D $a X#aLT % W , a WH c"_ c!,c ; a ac bch baZ7!T( bc*b !,b 0 + ~ , J F " D : ; W "b& cb_ c!,c _C( $ c ! & RK ! W Kg !!4 c! bc Z
0x1044ac…104640 Dummy {f00=0x0052, f01=0x0190, f02=» L H IDENT Z:TB30 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV Z:TB30 T Z:TB30T f * & z * & * & = &
0x104640…1047d4 (1, 94) Dummy {f00=0x0052, f01=0x4010, f02=» @
0x1047d4…104968 Dummy {f00=0x0052, f01=0x0190, f02=» @ H IDENT DENVAL TRA 10.0 80-11-19 F1 O1111 REL 10.0 80-04-11 DENVAL H $$$TRAN Z DENVAL l B > ADJUSTN ATTDB ATTWB CLEARB- CMPIND1 DEAPPUL DECOMP0 DEDISC > : DEEDIT DEFIND DEPOOL EMPTYT GETFWD GETIND GETVAL @ <
0x104968…104afc Dummy {f00=0x0052, f01=0x0190, f02=» v & < Z n
0x104afc…104c90 Dummy {f00=0x0052, f01=0x0190, f02=» ~ $ : J 0 & Z 8 j < F z = > A J F " D @g@i@k@ "0X ( R#W H % W % 6 0X R2 RRRW E
0x104c90…104e24 Dummy {f00=0x0052, f01=0x0190, f02=» ~L h~ ' !<R Z ( 8 H X h x .
0x104e24…104fb8 Dummy {f00=0x0052, f01=0x0190, f02=» [ [ ( ( 8 J F " D RRR !j !! j ! !$ L0R ! ?RA _ !A <R R 0X H [ # +-*: '0 - ? L!ASUFTCXE J F " D & ' (
0x104fb8…10514c Dummy {f00=0x0052, f01=0x0190, f02=» d e * f $ g 4 h D i M T n 6 d t t y [ J F " D @h~ * !P *W !, ( R !2 RRRRRRRRRR ?RA _ 0R !<R " ? *
0x10514c…1052e0 Dummy {f00=0x0052, f01=0x0190, f02=» E [ 0 @ [ P ` . p & J F " D 8R?R6 0R !<R " ?R0R !<R " ?R( 0R ( #)0X A E z E
0x1052e0…105474 (1, 95) Dummy {f00=0x0052, f01=0x0190, f02=» b T t } J F " D @ !P !W !j !! ! Lf "d "!U d ! R8P R& 0 6 ~ * J F " D !?R 0R (+0R +j !! 1j !! 2 !I 0X P,W
0x105474…105608 Dummy {f00=0x0052, f01=0x0190, f02=» z E J F " D $ h o P U ! ! 9R_ " ?R R& ?R R ?R0R 9R?R j V z J F " D " W @g@k !Ai R !?R $@kAgW #@gAk@i ! j !! ! U L V O ? Q
0x105608…10579c Dummy {f00=0x0052, f01=0x0190, f02=» * J F " D ! !T ! R h !U !P7 !_& h ! !X&W#@ T 0X P! " l J F " D W I h P Wk ~Ub~ "~ @ P 0R "!0R ""6 | " +-*: , 7 J F " D ! "W ! "W ! "W
0x10579c…105930 Dummy {f00=0x0052, f01=0x0190, f02=» <R ! !" ! _6j " - 8R R& ?R@ P | : J J F " D 5Ii Ik Ig A|W 4@|@ R& , LhZ !PDj !! , ? DGRN
0x105930…105ac4 Dummy {f00=0x0052, f01=0x0190, f02=» 4 / 4 4 0 4 @ 9 P 4 ` 4 p / / / / / " " /
0x105ac4…105c58 Dummy {f00=0x0052, f01=0x0190, f02=» R !, Lh $ !ThI|m2 RRR?R2 p * V . : > J F " D RRRRRRRRRRRRRRRRRRRRRRRRRRRR !_h( !?R 4( !_ "_ R _ N X w } J F " D @ ! j !! ! _ R_ A| " @ P & ' ( !
0x105c58…105dec Dummy {f00=0x0052, f01=0x4014, f02=» @ !ThI|m2 RRR?R2 p * V . : > J F " D RRRRRRRRRRRRRRRRRRRRRRRRRRRR !_h( !?R 4( !_ "_ R _ N X w } J F " D @ ! j !! ! _ R_ A| " @ P & ' ( !
0x105dec…105f80 Dummy {f00=0x0052, f01=0x8190, f02=» H H IDENT DECONV TRA 10.0 81-08-28 F1 O1111 REL=1.0 VER=1 81-08-27/EV DECONV P $$$TRAC b DECONV t D @ ADJUSTC ATTDEVA DEPOOL1 DERRORF DETPRT EMPTYT0 FDIO1 GETFWD2 B > MASKN T:ATTF T:DISP T:DSC1 T:EDWR T:GETC T:GETT
0x105f80…106114 (1, 96) Dummy {f00=0x0053, f01=0x8190, f02=» + " 5 # 9 & J F " D 6 f1E $WU6 _ R PCWD1X FT !0X T W/ LW- RW)6 ! 6 E w | x y z { v J F " D @ W L( (
0x106114…1062a8 Dummy {f00=0x0053, f01=0x8190, f02=» 6 J F " D RW Wf ' L0R 40X TN RW WH %L / 1 3 @ @ L R T, * x #
0x1062a8…10643c Dummy {f00=0x0053, f01=0x818e, f02=» * " J F " D L_ K "H 1X FA L_ K 3I $ " W !0X E - ! A n T 6 ~ X G e [ l q z 7 | } J F " D
0x10643c…1065d0 Dummy {f00=0x0053, f01=0x8190, f02=» e & 6 H J F " D _" RW _"2 RRR RW _.J D L?RA . _>@ - ! . L 0R X ) 7
0x1065d0…106764 Dummy {f00=0x0053, f01=0x8190, f02=» J ( 8 H X j $ ( z - / = ? J F " D RW _&2 RRR RW _2 L 0R _H0X @ ' L0R
0x106764…1068f8 Dummy {f00=0x0053, f01=0x818e, f02=» k q s } , J F " D @ 0X R R& ?R U0X T 1X F_D U0X T 1X F_S # # R" < * o B J F " D
0x1068f8…106a8c Dummy {f00=0x0053, f01=0x8190, f02=» $ $ B 4 J F " D j ( % 6j !% Lj " 1XFAn0X ! 0X !0X K 4 4 L F - & *
0x106a8c…106c20 Dummy {f00=0x0053, f01=0x8190, f02=» '0R 0X L0R T L L L0R p H ( . K * > O , N X O ^ Z p l O J F " D @ 4 4 0X 0X 0R "P 4 L0R R 6 W L j W 0 4 0 4
0x106c20…106db4 (1, 97) Dummy {f00=0x0053, f01=0x8190, f02=» 3 $ * 3j 2 3 !" ! $L / Lj ! !WP !H ! F X j 7 z ; ) J F " D ! ! Lj ! ! L 0R f ! 4 La F j K P
0x106db4…106f48 Dummy {f00=0x0053, f01=0x8190, f02=» ' L0R 0X 0R %P L0R T 4 p . @ P 0 ` r J F " D ' L0R 4 " L $L @ H A !0R
0x106f48…1070dc Dummy {f00=0x0053, f01=0x8190, f02=» J F " D <% L % L % L "W+ L / _; 0 0X 1 LW 2 0X 3 LW ( # l | $ & * $ $
0x1070dc…107270 Dummy {f00=0x0053, f01=0x8190, f02=» # 4 J F " D 2 RRRRW=A W9@ W52 RRRRRRRRRRRRRRRW!A _ @ _ _ A _ & D Z K j P z T & g + z ~ , J F " D @m FWsH 0R Tq0X 0X P Rrm FWP" 5e R
0x107270…107404 Dummy {f00=0x0053, f01=0x818e, f02=» f X & & 1 6 & F & T & * b & NUMBER: p 9999 " gU & & & ( & B
0x107404…107598 Dummy {f00=0x0053, f01=0x8190, f02=» & ( " & 2 $ &U @ ( P & l ( z 999999 " SU ( 99 " U (
0x107598…10772c Dummy {f00=0x0053, f01=0x8190, f02=»ER: 9999 " U & 0 & MISST[MMER > & V & d ( r ~ $ I & EJ GODKENDT & ( # & & &
0x10772c…1078c0 Dummy {f00=0x0053, f01=0x818e, f02=»& l ( & l ( & l 6 & l D & S[NDNING R $ [ h ( x & & & & S[NDNING & KLARI $ K &
0x1078c0…107a54 (1, 98) Dummy {f00=0x0053, f01=0x8190, f02=» & & ( $ 0 & @ & N & & FLOPPY DISC SKRIVNING j $ L ( % & & & & FLOPPY DISC SKRIVNING
0x107a54…107be8 Dummy {f00=0x0053, f01=0x818e, f02=»& FLOPPY DISC SKRIVNING & AFBRYDESS " $ A : & J & X ( f 0 r & & DATO: 99-99-99 " SA & & TID: 99-99-99 "
0x107be8…107d7c Dummy {f00=0x0053, f01=0x818e, f02=» " % & & " ( 0 5 < & L DEVICE Z $ % p & : & & #% & FILE $ & - ! NAME $ !%
0x107d7c…107f10 Dummy {f00=0x0053, f01=0x818e, f02=» & $ # OLD DATA SET IDENTIFIER: $ #% : & J & X & f $ $ OLD VOLUME SEQUENCE NO:: t $ $% & & & & D & U ( %
0x107f10…1080a4 Dummy {f00=0x0053, f01=0x8190, f02=» & & ( $ ) 0 & SLUTD @ * 99999E T " * % j & z & ( + & ( , " - 999999999999999999999O " -
0x1080a4…108238 Dummy {f00=0x0053, f01=0xc100, f02=»TTTTTTTTTTTT9- " 1 % ( & 2 2 " 3 999999999999999999999- B " 3 % h ( x 4 5 999 " 5 % ( " ! " ?R4 4 4 4 4 @
0x108238…1083cc Dummy {f00=0x0053, f01=0x8190, f02=» $ EXPIRATION DATE: $ $I ( & 8 & F & T $ % OLD DATA SET IDENTIFIER: b $ %I & & & $ & OLD VOLUME SEQUENCE NO:: $ &I &
0x1083cc…108560 Dummy {f00=0x0053, f01=0x8190, f02=» ( ) 001 $ ) * 999999 0 " *S F & V & d ( r + ~ & SLUTD , 99999E " , % & & ( - &
0x108560…1086f4 (1, 99) Dummy {f00=0x0053, f01=0xc148, f02=»TTTTTTTT9O | " 1 % ( " 2 . " 3 TTTTTTTTTTTTTTTTTTTT9- > " 3 % d ( t 4 " 5 999999999999999999999- " 5 % ( 6 7 999 " 7 %
0x1086f4…108888 Dummy {f00=0x0053, f01=0x8190, f02=» & $ # OLD VOLUME SEQUENCE NO:: $ #I 6 & F & T & b & : p & U ( $ & U $ ( ( % & 001: $ &
0x108888…108a1c Dummy {f00=0x0053, f01=0xc15e, f02=» & ( * $ & 4 ( B + N " , 999999999999999999999O ^ " , ( - " . 999999999999999999999+ " . ( / 0
0x108a1c…108bb0 Dummy {f00=0x0053, f01=0x4144, f02=» > @ IDENT FMOVE T,REL=10.0,800314,870137141000 FMOVE F FMOVE V I:EVA0 h I:ERR2 z I:EVA5 , ( D #0 & + I:ER18 I:RT1 * & $ P _
0x108bb0…108d44 Dummy {f00=0x0053, f01=0x40f8, f02=» > @ IDENT TYPET T,REL=10.0,800314,870137141000 TYPET F TYPET V I:EVA0 h I:ERR2 z I:RT1 , ( B #03 ;d # + @ @
0x108d44…108ed8 Dummy {f00=0x0053, f01=0x40fc, f02=» > @ IDENT ICLEAR T,REL=10.0,800314,870137141000 ICLEAR F ICLEAR X I:EVA0 l I:RT1 ~ , ( @ #0 0T ' ' _ T $ @
0x108ed8…10906c Dummy {f00=0x0053, f01=0x411c, f02=» > @ IDENT EMPTYT T,REL=10.0,800314,870137141000 EMPTYT F EMPTYT X I:EVA0 l , ( @ #0 0T & ! T ~ I:RT1 , ( P & ! X T C T T !P
0x10906c…109200 Dummy {f00=0x0053, f01=0x0190, f02=» > @ IDENT T:STIN T,REL=10.0,800314,870137141000 STRIN1 F STRIN1 X T:STEV l , ( @ X x & Y " X R W ~ T:RNOK T:LOFS , ( P _ Y $ I:E
0x109200…109394 (1, 100) Dummy {f00=0x0054, f01=0x416a, f02=» ! P " P z I:ERR2 , ( s W " P X $ X " R W , , ( V R W V % _ I:MOV T:GRFC , ( $ " D $ D X T:ROK $ X y &
0x109394…109528 Dummy {f00=0x0054, f01=0x018e, f02=» > @ IDENT T:STOU T,REL=10.0,800314,870137141000 STROU1 F STROU1 X T:STEV l T:LOFS ~ * & @ X x & Y " I:EVA0 T:LOPS I:ER17 , (
0x109528…1096bc Dummy {f00=0x0054, f01=0x4158, f02=» f , ( s ?A W ?AW <! P , ( X " X R W V y 8 T:DUPX h T:GRFC z , ( & Y $ 8 " X X T:ROK T:RNOK x ( y $ < 8 9
0x1096bc…109850 Dummy {f00=0x0054, f01=0x414a, f02=» > @ IDENT T:STEV T,REL=10.0,800314,870137141000 T:STEV F T:STEV X T:GRFC l I:EVA0 ~ * & H #0T Y Y , ( ! T # P & #0T ( I:ERR2 7
0x109850…1099e4 Dummy {f00=0x0054, f01=0x0190, f02=» > @ IDENT T:EDFL T,REL=10.0,800314,870137141000 T:EDFL F T:EDFL X T:PM1 l T:PM2 | T:CASP , ( I Y ( x P Y * , ( x y W X " T:DUPX
0x1099e4…109b78 Dummy {f00=0x0054, f01=0x0190, f02=» , ( w V X ( x C T:SCUW 4 , ( ( Y * X Y , X F , ( X C & C C v T:IOER , ( ( B P 9 R 9 X , ( !@P X X * b ) Y *
0x109b78…109d0c Dummy {f00=0x0054, f01=0x0190, f02=» B U C Q C D T:CLR1 * T:CLR2 < , ( mP X X * $" ~_> @ Y N , ( X * _R X !@XX y X # ~ , ( x V y X X * P , ( P 1 _ 1 X * X
0x109d0c…109ea0 Dummy {f00=0x0054, f01=0x4148, f02=» X n T:CLIT T:EKEY , ( C $ " P y _ x T 2 , ( a@ X H X X * , )$ b P _ : H D !T P d )Wv 9 T UP m d yV& Ph R^ PP #P =T QU [Q e r g t 4 0 i k m
0x109ea0…10a034 (1, 101) Dummy {f00=0x0054, f01=0x0190, f02=» > @ IDENT T:DYKI T,REL=10.0,800314,870137141000 J F " T:DYKI T:PM1 T:PM2 T:CLR1 T:CLIT T:CLR2 T:IOER T:EKEY T:BELL F T:DYKI I:EVA7 , ( @ ' Y y , ( x C y X
0x10a034…10a1c8 Dummy {f00=0x0054, f01=0x0190, f02=»:CLRD , ( C Q " T X , ( ! X X ! x Y~ Y > , ( _ X "@P B R y C B n , ( P 9 V _F9 V X ! T X !@ T:EKEY , ( X y C _d y C C X
0x10a1c8…10a35c Dummy {f00=0x0054, f01=0x0190, f02=» _$ _ y z T:CLR2 ^ T:SCUW . * & Y @_6 x X@ X X # @ , ( u C _. B ]d P C n , ( Q X8_H x XD @ Y c C y , ( XR X x x T:BELL
0x10a35c…10a4f0 Dummy {f00=0x0054, f01=0x0190, f02=» T:LOFS I:EVA0 T:LOPS , , ( @H ( ( > T:CLMI n , ( #H : B C _J + T:PM1 @ T:GRFC , ( ? . X 9 V ! P @ Y I
0x10a4f0…10a684 Dummy {f00=0x0054, f01=0x4124, f02=» j , ( " ( $ $ : ! P # P : : H D ! ! @ YTf a eR k B uT y Q T , P R P V f H D ! VV T P #Q( S P Q8 , 3 < MV SP P P
0x10a684…10a818 Dummy {f00=0x0054, f01=0x0190, f02=» > @ IDENT T:UPDF T,REL=10.0,800314,870137141000 T:UPDF F T:UPDF X T:GRFC l I:ER14 ~ , ( @ 2! Y " T:LOFS I:EVA0 T:LOPS , (
0x10a818…10a9ac Dummy {f00=0x0054, f01=0x406a, f02=»R T:RCTS $ O X MT D ` T@ f T:GRFC l I:ER14 ~ , ( @ 2! Y " T:LOFS I:EVA0 T:LOPS , (
0x10a9ac…10ab40 Dummy {f00=0x0054, f01=0x0190, f02=» > @ IDENT T:DUPL T,REL=10.0,800314,870137141000 T:DUPL T:DUPX F T:DUPL ` T:GRFC t I:EVA0 I:ERR2 T:RNOK , ( HB !0 X T:ROK T:DUPX
0x10ab40…10acd4 (1, 102) Dummy {f00=0x0054, f01=0x406c, f02=» I:MOV & " S V : KT WV > h V@ h ` T:GRFC t I:EVA0 I:ERR2 T:RNOK , ( HB !0 X T:ROK T:DUPX
0x10acd4…10ae68 Dummy {f00=0x0054, f01=0x4186, f02=» > @ IDENT T:GETC T,REL=10.0,800314,870137141000 T:GETC F T:GETC X T:GRFC l I:ER14 ~ I:EVA0 , ( @ 2' I:ERR2 I:RT1 , ( " P # P
0x10ae68…10affc Dummy {f00=0x0054, f01=0x415a, f02=» > @ IDENT T:GETA T,REL=10.0,800314,870137141000 T:GETA F T:GETA X T:GRFC l I:EVA0 ~ I:ERR2 , ( H ! P # P X T:RNOK T:ROK T:RCR ( $
0x10affc…10b190 Dummy {f00=0x0054, f01=0x413a, f02=» > @ IDENT T:TSTC T,REL=10.0,800314,870137141000 T:TSTC F T:TSTC X T:GRFC l , ( @ X " 9b! X :c 2" ~ I:ER14 T:RTES , ( H @ ;
0x10b190…10b324 Dummy {f00=0x0054, f01=0x0190, f02=» > @ IDENT T:TFWD T,REL=10.0,800314,870137141000 D @ T:TLEF T:TRIG T:TLDO T:TDOW T:TUP T:TFWD T:TBWD T:THOM F T:TLEF T:TRIG T:TLDO T:TDOW T:TUP T:TFWD T
0x10b324…10b4b8 Dummy {f00=0x0054, f01=0x411a, f02=» Y 4 Y n T:TABE , ( ? 2 Y 69h Q X :h Y 0 W T:SCR2 P T:TABC b T:TABN t * & ] U X Q W Y 0 w 8 4 W W W W W W !W IQ YW ]U eQ kW
0x10b4b8…10b64c Dummy {f00=0x0054, f01=0x0190, f02=» > @ IDENT T:DISP T,REL=10.0,800314,870137141000 T:PRIN T:DISP T:ERAS F T:PRIN h T:FDSP | T:EDWI T:GRFC T:GTIP , ( D 9H Y * T:DISP
0x10b64c…10b7e0 Dummy {f00=0x0054, f01=0x0190, f02=» *9h p I:ER14 , ( S P R Y >_ P R P R " T:TABD R , ( q Y +W Y + W d , ( T R W Q W Y , ( + U Q Y T:TABC , (
0x10b7e0…10b974 (1, 103) Dummy {f00=0x0054, f01=0x418c, f02=»Y , ( X 0 Y 8 P Y , ( # 0 X 0 X 2] X 8 Y 0 : X 0 : T:WRDY j , ( C :H* : X 2T Y 2 : | T:EDIO $ a @ C 1 B ] : H D ! 1 W !W 7T SP: WR aP cR i
0x10b974…10bb08 Dummy {f00=0x0054, f01=0x0190, f02=» > @ IDENT T:GETF T,REL=10.0,800314,870137141000 T:GETF T:GTIT T:GTIP F T:GETF h I:ER14 | , ( X +! X +! U 9K T:TABC T:TABN T:GTIT 0 T:GRFC , (
0x10bb08…10bc9c Dummy {f00=0x0054, f01=0x40c8, f02=» I:EVA2 I:ER15 , ( W 4 0 6 2 X 0 " I:ERR2 R & " u@ : ! P # T : d 0 U S z e z P T @ T:TABN T:GTIT 0 T:GRFC , (
0x10bc9c…10be30 Dummy {f00=0x0054, f01=0x0190, f02=» > @ IDENT T:REWR T,REL=10.0,800314,870137141000 . * T:REWR T:SCUW T:CLRD T:IOWR T:CASP F T:IOWR x T:SCUW , ( C ( C : T:CLRD * T:REWR 0 , ( ! C B
0x10be30…10bfc4 Dummy {f00=0x0054, f01=0x4148, f02=» D : K + Q | I:EVA3 ! I:EPIC ! . , ( } 2 P P ! @ T:LOPS ! p , ( ( B X # V : ! I:EVA0 ! I:ECPY ! I:EVI ! ( $ $ _0
0x10bfc4…10c158 Dummy {f00=0x0054, f01=0x0190, f02=» > @ IDENT T:DEDT T,REL=10.0,800314,870137141000 " . * T:TABC T:TABD T:TABE T:TABN T:SCR2 " F I:EVNO " x I:ESKI " I:EVA0 " I:EBRI " I:EBRB " I:EBR " , (
0x10c158…10c2ec Dummy {f00=0x0054, f01=0x0190, f02=» " z T:DSL # I:EXPY # * T:TABC ( # < T:TABD , # P T:TABE 0 # d , ( ! W W X 0Q # x T:EDWI # I:EVT # , ( 9 Y ( Y *P # I:EDSK #
0x10c2ec…10c480 Dummy {f00=0x0054, f01=0x0190, f02=» V _` " P T " P & # T:LOPS $ 0 , ( (W " P Y 0] Y $ B , ( (_z P P T " X _@ $ r T:EDWF $ , ( " P * X *# P B 1 $ I:ER16 $ , ( " *W
0x10c480…10c614 (1, 104) Dummy {f00=0x0055, f01=0x4130, f02=» . C $ | , ( a W @ X (T W X y 6 Y ( % T:TABN % L T:RCR % ` : X (;n 0 % p H D ! +W /W 7Q ; . ? , KP Q P PR V PL T Ph Wp P P % < 8 P T0 P" P W P 9P ?P ET OP c
0x10c614…10c7a8 Dummy {f00=0x0055, f01=0x0190, f02=» > @ IDENT T:ENLI T,REL=10.0,800314,870137141000 & T:DNL T:DSL & F I:EVNO & I:ECPY & n I:EPIC & I:ETXT & I:ETAB & I:EBRI & I:EBRB & I:EBR & * &
0x10c7a8…10c93c Dummy {f00=0x0055, f01=0x0190, f02=» & I:ESKI ' . I:EXPY ' @ T:DSL ( ' R T:GRFC ' d T:DNL 6 ' v , ( ! " $ Y . Y ,W ' , ( 9 $ Y . X ( X ." P X 0R T ' T:WRDY ' , ( W Y *P
0x10c93c…10cad0 Dummy {f00=0x0055, f01=0x4182, f02=» Q Y *T , : " P X 0U ' , ( X *# P P T " T : ( , I:ER16 ( T:ENIN ( n , ( " . Y . 0 Y ( ( , ( $ Y *T " T ! 1 W ( ! ) , : ( H D ! 6
0x10cad0…10cc64 Dummy {f00=0x0055, f01=0x0190, f02=» > @ IDENT T:EINP T,REL=10.0,800314,870137141000 ) " T:PKI T:PINP T:TKI T:TINP ) F T:PKI ) l T:PINP ) ~ T:GRFC ) I:ETAB ) I:EVIN ) , ( I P & ) , ( Y *T
0x10cc64…10cdf8 Dummy {f00=0x0055, f01=0x0190, f02=» & V D ! P $ ) | T:TINP * T:TKI * 0 , ( u ! P %_ : V * B , ( Y " X .9H $ P * r , ( & X ( " Q Y +Q R " P W * I:ER16 * , ( " U Y , " Q "
0x10cdf8…10cf8c Dummy {f00=0x0055, f01=0x0190, f02=» P * t , ( I W X ! X $" P Q X (# P X + , ( i # :! R W T @ Y ( + D T:ENIN + t T:ENI + I:EXIT + , ( W Y , W Y ( + , ( : X *:h X (! # P X & V + , (
0x10cf8c…10d120 Dummy {f00=0x0055, f01=0x0190, f02=» + h , ( # P Y (_ P P Y , T:WRDY , 8 , ( C 8 & X 8 X $ W _ , J , ( a " P X ( T X & V H "@T , z , ( P V Y X (P , T:CLMI , , ( X (
0x10d120…10d2b4 (1, 105) Dummy {f00=0x0055, f01=0x0190, f02=» 8 V Y 8 : " P X & V , , ( ( P : : "0P - , , ( 7 $ T W %T : : Y - , ( W ( X $ Y X " Y X & Y X < Y - , ( w @ : Y : X : X ( - , ( T X & V H " V
0x10d2b4…10d448 Dummy {f00=0x0055, f01=0x4146, f02=» P - P H D ! W U Q R P" P PD W #Pt )Pn /P 5P A EP< I R . H D ! KWZ [P< ]Q eP2 sR$ uW y R } T$ W W P Tb W P@ . X H D !$ T, T R #P 3P* ; * ?P| [Wh cP mT }TF * P6 P z P . < 8 P V T P
0x10d448…10d5dc Dummy {f00=0x0055, f01=0x0190, f02=» > @ IDENT T:ENIN T,REL=10.0,800314,870137141000 / T:ENIN T:ENI T:EVOU / F T:ENIN / f T:ENI / z , ( X Y " X Y $ X Y & X @W X / T:LOFS / , ( ! < Y = " / I:EGTB
0x10d5dc…10d770 Dummy {f00=0x0055, f01=0x0190, f02=» X (P / n T:WRDY 0 , ( W X & V D ! P @ W X 0 , ( W Y ( : X , Y X $ Y 0 P , ( X &T Y Y Y W V $ 0 , ( :H D Y D :H Y ! P V 0 I:EVA0 0 I:EVA1 0 , (
0x10d770…10d904 Dummy {f00=0x0055, f01=0x411a, f02=» 0 , ( Q : 2' " P T 1 I:EVA3 1 8 I:EPIC 1 J , ( mD W : N : 1 H D ! W CT IW SP a mT" }T W4 W, P W" P W W T WD 1 ( $ P W )P /W A X aP gT qW 1
0x10d904…10da98 Dummy {f00=0x0055, f01=0x4144, f02=» > @ IDENT T:SETC T,REL=10.0,800314,870137141000 2 T:SETC T:SCUR 2 F T:SETC 2 ` T:GRFC 2 t T:EDWI 2 T:RCTS 2 T:SCUR 2 , ( A C 2 T:WRDY 2
0x10da98…10dc2c Dummy {f00=0x0055, f01=0x40e2, f02=» > @ IDENT T:CLMI T,REL=10.0,800314,870137141000 3 T:CLMI 3 F T:CLMI 3 X , ( "0P ' Q W ' 3 l ! Y : 3 P Q W 3 ( 3 @ 3 A2,0 PCLRM20 EQU * P SCR
0x10dc2c…10ddc0 Dummy {f00=0x0055, f01=0x0190, f02=» > @ IDENT T:ATTF T,REL=10.0,800314,870137141000 4 J F " T:ATTF T:DETF T:ROK T:RNOK T:RCR T:RCTS T:RTES T:GRFC T:WRDY 4 F T:CLDY 4 T:DETF 4 T:ATTF 4 I:EVA6 4 I:FFSN 4 , ( W
0x10ddc0…10df54 (1, 106) Dummy {f00=0x0055, f01=0x4100, f02=» < V E B 4 ~ T:RNOK < 5 T:GRFC @ 5 2 T:WRDY H 5 F T:EDIO 5 Z * & ; X _ v : C C 5 l T:CLDY 5 $ Y @ : C : 5 @ W @ 5 l 5 @ 5 W
0x10df54…10e0e8 Dummy {f00=0x0055, f01=0x0190, f02=» > @ IDENT T:LSEG T,REL=10.0,800314,870137141000 6 & " T:LOFS T:LOPS T:LSEG T:CSEG 6 F T:LSEG 6 p T:CSEG 6 , ( ( R : V E V D ' 6 I:ER1C 6 , ( ! $ W P 6
0x10e0e8…10e27c Dummy {f00=0x0055, f01=0x402c, f02=»R ;P OW YP 6 d 7 @ 7 (00314,870137141000 6 & " T:LOFS T:LOPS T:LSEG T:CSEG 6 F T:LSEG 6 p T:CSEG 6 , ( ( R : V E V D ' 6 I:ER1C 6 , ( ! $ W P 6
0x10e27c…10e410 Dummy {f00=0x0055, f01=0x4146, f02=» > @ IDENT T:DC00 T,REL=10.0,800314,870137141000 8 DCREAD DCWRTE DCEXCH 8 F T:FDS0 8 h DCREAD 8 z T:DCR1 8 DCWRTE 8 T:DCW1 8 DCEXCH 8 T:DCE1 8 , ( I$
0x10e410…10e5a4 Dummy {f00=0x0055, f01=0x40aa, f02=» > @ IDENT T:SWI0 T,REL=10.0,800314,870137141000 9 SWITCH 9 F T:SWIT 9 X SWITCH 9 j @ 9 ~ 9 @ 9 ~ . P* CREDIT ASSEMBLER SUBROUTINE ENTRIES * . P*
0x10e5a4…10e738 Dummy {f00=0x0055, f01=0x40da, f02=» > @ IDENT T:TEI0 T,REL=10.0,800314,870137141000 : TESTIO ABORT : F T:TEST : ^ TESTIO : p T:ABOR : ABORT : H : : @ : . P*
0x10e738…10e8cc Dummy {f00=0x0055, f01=0x40de, f02=» > @ IDENT T:CLO0 T,REL=10.0,800314,870137141000 ; SETTIM GETTIM ; F T:SETT ; ` SETTIM ; r T:GETT ; GETTIM ; H ; ; @ ; . P*
0x10e8cc…10ea60 Dummy {f00=0x0055, f01=0x40a6, f02=» > @ IDENT T:DEL0 T,REL=10.0,800314,870137141000 < DELAY < F T:DELA < V DELAY < h @ < z < @ < * ~ . P* CREDIT ASSEMBLER SUBROUTINE ENTRIES * . P*
0x10ea60…10ebf4 (1, 107) Dummy {f00=0x0055, f01=0x40aa, f02=» > @ IDENT T:GTI0 T,REL=10.0,800314,870137141000 = GETTID = F T:GETI = X GETTID = j @ = ~ = @ = ~ . P* CREDIT ASSEMBLER SUBROUTINE ENTRIES * . P*
0x10ebf4…10ed88 Dummy {f00=0x0055, f01=0x0190, f02=» > @ IDENT T:DC T,REL=10.0,800314,870137141000 > 6 2 T:DCRE T:DCR1 T:DCWR T:DCW1 T:DCEX T:DCE1 > F T:DCRE > T:FDSP > T:DCR1 > T:DCWR > T:DCW1 > T:EDIO > , ( @@ /
0x10ed88…10ef1c Dummy {f00=0x0055, f01=0x416e, f02=» 6 > * & 5 / "!@P ? I:EVA0 ? 8 , ( O ' / #0T ? J , ( i C #0T C ? z , ( #0 T ' P &R &P C ? * & #0 T & C : W ?
0x10ef1c…10f0b0 Dummy {f00=0x0055, f01=0x40b6, f02=» > @ IDENT T:SWI T,REL=10.0,800314,870137141000 @ T:SWIT @ F T:SWIT @ X I:RT1 @ l ( @ | @ @ @ E LEVEL P* PT:SWIT EQU * P LDK A7,0 " P SU PP,CSB,TCA GET
0x10f0b0…10f244 Dummy {f00=0x0055, f01=0x4174, f02=» > @ IDENT T:TEI T,REL=10.0,800314,870137141000 A T:TEST T:ABOR A F T:TEST A ` T:FDSP A t I:RT1 A T:ABOR A * & @ "R V I A T:KIAA A , ( ( T
0x10f244…10f3d8 Dummy {f00=0x0055, f01=0x410e, f02=» > @ IDENT T:DEL T,REL=10.0,800314,870137141000 C T:DELA C F T:DELA C X I:EVA0 C l I:ERR C ~ , ( @ #0 P ( C I:RT1 C C P C $ C @
0x10f3d8…10f56c Dummy {f00=0x0055, f01=0x4124, f02=» > @ IDENT T:MSK0 T,REL=10.0,800314,870137141000 D MASK D F MASK D V I:EVA0 D h , ( @ #0 T #0 T V D z I:RT1 D D I:ERR D # D T T D
0x10f56c…10f700 Dummy {f00=0x0055, f01=0x0190, f02=» > @ IDENT T:SCD T,REL=10.0,800314,870137141000 E T:ACTV T:PAUS T:RSTR E F T:ACTV E h , ( 2 ;BP P J E | P:BAS E I:ERR4 E , ( ! T ( E I:NTPB
0x10f700…10f894 (1, 108) Dummy {f00=0x0056, f01=0x4092, f02=» W & F : ( E I:RT1 F * w F : $ P P4 %T 1 ^ EW4 O ^ ]W F T ~ F |@ F
0x10f894…10fa28 Dummy {f00=0x0056, f01=0x0190, f02=» > @ IDENT T:UNUS T,REL=10.0,800314,870137141000 J T:UNUS J F T:UNUS J X I:ERR4 J l , ( 2 ' >A >A 2 J ~ P:MTAB J , ( $ V L ;a ; R @ ( 8 J , ( = ? X
0x10fa28…10fbbc Dummy {f00=0x0056, f01=0x402a, f02=» 5R@ OQ* J K @ K &,800314,870137141000 J T:UNUS J F T:UNUS J X I:ERR4 J l , ( 2 ' >A >A 2 J ~ P:MTAB J , ( $ V L ;a ; R @ ( 8 J , ( = ? X
0x10fbbc…10fd50 Dummy {f00=0x0056, f01=0x4096, f02=» > @ IDENT T:EXIT T,REL=10.0,800314,870137141000 L T:EXIT L F T:EXIT L X ( L l L @ L KM P DATA 3 P* P END @ LDKL A6,-1 P ABL T:UERR END @ P ADR
0x10fd50…10fee4 Dummy {f00=0x0056, f01=0x4138, f02=» > @ IDENT T:GTCW T,REL=10.0,800314,870137141000 M GETCW M F T:FDSP M V GETCW M h I:EVA0 M z T:BINB M , ( H "$ P B B M T:GTCW M I:RT1 M $ W M
0x10fee4…110078 Dummy {f00=0x0056, f01=0x4128, f02=» > @ IDENT T:GTID T,REL=10.0,800314,870137141000 N T:GETI N F T:GETI N X I:EVA0 N l , ( @ #0T R W T V G 9h N ~ I:RT1 N I:ERR N ' W N T R W T '
0x110078…11020c Dummy {f00=0x0056, f01=0x018e, f02=» > @ IDENT T:DM T,REL=10.0,800314,870137141000 O & " T:OPEN T:CLOS T:COMM T:RSTA O F T:OPEN O p T:FDSP O , ( @ # 9 2! P T O T:WRIO O T:IO2 O T:CLOS . O , (
0x11020c…1103a0 Dummy {f00=0x0056, f01=0x4090, f02=» T:RSTA X P T:SCW2 P T:IO3 P * ( $ W C P : P T P f j P z@ P , ( @ # 9 2! P T O T:WRIO O T:IO2 O T:CLOS . O , (
0x1103a0…110534 (1, 109) Dummy {f00=0x0056, f01=0x018c, f02=» > @ IDENT T:DMR T,REL=10.0,800314,870137141000 Q & " T:DREA T:IREA T:XREA T:IXID Q F T:DREA Q p T:REAX Q T:SCW2 Q T:IO3 Q T:IREA Q T:IO2 Q , ( $ Q
0x110534…1106c8 Dummy {f00=0x0056, f01=0x4008, f02=»@ R IDENT T:DMR T,REL=10.0,800314,870137141000 Q & " T:DREA T:IREA T:XREA T:IXID Q F T:DREA Q p T:REAX Q T:SCW2 Q T:IO3 Q T:IREA Q T:IO2 Q , ( $ Q
0x1106c8…11085c Dummy {f00=0x0056, f01=0x0190, f02=» > @ IDENT T:DMW T,REL=10.0,800314,870137141000 S 6 2 T:SWRI T:DWRI T:IWRI T:DREW T:CREW T:IREW S F T:SWRI S T:WRIX S T:IO4 S T:DWRI S T:SCW2 S , ( / / S
0x11085c…1109f0 Dummy {f00=0x0056, f01=0x40fc, f02=» 5D / C S , ( O ( B B @ C T , , ( o ( ( B B T , ( C C ( C T T:IO5 T C T T @ T / S
0x1109f0…110b84 Dummy {f00=0x0056, f01=0x4182, f02=» > @ IDENT T:DMDI T,REL=10.0,800314,870137141000 U T:DDIS T:CDIS T:IDIS U F T:DDIS U h T:FDSP U | T:SCW2 U T:IO3 U T:CDIS U , ( $ C <H / U T:IDIS $ U
0x110b84…110d18 Dummy {f00=0x0056, f01=0x4168, f02=» > @ IDENT T:DMPO T,REL=10.0,800314,870137141000 V T:DPOS T:IPOS V F T:DPOS V ` T:FDSP V t T:SCW2 V T:GTBY V T:IO4 V , ( H@ C <H / V T:IPOS V T:WRIX
0x110d18…110eac Dummy {f00=0x0056, f01=0x0190, f02=» > @ IDENT T:IO T,REL=10.0,800314,870137141000 W J F " T:WRIT T:READ T:SREA T:KI T:NKI T:EDWR T:DSC0 T:DSC1 T:DSC2 W F H D ! T:EDWE T:EDWF T:EDWI T:EDIO T:XSTA T:WAIT T:IO1 T:IO2 T:IO3 W J F " T:IO4 T:IO5 T:FDS0 T:FDSP T:GDSP T
0x110eac…111040 Dummy {f00=0x0056, f01=0x0190, f02=»:WRIT W T:LWRI X , ( W / X $ T:WRIX " X T T:WRIO & X h I:EVA0 X | , ( ! _ P <H X T:SREA B X T:READ B X T:REAX J X , ( ? :
0x111040…1111d4 (1, 110) Dummy {f00=0x0056, f01=0x0190, f02=» , ( { C C W C C J Y , ( ' W 781"&$ 39#$;< '()*+,-! Y 4 T:DSC2 Y d , ( P Y x T:XSTA Y T:WAIT Y , ( _D B 'W ( Y T:MWA
0x1111d4…111368 Dummy {f00=0x0056, f01=0x0190, f02=» Y T:IO3 D Z T:IO4 H Z I:ER19 Z , , ( 5 1W C C C " Z > T:IO5 Z Z n T:IORE ^ Z T:GCW2 Z * & S ( ' P P "! P Z T:GTCW Z I:RT1 Z , ( q W B
0x111368…1114fc Dummy {f00=0x0056, f01=0x0190, f02=» Z j T:EDWR [ I:EDW [ , ( 5 P C : [ . T:EDWE [ ^ T:EDWF [ r , ( C C B B P C [ T:EDWI [ I:ERR [ , ( : "!@T V I C [
0x1114fc…111690 Dummy {f00=0x0056, f01=0x018e, f02=» Y [ t I:ERR5 , ( e C & & , ( B C "!@ V , ( : B T T T:FDS0 T:FDSP T:GDSP P:MTAB , (
0x111690…111824 Dummy {f00=0x0056, f01=0x0190, f02=» , ( @ V H ;D:B " ] , ( : _, C ] 8 T:GTBY 2 ] h T:SCW2 ] | , ( P / : : 2 "! P ] T:DSCX R ] I:EVA2 ] , ( O : P C W
0x111824…1119b8 Dummy {f00=0x0056, f01=0x415e, f02=» ] h H D ! Y W L D " H % ) - " 1P G J IW M Q " ]P cV { ^ H D ! V 2 W > W > " P W Wb 2 ;W" ^ T H D !B ]P. a gP$ mP sW }P P P& P P P P ^ H D ! 0 T ?P C O S "
0x1119b8…111b4c Dummy {f00=0x0056, f01=0x0190, f02=» > @ IDENT T:KIA T,REL=10.0,800314,870137141000 e T:KIA T:NKIA e F T:KIA e ^ T:NKIA e p T:ABUF e , ( W P 6 V :a L e T:KIPR e , ( Q ' ( ( e
0x111b4c…111ce0 Dummy {f00=0x0056, f01=0x0190, f02=» 6 K e , ( u V K V V K V K f , ( V 6V ( - _ : J 7 f P , ( J V W J :A f * & V 6V $ - _ * + : f , ( D T E D :A D ;A f
0x111ce0…111e74 (1, 111) Dummy {f00=0x0056, f01=0x410a, f02=» I @P _ W *) + : f , ( g $: R P $ : D V D g 0 ( $ V ( < C C _, g ` H D !L W PZ !QJ % p 7 < ST WP c V V T> Q U 3 d AP g IP QW mR oP g g @ g
0x111e74…112008 Dummy {f00=0x0056, f01=0x4098, f02=» > @ IDENT T:ABUF T,REL=10.0,800314,870137141000 h T:ABUF h F M h X T:ABUF h n h @ h IN T:ABUF f & !T:ABUF RES SIZE KIA/NKIA SAVEAREA P EJECT T:ABUF END @
0x112008…11219c Dummy {f00=0x0056, f01=0x018e, f02=» > @ IDENT I:EVA T,REL=10.0,800821,870137141000 J F " I:EVA0 I:EVA1 I:EVA2 I:EVA3 I:EVA5 I:EVA6 I:EVA7 I:EVB I:EVI F I:FML I:EVTO P:MTAB , ( :l:d:h I:EVA2 I:E
0x11219c…112330 Dummy {f00=0x0056, f01=0x0190, f02=» f , ( 9 # W @ $ E " T ; [ , ( W # :H 2 T Z L 8 , ( @ w L D V W # h , ( L E V $ W D V I:EVA0 , ( @ L , W 6 2 W "
0x112330…1124c4 Dummy {f00=0x0056, f01=0x0190, f02=» Z Z , ( 3 : R ; 0 I:ERR9 ` , ( S 6 : F _v r , ( s :B , (V ; H [ [ , ( [ Z (;AR H W I:E
0x1124c4…112658 Dummy {f00=0x0056, f01=0x0190, f02=» & Z t , ( 4 : Z , ( ' 4 " 2@P : [ D , ( G [ & @ $ ! P t , ( e Z [ 6 [ Z I:FML , ( 7 . Z 7
0x112658…1127ec Dummy {f00=0x0056, f01=0x4182, f02=» :;h : ; V I:EVI * I:EVB < , ( Y : 2! : 6 2 N , ( @ W " # ;b ~ " ? ; : ;f" #?_" H D ! #W 'W -P 1W = ?W4 KT> [ kT V, W
0x1127ec…112980 Dummy {f00=0x0056, f01=0x018e, f02=» > @ IDENT I:ADS T,REL=10.0,800314,870137141000 v I:ADD I:SUB v F I:ADD v I:SUB v n I:ERR2 v I:ERR1 v * & @ W # v , ( " T & T + : * v I:C
0x112980…112b14 (1, 112) Dummy {f00=0x0057, f01=0x0190, f02=» , ( ! X # P 4 V W w , ( Q P [ " X $ P T w 4 , ( R R ` ; <( w d , ( Q P # W " <! =# T W = Z w , ( P _ V ^< `_@ w , ( ) R Q <# =_
0x112b14…112ca8 Dummy {f00=0x0057, f01=0x4056, f02=» W T6 W P )R +Q 7P w h AP GU KP QT x $ l x @@ x R T w 4 , ( R R ` ; <( w d , ( Q P # W " <! =# T W = Z w , ( P _ V ^< `_@ w , ( ) R Q <# =_
0x112ca8…112e3c Dummy {f00=0x0057, f01=0x4184, f02=» > @ IDENT I:CMP T,REL=10.0,800314,870137141000 y I:CMP y F I:CMP y V I:ERR1 y h , ( #0 P " T * & y z , ( : * & !`P :J +_ +Q y I:CPA y , ( ? _0
0x112e3c…112fd0 Dummy {f00=0x0057, f01=0x4172, f02=» > @ IDENT I:CPA T,REL=10.0,800314,870137141000 z I:CPA z F I:CPA z V * & R W z h , ( ( V W Q P W ! W V z , ( ? P , V W Q P W $ W V z * & _ P
0x112fd0…113164 Dummy {f00=0x0057, f01=0x0190, f02=» > @ IDENT I:MOV T,REL=10.0,800314,870137141000 { I:MOV I:MVC { F I:MOV { I:MVC { n , ( $0#0;b P P P P { , ( ! 0 - P _ 4 V { , ( A W Q P ) P 9_ &" ! 9 :
0x113164…1132f8 Dummy {f00=0x0057, f01=0x0190, f02=»V { p , ( 4! P < S S S X | , ( 4 9d * & ! R + : | @ , ( V W R 4 0R Y | p , ( ! 7 Y& P Z,;D 9_8 8 _< | I:ERR8 | , ( A V W YL T 9 :
0x1132f8…11348c Dummy {f00=0x0057, f01=0x40fc, f02=»V 7 Y | r , ( P _& & Q 9d! )0 + P 7 Y } Z $ _ : } B H D ! ^ P P PF P -P0 EQ GP OP gP kQ s S S S } f 0 , R R R )P oP( T WJ V P. P } } @ } 9 :
0x11348c…113620 Dummy {f00=0x0057, f01=0x018e, f02=» > @ IDENT I:MUL T,REL=10.0,800314,870137141000 ~ I:MUL I:SH1L ~ F I:MUL ~ ^ I:ERR2 ~ p I:ERR1 ~ , ( V ) 0 !0 ~ , ( " T *V &V : V ~ , ( = S W P
0x113620…1137b4 (1, 113) Dummy {f00=0x0057, f01=0x0190, f02=» ~ f , ( [ [ $ [ [ I:MOV I:NTFA 8 * & P>h [ [ P I:SUB ~ , ( Z P , ( [ 9a Z $" T 9d! P P [ I:ADD , ( P
0x1137b4…113948 Dummy {f00=0x0057, f01=0x40e6, f02=» I:SH1L z , ( g ! I Z ! : 4 P 9 , ( 59D_ " P P [ ! :d" B 5 : r D @ @ TV 9V GP WV cW PP P6 P( P 5 z AR IP P P P @ I:ADD , ( P
0x113948…113adc Dummy {f00=0x0057, f01=0x018e, f02=» > @ IDENT I:DIV T,REL=10.0,800314,870137141000 I:DIV I:SH1R F I:DIV ^ I:ERR2 p I:ERR1 , ( 0 !0 " T , ( *V &V P = , ( ; ;@
0x113adc…113c70 Dummy {f00=0x0057, f01=0x0190, f02=» , ( V & 6 , ( [ [ [ [ $ 8 I:MOV I:NTFA h , ( [ [ &! P I:SUB , ( , ( z " ! !
0x113c70…113e04 Dummy {f00=0x0057, f01=0x018e, f02=» r e P _ , ( i T { [ [ Q [ & I:ADD V , ( P { R [ _ f , ( Z ! Z $ * & P Z %_N [ Q * & R
0x113e04…113f98 Dummy {f00=0x0057, f01=0x40b2, f02=» f + X" ,9 -9d_ H D ! Tz V 'V 5PP KR QP UW aP iR qR yV T W P +P $ ( $ YQ eP y Q@ R Q* R W p 6 @ ! Z $ * & P Z %_N [ Q * & R
0x113f98…11412c Dummy {f00=0x0057, f01=0x40da, f02=» > @ IDENT I:NTF T,REL=10.0,800314,870137141000 I:NTFA F I:NTFA X , ( Z H D & H l $ ! D % [ ( 8 @ P ABR* WK2 P P END ,PS
0x11412c…1142c0 Dummy {f00=0x0057, f01=0x0190, f02=» > @ IDENT I:EDT T,REL=10.0,800314,870137141000 F B I:EDT I:EDW I:ED1 I:EDSK I:EVT I:ETAB I:EXIT I:ETXT I:ECPY F D @ I:ECTR I:ESL I:ENL I:EOR I:ECW I:ECWC I:EFIL I:EFLA I:SCB I:FFSN I:EXPY , ( !!
0x1142c0…114454 (1, 114) Dummy {f00=0x0057, f01=0x0190, f02=»5 I:EVB I:EGTB I:EVI , I:EVA3 < I:EVA0 N * & AUT ` I:EVNO I:EPIC I:ESKI I:EBRI I:EBRB I:EBR * & Q T
0x114454…1145e8 Dummy {f00=0x0057, f01=0x0190, f02=» { 6 K K I:EDT . I:ED1 @ I:EDW R , ( K K V K : d I:EVA6 , ( * R B " V , ( V Z P 2 " T W , (
0x1145e8…11477c Dummy {f00=0x0057, f01=0x0190, f02=» 7 [ Z P I:ERR9 * , ( U $ [ V < I:EXIT z l P:MTAB , ( s & 7_ Z @ " (! * & P $ Z 7 Z Z P I:FFSN , (
0x11477c…114910 Dummy {f00=0x0057, f01=0x0190, f02=» : R J P v I < : I:ETXT ( I:ECPY < , ( J Q : P 4 P I:EXPY * I:ECTR < , ( % ! T _ P 4 W K I:ESL F I:ENL P , ( E W
0x114910…114aa4 Dummy {f00=0x0057, f01=0x418c, f02=»_& X ,W X & . J K I:EFIL ( I:SCB < I:ERRD N , ( : V : J T 0 1 ` H D ! U Y [ e f g z i p k 4 m P s u F y * < < H D ! P T W T W ;
0x114aa4…114c38 Dummy {f00=0x0057, f01=0x0190, f02=» > @ IDENT I:EPIC T,REL=10.0,800314,870137141000 I:EPIC F I:EPIC X I:EVA0 l : + ~ [ [ < , ( ! !AAP !TTT W !**T * [ R A
0x114c38…114dcc Dummy {f00=0x0057, f01=0x0190, f02=»T j , ( *W FP . :T Z ! XBW *X& I:ERRD : , ( W :P # U J 1 p ! L I:SCB | , ( 00T ; _ 9P F " X> # ; W )0_B , ( J R Z R 4! P ;)0
0x114dcc…114f60 Dummy {f00=0x0057, f01=0x4158, f02=» , ( k ,_ 8 _ : W 8W p 8 ! , ( ++P !-- z ;$# + ^" _( 4 " |`. PT*AXYZ9 d H D ! ` %P +T /W 5T ?R EP KT OW S P Wv W@ Wn H D ! T& W4 P T W F WH P" U T P
0x114f60…1150f4 (1, 115) Dummy {f00=0x0057, f01=0x40ea, f02=» > @ IDENT I:EDS T,REL=10.0,800314,870137141000 I:EDS F I:EDS V I:EVS2 h I:ED1 z , ( : { : & @ P2E,OP1E END OF MAIN STRING
0x1150f4…115288 Dummy {f00=0x0057, f01=0x0190, f02=» > @ IDENT I:STR T,REL=10.0,800314,870137141000 $ I:INS I:DLT I:MCH I:CPY I:XCP F I:DLT n I:EVS1 , ( @ $0T P 9 I:MCH " * & _ $0T [ , ( ;
0x115288…11541c Dummy {f00=0x0057, f01=0x0190, f02=» $ t , ( R W R # P W ) V E I:EVS2 D , ( $0T W W V I:ERR I:CPY I:XCP , ( W [ , ( : Z !0 ,
0x11541c…1155b0 Dummy {f00=0x0057, f01=0x409c, f02=» : H D !@ T H Pb )T ?T UR$ ]P cT mTd oW TH R W R P W ( $ T Wr W W P4 R* R %W Z P @ PY I:XCP , ( W [ , ( : Z !0 ,
0x1155b0…115744 Dummy {f00=0x0057, f01=0x0190, f02=» > @ IDENT T:ADIT T,REL=10.0,800314,870137141000 c & " T:RREA T:RRE1 T:RWRI T:RWR1 c F T:RREA c p T:FDSP c T:RRE1 c I:EVA0 c , ( A #0 T &R c T:STCW c I:ERR c
0x115744…1158d8 Dummy {f00=0x0057, f01=0x40ac, f02=» / "!@P c v T:IO1 d , ( S #0T C : d & m W d V X TX RX A X _T oW d r v d @ d I:EVA0 c , ( A #0 T &R c T:STCW c I:ERR c
0x1158d8…115a6c Dummy {f00=0x0057, f01=0x0190, f02=» > @ IDENT T:CW T,REL=10.0,800314,870137141000 _ F B T:GCW2 T:GTCW T:SCW2 T:STCW T:SCW0 T:BCDB T:BINB T:KIAA _ F T:KIAC _ T:STCW _ I:EVA2 _ T:SCW0 _ , ( @ #0 T & C C : C _
0x115a6c…115c00 Dummy {f00=0x0057, f01=0x0190, f02=» X R _ V _ T:GTCW ` I:ERR2 ` 4 , ( 4 _P :#0 T B 'W B ` F T:BINB ` v , ( B " : ` , ( P P L R ` , ( R _ R _
0x115c00…115d94 (1, 116) Dummy {f00=0x0058, f01=0x0190, f02=» T U :J ` z , ( ] a B@ ' d w5 1 a T:KIAA a J T:KIAC a ^ T:GCW2 a r , ( } #0 T a T:SCW2 a , ( B ' : B B : a , (
0x115d94…115f28 Dummy {f00=0x0058, f01=0x4062, f02=» PR a T 8 4 Z R R Q !P )P 9P IR T P T b b L@ b ^:KIAC a ^ T:GCW2 a r , ( } #0 T a T:SCW2 a , ( B ' : B B : a , (
0x115f28…1160bc Dummy {f00=0x0058, f01=0x018e, f02=» > @ IDENT T:USE T,REL=10.0,800314,870137141000 G T:USE T:UERR G F T:USE G ^ I:ERR4 G p , ( 2 & >A >A 2 G I:EVA0 G , ( $ & V D 9a 9 G P:MTAB G , (
0x1160bc…116250 Dummy {f00=0x0058, f01=0x0190, f02=» G f , ( @ 9 X ( H , ( 9 8 ? X Q , V H 8 , ( ( - 4T H h , ( V 5 ( W V H , ( P W U V X 9T H T:UERR B H
0x116250…1163e4 Dummy {f00=0x0058, f01=0x4010, f02=» H H @ I @ 9 X ( H , ( 9 8 ? X Q , V H 8 , ( ( - 4T H h , ( V 5 ( W V H , ( P W U V X 9T H T:UERR B H
0x1163e4…116578 Dummy {f00=0x0058, f01=0x018e, f02=» > @ IDENT WRITEL T,REL=10.0,800314,870137141000 i WRITEL i F WRITEL i X T:FDS0 i l I:EVA0 i ~ , ( D / #0T C i , ( #0 T &R &P C i T:IO2 i , ( 9
0x116578…11670c Dummy {f00=0x0058, f01=0x400c, f02=» i @ j IDENT WRITEL T,REL=10.0,800314,870137141000 i WRITEL i F WRITEL i X T:FDS0 i l I:EVA0 i ~ , ( D / #0T C i , ( #0 T &R &P C i T:IO2 i , ( 9
0x11670c…1168a0 Dummy {f00=0x0058, f01=0x0190, f02=» > @ IDENT I:NTP T,REL=10.0,800314,870137141000 k B > I:TRC I:NTP I:NTPA I:NTPB I:NTPR I:RST I:RT0 I:RT1 I:RT2 k F I:MOV k I:ADD k I:SUB k I:CMP k I:MUL k * & T k
0x1168a0…116a34 (1, 117) Dummy {f00=0x0058, f01=0x0190, f02=» k I:XCP l I:EDS l , ( / l ( A l X I:TRC N l v I:RST P l T:CSEG l I:NTPA T l I:NTPB X l P:MTAB l , ( O W V 7 @
0x116a34…116bc8 Dummy {f00=0x0058, f01=0x0190, f02=» I:CHK l , ( B " $ m I:EVA0 m > I:EVA2 m P , ( pV 9c D & ( m b I:RT2 m , ( Q W :aW @ NYR m I:TRA m I:RT1 m I:TRB m
0x116bc8…116d5c Dummy {f00=0x0058, f01=0x0190, f02=» V m j T:BAT n , ( W _ 2 # ;B V T n , ( 7 2W V P L , V 2 n J , ( U P " 2 P V D ! R T V n z , ( u P V W V P _ 8 n T:PAT n , ( ^t D . 2 ! 9BP V
0x116d5c…116ef0 Dummy {f00=0x0058, f01=0x0190, f02=» 7_ 2 # P L 6P n , ( @ & 2" &] Y $! o * , ( @ + 6P Q $ T 9BP . _ _ o Z , ( K W 6 @ & " T 7 $ o , ( i V P W _ o I:EVB o , ( P
0x116ef0…117084 Dummy {f00=0x0058, f01=0x40f4, f02=» o N H D ! = ? A C E G I K M kP uP VP Q W p H D ! W, P P W< - L 3T 9W UP [P kR oT uP P P T W p V 8 4 T PH PB -P /Q 3T 7P KW ]T oP W W p U p @ p , ( P
0x117084…117218 Dummy {f00=0x0058, f01=0x0190, f02=» > @ IDENT I:EDTE T,REL=10.0,800314,870137141000 D @ I:EKIH I:EINH I:EVIN I:EBRI I:EBRB I:EBR I:ESKI I:EVNO F I:EGTD I:EGTB I:EKIH I:EINH I:ETAB I:EVIN , ( @
0x117218…1173ac Dummy {f00=0x0058, f01=0x018a, f02=»:ERR2 * & ; W : ! )P9H " I:EBR r < , ( W # T &W &" :I : N I:EBRB v ~ I:ESKI I:EVNO I:ER11 I:EGTD I:EGTB , ( u : P &
0x1173ac…117540 Dummy {f00=0x0058, f01=0x4008, f02=»@ * & ; W : ! )P9H " I:EBR r < , ( W # T &W &" :I : N I:EBRB v ~ I:ESKI I:EVNO I:ER11 I:EGTD I:EGTB , ( u : P &
0x117540…1176d4 (1, 118) Dummy {f00=0x0058, f01=0x0190, f02=» > @ IDENT I:EVS T,REL=10.0,800314,870137141000 I:EVS1 I:EVS2 F I:EVA0 ` , ( @ #03 T jP r , ( kT T : & 9! " : $ , ( = : T W V 9! , ( ]
0x1176d4…117868 Dummy {f00=0x0058, f01=0x4082, f02=»2 I:ERR _^ W , ( T )T GT KW eQ< qQ0 }Q$ T W < l@ ~ #03 T jP r , ( kT T : & 9! " : $ , ( = : T W V 9! , ( ]
0x117868…1179fc Dummy {f00=0x0058, f01=0x0190, f02=» > @ IDENT I:TRA T,REL=10.0,800314,870137141000 2 . I:NTR I:PRT I:TRA0 I:TRA I:TRB I:BUF I:ECB F I:ECB | I:BUF , ( *1 TID ADDR OP CR LVL MOD ( / IFIED OPERAND
0x1179fc…117b90 Dummy {f00=0x0058, f01=0x0190, f02=» ( z , ( ! @ ' $ * A T ( , ( A A ( J , ( p A ) Y V A V z I:HEX I:HEXB , ( V . 1 V v I:TRA0 8
0x117b90…117d24 Dummy {f00=0x0058, f01=0x0190, f02=» I:EVA0 I:HEXW , ( e & ( @ |Q X I:TRB | , ( R A W # V D ! )0 1 , ( @ & # T 6 V ^ I:NTPR I:PRT
0x117d24…117eb8 Dummy {f00=0x0058, f01=0x4028, f02=»W> T n @ $ e & ( @ |Q X I:TRB | , ( R A W # V D ! )0 1 , ( @ & # T 6 V ^ I:NTPR I:PRT
0x117eb8…11804c Dummy {f00=0x0058, f01=0x0190, f02=» > @ IDENT I:ERR T,REL=10.0,800314,870137141000 D @ I:ERR I:ERR0 I:ERR1 I:ERR2 I:ERR3 I:ERR4 I:ERR5 I:ERR6 F F B I:ERR7 I:ERR8 I:ERR9 I:ERRA I:ERRB I:ERRC I:ERRD I:ERRE F B I:ERRF I:ER10 I:ER11 I:ER12 I:ER13 I:ER1
0x11804c…1181e0 Dummy {f00=0x0058, f01=0x0190, f02=» I:ERR3 I:ERR4 I:ERR5 0 I:ERR6 D I:ERR7 X , ( W W W W W W W W l I:ERR8 I:ERR9 $ I:ERRA ( I:ERRB , I:ERRC 0 I:ERR
0x1181e0…118374 (1, 119) Dummy {f00=0x0058, f01=0x018e, f02=» I:ER12 H I:ER13 L I:ER14 P , I:ER15 T @ I:ER16 X T I:ER17 h , ( A W W W W W W W W | I:ER18 ` I:ER19 d I:ER1A h I:ER1B l I:ER1C p
0x118374…118508 Dummy {f00=0x0058, f01=0x0190, f02=» f I:HEXB , ( $ ER A R A " I:ECB J * & @ R 4 4 $ A Z I:PRT , ( & U 4 - _ TC:ERR I:NTPR , ( @
0x118508…11869c Dummy {f00=0x0058, f01=0x0190, f02=» ILLEGAL REQUESTED | , ( W LENGTH STACK UNDERFLOW ARIT , ( w HM OVERFLOW STACK OVERFLOW IN L , ( DEX OVERFLOW ILL INDEX TYPE DI | , ( V BY ZERO EDIT BUFFER OVFL ED , ( IT PICTURE OVERFLOW ALLOCATION
0x11869c…118830 Dummy {f00=0x0058, f01=0x0190, f02=»LOCA l , ( W TED FIX BUFFER NOT ALLOWED IL , ( w LEGAL CONTROL CODE ILLEGAL INDE < , ( X VALUE FORMAT CONDITIONS CHAN l , ( GED ILLEGAL PARAMETER LENGTH , ( ERROR DATASET BUSY ILLEGAL DA , ( TASE
0x118830…1189c4 Dummy {f00=0x0058, f01=0x412a, f02=» W` W WX WT #WP 'WL +WH /WD 3W@ 7W< ;W8 ?W4 | H D ! CW0 GW, KW( OW$ SW WW [W _W cW gW kW oW sW R D 8 H D ! U # 3 C ] _ q @ < " + A [ s
0x1189c4…118b58 Dummy {f00=0x0058, f01=0x4108, f02=» > @ IDENT I:HEX T,REL=10.0,800314,870137141000 I:HEXB I:HEXW I:HEX F I:HEXB f I:HEXW z I:HEX , ( W 9 " R 0 1 Y ! : W " @
0x118b58…118cec Dummy {f00=0x0058, f01=0x413c, f02=» > @ IDENT I:CHK T,REL=10.0,800314,870137141000 I:CHK F I:CHK V P:BAS h P:END x , ( ;a V P V P W TC:CHK I:ERR , ( B <a R 9a V :
0x118cec…118e80 Dummy {f00=0x0058, f01=0x0190, f02=» > @ IDENT TRACHK T,REL=10.0,800314,870137141000 & " TC:CHK TC:ABT TC:ERR TC:RDC F TC:CHK p , ( @ P ( TT:HLT TT:TRP , ( !" _ @ P @ P P V
0x118e80…119014 (1, 120) Dummy {f00=0x0059, f01=0x0190, f02=» P n TT:VER TT:VMM , ( s $ $P T , D 2 , ( @ E : @ P A H A b TT:TID TT:PRC TT:SNO , ( W TW V A V TB:ENT ,
0x119014…1191a8 Dummy {f00=0x0059, f01=0x0190, f02=» TC:RDC TB:RDC TC:ERR & TT:MSG : * & TB( : TB( : A L , ( A E A V A z P:MTAB , ( 3 @ " # P ( R , ( @ M TB( ( A
0x1191a8…11933c Dummy {f00=0x0059, f01=0x4042, f02=» W W P R ;P CR4 kP sR ~ ,@ >G : * & TB( : TB( : A L , ( A E A V A z P:MTAB , ( 3 @ " # P ( R , ( @ M TB( ( A
0x11933c…1194d0 Dummy {f00=0x0059, f01=0x0190, f02=» > @ IDENT TRATAB T,REL=10.0,800314,870137141000 F B TT:TON TT:TRP TT:LOP TT:VON TT:VER TT:VMM TT:HLT TT:PRC F & " TT:TID TT:MSG TT:SNO TT:TRS TT:TON TT:TRP , (
0x1194d0…119664 Dummy {f00=0x0059, f01=0x418a, f02=» j , ( a TT:VON : TT:VER N , ( b , ( TT:VMM @ TT:HLT
0x119664…1197f8 Dummy {f00=0x0059, f01=0x0190, f02=» > @ IDENT TRABUG T,REL=10.0,800314,870137141000 TB:ENT TB:ABT TB:RDC F h P:BAS z , ( , ( , (
0x1197f8…11998c Dummy {f00=0x0059, f01=0x0190, f02=»( ( ( TT:PRC $ TT:SNO 6 , ( i D "! A * @ @ H , ( @ *P ( V x , ( R V W Z T , ( _" = T , (
0x11998c…119b20 Dummy {f00=0x0059, f01=0x0190, f02=»B:RDC 8 , ( ! P @ A A , , ( ; A . "V # ( A , @ , ( @ [ P UW T A ,P p , ( { @ = W Q M / , ( S I J T Y G L P , (
0x119b20…119cb4 (1, 121) Dummy {f00=0x0059, f01=0x0190, f02=» UU A A A A A A A A , ( B ; A P A A , 0 , ( [ + - ; : ( . ` , ( { X " , A L A L @ A , ( @ A _T X ,T X , ( ) A A
0x119cb4…119e48 Dummy {f00=0x0059, f01=0x0190, f02=» @ V " @ T , ( ( ; " @ @ P A A " @ , ( [ 8T @ 4 A @ : A @ @ A P , ( * { @ F A @ A @ A @ @ A , ( F @ A :P W @ T @ , ( @ Z @ A 4 W
0x119e48…119fdc Dummy {f00=0x0059, f01=0x0190, f02=» p , ( ; 0 P P P @ , ( [ R _ @ , ( { _T p , ( 8 4 T P W , ( T @R W , ( U
0x119fdc…11a170 Dummy {f00=0x0059, f01=0x0190, f02=» ; D @ A 8P W @ T @ , ( [ Z A @ 8 0 , ( { @ A 2 ` , ( A 8 @ R V ;a , ( @ Q _ 1 8 @ A , ( 2_ 0 A
0x11a170…11a304 Dummy {f00=0x0059, f01=0x0190, f02=» @ 6 A @ < A @ B A , ( EU [ @ A @ A < @ A B @ A 6 , ( { P W @ T @ V @ P , ( @ A 0 0 P , ( @ @ P @ 1 8 A , ( @ @ < A @ 6 A _
0x11a304…11a498 Dummy {f00=0x0059, f01=0x0190, f02=» 0 p , ( $ W ! T @ P @ " 1 , ( P w 8 P @ @ @ @ T @ , ( @ @ R A *9l! P p , ( &9d! ) W P &9d , ( & _ & , ( P
0x11a498…11a62c Dummy {f00=0x0059, f01=0x018e, f02=» S P R % < < ! , ( H s T @ P @ ! 0 , ( D 5 = 8 8P @ ` TT:TRP TT:TRS , ( W $ TT:TON * & @
0x11a62c…11a7c0 Dummy {f00=0x0059, f01=0x0190, f02=» , ( @ ! @ @ T I _: TT:HLT 8 * & ( = P @ _ A , A J I:TRC x , ( Y @ A 8 @ ! A , ( s 8P @ @ P @ P , ( @ R @ T @
0x11a7c0…11a954 (1, 122) Dummy {f00=0x0059, f01=0x0190, f02=» R )W A | , ( 8 , A A :B A , ( @ Q (P _ H @ T @ L , ( @ H A " EQ GT | , ( = LT NE NG NL P @ * R , ( ] @ P Q (
0x11a954…11aae8 Dummy {f00=0x0059, f01=0x0190, f02=» A l , ( :B A (P _ @ , ( @ @ P @ < , ( V @ Q 1 @ Q Q l , ( +D A " ( R ( @ , ( G$ V @ H ) I " , ( a $
0x11aae8…11ac7c Dummy {f00=0x0059, f01=0x0190, f02=» P ,T n P )T , ( @ A T @ R ?aP * , , ( :l" T & W T C B B , ( B B B " A A A , ( ? A A A A R Q , ( _ ! 9D# 9hP Q
0x11ac7c…11ae10 Dummy {f00=0x0059, f01=0x0190, f02=»Q L % Q | , ( W , ( C L , ( " _* Q P Q V | , ( ? _ W " A < V , ( _ " F <P
0x11ae10…11afa4 Dummy {f00=0x0059, f01=0x0190, f02=» A l , ( .T @ *P P " A " , ( X X " , , A A < , ( :B A Q (P _ # # H A " l , ( ; A A 4 4 @ , ( [ I T A A A T A , ( @ { T
0x11afa4…11b138 Dummy {f00=0x0059, f01=0x0190, f02=» n , ( "( @ " :S :X , ( :Y :Z $P W A > , ( + A 0R 9Q 0 A :B n , ( K _" A " , ( k A 0R 9U AR FQ , (
0x11b138…11b2cc Dummy {f00=0x0059, f01=0x0190, f02=» "! R _U .W A : , ( A " 9d ! R . , ( + :W W W W ? ^ , ( K W :W .W / a A T " , ( k @ T A ( , ( @ A "
0x11b2cc…11b460 Dummy {f00=0x0059, f01=0x0190, f02=» ! 1 ~ u 4 H D ! . K W e : y V } 6 P R V W V T 0 6 W P H D ! V $ P P 6 L #P ' 0 / ; t CV U : [P H D !o _W e V i 6 oP s w {
0x11b460…11b5f4 (1, 123) Dummy {f00=0x0059, f01=0x0190, f02=» W . [ t _ c g k o s $ { d n T n j H D ! . 4 P 4 )V - 1 4 9T EP ] cT < H D ! P W T T W D W : 0 W H D ! 0 V 'PZ 9 T ? EP I L U
0x11b5f4…11b788 Dummy {f00=0x0059, f01=0x0190, f02=» # / ? : IP M QW WT c l H D ! k u t } 0 0 < 0 0 R Q : j ( H D ! D 6 0 P P P P -P 9T a {P W T t H D ! V 6 P P D 0 T P V T
0x11b788…11b91c Dummy {f00=0x0059, f01=0x0190, f02=» 9 =P` KT X H D ! Q S 4 WPF m T u $ y 6 T P P 0 W" b T W R % H D !1 3T =P A I 0 uPd PL P j j 0 R T V ` H D ! Rt W P RV W b * * * Q P T ' * MP2 UR* H D ! p Y j ] _
0x11b91c…11bab0 Dummy {f00=0x0059, f01=0x0190, f02=» !A T 4 R: P T* W T 7 ; ? C G K O S j UR H D ! [Q kP oQ Pl ( P R PL W~ Pz R Tr Qj W" P` QV L H D !`C QL N N W /Q 3P 5Q 9V IW Q f wP W* P T j j H D ! j T P d P d :
0x11bab0…11bc44 Dummy {f00=0x0059, f01=0x018a, f02=» j P WH # j + b 1 Z 7R =Q C b Q j | H D ! _ b g j o wR$ }U R Q j T j 0 8 H D !q T R U WV $ ! $ )R /W& 5 V 9W ? V H D ! CW GW KW OW SW Y ] cT g m oT s w
0x11bc44…11bdd8 Dummy {f00=0x0059, f01=0x4008, f02=»@ j P WH # j + b 1 Z 7R =Q C b Q j | H D ! _ b g j o wR$ }U R Q j T j 0 8 H D !q T R U WV $ ! $ )R /W& 5 V 9W ? V H D ! CW GW KW OW SW Y ] cT g m oT s w
0x11bdd8…11bf6c Dummy {f00=0x0059, f01=0x0190, f02=» > @ IDENT SYSLOD REL 10.0 80-03-15 870105041000 & " SYSLOD SYSBAS NUMSEG PRGLG1 F NUMSEG p PRGLG1 SYSBAS SYSLOD SCTSFA SCTIPL , ( ($SWAP A
0x11bf6c…11c100 Dummy {f00=0x0059, f01=0x0190, f02=» @ A. SCTOPT ( TABBE : * & Q UU @ @ ! P >B @ A J , ( k @ E D P _ x SCTMSZ SCTEFA , ( D $ % $P _ % A >f A , ( $ A
0x11c100…11c294 (1, 124) Dummy {f00=0x005a, f01=0x0190, f02=» A l , ( P _ * A W * , ( @ A W :a2 * A < SAVE09 l SAVE04 ~ APPTYP , ( - & W F W @ F W , ( G CRP BAP COP A SCT
0x11c294…11c428 Dummy {f00=0x005a, f01=0x0190, f02=» , ( W =J : R F P W W " SAVE05 8 SAVE01 J , ( B @ $ P @ R W $ W SAVE03 SAVE13 CMPADR , ( & ( * ,R SAVE07 S
0x11c428…11c5bc Dummy {f00=0x005a, f01=0x0190, f02=» W ( t SCTNOP * & /D W 0 V ( V 0 V $P A & , ( E 2 @ , T , ( [ U U A Q SAVE22 , ( u@$ ,V Y2 W 4 V @ , ( " T W
0x11c5bc…11c750 Dummy {f00=0x005a, f01=0x0190, f02=» , ( 6 Y , ( P @ P @ 2T 4 , ( W - 6P _ T <B d SCTLAP TTB:MT SCTMMP , ( 7 B :L A 8 W 0 : SCTNPE
0x11c750…11c8e4 Dummy {f00=0x005a, f01=0x0190, f02=» j SCTMMC , ( W Y( P Z& = : , ( A @:L . < P W L * & <9B @ V W Q | SCTLAC , ( W & @ A , ( B 0 @
0x11c8e4…11ca78 Dummy {f00=0x005a, f01=0x0190, f02=» a$ P V V " W _> , ( { @ , , ( H . V V " , ( $ P W @ @ ! T _ , ( P 8 , ( :l D
0x11ca78…11cc0c Dummy {f00=0x005a, f01=0x0190, f02=»P W T | , ( ] W , ( }A W 0 @ W ( L , ( | , ( , ( V * 00P
0x11cc0c…11cda0 Dummy {f00=0x005a, f01=0x0190, f02=» j , ( S _ 0 !;; _ S A A , ( s @ R @ ! T A : , ( A @ V ( V & I j MOVE M:REL , ( F W & H V LDALEN , ( " &
0x11cda0…11cf34 (1, 125) Dummy {f00=0x005a, f01=0x0190, f02=»E20 , ( F LX 0T , ( 3 : T : < , ( Q : 0 !TTT 0 !;;T : l , ( q W W 0 !99Q P !00R P , ( 00W 11 A P =H_, !11R T , ( 0 !
0x11cf34…11d0c8 Dummy {f00=0x005a, f01=0x0190, f02=» : : : : , ( / : : 0 )T : !00 , , ( O T W * : TID=TCL= , ( k LEV=TDC=T0LC=0SDC=S0A I. : , ( C. ~ X C.9h! , ( # "
0x11d0c8…11d25c Dummy {f00=0x005a, f01=0x0190, f02=» @ " P P | , ( ' A A A A W A , ( G A A A A A A P A A L , ( g : 9e :e Q | , ( P 9e @ P A 9C) A I , ( " @ ! P " :B A
0x11d25c…11d3f0 Dummy {f00=0x005a, f01=0x0190, f02=» l , ( @ ' " @ $ P " :B A t w B , ( G J " r R Q @ ( = < , ( g @ Q @ "| _@ _$ l , ( : A A A A A A P A , ( A : h:B* A @ P A , ( B
0x11d3f0…11d584 Dummy {f00=0x005a, f01=0x0190, f02=» ' A P A A A ! T W , ( G A A I ! : 9D @ , , ( ! g @ r s @ A I T - , ( A _ I N T V S : , ( , ( 9P
0x11d584…11d718 Dummy {f00=0x005a, f01=0x0190, f02=» : YX d C !CCT xB. ~ , ( ? <X B.9 H Q _ . SCTSWB ^ * & _ _ !SST 0 U P A p SAVE25 SAVE26 , ( } P X X W R W T X X SAVE27 S
0x11d718…11d8ac Dummy {f00=0x005a, f01=0x0190, f02=» P V ZT W Z , ( F P P V . W ( , ( . @ $ P p W F T : X , ( ' A _ 0V , - , ( G P X 9A_ : @ ! P (W ( : H D ! [P$ {P P Q" U R> P0
0x11d8ac…11da40 Dummy {f00=0x005a, f01=0x0190, f02=» [U _U^ oQ yVD TJ P P P T W %P /T H D ! _W sT W V V W P P W V W Q % 1 5P < H D !/ GP UP* Y T aP q T T $ PZ T P V^ 4 # + H D ! = A IPH M Q 6 SW> W [T a e gW m
0x11da40…11dbd4 (1, 126) Dummy {f00=0x005a, f01=0x0190, f02=» : l x P J # 2 l H D ! ' : + r / GT O S X a Z e m q - u }R T v P ( H D ! P PN T -T 1 N 9 Q P _T iT qW wW Q P R P W t H D ! P. R T$ P P P P W W T~ Rr U Rf Q` TR
0x11dbd4…11dd68 Dummy {f00=0x005a, f01=0x418a, f02=» O S D W H X H D ! [ . c g Q P P P R U P /P UR, WQ$ oQ H D ! . P R V V R ! % . - 1 5 v ` H D !x` 9T = A z I z O v }T T V S PJ T@ T: Tr P H D ! P$ T 3Tx
0x11dd68…11defc Dummy {f00=0x005a, f01=0x018c, f02=» > @ IDENT T:CLO T,REL=10.0,800314,870137141000 T:SETT T:GETT F T:SETT ` I:EVA0 t I:RT1 T:GETT , ( @ ( ( $ @ ( _
0x11defc…11e090 Dummy {f00=0x005a, f01=0x4008, f02=»@ IDENT T:CLO T,REL=10.0,800314,870137141000 T:SETT T:GETT F T:SETT ` I:EVA0 t I:RT1 T:GETT , ( @ ( ( $ @ ( _
0x11e090…11e224 Dummy {f00=0x005a, f01=0x0190, f02=» @ H IDENT DENT02 TRA 10.0 80-12-10 F1 O1111 REL 10.0 80-12-10 DEEDIT DELAST DENDUP H $$$TRAN j $ DEEDIT S DELASTD DENDUP | B > ATTDB ATTWB CMPIND. DEDISC- DEFIND1 DELOCKL DEPOOL0 EMPTYT D @ GETDUP MASKL T:DISPD T:DUP
0x11e224…11e3b8 Dummy {f00=0x005a, f01=0x0190, f02=» v 2 P f
0x11e3b8…11e54c Dummy {f00=0x005a, f01=0x0190, f02=» 2 F d > t E * E 3 E ; J F " D @h0R ! P # ( + ?R0X <RAhW %hZ ( !<R %
0x11e54c…11e6e0 Dummy {f00=0x005a, f01=0x018e, f02=» 2hZ ! !T !j !! W R%K2 RRRR !X b !U ( T @ R b r J F " D W )W Lf "d "!U d ! R8T 0R (+0R + j !! S (
0x11e6e0…11e874 (1, 127) Dummy {f00=0x005a, f01=0x0190, f02=» ( , $ / 4 4 * D J F " D 0R T(0X P 0X h P W ! ! 0X 0X 0X #@hT A T f s . J F " D @ !!4 ! 4 ! U 6 _l; 2*0R !T Wo0R "T j !! !
0x11e874…11ea08 Dummy {f00=0x005a, f01=0x0190, f02=» 2 3 P . J F " D W 0R !T3m FW 0R !T&m F W Lh U ! V !!4 ! @ 6 = " J F " D "4 80X 1X F 6 ''' ' y '
0x11ea08…11eb9c Dummy {f00=0x005a, f01=0x018e, f02=» j J F " D @ W "_ '_ !0X R! 2 RRRW 0X 0R (P" &W:6 33 33 Z 4 j $ z 4
0x11eb9c…11ed30 Dummy {f00=0x005a, f01=0x018e, f02=» " " " ! $ " 2 " @ " " N " % " & j " ' x " ( " , " . " / " 0 ( & &
0x11ed30…11eec4 Dummy {f00=0x005a, f01=0x0190, f02=» $ O & DELETED ( ( > J $ E Z & INSERTED j ( & & RECORD $ N & TTTT9D "
0x11eec4…11f058 Dummy {f00=0x005a, f01=0x018e, f02=» & T:L XX " T , & < ELEMENT J $ T b NUMBER r $ & : ( ! & : & : & CONFIRM RECORD INSERT: (
0x11f058…11f1ec Dummy {f00=0x005a, f01=0x018e, f02=» & $ BATCHY $ $E ( & : 8 & l F & RUNNING.O T ( l % x & & & RECORD CORRECTIONS ( & & & " & RECORD
0x11f1ec…11f380 Dummy {f00=0x005a, f01=0x018e, f02=» ) CONFIRM $ )E & FREEZING OF BATCH 0 & l P ( ^ * j + CONFIRM z $ +R $ & CONVERSION OF ALL BATCHES ( , & $ *O &
0x11f380…11f514 (1, 128) Dummy {f00=0x005b, f01=0x0190, f02=» & k ( / & & k . & AUTOMATIC SKIP/DUP *OC < & U ` & N* p & & FF*O ( 0 & $ & ENTER WANTED RECORDNUMBER: ( 1
0x11f514…11f6a8 Dummy {f00=0x005b, f01=0x4054, f02=» & & ( 0X4 , >@ P *OC < & U ` & N* p & & FF*O ( 0 & $ & ENTER WANTED RECORDNUMBER: ( 1
0x11f6a8…11f83c Dummy {f00=0x005b, f01=0x0190, f02=» L H IDENT DECOMP TRA 10.0 81-07-10 F1 O1111 REL 10.0 80-04-11,81-07-10,EV DECOMP T $$$TRAC f DECOMP x 2 . CDV10 CDV110T CDV111 CDVDK DDMMCK1 MMDDCKL 1 7
0x11f83c…11f9d0 Dummy {f00=0x005b, f01=0x4020, f02=»4 C L @ 7-10 F1 O1111 REL 10.0 80-04-11,81-07-10,EV DECOMP T $$$TRAC f DECOMP x 2 . CDV10 CDV110T CDV111 CDVDK DDMMCK1 MMDDCKL 1 7
0x11f9d0…11fb64 Dummy {f00=0x005b, f01=0x8190, f02=» H H IDENT DECONV TRA 10.0 82-02-22 F1 O1111 REL=1.0 VER=1 82-02-22/EV DECONV P $$$TRAC b DECONV t D @ ADJUSTC ATTDEVA DEPOOL2 DERRORF DETPRT EMPTYT0 FDIO1 GETFWD2 B > MASKN T:ATTF T:DISP T:DSC1 T:EDWR T:GETC T:GETT
0x11fb64…11fcf8 Dummy {f00=0x005b, f01=0x8190, f02=» + " 5 # 9 & J F " D 6 f1E $WU6 _ R PCWD1X FT !0X T W/ LW- RW)6 ! 6 E w | x y z { x J F " D @ W L( (
0x11fcf8…11fe8c Dummy {f00=0x005b, f01=0x8190, f02=» 6 J F " D RW Wh ' L0R 40X TP RW WJ %L / 1 3 @ @ A L R T * x #
0x11fe8c…120020 Dummy {f00=0x005b, f01=0x818e, f02=» , " J F " D L_ K "H 1X FA L_ K 3I $ " W !0X E - ! C n V 6 ~ Z I g n s | 7 ~ J F " D
0x120020…1201b4 (1, 129) Dummy {f00=0x005b, f01=0x8190, f02=» e & 6 J F " D 7 _" RW _"2 RRR RW _.J D L?RA . _>@ - ! . L H ) 7
0x1201b4…120348 Dummy {f00=0x005b, f01=0x8190, f02=» J ( 8 H X j & ( z / 1 ? J F " D _ RW _&2 RRR RW _2 L 0R _H0X @ ' L0R @ ' L
0x120348…1204dc Dummy {f00=0x005b, f01=0x818e, f02=» m s u , J F " D @0R 0X R R& ?R U0X T 1X F_D U0X T 1X F_S # # R < * o B J F " D
0x1204dc…120670 Dummy {f00=0x005b, f01=0x8190, f02=» $ $ B 4 J F " D j ( % 6j !% Lj " 1XFAn0X ! 0X !0X K 4 4 L F - ( *
0x120670…120804 Dummy {f00=0x005b, f01=0x8190, f02=» L '0R 0X L0R T L L L0R p J ( . M * > Q , N Z O ^ p ` j n O { | J F " D @ 4 4 0X 0X 0R "P 4 L0R :R6 ?R L
0x120804…120998 Dummy {f00=0x005b, f01=0x8190, f02=»I ` L `!*` a`h a! ! h J F " D aW W j b b ` ` j ` 1 % `* ` 1j 0 1 & t < ! J F " D ` 3 $ `* ` 3j 2 3 `" Lj ! !WRH ` ( ` ! ! Lj F K
0x120998…120b2c Dummy {f00=0x005b, f01=0x818e, f02=»L L , * < , L n ~ J F " D 0R 4 4 ' L0R 0X 0R %P L0R T 4 ' L0R 4 0 R
0x120b2c…120cc0 Dummy {f00=0x005b, f01=0x8190, f02=» J F " D " L $L @ H A !0R 0R P :R?R0X % L<% L % L % L h z $ - 7 ; 8 9 = : A J F " D "W
0x120cc0…120e54 (1, 130) Dummy {f00=0x005b, f01=0x8190, f02=» L X M X N X O X , P X < Q X L R X S X l T b | U d V h W { x J F " D @>@ W:2 RRRRRRRRRRRRRRRRW%A _ @ _ _ A _ & m
0x120e54…120fe8 Dummy {f00=0x005b, f01=0x8190, f02=» 0R Tq0X 0X P Rrm FWP" 5e R 0X 0R /P H m 2 H . X , h J F " D F W0m F 6 !W H m F W m F 5 f ! " x & 1 & &
0x120fe8…12117c Dummy {f00=0x005b, f01=0x8190, f02=» & B $ U 0 & @ & N ( h & x B $ U & & ( & $ &U (
0x12117c…121310 Dummy {f00=0x005b, f01=0x8190, f02=» " U ( $ $ U 4 & EJ AVST[MD D & & j ( x $ J & NUMBER: 9999 " U & & MISST[MMER &
0x121310…1214a4 Dummy {f00=0x005b, f01=0x818e, f02=» & & & & JOBNAME: * & k @ & N & BATCHNAME: & l t & ( & l ( & l & l & l & S[
0x1214a4…121638 Dummy {f00=0x005b, f01=0x818e, f02=» $ K & & & ( 4 @ & P & ^ & l & S[NDNING z & AVBRYTS $ A & & ( & &
0x121638…1217cc Dummy {f00=0x005b, f01=0x8190, f02=» & FLOPPY DISC SKRIVNING & KLARY ( $ K < & L & Z ( h ) t & & & & FLOPPY DISC SKRIVNING & AFBRYDESS $ A &
0x1217cc…121960 Dummy {f00=0x005b, f01=0x8190, f02=»TID: 99-99-99 " TI $ & 4 & B & IND: P 99999E b " gN x & UD: 99999E " % & & ( 5 &
0x121960…121af4 (1, 131) Dummy {f00=0x005b, f01=0x8190, f02=» ! NAME $ !% & : , & : & H & V " EXPIRATION DATE: d $ "% & & & $ # OLD DATA SET IDENTIFIER: $ #% & &
0x121af4…121c88 Dummy {f00=0x005b, f01=0x8190, f02=» & U ( % & U . $ ) < ( L & X ' 001 h $ ' | ( 999999 " (S & & ( ) & SLUTD * 99
0x121c88…121e1c Dummy {f00=0x005b, f01=0x8190, f02=»9999999999999999999O " - % ( , . 8 " / TTTTTTTTTTTTTTTTTTTT9O H " / % n ( ~ 0 " 1 TTTTTTTTTTTTTTTTTTTT9- " 1 % ( 2 " 3 99999999999999999999
0x121e1c…121fb0 Dummy {f00=0x005b, f01=0xc012, f02=» @ 9O " - % ( , . 8 " / TTTTTTTTTTTTTTTTTTTT9O H " / % n ( ~ 0 " 1 TTTTTTTTTTTTTTTTTTTT9- " 1 % ( 2 " 3 99999999999999999999
0x121fb0…122144 Dummy {f00=0x005b, f01=0x407c, f02=» L H IDENT DEDDIV TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV < $$$TRA < T < f@ < x ; z :D ; @ ; : @ :
0x122144…1222d8 Dummy {f00=0x005b, f01=0x018e, f02=» @ H IDENT NYCONV TRA 10.0 83-02-25 F1 O1111 NJ-AMT 830225/EV DECONV H $$$TRAC Z DECONV l > : ADJUSTC ATTDEVA DCSEND3 DCSGOFF DCSGON DEPOOL DERRORE B > DETPRT EMPTYT FDIO GETFWD MASK T:ATTF T:DISP T:DSC1 D @
0x1222d8…12246c Dummy {f00=0x005b, f01=0x0190, f02=» ( 8 H = X Q h x # % , * 6 # : J F " D 2 RRRRRRRRR $WU6
0x12246c…122600 Dummy {f00=0x005b, f01=0x018e, f02=» I i 40X Td Z 0 ( 6 : L $ l = | 0 ( J F " D RW W^ %L / 1 3 @ @ A L R T U0X T 1X F 0X T) L
0x122600…122794 (1, 132) Dummy {f00=0x005c, f01=0x0190, f02=» J F " D L L m F RW W 6 RW W _| LW L0X A _ 0X _ I PH 1X $ r * 3 J F " D FA L_ I ? $ " W !0X T0 - ! I R _ W W W W G 6
0x122794…122928 Dummy {f00=0x005c, f01=0x0190, f02=»_ R _,W W !_2_ _`I , RW _ U0X T 1X F@ x 6 F V f c v $ B 0 _ J F " D 0X 0X R R& ?R U0X T 1X F_( 6
0x122928…122abc Dummy {f00=0x005c, f01=0x0190, f02=» # f , < J F " D / 1 3 @ @ @ @ R T U0X T 1X F L?R LW LA ?RK H 1X FA L f * $ ( c 2 c J F " D L?R
0x122abc…122c50 Dummy {f00=0x005c, f01=0x0190, f02=» J F " D @ R ?RW W W W %_h L_m R _"_$_& !_(_j -I W @ R Z c j $ z $ < M
0x122c50…122de4 Dummy {f00=0x005c, f01=0x0190, f02=» L L * 0 : 6 L ^ $ n ~ J F " D 0R 40X TP RW WJ %L / 1 3 @ @ A L R T, U0X T 1 &
0x122de4…122f78 Dummy {f00=0x005c, f01=0x0190, f02=» J F " D X F RW W 6 ! RW W ?R LW LA ?R ' L0R L?RK "H C R E b J r L f a * x | c J F " D @ 1X FA L?RK 3I $ " W !0X E - ! R ?RW
0x122f78…12310c Dummy {f00=0x005c, f01=0x0190, f02=» J F " D W W %_e L_j R _"W WA !_( RW W L '0R L RK7 _ V f v & f J F " D " RW _"2 RRR RW _.J G
0x12310c…1232a0 Dummy {f00=0x005c, f01=0x0190, f02=» % ( & ' ) , / < 7 : L 8 9 l ; & | J F " D _t_ I }W _ W L '0R L RK2 RRR RW _ RW _&2 RRR RW _2 B G Q 0
0x1232a0…123434 (1, 133) Dummy {f00=0x005c, f01=0x0190, f02=» _H0X @ ' L0R @ ' L0R 0X R R& c > $ N ^ n $ ~ J F " D ?R U0X T 1X F_D U0X T 1X F_S # # R" T
0x123434…1235c8 Dummy {f00=0x005c, f01=0x0190, f02=» " '0R 0X L0R T@ Lj & j ( % 6j !% - B T ! d t , ( ( B 3 ; > - C J F
0x1235c8…12375c Dummy {f00=0x005c, f01=0x0190, f02=» O Z a0 O d , g > i P u + ` J F " D @ F L '0R 0X L0R T L L L0R 4 4 R 4 4 4 4 p 0 2 4 O
0x12375c…1238f0 Dummy {f00=0x005c, f01=0x0190, f02=»4 La F T + " 2 D 2 T 4 d t J F " D j R4 R 4 4 4 4 _] ' L0R 0X 0R %P L0R T 4
0x1238f0…123a84 Dummy {f00=0x005c, f01=0x0190, f02=» >0 J F " D ' L0R 4 1XFAn0X ! 0X !0X K 4 4 8R %L $L! $L Y && j J F " D @ / b /W b $ 'I ` L `!*` a`h a! ! aW W j b | J F " D b ` ` j ` 1 % `* ` 1j 0 1 ` 3
0x123a84…123c18 Dummy {f00=0x005c, f01=0x0190, f02=»! i ? + * J F " D ( ` ! ! Lj ! ! RW RW f !P 4 6 ?R : Q Z ` i w & J F " D @4 6 W R W W RW W RW W 4 4 d " ` `"0X
0x123c18…123dac Dummy {f00=0x005c, f01=0x0190, f02=»"4 L 0R 4 ( $ m F R 4 4 L0X R 4 4 4 4 _," H 0 X j z E I " J F " D
0x123dac…123f40 Dummy {f00=0x005c, f01=0x0190, f02=» - 7 ; 8 & 9 = 6 : A F J F " D "W- L / A _= 0 0X 1 LW 2 0X 3 LW ( # 2 RRRRWJA W V H X I J Z K ^ L X M X
0x123f40…1240d4 (1, 134) Dummy {f00=0x005c, f01=0x0190, f02=» W J F " D @F@ WB2 RRRRRRRRRRRRRRRRW-A _ ) @ _ _ ) A _ & m $ r " . * " J F " D FW @ _ ) H 0R T 0X 0X P R m FWf" 5 R 0X
0x1240d4…124268 Dummy {f00=0x005c, f01=0x0190, f02=» FW m F 6 !W H ) m F W m p 3 . " > J F " D FW m F 5 f () m FH ( # $ / @ /! ! " N D & ( & 1 & &
0x124268…1243fc Dummy {f00=0x005c, f01=0x0190, f02=» & ( * 999999 : " SU P ( ` l 99 | " U ( $ U & EJ GODKENDT & ( #
0x1243fc…124590 Dummy {f00=0x005c, f01=0x018e, f02=» & ( & l * ( 8 D & l T & l b & l p " FLOPPY DISC SKRIVNING ~ $ A $ A ( & & & "
0x124590…124724 Dummy {f00=0x005c, f01=0x0190, f02=» ( & & . & < " FLOPPY DISC SKRIVNING J $ A p AFBRYDESS $ A $ A & & ( & &
0x124724…1248b8 Dummy {f00=0x005c, f01=0x0190, f02=» LISTNING $ A " KLARM 2 $ A H $ A X & h & v ( & & & LISTNING $ A AFBRYDESS
0x1248b8…124a4c Dummy {f00=0x005c, f01=0x0190, f02=»-99-99 " SA & & TID: , 99-99-99 > " TI V & f & t & IND: 99999M " gN & UD: 99999M " % & &
0x124a4c…124be0 Dummy {f00=0x005c, f01=0x0190, f02=» # FILE $ #% & - . $ NAME < $ $% P & : ` & n & | & % EXPIRATION DATE: $ %% & & & $ & OLD DATA SET I
0x124be0…124d74 (1, 135) Dummy {f00=0x005c, f01=0x018e, f02=» & & & D & & U 8 ( F ( R & SLUTD b ) 99999M v " ) % & & ( * & ( + " , TT
0x124d74…124f08 Dummy {f00=0x005c, f01=0x0190, f02=» / " 0 ZZZZZZZZZZZZZZZZZZZZ9- " 0 % : ( J 1 V " 2 ZZZZZZZZZZZZZZZZZZZZ9- f " 2 % ( 3 " 4 999999999999999999999- " 4 % ( 5 "
0x124f08…12509c Dummy {f00=0x005c, f01=0x018e, f02=»8% & ? & ? & ? & ( 4 9 @ & P : ' ^ $ :% p ( ; & SLUTD < 99999M " < % ( = & < & <
0x12509c…125230 Dummy {f00=0x005c, f01=0x418c, f02=» & @ BATCH TRANSMISSION $ @% 8 A KLARM H $ A% ^ $ % n ( ~ B & & & C BATCH TRANSMISSION $ C% D AFBRYDESN
0x125230…1253c4 Dummy {f00=0x005c, f01=0xc09c, f02=»E% F AFBRYDESN $ F% $ $ % 4 & D & R ( ` @?R4 4 4 4 4 l L @ & & B BATCH TRANSMISSION $ B% C KLARD $
0x1253c4…125558 Dummy {f00=0x005c, f01=0x8190, f02=»RRRRRI i R T $ 4 S D 0 T 6 f x J F " D W Wh ' L0R 40X TP RW WJ %L / 1 3 @ @ A L R T,
0x125558…1256ec Dummy {f00=0x005c, f01=0x818e, f02=» U0X T 1X F RW W 6 ! RW W ?R LW LA ?R ' L0R 7 J f l | f + " J F " D L?RK "H 1X FA L?RK 3I $ " W !0X E - !
0x1256ec…125880 Dummy {f00=0x005c, f01=0x8190, f02=» ~ J F " D @ R ?RW W W W %_e L_j R_ W WA !_% RW W L '0R L RK $ r l f J F " D 7 _" RW
0x125880…125a14 (1, 136) Dummy {f00=0x005d, f01=0x8190, f02=» ( 8 H S X J F " D 0R _q_ -I !a FW _ W L '0R L RK2 RRR RW h
0x125a14…125ba8 Dummy {f00=0x005d, f01=0x8190, f02=» _H0X @ ' L0R @ ' L l A * L : Q J S Z Y c j ^ z d f m s u J F " D @0R 0X R R&
0x125ba8…125d3c Dummy {f00=0x005d, f01=0x8190, f02=» B J F " D " T - ! L4 4 L " '0R 0X L0R T@ Lj & - n " $ B J F " D j ( % 6j !
0x125d3c…125ed0 Dummy {f00=0x005d, f01=0x8190, f02=» ( , - O $ / 6 60 O F 9 X < j > | J F " D "m F %m F Lm F L '0R 0X L0R T L L L0R T0 " X0 " 0 "
0x125ed0…126064 Dummy {f00=0x005d, f01=0x8190, f02=» b b ` ` j ` 1 % ` p * . J F " D * ` 1j 0 1 ` 3 $ `* ` 3j 2 3 `" W 0X f > * ( , . O ! % Q / Q
0x126064…1261f8 Dummy {f00=0x005d, f01=0x8190, f02=» L0 X P0 X T0 X " o && 4 J F " D @R 8R %L $L! $L / b /W b $ 'I ` L `!*` a`h a! F J F " D ! aW W j b b ` ` j ` 1 % `* ` 1j ! J F "
0x1261f8…12638c Dummy {f00=0x005d, f01=0x8190, f02=» 3 - J F " D Lj ! ! L 0R f !8R4 La F j W C f H x X Z b , f . m o { }
0x12638c…126520 Dummy {f00=0x005d, f01=0x8190, f02=» . > P b J F " D 4 " L $L @ H A !0R 0R P :R?R0X % L<% L % L t
0x126520…1266b4 (1, 137) Dummy {f00=0x005d, f01=0x818e, f02=» LW 2 0X 3 LW ( # 2 RRRR j ( 8 H # X h x + -
0x1266b4…126848 Dummy {f00=0x005d, f01=0x8190, f02=» Y ] & p / ( J F " D @ m FW @ _ ) H 0R T 0X 0X P R m FWf" 5 8 . 4 6 8 2 J F " D R~0X 0R /P%H ) m F W
0x126848…1269dc Dummy {f00=0x005d, f01=0x8190, f02=» () m F ! " ?R4 4 4 4 t 2 & B ( P & 1 l & | & & * & NUMBER: 9999 " gU & & &
0x1269dc…126b70 Dummy {f00=0x005d, f01=0x8190, f02=»& B $ U & . & < ( J V & f $ *U t ( & ( 999999 " SU (
0x126b70…126d04 Dummy {f00=0x005d, f01=0x8190, f02=»( $ J & NUMBER: * 9999 @ " U T & d & MISST[MMER r & & ( $ I & EJ GODKENDT & (
0x126d04…126e98 Dummy {f00=0x005d, f01=0x8190, f02=» & ( " & l 2 ( @ L & l & l j & l x & S[NDNING $ [ ( & & & & S[NDNING
0x126e98…12702c Dummy {f00=0x005d, f01=0x818e, f02=»& S[NDNING & AVBRYTS $ A * & : & H ( V b & r & & & FLOPPY DISC SKRIVNING $ L ( % & &
0x12702c…1271c0 Dummy {f00=0x005d, f01=0x8190, f02=» & & & $ & FLOPPY DISC SKRIVNING 2 & AFBRYDESS V $ A n & ~ & ( & & & & LISTNING $ I
0x1271c0…127354 (1, 138) Dummy {f00=0x005d, f01=0x8190, f02=» ( & & . & < & LISTNING AFBRYDESN J $ I j & z & ( 0 & & DATO: 99-99-99 " SA &
0x127354…1274e8 Dummy {f00=0x005d, f01=0x818e, f02=» & UD: ! 99999G " ! % 2 & ! B & ! P ( ^ " 5 j & ! z # DEVICE $ #% & : & & #% & $ FILE $ $%
0x1274e8…12767c Dummy {f00=0x005d, f01=0x8190, f02=» v $ &% & & & & 4 $ ' OLD DATA SET IDENTIFIER: B $ '% j & z & & $ ( OLD VOLUME SEQUENCE NO:: $ (% & & &
0x12767c…127810 Dummy {f00=0x005d, f01=0x818e, f02=» $ + , 999999 " ,S & & 6 & D ( R - ^ & SLUTD n . 99999G " . % & & ( / & ( 0 "
0x127810…1279a4 Dummy {f00=0x005d, f01=0xc16c, f02=» ( 4 " 5 TTTTTTTTTTTTTTTTTTTT9- " 5 % F ( V 6 b " 7 BBBBBBBBBBBBBBBBBBBB9- r " 7 % ( 8 " 9 999999999999999999999- " 9 % (
0x1279a4…127b38 Dummy {f00=0x005d, f01=0x4106, f02=» L H IDENT D:TB50 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV $ D:TB50 $ T D:TB50T $ f * & F Q 0 [ $ z * & 0 0 ^ e f h n t $ = ~ $ F $ @ $
0x127b38…127ccc Dummy {f00=0x005d, f01=0x0190, f02=» F H IDENT DECONV TRA 10.0 82-05-06 F1 O1111 REL=1.0,VER=1 820506/NJ DECONV N $$$TRAC ` DECONV r D @ ADJUSTC ATTDEVA DEPOOL2 DERRORF DETPRT EMPTYT0 FDIO1 GETFWD/ D @ MASKN T:ATTF T:DISP T:DSC1 T:EDWR T:GETC T:GETT T
0x127ccc…127e60 Dummy {f00=0x005d, f01=0x0190, f02=» o * = : Q J r Z j # z % , $ 6 # : J F " D 2 RRRRRRRRR $WU6 _ R PCWD1X FT !0X T W/
0x127e60…127ff4 (1, 139) Dummy {f00=0x005d, f01=0x018e, f02=»0 , < 0 L ^ # p J F " D RW W4 %L / 1 3 @ @ @ @ R T U0X T 1X F L_R LW LA _
0x127ff4…128188 Dummy {f00=0x005d, f01=0x0190, f02=» + H J F " D M - ! R _ W W W W %_h L_m R_ _!_# !_%_g -I H b J r U [ ] d j l u z v w
0x128188…12831c Dummy {f00=0x005d, f01=0x0190, f02=» " x 2 0 B 6 T f J F " D Wh ' L0R 40X TP RW WJ %L / 1 3 @ @ A L R T, v
0x12831c…1284b0 Dummy {f00=0x005d, f01=0x0190, f02=»W 6 ! RW W ?R LW LA ?R ' L0R z 7 8 f J Z j z f * $ J F " D L?RK "H 1X FA L?RK 3I $ " W !0X E - ! A
0x1284b0…128644 Dummy {f00=0x005d, f01=0x0190, f02=» ~ J F " D @ R ?RW W W W %_e L_j R_ W WA !_% RW W L '0R L RK7 ^ n k ~ f J F " D _" RW _"2
0x128644…1287d8 Dummy {f00=0x005d, f01=0x0190, f02=» $ 4 x D J F " D R _q_ -I !a FW _ W L '0R L RK2 RRR RW T
0x1287d8…12896c Dummy {f00=0x005d, f01=0x0190, f02=»_H0X @ ' L0R @ ' L0 h K & P 6 R F X c V ] f c v e l r t ~ J F " D @R 0X R R& ?R U0X T 1X F_D U0
0x12896c…128b00 Dummy {f00=0x005d, f01=0x0190, f02=» B J F " D T - ! L4 4 L " '0R 0X L0R T@ Lj & - Z l | & " B J F " D j ( % 6j !% Lj " 1XFA
0x128b00…128c94 (1, 140) Dummy {f00=0x005e, f01=0x0190, f02=» ' , , O . " 50 O 2 8 D ; V = h J F " D "m F %m F Lm F L '0R 0X L0R T L L L0R x S0 m W0 m [0 m v &&
0x128c94…128e28 Dummy {f00=0x005e, f01=0x0190, f02=» ` 1 % `* J F " D ` 1j 0 1 ` 3 $ `* ` 3j 2 3 `" W-d " ` `"0X `f * ' x 4 * 7 , ; . J F " D " f !X 4 d " ` `"0X `f "4 0X 0X 0R "P
0x128e28…128fbc Dummy {f00=0x005e, f01=0x0190, f02=» u0 O y0 O J F " D @4 L0R :R6 ?R L j ?R 8R %L $L! $L / && n J F " D b /W b $ 'I ` L `!*` a`h a! ! aW W j b J F " D b ` ` j ` 1 % `* ` 1j 0 1 ` 3 $
0x128fbc…129150 Dummy {f00=0x005e, f01=0x0190, f02=» ! ! L 0R f b N 3 T ` 0 X & B h R m d } t J F " D @ !8R4 La F j W L 0R 4 4 ' L0R , .
0x129150…1292e4 Dummy {f00=0x005e, f01=0x0190, f02=»L0R 4 " L $L @ H j ( 8 1 H 5 X h x J F " D A !0R 0R P :R?R0X % L>%
0x1292e4…129478 Dummy {f00=0x005e, f01=0x018e, f02=» & - 4 D 5 $ 6 F 4 7 J D 8 D T 9 D d : D t ; D < D = D > D ? D @ R A T B
0x129478…12960c Dummy {f00=0x005e, f01=0x0190, f02=» J F " D @RRRRW-A _ ) @ _ _ ) A _ & m FW @ _ ) H 0R T 0 ( R ( b r . + J F " D X 0X P R m FWf" 5 R 0X 0R /P%H ) m F / 3
0x12960c…1297a0 Dummy {f00=0x005e, f01=0x0190, f02=» 0 & . ( < H & 1 X & h & v & * & NUMBER: 9999 " gU & & & (
0x1297a0…129934 (1, 141) Dummy {f00=0x005e, f01=0x0190, f02=» " U ( $ U , & EJ GODKENDT < & V ( d # p & & & & JOBNAME: & k & & BATCHNAME: & l &
0x129934…129ac8 Dummy {f00=0x005e, f01=0x018e, f02=»ISC SKRIVNING $ A $ A & ( 6 B & R & ` & n " FLOPPY DISC SKRIVNING | $ A & KLARN $ K & & (
0x129ac8…129c5c Dummy {f00=0x005e, f01=0x0190, f02=» & & ( $ 0 & @ & N & LISTNING j $ A $ A ( & & & LISTNING $ A
0x129c5c…129df0 Dummy {f00=0x005e, f01=0x0190, f02=» & LISTNING $ A 0 AFBRYDES @ $ A Z $ A j & z & ( 0 & & DATO: 99-99-99 " SA &
0x129df0…129f84 Dummy {f00=0x005e, f01=0x0190, f02=» & UD: 99999E " % 2 & B & P ( ^ 5 j & z DEVICE $ & : & & #% & ! FILE $ !%
0x129f84…12a118 Dummy {f00=0x005e, f01=0x0190, f02=» $ #% & & " & 0 $ $ OLD DATA SET IDENTIFIER: > $ $% f & v & & $ % OLD VOLUME SEQUENCE NO:: $ %% & & & &
0x12a118…12a2ac Dummy {f00=0x005e, f01=0x018e, f02=» ( ( & ( . ) : " * TTTTTTTTTTTTTTTTTTTT9O J " * % p ( + " , TTTTTTTTTTTTTTTTTTTT9- " , % ( - " . ZZZZZZZZZZZZZZZZZZ
0x12a2ac…12a440 Dummy {f00=0x005e, f01=0x40f8, f02=» " 2 999999999999999999999- " 2 % * ( : 3 F " 4 999999999999999999999- V " 4 % | ( F A ? () m FH ( # $ / @ /! ! " ?R4 4 4 4 4 ; @ ZZZZZZZZZZZZZZZZ
0x12a440…12a5d4 (1, 142) Dummy {f00=0x005e, f01=0x8190, f02=» * + 001 $ + , 999999 0 " ,S F & V & d ( r - ~ & SLUTD . 99999G " . % & & ( / &
0x12a5d4…12a768 Dummy {f00=0x005e, f01=0x8190, f02=»TTTTTTTT9O | " 3 % ( " 4 . " 5 TTTTTTTTTTTTTTTTTTTT9- > " 5 % d ( t 6 " 7 BBBBBBBBBBBBBBBBBBBB9- " 7 % ( 8 " 9 999999999999999999999-
0x12a768…12a8fc Dummy {f00=0x005e, f01=0xc028, f02=»4 4 4 4 4 d 0 @ $ " 4 . " 5 TTTTTTTTTTTTTTTTTTTT9- > " 5 % d ( t 6 " 7 BBBBBBBBBBBBBBBBBBBB9- " 7 % ( 8 " 9 999999999999999999999-
0x12a8fc…12aa90 Dummy {f00=0x005e, f01=0x0190, f02=» @ H IDENT DCCONV TRA 10.0 83-02-24 F1 O1111 NJ-AMT 830224/EV DCSEND DCSGOF DCSGON H $$$TRAC j $ DCSEND DCSGOFD DCSGON | & " T:DSC1C T:EDWRA T:LWRI3 T:READF E j
0x12aa90…12ac24 Dummy {f00=0x005e, f01=0x0190, f02=» W($ T F j J " S 2 _ j B c R n b v r | X ~ J F " D @& # RW RW m Fj RW RW 4 4 !0X !0X L0X
0x12ac24…12adb8 Dummy {f00=0x005e, f01=0x0190, f02=»O6 $7 R L h 'T6W( L h p . 0002 > R b r TERMINATE J F " D #T%W R L h $T W RW L m F4 4 6 "" " % L *
0x12adb8…12af4c Dummy {f00=0x005e, f01=0x0190, f02=» W l n J F " D @ !T # $ !s Lh !T b 1X F # #+W 0 p ~ P P P p
0x12af4c…12b0e0 Dummy {f00=0x005e, f01=0x0190, f02=» & CSSN PS= 9999 " & 2 & ,NAME= B AAAAAAAAAAAAAAAAAAA9 V " ' z ( & CSSF ( & ' $ S (
0x12b0e0…12b274 (1, 143) Dummy {f00=0x005e, f01=0x4026, f02=» 1X F4 # @ "9999 " & 2 & ,NAME= B AAAAAAAAAAAAAAAAAAA9 V " ' z ( & CSSF ( & ' $ S (
0x12b274…12b408 Dummy {f00=0x005e, f01=0x8190, f02=» f c v 6 z " J F " D @ ?R_ W'W*W(?RK M - ! R ?RW W W W %_h L_m R _" 2 c
0x12b408…12b59c Dummy {f00=0x005e, f01=0x8190, f02=» . @ P ` 0 p J F " D - 2 RRRRRI i RW Wh ' L0R 40X TP RW WJ %L / 1 6
0x12b59c…12b730 Dummy {f00=0x005e, f01=0x8190, f02=»0X T 1X F RW W 6 ! RW W ?R LW L v C f 4 I D K V T 7 f V f x ^ ` e g f | $ J F " D @A ?R ' L0R L?RK "H 1X FA L?R
0x12b730…12b8c4 Dummy {f00=0x005e, f01=0x8190, f02=» R ?RW W W W %_e L_j R _"W WA !_( RW W z 8 J 7 Z l | 8 O f J F " D L
0x12b8c4…12ba58 Dummy {f00=0x005e, f01=0x8190, f02=» > J F " D - ! . L 0R _t_ -I !a FW _ W L '0R G 7 ^ I p J N Q O 7 P 8 R X ` c a 7 b 8
0x12ba58…12bbec Dummy {f00=0x005e, f01=0x8190, f02=»H0X @ R " 2 D T d t c J F " D ' L0R @ ' L0R 0X R R& ?R U0X T 1X F_D
0x12bbec…12bd80 Dummy {f00=0x005e, f01=0x8190, f02=»T 1X F_S # # R" T - ! L4 4 L " '0R . D o T f B v - - 6 7 ! ; @ ( J F " D 0X L0R T@ Lj & j ( % 6j !%
0x12bd80…12bf14 (1, 144) Dummy {f00=0x005f, f01=0x8190, f02=» l o t | . . O > J F " D @X !0X K 4 4 L "m F %m F Lm F L '0R 0X P 0 ! ^
0x12bf14…12c0a8 Dummy {f00=0x005f, f01=0x8190, f02=»"P 4 L0R V R & R 6 ( H X ^ h J F " D R=6 . W3 L j R4 4 La F j R4 R 4 4 x . 0
0x12c0a8…12c23c Dummy {f00=0x005f, f01=0x8190, f02=»R 0X 0R %P L0R T 4 ' L0R 4 1XFAn0 | E ( : J " J M Z W E j Y z b i0 4 m0 4 q0 4 J F " D @X ! 0X !0X K 4 4 m F R4 4 8R %L $L! $L
0x12c23c…12c3d0 Dummy {f00=0x005f, f01=0x8190, f02=»1 % `* ` 1j 0 1 ` 3 $ `* ` 3j 2 3 `" ~ < N 4 ! ^ = p J F " D ( &e Lj ! !WY6 (((( (($W& RW"H ` ( ` ! ! Lj ! ! RW A f ^ x |
0x12c3d0…12c564 Dummy {f00=0x005f, f01=0x8190, f02=» J F " D RW 4 d " ` `"0X `f "4 L 0R 4 6 "" "" * } l H | } H } J F " D RW< RW:m Fj W( # RW R
0x12c564…12c6f8 Dummy {f00=0x005f, f01=0x8190, f02=» + 0 & ? J F " D 4 4 !0X !0X L0X 0X TW L0X 0X TE6 $7 R . B DFH3504X | S 5F c f 0002 v J F " D @ L h 'T,W( L h !T W R L
0x12c6f8…12c88c Dummy {f00=0x005f, f01=0x8190, f02=»" % L * L m Fj RW W 4 $ ! " - " L D V h J x J F " D h #PK L h !T # $ !s Lh !T b 1X F p P
0x12c88c…12ca20 Dummy {f00=0x005f, f01=0x8190, f02=» H p L p U 0 W J @ [ , P ^ . ` c F p e i l X n s ^ J F " D @ L% L Lb 1X F4 0X 0X L0R :R L0
0x12ca20…12cbb4 (1, 145) Dummy {f00=0x005f, f01=0x8190, f02=» ( : J F " D '" L $L @ H A !0R 0R P :R?R0X % L>% L % L % L! L
0x12cbb4…12cd48 Dummy {f00=0x005f, f01=0x8190, f02=» . > N ^ n ~ ( * 2 E B J F " D WF@
0x12cd48…12cedc Dummy {f00=0x005f, f01=0x818e, f02=» J F " D @ FW @ _ ) H 0R T 0X 0X P R m FWf" 5 R 0 0 Z - j 1 z 5 + / J F " D X 0R /P%H ) m F WBm FW m F 6 !W H ) m F W m
0x12cedc…12d070 Dummy {f00=0x005f, f01=0x818e, f02=» & ( " & 1 2 & B & P & * ^ & NUMMER: l 9999 " gU & & & ( & (
0x12d070…12d204 Dummy {f00=0x005f, f01=0x818e, f02=» $ U & EJ GODKENDT & 2 ( @ # L & & j & x & JOBNAME: & k & & BATCHNAME: & l & (
0x12d204…12d398 Dummy {f00=0x005f, f01=0x8190, f02=» $ A ( & 0 & > & L " FLOPPY DISC SKRIVNING Z $ A KLARM $ A $ A & & ( &
0x12d398…12d52c Dummy {f00=0x005f, f01=0x8190, f02=» & & ( $ 0 & @ & N & LISTNING j $ A $ A ( & & & LISTNING $ A
0x12d52c…12d6c0 Dummy {f00=0x005f, f01=0x8190, f02=» & LISTNING $ A 0 AFBRYDESS @ $ A Z $ A j & z & ( 0 & & DATO: 99-99-99 " SA &
0x12d6c0…12d854 (1, 146) Dummy {f00=0x006e, f01=0x818e, f02=» & UD: 99999M " % 2 & B & P ( ^ ! 5 j & z " DEVICE $ "% & : & & #% & # FILE $ #%
0x12d854…12d9e8 Dummy {f00=0x006e, f01=0x8190, f02=» v $ %% & & & & 4 $ & OLD DATA SET IDENTIFIER: B $ &% j & z & & $ ' OLD VOLUME SEQUENCE NO:: $ '% & & &
0x12d9e8…12db7c Dummy {f00=0x006e, f01=0x818e, f02=» ( * & $ ( 2 + > " , TTTTTTTTTTTTTTTTTTTT9O N " , % t ( - " . TTTTTTTTTTTTTTTTTTTT9- " . % ( / " 0 ZZZZZZZZZZZZZZ
0x12db7c…12dd10 Dummy {f00=0x006e, f01=0x8190, f02=» " 4 999999999999999999999- " 4 % . ( > 5 J " 6 999999999999999999999- Z " 6 % ( 7 , & 6 8 DATATRANSMISSION $ 8% & &
0x12dd10…12dea4 Dummy {f00=0x006e, f01=0x8190, f02=» : TTT9 ! " : & ! ( ! ( ; ! 4 & ! D < ' ! R $ <& ! d & ! t ( ! = ! & ! & ! & ! > BATCH TRANSMISSION ! $ >& ! $ & !
0x12dea4…12e038 Dummy {f00=0x006e, f01=0x8190, f02=» ! $ A& " $ & " ( " ( B " 4 & " D & " R & " ` C BATCH TRANSMISSION " n $ C& " D AFBRYDESN " $ D& " $ & " & " & " ( " E
0x12e038…12e1cc Dummy {f00=0x006e, f01=0xc0cc, f02=» ( # H # I # $ I' # 2 & # B ( # P J # & # l & ' # z ( # " ?R4 4 4 4 4 # # @ # $ & " & " & " ( " E
0x12e1cc…12e360 Dummy {f00=0x006e, f01=0x0190, f02=» L H IDENT C:CB60 TRA 10.0 83-02-25 F1 O1111 REL 10.0 80-04-11,83-02-25,EV ' C:CB60 ' T C:CB60C ' f & `@ @ ' z & ' & = ' & [ ' & y ' & ' & ' & '
0x12e360…12e4f4 (1, 147) Dummy {f00=0x0042, f01=0x4048, f02=» ' ( ( ( 2@ ( D5,EV ' C:CB60 ' T C:CB60C ' f & `@ @ ' z & ' & = ' & [ ' & y ' & ' & ' & '
0x12e4f4…12e688 Dummy {f00=0x0042, f01=0x0190, f02=» F H IDENT DE70ST TRA 10.0 83-02-24 F1 O1111 REL 10.0 82-02-24/ERVR DE70ST DEAP7A N $$$TRA7 h DE70ST DEAP7A z D @ ATTDB DEANOKT DEAOK0 DECLRA4 DECLRS1 DECONV1 DEDISC0 DELASTV D @ DEOPBC DEPMSK7 DEPOOL DEPRUT DEREC
0x12e688…12e81c Dummy {f00=0x0042, f01=0x0190, f02=» p , J ` ~
0x12e81c…12e9b0 Dummy {f00=0x0042, f01=0x0190, f02=» , @ ( ^ n ( ~ ( ) - ? $ J F " D kU lU( xAdIe 1XFW
0x12e9b0…12eb44 Dummy {f00=0x0042, f01=0x0190, f02=» | J F " D @$ R_ @n_)@ R$V RK6 Ie ! 4 @e@d ' * h Rh R_sI Z j z , J F " D e ' @f6 _ AfAe@d_ 2 RRR ( 0RkT (!0RlT (! %0X " _
0x12eb44…12ecd8 Dummy {f00=0x0042, f01=0x018e, f02=» : ( J F " D ("6 ( R,KW R-K ! R 2 RRRRAzT R ! '! ?R6 ( k lU 8 i " " $ & ) 5 i
0x12ecd8…12ee6c Dummy {f00=0x0042, f01=0x0190, f02=» h t u i ( x0 8 { J J F " D @&{ # R+P " + $ ( ( * ?R( $ 6 ( _W R%T ( * 2 ( RR)gL R " Z 0 J F " D '"( g " #L R$T
0x12ee6c…12f000 Dummy {f00=0x0042, f01=0x0190, f02=» ( & ( J F " D R&{ 1XF0X ! 0X mU_" m 50R {&* p!0X R $ '$( D0R $} | @ 8 0 & . @ J
0x12f000…12f194 (1, 148) Dummy {f00=0x006e, f01=0x018e, f02=» H L M ( T W 8 U H V i X [ h g x ] ' ^ b c j p v & J F " D @L2 RRRRRW
0x12f194…12f328 Dummy {f00=0x006e, f01=0x0190, f02=» $ , ( 8 " H J F " D 0R R2 R&| @zP R % @ Rh R$8R?R6 ?R0RN`a a bahNb# #P a% X & & 70 CONVERSION
0x12f328…12f4bc Dummy {f00=0x006e, f01=0x0190, f02=» & d $ & & $ 4 ( D P & ` $ n & ~ $ # & $ ' & $ * & $ . $ -
0x12f4bc…12f650 Dummy {f00=0x006e, f01=0x0190, f02=»* & $ 2 $ - ( ( 8 D & 71 T CONVERSION d $ 1 ~ & VIA $ 1 & DATA COMMN $ 1 (
0x12f650…12f7e4 Dummy {f00=0x006e, f01=0x018e, f02=» OTHER MEDIAz $ ( & ! 2 & 73 B " BATCH LINKING R $ "3 p ( # $ UNIT $ $3 & :U & % X " %i &
0x12f7e4…12f978 Dummy {f00=0x006e, f01=0x0190, f02=» $ ( ) NAME $ ) ( & : 8 & !A F & k Z ( h * t + BATCH $ + , NAME $ , & : & "A & l (
0x12f978…12fb0c Dummy {f00=0x006e, f01=0x0190, f02=» & e & # & * & BRUGERNAVN 8 & G P 0 AAAAAAAAAAAA9 b " 0 ' & 0 & KENDEORD & D 1 TTT9 " 1 & ( 2
0x12fb0c…12fca0 Dummy {f00=0x006e, f01=0x414c, f02=»& - 5 NAME $ 5 & : 0 & @ > & P ( ^ 6 * j & z & FETCHING FORMAT: & & FROM DISC.R & & @ O & U ( * %
0x12fca0…12fe34 (1, 149) Dummy {f00=0x0078, f01=0x2008, f02=» v L = KMD09 DATE = 810326 6876PACK NBR = 0001 ? ? k@ :@ ? `
0x12fe34…12ffc8 Dummy {f00=0x0078, f01=0x0190, f02=» 2 =TRANSMIT . & P* RET 4 =CUMPULSORY FIELD EMPTHY / P* RET 6 =BCD-FIELD OVERFLOW / > " P* RET 8 =EDIT BUFFER OVERFLOW / b P* / $ P* APPL = FIELD INTO BUFFER / 4 P* APPL = 1 FIELD INTO BUFFER, TRANSMIT BLOCK / $ P* APPL = 2 NO TRANS
0x12ffc8…13015c Dummy {f00=0x0078, f01=0x0190, f02=»ET GENERAL) / ` . P* FOLLOWING APPL ONLY USED IN BATCHHEADER 0 0 P* APPL = 13 EOR-CHAR AS END OF EACH RECORD 0 F J P* APPL = 14 CONT-CHAR IN END OF EACH DATA RECORD WHICH IS CONTINUED 0 z 0 P* APPL = 15 INSERT BACHNAME IN THIS FIELD 0 8 P* APPL = 16
0x13015c…1302f0 Dummy {f00=0x0078, f01=0x0190, f02=»D IS THE RECORD NUMBER FIELD 0 v J P* APPL = 3XXX THIS FIELD IS THE CONTINUATION SEQUENCE NUMBER FIELD 1 $ P* 1 r P* BIN4 = WORK ITEM 1 | P* BIN7 = MAX LENGTH 1 P* BIN8 = FIELD NUMBER 1 " P* BIN9 = INDEX TO EDIT BUFFER 1 " P* BIN13= DELETE
0x1302f0…130484 Dummy {f00=0x0078, f01=0x0190, f02=»STRING FOR DATE/TIME/CONVERTED BCD 1 ~ $ P* WORK(W15) = LENGTH OF HEADER 2 * * P* WORK(W16) = RECORD NUMBER POSITION 2 R ( P* WORK(W17) = RECORD NUMBER LENGTH 2 2 P* WORK(W18) = CONTINUATION SEQUENCE POSITION 2 0 P* WORD(W19) = CONTINUATION SEQUENCE L
0x130484…130618 Dummy {f00=0x0078, f01=0x018e, f02=» CBG CONT,W0,CON100 2 PCON090 3 P MOVE BPOOL(BIN9),=X'20' 3 * , P MOVE BCDI21(W4),=D'0' RESET SEQUENCE NO 3 J ( P MOVE BIN13,W0 RESET DELETE POINTER 3 z ( P MOVE BIN16,BIN13 LOAD EDIT POINTER 3 PCON100 3 P CLEAR FSUPR 3 P TBF BSUPR,CON105 3
0x130618…1307ac Dummy {f00=0x0078, f01=0x0190, f02=» 3 | P BOK CON130 4 P BN CONRET ALL FIELD DONE 4 & P B CONER1 COMPULSORY FIELD EMPTHY 4 > PCON130 4 h P GETCTL 0,VSEIND GET APPL 4 v P* 4 2 P CBL VSEIND,=W'1000',CON131 NORMAL APPL VALUE 4 6 P CBL VSEIND,=W'2000',APL1000 HANDLE RECORD HEADE
0x1307ac…130940 Dummy {f00=0x0078, f01=0x0190, f02=»CLEAR ERROR APPL 4 P B CON131 5 P* 5 * P* HANDLE RECORD HEADER: 5 4 4 P* APPL=1000, WHERE XXX=LENGTH OF RECORD HEADER 5 T PAPL1000 5 P SUB VSEIND,=W'1000' 5 8 P MOVE WORK(W15),VSEIND WORK(W15) = LENGTH OF HEADER 5 P B CON100 5 P*
0x130940…130ad4 (1, 150) Dummy {f00=0x00a7, f01=0x018e, f02=»L 1,BIN7 GET MAXL OF FIELD 5 0 P MOVE WORK(W17),BIN7 SET LENGTH OF RECORD NO 6 " * P SUB VSEIND,=W'2000' ADJUST APPL VALUE 6 V P B CON131 FURTHER HANDLING 6 P* 6 0 P* HANDLE POSITION AND LENGTH OF SEQUENCE NO 6 PAPL3000 6 < P MOVE WORK(W18),BIN1
0x130ad4…130c68 Dummy {f00=0x00a7, f01=0x018e, f02=» * P SUB VSEIND,=W'3000' ADJUST APPL VALUE 7 P B CON131 FURTHER HANDLING 7 2 P* 7 T P* 7 ^ PCON131 7 h P* 7 v P CBNE BTYPE,W3,CON150 7 P* DATA RECORD 7 * P IB VSEIND,CON132,CON100,CON135,CON140 7 PCON132 7 P B CON190 7 P*
0x130c68…130dfc Dummy {f00=0x00a7, f01=0x0190, f02=» 7 | P CLEAR FSUPR 8 P B CON190 8 P* 8 . P* 8 8 PCON150 8 B ( P* IN HEADER, SET GENERAL CONDITIONS 8 P 6 P IB VSEIND,CON152,CON100,CON155,CON160,CON152, C 8 | , P CON152,CON152,CON152,CON152,CON152, C 8 0 P CON152,CON152,CON165,CON170,CON1
0x130dfc…130f90 Dummy {f00=0x00a7, f01=0x0190, f02=» B CON100 8 P* 9 PCON160 9 P* GENERAL NO SUPPRESSION 9 * P CLEAR BSUPR 9 L P B CON100 9 ` P* 9 r PCON165 9 | P* EOR CHARACTER 9 P B CON100 9 P* 9 PCON170 9 P* CONTINUATION CHARACTER 9 * P SET BCONT INDICATE CONT. CH
0x130f90…131124 Dummy {f00=0x00a7, f01=0x0190, f02=»UB BIN4,BIN7 LENGTH FIELD 9 P SUB BIN4,BIN16 : " 6 P EDSUB BPOOL(BIN9),BIN16,FMTBATCH INSERT BATCHNAME : : P B CON260 : t P* : PCON180 : , P* FIELDS (STARTING WITH &) ARE NOT SPLIT : $ P CLEAR SPLITFL NOT NORMAL SPLIT : P B CON100 : P
0x131124…1312b8 Dummy {f00=0x00a7, f01=0x018e, f02=»E FIELD : x PCON195 ; P GETCTL 1,BIN7 GET MAXL ; P TSTCTL 0 TEST - ALPHA ; > P BZ CON200 BCD ; P ; r P* ALPHA ; z P ; * P MOVE BIN4,W188 GET EDIT BUFFER LENGTH ; * P SUB BIN4,BIN7 ADJUST WITH MAX LENGTH ; , P SUB BIN4,BIN16 ADJUST WIT
0x1312b8…13144c Dummy {f00=0x00a7, f01=0x018e, f02=» ; PCON200 < & P CBG BIN7,W21,CONER2 BCD-OVERFLOW < * P MOVE BIN4,W188 GET EDIT BUFFER LENGTH < @ * P SUB BIN4,BIN7 ADJUST WITH MAX LENGTH < n , P SUB BIN4,BIN16 ADJUST WITH EDIT POINTER < P BN CONER3 < P GETCTL 3,BIN4 GET SCHK < P CALL TEST
0x13144c…1315e0 Dummy {f00=0x00a7, f01=0x0190, f02=» P B CON280 = PCON210 = 2 P EDSUB BPOOL(BIN9),BIN16,FRMBCS EDIT 21 DIGITS = $ & P MOVE BIN4,W22 SET PICTURE LENGTH = Z ( P ADD BIN7,W1 ADJUST POINTER FOR SIGN = P B CON250 = P = PCON220 = P TBF FSUPR,CON230 = $ P EDSUB BPOOL(BIN9),BIN
0x1315e0…131774 (1, 151) Dummy {f00=0x00a8, f01=0x0190, f02=»Hm @ P&@jP A W3Ao ,P !_ g  L@mAo? H 0 Hm ! &@h@jP #W @fPO $0 TF 8 h ! !T #P ( -& Ub & ? Ub & @ .P )gC Ao? AzAzT @mA *P @ ? @ @m8 @xP 2 !! h ( & H #: W ? Im1I~ I & h ( & H I ) ?"I ) ?#I H
0x131774…131908 Dummy {f00=0x00a8, f01=0x0190, f02=»({ % H~ - !gC Az? @z? H~ C < I 0 ! W 0 ! W /8 0 ! 0$? Az % h ( & J K @o?(@m!gC C~8)?(@zC~8*?(?$Km Jz I gC T Io Ao #: _3Ao@ T / 2 %% + % # #g W ! #g #20 ! &_ I~ Jo K _@ @ !0$@o ( A P W @ 6 / A _ Hm 0 ! A %
0x131908…131a9c Dummy {f00=0x00a8, f01=0x0190, f02=»%% 10 ! !0$ (V ? ##2 2 2 322 1& _ Co<$Cm<$Cz8$0 ! 2 %% 4 !X b !U *8 0% ? h ! & ? C <$ h ( & H I ?0 g( " @oW $ 2 %% 5 ): @oA ?6C <$Hz @ T Cm<$Io I~ #V - ? @o@z Ub & 5 +@mA{ *V#( - 1 0 ! 0$ { &{ mU_"@{Ao?
0x131a9c…131c30 Dummy {f00=0x00a8, f01=0x0190, f02=»% !g2 @m?:?;@ _/0 + 0 , A~4 @~P + , 4 _ ; $ - ; Y i . & E 3 N + n | i Q m
0x131c30…131dc4 Dummy {f00=0x00a8, f01=0x0190, f02=» " ! I Y R *FTX J BC JC FTJBJD FETCHING FORMAT: FROM DISC. @ UF 0 % * & j j Ub & 5 +@mA{ *V#( - 1 0 ! 0$ { &{ mU_"@{Ao?
0x131dc4…131f58 Dummy {f00=0x00a8, f01=0x0190, f02=» !4 "4 #4 $4 4 @} 8 In06 W 0 ! WP0 ! WII~ 0 ! W?H 0 ! W50 !! W.@n6 0 ! W 0 ! I~ 0 ! W H 0 ! W 0 ! (0 : H~ ? 0% P : _ 0' P C{P A )? H ? 0(HoO !H~ 0) $ W 0) # ! 2 W 0 0 /1& _5K~|0 ! _
0x131f58…1320ec Dummy {f00=0x00a8, f01=0x0190, f02=»( 2" + " ( " # I ? & 0, P ? 0 Pm0* 0 -8 Wa0* 6 > W<( , ! :d # !_'0* P 0' P o8W o;d o "_HI 0* 2 W @ @ @ @ @h@j #U 0- ! Td$ + " , 0( %@|PI0' T /hZ " !T f ! j !! H{ ? 0' P 0. P H !?
0x1320ec…132280 Dummy {f00=0x00a8, f01=0x0190, f02=»88" .4 #H 0Hj 0 #T @m?#@hP !PP01 02 V 0 !_ $ + ?$I 03WL0' P 0 9%0 !01 02 T10' T2WO0 ! 04W #I{ H~ I K 0% 0(? A 0$P#:&;%Io 0. P H 2 ' ' ' ? JA J K{ 0* ?( !01 02 8 _^J #H 0' P 0. P T 2 ' 0' T 2 )
0x132280…132414 (1, 152) Dummy {f00=0x00aa, f01=0x018e, f02=»NL U P FMEND V P V PFDCERR FRMT V P FNL V 4 P FEOR V @ P FNL V N P FTEXT 'S[NDNING' V Z P FTEXT ' AVBRYTS' V t P FLINK HDR V P FEOR V P FNL V P FMEND V P V PFFDHDR FRMT V P FNL V P FEOR V P FNL V "
0x132414…1325a8 Dummy {f00=0x00aa, f01=0x018e, f02=» " P FTEXT 'FLOPPY DISC SKRIVNING' W P FTEXT ' KLAR' W * P FLINK HDR W @ P FEOR W R P FNL W ` P FMEND W l P W z PFFDERR FRMT W P FNL W P FEOR W P FNL W " P FTEXT 'FLOPPY DISC SKRIVNING' W P FTEXT ' AFBRYDES' W P FLINK HDR W
0x1325a8…13273c Dummy {f00=0x00aa, f01=0x0190, f02=» P FLINK HDR X P FMEND X P X $ PFLSEND FRMT X , P FNL X @ P FEOR X L P FNL X Z P FTEXT 'LISTNING KLAR' X f P FLINK HDR X P FEOR X P FNL X P FMEND X P X PFLSERR FRMT X P FNL X P FEOR X P FNL X P FTEXT '
0x13273c…1328d0 Dummy {f00=0x00aa, f01=0x0190, f02=»DATO: ' X P FMEL '99-99-99',DATE Y P FILLR ' ',4 Y . P FTEXT 'TID: ' Y B P FMEL '99-99-99',TIME Y X P FEOR Y v P FNL Y P FTEXT 'IND: ' Y P FMEL '99999',NUMBER Y P FTEXT ' UD: ' Y P FMEL '99999',BCDI21(W5) Y P FEOR Y P
0x1328d0…132a64 Dummy {f00=0x00aa, f01=0x0190, f02=»COPY STSAVE(W3) Y P FTAB 20 Z P FCOPY =C'FILE' Z ( P FILLR '-',1 Z @ P FCOPY =C'NAME' Z T P FILLR ':',1 Z l P FINP 32 Z P FCOPY STR8B Z P FNL Z P FCOPY =C'EXPIRATION DATE:' Z P FINP 32 Z P FCOPY STR6A Z P FNL Z ( P FCO
0x132a64…132bf8 Dummy {f00=0x00aa, f01=0x0190, f02=»32 Z P FCOPY STR2A [ P FNL [ P FKI 1 [ * P FCOPY HEX00 [ 8 P FMEND [ L P EJECT [ Z PFRMC99 FRMT [ h P FSL [ | P FLINK FFD999 [ P FMEND [ P [ PFFD001 FRMT [ P FCOPY =C'001' [ P FMEL '999999',DATE [ P FILLR ' ',60
0x132bf8…132d8c Dummy {f00=0x00aa, f01=0x0190, f02=» ',60 [ P FILLR ' ',62 P FMEND $ P EJECT 2 PFRMALP FRMT @ P FCOPY :FMTITEM T P FMEND l P z P PFRMBCD FRMT * P FMEL '999999999999999999999',:FMTITEM P FMEND P PFRMTCD FRMT * P FMEL 'TTTTTTTTTTT
0x132d8c…132f20 Dummy {f00=0x00aa, f01=0x4106, f02=» PFRMZCD FRMT ] , P FMEL 'BBBBBBBBBBBBBBBBBBBB9-',:FMTITEM ] PFRMBCS FRMT ] H , P FMEL '999999999999999999999-',:FMTITEM ] P FMEND ] P ] P ] PFRMTID FRMT ] P FMEL '999',BCD13A ] P FMEND ] P ] P ] P END ] @ ] TT
0x132f20…1330b4 (1, 153) Dummy {f00=0x00aa, f01=0x2008, f02=» ^ 0 & " ADD DEBIN2,W1 UPDATE FIELD NUMBER GETFLD 2,DEBIN2,DEBIN3 < BOK DEC130 BN DEC900 ALL FIELD DONE p & ! B DEC920 COMPULSORY FIELD EMPTHY DEC130 GETCTL 0,DEBIN5 GET APPL @ MOVE DEBINW1,DEBIN4 LOA
0x1330b4…133248 Dummy {f00=0x00aa, f01=0x018e, f02=» P FTEXT 'TID: ' G P FMEL '99-99-99',TIME G P FEOR G 8 P FNL G F P FTEXT 'IND: ' G R P FMEL '99999',NUMBER G h P FTEXT ' UD: ' G P FMEL '99999',BCDI21(W5) G P FEOR G P FNL G P FMEND G P EJECT G PFCAS02 FRMT G P F
0x133248…1333dc Dummy {f00=0x00aa, f01=0x0190, f02=» P FILLR '-',1 H P FCOPY =C'NAME' H P FILLR ':',1 H 0 P FINP 32 H D P FCOPY STR8B H T P FNL H h P FCOPY =C'EXPIRATION DATE:' H t P FINP 32 H P FCOPY STR6A H P FNL H ( P FCOPY =C'OLD DATA SET IDENTIFIER:' H P FINP 32 H P FCO
0x1333dc…133570 Dummy {f00=0x00aa, f01=0x0190, f02=»PY HEX00 H P FMEND I P EJECT I PFRMC99 FRMT I , P FSL I @ P FLINK FFD999 I L P FMEND I b P I p PFFD001 FRMT I x P FCOPY =C'001' I P FMEL '999999',DATE I P FILLR ' ',60 I P FILLR ' ',56 I P FMEND I P I PFFD999 F
0x133570…133704 Dummy {f00=0x00aa, f01=0x0190, f02=» PFRMALP FRMT J P FCOPY :FMTITEM J P FMEND J 0 P J > P J F PFRMBCD FRMT J N * P FMEL '999999999999999999999',:FMTITEM J b P FMEND J P J PFRMTCD FRMT J * P FMEL 'TTTTTTTTTTTTTTTTTTTT9',:FMTITEM J P FMEND J P J PFRMTCS FRM
0x133704…133898 Dummy {f00=0x00aa, f01=0x408c, f02=»,:FMTITEM J r P FMEND K P K P K ( PFRMTID FRMT K 0 P FMEL '999',BCD13A K D P FMEND K ^ P K l P K t P END K |@ K P FMEND J P J PFRMTCD FRMT J * P FMEL 'TTTTTTTTTTTTTTTTTTTT9',:FMTITEM J P FMEND J P J PFRMTCS FRM
0x133898…133a2c Dummy {f00=0x00aa, f01=0x2008, f02=» L 0 & " ADD DEBIN2,W1 UPDATE FIELD NUMBER GETFLD 2,DEBIN2,DEBIN3 < BOK DEC130 BN DEC900 ALL FIELD DONE p & ! B DEC920 COMPULSORY FIELD EMPTHY DEC130 GETCTL 0,DEBIN5 GET APPL @ MOVE DEBINW1,DEBIN4 LOA
0x133a2c…133bc0 Dummy {f00=0x00aa, f01=0x0190, f02=»{c? 8? Hq ` j`!! b'$`! _ ? %_5Aq_ : RF `* a!bR`1 a `1 a! a+ "%R? : !%RP RU `* a!b a 1R` `1 a! a+ ? ApWg RBbR(" 1bR* "cR? a!: jR$"a "cR: ca_0AqW3jRd" "'R< !`R< ja "R$ `!< a & `a_ %6c : b " ! d %d8 !? !'RP 5<
0x133bc0…133d54 (1, 154) Dummy {f00=0x00aa, f01=0x018e, f02=»BIN7 ADJUST WITH MAX LENGTH M , P SUB BIN4,BIN16 ADJUST WITH EDIT POINTER N $ P BN CONER3 N T P GETCTL 3,BIN4 GET SCHK N f P CALL TESTB,BIN4,W15 SIGN N P BZ CON220 NO N P TBF FSUPR,CON210 N P CBE FC,W9,CON205 N $ P EDSUB BPOOL(BIN9),BIN
0x133d54…133ee8 Dummy {f00=0x00aa, f01=0x001a, f02=» P X ` h p x x 'H
0x133ee8…13407c Dummy {f00=0x00aa, f01=0x0190, f02=» * P IDENT NYCONV REL=1.0,VER=1 820420/NJ P UPD 82-02-22/EV 2 P UPD 81-08-27/EV L P UPD 80-12-12/SHB f P UPD 80-07-14/JAER P DDUM DEDDIV P PDIV P ENTRY DECONV P P P EXT DEPOOL P EXT TESTB
0x13407c…134210 Dummy {f00=0x00aa, f01=0x0190, f02=» EXT GETFWD P EXT ADJUST P EXT FDIO ( P EJECT : P* H P* KEYTABLE R P* j PCLR EQU X'8F' CLEAR t PCAN EQU X'91' CANCEL PRET EQU X'98' RETURN PENT EQU X'8C' ENTER P* PKEYTAB KTAB CLR,CAN,RET,EN
0x134210…1343a4 Dummy {f00=0x00aa, f01=0x0190, f02=»PAR EQU X'00' P EJECT @ P* THIS MODULE TAKE CARES OF THE DIFFERENT CONVERTIONS- $ P* -METHODS h @ P* ONE OF THEM IS ALREADY PREPAIRED FOR YOUR PRINTOUT). 2 P* THE OTHER YOU HAVE TO CODE YOURSELVES. D P* FORM
0x1343a4…134538 Dummy {f00=0x00aa, f01=0x0190, f02=» = 2 DATACOMMUNICATION IN 8 P* = 3 CASETTE OUTPUT : 8 P* = 4 PRINTOUT LP/GP v 2 P* = 5 DISCFILE : P*
0x134538…1346cc Dummy {f00=0x00aa, f01=0x0190, f02=»= 8 FREEZE BATCHES ON USER FILE n 8 P* = 9 LISTING LP/GP ( 8 P* TYPE = TYPE OF HANDLING d . P* = 1 OPEN : P* = 2 BATCHHEAD-RECORD
0x1346cc…134860 Dummy {f00=0x00aa, f01=0x0190, f02=» = 5 CLOSE 4 P* RETCON = RETURN-CODE * , P* = 0 OK b > P* /= 0 ERROR MESSAGE-NUMBER F P* =-1 SKIP CURR BATC
0x134860…1349f4 (1, 155) Dummy {f00=0x00aa, f01=0x0190, f02=»T BATCH (CANCEL) D P* =-4 ABORT CONVERSION (RETURN) < P* =-5 DELETE THIS BATCH ` > P* =-6 GET CURRENT RECORD : P* INPUT VARIABLE: BIN4 = FC
0x1349f4…134b88 Dummy {f00=0x00aa, f01=0x0190, f02=»TA,DISCFD,FLOPPY,DELETE,FREEZE,LISTE PRECEIV , PDISCFD : PCASSET H PERROR V * P MOVE RETCON,W4 'FUNCTION NOT ALLOWED? d P B RETURN P* * P* THIS IS THE PRINTOUT FUNCTION P* PPRINTA : P IB TYPE,PR100,PR200
0x134b88…134d1c Dummy {f00=0x00aa, f01=0x0190, f02=»* PPR100 $ P PERF ATTDEV,BIN6 ATTACH DEVICE P BOK DECOOK @ P B RETURN T P EJECT f P* t P* ~ 4 P* PRINTOUT OF THE DIFFERENT RECORD TYPES P* PPR200 P EDWRT DEDSPRT,FCOUNT P BNOK PR298
0x134d1c…134eb0 Dummy {f00=0x00aa, f01=0x0190, f02=»UT DEVICE NOT OP....' x P B RETURN GO AND CLOSE P* < * P* CLOSE DEVICE = DETACH PRINTER F P* t PPR500 ~ P PERF DETPRT DETACH DEVICE P B RETURN P EJECT P* 8 P* THIS ROUTINE DELETE BATCHES ON THE USERF
0x134eb0…135044 Dummy {f00=0x00aa, f01=0x0190, f02=»(W8),W0,DEL110 NOT THE WHOLE FILE P MOVE DATE,HEX00 RESET DATE * PDEL110 N P B RETURN P EJECT n P* | . P* THIS ROUTINE FREEZE BATCHES ON USER FILE P* P PFREEZE 8 P IB TYPE,FRE100,FRE200,FRE300 OPEN BATCHHEAD DAT
0x135044…1351d8 Dummy {f00=0x00aa, f01=0x0190, f02=» PFRE300 P B DECOOK P* BALANCE RECORD ( PFRE400 @ P B DECOOK N P* CLOSE ` PFRE500 p P B DECOOK ~ P EJECT P* P* OK P* PDECOOK P MOVE RETCON,W0 PRETURN P RET P EJE
0x1351d8…13536c Dummy {f00=0x00aa, f01=0x0190, f02=» P* P* SEND SOF P* SEND '001'+DATE P* : P D PDC100 L P* Z P* BATCHHEAD RECORD d P* ~ PDC200 PDC300 P* P* TRANSM BLOCKS P* P P* P* SEND '999' P* SEND EOF P
0x13536c…135500 Dummy {f00=0x00aa, f01=0x0190, f02=» 6 P IB TYPE,LS100,LS200,LS300, OPEN,BATCHHEAD,DATA, C P LS400,LS500 BALANCE,CLOSE > P b PLS100 j P TBT LSBAB,LS170 x * P PERF GETBUF GET 3 CONSECUTIVE BUFFERS P B LS110 OK P B LSERR ERROR PLS110 ( P MOVE BCDI21(W5),=
0x135500…135694 (1, 156) Dummy {f00=0x00ae, f01=0x40b8, f02=»ESVCHM/=><DL!ASUFTCE ~ * & i +-*:;&V?'ZGRNX()MEVTFCAB/,LRAP & TXZY+S,.><0-VEX J & j * z @
0x135694…135828 Dummy {f00=0x00ae, f01=0x40fe, f02=» L H IDENT D:CB50 TRA 10.0 - - F1 O1111 REL 10.0 80-04-11,81-08-27,EV D:CB50 T D:CB50C f * & >0 0 0 z * & M U t ~ 0 = > @
0x135828…1359bc Dummy {f00=0x00ae, f01=0x4132, f02=» L H IDENT Z:TB20 TRA 10.0 - - F1 O1111 REL 10.0 80-04-11,81-08-27,EV Z:TB20 T Z:TB20T f & & z & & = & [ & y & *
0x1359bc…135b50 Dummy {f00=0x00ae, f01=0x4102, f02=» L H IDENT D:TB20 TRA 10.0 - - F1 O1111 REL 10.0 80-04-11,81-08-27,EV D:TB20 T D:TB20T f * & B z * & 0 0 0 " = ( . B @
0x135b50…135ce4 Dummy {f00=0x00ae, f01=0x0190, f02=» L H IDENT Z:TB30 TRA 10.0 - - F1 O1111 REL 10.0 80-04-11,81-08-27,EV Z:TB30 T Z:TB30T f * & z * & * & = &
0x135ce4…135e78 Dummy {f00=0x00ae, f01=0x4010, f02=» @ 0 TRA 10.0 - - F1 O1111 REL 10.0 80-04-11,81-08-27,EV Z:TB30 T Z:TB30T f * & z * & * & = &
0x135e78…13600c Dummy {f00=0x00ae, f01=0x4106, f02=» L H IDENT D:TB30 TRA 10.0 - - F1 O1111 REL 10.0 80-04-11,81-08-27,EV D:TB30 T D:TB30T f * & F @ B D F H z * & J L N P R T V @ = f F @
0x13600c…1361a0 Dummy {f00=0x00ae, f01=0x40e8, f02=» L H IDENT Z:TB40 TRA 10.0 - - F1 O1111 REL 10.0 80-04-11,81-08-27,EV Z:TB40 T Z:TB40T f * & z $ $ @ F @
0x1361a0…136334 (1, 157) Dummy {f00=0x00af, f01=0x4102, f02=» L H IDENT D:TB40 TRA 10.0 - - F1 O1111 REL 10.0 80-04-11,81-08-27,EV D:TB40 T D:TB40T f * & B z * & = B @
0x136334…1364c8 Dummy {f00=0x00af, f01=0x4182, f02=» L H IDENT Z:TB50 TRA 10.0 - - F1 O1111 REL 10.0 80-04-11,81-08-27,EV Z:TB50 T Z:TB50T f & z & & = & [ * & y * &
0x1364c8…13665c Dummy {f00=0x00af, f01=0x4106, f02=» L H IDENT D:TB50 TRA 10.0 - - F1 O1111 REL 10.0 80-04-11,81-08-27,EV D:TB50 T D:TB50T f * & F Q 0 [ z * & 0 0 ^ e f h n t = ~ F @
0x13665c…1367f0 Dummy {f00=0x00af, f01=0x4128, f02=» L H IDENT Z:TB60 TRA 10.0 - - F1 O1111 REL 10.0 80-04-11,81-08-27,EV ! Z:TB60 ! T Z:TB60T ! f * & ! z * & ! $ = ! T
0x1367f0…136984 Dummy {f00=0x00af, f01=0x40fe, f02=» L H IDENT D:TB60 TRA 10.0 - - F1 O1111 REL 10.0 80-04-11,81-08-27,EV " D:TB60 " T D:TB60T " f * & > " z * & < > F0 " = N " > " @ " T
0x136984…136b18 Dummy {f00=0x00af, f01=0x40d8, f02=» L H IDENT C:CB60 TRA 10.0 - - F1 O1111 REL 10.0 80-04-11,81-08-27,EV # C:CB60 # T C:CB60C # f & `@ @ # z # ( # ( # @ # = N " > " @ " T
0x136b18…136cac Dummy {f00=0x00af, f01=0x40d6, f02=» L H IDENT D:CB60 TRA 10.0 - - F1 O1111 REL 10.0 80-04-11,81-08-27,EV $ D:CB60 $ T D:CB60C $ f * & & $ z 0 $ & $ @ $ = N " > " @ " T
0x136cac…136e40 Dummy {f00=0x00af, f01=0x407c, f02=» L H IDENT DEDDIV TRA 10.0 - - F1 O1111 REL 10.0 80-04-11,81-08-27,EV % $$$TRA % T % f@ % x & $ z 0 $ & $ @ $ = N " > " @ " T
0x136e40…136fd4 (1, 158) Dummy {f00=0x00af, f01=0x2008, f02=» &
0x136fd4…137168 Dummy {f00=0x00af, f01=0x0190, f02=»FDWR56 NOT FOUND 6 P MOVE BIN15,DEBIN2 7 P B FDWR59 7 2 0 P* NORMAL SPLIT, USE COMPLETE AVAILABLE ROOM 7 D PFDWR57 7 x P MOVE BIN15,BIN4 7 P B FDWR59 7 ( P* NO OF CHARS, FIT IN AVAILABLE ROOM 7 PFDWR58 7 $ P MOVE BIN15,BIN16 SEND ALL CHA
0x137168…1372fc Dummy {f00=0x00af, f01=0x0190, f02=» OUTPUT BUFFER 7 l * P* BIN4 = NO OF CHARS IN OUTPUT BUFFER 8 P MOVE BIN4,BIN15 8 D P ADD BIN4,DEBIN3 ADD HEADER 8 P* 8 P MOVE DEBIN1,RECLGD 8 " P SUB DEBIN1,BIN4 NO OF BLANKS 8 B P XCOPY BPOOL(BIN10),BIN4,DEBIN1,BPOOL(BIN9),BIN16 MOVE BLANK
0x1372fc…137490 Dummy {f00=0x00af, f01=0x0190, f02=»10A,BCDI21(W5) CONVERT RECORD NO 8 " P MOVE DEBIN1,W10 LENGTH FIELD 9 ( * P SUB DEBIN1,WORK(W17) FIND START OF NO 9 N : P XCOPY BPOOL(BIN10),WORK(W16),WORK(W17),STRG10A,DEBIN1 9 | P* 9 PFDWR70 9 ( P* INSERT SEQUENCE NO - BCDI21(W4) 9 0 P CBE WORK(
0x137490…137624 Dummy {f00=0x00af, f01=0x0190, f02=» DEBIN1,WORK(W19) FIELD START OF NO 9 : P XCOPY BPOOL(BIN10),WORK(W18),WORK(W19),STRG10A,DEBIN1 : , P* : j PFDWR80 : t P* HANDLE END OF RECORD : 2 P CBG BIN16,BIN15,FDWR100 NO ROOM, CONTINUATION : P* INSERT EOR : P MOVE STR2A,=X'7F' EOR CHA
0x137624…1377b8 Dummy {f00=0x00af, f01=0x0190, f02=» CHAR NEEDED : x P TBF BCONT,FDWR150 ; P* CONTINUATION ; . P MOVE DEBIN1,RECLGD ; F P CBNE BIN4,DEBIN1,FDWR140 ; b P SUB BIN4,W1 ; P SUB BIN15,W1 ; PFDWR140 ; ( P MOVE STR2A,=X'21' CONTINUATION MARK ; ( P XCOPY BPOOL(BIN10),BIN4,W1,ST
0x1377b8…13794c Dummy {f00=0x00af, f01=0x0190, f02=»OVE CWFD,W0 ; 6 P DELETE BPOOL(BIN9),CWFD,BIN15 DELETE WHAT IS SEND < P SUB BIN16,BIN15 < N P MOVE BIN13,BIN16 < f P CMP VSEIND,W1 < $ P BE FDWR00 WRITE REST OF BUFFER < P RET 6 < P* < PFDWRBAL < 4 P MOVE BPOOL(BIN10),=X'00' INITIATE
0x13794c…137ae0 Dummy {f00=0x00af, f01=0x018e, f02=»RSEND < P* = P* = PFDWRSEND = " P MOVE REQFD,=W'128' = 2 P MOVE CWFD,W0 = N > P CALL FDIO,DSFD,X'06',BPOOL(BIN10),REQFD,CWFD WRITE BLOCKS = d PFDWRRET = P RET = PFDWR20 = P RET 2 = P PEND = P EJECT = P* = P* F
0x137ae0…137c74 (1, 159) Dummy {f00=0x00af, f01=0x0190, f02=» 6 P CALL FDIO,DSFD,X'B7',BPOOL(BIN10),REQFD,CWFD LOAD > P XSTAT DSFD,BIN4 > > P CALL TESTB,BIN4,W5 IBM > V P BZ FDLOA2 > v P MOVE BIN7,=X'000F' > P CALL MASK,BIN4,BIN7 > P BNOK FDLOA2 > P RET > PFDLOA2 > P MOVE CWFD,W7 HDR RECORD >
0x137c74…137e08 Dummy {f00=0x00af, f01=0x0190, f02=»* > 8 P* CONVERSI0N OF DATA ENTRY RECORDS TO BPOOL BUFFER ? P* RET =RECORD CONVERTED ? F P* RET 2 =TRANSMIT ? h & P* RET 4 =CUMPULSORY FIELD EMPTHY ? P* RET 6 =BCD-FIELD OVERFLOW ? " P* RET 8 =EDIT BUFFER OVERFLOW ? P* ? $ P* APPL
0x137e08…137f9c Dummy {f00=0x00af, f01=0x0190, f02=»= 3 SUPPRESS LEADING ZEROES (IF HEADER:SETR GENEREL) ? @ P* APPL = 4 LENGTH OF FIELD=MAXL (IF HEADER: SET GENERAL) @ > " P* LISTE: ALWAYS SET @ . P* FOLLOWING APPL ONLY USED IN BATCHHEADER @ 0 P* APPL = 13 EOR-CHAR AS END OF EACH RECORD @
0x137f9c…138130 Dummy {f00=0x00af, f01=0x0190, f02=» LISTE: ALWAYS CLEAR @ 0 P* APPL = 15 INSERT BACHNAME IN THIS FIELD A 8 P* APPL = 16 FIELDS (STARTING WITH &) ARE NOT SPLIT A R & P* LSTE: ALWAYS CLEAR A P* A 0 P* APPL = 1XXX XXX=LENGTH OF RECORD HEADER A : P* APPL = 2XXX T
0x138130…1382c4 Dummy {f00=0x00af, f01=0x0190, f02=»IN4 = WORK ITEM A P* BIN7 = MAX LENGTH B P* BIN8 = FIELD NUMBER B 4 " P* BIN9 = INDEX TO EDIT BUFFER B R " P* BIN13= DELETE START POINTER B x P* BIN16= EDIT POINTER B P* B 4 P* BIN15 = NO OF CHAR INSERTED IN OUTPUT RECORD B 8 P* STRG10A
0x1382c4…138458 Dummy {f00=0x00af, f01=0x0190, f02=»* WORK(W17) = RECORD NUMBER LENGTH B 2 P* WORK(W18) = CONTINUATION SEQUENCE POSITION C , 0 P* WORD(W19) = CONTINUATION SEQUENCE LENGTH C b 0 P* BCDI21(W4) = CONTINUATION SEQUENCE NUMBER C " P* BCDI21(W5) = RECORD NUMBER C P* C PCONV PROC CONT
0x138458…1385ec Dummy {f00=0x00af, f01=0x0190, f02=»OVE BIN13,W0 RESET DELETE POINTER C ( P MOVE BIN16,BIN13 LOAD EDIT POINTER D * PCON100 D V P CLEAR FSUPR D d P TBF BSUPR,CON105 D x P SET FSUPR D PCON105 D $ P ADD BIN8,W1 UPDATE FIELD NUMBER D " P CALL GETFWD,BIN7,2,BIN8,BIN4 D P CALL AD
0x1385ec…138780 Dummy {f00=0x00af, f01=0x0190, f02=»0,VSEIND GET APPL D P* E 2 P CBL VSEIND,=W'1000',CON131 NORMAL APPL VALUE E $ 6 P CBL VSEIND,=W'2000',APL1000 HANDLE RECORD HEADER E Z 2 P CBL VSEIND,=W'3000',APL2000 HANDLE RECORD NO E 4 P CBL VSEIND,=W'4000',APL3000 HANDLE SEQUENCE NO E $ P MOVE
0x138780…138914 (1, 160) Dummy {f00=0x0162, f01=0x0190, f02=» U P FNL V P FMEND V P V " PFDCERR FRMT V * P FNL V > P FEOR V J P FNL V X P FTEXT 'S[NDNING' V d P FTEXT ' AVBRYTS' V ~ P FLINK HDR V P FEOR V P FNL V P FMEND V P V PFFDHDR FRMT V P FNL V P FEOR V P
0x138914…138aa8 Dummy {f00=0x0162, f01=0x0190, f02=» FNL V " P FTEXT 'FLOPPY DISC SKRIVNING' W P FTEXT ' KLAR' W 2 P FLINK HDR W H P FEOR W Z P FNL W h P FMEND W t P W PFFDERR FRMT W P FNL W P FEOR W P FNL W " P FTEXT 'FLOPPY DISC SKRIVNING' W P FTEXT ' AFBRYDES' W P FLI
0x138aa8…138c3c Dummy {f00=0x0162, f01=0x0190, f02=»" W P FLINK HDR X P FMEND X P X * PFLSEND FRMT X 2 P FNL X F P FEOR X R P FNL X ` P FTEXT 'LISTNING KLAR' X l P FLINK HDR X P FEOR X P FNL X P FMEND X P X PFLSERR FRMT X P FNL X P FEOR X P FNL X P F
0x138c3c…138dd0 Dummy {f00=0x0162, f01=0x0190, f02=»TEXT 'DATO: ' X P FMEL '99-99-99',DATE Y P FILLR ' ',4 Y 4 P FTEXT 'TID: ' Y H P FMEL '99-99-99',TIME Y ^ P FEOR Y | P FNL Y P FTEXT 'IND: ' Y P FMEL '99999',NUMBER Y P FTEXT ' UD: ' Y P FMEL '99999',BCDI21(W5) Y P FEOR Y
0x138dd0…138f64 Dummy {f00=0x0162, f01=0x0190, f02=» P FCOPY STSAVE(W3) Z P FTAB 20 Z P FCOPY =C'FILE' Z . P FILLR '-',1 Z F P FCOPY =C'NAME' Z Z P FILLR ':',1 Z r P FINP 32 Z P FCOPY STR8B Z P FNL Z P FCOPY =C'EXPIRATION DATE:' Z P FINP 32 Z P FCOPY STR6A Z P FNL Z (
0x138f64…1390f8 Dummy {f00=0x0162, f01=0x0190, f02=» FINP 32 Z P FCOPY STR2A [ P FNL [ $ P FKI 1 [ 0 P FCOPY HEX00 [ > P FMEND [ R P EJECT [ ` PFRMC99 FRMT [ n P FSL [ P FLINK FFD999 [ P FMEND [ P [ PFFD001 FRMT [ P FCOPY =C'001' [ P FMEL '999999',DATE [ P FILLR '
0x1390f8…13928c Dummy {f00=0x0162, f01=0x018e, f02=»ILLR ' ',60 [ P FILLR ' ',62 P FMEND * P EJECT 8 PFRMALP FRMT F P FCOPY :FMTITEM Z P FMEND r P P PFRMBCD FRMT * P FMEL '999999999999999999999',:FMTITEM P FMEND P PFRMTCD FRMT * P FMEL 'TTTTT
0x13928c…139420 Dummy {f00=0x0162, f01=0x4124, f02=» P ] PFRMZCD FRMT ] , P FMEL 'BBBBBBBBBBBBBBBBBBBB9-',:FMTITEM ] P FMEND ] P P ] ^ PFRMBCS FRMT ] f , P FMEL '999999999999999999999-',:FMTITEM ] z P FMEND ] P ] P ] PFRMTID FRMT ] P FMEL '999',BCD13A ] P FMEND ] P ]
0x139420…1395b4 (1, 161) Dummy {f00=0x00b1, f01=0x4102, f02=» L H IDENT D:TB40 TRA 10.0 82-05-05 F1 O1111 REL 10.0 80-04-11,81-08-27,EV D:TB40 T D:TB40T f * & B z * & = B @
0x1395b4…139748 Dummy {f00=0x00b1, f01=0x4182, f02=» L H IDENT Z:TB50 TRA 10.0 82-05-05 F1 O1111 REL 10.0 80-04-11,81-08-27,EV Z:TB50 T Z:TB50T f & z & & = & [ * & y * &
0x139748…1398dc Dummy {f00=0x00b1, f01=0x4106, f02=» L H IDENT D:TB50 TRA 10.0 82-05-05 F1 O1111 REL 10.0 80-04-11,81-08-27,EV D:TB50 T D:TB50T f * & F Q 0 [ z * & 0 0 ^ e f h n t = ~ F @
0x1398dc…139a70 Dummy {f00=0x00b1, f01=0x4128, f02=» L H IDENT Z:TB60 TRA 10.0 82-05-05 F1 O1111 REL 10.0 80-04-11,81-08-27,EV ! Z:TB60 ! T Z:TB60T ! f * & ! z * & ! $ = ! T
0x139a70…139c04 Dummy {f00=0x00b1, f01=0x40fe, f02=» L H IDENT D:TB60 TRA 10.0 82-05-05 F1 O1111 REL 10.0 80-04-11,81-08-27,EV " D:TB60 " T D:TB60T " f * & > " z * & < > F0 " = N " > " @ " T
0x139c04…139d98 Dummy {f00=0x00b1, f01=0x40d8, f02=» L H IDENT C:CB60 TRA 10.0 82-05-05 F1 O1111 REL 10.0 80-04-11,81-08-27,EV # C:CB60 # T C:CB60C # f & `@ @ # z # ( # ( # @ # = N " > " @ " T
0x139d98…139f2c Dummy {f00=0x00b1, f01=0x40d6, f02=» L H IDENT D:CB60 TRA 10.0 82-05-05 F1 O1111 REL 10.0 80-04-11,81-08-27,EV $ D:CB60 $ T D:CB60C $ f * & & $ z 0 $ & $ @ $ = N " > " @ " T
0x139f2c…13a0c0 Dummy {f00=0x00b1, f01=0x407c, f02=» L H IDENT DEDDIV TRA 10.0 82-05-05 F1 O1111 REL 10.0 80-04-11,81-08-27,EV % $$$TRA % T % f@ % x & $ z 0 $ & $ @ $ = N " > " @ " T
0x13a0c0…13a254 (1, 162) Dummy {f00=0x00b1, f01=0x0190, f02=»NW2,FD350,FD360,FD170 CLR,CAN,RET P B FD350 ENT * PFD370 > " P PERF FDRVOL READ VOLUME LABEL L P B FD375 OK r P B FD360 ERROR PFD375 . P IB DEBINW2,FD380,FD360,FD170 CLR,CAN,RET P* ENT P PFD380 $ P PERF FD
0x13a254…13a3e8 Dummy {f00=0x00b1, f01=0x0190, f02=»TCON,=W'-6' GET CURRENT RECORD P B RETURN & P 8 PFDEOF05 @ P SET FDEOF INDICATE EOF P & P MOVE WORK(W14),BIN8 SAVE FIELD NO p P B FD360 P PFDEOF10 P CLEAR FDEOF * P MOVE BIN10,WORK(W13) GET BUFFER INDEX $ P MOV
0x13a3e8…13a57c Dummy {f00=0x00b1, f01=0x0190, f02=»,W0 > P CALL FDIO,DSFD,X'06',BPOOL(BIN10),REQFD,CWFD WRITE BLOCKS P B FD340 N P EJECT ^ PFD400 l P* BALANCE FORMAT z P B FD300 PFD500 * P MOVE BIN10,WORK(W13) GET BUFFER INDEX P TBT FDBAB,FD560 ABORT $ P MOVE
0x13a57c…13a710 Dummy {f00=0x00b1, f01=0x0190, f02=» FD570 OK P B FDERR ERR ! P B FD510 EOE ! & PFD510 ! : P MOVE REQFD,=W'128' ! H P MOVE CWFD,W7 ! d 8 P CALL FDIO,DSFD,X'B8',BPOOL(BIN10),REQFD,CWFD UNLOAD ! z PFD515 ! * P MOVE DEBINW4,=W'55' CHANGE FLOPPYDISK ! P PERF DERROR,KEYTAB !
0x13a710…13a8a4 Dummy {f00=0x00b1, f01=0x0190, f02=»5 ! " P PERF FDRVOL READ VOLUME LABEL " P B FD530 OK " 0 P B FD510 ERROR " D PFD530 " Z . P IB DEBINW2,FD535,FD510,FD170 CLR,CAN,RET " h P* ENT " PFD535 " $ P PERF FDWVOL WRITE VOLUME LABEL " P B FD540 OK " P B FD510 ERROR " P
0x13a8a4…13aa38 Dummy {f00=0x00b1, f01=0x0190, f02=»05 " PFD550 # P WAIT DSFD # P CLEAR FDBAB # * P MOVE CWFD,W7 HDR SECTOR # > P MOVE REQFD,=W'128' # ^ 8 P CALL FDIO,DSFD,X'B8',BPOOL(BIN10),REQFD,CWFD UNLOAD # z P CLEAR FDEOF RESET EOF # P MOVE CWFD,W7 # P MOVE REQFD,=W'128' # 8 P C
0x13aa38…13abcc Dummy {f00=0x00b1, f01=0x0190, f02=»AS BUFFERS # & P PERF DEPOOL,W6,BIN10,BIN4,STRG10A $ P B DECOOK $ < PFD560 $ N P MOVE STRG10A,HEX00 $ P GETTIME STRG10A $ x P MOVE TIME,STRG10A $ P EDWRT DEDSPRT,FFDERR $ P B FD550 $ P $ PFD570 $ P MOVE STRG10A,HEX00 $
0x13abcc…13ad60 Dummy {f00=0x00b1, f01=0x0190, f02=»* GETBUF GET TWO CONSECUTIVE BUFFERS $ P* % , P* BUFFER INDEX IN WORK(W13) % 6 P* % Z P % d PGETBUF PROC % l * P MOVE BIN10,W3 TOTAL NUMBER OF BUFFERS % , P MOVE BIN4,W3 NO. OF COSECUTIVE BUFFERS % @ P PERF DEPOOL,W2,BIN10,BIN4,STRG10A GET 3 C
0x13ad60…13aef4 (1, 163) Dummy {f00=0x00b1, f01=0x0190, f02=»WORKING BUFFER INDEX % z " P ADD BIN9,W1 INDEX EDIT BUFFER & 4 P MOVE BPOOL(BIN10),=X'00' RESET TRANSMIT BUFFER & B P RET & z PGETBU2 & P RET 2 & P PEND & P EJECT & P* & , P* FDRVOL READ VOLUME LABEL AND DISPLAY & P* & PFDRVOL
0x13aef4…13b088 Dummy {f00=0x00b1, f01=0x018e, f02=»FD,W7 & > P CALL FDIO,DSFD,X'91',BPOOL(BIN13),REQFD,CWFD READ (HDR1) ' P XSTAT DSFD,BIN4 ' P P MOVE BIN7,=X'086F' ' h P CALL MASK,BIN4,BIN7 ' P BNOK FDRV02 ' P MOVE BIN7,=W'66' ' 8 P XCOPY STR6A,W0,W6,BPOOL(BIN13),BIN7 EXPIRATION DATE ' 4
0x13b088…13b21c Dummy {f00=0x00b1, f01=0x0190, f02=» ' j P MOVE RECLGD,STR6B ( P MOVE BIN7,=W'45' ( " 6 P XCOPY STR2A,W0,W2,BPOOL(BIN13),BIN7 GET FD NUMBER ( < P ATTFMT FCAS02 ( v P SET DEPROMPT ( P DISPLAY 0,W1,W0 ( P THOME ( & P MOVE DEBINW3,W1 REQUESTED LENGTH ( 2 P NKI .NE,DEDSDYKB,STR1
0x13b21c…13b3b0 Dummy {f00=0x00b1, f01=0x0190, f02=»EL ( v P* ) P ) P ) PFDWVOL PROC ) $ P MOVE BIN7,=W'66' ) 8 & P MOVE BIN13,BIN10 GET BUFFER INDEX ) R ( P ADD BIN13,W2 ADJUST FOR READ BUFFER ) | * P EDSUB BPOOL(BIN13),BIN7,FRMVOL2 DATE ) P MOVE BIN7,W5 ) 0 P EDSUB BPOOL(BIN13),BIN7,FRM
0x13b3b0…13b544 Dummy {f00=0x00b1, f01=0x0190, f02=» ) l P MOVE CWFD,W7 * > P CALL FDIO,DSFD,X'95',BPOOL(BIN13),REQFD,CWFD WRITE (HDR1) * P XSTAT DSFD,BIN4 * ` P MOVE BIN7,=X'024F' * x P CALL MASK,BIN4,BIN7 * P * P BNOK FDWVO2 * & P ADD FDCNT,=D'1' UPDATE FD NUMBER * P MOVE CWFD,=W'26'
0x13b544…13b6d8 Dummy {f00=0x00b1, f01=0x0190, f02=»WVO2 * P RET 2 + P PEND + P EJECT + ( P* + 6 P* LSWRIT WRITE BLOCKS + @ P* + ^ P + h PLSWRIT PROC + p PLSWR00 + " P* BIN16 NO OF CHARS TO SEND + . P* BIN4 AVAILABLE SPACE IN OUTPUT BUFFER + P* DEBIN3 LENGTH OF HEADER +
0x13b6d8…13b86c Dummy {f00=0x00b1, f01=0x0190, f02=»RD LENGTH + v , P ADD BCDI21(W5),=D'1' ADD 1 TO RECORD NO , . P ADD BCDI21(W4),=D'1' ADD 1 TO SEQUENCE NO , B P CBE BCDI21(W4),=D'1',LSWR50 , t ( P* NOT FIRST TIME (SEQUENCE NO > 1) , , P* COPY HEADER PART, LENGTH IN WORK(W15) , , P SUB BIN4,WORK(W15)
0x13b86c…13ba00 Dummy {f00=0x00b1, f01=0x0190, f02=»PUT RECORD , n P MOVE DEBIN3,W0 START POINT - P* - 6 PLSWR55 - @ . P CBL BIN16,BIN4,LSWR58 ROOM FOR EVERYTING? - N P NO ROOM - $ P TBT SPLITFL,LSWR57 NORMAL SPLIT - P FIND PRECEDING & - , P MOVE DEBIN1,BIN4 START AT END OF RECORD - " P M
0x13ba00…13bb94 (1, 164) Dummy {f00=0x00b2, f01=0x0190, f02=» MATCH BPOOL(BIN9),DEBIN2,W1,STR2A,W0,W1 - P BNOK LSWR56 NOT FOUND . 0 P MOVE BIN15,DEBIN2 . N P B LSWR59 . h P*NORMAL SPLIT . z PLSWR57 . P MOVE BIN15,BIN4 . P B LSWR59 . ( P* NO OF CHARS, FIT IN AVAILABLE ROOM . PLSWR58 . $ P MOVE
0x13bb94…13bd28 Dummy {f00=0x00b2, f01=0x0190, f02=»S INTO REMAINING PART OF OUTPUT BUFFER . * P* BIN4 = NO OF CHARS IN OUTPUT BUFFER / . P MOVE BIN4,BIN15 / P ADD BIN4,DEBIN3 ADD HEADER / t P* / P MOVE DEBIN1,RECLGD / " P SUB DEBIN1,BIN4 NO OF BLANKS / B P XCOPY BPOOL(BIN10),BIN4,DEBIN1,BPOO
0x13bd28…13bebc Dummy {f00=0x00b2, f01=0x0190, f02=»H ZERO / j . P MOVE STRG10A,BCDI21(W5) CONVERT RECORD NO 0 " P MOVE DEBIN1,W10 LENGTH FIELD 0 @ * P SUB DEBIN1,WORK(W17) FIND START OF NO 0 f : P XCOPY BPOOL(BIN10),WORK(W16),WORK(W17),STRG10A,DEBIN1 0 P* 0 PLSWR70 0 ( P* INSERT SEQUENCE NO - BCDI
0x13bebc…13c050 Dummy {f00=0x00b2, f01=0x0190, f02=»ENGTH FIELD 0 ~ , P SUB DEBIN1,WORK(W19) FIELD START OF NO 1 : P XCOPY BPOOL(BIN10),WORK(W18),WORK(W19),STRG10A,DEBIN1 1 D P* 1 PLSWR80 1 P* HANDLE END OF RECORD 1 * P CBG BIN16,BIN15,LSWR100 NO ROOM, CONT 1 P* INSERT EOR 1 P B LSWRSEND 1
0x13c050…13c1e4 Dummy {f00=0x00b2, f01=0x0190, f02=»SEND 1 b P SUB BIN16,BIN15 2 P MOVE BIN13,BIN16 2 $ P CMP VSEIND,W1 2 > $ P BE LSWR00 WRITE RESET OF BUFFER 2 T P RET 6 2 | P* 2 PLSWRSEND 2 P WRITE DEDSPRT,BPOOL(BIN10) 2 PLSWRRET 2 P RET 2 P PEND 2 P EJECT 2 P* 2
0x13c1e4…13c378 Dummy {f00=0x00b2, f01=0x0190, f02=»ALL TESTB,BIN4,W2 EOE 2 P BZ FDWR10 3 P RET 4 END OF EXTENT 3 0 PFDWR10 3 L P MOVE BIN7,=X'024F' 3 Z P CALL MASK,BIN4,BIN7 3 v P BERR FDWR20 3 4 P IB BTYPE,FDWROP,FDWRHD,FDWRDATA,FDWRBAL,FDWRCL 3 PFDWROP 3 PFDWRCL 3 P B FDWR20 3
0x13c378…13c50c Dummy {f00=0x00b2, f01=0x0190, f02=»W0,BIN4,BPOOL(BIN9),W0 3 | P B FDWRSEND 4 P* 4 2 PFDWRDATA 4 < " P* BIN16 NO OF CHARS TO SEND 4 L . P* BIN4 AVAILABLE SPACE IN OUTPUT BUFFER 4 r P* DEBIN3 LENGTH OF HEADER 4 . P* BIN15 ACTUAL LENGTH OF INPUT DATA USED 4 P CMP BIN16,W0 4
0x13c50c…13c6a0 Dummy {f00=0x00b2, f01=0x0190, f02=» ADD BCDI21(W4),=D'1' ADD 1 TO SEQUENCE NO 4 P CBE BCDI21(W4),=D'1',FDWR50 5 2 ( P* NOT FIRST TIME (SEQUENCE NO > 1) 5 V , P* COPY HEADER PART, LENGTH IN WORK(W15) 5 , P SUB BIN4,WORK(W15) MAKE ROOM FOR HEADER 5 & P MOVE DEBIN3,WORK(W15) START POINT 5
0x13c6a0…13c834 (1, 165) Dummy {f00=0x00b4, f01=0x0190, f02=»ERF CONV,BIN4,FC % P B DECOOK ALL DONE & P B FD340 WRITE BLOCKS & 2 P B FD315 CUMP FIELD EMPTHY & P P B FD320 BCD FIELD OVERFLOW & r " P B FD320 EDIT BUFFER OVERFLOW & PFD315 & P MOVE RETCON,W5 & P B FDERRT & P & PFD320 & "
0x13c834…13c9c8 Dummy {f00=0x00b4, f01=0x0190, f02=»C,TYPE,RETCON & P B FD310 OK ' P B FD360 ERROR ' * P B FDEOF05 EOE ' @ * P MOVE BIN4,W1 CONTINUE IN SAME BUFFER ' V P B FD311 ' PFD350 ' P PERF FDLOAD ' P B FD370 OK ' P B FD360 ERROR ' PFD360 ' P MOVE REQFD,=W'128' '
0x13c9c8…13cb5c Dummy {f00=0x00b4, f01=0x0190, f02=» ' j P PERF DERROR,KEYTAB ( . P IB DEBINW2,FD350,FD360,FD170 CLR,CAN,RET ( $ P B FD350 ENT ( V PFD370 ( j " P PERF FDRVOL READ VOLUME LABEL ( x P B FD375 OK ( P B FD360 ERROR ( PFD375 ( . P IB DEBINW2,FD380,FD360,FD170 CLR,CAN,RET ( P
0x13cb5c…13ccf0 Dummy {f00=0x00b4, f01=0x018e, f02=» P TBF FDEOF,FD340 NOT EOF ) * P MOVE RETCON,=W'-6' GET CURRENT RECORD ) $ P B RETURN ) R P ) d PFDEOF05 ) l P SET FDEOF INDICATE EOF ) | & P MOVE WORK(W14),BIN8 SAVE FIELD NO ) P B FD360 ) P ) PFDEOF10 ) P CLEAR FDEOF ) * P MOVE
0x13ccf0…13ce84 Dummy {f00=0x00b4, f01=0x0190, f02=» ) l P MOVE REQFD,=W'128' * P MOVE CWFD,W0 * $ > P CALL FDIO,DSFD,X'06',BPOOL(BIN10),REQFD,CWFD WRITE BLOCKS * : P B FD340 * | P EJECT * PFD400 * P* BALANCE FORMAT * P B FD300 * PFD500 * * P MOVE BIN10,WORK(W13) GET BUFFER IND
0x13ce84…13d018 Dummy {f00=0x00b4, f01=0x0190, f02=» * l PFD505 + P***PERF FDWRIT + P B FD570 OK + , P B FDERR ERR + @ P B FD510 EOE + T PFD510 + h P MOVE REQFD,=W'128' + v P MOVE CWFD,W7 + 8 P CALL FDIO,DSFD,X'B8',BPOOL(BIN10),REQFD,CWFD UNLOAD + PFD515 + * P MOVE DEBINW4,=W'55' C
0x13d018…13d1ac Dummy {f00=0x00b4, f01=0x0190, f02=» B FD525 OK + P B FD510 ERROR , PFD525 , * " P PERF FDRVOL READ VOLUME LABEL , 8 P B FD530 OK , ^ P B FD510 ERROR , r PFD530 , . P IB DEBINW2,FD535,FD510,FD170 CLR,CAN,RET , P* ENT , PFD535 , $ P PERF FDWVOL WRITE VOLUME LABEL ,
0x13d1ac…13d340 Dummy {f00=0x00b4, f01=0x0190, f02=»L(BIN10),REQFD,CWFD WRITE BLOCKS , v P B FD505 - ( PFD550 - 8 P WAIT DSFD - F P CLEAR FDBAB - X P MOVE CWFD,W7 HDR SECTOR - l P MOVE REQFD,=W'128' - 8 P CALL FDIO,DSFD,X'B8',BPOOL(BIN10),REQFD,CWFD UNLOAD - P CLEAR FDEOF RESET EOF - P MOVE
0x13d340…13d4d4 (1, 166) Dummy {f00=0x00b4, f01=0x0190, f02=»,DETACH,BIN4 - P PERF DETPRT . P* RELEAS BUFFERS . ( & P PERF DEPOOL,W6,BIN10,BIN4,STRG10A . @ P B DECOOK . j PFD560 . | P MOVE STRG10A,HEX00 . P GETTIME STRG10A . P MOVE TIME,STRG10A . P EDWRT DEDSPRT,FFDERR . P B FD550 . P .
0x13d4d4…13d668 Dummy {f00=0x00b4, f01=0x0190, f02=» . P PEND / P EJECT / P* / $ ( P* GETBUF GET TWO CONSECUTIVE BUFFERS / . P* / Z P* BUFFER INDEX IN WORK(W13) / d P* / P / PGETBUF PROC / * P MOVE BIN10,W3 TOTAL NUMBER OF BUFFERS / , P MOVE BIN4,W3 NO. OF COSECUTIVE BUFFERS /
0x13d668…13d7fc Dummy {f00=0x00b4, f01=0x0190, f02=»VE BUFFER INDEX / x . P MOVE BIN9,BIN10 LOAD WORKING BUFFER INDEX 0 " P ADD BIN9,W1 INDEX EDIT BUFFER 0 J 4 P MOVE BPOOL(BIN10),=X'00' RESET TRANSMIT BUFFER 0 p P RET 0 PGETBU2 0 P RET 2 0 P PEND 0 P EJECT 0 P* 0 , P* FDRVOL READ VOL
0x13d7fc…13d990 Dummy {f00=0x00b4, f01=0x0190, f02=»IN13,W2 ADJUST FOR READ BUFFER 0 P MOVE CWFD,W7 1 & > P CALL FDIO,DSFD,X'91',BPOOL(BIN13),REQFD,CWFD READ (HDR1) 1 < P XSTAT DSFD,BIN4 1 ~ P MOVE BIN7,=X'086F' 1 P CALL MASK,BIN4,BIN7 1 P BNOK FDRV02 1 P MOVE BIN7,=W'66' 1 8 P XCOPY STR6A
0x13d990…13db24 Dummy {f00=0x00b4, f01=0x0190, f02=» 1 p ( P XCOPY STR6B,W1,W5,BPOOL(BIN13),BIN7 2 P MOVE RECLGD,STR6B 2 4 P MOVE BIN7,=W'45' 2 N 6 P XCOPY STR2A,W0,W2,BPOOL(BIN13),BIN7 GET FD NUMBER 2 h P ATTFMT FCAS02 2 P SET DEPROMPT 2 P DISPLAY 0,W1,W0 2 P THOME 2 & P MOVE DEBINW3,W1 REQ
0x13db24…13dcb8 Dummy {f00=0x00b4, f01=0x0190, f02=» 2 P* 3 P* FDWVOL WRITE VOLUME LABEL 3 P* 3 6 P 3 @ P 3 H PFDWVOL PROC 3 P P MOVE BIN7,=W'66' 3 d & P MOVE BIN13,BIN10 GET BUFFER INDEX 3 ~ ( P ADD BIN13,W2 ADJUST FOR READ BUFFER 3 * P EDSUB BPOOL(BIN13),BIN7,FRMVOL2 DATE 3 P MOVE
0x13dcb8…13de4c Dummy {f00=0x00b4, f01=0x0190, f02=» 3 f ( P MOVE REQFD,=W'128' REQUESTED LENGTH 4 P MOVE CWFD,W7 4 4 > P CALL FDIO,DSFD,X'95',BPOOL(BIN13),REQFD,CWFD WRITE (HDR1) 4 J P XSTAT DSFD,BIN4 4 P MOVE BIN7,=X'024F' 4 P CALL MASK,BIN4,BIN7 4 P 4 P BNOK FDWVO2 4 & P ADD FDCNT,=D'1'
0x13de4c…13dfe0 Dummy {f00=0x00b4, f01=0x0190, f02=»N13),REQFD,CWFD REWIND 4 r P RET 5 PFDWVO2 5 * P RET 2 5 8 P PEND 5 F P EJECT 5 T P* 5 b P* LSWRIT WRITE BLOCKS 5 l P* 5 P 5 PLSWRIT PROC FC,TYPE,RETCON 5 P PERF BAWRIT,FC,TYPE,RETCON 5 P RET 5 P RET 2 5 P RET 4 5
0x13dfe0…13e174 (1, 167) Dummy {f00=0x013a, f01=0x0190, f02=» 5 v PFDWR00 6 P WAIT DSFD 6 P XSTAT DSFD,BIN4 6 ( P CALL TESTB,BIN4,W2 EOE 6 @ P BZ FDWR10 6 ` P RET 4 END OF EXTENT 6 r PFDWR10 6 P MOVE BIN7,=X'024F' 6 P CALL MASK,BIN4,BIN7 6 P BERR FDWR20 6 4 P IB BTYPE,FDWROP,FDWRHD,FDWRDATA
0x13e174…13e308 Dummy {f00=0x013a, f01=0x0190, f02=»UTPUT BUFFER 6 l P MOVE BIN4,RECLGD 7 . P XCOPY BPOOL(BIN10),W0,BIN4,BPOOL(BIN9),W0 7 . P PERF FDSEND 7 ` P RET 7 t P RET 2 7 PFDWRBAL 7 4 P MOVE BPOOL(BIN10),=X'00' INITIATE OUTPUT BUFFER 7 P EDIT BPOOL(BIN9),FFD999 7 P MOVE BIN4,RECLGD
0x13e308…13e49c Dummy {f00=0x013a, f01=0x018e, f02=»,RETCON 7 | P RET 8 PFDWR20 8 P RET 2 8 * P RET 4 8 8 P RET 6 8 F P B FDWR00 REPEAT 8 T P PEND 8 l P EJECT 8 z P* 8 P* FDLOAD LOAD FD PROCEDURE 8 P* 8 P 8 P 8 PFDLOAD PROC 8 P MOVE CWFD,W7 HDR RECORD 8 P MOV
0x13e49c…13e630 Dummy {f00=0x013a, f01=0x0190, f02=» P BZ FDLOA2 9 P MOVE BIN7,=X'000F' 9 P CALL MASK,BIN4,BIN7 9 2 P BNOK FDLOA2 9 N P RET 9 b PFDLOA2 9 n P MOVE CWFD,W7 HDR RECORD 9 | P MOVE REQFD,=W'128' 9 8 P CALL FDIO,DSFD,X'B8',BPOOL(BIN10),REQFD,CWFD UNLOAD 9 P RET 2 9 P PEND
0x13e630…13e7c4 Dummy {f00=0x013a, f01=0x018e, f02=»PLAY 0,W1,W0 9 P THOME : & P MOVE DEBINW3,W1 REQUESTED LENGTH : " 2 P NKI .NE,DEDSDYKB,STR1A,KEYTAB,DEBINW3,DEBINW2 : L P RET : PDCRV02 : P RET 2 : P PEND : P EJECT : P* : P* DCSGON SEND SIGNON : P* : P* BRUGERNAVN B
0x13e7c4…13e958 Dummy {f00=0x013a, f01=0x0190, f02=» P PERF EXCHAN DCEXCHANGE ; P RET ; $ P RET 2 ; 0 P PEND ; > P EJECT ; L P* ; Z P* BAWRIT WRITE BLOCKS ; d P* ; P ; PBAWRIT PROC FC,TYPE,RETCON ; PBAWR00 ; " P* BIN16 NO OF CHARS TO SEND ; . P* BIN4 AVAILABLE SPACE IN O
0x13e958…13eaec Dummy {f00=0x013a, f01=0x018e, f02=»T NODATA=NOWRITE ; ( P MOVE BIN4,RECLGD SET RECORD LENGTH < , P ADD BCDI21(W5),=D'1' ADD 1 TO RECORD NO < D . P ADD BCDI21(W4),=D'1' ADD 1 TO SEQUENCE NO < t P CBE BCDI21(W4),=D'1',BAWR50 < ( P* NOT FIRST TIME (SEQUENCE NO > 1) < , P* COPY HEADER PAR
0x13eaec…13ec80 Dummy {f00=0x013a, f01=0x0190, f02=» PBAWR50 = 0 P* FIRST OUTPUT RECORD FOR THIS INPUT RECORD = P MOVE DEBIN3,W0 START POINT = F P* = j PBAWR55 = t . P CBL BIN16,BIN4,BAWR58 ROOM FOR EVERYTING? = P NO ROOM = $ P TBT SPLITFL,BAWR57 NORMAL SPLIT = P FIND PRECEDING & = ,
0x13ec80…13ee14 (1, 168) Dummy {f00=0x013a, f01=0x0190, f02=»,W0,BAWR57 NO & = P MOVE DEBIN2,DEBIN1 > , P MATCH BPOOL(BIN9),DEBIN2,W1,STR2A,W0,W1 > 4 P BNOK BAWR56 NOT FOUND > d P MOVE BIN15,DEBIN2 > P B BAWR59 > P*NORMAL SPLIT > PBAWR57 > P MOVE BIN15,BIN4 > P B BAWR59 > ( P* NO OF CHAR
0x13ee14…13efa8 Dummy {f00=0x013a, f01=0x0190, f02=»,BIN15,BPOOL(BIN9),W0 COPY FIRST > v 6 P* MOVE BLANKS INTO REMAINING PART OF OUTPUT BUFFER ? ( * P* BIN4 = NO OF CHARS IN OUTPUT BUFFER ? b P MOVE BIN4,BIN15 ? P ADD BIN4,DEBIN3 ADD HEADER ? P* ? P MOVE DEBIN1,RECLGD ? " P SUB DEBIN1,BIN4 NO OF
0x13efa8…13f13c Dummy {f00=0x013a, f01=0x0190, f02=»21(W5) ? v 0 P CBE WORK(W17),W0,BAWR70 SKIP IF LENGTH ZERO @ . P MOVE STRG10A,BCDI21(W5) CONVERT RECORD NO @ B " P MOVE DEBIN1,W10 LENGTH FIELD @ t * P SUB DEBIN1,WORK(W17) FIND START OF NO @ : P XCOPY BPOOL(BIN10),WORK(W16),WORK(W17),STRG10A,DEBIN1 @ P*
0x13f13c…13f2d0 Dummy {f00=0x013a, f01=0x0190, f02=»21(W4) CONVERT SEQUENCE NO @ ~ " P MOVE DEBIN1,W10 LENGTH FIELD A " , P SUB DEBIN1,WORK(W19) FIELD START OF NO A H : P XCOPY BPOOL(BIN10),WORK(W18),WORK(W19),STRG10A,DEBIN1 A x P* A PBAWR80 A P* HANDLE END OF RECORD A * P CBG BIN16,BIN15,BAWR100 NO
0x13f2d0…13f464 Dummy {f00=0x013a, f01=0x0190, f02=»,W1,STR2A,W1 INSERT EOR A x P* FLOPPY DISK B P B BAWRSEND B 6 P* B J PBAWR100 B T P* B d P IB FC, C B n P DCWR105, SEND BATCH C B P BAWR105, DUMMY C B P BAWR105, DUMMY C B P BAWR105, DUMMY C B P BAWR105, DUMMY C B " P
0x13f464…13f5f8 Dummy {f00=0x013a, f01=0x0190, f02=»WR105 B P PERF DCSEND C P B BAWR105 C " P* C 4 PFDWR105 C > ( P* CHECK IF CONTINUATION CHAR NEEDED C N P TBF BCONT,FDWR150 C z P* CONTINUATION C P MOVE DEBIN1,RECLGD C P CBNE BIN4,DEBIN1,FDWR140 C P SUB BIN4,W1 C P SUB BIN15
0x13f5f8…13f78c Dummy {f00=0x013a, f01=0x0190, f02=»F FDSEND C P B BAWR105 D P* D " PLSWR105 D , P PERF LSSEND D < P B BAWR105 D P P* D b PBAWR105 D l P MOVE CWFD,W0 D | 6 P DELETE BPOOL(BIN9),CWFD,BIN15 DELETE WHAT IS SEND D P SUB BIN16,BIN15 D P MOVE BIN13,BIN16 D P CMP VSEIN
0x13f78c…13f920 Dummy {f00=0x013a, f01=0x0190, f02=»BATCH C D P BAWR111, DUMMY C E P BAWR111, DUMMY C E * P BAWR111, DUMMY C E D P BAWR111, DUMMY C E ^ P BAWR112, FD C E x P BAWR111, DUMMY C E P BAWR111, DUMMY C E P BAWR111 LISTE E P* E PBAWR111 REPEAT INSIDE E P B
0x13f920…13fab4 (1, 169) Dummy {f00=0x013b, f01=0x0190, f02=» C E P DCWR205, SEND BATCH C F P BAWR205, DUMMY C F * P BAWR205, DUMMY C F D P BAWR205, DUMMY C F ^ P BAWR205, DUMMY C F x " P FDWR205, FLOPPY CONVERSION C F P BAWR205, DUMMY C F P BAWR205, DUMMY C F P LSWR205 LISTING F P B
0x13fab4…13fc48 Dummy {f00=0x013b, f01=0x0190, f02=» F PLSWR205 G P PERF LSSEND G P B BAWR205 G , P* G > PBAWR205 G H PBAWRRET G X P RET G h P PEND G t P EJECT G PLSSEND PROC G ( P INSRT BPOOL(BIN10),W0,W2,INSERT,W0 G P MOVE DEBIN1,RECLGD G P ADD DEBIN1,W2 G & P WRITE
0x13fc48…13fddc Dummy {f00=0x013b, f01=0x0190, f02=»REQFD,=W'128' G P MOVE CWFD,W0 H 2 P CALL FDIO,DSFD,X'06',BPOOL(BIN10),REQFD,CWFD H , P RET H b P PEND H n P EJECT H | PDCSEND PROC FC,TYPE,RETCON H P* H P* SEND DCDATA H 6 P IB BTYPE,DCSNDON,DCSNDST,DCSNDDA,DCSNDSL,DCSNDOF H P*
0x13fddc…13ff70 Dummy {f00=0x013b, f01=0x0190, f02=» P PERF EXCHAN I P B DCSNDOK OK, SEND, NO ROOM I P PERF TERMIN NOK I < P B DCSNDNOK I T PDCSNDDA2 ROOM FOR MORE I h P EDSUB DCBUF,REQDC,SNDFRM5 I 6 P XCOPY DCBUF,REQDC,BIN4,BPOOL(BIN10),W0 COPY DATA I " P ADD REQDC,BIN4 SET NEW LENGTH I
0x13ff70…140104 Dummy {f00=0x013b, f01=0x0190, f02=» I ( P PERF EXCHAN ALREADY DATA IN BUFFER J P B DCSND4 SEND THEM J 4 P SEND PREV AS DATA J P P PERF TERMIN FILL AGAIN J l $ P B DCSNDNOK SEND AS NEW TYPE???? J PDCSND4 J P MOVE BTYPE,TYPE RESET BTYPE J P EDSUB DCBUF,REQDC,SNDFRM5 J 0 P
0x140104…140298 Dummy {f00=0x013b, f01=0x0190, f02=» J P B DCSNDNOK K P* K PDCSNDOK K & P RET K 6 PDCSNDNOK K B P RET 2 K R P PEND K ` P EJECT K n P* K | P* EXCHAN K 6 P* DCEXCHANGE AND CHECK RESPONSE DEPENDING ON TYPE K " P* OF DATA, HEAD, DATA, BALANCE K P* K PEXCHAN P
0x140298…14042c Dummy {f00=0x013b, f01=0x0190, f02=»DCWRK,=W'600' TIME OUT K & P DSC1 DSDCFD,STIMO,DCWRK TIME OUT L P WRITE DSDCFD,DCBUF,REQDC L H P BNOK EXCHNOK L j & P MOVE REQDC,REQLEN SET MAX LENGTH L P MOVE DCWRK,=W'600' TIME OUT L & P DSC1 DSDCFD,STIMO,DCWRK TIME OUT L P READ DSDCFD,DCB
0x14042c…1405c0 Dummy {f00=0x013b, f01=0x0190, f02=», C L P EXCHANDA, C M P EXCHANSL, C M " P EXCHANOF M 8 P* M J PEXCHANON AFTER SIGN ON M T P PERF WRDC PRINT ANSWER M t $ P MOVE STR8A,=C'DFH3504' LOOK FOR M " P MOVE BIN7,W0 CORRECT RESPONSE M ( P MATCH DCBUF,BIN7,REQDC,STR8A,W0,W7 M
0x1405c0…140754 (1, 170) Dummy {f00=0x00ac, f01=0x0190, f02=»4 4 4 4 0X 0X 0R "P 4 L0R h R & 8 R H ( Z j T z J F " D R=6 . W3 L j R4 4 La F j R4 R 4 4 0
0x140754…1408e8 Dummy {f00=0x00ac, f01=0x0002, f02=»
0x1408e8…140a7c Dummy {f00=0x00ac, f01=0x0060, f02=» SKF TRA NYCONV SCR " TRA DCCONV . SCR @ ASG /E0,DK,TEST L PNOD R d PINC DE40ST r PINC DE50ST PINC DE60ST PINC DE70ST PNOD R PINC NYCONV PNOD R PINC DCCONV PINC DEPROC
0x140a7c…140c10 Dummy {f00=0x00ac, f01=0x2008, f02=» TRA NYCONV SCR " TRA DCCONV . SCR @ ASG /E0,DK,TEST L PNOD R d PINC DE40ST r PINC DE50ST PINC DE60ST PINC DE70ST PNOD R PINC NYCONV PNOD R PINC DCCONV PINC DEPROC
0x140c10…140da4 Dummy {f00=0x00ac, f01=0x0190, f02=» A !0R 0R P :R?R0X % L>% h & 8 J ) l 1 ~ : J F " D L % L % L! "W- L / A _= 0 0X 1 LW 2 0X 3 LW ( # D H E
0x140da4…140f38 Dummy {f00=0x00ac, f01=0x0190, f02=» [ e e ] e ^ e . _ e > ` e N a s ^ b u n c } ~ d J F " D @ 2 RRRRWJA WF@ WB2 RRRRRRRRRRRRRRRRW-A _ ) @ _ _ ) A _ &
0x140f38…1410cc Dummy {f00=0x00ac, f01=0x0190, f02=» 2 - 1 * 5 : J F " D R 0X 0R /P%H ) m F WBm FW m F 6 !W H ) J + / 3 / J F " D m F W m FW m F 5 f ()
0x1410cc…141260 Dummy {f00=0x00ac, f01=0x0190, f02=»& & * & NUMMER: 9999 0 " gU D & T & b & p ( ~ & ( 999999 " SU (
0x141260…1413f4 (1, 171) Dummy {f00=0x0040, f01=0x40b8, f02=»ESVCHM/=><DL!ASUFTCE ~ * & i +-*:;&V?'ZGRNX()MEVTFCAB/,LRAP & TXZY+S,.><0-VEX J & j * z @
0x1413f4…141588 Dummy {f00=0x0040, f01=0x40fe, f02=» L H IDENT D:CB50 TRA 10.0 83-02-23 F1 O1111 REL 10.0 80-04-11,83-02-23,EV D:CB50 T D:CB50C f * & >0 0 0 z * & M U t ~ 0 = > @
0x141588…14171c Dummy {f00=0x0040, f01=0x4132, f02=» L H IDENT Z:TB20 TRA 10.0 83-02-23 F1 O1111 REL 10.0 80-04-11,83-02-23,EV Z:TB20 T Z:TB20T f & & z & & = & [ & y & *
0x14171c…1418b0 Dummy {f00=0x0040, f01=0x4102, f02=» L H IDENT D:TB20 TRA 10.0 83-02-23 F1 O1111 REL 10.0 80-04-11,83-02-23,EV D:TB20 T D:TB20T f * & B z * & 0 0 0 " = ( . B @
0x1418b0…141a44 Dummy {f00=0x0040, f01=0x0190, f02=» L H IDENT Z:TB30 TRA 10.0 83-02-23 F1 O1111 REL 10.0 80-04-11,83-02-23,EV Z:TB30 T Z:TB30T f * & z * & * & = &
0x141a44…141bd8 Dummy {f00=0x0040, f01=0x4010, f02=» @ 0 TRA 10.0 83-02-23 F1 O1111 REL 10.0 80-04-11,83-02-23,EV Z:TB30 T Z:TB30T f * & z * & * & = &
0x141bd8…141d6c Dummy {f00=0x0040, f01=0x4106, f02=» L H IDENT D:TB30 TRA 10.0 83-02-23 F1 O1111 REL 10.0 80-04-11,83-02-23,EV D:TB30 T D:TB30T f * & F @ B D F H z * & J L N P R T V @ = f F @
0x141d6c…141f00 Dummy {f00=0x0040, f01=0x40e8, f02=» L H IDENT Z:TB40 TRA 10.0 83-02-23 F1 O1111 REL 10.0 80-04-11,83-02-23,EV Z:TB40 T Z:TB40T f * & z $ $ @ F @
0x141f00…142094 (1, 172) Dummy {f00=0x0040, f01=0x4102, f02=» L H IDENT D:TB40 TRA 10.0 83-02-23 F1 O1111 REL 10.0 80-04-11,83-02-23,EV D:TB40 T D:TB40T f * & B z * & = B @
0x142094…142228 Dummy {f00=0x0040, f01=0x018e, f02=» L H IDENT Z:TB50 TRA 10.0 83-02-23 F1 O1111 REL 10.0 80-04-11,83-02-23,EV Z:TB50 T Z:TB50T f & z & & = & [ * & y * &
0x142228…1423bc Dummy {f00=0x0040, f01=0x401a, f02=» @ 0 83-02-23 F1 O1111 REL 10.0 80-04-11,83-02-23,EV Z:TB50 T Z:TB50T f & z & & = & [ * & y * &
0x1423bc…142550 Dummy {f00=0x0040, f01=0x4106, f02=» L H IDENT D:TB50 TRA 10.0 83-02-23 F1 O1111 REL 10.0 80-04-11,83-02-23,EV ! D:TB50 ! T D:TB50T ! f * & F Q 0 [ ! z * & 0 0 ^ e f h n t ! = ~ ! F ! @ !
0x142550…1426e4 Dummy {f00=0x0040, f01=0x4128, f02=» L H IDENT Z:TB60 TRA 10.0 83-02-23 F1 O1111 REL 10.0 80-04-11,83-02-23,EV " Z:TB60 " T Z:TB60T " f * & " z * & " $ = " T
0x1426e4…142878 Dummy {f00=0x0040, f01=0x40fe, f02=» L H IDENT D:TB60 TRA 10.0 83-02-23 F1 O1111 REL 10.0 80-04-11,83-02-23,EV # D:TB60 # T D:TB60T # f * & > # z * & < > F0 # = N # > # @ # T
0x142878…142a0c Dummy {f00=0x0040, f01=0x0190, f02=» L H IDENT C:CB60 TRA 10.0 83-02-23 F1 O1111 REL 10.0 80-04-11,83-02-23,EV $ C:CB60 $ T C:CB60C $ f & `@ @ $ z & $ & = $ & [ $ & y $ & $ & $ & $
0x142a0c…142ba0 Dummy {f00=0x0040, f01=0x4048, f02=» $ % % % 2@ % D3,EV $ C:CB60 $ T C:CB60C $ f & `@ @ $ z & $ & = $ & [ $ & y $ & $ & $ & $
0x142ba0…142d34 (1, 173) Opaque[0x194]
0x142d34…142ec8 # DirEnt {nam=»OBDIR «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1890, f03=0x0000}
0x142d34…142ec8 IdxSect {
0x142d34…142ec8 f00 = 0x00c4 // 0x142d34 @0x0
0x142d34…142ec8 f01 = 0x0010 // 0x142d36 @0x2
0x142d34…142ec8 gno = [ // 0x142d38 @0x4
0x142d34…142ec8 [0x00]: C0x00c4.0x2.0
0x142d34…142ec8 [0x01]: C0x00c4.0x3.0
0x142d34…142ec8 [0x02]: C0x00c5.0x0.0
0x142d34…142ec8 [0x03]: C0x00c5.0x1.0
0x142d34…142ec8 [0x04]: C0x00c5.0x2.0
0x142d34…142ec8 [0x05]: C0x00c5.0x3.0
0x142d34…142ec8 [0x06]: C0x00c6.0x0.0
0x142d34…142ec8 [0x07]: C0x00c8.0x1.0
0x142d34…142ec8 ]
0x142d34…142ec8 }
0x142ec8…14305c Dummy {f00=0x00c4, f01=0x000c, f02=»830225 > w wB60C DE70ST g 830225 $$$TRA7 DE70ST DEAP7A ATTDB DEANOKT DEAOK0 DECLRA4 DECLRS1 DECONV1 DEDISC0 DELASTV DEOPBC DEPMSK7 DEPOOL DEPRUT DERECS DERR DERROR EMPTYT GETINDD OPCLT RESTOR T:ATTF4 T:DISP1 T:GETF1 T:T
0x14305c…1431f0 Dummy {f00=0x00c4, f01=0x0190, f02=» .T:AT10 830225 T:AT10A T:DT10 D:CB10 U:CB10 D:CB20 C:CB20 D:CB30 C:CB30 D:CB40A C:CB40A D:CB503 C:CB50F D:TB20 Z:TB20. D:TB30- Z:TB30 D:TB40 Z:TB40 D:TB50 Z:TB50 D:TB10 Z:TB10 D:DB10A Z:TB10A D:DB203 Z:TB10F D:DB30 Z:TB10. D:T
0x1431f0…143384 Dummy {f00=0x00c4, f01=0x0190, f02=»D20 T:AT10 :A 6U:BTAB 830225 U:BTABB U:CB10 :C ,S:BTAB 830225 S:BTABB :B ,Z:TB10 830225 Z:TB10T ,D:TB10 830225 D:TB10T :T ,D:DB10 830225 D:DB10D > ,
0x143384…143518 Dummy {f00=0x00c4, f01=0x0190, f02=» ,D:CB10 830225 D:CB10C : ,C:CB20 830225 C:CB20C $ ,D:CB20 830225 D:CB20C B ,C:CB30 830225 C:CB30C 8 ,D:CB30 830225 D:CB30C F ,C:CB40 830225 C:CB40C
0x143518…1436ac Dummy {f00=0x00c4, f01=0x0190, f02=»0C > ,Z:TB20 830225 Z:TB20T ,D:TB20 830225 D:TB20T B ,D:TB30 830225 D:TB30T F ,Z:TB40 830225 Z:TB40T $ ,D:TB40 830225 D:TB40T B ,Z:TB50 830225
0x1436ac…143840 Dummy {f00=0x00c4, f01=0x0190, f02=»25 $$$TRAD COND M DEDISCR RELEAST RETURNO 7 SCHPOO STRT01 WAITR d CHANFCM CLSBTHR DELBTCA DELFMTT DELJOBS DELTBL DEPOOL DLCURRd ENTFMTA ENTJOB0 ENTSYSF ENTTBL GETFMT. GETJOB- GETSYSM GETTBLR GTNEXTA GTPREVT NEXFMTS NEXJOB NXBTH NXJOB
0x143840…1439d4 (1, 174) Dummy {f00=0x00c4, f01=0x0190, f02=» $$$TRAA CLSBTH DISUD DLCURRR # DLRCCHS ` FREESP - GTNEXTO GTPREVA OFRSP HRDR RDACC RDDSW S RECURRW REFSP RFRSP HWRD WRDSD _ WRFSP WRIACC` WRICUR- W WRTCO CONDE DEPOOLR GETFRER MASKA READDKD RETURNC SETFRER SETOCC T:SWIT
0x1439d4…143b68 Dummy {f00=0x00c4, f01=0x0190, f02=»IND COND- DEDISC1 DEPOOLL DISU DLRCCH1 EMPTYT FREESPM GETINDX NOFFREO NXPRFMP OPENF REFSP RELEAS RETURNC RFRSP SFMTCH T:SWITD WAIT1 WRFSP DKRUT3 8 830225 $$$TRAD ALGOF DELTBLA o ENTSYS1 ENTTBL1 ; GETFMT1 GETSYS- GETTBLD N
0x143b68…143cfc Dummy {f00=0x00c4, f01=0x0190, f02=»DKRUT4 ? 830225 $$$TRA DELBTCR DELJOBR ENTJOBH GETJOB1 6 NEXJOB. NXBTH 4 NXJOB 2 OPNEBC OPNNBCG PREJOBX READJBH SCHJOBN CONDT DEPOOLL DISU DLRCCHH EMPTYTO FREESPX RDACC RDDSH RELEAS2 RETURN RFRSP SCHPOOP SFMTCH T:SWITH WAITH
0x143cfc…143e90 Dummy {f00=0x00c4, f01=0x0190, f02=»PPLD DEFINDA - DEPMSKK DEPRUT DETCHK DETPRTS & PTSDE ATTBUF CHANFCP CONDD DE10ST- DE20STK DE30STU DE40STT DE50ST DE60STS DE70STE DEAP1AA DEAP2AD DEAP3Aj DEAP5A. DEAP7AK DECLRA DERRF GETINDD GETVOL- MSKOUTK OPCLS POOLA RESTOR5 SAVES T:ABORS
0x143e90…144024 Dummy {f00=0x00c4, f01=0x0190, f02=»TRAN DECLRA DECLRDD DECLRNC DECLRS DERR ADJUSTN ATTPRTA CANC DEAPPL8 DEFORC1 DEGEN DELAST1 DELOCKE DENDUP DENVALR DERRORC DESTATD DETCHK DETPRT DEVERI EMPTYTN FORCEDA GETFWDD GETGEND GETVALD MASKD T:DISPD T:DUPL T:DYKI T:EDFLR T:EDWRC
0x144024…1441b8 Dummy {f00=0x00c4, f01=0x0190, f02=»830225 $$$TRAN DENT01 CLEARBN DEACC DECLRA DECLRD7 DECLRN1 DECLRS DEDISC1 DELAST2 DEPOOL DEPRUT DERECS DERR DERROR EMPTYT RESTOR SETB T:ATTFN T:DISPD T:EDWRD T:ERASD T:GETAD T:GETFD T:THOMD DENT03 } 830225 $$$TRAN D
0x1441b8…14434c Dummy {f00=0x00c4, f01=0x0190, f02=» TESTB ` NDEPOOL 830225 $$$TRAP DEPOOL CMPINDP GETINDA SETB @ DE10ST 830225 $$$TRA1 DE10ST DEAP1A M DE11ST1 DE12STA DE14ST0 DE15STF DEANOK DEAOK0. DECLRA- DECOMP DEPMSK1 DEPOOL DEPRUT DERR RESTOR T:ATT
0x14434c…1444e0 Dummy {f00=0x00c4, f01=0x0190, f02=»25 $$$TRA1 hA20 CANC11C / CANC121 2 DE12ST1 WRIT12 G DECLRA1 DEDISCA DEPOOL0 DERR0 ENT12 RESTORL T:ATTF0 t DE1201 830225 $$$TRA1 ENT12 hA20 ATTDB ATTWB CANC110 CANC12F CLEARB DECLRN. DEDISC- DEPOOL DERR DERROR FMOVE RES
0x1444e0…144674 (1, 175) Dummy {f00=0x00c5, f01=0x0190, f02=» $ |DE15ST 830225 $$$TRA1 DE15ST ATTWB DECLRNT DEPOOL DERR- OPCL T:ATTFR T:DISP T:ERAS1 T:THOM DE20ST 830225 $$$TRA2 DE20ST DEAP2A S CMPIND2 CNTNUMA DE21ST0 DE23STF DE24ST DEANOK. DEAOK0- DEAOK4 DECLRA2
0x144674…144808 Dummy {f00=0x00c5, f01=0x0190, f02=»C ATTDB ATTPRTT ATTWB DEDISC- DEFDSC1 DEPOOLL DERROR0 DETPRT EMPTYT FCODE FEDIT FLINK FMOVE MTEXT PRFGUF RESTOR T:ATTF T:DISPA T:GETAA T:GETFD UPDBINF G @DEATTF 830225 $$$TRAA DEATTF T:ATTFA DE23ST 830225
0x144808…14499c Dummy {f00=0x00c5, f01=0x0190, f02=»F T:DISP T:GETFA DE24ST 830225 $$$TRA2 DE24ST ATTDB DECLRAT DEDISC DEPOOL0 DERR1 DERRORL FEDIT RESTOR1 T:ATTF T:DISP T:GETF nDE30ST 830225 $$$TRA3 DE30ST DE31ST3 DECLRAA DEPMSK0 DEPRUTF DERR1 RESTO
0x14499c…144b30 Dummy {f00=0x00c5, f01=0x0190, f02=»R DERROR EMPTYT3 T:ATTF T:DISP T:ERAS T:GETF TESTB DE40ST 830225 $$$TRA4 DE40ST DECLRA4 DECLRNA DECLRS0 DENT01F DEOPBC DEPMSK. DEPRUT- DERRS DERROR OPCL T:ATTF T:GETA T:GETF DE20FS 830225 $$$TRAF
0x144b30…144cc4 Dummy {f00=0x00c5, f01=0x0190, f02=» DERROR FMOVE LINIT T:DISPT T:ERASI WCNTRLK e DEUNPF 830225 $$$TRAU DEUNPF DEUNPLF FEDIT G ADJUSTU BINCONA FMOVE GETFWD0 NOPOOL1 RCNTRL1 T:DISP0 T:GETC T:SWIT T:TSTCP hDEPRFG 830225 $$$TRAP PRFGUF DERRO
0x144cc4…144e58 Dummy {f00=0x00c5, f01=0x0190, f02=»RA EMPTYT0 FACC9 FCOPY FDUPL FGEN.hFKI FMELI hFNL FTABF FTEXT FVALT NOPOOLT T:DISP T:ERAS T:SWIT UPDBOL @DECVRT 830225 $$$TRAC BINCON CONNUM @ @ DE50ST 830225 $$$TRA5 DE50ST DEAP5A ATTDB ATTWB DEANOK. D
0x144e58…144fec Dummy {f00=0x00c5, f01=0x0190, f02=»TTF1 T:DISPL T:DSC00 T:ERAS T:GETF TESTB DE60ST ( 830225 $$$TRA6 DE60ST DECLRA6 DECLRNA DENT010 DEOPBCF DERR1 DERROR1 OPCL0 T:ATTF T:GETA T:GETF pDE80ST > 830225 $$$TRA8 DE80ST DEAP8A 0 DEANOK8 DEAOK0A
0x144fec…145180 Dummy {f00=0x00c5, f01=0x0190, f02=»:EDWR1 T:ERAS0 T:GETA T:NKI T:SETCO T:XSTA DERECS T 830225 $$$TRAR DERECS DEREFO w ATTDB ATTWB DEDISC. DEPOOL- DEREC21 MSKOUTL OFRSP RESTOR1 T:ATTF T:DISPF T:THOM TESTB UPDBIN UPDBOL DEREC2 _ 830225 $$$TRAR
0x145180…145314 (1, 176) Dummy {f00=0x00c5, f01=0x0190, f02=»B T:GETF TESTB UPDBINT UPDBOL O ^DEFDSC j 830225 $$$TRAF DEFDSC ATTPRTF CANCT DEAPPL DEATTF0 DEFGTC1 DELOCK1 DEPOOL0 DERROR DESTAT DETPRT DEUNPF DEUNPL EMPTYT FDIR hFNLhFSL MASK MTEXT NOPOOLT T:DISP T:DUPL0 T:DYKI1 T:EDFL1
0x145314…1454a8 Dummy {f00=0x00c5, f01=0x0190, f02=»ACCU x 830225 $$$TRAA DEACC SETERR ADJUSTA CMPINDA DEFIND0 DENVALF EMPTYT GETACC. GETFWD- MSKOUT T:GETA DEGENE } 830225 $$$TRAG DEGEN ADJUSTG CMPINDA DEFIND0 DENVALF EMPTYT GETFWD. GETGEN- MSKOUT T:ERAS T:GETA
0x1454a8…14563c Dummy {f00=0x00c5, f01=0x0190, f02=» I n PDESTAT 830225 $$$TRAS DESTAT DESTAU TESTB UPDBINT J ASSRUT 830225 ATTWB I:EVA0V ATTDB CHANFC` $ T:FDSP SAVEY 6 RESTOR L GETFREA n I:RT1 SETFREA SETOCC UPDBOLN UPDBIN SET
0x14563c…1457d0 Dummy {f00=0x00c5, f01=0x0190, f02=»GEN @ GETDUPV D GETIND H CMPIND b WRITDK x READDK ~ CLOSEF OPENF POOLA @ P:MTAB GETFWD ~ T:GRFC T:GETF( ADJUST ^CDVRUT 830225 CDVDK CDV110 CDV111 CDV10 I:EVA0 I:RT1 VDATC
0x1457d0…145964 Dummy {f00=0x00c5, f01=0x0190, f02=»1T T:READA T:XSTA0 TESTB ' . HDEAPPU 830225 $$$TRAA DEAPPU DEDISCA EMPTYTA V 6T:DD20 830225 T:DD20D DCTASK * ,D:CB60 830225 D:CB60C & .T:AD20 830225 T:AD20A " T:DD20 D:CB10
0x145964…145af8 Dummy {f00=0x00c5, f01=0x0190, f02=»U40 D:DU50. Z:DU50- D:DU60A Z:DU60A D:DU703 Z:DU70F D:DU80 Z:DU80. D:DU90- Z:DU90 D:CB60 C:CB60 Q b ,Z:DU10 830225 Z:DU10D ,D:DU10 830225 D:DU10D :D ,Z:DU20 830225 Z:DU20D ,D:DU20
0x145af8…145c8c Dummy {f00=0x00c5, f01=0x0190, f02=» 830225 Z:DU40D ,D:DU40 830225 D:DU40D :D ,Z:DU50 830225 Z:DU50D ,D:DU50 830225 D:DU50D :D ,Z:DU60 830225 Z:DU60D ,D:DU60 830225 D:DU60D :D
0x145c8c…145e20 Dummy {f00=0x00c5, f01=0x0190, f02=» ,D:DU80 830225 D:DU80D :D ,Z:DU90 830225 Z:DU90D ,D:DU90 830225 D:DU90D :D PFDIO 830225 FDIOY T:FDSP I:EVA0 T:SCW2 T:IO3 P rDEVGAC 830225 $$$TRAV CNT
0x145e20…145fb4 (1, 177) Dummy {f00=0x00c5, f01=0x0190, f02=»830225 $$$TRAN DENVAL ADJUSTN ATTDB ATTWB CLEARB- CMPIND1 DEAPPUL DECOMP0 DEDISC DEEDIT DEFIND DEPOOL EMPTYT GETFWD GETIND GETVAL MSKOUTN SETBB T:GETAC T:GETCC T:GETFD T:TSTCD TESTB TYPET ZFMOVE 830225 FMOVE I:EVA
0x145fb4…146148 Dummy {f00=0x00c5, f01=0x0190, f02=»830225 ICLEAR I:EVA0 I:RT1 $ >EMPTYT 830225 EMPTYT I:EVA0 I:RT1 < T:STIN 830225 STRIN1 T:STEV T:RNOK T:LOFS I:EVA0 T:LOPS I:ER17 T:CLMI I:ERR2 I:MOV T:GRFC T:ROK
0x146148…1462dc Dummy {f00=0x00c5, f01=0x0190, f02=» JT:STEV 830225 T:STEV T:GRFC I:EVA0 I:ERR2 < T:EDFL 830225 T:EDFL T:PM1 T:PM2 T:CASP T:DUPX T:GRFC T:CLRD T:SCUW T:IOER T:BELL T:CLR1 T:CLR2 T:CLIT T:EKEY T:DY
0x1462dc…146470 Dummy {f00=0x00c5, f01=0x0190, f02=» T:IOWR T:CLIT T:LOFS I:EVA0 T:LOPS T:CLMI T:PM1 @ T:GRFC I:ERR2 I:ERR5 T:PM2 T:UPDF 830225 T:UPDF T:GRFC I:ER14 T:LOFS I:EVA0 T:LOPS I:ERR2 I:MOV T:RCR T:REWR T:RCTS `
0x146470…146604 Dummy {f00=0x00c5, f01=0x0190, f02=» T:GETC 830225 T:GETC T:GRFC I:ER14 I:EVA0 I:ERR2 I:RT1 R dT:GETA 830225 T:GETA T:GRFC I:EVA0 I:ERR2 T:RNOK T:ROK T:RCR 0 JT:TSTC 830225 T:TSTC T:GRFC I:ER14 T:RTES
0x146604…146798 Dummy {f00=0x00c5, f01=0x0190, f02=» T:TABE T:SCR2 T:TABC T:TABN x T:DISP 830225 T:PRIN T:FDSP T:EDWI T:GRFC T:GTIP T:DISP T:ERAS " T:GTIT I:ER15 I:ER14 T:TABD T:TABC T:RNOK I:RT1 T:CLDY T:WRDY T:EDIO v T:GE
0x146798…14692c Dummy {f00=0x00c5, f01=0x0190, f02=» T:REWR 830225 T:IOWR T:SCUW T:CLRD * T:REWR 0 T:CASP N T:LOFS I:EVA3 I:EPIC T:LOPS I:EVA0 I:ECPY I:EVI @T:DEDT 830225 I:EVNO I:ESKI I:EVA0 I:EBRI I:EBRB I:EBR I:ECWC
0x14692c…146ac0 Dummy {f00=0x00c5, f01=0x0190, f02=» T:ENIN T:LOPS T:EDWF I:ER16 T:SCR2 . T:SCUR T:TABN T:RCR T:ENLI 830225 I:EVNO I:ECPY I:EPIC I:ETXT I:ETAB I:EBRI I:EBRB I:EBR I:EOR I:EXIT I:ECW I:EFLA T:PINP T:PKI I:EFIL I:E
0x146ac0…146c54 (1, 178) Dummy {f00=0x00c5, f01=0x0190, f02=» T:PKI T:PINP T:GRFC I:ETAB I:EVIN I:ECTR T:EVOU T:TINP T:TKI I:ER16 T:ENIN T:ENI I:EXIT T:WRDY T:CLMI I:EVA0 T:CLDY T:ENIN 830225 T:ENIN T:ENI T:LOFS I:EGTB T:WRDY I:EVA
0x146c54…146de8 Dummy {f00=0x00c5, f01=0x0190, f02=»S T:SCUR T:WRDY & ,T:CLMI 830225 T:CLMI ( T:ATTF 830225 T:DETF T:ATTF I:EVA6 I:FFSN T:ROK ( T:RCR * I:RT1 T:RCTS 6 T:RTES : T:RNOK < T:GRFC @ T:WRDY H T:EDIO T:CLDY
0x146de8…146f7c Dummy {f00=0x00c5, f01=0x0190, f02=»0 DCREAD T:DCR1 DCWRTE T:DCW1 DCEXCH T:DCE1 6T:SWI0 " 830225 T:SWIT SWITCH JT:TEI0 # 830225 T:TEST TESTIO T:ABOR ABORT LT:CLO0 $ 830225 T:SETT SETTIM T:GET
0x146f7c…147110 Dummy {f00=0x00c5, f01=0x0190, f02=»T:DC ' 830225 T:DCRE T:FDSP T:DCR1 T:DCWR T:DCW1 T:EDIO I:ERR T:IO2 T:DCEX 2 T:DCE1 6 I:EVA0 4T:SWI ) 830225 T:SWIT I:RT1 ^T:TEI * 830225 T:TEST T:FDSP I:RT1 T:A
0x147110…1472a4 Dummy {f00=0x00c5, f01=0x0190, f02=»ASK I:EVA0 I:RT1 I:ERR ( zT:SCD - 830225 T:ACTV P:BAS I:ERR4 I:NTPB T:BAT T:RSTR L I:EVA0 T:PAUS l I:RT1 ~ RT:UNUS / 830225 T:UNUS I:ERR4 P:MTAB I:RT1 T:UERR ,T:EXIT 1
0x1472a4…147438 Dummy {f00=0x00c5, f01=0x0190, f02=» 830225 T:GETI I:EVA0 I:RT1 I:ERR . T:DM 4 830225 T:OPEN T:FDSP T:WRIO T:IO2 T:CLOS . T:COMM @ I:EVA0 I:RT1 T:RSTA X T:SCW2 T:IO3 j ~T:DMR 6 830225 T:DREA T:REAX T:SCW2
0x147438…1475cc Dummy {f00=0x00c5, f01=0x0190, f02=» T:SCW2 T:DREW T:IWRI , T:CREW 0 T:IREW > T:IO5 jT:DMDI : 830225 T:DDIS T:FDSP T:SCW2 T:IO3 T:CDIS T:IDIS $ T:WRIX H rT:DMPO ; 830225 T:DPOS T:FDSP T:SCW2 T:GTBY T:IO4 T:I
0x1475cc…147760 Dummy {f00=0x00c5, f01=0x0190, f02=»0 T:SREA B T:READ B T:REAX J I:ER13 T:DSC0 x T:DSC1 T:DSC2 T:XSTA T:WAIT T:MWAI T:IO1 < T:IO2 @ T:IO3 D T:IO4 H I:ER19 T:IO5 Z T:IORE ^ T:GCW2 T:GTCW I:RT1 T:IOEN T:EDWR I:EDW T:EDWE
0x147760…1478f4 (1, 179) Dummy {f00=0x00c6, f01=0x0190, f02=»:FML I:ER1A T:GTBY 2 T:SCW2 T:DSCX R I:EVA2 I:ERR2 T:SCW0 T:KIA D 830225 T:KIA T:NKIA T:ABUF T:KIPR T:LSEG T:IORE I:ERR9 I:ER1B T:KIAA T:KIAC ,T:ABUF G 830225 T:ABUF
0x1478f4…147a88 Dummy {f00=0x00c6, f01=0x0190, f02=» T:LOPS I:ERR9 I:ERRA I:FML I:EVTO I:EVI I:EVB T PI:ADS M 830225 I:ADD I:SUB I:ERR2 I:ERR1 I:CPA l <I:CMP P 830225 I:CMP I:ERR1 I:CPA x *I:CPA Q 830225 I:CPA
0x147a88…147c1c Dummy {f00=0x00c6, f01=0x0190, f02=»:MOV I:NTFA I:SUB I:ADD I:SH1L z I:DIV X 830225 I:DIV I:ERR2 I:ERR1 I:ERR9 I:MOV I:NTFA I:SUB I:CPA I:SH1L I:ADD I:SH1R 6 ,I:NTF 830225 I:NTFA 8 I:EDT ] 830225 I:EVT
0x147c1c…147db0 Dummy {f00=0x00c6, f01=0x0190, f02=» I:EINH I:EKIH I:EDSK z I:EDT I:ED1 I:EDW I:EVA6 I:EFLA 4 T:LSEG I:ERR9 I:EXIT z P:MTAB I:FFSN P:BAS I:ETAB I:ETXT I:ECPY I:EXPY * I:ECTR < I:ESL F I:ENL P I:EOR f T:EDWF I:ECW p T:EDW
0x147db0…147f44 Dummy {f00=0x00c6, f01=0x0190, f02=» <I:EDS f 830225 I:EDS I:EVS2 I:ED1 & vI:STR g 830225 I:DLT I:EVS1 I:MCH " I:INS ~ I:EVS2 I:ERR I:CPY I:XCP I:MVC P T:ADIT j 830225 T:RREA T:FDSP T:RRE1 I:EVA0 T:STCW
0x147f44…1480d8 Dummy {f00=0x00c6, f01=0x0190, f02=»W I:ERR2 T:BINB T:KIAA T:KIAC T:GCW2 T:SCW2 T:USE p 830225 T:USE I:ERR4 I:EVA0 P:MTAB T:UERR B I:RT0 H PWRITEL s 830225 WRITEL T:FDS0 I:EVA0 T:IO2 I:ERR lI:
0x1480d8…14826c Dummy {f00=0x00c6, f01=0x0190, f02=» I:RST P T:CSEG I:NTPA T I:NTPB X P:MTAB T:LSEG I:NTP I:PRT I:NTPR I:CHK I:EVA0 I:EVA2 I:RT2 I:TRA I:RT1 I:TRB I:RT0 I:TRA0 I:ERR T:BAT T:PAT T:CAT I:EVB U I:EDTE { 830225 I:EKIH
0x14826c…148400 Dummy {f00=0x00c6, f01=0x0190, f02=»GTD I:EGTB TI:EVS ~ 830225 I:EVA0 I:EVS1 I:EVA2 I:EVS2 I:ERR I:TRA 830225 I:ECB I:BUF I:NTR I:HEX I:HEXB I:TRA0 8 I:TRA > P:MTAB I:EVA0 I:HEXW I:TRB I:NTPR I:P
0x148400…148594 (1, 180) Dummy {f00=0x00c8, f01=0x0190, f02=» I:ERR8 I:ERR9 $ I:ERRA ( I:ERRB , I:ERRC 0 I:ERRD 4 I:ERRE 8 I:ERRF < I:ER10 @ I:ER11 D I:ER12 H I:ER13 L I:ER14 P I:ER15 T I:ER16 X I:ER17 I:ER18 ` I:ER19 d I:ER1A h I:ER1B l I:ER1C p I:ERR t I
0x148594…148728 Dummy {f00=0x00c8, f01=0x0190, f02=» LI:CHK 830225 I:CHK P:BAS P:END TC:CHK I:ERR 8 TRACHK 830225 TC:CHK TT:HLT TT:TRP TT:TRS TT:LOP TT:VON TT:VER TT:VMM TT:TID TT:PRC TT:SNO TB:ENT TC:ABT TB:ABT TC:RDC TB:
0x148728…1488bc Dummy {f00=0x00c8, f01=0x0190, f02=»VER TT:VMM @ TT:HLT TT:PRC TT:TID TT:SNO TT:MSG TRABUG 830225 P:BAS TB:ABT H TB:ENT T P:MTAB TT:PRC TT:SNO TT:TID TT:MSG TB:RDC 8 TT:TRP TT:TRS TT:TON TT:LOP TT:HLT I:TRC
0x1488bc…148a50 Dummy {f00=0x00c8, f01=0x0190, f02=»CTANO SCTADA SCTBUG bREL SCTOPT TABBE SCTMSZ SCTEFA ERROR SAVE09 SAVE04 APPTYP SCTPSZ SAVE06 SAVE29 SAVE05 SAVE01 SAVE03 SAVE13 CMPADR SAVE07 SAVE08 SCTNOP SAVE22 MMEND SCTLAP TTB:MT SCTMM
0x148a50…148be4 Dummy {f00=0x00c8, f01=0x0190, f02=»8 SAVE12 d T:CLO 830225 T:SETT I:EVA0 I:RT1 T:GETT I:ER18 I:ERR L DENT02 830225 $$$TRAN DEEDIT S DELASTD DENDUP ATTDB ATTWB CMPIND. DEDISC- DEFIND1 DELOCKL DEPOOL0 EMPTYT GETDUP MASKL T:D
0x148be4…148d78 Dummy {f00=0x00c8, f01=0x0190, f02=» $$$TRAC DECOMP CDV10 CDV110T CDV111 CDVDK DDMMCK1 MMDDCKL C L *DEDDIV 830225 $$$TRA NYCONV 8 830225 $$$TRAC DECONV ADJUSTC ATTDEVA DCSEND3 DCSGOFF DCSGON DEPOOL DERRORE DETPRT EMPTYT FDIO GETFWD MAS
0x148d78…148f0c Dummy {f00=0x00c8, f01=0x0190, f02=» 830225 D:TB50T F DECONV $ 830225 $$$TRAC DECONV ADJUSTC ATTDEVA DEPOOL2 DERRORF DETPRT EMPTYT0 FDIO1 GETFWD/ MASKN T:ATTF T:DISP T:DSC1 T:EDWR T:GETC T:GETT T:LWRI T:NKI T:PRINE T:THOMO T:TSTCO T:WAITR T:XSTAY TESTB
0x148f0c…1490a0 Dummy {f00=0x00c8, f01=0x4120, f02=»25 C:CB60C DE70ST g 830225 $$$TRA7 DE70ST DEAP7A ATTDB DEANOKT DEAOK0 DECLRA4 DECLRS1 DECONV1 DEDISC0 DELASTV DEOPBC DEPMSK7 DEPOOL DEPRUT DERECS DERR DERROR EMPTYT GETINDD OPCLT RESTOR T:ATTF4 T:DISP1 T:GETF1 T:T
0x1490a0…149234 (1, 181) Opaque[0x194]
0x149234…1493c8 # DirEnt {nam=»PTSDE «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0c30, f03=0x0000}
0x149234…1493c8 IdxSect {
0x149234…1493c8 f00 = 0x0061 // 0x149234 @0x0
0x149234…1493c8 f01 = 0x000a // 0x149236 @0x2
0x149234…1493c8 gno = [ // 0x149238 @0x4
0x149234…1493c8 [0x00]: C0x0061.0x2.0
0x149234…1493c8 [0x01]: C0x0061.0x3.0
0x149234…1493c8 [0x02]: C0x0062.0x0.0
0x149234…1493c8 [0x03]: C0x0062.0x1.0
0x149234…1493c8 [0x04]: C0x0062.0x2.0
0x149234…1493c8 ]
0x149234…1493c8 }
0x1493c8…14955c Dummy {f00=0x0061, f01=0x0190, f02=» " P IDENT PTSDE REL 10.0 80-04-11 P UPD 81-02-27 * P UPD 80-11-17/DALI B P UPD 80-10-22/DALI ^ P UPD 80-04-24/DALI z P 80-03-24/DALI DDUM DEDDIV PDIV ENTRY PTSDE P* 0 P* ENTRIES FOR APPLI
0x14955c…1496f0 Dummy {f00=0x0061, f01=0x0190, f02=»4 P ENTRY DEANOK P ENTRY DETCHK P ENTRY DEPMSK 6 P ENTRY DEPRUT L P ENTRY ATTPRT b P ENTRY DETPRT x P ENTRY ATTDEV P* , P ENTRY DEFIND ROUTINE FINDING FIELDINDEX P EJECT * * ** EXTERNAL
0x1496f0…149884 Dummy {f00=0x0061, f01=0x0190, f02=» TO DATA-ENTRY MODES t * & ! EXT DE10ST SUPERVISORY FUNCTIONS & " EXT DE20ST FORMAT DEFINITION P EXT DE30ST JOB DEFINITION v EXT DE40ST ENTRY MODE " EXT DE50ST SEARCH/CORRECTION EXT DE60ST VERIFICATION EXT DE70ST
0x149884…149a18 Dummy {f00=0x0061, f01=0x0190, f02=»HANFC CHANGE FILECODE P EXT GETVOL GET VOLUMENAME * @ 6 P* EXTERNAL REFERENCES FOR SPECIAL ROUTINES J * P EXT DEPOOL TESTVARIANT P EXT DERR P EXT SAVE P EXT RESTOR P EXT ATTBUF P EXT TESTB
0x149a18…149bac Dummy {f00=0x0061, f01=0x018e, f02=»NGTH p P EJECT P* : P* EXTERNAL REFERENCES TO APPL HANDLING ROUTINES $ P* b P EXT DEAP1A l P EXT DEAP2A P EXT DEAP3A P EXT DEAP5A P EXT DEAP7A P* P* P INCLUDE DELITT P EJE
0x149bac…149d40 Dummy {f00=0x0061, f01=0x0190, f02=» " P WORKBLOCKS AND DESCRIPTORS 8 P CALL ATTBUF,DEDSSCRN,STATSH ATTACH BUFFERS FOR THE * 6 P CALL ATTBUF,DEDSPRT,STATSH SCREEN AND PRINT DSETS f P SET UORG P BNZ FINISH $ P CALL GETIND,RBUF,RBUFLN,DEBINW1 P CALL POOLA ADJUST POOLS
0x149d40…149ed4 (1, 182) Dummy {f00=0x0061, f01=0x0190, f02=» DISPLAY v STA050 P CLEAR DECHANGE P PERF DECLRA 6 STA100 J " P IB DEBINW2,CANCEL,RETUR,ENTER X P MOVE DEBINW4,W0 ~ P PERF DERR P B STA100 CANCEL P CLEAR DEPROMPT B STA050 * RETUR
0x149ed4…14a068 Dummy {f00=0x0061, f01=0x0190, f02=»F OPCL,W1 P BOK ENT4 P BNERR ENT32 $ P MOVE DEBINW1,W0 8 P PERF DERR P P B STA100 b PENT32 t P MOVE DEBINW1,W0 P PERF DERR P IB DEBINW2,ENT52,ENT52,ENT5 P MOVE DEBINW4,W0 P B ENT32 PENT4 P MOV
0x14a068…14a1fc Dummy {f00=0x0061, f01=0x018e, f02=»F DEPMSK PENT5 < P CALL RESTOR,W0,W16,PWBDB4 RESTORE ORIGINATE ADRESSES TO " P WORKBLOCKS AND DESCRIPTORS P CLEAR BOOL1 P CBNE BIN1,W0,ENT4 PENT52 P PERF OPCL,W2 P BOK ENT6 P PERF DERR PENT6 P CBN
0x14a1fc…14a390 Dummy {f00=0x0061, f01=0x018e, f02=» * APPLICATION ROUTINE * , PDEAPPL PROC 6 P CBG DEBINW3,=W'100',DEAPP0 J P IB DEBINW3 C n P DEAPRTES C P DEAUNIT C P DEAJOB C P DEABATCH C P DEAENKEY C P DEUNENT P B DEAER
0x14a390…14a524 Dummy {f00=0x0061, f01=0x0190, f02=» n P DIV BIN1,W8 . P XCOPY DEBINW4,W0,W2,PROGNR,BIN1 PROGRAMNR P MUL BIN1,W8 N P SUB BIN2,BIN1 b . P CALL TESTB,DEBINW4,BIN2 LOOK IF EXISTING x P BZ DEAPRERR JUMP IF NOT P MOVE BIN1,W0 & P CALL UPDBOL,BIN1 CLEAR ALL BOOLS
0x14a524…14a6b8 Dummy {f00=0x0061, f01=0x0190, f02=»PMSK PDEAENKEY P MOVE DEBINW3,W0 P MOVE DEBINW2,W17 4 P B DEAOK0 N PDEAPRERR ` P MOVE DEBINW4,W7 p P B DEANOK P* P* $ P ATTFMT FORMN DUMMY INSTRUCTION P ATTFMT FORMA - " - P ATTFMT VSET
0x14a6b8…14a84c Dummy {f00=0x0061, f01=0x0190, f02=»D2A UNIT NUMBER IS P MOVE FILINDUS,DEBINW4 4 P XCOPY DEBINW4,W1,W1,DUNIT,FILINDUS GET FILECODE 8 P ADD FILINDUS,W2 p & P CBE FCOUNTER(FILINDUS),W0,DEAUN0 P ERASE 1,W2,W2 " P MOVE TABLE,FVOLNAME(FILINDUS) P B DEAUN5 PDEAUN0
0x14a84c…14a9e0 Dummy {f00=0x0061, f01=0x0190, f02=»AUN4 JUMP IF OKEY ~ P MOVE DEBINW4,W9 NOT FOUND P B DEANOK < PDEAUN4 N P ERASE 1,W2,W2 P MOVE TABLE,STRG10A r " P MOVE FVOLNAME(FILINDUS),TABLE PDEAUN5 P DISPLAY 2,W1,W1 P B DEAOK0 PDEAUN2 P MOVE DEBINW4,
0x14a9e0…14ab74 (1, 183) Dummy {f00=0x0062, f01=0x0190, f02=» DEAOK0 " PDEABATCH CHECK IF SPECIFIED P BATCH EXISTS ON USERFILE 6 P MOVE STSAVE(W2),DEINPUT Z P B DEAOK0 z P EJECT P* < P* JUMP TO APPL HANDLING IN CORRESPONDING PROGRAM P* PDEAPP0 P SUB DEBINW3
0x14ab74…14ad08 Dummy {f00=0x0062, f01=0x0190, f02=»OVE DEBIN1,PRNUM LOAD MODE BINARY & P MOVE PRNUM,DEBINW4 RESTORE PRNUM * . P MOVE BCD2A,PRNUM GET MODE LEVEL ONETH FIG T . P MOVE DEBINW4,BCD2A LOAD MODE LEVEL BINARY P IB DEBIN1 JUMP MODE APPL C P DEAP1A C P DEAP2A C P DE
0x14ad08…14ae9c Dummy {f00=0x0062, f01=0x0190, f02=» > P* RETURNS FROM APPL HANDLING IN CORRESPONDING PROGRAM P* J PDEAOK0 T P MOVE DEBINW3,W0 b RET z PDEAOK1 P MOVE DEBINW3,W1 P RET PDEAOK2 P MOVE DEBINW3,W2 P RET PDEAOK4 P MOVE DEBINW3,W4
0x14ae9c…14b030 Dummy {f00=0x0062, f01=0x0190, f02=» EJECT * & !* TABULATION-CHECK ROUTINE * B PDETCHK PROC L P TBF DOOL3,DCHKUT ` P MOVE DEBINW3,W2 z P RET PDCHKUT P MOVE DEBINW3,W0 RET PEND P EJECT F P****************************
0x14b030…14b1c4 Dummy {f00=0x0062, f01=0x0190, f02=»************************************************** PDEPRUT PROC NUM,FIRST,SECOND : P PBCD NUM ^ P PBIN FIRST p P PBIN SECOND P MOVE FIRST,NUM P DIV FIRST,W10 P MOVE BCD2A,NUM P MOVE SECOND,BCD2A P RET P PEN
0x14b1c4…14b358 Dummy {f00=0x0062, f01=0x0190, f02=»************************ PDEPMSK PROC P MOVE PINACC,W0 4 P MOVE PJOBCUR,W0 L P MOVE PINDFR,W0 d P MOVE PINDTB,W0 | P MOVE BIN4,BIN1 & P SUB BIN4,W1 FIRST DIGIT IN PRNUM P BNL DEAPR10 JUMP IF > 00 P MOVE KEYMSK,W0
0x14b358…14b4ec Dummy {f00=0x0062, f01=0x0190, f02=» P MOVE DEBINW3,W0 $ P XCOPY DEBINW3,W1,W1,PRKEYS,BIN4 , P CALL TESTB,BIN2,W15 LOOK WHICH HALFBYTE D P BZ DEAPR20 JUMP IF FIRST t P MOVE DEBINW2,W15 P CALL MSKOUT,DEBINW2,DEBINW3 P MOVE KEYMSK,DEBINW2 P RET PDEAPR20
0x14b4ec…14b680 Dummy {f00=0x0062, f01=0x018e, f02=»BE PERFORMED BEFORE ANY PRINTING IS DONE r . P* CONDITION-REGISTER IS SET TO 0 : OKAY 0 8 P* 1 : PRINTER BUSY; b L P* IF THE PRINTER IS BUSY, THE ERROR-INDICATION 11 (IN USE) IS GIVEN IN L P* IN DEBIN1, THE TERMINA
0x14b680…14b814 (1, 184) Dummy {f00=0x0062, f01=0x0190, f02=» z P RET P PEND PATTDEV PROC FC " P CALL CHANFC,DEDSPRT,FC 8 P MOVE DEBINW4,W0 X 6 P DSC0 .NW,DEDSPRT,TSTAT CHECK IF PRINTER AVAILABLE p P DELAY W4 WAIT FOR 4/100 SEC P TESTIO DEDSPRT P BNZ NOTOK P WAIT DEDSPRT
0x14b814…14b9a8 Dummy {f00=0x0062, f01=0x0190, f02=»INTER POK P DSC1 DEDSPRT,ATTACH,W20 P BOK OUT 8 P MOVE DEBINW4,W11 H P B OUT b PATT10 p 0 P MOVE DEBINW4,=W'35' 'OUT-DEV NOT OPERABLE' ~ POUT ( P PERF COND SET/CLEAR CONDITION REG. P RET P PEND P*
0x14b9a8…14bb3c Dummy {f00=0x0062, f01=0x0190, f02=»ET P PEND P* 0 P* THIS ROUTINE CALCULATE FIELDNUMBER FOR A " , P* RELATIVE FIELD ADRESSING TYP + OR - V P* PDEFIND PROC VAR1,VAR2 P PBIN VAR1 P PBIN VAR2 ( P XCOPY VAR1,W1,W1,BPOOL(BIN11),BIN12 P CBL VAR1,
0x14bb3c…14bcd0 Dummy {f00=0x0062, f01=0x018e, f02=» v P MOVE VAR1,BIN16 P SUB VAR1,VAR2 P RET 6 PDEFI00 B P ADD VAR2,BIN16 P P MOVE VAR1,VAR2 h PUTFIN P RET P PEND P EJECT * * FORMATS * F00ST FRMT FSL
0x14bcd0…14be64 Dummy {f00=0x0062, f01=0x0190, f02=» P FCOPY =C'REL 10.0' FNUL $ FNL 2 FNL > P FCOPY =C'PROGRAM:' J ( P FKI 9,MINL=2,MAXL=2,ME,NEOI,APPL=1 f P FMEL 'XX',PRNUM FBF BOOL1,F00OUT FNL ( P FCOPY =C'10 SUPERVISORY FUNCTIONS' FNL P
0x14be64…14bff8 Dummy {f00=0x0062, f01=0x0190, f02=»C'JOB' P FILLR '-',1 P FCOPY =C'DEFINITION' " FNL @ P FTEXT '40 ' L P FCOPY =C'ENTRY' ` P FILLR ' ',1 x P FCOPY =C'MODE' FNL P FTEXT '50 ' P FCOPY =C'SEARCH' P FILLR ' ',1 P FCOPY =C'MODE'
0x14bff8…14c18c Dummy {f00=0x0062, f01=0x0190, f02=»ION' | P FILLR ' ',1 P FCOPY =C'MODE' P FNL 8 F00OUT D FMEND R PF00RET FRMT ` P FSL t $ P FTEXT 'RETURN FROM DATA-ENTRY' P FNL P FKI 1 P FCOPY HEX00 P FMEND P EJECT $ P**********************
0x14c18c…14c320 Dummy {f00=0x0062, f01=0x0190, f02=»******************************* PVSET FRMT ( P FSL : P FMEL '99',PRNUM F P FBT BOOL1,F13 ^ P FCOPY =C' CREATE' t P FB F12A PF13 FCOPY =C' GET' PF12A FCOPY =C' VALUE-SETS' P FNL P FCOPY =C'NAME: T' P FBT BOO
0x14c320…14c4b4 (1, 185) Dummy {f00=0x0062, f01=0x018e, f02=» b P FCOPY STR6A P FB F12UT PF12C . P FLINK F121 : PF12UT FMEND N P* b PF121 FRMT l P FNL ~ P FCOPY =C'TYPE:' P FBT BOOL3,F121A P FBF BOOL1,F124 IF CREATE PF121A P FINP 7 P FCOPY STR2A
0x14c4b4…14c648 Dummy {f00=0x0062, f01=0x0190, f02=» P FCOPY =C'SIZE OF ' P FCOPY =C'ELEMENT' $ P FCOPY =C'S:' > P FBT BOOL3,F125A T P FBF BOOL1,F127 IF CREATE l PF125A P FINP 28 P FMEL 'XX',TIME P FB F128 PF127 : P FKI 28,MINL=1,MAXL=2,NEOI,ME,NCLR,REWRT
0x14c648…14c7dc Dummy {f00=0x0062, f01=0x0190, f02=»IF LINE 1-3 P FINP 13 ENTER P FMEL 'XX',ACK(W1) * P FNL D P* FLINK STR64A P P FCTL X'DE',STR64A f PFEND P FMEND P* PFORMN FRMT * P FKI 1,NUM,MINL=1,MAXL=1,REWRT,SCHK=1 0 P FMEL 'XXXXXXXXXXXXXXXXXXXXX-',FDVBC
0x14c7dc…14c970 Dummy {f00=0x0062, f01=0x40ca, f02=»=1,MAXL=1,NEOI,ME ~ P* FCOPY FDVBCD(BIN6) ! 6 P FCTL X'F0',1,X'C1',X'01',X'00',X'C0',FDVBCD(BIN6) ! 6 P FNL ! p P FKI 1,MINL=0,MAXL=0 ! | P FCOPY HEX00 ! P FMEND ! END ! @ ! XL=1,REWRT,SCHK=1 0 P FMEL 'XXXXXXXXXXXXXXXXXXXXX-',FDVBC
0x14c970…14cb04 Dummy {f00=0x0062, f01=0x2008, f02=» " FCTL X'F0',1,X'C1',X'01',X'00',X'C0',FDVBCD(BIN6) ! P FNL ! B P FKI 1,MINL=0,MAXL=0 ! N P FCOPY HEX00 ! j P FMEND ! ~ END ! @ ! =1,REWRT,SCHK=1 0 P FMEL 'XXXXXXXXXXXXXXXXXXXXX-',FDVBCD(BIN6) P FNL P FKI 1,MINL=0,MAXL=0
0x14cb04…14cc98 Dummy {f00=0x0062, f01=0x018e, f02=» [ D S q * & 3 d E = G B & * & Q 0 M 8 3 T & " o : @ V Z * & H n - V c * & + ? P0:;= * &
0x14cc98…14ce2c Dummy {f00=0x0062, f01=0x0190, f02=» * & FTCXE XTTTT9+TTTTTTTTTTTTTTTTT * & = TTT9 ! I 2 * & [ D DELETED ` * & y INSERTED + ON UNIT:U i + * & WITHIN JOB: k RECOVERY RUNNI * & NG. RECORD CORRECTI
0x14ce2c…14cfc0 Dummy {f00=0x0062, f01=0x0190, f02=» MUST BE V t * & - ERIFIED ENTER WANTED RECORDN * & K UMBER: F CONVERSION OF ALL BA @ * & i TCHES DUPL FROM G T: n * & ( C : AUTOMATIC SKIP/DUP * * & O N* FF* RECOVERY OF * & : k
0x14cfc0…14d154 (1, 186) Opaque[0x194]
0x14d154…14d2e8 # DirEnt {nam=»DE10ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0c58, f03=0x0000}
0x14d154…14d2e8 IdxSect {
0x14d154…14d2e8 f00 = 0x0062 // 0x14d154 @0x0
0x14d154…14d2e8 f01 = 0x0004 // 0x14d156 @0x2
0x14d154…14d2e8 gno = [ // 0x14d158 @0x4
0x14d154…14d2e8 [0x00]: C0x0062.0x3.0
0x14d154…14d2e8 [0x01]: C0x0063.0x0.0
0x14d154…14d2e8 ]
0x14d154…14d2e8 }
0x14d2e8…14d47c Dummy {f00=0x0062, f01=0x0190, f02=» $ P IDENT DE10ST REL 10.0 80-04-11 P 79-11-13/DALI , DDUM DEDDIV D PDIV X P ENTRY DE10ST f P ENTRY DEAP1A | * * ** EXTERNAL REFERENCES TO SCREEN * P EXT DECLRA P EXT DERR * : P*
0x14d47c…14d610 Dummy {f00=0x0062, f01=0x018e, f02=» DE14ST SYSTEM-VARIABLES P EXT DE15ST FILE-SPACE , P EXT DECOMP STANDARD VALIDATION ROUTINE > P EXT DEPOOL POOL-HANDLING n P* 8 P* EXTERNAL REFERENCES TO APPLICATION ROUTINE P* P EXT DEAOK0 P EXT DEANOK P
0x14d610…14d7a4 Dummy {f00=0x0062, f01=0x018e, f02=» PDE10ST PROC P CBNE BIN2,W0,ENT1 PDEST 2 & P SET BOOL1 PART OF FORMAT DISPLAY > PDEST10 h P ATTFMT F10ST v & P SET DEPROMPT PROMPT-TEXTS DISPLAY PDEST20 P CLEAR DECHANGE P PERF DECLRA PDEST40 " P IB DEBINW
0x14d7a4…14d938 Dummy {f00=0x0062, f01=0x0190, f02=» ~ P B DEST20 * ENTER $ P CBNE BIN1,W1,RET2 2 P CBNE BIN2,W0,ENT1 L P B DEST f PENT1 v 2 P PERFI BIN2,DE11ST,DE12ST,DE12ST,DE14ST,DE15ST P CLEAR BOOL1 < P CALL RESTOR,W0,W16,PWBDB4 RESTORE ORIGINATE ADRESSES TO
0x14d938…14dacc Dummy {f00=0x0062, f01=0x0190, f02=» * PRETUR P MOVE BIN2,W1 P MOVE BIN1,W0 2 PRET2 H RET T P EJECT ` P* n ( P* APPL VALUE HANDLING ROUTINE x P* PDEAP1A 2 P IB DEBINW4,DEAP11,DEAP12,DEAP12,DEAP14,DEAP15 PDEAP10 P B DEAER
0x14dacc…14dc60 Dummy {f00=0x0062, f01=0x0190, f02=»E SWEDISH WAY t P BOK DEAOK0 * P PERF DECOMP,W2 TEST THE AMERICAN WAY * P BOK DEAOK0 X P PERF DECOMP,W3 DATE DDMMYY l P BOK DEAOK0 P B DEAER6 , PDEA113 XCOPY STR2A,W0,W2,DEINPUT,W0 HOUR P CBG STR2A,=C'23',DEAER6 & P X
0x14dc60…14ddf4 (1, 187) Dummy {f00=0x0063, f01=0x0190, f02=»R6 z P B DEAOK0 PDEAP12 12 VALUE SETS P MOVE BCDI21(W1),DEINPUT : P MOVE BIN1,BCDI21(W1) Z ( P IB DEBINW3,DEAP121,DEAP122,DEAP123 x PDEAP121 VALUE-SET NO. P CBE BIN1,W0,DEAER6 P CBG BIN1,=W'93',DEAER6 P COPY TA
0x14ddf4…14df88 Dummy {f00=0x0063, f01=0x018e, f02=»RG10A SCAN BUFFERS p P CBNE DEBIN4,W2,DE1211 P MOVE DEBINW4,=W'25' 8 P B DEANOK T PDE1211 f P MOVE DEBINW2,W17 ENT-KEY t PDEOK P B DEAOK0 PDEAP122 VALUE-SET TYPE P MOVE STR2A,DEINPUT P MOVE STR1A,DEINPUT
0x14df88…14e11c Dummy {f00=0x0063, f01=0x0190, f02=» j P CBG BIN1,=W'80',DEAER6 P MOVE STR1A,STR2A ( P CBE STR1A,=C'A',DE123A B P CBG BIN1,W21,DEAER6 b P DIV BIN1,W2 NUMERIC ~ P MUL BIN1,W2 P ADD BIN1,W1 P MOVE TIME,BIN1 P MOVE DEINPUT,TIME PDE123A P MOVE
0x14e11c…14e2b0 Dummy {f00=0x0063, f01=0x018e, f02=»END EJECT * * FORMATS $ * < PF10ST FRMT F FSL X ( P FCOPY =C'10 SUPERVISORY FUNCTIONS' d FNL FNL P FCOPY =C'PROGRAM:' ( P FKI 9,MINL=2,MAXL=2,ME,NEOI,APPL=1 P FMEL 'XX',PRNUM P
0x14e2b0…14e444 Dummy {f00=0x0063, f01=0x40b2, f02=» P FCOPY =C'13 GET VALUE-SETS' FNL ( " P FCOPY =C'14 SYSTEM-VARIABLES' 4 P FNL Z P FCOPY =C'15 FILE-SPACE' f PF10OUT FMEND END @ PROGRAM:' ( P FKI 9,MINL=2,MAXL=2,ME,NEOI,APPL=1 P FMEL 'XX',PRNUM P
0x14e444…14e5d8 Dummy {f00=0x0063, f01=0x2008, f02=» FTEXT '50 SEARCH/CORRECTION' FNL . FTEXT '60 VERIFICATION' : FNL Z FTEXT '70 CONVERTION' f FNL FTEXT '80 FILE HANDLING' F00OUT FMEND END @ '10 SUPERVISORY FUNCTIONS' FNL
0x14e5d8…14e76c Dummy {f00=0x0063, f01=0x0190, f02=»Cz8 Ao " 2 '0 ~ * & ! !0) (V ? g 2 #%2 * & ) ( ()*(( 11 _ Co< Cm< Cz8 0+ J * & G ! 2 + !X b !U *8 0( x * & e ? h ! & ? C < h * & ( & H I ?& g( " @oW $ * &
0x14e76c…14e900 Dummy {f00=0x0063, f01=0x0190, f02=» 0) { &{ mU_"@{Ao? m 5 * & + p!0 An ! 6 @_2( (' % * * & 7 ) _ + 2 ../0A #W 80 X * & U _3 _8A @{0 $} !4 @{A * & s z 'P ; -nA{_% !g2 @m?1?2@ * & _/0 + 0 , A~4 @~P + , 4
0x14e900…14ea94 (1, 188) Opaque[0x194]
0x14ea94…14ec28 # DirEnt {nam=»DE11ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0c68, f03=0x0000}
0x14ea94…14ec28 IdxSect {
0x14ea94…14ec28 f00 = 0x0063 // 0x14ea94 @0x0
0x14ea94…14ec28 f01 = 0x0002 // 0x14ea96 @0x2
0x14ea94…14ec28 gno = [ // 0x14ea98 @0x4
0x14ea94…14ec28 [0x00]: C0x0063.0x1.0
0x14ea94…14ec28 ]
0x14ea94…14ec28 }
0x14ec28…14edbc Dummy {f00=0x0063, f01=0x0190, f02=» $ P IDENT DE11ST REL 10.0 80-04-11 P 79-11-15/LABJ , P************************* D P* 11 DATE AND TIME f P************************* DDUM DEDDIV PDIV P ENTRY DE11ST P EXT DECLRN P EXT DERROR EJECT
0x14edbc…14ef50 Dummy {f00=0x0063, f01=0x0190, f02=»ROC P ATTFMT F11 P SET DEPROMPT P GETTIME STR6A 6 P MOVE TIME,STR6A L P MOVE BCDI21(W1),DATE d PCANC P PERF DECLRN PCBE11 " P IB DEBINW2,CANCEL,RETUR,ENTER P MOVE DEBINW4,W4 ERROR P PERF DERROR,DEKTAB4
0x14ef50…14f0e4 Dummy {f00=0x0063, f01=0x018e, f02=»ME,STR6A P MOVE BCDI21(W1),DATE P DISPLAY 1,W1,W0 . P B CANC F PENTER EDIT STR6A,FTIME V P SETTIME STR6A t P MOVE DATE,BCDI21(W1) RETUR RET PEND EJECT PF11 FRMT FSL P FCOPY ='11 DATE AND T
0x14f0e4…14f278 Dummy {f00=0x0063, f01=0x411e, f02=» l FILLR ' ',4 FCOPY ='TIME:' 0 P FKI 25,MINL=6,MAXL=6,ME,NEOI,REWRT,APPL=103 4 FMEL 'XXE.XXE.XX',TIME h P FNL P FKI 1,MINL=0,MAXL=0 P FCOPY HEX00 FMEND PFTIME FRMT P FMEL '999999',TIME P FMEND
0x14f278…14f40c Dummy {f00=0x0063, f01=0x2008, f02=» FMEND END @ &E TIME RETUR RET 8 PEND J EJECT X F111 FRMT f FSL x FCOPY ='111 DATE AND TIME' FNL FCOPY ='DATE:' . * FKI 17,MINL=6,MAXL=6,ME,NEOI,REWRT,APPL=1 FMEL 'XXE
0x14f40c…14f5a0 Dummy {f00=0x0063, f01=0x0190, f02=»8" .4 #H .Hj 0" #T @m?#@hP !0. 0/ V 0+ !_ $ + ?$I 07WI00 P 0" 9%0+ !0. 0/ T.00 T/WL0+ ! 08W #I{ H~ I H 0( 03? A 0)P#:&;%Io 09 P H 2 ' ' ' ? JA J K{ 0* ?( !0. 0/ 8 _[J # T 2 ' 00 T 2 )**? 09 8+J ?+
0x14f5a0…14f734 (1, 189) Opaque[0x194]
0x14f734…14f8c8 # DirEnt {nam=»DE30ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0c70, f03=0x0000}
0x14f734…14f8c8 IdxSect {
0x14f734…14f8c8 f00 = 0x0063 // 0x14f734 @0x0
0x14f734…14f8c8 f01 = 0x0004 // 0x14f736 @0x2
0x14f734…14f8c8 gno = [ // 0x14f738 @0x4
0x14f734…14f8c8 [0x00]: C0x0063.0x2.0
0x14f734…14f8c8 [0x01]: C0x0063.0x3.0
0x14f734…14f8c8 ]
0x14f734…14f8c8 }
0x14f8c8…14fa5c Dummy {f00=0x0063, f01=0x0190, f02=» $ P IDENT DE30ST REL 10.0 80-04-11 P 79-10-10/DALI , DDUM DEDDIV D PDIV X P ENTRY DE30ST f * | * ** EXTERNAL REFERENCES TO SCREEN * P EXT DECLRA P EXT DERR * 2 P* EXTERNAL REFERENC
0x14fa5c…14fbf0 Dummy {f00=0x0063, f01=0x0190, f02=»ESTOR P EJECT * * START OF PROGRAM & * H PDE30ST PROC R P CBNE BIN2,W0,ENT1 f PDEST & P SET BOOL1 PART OF FORMAT DIDELAY PDEST10 P ATTFMT F30ST & P SET DEPROMPT PROMPT-TEXTS DIDELAY PDEST
0x14fbf0…14fd84 Dummy {f00=0x0063, f01=0x0190, f02=»M r P PERF DERR P B DEST40 CANCEL . P CLEAR DEPROMPT < P B DEST20 T * f ENTER p P CBNE BIN1,W3,RET2 ~ P CBNE BIN2,W0,ENT1 P B DEST PENT1 P PERF DE31ST P CLEAR BOOL1 < P CALL RESTOR,W0,W1
0x14fd84…14ff18 Dummy {f00=0x0063, f01=0x0190, f02=»NUM,BIN1 P PERF DEPRUT,PRNUM,BIN1,BIN2 P PERF DEPMSK 4 P B DEST10 H * Z PRETUR d P MOVE BIN2,W1 r P MOVE BIN1,W0 PRET2 RET P PEND EJECT * * FORMATS * PF30ST FRMT
0x14ff18…1500ac Dummy {f00=0x0063, f01=0x0190, f02=»OGRAM:' P FILLR '3',1 ( P FKI 9,MINL=2,MAXL=2,ME,NEOI,APPL=1 $ P FMEL 'XX',PRNUM P P FBF BOOL1,F30OUT h FNL P FTEXT '31 ' P FCOPY =C'CREATE' P FILLR ' ',1 P FCOPY =C'JOB' P FILLR '-',1 P FCOPY =C'DEFI
0x1500ac…150240 Dummy {f00=0x0063, f01=0x4046, f02=»PY =C'DEFINITION' PF30OUT FMEND ( END 6@ B1 $ P FMEL 'XX',PRNUM P P FBF BOOL1,F30OUT h FNL P FTEXT '31 ' P FCOPY =C'CREATE' P FILLR ' ',1 P FCOPY =C'JOB' P FILLR '-',1 P FCOPY =C'DEFI
0x150240…1503d4 (1, 190) Dummy {f00=0x0063, f01=0x2008, f02=» FTEXT '50 SEARCH/CORRECTION' FNL . FTEXT '60 VERIFICATION' : FNL Z FTEXT '70 CONVERTION' f FNL FTEXT '80 FILE HANDLING' F00OUT FMEND END @ '10 SUPERVISORY FUNCTIONS' FNL
0x1503d4…150568 Dummy {f00=0x0063, f01=0x0002, f02=»#
0x150568…1506fc Dummy {f00=0x0063, f01=0x0190, f02=» ~ " ` ?( G ! +b L 8 b f P ,i p$ A j z H&g a ~N> ` `0 H ^% H @` z@u ` `N> H >N> `H ja @ `H ^ z@c @ i ` d @8 U ! ~ ` @Z @ @ ~ ^ @^ ` ~~ 6 ( . ~ @ ~ ~f ` & ^ f @ `
0x1506fc…150890 Dummy {f00=0x0063, f01=0x0190, f02=»A1,12,A8 ICOMPS SEQUENCE ~ B P SUK SPTR,4 STACK POINTER ON ARG2 > P CF A14,ARG2 F P LD A1,REGFLG ONE ARGUMENT IN REGISTER ? 6 P RF(0) ICOMP1
0x150890…150a24 Dummy {f00=0x0063, f01=0x0190, f02=» JUMP IF SO v B P MLK 3 OUTPUT THE INSTRUCTION < P DATA X'8304' LDR A3,A1 f D P DATA 0 TO TRANSFER 2ND ARGUMENT H P DATA 0
0x150a24…150bb8 Dummy {f00=0x0063, f01=0x0190, f02=» INSTRUCTION ^ F P CF A14,INST LD(*) A2,"1ST ARG" P RF ICOMP4 ^ P* ~ F P* NONE ARGUMENT IN REGISTER: PICOMP1 EQU * J P LDK.L A7,X'824
0x150bb8…150d4c Dummy {f00=0x0063, f01=0x0190, f02=» FIRST ARGUMENT IN REGISTER: PICOMP2 EQU * D D P MLK 3 PRODUCE THE INSTRUCTION ` > P DATA X'8204' LDR A2,A1 H P DATA 0
0x150d4c…150ee0 Dummy {f00=0x0063, f01=0x0190, f02=» t P* PICOMP3 EQU * J P ADK SPTR,4 STACK POINTER ON 2ND ARG.ITEM . D P LDK.L A7,X'8340' PRODUCE THE INSTRUCTION: | H P CF A14,INST LD(*) A3,"2ND ARG"
0x150ee0…151074 (1, 191) Opaque[0x194]
0x151074…151208 # DirEnt {nam=»DE40ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0c80, f03=0x0000}
0x151074…151208 IdxSect {
0x151074…151208 f00 = 0x0064 // 0x151074 @0x0
0x151074…151208 f01 = 0x0006 // 0x151076 @0x2
0x151074…151208 gno = [ // 0x151078 @0x4
0x151074…151208 [0x00]: C0x0064.0x0.0
0x151074…151208 [0x01]: C0x0064.0x1.0
0x151074…151208 [0x02]: C0x0064.0x2.0
0x151074…151208 ]
0x151074…151208 }
0x151208…15139c Dummy {f00=0x0064, f01=0x0190, f02=» $ P IDENT DE40ST REL 10.0 80-04-11 P 80-01-29/DALI , DDUM DEDDIV D PDIV X P ENTRY DE40ST f * | * ** EXTERNAL REFERENCES TO SCREEN * P EXT DECLRA P EXT DECLRN P EXT DECLRS P EXT DERR
0x15139c…151530 Dummy {f00=0x0064, f01=0x0190, f02=» EXT DEPMSK 8 P* EXTERNAL REFERENCES TO APPLICATION ROUTINE P* P P EXT DENT01 Z " P EXT DEOPBC OPEN BATCH-ROUTINE n P* P INCLUDE DELITT P EJECT 2 P********************************************* 2 P* START OF DAT
0x151530…1516c4 Dummy {f00=0x0064, f01=0x0190, f02=»********************************************* PDE40ST PROC 6 P CLEAR BOOL2 J P MOVE JOBNAME,HEX00 ^ P MOVE BATCH,HEX00 z P CBNE BIN2,W0,DEEN10 PDEST00 & P SET BOOL1 PART OF FORMAT DISPLAY PDEST10 P TBT BOOL2,DEST20
0x1516c4…151858 Dummy {f00=0x0064, f01=0x0190, f02=» PDEST50 P CLEAR DECHANGE P TBT BOOL2,DEST55 * P PERF DECLRA D P B DEST60 X PDEST55 j P PERF DECLRS x PDEST60 $ P IB DEBINW2,DE40CA,DE40RE,DE40EN P MOVE DEBINW4,W0 PDE40ER P PERF DERR P B DEST60
0x151858…1519ec Dummy {f00=0x0064, f01=0x0190, f02=»TER-KEY PRESSED P* PDE40EN " ( P TBT BOOL2,OPEN1 JUMP IF OPEN BATCH 0 PDEEN10 P CBNE BIN1,W4,DERE30 j 0 P IB BIN2,DEEN20,DEEN50,DEEN30,DEEN40,DEEN15 P B DEST00 PDEEN15 P SET DOOL4 P B DEEN50 PDEEN20
0x1519ec…151b80 Dummy {f00=0x0064, f01=0x0190, f02=» CLEAR BOOL1 P B DEST20 P EJECT & * 4 P* RETURN-KEY PRESSED > * Z PDE40RE d * P CLEAR DOOL3 DATAENTERING ON USERFILE r P PERF OPCL,W4 CLOSE USERFILE P BNERR DERE20 P MOVE DEBINW1,W0 P PERF DERROR,DEKTAB6
0x151b80…151d14 (1, 192) Dummy {f00=0x0064, f01=0x0190, f02=»20 * P CLEAR DOOL5 IF SET RETURN FROM DEOPBC , P BNZ DERE60 OTHERWISE WITHIN THIS MODULE 8 ( P TBT BOOL2,DERE50 IF SET NOT FRMT 40 h ( P MOVE BIN2,W1 RETURN FROM THIS MODE P MOVE BIN1,W0 PDERE30 RET PDERE50 " P CLEAR BOO
0x151d14…151ea8 Dummy {f00=0x0064, f01=0x0190, f02=» r P CLEAR DOOL4 P CLEAR DOOL8 P MOVE BIN1,W4 0 P MUL BIN1,W10 F P MOVE PRNUM,BIN1 P PERF DEPRUT,PRNUM,BIN1,BIN2 t P PERF DEPMSK P B DEST10 P EJECT * P************************************** ( P* THIS IS THE
0x151ea8…15203c Dummy {f00=0x0064, f01=0x018e, f02=» MOVE DEBINW2,W0 POPEN2 P MOVE WORK(W11),W0 MSK-WORD & P MOVE WORK(W12),W0 COMP-WORD J P PERF DEOPBC,DEBINW2 n ( P IB DEBINW2,OPEN3,OPEN3,DE40RE,OPEN4 POPEN3 P PERF DENT01 P B OPEN2 POPEN4 P GETABX DEBINW3
0x15203c…1521d0 Dummy {f00=0x0064, f01=0x0190, f02=» ~ * PF40ST FRMT FSL $ P FTEXT '40 ' 0 P FCOPY =C'ENTRY' D P FILLR ' ',1 P FCOPY =C'MODE' p FNL P FCOPY =C'PROGRAM:' ( P FKI 9,MINL=2,MAXL=2,ME,NEOI,APPL=1 P FMEL 'XX',PRNUM P FBF BOOL1,F40OUT
0x1521d0…152364 Dummy {f00=0x0064, f01=0x0190, f02=» OLD ' P FCOPY =C'BATCH' P FNL & P FTEXT '43 ' 2 P FCOPY =C'OPEN NEW ' F P FCOPY =C'TEST' b P FILLR '-',1 z P FCOPY =C'BATCH' P FNL P FTEXT '44 ' P FCOPY =C'OPEN OLD ' P FCOPY =C'TEST' P FILLR '-',1
0x152364…1524f8 Dummy {f00=0x0064, f01=0x0190, f02=»1 P FLINK F45ST P FB F41ST2 PF41ST1 FMEL 'XX',PRNUM 0 P FTAB 4 N P FCOPY =C'ENTRY' ^ P FILLR ' ',1 v P FCOPY =C'MODE' P FBF DOOL7,F41ST2 P FILLR ' ',1 P FCOPY =C'TEST' PF41ST2 FNL P FLINK
0x1524f8…15268c Dummy {f00=0x0064, f01=0x018e, f02=»5ST FRMT P FTEXT '45 ' P FCOPY =C'DELETE' $ P FILLR '-',1 > P FCOPY =C'BATCH' R P FMEND j PF40UV FRMT x P FCOPY =C'UNIT' P FTEXT ':U' ( P FKI 7,MINL=1,MAXL=1,NEOI,ME,APPL=2 P FMEL 'X',USERFILE P FTAB 20
0x15268c…152820 Dummy {f00=0x0064, f01=0x0190, f02=» P FCOPY =C'NAME' P FILLR ':',1 > P FKI 9,ALPHA,MINL=1,MAXL=6,ME,NEOI,APPL=3,DUPL=STSAVE(W1) 4 P FCOPY JOBNAME v P FMEND PF40BAT FRMT P FCOPY =C'BATCH' P FCOPY =C'NAME' P FILLR ':',1 > P FKI 30,ALPHA,MINL=1,M
0x152820…1529b4 (1, 193) Dummy {f00=0x0064, f01=0x405c, f02=»ND PBELL FRMT P FSL P FILLR X'07',1 ( P FMEND > P END L@ X
0x1529b4…152b48 Dummy {f00=0x0064, f01=0x2008, f02=»
0x152b48…152cdc Dummy {f00=0x0064, f01=0x0190, f02=»1 COMMA MISSING AFTER FIRST ELEM. OF AN EQUIV. LISTE ILLEGAL EQUIVALENCE LIST ELEMENT ILLEGAL SUBSCRIPT VALUER0 LEFT PARENTHESIS MISSING IN FORMAL ARGUMENT LIST ILLEGAL FORMAL ARGUMENTS1 ILLEGAL SYNTACTIC UNIT AFTER FORMAL ARGUMENT LISTN. MISSING LEFT PARENTHES
0x152cdc…152e70 Dummy {f00=0x0064, f01=0x0190, f02=»/ MISSING RIGTH PARENTHESIS IN A DEFINE FILE LISTS" ILLEGAL SYNTACTIC UNIT AFTER COMMA* CONSTANT LIST DOES NOT MATCH VARIABLE LIST/ NON-COMMON VARIABLE @ FORBIDDEN IN A BLOCK DATAA+ FORMAL ARG. @ CANNOT BE INITIALIZED BY DATA 3 INIT.OF COMMON VARIABLE @ FORBIDDEN
0x152e70…153004 Dummy {f00=0x0064, f01=0x0190, f02=»1 NB. OF SUBSCRIPTS DOES NOT MATCH NB OF DIMENSIONS 2 A CONSTANT CANNOT BE CONVERTED TO THE COR.VAR.TYPE ILLEGAL OR TOO LARGE CONSTANT-# ILLEGAL SYNTAX FOR A DATA STATEMENTK ILLEGAL SUBSCRIPT LIST MISSING OR ILLEGAL DELIMITER ILLEGAL ITEM IN A CONSTANT LISTE$
0x153004…153198 Dummy {f00=0x0064, f01=0x0190, f02=»1 LOWER OR UPPER LIMIT MISSING IN A DO-IMPLIED LIST ! ILLEGAL STEP IN A DO-IMPLIED LIST ILLEGAL COMPLEX CONSTANT MISSING ELEMENT IN A LISTE2 @ IN A NAMELIST STATEMENT IS NOT VARIABLE OR ARRAY ARRAY NN IS GREATER THAN 32KITER ILLEGAL ITEM IN A CONSTANT LISTE$
0x153198…15332c Dummy {f00=0x0064, f01=0x0190, f02=»% THIS STATEMENT IS TOO LONG TO COMPILE CONVERSION OVERFLOW @ IS NOT AN INTEGER VARIABLE ILLEGAL DO TERMINAL STATEMENT ) DO STATEMENT MUST NOT FOLLOW A LOGICAL IF 0 DO TERMINAL STATEMENT LABEL @ PREVIOUSLY DEFINED IMPROPERLY NESTED DO LOOPS UNDEFINED LABEL
0x15332c…1534c0 Dummy {f00=0x0064, f01=0x0190, f02=»& EXPRESSION IN ARITHMETIC IF IS COMPLEX SYNTAX ERROR, END PARAMETER NOT ALLOWED FOR THIS STATEMENT* NAMELISTS ARE INCOMPATIBLE WITH RANDON I/O @ IS NOT A FORMAT LABEL NOT INTEGER EXPRESSION$ MISSING LIST IN AN UNFORMATTED WRITE) MULTIPLE RETURN NOT ALLOWED IN
0x1534c0…153654 (1, 194) Opaque[0x194]
0x153654…1537e8 # DirEnt {nam=»DE20ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0c98, f03=0x0000}
0x153654…1537e8 IdxSect {
0x153654…1537e8 f00 = 0x0064 // 0x153654 @0x0
0x153654…1537e8 f01 = 0x000a // 0x153656 @0x2
0x153654…1537e8 gno = [ // 0x153658 @0x4
0x153654…1537e8 [0x00]: C0x0064.0x3.0
0x153654…1537e8 [0x01]: C0x0065.0x0.0
0x153654…1537e8 [0x02]: C0x0065.0x1.0
0x153654…1537e8 [0x03]: C0x0065.0x2.0
0x153654…1537e8 [0x04]: C0x0065.0x3.0
0x153654…1537e8 ]
0x153654…1537e8 }
0x1537e8…15397c Dummy {f00=0x0064, f01=0x0190, f02=» $ P IDENT DE20ST REL 10.0 80-04-11 P 80-03-23/JAER , DDUM DEDDIV D PDIV X P ENTRY DE20ST f P ENTRY DEAP2A | * * ** EXTERNAL REFERENCES TO SCREEN * P EXT DECLRA P EXT DERROR * 6 P*
0x15397c…153b10 Dummy {f00=0x0064, f01=0x0190, f02=» EXT DE24ST COPY FORMAT P* 8 P* EXTERNAL REFERENCES TO APPLICATION ROUTINE * P* f $ P EXT DEAOK0 RETURN TO DEAPPL =0 p $ P EXT DEANOK RETURN TO DEAPPL =3 $ P EXT DEAOK2 RETURN TO DEAPPL =2 $ P EXT DEAOK4 RETURN TO DEAPPL =4
0x153b10…153ca4 Dummy {f00=0x0064, f01=0x0190, f02=»OOL BUFFERPOOL ROUTINE & P EXT CNTNUM CONTROL VARIABLE INDEX P* H P EXT RESTOR R P EXT DEPRUT f P EXT DEPMSK z P EXT CMPIND COMPERE INDEX EJECT * * KEYTABLES * & P* USAGE: DATA ENTRY S
0x153ca4…153e38 Dummy {f00=0x0064, f01=0x0190, f02=» t P* PDEKTAB4 KTAB CLR,CAN,RET,CFW * 6 * START OF PROGRAM @ * b P EJECT l PDE20ST PROC z P CBNE BIN2,W0,ENT1 PDEST & P SET BOOL1 PART OF FORMAT DISPLAY PDEST20 P ATTFMT F20ST & P SET D
0x153e38…153fcc Dummy {f00=0x0064, f01=0x0190, f02=»ER t P B ERROR CANCEL P CLEAR DEPROMPT ( B STA050 @ * R ENTER P CBNE BIN1,W2,RET2 j P CBNE BIN2,W0,ENT1 P B DEST PENT1 P CLEAR BOOL7 , P PERFI BIN2,DE21ST,DE21ST,DE23ST,DE24ST P CLEAR DOO
0x153fcc…154160 Dummy {f00=0x0064, f01=0x0190, f02=»E BIN1,W20 P PERF DEPRUT,PRNUM,BIN1,BIN2 P PERF DEPMSK 6 P B DEST20 J * ERROR f P MOVE DEBINW4,DEBINW2 t ERR2 P PERF DERROR,DEKTAB4 B STA100 * PRETUR P MOVE BIN2,W1 P MOVE BIN1,W0
0x154160…1542f4 (1, 195) Dummy {f00=0x0065, f01=0x0190, f02=»DEA21,DEA22,DEA23, C ( P DEA24,DEA25,DEA26,DEA27,DEA28, C P DEA29 J & P B DEAP2B LONG BRANCH CONSTRUCTION Z P EJECT P* P* APPLE=1,DE21 P* FORMAT DEFINED? P* PDEA21 . P XCOPY STR1A,W0,W1,DEINP
0x1542f4…154488 Dummy {f00=0x0065, f01=0x0190, f02=»1A , P CBNE STR1A,='*',DEE232 JUMP IF # * NOK PDE1B : P CBE FORMAT,DEINPUT,DEB21 F & P MOVE FRMTPNTR,W0 FORMATPOINTER:=0 h " P PERF DEDISC,W12 SEARCH FORMAT P BOK DEE28 FOUND NOT OK & P CBE DEBINW4,W9,DE1C NOT FOUND OK P B DEA
0x154488…15461c Dummy {f00=0x0065, f01=0x0190, f02=»,DEBIN4,STRG10A SEARCH AMONG BUFFERS z . P CBE DEBIN4,W0,DE1D NOT FOUND AMONG BUFFER , 6 P CBE DEBIN3,PINDDB,DE1D FOUND BUT SAME CURR BUFFER ^ P B DEE28 NOT OK PDE1D $ P GETCTL 0,DEBINW3 GET APPL VALUE . P CBE DEBINW3,=W'118',DEB21 JUMP IF A
0x15461c…1547b0 Dummy {f00=0x0065, f01=0x0190, f02=»JECT P* P* APPLE=2,DE21 4 P* CHECK IF INPUT IS LESS THAN OR EQUAL 23 2 P* j PDEA22 t * P MOVE BCD3A,DEINPUT LOAD INPUT DECIMAL * P MOVE DEBINW3,BCD3A LOAD INPUT BINARY $ P MOVE DEBINW4,W23 LOAD 23 BINARY * P C
0x1547b0…154944 Dummy {f00=0x0065, f01=0x0190, f02=»APPLE=3,DE21 , P* CHECK IF INPUT IS Y(ES) OR N(O) P* D PDEA23 N P PERF DEYN CHECK YES OR NO P BOK DEAOK0 OK ~ P BNOK DEE26 ILLEGAL VALUE P EJECT P* P* APPLE=4,DE21 & P* CHECK AND GET FORMAT-N
0x154944…154ad8 Dummy {f00=0x0065, f01=0x0190, f02=» B DEANOK NOT OK PDE24A P MOVE DEBINW2,W17 FAKE ENTER & P B DEAOK0 OK J P EJECT ^ P* l P* APPLE=5,DE21 v @ P* CHECK IF INPUT IS LESS THAN 64 AND NOT > FIELDLENGTH P* PDEA25 * P MOVE BCD3A,DEINPUT LOAD I
0x154ad8…154c6c Dummy {f00=0x0065, f01=0x0190, f02=»EB21 <64 OK ~ P B DEE26 ILLEGAL VALUE P EJECT 2 P* @ P* APPLE=6,DE21 J * P* DUPLICATION-REFERENCE-CONTROL f P* PDEA26 4 P MOVE FMTWK(W4),DEBINW1 STORE NUMB OF DUPL.CHARS 4 P PERF CNTNUM,DEINPUT,FMTWK,W4 CONTRO
0x154c6c…154e00 Dummy {f00=0x0065, f01=0x0190, f02=» APPLE=7,DE21 * P* CHECK IF INPUT VALUE < =32.767 P* D PDEA27 N , P MOVE BCD13A,DEINPUT LOAD INPUT DECIMAL , P CBNG BCD13A,=D'+32767',DEB21 <=32767 OK P B DEE26 ILLEGAL VALUE P EJECT P* P* APPLE=8,DE21
0x154e00…154f94 (1, 196) Dummy {f00=0x0065, f01=0x0190, f02=»OR NO z * P CBE STR1A,='C',DE8B C(ONDITIONAL) OK P B DEE26 ILLEGAL VALUE < PDE8A Z P CBE STR1A,='Y',DE8C f PDE8B P SET CTAB P B DEAOK0 PDE8C ( P CLEAR CTAB INICATE KEYED INP-FIELD P B DEAOK0 P EJECT
0x154f94…155128 Dummy {f00=0x0065, f01=0x0190, f02=»D INPUT DECIMAL x ( P MOVE DEBINW3,BCD13A LOAD '99'BINARY P CALL CMPIND,DEBINW3,ACK(W1) D P BNOK DEE26 OUT OF RANGE h P B DEAOK0 OK P EJECT P* P* LONG BRANCHE LIST P* ( P* APPL VALUE HANDLING ROUTINE
0x155128…1552bc Dummy {f00=0x0065, f01=0x0190, f02=»CTION r P* PDEB21 P B DEAOK0 & PDEE22 8 $ P MOVE DEBINW4,W2 UNDEFINED ERROR F P B DEANOK n PDEE26 " P MOVE DEBINW4,W6 ILLEGAL VALUE P B DEANOK PDEE28 $ P MOVE DEBINW4,W8 ALREADY DEFINED P B DEANOK
0x1552bc…155450 Dummy {f00=0x0065, f01=0x0190, f02=»* LINE-DESIGN CONTROL P* $ PDEA210 . 2 P MOVE FMTWK(W5),DEBINW1 STORE NUMB OF LDES CHS < P MOVE BIN5,W0 LOAD STPOINTER r 2 P MOVE DEBIN4,DEBINW1 STORE NUMBER OF LDES CHRS PD10A P CLEAR BOOL8 , P MATCH DEINPUT,BIN5,DEBIN4,P
0x155450…1555e4 Dummy {f00=0x0065, f01=0x0190, f02=» FIELD = > l ( P MOVE DEBINW1,BIN5 SAVE STARTPOINTER * P MOVE BIN16,W0 STPOINTER PICCHRS-TABLE > , P MATCH PICSTR,BIN16,W15,DEINPUT,BIN5,W1 l & P BNOK D10X NUMERIC FIELD OK (E<X>) * P CBE BIN16,W0,D10B ALPHANUM INDICATED * P IB BIN16,D10B,D10D,
0x1555e4…155778 Dummy {f00=0x0065, f01=0x0190, f02=»D ERROR ~ PD10B , P TBT BOOL6,D10NOK JUMP IF BALANCE FORMAT " P MOVE BIN15,BIN16 SAV PIC-TYPE L PD10C r P ADD BIN5,W1 NEXT POS ~ 2 P CBE BIN5,FMTWK(W5),D10NOK NO END OF FIELD = > . P MOVE BIN16,W0 STARTPOINTER PICCHRS-TABLE , P MAT
0x155778…15590c Dummy {f00=0x0065, f01=0x0190, f02=»D10Z * P CBE BIN16,W12,D10J END OF FIELD FOUND P B D10NOK ILLEGAL PIC-STRG : PD10X P ADD BIN5,W1 NEXT POS h 2 P CBE BIN5,FMTWK(W5),D10NOK NO END OF FIELD = > P MOVE BIN16,W0 , P MATCH PICSTR,BIN16,W15,DEINPUT,BIN5,W1 P BNOK
0x15590c…155aa0 Dummy {f00=0x0065, f01=0x018e, f02=»0-14 r P B D10NOK UNDEFINED ERROR PD10D . P SET BOOL8 : $ P B D10X LONG BRANCH INSTRUCTION L PD10F t P ADD BIN5,W1 NEXT POS 2 P CBG BIN5,FMTWK(W5),D10NOK NO END OF FIELD = > P MOVE BIN16,W0 , P MATCH PICSTR,BIN16,W15,DEINPU
0x155aa0…155c34 (1, 197) Dummy {f00=0x0065, f01=0x0190, f02=» ( P TBF BOOL8,D10NOK JUST 'E':S NOT OK PD10J 0 P ADD BIN5,W1 NEXT MATCH POS < 0 P MOVE DEBIN4,FMTWK(W5) RESORE NUMB OF CHARS ` P SUB DEBIN4,BIN5 P CBE DEBIN4,W0,D10OK READY P B D10A SEARCH NEXT FIELD PD10NOK " P MOVE DEBI
0x155c34…155dc8 Dummy {f00=0x0065, f01=0x018e, f02=»EAOK4 INDICATE EDIT-MODE PD10OK P MOVE BIN5,W0 . $ P ERASE 2,W5,W5 CLEAR LINE DESIGN D P MOVE LDISP,=' ' MOVE SPACES l P B DEAOK0 OK P EJECT P* ( P* APPL VALUE HANDLING ROUTINE P* P* P* LONG
0x155dc8…155f5c Dummy {f00=0x0065, f01=0x0190, f02=» P DEA213,DEA214,DEA215, C P DEA216,DEA217,DEA218 & * P B DEE22 JUMP IF APPLE-VALUE OVERFLOW D P EJECT r P* P* APPL = 11,DE21 * P* SAVE NUMBER OF CHARS IN STRG 1 P* PDEA211 6 P MOVE FMTWK(W10),DEBINW1 S
0x155f5c…1560f0 Dummy {f00=0x0065, f01=0x0190, f02=»VE NUMBER OF CHARS IN STRG2 P* $ PDEA212 . 6 P MOVE FMTWK(W11),DEBINW1 STORE NUMB OF ACC.-CHARS < $ P B DEAOK0 OK NO UPDATE OF FIELD v P EJECT P* P* APPL = 13,DE21 P* PDEA213 & P MOVE FRMTPNTR,W0 FORMATPOIN
0x1560f0…156284 Dummy {f00=0x0065, f01=0x0190, f02=»TR1A,='*',DE13A P CLEAR BOOL6 F=USER FORMAT P B DE13B : PDE13A J P SET BOOL6 T=BALANCE FORMAT X PDE13B | P B DEAOK0 P EJECT P* P* APPL=14,DE21 T P* MUST ENTER YES, SET SCHK4-BIT IF C(ONDITIONAL ME
0x156284…156418 Dummy {f00=0x0065, f01=0x0190, f02=»'C',DE14C P B DEE26 ILLEGAL VALUE PDE14C 0 & P SET SCHK4 INDICATE CONDITIONAL ME > P B DE14A CLEAR ME h PDE14B P CLEAR SCHK4 NO COND ME $ P CBE STR1A,='N',DE14A JUMP IF NO P SET ME INDICATE MUST ENTER P B DEAOK0 OK
0x156418…1565ac Dummy {f00=0x0065, f01=0x0190, f02=» AUTOTAB YES/NO SET NEOI-BIT IF YES P* 0 PDEA215 : P PERF DEYN CHECK YES OR NO H P BNOK DEE26 ILLEGAL VALUE j $ P CBE STR1A,='N',DE15A JUMP IF NO P SET NEOI INDICATE AUTO-TAB P B DEAOK0 OK PDE15A $ P CLEAR NEOI IN
0x1565ac…156740 Dummy {f00=0x0065, f01=0x0190, f02=» IF YES h P* PDEA216 " P PERF DEYN CHECK IF YES OR NO ( P BNOK DEE26 ILLEGAL VALUE N $ P CBE STR1A,='N',D16A JUMP IF NO p & P SET VERIFY INDICATE VERIFICATION P B DEAOK0 PD16A * P CLEAR VERIFY INDICATE NO VERIFICATION
0x156740…1568d4 (1, 198) Dummy {f00=0x0065, f01=0x0190, f02=»* PDEA217 P PERF DEYN CHECK YES OR NO P BNOK DEE26 ILLEGAL VALUE : $ P CBE STR1A,='N',D17A JUMP IF NO & P CLEAR NCLR INDICATE INITIAL CLEAR P B DEAOK0 PD17A ( P SET NCLR INDICATE NO INITIAL CLEAR P B DEAOK0
0x1568d4…156a68 Dummy {f00=0x0065, f01=0x018e, f02=» CHECK IF INPUT IS Y(ES) OR N(O) P* , PDEYN PROC 6 ( P MOVE STR1A,DEINPUT LOAD INPUT VALUE H " P CBE STR1A,='N',DEYNOK N(O) OK t $ P CBE STR1A,='Y',DEYNOK Y(ES) OK P CMP W0,W1 CR:#0 P B DEYNRT PDEYNOK P CMP W0,W0 CR:
0x156a68…156bfc Dummy {f00=0x0065, f01=0x0190, f02=» P FTEXT '20 ' P FCOPY =C'FORMAT' P FILLR '-',1 2 P FCOPY =C'DEFINITION' F FNL d P FCOPY =C'PROGRAM:' p ( P FKI 9,MINL=2,MAXL=2,ME,NEOI,APPL=1 P FMEL 'XX',PRNUM P FBF BOOL1,F20OUT P FNL P FTEXT '21 '
0x156bfc…156d90 Dummy {f00=0x0065, f01=0x4144, f02=»COPY =C'BALANCE' P FILLR '-',1 ! P FCOPY =C'FORMAT' ! , P FCOPY =C'DEFINITION' ! F P FNL ! d P FTEXT '23 ' ! p P FCOPY =C'GET' ! P FILLR ' ',1 ! P FCOPY =C'FORMAT' ! P FNL ! P FTEXT '24 ' ! P FTEXT 'COPY ' ! P FCOPY =
0x156d90…156f24 Dummy {f00=0x0065, f01=0x2008, f02=» " P FTEXT '22 ' P FCOPY =C'BALANCE' P FILLR '-',1 : P FCOPY =C'FORMAT' N P FCOPY =C'DEFINITION' h P FNL P FTEXT '23 ' P FCOPY =C'GET' P FILLR ' ',1 P FCOPY =C'FORMAT' PF20OUT FMEND E
0x156f24…1570b8 Dummy {f00=0x0065, f01=0x0190, f02=» b f 0 n 2!X!6 l ! T v ^ X @ T W D V P @ & @ T 2 W A < P C V 0 C V P @ T
0x1570b8…15724c Dummy {f00=0x0065, f01=0x0190, f02=» _" V ~ V 0 9 A ~ P P D D @ D D A @ V T V ~ V 0 ] R D D " = # @ T A _
0x15724c…1573e0 Dummy {f00=0x0065, f01=0x0190, f02=» D D B X._. P 9H P C @ P P D @ W" @ W D @ B V W U @ T W X @ D B @ T B @ T @ W X
0x1573e0…157574 (1, 199) Opaque[0x194]
0x157574…157708 # DirEnt {nam=»DEDDIV«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x14c0, f03=0x0000}
0x157574…157708 IdxSect {
0x157574…157708 f00 = 0x00a6 // 0x157574 @0x0
0x157574…157708 f01 = 0x0010 // 0x157576 @0x2
0x157574…157708 gno = [ // 0x157578 @0x4
0x157574…157708 [0x00]: C0x00a6.0x0.0
0x157574…157708 [0x01]: C0x00a8.0x0.0
0x157574…157708 [0x02]: C0x00ac.0x3.0
0x157574…157708 [0x03]: C0x00ad.0x0.0
0x157574…157708 [0x04]: C0x00b6.0x2.0
0x157574…157708 [0x05]: C0x00b6.0x3.0
0x157574…157708 [0x06]: C0x00b7.0x0.0
0x157574…157708 [0x07]: C0x00b7.0x1.0
0x157574…157708 ]
0x157574…157708 }
0x157708…15789c Dummy {f00=0x00a6, f01=0x0190, f02=» 0 P IDENT DEDDIV REL 10.0 80-04-11,83-02-25,EV & P 83-02-21,EV,BATCH TRANSMISSION 8 P 81-08-27 b P 81-07-10,EV. NJ-AMT v P 80-03-24 L P************************************************************************ P* P*
0x15789c…157a30 Dummy {f00=0x00a6, f01=0x0190, f02=» P* * NAME: , P* * TYPE LENGTH/ IDENTIFIER " P* * NUMBER R P* * v $ P* * BOOL >0 - $ P* * BIN >0 - 4 P* * BCD >0 A,B,C,......
0x157a30…157bc4 Dummy {f00=0x00a6, f01=0x0190, f02=»****************************** f P* & L P************************************************************************ 0 P EJECT P DDIV P TERM T1 P UWB CB1 P CWB CB2 P CWB CB3 P CWB CB4 P CWB CB5 P TWB TB2
0x157bc4…157d58 Dummy {f00=0x00a6, f01=0x018e, f02=»WB TB6 P CWB CB6 SHB WORK ITEM P EJECT , P* : P* DATA-SETS D P* ^ P* h P* r PDISK DSET FC=D0,DEV=DU | PDEDSDYKB DSET FC=20 PDEDSSCRN DSET FC=50 PDEDSPRT DSET FC=36 PDSDCFD DSET FC=61,DEV=DC SHB
0x157d58…157eec Dummy {f00=0x00a6, f01=0x0190, f02=» P* P* P* P START PTSDE " P STACK 400 6 P EJECT H * P* DC TASK FOR BATCH TRANSMISSION V P* P TERM D2 P* P UWB CB1 P CWB CB2 P CWB CB3 P CWB CB4 P CWB CB5 P TWB DU1 P
0x157eec…158080 Dummy {f00=0x00a6, f01=0x018e, f02=» P EJECT P* P* DATA SETS P* 8 P* BATCH TRANSMISSION B P* b PDSDC DSET FC=60,DEV=DC l P START DCTASK P EJECT P* P* TERMINAL-BLOCK: 1 P* ( P* USAGE: DATA RECORD STORING
0x158080…158214 (1, 200) Dummy {f00=0x00a8, f01=0x0190, f02=» P* TERMINAL-BLOCK: 2R 6 P* THIS DATA-BLOCK MUST NOT EXCCED 256 BYTES ( & P* USAGE: FORMAT-DEFINITION b P* PDB1 DBLK " PFDVBCD BCDI (8),5 1=PAGE SIZE P 2=LINE NUMBER P 3=PAGE NUMBER P 4=FIELDNR
0x158214…1583a8 Dummy {f00=0x00a8, f01=0x0190, f02=» x PLDISP STRG 80 LINE DISPLAY PDUPL STRG 6 DUPLICATION-REF. * * PFDVSTR STRGI (5),1 1=KEYED INPUT FIELD N P 2=MUST ENTER FIELD | P 3=AUTO TABULATION FIELD P 4=VERIFICATION FIELD P 5=INITIAL CLEAR P VALUE = Y(ES) O
0x1583a8…15853c Dummy {f00=0x00a8, f01=0x0190, f02=»ER n , PPINDDB BIN POINTERINEX 1ST DESC. BUFFER $ PPINDND BIN NUMB OF DESC BUFFERS : * PFBIN1 BIN WORKITEM FORMAT GENERATION b * PFBIN2 BIN WORKITEM FORMAT GENERATION P EJECT P* B P* THIS DATA-BLOCK MUST NOT EXCCED 188 BYTES
0x15853c…1586d0 Dummy {f00=0x00a8, f01=0x0190, f02=» v & PFORTAB STRGI (21),6 FORMAT 1 - 21 PJOBSPC STRG 1 2 P EJECT H P* V P* TERMINAL-BLOCK: 3R ` B P* THIS DATA-BLOCK MUST NOT EXCCED 188-BYTES = POOL-SIZE P* USAGE: BATCHDATA P* PDB3 DBLK PBD
0x1586d0…158864 Dummy {f00=0x00a8, f01=0x0190, f02=» PBDATES BOOL TESTBATCH PBDAVER BOOL VERIFIED BATCH " & PBDAACT BOOL BATCH DURING ENTERING F , PBDAMVR BOOL RECORDS TO VERIFY IN BATCH p & PBDSTAT STRG 2 STATUS OF BATCHDATA ( PBDPOIN BINI (6) 1 = LAST ENTERED REC P 2 = NUMBER OF R
0x158864…1589f8 Dummy {f00=0x00a8, f01=0x0190, f02=»AL v , PACK BCDI (10),12 ACCUMULATORS 10,NJ-AMT . PUSERV STRGI (9),12 USER-VARIABLES 9,NJ-AMT : P EJECT l P* z P* COMMON-BLOCK: 1 P* 6 P* USAGE: BUFFERPOOL-HANDLING + OTHER TABLES P* PCB1 BLK PPOOL1
0x1589f8…158b8c Dummy {f00=0x00a8, f01=0x0190, f02=»TANT ~ PW64 BIN W'64' CONSTANT PW128 BIN W'128' CONSTANT * PW188 BIN W'188' CONSTANT J PW200 BIN W'200' CONSTANT j & PF95PROC BINI (11) 5 % OF FILESPACE & PSYSV STRGI (10),17 SYSTEMVARIABLES ( PRPOOL STRGI (1),2 BUFFER-REFERENCES
0x158b8c…158d20 Dummy {f00=0x00a8, f01=0x0190, f02=»FFERPOOL | 4 PINSERT STRG '00' FORMCTRL CHRS FOR LISTFUNCTION P EJECT H P* V P* COMMON-BLOCK: 2 ` P* P* USAGE: CONSTANTS P* PCB2 BLK PW0 BIN W'0' CONSTANT PW1 BIN W'1' CONSTANT PW2 BIN W'2
0x158d20…158eb4 (1, 201) Dummy {f00=0x00ac, f01=0x0190, f02=» W'7' CONSTANT PW8 BIN W'8' CONSTANT PW9 BIN W'9' CONSTANT 2 PW10 BIN W'10' CONSTANT N PW11 BIN W'11' CONSTANT l PW12 BIN W'12' CONSTANT PW13 BIN W'13' CONSTANT PW14 BIN W'14' CONSTANT PW15 BIN W'15' CONSTANT P EJECT
0x158eb4…159048 Dummy {f00=0x00ac, f01=0x0190, f02=»NSTANT PW17 BIN W'17' CONSTANT PW18 BIN W'18' CONSTANT , PW19 BIN W'19' CONSTANT J PW20 BIN W'20' CONSTANT h PW21 BIN W'21' CONSTANT PW22 BIN W'22' CONSTANT PW23 BIN W'23' CONSTANT PW24 BIN W'24' CONSTANT PW25 BIN W'
0x159048…1591dc Dummy {f00=0x00ac, f01=0x0190, f02=» " PSYSLEN BIN W'198' RECLEN SYST 0 PFNOOFREC BINI (11) NO OF FREE RECORD IN FILE * P EJECT ^ P* l P* COMMON-BLOCK: 4 v P* " P* USAGE: DISC-HANDLING PCB4 BLK PRECOV BOOL RECOVERY RUNNUNG & PAUTENT BOOL T
0x1591dc…159370 Dummy {f00=0x00ac, f01=0x0190, f02=» * PFCOUNTER BINI (11) COUNTER (USER/FILE) , PFINDEXPO BINI (11) POOLIND TO FREESP-REC 2 PFRINF BINI (11) FILESTATUS b ( PFFSNR BINI (11) REC.NUMBER FREESPACE $ PRBUFLN BIN RECORDBUFFERLENGTH PPRKEYS STRG X' KEYMASKS C , P 0444400000 T
0x159370…159504 Dummy {f00=0x00ac, f01=0x0190, f02=»H SUPERVISORY MODE. C , P 0888000000 (PROGRAMNUMBERS 10 - 19). C . P 0000000000 THE FIRST HALFBYTE IS USED C N * P 0880000000 BY PROGRAMNUMBER 10,THE C . P 0000000000 NEXT BY 11 AND SO ON UP TO C $ P 0000000000 PROGRAMNUMBER 19. C P
0x159504…159698 Dummy {f00=0x00ac, f01=0x0190, f02=» & P A KEYMASK AND CONSISTS OF FOUR P BITS CORRESPONDING TO THE . P FOUR KEY-SWITCHES ON THE R $ P KEYBOARD.FOR INSTANCE IF THE v $ P BYTE IS X'60',THE FIRST HALF- P BYTE IS 6, THEN THE P BITS 0110 MEANS THAT THE " P
0x159698…15982c Dummy {f00=0x00ac, f01=0x0190, f02=»PROGRAMNUMBERS C x P 803F 00 - 15 C P 0F83 16 - 31 C 0 P 80FC 32 - 47 C H P 3C0F 48 - 63 C ` P 8380 64 - 79 C x P 0000 80 - 95 C P 0000 96 - 115 C P ' P EJECT L P* DEVTYP
0x15982c…1599c0 Dummy {f00=0x00ac, f01=0x0190, f02=» CLASS = 1 DATA-COMM. OUT P = 2 DATA-COMM.IN & P = 3 CASSETTE J " P = 4 PRINTER LP/GP j P = 5 DISK-FILE $ P = 6 FLOPPY-DISC FILE $ P = 7 DELETE USERFILE PDEVTYP
0x1599c0…159b54 (1, 202) Dummy {f00=0x00ad, f01=0x0190, f02=» $ P 4C50003004 LP[]<FC=00><CL=4> C $ P 4750003604 GP[]<FC=36><CL=4> C , $ P 000000D005 DU[]<FC=D0><CL=5> C T $ P 464400F806 FD[]<FC=F8><CL=6> C | $ P 444C550007 DLU <FC=00><CL=7> C $ P 46524F0008 FRO <FC=00><CL=8> C $ P 47504C3609 GPL <FC
0x159b54…159ce8 Dummy {f00=0x00ad, f01=0x0190, f02=» P F0 FIX DISC1 6875/6876 C P F1 CARTRIDGE 1 6875/6876 C & P F2 FIXDISC 2 6875/6876 C J P F3 CARTRIDGE 2 6875/6876 C l P F8 FLEX 1 6879 C P F9 FLEX 2 6879 C P FA FLEX 3 6879 C P FB FLEX 4 6879 C P FC 80-MB 6877
0x159ce8…159e7c Dummy {f00=0x00ad, f01=0x0190, f02=»5 BLK PD1 BCD 2D'1' CONSTANT " PFDIR STRG X' FORMAT DIRECTIV C , P E9 0 = DUMMY C R P C0 1 = FCOPY C j P C2 2 = FMELI C P C3 3 = FTEXT C P C4 4 = FTAB C P C5 5 = FVAL C P C6 6 = FGEN C P C7 7 = FACC
0x159e7c…15a010 Dummy {f00=0x00ad, f01=0x0190, f02=»KI C P F2 14= FKI APPLE<255 C P F3 15= FKI APPLE>255 C , P F8 16= FKI DUPL C L " P FA 17= FKI APPLE<255 DUPL C h " P FB 18= FKI APPLE>255 DUPL C P ' P EJECT PSYSBUF STRG 256C DISC BUFFER PDATE BCD 8X'0F000000'
0x15a010…15a1a4 Dummy {f00=0x00ad, f01=0x0190, f02=»GI (8),1 MODE TABLE C P C'P',C'F',C'J',C'E' C P C'S',C'V',C'C',C'H' > P EJECT & PVALSTR STRG X' VALIDATION STRING C j P 4D 0. M=MESSAGE C P 2F 1. /=NOT C P 3D 2. ==EQUAL C P 3E 3. >=GREATER C P 3C 4. <
0x15a1a4…15a338 Dummy {f00=0x00ad, f01=0x0190, f02=» A=ACCUMULATOR C P 53 9. S=SYSTEM VARIABLE C P 55 10. U=USER VARIABLE C < P 46 11. F=FORMAT FIELD C ^ P 54 12. T=VALUE SET C * P 43 13. C=CODED VALIDATION ROUTINE C P 45 14. E=EMPTY FIELD C P* P 2B 15. +=ADD C
0x15a338…15a4cc Dummy {f00=0x00ad, f01=0x0190, f02=» p P 26 20. &=LOGICAL AND C P 56 21. V=LOGICAL OR C ( P* H P 3F 22. ?=INSIGNIFICANCE C R " P 27 23. '=LITERAL SEPARATOR C v $ P 5A 24. Z=ZEROISE ACCUMULATOR C P 47 25. G=GO TO FIELDNR C $ P 52 26. R=NEXT FORMAT CHANGE C
0x15a4cc…15a660 Dummy {f00=0x00ad, f01=0x0190, f02=» )=RIGHT PARENTHESIS C P ' P EJECT * PSTATIU STRG X' STATIU C 8 P 4D 0. M=MUST VERIFY C X P 45 1. E=ENTERING C x P 56 2. V=VERIFIED C P 54 3. T=TEST ENTERED C P 46 4. F=FORCED C P 43 5. C=CONVERTED C P
0x15a660…15a7f4 (1, 203) Dummy {f00=0x00b6, f01=0x0190, f02=»PICSTR STRG X' PICTURECHARCTERS C & P 4C 0. L=LEFTADJUSTED ALPHANUM C * ( P 52 1. R=RIGHTADJUSTED ALPHANUM C T * P 41 2. A=LEFTADJUST TO LEAD. DIG. C $ P 50 3. P=SKIP THIS POSITION C * P 54 4. T=LEFTADJ. TO LEAD. N. ZER C $ P 58
0x15a7f4…15a988 Dummy {f00=0x00b6, f01=0x0190, f02=»8. +=PRINT + OR - SIGN C ( P 53 9. S=SIGN, -SIGN IF NEGATIV C P 2C 10. ,=INSERT COMMA C L P 2E 11. .=ROOMLESS POINT C n & P 3E 12. >=END OF PICTURE STRING C ( P 3C 13. <=BEGIN OF PICTURE STRING C P 30 14. 0=LEFT ZERO FILL C
0x15a988…15ab1c Dummy {f00=0x00b6, f01=0x0190, f02=»S POINT C | & P 45 2. E=INSERT NEXT CHARCTER C " P 58 3. X=0 LEFT ZERO FILL C < P ' b * PLRUQUE STRG 48 LEAST RECENT USED QUEUE n P EJECT P* P* TERMINAL-BLOCK: 2 P* 2 P* USAGE: TERMINAL-DEPENDENT VARIA
0x15ab1c…15acb0 Dummy {f00=0x00b6, f01=0x0190, f02=»F, ~ PKEY1 BOOL ...T=ON. ! PBOOL1 BOOL WORKITEM ! & PBOOL2 BOOL WORKITEM ! B PBOOL3 BOOL WORKITEM ! ^ PBOOL4 BOOL WORKITEM ! z PBOOL5 BOOL WORKITEM ! PBOOL6 BOOL WORKITEM ! PBOOL7 BOOL WORKITEM ! PBOOL8 BOOL WORKITEM ! PBO
0x15acb0…15ae44 Dummy {f00=0x00b6, f01=0x0190, f02=»TED ! p P EJECT " PDEBIN1 BIN WORKITEM " PDEBIN2 BIN WORKITEM " 6 PDEBIN3 BIN WORKITEM " R PDEBIN4 BIN WORKITEM " n PDEBIN5 BIN WORKITEM " ( PUSELEN BIN LENGTH OF MAX RECORDAREA " PKEYMSK BIN MASK AUTHORITY " & PNUMBER BCD 7 CURRENT
0x15ae44…15afd8 Dummy {f00=0x00b6, f01=0x0190, f02=»JOBNAME STRG 6 CURRENT JOBNAME " " PBATCH STRG 6 CURRENT BATCHNAME # & & PFORMAT STRG 6 CURRENT FORMAT-NAME # L " PSYMBOL STRG 6 CURRENT SYMBOLIC # v " PSTATSH STRG 133 SEARCH STATUS # P EJECT # P* # P* TERMINAL-BLOCK: 3 # P* # " P*
0x15afd8…15b16c Dummy {f00=0x00b6, f01=0x018e, f02=»L -"- # PSWIT04 BOOL -"- $ PSWIT05 BOOL -"- $ . PSWIT06 BOOL -"- $ J PSWIT07 BOOL $ f PSWIT08 BOOL USED IN DEDISC $ z $ PSW95PR BOOL 95% FILESPACE USED $ $ PSOOL1 BOOL USED FOR STATUSLINE $ PSOOL2 BOOL -"- $
0x15b16c…15b300 Dummy {f00=0x00b6, f01=0x0190, f02=» $ $ PFLIND BINI (32) FORMATLINKINDEX % * PRNRFMCH BIN CURRENT RECNO FMT-CHAIN % 0 * PMAXOCC BIN RESERVED FOR DISCHANDLING % ^ $ PPTRFMCH BIN POINTER IN RNRFMCH % * PCURSEC BIN CURRENT SECTORNO USERFILE % $ PFILINDUS BIN INDEX FOR USERFILE % ,
0x15b300…15b494 (1, 204) Dummy {f00=0x00b6, f01=0x0190, f02=»OBCUR BIN LINK TO JOB-DEFINITION % & PPINDFR BIN POOLINDEX TO CURR FMT & * * PPINACC BIN POOLINDEX TO ACCUMULATORS & T * PPWBDB4 STRG 16 SAVEAREA FOR WORKBLOCKS & P AND DESCRIPTORS & " PSTR64A STRG 64 STRINGWORKITEM & 6 PSTSAVE STRGI (5),6 THI
0x15b494…15b628 Dummy {f00=0x00b6, f01=0x0190, f02=»ITIONAL FORMAT CHANGE & $ P 4 = COND. FORMAT CHANGE (R) ' P 5 = FILE NAME SHB FD ' F P EJECT ' f P* ' t P* TERMINAL-BLOCK: 4 ' ~ P* ' 0 P* USAGE: BOOLEAN AND BINARY WORKITEMS ' P* ' PTB4 BLK ' PDBOBAL BOOL BAL
0x15b628…15b7bc Dummy {f00=0x00b6, f01=0x0190, f02=»OOL TESTENTERED RECORD ' PDBOVER BOOL VERIFIED RECORD ( $ PDBOACC BOOL MUST BE ACCUMULATED ( D " PDBOMVR BOOL MUST BE VERIFIED ( l " PDOOL1 BOOL USED IN ENTRY MODE ( PDOOL2 BOOL -"- ( PDOOL3 BOOL -"- ( PDOOL4 BOOL -"
0x15b7bc…15b950 Dummy {f00=0x00b6, f01=0x0190, f02=» ( n P IF NOT OPEN OLD BATCH ) P EJECT ) ( PBIN1 BIN WORKITEM ) 6 PBIN2 BIN WORKITEM ) P PBIN3 BIN WORKITEM ) j PBIN4 BIN WORKITEM ) PBIN5 BIN WORKITEM ) PBIN6 BIN WORKITEM ) PBIN7 BIN WORKITEM ) PBIN8 BIN WORKITEM ) PBI
0x15b950…15bae4 Dummy {f00=0x00b6, f01=0x0190, f02=»BIN14 BIN WORKITEM ) PBIN15 BIN WORKITEM * PBIN16 BIN WORKITEM * 8 P EJECT * T P* * b P* TERMINAL-BLOCK: 5 * l P* * D P* USAGE: BCD-/ STRG-WORKITEMS AND DENTERPACKAGE VARIABLES * . P* BOOLEANS: BITS OF CTLWORD IN FK
0x15bae4…15bc78 Dummy {f00=0x00b6, f01=0x0190, f02=»ECK 4 * z PACKUM BOOL ACCUMULATOR BIT + PVERIFY BOOL VERIFY-BIT + 2 PCTAB BOOL COND.-TAB.-BIT + R PNCLR BOOL T NO CLEAR-BIT + t PREWRT BOOL REWRITE-BIT + " PNEOI BOOL NOT-END-OF-ITEM-BIT + PALPHA BOOL ALPHANUMERIC BIT + PME BOOL M
0x15bc78…15be0c Dummy {f00=0x00b6, f01=0x0190, f02=» + t PDEBINW4 BIN DENTERVARIABLE , ( PFRMTPNTR BIN POINTER TO FMT ON DISC , , " PDEINPUT STRG 81 DENTERVARIABLE , X PBCD2A BCD 2 WORKITEM , ~ PBCD3A BCD 3 WORKITEM , PBCD13A BCD 13 WORKITEM , PSTR1A STRG 1 WORKITEM , PSTR2A STRG 2 WORKITEM
0x15be0c…15bfa0 Dummy {f00=0x00b6, f01=0x0190, f02=»),21 WORKITEM(4-7)DK , P 4-DECONV,SEQUENCE NO,DK - P 5-DECONV,RECORD NO,DK - > P 6- DC, PASSWORD - ^ P 7- DC, BRUGERNAVN - x P EJECT - P* - P* - P* TERMINAL-BLOCK: 6 - P* - PTB6 BLK - & PNEWVOL BOOL F 'NEW VOL
0x15bfa0…15c134 (1, 205) Dummy {f00=0x00b7, f01=0x0190, f02=»N - l ( PSWITUS BOOL F USERFILE ASSIGNED Y/N . & PASDFLAG BOOL T AUTOMATIC SKIP/DUP . 6 PSEARCH BOOL SEARCH MODE . ` * PCHKACC1 BOOL F CHECK ACCUMULATION SHB . * PCHKACC2 BOOL F CHECK ACCUMULATION SHB . $ PCHKBAL BOOL F CHECK BALANCE SHB . * PFSUP
0x15c134…15c2c8 Dummy {f00=0x00b7, f01=0x0190, f02=»ONTINUATION CHAR,DK . , PFIRSTFL BOOL F T=FIRST RECORD HEADER,DK / & PSPLITFL BOOL T T=NORMAL SPLIT, DK / L P EJECT / v & PELMNO BIN ELEMENT-NO, VALUE-SETS / ( PPINDTB BIN POOLINDEX TO VALUE-SETS / ( PDKBIN1 BIN WORKITEM, DISC-ROUTINES / ( PDK
0x15c2c8…15c45c Dummy {f00=0x00b7, f01=0x0190, f02=» ( PTABLE STRG 6 TABLE-NAME (VALUE-SETS) 0 PEOLINE BIN END-OF-LINE 0 0 ( PVSEIND BIN VALUE-SET ELEMENT INDEX 0 P " PWORK BINI (19) FREE WORK ITEMS 0 | P WORKITEM 11,12 USED BYE 0 P SEARCH MODE 0 " P WORKITEM 13 USED BY DECONV 0 " P WORKI
0x15c45c…15c5f0 Dummy {f00=0x00b7, f01=0x0190, f02=» P 18,DECONV,POS.SEQ.NO,DK 1 " P 19,DECONV,LENGTH SEQ.NO,DK 1 & PBTYPE BIN TYPE IN DKCONV,DK 1 L PSTR8A STRG 8 WORK ITEM DK 1 p PSTR8B STRG 8 WORK ITEM DK 1 PRECLGD BCD 4 RECORD LGD, DK 1 P EJECT 1 P* 1 P* COMMON WORKITEM FOR SH
0x15c5f0…15c784 Dummy {f00=0x00b7, f01=0x018e, f02=»BOOL F T=ABORT FD CONVERSION 1 $ PFDEOF BOOL F T=END OF FILE ON FD 2 $ ( PLSBAB BOOL F T=ABORT LIST CONVERSION 2 L ( PTCUADR BIN X'6040' TCU LINE ADDRESS 2 x $ PREQLEN BIN REQUESTED LENGTH DC 2 PDCWRK BIN DC TASK WORK 2 $ PTSKADR BIN X'0040' TASK ADDR
0x15c784…15c918 Dummy {f00=0x00b7, f01=0x0190, f02=» PFDCNT BCD 4 FD NUMBER 3 PDCBUF STRG 504 DC BUFFER 3 " P EJECT 3 B P* 3 P P* DUMMY WORK BLOCKS 3 Z P* 3 z PDU1 BLK 3 PDUM1 BOOL 3 P* 3 PDU2 BLK 3 PDUM2 BOOL 3 P* 3 PDU3 BLK 3 PDUM3 BOOL 3 P* 3 P
0x15c918…15caac Dummy {f00=0x00b7, f01=0x409e, f02=»BLK 3 PDUM7 BOOL 4 P* 4 PDU8 BLK 4 ( PDUM8 BOOL 4 8 P* 4 J PDU9 BLK 4 T PDUM9 BOOL 4 d P* 4 v PDIV 4 END 4 @ 4 3 P* 3 PDU2 BLK 3 PDUM2 BOOL 3 P* 3 PDU3 BLK 3 PDUM3 BOOL 3 P* 3 P
0x15caac…15cc40 Dummy {f00=0x00b7, f01=0x2008, f02=» 5 EOLINE BIN END-OF-LINE + ( PVSEIND BIN VALUE-SET ELEMENT INDEX + ( " PWORK BINI (12) FREE WORK ITEMS + T P WORKITEM 11,12 USED BYE + z P SEARCH MODE + PDIV + END + @ + SC-ROUTINES * ( PDKBIN2 BIN WORKITEM, DISC-ROUTINES
0x15cc40…15cdd4 (1, 206) Dummy {f00=0x00b7, f01=0x0190, f02=» !!Nb? )? ( h < Q j p % t " & h { , l " ! Y "TODC KEYVIAFILENAMET
0x15cdd4…15cf68 Dummy {f00=0x00b7, f01=0x0190, f02=»IA XTTT9XXXXAAAAAAAAAAAA9 U & U 45 @ - = & ' 2 72 J 5 K 71 J 8 G : : ! k = : : " l : : !A k = : : "A l % ' 2 ' ) ' . 53 % B > 52 % = > 51
0x15cf68…15d0fc Dummy {f00=0x00b7, f01=0x0190, f02=» h d & % $ h ? 7 / ; ' h ! ; ' FETCHING FORMAT: FROM DISC. @ U E : e # BRUGERNAVN ' KENDEORD & $ ' B - A : # B - C : -e@ ~ 60 * h d0 61
0x15d0fc…15d290 Dummy {f00=0x00b7, f01=0x0190, f02=»- = ! " ) # $ % ) & ' ( ) ) * + ) , - . ) / 0 1 ) 2 3 4 ) 5 6 7 ) 8 $ ) . 4 : @ F L S Z c l u 0
0x15d290…15d424 Dummy {f00=0x00b7, f01=0x0190, f02=» h d & % $ h ? 7 / ; ' h ! ; ' FETCHING FORMAT: FROM DISC. @ U E : e # BRUGERNAVN ' KENDEORD & $ ' B - A : # B - C : -e@ ~ 60 * h d0 61
0x15d424…15d5b8 Dummy {f00=0x00b7, f01=0x0190, f02=» z | 2 $WU6 _ PCWD1& .T !05 T W/ W- W)6 ! W D( ( SUW 6 W W W W W 4 6 I i 40 Td W W^ %X / 1 3 @ @ A T U0C T 1& # 0 T) ; Z G m " W W 6 W W _| EW 60 A _ 0 _ I P
0x15d5b8…15d74c Dummy {f00=0x00b7, f01=0x0190, f02=» 0 90 Z -I 3 !a , U0C T 1& &0 @ 0 0 & ? U0C T 1& '_+ 6 D I 5 W W4 %X / 1 3 @ @ @ @ T U0C T 1& $ Y? EW A ? K H 1& -A ? K !05 % - ! ? _ W'W*W(? K M - ! ? W W W W
0x15d74c…15d8e0 Dummy {f00=0x00b7, f01=0x0190, f02=» 40 TP W WJ %X / 1 3 @ @ A T, U0C T 1& % W W 6 ! W W ? EW A ? ' :0G 7? K "H 1& -A ? K 3I $ " W !05 E - ! ? W W W W %_e _j _"W WA !_( W W : '0G 7 7 _" W _"2
0x15d8e0…15da74 (1, 207) Opaque[0x194]
0x15da74…15dc08 # DirEnt {nam=»DLINK «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0cf8, f03=0x0000}
0x15da74…15dc08 IdxSect {
0x15da74…15dc08 f00 = 0x0067 // 0x15da74 @0x0
0x15da74…15dc08 f01 = 0x0030 // 0x15da76 @0x2
0x15da74…15dc08 gno = [ // 0x15da78 @0x4
0x15da74…15dc08 [0x00]: C0x0067.0x3.0
0x15da74…15dc08 [0x01]: C0x0068.0x0.0
0x15da74…15dc08 [0x02]: C0x0068.0x1.0
0x15da74…15dc08 [0x03]: C0x0068.0x2.0
0x15da74…15dc08 [0x04]: C0x0068.0x3.0
0x15da74…15dc08 [0x05]: C0x0069.0x0.0
0x15da74…15dc08 [0x06]: C0x0069.0x1.0
0x15da74…15dc08 [0x07]: C0x0069.0x2.0
0x15da74…15dc08 [0x08]: C0x0069.0x3.0
0x15da74…15dc08 [0x09]: C0x006a.0x0.0
0x15da74…15dc08 [0x0a]: C0x006a.0x1.0
0x15da74…15dc08 [0x0b]: C0x006a.0x2.0
0x15da74…15dc08 [0x0c]: C0x006a.0x3.0
0x15da74…15dc08 [0x0d]: C0x006b.0x0.0
0x15da74…15dc08 [0x0e]: C0x006b.0x1.0
0x15da74…15dc08 [0x0f]: C0x006b.0x2.0
0x15da74…15dc08 [0x10]: C0x006b.0x3.0
0x15da74…15dc08 [0x11]: C0x006c.0x0.0
0x15da74…15dc08 [0x12]: C0x006c.0x1.0
0x15da74…15dc08 [0x13]: C0x006c.0x2.0
0x15da74…15dc08 [0x14]: C0x006c.0x3.0
0x15da74…15dc08 [0x15]: C0x006d.0x0.0
0x15da74…15dc08 [0x16]: C0x006d.0x1.0
0x15da74…15dc08 [0x17]: C0x006d.0x2.0
0x15da74…15dc08 ]
0x15da74…15dc08 }
0x15dc08…15dd9c Dummy {f00=0x0067, f01=0x0190, f02=»Dl k FCR x D I |D R D X D c D n D u D D D D D D 6D D l |CB1 @
0x15dd9c…15df30 Dummy {f00=0x0067, f01=0x0190, f02=» | F Z 4 a 6 P
0x15df30…15e0c4 Dummy {f00=0x0067, f01=0x0190, f02=» x * z
0x15e0c4…15e258 Dummy {f00=0x0067, f01=0x0190, f02=»
[…0x1…]
0x15e3ec…15e580 Dummy {f00=0x0067, f01=0x0190, f02=» n 6 $ B 8
0x15e580…15e714 (1, 208) Dummy {f00=0x0068, f01=0x0190, f02=» " " ? < DC a GP 6 FD DLU FRO B . D Z
0x15e714…15e8a8 Dummy {f00=0x0068, f01=0x0190, f02=» SYSVOLSYSVOLSYSVOLSYSVOLSYSVOLSYSVOLSYSVOLSYSVOLPFJESVCHM/=><DL!ASUFT
0x15e8a8…15ea3c Dummy {f00=0x0068, f01=0x0190, f02=» 0 M U t ~ 0 * B 0
0x15ea3c…15ebd0 Dummy {f00=0x0068, f01=0x0190, f02=» B @
0x15ebd0…15ed64 Dummy {f00=0x0068, f01=0x0190, f02=» . D2 x * ( `@ @ & 0
0x15ed64…15eef8 Dummy {f00=0x0068, f01=0x0190, f02=» j pDl z > h h 3 p 1 l t x xDh 0 0}0 o0 oA T 0 K 0 Ad1 An@m 6 _ @n_ 1 An _% ) !P V _, 6 ## _ jX 3 0 0}@d "P n_r 4 # 6 P 7MW (j "M (
0x15eef8…15f08c Dummy {f00=0x0068, f01=0x0190, f02=» Vv 0 !!W6 'WH ! W+ " W% h * h `h h h 2` W 4 !4 "4 $4 & #4 H "4 4 * 4 | z { !V f 4 * " j !!L 0 /P /0 f 4 0 f 4 4 0 0 0 $0 T 0 0 W 0 W 0 4P +W 4 0 4 j
0x15f08c…15f220 Dummy {f00=0x0068, f01=0x0190, f02=» 4 $ !"4 "!4 !!4 I @w 0 0 V # 4 A 0 _ @ P 0 0 4 b !& bc 4 c b"R b! b 0 `" !($ 5W% a a0$a, 0 `aW a$$a, 0 `a0 ` b#$ ! 0 `f `f b" c$" ! b c b" W !4 ( #M0 T ! ! P.W< !0 P) * 2 *#U 1 *
0x15f220…15f3b4 (1, 209) Dummy {f00=0x0068, f01=0x0190, f02=»':# "& &r 2( ( ( (p! 4 x L B H bHb, v4 B5 % [ a ~ $ D ~ e ) 1 @ | H B "
0x15f3b4…15f548 Dummy {f00=0x0068, f01=0x0190, f02=»ELEMENTNAME: TPROGRAM:REL 10.0SIZE OF DEFINITION VALUE-SETS70 CONVERSION10 SUPERVISORY FUNCTIONS1 99XXXXXXXXXXXXXXXXXXXXXXX-
0x15f548…15f6dc Dummy {f00=0x0068, f01=0x0190, f02=» U U RETURN FROM DATA-ENTRY U h d ' . ) e e @
0x15f6dc…15f870 Dummy {f00=0x0068, f01=0x0190, f02=»- - 30 - - 40 ! 50 % 60 & / $ ( - 2 7 = C I O V ] d l t | 0 0 ! ' . 5 < D
0x15f870…15fa04 Dummy {f00=0x0068, f01=0x0190, f02=» P " 9F 9F & 9F &9B %W _ 7 9F F C W ( = Wn _ 9F & 9F & 9F ( : T P< P8 <<HT _ R <A_ <A <a ^ <h = F F ) 9F ' D T 9F & X X X* T Z0 I R < _ <h =
0x15fa04…15fb98 Dummy {f00=0x0068, f01=0x0190, f02=» V V Q WR _< _B 7 9F C 9F ( B T B $ ' Y 9F ' D _ 9F 9F : 9F 9F 9F 9F 9F P < C 9h9G & C 9b! 8 #_h B " ' ""? 99g! ":e" B =_ _f 9F 9F & 9_
0x15fb98…15fd2c Dummy {f00=0x0068, f01=0x0190, f02=» W P 8 _> 9F 9F 9F 9F P 8# ' Y = # _ _ _ _ _ 9F 9F ' 9F _ 9F & 9F ]8 Z YB_J W 7 9F & C 9F 9F & C 9F & C C ( B X _ W & Y < * C _& 7 9F 9F
0x15fd2c…15fec0 Dummy {f00=0x0068, f01=0x0190, f02=» E 0 E , Y E . D 9F 3 X ' 9F X P &V Y , X Y / X Y ) 9F 3 & Y _P W _ 9F P2 T !00R$ !99Q $ Y T U U _6 T P Y P 9F V E D 9F 9F P P
0x15fec0…160054 (1, 210) Dummy {f00=0x0068, f01=0x0190, f02=»9F 9F & C C T #W T # C C 6" 9F#0 I| 8 & + P _ I D 9F#03 I| 9F;d # + D 9F #0 0T & ! T P & ! X T C D % &4 * Y ( x P Y * # x y Wv X "
0x160054…1601e8 Dummy {f00=0x0068, f01=0x0190, f02=» Y , * X X C & C C ( B Ph9 R^9 $ X !@PP X X * b ) Y * Y , X , * x X *YrP y X " x Y X " T Y _ % _ B U C Q C D" " " " # $ % #2 X X * $" ~_> @ Y X * ! _R X !@XX y X # x V y
0x1601e8…16037c Dummy {f00=0x0068, f01=0x0190, f02=» * X 1 1 X !@T X $ " P y _ x T % $ X H X X * , )$ P _ : % ' Y 8 &4 y x C y X C C X ( x Tf B %,9 R 9 $ X ! T % _ y C Q " T * * X !
0x16037c…160510 Dummy {f00=0x0068, f01=0x0190, f02=» C X !? x P Q( B y " y $ c 3 C _$ _ % y _6 # x X@ X * X # * C _. B ]d P C Q8X8_H x XD @ Y c C y XR X x * % $L x X X # * _ B % C *p : + * X * * (
0x160510…1606a4 Dummy {f00=0x0068, f01=0x0190, f02=»I : 8 9F &b 9F &b " 9F &b $ : ! P # P I| : 3 2! I Y " 4 9F 4* 9F !0 I| ; 3 X "T X 3 * 3 3 9F !0 I| X 3 & 3 4 ' 9F ! Y 0T V 4* ;
0x1606a4…160838 Dummy {f00=0x0068, f01=0x0190, f02=» 3 X ! 3 3 3 X " 9b! X :c 2" I H' 3 @ W W W W W W W 3 Y ( Y 09H Y * Y 4 Y 2 Y 69h Q X :h Y 0 +lW U X Q ,jW Y 0 +d , 7 6 3 9H Y * *&W W * 6 X 0T I X 2
0x160838…1609cc Dummy {f00=0x0068, f01=0x0190, f02=» U Q I Y Q P W W Y ( +d C 3 X *! P V L ! 3 D X 0 Y 8 ) P 3 Y 0 X 0 X 2] X 8 Y 0 ) : X 0 :H* 3 : X 2T Y 2 : C 1 B ] 7 : * X +! I X +! U 9K Y ( Y + +d , 3 9H Y * 2 Y
0x1609cc…160b60 Dummy {f00=0x0068, f01=0x0190, f02=»_( _ X * * P * B _N ( 4 X D D : K + Q 2 P. P8 8 @l ( 4* B X # V : 9F ? _0 ; _>GZGX9FGXGXGXG GFGB@D?D@D> , .`.`GX, GX? W W X 0Q ,j ,h Y ( Y *P 6 > +< X <'
0x160b60…160cf4 (1, 211) Dummy {f00=0x0068, f01=0x0190, f02=»P P T0 " X _@ " P" 6 X *# P B 1 6 W I " P X X( C : X *! P P T I P 6 3: C W @ X (T W X y 6 Y ( : X (;n 3 GZ? @l? ? - G GFGB@0?D@:> , - - @N, GX? 3 Y . Y ,W 3 Y . X ( X ." PV X 0
0x160cf4…160e88 Dummy {f00=0x0068, f01=0x0190, f02=» T " T : " I Y . 1 Y ( ?D 3 Y *T " T ! 1 W ! ) @ : 3 ? F P & Y *T - : X > T X & V D ! T W @ 2 3 X >P( R Q" X & V D ! P $ ! P %_ @ : 3 V Y " X .9H $ F P & X (
0x160e88…16101c Dummy {f00=0x0068, f01=0x0190, f02=»Pn P P I 0 P< 1*WZ X ! X $" P<Q X (# P2 X # :! R$W 1* 0 T$ @ Y (W Y , 1 W 1 Y ( ?D : X *:h X (! # P X & V L TbW X , X 0P@ 0 T, X *:h XF XL X (!@T @ Y ( X , Y t X 0 l 1*_r X ( P Y (_
0x16101c…1611b0 Dummy {f00=0x0068, f01=0x0190, f02=»1R X (P 0 3F 8 Y 0 X 2P X 0V _z Y ( " T Y ( : 8 2 9F 8 V Y 8 : " P X & V ( P 1 : : 0 "0P $ T W %T : : Y ( X $ Y X " Y X & Y X < Y @ : Y : 3 X : X ( T X & V H " V
0x1611b0…161344 Dummy {f00=0x0068, f01=0x0190, f02=»=H Gb 2` X *! T" X y 4 @ X (T y 6W4 X y 6W, @ X (P W" X & V D ! P @ W X 3 W Y ( : X , Y X $ Y X &T Y Y Y WD V $:H D Y D :H Y ! P V Y 9FW Y ! P 8 W V Y 2 V Y : 9F ? : 2'
0x161344…1614d8 Dummy {f00=0x0068, f01=0x0190, f02=» Y : W 8 V ? 3 Y Y Y < V E D B X _ v : C C 7 : C 7 :( R : V E V D ' $ I W 3 P D X =' V W V Y =P 3 : ( D 7 "R V I D 7
0x1614d8…16166c Dummy {f00=0x0068, f01=0x0190, f02=»W 7* 6" 5 / 6& _ 7 8` 8 P 9F <H : 5(W 7 8 9F &P B V C / <H "!@ I : 7 8 C C W 8 C C J5~ ' W 781"&$ 39#$;< '()*+,-! 8 8d 8 9F P _D 7 B 9F 'W 7 ( Wb 9F 8
0x16166c…161800 Dummy {f00=0x0068, f01=0x0190, f02=»% P C + B D 7z I "%@P "% P& B C C 4 "5 # B P B P B 5 P C : 7 6 >~ 6 C 6j C B B P C 7 : "!@T I V I C B : ( ' P 7z I : 7 8 % Y 8 C 9F & I
0x161800…161994 (1, 212) Dummy {f00=0x0069, f01=0x0190, f02=» ;" V H I ;D:B " : _, 9F C : : 7 8 "! P C : 8 P C W $0 P I| C B. : C "!@P ") # B C B % C : T X ` :l:d:h 9F W W P W 6 2# ;BW4 @ j E8 " T> ; [
0x161994…161b28 Dummy {f00=0x0069, f01=0x0190, f02=» 2 ;BW$ " P& Pd" # ;" ;b Wv " ;d# _ [ v [ 4 9F 4* Z Z : R ; 9F 6 : F _v I :B , (V ; H [ [ [ 9F Z (;AR H WD I I Z H #
0x161b28…161cbc Dummy {f00=0x0069, f01=0x0190, f02=» : [ [ 9F & @ j! P I Z I [ 6 [ Z 7 8 Z 7 : ( :A ( :mT @ l" P ! P [ :;H 2 9~ 9 ;h ;, : ; V Y : 2! : 6 2 ;BW& " # ;";b ;
0x161cbc…161e50 Dummy {f00=0x0069, f01=0x0190, f02=» & P Q <z ,^ , < < # ; [ _n' d V W V 4! P < S S S X 4 9d * & ! R + : V W R 4 0R Y 7 Y& P Z,;D 9_8 8 _< V W YL T 9 : I &9d! +
0x161e50…161fe4 Dummy {f00=0x0069, f01=0x0190, f02=»P 7 Y Z $ _ : !! gg++ L 33 G`8 8 ; Gb; 8 9FGZ? @l? ? GXG GFGB@0?D@:> @ F F @N@ GX? >X 6 ? K K K K V K : 9F > > >X 8 V ? ? ? V Z P 2 " T
0x161fe4…162178 Dummy {f00=0x0069, f01=0x0190, f02=» V I 7_ Z ? @ h! P 3 Z 7 Z Z P 3 : V R (Q V : z z : > J P v I < : J Qx : Pn 4 ! Th_ PX 4 WT K @XWJ @ W +_ @0 @, K W. _&
0x162178…16230c Dummy {f00=0x0069, f01=0x0190, f02=» * [ R !FFP !EET W IB" 6 * B Z 9 ! ; *Xt 8 ! DB 0P Wv 0W@ Wn :T& *W4 FP . :T Z ! XBW *X& FWH :P"# U J I 1 @ !00T ; @Z _ 9P F " X># ; W )0_B J R( Z R 4! P ;)0 9U ? I Z
0x16230c…1624a0 Dummy {f00=0x0069, f01=0x0190, f02=» |`. PT*AXYZ9 8 #0 T & C C : BN C C : & T ;d# P V P P* 9A:AV X R _ V 4 _P :#0 T B 'W I| B B " B : PC C PR LC R R _ R _
0x1624a0…162634 (1, 213) Dummy {f00=0x0069, f01=0x0190, f02=» d w5 1 C 8 #0 T B ' : I| B B B : 8 P C #0 T & C C : I| BN C C :D D D E F E F ; bxb~c d f f E F F F$F$FjD F$F$>xi i i i:i h E F F F F E E E E 3 W V 7 @ h! P 3 P W
0x162634…1627c8 Dummy {f00=0x0069, f01=0x0190, f02=»Df]h H _n I 2 P V W< _ 2 # ;B Fd V T W V P L , V 2P " 2 P V D ! R T V P V 3 W V P _ 8^t DDF 2 ! 9BP V T hW V P D $ V 6 V % V E @ l' T 2 % 7_
0x1627c8…16295c Dummy {f00=0x0069, f01=0x0190, f02=» V P 3 W _ C D ; V & E2 HDf 'W 'W '_6 ? F : ! P ! P ! P ! P 9F ! P 8 W : ! )P9H " I|# T &W &" :I : Gb : P & _ &X _ : I : : : G| p *1 TID ADDR
0x16295c…162af0 Dummy {f00=0x0069, f01=0x0190, f02=»( _ AGz AGx Gn ( @Gv' $ * AG|T( Gn ( AGr AG| ( G| p AGr ) Y V AG G V V L . 1 V L v L AGr : G W G 2 G L @ l# T R L 9F L & L G Q
0x162af0…162c84 Dummy {f00=0x0069, f01=0x0190, f02=»Gz : Wp Wl Wh Wd W` W WX WT WP WL WH WD W@ W< W8 W4 W0 W, W( W$ W W W W W W W W W G ** AG~ AG ER AG R AG G L Jb R 4 L 4 $ AGr G U 4 - _ IN G @Gr N* D ILLEGAL OPERATION
0x162c84…162e18 Dummy {f00=0x0069, f01=0x0190, f02=»ITHM OVERFLOW STACK OVERFLOW INDEX OVERFLOW ILL INDEX TYPE DIV BY ZERO EDIT BUFFER OVFL EDIT PICTURE OVERFLOW "ALLOCATION ERR AT INITIALIZATION ILLEGAL INSTRUCTION ADDRESS ILLEGAL FORMAT CODE NO FIX BUFFER ALLOCATED FIX BUFFER NOT ALLOWED ILLEGAL
0x162e18…162fac Dummy {f00=0x0069, f01=0x0190, f02=»ILLEGAL DATASET REFERENCE TOO MANY KIA/NKIA STACK LEVELS DISC ERROR; NO REENTER POINT W 9 " R 0 1 Y : ;a V P V P W z x<a R 9a V M : I @M P ( _ @O P @O Pj Pf N V $ $T$ D BR V T D
0x162fac…163140 Dummy {f00=0x0069, f01=0x0190, f02=» AO TB( Q ( AM O @O V P ( R W M TB( P : TB( Q : AO AO E AM O V AO @ h# P ( R4 O TB( Q ( AM O @O V P ( R W :
0x163140…1632d4 (1, 214) Dummy {f00=0x0069, f01=0x0190, f02=» T REFERENCE TOO MANY KIA/NKIA STACK LEVELS DISC ERROR; NO REE W 9 " R 0 1 Y : ;a V P V P W z x<a R 9a V : I @M P ( _ @ P @ P P V $ $T D R V T D
0x1632d4…163468 Dummy {f00=0x0069, f01=0x0190, f02=» a ( ( a ( Pt ` F D "! AP a ` @O @O @P P ( Pv V ` R Pv V W Z TP _" = a T Pv ` ` ` W ` , a 9a ` @P P ` ` ` ` O ` @O P
0x163468…1635fc Dummy {f00=0x0069, f01=0x0190, f02=» MU /V SW IX* JX TYN YYZ GY LY PY HY RZ VZ KZ ` ` _ R ` _ NO! AR AR AR AR AR AR AR AR AR AR AR AR AR AR P AR AR ^ S S ,S +S -S ;S :S (SL .S Pv ` X " , AR L AR L @ AR A
0x1635fc…163790 Dummy {f00=0x0069, f01=0x0190, f02=»R AR @R AR _ ^` AR @R V ^| S " @R T " @R @R P AR AR " Rx @R ` Q T @P AR @P AR @P AR @P AR @R A_ @R AP @R AP @R AP P _X W @R T @R Z W @_ AP a V W ` W 0 ` A_ ` W ` A_ A_ @_ ` W a @P AR @
0x163790…163924 Dummy {f00=0x0069, f01=0x0190, f02=» ` ` UH Q 4 ` T P ` ` W T @R ` ` W ` ` ` B "T" @P AR @P AR @P AR @P AR W @R T @R W @R @R @R R W >a A_ AP @R AP ` @R AP P _X W @R T @R Z W A_ @b Q @_ AP ` `
0x163924…163ab8 Dummy {f00=0x0069, f01=0x0190, f02=» Rx C @R P @R 1 @P P @R Q @ @R Q P " Q T @P AR @P AR @P AR @P AR @R A_ @R AP @R AP @R AP P _X W @R T W @R V @_ AP 0 ` ` R P Rx @R P @R 1 Q ` ` A_ @_ ` a @P AR @P AR _ @P P @R
0x163ab8…163c4c Dummy {f00=0x0069, f01=0x0190, f02=» 1 Q RxPx @R @R @R @R T @O RX A_ *9l! P2 Tn X &9d! ) X W P$ &9d X & X _ X & X Q Rx AX AX ` @b Z ` " ! U 0 AX U X _ ` "P` @R @R T @O PF R % < < a ! ` `
0x163c4c…163de0 Dummy {f00=0x0069, f01=0x0190, f02=» @R AP R @R R AO AP AO @O ( Q AP R @O [< Rx @R @R T I @_:P [j @O [ _ AP R AO @R AO Q @R ! ADf Q Pd @R @R PL @R P a a ^ Z R @R T @O Z V ^ O Rt ) I I @ I B AO W P Z RV )W O AO Q O , AZ
0x163de0…163f74 (1, 215) Dummy {f00=0x0069, f01=0x0190, f02=»P Q [$ ( Q Rx L U N ( R ( @R V @O H B W # + C " N B A[ A[ :B A[ Rx (P _ B @R @R @R P [< R @R V @O Q B 1 @R Q Q @ AN " N ( R$ ( @R V @O H B ) I B " Rx $ %
0x163f74…164108 Dummy {f00=0x0069, f01=0x0190, f02=» ^` AR T @O R: ?aP *:l" T* & W T C B B B B B " Rx A] A] A] A] A] A] A] ^ R Q ! 9D# 9hP Q " ;B 2 Pl L ?b ] P ,R PLW~ Pz9AR Tr L Qj W" P` L $ QV L % QL ]
0x164108…16429c Dummy {f00=0x0069, f01=0x0190, f02=» < V " f F <P W* @P " P ( Rx F $ C " :T a a a " " A^ AR .T @P P ` P " AR " ` X X Rx " , , A^ A^ :B A^ Q (P _ # # H A^ " A` A` 4 ` ` 4 @`
0x16429c…164430 Dummy {f00=0x0069, f01=0x0190, f02=»;H @_ ;d _ ( @_ "( Rx @_ " :S :X :Y :Z a $P WH a A` A` 0R 9Q 0 A` :B a _" A` " a A`` 0R$ 9U AR FQ 0:D A`` a _* 'T a :H_ A`` " A` A` 4 ` ` T A`
0x164430…1645c4 Dummy {f00=0x0069, f01=0x0190, f02=» W ?W :W .W / aa Aa T an " @alT an Aa4 a8 a ( @a Aal " an ad a ( A( ab( Aal " Aa a @a a P Aa a ( a Aa " !a 1a a Q (P _ # # H A " A A 4 4 @
0x1645c4…164758 Dummy {f00=0x0069, f01=0x0190, f02=»#0T : I I W I| # Ix" T & T + : * & !@P `1` P d Q [ ; 8 V W Q P [ ! X # P 4 V W Q P [ " X $ P TF R R ` ; <( Q P # W " <
0x164758…1648ec Dummy {f00=0x0069, f01=0x0190, f02=» : #0 Ix P8" T * & : * & !`P :J +_ +Q d _0 , T T XD W 1 L P X _& R W ( V W Q P W ! W V P , V W Q P W $ W V P T V W Z : V ) 0
0x1648ec…164a80 Dummy {f00=0x0069, f01=0x0190, f02=» 6 I [ [ [ [ $ [ [ >h [ [ h ; h ; h b~ Z PP [ 9a Z $" T 9d! P6 P( [ Z w [ P h bx V H )_ h fR _X z R z ! P 1` { V (9h T W z 9e! I Z ! : 4 P 9 5
0x164a80…164c14 (1, 216) Dummy {f00=0x006a, f01=0x0190, f02=» P W ;a=a P " R & R V T W V E + : V & 6 I [ [ [ [ $ [ [ &! P h h ; h ; h b~ z " ! ! R 2` { z " P ! R 2` { 1 ! { [ Z h
0x164c14…164da8 Dummy {f00=0x006a, f01=0x0190, f02=» [ Q* h bx h d R [ Z { h bx z 9e! W Z : V I _ , " -! 9H X" ,9 -9d_ Z H D & H D % [ ( k >| : { : j $0T j` Pb 9 _ j $0T [
0x164da8…164f3c Dummy {f00=0x006a, f01=0x0190, f02=» ) V E k $0T Wr W W I j [ k : Z !0 , !0P4 0 > R* 4 R :d" 8 R ! :DW ! 9 R R _. : ; : 9F 9F#03 T jP kT T : & 9! " : $ : T W V 9! R
0x164f3c…1650d0 Dummy {f00=0x006a, f01=0x0190, f02=» | 7 F l p t x6 &90 A! P K 4 0 A! P K 4 0 Av P K 4 0 Av P K 4 0 Av e 4 0 Av e 4 @ 0 >0 P 64 <0 P 54 0 P A 4 !0 P 34 E bR * )bR* I 0 A R V 4 0 A R V K E I b )*R b R*
0x1650d0…165264 Dummy {f00=0x006a, f01=0x0190, f02=»$"` uV> av uajb " " b ( bR#j $"u b^&jb "R" b bR j $" b 5W j ""u j $" j &"* u`Hp *? v? u? ` _ u) 5 ? j` " $ `: 0 ja " " a ua j $" ` )? u`? j` " "_2As ua? @u@v E 0 ? !"? 1AxW-j " - R R _9 W I
0x165264…1653f8 Dummy {f00=0x006a, f01=0x0190, f02=» -jc " c c R c R _a _) +_% 0 c c 4 ! ! ! " V 0 _ " b )*R b R* !4 "bR * )bR* & 4 @k@lja " "j` " $(` AlW= ` Rgjd " "j ""a (a # d ja " $ a a RCj ""d a d`W ` (a AkIl'W a R jd " $j $"` a R `vIs `! d` 4
0x1653f8…16558c Dummy {f00=0x006a, f01=0x0190, f02=»! "R! ! ! " Q E! "! [ 3@ 4 H #@ C!!"C! !T !!RT "!R0! A!R 4 H 0 _ #! R R W A T A @p Cv! Cv! H Vv0 Av Tg `vP Ap ?v` #! RTj v " % j !! jGv " ! Apj !'! $! P Ap R$ ! ! " T Ev "v P Ev & 0! AvR 5@ Cv!W Hp ?@
0x16558c…165720 Dummy {f00=0x006a, f01=0x0190, f02=» / s 4 : m `!: )`W} d$ bd !bRV ! 55? jc "R&#c91j " b "&m j (" ) bRc* c*jR&"c "dR? b W jd "R$ d U d!: jR$"d "bR c* REjR""b jR$" _` b{ ! a ja!! b(jR(" b1 a A c!V a ) ) !aR: ? jR$"c bR* b "`R: Hp _ ba `=jR "` `c_V c Ap_1Ar 0 mP r
0x165720…1658b4 (1, 217) Dummy {f00=0x006a, f01=0x0190, f02=»t` t*_- t: `"_- `" Ab !&R`bm &R` m? < m@s $R*: ` a&j` "R&fRa* `*jR&"` "`* @s R: " R: ab !aR: "V )( ) )? j` "R$jR " "aR: a! ` % !`R: b "R A9 `!j` "R$_! r : '6c ( ]@s $R*: Cq< RU !bR "V ! 6 ! 7 AvT ? )? bjd
0x1658b4…165a48 Dummy {f00=0x006a, f01=0x0190, f02=»{c? 8? Hq ` j`!! b'$`! _ ? %_5Aq_ : RF `* a!bR`1 a `1 a! a+ "%R? : !%RP RU `* a!b a 1R` `1 a! a+ ? ApWg RBbR(" 1bR* "cR? a!: jR$"a "cR: ca_0AqW3jRd" "'R< !`R< ja "R$ `!< a & `a_ %6c : b " ! d %d8 !? !'RP 5<
0x165a48…165bdc Dummy {f00=0x006a, f01=0x0190, f02=»_ )? Cp< b! a! !ba < b b)*R b b R* $ba & a b? 4? ` a*Hs `W ` V ! 50W< a"j " &h a& &V! a a! a j " $ ` _E )W a&jb " a 4 d"@s$ " As d R jd " $jc " * c d ? 4 j " " & 6 jR " 4 j "R !"4 !!4
0x165bdc…165d70 Dummy {f00=0x006a, f01=0x0190, f02=» _ F " DSF T X AC FC SV TC PTS-DE SYSFIL " % ( + . 50 < p p !`R< ja "R$ `!< a & `a_ %6c : b " ! d %d8 !? !'RP 5<
0x165d70…165f04 Dummy {f00=0x006a, f01=0x0190, f02=» ApAt : As k # *V ) ? Ht ? l b ,V ) ? Ht ? It (? cv: a*mja " &"asz kj a"c a"j &"a `: ` a* >j ""` j $" l `v: j a"` a" uv: j a"u a"j &"a c: Uj &"* W ? `#j "" j $" a*_zj $"c `: ?j ""` `c cv_(ja " &"as c`_z cv
0x165f04…166098 Dummy {f00=0x006a, f01=0x0190, f02=» uv ud d , ) v )? jo !v bo!&k bo'&l ) oV5 ! ! " : * o | Uj |)"` It ? u) 5 ? 4? : VJ! 5 ) ? `b b W `!: RAjR""b bR* z "`R: b !bR: jR$"` "bR? bR* z "bR? '6c @rT `# : !`RV ! 5 ? )? a7b &Ra0
0x166098…16622c Dummy {f00=0x006a, f01=0x0190, f02=» Kq %_1Aq_ : @s RHl Hk RU "#R? a$W a" k `#0 kT : j` "Ra ` =Ar_ ApAs0 kTY k # *RnHp. a$*a j " $ Z : j` " &*`*K a,Hp bk & a? 0 lT$ l b ,R. a& a =bl & a? #X;! 5 ? b: ja " &*a* a,_' )? c# bc !bRR)jc "R&"c* 5W d7b &Rd k jc "R$ c
0x16622c…1663c0 Dummy {f00=0x006a, f01=0x0190, f02=» h~ !X8H !( @ h~ U !j~ ! ! !P !0" ! N_m ? j !! '( !1j !& !j !! ( * j +& 'j !! ( j ! ! ! 8 ? jy " $ j !! 1 j !! 2 j !! (I !Y A ! p ! ? ! 0 !h & !&P !0" !< _ ( ) +h & '&
0x1663c0…166554 (1, 218) Dummy {f00=0x006a, f01=0x0190, f02=» h^ !T f^ ! !j^ !U !j '! !j !! ( _N ! ( + ~UWhj !! ' !QU I N! 8 ! 9 :b ! W:0 ^ h^ U !P 9! :j !!^ b ! f^ ! !A j ! !d^ ! j '! !j !! (( + b +$~ WR j !! '( ! j !! 0 (j ! !W0 )W# + @j !
0x166554…1666e8 Dummy {f00=0x006a, f01=0x0190, f02=» 6 ;W U j !!~ W j !! (W Uj ! j '!!! !j !!~ j (!~ _+( # j (! !j !!~ 4 ~ $ - ; ; m n . a Y R FTX J BC JC FTJBJD
0x1666e8…16687c Dummy {f00=0x006a, f01=0x0190, f02=» !4 "4 #4 $4 4 @} 8 In06 W 0 ! WP0 ! WII~ 0 ! W?H 0 ! W50 !! W.@n6 0 ! W 0 ! I~ 0 ! W H 0 ! W 0 ! (0# : H~ ? 0$ P : _ 0% P C{P A )? H ? 0&HoO !H~ 0' $ W 0' # ! 2 W 0 0 /1( _5K~|0 ! _
0x16687c…166a10 Dummy {f00=0x006a, f01=0x0190, f02=»( 2" + " ( " # I ? & 0+ P ? 0 Pm0) 0 -8 Wa0) 6 > W<( , ! :d # !_'0) P 0% P o8W o;d o "_HI 0) 2 W @ @ @ @ @h@j #U 0, ! Td$ + " , 0& %@|PI0% T /hZ " !T f ! j !! H{ ? 0% P 0- P H !?
0x166a10…166ba4 Dummy {f00=0x006a, f01=0x0190, f02=»0Hj 0 #T @m?#@hP !PP00 01 V 0# !_ $ + ?$I 02WL0% P 0 9%0# !00 01 T10% T2WO0# ! 03W #I{ H~ I K 0$ 0&? A 04P#:&;%Io 0- P H 2 ' ' ' ? JA J K{ 0) ?( !00 01 8 _^J # T 2 ' 0% T 2 )**? 2 ***0- 8+J ?+ ?
0x166ba4…166d38 Dummy {f00=0x006a, f01=0x0190, f02=»0# 0 H { ,W H s +0) 0% P 0 Q ,8/?0A 0# !00 01 P : SdW 0% X70- P J ? EK{H ,L T +_UH KA^0) 1( ? Am #4 0$ S 0% P 0 Q I ) *&KA)? 0$ % 0% P-0- P H % !W/ ?1 #? 08 $+ %'0 0 < H{ W ! 2 ***234 " @
0x166d38…166ecc Dummy {f00=0x006a, f01=0x0190, f02=» j !!!WP U0% P m ( &W 6) D b !Z/h U ! !Q !4 !0&@ T 07 j %! !0( ! 08 % ! 6 cv6 C & 4 W 9W :0% P " "Jh !U !TA0% T h ! !T00. _ A 0% T f !07 0&0( _ 0 0 (P h ! !P 1( _ 1( !0% X 0) 0% O
0x166ecc…167060 Dummy {f00=0x006a, f01=0x0190, f02=»0' ! 6 W"0 0 $( # _.0 ! _y $5 !( * @ . !4 80 4 o? o0# 0 6 4 Am4 0# 0 4 6 O ^ Z | 8 O l x T u : ^ C P h x
0x167060…1671f4 (1, 219) Dummy {f00=0x006a, f01=0x0190, f02=» & 3 8 ? P + +-0? 1 BATCH IN USESYMBOLICVALUE-SET XXXXTTT9TTTT9XXXXX- o A . 1 . . : k A C : A $ : A NOT . TIME-OUT CDV-ERROR NOT FOUND I/O-ERROR DATE ERROR FOUND LOCKED NO DISC SPACE ILLE
0x1671f4…167388 Dummy {f00=0x006a, f01=0x0190, f02=»T OPERABLE @ : l IN : k A CHANGE FLOPPY DISC DISC I/O-ERROR : ILLEGAL FORMAT NAME PRESS ENT TO CONFIRM NO WORKSPACE IN CORE FUNCTION NOT ALLOWED USERFILE ASSIGN-ERROR 95 % OF FILESPACE USED PRESS ENT FOR DELETION THIS IS A DUMMY MESSAGE
0x167388…16751c Dummy {f00=0x006a, f01=0x0190, f02=»TPUT DEVICE NOT OPERABLE COMPULSORY FIELD NOT FILLED DEFINED LINE MAXIMUM EXCEEDED MAXIMUM RECORD-LENGTH EXCEEDED !MAXIMUM FORMAT-CODE SIZE EXCEEDED !MAXIMUM NUMBER OF FIELDS EXCEEDED (USERFILE NOT CLOSED IN PREVIOUS SESSION. ,END OF FORMAT FOUND PRESS R
0x16751c…1676b0 Dummy {f00=0x006a, f01=0x0190, f02=» : ASD 5 PAGE : WARNING:REFERENCE TO FIELD (F ) OUTSIDE FORMAT DEFINITION ,OCCUPIED RECORDLENGTH CHANGED WITHIN FORMAT: m . SIZE ON DISC: . B $ : ! DOES NOT EXIST IN JOB-DEFINITION OR ON SYSTEM-DISC?-&7A*+>%) (6C,E:LI<830! 1BD5H4 "@G/
0x1676b0…167844 Dummy {f00=0x006a, f01=0x0190, f02=» ' 0 9 B M Y e q ~ 3 H ] s 6 Q l ! $ $ ' + K / v 4 ? ? F W J @7 R ! 4 ,END OF FORMAT FOUND PRESS R
0x167844…1679d8 Dummy {f00=0x006a, f01=0x0190, f02=» @g@i@k@ "0# ( #W H % W % 6 0) 2 W ? A o W o ~H h~ ) !PL@ < ~E h~ ' !< A ! & !@ W 2 W 09 #XA _ 2 !j !! j ! !$ 60 ! ? A _ !A <
0x1679d8…167b6c Dummy {f00=0x006a, f01=0x0190, f02=» ? A _ 0" !< " ? #@ T 0% P9W I 46 0 ! W 0 ! : 6 h W h 8 ? 6 0" !< " ? 0" !< " ? ( 09 ( #)0) A h U ! < h 8 ? " ? < 9h ! !P !W !j !! ! =f "d "!U d !
0x167b6c…167d00 Dummy {f00=0x006a, f01=0x0190, f02=» ? & ? ? 0 9 ? " W @g@k !Ai !? $@kAgW #@gAk@i ! j !! ! Uj ? 60 < h !TL j !! ! 4 ) 5 ! h ! !T ! R h !U !P7 !_& h ! !X&W#@ T 0% P! W I h P Wk ~Ub~ "~
0x167d00…167e94 (1, 220) Dummy {f00=0x006b, f01=0x0190, f02=» ! _6j " - 8 & ?!@ P 5Ii Ik Ig A|W 4@|@ & , 3hZ !PDj !! 0 (P 60 !_<( 4 !, @h $ !ThI|m2 ? 2 """"#$"$$$#$$"""""%&&"""#''" !_h( !? 4( !_ "_ _ ! j !! ! _ _ A| "
0x167e94…168028 Dummy {f00=0x006b, f01=0x0190, f02=» Af4 L@d@g0# @ W< %Ad00 01 R Ag0/ ! T 00 01 @dW Hd 00 01 @ 4 ! ! L Ah $ !6 00 W. "0# @| uA j !! ! j !! 60 _N ! 6 iiWJ@e !L ! ;h ! !P !@i ! 9( Jh * !TX6 rr rrW !
0x168028…1681bc Dummy {f00=0x006b, f01=0x0190, f02=»! 6 & ) 0" !<) W30" !P(?)0" !<) $W ( 09 # W a / " Hi b " !P 6 ! "?* ! "?* ! "?* ! "He U m " 0" !<) ?+( 00 01 0) 0% TJ U m ! P Q 0) , ~8d ! ~ W f ! ! 0 0. 0$ ?+ h X
0x1681bc…168350 Dummy {f00=0x006b, f01=0x0190, f02=» j ! !0 P b ![ ! ! ( 4 @h0A ! P # ( + ?,0- <-AhW %hZ ( !<- % (:- ! ! ( $ 2hZ ! !T !j !! W % 2 .../ !X b !U ( W )W =f "d "!U d ! 8T 0: (+0; + j !! 1 ! & 0% T/0) V& >
0x168350…1684e4 Dummy {f00=0x006b, f01=0x0190, f02=» ! U 6 _l; 2*0" !T Wo0 "T j !! !b WX WU Wb Sf !WAH{ W<09 " m W W 0" !T3m W 0" !T&m W 7h U ! V !!4 !"4 80 1( 0 6 ''' ' y ''' "W% ," "0 We08 W "_ '_ !08
0x1684e4…168678 Dummy {f00=0x006b, f01=0x0190, f02=» O j & % . i } 8 [ D S q d E = G B 0 M 8 3 : @ V Z H n - V c + ? P0:;=?T+-
0x168678…16880c Dummy {f00=0x006b, f01=0x0190, f02=»TTTTTTT9 ! I D DELETED INSERTED + ON UNIT:U i + WITHIN JOB: k RECOVERY RUNNING. RECORD CORRECTION F FREEZING OF BATCH l CONFIRM RECORD INSERT CONFIRM RECORD DELETE: RECORD MUST BE VERIFIED ENTER WANT
0x16880c…1689a0 Dummy {f00=0x006b, f01=0x0190, f02=»FF* RECOVERY OF : k B : l RUNNING. ( ',!.%)$&"#-* $ * 0 7 ? G P Y c0 m * 5 A Q c w
0x1689a0…168b34 (1, 221) Dummy {f00=0x006b, f01=0x0190, f02=» > ( &Ad1 An@m 6 0 _ @n_ ( !'( _&3 @d0 0} h* h _? ! 4 6 99 W 2 !8 "8 #8 W j " # G j " "# H|j " $# Hr? ! !6 +; ^# 6Zb !" Kj !# 'bc (c" 3? 1? ; < W' ## 5 ! ; " 5 " " ! T T
0x168b34…168cc8 Dummy {f00=0x006b, f01=0x0190, f02=»2 _ !0 #$} & 2 _,4 j 1! ! !j 2! ! 4 R ! 4 Hd ? ! 8T & ( !0 #$}? ) _ ! Lb "" " < $ U@f@e0 " An 2 _ ! 8 ! < 9 W : " ! j " j $" Af07~ 0 "P 07~ j~#!
0x168cc8…168e5c Dummy {f00=0x006b, f01=0x0190, f02=»e ! 8R AnW* ! " _W) !$ ! $ W !W 8P )B? 0: (+0; +@eAf ! ! 0 %%In 0 $%Ao 2 W ) !Ao _ ! 8T !_ ! 8 ! ( TJ? ! & ! Kb !# ~ " ~ T $ 0: (+? - !?
0x168e5c…168ff0 Dummy {f00=0x006b, f01=0x0190, f02=»~ ~ RR j !! !07~ j " I0 "P J07~ " !j~#! ! T j " $ j !! 1j !! 2 !!4 1 W 3P W An 2 _ 4 4 ! ! ! P 2 _ 0: +1 0 ! !G! "?! !] ! " ! ! # !An@m 6 p _ 0 ! _7Hm_ #P Q 2 ! " _ 04 6 A _ $Gv ?
0x168ff0…169184 Dummy {f00=0x006b, f01=0x0190, f02=» 1 2 s 3 R * E " V c V f P ] c AN010203040506070809102359A N T TT FILESIZEDATE:TIME:USERFILEFREE %SYSTEMFILEVOLUME-N
0x169184…169318 Dummy {f00=0x006b, f01=0x0190, f02=»CREATE VALUE-SETS XZZ9ZZZZ9999999XXE-XXE-XXXXE.XXE.XX T 0 * h d Y Z [ V Y O f ! P g T U U W :U i T M N R S ! " # # Q $ % # & U [ X X% = @ ! X% > @ " X% ? @ # X% @ @
0x169318…1694ac Dummy {f00=0x006b, f01=0x0190, f02=» " $ & ( * , . 0 3 7 ; @ E M V ` l y 0 ! # # Q F l k ILESIZEDATE:TIME:USERFILEFREE %SYSTEMFILEVOLUME-N
0x1694ac…169640 Dummy {f00=0x006b, f01=0x0190, f02=» T ( !Ad1 9An@m 6 6 W,@n_ ( "2( _!@j3 @ @d0 0} 4 h _= _< ! 4 6 Sfl{ W j ! Ii ! 9 W ) 9 m ,P ) ? ;j !& 'bc c b W 0) ! 6 $ r"? 7" v$ !r? 8 Tj *P ? 1? " Q$ FWK $ $< ?
0x169640…1697d4 (1, 222) Dummy {f00=0x006b, f01=0x0190, f02=»/ !T; 6 MMMMMM~~MM~~MW|Iiy ! %n h / !T ,JWX ! %P h / ! 6 3 W1Ak_+ !" %% h / !T , W Hk ! c % c c _ & !? 0 %% 8? !6 (DTdt_ * ? + ? ,< j ! ! 9 @iW Ai? P ! : ? A W @ ! < A ? @ ?
0x1697d4…169968 Dummy {f00=0x006b, f01=0x0190, f02=»% A0; ,0: , $ ? "r= ( 2 07 6 'h #Q !j , w j 1!w!Ii j 2! ! !j "" j $" mHj -P !2 _ &{ { )P !Ix 6 * ? &{ { *P !2 _ ({ P !2 _ -P !2 _ { + Ii 0; {$* p!0
0x169968…169afc Dummy {f00=0x006b, f01=0x0190, f02=» !* & & & ! 5 0 "}H{ Ij 4 !6 H" W 0; {$*0 P _4 0 "}_? 1 !6 TT _P - PJ !6 ??_&Aj p! u # $ j $!! {1j #!! {2 $ #? &{ @jP { &{ W &{ @jP H{ m *" ! I{ ? % & 4 0# 6 55 555555555W 'I ( W Ij I
0x169afc…169c90 Dummy {f00=0x006b, f01=0x0190, f02=»Hi! ' 0 (T W $0$ "W 0$ 4 @g0 0} { 1 7An@ An2 _ 0 0}@n_ 6 5 ? Ag@ij !m ) 9 AiW 0; {$* p!0 AnP 0 ! 0$ 4 2 _Q 4W XT 8 2 Jgwjm & {!_: 2 _ ({ P _ &! 1 2 -P 7 nn &{
0x169c90…169e24 Dummy {f00=0x006b, f01=0x0190, f02=» "|Bn { |? 3? @n ! " P W0 % A0; ,0: , T W % & 0 ($}2 ? &{ 0 0}4 0 0} { 1 8An 6 _ @n_ 2 Wm * ;j !& 0; {$* p!0 0 ! 0$ 3 6 ++3 ({ T j !&m j {!& ! )P R W 2 W &{ _
0x169e24…169fb8 Dummy {f00=0x006b, f01=0x0190, f02=» 4 & ( $j ! ! !4 & ! c # ( % !j ! !! !j ! ` !4 & " c # ( & "j ! "! !j " ` "4 & # c # ( ' #j ! #! !j # ` #4 & $ ( ( $j ! $! !j $ $4 0
0x169fb8…16a14c Dummy {f00=0x006b, f01=0x0190, f02=» w! 0 ""j !Q W = ! +W !@ !@ 4 j !Q * & ' @d@ 4 % ( H + "20 !!" " !)I 0 # W 0 # & ' % y %Ad W < ! !4 I /W . ( a - !+ 7 !) !< # j ! ! ! # 7 j ! !
0x16a14c…16a2e0 Dummy {f00=0x006b, f01=0x0190, f02=» wHj $ # 4 j y C o 7 7 $ l 0 C v h o 9 - X V y 7 N & " ' v
0x16a2e0…16a474 (1, 223) Dummy {f00=0x006b, f01=0x0190, f02=» h @ m 24 COPY $ $ TO BE COPIED: q @ NEW $ NAME: v @ m U 20 $ - - * h d7 21 ? - $ - 22 @ - $ - 23 > $ 24 COPY $10/.-,+*)('&%$#"! 2 0 ;
0x16a474…16a608 Dummy {f00=0x006b, f01=0x0190, f02=» ! # * M C Q @ : : 7 7 $ l 0 C v h o 9 - X V y 7 N & " ' v
0x16a608…16a79c Dummy {f00=0x006b, f01=0x0190, f02=» e t 4 $ f c# # d# 7hZ c! 7 c! #2 W bch b!Z7!T W c N? b% ! b_ b$ " b ,# c bch b!Z2! } c! b$ " b_DW ( % $N b/hZb" c!T b/ >j c! b c! b$ " a W b# # b*a & &a_ a c! ac bch baZ7!
0x16a79c…16a930 Dummy {f00=0x006b, f01=0x0190, f02=»)c ' ) ' j (! '!f c! ! d!? ` 4 j b c a j c!a! b b! c!f cb db4 j b u a4 u $ #@g c hZ a b! +2 jc!! b"c W 6 b! !jc!! b"c b! !W, ! b! !Hg ( 'b `3d b!Z` b! ! !@g _ " ,0 b! ! `bh `!Z2
0x16a930…16aac4 Dummy {f00=0x006b, f01=0x0190, f02=»b! ! ' j '!! b ' j b!Z= 'b '!Ag_ 4 b!jc!! b c ` m ` f b!d b` `! ` b` ` !Hg '`4 1( P # W !05 p! u ! " !! w jw!! {1j !! {2 w d "2@h u" ! Kh !@k ~60 oT @j~ # # - b o -( q0 TF b , ! , " , # E h )
0x16aac4…16ac58 Dummy {f00=0x006b, f01=0x0190, f02=» &%W #$d &%( A b ~6Ak_Dj~ b #* Ii !"d &%W #$d &% ~6Ak4 + 1( P W !2 1( P # W ! 4 @l #hQ 0 !0 6 F MMMMMM? !j !! !_9 "_> Hj j !! {(j { ! % { $! 0 ""Il _h !Ah? Al - ! j !!
0x16ac58…16adec Dummy {f00=0x006b, f01=0x0190, f02=» !: ":H "< #:H #< $:H $< %<H %:H "8 # oU U b ! " # $ + ~E U # hQ 0 !T 2 W W #_) !j !! !( "Q Ii "_H ! `! a! !07 h )Q ! ! # `" a j a` j a` ! ( !_ $ 6 1j b#~ W j b#~#W j
0x16adec…16af80 Dummy {f00=0x006b, f01=0x0190, f02=» ! " `" a j a` j a` ! p 4 !jo ! - h] $ !T 6 #+jo ! ! !" %_*jo ! )_ jo ! +_ ! !_+J .jo ! ._/jo ! , !4 6 b @h@k hQ 2 !0 2 ? !j b! - b! !j !! H ;W 9j ba baj b! , ! b!__ j b o "
0x16af80…16b114 (1, 224) Dummy {f00=0x006c, f01=0x0190, f02=» _ %b!b5 j b!U b!_ HkJ cWE , a ! b jb!! b!+ b"$ $ # !07 h )Q ! 0E a #? !4 = 0 !00 01 T$0) 0% P 0) ( " ;_* 9_/ _44 0 i } - p ; [ s = e 9 ; 6 ` e 0
0x16b114…16b2a8 Dummy {f00=0x006c, f01=0x0190, f02=»GTH#V:#G:#A:GENERATION VALIDATION ACCUMULATION 9Z9999XXXZZ9XE+XXZZVZZ9ZZVZZZ! 1 k " ( % & ) 0 ~ k: " $ % & ' ! " # $ % ) 0 ~ 1 $ : m ( NUMBER OF POOL-UNITS: # d A : ! C ACCUMULATOR POSI
0x16b2a8…16b43c Dummy {f00=0x006c, f01=0x0190, f02=»# d A : ! C B - MAX/MIN K M A V I DUPLIC. SPEC. #L:< B LAYOUT> #V: G #G: F #A: H NO NO/POS - D I E T E C -ITEM HANDL. % + 4 ? J
0x16b43c…16b5d0 Dummy {f00=0x006c, f01=0x0190, f02=» d 0 Hf ( Hg ( j I 0 ##Ie !l_0 ! $ % & Ii I " " ( I 0 $'Ii # 8 " . I 0 $ W .W 0 ! ( % ( % !4 @e@f@g =@l l eIe ( ;@l l f( If >Al l g !Af( hIg !W` =@l l eIeJ(
0x16b5d0…16b764 Dummy {f00=0x006c, f01=0x0190, f02=» " !P I A ! ! ! % _2 ! W ! !4 % @e@f@g@ 4 ! " # $ * + , 4 o; Hi 0 h / !Tr 6 )'''''48fD]]NW[A A A jo ! ! ! ! h / ! ,p_ A jo ! !W:A W.jo !] A A W*A jo !]!W jo !]#A A !W jo !]" !A jo !
0x16b764…16b8f8 Dummy {f00=0x006c, f01=0x0190, f02=» L h ) c#T # # d0 3 ( `c_*0 T ` c d H 0 $ 4 I : " " j " " j " " $ . ! # T ! 0 "" U W !+ !4 0 !P * 0 "P + , * , +! *4: + 5 4 *f * 7 j % , + , +4 *4W * ,
0x16b8f8…16ba8c Dummy {f00=0x006c, f01=0x0190, f02=»T ( # A c ,T c!_hHi 0 -.0 &' &W 0 120 ,- , ! 4 c !%c ! !0$ & j ! W * + !!4 3@k@g hZ c!T 6 %Ls 2 Wf b2 W? ;2 W Ik Ak 2
0x16ba8c…16bc20 Dummy {f00=0x006c, f01=0x0190, f02=» "T ( ) , $a #a6 W60"a !T W-0"a !T W$$a! #a5 bc b" b `h b!Z2!T c" &_T c!_vIi c! b/hZb" c!T $o b/i_u c! #T $a X#a9T % W , a WH c"_ c!,c ; a ac bch baZ7!T( bc*b !,b : ; W "b& cb_ c!,c _C( $ c ! & ! W Kg !!4 c! bc b "b U
0x16bc20…16bdb4 (1, 225) Dummy {f00=0x006c, f01=0x0190, f02=» X 4 t m , e P ^ c 0 #<< PAGEBATCHFIELDLINE STARTLENGTHNUMBERRECORDSTART:V:G:A:(#A:...)(#G:...)(#V:...)#V:#G:#A:123456789 1234567890CORRECTIONGENERATION VALIDATION ACCUMULATI
0x16bdb4…16bf48 Dummy {f00=0x006c, f01=0x0190, f02=» 2 3 ( 4 2 5 < 6 F 7 N N N N N N N M n @ 22 BALANCE $ - j # O C : % . D > : @ & @ -ACCUMULATOR:A m ( . SPECIAL HANDLING: @k Q K P J o@ ! p@ " U 21 USER $ - j # O A : F
0x16bf48…16c0dc Dummy {f00=0x006c, f01=0x0190, f02=»' MUST ENTER (Y/ N /C): r@ " . AUTO TAB 9 (Y/ N ): @s@ # DUPLICATE : jA . VERIFY 9 (Y/ N ) : @t@ $ INITIAL CLEAR ( Y /N): u@ % . SPECIAL HANDLING: @k Q K P J 2 R I o@ ! p@ " U
0x16c0dc…16c270 Dummy {f00=0x006c, f01=0x0190, f02=» , F c 2 BALANCE $ - j # O C : % . D > : @ & @ -ACCUMULATOR:A m ( . SPECIAL HANDLING: @k Q K P J o@ ! p@ " U 21 USER $ - j # O A : F
0x16c270…16c404 Dummy {f00=0x006c, f01=0x0190, f02=» 4 B ( &Ad1 An@m 6 0 _ @n_ ( #'( _& @d0 0} # * h h _? ! 4 1 Ad!hG @dAn@mAe 6 ? " &z 2 4 3W 4Jd P AoHe @o W 0: z ,AnAo@e 2 _( (z T &PU 1 2 # %XjAo _9 z! X#b !& "z < $z
0x16c404…16c598 Dummy {f00=0x006c, f01=0x0190, f02=» " !0$ W !" (60 X !" )&0 * * 5 5_=0 !P #_R * , !" 3 h &U !T , , _ ,& !8 W:6 1? 6h ! !P 0 /8 W 0 /< ? W %W ( ? . f { x ; 3 j
0x16c598…16c72c Dummy {f00=0x006c, f01=0x0190, f02=»D: JOB-DEFINITION 2 h d ' F C e k e k 30 - - * 3 h d 31 A - - 32 @ - - E f 4 B &g 5 $ 7 fA ! D &A + $ 8 fA " D &A , $ 9 fA # D &A - $ : fA $ D &A . $ ; f
0x16c72c…16c8c0 Dummy {f00=0x006c, f01=0x0190, f02=»A ) D &A 3 U ! ) 1 : D0 S & < & b W:6 1? 6h ! !P 0 /8 W 0 /< ? W %W ( ? . f { x ; 3 j
0x16c8c0…16ca54 (1, 226) Dummy {f00=0x006c, f01=0x0190, f02=» R ` @e kU lU( .AdIe 1 0W 1 ,An@mIe W 6 . _ @n_ Ief( $A6 _<A W A W A A Ae@d_D@ $V 1 ,An@m _L@ T Ie ! 4 @e@dKeN@ @ @ $ * h h _ + , 2 _ 0# 1 ,0$ _ @e kU lU( ,AdIe'1 *An@m 6 $ @ P $ _
0x16ca54…16cbe8 Dummy {f00=0x006c, f01=0x0190, f02=»(+0; +( > " 1 W 1 "An@m h 2 _ _ 0: (+0; +0$ _ "l lU h " 1 W 1 " l "2 ! 4W 5 T ! +T | j " &| W E !" ! 0 %, ! b &l b &!Z2b '( "lW b &k !k # 0 # 8~@ P $0 #$@m0
0x16cbe8…16cd7c Dummy {f00=0x006c, f01=0x0190, f02=»2 _ _ 0 ~P + , @z6 Az _ @ @z $XP@ ~U 0 , P& b~ ![) !0 + T b~ ![( !b~ ![ ! ! (41 .0 %%0 &&0$ $ _ 6 ? ? + , 6 h[ * !T06 $ $$ 0 , T 0 , @ T 0 + !_6A X @ T ? &? @e( +AdIe 1 /W 1 +An@m 6 -
0x16cd7c…16cf10 Dummy {f00=0x006c, f01=0x0190, f02=» 2 _ 0# 1 +0$ _ kU lU( xAdIe 1 (W 6 1 #W 1 An@mIe W 6 K @ T $ _ @n_)@ $V 6 Ie ! 4 @e@d ' * h h _sIe ' @f6 _ AfAe@d_ 2 ( 0 kT (!0 lT (! %0$ " _ ("6 ( , W - ! 2 AzT ! '
0x16cf10…16d0a4 Dummy {f00=0x006c, f01=0x0190, f02=»6 ( _W %T ( * 2 ( )gK " '"( g " #2 $T # '#( _ Ub & 5 + *P ( - { &{ 1 -0 ! 04 mU_" m 50; {&* p!0 $ '$( D0 $} | @ 0 2TX 6 ( W? 0 $} 3 T l $_ & A %T @ _ @ W'" 2 !W 2 " 2 ' #$%&@z 7
0x16d0a4…16d238 Dummy {f00=0x006c, f01=0x0190, f02=»b? )? ( h < Q j p % t " d w ( h X " V "TOKEYVIAFILENAMETESTUNIT
0x16d238…16d3cc Dummy {f00=0x006c, f01=0x0190, f02=»X U & U 45 ? - < & ' 1 71 I 5 J 71 I 7 F ' ! 9 : ! k < 9 : " l 9 : !A k < 9 : "A l % ' ! 1 ' ! ) 53 % A = 52 % < = 51 % = ; :U
0x16d3cc…16d560 Dummy {f00=0x006c, f01=0x0190, f02=» > 6 / : ' h ! : ' FETCHING FORMAT: FROM DISC. @ U $ ' A - @ : # A - B : -e@ ~ 60 * h d0 61 6 62 > 63 6 / : 64 > / : 40 ! * h d3 41 G <
0x16d560…16d6f4 (1, 227) Dummy {f00=0x006c, f01=0x0190, f02=». ) / 0 1 ) 2 3 4 ) 5 6 7 ) 8 ! & + 1 7 = C I P W ` i r |0 " 0 ? N ] m } + # J $ m & * 2 F
0x16d6f4…16d888 Dummy {f00=0x006c, f01=0x0190, f02=» 5 D 2 $? 6 _ 8 ? 1( )T !05 T ? ? ? 2 ? O( ( SU? 2 P ? U0B T 1( &? H ? I 1( %_ !00 01 0) LQ KR A W CQ @Y A _: !00 01 R 0) MY KR G AZ$ CQ A T< $ _3 EQ $ _> FQ A T
0x16d888…16da1c Dummy {f00=0x006c, f01=0x0190, f02=»] H A W U0B T 1( ' W 4 6 bqq I / 40 T W W T U0B T 1( $ 0 T a ! >0 ;0F T a >0 ;0F T _oI II 1( # _{I : $ " W !05 T+ - ! I _ W W W W %W@ W; P_ W10 0 90 R >0 :j " ;0F
0x16da1c…16dbb0 Dummy {f00=0x006c, f01=0x0190, f02=» ? U0B T 1( +_#2 I _ W W^ ' <0G 40 TF W W@ T8 U0B T 1( , W W%6 & % $ ! W W a " ? W W PW A ? ' <0G 7? K "I 1( #A ? K 3I $ " W !05 E - ! ? W W W W %_` _e _ W W< W W < '0G 7
0x16dbb0…16dd44 Dummy {f00=0x006c, f01=0x0190, f02=» 7 2 W _ W _&2 W _2 < 0G _J0 @ ' <0G @ ' <0G 0 & ? U0B T 1( 0_D U0B T 1( /_S # # " T - ! Q4 4 < " '0G 0 B0 T3 8j & j & % 5j " 1 1An0 ! 04 !0' 4 4 8
0x16dd44…16ded8 Dummy {f00=0x006c, f01=0x0190, f02=»0G 4 4 ' <0G 0 0 %P 30 T 4 ' <0G 4 T !00 01 P R W 0) ?R) @Q ?W MQ KR K ?Rn ?_ ? ?Y "H0) 0% P R m W6" 5 Rx0) 0 /P m 6 !W m 5 f !A_ 0 P( !00 01 P R(W*0)
0x16ded8…16e06c Dummy {f00=0x006c, f01=0x0190, f02=» J ^ Q f W E l x ^ & i - 5 7 B F } O X o o q X ?. 001999FILENAMEDEVICEEXPIRATION DATE:OLD VOLUME SEQUENCE NO:OLD DATA SET IDENTIFI
0x16e06c…16e200 Dummy {f00=0x006c, f01=0x0190, f02=»S . EJ GODK[ND S[NDNING * . EJ AVST[MD FRYSNING * FRYSNING KLAR * S[NDNING KLAR * 1 * NUMBER: g DATUM: S TID: T S[NDNING AVBRYTS * FLOPPY DISC SKRIVNING * . NUMBER: MISST[MMER JOBNAME:
0x16e200…16e394 (1, 228) Dummy {f00=0x006d, f01=0x0190, f02=»- X : $ Z [ U$ " $ & ( * , . 0 2 4 6 8 : < = > ? @ C F J N T d {0 *
0x16e394…16e528 Dummy {f00=0x006d, f01=0x0190, f02=» 6 6 D * . 2Ii " !W ! 0 " P !, ! ? Ij { j 1! !j 2! !Hj 4j !&m $ r"Ii' U ! ( j !! ( ) x. .K .*W x( Hj mIn 0 ! W 0 ! Hj m !7 w! y "! !U 'U U & Ii ( In 0 ! W 0 ! @n ! Ij 0# :
0x16e528…16e6bc Dummy {f00=0x006d, f01=0x0190, f02=»,, W ! $ 0' / T W 0' - T ! 2 W "? I I I I IjO2 !0) / 2 W$0. Am6 ! bC I .4 ? "(0. _*Am #02W 03W 04W X Z [ +( H I C_ 1( _ T 1( !05 ? 2 ? W #0- T %y0 %%_
0x16e6bc…16e850 Dummy {f00=0x006d, f01=0x0190, f02=» % 0 0 < 2 ? 2 #? 0# 0 ? $ 2 2 0 %% ( @h u!He8Kh 0 % $? 0 %%A ( @h u!He Kh ( ! u!0 #'@ @ @ ( ? @ ( !"_cA $? 0 && u! !eJh ? 0 &&A % Ad@ @ #? A @ u!
0x16e850…16e9e4 Dummy {f00=0x006d, f01=0x0190, f02=» j ! H ? f G Y z L & $F 1 " " T 1( !05 ? 2 ? W #0- T %y0 %%_
0x16e9e4…16eb78 Dummy {f00=0x006d, f01=0x0190, f02=» d 0 $}j *!! x0 @l 2 ? j x! ! wx xyj &"x !g:e x y" e @ TW( ' )g: @l? j xy wj x! { W< .V xwj &"w W j ! " "Hn ' wxjx " & wx wxf xwj x! { wxj !! x( % j " &W ( ' j ! " " { 0; {$* p!0 0: x*6 VVVVOVOVV V "!H '0 **P I %!@ A W
0x16eb78…16ed0c Dummy {f00=0x006d, f01=0x0190, f02=» x* !u uv_ 0 j x! ! 7 ZH_ j " "jx " &"x* ( 3 Zf_q 1Zm u ? !u (R j "" j &"x u !? ! _ j " & wx x 'jy " xy x u$x Aj " $( xw u 4 /_ /Z j " &( * 1Z)_5 x* wx x 'jy " g2 #gYuP W j ! x0 , + & # ( #2_
0x16ed0c…16eea0 Dummy {f00=0x006d, f01=0x0190, f02=» : ? ,wx W x* WY uj " "( ? j " &( * % 1W 0 : j " & *1 1 W u ! u ! u ! 4 : jx " & 1 w*j " w wx wx j &"w xw? w w !( % _ ' xw g2 # ( ( #g? g "b & AlW '2 : 1 _ : ? $ )g: ' 4WAH !W9AlHl
0x16eea0…16f034 (1, 229) Dummy {f00=0x006d, f01=0x0190, f02=» *PE - { ) ? 1 0 ! 04({ ' x( ' ' wj " jy " ? &{ mU_ m $ ' ( @lW !g: ( nmW *W * n An xIl j ! { W . ( ' !g: j x) w < ? < ? !j &m &j "y ( + ? A ? < 0 @vP C 8 ? ' ( % 2 ! C 8 0 @v< "!_y # "= g "
0x16f034…16f1c8 Dummy {f00=0x006d, f01=0x0190, f02=» ) 0 @v $W &z &| &{ 0 @v_U &z &| &{ 0 $} 5 ^ # + "@ X& ! : !0" !X 0 " %P @ 0 0 $} 2_R * ' #2 $T -_ #_-@ P 0 $}A 3 W Ay@m 4 @ 0 0 $} 2V @y@z@oA # &{ &z &| h Ae0 0} 4 2 $%%&' uf
0x16f1c8…16f35c Dummy {f00=0x006d, f01=0x0190, f02=»* u$x j $" 7 :(W .:( uf *y x *j &" _* u 4 :(j "" 7 :(W j ! "u u 4 :( w* x*j x! { ?) h ( ' 0 kP W1( $ ( % W ( % # 0 @vP (z Ub &k "V 0$ " ?(I + #P R 0 @v0$ # b &l ?*A 0 @vP 6 &z ?+0 @vT/( ' z W ( % 6 !
0x16f35c…16f4f0 Dummy {f00=0x006d, f01=0x0190, f02=» I H 4W I 5W H~ I (W ' A P A WB0 @vT ( ' $W3 $W I K @ 0 0 $} 2TmH 7 Uj &"* W 4 TT0: z , { 0 @vT % 4 * *T4 m 4W mU x*0 @vT % I S2 * An0: |"- wx g 0 WYH ( 3 # W &| 0$ ' 0 @vT &z @ P $0 $
0x16f4f0…16f684 Dummy {f00=0x006d, f01=0x0190, f02=»_B 4 ! ! + 9h # !T}6 ,, !0# @|Thj !! ! j !! 80 _K ! $ !A !@( "90" !T2@e@i@k !" ? 'hZ 2 !TP &6 " _ Ai_8Ae_<" v :WpAkW ! ( ~ !~W)j !! C 80 U !b ! !
0x16f684…16f818 Dummy {f00=0x006d, f01=0x0190, f02=» = N D ^ P R 1 y s n G a 3 4 X V - ! " % & ?MDA FETCHING FORMAT:
0x16f818…16f9ac Dummy {f00=0x006d, f01=0x0190, f02=» p I H~*H $H !@~ W 04@mI~ Hn @f $U W I~ W I Ao 2 H~ I Ao { _ H{ 2 _ 2 b & . #K~M g "pK s_W!g4 ? /_>Iz H 04_ H %? Im)I~ h ( & g" " H I @o0 ! _ _ 0 ! %Z @m@n 0 ! _ Io @ T I~ #> ?
0x16f9ac…16fb40 Dummy {f00=0x006d, f01=0x0190, f02=»! !T #P ( -& Ub & ? Ub & @ .P )g4 Ao? AzAzT @mA *P @ ? @ @m8 @xP 2 h ( & H #: W ? Im1I~ I & h ( & H I ) ? I ) ? I H W Io ? g( " C~< )g4 @z )WkI~5 / 2 $ # " #g #g &? #* " #g_> ! & #g #2_
0x16fb40…16fcd4 (1, 230) Dummy {f00=0x006d, f01=0x0190, f02=» C~8 ? @zC~8 ? ? Km Jz I g4 T Io Ao #: _3Ao@ T / 2 ! % # #g W ! #g #20 ! &_ I~ Jo K _@ @ !04@o ( P W 6 - _ Hm 0 ! A %V @ _ @ "@m042 " #$$$% " / 80 !"W 0$ ! @m h ( & H I ?&Ao( ! ? ? AoW I~ Co8 C < Cz
0x16fcd4…16fe68 Dummy {f00=0x006d, f01=0x0190, f02=» ! & ? C < h ( & H I ?& g( " @oW $ 2 + ): @oA ?,C < Hz @ T Cm< Io I~ #V - ? @o@z Ub & 5 +@mA{ *V#( - 1 0 ! 04 { &{ mU_"@{Ao? m 5 + p!0 An ! 6 Ba4( () % ) _ W + 2 --./A #W 80 _5 _:A @{0 $} !4 @{Az
0x16fe68…16fffc Dummy {f00=0x006d, f01=0x0190, f02=» z ( B R b O c r ; @ > > , A L ] 8 4 " " V * FETCHING FORMAT: FROM DISC. @ UF 0 *
0x16fffc…170190 Dummy {f00=0x006d, f01=0x0190, f02=» + , - ( 3 8 ; H @ X J F " D ( !Ad1XFAn@m R6 6 W,@n_ ( "2( _!@j3 RRRR@ @d0R 0} 4 Rh h G H l *! r *! | J
0x170190…170324 Dummy {f00=0x006d, f01=0x0190, f02=» $ v , J F " D ) ?R Lj !& R'bc c b W 0X ! L R$ r"?R 7" v$ <
0x170324…1704b8 Dummy {f00=0x006d, f01=0x0190, f02=» C? Y? 0 @ $ P / ` 4 p 9 > J F " D RP ! L W+! L A ?R@ ?R 0R !T ?R )6 W ?R "?R &?R (?R C J F " D @ ?R
0x1704b8…17064c Dummy {f00=0x006d, f01=0x0190, f02=» 6 L J F " D 3 W1Ak_+ !" %% h / !T , W Hk ! c % c c X h x " 3 9 > J F " D _ & RK !?R 0X %%
0x17064c…1707e0 Dummy {f00=0x006d, f01=0x0190, f02=» 5 f N k o , q < s 5 L v N { n ~ J F " D @<Rj ! ! L @iW Ai?R RP ! L ?RA W @ ! L A ?R@ ?R R<R! L A ?R@ ?R 5 N
0x1707e0…170974 (1, 231) Opaque[0x194]
0x170974…170b08 # DirEnt {nam=»M:PROC«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0db8, f03=0x0000}
0x170974…170b08 IdxSect {
0x170974…170b08 f00 = 0x006d // 0x170974 @0x0
0x170974…170b08 f01 = 0x0004 // 0x170976 @0x2
0x170974…170b08 gno = [ // 0x170978 @0x4
0x170974…170b08 [0x00]: C0x006d.0x3.0
0x170974…170b08 [0x01]: C0x006e.0x0.0
0x170974…170b08 ]
0x170974…170b08 }
0x170b08…170c9c Dummy {f00=0x006d, f01=0x0190, f02=» P$TRALI PSCR /O PTRA DEDDIV PTRA DECONV 2 PTRA DCTASK D PTRA DEAPPU V PASM FDIO h PKPF /O x PSCR /O PASG 2,LP0F P$LINK PEND P$TRANL PASG 2,NO P$TRALI END $LINK PDE
0x170c9c…170e30 Dummy {f00=0x006d, f01=0x0190, f02=»DKRUT1 PINC DKRUT2 PINC DKRUT3 PNOD 2 PINC DKRUT4 > PINC DEPOOL P PNOD b PINC DENTER n PINC DENT03 PINC DERROR PNOD PINC DENVAL PINC DEGENE PINC DECOMP PINC DESTAT PINC DENT02
0x170e30…170fc4 Dummy {f00=0x006d, f01=0x0190, f02=»C DE20ST PINC DE21ST PINC DE23ST " PINC DE24ST 4 PINC DE20FS F PNOD X PINC DECVRT d PINC DEPRFG v PINC DEUNPF PNOD PINC DEPROC PINC DEVGAC PINC DEATTF PNOD PINC DE30ST PINC DE31ST
0x170fc4…171158 Dummy {f00=0x006d, f01=0x0190, f02=»INC DEFDSC PNOD PINC DERECS PINC DEREC2 0 PINC DEACCU B PNOD T PINC DENT01 ` PTLK U,4K r PLKE M KPF /L,DELINK PEND P$LINKLI PDEL DELINK,/L PSCR /O PNOD C PINC PTSDE PIN
0x171158…1712ec Dummy {f00=0x006d, f01=0x0190, f02=» PKPF /L,DELINK PEND P$PRDLNK * PDEL PRDAPL,/L : PSCR /O P PNOD C ^ PINC PTSDE l PINC DEDISC ~ PINC DELOCK PINC DEAPPU PNOD PINC DKRUT1 PINC DKRUT2 PINC DKRUT3 PNOD PINC DK
0x1712ec…171480 Dummy {f00=0x006d, f01=0x0190, f02=» PINC DECOMP PINC DESTAT PINC DENT02 , PNOD > PINC DE10ST J PINC DE11ST PINC DE12ST n PINC DE1201 PINC DE14ST PINC DE15ST PNOD PINC DE20ST PINC DE21ST PINC DE23ST PINC DE24ST
0x171480…171614 (1, 232) Dummy {f00=0x006e, f01=0x018e, f02=»C DEATTF PNOD PINC DE30ST PINC DE31ST . PNOD @ PINC DE40ST L PINC DE50ST ^ PINC DE60ST p PINC DE70ST PNOD PINC DECONV PINC DCTASK PINC DEFDSC PNOD PINC DERECS PINC DEREC2 PIN
0x171614…1717a8 Dummy {f00=0x006e, f01=0x009e, f02=» PINC /OBJCT PASG 3,DK PPOB & PRUN OBX 2 PEND B P$TRA N PTRA @S= Z PKPF /O j PXRF @S= x PSKF 2 PEND PINC DECONV PINC DCTASK PINC DEFDSC PNOD PINC DERECS PINC DEREC2 PIN
0x1717a8…17193c Dummy {f00=0x006e, f01=0x2008, f02=» /OBJCT PASG 3,DK PPOB & PRUN OBX 2 PEND B P$TRA N PTRA @S= Z PKPF /O j PXRF @S= x PSKF 2 PEND PINC DECONV PINC DCTASK PINC DEFDSC PNOD PINC DERECS PINC DEREC2 PIN
0x17193c…171ad0 Dummy {f00=0x006e, f01=0x40ac, f02=» @ H IDENT Z:DU20 TRA 10.0 80-11-19 F1 O1111 REL 10.0 80-04-11 Z:DU20 H Z:DU20D Z n @ & ( * , , ( Q . 0 2 4 6 8 : < a >
0x171ad0…171c64 Dummy {f00=0x006e, f01=0x4096, f02=» @ H IDENT D:DU20 TRA 10.0 80-11-19 F1 O1111 REL 10.0 80-04-11 D:DU20 H D:DU20D Z n :D @ @ & ( * , , ( Q . 0 2 4 6 8 : < a >
0x171c64…171df8 Dummy {f00=0x006e, f01=0x40ac, f02=» @ H IDENT Z:DU30 TRA 10.0 80-11-19 F1 O1111 REL 10.0 80-04-11 Z:DU30 H Z:DU30D Z n @ & ( * , , ( Q . 0 2 4 6 8 : < a >
0x171df8…171f8c Dummy {f00=0x006e, f01=0x4096, f02=» @ H IDENT D:DU30 TRA 10.0 80-11-19 F1 O1111 REL 10.0 80-04-11 D:DU30 H D:DU30D Z n :D @ @ & ( * , , ( Q . 0 2 4 6 8 : < a >
0x171f8c…172120 Dummy {f00=0x006e, f01=0x40ac, f02=» @ H IDENT Z:DU40 TRA 10.0 80-11-19 F1 O1111 REL 10.0 80-04-11 Z:DU40 H Z:DU40D Z n @ & ( * , , ( Q . 0 2 4 6 8 : < a >
0x172120…1722b4 (1, 233) Opaque[0x194]
0x1722b4…172448 # DirEnt {nam=»CDVRUT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2e70, f03=0x0000}
0x1722b4…172448 IdxSect {
0x1722b4…172448 f00 = 0x0173 // 0x1722b4 @0x0
0x1722b4…172448 f01 = 0x0004 // 0x1722b6 @0x2
0x1722b4…172448 gno = [ // 0x1722b8 @0x4
0x1722b4…172448 [0x00]: C0x0173.0x2.0
0x1722b4…172448 [0x01]: C0x0173.0x3.0
0x1722b4…172448 ]
0x1722b4…172448 }
0x172448…1725dc Dummy {f00=0x0173, f01=0x0190, f02=» $ P IDENT CDVRUT REL 10.0 80-04-11 P 81-07-10,EV DK1 , P 79-03-12/PEEN F P UPD 79-01-18/PEEN ^ P* z P* 6 P* THIS ROUTINE MAKES CDV-CHECK ON A STRING ITEM. P* @ P* NOTE: THE DIGIT(S) ZERO SHOULD BE INSERTED IN THE
0x1725dc…172770 Dummy {f00=0x0173, f01=0x0190, f02=» INPUT CAN BE OF VARIABLE LENGTH P* * P* 4 6 P* CALLING FORMAT: 1. CALL CDV10,STRING,BIN > 6 P* 2. CALL CDV110,STRING,BIN x 6 P* 3. CALL CDV111,STRING,BIN 8 P* 4. CAL
0x172770…172904 Dummy {f00=0x0173, f01=0x0190, f02=» INPUT TO MAKE CDV-CHECK ON z L P* (NOT NUMERIC CHARACTERS ARE SKIPPED) 0 H P* 'BIN' = A BINARY ITEM HOLDING THE CHECK- F P* DIGIT(S) AS OUTPUT IF THE
0x172904…172a98 Dummy {f00=0x0173, f01=0x0190, f02=» CR = 1 NOT OK P* , P* 'STRING' IS UNCHANGED " F P* 'BIN' HOLDS CHECK-DIGIT(S) IF CR=1 (ELSE BIN=0) R P EJECT P* USE OF REGISTERS P* REGISTER USE ( P* A1 COUNTER FOR MULTIPLY
0x172a98…172c2c Dummy {f00=0x0173, f01=0x0190, f02=» A6 MAX VALUE FOR RESTART OF WEIGHT * P* A7 DIVIDEND FOR TOTAL SUM 4 " P* A10 SUM OF PRODUCTS b P* P* P* PARAMETERS FOR CDV F P* USE CONTENTS AT CDV10 CDV110 CDV111 CDVDK DK1 P*
0x172c2c…172dc0 Dummy {f00=0x0173, f01=0x0190, f02=»1 11 DK1 Z P EJECT P ENTRY CDV10 " P ENTRY CDV110 6 P ENTRY CDV111 L P ENTRY CDVDK DK1 b P* | P EXTRN I:EVA0 P EXTRN I:RT1 P* P* PCALL FORM 16=/F6A1,16 P EJECT * PCDVDK EQU * CDV 11 CHECK
0x172dc0…172f54 (1, 234) Dummy {f00=0x0173, f01=0x0190, f02=» A6,11 LOAD RESTART LIMIT PCD005 EQU * " P LDK A7,11 LOAD DIVIDEND 6 P RF CDV20 V P* h P* r PCDV111 EQU * | " P LDK A6,10 LOAD RESTART LIMIT P RB CD005 P* P* PCDV10 EQU * P LDK A6,2 LOAD RESTART L
0x172f54…1730e8 Dummy {f00=0x0173, f01=0x0190, f02=» t P SUR A10,A10 ZERO TO SUM PCDV30 EQU * ( P CWR A5,A9 < P RF(E) CDV60 IF FINISHED N P LC A4,-1,A5 GET CHARACTER n P CCK A4,'00' P RF(L) CDV50 IF NO DIGIT P CCK A4,'99' P RF(G) CDV50 IF NO DIGIT P ANK A4,/F MASK
0x1730e8…17327c Dummy {f00=0x0173, f01=0x0190, f02=»ADD TO SUM P SUK A1,1 DECREMENT COUNTER P RB(P) CDV40 IF MORE TO ADD 6 & P CWR A2,A6 MULTIPLY BY 2 IN CDV10 Z P RF(NE) CDV45 NO P CWK A6,7 IF CDVDK DK1 P RF(E) CDV45 YES DK1 P SUK A4,4 , P RF(NP) CDV45 IF DIGIT SUM LESS
0x17327c…173410 Dummy {f00=0x0173, f01=0x0190, f02=»OT MAX LIMIT ~ P CWK A6,7 IF CDVDK DK1 * P RF(NE) CDV48 NO, RESTART WEIGHT=1 DK1 2 ( P LDK A2,2 YES, RESTART WEIGHT=2 DK1 ` P RF CDV50 DK1 PCDV48 EQU * DK1 P LDK A2,1 RESTART WEIGHT CDV50 EQU * SUK A5,1 DECREMENT POINTE
0x173410…1735a4 Dummy {f00=0x0173, f01=0x0190, f02=»DV10 z LDR A10,A10 RF(Z) CDVOUT IF SUM = 0 CDV70 EQU * @ ( # SUR A10,A7 SUBTRACT 10/11 FROM SUM T RB(P) CDV70 SUM STILL > 0 RF(Z) CDVOUT IF CDV-OK P NGR A10,A10 GET CHECK DIGIT LDK A6,1 INDICATE NOT OK
0x1735a4…173738 Dummy {f00=0x0173, f01=0x4050, f02=» t " SC A6,-2,A1 STORE CR ON STACK ABL I:RT1 . END @@ L ( # SUR A10,A7 SUBTRACT 10/11 FROM SUM T RB(P) CDV70 SUM STILL > 0 RF(Z) CDVOUT IF CDV-OK P NGR A10,A10 GET CHECK DIGIT LDK A6,1 INDICATE NOT OK
0x173738…1738cc Dummy {f00=0x0173, f01=0x2008, f02=» SUM STILL > 0 RF(Z) CDVOUT IF CDV-OK ADR A10,A7 GET CHECK DIGIT > LDK A6,1 INDICATE NOT OK b CDVOUT EQU * & ! CALL I:EVA0 GET CHECK-DIGIT ITEM * & STR A10,A9 STORE CHECK-DIGIT IF ERROR LD A1,2,A13 GET STACK B
0x1738cc…173a60 Dummy {f00=0x0173, f01=0x0190, f02=»2 _ _ 0 ~P + , @z6 Az _ @ @z $XP@ ~U 0 , P& b~ ![) !0 + T b~ ![( !b~ ![ ! ! (41 .0 %%0 &&0% $ _ 6 ? ? + , 6 h[ * !T06 $ $$ 0 , T 0 , @ T 0 + !_6A X @ T ? &? @e( +AdIe 1 /W 1 +An@m 6 -
0x173a60…173bf4 (1, 235) Opaque[0x194]
0x173bf4…173d88 # DirEnt {nam=»DE50ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0dd8, f03=0x0000}
0x173bf4…173d88 IdxSect {
0x173bf4…173d88 f00 = 0x006e // 0x173bf4 @0x0
0x173bf4…173d88 f01 = 0x000a // 0x173bf6 @0x2
0x173bf4…173d88 gno = [ // 0x173bf8 @0x4
0x173bf4…173d88 [0x00]: C0x006e.0x3.0
0x173bf4…173d88 [0x01]: C0x006f.0x0.0
0x173bf4…173d88 [0x02]: C0x006f.0x1.0
0x173bf4…173d88 [0x03]: C0x006f.0x2.0
0x173bf4…173d88 [0x04]: C0x006f.0x3.0
0x173bf4…173d88 ]
0x173bf4…173d88 }
0x173d88…173f1c Dummy {f00=0x006e, f01=0x0190, f02=» $ P IDENT DE50ST REL 10.0 80-04-11 P UPD 80-04-24/DALI , P 80-04-14/DALI H DDUM DEDDIV ` PDIV t P ENTRY DE50ST P ENTRY DEAP5A * * ** EXTERNAL REFERENCES TO SCREEN * P EXT DECLRA P EXT
0x173f1c…1740b0 Dummy {f00=0x006e, f01=0x0190, f02=»XT DERECS P EXT DEDISC P EXT SETB & P EXT TESTB 8 P EXT CLEARB J P EXT MSKOUT ^ P EXT DERROR r P EXT OPCL P EXT DESTAU BUILD STATUS P EXT DEPRUT P EXT ATTWB P EXT ATTDB P EXT EMPTYT P EXT
0x1740b0…174244 Dummy {f00=0x006e, f01=0x0190, f02=» INCLUDE DELITT EJECT 2 P********************************************* & 0 P* START OF SEARCH/CORR. HANDLE PRORAMSCREEN- ( P* LAYOUTS 50,51,52,53 SEARCH MODE. , P* THESE ROUTINES USE THE DENTER-SCREEN. 2 P****************************
0x174244…1743d8 Dummy {f00=0x006e, f01=0x0190, f02=»50EN PDEST00 & P SET BOOL1 PART OF FORMAT DISPLAY PDEST10 D P TBT BOOL2,DE50EN R P ATTFMT F50ST l & P SET DEPROMPT PROMPT-TEXTS DISPLAY PDEST50 P CLEAR DECHANGE P PERF DECLRS PDEST60 $ P IB DEBINW2,DE50CA,D
0x1743d8…17456c Dummy {f00=0x006e, f01=0x0190, f02=» t P MOVE DEBINW4,BIN3 PDE50E2 " PDE50ER 0 P PERF DERR > P B DEST60 P P EJECT b P* p P* CANCEL-KEY PRESSED z P* PDE50CA P CLEAR DEPROMPT P B DEST50 * P* ENTER-KEY PRESSED P* P
0x17456c…174700 Dummy {f00=0x006e, f01=0x0190, f02=» CLEAR DOOL3 P BZ DERE20 P PERF OPCL,W4 CLOSE USERFILE & P BNERR DERE20 J P MOVE DEBINW1,W0 ` P PERF DERROR,DEKTAB6 x PDERE20 P TBT BOOL2,DERE50 P MOVE BIN2,W1 P MOVE BIN1,W0 PDERE30 RET PDERE50
0x174700…174894 (1, 236) Dummy {f00=0x006f, f01=0x0190, f02=»LEAR BOOL1 PART OF FORMAT DISPLAY P SET BOOL2 LEVEL 2 IN SEARCH * & P MOVE EOLINE,W2 NUMBER OF BUFFERS N $ P MOVE BIN4,W2 NUMBER OF CONSEC. x 0 P PERF DEPOOL,W2,EOLINE,BIN4,STRG10A GET LOCK P BNOK DE50ER P MOVE DEBINW2,W0 PDE5203
0x174894…174a28 Dummy {f00=0x006f, f01=0x0190, f02=» x & P XCOPY BPOOL(EOLINE),W0,W1,W128,W1 & P XCOPY BPOOL(EOLINE),W1,W1,W15,W1 2 & P XCOPY BPOOL(EOLINE),W5,W1,W24,W1 $ P CALL ATTWB,BPOOL(EOLINE),W8,W11 $ P CALL ATTDB,BPOOL(EOLINE),W0,W11 P CBNE DEBINW2,W0,DE52EN & P CBE BIN2,W2,DE520
0x174a28…174bbc Dummy {f00=0x006f, f01=0x0190, f02=» CLEAR DECHANGE P PERF DECLRS PDE5210 , P PERF DEPRUT,PRNUM,BIN1,BIN2 : $ P IB DEBINW2,DE52CA,DE52RE,DE52EN ^ P MOVE DEBINW4,W0 PDE5220 P PERF DERR P B DE5210 PDE52CA P PERF DECLRA P B DE5210 PDE52
0x174bbc…174d50 Dummy {f00=0x006f, f01=0x0190, f02=»NW2 z P B DE5220 PDE52EN P MOVE DEBINW2,W0 , P MOVE STSAVE(W2),BATCH D P MOVE BATCH,HEX00 b P PERF DEOPBC,DEBINW2 | P MOVE BIN7,W0 P PERF DEPRUT,PRNUM,BIN1,BIN2 & P CBE BIN2,W2,EN5202 JUMP IF BATCH P ATTFMT F51S
0x174d50…174ee4 Dummy {f00=0x006f, f01=0x0190, f02=»52RE,DE52ER t PEN5205 $ P CBE BIN2,W1,EN5210 JUMP IF JOB " ( P MOVE BIN5,=W'34' GET NEXT BATCHNAME J P B EN5220 v PEN5210 $ P MOVE BIN5,W21 GET NEXT JOBNAME PEN5220 P PERF DEDISC,BIN5 P BNOK EN5270 $ P CBE BIN2,W1,E
0x174ee4…175078 Dummy {f00=0x006f, f01=0x0190, f02=»T,W0 x P* CALL MSKOUT,BIN10,BIN7 . P* CBNE BIN6,BIN10,DE52EN STATUS NOT MATCH , P PERF DESTAU,BDSTAT,STRG10A ^ ( P PERF DEPOOL,W6,PINACC,BIN8,STRG10A P B EN5250 PEN5240 P MOVE STRG10A,=C'IN USE ' PEN5250 P ADD BIN7,
0x175078…17520c Dummy {f00=0x006f, f01=0x0190, f02=»ATCH,W0 COPY p 0 P CON X.COPY,FDVBCD(BIN7),W6,W1,VALSTR,W18 : 2 P CON X.COPY,FDVBCD(BIN7),W7,W8,STRG10A,W0 COPY H P MOVE STSAVE(W2),BATCH ~ P B EN5257 PEN5255 . P CON X.COPY,FDVBCD(BIN7),W0,W6,JOBNAME,W0 P MOVE STSAVE(W1),JOBNAME
0x17520c…1753a0 Dummy {f00=0x006f, f01=0x0190, f02=»E BIN7,W24,EN5205 PEN5258 P CLEAR DOOL3 ( P BZ EN5259 < P PERF OPCL,W4 CLOSE USERFILE N PEN5259 r P DISPLAY 3,W3,W4 P CLEAR DECHANGE P DSC0 DEDSDYKB,02 P PERF DECLRN PEN5260 2 P IB DEBINW2,DE52CA,DE52RE,DE
0x1753a0…175534 (1, 237) Dummy {f00=0x006f, f01=0x0190, f02=» FOUND' h P CBNE BIN7,W0,EN5258 P PERF DEPRUT,PRNUM,BIN1,BIN2 , PEN5280 P P CLEAR DOOL3 ^ P BZ EN5281 IF NOT OPEN r P MOVE BIN3,DEBINW4 " P PERF OPCL,W4 CLOSE USER FILE P MOVE DEBINW4,BIN3 PEN5281 P PERF DERR
0x175534…1756c8 Dummy {f00=0x006f, f01=0x0190, f02=»WD PRESSED x P MOVE JOBNAME,HEX00 P B DE5203 . PBW5200 @ & P CBE DEBINW2,W5,BW5210 BWD PREESED N P CALL EMPTYT,JOBNAME x P BNZ EN5265 EMPTY! P B DE5203 PBW5210 P MOVE BATCH,HEX00 PDE52CL P B DE5203 P
0x1756c8…17585c Dummy {f00=0x006f, f01=0x0190, f02=»NE,BIN8,STRG10A | P SET BOOL2 P B DE50RE * P EJECT < . P****************************************** J , P* THIS IS THE MAINLOOP IN SEARCH RECORD. | , P* THE PROCEDURES FOR BATCHHANDLING USED , P* ARE THE SAME AS FOR ENTRY AND VERIFY.
0x17585c…1759f0 Dummy {f00=0x006f, f01=0x018e, f02=» " P NOT USED WITHIN PROGRAM 53 PDE5305 * P SET DEPROMPT 8 P CLEAR DECHANGE N PDE5310 f P MOVE WORK(W11),W0 COMP-WORD t " P MOVE WORK(W12),W0 MSKOUT-WORD & P PERF DECLRS CLEAR SOME VARIABELS PDE5315 $ P IB DEBINW2,DE53CA
0x1759f0…175b84 Dummy {f00=0x006f, f01=0x0190, f02=» P B DE5315 PDE53EN P MOVE DEBINW2,W0 ( P CALL EMPTYT,STR64A @ P BZ EN5300 IF NOT EMPTY P MOVE WORK(W11),W0 COMP-WORD | " P MOVE WORK(W12),W0 MSKOUT-WORD PEN5300 , P PERF DEOPBC,DEBINW2 OPEN BATCH-ROUTINE P CLE
0x175b84…175d18 Dummy {f00=0x006f, f01=0x018e, f02=»ATARECORDHANDLING-ROUTINE $ P B EN5300 TAKE CARE OF RETURCODE " PDE53RE J P CLEAR DOOL3 X P CLEAR SOOL2 l P PERF OPCL,W4 CLOSE USERFILE P BOK DE53ST SUCCESSFULLY PEN5320 OPEN BATCH FAILED P CLEAR DOOL3 P MOVE STR64A,H
0x175d18…175eac Dummy {f00=0x006f, f01=0x0190, f02=» P CBE DEBINW2,W0,DES120 * P COPY STR64A,DEBINW2,W1,STATIU,W9 ',' & ADD DEBINW2,W1 T PDES120 l , P CALL TESTB,WORK(W11),DEBINW3 COMP-WORD z P BNZ DES140 * P COPY STR64A,DEBINW2,W1,STATIU,W8 '/' ADD DEBINW2,W1 PDES1
0x175eac…176040 Dummy {f00=0x006f, f01=0x0190, f02=»ES100 ~ P ATTFMT F53ST P DISPLAY 3,W5,W5 $ P DISPLAY 3,W6,W6 < P GETFLD 0,W4,DEBINW3 T " P B DE5320 DISPLAY ERRORMESSAGE p P EJECT P* ( P* APPL VALUE HANDLING ROUTINE P* PDEAP5A $ P IB DEBINW4,DEAP51,DEA
0x176040…1761d4 (1, 238) Dummy {f00=0x006f, f01=0x0190, f02=»RD v " P MOVE WORK(W12),W0 MSKOUT-WORD P MOVE BIN9,W0 0 PAPP003 F P CBE BIN9,DEBINW1,APP340 T P MOVE BIN8,W0 t PAPP005 * P MATCH STATIU,BIN8,W10,DEINPUT,BIN9,W1 P BNOK APP395 ILLEGAL LETTER P IB BIN8, C P APP395 -
0x1761d4…176368 Dummy {f00=0x006f, f01=0x0190, f02=»35 = C P APP330 = PAPP310 . P CALL TESTB,WORK(W12),BIN8 LOOK IF STATUS . P BNZ APP395 MASK ALREADY SET ` * P CALL SETB,WORK(W12),BIN8 MSKOUT-WORD P CLEAR DOOL6 NOT-FLAG SAT? P BNZ APP330 PAPP320 ( P CALL SETB,WORK(W1
0x176368…1764fc Dummy {f00=0x006f, f01=0x018e, f02=» P BZ APP330 PAPP340 P CLEAR DOOL6 NOT-FLAG ( " P BNZ APP395 LAST LETTER = '/' F PAPP350 l P B DEAOK0 z PAPP395 PDEAER6 P MOVE DEBINW4,W6 P B DEANOK P PEND EJECT * * FORMATS
0x1764fc…176690 Dummy {f00=0x006f, f01=0x0190, f02=» FNL P FCOPY =C'PROGRAM:' ( P FKI 9,MINL=2,MAXL=2,ME,NEOI,APPL=1 , P FMEL 'XX',PRNUM X P FBF BOOL1,F50OUT p FNL P FLINK F51ST2 P FNL P FLINK F52ST2 P FNL P FLINK F53ST2 PF50OUT P FMEND
0x176690…176824 Dummy {f00=0x006f, f01=0x0190, f02=» P FNL P FLINK F50STA P FMEND * PF52ST FRMT 8 P FSL J P FLINK F52ST2 V P FNL l P FLINK F50UV x P FNL P FLINK F52JOB P FTAB 20 P FLINK F50BAT P FLINK F50END P FNL P FLINK F50STA
0x176824…1769b8 Dummy {f00=0x006f, f01=0x0190, f02=» FTAB 20 P FLINK F53BAT P FNL & P FCOPY =C'RECORD' 2 P FILLR '-',1 L P FCOPY =C'NUMBER' ` P FILLR ':',1 z P FKI 15,MAXL=7,NEOI P FMEL 'XXXX',BCDI21(W3) P FTAB 30 P FCOPY =C'RECORD' P FILLR '-',1 P
0x1769b8…176b4c Dummy {f00=0x006f, f01=0x0190, f02=»MEND PF51ST2 FRMT P FTEXT '51 ' P FCOPY =C'SEARCH' 4 P FILLR ' ',1 N P FCOPY =C'MODE' b P FILLR ' ',1 z P FCOPY =C'JOB' P FILLR ' ',1 P FCOPY =C'LEVEL' P FMEND PF52ST2 FRMT P FTEXT '52 ' P F
0x176b4c…176ce0 Dummy {f00=0x006f, f01=0x0190, f02=»PY =C'LEVEL' P FMEND PF53ST2 FRMT " P FTEXT '53 ' 6 P FCOPY =C'SEARCH' J P FILLR ' ',1 d P FCOPY =C'MODE' x P FILLR ' ',1 P FCOPY =C'RECORD' P FILLR ' ',1 P FCOPY =C'LEVEL' P FMEND PF50UV FRMT
0x176ce0…176e74 (1, 239) Dummy {f00=0x006f, f01=0x0190, f02=»PY =C'VOLUME' P FILLR ':',1 P FINP 27 * P FCOPY TABLE : P FMEND N PF50JOB FRMT P FCOPY =C'JOB' p P FCOPY =C'NAME' P FILLR ':',1 : P FKI 9,ALPHA,MINL=1,MAXL=6,NEOI,APPL=3,DUPL=STSAVE(W1) P FCOPY JOBNAME P F
0x176e74…177008 Dummy {f00=0x006f, f01=0x0190, f02=»L=3,DUPL=STSAVE(W1) j P FCOPY JOBNAME P FMEND 2 PF50BAT FRMT @ P FCOPY =C'BATCH' T P FCOPY =C'NAME' l P FILLR ':',1 < P FKI 30,ALPHA,MINL=1,MAXL=6,NEOI,APPL=4,DUPL=STSAVE(W2) P FCOPY BATCH FMEND PF53BAT FRMT
0x177008…17719c Dummy {f00=0x006f, f01=0x0190, f02=» P FCOPY BATCH FMEND PF50STA FRMT & P FINP 1 : P FCTL X'C0',FDVBCD(W1) J P FINP 21 h P FCTL X'C0',FDVBCD(W2) x P FINP 41 P FCTL X'C0',FDVBCD(W3) P FNL P FINP 1 P FCTL X'C0',FDVBCD(W4) P FINP 21
0x17719c…177330 Dummy {f00=0x006f, f01=0x0190, f02=» P FINP 21 ! P FCTL X'C0',FDVBCD(W8) ! P FINP 41 ! 2 P FCTL X'C0',FDVBCD(W9) ! B P FNL ! ` P FINP 1 ! l P FCTL X'C0',FDVBCD(W10) ! | P FINP 21 ! P FCTL X'C0',FDVBCD(W11) ! P FINP 41 ! P FCTL X'C0',FDVBCD(W12) ! P FNL ! P
0x177330…1774c4 Dummy {f00=0x006f, f01=0x0190, f02=» ! x P FNL " P FINP 1 " P FCTL X'C0',FDVBCD(W16) " $ P FINP 21 " D P FCTL X'C0',FDVBCD(W17) " T P FINP 41 " t P FCTL X'C0',FDVBCD(W18) " P FNL " P FINP 1 " P FCTL X'C0',FDVBCD(W19) " P FINP 21 " P FCTL X'C0',FDVBCD(W20)
0x1774c4…177658 Dummy {f00=0x006f, f01=0x40ba, f02=»L X'C0',FDVBCD(W23) " P FINP 41 # P FCTL X'C0',FDVBCD(W24) # , P FMEND # L PF50END FRMT # Z P FNL # n P FKI 1 # z P FCOPY HEX00 # P FMEND # END # @ # P FCTL X'C0',FDVBCD(W19) " P FINP 21 " P FCTL X'C0',FDVBCD(W20)
0x177658…1777ec Dummy {f00=0x006f, f01=0x2008, f02=» $ PY HEX00 P FMEND END &@ 2 P FCTL X'C0',FDVBCD(W19) : P FINP 21 Z P FCTL X'C0',FDVBCD(W20) j P FINP 41 P FCTL X'C0',FDVBCD(W21) P FNL P FINP 1 P FCTL X'C0',FDVBCD(W22) P FINP 21 P F
0x1777ec…177980 Dummy {f00=0x006f, f01=0x0190, f02=»!* & & & ! 1 0 "}H{ Ij 0 !6 H" W 09 {$*0 P _4 0 "}_? 1 !6 TT _P - PJ !6 ??_&Aj p! u # $ j $!! {1j #!! {2 $ #? &{ @jP { &{ W &{ @jP H{ m *" ! I{ ? % & 4 0# 6 55 555555555W 'I ( W Ij I }I
0x177980…177b14 (1, 240) Opaque[0x194]
0x177b14…177ca8 # DirEnt {nam=»DE31ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0e00, f03=0x0000}
0x177b14…177ca8 IdxSect {
0x177b14…177ca8 f00 = 0x0070 // 0x177b14 @0x0
0x177b14…177ca8 f01 = 0x0008 // 0x177b16 @0x2
0x177b14…177ca8 gno = [ // 0x177b18 @0x4
0x177b14…177ca8 [0x00]: C0x0070.0x0.0
0x177b14…177ca8 [0x01]: C0x0070.0x1.0
0x177b14…177ca8 [0x02]: C0x0070.0x2.0
0x177b14…177ca8 [0x03]: C0x0070.0x3.0
0x177b14…177ca8 ]
0x177b14…177ca8 }
0x177ca8…177e3c Dummy {f00=0x0070, f01=0x0190, f02=» $ P IDENT DE31ST REL 10.0 80-04-11 P 79-10-19/DALI , P*************************** D P* 31 CREATE JOB DEFINITION h P* 32 GET JOB DEFINITION P*************************** P************************** P* FORTAB 1 - 21
0x177e3c…177fd0 Dummy {f00=0x0070, f01=0x0190, f02=» * z P* 21 BALANCE * P* SYMREC 1 - 12 * . P* 1-9 REC.NR FORMAT 1-9 * P P* 10 REC.NR BATCHHEAD * r P* 11 REC.NR BALANCE * P* 12 MAXL. SYMB.NAMES * P************************** 6 P**************
0x177fd0…178164 Dummy {f00=0x0070, f01=0x0190, f02=»RE FORMAT * n 6 P************************************************* DDUM DEDDIV R PDIV f P ENTRY DE31ST t P ENTRY DEAP3A P EXT DECLRA P EXT DECLRN P EXT DERROR P EXT DERR P EXT DEDISC P EXT A
0x178164…1782f8 Dummy {f00=0x0070, f01=0x0190, f02=»JECT PDE31ST PROC P ATTFMT F31 P SET BOOL1 4 P CBE PRNUM,=D'32',A10 F P CLEAR BOOL1 d PA10 x P SET DEPROMPT P CLEAR DECHANGE " P SET BOOL2 2 LINES ON DISPLAY P PERF DECLRA PA20 * P IB DEBINW2,CANC
0x1782f8…17848c Dummy {f00=0x0070, f01=0x0190, f02=»R,BIN7,STRG10A RELEASE BUFFER z PA50 & P IB DEBINW2,A10,RETUR,A10 2 PRETUR RET T P PEND f P EJECT t PFORW , P MOVE BIN1,=W'29' GET NEXT,REL.PREV.BUFF P B B20 PBACKW . P MOVE BIN1,=W'30' GET PREV. REL.PREV.BUFF
0x17848c…178620 Dummy {f00=0x0070, f01=0x018e, f02=»L2,B35 IF COMPLETE PICTURE P CLEAR DENOCHAN " PB35 : P PERF DERR F P B B70 X PB50 f & P CALL ATTWB,BPOOL(PJOBCUR),W0,W12 r P SET DEPROMPT PB60 & P SET DENOCHAN NO CHANGES POSSIBLE P CLEAR BOOL2 ENTIRE FORMAT
0x178620…1787b4 (1, 241) Dummy {f00=0x0070, f01=0x0190, f02=» P EJECT PCORR PDEL 4 P PERF DEPOOL,W8,PJOBCUR,BIN7,STRG10A LOCK BUFFER * P BNOK DEL200 b P CMP DEBINW2,W6 v P BE C70 IF CORRECTION P* P* DELETION P* PDEL100 . P MOVE DEBINW4,W17 'PRESS ENT FOR DELET
0x1787b4…178948 Dummy {f00=0x0070, f01=0x0190, f02=»DEL100 4 CFW C P DEL150 5 ENT C P DEL100 6 EOI . P* ENTER-KEY D PDEL150 X P MOVE DEBINW2,W3 f P PERF DEDISC,W5 DELETE JOB ~ P BOK CANC PDEL200 & P SET DENOCHAN NO CHANGES POSSIBLE P PERF DERR P B B70
0x178948…178adc Dummy {f00=0x0070, f01=0x0190, f02=»N7,W0 NO CONSECUTIVE BUFFERS " P MOVE STRG10A,MODTAB(W3) ='J' $ * P COPY STRG10A,W1,W6,DEINPUT,W0 JOBNAME J > P PERF DEPOOL,W2,PJOBCUR,BIN7,STRG10A GET BUFFER WITH LOCK x P BNOK ERR99 4 P PERF DEPOOL,W4,PJOBCUR,BIN7,STRG10A SET BUFFER P M
0x178adc…178c70 Dummy {f00=0x0070, f01=0x018e, f02=»EMS t P MOVE FORTAB(W10),JOBNAME P DISPLAY 4,W2,W0 . PC70 F P************** R P* CORR. JOB h P************** | P PERF DECLRN P B A20 P EJECT PENTER & P TBF BOOL2,ENTER2 IF ENTIRE FORMAT P MOVE DEINPUT,
0x178c70…178e04 Dummy {f00=0x0070, f01=0x0190, f02=» t P* MODUL 31 - CREATE JOB P************************** ( P PERF DEDISC,W4 SEARCH JOB J P BOK ERR8 'ALREADY EXISTS' l " P CBE DEBINW4,W9,C20 NOT FOUND P B ERR99 P************************** P* MODUL 32 - GET JOB P****
0x178e04…178f98 Dummy {f00=0x0070, f01=0x0190, f02=» PD20 P MOVE JOBNAME,=X'00' P B ERR99 , P EJECT < P*************************** J P* CHECK FORMAT-SYMBOLIC: n P*************************** PENTER2 P MOVE BIN2,W0 PEA P CLEAR BOOL3 P ADD BIN2,W1
0x178f98…17912c Dummy {f00=0x0070, f01=0x0190, f02=»OVE BIN3,BIN2 P ADD BIN3,W10 , P CALL EMPTYT,FORTAB(BIN3) SYMBOLIC NAME , P BNZ EA EMPTY P CLEAR BOOL3 r P BNZ EA JOB NOT EMPTY P* GET INPUT FIELD NO. P MOVE BIN3,BIN2 P MUL BIN3,W2 P ADD BIN3,W1 PEERR G
0x17912c…1792c0 Dummy {f00=0x0070, f01=0x0190, f02=»E1 ADD BIN2,W1 P CBG BIN2,W8,E3 P CALL EMPTYT,FORTAB(BIN2) . P BZ E1 NOT EMPTY P P MOVE BIN3,BIN2 h PE11 ADD BIN3,W1 P CBG BIN3,W9,E3 READY P CALL EMPTYT,FORTAB(BIN3) P BNZ E11 EMPTY $ P MOVE FORTAB(BIN2),FORTAB(
0x1792c0…179454 (1, 242) Dummy {f00=0x0070, f01=0x0190, f02=») r P MOVE FORTAB(BIN3),=X'00' P MOVE FORTAB(BIN5),=X'00' , P B E1 N PE3 CALL EMPTYT,FORTAB(W1) & P********************************* ~ $ P* FIRST FORMAT MUST BE PRESENT & P********************************* P BZ E4 NOT EMP
0x179454…1795e8 Dummy {f00=0x0070, f01=0x018e, f02=» MOVE BIN2,W10 0 P MOVE SYMREC(W12),W0 MAXL.OF SYMBOLIC NAMES PE41 ADD BIN2,W1 J P CBG BIN2,W19,E5 READY b P MOVE BIN3,W0 , P MATCH FORTAB(BIN2),BIN3,W6,HEX00,W0,W1 P BNZ E42 NO MATCH = 6 CHAR. P CBNG BIN3,SYMREC(W12),E41
0x1795e8…17977c Dummy {f00=0x0070, f01=0x0190, f02=» P BOK CANC P B ERR99 P EJECT & P* 4 ( P* APPL VALUE HANDLING ROUTINE > P* j PDEAP3A t $ P IB DEBINW3,APP101,APP102,APP102 PAPP101 P MOVE DEBINW2,W17 IND.ENTER P B DEAOK0 PAPP102 P MOVE BIN3,W
0x17977c…179910 Dummy {f00=0x0070, f01=0x018e, f02=»AOK0 BATCHEAD P B DAER32 BALANCE PAPP1020 0 P CALL TESTB,DEBINW3,W15 @ P BNZ DEAOK0 BALANCE ` PDAER32 | P MOVE DEBINW4,W32 P B DEANOK P* P* PERR0 P MOVE DEBINW4,W0 'BELL' P B ERR99 PER
0x179910…179aa4 Dummy {f00=0x0070, f01=0x0190, f02=» P MOVE DEBINW1,W0 P PERF DERR P B A20 2 EJECT @ PF31 FRMT N P FSL ^ P FMEL '99',PRNUM j P FBT BOOL1,F32 P FCOPY =C' CREATE' P FB F31A PF32 FCOPY =C' GET' " PF31A FCOPY =C' JOB-DEFINITION' P FNL
0x179aa4…179c38 Dummy {f00=0x0070, f01=0x0190, f02=»INES 0 P FKI 11,MINL=1,MAXL=6,ALPHA,ME,NEOI,APPL=101 P FCOPY JOBNAME @ P FB F31UT V PF31C h P FLINK F311 t PF31UT FMEND P* PF311 FRMT FNL P FCOPY =C'BATCHHEAD:' 0 P FKI 12,MINL=1,MAXL=6,ALPHA,NEOI,ME,AP
0x179c38…179dcc Dummy {f00=0x0070, f01=0x0190, f02=»03 f P FCOPY FORTAB(W21) BALANCE P FNL , P FCOPY =C'FORMAT' 8 P FILLR ' ',1 R P FCOPY =C'1:' f . P FKI 11,MINL=1,MAXL=6,NEOI,ALPHA,APPL=102 | P FCOPY FORTAB(W1) P FTAB 28 P FCOPY =C'SYMBOLIC:' $ P FKI 38,MINL=1,MAXL=
0x179dcc…179f60 Dummy {f00=0x0070, f01=0x0190, f02=»NL=1,MAXL=6,NEOI,ALPHA,APPL=102 P FCOPY FORTAB(W2) ( P FTAB 28 B P FCOPY =C'SYMBOLIC:' R $ P FKI 38,MINL=1,MAXL=6,NEOI,ALPHA n P FCOPY FORTAB(W12) P FNL P FCOPY =C'FORMAT' P FILLR ' ',1 P FCOPY =C'3:' . P FKI 11,
0x179f60…17a0f4 (1, 243) Dummy {f00=0x0070, f01=0x0190, f02=»OI,ALPHA x P FCOPY FORTAB(W13) P FNL * P FCOPY =C'FORMAT' 6 P FILLR ' ',1 P P FCOPY =C'4:' d . P FKI 11,MINL=1,MAXL=6,NEOI,ALPHA,APPL=102 z P FCOPY FORTAB(W4) P FTAB 28 P FCOPY =C'SYMBOLIC:' $ P FKI 38,MINL=1,MAXL=6,
0x17a0f4…17a288 Dummy {f00=0x0070, f01=0x0190, f02=»=1,MAXL=6,NEOI,ALPHA,APPL=102 P FCOPY FORTAB(W5) & P FTAB 28 @ P FCOPY =C'SYMBOLIC:' P $ P FKI 38,MINL=1,MAXL=6,NEOI,ALPHA l P FCOPY FORTAB(W15) P FNL P FCOPY =C'FORMAT' P FILLR ' ',1 P FCOPY =C'6:' . P FKI 11,MI
0x17a288…17a41c Dummy {f00=0x0070, f01=0x0190, f02=»,ALPHA v P FCOPY FORTAB(W16) P FNL ( P FCOPY =C'FORMAT' 4 P FILLR ' ',1 N P FCOPY =C'7:' b . P FKI 11,MINL=1,MAXL=6,NEOI,ALPHA,APPL=102 x P FCOPY FORTAB(W7) P FTAB 28 P FCOPY =C'SYMBOLIC:' $ P FKI 38,MINL=1,MAXL=6,NE
0x17a41c…17a5b0 Dummy {f00=0x0070, f01=0x0190, f02=»,MAXL=6,NEOI,ALPHA,APPL=102 P FCOPY FORTAB(W8) $ P FTAB 28 > P FCOPY =C'SYMBOLIC:' N $ P FKI 38,MINL=1,MAXL=6,NEOI,ALPHA j P FCOPY FORTAB(W18) P FNL P FCOPY =C'FORMAT' P FILLR ' ',1 P FCOPY =C'9:' . P FKI 11,MINL
0x17a5b0…17a744 Dummy {f00=0x0070, f01=0x4080, f02=»LPHA t P FCOPY FORTAB(W19) P FNL & P FKI 1,MINL=0,MAXL=0 2 P FCOPY HEX00 N P FMEND b END p@ |NEOI,ALPHA j P FCOPY FORTAB(W18) P FNL P FCOPY =C'FORMAT' P FILLR ' ',1 P FCOPY =C'9:' . P FKI 11,MINL
0x17a744…17a8d8 Dummy {f00=0x0070, f01=0x2008, f02=» P FKI 1,MINL=0,MAXL=0 P FCOPY HEX00 ( P FMEND < END J@ V=1,MAXL=6,NEOI,ALPHA N P FCOPY FORTAB(W18) v P FNL P FCOPY =C'FORMAT' P FILLR ' ',1 P FCOPY =C'9:' $ P FKI 11,MINL=1,MAXL=6,NEOI,ALPHA P
0x17a8d8…17aa6c Dummy {f00=0x0070, f01=0x0190, f02=» | Z V, [ t @ [ | Z [ _ 0 t 5 P 8 8 8 Z P 9 _ Z P 8 0 5 _ 0 5 SJ SJP _0 P 0 5 _ P 0 5 Z Z
0x17aa6c…17ac00 Dummy {f00=0x0070, f01=0x0190, f02=» $ , P T f 6 @ 0 A 6 A 8 <P Q "P A 8 D A A $ P Q A 6 S @ : A , 4 @ 4P A , @ 4=!P A 4 A $ A _2 @ 6P @ : A $ 0 @ 8P A $ D : Q B _ @ :_ C_ 5
0x17ac00…17ad94 (1, 244) Opaque[0x194]
0x17ad94…17af28 # DirEnt {nam=»DE14ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0e20, f03=0x0000}
0x17ad94…17af28 IdxSect {
0x17ad94…17af28 f00 = 0x0071 // 0x17ad94 @0x0
0x17ad94…17af28 f01 = 0x0004 // 0x17ad96 @0x2
0x17ad94…17af28 gno = [ // 0x17ad98 @0x4
0x17ad94…17af28 [0x00]: C0x0071.0x0.0
0x17ad94…17af28 [0x01]: C0x0071.0x1.0
0x17ad94…17af28 ]
0x17ad94…17af28 }
0x17af28…17b0bc Dummy {f00=0x0071, f01=0x0190, f02=» $ P IDENT DE14ST REL 10.0 80-04-11 P 79-11-15/LABJ , P************************* D P* 14 SYSTEM-VARIABLES f P************************* DDUM DEDDIV PDIV P ENTRY DE14ST P EXT DECLRN P EXT DERR P EXT
0x17b0bc…17b250 Dummy {f00=0x0071, f01=0x0190, f02=»OK SETPR PCANC10 PERF DERR P B A1 ( PSETPR SET DEPROMPT 6 P PERF DECLRN P " PA1 IB DEBINW2,CANC,RETUR,ENTER d P MOVE DEBINW4,W0 ERROR P B CANC10 P* $ PENTER PERF DEDISC,W20 ENTER SYSV P BNOK CANC10 PRETUR RE
0x17b250…17b3e4 Dummy {f00=0x0071, f01=0x0190, f02=»ENTS' | FNL P FCOPY MODTAB(W5) FCOPY =C'01' 4 P FKI 7,MINL=0,MAXL=17,ALPHA J P FCOPY SYSV(W1) n P FNL P FCOPY MODTAB(W5) FCOPY =C'02' P FKI 7,MINL=0,MAXL=17,ALPHA P FCOPY SYSV(W2) FNL
0x17b3e4…17b578 Dummy {f00=0x0071, f01=0x0190, f02=»W5) FCOPY =C'04' P FKI 7,MINL=0,MAXL=17,ALPHA " P FCOPY SYSV(W4) F FNL ^ P FCOPY MODTAB(W5) j FCOPY =C'05' P FKI 7,MINL=0,MAXL=17,ALPHA P FCOPY SYSV(W5) FNL P FCOPY MODTAB(W5) FCOPY =C'06
0x17b578…17b70c Dummy {f00=0x0071, f01=0x0190, f02=»,MINL=0,MAXL=17,ALPHA P FCOPY SYSV(W7) FNL 6 P FCOPY MODTAB(W5) B FCOPY =C'08' P FKI 7,MINL=0,MAXL=17,ALPHA r P FCOPY SYSV(W8) FNL P FCOPY MODTAB(W5) FCOPY =C'09' P FKI 7,MINL=0,MAXL=17,ALPHA
0x17b70c…17b8a0 Dummy {f00=0x0071, f01=0x4068, f02=»V(W10) P FNL P FKI 1,MINL=0,MAXL=0 P FCOPY HEX00 6 FMEND J END X@ d' P FKI 7,MINL=0,MAXL=17,ALPHA r P FCOPY SYSV(W8) FNL P FCOPY MODTAB(W5) FCOPY =C'09' P FKI 7,MINL=0,MAXL=17,ALPHA
0x17b8a0…17ba34 (1, 245) Dummy {f00=0x0071, f01=0x2008, f02=» END @ FCOPY =C'15' FKI 7,MINL=0,MAXL=20,ALPHA . FCOPY WTAB(15) R FNL j FCOPY STR1A v FCOPY =C'16' FKI 7,MINL=0,MAXL=20,ALPHA FCOPY WTAB(16) FMEND F131 FRMTR1A FSLPY =C'
0x17ba34…17bbc8 Dummy {f00=0x0071, f01=0x0190, f02=»OVV V "!H '0 **P I * & %!@ A W I " W %!T A @ 0 * & *,T H $!A W I $!T @ " N * & ; , , g40 #g !!4 { 0' {$* | * & Y 0& x*({ ' ( $ g4@ !" #g4 * & w x* !u uv_ 0 j x! ! 7 * &
0x17bbc8…17bd5c Dummy {f00=0x0071, f01=0x0190, f02=» 'jy " xy x u$x Jj " $( * & xw u 1 /_ /Z j . * & + " &( * 1Z)_5 x* wx x 'j * & I y " g4 #gYuP W j ! x0 * & g , + & # #4_ !g3 #4W * & l x !? I W!g3Sj " $(wx
0x17bd5c…17bef0 Dummy {f00=0x0071, f01=0x0190, f02=» x* W p * & Y uj " "( _ j " &( * % * & 1W 0 : j " & *1 1 W < * & 9 u ! u ! u ! 1 : jx " & j * & W 1 w*j " w wx wx * & u j &"w xw? w w !( % _ ' * & xw g4 # (
0x17bef0…17c084 Dummy {f00=0x0071, f01=0x0190, f02=»*W + 4 ! ~ * & Hl " * W 2? Il * * & ) (m Hl . W H ? ? Ub & J * & G $ ' )g3 *W ( W x * & e *PE - { ) ? 1 0 ! 0) * & ({ ' x( ' ' wj " jy " * &
0x17c084…17c218 Dummy {f00=0x0071, f01=0x0190, f02=» g3 j x) w < ? < ? !j &m * & &j "y ( + ? A ? < 0 @vP * * & 7 C 8 ? ' ( % 2 ! C 8 0 @v< X * & U "!_y # "= g " &| & * & s z )? ? ' xj " ( y !!4 2 4 ' * &
0x17c218…17c3ac Dummy {f00=0x0071, f01=0x412a, f02=» + z w q l E [ * * & ' 8 > ! & H * & E FETCHING FORMAT: FROM D v * & c ISC. @ U 0 0 * n < D
0x17c3ac…17c540 Dummy {f00=0x0071, f01=0x4014, f02=» HNOD @ q l E [ DEREC2 , * & ' 8 n ! & > * & E FETCHING FORMAT: FROM D l * & c ISC. @ U 0 0 * n < D D
0x17c540…17c6d4 (1, 246) Opaque[0x194]
0x17c6d4…17c868 # DirEnt {nam=»DEACCU«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0e30, f03=0x0000}
0x17c6d4…17c868 IdxSect {
0x17c6d4…17c868 f00 = 0x0071 // 0x17c6d4 @0x0
0x17c6d4…17c868 f01 = 0x0008 // 0x17c6d6 @0x2
0x17c6d4…17c868 gno = [ // 0x17c6d8 @0x4
0x17c6d4…17c868 [0x00]: C0x0071.0x2.0
0x17c6d4…17c868 [0x01]: C0x0071.0x3.0
0x17c6d4…17c868 [0x02]: C0x0072.0x0.0
0x17c6d4…17c868 [0x03]: C0x0072.0x1.0
0x17c6d4…17c868 ]
0x17c6d4…17c868 }
0x17c868…17c9fc Dummy {f00=0x0071, f01=0x0190, f02=» $ P IDENT DEACCU REL 10.0 80-04-11 P UPD 80-10-28/DALI , P UPD 80-03-05/DALI J * h L L************************************************************************ r * : 6* SUBMODULE TO THE DATA-ENTRY PACKAGE FOR PTS6800
0x17c9fc…17cb90 Dummy {f00=0x0071, f01=0x0190, f02=» * THE FORMAT. * < 7* AT DELETION OF A RECORD THIS MODULE REVERSES THE ( . )* ACCUMULATIONS DONE BY THAT RECORD. h * 6 P* THE MODULE IS ENTERED WHITH THE STATEMENT: P* $ P* * PERF DEACC,OPTION *
0x17cb90…17cd24 Dummy {f00=0x0071, f01=0x0190, f02=»C v " P* - 1 = REVERSED ACC 0 P* -2 = CORRECTION,IGNORE ZEROIZING 0 L L************************************************************************ d * DDUM DEDDIV PDIV * * ***** ENTRIES
0x17cd24…17ceb8 Dummy {f00=0x0071, f01=0x0190, f02=»OUT P EXT EMPTYT P EXT GETFWD P EXT ADJUST 4 P EXT CMPIND COMPARE INDEX H ( P EXT DEFIND FIELD ADRESS ROUTINE j P EXT DENVAL P INCLUDE DELITT EJECT * L L**********************************************
0x17ceb8…17d04c Dummy {f00=0x0071, f01=0x0190, f02=»********************************** j * * PDEACC PROC OPTION 4 A000 N P CLEAR BOOL9 Z * & MOVE BCD2A,='0' CLEAR ERROR-INDICATOR n , P MOVE DEBINW3,W0 CLEAR CURRENT-FIELD-NR ( P TBF DBOACC,A900 NO ACC IN FORMAT ? " P SET BOOL1 INDIC
0x17d04c…17d1e0 Dummy {f00=0x0071, f01=0x0190, f02=»H ACC-FIELD ***** * A100 $ . P ADD DEBINW3,W1 INCREASE CURRENT-FIELD-NR 0 < P CALL GETFWD,DEBINW4,3,DEBINW3,BIN11 GET NEXT ACC-FIELD b P CALL ADJUST,DEBINW4 BERR A900 END OF FORMAT ? " P ..."CURRENT-FIELD" CURRENT *
0x17d1e0…17d374 (1, 247) Dummy {f00=0x0071, f01=0x018e, f02=»TRING NOT FOUND ? P TBF BOOL9,A210 ( P CALL GETFWD,DEBINW4,0,DEBINW3,BIN7 2 P CALL ADJUST,DEBINW4 ^ P CLEAR BOOL9 z PA210 P CALL EMPTYT,:FMTITEM P BNZ A800 IF EMPTY FIELD * * $ ***** EXECUTE ACC-STRING *
0x17d374…17d508 Dummy {f00=0x0071, f01=0x0190, f02=» > P CALL GETFWD,DEBINW4,0,BIN1,BIN7 MAKE DUPPL-FIELD CURRENT P CALL ADJUST,DEBINW4 J P BOK A200 'DUPL-FIELD' FOUND f EJECT * * ***** SET ERROR-CODE ***** * A800 " PERF SETERR,W2 ERROR-CODE = 2
0x17d508…17d69c Dummy {f00=0x0071, f01=0x0190, f02=»ET CONDITION-CODE ~ P* RET $ EJECT 0 * > L L************************************************************************ H * F B* SUB-ROUTINE FOR EXAMINATION AND EXECUTION OF THE ACC-STRING * L L******************
0x17d69c…17d830 Dummy {f00=0x0071, f01=0x0190, f02=»DD BIN13,BIN12 DISPL. FOR LAST BYTE IN BIN13 P* 4 & P MOVE BIN1,W0 CLEAR DUPL-FIELD-NR > P EJECT h P* v P* " P*****GET ACCUMULATOR-NR ***** P* PB100 " P ADD BIN12,W1 INCREASE DISPL. * P CBG BIN12,BIN13,A250 END OF
0x17d830…17d9c4 Dummy {f00=0x0071, f01=0x018e, f02=»,BIN7,W3,BPOOL(BIN11),BIN12,W1 NEXT BYTE... ( P BNOK B120 ...NOT D OR A ? 4 P IB BIN7,B105,B105 ` P EJECT z P* & P* HANDLE CONDITIONAL ACCUMULATION P* ( P MOVE DEBINW1,W0 SET INPUTLENGT = 0 ( P SUB BIN13,BIN12 PUT D
0x17d9c4…17db58 Dummy {f00=0x0071, f01=0x0190, f02=» P CLEAR DOOLB ERROR-FLAG P BNZ B120 ERROR IN FORMAT $ " P GET THE ACCUMULATION STRING F * P XCOPY BIN12,W1,W1,BIN3,W1 STARTPOINT l . P MOVE BIN3,W0 GET THE LENGTH OF ACC.STRING ( P XCOPY BIN3,W1,W1,BPOOL(BIN11),BIN12 P MOVE BIN13,=X'3
0x17db58…17dcec Dummy {f00=0x0071, f01=0x0190, f02=»DD BIN12,W1 INCREASE DISPL. P PERF DEFIND,BIN6,DEBINW4 $ ( P CBL BIN6,W1,B120 ACC-/DUPL-NR < 1 ? F " P CBE BIN7,W1,B140 DUPL-FIELD ? r P* P CBNE BIN7,W2,B120 NOT ACC ? P CALL CMPIND,BIN6,ACK(W1) P BNOK B120 OUT OF RANGE P
0x17dcec…17de80 Dummy {f00=0x0071, f01=0x0190, f02=» j P EJECT P* P* P***** EXAMINE ***** * P* H PB110 R " P ADD BIN12,W1 INCREASE DISPL. ^ * P CBG BIN12,BIN13,B190 END OF STRING ? P MOVE BIN7,W7 @ P MATCH VALSTR,BIN7,W18,BPOOL(BIN11),BIN12,W1 NEXT BYTE = ?
0x17de80…17e014 (1, 248) Dummy {f00=0x0072, f01=0x018e, f02=» B200,B120,B120,B120 "F,T,C,E" C & P B175,B170,B120,B120 "+,-,*,:" C * & P B190,B120,B120,B120 ";,&,V,?" C T P B120,B180 "',Z" ~ * * ( #***** FORMAT-ERROR DETECTED ***** * PB120 & " PERF SETERR,W2 SET ERROR-
0x17e014…17e1a8 Dummy {f00=0x0072, f01=0x0190, f02=» j P B A250 P EJECT P* & P* 0 P***** ABSOLUTE-VALUE ***** : P* ^ PB160 h & P SET BOOL6 INDICATE ABSOLUTE-VALUE t P B B110 P* P* P***** MINUS-SIGN ***** P* PB170 " P SET BOOL2 INDIC
0x17e1a8…17e33c Dummy {f00=0x0072, f01=0x0190, f02=»* ZEROISE ***** P* PB180 $ $ P CBG OPTION,W0,B390 JUMP IF CORR 0 , P MOVE ACK(BIN6),='0' ZEROISE ACCUMULATOR X P B B390 P* P* P***** DEFAULT ***** P* PB190 $ P SET BOOL8 INDICATE DEFAULT USED P
0x17e33c…17e4d0 Dummy {f00=0x0072, f01=0x0190, f02=» r P PERF DEFIND,BIN7,DEBINW4 * P CBNE BIN7,W0,B220 JUMP IF NOT CURRENT * PB210 X $ P MOVE BIN7,DEBINW3 CURRENT FIELD d PB220 2 P CON X.MOVE,STR64A,X.PSEU1,X.PSEU2,X.WB10,BIN7 P MOVE BCDI21(W1),STR64A P B B300 P* P
0x17e4d0…17e664 Dummy {f00=0x0072, f01=0x0190, f02=» BIN7,W64,B120 NO LITTERAL ? P MOVE BIN9,=X'3F' REMOVE... $ $ P CALL MSKOUT,BIN9,BIN7 ...FLAGGS H P MOVE DEINPUT,HEX00 p " P ADD BIN12,W1 INCREASE DISPL. : P COPY DEINPUT,W0,BIN9,BPOOL(BIN11),BIN12 GET LITTERAL . P MOVE BCDI21(W1),DEINPUT
0x17e664…17e7f8 Dummy {f00=0x0072, f01=0x018e, f02=»*** EXECUTE ACCUMULATION ***** P* ( PB300 2 ( P TBF BOOL6,B310 NO ABSOLUTE-VALUE ? > 6 P COPY BCDI21(W1),W0,W1,D1,W0 PLUS-SIGN TO WORKITEM j PB310 P TBT BOOL2,B330 MINUS-SIGN ? " P TBT BOOL1,B340 REVERSED ACC ? PB320 0 P A
0x17e7f8…17e98c Dummy {f00=0x0072, f01=0x0190, f02=» 8 P SUB ACK(BIN6),BCDI21(W1) SUBTRACT FROM ACCUMULATOR P* @ PB350 J P BOFL B360 V P B B380 h PB360 x & P PERF SETERR,W3 SET ERROR-CODE = 3 P* PB380 " P TBT BOOL8,B395 DEFAULT USED ? PB390 " P ADD BIN12,W1 INCR
0x17e98c…17eb20 Dummy {f00=0x0072, f01=0x0190, f02=»1),BIN12,W1 NEXT BYTE... p P BNOK B120 $ PB395 6 P B B100 B * R PEND EJECT j * x L M************************************************************************ * 2 -* SUB-ROUTINE FOR SETTING THE ERROR-COD
0x17eb20…17ecb4 (1, 249) Dummy {f00=0x0072, f01=0x415c, f02=»X000 IB ERRIND,X100,X200,X300 * . X100 8 " P MOVE BCD2A,D1 UNDEFINED ERROR D B X900 j * z X200 " MOVE BCD2A,='-1' FORMAT-ERROR B X900 * X300 MOVE BCD2A,='9' OVERFLOW *
0x17ecb4…17ee48 Dummy {f00=0x0072, f01=0x2008, f02=» * X300 MOVE BCD2A,='9' OVERFLOW & * H * R X900 RET h * t PEND ~ * END @ ****** d * SETERR PROC ERRIND X000 IB ERRIND,X100,X200,X300 B
0x17ee48…17efdc Dummy {f00=0x0072, f01=0x0058, f02=» SCR $TRA S=DENVAL $TRA S=DENT02 & SCR < ASG /E0,TY10 H 4 F B T F d@ F v
0x17efdc…17f170 Dummy {f00=0x0072, f01=0x2008, f02=» $TRA S=DENVAL $TRA S=DENT02 & SCR < ASG /E0,TY10 H 4 F B T F d@ F v
0x17f170…17f304 Dummy {f00=0x0072, f01=0x4014, f02=» HNOD @ OM DISC. @ U * & , * & " ) 2 <0 G Z * & = 0 H & * & [ 5 E U g * y } @
0x17f304…17f498 Dummy {f00=0x0072, f01=0x0190, f02=» IDENT P:S020 * & !1( P Q /U80 88 R*j " * & - !! oU 10 !jo! 2j P * & K o " 1( W % 0 "1( H 0&W 1( ~ * & i !0' ! 6 W"0 0 * & $( # _.0 ! _y $5 !( * * &
0x17f498…17f62c Dummy {f00=0x0072, f01=0x0190, f02=» 3 8 ? +1 BATCH IN U ~ * & SESYMBOLICVALUE-SETXXXXTTT9TTT * & ' T9XXXXX- o 5 * : k 5 J * & E 7 : 5 " : 5 NOT * TI x * & c ME-OUT CDV-ERROR NOT FOUND * & I/O-ERROR DATE ERROR FO * &
0x17f62c…17f7c0 Dummy {f00=0x0072, f01=0x0190, f02=» FOUND UNDEFINED ERROR TEST * & ENTERED BATCH RECOVERY RUNNI * * & 5 NG. DISC NOT OPERABLE 4 : l X * & S IN : k 5 DISC I/O-ERRO * & q R : ILLEGAL FORMAT NAME * & PRESS ENT TO CONFIRM NO WORK
0x17f7c0…17f954 (1, 250) Opaque[0x194]
0x17f954…17fae8 # DirEnt {nam=»DE60ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0e50, f03=0x0000}
0x17f954…17fae8 IdxSect {
0x17f954…17fae8 f00 = 0x0072 // 0x17f954 @0x0
0x17f954…17fae8 f01 = 0x0006 // 0x17f956 @0x2
0x17f954…17fae8 gno = [ // 0x17f958 @0x4
0x17f954…17fae8 [0x00]: C0x0072.0x2.0
0x17f954…17fae8 [0x01]: C0x0072.0x3.0
0x17f954…17fae8 [0x02]: C0x0073.0x0.0
0x17f954…17fae8 ]
0x17f954…17fae8 }
0x17fae8…17fc7c Dummy {f00=0x0072, f01=0x0190, f02=» $ P IDENT DE60ST REL 10.0 80-04-11 P 79-07-30/DALI , DDUM DEDDIV D PDIV X P ENTRY DE60ST f * | * ** EXTERNAL REFERENCES TO SCREEN * P EXT DECLRA P EXT DERR P EXT DECLRN P EXT DECLRS
0x17fc7c…17fe10 Dummy {f00=0x0072, f01=0x0190, f02=» DEPMSK P* 8 P* EXTERNAL REFERENCES TO APPLICATION ROUTINE P* V P EXT DEAOK0 ` P EXT DEANOK t P INCLUDE DELITT P EJECT 2 P********************************************* . P* START OF VERIFYING. HANDLE PRORAMS
0x17fe10…17ffa4 Dummy {f00=0x0072, f01=0x0190, f02=»***************** t PDE60ST PROC P CLEAR BOOL2 . P CBNE BIN2,W0,DEEN10 B PDEST00 ^ & P SET BOOL1 PART OF FORMAT DISPLAY l PDEST10 P TBT BOOL2,DEST20 P ATTFMT F60ST P B DEST30 PDEST20 P ATTFMT F61ST
0x17ffa4…180138 Dummy {f00=0x0072, f01=0x0190, f02=»BINW2,DE60CA,DE60RE,DE60EN P MOVE DEBINW4,W0 " PDE60ER : P CLEAR VERIFM H P CLEAR KEYVER ^ P PERF DERR t P B DEST60 P EJECT P* P* CANCEL-KEY PRESSED P* PDE60CA P CLEAR DEPROMPT P B DEST50
0x180138…1802cc Dummy {f00=0x0072, f01=0x0190, f02=»,W6,DERE30 ( P IB BIN2,DEEN20,DEEN50,DEEN30,DEEN60 P B DEST00 > PDEEN20 P P SET KEYVER ^ P B DEEN50 r PDEEN30 P SET KEYVER PDEEN60 P SET DOOL7 PDEEN50 P SET BOOL2 P CLEAR BOOL1 P B DEST20
0x1802cc…180460 Dummy {f00=0x0072, f01=0x018e, f02=» BNERR DERE20 P MOVE DEBINW1,W0 P PERF DERROR,DEKTAB6 . P CLEAR DOOL5 J P BZ DERE60 ^ P ATTFMT F61ST p & P SET DEPROMPT PROMPT-TEXTS DISPLAY P CLEAR DECHANGE P PERF DECLRN P B DEST60 PDERE20 P CLEAR DOOL5
0x180460…1805f4 (1, 251) Dummy {f00=0x0072, f01=0x0190, f02=» P CLEAR BOOL2 P CLEAR BOOL1 PDERE60 , P CLEAR VERIFM VERIFY-MODE : P TBT BOOL2,DEEN10 P CLEAR DOOL7 v P CLEAR DOOL4 P CLEAR KEYVER P B DEST10 P EJECT * P************************************** * P* THIS
0x1805f4…180788 Dummy {f00=0x0072, f01=0x0190, f02=»1 P SET VERIFM VERIFY-MODE P MOVE DEBINW2,W0 * POPEN2 B P PERF DEOPBC,DEBINW2 P ( P IB DEBINW2,OPEN3,OPEN3,DE60RE,OPEN4 l POPEN3 P PERF DENT01 P B OPEN2 POPEN4 P GETABX DEBINW3 P ATTFMT F61ST P G
0x180788…18091c Dummy {f00=0x0072, f01=0x0190, f02=» FSL P FTEXT '60 ' P FLINK F60VER $ FNL : P FCOPY =C'PROGRAM:' F ( P FKI 9,MINL=2,MAXL=2,ME,NEOI,APPL=1 b P FMEL 'XX',PRNUM P FBF BOOL1,F60OUT FNL P FTEXT '61 ' P FLINK F60VER P FCOPY =C'KEY'
0x18091c…180ab0 Dummy {f00=0x0072, f01=0x0190, f02=» FCOPY =C'KEY' P FILLR '/',1 P FCOPY =C'TEST' * P FNL B P FTEXT '64 ' N P FLINK F60VER b P FCOPY =C'SIGHT' x P FILLR '/',1 P FCOPY =C'TEST' PF60OUT FMEND PF61ST FRMT FSL PF61ST1 FMEL 'XX',P
0x180ab0…180c44 Dummy {f00=0x0072, f01=0x0190, f02=»PY =C'KEY' PF61ST3 P FBF DOOL7,F61ST4 P FILLR '/',1 : P FCOPY =C'TEST' N PF61ST4 f FNL t P FLINK F60UV P FNL P FLINK F60JOB P FTAB 20 P FLINK F60BAT P FNL P FLINK F60END P FMEND
0x180c44…180dd8 Dummy {f00=0x0072, f01=0x0190, f02=»MT P FCOPY =C'UNIT' P FTEXT ':U' " ( P FKI 7,MINL=1,MAXL=1,NEOI,ME,APPL=2 6 P FMEL 'X',USERFILE b P FTAB 20 | P FCOPY =C'VOLUME' P FILLR ':',1 P FINP 27 P FCOPY TABLE P FMEND PF60JOB FRMT P FCOPY =
0x180dd8…180f6c Dummy {f00=0x0072, f01=0x416a, f02=»ME P FMEND PF60BAT FRMT P FCOPY =C'BATCH' , P FCOPY =C'NAME' D P FILLR ':',1 > P FKI 30,ALPHA,MINL=1,MAXL=6,ME,NEOI,APPL=4,DUPL=STSAVE(W2) p P FCOPY BATCH FMEND PF60END FRMT P FKI 1 P FCOPY HEX00
0x180f6c…181100 Dummy {f00=0x0072, f01=0x2008, f02=» F60BAT FRMT P FCOPY =C'BATCH' P FCOPY =C'NAME' 4 P FILLR ':',1 L > P FKI 30,ALPHA,MINL=1,MAXL=6,ME,NEOI,APPL=4,DUPL=STSAVE(W2) ` P FCOPY BATCH FMEND PF60END FRMT P FKI 1 P FCOPY HEX00 P FMEND P
0x181100…181294 (1, 252) Dummy {f00=0x0073, f01=0x2008, f02=»
0x181294…181428 Dummy {f00=0x0073, f01=0x0190, f02=» P MOVE BIN2,=W'495' FLOPPY P CBG FCOD,=X'F7',F31 & " P MOVE BIN2,=W'6400' CARTRIDGE B PF31 h $ P* CALCULATE NO. OF FREE SECTORS t P MOVE BIN3,=X'D0' P CALL CHANFC,DISK,BIN3 P DSC0 DISK,CLOSE ( P ASSIGN DISK,0,RETCOD,SYSFIL
0x181428…1815bc Dummy {f00=0x0073, f01=0x018e, f02=» IF OTHER VOLUME PF32 P MOVE RECNUM,W1 $ " P RREAD DISK,RBUF,SYSLEN,RECNUM < P BERR DISKERR b $ P* NO. OF RECORDS IN SYSTEMFILE x P XCOPY CREREC,W0,W2,RBUF,W1 P DIV CREREC,W2 P SUB BIN2,CREREC PF33 P ATTFMT FU
0x1815bc…181750 Dummy {f00=0x0073, f01=0x0190, f02=» PF40 ( P CBE PRNUM,=D'4',F45 IF COPY SYSFIL & P CBE FTYPE,=D'1',F45 IF SYSTEMFILE @ P MOVE FILNAM,DCFILE j P B F50 PF45 P MOVE FILNAM,SYSFIL P MOVE VOLNAM,SYSVOL P CBNE PRNUM,=D'4',F50 & P MOVE VOLNAM,OUTPU
0x181750…1818e4 Dummy {f00=0x0073, f01=0x0190, f02=»************ P ERASE 0,W1,W4 P MOVE STR1A,=C'S' * * P XCOPY PBLOCK,W6,W1,STR1A,W0 F.ORG='S' D , P XCOPY PBLOCK,W8,W8,FILNAM,W0 FILE-NAME r . P XCOPY PBLOCK,W16,W6,VOLNAM,W0 VOL-NAME 1 P MOVE BIN1,=W'49' " P XCOPY PBLOCK,BIN1,W1,W1,W
0x1818e4…181a78 Dummy {f00=0x0073, f01=0x0190, f02=»PY PBLOCK,BIN1,W1,W2,W1 BF 2 P XCOPY PBLOCK,BIN2,W2,SYSLEN,W0 RECORD LENGTH " & P CBE FTYPE,=D'1',F53 IF SYSTEMFILE X , P XCOPY PBLOCK,BIN1,W1,W3,W1 DCFILE-BF=3 6 P XCOPY PBLOCK,BIN2,W2,W128,W0 RECORD LENGTH = 128 PF53 P MOVE BIN1,=W'56
0x181a78…181c0c Dummy {f00=0x0073, f01=0x0190, f02=»,W0 NIF x P MOVE BIN1,=W'52' " P XCOPY PBLOCK,BIN1,W2,W0,W0 KA * * P CALL CREFIL,PBLOCK,SBUF,SYSBUF,RETCOD P P CMP RETCOD,W3 ~ P BE DERR10 P CMP RETCOD,W7 P BE DERR7 P CMP RETCOD,W0 P BNE DISKERR P MOVE BIN1,=X'D0
0x181c0c…181da0 Dummy {f00=0x0073, f01=0x018e, f02=»NAM p P BNOK DISKERR P PERF REC2 " P PERF REC1 4 P CMP PRNUM,=D'4' F P BE C43 IF COPY SYSFIL ^ P DSC0 DISK,CLOSE | PRETUR P B DEINIT P EJECT PREC1 PROC P********************** P* WRITE 1:ST RECORD
0x181da0…181f34 (1, 253) Opaque[0x194]
0x181f34…1820c8 # DirEnt {nam=»DE80ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0e68, f03=0x0000}
0x181f34…1820c8 IdxSect {
0x181f34…1820c8 f00 = 0x0073 // 0x181f34 @0x0
0x181f34…1820c8 f01 = 0x0004 // 0x181f36 @0x2
0x181f34…1820c8 gno = [ // 0x181f38 @0x4
0x181f34…1820c8 [0x00]: C0x0073.0x1.0
0x181f34…1820c8 [0x01]: C0x0073.0x2.0
0x181f34…1820c8 ]
0x181f34…1820c8 }
0x1820c8…18225c Dummy {f00=0x0073, f01=0x0190, f02=» ( P IDENT DE80ST REL 1.0 79-08-14/DALI DDUM DEDDIV 0 PDIV D P ENTRY DE80ST R P ENTRY DEAP8A h * ~ * ** EXTERNAL REFERENCES TO SCREEN * P EXT DECLRA P EXT DECLRN P EXT DERR P EXT DERROR
0x18225c…1823f0 Dummy {f00=0x0073, f01=0x0190, f02=»VERTING h P EXT DECONV PWEOF EQU 3 CLOSE FILE $ EJECT B PDE80ST PROC P PDEST d PDEST80 p P ATTFMT F80ST ~ PDEST72 & P SET DEPROMPT PROMPT-TEXTS DISPLAY STA050 P CLEAR DECHANGE P PERF DECLRA ST
0x1823f0…182584 Dummy {f00=0x0073, f01=0x0190, f02=» ERROR P MOVE DEBINW4,W0 ERR2 . P PERF DERR : B STA100 L * ^ PDE80RE h P MOVE BIN1,W0 v P MOVE BIN2,W1 P RET PDE80EN P MOVE DEBINW3,BCD13A $ P PERF DECONV,W2,DEBINW3,DEBINW4 P CBE DEB
0x182584…182718 Dummy {f00=0x0073, f01=0x0190, f02=» P MOVE BCD2A,DEINPUT P MOVE DEBINW3,BCD2A $ P IB DEBINW3,DEAOK0,DEAOK0,DEAOK0 < PTYPE81 d " P MOVE DEBINW4,W6 ILLEGAL VALUE r P B DEANOK PREST80 P MOVE STR1A,DEINPUT P CBE STR1A,=C'Y',REST81 P CBNE STR1A,=C'N',TY
0x182718…1828ac Dummy {f00=0x0073, f01=0x0190, f02=»XT '80 ' P FCOPY =C'RECEIVE MODE' P FNL 0 P FCOPY =C'UNIT' < P FTEXT ':U' T ( P FKI 7,MINL=1,MAXL=1,NEOI,ME,APPL=2 h P FMEL 'X',USERFILE P FTAB 20 P FCOPY =C'VOLUME' P FILLR ':',1 P FINP 27 P FCOPY TABLE
0x1828ac…182a40 Dummy {f00=0x0073, f01=0x4164, f02=»INE TO PRINTER' P FNL P FTEXT '2= LINE TO DISK' $ P FNL D P FTEXT '3= DISK TO PRINTER' P P FNL t P FTEXT 'RESTART(Y/N):' * P FKI 15,ALPHA,MAXL=1,ME,NEOI,APPL=102 P FCOPY STR1A P FNL P FLINK F80END P FMEND
0x182a40…182bd4 (1, 254) Dummy {f00=0x0073, f01=0x2008, f02=»
0x182bd4…182d68 Dummy {f00=0x0073, f01=0x0190, f02=» Z < P* OF THE VARIABLE FIELDS BEFORE HANDLING THE PICTURE P* H PDECLRD PROC R P* f P PERF DENTER,W4 p P RET P PEND P* P* ERROR PRINTOUT P* PDERR PROC P MOVE DEBINW1,W0 P PERF DENTER
0x182d68…182efc Dummy {f00=0x0073, f01=0x0190, f02=»VARIABLE v " P TO ALLOW INSTR.S CMP AND IB $ P CMP DEBINW2,W0 "DEERR" ENTRY ? 6 P BE ERRPRINT YES ! ^ P x . P TBT DEPROMPT,ENTIRE JUMP IF ENTIRE FORMAT P SHOULD BE DIDELAYED P* P* ONLY VARIABLE FIELDS P* P I
0x182efc…183090 Dummy {f00=0x0073, f01=0x0190, f02=»SE ALL FROM 1 AND UP ~ P B CONT P* , PCLEARS 6 , P ERASE 5,W1,W0 ERASE SOME FROM 1 AND UP D P B CONT t PCLEARD P TBT VERIFM,VERIF * P DISPLAY 3,W1,W0 DISPLAY FROM 1 AND UP P B CONT PVERIF P TBF KEYVER,SIGH
0x183090…183224 Dummy {f00=0x0073, f01=0x018e, f02=» DISPLAY ENTIRE FORMAT P* PENTIRE ( P CLEAR DEPROMPT 6 P IB DEBINW2 JUMP C N P ECLRA ON C h P ECLRS ROUTINE C | P ECLRN INDEX C P ECLRN P* P* CLEAR ALL VARIABLES P* PECLRA * P ERASE 3
0x183224…1833b8 Dummy {f00=0x0073, f01=0x0190, f02=» PECLRS * P ERASE 6,W1,W0 CLEAR SOME FIELDS FROM P 1 AND UP IN MEMORY @ P* ^ & P* CLEAR NO VARIABLES IN MEMORY h P* PECLRN P TBT VERIFM,EVERIF ( P DISPLAY 0,W1,W0 DISPLAY ENTIRE FORM P B CONT PEVERIF
0x1833b8…18354c Dummy {f00=0x0073, f01=0x0190, f02=» P* PCONT P MOVE DEBINW2,W8 HOME-KEY & P GETABX DEBINW4 GET CURRENT INDEX < ( P BL KTHOME JUMP IF NO CURRENT FIELD f P TBF VERIFM,CONT5 P B KTHOME PCONT5 6 P GETFLD 0,DEBINW4,DEBINW3 SEARCH CURRENT POSITION P B
0x18354c…1836e0 Dummy {f00=0x0073, f01=0x0190, f02=»4,DEBINW3 CHANGE INDEX P B CONT5 SEARCH AGAIN P* < PCONT6 F P TSTCTL 5 LOOK IF CTAB T P BZ SETCREAD r P TEST DOOLA " P BZ KTHOME JUMP IF NOT BALANCE P MOVE DEBINW2,W9 P B KTHOME P EJECT P* & P* S
0x1836e0…183874 (1, 255) Opaque[0x194]
0x183874…183a08 # DirEnt {nam=»DELITT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0e78, f03=0x0000}
0x183874…183a08 IdxSect {
0x183874…183a08 f00 = 0x0073 // 0x183874 @0x0
0x183874…183a08 f01 = 0x0004 // 0x183876 @0x2
0x183874…183a08 gno = [ // 0x183878 @0x4
0x183874…183a08 [0x00]: C0x0073.0x3.0
0x183874…183a08 [0x01]: C0x0074.0x0.0
0x183874…183a08 ]
0x183874…183a08 }
0x183a08…183b9c Dummy {f00=0x0073, f01=0x0190, f02=» P* DELITT EJECT ENT EQU X'8C' ENTER * CAN EQU X'91' CANCEL F PRET EQU X'92' RETURN b PRG EQU X'94' PROGRAM ~ PTOT EQU X'93' TOTAL PSTS EQU X'96' STATUS PPRT EQU X'98' PRINT $ PKEP EQU X'8D' KEEP FIELD
0x183b9c…183d30 Dummy {f00=0x0073, f01=0x0190, f02=»NSERT z RDL EQU X'89' RECORD DELETE RFW EQU X'83' RECORD FORWARD 2 " RBW EQU X'81' RECORD BACKWARD V PASD EQU X'82' | EOI EQU X'80' FIELD FORWARD $ PPLS EQU X'9C' FIELD FORWARD PLUS & PMIN EQU X'9D' FIELD FORWARD MINUS P
0x183d30…183ec4 Dummy {f00=0x0073, f01=0x018e, f02=» REST OF FIELD ~ CFW EQU X'86' CURSOR FORWARD " CBW EQU X'84' CURSOR BACKWARD : PBSP EQU X'8B' BACKSPACE ` " PVAL EQU X'97' FORCE VALIDATION NOK EQU X'FF' NOKEY PX.MOVE EQU X'00' PX.COPY EQU X'62' PX.MATCH EQU X'68'
0x183ec4…184058 Dummy {f00=0x0073, f01=0x0190, f02=» PDETACH EQU X'0F' EJECT * * * KEYTABLES 4 * N & P* USAGE: DATA ENTRY SCREEN X * , PDEKTAB1 KTAB BSP,CLR,NOK,EOI,CAN,RET, C P PLS,BTB,HOM,ERS, C P KEP,NOK,NOK,STS,PRT, C . P DUP,CFW,EN
0x184058…1841ec Dummy {f00=0x0073, f01=0x0190, f02=»NOK,NOK,NOK, C P NOK,CBW * * ( PDEKTAB3 KTAB CFW,CBW,RIN,RDL,NOK, C 4 P CLR,SKP,EOI,CAN,RET, C ` P PLS,BTB,HOM P* PDEKTAB4 KTAB CLR,CAN,RET,CFW P* , PDEKTAB5 KTAB CLR,STS,PRT,CAN,RET,NOK, C " P RFW,RB
0x1841ec…184380 Dummy {f00=0x0073, f01=0x0190, f02=» PDEKTAB8 KTAB CAN,NOK,ENT * $ , PDEKTABA KTAB BSP,NOK,CLR,EOI,CAN,RET, C . P PLS,BTB,HOM,NOK, C ^ P NOK,NOK,MIN,NOK,NOK, C | P NOK,CBW * ( PDEKTABB KTAB CFW,CBW,RIN,RDL,NOK, C P CLR,SKP,EOI,CAN,RET, C P
0x184380…184514 (1, 256) Dummy {f00=0x0074, f01=0x0190, f02=»,RET,NOK,VAL,FRC C | P BTB,HOM P* . ( PDEKTABF KTAB CLR,CAN,RET,NOK,NOK,FRC 8 8 PDEKTABI KTAB CLR,CAN,RET,RBW,VAL,FRC,NOK,NOK,NOK,ASD d P* 8 PDEKTABK KTAB PLS,EOI,MIN,DUP,STS,PRT,CAN,RET,NOK, C " P RFW,RBW,COR,RDL,TOT,NOK,RIN
0x184514…1846a8 Dummy {f00=0x0074, f01=0x408c, f02=»KTABS KTAB CLR,CAN,RET P* , PDEKTABV KTAB NOK,STS,PRT,CAN,RET,ENT, C ( " P RFW,RBW,COR,RDL,TOT,NOK,RIN X P* ~@ ,NOK,NOK,ASD d P* 8 PDEKTABK KTAB PLS,EOI,MIN,DUP,STS,PRT,CAN,RET,NOK, C " P RFW,RBW,COR,RDL,TOT,NOK,RIN
0x1846a8…18483c Dummy {f00=0x0074, f01=0x2008, f02=» LR,EOI,CAN,RET, C EOI,BTB,HOM,NOK, C " NOK,NOK,NOK,NOK,PRT, C @ NOK,CBW,ENT b * x ( $SPKTAB3 KTAB CFW,CBW,RIN,RDL,NOK, C CLR,KEP,EOI,CAN,RET, C EOI,BTB,HOM,NOK, C NOK,NOK,NOK,NOK,PRT, C
0x18483c…1849d0 Dummy {f00=0x0074, f01=0x414a, f02=» > @ IDENT T:STEV T,PRR=5.0,791206,870137140500 T:STEV F T:STEV X T:GRFC l I:EVA0 ~ * & H #0T Y Y , ( ! T # P & #0T ( I:ERR2 7
0x1849d0…184b64 Dummy {f00=0x0074, f01=0x0190, f02=» > @ IDENT T:EDFL T,PRR=5.0,791206,870137140500 T:EDFL F T:EDFL X T:PM1 l T:PM2 | T:CASP , ( I Y ( x P Y * , ( x y W X " T:DUPX
0x184b64…184cf8 Dummy {f00=0x0074, f01=0x0190, f02=» , ( w V X ( x C T:SCUW 4 , ( ( Y * X Y , X F , ( X C & C C v T:IOER , ( ( B P 9 R 9 X , ( !@P X X * b ) Y *
0x184cf8…184e8c Dummy {f00=0x0074, f01=0x0190, f02=» B U C Q C D T:CLR1 * T:CLR2 < , ( mP X X * $" ~_> @ Y N , ( X * _R X !@XX y X # ~ , ( x V y X X * P , ( P 1 _ 1 X * X
0x184e8c…185020 Dummy {f00=0x0074, f01=0x4148, f02=» X n T:CLIT T:EKEY , ( C $ " P y _ x T 2 , ( a@ X H X X * , )$ b P _ : H D !T P d )Wv 9 T UP m d yV& Ph R^ PP #P =T QU [Q e r g t 4 0 i k m
0x185020…1851b4 (1, 257) Opaque[0x194]
0x1851b4…185348 # DirEnt {nam=»ASSRUT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0e88, f03=0x0000}
0x1851b4…185348 IdxSect {
0x1851b4…185348 f00 = 0x0074 // 0x1851b4 @0x0
0x1851b4…185348 f01 = 0x0014 // 0x1851b6 @0x2
0x1851b4…185348 gno = [ // 0x1851b8 @0x4
0x1851b4…185348 [0x00]: C0x0074.0x1.0
0x1851b4…185348 [0x01]: C0x0074.0x2.0
0x1851b4…185348 [0x02]: C0x0074.0x3.0
0x1851b4…185348 [0x03]: C0x0075.0x0.0
0x1851b4…185348 [0x04]: C0x0075.0x1.0
0x1851b4…185348 [0x05]: C0x0075.0x2.0
0x1851b4…185348 [0x06]: C0x0075.0x3.0
0x1851b4…185348 [0x07]: C0x0076.0x0.0
0x1851b4…185348 [0x08]: C0x0076.0x1.0
0x1851b4…185348 [0x09]: C0x0076.0x2.0
0x1851b4…185348 ]
0x1851b4…185348 }
0x185348…1854dc Dummy {f00=0x0074, f01=0x0190, f02=» $ P IDENT ASSRUT REL 10.0 80-04-11 P 80-03-18/PEEN , P UPD 79-11-01/PEEN D P UPD 79-10-18/PEEN ` P UPD 79-10-04/PEEN | P UPD 79-09-24/DALI P UPD 79 08 14/PEEN$$ P UPD 79-04-24/PEEN P UPD 79-02-28/PEEN
0x1854dc…185670 Dummy {f00=0x0074, f01=0x0190, f02=»AVE P ENTRY RESTOR ENTRY GETFRE " ENTRY SETFRE 8 ENTRY SETOCC N P ENTRY CHANFC d P ENTRY GETVOL z P ENTRY UPDBOL P ENTRY UPDBIN P ENTRY SETB P ENTRY TESTB P ENTRY CLEARB P ENTRY MSKOUT
0x185670…185804 Dummy {f00=0x0074, f01=0x0190, f02=» P ENTRY ATTBUF P ENTRY FORCED P ENTRY GETIND 0 P ENTRY CMPIND F P ENTRY WRITDK P ENTRY READDK r P ENTRY CLOSEF P ENTRY OPENF P ENTRY POOLA P ENTRY GETFWD P ENTRY ADJUST * EXTRN I:EVA
0x185804…185998 Dummy {f00=0x0074, f01=0x0190, f02=» * CALL FORM 16=/F6A1,16 P* 0 PFVAL EQU /C5 : PFACC EQU /C7 N PFGEN EQU /C6 b PFDUP EQU /CC v PFLINK EQU /DE PFCBIX EQU 12 PFCBNIX EQU 44 PFCBROW EQU 14 PFCBNLI EQU 46 PFCBLP EQU 4
0x185998…185b2c Dummy {f00=0x0074, f01=0x0190, f02=»L AREA z 0 P* SYNTAX: CALL ATTWB,STRG,DISPL,BLOCK , P* STRG= STRING ITEM TO BE WORKBLOCK B 6 P* DISPL= BIN ITEM HOLDING DISPLACEMENT RELATIVE r P* 'STRG'-START 8 P* BLOCK= BIN ITEM HOLDING BLOCK NUMBER WITHIN T:A P
0x185b2c…185cc0 Dummy {f00=0x0074, f01=0x0190, f02=»DRESS ~ " P CALL I:EVA0 GET DISPLACEMENT P ADR* A7,A9 4 & ! CALL I:EVA0 ADDRESS TO WB NUMBER H LDR* A1,A9 r SLL A1,2 TIMES 4 ADR A1,A13 ADDRESS TO DB ( P ADR A1,A10 GET ADDRESS TO WB OR DB PATT100 EQU * & P STR A
0x185cc0…185e54 (1, 258) Dummy {f00=0x0074, f01=0x0190, f02=»TO ` P* THE TERMINAL CONTROL AREA 0 P* SYNTAX: CALL ATTDB,STRG,DISPL,BLOCK . 2 P* STRG= STRING ITEM TO BE DISCRIPTOR BLOCK b 6 P* DISPL= BIN ITEM HOLDING DISPLACEMENT RELATIVE P* 'STRG'-START 8 P* BLOCK= BIN ITEM HO
0x185e54…185fe8 Dummy {f00=0x0074, f01=0x0190, f02=» P* P* CHANGE FILE CODE IN ECB P* CALL: 2 * P* CALL CHANFC,DATASET,FILECODE D P* r PCHANFC EQU * | " P CF A14,T:FDSP GET ECB-ADDRESS & P CF A14,I:EVA0 GET ADDRESS TO BIN. P LC A3,1,A9 GET FILE CODE & P SC A3
0x185fe8…18617c Dummy {f00=0x0074, f01=0x0190, f02=»NTAX: CALL SAVE,DISPL,LENGTH,STRG 6 P* DISPL= BIN ITEM HOLDING DISPLACEMENT RELATIVE * ( P* THE VERY FIRST DB:POINTER d @ P* LENGTH= BIN ITEM HOLDING THE NUMBER OF BYTES TO BE MOVED > P* STRG= STRING VARIABLE TO STORE THE SAVED POINTE
0x18617c…186310 Dummy {f00=0x0074, f01=0x0190, f02=»00 EQU * P LCR A1,A2 P SCR A1,A7 " P ADK A2,1 4 P ADK A7,1 F P SUK A6,1 X P RB(NZ) SAV200 j P RF RETUR P* 4 P* RESTORE DB/WB-POINTERS FROM A STRING VARIABLE * P* TO THE T:A (TERMINAL CONTROL AREA) 0 P* SY
0x186310…1864a4 Dummy {f00=0x0074, f01=0x0190, f02=»ES TO RESTORE x : P* STRG= STRING ITEM HOLDING POINTERS TO BE RESTORED P* T PRESTOR EQU * ^ P CALL GETP r P LDR A1,A2 P LDR A2,A9 CHANGE P LDR A9,A1 ADDRESSES P RB SAV100 START TO RESTORE P* ( P* GET PARAME
0x1864a4…186638 Dummy {f00=0x0074, f01=0x0190, f02=» LDR* A6,A9 GET LENGTH P CALL I:EVA0 P LDK A2,40 2 , P ADR A2,A13 GET ADDRESS TO DB-POINTER /A D P RTN A14 t P EJECT 0 +* GET A FREE RECORD FROM FREE-SPACE RECORD 6 2* SYNTAX: CALL GETFRE,BPOOL(IND),RPOOL(IND),NUMB < 8* OUTP
0x186638…1867cc Dummy {f00=0x0074, f01=0x0190, f02=» NUMBER OF FRE RECORDS RF(Z) NOK IF NONE FREE GET100 EQU * > CWR A7,A8 R RF(E) NOK END OF RECORD d & ! LCR A4,A7 GET BITS FOR 8 RECORDS SLL A4,8 SHIFT TO RIGHTMOST , ' RF(NZ) SEARCH AT LEAST ONE RECORD FREE ADK A
0x1867cc…186960 Dummy {f00=0x0074, f01=0x0190, f02=»N BYTE r LDR A4,A4 SEA100 RF(N) FOUND IF FOUND ADK A5,1 INCREMENT COUNTER D SLL A4,1 h RB SEA100 z FOUND SLL A4,1 CLEAR BIT , ( ADR A6,A5 UPDATE RELATIVE RECORD NUMBER FOU100 SRL A4,1 SUK A5,1 DECREMENT
0x186960…186af4 (1, 259) Dummy {f00=0x0074, f01=0x0190, f02=»A7,18,A9 GET START RECORD NUMBER ( $ ADR A6,A7 GET CURRENT RECORD NUMBER ( LDKL A1,-1 T , ' ADRS A1,A2 DECREMENT NO. OF FREE RECS. h NOK EQU * CALL I:EVA0 & "NOK100 STR A6,A9 STORE FOUND INDEX RETUR ABL I:RT1 EJECT
0x186af4…186c88 Dummy {f00=0x0074, f01=0x0190, f02=»RRENT RECORD WAS BUSY 6 1* SYNTAX: CALL SETFRE,BPOOL(IND),RPOOL(IND),NUMB @ <* NUMB = CURRENT RECORD NUMBER (=0 IF WRONG NUMBER) X * SETFRE EQU * SUR A10,A10 INDICATE SETFRE SET EQU * CALL GETPAR LDR
0x186c88…186e1c Dummy {f00=0x0074, f01=0x0190, f02=»7,A6 ECR A1,A1 ( $ LC A1,18,A6 GET START RECORD NUMBER & " SUR A3,A1 GET RELATIVE RECORD NO. J " P CALL SEABIT SEARCH WANTED BIT t P LDR A6,A6 P RB(Z) NOK100 JUMP IF ERROR LDR A10,A10 RF(NZ) TEST0 IF SET0CC " * SE
0x186e1c…186fb0 Dummy {f00=0x0074, f01=0x0190, f02=» A1,1 INDICATE INCREMENT . *TES100 ADS A1,-2,A2 IN-/DE-CREMENT COUNTER TES200 SUK A3,1 R RF(N) TES300 BYTE RESTORED j SRC A4,1 RB TES200 * &TES300 SRL A4,8 MOVE TO RIGHTMOST BYTE " SCR A4,A7 STORE UPDATED BYTE R
0x186fb0…187144 Dummy {f00=0x0074, f01=0x0190, f02=»IED r * % SUK A1,1 A1 = -1; INDICATE DECREMENT $ ANKL A4,/7FFF INDICATE OCCUPIED : RB TES100 b EJECT t 2 -* SET RECORD OCCUPIED AND DECREMENT NUMBER OF 8 3* FREE RECORDS; THIS IS ONLY DONE IF CURRENT RECORD * IS FREE 6 2*
0x187144…1872d8 Dummy {f00=0x0074, f01=0x0190, f02=» WRONG NUMBER) ~ SETOCC EQU * , LDR A10,A14 INDICATE SETOCC @ RB SET d P EJECT t P* 2 P* MOVE CONTENTS OF BIN ITEM TO CORRESPONDING P* 16 BOOLEAN ITEMS P* PUPDBOL EQU * ( P CALL I:EVA0
0x1872d8…18746c Dummy {f00=0x0074, f01=0x0190, f02=»MOVE 16 BOOLEAN ITEMS TO CORRESPONDING BIN P* 2 PUPDBIN EQU * < ( P CALL I:EVA0 GET ADDRESS TO BIN ITEM P P LD A1,-2,A9 GET BOOLEANS | P STR A1,A9 STORE IN BIN P RB RETUR P EJECT P* 0 P* SEARCH WANTED BIT IN A CHARA
0x18746c…187600 Dummy {f00=0x0074, f01=0x0190, f02=» A3,8 RF(N) SET100 ADK A7,1 $ CWR A7,A8 6 & " RB(NE) SET050 CONTINUE IN NOT EOR H * % LDK A6,0 INDICATE INCORRECT REC. NO. r P RTN A14 * PLACED IN CURRENT BYTE SET100 EQU * ADK A3,8 LCR A4,A7
0x187600…187794 (1, 260) Dummy {f00=0x0075, f01=0x0190, f02=» A1,1 RB(NZ) SET300 TEST EQU * $ P RTN A14 6 P EJECT F P* T . P* SET WANTED BIT IN A STRING OR BIN ITEM ^ & P* SYNTAX: CALL SETB,ITEM,INDEX P* PSETB EQU * P SUR A10,A10 INDICATE 'SET' PSETB10 EQU *
0x187794…187928 Dummy {f00=0x0075, f01=0x0190, f02=» TO INDEX x P LDR* A3,A9 GET INDEX " P CALL SEABIT SEARCH WANTED BIT 0 P LDR A10,A10 V P RF(N) SETB30 IF TEST BIT j P RF(Z) SETB20 JUMP IF SETBIT P* CLEAR BIT P ANKL A4,/7FFF CLEAR BIT P RB TES200 RESTORE BYTE P* SE
0x187928…187abc Dummy {f00=0x0075, f01=0x0190, f02=»ALSE | P LDR A4,A4 TEST BIT P RF(NN) SETB40 IF FALSE ( P LDK A1,1 INDICATE TRUE H PSETB40 EQU * h P LD A4,2,A13 GET STACK BASE | " P SC A1,-2,A4 STORE CR ON STACK P RF RET P* * P* CLEAR BIT IN STRING OR BIN VARIABLE
0x187abc…187c50 Dummy {f00=0x0075, f01=0x0190, f02=»NUE P* * P* TEST BIT IN STRING OR BIN VARIABLE ( P* SYNTAX: CALL TESTB,ITEM,INDEX D & P* OUTPUT: CR = 0 (BIT IS FALSE) p & P* CR = 1 (BIT IS TRUE) P* PTESTB EQU * $ P LDKL A10,-1 INDICATE 'TEST BIT'
0x187c50…187de4 Dummy {f00=0x0075, f01=0x0190, f02=»OD b ( P* RETCOD = 0 IF OK, ELSE 1 P* 6 PGETVOL EQU * @ ( P CALL T:FDSP GET DSET ADDRESS TO A8 T * P CALL I:EVA0 GET BUFFER ADDRESS TO A9 ( P ADKL A9,1 MAKE BUFFER ADDRESS EVEN P ANKL A9,/FFFE , P ST A9,2,A8 STORE BUFFER
0x187de4…187f78 Dummy {f00=0x0075, f01=0x0190, f02=»DDRESS TO VOLNAM ~ P LDK A7,/80 LOAD ORDER CODE , P* A7 ORDER CODE FOR TEST STATUS < P* A8 DSET ADDRESS l P LKM P DATA 1 P LD A1,8,A8 LOAD RETURN CODE P RF(NZ) ERROR : P* STORE THE VOLUME NAME (OUTPUT
0x187f78…18810c Dummy {f00=0x0075, f01=0x0190, f02=»NAME p PLOOP EQU * P LCR A3,A1 P SCR A3,A9 0 P ADK A1,1 B P ADKL A9,1 T P SUK A2,1 f P RB(P) LOOP x PUT EQU * P LDK A6,0 PVIN CF A14,I:EVA0 P STR A6,A9 STORE RETURN-CODE PRET ABL I:RT1 PERROR
0x18810c…1882a0 Dummy {f00=0x0075, f01=0x0190, f02=» CALL I:EVA0 ADDRESS TO RPOOL LC A8,15,A9 & ECR A8,A8 : $ LC A8,16,A9 GET OCCUPIED BYTES L ADR A8,A7 GET END ADDRESS t P SUKL A8,10 " LDR A2,A7 SAVE START ADDRESS $ ADK A7,2 ADDRESS TO FIRST BITS LDK A6,0
0x1882a0…188434 (1, 261) Dummy {f00=0x0075, f01=0x0190, f02=»S h : P* SYNTAX: CALL RCNTRL,BUFF,DISPL,BOOLBIN,MINL,MAXL 6 P* BUFF+DISPL= START ADDRESS IN STRING ITEM H > P* BOOLBIN= FIRST BIN IN SAME WB AS CURRENT BOOLS , P* MINL= BIN FOR MIN LENGTH , P* MAXL=
0x188434…1885c8 Dummy {f00=0x0075, f01=0x0190, f02=»S p P LDR A8,A9 & P CALL I:EVA0 DISPLACEMENT ADDRESS " P ADR* A8,A9 GET START POINTER F P CALL I:EVA0 l P LDR A7,A9 " P SUK A7,2 ADDRESS TO BOOLEANS P CALL I:EVA0 MINL ADDRESS P LDR A6,A9 P CALL I:EVA0 MAXL ADDRESS
0x1885c8…18875c Dummy {f00=0x0075, f01=0x0190, f02=»E IN BUFFER " P SRL A1,8 SHIFT OUT 8 BOOLEANS P SLL A1,7 : P ADR* A1,A9 GET NEOI + MAXL L P SC A1,1,A8 STORE IN BUFFER p P SRL A1,2 SHIFT IN ME + TYPE P ANK A1,/C0 P ADR* A1,A6 GET MINL P SCR A1,A8 STORE IN BUFFER
0x18875c…1888f0 Dummy {f00=0x0075, f01=0x018e, f02=»AXL z P STR A2,A9 STORE MAXL ! P LCR A2,A8 ! * P ANK A2,/3F MASK OUT MINL ! < P STR A2,A6 STORE MINL ! ^ $ P SRL A1,7 NEOI TO RIGHTMOST POS. ! | P ANK A1,1 MASK OUT NEOI ! $ P LCR A2,A8 GET ME + TYPE + MINL ! P SRL A2,5 SHIFT OUT MINL !
0x1888f0…188a84 Dummy {f00=0x0075, f01=0x0190, f02=» ! P EJECT " P* " 0 P* WRITE CONTROLS FROM BOOLEANS AND BINS TO " P* STRING ITEM " T : P* SYNTAX: CALL WCNTRL,BUFF,DISPL,BOOLBIN,MINL,MAXL " l 2 P* BUFF+DISPL= START POINT FOR WRITINGM " B P* BOOLBIN= FIRST BIN IN SAME W
0x188a84…188c18 Dummy {f00=0x0075, f01=0x0190, f02=»WCNTRL EQU * " ( P LDR A10,A14 INDICATE WRITE CONTROLS # P RB CONTRL # @ P EJECT # R P* # ` . P* MASK OUT WANTED BITS ACCORDING TO MASK # j & P* SYNTAX: CALL MSKOUT,MASK,BIN # 6 P* MASK= BIN ITEM HOLDING THE MASK; WILL CONTAIN # 8 P*
0x188c18…188dac Dummy {f00=0x0075, f01=0x018e, f02=»ALL I:EVA0 ADDRESS TO MASK # P LDR A6,A9 $ " P CALL I:EVA0 ADDRESS TO BIN $ 4 $ P LDR* A1,A9 GET CONTENTS OF BIN $ X * P ANRS A1,A6 LOGICAL AND WITH MASK AND $ P STORE RESULT IN MASK $ P RB RET $ P* $ P EJECT $ P* $ , P* ATTAC
0x188dac…188f40 Dummy {f00=0x0075, f01=0x018e, f02=» $ P CALL T:FDSP DSET-ADDRESS % P LDKL A1,/4000 % * $ P ORRS A1,A8 INDICATE FIX BUFFER % @ $ P CALL I:EVA0 GET BUFFER ADDRESS % h $ P ST A9,2,A8 STORE BUFFER ADDRESS % P SUR A5,A9 CALCULATE LENGTH % P ST A5,14,A8 STORE LENGTH % PATTRET EQU
0x188f40…1890d4 (1, 262) Dummy {f00=0x0075, f01=0x0190, f02=» 0 P* STRGITEM = LEFTMOST BYTE IS EQUAL TO '?' & P* & 8 , P* SYNTAX: CALL FORCED,ITEM & B 2 P* OUTPUT: CR = 0 NOT FORCED & r . P* CR = 1 FORCED & P* & PFORCED EQU * & " P CALL I:EVA0 GET
0x1890d4…189268 Dummy {f00=0x0075, f01=0x0190, f02=»ET RIGHTMOST DIGIT & P SUK A3,/A ' PFOR100 EQU * ' , P RF(Z) NOTFND JUMP IF FORCED ' @ P RF UT150 NOT FORCED ' d PALPHA EQU * ' & P LCR A3,A9 GET LEFTMOST CHARACTER ' P SUK A3,'?' ' P RB FOR100 ' P EJECT ' P* ' P* GET VALID
0x189268…1893fc Dummy {f00=0x0075, f01=0x0190, f02=»PLEN = POOL UNIT LENGT (BIN) ' 4 P* OUTPUT: BUFFX = CURRENT POOL UNIT INDEX (BIN) ( $ > P* START = POINTER TO STRING WIN CURRENT POOL UNIT ( . P* LEN = LENGTh OF FOUND STRING ( , P* CR = 0 IF STRING IS FOUND ( 0 P*
0x1893fc…189590 Dummy {f00=0x0075, f01=0x018e, f02=» * ( P LDR A10,A12 SAVE PP ) P LD* A11,-8,A13 ) & P ADR A11,A13 GET FCB-ADDRESS ) > $ P LDR* A6,A11 GET ADDRESS TO ITEM ) b . P ADKL A6,P:BAS+2 GET START SEARCH ADDRESS ) PVAL150 EQU * ) P LCR A1,A6 GET FORMAT CODE ) P ADK A6,1 INCREMENT PO
0x189590…189724 Dummy {f00=0x0075, f01=0x0190, f02=» P RF(E) VAL300 * P CWK A1,FDUP * P RF(E) VAL300 * . P SUK A1,FLINK * D P RF(NZ) VAL200 IF NOT FLINK * Z P* FLINK * ~ ( P LDR A12,A6 UPDATE PP TO FLINK-ITEM * * P CALL I:EVA0 ADDRESS TO NEXT POOL UNIT * P LDR A12,A10 RESTORE PP * $ P
0x189724…1898b8 Dummy {f00=0x0075, f01=0x0190, f02=»DICATE NOT FOUND * P RF OUT + P* FVAL,FACC OR FGEN + ( PVAL300 EQU * + D P CWR A1,A7 + X P RF(E) OUT JUMP IF FOUND + j P LCR A1,A6 GET COUNTER + $ P ADR A6,A1 UPDATE FORMAT POINTER + P ADK A6,1 + P RB VAL150 CONTINUE + P* + P
0x1898b8…189a4c Dummy {f00=0x0075, f01=0x0190, f02=»11,A5 SAVE POOL LENGTH + $ P CALL I:EVA0 ADDRESS TO BUFFIND , P LDR A7,A9 SAVE ADDRESS , F * P CALL I:EVA0 ADDRESS TO START POINTER , f P LDR A8,A9 SAVE ADDRESS , " P CALL I:EVA0 ADDRESS TO LENGTh , P LDR A6,A6 , P RF(Z) NOTFND IF NOT FOUND ,
0x189a4c…189be0 Dummy {f00=0x0075, f01=0x018e, f02=» , r P LDK A1,0 - PUT100 EQU * - P ADK A1,1 - . " P SUR A6,A11 SUB WIF POOL-LENGF - @ & P RB(P) UT100 CONTINUE IF POSITIVE - f * P ADR A6,A11 RESTORE RELATIVE POSITION - ( P STR A1,A7 STORE BUFFER UNIT NUMBER - " P STR A6,A8 STORE START POINTER
0x189be0…189d74 (1, 263) Dummy {f00=0x0075, f01=0x0190, f02=» - n PGREAT EQU * . PNOTFND EQU * . P LDK A1,1 INDICATE CR = 1 . 0 " P RB UT200 STORE CR AND RETURN . R PLESS EQU * . x P LDK A1,2 . P RB UT200 . P EJECT . P* . P* GET ACCUMULATION STRING . P* SEE UNDER GETVAL ABOVE .
0x189d74…189f08 Dummy {f00=0x0075, f01=0x0190, f02=»* GET GENERATION STRING . P* SEE UNDER GETVAL ABOVE / P* / B PGETGEN EQU * / L , P LDK A7,FGEN INDICATE GENERATION STRING / ` P RB VAL100 START TO SEARC / P* / P / P* GET DUPLICATION STRING / P* SEE UNDER GETVAL ABOVE / P
0x189f08…18a09c Dummy {f00=0x0075, f01=0x0190, f02=»BLE AND LENGTH / n P* 0 > P* SYNTAX: CALL GETIND,ITEM(W1),LENGTH,DIMENSION 0 P* 0 b : P* ITEM(W1) = CURRENT ITEM 0 l F P* LENGTH = BIN HOLDING ITEM LENGTH 0 D P*
0x18a09c…18a230 Dummy {f00=0x0075, f01=0x0190, f02=»ND EQU * 0 P CALL I:EVA0 ADDRESS TO ITEM 1 2 P LD A10,-6,A14 READ DIMENSION STORED BY I:EVA 1 4 P LDR A7,A5 COPY END ADDRESS 1 j $ P SUR A7,A9 CALCULATE ITEM LENGTH 1 ( P CALL I:EVA0 ADDRESS TO LENGTH ITEM 1 P STR A7,A9 STORE LENGTH 1 & P CALL
0x18a230…18a3c4 Dummy {f00=0x0075, f01=0x0190, f02=» > P* COMPARE INDEX VARIABLE WITH DIMENSION OF INDEXED ITEM 2 P* 2 F : P* SYNTAX: CALL CMPIND,INDEX,ITEM(INDEX1) 2 P P* 2 @ P* OUTPUT: CR = 0 IF INDEX=OK INDEX OF ITEM 2 8 P* CR = 1 IF INDEX > MAX
0x18a3c4…18a558 Dummy {f00=0x0075, f01=0x0190, f02=»DEX 2 r P LDR* A6,A9 SAVE INDEX VALUE 3 2 P CALL I:EVA0 GET ADDRESS AND DIMENSION OF ITEM 3 0 P LDR A6,A6 3 f P RB(NP) LESS IF LESS THAN 1 3 x ( P CW A6,-6,A14 COMPARE WITH DIMENSION 3 P RB(G) GREAT IF TOO HIGH 3 P RB EQUAL IF OK INDEX 3 P*
0x18a558…18a6ec Dummy {f00=0x0075, f01=0x0190, f02=»CK 3 h & P* FILECODE FILE NUMBER 4 " P* BUF BUFFER 4 4 , P* LEN REQUESTED LENGTH 4 Z > P* RECNO REALATIV SECTOR NO WITHIN THE FILE 4 P* 4 PWRITDK EQU * 4 P LDKL A11,/95 ORDER CODE 4
0x18a6ec…18a880 Dummy {f00=0x0075, f01=0x0190, f02=» CONTROL BLOCK 4 t & P* FILECODE FILE NUMBER 5 " P* BUF BUFFER 5 @ , P* LEN REQUESTED LENGTH 5 f > P* RECNO RELATIVE SECTOR NO WITHIN THE FILE 5 P* 5 PREADDK EQU * 5 P LDKL A11,/91 ORDE
0x18a880…18aa14 (1, 264) Dummy {f00=0x0076, f01=0x0190, f02=»* THEM IN DSET 5 P CALL I:EVA0 FILE CODE 6 P LDR* A6,A9 6 8 P SC A6,1,A8 6 L P CALL I:EVA0 BUFFER ADDRESS 6 ` P ST A9,2,A8 6 P CALL I:EVA0 RECORD LENGTH 6 P LDR* A6,A9 6 P ST A6,4,A8 6 P CALL I:EVA0 RECORD NO 6 P LDR* A6
0x18aa14…18aba8 Dummy {f00=0x0076, f01=0x0190, f02=»DSET ADDRESS 6 P LKM 7 P DATA 15 7 P* 7 0 P* CHECK ON ERROR CODE 7 : PREAD40 EQU * 7 P LD A6,8,A8 7 p ( P RB(Z) EQUAL SET COND CODE TO 0 ,OK 7 P ANKL A6,/2000 7 * P RB(NZ) GREAT SET COND CODE TO 1 ,EOF 7 & P RB LESS SET COND CO
0x18aba8…18ad3c Dummy {f00=0x0076, f01=0x0190, f02=» EVENT CONTROL BLOCK 7 ~ ( P* FILECODE FILE NUMBER 8 " > P* BUFF BUFFER OF AT LEAST 80 BYTES 8 N F P* RECNO LAST RECORD NUMBER (SHOULD BE ZERO) 8 P* 8 PCLOSEF EQU * 8 P LDR A11,A14 IND
0x18ad3c…18aed0 Dummy {f00=0x0076, f01=0x0190, f02=» LDR* A6,A10 GET FILE CODE 8 P SC A6,1,A8 9 " P LDK A7,/A2 LOAD ORDER CODE 9 6 P RB READ20 9 Z P EJECT 9 l P* 9 z 4 P* CALL OPENF,DSET,FILECODE,BUF,FILE,VOLUME 9 P* 9 0 P* DSET EVENT CONTROL BLOCK 9 ( P*
0x18aed0…18b064 Dummy {f00=0x0076, f01=0x0190, f02=» VOLUME VOLUME NAME 9 P* : " POPENF EQU * : , P SUR A11,A11 INDICATE OPENF : @ POPENF0 EQU * : d ( P CALL T:FDSP GET DSET ADDRESS TO A8 : x * P CALL I:EVA0 SAVE ADDRESS TO FILE CODE : P LDR A10,A9 : 4 P CALL I:EVA0 GET ADDRESS TO FPB(FI
0x18b064…18b1f8 Dummy {f00=0x0076, f01=0x0190, f02=»8 STORE THE ADDRESS IN DSET : " P LDK A3,80 NO OF BYTES IN FPB ; $ P LDR A2,A9 ADDRESS TO FPB ; J POPEN00 EQU * ; l P CMR A2 STORE ZERO IN FPB ; P ADK A2,2 INCREACE ADDRESS ; P SUK A3,2 ; P RB(NZ) OPEN00 ; P* ; , P* GET FILE NAM
0x18b1f8…18b38c Dummy {f00=0x0076, f01=0x0190, f02=»SE ; v * P ADK A6,8 ADDRESS TO FILE NAME IN FPB < & P LDK A4,8 NO OF CHAR IN FILE NAME < 8 POPEN20 EQU * < b P LCR A3,A9 GET ON CHAR < v $ P SCR A3,A6 STORE ONE CHAR IN FPB < P ADKL A9,1 < P ADK A6,1 < P SUK A4,1 < P RB(NZ) OPEN20 < P
0x18b38c…18b520 Dummy {f00=0x0076, f01=0x0190, f02=»CHAR IN VOLUME NAME < POPEN40 EQU * = P LCR A3,A9 = 0 $ P SCR A3,A6 STORE ONE CHAR IN FPB = B P ADKL A9,1 = j P ADK A6,1 = | P SUK A4,1 = P RB(NZ) OPEN40 = P LDK A7,/A1 LOAD ORDER CODE = P LKM = P DATA 15 = , P* STORE FILE COD
0x18b520…18b6b4 (1, 265) Dummy {f00=0x0076, f01=0x0190, f02=»EVALUATE NUMBERS OF POOLS SPECIFIED IN CONFIGURATION = P* > < P* SYNTAX: CALL POOLA > F P* > f P* > p PPOOLA EQU * > z & P LD A4,P:MTAB+2 GET U:BTAB-ADDRESS > * P LD A4,2,A4 GET NUMBER OF BLOCK UNITS > P SUK A4,1 > ( P LD A1,4,A13 GET
0x18b6b4…18b848 Dummy {f00=0x0076, f01=0x0190, f02=»ISP. FOR RPOOL > x P ST A3,38,A1 STORE - " - ? , P ST A4,40,A1 STORE DIMENSION FOR RPOOL ? : * P ST A4,48,A1 - " - BPOOL ? j 2 P ADK A2,188-19 LOAD TYPE AND LENGTH FOR BPOOL ? " P ST A2,44,A1 STORE - " - ? 4 PPOOL10 ADK A3,19 ADD
0x18b848…18b9dc Dummy {f00=0x0076, f01=0x0190, f02=»T A3,46,A1 ST DISPL. FOR BPOOL ? PPOOLUT EQU * @ & P ABL I:RT1 @ : P EJECT @ L P* @ Z , P* PREPARE FOR GETFLD FROM CURRENT FIELD @ d 0 P* IT IS REQUIRED THAT THE FORMAT DOES NOT @ * P* CONTAIN ANY RETURN FROM SUBFORMAT @ P* @ > P* THE
0x18b9dc…18bb70 Dummy {f00=0x0076, f01=0x018e, f02=» BIN1 = WORK ITEM TO BE USED ALSO IN ROUTINE "ADJUST" @ T P* TYPE = A VALUE TELLING WHATGETFLD FUNTION YOU WANT TO EXECU A L < P* START = ITEM1 IN THE GETFLD FUNTION A > P* SLUT = ITEM2 I
0x18bb70…18bd04 Dummy {f00=0x0076, f01=0x0190, f02=» A l , P LD A7,FCBLP,A6 GET FORMAT START ADDRESS B " P STR A7,A9 STORE IN SAVE ITEM B 8 P LDR A10,A12 SAVE PP B ^ & P ADKL A12,1 STEP PAST GETFLD-TYPE B z 4 P CALL I:EVA0 GET ADDRESS TO WANTED FIELD NUMBER B P LDR A12,A10 RESTORE PP B & P LD A1,FCBIX
0x18bd04…18be98 Dummy {f00=0x0076, f01=0x0190, f02=»NTED IS LOWER B | & P ST A1,FCBNIX,A6 STORE IN WORKAREA C , P LC A1,FCBROW,A6 GET CURRENT ROW NUMBER C @ * P SC A1,FCBNLI+1,A6 STORE IN WORK AREA C p & P LD A1,FCBFMA,A6 GET CURRENT START C $ P ST A1,FCBLP,A6 STORE NEW START C PGETF50 EQU * C P ABL
0x18be98…18c02c Dummy {f00=0x0076, f01=0x4120, f02=»1 C l @ P* BIN1 = OUTPUT ITEM FROM ROUTINE "GETFWD" D P* D N PADJUST EQU * D X $ P CALL I:EVA0 GET ADDRESS TO BIN1 D l & P CALL T:GRFC GET FCB-ADDRESS TO A6 D P LDR* A1,A9 D ( P ST A1,FCBLP,A6 RESTORE FORMAT START D P RB POOLUT
0x18c02c…18c1c0 Dummy {f00=0x0076, f01=0x2008, f02=» E ADDRESS TO DB $ ST A7,2,A1 STORE NEW WB-ADDRESS ABL I:RT1 F END X@ d* h EXTRN I:EVA0,I:RT1 r * * * CALL FORM 16=/F6A1,16 ATTWB EQU * " CALL I:EVA0 ADDRESS TO NE
0x18c1c0…18c354 (1, 266) Dummy {f00=0x0076, f01=0x0190, f02=» & COPY USERFIL $ 6 $ # F ( V b & r WHOLE FILE ? Y/N: $ & & F $ Q ( ! & "
0x18c354…18c4e8 Dummy {f00=0x0076, f01=0x018e, f02=» $ $ & % UNIT NO.:O $ % 8 & H & E Z & h & VOLUME-NAME: v $ & & ! & H & H ' OUTPUT $ ' & (
0x18c4e8…18c67c Dummy {f00=0x0076, f01=0x018e, f02=» & H $ Q ( " * + . & > + CHANGE VOLUME-NAME L $ + n & ~ , INPUT $ , & - UNIT NO.:L $ - & & E
0x18c67c…18c810 Dummy {f00=0x0076, f01=0x0190, f02=» & 0 VOLUME-NAME: $ 0 . & > & P $ Q ^ ( n 1 z & 2 CREATE FILE: $ 2 $ 6 ( 3 & 4 DE
0x18c810…18c9a4 Dummy {f00=0x0076, f01=0x0190, f02=» 7 UNIT: UF $ 7 & ( & E : & H 8 VOLUME-NAME: V $ 8 r & & H & H 9 FILE $ 9 & : : $ : &
0x18c9a4…18cb38 Dummy {f00=0x0076, f01=0x0190, f02=»= & > FILE $ > , & < ? 2 = J $ ? ^ & n @ USER | $ @ & A FILE $ A & B 3 = $ B &
0x18cb38…18cccc Dummy {f00=0x0076, f01=0x0190, f02=» E & F DELETE $ F 0 & @ G USERDEFINED: N $ G j & z H FILE $ H & I FILE $ I & J NAME: $
0x18cccc…18ce60 Dummy {f00=0x0076, f01=0x0190, f02=»L & M UNIT: US $ M 0 & @ & E R & ` N VOLUME-NAME: n $ N & & H $ Q ( O & " P PRESS ENT TO CON
0x18ce60…18cff4 (1, 267) Opaque[0x194]
0x18cff4…18d188 # DirEnt {nam=»DENTER«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1118, f03=0x0000}
0x18cff4…18d188 IdxSect {
0x18cff4…18d188 f00 = 0x0088 // 0x18cff4 @0x0
0x18cff4…18d188 f01 = 0x0010 // 0x18cff6 @0x2
0x18cff4…18d188 gno = [ // 0x18cff8 @0x4
0x18cff4…18d188 [0x00]: C0x0088.0x3.0
0x18cff4…18d188 [0x01]: C0x0089.0x0.0
0x18cff4…18d188 [0x02]: C0x00a6.0x1.0
0x18cff4…18d188 [0x03]: C0x00a6.0x2.0
0x18cff4…18d188 [0x04]: C0x00a6.0x3.0
0x18cff4…18d188 [0x05]: C0x00a7.0x0.0
0x18cff4…18d188 [0x06]: C0x00a7.0x1.0
0x18cff4…18d188 [0x07]: C0x00a7.0x2.0
0x18cff4…18d188 ]
0x18cff4…18d188 }
0x18d188…18d31c Dummy {f00=0x0088, f01=0x0190, f02=» & P IDENT DENTER REL 10.0 81-08-27/EV P UPD 80-11-06/DALI . P UPD 80-10-21/DALI J P UPD 80-06-28/DALI f P UPD 80-04-14/DALI . P****************************************** . P* THIS ROUTINE HANDLE THE KEYBOARD INPUT * . P* AND
0x18d31c…18d4b0 Dummy {f00=0x0088, f01=0x0190, f02=» f P* . P* RUNNING UNDER: CREDIT REL 10.0 * . P* TOSS REL 10.0 * D . P****************************************** v P DDUM DEDDIV P PDIV P* , P ENTRY DECLRA CLEAR ALL VARIABLE FIELDS , P ENT
0x18d4b0…18d644 Dummy {f00=0x0088, f01=0x0190, f02=» x P EXT DERROR ERROR-MESSAGES " P EXT DEGEN GENERATION ROUTINE * P EXT CANC -ROUTINES P P* l $ P EXT DESTAT BUILD THE STATUSLINE v $ P EXT DEAPPL STANDARD ROUTINE TO P HANDLE APPL VALUES ( P EXT DETCHK USER ROUTINE TO EVALUATE
0x18d644…18d7d8 Dummy {f00=0x0088, f01=0x0190, f02=» P EXT DEVERI KEY-VERIFICATION P* ( . P EXT EMPTYT ASSEMBLY SUBROUTINE EMPTYT - 2 " P TEST IF DATA ITEM IS EMPTY d . P EXT FORCED ASSEMBLY SUBROUTINE FORCED - $ P TEST IF DATA ITEM IS FORCED * P EXT ATTDB ASSEMBLY SUBROUTINE ATTDB
0x18d7d8…18d96c Dummy {f00=0x0088, f01=0x0190, f02=»INTER z P EXT MASK $ P EXT GETVAL LOOK FOR VALIDATION- P STRING FOR CURRENT FIELD H & P EXT GETGEN LOOK FOR GENERARTION- l P STRING FOR CURRENT FIELD & P EXT TESTB TEST FOR A BIT IN A BIN * P EXT CLEARB CLEAR A BIT IN A BIN ITE
0x18d96c…18db00 Dummy {f00=0x0088, f01=0x018e, f02=»TION=3, ~ P MEANING THAT EMPTY P COMPULSURY FIELDS IS . P FOUND,WILL "NOT" BE N P INDICATED l , P EXT ADJUST ASSEMBLY SUBROUTINE ADJUST - " P ADJUST FORMATPOINTERS AFTER P EXECUTION OF GETFWD P EXT DELAST P
0x18db00…18dc94 (1, 268) Dummy {f00=0x0089, f01=0x018e, f02=» T P* PDECLRA PROC P PERF DENTER,W1 & P RET > P PEND J P* X @ P* CLEAR SOME VARIABLE FIELDS BEFORE HANDLING THE PICTURE b P* PDECLRS PROC P PERF DENTER,W2 P RET P PEND P* > P* CLE
0x18dc94…18de28 Dummy {f00=0x0089, f01=0x018e, f02=» P* 8 P* CLEAR SOME VARIABLE FILEDS AND DISPLAY THE REST < P* OF THE VARIABLE FIELDS BEFORE HANDLING THE PICTURE J P* PDECLRD PROC P* P PERF DENTER,W4 P RET P PEND P* P* ERROR PRINTOUT
0x18de28…18dfbc Dummy {f00=0x0089, f01=0x0190, f02=» ~ P CLEAR DOOLC ERASEFLAG OFF & P MOVE DEBINW2,OPT MOVE TO VARIABLE * " P TO ALLOW INSTR.S CMP AND IB T $ P CMP DEBINW2,W0 "DEERR" ENTRY ? z P BE ERRPRINT YES ! P . P TBT DEPROMPT,ENTIRE JUMP IF ENTIRE FORMAT P SHOULD BE DIDEL
0x18dfbc…18e150 Dummy {f00=0x0089, f01=0x0190, f02=»C P CLEARD P* PCLEARA $ * P ERASE 2,W1,W0 ERASE ALL FROM 1 AND UP 2 P B CONT ` P* p PCLEARS z , P ERASE 5,W1,W0 ERASE SOME FROM 1 AND UP P B CONT PCLEARD P TBT VERIFM,VERIF * P DISPLAY 3,W1,W0 DISPLAY
0x18e150…18e2e4 Dummy {f00=0x0089, f01=0x0190, f02=»ISPLAY 33,W1,W0 P B CONT P EJECT ( P* 6 P* DISPLAY ENTIRE FORMAT @ P* b PENTIRE l P CLEAR DEPROMPT z P IB DEBINW2 JUMP C P ECLRA ON C P ECLRS ROUTINE C P ECLRN INDEX C P ECLRN P*
0x18e2e4…18e478 Dummy {f00=0x0089, f01=0x0190, f02=»ONTINUE P* P* CLEAR SOME VARIABLES P* < PECLRS F * P ERASE 6,W1,W0 CLEAR SOME FIELDS FROM T P 1 AND UP IN MEMORY P* & P* CLEAR NO VARIABLES IN MEMORY P* PECLRN P TBT VERIFM,EVERIF ( P D
0x18e478…18e60c Dummy {f00=0x0089, f01=0x0190, f02=» PESIGHT P DISPLAY 30,W1,W0 P EJECT , P* : PCONT D P MOVE DEBINW2,W8 HOME-KEY P PCONT3 r & P GETABX DEBINW4 GET CURRENT INDEX ( P BL KTHOME JUMP IF NO CURRENT FIELD P TBF VERIFM,CONT5 P B KTHOME PCONT5
0x18e60c…18e7a0 Dummy {f00=0x0089, f01=0x0190, f02=»* P* COMPULSORY FIELD FOUND P* . & P MOVE DEBINW4,DEBINW3 CHANGE INDEX 8 P B CONT5 SEARCH AGAIN b P* PCONT6 P TSTCTL 5 LOOK IF CTAB P BZ SETCREAD P TEST DOOLA " P BZ CONT7 JUMP IF NOT BALANCE P SET
0x18e7a0…18e934 (1, 269) Dummy {f00=0x00a6, f01=0x0190, f02=» P EJECT P* & P* SET CURSOR AND READ KEYBOARD P* F PSETCREAD P ( P SETCUR SET CURSOR ON CURRENT FIELD ` P P* * P* READ TO CURRENT FIELD ON DISPLAY P* PREADIN P TBF DENOCHAN,READ50 PREAD10 M
0x18e934…18eac8 Dummy {f00=0x00a6, f01=0x0190, f02=»D14 PREAD12 6 P NKI .NE,DEDSDYKB,DEINPUT,DEKTAB5,DEBINW3,DEBINW2 PREAD14 T P PERF DELOCK,W1,DEBINW2 b $ P IB DEBINW3,READ30,READ20,READ10 P B READ40 P* PREAD20 ERROR P XSTAT DEDSDYKB,DEBINW3 P CALL MASK,D
0x18eac8…18ec5c Dummy {f00=0x00a6, f01=0x0190, f02=»IF P DISPLAY 0,W1,W0 P B SETCREAD " P* 6 * PREAD40 IB DEBINW2,READ10,STATUS,KCOPY @ P SUB DEBINW2,W3 n * P TBT DOOL3,READ45 JUMP IF NOT WORKING ( P CLEAR DENOCHAN WITTH THE DATA-FILE PREAD45 P RET P* PREAD
0x18ec5c…18edf0 Dummy {f00=0x00a6, f01=0x0190, f02=»TURN FROM DENTER DEPENDING ON FUNCTION-KEYT P RET 4 PREAD55 @ P GETCTL 3,DEBINW3 GET SCHK N P CALL TESTB,DEBINW3,W15 p P BZ READ60 JUMP IF NOT SIGN . P DYKI DEINPUT,DEKTAB1,DEKTABA,DEBINW1, C P DEBINW2,DEBINW4 P B DYKOU
0x18edf0…18ef84 Dummy {f00=0x00a6, f01=0x0190, f02=»2 z $ P IB DEBINW3,ECLRN,ERRPRT,DYK050 P B DYK100 2 PDYK050 D P MOVE DEBINW2,W2 R P B ERRCAN j PDYK070 | * P GETABX DEBINW4 GET CURRENT TAB INDEX , P DISPLAY 1,DEBINW4,DEBINW4 DISPLAY FIELD P B SETCREAD CONTINUE PDYK1
0x18ef84…18f118 Dummy {f00=0x00a6, f01=0x0190, f02=»UPDATE,UPDATE CONVERTED C 4 P UPDATE,UPDATE,UPDATE,STATUS END-OF-ITEM-KEY C " P KCOPY,KDUPL,KEDIT Z P B UPDATE v PDYK150 " P MOVE DEBINW2,W3 SET PLS = EOI P EJECT , P*************************************** , P* VALIDATE ENT
0x18f118…18f2ac Dummy {f00=0x00a6, f01=0x018e, f02=»DATION-STRING * , P* * * , P* RETURNVALUES ARE PUT INTO DEBINW3. * Z , P*************************************** PUPDATE P CBNE DEBINW1,W0,UPD100 P VALIDATION OF EMPTY FIELD
0x18f2ac…18f440 Dummy {f00=0x00a6, f01=0x0190, f02=» P CBG DEBINW2,W8,UPD005 P CBG DEBINW2,W3,UPD010 " PUPD005 @ P TBT DOOL3,UPD020 N PUPD010 B UPDR50 h & PUPD020 MOVE DEBINW4,W6 FORCED ITEM * P MOVE BIN3,W0 USED FOR SAV ERRORINDEX P CALL FORCED,:FMTITEM P BOK UPD030
0x18f440…18f5d4 (1, 270) Dummy {f00=0x00a6, f01=0x0190, f02=»3,DEBINW4 GET SCHK , P CALL TESTB,DEBINW4,W13 LOOK IF COND ME " P BZ UPDR35 VALIDATION IF COND J P B UPDVAL p P EJECT P* P* ENTERED DATA FROM KEYBOARD P* PUPD100 & P GETCTL 3,DEBINW4 GET SCHK-NUMBER PUPD105
0x18f5d4…18f768 Dummy {f00=0x00a6, f01=0x018e, f02=»D110 =5 C P UPD120 =6 C P UPD120 =7 ( P B UPD200 < PUPD110 N 0 P CBNE DEBINW2,W12,UPD115 JUMP IF NOT MINUS P MOVE DEBINW2,W0 P MOVE DEBINW3,W1 P MOVE STR1A,='-' , P INSERT DEINPUT,DEBINW2,DEBINW3,STR1A,W0 " P
0x18f768…18f8fc Dummy {f00=0x00a6, f01=0x0190, f02=» t P SUB DEBINW3,DEBINW1 " P BZ UPD150 MAXL = INPUTLENGTH $ P TSTCTL 0 LOOK IF ALPHA J P BZ UPD130 NO! j * P MOVE STATSH,=X'20' PUT SPACE IN AREA P B UPD140 PUPD130 * P MOVE STATSH,=X'30' PUT ZERO IN ARTEA ( PUPD140 RIG
0x18f8fc…18fa90 Dummy {f00=0x00a6, f01=0x0190, f02=»00 & P TBT DOOL3,UPDVAL ENTRY-MODE APPL- " P VALUE-HANDLING IS EXECUTED 4 P WITHIN DENVAL Z $ P GETCTL 0,DEBINW3 GET APPL-VALUE r 0 P CBE DEBINW3,W0,UPDR25 JUMP IF NO APPL VALUE P* ( P* APPL-VALUE DIFFERENT FROM ZERO P*
0x18fa90…18fc24 Dummy {f00=0x00a6, f01=0x0190, f02=»LIDATIONSTRING x ( P* WITHIN THE FORMAT AND EXECUTE IT. P* B PUPDVAL L P CLEAR DOOL1 Z P CLEAR DOOL4 n P CLEAR DOOL6 P CLEAR DOOL7 * P CLEAR BOOL5 ***F=UNVALID/NO COND TAB . P CLEAR BOOL7 ***F=UNVALID/NO COND REC. CH (
0x18fc24…18fdb8 Dummy {f00=0x00a6, f01=0x0190, f02=»POOL(W1),BIN11,BIN12,BIN13 & P BNOK UPDR25 JUMP IF NO VALSTRING " 0 P CBL DEBINW2,W11,UPDV10 LOOK IF AUTODUP AND L 2 P CBG DEBINW2,W12,UPDV10 ERASE OR KEEP PRESSED ( P SETCUR SET CURSOR ON CURRENT FIELD PUPDV10 P PERF DENVAL,W0 P
0x18fdb8…18ff4c Dummy {f00=0x00a6, f01=0x0190, f02=»LAG | P BZ UPDR20 PUPDR12 P TSTCTL 0 L00K IF ALPHA , P BNZ UPDR16 JUMP IF ALPHA L P MOVE BIN9,W15 POINTER TO + n ( P MATCH VALSTR,BIN9,W2,DEINPUT,W0,W1 P BNOK UPDR16 & P DLETE DEINPUT,W0,W1 DELETE + OR - PUPDR16 (
0x18ff4c…1900e0 Dummy {f00=0x00a6, f01=0x0190, f02=»UPDR17 ( P TBF DOOLA,UPDR13 JUMP IF NOT BALACE P PERF DERROR,DEKTAB6 : P B ERRP20 V PUPDR13 h P TSTCTL 5 LOOK IF CTAB v P BZ UPDR14 NO! ( P DUPL STR2A LOOK IF KEYED INPUT = N P BOK UPDR18 YES! P TBF ASDFLAG,UPDR14
0x1900e0…190274 (1, 271) Dummy {f00=0x00a6, f01=0x0190, f02=» EJECT P* & P* VALDATION SUCCESSFULLY PERFORMED P* B PUPDR15 L ( P UPDFLD 1,DEINPUT UNCONDITIONAL UPD. Z P B UPDR28 PUPDR20 & P IB DEBINW3,UPDR25,SETCREAD,UPDR12 PUPDR25 P CBE DEBINW3,W1,UPDR15 ( P CBE DEBINW1
0x190274…190408 Dummy {f00=0x00a6, f01=0x0190, f02=» TBT ASDFLAG,UPDR33 P DUPL STR2A KEYED INPUT = N? P BOK UPDR33 YES! @ . PUPDR30 SET DECHANGE INDICATE CHANGED ITEM X PUPDR33 ( P TBF DOOL3,UPDR50 JUMP IF NOT ENTRY PUPDR35 , P CALL GETGEN,BPOOL(W1),BIN11,BIN12,BIN13 P BNOK
0x190408…19059c Dummy {f00=0x00a6, f01=0x0190, f02=» DUPL STR2A KEYED INPUT=N? P BOK UPDR40 YES! " PUPDR37 : P DK END H P PERF DEGEN Z PUPDR40 n P TSTCTL 5 | P BZ UPDR45 P TBT ASDFLAG,UPDR50 P DUPL STR2A KEYED INPUT = N? P BOK UPDR50 YES! PUPDR45 P S
0x19059c…190730 Dummy {f00=0x00a6, f01=0x0190, f02=»WD, C z ( P KTBWD,KTHOME,KERASE,KKEEP,KEOI, C ! * P KEOI,DUMMY,DUMMY,DUMMY,DUMMY,KENTER ! : P CMP DEBINW2,W24 ! h P BE KASD JUMP IF ASD FLAG ! * P SUB DEBINW2,W14 ADJUST EOI-KEY INDEX ! PDUMMY ! PRETUR ! P RET ! P EJECT ! PKT
0x190730…1908c4 Dummy {f00=0x00a6, f01=0x0190, f02=»IF NOT ENTRY-MODE ! v 4 P TBF BOOL7,KEOI10 ***JUMP IF NO IMMIDIATE REC.CH " P CALL EMPTYT,STSAVE(W3) *** " R , P BNZ KEOI10 ***JUMP IF NO FORMAT-CHANGE " v P CLEAR DECHANGE " P B KENT04 " PKEOI10 *** " " P CLEAR BOOL5 ***CLEAR /SET CR " .
0x1908c4…190a58 Dummy {f00=0x00a6, f01=0x0190, f02=» FIELD NR " p & P SUB DEBINW4,W1 ***ADJUST FOR TFWD # $ P BE KTHOME JUMP IF GOTO FIELD 1 # < PKEOI15 # d * P CALL GETFWD,DKBIN1,0,DEBINW4,DEBINW3 # r P CALL ADJUST,DKBIN1 # . P BNN KEOI20 ***JUMP IF NO FORMAT OVERFLOW # P GETABX DEBINW4 *** #
0x190a58…190bec Dummy {f00=0x00a6, f01=0x018e, f02=»L3,KEOI40 ENTRY SCREEN # P TFWD $ P B TSTTAB $ , PKEOI40 $ > & P TSTCTL 2 LOOK IF COMPULSORY FIELD $ L P BZ KEOI45 NO! $ v . P CALL EMPTYT,:FMTITEM LOOK IF EMPTY FIELD $ P BP KENT15 YES! $ PKEOI45 $ P GETABX DEBINW4 $ P ADD DEBINW4
0x190bec…190d80 Dummy {f00=0x00a6, f01=0x0190, f02=» P BNZ TSTT05 % P B TSTT10 % P* % * $ PKTBWD TABULATION 1 STEP BACKW. % 4 P GETABX DEBINW4 % P CBE DEBINW4,W1,KTBWD2 % t P TBWD % P B TSTTAB % PKTBWD2 % P MOVE DEBINW2,W3 EOI % P* % " PKTHOME TAB. TO HOME POSITION %
0x190d80…190f14 (1, 272) Dummy {f00=0x00a7, f01=0x0190, f02=» GETFLD 0,DEBINW1,DEBINW3 % P SETCUR & " P B READ10 & 2 PKTHOM4 & D & P SET ASDFLAG SET ASD WHEN BALANCE & R ( P MOVE DEBINW1,W0 SET INPUT.LENGTH=0 & | P WHEN BALANCE-FORMAT & PKTHOM2 & P THOME & PTSTTAB TEST TAB OUTPUT & P BE TS
0x190f14…1910a8 Dummy {f00=0x00a7, f01=0x0190, f02=»ION & x P TBT DENOCHAN,TSTT15 ' P DUPL STR2A KEYED INPUT = N? ' ( P BOK TSTT07 YES! ' L P TBF ASDFLAG,TSTT15 ' d PTSTT07 ' P PERF DETCHK ' P CBE DEBINW3,W0,TSTT15 ' P IB DEBINW2,DUMMY,DUMMY, C ' " P KTEOI,DUMMY,DUMMY,KTEOI, C '
0x1910a8…19123c Dummy {f00=0x00a7, f01=0x018e, f02=»EN ' p $ P TBT DOOLA,TSTT15 BALANCE FORMAT ( P GETCTL 1,DEBINW4 GET MAXL ( 2 P CBNE DEBINW4,W0,TSTT15 ( T P B KENT06 ( t P EJECT ( PKTKEY ( P MOVE BIN11,W0 ( PKTKEY2 ( P ADD BIN11,W1 ( : P CALL GETFWD,DEBINW4,4,BIN11,DEBINW3 SEARCH
0x19123c…1913d0 Dummy {f00=0x00a7, f01=0x0190, f02=» ( ~ P MOVE DEBINW2,W3 ) P EJECT ) P* ) . P* DUPL KEY ) 8 P* ) N PKDUPL ) X P DK BEGIN ) f * P TBF CORR,KDUPL10 IN CORRECTION MODE? ) z P TSTCTL 5 YES, LOKK IF CTAB ) P BZ KDUPL10 NO! ) P DUPL STR2A KEYED INPUT=N? ) P B
0x1913d0…191564 Dummy {f00=0x00a7, f01=0x0190, f02=»Y,UPDATE ) z PKTEOI2 * P TSTCTL 5 LOOK IF CTAB * P BNZ KTEOI4 YES! * < PKTEOI3 * T $ P IB DEBINW2,KCOP10,ERRRET,ERRRET * b P B ERRPRINT * PKTEOI4 * $ P IB DEBINW2,ERRRET,ERRRET,ERRRET * P DUPL STR2A * P BOK KENT20 * P TBF ASDFLAG
0x191564…1916f8 Dummy {f00=0x00a7, f01=0x0190, f02=»0 * P* + P* PRINT KEY + P* + , PKCOPY HARD COPY + 6 P PERF ATTPRT RESERVE PRINTER + P P BNOK ERRPRINT + t " P EDWRT DEDSPRT,FORMF FORMFEED + P MOVE DEBINW3,W1 + P PRINT DEDSPRT,DEBINW3,W0 + P PERF DETPRT RELEASE PRINTER +
0x1916f8…19188c Dummy {f00=0x00a7, f01=0x0190, f02=»ET ASDFLAG + P B KASD3 , PKASD2 , " P INV ASDFLAG , 0 PKASD3 , D P PERF DELAST,W14,DEKTAB4 , R " P MOVE DEBINW2,W3 SIMULATE EOI , r P B KEOI50 , P EJECT , P* , P* EDIT FIELD , P* , PKEDITX , P TSTCTL 5 LOOK IF CTAB
0x19188c…191a20 Dummy {f00=0x00a7, f01=0x0190, f02=»OVE DEBINW2,W5 RBWD , P CLEAR DECHANGE - P B ERRET1 - 4 PKED050 - F P CBE DEBINW1,W0,KEDITY - T P MOVE DEBINW1,W1 - r PKEDIT - P GETCTL 1,DEBINW3 GET MAXL - P CBNE DEBINW3,W0,KED100 - ( P EDWRT DEDSSCRN,BELL ACOUSTIC ALARM - P B
0x191a20…191bb4 (1, 273) Dummy {f00=0x00a7, f01=0x018e, f02=»,DEKTABB,DEBINW1, C - P DEBINW2,DEBINW4 . P B DYKOUT . 6 PKED200 . H & P EDFLD DEINPUT,DEKTAB3,DEBINW1, C . V P DEBINW2,DEBINW4 . " P B DYKOUT CONTINUE AS FOR DYKI . PKEDITY . P SETCUR . P B KEDIT . P* . P* ERASE KE
0x191bb4…191d48 Dummy {f00=0x00a7, f01=0x0190, f02=» P B KKEEP1 / P* / P* KEEP KEY / P* / 6 PKKEEP / @ ( P TBF DOOL3,KENT03 JUMP IF NOT ENTRY / N PKKEEP0 / z & P MOVE DEBINW2,W11 SIMULATE KKEEP2 / PKKEEP1 / P GETCTL 1,DEBINW4 GET MAXL / P CBE DEBINW4,W0,KENT07 / & P TSTCTL
0x191d48…191edc Dummy {f00=0x00a7, f01=0x018e, f02=» / P CMP DEBINW2,W12 ERASE KEY 0 P BZ UPD040 0 * P B UPD020 0 < PKKEEP2 0 N P SET DOOL5 0 P GETABX DEBINW4 0 n P ADD DEBINW4,W1 0 * P CALL GETFWD,DKBIN1,0,DEBINW4,DEBINW3 0 P CALL ADJUST,DKBIN1 0 P BE KKEEP5 0 P BL SETCREAD 0
0x191edc…192070 Dummy {f00=0x00a7, f01=0x0190, f02=» 0 r P BOK KKEEP4 1 P TBF ASDFLAG,KKEEP1 1 PKKEEP4 1 8 P PERF DETCHK 1 F P CBE DEBINW3,W0,KKEEP1 1 Z & P TBT DOOLA,KKEEP1 JUMP IF BALANCE 1 x " P CBE DEBINW2,W12,KKEEP1 ERASE 1 P DK BEGIN 1 * P TBF CORR,KKEEP45 IN CORRECTION MODE? 1
0x192070…192204 Dummy {f00=0x00a7, f01=0x0190, f02=» DK END 1 P PERF DENDUP 2 P BNOK KENT20 2 & PKKEEP48 2 : $ P MOVE DEBINW2,W11 SIMULATE KEEP 2 J P B KKEEP1 2 r P EJECT 2 P* 2 P* ENTER KEY 2 P* 2 PKENTER 2 P TBF DOOL3,KENT03 2 P TBT AUTENT,KKEEP0 2 P GETCTL 1,
0x192204…192398 Dummy {f00=0x00a7, f01=0x0190, f02=» DECHANGE AT LEAST ONCE 2 PKENT04 3 2 P MOVE DEBINW2,W3 INDICATE ENTER KEY DEPRESSED 3 . P RET 3 d PKENT03 3 p * P MOVE DEBINW1,W0 INDICATE NO CLEARING 3 ~ < P GETFLD 0,DEBINW1,DEBINW3 SEARCH FOR EMPTY COMP. FIELDS 3 ( P BOFL KENT10 EMPTY COMP. FIE
0x192398…19252c Dummy {f00=0x00a7, f01=0x0190, f02=»NT10 YES! 3 PKENT05 4 ( P TBT DOOL3,KENT07 JUMP IF ENTRY-MODE 4 P CBE DEBINW2,W9,KENT07 4 L P CBNE DEBINW2,W10,KENT06 4 j PKENT07 4 P TBT AUTENT,KENT06 4 P B SETCREAD 4 P* 4 & P* EMPTY COMPULSORY FIELD FOUND 4 P* 4 PKENT
0x19252c…1926c0 Dummy {f00=0x00a7, f01=0x0190, f02=»E DEBINW1,W0 4 P TSTCTL 5 LOOK IF CTAB 5 P BZ ERRPRINT NO! 5 2 P DUPL STR2A 5 J P BOK KENT20 YES! 5 ^ P TBF ASDFLAG,ERRPRINT 5 v PKENT20 YES! 5 P PERF DERROR,DEKTABI 5 P B ERRP25 5 P EJECT 5 P* 5 P* INDICATE FORCED ITEM 5
0x1926c0…192854 (1, 274) Dummy {f00=0x00a7, f01=0x0190, f02=»W3 RESTORE ITEMLENGTH 5 P B UPDR25 6 P EJECT 6 0 PERRPRT 6 > P CMP DEBINW2,W16 6 L P BE KEDIT JUMP IF EDIT 6 d , P CBE DEBINW2,W4,ERRCAN JUMP IF ERRCANEL1 6 , P CBE DEBINW2,W5,ERRCAN JUMP IF ERRCANEL2 6 P XSTAT DEDSDYKB,DEBINW3 6 P CALL
0x192854…1929e8 Dummy {f00=0x00a7, f01=0x0190, f02=»T BALANCE 6 t P PERF DERROR,DEKTAB6 7 P B ERRP20 7 . PERRP10 7 @ P PERF DERROR,DEKTAB4 7 N PERRP20 7 j $ P CBE DEBINW2,W1,ERRCAN CLEAR-KEY 7 x PERRP25 7 . P IB DEBINW2,ERRRET,ERRRET,ERRRET,KEDITX C 7 P KVALID,KFORCE,KTBWD,KTHOME 7 PERRR
0x1929e8…192b7c Dummy {f00=0x00a7, f01=0x0190, f02=»AG,ERRET4 7 P DUPL STR2A KEYED INPUT = N 8 P BOK ERRET4 YES! 8 6 PERRCA1 8 N ( P IB DEBINW2,SETCREAD,SETCREAD,CONT3 8 PERRET0 8 . P SUB DEBINW2,W3 ADJUST FOR CANCEL1,CANCEL2 8 PERRET1 8 P TBT DOOL3,ERRET2 8 P CLEAR DENOCHAN 8 P
0x192b7c…192d10 Dummy {f00=0x00a7, f01=0x40c0, f02=»ULATE TBWD 8 | P B KTBWD 9 P PEND 9 " P* 9 0 PBELL FRMT 9 : P FSL 9 L P FILLR X'07',1 9 X P FMEND 9 n PFORMF FRMT 9 | P FTEXT ' 1' 9 P FMEND 9 P END 9 @ 9 8 PERRET1 8 P TBT DOOL3,ERRET2 8 P CLEAR DENOCHAN 8 P
0x192d10…192ea4 Dummy {f00=0x00a7, f01=0x2008, f02=» : PERRET4 7 ( P IB DEBINW2,SETCREAD,SETCREAD,ERRET5 7 P B ERRET0 7 D PERRET5 7 V " P MOVE DEBINW2,W8 SIMULATE TBWD 7 d P B KTBWD 7 P PEND 7 P* 7 PBELL FRMT 7 P FSL 7 P FILLR X'07',1 7 P FMEND 7 PFORMF FRMT 7 P F
0x192ea4…193038 Dummy {f00=0x00a7, f01=0x0190, f02=» T ( !Ad1 9An@m 6 6 W,@n_ ( "2( _!@j3 @ @d0 0} 4 h _= _< ! 4 6 Sfl{ W j ! Ii ! 9 W ) 9 m ,P ) ? ;j !& 'bc c b W 0* ! 6 $ r"? 7" v$ !r? 8 Tj *P ? 1? " Q$ FWK $ $< ?
0x193038…1931cc Dummy {f00=0x00a7, f01=0x0190, f02=»/ !T; 6 MMMMMM~~MM~~MW|Iiy ! %n h / !T ,JWX ! %P h / ! 6 3 W1Ak_+ !" %% h / !T , W Hk ! c % c c _ & !? 0 %% 8? !6 (DTdt_ * ? + ? ,< j ! ! 9 @iW Ai? P ! : ? A W @ ! < A ? @ ?
0x1931cc…193360 Dummy {f00=0x00a7, f01=0x0190, f02=»% A0; ,0: , $ ? "r= ( 2 07 6 'h #Q !j , w j 1!w!Ii j 2! ! !j "" j $" mHj -P !2 _ &{ { )P !Ix 6 * ? &{ { *P !2 _ ({ P !2 _ -P !2 _ { + Ii 0; {$* p!0
0x193360…1934f4 (1, 275) Opaque[0x194]
0x1934f4…193688 # DirEnt {nam=»DERROR«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0f18, f03=0x0000}
0x1934f4…193688 IdxSect {
0x1934f4…193688 f00 = 0x0078 // 0x1934f4 @0x0
0x1934f4…193688 f01 = 0x0008 // 0x1934f6 @0x2
0x1934f4…193688 gno = [ // 0x1934f8 @0x4
0x1934f4…193688 [0x00]: C0x0078.0x3.0
0x1934f4…193688 [0x01]: C0x0079.0x0.0
0x1934f4…193688 [0x02]: C0x0079.0x1.0
0x1934f4…193688 [0x03]: C0x0079.0x2.0
0x1934f4…193688 ]
0x1934f4…193688 }
0x193688…19381c Dummy {f00=0x0078, f01=0x018e, f02=» $ P IDENT DERROR REL 10.0 80-04-11 P 80-04-08/DALI , P* D 4 P* THIS IS A GENERAL ERRORMESSAGES-ROUTINE N 2 P* IT - POSITIONS CURSOR AT THE LAST LINE F P* - DISPLAYS CORRESPNDING ERROR MESSAGE AT THE LAST LINE > P*
0x19381c…1939b0 Dummy {f00=0x0078, f01=0x0190, f02=» DDUM DEDDIV PDIV P ENTRY DERROR & P ENTRY CANC < P EXT MASK P P EXT MSKOUT b P EXT DELOCK TEST KEY-LOCKS v P EXT DELAST P EJECT P* P** ERROR-MESSAGES P* H PDEFTBERR FTABLE ERFM01,ERF
0x1939b0…193b44 Dummy {f00=0x0078, f01=0x0190, f02=»RFM18,ERFM19,ERFM20,ERFM21, C x : P ERFM22,ERFM23,ERFM24,ERFM25,ERFM26,ERFM27,ERFM28, C & : P ERFM29,ERFM30,ERFM31,ERFM32,ERFM33,ERFM34,ERFM35, C d : P ERFM36,ERFM37,ERFM38,ERFM39,ERFMDM,ERFMDM,ERFMDM, C : P ERFMDM,ERFMDM,ERFMDM,ERFMDM,ERFMDM,ERF
0x193b44…193cd8 Dummy {f00=0x0078, f01=0x0190, f02=»T CHARACTERS' | P FMEND P* $ PERFM02 FRMT . P FSL B P FTEXT 'UNDEFINED ERROR' N P FMEND n P* | PERFM03 FRMT P FSL P FTEXT 'I/O-ERROR' P FMEND P* PERFM04 FRMT P FSL " P FTEXT 'FUNCTION
0x193cd8…193e6c Dummy {f00=0x0078, f01=0x0190, f02=» P* PERFM06 FRMT P FSL " P FTEXT 'ILLEGAL VALUE' . P FMEND L P* Z PERFM07 FRMT d P FSL x P FTEXT 'INVALID NUMBER' P FMEND P* PERFM08 FRMT P FSL & P FTEXT 'ALREADY DEFINED/EXECUTED' P F
0x193e6c…194000 Dummy {f00=0x0078, f01=0x0190, f02=» FTEXT 'NO DISC SPACE' P FMEND P* , P EJECT 6 PERFM11 FRMT D P FSL X P FCOPY =' IN USE' d P FMEND ~ PERFM12 FRMT P FSL P FTEXT 'FOUND LOCKED' P FMEND P* PERFM13 FRMT P FSL " P FTEXT
0x194000…194194 (1, 276) Dummy {f00=0x0079, f01=0x0190, f02=» FMEND P* PERFM15 FRMT P FSL , P FTEXT 'NO RECORD FOUND' 8 P FMEND X P* f PERFM16 FRMT p P FSL . P FTEXT 'MAXIMUM NUMBER OF FIELDS EXCEEDED' P FMEND P EJECT PERFM17 FRMT P FSL $ P FTEXT 'PR
0x194194…194328 Dummy {f00=0x0079, f01=0x018e, f02=»SYMBOLIC' P FB E18RES PE18FOR $ P FCOPY =C'FORMAT' 2 PE18RES L P FILLR ':',1 Z P FHIGH n P FCOPY DEINPUT | . P FTEXT ' DOES NOT EXIST IN JOB-DEFINITION' P FBT DOOL1,E18OUT P FTEXT ' OR ON SYSTEM-DISC' PE18OUT
0x194328…1944bc Dummy {f00=0x0079, f01=0x0190, f02=» ~ P FBF SOOL1,E19OUT P FILLR ':',1 " P FCOPY JOBNAME 6 P FILLR ':',1 L P FCOPY BATCH ` P FILLR ':',1 t P FCOPY STR15A P FILLR ':',1 P FMEL 'TTTT9',BCD13A P FBF SOOL2,E19OUT P FILLR ':',1 P FCOPY SYMBO
0x1944bc…194650 Dummy {f00=0x0079, f01=0x0190, f02=»ILLR ':',1 P FTEXT 'ASD' PE19END FTAB 53 & P FTEXT 'PAGE' < P FILLR ':',1 R P FMEL 'X',BCD2A f P FMEND ~ P* P EJECT PERFM20 FRMT P FSL $ P FTEXT 'SYSTEMFILE ASSIGN-ERROR' P FMEND P* PERFM
0x194650…1947e4 Dummy {f00=0x0079, f01=0x0190, f02=»/O-ERROR' P FTAB 58 P FMEL 'XXXXX-',BCD13A " P FMEND @ P* N PERFM23 FRMT X P FSL l P FTEXT 'DISC NOT OPERABLE' x P FMEND P* PERFM24 FRMT P FSL P FCOPY =C'FORMAT' P FILLR ':',1 P FCOPY S
0x1947e4…194978 Dummy {f00=0x0079, f01=0x0190, f02=» FILLR ':',1 P FCOPY TABLE P FCOPY =' IN USE' ( P FMEND B PERFM26 FRMT P P FSL d P FCOPY =C'JOB' p P FILLR ':',1 P FCOPY JOBNAME P FCOPY =' IN USE' P FMEND P* PERFM27 FRMT P FSL P FCOPY
0x194978…194b0c Dummy {f00=0x0079, f01=0x0190, f02=» P FCOPY =' IN USE' P FMEND " P* 0 P EJECT : PERFM28 FRMT H P FSL * P FTEXT 'DEFINED LINE MAXIMUM EXCEEDED' h P FMEND PERFM29 FRMT P FSL . P FTEXT 'MAXIMUM FORMAT-CODE SIZE EXCEEDED' P FMEND P*
0x194b0c…194ca0 Dummy {f00=0x0079, f01=0x018e, f02=»SL P FCOPY =C'FORMAT' P FILLR ':',1 $ P FCOPY FORMAT 8 P FILLR ':',1 N 6 P FTEXT 'CONFIRM WANTED FUNCTION (CORR,RDEL,PRINT)' b P FMEND P* PERFM32 FRMT P FSL P FTEXT 'ILLEGAL FORMAT NAME' P FMEND PER
0x194ca0…194e34 (1, 277) Dummy {f00=0x0079, f01=0x0190, f02=» P FMEND PERFM3A FRMT P FTEXT 'TEST ENTERED BATCH' * P FMEND N P* PERFM35 FRMT f P FSL z ( P FTEXT 'OUTPUT DEVICE NOT OPERABLE' P FMEND P EJECT P* PERFM36 FRMT P FSL : P FTEXT 'END OF F
0x194e34…194fc8 Dummy {f00=0x0079, f01=0x0190, f02=» FMEND P* PERFM38 FRMT P FSL , : P FTEXT 'OCCUPIED RECORDLENGTH CHANGED WITHIN FORMAT:' 8 P FCOPY FORMAT v P FILLR '.',1 P FTEXT 'SIZE ON DISC:' P FMEL 'TTT9',BCD13A P FILLR '.',1 P FMEND P* PER
0x194fc8…19515c Dummy {f00=0x0079, f01=0x0190, f02=»N' n P FMEND P EJECT P* & PERFM49 FRMT 0 P FSL D 6 P FTEXT 'USERFILE NOT CLOSED IN PREVIOUS SESSION.' P P FMEND P* PERFM50 FRMT P FSL $ P FTEXT '95 % OF FILESPACE USED' P FMEND P* PERFM51
0x19515c…1952f0 Dummy {f00=0x0079, f01=0x0190, f02=» FMEND P* PERFM53 FRMT P FSL , P FTEXT 'TIME-OUT' 8 P FMEND R P* ` PERFM54 FRMT j P FSL ~ & P FTEXT 'EDIT ERROR IN CONVERSION' P FMEND P* PERFM55 FRMT P FSL P FTEXT 'CHANGE FLOPPY DISC'
0x1952f0…195484 Dummy {f00=0x0079, f01=0x0190, f02=»CT PDERROR PROC KEYTAB P PKTAB KEYTAB $ P* : P* ERROR HANDLING D P* ` P MOVE DEBINW2,W1 j ( P EDWRT DEDSSCRN,BELL ACOUSTIC ALARM P CMP DEBINW4,W0 P BZ DERR99 P BP DERR00 P ADD DEBINW4,=W'51' & P B
0x195484…195618 Dummy {f00=0x0079, f01=0x0190, f02=»03 2 P XCOPY DEBINW2,W1,W1,BPOOL(BIN11),BIN3 LENGTH P MOVE STATSH,HEX00 @ P MOVE DEBINW3,=X'3F' Z P CALL MSKOUT,DEBINW3,DEBINW2 v P ADD DEBINW3,W1 . P XCOPY STATSH,W1,DEBINW3,BPOOL(BIN11),BIN3 P MOVE DEBINW3,=X'202B' " P XCOPY
0x195618…1957ac Dummy {f00=0x0079, f01=0x0190, f02=» PDERR03 P CBL DEBINW4,=W'56',DERR04 PDERR02 4 P MOVE DEBINW4,W2 B PDERR04 Z & P EDWRT DEDSSCRN,DEFTBERR(DEBINW4) h P* P* READ AFTER ERROR P* PDERR05 ( P SETCUR SET CURSOR AT THE BEGINNING P OF THE
0x1957ac…195940 Dummy {f00=0x0079, f01=0x0190, f02=»DEBINW3,W1 REQUESTED LENGTH 2 P NKI .NE,DEDSDYKB,STR1A,KEYTAB,DEBINW3,DEBINW2 $ P PERF DELOCK,W1,DEBINW2 Z $ P IB DEBINW3,DERR18,DERR17,DERR19 z P B DERR20 P* PDERR17 P XSTAT DEDSDYKB,DEBINW3 P CALL MASK,DEBINW3,W64
0x195940…195ad4 (1, 278) Dummy {f00=0x0079, f01=0x0190, f02=» B DERR10 PDERR18 P DISPLAY 0,W1,W0 P B DERR00 8 PDERR19 J 0 P CBNE DEBINW4,W4,DERR15 NO KEY-LOCK-ERROR ? X ( P MOVE DEBINW2,W1 SIMULATE CLEAR-KEY PDERR20 P CBNE DEBINW2,W10,DERR25 P* P* HANDLE ASDFLAG
0x195ad4…195c68 Dummy {f00=0x0079, f01=0x0190, f02=» ( P MOVE DEBINW3,W24 INDICATE LAST LINE P* 4 P* CLEAR ERROR PRINTOUT > P* ` PDERR30 j , P ERASE 0,DEBINW3,DEBINW3 ERASE LAST LINE x PDERR99 P RET P PEND P EJECT PCANC PROC , P CBE DEBINW1,W0,CANC20 J
0x195c68…195dfc Dummy {f00=0x0079, f01=0x0190, f02=»THING IN THE FIELD r & P GETABX DEBINW4 GET CURRENT INDEX * P ERASE 10,DEBINW4,DEBINW4 CLEAR FIELD D PCANC10 r P IB DEBINW2,CLEAR1,CLEAR2 PCANC15 4 P MOVE :FMTITEM,DEINPUT RESTORE CURRENT CONTENTS PCANC20 P RET PCLEAR1
0x195dfc…195f90 Dummy {f00=0x0079, f01=0x40f8, f02=» ` PCLEA20 * P GETABX DEBINW4 GET CURRENT TAB INDEX , P DISPLAY 1,DEBINW4,DEBINW4 DISPLAY FIELD D P RET t P PEND P EJECT P* PBELL FRMT P FSL P FILLR X'07',1 P FMEND END @ ET PCLEAR1
0x195f90…196124 Dummy {f00=0x0079, f01=0x2008, f02=»
0x196124…1962b8 Dummy {f00=0x0079, f01=0x4030, f02=» # #_ 4 4 4 4 4 ~ @ , $ $ ) 8 & H & V ( d * p & ( + " , 999999999999999999999O " , ( - " . 9999
0x1962b8…19644c Dummy {f00=0x0079, f01=0x2008, f02=» ( FCOUNTER C(!FDBAB FDCNT FDEOF FDIR Q( FDVBCD ("FDVSTR ($FFSNR I(!FILECODE A(!FILINDUS v( FINDEXPO E(!FLIND p(!FMTWK (!FNOOFREC ?(!FORMAT m( FORTAB ($FRINF G(!FRMTPNTR ( FVOLNAME V($HEX00 U JOBNAME k JO
0x19644c…1965e0 Dummy {f00=0x0079, f01=0x0190, f02=» & & 6! & ( & " & . & 7! & > ( & L & X & 8! & h ( & v & & 9! & ( & & & :! & ( & & & ;! & ( & !
0x1965e0…196774 (1, 279) Opaque[0x194]
0x196774…196908 # DirEnt {nam=»DEKEYS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0f38, f03=0x0000}
0x196774…196908 IdxSect {
0x196774…196908 f00 = 0x0079 // 0x196774 @0x0
0x196774…196908 f01 = 0x0002 // 0x196776 @0x2
0x196774…196908 gno = [ // 0x196778 @0x4
0x196774…196908 [0x00]: C0x0079.0x3.0
0x196774…196908 ]
0x196774…196908 }
0x196908…196a9c Dummy {f00=0x0079, f01=0x0190, f02=» P* DEKEYS EJECT ENT EQU X'8C' ENTER * CAN EQU X'91' CANCEL F PRET EQU X'92' RETURN b PRG EQU X'94' PROGRAM ~ PTOT EQU X'93' TOTAL PSTS EQU X'96' STATUS PPRT EQU X'98' PRINT $ PKEP EQU X'8D' KEEP FIELD
0x196a9c…196c30 Dummy {f00=0x0079, f01=0x0190, f02=»NSERT z RDL EQU X'89' RECORD DELETE RFW EQU X'83' RECORD FORWARD 2 " RBW EQU X'81' RECORD BACKWARD V EOI EQU X'80' FIELD FORWARD | $ PPLS EQU X'9C' FIELD FORWARD PLUS & PMIN EQU X'9D' FIELD FORWARD MINUS PBTB EQU X'8A' BACKTAB
0x196c30…196dc4 Dummy {f00=0x0079, f01=0x40b0, f02=»CFW EQU X'86' CURSOR FORWARD " CBW EQU X'84' CURSOR BACKWARD $ PBSP EQU X'8B' BACKSPACE J " PVAL EQU X'97' FORCE VALIDATION j NOK EQU X'FF' NOKEY @ ELD FORWARD PLUS & PMIN EQU X'9D' FIELD FORWARD MINUS PBTB EQU X'8A' BACKTAB
0x196dc4…196f58 Dummy {f00=0x0079, f01=0x2008, f02=» LR,EOI,CAN,RET, C EOI,BTB,HOM,NOK, C " NOK,NOK,NOK,NOK,PRT, C @ NOK,CBW,ENT b * x ( $SPKTAB3 KTAB CFW,CBW,RIN,RDL,NOK, C CLR,KEP,EOI,CAN,RET, C EOI,BTB,HOM,NOK, C NOK,NOK,NOK,NOK,PRT, C
0x196f58…1970ec Dummy {f00=0x0079, f01=0x0190, f02=»0X L * : J Z j z ! " ( / J F " D %% R2
0x1970ec…197280 Dummy {f00=0x0079, f01=0x0190, f02=» J F " D @ _W) !$ ! $ W !W R8P )B?R0R (+0R +@eAf ! ! 0X V f v V 7 D * *
0x197280…197414 (1, 280) Opaque[0x194]
0x197414…1975a8 # DirEnt {nam=»DEFDSC«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0f40, f03=0x0000}
0x197414…1975a8 IdxSect {
0x197414…1975a8 f00 = 0x007a // 0x197414 @0x0
0x197414…1975a8 f01 = 0x0010 // 0x197416 @0x2
0x197414…1975a8 gno = [ // 0x197418 @0x4
0x197414…1975a8 [0x00]: C0x007a.0x0.0
0x197414…1975a8 [0x01]: C0x007a.0x1.0
0x197414…1975a8 [0x02]: C0x007a.0x2.0
0x197414…1975a8 [0x03]: C0x007a.0x3.0
0x197414…1975a8 [0x04]: C0x007b.0x0.0
0x197414…1975a8 [0x05]: C0x007b.0x1.0
0x197414…1975a8 [0x06]: C0x007b.0x2.0
0x197414…1975a8 [0x07]: C0x007b.0x3.0
0x197414…1975a8 ]
0x197414…1975a8 }
0x1975a8…19773c Dummy {f00=0x007a, f01=0x0190, f02=» $ P IDENT DEFDSC REL 10.0 80-04-11 P 80-04-28/JAER , * D @ <* THIS IS THE GENERAL FORMAT DEFINITION SCREEN VERSION N * * -INPUT : @ P* BOOL6 = F = GENERAL FORMAT DEFINITION @ P*
0x19773c…1978d0 Dummy {f00=0x007a, f01=0x0190, f02=» T = CHANGE FORMAT DEFINITION | 0 P* DOOL3 = F = CORR-MODE 0 H P* T = TEMPORARY MODE CHANGE (FIELD CH.) d 0 P* DOOL4 = F = CORR-MODE N P* T = T
0x1978d0…197a64 Dummy {f00=0x007a, f01=0x0190, f02=»PORARY MODE CHANGE (CORR CURR.LINE) j L P* DOOL6 = F = NO PASS IN 'MTEXT' THROUGH 'DETCHHK' , . P* = T = PASSED | 0 P* DOOL7 = F = CORR-MODE N P* = T = END
0x197a64…197bf8 Dummy {f00=0x007a, f01=0x0190, f02=» = T = INHIBIT DISPLAY OF LDISP AND ERASE OF FIELDPA | P* D * N * -OUTPUT: X 4 P* DEBINW2 = 1 = 'CANCEL'-KEY p 4 P* = 2 = 'RETURN'-KEY 4 P* = 3 = 'ENTE
0x197bf8…197d8c Dummy {f00=0x007a, f01=0x0190, f02=»R FORMAT BUFFER d > P* BIN2 = POINTER DESC.BUFFER F P* BIN3 = BUFFERPOOL-INDEX FORMATCODE Z L P* BIN4 = BUFFERPOOL-INDEX FORMAT DESCRIPTOR < P*
0x197d8c…197f20 Dummy {f00=0x007a, f01=0x0190, f02=» BIN7 = FIELDLENGTH = MAXL t 8 P* BIN8 = TABPOS 'FTAB' $ F P* BIN9 = NUMBER OF FTEXT'-CHARACTERS ` : P* BIN10 = CURRENT FIELD NR H P* BIN
0x197f20…1980b4 (1, 281) Dummy {f00=0x007a, f01=0x0190, f02=» BIN13 = LAST DISPLACEMENTS OF DESCRIPTOR ~ D P* BIN14 = LAST LENGTH OF DESCRIPTOR < . P* BIN15 = WORK . P* BIN16 = WORK F P* PIN
0x1980b4…198248 Dummy {f00=0x007a, f01=0x0190, f02=» = 8 = LAST FIELD IN BALANCE FORMDEF L M************************************************************************ B DDUM DEDDIV PDIV ENTRY DEFDSC PROGRAM-START P* & P EXT DEAPPL USER ROUTINE TO HANDLE
0x198248…1983dc Dummy {f00=0x007a, f01=0x0190, f02=» l " P EXT DEUNPF UNPACK NEXT FIELD P EXT DEUNPL UNPACK NEXT LINE . , P EXT DEFGTC FORMAT GENERATION TABULATION R * P EXT VGACNT VAL-GEN-ACC-STRING-CONTROL P EXT CANC -ROUTINES P EXT DESTAT STATUS-LINE P EXT FSL FORMAT START LINE
0x1983dc…198570 Dummy {f00=0x007a, f01=0x0190, f02=»ERING PROCEDURE P EXT MASK $ P EXT EMPTYT CHECK IF EMPTY ITEM * $ P EXT UPDBOL UPDATE BOOLEAN/WORD R P EXT DELOCK TEST KEY-LOCKS z P EXT ATTPRT RESERVE PRINTER P EXT DETPRT RELEASE PRINTER P* P INCLUDE DEKEYS,LIST
0x198570…198704 Dummy {f00=0x007a, f01=0x018e, f02=»,RET C p P PLS,BTB,HOM,NOK, C P KEP,NOK,NOK,STS,PRT, C . P DUP,CFW,ENT,NOK P * j , PDEKTAB2 KTAB BSP,NOK,CLR,EOI,CAN,RET, C t P PLS,BTB,HOM,NOK, C P NOK,NOK,NOK,NOK,PRT, C P NOK,CBW,NOK,NOK * ( P
0x198704…198898 Dummy {f00=0x007a, f01=0x0190, f02=» t P NOK,NOK,NOK,NOK P* " , PDEKTAB4 KTAB BSP,CLR,NOK,EOI,CAN,RET, C , P PLS,BTB,HOM,NOK, C P KEP,NOK,NOK,STS,PRT, C z P DUP,CFW,NOK,TOT P* , PDEKTAB5 KTAB NOK,NOK,NOK,NOK,CAN,RET, C P NOK,BTB,NOK,NOK, C
0x198898…198a2c Dummy {f00=0x007a, f01=0x0190, f02=»,CAN,RET,NOK,TOT,RIN P* , PDEKTABA KTAB NOK,NOK,NOK,NOK,CAN,RET, C & P NOK,NOK,NOK,NOK, C V P NOK,NOK,NOK,STS,PRT, C t P NOK,NOK,ENT,TOT,RFW, C & P NOK,COR,RDL,RIN NOK,COR,RDL,RIN P* , PDEKTABB KTAB NOK,NOK,NOK,NOK
0x198a2c…198bc0 Dummy {f00=0x007a, f01=0x0190, f02=» ~ P* PDEKTABC KTAB CLR,CAN,RET EJECT 2 PDEFDSC PROC @ PIN05 T * P TBT BOOL6,IN10 JUMP IF BALANCE FORMAT ` ( P MOVE BIN4,W2 NUMB OF WANTED BUFFERS P MOVE DEBINW2,W1 P B IN15 PIN10 ( P MOVE BIN4,W1 NUMB OF WANT
0x198bc0…198d54 (1, 282) Dummy {f00=0x007a, f01=0x018e, f02=» , P CALL UPDBOL,BIN1 INITIATE RECORDSTATUS * P MOVE BIN3,W0 NUMB OF CONSEC. BUFFERS 8 * P MOVE DEBINW1,BIN4 SAVE NUMB OF WANTED f 2 P PERF DEPOOL,W2,BIN4,BIN3,STRG10A GET BUFFERS P BOK IN20 & P PERF DERROR,DEKTAB6 ERROR-MESSAGE * P C
0x198d54…198ee8 Dummy {f00=0x007a, f01=0x0190, f02=» PIN20 & P TBT BOOL7,IN21 JUMP IF CORR-MODE 2 P MOVE PINDFR,BIN4 SAVE ST-INDEX IF NEWREG-MODE : PIN21 p 0 P MOVE PINDDB,BIN4 SAVE START BUFFERPOOLINDEX | * P XCOPY RPOOL(PINDDB),W17,W1,DEBINW1,W1 * P XCOPY RPOOL(PINDDB),W18,W1,DEBINW2,W1
0x198ee8…19907c Dummy {f00=0x007a, f01=0x0190, f02=»F DEPOOL,W4,PINDDB,BIN16,STRG10A SET BUFFER * P MOVE RNRFMCH,W2 LOAD FORMATLINKINDEX 4 P* b ( P* <RELEASE OLD DESC. BUFFERS> l P* PIN22 * P TBT BOOL6,IN25 JUMP IF BALANCE FORMAT P* 0 P* INITIALIZATION OF USER FO
0x19907c…199210 Dummy {f00=0x007a, f01=0x0190, f02=»,W8 POINTER DESCBUFF:=8 P MOVE BIN3,W0 : P XCOPY BIN3,W1,W1,RPOOL(PINDDB),W8 FETCH INDEX FCBUFF 6 ( P MOVE BIN13,W0 LAST DISPLACEMENTS:=0 t " P MOVE BIN14,W9 LAST LENGTH:=9 $ P MOVE PRECCUR,W14 LAST FIELD:=14 4 P MOVE FMTWK(W14),RBUFLN FE
0x199210…1993a4 Dummy {f00=0x007a, f01=0x0190, f02=» INITIALIZATION OF BALANCE FORMAT PARTS P* 6 PIN25 @ * P MOVE BIN3,PINDDB 1ST BUFFER=FCBUFFER L * P MOVE PINDND,W0 NUMB OF DESCBUFFERS:=0 z " P MOVE PRECCUR,W8 LAST FIELD:=8 PIN30 * P PERF DEATTF ATTACH DEFINITION FORMAT P
0x1993a4…199538 Dummy {f00=0x007a, f01=0x0190, f02=»5 PIN34 ( P ERASE 3,W1,W0 CLEAR ALL FIELDS FROM P 1 AND UP B PIN35 V P TBF BOOL7,IN36 b , P MOVE FORMAT,STRG10A RESTORE FORMATNAME z , P MOVE FDVBCD(W1),W23 PAGE SIZE:=23 (MAX) PIN36 P* <INITIALIZING PHASE> 0
0x199538…1996cc Dummy {f00=0x007a, f01=0x018e, f02=»POOL NUMB OF POOLS:=1+01 , P MOVE FDVSTR(W1),HEX00 KEYED INPUT EMPTY * P MOVE FDVBCD(W7),HEX00 MINLENGTH EMPTY P P MOVE DUPL,HEX00 DUPL EMPTY ~ . P MOVE WORK(W6),W0 HIGHEST FIELD REF. NO:=0 * P TBT BOOL6,IN40 JUMP IF BALANCE FORMAT 0 P MOVE
0x1996cc…199860 Dummy {f00=0x007a, f01=0x0190, f02=» ~ P TBT DEPROMPT,POOFF P DISPLAY 3,W1,W0 $ P B CONT1 < PPOOFF L ( P DISPLAY 0,W1,W0 DISPLAY ENTIRE FORM Z P CLEAR DEPROMPT , P CBE DEBINW3,W1,CONT1 JUMP IF POWER OFF ( P TBT BOOL7,COR010 JUMP IF CORR-MODE P EJECT P
0x199860…1999f4 (1, 283) Dummy {f00=0x007a, f01=0x0190, f02=»BINW4,DEBINW3 SEARCH CURRENT POSITION P BZ SETCREAD JUMP IF FOUND . " P BL KTHOME POSITION NOT FOUND P P* v P* COMPULSORY FIELD FOUND P* & P MOVE DEBINW4,DEBINW3 CHANGE INDEX P B CONT5 SEARCH AGAIN P* P* ,
0x1999f4…199b88 Dummy {f00=0x007a, f01=0x0190, f02=»T h $ P MOVE BIN5,W0 'LDES'-POINTER:=0 * P PERF DEUNPL,DEBIN5 UNPACK LINE=>LDES 2 ( P CBE DEBINW2,W1,COR400 END-OF-FORMAT ` ( P DISPLAY 1,W3,W3 DISPLAY LINE DESIGN PCOR015 ( P MOVE DEBINW4,W3 LDES-FIELD CURRENT P B CONT5 P*
0x199b88…199d1c Dummy {f00=0x007a, f01=0x0190, f02=» MOVE DEBINW4,=W'36' MESSAGE-NO:=36 6 P PERF DERROR,DEKTAB7 'E-O-F FOUND PRESS 'RINS' ' , P CBE DEBINW2,W1,COR400 f $ P SUB DEBINW2,W1 ADJUST KEY-INEX PCOR450 . P CBNE DEBINW2,W5,RETUR JUMP IF NOT INSERT $ P SET DOOL7 T=NEW LINES INSER
0x199d1c…199eb0 Dummy {f00=0x007a, f01=0x0190, f02=»URSOR ON CURRENT FIELD P P* & * P* READ TO CURRENT FIELD ON DISPLAY 0 P* ^ PREADIN h 2 P TBT DOOL7,READ00 JUMP IF INSERT OF NEW LINES v 0 P TBT DOOL5,READ00 JUMP IF CORR-MODE CHANGED 0 P TBT DOOL4,READ00 JUMP IF CORR-MODE CHAN
0x199eb0…19a044 Dummy {f00=0x007a, f01=0x018e, f02=»UMP IF FIELDNR =3 x > P CBE DEBINW4,PRECCUR,READ20 JUMP IF FIELDNR = LAST FIELDNR . P DYKI DEINPUT,DEKTAB1,DEKTAB2,DEBINW1, C P DEBINW2,DEBINW4 P B DYKOUT PREAD10 . P DYKI DEINPUT,DEKTAB4,DEKTAB2,DEBINW1, C P DEBINW2,DEBI
0x19a044…19a1d8 Dummy {f00=0x007a, f01=0x0190, f02=» PREAD30 P MOVE DEBINW3,W1 P MOVE BIN16,DEBINW4 * P CBE BIN16,W4,READ40 F 4 P NKI .NE,DEDSDYKB,STR1A,DEKTABA,DEBINW3,DEBINW2 b P BNOK BELLY P B DYKOUT PREAD40 4 P NKI .NE,DEDSDYKB,STR1A,DEKTABB,DEBINW3,DEBINW2 P B
0x19a1d8…19a36c Dummy {f00=0x007a, f01=0x0190, f02=» MOVE DEBINW2,W2 P B ERRCAN PDYK100 * 2 P TBT DOOL7,DYK101 JUMP IF INSERT OF NEW LINES 8 , P TBT DOOL5,DYK101 JUMP IF TEMP CHH MODE n * P TBT DOOL4,DYK101 JUMP IF TEMP CH MODE * P TBT DOOL3,DYK101 JUMP IF TEMP CH MODE ( P TBT BOOL7,COR
0x19a36c…19a500 Dummy {f00=0x007a, f01=0x0190, f02=»E,UPDATE,UPDATE CONVERTED C 4 P UPDATE,UPDATE,UPDATE,UPDATE END-OF-ITEM-KEY C $ P UPDATE,KDUPL,KEDIT P EJECT x P* 4 P* HANDLE THE RESPECTIVE KEY AS EOI-KEY FIRST P* PUPDATE . P CBE DEBINW1,W0,UPD350 JUMP IF LENGTH =
0x19a500…19a694 (1, 284) Dummy {f00=0x007b, f01=0x0190, f02=»ONAL DISPLAYING P* $ P GETCTL 0,DEBINW3 GET APPL-VALUE " 0 P CBE DEBINW3,W0,UPD400 JUMP IF NO APPL VALUE J P* ~ ( P* APPL-VALUE DIFFERENT FROM ZERO P* P PERF DEAPPL , P IB DEBINW3,UPD260,UPD300,ERRPRINT,KEDIT P B UPD
0x19a694…19a828 Dummy {f00=0x007b, f01=0x0190, f02=»UPDATE FIELD WITH DISPLAYING ~ . PUPD300 SET DECHANGE INDICATE CHANGED ITEM $ PUPD350 V $ P* JUMP ON FUNCTION KEY INDEX d P IB DEBINW2,KTFWD,DUMMY, C P KEOI,DUMMY,DUMMY,KTFWD, C & P KTBWD,KTHOME,DUMMY,KEEP,DUMMY C & P DUMMY,KS
0x19a828…19a9bc Dummy {f00=0x007b, f01=0x0190, f02=» ADJUST EOI-KEY INDEX PDUMMY PRETUR , P RET : PCORL30 F P B COR030 LONG BRANCH LABEL T P* x PUPD400 6 P CBE DEBINW4,W2,UPD260 JUMP IF UNCONDITIONAL DIDEL 0 P UPDFLD 0,DEINPUT UPDATE FIELD DIDEL. COND. P B UPD300
0x19a9bc…19ab50 Dummy {f00=0x007b, f01=0x0190, f02=» PKTFWD TAB. FORWARD 1 STEP ! P TFWD ! ( P B TSTTAB ! 6 P* ! H $ PKTBWD TABULATION 1 STEP BACKW. ! R P TBWD ! z P B TSTTAB ! P* ! " PKTHOME TAB. TO HOME POSITION ! P THOME ! P B TSTTAB ! P* ! P ! PTSTTAB TES
0x19ab50…19ace4 Dummy {f00=0x007b, f01=0x0190, f02=»NDITIONAL TABULATION ! P* " P PERF DEFGTC " & . P CBNE DEBINW2,W0,RETUR JUMP IF ERROR FOUND " : P CBNE DEBINW3,W0,BELLY " l P TBF DOOL5,BELLA " * P TBT DOOL6,CRL110 JUMP IF MTEXT PASSED " PBELLA " P B SETCREAD " PBELLY " ( P EDWRT D
0x19ace4…19ae78 Dummy {f00=0x007b, f01=0x0190, f02=»KPRTER " " P EDWRT DEDSPRT,FORMF FORMFEED # P MOVE DEBINW3,W1 # 4 P PRINT DEDSPRT,DEBINW3,W0 # L P PERF DETPRT RELEASE PRINTER # n $ P B SETCREAD SET CURSOR AND READ # PKPRTER # P PERF DERROR,DEKTABC # $ P IB DEBINW2,ERRCAN,ERRCAN,RETUR #
0x19ae78…19b00c Dummy {f00=0x007b, f01=0x0190, f02=»E COMMON EOI-KEY # x P DUPL DEINPUT DUPLICATION $ P BNOK KDUPLE $ : 8 P MOVE FMTWK(W5),RECLNTH RESTORE LAST LINE NUMB CHARS $ N P ERASE 2,W5,W5 CLEAR LDISP $ P B UPD260 DUPL ALLOWED $ PKDUPLE $ . P MOVE DEBINW4,W0 INDICATE ILLEGAL EOI-KEY $
0x19b00c…19b1a0 Dummy {f00=0x007b, f01=0x0190, f02=» PKEDITX % P CBNE DEBINW1,W0,KEDITY % P SETCUR % 2 P B KEDIT % B PKEDITY % R P MOVE DEBINW1,W1 % ` PKEDIT % x P GETCTL 1,DEBINW3 GET MAXL % P CBNE DEBINW3,W0,KED100 % ( P EDWRT DEDSSCRN,BELL ACOUSTIC ALARM % P B SETCREAD % P
0x19b1a0…19b334 (1, 285) Dummy {f00=0x007b, f01=0x0190, f02=» % P* ENTER KEY & P* & PKEEP & ( PKENTER & 4 0 P TBF BOOL6,KENT0A JUMP IF NOT BALANCE-FORMAT & B 0 P TBF BOOL2,KENT0A JUMP IF NO ACC/FIELD FOUND & v * P CALL EMPTYT,FDVBCD(W8) ACC NO EMPTY ? & & P BNOK KEDIT JUMP IF EMPTY (ERROR) & PKENT0A
0x19b334…19b4c8 Dummy {f00=0x007b, f01=0x0190, f02=»K KEDIT JUMP IF ERROR FOUND & PKENT00 ' $ . P TBT DOOL3,COR060 JUMP IF CORRMODE TEMP CH ' 2 ( P PERF FDIR GENERATE FIELD DIRECTIVE ' d P CBNE DEBINW2,W0,RETUR NOK ' & P CBE EOLINE,W1,KENT03 EOL REACHED ' * P PERF MTEXT MATCH AND SEARCH FOR FIELD '
0x19b4c8…19b65c Dummy {f00=0x007b, f01=0x0190, f02=»NT03 ' ( P TBT DOOL4,COR058 NEW LINE INSERTED ( " P PERF FNL END-OF-LINE ROUTINE ( 8 & P MOVE DEBINW4,W3 INDICATE FIELD 3 ( ^ P CBNE DEBINW2,W0,RETUR NOK ( PKENT04 ( P GETFLD 0,DEBINW4,DEBINW3 ( P B SETCREAD OK ( P EJECT ( PERRPRT (
0x19b65c…19b7f0 Dummy {f00=0x007b, f01=0x0190, f02=» ( h P XSTAT DEDSDYKB,DEBINW3 ) P CALL MASK,DEBINW3,W64 ) ( P BNZ DYK050 ) F P* ) Z P* ERROR HANDLING ) d P* ) PERRPRINT ) P PERF DERROR,DEKTAB6 ) * P IB DEBINW2,ERRCAN,ERRCAN,RETUR,KEDITX ) P B SETCREAD ) P* ) P*
0x19b7f0…19b984 Dummy {f00=0x007b, f01=0x0190, f02=»CEL2 ) j P B RETUR * PCLEA20 * * P GETABX DEBINW4 GET CURRENT TAB INDEX * * , P DISPLAY 1,DEBINW4,DEBINW4 DISPLAY FIELD * X P B SETCREAD CONTINUE * P* * P EJECT * PCOR030 * P CBE BIN16,W4,COR035 * , P IB DEBINW2,DUMMY,DUMMY,DUMMY,DUMM
0x19b984…19bb18 Dummy {f00=0x007b, f01=0x0190, f02=»COR040,COR120,COR050, ENT,RFW C * ( P DUMMY,COR100,COR080,COR090 RDL,RIN + ( PCOR035 + T , P IB DEBINW2,DUMMY,DUMMY,DUMMY,DUMMY, C + b $ P CORRET,CORRET,DUMMY,DUMMY, C + " P DUMMY,DUMMY,DUMMY,DUMMY, C + P DUMMY,KSTS,KPRT,DUMMY, C + " P DU
0x19bb18…19bcac Dummy {f00=0x007b, f01=0x0190, f02=» NEXT FIELD + ~ P* , PCOR040 , P ERASE 2,W5,W5 CLEAR LDISP , , PCOR045 , N P PERF MTEXT LDES-MATCH , * P CBNE DEBINW2,W0,COR499 JUMP IF NOT OK , z PCOR046 , P CLEAR BOOL5 , , P PERF DEUNPF,CURSEC,W1 UNPACK NEXT FIELD , & P TBF BOOL2,COR
0x19bcac…19be40 Dummy {f00=0x007b, f01=0x0190, f02=»URRENT , p P B CONT5 - P* - , P* CORRECTION LINE-LEVEL 'RFW'-KEY - ( P* - DISPLAY NEXT LINE - X P* - | PCOR050 - P ERASE 2,W5,W5 ERASE LDISP - PCOR051 - & P SET DOOL8 T=IHIBIT DISPLAY ERASES - P PERF MTEXT 'LDES'-MATCH -
0x19be40…19bfd4 (1, 286) Dummy {f00=0x007b, f01=0x0190, f02=»5 JUMP IF NO FIELD - P TBT BOOL5,COR052 . $ P PERF FDIR FIELD DIRECTIVE-PROC . 4 P CBNE DEBINW2,W0,COR499 . 2 P CBNE EOLINE,W1,COR051 JUMP IF NOT END-OF-LINE . | PCOR053 . $ P ADD CURSEC,W1 ADJUST BUFFERPOS . PCOR055 . 0 P DISPLAY 2,W3,W7 D
0x19bfd4…19c168 Dummy {f00=0x007b, f01=0x0190, f02=»NE . P CBNE DEBINW2,W0,COR499 / P B COR010 / * P* / < . P* CORRECTION FIELD-LEVEL 'ENT'-KEY / F " P* - DISPLAY NEXT FIELD / x P* / PCOR060 / " P CLEAR DOOL3 F= PURE CORRMODE / $ P PERF FDIR FIELD DIRECTIVE PROC / P CBN
0x19c168…19c2fc Dummy {f00=0x007b, f01=0x0190, f02=» LEVEL 'CORR'-KEY CHANGE FIELD PARAMETERS / x P* 0 2 PCOR070 0 < ( P SET DOOL3 T= TEMPORARY MODE CHANGE 0 J PCOR075 0 v P MOVE DEBINW4,W4 0 P B CONT5 0 P* 0 . P* CORRECTION LINE-LEVEL 'RDEL'-KEY 0 $ P* -DELETE CURRENT LINE
0x19c2fc…19c490 Dummy {f00=0x007b, f01=0x0190, f02=»INW2,W1,COR498 END-OF-FORMAT 0 P TBF BOOL5,COR085 1 $ P B COR010 GO ON NEXT LINE 1 > P* 1 ` " P* CORRECTION LINE-LEVEL 1 j P* - INSERT NEW LINE 1 P* 1 PCOR090 1 P ERASE 2,W6,W6 ERASE LDES 1 . P SET DOOL4 T=CHHANGE MODE IN
0x19c490…19c624 Dummy {f00=0x007b, f01=0x0190, f02=»CONF CURR LINE 1 x ( P CLEAR DOOL2 F=CURR LINE NOT DELETED 2 P MOVE DEBINW4,W3 2 B P B CONT5 2 Z P* 2 j , P* CORRECTION LINE-LEVEL 'COR'-KEY 2 t P* 2 PCOR100 2 ( P SET DOOL5 T=TEMPORARY MODE CHHANGE 2 * P CLEAR DOOL6 F=DEFGTC/MTEXT NOT
0x19c624…19c7b8 Dummy {f00=0x007b, f01=0x0190, f02=»LEAR DOOL6 2 P CBE EOLINE,W1,COR058 3 P SET DOOL4 3 0 P B COR075 3 B P* 3 T . P* CORRECTION -LINE-LEVEL 'TOT'-KEY 3 ^ $ P* - KEEP REST OF FORMAT 3 P* 3 PCOR120 3 & P SET DOOL8 T=INHBIT DISPLAY-ERASE 3 P PERF MTEXT LD
0x19c7b8…19c94c Dummy {f00=0x007b, f01=0x0190, f02=»OOL5 3 , P PERF DEUNPF,CURSEC,W1 UNPACK NEXT FIELD 4 ( P TBT BOOL5,COR125 JUMP IF EOL FOUND 4 < & P PERF FDIR FIELD DIRECTIVE PROCESS 4 h P CBNE DEBINW2,W0,COR499 4 PCOR130 4 0 P CBNE EOLINE,W1,COR120 END OF LINE NOT FOUND 4 , P PERF DEUNPF,CURSEC,
0x19c94c…19cae0 Dummy {f00=0x007b, f01=0x0190, f02=»OINTER:=0 4 z * P PERF DEUNPL,DEBIN5 UNPACK LINE=>LDES 5 ( P CBE DEBINW2,W1,COR498 END-OF-FORMAT 5 @ P B COR120 GO ON 5 l P* 5 & P* CORRECTION END-OF-FORMAT 5 P* 5 PCOR498 5 & P MOVE DEBINW2,W4 SIMULATE TOT-KEY 5 PCOR499 5 P
0x19cae0…19cc74 (1, 287) Dummy {f00=0x007b, f01=0x4052, f02=»FORMF FRMT 5 P FTEXT ' 1' 6 P FMEND 6 & P PEND 6 4 END 6 B@ 6 N
0x19cc74…19ce08 Dummy {f00=0x007b, f01=0x2008, f02=» 7 PDIV ENTRY DEFDSC PROGRAM-START * > INCLUDE DEKEYS,LIST H EJECT d DEFDSC PROC r RET PEND END @ * * * * * -OUTPUT: * * *
0x19ce08…19cf9c Dummy {f00=0x007b, f01=0x0190, f02=»/ !T; 6 MMMMMM~~MM~~MW|Iiy ! %n h / !T ,JWX ! %P h / ! 6 3 W1Ak_+ !" %% h / !T , W Hk ! c % c c _ & !? 0 %% 3? !6 (DTdt_ * ? + ? ,< j ! ! 4 @iW Ai? P ! 5 ? A W @ ! 7 A ? @ ?
0x19cf9c…19d130 Dummy {f00=0x007b, f01=0x0190, f02=»% <09 ,08 , $ ? r8 ( 2 0< 'h #Q !j , w j 1!w!Ii j 2! ! !j "" j $" mHj -P !2 _ &{ { )P !Ix 6 * ? &{ { *P !2 _ ({ P !2 _ -P !2 _ { + Ii 09 {$* p!0
0x19d130…19d2c4 Dummy {f00=0x007b, f01=0x0190, f02=»!* & & & ! 1 0 "}H{ Ij 0 !6 H" W 09 {$*0 P _4 0 "}_? 1 !6 TT _P - PJ !6 ??_&Aj p! u # $ j $!! {1j #!! {2 $ #? &{ @jP { &{ W &{ @jP H{ m *" ! I{ ? % & 4 0# 6 55 555555555W 'I ( W Ij I }I
0x19d2c4…19d458 Dummy {f00=0x007b, f01=0x0190, f02=» ' 0" (T W $0$ "W 0$ 4 u C o 4 7 ! i 8 G r U 1 ' v *CFNYGETUSERBALANCE P 'g @ U 20 # - , )
0x19d458…19d5ec Dummy {f00=0x007b, f01=0x0190, f02=» 0 7 Q ( ` ` H{ Ij 0 !6 H" W 09 {$*0 P _4 0 "}_? 1 !6 TT _P - PJ !6 ??_&Aj p! u # $ j $!! {1j #!! {2 $ #? &{ @jP { &{ W &{ @jP H{ m *" ! I{ ? % & 4 0# 6 55 555555555W 'I ( W Ij I }I
0x19d5ec…19d780 Dummy {f00=0x007b, f01=0x0190, f02=» > 2 6 :@g0 0} { 1 An@ An2 _ 0 0}@n_ 6 5 ? Ag@ij !m ) 2 AiW 09 {$* p!0 AnP 0 ! 0$ 1 2 _Q 1W XT 8 2 Jgwjm & {!_: 2 _ ({ P _ &! 1 2 -P 7 nn &{ _ 0 0}AjA{ p! u IiL
0x19d780…19d914 (1, 288) Opaque[0x194]
0x19d914…19daa8 # DirEnt {nam=»DE24ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0f80, f03=0x0000}
0x19d914…19daa8 IdxSect {
0x19d914…19daa8 f00 = 0x007c // 0x19d914 @0x0
0x19d914…19daa8 f01 = 0x0004 // 0x19d916 @0x2
0x19d914…19daa8 gno = [ // 0x19d918 @0x4
0x19d914…19daa8 [0x00]: C0x007c.0x0.0
0x19d914…19daa8 [0x01]: C0x007c.0x1.0
0x19d914…19daa8 ]
0x19d914…19daa8 }
0x19daa8…19dc3c Dummy {f00=0x007c, f01=0x0190, f02=» $ P IDENT DE24ST REL 10.0 80-04-11 P 79-12-14/JAER , P* D 2 P* THIS FORMAT PROCESS FOLLOWING FUNTION N P* - COPY OF FORMAT P* L P************************************************************************ DDUM DE
0x19dc3c…19ddd0 Dummy {f00=0x007c, f01=0x0190, f02=» EXT DEDISC DISC-ROUTINE P EXT DERROR ERROR-MESSAGES * P EXT RESTOR RESTORE ORIG.-DESC-POINTER B ( P EXT DEPOOL BUFFERRESERVATION-MODUL p P EXT FEDIT ( P EXT ATTDB ATTACH FORMAT-DESCRIPTOR P INCLUDE DEKEYS,LIST EJECT *
0x19ddd0…19df64 Dummy {f00=0x007c, f01=0x0190, f02=» P* P EJECT PDE24ST PROC PDEST24 0 : P CALL RESTOR,W0,W16,PWBDB4 RESTOR ORIG.-DESC.-POINTER > P MOVE PINDFR,W0 | P ATTFMT F24CF $ P SET DEPROMPT PROMTTEXT-DISPLAY PDE24CA " P PERF DECLRA DATA-ENTRY-SCREEN PDE
0x19df64…19e0f8 Dummy {f00=0x007c, f01=0x0190, f02=»CANCEL P CLEAR DEPROMPT P B DE24CA & PERROR 8 P PERF DERROR,DEKTAB6 F P IB DEBINW2,CHANGE,DEST24 b P B RELRET P EJECT P* $ P* LOCK FORMAT IN BUFFERS P* & P* DUPL = FORMAT TO BE COPIED
0x19e0f8…19e28c Dummy {f00=0x007c, f01=0x0190, f02=»JUMP IF NOT OK P MOVE STRG10A,='F' 6 P XCOPY STRG10A,W1,W6,DUPL,W0 LOAD OLD FORMAT NAME 0 6 P CALL ATTDB,BPOOL(PINDFR),W4,W10 ATTACH DESCRIPTOR j 4 P MOVE ELMNO,FLIND(W1) STORE FORMATBUFFER-POINTER . P ATTFMT BPOOL(ELMNO) ATTACH DEFINED FORMAT
0x19e28c…19e420 Dummy {f00=0x007c, f01=0x0190, f02=»RSOR ON LAST FIELD p 0 P MOVE DEBINW4,=W'30' PRESS ENTER TO CONFIRM' P PERF DERROR,DEKTAB7 N $ P IB DEBINW2,CHAN20,CHAN20,RELRET j PCHAN10 4 P PERF DEPOOL,W8,PINDFR,BIN16,STRG10A FORMAT LOCK P BNOK CHERR 6 P XCOPY STRG10A,W1,W6,FORMAT,
0x19e420…19e5b4 (1, 289) Dummy {f00=0x007c, f01=0x018e, f02=» BERR CHERR P PERF DERROR,DEKTAB6 P B RELRET 0 PCHERR B P PERF DERROR,DEKTAB6 P P IB DEBINW2,CHAN10,CHAN20 l P B RELRET PCHAN20 8 P PERF DEPOOL,W6,PINDFR,BIN16,STRG10A RELEASE BUFFERS P B DEST24 P EJECT
0x19e5b4…19e748 Dummy {f00=0x007c, f01=0x0190, f02=» P RET PEND P EJECT PF24CF FRMT , P FSL > P FTEXT '24 COPY ' J P FCOPY ='FORMAT' d P FNL | P FCOPY ='FORMAT' P FTEXT ' TO BE COPIED:' 6 P FKI 21,APPL=113,MINL=1,MAXL=6,ALPHA,NEOI,ME,NCLR P FCOPY DUPL
0x19e748…19e8dc Dummy {f00=0x007c, f01=0x406e, f02=»CLR b P FCOPY FORMAT P FNL " P FKI 1 . P FCOPY HEX00 < P FMEND P END ^@ jORMAT' d P FNL | P FCOPY ='FORMAT' P FTEXT ' TO BE COPIED:' 6 P FKI 21,APPL=113,MINL=1,MAXL=6,ALPHA,NEOI,ME,NCLR P FCOPY DUPL
0x19e8dc…19ea70 Dummy {f00=0x007c, f01=0x2008, f02=»
0x19ea70…19ec04 Dummy {f00=0x007c, f01=0x0190, f02=» a =h% % P ! T ZLABN , BINDEC < ZVALUE N BINHEX ` , ( X( r ZCLASS ZREFER , ( FORMAT '@ b UNUSED , ( _p ! P
0x19ec04…19ed98 Dummy {f00=0x007c, f01=0x4026, f02=» R P t @ " ZLABN , BINDEC < ZVALUE N BINHEX ` , ( X( r ZCLASS ZREFER , ( FORMAT '@ b UNUSED , ( _p ! P
0x19ed98…19ef2c Dummy {f00=0x007c, f01=0x4180, f02=» IDENT MAP3 MAP3Y " MAP3Y 2 CURPRT D BLANK V TRANSF f LISTN x MODLG , ( A @ 0 = # * & D @ bLCV Z
0x19ef2c…19f0c0 Dummy {f00=0x007c, f01=0x40fe, f02=» IDENT MAP4 MAP4Y " MAP4Y 2 LSTSTA D LSTNN V LSTECB f , ( P W _ _ W : x IOERR H V W W $ @ @
0x19f0c0…19f254 (1, 290) Opaque[0x194]
0x19f254…19f3e8 # DirEnt {nam=»DEPOOL«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0f90, f03=0x0000}
0x19f254…19f3e8 IdxSect {
0x19f254…19f3e8 f00 = 0x007c // 0x19f254 @0x0
0x19f254…19f3e8 f01 = 0x0010 // 0x19f256 @0x2
0x19f254…19f3e8 gno = [ // 0x19f258 @0x4
0x19f254…19f3e8 [0x00]: C0x007c.0x2.0
0x19f254…19f3e8 [0x01]: C0x007c.0x3.0
0x19f254…19f3e8 [0x02]: C0x007d.0x0.0
0x19f254…19f3e8 [0x03]: C0x007d.0x1.0
0x19f254…19f3e8 [0x04]: C0x007d.0x2.0
0x19f254…19f3e8 [0x05]: C0x007d.0x3.0
0x19f254…19f3e8 [0x06]: C0x007e.0x0.0
0x19f254…19f3e8 [0x07]: C0x007e.0x1.0
0x19f254…19f3e8 ]
0x19f254…19f3e8 }
0x19f3e8…19f57c Dummy {f00=0x007c, f01=0x0190, f02=» $ P IDENT DEPOOL REL 10.0 80-04-11 P 80-03-26/DALI , DDUM DEDDIV D @ <************************************************************ X @ <* THIS PROCEDURE HANDLES POOLING FUNCTIONS. THE CALLING * @ <* SEQUENCE AND THE FORMAL PARAMETERS ARE
0x19f57c…19f710 Dummy {f00=0x007c, f01=0x0190, f02=»FF2>,<KEY> * h @ <* * @ <************************************************************ ` P* : P* FOLLOWING DATA ITEMS ARE USED BY THE DEPOOL ROUTINES . P* AND ORIGINATE CONTENTS OF
0x19f710…19f8a4 Dummy {f00=0x007c, f01=0x0190, f02=» BIN15 P* BIN16 P* DEBINW3 , P* DEBINW4 F P* POOL1 ` P* STR1A x P* STR64A P* @ <************************************************************ P EJECT @ <****
0x19f8a4…19fa38 Dummy {f00=0x007c, f01=0x0190, f02=» THE RETURNED BUFFERS ARE FREE FOR USE : =* BY ANY TASK FOR THE SAME PURPOSES. 6 < 8* THE COUNTER OF THE PASSED BUFFERCHAIN t $ P* IS SET TO 1. * =* PASSED PARAMETERS: 6
0x19fa38…19fbcc Dummy {f00=0x007c, f01=0x018e, f02=» RETURNED PARAMETERS: > 9* <BUFF1> = POOLINDEX TO THE FIRST RESERVED BUFFER $ ( P* IF NO BUFFERS = 0 f * @ <************************************************************ * , (* <FC> = 2 GET BUFFERS
0x19fbcc…19fd60 Dummy {f00=0x007c, f01=0x0190, f02=» X < 8* THE COUNTER OF THE PASSED BUFFERCHAIN $ P* IS SET TO 1. H * =* PASSED PARAMETERS: p 6 P* <BUFF1> = TOTAL NUMBER OF WANTED BUFFERS < >* <BUFF2> = NUMBER OF WANTED CONSECUTIVE
0x19fd60…19fef4 (1, 291) Dummy {f00=0x007c, f01=0x0190, f02=» IF NO BUFFERS = 0 * & @ <************************************************************ 0 P EJECT t @ <************************************************************ * $ * <FC> = 3 CHAIN BUFFERS : 6*
0x19fef4…1a0088 Dummy {f00=0x007c, f01=0x0190, f02=»D BUFFERS f $ P* IS SET TO 1. * 3* PASSED PARAMETERS: : 6 P* <BUFF1> = TOTAL NUMBER OF WANTED BUFFERS h 8 P* <BUFF2> = POOLINDEX TO THE RESERVED BUFFER B P* IN THE CHAIN AFTER WHIC
0x1a0088…1a021c Dummy {f00=0x007c, f01=0x0190, f02=» = POOLINDEX TO THE ADDED BUFFER. ( P* IF NO BUFFERS = 0 * > P* <BUFF2> = POOLINDEX TO THE FIRST RESERVED BUFFER V $ * IN THE CHAIN * @ <************************************************************
0x1a021c…1a03b0 Dummy {f00=0x007c, f01=0x0190, f02=»* THE NAME AND THE TYPE > :* OF THE USER IS PUT INTO THE POOLELEMENT 0 < 8* THE COUNTER OF THE PASSED BUFFERCHAIN r . P* WILL NOT BE INCREASED . * %* PASSED PARAMETERS
0x1a03b0…1a0544 Dummy {f00=0x007c, f01=0x0190, f02=»AME. THE NAME IS STRG7 VARIABEL CONSISTING | < 8* OF A STRG1 TYPE AND STRG6 NAME. 2 0 ,* RETURNED PARAMETERS: NONE r * @ <************************************************************ P EJECT @ <******
0x1a0544…1a06d8 Dummy {f00=0x007c, f01=0x0190, f02=»UFFERPOOL IS SEARCHED FOR A POOL- x : 5* ELEMENT OF THE SAME NAME AND TYPE. * < 8* THE COUNTER OF THE PASSED BUFFERCHAIN h * P* IS INCREASED BY 1. > P* IF THE SEARCHED BUFFER IS FOUND
0x1a06d8…1a086c Dummy {f00=0x007c, f01=0x0190, f02=»1>,<BUFF2> = USED FOR RETURNVALUES B >* <KEY> = NAME. THE NAME IS STRG7 VARIABEL CONSISTING * < 8* OF A STRG1 TYPE AND STRG6 NAME. p , '* RETURNED PARAMETERS: @ ;* <BUFF1> = POOLINDEX TO THE BUFF
0x1a086c…1a0a00 Dummy {f00=0x007c, f01=0x0190, f02=» 4 P* 2 = FOUND LOCKED 0 P* 0 = NOT FOUND < * p @ <************************************************************ z P EJECT @ <************************************************************
0x1a0a00…1a0b94 (1, 292) Dummy {f00=0x007d, f01=0x0190, f02=» IF THE COUNTER AFTERWARDS IS 0, THE > P* BUFFER IS PUT ON LRUQUE IF IT WAS FREE. 4 8 P* IF IT WAS LOCKED IT BECOMES FREE v 8 P* IMMEDIATLY AND IS NOT PUT ON THE & P* LRUQUE
0x1a0b94…1a0d28 Dummy {f00=0x007d, f01=0x0190, f02=» IN THE CHAIN , '* RETURNED PARAMETERS: P* <BUFF1> = SET TO 0 P * t @ <************************************************************ ~ P EJECT @ <********************************************************
0x1a0d28…1a0ebc Dummy {f00=0x007d, f01=0x0190, f02=» ELEMENT OF THE SAME NAME AND TYPE. < 8* THE COUNTER OF THE PASSED BUFFERCHAIN 2 . P* WILL NOT BE INCREASED . r * %* PASSED PARAMETERS: 4 0* <BUFF1>,<BUFF2> = USED FOR RETURNVALUES B
0x1a0ebc…1a1050 Dummy {f00=0x007d, f01=0x0190, f02=»* RETURNED PARAMETERS: @ ;* <BUFF1> = POOLINDEX TO THE BUFFER THAT MATCHED THE 0 6 P* TYPE AND NAME. IF NOT FOUND = 0 t 2 P* <BUFF2> = RETURNCODE. 1 = FOUND FREE 4 P* 2 = F
0x1a1050…1a11e4 Dummy {f00=0x007d, f01=0x0190, f02=»****** Z P EJECT @ <************************************************************ * ` $ P* <FC> = 8 LOCK BUFFERS j : 6* THE RETURNED BUFFERS ARE LOCKED AND > P* RESERVED FOR USE ONLY BY THIS TASK ON
0x1a11e4…1a1378 Dummy {f00=0x007d, f01=0x018e, f02=»OUNTER OF THE PASSED BUFFERCHAIN x . P* WILL NOT BE INCREASED . ( * %* PASSED PARAMETERS: Z > 9* <BUFF1> = POOLINDEX TO THE FIRST RESERVED BUFFER $ * IN THE CHAIN * @ <************
0x1a1378…1a150c Dummy {f00=0x007d, f01=0x0190, f02=» * " P* <FC> = 9 SCAN BUFFER < P* THE BUFFERPOOL IS SCANNED FOR A POOL- 4 , P* ELEMENTCONSISTING OF. t < 8* THE COUNTER OF THE PASSED BUFFERCHAIN . P* WILL NOT BE INCRE
0x1a150c…1a16a0 Dummy {f00=0x007d, f01=0x0190, f02=»AME. THE NAME IS STRG7 VARIABEL CONSISTING | < 8* OF A STRG1 TYPE AND STRG6 NAME. 2 , '* RETURNED PARAMETERS: r @ ;* <BUFF1> = POOLINDEX TO THE BUFFER THAT MATCHED THE 6 P* TYPE AND NAME.
0x1a16a0…1a1834 (1, 293) Dummy {f00=0x007d, f01=0x0190, f02=» 0 = NOT FOUND * 2 @ <************************************************************ < P EJECT @ <************************************************************ * $ P* <FC> = 10 SET BUFFERS 6 P*
0x1a1834…1a19c8 Dummy {f00=0x007d, f01=0x0190, f02=» THE COUNTER OF THE PASSED BUFFERCHAIN . P* WILL NOT BE INCREASED . 0 * %* PASSED PARAMETERS: b > 9* <BUFF1> = POOLINDEX TO THE FIRST RESERVED BUFFER $ * IN THE CHAIN B >* <KEY>
0x1a19c8…1a1b5c Dummy {f00=0x007d, f01=0x0190, f02=» RETURNED PARAMETERS: NONE * $ @ <************************************************************ . P* r & P* <FC> = 11 RELEASE BUFFER | 6 P* THE CHAINLINKS FOR THE BUFFERS 4 P* ON DISK ARE CLEARED
0x1a1b5c…1a1cf0 Dummy {f00=0x007d, f01=0x018e, f02=» PASSED PARAMETERS: > 9* <BUFF1> = POOLINDEX TO THE FIRST RESERVED BUFFER " $ * IN THE CHAIN d * @ <************************************************************ PDIV ENTRY DEPOOL P EXT SETB
0x1a1cf0…1a1e84 Dummy {f00=0x007d, f01=0x0190, f02=» P CLEAR POOL1 P IB FC C P DEPO1 C * P DEPO1 C < P DEPO3 C N P DEPO4 C ` P DEPO5 C r P DEPO6 C P DEPO5 C P DEPO8 C P DEPO5 C P DEPO4 C P DEPO6 FC=11 P EJECT PDEPO1
0x1a1e84…1a2018 Dummy {f00=0x007d, f01=0x0190, f02=» FOR CONSECUTIVES z PDEPO3 & P MOVE BIN15,W1 STARTINDEX IN POOL ( PDEPO11 R . P MOVE STR64A,HEX00 DROP TEMPORARY RESERVED ` PDEPO12 . P MOVE STR1A,RPOOL(BIN15) GET FILETYPE CODE PDEPO13 0 P CBE STR1A,=C'X',DEPO18 JUMP IF FREE BUF
0x1a2018…1a21ac Dummy {f00=0x007d, f01=0x0190, f02=»15,BPOOL(W1) $ P BNOK DEPO16 JUMP IF LAST BUFFER PDEPO15 < . P TBF POOL1,DEPO12 JUMP IF NOT CONSECUTIVE J . P ADD BUFF1,BIN16 ADJUST REQUESTED BUFFERS | . P MOVE BIN16,W0 SET NUMBER OF CONSECUTIVE=0 P REQUESTED P B DEPO11 ( PDE
0x1a21ac…1a2340 Dummy {f00=0x007d, f01=0x0190, f02=» POOL1,DEPO17 JUMP IF CONSEC REQ ( P MOVE BIN15,W1 START FROM BEGINNING ( P B DEPO12 T PDEPO17 f . P ADD BUFF1,BIN16 ADJUST REQUESTED BUFFERS t P B DEPO05 P EJECT P* P* HANDLE FREE BUFFERS P* PDEPO18 P X
0x1a2340…1a24d4 (1, 294) Dummy {f00=0x007d, f01=0x0190, f02=»L1,DEPO19 JUMP IF NOT CONSECUTVE P ADD BIN16,W1 REQUESTED ( 2 P CBNE BUFF2,BIN16,DEPO19 JUMP IF NOT NUMBER OF H $ P REQUESTED CONSECUTVES REACHED ~ P CLEAR POOL1 PDEPO19 & P MOVE DEBINW3,W0 RESERV TEMPORARY * P MATCH STR64A,DEBINW3,
0x1a24d4…1a2668 Dummy {f00=0x007d, f01=0x0190, f02=» JUMP IF ENOUGH BUFFERS P ADD BIN15,W1 P CALL CMPIND,BIN15,BPOOL(W1) 6 P BNOK DEPO16 Z P B DEPO12 CONTINUE n PDEPO20 P MOVE BUFF1,BUFF2 * P PERF DEPORE,BUFF1,FC RESERV PERMANENT P B DEPOOK P EJECT PDEPO4
0x1a2668…1a27fc Dummy {f00=0x007d, f01=0x0190, f02=» IF MORE THAN ONE USER t $ P XCOPY RPOOL(BUFF1),W1,W6,KEY,W1 P XCOPY DEBINW3,W1,W1,KEY,W0 F 0 P CBNE FC,W10,DEPO41 JUMP IF NOT ACCUMULATORS j & P XCOPY RPOOL(BUFF1),W11,W6,KEY,W7 PDEPO41 ( P XCOPY DEBINW4,W1,W1,RPOOL(BUFF1),W0 $ P CBE D
0x1a27fc…1a2990 Dummy {f00=0x007d, f01=0x0190, f02=» RPOOL(BUFF1),W0,W1,DEBINW3,W1 PDEP430 MOVE STR1A,KEY ! & * P CBE STR1A,=C'F',DEP440 HANDLE FORMATS ! D P B DEPOOK ! r & PDEP440 STORE THE RECORDLENGTH OF ! 8 P XCOPY RECLNTH,W0,W2,BPOOL(BUFF1),W4 THE DATARECORD ! * P MOVE BIN15,W0 GET THE TOTAL N
0x1a2990…1a2b24 Dummy {f00=0x007d, f01=0x018e, f02=»OL(BUFF1),W18 DESCRIPTORRECORDS ! z & P MOVE DEBINW4,BUFF1 START OF CHAIN " ( . P CBE BIN16,W0,DEP470 JUMP IF NO DESCRIPTOR " R ( P SUB BIN15,BIN16 JUST FORMATRECORDS " PDEP450 MOVE DEBINW3,DEBINW4 " < P XCOPY DEBINW4,W1,W1,RPOOL(DEBINW3),W8 GET LINK TO N
0x1a2b24…1a2cb8 Dummy {f00=0x007d, f01=0x018e, f02=» ( PDEP475 ADD BIN16,W1 SET FLINK INDEX # P MOVE FLIND(BIN16),DEBINW4 # 0 PDEP480 SUB BIN15,W1 # R ( P BNZ DEP450 JUMP IF MORE FORMATRECS. # n P B DEPOOK # P EJECT # PDEPO5 # P MOVE BUFF2,W0 # P MOVE DEBINW3,W1 # P MOVE STR1A,KEY #
0x1a2cb8…1a2e4c Dummy {f00=0x007d, f01=0x0190, f02=» PDEPO52 $ P ADD DEBINW3,W1 $ " P CALL CMPIND,DEBINW3,BPOOL(W1) $ * $ P BNOK DEPON9 JUMP IF LAST INDEX $ P P B DEPO51 $ x PDEPO53 $ 0 P CBNE FC,W9,DEPO58 JUMP IF NOT ACCUMULATORS $ P MOVE BIN15,W11 $ , P MATCH RPOOL(DEBINW3),BIN15,W6,KEY,W
0x1a2e4c…1a2fe0 Dummy {f00=0x007d, f01=0x0190, f02=» MOVE BUFF2,W1 $ P B DEPO55 % PDEPO54 % ( P MOVE BIN15,W0 % 6 . P MATCH RPOOL(DEBINW3),BIN15,W1,STR1A,W0,W1 % L P BERR DEPO52 % ~ P MOVE BUFF2,W2 % PDEPO55 % P CBNE STR1A,=X'D4',DEP565 % P JUMP IF NOT VALUESET % $ P CBE ELMNO,W0,DE
0x1a2fe0…1a3174 (1, 295) Dummy {f00=0x007d, f01=0x0190, f02=»8 % l P CBL ELMNO,BIN15,DEP560 & P CBNG ELMNO,BIN16,DEP565 & * PDEP560 & J P MOVE BUFF2,W0 & X P B DEPO52 & n PDEP565 & P MOVE BUFF1,DEBINW3 & P CBE BUFF2,W2,DEP570 & $ P CBE FC,W5,DEPO59 JUMP IF SEARCH & PDEP570 & P B DEPOOK JU
0x1a3174…1a3308 Dummy {f00=0x007d, f01=0x0190, f02=»6 JUMP IF START OF CHAIN & P SET POOL1 ALREADY HANDLED. ' , P CBNE DEBINW4,W0,DEPO56 JUMP IF NOT = 0 ' D P XCOPY STR1A,W0,W1,BIN15,W1 ' t & P CALL GETIND,LRUQUE,BIN16,DEBINW3 ' P MOVE DEBINW3,W0 ' < P MATCH LRUQUE,DEBINW3,BIN16,STR1A,W0,W1 LOOK F
0x1a3308…1a349c Dummy {f00=0x007d, f01=0x0190, f02=»0 ' r PDEPO56 ( P ADD DEBINW4,W1 ( 6 P XCOPY RPOOL(BIN15),W7,W1,DEBINW4,W1 STORE COUNTER ( 0 : P XCOPY DEBINW3,W1,W1,RPOOL(BIN15),W8 GET LINK TO NEXT ( j . P CBE DEBINW3,W0,DEPOOK JUMP IF LAST BUFFER ( P B DEPO59 ( P EJECT ( PDEPO6 ( P
0x1a349c…1a3630 Dummy {f00=0x007d, f01=0x0190, f02=»6 MAKE AN IDLE-LOOP ( ~ PDEPO61 ) P CBNE FC,W11,DEP610 ) * P MOVE STR64A,HEX00 ) F P B DEP660 ) ` PDEP610 ) r 4 P XCOPY DEBINW4,W1,W1,RPOOL(BIN15),W7 GET COUNTER ) $ P SUB DEBINW4,W1 DECREASE COUNTER ) P BG DEPO62 ) & P MOVE STR1A,RPOOL(BIN1
0x1a3630…1a37c4 Dummy {f00=0x007d, f01=0x0190, f02=»SET ) r PDEP620 * P MOVE STR1A,=C'X' * & P COPY RPOOL(BIN15),W0,W1,STR1A,W0 * 4 P B DEPO62 * ^ PDEP630 * p & P CALL GETIND,LRUQUE,BIN16,DEBINW3 * ~ P MOVE DEBINW3,W0 * @ P MATCH LRUQUE,DEBINW3,BIN16,HEX00,W0,W1 LOOK FOR EMPTY PLACE * P BOK
0x1a37c4…1a3958 Dummy {f00=0x007d, f01=0x018e, f02=»6),W0,W1,STR1A,W0 * P DLETE LRUQUE,W0,W1 + P SUB DEBINW3,W1 + 6 PDEP640 + N P SET POOL1 ALREADY HANDLED. + P XCOPY STR1A,W0,W1,BIN15,W1 + & P INSRT LRUQUE,DEBINW3,W1,STR1A,W0 + PDEPO62 + 6 P XCOPY RPOOL(BIN15),W7,W1,DEBINW4,W1 STORE C
0x1a3958…1a3aec Dummy {f00=0x007d, f01=0x0190, f02=» + j PDEP680 , P MOVE BIN15,BIN16 , P CBNE BIN15,W0,DEPO61 , 0 P MOVE BUFF1,W0 , N PDEP690 , d P B DEPOOK , r P EJECT , PDEPO8 MOVE DEBINW4,W0 , 4 P XCOPY DEBINW4,W1,W1,RPOOL(BUFF1),W7 GET COUNTER , 2 P CBNE DEBINW4,W1,DEPON11 JUMP IF
0x1a3aec…1a3c80 Dummy {f00=0x007d, f01=0x0190, f02=»BINW4,W1 , t P B DEPOOK - P EJECT - " P* - 0 P* BAD RESULT - : P* - N PDEPON9 MOVE DEBINW4,W9 - X P B DEPONO - v PDEPON11 MOVE DEBINW4,W11 - " P MOVE STR6B,='FTJB' FUNCTIONS - ( P XCOPY STR1A,W0,W1,KEY,W0 CHECK FUNC - P MOVE BIN16,W0
0x1a3c80…1a3e14 (1, 296) Dummy {f00=0x007e, f01=0x0190, f02=» B DEPON20 - PDEPON13 MOVE DEBINW4,W13 . PDEPONO . 2 P MOVE BUFF1,W0 . @ PDEPON20 . V P CMP W1,W2 . f P RET . x P* . P* BUFFERS FOUND . P* . PDEPOOK . P MOVE DEBINW4,W0 . P CMP W1,W1 . RET . PEND . P EJECT
0x1a3e14…1a3fa8 Dummy {f00=0x007e, f01=0x0190, f02=»THE CALLING SEQUENCE IS: . P* PERF DELRUF / P* / > > P********************************************************* / H PDELRUF PROC / P MOVE DEBINW4,W0 / : P XCOPY DEBINW4,W1,W1,LRUQUE,W0 GET INDEX TO THE FIRST / P BUFFER IN LRUQUE
0x1a3fa8…1a413c Dummy {f00=0x007e, f01=0x018e, f02=»DEBINW3,W0 / P MOVE STR1A,=C'X' FREE-MARK 0 PDEL11 0 6 ( P XCOPY RPOOL(DEBINW4),W0,W1,STR1A,W0 0 D < P XCOPY DEBINW3,W1,W1,RPOOL(DEBINW4),W8 GET LINK TO NEXT 0 p * P CBE DEBINW3,W0,DEL12 JUMP IF LINK = 0 0 2 P XCOPY RPOOL(DEBINW4),W8,W1,W0,W1 SET LINK
0x1a413c…1a42d0 Dummy {f00=0x007e, f01=0x0190, f02=» 0 b ( P CALL GETIND,LRUQUE,DEBINW3,DEBINW4 1 P SUB DEBINW3,W1 1 4 & P XCOPY LRUQUE,DEBINW3,W1,HEX00,W0 1 L P CMP W1,W1 1 v P RET 1 P PEND 1 P EJECT 1 8 P**************************************************** 1 2 P* THIS PROCEDURE RESERV THE
0x1a42d0…1a4464 Dummy {f00=0x007e, f01=0x0190, f02=»ORE,<WBIN>,<FC> 1 ~ P* 2 & P* RETURNED PARAMETER: 2 " 6 P* <WBIN> = POOLINDEX TO THE FIRST RESERVED 2 L & P* BUFFER IN RPOOL. 2 8 P**************************************************** 2 PDEPORE PROC WBIN,FC 2 P
0x1a4464…1a45f8 Dummy {f00=0x007e, f01=0x0190, f02=» DEO1B 2 PDEO1 3 * P MOVE STR1A,HEX00 BUFFER WITHOUT LOCK 3 PDEO1B 3 H P MOVE WBIN,W0 3 V 0 P XCOPY WBIN,W1,W1,STR64A,W0 GET FIRST BUFFER 3 l P B DEO3B 3 PDEO3 3 P MOVE STR1A,RPOOL(WBIN) 3 & P XCOPY BIN15,W1,W1,RPOOL(WBIN),W8 3 P B
0x1a45f8…1a478c Dummy {f00=0x007e, f01=0x0190, f02=»,W7,W1,W1,W1 SET COUNTER TO 1 3 ~ * P ADD DEBINW3,W1 POINTER TO NEXT INDEX 4 & PDEO3C 4 T 6 P XCOPY DEBINW4,W1,W1,STR64A,DEBINW3 GET NEXT INDEX 4 b 0 P CBE DEBINW4,W0,DE04 JUMP IF NO MORE BUFFERS 4 8 P XCOPY RPOOL(WBIN),W8,W1,STR64A,DEBINW3 LINK TO NEXT 4
0x1a478c…1a4920 Dummy {f00=0x007e, f01=0x40c4, f02=»COPY RPOOL(WBIN),W8,W1,BIN15,W1 4 PDEPO90 5 ( 8 P XCOPY WBIN,W1,W1,STR64A,W0 RETURN FIRST BUFFERINDEX 5 6 P RET 5 r P PEND 5 ~ P END 5 PTRA /S 5 EJECT 5 END 5 @ 5 FERS 4 8 P XCOPY RPOOL(WBIN),W8,W1,STR64A,DEBINW3 LINK TO NEXT 4
0x1a4920…1a4ab4 (1, 297) Dummy {f00=0x007e, f01=0x2008, f02=» 6 : 6* IF THE COUNTER AFTERWARDS IS 0, THE , '* BUFFER IS MADE FREE. J 0 +* PARAMETERS: SEE <FC> = 3 z * @ ;*********************************************************** EJECT
0x1a4ab4…1a4c48 Dummy {f00=0x007e, f01=0x403a, f02=» $@ 6 ' ; @ > > 8 * & E 2 G f " c P a > 4 " * & y " * & A 8
0x1a4c48…1a4ddc Dummy {f00=0x007e, f01=0x4014, f02=» HNOD @ @ . * & E 2 G J " c P a > 4 " x * & y " DELAST * & A 8 *
0x1a4ddc…1a4f70 Dummy {f00=0x007e, f01=0x0190, f02=» IDENT P:S024 < " * & @h0E ! P # ( + ? 09 < AhW @ * & - %hZ ( !< % (R ! j n * & K !! ! ( $ 2hZ ! !T * & i !j !! W % 2 !X b ! * & U
0x1a4f70…1a5104 Dummy {f00=0x007e, f01=0x0190, f02=»T 0* V f 0" * & T(00 P 0* h P W ! * & ! 0+ 0 06 #@hT A !!4 N * & ; ! 4 ! U 6 _l; | * & Y 2*0! !T Wo0 "T j !! !b * & w Wp Wj Wb Sf !W * &
0x1a5104…1a5298 Dummy {f00=0x007e, f01=0x0190, f02=» !!4 !"4 80 11 / 6 * & ''' ' y ''' "W% ," " . * & + 0 We0F W "_ '_ !0 * & I F ! 2 W 0 0 (P" * & g &W:6 33 33 333 36 # * & W(11 _ !02 _ 11 W 0
0x1a5298…1a542c Dummy {f00=0x007e, f01=0x0190, f02=» 0 p * & C P j !!!WP U00 P m ( * & &W 0) = b !Z/h U ! !Q < * & 9 !4 !03@ T 0% j %! !01 j * & W ! 0F ( ! 6 cv6 * & u C & 4 W 1W 2 * & 00 P " "Jh
0x1a542c…1a55c0 Dummy {f00=0x007e, f01=0x018e, f02=» 0* 00 O _U ~ "4 #4 $4 * & 3 : @ r Z < 9 j * & = 8 H = ~ * & [ P+-?T BATCHNUMBERRECORDCON * & y FIRM VALUESETSYMBOLIC: XTTTT9 * &
0x1a55c0…1a5754 (1, 298) Opaque[0x194]
0x1a5754…1a58e8 # DirEnt {nam=»CDVASM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0fd0, f03=0x0000}
0x1a5754…1a58e8 IdxSect {
0x1a5754…1a58e8 f00 = 0x007e // 0x1a5754 @0x0
0x1a5754…1a58e8 f01 = 0x0004 // 0x1a5756 @0x2
0x1a5754…1a58e8 gno = [ // 0x1a5758 @0x4
0x1a5754…1a58e8 [0x00]: C0x007e.0x2.0
0x1a5754…1a58e8 [0x01]: C0x007e.0x3.0
0x1a5754…1a58e8 ]
0x1a5754…1a58e8 }
0x1a58e8…1a5a7c Dummy {f00=0x007e, f01=0x0190, f02=» P IDENT CDVASM P* P* $ P* BANKDATA APPLICATION . P* L P* V P* ` " P* CHECK CDV ON ITEM IN INPBUF j P EJECT P* P* USE OF REGISTERS P* REGISTER USE " P* A5 POINTER TO INPBUF (INDEX) P* A2 A
0x1a5a7c…1a5c10 Dummy {f00=0x007e, f01=0x0190, f02=» FOR MULTIPLY & P* A7 LIMIT FOR DIGITSUM IN CDV-10 P* @ P* J P* T P* PARAMETERS FOR CDV ^ : P* AREA USE CONTENT AT CDVEL0 CDVEL1 CDVTEN | 6 P* A1 MAX FOR RESTART OF WEIGHT 10 10 2 6 P* A7 LIMIT FOR DIGIT
0x1a5c10…1a5da4 Dummy {f00=0x007e, f01=0x0190, f02=»11 11 10 l P* P* " P* CALLING SEQUENSE , P* N . P* CALL CDV0N,PARAM *CDV10 TEST X P* . P* CALL CDV1N,PARAM *CDV11 TEST P* 6 P* CALL CDV1S,PARAM *CDV11 TEST SPECIAL
0x1a5da4…1a5f38 Dummy {f00=0x007e, f01=0x0190, f02=»RY CDV0N P ENTRY CDV1N P ENTRY CDV1S $ P ENTRY CDVSUB 8 P ENTRY CHANFC N P EXTRN T:FDSP d P EXTRN I:EVA0 z P EXTRN I:RT1 P* 0 P* HERE IS JOINED COMMON PART OF ALL MODULES P* P NLIST P LIST P
0x1a5f38…1a60cc Dummy {f00=0x007e, f01=0x0190, f02=»T CHECK VALUE FOR TOTAL P LDK A1,10 P LDK A7,10 4 P RF CDV20 F P* X P* b " PCDV1S LDK A5,1 FOR GOTABANKEN l * P ST A5,WBASE RESTART VALUE FOR WEIGHT P RB CDV10 P* P* PWBASE DATA 0 PWDIV DATA 0
0x1a60cc…1a6260 Dummy {f00=0x007e, f01=0x018e, f02=» p P ST A5,WDIV P LDK A1,2 P LDK A7,4 . P* @ & PCDV20 CF A14,I:EVA0 GET PARAM ADDR J P LDK A2,1 t P SUK A5,1 P LDK A3,0 ZERO TO SUM P* PCDV30 LCR A4,A5 FETCH CHAR P ANK A4,/F MASK " P CWK A4,9 IS A
0x1a6260…1a63f4 (1, 299) Dummy {f00=0x007e, f01=0x0190, f02=» x P SRL A4,4 SHIFT P ANK A4,/F MASK P CWK A4,9 ALL DONE ? 8 P RF(G) CDV40 YES T P CF A14,CDVSUB n P* P SUK A5,1 DECREMENT POINTER P RB CDV30 P* * PCDV40 LD A8,WDIV GET DIVIDEND FOR SUM P LDR A3,A3
0x1a63f4…1a6588 Dummy {f00=0x007e, f01=0x0190, f02=» > 0 z P RB(Z) CDV42 P SUKL A12,1 P CF A14,I:EVA0 4 P LCR A1,A9 J P ANK A1,/F P ADK A1,/D0 n P SCR A1,A9 0 P RB CDV42 GO FOR NEW MISSIONS IN CREDIT PART P EJECT P* 6 P* SUBROUTINE TO MULTIPLY AND ACCUMULATE
0x1a6588…1a671c Dummy {f00=0x007e, f01=0x0190, f02=»IT TO SUM x P SUK A6,1 DECREMENT COUNTER P RB(G) CDVS10 POS. 6 & P CWR A2,A1 IS MULTIPLY BY 2(10) ? P P RF(NE) CDVS30 NO z 4 P CWR A4,A7 SHALL THERE BE DIGIT SUM FO 10-MODULO P RF(NG) CDVS30 NO * P SUK A3,9 YES - SUBTRACT 9 F
0x1a671c…1a68b0 Dummy {f00=0x007e, f01=0x4188, f02=»ASE WEIGHT ~ PCDVS40 RTN A14 P EJECT ( P* 6 P* CHANGE FILE CODE IN ECB @ P* CALL: d * P* CALL CHANFC,DATASET,FILECODE v P* PCHANFC EQU * " P CF A14,T:FDSP GET ECB-ADDRESS & P CF A14,I:EVA0 GET ADDRESS TO BI
0x1a68b0…1a6a44 Dummy {f00=0x007e, f01=0x2008, f02=» HT ~ PCDVS40 RTN A14 P EJECT ( P* 6 P* CHANGE FILE CODE IN ECB @ P* CALL: d * P* CALL CHANFC,DATASET,FILECODE v P* PCHANFC EQU * " P CF A14,T:FDSP GET ECB-ADDRESS & P CF A14,I:EVA0 GET ADDRESS TO BI
0x1a6a44…1a6bd8 Dummy {f00=0x007e, f01=0x4096, f02=» * F IDENT D:CB10 TRA 3.1 78-11-06 O111 D:CB10 2 D:CB10C D $ P X :C @ & y ( & & & &
0x1a6bd8…1a6d6c Dummy {f00=0x007e, f01=0x0190, f02=» * F IDENT C:CB10 TRA 3.1 78-11-06 O111 C:CB10 2 C:CB10C D & X & l & = | & [ & y & & & & & & -
0x1a6d6c…1a6f00 Dummy {f00=0x007e, f01=0x0190, f02=» ; & Y & w & , & < & L & & l & + | & I & g & & & & & &
0x1a6f00…1a7094 (1, 300) Opaque[0x194]
0x1a7094…1a7228 # DirEnt {nam=»DE21ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0fe0, f03=0x0000}
0x1a7094…1a7228 IdxSect {
0x1a7094…1a7228 f00 = 0x007f // 0x1a7094 @0x0
0x1a7094…1a7228 f01 = 0x000a // 0x1a7096 @0x2
0x1a7094…1a7228 gno = [ // 0x1a7098 @0x4
0x1a7094…1a7228 [0x00]: C0x007f.0x0.0
0x1a7094…1a7228 [0x01]: C0x007f.0x1.0
0x1a7094…1a7228 [0x02]: C0x007f.0x2.0
0x1a7094…1a7228 [0x03]: C0x007f.0x3.0
0x1a7094…1a7228 [0x04]: C0x0080.0x0.0
0x1a7094…1a7228 ]
0x1a7094…1a7228 }
0x1a7228…1a73bc Dummy {f00=0x007f, f01=0x0190, f02=» $ P IDENT DE21ST REL 10.0 80-04-11 P 80-07-14/JAER , P* D P* FORMAT DEFINITION N , P* THIS PROGRAM CREATE FORMATS. p F P* USED VARIABLES : BOOL6 = F GENERAL FORMAT DEFINITION F P*
0x1a73bc…1a7550 Dummy {f00=0x007f, f01=0x0190, f02=» PRECCUR= LAST FIELDNR IN 'FORM.DEF.'-FORMAT z P* : P DDUM DEDDIV D P PDIV X P* f P ENTRY DE21ST p P* P ENTRY DEFGTC P* , P EXT PRFGUF PRINT USER FORMAT DEFINITION P EXT DERROR ERROR-MESSAGES & P EXT D
0x1a7550…1a76e4 Dummy {f00=0x007f, f01=0x018e, f02=» r P* P EXT FLINK FORMAT LINKING & P EXT FCODE FORMAT CODE GENERATION 4 $ P EXT FMOVE FORMAT MOVE PROCEDURE ^ P EXT FEDIT FORMAT EDITING $ P EXT UPDBOL UPDATE BOOLEAN/WORD $ P EXT UPDBIN UPDATE WORD/BOOLEANS P EXT EMPTYT CHEC
0x1a76e4…1a7878 Dummy {f00=0x007f, f01=0x0190, f02=» d P EXT ATTPRT RESERVE PRINTER P EXT DETPRT RELEASE PRINTER , P* P P INCLUDE DEKEYS,LIST Z EJECT v * * KEYTABLES * P* PDEKTAB6 KTAB CLR,CAN,RET P* , PDEKTAB8 KTAB CLR,CAN,RET,ENT,COR,R
0x1a7878…1a7a0c Dummy {f00=0x007f, f01=0x018e, f02=»ING THE PICTURE f P* PDE21ST PROC " P* 6 & P SET DEPROMPT T=PROMPTTEXT DISPLAY @ . P TBT BOOL7,DEFD00 JUMP IF CORRECTION MODE j P CLEAR DOOLA . P CBE BIN2,W2,DE22BF JUMP IF BALANCE FORMAT , P CLEAR BOOL6 INDICATE GENERAL FORMATDE
0x1a7a0c…1a7ba0 Dummy {f00=0x007f, f01=0x0190, f02=» : P* RESERVE ONE WORK-BUFFER FOR FORMAT GENERATION 2 P* -ATTACH RESERVED WITH NEW DESCRIPTOR B 2 P* -ATTACH RESERVED BUFFER AS WORK-BLOCK x P* P* DB2 BLK 6 P* <ITEM> BIN X'200200
0x1a7ba0…1a7d34 (1, 301) Dummy {f00=0x007f, f01=0x0190, f02=»* FORTAB STRG (2),80 X'8050001C00020000' 6 P* JOBSPC STRG 160 X'00A0001C' B F P* JOBSPC REDEFINES FORTAB(W2) | P* PDEFD00 , P MOVE BIN16,W0 NUMBER OF CONSEC BUFFERS
0x1a7d34…1a7ec8 Dummy {f00=0x007f, f01=0x0190, f02=» z P PERF DERROR,DEKTAB6 P IB DEBINW2,DEFD00,DEFD00 $ P B RETEX F PDEFD10 V 4 P MOVE WORK(W5),BIN4 SAVE POINTER TO WORK BUFFER d . P MOVE BPOOL(BIN4),=X' MOVE IN DESCRIPTOR C P 20020000 C P 20020000 C P A0020004000C
0x1a7ec8…1a805c Dummy {f00=0x007f, f01=0x0190, f02=»12 t " P CALL ATTWB,BPOOL(BIN4),W0,W12 PDEFDST 0 P PERF DEFDSC > ( P CBE DEBINW2,W4,KTOT JUMP IF TOT-KEY R P B RETERR ~ P EJECT PKTOT 4 P CBG RNRFMCH,W29,KTOT05 JUMP IF LAST BUFFER USED P MOVE BIN16,W188 " P SUB BIN16,W8
0x1a805c…1a81f0 Dummy {f00=0x007f, f01=0x0190, f02=» P CALL FMOVE,STRG10A,FDUM P MOVE BIN15,W7 WORK:=7 $ 6 P MATCH STRG10A,BIN15,W3,FDIR,W0,W1 1- OR 2-BYTE ? B > P XCOPY BPOOL(BIN3),BIN1,BIN15,STRG10A,W0 STORE DUMMY FIELD | * P ADD BIN1,BIN15 ADJUST BUFFERPOSITION PKTOT10 & P PERF FCODE,W1
0x1a81f0…1a8384 Dummy {f00=0x007f, f01=0x0190, f02=»S V & P TBT BOOL6,KTOT12 JUMP IF BALANCE D P XCOPY RPOOL(PINDDB),W18,W1,PINDND,W1 STORE NUMB OF DESCBUFFERS 4 * P ADD BIN10,W1 ADJUST NUMB OF FIELDS F0 | : P XCOPY BPOOL(PINDDB),W2,W2,BIN10,W0 STORE DESC-LENGTH P NUMBER OF FIELDS P ADD
0x1a8384…1a8518 Dummy {f00=0x007f, f01=0x0190, f02=»L7,KTOT18 JUMP IF NOT CORR-MODE PKTOT14 ( " P PERF DEDISC,W13 DELETE FORMAT 6 P BOK KTOT16 P PERF DERROR,DEKTAB6 p $ P SUB DEBINW2,W1 ADJUST KEY-INDEX P IB DEBINW2,RETERR,RETERR P B KTOT14 PKTOT16 8 P PERF DEPOOL,W6,PI
0x1a8518…1a86ac Dummy {f00=0x007f, f01=0x0190, f02=»T20 & P PERF DERROR,DEKTAB6 DISPLAY ERROR $ P SUB DEBINW2,W1 ADJUST KEY-INDEX 6 P TBT SW95PR,KTOT20 ^ P IB DEBINW2,KTOT19,KTOT19 x * P CBE DEBINW4,W10,KTOT18 NO DISK SPACE PKTOT19 P B RETUR PKTOT20 8 P PERF DEPOOL,W6,PIND
0x1a86ac…1a8840 Dummy {f00=0x007f, f01=0x0190, f02=» GET FORMAT P BOK KTOT30 P PERF DERROR,DEKTAB6 ( $ P SUB DEBINW2,W1 ADJUST KEY-INDEX D P IB DEBINW2,RETERR,RETERR l P B KTOT25 PKTOT30 . P PERF DEPOOL,W8,PINDFR,BIN16,STRG10A LOCK P BOK KTOT35 & P PERF DERROR,DEKTAB6
0x1a8840…1a89d4 (1, 302) Dummy {f00=0x007f, f01=0x0190, f02=»DISC,W13 DELETE FORMAT P BOK KTOT40 P PERF DERROR,DEKTAB6 2 $ P SUB DEBINW2,W1 ADJUST KEY-INDEX N P IB DEBINW2,RETERR,RETERR v P B KTOT35 PKTOT40 P MOVE DEBINW4,PINDFR < P PERF DEPOOL,W11,DEBINW4,BIN16,STRG10A UNLINK FORMCH
0x1a89d4…1a8b68 Dummy {f00=0x007f, f01=0x0190, f02=»MNO,FLIND(W1) LOAD FORMATBUFFER-POINTER . P ATTFMT BPOOL(ELMNO) ATTACH DEFINED FORMAT 0 P PERF FEDIT FORMAT EDITING b P DISPLAY 0,W1,W0 & P SET DEPROMPT T=PROMPTTEXT DISPLAY , P TBT BOOL6,KTOT70 JUMP IF BALANCE FORMAT P MOVE DEBINW3,W1
0x1a8b68…1a8cfc Dummy {f00=0x007f, f01=0x0190, f02=»S z , P SET DBOACC INDICATE ACCFIELDS IN FORMAT PKTOT60 : P MOVE DEBINW3,W1 H P MOVE DEBINW4,W0 ` 4 P GETFLD 4,DEBINW3,DEBINW4 CHECK IF VERIFY-FIELDS x P BP KTOT65 NO VERIFY-FIELDS P BN KTOT65 NO VERIFY-FIELDS ( P SET DBOMVR INDI
0x1a8cfc…1a8e90 Dummy {f00=0x007f, f01=0x0190, f02=»ATUS ^ PKTOT70 ( P XCOPY FORMAT,W0,W6,RPOOL(PINDFR),W1 < P CALL RESTOR,W0,W2,PWBDB4 RESTOR ORIGINAL DESC.-POINTERS F ( P PERF DEDISC,W9 STORE FORMAT ON DISC P BOK KTOT75 JUMP IF OK & P PERF DERROR,DEKTAB6 DISPLAY ERROR $ P SUB DEBINW2,W
0x1a8e90…1a9024 Dummy {f00=0x007f, f01=0x0190, f02=»71 P B RETERR PKTOT75 2 P CALL ATTDB,BPOOL(PINDFR),W4,W10 ATTACH DESCR. * P MOVE DEBINW3,W0 ` P GETFLD 0,DEBINW3,DEBINW4 x . P TBT BOOL6,KTOT78 NO WARNING WHEN BALANCE ( P SUB BIN10,W1 ADJUST FOR DUMMY FIELD 8 P CBNG WORK(W6),B
0x1a9024…1a91b8 Dummy {f00=0x007f, f01=0x018e, f02=» P MOVE DEBINW4,=W'39' WARNING P PERF DERROR,DEKTAB6 ( PKTOT78 D < P CALL RESTOR,W0,W2,PWBDB4 RESTOR ORIGINAL DESC.-POINTERS R . P TBF DOOLA,KTOT79 F=CORR FROM THIS PROGRAM " P TBT BOOL7,RETUR JUMP IF CORR PKTOT79 P MOVE DEBINW4,=W
0x1a91b8…1a934c Dummy {f00=0x007f, f01=0x0190, f02=» , P RETUR,KTOT95,KTOT90,KTOT80 ENT,COR,RDL P B RETUR JUMP ON CLEAR-KEY 4 PKTOT80 V P* PRT PRESSED d 2 P CALL ATTDB,BPOOL(PINDFR),W4,W10 ATTACH DESCR. z . P ATTFMT BPOOL(ELMNO) ATTACH DEFINED FORMAT P PERF FEDIT FORMAT EDITING P PER
0x1a934c…1a94e0 Dummy {f00=0x007f, f01=0x0190, f02=»T DEFINITION x P PERF DETPRT RELEASE PRINTER < P CALL RESTOR,W0,W2,PWBDB4 RESTOR ORIGINAL DESC.-POINTERS 8 P B KTOT78 x PKTOT90 RDEL-KEY P MOVE DEBINW4,W17 0 P PERF DERROR,DEKTAB9 'PRESS ENT TO CONFIRM' $ P SUB DEBINW2,W1 ADJUST
0x1a94e0…1a9674 (1, 303) Dummy {f00=0x007f, f01=0x0190, f02=»NW2,W0 P BOK RETUR P PERF DERROR,DEKTAB6 $ P SUB DEBINW1,W1 ADJUST KEY-INDEX < P IB DEBINW2,RETUR,RETUR d P B KTOT90 JUMP ON CLEAR-KEY PKTOT95 COR-KEY P SET BOOL7 , P MOVE PINDCB,FLIND(W1) LOAD BUFFERINDEX * P MOVE
0x1a9674…1a9808 Dummy {f00=0x007f, f01=0x0190, f02=»,W1,RPOOL(PINDFR),W17 SAVE NUMB POOLS ~ B P XCOPY WORK(W3),W1,W1,RPOOL(PINDFR),W18 SAVE NUMB DESC BUFFERS . 0 P SUB WORK(W4),WORK(W3) ADJUST NUMB OF FPOOLS t P B DEFDST P EJECT P* D P* ERROR IN FORMAT GENEREATION OR STOPPED BY KEYP
0x1a9808…1a999c Dummy {f00=0x007f, f01=0x0190, f02=» IF NEW FORMAT , P MOVE PINDFR,PINDDB CHANGE BUFFERPOINTER 8 P PERF DEPOOL,W6,PINDFR,BIN16,STRG10A RELEASE BUFFERS F P B RETCH PRETUR 8 P PERF DEPOOL,W6,PINDFR,BIN16,STRG10A RELEASE BUFFERS P CLEAR BOOL7 P BZ RETEX JUMP IF NEW RE
0x1a999c…1a9b30 Dummy {f00=0x007f, f01=0x0190, f02=»,W10 PRETEX 0 P CBG DEBINW2,W1,REXIT JUMP IF NOT CANCEL-KEY " P TBT DOOLA,REXIT JUMP IF CORR N P B DEFDST JUMP ON CANCEL-KEY t PREXIT 0 P MOVE BIN4,WORK(W5) RESTORE WORKBUFFERINDEX : P PERF DEPOOL,W6,BIN4,BIN16,STRG10A RELEASE WOR
0x1a9b30…1a9cc4 Dummy {f00=0x007f, f01=0x0190, f02=» l ( P FNR5,FPS1,FPS1,FPS1,FPS1,FPS1, C P FPS1,FPS1,FPS1,FPS1 4 P B DETC97 NO TAB R P* j P* FIELD 1 FORMAT NAME t P* PFNR1 & P CBE DEBINW2,W7,F2BTB JUMP IF BTB & P CBE DEBINW2,W8,F1HOM JUMP IF HOM P B DET
0x1a9cc4…1a9e58 Dummy {f00=0x007f, f01=0x0190, f02=»HOME ALLOWED FIELD NOT CONFIRMED WITHIN LINE P* 4 PF1A > , P TBT DOOL2,F1B JUMP IF ALREADY DEL ONCE J , P MOVE FMTWK(W8),BIN3 SAVE CURR BUFFERIND z 6 P MOVE BIN3,FMTWK(W7) REESTORE LAST LINE'S BUFFIND P SET DOOL2 T=LINE DELETED * P T
0x1a9e58…1a9fec Dummy {f00=0x007f, f01=0x0190, f02=»POINT f & P TBF BOOL1,DETC99 HOME TO FIELD 1 2 P CBE DEBINW4,W3,DETC99 JUMP FIELD ALREADY = 3 8 P MOVE DEBINW4,W3 n P B DETC92 P* ( P* PRE SELECTION FIELD 2,3,6-15 P* PFPS1 & P CBE DEBINW2,W3,DETC99 JUMP IF EOI
0x1a9fec…1aa180 Dummy {f00=0x007f, f01=0x0190, f02=»ETC99,F3Z,DETC99, FIELD 5-8 C 0 P DETC99,DETC99,DETC99,DETC99, FIELD 9-12 C & P F3Z Z P B DETC97 h PF2BTB z & P TBF BOOL1,DETC99 NO FIELDS TAB OK . P MOVE DEBINW4,W3 FIELD 3 NO TAB => 'PEEP' P B DETC90 P* P*
0x1aa180…1aa314 (1, 304) Dummy {f00=0x0080, f01=0x0190, f02=»4 KEYED INPUT FIELD P* PFNR4 & & P CBE DEBINW2,W3,F4EOI JUMP IF EOI 2 & P CBE DEBINW2,W6,F4PLS JUMP IF PLS & P CBE DEBINW2,W7,DETC99 JUMP IF BTB P B DETC97 TAB NOK PF4EOI PF4PLS P MOVE BIN5,W0 $ P PERF MTEXT
0x1aa314…1aa4a8 Dummy {f00=0x0080, f01=0x0190, f02=»TBFWD OK FIELD 4 ~ ( P TBT DOOL5,DETC99 JUMP IF CORR LINE & P MOVE DEBINW4,PRECCUR LAST FIELDNR D P B DETC92 TAB NOT ALLOWED n P* : P* CHECK IF ACC-FIELD EMPTY WHEN BALANCE FORMAT P* PFNR5 * P TBF BOOL6,DETC99 JUMP IF
0x1aa4a8…1aa63c Dummy {f00=0x0080, f01=0x0190, f02=»ETC99 ACCFIELD NOT EMPTY OK & PDETC84 FIELD 4 NO TAB => 'PEEP' $ P MOVE DEBINW4,W4 N PDETC90 f P GETFLD 0,DEBINW4,DEBINW3 t PDETC97 P MOVE DEBINW2,W0 OK PDETC98 $ P MOVE DEBINW3,W2 TAB NOT ALLOWED P B DETCRT P
0x1aa63c…1aa7d0 Dummy {f00=0x0080, f01=0x40fe, f02=» P RET ! P PEND ! P EJECT ! P* ! , 8 P* DUMMY FORMAT TO BE GENERATED AS DUMMY-FIELD ! 6 & P* IN EVERY GENERATED FORMAT ! r P* ! PFDUM FRMT ! P FKI 1,ALPHA ! P FCOPY HEX00 ! P FMEND ! P END ! @ ! T P
0x1aa7d0…1aa964 Dummy {f00=0x0080, f01=0x2008, f02=» " ,W6,PINDFR,BIN16,STRG10A RELEASE BUFFERS P TBT BOOL7,RETCH 8 PRETEX P RET ^ P PEND j P EJECT x P* 8 P* DUMMY FORMAT TO BE GENERATED AS DUMMY-FIELD & P* IN EVERY GENERATED FORMAT P* PFDUM FRM
0x1aa964…1aaaf8 Dummy {f00=0x0080, f01=0x0190, f02=»CTUAL POSITION v 4 P MOVE DEBIN2,FMTWK(W12) LOAD TOTAL NUMB OF CHARS . P SUB DEBIN2,DEBIN4 NUMB OF CHARS TO MATCH N D P MATCH JOBSPC,DEBIN3,DEBIN2,STRG10A,FBIN1,W2 JUST ONE FUNC EACH ( P BNOK VGAC35 NO MORE OF SAME FONC OK . P MOVE DEBIN4,DEBIN3
0x1aaaf8…1aac8c Dummy {f00=0x0080, f01=0x018e, f02=»L POSITION r P MOVE STR1A,=C'#' 0 P MATCH JOBSPC,DEBIN3,DEBIN2,STR1A,W0,W1 NEXT , P BOK VGAC40 OK NEXT # FOUND ` 4 P MOVE DEBIN3,FMTWK(W12) LOAD WITH LAST POSITION PVGAC40 6 P MOVE FMTWK(DEBINW2),DEBIN3 LOAD ENDPOS OF CONTROL 6 P PER
0x1aac8c…1aae20 Dummy {f00=0x0080, f01=0x0190, f02=» P SET ACKUM PVGAC45 8 P CBE DEBIN4,FMTWK(W12),VGAC99 JUMP IF END OF STRING $ P ADD DEBIN4,W1 NEXT POSITION ` P B VGAC15 P EJECT PVGAC90 . P TBF BOOL6,VGAC92 JUMP IF ORDINARY FORMAT " P ERASE 0,W13,W14 ERASE 2 LINES
0x1aae20…1aafb4 (1, 305) Opaque[0x194]
0x1aafb4…1ab148 # DirEnt {nam=»DE12ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1008, f03=0x0000}
0x1aafb4…1ab148 IdxSect {
0x1aafb4…1ab148 f00 = 0x0080 // 0x1aafb4 @0x0
0x1aafb4…1ab148 f01 = 0x0004 // 0x1aafb6 @0x2
0x1aafb4…1ab148 gno = [ // 0x1aafb8 @0x4
0x1aafb4…1ab148 [0x00]: C0x0080.0x1.0
0x1aafb4…1ab148 [0x01]: C0x0080.0x2.0
0x1aafb4…1ab148 ]
0x1aafb4…1ab148 }
0x1ab148…1ab2dc Dummy {f00=0x0080, f01=0x0190, f02=» $ P IDENT DE12ST REL 10.0 80-04-11 P 79-12-14/LABJ , P**************** D P* * P* VALUE SETS * t P* * P**************** 2 P********************************************* 2 P* BOOL1 : T=GET V-S
0x1ab2dc…1ab470 Dummy {f00=0x0080, f01=0x0190, f02=» 2 P********************************************* * P* BIN1 WORKITEM * : * P* BIN2 NO. OF ELEM.IN THIS RECORD * h * P* BIN3 SIZE OF ELEMENT * * P* BIN4 FIRST EL.NO. IN RECORD * * P* BIN5 LAST - "
0x1ab470…1ab604 Dummy {f00=0x0080, f01=0x0190, f02=» * | * P* BIN10 X'8000' / X'B000' ,A/N * * P************************************* H DDUM DEDDIV v PDIV ENTRY DE12ST P ENTRY WRIT12 P ENTRY CANC11 P ENTRY CANC12 P ENTRY A20 P*
0x1ab604…1ab798 Dummy {f00=0x0080, f01=0x0190, f02=» EXT DEPOOL EJECT PDE12ST PROC " P MOVE TABLE,=X'5400' 6 P ATTFMT VSET R P SET BOOL1 GET f & P CBE BIN2,W3,A10 JUMP IF PRNUM=13 | P CLEAR BOOL1 ENTER PA10 P MOVE PINDTB,W0 P SET DEPROMPT P CLEAR DECHANG
0x1ab798…1ab92c Dummy {f00=0x0080, f01=0x018e, f02=» PA20 , P CBE DEBINW2,W0,CANC11 CLR-KEY ON ERROR $ P IB DEBINW2,CANC12,CANC12,ENT12 @ P MOVE DEBINW4,W0 'BELL' h P PERF DERR P B A20 PCANC11 P MOVE DEBINW2,W1 PCANC12 < P CALL RESTOR,W3,W4,PWBDB4 RESTORE ORIG. DESC
0x1ab92c…1abac0 Dummy {f00=0x0080, f01=0x0190, f02=» PRETUR RET P PEND P EJECT $ PWRIT12 PROC 2 < P XCOPY RPOOL(PINDTB),W17,W1,BIN4,W1 1:ST EL.NO. IN REC. F P MOVE BIN5,ELMNO P SUB BIN5,W1 4 P XCOPY RPOOL(PINDTB),W18,W1,BIN5,W1 LAST - " - P MOVE BIN8,=W'26' & P PER
0x1abac0…1abc54 (1, 306) Dummy {f00=0x0080, f01=0x0190, f02=»IN5,BIN2 P SUB BIN5,W1 LAST - " - P CMP W0,W0 2 PWR10 D P RET P P PEND EJECT j * P************************************** x * P* APPL-ROUTINES IN MODULE : DE10ST * * P************************************** $ P******
0x1abc54…1abde8 Dummy {f00=0x0080, f01=0x0190, f02=» * x $ P******************************* PVSET FRMT 8 P FSL J P FMEL '99',PRNUM V P FBT BOOL1,F13 n P FCOPY =C' CREATE' P FB F12A PF13 FCOPY =C' GET' PF12A FCOPY =C' VALUE-SETS' P FNL P FCOPY =C'NAME: T'
0x1abde8…1abf7c Dummy {f00=0x0080, f01=0x018e, f02=»LR,NEOI,APPL=101 r P FCOPY STR6A P FB F12UT , PF12C > P FLINK F121 J PF12UT FMEND ^ P* r PF121 FRMT | P FNL P FCOPY =C'TYPE:' P FBT BOOL3,F121A P FBF BOOL1,F124 IF CREATE PF121A P FINP 7
0x1abf7c…1ac110 Dummy {f00=0x0080, f01=0x0190, f02=» P FTAB 10 P FCOPY =C'SIZE OF ' P FCOPY =C'ELEMENT' 4 P FCOPY =C'S:' N P FBT BOOL3,F125A d P FBF BOOL1,F127 IF CREATE | PF125A P FINP 28 P FMEL 'XX',TIME P FB F128 PF127 : P FKI 28,MINL=1,MAXL=2,NE
0x1ac110…1ac2a4 Dummy {f00=0x0080, f01=0x40ba, f02=» FBF BOOL3,FEND IF LINE 1-3 P FINP 13 ENTER $ P FMEL 'XX',ACK(W1) : P FNL T P* FLINK STR64A ` P FCTL X'DE',STR64A v PFEND P FMEND END @ P FMEL 'XX',TIME P FB F128 PF127 : P FKI 28,MINL=1,MAXL=2,NE
0x1ac2a4…1ac438 Dummy {f00=0x0080, f01=0x2008, f02=» NT DE12ST DDUM DEDDIV PDIV . ENTRY DE12ST < DE12ST R PROC ` RET n PEND z END @ KITEM PSTR6A STRG 6 WORKITEM PSTRG10A STRG 10 WORKITEM PDIV END @ ARIABL
0x1ac438…1ac5cc Dummy {f00=0x0080, f01=0x0190, f02=»#4 @ 0C P j !!!WP U00 P m ( &W 0) = b !Z/h U ! !Q !4 !03@ T 0% j %! !01 ! 0F ( ! 6 cv6 C & 4 W 1W 200 P " "Jh !U !TA00 T h ! !T006 _ A 00 T f !0% 0301 _ 0 0 (P h ! !P 11 _ 11 !00 X 0
0x1ac5cc…1ac760 Dummy {f00=0x0080, f01=0x0190, f02=»HNUMBERRECORDCONFIRM VALUESETSYMBOLIC: XTTTT9 < . . 9 DELETED INSERTED + ON UNIT:U i + WITHIN JOB: k RECOVERY RUNNING. RECORD CORRECTION : FREEZING OF BATCH l CONFIRM RECORD INSERT CONFIRM RECORD DELETE:
0x1ac760…1ac8f4 (1, 307) Opaque[0x194]
0x1ac8f4…1aca88 # DirEnt {nam=»DE15ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1018, f03=0x0000}
0x1ac8f4…1aca88 IdxSect {
0x1ac8f4…1aca88 f00 = 0x0080 // 0x1ac8f4 @0x0
0x1ac8f4…1aca88 f01 = 0x0004 // 0x1ac8f6 @0x2
0x1ac8f4…1aca88 gno = [ // 0x1ac8f8 @0x4
0x1ac8f4…1aca88 [0x00]: C0x0080.0x3.0
0x1ac8f4…1aca88 [0x01]: C0x0081.0x0.0
0x1ac8f4…1aca88 ]
0x1ac8f4…1aca88 }
0x1aca88…1acc1c Dummy {f00=0x0080, f01=0x0190, f02=» $ P IDENT DE15ST REL 10.0 80-04-11 P 79-12-02/LABJ , P**************** D P* FILE SPACE * P**************** t DDUM DEDDIV PDIV P ENTRY DE15ST P EXT DECLRN P EXT ATTWB P EXT DEPOOL P EXT OPCL
0x1acc1c…1acdb0 Dummy {f00=0x0080, f01=0x0190, f02=» n P BOK C00 PC01 P PERF DERR $ P IB DEBINW2,DE15,RETUR 6 P B C01 T PC00 b $ P CALL ATTWB,BPOOL(PINDTB),W0,W11 n P ATTFMT F15 P ERASE 3,W1,W0 ONLY ITEMS PC05 6 P MOVE FDVBCD(W1),FRINF(W1) NO. OF REC. SYSTEMFIL
0x1acdb0…1acf44 Dummy {f00=0x0080, f01=0x0190, f02=»IV BCDI21(W1),FDVBCD(W1) % P MOVE FDVBCD(W3),BCDI21(W1) " P SET DEPROMPT F PC10 P CLEAR DECHANGE h P PERF DECLRN PC15 P IB DEBINW2,C20,RETUR,E10 P MOVE DEBINW4,W0 P PERF DERR P B C15 PC20 P E
0x1acf44…1ad0d8 Dummy {f00=0x0080, f01=0x0190, f02=» PERR1 P PERF DERR P IB DEBINW2,C10,RETUR,E11 & P MOVE DEBINW2,W0 H P B ERR1 ` PE12 p P THOME | P PERF DERR P IB DEBINW2,E15,RETUR,E40 PE15 P MOVE DEBINW4,W0 P B E12 PE40 : P MOVE FDVBCD
0x1ad0d8…1ad26c Dummy {f00=0x0080, f01=0x0190, f02=»0' z ( P MOVE BCDI21(W2),FNOOFREC(FILINDUS) $ P MUL BCDI21(W1),BCDI21(W2) FREE 6 P DIV BCDI21(W1),FDVBCD(W4) % ^ P MOVE FDVBCD(W6),BCDI21(W1) P MOVE FDVBCD(W5),BIN1 P* PE50 P DISPLAY 3,W6,W0 FINP-FIELDS P PERF OPCL
0x1ad26c…1ad400 Dummy {f00=0x0080, f01=0x0190, f02=»R P * P PERF DEPOOL,W6,PINDTB,PINDTB,STRG10A P PERF OPCL,W4 @ P RET V PEND b P EJECT p PF15 FRMT ~ P FSL P FCOPY =C'15 FILE SPACE' P FNL P FCOPY =C'USERFILE UNIT' P FTEXT ':U' ( P FKI 16,MINL=1
0x1ad400…1ad594 (1, 308) Dummy {f00=0x0081, f01=0x0190, f02=» P FNL P FCOPY =C'FILE' P FTAB 19 ( P FCOPY =C'SIZE' 8 P FTAB 29 P P FCOPY =C'FREE %' ` P FNL | P FCOPY =C'SYSTEMFILE' P FINP 18 " P FMEL 'ZZZZ9',FDVBCD(W1) SIZE P FINP 28 2 P FMEL 'ZZZZ9',FDVBCD(W2) FRE
0x1ad594…1ad728 Dummy {f00=0x0081, f01=0x40fa, f02=» FMEL 'ZZZZ9',FDVBCD(W4) SIZE P FINP 28 & 0 P FMEL 'ZZZZ9',FDVBCD(W5) FREE REC. USERFILE 6 P FINP 35 j " P FMEL 'ZZ9',FDVBCD(W6) % FREE z P FNL P FKI 1,MINL=0,MAXL=0 P FCOPY HEX00 P FMEND END @ FDVBCD(W2) FRE
0x1ad728…1ad8bc Dummy {f00=0x0081, f01=0x2008, f02=» NT DE12ST DDUM DEDDIV PDIV . ENTRY DE12ST < DE12ST R PROC ` RET n PEND z END @ KITEM PSTR6A STRG 6 WORKITEM PSTRG10A STRG 10 WORKITEM PDIV END @ ARIABL
0x1ad8bc…1ada50 Dummy {f00=0x0081, f01=0x0190, f02=»h _ @ !^A _DA ( ~ * & .He @h u!Kh ( ! u! * & ) du d ! _3 $? $? @l 4 J * & G H KAd6 @d !0. 0/ R40 x * & e ; ! T&Hl 0. 0/ @l0" T W * & 0Al0. 0/ X/ "_B 4 ! * &
0x1ada50…1adbe4 Dummy {f00=0x0081, f01=0x0190, f02=» A !@( "90! !T2@e@i@k !" ? * & 'hZ 2 !TS &6 * * & 7 " _ Ai_8Ae_<" y 4 X * & U WsAkW !j !! ( ~ * & s !~W)j !! F 10 U !b * & ! ! Hi b ! !P Ie I
0x1adbe4…1add78 Dummy {f00=0x0081, f01=0x018e, f02=»40 l * & < 4 0<" 4 0=" 4 4 4 4 4 4 4 0 * & ' > 4 0? 4 0@ 4 4 4 4 !Hy 0 8 * & E "Hz 0 34 U f * & c j ! !0 P b ![ ! ! ( 4 j * & " " * &
0x1add78…1adf0c Dummy {f00=0x0081, f01=0x4144, f02=» * & & * & 1 I 1 = T * & O ] $ ? * & m FMDA 1 $ 0 0 0 z h
0x1adf0c…1ae0a0 Dummy {f00=0x0081, f01=0x4014, f02=» HNOD @ * & t * & 1 I 1 = H DENVAL v * & O @ v ] $ ? * & m FMDA 1 $ 0 0 0 z h
0x1ae0a0…1ae234 (1, 309) Opaque[0x194]
0x1ae234…1ae3c8 # DirEnt {nam=»DE23ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1028, f03=0x0000}
0x1ae234…1ae3c8 IdxSect {
0x1ae234…1ae3c8 f00 = 0x0081 // 0x1ae234 @0x0
0x1ae234…1ae3c8 f01 = 0x0008 // 0x1ae236 @0x2
0x1ae234…1ae3c8 gno = [ // 0x1ae238 @0x4
0x1ae234…1ae3c8 [0x00]: C0x0081.0x1.0
0x1ae234…1ae3c8 [0x01]: C0x0081.0x2.0
0x1ae234…1ae3c8 [0x02]: C0x0081.0x3.0
0x1ae234…1ae3c8 [0x03]: C0x0082.0x0.0
0x1ae234…1ae3c8 ]
0x1ae234…1ae3c8 }
0x1ae3c8…1ae55c Dummy {f00=0x0081, f01=0x018e, f02=» $ P IDENT DE23ST REL 10.0 80-04-11 P 80-05-05/JAER , P* D P* GET FORMAT N 2 P* THIS FORMAT PROCESS FOLLOWING FUNTIONS h 4 P* - SEARCH AND DISPLAY FORMAT 'RFW','RBW' , P* - PRINT HARDCOPY OF FORMAT 'PRT' , P*
0x1ae55c…1ae6f0 Dummy {f00=0x0081, f01=0x0190, f02=» f P* L P************************************************************************ DDUM DEDDIV b PDIV v P ENTRY DE23ST P* $ P EXT DEAPPL APPLE VALUE HANDLING P EXT DECLRA P EXT DERR P EXT DEDISC DISC-ROUTI
0x1ae6f0…1ae884 Dummy {f00=0x0081, f01=0x0190, f02=»NPF UNPACK NEXT FIELD P EXT DEUNPL UNPACK NEXT LINE ( P EXT PRFGUF PRINT FORMAT DEFINITION B P EXT FEDIT n ( P EXT ATTDB ATTACH FORMAT-DESCRIPTOR P EXT ATTWB ATTACH WORKBLOCK * P EXT RESTOR RESTORE ORIG.-DESC-POINTER ( P EXT DEPOO
0x1ae884…1aea18 Dummy {f00=0x0081, f01=0x0190, f02=»JECT * * KEYTABLES * 0 P* : PDEKTAB6 KTAB CLR,CAN,RET D P* d PDEKTAB7 KTAB CLR,CAN,RET,ENT n P* ( PDEKTAB8 KTAB CLR,CAN,RET,RFW,RBW, C P COR,RDL,STS,PRT P* $ PDEKTAB9 KTAB CLR,CAN,RET,RFW
0x1aea18…1aebac Dummy {f00=0x0081, f01=0x0190, f02=»POINTER b P MOVE PINDFR,W0 P ATTFMT F23GF ( $ P SET DEPROMPT PROMTTEXT-DISPLAY > PDE23CA f P CLEAR DOOL3 t " P PERF DECLRA DATA-ENTRY-SCREEN & P SET DEPROMPT T=PROMPTTEXT DISPLAY PDE23ER . P IB DEBINW2,CANCEL,RETUR,ENTER,FOR
0x1aebac…1aed40 Dummy {f00=0x0081, f01=0x0190, f02=»BDB4 RESTOR ORIG.-DESC.-POINTER z P CLEAR DEPROMPT ( P B DE23CA @ PERROR R P PERF DERROR,DEKTAB6 ` P IB DEBINW2,ENT20,DEL30 | P B RETUR P EJECT PENTER P SET BOOL4 " P CLEAR BOOL6 F=GENERAL FORMAT P XCOPY S
0x1aed40…1aeed4 (1, 310) Dummy {f00=0x0081, f01=0x0190, f02=»NCE FORMAT ~ PENT05 6 P CALL ATTDB,BPOOL(PINDFR),W4,W10 ATTACH DESCRIPTOR PENT08 Z 4 P MOVE ELMNO,FLIND(W1) STORE FORMATBUFFER-POINTER h . P ATTFMT BPOOL(ELMNO) ATTACH DEFINED FORMAT P PERF FEDIT FORMAT EDITING P SET DEPROMPT
0x1aeed4…1af068 Dummy {f00=0x0081, f01=0x0190, f02=»N LAST FIELD j PENT20 P MOVE DEBINW4,=W'31' " , P PERF DERROR,DEKTAB8 'MAKE YOUR CHOICE' > , P IB DEBINW2,ENT20,DEL30,RELRET,FORW, C n & P BACKW,DELCOR,DELCOR,STS10,PRT10 P B ERROR P EJECT P* 4 P* GET NEXT/PREVIO
0x1af068…1af1fc Dummy {f00=0x0081, f01=0x018e, f02=»NW1,W32 LOAD FUNC-CODE = 32 PNEPR $ 2 P PERF DEDISC,DEBINW1 GET NEXT/PREVIOUS FORMAT 0 P BOK ENTER f $ P CBE DEBINW4,W24,NEPRIU IN USE ? x PNEPRER P PERF DERROR,DEKTAB6 $ P IB DEBINW2,NEPRCL,DEL30,RELRET PNEPRCL P TBF BOO
0x1af1fc…1af390 Dummy {f00=0x0081, f01=0x018e, f02=» . P IB DEBINW2,NEPRCL,DEL30,RETUR,FORW,BACKW P B ERROR 6 P EJECT F P* T 8 P* DELETION AND CORRECTION PRE-INITIALIZATION ^ $ P* LOCK FORMAT IN BUFFERS P* PDELCOR 4 P PERF DEPOOL,W8,PINDFR,BIN16,STRG10A FORMAT LO
0x1af390…1af524 Dummy {f00=0x0081, f01=0x0190, f02=» P* P* DELETION P* & P MOVE DEBINW4,W17 LOAD 17 0 2 P PERF DERROR,DEKTAB7 'PRESS ENTER TO CONFIRM' R " P IB DEBINW2,ENT20,ENT20,DEL30 PDEL20 * P PERF DEDISC,W13 DELETE FORMAT ON DISC P BOK DEL30 JUMP IF OK P
0x1af524…1af6b8 Dummy {f00=0x0081, f01=0x0190, f02=»0A RELEASE BUFFERS n PDEL40 P B DEST23 ( P EJECT : P* H P* CORRECTION R P* n 4 P* BOOL7 = T INDICATE CORR-MODE x 2 P* DOOLA = T INDICATE CORR-MODE P* PCOR10 : P CALL REST
0x1af6b8…1af84c Dummy {f00=0x0081, f01=0x018e, f02=» LOAD BUFFERINDEX z & P MOVE CURSEC,W0 LOAD BUFFERPOINTER P* D ( P* RELEASE DESCRIPTOR BUFFERS N P* z P MOVE DEBINW3,W0 WORK:=0 , P MOVE DEBINW2,W0 NUMB OF DESC.BUFFERS:=0 P MOVE WORK(W3),W0 WORK:=0 ( P MOVE WORK(W4),W0
0x1af84c…1af9e0 Dummy {f00=0x0081, f01=0x0190, f02=» B P XCOPY WORK(W3),W1,W1,RPOOL(PINDFR),W18 SAVE NUMB DESC BUFFERS 0 P SUB WORK(W4),WORK(W3) ADJUST NUMB OF FPOOLS J PCOR20 ~ < P XCOPY DEBINW3,W1,W1,RPOOL(PINDFR),W8 LOAD LINK TO NEXT : P XCOPY DEINPUT,W0,W7,RPOOL(PINDFR),W0 SAVE TYPE & NAME $
0x1af9e0…1afb74 (1, 311) Dummy {f00=0x0081, f01=0x0190, f02=» 0 P ADD DEBINW2,W1 NUMB OF REL. DESC.BUFFERS+1 4 P CBE WORK(W3),DEBINW2,COR25 JUMP IF ALL RELEASED 8 P B COR20 GO ON p PCOR25 > P XCOPY RPOOL(PINDFR),W0,W7,DEINPUT,W0 RESTORE TYPE & NAME PCOR30 P PERF DE21ST P CLEAR BOOL7 F=N
0x1afb74…1afd08 Dummy {f00=0x0081, f01=0x0190, f02=»T-KEY p P INV DEPROMPT 2 P CBE PINDFR,W0,DEL40 JUMP IF NO CURRENT FORMAT $ P B ENTER Z P EJECT j P* x P* PRINT STATUS LINE P* PSTS10 " P PERF DESTAT LOAD STATUS-LINE P MOVE DEBINW4,W19 P B ERROR
0x1afd08…1afe9c Dummy {f00=0x0081, f01=0x0190, f02=» P* : P* RESERVE ONE WORK-BUFFER FOR FORMAT GENERATION 2 P* -ATTACH RESERVED WITH NEW DESCRIPTOR L 2 P* -ATTACH RESERVED BUFFER AS WORK-BLOCK P* P* DB2 BLK 6 P* <ITEM> BIN
0x1afe9c…1b0030 Dummy {f00=0x0081, f01=0x0190, f02=»' X > P* FORTAB STRG (2),80 X'8050001C00020000' 6 P* JOBSPC STRG 160 X'00A0001C' L F P* JOBSPC REDEFINES FORTAB(W2) P* P CLEAR DEPROMPT , P MOVE BIN16,W0 NUMBER
0x1b0030…1b01c4 Dummy {f00=0x0081, f01=0x0190, f02=»OK PRT20 0 P PERF DERROR,DEKTAB6 ERROR-MESSAGE IF NOT OK P B PRT40 D PPRT20 T 4 P MOVE WORK(W5),BIN4 SAVE POINTER TO WORK BUFFER b . P MOVE BPOOL(BIN4),=X' MOVE IN DESCRIPTOR C P 20020000 C P 20020000 C P A0020004000C00
0x1b01c4…1b0358 Dummy {f00=0x0081, f01=0x0190, f02=» r " P CALL ATTWB,BPOOL(BIN4),W0,W12 P PERF ATTPRT RESERVE PRINTER . P BNOK PRT30 R " P PERF PRFGUF PRINT USER FORMAT f P PERF DETPRT RELEASE PRINTER P B PRT35 PPRT30 0 P PERF DERROR,DEKTAB6 ERROR MESSAGE IF NOT OK PPRT35
0x1b0358…1b04ec Dummy {f00=0x0081, f01=0x0190, f02=»8,W4,PWBDB4 RESTOR ORIG.-DESC.-POINTER PPRT40 . 8 P IB DEBINW2,ENTER,DEL30,RELRET JUMP DEP ON KEY-INDEX < P B ENTER x P EJECT PRELRET 8 P PERF DEPOOL,W6,PINDFR,BIN16,STRG10A RELEASE BUFFERS PRETUR : P CALL RESTOR,W0,W16,PWBDB4
0x1b04ec…1b0680 Dummy {f00=0x0081, f01=0x40b6, f02=» ='FORMAT' P FNL P FCOPY ='FORMAT' P FILLR ':',1 6 4 P FKI 9,APPL=104,MINL=1,MAXL=6,ALPHA,NEOI,ME,NCLR J P FCOPY FORMAT P FMEND END @ NDFR,BIN16,STRG10A RELEASE BUFFERS PRETUR : P CALL RESTOR,W0,W16,PWBDB4
0x1b0680…1b0814 (1, 312) Dummy {f00=0x0082, f01=0x2008, f02=»
0x1b0814…1b09a8 Dummy {f00=0x0082, f01=0x0190, f02=»T ( * 2 ( )g= " '"( g " #> $T # '#( _ Ub & 5 + *P ( - { &{ 1 !0 ! 04 mU_" m 509 {&* p!0 $ '$( 10 $} | @ 0 2TC 6 ( B? 0 $} / T l $_ " 2 2 2 ' @z 7 ^ &{ &z 0 0} | @ 0 2
0x1b09a8…1b0b3c Dummy {f00=0x0082, f01=0x0190, f02=» P)W*1( T !05 T W W W 6 W 1W 4 Z E 5 b F " P " : h " + $ " TOVIAFILENAMEUNITBATCHVOLUMEDEVICE DATA COMMCONVERSIONOTHE
0x1b0b3c…1b0cd0 Dummy {f00=0x0082, f01=0x0190, f02=» 6 :U i 8 : 1 * NUMBER: g 70 ; ( h d 9 : e # 4 - 5 : @ $ FETCHING FORMAT: FROM DISC. @ U " ) 2 <0 G0 H & 5 E U g
0x1b0cd0…1b0e64 Dummy {f00=0x0082, f01=0x0190, f02=» F : > B !1( P Q /U80 88 R*j !! oU 10 !jo! 2jo " 1( W % 0 "1( H 0&W 1( !0' ! 6 W"0 0 $( # _.0 ! _y $5 !( * @ . !4 80 4 o3 o0# 0 6 4 Am4 0# 0 4 3 8 ? +1 BATCH IN U
0x1b0e64…1b0ff8 Dummy {f00=0x0082, f01=0x0190, f02=»OT FOUND I/O-ERROR DATE ERROR FOUND LOCKED NO DISC SPACE ILLEGAL VALUE INVALID NUMBER CHANGE CASSETTE NO RECORD FOUND UNDEFINED ERROR TEST ENTERED BATCH RECOVERY RUNNING. DISC NOT OPERABLE 4 : l IN : k 5 DISC I/O-ERROR : ILLEGAL
0x1b0ff8…1b118c Dummy {f00=0x0082, f01=0x0190, f02=»OF FILESPACE USED PRESS ENT FOR DELETION THIS IS A DUMMY MESSAGE SYSTEMFILE ASSIGN-ERROR EDIT ERROR IN CONVERSION ALREADY DEFINED/EXECUTED TOO FEW INPUT CHARACTERS OUTPUT DEVICE NOT OPERABLE COMPULSORY FIELD NOT FILLED DEFINED LINE MAXIMUM EXCEED
0x1b118c…1b1320 Dummy {f00=0x0082, f01=0x0190, f02=»ERFILE NOT CLOSED IN PREVIOUS SESSION. ,END OF FORMAT FOUND PRESS RINS FOR NEW LINES " : m : )CONFIRM WANTED FUNCTION (CORR,RDEL,PRINT) j : h y : k : l : : z : n : : g : ASD 5 PAGE : WARNING:REFERENCE TO FIELD (F ) OUTSIDE FORMAT DEFINITION
0x1b1320…1b14b4 (1, 313) Opaque[0x194]
0x1b14b4…1b1648 # DirEnt {nam=»DEGENE«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1048, f03=0x0000}
0x1b14b4…1b1648 IdxSect {
0x1b14b4…1b1648 f00 = 0x0082 // 0x1b14b4 @0x0
0x1b14b4…1b1648 f01 = 0x0008 // 0x1b14b6 @0x2
0x1b14b4…1b1648 gno = [ // 0x1b14b8 @0x4
0x1b14b4…1b1648 [0x00]: C0x0082.0x1.0
0x1b14b4…1b1648 [0x01]: C0x0082.0x2.0
0x1b14b4…1b1648 [0x02]: C0x0082.0x3.0
0x1b14b4…1b1648 [0x03]: C0x0083.0x0.0
0x1b14b4…1b1648 ]
0x1b14b4…1b1648 }
0x1b1648…1b17dc Dummy {f00=0x0082, f01=0x0190, f02=» $ P IDENT DEGENE REL 10.0 80-04-11 P UPD 80-11-06/DALI , P UPD 80-10-28/DALI H P UPD 80-08-22/DALI d P UPD 80-04-10/DALI * L M************************************************************************ * : 6* S
0x1b17dc…1b1970 Dummy {f00=0x0082, f01=0x0190, f02=» CHECKS IF THERE IS A "FGEN-STRING" ATTACHED TO THAT 6 1* ELEMENT AND IF SO EXECUTES THE GENERATION. > * x & !* GENERATION CAN BE DONE TO: * P* - AN ELEMENT IN THE PICTURE " * - AN USER-VARIABLE * L
0x1b1970…1b1b04 Dummy {f00=0x0082, f01=0x0190, f02=»* ***** ENTRIES ***** * ( ENTRY DEGEN 2 * F * P ***** EXTERNALS ***** Z * z EXT GETGEN EXT MSKOUT EXT TYPET P EXT EMPTYT P EXT DENVAL P EXT GETFWD P EXT ADJUST
0x1b1b04…1b1c98 Dummy {f00=0x0082, f01=0x0190, f02=» * ( #***** INTERNAL WORK-FORMATS ***** * : PWFORM FTABLE WF1,WF2,WF3,WF4 D * h WF1 FRMT r P FCOPY USEV(BIN10) FMEND * PWF2 FRMT , P FCTL X'C0',X.PSEU1,X.PSEU2,X.WB10,BIN10 FMEND P*
0x1b1c98…1b1e2c Dummy {f00=0x0082, f01=0x0190, f02=» FMEND EJECT * L O************************************************************************ & * v & "* MAIN-ROUTINE FOR GENERATION * L O************************************************************************ *
0x1b1e2c…1b1fc0 Dummy {f00=0x0082, f01=0x0190, f02=»L4 CLEAR DUPL-INDICATOR ( P GETABX DEBINW3 GET CURRENT-FIELD NR P CLEAR ME COND GEN FLAG L P B EXGEN "PERF" EXGEN l PA250 & P CBE BIN1,W0,A900 NO DUPL FOUND ? ( # SET BOOL1 INDICATE CHANGED CURRENT . P CALL GETFWD,DEBINW4,0,BIN1,
0x1b1fc0…1b2154 (1, 314) Dummy {f00=0x0082, f01=0x0190, f02=»GETGEN,BPOOL(W1),BIN11,BIN12,BIN13 P BNOK A900 * 6 P CALL GETFWD,DEBINW4,0,DEBINW3,BIN4 MAKE ORIGINATE < , P CALL ADJUST,DEBINW4 FIELD CURRENT AGAIN v P CLEAR BOOL1 P B EXGEN P EJECT * * ( #***** FORMAT-ERROR DETECT
0x1b2154…1b22e8 Dummy {f00=0x0082, f01=0x0190, f02=»? h 4 P CALL GETFWD,DEBINW4,0,DEBINW3,BIN4 MAKE CURRENT & P CALL ADJUST,DEBINW4 FIELD CURRENT B A910 l P ADD BCD2A,BCD2A x P CLEAR ME COND GEN FLAG RET EJECT * L M****************************************************
0x1b22e8…1b247c Dummy {f00=0x0082, f01=0x0190, f02=»********************************************************** * B PEXGEN L B000 Z P SUB BIN12,W1 ADJUST DISPL. f 2 P ADD BIN13,BIN12 DISPL FOR LAST BYTE IN BIN13 * & P MOVE BIN1,W0 CLEAR DUPL-FIELD-NR EJECT *
0x1b247c…1b2610 Dummy {f00=0x0082, f01=0x0190, f02=»D 0F STRING ? x P* PB055 * P MOVE BIN7,W0 CLEAR RESULT-FIELD-NR... , * P MOVE BIN6,W0 ...AND RESET TYPE-INDEX Z P MOVE STR6B,=C'DUFM' . P MATCH STR6B,BIN6,W4,BPOOL(BIN11),BIN12,W1 P IB BIN6,B070,B070,B065 P B B070 P E
0x1b2610…1b27a4 Dummy {f00=0x0082, f01=0x018e, f02=»13,BIN12 PUT DISP INTO BIN13 P PERF DENVAL,W2 $ ( P GETABX DEBINW3 MAKE ORIGINATE FIELD < P CURRENT AGAIN h P CLEAR DOOLB P BNZ A250 P SET ME COND GEN FLAG P XCOPY BIN12,W1,W1,BIN3,W1 P MOVE BIN3,W0 ( P XCOPY BIN3,
0x1b27a4…1b2938 Dummy {f00=0x0082, f01=0x0190, f02=» P BNOK A250 FORMAT ERROR ? P* * P* 4 " P ADD BIN12,W1 INCREASE DISPL. > ( P PERF DEFIND,BIN7,BIN4 GET FIELD-NR d , P IB BIN6,B180,B180 JUMP IF USER OR FIELD P B B140 PB075 , ( CLEAR BOOL2 INDICATE NO ARITHMETIC DONE
0x1b2938…1b2acc Dummy {f00=0x0082, f01=0x0190, f02=» MOVE STR1A,=C'=' . P MATCH STR1A,BIN4,W1,BPOOL(BIN11),BIN12,W1 & P BOK B100 ..."="-SIGN ? L P* v P SUB BIN12,W1 ADJUST DISPL. EJECT * * ***** EXAMINE ***** * B100 , P CLEAR BOOL6 I
0x1b2acc…1b2c60 Dummy {f00=0x0082, f01=0x0190, f02=»D-NR... p * P MOVE BIN9,W0 ...AND RESET TYPE-INDEX " P ADD BIN12,W1 INCREASE DISPL. > P CMP BIN12,BIN13 d P BG B600 | P MOVE STRG10A,=C'!UF+-*:;AS' 2 P MATCH STRG10A,BIN9,W10,BPOOL(BIN11),BIN12,W1 BNOK B200 LITTERAL PREFIX ?
0x1b2c60…1b2df4 (1, 315) Dummy {f00=0x0082, f01=0x0190, f02=» ***** x * PB140 * P CBL BIN7,W1,A250 DUPL-NR NOT > ZERO ? & 6 P CBNL BIN7,DEBINW3,A250 DUPL-NR NOT < "CURRENT" ? T ( P MOVE BIN1,BIN7 UPDATE DUPL-FIELD-NR P B A250 EJECT * * ***** ABSULUTE VALUE *****
0x1b2df4…1b2f88 Dummy {f00=0x0082, f01=0x018e, f02=»* " ***** ARITHMETIC SIGN ***** * 0 B170 : " SET BOOL2 INDICATE ARITHMETIC F & P MOVE BIN3,BIN9 MOVE TO SIGN-INDEX l " P SUB BIN3,W3 ADJUST SIGN-INDEX B B110 * * * P**** OWN FIELD OR USER-VAIABEL ****
0x1b2f88…1b311c Dummy {f00=0x0082, f01=0x0190, f02=» P*CURRENT FIELD EMPTY P CLEAR ME COND GEN FLAG P BNZ B075 @ P CBNE BIN6,W2,B190 NOT FIELD R P CBE BIN7,W0,B075 IF CURRENT v & P CBE BIN7,DEBINW3,B075 IF CURRENT PB190 , P MOVE BIN4,BIN13 CALCULATE LENGTH OF... . P SUB BIN
0x1b311c…1b32b0 Dummy {f00=0x0082, f01=0x0190, f02=»ND ? ~ P B B050 P EJECT * * * 4 ***** LITTERAL ***** > * B200 f & P MOVE DEINPUT,HEX00 CLEAR WORKITEM r P MOVE BIN10,W0 " @ P XCOPY BIN10,W1,W1,BPOOL(BIN11),BIN12 GET LITTERAL-PREFIX P MOVE BIN9,=X'3F
0x1b32b0…1b3444 Dummy {f00=0x0082, f01=0x018e, f02=»IN12 GET LITTERAL l P SUB BIN9,W1 ADJUST INDEX $ P ADD BIN12,BIN9 INCREASE DISPL. > P B B500 f EJECT v * * ( P***** USER- OR FORMAT-VALUE ***** * B300 & P MOVE DEINPUT,HEX00 CLEAR WORKITEM P MOV
0x1b3444…1b35d8 Dummy {f00=0x0082, f01=0x0190, f02=» . P CBE BIN9,W9,B315 JUMP IF SYSTEM VARIABLE P HANDLE ACCUMULATORS 6 P CALL CMPIND,BIN10,ACK(W1) T P BNOK A250 OUT OF RANGE v P MOVE DEINPUT,ACK(BIN10) P B B500 PB310 HANDLE USERVARIABELS P* P CALL CMPIND,BIN10,U
0x1b35d8…1b376c Dummy {f00=0x0082, f01=0x0190, f02=»NOK A250 IF OUT OF RANGE P MOVE BIN9,W4 P B B350 6 * F ***** FORMAT-FIELD ***** P * r B320 | * P CBNE BIN10,W0,B330 "CURRENT FIELD" ? 2 P MOVE BIN10,DEBINW3 UPDATE INDEX WITH CURRENT P* PB330 > P CALL
0x1b376c…1b3900 Dummy {f00=0x0082, f01=0x0190, f02=»R FORMAT-VALUE TO WORKITEM ***** * * > P CON X.MOVE,DEINPUT,X.PSEU1,X.PSEU2,X.WB10,BIN10 BCD-ITEM 4 P B B500 v * B350 ( P EDIT DEINPUT,WFORM(BIN9) STRG-ITEM EJECT * * $ ***** EXECUTE ARITHMETIC ***
0x1b3900…1b3a94 (1, 316) Dummy {f00=0x0083, f01=0x0190, f02=»BCDI21(W2),W0,W1,D1,W0 "+-SIGN" TO WORKITEM PB510 4 P IB BIN3,B520,B530,B540 @ " P ADD BCDI21(W1),BCDI21(W2) "+" ` P B B100 PB520 " P SUB BCDI21(W1),BCDI21(W2) "-" P B B100 PB530 " P MUL BCDI21(W1),BCDI21(W2) "*"
0x1b3a94…1b3c28 Dummy {f00=0x0083, f01=0x0190, f02=» n * B600 ( P TBF BOOL2,B610 NO ARITHMETIC DONE ? ( P MOVE DEINPUT,HEX00 CLEAR STRG-WORK J , P MOVE BIN10,W0 MOVE SUM TO STRG-WORK... v 6 P EDSUB DEINPUT,BIN10,WF3 ...AND GET LENGTH OF SUM PB610 $ P CBE BIN6,W2,B620 FORMAT-FIE
0x1b3c28…1b3dbc Dummy {f00=0x0083, f01=0x0190, f02=» USER-VARIABLE n P B B050 * & B620 0 ( P CBNE BIN7,W0,B640 CURRENT FIELD ?? < 0 P MOVE BIN7,DEBINW3 UPDATE WITH CURRENT INDEX h * B640 " P CALL GETFWD,BIN4,0,BIN7,BIN9 P CALL ADJUST,BIN4 * P GETCTL 1,BI
0x1b3dbc…1b3f50 Dummy {f00=0x0083, f01=0x0190, f02=»UT,BIN10,WF3 & P SUB BIN10,W1 ADJUST LENGTH OF SUM & P CMP BIN10,BIN9 RESULT LEN VS MAXL > P BE NUM h P BG B650 x P GETCTL 2,BIN9 GET MINL 4 P CBNL BIN10,BIN9,NUM IF RESULT LEN NOT LESS MINL , P SUB BIN9,BIN10 CALCULATE MISSING ZEROES
0x1b3f50…1b40e4 Dummy {f00=0x0083, f01=0x0190, f02=»UB BIN10,BIN9 CLEAR BYTE IN... P DLETE DEINPUT,W1,BIN10 & PNUM F 8 P CBE BCDI21(W1),:FMTITEM,CONT DONT DISPLAY IF EQUAL R PNUM100 * P ERASE 1,BIN7,BIN7 ERASE OLD CONTENTS P UPDFLD 1,DEINPUT PCONT 2 P CBE BIN7,DEBINW3,FINISH
0x1b40e4…1b4278 Dummy {f00=0x0083, f01=0x40a6, f02=»,W0 . P MATCH DEINPUT,BIN4,BIN9,:FMTITEM,W0,BIN9 P BOK CONT IF EQUAL CONTENTS > P B NUM100 b * t PEND ~ * END @ IN7,BIN7 ERASE OLD CONTENTS P UPDFLD 1,DEINPUT PCONT 2 P CBE BIN7,DEBINW3,FINISH
0x1b4278…1b440c Dummy {f00=0x0083, f01=0x2008, f02=» . P MATCH DEINPUT,BIN4,BIN9,:FMTITEM,W0,BIN9 P BOK CONT IF EQUAL CONTENTS > P B NUM100 b * t PEND ~ * END @ IN7,BIN7 ERASE OLD CONTENTS P UPDFLD 1,DEINPUT PCONT 2 P CBE BIN7,DEBINW3,FINISH
0x1b440c…1b45a0 Dummy {f00=0x0083, f01=0x0190, f02=» IF NOT BALACE z P PERF DERROR,DEKTAB6 P B ERRP20 2 PUPDR13 D P TSTCTL 5 LOOK IF CTAB R P BZ UPDR14 NO! p ( P DUPL STR2A LOOK IF KEYED INPUT = N P BOK UPDR18 YES! P TBF ASDFLAG,UPDR14 PUPDR18 & P PERF DERROR,DEKTABI
0x1b45a0…1b4734 (1, 317) Opaque[0x194]
0x1b4734…1b48c8 # DirEnt {nam=»DEVGAC«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1068, f03=0x0000}
0x1b4734…1b48c8 IdxSect {
0x1b4734…1b48c8 f00 = 0x0083 // 0x1b4734 @0x0
0x1b4734…1b48c8 f01 = 0x000c // 0x1b4736 @0x2
0x1b4734…1b48c8 gno = [ // 0x1b4738 @0x4
0x1b4734…1b48c8 [0x00]: C0x0083.0x1.0
0x1b4734…1b48c8 [0x01]: C0x0083.0x2.0
0x1b4734…1b48c8 [0x02]: C0x0083.0x3.0
0x1b4734…1b48c8 [0x03]: C0x0084.0x0.0
0x1b4734…1b48c8 [0x04]: C0x0084.0x1.0
0x1b4734…1b48c8 [0x05]: C0x0084.0x2.0
0x1b4734…1b48c8 ]
0x1b4734…1b48c8 }
0x1b48c8…1b4a5c Dummy {f00=0x0083, f01=0x0190, f02=» $ P IDENT DEVGAC REL 10.0 80-04-11 P 80-10-28/JAER , * D @ <* THIS PROGRAM-MODUL CONTAINS ENTRIES TO THE DIFFERENT N < 8* CONVERTIONS THAT OCCURS IN THE FORMAT GENERATION * DDUM DEDDIV PDIV P* , P
0x1b4a5c…1b4bf0 Dummy {f00=0x0083, f01=0x018e, f02=»SAGE | P* * P EXT CMPIND COMPARE INDEX (DIMENSION) * D P EXT EMPTYT CHECK EMPTY ITEM N P* r * KEYTABLES | * & P* USAGE: DATA ENTRY SCREEN * CLR EQU X'8F' CLEAR CAN EQU X'91' CANCEL
0x1b4bf0…1b4d84 Dummy {f00=0x0083, f01=0x018e, f02=» P* < P* VALIDATION- GENERATION- AND ACCUMULATION CONTROL P* N L P* THIS MODULE STEERS THE PROCESSING OF THE THREE DIFFERENT FUNCTIO X P* P* INPUT PARAMETERS: H P* FMTWK(W10) = NUMBER OF CHA
0x1b4d84…1b4f18 Dummy {f00=0x0083, f01=0x0190, f02=» L P* FMTWK(W12) = CALCULATE TOTAL NUMBER OF CHARCTE D P* DEBIN3 = POINTER FUNC,-TEXT-STRING T D P* DEBIN4 = POINTER CHARACTER-STRING : P* DEBINW2
0x1b4f18…1b50ac Dummy {f00=0x0083, f01=0x0190, f02=»ATION ` < P* = 3 = ACCUMULATION : P* STRG10A = FUNCTION TEXTS N 0 P* STR1A = WORK 0 P* BIN16 = WORK P* P* OU
0x1b50ac…1b5240 Dummy {f00=0x0083, f01=0x018e, f02=»* DEBINW1 = ERRORPOSITION IN CHARACTERSTRING D P* DEBINW4 = FIELDNR WHEN ERROR FOUND P PVGACNT PROC 4 P CALL EMPTYT,FORTAB(W1) CHECK IF 1ST LINE EMPTY P AFTER CORRECTION P BOK VGA
0x1b5240…1b53d4 (1, 318) Dummy {f00=0x0083, f01=0x0190, f02=» P AFTER CORRECTION P BOK VGAC03 NOT EMPTY * P MOVE FMTWK(W11),W0 EMPTY => NO CHARS > PVGAC03 l 2 P MOVE FMTWK(W12),FMTWK(W10) LOAD NUMB CHARS 1 z 0 P ADD FMTWK(W12),FMTWK(W11) ADD NUMB CHARS 2 4 P CBE FMTWK(W10),=X'50',VGAC10 JUMP I
0x1b53d4…1b5568 Dummy {f00=0x0083, f01=0x0190, f02=»MAX FILLED AND 2ND STRING j P* PARTIAL FILLED. " < P* -ACTION: DELETE EMPTY POSITIONS OF 1ST STRING B > P* WITH HELP OF THE REDEFINED ITEM JOBSPC : P* FINALLY DISPLAY IT IN SEQUENS AGAIN P*
0x1b5568…1b56fc Dummy {f00=0x0083, f01=0x0190, f02=»IN16 DELETE EMPTY CHARACTERS v * P MOVE BIN15,=X'A0' LOAD WITH MAXLENTH $ & P SUB BIN15,BIN16 COMPUTE STARTP]OS R > P XCOPY JOBSPC,BIN15,BIN16,DEINPUT,W0 FILL REST WITH X'00' | " P CBL FMTWK(W12),=X'51',VGAC05 P MOVE FMTWK(W11),FMTWK(W12) P
0x1b56fc…1b5890 Dummy {f00=0x0083, f01=0x0190, f02=»FMTWK(W11),W0 P EJECT PVGAC10 $ & P MOVE DEBIN4,W0 STARTPOS IN JOBSPC 2 . P MOVE STR1A,=C'#' WORK:=FUNCTIONSEPARATOR 0 P MOVE STRG10A,=C'V:G:A:' LOAD FUNCTION-TEXTS ( P MOVE DEBIN3,DEBIN4 LOAD ACTUAL POS 4 P MATCH JOBSPC,DEBIN3,W1,ST
0x1b5890…1b5a24 Dummy {f00=0x0083, f01=0x0190, f02=»IONINDEX:=0 z . P MATCH STRG10A,DEBINW2,W6,JOBSPC,DEBIN4,W2 " P BNOK VGAC90 JUMP IF NOT FOUND F . P MOVE FBIN1,DEBINW2 SAVE FUNCTEXT POINTER l P ADD DEBINW2,W2 P DIV DEBINW2,W2 . P TBF BOOL6,VGAC20 JUMP IF ORDINARY FORMAT 6 P CBE DEB
0x1b5a24…1b5bb8 Dummy {f00=0x0083, f01=0x0190, f02=»CTUAL POSITION v 4 P MOVE DEBIN2,FMTWK(W12) LOAD TOTAL NUMB OF CHARS . P SUB DEBIN2,DEBIN4 NUMB OF CHARS TO MATCH N D P MATCH JOBSPC,DEBIN3,DEBIN2,STRG10A,FBIN1,W2 JUST ONE FUNC EACH ( P BNOK VGAC35 NO MORE OF SAME FONC OK . P MOVE DEBIN4,DEBIN3
0x1b5bb8…1b5d4c Dummy {f00=0x0083, f01=0x018e, f02=»L POSITION r P MOVE STR1A,=C'#' 0 P MATCH JOBSPC,DEBIN3,DEBIN2,STR1A,W0,W1 NEXT , P BOK VGAC40 OK NEXT # FOUND ` 4 P MOVE DEBIN3,FMTWK(W12) LOAD WITH LAST POSITION PVGAC40 6 P MOVE FMTWK(DEBINW2),DEBIN3 LOAD ENDPOS OF CONTROL 6 P PER
0x1b5d4c…1b5ee0 Dummy {f00=0x0083, f01=0x0190, f02=» P SET ACKUM PVGAC45 8 P CBE DEBIN4,FMTWK(W12),VGAC99 JUMP IF END OF STRING $ P ADD DEBIN4,W1 NEXT POSITION ` P B VGAC15 P EJECT PVGAC90 . P TBF BOOL6,VGAC92 JUMP IF ORDINARY FORMAT " P ERASE 0,W13,W14 ERASE 2 LINES
0x1b5ee0…1b6074 (1, 319) Dummy {f00=0x0083, f01=0x0190, f02=»RASE 2LINES ON SCREEN ~ P DISPLAY 1,W12,W13 REDISPLAY 0 P MOVE DEBINW4,W12 FIELD TO MAKE CURRENT =19 B PVGAC94 v $ P MOVE BIN16,W1 1ST LINE CURRENT & P MOVE BIN15,=X'50' LOAD SIZE = 80 . P MOVE DEBINW1,DEBIN4 STORE ACTUAL POSITION & P
0x1b6074…1b6208 Dummy {f00=0x0083, f01=0x0190, f02=» DEBINW4,W1 FIELD TO MAKE CURRENT = +1 " P ADD BIN16,W1 2ND LINE CURRENT . PVGAC95 T P GETFLD 0,DEBINW4,DEBINW3 b " P MOVE DEBINW4,W6 ILLEGAL VALUE P PERF DERROR,DEKTAB4 > P XCOPY DEINPUT,W0,BIN15,FORTAB(BIN16),W0 RELOAD FALSE LINE P
0x1b6208…1b639c Dummy {f00=0x0083, f01=0x0190, f02=»CHARS STRG2:=0 t P CMP W1,W1 CR = 0 PVGACEX 0 P RET > P PEND J P EJECT X P* f , P* CONTROL VARIABLE NUMBER (INDEX) p P* & P* INPUT PARAMETERS (FORMAL): J P* CHNUM = NUMBER O
0x1b639c…1b6530 Dummy {f00=0x0083, f01=0x0190, f02=» DEBIN4 = STRG TO CONTROL r P* $ P* INPUT PARAMETERS: . L P* VALSTR = VAL/GEN/ACC---CHARACTERSTRIN P H P* DEBIN4 = POINTER CHARACTER-STRING P* H P* WORKITEMS
0x1b6530…1b66c4 Dummy {f00=0x0083, f01=0x0190, f02=» BIN15 = LENGTH OF VALSTR J P* BIN16 = MATCHING-POINTER 'VALSTR' < P* P* OUTPUT PARAMETERS : 6 P* 'CR' = 0 , OK : P*
0x1b66c4…1b6858 Dummy {f00=0x0083, f01=0x0190, f02=»****************************************************************** " PCNTNUM PROC WSTRG,CHNUM(),WIND J , P MOVE BIN15,=W'31' LOAD LENGTH OF VALSTR p * P CLEAR BOOL8 F=NO TREASPASSING OF DUPL P CLEAR BOOL4 P EJECT PCNT00 P MOVE BIN1
0x1b6858…1b69ec Dummy {f00=0x0083, f01=0x0190, f02=» " P CBE BIN16,W0,CNTM JUMP IF 'M' ( P IB BIN16,CNT0,CNT0,CNT0,CNT0, 1-4 C . & P CNT3,CNT2,CNT0,CNT2,CNT2, 5-9 C Z ( P CNT1,CNT3,CNT2,CNT2,CNT0, 10-14 C ( P CNT0,CNT0,CNT0,CNT0,CNT0, 15-19 C * P CNT0,CNT0,CNT0,CNTLL,CNNOKL, 20-24 C
0x1b69ec…1b6b80 Dummy {f00=0x0083, f01=0x018e, f02=» n ( P IB BIN16,CNT0,CNT0,CNT0,CNT0, 1-4 C & P CNT3,CNT2,CNT0,CNT2,CNT2, 5-9 C 4 ( P CNT1,CNT3,CNT2,CNT2,CNT0, 10-14 C ^ ( P CNT0,CNT0,CNT0,CNT0,CNT0, 15-19 C * P CNT0,CNT0,CNT0,CNTL,CNNOKL, 20-24 C . P CNTCC,CNNOKL,CNNOKL,CNT0,CNNOKL, 2
0x1b6b80…1b6d14 (1, 320) Dummy {f00=0x0084, f01=0x018e, f02=» ( P IB BIN16,CNT0,CNT0,CNT0,CNT0, 1-4 C & P CNT3,CNT2,CNT0,CNTCC,CNT2, 5-9 C 0 ( P CNT1,CNT3,CNT2,CNT2,CNT0, 10-14 C Z ( P CNT0,CNT0,CNT0,CNT0,CNT0, 15-19 C ( P CNT0,CNT0,CNT0,CNTL,CNT0, 20-24 C 0 P CNNOKL,CNNOKL,CNNOKL,CNNOKL,CNNOKL 25-29
0x1b6d14…1b6ea8 Dummy {f00=0x0084, f01=0x018e, f02=» P SET BOOL8 DUPL PASSED ONCE & P CBE BIN16,W0,CNNOKL M NOT ALLOWED ( , P IB BIN16,CNNOK,CNNOK,CNNOK,CNNOK 1-4 C R & P CNT0,CNNOK,CNNOK,CNT2,CNT2 5-9 C P CNT1,CNT3,CNT2 10-12 PCNNOKL P B CNNOK PCNTLL P B CNTL P E
0x1b6ea8…1b703c Dummy {f00=0x0084, f01=0x0190, f02=» , P MOVE DEBIN3,DEBIN4 LOAD ACTUAL POSITION 2 P MATCH WSTRG,DEBIN3,W1,VALSTR,W23,W1 M'...' ? 4 P BOK CNTL M'......' j P SUB DEBIN4,W1 ADJUST P B CNT2 M99 P EJECT PCNTCC CONDITIONAL GEN/ACC P ADD DEBIN4,W1 NEXT POD0S
0x1b703c…1b71d0 Dummy {f00=0x0084, f01=0x0190, f02=» CHAR ^ P BOK CNTLP LEFT PARENTESIS 2 P CBE WIND,W2,CNNOKL G OR A NOT ALLOWED IN GEN 0 ( P SUB DEBIN4,W1 ADJUST FOR ORDIN ACC f P B CNT2 P* P* P* PCNTLP LEFT PARENTHESIS $ P SET BOOL4 T=COND GEN/ACC FOUND P
0x1b71d0…1b7364 Dummy {f00=0x0084, f01=0x0190, f02=»OUND l P BNZ CNT0 P B CNNOKL P EJECT 0 P* > P* CNT0 NO CONTROL H P* h PCNT0 r P ADD DEBIN4,W1 NEXT POS ~ > P CBE DEBIN4,CHNUM(WIND),CNTOKLB JUMP IF END OF LINE FOUND P B CNT00 GO ON PCNTOKLB P B
0x1b7364…1b74f8 Dummy {f00=0x0084, f01=0x0190, f02=»CK f P BNOK CNNOK JUMP IF NOT OK P CALL CMPIND,DEBIN2,USEV(W1) , P BNZ CNNOK OUT OF RANGE P P B CNT0 GO ON p P EJECT P* $ P* CNT2 CONTROL OF 2 BYTES , P* -M,-L,-A,-S,-T,-C P* PCNT2
0x1b74f8…1b768c Dummy {f00=0x0084, f01=0x0190, f02=»CNT2C S 10 P CBE BIN16,W12,CNT2E T -- P* 4 P* M,L,C,F+,G+,D+ > P* $ P CBL DEBIN2,W0,CNNOK <00 NOT OK f ( P CBG DEBIN2,=W'99',CNNOK >99 NOT OK P B CNT2F P* P* A P* PCNT2B P CALL CMPI
0x1b768c…1b7820 Dummy {f00=0x0084, f01=0x0190, f02=»ND,DEBIN2,SYSV(W1) P BNZ CNNOK OUT OF RANGE P B CNT2F : PCNT2E J $ P CBL DEBIN2,W1,CNNOK <01 NOT OK X ( P CBG DEBIN2,=W'94',CNNOK >94 NOT OK , P MOVE DEBIN3,DEBIN4 LOAD WORKPOSITIONER ( P ADD DEBIN3,W2 ADJUST WORKPOSITIONER 2 P
0x1b7820…1b79b4 (1, 321) Dummy {f00=0x0084, f01=0x0190, f02=» DEBIN4,W2 ADJUST POINTER IF OK . P MOVE BIN16,W6 SIMULATE L TO CHECK VS-IND ( P B CNT2 Z PCNT2F j P ADD DEBIN4,W1 NEXT POS x P B CNT0 GO ON P EJECT P* , P* CNT3 CONTROL OF 3 BYTES -D,-F P* PCNT3
0x1b79b4…1b7b48 Dummy {f00=0x0084, f01=0x0190, f02=»ONER p < P MATCH VALSTR,DEBIN3,W2,WSTRG,DEBIN4,W1 RELATIVE SIGN ? " P BNOK CNT3Z NO REL SIGN FOUND L . P CBNE WIND,W4,CNT2 JUMP IF NOT DUPL-STRING r 0 P CBE DEBIN3,W15,CNNOK F+ NOT ALLOWED IN DUPL " P B CNT2 CONTROL FOR 2CHARCTERS PCNT3Z
0x1b7b48…1b7cdc Dummy {f00=0x0084, f01=0x0190, f02=»,CNNOK < 0 NOT OK * P CBG DEBIN2,=W'999',CNNOK > 999 NOT OK $ P CBE BIN16,W5,CNT3A JUMP IF 'D' H P B CNT3B JUMP IF 'F' OR 'G' p PCNT3A . P CBNL BIN10,DEBIN2,CNT3B FXX NOT < DXX OK P B CNNOK JUMP IF ERROR PCNT3B P ADD DEB
0x1b7cdc…1b7e70 Dummy {f00=0x0084, f01=0x0190, f02=» 4 P CBNL DEBIN4,CHNUM(WIND),CNNOK JUMP, IF OFERFLOW ! ( P MOVE DEBIN2,CHNUM(WIND) SAVE ENDPOS ! < , P SUB DEBIN2,DEBIN4 NUMB OF CHRS TO MATCH ! h * P MOVE DEBIN3,DEBIN4 STARTPOS IN MATCH ! : P MATCH WSTRG,DEBIN3,DEBIN2,VALSTR,W23,W1 MATCH NEXT ' ! P BNO
0x1b7e70…1b8004 Dummy {f00=0x0084, f01=0x0190, f02=» ! n 6 P CBE BIN16,W26,CNTLFK JUMP IF COND FORM CHANGE (R) " 6 P CBE BIN16,W27,CNTLFK JUMP IF COND FORM CHANGE (N) " B P B CNTLOK " | PCNTLFK " 0 P CBG DEBIN3,W6,CNNOK FORMAT NAME > 6 NOT OK " PCNTLOK " & P ADD DEBIN4,DEBIN3 ADJUST NEXT POS " P
0x1b8004…1b8198 Dummy {f00=0x0084, f01=0x0190, f02=»T POINTER POSITION " | 4 P CBNL DEBIN4,CHNUM(WIND),CNNOK JUMP IF OVERFLOW # P B CNTL JUMP LITERAL CONTROL # R P EJECT # v PCNNOK # ( P CBNE WIND,W4,CNNCR JUMP IF NOT DUPL # 0 P MOVE DEBINW1,DEBIN4 RESTORE ERROR-POSITION # . P ADD DEBINW1,W1 ADJUST
0x1b8198…1b832c Dummy {f00=0x0084, f01=0x0190, f02=» B CNRT # PCNTOK $ : P TBT BOOL4,CNNOK NOT OK IF COND GEN/ACC NOT CONCLUDED $ P CMP W1,W1 CLEAR CR $ PCNRT $ x P RET $ P PEND $ P EJECT $ P* $ B P* THIS PROCEDURE CHECKS IF RIGHT NUMBER OF REAL DIGITS $ @ P* HA
0x1b832c…1b84c0 Dummy {f00=0x0084, f01=0x0190, f02=»RS (FORMAL) : WSTRG = WORKSTRING CONTAINS DIGIT $ x L P* CHNUM = ENDPOSITION IN WSTRG FOR % 8 B P* WIND = INDEX TO CHNUM % L P* NUMB = NUMBER OF D
0x1b84c0…1b8654 (1, 322) Dummy {f00=0x0084, f01=0x0190, f02=» PARAMETERS : DEBIN3 =WORKAREA % < P* STR6A = WORKAREA & 0 < P* BCD13A = WORKAREA & p P* & L P* OUTPUT PARAMETERS : DEBIN2 = CHECKED DIGITS BINARY STO & L
0x1b8654…1b87e8 Dummy {f00=0x0084, f01=0x0190, f02=» : P* CR/= 0 = NOT OK ' L P************************************************************************ ' B ( PDIGCHK PROC WSTRG,CHNUM(),WIND,NUMB ' * P ADD DEBIN4,W1 ADJUST POINTER POSITION ' , P MOVE DEBIN3,DEBIN4 SAVE POI
0x1b87e8…1b897c Dummy {f00=0x0084, f01=0x4180, f02=»HEX00 INITIALIZE:=00000000 ' & P XCOPY STR6A,W0,NUMB,WSTRG,DEBIN4 ( " P MOVE BCD13A,STR6A STR=>BCD ( L P MOVE DEBIN3,W0 ( p P EDSUB STR6A,DEBIN3,FSCONV ( ( P CMP DEBIN3,NUMB CHECK IF EQUAL = OK ( P MOVE DEBIN2,BCD13A BCD=>BIN ( PDIGC99 ( P
0x1b897c…1b8b10 Dummy {f00=0x0084, f01=0x2008, f02=» ) P MOVE BCD13A,STR6A STR=>BCD ' P MOVE DEBIN3,W0 ' . P EDSUB STR6A,DEBIN3,FSCONV ' F ( P CMP DEBIN3,NUMB CHECK IF EQUAL = OK ' h P MOVE DEBIN2,BCD13A BCD=>BIN ' PDIGC99 ' P RET ' P PEND ' P EJECT ' PFSCONV FRMT ' P FMEL
0x1b8b10…1b8ca4 Dummy {f00=0x0084, f01=0x4014, f02=» HNOD @ &| 0$ * & ) ' 0 @vT &z @ P $0 $} W . $ G xyj &"x x* !!4 ! 4 * & _ M 7 G X } S = DEACC * & @ + j
0x1b8ca4…1b8e38 Dummy {f00=0x0084, f01=0x018e, f02=» IDENT P:S023 * & Ii " !W ! 0 " * & - " P !, ! ? Ij { P * & K j 1! !j 2! !Hj 1j !&m $ ~ * & i r"Ii' U ! ( j !! ( * & ) x. .K .*W x( H * &
0x1b8e38…1b8fcc Dummy {f00=0x0084, f01=0x0190, f02=» * & ! Ij 0# : 0$ P8: _ 0 && * & du d ! 0 ## #_* / 2 * & ; ! !( % A _ 0&I I I I Ij ` * & Y & # x 0* )+ W20* *+ W(0 * & w * ,, W ! $ 0' / T W * & 0' - T ! 2 W
0x1b8fcc…1b9160 Dummy {f00=0x0084, f01=0x0190, f02=» I .4 t * & ? "(0. _*Am #02W 03W 04W X * & + Z [ +( H I C_ 1( _ @ * & I T 1( !05 ? 2 ? n * & g W #0- T %y0 %%_ W}? * & ( 0&W !0) ( 1( ? 06 . * & ? Hi H
0x1b9160…1b92f4 (1, 323) Opaque[0x194]
0x1b92f4…1b9488 # DirEnt {nam=»DERECS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1098, f03=0x0000}
0x1b92f4…1b9488 IdxSect {
0x1b92f4…1b9488 f00 = 0x0084 // 0x1b92f4 @0x0
0x1b92f4…1b9488 f01 = 0x000e // 0x1b92f6 @0x2
0x1b92f4…1b9488 gno = [ // 0x1b92f8 @0x4
0x1b92f4…1b9488 [0x00]: C0x0084.0x3.0
0x1b92f4…1b9488 [0x01]: C0x0085.0x0.0
0x1b92f4…1b9488 [0x02]: C0x0085.0x1.0
0x1b92f4…1b9488 [0x03]: C0x0085.0x2.0
0x1b92f4…1b9488 [0x04]: C0x0085.0x3.0
0x1b92f4…1b9488 [0x05]: C0x0086.0x0.0
0x1b92f4…1b9488 [0x06]: C0x0086.0x1.0
0x1b92f4…1b9488 ]
0x1b92f4…1b9488 }
0x1b9488…1b961c Dummy {f00=0x0084, f01=0x0190, f02=» $ P IDENT DERECS REL 10.0 80-04-11 P UPD 80-05-13/DALI , P 80-04-14/DALI H DDUM DEDDIV ` PDIV t P ENTRY DERECS P ENTRY DEREFO EXT ATTDB EXT ATTWB EXT RESTOR EXT SAVE EXT DEPOOL
0x1b961c…1b97b0 Dummy {f00=0x0084, f01=0x0190, f02=» P EXT TESTB P EXT MSKOUT EJECT * PDERECS PROC FC 8 * P CALL RESTOR,W0,W4,PWBDB4 RESTORE RBUF N 6 P XCOPY WORK(W10),W1,W1,RBUF,PRECCUR INITIAL STATUS | P CALL UPDBIN,BIN1 P CLEAR BOOL9 P MOVE BIN11,FC * P IB FC,ENTNEW,
0x1b97b0…1b9944 Dummy {f00=0x0084, f01=0x0190, f02=»DATARECORD ********************** PENTNEW FC= 1 0 . P XCOPY RBUF,PRECCUR,W1,BIN1,W1 REC.STATUS F MOVE PRECPR,PRECCUR x ADD PRECCUR,RECLNTH 2 P XCOPY RBUF,W6,W2,PRECCUR,W0 STORE USED SPACE . P CBE NUMBER,=D'0',DROK00 JUMP IF
0x1b9944…1b9ad8 Dummy {f00=0x0084, f01=0x0190, f02=»30 JUMP IF NOT SPACE z P CLEAR DOOL4 P BNZ DROK00 0 PENTN20 D * P CBNE FC,W7,ENTN25 JUMP IF NOT GETLST R 0 P CBNE NUMBER,=D'0',ENTN25 JUMP IF NOT FIRST P CLEAR BOOL9 P B NEWR70 PENTN25 , P XCOPY RBUF,PRECCUR,RECLNTH,RBUF
0x1b9ad8…1b9c6c Dummy {f00=0x0084, f01=0x018e, f02=» ENTN40 P MOVE PRECCUR,PRECPR P XCOPY RBUF,W6,W2,PRECPR,W0 , P B DRNO00 P PENTN40 b 8 P XCOPY BDPOIN(W1),W0,W2,RBUF,W2 LAST ENTERED RECORD p . P TBF DEPROMPT,ENT45 JUMP IF NOT NEW FORMAT $ P CBE FC,W7,ENT45 JUMP IF GETLAST , P M
0x1b9c6c…1b9e00 Dummy {f00=0x0084, f01=0x0190, f02=» t PENTN50 SUB PRECPR,PRECCUR P DLETE RBUF,PRECCUR,PRECPR * PENTN55 L , P XCOPY RBUF,PRECCUR,W1,BPOOL(PINDFR),W0 Z PENTN60 P MOVE PRECPR,PRECCUR P EJECT P********************** P* RETURN FROM DERECS * P**********
0x1b9e00…1b9f94 (1, 324) Dummy {f00=0x0085, f01=0x0190, f02=»ROK10 PDROK05 P CBNE FC,W7,DROK10 8 P XCOPY BDPOIN(W1),W0,W2,RBUF,W2 LAST ENTERED RECORD 6 PDROK10 r ( P CBE PINDFR,W0,DROK20 NO CURR FORMAT 6 P CALL ATTDB,BPOOL(PINDFR),W4,W10 FORMAT DESCRIPTOR P MOVE BIN14,FLIND(W1) P ATT
0x1b9f94…1ba128 Dummy {f00=0x0085, f01=0x0190, f02=»C P DROK45 ENTOLD C P DROK70 ENTLST C $ P DROK70 GETNXT C > P DROK70 GETCUR C X P DROK70 GETPRE C r P DROK65 GETLST C P DROK70 DELREC C P DROK65 INSREC C P DROK70 NEWREC C P DROK70 OPENBC C
0x1ba128…1ba2bc Dummy {f00=0x0085, f01=0x0190, f02=» TBF DBOMVR,DROK56 JUMP IF NOT MUST VERIFY 2 P CALL TESTB,WORK(W10),W10 LOOK IF OLD VERIFIED 2 P BZ DROK52 NOT! h , P TBT DBOVER,DROK56 JUMP IF NEW VERIFIED & PDROK50 RECORD TO VERIFY ENTERED 0 P ADD BDPOIN(W5),W1 INCREASE NUMBER TO VERIFY
0x1ba2bc…1ba450 Dummy {f00=0x0085, f01=0x018e, f02=»P IF RECORD VERIFIED NOW z * P CBNE FC,W2,DROK50 JUMP IF NEW RECORD P B DROK56 OLD RECORD N PDROK54 VERIFIED RECORD j 2 P SUB BDPOIN(W5),W1 DECREASE NUMBERS TO VERIFY ( P BNZ DROK56 ALL RECORDS NOT VERIFIED P SET BDAVER VERIFIED BATCH
0x1ba450…1ba5e4 Dummy {f00=0x0085, f01=0x018e, f02=» P BNZ DROK57 YES! , P TBF DBOFOR,DROK60 NEW RECORD NOT FORCED 0 P ADD BDPOIN(W4),W1 INCREASE NUMBER OF FORCED L * P SET BDAFOR BATCH WITH FORCED RECORDS P B DROK60 PDROK57 ( P TBT DBOFOR,DROK60 NEW RECORD FORCED 0 P SUB BDPOIN(W4
0x1ba5e4…1ba778 Dummy {f00=0x0085, f01=0x0190, f02=» $ P CBE FC,W2,DROK70 JUMP IF ENTOLD PDROK65 0 . P CBNL FC,W12,DROK70 JUMP IF RECORD INSERT > , P ADD NUMBER,=D'1' ADJUST CURRENT REC.NO p PDROK70 P CALL UPDBOL,BIN1 PDROK71 P MOVE BCDI21(W3),NUMBER P CMP W1,W1 CONDITI
0x1ba778…1ba90c Dummy {f00=0x0085, f01=0x0190, f02=» ^ PDRNO10 . P CALL ATTWB,RBUF,PRECCUR,W10 FIX WORKBLOCK P CBNE PINDFR,W0,DRNO20 H P CBE FC,W7,DRNO15 GETLST f P CBNE FC,W4,DRNO20 GETNXT PDRNO15 P ADD NUMBER,=D'1' PDRNO20 P CLEAR DOOL1 P CMP W1,W2 CONDITION =
0x1ba90c…1baaa0 Dummy {f00=0x0085, f01=0x0190, f02=»1),CURSEC SAVE LAST SECTOR P PERF OFRSP,CURSEC,FILINDUS " P B DROK10 F P EJECT X * P************************************** f * P* ENTER OLD RECORD AFTER CORRECTION. * * P************************************** PENTOLD FC= 2 P C
0x1baaa0…1bac34 (1, 325) Dummy {f00=0x0085, f01=0x0190, f02=»ERR DRNO00 P B DROK00 P EJECT $ P************************* 2 P* ENTER LAST DATARECORD. T P************************* t PENTLST FC= 3 , P XCOPY BIN14,W0,W2,RBUF,W2 LINK TO PREV PENTL10 , P XCOPY PRECCUR,W0,W2,RBUF,W6 U
0x1bac34…1badc8 Dummy {f00=0x0085, f01=0x0190, f02=»DEDISC,BIN13 DELETE BATCH P BERR DRNO00 " P B DROK71 6 PENTL15 H " P PERF DEDISC,W17 DELETE SECTOR V P BERR DRNO00 | P MOVE CURSEC,BIN14 P B GETL05 PENTL20 P MOVE BDPOIN(W1),CURSEC P PERF DEDISC,W8 ENTER LAST
0x1badc8…1baf5c Dummy {f00=0x0085, f01=0x0190, f02=»GET LAST RECORD PENTL30 P MOVE BDPOIN(W1),BIN14 & P B DRNO00 D EJECT V *********************** d * GET NEXT RECORD *********************** PGETNXT FC= 4 P XCOPY BIN14,W0,W2,RBUF,W6 P MOVE PRECPR,PRECC
0x1baf5c…1bb0f0 Dummy {f00=0x0085, f01=0x0190, f02=»,RECLNTH P MOVE BIN13,PRECCUR * P MOVE BIN12,CURSEC SAVE CURRENT SECTOR , 6 P CBL PRECCUR,BIN14,GETN43 JUMP IF MOORE IN SECTOR Z PGETN10 , ( XCOPY BIN13,W0,W2,RBUF,W4 GET NEXT LINK 0 P CBNE BIN13,W0,GETN30 JUMP IF MOORE SECTORS PGE
0x1bb0f0…1bb284 Dummy {f00=0x0085, f01=0x0190, f02=»DEDISC,BIN13 P CBNE DEBINW4,W0,DRNO00 PGETN28 4 & P MOVE DEBINW4,W15 NO MOORE RECORDS B P B DRNO00 l PGETN30 ~ & ! PERF DEDISC,W15 READ NEXT SECTOR P BERR DRNO00 . ) XCOPY BIN13,W0,W2,RBUF,W6 GET USED SPACE , P CBNE BIN13,
0x1bb284…1bb418 Dummy {f00=0x0085, f01=0x0190, f02=» x P MOVE PRECCUR,W10 P MOVE PRECPR,PRECCUR " P* > P MOVE BIN13,PRECCUR H PGETN43 d * P ADD BIN13,W7 GET RECLNTH IN DATRECORD r $ P XCOPY RECLNTH,W0,W2,RBUF,BIN13 PGETN45 * P ADD NUMBER,=D'1' INCREASE CURR RECNO PGETN
0x1bb418…1bb5ac Dummy {f00=0x0085, f01=0x0190, f02=»SECTOR x PGETN55 P MOVE BIN15,W0 0 P XCOPY BIN15,W0,W1,RBUF,PRECCUR RECORDSTATUS 2 * P CALL MSKOUT,BIN15,WORK(W12) MSK-WORD f P CBE BIN15,WORK(W11),GETN70 & P CBE FC,W6,GETN60 JUMP IF GETPREV P CBE FC,W3,GETN60 OR ENTLST P C
0x1bb5ac…1bb740 Dummy {f00=0x0085, f01=0x0190, f02=»BE NUMBER,=D'0',GETN70 BATCHHEAD REACHED P SUB BCDI21(W3),=D'1' 0 " P B GETPRE GET PREVIOUS RECORD N PGETN70 t P MOVE BIN13,PRECCUR P ADD BIN13,W1 P B GETL90 P EJECT " P***************************** P* GET CURRENT
0x1bb740…1bb8d4 (1, 326) Dummy {f00=0x0085, f01=0x0190, f02=»=D'0',GETC60 OR BATCHHEAD , P XCOPY BIN11,W0,W2,RBUF,W4 LINK TO NEXT " 0 P CBNE PRECPR,PRECCUR,GETC10 JUMP IF NOT THE R " P FIRST RECORD WITHIN SECTOR " P B GETP10 GET PREVIOUS RECORD PGETC10 P MOVE BIN13,W1 * P ADD BIN13,PRECPR
0x1bb8d4…1bba68 Dummy {f00=0x0085, f01=0x018e, f02=»MP IF NOT LAST x P ENTERED SECTOR P CBNE STR6A,FORMAT,GETC30 0 P CMP FC,W7 R P BZ ENTN10 JUMP IF GETLST d P B ENTN25 PGETC30 SET DEPROMPT P B DROK00 PGETC40 * P XCOPY RBUF,W2,W2,CURSEC,W0 LINK PREV P MOVE
0x1bba68…1bbbfc Dummy {f00=0x0085, f01=0x0190, f02=» f P CBNE STR6A,FORMAT,GETC50 P B ENTN50 * PGETC50 < P SET DEPROMPT J P B ENTN60 ` PGETC60 r P MOVE BIN13,=W'33' P PERF DEDISC,BIN13 P BERR DRNO00 P B DROK00 P EJECT " P*****************************
0x1bbbfc…1bbd90 Dummy {f00=0x0085, f01=0x018e, f02=» B GETL40 PGETP10 P CBE PRECCUR,W10,GETP20 P B GETL20 @ PGETP20 R * P MOVE BIN12,CURSEC SAVE CURRENT SECTOR ` PGETP30 ( P XCOPY BIN13,W0,W2,RBUF,W2 LINK PREV P CBNE BIN13,W0,GETP40 P B GETN20 PGETP40 . ) X
0x1bbd90…1bbf24 Dummy {f00=0x0085, f01=0x0190, f02=» p P B GETP48 PGETP45 ( P MOVE BIN14,W16 GET PREVIOUS SECTOR ( PGETP48 T P PERF DEDISC,BIN14 b P BERR GETN20 | PGETP50 . ) XCOPY BIN13,W0,W2,RBUF,W6 GET USED SPACE P CBE BIN13,W10,GETP30 ( P CBE BIN14,W17,GETL05 DELE
0x1bbf24…1bc0b8 Dummy {f00=0x0085, f01=0x0190, f02=»*************** PGETLST FC= 7 P MOVE BIN12,CURSEC . 0 P CBE BDPOIN(W1),W0,GETL05 LAST SECTORADRESS H 2 P CBE CURSEC,BDPOIN(W1),GETL15 CURR.SEC IN RBUF | P MOVE CURSEC,BDPOIN(W1) PGETL05 P MOVE BIN14,=W'33' P PERF DEDISC,B
0x1bc0b8…1bc24c Dummy {f00=0x0085, f01=0x0190, f02=»PR,W10 PGETL25 " P XCOPY BIN13,W0,W2,RBUF,BIN14 ( P CBE BIN13,W0,GETL27 ERROR IN SECTOR B P ADD PRECPR,BIN13 n P ADD BIN14,BIN13 P CBL PRECPR,PRECCUR,GETL25 0 P CBE PRECPR,PRECCUR,GETL30 LAST RECORD FOUND PGETL27 SERIOUS E
0x1bc24c…1bc3e0 Dummy {f00=0x0085, f01=0x0190, f02=» PGETL40 MOVE BIN13,PRECPR P ADD BIN13,W1 $ ( P CBNE FC,W5,GETL50 JUMP BACK IF GET : P B GETC20 CURRENT RECOPRD f PGETL50 $ P CBE FC,W7,GETL60 JUMP IF GETLST P MOVE PRECCUR,PRECPR P SUB NUMBER,=D'1' $ P CBE FC,W3,GETL53 JU
0x1bc3e0…1bc574 (1, 327) Dummy {f00=0x0085, f01=0x0190, f02=» PGETL60 P MOVE NUMBER,BDPOIN(W2) PGETL90 2 " P COPY DEINPUT,W0,W6,RBUF,BIN13 @ P SET BOOL9 f P B NEWREC x P EJECT POTHERS $ P SUB BIN11,W7 ADJUST FOR DEREC2 : P IB BIN11,DELREC,INSREC,NEWREC,OPENBC,ENTINS,FREREC C
0x1bc574…1bc708 Dummy {f00=0x0085, f01=0x0190, f02=»BE BIN14,W17,GETP50 P B GETPRE " P* RESERV SPACE FOR INSERTION * . " P* OF A NEW DATARECORD. * T PINSREC FC= 9 z P PERF DEREC2,BIN11 P BERR DRNO00 P B DROK00 P EJECT P******************** P* CHANGE FORMA
0x1bc708…1bc89c Dummy {f00=0x0085, f01=0x018e, f02=»F NOT BATCHHEAD p $ P CBE FC,W7,NEWR07 JUMP IF GETLST P MOVE BIN13,W20 @ P B NEWR32 X PNEWR05 j P TBF DOOL8,NEWR10 x PNEWR07 P MOVE BIN13,W1 P B NEWR32 PNEWFRM P SET BOOL9 PNEWR10 P TBF BOOL9,NEWR15
0x1bc89c…1bca30 Dummy {f00=0x0085, f01=0x0190, f02=» PNEWR20 ! P MOVE STR6A,DEINPUT ! * PNEWR25 CBE STR6A,FORTAB(BIN13),NEWR30 ! . P ADD BIN13,W1 ! P CBNE BIN13,DEBINW4,NEWR25 ! r P TBF BOOL9,NEWR28 ! P CBG BIN13,W10,NEWR28 ! P MOVE BIN13,W0 ! P B NEWR35 ! PNEWR28 ! P MOVE
0x1bca30…1bcbc4 Dummy {f00=0x0085, f01=0x0190, f02=»13) ! z PNEWR35 " P CBNE FORMAT,STR6A,NEWR37 " P TBF BOOL9,NEWR34 " < P CBE FC,W14,NEWR36 " V P B NEWR74 " p PNEWR34 " , P TBF DOOL8,NEWR36 JUMP IF NOT BATCHHEAD " " P B ENTN10 ENTRY NEW BATCHHEAD " PNEWR36 " P B DROK00 " PNE
0x1bcbc4…1bcd58 Dummy {f00=0x0085, f01=0x0190, f02=»TLST " t P CBNE NUMBER,=D'0',NEWR40 # P MOVE FRMTPNTR,SYMREC(W10) # . P B NEWR45 # P PNEWR40 # b P CBNE BIN13,W0,NEWR43 # p P MOVE FRMTPNTR,W0 # P B NEWR45 # PNEWR43 # P MOVE FRMTPNTR,SYMREC(BIN13) # PNEWR45 # P PERF DEDISC,W
0x1bcd58…1bceec Dummy {f00=0x0085, f01=0x0190, f02=» CBE DEBINW4,W9,NEWR28 NOT FOUND # P B DRNO00 $ ( PNEWR46 $ : & P ATTFMT FFETCH ATTACH DUMMYFORMAT $ H P DISPLAY 0,W1,W0 $ r P THOME $ * P CBNE PINDFR,W0,NEWR48 ATTACHED FORMAT $ PNEWR47 $ P MOVE BIN13,W7 $ P ADD BIN13,PRECCUR $ " P CBN
0x1bceec…1bd080 Dummy {f00=0x0085, f01=0x0190, f02=» XCOPY RECLNTH,W0,W2,RBUF,BIN13 $ P B DRNO00 % ( PNEWR48 % : ( P PERF DEPOOL,W6,PINDFR,BIN14,STRG10A % H P MOVE FORMAT,HEX00 % t P B NEWR35 % PNEWR49 % P MOVE FORMAT,DEINPUT % $ P CBE FC,W4,NEWR50 JUMP IF GETNXT % $ P CBE FC,W7,NEWR50 JUMP
0x1bd080…1bd214 (1, 328) Dummy {f00=0x0086, f01=0x0190, f02=»CHHEAD % l PNEWR50 & 0 P CBNE BIN13,W0,NEWR52 EXIST IN JOBDEFINITION & PNEWR51 & P $ P MOVE SYMBOL,FORMAT NO SYMBOLIC & ^ P B NEWR65 & PNEWR52 & P MOVE SYMREC(BIN13),FRMTPNTR & P ADD BIN13,W10 & P B NEWR60 & PNEWR55 & P MOVE SY
0x1bd214…1bd3a8 Dummy {f00=0x0086, f01=0x0190, f02=»PRECCUR & P TBT BOOL9,NEWR77 ' PNEWR75 ' * * P XCOPY RBUF,BIN13,W1,BPOOL(PINDFR),W0 ' 8 P B NEWR80 ' f PNEWR77 ' x P CBE FC,W14,NEWR75 ' PNEWR74 ' P CBNE FC,W7,NEWR78 ' & P CBE NUMBER,=D'0',NEWR76 BATCHHEAD ' & P XCOPY RBUF,PRECCUR,W9
0x1bd3a8…1bd53c Dummy {f00=0x0086, f01=0x0190, f02=»30 ' P B DROK00 ( PNEWR80 ( P ADD BIN13,W1 ( * " P XCOPY RBUF,BIN13,W6,FORMAT,W0 ( @ P ADD BIN13,W6 ( f $ P XCOPY RBUF,BIN13,W2,RECLNTH,W0 ( | , P CBNE FC,W11,NEWR90 JUMP IF NOT OPEN BC ( P B DROK00 ( PNEWR90 ( P SET DOOL4 ( P B
0x1bd53c…1bd6d0 Dummy {f00=0x0086, f01=0x0190, f02=» WANTED BATCH. ( P* ) * P************************************** ) POPENBC FC=11 ) N P PERF DEREC2,BIN11 ) d P BNOK DRNO20 ) ~ 0 P CALL TESTB,RECFIL,FILINDUS LOOK IF RECOVERY ) P BZ OPBC05 JUMP IF NOT ) " P TEST DOOL1 LOOK IF THIS BATCH )
0x1bd6d0…1bd864 Dummy {f00=0x0086, f01=0x0190, f02=»E BIN11,W5,OPBC10 ) P* SEARCH OR CONVERSION MODE * POPBC07 * > * P IB BIN12,DROK71,DROK71,OPBC20,DROK00 * L POPBC10 * z P TEST DOOL8 * P BZ DROK00 * 0 P CALL TESTB,RECFIL,FILINDUS LOOK IF RECOVERY * P BNZ DROK00 YES * P SUB BDPOIN(W2
0x1bd864…1bd9f8 Dummy {f00=0x0086, f01=0x0190, f02=»NG GETN50 * P MOVE NUMBER,BDPOIN(W2) + * P PERF DEPOOL,W6,PINACC,DEBINW3,STRG10A + 2 , P PERF DEPOOL,W6,PJOBCUR,DEBINW3,STRG10A + ` P MOVE DEBINW4,W9 + P B DRNO20 + PENTINS FC=12 + P PERF DEREC2,BIN11 + P B ENTOLD + P PEND +
0x1bd9f8…1bdb8c Dummy {f00=0x0086, f01=0x0190, f02=»HE + r " P* FORMAT NOT HAS BEEN CHANGED , $ P* SINCE THE RECORD WAS STORED ON , 0 P* DISC. , X P* BAD RESULT IS OVERFLOW. , h P* , & P********************************* , PDEREFO PROC , P MOVE DEBINW4,W7 , P ADD DEBINW4,PRECCUR , & P X
0x1bdb8c…1bdd20 Dummy {f00=0x0086, f01=0x4136, f02=»OVE BCD13A,DEBINW3 , P MOVE DEBINW4,=W'38' - P DIV W0,W0 CONDITION =3 - 6 P RET - V P PEND - b PFFETCH FRMT - p P FSL - P FTEXT 'FETCHING FORMAT:' - P FCOPY DEINPUT - P FTEXT ' FROM DISC.' - P FNL - P FKI 1,ALPHA - P FCO
0x1bdd20…1bdeb4 (1, 329) Dummy {f00=0x0086, f01=0x2008, f02=» . OIN(W2),W1 P B NEWR70 PENTINS FC=12 , P PERF DEREC2,BIN11 B P B ENTOLD P PEND n P END |@ F DEREC2,BIN11 P BNOK DRNO20 P CBNE BIN11,W5,OPBC10 P* SEARCH MODE " P IB BIN12,DROK71,DROK71,DROK00
0x1bdeb4…1be048 Dummy {f00=0x0086, f01=0x0190, f02=»7 : AUTOMATIC SKIP/DUP *O N* FF* RECOVERY OF : k 6 : l RUNNING. ( ',!.%)$&"#-* # +0 4 ! + 6 B R d x / & N ) t@
0x1be048…1be1dc Dummy {f00=0x0086, f01=0x0190, f02=» r @g@i@k@ "0# ( #W H % W % o 6 0) 2 W ? A W o ~7 h~ ) !PO@ < ~6 h~ ' !< A ! & j !! !@ W 2 W 0: #[A __2 !j !! j ! !$ 00 ! ? A _ !A <
0x1be1dc…1be370 Dummy {f00=0x0086, f01=0x0190, f02=» ? A _ 0! !< " ? #@ T 0% P9W I 46 0 ! W 0 ! : 6 h W h 8 ? 6 0! !< " ? 0! !< " ? ( 0: ( #)0) A h U ! < h 8 ? " ? < 1h ! !P !W !j !! ! 3f "d
0x1be370…1be504 Dummy {f00=0x0086, f01=0x0190, f02=» 9 _ " W & ? ? 0" 9 ? " W @g@k !Aij !! !? $@kAgW #@gAk@i ! j !! ! Uj ? 00 2 h !T= h !U !P ! h ! !T ! 7 !_ h ! !X W#@ T 0% P! W I h P Wk ~Ub~ "~ @
0x1be504…1be698 Dummy {f00=0x0086, f01=0x0190, f02=» ! _6j " - 8 & ?!@ P 5Ii Ik Ig A|W 4@|@ & , /hZ !PDj !! 0 (P 00 !_<( 4 !, z 5h $ !TbI|g2 ? 2 """""#"######"""""$%%"""#&&" !_h( !? 4" !_ "_ ! j !! ! _ _ A| " @ P &
0x1be698…1be82c Dummy {f00=0x0086, f01=0x0190, f02=» U j , 1 : ` A g A P n d K : ? - D H + ?:?T+-*:DGRNASUFFFXM/=><DGRNL!ASUFTCXE 0 )
0x1be82c…1be9c0 Dummy {f00=0x0086, f01=0x0190, f02=» V o ~ J N R@ 2 A ! ~U ! 7& !0! !T J _ : I !_) _7j ! ! h~ !X8H !( @ h~ U !j~ ! ! !P !0! ! N_m ? j !! '( !1j !& !j !! ( * j +& 'j !! ( j ! ! ! 4 ? jy " $ j !! 1 j !!
0x1be9c0…1beb54 (1, 330) Opaque[0x194]
0x1beb54…1bece8 # DirEnt {nam=»DECONV«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1528, f03=0x0000}
0x1beb54…1bece8 IdxSect {
0x1beb54…1bece8 f00 = 0x00a9 // 0x1beb54 @0x0
0x1beb54…1bece8 f01 = 0x0018 // 0x1beb56 @0x2
0x1beb54…1bece8 gno = [ // 0x1beb58 @0x4
0x1beb54…1bece8 [0x00]: C0x00a9.0x1.0
0x1beb54…1bece8 [0x01]: C0x00a9.0x2.0
0x1beb54…1bece8 [0x02]: C0x00a9.0x3.0
0x1beb54…1bece8 [0x03]: C0x00ab.0x0.0
0x1beb54…1bece8 [0x04]: C0x00ab.0x1.0
0x1beb54…1bece8 [0x05]: C0x00ab.0x2.0
0x1beb54…1bece8 [0x06]: C0x00ab.0x3.0
0x1beb54…1bece8 [0x07]: C0x00ac.0x0.0
0x1beb54…1bece8 [0x08]: C0x00ac.0x1.0
0x1beb54…1bece8 [0x09]: C0x00ad.0x2.0
0x1beb54…1bece8 [0x0a]: C0x00ad.0x3.0
0x1beb54…1bece8 [0x0b]: C0x00ae.0x0.0
0x1beb54…1bece8 ]
0x1beb54…1bece8 }
0x1bece8…1bee7c Dummy {f00=0x00a9, f01=0x0190, f02=» * P IDENT DECONV REL=1.0,VER=1 820506/NJ P UPD 82-02-22/EV 2 P UPD 81-08-27/EV L P UPD 80-12-12/SHB f P UPD 80-07-14/JAER P DDUM DEDDIV P PDIV P ENTRY DECONV P P P EXT DEPOOL P EXT TESTB
0x1bee7c…1bf010 Dummy {f00=0x00a9, f01=0x0190, f02=» EXT GETFWD P EXT ADJUST P EXT FDIO ( P EJECT : P* H P* KEYTABLE R P* j PCLR EQU X'8F' CLEAR t PCAN EQU X'91' CANCEL PRET EQU X'98' RETURN PENT EQU X'8C' ENTER P* PKEYTAB KTAB CLR,CAN,RET,EN
0x1bf010…1bf1a4 Dummy {f00=0x00a9, f01=0x0190, f02=»PAR EQU X'00' P EJECT @ P* THIS MODULE TAKE CARES OF THE DIFFERENT CONVERTIONS- $ P* -METHODS h @ P* ONE OF THEM IS ALREADY PREPAIRED FOR YOUR PRINTOUT). 2 P* THE OTHER YOU HAVE TO CODE YOURSELVES. D P* FORM
0x1bf1a4…1bf338 Dummy {f00=0x00a9, f01=0x0190, f02=» = 2 DATACOMMUNICATION IN 8 P* = 3 CASETTE OUTPUT : 8 P* = 4 PRINTOUT LP/GP v 2 P* = 5 DISCFILE : P*
0x1bf338…1bf4cc Dummy {f00=0x00a9, f01=0x0190, f02=»= 8 FREEZE BATCHES ON USER FILE n 8 P* = 9 LISTING LP/GP ( 8 P* TYPE = TYPE OF HANDLING d . P* = 1 OPEN : P* = 2 BATCHHEAD-RECORD
0x1bf4cc…1bf660 Dummy {f00=0x00a9, f01=0x0190, f02=» = 5 CLOSE 4 P* RETCON = RETURN-CODE * , P* = 0 OK b > P* /= 0 ERROR MESSAGE-NUMBER F P* =-1 SKIP CURR BATC
0x1bf660…1bf7f4 (1, 331) Dummy {f00=0x00a9, f01=0x0190, f02=»T BATCH (CANCEL) D P* =-4 ABORT CONVERSION (RETURN) < P* =-5 DELETE THIS BATCH ` > P* =-6 GET CURRENT RECORD : P* INPUT VARIABLE: BIN4 = FC
0x1bf7f4…1bf988 Dummy {f00=0x00a9, f01=0x0190, f02=»TA,DISCFD,FLOPPY,DELETE,FREEZE,LISTE PRECEIV , PDISCFD : PCASSET H PERROR V * P MOVE RETCON,W4 'FUNCTION NOT ALLOWED? d P B RETURN P* * P* THIS IS THE PRINTOUT FUNCTION P* PPRINTA : P IB TYPE,PR100,PR200
0x1bf988…1bfb1c Dummy {f00=0x00a9, f01=0x0190, f02=»* PPR100 $ P PERF ATTDEV,BIN6 ATTACH DEVICE P BOK DECOOK @ P B RETURN T P EJECT f P* t P* ~ 4 P* PRINTOUT OF THE DIFFERENT RECORD TYPES P* PPR200 P EDWRT DEDSPRT,FCOUNT P BNOK PR298
0x1bfb1c…1bfcb0 Dummy {f00=0x00a9, f01=0x0190, f02=»UT DEVICE NOT OP....' x P B RETURN GO AND CLOSE P* < * P* CLOSE DEVICE = DETACH PRINTER F P* t PPR500 ~ P PERF DETPRT DETACH DEVICE P B RETURN P EJECT P* 8 P* THIS ROUTINE DELETE BATCHES ON THE USERF
0x1bfcb0…1bfe44 Dummy {f00=0x00a9, f01=0x0190, f02=»(W8),W0,DEL110 NOT THE WHOLE FILE P MOVE DATE,HEX00 RESET DATE * PDEL110 N P B RETURN P EJECT n P* | . P* THIS ROUTINE FREEZE BATCHES ON USER FILE P* P PFREEZE 8 P IB TYPE,FRE100,FRE200,FRE300 OPEN BATCHHEAD DAT
0x1bfe44…1bffd8 Dummy {f00=0x00a9, f01=0x0190, f02=» PFRE300 P B DECOOK P* BALANCE RECORD ( PFRE400 @ P B DECOOK N P* CLOSE ` PFRE500 p P B DECOOK ~ P EJECT P* P* OK P* PDECOOK P MOVE RETCON,W0 PRETURN P RET P EJE
0x1bffd8…1c016c Dummy {f00=0x00a9, f01=0x0190, f02=» P* P* SEND SOF P* SEND '001'+DATE P* : P D PDC100 L P* Z P* BATCHHEAD RECORD d P* ~ PDC200 PDC300 P* P* TRANSM BLOCKS P* P P* P* SEND '999' P* SEND EOF P
0x1c016c…1c0300 Dummy {f00=0x00a9, f01=0x0190, f02=» 6 P IB TYPE,LS100,LS200,LS300, OPEN,BATCHHEAD,DATA, C P LS400,LS500 BALANCE,CLOSE > P b PLS100 j P TBT LSBAB,LS170 x * P PERF GETBUF GET 3 CONSECUTIVE BUFFERS P B LS110 OK P B LSERR ERROR PLS110 ( P MOVE BCDI21(W5),=
0x1c0300…1c0494 (1, 332) Dummy {f00=0x00a9, f01=0x018e, f02=»SEQUENCE NO v " P CLEAR BCONT CONTINUATION MARK P CLEAR BSUPR : P CLEAR SPLITFL NNO SPLIT N ( P CLEAR FIRSTFL INITIATE FIRST RECORD n $ P PERF ATTDEV,BIN6 ATTACH DEVICE P BNOK LSERR P MOVE STRG10A,HEX00 P GETTIME STRG10A
0x1c0494…1c0628 Dummy {f00=0x00a9, f01=0x0190, f02=» ( P MOVE RETCON,=W'-4' ABORT CONVERSION P B LSERRT 4 PLSERR F 0 P MOVE RETCON,=W'35' OUTPUT DEV NOT OPERABLE T PLSERRT P SET LSBAB P B RETURN P* P* BATCHEAD RECORD P* PLS200 P TBT LSBAB,LS170
0x1c0628…1c07bc Dummy {f00=0x00a9, f01=0x0190, f02=»GET NEXT BATCH | P B RETURN PLS250 BATCHHEAD OR BALANCE ( P TBT LSBAB,LS170 L P MOVE DEBINW3,W1 d P PRINT DEDSPRT,DEBINW3,W0 | P BNOK LSERR 2 P* CONVERT HEADER TO SET CONVERSION INDICATIONS PLS220 , P MOVE BIN10,WORK(
0x1c07bc…1c0950 Dummy {f00=0x00a9, f01=0x0190, f02=»,W0 PLS210 P PERF CONV,BIN4,FC P B DECOOK ALL DONE 4 P B LS210 NOT ALL DONE N P B LS315 COMP FIELD EMPTY l P B LS320 BCD FIELD OVERFLOW " P B LS320 EDIT BUFFER OVERFLOW P B DECOOK P P PLS300 P
0x1c0950…1c0ae4 Dummy {f00=0x00a9, f01=0x0190, f02=»BIN8,W0 RESET FIELD NUMBER PLS310 " P MOVE BIN4,W0 0 PLS311 F P PERF CONV,BIN4,FC T P B DECOOK ALL DONE n P B LS340 WRITE BLOCKS P B LS315 CUMP FIELD EMPTY P B LS320 BCD FIELD OVERFLOW " P B LS320 EDIT BUFFER OVERFLO
0x1c0ae4…1c0c78 Dummy {f00=0x00a9, f01=0x018e, f02=»WRITE BLOCKS P PLS340 P PERF LSWRIT * P B LS310 OK > P B LS310 DUMMY R P B LS310 DUMMY h * P MOVE BIN4,W1 CONTINUE IN SAME BUFFER ~ P B LS311 P P PLS400 P* BALANCE FORMAT P B LS250 P
0x1c0c78…1c0e0c Dummy {f00=0x00a9, f01=0x0190, f02=» P MOVE BIN4,W0 P PERF DETPRT P* RELEAS BUFFERS 2 & P PERF DEPOOL,W6,BIN10,BIN4,STRG10A J P B DECOOK t PLS560 P MOVE STRG10A,HEX00 P GETTIME STRG10A P MOVE TIME,STRG10A P EDWRT DEDSPRT,FLSERR P B LS550
0x1c0e0c…1c0fa0 Dummy {f00=0x00a9, f01=0x0190, f02=»50 P EJECT P* P* FLOPPY DUMPING " P* : P D PFLOPPY L P MOVE BTYPE,TYPE Z 4 P IB TYPE,FD100,FD200,FD300 OPEN,BATCHHEAD,DATA C r P FD400,FD500 BALANCE,CLOSE P P P* P* SEND SOF P* SEND '001'+D
0x1c0fa0…1c1134 (1, 333) Dummy {f00=0x00ab, f01=0x0190, f02=» FDERR ERROR PFD110 P MOVE CWFD,W7 HDR RECORD " P MOVE REQFD,=W'128' B 6 P CALL FDIO,DSFD,X'A1',BPOOL(BIN10),REQFD,CWFD OPEN ^ P MOVE BIN4,W20 , P DSC1 DSFD,ATTACH,BIN4 ATTACH DEVICE FD P BNOK FDERR P PERF FDLOAD P B
0x1c1134…1c12c8 Dummy {f00=0x00ab, f01=0x0190, f02=»GTH HEADER z ( P MOVE WORK(W17),W0 LENGTH RECORD NO * P MOVE WORK(W19),W0 LENGTH SEQUENCE NO > " P CLEAR BCONT CONTINUATION MARK l P CLEAR BSUPR P SET SPLITFL NORMAL SPLIT * P MOVE BIN6,=X'0036' FILE CODE PRINTER $ P PERF ATTDEV,BIN6
0x1c12c8…1c145c Dummy {f00=0x00ab, f01=0x0190, f02=»FDHDR " P PERF FDRVOL READ VOLUME LABEL P B FD150 OK 4 P B FDERR ERR H PFD150 . P IB DEBINW2,FD160,FD180,FD170 CLR,CAN,RET j P* ENT P PFD160 $ P MOVE STR8A,STR8B SAVE FILE NAME $ P MOVE FDCNT,W1 RESET FD COUNTER
0x1c145c…1c15f0 Dummy {f00=0x00ab, f01=0x0190, f02=» PFD170 ( P MOVE RETCON,=W'-4' ABORT CONVERSION P B FDERRT > P P PFDERR X 0 P MOVE RETCON,=W'35' OUTP. DEV. NOT OPERABLE f PFDERRT P SET FDBAB P B RETURN P PFD180 P MOVE CWFD,W7 P MOVE REQFD,=W'1
0x1c15f0…1c1784 Dummy {f00=0x00ab, f01=0x018e, f02=»JECT P* P* BATCHEAD RECORD P* 0 PFD200 : P TBT FDBAB,FD170 H ( P TBF BDAFOR,FD300 ANY FORCED FIELDS? ` , P EDWRT DEDSPRT,FBATC3 PRINT ERROR REPORT P SET FDBAB & P MOVE RETCON,=W'-1' GET NEXT BATCH P B RETURN
0x1c1784…1c1918 Dummy {f00=0x00ab, f01=0x018e, f02=» P B FD308 NO PRINTING PFD305 * P* PRINT BATCH HEAD AND BALANCE RECORD . P MOVE DEBINW3,W1 P PRINT DEDSPRT,DEBINW3,W0 t P BNOK FDERR PFD308 * P MOVE BIN10,WORK(W13) GET BUFFER INDEX $ P MOVE BIN9,BIN10 GET BPOOL INDEX
0x1c1918…1c1aac Dummy {f00=0x00ab, f01=0x0190, f02=» | P B DECOOK ALL DONE P B FD340 WRITE BLOCKS " P B FD315 CUMP FIELD EMPTHY @ P B FD320 BCD FIELD OVERFLOW b " P B FD320 EDIT BUFFER OVERFLOW PFD315 P MOVE RETCON,W5 P B FDERRT P PFD320 " P MOVE RETCON,=
0x1c1aac…1c1c40 Dummy {f00=0x00ab, f01=0x0190, f02=»K P B FD360 ERROR P B FDEOF05 EOE * P MOVE BIN4,W1 CONTINUE IN SAME BUFFER 6 P B FD311 d PFD350 t P PERF FDLOAD P B FD370 OK P B FD360 ERROR PFD360 P MOVE REQFD,=W'128' P MOVE CWFD,W7 8 P CALL FD
0x1c1c40…1c1dd4 (1, 334) Dummy {f00=0x00ab, f01=0x0190, f02=» . P IB DEBINW2,FD350,FD360,FD170 CLR,CAN,RET P B FD350 ENT 6 PFD370 J " P PERF FDRVOL READ VOLUME LABEL X P B FD375 OK ~ P B FD360 ERROR PFD375 . P IB DEBINW2,FD380,FD360,FD170 CLR,CAN,RET P* ENT P PFD380
0x1c1dd4…1c1f68 Dummy {f00=0x00ab, f01=0x018e, f02=» * P MOVE RETCON,=W'-6' GET CURRENT RECORD P B RETURN 2 P D PFDEOF05 L P SET FDEOF INDICATE EOF & P MOVE WORK(W14),BIN8 SAVE FIELD NO | P B FD360 P PFDEOF10 P CLEAR FDEOF * P MOVE BIN10,WORK(W13) GET BUFFER INDEX
0x1c1f68…1c20fc Dummy {f00=0x00ab, f01=0x0190, f02=» P MOVE CWFD,W0 > P CALL FDIO,DSFD,X'06',BPOOL(BIN10),REQFD,CWFD WRITE BLOCKS P B FD340 P EJECT l PFD400 z P* BALANCE FORMAT P B FD300 PFD500 * P MOVE BIN10,WORK(W13) GET BUFFER INDEX P TBT FDBAB,FD560 ABORT
0x1c20fc…1c2290 Dummy {f00=0x00ab, f01=0x0190, f02=»WRIT P B FD570 OK ! P B FDERR ERR ! P B FD510 EOE ! 4 PFD510 ! H P MOVE REQFD,=W'128' ! V P MOVE CWFD,W7 ! r 8 P CALL FDIO,DSFD,X'B8',BPOOL(BIN10),REQFD,CWFD UNLOAD ! PFD515 ! * P MOVE DEBINW4,=W'55' CHANGE FLOPPYDISK ! P PERF DE
0x1c2290…1c2424 Dummy {f00=0x00ab, f01=0x0190, f02=»OR ! PFD525 " " P PERF FDRVOL READ VOLUME LABEL " P B FD530 OK " > P B FD510 ERROR " R PFD530 " h . P IB DEBINW2,FD535,FD510,FD170 CLR,CAN,RET " v P* ENT " PFD535 " $ P PERF FDWVOL WRITE VOLUME LABEL " P B FD540 OK " P B FD510
0x1c2424…1c25b8 Dummy {f00=0x00ab, f01=0x0190, f02=» " V P B FD505 # PFD550 # P WAIT DSFD # & P CLEAR FDBAB # 8 P MOVE CWFD,W7 HDR SECTOR # L P MOVE REQFD,=W'128' # l 8 P CALL FDIO,DSFD,X'B8',BPOOL(BIN10),REQFD,CWFD UNLOAD # P CLEAR FDEOF RESET EOF # P MOVE CWFD,W7 # P MOVE REQFD,=W'1
0x1c25b8…1c274c Dummy {f00=0x00ab, f01=0x0190, f02=» # P* RELEAS BUFFERS $ & P PERF DEPOOL,W6,BIN10,BIN4,STRG10A $ P B DECOOK $ J PFD560 $ P MOVE STRG10A,HEX00 $ j P GETTIME STRG10A $ P MOVE TIME,STRG10A $ P EDWRT DEDSPRT,FFDERR $ P B FD550 $ P $ PFD570 $ P MOVE STRG10
0x1c274c…1c28e0 Dummy {f00=0x00ab, f01=0x0190, f02=» P* % ( P* GETBUF GET TWO CONSECUTIVE BUFFERS % P* % : P* BUFFER INDEX IN WORK(W13) % D P* % h P % r PGETBUF PROC % z * P MOVE BIN10,W3 TOTAL NUMBER OF BUFFERS % , P MOVE BIN4,W3 NO. OF COSECUTIVE BUFFERS % @ P PERF DEPOOL,W2,BIN10,BIN4,S
0x1c28e0…1c2a74 (1, 335) Dummy {f00=0x00ab, f01=0x018e, f02=»N9,BIN10 LOAD WORKING BUFFER INDEX % " P ADD BIN9,W1 INDEX EDIT BUFFER & * 4 P MOVE BPOOL(BIN10),=X'00' RESET TRANSMIT BUFFER & P P RET & PGETBU2 & P RET 2 & P PEND & P EJECT & P* & , P* FDRVOL READ VOLUME LABEL AND DISPLAY & P*
0x1c2a74…1c2c08 Dummy {f00=0x00ab, f01=0x0190, f02=» & j P MOVE CWFD,W7 ' > P CALL FDIO,DSFD,X'91',BPOOL(BIN13),REQFD,CWFD READ (HDR1) ' P XSTAT DSFD,BIN4 ' ` P MOVE BIN7,=X'086F' ' x P CALL MASK,BIN4,BIN7 ' P BNOK FDRV02 ' P MOVE BIN7,=W'66' ' 8 P XCOPY STR6A,W0,W6,BPOOL(BIN13),BIN7 EXPIR
0x1c2c08…1c2d9c Dummy {f00=0x00ab, f01=0x0190, f02=»OL(BIN13),BIN7 ' z P MOVE RECLGD,STR6B ( P MOVE BIN7,=W'45' ( 0 6 P XCOPY STR2A,W0,W2,BPOOL(BIN13),BIN7 GET FD NUMBER ( J P ATTFMT FCAS02 ( P SET DEPROMPT ( P DISPLAY 0,W1,W0 ( P THOME ( & P MOVE DEBINW3,W1 REQUESTED LENGTH ( 2 P NKI .NE
0x1c2d9c…1c2f30 Dummy {f00=0x00ab, f01=0x0190, f02=»ITE VOLUME LABEL ( P* ) P ) " P ) * PFDWVOL PROC ) 2 P MOVE BIN7,=W'66' ) F & P MOVE BIN13,BIN10 GET BUFFER INDEX ) ` ( P ADD BIN13,W2 ADJUST FOR READ BUFFER ) * P EDSUB BPOOL(BIN13),BIN7,FRMVOL2 DATE ) P MOVE BIN7,W5 ) 0 P EDSUB BPOOL(B
0x1c2f30…1c30c4 Dummy {f00=0x00ab, f01=0x0190, f02=»QUESTED LENGTH ) z P MOVE CWFD,W7 * > P CALL FDIO,DSFD,X'95',BPOOL(BIN13),REQFD,CWFD WRITE (HDR1) * , P XSTAT DSFD,BIN4 * n P MOVE BIN7,=X'024F' * P CALL MASK,BIN4,BIN7 * P * P BNOK FDWVO2 * & P ADD FDCNT,=D'1' UPDATE FD NUMBER * P MOV
0x1c30c4…1c3258 Dummy {f00=0x00ab, f01=0x0190, f02=» RET * PFDWVO2 + P RET 2 + P PEND + ( P EJECT + 6 P* + D P* LSWRIT WRITE BLOCKS + N P* + l P + v PLSWRIT PROC + ~ PLSWR00 + " P* BIN16 NO OF CHARS TO SEND + . P* BIN4 AVAILABLE SPACE IN OUTPUT BUFFER + P* DEBIN3 LENGTH
0x1c3258…1c33ec Dummy {f00=0x00ab, f01=0x0190, f02=»ECLGD SET RECORD LENGTH + , P ADD BCDI21(W5),=D'1' ADD 1 TO RECORD NO , . P ADD BCDI21(W4),=D'1' ADD 1 TO SEQUENCE NO , P P CBE BCDI21(W4),=D'1',LSWR50 , ( P* NOT FIRST TIME (SEQUENCE NO > 1) , , P* COPY HEADER PART, LENGTH IN WORK(W15) , , P SUB B
0x1c33ec…1c3580 Dummy {f00=0x00ab, f01=0x0190, f02=»RD FOR THIS INPUT RECORD , | P MOVE DEBIN3,W0 START POINT - P* - D PLSWR55 - N . P CBL BIN16,BIN4,LSWR58 ROOM FOR EVERYTING? - P NO ROOM - $ P TBT SPLITFL,LSWR57 NORMAL SPLIT - P FIND PRECEDING & - , P MOVE DEBIN1,BIN4 START AT END OF RE
0x1c3580…1c3714 (1, 336) Dummy {f00=0x00ab, f01=0x018e, f02=»EBIN1 - , P MATCH BPOOL(BIN9),DEBIN2,W1,STR2A,W0,W1 . P BNOK LSWR56 NOT FOUND . > P MOVE BIN15,DEBIN2 . P B LSWR59 . v P*NORMAL SPLIT . PLSWR57 . P MOVE BIN15,BIN4 . P B LSWR59 . ( P* NO OF CHARS, FIT IN AVAILABLE ROOM . PLSWR58
0x1c3714…1c38a8 Dummy {f00=0x00ab, f01=0x0190, f02=» 6 P* MOVE BLANKS INTO REMAINING PART OF OUTPUT BUFFER / * P* BIN4 = NO OF CHARS IN OUTPUT BUFFER / > P MOVE BIN4,BIN15 / l P ADD BIN4,DEBIN3 ADD HEADER / P* / P MOVE DEBIN1,RECLGD / " P SUB DEBIN1,BIN4 NO OF BLANKS / B P XCOPY BPOOL(BIN10),
0x1c38a8…1c3a3c Dummy {f00=0x00ab, f01=0x0190, f02=»70 SKIP IF LENGTH ZERO / z . P MOVE STRG10A,BCDI21(W5) CONVERT RECORD NO 0 " P MOVE DEBIN1,W10 LENGTH FIELD 0 P * P SUB DEBIN1,WORK(W17) FIND START OF NO 0 v : P XCOPY BPOOL(BIN10),WORK(W16),WORK(W17),STRG10A,DEBIN1 0 P* 0 PLSWR70 0 ( P* INSERT SEQU
0x1c3a3c…1c3bd0 Dummy {f00=0x00ab, f01=0x018e, f02=»OVE DEBIN1,W10 LENGTH FIELD 0 , P SUB DEBIN1,WORK(W19) FIELD START OF NO 1 $ : P XCOPY BPOOL(BIN10),WORK(W18),WORK(W19),STRG10A,DEBIN1 1 T P* 1 PLSWR80 1 P* HANDLE END OF RECORD 1 * P CBG BIN16,BIN15,LSWR100 NO ROOM, CONT 1 P* INSERT EOR 1
0x1c3bd0…1c3d64 Dummy {f00=0x00ab, f01=0x0190, f02=» 1 & P WRITE DEDSPRT,BPOOL(BIN10),DEBIN1 2 P DLETE BPOOL(BIN10),W0,W2 2 2 P MOVE CWFD,W0 2 T 6 P DELETE BPOOL(BIN9),CWFD,BIN15 DELETE WHAT IS SEND 2 j P SUB BIN16,BIN15 2 P MOVE BIN13,BIN16 2 P CMP VSEIND,W1 2 $ P BE LSWR00 WRITE RESET OF BU
0x1c3d64…1c3ef8 Dummy {f00=0x00ab, f01=0x0190, f02=»W2 2 & P WRITE DEDSPRT,BPOOL(BIN10),DEBIN1 3 P DLETE BPOOL(BIN10),W0,W2 3 4 PLSWRRET 3 V P RET 3 f P PEND 3 r P EJECT 3 P* 3 P* FDWRIT WRITE BLOCKS 3 P* 3 P 3 P 3 PFDWRIT PROC 3 PFDWR00 3 P WAIT DSFD 3 P XST
0x1c3ef8…1c408c Dummy {f00=0x00ab, f01=0x0190, f02=» P CALL MASK,BIN4,BIN7 4 P BERR FDWR20 4 4 P IB BTYPE,FDWROP,FDWRHD,FDWRDATA,FDWRBAL,FDWRCL 4 4 PFDWROP 4 l PFDWRCL 4 z P B FDWR20 4 PFDWRHD BATCH HEADER 4 4 P MOVE BPOOL(BIN10),=X'00' INITIATE OUTPUT BUFFER 4 P MOVE BIN4,RECLGD 4 .
0x1c408c…1c4220 Dummy {f00=0x00ab, f01=0x0190, f02=»* BIN4 AVAILABLE SPACE IN OUTPUT BUFFER 4 P* DEBIN3 LENGTH OF HEADER 5 2 . P* BIN15 ACTUAL LENGTH OF INPUT DATA USED 5 T P CMP BIN16,W0 5 " P BE FDWRRET NO DATA= NO WRITE 5 ( P MOVE BIN4,RECLGD SET RECORD LENGTH 5 , P ADD BCDI21(W5),=D'1' ADD
0x1c4220…1c43b4 (1, 337) Dummy {f00=0x00ac, f01=0x0190, f02=»NO > 1) 5 t , P* COPY HEADER PART, LENGTH IN WORK(W15) 6 , P SUB BIN4,WORK(W15) MAKE ROOM FOR HEADER 6 @ & P MOVE DEBIN3,WORK(W15) START POINT 6 p P B FDWR55 6 P* 6 PFDWR50 6 0 P* FIRST OUTPUT RECORD FOR THIS INPUT RECORD 6 P MOVE DEBIN3,W0
0x1c43b4…1c4548 Dummy {f00=0x00ac, f01=0x018e, f02=»RMAL SPLIT 6 z P FIND PRECEDING & 7 , P MOVE DEBIN1,BIN4 START AT END OF RECORD 7 . " P MOVE STR2A,=C'&&' LOOK FOR & 7 ^ PFDWR56 7 P SUB DEBIN1,W1 7 P CBNG DEBIN1,W0,FDWR57 NO & 7 P MOVE DEBIN2,DEBIN1 7 , P MATCH BPOOL(BIN9),DEBIN2,W1,STR
0x1c4548…1c46dc Dummy {f00=0x00ac, f01=0x0190, f02=» 7 b PFDWR57 8 P MOVE BIN15,BIN4 8 P B FDWR59 8 . ( P* NO OF CHARS, FIT IN AVAILABLE ROOM 8 @ PFDWR58 8 l $ P MOVE BIN15,BIN16 SEND ALL CHARS 8 z P* 8 PFDWR59 8 > P XCOPY BPOOL(BIN10),DEBIN3,BIN15,BPOOL(BIN9),W0 COPY FIRST 8 6 P* MOVE BLANK
0x1c46dc…1c4870 Dummy {f00=0x00ac, f01=0x0190, f02=» HEADER 8 | P* 9 P MOVE DEBIN1,RECLGD 9 " P SUB DEBIN1,BIN4 NO OF BLANKS 9 6 B P XCOPY BPOOL(BIN10),BIN4,DEBIN1,BPOOL(BIN9),BIN16 MOVE BLANKS 9 P* 9 PFDWR60 9 $ P* INSERT RECORD NO - BCDI21(W5) 9 0 P CBE WORK(W17),W0,FDWR70 SKIP IF LENGT
0x1c4870…1c4a04 Dummy {f00=0x00ac, f01=0x0190, f02=»F NO 9 n : P XCOPY BPOOL(BIN10),WORK(W16),WORK(W17),STRG10A,DEBIN1 : P* : J PFDWR70 : T ( P* INSERT SEQUENCE NO - BCDI21(W4) : b 0 P CBE WORK(W19),W0,FDWR80 SKIP IF LENGTH ZERO : 0 P MOVE STRG10A,BCDI21(W4) CONVERT SEQUENCE NO : " P MOVE DEBIN1,W10 L
0x1c4a04…1c4b98 Dummy {f00=0x00ac, f01=0x0190, f02=» PFDWR80 ; P* HANDLE END OF RECORD ; 2 P CBG BIN16,BIN15,FDWR100 NO ROOM, CONTINUATION ; 2 P* INSERT EOR ; h P MOVE STR2A,=X'7F' EOR CHAR ; ~ 4 P XCOPY BPOOL(BIN10),BIN4,W1,STR2A,W1 INSERT EOR ; P B FDWRSEND ; P* ; PFDWR100 ; ( P
0x1c4b98…1c4d2c Dummy {f00=0x00ac, f01=0x0190, f02=»IN1,FDWR140 ; P SUB BIN4,W1 < P SUB BIN15,W1 < ( PFDWR140 < > ( P MOVE STR2A,=X'21' CONTINUATION MARK < N ( P XCOPY BPOOL(BIN10),BIN4,W1,STR2A,W1 < z PFDWR150 < P MOVE REQFD,=W'128' < P MOVE CWFD,W0 < 2 P CALL FDIO,DSFD,X'06',BPOOL(BIN1
0x1c4d2c…1c4ec0 Dummy {f00=0x00ac, f01=0x0190, f02=»3,BIN16 < P CMP VSEIND,W1 = $ P BE FDWR00 WRITE REST OF BUFFER = & P RET 6 = N P* = PFDWRBAL = f 4 P MOVE BPOOL(BIN10),=X'00' INITIATE OUTPUT BUFFER = v P EDIT BPOOL(BIN9),FFD999 = P MOVE BIN4,RECLGD = . P XCOPY BPOOL(BIN10),W0,BIN4,BPOO
0x1c4ec0…1c5054 (1, 338) Dummy {f00=0x00ac, f01=0x0190, f02=»SFD,X'06',BPOOL(BIN10),REQFD,CWFD WRITE BLOCKS = PFDWRRET > 6 P RET > F PFDWR20 > R P RET 2 > ` P PEND > n P EJECT > | P* > P* FDLOAD LOAD FD PROCEDURE > P* > P > P > PFDLOAD PROC > P MOVE CWFD,W7 HDR RECORD > P M
0x1c5054…1c51e8 Dummy {f00=0x00ac, f01=0x0190, f02=» P BZ FDLOA2 ? P MOVE BIN7,=X'000F' ? P CALL MASK,BIN4,BIN7 ? 2 P BNOK FDLOA2 ? N P RET ? b PFDLOA2 ? n P MOVE CWFD,W7 HDR RECORD ? | P MOVE REQFD,=W'128' ? 8 P CALL FDIO,DSFD,X'B8',BPOOL(BIN10),REQFD,CWFD UNLOAD ? P RET 2 ? P PEND
0x1c51e8…1c537c Dummy {f00=0x00ac, f01=0x0190, f02=»TRANSMIT ? & P* RET 4 =CUMPULSORY FIELD EMPTHY @ P* RET 6 =BCD-FIELD OVERFLOW @ : " P* RET 8 =EDIT BUFFER OVERFLOW @ ^ P* @ $ P* APPL = FIELD INTO BUFFER @ 4 P* APPL = 1 FIELD INTO BUFFER, TRANSMIT BLOCK @ $ P* APPL = 2 NO TRANSMIT
0x1c537c…1c5510 Dummy {f00=0x00ac, f01=0x0190, f02=»ENERAL) @ " P* LISTE: ALWAYS SET A . P* FOLLOWING APPL ONLY USED IN BATCHHEADER A 6 0 P* APPL = 13 EOR-CHAR AS END OF EACH RECORD A h $ P* LISTE: ALWAYS CLEAR A J P* APPL = 14 CONT-CHAR IN END OF EACH DATA RECORD WHICH IS CONTINUE
0x1c5510…1c56a4 Dummy {f00=0x00ac, f01=0x018e, f02=»ITH &) ARE NOT SPLIT A p & P* LSTE: ALWAYS CLEAR B P* B F 0 P* APPL = 1XXX XXX=LENGTH OF RECORD HEADER B P : P* APPL = 2XXX THIS FIELD IS THE RECORD NUMBER FIELD B J P* APPL = 3XXX THIS FIELD IS THE CONTINUATION SEQUENCE NUMBER FIELD
0x1c56a4…1c5838 Dummy {f00=0x00ac, f01=0x0190, f02=» B p " P* BIN13= DELETE START POINTER C P* BIN16= EDIT POINTER C . P* C L 4 P* BIN15 = NO OF CHAR INSERTED IN OUTPUT RECORD C V 8 P* STRG10A = WORK STRING FOR DATE/TIME/CONVERTED BCD C $ P* WORK(W15) = LENGTH OF HEADER C * P* WORK(W16) = RECORD
0x1c5838…1c59cc Dummy {f00=0x00ac, f01=0x0190, f02=» CONTINUATION SEQUENCE LENGTH C 0 P* BCDI21(W4) = CONTINUATION SEQUENCE NUMBER D & " P* BCDI21(W5) = RECORD NUMBER D Z P* D PCONV PROC CONT,FC D P CBG CONT,W0,CON100 D PCON090 D P MOVE BPOOL(BIN9),=X'20' D , P MOVE BCDI21(W4),=D'0' RES
0x1c59cc…1c5b60 Dummy {f00=0x00ac, f01=0x0190, f02=» D P TBF BSUPR,CON105 E P SET FSUPR E " PCON105 E 4 $ P ADD BIN8,W1 UPDATE FIELD NUMBER E B " P CALL GETFWD,BIN7,2,BIN8,BIN4 E j P CALL ADJUST,BIN7 E P BOK CON130 E P BN CONRET ALL FIELD DONE E & P B CONER1 COMPULSORY FIELD EMPTHY E
0x1c5b60…1c5cf4 (1, 339) Dummy {f00=0x00ad, f01=0x018e, f02=»PL1000 HANDLE RECORD HEADER E z 2 P CBL VSEIND,=W'3000',APL2000 HANDLE RECORD NO F $ 4 P CBL VSEIND,=W'4000',APL3000 HANDLE SEQUENCE NO F Z $ P MOVE VSEIND,W2 CLEAR ERROR APPL F P B CON131 F P* F P* HANDLE RECORD HEADER: F 4 P* APPL=1000, WHER
0x1c5cf4…1c5e88 Dummy {f00=0x00ad, f01=0x0190, f02=» F Z P SET FIRSTFL FIRST TIME G P B CON100 G ( P* G : . P* HANDLE POSITION AND LENGTH OF RECORD NO G D PAPL2000 G v 4 P MOVE WORK(W16),BIN16 SET START POS OF RECORD NO G $ P GETCTL 1,BIN7 GET MAXL OF FIELD G 0 P MOVE WORK(W17),BIN7 SET LENGTH OF
0x1c5e88…1c601c Dummy {f00=0x00ad, f01=0x0190, f02=»H OF SEQUENCE NO G t PAPL3000 H < P MOVE WORK(W18),BIN16 SET START POSITION OF SEQUENCE NO H ( $ P GETCTL 1,BIN7 GET MAXL OF FIELD H h 2 P MOVE WORK(W19),BIN7 SET LENGTH OF SEQUENCE NO H * P SUB VSEIND,=W'3000' ADJUST APPL VALUE H P B CON131 FURTHER HA
0x1c601c…1c61b0 Dummy {f00=0x00ad, f01=0x0190, f02=»00,CON135,CON140 H z PCON132 I P B CON190 I & P* I 8 PCON135 I B P* SUPPRESS LEADING ZEROES I P P SET FSUPR I r P B CON190 I P* I PCON140 I P* NO SUPPRESSION I P CLEAR FSUPR I P B CON190 I P* I P* I PCON150
0x1c61b0…1c6344 Dummy {f00=0x00ad, f01=0x0190, f02=»152,CON152, C I v 0 P CON152,CON152,CON165,CON170,CON175,CON180 J PCON152 J J P B CON190 J X P* J j PCON155 J t ( P* GENERAL SUPPRESS LEADING ZEROES J P SET BSUPR J P B CON100 J P* J PCON160 J P* GENERAL NO SUPPRESSION J
0x1c6344…1c64d8 Dummy {f00=0x00ad, f01=0x0190, f02=» CON100 J P* K PCON170 K P* CONTINUATION CHARACTER K ( * P CBE W9,FC,CON100 LISTE: ALWAYS CLEAR K H * P SET BCONT INDICATE CONT. CHAR NEEDED K v P B CON100 K P* K PCON175 K P* INSERT BATCH NAME K P MOVE BIN7,W6 K P MOVE BI
0x1c64d8…1c666c Dummy {f00=0x00ad, f01=0x0190, f02=» CON260 K P* L PCON180 L , P* FIELDS (STARTING WITH &) ARE NOT SPLIT L ( $ P CLEAR SPLITFL NOT NORMAL SPLIT L X P B CON100 L P* L P* L P L PCON190 L 0 P CBE W9,FC,CON195 LISTE: ALL FIELDS INCLUDED L P TBF FSUPR,CON195 L (
0x1c666c…1c6800 Dummy {f00=0x00ad, f01=0x0190, f02=»CTL 0 TEST - ALPHA L P BZ CON200 BCD M P M 0 P* ALPHA M 8 P M H * P MOVE BIN4,W188 GET EDIT BUFFER LENGTH M P * P SUB BIN4,BIN7 ADJUST WITH MAX LENGTH M ~ , P SUB BIN4,BIN16 ADJUST WITH EDIT POINTER M P BN CONER3 M $ P EDSUB BPOOL(BIN9),BIN16,F
0x1c6800…1c6994 (1, 340) Dummy {f00=0x00ad, f01=0x0190, f02=»E BIN4,W188 GET EDIT BUFFER LENGTH M * P SUB BIN4,BIN7 ADJUST WITH MAX LENGTH N * , P SUB BIN4,BIN16 ADJUST WITH EDIT POINTER N X P BN CONER3 N P GETCTL 3,BIN4 GET SCHK N P CALL TESTB,BIN4,W15 SIGN N P BZ CON220 NO N P TBF FSUPR,CON210 N
0x1c6994…1c6b28 Dummy {f00=0x00ad, f01=0x0190, f02=» 2 P EDSUB BPOOL(BIN9),BIN16,FRMZCS EDIT 21 DIGITS O P B CON215 O : PCON210 O L 2 P EDSUB BPOOL(BIN9),BIN16,FRMBCS EDIT 21 DIGITS O Z PCON215 O & P MOVE BIN4,W22 SET PICTURE LENGTH O ( P ADD BIN7,W1 ADJUST POINTER FOR SIGN O P B CON250 O PCO
0x1c6b28…1c6cbc Dummy {f00=0x00ad, f01=0x0190, f02=»280 O PCON225 IF LISTE P $ P EDSUB BPOOL(BIN9),BIN16,FRMZCD P & P B CON235 P N PCON230 P ` $ P EDSUB BPOOL(BIN9),BIN16,FRMBCD P n PCON235 P $ P MOVE BIN4,W21 SET PICUTR LENGTH P PCON250 P $ P SUB BIN4,BIN7 SET DELETE LENGTH P 6 P DELET
0x1c6cbc…1c6e50 Dummy {f00=0x00ad, f01=0x018e, f02=»AD EDIT POINTER P | PCON280 Q P CBNE W9,FC,CON290 Q & : P EDSUB BPOOL(BIN9),BIN16,FRMFILL LISTE: INSERT FILLER Q @ ( P TBF FIRSTFL,CON285 NOT FIRST HEADER Q ~ * P CBNE BTYPE,W3,CON285 NOT NORMAL TRANS Q P CBL BIN16,WORK(W15),CON283 Q & P CLEAR FIRST
0x1c6e50…1c6fe4 Dummy {f00=0x00ad, f01=0x0190, f02=» Q ( P CBE VSEIND,W1,CONTRM APPL =1 TRANSM R P MOVE BIN4,RECLGD R 4 P CBG BIN16,BIN4,CONTRM R N P B CON100 R l P EJECT R ~ P R PCONRET RET ALL DONE R & PCONTRM RET 2 WRITE/TRANSMIT BLOCK R ( PCONER1 RET 4 CUMPULSORY FIELD EMPTHY R $ PCO
0x1c6fe4…1c7178 Dummy {f00=0x00ad, f01=0x0190, f02=»* R PFRMFILL FRMT S P FILLR ' ',1 S P FMEND S 2 P S @ PFCOUNT FRMT S H P FTEXT ' 1' S P FEOR NEW PAGE S p P FILLR ' ',2 S P FILLR '*',10 S P FTEXT 'NUMBER: ' S P FMEL '9999',NUMBER S P FEOR S P FILLR ' ',2 S
0x1c7178…1c730c Dummy {f00=0x00ad, f01=0x0190, f02=»ATE S P FMEND T P T PFRMVOL3 FRMT T " P FMEL '99',FDCNT T 6 P FMEND T N P T PFBATC3 FRMT T d P FLINK FBATCH T x P FTEXT 'EJ GODKENDT' T P FEOR T P FMEND T P T PFBATCH FRMT T P FNL T P FEOR T P FNL T P
0x1c730c…1c74a0 Dummy {f00=0x00ad, f01=0x018e, f02=» FMEND T P U PFMTBATCH FRMT U P FCOPY BATCH U , P FMEND U @ P U N PFFDHDR FRMT U V P FNL U j P FEOR U v P FNL U $ P FCOPY ='FLOPPY DISC SKRIVNING' U P FLINK HDR U P FMEND U P U PFFDEND FRMT U P FNL U P FEOR U
0x1c74a0…1c7634 (1, 341) Dummy {f00=0x00ae, f01=0x0190, f02=» P V PFFDERR FRMT V P FNL V P FEOR V , P FNL V : $ P FCOPY ='FLOPPY DISC SKRIVNING' V F P FTEXT ' AFBRYDES' V n P FLINK HDR V P FEOR V P FNL V P FMEND V P V PFLSHDR FRMT V P FNL V P FEOR V P FNL V P FCO
0x1c7634…1c77c8 Dummy {f00=0x00ae, f01=0x0190, f02=»G' V P FCOPY =' KLAR' W P FLINK HDR W " P FEOR W 4 P FNL W B P FMEND W N P W PFLSERR FRMT W d P FNL W x P FEOR W P FNL W P FCOPY ='LISTNING' W P FCOPY =' AFBRYDES' W P FLINK HDR W P FEOR W P FNL W P FMEND W
0x1c77c8…1c795c Dummy {f00=0x00ae, f01=0x0190, f02=» ' W P FMEL '99-99-99',TIME X P FEOR X ( P FNL X 6 P FTEXT 'IND: ' X B P FMEL '99999',NUMBER X X P FTEXT ' UD: ' X t P FMEL '99999',BCDI21(W5) X P FEOR X P FNL X P FMEND X P X PFCAS02 FRMT X P FSL X P FCOPY =C'DE
0x1c795c…1c7af0 Dummy {f00=0x00ae, f01=0x018e, f02=» FCOPY =C'NAME' X P FILLR ':',1 Y P FINP 32 Y , P FCOPY STR8B Y < P FNL Y P P FCOPY =C'EXPIRATION DATE:' Y P FINP 32 Y P FCOPY STR6A Y P FNL Y ( P FCOPY =C'OLD DATA SET IDENTIFIER:' Y P FINP 32 Y P FCOPY STR8A Y P FNL Y
0x1c7af0…1c7c84 Dummy {f00=0x00ae, f01=0x018e, f02=» Y P Z PFFD999 FRMT Z P FTEXT =C'SLUTD' Z $ P FMEL '99999',BCDI21(W5) Z < P FILLR ' ',60 Z P FILLR ' ',62 Z r P FMEND Z P Z PFRMALP FRMT Z P FCOPY :FMTITEM Z P FMEND Z P Z PFRMTCD FRMT Z * P FMEL 'TTTTTTTTTTTTT
0x1c7c84…1c7e18 Dummy {f00=0x00ae, f01=0x4178, f02=» PFRMZCD FRMT [ * P FMEL 'ZZZZZZZZZZZZZZZZZZZZ9',:FMTITEM [ P FMEND [ F P [ T PFRMZCS FRMT [ , P FMEL 'ZZZZZZZZZZZZZZZZZZZZ9-',:FMTITEM [ p P FMEND [ P [ PFRMBCD FRMT [ * P FMEL '999999999999999999999',:FMTITEM [ P FMEND [ P [
0x1c7e18…1c7fac Dummy {f00=0x00ae, f01=0x2008, f02=» 0 & " ADD DEBIN2,W1 UPDATE FIELD NUMBER GETFLD 2,DEBIN2,DEBIN3 < BOK DEC130 BN DEC900 ALL FIELD DONE p & ! B DEC920 COMPULSORY FIELD EMPTHY DEC130 GETCTL 0,DEBIN5 GET APPL @ MOVE DEBINW1,DEBIN4 LOA
0x1c7fac…1c8140 Dummy {f00=0x00ae, f01=0x0190, f02=»' CONSTANT PW13 BIN W'13' CONSTANT PW14 BIN W'14' CONSTANT 0 PW15 BIN W'15' CONSTANT N P EJECT l P* z P* COMMON-BLOCK:3 P* P* USAGE: CONSTANTS P* PCB3 BLK PW16 BIN W'16' CONSTANT P
0x1c8140…1c82d4 (1, 342) Opaque[0x194]
0x1c82d4…1c8468 # DirEnt {nam=»DEDISC«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1128, f03=0x0000}
0x1c82d4…1c8468 IdxSect {
0x1c82d4…1c8468 f00 = 0x0089 // 0x1c82d4 @0x0
0x1c82d4…1c8468 f01 = 0x0004 // 0x1c82d6 @0x2
0x1c82d4…1c8468 gno = [ // 0x1c82d8 @0x4
0x1c82d4…1c8468 [0x00]: C0x0089.0x1.0
0x1c82d4…1c8468 [0x01]: C0x0089.0x2.0
0x1c82d4…1c8468 ]
0x1c82d4…1c8468 }
0x1c8468…1c85fc Dummy {f00=0x0089, f01=0x0190, f02=» $ P IDENT DEDISC REL 10.0 80-04-11 P 80-02-11/CHST , P* D P* N L P************************************************************************ X P* P* : P* ALL COMMENTS TO DEDISC ARE FOUND IN MODULE P* , P*
0x1c85fc…1c8790 Dummy {f00=0x0089, f01=0x0190, f02=» H P* P* P DDUM DEDDIV P PDIV 0 P ENTRY DEDISC > P ENTRY COND T P ENTRY RELEAS h P ENTRY SCHPOO ~ P ENTRY RETURN P ENTRY WAIT P ENTRY STRT01 P* P EXT DEPOOL P EXT WRFSP P EXT
0x1c8790…1c8924 Dummy {f00=0x0089, f01=0x0190, f02=» EXT DLCURR P EXT WRIACC P EXT WRTCO ( P EXT GETTBL : P EXT DELBTC N P EXT RECURR b P EXT ENTJOB v P EXT GETJOB P EXT SCHJOB P EXT DELJOB P EXT ENTFMT P EXT DELFMT P EXT GETSYS P EXT E
0x1c8924…1c8ab8 Dummy {f00=0x0089, f01=0x0190, f02=»XT OPNEBC P EXT OPNNBC P EXT NXJOB & P EXT NXBTH 8 P* J P* T PATTACH EQU X'0E' ^ PDETACH EQU X'0F' v P EJECT PDEDISC PROC FC P* * P* BRANCH TO PROGRAM INDICATED BY FC P* P PBIN FC P CLE
0x1c8ab8…1c8c4c Dummy {f00=0x0089, f01=0x0190, f02=»W95PR P MOVE DEBINW4,W0 PSTRT01 & P IB FC C0000000000000 4 P ENTJOB ENTER JOBDEF C R P GETJOB GET JOBDEF C r P DUMMY C P SCHJOB SEARCH JOBDEF C P DELJOB DELETE JOBDEF C P OPNNBC OPEN NEW BATCH C " P OP
0x1c8c4c…1c8de0 Dummy {f00=0x0089, f01=0x0190, f02=» P SCHFMT SEARCH FORMAT C P DELFMT DELETE FORMAT C ( ( P WRICUR WRITE CURRENT DATA-SECTOR C H $ P GTNEXT GET NEXT DATA-SECTOR C t ( P GTPREV GET PREVIOUS DATA-SECTOR C ( P DLCURR DELETE CURRENT DATARECORD C ( P WRIACC WRITE ACCUM
0x1c8de0…1c8f74 (1, 343) Dummy {f00=0x0089, f01=0x0190, f02=» " P DUMMY GET PREVIOUS JOBNAME C " P WRTCO WRITE SECTOR (CORR) C * P GETTBL GET TABLE C P P DELTBL DELETE TABLE C l P ENTTBL ENTER TABLE C P DELBTC DELETE BATCH C " P DUMMY GET NO OF FREESPACES C & P NEXJOB GET NEXT JOBDEF
0x1c8f74…1c9108 Dummy {f00=0x0089, f01=0x0190, f02=» READ CURRENT SCTR C P NXBTH GET NEXT BATCHNAME C P DUMMY GET PREV BATCHNAME @ P EJECT b P* p PDUMMY z PRETURN P TBF SWITFS,RETUNF P PERF WRFSP,W1 PRETUNF P PERF RELEAS P CBNE DEBINW4,W0,RETUN9 P
0x1c9108…1c929c Dummy {f00=0x0089, f01=0x0190, f02=» P* P* SET CONDITION-REGISTER P* 0 PCOND PROC : P CBL DEBINW4,W0,CON1 L P CBE DEBINW4,W0,CON0 h P CMP W1,W2 P RET PCON1 P CMP W2,W1 P RET PCON0 P CMP W1,W1 P RET P PEND P*
0x1c929c…1c9430 Dummy {f00=0x0089, f01=0x0190, f02=»51' P CALL CHANFC,DISK,DKBIN1 P DSC1 DISK,ATTACH,W128 , P BNERR WARE2 J P MOVE DEBINW4,W3 ^ PWARE v P PERF COND P RET PWARE2 P SET SWITWT P SWITCH P B WARE P* P* P PEND $ PRELE
0x1c9430…1c95c4 Dummy {f00=0x0089, f01=0x417a, f02=» DSC1 DISK,DETACH,W0 PRELRET P RET * P PEND 6 P* D P* N ( P* SUBROUTINE SCHPOO, SEARCH POOL X P* PSCHPOO PROC IND,STRG,WX P PLIT IND P PSTRG STRG P PBIN WX P MOVE STRG10A,IND P COPY STRG
0x1c95c4…1c9758 Dummy {f00=0x0089, f01=0x2008, f02=» ETUN9 P TBF SW95PR,RETUN9 P MOVE DEBINW4,=W'-1' 0 PRETUN9 L P PERF COND Z P RET l P PEND x P END @ MOVE PINDTB,DEBIN3 B RETURN LCK MOVE DEBINW4,W3 B RETURN * *
0x1c9758…1c98ec Dummy {f00=0x0089, f01=0x0190, f02=» R F J N11 P # W !02 p! u ! " !! w jw!! {1j !! {2 w d ";@h u" ! Kh !@k ~00"oT 2j~ # # - b o -( q0" TF b , ! , " , # 7 h ) b#T" # # ( 0 , b _1Ii !"d &%( _ #$d &% W 11 4
0x1c98ec…1c9a80 Dummy {f00=0x0089, f01=0x0190, f02=»Ak4 + 11 P W !; 11 P # W ! 4 | NO#L:PAGEFIELDLINE LENGTH#V:#G:#A:GENERATION VALIDATION ACCUMULATION Z9XXXZZ9XE+XXZZVZZ9ZZVZZZ 1 k " ( % & ) 0 ~ k: " $ % & ' ! " # $
0x1c9a80…1c9c14 (1, 344) Opaque[0x194]
0x1c9c14…1c9da8 # DirEnt {nam=»DKRUT1«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1138, f03=0x0000}
0x1c9c14…1c9da8 IdxSect {
0x1c9c14…1c9da8 f00 = 0x0089 // 0x1c9c14 @0x0
0x1c9c14…1c9da8 f01 = 0x000a // 0x1c9c16 @0x2
0x1c9c14…1c9da8 gno = [ // 0x1c9c18 @0x4
0x1c9c14…1c9da8 [0x00]: C0x0089.0x3.0
0x1c9c14…1c9da8 [0x01]: C0x008a.0x0.0
0x1c9c14…1c9da8 [0x02]: C0x008a.0x1.0
0x1c9c14…1c9da8 [0x03]: C0x008a.0x2.0
0x1c9c14…1c9da8 [0x04]: C0x008a.0x3.0
0x1c9c14…1c9da8 ]
0x1c9c14…1c9da8 }
0x1c9da8…1c9f3c Dummy {f00=0x0089, f01=0x0190, f02=» " P IDENT DKRUT1 REL10.0 80-04-11 P 80-01-18/CHST * * B > :********************************************************** L * 6 2* THIS MODULE HANDLES ALL DISC IN- AND OUTPUT. * @ P* AFTER EXECUTION, THE DATA-ITEM DEBINW4
0x1c9f3c…1ca0d0 Dummy {f00=0x0089, f01=0x0190, f02=» 21 = NO DISC IN SPECIFIED UNIT & P* 22 = DISC I/0-ERROR 4 * P* 23 = DISC NOT OPERABLE ^ * @ ;*********************************************************** P DDUM DEDDIV P PDIV P EXT WAIT
0x1ca0d0…1ca264 Dummy {f00=0x0089, f01=0x0190, f02=» P EXT RETURN P EXT ATTWB P EXT RESTOR . P EXT COND B P EXT READDK T P EXT WRITDK h P ENTRY RDDS | P ENTRY WRDS P ENTRY DISU P ENTRY WRFSP P ENTRY REFSP P ENTRY WRIACC P ENTRY WRICUR
0x1ca264…1ca3f8 Dummy {f00=0x0089, f01=0x0190, f02=»SP P ENTRY RDACC P ENTRY OFRSP P ENTRY GTNEXT 2 P ENTRY GTPREV H P ENTRY DLCURR ^ P ENTRY DLRCCH t EJECT PDISU PROC FUZ,RECNO,BUF P PBIN FUZ P PBIN RECNO P PSTRG BUF P IB FUZ C P READ
0x1ca3f8…1ca58c Dummy {f00=0x0089, f01=0x0190, f02=» P BOK READSY01 PERF DKER P TBT NEWVOL,READSY , PREADSY01 F P PERF COND V RET h PWRITSY t 4 P CALL WRITDK,DISK,FILECODE(W1),BUF,SECLEN,RECNO P BOK WRITSY01 PERF DKER P TBT NEWVOL,WRITSY PWRITSY01
0x1ca58c…1ca720 Dummy {f00=0x0089, f01=0x0190, f02=»F DKER P TBT NEWVOL,READUS PREADUS01 ( P PERF COND 8 RET J PWRITUS V : P CALL WRITDK,DISK,FILECODE(FILINDUS),BUF,SECLEN,RECNO d P BOK WRITUS01 PERF DKER P TBT NEWVOL,WRITUS PWRITUS01 P PERF COND R
0x1ca720…1ca8b4 (1, 345) Dummy {f00=0x008a, f01=0x0190, f02=» DATASECTORS ON DISC. THE LENGTH OF THE D/E-RECORD IS GIVEN BY ' L P* 'USELEN' IS SET AFTER FILE-ASSIGNMENT FOR RESP. TASK DEPENDING ON A H & P* FIRST RECORD OF THE USERFILE. P* PRDDS PROC RNR P PBIN RNR 8 P CALL READDK,DISK,FI
0x1ca8b4…1caa48 Dummy {f00=0x008a, f01=0x0190, f02=»ALL WRITDK,DISK,FILECODE(FILINDUS),RBUF,USELEN,RNR P PERF COND : P RET L P PEND X EJECT f @ <************************************************************ t * * SUBROUTINE DKER * * %* PURPOSE: SPECIFIES DIS
0x1caa48…1cabdc Dummy {f00=0x008a, f01=0x018e, f02=»************ ` * DKER PROC P CLEAR NEWVOL 0 P XSTAT DISK,DKBIN1 F P MOVE BCD13A,DKBIN1 ` P MOVE DKBIN2,=X'8022' | P CALL MASK,DKBIN1,DKBIN2 P BZ DKER10 P MOVE DEBINW4,W22 I/O-ERROR P RET PDKER10
0x1cabdc…1cad70 Dummy {f00=0x008a, f01=0x018e, f02=» P MOVE DKBIN2,W128 P CALL MASK,DKBIN1,DKBIN2 " P BZ DKER30 B " P SET NEWVOL NEW VOLUME LOADED T P RET z PDKER30 P MOVE DKBIN2,W1 P CALL MASK,DKBIN1,DKBIN2 P BZ DKER40 * P MOVE DEBINW4,=W'23' DISC NOT OPERABLE
0x1cad70…1caf04 Dummy {f00=0x008a, f01=0x0190, f02=» P MOVE DKBIN1,FINDEXPO(MAX) ( P COPY SYSBUF,W0,W10,RPOOL(DKBIN1),W9 & * P COPY SYSBUF,W10,W188,BPOOL(DKBIN1),W0 R P MOVE DKBIN1,FFSNR(MAX) 8 P CALL WRITDK,DISK,FILECODE(MAX),SYSBUF,SECLEN,DKBIN1 P BNERR WRFRET P PERF DKER PWRFR
0x1caf04…1cb098 Dummy {f00=0x008a, f01=0x0190, f02=»01 8 P CALL READDK,DISK,FILECODE(FIND),SYSBUF,SECLEN,FSRNR P BNERR REFCOP F P PERF DKER P TBT NEWVOL,REFS01 n PREFCOP P MOVE DKBIN1,FINDEXPO(FIND) P MOVE FFSNR(FIND),FSRNR ( P COPY RPOOL(DKBIN1),W9,W10,SYSBUF,W0 * P C
0x1cb098…1cb22c Dummy {f00=0x008a, f01=0x0190, f02=»N,BUF P TBT SWIT04,US01 P PERF DISU,W1,BIN,BUF & P B DRET D PUS01 T P PERF DISU,W3,BIN,BUF ` PDRET ~ P RET P PEND PWR PROC BIN,BUF P TBT SWIT04,US02 P PERF DISU,W2,BIN,BUF P B DRET PUS02
0x1cb22c…1cb3c0 Dummy {f00=0x008a, f01=0x0190, f02=»TORS l P* PRDACC PROC P PERF WAIT ( P PERF DISU,W3,DEBIN1,SYSBUF : P BERR RDARET ^ * P COPY BPOOL(PINACC),W0,W188,SYSBUF,W10 r ( P XCOPY RPOOL(PINACC),W9,W2,DEBIN1,W0 PRDARET P PERF COND P RET P PEND P*
0x1cb3c0…1cb554 (1, 346) Dummy {f00=0x008a, f01=0x0190, f02=» COPY SYSBUF,W10,W188,BPOOL(PINACC),W0 ( P XCOPY DEBIN1,W0,W2,RPOOL(PINACC),W9 . P PERF DISU,W4,DEBIN1,SYSBUF Z P PERF COND ~ P RET P PEND P* P EJECT P* P* PDUMPROC PROC FC PWRICUR P PERF FREESP
0x1cb554…1cb6e8 Dummy {f00=0x008a, f01=0x0190, f02=»OPY RBUF,W0,W2,STR2A,W0 P PTR NEXT SCTR TO CURR REC P XCOPY RBUF,W4,W2,DEBIN1,W0 D PWRIT05 h & P PERF WRDS,CURSEC WRITE RECORDAREA v P BNERR WRIT02 P* P* WRITING - ERROR P* 0 P PERF FREESP,DEBIN2,FILINDUS GET N
0x1cb6e8…1cb87c Dummy {f00=0x008a, f01=0x0190, f02=» ( P CBE DEBIN3,W0,ENDERR FIRST RECORD? * P PERF RDDS,DEBIN3 READ PREV RECORD(S) 0 P BERR ENDERR ^ $ P SET CONTINUATION IN PREV SCTR r P XCOPY RBUF,W4,W2,CURSEC,W0 * P PERF WRDS,DEBIN3 WRITE PREV RECORD(S) P BNERR WRIT05 P GET
0x1cb87c…1cba10 Dummy {f00=0x008a, f01=0x0190, f02=»OF PREV t P BERR ENDERR " P PREV OF PREV = END OF CHAIN $ P XCOPY RBUF,W4,W2,W0,W0 J ( P PERF WRDS,DEBIN3 WRITE PREV OF PREV j PENDERR * P MOVE DEBINW4,W21 INDICATE DISC-ERROR P B WRIT07 P* P* OKAY P*
0x1cba10…1cbba4 Dummy {f00=0x008a, f01=0x0190, f02=» NO OF OCC BYTES P XCOPY RBUF,W6,W2,W10,W0 * P MOVE CURSEC,DEBIN1 SET CURRENT SCTRNO 8 P TBF SWIT01,WRIT07 f . P MOVE DEBINW4,W10 'NO MORE SPACE ON DISC' PWRIT07 P B RETURN P* P* P* P* PWRIACC P
0x1cbba4…1cbd38 Dummy {f00=0x008a, f01=0x018e, f02=»CTOR(S) v P B RETURN P* " P* , P* 6 PCLSBTH CLOSE BATCH @ P MOVE DEBIN1,W0 P B WRIT01 t P* P* P* PRECURR " P PERF RDDS,CURSEC READ SCTR(S) P CBNE DEBINW4,=W'30',BRETTA P MOVE DEBINW
0x1cbd38…1cbecc Dummy {f00=0x008a, f01=0x0190, f02=» $ P PERF RDDS,DEBIN1 READ SECTOR(S) P BERR RETURN , & P CBE FC,W16,GT003 JUMP IF GETPREV @ P GET LINK PREV FOR CONTROL j P XCOPY DEBIN2,W0,W2,RBUF,W2 P CBE DEBIN2,W0,GT002 P CBE CURSEC,DEBIN2,GT003 " P IF NOT OK, ZEROISE LINK
0x1cbecc…1cc060 Dummy {f00=0x008a, f01=0x0190, f02=»4,W9 P B RETURN PGT003 , P MOVE CURSEC,DEBIN1 CURRENT SECTORNUMBER , P B RETURN P* n P* x P* PGTPREV P XCOPY DEBIN1,W0,W2,RBUF,W2 P B GT001 P* P* P* PDLCURR P SET SWIT04
0x1cc060…1cc1f4 (1, 347) Dummy {f00=0x008a, f01=0x0190, f02=»* P* B P* SUBR FREESP, GET RECORDNUMBER OF NEXT FREE RECORD IN FILE P* Z P* d PFREESP PROC RECN,INDEX n P MOVE DEBINW4,W0 P CLEAR SWIT06 P CLEAR SWIT07 PFREE01 P MOVE DKBIN1,FINDEXPO(INDEX) 2 P CALL
0x1cc1f4…1cc388 Dummy {f00=0x008a, f01=0x0190, f02=»NDEX),FND r P SET SW95PR P B FND & PNOFN 4 * P XCOPY DKBIN3,W0,W2,RPOOL(DKBIN1),W13 @ P CBE DKBIN3,W0,EOFCHN n PFSP02 P PERF SAVESB P PERF WRFSP,INDEX P BERR RESSY P PERF REFSP,DKBIN3,INDEX P BERR RESSY
0x1cc388…1cc51c Dummy {f00=0x008a, f01=0x0190, f02=»ET SWIT06 P MOVE DKBIN3,W2 P B FSP02 * PNOFSP : P MOVE DEBINW4,W10 H PFND b P CBG INDEX,W1,NEFE n P SET SWITFS PNEFE P PERF COND P RET P PEND P* P* 4 P* SUBROUTINE RFRSP, FREE RECOR
0x1cc51c…1cc6b0 Dummy {f00=0x008a, f01=0x0190, f02=»,INDEX GET FSP-REC WITH RECNO IN IT ~ 2 P CALL SETFRE,BPOOL(DEBIN4),RPOOL(DEBIN4),RECNO , P ADD FNOOFREC(INDEX),W1 b & P CBNE INDEX,W1,RFRSP1 JUMP IF NOT P SET SWITFS SYSTEMFILE PRFRSP1 P PERF COND P RET P PEND P*
0x1cc6b0…1cc844 Dummy {f00=0x008a, f01=0x0190, f02=»SYNTAX: PERF GFRSPR,RECNO,INDEX 2 P* INDEX = INDEX TO CURRENT FILE , P* b PGFRSPR PROC RECNO,INDEX l PANFANG P MOVE DKBIN1,W1 P CBE INDEX,W1,SYSFLE P MOVE DKBIN1,USELEN * P DIV DKBIN1,SECLEN GET NO OF S
0x1cc844…1cc9d8 Dummy {f00=0x008a, f01=0x0190, f02=»ACE d P SUB DKBIN2,W12 P MUL DKBIN2,W8 $ P DIV DKBIN2,DKBIN1 : . P MUL DKBIN2,DKBIN1 GET RID OF UNUSED BITS T < P XCOPY DKBIN1,W0,W2,RPOOL(DEBIN4),W17 1ST INDICATED RNR . P MOVE DKBIN3,DKBIN1 SAVE 1ST INDICATED RNR . P ADD DKBIN1,DKBI
0x1cc9d8…1ccb6c Dummy {f00=0x008a, f01=0x0190, f02=»DEBIN4,FINDEXPO(INDEX) P RET " PNEXT GET NEXT FREESP-RECORD * P MOVE DKBIN1,W13 P PREAD h 6 P XCOPY DEBIN4,W0,W2,RPOOL(DEBIN4),DKBIN1 GET LINK t P CBE DEBIN4,W0,GFRET P PERF SAVESB P PERF WRFSP,INDEX P BERR GFREST
0x1ccb6c…1ccd00 Dummy {f00=0x008a, f01=0x0190, f02=» PPREV P MOVE DKBIN1,W11 P B READ , P PEND < P* J P* T P* SUBROUTINE OFRSP ^ 0 P* SET RECORD ACCORDING TO RECNO OCCUPIED | P* POFRSP PROC RECNO,INDEX P PERF GFRSPR,RECNO,INDEX 2 P CALL SETOCC,BPO
0x1ccd00…1cce94 (1, 348) Dummy {f00=0x008a, f01=0x0190, f02=»1),DEBINW4 PSAVPOO P MOVE DKBIN1,W1 P MOVE DKBIN2,W1 8 * P PERF DEPOOL,W2,DKBIN1,DKBIN2,STRG10A P P BNERR SAVOK ~ P SWITCH P B SAVPOO PSAVOK P MOVE WORK(W2),DKBIN1 ( P COPY RPOOL(DKBIN1),W9,W10,SYSBUF,W0
0x1cce94…1cd028 Dummy {f00=0x008a, f01=0x018e, f02=»C RESTORE SYSBUF FROM POOL P MOVE DKBIN1,WORK(W2) $ ( P COPY SYSBUF,W0,W10,RPOOL(DKBIN1),W9 B * P COPY SYSBUF,W10,W188,BPOOL(DKBIN1),W0 n * P PERF DEPOOL,W6,DKBIN1,DKBIN1,STRG10A P RET P PEND P EJECT P* H P* SUBROUTI
0x1cd028…1cd1bc Dummy {f00=0x008a, f01=0x0190, f02=» P XCOPY DEBIN2,W0,W2,BUF,W2 P XCOPY DEBIN1,W0,W2,BUF,W4 & P CBNE DEBIN1,W0,DL001 H P SET BOOL9 f P B RREPRE x PDL001 P PERF RD,DEBIN1,BUF P BERR DLRET P XCOPY DEBIN5,W0,W2,BUF,W2 P XCOPY BUF,W2,W2,DEBIN2,W0
0x1cd1bc…1cd350 Dummy {f00=0x008a, f01=0x0190, f02=»F NO MORE IN CHAIN z ( P PERF RD,DEBIN2,BUF READ NEXT RECORD ! P BERR DLRET ! F 0 P XCOPY BUF,W2,W2,DEBIN5,W0 SET LINK BACKWARD ! Z 0 P PERF WR,DEBIN2,BUF WRITE WITH UPDATED LINK ! PDL003 ! P MOVE DEBIN5,DEBIN1 ! P B DL006 ! PDL004 !
0x1cd350…1cd4e4 Dummy {f00=0x008a, f01=0x018e, f02=»2 ! PDL008 " P PERF RD,DEBIN2,BUF " P BERR DLRET " 4 P XCOPY DEBIN5,W0,W2,BUF,W4 " H P XCOPY BUF,W4,W2,DEBIN1,W0 " j P PERF WR,DEBIN2,BUF " P BERR DLRET " PDLR2 " P MOVE DEBIN1,FILINDUS " P TBT SWIT04,DLR1 " P MOVE DEBI
0x1cd4e4…1cd678 Dummy {f00=0x008a, f01=0x401e, f02=» P* # END # @ # RD,DEBIN2,BUF " P BERR DLRET " 4 P XCOPY DEBIN5,W0,W2,BUF,W4 " H P XCOPY BUF,W4,W2,DEBIN1,W0 " j P PERF WR,DEBIN2,BUF " P BERR DLRET " PDLR2 " P MOVE DEBIN1,FILINDUS " P TBT SWIT04,DLR1 " P MOVE DEBI
0x1cd678…1cd80c Dummy {f00=0x008a, f01=0x2008, f02=» $ NEWVOL,REFS01 PREFCOP P MOVE DKBIN1,FINDEXPO(FIND) , P MOVE FFSNR(FIND),FSRNR P ( P COPY RPOOL(DKBIN1),W9,W10,SYSBUF,W0 p * P COPY BPOOL(DKBIN1),W0,W188,SYSBUF,W10 PREFEND P PERF COND P RET P PEND END
0x1cd80c…1cd9a0 Dummy {f00=0x008a, f01=0x0190, f02=» ] $ ?FMDA 1 0 0 0 z h s s !T}6 )) !@|Tkj !! ! j !! 10 _H !j !! $ !A !@( "90! !T2@e@i@k !" ? 'hZ 2 !TS &6 " _ Ai_8Ae_<" y 4WsAkW !j !! ( ~
0x1cd9a0…1cdb34 (1, 349) Opaque[0x194]
0x1cdb34…1cdcc8 # DirEnt {nam=»DKRUT2«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1160, f03=0x0000}
0x1cdb34…1cdcc8 IdxSect {
0x1cdb34…1cdcc8 f00 = 0x008b // 0x1cdb34 @0x0
0x1cdb34…1cdcc8 f01 = 0x000a // 0x1cdb36 @0x2
0x1cdb34…1cdcc8 gno = [ // 0x1cdb38 @0x4
0x1cdb34…1cdcc8 [0x00]: C0x008b.0x0.0
0x1cdb34…1cdcc8 [0x01]: C0x008b.0x1.0
0x1cdb34…1cdcc8 [0x02]: C0x008b.0x2.0
0x1cdb34…1cdcc8 [0x03]: C0x008b.0x3.0
0x1cdb34…1cdcc8 [0x04]: C0x008c.0x0.0
0x1cdb34…1cdcc8 ]
0x1cdb34…1cdcc8 }
0x1cdcc8…1cde5c Dummy {f00=0x008b, f01=0x0190, f02=» $ P IDENT DKRUT2 REL 10.0 80-04-11 P 80-01-21/CHST , > :********************************************************** D * * @ P* AFTER EXECUTION, THE DATA-ITEM DEBINW4 WILL BE SET AS * FOLLOWS: * 0 =
0x1cde5c…1cdff0 Dummy {f00=0x008b, f01=0x0190, f02=» 22 = DISC I/0-ERROR * P* 23 = DISC NOT OPERABLE * J @ ;*********************************************************** T P DDUM DEDDIV P PDIV P EXT WAIT ENTRY ENTFMT ENTRY DELFMT ENTRY PREFMT
0x1cdff0…1ce184 Dummy {f00=0x008b, f01=0x0190, f02=»H P EXT RFRSP P EXT RD P EXT REFSP , P EXT EMPTYT > P EXT WRFSP R P EXT NOFFRE d P EXT COND x P EXT ALGO P EXT RETURN P EXT EMPTYT P EXT DEPOOL P EXT GETIND P EXT DEDISC P EXT CMP
0x1ce184…1ce318 Dummy {f00=0x008b, f01=0x0190, f02=» P MOVE DEBINW4,W0 P IB FUCO C P OPENSY C 4 P CLOSSY C H P OPENUS C P CLOSUS p POPENSY P TBF BOOLA1,GOON P SWITCH P B OPENSY PGOON P SET SWITSY P BNZ OPENSY04 P SET BOOLA
0x1ce318…1ce4ac Dummy {f00=0x008b, f01=0x018e, f02=»),W1,OPENSY04 P MOVE STRG10A,=C'SYSFIL ' P MOVE JOBNAME,FVOLNAME(W1) 8 8 P CALL OPENF,DISK,FILECODE(W1),SYSBUF,STRG10A,JOBNAME Z P BOK OPENSY02 POPENSY06 , P CALL CLOSEF,DISK,FILECODE(W1),SYSBUF,W0 P CLEAR SWITSY P MOVE
0x1ce4ac…1ce640 Dummy {f00=0x008b, f01=0x018e, f02=» ~ PDES1 " P CALL CMPIND,DKBIN1,BPOOL(W1) P BNOK DES2 OUT OF RANGE : P MOVE RPOOL(DKBIN1),=X'5800' Z P ADD DKBIN1,W1 ~ P B DES1 PDES2 P PERF NOFFRE,DEBIN1,W1 P MOVE FNOOFREC(W1),DEBIN1 P PERF DISU,W1,W1,SYSBUF
0x1ce640…1ce7d4 (1, 350) Dummy {f00=0x008b, f01=0x0190, f02=» * P PERF DEPOOL,W2,DKBIN1,DKBIN2,STRG10A P BNOK OPENSY06 2 P MOVE FINDEXPO(W1),DKBIN1 H P PERF REFSP,W2,W1 j P BNOK OPENSY06 POPENSY07 P READ SYSTEM VARIABLES P PERF DEDISC,W19 POPENSY04 P CLEAR BOOLA1 P
0x1ce7d4…1ce968 Dummy {f00=0x008b, f01=0x018e, f02=» " P CBG FCOUNTER(W1),W0,CLOSSY02 P PERF WRFSP,W1 * P BNOK CLOSSY01 @ P PERF DISU,W1,W1,SYSBUF V P BNOK CLOSSY01 v P PERF DISU,W2,W1,SYSBUF PCLOSSY01 , P CALL CLOSEF,DISK,FILECODE(W1),SYSBUF,W0 PCLOSSY02 P PERF COND
0x1ce968…1ceafc Dummy {f00=0x008b, f01=0x0190, f02=» P BERR OPENUS03 P PERF SETUSE P BERR OPENUS03 . P B OPENUS01 D PGOONN X P SET SWITUS f P BNZ OPENUS0C z P SET BOOLA2 P CLEAR SWIT01 P ADD FCOUNTER(FILINDUS),W1 ( P CBG FCOUNTER(FILINDUS),W1,OPENUS0E P
0x1ceafc…1cec90 Dummy {f00=0x008b, f01=0x0190, f02=»NOK OPENUS02 P PERF NOFFRE,DEBIN1,FILINDUS P BOK OPENUS0D 8 P SET SWIT01 N POPENUS0D b $ P MOVE FNOOFREC(FILINDUS),DEBIN1 r P PERF DISU,W3,W1,RBUF P BERR OPENUS02 POPENUS0A * P XCOPY F95PROC(FILINDUS),W0,W2,RBUF,W5
0x1cec90…1cee24 Dummy {f00=0x008b, f01=0x018e, f02=» FILE CLOSED? P CBE DKBIN1,W0,USCLS P SET SWIT01 2 PUSCLS F P XCOPY RBUF,W0,W1,W7,W1 T P PERF DISU,W4,W1,RBUF t P BOK OPENUS0B P SET SWIT01 POPENUS0B P PERF SETUSE P BERR OPENUS02 P MOVE DKBIN3,W1
0x1cee24…1cefb8 Dummy {f00=0x008b, f01=0x0190, f02=» P PERF REFSP,W2,FILINDUS P PERF RELEAS $ P BOK OPENUS01 8 $ P MOVE DKBIN1,FINDEXPO(FILINDUS) N * P PERF DEPOOL,W6,DKBIN1,DKBIN2,STRG10A v OPENUS02 2 P CALL CLOSEF,DISK,FILECODE(FILINDUS),SYSBUF,W0 P MOVE DEBINW4,W21 POPEN
0x1cefb8…1cf14c Dummy {f00=0x008b, f01=0x0190, f02=»E DEBINW4,=W'-2' POPENUS0C P CLEAR BOOLA2 ( P PERF COND > RET P PCLOSUS P TBF SWITUS,CLOSUS01 j P CLEAR SWITUS P SUB FCOUNTER(FILINDUS),W1 P BP CLOSUS01 P PERF WRFSP,FILINDUS P PERF RELEAS P BNOK
0x1cf14c…1cf2e0 Dummy {f00=0x008b, f01=0x0190, f02=»K CLOSUS02 P XCOPY RBUF,W0,W1,W0,W1 P PERF DISU,W4,W1,RBUF 2 P BNOK CLOSUS02 P PCLOSUS02 f 2 P CALL CLOSEF,DISK,FILECODE(FILINDUS),SYSBUF,W0 v CLOSUS01 P PERF COND RET PEND PSETUSE PROC P XCOPY SECLE
0x1cf2e0…1cf474 (1, 351) Dummy {f00=0x008b, f01=0x0190, f02=»E DKBIN1,W0,SETNOZ P MOVE DKBIN1,W1 PSETNOZ 2 P MUL DKBIN1,SECLEN @ $ P CALL GETIND,RBUF,DKBIN2,DKBIN3 Z P CBNG DKBIN1,DKBIN2,SETOKA P MOVE DEBINW4,W22 P MOVE BCD13A,=D'0' P B SETRET PSETOKA MOVE USELEN,DKBIN1
0x1cf474…1cf608 Dummy {f00=0x008b, f01=0x0190, f02=»PROC FC P* PENTFMT ENTER FORMAT P PERF WAIT 8 P BERR RETURN J P MOVE STR6A,FORMAT ^ P PERF FREESP,DEBIN1,W1 x P BERR RETURN P MOVE WORK(W9),DEBIN1 P B WRTFMT PFMTCHAIN P MOVE DEBIN5,W4 PRDCHAI
0x1cf608…1cf79c Dummy {f00=0x008b, f01=0x018e, f02=» v P B RETURN PFST3 : P XCOPY DEBIN4,W0,W2,SYSBUF,W6 OCCUPIED SPACE TO DEBIN4 & : P CBG DEBIN4,=W'180',RENEXT NO SPACE FOR MORE ENTRIES? d PADDENTRY , P XCOPY STRG10A,W0,W2,W0,W0 STATUS = '00' & P COPY STRG10A,W2,W6,FORMAT,W0 NAME
0x1cf79c…1cf930 Dummy {f00=0x008b, f01=0x018e, f02=» P ADD DEBIN4,W10 4 P XCOPY SYSBUF,W6,W2,DEBIN4,W0 SET OCCUPIED SPACE P PERF DISU,W2,DEBIN5,SYSBUF T P B RETURN x PFFIRST P MOVE DEBIN3,W0 P MOVE DEBINW4,W0 P B FFST01 PRENEXT 2 P XCOPY DEBIN5,W0,W2,SYSBUF,W4 GE
0x1cf930…1cfac4 Dummy {f00=0x008b, f01=0x0190, f02=» p P PERF DISU,W2,DEBIN3,SYSBUF PFFST01 , P MOVE DEBIN4,W10 : 4 P MOVE SYSBUF,=X'464300' SET SCTR-IDENTIFICATION R 2 P XCOPY SYSBUF,W2,W2,DEBIN3,W0 SET LINK TO PREV . P XCOPY SYSBUF,W4,W2,W0,W0 LINK TO NEXT = 0 P B ADDENTRY PWR
0x1cfac4…1cfc58 Dummy {f00=0x008b, f01=0x0190, f02=»IN2,W1,W1,RPOOL(DEBIN3),W8 GET LINK NEXT BUF * P XCOPY SYSBUF,W8,W2,RPOOL(DEBIN3),W17 4 ( P CBE DEBIN2,W0,NOMOREC LAST RECORD? b P PERF FREESP,DEBIN4,W1 P BNERR COP < P MOVE DEBIN2,WORK(W9) SAVE POINTER TO 1:ST FORMAT RECORD * P MOVE WORK
0x1cfc58…1cfdec Dummy {f00=0x008b, f01=0x018e, f02=» 4 P XCOPY SYSBUF,W4,W2,DEBIN4,W0 SET LINK NEXT REC * P COPY SYSBUF,W10,W188,BPOOL(DEBIN3),W0 @ P PERF DISU,W2,DEBIN1,SYSBUF n P BERR RETURN P TBF SWIT01,CO10 P B FMTCHAIN PCO10 P MOVE DEBIN3,DEBIN2 P MOVE DEBIN1,=
0x1cfdec…1cff80 Dummy {f00=0x008b, f01=0x0190, f02=» P SET SWIT01 P B COP P* & P* 0 P* : P* D P* N PNEXFMT GET NEXT FORMAT X P SET SWIT03 x P* P* PPREFMT P MOVE FRMTPNTR,W0 P CALL EMPTYT,FORMAT P BZ RRECNX P MOVE RNRFMCH,W4
0x1cff80…1d0114 (1, 352) Dummy {f00=0x008b, f01=0x0190, f02=»A,FORMAT P PERF SFMTCH,W4,SYSBUF,W10 P BERR RETURN 2 P MOVE RNRFMCH,DEBIN1 F P MOVE PTRFMCH,DEBIN2 b P SUB PTRFMCH,W8 ~ PRRECNZ P PERF WAIT P BERR RETURN PRRECNY P PERF DISU,W1,RNRFMCH,SYSBUF P BNERR RREC0
0x1d0114…1d02a8 Dummy {f00=0x008b, f01=0x0190, f02=»N PRREC01 0 P XCOPY DEBIN1,W0,W2,SYSBUF,W6 GET USED SPACE P TBF SWIT03,RREC02 L P ADD PTRFMCH,W10 f P CBE PTRFMCH,DEBIN1,RREC03 ~ PRREC07 P MOVE DEBIN1,PTRFMCH P B RREC04 PRREC03 P MOVE DEBIN1,W4 PRREC05
0x1d02a8…1d043c Dummy {f00=0x008b, f01=0x018e, f02=» MOVE PTRFMCH,W0 P B RRECNY PRREC02 * P CBL PTRFMCH,W20,RREC06 8 6 P CBNL DEBIN1,PTRFMCH,RREC02A IF WITHIN USED SPACE X . P MOVE PTRFMCH,DEBIN1 UPDATE WITH MAX LIMIT PRREC02A P SUB PTRFMCH,W10 P B RREC07 PRREC06
0x1d043c…1d05d0 Dummy {f00=0x008b, f01=0x0190, f02=» x & P COPY STRG10A,W1,W6,SYSBUF,DEBIN1 $ P COPY FORMAT,W0,W6,SYSBUF,DEBIN1 2 P MOVE STR6A,FORMAT Z P B NXPRFM t P* P* P* PDELFMT DELETE FORMAT P PERF WAIT P BNOK RETURN P MOVE STR6A,FORMAT P CLEAR
0x1d05d0…1d0764 Dummy {f00=0x008b, f01=0x018e, f02=»C h 4 P XCOPY DEBIN1,W0,W2,SYSBUF,W6 DEBIN1=OCC. SPACE P DLETE SYSBUF,DEBIN2,W10 B P SUB DEBIN1,W10 b 0 P XCOPY SYSBUF,W6,W2,DEBIN1,W0 SET OCC SPACE z P CBG DEBIN1,W10,DELF1 P CLEAR SWIT04 P PERF DLRCCH,SYSBUF P BERR RETU
0x1d0764…1d08f8 Dummy {f00=0x008b, f01=0x0190, f02=» r P BERR RETURN P PERF ALGO,W2 P BNERR DELF2 2 PDELF3 F P MOVE DEBINW4,W9 T PDELF31 l * P CBNE FC,W9,DELF32 JUMP IF NOT ENTFMT z 6 P MOVE DEBINW4,WORK(W9) RESTORE ORIGINAL ERROR CODE PDELF32 P B RETURN PDELF2
0x1d08f8…1d0a8c Dummy {f00=0x008b, f01=0x4160, f02=»RD j P BERR RETURN P PERF RFRSP,DEBIN2,W1 PDELF < P CBE DEBIN1,W0,DELF31 H P PERF DISU,W1,DEBIN1,SYSBUF f P BERR RETURN P COPY STR2A,W0,W2,SYSBUF,W0 P CBNE STR2A,=X'4600',DELF3 P PERF RFRSP,DEBIN1,W1 " P XCOPY
0x1d0a8c…1d0c20 Dummy {f00=0x008b, f01=0x2008, f02=» NEWVOL,REFS01 PREFCOP P MOVE DKBIN1,FINDEXPO(FIND) , P MOVE FFSNR(FIND),FSRNR P ( P COPY RPOOL(DKBIN1),W9,W10,SYSBUF,W0 p * P COPY BPOOL(DKBIN1),W0,W188,SYSBUF,W10 PREFEND P PERF COND P RET P PEND END
0x1d0c20…1d0db4 (1, 353) Dummy {f00=0x008c, f01=0x0190, f02=» Wp Wj Wb Sf !WAH{ W<0A " m W W 0! !T3m W 0! !T&m W 0h U ! V !!4 !"4 80 11 / 6 ''' ' y ''' "W% ," "0 We0F W "_ '_ !0F ! 2 W 0 0 (P" &W:6 33 33 333 36
0x1d0db4…1d0f48 Dummy {f00=0x008c, f01=0x0190, f02=»#4 @ 0C P j !!!WP U00 P m ( &W 0) = b !Z/h U ! !Q !4 !03@ T 0% j %! !01 ! 0F ( ! 6 cv6 C & 4 W 1W 200 P " "Jh !U !TA00 T h ! !T006 _ A 00 T f !0% 0301 _ 0 0 (P h ! !P 11 _ 11 !00 X 0
0x1d0f48…1d10dc Dummy {f00=0x008c, f01=0x0190, f02=»HNUMBERRECORDCONFIRM VALUESETSYMBOLIC: XTTTT9 < . . 9 DELETED INSERTED + ON UNIT:U i + WITHIN JOB: k RECOVERY RUNNING. RECORD CORRECTION : FREEZING OF BATCH l CONFIRM RECORD INSERT CONFIRM RECORD DELETE:
0x1d10dc…1d1270 Dummy {f00=0x008c, f01=0x0190, f02=»8 : AUTOMATIC SKIP/DUP *O N* FF* RECOVERY OF : k 7 : l RUNNING. ( ',!.%)$&"#-* # +0 4 ! + 6 B R d x / & N ) t@
0x1d1270…1d1404 Dummy {f00=0x008c, f01=0x0190, f02=» T H L P 6@d@g0+ 03W0 Ad0. 0/ R Ag0D ! P "Hd 0. 0/ 4 ! ! @ 4h $ !6 ++ W) "@|Tyj !! ! j !! 00 _IT[ !j !! 6 nnWO@e !6 ! 3h ! !P !@i ! 9 5h * !TY2 W "_ !
0x1d1404…1d1598 Dummy {f00=0x008c, f01=0x0190, f02=»! 6 & ) 0! ! W30! !P(_ 0! ! $W ( 0A # W a " Hi b " !P 6 ! "W ! "W ! "W ! "S ? #? He U m " 0! !< ? ( 0. 0/ 0* 00 TJ U m ! P Q 0* , ~1d ! ~ W f ! ! 0 06 0( ?
0x1d1598…1d172c Dummy {f00=0x008c, f01=0x0190, f02=»TTTTTTTTT9 ! 0 0 0 @ 0 4 4h $ !6 ++ W) "@|Tyj !! ! j !! 00 _IT[ !j !! 6 nnWO@e !6 ! 3h ! !P !@i ! 9 5h * !TY2 W "_ !
0x1d172c…1d18c0 Dummy {f00=0x008c, f01=0x4156, f02=» a& a&4 < o = * & ; m n = 0 DEPOOL = ^ * & 9 . a = p * & W R J BC JC JD = * & u =
0x1d18c0…1d1a54 (1, 354) Opaque[0x194]
0x1d1a54…1d1be8 # DirEnt {nam=»DKRUT3«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1188, f03=0x0000}
0x1d1a54…1d1be8 IdxSect {
0x1d1a54…1d1be8 f00 = 0x008c // 0x1d1a54 @0x0
0x1d1a54…1d1be8 f01 = 0x0008 // 0x1d1a56 @0x2
0x1d1a54…1d1be8 gno = [ // 0x1d1a58 @0x4
0x1d1a54…1d1be8 [0x00]: C0x008c.0x1.0
0x1d1a54…1d1be8 [0x01]: C0x008c.0x2.0
0x1d1a54…1d1be8 [0x02]: C0x008c.0x3.0
0x1d1a54…1d1be8 [0x03]: C0x008d.0x0.0
0x1d1a54…1d1be8 ]
0x1d1a54…1d1be8 }
0x1d1be8…1d1d7c Dummy {f00=0x008c, f01=0x0190, f02=» $ P IDENT DKRUT3 REL 10.0 80-04-11 P 80-01-21/CHST , P* D P* N L P************************************************************************ X P* P* : P* ALL COMMENTS TO DKRUT3 ARE FOUND IN MODULE P* , P*
0x1d1d7c…1d1f10 Dummy {f00=0x008c, f01=0x0190, f02=» H P* P* P DDUM DEDDIV P PDIV 0 P ENTRY NXPRFM > P EXT COND T P EXT DISU f P EXT DEPOOL x P EXT WRFSP P EXT WAIT P EXT RELEAS P EXT FREESP P EXT SCHPOO P ENTRY GETSYS P ENTRY
0x1d1f10…1d20a4 Dummy {f00=0x008c, f01=0x0190, f02=» P EXT RFRSP P EXT RD P ENTRY ALGO * P ENTRY GETTBL > P ENTRY DELTBL T P ENTRY ENTTBL j P EXT RDDS P EJECT PDUMPROC PROC FC PGETFMT GET FORMAT P MOVE RNRFMCH,W0 P MOVE STR6A,DEINPUT P
0x1d20a4…1d2238 Dummy {f00=0x008c, f01=0x0190, f02=»C PRDDK P MOVE DEBINW4,W0 P CBNE FRMTPNTR,W0,MAXI . P CLEAR SWIT04 L P PERF SFMTCH,W4,SYSBUF,W10 b P BERR RETURN PRDDK98 P TEST SWIT02 P BNZ RETURN P READ 1ST REC OF FMT P MOVE SYSBUF,HEX00 P P
0x1d2238…1d23cc Dummy {f00=0x008c, f01=0x0190, f02=»00 IF GETNEXT | & P CBE FC,=W'32',RDDK100 IF GETPREV P SET SWIT07 @ P BNZ SETER T PRDDK100 f P PERF RELEAS v P B STRT01 PSETER P MOVE DEBINW4,W9 P B RETURN PCHOK & P MOVE FRMTPNTR,DEBIN3 SET FRMTPNTR
0x1d23cc…1d2560 Dummy {f00=0x008c, f01=0x0190, f02=»UF,W8 x P MOVE DEBIN1,DEBIN3 P MOVE DEBIN4,W0 * P GET NO OF CONSEC B " P XCOPY DEBIN4,W1,W1,SYSBUF,W9 ^ * P PERF DEPOOL,W1,DEBIN3,DEBIN4,STRG10A P BNERR GET21 ( P MOVE DEBINW4,W13 'NO BUFFERS FREE' P P B RETURN
0x1d2560…1d26f4 (1, 355) Dummy {f00=0x008c, f01=0x0190, f02=»IN3),W0,W188,SYSBUF,W10 * P XCOPY RPOOL(DEBIN3),W9,W10,SYSBUF,W0 P SUB DEBIN1,W1 N P CBE DEBIN1,W0,TBFAL d P PERF DISU,W1,DEBIN5,SYSBUF P BNERR GET25 * P PERF DEPOOL,W6,DEBIN4,DEBIN3,STRG10A P B RDDK99 PGET25 P
0x1d26f4…1d2888 Dummy {f00=0x008c, f01=0x0190, f02=»OVE DEBIN4,DEBIN3 PTBFAL * P PERF DEPOOL,W4,DEBIN4,DEBIN1,STRG10A ( * P PERF DEPOOL,W6,PINDFR,DEBIN1,STRG10A V PSETPFR P MOVE PINDFR,DEBIN4 P B RETURN PFLOCKE P MOVE DEBINW4,W24 'LOCKED' P B RETURN PGOTFFR
0x1d2888…1d2a1c Dummy {f00=0x008c, f01=0x0190, f02=»OT USED | PINDUSE P B FLOCKE PFUT 0 P B RETURN < PFGETUN N $ P PERF SCHPOO,=C'F ',STR6A,W5 SET P B TBFALL PSCHFMT SEARCH FORMAT P SET SWIT02 P B GETFMT P* P* PENTSYS P PERF WAIT
0x1d2a1c…1d2bb0 Dummy {f00=0x008c, f01=0x0190, f02=»1,W17,SYSV(DEBIN2),W0 ~ P ADD DEBIN1,W17 P ADD DEBIN2,W1 6 P CBL DEBIN2,W11,CENT L P PERF DISU,W2,W5,SYSBUF h P B RETURN P* P* PGETSYS P PERF WAIT P BERR RETURN P PERF DISU,W1,W5,SYSBUF P BOK N
0x1d2bb0…1d2d44 Dummy {f00=0x008c, f01=0x0190, f02=» COPY SYSV(DEBIN2),W0,W17,SYSBUF,DEBIN1 P ADD DEBIN1,W17 0 P ADD DEBIN2,W1 H P CBL DEBIN2,W11,CGET ^ P B RETURN z P* P* P EJECT P* P* ENTTBL SET SWIT01 B GETT01 ENTT01 P MOV
0x1d2d44…1d2ed8 Dummy {f00=0x008c, f01=0x0190, f02=»DISU,W2,DEBIN4,SYSBUF B RETURN ENTT03 0 PERF FREESP,DEBIN2,W1 > P BERR RETURN " P XCOPY SYSBUF,W4,W2,DEBIN2,W0 p P PERF DISU,W2,DEBIN4,SYSBUF P BERR RETURN P MOVE DEBIN4,DEBIN2 B ENTT01 * *
0x1d2ed8…1d306c Dummy {f00=0x008c, f01=0x0190, f02=»W7,SYSBUF BNOK RETURN DELT02 & PERF DISU,W1,DEBIN1,SYSBUF 4 BNOK RETURN X " XCOPY DEBIN2,W0,W2,SYSBUF,W4 l PERF RFRSP,DEBIN1,W1 BNOK RETURN P CBE DEBIN2,W0,RETUR MOVE DEBIN1,DEBIN2 B DELT02
0x1d306c…1d3200 Dummy {f00=0x008c, f01=0x0190, f02=»OT IN POOL, READ GETT01 PERF WAIT ( P BERR RETURN : , ' COPY STR2A,W0,W2,TABLE,W1 GET TABLE-NO N P MOVE BCD13A,STR2A ~ * P MOVE DEBIN5,BCD13A CONVERT TO BINARY CBL DEBIN5,=W'95',DKTBL $ MOVE DEBINW4,W1 INDICATE ERROR
0x1d3200…1d3394 (1, 356) Dummy {f00=0x008c, f01=0x0190, f02=»' ~ P BNE RETURN P MOVE DEBINW4,W0 P TBF SWIT01,NOINSY 6 P MOVE SYSBUF,=X'544300' P P PERF DISU,W2,W7,SYSBUF p P BERR RETURN PMUL MUL DEBIN5,W2 ADD DEBIN5,W10 & ! XCOPY DEBIN1,W0,W2,SYSBUF,DEBIN5 P
0x1d3394…1d3528 Dummy {f00=0x008c, f01=0x0190, f02=»,W0 r P PERF DISU,W2,W7,SYSBUF P BERR RETURN , P MOVE DEBIN4,DEBIN1 @ P B ENTT01 PDT002 n P TEST SWIT02 | P BNZ DELT01 RDN PERF DISU,W1,DEBIN1,SYSBUF P BNOK RETURN P MOVE DEBIN4,DEBIN1 MOV
0x1d3528…1d36bc Dummy {f00=0x008c, f01=0x0190, f02=»4 GET LINK NEXT t ( # CBG DEBIN1,W0,RDN READ NEXT RECORD ( P TBF SWIT01,NOINSY JUMP IF NOT ENTER D P MOVE DEBIN2,W17 p 0 P MATCH RPOOL(PINDTB),DEBIN2,W1,SYSBUF,W8,W1 ( P BOK ENTT01 INSERT IN CURRENT SECTOR P B ENTT03 INSERT NEW SECTOR
0x1d36bc…1d3850 Dummy {f00=0x008c, f01=0x018e, f02=»DEBIN3,W1 MOVE DEBIN2,W1 * % PERF DEPOOL,W1,DEBIN3,DEBIN2,STRG10A * BNOK RETURN X ( $ COPY RPOOL(DEBIN3),W9,W10,SYSBUF,W0 l * P COPY BPOOL(DEBIN3),W0,W188,SYSBUF,W10 GTF * % PERF DEPOOL,W4,DEBIN3,DEBIN2,STRG10A 8 P PERF DE
0x1d3850…1d39e4 Dummy {f00=0x008c, f01=0x0190, f02=» B RETURN * P PEND P* . < P* SUBROUTINR SFMTCH, SEARCH CHAIN. SWIT04 ON: USERFILE 8 P* x PSFMTCH PROC WX,BUF,STEG P MOVE DEBIN1,WX PRID0 P MOVE DEBIN2,W10 P TBF SWIT04,RID3 P PERF RDDS,DEBIN1
0x1d39e4…1d3b78 Dummy {f00=0x008c, f01=0x0190, f02=»R PRID1 P ADD DEBIN2,W2 P XCOPY DKBIN1,W0,W2,BUF,W6 , PMTCH N $ P MATCH BUF,DEBIN2,W6,STR6A,W0,W6 Z P BNERR FOND P ADD DEBIN2,STEG P SUB DEBIN2,W1 P CBNG DEBIN2,DKBIN1,MTCH P MOVE DEBINW4,W0 P XCOPY DKBIN
0x1d3b78…1d3d0c Dummy {f00=0x008c, f01=0x0190, f02=» IN CHAIN' r P B RETR PFOND " P ADD DEBIN2,W6 . " P XCOPY DEBIN3,W0,W2,BUF,DEBIN2 D PRETR j P PERF COND v P RET P PEND P* 2 PNOFFRE PROC CNTR,INDFIL GET NO OF FREE RECORDS P MOVE CNTR,W0 P MOVE DEBIN5,W2
0x1d3d0c…1d3ea0 Dummy {f00=0x008c, f01=0x0190, f02=»ERR NOFRET P XCOPY DEBIN5,W0,W2,RBUF,W4 P XCOPY DEBIN4,W0,W2,RBUF,W10 6 P ADD CNTR,DEBIN4 Z P CBNE DEBIN5,W0,US002 r P MOVE FNOOFREC(INDFIL),CNTR PNOFRET P PERF COND P RET P PEND P* P* P EJECT
0x1d3ea0…1d4034 (1, 357) Dummy {f00=0x008d, f01=0x0190, f02=» FORMAT' h $ P* FC = 1 FOR SET (ENTER FORMAT) J P* FC = 2 FOR GET (GET FORMAT) IN THIS CASE, THE CONDITIONREGISTER IS 8 . P* SET TO 0 IF IDENTIFICATION OKAY 2 P* SET TO 2 IF IDENTIFICATION NOT OKAY P* PALGO PROC FC
0x1d4034…1d41c8 Dummy {f00=0x008d, f01=0x415e, f02=» DKBIN1,W2 P CBNE DKBIN1,W6,XCALGO P IB FC C 0 P ALTO C B P ALFRO T PALTO d " P XCOPY SYSBUF,W0,W2,DKBIN3,W0 p P RET PALFRO " P XCOPY DKBIN2,W0,W2,SYSBUF,W0 P CBE DKBIN2,DKBIN3,NOERR P CMP W1,W2 P
0x1d41c8…1d435c Dummy {f00=0x008d, f01=0x2008, f02=» ETUN9 P TBF SW95PR,RETUN9 P MOVE DEBINW4,=W'-1' 0 PRETUN9 L P PERF COND Z P RET l P PEND x P END @ MOVE PINDTB,DEBIN3 B RETURN LCK MOVE DEBINW4,W3 B RETURN * *
0x1d435c…1d44f0 Dummy {f00=0x008d, f01=0x0190, f02=» F Q 0 [0 0 ^ e f h n t ~ 2 . AX Z 8 0 5
0x1d44f0…1d4684 Dummy {f00=0x008d, f01=0x0190, f02=» !! _ jX 3 0 0}@d "P l_p 4 # 6 P 7MW (j "M ( 0 P 0 * 1W 'W 1 1 1 1 v v" Av v"j !!Ov v" Cv 0 "" VvW 0 0 )W`0 "" Vv 0 !!W6 'WH ! W+ " W% h * h `
0x1d4684…1d4818 Dummy {f00=0x008d, f01=0x0190, f02=» j !!L 0 /P /0 f 4 0 f 4 4 0 0 0 $0 T 0 0 W 0 W 0 4P +W 4 0 4 @p@q@r@t@v@ @x 2 # !"#$% H ! ( Hx 4 $ !"4 "!4 !!4 I @w 0 0 V # 4 A 0 _ @ P 0 0 4 b
0x1d4818…1d49ac Dummy {f00=0x008d, f01=0x0190, f02=» W !4 F B T L0 X % 0 % r2 2 1 3F361 2 1 * V 2B z n (1 1 ,'*%^$~$ n % 4&% 0d2n # %R%V$ d H L P2j % a D o e ) 1 @
0x1d49ac…1d4b40 Dummy {f00=0x008d, f01=0x0190, f02=» 0 Q d F J S:T JOBPTS GETDATAMODE NO.:ENTRYTYPE:FORMATSEARCHVERIFY CREATEELEMENTNAME: TPROGRAM:REL 10.0SIZE OF DEFINITION VALUE-SETS70 CONVERSION10 SUPERVISORY FUNCTIONS99XXXXXXXXXXXXXXXXXXXXXXX-
0x1d4b40…1d4cd4 (1, 358) Opaque[0x194]
0x1d4cd4…1d4e68 # DirEnt {nam=»DE20FS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x11a8, f03=0x0000}
0x1d4cd4…1d4e68 IdxSect {
0x1d4cd4…1d4e68 f00 = 0x008d // 0x1d4cd4 @0x0
0x1d4cd4…1d4e68 f01 = 0x000e // 0x1d4cd6 @0x2
0x1d4cd4…1d4e68 gno = [ // 0x1d4cd8 @0x4
0x1d4cd4…1d4e68 [0x00]: C0x008d.0x1.0
0x1d4cd4…1d4e68 [0x01]: C0x008d.0x2.0
0x1d4cd4…1d4e68 [0x02]: C0x008d.0x3.0
0x1d4cd4…1d4e68 [0x03]: C0x008e.0x0.0
0x1d4cd4…1d4e68 [0x04]: C0x008e.0x1.0
0x1d4cd4…1d4e68 [0x05]: C0x008e.0x2.0
0x1d4cd4…1d4e68 [0x06]: C0x008e.0x3.0
0x1d4cd4…1d4e68 ]
0x1d4cd4…1d4e68 }
0x1d4e68…1d4ffc Dummy {f00=0x008d, f01=0x0190, f02=» $ P IDENT DE20FS REL 10.0 80-04-11 P 80-03-20/JAER , P* D * P* FORMAT DEFINITION SUBROUTINES N * P* -2-BYTE ADRESSING COMPATIBLE | P* DDUM DEDDIV PDIV P ENTRY FCOPY FORMAT COPYING P ENTRY FMELI F
0x1d4ffc…1d5190 Dummy {f00=0x008d, f01=0x0190, f02=»SL FORMAT START LINE P ENTRY FNL FORMAT NEW LINE " P ENTRY FKI FORMAT KEYED INPUT > " P ENTRY FVAL FORMAT VALIDATION d * P ENTRY FGEN FORMAT GENERATION (FIELD) $ P ENTRY FACC FORMAT ACCUMULATION . P ENTRY FDUPL FORMAT DUPLICATION REFERENC
0x1d5190…1d5324 Dummy {f00=0x008d, f01=0x0190, f02=» P EXT DERROR ERROR-MESSAGES & P EXT DEPOOL BUFFERRESERVATIN-MODUL & . P EXT EMPTYT ASSEMBLY SUBROUTINE EMPTYT - P * P EXT WCNTRL FORMAT FIELD CONTROL WORDS P EXT FMOVE FORMAT MOVE " P EXT CONNUM CONVERT STRG=>BIN " P EXT LINIT LINE INIT
0x1d5324…1d54b8 Dummy {f00=0x008d, f01=0x018e, f02=»EAR CAN EQU X'91' CANCEL PRET EQU X'92' RETURN ( PNOK EQU X'FF' NO KEY D PTOT EQU X'93' TOTAL ` P* | $ PDEKTAB6 KTAB CLR,CAN,RET,NOK,TOT P* PDEKTAB7 KTAB CLR,CAN,RET P* EJECT * * FORMA
0x1d54b8…1d564c Dummy {f00=0x008d, f01=0x0190, f02=» PERF FFIELD RET PEND $ EJECT 2 * @ * FORMAT EDITING J * j H D* FMELI = C2 <NUMB PIC.CHARS> <CH> <CH> ....<CH> 0A <FIELDNR> t * FMELI PROC $ P PERF FCODE,W2 GENERATE FMELI=C2 < 7 XCO
0x1d564c…1d57e0 Dummy {f00=0x008d, f01=0x018e, f02=»PIC CHARS b ADD BIN1,BIN12 NEXT POS , P TBF BOOL6,FMELI5 JUMP IF GENERAL FORMAT 2 2 P CALL FMOVE,STRG10A,FACK FETCH ACK-ITEM-ADRESS b P PERF FITEM LOAD ITEM-ADRESS , P SUB BIN1,W1 ADJUST FOR INDEX-ADR.STORE 2 P CBE BIN15,W2,FMELI3 JUMP IF
0x1d57e0…1d5974 (1, 359) Dummy {f00=0x008d, f01=0x0190, f02=» < P CALL FMOVE,STRG10A,FIND(BIN16) FETCH INDEX-ITEM-ADRESS P PERF FITEM LOAD ITEM-ADRESS D P B FMELIR h PFMELI5 z PERF FFIELD STORE FIELD NR PFMELIR RET PEND EJECT * * FORMAT TEXT
0x1d5974…1d5b08 Dummy {f00=0x008d, f01=0x0190, f02=»,W6 LOAD LIMIT FOR FLINK 4 P PERF FLINK,BIN16,BIN9 GENERATE FLINK IF NEEDED ( P CBNE DEBINW2,W0,FTEXT9 ERROR-SIGNAL X $ PERF FCODE,W3 GENERATE FTEXT=C3 2 - XCOPY BPOOL(BIN3),BIN1,W1,BIN9,W1 STORE NUMB ADD BIN1,W1 NEXT BUFFER POS : 5 X
0x1d5b08…1d5c9c Dummy {f00=0x008d, f01=0x0190, f02=» EJECT * * FORMAT TABULATION * > * FTAB = C4 <TABPOS> H * l FTAB PROC v P MOVE BIN16,W188 & P SUB BIN16,W6 LOAD LIMIT FOR FLINK 2 P PERF FLINK,BIN16,W0 GENERATE FLINK IF NEEDED ( P CBNE DE
0x1d5c9c…1d5e30 Dummy {f00=0x008d, f01=0x0190, f02=» BIN1,W1 NEXT BUFFERPOS PFTAB99 RET . PEND : P EJECT H P* V P* FORMAT VALIDATION ` P* > P* FVAL = C5 <NUMB VAL.-CHARS> <CH> <CH> .......... P* PFVAL PROC P MOVE BIN16,W188 & P SUB B
0x1d5e30…1d5fc4 Dummy {f00=0x008d, f01=0x0190, f02=»CTEXT t 4 P PERF FLINK,BIN16,BIN15 GENERATE FLINK IF NEEDED ( P CBNE DEBINW2,W0,FVAL9 ERROR-SIGNAL F & P PERF FCODE,W5 GENERATE FVAL = C5 r 4 P PERF CONNUM,JOBSPC,FMTWK,W1 CONVERT VARSTR=>BIN @ P XCOPY BPOOL(BIN3),BIN1,W1,FMTWK(W1),W1 STORE NUMB O
0x1d5fc4…1d6158 Dummy {f00=0x008d, f01=0x0190, f02=»IN1,FMTWK(W1) ADJUST BUFFERPOS PFVAL9 & P RET 4 P PEND @ P EJECT N P* * P* FORMAT GENERATION (OF FIELDS) f P* @ P* FGEN = C6 <NUMB OF GEN.-CHARS> <CH> <CH> ......... P* PFGEN PROC P MOVE BIN1
0x1d6158…1d62ec Dummy {f00=0x008d, f01=0x0190, f02=» BIN15,W3 ADJUST FOR FUNCTEXT 4 P PERF FLINK,BIN16,BIN15 GENERATE FLINK IF NEEDED & ( P CBNE DEBINW2,W0,FGEN9 ERROR-SIGNAL ^ & P PERF FCODE,W6 GENERATE FGEN = C6 4 P PERF CONNUM,JOBSPC,FMTWK,W2 CONVERT VARSTR=>BIN @ P XCOPY BPOOL(BIN3),BIN1,W1,F
0x1d62ec…1d6480 Dummy {f00=0x008d, f01=0x0190, f02=»ARSSTRG X P ADD BIN1,FMTWK(W2) PFGEN9 , P RET : P PEND F P EJECT T P* b P* FORMAT ACCUMULATION l P* @ P* FACC = C7 <NUMB OF ACC.-CHARS> <CH> <CH> .......... P* PFACC PROC P MOVE BIN16,W1
0x1d6480…1d6614 (1, 360) Dummy {f00=0x008d, f01=0x0190, f02=»IN15,W3 ADJUST FOR FUNCTEXT 4 P PERF FLINK,BIN16,BIN15 GENERATE FLINK IF NEEDED $ ( P CBNE DEBINW2,W0,FACC9 ERROR-SIGNAL & P PERF FCODE,W7 GENERATE FACC = C7 4 P PERF CONNUM,JOBSPC,FMTWK,W3 CONVERT VARSTR=>BIN @ P XCOPY BPOOL(BIN3),BIN1,W1,FMT
0x1d6614…1d67a8 Dummy {f00=0x008d, f01=0x0190, f02=»SSTRG V . P ADD BIN1,FMTWK(W3) ADJUST BUFFERPOSITION PFACC9 @ P RET N P PEND Z P EJECT h P* v * P* FORMAT DUPLICATION REFERENCES P* < P* FDUPL = CC <NUMB. OF CHARS> <CH> <CH> <CH>...... P* PFDUPL
0x1d67a8…1d693c Dummy {f00=0x008d, f01=0x0190, f02=»RATE FLINK t ( P CBNE DEBINW2,W0,FDUPL9 ERROR-SIGNAL & P PERF FCODE,W8 GENERATE FDUPL = CC > 2 P PERF CONNUM,DUPL,FMTWK,W4 CONVERT VARSTR. BIN h > P XCOPY BPOOL(BIN3),BIN1,W1,FMTWK(W4),W1 STORE NUM OF CHARS P ADD BIN1,W1 NEXT BUFFERPOS > P XCO
0x1d693c…1d6ad0 Dummy {f00=0x008d, f01=0x0190, f02=»D P EJECT P* P* FORMAT LINKING " P* @ L P* FLINK = DF <BUFFERPOOLADRESS> <FORMATLINKINDEX> <CONSTANTADRESS> J P* H P* INPUT PARAMETERS : LIMIT = POSITION LIMIT IN CURRENT BUFFER D P*
0x1d6ad0…1d6c64 Dummy {f00=0x008d, f01=0x0190, f02=» CHARS = NUMBER OF CHARACTER-POSITIONS TO H P* COUNT BEFORE COMPARISON IS MADE J P* P* P* OUTPUT PARAMETER : . P* DEBINW2 = 0 OK L P*
0x1d6c64…1d6df8 Dummy {f00=0x008d, f01=0x018e, f02=»ETUR N P P* = 4 MAXIMUM BUFFERS USED;KTOT SIMULATED P* ` L P*********************************************************************** j P* PFLINK PROC LIMIT,CHARS P MOVE DEBINW2,W0 OK 2 P SUB LIMIT
0x1d6df8…1d6f8c Dummy {f00=0x008d, f01=0x0190, f02=» P MOVE BIN15,W1 WORK:=1 & P MATCH STRG10A,BIN15,W9,FDIR,W0,W1 " 2 P CBE BIN15,W1,FLINKA JUMP IF 1-BYTE ADRESSING L & P SUB LIMIT,W3 ADJUST FOR 2-BYTEADR PFLINKA 4 P CBNG RNRFMCH,W29,FLINKF JUMP IF NOT LAST BUFFER * P SUB LIMIT,W3 ADJUST 3
0x1d6f8c…1d7120 Dummy {f00=0x008d, f01=0x0190, f02=» CBNG BIN1,LIMIT,FLINK9 JUMP IF NO FLINKGEN : P CBG RNRFMCH,W29,FLINK7 NO MORE BUFFERS ALLOWED MAX 24 4 & P PERF FCODE,W9 GENRATE FLINK = DF r 6 P CALL FMOVE,STRG10A,FBPOOL FETCH BPOOL-ITEM-ADRESS P PERF FITEM LOAD ITEM-ADRESS , P SUB BIN1,W1 A
0x1d7120…1d72b4 (1, 361) Dummy {f00=0x008e, f01=0x0190, f02=»FLINK1 6 P CALL FMOVE,STRG10A,FFLIND FETCH FLIND-ITEM-ADRESS P PERF FITEM LOAD ITEM-ADRESS H , P SUB BIN1,W1 ADJUST FOR INDEX-ADR.STORE l . P CBE BIN15,W2,FLINK3 JUMP IF 1-BYTE ADRESS , P SUB BIN1,W1 ADJUST FOR INDEX-ADR.STORE PFLINK3
0x1d72b4…1d7448 Dummy {f00=0x008e, f01=0x0190, f02=»OOL2,FLINK5 6 P MOVE BIN3,FMTWK(W8) RESTORE BUFFERIND ALREADY RES P B FLINK6 N PFLINK5 ` " P MOVE BIN16,W1 WANTED BUFFERS n P MOVE STRG10A,FORMAT < P PERF DEPOOL,W3,BIN16,BIN3,STRG10A CHAIN ANOTHER BUFFER P BNOK FLINK8 JUMP IF ERR
0x1d7448…1d75dc Dummy {f00=0x008e, f01=0x0190, f02=»W2 DISPLAY DITO WHILE CHANGED ( P XCOPY STR1A,W0,W1,FDIR,W0 LOAD 'E9' & 6 P MOVE BPOOL(BIN3),STR1A FILL BUFFER WITH FEXIT E9 R PFLINK6 ( P MOVE BIN1,W0 BPOOLBUFFERPOINTER:=0 P B FLINK9 PFLINK7 P MOVE DEBINW4,W29 P PERF DE
0x1d75dc…1d7770 Dummy {f00=0x008e, f01=0x0190, f02=» PERF DERROR,DEKTAB7 $ P CBE DEBINW2,W1,FLINK5 TRY AGAIN PFLINKB D * P SUB DEBINW2,W1 ADJUST FOR CANC RETURN R PFLINK9 . P CLEAR DOOL2 F=LINE NOT DEL LAST BUFF USED P RET P PEND P EJECT P* P* FORMAT START L
0x1d7770…1d7904 Dummy {f00=0x008e, f01=0x0190, f02=»DIR,W0 LOAD 'E9' | 6 P MOVE BPOOL(BIN3),STR1A FILL BUFFER WITH FEXIT E9 $ P PERF FCODE,W10 GENERATE FSL=E0 R 6 P MOVE FMTWK(W6),BIN1 SAVE STARTPOINTER OF LASTLINE z 6 P MOVE FMTWK(W7),BIN3 SAVE BUFFERINDEX OF LASTLINE P MOVE BIN10,W0 FIELDNR:=0
0x1d7904…1d7a98 Dummy {f00=0x008e, f01=0x0190, f02=»ET P PEND P EJECT P* & * P* FORMAT END-OF-LINE PROCESSING 0 P* ^ 4 P* - PROCESSES FORMAT DIRECTIVE CODE : FNL h : P* AND ADJUSTS WORKITEMS FOR NEW LINE PROCESSING P* P* OUTPUT VARIABLES: 4
0x1d7a98…1d7c2c Dummy {f00=0x008e, f01=0x0190, f02=» = 2 NO AVAILABLE BUFFERS;RETUR B P* = 4 MAX LIMIT EXCEEDED;KTOT F P* L P*********************************************************************** P* PFNL PROC P MOVE BI
0x1d7c2c…1d7dc0 Dummy {f00=0x008e, f01=0x0190, f02=»RROR SIGNAL x P PERF FCODE,W11 GENERATE FNL $ P ADD FDVBCD(W2),=D'1' NEXT LINE 8 , P DISPLAY 2,W1,W1 DISPLAY LINE NR/PAGE NR ` < P CBG FDVBCD(W2),FDVBCD(W1),FNL96 JUMP IF LINEMAX REACHED & P TBT DOOL8,FNL10 JUMP IF NO ERASE P ERASE 10,W3,W
0x1d7dc0…1d7f54 (1, 362) Dummy {f00=0x008e, f01=0x0190, f02=» d 0 P MOVE FMTWK(W7),BIN3 SAVE LASTLINE'S BUFFIND P CBE FMTWK(W5),W0,FNL90 < 6 P MOVE RECLNTH,FMTWK(W5) SAVE LAST LINES NUMB CHARS PFNL90 & P SET BOOL1 T=FIRST LINE CONFIRMED $ P PERF LINIT LINE INIT WORKITEMS P MOVE DEBINW2,W0 O
0x1d7f54…1d80e8 Dummy {f00=0x008e, f01=0x0190, f02=» IF CLEAR-KEY v ( P SUB DEBINW2,W1 ADJUST FOR CANC RET PFNL99 B P RET P P PEND EJECT j * FORMAT KEYED INPUT x * 4 /* FKI = FO <TABPOS> <CTL1> <CTL2> <CTL3> < 8* = F2 <TABPOS> <APPLE1> <CTL1>
0x1d80e8…1d827c Dummy {f00=0x008e, f01=0x0190, f02=» <CTL2> <CTL3> h D P* = FA <TABPOS> <APPLE1> <DUPL> <CTL1> <CTL2> <CTL3> L P* = FB <TABPOS> <APPLE1> <APPLE2> <DUPL> <CTL1> <CTL2> <CTL3> ^ * FKI PROC P MOVE BIN16,W188 & P TBT ALPHA,FKI01 JUMP IF ALPHANUM (
0x1d827c…1d8410 Dummy {f00=0x008e, f01=0x018e, f02=»OAD CHRS TO COUNT ( P SUB BIN16,W14 LOAD LIMIT FOR FLINK ! PFKI03 ! F 4 P PERF FLINK,BIN16,BIN15 GENERATE FLINK IF NEEDED ! T ( P CBNE DEBINW2,W0,FKI99 ERROR-SIGNAL ! $ P MOVE BIN15,W13 GENERATE FKI=F0 ! & " MOVE BIN16,SPEC LOAD APPLE BINARY !
0x1d8410…1d85a4 Dummy {f00=0x008e, f01=0x018e, f02=» PFKI10 " P CBNE FDVSTR(W1),='N',FKI20 " $ P ADD BIN15,W3 FKI=F8 OR FA OR FB " 6 PFKI20 " ^ ( P PERF FCODE,BIN15 GENERATE FKI-CODE " l P EJECT " * " ( $* TABULATION POSITION SETTING " * " 4 / XCOPY BPOOL(BIN3),BIN1,W1,BIN6,W1
0x1d85a4…1d8738 Dummy {f00=0x008e, f01=0x0190, f02=» " r * # ( # CBG BIN16,=X'FF',FKI40 APPLE > 255 # 4 0 XCOPY BPOOL(BIN3),BIN1,W1,BIN16,W1 STORE APPLE1 # > ADD BIN1,W1 NEXT POS # v P B FKI50 # FKI40 # 6 2 XCOPY BPOOL(BIN3),BIN1,W2,BIN16,W0 STORE APPLE1-2 # ADD BIN1,W2 NEXT POS #
0x1d8738…1d88cc Dummy {f00=0x008e, f01=0x018e, f02=»E,STRG10A,IND1 # P PERF FITEM LOAD ITEM W1 $ FKI70 $ 6 * $ D 2 -* CONTROL WORDS SETTING CTL1 CTL2 CTL3 $ N * $ 8 P MOVE BIN16,FDVBCD(W7) LOAD FDVBCD(W7)LENGTH BINARY $ > P CALL WCNTRL,BPOOL(BIN3),BIN1,DEBINW1,BIN16,BIN7 LOAD CTLS $
0x1d88cc…1d8a60 Dummy {f00=0x008e, f01=0x0190, f02=» > :* INPUT PARAMETER : FDIND = FORMAT DIRECTIVE INDEX % * % F : 5***************************************************** % P FCODE PROC FDIND % * % XCOPY BPOOL(BIN3),BIN1,W1,FDIR,FDIND % ( $ ADD BIN1,W1 NEXT POSITION IN BUFFER % RET %
0x1d8a60…1d8bf4 (1, 363) Dummy {f00=0x008e, f01=0x0190, f02=»FFIELD PROC % 6 2 XCOPY BPOOL(BIN3),BIN1,W1,W10,W1 STORE '0A'-FIELD & ADD BIN1,W1 NEXT POS & N 6 1 XCOPY BPOOL(BIN3),BIN1,W1,BIN10,W1 STORE FIELDNR & l P ADD BIN1,W1 NEXT POS & RET & PEND & P EJECT & P* & > P* THIS ROUTI
0x1d8bf4…1d8d88 Dummy {f00=0x008e, f01=0x0190, f02=»DED IN 'STRG10A' & ^ D P* AND STORES IT IN ACTUAL BUFFER AND THE CORRECT POSITION. ' 6 P* IT ALSO ADJUSTES THE BUFFERPOINTER (BIN1). ' ` P* ' PFITEM PROC ' * P MOVE BIN15,W1 START ADRESS FOR MATCH ' : P MATCH STRG10A,BIN15,W9,FDIR,W0,W1 C
0x1d8d88…1d8f1c Dummy {f00=0x008e, f01=0x0190, f02=» RET ' P PEND ( P EJECT ( P* ( ( P* SET NUMBER OF POOLS ( 2 P P* -LAYOUT: X+YY <X=NUMBER OF DESC-POOLS , YY=NUMBER OF FORMATPOOLS> ( V P* ( 2 P* USED VARIABLES : BIN16 = WORK ( P* ( L P* CHANGED VA
0x1d8f1c…1d90b0 Dummy {f00=0x008e, f01=0x0190, f02=»********* ( N PNOPOOL PROC ) * P TBF BOOL7,NOPL10 JUMP IF NEWREG-MODE ) & 2 P MOVE BIN16,WORK(W3) FETCH NUMB OF OLD DPOOLS ) T 8 P CBNG PINDND,BIN16,NOPL20 JUMP IF NEW NUMB<OLD NUMB ) PNOPL10 ) 0 P MOVE BIN16,PINDND FETCH NUMB OF DESC POOLS ) P
0x1d90b0…1d9244 Dummy {f00=0x008e, f01=0x0190, f02=»NEWREG.MODE ) v . P ADD BIN16,WORK(W4) ADD NUMB OF OLD FPOOLS * PNOPL30 * F " P MOVE FDVBCD(W3),BIN16 'X+YY' * T P RET * z P PEND * P EJECT * P* * P* FORMAT LIST * P* FIX-ITEM-ADRESSES * P* * PFBPOOL FRMT * P
0x1d9244…1d93d8 Dummy {f00=0x008e, f01=0x0190, f02=» FMEND * , PFIND FTABLE IND1,IND2,IND3,IND4,IND5, C + $ P IND6,IND7,IND8,IND9,IND10, C + > ( P IND11,IND12,IND13,IND14,IND15, C + f ( P IND16,IND17,IND18,IND19,IND20, C + & P IND21,IND22,IND23,IND24,IND25 C + P IND26,IND27,IND28,IND29 +
0x1d93d8…1d956c Dummy {f00=0x008e, f01=0x0190, f02=»W3 + P FMEND , PIND4 FRMT , P FCTL W4 , * P FMEND , : PIND5 FRMT , H P FCTL W5 , Z P FMEND , j PIND6 FRMT , x P FCTL W6 , P FMEND , PIND7 FRMT , P FCTL W7 , P FMEND , PIND8 FRMT , P FCTL W8 , P FMEND , P
0x1d956c…1d9700 Dummy {f00=0x008e, f01=0x0190, f02=»W11 , P FMEND - PIND12 FRMT - P FCTL W12 - , P FMEND - > PIND13 FRMT - L P FCTL W13 - ^ P FMEND - p PIND14 FRMT - ~ P FCTL W14 - P FMEND - PIND15 FRMT - P FCTL W15 - P FMEND - PIND16 FRMT - P FCTL W16 - P F
0x1d9700…1d9894 (1, 364) Dummy {f00=0x008e, f01=0x0190, f02=» - P FCTL W19 . P FMEND . PIND20 FRMT . ( P FCTL W20 . : P FMEND . L PIND21 FRMT . Z P FCTL W21 . l P FMEND . ~ PIND22 FRMT . P FCTL W22 . P FMEND . PIND23 FRMT . P FCTL W23 . P FMEND . PIND24 FRMT . P FCTL
0x1d9894…1d9a28 Dummy {f00=0x008e, f01=0x40a8, f02=» . P FCTL W27 / P FMEND / PIND28 FRMT / ( P FCTL W28 / : P FMEND / L PIND29 FRMT / Z P FCTL W29 / l P FMEND / ~ P END / END / @ / . P FMEND . PIND23 FRMT . P FCTL W23 . P FMEND . PIND24 FRMT . P FCTL
0x1d9a28…1d9bbc Dummy {f00=0x008e, f01=0x2008, f02=» 0 NT DE12ST DDUM DEDDIV PDIV . ENTRY DE12ST < DE12ST R PROC ` RET n PEND z END @ KITEM PSTR6A STRG 6 WORKITEM PSTRG10A STRG 10 WORKITEM PDIV END @ ARIABL
0x1d9bbc…1d9d50 Dummy {f00=0x008e, f01=0x0190, f02=»T M -W ,E A n A r > > >M A n_ A z > ;I C X "A _@ A f A j A n A r v "R # X& T X T :EV W X T Y :DV X Qx :EVp W " P Y WD X $ QB R _ P U _ : V #
0x1d9d50…1d9ee4 Dummy {f00=0x008e, f01=0x0190, f02=» A! W A! @! A.W< A I.9 Z X R C C " 6 X R C C " "R A @! A. Z X V 9 6 X V 9_d @ x t B f U P R U "J ! ! W ! Q ! B Z P C !
0x1d9ee4…1da078 Dummy {f00=0x008e, f01=0x0190, f02=»_ ^ _ ! P: B L # +P Y ( ! U _ X T _ W ! Y ! X X ! X P R ?]* U C _. _: ! ! " $ P X ( X ]T ! Y h Y _p $ X R X X ' P ! X ( _X
0x1da078…1da20c Dummy {f00=0x008e, f01=0x0190, f02=»W0 B W B W B @ T 8 T Y Y Y Y "R Y * ! X *_B B 1 4 X X X X ' 4 B U B $" 4 C 4 p _^ x B U P R U ! ! W ! Y Y 8 X Q^ R ! T8
0x1da20c…1da3a0 Dummy {f00=0x008e, f01=0x0190, f02=» Y > ! 9EV0 X > y ! + X ! ! T Y > 2 B H ! 9FR D B Xp # v B Z H @^ H @Y B Y ! ~ ! Y 8;eT ! 9FR* Y >WP X >Pn Y > ! 9 R ! 9 R Y Y > W, ! X ! ! T @ X X > < 4 Y H
0x1da3a0…1da534 (1, 365) Opaque[0x194]
0x1da534…1da6c8 # DirEnt {nam=»DEDICO«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x11e0, f03=0x0000}
0x1da534…1da6c8 IdxSect {
0x1da534…1da6c8 f00 = 0x008f // 0x1da534 @0x0
0x1da534…1da6c8 f01 = 0x0006 // 0x1da536 @0x2
0x1da534…1da6c8 gno = [ // 0x1da538 @0x4
0x1da534…1da6c8 [0x00]: C0x008f.0x0.0
0x1da534…1da6c8 [0x01]: C0x008f.0x1.0
0x1da534…1da6c8 [0x02]: C0x008f.0x2.0
0x1da534…1da6c8 ]
0x1da534…1da6c8 }
0x1da6c8…1da85c Dummy {f00=0x008f, f01=0x0190, f02=» ( P IDENT DEDICOMM REL 1.0 79-01-16/AST P* 0 B P************************************************************* : P* P* SUBROUTINE DEDISC P* , P* CALLING SEQUENCE: PERF DEDISC,FC P* P* FC ACTION
0x1da85c…1da9f0 Dummy {f00=0x008f, f01=0x0190, f02=»TEN X B P* AS LAST RECORD IN JOBDEFINITION-CHAIN. NO CHECKS , P* ARE DONE ON JOBDEFINITION.G R P* @ P* 02 GET JOBDEFINITION. THE JOBDEFINITION, INDICATED B P* BY ITS NAME IN 'DEINPUT' IS GIVEN TO THE CA
0x1da9f0…1dab84 Dummy {f00=0x008f, f01=0x0190, f02=» DUMMY-ENTRY P* @ P* 04 SEARCH JOBDEFINITION. A SEARCH IS DONE, WHETHER > P* THE INDICATED JOBDEFINITION EXISTS IN SYSTEM. d P* D P* 05 DELETE JOBDEFINITION. THE JOBDEFINITION, INDICATED D P* BY
0x1dab84…1dad18 Dummy {f00=0x008f, f01=0x0190, f02=» JOBCHAIN ON USERFILE, A NEW ENTRY IA ADDED TO ITS B P* BATCHCHAIN. ELSE, A JOBCHAIN WITH THE CURRENT JOB B F P* AND A BATCHCHAIN WITH THE CURRENT BATCH ARE CREATED. B P* THE FIRST DATARECORD AND AN ACCUMULATORRE
0x1dad18…1daeac Dummy {f00=0x008f, f01=0x0190, f02=»RS IN CORE AND b D P* ITS INDEX WILL BE FOUND IN 'PINACC'. THE RECORDNUM- @ P* BER OF ACCUMULATORS IS SAVED IN POS 9-10 OF ITS ^ D P* RPOOL. 'CURSEC' IS LOADED WITH RECORDNUMBER OF THE " P* FIRST DATARECORD.
0x1daeac…1db040 Dummy {f00=0x008f, f01=0x018e, f02=»RD AND ACCUMU- ` D P* LATORS ARE READ INTO MEMORY. A CHECK IS DONE, WHE- F P* THER THE SAME BATCH IS USED BY AN OTHER TASK. OUTPUT ^ P* AS FC 06. P* < P* 08 CLOSE BATCH. THE LAST DATARECORD OF THE CUR
0x1db040…1db1d4 (1, 366) Dummy {f00=0x008f, f01=0x0190, f02=» L P* A POINTER TO THE BUFFERPOOL IN 'PINDFR' IS WRITTEN TO DISC P* T > P* 10 GET FORMAT. THE FORMAT, INDICATED BY ITS NAME ^ : P* IN 'FORMAT' IS GIVEN TO THE CALLING TASK. J P* IF DATAITEM FRMTPNTR NOT ZERO
0x1db1d4…1db368 Dummy {f00=0x008f, f01=0x0190, f02=»FORMATCHAIN. AFTER EXECUTION, FRMTPNTR IS LOA- z J P* DED WITH A POINTER TO THE FIRST RECORD OF THE FORMAT. IF 8 J P* IF NO FORMAT-ADRESS IN FILE IS KNOWN, FRMTPNTR SHOULD BE 6 P* SET TO ZERO BEFORE DEDISC IS CALLED.
0x1db368…1db4fc Dummy {f00=0x008f, f01=0x018e, f02=»ED FORMAT EXISTS IN SYSTEM. RETURNED & P* INFORMATION AS FC 10. , P* V < P* 13 DELETE FORMAT. THE FORMAT, INDICATED BY ITS ` @ P* NAME IN 'DEINPUT' IS REMOVED FROM FORMATCHAIN. P* * P* 14 WRITE CURRENT
0x1db4fc…1db690 Dummy {f00=0x008f, f01=0x0190, f02=» , P* 17 DELETE CURRENT DATA-SECTOR P* 4 * P* 18 WRITE ACCUMULATOR-RECORD > P* l < P* 19 GET SYSTEM-VARIABLES. SYSTEM-VARIABLES ARE v " P* READ INTO MEMORY. P* > P* 20 ENTER SYSTEM-VARIABLE
0x1db690…1db824 Dummy {f00=0x008f, f01=0x0190, f02=»ITION IN CHAIN X 2 P* IS OUTPUT TO DATA-ITEM 'JOBNAME'. P* L & P* 22 GET PREVIOUS JOBNAME. V P* $ P* 23 WRITE SECTOR (CORR) P* P P* 24 GET TABLE. INPUT:TABLE-NAME IN 'TABLE',ELEMENTNUMBER IN 'ELMNO
0x1db824…1db9b8 Dummy {f00=0x008f, f01=0x0190, f02=»WANTED ELEMENT OF THE WANTED TABLE d H P* WILL BE PASSED TO RPOOL AND BPOOL WITH INDEX 'PINDTB'. * P* v P* N P* 25 DELEWTE TABLE. THE TABLE, INDICATED BY ITS NAME IN 'TABLE' IS " P* DELETED ON DISC. P*
0x1db9b8…1dbb4c Dummy {f00=0x008f, f01=0x0190, f02=»CONTENTS OF BPOOL(PINDTB) 8 P* AND RPOOL(PINDTB) ARE WRITTEN TO DISC. " P* ^ F P* 27 DELETE BATCH. DATA-ITEM BATCH INDICATES THE BATCH TO h D P* BE DELETED. ALL RECORDS BELONGING TO THIS BATCH ARE . P* R
0x1dbb4c…1dbce0 Dummy {f00=0x008f, f01=0x0190, f02=»INARY DATA-ITEM DEBINW1 IS LOADED WITH NUMBER OF ~ D P* FREE RECORDS IN SYSTEM-FILE AND DEBINW2 WITH NUMBER 8 > P* OF FREE RECORDS IN USERFILE OF RUNNING TASK. P* @ P* 29 GET NEXT JOBDEFINITION. THE NEXT JOBDEFINITION
0x1dbce0…1dbe74 (1, 367) Dummy {f00=0x008f, f01=0x0190, f02=»AIN V P* IS PASSED. P* , > P* 30 GET PREVIOUS JOBDEFINITION. THE PREVIOUS JOB- 6 > P* DEFINITION IN CHAIN IS PASSED TO THE CALLING x @ P* TASK. IF 'JOBNAME' IS EMPTY, THE FIRST JOBDEFI- , P*
0x1dbe74…1dc008 Dummy {f00=0x008f, f01=0x0190, f02=»ED TO THE CALLING TASK. IF 'FORMAT' IS | < P* EMPTY, THE FIRST FORMAT IN CHAIN IS PASSED. . P* n B P* 32 GET PREVIOUS FORMAT. THE PREVIOUS FORMAT IN CHAIN x B P* IS PASSED TO CALLING TASK. IF 'FORMAT' IS EMPTY, 6 P*
0x1dc008…1dc19c Dummy {f00=0x008f, f01=0x0190, f02=»BATCHNAME. THE NAME OF NEXT BATCH ON USERFILE IS z . P* OUTPUT TO DATA-ITEM 'BATCH'. 8 P* j ( P* 35 GET PREVIOUS BATCHNAME. t P* * P* RETURNCODE IN DEBINW4: 0 = OK L P* -1 = WARNING. 95
0x1dc19c…1dc330 Dummy {f00=0x008f, f01=0x0190, f02=»ACE b , P* 11 = USED . P* 12 = LOCKED < < P* 13 = NO WORKSPACE IN CORE n P* F P* CONDITION-REGISTER IS SET TO 2 (=ERROR), IF DEBINW4 NOT ZERO L P*
0x1dc330…1dc4c4 Dummy {f00=0x008f, f01=0x4178, f02=». R P* D P* USED WORKAREAS ARE DEBIN1, DEBIN2, DEBIN3, DEBIN4, DEBIN5, J P* SWIT01, SWIT02, SWIT03, STRG10A, STR6A, STR6B B P* DKBIN1, DKBIN2, DKBIN3, SYSBUF, RBUF P* P* : P****
0x1dc4c4…1dc658 Dummy {f00=0x008f, f01=0x2008, f02=» W'199' = P PERF WRITUS,DEBIN1,SYSBUF > P MOVE USELEN,=W'399' > 8 P PERF COND > T P RET > f P PEND > r P* > * P* SUBR POOL, GET ONE BUFFER, LOCKED > P* > PPOOL PROC > P MOVE DEBIN1,W1 > P MOVE DEBIN2,W1 > * P PER
0x1dc658…1dc7ec Dummy {f00=0x008f, f01=0x40a6, f02=» > F IDENT D:DB30 TRA 3.2 79-02-20 O111 REL 1.0 79-02-09 D:DB30 F D:DB30D X f l :D @ & = & [ & y y @ &
0x1dc7ec…1dc980 Dummy {f00=0x008f, f01=0x414c, f02=» > F IDENT Z:DB30 TRA 3.2 79-02-20 O111 REL 1.0 79-02-09 Z:DB30 F Z:DB30D X * & l * & * & = & [
0x1dc980…1dcb14 (1, 368) Opaque[0x194]
0x1dcb14…1dcca8 # DirEnt {nam=»DKRUT4«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x11f8, f03=0x0000}
0x1dcb14…1dcca8 IdxSect {
0x1dcb14…1dcca8 f00 = 0x008f // 0x1dcb14 @0x0
0x1dcb14…1dcca8 f01 = 0x0008 // 0x1dcb16 @0x2
0x1dcb14…1dcca8 gno = [ // 0x1dcb18 @0x4
0x1dcb14…1dcca8 [0x00]: C0x008f.0x3.0
0x1dcb14…1dcca8 [0x01]: C0x0090.0x0.0
0x1dcb14…1dcca8 [0x02]: C0x0090.0x1.0
0x1dcb14…1dcca8 [0x03]: C0x0090.0x2.0
0x1dcb14…1dcca8 ]
0x1dcb14…1dcca8 }
0x1dcca8…1dce3c Dummy {f00=0x008f, f01=0x0190, f02=» $ P IDENT DKRUT4 REL 10.0 80-04-11 P 80-02-25/CHST , P DDUM DEDDIV D PDIV X P ENTRY ENTJOB f P ENTRY GETJOB | P ENTRY SCHJOB P ENTRY DELJOB P ENTRY NEXJOB P ENTRY PREJOB P ENTRY OPNEBC P ENTRY O
0x1dce3c…1dcfd0 Dummy {f00=0x008f, f01=0x018e, f02=» RFRSP P EXT WRFSP P EXT DEPOOL P EXT RETURN 4 P ENTRY DELBTC H P ENTRY NXJOB ^ P ENTRY NXBTH r P EXT RDACC P EXT SCHPOO P EXT RELEAS P EXT COND P EXT EMPTYT P EXT RDDS P EXT WRDS
0x1dcfd0…1dd164 Dummy {f00=0x008f, f01=0x0190, f02=» P BERR RETURN PWUSOK P SET SWIT04 & P MOVE STR6A,JOBNAME : , P PERF SFMTCH,W3,RBUF,W10 SEARCH JOBCHAIN V P BNERR OPNN01 FOUND P CBE DEBINW4,W9,OPNN99 P B RETURN POPNN99 * P TBF SWIT05,OPNN02 NEW ENTRY JOBCHAIN
0x1dd164…1dd2f8 Dummy {f00=0x008f, f01=0x0190, f02=» OPNN03 BATCH FOUND P CBE DEBINW4,W9,OPNN88 P B RETURN : POPNN88 L , P TBF SWIT05,OPNN04 NEW ENTRY BATCHCHAIN Z P B RETURN 'NOT IN SYSTEM' POPNN03 * P TBT SWIT05,OPNN06 OPEN EXISTING BATCH & P MOVE DEBINW4,W8 ALREADY DEFINED
0x1dd2f8…1dd48c Dummy {f00=0x008f, f01=0x0190, f02=»OPNN08 FIRST JOBCHAIN-ENTRY 2 P XCOPY DEBIN2,W0,W2,RBUF,W6 GET OCCUPIED SPACE $ ( P CBG DEBIN2,MAXOCC,OPNN07 NEW RECORD Z POPNN09 P PERF ENTR,JOBNAME $ P XCOPY RBUF,DEBIN2,W2,DEBIN4,W0 P ADD DEBIN2,W2 P XCOPY RBUF,W6,W2,DEBIN2,W0
0x1dd48c…1dd620 Dummy {f00=0x008f, f01=0x0190, f02=» MOVE RBUF,=X'424300' P XCOPY RBUF,W2,W2,DEBIN1,W0 P XCOPY RBUF,W4,W2,W0,W0 B POPNN12 b P PERF ENTR,BATCH p P PERF FREESP,DEBIN1,FILINDUS P BERR RETURN $ P XCOPY RBUF,DEBIN2,W2,DEBIN1,W0 P ADD DEBIN2,W2 P PERF FREE
0x1dd620…1dd7b4 (1, 369) Dummy {f00=0x0090, f01=0x0190, f02=» t P PERF WRDS,DEBIN4 P BERR RETURN " P MOVE RBUF,HEX00 6 P XCOPY RBUF,W6,W2,W10,W0 N P B OPNN16 n " POPNN08 FIRST SECTOR JOBCHAIN P MOVE RBUF,=X'4A4300' P MOVE DEBIN1,W3 P XCOPY RBUF,W2,W2,W0,W0 POPNN10
0x1dd7b4…1dd948 Dummy {f00=0x0090, f01=0x0190, f02=»,W0 x P PERF WRDS,DEBIN1 P BERR RETURN & P MOVE RBUF,=X'4A4300' : P XCOPY RBUF,W2,W2,DEBIN1,W0 X P MOVE DEBIN1,DEBIN4 | P PERF FREESP,DEBIN4,FILINDUS P B OPNN10 " POPNN04 NEW ENTRY BATCH-CHAIN . P XCOPY DEBIN2,W0,W2,
0x1dd948…1ddadc Dummy {f00=0x0090, f01=0x018e, f02=»ERF FREESP,DEBIN4,FILINDUS P BERR RETURN " P XCOPY RBUF,W4,W2,DEBIN4,W0 6 P PERF WRDS,DEBIN1 Z P BERR RETURN t P MOVE DEBIN2,W10 P B OPNN13 POPNN06 OPEN EXISTING BATCH $ P XCOPY DEBIN5,W0,W2,RBUF,DEBIN2 P XCOPY DEB
0x1ddadc…1ddc70 Dummy {f00=0x0090, f01=0x0190, f02=» z P B OPNN16 POPNNDL P SUB DEBIN2,W10 ( P SUB DEBIN4,W12 @ P XCOPY RBUF,W6,W2,DEBIN4,W0 X P DLETE RBUF,DEBIN2,W12 | P PERF WRDS,DEBIN1 P BERR DL10 P CBG DEBIN4,W10,DL01 P PERF DLRCCH,RBUF PDL01 P
0x1ddc70…1dde04 Dummy {f00=0x0090, f01=0x0190, f02=»RSEC,RBUF P BNERR DL03 P CBE DEBINW4,=W'30',DL04 & P B DL10 F PDL04 V P MOVE RBUF,HEX00 b P MOVE DEBINW4,W0 z PDL03 P XCOPY DEBIN5,W0,W2,RBUF,W4 P PERF RFRSP,CURSEC,FILINDUS P MOVE CURSEC,DEBIN5 P CBNE
0x1dde04…1ddf98 Dummy {f00=0x0090, f01=0x0190, f02=»4,WORK(W9) RESTORE ERRORCODE P B RETURN $ POPNN16 6 $ P XCOPY STATSH,W0,W1,FILINDUS,W0 D " P COPY STATSH,W1,W6,JOBNAME,W0 l P COPY STATSH,W7,W6,BATCH,W0 ( P PERF DEPOOL,W9,DKBIN2,DKBIN3,STATSH & P BNERR EXIST IF IKAY, ALREADY OPEN
0x1ddf98…1de12c Dummy {f00=0x0090, f01=0x0190, f02=»KBIN1,DKBIN2,STATSH ~ P MOVE PINACC,DKBIN1 P MOVE BPOOL(DKBIN1),HEX00 8 ( P XCOPY RPOOL(PINACC),W9,W2,DEBIN1,W0 Z P TBT SWIT05,EXIBAT P B RETURN PEXIBAT P PERF RDACC P PERF RDDS,CURSEC P CBNE DEBINW4,=W'30',ZWIHO
0x1de12c…1de2c0 Dummy {f00=0x0090, f01=0x0190, f02=»* P* P* P* PENTJOB ENTER JOBDEF ( P PERF WAIT F P BERR RETURN X P PERF READJB l P BNERR FOUNDJ P CBE DEBINW4,=W'30',FIRST P CBE DEBINW4,W9,NOTIN P B RETURN PFIRST * P MOVE DEBIN1,DEBIN
0x1de2c0…1de454 (1, 370) Dummy {f00=0x0090, f01=0x0190, f02=» BERR RETURN PFST1 ( P MOVE SYSBUF,=X'4A440000000000C600' " P XCOPY SYSBUF,W2,W2,DEBIN3,W0 L , P COPY SYSBUF,W10,W188,BPOOL(PJOBCUR),W0 r P PERF DISU,W2,DEBIN1,SYSBUF P BERR RETURN ( P CBE DEBIN3,W0,ENTRET LAST IN CHAIN $ P P
0x1de454…1de5e8 Dummy {f00=0x0090, f01=0x0190, f02=»ET P B RETURN PFOUNDJ , P COPY SYSBUF,W10,W188,BPOOL(PJOBCUR),W0 * P PERF DISU,W2,DEBIN3,SYSBUF Z P B RETURN ~ P* P* P* PGETJOB GET JOBDEF P MOVE STR6A,DEINPUT PGTJ020 * P PERF SCHPOO,=C'J ',
0x1de5e8…1de77c Dummy {f00=0x0090, f01=0x0190, f02=»,W3 PRDCHJ P PERF WAIT P BERR RETURN , PRDCNW @ P PERF DISU,W1,DEBIN1,SYSBUF N P BNERR DATA r P CBE DEBINW4,=W'30',NOTEX P B RETURN PNOTEX $ P MOVE DEBINW4,W9 'NOT EXISTENT' P B RETURN PDATA
0x1de77c…1de910 Dummy {f00=0x0090, f01=0x0190, f02=»DCHJF ~ P TBF SWIT03,GTJ010 P MOVE STR6A,STR6B ( P PERF RELEAS B P B GTJ020 V PGTJ010 h " P XCOPY DEBIN1,W0,W2,SYSBUF,W4 v P CBE DEBIN1,W0,NOTEX P B RDCNW PRDCHJF P TEST SWIT02 " P BNZ RETURN RETURN, IF SEARCH
0x1de910…1deaa4 Dummy {f00=0x0090, f01=0x0190, f02=»N4,W1 * P PERF DEPOOL,W1,DEBIN3,DEBIN4,STRG10A P BNERR GTJOK < & P MOVE DEBINW4,W13 'NO BUFFER FREE' P P B RETURN z PGTJOK * P COPY BPOOL(DEBIN3),W0,W188,SYSBUF,W10 ( P COPY RPOOL(DEBIN3),W9,W10,SYSBUF,W0 P MOVE DKBIN1,W4
0x1deaa4…1dec38 Dummy {f00=0x0090, f01=0x0190, f02=»0 * P PERF DEPOOL,W6,PJOBCUR,DEBIN3,STRG10A . P PERF DEPOOL,DKBIN1,DEBIN3,DEBIN2,STRG10A 8 P MOVE PJOBCUR,DEBIN3 j P B RETURN PLOCKED P MOVE JOBNAME,STR6A P MOVE DEBINW4,=W'26' P B RETURN PGOTFRE P TEST, I
0x1dec38…1dedcc Dummy {f00=0x0090, f01=0x018e, f02=» SWIT02 P B GETJOB P* " P* , PDELJOB DELETE JOBDEF 6 P PERF WAIT T P PERF READJB f P BERR RETURN z P CLEAR SWIT04 P PERF DLRCCH,SYSBUF P TBF BOOL9,RETUR P TBF BOOL8,RETUR P MOVE SYSBUF,HEX00
0x1dedcc…1def60 Dummy {f00=0x0090, f01=0x018e, f02=» ~ P B PRE01 P* P* " PPREJOB GET PREV JOBDEF , P MOVE DEBIN2,W2 L PPRE01 d & P MOVE STR6A,JOBNAME DALI 79-04-24 r P MOVE DEBIN1,W3 P CALL EMPTYT,JOBNAME P BNZ BUFREL P PERF READJB P BERR RETURN
0x1def60…1df0f4 (1, 371) Dummy {f00=0x0090, f01=0x0190, f02=» P B RDCHJ P* P* P* ( P* 2 P* < PNXJOB GET NEXT JOBNAME F P SET SWIT01 f PNXBTH GET NEXT BATCHNAME z P SET SWIT04 P CALL EMPTYT,JOBNAME P BNZ FIRJOB P MOVE STR6A,JOBNAME P PERF SFMTCH
0x1df0f4…1df288 Dummy {f00=0x0090, f01=0x0190, f02=»RECORD ~ P XCOPY DKBIN3,W0,W2,RBUF,W4 P CBE DKBIN3,W0,NOT 2 P PERF RDDS,DKBIN3 L P BERR RETURN f PFIJONA z P XCOPY DEBIN1,W0,W2,RBUF,W6 P CBNG DEBIN1,W10,NOT P MOVE DEBIN2,W12 PGTNAM P TBF SWIT01,GTNAM1 $ P
0x1df288…1df41c Dummy {f00=0x0090, f01=0x0190, f02=» P PERF SFMTCH,DEBIN3,RBUF,W12 P BERR NOT ( P ADD DEBIN2,W6 : P CBG DEBIN2,DKBIN1,RENER P PGTNAM1 p " P COPY BATCH,W0,W6,RBUF,DEBIN2 ~ P B RETURN PFIRJOB P PERF RDDS,W3 P BOK FIJONA P CBE DEBINW4,=W'30',NOT
0x1df41c…1df5b0 Dummy {f00=0x0090, f01=0x0190, f02=»,NOT P MOVE DEBIN2,W12 P B GTNAM1 $ PNOT 6 . P MOVE DEBINW4,W9 INDICATE 'NOT IN SYSTEM' B P B RETURN t P* P* P PEND P EJECT P* P* PREADJB PROC P MOVE DEBIN4,W3 PREDJCH P MOV
0x1df5b0…1df744 Dummy {f00=0x0090, f01=0x0190, f02=» DEBIN4,W10,REDJ10 JUMP IF EMPTY 4 P MOVE DEBINW4,=W'30' IDICATE FIRST RECORD EMPTY ( P B RETRED ` PREDJ10 r P MOVE DEBIN5,=W'92' $ P COPY STR6A,W0,W6,SYSBUF,DEBIN5 P CBE STR6A,JOBNAME,RETRED PREDJ20 " P XCOPY DEBIN4,W0,W2,
0x1df744…1df8d8 Dummy {f00=0x0090, f01=0x40d4, f02=» P P* PENTR PROC ITEM P XCOPY RBUF,DEBIN2,W2,W0,W0 , P ADD DEBIN2,W2 P P COPY RBUF,DEBIN2,W6,ITEM,W0 f P ADD DEBIN2,W6 P RET P PEND P* END @ ME,RETRED PREDJ20 " P XCOPY DEBIN4,W0,W2,
0x1df8d8…1dfa6c Dummy {f00=0x0090, f01=0x2008, f02=»
0x1dfa6c…1dfc00 Dummy {f00=0x0090, f01=0x0190, f02=» V W< _ 2 # ;B CP V T 8W V P L , V 2P " 2 P V D ! R T V P V 1 W V P _ 8^t DA2 2 ! 9BP V T W V P D $ V 6 V % V E @ L' T 2 % 7_ 2 # PH L PB 80 2" &
0x1dfc00…1dfd94 (1, 372) Opaque[0x194]
0x1dfd94…1dff28 # DirEnt {nam=»DE16ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1218, f03=0x0000}
0x1dfd94…1dff28 IdxSect {
0x1dfd94…1dff28 f00 = 0x0090 // 0x1dfd94 @0x0
0x1dfd94…1dff28 f01 = 0x0004 // 0x1dfd96 @0x2
0x1dfd94…1dff28 gno = [ // 0x1dfd98 @0x4
0x1dfd94…1dff28 [0x00]: C0x0090.0x3.0
0x1dfd94…1dff28 [0x01]: C0x0091.0x0.0
0x1dfd94…1dff28 ]
0x1dfd94…1dff28 }
0x1dff28…1e00bc Dummy {f00=0x0090, f01=0x0190, f02=» P IDENT DE16ST P************************* P* 16 ERROR-MESSAGES < P************************* X DDUM DEDDIV z PDIV P ENTRY DE16ST P EXT DECLRN P EXT DERR P EXT DEDISC EJECT PDE16ST PROC
0x1e00bc…1e0250 Dummy {f00=0x0090, f01=0x0190, f02=»ERF DERR P B A1 PSETPR SET DEPROMPT P PERF DECLRN 8 " PA1 IB DEBINW2,CANC,RETUR,ENTER L P MOVE DEBINW4,W0 ERROR r P B CANC10 PENTER P MOVE BIN1,=W'22' P PERF DEDISC,BIN1 P BNOK CANC10 PRETUR RET
0x1e0250…1e03e4 Dummy {f00=0x0090, f01=0x0190, f02=» FNL FCOPY STR1A FCOPY =C'01' $ FKI 7,MINL=0,MAXL=20,ALPHA : P FCOPY ERR(W1) ^ P FNL t P FCOPY STR1A FCOPY =C'02' FKI 7,MINL=0,MAXL=20,ALPHA P FCOPY ERR(W2) FNL FCOPY STR1A FCO
0x1e03e4…1e0578 Dummy {f00=0x0090, f01=0x018e, f02=» FKI 7,MINL=0,MAXL=20,ALPHA P FCOPY ERR(W4) $ FNL : FCOPY STR1A F FCOPY =C'05' Z FKI 7,MINL=0,MAXL=20,ALPHA p P FCOPY ERR(W5) FNL P FCOPY STR1A FCOPY =C'06' FKI 7,MINL=0,MAXL=20,ALPHA P FCO
0x1e0578…1e070c Dummy {f00=0x0090, f01=0x0190, f02=» FCOPY STR1A FCOPY =C'08' FKI 7,MINL=0,MAXL=20,ALPHA 2 P FCOPY ERR(W8) V FNL l FCOPY STR1A x FCOPY =C'09' & P FKI 7,MINL=0,MAXL=20,ALPHA,VERIF P FCOPY ERR(W9) FNL FCOPY STR1A FCOPY
0x1e070c…1e08a0 Dummy {f00=0x0090, f01=0x0190, f02=»,MINL=0,MAXL=20,ALPHA P FCOPY ERR(W11) FNL 6 FCOPY STR1A B FCOPY =C'12' V FKI 7,MINL=0,MAXL=20,ALPHA l P FCOPY ERR(W12) FNL FCOPY STR1A FCOPY =C'13' FKI 7,MINL=0,MAXL=20,ALPHA P FCOPY
0x1e08a0…1e0a34 (1, 373) Dummy {f00=0x0091, f01=0x413a, f02=» FCOPY STR1A FCOPY =C'15' FKI 7,MINL=0,MAXL=20,ALPHA 2 P FCOPY ERR(W15) V FNL n FCOPY STR1A z FCOPY =C'16' FKI 7,MINL=0,MAXL=20,ALPHA P FCOPY ERR(W16) P FNL P FKI 1,MINL=0,MAXL=0 P
0x1e0a34…1e0bc8 Dummy {f00=0x0091, f01=0x2008, f02=» END @ FCOPY =C'15' FKI 7,MINL=0,MAXL=20,ALPHA . FCOPY WTAB(15) R FNL j FCOPY STR1A v FCOPY =C'16' FKI 7,MINL=0,MAXL=20,ALPHA FCOPY WTAB(16) FMEND F131 FRMTR1A FSLPY =C'
0x1e0bc8…1e0d5c Dummy {f00=0x0091, f01=0x0190, f02=»ED * ~ P* DEAP14 - NOT USED * P*********************** . PDEAP13 N P B DEAER6 PDEAP14 n P B DEAER6 | PDEAP15 P B DEAER6 PDEAER6 P MOVE DEBINW4,W6 P B DEANOK P PEND EJECT *
0x1e0d5c…1e0ef0 Dummy {f00=0x0091, f01=0x0190, f02=» FCOPY =C'PROGRAM:' ( P FKI 9,MINL=2,MAXL=2,ME,NEOI,APPL=1 P FMEL 'XX',PRNUM H P FBF BOOL1,F10OUT ` P FTAB 20 z P FCOPY =C'11 DATE AND TIME' FNL P FCOPY =C'12 VALUE-SETS' P FTAB 20 " P FCOPY =C'13 SYSTEM-VARIABELS'
0x1e0ef0…1e1084 Dummy {f00=0x0091, f01=0x400c, f02=» @ OGRAM:' ( P FKI 9,MINL=2,MAXL=2,ME,NEOI,APPL=1 P FMEL 'XX',PRNUM H P FBF BOOL1,F10OUT ` P FTAB 20 z P FCOPY =C'11 DATE AND TIME' FNL P FCOPY =C'12 VALUE-SETS' P FTAB 20 " P FCOPY =C'13 SYSTEM-VARIABELS'
0x1e1084…1e1218 Dummy {f00=0x0091, f01=0x2008, f02=» FTEXT '50 SEARCH/CORRECTION' FNL . FTEXT '60 VERIFICATION' : FNL Z FTEXT '70 CONVERTION' f FNL FTEXT '80 FILE HANDLING' F00OUT FMEND END @ '10 SUPERVISORY FUNCTIONS' FNL
0x1e1218…1e13ac Dummy {f00=0x0091, f01=0x018e, f02=» P B PJOBST PUNUSED P TBT SWIT01,GETUNL $ P TBF SWIT02,GETUNL > P MOVE RPOOL(DEBIN3),HEX00 X P B SOND z P* P* PSCHJOB SEARCH JOBDEF P SET SWIT02 P B GETJOB P* P* PDELJOB DELETE JO
0x1e13ac…1e1540 Dummy {f00=0x0091, f01=0x0190, f02=» P* P* PNEXJOB GET NEXT JOBDEF P MOVE DEBIN2,W13 8 P B PRE01 P P* ` P* j PPREJOB GET PREV JOBDEF t P MOVE DEBIN2,W11 PPRE01 P MOVE DEBIN1,W3 P CALL EMPTYT,JOBNAME P BNZ BUFREL . P XCOPY
0x1e1540…1e16d4 (1, 374) Opaque[0x194]
0x1e16d4…1e1868 # DirEnt {nam=»DELOCK«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1228, f03=0x0000}
0x1e16d4…1e1868 IdxSect {
0x1e16d4…1e1868 f00 = 0x0091 // 0x1e16d4 @0x0
0x1e16d4…1e1868 f01 = 0x0004 // 0x1e16d6 @0x2
0x1e16d4…1e1868 gno = [ // 0x1e16d8 @0x4
0x1e16d4…1e1868 [0x00]: C0x0091.0x1.0
0x1e16d4…1e1868 [0x01]: C0x0091.0x2.0
0x1e16d4…1e1868 ]
0x1e16d4…1e1868 }
0x1e1868…1e19fc Dummy {f00=0x0091, f01=0x0190, f02=» $ P IDENT DELOCK REL 10.0 80-04-11 P 79-02-28/ANLI , * D L M************************************************************************ N * : 6* SUBMODULE TO THE DATA-ENTRY PACKAGE FOR PTS6800 * : 6* ROUTINE FOR SETTI
0x1e19fc…1e1b90 Dummy {f00=0x0091, f01=0x0190, f02=» MASK. l * 4 0* THE MODULE IS ENTERED WITH THE STATEMENT: * P , '* * PERF DELOCK,OPTION,KEYIND * Z * * WHERE: 6 2* - KEYIND = ITEM HOLDING THE END-KEY-INDEX 8 4* - OPTION = BIN-ITEM TELLING
0x1e1b90…1e1d24 Dummy {f00=0x0091, f01=0x018e, f02=»T ONLY | * 0 ,* IF THE AUTHORITY-TEST IS UNSUCCESSFUL . )* CONDITION IS SET TO ERROR (=2) AND L , P* ERROR-CODE (DEBINW4) IS SET TO 4. ~ * 6 P* IF THE SET-OPTION IS PERFORMED, RETURN-CODE P* IS GIVEN IN DEB
0x1e1d24…1e1eb8 Dummy {f00=0x0091, f01=0x018e, f02=» P* L M************************************************************************ * ^ DDUM DEDDIV h PDIV | * * ***** ENTRY ***** * ENTRY DELOCK * * ***** EXTERNALS *****
0x1e1eb8…1e204c Dummy {f00=0x0091, f01=0x0190, f02=» L M************************************************************************ * T & "* ENTRY-POINT / PROGRAM-START ^ * L M************************************************************************ * DELOCK PROC OPTION,KEYIND
0x1e204c…1e21e0 Dummy {f00=0x0091, f01=0x0190, f02=»E DEBIN3,W1 SET RETURN-CODE $ P CBE KEYIND,W0,A000 POWER-OFF ? $ $ P MOVE DEBIN3,W0 SET RETURN-CODE L A000 t 2 - CALL UPDBIN,DEBIN1 MOVE POSITION-IND. TO BIN CBG OPTION,W1,A200 NO SET ? * P CBL KEYIND,W0,A100 KEY-LOCK TURNED ? " P
0x1e21e0…1e2374 (1, 375) Dummy {f00=0x0091, f01=0x0190, f02=»00 0 + MOVE DEBIN2,KEYIND MOVE KEYIND TO WORKITEM ( # ADD DEBIN2,W16 CALCULATE BIT-INDEX > ( $ CBL DEBIN2,W12,A120 KEY TURNED ON ? j A110 0 + CALL CLEARB,DEBIN1,DEBIN2 INDICATE KEY OFF B A190 A120 $ ADD DEBIN2,W4 ADJUST
0x1e2374…1e2508 Dummy {f00=0x0091, f01=0x0190, f02=»L UPDBOL,DEBIN1 UPDATE POSITION-IND. P EJECT , * : * D ***** TEST AUTHORITY ***** N * r A200 | $ P MOVE DEBIN3,W3 SET RETURN-CODE " CBL OPTION,W1,A900 NO TEST ? * PA210 CALL MSKOUT,DEBIN1,KEYMSK
0x1e2508…1e269c Dummy {f00=0x0091, f01=0x0190, f02=» MOVE DEBIN3,W2 SET RETURN-CODE & P MOVE DEBIN4,W4 SET ERROR-CODE = 4 ( P EJECT R * ` * j * &***** RETURN TO CALLING MODULE ***** t * A900 * P CBG OPTION,W1,A910 NO SET PERFORMED ? 0 P MOVE DEBINW3,DEBIN3 RESTORE RETUR
0x1e269c…1e2830 Dummy {f00=0x0091, f01=0x409c, f02=» t P B A990 PA920 P CMP W0,W1 SET CONDITION = 2 $ P* H PA990 R RET ^ * j PEND t * END @ t * A900 * P CBG OPTION,W1,A910 NO SET PERFORMED ? 0 P MOVE DEBINW3,DEBIN3 RESTORE RETUR
0x1e2830…1e29c4 Dummy {f00=0x0091, f01=0x2008, f02=» CALL MSKOUT,DEBIN1,KEYMSK , ' CBE DEBIN1,KEYMSK,A900 WANTED KEY ON ? 0 * ` * j $ ***** TEST UNSUCCESSFUL ***** t * A800 ( # MOVE DEBINW4,W2 SET ERROR-CODE = 2 " CMP W0,W1 SET CONDITION = 2 *
0x1e29c4…1e2b58 Dummy {f00=0x0091, f01=0x0190, f02=» J F " D @ 2 RRRRRRRRRRR A ! [ ! L& !0R !T J _ R:R J F " D @I !_) _7j ! ! h 9 !X8H !( @ h 9[ !j ! ! !P R J F " D !0R ! N_m R ?R j !! '( !1j !& !j !!
0x1e2b58…1e2cec Dummy {f00=0x0091, f01=0x0190, f02=» & 1 J F " D j !! (I !Y A ! ! ?R ! 0R !h & !&P E l J | J F " D @ !0R !<R_ ( ) +h & '&Z h ! !R !W h ! !Z< " ! J F " D ) L U
0x1e2cec…1e2e80 Dummy {f00=0x0091, f01=0x0190, f02=» J % F ) T * 2 XT < J F " D [WWj !! ' !QD j !! 0R (T I 1! L ) L W Lb ! W h N J F " D @ 0[ !A j ! !d ! j '! !j !! (( + b +$ y W7 j !! J F " D '( ! j
0x1e2e80…1e3014 (1, 376) Opaque[0x194]
0x1e3014…1e31a8 # DirEnt {nam=»DATCHK«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1238, f03=0x0000}
0x1e3014…1e31a8 IdxSect {
0x1e3014…1e31a8 f00 = 0x0091 // 0x1e3014 @0x0
0x1e3014…1e31a8 f01 = 0x0004 // 0x1e3016 @0x2
0x1e3014…1e31a8 gno = [ // 0x1e3018 @0x4
0x1e3014…1e31a8 [0x00]: C0x0091.0x3.0
0x1e3014…1e31a8 [0x01]: C0x0092.0x0.0
0x1e3014…1e31a8 ]
0x1e3014…1e31a8 }
0x1e31a8…1e333c Dummy {f00=0x0091, f01=0x0190, f02=» $ P IDENT DATCHK REL 10.0 80-04-11 P 80-03-27/PEEN , P UPD 79-03-16/PEEN D * ` * j 2 -* THIS ROUTINE CHECKS THE DATE PLAUSIBILITY t 2 .* EUROPEAN (AA-MM-DD) OR AMERICAN (MM-DD-AA) P* OR GERMAN (DD-MM-AA) < 8* ST
0x1e333c…1e34d0 Dummy {f00=0x0091, f01=0x0190, f02=»KIPPED p * ( P* SYNTAX: CALL MMDDCK,SKIP,BUFF * P* CALL DDMMCK,SKIP,BUFF D * r @ <* SKIP = BIN ITEM TELLING HOW MANY DIGITS COUNTED | @ ;* FROM THE RIGHT TO BE SKIPPED BEFORE THE * &*
0x1e34d0…1e3664 Dummy {f00=0x0091, f01=0x018e, f02=»UTPUT: CR = O OK , '* CR = 1 NOT OK * N EJECT X ENTRY DATCHK f P ENTRY DDMMCK | P ENTRY MMDDCK * EXTRN I:EVA0 EXTRN I:RT1 * * CALL FORM 16=/F6A1,16
0x1e3664…1e37f8 Dummy {f00=0x0091, f01=0x0190, f02=» P CALL I:EVA0 & P LDR* A10,A9 GET NO. TO BE SKIPPED $ P CALL I:EVA0 GET BUFFER ADDRESS F P LDR A11,A5 SAVE END POINTER n $ P LDR A7,A10 GET NO.TO BE SKIPPED ( P ADR A7,A6 ADJUST FOR PLACE OF 'DD' " P CALL GETTWO GET DAY IN BINARY
0x1e37f8…1e398c Dummy {f00=0x0091, f01=0x0190, f02=»UR A7,A6 ADJUST FOR PLACE OF 'MM' $ P LDR A5,A11 RESTORE END ADDRESS * " P CALL GETTWO GET MONTH BINARY R P LDR A7,A7 x P RF(Z) NOK IF MONTH = 0 P LDK A6,0 INDICATE OK SUK A7,13 RF(NN) NOK IF WRONG MONTH * % LC A1,TAB,A
0x1e398c…1e3b20 Dummy {f00=0x0091, f01=0x018e, f02=»U * LD A1,2,A13 GET STACK BASE SC A6,-2,A1 STORE CR 0 ABL I:RT1 N P* ` P* j PDDMMCK EQU * t P LDK A6,2 INDICATE DDMMCK P RB CHECK P EJECT PGETTWO EQU * CALL GETDIG SUK A7,1 $ P RB(
0x1e3b20…1e3cb4 (1, 377) Dummy {f00=0x0092, f01=0x0190, f02=» ADR A7,A1 SLL A1,3 TIMES 8 ADR A7,A1 4 P RTN A14 F EJECT V GETDIG EQU * d CWR A5,A9 x " P RF(NE) GETD10 IF NOT FINISHED P ADKL A14,8 ADJUST STACK P RB NOK PGETD10 EQU * SUK A5,1 $ P L
0x1e3cb4…1e3e48 Dummy {f00=0x0092, f01=0x40fe, f02=» RTN A14 * * TAB EQU *+12 ( BYTE 31,29 JAN,FEB < BYTE 31,30 MAR,APR X BYTE 31,30 MAY,JUN t BYTE 31,31 JUL,AUG BYTE 30,31 SEP,OCT BYTE 30,31 NOV,DEC * END @ $ P L
0x1e3e48…1e3fdc Dummy {f00=0x0092, f01=0x2008, f02=»
0x1e3fdc…1e4170 Dummy {f00=0x0092, f01=0x0190, f02=» & 5 & S & q 0 & @ & P & ` & p & & % & C & a & & & & &
0x1e4170…1e4304 Dummy {f00=0x0092, f01=0x0190, f02=» & # & A & _ 0 & } @ & P & ` & p & & & 1 & O & m & & & &
0x1e4304…1e4498 Dummy {f00=0x0092, f01=0x0190, f02=» & & / & M 0 & k @ & P & ` & p & & & & = & [ & y & & &
0x1e4498…1e462c Dummy {f00=0x0092, f01=0x0190, f02=» & & & ; 0 & Y @ & w P & ` & p & & & & + & I & g & & &
0x1e462c…1e47c0 Dummy {f00=0x0092, f01=0x401a, f02=» u @ & & ; 0 & Y @ & w P & ` & p & & & & + & I & g & & &
0x1e47c0…1e4954 (1, 378) Opaque[0x194]
0x1e4954…1e4ae8 # DirEnt {nam=»DENT01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0bf8, f03=0x0000}
0x1e4954…1e4ae8 IdxSect {
0x1e4954…1e4ae8 f00 = 0x005f // 0x1e4954 @0x0
0x1e4954…1e4ae8 f01 = 0x000e // 0x1e4956 @0x2
0x1e4954…1e4ae8 gno = [ // 0x1e4958 @0x4
0x1e4954…1e4ae8 [0x00]: C0x005f.0x3.0
0x1e4954…1e4ae8 [0x01]: C0x0060.0x0.0
0x1e4954…1e4ae8 [0x02]: C0x0060.0x1.0
0x1e4954…1e4ae8 [0x03]: C0x0060.0x2.0
0x1e4954…1e4ae8 [0x04]: C0x0060.0x3.0
0x1e4954…1e4ae8 [0x05]: C0x0061.0x0.0
0x1e4954…1e4ae8 [0x06]: C0x0061.0x1.0
0x1e4954…1e4ae8 ]
0x1e4954…1e4ae8 }
0x1e4ae8…1e4c7c Dummy {f00=0x005f, f01=0x0190, f02=» , P IDENT DENT01 10.0 80-04-11,81-08-27/EV * P* FIRST STATEMENT AFTER TOTB42 IS 4 P* A UNIQUE SHB STATEMENT b P DDUM DEDDIV P PDIV P ENTRY DENT01 P EXT DERECS P EXT DEACC P EXT DECLRN P EXT DECLRD
0x1e4c7c…1e4e10 Dummy {f00=0x005f, f01=0x018e, f02=» P EXT UPDBOL P EXT DERR & P EXT TESTB TEST FOR A BIT IN A BIN . P EXT SETB SET A BIT IN A BIN X & P EXT GETDUP LOOK FOR DUPLICATION- | P STRING FOR CURRENT FIELD & P EXT DEDISC DISC HANDLING ROUTINE & P EXT DEPOOL POOL HAN
0x1e4e10…1e4fa4 Dummy {f00=0x005f, f01=0x0190, f02=» PDENT01 PROC . P***************************************** P* J P* HANDLE ENTERED DATA T P* r . P***************************************** | PDATAIN & P TBT DOOL8,DAT04 JUMP IF OPEN NEW P* $ P TBF VERIFM,DAT0X VERIFY
0x1e4fa4…1e5138 Dummy {f00=0x005f, f01=0x0190, f02=»RC CLEAR VERIFY P B DAT0X P* ( P* 2 PDAT0 THOME < , PDAT01 CLEAR DECHANGE CHANGED INPUTFIELD N $ P TBT VERIFM,DAT05 VERIFY MODE ? ~ & P TBF DEPROMPT,DAT07 ENTIRE DISPLAY PDAT04 , P CLEAR BOOL3 F=NO/UNVALID IMMID.FORM CH
0x1e5138…1e52cc Dummy {f00=0x005f, f01=0x0190, f02=»IFM,DAT05 VERIFY MODE ? PDAT07 . P PERF DECLRS CLEAR SOME INPUTFIELDS(NCLR) . P B DAT03 ` PDAT05 p ( P TBT KEYVER,DAT06 KEY VERIFICATION ? ~ PDAT0X & P SET DENOCHAN NO CHANGES PERMITTED PDAT06 ( P PERF DECLRD DISPLAY VAR
0x1e52cc…1e5460 Dummy {f00=0x005f, f01=0x0190, f02=» P* & P* HANDLE ERROR AND/OR ILLEGAL KEYS P* 8 PDATERR MOVE DEBINW4,W0 B PDATER2 ` $ P TBF VERIFM,DATER3 VERIFY MODE ? n * P TBT KEYVER,DATER3 KEY VERIFICATION ? & P SET DENOCHAN NO CHANGES PERMITTED P* PDATER3 * P C
0x1e5460…1e55f4 (1, 379) Dummy {f00=0x0060, f01=0x0190, f02=»EKTABN " P TBF DOOLA,DATER7 NOT BALANCE & P IB DEBINW2,TOTBAL,CANCBL,SERIOUS 4 P B DATER4 ^ PDATER7 p ( P IB DEBINW2,DATER5,DATER5 CLR,CAN C ~ ( P RETUDA,RFWDDA,DATER6,TOTDA,PROGDA PDATER5 2 P COPY DEINPUT,W0,W6,STR6A,W0 RESTOR
0x1e55f4…1e5788 Dummy {f00=0x0060, f01=0x018e, f02=»URRENT REC.NR z . P CBG DEBINW3,BDPOIN(W2),DAT0 ENTRY NEW REC P TBT DOOL2,DAT0 INSERT H P B DAT0X f PDATER6 v ( P CBE NUMBER,=D'0',DATER8 BATCHEAD=0 P B RBWDDA PDATER8 P MOVE DEBINW4,W15 P B DATER4 P EJECT
0x1e5788…1e591c Dummy {f00=0x0060, f01=0x0190, f02=» f * P TBF DOOL8,CANC03 OPEN NEW/BATCHHEAD? P THOME 6 P B DAT04 D P* T PCANC03 ^ ( P TBF DOOL2,CANC10 JUMP IF NOT INSERT l * P MOVE DEBINW2,W5 SIMULATE RBWD PRESSED P B RBWD10 PCANC10 , P TBT DECHANGE,CANC20 CHANGED INPUT
0x1e591c…1e5ab0 Dummy {f00=0x0060, f01=0x0190, f02=»BINW3,NUMBER " P CBG DEBINW3,BDPOIN(W2),CANC15 * P TBF DBOMVR,CANC15 RECORD TO VERIFY ? : ( P TBT DBOVER,CANC15 VERIFIED RECORD ? h P PERF DEVERS SET VERIFY MODE PCANC13 & P CLEAR DENOCHAN CHANGES PERMITTED & P ERASE 1,W1,W0 ERASE ALL
0x1e5ab0…1e5c44 Dummy {f00=0x0060, f01=0x018e, f02=» & P PERF DERECS,W5 GET CURRENT RECORD P BERR DATER2 . ( P CLEAR DECHANGE CHANGED INPUTFILED ? B " P CLEAR DEPROMPT ENTIRE DISPLAY n P BNZ DAT04 , P ERASE 5,W1,W0 ERASE SOME FROM 1 AND UP P B DAT06 P EJECT P*****************
0x1e5c44…1e5dd8 Dummy {f00=0x0060, f01=0x0190, f02=» P BNZ RETU05 $ P TBT VERIFM,RETU05 VERIFY MODE ? & P PERF DERECS,W3 ENTER LAST RECORD @ P BNERR SERIOUS j PRETU03 P PERF DERROR,DEKTAB6 PRETU05 P B SERIOUS P**************** P* ENTER PRESSED. P**************
0x1e5dd8…1e5f6c Dummy {f00=0x0060, f01=0x0190, f02=» PERF DERECS,W2 ENTER OLD RECORD P BNOK DATER2 ( P B RFWD10 < P EJECT N PDAEN00 4 P TBF DECHANGE,DAEN10 NO ACCUMULATE WHEN NO INPUT j ( P PERF DEACC,W0 INCREASE ACCUMULATORS & PDAEN10 CLEAR DOOL2 RECORD INSERT ? P BZ DAEN50
0x1e5f6c…1e6100 Dummy {f00=0x0060, f01=0x0190, f02=» P B DAEN59 PDAEN15 & P SET DENOCHAN NO CHANGES PERMITTED $ * P PERF DERECS,W12 ENTER INSERTED RECORD N P BOK DAEN30 | PDAEN20 ( P PERF DEACC,W1 DECREASE ACCUMULATORS P B DATER2 PDAEN30 P MOVE BCD13A,NUMBER PIN
0x1e6100…1e6294 (1, 380) Dummy {f00=0x0060, f01=0x0190, f02=» n P B DAT03 P EJECT P* HANDLE NORMAL INPUT & P* D PDAEN50 N * P TBF DOOL8,DAEN60 OPEN NEW/BATCHHEAD ? 2 P CALL CLEARB,BIN1,W0 CLEAR DOOL8 IN REC.STATUS PDAEN60 P TBF DECHANGE,DAEN61 P PERF DERECS,W1 ENTER NEW
0x1e6294…1e6428 Dummy {f00=0x0060, f01=0x018e, f02=»OUND r PDAEN59 . P MOVE DEBINW4,W3 FORMATNAME=IMMIDIATE (N) P B DAEN63 L PDAEN62 ^ P CLEAR BOOL3 CLEAR/SET CR l & P BOK DAEN65 NO FORMAT CHANGE FOUND 2 P MOVE DEBINW4,W4 FORMATNAME=NEXT AFTER (R)EG PDAEN63 8 P CALL EMPTYT
0x1e6428…1e65bc Dummy {f00=0x0060, f01=0x0190, f02=» f 2 P MATCH STSAVE(DEBINW4),DEBINW3,W1,STR1A,W0,W1 " P BNOK DAEN67 DATAENTER-FORMAT > ( P MOVE BIN3,DEBINW4 SAVE FORMATINDEX d & P PERF DERECS,W3 ENTER LAST RECORD P BOK DAEN66 8 P CBNE DEBINW4,W13,DAEN69 IGNORE NO WORKSPACE IN CORE
0x1e65bc…1e6750 Dummy {f00=0x0060, f01=0x0190, f02=»5 GET BALANCE-FORMAT PDAEN67 P MOVE DEINPUT,HEX00 * : P COPY DEINPUT,W0,W6,STSAVE(DEBINW4),W0 GET FORMATNAME F P CLEAR DOOL8 OPEN NEW BATCH " P PERF DERECS,W14 CHANGE FORMAT P BOK DAEN64 P CBNE NUMBER,=D'0',DAEN69 P SET
0x1e6750…1e68e4 Dummy {f00=0x0060, f01=0x018e, f02=»LEAR DECHANGE P SET DOOL8 P PERF DERECS,W10 ( P BOK DAEN68 @ P CLEAR DOOL8 T P B DATER4 h PDAEN68 z P CLEAR DOOL8 PDAEN70 P CLEAR DECHANGE P BZ DAT0 P CLEAR SW95PR P BZ DAEN80 P MOVE DEBINW4,
0x1e68e4…1e6a78 Dummy {f00=0x0060, f01=0x0190, f02=» P CBNE DEBINW4,W6,DAEN85 P TBF DBOMVR,DAEN85 $ & P PERF DERECS,W3 ENTER LAST SECTOR > P BERR DATER2 h P PERF DEVERS SET VERIFY MODE | P B RFWD02 PDAEN85 P B DAT0 P EJECT P****************** P* RECORD FORWARD
0x1e6a78…1e6c0c Dummy {f00=0x0060, f01=0x0190, f02=»INSERT OF RECORD ~ & P PERF DEPRUT,PRNUM,DEBINW4,DEBINW3 * P CBNE DEBINW4,W6,RFWD03 VERIFY MODE ? B ( P TBF DBOMVR,RFWD03 RECORD TO VERIFY p P PERF DEVERS SET VERIFY MODE P TBT DBOVER,RFWD10 PRFWD02 P PERF DELAST,W9,DEKTAB8 P
0x1e6c0c…1e6da0 Dummy {f00=0x0060, f01=0x018e, f02=» P TBT DOOL8,RFWD07 ( P TBF DOOL2,RFWD05 JUMP IF NOT INSERT PRFWD06 J " P B RBWD10 GET PREVIOUS RECORD X PRFWD05 ~ P TBT DENOCHAN,RFWD10 PRFWD07 P B DATERR PRFWD10 P MOVE DEBINW3,NUMBER $ P CBNE DEBINW3,BDPOIN(W
0x1e6da0…1e6f34 (1, 381) Dummy {f00=0x0060, f01=0x018e, f02=» P CLEAR SOOL2 PRFWD14 $ P MOVE DEBINW4,W9 NO MORE RECORDS * P B RFWD33 R PRFWD15 d $ P TBT VERIFM,RFWD23 VERIFY MODE? r P PERF DELAST,W15,DEKTABR ( P IB DEBINW2,PROCAN,PROCAN,RETUDA C P RFWD18,RBWDDA P MOVE DEBI
0x1e6f34…1e70c8 Dummy {f00=0x0060, f01=0x0190, f02=» $ P MOVE BCDI21(W3),NUMBER RESTORE P MOVE DEBINW4,W6 , P B DATER2 D PRFWD17 V P MOVE DEBINW3,BCDI21(W3) d 0 P CBNG DEBINW3,BDPOIN(W2),RFWD19 WITHIN BATCH $ P MOVE BCDI21(W3),NUMBER RESTORE P B RFWD13 NOT FOUND PRFWD18
0x1e70c8…1e725c Dummy {f00=0x0060, f01=0x0190, f02=» PRFWD19 & P ERASE 1,W1,W0 ERASE ALL ON SCREEN PRFWD20 < $ P PERF DERECS,W4 GET NEXT RECORD J PRFWD30 r P BOK RFWD40 P BOFL RETU03 P CLEAR DOOLC & P CBNE PINDFR,W0,RFWD33 CURR FORMAT * P CBE DEBINW2,W5,RFWD31 RBWD PRESSE
0x1e725c…1e73f0 Dummy {f00=0x0060, f01=0x0190, f02=» BATCHHEAD x P SET SOOL2 P B DATER4 $ PRFWD32 6 P CLEAR SOOL2 D P B DATER4 X PRFWD33 j P TBF VERIFM,RFWD38 x P TEST BDAVER P BNZ TOTBAL P TBT KEYVER,RFWD35 P DISPLAY 30,W1,W0 P B RFWD39 PRFWD35
0x1e73f0…1e7584 Dummy {f00=0x0060, f01=0x0190, f02=» 0,W1,W0 PRFWD39 P THOME P B DATER2 , PRFWD40 > P SET SOOL2 NOT BATCHHEAD L ( P CBE DEBINW2,W5,RFWD50 RBWD PRESSED l & P PERF DEPRUT,PRNUM,DEBINW4,DEBINW3 & P CBNE DEBINW4,W6,RFWD50 NOT VERIFY P TBF DBOMVR,RFWD10 P P
0x1e7584…1e7718 Dummy {f00=0x0060, f01=0x0190, f02=»AR DECHANGE PRFWD60 P CBE NUMBER,=D'0',RFWD70 " P TEST VERIFM B P BZ DAT06 V P B DAT05 h PRFWD70 x P CLEAR SOOL2 P TEST VERIFM P BZ DAT0X P B DAT05 P EJECT P***************** P* RECORD BACKWAR
0x1e7718…1e78ac Dummy {f00=0x0060, f01=0x0190, f02=» & P TBT DOOL2,RBWD10 INSERT OF RECORD & P CBE NUMBER,=D'0',RFWD12 BATCHHEAD . & P PERF DEVERC CLEAR IF VERIFY MODE X P BNZ RBWD10 P TBT DENOCHAN,RBWD15 & P SET DENOCHAN NO CHANGES PERMITTED & P PERF DERECS,W3 ENTER LAST SECTOR P B
0x1e78ac…1e7a40 Dummy {f00=0x0060, f01=0x018e, f02=»BWD28 YES! PRBWD15 P PERF DELAST,W15,DEKTABR ( P IB DEBINW2,PROCAN,PROCAN,RETUDA C @ P RFWDDA,RBWD25 l P MOVE DEBINW2,W5 PRBWD20 P MOVE BCDI21(W3),DEINPUT " P CBNL BCDI21(W3),NUMBER,RFWD16 P B RBWD30 PRBWD25
0x1e7a40…1e7bd4 (1, 382) Dummy {f00=0x0060, f01=0x0190, f02=» * P ERASE 1,W1,W0 ERASE ALL FROM 1 AND UP ( P PERF DERECS,W6 GET PREVIOUS RECORD 6 P B RFWD30 b P EJECT t P******************* P* RECORD CORRECTION P******************* PCORDAT P TBT VERIFM,CORD10 P TBF DENOC
0x1e7bd4…1e7d68 Dummy {f00=0x0060, f01=0x018e, f02=»MULATORS t P THOME & P CLEAR DENOCHAN CHANGES PERMITTED P PERF DELAST,W8,DEKTAB7 H $ P SET CORR SET CORRECTION MODE,DK h & P PERF DEVERC CLEAR IF VERIFY MODE P BZ CORD20 P PERF DECLRD P B CORD30 PCORD20 P PERF DE
0x1e7d68…1e7efc Dummy {f00=0x0060, f01=0x0190, f02=» PCORD35 P MOVE DEBINW4,W0 PCORD40 * P SET CORR 8 P PERF DERR J P B CORD30 PCORCAN n ( P TBF DECHANGE,CORE15 NO CHANGES MADE | & P ERASE 1,W1,W0 ERASE ALL ON SCREEN PCORC10 P SET DOOL4 & P PERF DERECS,W5 GET CU
0x1e7efc…1e8090 Dummy {f00=0x0060, f01=0x0190, f02=»ACC,W2 INCREASE ACCUMULATORS P CLEAR DECHANGE ! $ P THOME ! < : PCORR30 IB DEBINW2,CORE10,SERIOUS,CORE20 CAN,RET,ENT C ! J & P CORENT,CORENT,CORENT NOT USED C ! P CORDEL DEL ! PCORENT ! P PERF DERECS,W2 ENTER OLD ! P BNOK CORD40 !
0x1e8090…1e8224 Dummy {f00=0x0060, f01=0x0190, f02=»ORE45 ! PCORE20 " P GETFLD 0,W1,DEBINW1 " P CLEAR DECHANGE " 8 PCORE45 " P & P PERF DEPRUT,PRNUM,DEBINW4,DEBINW3 " ^ P CBNE DEBINW4,W6,CORE60 " PCORE50 " P TBF DBOMVR,CORE60 " P TBT DBOVER,CORE60 " P PERF DEVERS SET VEIFY MODE "
0x1e8224…1e83b8 Dummy {f00=0x0060, f01=0x0190, f02=»06 " PCORE90 # P PERF DECLRN # P B DAT03 # , PCORDEL # < P SET DENOCHAN # J P B DLTE05 # ` P EJECT # r P***************** # P* RECORD DELETE. # P***************** # PDLTEDA # P TBT VERIFM,DLTE05 # P TEST DENOCHAN #
0x1e83b8…1e854c Dummy {f00=0x0060, f01=0x018e, f02=» PERF DEVERC # P SET DENOCHAN $ PDLTE10 $ * P PERF DELAST,W2,DEKTAB7 $ 8 , P IB DEBINW2,PROCAN,PROCAN,RETUDA,DLTE10 $ X & P ERASE 1,W1,W0 ERASE ALL ON SCREEN $ ( P PERF DEACC,W1 DECREASE ACCUMULATORS $ P THOME $ PDLTE30 $ P PERF DERECS,W
0x1e854c…1e86e0 Dummy {f00=0x0060, f01=0x018e, f02=» > P IB DEBINW2,DELERR,RETUDA,DELERR,RFWD10,RFWD50,DELERR, C % P DELERR,TOTDA % F PDELERR % ( P EDWRT DEDSSCRN,BELL ACOUSTIC ALARM % j P B DLTE50 % P EJECT % P******************* % P* CHANGE PROGRAM. * % P******************* %
0x1e86e0…1e8874 (1, 383) Dummy {f00=0x0061, f01=0x0190, f02=» P GETABX BIN4 & PPROGD0 & P PERF DELAST,W1,DEKTAB7 & & , P IB DEBINW2,PROCAN,PROCAN,RETUDA,PROGD0 & F PPROENT SUB DEBINW1,W1 & v P BZ PROGD0 JUMP IF NO INPUT & 6 P COPY DEINPUT,DEBINW1,W1,HEX00,W0 DELETE ENTER-KEY & $ P PERF DERECS,W10 CHAN
0x1e8874…1e8a08 Dummy {f00=0x0061, f01=0x018e, f02=»EBINW2 & t P MOVE DEBINW2,W1 ' * P CBE DEBINW4,W6,CORE50 JUMP IF VERIFY ' & P PERF DECLRN ' T P B DAT03 ' h P* ' x P EJECT ' P****************** ' P* RECORD INSERT. * ' P****************** ' PINSRDA ' P TEST DOOL2 ' P BNZ DAT
0x1e8a08…1e8b9c Dummy {f00=0x0061, f01=0x018e, f02=» P PERF DEVERS SET VERIFY MODE ( P B RFWD02 ( ( PINSR05 ( : P MOVE DEBINW3,NUMBER ( H 0 P CBNE DEBINW3,BDPOIN(W2),INSR10 LAST RECORD ( d & P CLEAR DENOCHAN CHANGES PERMITTED ( P B CANBL1 ( PINSR10 ( P PERF DELAST,W4,DEKTAB7 ( , P IB DE
0x1e8b9c…1e8d30 Dummy {f00=0x0061, f01=0x0190, f02=» ( l P SET DOOL2 RECORD INSERT ) & P PERF DEVERC CLEAR IF VERIFY MODE ) ( P B DAEN65 ) R P EJECT ) d P******************** ) r P* TOT-KEY PRESSED. * ) P******************** ) PTOTDA ) P TEST DOOL8 ) P BNZ DATERR ) P TBF SOOL2,T
0x1e8d30…1e8ec4 Dummy {f00=0x0061, f01=0x0190, f02=» VERIFM,TOTBAL ) P PERF DERECS,W3 ENTER LAST * P BNERR TOTBAL * 8 * P CBE DEBINW4,W13,TOTBAL NO WORKSPACE ? * N P B DATER2 * | P EJECT * . P***************************************** * P* * P* HANDLE BALANCE FORMAT * P* * . P******
0x1e8ec4…1e9058 Dummy {f00=0x0061, f01=0x018e, f02=»X00 * 4 P COPY DEINPUT,W0,W6,FORTAB(W21),W0 BALANCEFORMAT + P MOVE FRMTPNTR,SYMREC(W11) + D PTOTB05 + f P CLEAR DECHANGE + t P SET DOOLA + PTOTB10 + P PERF DEDISC,W10 GET FORMAT + P BNERR TOTB20 + * P CBNE DEBINW4,W13,TOTB12 NO WORKSP
0x1e9058…1e91ec Dummy {f00=0x0061, f01=0x0190, f02=» ( P PERF DEPOOL,W6,PINDFR,BIN14,STRG10A , P MOVE FORMAT,HEX00 , 0 P B TOTB10 , J PTOTB12 , " P CLEAR DOOLA NO BALANCE-FORMAT , j & P SET DENOCHAN NO CHANGES PERMITTED , PTOTB14 , P B DATER2 , PTOTB20 , ( P MOVE FORMAT,FORTAB(W21) BLANCE
0x1e91ec…1e9380 Dummy {f00=0x0061, f01=0x0190, f02=»SC,W1 ENTER JOB DEFINITION , PTOTB35 - " P PERF DECLRN - 0 * PTOTB40 IB DEBINW2,CANCBL,SERIOUS,ENTBL - D , P CBNE DEBINW2,W8,TOTB50 JUMP IF NOT TOT - r * P CBE BDPOIN(W5),W0,TOTB42 ALL VERIFIED - P PERF DELAST,W9,DEKTAB6 - P B TOTB35 - PTOTB42
0x1e9380…1e9514 (1, 384) Dummy {f00=0x0061, f01=0x018e, f02=» P SET BDAFRO ENTER PRESSED . P MOVE DEBINW2,W3 . & P B ENTBL . > PTOTB44 . N P MOVE DEBINW4,W24 . P ERASE 0,DEBINW4,DEBINW4 . v P B TOTB35 . PTOTB50 . P MOVE DEBINW4,W0 . PTOTB60 PERF DERR . P B TOTB40 . PENTBL . P S
0x1e9514…1e96a8 Dummy {f00=0x0061, f01=0x0190, f02=» P RET / P* / PCANCBL / PCANBL1 / ( P CLEAR DOOLA / 6 P SET SOOL2 / J $ P PERF DERECS,W7 GET LAST RECORD / P BOK CANBL3 / P BOFL RETU03 / P CBE DEBINW4,W13,TOTB14 / P SET DOOLA / P B TOTB60 / PCANBL3 / & P PERF DEVE
0x1e96a8…1e983c Dummy {f00=0x0061, f01=0x018e, f02=»AT01 / PSERIOUS 0 P CLEAR BDABAL OUT OF BALANCE 0 P B TOTB70 0 @ P PEND 0 R P EJECT 0 ` PDEVERS PROC 0 n P CALL SETB,WORK(W11),W0 0 P CALL SETB,WORK(W12),W0 0 P SET VERIFM 0 P RET 0 P PEND 0 PDEVERC PROC 0 P CLE
0x1e983c…1e99d0 Dummy {f00=0x0061, f01=0x411a, f02=» 0 PBELL FRMT 1 P FSL 1 P FILLR X'07',1 1 & P FMEND 1 < PFFETCH FRMT 1 J P FSL 1 ^ P FTEXT 'FETCHING FORMAT:' 1 j P FCOPY DEINPUT 1 P FTEXT ' FROM DISC.' 1 P FNL 1 P FKI 1,ALPHA 1 P FCOPY HEX00 1 P FMEND 1 P* 1
0x1e99d0…1e9b64 Dummy {f00=0x0061, f01=0x2008, f02=» 2 ,W7 GET LAST RECORD P BERR TOTB60 $ P CLEAR DOOLA 8 P SET SOOL2 L * P CBE NUMBER,=D'1',CANBL2 JUMP IF FIRST ^ P CLEAR DECHANGE P B DAT02 PCANBL2 P B DAT01 PSERIOUS P CLEAR BDABAL OUT OF BALANCE P B
0x1e9b64…1e9cf8 Dummy {f00=0x0061, f01=0x0190, f02=»D 0,DEBINW3,DEBINW2 GET THE COMPULSORY FIELD 2 PKENT15 3 4 . P MOVE DEBINW4,W5 INDICATE COMP.FIELD FOUND 3 B P MOVE DEBINW1,W0 3 t P TSTCTL 5 LOOK IF CTAB 3 P BZ ERRPRINT NO! 3 P DUPL STR2A 3 P BOK KENT20 YES! 3 P TBF ASDFLAG,ERRPRINT 3
0x1e9cf8…1e9e8c Dummy {f00=0x0061, f01=0x0190, f02=»KFORCE 3 P PERF DEFORC 4 P B UPDR30 4 " P* 4 4 P* VALID ITEM 4 > P* 4 R PKVALID 4 ( P MOVE DEBINW2,W3 RESTORE ITEMLENGTH 4 j P B UPDR25 4 P EJECT 4 PERRPRT 4 P CMP DEBINW2,W16 4 P BE KEDIT JUMP IF EDIT 4 , P CBE DEBINW2,W
0x1e9e8c…1ea020 Dummy {f00=0x0061, f01=0x0190, f02=» 4 z P BNZ DYK050 5 P* 5 P* ERROR HANDLING 5 & P* 5 B PERRPRINT 5 L * P TBF DOOLA,ERRP10 JUMP IF NOT BALANCE 5 P PERF DERROR,DEKTAB6 5 P B ERRP20 5 PERRP10 5 P PERF DERROR,DEKTAB4 5 PERRP20 5 $ P CBE DEBINW2,W1,ERRCAN C
0x1ea020…1ea1b4 (1, 385) Opaque[0x194]
0x1ea1b4…1ea348 # DirEnt {nam=»CONV «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1280, f03=0x0000}
0x1ea1b4…1ea348 IdxSect {
0x1ea1b4…1ea348 f00 = 0x0094 // 0x1ea1b4 @0x0
0x1ea1b4…1ea348 f01 = 0x0004 // 0x1ea1b6 @0x2
0x1ea1b4…1ea348 gno = [ // 0x1ea1b8 @0x4
0x1ea1b4…1ea348 [0x00]: C0x0094.0x0.0
0x1ea1b4…1ea348 [0x01]: C0x0094.0x1.0
0x1ea1b4…1ea348 ]
0x1ea1b4…1ea348 }
0x1ea348…1ea4dc Dummy {f00=0x0094, f01=0x0190, f02=» P IDENT CONV UPD 80-01-22/AST DDUM DEDDIV ( PDIV < P ENTRY DECONV J P EXT ATTDEV ATTACH DEVICE ` P EXT DETPRT DETACH DEVICE P EJECT P EJECT P* @ P* THIS MODULE TAKE CARES OF THE DIFFERENT CONVERTIONS-
0x1ea4dc…1ea670 Dummy {f00=0x0094, f01=0x0190, f02=»OURSELVES. l P* D P* FORMAL PARAMETERS: FC = FUNCTION-CODE (DEVICE-CLASS) @ P* = 1 DATACOMMUNICATION OUT d > P* = 2 DATACOMMUNICATION IN 8 P*
0x1ea670…1ea804 Dummy {f00=0x0094, f01=0x0190, f02=» b : P* = 6 FLOPPYDISC FILE : P* = 7 DELETE BATCHES ON USERFILE F P* 8 P* TYPE = TYPE OF HANDLING . P* = 1 OPEN : P*
0x1ea804…1ea998 Dummy {f00=0x0094, f01=0x0190, f02=» = 4 BALANCE RECORD t 0 P* = 5 CLOSE P* T 4 P* RETCON = RETURN-CODE ^ , P* = 0 OK > P* /= 0 ERROR MESSAGE-NUMBER P
0x1ea998…1eab2c Dummy {f00=0x0094, f01=0x018e, f02=»************************* Z P EJECT " PDECONV PROC FC,TYPE,RETCON 0 P* R 6 P IB FC,TRANSM,RECEIV,CASSET JUMP ON DEVICE-CLASS C " P PRINTA,DISCFL,FLOPPY,DELETE PTRANSM PRECEIV PCASSET PDISCFL PFLOPPY PERROR
0x1eab2c…1eacc0 Dummy {f00=0x0094, f01=0x0190, f02=» h P* PPRINTA : P IB TYPE,PR100,PR200,PR200 JUMP ON TYPE 0F HANDLING C P PR200,PR500 ^ P B ERROR t P* * P* OPEN DEVICE = ATTACH PRINTER P* PPR100 $ P PERF ATTDEV,BIN6 ATTACH DEVICE P BOK DECOOK
0x1eacc0…1eae54 (1, 386) Dummy {f00=0x0094, f01=0x0190, f02=» P EDWRT DEDSPRT,FCOUNT P BNOK PR298 " P MOVE DEBINW3,W1 6 P PRINT DEDSPRT,DEBINW3,W0 N P BNOK PR298 p P B DECOOK PPR298 2 P MOVE DEBINW4,=W'35' OUTPUT DEVICE NOT OP....' P B RETURN GO AND CLOSE P* * P*
0x1eae54…1eafe8 Dummy {f00=0x0094, f01=0x0190, f02=» 8 P* THIS ROUTINE DELETE BATCHES ON THE USERFILE P* @ PDELETE J P IB TYPE,DECOOK,DEL100 X P B DECOOK v PDEL100 P MOVE RETCON,=W'-5' P B RETURN P EJECT P* P* OK P* PDECOOK P M
0x1eafe8…1eb17c Dummy {f00=0x0094, f01=0x40a4, f02=»,2 P FILLR '*',10 P FTEXT 'NUMBER: ' P FMEL '9999',NUMBER : P FEOR V P FILLR ' ',2 d P FEOR x P FMEND END @ W'-5' P B RETURN P EJECT P* P* OK P* PDECOOK P M
0x1eb17c…1eb310 Dummy {f00=0x0094, f01=0x2008, f02=» NT DE12ST DDUM DEDDIV PDIV . ENTRY DE12ST < DE12ST R PROC ` RET n PEND z END @ KITEM PSTR6A STRG 6 WORKITEM PSTRG10A STRG 10 WORKITEM PDIV END @ ARIABL
0x1eb310…1eb4a4 Dummy {f00=0x0094, f01=0x0190, f02=»U:BTAB 800121 U:BTABB U:CB10 :C ,S:BTAB 800121 S:BTABB :B ,Z:TB10 800121 Z:TB10T + . ,D:TB10 800121 D:TB10T :T , :DB10 800121 :DB10D ,D:DB10 800121
0x1eb4a4…1eb638 Dummy {f00=0x0094, f01=0x0190, f02=» :DB30D ,D:DB30 800121 D:DB30D ,U:CB10 800121 U:CB10C ,D:CB10 800121 D:CB10C 6 ,C:CB20 800121 C:CB20C $ ,D:CB20 800121 D:CB20C B ,C:CB30
0x1eb638…1eb7cc Dummy {f00=0x0094, f01=0x0190, f02=» 800121 D:CB40C > ,C:CB50 800121 C:CB50C ,D:CB50 800121 D:CB50C : ,Z:TB20 800121 Z:TB20T ,D:TB20 800121 D:TB20T B ,Z:TB30 800121 Z:TB30T
0x1eb7cc…1eb960 Dummy {f00=0x0094, f01=0x0190, f02=» B ,Z:TB50 # 800121 Z:TB50T ,D:TB50 $ 800121 D:TB50T F ,Z:TB60 % 800121 Z:TB60T . ,D:TB60 & 800121 D:TB60T . *DEDDIV ' 800121 $$$TRA DENTER ( 800121 $$$TR
0x1eb960…1ebaf4 (1, 387) Opaque[0x194]
0x1ebaf4…1ebc88 # DirEnt {nam=»DENT03«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1290, f03=0x0000}
0x1ebaf4…1ebc88 IdxSect {
0x1ebaf4…1ebc88 f00 = 0x0094 // 0x1ebaf4 @0x0
0x1ebaf4…1ebc88 f01 = 0x0004 // 0x1ebaf6 @0x2
0x1ebaf4…1ebc88 gno = [ // 0x1ebaf8 @0x4
0x1ebaf4…1ebc88 [0x00]: C0x0094.0x2.0
0x1ebaf4…1ebc88 [0x01]: C0x0094.0x3.0
0x1ebaf4…1ebc88 ]
0x1ebaf4…1ebc88 }
0x1ebc88…1ebe1c Dummy {f00=0x0094, f01=0x018e, f02=» $ P IDENT DENT03 REL 10.0 80-04-11 P 80-01-21/DALI , DDUM DEDDIV D PDIV X " ENTRY DEFORC HANDLE FORCEKEY f P ENTRY DEVERI P EXT TESTB P EXT FORCED P EXT FMOVE P EXT DESTAT P EXT DERROR P EXT M
0x1ebe1c…1ebfb0 Dummy {f00=0x0094, f01=0x0190, f02=» * FORCE KEY AND PUT ???? * INTO THE FORCED ITEM. $ ************************* D DEFORC PROC f * PKFORCE SET DBOFOR HANDLE FORCED FIELD z P TSTCTL 0 LOOK IF ALPHA P BZ KFOR10 JUMP IF BCD P MOVE DEINPUT,='?' P MOVE :F
0x1ebfb0…1ec144 Dummy {f00=0x0094, f01=0x0190, f02=»ODD NUMBER p P CHARACTERS KEYED IN P BZ KFOR20 JUMP IF EVEN 0 P MOVE DEINPUT,=X'0AAA' P P B KFOR30 n PKFOR20 MOVE DEINPUT,=X'0FAA' PKFOR30 DIV DEBINW4,W2 * P XCOPY :FMTITEM,W0,DEBINW4,DEINPUT,W0 PKFOR31 P GETABX DE
0x1ec144…1ec2d8 Dummy {f00=0x0094, f01=0x018e, f02=»*************** P*THIS ROUTINE HANDLE P*THE KEYVERIFICATION 4 P********************* P PDEVERI PROC n " P CLEAR DOOL1 VALID PRESSED OFF PKVER00 P MOVE BIN10,W0 P MOVE BIN9,W0 P CALL FORCED,:FMTITEM P BOK KVE
0x1ec2d8…1ec46c Dummy {f00=0x0094, f01=0x0190, f02=» P BZ KVER02 JUMP IF BCD P MOVE BIN9,W0 " P EDSUB DEINPUT,BIN9,FORMK 8 * P CBNE BIN9,W0,KVER10 JUMP IF NOT EMPTY Z P B KTKEY2 GET NEXT FIELD PKVER02 P MOVE DEINPUT,:FMTITEM P MOVE BIN8,=W'80' =W'80' P CBNE :FMTITEM,=D'0'
0x1ec46c…1ec600 Dummy {f00=0x0094, f01=0x0190, f02=» P BP KVER05 PKTKEY2 $ P MOVE DEBINW4,W1 GET NEXT FIELD $ P RET L PKVER05 X P ADD BIN10,W1 f PKVER10 | P SETCUR P CLEAR DOOL1 VALID PRESSED ? P BNZ KVER20 YES P CALL FMOVE,STRG10A,FDOTS P ADD BIN9,W128
0x1ec600…1ec794 (1, 388) Dummy {f00=0x0094, f01=0x0190, f02=»N9,BIN10 POS IN BUFFER 2 P KI .NE,DEDSDYKB,STR1A,DEKTABK,DEBINW1,DEBINW2 P PERF DELOCK,W1,DEBINW2 T $ P IB DEBINW3,EVERIF,KVER70,KVER75 t ( P IB DEBINW2,KVER40,KVER40,KVER50 C P KVER65,KVER35,KCOPY P SUB DEBINW2,W6 P MOVE DEBI
0x1ec794…1ec928 Dummy {f00=0x0094, f01=0x018e, f02=» P MOVE STR1A,=C'+' P B KVER55 " PKVER50 4 P MOVE STR1A,=C'-' B PKVER55 P TSTCTL 0 LOOK IF ALPHA j P BZ KVER60 JUMP IF BCD P CBG DEBINW2,W2,KVER75 PKVER60 & P MATCH DEINPUT,BIN9,W1,HEX00,W0,W1 P BNOK KVER
0x1ec928…1ecabc Dummy {f00=0x0094, f01=0x018e, f02=» j P BNOK KVER75 PKVER63 P UPDFLD 0,DEINPUT * P B KTKEY2 D PKVER65 V P SET DOOL1 VALID PRESSED ON d P TSTCTL 0 LOOK IF ALPHA P BNZ KVER68 YES! P DLETE DEINPUT,W0,W1 PKVER68 P CALL FMOVE,STRG10A,FORMD
0x1ecabc…1ecc50 Dummy {f00=0x0094, f01=0x0190, f02=» PKVER70 P XSTAT DEDSDYKB,DEBINW3 P CALL MASK,DEBINW3,W8 6 P BZ KVER75 T & P MATCH DEINPUT,BIN9,W1,STR1A,W0,W1 f P BOK KVER80 JUMP IF OKAY PKVER75 P EDWRT DEDSSCRN,BELL P B KVER20 PKVER80 P EDWRT DEDSSCR
0x1ecc50…1ecde4 Dummy {f00=0x0094, f01=0x0190, f02=»10,BIN9,KVER20 MACL NO REACHED P TSTCTL 0 LOOK IF ALPHA & P BNZ KVER63 JUMP IF ALPHA F P CBE BIN10,BIN9,KVER20 h P B KVER63 FIELD COMPLETE PEVERIF P MOVE DEBINW4,W2 P RET PKCOPY P MOVE DEBINW4,W3 P RET
0x1ecde4…1ecf78 Dummy {f00=0x0094, f01=0x412e, f02=»FORMV FRMT P FSL P FCOPY STR1A P FMEND 2 PBELL FRMT @ P FSL R P FILLR X'07',1 ^ P FMEND t PFDOTS FRMT P FSL P FTEXT =X'142E' P FILLR X'2E',1 P FMEND PFORMD FRMT P FSL P FCOPY DEINPUT
0x1ecf78…1ed10c Dummy {f00=0x0094, f01=0x2008, f02=» NT DENT03 PRRR 1.0 79-11-21/DALI DDUM DEDDIV 0 PDIV D " ENTRY DEFORC HANDLE FORCEKEY R INCLUDE DELITT x EJECT ************************* * THIS ROUTINE HANDLE THE * FORCE KEY AND PUT ???? * INTO
0x1ed10c…1ed2a0 Dummy {f00=0x0094, f01=0x0190, f02=»6 - 5 t r * & 2 : ! k 5 2 : " l u * & 4 :U i 7 : 7 u > * & ; h ! 3 : 8 9 u l * & Y 6 40 ! ) h d3 u * & w 41 8 5 42 9 5 43 8 3 - u * & 5 44 9
0x1ed2a0…1ed434 (1, 389) Opaque[0x194]
0x1ed434…1ed5c8 # DirEnt {nam=»DEAPPU«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x12a0, f03=0x0000}
0x1ed434…1ed5c8 IdxSect {
0x1ed434…1ed5c8 f00 = 0x0095 // 0x1ed434 @0x0
0x1ed434…1ed5c8 f01 = 0x0002 // 0x1ed436 @0x2
0x1ed434…1ed5c8 gno = [ // 0x1ed438 @0x4
0x1ed434…1ed5c8 [0x00]: C0x0095.0x0.0
0x1ed434…1ed5c8 ]
0x1ed434…1ed5c8 }
0x1ed5c8…1ed75c Dummy {f00=0x0095, f01=0x018e, f02=» & P IDENT DEAPPU CE SYSTEM 80-10-29 DDUM DEDDIV . PDIV B ENTRY DEAPPU P P EXT EMPTYT f P EXT DEDISC z P EJECT P INCLUDE DELITT P EJECT DEAPPU PROC 2 P CBNE DEBINW3,W3,DEAPPR BGNR FIELD IF APPL =3
0x1ed75c…1ed8f0 Dummy {f00=0x0095, f01=0x0190, f02=» P BE DEAP15 YES P B DEAPPR PDEMPTY , P MOVE BIN15,W1 LOAD FIELD NO : < P CALL EMPTYT,X.PSEU1,X.PSEU2,X.WB10,BIN15 FIELD 1 EMPTY ^ P BZ DEAP20 NOT EMPTY P MOVE BCD13A,SYSV(W10) P ADD BCD13A,=D'1' P CMP SYSV(W10),=C'9999
0x1ed8f0…1eda84 Dummy {f00=0x0095, f01=0x417e, f02=»,BIN15,BCD13A n P MOVE DEINPUT,SYSV(W10) , P PERF DEDISC,W20 WRITE SYSTEM VARIABLES 6 PDEAP15 f * P MOVE DEBINW1,W6 SET REQUESTED LENGTH t P MOVE DEBINW3,W1 REWRITE P RET P PDEAP20 4 P CON X.MOVE,DEINPUT,X.PSEU1,X.PSEU2,
0x1eda84…1edc18 Dummy {f00=0x0095, f01=0x2008, f02=» NT DEAPPU USERAPPL-ROUTINE DDUM DEDDIV * PDIV > ENTRY DEAPPU L DEAPPU PROC b MOVE DEBINW3,W0 v RET PEND END @
0x1edc18…1eddac Dummy {f00=0x0095, f01=0x0190, f02=» > P P h 0
0x1eddac…1edf40 Dummy {f00=0x0095, f01=0x0190, f02=» 8 F
0x1edf40…1ee0d4 (1, 390) Opaque[0x194]
0x1ee0d4…1ee268 # DirEnt {nam=»DEPRFG«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x12a8, f03=0x0000}
0x1ee0d4…1ee268 IdxSect {
0x1ee0d4…1ee268 f00 = 0x0095 // 0x1ee0d4 @0x0
0x1ee0d4…1ee268 f01 = 0x000a // 0x1ee0d6 @0x2
0x1ee0d4…1ee268 gno = [ // 0x1ee0d8 @0x4
0x1ee0d4…1ee268 [0x00]: C0x0095.0x1.0
0x1ee0d4…1ee268 [0x01]: C0x0095.0x2.0
0x1ee0d4…1ee268 [0x02]: C0x0095.0x3.0
0x1ee0d4…1ee268 [0x03]: C0x0096.0x0.0
0x1ee0d4…1ee268 [0x04]: C0x0096.0x1.0
0x1ee0d4…1ee268 ]
0x1ee0d4…1ee268 }
0x1ee268…1ee3fc Dummy {f00=0x0095, f01=0x0190, f02=» $ P IDENT DEPRFG REL 10.0 80-04-11 P 80-03-21/JAER , * D D P* THIS ROUTINE TAKES CARE OF PRINTOUT OF THE GENERAL USER N D ?* FORMAT DEFINITION AND OF THE BALANCE FORMAT DEFINITION. * @ P* -USED VARIABLES : PI
0x1ee3fc…1ee590 Dummy {f00=0x0095, f01=0x0190, f02=»BIN10 = FIELDNR r > P* BIN16 = POINTER STR64A-ITEM 8 P* DEBIN5 = LINE-COUNTER Z F P* W6 = DETAILLINE STARTLINE NUMBER 0 +* DEBINW2= 0
0x1ee590…1ee724 Dummy {f00=0x0095, f01=0x0190, f02=» = 3 RETURN-KEY * 4 L K************************************************************************ > DDUM DEDDIV PDIV * . ) ENTRY PRFGUF PRINT USERFORMAT DEFINITION * " EXT DEUNPF UNPACK
0x1ee724…1ee8b8 Dummy {f00=0x0095, f01=0x018e, f02=»R-MESSAGES P EJECT P* P* KEYTABLE * P* B CLR EQU X'8F' CLEAR L CAN EQU X'91' CANCEL h PRET EQU X'92' RETURN P* PDEKTAB6 KTAB CLR,CAN,RET EJECT * * %* PRINT USER FORMAT DEFINITION
0x1ee8b8…1eea4c Dummy {f00=0x0095, f01=0x018e, f02=» | . P ADD DEBINW4,W3 LINE-PRINTER NOT OPERABLE ( P PERF DERROR,DEKTAB6 ERRORMESSAGE:35 : P B PR50 CLR-,CAN- OR RET-KEY f PPR03 P MOVE DEBINW3,W1 P PRINT DEDSPRT,DEBINW3,W0 P BNOK PR00 JUMP IF NOT OK , P MOVE PINDCB,FLIND(W1)
0x1eea4c…1eebe0 Dummy {f00=0x0095, f01=0x018e, f02=» p " P MOVE FDVBCD(W1),W1 PAGENO:=0 $ P MOVE PINDND,W0 NUMB OF DESC:=0 . $ P MOVE PRECPR,W0 NUMB OF POOLS:=0 V > P XCOPY PRECPR,W1,W1,RPOOL(PINDFR),W17 FETCH NUMB OF POOLS ~ B P XCOPY PINDND,W1,W1,RPOOL(PINDFR),W18 FETCH NUMB OF DESC-POOLS 2 P S
0x1eebe0…1eed74 (1, 391) Dummy {f00=0x0095, f01=0x0190, f02=» d PPR04 , ' ADD FDVBCD(W2),=D'1' INCREMENT 'LINNO' P CLEAR BOOL5 D PR05 X , P PERF DEUNPF,CURSEC,W2 UNPACK NEXT FIELD d , P CBE DEBINW2,W1,PR48 END-OF-FORMAT FOUND ( P TBT BOOL5,PR04 JUMP IF END OF LINE P ADD BIN10,W1 NEXT FIELD
0x1eed74…1eef08 Dummy {f00=0x0095, f01=0x0190, f02=» CALL EMPTYT,STATSH CHECK IF EMPTY BNOK PR10 JUMP IF EMPTY * " P MOVE STR6A,='#L:' PROMPT-TEXT J 4 P XCOPY STR64A,BIN16,W3,STR6A,W0 COPY PROMPT-TEXT p * P ADD BIN16,W3 ADJUST POINTER FOR TEXT 0 P MOVE FMTWK(W13),BIN12 LOAD NUMB OG PICCHARS (
0x1eef08…1ef09c Dummy {f00=0x0095, f01=0x0190, f02=» PR10 & P CALL EMPTYT,JOBSPC CHECK IF EMPTY P BNOK PR40 JUMP IF EMPTY : & P MOVE DEBIN3,W0 POINTER JOBSPC :=0 Z P MOVE FBIN2,W0 P MOVE FMTWK(W12),FMTWK(W1) P ADD FMTWK(W12),FMTWK(W2) P ADD FMTWK(W12),FMTWK(W3) PR20
0x1ef09c…1ef230 Dummy {f00=0x0095, f01=0x0190, f02=»PR40 NO MORE FUNCTIONS P ADD FBIN1,W3 $ P DIV FBIN1,W3 COMPUTE FUNC-INDEX 4 4 P CBE FMTWK(FBIN1),W0,PR20 JUMP IF NO GENERATION , P ADD FBIN2,FMTWK(FBIN1) SAVE STARTADRESS 0 P PERF EDLINE,JOBSPC,FMTWK,FBIN1 EDIT STR64A ( $ CBNE DEBINW2,W0
0x1ef230…1ef3c4 Dummy {f00=0x0095, f01=0x0190, f02=»N v PR40 * P TBT BOOL6,PR45 JUMP IF BALANCE FORMAT * P PERF PRINT,W1,W2,DEBIN5,=W'44',W6,W5 D ( $ CBNE DEBINW2,W0,PR50 JUMP IF NOT OK r P B PR05 NEXT FIELD PPR45 * P PERF PRINT,W3,W4,DEBIN5,=W'44',W6,W5 $ P CBE DEBINW2,W0,PR05 N
0x1ef3c4…1ef558 Dummy {f00=0x0095, f01=0x0190, f02=» PEND EJECT * L P* THIS ROUTINE EDITS STR64A-ITEM WITH THE VALIDATION-, GENERATION & F A* AND ACCUMULATIO-STRINGS. IF THERE IS NOT ENOUGH SPACE TO v @ <* EDIT ONE OF THE ABOVE MENTIONED, IT WILL BE CUT AND ( P*
0x1ef558…1ef6ec Dummy {f00=0x0095, f01=0x018e, f02=» NUMB = NUMBER OF CHARACTERS IN WSTRG L P* WIND = INDEX ITEM CONTAINING NUMB OF C F * L K* -INPUT VARIABLE : STR6A = PROMPT-TEXT TO CORRESPONDING S L P*
0x1ef6ec…1ef880 Dummy {f00=0x0095, f01=0x018e, f02=» J E* BIN15 = WORK (TO CHECK IF OVERFLOW) * R L P* -OUTPUT VARIABLES : BIN16 = POINTER OF STR64A-ITEM (ADJUST L P* BOOL8 = T JUST STR64A-PART OF LINE TO 8 3*
0x1ef880…1efa14 (1, 392) Dummy {f00=0x0095, f01=0x0190, f02=» " PEDLINE PROC WSTRG,NUMB(),WIND ED05 * & " MOVE BIN15,BIN16 LOAD POINTER POS 6 , P ADD BIN15,NUMB(WIND) ADD NUMB OF CHARS ` , ( CBL BIN15,W64,ED10 JUMP IF ENOUGH SPACE , ' SUB BIN15,W64 NUMBER OF OVERFLOW CHARS 0 P SUB NUMB(WIND),BIN15 NU
0x1efa14…1efba8 Dummy {f00=0x0095, f01=0x0190, f02=»T,W1,W2,DEBIN5,=W'44',W6,W5 P B ED08 $ PED07 4 * P PERF PRINT,W3,W4,DEBIN5,=W'44',W6,W5 @ PED08 n * % CBNE DEBINW2,W0,EDRET JUMP IF NOT OK z 4 P ADD DEBIN3,NUMB(WIND) LOAD NUMB OF COPIED CHARS 2 P MOVE NUMB(WIND),BIN15 NUMB OF OVERFLOW
0x1efba8…1efd3c Dummy {f00=0x0095, f01=0x0190, f02=»5 ED10 0 P XCOPY STR64A,BIN16,NUMB(WIND),WSTRG,DEBIN3 P ADD BIN16,NUMB(WIND) J P ADD BIN16,W3 LEAVE 3 SPACES h $ P CBNG BIN16,W64,EDRET JUMP IF OK * P TBT BOOL6,ED20 JUMP IF BALANCE FORMAT * P PERF PRINT,W1,W2,DEBIN5,=W'44',W6,W5
0x1efd3c…1efed0 Dummy {f00=0x0095, f01=0x0190, f02=»OVE STR64A,=' ' 'SPACES' & ! SET BOOL8 INDICATE PARTIAL PRINT EDRET J RET X PEND d P EJECT r P* < P* THIS ROUTINE PRINT ONE LINE ON THE LINE PRINTER. 4 P* THE FORMAT OF THE LINE IS DECIDED OF THE 6 P*
0x1efed0…1f0064 Dummy {f00=0x0095, f01=0x0190, f02=»DED OF THE PARAMETER z P* 'HEADER'. P* 6 B P* INPUT PARAMETERS: HEADER = HEADER FORMAT NUMBER @ > P* LINE = LINE FORMAT NUMBER > P* LINNO = ACTUAL LINE NUMBER L
0x1f0064…1f01f8 Dummy {f00=0x0095, f01=0x0190, f02=»UE Z P* F P* HLINES = NUMBER OF LINES IN HEADER 2 P* OUTPUT VARIABLE : DEBINW2= 0 OK ^ F P* (= 1 CLEAR-KEY, TRY AGAIN) : P* = 2
0x1f01f8…1f038c Dummy {f00=0x0095, f01=0x0190, f02=»NES b P PLIT LINMAX ( P MOVE DEBINW2,W0 CLEAR ERROR-SIGNAL P EJECT L 6 P CBNG LINNO,LINMAX,P30 JUMP IF LINMAX NOT REACHED Z PP10 . P EDWRT DEDSPRT,FRMTAB(HEADER) PRINT HEADER P BOK P20 JUMP IF OK " P B P35 JUMP IF CANC OR RET
0x1f038c…1f0520 Dummy {f00=0x0095, f01=0x018e, f02=»ADJUST FOR HEADLINES ~ PP30 2 P EDWRT DEDSPRT,FRMTAB(LINE) PRINT DETAIL-LINE ( P BOK P40 JUMP IF OK ^ PP35 z * P MOVE DEBINW4,W32 PRINTER NOT OPERABLE P ADD DEBINW4,W3 P PERF DERROR,DEKTAB6 " P B P99 JUMP IF CANC OR RET-KEY
0x1f0520…1f06b4 (1, 393) Dummy {f00=0x0096, f01=0x0190, f02=» * PFRMTAB FTABLE F21HL,F21DL,F22HL,F22DL P* 6 , P* PRINT FORMAT , FORMAT DEFINITION @ P* p PF21HL FRMT HEADER FORMAT z P FTEXT ' 1' P FCOPY ='FORMAT' P FILLR ':',1 P FCOPY FORMAT P FTAB 48 " P FTEXT
0x1f06b4…1f0848 Dummy {f00=0x0096, f01=0x018e, f02=»FDVBCD(W1) P FEOR 1ST HEADLINE P FILLR ' ',2 . P FEOR 2ND HEADLINE B P FILLR ' ',2 ^ P FCOPY ='LINE ' r P FCOPY ='FIELD' P FILLR '-',1 P FTEXT ' MAX/MIN ' & P FTEXT 'K M A V I DUPLIC. SPEC. ' P FTEXT '#L:<'
0x1f0848…1f09dc Dummy {f00=0x0096, f01=0x0190, f02=» x P FTEXT ' #A:' P FCOPY ='ACCUMULATION ' P FEOR 3RD HEADLINE > P FILLR ' ',2 Z P FTEXT ' NO NO/POS -' n P FCOPY ='LENGTH' & P FTEXT ' I E T E C -ITEM HANDL.' P FEOR 4TH HEADLINE P FILLR ' ',2 P FEOR 5TH
0x1f09dc…1f0b70 Dummy {f00=0x0096, f01=0x0190, f02=»E FORMAT z P FILLR ' ',2 P FBT BOOL8,F21DA $ P FTAB 4 < " P FMEL 'Z9',FDVBCD(W2) LINE-NR L P FILLR ' ',1 r " P FMEL 'XXX',FDVBCD(W4) FIELDNR P FILLR ' ',2 $ P FMEL 'Z9',FDVBCD(W5) FIELDSTART P FILLR ' ',2 $ P FMEL 'Z9',F
0x1f0b70…1f0d04 Dummy {f00=0x0096, f01=0x0190, f02=»T t P FILLR ' ',1 P FCOPY FDVSTR(W2) MUST ENTER P FILLR ' ',1 B P FCOPY FDVSTR(W3) AUTO.TAB V P FILLR ' ',1 x P FCOPY FDVSTR(W4) VERIFY P FILLR ' ',1 P FCOPY FDVSTR(W5) INIT CLEAR P FILLR ' ',1 P FCOPY DUPL DUPL
0x1f0d04…1f0e98 Dummy {f00=0x0096, f01=0x0190, f02=»AIL-LINE P FMEND P EJECT P* , 4 P* PRINT FORMAT , BALANCE FORMAT DEFINITION 6 P* n PF22HL FRMT HEADER FORMAT x P FTEXT ' 1' P FCOPY ='FORMAT' P FILLR ':',1 P FCOPY FORMAT P FTAB 40 " P FTEXT '
0x1f0e98…1f102c Dummy {f00=0x0096, f01=0x0190, f02=»VBCD(W1) P FEOR 1ST HEADLINE P FILLR ' ',2 , P FEOR 2ND HEADLINE @ P FILLR ' ',2 P FCOPY ='LINE ' p P FTEXT 'ACCUMULATOR ' P FTEXT 'POSITION ' P FCOPY ='LENGTH' P FTAB 40 P FTEXT 'SPECIAL ' P FTEXT
0x1f102c…1f11c0 Dummy {f00=0x0096, f01=0x018e, f02=»ION ' P FEOR 3RD HEADLINE P FILLR ' ',2 * P FCOPY =' NO' > P FTAB 11 T P FCOPY =' NO' d P FTAB 39 z P FTEXT 'HANDLING' P FEOR 4TH HEADLINE P FILLR ' ',2 P FEOR 5TH HEADLINE P FMEND P EJECT
0x1f11c0…1f1354 (1, 394) Dummy {f00=0x0096, f01=0x0190, f02=» P FBT BOOL8,F22DA P FTAB 4 " P FMEL 'Z9',FDVBCD(W2) LINE NR , P FTAB 12 R ( P FMEL 'XX',FDVBCD(W8) ACCUMULATOR NO b P FTAB 23 " P FMEL 'Z9',FDVBCD(W5) POSITION P FTAB 31 P FMEL 'Z9',FDVBCD(W6) LENGHT P FTAB 41 ( P
0x1f1354…1f14e8 Dummy {f00=0x0096, f01=0x4052, f02=» EJECT PFORMF FRMT P FTEXT ' 1' P FMEND 4 END B@ N FTAB 12 R ( P FMEL 'XX',FDVBCD(W8) ACCUMULATOR NO b P FTAB 23 " P FMEL 'Z9',FDVBCD(W5) POSITION P FTAB 31 P FMEL 'Z9',FDVBCD(W6) LENGHT P FTAB 41 ( P
0x1f14e8…1f167c Dummy {f00=0x0096, f01=0x2008, f02=» END @ FTAB 12 ( P FMEL 'XX',FDVBCD(W8) ACCUMULATOR NO * P FTAB 23 V " P FMEL 'Z9',FDVBCD(W5) POSITION f P FTAB 31 P FMEL 'Z9',FDVBCD(W6) LENGHT P FTAB 41 ( P FMEL 'ZZVZZ9',SPEC SPECIAL HANDLING PF22DA
0x1f167c…1f1810 Dummy {f00=0x0096, f01=0x2008, f02=» DE12UP LED DE1201 " !!RE 0,$$79-12-14$$80-02-05$$ ( !!IL 239 N MOVE DEINPUT,STR64A ^ !!IL 241 z MOVE STR64A,DEINPUT !!EN TRA /S,NL ASG /E0,TY10 R ASG /E0,TY10 !!EN TRA /S,NL
0x1f1810…1f19a4 Dummy {f00=0x0096, f01=0x0190, f02=»N2,BIN1 SAVE KEYED INPUT P DIV BIN1,W8 . P XCOPY DEBINW4,W0,W2,PROGNR,BIN1 PROGRAMNR 4 P MUL BIN1,W8 f P SUB BIN2,BIN1 z . P CALL TESTB,DEBINW4,BIN2 LOOK IF EXISTING P BZ DEAPRERR JUMP IF NOT P MOVE BIN1,W0 & P CALL UPDBOL,BIN
0x1f19a4…1f1b38 Dummy {f00=0x0096, f01=0x0190, f02=»,BCD13A P PERF DEPMSK PDEAENKEY $ P MOVE DEBINW3,W0 4 P MOVE DEBINW2,W17 L P B DEAOK0 f PDEAPRERR x P MOVE DEBINW4,W7 P B DEANOK P* P* $ P ATTFMT FORMN DUMMY INSTRUCTION P ATTFMT FORMA - " -
0x1f1b38…1f1ccc Dummy {f00=0x0096, f01=0x018e, f02=» j & P MOVE DEBINW4,BCD2A UNIT NUMBER IS P CBG DEBINW4,W8,DEAUN2 2 P CBE DEBINW4,W0,DEAUN2 P P MOVE FILINDUS,DEBINW4 n P ADD FILINDUS,W1 P ADD DEBINW4,=X'D0' 2 P MOVE FILECODE(FILINDUS),DEBINW4 SAVE FILECODE P CBG DEBINW4,=X'D4
0x1f1ccc…1f1e60 Dummy {f00=0x0096, f01=0x0190, f02=» h PDEAUN3 & P CBE FCOUNTER(FILINDUS),W0,DEAUN0 P ERASE 1,W2,W2 @ " P MOVE TABLE,FVOLNAME(FILINDUS) V P B DEAUN5 | PDEAUN0 . P CALL CHANFC,DISK,DEBINW4 CHANGE FILECODE : P CALL GETVOL,DISK,RBUF,STRG10A,DEBINW4 GET VOLUMENAME
0x1f1e60…1f1ff4 (1, 395) Opaque[0x194]
0x1f1ff4…1f2188 # DirEnt {nam=»DECVRT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x12d0, f03=0x0000}
0x1f1ff4…1f2188 IdxSect {
0x1f1ff4…1f2188 f00 = 0x0096 // 0x1f1ff4 @0x0
0x1f1ff4…1f2188 f01 = 0x000c // 0x1f1ff6 @0x2
0x1f1ff4…1f2188 gno = [ // 0x1f1ff8 @0x4
0x1f1ff4…1f2188 [0x00]: C0x0096.0x2.0
0x1f1ff4…1f2188 [0x01]: C0x0096.0x3.0
0x1f1ff4…1f2188 [0x02]: C0x0097.0x0.0
0x1f1ff4…1f2188 [0x03]: C0x0097.0x1.0
0x1f1ff4…1f2188 [0x04]: C0x0097.0x2.0
0x1f1ff4…1f2188 [0x05]: C0x0097.0x3.0
0x1f1ff4…1f2188 ]
0x1f1ff4…1f2188 }
0x1f2188…1f231c Dummy {f00=0x0096, f01=0x0190, f02=» $ P IDENT DECVRT REL 10.0 80-04-11 P 80-10-28/JAER , * D @ <* THIS PROGRAM-MODUL CONTAINS ENTRIES TO THE DIFFERENT N < 8* CONVERTIONS THAT OCCURS IN THE FORMAT GENERATION * DDUM DEDDIV PDIV P* $
0x1f231c…1f24b0 Dummy {f00=0x0096, f01=0x0190, f02=»ERT VARIABLE NUMBER (INDEX) TO BINARY P* . F P* INPUT PARAMETERS (FORMAL): WSTRG = WORKSTRING VAL/GEN/ACC 8 J P* CHNUM = NUMBER OF INPUT CHARACTERS L P* WIND = INDEX TO COR
0x1f24b0…1f2644 Dummy {f00=0x0096, f01=0x0190, f02=»RSTRIN N J P* DEBIN4 = POINTER INPUTBUFFER WSTRG J P* DEBIN5 = NUMB OF DELETED CHARACTERS P* H P* WORKITEMS : DEBIN2 = LENGTH OF LITERAL STRING J P*
0x1f2644…1f27d8 Dummy {f00=0x0096, f01=0x0190, f02=» N J P* BIN16 = MATCHING-POINTER 'VALSTR' < P* DEINPUT = WORK BUFFER V @ P* WORK(W5) = SAVED (-POSITION @ P* WORK(W6) = SA
0x1f27d8…1f296c Dummy {f00=0x0096, f01=0x0190, f02=»M = EFFEKTIV VAL-/GEN-/ACC-LENTH n L P* WSTRG = VAL-/GEN-/ACC-STRING CONVERT . P* ~ F P* DEBIN4 = POINTER WSTRG ADJUSTED L P* FBIN2 = HIGHEST FI
0x1f296c…1f2b00 Dummy {f00=0x0096, f01=0x0190, f02=»G,CHNUM(),WIND , P MOVE BIN15,=W'31' LOAD LENGTH OF VALSTR " P CBE WIND,W4,CN00 JUMP IF DUPL F ( P DLETE WSTRG,DEBIN4,W3 DELETE '#X:' l 0 P SUB CHNUM(WIND),W3 ADJUST FOR FUNCTION TEXT 0 P ADD DEBIN5,W3 ADD NUMB OF DLETED CHARACTERS P EJECT
0x1f2b00…1f2c94 (1, 396) Dummy {f00=0x0096, f01=0x0190, f02=»1 h ( P CBE BIN16,W23,CNCL JUMP IF LITERAL P ADD DEBIN4,W1 NEXT POS 6 " P CBE BIN16,W0,CNCM JUMP IF 'M' V ( P IB BIN16,CNC0,CNC0,CNC0,CNC0, 1-4 C | & P CNC3,CNC2,CNC0,CNCA,CNC2, 5-9 C ( P CNC1,CNC3,CNC2,CNC2,CNC0, 10-14 C ( P CNC0,CNC
0x1f2c94…1f2e28 Dummy {f00=0x0096, f01=0x0190, f02=» P B CNC0 * PCNCM M=MESSAGE SPLIT,R/N=CONDFRM CH , P MOVE DEBIN3,DEBIN4 LOAD ACTUAL POSITION B 0 P MATCH WSTRG,DEBIN3,W1,VALSTR,W23,W1 M'...' r P BNOK CNC2 M99 P B CNCL P EJECT P* P* CNC0 NO CONVERTION P*
0x1f2e28…1f2fbc Dummy {f00=0x0096, f01=0x0190, f02=»C1 CONVERT 1 BYTE TO BINARY P* $ PCNC1 . & P MOVE DEBIN3,W5 STARTPOS WORKITEM : * P PERF CONV,WSTRG,W1 CONVERT TO BINARY d 0 P SUB CHNUM(WIND),DEBIN3 ADJUST END POSITION P B CNC0 CHECK END-OF-LINE P EJECT P* 0 P*
0x1f2fbc…1f3150 Dummy {f00=0x0096, f01=0x0190, f02=»OS WORKITEM z * P PERF CONV,WSTRG,W2 CONVERT TO BINARY 0 P SUB CHNUM(WIND),DEBIN3 ADJUST END POSITION B ( P CBNE BIN16,W12,CNC0 JUMP IF NOT 'T' v < P CBE DEBIN4,CHNUM(WIND),CNOKLB JUMP IF END OF LINE FOUND ( P MOVE DEBIN3,DEBIN4 LOAD WORKPOINTER
0x1f3150…1f32e4 Dummy {f00=0x0096, f01=0x0190, f02=»OS WORKITEM z * P PERF CONV,WSTRG,W2 CONVERT TO BINARY 0 P SUB CHNUM(WIND),DEBIN3 ADJUST END POSITION B P B CNC0 CHECK END-OF-LINE v PCNOKLB P B CNOK P EJECT P* : P* CNC3 CONVERTION OF 3 BYTES TO BINARY -D,-F,-G
0x1f32e4…1f3478 Dummy {f00=0x0096, f01=0x0190, f02=»* 2 P* CHECK IF RELATIVE SIGN + = /FF - = /FE P* @ * P MOVE DEBIN3,W15 STARTPOS IN VALSTRING J 6 P MATCH VALSTR,DEBIN3,W2,WSTRG,DEBIN4,W1 REL SIGN ? x " P BNOK CNC3Z NO REL SIGN FOUND P SUB DEBIN3,W15 ADJUST , P MOVE STR2A,=X'FFF
0x1f3478…1f360c Dummy {f00=0x0096, f01=0x0190, f02=» WORKITEM x * P PERF CONV,WSTRG,W2 CONVERT TO BINARY ( P ADD DEBIN2,BIN10 GET DIRECT REF.NO @ P B CNC3X l PCNC3Z | & P MOVE DEBIN3,W3 STARTPOS WORKITEM * P PERF CONV,WSTRG,W3 CONVERT TO BINARY PCNC3X 0 P SUB CHNUM(WIND),DEBIN3
0x1f360c…1f37a0 Dummy {f00=0x0096, f01=0x0190, f02=». NO. d PCNC3B P B CNC0 CHECK END-OF-LINE P EJECT > P* L $ P* CNCL CONVERT TO LITERAL V P* ~ PCNCL ( P MOVE DEBIN2,CHNUM(WIND) SAVE ENDPOS P ADD DEBIN4,W1 NEXT POS , P SUB DEBIN2,DEBIN4 NUMB OF CHRS TO MATCH
0x1f37a0…1f3934 (1, 397) Dummy {f00=0x0097, f01=0x0190, f02=»MB OF LIT-CHARS z " P MOVE DEBIN2,W128 1ST BIT = 1 * P ADD DEBIN2,DEBIN3 +LENGTH OF LITERAL > 0 P SUB DEBIN4,W1 ADJUST FOR OVERWRITE POSITION l 4 P XCOPY WSTRG,DEBIN4,W1,DEBIN2,W1 'L'='80'+LENGTH & P ADD DEBIN4,DEBIN3 ADJUST NEXT POS P ADD D
0x1f3934…1f3ac8 Dummy {f00=0x0097, f01=0x018e, f02=»IN5,W1 NUMB OF DELETED CHARCTERS P B CNC0 GO ON ( P* > 6 P* CNCA CONVERT FOR CONDITIONAL ACCUMULATION H P* PCNCA 'A'-FOUND & P MOVE DEBIN3,DEBIN4 SAVE CURR POS , P MATCH WSTRG,DEBIN3,W1,VALSTR,W29,W1 (-? ( P BNOK CNC2
0x1f3ac8…1f3c5c Dummy {f00=0x0097, f01=0x0190, f02=» ^ P* PCNCG 'G'-FOUND & P CBNE WIND,W2,CNC3 JUMP IF NOT GEN * PCNCX T ( P SUB DEBIN4,W1 ADJUST FOR CONVERTION ` , P XCOPY WSTRG,DEBIN4,W1,VALSTR,W0 G/A=>M P ADD DEBIN4,W1 NEXT POS $ P MOVE WORK(W8),DEBIN4 SAVE (-POS ( P MOV
0x1f3c5c…1f3df0 Dummy {f00=0x0097, f01=0x0190, f02=» MOVE BIN16,=W'30' . P MATCH WSTRG,DEBIN3,DEBIN2,VALSTR,BIN16,W1 $ P MOVE WORK(W9),DEBIN3 SAVE)-POS L P ADD DEBIN4,W1 NEXT POS t * P SUB DEBIN3,DEBIN4 =NUMB OF LIT CHARS , P MOVE WORK(W7),DEBIN3 SAVE (...)-LENGTH P B CNC0 GO ON P
0x1f3df0…1f3f84 Dummy {f00=0x0097, f01=0x0190, f02=»UB WORK(W9),DEBIN4 =DIFFERENCE ( P SUB WORK(W7),WORK(W9) =REAL LENGTH & " P ADD WORK(W7),W128 1ST BIT = 1 R 6 P XCOPY WSTRG,WORK(W8),W1,WORK(W7),W1 (...)-LENGTH x * P DLETE WSTRG,DEBIN4,W1 DELETE )-CHARS & P SUB CHNUM(WIND),W1 ADJUST ENDPOS ,
0x1f3f84…1f4118 Dummy {f00=0x0097, f01=0x0190, f02=»ION j , P SUB BIN15,DEBIN1 SUBTRACT STARTPOSITION 0 P MOVE CHNUM(WIND),BIN15 GIVING NUMB OF CHARS < P RET p P PEND | P EJECT P* 8 P* CONVERTS NUMERIC STRINGCHARACTERS TO BINARY P* J P* INPUT VARIABLES : NUMB(
0x1f4118…1f42ac Dummy {f00=0x0097, f01=0x0190, f02=» WSTRG = ACTUAL WORKSTRING VAL/GEN OR ACC P* B H P* WORK ITEMS : DEBIN2 = CONVERTED NUMERIC VALUE BINARY L D P* BCD13A = CONVERTED NUMERIC VALUE BCD < P* STR6A = NUM
0x1f42ac…1f4440 Dummy {f00=0x0097, f01=0x0190, f02=»B OF DELETED CHARS h L P* WSTRG = WORKBUFFER WITH CONVERTED CHARACTER > P* DEBIN3 = NUMB OF DELETED CHARS j H P* DEBIN2 = CONVERTED NUMERIC VALUE BINARY P* L P******
0x1f4440…1f45d4 (1, 398) Dummy {f00=0x0097, f01=0x0190, f02=»IN4 COPY STRGNUM n $ P MOVE BCD13A,STR6A LOAD STR=>BCD & P MOVE DEBIN2,BCD13A LOAD BCD=>BIN @ 6 P XCOPY WSTRG,DEBIN4,W1,DEBIN2,W1 LOAD VARNR BINARY j 4 P MOVE DEBIN3,NUMB STORE NUMB CONVRTD CHARACTERS P SUB DEBIN3,W1 P ADD DEBIN4,W1 NEXT PO
0x1f45d4…1f4768 Dummy {f00=0x0097, f01=0x0190, f02=» P* 6 P* THIS ROUTINE CONVERTS BINARY NUMERICALS TO * P* ALPHANUMERIC STRING CHARACTERS L P* z D P* FORMAL PARAMETER : WSTRG = JOBSPC (VALIDATION STRING) D P* = DUPL (DUPLICATION STR
0x1f4768…1f48fc Dummy {f00=0x0097, f01=0x0190, f02=» = 3 = ACCUMULATION 8 P* = 4 = DUPLICATION 4 P* p < P* INPUT VARIABLES : BIN15 = LENGTH OF FUNC-CODE z : P* DEBIN3 = POINTER TO WSTRG H P*
0x1f48fc…1f4a90 Dummy {f00=0x0097, f01=0x0190, f02=» DEBIN1 = WORK L P* DEBIN2 = LENGTH OF MATCHSTRING (VALSTR = 31) , : P* DEBIN4 = BINARY NUMERICALS | B P* FBIN1 = CHECK END OF OF FUNC-CODE F P*
0x1f4a90…1f4c24 Dummy {f00=0x0097, f01=0x0190, f02=» BIN15 = ADJUSTED ACCORDING TO CONVERTED 2 P* CHARACTERS F J P* CURSEC= ADJUSTED WITH INPUT VALUE OF BIN15 | P* L P****************************************************
0x1f4c24…1f4db8 Dummy {f00=0x0097, f01=0x0190, f02=»ORKSTRING Z . P MOVE DEBIN2,=W'31' LOAD LENGTH OF VALSTR & P ADD CURSEC,BIN15 ADJUST FOR CHARS D " P CBE OPT,W4,BN00 JUMP IF DUPL n & P ADD BIN15,W3 ADJUST FOR FUNC.TEXT * P CLEAR BOOL4 F=NO CONDITIONAL GEN/ACC PBN00 & P MOVE BIN16,W0 M
0x1f4db8…1f4f4c Dummy {f00=0x0097, f01=0x0190, f02=» CBE BIN16,W0,BNME JUMP IF MESSAGE ( P IB BIN16,BNC0,BNC0,BNC0,BNC0, 1-4 C * & P BNC3,BNC2,BNC0,BNC2,BNC2, 5-9 C V ( P BNC1,BNC3,BNC2,BNC2,BNC0, 10-14 C ( P BNC0,BNC0,BNC0,BNC0,BNC0, 15-19 C ( P BNC0,BNC0,BNC0,BNCR,BNC0, 20-24 C P BN
0x1f4f4c…1f50e0 Dummy {f00=0x0097, f01=0x0190, f02=»YTE j * P CBG DEBIN4,W128,BNCL JUMP IF LITERAL P B BNCR RETUR : P* P 6 P* CHECK MESSAGE TYPE AND CONDITIONAL GEN/ACC Z P* PBNME P IB OPT,BNMS,BNMG,BNMA PBNMS P ADD DEBIN3,W1 NEXT POS * P ADD FBIN1,W1 ADJUST
0x1f50e0…1f5274 (1, 399) Dummy {f00=0x0097, f01=0x0190, f02=»EBIN3,W1 ADJUST FOR 2CHAR-CONVERTION * P SUB FBIN1,W1 ADJUST NUMB OF CONVERTED , P B BNC2 M99 Z P EJECT n P* | P* CONVERT 1 CHARACTER P* PBNC1 , P PERF CONBIN,WSTRG,W1 CONVERT BIN=>STRG P* P* CONVE
0x1f5274…1f5408 Dummy {f00=0x0097, f01=0x0190, f02=»A JUMP IF NO COND GEN/ACC 6 P CBNE WORK(W7),DEBIN3,BNCA JUMP IF ENDPOS OF COND " P MOVE DEBIN1,=W'30' 2 P INSRT WSTRG,DEBIN3,W1,VALSTR,DEBIN1 INSERT ) x P ADD DEBIN3,W1 NEXT POS , P ADD FBIN1,W1 ADJUST NUMBER OF CONVERTED P ADD BIN15
0x1f5408…1f559c Dummy {f00=0x0097, f01=0x0190, f02=»GO ON P EJECT P* " P* CONVERT 2 CHARACTERS & P* L PBNC2 V , P PERF CONBIN,WSTRG,W2 CONVERT BIN=>STRG b ( P CBNE BIN16,W12,BNC0 JUMP IF NOT 'T' P ADD DEBIN3,W1 NEXT POS * P ADD FBIN1,W1 ADJUST NUMB OF CONVERTED
0x1f559c…1f5730 Dummy {f00=0x0097, f01=0x0190, f02=» " P BNOK BN00 GO MATCH CHARACTER ! , P PERF CONBIN,WSTRG,W2 CONVERT BIN=>STRG ! * P B BNC0 ! Z P* ! j P* CONVERT 3 CHARACTERS ! t P* ! PBNC3 ! ( P CBNE BIN16,W5,BNC3A JUMP IF NOT (D) ! , P CBE BIN15,W1,BNC0 JUMP IF 1 CH =D=DATUM !
0x1f5730…1f58c4 Dummy {f00=0x0097, f01=0x0190, f02=» ! l > P MATCH STR2A,DEBIN1,W2,WSTRG,DEBIN3,W1 LOOK FOR REL SIGNS " " P BNOK BNC3B NO REL SIGNS FOUND " J . P ADD DEBIN1,W15 ADJUST FOR VALSTRPOSITION " p @ P XCOPY WSTRG,DEBIN3,W1,VALSTR,DEBIN1 CONVERT TO SOURCE-SIGN " * P ADD FBIN1,W1 ADJUST NUMB OF CONVE
0x1f58c4…1f5a58 Dummy {f00=0x0097, f01=0x018e, f02=»BIN=>STRG " r P B BNC0 # P EJECT # " P* # 0 , P* CONVERT LITERAL (INSERT '....') # : P* # j PBNCL # t * P SUB DEBIN4,W128 GET LENGTH OF LITERAL # 2 P XCOPY WSTRG,DEBIN3,W1,VALSTR,W23 INSERT 1ST ' # 0 P ADD DEBIN3,DEBIN4 ADJUST BUFPOS WIT
0x1f5a58…1f5bec Dummy {f00=0x0097, f01=0x0190, f02=» # h 2 P INSRT WSTRG,DEBIN3,W1,VALSTR,W23 INSERT 2ND ' $ P ADD BIN15,W1 ADJUST LENGTH $ > , P TBF BOOL4,BNC0 GO ON IF NO COND GEN ACC $ b 4 P ADD WORK(W7),W1 ADJUST ENDPOS FOR COND GEN/ACC $ P B BNC0 $ P EJECT $ PBNMG COND GEN FOUND $ P M
0x1f5bec…1f5d80 Dummy {f00=0x0097, f01=0x0190, f02=»BIN1 CONVERT M=>G/A $ p P ADD DEBIN3,W1 NEXT POS % & P ADD FBIN1,W1 ADJUST NUMB OF CONV % < & P MOVE WORK(W7),W0 (...)-LENGTH:=0 % f & P XCOPY WORK(W7),W1,W1,WSTRG,DEBIN3 % 2 P SUB WORK(W7),W128 GET LENGTH 0F (...)-STRING % 4 P XCOPY WSTRG,DEBIN3,W1,V
0x1f5d80…1f5f14 (1, 400) Dummy {f00=0x0097, f01=0x0190, f02=»ONAL GEN/ACC FOUND % | P B BNC0 GO ON & PBNCR & 0 P RET & < P PEND & H P EJECT & V P* & d B P* CONVERT BINARY NUMERICALS ,FROM ACTUAL POINT IN BUFFER & n @ P* TO ALPHANUMERIC CHARACTER STRING. AND COPIES IT INTO & ( P* THE SAME
0x1f5f14…1f60a8 Dummy {f00=0x0097, f01=0x0190, f02=»**************************************************************** & PCONBIN PROC WSTRG,FIND ' H P ADD DEBIN3,W1 NEXT POS ' f 0 P XCOPY DEBIN4,W1,W1,WSTRG,DEBIN3 COPY BINNUM ' & P MOVE BCD13A,DEBIN4 LOAD BIN=>BCD ' P MOVE DEBIN1,W0 ZEROISE ' 2 P EDS
0x1f60a8…1f623c Dummy {f00=0x0097, f01=0x0190, f02=»,W0 INSERT STRG-CHARACTERS ' p P SUB DEBIN1,W1 ADJUST ( " $ P ADD BIN15,DEBIN1 ADJUST LENGTH ( @ $ P ADD DEBIN3,DEBIN1 ADJUST BUFPOS ( h . P ADD FBIN1,DEBIN1 ADJUST NUMB OF CONVERTED ( * P ADD FBIN1,W1 ADJUST NUMB OF CONVERTED ( . P TBF BOOL4,CONRET GO ON
0x1f623c…1f63d0 Dummy {f00=0x0097, f01=0x40de, f02=»V FTABLE CONV1,CONV2,CONV3 ( PCONV1 FRMT ) " P FMEL '9',BCD13A ) 4 P FMEND ) L PCONV2 FRMT ) Z P FMEL '99',BCD13A ) l P FMEND ) PCONV3 FRMT ) P FMEL '999',BCD13A ) P FMEND ) END ) @ ) CONVERTED ( . P TBF BOOL4,CONRET GO ON
0x1f63d0…1f6564 Dummy {f00=0x0097, f01=0x2008, f02=» * % r . P TBF BOOL4,CONRET GO ON IF NO COND GEN ACC & 0 P ADD WORK(W7),DEBIN1 ADJUST ENDPOS OF (...) & B PCONRET & v P RET & P PEND & P EJECT & " PFCONV FTABLE CONV1,CONV2,CONV3 & PCONV1 FRMT & P FMEL '9',BCD13A & P FMEND &
0x1f6564…1f66f8 Dummy {f00=0x0097, f01=0x0190, f02=» & V D ! P $ * | T:TINP + T:TKI + 0 , ( u ! P %_ : V + B , ( Y " X .9H $ P + r , ( & X ( " Q Y +Q R " P W + I:ER16 + , ( " U Y , " Q "
0x1f66f8…1f688c Dummy {f00=0x0097, f01=0x0190, f02=» P + t , ( I W X ! X $" P Q X (# P X , , ( i # :! R W T @ Y ( , D T:ENIN , t T:ENI , I:EXIT , , ( W Y , W Y ( , , ( : X *:h X (! # P X & V , , (
0x1f688c…1f6a20 Dummy {f00=0x0097, f01=0x0190, f02=» , h , ( # P Y (_ P P Y - T:WRDY - 8 , ( C 8 & X 8 X $ W _ - J , ( a " P X ( T X & V H "@T - z , ( P V Y X (P - T:CLMI - , ( X (
0x1f6a20…1f6bb4 (1, 401) Opaque[0x194]
0x1f6bb4…1f6d48 # DirEnt {nam=»DENVAL«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1300, f03=0x0000}
0x1f6bb4…1f6d48 IdxSect {
0x1f6bb4…1f6d48 f00 = 0x0098 // 0x1f6bb4 @0x0
0x1f6bb4…1f6d48 f01 = 0x000e // 0x1f6bb6 @0x2
0x1f6bb4…1f6d48 gno = [ // 0x1f6bb8 @0x4
0x1f6bb4…1f6d48 [0x00]: C0x0098.0x0.0
0x1f6bb4…1f6d48 [0x01]: C0x0098.0x1.0
0x1f6bb4…1f6d48 [0x02]: C0x0098.0x2.0
0x1f6bb4…1f6d48 [0x03]: C0x0098.0x3.0
0x1f6bb4…1f6d48 [0x04]: C0x0099.0x0.0
0x1f6bb4…1f6d48 [0x05]: C0x0099.0x1.0
0x1f6bb4…1f6d48 [0x06]: C0x0099.0x2.0
0x1f6bb4…1f6d48 ]
0x1f6bb4…1f6d48 }
0x1f6d48…1f6edc Dummy {f00=0x0098, f01=0x0190, f02=» $ P IDENT DENVAL REL 10.0 80-04-11 P UPD-11-17/DALI , P UPD 80-10-28/DALI F P UPD 80-10-21/DALI b P UPD 80-08-22/DALI ~ P UPD 80-06-28/DALI P UPD 80-04-29/DALI P UPD 80-04-24/DALI P DDUM DEDDIV P PDIV
0x1f6edc…1f7070 Dummy {f00=0x0098, f01=0x0190, f02=»IDATION- x P STRING FOR CURRENT FIELD ( P EXT DECOMP USER OR STANDARDROUTINE 4 P TO VALIDATE CURRENT INPUT ` . P EXT EMPTYT ASSEMBLY SUBROUTINE EMPTYT - " P TEST IF DATA ITEM IS EMPTY * P EXT CLEARB CLEAR A BIT IN A BIN ITEM &
0x1f7070…1f7204 Dummy {f00=0x0098, f01=0x0190, f02=»DB ASSEMBLY SUBROUTINE ATTDB - P ATTACH DESCRIPTORBLOCK & * P EXT ATTWB ASSEMBLY SUBROUTINE ATTWB - H P ATTACH WORKBLOCK v & P EXT DEPOOL POOL HANDLING ROUTINE $ P EXT DEFIND FIELD INDEX ROUTINE ( P EXT DEAPPU USER-CODED APPL-HANDLING
0x1f7204…1f7398 Dummy {f00=0x0098, f01=0x0190, f02=» MEANING THAT EMPTY P COMPULSURY FIELDS IS P FOUND,WILL "NOT" BE < P INDICATED Z , P EXT ADJUST ASSEMBLY SUBROUTINE ADJUST - n " P ADJUST FORMATPOINTERS AFTER P EXECUTION OF GETFWD P EXT GETIND P EXT CMPIND
0x1f7398…1f752c Dummy {f00=0x0098, f01=0x0190, f02=» P* 4 P* DOOL1= NOT FLAG > P* DOOL2= INSERTION OF RECORD F 6 P* DOOL3= ENTRY MODE @ P* DOOL4= GETFLD TO OTHER FIELD B P*
0x1f752c…1f76c0 Dummy {f00=0x0098, f01=0x0190, f02=» DOOL6= ABSOLUTE VALUE F P* DOOL7= NOT CURRENT ITEM IN DEINPUT 8 B P* DOOL8= BATCHHEAD FOR NEW BATCH 6 P* BIN11= POOLINDEX : P*
0x1f76c0…1f7854 (1, 402) Dummy {f00=0x0098, f01=0x0190, f02=» BIN14= CONDITIONAL TAB.-FIELD ~ < P* (NEXT FIELD) 8 PDENVAL PROC FC x P MOVE BIN8,W0 " P MOVE BIN3,W0 USED AS POINTER P TO ERRORMESSAGE . P CLEAR BOOL4 F=NO RECORD CHANGE FOUN
0x1f7854…1f79e8 Dummy {f00=0x0098, f01=0x0190, f02=»OVE DEBINW4,W2 & P GETABX BIN8 SAVE CURRENT FIELD.NR . P CBNE DEBINW1,W0,DENV10 KEYINPUTLENGTH = 0 @ , P PERF DEEDIT,W3 PUT FMTITEM INTO DEINPUT r P B DENV20 PDENV10 & P TBF DOOL5,DENV30 JUMP IF NOT DUPL PDENV20 & P MOVE WORK(W5)
0x1f79e8…1f7b7c Dummy {f00=0x0098, f01=0x018e, f02=»DEACCU C P DENV50 DEGENE , P GETCTL 0,DEBINW3 GET APPL-VALUE;DENTER ( ( P CBE DEBINW3,W0,DENV50 NO APPL-VALUE X ( P PERF DEAPPU USERCODED APPL-HANDLING $ P IB DEBINW3,DENV45 UPDFLD = 1 C P UPDR40 SET CURSOR C P DENV42 ERROR PRI
0x1f7b7c…1f7d10 Dummy {f00=0x0098, f01=0x0190, f02=» z P SET REWRT PDENV50 ( P MOVE BIN4,DEBINW1 SAVE INPUTLENGTH ( * P MOVE STATSH,DEINPUT SAVE KEYED INPUT T " P MOVE BIN2,BIN8 SAVE TAB.INDEX P EJECT P* P* EXECUTE VALIDATION P* PUPDV0A P ADD BIN13,BIN12
0x1f7d10…1f7ea4 Dummy {f00=0x0098, f01=0x0190, f02=» P MOVE STR64A,='M/=><DGRN' P MOVE BIN5,W0 * 0 P MATCH STR64A,BIN5,W9,BPOOL(BIN11),BIN12,W1 @ P BOK UPDV16 t P CLEAR DOOL7 P BNZ DECOMT NOT OKEY P MOVE STR64A,='ASUFFFX' P MOVE BIN9,W0 0 P MATCH STR64A,BIN9,W7,BPOO
0x1f7ea4…1f8038 Dummy {f00=0x0098, f01=0x0190, f02=»JUMP IF X | P PERF DEFIND,BIN8,BIN10 P ADD BIN12,W1 2 P CLEAR ALPHA F=ALPHATEST H P CBE BIN8,W0,UPDV04 h PUPDV05 P PERF DEEDIT,BIN9 P B UPDV06 PUPDV04 $ P MOVE BIN8,BIN2 CURRENT TABINDEX PUPDV06 0 P IB BI
0x1f8038…1f81cc Dummy {f00=0x0098, f01=0x0190, f02=»SEU1,X.PSEU2,X.WB10,BIN8 | * P CBE BIN7,W3,UPDV01 JUMP IF ALPHA STRG PUPDV09 N P SET ALPHA T=BCD-NUM P B UPDV01 x PUPDV16 2 P IB BIN5,UPDV20,UPDV30,UPDV30,UPDV30,UPDV25 C P UPDGOT,UPDFOR,UPDFON PUPDE00 HHANDLE ERRORCODE
0x1f81cc…1f8360 Dummy {f00=0x0098, f01=0x018e, f02=»W0,W1,BIN11,W1 SAVE POOLINDEX P CBL DEBINW4,W128,UPDE10 & P MOVE BIN9,=X'3F' F P CALL MSKOUT,BIN9,DEBINW4 ` P ADD BIN12,BIN9 PUPDE10 P ADD BIN12,W1 P CBL BIN12,BIN13,UPDV01 & P B DECERR JUMP IF END OF VALSTRING P
0x1f8360…1f84f4 (1, 403) Dummy {f00=0x0098, f01=0x0190, f02=» P BNZ DECERR P PERF DEFIND,BIN8,BIN9 P GETFLD 0,BIN8,BIN9 : P MOVE WORK(W6),BIN11 V P MOVE WORK(W7),BIN12 r P MOVE WORK(W8),BIN13 , P CALL GETVAL,BPOOL(W1),BIN11,BIN12,BIN13 P BNOK DECERR P B UPDV0A P* $
0x1f84f4…1f8688 Dummy {f00=0x0098, f01=0x0190, f02=»'+-*:' P MOVE BCDI21(W1),=D'0' 0 P MATCH STR64A,BIN6,W4,BPOOL(BIN11),BIN12,W1 , P BOK UPDV35 ` ( P MOVE BIN6,W0 IF ARITHMETIC SIGN IS t " P B UPDV37 OMITTED + IS ASSUMED PUPDV35 " P ADD BIN12,W1 INCREASE POINTER PUPDV37 P
0x1f8688…1f881c Dummy {f00=0x0098, f01=0x0190, f02=»N9,W10 STRING-COMPARISION P B UPDV60 " PUPDV50 4 P ADD BIN12,W1 ADJUST POINTER B P CBNL BIN9,W8,UPDV65 f PUPDV60 P PERF DEFIND,BIN8,BIN10 P ADD BIN12,W1 ADJUST POINTER PUPDV65 @ P IB BIN9,UPDABS,UPDACC,UPDSYS,UPDUSE,U
0x1f881c…1f89b0 Dummy {f00=0x0098, f01=0x0190, f02=» PUPDABS P SET DOOL6 P B UPDE10 ( P* : PUPDACC HANDLE ACCUMULATOR D P CALL CMPIND,BIN8,ACK(W1) h P BNOK DECERR OUT OF RANGE P MOVE BCDI21(W2),ACK(BIN8) P B UPDN50 P EJECT P* " PUPDSYS HANDLE
0x1f89b0…1f8b44 Dummy {f00=0x0098, f01=0x0190, f02=» r P TSTCTL 0 LOOK IF ALPHA P BZ UPDS30 JUMP IF BCD ( P B UPDS03 F PUPDS01 X & P TBT ALPHA,UPDS30 JUMP IF BCD-NUM f PUPDS03 P IB BIN9,UPDS05 & P CALL GETIND,SYSV(W1),BIN15,BIN10 P B UPDS10 PUPDS05 6 P CALL GE
0x1f8b44…1f8cd8 Dummy {f00=0x0098, f01=0x018e, f02=» P MOVE BIN10,W0 P IB BIN9,UPDS15 2 P MATCH DEINPUT,BIN10,BIN15,SYSV(BIN8),W0,BIN15 2 P B UPDS20 h PUPDS15 z 2 P MATCH DEINPUT,BIN10,BIN15,USEV(BIN8),W0,BIN15 PUPDS20 P BOK DECEGL P B DECNOT PUPDS30 P IB BIN9
0x1f8cd8…1f8e6c Dummy {f00=0x0098, f01=0x0190, f02=» PUPDS50 P CALL CMPIND,BIN8,USEV(W1) P BNOK DECERR OUT OF RANGE 4 P MOVE BCDI21(W2),USEV(BIN8) V P B UPDN50 z P EJECT P* ( PUPDFLD HANDLE FIELD WITHIN FORMAT P* & P CBNE BIN8,W0,UPDF10 CURRENT FIELD ( P MOV
0x1f8e6c…1f9000 Dummy {f00=0x0098, f01=0x0190, f02=»F NOT ALPHA t P GETCTL 1,BIN10 GET MAXL P SET DOOL4 4 P MOVE BIN7,W0 F P CON X.MATCH,X.PSEU1,X.PSEU2 P CON X.WB10,BIN8 P CON BIN7,BIN10,HEX00,W0,W1 P CMP DEBINW1,BIN7 P BNE DECNOT INVALID LENGTH P MOVE BIN10,W0
0x1f9000…1f9194 (1, 404) Dummy {f00=0x0098, f01=0x018e, f02=»ECNOT PUPDF40 NUMERIC * P CON X.MOVE,BCDI21(W2),X.PSEU1,X.PSEU2 & P CON X.WB10,BIN8 T P B UPDN50 l P* ~ P EJECT PUPDSET HANDLE VALUESET P CMP BIN5,W0 P BNZ DECERR & P MOVE VSEIND,W0 VALUE-SET INDEX:=0 P
0x1f9194…1f9328 Dummy {f00=0x0098, f01=0x0190, f02=» d P BOK UPDSET05 P MOVE BIN9,W0 P MOVE ELMNO,W1 4 P B UPDSET07 J PUPDSET05 ^ P ADD BIN12,W1 n ( P XCOPY BIN9,W1,W1,BPOOL(BIN11),BIN12 P ADD BIN12,W1 P MOVE ELMNO,BIN9 PUPDSET07 P MOVE TABLE,BCD3A P
0x1f9328…1f94bc Dummy {f00=0x0098, f01=0x0190, f02=» P PERF DEDISC,W24 GET VALUSET P BOK UPDSET20 ( P CBE PINDTB,W0,UPDSET18 > PUPDSET15 ^ ( P PERF DEPOOL,W6,PINDTB,BIN10,STRG10A n PUPDSET18 P CMP W0,W1 P B DECO05 PUPDSET20 P MOVE BIN15,W0 WORK:=0 $ P CALL ATTWB,
0x1f94bc…1f9650 Dummy {f00=0x0098, f01=0x0190, f02=»(PINDTB),W18 STORE ENDINDEX OF POOL x P SUB ELMNO,BIN16 , P ADD ELMNO,W1 D . P TBT DOOL7,UPDSET24 JUMP IF NOT CURR FIELD Z P TSTCTL 0 LOOK IF ALPHA P BZ UPDSET30 JUMP IF BCD P B UPDSET26 PUPDSET24 ( P TBT ALPHA,UPDSET30 JUMP
0x1f9650…1f97e4 Dummy {f00=0x0098, f01=0x0190, f02=» , P MATCH DEINPUT,BIN6,BIN8,STATSH,W0,BIN8 P BOK UPDSET40 4 P CBNE BIN9,W0,UPDSET15 J P ADD ELMNO,W1 NEXT ELEMENT h . P ADD BIN16,W1 INCREMENT STARTINDEX OF POOL 2 P CMP BIN16,BIN15 JUMP ALL EL. OF POOL COMPARED P BG DECN10 JUMP IF GRA
0x1f97e4…1f9978 Dummy {f00=0x0098, f01=0x0190, f02=»16 INDEX OF CURR BUFF ( P PERF DEPOOL,W6,PINDTB,BIN10,STRG10A P CMP W0,W0 CONDITION ZERO J P B DECO05 l P* ~ PUPDCOD P PERF DECOMP,BIN8 P B DECO05 P* PUPDEMP P CALL EMPTYT,DEINPUT P BP DECEGL P
0x1f9978…1f9b0c Dummy {f00=0x0098, f01=0x0190, f02=» SET ELINDEX n P B UPDN50 P EJECT & P* 4 " PUPDGOT GO TO VALIDATION (G) > . P CLEAR BOOL4 F=NO RECORD CHANGE FOUND (R) d . P CLEAR BOOL8 F=NO RECORD CHANGE FOUND (N) P ADD BIN12,W1 ADJUST POINTER $ P SET BOOL6 T=COND TAB FOUND
0x1f9b0c…1f9ca0 Dummy {f00=0x0098, f01=0x0190, f02=» VALIDATION (R) z P MOVE DEBINW4,W4 . P CLEAR BOOL8 F=NO RECORD CHANGE FOUND (N) 0 ( P SET BOOL4 T=COND FORM CH FOUND (R) b P B UPDFO2 P* * PUPDFON CHANGE FORMAT VALIDATION (N) P MOVE DEBINW4,W3 (N) . P CLEAR BOOL4 F=NO RE
0x1f9ca0…1f9e34 (1, 405) Dummy {f00=0x0099, f01=0x0190, f02=» BIN12,W1 ADUST BUFFER POINTER P MOVE BIN16,W0 WORK:=0 & < P XCOPY BIN16,W1,W1,BPOOL(BIN11),BIN12 LOAD NUMB OF CHARS D * P SUB BIN16,W128 ADJUST LIT.-INDICATOR ( P ADD BIN12,W1 ADJUST BUFFER POINTER P MOVE STSAVE(DEBINW4),HEX00 6 P XCOPY
0x1f9e34…1f9fc8 Dummy {f00=0x0099, f01=0x018e, f02=» P* PUPDNUM P MOVE BIN9,=X'3F' P CALL MSKOUT,BIN9,BIN8 6 P MOVE STR1A,='?' T * P MOVE BIN10,BIN12 SAVE CURRENT POINTER l . P MATCH BPOOL(BIN11),BIN10,BIN9,STR1A,W0,W1 " P BNOK UPDN06 JUMP IF NO '?':S * P MOVE BIN8,W0 COUNTER
0x1f9fc8…1fa15c Dummy {f00=0x0099, f01=0x0190, f02=» " P MOVE BIN8,W1 ADJUST FOR SIGN PUPDN01 . P ADD BIN9,BIN12 < PUPDN00 T P MOVE BIN10,BIN8 b 2 P MATCH DEINPUT,BIN10,W1,BPOOL(BIN11),BIN12,W1 z " P BNOK UPDN04 NOT OK MAYBE '?' PUPDN02 " P ADD BIN8,W1 INCREMENT COUNTER (
0x1fa15c…1fa2f0 Dummy {f00=0x0099, f01=0x0190, f02=» UPDN30 PUPDN03 ! P ADD BIN12,W1 ADJUST POINTER ! P B UPDN00 GO ON MATCH ! B PUPDN04 ! ` & P MOVE BIN10,BIN12 LOAD MATCH POINT ! n , P MATCH BPOOL(BIN11),BIN10,W1,STR1A,W0,W1 ! P BOK UPDN02 GO ON '?' FOUND ! P B UPDN30 ! PUPDN06 !
0x1fa2f0…1fa484 Dummy {f00=0x0099, f01=0x0190, f02=»BE DEBINW1,BIN9,UPDN20 ! * P ADD BIN12,BIN9 ADJUST POINTER IN FVAL " P B DECNOT " L PUPDN10 " ^ & P TBT ALPHA,UPDN40 JUMP IF BCD-NUM " l PUPDN20 " P MOVE BIN10,W0 " P ADD BIN9,BIN12 " < P MATCH DEINPUT,BIN10,DEBINW1,BPOOL(BIN11),BIN12,DEBINW
0x1fa484…1fa618 Dummy {f00=0x0099, f01=0x0190, f02=» COPY STR64A,W0,BIN9,BPOOL(BIN11),BIN12 " P MOVE BCDI21(W2),STR64A # 0 P ADD BIN12,BIN9 # P PUPDN50 # h P CLEAR DOOL6 # v P BZ UPDN55 # P CALL CLEARB,BCDI21(W2),W1 # P CALL SETB,BCDI21(W2),W2 # PUPDN55 # " P IB BIN6,UPDN60,UPDN70,UPDN8
0x1fa618…1fa7ac Dummy {f00=0x0099, f01=0x0190, f02=»1(W1),BCDI21(W2) # P B UPDN90 $ $ PUPDN80 DIV BCDI21(W1),BCDI21(W2) $ * PUPDN90 MOVE BIN6,W0 $ R , P CBNL BIN12,BIN13,UPDN95 JUMP IF END OF $ n P VALIDATION STRING $ P MOVE STR64A,='+-*:' $ 0 P MATCH STR64A,BIN6,W4,BPOOL(BIN11),BIN12,W1 $ (
0x1fa7ac…1fa940 Dummy {f00=0x0099, f01=0x0190, f02=» 6 P IB BIN5,DECO10,DECO20 JUMP ON COMPARE-SIGN-INDEX % P BZ DECEGL = % > P B DECNOT /= % R PDECO10 % f P BEOF DECEGL > % t P B DECNOT /> % PDECO20 % P BERR DECEGL < % P /< % PDECNOT CLEAR DOOL1 % P BNZ DECOOK VALID % * P CBE
0x1fa940…1faad4 (1, 406) Dummy {f00=0x0099, f01=0x0190, f02=» ELEMENT % ~ . P ADD BIN16,W1 INCREMENT STARTINDEX OF POOL & : P CBG BIN16,BIN15,DECN10 JUMP ALL EL. OF POOL COMPARED & B 6 P MOVE BCDI21(W1),FDVBCD(ELMNO) NEXT ELEMENT VALUE & P B UPDN95 GO ON NEXT COMPARE & PDECN10 & < P XCOPY BIN15,W0,W2,RPOOL(PIN
0x1faad4…1fac68 Dummy {f00=0x0099, f01=0x0190, f02=»N16 LOAD SAERCH ELEMENT NEXT SEGM. & 0 P PERF DEPOOL,W6,PINDTB,BIN10,STRG10A RELEASE ' * ( P B UPDSET10 GO ON READ NEXT SEGMENT ' ^ PDECEGL CLEAR DOOL1 ' P BZ DECOTK VALID ' P EJECT ' PDECONO ' P MOVE BIN10,W21 V OR ' , P TBT BOOL6,DECOMT JU
0x1fac68…1fadfc Dummy {f00=0x0099, f01=0x0190, f02=»LB ITEM NOT VALID ' P B DECOMT ( P EJECT ( , PDECOTK ( : 8 P CBE PINDTB,W0,DECOOK JUMP IF EOF VALUE-SET/NO VSET ( H * P MOVE VSEIND,BIN16 INDEX OF CURR BUFF ( PDECOOK ( P MOVE BIN10,W20 & ( P CLEAR DOOLB ITEM VALID ( PDECOMT ( P
0x1fadfc…1faf90 Dummy {f00=0x0099, f01=0x0190, f02=»E BIN9,W0 ( P MOVE BIN16,=W'29' ) 2 P MATCH VALSTR,BIN9,BIN16,BPOOL(BIN11),BIN12,W1 ) , P BOK DECO40 ) b PDECO35 ) v ( P XCOPY BIN8,W1,W1,BPOOL(BIN11),BIN12 ) P CALL TESTB,BIN8,W8 ) P BZ DECO38 ) P MOVE BIN9,=X'3F' ) P CALL MSKOUT,BIN
0x1faf90…1fb124 Dummy {f00=0x0099, f01=0x0190, f02=»CO37 NOT = & ) ~ * P PERF DENVCO CONDITIONAL BOOL SETTING * PDECO37 * B P ADD BIN12,W1 * P * P CBNL BIN12,BIN13,DECEND END OF STRING * f P MOVE BIN9,W0 * P MOVE STR6B,=C'DGRN' * . P MATCH STR6B,BIN9,W4,BPOOL(BIN11),BIN12,W1 * P BNOK DECERR *
0x1fb124…1fb2b8 Dummy {f00=0x0099, f01=0x018e, f02=»OT C * z P DECO41 2== EQUAL C + P DECO41 3=> GREATER C + * P DECO41 4=< LESS C + J P DECO45 5=D DUPLICATE C + f P DECO42 C + P DECO41 C + P DECO42,DECO42,DECO42 C + P DECO45 11=F FIELD C + P DECO42 C + P DE
0x1fb2b8…1fb44c Dummy {f00=0x0099, f01=0x0190, f02=» $ P DECO41,DECO41,DECO41, 22-24 C , P DECO45 25=G GOTO C , , P DECO46 26= C , H P DECO46 27= C , ^ P DECO41 , t P ADD BIN12,W1 MESSAGE , P B DECO35 , PDECO43 , P CBNE BIN9,BIN10,DECO44 , P ADD BIN12,W1 ADJUST POINTER , P B
0x1fb44c…1fb5e0 Dummy {f00=0x0099, f01=0x0190, f02=»12,W2 , P B DECOMT - PDECO45 - P PERF DEFIND,BIN8,BIN9 - . P B DECO42 - L P EJECT - ^ " PDECO46 CONDITIONAL FORMAT CH - l & P ADD BIN12,W1 ADUST BUFFER POINTER - P MOVE BIN16,W0 WORK:=0 - < P XCOPY BIN16,W1,W1,BPOOL(BIN11),BIN12 LOAD NUM
0x1fb5e0…1fb774 (1, 407) Dummy {f00=0x0099, f01=0x018e, f02=»NUMB OF CHARS - t P B DECOMT . PDEC050 . ( * P PERF DENVCO CONDITIONAL BOOL SETTING . 6 P B DECOMT . d P EJECT . v PDECERR . P SET DOOLB . $ P MOVE DEBINW4,W2 UNDEFINED ERROR . P MOVE BIN10,W0 . PDECEND CLEAR DOOL4 . P BZ DECE10 .
0x1fb774…1fb908 Dummy {f00=0x0099, f01=0x0190, f02=» . z P ADD BIN12,W1 / 4 P CALL GETFWD,DKBIN1,0,BIN2,BIN9 GET INIT. FIELD / P CALL ADJUST,DKBIN1 / V PUPDRET / r PDECE10 / P TBF DOOLB,DECE20 / P CBE DEBINW4,W2,DECE30 / PDECE20 / P CBE BIN10,W20,DEC050 '&' / PDECE30 / 0 P MOV
0x1fb908…1fba9c Dummy {f00=0x0099, f01=0x0190, f02=» * P CBG DEBINW3,BDPOIN(W2),UPDR10 JUMP IF 0 P ENTRY OF NEW RECORD 0 2 " P CLEAR BOOL3 CHANGE FORMAT (R) 0 P $ P TBT DOOL2,UPDR10 JUMP IF INSERT 0 v PUPDR05 0 P CLEAR BOOLS FOR FORMAT 0 & P CLEAR BOOL7 CHANGE IN CORRECTION 0 P OR IF BATCHEA
0x1fba9c…1fbc30 Dummy {f00=0x0099, f01=0x0190, f02=»EWRT UPDFLD = 1? 0 P BNZ UPDR30 YES! 1 P MOVE DEBINW3,W0 1 0 P B UPDR40 1 H PUPDR30 1 Z P MOVE DEBINW3,W1 1 h PUPDR40 1 P RET 1 P PEND 1 PDENVCO PROC 1 P MOVE BIN10,W0 1 & P TBT BOOL6,DECOFG JUMP IF COND TAB 1 . P TBT BOOL8,D
0x1fbc30…1fbdc4 Dummy {f00=0x0099, f01=0x40c8, f02=» COND TAB 1 ~ P RET 2 PDECOFN 2 ( P SET BOOL7 T=VALID RECORD CHANGE (N) 2 , P RET 2 X PDECOFR 2 d ( P SET BOOL3 T=VALID RECORD CHANGE (R) 2 r P RET 2 P PEND 2 END 2 @ 2 W0 1 & P TBT BOOL6,DECOFG JUMP IF COND TAB 1 . P TBT BOOL8,D
0x1fbdc4…1fbf58 Dummy {f00=0x0099, f01=0x2008, f02=» 3 B 1 ~ P RET 2 PDECOFN 2 ( P SET BOOL7 T=VALID RECORD CHANGE (N) 2 , P RET 2 X PDECOFR 2 d ( P SET BOOL3 T=VALID RECORD CHANGE (R) 2 r P RET 2 P PEND 2 END 2 @ 2 W0 1 & P TBT BOOL6,DECOFG JUMP IF COND TAB 1 . P TBT BOOL8,D
0x1fbf58…1fc0ec Dummy {f00=0x0099, f01=0x0190, f02=» Kq %_1Aq_ : @s RHl Hk RU "#R? a$W a" k `#0 kT : j` "Ra ` =Ar_ ApAs0 kTY k # *RnHp. a$*a j " $ Z : j` " &*`*K a,Hp bk & a? 0 lT$ l b ,R. a& a =bl & a? #X;! 5 ? b: ja " &*a* a,_' )? c# bc !bRR)jc "R&"c* 5W d7b &Rd k jc "R$ c
0x1fc0ec…1fc280 Dummy {f00=0x0099, f01=0x0190, f02=» h~ !X8H !( @ h~ U !j~ ! ! !P !0" ! N_m ? j !! '( !1j !& !j !! ( * j +& 'j !! ( j ! ! ! 8 ? jy " $ j !! 1 j !! 2 j !! (I !Y A ! p ! ? ! 0 !h & !&P !0" !< _ ( ) +h & '&
0x1fc280…1fc414 (1, 408) Opaque[0x194]
0x1fc414…1fc5a8 # DirEnt {nam=»DEREC2«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1338, f03=0x0000}
0x1fc414…1fc5a8 IdxSect {
0x1fc414…1fc5a8 f00 = 0x0099 // 0x1fc414 @0x0
0x1fc414…1fc5a8 f01 = 0x000a // 0x1fc416 @0x2
0x1fc414…1fc5a8 gno = [ // 0x1fc418 @0x4
0x1fc414…1fc5a8 [0x00]: C0x0099.0x3.0
0x1fc414…1fc5a8 [0x01]: C0x009a.0x0.0
0x1fc414…1fc5a8 [0x02]: C0x009a.0x1.0
0x1fc414…1fc5a8 [0x03]: C0x009a.0x2.0
0x1fc414…1fc5a8 [0x04]: C0x009a.0x3.0
0x1fc414…1fc5a8 ]
0x1fc414…1fc5a8 }
0x1fc5a8…1fc73c Dummy {f00=0x0099, f01=0x0190, f02=» $ P IDENT DEREC2 REL 10.0 80-04-11 P 80-04-14/DALI , DDUM DEDDIV D PDIV X P ENTRY DEREC2 f $ ENTRY DEOPBC OPEN BATCH-ROUTINE | * * ** EXTERNAL REFERENCES TO SCREEN * P EXT DECLRA P EXT DECLRD
0x1fc73c…1fc8d0 Dummy {f00=0x0099, f01=0x0190, f02=»TOR P EXT DERECS P EXT DEREFO P EXT UPDBOL 4 P EXT UPDBIN H P EXT DEACC P EXT DELAST n EXT ATTWB EXT SAVE EXT DEPOOL P EXT OPCL P EXT OFRSP " P EXT DEPRUT GET PROGRAMNUMBER P EXT
0x1fc8d0…1fca64 Dummy {f00=0x0099, f01=0x018e, f02=» PROC FC * P************************************** P* HANDLE BATCHHEAD FORMAT > * P* THESE ROUTINES USE THE DENTER-SCREEN ` * P************************************** P IB FC,RETUBC,ERRBC . P CALL TESTB,RECFIL,FILINDUS LOOK IF RECOV
0x1fca64…1fcbf8 Dummy {f00=0x0099, f01=0x0190, f02=» . P CALL TESTB,RECFIL,FILINDUS LOOK IF RECOV. P BZ REC060 : P EJECT L P* Z & P* START RECOVERY OF THIS USERFILE d P* P SET DOOL3 & P BNZ REC060 AN OTHER TERMINAL HAS $ P ALREADY OPENED THIS USERFILE P FOR RECOV
0x1fcbf8…1fcd8c Dummy {f00=0x0099, f01=0x0190, f02=»T JOBNAME x P BOK REC100 . P MOVE BCDI21(W3),W0 CLOBBERED BY RECOVERY & P MOVE JOBNAME,STSAVE(W1) X P MOVE BATCH,STSAVE(W2) x $ P CBE DEBINW4,W9,REC075 NOT FOUND P CALL CLEARB,RECFIL,FILINDUS PREC060 & P MOVE BIN3,DEBINW4 SAVE
0x1fcd8c…1fcf20 Dummy {f00=0x0099, f01=0x018e, f02=»,W6,PJOBCUR,DEBINW3,STRG10A * P PERF DEPOOL,W6,PINACC,DEBINW3,STRG10A $ * P PERF DEPOOL,W6,PINDFR,DEBINW3,STRG10A R P CALL CLEARB,RECFIL,FILINDUS P B OPBC00 PREC100 , P PERF DEPOOL,W6,PJOBCUR,DEBINW3,STRG10A PREC110 * P PERF
0x1fcf20…1fd0b4 (1, 409) Dummy {f00=0x009a, f01=0x0190, f02=» ( P MOVE BIN3,=W'34' GET NEXT BATCHNAME P PERF DEDISC,BIN3 0 P BNOK REC050 J P MOVE BCDI21(W3),W0 ^ P PERF DERECS,W11 z P BNOK REC110 P CLEAR DOOL1 P BZ REC110 P MOVE BIN3,W1 PREC150 P MOVE ACK(BIN3),=D'0'
0x1fd0b4…1fd248 Dummy {f00=0x009a, f01=0x0190, f02=» PERF DERECS,W5 GET CURRENT P BOK REC400 $ PREC230 8 P CLEAR BDAACT F P CALL UPDBIN,BDSTAT 0 P CALL RESTOR,W0,W4,PWBDB4 RESTORE RBUF WB10 x P PERF DEDISC,W18 CLOSE BATCH P B REC110 PREC400 , P CBE BIN3,W10,REC230 JUM
0x1fd248…1fd3dc Dummy {f00=0x009a, f01=0x0190, f02=»CREASE WANTED RECNO x P PERF DERECS,W4 GET NEXT P BNOK REC500 < P PERF DERECS,W13 P P B OPBC05 h PREC500 z & P PERF DERECS,W3 ENTER LAST SECTOR P B REC230 P EJECT P* P* OPEN ROUTINE P* POPBC09
0x1fd3dc…1fd570 Dummy {f00=0x009a, f01=0x0190, f02=»=W'27' $ P PERF DEDISC,BIN13 DELETE BATCH P B REBC03 6 POPBC10 H " P SET SOOL1 STATUSLINE DISPLAY V POPBC20 CLEAR DECHANGE | POPBC30 P MOVE DEBINW2,W0 P RET PRETUBC P CLEAR BDAACT P CALL UPDBIN,BDSTAT
0x1fd570…1fd704 Dummy {f00=0x009a, f01=0x0190, f02=»ERRBC P PERF DERROR,DEKTAB6 PREBC10 * P CLEAR SOOL1 8 P CLEAR SOOL2 L P CLEAR DENOCHAN ` P SET DOOL5 x P MOVE DEBINW2,W3 PREBC20 * P PERF DEPOOL,W6,PINDFR,DEBINW3,STRG10A , P PERF DEPOOL,W6,PJOBCUR,DEBINW3,STRG10A
0x1fd704…1fd898 Dummy {f00=0x009a, f01=0x0190, f02=»TORE ORIGINATE ADRESSES TO r " P WORKBLOCKS AND DESCRIPTORS " P MOVE DEBINW4,BIN3 H P RET b P PEND n P EJECT | PDEREC2 PROC FC . P IB FC,DELREC,INSREC,INSREC,OPENBC,ENTINS PDELREC * P MOVE BIN12,CURSEC SAVE CURRENT SECTOR
0x1fd898…1fda2c Dummy {f00=0x009a, f01=0x018e, f02=» . P XCOPY RBUF,W6,W2,BIN14,W0 DELETED RECLNTH . P CBE BIN14,W10,DELR20 JUMP IF EMPTY SECTOR 6 PDELR10 h P MOVE BIN14,W23 v " P B DELR40 GET PREVIOUS RECORD PDELR20 " P CBNE CURSEC,BDPOIN(W1),DELR30 $ P XCOPY BDPOIN(W1),W0,W2,RBUF,W2
0x1fda2c…1fdbc0 Dummy {f00=0x009a, f01=0x0190, f02=» t 2 P SUB BDPOIN(W2),W1 DECREASE NUMBER OF RECORDS P TBF DBOFOR,DELR50 > P SUB BDPOIN(W4),W1 X PDELR50 r P MOVE BCD13A,NUMBER P TEST DBOMVR P BZ DROK00 P TEST DBOVER VERIFIED RECORD P BNZ DROK00 YES P SUB BDPOI
0x1fdbc0…1fdd54 (1, 410) Dummy {f00=0x009a, f01=0x018e, f02=»ATARECORD. * " P****************************** PINSREC FC= 9 @ P XCOPY BIN14,W0,W2,RBUF,W6 V P MOVE PRECPR,PRECCUR x P ADD PRECCUR,RECLNTH , P XCOPY BIN10,W0,W2,RBUF,W4 LINK TO NEXT 2 P XCOPY RBUF,W6,W2,PRECCUR,W0 ADJUST USED
0x1fdd54…1fdee8 Dummy {f00=0x009a, f01=0x0190, f02=» * P DLETE RBUF,W10,BIN7 COPY LAST ENTERED * P MOVE BIN8,CURSEC SAVE CURRENT SECTOR 6 4 P CBL PRECCUR,BIN14,INSR10 JUMP IF MORE IN SECTOR d P MOVE BIN9,BIN8 PINSR05 2 P XCOPY RBUF,W4,W2,BIN10,W0 LINK TO NEXT SECTOR P MOVE BIN14,W23
0x1fdee8…1fe07c Dummy {f00=0x009a, f01=0x0190, f02=»ECTOR t P BERR DRNO00 P MOVE BIN9,CURSEC " P DLETE RBUF,W10,RECLNTH < P SUB BIN14,PRECCUR P ADD BIN14,W10 v 2 P XCOPY RBUF,W6,W2,BIN14,W0 USED SPACE PART TWO P B INSR05 PINSR20 , P CBE BIN10,W0,INSR30 JUMP IF LAST SECT
0x1fe07c…1fe210 Dummy {f00=0x009a, f01=0x0190, f02=»NK TO PREV t P MOVE BIN14,W23 , P PERF DEDISC,BIN14 WRITE CURRENT SECTOR * P BERR DRNO00 Z P B INSR40 n PINSR30 : P XCOPY BDPOIN(W1),W0,W2,CURSEC,W0 LAST ENTERED RECORD PINSR40 P MOVE CURSEC,BIN8 P MOVE BIN13,=W'33'
0x1fe210…1fe3a4 Dummy {f00=0x009a, f01=0x0190, f02=»R),W0 n P B DROK00 P EJECT * P************************************** . P* ( P* READ IN CURRENT JOBDEFINITION AND f P* OPEN WANTED BATCH. P* * P************************************** POPENBC FC=11 P MOVE DEBINW
0x1fe3a4…1fe538 Dummy {f00=0x009a, f01=0x018e, f02=»OPE050 NOT EMPTY P B OPE100 POPE030 * , P CBNE BIN11,W4,OPE035 JUMP IF NOT ENTRY 8 , P CBNE BIN12,W5,OPE050 JUMP IF NOT DELETE h P B OPE040 POPE035 P CBNE BIN11,W5,OPE050 & P CBE BIN12,W3,OPE050 RECORD-LEVEL POPE040
0x1fe538…1fe6cc Dummy {f00=0x009a, f01=0x0190, f02=» P A JOBDEFINITION IN POOL P MOVE DEINPUT,HEX00 & " P COPY DEINPUT,W0,W6,JOBNAME,W0 B & P PERF DEDISC,W2 GET JOB-DEFINITION h P BNERR OPE100 $ P GETFLD 0,W2,BIN3 FILED JOBNAME P B DRNO00 POPE100 , P TBT DOOL3,OPE250 JUMP I
0x1fe6cc…1fe860 Dummy {f00=0x009a, f01=0x0190, f02=»E150 GETFLD 0,W3,BIN3 FIELD BATCHNAME P COPY DEINPUT,W0,W6,BATCH,W0 . POPE170 R P B OPE700 ` $ POPE200 SET DOOL3 USERFILE OPENED r 0 P CALL TESTB,RECFIL,FILINDUS LOOK IF RECOVERY P BZ OPE260 JUMP IF NOT $ P MOVE BIN3,=W'37' ERROR REC.
0x1fe860…1fe9f4 (1, 411) Dummy {f00=0x009a, f01=0x0190, f02=» d P BNZ OPE300 JUMP IF RUNNING " POPE260 LOOK IF BATCHDATA AND , " P BATCHHEADER ARE TO BE USED R ( P CBNE BIN11,W7,OPE265 NOT CONVERSION x . P CBE PJOBCUR,W0,OPE270 OPEN USERFILE ONLY & P MOVE BIN12,W0 ADJUST RETURNPOINT P IN DE
0x1fe9f4…1feb88 Dummy {f00=0x009a, f01=0x0190, f02=»70 & P MOVE BIN12,W1 ADJUST RETURNPOINT P IN DERECS. 4 P B DROK00 J POPE280 P MOVE STR6A,HEX00 j P CBE BATCH,STR6A,OPE270 P B OPE300 POPE290 P TBF DOOL8,OPE300 P PERF DEDISC,W6 OPEN NEW P BOK OPE38
0x1feb88…1fed1c Dummy {f00=0x009a, f01=0x0190, f02=» f , P CBNE BIN13,W10,OPE380 NOT EMPTY BATCH! P MOVE DEBINW4,W9 NOT FOUND 8 P B OPE695 DELETE BATCH Z POPE350 x ( P CBNE DEBINW4,=W'27',OPE170 B OPE700 , P CBNE BIN11,W5,OPE170 JUMP IF NOT SEARCH & P CBE BIN12,W3,OPE170 RECORD-LEVEL
0x1fed1c…1feeb0 Dummy {f00=0x009a, f01=0x0190, f02=» $ P BZ OPE400 JUMP IF NOT RECOVERY * P TBT BDAACT,OPE560 JUMP IF BATCH IS TO , P BE RECOVERED Z & P B DROK00 BATCH WILL NOT BE OPENED r " POPE400 THOS IS A NORMAL OPEN , P CBNE BIN11,W5,OPE410 JUMP IF NOT SEARCH & P CBE BIN12,W3,OPE550 R
0x1feeb0…1ff044 Dummy {f00=0x009a, f01=0x0190, f02=» IF NOT ENTRY v ( P CBNE BIN12,W5,OPE415 AND NOT DELETE P MOVE BIN11,BIN12 B P B OPE270 POPE415 n & P TBF DOOL8,OPE420 JUMP IF OPEN OLD | , P TBF DOOL7,OPE540 JUMP IF NOT TESTBATCH P SET BDATES P B OPE540 POPE420 *
0x1ff044…1ff1d8 Dummy {f00=0x009a, f01=0x0190, f02=» v P B OPE710 POPE460 ( P TBT BDATES,OPE540 JUMP IF TESTBATCH ( P MOVE DEBINW4,=W'34' ERROR T P B OPE710 v POPE500 P TBF VERIFM,OPE540 P TBT BDAMVR,OPE540 POPE520 P MOVE DEBINW4,W8 P B OPE710 POPE540
0x1ff1d8…1ff36c Dummy {f00=0x009a, f01=0x0190, f02=»ERYOPENED BATCH P SET DOOL1 P B OPE680 * POPE580 < . P CALL TESTB,RECFIL,FILINDUS LOOK IF RECOV. J P BNZ DROK00 | & P CBNE BIN11,W7,OPE620 JUMP IF NOT . P MOVE BIN12,W4 RETURN TO DROK00 IN DERECS P B OPE680 POPE600
0x1ff36c…1ff500 Dummy {f00=0x009a, f01=0x0190, f02=»ROZEN BATCH | POPE640 P CLEAR BDABAL " P CALL UPDBIN,BDSTAT 8 0 P CALL RESTOR,W0,W4,PWBDB4 RESTORE RBUF WB10 T $ P PERF DEDISC,W18 WITE BATCHDATA P BNOK OPE690 & P TBF DOOL8,OPE660 JUMP IF OPEN OLD & P MOVE BIN13,W23 WRITE CURR
0x1ff500…1ff694 (1, 412) Dummy {f00=0x009a, f01=0x0190, f02=»EAD CURR.SECTOR | POPE670 P PERF DEDISC,BIN13 & P BNOK OPE690 @ POPE680 T & P CALL ATTWB,BPOOL(PJOBCUR),W0,W12 b P MOVE PINDFR,W0 . P CALL TESTB,RECFIL,FILINDUS LOOK IF RECOV. P BNZ OPE681 YES! , P CBE BIN11,W5,OPE683 SEARC
0x1ff694…1ff828 Dummy {f00=0x009a, f01=0x018e, f02=»SC,W10 GET FORMAT P BNOK OPE690 0 P MOVE FORMAT,FORTAB(W20) SAVE BATCHHEADNAME . P B OPE684 b POPE683 t $ P MOVE FORMAT,HEX00 SEARCH STRART POPE684 $ P MOVE PRECCUR,W10 START IN RBUF . P CALL TESTB,RECFIL,FILINDUS LOOK IF RECO
0x1ff828…1ff9bc Dummy {f00=0x009a, f01=0x0190, f02=» P BOFL OPE710 POPE685 P MOVE SYMREC(W10),FRMTPNTR * POPE688 L P SET DEPROMPT Z $ P CALL ATTWB,BPOOL(PINACC),W2,W13 p P MOVE PRECPR,PRECCUR P MOVE NUMBER,W0 P CALL UPDBIN,BIN1 P B DROK00 POPE690 & P T
0x1ff9bc…1ffb50 Dummy {f00=0x009a, f01=0x0190, f02=»T BATCH z POPE695 ! P MOVE BIN3,DEBINW4 ! P MOVE BIN13,=W'27' ! 8 $ P PERF DEDISC,BIN13 DELETE BATCH ! R P MOVE DEBINW4,BIN3 ! z POPE700 ! P MOVE BIN4,W3 ! & P MOVE BIN3,DEBINW4 SAVE ERRORCODE ! P B OPE720 ! POPE710 ! P MOVE
0x1ffb50…1ffce4 Dummy {f00=0x009a, f01=0x0190, f02=»INW4 GET LAST FIELD ! ~ P CBE BIN11,W7,OPE760 " * P CALL TESTB,RECFIL,FILINDUS RECOVERY? " 8 P BNZ OPE760 YES! " f , P PERF DEPOOL,W6,PJOBCUR,DEBINW3,STRG10A " ~ P CLEAR DOOL3 " P BZ OPE760 " P PERF OPCL,W4 CLOSE USERFILE " POPE760 " 0 P C
0x1ffce4…1ffe78 Dummy {f00=0x009a, f01=0x40e6, f02=» ADD PRECCUR,RECLNTH # 2 P XCOPY RBUF,W6,W2,PRECCUR,W0 STORE USED SPACE # P MOVE PRECCUR,W10 # V PDROK00 # p P CMP W1,W1 # ~ P RET # PDRNO00 # P CMP W1,W0 # P RET # P PEND # END # @ # E USERFILE " POPE760 " 0 P C
0x1ffe78…20000c Dummy {f00=0x009a, f01=0x2008, f02=» $ PENTINS FC=12 ADD PRECCUR,RECLNTH 2 P XCOPY RBUF,W6,W2,PRECCUR,W0 STORE USED SPACE < P MOVE PRECCUR,W10 r PDROK00 P CMP W1,W1 P RET PDRNO00 P CMP W1,W0 P RET P PEND END @ P MOV
0x20000c…2001a0 Dummy {f00=0x009a, f01=0x0190, f02=»DV DERRORA EMPTYT0 T:DISPF T:ERAS T:GETF. E DE50ST 8 800414 $$$TRA5 DE50ST DEAP5A ATTDB ATTWB DEANOK0 DEAOK0- DECLRA1 DECLRNL DECLRS0 DEDISC DENT01 DEOPBC5 DEPOOL DEPRUT DERECS DERR DERROR DESTAU EMPTYTA OPCLD RESTORD SETB-
0x2001a0…200334 (1, 413) Opaque[0x194]
0x200334…2004c8 # DirEnt {nam=»DENT02«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1360, f03=0x0000}
0x200334…2004c8 IdxSect {
0x200334…2004c8 f00 = 0x009b // 0x200334 @0x0
0x200334…2004c8 f01 = 0x000a // 0x200336 @0x2
0x200334…2004c8 gno = [ // 0x200338 @0x4
0x200334…2004c8 [0x00]: C0x009b.0x0.0
0x200334…2004c8 [0x01]: C0x009b.0x1.0
0x200334…2004c8 [0x02]: C0x009b.0x2.0
0x200334…2004c8 [0x03]: C0x009b.0x3.0
0x200334…2004c8 [0x04]: C0x009c.0x0.0
0x200334…2004c8 ]
0x200334…2004c8 }
0x2004c8…20065c Dummy {f00=0x009b, f01=0x0190, f02=» $ P IDENT DENT02 REL 10.0 80-12-10 P UPD 80-04-11 , P UPD 80-10-28/DALI D P UPD 80-04-23/DALI ` P UPD 80-04-08/DALI | P DDUM DEDDIV P PDIV P ENTRY DENDUP P ENTRY DEEDIT P ENTRY DELAST P EXT DERECS
0x20065c…2007f0 Dummy {f00=0x009b, f01=0x0190, f02=»P LOOK FOR DUPLICATION- P STRING FOR CURRENT FIELD P EXT CMPIND D & P EXT DEDISC DISC HANDLING ROUTINE X * P EXT ATTDB ASSEMBLY SUBROUTINE ATTDB - P ATTACH DESCRIPTORBLOCK * P EXT ATTWB ASSEMBLY SUBROUTINE ATTWB - P ATTAC
0x2007f0…200984 Dummy {f00=0x009b, f01=0x0190, f02=»G | & P EXT DEPOOL POOL HANDLING ROUTINE P EXT DEFIND 4 P EXT MASK H P EXT DELOCK Z P EXT DEPRUT n P INCLUDE DELITT P EJECT & P********************************** & P* THIS ROUTINE HANDLE THE KEY FOR " P* DUPLICATIO
0x200984…200b18 Dummy {f00=0x009b, f01=0x0190, f02=» n PDENDUP PROC P CLEAR BOOL5 , P CALL GETDUP,BPOOL(W1),BIN11,BIN12,BIN13 0 P BOK KDUP05 ` PKDUP03 t * P CBE DEBINW2,W3,KDUP02 JUMP IF AUTODUP * P CBNE DEBINW2,W11,KDUP04 JUMP IF KEEP PKDUP02 P B KDUP35 PKDUP04
0x200b18…200cac Dummy {f00=0x009b, f01=0x0190, f02=»,W8,BPOOL(BIN11),BIN12,W1 ~ " P LOOK IF DUPL FROM VALUESET " P BNOK KDUP40 JUMP IF NOT H $ P CBE BIN9,W5,KDUP25 JUMP IF DATE h & P SUB BIN9,W8 ADJUST FOR THE OTHER P BL KDUP40 P ADD BIN12,W1 GET ITEMNUMBER P MOVE BIN8,W0 P P
0x200cac…200e40 Dummy {f00=0x009b, f01=0x018e, f02=»,W18 LOOK IF ELEMENTNUMBER 0 P MATCH VALSTR,BIN8,W1,BPOOL(BIN11),BIN12,W1 " P BNOK KDUP10 V P ADD BIN12,W1 j * P XCOPY ELMNO,W1,W1,BPOOL(BIN11),BIN12 P B KDUP20 " PKDUP10 PERF DELAST,W5,DEKTAB7 , P IB DEBINW2,KDUP60,KDUP60,KDUP60,K
0x200e40…200fd4 (1, 414) Dummy {f00=0x009b, f01=0x018e, f02=» z P MOVE ELMNO,BCD13A PKDUP20 " P CBNE ELMNO,W0,KDUP15 0 P CBE VSEIND,W0,KDUP13 N P MOVE ELMNO,VSEIND l P B KDUP15 PKDUP13 VALUESETINDEX =0 P MOVE DEBINW4,W9 NOT FOUND P B KDUP50 PKDUP15 P MOVE TABLE,
0x200fd4…201168 Dummy {f00=0x009b, f01=0x0190, f02=» P PERF DEDISC,W24 GET VALUSET P BNOK KDUP50 ( P MOVE VSEIND,ELMNO < $ P CALL ATTWB,BPOOL(PINDTB),W8,W11 V $ P CALL ATTDB,BPOOL(PINDTB),W0,W11 ~ P MOVE BIN10,W0 ( P XCOPY BIN10,W1,W1,RPOOL(PINDTB),W17 P SUB ELMNO,BIN10 P ADD ELM
0x201168…2012fc Dummy {f00=0x009b, f01=0x0190, f02=»DUP30 YES P GETCTL 1,DEBINW4 GET MAXL , P SUB DEBINW4,DEBINW1 - LENGTH OF DEINPUT 4 P BNN KDUP30 MAXL NOT LESS d P MOVE STRG10A,='+- ' P MOVE DEBINW2,W0 , P MATCH STRG10A,DEBINW2,W3,DEINPUT,W0,W1 P MOVE DEBINW2,W0 P BNOK
0x2012fc…201490 Dummy {f00=0x009b, f01=0x0190, f02=»LETE DEINPUT,DEBINW2,DEBINW4 P SUB DEBINW1,DEBINW4 $ PKDUP30 @ ( P CALL EMPTYT,:FMTITEM LOOK IF EMPTY N P BNZ KDUP32 YES! z P TSTCTL 0 LOOK IF ALPHA P BZ KDUP27 JUMP IF BCD P GETCTL 1,DEBINW4 GET MAXL P MOVE DEBINW3,W0 6
0x201490…201624 Dummy {f00=0x009b, f01=0x0190, f02=» x $ P CBE BCDI21(W1),:FMTITEM,KDUP33 PKDUP28 0 P GETABX DEBINW3 > P ERASE 9,DEBINW3,DEBINW3 V PKDUP32 v 2 P UPDFLD 1,DEINPUT UPDATE FIELD WITH DISPLAYING PKDUP33 P MOVE DEBINW2,W3 P CLEAR BOOL5 P BNZ KDUP38 P
0x201624…2017b8 Dummy {f00=0x009b, f01=0x0190, f02=» f PKDUP50 P MOVE DEBINW2,W0 PKDUP60 . P MOVE DEBINW1,W0 < P CMP W1,W0 T P RET f P PEND r P EJECT . P***************************************** P* . P*THIS PROCEDURE EDIT ITEMS FOR VALIDATIONS P*INTO THE IT
0x2017b8…20194c Dummy {f00=0x009b, f01=0x0190, f02=»ERVARIABELS , P* = 3 FIELDS WITHIN CURRENT FORMAT P* = 4 VALUESETS D P* = 5 DATE b * P* = 6 VALUESETINDEX (ELEMENTNO) z P* . P***************************************** PDEEDIT PROC FC " P MOVE BIN10,W1
0x20194c…201ae0 Dummy {f00=0x009b, f01=0x0190, f02=»CMPIND,BIN8,ACK(W1) P BNOK DED500 OUT OF RANGE P MOVE DEINPUT,ACK(BIN8) > P B DED390 ^ PDED100 p P CALL TESTB,BPOOL(PINDTB),W2 ~ P BNZ DED150 JUMP IF BCD & P XCOPY BIN7,W1,W1,BPOOL(PINDTB),W1 * P COPY DEINPUT,W0,BIN7,FDVBCD
0x201ae0…201c74 (1, 415) Dummy {f00=0x009b, f01=0x0190, f02=»VALUE SET INDEX (ELEMENTNO) P* $ PDED160 . $ P MOVE BCD3A,VSEIND BINCONV=>BCD < & P MOVE DEINPUT,BCD3A BCDCONV=>STRG d P B DED470 PDED170 P MOVE DEINPUT,DATE P DLETE DEINPUT,W0,W1 P B DED390 PDED200 * P TBF
0x201c74…201e08 Dummy {f00=0x009b, f01=0x0190, f02=» TYPET p 0 P CALL TYPET,BIN7,X.PSEU1,X.PSEU2,X.WB10,BIN8 $ P CBE BIN7,W2,DED250 JUMP IF BCD B P MOVE BIN7,W0 j P EDSUB DEINPUT,BIN7,FORMF P B DED350 PDED250 4 P CON X.MOVE,DEINPUT,X.PSEU1,X.PSEU2,X.WB10,BIN8 P B DED400
0x201e08…201f9c Dummy {f00=0x009b, f01=0x0190, f02=»D330 P CALL CMPIND,BIN8,USEV(W1) P BNOK DED500 OUT OF RANGE . P EDSUB DEINPUT,BIN7,FORMU P PDED350 r P MOVE DEBINW1,BIN7 P B DED470 PDED390 P MOVE BIN10,W0 PDED400 P MOVE DEBINW1,W0 P MOVE BIN7,=W'80'
0x201f9c…202130 Dummy {f00=0x009b, f01=0x0190, f02=»OVE DEBINW1,W0 PDED470 P CMP W1,W1 EDITING OKEY $ P RET D PDED500 P P CMP W1,W2 EDITING FAILED ^ P RET P PEND P EJECT * P************************************* * P* DISPLAY AND READ OF FUNCTION-KEYS * * P* EN
0x202130…2022c4 Dummy {f00=0x009b, f01=0x0190, f02=» P MOVE BIN15,FC PLASTD0 MOVE DEBINW4,W24 P ERASE 0,DEBINW4,DEBINW4 : P EDWRT DEDSSCRN,FLAST(FC) Z PLAST05 | P MOVE DEBINW1,W0 PLASTD1 P IB FC JUMP ON FUNCTIONKEY C P LPROG FPROG = 1 C P LDEL FDEL1 = 2 C
0x2022c4…202458 Dummy {f00=0x009b, f01=0x0190, f02=» LASRET3 FCORR = 8 C P LASVER FVER = 9 C P LASRET2 FREC02 =10 C : P LINS FFORCE = 11 C X P LINS FCONVNO =12 C t P LINS FCONV1 =13 C P LASRET2 FASD =14 C P LRFBWD FRFBWD =15 P B LINS PLPROG 2 P MOVE
0x202458…2025ec Dummy {f00=0x009b, f01=0x0190, f02=»EBINW4 ~ P B LASVER PLPROG2 0 P KI DEDSDYKB,DEINPUT,KEYTAB,DEBINW1,DEBINW2 . P B LAST50 b PLVAL t P MOVE DEBINW1,W2 P B LPROG2 PLRFBWD P MOVE DEBINW1,W7 P B LPROG2 PLDEL PLINS P MOVE DEBINW1,
0x2025ec…202780 Dummy {f00=0x009b, f01=0x0190, f02=»3,POWOFF,LASTER,LASTD0 P B LASTD3 P* 0 0 P* NOK. NOTICE THAT INCORRECT LENGTH IS OKEY : P* n PLASTER x P XSTAT DEDSDYKB,DEBINW3 P CALL MASK,DEBINW3,W8 P BZ LASBEL " P MOVE DEBINW2,W6 SIMULATE EOI P B PROEN2
0x202780…202914 (1, 416) Dummy {f00=0x009b, f01=0x0190, f02=»ET,DUMMY,LASRET | PLAST06 $ P IB DEBINW2,LASBEL,LASBEL,LASBEL & " P SUB DEBINW2,W3 ADJUST EOI0KEY N P B LASRET t PLASBEL ( P EDWRT DEDSSCRN,BELL ACOUSTIC ALARM P B LAST05 PLASKOP P MOVE DEBINW3,W1 P PRINT DEDSPRT,D
0x202914…202aa8 Dummy {f00=0x009b, f01=0x0190, f02=»* POWER OFF P* PPOWOFF P DISPLAY 0,W1,W0 , P B LASTD0 D P* V PPROEN2 ` . P IB FC,LASTUT,LASTD0,LASTD0,LASTD0,LASTUT n PLASTUT P ADD DEBINW1,W1 PLASRET P ERASE 0,DEBINW4,DEBINW4 PLASRET2 P RET
0x202aa8…202c3c Dummy {f00=0x009b, f01=0x018e, f02=»PROG,FDEL1,FDEL2,FLIN1,FLVAL,FLINS,FRECOV C 4 P FCORR,FVER,FRECO2,FFORCE,FCONV0,FCONV1,FASD C 4 P FRFBWD l PFPROG FRMT | P FSL P FLOW P FCOPY =C'SYMBOLIC:' P FMEND PFDEL1 FRMT P FSL P FLOW $ P FTEXT 'CO
0x202c3c…202dd0 Dummy {f00=0x009b, f01=0x018e, f02=» P FLINK FDEL3 P FTEXT 'INSERTED' P FMEND 2 PFDEL3 FRMT @ P FSL R P FLOW ^ P FCOPY =C'RECORD' l P FILLR ' ',1 P FMEL 'TTTT9',BCD13A P FILLR ' ',1 P FMEND PFLVAL FRMT P FSL P FLOW P FTE
0x202dd0…202f64 Dummy {f00=0x009b, f01=0x0190, f02=» | P FCOPY =C'NUMBER' P FILLR ':',1 " P FMEND 6 PFLIN1 FRMT D P FSL V P FLOW b " P FTEXT 'CONFIRM RECORD INSERT' p P FMEND PFRECOV FRMT P FSL P FLOW P FTEXT 'RECOVERY OF ' P FCOPY =C'JOB' P F
0x202f64…2030f8 Dummy {f00=0x009b, f01=0x0190, f02=»NING.' P FMEND PFCORR FRMT P FSL . P FLOW : P FTEXT 'RECORD CORRECTION' H P FMEND j PFVER FRMT x P FSL P FLOW $ P FTEXT 'RECORD MUST BE VERIFIED' P FMEND PFRECO2 FRMT P FSL P FTEXT 'RECOVE
0x2030f8…20328c Dummy {f00=0x009b, f01=0x0190, f02=» BATCH P FMEND PFCONVA FRMT P FCOPY =C'CONFIRM ' 0 ( P FTEXT 'CONVERSION OF ALL BATCHES ' L P FMEND x PFCONV0 FRMT P FSL P FLINK FCONVA P FTEXT 'ON UNIT:U' P FMEL 'X',USERFILE P FMEND PFONV2
0x20328c…203420 Dummy {f00=0x009b, f01=0x018e, f02=» P FSL " P FTEXT 'AUTOMATIC SKIP/DUP *O' P FBF ASDFLAG,FASD2 6 P FTEXT 'N*' P P FB FASDEN d PFASD2 FTEXT 'FF*' v PFASDEN FMEND PFRFBWD FRMT P FSL ( P FTEXT 'ENTER WANTED RECORDNUMBER:' P FMEND P EJECT
0x203420…2035b4 (1, 417) Dummy {f00=0x009c, f01=0x409e, f02=» PFORMU FRMT P FCOPY USEV(BIN8) P FMEND 4 PBELL FRMT B P FSL T P FILLR X'07',1 ` P FMEND v P* END @
0x2035b4…203748 Dummy {f00=0x009c, f01=0x2008, f02=» FORMU FRMT P FCOPY USEV(BIN8) P FMEND 4 PBELL FRMT B P FSL T P FILLR X'07',1 ` P FMEND v P* END @
0x203748…2038dc Dummy {f00=0x009c, f01=0x0190, f02=»Pn P P I 0 P< 1*WZ X ! X $" P<Q X (# P2 X # :! R$W 1* 0 T$ @ Y (W Y , 1 W 1 Y ( ?D : X *:h X (! # P X & V L TbW X , X 0P@ 0 T, X *:h XF XL X (!@T @ Y ( X , Y t X 0 l 1*_r X ( P Y (_
0x2038dc…203a70 Dummy {f00=0x009c, f01=0x0190, f02=»1R X (P 0 3F 8 Y 0 X 2P X 0V _z Y ( " T Y ( : 8 2 9F 8 V Y 8 : " P X & V ( P 1 : : 0 "0P $ T W %T : : Y ( X $ Y X " Y X & Y X < Y @ : Y : 3 X : X ( T X & V H " V
0x203a70…203c04 Dummy {f00=0x009c, f01=0x0190, f02=»=H Gb 2` X *! T" X y 4 @ X (T y 6W4 X y 6W, @ X (P W" X & V D ! P @ W X 3 W Y ( : X , Y X $ Y X &T Y Y Y WD V $:H D Y D :H Y ! P V Y 9FW Y ! P 8 W V Y 2 V Y : 9F ? : 2'
0x203c04…203d98 Dummy {f00=0x009c, f01=0x0190, f02=» Y : W 8 V ? 3 Y Y Y < V E D B X _ v : C C 7 : C 7 :( R : V E V D ' $ I W 3 P D X =' V W V Y =P 3 : ( D 7 "R V I D 7
0x203d98…203f2c Dummy {f00=0x009c, f01=0x0190, f02=»W 7* 6" 5 / 6& _ 7 8` 8 P 9F <H : 5(W 7 8 9F &P B V C / <H "!@ I : 7 8 C C W 8 C C J5~ ' W 781"&$ 39#$;< '()*+,-! 8 8d 8 9F P _D 7 B 9F 'W 7 ( Wb 9F 8
0x203f2c…2040c0 Dummy {f00=0x009c, f01=0x0190, f02=»% P C + B D 7z I "%@P "% P& B C C 4 "5 # B P B P B 5 P C : 7 6 >~ 6 C 6j C B B P C 7 : "!@T I V I C B : ( ' P 7z I : 7 8 % Y 8 C 9F & I
0x2040c0…204254 (1, 418) Opaque[0x194]
0x204254…2043e8 # DirEnt {nam=»DEPROC«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1388, f03=0x0000}
0x204254…2043e8 IdxSect {
0x204254…2043e8 f00 = 0x009c // 0x204254 @0x0
0x204254…2043e8 f01 = 0x000e // 0x204256 @0x2
0x204254…2043e8 gno = [ // 0x204258 @0x4
0x204254…2043e8 [0x00]: C0x009c.0x1.0
0x204254…2043e8 [0x01]: C0x009c.0x2.0
0x204254…2043e8 [0x02]: C0x009c.0x3.0
0x204254…2043e8 [0x03]: C0x009d.0x0.0
0x204254…2043e8 [0x04]: C0x009d.0x1.0
0x204254…2043e8 [0x05]: C0x009d.0x2.0
0x204254…2043e8 [0x06]: C0x009d.0x3.0
0x204254…2043e8 ]
0x204254…2043e8 }
0x2043e8…20457c Dummy {f00=0x009c, f01=0x0190, f02=» $ P IDENT DEPROC REL 10.0 80-04-11 P 80-01-17/JAER , P* D * N @ <* THIS PROGRAM-MODUL CONTAINS ENTRIES TO THE DIFFERENT X 6 2* STEERING ROUTINES OF THE FORMAT GENERATION * DDUM DEDDIV PDIV " ENTRY
0x20457c…204710 Dummy {f00=0x009c, f01=0x0190, f02=»DESCRIPTOR STORING P EXT FTEXT FORMAT TEXT EXT FKI FORMAT KEYED INPUT 8 EXT FMELI FORMAT EDITING EXT FCOPY FORMAT COPYING ~ EXT FVAL FORMAT VALIDATION EXT FGEN FORMAT GENERATION " EXT FACC FORMAT ACCUMULATION
0x204710…2048a4 Dummy {f00=0x009c, f01=0x0190, f02=»NE z $ P EXT NOPOOL NUMBER OF USED POOLS P EXT DERROR ERRORMESSAGE 2 $ P EXT UPDBOL UPDATE BOOLEAN/WORD R & P EXT DEPOOL BUFFERRESERVATIN-MODUL z . P EXT EMPTYT ASSEMBLY SUBROUTINE EMPTYT - P EJECT P* P* KEYTABLE P*
0x2048a4…204a38 Dummy {f00=0x009c, f01=0x0190, f02=»TAL P* $ PDEKTAB6 KTAB CLR,CAN,RET,NOK,TOT P* > PDEKTAB7 KTAB CLR,CAN,RET H P* h P EJECT r P* P* MTEXT L P* - MAKES MATCH OF 'LINE DESIGN' UNTIL EOL OR NEXT FIELD IS FOUND @ P* - EDIT TEXT PART
0x204a38…204bcc Dummy {f00=0x009c, f01=0x0190, f02=»INFO WHEN FOUND IN 'MATCH' n . P* - SIGNALS IN 'DEBINW2' AS FOLLOWS; " P* = 0 OK T . P* = 1 NO AVAILABLE BUFFERS;CANCEL l , P* = 2 NO AVAILABLE BUFFERS;RETUR > P* = 4 NO AVAILABLE BUFFERS/MAX LIMIT EXCEEDED;KTOT
0x204bcc…204d60 Dummy {f00=0x009c, f01=0x0190, f02=»BINW2,W0 P SWITCH P PERF MROUT MATCHROUTINE " P TBF BOOL3,MT20 F= NO NO FTAB @ P* f P* FTAB-FTEXT p P* P PERF FTAB GENERATE FTAB & P CBNE DEBINW2,W0,MT99 ERROR SIGNAL PMT20 P* P* FTEXT P
0x204d60…204ef4 (1, 419) Dummy {f00=0x009c, f01=0x0190, f02=»BIN5,LDES,W0 COPY TEXT & P TBT DOOL8,MT35 JUMP IF NO DISPLAY " P DISPLAY 2,W3,W3 DISPLAY LDISP H PMT35 n * P TBT BOOL2,MT40 JUMP IF FIELD IS FOUND z $ P CBE EOLINE,W1,MT99 JUMP IF EOL P B MT10 GO ON MATCH PMT40 P ADD BIN10,W1 NE
0x204ef4…205088 Dummy {f00=0x009c, f01=0x0190, f02=»L6,MT50 JUMP IF BALANCE FORMAT . P* CHECK IF RECORD LENGTH IS EXCEEDED & & P MOVE BIN16,BIN13 LOAD LAST DISPL X * P ADD BIN16,BIN14 ADD LAST FIELD LENGTH , P MOVE BIN15,BIN7 LOAD ACTUAL FIELDLENGTH " P TBT ALPHA,MT45 JUMP IF ALPHA P A
0x205088…20521c Dummy {f00=0x009c, f01=0x0190, f02=»IN16 STORE USED RECORDSPACE ~ PMT50 $ $ P TBT DOOL8,MT55 JUMP IF NO ERASE 0 4 P DISPLAY 2,W4,W7 DISPLAY FIELDNR,-LENGTH,-START X PMT55 * P TBT BOOL6,MT58 JUMP IF BALANCE FORMAT . P CBG BIN10,=X'FD',MT90 FIELDNR MAX REACHED 2 P CBG BIN16,F
0x20521c…2053b0 Dummy {f00=0x009c, f01=0x0190, f02=» f PMT60 $ P PERF FINIT FIELD INIT WORKITEMS P B MT99 OK < PMT80 N 2 P MOVE DEBINW4,W14 'MAX RECORD LENGTH EXCEEDED' Z P B MT95 PMT90 P MOVE DEBINW4,W16 PMT95 P PERF DERROR,DEKTAB6 * P CBE DEBINW2,W1,MT95 JUMP
0x2053b0…205544 Dummy {f00=0x009c, f01=0x0190, f02=»ATE TOT-KEY z PMT98 . P SUB DEBINW2,W1 ADJUST FOR CAN,RET,---,TOT PMT99 R P RET ^ P PEND j EJECT x MROUT PROC : P****************************************************** * * MATCHING ROUTINE *
0x205544…2056d8 Dummy {f00=0x009c, f01=0x0190, f02=»N7 => 'MAXL' =FIELDLENGTH (FROM SUBROUTINE 'PICMA') | . )* MATCH = BOOL2 T= '#'-MATCHED < L P* BIN12 => FMELI <NUMB OF PICCHARS> (FROM SUBROUTINE 'PI n L P* STATSH => PICTURE STRING 'FMELI' (FROM SUBROUTINE 'PICM
0x2056d8…20586c Dummy {f00=0x009c, f01=0x0190, f02=»****** ` * & "* MATCH FOR ' ':S => (FTAB) * B , (* TAB = BIN8 => FTAB <TABPOS> L ( #* NUMB = BIN16 => NOT USED | . P* MATCH = BOOL3 T= ' '-MATCHED * : 6************************************
0x20586c…205a00 Dummy {f00=0x009c, f01=0x0190, f02=»SED p F B* NUMB = BIN9 => FTEXT <NUMBER OF CHARS> <CH> <CH> ..... . ** MATCH = BOOL4 T= TEXT MATCHED V L P* BIN11 => STARTPOSITION OF 'FTEXT' IN ITEM 'LINE DESIGN : 6************************************************
0x205a00…205b94 (1, 420) Dummy {f00=0x009c, f01=0x0190, f02=»OVE STR1A,=C'<' CHARACTER TO BE SEARCHED & " CLEAR BOOL9 F=ORIGINAL MATCH MODE 0 . P PERF LININV,STR1A,BOOL9,BIN6,BIN16,BOOL2 Z P TBT BOOL2,MR60 MATCH FOUND $ P CBNE EOLINE,W0,MR99 END-OF-LINE . * MOVE STR1A,=C' ' CHARACTER TO BE SEARCHED
0x205b94…205d28 Dummy {f00=0x009c, f01=0x018e, f02=»UND x PMR05 0 P MOVE STR2A,=C'< ' CHARACTERS TO BE SEARCHED SET BOOL9 T=INVERTED MATCH L . ) PERF LININV,STR2A,BOOL9,BIN16,BIN9,BOOL4 p P MOVE BIN8,BIN11 P ADD BIN8,W1 P SET BOOL3 $ P CBNE EOLINE,W0,MR99 END-OF-LINE
0x205d28…205ebc Dummy {f00=0x009c, f01=0x0190, f02=» . P MOVE STR1A,=C'<' CHARACTER TO BE SEARCHED & " CLEAR BOOL9 F=ORIGINAL MATCH MODE : . P PERF LININV,STR1A,BOOL9,BIN6,BIN16,BOOL2 d P TBT BOOL2,MR50 MATCH FOUND $ P CBNE EOLINE,W0,MR99 END-OF-LINE P B MR05 * TEXT MATCH FO
0x205ebc…206050 Dummy {f00=0x009c, f01=0x0190, f02=»JUST ONE FTEXT r P* , P MOVE DEBIN4,BIN11 SAVE ST.POS FOT TEXT PMR35 P ( P MOVE DEBIN5,BIN5 SAVE LINE POSITION ( P MOVE STR1A,=' ' ' '=MATCH-CHARCTER & P CLEAR BOOL9 F=ORIGINAL MATCH MODE P CLEAR BOOL5 0 P PERF LININV,STR1A,B
0x206050…2061e4 Dummy {f00=0x009c, f01=0x018e, f02=»IF MORE THAN 4 SPACES x & P MOVE STR2A,='< ' MATCH CHARCTERS $ P SET BOOL9 T=INVERTED MATCH MODE H P CLEAR BOOL5 p 0 P PERF LININV,STR2A,BOOL9,DEBIN1,DEBIN2,BOOL5 * P TBF BOOL5,MR40 JUMP IF NO INV.-MATCH 2 P ADD BIN9,BIN16 ADJUST NUMB CHARS+
0x2061e4…206378 Dummy {f00=0x009c, f01=0x0190, f02=» 4 P MOVE BIN5,DEBIN5 RESTORE LINPOS WHEN NO SP+TEXT PMR45 @ . P MOVE BIN11,DEBIN4 RESTORE FTEXT STARTPOS L P B MR99 ~ PMR50 ( # CLEAR BOOL3 NO SP-MATCH INDICATION NEEDED PMR60 , P MOVE DEBIN5,BIN5 SAVE STARTPOIN PIC
0x206378…20650c Dummy {f00=0x009c, f01=0x0190, f02=»DESIGN INVESTIGATION PROCEDURE * & D ?* INPUT PARAMETERS : CHAR = CHARACTER(S) TO BE SEARCHED 0 < P* MOD = F ORIGINAL MATCHING x < 7* = T INVERTED MATCHING * < 7*
0x20650c…2066a0 Dummy {f00=0x009c, f01=0x0190, f02=» MATCH = F NO MATCH FOUND 6 P* = T MATCH FOUND , * f D ?*************************************************************** p ( PLININV PROC CHAR,MOD,TAB,NUMB,MATCH 6 P CBE BIN5,FMTWK(W5),LIN098 JUMP IF E
0x2066a0…206834 (1, 421) Dummy {f00=0x009d, f01=0x0190, f02=»00 ( P TBT MOD,LIN010 JUMP IF INVERTED MOD " MATCH LDES,BIN5,W1,CHAR,W0,W1 6 P BNOK LIN040 NO MATCH P B LIN020 NEXT MATCH z PLIN010 & P MOVE BIN15,W0 MATCHINGPOINTER:=0 & P MATCH CHAR,BIN15,W2,LDES,BIN5,W1 P BOK LIN050 MATC
0x206834…2069c8 Dummy {f00=0x009d, f01=0x0190, f02=» INVERTED MATCH FOUNF PLIN025 ADD BIN5,W1 NEXT POSITION , ADD TAB,W1 NEXT TABPOS N $ P ADD NUMB,W1 NUMBER OF MATCHES n 6 P CBE BIN5,FMTWK(W5),LIN098 JUMP IF ENDPOS REACHED P B LIN000 NEXT MATCH INV PLIN040 * & MOVE BIN5
0x2069c8…206b5c Dummy {f00=0x009d, f01=0x018e, f02=» LIN098 P MOVE EOLINE,W1 END-OF-LINE ADD TAB,W1 NEXT TABPOS 6 PLIN099 V RET d PEND p P EJECT ~ P* , P* LINE INITIALIZATION OF WORKITEMS P* PLINIT PROC " P MOVE BIN5,W0 LINEPOSITION:=0 P
0x206b5c…206cf0 Dummy {f00=0x009d, f01=0x0190, f02=» , P CLEAR DOOL1 F=NO FIELD CONFIRM CURRLINE $ P PERF FINIT FIELD INIT WORKITEMS 4 P RET P PEND h P EJECT v P* . P* FIELD INITIALIZATION OF WORKITEMS P* PFINIT PROC . P MOVE FMTWK(W1),W0 NUMB OF VALID. CHARS:=0
0x206cf0…206e84 Dummy {f00=0x009d, f01=0x0190, f02=»OF DUPL. CHARS:=0 x . P MOVE FMTWK(W10),W0 NUMB OF CHARS STRG1:=0 . P MOVE FMTWK(W11),W0 NUMB OF CHARS STRG2:=0 L 0 P MOVE FMTWK(W12),W0 NUMB OF CHARS STRG1+2:=0 ~ P RET P PEND P EJECT P* 0 P* PICTURE STRING MATCH AND CON
0x206e84…207018 Dummy {f00=0x009d, f01=0x0190, f02=»STPOS LDES Z $ P* 1 R FLENGTH PLENGTH F P* 2 A FLENGTH PLENGTH WORK : BIN16= MATCHININDEX : D P* 3 P FLENGTH PLENGTH BIN15= SAVED DITO $ P* 4 T FLENGTH PLENGTH $ P* 5 X FLE
0x207018…2071ac Dummy {f00=0x009d, f01=0x0190, f02=» BIN7 = FIELDLENGTH=MAXL l L P* 8 + PLENGTH BIN12= LENGTH OF PIC.-STR * H P* 9 S - PLENGTH STATSH=PICTURE-STRING z $ P* 10 , PLENGTH $ P* 11 . V P
0x2071ac…207340 Dummy {f00=0x009d, f01=0x0190, f02=» MATCH E PLENGTH+1 P* $ L P************************************************************************ . PPICMA PROC ~ , P MOVE STATSH,=' ' SPACES PICTURE-STRING * P MOVE BIN12,W0 NUMB OF LAYOUT CHARS:=0 " P MOVE DEBINW1,W0 SET NCLR-
0x207340…2074d4 (1, 422) Dummy {f00=0x009d, f01=0x0190, f02=»,DEBINW1 INITIATE FIELDCONTROLBITS DEF P MOVE BIN7,W0 FIELDLENGTH:=0 . P MOVE BIN16,W0 R ( P MATCH PICSTR,BIN16,W15,LDES,BIN5,W1 h P BNOK PICNE INSERT $ P CBE BIN16,W0,PICA0 JUMP IF = 0 , P IB BIN16,PICA1,PICN2,PICN3,PICN3, 1-4 C * P
0x2074d4…207668 Dummy {f00=0x009d, f01=0x0190, f02=»PICA1 ALPHANUMERIC RIGHT P SET REWRT INDICATE REWRITE " $ P SET SCHK2 RIGHT ADJUST ALPHANUM F PPICA0 ALPHANUMERIC LEFT n ( P SET ALPHA INICATE ALPANUMERIC FIELD PPICA $ P XCOPY STATSH,BIN12,W1,LDES,BIN5 P ADD BIN12,W1 NEXT PICCH
0x207668…2077fc Dummy {f00=0x009d, f01=0x0190, f02=»CH PICSTR,BIN16,W15,LDES,BIN5,W1 ( P CBE BIN16,W12,PIC99 '>' FOUND READY ( P B PICA T P* NUMERIC FIELDS d PPICN3 P SET REWRT PPICN2 $ P XCOPY STATSH,BIN12,W1,LDES,BIN5 & P ADD BIN7,W1 ADD 1 TO FIELD LENGTH P B PIC
0x2077fc…207990 Dummy {f00=0x009d, f01=0x0190, f02=» P SET SCHK1 INDICATE SIGN ! P SET REWRT INDICATE REWRITE ! $ P B PICNM NEXT MATCH ! H PPICN11 ! d P SET REWRT ! r $ P XCOPY STATSH,BIN12,W1,PICCON,W1 ! P B PICNM NEXT MATCH ! PPICN14 ! $ P XCOPY STATSH,BIN12,W1,PICCON,W3 ! & P SET SCHK2
0x207990…207b24 Dummy {f00=0x009d, f01=0x0190, f02=»PICNE ! $ P XCOPY STATSH,BIN12,W1,PICCON,W2 " P ADD BIN12,W1 NEXT CHARACTER " 6 PPICN10 " Z P SET REWRT INDICATE REWRITE " h $ P XCOPY STATSH,BIN12,W1,LDES,BIN5 " PPICNM " P ADD BIN12,W1 NEXT PICCHARS " $ P ADD BIN5,W1 NEXT LDES POSITION "
0x207b24…207cb8 Dummy {f00=0x009d, f01=0x0190, f02=»CNE 0=L =>EL " , P IB BIN16,PICNE,PICN2,PICN3,PICN3, 1-4 C # * P PICN3,PICN3,PICN3,PICN8,PICN9, 5-9 C # D , P PICN10,PICN11,PIC99,PICNE,PICN14 10-14 # r PPIC99 # P ADD BIN5,W1 # P RET # P PEND # P EJECT # P* # . P* FORMAT FIE
0x207cb8…207e4c Dummy {f00=0x009d, f01=0x0190, f02=»* INPUT VARIABLES: DEBIN5 = SAVED RESTARTPOINT OF PICTURESTRING # P* $ N P* $ X P* OUTPUT VARIABLES: $ b 4 P* DEBINW2 = 0 OK GO ON $ F P* = 1 NO AVAILABLE BUFFERS;CANCEL $ F P*
0x207e4c…207fe0 Dummy {f00=0x009d, f01=0x0190, f02=» $ P P* % L P*********************************************************************** % P* % b PFDIR PROC % l P* % ~ ( P* FORMAT DIREKTIV GENERATION % P* % * P MOVE DEBINW2,W0 ZEROISE OUTPUT PARAM % $ P TBF BOOL2,FDIR99 NO FIELD F
0x207fe0…208174 (1, 423) Dummy {f00=0x009d, f01=0x0190, f02=»ERROR SIGNALS % x , P TBT BOOL6,FDIR10 JUMP IF BALANCE FORMAT & " P PERF DESC GENERATE DESCRIPTOR & F * P CBNE DEBINW2,W0,FDIR99 ERROR SIGNALS & l $ P TBT ALPHA,FDIR34 JUMP IF ALPHA & PFDIR10 & , P MOVE BIN5,DEBIN5 RESTORE PIC.STARTPOINT & P PERF PI
0x208174…208308 Dummy {f00=0x009d, f01=0x0190, f02=»SP,W0,BIN5,LDES,W0 COPY TEXT & ( P TBT DOOL8,FDIR73 JUMP IF NO DISPLAY ' $ " P DISPLAY 2,W3,W3 DISPLAY LDISP ' P P EJECT ' v P* ' " P* FVAL (+) FGEN (+) FACC ' P* ' PFDIR73 ' & P SET BOOL1 T=FIRTS FIELD CONFIRMED ' ( P SET DOOL1 T=FIELD
0x208308…20849c Dummy {f00=0x009d, f01=0x0190, f02=» & P MOVE DEBIN4,W0 STARTPOS IN JOBSPC ( , P MOVE DEBIN5,W0 NUMB OF DELETED CHARS:=0 ( . PFDIR75 ( ^ P MOVE STRG10A,='#V:#G:#A:' ( l ( P MOVE FBIN1,W0 FUNCINDEX POINTER:=0 ( , P MATCH STRG10A,FBIN1,W9,JOBSPC,DEBIN4,W3 ( " P BNOK FDIR85 NO MORE FUNCTIONS
0x20849c…208630 Dummy {f00=0x009d, f01=0x0190, f02=»H ( . P PERFI FBIN1,FVAL,FGEN,FACC FVAL,FGEN,FACC ) * P CBNE DEBINW2,W0,FDIR99 ERROR SIGNALS ) < 2 P MOVE DEBIN1,DEBIN4 STARTPOS'JOBSPC' NEXT FUNC ) j " P B FDIR75 GO ON NEXT FUNCTION ) PFDIR85 ) ( P CALL EMPTYT,DUPL LOOK IF DUPL EMPTY ) P BNOK FD
0x208630…2087c4 Dummy {f00=0x009d, f01=0x0190, f02=»D CHARS:=0 ) r P PERF FDUPL * PFDIR90 * & P TBF DOOL8,FDIR99 * 4 " P ERASE 11,W4,W0 CLEAR IN CORE * N PFDIR99 * t P RET * P PEND * P EJECT * P* * $ P* DESCRIPTOR-TABLE STORING * P* * & P* EACH FIELD TAKES TW0 WORDS
0x2087c4…208958 Dummy {f00=0x009d, f01=0x0190, f02=»LE * f P* -LENGTH BITS 4-15 + P* (BYTE 1) + . D P* BITS 0-15= - NUMBER OF MATCHED #:S WHEN STRG + R J P* (BYTE 2) - (NUMBER OF MATCHED #:S + 1)/2 WHEN BCD + P* + P* WORD2 + B P
0x208958…208aec Dummy {f00=0x009d, f01=0x0190, f02=»******************************************************************** + PDESC PROC , L P MOVE BIN16,W0 WORKITEM:=0 , ^ , P MOVE BIN15,BIN7 LOAD NUMBER OF '#'-POS , $ P TBT ALPHA,DESC10 JUMP IF ALPHA , P* , P* NUMERIC FIELD , P* , &
0x208aec…208c80 Dummy {f00=0x009d, f01=0x0190, f02=»OAD TYPE AND LENGTH , ~ : P XCOPY BPOOL(BIN4),BIN2,W2,BIN16,W0 STORE TYPE/LENGTH - P ADD BIN2,W2 NEXT POS - Z ( P MOVE BIN16,BIN13 RESTORE LAST DISPL - x ( P ADD BIN16,BIN14 ADJUST DISPLACEMENT - < P XCOPY BPOOL(BIN4),BIN2,W2,BIN16,W0 STORE DISPLACEMENTS
0x208c80…208e14 (1, 424) Dummy {f00=0x009d, f01=0x0190, f02=»,DESC99 JUMP IF NOT END OF BUFFER - PDESC20 . * , P MOVE BIN16,W1 NUMBER OF WANTED BUFFERS . 8 < P PERF DEPOOL,W3,BIN16,BIN4,STRG10A CHAIN ANOTHER BUFFER . h P BNOK DESC30 . P MOVE DEBINW2,W0 . , P MOVE BIN4,BIN16 LOAD NEW BUFFERPOINTER . , P ADD
0x208e14…208fa8 Dummy {f00=0x009d, f01=0x4100, f02=»E BPOOL(BIN4),HEX00 . " P MOVE BIN2,W0 BUFFER PONTER:=0 / P B DESC99 / B PDESC30 / T P PERF DERROR,DEKTAB7 / b P CBE DEBINW2,W1,DESC20 / ~ ( P SUB DEBINW2,W1 ADJUST FOR CANC RET / PDESC99 / P RET / P PEND / END / @ / , P ADD
0x208fa8…20913c Dummy {f00=0x009d, f01=0x2008, f02=» 0 END , @ , NOK DESC30 + , P MOVE BIN4,BIN16 LOAD NEW BUFFERPOINTER + * P MOVE DEBINW2,W0 + Z , P ADD PINACC,W1 NUMBER OF DESC-BUFFERS+1 + r P MOVE BPOOL(BIN4),HEX00 + " P MOVE BIN2,W0 BUFFER PONTER:=0 + P B DESC99 + PDESC30 + P
0x20913c…2092d0 Dummy {f00=0x009d, f01=0x0190, f02=» @ H IDENT PTSDE TRA 5.0 80-10-28 F1 O1111 REL 10.0 80-04-11 ) > : ATTDEV ATTPRT DEANOK DEAOK0 DEAOK1 DEAOK2 DEAOK4 ) H < 8 DEAPPLS DEFINDA DEPMSK0 DEPRUTF DETCHK DETPRT. PTSDE ) $$$TRA ) B > ATTDEVS ATTPRTD DEANOKP DEAOK0H h D
0x2092d0…209464 Dummy {f00=0x009d, f01=0x0190, f02=»HANFCP CONDD DE10ST+ DE20STK DE30STU DE40STT DE50ST ) > : DE60STS DE70STE DEAP1AA DEAP2AD DEAP3Ah DEAP5A. DEAP7AK * < @ < DECLRA DERRF GETINDD GETVOL+ MSKOUTK OPCLS POOLA RESTOR5 * ~ D @ SAVES T:ABORS T:ATTF1 T:DELA2 T:DISP3 T:DSC05 T:DSC17 T:ERAS * ,
0x209464…2095f8 Dummy {f00=0x009d, f01=0x0190, f02=» * + + * + H + + t + + + +
0x2095f8…20978c Dummy {f00=0x009d, f01=0x018e, f02=» + , 0 , ( , 8 , H $ , X , , h 4 , x , " , - " , 5 4 , 6 ' , : , J F " D 0R 0}0R o0R oA T 0R K 0RAd
0x20978c…209920 Dummy {f00=0x009d, f01=0x018e, f02=» , i - j - k - ( l - 8 m - H n - X o - h q . - x | * - J F " D @) R!P V R_, R6 !! _ jX 3 RRRRRRRRRR0R 0}@d R"P - " - d -
0x209920…209ab4 (1, 425) Opaque[0x194]
0x209ab4…209c48 # DirEnt {nam=»DATUM «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x13c0, f03=0x0000}
0x209ab4…209c48 IdxSect {
0x209ab4…209c48 f00 = 0x009e // 0x209ab4 @0x0
0x209ab4…209c48 f01 = 0x0004 // 0x209ab6 @0x2
0x209ab4…209c48 gno = [ // 0x209ab8 @0x4
0x209ab4…209c48 [0x00]: C0x009e.0x0.0
0x209ab4…209c48 [0x01]: C0x009e.0x1.0
0x209ab4…209c48 ]
0x209ab4…209c48 }
0x209c48…209ddc Dummy {f00=0x009e, f01=0x0190, f02=» " IDENT DATCHK 79-03-16/PEEN * * * 4 2 -* THIS ROUTINE CHECKS THE DATE PLAUSIBILITY > 2 .* EUROPEAN (AA-MM-DD) OR AMERICAN (MM-DD-AA) t < 8* STANDARD. 'DD' IS CHECKED ACCORDING TO CORRESPONDING * MONTH. FEBRUARI NOT > 29
0x209ddc…209f70 Dummy {f00=0x009e, f01=0x0190, f02=» SKIP = BIN ITEM TELLING HOW MANY DIGITS COUNTED @ ;* FROM THE RIGHT TO BE SKIPPED BEFORE THE : * &* CHECK IS PERFORMED ~ B >* BUFF = STRING ITEM HOLDING THE DATA TO BE CHECKED * ( #*
0x209f70…20a104 Dummy {f00=0x009e, f01=0x0190, f02=» EXTRN I:EVA0 EXTRN I:RT1 * * * 4 CALL FORM 16=/F6A1,16 > BYTE FORM 8,8 * r * | DATCHK EQU * LDK A6,2 SET SWITCH " CALL I:EVA0 NO. TO BE SKIPPED LDR* A7,A9 CALL I:EVA0 BUFFER ADDR
0x20a104…20a298 Dummy {f00=0x009e, f01=0x0190, f02=» CALL GETDIG " * MULTIPLY DIGIT BY 10 AND ADD ADR A7,A1 > ADR A7,A1 P SLL A1,3 TIMES 8 b ADR A7,A1 | RF(Z) NOK SUK A6,1 0 + RF(Z) DAT200 JUMP IF DD AND MM ARE FETCHED LDR A8,A7 SAVE DAY LDK A
0x20a298…20a42c Dummy {f00=0x009e, f01=0x0190, f02=»AB,A7 GET BYTE FOR COMPARISON SUR A1,A8 & RF(NL) OUT IF OK 8 NOK EQU * R LDK A6,1 INDICATE CR = 1 d OUT EQU * LD A1,2,A13 GET STACK BASE SC A6,-2,A1 STORE CR ABL I:RT1 EJECT GETDIG EQU *
0x20a42c…20a5c0 Dummy {f00=0x009e, f01=0x414a, f02=»B(L) GETDIG CCK A1,'99' RB(G) GETDIG ( ANK A1,/F > RTN A14 P * ` * j TAB EQU *+12 t BYTE 31,29 JAN,FEB BYTE 31,30 MAR,APR BYTE 31,30 MAY,JUN BYTE 31,31 JUL,AUG BYTE 30,31 SEP,
0x20a5c0…20a754 (1, 426) Dummy {f00=0x009e, f01=0x2008, f02=»
0x20a754…20a8e8 Dummy {f00=0x009e, f01=0x002a, f02=» H P p x ( h 8 p x @ H X
0x20a8e8…20aa7c Dummy {f00=0x009e, f01=0x0190, f02=»I0 } CRs . D V f D Y D J D _ D b & D g D l D p D t D w D | f D D D D h D R D D 4 D D 8 D F : 6 P
0x20aa7c…20ac10 Dummy {f00=0x009e, f01=0x0190, f02=»T1 * * .
0x20ac10…20ada4 Dummy {f00=0x009e, f01=0x0190, f02=» . P P ` 0 P @ @ N f .
0x20ada4…20af38 Dummy {f00=0x009e, f01=0x0190, f02=»
[…0x2…]
0x20b260…20b3f4 (1, 427) Opaque[0x194]
0x20b3f4…20b588 # DirEnt {nam=»DE1201«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x13d0, f03=0x0000}
0x20b3f4…20b588 IdxSect {
0x20b3f4…20b588 f00 = 0x009e // 0x20b3f4 @0x0
0x20b3f4…20b588 f01 = 0x0008 // 0x20b3f6 @0x2
0x20b3f4…20b588 gno = [ // 0x20b3f8 @0x4
0x20b3f4…20b588 [0x00]: C0x009e.0x2.0
0x20b3f4…20b588 [0x01]: C0x009e.0x3.0
0x20b3f4…20b588 [0x02]: C0x009f.0x0.0
0x20b3f4…20b588 [0x03]: C0x009f.0x1.0
0x20b3f4…20b588 ]
0x20b3f4…20b588 }
0x20b588…20b71c Dummy {f00=0x009e, f01=0x0190, f02=» $ P IDENT DE1201 REL 10.0 80-04-11 P 80-02-13/DALI , 2 P********************************************* D 2 P* BOOL1 : T=GET V-S F=CREATE V-S * z 2 P* BOOL2 : T=LINE 1-2 F=LINE 1-3 * 2 P* BOOL3 : T=LINE 1-5 F=LINE
0x20b71c…20b8b0 Dummy {f00=0x009e, f01=0x0190, f02=»ELEM.IN THIS RECORD * * P* BIN3 SIZE OF ELEMENT * * P* BIN4 FIRST EL.NO. IN RECORD * L * P* BIN5 LAST - " - * z * P* BIN6 ELMNO - BIN4 + W1 * * P* BIN7 = 0 * * P* B
0x20b8b0…20ba44 Dummy {f00=0x009e, f01=0x0190, f02=»DUM DEDDIV P PDIV P ENTRY ENT12 P* 4 P EXT FMOVE > P EXT DERR P P EXT CANC11 b P EXT CANC12 v P EXT ATTWB P EXT ATTDB P EXT DECLRN P EXT DEPOOL P EXT DERROR P EXT DEDISC P EXT TESTB
0x20ba44…20bbd8 Dummy {f00=0x009e, f01=0x0190, f02=»LR,CAN,RET P* PDEKTAB9 KTAB CLR,CAN,RET,ENT P* @ P EJECT J PENT12 X P TBF BOOL1,E1 IF CREATE f P B GET PE1 P MOVE ELMNO,W1 & P********************************* & P* MODUL 12 - CREATE VALUE-SET * & P
0x20bbd8…20bd6c Dummy {f00=0x009e, f01=0x0190, f02=»LEASE BUFFER j & P MOVE DEBINW4,W8 'ALREADY DEFINED' PE2 > P MOVE DEBINW1,W0 H P PERF DERROR,DEKTAB6 ` P SUB DEBINW2,W1 | < P CALL RESTOR,W3,W4,PWBDB4 RESTORE ORIG. DESCR.-POINTERS P B A20 PE8 " P CBE DEBINW4,W9,E10 NOT FOUN
0x20bd6c…20bf00 Dummy {f00=0x009e, f01=0x0190, f02=»A,=X'545400' T(ABLE) 2 P COPY STRG10A,W2,W2,DEINPUT,W0 VALUE-SET-NAME < P PERF DEPOOL,W2,PINDTB,BIN7,STRG10A GET BUFFER WITH LOCK R P BNOK ERR99 2 P PERF DEPOOL,W4,PINDTB,BIN7,STRG10A SET BUFFER P MOVE BPOOL(PINDTB),HEX00 P CLEAR BOO
0x20bf00…20c094 (1, 428) Dummy {f00=0x009e, f01=0x0190, f02=»NW2,CANC12,CANC12,E20 P MOVE DEBINW4,W0 'BELL' P PERF DERR > P B E16 P PE20 ^ & P MOVE BIN4,W1 1:ST EL.NO. IN REC. j P MOVE BIN2,=W'180' P MOVE STR1A,STR2A P CBE STR1A,=C'N',E24 & P DIV BIN2,BIN3 NO.OF ELEM. IN REC.
0x20c094…20c228 Dummy {f00=0x009e, f01=0x0190, f02=»OVE BIN10,=X'B000' IF BCD ='1011' " P MOVE BIN1,BIN3 NUMERIC INPUT , P DIV BIN1,W2 R P ADD BIN1,W1 BYTES f P ADD BIN10,BIN1 ( P DIV BIN2,BIN1 NO. OF ELEM. IN REC. PE30 ( P MOVE BIN5,BIN2 LAST EL.NO. IN REC. 6 P XCOPY BPOOL
0x20c228…20c3bc Dummy {f00=0x009e, f01=0x0190, f02=»ODIFY FORMAT P CALL FMOVE,STR64A,FORMA P CALL TESTB,BIN10,W2 4 P BZ E32 P P CALL FMOVE,STR64A,FORMN ` PE32 $ P XCOPY STR64A,W3,W1,BIN3,W1 SIZE P MOVE ELMNO,W1 P MOVE BIN6,W1 INDEX P B E36 P* ENTER ELEMENT
0x20c3bc…20c550 Dummy {f00=0x009e, f01=0x0190, f02=»IT12 RECORD FILLED P BNOK ERR99 PE37 . $ P CALL ATTWB,BPOOL(PINDTB),W8,W11 : $ P CALL ATTDB,BPOOL(PINDTB),W0,W11 b P MOVE ACK(W1),ELMNO P MOVE BIN6,ELMNO INDEX P SUB BIN6,BIN4 P ADD BIN6,W1 P DISPLAY 3,W4,W4 FIELD 4
0x20c550…20c6e4 Dummy {f00=0x009e, f01=0x0190, f02=» PERF DECLRN PE45 6 P IB DEBINW2,CANC12,CANC12,E35,E56,E56,E56,E56,E60 PE56 Z P MOVE DEBINW4,W0 'BELL' f P PERF DERR P IB DEBINW2,E42,CANC12 P B E45 PE60 , P CBE ELMNO,BIN4,E70 =1:ST EL.NO. IN REC. " P PERF WR
0x20c6e4…20c878 Dummy {f00=0x009e, f01=0x018e, f02=»********************* $ P* MODUL 13 - GET VALUE-SETS * $ P******************************* F PGET n P SET BOOL2 z P MOVE ELMNO,W1 $ P PERF READ12,W24 GET VALUE-SETS P BERR ERR99 P SET DEPROMPT P B B40 PFORW
0x20c878…20ca0c Dummy {f00=0x009e, f01=0x0190, f02=» P SUB ELMNO,W1 P CBL ELMNO,W1,B10 . P CBL ELMNO,BIN4,B20 < 1:ST EL.NO. IN REC. 8 P B B50 j PB10 x $ P MOVE ELMNO,W1 BACKW NOT LESS 1 P B B50 PB20 " P PERF READ12,W24 GET VALUE-SET P BOK B40 $ P CBE DEBINW4
0x20ca0c…20cba0 Dummy {f00=0x009e, f01=0x0190, f02=»0 P CLEAR BOOL2 LINE 1-3 P SET BOOL3 LINE 1-5 ( P MOVE BIN6,ELMNO INDEX D P SUB BIN6,BIN4 b P ADD BIN6,W1 x P MOVE ACK(W1),ELMNO P ERASE 0,W5,W5 LINE 5 P TBT DEPROMPT,B55 P DISPLAY 3,W4,W5 PB55 P SET
0x20cba0…20cd34 (1, 429) Dummy {f00=0x009f, f01=0x0190, f02=» P MOVE DEBINW4,W0 'BELL' P B B84 $ PB80 2 P MOVE DEBINW4,W9 'NOT FOUND' > P SUB ELMNO,W1 b P SET DENOCHAN x PB84 P PERF DERR P B B60 P* P* INSERT NEW ELEMENT PINS P AFTER LAST ELEMEN
0x20cd34…20cec8 Dummy {f00=0x009f, f01=0x0190, f02=» l P ADD ELMNO,W1 P B I10 PI20 , P SUB ELMNO,W1 8 " P PERF READ12,W24 GET VALUE-SET N P MOVE BIN1,BIN4 t P ADD BIN1,BIN2 P SUB BIN1,W1 P CBE ELMNO,BIN1,I30 P MOVE BIN5,BIN1 4 P PERF DEPOOL,W8,PINDTB,BIN7,ST
0x20cec8…20d05c Dummy {f00=0x009f, f01=0x0190, f02=» BIN4,W1 P ADD BIN5,BIN2 P MOVE BIN1,PINDTB & 6 P PERF DEPOOL,W6,PINDTB,BIN7,STRG10A RELEASE BUFFER @ P MOVE PINDTB,W1 1 BUFFER z ( P MOVE BIN7,W0 NO CONSECUTIVE BUFFERS " P MOVE STRG10A,=X'5400' T(ABLE) P COPY STRG10A,W1,W3,TABLE,W0
0x20d05c…20d1f0 Dummy {f00=0x009f, f01=0x0190, f02=»R99 2 P PERF DEPOOL,W4,PINDTB,BIN7,STRG10A SET BUFFER $ P MOVE BPOOL(PINDTB),BPOOL(BIN1) B $ P CALL ATTWB,BPOOL(PINDTB),W8,W11 j P B E35 PERR13 $ P MOVE DEBINW4,W13 'NO WORKSPACE' PERR99 P MOVE DEBINW1,W0 P PERF DERROR
0x20d1f0…20d384 Dummy {f00=0x009f, f01=0x018e, f02=»ORRECTION x P* P* DELETION P* 0 2 P PERF DEPOOL,W4,PINDTB,BIN7,STRG10A SET BUFFER : PC40 p . P MOVE DEBINW4,W17 'PRESS ENT FOR DELETION' | P PERF DERROR,DEKTAB9 P SUB DEBINW2,W1 ADJUST * P IB DEBINW2,B50,ERA20,C50 CAN,RE
0x20d384…20d518 Dummy {f00=0x009f, f01=0x018e, f02=» P BNOK C75 6 P PERF DEPOOL,W6,PINDTB,BIN7,STRG10A RELEASE BUFFER 6 P PERF DEPOOL,W5,PINDTB,BIN7,STRG10A SEARCH BUFFER P P BOK C55 P MOVE BIN8,=W'25' & P PERF DEDISC,BIN8 DELETE VALUE0SET P BOK CANC12 CANC-KEY PC75 & P S
0x20d518…20d6ac Dummy {f00=0x009f, f01=0x0190, f02=» P* CORR. VALUE-SET * P********************* " 4 P PERF DEPOOL,W8,PINDTB,BIN7,STRG10A LOCK BUFFER @ P BNOK C75 x P PERF DECLRN PC711 " P IB DEBINW2,CANC12,CANC12,C72 P MOVE DEBINW4,W0 P PERF DERR P B C711
0x20d6ac…20d840 Dummy {f00=0x009f, f01=0x0190, f02=»RB,RPOOL(PINDTB),W0 UNLOCK BUFFER P B B50 * P EJECT 8 PREAD12 PROC FC F P MOVE DEINPUT,STR64A P PERF DEDISC,FC x P MOVE STR64A,DEINPUT P BERR R10 P MOVE BIN3,W0 @ P XCOPY BIN3,W1,W1,BPOOL(PINDTB),W1 SIZE OF ELEMENT I
0x20d840…20d9d4 (1, 430) Dummy {f00=0x009f, f01=0x018e, f02=» | P CALL TESTB,BIN10,W2 P BZ R05 $ P MOVE STR2A,=X'4E00' C'N' 4 P CALL FMOVE,STR64A,FORMN V P MUL BIN3,W2 v P SUB BIN3,W1 PR05 $ P XCOPY STR64A,W3,W1,BIN3,W1 SIZE P MOVE TIME,BIN3 > P XCOPY BIN2,W0,W2,BPOOL(PINDTB
0x20d9d4…20db68 Dummy {f00=0x009f, f01=0x0190, f02=» X : P XCOPY BIN5,W1,W1,RPOOL(PINDTB),W18 LAST ELEM. IN REC. P CMP W1,W1 SET S=0 F PR10 ` P RET l P PEND x P EJECT P* PFORMN FRMT * P FKI 1,NUM,MINL=1,MAXL=1,REWRT,SCHK=1 0 P FMEL 'XXXXXXXXXXXXXXXXXXXXX-',FDVBCD(BIN6
0x20db68…20dcfc Dummy {f00=0x009f, f01=0x40c4, f02=»L=1,NEOI,ME x P* FCOPY FDVBCD(BIN6) 6 P FCTL X'F0',1,X'C1',X'01',X'00',X'C0',FDVBCD(BIN6) 0 P FNL j P FKI 1,MINL=0,MAXL=0 v P FCOPY HEX00 P FMEND END @ XL=1,REWRT,SCHK=1 0 P FMEL 'XXXXXXXXXXXXXXXXXXXXX-',FDVBCD(BIN6
0x20dcfc…20de90 Dummy {f00=0x009f, f01=0x2008, f02=» NT DE12ST DDUM DEDDIV PDIV . ENTRY DE12ST < DE12ST R PROC ` RET n PEND z END @ KITEM PSTR6A STRG 6 WORKITEM PSTRG10A STRG 10 WORKITEM PDIV END @ ARIABL
0x20de90…20e024 Dummy {f00=0x009f, f01=0x0190, f02=»99999999999999999999 ~ * & 99999999999999999+ 1 * & ) 73 @ U 72 > 5 ? J * & G 71 > 6 = l 1 x * & e # ! 8 : !A k * & : 8 : "A l # ! * &
0x20e024…20e1b8 Dummy {f00=0x009f, f01=0x4174, f02=» FETCHING FORMAT: FROM DI * & SC. @ UF * * & 7 X * & U $ + 4 > I0 V0 W * & s * & ( 7 F U e
0x20e1b8…20e34c Dummy {f00=0x009f, f01=0x4014, f02=» HNOD @ | 0@ B
0x20e34c…20e4e0 Dummy {f00=0x009f, f01=0x0190, f02=» IDENT P:S016 F : > B " * & !11 P Q 0U80 88 R*j @ * & - !! oU 20 !jo! 3j n * & K o " 11 W % 1 "11 H 03W 11 * & i !04 ! 6 W"0 0 * & $(
0x20e4e0…20e674 (1, 431) Opaque[0x194]
0x20e674…20e808 # DirEnt {nam=»DEATTF«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x13f0, f03=0x0000}
0x20e674…20e808 IdxSect {
0x20e674…20e808 f00 = 0x009f // 0x20e674 @0x0
0x20e674…20e808 f01 = 0x0006 // 0x20e676 @0x2
0x20e674…20e808 gno = [ // 0x20e678 @0x4
0x20e674…20e808 [0x00]: C0x009f.0x2.0
0x20e674…20e808 [0x01]: C0x009f.0x3.0
0x20e674…20e808 [0x02]: C0x00a0.0x0.0
0x20e674…20e808 ]
0x20e674…20e808 }
0x20e808…20e99c Dummy {f00=0x009f, f01=0x0190, f02=» $ P IDENT DEATTF REL 10.0 80-04-11 P 80-04-14/JAER , P* D B P* THIS ROUTINE ATTACHES ACTUAL FORMAT DEFINITION FORMAT N P* P DDUM DEDDIV P PDIV P ENTRY DEATTF P EJECT PDEATTF PROC , P TBT BOOL6,ATT10
0x20e99c…20eb30 Dummy {f00=0x009f, f01=0x0190, f02=»ORMAT DEF r PATT99 P RET P PEND , EJECT : F21FD FRMT H FSL Z FTEXT '21 USER ' f FCOPY ='FORMAT' FILLR ' ',1 FCOPY ='DEFINITION' $ P FBF BOOL7,F21A JUMP IF NEW-REG. P FTAB 35 P FHIGH
0x20eb30…20ecc4 Dummy {f00=0x009f, f01=0x0190, f02=» ='FIELD' FTEXT =': F' FINP 9 ( P FMEL 'XXX',FDVBCD(W4) 8 P FTAB 15 V P FCOPY ='START:' f P FINP 22 ~ P FMEL 'ZZ',FDVBCD(W5) P FTAB 30 FCOPY ='LENGTH' P FILLR ':',1 P FINP 38 P FMEL 'ZZ',FDVBC
0x20ecc4…20ee58 Dummy {f00=0x009f, f01=0x0190, f02=» P FMEL 'TTTT',FDVBCD(W8) FNL $ P FNL 0 P FTAB 10 < P FTEXT 'KEYED INPUT ' L P FILLR '(',1 j P FUL ~ P FILLR 'Y',1 P FNUL P FTEXT '/N/C):' , P FKI 32,APPL=108,ALPHA,MAXL=1,NEOI,CTAB P FCOPY FDVSTR(W1)
0x20ee58…20efec Dummy {f00=0x009f, f01=0x0190, f02=»T,NEOI,CTAB t P FMEL 'XX',FDVBCD(W7) P FNL 2 P FTAB 10 > P FTEXT 'MUST ENTER ' N P FTEXT '(Y/' l P FUL P FILLR 'N',1 P FNUL P FTEXT '/C):' , P FKI 32,APPL=114,MAXL=1,ALPHA,NEOI,CTAB P FCOPY FDVSTR(W2)
0x20efec…20f180 Dummy {f00=0x009f, f01=0x0190, f02=» '):' , P FKI 64,APPL=115,MAXL=1,ALPHA,NEOI,CTAB P FCOPY FDVSTR(W3) > FNL X P FTAB 10 d P FTEXT 'DUPLICATE ' t P FTAB 29 P FILLR ':',1 2 P FKI 32,APPL=106,ALPHA,MAXL=6,MINL=1,NEOI,CTAB FCOPY DUPL P FTAB 46
0x20f180…20f314 (1, 432) Dummy {f00=0x009f, f01=0x0190, f02=»LR ':',1 , P FKI 64,APPL=116,MAXL=1,ALPHA,NEOI,CTAB P FCOPY FDVSTR(W4) @ FNL Z P FTAB 10 f P FTEXT 'INITIAL CLEAR ' v P FILLR '(',1 P FUL P FILLR 'Y',1 P FNUL P FTEXT '/N):' , P FKI 32,APPL=117,MAXL=1,AL
0x20f314…20f4a8 Dummy {f00=0x009f, f01=0x0190, f02=»B j P FMEL 'ZZVZZZ',SPEC FNL & P FNL 2 P FCOPY ='VALIDATION ' > P FCOPY ='(#V:...)' P FTAB 25 v P FCOPY ='GENERATION ' P FCOPY ='(#G:...)' P FTAB 50 P FCOPY ='ACCUMULATION ' P FCOPY ='(#A:...)' P
0x20f4a8…20f63c Dummy {f00=0x009f, f01=0x0190, f02=»XL=80,ALPHA,NEOI,CTAB ~ * P FCOPY FORTAB(W2) VAL-GEN-ACC-STRING2 FNL L P FKI 1,CTAB X P FCOPY HEX00 l FMEND P EJECT PF22FD FRMT P FSL P FTEXT '22 BALANCE ' FCOPY ='FORMAT' FILLR ' ',1 FCOPY
0x20f63c…20f7d0 Dummy {f00=0x009f, f01=0x018e, f02=» P FNL FNL P FLINK F20COM FNL 6 P FNL B P FTAB 10 N P FCOPY ='START' ^ P FTAB 27 v P FILLR ':',1 P FINP 30 P FMEL 'ZZ',FDVBCD(W5) P FTAB 46 FCOPY ='LENGTH' P FTAB 62 P FILLR '
0x20f7d0…20f964 Dummy {f00=0x009f, f01=0x0190, f02=» v , P FKI 30,APPL=109,MAXL=2,REWRT,NEOI,CTAB P FMEL 'XX',FDVBCD(W8) 8 P FTAB 46 V FTEXT 'SPECIAL HANDLING:' f , P FKI 64,APPL=107,MAXL=5,REWRT,NEOI,CTAB P FMEL 'ZZVZZZ',SPEC FNL P FNL P FCOPY ='VALIDATION '
0x20f964…20faf8 Dummy {f00=0x009f, f01=0x0190, f02=»ALPHA,NEOI,CTAB x * P FCOPY FORTAB(W1) VAL-GEN-ACC-STRING1 P FNL F , P FKI 1,APPL=112,MAXL=80,ALPHA,NEOI,CTAB R * P FCOPY FORTAB(W2) VAL-GEN-ACC-STRING2 FNL P FKI 1,CTAB P FCOPY HEX00 FMEND P EJECT PF20COM F
0x20faf8…20fc8c Dummy {f00=0x009f, f01=0x018e, f02=» FTAB 16 FCOPY ='PAGE' FTEXT ' SIZE:' * 4 P FKI 27,APPL=102,NEOI,MINL=1,MAXL=2,ME,NCLR,CTAB B P FMEL 'AA',FDVBCD(W1) z FTAB 30 P FCOPY ='LINE ' FCOPY ='NUMBER' FILLR ':',1 FINP 43 P FMEL 'Z9',F
0x20fc8c…20fe20 Dummy {f00=0x009f, f01=0x018e, f02=» FNL FTAB 10 FILLR '1',1 FTAB 20 4 FILLR '2',1 D FTAB 30 X FILLR '3',1 h FTAB 40 | FILLR '4',1 FTAB 50 FILLR '5',1 FTAB 60 FILLR '6',1 FTAB 70 FILLR '7',1
0x20fe20…20ffb4 (1, 433) Dummy {f00=0x00a0, f01=0x4152, f02=» z FCOPY ='1234567890' FCOPY ='1234567890' $ FCOPY ='1234567890' @ FCOPY ='1234567890' P FCOPY ='123456789 ' x P FILLR X'80',1 FNL P FINP 1 FCOPY LDISP FNL 6 P FKI 1,APPL=110,ALPHA,MAXL=80,DUPL
0x20ffb4…210148 Dummy {f00=0x00a0, f01=0x2008, f02=» NT DE12ST DDUM DEDDIV PDIV . ENTRY DE12ST < DE12ST R PROC ` RET n PEND z END @ KITEM PSTR6A STRG 6 WORKITEM PSTRG10A STRG 10 WORKITEM PDIV END @ ARIABL
0x210148…2102dc Dummy {f00=0x00a0, f01=0x004c, f02=» HTRA DEATTF HKPF /O HXRF DEATTF $ HSKF 2 6 HEND D 4 1234567890 P $ 4# j 5 123456789 z $ 5# & & & & & & n @ &
0x2102dc…210470 Dummy {f00=0x00a0, f01=0x2008, f02=» DEATTF HKPF /O HXRF DEATTF $ HSKF 2 6 HEND D 4 1234567890 P $ 4# j 5 123456789 z $ 5# & & & & & & n @ &
0x210470…210604 Dummy {f00=0x00a0, f01=0x0190, f02=» A 7 #0 T 7 #0 T V A F< W 4R 3V 2B/ 3Z _ 4 5| 5( P 7 <H : 2jW 4 5( 7 / <H "!@ F : 4 58 C C W 5D C C J2 ' W 781"&$ 39#$;< '()*+,-! 5D 5| 5( 7 P _D 4 B 7
0x210604…210798 Dummy {f00=0x00a0, f01=0x0190, f02=» ' P" 3 P B % P C + 6" A 4 I "%@P "% P& B C C 4 "5 # B P B P B 5 P C : 4 4 = 3 C 3 C B B P C 46 : "!@T F< V I C B : ( ' P 4 I : 4 5( % Y 7V C
0x210798…21092c Dummy {f00=0x00a0, f01=0x0190, f02=»T # ' ?D 9 W.' #? 9 V H F0 ;D:B " : _, 7 C : : 4 58 7< P C W $0 P E C 5 : "!@P ") # B C B % C C : 7<#0 T & C C : 5 C C : & T ;d# P V
0x21092c…210ac0 Dummy {f00=0x00a0, f01=0x0190, f02=» P7 7 PR L6 R R _ R _ # Q R V > _V X^ ' h P P & 1_ P 1_ , @ - R T U :J a B@ ' d w5 1 7 : B > F :l:d:h 7 W W P W 6 2#
0x210ac0…210c54 (1, 434) Opaque[0x194]
0x210c54…210de8 # DirEnt {nam=»DESTAT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1408, f03=0x0000}
0x210c54…210de8 IdxSect {
0x210c54…210de8 f00 = 0x00a0 // 0x210c54 @0x0
0x210c54…210de8 f01 = 0x0002 // 0x210c56 @0x2
0x210c54…210de8 gno = [ // 0x210c58 @0x4
0x210c54…210de8 [0x00]: C0x00a0.0x1.0
0x210c54…210de8 ]
0x210c54…210de8 }
0x210de8…210f7c Dummy {f00=0x00a0, f01=0x0190, f02=» $ P IDENT DESTAT REL 10.0 80-04-11 P 79-05-28/DALI , DDUM DEDDIV D PDIV X P ENTRY DESTAT f ENTRY DESTAU | EXT TESTB P EXT UPDBIN INCLUDE DELITT P EJECT P*********************** P* P
0x210f7c…211110 Dummy {f00=0x00a0, f01=0x0190, f02=» P* FIX BATCHSTATUS P CALL UPDBIN,BDSTAT P PERF DESTAU,BDSTAT,STR15A : P MOVE BCD13A,BDPOIN(W2) P TBF SOOL2,DESTUT | P* P* FIX RECORDSTATUS P* P CALL UPDBIN,BIN1 P PERF DESTAU,BIN1,STRG10A PDESTUT
0x211110…2112a4 Dummy {f00=0x00a0, f01=0x4162, f02=»DEBINW2,W0 MOVE DEBINW3,W0 MOVE DEBINW4,W0 * " XCOPY DEBINW3,W0,W1,STBIN,W1 B DES100 h CALL TESTB,DEBINW3,DEBINW4 v BZ DES200 * & COPY STSTRG,DEBINW2,W1,STATIU,DEBINW4 ADD DEBINW2,W1 DES200 ADD DEB
0x2112a4…211438 Dummy {f00=0x00a0, f01=0x2008, f02=» NW3,W0 MOVE DEBINW4,W0 " XCOPY DEBINW3,W0,W1,STBIN,W1 . DES100 T CALL TESTB,DEBINW3,DEBINW4 b BZ DES200 * & COPY STSTRG,DEBINW2,W1,STATIU,DEBINW4 ADD DEBINW2,W1 DES200 ADD DEBINW4,W1 CBN
0x211438…2115cc Dummy {f00=0x00a0, f01=0x0190, f02=»b * !)b 5 R G 6 N 6 R 6 0 V 6 @ Z 6 P ^ 6 ` b 6 p l 6 v 6 } 6 J F " D @ *< ! R$" R 0R Q0X 0R R0X 0R P0R A4 # R _# 1_ R# CZ R$ 6 6
0x2115cc…211760 Dummy {f00=0x00a0, f01=0x0190, f02=» 6 COPY JOB: 7 $ 7 $ & 7 4 & 7 B $ 7 P ( 7 ` 7 l & 7 | COPY BATCH: 7 $ 7 & 7 & @ 7 $ 7 ( 7 7 & 7
0x211760…2118f4 (1, 435) Opaque[0x194]
0x2118f4…211a88 # DirEnt {nam=»DE90ST«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1410, f03=0x0000}
0x2118f4…211a88 IdxSect {
0x2118f4…211a88 f00 = 0x00a0 // 0x2118f4 @0x0
0x2118f4…211a88 f01 = 0x0002 // 0x2118f6 @0x2
0x2118f4…211a88 gno = [ // 0x2118f8 @0x4
0x2118f4…211a88 [0x00]: C0x00a0.0x2.0
0x2118f4…211a88 ]
0x2118f4…211a88 }
0x211a88…211c1c Dummy {f00=0x00a0, f01=0x40bc, f02=» P IDENT DE90ST DDUM DEDDIV PDIV . P ENTRY DE90ST < PDE90ST PROC R P MOVE BIN1,W0 f P MOVE BIN2,W1 | RET PEND END @ NS ARE VALID: " HMES 1 A,A+AU,A+AOUT,A+AU+AOUT " HMES 2 C,C+CU,C+C
0x211c1c…211db0 Dummy {f00=0x00a0, f01=0x2008, f02=» NT DE12ST DDUM DEDDIV PDIV . ENTRY DE12ST < DE12ST R PROC ` RET n PEND z END @ KITEM PSTR6A STRG 6 WORKITEM PSTRG10A STRG 10 WORKITEM PDIV END @ ARIABL
0x211db0…211f44 Dummy {f00=0x00a0, f01=0x2008, f02=» AND AT LEAST ONE OF THEM MUST BE CHOOSEN 0 HMES ALTERNATIVE 4 MAY BE INCLUDED IF NEEDED 8 HEND l HMES ILLEGAL PARAMETER COMBINATION !!! v * HMES FOLLOWING COMBINATIONS ARE VALID: " HMES 1 A,A+AU,A+AOUT,A+AU+AOUT " HMES 2 C,C+CU,C+C
0x211f44…2120d8 Dummy {f00=0x00a0, f01=0x0190, f02=» > ( !Ad1 EAn@m 6 3 W)@n_ ( #/( _! @d0 0} # * h h _: _9 ! 4 1 DAd!hT @d z An@mAe 6 ? " &z 2 4 ?W @Jd P Ao W 0( z ,AnAo@e 2 _C _% (z T &PR 1 7 00_ # %XdAo _8 z! X#b !& "z < $z
0x2120d8…21226c Dummy {f00=0x00a0, f01=0x0190, f02=» W !" (60 X !" )&0 * * A A_=0 !P #_R * , !" 3 h &T !T , , _ ,& !8 W 1? W %W ( ? i d t ^ P 1:2:3:4:5:6:7:8:9:GET G
0x21226c…212400 Dummy {f00=0x00a0, f01=0x0190, f02=» ( - 8 5 3 h d 31 M ( - 8 32 K ( - 8 R 4 O & 5 0 B A ! Q &A + 0 C A " Q &A , 0 D A # Q &A - 0 E A $ Q &A . 0 F A % Q &A / 0 G A & Q &A 0 0 H A ' Q &A
0x212400…212594 (1, 436) Opaque[0x194]
0x212594…212728 # DirEnt {nam=»TRALL «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1418, f03=0x0000}
0x212594…212728 IdxSect {
0x212594…212728 f00 = 0x00a0 // 0x212594 @0x0
0x212594…212728 f01 = 0x0002 // 0x212596 @0x2
0x212594…212728 gno = [ // 0x212598 @0x4
0x212594…212728 [0x00]: C0x00a0.0x3.0
0x212594…212728 ]
0x212594…212728 }
0x212728…2128bc Dummy {f00=0x00a0, f01=0x018e, f02=» $TRALL END PSCR /O PDEL /OB , PTRA DEDDIV < PTRA DEDISC N PTRA DKRUT1 ` PTRA DKRUT2 r PTRA DKRUT3 PTRA DKRUT4 PTRA PTSDE PTRA DENTER PTRA DENT01 PTRA DENT02 PTRA DENT03 PTRA DE
0x2128bc…212a50 Dummy {f00=0x00a0, f01=0x0190, f02=» PTRA DE20ST PTRA DE21ST PTRA DEATTF ( PTRA DE23ST : PTRA DE24ST L PTRA DE30ST ^ PTRA DE31ST p PTRA DE40ST PTRA DE20FS PTRA DEUNPF PTRA DEPRFG PTRA DEPROC PTRA DECVRT PTRA DEVGAC PTRA DE50
0x212a50…212be4 Dummy {f00=0x00a0, f01=0x00f0, f02=»TRA DEFDSC PTRA DEACCU PTRA DEGENE $ PTRA STROUT 6 PTRA DEAPPU H PTRA DECOMP Z PTRA DELOCK l PTRA DESTAT ~ PASM ASSRUT PASM CDVRUT PASM DATCHK PKPF /O PSCR /O PASG 2,LP0F A DEVGAC PTRA DE50
0x212be4…212d78 Dummy {f00=0x00a0, f01=0x2008, f02=» SC PTRA DEACCU PTRA DEGENE $ PTRA STROUT 6 PTRA DEAPPU H PTRA DECOMP Z PTRA DELOCK l PTRA DESTAT ~ PASM ASSRUT PASM CDVRUT PASM DATCHK PKPF /O PSCR /O PASG 2,LP0F A DEVGAC PTRA DE50
0x212d78…212f0c Dummy {f00=0x00a0, f01=0x0190, f02=» j & P MOVE DEBINW4,BCD2A UNIT NUMBER IS P MOVE FILINDUS,DEBINW4 2 P ADD FILINDUS,W2 P P ADD DEBINW4,=X'D0' h 2 P MOVE FILECODE(FILINDUS),DEBINW4 SAVE FILECODE P SUB FILINDUS,W1 P XCOPY W1,W1,DUNIT,FININDUS P ADD FILINDUS,W1
0x212f0c…2130a0 Dummy {f00=0x00a0, f01=0x0190, f02=» . P CALL CHANFC,DISK,DEBINW4 CHANGE FILECODE : P CALL GETVOL,DISK,RBUF,STRG10A,DEBINW4 GET VOLUMENAME 6 ( P CBE DEBINW4,W0,DEAUN4 JUMP IF OKEY t P MOVE DEBINW4,W9 NOT FOUND P B DEANOK PDEAUN4 P ERASE 1,W2,W2 P MOVE TABLE,STRG
0x2130a0…213234 (1, 437) Opaque[0x194]
0x213234…2133c8 # DirEnt {nam=»DEATNY«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1420, f03=0x0000}
0x213234…2133c8 IdxSect {
0x213234…2133c8 f00 = 0x00a1 // 0x213234 @0x0
0x213234…2133c8 f01 = 0x0006 // 0x213236 @0x2
0x213234…2133c8 gno = [ // 0x213238 @0x4
0x213234…2133c8 [0x00]: C0x00a1.0x0.0
0x213234…2133c8 [0x01]: C0x00a1.0x1.0
0x213234…2133c8 [0x02]: C0x00a1.0x2.0
0x213234…2133c8 ]
0x213234…2133c8 }
0x2133c8…21355c Dummy {f00=0x00a1, f01=0x0190, f02=» ( P IDENT DEATTF REL 1.0 80-04-09/JAER P* 0 B P* THIS ROUTINE ATTACHES ACTUAL FORMAT DEFINITION FORMAT : P* P DDUM DEDDIV P PDIV P ENTRY DEATTF P EJECT PDEATTF PROC , P TBT BOOL6,ATT10 JUMP IF BALANCE FOR
0x21355c…2136f0 Dummy {f00=0x00a1, f01=0x0190, f02=»T99 P RET P PEND EJECT & F21FD FRMT 4 FSL F FTEXT '21 USER ' R FCOPY ='FORMAT' l FILLR ' ',1 FCOPY ='DEFINITION' $ P FBF BOOL7,F21A JUMP IF NEW-REG. P FTAB 35 P FHIGH P FCOPY ='CORRE
0x2136f0…213884 Dummy {f00=0x00a1, f01=0x0190, f02=» FINP 9 P FMEL 'XXX',FDVBCD(W4) P FNL 6 P FTAB 5 B FCOPY ='FIELD' R FTEXT 'START:' j P FINP 20 P FMEL 'ZZ',FDVBCD(W5) P FTAB 25 FCOPY ='FIELD' FCOPY ='LENGTH' P FILLR ':',1 P FIN
0x213884…213a18 Dummy {f00=0x00a1, f01=0x0190, f02=»LR ':',1 P FINP 69 P FMEL 'TTTT',FDVBCD(W8) FNL @ P FNL L P FTAB 10 X P FTEXT 'KEYED INPUT ' h P FCOPY ='(Y/N/C):' , P FKI 32,APPL=108,ALPHA,MAXL=1,NEOI,CTAB P FCOPY FDVSTR(W1) P FTAB 46 P FTEXT 'MINIMU
0x213a18…213bac Dummy {f00=0x00a1, f01=0x0190, f02=»NL P FTAB 10 P FTEXT 'MUST ENTER ' P FCOPY ='(Y/N/C):' 8 , P FKI 32,APPL=114,MAXL=1,ALPHA,NEOI,CTAB R P FCOPY FDVSTR(W2) P FTAB 46 P FTEXT 'AUTO TAB (Y/N):' , P FKI 64,APPL=115,MAXL=1,ALPHA,NEOI,CTAB P FCOPY FDVST
0x213bac…213d40 Dummy {f00=0x00a1, f01=0x0190, f02=»MINL=1,NEOI,CTAB r FCOPY DUPL P FTAB 46 , P FTEXT 'VERIFY' < P FTAB 55 T P FTEXT '(Y/N):' d , P FKI 64,APPL=116,MAXL=1,ALPHA,NEOI,CTAB | P FCOPY FDVSTR(W4) FNL P FTAB 10 " P FTEXT 'INITIAL CLEAR (Y/N):' , P
0x213d40…213ed4 (1, 438) Dummy {f00=0x00a1, f01=0x0190, f02=» 19,APPL=107,MAXL=5,REWRT,NEOI,CTAB P FMEL 'ZZVZZZ',SPEC , FNL H P FCOPY ='VALIDATION ' T P FCOPY ='(#V:...)' r P FTAB 25 P FCOPY ='GENERATION ' P FCOPY ='(#G:...)' P FTAB 50 P FCOPY ='ACCUMULATION ' P FCO
0x213ed4…214068 Dummy {f00=0x00a1, f01=0x018e, f02=» , P FKI 1,APPL=112,MAXL=80,ALPHA,NEOI,CTAB * P FCOPY FORTAB(W2) VAL-GEN-ACC-STRING2 4 FNL b P FKI 1,CTAB n P FCOPY HEX00 FMEND P EJECT PF22FD FRMT P FSL P FTEXT '22 BALANCE ' FCOPY ='FORMAT' FIL
0x214068…2141fc Dummy {f00=0x00a1, f01=0x0190, f02=» z PFLOW PF22A FNL P FLINK F20COM , FNL B P FNL N P FTAB 5 Z P FTEXT 'STARTPOSITION:' j P FINP 20 P FMEL 'ZZ',FDVBCD(W5) FTAB 30 FCOPY ='LENGTH' P FILLR ':',1 P FINP 40 P FME
0x2141fc…214390 Dummy {f00=0x00a1, f01=0x0190, f02=»09,MAXL=2,REWRT,NEOI,CTAB P FMEL 'XX',FDVBCD(W8) " FNL @ P FNL L FTEXT 'SPECIAL HANDLING:' X , P FKI 19,APPL=107,MAXL=5,REWRT,NEOI,CTAB z P FMEL 'ZZVZZZ',SPEC FNL P FCOPY ='VALIDATION ' P FCOPY ='(#V:...)'
0x214390…214524 Dummy {f00=0x00a1, f01=0x0190, f02=»COPY FORTAB(W1) VAL-GEN-ACC-STRING1 P FNL , , P FKI 1,APPL=112,MAXL=80,ALPHA,NEOI,CTAB 8 * P FCOPY FORTAB(W2) VAL-GEN-ACC-STRING2 h FNL P FKI 1,CTAB P FCOPY HEX00 FMEND P EJECT PF20COM FRMT FCOPY ='FORMA
0x214524…2146b8 Dummy {f00=0x00a1, f01=0x0190, f02=» ='PAGE' FTEXT ' SIZE:' 4 P FKI 27,APPL=102,NEOI,MINL=1,MAXL=2,ME,NCLR,CTAB ( P FMEL 'AA',FDVBCD(W1) ` FTAB 30 ~ P FCOPY ='LINE ' FCOPY ='NUMBER' FILLR ':',1 FINP 43 P FMEL 'Z9',FDVBCD(W2) FTAB 46
0x2146b8…21484c Dummy {f00=0x00a1, f01=0x018e, f02=» FILLR '1',1 FTAB 20 FILLR '2',1 ( FTAB 30 < FILLR '3',1 L FTAB 40 ` FILLR '4',1 p FTAB 50 FILLR '5',1 FTAB 60 FILLR '6',1 FTAB 70 FILLR '7',1 P FILLR ' ',1 P FIL
0x21484c…2149e0 Dummy {f00=0x00a1, f01=0x4136, f02=» z FCOPY ='1234567890' FCOPY ='1234567890' $ FCOPY ='1234567890' @ P FCOPY ='123456789 ' P FILLR X'80',1 x FNL P FINP 1 FCOPY LDISP FNL 6 P FKI 1,APPL=110,ALPHA,MAXL=80,DUPL=LDISP,NEOI,CTAB FCO
0x2149e0…214b74 (1, 439) Dummy {f00=0x00a1, f01=0x2008, f02=» NT DE12ST DDUM DEDDIV PDIV . ENTRY DE12ST < DE12ST R PROC ` RET n PEND z END @ KITEM PSTR6A STRG 6 WORKITEM PSTRG10A STRG 10 WORKITEM PDIV END @ ARIABL
0x214b74…214d08 Dummy {f00=0x00a1, f01=0x0190, f02=» P* P B DED350 PDED330 P CALL CMPIND,BIN8,USEV(W1) . P BNOK DED500 OUT OF RANGE P P EDSUB DEINPUT,BIN7,FORMU r PDED350 P MOVE DEBINW1,BIN7 P B DED470 PDED390 P MOVE BIN10,W0 PDED400 P MOVE DE
0x214d08…214e9c Dummy {f00=0x00a1, f01=0x0190, f02=»ED470 JUMP IF NOT MINUS P MOVE DEBINW1,W0 PDED470 8 P CMP W1,W1 EDITING OKEY F P RET f PDED500 r P CMP W1,W2 EDITING FAILED P RET P PEND P EJECT * P************************************* * P* DISPLAY AND RE
0x214e9c…215030 Dummy {f00=0x00a1, f01=0x0190, f02=»,KEYTAB P PKTAB KEYTAB P MOVE BIN15,FC & PLASTD0 MOVE DEBINW4,W24 < P ERASE 0,DEBINW4,DEBINW4 P EDWRT DEDSSCRN,FLAST(FC) | PLAST05 P MOVE DEBINW1,W0 PLASTD1 P IB FC JUMP ON FUNCTIONKEY C P LPROG FPROG = 1
0x215030…2151c4 Dummy {f00=0x00a1, f01=0x0190, f02=» P LASRET2 FRECOV = 7 C P LASRET3 FCORR = 8 C " P LASVER FVER = 9 C @ P LASRET2 FREC02 =10 C P LINS FFORCE = 11 C z P LINS FCONVNO =12 C P LINS FCONV1 =13 C P LASRET2 FASD =14 C P LRFBWD FRFBWD =15 P B
0x2151c4…215358 Dummy {f00=0x00a1, f01=0x0190, f02=»E CANCEL x P ERASE 0,DEBINW4,DEBINW4 P B LASVER 0 PLPROG2 B 0 P KI DEDSDYKB,DEINPUT,KEYTAB,DEBINW1,DEBINW2 P P B LAST50 PLVAL P MOVE DEBINW1,W2 P B LPROG2 PLRFBWD P MOVE DEBINW1,W7 P B LPROG2 PLDEL
0x215358…2154ec Dummy {f00=0x00a1, f01=0x0190, f02=»LOCK,W1,DEBINW2 $ P IB DEBINW3,POWOFF,LASTER,LASTD0 P B LASTD3 @ P* R 0 P* NOK. NOTICE THAT INCORRECT LENGTH IS OKEY P* PLASTER P XSTAT DEDSDYKB,DEBINW3 P CALL MASK,DEBINW3,W8 P BZ LASBEL " P MOVE DEBINW2,W6
0x2154ec…215680 Dummy {f00=0x00a1, f01=0x018e, f02=»MY C r ( P LASRET,LASRET,LASRET,DUMMY,LASRET PLAST06 : $ P IB DEBINW2,LASBEL,LASBEL,LASBEL H " P SUB DEBINW2,W3 ADJUST EOI0KEY p P B LASRET PLASBEL ( P EDWRT DEDSSCRN,BELL ACOUSTIC ALARM P B LAST05 PLASKOP P MOVE
0x215680…215814 (1, 440) Opaque[0x194]
0x215814…2159a8 # DirEnt {nam=»DCTASK«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1438, f03=0x0000}
0x215814…2159a8 IdxSect {
0x215814…2159a8 f00 = 0x00a1 // 0x215814 @0x0
0x215814…2159a8 f01 = 0x0002 // 0x215816 @0x2
0x215814…2159a8 gno = [ // 0x215818 @0x4
0x215814…2159a8 [0x00]: C0x00a1.0x3.0
0x215814…2159a8 ]
0x215814…2159a8 }
0x2159a8…215b3c Dummy {f00=0x00a1, f01=0x0190, f02=» , P IDENT DCTASK REL=1.0 VER=1 801027-SHB P DDUM DEDDIV 4 P PDIV H ENTRY DCTASK V P EXT TESTB l PTRPARA EQU X'00' ~ PSKIP EQU X'02' PSTIMO EQU X'0B' P P EJECT PDCTASK P MOVE DCWRK,TCUADR P DSC1
0x215b3c…215cd0 Dummy {f00=0x00a1, f01=0x4122, f02=»QLEN,W2 STATUS CHANGE P BZ DCTSKR NO & P CALL TESTB,REQLEN,W10 CARRIER OFF 4 P BZ DCTSK5 ^ PDCTSK4 p P SET DCSTAT ~ P B DCTSKR PDCTSK5 P CLEAR DCSTAT " P CALL TESTB,REQLEN,W9 TIME OUT P BZ DCTSKR P B DCTSK
0x215cd0…215e64 Dummy {f00=0x00a1, f01=0x2008, f02=» NT DCTASK REL=1.0 VER=1 790817-SHB DDUM DEDDIV 4 ENTRY DCTASK H PDIV ^ DCTASK l EXIT z PEND END @ a @ a & ` @ ` = ~ ^ F ^ @ ^
0x215e64…215ff8 Dummy {f00=0x00a1, f01=0x0190, f02=» = 3 CASETTE OUTPUT 8 P* = 4 PRINTOUT LP/GP 6 2 P* = 5 DISCFILE r : P* = 6 FLOPPYDISC FILE D P*
0x215ff8…21618c Dummy {f00=0x00a1, f01=0x0190, f02=» TYPE = TYPE OF HANDLING . P* = 1 OPEN . : P* = 2 BATCHHEAD-RECORD ` 6 P* = 3 DATA RECORD 8 P* = 4 BALANCE RE
0x21618c…216320 Dummy {f00=0x00a1, f01=0x018e, f02=» = 0 OK > P* /= 0 ERROR MESSAGE-NUMBER * F P* =-1 SKIP CURR BATCH, GO TO NEXT l : P* =-2 SKIP TO BALANCE H P*
0x216320…2164b4 (1, 441) Opaque[0x194]
0x2164b4…216648 # DirEnt {nam=»FDIO «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1440, f03=0x0000}
0x2164b4…216648 IdxSect {
0x2164b4…216648 f00 = 0x00a2 // 0x2164b4 @0x0
0x2164b4…216648 f01 = 0x0004 // 0x2164b6 @0x2
0x2164b4…216648 gno = [ // 0x2164b8 @0x4
0x2164b4…216648 [0x00]: C0x00a2.0x0.0
0x2164b4…216648 [0x01]: C0x00a2.0x1.0
0x2164b4…216648 ]
0x2164b4…216648 }
0x216648…2167dc Dummy {f00=0x00a2, f01=0x0190, f02=» P IDENT FDIO 801022REL10 P $ & P ENTRY FDIO PERFORM TOSS FUNCTION , P V * P EXTRN T:FDSP FETCH DATASET PARAMETERS ^ $ P EXTRN T:IO3 PERFORM I/O REQUEST " P EXTRN I:EVA0 EVALUATE ADDRESS P EXTRN I:ERR2 ILLEGAL TYPE $ P EXTRN I:ERR
0x2167dc…216970 Dummy {f00=0x00a2, f01=0x0190, f02=»QU 0 PNOTEST EQU 1 PPARM EQU NOTEST P* 8 P*TEMPORARY REGISTERS B P* ^ PWK1 EQU A1 WORK REGISTER h POP1E EQU A6 OPERAND1 END POP2A EQU A9 OPERAND2 ADDRESS POP2E EQU A5 OPERAND 2 LENGTH POP2T EQU A3 OPERAND 2 TY
0x216970…216b04 Dummy {f00=0x00a2, f01=0x018e, f02=»*DATA SET DISPLACEMENTS P* PECBBA EQU 2 BUFFER ADDRESS * PECBRL EQU 4 REQUESTED LENGTH L ( PDSCBRL EQU 14 REQUESTED LENGTH ADDR p " PDSCB1X EQU 16 CW-ITEM ADDRESS P EJECT P* P* PERFORM TOSS FUNCTION P* 4 P* C
0x216b04…216c98 Dummy {f00=0x00a2, f01=0x018e, f02=» P CF A14,T:FDSP GET<DSET> P ( P* 0 P* HANDLE PARAMETER <ORDER> : P* ^ P h P LCR A7,A12 p P ADKL A12,1 P ANK A7,/FF P* P* HANDLE PARAMETER <ITEM> P* P CF A14,I:EVA0 GET <ITEM> , P ST
0x216c98…216e2c Dummy {f00=0x00a2, f01=0x0190, f02=» P* HANDLE PARAMETER <LENGTH> P* , P CF A14,I:EVA0 GET <LENGTH> 6 P IFT PARM=TEST Z P ANK OP2T,ARITHB+NUMBIT p P SUK OP2T,NUMBIT BINARY ? $ P ABL(NZ) I:ERR2 NO! ILLEGAL TYPE , P CWR* OP1E,OP2A ILLEGAL REQUESTED LENGTH
0x216e2c…216fc0 Dummy {f00=0x00a2, f01=0x0190, f02=»T WK1,ECBRL,A8 STORE REQ.LENGTH IN ECB $ P ST OP2A,DSCBRL,A8 STORE IN DSET . P V P* ^ P* HANDLE PARAMETER <CW> h P* P CF A14,T:SCW2 P* 6 P* SET/RESET FILECONTROL-MODE IF OPEN/CLOSE P* P CWK A7,/A1 OPEN
0x216fc0…217154 (1, 442) Dummy {f00=0x00a2, f01=0x4126, f02=»CLOSE P RF(NE) FD50 NO ( P LDKL A1,/FDFF RESET FILE-CTRL-MODE & P ANRS A1,A8 R PFD40 EQU * f P CM DSCBRL,A8 x P CM DSCB1X,A8 PFD50 EQU * P P* P*ECB PREPARED P* P " P ABL T:IO3 PERFORM I/O R
0x217154…2172e8 Dummy {f00=0x00a2, f01=0x2008, f02=» x P XIF P P LDR* WK1,OP2A $ . P ST WK1,ECBCW,A8 STORE CONTROL WORD IN ECB : $ P ST OP2A,DSCBCW,A8 STORE IN DSET l P P* P*ECB PREPARED P* P " P ABL T:IO3 PERFORM I/O REQUEST P END @
0x2172e8…21747c Dummy {f00=0x00a2, f01=0x4096, f02=» @ H IDENT D:DU10 TRA 10.0 80-11-19 F1 O1111 REL 10.0 80-04-11 D:DU10 H D:DU10D Z n :D @ @ & ( * , , ( Q . 0 2 4 6 8 : < a >
0x21747c…217610 Dummy {f00=0x00a2, f01=0x40ac, f02=» @ H IDENT Z:DU20 TRA 10.0 80-11-19 F1 O1111 REL 10.0 80-04-11 Z:DU20 H Z:DU20D Z n @ & ( * , , ( Q . 0 2 4 6 8 : < a >
0x217610…2177a4 Dummy {f00=0x00a2, f01=0x4096, f02=» @ H IDENT D:DU20 TRA 10.0 80-11-19 F1 O1111 REL 10.0 80-04-11 D:DU20 H D:DU20D Z n :D @ @ & ( * , , ( Q . 0 2 4 6 8 : < a >
0x2177a4…217938 Dummy {f00=0x00a2, f01=0x40ac, f02=» @ H IDENT Z:DU30 TRA 10.0 80-11-19 F1 O1111 REL 10.0 80-04-11 Z:DU30 H Z:DU30D Z n @ & ( * , , ( Q . 0 2 4 6 8 : < a >
0x217938…217acc Dummy {f00=0x00a2, f01=0x4096, f02=» @ H IDENT D:DU30 TRA 10.0 80-11-19 F1 O1111 REL 10.0 80-04-11 D:DU30 H D:DU30D Z n :D @ @ & ( * , , ( Q . 0 2 4 6 8 : < a >
0x217acc…217c60 Dummy {f00=0x00a2, f01=0x40ac, f02=» @ H IDENT Z:DU40 TRA 10.0 80-11-19 F1 O1111 REL 10.0 80-04-11 Z:DU40 H Z:DU40D Z n @ & ( * , , ( Q . 0 2 4 6 8 : < a >
0x217c60…217df4 (1, 443) Opaque[0x194]
0x217df4…217f88 # DirEnt {nam=»LIST «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2038, f03=0x0000}
0x217df4…217f88 IdxSect {
0x217df4…217f88 f00 = 0x0101 // 0x217df4 @0x0
0x217df4…217f88 f01 = 0x0002 // 0x217df6 @0x2
0x217df4…217f88 gno = [ // 0x217df8 @0x4
0x217df4…217f88 [0x00]: C0x0101.0x3.0
0x217df4…217f88 ]
0x217df4…217f88 }
0x217f88…21811c Dummy {f00=0x0101, f01=0x018e, f02=» PSCR PSKF PTRA DEDDIV PTRA DEDISC . PTRA DKRUT1 @ PTRA DKRUT2 R PTRA DKRUT3 d PTRA DKRUT4 v PTRA PTSDE PTRA DENTER PTRA DENT01 PTRA DENT02 PTRA DENT03 PTRA DENVAL PTRA DEPOOL PTR
0x21811c…2182b0 Dummy {f00=0x0101, f01=0x0190, f02=» PTRA DEATTF PTRA DE23ST PTRA DE24ST , PTRA DE30ST > PTRA DE31ST P PTRA DE40ST b PTRA DE20FS t PTRA DEUNPF PTRA DEPRFG PTRA DEPROC PTRA DECVRT PTRA DEVGAC PTRA DE50ST PTRA DE60ST PTRA
0x2182b0…218444 Dummy {f00=0x0101, f01=0x018a, f02=» PTRA DEGENE PTRA STROUT PTRA DEAPPU ( PTRA DECOMP : PTRA DELOCK L PTRA DESTAT ^ PASM ASSRUT p PASM CDVRUT PASM DATCHK PTRA DE16ST PTRA DE90ST PTRA DEDICO PTRA DEATNY PTRA DCTASK PTRA CONV
0x218444…2185d8 Dummy {f00=0x0101, f01=0x2008, f02=» DEGENE PTRA STROUT PTRA DEAPPU ( PTRA DECOMP : PTRA DELOCK L PTRA DESTAT ^ PASM ASSRUT p PASM CDVRUT PASM DATCHK PTRA DE16ST PTRA DE90ST PTRA DEDICO PTRA DEATNY PTRA DCTASK PTRA CONV
0x2185d8…21876c Dummy {f00=0x0101, f01=0x0000, f02=»
[…0x1…]
0x218900…218a94 (1, 444) Opaque[0x194]
0x218a94…218c28 # DirEnt {nam=»DEDSHB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2990, f03=0x0000}
0x218a94…218c28 IdxSect {
0x218a94…218c28 f00 = 0x014c // 0x218a94 @0x0
0x218a94…218c28 f01 = 0x000e // 0x218a96 @0x2
0x218a94…218c28 gno = [ // 0x218a98 @0x4
0x218a94…218c28 [0x00]: C0x014c.0x2.0
0x218a94…218c28 [0x01]: C0x014c.0x3.0
0x218a94…218c28 [0x02]: C0x0150.0x3.0
0x218a94…218c28 [0x03]: C0x0151.0x0.0
0x218a94…218c28 [0x04]: C0x0151.0x3.0
0x218a94…218c28 [0x05]: C0x0152.0x0.0
0x218a94…218c28 [0x06]: C0x0152.0x1.0
0x218a94…218c28 ]
0x218a94…218c28 }
0x218c28…218dbc Dummy {f00=0x014c, f01=0x0190, f02=» $ P IDENT DEDDIV REL 10.0 80-04-11 P 80-03-24 , L M************************************************************************ @ * * L L* ********************************************************* 4 0* * ITE
0x218dbc…218f50 Dummy {f00=0x014c, f01=0x0190, f02=»NUMBER z * * $ * * BOOL >0 - & $ * * BIN >0 - N 4 0* * BCD >0 A,B,C,............ v 4 0* * STR >0 A,B,C,............ * * L L*
0x218f50…2190e4 Dummy {f00=0x014c, f01=0x0190, f02=»**************** X P EJECT DDIV & TERM T1 4 P UWB CB1 D CWB CB2 T P CWB CB3 d CWB CB4 t CWB CB5 TWB TB2 TWB TB3 TWB TB4 TWB TB5 P TWB TB1 P DWB DB1(TB1) P DWB DB2(TB1)
0x2190e4…219278 Dummy {f00=0x014c, f01=0x018e, f02=»* * DISK DSET FC=D0,DEV=DU PDEDSDYKB DSET FC=20 2 PDEDSSCRN DSET FC=50 N PDEDSPRT DSET FC=36 j PDSDCFD DSET FC=61,DEV=DC SHB PDSFD DSET FC=F8,DEV=FD SHB ( P FMTCTL INDS=DEDSDYKB,OUTDS=DEDSSCRN P EJECT P*
0x219278…21940c Dummy {f00=0x014c, f01=0x0190, f02=» P TERM D2 P UWB CB1 CWB CB2 $ CWB CB3 4 CWB CB4 D CWB CB5 T P TWB DU1 d P TWB DU2 t P TWB DU3 P TWB DU4 P TWB DU5 P TWB DU6 P TWB DU7 P TWB DU8 P TWB DU9 P CWB CB6 EJE
0x21940c…2195a0 Dummy {f00=0x014c, f01=0x0190, f02=»K EJECT * P* TERMINAL-BLOCK: 1 " * D ( #* USAGE: DATA RECORD STORING N * z PTB1 BLK PRBUF STRG 1024 RECORD AREA * POVERFLOW STRG 10 OVERFLOWAREA FOR RBUF EJECT * * TER
0x2195a0…219734 (1, 445) Dummy {f00=0x014c, f01=0x018e, f02=»1 DBLK " PFDVBCD BCDI (8),5 1=PAGE SIZE P 2=LINE NUMBER 4 P 3=PAGE NUMBER L P 4=FIELDNR d P 5=FIELDSTART x P 6=FIELDLENGTH P 7=MINIMUMLENGTH P 8=USED RECORD SPACE LDES STRG 80 LINE DESIGN PLDISP ST
0x219734…2198c8 Dummy {f00=0x014c, f01=0x0190, f02=» P 3=AUTO TABULATION FIELD P 4=VERIFICATION FIELD & P 5=INITIAL CLEAR F P VALUE = Y(ES) OR N(O) ` PSPEC BCD 6 SPECIAL HANDLING 0 PFMTWK BINI (24) WORKITEMS FORMAT GENERATION ( PPINDCB BIN POINTERINDEX CURR BUFFER , PPIND
0x2198c8…219a5c Dummy {f00=0x014c, f01=0x0190, f02=»BIN WORKITEM FORMAT GENERATION P EJECT ( P* 6 B P* THIS DATA-BLOCK MUST NOT EXCCED 188 BYTES = POOL-SIZE @ P* PDB2 DBLK PSTATUS BIN STATUS " PSIZSYM BIN SIZE OF SYMBOLICS PSYMREC BINI (12) RECORDNR & PFORTAB
0x219a5c…219bf0 Dummy {f00=0x014c, f01=0x0190, f02=»-BLOCK MUST NOT EXCCED 188-BYTES = POOL-SIZE ~ P* USAGE: BATCHDATA 4 P* V PDB3 DBLK ` PBDABAL BOOL BALANCED BATCH p PBDAFRO BOOL FROSEN BATCH " PBDATRA BOOL TRANSFERRED BATCH PBDAFOR BOOL FORCED BATCH PBDATES BOO
0x219bf0…219d84 Dummy {f00=0x014c, f01=0x0190, f02=»H j & PBDSTAT STRG 2 STATUS OF BATCHDATA ( PBDPOIN BINI (6) 1 = LAST ENTERED REC 4 P 2 = NUMBER OF REC ` P 3 = NUMBER OF TRANSMITTED | P 4 = NUMBER OF FORCED P 5 = NUMBERS TO VERIFY P 6 = LAST ENTERED SUBTOTAL $ PACK
0x219d84…219f18 Dummy {f00=0x014c, f01=0x0190, f02=» 6 2* USAGE: BUFFERPOOL-HANDLING + OTHER TABLES * B CB1 BLK L PPOOL1 BOOL CONSEC. REQ. PBOOLA1 BOOL USED IN OPENSY | PBOOLA2 BOOL USED IN OPENUS PUORG BOOL F PW32 BIN W'32' CONSTANT PW64 BIN W'64' CONS
0x219f18…21a0ac Dummy {f00=0x014c, f01=0x0190, f02=»ESPACE t & PSYSV STRGI (10),17 SYSTEMVARIABLES ( PRPOOL STRGI (1),2 BUFFER-REFERENCES 8 1-1 USAGE-TYPE STRG d 2-7 NAME 8-8 NUMBER OF USERS P 9-9 LINK TO NEXT BUFFER PBPOOL STRGI (1),2 BUFFERPOOL EJECT
0x21a0ac…21a240 Dummy {f00=0x014c, f01=0x018e, f02=» W1 BIN W'1' CONSTANT W2 BIN W'2' CONSTANT PW3 BIN W'3' CONSTANT < PW4 BIN W'4' CONSTANT X PW5 BIN W'5' CONSTANT t PW6 BIN W'6' CONSTANT PW7 BIN W'7' CONSTANT PW8 BIN W'8' CONSTANT PW9 BIN W'9' CONSTANT W10 BIN
0x21a240…21a3d4 (1, 446) Dummy {f00=0x0150, f01=0x0190, f02=» x PW15 BIN W'15' CONSTANT P EJECT & P* 4 P* COMMON-BLOCK:3 > P* ^ P* USAGE: CONSTANTS h P* PCB3 BLK W16 BIN W'16' CONSTANT PW17 BIN W'17' CONSTANT PW18 BIN W'18' CONSTANT PW19 BIN W'
0x21a3d4…21a568 Dummy {f00=0x0150, f01=0x0190, f02=» PW24 BIN W'24' CONSTANT PW25 BIN W'25' CONSTANT " PW26 BIN W'26' CONSTANT @ PW27 BIN W'27' CONSTANT ^ PW28 BIN W'28' CONSTANT | PW29 BIN W'29' CONSTANT " PSYSLEN BIN W'198' RECLEN SYST 0 PFNOOFREC BINI (11) NO OF FREE RECORD IN FI
0x21a568…21a6fc Dummy {f00=0x0150, f01=0x0190, f02=»BOOL RECOVERY RUNNUNG & PAUTENT BOOL T AUTOMATIC ENTER WHEN P WHEN LAST FIELD REACHED H PRECFIL BIN FILE IN RECOVERY j & PFILECODE BINI (11),X'D0' FILECODE * PFCOUNTER BINI (11) COUNTER (USER/FILE) , PFINDEXPO BINI (11) POOLIND TO FREE
0x21a6fc…21a890 Dummy {f00=0x0150, f01=0x0190, f02=»YS STRG X' KEYMASKS C , P 0422200000 THE ITEM CONTAIN 5 BYTES C $ P 0222200000 (OR 10 HALFBYTES) C N * P 0220000000 FOR EACH MODE STARTING C v * P 0888880000 WITH SUPERVISORY MODE. C , P 0888000000 (PROGRAMNUMBERS 10 - 19). C . P 0000
0x21a890…21aa24 Dummy {f00=0x0150, f01=0x0190, f02=» $ P 0000000000 PROGRAMNUMBER 19. C P ' THE NEXT 5 BYTES IS FOR , P FORMAT DEFINITION MODE. P P (PROGRAMNUMBERS 20 - 29). r P EACH HALBYTE REPRESENTS & P A KEYMASK AND CONSISTS OF FOUR P BITS CORRESPONDING TO THE P
0x21aa24…21abb8 Dummy {f00=0x0150, f01=0x0190, f02=» z P BITS 0110 MEANS THAT THE " P THE KEYS 2 AND 3 HAVE TO BE , P SWITCHED ON WHEN WORKING R " P WITH THE SPECIFIED PROGRAM. v , PPROGNR STRG X' EXISTING PROGRAMNUMBERS C P 803F 00 - 15 C P 0F83 16 - 31 C P 80FC 32 -
0x21abb8…21ad4c Dummy {f00=0x0150, f01=0x0190, f02=»* DEVTYP POS 1- " P POS 3 = DEVICE UNIT NUMBER P P POS 4 = FILE-CODE v P POS 5 = DEVICE-CLASS " P CLASS = 1 DATA-COMM. OUT P = 2 DATA-COMM.IN P
0x21ad4c…21aee0 Dummy {f00=0x0150, f01=0x0190, f02=» = 7 DELETE USERFILE PDEVTYP STRG X' C & $ P 4443006101 DC[]<FC=61><CL=1> C @ $ P 0000000002 DC[]<FC=00><CL=2> C h $ P 0000001203 TK[]<FC=12><CL=3> C $ P 0000000004 LP[]<FC=00><CL=4> C $ P 4750003604 GP[]<FC=36><CL=4> C $ P
0x21aee0…21b074 (1, 447) Dummy {f00=0x0151, f01=0x0190, f02=» <FC=00><CL=8> C P ' P* DISC UNIT NUMBERS $ PDUNIT STRG X' C @ P F4 C X P F0 FIX DISC1 6875/6876 C h P F1 CARTRIDGE 1 6875/6876 C P F2 FIXDISC 2 6875/6876 C P F3 CARTRIDGE 2 6875/6876 C P F8 FLEX 1 6879 C
0x21b074…21b208 Dummy {f00=0x0151, f01=0x0190, f02=»* P* COMMON-BLOCK: 5 * * * USAGE: STATUS LINE/ 4 * X PCB5 BLK b PD1 BCD 2D'1' CONSTANT r " PFDIR STRG X' FORMAT DIRECTIV C P E9 0 = DUMMY C P C0 1 = FCOPY C P C2 2 = FMELI C P C3 3 = F
0x21b208…21b39c Dummy {f00=0x0151, f01=0x0190, f02=»DE 9 = FLINK C P E0 10= FSL C P E1 11= FNL C , P E9 12= FEXIT C B P F0 13= FKI C Z P F2 14= FKI APPLE<255 C p P F3 15= FKI APPLE>255 C P F8 16= FKI DUPL C " P FA 17= FKI APPLE<255 DUPL C " P FB 18= FKI APPLE>255
0x21b39c…21b530 Dummy {f00=0x0151, f01=0x0190, f02=» PHEX00 STRG 1X'00' PAUSE ITEM . PFVOLNAME STRGI (8),6C'SYSVOL' VOLUMENAMES ( $ PMODTAB STRGI (8),1 MODE TABLE C Z C'P',C'F',C'J',C'E' C P C'S',C'V',C'C',C'H' P EJECT & PVALSTR STRG X' VALIDATION STRING C P 4D 0. M=MESSA
0x21b530…21b6c4 Dummy {f00=0x0151, f01=0x0190, f02=» STRING C | P* P 4C 6. L=LENGTH C P 21 7. !=ABSOLUTE VALUE C 8 P 41 8. A=ACCUMULATOR C P 53 9. S=SYSTEM VARIABLE C | P 55 10. U=USER VARIABLE C P 46 11. F=FORMAT FIELD C P 54 12. T=VALUE SET C * P 43 1
0x21b6c4…21b858 Dummy {f00=0x0151, f01=0x0190, f02=» 2A 17. *=MULTIPLY C P 3A 18. :=DIVIDE C P* : $ P 3B 19. ;=EXPRESION SEPARATOR C D P 26 20. &=LOGICAL AND C l P 56 21. V=LOGICAL OR C P* P 3F 22. ?=INSIGNIFICANCE C " P 27 23. '=LITERAL SEPARATOR C $ P 5A 24.
0x21b858…21b9ec Dummy {f00=0x0151, f01=0x0190, f02=»ANGE C r $ P 58 28. X=INDEX OF VALUE-SET C " P 28 29. (=LINK PARENTHESIS C 6 " P 29 30. )=RIGHT PARENTHESIS C P ' P EJECT PSTATIU STRG X' STATIU C P 4D 0. M=MUST VERIFY C P 45 1. E=ENTERING C P 56 2. V=VERIFI
0x21b9ec…21bb80 Dummy {f00=0x0151, f01=0x0190, f02=» 42 7. B=BALANCED C P 2F 8. /=NOT STATUS C P 2C 9. ,=SEPARATOR C : P ' X & PPICSTR STRG X' PICTURECHARCTERS C d & P 4C 0. L=LEFTADJUSTED ALPHANUM C ( P 52 1. R=RIGHTADJUSTED ALPHANUM C * P 41 2. A=LEFTADJUST TO LEAD. DIG.
0x21bb80…21bd14 (1, 448) Dummy {f00=0x0151, f01=0x0190, f02=» 5A 6. Z=LEAD. ZEROES REPL. SPACE C , P 59 7. Y=ALPHANUM/=EMPTY ELSE SPACE C . " P 2B 8. +=PRINT + OR - SIGN C ^ ( P 53 9. S=SIGN, -SIGN IF NEGATIV C P 2C 10. ,=INSERT COMMA C P 2E 11. .=ROOMLESS POINT C & P 3E 12. >=END OF
0x21bd14…21bea8 Dummy {f00=0x0151, f01=0x0190, f02=» STRG X' PICTURECONVERTION C ( P 2D 0. -=S(SIGN -SIGN IF NEGATIV C $ " P 56 1. V=.(ROOMLESS POINT C P & P 45 2. E=INSERT NEXT CHARCTER C v " P 58 3. X=0 LEFT ZERO FILL C P ' * PLRUQUE STRG 48 LEAST RECENT USED QUEUE EJECT
0x21bea8…21c03c Dummy {f00=0x0151, f01=0x0190, f02=» " PKEY4 BOOL POSITION INDICATORS $ PKEY3 BOOL ...FOR KEY-LOCKS 1-4. * PKEY2 BOOL ...F=OFF, R PKEY1 BOOL ...T=ON. n BOOL1 BOOL WORKITEM BOOL2 BOOL WORKITEM BOOL3 BOOL WORKITEM BOOL4 BOOL WORKITEM BOOL5 BOOL WO
0x21c03c…21c1d0 Dummy {f00=0x0151, f01=0x0190, f02=»OOL VARIABLES CHANGED " PDEPROMPT BOOL DISPLAY PROMTS ! ( PDENOCHAN BOOL NO CHANGES PERMITTED ! D P EJECT ! p PDEBIN1 BIN WORKITEM ! ~ PDEBIN2 BIN WORKITEM ! PDEBIN3 BIN WORKITEM ! PDEBIN4 BIN WORKITEM ! PDEBIN5 BIN WORKITEM ! (
0x21c1d0…21c364 Dummy {f00=0x0151, f01=0x0190, f02=»RRENT PROGRAMNUMBER ! $ USERFILE BCD 2 CURRENT USER-FILE " MODE STRG 1 CURRENT MODE " D " JOBNAME STRG 6 CURRENT JOBNAME " d " BATCH STRG 6 CURRENT BATCHNAME " & !FORMAT STRG 6 CURRENT FORMAT-NAME " " PSYMBOL STRG 6 CURRENT SYMBOLIC " " PSTATSH S
0x21c364…21c4f8 Dummy {f00=0x0151, f01=0x0190, f02=»* " PTB3 BLK # PSWIT01 BOOL USED IN DEDISC # PSWIT02 BOOL -"- # > PSWIT03 BOOL -"- # Z PSWIT04 BOOL -"- # v PSWIT05 BOOL -"- # PSWIT06 BOOL -"- # PSWIT07 BOOL # PSWIT08 BOOL USED IN DEDISC # $ PSW95PR
0x21c4f8…21c68c Dummy {f00=0x0151, f01=0x0190, f02=» PDOOLC BOOL $ PVERIFM BOOL VERIFM MODE $ " PKEYVER BOOL KEY-VERIFICATION $ 6 P EJECT $ $ PFLIND BINI (32) FORMATLINKINDEX $ j * PRNRFMCH BIN CURRENT RECNO FMT-CHAIN $ * PMAXOCC BIN RESERVED FOR DISCHANDLING $ $ PPTRFMCH BIN POINTER IN R
0x21c68c…21c820 Dummy {f00=0x0151, f01=0x0190, f02=»RBUF $ l & !PRECCUR BIN CURRENT - " - % & !RECLNTH BIN CURRENT RECORDLENGTH % 6 ( #PJOBCUR BIN LINK TO JOB-DEFINITION % ` & PPINDFR BIN POOLINDEX TO CURR FMT % * PPINACC BIN POOLINDEX TO ACCUMULATORS % * PPWBDB4 STRG 16 SAVEAREA FOR WORKBLOC
0x21c820…21c9b4 (1, 449) Dummy {f00=0x0152, f01=0x0190, f02=»X'000000000000',X'000000000000' % P 1 = JOBNAME & ( P 2 = BATCH & @ & P 3 = CONDITIONAL FORMAT CHANGE & V $ P 4 = COND. FORMAT CHANGE (R) & P 5 = FILE NAME SHB FD & EJECT & * & * TERMINAL-BLOCK: 4 & * &
0x21c9b4…21cb48 Dummy {f00=0x0152, f01=0x018e, f02=»N RECORD & ~ $ PDBOTRA BOOL TRANSFERRED RECORD ' PDBOFOR BOOL FORCED RECORD ' 8 $ PDBOTES BOOL TESTENTERED RECORD ' Z PDBOVER BOOL VERIFIED RECORD ' $ PDBOACC BOOL MUST BE ACCUMULATED ' " PDBOMVR BOOL MUST BE VERIFIED ' " PDOOL1 BOOL USED IN
0x21cb48…21ccdc Dummy {f00=0x0152, f01=0x0190, f02=» PDOOL6 BOOL -"- ( PDOOL7 BOOL T=TEST MODE ( " & PDOOL8 BOOL IF SET OPEN NEW BATCH ( B P IF NOT OPEN OLD BATCH ( l P EJECT ( BIN1 BIN WORKITEM ( BIN2 BIN WORKITEM ( BIN3 BIN WORKITEM ( BIN4 BIN WORKITEM ( BIN5 B
0x21ccdc…21ce70 Dummy {f00=0x0152, f01=0x0190, f02=»ORKITEM ( BIN11 BIN WORKITEM ) BIN12 BIN WORKITEM ) , BIN13 BIN WORKITEM ) H BIN14 BIN WORKITEM ) d BIN15 BIN WORKITEM ) BIN16 BIN WORKITEM ) EJECT ) * ) * TERMINAL-BLOCK: 5 ) * ) D P* USA
0x21ce70…21d004 Dummy {f00=0x0152, f01=0x0190, f02=»SCHK1 BOOL SPECIAL CHECK 1 MINUS ) PSCHK2 BOOL SPECIAL CHECK 2 * * PSCHK4 BOOL SPECIAL CHECK 4 * N PACKUM BOOL ACCUMULATOR BIT * r PVERIFY BOOL VERIFY-BIT * PCTAB BOOL COND.-TAB.-BIT * PNCLR BOOL T NO CLEAR-BIT * PREWRT BOOL REWR
0x21d004…21d198 Dummy {f00=0x0152, f01=0x018e, f02=»DEBINW1 BIN DENTERVARIABLE * PDEBINW2 BIN DENTERVARIABLE + $ PDEBINW3 BIN DENTERVARIABLE + H PDEBINW4 BIN DENTERVARIABLE + l ( PFRMTPNTR BIN POINTER TO FMT ON DISC + " PDEINPUT STRG 81 DENTERVARIABLE + BCD2A BCD 2 WORKITEM + PBCD3A BCD
0x21d198…21d32c Dummy {f00=0x0152, f01=0x0190, f02=» PSTR6B STRG 6 , PSTRG10A STRG 10 WORKITEM , PSTR15A STRG 15 WORKITEM , 8 . PBCDI21 BCDI (5),21 WORKITEM(4-5)SHB FREEZE , X P EJECT , P* , P* , P* TERMINAL-BLOCK: 6 , P* , PTB6 BLK , & PNEWVOL BOOL F 'NEW VOLUME LOADED
0x21d32c…21d4c0 Dummy {f00=0x0152, f01=0x0190, f02=»SWITUS BOOL F USERFILE ASSIGNED Y/N , & PASDFLAG BOOL T AUTOMATIC SKIP/DUP - , PSEARCH BOOL SEARCH MODE - V * PCHKACC1 BOOL F CHECK ACCUMULATION SHB - v * PCHKACC2 BOOL F CHECK ACCUMULATION SHB - $ PCHKBAL BOOL F CHECK BALANCE SHB - P EJECT - & P
0x21d4c0…21d654 (1, 450) Dummy {f00=0x0152, f01=0x0190, f02=» BIN WORKITEM, DISC-ROUTINES - $ PDKBIN3 BIN WORKITEM, DISC-ROUT . & PSECLEN BIN W'256' . N P SECTORLENTH USERFILE . h ( PTABLE STRG 6 TABLE-NAME (VALUE-SETS) . PEOLINE BIN END-OF-LINE . ( PVSEIND BIN VALUE-SET ELEMENT INDEX . " PWORK BIN
0x21d654…21d7e8 Dummy {f00=0x0152, f01=0x018e, f02=»14 USED BY DECONV . P EJECT / P* / ( P* COMMON WORKITEM FOR SHB / 2 P* / T P / ^ PCB6 BLK / f ( PDCSTAT BOOL F CARRIER OFF, TIME OUT / v & PDCBAB BOOL F T=ABORT DC CONVERSION / & PFDBAB BOOL F T=ABORT FD CONVERSION / $ PFDEOF BOOL F T=END
0x21d7e8…21d97c Dummy {f00=0x0152, f01=0x0190, f02=» $ PTSKADR BIN X'0040' TASK ADDRESS 0 ( PREQDC BIN REQUESTED LENGTH DCWRITE 0 , , PREQFD BIN REQUESTED LENGTH FDWRITE/READ 0 X PCWFD BIN CONTROL WORD FD 0 PFDCNT BCD 4 FD NUMBER 0 PDCBUF STRG 20 DC BUFFER 0 P EJECT 0 P* DUMMY WORK BLOCK
0x21d97c…21db10 Dummy {f00=0x0152, f01=0x40da, f02=»DUM4 BOOL 0 PDU5 BLK 1 PDUM5 BOOL 1 " PDU6 BLK 1 4 PDUM6 BOOL 1 D PDU7 BLK 1 V PDUM7 BOOL 1 f PDU8 BLK 1 x PDUM8 BOOL 1 PDU9 BLK 1 PDUM9 BOOL 1 PDIV 1 END 1 @ 1 UFFER 0 P EJECT 0 P* DUMMY WORK BLOCK
0x21db10…21dca4 Dummy {f00=0x0152, f01=0x2008, f02=» 2 EOLINE BIN END-OF-LINE + ( PVSEIND BIN VALUE-SET ELEMENT INDEX + ( " PWORK BINI (12) FREE WORK ITEMS + T P WORKITEM 11,12 USED BYE + z P SEARCH MODE + PDIV + END + @ + SC-ROUTINES * ( PDKBIN2 BIN WORKITEM, DISC-ROUTINES
0x21dca4…21de38 Dummy {f00=0x0152, f01=0x0190, f02=»0=A PUPDV07 0 P CALL TYPET,BIN7,X.PSEU1,X.PSEU2,X.WB10,BIN8 * P CBE BIN7,W3,UPDV01 JUMP IF ALPHA STRG N PUPDV09 | P SET ALPHA T=BCD-NUM P B UPDV01 PUPDV16 2 P IB BIN5,UPDV20,UPDV30,UPDV30,UPDV30,UPDV25 C P UPDGOT,UPD
0x21de38…21dfcc Dummy {f00=0x0152, f01=0x0190, f02=»12 SAVE INDEX TO ERR.MESS . P XCOPY BIN3,W0,W1,BIN11,W1 SAVE POOLINDEX " P CBL DEBINW4,W128,UPDE10 T P MOVE BIN9,=X'3F' t P CALL MSKOUT,BIN9,DEBINW4 P ADD BIN12,BIN9 PUPDE10 P ADD BIN12,W1 P CBL BIN12,BIN13,UPDV01
0x21dfcc…21e160 Dummy {f00=0x0152, f01=0x0190, f02=»CATE P ADD BIN12,W1 P SET DOOL4 " P BNZ DECERR 4 P PERF DEFIND,BIN8,BIN9 H P GETFLD 0,BIN8,BIN9 f P MOVE WORK(W6),BIN11 P MOVE WORK(W7),BIN12 P MOVE WORK(W8),BIN13 , P CALL GETVAL,BPOOL(W1),BIN11,BIN12,BIN13 P B
0x21e160…21e2f4 (1, 451) Opaque[0x194]
0x21e2f4…21e488 # DirEnt {nam=»DELINK«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0f00, f03=0x0000}
0x21e2f4…21e488 IdxSect {
0x21e2f4…21e488 f00 = 0x0078 // 0x21e2f4 @0x0
0x21e2f4…21e488 f01 = 0x0002 // 0x21e2f6 @0x2
0x21e2f4…21e488 gno = [ // 0x21e2f8 @0x4
0x21e2f4…21e488 [0x00]: C0x0078.0x0.0
0x21e2f4…21e488 ]
0x21e2f4…21e488 }
0x21e488…21e61c Dummy {f00=0x0078, f01=0x0190, f02=» PSCR PPRT DELINK PMOV CNFT,/A,CON10 " PPRT /A < PTRA DEDDIV,NL J PKPF /O ` PNOD C n PINC PTSDE | PINC DEDISC PINC DELOCK PINC DEAPPU PNOD R PINC DKRUT1 PINC DKRUT2 PINC DKRUT3 P
0x21e61c…21e7b0 Dummy {f00=0x0078, f01=0x0190, f02=»NOD R PINC DENVAL PINC DEGENE PINC DECOMP 2 PINC DESTAT D PINC DENT02 V PNOD R h PINC DE10ST v PINC DE11ST PINC DE12ST PINC DE1201 PINC DE14ST PINC DE15ST PINC DE30ST PINC DE31ST PNO
0x21e7b0…21e944 Dummy {f00=0x0078, f01=0x0190, f02=»C DEPRFG PINC DEUNPF PNOD R " PINC DEVGAC 0 PINC DEATTF B PINC DEFDSC T PNOD R f PINC DE40ST t PINC DE50ST PINC DE60ST PINC DE70ST PNOD R PINC DECONV PNOD R PINC DEPROC PINC DCTASK
0x21e944…21ead8 Dummy {f00=0x0078, f01=0x0044, f02=» M=M:DENJ,MU=M:DENJ,A=DELINK,C=CNFT,CU=CON10 PASG /E0,TY10 4C DEATTF B PINC DEFDSC T PNOD R f PINC DE40ST t PINC DE50ST PINC DE60ST PINC DE70ST PNOD R PINC DECONV PNOD R PINC DEPROC PINC DCTASK
0x21ead8…21ec6c Dummy {f00=0x0078, f01=0x2008, f02=» J,MU=M:DENJ,A=DELINK,C=CNFT,CU=CON10 PASG /E0,TY10 4C DEATTF B PINC DEFDSC T PNOD R f PINC DE40ST t PINC DE50ST PINC DE60ST PINC DE70ST PNOD R PINC DECONV PNOD R PINC DEPROC PINC DCTASK
0x21ec6c…21ee00 Dummy {f00=0x0078, f01=0x0190, f02=»P8 <<HT _ R <A_ <A <a ^ <h = F F ) 1l ' =" z 1l & X X X* T Z0 I R < _ <h =_H ^L _ _R 1l & G _d 1l F '_p R : <<H P < : 1l 1l & R P _v _| V V Q WR
0x21ee00…21ef94 (1, 452) Opaque[0x194]
0x21ef94…21f128 # DirEnt {nam=»DKCONV«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x07e8, f03=0x0000}
0x21ef94…21f128 IdxSect {
0x21ef94…21f128 f00 = 0x003f // 0x21ef94 @0x0
0x21ef94…21f128 f01 = 0x0014 // 0x21ef96 @0x2
0x21ef94…21f128 gno = [ // 0x21ef98 @0x4
0x21ef94…21f128 [0x00]: C0x003f.0x1.0
0x21ef94…21f128 [0x01]: C0x0086.0x2.0
0x21ef94…21f128 [0x02]: C0x0086.0x3.0
0x21ef94…21f128 [0x03]: C0x0087.0x0.0
0x21ef94…21f128 [0x04]: C0x0087.0x1.0
0x21ef94…21f128 [0x05]: C0x0087.0x2.0
0x21ef94…21f128 [0x06]: C0x0087.0x3.0
0x21ef94…21f128 [0x07]: C0x0088.0x0.0
0x21ef94…21f128 [0x08]: C0x0088.0x1.0
0x21ef94…21f128 [0x09]: C0x0088.0x2.0
0x21ef94…21f128 ]
0x21ef94…21f128 }
0x21f128…21f2bc Dummy {f00=0x003f, f01=0x018e, f02=» . P IDENT DECONV REL=1.0 VER=1 80-12-12/SHB P UPD 80-07-14/JAER 6 P DDUM DEDDIV R P PDIV f P ENTRY DECONV t P P P EXT DEPOOL P EXT TESTB P EXT EMPTYT P EXT DERROR P EXT ATTDEV ATTACH DEVICE
0x21f2bc…21f450 Dummy {f00=0x003f, f01=0x0190, f02=» P* KEYTABLE P* PCLR EQU X'8F' CLEAR * PCAN EQU X'91' CANCEL F PRET EQU X'98' RETURN b PENT EQU X'8C' ENTER ~ P* PKEYTAB KTAB CLR,CAN,RET,ENT P P P P* P* P PSTIMO EQU X'
0x21f450…21f5e4 Dummy {f00=0x003f, f01=0x0190, f02=»DIFFERENT CONVERTIONS- j P* -METHODS @ P* ONE OF THEM IS ALREADY PREPAIRED FOR YOUR PRINTOUT). 8 2 P* THE OTHER YOU HAVE TO CODE YOURSELVES. | P* D P* FORMAL PARAMETERS: FC = FUNCTION-CODE (DEVICE-CLASS) @ P*
0x21f5e4…21f778 Dummy {f00=0x003f, f01=0x0190, f02=» = 3 CASETTE OUTPUT 8 P* = 4 PRINTOUT LP/GP 6 2 P* = 5 DISCFILE r : P* = 6 FLOPPYDISC FILE D P*
0x21f778…21f90c Dummy {f00=0x003f, f01=0x0190, f02=» TYPE = TYPE OF HANDLING . P* = 1 OPEN . : P* = 2 BATCHHEAD-RECORD ` 6 P* = 3 DATA RECORD 8 P* = 4 BALANCE RE
0x21f90c…21faa0 Dummy {f00=0x003f, f01=0x0190, f02=» = 0 OK > P* /= 0 ERROR MESSAGE-NUMBER * F P* =-1 SKIP CURR BATCH, GO TO NEXT l : P* =-2 SKIP TO BALANCE H P*
0x21faa0…21fc34 (1, 453) Dummy {f00=0x0086, f01=0x0190, f02=» =-5 DELETE THIS BATCH > P* =-6 GET CURRENT RECORD 8 P* z : P* INPUT VARIABLE: BIN4 = FC-CODE FOR DEVICE P* T P************************************************************
0x21fc34…21fdc8 Dummy {f00=0x0086, f01=0x0190, f02=»PRINTA,DISCFD,FLOPPY,DELETE,FREEZE PRECEIV * PDISCFD 8 PCASSET F PERROR T * P MOVE RETCON,W4 'FUNCTION NOT ALLOWED? b P B RETURN P EJECT P* * P* THIS IS THE PRINTOUT FUNCTION P* PPRINTA : P IB TYPE
0x21fdc8…21ff5c Dummy {f00=0x0086, f01=0x0190, f02=»TER n P* PPR100 $ P PERF ATTDEV,BIN6 ATTACH DEVICE $ P BOK DECOOK L P B RETURN ` P EJECT r P* P* 4 P* PRINTOUT OF THE DIFFERENT RECORD TYPES P* PPR200 P EDWRT DEDSPRT,FCOUNT P BNOK
0x21ff5c…2200f0 Dummy {f00=0x0086, f01=0x018e, f02=»,=W'35' OUTPUT DEVICE NOT OP....' P B RETURN GO AND CLOSE * P* H * P* CLOSE DEVICE = DETACH PRINTER R P* PPR500 P PERF DETPRT DETACH DEVICE P B RETURN P EJECT P* 8 P* THIS ROUTINE DELETE BATCHES
0x2200f0…220284 Dummy {f00=0x0086, f01=0x0190, f02=» 0 P CBNE WORK(W8),W0,DEL110 NOT THE WHOLE FILE P MOVE DATE,HEX00 RESET DATE 8 PDEL110 P B RETURN j P EJECT | P* . P* THIS ROUTINE FREEZE BATCHES ON USER FILE P* P PFREEZE 8 P IB TYPE,FRE100,FRE200,FRE300 OPEN
0x220284…220418 Dummy {f00=0x0086, f01=0x0190, f02=»LE CODE PRINTER z $ P PERF ATTDEV,BIN6 ATTACH DEVICE P BOK FRE110 @ 0 P MOVE RETCON,=W'35' OUTPUT DEV NOT OPERABLE T P B RETURN PFRE110 P MOVE STRG10A,HEX00 P GETTIME STRG10A P MOVE TIME,STRG10A P EDWRT DEDSPRT,FFR
0x220418…2205ac Dummy {f00=0x0086, f01=0x0190, f02=»XT BATCH v P B RETURN PFRE210 " & P TBT BDABAL,FRE230 BATCH BALANCED 0 P* BATCH NOT BALANCED Z PFRE220 v , P EDWRT DEDSPRT,FBATC1 PRINT ERROR REPORT P B FRE205 D P* CHECK IF NO RECORDS HAS BEEN INSERTED IN CONTINUETION FORMATS
0x2205ac…220740 Dummy {f00=0x0086, f01=0x0190, f02=» GET APPL P CMP VSEIND,=W'7999' P BG FRE240 NO CHECK . P CMP VSEIND,=W'7000' J P BL FRE235 NO CHECK f PFRE232 P SET CHKBAL IND BALANCE P B DECOOK PFRE235 P CMP VSEIND,=W'2999' P BG FRE240 NO CHECK P
0x220740…2208d4 (1, 454) Dummy {f00=0x0086, f01=0x018e, f02=» P* CHECK BALANCE PFRE300 P MOVE BIN8,W0 LOAD FIELD NO * PFRE310 N P ADD BIN8,W1 UPDATE FIELD NO " P CALL GETFWD,BIN7,2,BIN8,BIN4 P CALL ADJUST,BIN7 P BN DECOOK ALL FIELD DONE P GETCTL 0,VSEIND GET APPL P CMP
0x2208d4…220a68 Dummy {f00=0x0086, f01=0x0190, f02=» P CMP VSEIND,=W'2000' P BL FRE310 NO CHECK $ . P CMP VSEIND,=W'2999' START OF ACCUMULATION @ P BG FRE330 NO r P EJECT P* ACC 1 HANDLING P* LOAD ACC 1 P* SPEC HANDLING =2XXX PFRE325 P SET CHKACC1 IND ACC. CHEC
0x220a68…220bfc Dummy {f00=0x0086, f01=0x0190, f02=»ANDLING =3XXX PFRE330 P CMP VSEIND,=W'3999' $ P BG FRE350 ACC 2 HANDLING @ P SUB BCDI21(W4),:FMTITEM b P B FRE310 P EJECT P* ACC 2 HANDLING P* LOAD ACC 2 P* SPEC HANDLING =4XXX PFRE350 P CMP VSEIND,=W
0x220bfc…220d90 Dummy {f00=0x0086, f01=0x018e, f02=»SAVE SUM v P B FRE310 P* ACCUMULATION OF ACC 2 " P* SPEC HANDLING =5XXX B PFRE360 ` P CMP VSEIND,=W'5999' n P BG FRE370 ACC 1 / ACC 2 P SUB BCDI21(W5),:FMTITEM P B FRE310 P EJECT . P* ACCUMULATION OF ACC 1 OR ACC
0x220d90…220f24 Dummy {f00=0x0086, f01=0x0190, f02=» v P B FRE310 PFRE375 P SUB BCDI21(W5),:FMTITEM ( P B FRE310 H P EJECT Z P* CHECK BALANCE OF ACC 1 h PFRE380 P CLEAR CHKACC1 P CMP BCDI21(W4),=D'0' P BE FRE325 BALANCE $ P CLEAR CHKBAL IND NOT IN BALANCE
0x220f24…2210b8 Dummy {f00=0x0086, f01=0x018e, f02=»* CHECK BALANCE OF ACC 2 PFRE390 P CLEAR CHKACC2 . P CMP BCDI21(W5),=D'0' D P BE FRE355 BALANCE b $ P CLEAR CHKBAL IND NOT IN BALANCE | " P MOVE BCD13A,NUMBER GET REC NO P SUB BCD13A,=D'1' , P EDWRT DEDSPRT,FBATC2 PRINT ERROR RE
0x2210b8…22124c Dummy {f00=0x0086, f01=0x0190, f02=» ~ P CMP BCDI21(W4),=D'0' P BE FRE420 BALANCE & P* NOT IN BALANCE @ P X PFRE410 ` $ P CLEAR CHKBAL IND NOT IN BALANCE n " P MOVE BCD13A,NUMBER GET REC NO P SUB BCD13A,=D'1' , P EDWRT DEDSPRT,FBATC2 PRINT ERROR REPORT P B
0x22124c…2213e0 Dummy {f00=0x0086, f01=0x0190, f02=»0 NOT IN BALANCE PFRE430 , P TBF CHKBAL,DECOOK BATCH NOT IN BALANCE & P SET BDAFRO FREEZE BATCH V P B DECOOK v P EJECT P* CLOSE PFRE500 P MOVE STRG10A,HEX00 P GETTIME STRG10A P MOVE TIME,STRG10A P EDWRT
0x2213e0…221574 (1, 455) Dummy {f00=0x0087, f01=0x0190, f02=»TCON,W0 PRETURN P RET P EJECT * P 8 PTRANSM @ 4 P IB TYPE,DC100,DC200,DC300 OPEN,BATCHHEAD,DATA C N P DC300,DC500 BALANCE, CLOSE P P P* P* SEND SOF P* SEND '001'+DATE P* P PDC100
0x221574…221708 Dummy {f00=0x0087, f01=0x0190, f02=» P* SEND '999' P* SEND EOF P* . P 8 PDC500 @ P B DECOOK N P EJECT ` P* n P* x P* FLOPPY DUMPING P* P PFLOPPY P MOVE BTYPE,TYPE 4 P IB TYPE,FD100,FD200,FD300 OPEN,BATCHHEAD,DATA C
0x221708…22189c Dummy {f00=0x0087, f01=0x0190, f02=» P TBT FDBAB,FD170 * P PERF GETBUF GET 3 CONSECUTIVE BUFFERS P B FD110 OK J P B FDERR ERROR ^ PFD110 t P MOVE CWFD,W7 HDR RECORD P MOVE REQFD,=W'128' 6 P CALL FDIO,DSFD,X'A1',BPOOL(BIN10),REQFD,CWFD OPEN P MOVE BIN4,W20
0x22189c…221a30 Dummy {f00=0x0087, f01=0x0190, f02=» P PFD140 * P MOVE BIN6,=X'0036' FILE CODE PRINTER $ P PERF ATTDEV,BIN6 ATTACH DEVICE L P BNOK FDERR t P MOVE STRG10A,HEX00 P GETTIME STRG10A P MOVE TIME,STRG10A P EDWRT DEDSPRT,FFDHDR " P PERF FDRVOL READ VO
0x221a30…221bc4 Dummy {f00=0x0087, f01=0x018e, f02=» PFD160 $ P MOVE STR8A,STR8B SAVE FILE NAME $ P MOVE FDCNT,W1 RESET FD COUNTER > $ P PERF FDWVOL WRITE VOLUME LABEL f P B FD165 OK P B FDERR ERROR P PFD165 $ P MOVE BCDI21(W5),W0 RECORD COUNT P CLEAR BSUPR
0x221bc4…221d58 Dummy {f00=0x0087, f01=0x018e, f02=» 0 P MOVE RETCON,=W'35' OUTP. DEV. NOT OPERABLE PFDERRT < P SET FDBAB J P B RETURN P n PFD180 v P MOVE CWFD,W7 P MOVE REQFD,=W'128' > P CALL FDIO,DSFD,X'B8',BPOOL(BIN10),REQFD,CWFD *UNLOAD HDR1 " P MOVE RETCON,=W'
0x221d58…221eec Dummy {f00=0x0087, f01=0x0190, f02=» ( P TBF BDAFOR,FD300 ANY FORCED FIELDS? , P EDWRT DEDSPRT,FBATC3 PRINT ERROR REPORT 0 P SET FDBAB ` & P MOVE RETCON,=W'-1' GET NEXT BATCH r P B RETURN P EJECT PFD300 P TBT FDBAB,FD170 P TBT FDEOF,FDEOF10 P CBE TYPE,W4
0x221eec…222080 Dummy {f00=0x0087, f01=0x0190, f02=»ORD n P MOVE DEBINW3,W1 P PRINT DEDSPRT,DEBINW3,W0 $ P BNOK FDERR F PFD308 Z * P MOVE BIN10,WORK(W13) GET BUFFER INDEX h $ P MOVE BIN9,BIN10 GET BPOOL INDEX P ADD BIN9,W1 $ P MOVE BIN8,W0 RESET FIELD NUMBER PFD310 P
0x222080…222214 (1, 456) Dummy {f00=0x0087, f01=0x0190, f02=»EMPTHY | P B FD320 BCD FIELD OVERFLOW " P B FD320 EDIT BUFFER OVERFLOW 2 PFD315 X P MOVE RETCON,W5 f P B FDERRT ~ P PFD320 " P MOVE RETCON,=W'54' EDIT ERROR P B FDERRT P EJECT P* P* WRITE BLOCKS
0x222214…2223a8 Dummy {f00=0x0087, f01=0x0190, f02=»NTINUE IN SAME BUFFER P B FD311 P EJECT . PFD350 < P PERF FDLOAD J P B FD370 OK ^ P B FD360 ERROR r PFD360 P MOVE REQFD,=W'128' P MOVE CWFD,W7 8 P CALL FDIO,DSFD,X'B8',BPOOL(BIN10),REQFD,CWFD UNLOAD PFD36
0x2223a8…22253c Dummy {f00=0x0087, f01=0x0190, f02=» FD350 ENT PFD370 " P PERF FDRVOL READ VOLUME LABEL P B FD375 OK F P B FD360 ERROR Z PFD375 p . P IB DEBINW2,FD380,FD360,FD170 CLR,CAN,RET ~ P* ENT P PFD380 $ P PERF FDWVOL WRITE VOLUME LABEL P B FD382 OK
0x22253c…2226d0 Dummy {f00=0x0087, f01=0x0190, f02=»URN P ! PFDEOF05 ! P SET FDEOF INDICATE EOF ! $ & P MOVE WORK(W14),BIN8 SAVE FIELD NO ! D P B FD360 ! n P ! ~ PFDEOF10 ! P CLEAR FDEOF ! * P MOVE BIN10,WORK(W13) GET BUFFER INDEX ! $ P MOVE BIN9,BIN10 GET BPOOL INDEX ! P ADD BIN
0x2226d0…222864 Dummy {f00=0x0087, f01=0x0190, f02=»0),REQFD,CWFD WRITE BLOCKS ! p P B FD340 " " P EJECT " 2 PFD400 " @ P* BALANCE FORMAT " N P B FD300 " l P EJECT " | PFD500 " * P MOVE BIN10,WORK(W13) GET BUFFER INDEX " P TBT FDBAB,FD560 ABORT " $ P MOVE BIN9,BIN10 GET BPOOL INDEX "
0x222864…2229f8 Dummy {f00=0x0087, f01=0x0190, f02=» " P B FD510 EOE # PFD510 # P MOVE REQFD,=W'128' # * P MOVE CWFD,W7 # F 8 P CALL FDIO,DSFD,X'B8',BPOOL(BIN10),REQFD,CWFD UNLOAD # PFD515 # * P MOVE DEBINW4,=W'55' CHANGE FLOPPYDISK # P PERF DERROR,KEYTAB # . P IB DEBINW2,FD520,FD510,
0x2229f8…222b8c Dummy {f00=0x0087, f01=0x0190, f02=»LUME LABEL # | P B FD530 OK $ P B FD510 ERROR $ & PFD530 $ < . P IB DEBINW2,FD535,FD510,FD170 CLR,CAN,RET $ J P* ENT $ | PFD535 $ $ P PERF FDWVOL WRITE VOLUME LABEL $ P B FD540 OK $ P B FD510 ERROR $ PFD540 $ P MOVE REQFD,=W'1
0x222b8c…222d20 Dummy {f00=0x0087, f01=0x0190, f02=»DSFD $ P CLEAR FDBAB % P MOVE CWFD,W7 HDR SECTOR % P MOVE REQFD,=W'128' % @ 8 P CALL FDIO,DSFD,X'B8',BPOOL(BIN10),REQFD,CWFD UNLOAD % P CLEAR FDEOF RESET EOF % P MOVE CWFD,W7 % P MOVE REQFD,=W'128' % 8 P CALL FDIO,DSFD,X'A2',BPOOL(BIN1
0x222d20…222eb4 (1, 457) Dummy {f00=0x0087, f01=0x0190, f02=»,W6,BIN10,BIN4,STRG10A % P B DECOOK & PFD560 & 0 P MOVE STRG10A,HEX00 & > P GETTIME STRG10A & Z P MOVE TIME,STRG10A & r P EDWRT DEDSPRT,FFDERR & P B FD550 & P & PFD570 & P MOVE STRG10A,HEX00 & P GETTIME STRG10A & P MOV
0x222eb4…223048 Dummy {f00=0x0087, f01=0x0190, f02=»UFFERS & r P* ' P* BUFFER INDEX IN WORK(W13) ' P* ' < P ' F PGETBUF PROC ' N * P MOVE BIN10,W3 TOTAL NUMBER OF BUFFERS ' b , P MOVE BIN4,W3 NO. OF COSECUTIVE BUFFERS ' @ P PERF DEPOOL,W2,BIN10,BIN4,STRG10A GET 3 COSECUTIVE BUFFERS ' $ P BNO
0x223048…2231dc Dummy {f00=0x0087, f01=0x0190, f02=»DD BIN9,W1 INDEX EDIT BUFFER ' 4 P MOVE BPOOL(BIN10),=X'00' RESET TRANSMIT BUFFER ( $ P RET ( PGETBU2 ( h P RET 2 ( v P PEND ( P EJECT ( P* ( , P* FDRVOL READ VOLUME LABEL AND DISPLAY ( P* ( P ( P ( PFDRVOL PROC ( P
0x2231dc…223370 Dummy {f00=0x0087, f01=0x0190, f02=» CALL FDIO,DSFD,X'91',BPOOL(BIN13),REQFD,CWFD READ (HDR1) ( P XSTAT DSFD,BIN4 ) B P MOVE BIN7,=X'086F' ) Z P CALL MASK,BIN4,BIN7 ) v P BNOK FDRV02 ) P MOVE BIN7,=W'66' ) 8 P XCOPY STR6A,W0,W6,BPOOL(BIN13),BIN7 EXPIRATION DATE ) 4 P XCOPY STR8A
0x223370…223504 Dummy {f00=0x0087, f01=0x0190, f02=»CLGD,STR6B ) P MOVE BIN7,=W'45' * 6 P XCOPY STR2A,W0,W2,BPOOL(BIN13),BIN7 GET FD NUMBER * , P ATTFMT FCAS02 * f P SET DEPROMPT * | P DISPLAY 0,W1,W0 * P THOME * & P MOVE DEBINW3,W1 REQUESTED LENGTH * 2 P NKI .NE,DEDSDYKB,STR1A,KEYTAB,DEBINW3
0x223504…223698 Dummy {f00=0x0087, f01=0x0190, f02=» P + P + PFDWVOL PROC + P MOVE BIN7,=W'66' + ( & P MOVE BIN13,BIN10 GET BUFFER INDEX + B ( P ADD BIN13,W2 ADJUST FOR READ BUFFER + l * P EDSUB BPOOL(BIN13),BIN7,FRMVOL2 DATE + P MOVE BIN7,W5 + 0 P EDSUB BPOOL(BIN13),BIN7,FRMVOL1 VOLUME NAME
0x223698…22382c Dummy {f00=0x0087, f01=0x0190, f02=»FD,W7 + > P CALL FDIO,DSFD,X'95',BPOOL(BIN13),REQFD,CWFD WRITE (HDR1) , P XSTAT DSFD,BIN4 , P P MOVE BIN7,=X'024F' , h P CALL MASK,BIN4,BIN7 , P , P BNOK FDWVO2 , & P ADD FDCNT,=D'1' UPDATE FD NUMBER , P MOVE CWFD,=W'26' HDR RECORD , (
0x22382c…2239c0 Dummy {f00=0x0087, f01=0x0190, f02=» 2 , P PEND - P EJECT - P* - & P* FDWRIT WRITE BLOCKS - 0 P* - N P - X P - ` PFDWRIT PROC - h PFDWR00 - | P WAIT DSFD - P XSTAT DSFD,BIN4 - P CALL TESTB,BIN4,W2 EOE - P BZ FDWR10 - P RET 4 END OF EXTENT - PFDWR10
0x2239c0…223b54 (1, 458) Dummy {f00=0x0087, f01=0x018e, f02=» PFDWROP . PFDWRCL . P B FDWR20 . PFDWRHD BATCH HEADER . 2 4 P MOVE BPOOL(BIN10),=X'00' INITIATE OUTPUT BUFFER . P P MOVE BIN4,RECLGD . . P XCOPY BPOOL(BIN10),W0,BIN4,BPOOL(BIN9),W0 . P B FDWRSEND . P* . PFDWRDATA . * P CBE B
0x223b54…223ce8 Dummy {f00=0x0087, f01=0x0190, f02=» . ` P MOVE BIN4,RECLGD / ( P SUB BIN4,W5 SUBTRACT ROOM FOR RECNO / " . P XCOPY BPOOL(BIN10),W5,BIN4,BPOOL(BIN9),W0 / N ( P SUB BIN4,W1 MAKE ROOM FOR EOR CHAR / 4 P CBG BIN16,BIN4,FDWR100 TOO MANY CHAR IN INP.BUF / P MOVE STR2A,=X'7F' / & P ADD BIN16
0x223ce8…223e7c Dummy {f00=0x0087, f01=0x0190, f02=»OVE BIN4,RECLGD / ( P SUB BIN4,W1 LAST POSITION IN BUFFER 0 ( P MOVE STR2A,=X'21' CONTINUATION MARK 0 D ( P XCOPY BPOOL(BIN10),BIN4,W1,STR2A,W1 0 p P MOVE REQFD,=W'128' 0 P MOVE CWFD,W0 0 2 P CALL FDIO,DSFD,X'06',BPOOL(BIN10),REQFD,CWFD 0 P SUB
0x223e7c…224010 Dummy {f00=0x0087, f01=0x0190, f02=»6 0 . P CBE VSEIND,W1,FDWR00 WRITE REST OF BUFFER 1 P RET 6 1 < P* 1 J PFDWRBAL 1 T 4 P MOVE BPOOL(BIN10),=X'00' INITIATE OUTPUT BUFFER 1 d P EDIT BPOOL(BIN9),FFD999 1 P MOVE BIN4,RECLGD 1 . P XCOPY BPOOL(BIN10),W0,BIN4,BPOOL(BIN9),W0 1 P
0x224010…2241a4 Dummy {f00=0x0087, f01=0x0190, f02=»N10),REQFD,CWFD WRITE BLOCKS 1 r PFDWRRET 2 $ P RET 2 4 PFDWR20 2 @ P RET 2 2 N P PEND 2 P EJECT 2 j P* 2 x P* FDLOAD LOAD FD PROCEDURE 2 P* 2 P 2 P 2 PFDLOAD PROC 2 P MOVE CWFD,W7 HDR RECORD 2 P MOVE REQFD,=W'128'
0x2241a4…224338 Dummy {f00=0x0087, f01=0x0190, f02=» P MOVE BIN7,=X'000F' 3 P CALL MASK,BIN4,BIN7 3 P BNOK FDLOA2 3 < P RET 3 P PFDLOA2 3 P MOVE CWFD,W7 HDR RECORD 3 j P MOVE REQFD,=W'128' 3 8 P CALL FDIO,DSFD,X'B8',BPOOL(BIN10),REQFD,CWFD UNLOAD 3 P RET 2 3 P PEND 3 P EJECT 3
0x224338…2244cc Dummy {f00=0x0087, f01=0x0190, f02=» RET 4 =CUMPULSORY FIELD EMPTHY 3 P* RET 6 =BCD-FIELD OVERFLOW 4 ( " P* RET 8 =EDIT BUFFER OVERFLOW 4 L P* 4 r $ P* APPL = FIELD INTO BUFFER 4 | 4 P* APPL = 1 FIELD INTO BUFFER, TRANSMIT BLOCK 4 $ P* APPL = 2 NO TRANSMIT FIELD 4 B P* A
0x2244cc…224660 Dummy {f00=0x0087, f01=0x018e, f02=» FOLLOWING APPL ONLY USED IN BATCHHEADER 4 0 P* APPL = 13 EOR-CHAR AS END OF EACH RECORD 5 0 J P* APPL = 14 CONT-CHAR IN END OF EACH DATA RECORD WHICH IS CONTINUED 5 d 0 P* APPL = 15 INSERT BACHNAME IN THIS FIELD 5 P* 5 P* BIN4 = WORK ITEM 5
0x224660…2247f4 (1, 459) Dummy {f00=0x0088, f01=0x0190, f02=» P* BIN16= EDIT POINTER 6 P* 6 " PCONV PROC CONT 6 , P CBG CONT,W0,CON100 6 B PCON090 6 ^ P MOVE BPOOL(BIN9),=X'20' 6 l ( P MOVE BIN13,W0 RESET DELETE POINTER 6 ( P MOVE BIN16,BIN13 LOAD EDIT POINTER 6 PCON100 6 P CLEAR FSUPR 6 P T
0x2247f4…224988 Dummy {f00=0x0088, f01=0x018e, f02=»ALL ADJUST,BIN7 6 P BOK CON130 7 P BN CONRET ALL FIELD DONE 7 , & P B CONER1 COMPULSORY FIELD EMPTHY 7 N PCON130 7 x P GETCTL 0,VSEIND GET APPL 7 P* 7 P CBNE BTYPE,W3,CON150 7 P* DATA RECORD 7 * P IB VSEIND,CON132,CON100,CON13
0x224988…224b1c Dummy {f00=0x0088, f01=0x0190, f02=» 7 P* 8 PCON140 8 P* NO SUPPRESSION 8 P CLEAR FSUPR 8 : P B CON190 8 N P* 8 ` P* 8 j PCON150 8 t ( P* IN HEADER, SET GENERAL CONDITIONS 8 6 P IB VSEIND,CON152,CON100,CON155,CON160,CON152, C 8 , P CON152,CON152,CON152,CON152,CO
0x224b1c…224cb0 Dummy {f00=0x0088, f01=0x0190, f02=» LEADING ZEROES 8 | P SET BSUPR 9 P B CON100 9 * P* 9 < PCON160 9 F P* GENERAL NO SUPPRESSION 9 T P CLEAR BSUPR 9 v P B CON100 9 P* 9 PCON165 9 P* EOR CHARACTER 9 P B CON100 9 P* 9 PCON170 9 P* CONTINUATION CHA
0x224cb0…224e44 Dummy {f00=0x0088, f01=0x0190, f02=»IN4,BIN7 LENGTH FIELD 9 P SUB BIN4,BIN16 : 6 P EDSUB BPOOL(BIN9),BIN16,FMTBATCH INSERT BATCHNAME : 6 P B CON260 : p P* : P* : P : PCON190 : P TBF FSUPR,CON195 : ( P CALL EMPTYT,:FMTITEM TEST IF EMPTY : $ P BNZ CON280 EMPTY, IGN
0x224e44…224fd8 Dummy {f00=0x0088, f01=0x0190, f02=» P ; * P MOVE BIN4,W188 GET EDIT BUFFER LENGTH ; * P SUB BIN4,BIN7 ADJUST WITH MAX LENGTH ; : , P SUB BIN4,BIN16 ADJUST WITH EDIT POINTER ; h P BN CONER3 ; $ P EDSUB BPOOL(BIN9),BIN16,FRMALP ; P B CON260 ; P ; P EJECT ; P* BCD ; P
0x224fd8…22516c Dummy {f00=0x0088, f01=0x0190, f02=» MAX LENGTH ; v , P SUB BIN4,BIN16 ADJUST WITH EDIT POINTER < P BN CONER3 < D P GETCTL 3,BIN4 GET SCHK < V P CALL TESTB,BIN4,W15 SIGN < v P BZ CON220 NO < P TBF FSUPR,CON210 < $ P EDSUB BPOOL(BIN9),BIN16,FRMTCS < P MOVE BIN13,BIN16 <
0x22516c…225300 Dummy {f00=0x0088, f01=0x0190, f02=»IN7,W1 ADJUST POINTER FOR SIGN < P B CON250 = & P = 8 PCON220 = @ P TBF FSUPR,CON230 = N $ P EDSUB BPOOL(BIN9),BIN16,FRMTCD = h P MOVE BIN13,BIN16 = P B CON280 = PCON230 = $ P EDSUB BPOOL(BIN9),BIN16,FRMBCD = & P MOVE BIN4,W21 SET PIC
0x225300…225494 (1, 460) Dummy {f00=0x0088, f01=0x0190, f02=»60 = . P ADD BIN13,BIN7 ADJUST DELETE/EDIT POINTER > ( P MOVE BIN16,BIN13 LOAD EDIT POINTER > < PCON280 > h ( P CBE VSEIND,W1,CONTRM APPL =1 TRANSM > v P MOVE BIN4,RECLGD > P CBG BIN16,BIN4,CONTRM > P B CON100 > P EJECT > P > PCONRET
0x225494…225628 Dummy {f00=0x0088, f01=0x0190, f02=»LOW > t & PCONER3 RET 8 EDIT BUFFER OVERFLOW ? P PEND ? 6 P EJECT ? D P* ? R P* FORMATS ? P* ? n P ? x P ? PFCOUNT FRMT ? P FTEXT ' 1' ? P FEOR NEW PAGE ? P FILLR ' ',2 ? P FILLR '*',10 ? P FTEXT 'NUMBER: ' ?
0x225628…2257bc Dummy {f00=0x0088, f01=0x0190, f02=»BCDI21(W5) ? P FILLR X'00',60 @ P FILLR X'00',60 @ * P FILLR X'00',60 @ B P FMEND @ Z P EJECT @ h PFRMSOF FRMT @ v P FSL @ P FCOPY =X'1D' @ P FILLR ' ',62 @ P FILLR ' ',62 @ P FMEND @ P @ PFRMEOF FRMT @ P FSL @
0x2257bc…225950 Dummy {f00=0x0088, f01=0x0190, f02=»001 @ P FMEND A P A PFRMVOL1 FRMT A " P FCOPY STR8A A 6 P FMEND A J PFRMVOL2 FRMT A X P FMEL '999999',DATE A l P FMEND A PFRMVOL3 FRMT A P FMEL '99',FDCNT A P FMEND A P EJECT A PFBATC1 FRMT A P FLINK FBATCH A P
0x225950…225ae4 Dummy {f00=0x0088, f01=0x0190, f02=» A ~ P FMEL '9999',BCD13A B P FILLR ' ',4 B $ P FTEXT 'MISST[MMER' B 8 P FEOR B T P FNL B b P FMEND B n P B | PFBATC3 FRMT B P FLINK FBATCH B P FTEXT 'EJ GODKENDT' B P FEOR B P FMEND B P B PFBATCH FRMT B P FNL B
0x225ae4…225c78 Dummy {f00=0x0088, f01=0x018e, f02=»ATCH B P FILLR ' ',4 C P FMEND C P C . PFMTBATCH FRMT C 6 P FCOPY BATCH C L P FMEND C ` P C n PFDCHDR FRMT C v P FNL C P FEOR C P FNL C P FTEXT 'S[NDNING' C P FLINK HDR C P FMEND C PFDCEND FRMT C P FNL C
0x225c78…225e0c Dummy {f00=0x0088, f01=0x0190, f02=» C PFDCERR FRMT D P FNL D P FEOR D ( P FNL D 6 P FTEXT 'S[NDNING' D B P FTEXT ' AVBRYTS' D P FLINK HDR D v P FEOR D P FNL D P FMEND D P D PFFRHDR FRMT D P FNL D P FEOR D P FNL D P FTEXT 'FRYSNING ' D
0x225e0c…225fa0 Dummy {f00=0x0088, f01=0x018e, f02=»NK HDR D P FEOR E P FNL E P FMEND E ( P E 6 PFFDHDR FRMT E > P FNL E R P FEOR E ^ P FNL E l " P FTEXT 'FLOPPY DISC SKRIVNING' E x P FLINK HDR E P FMEND E P E PFFDEND FRMT E P FNL E P FEOR E P FNL E " P FTEXT '
0x225fa0…226134 (1, 461) Dummy {f00=0x0088, f01=0x0190, f02=» P FNL F P FEOR F P FNL F " P FTEXT 'FLOPPY DISC SKRIVNING' F * P FTEXT ' AFBRYDES' F P P FLINK HDR F j P FEOR F | P FNL F P FMEND F P F PHDR FRMT F P FILLR ' ',4 F P FTEXT 'DATO: ' F P FMEL '99-99-99',DATE F P F
0x226134…2262c8 Dummy {f00=0x0088, f01=0x0190, f02=» F P FSL G P FCOPY =C'DEVICE' G P FILLR ':',1 G . P FINP 9 G B P FCOPY STSAVE(W3) G R P FTAB 20 G l P FCOPY =C'FILE' G | P FILLR '-',1 G P FCOPY =C'NAME' G P FILLR ':',1 G P FINP 32 G P FCOPY STR8B G P FNL G P FCO
0x2262c8…22645c Dummy {f00=0x0088, f01=0x0190, f02=» P FCOPY STR8A H P FNL H & P FCOPY =C'OLD VOLUME SEQUENCE NO:' H $ P FINP 32 H N P FCOPY STR2A H ^ P FNL H r P FKI 1 H ~ P FCOPY HEX00 H P FMEND H P EJECT H PFRMC99 FRMT H P FSL H P FLINK FFD999 H P FMEND H P H P
0x22645c…2265f0 Dummy {f00=0x0088, f01=0x0190, f02=»FFD999 FRMT H P FTEXT =C'SLUTD' I P FMEL '99999',BCDI21(W5) I , P FILLR ' ',60 I L P FILLR ' ',62 I b P FMEND I x P EJECT I PFRMALP FRMT I P FCOPY :FMTITEM I P FMEND I P I P I PFRMBCD FRMT I * P FMEL '999999999999999
0x2265f0…226784 Dummy {f00=0x0088, f01=0x411c, f02=»MTCS FRMT I , P FMEL 'TTTTTTTTTTTTTTTTTTTT9-',:FMTITEM J P FMEND J B P EJECT J P PFRMBCS FRMT J ^ , P FMEL '999999999999999999999-',:FMTITEM J r P FMEND J P J P J PFRMTID FRMT J P FMEL '999',BCD13A J P FMEND J P J P J
0x226784…226918 Dummy {f00=0x0088, f01=0x2008, f02=» K 0 & " ADD DEBIN2,W1 UPDATE FIELD NUMBER GETFLD 2,DEBIN2,DEBIN3 < BOK DEC130 BN DEC900 ALL FIELD DONE p & ! B DEC920 COMPULSORY FIELD EMPTHY DEC130 GETCTL 0,DEBIN5 GET APPL @ MOVE DEBINW1,DEBIN4 LOA
0x226918…226aac Dummy {f00=0x0088, f01=0x0190, f02=»:DU50- D:DU60A Z:DU60A D:DU700 Z:DU70F D:DU80 Z:DU80. D:DU90- Z:DU90 D:CB60 C:CB60 Q b ,Z:DU10 810722 Z:DU10D ,D:DU10 810722 D:DU10D :D ,Z:DU20 810722 Z:DU20D ,D:DU20 810722
0x226aac…226c40 Dummy {f00=0x0088, f01=0x0190, f02=» Z:DU40D ,D:DU40 810722 D:DU40D :D ,Z:DU50 810722 Z:DU50D ,D:DU50 810722 D:DU50D :D ,Z:DU60 810722 Z:DU60D ,D:DU60 810722 D:DU60D :D ,Z:DU70
0x226c40…226dd4 (1, 462) Opaque[0x194]
0x226dd4…226f68 # DirEnt {nam=»DELBUG«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x15c8, f03=0x0000}
0x226dd4…226f68 IdxSect {
0x226dd4…226f68 f00 = 0x00ae // 0x226dd4 @0x0
0x226dd4…226f68 f01 = 0x0002 // 0x226dd6 @0x2
0x226dd4…226f68 gno = [ // 0x226dd8 @0x4
0x226dd4…226f68 [0x00]: C0x00ae.0x1.0
0x226dd4…226f68 ]
0x226dd4…226f68 }
0x226f68…2270fc Dummy {f00=0x00ae, f01=0x0190, f02=» PSCR PPRT DELBUG PMOV CNJP,/A,CON10 " PPRT /A < PSCR J PTRA DEDDIV,NL V PKPF /O l PNOD C z PINC PTSDE PINC DEDISC PINC DELOCK PINC DEAPPU PNOD R PINC DKRUT1 PINC DKRUT2 PINC DK
0x2270fc…227290 Dummy {f00=0x00ae, f01=0x0190, f02=»RROR PNOD R PINC DENVAL PINC DEGENE , PINC DECOMP > PINC DESTAT P PINC DENT02 b PNOD R t PINC DE10ST PINC DE11ST PINC DE12ST PINC DE1201 PINC DE14ST PINC DE15ST PINC DE30ST PINC DE31
0x227290…227424 Dummy {f00=0x00ae, f01=0x0190, f02=»RT PINC DEPRFG PINC DEUNPF PNOD R . PINC DEPROC < PINC DEVGAC N PINC DEATTF ` PNOD R r PINC DE40ST PINC DE50ST PINC DE60ST PINC DE70ST PNOD R PINC DECONV PINC DCTASK PINC DEFDSC
0x227424…2275b8 Dummy {f00=0x00ae, f01=0x006a, f02=»,DELBUG : PMES $PDISC M=M:DEDB,MU=M:DENJ,A=DELBUG,C=CNJP,CU=CON10 PSCR N PASG /E0,TY10 Z ` PNOD R r PINC DE40ST PINC DE50ST PINC DE60ST PINC DE70ST PNOD R PINC DECONV PINC DCTASK PINC DEFDSC
0x2275b8…22774c Dummy {f00=0x00ae, f01=0x2008, f02=» : PMES $PDISC M=M:DEDB,MU=M:DENJ,A=DELBUG,C=CNJP,CU=CON10 PSCR N PASG /E0,TY10 Z ` PNOD R r PINC DE40ST PINC DE50ST PINC DE60ST PINC DE70ST PNOD R PINC DECONV PINC DCTASK PINC DEFDSC
0x22774c…2278e0 Dummy {f00=0x00ae, f01=0x0190, f02=»P8 <<HT _ R <A_ <A <a ^ <h = F F ) 1l ' =" z 1l & X X X* T Z0 I R < _ <h =_H ^L _ _R 1l & G _d 1l F '_p R : <<H P < : 1l 1l & R P _v _| V V Q WR
0x2278e0…227a74 (1, 463) Opaque[0x194]
0x227a74…227c08 # DirEnt {nam=»DELBUG«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x2d58, f03=0x0000}
0x227a74…227c08 IdxSect {
0x227a74…227c08 f00 = 0x016a // 0x227a74 @0x0
0x227a74…227c08 f01 = 0x002e // 0x227a76 @0x2
0x227a74…227c08 gno = [ // 0x227a78 @0x4
0x227a74…227c08 [0x00]: C0x016a.0x3.0
0x227a74…227c08 [0x01]: C0x016b.0x0.0
0x227a74…227c08 [0x02]: C0x016b.0x1.0
0x227a74…227c08 [0x03]: C0x016b.0x2.0
0x227a74…227c08 [0x04]: C0x016b.0x3.0
0x227a74…227c08 [0x05]: C0x016c.0x0.0
0x227a74…227c08 [0x06]: C0x016e.0x3.0
0x227a74…227c08 [0x07]: C0x016f.0x0.0
0x227a74…227c08 [0x08]: C0x0174.0x0.0
0x227a74…227c08 [0x09]: C0x0174.0x1.0
0x227a74…227c08 [0x0a]: C0x0174.0x2.0
0x227a74…227c08 [0x0b]: C0x0174.0x3.0
0x227a74…227c08 [0x0c]: C0x0175.0x0.0
0x227a74…227c08 [0x0d]: C0x0175.0x1.0
0x227a74…227c08 [0x0e]: C0x0175.0x2.0
0x227a74…227c08 [0x0f]: C0x0175.0x3.0
0x227a74…227c08 [0x10]: C0x0176.0x0.0
0x227a74…227c08 [0x11]: C0x0176.0x1.0
0x227a74…227c08 [0x12]: C0x0176.0x2.0
0x227a74…227c08 [0x13]: C0x0176.0x3.0
0x227a74…227c08 [0x14]: C0x0177.0x0.0
0x227a74…227c08 [0x15]: C0x0177.0x1.0
0x227a74…227c08 [0x16]: C0x0177.0x2.0
0x227a74…227c08 ]
0x227a74…227c08 }
0x227c08…227d9c Dummy {f00=0x016a, f01=0x0190, f02=»B< ^* CR R A |R J ~R U R ` R k LR u R R R R D 6R nCB1 @
0x227d9c…227f30 Dummy {f00=0x016a, f01=0x0190, f02=» a 6 P F T1 n b @ $ X T p t t t t 8T1 x *
0x227f30…2280c4 Dummy {f00=0x016a, f01=0x0190, f02=» > P P h 0
0x2280c4…228258 Dummy {f00=0x016a, f01=0x0190, f02=» 8 F
0x228258…2283ec Dummy {f00=0x016a, f01=0x0190, f02=»LP 0 GP 6 FD DLU FRO GPL6 LPL0 B . D Z p - r 7
0x2283ec…228580 Dummy {f00=0x016a, f01=0x0190, f02=» SYSVOLSYSVOLSYSVOLSYSVOLSYSVOLSYSVOLSYSVOLSYSVOLPFJESVCHM/=><DL!ASUFTCE+-*:;&V?'ZGRNX()MEVTFCAB/,LRAPTXZY+S,.><0-VEX * >0 0 0 M U t ~ 0
0x228580…228714 (1, 464) Dummy {f00=0x016b, f01=0x0190, f02=» * B 0 0 0 " ( . F @ B D F H J L N P R T V @ f $ B
0x228714…2288a8 Dummy {f00=0x016b, f01=0x0190, f02=» T > < >
0x2288a8…228a3c Dummy {f00=0x016b, f01=0x0190, f02=» F Q 0 [0 0 ^ e f h n t ~ ^ bB< F 3
0x228a3c…228bd0 Dummy {f00=0x016b, f01=0x0190, f02=» 6 ## _ jX 3 0 0}@d "P n_r 4 # 6 P 7MW (j "M ( 0 P 0 * 1W 'W 1 1 1 1 v j !!Ov v" Cv 0 "" VvW 0 0 )W`0 "" Vv 0 !!W6 'WH ! W+ " W% h * h `h h
0x228bd0…228d64 Dummy {f00=0x016b, f01=0x0190, f02=»!!L 0 /P /0 f 4 0 f 4 4 0 0 0 $0 T 0 0 W 0 W 0 4P +W 4 0 4 j !! % !j !! 0 ) 4 4 @p@q@r@t@v@ @x 2 # !"#$% H ! ( Hx 4 $ !"4 "!4 !!4 I @w 0 0
0x228d64…228ef8 Dummy {f00=0x016b, f01=0x0190, f02=»a0 ` b#$ ! 0 `f `f b" c$" ! b c b" W !4 ( #M0 T ! ! P.W< !0 P) * 2 *#U 1 * * 4 & !4 _ 4 JX0Zp[B :*zXFY Y <X Y 8Z`1,,N, 1 1 ,$1> L+ Y Y|YD N[x[r,fXhX Y [ [ [ !n2 n*$0 Z Z `[: x > 0 W X ]N]
0x228ef8…22908c Dummy {f00=0x016b, f01=0x0190, f02=» @ | H B " Y # , 6 Q d F J S:T JOBPTS GETDATAMODE NO.:ENTRYTYPE:999999FORMATSEARCHVERIFY CREATEELEMENTNAME: TPROGRAM:REL 10.0SIZE OF DEFINI
0x22908c…229220 Dummy {f00=0x016b, f01=0x0190, f02=»
0x229220…2293b4 (1, 465) Dummy {f00=0x016b, f01=0x0190, f02=» U U RETURN FROM DATA-ENTRY U h d ' . ) e e @ " f d f @ , ( f d T g T ( f ! ~ ! + * h dG 0 20 $ - - 30 - - 40 ! 50 % 60
0x2293b4…229548 Dummy {f00=0x016b, f01=0x0190, f02=» V ] d l t | 0 0 ! ' . 5 < D L T ] f p { ( < S k ! & A C g g & 4 @ E D| & + P _
0x229548…2296dc Dummy {f00=0x016b, f01=0x0190, f02=» C B X x & Y " X R W * P _ Y $ +$ E +0 *J X " X $ @ ! P W2 X $ X " R W V R W V % _ " D $ D I * X $ X y & * X x & Y " +$ E +0 !0P< <!
0x2296dc…229870 Dummy {f00=0x016b, f01=0x0190, f02=» X X * x ( y $ * * * E Y Y E & E ( : > " Y ( x P Y * x y Wv X " X X . 8 * X 0P X T 5 ! Y * y X V& X ( ! x C ( Y * X Y , ! X X C &
0x229870…229a04 Dummy {f00=0x016b, f01=0x0190, f02=»Y X " T Y _ _ B U C Q C D & P X X * $" ~_> @ Y X * _R X !@XX y X # x V y X X * ! P P 1 _ 1 X * X X * $" X D % " X # X * ! y _< X # X * y ! X 1 1 X !@
0x229a04…229b98 Dummy {f00=0x016b, f01=0x0190, f02=» x C y X C C X ( x Tf B J9 R 9 X ! T _ y C Q " T " ! X ! X X ! x Y~ Y _ X "@P B R y C B P 9 V _F9 VV X ! T X !@X y C _d y C C X !? x P Q(
0x229b98…229d2c Dummy {f00=0x016b, f01=0x0190, f02=» x XD @ Y c C y XR X x ! j x X X # ! _ B C ! : + " X ! ! ( +$ E ( +0 *J : B C _J + . * X 9 V ! P @ Y E Y Y . : D E E " E $ : * 2!
0x229d2c…229ec0 Dummy {f00=0x016b, f01=0x0190, f02=»+$ ' E ! Y 0T V +0 I : * 2' E R P P X ' ' B X _ X ' _ X '?_ * E X ' * X ! * * * X " 9b! X :c 2" H * @ W W W W W W W * Y ( Y 09H Y * Y 4 Y
0x229ec0…22a054 (1, 466) Dummy {f00=0x016b, f01=0x0190, f02=» X +" X *9h P2 R Y >_ P P Y +W^ !R Y + !D " WL T !D ! W> Q W Y + U Q P W W Y ( " C * X *! P V L ! * B X 0 Y 8 !4 P * Y 0 X 0 X 2] X 8 Y 0 !4 : X 0 :H* * : X 2T Y 2 :
0x22a054…22a1e8 Dummy {f00=0x016b, f01=0x0190, f02=» 2 : C ( C : C B _( _ X ! " P ! B _N ( +$ X D D : K + Q 2 P. P8 Dr Q ( +0 B X # V : E QT_0 G _>T T E T T T S S S Q P Q P $"%|%|T $ T Qj W W X 0Q
0x22a1e8…22a37c Dummy {f00=0x016b, f01=0x0190, f02=» +0WT " P Y 0] Y (_t " X _. 2 X *# P B 1 2 W " P X X$ C : X *! P 2 *> C W @ X (T W X y 6 Y ( : X (;n * T QTQ QTQ<$ S S S Q P Q P $"$ $ Q $ T Qj * Y . Y ,W * Y . X ( X ." PV X 0RzT$ Y *P
0x22a37c…22a510 Dummy {f00=0x016b, f01=0x0190, f02=» : Y . ( Y ( P * Y *T " T ! 1 W ! ) Q| : * Q< S P & Y *T % : X > T X & V D ! T W Q| ) * X >P( R Q" X & V D ! P $ ! P %_ Q| : * V Y " X .9H $ S P & X ( " Qv Y +Q R " P
0x22a510…22a6a4 Dummy {f00=0x016b, f01=0x0190, f02=» $" P<Q X (# P2 X # :! R$W (. ' T$ @ Y (W Y , ( W ( Y ( P : X *:h X (! # P X & V L TbW X , X 0P@ ' T, X *:h XF XL X (!@T @ Y ( X , Y t X 0 l (._r X ( P Y (_ P* ( P| Y 8 % X 8 X $ * Wh
0x22a6a4…22a838 Dummy {f00=0x016b, f01=0x0190, f02=»P X 0V _z Y ( " T Y ( : 8 ) E 8 V Y 8 : " P X & V ( P ( : : ' "0P $ T W %T : : Y ( X $ Y X " Y X & Y X < Y @ : Y : * X : X ( T X & V H " V Y : X $ * X : * : X Y " X Y $ X
0x22a838…22a9cc Dummy {f00=0x016b, f01=0x0190, f02=» 6W4 X y 6W, @ X (P W" X & V D ! P @ W X * W Y ( : X , Y X $ Y X &T Y Y Y WD V $:H D Y D :H Y ! P V Y E W Y ! P DnW V Y ) V Y : E QT : 2' " P T G W Dr Q : ) : *
0x22a9cc…22ab60 Dummy {f00=0x016b, f01=0x0190, f02=» < V E B B X _ v : C C 2 : C 2 :( R : V E V D ' $ T ( W * P B X =' V W V Y =P * : 3Z +| 3Z + 3Z + + , ,$ W W ,N . 3d/ + W 3d/ + 2 1
0x22ab60…22acf4 (1, 467) Dummy {f00=0x016b, f01=0x0190, f02=» "R V I B 3d ( T _& @WnX, @Wp _6 E ( B E E V B 2 ;B P0 J T , ( B@ W4 F_. , ( W E & F : ( B 2 & >A >A 2 $ E &
0x22acf4…22ae88 Dummy {f00=0x016b, f01=0x0190, f02=» @ 9 X ( 9 8 ? X Q , V ( - 4T V 5 ( W, V P& W$ U V X 9T I Y B 2 ' >A >A 2 $ V L ;a ; R@ @ 8 ? X Q* ( V )<B
0x22ae88…22b01c Dummy {f00=0x016b, f01=0x0190, f02=» 9 2! P T 0 / 1 3d #/ C _ ( E ' B 3d W C 1 1 W 1 1 / 1 _ Df &:K : 0 / 1 0 / W 1 0 / _ _. 0 / 1 0 C ( B B @ C (
0x22b01c…22b1b0 Dummy {f00=0x016b, f01=0x0190, f02=»( C _> 3d W C 3 <H / 1 0 3 / C _" W 2 1 0 / 1 _ 3d 4 3 P E <H : 1 W 3d 3 E &P B V C / <H : 3d 3 C C W 3 C C J1T ' W 781"&$ 39#$;< '()*+,-! 3 4 3 E
0x22b1b0…22b344 Dummy {f00=0x016b, f01=0x0190, f02=» C C C ( ' P. 2> P$ "! P WrW B % P C + Vv B 32 I "%@P "% P& B C C 4 "5 # B P B P B 5 P C : 3d 2 P 2 C 2: C B B P C 2 : V I C B : ( ' P 32 I : 3d 3
0x22b344…22b4d8 Dummy {f00=0x016b, f01=0x0190, f02=» 2 @ " T # ' ?D F W"' #? F ;D:B " : _ E C : : 3d 3 "! P W : Df P C W $0 P C U : C "!@P ") # B C B % C : W 5 6 V :a 5 4 2 ' ( 4 ( J V
0x22b4d8…22b66c Dummy {f00=0x016b, f01=0x0190, f02=» J :A V 6V $ - _ * + : 5 D T> E D :A D ;A 9A Q 5 U _ 5 4 AWn 5| AWp 5 *! P * P _ W *) + 5 : 5 $: R P $ : D V D V ( 4 C C _, M : ( ' P I :
0x22b66c…22b800 Dummy {f00=0x016b, f01=0x0190, f02=» 2 @ " T # ' ?D W"' #? ;D:B " : _ C : : 3d 3 "! P : P C W $0 P C : C "!@P ") # B C B % C : W 6 V :a 2 ' ( ( J V
0x22b800…22b994 (1, 468) Dummy {f00=0x016c, f01=0x0190, f02=» J :A V 6V $ - _ * + : D T> E D :A D ;A 9A Q 5 U _ 5 4 A 5| A *! P * P _ W *) + : $: R P $ : D V D V ( 4 C C _, M : ( ' P I :
0x22b994…22bb28 Dummy {f00=0x016c, f01=0x0190, f02=» 2 @ " T # ' ?D W"' #? ;D:B " : _ C : : 3d 3 "! P : P C W $0 P C : C "!@P ") # B C B % C : W 6 V :a 2 ' ( ( J V
0x22bb28…22bcbc Dummy {f00=0x016c, f01=0x0190, f02=» J :A V 6V $ - _ * + : D T> E D :A D ;A 9A Q 5 U _ 5 4 A 5| A *! P * P _ W *) + : $: R P $ : D V D V ( 4 C C _, M : ( ' P I :
0x22bcbc…22be50 Dummy {f00=0x016c, f01=0x0190, f02=» 2 @ " T # ' ?D W"' #? ;D:B " : _ C : : 3d 3 "! P : P C W $0 P C : C "!@P ") # B C B % C : W 6 V :a 2 ' ( ( J V
0x22be50…22bfe4 Dummy {f00=0x016c, f01=0x0190, f02=» J :A V 6V $ - _ * + : D T> E D :A D ;A 9A Q 5 U _ 5 4 A 5| A *! P * P _ W *) + : $: R P $ : D V D V ( 4 C C _, M : ( ' P I :
0x22bfe4…22c178 Dummy {f00=0x016c, f01=0x0190, f02=» 2 @ " T # ' ?D W"' #? ;D:B " : _ C : : 3d 3 "! P : P C W $0 P C : C "!@P ") # B C B % C : W 6 V :a 2 ' ( ( J V
0x22c178…22c30c Dummy {f00=0x016c, f01=0x0190, f02=» J :A V 6V $ - _ * + : D T> E D :A D ;A 9A Q 5 U _ 5 4 A 5| A *! P * P _ W *) + : $: R P $ : D V D V ( 4 C C _, M : ( ' P I :
0x22c30c…22c4a0 Dummy {f00=0x016c, f01=0x0190, f02=»C C B C C O T T T@T^T T DDD@DJDL * W V 7 @ ! P * P W Bj CD 9c DA E Df Q B W H :aW _B( 2 P V W8 _ 2 # ;B V T FW V P L , V 2P " 2 P V D ! R T V
0x22c4a0…22c634 (1, 469) Dummy {f00=0x016e, f01=0x0190, f02=» % 7_ 2 # L E 2" &] Y $! 6P Q $ T 9B B _ _ 6 @ " T 7 $ V P * W _ A B G V & B HB@ 'W 'W '_6 :l:d:h E W W P W 6 2# F W4 @ ED^"
0x22c634…22c7c8 Dummy {f00=0x016e, f01=0x0190, f02=» , W 6 2 F W$ " P& Pd" # F ;b Wv " ;d# _ [ v [ +$ E +0 Z Z : R ; E 6 : F _v :B , (Vr ; H [ [ [ E z ;AV$ Z H # F ; E :
0x22c7c8…22c95c Dummy {f00=0x016e, f01=0x0190, f02=» 7 D| Z 7 : ( :A ( @ " P ! P [ :;H 2 EH E ;h F : ; V Y : 2! : 6 2 F W& " # F ;b ; : ;f" #?_" W " T & T + : * & !@P `1` P I Q
0x22c95c…22caf0 Dummy {f00=0x016e, f01=0x0190, f02=»P TF R R ` ; <( Q P # W " <! =# T6W = Z P _ V ^< `_@ R Q <# =_ P :" P * U P 1`! T "# 9e! # K : P8" T * & : * & !`P :J +_ +Q I _0 , T T XD W
0x22caf0…22cc84 Dummy {f00=0x016e, f01=0x0190, f02=» P T V W Z :$0#0;b J P P PF P 0 - P0 _ 4 V W Q P ) P 9_ &" ! 9 : & P Q J0 ,^ , < J8 # ; [ _n' d V W V 4! P < X 4 9d $ & !
0x22cc84…22ce18 Dummy {f00=0x016e, f01=0x0190, f02=» + P( & T 9d! T 7 V Y " WJ Q V V 7 Y P._& & Q 9d! )0 + P 7 Y Z $ _ : V ) " TV *V &V : V S W P 9 S W _ V P W T V E + : & [ [
0x22ce18…22cfac Dummy {f00=0x016e, f01=0x0190, f02=» Z w [ P O GL V H )_ O L _X z R z ! P 1` { V (9h T W z 9e! I Z ! : 4 P 9 59D_ " P P [ ! :d" 5 : " Tz *V &V PP= ;@ R P W ;a=a P " R & R V
0x22cfac…22d140 Dummy {f00=0x016e, f01=0x0190, f02=»I O I O GR z " ! ! R 2` { z " P ! R 2` { 1 ! { [ Z O I Q O L P _ T { [ O N [ Q@ [ O GR { R [ _ O GL O L Z ! Z $ Z %_N [ Q* O GL O I R [ Z { O GL z 9e! W Z
0x22d140…22d2d4 (1, 470) Dummy {f00=0x016f, f01=0x0190, f02=» gg++ L 33 T DfD|G T G DrE T QTQ QTQ<T S S S Q P Q P Q S S Q Q T Qj O 6 P K K K K V K : E O O O Dv V Q P Q& V Z P 2 " T W "@T '?W
0x22d2d4…22d468 Dummy {f00=0x016f, f01=0x0190, f02=» @ ! P * Z 7 Z Z P * : V R (Q V : : O J P v I < : J Qx : Pn 4 ! Th_ PX 4 WT K Q WJ Q W +_ Q Q K W. _& X 2 W X & 2 J K : V :
0x22d468…22d5fc Dummy {f00=0x016f, f01=0x0190, f02=» ; *Xt 8 ! DSp 0P Wn 0W8 Wf :T& *W, FP . :T Z ! XBW *X& FW@ :P # U 1 RF !00T ; Q _ 9P F " X6# ; W )0_: J R( Z R 4! P ;)0 9U ? Z ] 49d_. _BU ; :X _ _ z 9d! ) ^ _ ,_ 8 _ : W 8W
0x22d5fc…22d790 Dummy {f00=0x016f, f01=0x0190, f02=»E ! P DnW : ! )P9H # T &W &" :I : T : P & _ &X _ : : : : U` O : { : U UX PX 9 _ U [ U Z : R" P $ 1T Y W 5 _$ : U
0x22d790…22d924 Dummy {f00=0x016f, f01=0x0190, f02=»! :DW ! 9 R R _. : I : E E jP kT T : & 9! " : $ : U` Df $ : 3d U E &P C U / 1 3d U U / 1 E C : Df#0 T & C C : V C C : & T ;d# P V
0x22d924…22dab8 Dummy {f00=0x016f, f01=0x0190, f02=» PWX WnPR LWD R R _ R _ # Q R V > _V X^ ' h P P & 1_ P 1_ , @ - R T U :J a B@ ' d w5 1 Wn Df #0 T B ' : B B V : Df P C #0
0x22dab8…22dc4c Dummy {f00=0x016f, f01=0x0190, f02=»3d E F C W XR ( = Wn XR _ E & E & E ( : Y P< P8 <<HT _ R <A_ <A <a ^ <h = F F ) E ' B Y E & X X Y$ X* T Z0 I R < _ <h =_H ^L _ _R E & G _d E F '_p R
0x22dc4c…22dde0 Dummy {f00=0x016f, f01=0x0190, f02=» C E ( B T B $ ' Y E ' B _ E E : E E E E E P < C 9h9G & C 9b! 8 #_h B " ' ""? 99g! ":e" B =_ _f E E & 9_ 3d @ # E C _ E #0P T # P W &
0x22dde0…22df74 (1, 471) Dummy {f00=0x0174, f01=0x0190, f02=» 8# ' Y = # Yr _ _ _ _ _ E E ' E _ E & E ]8 Z YB_J W 3d E & C E E & C E & C C ( B X _ W & Y < * C _& 3d E E P ) E B & 9
0x22df74…22e108 Dummy {f00=0x0174, f01=0x0190, f02=» E X P &V Y , X Y / X Y !n E * & Y _P W W _ E PB T !00R4 !99Q.$ Y T P U U T W _F T P Y P E V E B E E ] P ] P V ] V V E
0x22e108…22e29c Dummy {f00=0x0174, f01=0x0190, f02=» W T #W T # C C 1 _ _ E E ' E _ E & E ]8 Z YB_J W 3d E & C E E & C E & C C ( B X _ W & Y < * C _& 3d E E P ) E B & 9
0x22e29c…22e430 Dummy {f00=0x0174, f01=0x0190, f02=» | 7 F l p t x6 &90 A! P K 4 0 A! P K 4 0 Av P K 4 0 Av P K 4 0 Av e 4 0 Av e 4 @ 0 >0 P 64 <0 P 54 0 P A 4 !0 P 34 E bR * )bR* I 0 A R V 4 0 A R V K E I b )*R b R*
0x22e430…22e5c4 Dummy {f00=0x0174, f01=0x0190, f02=»$"` uV> av uajb " " b ( bR#j $"u b^&jb "R" b bR j $" b 5W j ""u j $" j &"* u`Hp *? v? u? ` _ u) 5 ? j` " $ `: 0 ja " " a ua j $" ` )? u`? j` " "_2As ua? @u@v E 0 ? !"? 1AxW-j " - R R _9 W I
0x22e5c4…22e758 Dummy {f00=0x0174, f01=0x0190, f02=» -jc " c c R c R _a _) +_% 0 c c 4 ! ! ! " V 0 _ " b )*R b R* !4 "bR * )bR* & 4 @k@lja " "j` " $(` AlW= ` Rgjd " "j ""a (a # d ja " $ a a RCj ""d a d`W ` (a AkIl'W a R jd " $j $"` a R `vIs `! d` 4
0x22e758…22e8ec Dummy {f00=0x0174, f01=0x0190, f02=»! "R! ! ! " Q E! "! [ 3@ 4 H #@ C!!"C! !T !!RT "!R0" A!R 4 H 0 _ #! R R W A T A @p Cv! Cv! H Vv0! Av Tg `vP Ap ?v` #! RTj v " % j !! jGv " ! Apj !'! $! P Ap R$ ! ! " T Ev "v P Ev & 0" AvR 5@ Cv!W Hp ?@
0x22e8ec…22ea80 Dummy {f00=0x0174, f01=0x0190, f02=» / s 4 : m `!: )`W} d$ bd !bRV ! 55? jc "R&#c91j " b "&m j (" ) bRc* c*jR&"c "dR? b W jd "R$ d U d!: jR$"d "bR c* REjR""b jR$" _` b{ ! a ja!! b(jR(" b1 a A c!V a ) ) !aR: ? jR$"c bR* b "`R: Hp _ ba `=jR "` `c_V c Ap_1Ar 0 mP r
0x22ea80…22ec14 (1, 472) Dummy {f00=0x0174, f01=0x0190, f02=»t` t*_- t: `"_- `" Ab !&R`bm &R` m? < m@s $R*: ` a&j` "R&fRa* `*jR&"` "`* @s R: " R: ab !aR: "V )( ) )? j` "R$jR " "aR: a! ` % !`R: b "R A9 `!j` "R$_! r : '6c ( ]@s $R*: Cq< RU !bR "V ! 6 ! 7 AvT ? )? bjd
0x22ec14…22eda8 Dummy {f00=0x0174, f01=0x0190, f02=»{c? 8? Hq ` j`!! b'$`! _ ? %_5Aq_ : RF `* a!bR`1 a `1 a! a+ "%R? : !%RP RU `* a!b a 1R` `1 a! a+ ? ApWg RBbR(" 1bR* "cR? a!: jR$"a "cR: ca_0AqW3jRd" "'R< !`R< ja "R$ `!< a & `a_ %6c : b " ! d %d8 !? !'RP 5<
0x22eda8…22ef3c Dummy {f00=0x0174, f01=0x0190, f02=»_ )? Cp< b! a! !ba < b b)*R b b R* $ba & a b? 4? ` a*Hs `W ` V ! 50W< a"j " &h a& &V! a a! a j " $ ` _E )W a&jb " a 4 d"@s$ " As d R jd " $jc " * c d ? 4 j " " & 6 jR " 4 j "R !"4 !!4
0x22ef3c…22f0d0 Dummy {f00=0x0174, f01=0x0190, f02=» _ F " DSF T X AC FC SV TC PTS-DE SYSFIL " % ( + . 50 < p p !`R< ja "R$ `!< a & `a_ %6c : b " ! d %d8 !? !'RP 5<
0x22f0d0…22f264 Dummy {f00=0x0174, f01=0x0190, f02=» ~ W f T r v zApAt : As k # *V ) ? Ht ? l b ,V ) ? Ht ? It (? cv: a*mja " &"asz kj a"c a"j &"a `: ` a* ?j ""` j $" l `v: j a"` a" uv: j a"u a"j &"a c: Uj &"* W @ `#j "" j $" a*_zj $"c `: @j ""` `c cv_(ja " &"as c`_z cv
0x22f264…22f3f8 Dummy {f00=0x0174, f01=0x0190, f02=» uv ud d , ) v )? jo !v bo!&k bo'&l ) oV5 ! ! " : * o | Uj |)"` It ? u) 5 ? 4? : VJ! 5 ) ? `b b W `!: RBjR""b bR* z "`R: b !bR: jR$"` "bR? bR* z "bR? '6c @rT `# : !`RV ! 5 ? )? a7b &Ra0
0x22f3f8…22f58c Dummy {f00=0x0174, f01=0x0190, f02=» Kq %_1Aq_ : @s RHl Hk RU "#R? a$W a" k `#0 kT : j` "Ra ` >Ar_ ApAs0 kTY k # *RnHp. a$*a j " $ Z : j` " &*`*K a,Hp bk & a? 0 lT$ l b ,R. a& a =bl & a? #X;! 5 ? b: ja " &*a* a,_' )? c# bc !bRR)jc "R&"c* 5W d7b &Rd k jc "R$ c
0x22f58c…22f720 Dummy {f00=0x0174, f01=0x0190, f02=» h~ !X8H !( @ h~ U !j~ ! ! !P !0# ! N_m ? j !! '( !1j !& !j !! ( * j +& 'j !! ( j ! ! ! 9 ? jy " $ j !! 1 j !! 2 j !! (I !Y A ! p ! ? ! 0 !h & !&P !0# !< _ ( ) +h & '&
0x22f720…22f8b4 (1, 473) Dummy {f00=0x0174, f01=0x0190, f02=» h^ !T f^ ! !j^ !U !j '! !j !! ( _N ! ( + ~UWhj !! ' !QU I N! 9 ! : ;b ! W:0 ^ h^ U !P :! ;j !!^ b ! f^ ! !A j ! !d^ ! j '! !j !! (( + b +$~ WR j !! '( ! j !! 0 (j ! !W0 )W# + Aj !
0x22f8b4…22fa48 Dummy {f00=0x0174, f01=0x0190, f02=» 6 <W U j !!~ W j !! (W Uj ! j '!!! !j !!~ j (!~ _+( # j (! !j !!~ 4 I H~*H $H !@~ W 0$@mI~ Hn @f $U W I~ W I Ao 2 H~ I Ao { _ H{ 2 _ 2 b & . #K~M g "pK s_W!gC ? /_>Iz H 0
0x22fa48…22fbdc Dummy {f00=0x0174, f01=0x0190, f02=»Hm @ P&@jP A W3Ao ,P !_ g  L@mAo? H 0 Hm ! &@h@jP #W @fPO $0 TF 8 h ! !T #P ( -& Ub & ? Ub & @ .P )gC Ao? AzAzT @mA *P @ ? @ @m8 @xP 2 !! h ( & H #: W ? Im1I~ I & h ( & H I ) ?"I ) ?#I H
0x22fbdc…22fd70 Dummy {f00=0x0174, f01=0x0190, f02=»({ % H~ - !gC Az? @z? H~ C < I 0 ! W 0 ! W /8 0 ! 0$? Az % h ( & J K @o?(@m!gC C~8)?(@zC~8*?(?$Km Jz I gC T Io Ao #: _3Ao@ T / 2 %% + % # #g W ! #g #20 ! &_ I~ Jo K _@ @ !0$@o ( A P W @ 6 / A _ Hm 0 ! A %
0x22fd70…22ff04 Dummy {f00=0x0174, f01=0x0190, f02=»%% 10 ! !0$ (V ? ##2 2 2 322 1& _ Co<$Cm<$Cz8$0 ! 2 %% 4 !X b !U *8 0% ? h ! & ? C <$ h ( & H I ?0 g( " @oW $ 2 %% 5 ): @oA ?6C <$Hz @ T Cm<$Io I~ #V - ? @o@z Ub & 5 +@mA{ *V#( - 1 0 ! 0$ { &{ mU_"@{Ao?
0x22ff04…230098 Dummy {f00=0x0174, f01=0x0190, f02=»% !g2 @m?:?;@ _/0 + 0 , A~4 @~P + , 4 _ ; $ - ; Y i . & E 3 N + n | i Q m
0x230098…23022c Dummy {f00=0x0174, f01=0x0190, f02=» " ! I Y R *FTX J BC JC FTJBJD FETCHING FORMAT: FROM DISC. @ UF 0 % * & j j Ub & 5 +@mA{ *V#( - 1 0 ! 0$ { &{ mU_"@{Ao?
0x23022c…2303c0 Dummy {f00=0x0174, f01=0x0190, f02=» !4 "4 #4 $4 4 @} 8 In06 W 0 ! WP0 ! WII~ 0 ! W?H 0 ! W50 !! W.@n6 0 ! W 0 ! I~ 0 ! W H 0 ! W 0 ! (0 : H~ ? 0% P : _ 0' P C{P A )? H ? 0(HoO !H~ 0) $ W 0) # ! 2 W 0 0 /1& _5K~|0 ! _
0x2303c0…230554 (1, 474) Dummy {f00=0x0174, f01=0x0190, f02=»( 2" + " ( " # I ? & 0, P ? 0 Pm0* 0 -8 Wa0* 6 > W<( , ! :d # !_'0* P 0' P o8W o;d o "_HI 0* 2 W @ @ @ @ @h@j #U 0- ! Td$ + " , 0( %@|PI0' T /hZ " !T f ! j !! H{ ? 0' P 0. P H !?
0x230554…2306e8 Dummy {f00=0x0174, f01=0x0190, f02=»88" .4 #H 0Hj 0 #T @m?#@hP !PP01 02 V 0 !_ $ + ?$I 03WL0' P 0 9%0 !01 02 T10' T2WO0 ! 04W #I{ H~ I K 0% 0(? A 0$P#:&;%Io 0. P H 2 ' ' ' ? JA J K{ 0* ?( !01 02 8 _^J #H 0' P 0. P T 2 ' 0' T 2 )
0x2306e8…23087c Dummy {f00=0x0174, f01=0x0190, f02=» /P 06 & ?.06 " ?.0(_.0 0 H ,W H +0* 0' P 0 Q ,8/?0A 0 !01 02 P : SqW 0' X70. P J ? EK{H ,LH 0' P 0. P T +_bH KAk0* 1& ? Am #4 0% S 0' P 0 Q I ) *&KA)? 0% % 0' P-0. P H % !W/ ?1 #? 08 $+ %'0
0x23087c…230a10 Dummy {f00=0x0174, f01=0x0190, f02=»W > "j 0 0 #4 @ 0, P j !!!WP U0' P m ( &W 6) D b !Z/h U ! !Q !4 !0(@ T 07 j %! !0& ! 08 % ! 6 cv6 C & 4 W 9W :0' P " "Jh !U !TA0' T h ! !T00/ _ A 0' T f !07 0(0& _ 0 0 (P h !
0x230a10…230ba4 Dummy {f00=0x0174, f01=0x0190, f02=» 7jo " 1& W % 4 "1& M 0(W 1& !0) ! 6 W"0 0 $( # _.0 ! _y $5 !( * @ . !4 80 4 o? o0 0 6 4 Am4 0 0 4 6 v k | _ O x T u T
0x230ba4…230d38 Dummy {f00=0x0174, f01=0x0190, f02=» * ! & 3 8 ? P + +-0? 1 BATCH IN USESYMBOLICVALUE-SET XXXXTTT9TTTT9XXXXX- o A . 1 . . : k A C : A $ : A NOT . TIME-OUT CDV-ERROR NOT FOUND I/O-ERROR DATE ERR
0x230d38…230ecc Dummy {f00=0x0174, f01=0x0190, f02=»ERED BATCH RECOVERY RUNNING. DISC NOT OPERABLE @ : l IN : k A CHANGE FLOPPY DISC DISC I/O-ERROR : ILLEGAL FORMAT NAME PRESS ENT TO CONFIRM NO WORKSPACE IN CORE FUNCTION NOT ALLOWED USERFILE ASSIGN-ERROR 95 % OF FILESPACE USED PRESS EN
0x230ecc…231060 Dummy {f00=0x0174, f01=0x0190, f02=»EXECUTED TOO FEW INPUT CHARACTERS OUTPUT DEVICE NOT OPERABLE COMPULSORY FIELD NOT FILLED DEFINED LINE MAXIMUM EXCEEDED MAXIMUM RECORD-LENGTH EXCEEDED !MAXIMUM FORMAT-CODE SIZE EXCEEDED !MAXIMUM NUMBER OF FIELDS EXCEEDED (USERFILE NOT CLOSED IN PREVIOU
0x231060…2311f4 (1, 475) Dummy {f00=0x0175, f01=0x0190, f02=» : h y : k : l : : z : n : : g : ASD 5 PAGE : WARNING:REFERENCE TO FIELD (F ) OUTSIDE FORMAT DEFINITION ,OCCUPIED RECORDLENGTH CHANGED WITHIN FORMAT: m . SIZE ON DISC: . B $ : ! DOES NOT EXIST IN JOB-DEFINITION OR ON SYSTEM-D
0x2311f4…231388 Dummy {f00=0x0175, f01=0x0190, f02=» ! )0 2 ' 0 9 B M Y e q ~ 3 H ] s 6 Q l ! $ $ ' + K / v 4 ? ? F W J @7 z
0x231388…23151c Dummy {f00=0x0175, f01=0x0190, f02=» @g@i@k@ "0 ( #W H % W % 6 0* 2 W ? A o W o ~H h~ ) !PL@ < ~E h~ ' !< A ! & !@ W 2 W 09 #XA _ 2 !j !! j ! !$ 60 ! ? A _ !A <
0x23151c…2316b0 Dummy {f00=0x0175, f01=0x0190, f02=» ? A _ 0# !< " ? #@ T 0' P9W I 46 0 ! W 0 ! : 6 h W h 8 ? 6 0# !< " ? 0# !< " ? ( 09 ( #)0* A h U ! < h 8 ? " ? < 9h ! !P !W !j !! ! =f "d "!U d !
0x2316b0…231844 Dummy {f00=0x0175, f01=0x0190, f02=» ? & ? ? 0 9 ? " W @g@k !Ai !? $@kAgW #@gAk@i ! j !! ! Uj ? 60 < h !TL j !! ! 4 ) 5 ! h ! !T ! R h !U !P7 !_& h ! !X&W#@ T 0' P! W I h P Wk ~Ub~ "~
0x231844…2319d8 Dummy {f00=0x0175, f01=0x0190, f02=» ! _6j " - 8 & ?!@ P 5Ii Ik Ig A|W 4@|@ & , 3hZ !PDj !! 0 (P 60 !_<( 4 !, @h $ !ThI|m2 ? 2 """"#$"$$$#$$"""""%&&"""#''" !_h( !? 4( !_ "_ _ ! j !! ! _ _ A| "
0x2319d8…231b6c Dummy {f00=0x0175, f01=0x0190, f02=» Af4 L@d@g0 @ W< %Ad01 02 R Ag00 ! T 01 02 @dW Hd 01 02 @ 4 ! ! L Ah $ !6 00 W. "0 @| uA j !! ! j !! 60 _N ! 6 iiWJ@e !L ! ;h ! !P !@i ! 9( Jh * !TX6 rr rrW !
0x231b6c…231d00 Dummy {f00=0x0175, f01=0x0190, f02=»! 6 & ) 0# !<) W30# !P(?)0# !<) $W ( 09 # W a / " Hi b " !P 6 ! "?* ! "?* ! "?* ! "He U m " 0# !<) ?+( 01 02 0* 0' TJ U m ! P Q 0* , ~8d ! ~ W f ! ! 0 0/ 0% ?+ h X
0x231d00…231e94 (1, 476) Dummy {f00=0x0175, f01=0x0190, f02=» U j ! !0 P b ![ ! ! ( 4 @h0B ! P # ( + ?,0. <-AhW %hZ ( !<- % (:- ! ! ( $ 2hZ ! !T !j !! W % 2 .../ !X b !U ( W )W =f "d "!U d ! 8T 0: (+0; + j !! 1 ! & 0' T/0* V
0x231e94…232028 Dummy {f00=0x0175, f01=0x0190, f02=»! 4 ! U 6 _l; 2*0# !T Wo0 "T j !! !b WX WU Wb Sf !WAH{ W<09 " m W W 0# !T3m W 0# !T&m W 7h U ! V !!4 !"4 80 1& 0 6 ''' ' y ''' "W% ," "0 We08 W "_ '_ !08
0x232028…2321bc Dummy {f00=0x0175, f01=0x0190, f02=» T O j & % . i } 8 [ D S q d E = G B 0 M 8 7 > D Z ^ L q - Y c + ? P0:;=
0x2321bc…232350 Dummy {f00=0x0175, f01=0x0190, f02=»TTTTTTTTTTT9 ! I D DELETED INSERTED + ON UNIT:U i + WITHIN JOB: k RECOVERY RUNNING. RECORD CORRECTION F FREEZING OF BATCH l CONFIRM RECORD INSERT CONFIRM RECORD DELETE: RECORD MUST BE VERIFIED ENTER
0x232350…2324e4 Dummy {f00=0x0175, f01=0x0190, f02=» FF* RECOVERY OF : k B : l RUNNING. ( ',!.%)$&"#-* $ * 0 7 ? G P Y c0 m * 5 A Q c w
0x2324e4…232678 Dummy {f00=0x0175, f01=0x0190, f02=» L @ D H( &Ad1 An@m 6 0 _ @n_ ( !'( _&3 @d0 0} h* h _? ! 4 6 99 W 2 !8 "8 #8 W j " # L j " "# P|j " $# Pr? ! !6 +; ^# 8Zb !" Xj !# 'bc (c" 3? 1? ? @ W' ## 7 ! ? " 5 " " ! T T
0x232678…23280c Dummy {f00=0x0175, f01=0x0190, f02=»2 _ !0 #$} & 2 _,4 j 1! ! !j 2! ! 4 R ! 4 Hd ? ! 8T & ( !0 #$}? ) _ ! Zb "" " < $ U@f@e0 " An 2 _ ! : ! @ ; W < " ! j " j $" Af07~ 0 "P 07~ j~#!
0x23280c…2329a0 Dummy {f00=0x0175, f01=0x0190, f02=»e ! 8R AnW* ! " _W) !$ ! $ W !W 8P )B? 0: (+0; +@eAf ! ! 0 %%In 0 $%Ao 2 W ) !Ao _ ! 8T !_ ! 8 ! ( TJ? ! & ! Xb !# ~ " ~ T $ 0: (+? - !?
0x2329a0…232b34 (1, 477) Dummy {f00=0x0175, f01=0x0190, f02=»~ ~ RR j !! !07~ j " V0 "P W07~ " !j~#! ! T j " $ j !! 1j !! 2 !!4 1 W 3P W An 2 _ 4 4 ! ! ! P 2 _ 0: +1 0 ! !G! "?! !r ! " ! ! # !An@m 6 p _ 0 ! _7Hm_ #P Q 2 ! " _ 0$ 6 A _ $Gv ?
0x232b34…232cc8 Dummy {f00=0x0175, f01=0x0190, f02=»0} # * h h _? ! 4 1 Ad!hq @dAn@mAe 6 ?$ " &z 2 %&%4 5W 6Jd P AoHe @o W 0: z ,AnAo@e 2 ''()*++ _( (z T &PU 1 2 ,,-./. # %XjAo _9 z! X#b !& "z <0 $z zU0: z ,@e0 " *k0 " _ He% k0 k<1Id $P )SW "T k
0x232cc8…232e5c Dummy {f00=0x0175, f01=0x0190, f02=» = =_=0 !P #_R * , !" 3 h &U !T , , _ ,& !8'W:6 1? >h ! !P 0 /8 W 0 /< ? W %W ( ?2 2 j k | d t 1 2 s 3 R
0x232e5c…232ff0 Dummy {f00=0x0175, f01=0x0190, f02=» c ! Y f P ] c *AN010203040506070809101:232:3:4:595:6:7:8:9:A N T GETTT FILESIZEDATE:TIME:CREATEBALANCE:JOBNAME:USERFILEFREE %SYMBOLIC:BATCHHEAD:SYSTEMFILEVOLUME-NAME:15 FILE SPACE15 FILE-SPACEUSERFILE UNITNAME CONTENT
0x232ff0…233184 Dummy {f00=0x0175, f01=0x0190, f02=»XE-XXXXE.XXE.XX T 0 * h d m p n o i m ] f ! ^ g T U h d ' l a e k e k 30 - - * 3 h d 31 _ - - 32 Y - - h j :U i g [ c f ! " # # b $ % # & U
0x233184…233318 Dummy {f00=0x0175, f01=0x0190, f02=»@ ( X% I @ ) X% J @ * U e f 4 ` &g 5 $ K fA ! d &A + $ M fA " d &A , $ N fA # d &A - $ O fA $ d &A . $ Q fA % d &A / $ R fA & d &A 0 $ S fA ' d &A 1
0x233318…2334ac Dummy {f00=0x0175, f01=0x0190, f02=» " $ & ( * , . 0 2 4 6 8 : < > @ B D F H K N R V [ ` f n v ~ (0 <0 > ! # # & F < l Q
0x2334ac…233640 Dummy {f00=0x0175, f01=0x0190, f02=» T ( !Ad1 9An@m 6 6 W,@n_ ( "2( _!@j3 @ @d0 0} 4 h _= _< ! 4 6 Sfl{ W j ! Ii ! 9 W ) 9 m ,P ) ? ;j !& 'bc c b W 0* ! 6 $ r"? 7" v$ !r? 8 Tj *P ? 1? " Q$ FWK $ $< ?
0x233640…2337d4 (1, 478) Dummy {f00=0x0175, f01=0x0190, f02=»/ !T; 6 MMMMMM~~MM~~MW|Iiy ! %n h / !T ,JWX ! %P h / ! 6 3 W1Ak_+ !" %% h / !T , W Hk ! c % c c _ & !? 0 %% 8? !6 (DTdt_ * ? + ? ,< j ! ! 9 @iW Ai? P ! : ? A W @ ! < A ? @ ?
0x2337d4…233968 Dummy {f00=0x0175, f01=0x0190, f02=»% A0; ,0: , $ ? "r= ( 2 07 6 'h #Q !j , w j 1!w!Ii j 2! ! !j "" j $" mHj -P !2 _ &{ { )P !Ix 6 * ? &{ { *P !2 _ ({ P !2 _ -P !2 _ { + Ii 0; {$* p!0
0x233968…233afc Dummy {f00=0x0175, f01=0x0190, f02=» !* & & & ! 5 0 "}H{ Ij 4 !6 H" W 0; {$*0 P _4 0 "}_? 1 !6 TT _P - PJ !6 ??_&Aj p! u # $ j $!! {1j #!! {2 $ #? &{ @jP { &{ W &{ @jP H{ m *" ! I{ ? % & 4 0 6 55 555555555W 'I ( W Ij I
0x233afc…233c90 Dummy {f00=0x0175, f01=0x0190, f02=»Hi! ' 0 (T W $0% "W 0% 4 @g0 0} { 1 7An@ An2 _ 0 0}@n_ 6 5 ? Ag@ij !m ) 9 AiW 0; {$* p!0 AnP 0 ! 0% 4 2 _Q 4W XT 8 2 Jgwjm & {!_: 2 _ ({ P _ &! 1 2 -P 7 nn &{
0x233c90…233e24 Dummy {f00=0x0175, f01=0x0190, f02=» "|Bn { |? 3? @n ! " P W0 % A0; ,0: , T W % & 0 ($}2 ? &{ 0 0}4 0 0} { 1 8An 6 _ @n_ 2 Wm * ;j !& 0; {$* p!0 0 ! 0% 3 6 ++3 ({ T j !&m j {!& ! )P R W 2 W &{ _
0x233e24…233fb8 Dummy {f00=0x0175, f01=0x0190, f02=» 4 & ( $j ! ! !4 & ! c # ( % !j ! !! !j ! ` !4 & " c # ( & "j ! "! !j " ` "4 & # c # ( ' #j ! #! !j # ` #4 & $ ( ( $j ! $! !j $ $4 0
0x233fb8…23414c Dummy {f00=0x0175, f01=0x0190, f02=» w! 0 ""j !Q W = ! +W !@ !@ 4 j !Q * & ' @d@ 4 % ( H + "20 !!" " !)I 0 # W 0 # & ' % y %Ad W < ! !4 I /W . ( a - !+ 7 !) !< # j ! ! ! # 7 j ! !
0x23414c…2342e0 Dummy {f00=0x0175, f01=0x0190, f02=» wHj $ # 4 j y C o 7 7 $ l 0 C v h o 9 - X ! Y y 7 N & " ' v
0x2342e0…234474 (1, 479) Dummy {f00=0x0176, f01=0x0190, f02=» h @ m 24 COPY $ $ TO BE COPIED: q @ NEW $ NAME: v @ m U 20 $ - - * h d7 21 ? - $ - 22 @ - $ - 23 > $ 24 COPY $10/.-,+*)('&%$#"! 2 0 ;
0x234474…234608 Dummy {f00=0x0176, f01=0x0190, f02=» ! # * M C Q @ : : 7 7 $ l 0 C v h o 9 - X ! Y y 7 N & " ' v
0x234608…23479c Dummy {f00=0x0176, f01=0x0190, f02=» e t 4 $ f c# # d# 7hZ c! 7 c! #2 W bch b!Z7!T W c N? b% ! b_ b$ " b ,# c bch b!Z2! } c! b$ " b_DW ( % $N b/hZb" c!T b/ >j c! b c! b$ " a W b# # b*a & &a_ a c! ac bch baZ7!
0x23479c…234930 Dummy {f00=0x0176, f01=0x0190, f02=»)c ' ) ' j (! '!f c! ! d!? ` 4 j b c a j c!a! b b! c!f cb db4 j b u a4 u $ #@g c hZ a b! +2 jc!! b"c W 6 b! !jc!! b"c b! !W, ! b! !Hg ( 'b `3d b!Z` b! ! !@g _ " ,0 b! ! `bh `!Z2
0x234930…234ac4 Dummy {f00=0x0176, f01=0x0190, f02=»b! ! ' j '!! b ' j b!Z= 'b '!Ag_ 4 b!jc!! b c ` m ` f b!d b` `! ` b` ` !Hg '`4 1& P # W !05 p! u ! " !! w jw!! {1j !! {2 w d "2@h u" ! Kh !@k ~60 oT @j~ # # - b o -( q0 TF b , ! , " , # E h )
0x234ac4…234c58 Dummy {f00=0x0176, f01=0x0190, f02=» &%W #$d &%( A b ~6Ak_Dj~ b #* Ii !"d &%W #$d &% ~6Ak4 + 1& P W !2 1& P # W ! 4 @l #hQ 0 !0 6 F MMMMMM? !j !! !_9 "_> Hj j !! {(j { ! % { $! 0 ""Il _h !Ah? Al - ! j !!
0x234c58…234dec Dummy {f00=0x0176, f01=0x0190, f02=» !: ":H "< #:H #< $:H $< %<H %:H "8 # oU U b ! " # $ + ~E U # hQ 0 !T 2 W W #_) !j !! !( "Q Ii "_H ! `! a! !07 h )Q ! ! # `" a j a` j a` ! ( !_ $ 6 1j b#~ W j b#~#W j
0x234dec…234f80 Dummy {f00=0x0176, f01=0x0190, f02=» ! " `" a j a` j a` ! p 4 !jo ! - h] $ !T 6 #+jo ! ! !" %_*jo ! )_ jo ! +_ ! !_+J .jo ! ._/jo ! , !4 6 b @h@k hQ 2 !0 2 ? !j b! - b! !j !! H ;W 9j ba baj b! , ! b!__ j b o "
0x234f80…235114 (1, 480) Dummy {f00=0x0176, f01=0x0190, f02=» _ %b!b5 j b!U b!_ HkJ cWE , a ! b jb!! b!+ b"$ $ # !07 h )Q ! 0F a #? !4 = 0 !01 02 T$0* 0' P 0* ( " ;_* 9_/ _44 0 i } - p ; [ s = e 9 ; 6 ` e 0
0x235114…2352a8 Dummy {f00=0x0176, f01=0x0190, f02=»GTH#V:#G:#A:GENERATION VALIDATION ACCUMULATION 9Z9999XXXZZ9XE+XXZZVZZ9ZZVZZZ! 1 k " ( % & ) 0 ~ k: " $ % & ' ! " # $ % ) 0 ~ 1 $ : m ( NUMBER OF POOL-UNITS: # d A : ! C ACCUMULATOR POSI
0x2352a8…23543c Dummy {f00=0x0176, f01=0x0190, f02=»# d A : ! C B - MAX/MIN K M A V I DUPLIC. SPEC. #L:< B LAYOUT> #V: G #G: F #A: H NO NO/POS - D I E T E C -ITEM HANDL. % + 4 ? J
0x23543c…2355d0 Dummy {f00=0x0176, f01=0x0190, f02=» d 0 Hf ( Hg ( j I 0 ##Ie !l_0 ! $ % & Ii I " " ( I 0 $'Ii # 8 " . I 0 $ W .W 0 ! ( % ( % !4 @e@f@g =@l l eIe ( ;@l l f( If >Al l g !Af( hIg !W` =@l l eIeJ(
0x2355d0…235764 Dummy {f00=0x0176, f01=0x0190, f02=» " !P I A ! ! ! % _2 ! W ! !4 % @e@f@g@ 4 ! " # $ * + , 4 o; Hi 0 h / !Tr 6 )'''''48fD]]NW[A A A jo ! ! ! ! h / ! ,p_ A jo ! !W:A W.jo !] A A W*A jo !]!W jo !]#A A !W jo !]" !A jo !
0x235764…2358f8 Dummy {f00=0x0176, f01=0x0190, f02=» L h ) c#T # # d0 3 ( `c_*0 T ` c d H 0 $ 4 I : " " j " " j " " $ . ! # T ! 0 "" U W !+ !4 0 !P * 0 "P + , * , +! *4: + 5 4 *f * 7 j % , + , +4 *4W * ,
0x2358f8…235a8c Dummy {f00=0x0176, f01=0x0190, f02=»T ( # A c ,T c!_hHi 0 -.0 &' &W 0 120 ,- , ! 4 c !%c ! !0% & j ! W * + !!4 3@k@g hZ c!T 6 %Ls 2 Wf b2 W? ;2 W Ik Ak 2
0x235a8c…235c20 Dummy {f00=0x0176, f01=0x0190, f02=» "T ( ) , $a #a6 W60#a !T W-0#a !T W$$a! #a5 bc b" b `h b!Z2!T c" &_T c!_vIi c! b/hZb" c!T $o b/i_u c! #T $a X#a9T % W , a WH c"_ c!,c ; a ac bch baZ7!T( bc*b !,b : ; W "b& cb_ c!,c _C( $ c ! & ! W Kg !!4 c! bc b "b U
0x235c20…235db4 (1, 481) Dummy {f00=0x0176, f01=0x0190, f02=» ! X 4 t m , e P ^ c 0 #<< PAGEBATCHFIELDLINE STARTLENGTHNUMBERRECORDSTART:V:G:A:(#A:...)(#G:...)(#V:...)#V:#G:#A:123456789 1234567890CORRECTIONGENERATION VALIDATION ACCUMULATI
0x235db4…235f48 Dummy {f00=0x0176, f01=0x0190, f02=» 2 3 ( 4 2 5 < 6 F 7 N N N N N N N M n @ 22 BALANCE $ - j # O C : % . D > : @ & @ -ACCUMULATOR:A m ( . SPECIAL HANDLING: @k Q K P J o@ ! p@ " U 21 USER $ - j # O A : F
0x235f48…2360dc Dummy {f00=0x0176, f01=0x0190, f02=»' MUST ENTER (Y/ N /C): r@ " . AUTO TAB 9 (Y/ N ): @s@ # DUPLICATE : jA . VERIFY 9 (Y/ N ) : @t@ $ INITIAL CLEAR ( Y /N): u@ % . SPECIAL HANDLING: @k Q K P J 2 R I o@ ! p@ " U
0x2360dc…236270 Dummy {f00=0x0176, f01=0x0190, f02=» , F c 2 BALANCE $ - j # O C : % . D > : @ & @ -ACCUMULATOR:A m ( . SPECIAL HANDLING: @k Q K P J o@ ! p@ " U 21 USER $ - j # O A : F
0x236270…236404 Dummy {f00=0x0176, f01=0x0190, f02=» R ` @e kU lU( .AdIe 1 0W 1 ,An@mIe W 6 . _ @n_ Ief( $A6 _<A W A W A A Ae@d_D@ $V 1 ,An@m _L@ T Ie ! 4 @e@dKeN@ @ @ $ * h h _ + , 2 _ 0 1 ,0% _ @e kU lU( ,AdIe'1 *An@m 6 $ @ P $ _
0x236404…236598 Dummy {f00=0x0176, f01=0x0190, f02=»(+0; +( > " 1 W 1 "An@m h 2 _ _ 0: (+0; +0% _ "l lU h " 1 W 1 " l "2 ! 4W 5 T ! +T | j " &| W E !" ! 0 %, ! b &l b &!Z2b '( "lW b &k !k # 0 # 8~@ P $0 #$@m0
0x236598…23672c Dummy {f00=0x0176, f01=0x0190, f02=»2 _ _ 0 ~P + , @z6 Az _ @ @z $XP@ ~U 0 , P& b~ ![) !0 + T b~ ![( !b~ ![ ! ! (41 .0 %%0 &&0% $ _ 6 ? ? + , 6 h[ * !T06 $ $$ 0 , T 0 , @ T 0 + !_6A X @ T ? &? @e( +AdIe 1 /W 1 +An@m 6 -
0x23672c…2368c0 Dummy {f00=0x0176, f01=0x0190, f02=» 2 _ 0 1 +0% _ kU lU( xAdIe 1 (W 6 1 #W 1 An@mIe W 6 K @ T $ _ @n_)@ $V 6 Ie ! 4 @e@d ' * h h _sIe ' @f6 _ AfAe@d_ 2 ( 0 kT (!0 lT (! %0% " _ ("6 ( , W - ! 2 AzT ! '
0x2368c0…236a54 (1, 482) Dummy {f00=0x0176, f01=0x0190, f02=»6 ( _W %T ( * 2 ( )gK " '"( g " #2 $T # '#( _ Ub & 5 + *P ( - { &{ 1 -0 ! 0$ mU_" m 50; {&* p!0 $ '$( D0 $} | @ 0 2TX 6 ( W? 0 $} 3 T l $_ & A %T @ _ @ W'" 2 !W 2 " 2 ' #$%&@z 7
0x236a54…236be8 Dummy {f00=0x0176, f01=0x0190, f02=»b? )? ( h < Q j p % t " d w ( h X " ! Y "TOKEYVIAFILENAMETESTUNIT
0x236be8…236d7c Dummy {f00=0x0176, f01=0x0190, f02=»X U & U 45 ? - < & ' 1 71 I 5 J 71 I 7 F ' ! 9 : ! k < 9 : " l 9 : !A k < 9 : "A l % ' ! 1 ' ! ) 53 % A = 52 % < = 51 % = ; :U
0x236d7c…236f10 Dummy {f00=0x0176, f01=0x0190, f02=»> 6 / : ' h ! : ' FETCHING FORMAT: FROM DISC. @ U $ ' A - @ : # A - B : -e@ ~ 60 * h d0 61 6 62 > 63 6 / : 64 > / : 40 ! * h d3 41 G <
0x236f10…2370a4 Dummy {f00=0x0176, f01=0x0190, f02=» ) / 0 1 ) 2 3 4 ) 5 6 7 ) 8 ! & + 1 7 = C I P W ` i r |0 " 0 ? N ] m } + # I $ l & * 2 F
0x2370a4…237238 Dummy {f00=0x0176, f01=0x0190, f02=» i x 2 $WU6 _ PCWD1& *T !05 T W/ W- W)6 ! W @( ( SUW 6 W W W W W 4 6 _ 6 D I 5 W W4 %Q / 1 3 @ @ @ @ T U0C T 1& " R_R AW A _[K H 1& 'A _lK !05 % - ! _ _ W'W
0x237238…2373cc Dummy {f00=0x0176, f01=0x0190, f02=»& %_- 2 I i W Wh ' 80G 40 TP W WJ %Q / 1 3 @ @ A T, U0C T 1& # W W 6 ! W W ? AW A ? ' 80G 6? K "H 1& 'A ? K 3I $ " W !05 E - ! ? W W W W %_e _j _ W WA !_% W W 8 '0
0x2373cc…237560 Dummy {f00=0x0176, f01=0x0190, f02=» 8 '0G 6 2 W _ W _&2 W _2 8 0G _H0 @ ' 80G @ ' 80G 0 & ? U0C T 1& )_D U0C T 1& (_S # # " T - ! B4 4 8 " '0G 0 <0 T@ 7j & j ( % 6j !% 5j " 1 -An0 !
0x237560…2376f4 (1, 483) Dummy {f00=0x0177, f01=0x0190, f02=»$2 / b /W b $ 'I ` F `!*` a`h a! ! aW W j b b ` ` j ` 1 % `* ` 1j 0 1 ` 3 $ `* ` 3j 2 3 `" W-d " ` `"0H `f " f !X 4 d " ` `"0H `f "4 0 0 0 "P 4 90 : 6 ? B j
0x2376f4…237888 Dummy {f00=0x0177, f01=0x0190, f02=» 1 % `* ` 1j 0 1 ` 3 $ `* ` 3j 2 3 `" Ej ! !WRH ` ( ` ! ! Dj ! ! 8 0G f !8 4 Ba & j W 8 0G 4 4 ' 80G 0 0 %P 30 T 4 ' 80G 4 " C $Q @ H A !01 02 P : ? 0*
0x237888…237a1c Dummy {f00=0x0177, f01=0x0190, f02=» ) @ _ _ ) A _ & m W @ _ ) H 0 T 0* 0' P R m Wf" 5 R 0* 0 /P%H ) m WBm W m 6 !W H ) m W m W m 5 f () m H ( # $ / @ /! ! " ? 4 4 4 4 4 0 *0I 0 0
0x237a1c…237bb0 Dummy {f00=0x0177, f01=0x0190, f02=» t A ? C 5 7 ; R T X ` b j } & V A ! - 7 B O o ! &&FILENAME KLARDEVICELISTNING AFBRYDESEXPIRATION DATE:FLOPPY DISC SKRIVNINGOLD VOLUME SEQUENCE NO:OLD DATA SET IDENTIFIER:
0x237bb0…237d44 Dummy {f00=0x0177, f01=0x0190, f02=»TTTTTTTTTTTTTTTTTTT9-ZZZZZZZZZZZZZZZZZZZZ9- S l K , N , K L , K I , SLUTD % + EJ GODKENDT N KLAR , N AFBRYDES , 1 * NUMBER: g JOBNAME: k BATCHNAME: l DATO: S TID: T IND: g
0x237d44…237ed8 Dummy {f00=0x0177, f01=0x0190, f02=» ! " $ ( , 1 7 ? H X m 0 0 , A V l & 1 < J Z j ~ # 0 5 < : sQUENCE NO:OLD DATA SET IDENTIFIER:
0x237ed8…23806c Dummy {f00=0x0177, f01=0x0190, f02=» 6 6 D * . 2Ii " !W ! 0 " P !, ! ? Ij { j 1! !j 2! !Hj 4j !&m $ r"Ii' U ! ( j !! ( ) x. .K .*W x( Hj mIn 0 ! W 0 ! Hj m !7 w! y "! !U 'U U & Ii ( In 0 ! W 0 ! @n ! Ij 0 :
0x23806c…238200 Dummy {f00=0x0177, f01=0x0190, f02=»,, W ! $ 0) / T W 0) - T ! 2 W "? I I I I IjO2 !0* / 2 W$0/ Am6 ! bC I .4 ? "(0/ _*Am #03W 04W 0$W X Z [ +( H I C_ 1& _ T 1& !05 ? 2 ? W #0. T %y0 %%_
0x238200…238394 (1, 484) Dummy {f00=0x0177, f01=0x0190, f02=» % 0 0 < 2 ? 2 #? 0 0 ? $ 2 2 0 %% ( @h u!He8Kh 0 % $? 0 %%A ( @h u!He Kh ( ! u!0 #'@ @ @ ( ? @ ( !"_cA $? 0 && u! !eJh ? 0 &&A % Ad@ @ #? A @ u!
0x238394…238528 Dummy {f00=0x0177, f01=0x0190, f02=» j ! H ? f G Y z ! L & $F 1 " " T 1& !05 ? 2 ? W #0. T %y0 %%_
0x238528…2386bc Dummy {f00=0x0177, f01=0x0190, f02=» d 0 $}j *!! x0 @l 2 ? j x! ! wx xyj &"x !g:e x y" e @ TW( ' )g: @l? j xy wj x! { W< .V xwj &"w W j ! " "Hn ' wxjx " & wx wxf xwj x! { wxj !! x( % j " &W ( ' j ! " " { 0; {$* p!0 0: x*6 VVVVOVOVV V "!H '0 **P I %!@ A W
0x2386bc…238850 Dummy {f00=0x0177, f01=0x0190, f02=» x* !u uv_ 0 j x! ! 7 ZH_ j " "jx " &"x* ( 3 Zf_q 1Zm u ? !u (R j "" j &"x u !? ! _ j " & wx x 'jy " xy x u$x Aj " $( xw u 4 /_ /Z j " &( * 1Z)_5 x* wx x 'jy " g2 #gYuP W j ! x0 , + & # ( #2_
0x238850…2389e4 Dummy {f00=0x0177, f01=0x0190, f02=» : ? ,wx W x* WY uj " "( ? j " &( * % 1W 0 : j " & *1 1 W u ! u ! u ! 4 : jx " & 1 w*j " w wx wx j &"w xw? w w !( % _ ' xw g2 # ( ( #g? g "b & AlW '2 : 1 _ : ? $ )g: ' 4WAH !W9AlHl
0x2389e4…238b78 Dummy {f00=0x0177, f01=0x0190, f02=» *PE - { ) ? 1 0 ! 0$({ ' x( ' ' wj " jy " ? &{ mU_ m $ ' ( @lW !g: ( nmW *W * n An xIl j ! { W . ( ' !g: j x) w < ? < ? !j &m &j "y ( + ? A ? < 0 @vP C 8 ? ' ( % 2 ! C 8 0 @v< "!_y # "= g "
0x238b78…238d0c Dummy {f00=0x0177, f01=0x0190, f02=» ) 0 @v $W &z &| &{ 0 @v_U &z &| &{ 0 $} 5 ^ # + "@ X& ! : !0# !X 0 " %P @ 0 0 $} 2_R * ' #2 $T -_ #_-@ P 0 $}A 3 W Ay@m 4 @ 0 0 $} 2V @y@z@oA # &{ &z &| h Ae0 0} 4 2 $%%&' uf
0x238d0c…238ea0 Dummy {f00=0x0177, f01=0x0190, f02=»* u$x j $" 7 :(W .:( uf *y x *j &" _* u 4 :(j "" 7 :(W j ! "u u 4 :( w* x*j x! { ?) h ( ' 0 kP W1( $ ( % W ( % # 0 @vP (z Ub &k "V 0% " ?(I + #P R 0 @v0% # b &l ?*A 0 @vP 6 &z ?+0 @vT/( ' z W ( % 6 !
0x238ea0…239034 (1, 485) Dummy {f00=0x0177, f01=0x0190, f02=» I H 4W I 5W H~ I (W ' A P A WB0 @vT ( ' $W3 $W I K @ 0 0 $} 2TmH 7 Uj &"* W 4 TT0: z , { 0 @vT % 4 * *T4 m 4W mU x*0 @vT % I S2 * An0: |"- wx g 0 WYH ( 3 # W &| 0% ' 0 @vT &z @ P $0 $
0x239034…2391c8 Dummy {f00=0x0177, f01=0x0190, f02=»_B 4 ! ! + 9h # !T}6 ,, !0 @|Thj !! ! j !! 80 _K ! $ !A !@( "90# !T2@e@i@k !" ? 'hZ 2 !TP &6 " _ Ai_8Ae_<" v :WpAkW ! ( ~ !~W)j !! C 80 U !b ! !
0x2391c8…23935c Dummy {f00=0x0177, f01=0x0190, f02=» = N D ^ P R 1 y s n G a 3 4 X Y ! - ! " % & ?MDA FETCHING FORMAT:
0x23935c…2394f0 Dummy {f00=0x0177, f01=0x018e, f02=»& XX " h " & d3 2 & d B & 41 P OPEN NEW ` $ 1 x BATCH $ 1 & & 42 OPEN OLD $ 2 BATCH
0x2394f0…239684 Dummy {f00=0x0177, f01=0x018e, f02=» BATCH $ 3 & * & 44 8 OPEN OLD H $ 4 ` TEST p $ & - ! BATCH $ !4 & $ '4 ( " & &
0x239684…239818 Dummy {f00=0x0177, f01=0x018e, f02=» & % MODE $ %4 & & 4 6 & F & TEST T $ &4 h & x $ *4 & $ .4 & $ 14 & $ 44 ( '
0x239818…2399ac Dummy {f00=0x0177, f01=0x0190, f02=» + UNIT $ +5 & :U ( & 8 , X J " ,i & l - VOLUME z $ - & : & & ( . / JOB $ /
0x2399ac…239b40 Dummy {f00=0x0177, f01=0x410e, f02=» $ 2 3 NAME $ 3 $ & : 4 & " B & l V ( d 4 p & & U ( 5 & U & ( X _ @
0x239b40…239cd4 (1, 486) Opaque[0x194]
0x239cd4…239e68 # DirEnt {nam=»TEST «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1508, f03=0x0000}
0x239cd4…239e68 IdxSect {
0x239cd4…239e68 f00 = 0x00a8 // 0x239cd4 @0x0
0x239cd4…239e68 f01 = 0x0002 // 0x239cd6 @0x2
0x239cd4…239e68 gno = [ // 0x239cd8 @0x4
0x239cd4…239e68 [0x00]: C0x00a8.0x1.0
0x239cd4…239e68 ]
0x239cd4…239e68 }
0x239e68…239ffc Dummy {f00=0x00a8, f01=0x0190, f02=» PSCR PPRT TEST PMOV CNFT,/A,CON10 PPRT /A : PTRA DEDDIV,NL H PKPF /O ^ PNOD C l PINC PTSDE z PINC DEDISC PINC DELOCK PINC DEAPPU PNOD R PINC DKRUT1 PINC DKRUT2 PINC DKRUT3 PNO
0x239ffc…23a190 Dummy {f00=0x00a8, f01=0x0190, f02=»D R PINC DENVAL PINC DEGENE PINC DECOMP 0 PINC DESTAT B PINC DENT02 T PNOD R f PINC DE10ST t PINC DE11ST PINC DE12ST PINC DE1201 PINC DE14ST PINC DE15ST PINC DE30ST PINC DE31ST PNOD
0x23a190…23a324 Dummy {f00=0x00a8, f01=0x0190, f02=»DEPRFG PINC DEUNPF PNOD R PINC DEVGAC . PINC DEATTF @ PINC DEFDSC R PNOD R d PINC DE40ST r PINC DE50ST PINC DE60ST PINC DE70ST PNOD R PINC NYCONV PNOD R PINC DCCONV PINC DEPROC
0x23a324…23a4b8 Dummy {f00=0x00a8, f01=0x0050, f02=» 8 PMES $PDISC M=M:DENJ,MU=M:DENJ,A=TEST,C=CNFT,CU=CON10 PASG /E0,TY10 @ PINC DEFDSC R PNOD R d PINC DE40ST r PINC DE50ST PINC DE60ST PINC DE70ST PNOD R PINC NYCONV PNOD R PINC DCCONV PINC DEPROC
0x23a4b8…23a64c Dummy {f00=0x00a8, f01=0x2008, f02=» $PDISC M=M:DENJ,MU=M:DENJ,A=TEST,C=CNFT,CU=CON10 PASG /E0,TY10 @ PINC DEFDSC R PNOD R d PINC DE40ST r PINC DE50ST PINC DE60ST PINC DE70ST PNOD R PINC NYCONV PNOD R PINC DCCONV PINC DEPROC
0x23a64c…23a7e0 Dummy {f00=0x00a8, f01=0x0190, f02=» g - l o t 0 | 0 @ O P J F " D @X !0X K 4 4 L "m F %m F Lm F L '0R 0X b 0 !
0x23a7e0…23a974 (1, 487) Opaque[0x194]
0x23a974…23ab08 # DirEnt {nam=»DEPROD«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x2f38, f03=0x0000}
0x23a974…23ab08 IdxSect {
0x23a974…23ab08 f00 = 0x0179 // 0x23a974 @0x0
0x23a974…23ab08 f01 = 0x002e // 0x23a976 @0x2
0x23a974…23ab08 gno = [ // 0x23a978 @0x4
0x23a974…23ab08 [0x00]: C0x0179.0x3.0
0x23a974…23ab08 [0x01]: C0x017a.0x0.0
0x23a974…23ab08 [0x02]: C0x017a.0x1.0
0x23a974…23ab08 [0x03]: C0x017a.0x2.0
0x23a974…23ab08 [0x04]: C0x017c.0x1.0
0x23a974…23ab08 [0x05]: C0x017c.0x2.0
0x23a974…23ab08 [0x06]: C0x017c.0x3.0
0x23a974…23ab08 [0x07]: C0x017d.0x0.0
0x23a974…23ab08 [0x08]: C0x017d.0x1.0
0x23a974…23ab08 [0x09]: C0x017d.0x2.0
0x23a974…23ab08 [0x0a]: C0x017d.0x3.0
0x23a974…23ab08 [0x0b]: C0x017e.0x0.0
0x23a974…23ab08 [0x0c]: C0x017e.0x1.0
0x23a974…23ab08 [0x0d]: C0x017e.0x2.0
0x23a974…23ab08 [0x0e]: C0x017e.0x3.0
0x23a974…23ab08 [0x0f]: C0x017f.0x0.0
0x23a974…23ab08 [0x10]: C0x017f.0x1.0
0x23a974…23ab08 [0x11]: C0x017f.0x2.0
0x23a974…23ab08 [0x12]: C0x017f.0x3.0
0x23a974…23ab08 [0x13]: C0x0180.0x0.0
0x23a974…23ab08 [0x14]: C0x0180.0x1.0
0x23a974…23ab08 [0x15]: C0x0180.0x2.0
0x23a974…23ab08 [0x16]: C0x0180.0x3.0
0x23a974…23ab08 ]
0x23a974…23ab08 }
0x23ab08…23ac9c Dummy {f00=0x0179, f01=0x0190, f02=»; V CR t D < fD G D P @D Z D d ,D o bD x :D D D D D D a 6 P
0x23ac9c…23ae30 Dummy {f00=0x0179, f01=0x0190, f02=» * * 8CB1
0x23ae30…23afc4 Dummy {f00=0x0179, f01=0x0190, f02=» J @
0x23afc4…23b158 Dummy {f00=0x0179, f01=0x0190, f02=» 8 F
0x23b158…23b2ec Dummy {f00=0x0179, f01=0x0190, f02=»LP 0 GP 6 FD DLU FRO B . D Z p - r -
0x23b2ec…23b480 Dummy {f00=0x0179, f01=0x0190, f02=» SYSVOLSYSVOLSYSVOLSYSVOLSYSVOLSYSVOLSYSVOLSYSVOLPFJESVCHM/=><DL!ASUFTCE+-*:;&V?'ZGRNX()MEVTFCAB/,LRAPTXZY+S,.><0-VEX * >0 0 0 M U t ~ 0
0x23b480…23b614 (1, 488) Dummy {f00=0x017a, f01=0x0190, f02=» * B 0 0 0 " ( .
0x23b614…23b7a8 Dummy {f00=0x017a, f01=0x0190, f02=» V @ f $ B @
0x23b7a8…23b93c Dummy {f00=0x017a, f01=0x0190, f02=» ~ J > 2 4 <0 D ( `@ @ & 0 ; f f 1
0x23b93c…23bad0 Dummy {f00=0x017a, f01=0x0190, f02=»T Q S $ R R S V T V VXU U U U T<T6Q,Q|Q T T ,F J T
0x23bad0…23bc64 Dummy {f00=0x017a, f01=0x0190, f02=» ! ' . 5 < D L T ] f p { ( < S k f n n =
0x23bc64…23bdf8 Dummy {f00=0x017a, f01=0x0190, f02=» ! T P & ! X T C ;n X x & Y " X R W #r P _ Y $ # = # # X " X $ ! P W2 X $ X " R W V R W V % _ " D $ D BR #v X $ X y & #^ X x & Y "
0x23bdf8…23bf8c Dummy {f00=0x017a, f01=0x0190, f02=» R W V, y & Y $ 8 " X X #v x ( y $ #^ #r #v = Y Y = & = ( : Y ( x P Y * f x y Wv X " V X X . 8 #v X 0P X T 5 ! Y * f y X V& X ( x C ( Y * X
0x23bf8c…23c120 Dummy {f00=0x017a, f01=0x0190, f02=» x X *YrP y X " x Y X " T Y _ l_ B U C Q C D t v X X * $" ~_> @ Y X * _R X !@XX y X # x V y X X * P P 1 _ 1 f X * X X * $" X D % " X # X * y _< X # X * y
0x23c120…23c2b4 (1, 489) Dummy {f00=0x017a, f01=0x0190, f02=» ' Y =D y x C y X C C X ( x Tf B 9 R 9 X ! T l_ y C Q " T X ! X X ! x Y~ Y _ X "@P B R y C B P 9 V l_F9 VV X ! T X !@X y C _d y C
0x23c2b4…23c448 Dummy {f00=0x017a, f01=0x0190, f02=» C _. B ]d P C Q8X8_H x XD @ Y c C y XR X x . x X X # _ B C : + X ( # = ( # # : B C _J + . #v X 9 V ! P @ Y = Y Y . : =D =
0x23c448…23c5dc Dummy {f00=0x017a, f01=0x0190, f02=» #r #^ # ' = ! Y 0T V # BR : #v 2' = R P P X ' ' ;n X _ X ' _ X '?_ #v = X ' #r X ! #^ #` #v X " 9b! X :c 2" H ^ #p@ W W W W W W W
0x23c5dc…23c770 Dummy {f00=0x017a, f01=0x0190, f02=» fW W V +~ X 0 X +" X *9h P2 R Y >_ P P Y +W^ Y + WL T W> Q W Y + U Q P W W Y ( C #v X *! P V L ! #r ;n X 0 Y 8 P # Y 0 X 0 X 2] X 8 Y 0 : X 0 :H
0x23c770…23c904 Dummy {f00=0x017a, f01=0x0190, f02=» + = 4 0 =* 6 2 : C ( C : C B _( _ X P B _N ( # X D D : K + Q 2 P. P8 =6 J ( # B X # V : = J _0 ? _>L L = L L L L L L J~I~J~ID
0x23c904…23ca98 Dummy {f00=0x017a, f01=0x0190, f02=» 0P: Vp_` " P4 T !b # WT " P Y 0] Y (_t " X _. +f X *# P B 1 +fW " P X X$ C : X *! P +~ # C W @ X (T W X y 6 Y ( : X (;n #`L J J J J L L L JjI~JtID J L J. #v Y . Y ,W #v Y . X
0x23ca98…23cc2c Dummy {f00=0x017a, f01=0x0190, f02=» *# P P T " T : Y . !b Y ( I~ #v Y *T " T ! 1 W ! ) J@ : #v J LV P & Y *T : X > T X & V D ! T W J@ " #v X >P( R Q" X & V D ! P $ ! P %_ J@ : #v V Y " X .9H $ LV P
0x23cc2c…23cdc0 Dummy {f00=0x017a, f01=0x0190, f02=» P P< WZ X ! X $" P<Q X (# P2 X # :! R$W T$ @ Y (W Y , !bW ! Y ( I~ : X *:h X (! # P X & V L TbW X , X 0P@ T, X *:h XF XL X (!@T @ Y ( X , Y t X 0 l _r X ( P Y (_ P* P|
0x23cdc0…23cf54 (1, 490) Dummy {f00=0x017a, f01=0x0190, f02=» (P # 8 Y 0 X 2P X 0V _z Y ( " T Y ( : 8 " = 8 V Y 8 : " P X & V ( P : : "0P $ T W %T : : Y ( X $ Y X " Y X & Y X < Y @ : Y : #v X : X ( T X & V H " V Y : X $ #~
0x23cf54…23d0e8 Dummy {f00=0x017a, f01=0x0190, f02=»! T" X y 4 @ X (T y 6W4 X y 6W, @ X (P W" X & V D ! P @ W X #~W Y ( : X , Y X $ Y X &T Y Y Y WD V $:H D Y D :H Y ! P V Y = W Y ! P =2W V Y " V Y : = J : 2' " P T
0x23d0e8…23d27c Dummy {f00=0x017a, f01=0x0190, f02=»=: V I #v Y Y Y < V E ;n B X _ v : C C + : C + :( R : V E V D ' $ T ( W # P ;n X =' V W V Y =P # : , $@ , $N , $f $ $ $ P P % ' ,(/ $
0x23d27c…23d410 Dummy {f00=0x017a, f01=0x0190, f02=» C : ( ;n ,( "R V I ;n ,( ( T _& @P2X, @P4 _6 = ( ;n = = V ;n 2 ;B P0 J T % ( ; W4 f_. % ( W = & F : ( ;n 2 &
0x23d410…23d5a4 Dummy {f00=0x017a, f01=0x0190, f02=» ?H 8R0;AV ( _ X @ 9 X ( 9 8 ? X Q , V ( - 4T V 5 ( W, V P& W$ U V X 9T I Y ;n 2 ' >A >A 2 $ V L ;a ; R@ @ 8 ?
0x23d5a4…23d738 Dummy {f00=0x017a, f01=0x0190, f02=»= V G 9h ' ;n ,( # 9 2! P T ) / * ,( #/ C _ ( = ' ;n ,( P^ C * ) P^ * ) (D * _ =* &:K : ) / * ) / P^ * ) / _ _. ) / * ) C ( B B
0x23d738…23d8cc Dummy {f00=0x017a, f01=0x0190, f02=» ,( C _ ) ( C _> ,( P^ C , <H / * ) , (D C _" W + * ) / * _ ,( , ,p P = <H : ) W ,( ,p = &P B V C / <H : ,( , C C W , C C J* ' W 781"&$ 39#$;<
0x23d8cc…23da60 Dummy {f00=0x017a, f01=0x0190, f02=» 1W C C C ( ' P. + P$ "! P P6W B % P C + O: ;n + I "%@P "% P& B C C 4 "5 # B P B P B 5 P C : ,( +~ H +h C * C B B P C + : V I C B : (
0x23da60…23dbf4 (1, 491) Dummy {f00=0x017c, f01=0x0190, f02=» T V : 2 ' W 2 6 2 @ " T # ' ?D ?zW"' #? ?d ;D:B " : _ = C : : ,( , "! P P^ : =* P C W $0 P C N : C "!@P ") # B C B % C : W - 6 V :a . -L + ' (
0x23dbf4…23dd88 Dummy {f00=0x017c, f01=0x0190, f02=» : J 7 J V W J :A V 6V $ - _ * + : . D T> E D :A D ;A 9A Q 5 U _ 5 - AP2 .@ AP4 . *! P * P _ W *) + . : . $: R P $ : D V D V ( - C C _, M : (
0x23dd88…23df1c Dummy {f00=0x017c, f01=0x0190, f02=» T V : 2 ' W 2 6 2 @ " T # ' ?D W"' #? ;D:B " : _ C : : ,( , "! P : P C W $0 P C : C "!@P ") # B C B % C : W 6 V :a + ' (
0x23df1c…23e0b0 Dummy {f00=0x017c, f01=0x0190, f02=» : J 7 J V W J :A V 6V $ - _ * + : D T> E D :A D ;A 9A Q 5 U _ 5 - A .@ A *! P * P _ W *) + : $: R P $ : D V D V ( - C C _, M : (
0x23e0b0…23e244 Dummy {f00=0x017c, f01=0x0190, f02=» T V : 2 ' W 2 6 2 @ " T # ' ?D W"' #? ;D:B " : _ C : : ,( , "! P : P C W $0 P C : C "!@P ") # B C B % C : W 6 V :a + ' (
0x23e244…23e3d8 Dummy {f00=0x017c, f01=0x0190, f02=» : J 7 J V W J :A V 6V $ - _ * + : D T> E D :A D ;A 9A Q 5 U _ 5 - A .@ A *! P * P _ W *) + : $: R P $ : D V D V ( - C C _, M : (
0x23e3d8…23e56c Dummy {f00=0x017c, f01=0x0190, f02=» T V : 2 ' W 2 6 2 @ " T # ' ?D W"' #? ;D:B " : _ C : : ,( , "! P : P C W $0 P C : C "!@P ") # B C B % C : W 6 V :a + ' (
0x23e56c…23e700 Dummy {f00=0x017c, f01=0x0190, f02=» : J 7 J V W J :A V 6V $ - _ * + : D T> E D :A D ;A 9A Q 5 U _ 5 - A .@ A *! P * P _ W *) + : $: R P $ : D V D V ( - C C _, M : (
0x23e700…23e894 (1, 492) Dummy {f00=0x017c, f01=0x0190, f02=» T V : 2 ' W 2 6 2 @ " T # ' ?D W"' #? ;D:B " : _ C : : ,( , "! P : P C W $0 P C : C "!@P ") # B C B % C : W 6 V :a + ' (
0x23e894…23ea28 Dummy {f00=0x017c, f01=0x0190, f02=» : J 7 J V W J :A V 6V $ - _ * + : D T> E D :A D ;A 9A Q 5 U _ 5 - A .@ A *! P * P _ W *) + : $: R P $ : D V D V ( - C C _, M : (
0x23ea28…23ebbc Dummy {f00=0x017c, f01=0x0190, f02=»; < ;t< BR@ @ AhD:E E <d<d<r<r< ;n<r<rH M MtM M"M L = = = = # W V 7 @ ! P # P W ;. < 9c D: = =* Q : W Ah :aW _B( 2 P V W8 _ 2 # ;B V T fW V P L , V 2P "
0x23ebbc…23ed50 Dummy {f00=0x017c, f01=0x0190, f02=» % V E @ ' T 2 % 7_ 2 # L = 2" &] Y $! 6P Q $ T 9B ; _ _ 6 @ " T 7 $ V P # W _ : ;n ? V & ; H; 'W 'W '_6 :l:d:h = W W P
0x23ed50…23eee4 Dummy {f00=0x017c, f01=0x0190, f02=» V $ W D V L= , W 6 2 ?zW$ " P& Pd" # ?d ;b Wv " ;d# _ [ v [ # = # Z Z : R ; = 6 : F _v :B , (Vr ; H [ [ [ = z ;AV$ Z
0x23eee4…23f078 Dummy {f00=0x017c, f01=0x0190, f02=» @ ! P [ 6 [ Z 7 =@ Z 7 : ( :A ( @ " P ! P [ :;H 2 > >L;h ?n : ; V Y : 2! : 6 2 ?zW& " # ?d;b ; : ;f" #?_" W " T & T + :
0x23f078…23f20c Dummy {f00=0x017c, f01=0x0190, f02=»W Q P [ " X $ P TF R R ` ; <( Q P # W " <! =# T6W = Z P _ V ^< `_@ R Q <# =_ P :" P * U P 1`! T "# 9e! # K : P8" T * & : * & !`P :J +_ +Q
0x23f20c…23f3a0 Dummy {f00=0x017c, f01=0x0190, f02=» , V W Q P W $ W V P T V W Z :$0#0;b C P P PF P 0 - P0 _ 4 V W Q P ) P 9_ &" ! 9 : & P Q B ,^ , < B # ; [ _n' d V W V 4! P
0x23f3a0…23f534 (1, 493) Dummy {f00=0x017c, f01=0x0190, f02=»V W YL T 9 : &9d! + P( & T 9d! T 7 V Y " WJ Q V V 7 Y P._& & Q 9d! )0 + P 7 Y Z $ _ : V ) " TV *V &V : V S W P 9 S W _ V P W T V E
0x23f534…23f6c8 Dummy {f00=0x017c, f01=0x0190, f02=»9a Z $" T 9d! P6 P( [ Z w [ P G @ V H )_ G E _X z R z ! P 1` { V (9h T W z 9e! I Z ! : 4 P 9 59D_ " P P [ ! :d" 5 : " Tz *V &V PP= ;@ R P W ;a=a
0x23f6c8…23f85c Dummy {f00=0x017c, f01=0x0190, f02=» &! P G G BR G BR G @ z " ! ! R 2` { z " P ! R 2` { 1 ! { [ Z G A Q G E P _ T { [ G G [ Q@ [ G @ { R [ _ G @ G E Z ! Z $ Z %_N [ Q* G @ G A R [ Z
0x23f85c…23f9f0 Dummy {f00=0x017c, f01=0x0190, f02=» D % [ ( !! gg++ L 33 L =*=@? L ? =6= L J J J J L L L L JjI~JtIDJTLLLLJ JJL J. H 6 IL K K K K V K : = Hb HR H =: V I IL I V Z P 2 " T
0x23f9f0…23fb84 Dummy {f00=0x017c, f01=0x0190, f02=» 7_ Z I @ ! P # Z 7 Z Z P # : V R (Q V : : Hb J P v I < : J Qx : Pn 4 ! Th_ PX 4 WT K J WJ JPW +_ Jj Jf K W. _& X +fW X
0x23fb84…23fd18 Dummy {f00=0x017c, f01=0x0190, f02=»W ILD 6 * B Z 9 ! ; *Xt 8 ! DL4 0P Wn 0W8 Wf :T& *W, FP . :T Z ! XBW *X& FW@ :P # U 1 K !00T ; J _ 9P F " X6# ; W )0_: J R( Z R 4! P ;)0 9U ? Z ] 49d_. _BU ; :X _ _ z 9d! )
0x23fd18…23feac Dummy {f00=0x017c, f01=0x0190, f02=» ! P ! P ! P = ! P =2W : ! )P9H # T &W &" :I : L : P & _ &X _ : : : : N$ H : { : N N PX 9 _ N [ N Z : R" P $ 1T Y W 5
0x23feac…240040 Dummy {f00=0x017c, f01=0x0190, f02=» !0P0 R* 4 R :d" 8 R ! :DW ! 9 R R _. : Bp : = = jP kT T : & 9! " : $ : N$ =* $ : ,( N = &P C N / * ,( N N / * = C : =*#0 T & C C : N C C :
0x240040…2401d4 (1, 494) Dummy {f00=0x017d, f01=0x0190, f02=»" OX : PP P2PR LP R R _ R _ # Q R V > _V X^ ' h P P & 1_ P 1_ , @ - R T U :J a B@ ' d w5 1 P2 =* #0 T B ' : B B
0x2401d4…240368 Dummy {f00=0x017d, f01=0x0190, f02=» = & = &9B %W _ ,( = F C W Q ( = Wn Q _ = & = & = ( : R P< P8 <<HT _ R <A_ <A <a ^ <h = F F ) = ' ;n R = & X X Q X* T Z0 I R < _ <h =_H ^L _ _R
0x240368…2404fc Dummy {f00=0x017d, f01=0x0190, f02=» _< _B ,( = C = ( B T B $ ' Y = ' ;n _ = = : = = = = = P < C 9h9G & C 9b! 8 #_h B " ' ""? 99g! ":e" B =_ _f = = & 9_ ,( @ # =
0x2404fc…240690 Dummy {f00=0x017d, f01=0x0190, f02=»= = = = P 8# ' Y = # R6 _ _ _ _ _ = = ' = _ = & = ]8 Z YB_J W ,( = & C = = & C = & C C ( B X _ W & Y < * C _& ,( = = P )
0x240690…240824 Dummy {f00=0x017d, f01=0x0190, f02=» E . ;n = #v X ' = X P &V Y , X Y / X Y 2 = #v & Y _P W W _ = PB T !00R4 !99Q.$ Y T P U U T W _F T P Y P = V E ;n = = V P V
0x240824…2409b8 Dummy {f00=0x017d, f01=0x0190, f02=»' = = & C P^ T #W T # C C * _ _ = = ' = _ = & = ]8 Z YB_J W ,( = & C = = & C = & C C ( B X _ W & Y < * C _& ,( = = P )
0x2409b8…240b4c Dummy {f00=0x017d, f01=0x0190, f02=» f H V X Z ^ b0 0}0 o0 oA T 0 K 0 Ad1 An@m 6 _ @n_ 1 An _% ) !P V _, 6 ## _ jX 3 0 0}@d "P n_r 4 # 6 P 7MW (j "M ( 0 P 0 * 1W 'W 1 1 1 1 v j !!O
0x240b4c…240ce0 Dummy {f00=0x017d, f01=0x0190, f02=» 4 !4 "4 $4 & #4 H "4 4 * 4 | z { !V f 4 * " j !!L 0 /P /0 f 4 0 f 4 4 0 0 0 $0 T 0 0 W 0 W 0 4P +W 4 0 4 j !! % !j !! 0 ) 4 4 !4 "4 #4 $4
0x240ce0…240e74 (1, 495) Dummy {f00=0x017d, f01=0x0190, f02=»(0 : H~ ? 0 P : _ 0 P C{P A )? H ? 0 HoO !H~ 0 $ W 0 # ! 2 W 0 0 /1 _5K~|0 ! _D2 #I @o4 H~ 2 4 0 0 /P 0 0' W 0 0( ! 2 W "? 0 0 _ @ 2 W #( 2" + " ( " # I ? & 0 P ? 0
0x240e74…241008 Dummy {f00=0x017d, f01=0x0190, f02=»@ @ @ @ @h@j #U 0 ! Td$ + " , 0 %@|PI0 T /hZ " !T f ! j !! H{ ? 0 P 0! P H !? ? 0" W 2 ! 0" 0 P I 0! P AmH 0# ! T 0 P I 0! P Am 2 !"#""!$ %&##""""' 88( .4 #H 0Hj 0 #T @m?)@hP !PP0$ 0%
0x241008…24119c Dummy {f00=0x017d, f01=0x0190, f02=» H 2 ""-""-$-&? JA J K{ 0 ?. !0$ 0% 8 _^J # T 2 -" 0 T 2 /00? 2 0000! 81J ?1 ?2 < 1 !0) ? H{ A W B . #_ 0 P 0! P H %@m?3 - !0 ( 1 ? 0 0 /P 0* & ?40* " ?40 _.0 0 H { ,W H s +0 0 P 0 Q
0x24119c…241330 Dummy {f00=0x017d, f01=0x0190, f02=» Q I ) *&KA)? 0 % 0 P-0! P H % !W/ ?7 #? 08 $+ %'0 0 < H{ W ! 2 00089:$ " @ 0 P I 0! P 2 ; #I @o4 2 <_ (?$A 0 P W 0 "0 /P "W # "j 0 0 #4 @ 0 P j !!!WP U0 P m ( &W ) B
0x241330…2414c4 Dummy {f00=0x017d, f01=0x0190, f02=» " "Jh !U !TA0 T h ! !T00" _ A 0 T f !0+ 0 0 _ 0 0 (P h ! !P 1 _ 1 !0 X 0 0 O _U "4 #4 $4 ( &Ad1 An@m 6 0 _ @n_ ( !'( _&3 !@d0 0} h* "h _? ! 4 6 99 W 2 =>? #!8= #"8= ##8=W j " # $ j " "# %|j
0x2414c4…241658 Dummy {f00=0x017d, f01=0x0190, f02=» T _< &?@ @ X H # K R $ # D B G , f B p @ d x x
0x241658…2417ec Dummy {f00=0x017d, f01=0x0190, f02=» 4 S # 6 P ] d +-0?AN 2359S:T JOBPTS GETDATAMODE NO.:ENTRYTYPE:FORMATSEARCHVERIFY CREATEELEMENTNAME: TPROGRAM:REL 10.0SIZE OF DEFINITION VALUE-SETS15 FILE-SPACE70 CONVERSION11 DATE AND TIME13 GET VALUE-SETS14 SYSTEM-VAR
0x2417ec…241980 Dummy {f00=0x017d, f01=0x0190, f02=» U U A 6 h d = @ > ? ; RETURN FROM DATA-ENTRY U h d 3 * : 5 e e @ / f d f @ 8 4 & f d T g T 4 - f ! ~ ) + . 7 6 h dG A 20 0 - 9 30 ( - 9 40 . ,
0x241980…241b14 (1, 496) Dummy {f00=0x017d, f01=0x0190, f02=» ! $ ' + / 3 8 = B H N T [ b i q y 0 & ! 6 ! W & x C g ^ & VALUE-SETS15 FILE-SPACE70 CONVERSION11 DATE AND TIME13 GET VALUE-SETS14 SYSTEM-VAR
0x241b14…241ca8 Dummy {f00=0x017d, f01=0x0190, f02=» U d 1 An0- T !S 6 ," $ ! _ @n0- T !S0 ! _*a 0. S !4 .1 Ad # @d An@mAe@f 2 _ !0 #$} & 2 _,4 j 1! ! !j 2! ! R ! 4 Hd ? ! 8T & ( !0 #$}? ) _ ! 0b "" "
0x241ca8…241e3c Dummy {f00=0x017d, f01=0x0190, f02=» j~#! ! ! !W !# Q* < 0/ (+00 + ! !0 $$ %0 0 %%0 %% 2 2 _ < #? Ae ! 8R AnW* ! " _W) !$ ! $ W !W 8P )B? 0/ (+00 +@eAf ! ! 0 %%In 0 $%Ao 2 W ) !Ao _ ! 8T !_
0x241e3c…241fd0 Dummy {f00=0x017d, f01=0x0190, f02=»!? &A $ 1 !2 _ ( T & % X 8 Ao _ ( 2 _ (0 % 01 ? ~ ~ RR j !! !0+~ j " +0 "P ,0+~ " !j~#! ! T j " $ j !! 1j !! 2 !!4 1 W 3P W An 2 _ 4 4 ! ! ! P 2
0x241fd0…242164 Dummy {f00=0x017d, f01=0x0190, f02=»Gv ?v !K "?v ! " ! $ & ! % 0 & $Xm 2 _ & $4 ( !Ad1 An@m 6 6 W,@n_ ( "2( _!@j3 @ @d0 0} 4 h _= _< ! 4 6 Sfl{ W j ! Ii ! W ) m ,P ) ? j !& 'bc c b W 0 ! $ r"?! 7" v$ !r?
0x242164…2422f8 Dummy {f00=0x017d, f01=0x0190, f02=» &? (? ? % c @kh c -!T ! % h / !T; 6 MMMMMM~~MM~~MW|Iiy ! %n h / !T ,JWX ! %P h / ! 6 3 W1Ak_+ !" %% h / !T , W Hk ! c % c c _ & !?" 0 %% ?! !6 (DTdt_ * ?! + ?!
0x2422f8…24248c Dummy {f00=0x017d, f01=0x0190, f02=» !W 4 $ a q . / p 0 O ' B x q g { c U N d c v *CFNY01020304050607080910
0x24248c…242620 Dummy {f00=0x017d, f01=0x0190, f02=» %DEFINITIONSYSTEMFILE VALUE-SETSVOLUME-NAME:15 FILE SPACEUSERFILE UNITNAME CONTENTS11 DATE AND TIME14 SYSTEM-VARIABLES 'gX99XXZZ9ZZZZ9999999XXE-XXE-XXXXE.XXE.XXXXXXXXXXXXXXXXXXXXXXX- T U U I 6 f ! 7 g T U h d
0x242620…2427b4 (1, 497) Dummy {f00=0x017d, f01=0x0190, f02=» i E 2 3 A C ! " # # @ $ % # & U 20 9 - B > h d7 21 4 - 9 B 22 ; - 9 B 23 / 9 24 COPY 9 J H X% ! @ ! X% " @ " X% # @ # X% $ @ $ X% % @ % X% & @ & X% ' @ ' X% ( @
0x2427b4…242948 Dummy {f00=0x017d, f01=0x0190, f02=» " $ & ( * , . 0 3 6 : > B F K P U Z ` g n u | 0 0 ' # " & E C k Q Q P x 8 P 7 g T U h d
0x242948…242adc Dummy {f00=0x017d, f01=0x0190, f02=» @ n 4 8 <AnIj @{ " @iW Ai ! " P 7 ? % ;00 ,0/ , $ ? "r= ( 2 0+ 'h #Q !j , w j 1!w!Ii j 2! ! !j "" j $" mHj -P !2 _ &{ { )P !Ix 6 * ? &{ { *P !2 _ ({
0x242adc…242c70 Dummy {f00=0x017d, f01=0x0190, f02=» ! !jm & {!0 "} )P !Ix 6 *#W 00 {$* 0 Ii !* & & & ! 0 "}H{ Ij !6 H" W 00 {$*0 P _4 0 "}_? 1 !6 TT _P - PJ !6 ??_&Aj p! u # $ j $!! {1j #!! {2 $ #? &{ @jP { &{ W &{ @jP H{ m *
0x242c70…242e04 Dummy {f00=0x017d, f01=0x0190, f02=» WHHdR #W;IeJ_J # & '<W- A ( %Ie,I ) xW Hi! ' 0 (T W $0 "W 0 4 @g0 0} { 1 An@ An2 _ 0 0}@n_ 6 5 ? Ag@ij !m ) AiW 00 {$* p!0 AnP 0 ! 0 2 _Q W XT 8 2 Jgwjm & {!_
0x242e04…242f98 Dummy {f00=0x017d, f01=0x0190, f02=»$ #j !! {(j ' { j {'" j { ! % { ! # _)j { ' @j@{ "|Bn { |? 3? @n ! " P W0 % ;00 ,0/ , T W % & 0 ($}2 ? &{ 0 0}4 0 0} { 1 An 6 _ @n_ 2 Wm * j !& 00 {$* p!0 0 ! 0
0x242f98…24312c Dummy {f00=0x017d, f01=0x0190, f02=» @d0 0} # * h h _? ! 4 1 Ad!h< @dAn@mAe 6 ? " &z 2 4 W Jd P AoHe @o W 0/ z ,AnAo@e 2 !"## _( (z T &PU 1 2 $$%&'& # %XjAo _9 z! X#b !& "z <( $z zU0/ z ,@e0 " *k0 " _ He% k0 k<)Id $P )SW
0x24312c…2432c0 Dummy {f00=0x017d, f01=0x0190, f02=» * _=0 !P #_R * , !" 3 h &U !T , , _ ,& !8 W:6 1?* h ! !P 0 /8*W 0 /<* ?+ W %W ( ?,@e kU lU( .AdIe 1 W 1 An@mIe W 6 . _ @n_ Ief( $A6 _<A W A W A A Ae@d_D@ $V 1 An@m _L@ T
0x2432c0…243454 (1, 498) Dummy {f00=0x017e, f01=0x0190, f02=» M y - < v / # d 1 6 i T v x D r 4 g { q l L ' *F1
0x243454…2435e8 Dummy {f00=0x017e, f01=0x0190, f02=» NEW OPEN OLD SYMBOLIC:BATCHHEAD:DEFINITION JOB-DEFINITION P 2X99XX @ U U 45 . - + % ( : ! k + ( : " l * :U i 0 : 23 GET / / : h @ m h d 1 & : 3 e k e k h , ' )
0x2435e8…24377c Dummy {f00=0x017e, f01=0x0190, f02=» NEW / NAME: v @ m U 40 , ' 4 h d3 41 5 + 42 6 + 43 5 ) - + 44 6 ) - + 8 f 4 2 &g 5 / fA ! 7 &A + / fA " 7 &A , / fA # 7 &A - / fA $ 7 &A . / fA
0x24377c…243910 Dummy {f00=0x017e, f01=0x0190, f02=» ) 7 &A 3 U# # ' + / 3 7 < A G M S Y ` h p x 0 ) 9 Q & j & < M M ? P
0x243910…243aa4 Dummy {f00=0x017e, f01=0x0190, f02=» ! 4 "j ! ! !j o Hi 0+ / ! " ! (0+ 6 W 4 & ( #j ! ! !j 4 & ( $j ! ! !4 & ! c # ( % !j ! !! !j ! ` !4 & " c # ( & "j ! "! !j " ` "4
0x243aa4…243c38 Dummy {f00=0x017e, f01=0x0190, f02=»0+ + !h )Q ! ! #*r= #( ! "* }"r=` )0+ . ! " !0+ - ! " !0+ 6r r!H (W% ! m # T+ w! 0 ""j !Q W = ! +W !@ !@ 4 j !Q * & ' @d@ 4 % ( H + ")0 !!" " !)I 0 # W 0 # & ' %
0x243c38…243dcc Dummy {f00=0x017e, f01=0x0190, f02=» !W j " ") ! 0+ + '04 #4 j !Q !4 j !*! !j ! ! !4 !h )Q !j 4 Hj #* wHj $ # 4 @l #hQ 0 !056 F MMMMMM? !j !! !_9 "_> Hj j !! {(j { ! % { $! 0 ""Il _h !Ah? Al - ! j !!
0x243dcc…243f60 Dummy {f00=0x017e, f01=0x0190, f02=»" H " # H # $ H $ % H % H " # oU U b ! " # $ + ~% U # hQ 0 !T 2 W W #_) !j !! !( "Q Ii "_H ! `! a! !0+ +h )Q ! ! # `" a j a` j a` ! ( !_ $ 6 1j b#~ W j b#~#W j b#~&
0x243f60…2440f4 (1, 499) Dummy {f00=0x017e, f01=0x0190, f02=»" `" a j a` j a` ! p 4 !jo ! - h] $ !T 6 #+jo ! ! !" %_*jo ! )_ jo ! +_ ! !_+J .jo ! ._/jo ! , !4 b @h@k hQ 2 !052 ? !j b! - b! !j !! H W j ba baj b! , ! b!__ j b o " b Jiq
0x2440f4…244288 Dummy {f00=0x017e, f01=0x0190, f02=» %b!b j b!U b!_ HkJ cWE , a ! b jb!! b!+ b"$ $ # !0+ +h )Q ! 06 a #? !4 05 !0$ 0% T$0 0 P 0 ( " _* _/ _44 1 0P # W !0) p! u ! " !! w jw!! {1j !! {2 w d ")@h u" ! Kh !@k ~ 0 oT
0x244288…24441c Dummy {f00=0x017e, f01=0x0190, f02=»&%( _ #$d &% W 1 0 4 $ 9 j~ bIi !"d &%W #$d &%( A b ~ Ak_Dj~ b #* Ii !"d &%W #$d &% ~ Ak4 + 1 5 P W !) 1 5 P # W ! 4 3 L . X s
0x24441c…2445b0 Dummy {f00=0x017e, f01=0x0190, f02=»:#G:#A:GENERATION VALIDATION ACCUMULATION XXZ9XXXZZ9XE+XXZZVZZ9ZZVZZZ<;:9876543210/.-,+*)('&%$#"!=p! ! ! 1 k " ( % & ) 0 ~ k: " $ % & ' ! " # $ % ) 0 ~ 1 # : m ( NUMBER OF POOL-UNITS: # d : !
0x2445b0…244744 Dummy {f00=0x017e, f01=0x0190, f02=»UMBER OF POOL-UNITS: # d : ! " ! - MAX/MIN K M A V I DUPLIC. SPEC. #L:< ! LAYOUT> #V: ' #G: & #A: ( NO NO/POS - $ I E T E C -ITEM HANDL. 4231+*)('&%$#"! ,1
0x244744…2448d8 Dummy {f00=0x017e, f01=0x0190, f02=» ! # " ' D I #@ @ s " ( % & ) 0 ~ k: " $ % & ' ! " # $ % ) 0 ~ 1 # : m ( NUMBER OF POOL-UNITS: # d : !
0x2448d8…244a6c Dummy {f00=0x017e, f01=0x0190, f02=» , | 4 $ ( 05 Hf ( Hg ( j I 0 ##Ie !l_0 ! $ % & Ii I " " ( I 0 $'Ii # " . I 0 $ W .W 0 ! ( % ( % !4 @e@f@g @l l eIe ( @l l f( If Al l g !Af( hIg !W` @l l eIeJ(
0x244a6c…244c00 Dummy {f00=0x017e, f01=0x0190, f02=» " !P I A ! ! ! % _2 ! W ! !4 % @e@f@g@ 4 ! " # $ * + , 4 o Hi 0 h / !Tr 6 )'''''48fD]]NW[A A A jo ! ! ! ! h / ! ,p_ A jo ! !W:A W.jo !] A A W*A jo !]!W jo !]#A A !W jo !]" !A jo !
0x244c00…244d94 (1, 500) Dummy {f00=0x017e, f01=0x0190, f02=» / h ) c#T # # d053 ( `c_*0 T ` c d H 0 $ 4 I " " j " " j " " $ . ! # T ! 0 "" U W !+ !4 $ f c# # d# hZ c! 7 c! #2 W bch b!Z7!T W
0x244d94…244f28 Dummy {f00=0x017e, f01=0x0190, f02=» a W b# # b*a & &a_ a c! ac bch baZ7! bc a ab c!j c!a! cb c!f c! ! d!_ bch b!Z=! W " c!j c!Z c! (c a ac bc h baZ ! )b c! bc 'b? c! )c ' ) ' j (! '!f c! ! d!? ` 4 j b c a j c!a! b b! c!f cb db4 j b u a u $ #@g
0x244f28…2450bc Dummy {f00=0x017e, f01=0x0190, f02=»!Z` b! ! !@g _ " ,0 b! ! `bh `!Z2! "_L( % !T b! ` h `" b!T `/j b!Z` !_L b! #_} c j b!Z7 bc b! c !d b!Z7 !Jg '!_ `9W `(j b!Z` b! ! ' j '!! b ' j b!Z= 'b '!Ag_ 4 b!jc!! b c ` m `% f b!d b` `! ` b` ` !Hg '`4 @e kU lU(
0x2450bc…245250 Dummy {f00=0x017e, f01=0x0190, f02=» ! U Uj ! !j !!/!j %!8!0/ (+00 +( > " 1 W 1 An@m h 2 _ _ 0/ (+00 +0 _ "l lU h " 1 W 1 l "2 ! W 5 T ! +T | j " &| W - !" ! 0 %, ! b &l b &!Z2b '( "lW b &k !k
0x245250…2453e4 Dummy {f00=0x017e, f01=0x0190, f02=»! lU?!0 0} & Ae?#1 " An@m + , 2 $ % _ _ 0 ~P + , @z6 Az _ @ @z $XP@ ~U 0 , P& b~ ![) !0 + T b~ ![( !b~ ![ ! ! (41 "0 %%0 &&0 $ _ 6 ?&?& + , 6 h[ * !T06 $ $$ 0 , T 07 , @ T 07 + !_6A X @
0x2453e4…245578 Dummy {f00=0x017e, f01=0x0190, f02=»_O@ T Ie ! 4 @e@d@~KeO@ @ @ _ A~ 2 (()* _ 0 1 !0 _ * n : 8 E I w U _ > ' E Z ! x y . } w P C
0x245578…24570c Dummy {f00=0x017e, f01=0x0190, f02=» JOBKEYMODENAMETESTUNITBATCHLEVELSIGHTNUMBERRECORDSEARCHSTATUSVERIFYVOLUMEIN USE PROGRAM:#V:#G:#A:9X99XX999XXXX U + U $ $ ! : " l ! : ! k ! : !A k $ ! : "A l $ 53 ) ( % 52 )
0x24570c…2458a0 Dummy {f00=0x017e, f01=0x0190, f02=»" ( - ' : # ( - * : -e@ ~ 60 . h d0 61 62 & 63 / " 64 & / " ! " ) # $ % ) & ' ( ) ) * + ) , - . ) / 0 1 ) 2 3 4 ) 5 6 7 ) 8
0x2458a0…245a34 (1, 501) Dummy {f00=0x017e, f01=0x0190, f02=» + ; K [ k } # $ 2 F G @ @ $ 1 U + U $ $ ! : " l ! : ! k ! : !A k $ ! : "A l $ 53 ) ( % 52 )
0x245a34…245bc8 Dummy {f00=0x017e, f01=0x0190, f02=» b $ V Z ^ kU lU( xAdIe 1 6W 6 1 )W 1 !An@mIe W 6 K @ T $ _ @n_)@ $V 6 Ie ! 4 @e@d ' * h h _sIe ' @f6 _ AfAe@d_ 2 ( 0 kT (!0 lT (! %0 " _ ("6 ( , W - ! 2 AzT ! '! ? 6 (
0x245bc8…245d5c Dummy {f00=0x017e, f01=0x0190, f02=»T ( * 2 ( )g- " '"( g " #. $T # '#( _ Ub & 5 + *P ( - { &{ 1 E0 ! 0( mU_" m 500 {&* p!0 $ '$( D0 $} | @ 03 2TX 6 ( W? 0 $} T l $_ & A %T @ _ @ W'" 2 W 2 2 ' @z 7 s &{ &
0x245d5c…245ef0 Dummy {f00=0x017e, f01=0x0190, f02=»1 P Q U80 88 R*j !! oU 0 !jo! jo " 1 W % "1 M 0 W 1 !0 ! 6 W"0 0 $( # _.0 ! _y $5 !( * @ . !4 80 4 o o0 0 6 4 Am4 0 0 4 Z E H w o
0x245ef0…246084 Dummy {f00=0x017e, f01=0x0190, f02=» + 1 TOJOBVIAFILENAMEUNITBATCHFORMATVOLUME IN USEDEVICE PROGRAM:SYMBOLICDATA COMMVALUE-SETCONVERSIONOTHER MEDIA XXXXXXTTT9TTTT9XXXXX- o % * U : k % * : % # : % NOT * TIME-OUT CDV-ERROR NOT FOUND I/O-ERROR DATE ERROR 71 +
0x246084…246218 Dummy {f00=0x017e, f01=0x0190, f02=» INVALID NUMBER NO RECORD FOUND UNDEFINED ERROR 4 " # ? TEST ENTERED BATCH RECOVERY RUNNING. DISC NOT OPERABLE " : l IN : k % CHANGE FLOPPY DISC DISC I/O-ERROR : ILLEGAL FORMAT NAME PRESS ENT TO CONFIRM NO WORKSPACE IN CORE F
0x246218…2463ac Dummy {f00=0x017e, f01=0x0190, f02=» USED PRESS ENT FOR DELETION THIS IS A DUMMY MESSAGE SYSTEMFILE ASSIGN-ERROR EDIT ERROR IN CONVERSION ALREADY DEFINED/EXECUTED TOO FEW INPUT CHARACTERS OUTPUT DEVICE NOT OPERABLE & : e # - : @ COMPULSORY FIELD NOT FILLED DEFINED L
0x2463ac…246540 Dummy {f00=0x017e, f01=0x0190, f02=»ELDS EXCEEDED FETCHING FORMAT: FROM DISC. @ U (USERFILE NOT CLOSED IN PREVIOUS SESSION. ,END OF FORMAT FOUND PRESS RINS FOR NEW LINES # : m : )CONFIRM WANTED FUNCTION (CORR,RDEL,PRINT) j : h y : k : l : : z : n : : g : ASD 5 PAGE : W
0x246540…2466d4 (1, 502) Dummy {f00=0x017f, f01=0x0190, f02=»SIZE ON DISC: . ( # : ! DOES NOT EXIST IN JOB-DEFINITION OR ON SYSTEM-DISC=( 3@%&< $ 2B'D8LI:5/, -AC1H0 >G+KJ999999999F7 ;. $ ) / 5 < C K S e o0 z0 {
0x2466d4…246868 Dummy {f00=0x017f, f01=0x0190, f02=» $ 6 J ^ r $ < U n ) G e ! $ $ * + / C 4 r ? ? F $ J j@7 ^ F ^ M WANTED FUNCTION (CORR,RDEL,PRINT) j : h y : k : l : : z : n : : g : ASD 5 PAGE : W
0x246868…2469fc Dummy {f00=0x017f, f01=0x0190, f02=» : . 2 60 $}j *!! x03 @l 2 ? j x! ! wx xyj &"x !g e x y" e @ TW( ' )g @l? j xy wj x! { W< .V xwj &"w W j ! " "Hn ' wxjx " & wx wxf xwj x! { wxj !! x( % j " &W ( ' j ! " " { 00 {$* p!0 0/ x*6 VVVVOVOVV V "!H '0 **P I %!@ A W
0x2469fc…246b90 Dummy {f00=0x017f, f01=0x0190, f02=» x* !u uv_ 03 j x! ! 7 ZH_ j " "jx " &"x* ( Zf_q 1Zm u ? !u (R j "" j &"x u !? ! _ j " & wx x 'jy " xy x u$x Aj " $( xw u /_ /Z j " &( * 1Z)_5 x* wx x 'jy " g #gYuP W j ! x0 , + & # ( # _
0x246b90…246d24 Dummy {f00=0x017f, f01=0x0190, f02=» : ? ,wx W x* WY uj " "( ? j " &( * % 1W 0 : j " & *1 1 W u ! u ! u ! : jx " & 1 w*j " w wx wx j &"w xw? w w !( % _ ' xw g # ( ( #g? g "b & AlW '2 : 1 _ : ? $ )g ' 4WAH !W9AlHl
0x246d24…246eb8 Dummy {f00=0x017f, f01=0x0190, f02=» *PE - { ) ? 1 0 ! 0(({ ' x( ' ' wj " jy " ? &{ mU_ m $ ' ( @lW !g ( nmW *W * n An xIl j ! { W . ( ' !g j x) w < ? < ? !j &m &j "y ( + ? A ? < 0 @vP C 8 ? ' ( % 2 ! C 8 0 @v< "!_y # "= g "
0x246eb8…24704c Dummy {f00=0x017f, f01=0x0190, f02=» ) 01@v $W &z &| &{ 01@v_U &z &| &{ 0 $} ^ # + "@ X& ! !02 !X 0 " %P @ 03 0 $} 2_R * ' # $T -_ #_-@ P 0 $}A W Ay@m 4 @ 03 0 $} 2V @y@z@oA # &{ &z &| h Ae0 0} 4 2 $%%&' uf
0x24704c…2471e0 Dummy {f00=0x017f, f01=0x0190, f02=»* u$x j $" 7 :(W .:( uf *y x *j &" _* u :(j "" 7 :(W j ! "u u :( w* x*j x! { ?) h ( ' 0 kP W1( $ ( % W ( % # 0 @vP (z Ub &k "V 0 " ?(I + #P R 07@v0 # b &l ?*A 0 @vP &z ?+0 @vT/( ' z W ( % 6 !
0x2471e0…247374 (1, 503) Dummy {f00=0x017f, f01=0x0190, f02=» I H W I W H~ I (W ' A P A WB0 @vT ( ' $W3 $W I K @ 03 0 $} 2TmH 7 Uj &"* W TT0/ z , { 0 @vT % 4 * *T4 m 4W mU x*0 @vT % I S2 * An0/ |"- wx g 03 WYH ( # W &| 0 ' 0 @vT &z @ P $0 $
0x247374…247508 Dummy {f00=0x017f, f01=0x0190, f02=» R 1 y s n G a 3 D ! " % & FETCHING FORMAT: FROM DISC. @ U 0 0 * * * z W ( % 6 !
0x247508…24769c Dummy {f00=0x017f, f01=0x0190, f02=» X Ii " !W ! 0 " P !, ! ? Ij { j 1! !j 2! !Hj !j !&m $ r"Ii' U ! ( j !! ( ) x. .K .*W x( Hj mIn 0 ! W 0 ! Hj m !7 w! y "! !U 'U U & Ii ( In 0 ! W 0 ! @n ! Ij 0 :
0x24769c…247830 Dummy {f00=0x017f, f01=0x0190, f02=»,, W ! $ 0 / T W 0 - T ! 2 W "? I I I I IjO2 !0 / 2 W$0" Am6 ! bC I .4 ? "(0" _*Am #0&W 0'W 0(W X Z [ +( H I C_ 1 _ T 1 !0) ? 2 ? W #0! T %y0 %%_
0x247830…2479c4 Dummy {f00=0x017f, f01=0x0190, f02=» % 0 0 < 2 ? 2 #? 0 0 ? $ 2 2 0 %% ( @h u!He8Kh 0 % $? 0 %%A ( @h u!He Kh ( ! u!0 #'@ @ @ ( ? @ ( !"_cA $? 0 && u! !eJh ? 0 &&A % Ad@ @ #? A @ u!
0x2479c4…247b58 Dummy {f00=0x017f, f01=0x0190, f02=» ! T&Hl 0$ 0% @l0 T W 0Al0$ 0% X/ "_B 4 ! ! + "h # !T}6 ,, !0 @|Thj !! ! j !! 0 _K ! $ !A !@( "902 !T2@e@i@k !" ? 'hZ 2 !TP &6 " _ Ai_8Ae_<" v &WpAkW ! ( ~
0x247b58…247cec Dummy {f00=0x017f, f01=0x0190, f02=»6 PW (W '4 &@d@g0 @ W< %Ad0$ 0% R Ag0# ! T 0$ 0% @dW Hd 0$ 0% @ 4 ! ! L #h $ !6 00 W. "0 @| uA j !! ! j !! 0 _N ! 6 iiWJ@e !& ! h ! !P !@i ! 9# %h * !TX6 rr
0x247cec…247e80 Dummy {f00=0x017f, f01=0x0190, f02=» ! WV U ! 6 & ) 02 !<$ W302 !P(?$02 !<$ $W ( 09 # W a " Hi b " !P 6 ! "?% ! "?% ! "?% ! "He U m " 02 !<$ ?&( 0$ 0% 0 0 TJ U m ! P Q 0 , ~ d ! ~ W f ! ! 0 0" 0
0x247e80…248014 (1, 504) Dummy {f00=0x017f, f01=0x0190, f02=» c b" W !4 !Hy 03 "Hz 03 34 U j ! !0 P b ![ ! ! ( 4 0 !P * 0 "P + , * , +! * : + 5 *f * j % , + , + * W * , + c $ bch b! !Tk c! h & c"T " "Hi #L c" bc a , ach ba "T cb c!
0x248014…2481a8 Dummy {f00=0x017f, f01=0x0190, f02=» j ! W * + !!4 @k@g hZ c!T 6 %Ls 2 ''''()'))*())'''''''''+,(--'Wf b2 ''''()'))*())'''''''''.,/,,',0W? ;2 ''''()'/)*())'''''''''.',,,,,0W Ik Ak 2 1111'11))*()?1W c c! bch b!Z7!P c!WF c! c % a=hZa! c!P "5 c!W)Ag >W @gT _F
0x2481a8…24833c Dummy {f00=0x017f, f01=0x0190, f02=» c!_vIi c! b/hZb" c!T $o b/i_u c! #T $a X#a T % W , a WH c"_ c!,c ; a ac bch baZ7!T( bc*b !,b : ; W "b& cb_ c!,c _C( $ c ! & ! W Kg !!4 c! bc b "b Uj c b m b b a 4 2 % j
0x24833c…2484d0 Dummy {f00=0x017f, f01=0x0190, f02=» > & I H ] R j s 4 + C s ; d e $ ? P Q ^ c #0;=FMDADUFMV:G:A:!UF+-*:;AS AAAAAA+TTTTTTTTTTTTTTTTTTTT9 ! 1
0x2484d0…248664 Dummy {f00=0x017f, f01=0x0190, f02=» @g@i@k@ "0 ( #W H % W % 6 0 2 W ? A o W o ~ h~ ) !PL@ < ~ h~ ' !< A ! & !@ W 2 W 09 #XA _ 2 !j !! j ! !$ 0 ! ? A _ !A <
0x248664…2487f8 Dummy {f00=0x017f, f01=0x0190, f02=» ? A _ 02 !< " ? #@ T 0 P9W I 46 0 ! W 0 ! : 6 h W h 8 ? 6 02 !< " ? 02 !< " ? ( 09 ( #)0 A h U ! < h 8 ? " ? < h ! !P !W !j !! ! f "d "!U d !
0x2487f8…24898c Dummy {f00=0x017f, f01=0x0190, f02=» ? & ? ? 0 9 ? " W @g@k !Ai !? $@kAgW #@gAk@i ! j !! ! Uj ? 0 h !TL j !! ! ) ! h ! !T ! R h !U !P7 !_& h ! !X&W#@ T 0 P! W I h P Wk ~Ub~ "~
0x24898c…248b20 Dummy {f00=0x017f, f01=0x0190, f02=» ! _6j " - 8 & ?!@ P 5Ii Ik Ig A|W 4@|@ & , hZ !PDj !! 0 (P 0 !_<( 4 !, h $ !ThI|m2 ? 2 """"#$"$$$#$$"""""%&&"""#''" !_h( !? 4( !_ "_ _ ! j !! ! _ _ A| "
0x248b20…248cb4 (1, 505) Dummy {f00=0x017f, f01=0x0190, f02=» Af4 ' T O j & % . i } 8 [ D S q d E = G B 0 M a ; + ?:?T+-*:DGRNASUFFFXM/=><DGRNL!ASUFTCXE
0x248cb4…248e48 Dummy {f00=0x017f, f01=0x0190, f02=» Q ` 2 $? 6 _ 8 ? 1 T !0) T ? ? ? 2 ? )( ( SU? 2 P ? U0- T 1 ? H +? I 1 _ !0$ 0% 0 &Q %R A W Q Y A _: !0$ 0% R 0 'Y %R # Z$ Q A T< $ _3 !Q $ _> "Q A T
0x248e48…248fdc Dummy {f00=0x017f, f01=0x0190, f02=»6 H A W U0- T 1 W 4 6 _ 2 I Y W WX ' 0: 40 T@ W W: T2 U0- T 1 ! W W 6 ! W W % @ _v *W A _ ' 0: _ K "H 1 A +_ K 3I $ " W !0) E - ! _ W W W W %_d _i _ W
0x248fdc…249170 Dummy {f00=0x017f, f01=0x0190, f02=»-I !a W _ W '0: 2 W _ W _&2 W _2 0: _H0 @ ' 0: @ ' 0: 0 & ? U0- T 1 %_D U0- T 1 $_S # # " T - ! ,4 4 " '0: 0 0 T@ j & j ( % 6j !%
0x249170…249304 Dummy {f00=0x017f, f01=0x0190, f02=»4 0 0 0 "P 4 0 R 6 x W , j Wz %7a %j % !" / %j ! !WJ ! .j ! ! 0: % f ! 4 ,a j W 0: 4 4 ' 0: 0 0 %P 0 T 4 ' 0: 4 " - @ H A
0x249304…249498 Dummy {f00=0x017f, f01=0x0190, f02=» Rrm WP" 5e R 0 0 /P H m W0m 6 !W H m W m 5 f ! " _ 4 4 4 4 4 # J ^ Q f W ( 9 0 j
0x249498…24962c Dummy {f00=0x017f, f01=0x0190, f02=»CEEXPIRATION DATE:OLD VOLUME SEQUENCE NO:OLD DATA SET IDENTIFIER: 9999999999999999999-99-99999999999999999999999TTTTTTTTTTTTTTTTTTTT9999999999999999999999-TTTTTTTTTTTTTTTTTTTT9- S l % SLUTD % # EJ GODKENDT # EJ AVST[MD FRYSNING
0x24962c…2497c0 Dummy {f00=0x017f, f01=0x0190, f02=»ER: MISST[MMER JOBNAME: k BATCHNAME: l FLOPPY DISC SKRIVNING KLAR FLOPPY DISC SKRIVNING AFBRYDES 2 : # 0 - 1 : 3 5 4 U " $
0x2497c0…249954 (1, 506) Dummy {f00=0x0180, f01=0x0190, f02=» ) 9 I Y o # % ) $ 5 M @ 99999999999999999TTTTTTTTTTTTTTTTTTTT9999999999999999999999-TTTTTTTTTTTTTTTTTTTT9- S l % SLUTD % # EJ GODKENDT # EJ AVST[MD FRYSNING
0x249954…249ae8 Dummy {f00=0x0180, f01=0x0190, f02=» ~ @h0; ! P # ( + ? 0! < AhW %hZ ( !< % (: ! ! ( $ 2hZ ! !T !j !! W % 2 !X b !U ( W )W f "d "!U d ! 8T 0/ (+00 + j !! 1 ! & 0 T/0 V& $ h # ! T !
0x249ae8…249c7c Dummy {f00=0x0180, f01=0x0190, f02=»T Wo0 "T j !! !b WX WU Wb Sf !WAH{ W<09 " m W W 02 !T3m W 02 !T&m W h U ! V !!4 !"4 80 1 % 6 ''' ' y ''' "W% ," "0 We0, W "_ '_ !0, ! 2 W 0 0 (P" &
0x249c7c…249e10 Dummy {f00=0x0180, f01=0x0190, f02=»0=" 4 4 4 4 4 4 4 0> 4 0? 4 0@ 4 0A 4 4 4 @p@q@r@t@v@ @x 2 # ! "#$%&' H ! ( Hx 4 $ !"4 "!4 !!4 I @w 0 0 V # 4 A 05_ @ P 0 0 4 b !& bc 4 6 &90B A! P K 4 0C A! P K 4 0B
0x249e10…249fa4 Dummy {f00=0x0180, f01=0x0190, f02=»0 P 4 E bR * )bR* I 0C A R V 4 0B A R V K E I b )*R b R* 4 Is ! W # 4 Is " _ $ _ #`RR b | R*j |)"` 4 R%bR* | j` " |) $`R 4 `vV Ap !b " j $"` uV> av uajb " " b ( bR#j $"u b^&jb "R" b bR j $"
0x249fa4…24a138 Dummy {f00=0x0180, f01=0x0190, f02=»`? j` " "_2As ua? @u@v E 0D ? !"? 1AxW-j " - R R _9 W Iu Au "_ *" ! A 4 0E c c ? !( ! A 4 ! ! e cE j " c/ , ( j " c1 !" $ ) cE 4 -jc " c c R c R _a _) +_% 0F c c 4 ! !
0x24a138…24a2cc Dummy {f00=0x0180, f01=0x0190, f02=»d ja " $ a a RCj ""d a d`W ` (a AkIl'W a R jd " $j $"` a R `vIs `! d` 4 2 ()*+H 05_ A T|A @s C!!"C!!o - kV!0G A!R kP 0H A!R @ 4 C!!WL ^U !02 !T # !_ `! ?!` !!Rj ! "R%jG! "R! ! ! " Q E! "! [ 3@ 4 H #@ C!!"C! !T !!R
0x24a2cc…24a460 Dummy {f00=0x0180, f01=0x0190, f02=» ! Apj !'! $! P Ap R$ ! ! " T Ev "v P Ev & 0H AvR 5@ Cv!W Hp @ 4 H 4@ Cv!Q, v T Ev & #! T j ! ! $! T 0H AvR 4 j " )( j " '( ! 0 * 6 1W e / s 4 : m `!: )`W} d$ bd !bRV ! 5? jc "R&#c 1j "
0x24a460…24a5f4 (1, 507) Dummy {f00=0x0180, f01=0x0190, f02=»b1 a A c!V a ) ) !aR: ?,jR$"c bR* b "`R: Hp _ ba ` jR "` `c_V c Ap_1Ar 0 mP r$ t Ir t4(r m $R*: r` ta t( : !rRV ! ? ) r ? j` "R&Hr$ t* t` `tW0 `$jd "R` d * rdJr= t _B$t4 ,`t t` t*_- t `"_- `" "b !&R`bm &R` m?- < m@s $R*: ` a&j`
0x24a5f4…24a788 Dummy {f00=0x0180, f01=0x0190, f02=»` "R$_!% - L S Y o s | U 1 5 J H 8 x } I F P U z H r - ; a s s k 3 ' (
0x24a788…24a91c Dummy {f00=0x0180, f01=0x0190, f02=»E SYSFIL CONFIRM VALUESETSYMBOLIC: XXXTTTT9 0 * DELETED INSERTED ! ON UNIT:U i ! WITHIN JOB: k RECOVERY RUNNING. RECORD CORRECTION . FREEZING OF BATCH l CONFIRM RECORD INSERT CONFIRM RECORD DELETE: RECORD MUST BE
0x24a91c…24aab0 Dummy {f00=0x0180, f01=0x0190, f02=»KIP/DUP *O N* FF* RECOVERY OF ' : k ( : l RUNNING. " $ # " % ( + 0 6 < C J Q Y a0 j ' 3 C U i ~
0x24aab0…24ac44 Dummy {f00=0x0180, f01=0x0190, f02=» r : '6c ( ]@s $R*: Cq< RU !bR "V ! ! AvT ? )? bjd "R$ b jb!!R( `b c jc!!R) !bc V -? b _Y cbj b R*j b)*R `! ` ! !dRV &cb _ojd "R$jb!! b(_3 cb $c` &{` {c? 8? Hq ` j`!! b'$`! _ ? %_5Aq_ : R# `* a!b
0x24ac44…24add8 Dummy {f00=0x0180, f01=0x0190, f02=» ca_0AqW3jRd" "'R< !`R< ja "R$ `!< a & `a_ %6c : b " ! d %d !? !'RP < Hpl R$ "'R: d" d*j` "Rd(` HpO `!: jRd"` "'R: c`_ Cq !`R< c` ` j`!!R)* `!j` "R$ ` !Hp a1h a!R(!X _ )? Cp< b! a! !ba < b b)*R b b R* $ba & a b?
0x24add8…24af6c Dummy {f00=0x0180, f01=0x0190, f02=»d R jd " $jc " * c d ? 4 j " " & 6 jR " 4 j "R !"4 !!4 ApAt : As k # *V ) ? Ht ? l b ,V ) ? Ht ? It (? cv: a*mja " &"asz kj a"c a"j &"a `: ` a* !j ""` j $" l `v: j a"` a" uv: j a"u a"j &"a c: Uj &"* W
0x24af6c…24b100 Dummy {f00=0x0180, f01=0x0190, f02=»p `dWY a* c,j &"c f a, `R7"c* dv 05 Z #u V ! W U jd " $ uv ud d , ) v )? jo !v bo!&k bo'&l ) oV5 ! ! " : * o | Uj |)"` It ? u) ? ? : VJ! ) ? `b b W `!: R%jR""b bR* z "`R: b !bR: jR$"` "bR? bR
0x24b100…24b294 (1, 508) Dummy {f00=0x0180, f01=0x0190, f02=»c! !bc V -? b b R*b b)*R $ c b !& bcbk & ! &zb ba zb? k ? Kq %_1Aq_ : @s RHl Hk RU "#R? a$W a" k `#0 kT : j` "Ra ` Ar_ ApAs0 kTY k # *RnHp. a$*a j " $ Z : j` " &*`*K a,Hp bk & a? 0 lT$ l b ,R. a& a =bl & a? #X;! ? b
0x24b294…24b428 Dummy {f00=0x0180, f01=0x0190, f02=»@~ W 0(@mI~ Hn @f $U W I~ W I Ao 2 H~ I Ao { _ H{ 2 _ 2 b & . #K~M g "pK s_W!g& ? /_>Iz H 0(_ H %? Im)I~ h ( & g" " H I @o0 ! _ _ 0 ! %Z @m@n 0 ! _ Io @ T I~ #> ? H~ A < " ? Hm @ P&@
0x24b428…24b5bc Dummy {f00=0x0180, f01=0x0190, f02=» ? Ub & @ .P )g& Ao? AzAzT @mA *P @ ? @ @m8 @xP 2 h ( & H #: W ? Im1I~ I & h ( & H I ) ? I ) ? I H W Io ? g( " C~< )g& @z )WkI~5 / 2 $ # " #g #g &? #* " #g_> ! & #g #'_ 0 ! $PE; @}({ % H~
0x24b5bc…24b750 Dummy {f00=0x0180, f01=0x0190, f02=» g& T Io Ao #: _3Ao@ T / 2 $ % # #g W ! #g #'0 ! &_ I~ Jo K _@ @ !0(@o ( P W 6 - _ Hm 0 ! A %V @ _ @ "@m0(2 % &'''( " / 80 !"W 0 ! @m h ( & H I ?)Ao( ! ?" ? AoW I~ Co8 C < Cz8 Ao " 2 *0 ! !0
0x24b750…24b8e4 Dummy {f00=0x0180, f01=0x0190, f02=» I ?) g( " @oW $ 2 . ): @oA ?/C < Hz @ T Cm< Io I~ #V - ? @o@z Ub & 5 +@mA{ *V#( - 1 0 ! 0( { &{ mU_"@{Ao? m 5 + p!0 An ! 6 Ba4( () % ) _ W + 2 0012A #W 80 _5 _:A @{0 $} !4 @{Az 'P ; -pA{_% !g' @m?3?4
0x24b8e4…24ba78 Dummy {f00=0x0180, f01=0x0190, f02=» f ^ B y ~ | | % J < j ) v r ` P k 8 ' ( s g l v { q D
0x24ba78…24bc0c Dummy {f00=0x0180, f01=0x0190, f02=» " %0 .0 / * 8 h h? @o@z Ub & 5 +@mA{ *V#( - 1 0 ! 0( { &{ mU_"@{Ao? m 5 + p!0 An ! 6 Ba4( () % ) _ W + 2 0012A #W 80 _5 _:A @{0 $} !4 @{Az 'P ; -pA{_% !g' @m?3?4
0x24bc0c…24bda0 Dummy {f00=0x0180, f01=0x0190, f02=» $ J @ 2 A ! ~U ! & !02 !T J _ : I !_) _7j ! ! h~ !X8H !( @ h~ U !j~ ! ! !P !02 ! N_m ? j !! '( !1j !& !j !! ( * j +& 'j !! ( j ! ! ! ? jy " $ j !! 1 j !!
0x24bda0…24bf34 (1, 509) Dummy {f00=0x0180, f01=0x0190, f02=» !W h ! !Z< ") j !! 1j !! 2$ * _b " % ? j !! 'I *A ( $j ! !0 ^ h^ !T f^ ! !j^ !U !j '! !j !! ( _N ! ( + ~UWhj !! ' !QU I N! ! b ! W:0 ^ h^ U !P ! j !!^ b ! f^ ! !A j !
0x24bf34…24c0c8 Dummy {f00=0x0180, f01=0x0190, f02=» W - !"4 !!4 j !!^ ( !"4 j ! j !! ( j (! ! _ f^ !0 ^ !j^ !U !!4 6 W U j !!~ W j !! (W Uj ! j '!!! !j !!~ j (!~ _+( # j (! !j !!~ 4 Ii 1 W 1 4 ( #M0 T ! ! P.W< !0 P) * 0 *
0x24c0c8…24c25c Dummy {f00=0x0180, f01=0x0190, f02=»CHFIELDLINE START999999FORMATLENGTHNUMBERRECORDSTART:(#A:...)(#G:...)(#V:...)123456789 1234567890CORRECTIONDEFINITIONGENERATION VALIDATION ACCUMULATION 1 AAXXZ9ZZXXXTTTTXE+XXZZVZZZ : e ` m SIZE: f ` ! " : + " . " OF POOL-UNITS: D # 1 2
0x24c25c…24c3f0 Dummy {f00=0x0180, f01=0x0190, f02=» & -ACCUMULATOR:A m ( . SPECIAL HANDLING: @k - ' , & o@ ! p@ " U 21 USER + j # * : F $ $ % ! : & & . OCCUPIED # ! : E ( KEYED INPUT ( Y /N/C): l@ ! . MINIMUM ! > : @i ' M
0x24c3f0…24c584 Dummy {f00=0x0180, f01=0x0190, f02=»(Y/ N ) : @t@ $ INITIAL CLEAR ( Y /N): u@ % . SPECIAL HANDLING: @k - ' , & 2 . % o@ ! p@ " U ! ' - 3 9 ? E M U ] g q { 0 0
0x24c584…24c718 Dummy {f00=0x0180, f01=0x018e, f02=» IDENT P:S012 * & r : '6c ( ]@s " * & - $R*: Cq< RU !bR "V ! P * & K ! AvT ? )? bjd "R$ b j ~ * & i b!!R( `b c jc!!R) !bc V -? * & b _Y cbj b R*j b)*R `! ` ! * &
0x24c718…24c8ac Dummy {f00=0x0180, f01=0x0190, f02=» * & R# `* a!bR`1 a `1 a! a+ "% * & R? : !%RP RU `* a!b a 2 * & ; 1R` `1 a! a+ ? ApWg R bR(" 1b ` * & Y R* "cR? a!: jR$"a "cR * & w : ca_0AqW3jRd" "'R< !`R< * & ja "R$ `!< a & `a_
0x24c8ac…24ca40 Dummy {f00=0x0180, f01=0x0190, f02=»jRd"` "' t * & R: c`_ Cq !`R< c` ` j`!!R * & + )* `!j` "R$ ` !Hp a1h a!R(!X @ * & I _ )? Cp< b! a! !ba < b b) n * & g *R b b R* $ba & a b? * & ? ` a*Hs `W ` V ! 0W< a * & "j " &h
0x24ca40…24cbd4 (1, 510) Opaque[0x194]
0x24cbd4…24cd68 # DirEnt {nam=»NJLINK«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x07c0, f03=0x0000}
0x24cbd4…24cd68 IdxSect {
0x24cbd4…24cd68 f00 = 0x003e // 0x24cbd4 @0x0
0x24cbd4…24cd68 f01 = 0x0002 // 0x24cbd6 @0x2
0x24cbd4…24cd68 gno = [ // 0x24cbd8 @0x4
0x24cbd4…24cd68 [0x00]: C0x003e.0x0.0
0x24cbd4…24cd68 ]
0x24cbd4…24cd68 }
0x24cd68…24cefc Dummy {f00=0x003e, f01=0x0190, f02=» PSCR PPRT NJLINK PMOV CNFP,/A,CON10 " PPRT /A < PSCR J PTRA DEDDIV,NL V PKPF /O l PNOD C z PINC PTSDE PINC DEDISC PINC DELOCK PINC DEAPPU PNOD R PINC DKRUT1 PINC DKRUT2 PINC DK
0x24cefc…24d090 Dummy {f00=0x003e, f01=0x0190, f02=»RROR PNOD R PINC DENVAL PINC DEGENE , PINC DECOMP > PINC DESTAT P PINC DENT02 b PNOD R t PINC DE10ST PINC DE11ST PINC DE12ST PINC DE1201 PINC DE14ST PINC DE15ST PINC DE30ST PINC DE31
0x24d090…24d224 Dummy {f00=0x003e, f01=0x0190, f02=»RT PINC DEPRFG PINC DEUNPF PNOD R . PINC DEPROC < PINC DEVGAC N PINC DEATTF ` PNOD R r PINC DE40ST PINC DE50ST PINC DE60ST PINC DE70ST PNOD R PINC DECONV PINC DCTASK PINC DEFDSC
0x24d224…24d3b8 Dummy {f00=0x003e, f01=0x0042, f02=»=M:DENJ,MU=M:DENJ,A=DELINK,C=CNFP,CU=CON10 PASG /E0,TY10 2PROC < PINC DEVGAC N PINC DEATTF ` PNOD R r PINC DE40ST PINC DE50ST PINC DE60ST PINC DE70ST PNOD R PINC DECONV PINC DCTASK PINC DEFDSC
0x24d3b8…24d54c Dummy {f00=0x003e, f01=0x2008, f02=» MU=M:DENJ,A=DELINK,C=CNFP,CU=CON10 PASG /E0,TY10 2PROC < PINC DEVGAC N PINC DEATTF ` PNOD R r PINC DE40ST PINC DE50ST PINC DE60ST PINC DE70ST PNOD R PINC DECONV PINC DCTASK PINC DEFDSC
0x24d54c…24d6e0 Dummy {f00=0x003e, f01=0x0190, f02=» SYSVOLSYSVOLSYSVOLSYSVOLSYSVOLSYSVOLSYSVOLSYSVOLPFJESVCHM/=><DL!ASUFTCE+-*:;&V?'ZGRNX()MEVTFCAB/,LRAPTXZY+S,.><0-VEX * >0 0 0 M U t ~ 0
0x24d6e0…24d874 (1, 511) Opaque[0x194]
0x24d874…24da08 # DirEnt {nam=»TEST «, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0798, f03=0x0000}
0x24d874…24da08 IdxSect {
0x24d874…24da08 f00 = 0x003c // 0x24d874 @0x0
0x24d874…24da08 f01 = 0x0030 // 0x24d876 @0x2
0x24d874…24da08 gno = [ // 0x24d878 @0x4
0x24d874…24da08 [0x00]: C0x003c.0x3.0
0x24d874…24da08 [0x01]: C0x003d.0x0.0
0x24d874…24da08 [0x02]: C0x003d.0x1.0
0x24d874…24da08 [0x03]: C0x003d.0x2.0
0x24d874…24da08 [0x04]: C0x003e.0x1.0
0x24d874…24da08 [0x05]: C0x003e.0x2.0
0x24d874…24da08 [0x06]: C0x003e.0x3.0
0x24d874…24da08 [0x07]: C0x003f.0x3.0
0x24d874…24da08 [0x08]: C0x0076.0x3.0
0x24d874…24da08 [0x09]: C0x0077.0x0.0
0x24d874…24da08 [0x0a]: C0x0077.0x1.0
0x24d874…24da08 [0x0b]: C0x0077.0x2.0
0x24d874…24da08 [0x0c]: C0x0077.0x3.0
0x24d874…24da08 [0x0d]: C0x0078.0x1.0
0x24d874…24da08 [0x0e]: C0x0092.0x1.0
0x24d874…24da08 [0x0f]: C0x0092.0x2.0
0x24d874…24da08 [0x10]: C0x0092.0x3.0
0x24d874…24da08 [0x11]: C0x00a8.0x3.0
0x24d874…24da08 [0x12]: C0x00a9.0x0.0
0x24d874…24da08 [0x13]: C0x00b7.0x2.0
0x24d874…24da08 [0x14]: C0x00b7.0x3.0
0x24d874…24da08 [0x15]: C0x00b8.0x0.0
0x24d874…24da08 [0x16]: C0x00ba.0x3.0
0x24d874…24da08 [0x17]: C0x00bc.0x0.0
0x24d874…24da08 ]
0x24d874…24da08 }
0x24da08…24db9c Dummy {f00=0x003c, f01=0x0190, f02=»C jX rCR 6 R I |R R ~R ] R h R s LR } R R R 6R (R R b pCB1 @
0x24db9c…24dd30 Dummy {f00=0x003c, f01=0x0190, f02=» @ `@ @
0x24dd30…24dec4 Dummy {f00=0x003c, f01=0x0190, f02=»
0x24dec4…24e058 Dummy {f00=0x003c, f01=0x0190, f02=» T1 p L h d B . & 0 n @ 8T1 x *
0x24e058…24e1ec Dummy {f00=0x003c, f01=0x0190, f02=» > P P h 0 J : $
0x24e1ec…24e380 Dummy {f00=0x003c, f01=0x0190, f02=» F D@ D@ @
0x24e380…24e514 (1, 512) Dummy {f00=0x003d, f01=0x0190, f02=» . D Z p - r 7
0x24e514…24e6a8 Dummy {f00=0x003d, f01=0x0190, f02=»VOLPFJESVCHM/=><DL!ASUFTCE+-*:;&V?'ZGRNX()MEVTFCAB/,LRAPTXZY+S,.><0-VEX * >0 0 0 M U t ~ 0
0x24e6a8…24e83c Dummy {f00=0x003d, f01=0x0190, f02=» 0 0 0 " ( . F @ B D F H J L N P R T V @ f $ B @
0x24e83c…24e9d0 Dummy {f00=0x003d, f01=0x0190, f02=» T > < > F0 N D2 x * f &
0x24e9d0…24eb64 Dummy {f00=0x003d, f01=0x0190, f02=» F Q 0 [0 0 ^ e f h n t ~ ^ dC n 3 1 lC 0 0}0 o0 oA T 0
0x24eb64…24ecf8 Dummy {f00=0x003d, f01=0x0190, f02=» n_r 4 # 6 P 7MW (j "M ( 0 P 0 * 1W 'W 1 1 1 1 v j !!Ov v" Cv 0 "" VvW 0 0 )W`0 "" Vv 0 !!W6 'WH ! W+ " W% h * h `h h h 2` W 4 !4 "4 $4 & #4 H
0x24ecf8…24ee8c Dummy {f00=0x003d, f01=0x0190, f02=» $0 T 0 0 W 0 W 0 4P +W 4 0 4 j !! % !j !! 0 ) 4 4 @p@q@r@t@v@ @x 2 # !"#$% H ! ( Hx 4 $ !"4 "!4 !!4 I @w 0 0 V # 4 A 0 _ @ P 0 0 4 b !& bc 4
0x24ee8c…24f020 Dummy {f00=0x003d, f01=0x0190, f02=» #M0 T ! ! P.W< !0 P) * 2 *#U 1 * * 4 & !4 _ 4 J 2 2 ' 8' 4 3 3 5 5 3 4 & 3 , , ( "3 h n 'b).5 ' 2h4*& " : T& % ( d'V'Z' h 4& D t z a at 4B4h % [ a ~ $
0x24f020…24f1b4 (1, 513) Dummy {f00=0x003d, f01=0x0190, f02=» B " Y # , 6 Q d F J S:T JOBPTS GETDATAMODE NO.:ENTRYTYPE:999999FORMATSEARCHVERIFY CREATEELEMENTNAME: TPROGRAM:REL 10.0SIZE OF DEFINITION VALUE-SETS70 CONVERSION10 SUPERVISORY FUNCTIO
0x24f1b4…24f348 Dummy {f00=0x003d, f01=0x0190, f02=»
0x24f348…24f4dc Dummy {f00=0x003d, f01=0x0190, f02=»OM DATA-ENTRY U h d ' . ) e e @ " f d f @ , ( f d T g T ( f ! ~ ! + * h dG 0 20 $ - - 30 - - 40 ! 50 % 60 & /
0x24f4dc…24f670 Dummy {f00=0x003d, f01=0x0190, f02=» ! ' . 5 < D L T ] f p { ( < S k ! & A C g g f T 8 8 & 8 &9B %W _ 6 8 F C W ( = Wn
0x24f670…24f804 Dummy {f00=0x003d, f01=0x0190, f02=» 8 & X X X* T Z0 I R < _ <h =_H ^L _ _R 8 & G _d 8 F '_p R : <<H P < : 8 8 & R P _v _| V V Q WR _< _B 6 8 C 8 ( B T B $ ' Y
0x24f804…24f998 Dummy {f00=0x003d, f01=0x0190, f02=» " ' ""? 99g! ":e" B =_ _f 8 8 & 9_ 6 @ # 8 C _ 8 #0P T # P W & ?_ . 8 ! P& P P P T 8 _. W P 8 _> 8 8 8 8 P 8# ' Y = # " _ _ _ _
0x24f998…24fb2c Dummy {f00=0x003d, f01=0x0190, f02=» B X _ W & Y < * C _& 6 8 8 P ) 8 B & 9 8 & 9 ( B +_ @ t P V E $ E & E ( E 0 E , Y E . DD 8 2 X ' 8 X P &V Y , X Y / X Y ). 8
0x24fb2c…24fcc0 Dummy {f00=0x003d, f01=0x0190, f02=» T P Y P 8 V E DD 8 8 H P H P V V V E DD _H ` ^ ` 9C : T _4 4 !00Z !99Y ! : 6 2 ' 8 8 & C C( T #W T # C C 5j 8 #0
0x24fcc0…24fe54 (1, 514) Dummy {f00=0x003d, f01=0x0190, f02=» ! X T C DD %2 %| * Y ( x P Y * " x y Wv X " ! X X . 8 &: 2 X 0P X T 5 ! Y * " y X V& X ( ) x C ( Y * X Y , ) X X C & C C ( B Ph9 R^9 $4 X
0x24fe54…24ffe8 Dummy {f00=0x003d, f01=0x0190, f02=» D! ! ! ! "J$B$P"z X X * $" ~_> @ Y X * ! _R X !@XX y X # x V y X X * ) P P 1 _ 1 " X * X X * $" X D % " X # X * ) y _< X # X * y ) X 1 1 X !@T X $ " P y _ x T $ $ X
0x24ffe8…25017c Dummy {f00=0x003d, f01=0x0190, f02=» x Tf B $t9 R 9 $4 X ! T $ _ y C Q " T * ) X ! % X X ! x Y~ Y _ X "@P B R y C B P 9 V $ _F9 VV X ! T X !@X y C _d y C C X !? x P Q( B y " y $ c 2 C _$ _ $ y
0x25017c…250310 Dummy {f00=0x003d, f01=0x0190, f02=»% # x X X # ) _ B $ C ) : + * X ) ) ( 3f 8 ( 3r 2 : B %. C _J + . 2 X 9 V ! P @ Y 8 #0 H Y Y . X ! H : 7 8 % 8 % " 8 % $ : ! P # P H : 2 2
0x250310…2504a4 Dummy {f00=0x003d, f01=0x0190, f02=»2 &: 2 3f ' 8 ! Y 0T V 3r ; : 2 2' I 8 " P # P H R P P X ' ' DD X _ X ' _ X '?_ 2 8 ! P # P H X ' 2 X ! 2 2 2 X " 9b! X :c 2" I H'8 2
0x2504a4…250638 Dummy {f00=0x003d, f01=0x0190, f02=»+ W Y 0 * , 6 62 2 9H Y * )nW W )^ 62 X 0T I X 2Z X +" X *9h P: R Y >_ P R P R I Y +Wl ) Y + ) * WZ T R( ) ( WJ Q W Y + U Q I Y Q P W W Y ( * C 2 X *!
0x250638…2507cc Dummy {f00=0x003d, f01=0x0190, f02=» ] 6V : )^ X +! I X +! U 9K Y ( Y + * , 2 9H Y * 2 Y ( Y > Y + 8 ) 4 0 7 ) 6 2 X 0 I : ! P # T : H C ( C : C B _( _ X ) * P ) B _N ( 3f X D D
0x2507cc…250960 Dummy {f00=0x003d, f01=0x0190, f02=»> ? >F,F- - F ,8F ?< W W X 0Q + + Y ( Y *P 62 =T * X <' X X = 2 X *# X ( " Q " P X 0PR V _` " PL T " Ph 0 3rWp " P Y 0] Y (_z P P T0 " X _@ " P" 6 X *# P B 1 6 W I " P
0x250960…250af4 (1, 515) Dummy {f00=0x003e, f01=0x0190, f02=»F ?&? ?&? , F^F F ?x> ? >F,F- - ? ,8F ?< 2 Y . Y ,W 2 Y . X ( X ." PV X 0RzT$ Y *P U :H 2 , K T ?bW ?X X . X 2QP Y *T2 ?N : " P$ X 0U X *# P P T " T : " I Y . 0 Y ( > 2 Y *T " T ! 1 W !
0x250af4…250c88 Dummy {f00=0x003e, f01=0x0190, f02=» ! P $ ! P %_ ?N : 2 V Y " X .9H $ F" P & X ( " Q Y +Q R " P W " U / Y , " Q " I X . X 0R P" X *:h P PD I ) Y (W X *:h Pt Pn P P I 0* P< 0rWZ X ! X $" P<Q X (# P2 X # :!
0x250c88…250e1c Dummy {f00=0x003e, f01=0x0190, f02=» X *:h XF XL X (!@T @ Y ( X , Y t X 0 l 0r_r X ( P Y (_ P* 0J P| Y 8 -F X 8 X $ 2 Wh_ " P X ( T X & V H "@TF 0J P6 V Y X (P 2: 0 X (P 0 2 8 Y 0 X 2P X 0V _z Y ( " T
0x250e1c…250fb0 Dummy {f00=0x003e, f01=0x0190, f02=» X $ Y X " Y X & Y X < Y @ : Y : 2 X : X ( T X & V H " V Y : X $ 2 X : 3 : X Y " X Y $ X Y & X @W X < Y = " 3f ! T W F ! P =H F 1 X *! T" X y 4 @ X (T y 6W4 X y 6W, @ X (P W" X &
0x250fb0…251144 Dummy {f00=0x003e, f01=0x0190, f02=»P V Y 8 W Y ! P 7 W V Y 2: V Y : 8 ?& : 2' " P T : W 7 ? : 20 : 2 62 2 C 2 X 2 : "0P ' Q W ' Y : W 7 V > 2 Y Y Y < V E DD B X _ v
0x251144…2512d8 Dummy {f00=0x003e, f01=0x0190, f02=» =' V W V Y =P 3" : ( DD 6 "R V I DD 6 ( T _& @B X, @B _6 8 #0 P I0 ( DD 8 #0 T 8 #0 T V DD I0 W 6r 5j 4H/ 5n _ 6 7 7H P 8 <H : 4pW
0x2512d8…25146c Dummy {f00=0x003e, f01=0x0190, f02=» 7d 7 7H 8 P _D 6 B 8 'W 6 ( Wb 8 7X 6 ( 1W" C C C " I ( ' P. 5 P$ "! P B W B % P C + A DD 6 I "%@P "% P& B C C 4 "5 # B P B
0x25146c…251600 Dummy {f00=0x003e, f01=0x0190, f02=» ( ' P 6 I : 6 7H % Y 7 C 8 & H H C 8 "!@ I : B T T T V : 2 ' W 2 6 2 @ " T # ' ?D : W.' #? :j V H I$ ;D:B " : _, 8 C :
0x251600…251794 (1, 516) Dummy {f00=0x003e, f01=0x0190, f02=» :l:d:h 8 W W P W 6 2# : W4 @ E7 " T> ; [ # :j:H 2 T Z L L7 D V, W # :j L7 E V $ W D V L7 , W 6 2 : W$ " P& Pd" # :j ;b Wv " ;d# _ [ v
0x251794…251928 Dummy {f00=0x003e, f01=0x0190, f02=» (V ; H [ [ [ 8 Z (;AR H WD H H Z H # : ; 6 H 8 : Z L # & H H & Z 4 : : Z 4 " 2@P : [ [ 8 & @ ! P H Z H [ 6 [ Z 7
0x251928…251abc Dummy {f00=0x003e, f01=0x0190, f02=»:t : ; V Y : 2! : 6 2 : W& " # :j;b ; : ;f" #?_"$0#0;b <~ P P PF P 0 - P0 _ 4 V W Q P ) P 9_ &" ! 9 : & P Q ; ,^ , < ; # ; [ _n' d
0x251abc…251c50 Dummy {f00=0x003e, f01=0x0190, f02=» Y 7 Y& P Z,;D 9_8 8 _< V W YL T 9 : H &9d! + P( & T 9d! T 7 V Y " WJ Q V V 7 Y P._& & Q 9d! )0 + P 7 Y Z $ _ : !! gg++ L 33
0x251c50…251de4 Dummy {f00=0x003e, f01=0x0190, f02=» K V K : 8 =d =T = 7 V > >N > V Z P 2 " T W "@T '?W "? H= " K :e J J " J _Z Z > [ Z P 3" [ V H 7_ Z > @ ! P 3" Z 7 Z Z
0x251de4…251f78 Dummy {f00=0x003e, f01=0x0190, f02=» Pn 4 ! Th_ PX 4 WT K ? WJ ?^W +_ ?x ?t K W. _& X 6 W X & 6 J K : V : J T H 1 : + 8 [ [ < !AAP !TTT W !**T * [ R !FFP !EET W IAj 6 * B Z 9 ! ; *Xt 8
0x251f78…25210c Dummy {f00=0x003e, f01=0x0190, f02=»" X># ; W )0_B J R( Z R 4! P ;)0 9U ? H Z ] 49d_4 _HU ; :X _ _ z 9d! ) ^ _ ,_ 8 _ : W 8W @" 8 !++P !-- z ;$# + ^" _( |`. PT*AXYZ9 7 #0 T & C C : A C C : &
0x25210c…2522a0 Dummy {f00=0x003e, f01=0x0190, f02=»B : PB B PR LB R R _ R _ # Q R V > _V X^ ' h P P & 1_ P 1_ , @ - R T U :J a B@ ' d w5 1 B 7 #0 T B ' : H B B
0x2522a0…252434 (1, 517) Dummy {f00=0x003e, f01=0x0190, f02=»i<h h`h i<h:DZF F F F DZDZDZDZ 3& W V 7 @ ! P 3" P W C @C R H L$ D pVP 9c DC` 8 7 Q CnW c, :aW, @C YRP G @C ]^ HP @C ]h G _n I0 2 P V W< _ 2 # ;B E V T
0x252434…2525c8 Dummy {f00=0x003e, f01=0x0190, f02=» T W V P D $ V 6 V % V E @ ' T 2 % 7_ 2 # PH L nPB 8 2" &] Y $! 6P Q $ T 9BP D _ _ W D 6 @ " T 7 $ V P 3" W _ C. D6 : V & Dz HC 'W
0x2525c8…25275c Dummy {f00=0x003e, f01=0x0190, f02=» : F : P & _ &X _ : I : : : F p *1 TID ADDR OP CR LVL MODIFIED OPERAND CREDIT 5.0 TRACE @F P ( _ AF AF F ( @F ' $ * AF T( F (
0x25275c…2528f0 Dummy {f00=0x003e, f01=0x0190, f02=» 2 F L @ # T R L 8 L & L G2Q F AF W> G6 F V D ! )0 1 @ # T 6 V ^ L AF H C F ( ( AF : Wp Wl Wh Wd W` W WX WT WP WL WH WD W@ W< W8 W4 W0
0x2528f0…252a84 Dummy {f00=0x003e, f01=0x0190, f02=» 4 L 4 $ AF F U 4 - _ H F @F Mr C ILLEGAL OPERATION MIXED ARITHMETIC ILLEGAL TYPE ODD WORD ADDR MISSING ENTRY ILLEGAL REQUESTED LENGTH STACK UNDERFLOW ARITHM OVERFLOW STACK OVERFLOW INDEX OVERFLOW ILL INDEX TYPE DIV BY Z
0x252a84…252c18 Dummy {f00=0x003e, f01=0x0190, f02=»ILLEGAL FORMAT CODE NO FIX BUFFER ALLOCATED FIX BUFFER NOT ALLOWED ILLEGAL CONTROL CODE ILLEGAL INDEX VALUE FORMAT CONDITIONS CHANGED ILLEGAL PARAMETER LENGTH ERROR DATASET BUSY ILLEGAL DATASET REFERENCE TOO MANY KIA/NKIA STACK LEVELS DISC ERROR;
0x252c18…252dac Dummy {f00=0x003e, f01=0x0190, f02=» @L^P ( _ @N P @N Pj Pf M V $ $T$ D BR V T D P T D @PL E @W . @N`P$ M Nb $ $P BT , D E @ : @L P AL H AN W TW V AL^ N N V AN TB( PH( AL^ N @N V P ( R W L` TB( P< :
0x252dac…252f40 Dummy {f00=0x003e, f01=0x0190, f02=» : T REFERENCE TOO MANY KIA/NKIA STACK LEVELS DISC ERROR;
0x252f40…2530d4 (1, 518) Dummy {f00=0x003f, f01=0x0190, f02=» @L^P ( _ @ P @ P P V $ $T D R V T D P T D P E W . @ P N ` ( ( ` ( O
0x2530d4…253268 Dummy {f00=0x003f, f01=0x0190, f02=» O _ `$ `*W _ , `J 9a ` @P P `D ` `* `@ N _ @N P `$ @N _ AN AP ah AP" "V # ( O `. AP P UW T `J `* AP P ` Q ] Qx @Q Q =SF WSV QT MT /V, SW IWr JX0 TX YX GX LY PY0 HY@ RYZ VYh KZ@ `* `<_ Q
0x253268…2533fc Dummy {f00=0x003f, f01=0x0190, f02=» ] RH S" ,Rh +R -R ;R :S (R .S O _XX " , AQ L AQ L @ AQ AQ _T [b X ,T [b X ) AQ AQ `^ ] R S" ;R :S S( @Q P AQ 1+X AQ _ S( @Q AQ @Q AQ @Q AQ @Q AQ _ ] AQ @Q V ] S( " @Q T " @Q @Q P AQ AQ "
0x2533fc…253590 Dummy {f00=0x003f, f01=0x0190, f02=» @^ AP( `H U W `8W 0 `. A^ `$W `$ A^ A^ @^ _ W `J @P4 AQ @P. AQ _x O AP" PZ @Q & `H 0 _ P P `@ _ P @R `D ` U _ `8 `$ ` `J_T `. `$ T Q, 4 _ T P `@ _ W T @R `D ` W
0x253590…253724 Dummy {f00=0x003f, f01=0x0190, f02=» `. @Q AP,P ^ W @Q T @Q Z V A^ @ah Q, @^ AP& `$ _ `$ ^0 `$ `$ ^ _ A_ Q, @Q R V ;a Q `._ `^1 Q, `8 @^ AP&_ 0 _ `* AV$ Q P 3P Q C @Q P @Q 1 @P"P @Q Q @ @Q Q P " Q,T @P$ AQ @
0x253724…2538b8 Dummy {f00=0x003f, f01=0x0190, f02=» Q @Q P @Q 1 Q, `8 `$ A^ @^ _ `H @P0 AQ @P* AQ _ @P P @Q V @N ( Q V " @Q T @N ]^TP @Q P @Q A^ AP. AP4 S `H 0! ` `* Q T @Q P @Q " 1 Q, Q Px @Q @Q @Q @Q T @N (RX A^ *9l! P2 S W &9d
0x2538b8…253a4c Dummy {f00=0x003f, f01=0x0190, f02=»X U W _ _ "P` @Q @Q T @N ( PF R % < < `H ! ` `* Q T @Q P @Q ! 5 = Q, Q Q Z Q,P @Q Q [$W" M [V M $ B % AM Q,T @N W @Q AP Q @Q R AN AP AN @N ( Q, AP Q @N Z Q @Q @Q T
0x253a4c…253be0 Dummy {f00=0x003f, f01=0x0190, f02=»N Y V ] NbRt ) I I @ I B AN`W P Y RV )W Nb [V AN` Q, Nb , AZ AZ :B AZ Q (P _ H B @Q T @N H AZ " Q EQ GT LT NE NG NL P2 @P R* `^ ] Zx @Q P Q Zl ( Q, Q L U M ( R ( @Q V @N H
0x253be0…253d74 (1, 519) Dummy {f00=0x0076, f01=0x0190, f02=» 1 @Q Q Q @ AM " M ( R$ ( @Q V @N H B ) I B " Q $ % " `^ # C C C C *T W #T AQ `^ _ P PR (T [b Pl ,T [b P^ )TX `^ ] AQ T @N (R: ?aP *:l" T* & W T C B B B B
0x253d74…253f08 Dummy {f00=0x0076, f01=0x0190, f02=»] P ,R PLW~ Pz9AR Tr L Qj W" P` L $ QV L % QL ]B ]B W C " _* Q P Q V _ W " A]Z < V " F <P W* @P " P ( Q
0x253f08…25409c Dummy {f00=0x0076, f01=0x0190, f02=» " , , A^. A^.:B A^.Q (P _ # # H A^. " A_ A_ 4 `$ _ 4 @_ I^ T A_ A^ A^ T A_ T ^ @Q R V A_ N @^ " P P (T @P ! PD @Q T @N ] ^ Q";H @^ ;d ^ ( @^ "( Q @^ " :S :X :Y :Z
0x25409c…254230 Dummy {f00=0x0076, f01=0x0190, f02=» FQ 0:D A_ `^_* 'T `^:H_ A_ " A_ A_ 4 `$ _ T A_ A_ " , _ "! R _U .WV A` : ` A` " 9d ` ! R :W& `J W `J W W ?W :W .W / aa Aa T ` " @` T ` A`| ` ` (
0x254230…2543c4 Dummy {f00=0x0076, f01=0x0190, f02=» 1a a Q (P _ # # H A " A A 4 4 @ I T A A A T A T @ 8 a ( DD 8 a ( _ R #0T : I I0 W H # H " T & T + :
0x2543c4…254558 Dummy {f00=0x0076, f01=0x0190, f02=»Q P [ " X $ P TF R R ` ; <( Q P # W " <! =# T6W = Z P _ V ^< `_@ R Q <# =_ P :" P * U P 1`! T "# 9e! # K : #0 H P8" T * & : * & !`P :J +_ +Q
0x254558…2546ec Dummy {f00=0x0076, f01=0x0190, f02=» P , V W Q P W $ W V P T V W Z : V ) 0 H !0 H " TV *V &V : V S W P 9 S W _ V P W T V E + : & 6 H [ [ [ [ $ [ [ >h [ [
0x2546ec…254880 Dummy {f00=0x0076, f01=0x0190, f02=»_X z R z ! P 1` { V (9h T W z 9e! I Z ! : 4 P 9 59D_ " P P [ ! :d" 5 : 0 H !0 H " Tz *V &V PP= ;@ R P W ;a=a P " R & R V T W V E + :
0x254880…254a14 (1, 520) Dummy {f00=0x0077, f01=0x0190, f02=» h a z " ! ! R 2` { z " P ! R 2` { 1 ! { [ Z h c Q h e P _ T { [ h g [ Q@ [ h a { R [ _ h a h e Z ! Z $ Z %_N [ Q* h a h c R [ Z { h a z 9e! W Z :
0x254a14…254ba8 Dummy {f00=0x0077, f01=0x0190, f02=» = : { : j0$0T i Pb 9 _ j0$0T [ j0$0T Z : R$ P $ 1T Y TdW 5 _& : j0$0TH $ R W R # P W ) V E jH$0T Wr W W I0 j0 [ jH
0x254ba8…254d3c Dummy {f00=0x0077, f01=0x0190, f02=»#03 T jP kT T : & 9! " : $ : T W V 9! R W Q< R W Q0 R W Q$ : i 7 #03 T $_X i _^ W I0 a e Z ! Z $ Z %_N [ Q* a c R [ Z { a z 9e! W Z :
0x254d3c…254ed0 Dummy {f00=0x0077, f01=0x0190, f02=» | 7 F l p t x6 &90 A! P K 4 0 A! P K 4 0 Av P K 4 0 Av P K 4 0 Av e 4 0 Av e 4 @ 0 >0 P 64 <0 P 54 0 P A 4 !0 P 34 E bR * )bR* I 0 A R V 4 0 A R V K E I b )*R b R*
0x254ed0…255064 Dummy {f00=0x0077, f01=0x0190, f02=»$"` uV> av uajb " " b ( bR#j $"u b^&jb "R" b bR j $" b 5W j ""u j $" j &"* u`Hp *? v? u? ` _ u) 5 ? j` " $ `: 0 ja " " a ua j $" ` )? u`? j` " "_2As ua? @u@v E 0 ? !"? 1AxW-j " - R R _9 W I
0x255064…2551f8 Dummy {f00=0x0077, f01=0x0190, f02=» -jc " c c R c R _a _) +_% 0 c c 4 ! ! ! " V 0 _ " b )*R b R* !4 "bR * )bR* & 4 @k@lja " "j` " $(` AlW= ` Rgjd " "j ""a (a # d ja " $ a a RCj ""d a d`W ` (a AkIl'W a R jd " $j $"` a R `vIs `! d` 4
0x2551f8…25538c Dummy {f00=0x0077, f01=0x0190, f02=»! "R! ! ! " Q E! "! [ 3@ 4 H #@ C!!"C! !T !!RT "!R0" A!R 4 H 0 _ #! R R W A T A @p Cv! Cv! H Vv0! Av Tg `vP Ap ?v` #! RTj v " % j !! jGv " ! Apj !'! $! P Ap R$ ! ! " T Ev "v P Ev & 0" AvR 5@ Cv!W Hp ?@
0x25538c…255520 Dummy {f00=0x0077, f01=0x0190, f02=» / s 4 : m `!: )`W} d$ bd !bRV ! 55? jc "R&#c91j " b "&m j (" ) bRc* c*jR&"c "dR? b W jd "R$ d U d!: jR$"d "bR c* REjR""b jR$" _` b{ ! a ja!! b(jR(" b1 a A c!V a ) ) !aR: ? jR$"c bR* b "`R: Hp _ ba `=jR "` `c_V c Ap_1Ar 0 mP r
0x255520…2556b4 (1, 521) Dummy {f00=0x0077, f01=0x0190, f02=»t` t*_- t: `"_- `" Ab !&R`bm &R` m? < m@s $R*: ` a&j` "R&fRa* `*jR&"` "`* @s R: " R: ab !aR: "V )( ) )? j` "R$jR " "aR: a! ` % !`R: b "R A9 `!j` "R$_! r : '6c ( ]@s $R*: Cq< RU !bR "V ! 6 ! 7 AvT ? )? bjd
0x2556b4…255848 Dummy {f00=0x0077, f01=0x0190, f02=»{c? 8? Hq ` j`!! b'$`! _ ? %_5Aq_ : RF `* a!bR`1 a `1 a! a+ "%R? : !%RP RU `* a!b a 1R` `1 a! a+ ? ApWg RBbR(" 1bR* "cR? a!: jR$"a "cR: ca_0AqW3jRd" "'R< !`R< ja "R$ `!< a & `a_ %6c : b " ! d %d8 !? !'RP 5<
0x255848…2559dc Dummy {f00=0x0077, f01=0x0190, f02=»_ )? Cp< b! a! !ba < b b)*R b b R* $ba & a b? 4? ` a*Hs `W ` V ! 50W< a"j " &h a& &V! a a! a j " $ ` _E )W a&jb " a 4 d"@s$ " As d R jd " $jc " * c d ? 4 j " " & 6 jR " 4 j "R !"4 !!4
0x2559dc…255b70 Dummy {f00=0x0077, f01=0x0190, f02=» _ F " DSF T X AC FC SV TC PTS-DE SYSFIL " % ( + . 50 < p p !`R< ja "R$ `!< a & `a_ %6c : b " ! d %d8 !? !'RP 5<
0x255b70…255d04 Dummy {f00=0x0077, f01=0x0190, f02=» ~ W f T r v zApAt : As k # *V ) ? Ht ? l b ,V ) ? Ht ? It (? cv: a*mja " &"asz kj a"c a"j &"a `: ` a* ?j ""` j $" l `v: j a"` a" uv: j a"u a"j &"a c: Uj &"* W @ `#j "" j $" a*_zj $"c `: @j ""` `c cv_(ja " &"as c`_z cv
0x255d04…255e98 Dummy {f00=0x0077, f01=0x0190, f02=» uv ud d , ) v )? jo !v bo!&k bo'&l ) oV5 ! ! " : * o | Uj |)"` It ? u) 5 ? 4? : VJ! 5 ) ? `b b W `!: RBjR""b bR* z "`R: b !bR: jR$"` "bR? bR* z "bR? '6c @rT `# : !`RV ! 5 ? )? a7b &Ra0
0x255e98…25602c Dummy {f00=0x0077, f01=0x0190, f02=» Kq %_1Aq_ : @s RHl Hk RU "#R? a$W a" k `#0 kT : j` "Ra ` >Ar_ ApAs0 kTY k # *RnHp. a$*a j " $ Z : j` " &*`*K a,Hp bk & a? 0 lT$ l b ,R. a& a =bl & a? #X;! 5 ? b: ja " &*a* a,_' )? c# bc !bRR)jc "R&"c* 5W d7b &Rd k jc "R$ c
0x25602c…2561c0 Dummy {f00=0x0077, f01=0x0190, f02=» h~ !X8H !( @ h~ U !j~ ! ! !P !0# ! N_m ? j !! '( !1j !& !j !! ( * j +& 'j !! ( j ! ! ! 9 ? jy " $ j !! 1 j !! 2 j !! (I !Y A ! p ! ? ! 0 !h & !&P !0# !< _ ( ) +h & '&
0x2561c0…256354 (1, 522) Dummy {f00=0x0077, f01=0x0190, f02=» h^ !T f^ ! !j^ !U !j '! !j !! ( _N ! ( + ~UWhj !! ' !QU I N! 9 ! : ;b ! W:0 ^ h^ U !P :! ;j !!^ b ! f^ ! !A j ! !d^ ! j '! !j !! (( + b +$~ WR j !! '( ! j !! 0 (j ! !W0 )W# + Aj !
0x256354…2564e8 Dummy {f00=0x0077, f01=0x0190, f02=» 6 <W U j !!~ W j !! (W Uj ! j '!!! !j !!~ j (!~ _+( # j (! !j !!~ 4 I H~*H $H !@~ W 0$@mI~ Hn @f $U W I~ W I Ao 2 H~ I Ao { _ H{ 2 _ 2 b & . #K~M g "pK s_W!gC ? /_>Iz H 0
0x2564e8…25667c Dummy {f00=0x0077, f01=0x0190, f02=»Hm @ P&@jP A W3Ao ,P !_ g  L@mAo? H 0 Hm ! &@h@jP #W @fPO $0 TF 8 h ! !T #P ( -& Ub & ? Ub & @ .P )gC Ao? AzAzT @mA *P @ ? @ @m8 @xP 2 !! h ( & H #: W ? Im1I~ I & h ( & H I ) ?"I ) ?#I H
0x25667c…256810 Dummy {f00=0x0077, f01=0x0190, f02=»({ % H~ - !gC Az? @z? H~ C < I 0 ! W 0 ! W /8 0 ! 0$? Az % h ( & J K @o?(@m!gC C~8)?(@zC~8*?(?$Km Jz I gC T Io Ao #: _3Ao@ T / 2 %% + % # #g W ! #g #20 ! &_ I~ Jo K _@ @ !0$@o ( A P W @ 6 / A _ Hm 0 ! A %
0x256810…2569a4 Dummy {f00=0x0077, f01=0x0190, f02=»%% 10 ! !0$ (V ? ##2 2 2 322 1& _ Co<$Cm<$Cz8$0 ! 2 %% 4 !X b !U *8 0% ? h ! & ? C <$ h ( & H I ?0 g( " @oW $ 2 %% 5 ): @oA ?6C <$Hz @ T Cm<$Io I~ #V - ? @o@z Ub & 5 +@mA{ *V#( - 1 0 ! 0$ { &{ mU_"@{Ao?
0x2569a4…256b38 Dummy {f00=0x0077, f01=0x0190, f02=»% !g2 @m?:?;@ _/0 + 0 , A~4 @~P + , 4 _ ; $ - ; Y i . & E 3 N + n | i Q m
0x256b38…256ccc Dummy {f00=0x0077, f01=0x0190, f02=» " ! I Y R *FTX J BC JC FTJBJD FETCHING FORMAT: FROM DISC. @ UF 0 % * & j j Ub & 5 +@mA{ *V#( - 1 0 ! 0$ { &{ mU_"@{Ao?
0x256ccc…256e60 Dummy {f00=0x0077, f01=0x0190, f02=» !4 "4 #4 $4 4 @} 8 In06 W 0 ! WP0 ! WII~ 0 ! W?H 0 ! W50 !! W.@n6 0 ! W 0 ! I~ 0 ! W H 0 ! W 0 ! (0 : H~ ? 0% P : _ 0' P C{P A )? H ? 0(HoO !H~ 0) $ W 0) # ! 2 W 0 0 /1& _5K~|0 ! _
0x256e60…256ff4 (1, 523) Dummy {f00=0x0077, f01=0x0190, f02=»( 2" + " ( " # I ? & 0, P ? 0 Pm0* 0 -8 Wa0* 6 > W<( , ! :d # !_'0* P 0' P o8W o;d o "_HI 0* 2 W @ @ @ @ @h@j #U 0- ! Td$ + " , 0( %@|PI0' T /hZ " !T f ! j !! H{ ? 0' P 0. P H !?
0x256ff4…257188 Dummy {f00=0x0077, f01=0x0190, f02=»88" .4 #H 0Hj 0 #T @m?#@hP !PP01 02 V 0 !_ $ + ?$I 03WL0' P 0 9%0 !01 02 T10' T2WO0 ! 04W #I{ H~ I K 0% 0(? A 0$P#:&;%Io 0. P H 2 ' ' ' ? JA J K{ 0* ?( !01 02 8 _^J #H 0' P 0. P T 2 ' 0' T 2 )
0x257188…25731c Dummy {f00=0x0077, f01=0x0190, f02=» /P 06 & ?.06 " ?.0(_.0 0 H ,W H +0* 0' P 0 Q ,8/?0A 0 !01 02 P : SqW 0' X70. P J ? EK{H ,LH 0' P 0. P T +_bH KAk0* 1& ? Am #4 0% S 0' P 0 Q I ) *&KA)? 0% % 0' P-0. P H % !W/ ?1 #? 08 $+ %'0
0x25731c…2574b0 Dummy {f00=0x0077, f01=0x0190, f02=»W > "j 0 0 #4 @ 0, P j !!!WP U0' P m ( &W 6) D b !Z/h U ! !Q !4 !0(@ T 07 j %! !0& ! 08 % ! 6 cv6 C & 4 W 9W :0' P " "Jh !U !TA0' T h ! !T00/ _ A 0' T f !07 0(0& _ 0 0 (P h !
0x2574b0…257644 Dummy {f00=0x0077, f01=0x0190, f02=» 7jo " 1& W % 4 "1& M 0(W 1& !0) ! 6 W"0 0 $( # _.0 ! _y $5 !( * @ . !4 80 4 o? o0 0 6 4 Am4 0 0 4 6 v k | _ O x T u T
0x257644…2577d8 Dummy {f00=0x0077, f01=0x0190, f02=» * ! & 3 8 ? P + +-0? 1 BATCH IN USESYMBOLICVALUE-SET XXXXTTT9TTTT9XXXXX- o A . 1 . . : k A C : A $ : A NOT . TIME-OUT CDV-ERROR NOT FOUND I/O-ERROR DATE ERR
0x2577d8…25796c Dummy {f00=0x0077, f01=0x0190, f02=»ERED BATCH RECOVERY RUNNING. DISC NOT OPERABLE @ : l IN : k A CHANGE FLOPPY DISC DISC I/O-ERROR : ILLEGAL FORMAT NAME PRESS ENT TO CONFIRM NO WORKSPACE IN CORE FUNCTION NOT ALLOWED USERFILE ASSIGN-ERROR 95 % OF FILESPACE USED PRESS EN
0x25796c…257b00 Dummy {f00=0x0077, f01=0x0190, f02=»EXECUTED TOO FEW INPUT CHARACTERS OUTPUT DEVICE NOT OPERABLE COMPULSORY FIELD NOT FILLED DEFINED LINE MAXIMUM EXCEEDED MAXIMUM RECORD-LENGTH EXCEEDED !MAXIMUM FORMAT-CODE SIZE EXCEEDED !MAXIMUM NUMBER OF FIELDS EXCEEDED (USERFILE NOT CLOSED IN PREVIOU
0x257b00…257c94 (1, 524) Dummy {f00=0x0078, f01=0x0190, f02=» : h y : k : l : : z : n : : g : ASD 5 PAGE : WARNING:REFERENCE TO FIELD (F ) OUTSIDE FORMAT DEFINITION ,OCCUPIED RECORDLENGTH CHANGED WITHIN FORMAT: m . SIZE ON DISC: . B $ : ! DOES NOT EXIST IN JOB-DEFINITION OR ON SYSTEM-D
0x257c94…257e28 Dummy {f00=0x0078, f01=0x0190, f02=» ! )0 2 ' 0 9 B M Y e q ~ 3 H ] s 6 Q l ! $ $ ' + K / v 4 ? ? F W J @7 z
0x257e28…257fbc Dummy {f00=0x0078, f01=0x0190, f02=» @g@i@k@ "0 ( #W H % W % 6 0* 2 W ? A o W o ~H h~ ) !PL@ < ~E h~ ' !< A ! & !@ W 2 W 09 #XA _ 2 !j !! j ! !$ 60 ! ? A _ !A <
0x257fbc…258150 Dummy {f00=0x0078, f01=0x0190, f02=» ? A _ 0# !< " ? #@ T 0' P9W I 46 0 ! W 0 ! : 6 h W h 8 ? 6 0# !< " ? 0# !< " ? ( 09 ( #)0* A h U ! < h 8 ? " ? < 9h ! !P !W !j !! ! =f "d "!U d !
0x258150…2582e4 Dummy {f00=0x0078, f01=0x0190, f02=» ? & ? ? 0 9 ? " W @g@k !Ai !? $@kAgW #@gAk@i ! j !! ! Uj ? 60 < h !TL j !! ! 4 ) 5 ! h ! !T ! R h !U !P7 !_& h ! !X&W#@ T 0' P! W I h P Wk ~Ub~ "~
0x2582e4…258478 Dummy {f00=0x0078, f01=0x0190, f02=» ! _6j " - 8 & ?!@ P 5Ii Ik Ig A|W 4@|@ & , 3hZ !PDj !! 0 (P 60 !_<( 4 !, @h $ !ThI|m2 ? 2 """"#$"$$$#$$"""""%&&"""#''" !_h( !? 4( !_ "_ _ ! j !! ! _ _ A| "
0x258478…25860c Dummy {f00=0x0078, f01=0x0190, f02=» Af4 L@d@g0 @ W< %Ad01 02 R Ag00 ! T 01 02 @dW Hd 01 02 @ 4 ! ! L Ah $ !6 00 W. "0 @| uA j !! ! j !! 60 _N ! 6 iiWJ@e !L ! ;h ! !P !@i ! 9( Jh * !TX6 rr rrW !
0x25860c…2587a0 Dummy {f00=0x0078, f01=0x0190, f02=»! 6 & ) 0# !<) W30# !P(?)0# !<) $W ( 09 # W a / " Hi b " !P 6 ! "?* ! "?* ! "?* ! "He U m " 0# !<) ?+( 01 02 0* 0' TJ U m ! P Q 0* , ~8d ! ~ W f ! ! 0 0/ 0% ?+ h X
0x2587a0…258934 (1, 525) Dummy {f00=0x0092, f01=0x0190, f02=» U j ! !0 P b ![ ! ! ( 4 @h0B ! P # ( + ?,0. <-AhW %hZ ( !<- % (:- ! ! ( $ 2hZ ! !T !j !! W % 2 .../ !X b !U ( W )W =f "d "!U d ! 8T 0: (+0; + j !! 1 ! & 0' T/0* V
0x258934…258ac8 Dummy {f00=0x0092, f01=0x0190, f02=»! 4 ! U 6 _l; 2*0# !T Wo0 "T j !! !b WX WU Wb Sf !WAH{ W<09 " m W W 0# !T3m W 0# !T&m W 7h U ! V !!4 !"4 80 1& 0 6 ''' ' y ''' "W% ," "0 We08 W "_ '_ !08
0x258ac8…258c5c Dummy {f00=0x0092, f01=0x0190, f02=» T O j & % . i } 8 [ D S q d E = G B 0 M 8 7 > D Z ^ L q - Y c + ? P0:;=
0x258c5c…258df0 Dummy {f00=0x0092, f01=0x0190, f02=»TTTTTTTTTTT9 ! I D DELETED INSERTED + ON UNIT:U i + WITHIN JOB: k RECOVERY RUNNING. RECORD CORRECTION F FREEZING OF BATCH l CONFIRM RECORD INSERT CONFIRM RECORD DELETE: RECORD MUST BE VERIFIED ENTER
0x258df0…258f84 Dummy {f00=0x0092, f01=0x0190, f02=» FF* RECOVERY OF : k B : l RUNNING. ( ',!.%)$&"#-* $ * 0 7 ? G P Y c0 m * 5 A Q c w
0x258f84…259118 Dummy {f00=0x0092, f01=0x0190, f02=» L @ D H( &Ad1 An@m 6 0 _ @n_ ( !'( _&3 @d0 0} h* h _? ! 4 6 99 W 2 !8 "8 #8 W j " # L j " "# P|j " $# Pr? ! !6 +; ^# 8Zb !" Xj !# 'bc (c" 3? 1? ? @ W' ## 7 ! ? " 5 " " ! T T
0x259118…2592ac Dummy {f00=0x0092, f01=0x0190, f02=»2 _ !0 #$} & 2 _,4 j 1! ! !j 2! ! 4 R ! 4 Hd ? ! 8T & ( !0 #$}? ) _ ! Zb "" " < $ U@f@e0 " An 2 _ ! : ! @ ; W < " ! j " j $" Af07~ 0 "P 07~ j~#!
0x2592ac…259440 Dummy {f00=0x0092, f01=0x0190, f02=»e ! 8R AnW* ! " _W) !$ ! $ W !W 8P )B? 0: (+0; +@eAf ! ! 0 %%In 0 $%Ao 2 W ) !Ao _ ! 8T !_ ! 8 ! ( TJ? ! & ! Xb !# ~ " ~ T $ 0: (+? - !?
0x259440…2595d4 (1, 526) Dummy {f00=0x0092, f01=0x0190, f02=»~ ~ RR j !! !07~ j " V0 "P W07~ " !j~#! ! T j " $ j !! 1j !! 2 !!4 1 W 3P W An 2 _ 4 4 ! ! ! P 2 _ 0: +1 0 ! !G! "?! !r ! " ! ! # !An@m 6 p _ 0 ! _7Hm_ #P Q 2 ! " _ 0$ 6 A _ $Gv ?
0x2595d4…259768 Dummy {f00=0x0092, f01=0x0190, f02=»0} # * h h _? ! 4 1 Ad!hq @dAn@mAe 6 ?$ " &z 2 %&%4 5W 6Jd P AoHe @o W 0: z ,AnAo@e 2 ''()*++ _( (z T &PU 1 2 ,,-./. # %XjAo _9 z! X#b !& "z <0 $z zU0: z ,@e0 " *k0 " _ He% k0 k<1Id $P )SW "T k
0x259768…2598fc Dummy {f00=0x0092, f01=0x0190, f02=» = =_=0 !P #_R * , !" 3 h &U !T , , _ ,& !8'W:6 1? >h ! !P 0 /8 W 0 /< ? W %W ( ?2 2 j k | d t 1 2 s 3 R
0x2598fc…259a90 Dummy {f00=0x0092, f01=0x0190, f02=» c ! Y f P ] c *AN010203040506070809101:232:3:4:595:6:7:8:9:A N T GETTT FILESIZEDATE:TIME:CREATEBALANCE:JOBNAME:USERFILEFREE %SYMBOLIC:BATCHHEAD:SYSTEMFILEVOLUME-NAME:15 FILE SPACE15 FILE-SPACEUSERFILE UNITNAME CONTENT
0x259a90…259c24 Dummy {f00=0x0092, f01=0x0190, f02=»XE-XXXXE.XXE.XX T 0 * h d m p n o i m ] f ! ^ g T U h d ' l a e k e k 30 - - * 3 h d 31 _ - - 32 Y - - h j :U i g [ c f ! " # # b $ % # & U
0x259c24…259db8 Dummy {f00=0x0092, f01=0x0190, f02=»@ ( X% I @ ) X% J @ * U e f 4 ` &g 5 $ K fA ! d &A + $ M fA " d &A , $ N fA # d &A - $ O fA $ d &A . $ Q fA % d &A / $ R fA & d &A 0 $ S fA ' d &A 1
0x259db8…259f4c Dummy {f00=0x0092, f01=0x0190, f02=» " $ & ( * , . 0 2 4 6 8 : < > @ B D F H K N R V [ ` f n v ~ (0 <0 > ! # # & F < l Q
0x259f4c…25a0e0 Dummy {f00=0x0092, f01=0x0190, f02=» T ( !Ad1 9An@m 6 6 W,@n_ ( "2( _!@j3 @ @d0 0} 4 h _= _< ! 4 6 Sfl{ W j ! Ii ! 9 W ) 9 m ,P ) ? ;j !& 'bc c b W 0* ! 6 $ r"? 7" v$ !r? 8 Tj *P ? 1? " Q$ FWK $ $< ?
0x25a0e0…25a274 (1, 527) Dummy {f00=0x0092, f01=0x0190, f02=»/ !T; 6 MMMMMM~~MM~~MW|Iiy ! %n h / !T ,JWX ! %P h / ! 6 3 W1Ak_+ !" %% h / !T , W Hk ! c % c c _ & !? 0 %% 8? !6 (DTdt_ * ? + ? ,< j ! ! 9 @iW Ai? P ! : ? A W @ ! < A ? @ ?
0x25a274…25a408 Dummy {f00=0x0092, f01=0x0190, f02=»% A0; ,0: , $ ? "r= ( 2 07 6 'h #Q !j , w j 1!w!Ii j 2! ! !j "" j $" mHj -P !2 _ &{ { )P !Ix 6 * ? &{ { *P !2 _ ({ P !2 _ -P !2 _ { + Ii 0; {$* p!0
0x25a408…25a59c Dummy {f00=0x0092, f01=0x0190, f02=» !* & & & ! 5 0 "}H{ Ij 4 !6 H" W 0; {$*0 P _4 0 "}_? 1 !6 TT _P - PJ !6 ??_&Aj p! u # $ j $!! {1j #!! {2 $ #? &{ @jP { &{ W &{ @jP H{ m *" ! I{ ? % & 4 0 6 55 555555555W 'I ( W Ij I
0x25a59c…25a730 Dummy {f00=0x0092, f01=0x0190, f02=»Hi! ' 0 (T W $0% "W 0% 4 @g0 0} { 1 7An@ An2 _ 0 0}@n_ 6 5 ? Ag@ij !m ) 9 AiW 0; {$* p!0 AnP 0 ! 0% 4 2 _Q 4W XT 8 2 Jgwjm & {!_: 2 _ ({ P _ &! 1 2 -P 7 nn &{
0x25a730…25a8c4 Dummy {f00=0x0092, f01=0x0190, f02=» "|Bn { |? 3? @n ! " P W0 % A0; ,0: , T W % & 0 ($}2 ? &{ 0 0}4 0 0} { 1 8An 6 _ @n_ 2 Wm * ;j !& 0; {$* p!0 0 ! 0% 3 6 ++3 ({ T j !&m j {!& ! )P R W 2 W &{ _
0x25a8c4…25aa58 Dummy {f00=0x0092, f01=0x0190, f02=» 4 & ( $j ! ! !4 & ! c # ( % !j ! !! !j ! ` !4 & " c # ( & "j ! "! !j " ` "4 & # c # ( ' #j ! #! !j # ` #4 & $ ( ( $j ! $! !j $ $4 0
0x25aa58…25abec Dummy {f00=0x0092, f01=0x0190, f02=» w! 0 ""j !Q W = ! +W !@ !@ 4 j !Q * & ' @d@ 4 % ( H + "20 !!" " !)I 0 # W 0 # & ' % y %Ad W < ! !4 I /W . ( a - !+ 7 !) !< # j ! ! ! # 7 j ! !
0x25abec…25ad80 Dummy {f00=0x0092, f01=0x0190, f02=» wHj $ # 4 j y C o 7 7 $ l 0 C v h o 9 - X ! Y G ~ y 7 N & " s ' v
0x25ad80…25af14 (1, 528) Dummy {f00=0x00a8, f01=0x0190, f02=» h @ m 24 COPY $ $ TO BE COPIED: q @ NEW $ NAME: v @ m U 20 $ - - * h d7 21 ? - $ - 22 @ - $ - 23 > $ 24 COPY $10/.-,+*)('&%$#"! 2 0 ;
0x25af14…25b0a8 Dummy {f00=0x00a8, f01=0x0190, f02=» ! # * M C Q @ : : 7 7 $ l 0 C v h o 9 - X ! Y G ~ y 7 N & " s ' v
0x25b0a8…25b23c Dummy {f00=0x00a8, f01=0x0190, f02=» e t 4 $ f c# # d# 7hZ c! 7 c! #2 W bch b!Z7!T W c N? b% ! b_ b$ " b ,# c bch b!Z2! } c! b$ " b_DW ( % $N b/hZb" c!T b/ >j c! b c! b$ " a W b# # b*a & &a_ a c! ac bch baZ7!
0x25b23c…25b3d0 Dummy {f00=0x00a8, f01=0x0190, f02=»)c ' ) ' j (! '!f c! ! d!? ` 4 j b c a j c!a! b b! c!f cb db4 j b u a4 u $ #@g c hZ a b! +2 jc!! b"c W 6 b! !jc!! b"c b! !W, ! b! !Hg ( 'b `3d b!Z` b! ! !@g _ " ,0 b! ! `bh `!Z2
0x25b3d0…25b564 Dummy {f00=0x00a8, f01=0x0190, f02=»b! ! ' j '!! b ' j b!Z= 'b '!Ag_ 4 b!jc!! b c ` m ` f b!d b` `! ` b` ` !Hg '`4 1& P # W !05 p! u ! " !! w jw!! {1j !! {2 w d "2@h u" ! Kh !@k ~60 oT @j~ # # - b o -( q0 TF b , ! , " , # E h )
0x25b564…25b6f8 Dummy {f00=0x00a8, f01=0x0190, f02=» &%W #$d &%( A b ~6Ak_Dj~ b #* Ii !"d &%W #$d &% ~6Ak4 + 1& P W !2 1& P # W ! 4 @l #hQ 0 !0 6 F MMMMMM? !j !! !_9 "_> Hj j !! {(j { ! % { $! 0 ""Il _h !Ah? Al - ! j !!
0x25b6f8…25b88c Dummy {f00=0x00a8, f01=0x0190, f02=» !: ":H "< #:H #< $:H $< %<H %:H "8 # oU U b ! " # $ + ~E U # hQ 0 !T 2 W W #_) !j !! !( "Q Ii "_H ! `! a! !07 h )Q ! ! # `" a j a` j a` ! ( !_ $ 6 1j b#~ W j b#~#W j
0x25b88c…25ba20 Dummy {f00=0x00a8, f01=0x0190, f02=» ! " `" a j a` j a` ! p 4 !jo ! - h] $ !T 6 #+jo ! ! !" %_*jo ! )_ jo ! +_ ! !_+J .jo ! ._/jo ! , !4 6 b @h@k hQ 2 !0 2 ? !j b! - b! !j !! H ;W 9j ba baj b! , ! b!__ j b o "
0x25ba20…25bbb4 (1, 529) Dummy {f00=0x00a9, f01=0x0190, f02=» _ %b!b5 j b!U b!_ HkJ cWE , a ! b jb!! b!+ b"$ $ # !07 h )Q ! 0F a #? !4 = 0 !01 02 T$0* 0' P 0* ( " ;_* 9_/ _44 0 i } - p ; [ s = e 9 ; 6 ` e 0
0x25bbb4…25bd48 Dummy {f00=0x00a9, f01=0x0190, f02=»GTH#V:#G:#A:GENERATION VALIDATION ACCUMULATION 9Z9999XXXZZ9XE+XXZZVZZ9ZZVZZZ! 1 k " ( % & ) 0 ~ k: " $ % & ' ! " # $ % ) 0 ~ 1 $ : m ( NUMBER OF POOL-UNITS: # d A : ! C ACCUMULATOR POSI
0x25bd48…25bedc Dummy {f00=0x00a9, f01=0x0190, f02=»# d A : ! C B - MAX/MIN K M A V I DUPLIC. SPEC. #L:< B LAYOUT> #V: G #G: F #A: H NO NO/POS - D I E T E C -ITEM HANDL. % + 4 ? J
0x25bedc…25c070 Dummy {f00=0x00a9, f01=0x0190, f02=» f 0 !P * 0 "P + , * , +! *5: + 5 5 *f * 8 j % , + , +5 *5W * , + c : E bch b! !Tk c! h & c"T " "Hi #L c" bc a , ach ba "T cb c!W. bc :h ba !P b , b T ( # A c ,T c!_hHi 0 -.0 &' &W 0 120 ,-
0x25c070…25c204 Dummy {f00=0x00a9, f01=0x0190, f02=» Wf b2 W? ;2 W Ik Ak 2 ? W c c! bch b!Z7!P c!WF c! c % a=hZa! c!P "5 c!W)Ag >W @gT _F c! c _ ? !T 0#a !T _ "T ( ) , $a #a7 W60#a !T W-0#a !T W$$
0x25c204…25c398 Dummy {f00=0x00a9, f01=0x0190, f02=» a ac bch baZ7!T( bc*b !,b : ; W "b& cb_ c!,c _C( $ c ! & ! W Kg !!4 c! bc b "b Uj c b m b b a 4 Ii 1 W 1 4 Ii " !W ! 0 " P !, ! ? Ij { j 1! !j 2! !Hj ;j !&m $ r"Ii' U ! ( j !! (
0x25c398…25c52c Dummy {f00=0x00a9, f01=0x0190, f02=» ! @n ! Ij 0 : 0% P8: _ 0 && du d ! 0 ## #_* 4 ! !( % A _ 0(I I I I Ij& # x 0+ )+ W20+ *+ W(0+ ,, W ! $ 0) / T W 0) - T ! 2 W "? I I I I IjO2 !0* / 2 W$0/ Am6 ! b
0x25c52c…25c6c0 Dummy {f00=0x00a9, f01=0x0190, f02=»T %y0 %%_ W}? ( 0(W !0* ( 1& ? 06 . ? Hi He 0 ( #0 T ,I ! He $W I # 0% ? 0^ $ % 0 0 < 2 ? 2 #? 0 0 ? $ 2 !" #$% &'(2 !" ) *0 %% ( @h u!He8Kh 0 % $
0x25c6c0…25c854 (1, 530) Dummy {f00=0x00b7, f01=0x0190, f02=» @ #?+A @ u!Jh _ @ !^A _DA ( .He @h u!Kh ( ! u! du d ! _3 $? $? , 2 O > ! , + @ z f Y { @ Z ^ o m w ` 8 J # 1
0x25c854…25c9e8 Dummy {f00=0x00b7, f01=0x0190, f02=»HFIELDLINE STARTLENGTHNUMBERRECORDSTART:V:G:A:(#A:...)(#G:...)(#V:...)123456789 1234567890CORRECTIONGENERATION VALIDATION ACCUMULATION AAZ9ZZXXXTTTTXE+XXAAAAAAZZVZZZ 1 $ : e ` m < SIZE: f ` ! ? B : + " . B OF POOL-UNITS: D # 1 2 3 ( 4
0x25c9e8…25cb7c Dummy {f00=0x00b7, f01=0x0190, f02=» = -ACCUMULATOR:A m ( . SPECIAL HANDLING: @k M H L G o@ ! p@ " U 21 USER $ - j # K > : F $ D % A : & & . OCCUPIED C A : E ( KEYED INPUT ( Y /N/C): l@ ! . MINIMUM A > : @i ' MUST EN
0x25cb7c…25cd10 Dummy {f00=0x00b7, f01=0x0190, f02=» ) : @t@ $ INITIAL CLEAR ( Y /N): u@ % . SPECIAL HANDLING: @k M H L G 2 N F o@ ! p@ " U # ( . 4 : @ F N V ^ h r |
0x25cd10…25cea4 Dummy {f00=0x00b7, f01=0x0190, f02=» 6 R ` * . 2@e kU lU( .AdIe 1 1W 1 ,An@mIe W 6 . _ @n_ Ief( $A6 _<A W A W A A Ae@d_D@ $V 1 ,An@m _L@ T Ie ! 4 @e@dKeN@ @ @ $ * h h _ + , 2 _ 0 1 ,0% _ @e kU lU( ,AdIe'1 *An@m 6 $ @ P $ _
0x25cea4…25d038 Dummy {f00=0x00b7, f01=0x0190, f02=»(+0; +( > " 1 W 1 !An@m h 2 _ _ 0: (+0; +0% _ "l lU h " 1 W 1 ! l "2 ! 4W 5 T ! +T | j " &| W E !" ! 0 %, ! b &l b &!Z2b '( "lW b &k !k # 0 # 8~@ P $0 #$@m0
0x25d038…25d1cc Dummy {f00=0x00b7, f01=0x0190, f02=»2 _ _ 0 ~P + , @z6 Az _ @ @z $XP@ ~U 0 , P& b~ ![) !0 + T b~ ![( !b~ ![ ! ! (41 .0 %%0 &&0% $ _ 6 ? ? + , 6 h[ * !T06 $ $$ 0 , T 0 , @ T 0 + !_6A X @ T ? &? @e( +AdIe 1 0W 1 +An@m 6 -
0x25d1cc…25d360 Dummy {f00=0x00b7, f01=0x0190, f02=» 2 _ 0 1 +0% _ kU lU( xAdIe 1 (W 6 1 #W 1 "An@mIe W 6 K @ T $ _ @n_)@ $V 6 Ie ! 4 @e@d ' * h h _sIe ' @f6 _ AfAe@d_ 2 ( 0 kT (!0 lT (! %0% " _ ("6 ( , W - ! 2 AzT ! '
0x25d360…25d4f4 (1, 531) Dummy {f00=0x00b7, f01=0x0190, f02=»6 ( _W %T ( * 2 ( )gK " '"( g " #2 $T # '#( _ Ub & 5 + *P ( - { &{ 1 -0 ! 0$ mU_" m 50; {&* p!0 $ '$( D0 $} | @ 0 2TX 6 ( W? 0 $} 3 T l $_ & A %T @ _ @ W'" 2 !W 2 " 2 ' #$%&@z 7
0x25d4f4…25d688 Dummy {f00=0x00b7, f01=0x0190, f02=»b? )? ( h < Q j p % t " d w ( h X " ! Y "TOKEYVIAFILENAMETESTUNIT
0x25d688…25d81c Dummy {f00=0x00b7, f01=0x0190, f02=»9XXXXAAAAAAAAAAAA9 U & U 45 ? - < & ' 2 72 I 5 J 71 I 7 F 9 : ! k < 9 : " l 9 : !A k < 9 : "A l % ' 2 ' ) ' / 53 % A = 52 % < = 51 %
0x25d81c…25d9b0 Dummy {f00=0x00b7, f01=0x0190, f02=» d & % $ h > 6 / : ' h ! : ' FETCHING FORMAT: FROM DISC. @ U $ ' A - @ : # A - B : -e@ ~ D : e # BRUGERNAVN ' KENDEORD & 60 * h d0 61 6
0x25d9b0…25db44 Dummy {f00=0x00b7, f01=0x0190, f02=» ! " ) # $ % ) & ' ( ) ) * + ) , - . ) / 0 1 ) 2 3 4 ) 5 6 7 ) 8 ! & + 1 7 = C I P W ` i r |0
0x25db44…25dcd8 Dummy {f00=0x00b7, f01=0x0190, f02=» ( O ^ $2 $WU6 _ PCWD1& 0T !05 T W/ W- W)6 ! W C( ( SUW 6 W W W W W 4 6 I i 40 Td W W^ %W / 1 3 @ @ A T U0C T 1& $ 0 T) : Y F m " W W 6 W W _| DW 60 A _ 0 _ I P
0x25dcd8…25de6c Dummy {f00=0x00b7, f01=0x0190, f02=», W _ U0C T 1& '@ 0 0 & ? U0C T 1& )_( 6 D I 5 W W4 %W / 1 3 @ @ @ @ T U0C T 1& % X? DW A ? K H 1& /A ? K !05 % - ! ? _ W'W*W(? K M - ! ? W W W W %_h _m _"_$_& !_(_j
0x25de6c…25e000 Dummy {f00=0x00b7, f01=0x0190, f02=»1 3 @ @ A T, U0C T 1& & W W 6 ! W W ? DW A ? ' 90G 7? K "H 1& /A ? K 3I $ " W !05 E - ! ? W W W W %_e _j _"W WA !_( W W 9 '0G 7 7 _" W _"2 W _.J G B? A . _>@ -
0x25e000…25e194 (1, 532) Dummy {f00=0x00b8, f01=0x0190, f02=»90G @ ' 90G 0 & ? U0C T 1& ,_D U0C T 1& -_S # # " T - ! E4 4 9 " '0G 0 ?0 T@ 8j & j ( % 6j !% 5j " 1 3An0 ! 0$ !0) 4 4 8 "m %m ! 5m 9 '0G 0 ;0 T 2
0x25e194…25e328 Dummy {f00=0x00b8, f01=0x0190, f02=» 4 4 4 4 _] ' 90G 0 0 %P 30 T 4 ' 90G 4 1 #An0 ! 0$ !0) 4 4 8 %2 $2! $2 / b /W b $ 'I ` I `!*` a`h a! ! aW W j b b ` ` j ` 1 % `* ` 1j 0 1 ` 3 $ `* ` 3j 2 3 `" & ! Wk H
0x25e328…25e4bc Dummy {f00=0x00b8, f01=0x0190, f02=» W W W W W W W 4 4 d " ` `"0H `f "4 9 0G 4 ( $ m ( 4 4 <0 4 4 4 4 _," F $W @ H A !01 02 P : ? 0* % =>% > % @ % A! "W- = / A _= 0 0* 1 >W 2 0* 3 @W ( # 2 WJA WF@ WB2
0x25e4bc…25e650 Dummy {f00=0x00b8, f01=0x0190, f02=» /P%H ) m WBm W m 6 !W H ) m W m W m 5 f () m H ( # $ / @ /! ! " ? 4 4 4 4 4 # v K _ q t J [ + 6 H s 9 S W I K O f h
0x25e650…25e7e4 Dummy {f00=0x00b8, f01=0x0190, f02=» O X o ! &&' FILENAME KLARDEVICELISTNING AFBRYDESDATATRANSMISSIONEXPIRATION DATE:BATCH TRANSMISSIONFLOPPY DISC SKRIVNINGOLD VOLUME SEQUENCE NO:OLD DATA SET IDENTIFIER: (99999999999999999-99-99999999999999999999999TTTTTTTTTTTTTTTTTTTT9ZZZZZZZZZ
0x25e7e4…25e978 Dummy {f00=0x00b8, f01=0x0190, f02=» S 2 O 2 T 2 S M 2 SLUTD % S P 2 O P 2 O M 2 T P 2 T M 2 SLUTD % 1 EJ GODKENDT 1 * NUMMER: g JOBNAME: k BATCHNAME: l DATO: S TID: T IND: g UD: % N : # K - L : R
0x25e978…25eb0c Dummy {f00=0x00b8, f01=0x0190, f02=» ( * - 1 5 : @ H Q a q 0 0 0 , A V l # * 1 8 A K V a l w # 0 5 : | TTTTTTTTTTTTTT9ZZZZZZZZZ
0x25eb0c…25eca0 Dummy {f00=0x00b8, f01=0x0190, f02=» m 4 4 m 4 4 6 "" "" * W W:m j W($ & # W W m j W W 4 4 !0 !0I 60 0H Ta 60 0I TO6 $7 B h 'T6W( > h #T%W A h $T W W : m 4 4 6 "" " %
0x25eca0…25ee34 (1, 533) Dummy {f00=0x00ba, f01=0x0190, f02=» 1& # #+WFW. % 4' 3 :h !T 8 b 1& 8% 4 4b 1& 4 0 Hf ( Hg ( j I 0 ##Ie !l_0 ! $ % & Ii I " " ( I 0 $'Ii # 5 " . I 0 $ W .W 0 ! ( % ( % !4 @e@f@g ;@l
0x25ee34…25efc8 Dummy {f00=0x00ba, f01=0x0190, f02=» $ <Al@h l`ahHh a( _9 d cW @f d 4 %E@ I h ! !T&W h " !P I A ! ! ! % _2 ! W ! !4 % @e@f@g@ 4 ! " # $ * + , 4 o: Hi 0 h / !Tr 6 )'''''48fD]]NW[A A A jo ! ! ! ! h /
0x25efc8…25f15c Dummy {f00=0x00ba, f01=0x0190, f02=» !4 He 0 ( yIi ( pI d W j I 0 ##AdA 0 T3 ` c d C h ) c#T # # d0 3 ( `c_*0 T ` c d H 0 $ 4 I 7 " " j " " j " " $ . ! # T ! 0 "" U W !+ !4 0
0x25f15c…25f2f0 Dummy {f00=0x00ba, f01=0x0190, f02=» ! t m , e P p X0 << 5C' DFH0002DFH3504#V:#G:#A:TERMINATE 9999AAAAAAAAAAAAAAAAAAA9 = ? CSSF CSSN PS= & ,NAME= ' ' 0
0x25f2f0…25f484 Dummy {f00=0x00ba, f01=0x0190, f02=» d 0 $}j *!! x0 @l 2 ? j x! ! wx xyj &"x !g:e x y" e @ TW( ' )g: @l? j xy wj x! { W< .V xwj &"w W j ! " "Hn ' wxjx " & wx wxf xwj x! { wxj !! x( % j " &W ( ' j ! " " { 0; {$* p!0 0: x*6 VVVVOVOVV V "!H '0 **P I %!@ A W
0x25f484…25f618 Dummy {f00=0x00ba, f01=0x0190, f02=» x* !u uv_ 0 j x! ! 7 ZH_ j " "jx " &"x* ( 3 Zf_q 1Zm u ? !u (R j "" j &"x u !? ! _ j " & wx x 'jy " xy x u$x Aj " $( xw u 4 /_ /Z j " &( * 1Z)_5 x* wx x 'jy " g2 #gYuP W j ! x0 , + & # ( #2_
0x25f618…25f7ac Dummy {f00=0x00ba, f01=0x0190, f02=» : ? ,wx W x* WY uj " "( ? j " &( * % 1W 0 : j " & *1 1 W u ! u ! u ! 4 : jx " & 1 w*j " w wx wx j &"w xw? w w !( % _ ' xw g2 # ( ( #g? g "b & AlW '2 : 1 _ : ? $ )g: ' 4WAH !W9AlHl
0x25f7ac…25f940 Dummy {f00=0x00ba, f01=0x0190, f02=» *PE - { ) ? 1 0 ! 0$({ ' x( ' ' wj " jy " ? &{ mU_ m $ ' ( @lW !g: ( nmW *W * n An xIl j ! { W . ( ' !g: j x) w < ? < ? !j &m &j "y ( + ? A ? < 0 @vP C 8 ? ' ( % 2 ! C 8 0 @v< "!_y # "= g "
0x25f940…25fad4 (1, 534) Dummy {f00=0x00bc, f01=0x0190, f02=» ) 0 @v $W &z &| &{ 0 @v_U &z &| &{ 0 $} 5 ^ # + "@ X& ! : !0# !X 0 " %P @ 0 0 $} 2_R * ' #2 $T -_ #_-@ P 0 $}A 3 W Ay@m 4 @ 0 0 $} 2V @y@z@oA # &{ &z &| h Ae0 0} 4 2 $%%&' uf
0x25fad4…25fc68 Dummy {f00=0x00bc, f01=0x0190, f02=»* u$x j $" 7 :(W .:( uf *y x *j &" _* u 4 :(j "" 7 :(W j ! "u u 4 :( w* x*j x! { ?) h ( ' 0 kP W1( $ ( % W ( % # 0 @vP (z Ub &k "V 0% " ?(I + #P R 0 @v0% # b &l ?*A 0 @vP 6 &z ?+0 @vT/( ' z W ( % 6 !
0x25fc68…25fdfc Dummy {f00=0x00bc, f01=0x0190, f02=» I H 4W I 5W H~ I (W ' A P A WB0 @vT ( ' $W3 $W I K @ 0 0 $} 2TmH 7 Uj &"* W 4 TT0: z , { 0 @vT % 4 * *T4 m 4W mU x*0 @vT % I S2 * An0: |"- wx g 0 WYH ( 3 # W &| 0% ' 0 @vT &z @ P $0 $
0x25fdfc…25ff90 Dummy {f00=0x00bc, f01=0x0190, f02=»_B 4 ! ! + 9h # !T}6 ,, !0 @|Thj !! ! j !! 80 _K ! $ !A !@( "90# !T2@e@i@k !" ? 'hZ 2 !TP &6 " _ Ai_8Ae_<" v :WpAkW ! ( ~ !~W)j !! C 80 U !b ! !
0x25ff90…260124 Dummy {f00=0x00bc, f01=0x0190, f02=» = N D ^ P R 1 y s n G a 3 4 X Y ! - ! " % & ?MDA FETCHING FORMAT:
0x260124…2602b8 Dummy {f00=0x00bc, f01=0x0190, f02=» $$ %0X 0X %%0X %% ` . > N ^ n ~ $ ! $ +
0x2602b8…26044c Dummy {f00=0x00bc, f01=0x0190, f02=» d { J F " D @ !$ ! $ W !W R8P )B?R0R (+0R +@eAf ! ! 0X %%I j z R 3 @ , ,
0x26044c…2605e0 Dummy {f00=0x00bc, f01=0x0190, f02=» !_ ! R8 Z ( 8 T H J F " D ! R( TJ?R ! R& ! Lb !# ~ Z % &
0x2605e0…260774 (1, 535) Opaque[0x194]
0x260774…260908 # DirEnt {nam=»NYCONV«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0800, f03=0x0000}
0x260774…260908 IdxSect {
0x260774…260908 f00 = 0x0040 // 0x260774 @0x0
0x260774…260908 f01 = 0x001c // 0x260776 @0x2
0x260774…260908 gno = [ // 0x260778 @0x4
0x260774…260908 [0x00]: C0x0040.0x0.0
0x260774…260908 [0x01]: C0x0040.0x1.0
0x260774…260908 [0x02]: C0x0093.0x0.0
0x260774…260908 [0x03]: C0x00a2.0x2.0
0x260774…260908 [0x04]: C0x00a2.0x3.0
0x260774…260908 [0x05]: C0x00a3.0x0.0
0x260774…260908 [0x06]: C0x00a3.0x1.0
0x260774…260908 [0x07]: C0x00a3.0x2.0
0x260774…260908 [0x08]: C0x00a3.0x3.0
0x260774…260908 [0x09]: C0x00a4.0x0.0
0x260774…260908 [0x0a]: C0x00a4.0x1.0
0x260774…260908 [0x0b]: C0x00a4.0x2.0
0x260774…260908 [0x0c]: C0x00a4.0x3.0
0x260774…260908 [0x0d]: C0x00a5.0x3.0
0x260774…260908 ]
0x260774…260908 }
0x260908…260a9c Dummy {f00=0x0040, f01=0x018e, f02=» " P IDENT NYCONV NJ-AMT 830225/EV P BATCH TRANSMISSION * P 82-11-10/EV H P 820506/NJ ^ P UPD 82-02-22/EV r P UPD 81-08-27/EV P UPD 80-12-12/SHB P UPD 80-07-14/JAER P DDUM DEDDIV P PDIV P ENTRY D
0x260a9c…260c30 Dummy {f00=0x0040, f01=0x0190, f02=» t P EXT ATTPRT P EXT DETPRT P EXT MASK 0 P EXT GETFWD B P EXT ADJUST V P EXT FDIO j P* | P EXT DCSGON P EXT DCSGOF P EXT DCSEND P* P EJECT P* P* KEYTABLE P* PCL
0x260c30…260dc4 Dummy {f00=0x0040, f01=0x0190, f02=»CAN,RET,ENT P P P $ P* , P* 6 P @ PSTIMO EQU X'0B' H PATTACH EQU X'0E' ` PDETACH EQU X'0F' x PTRPAR EQU X'00' P EJECT @ P* THIS MODULE TAKE CARES OF THE DIFFERENT CONVERTIONS- P* -METH
0x260dc4…260f58 Dummy {f00=0x0040, f01=0x0190, f02=» FORMAL PARAMETERS: FC = FUNCTION-CODE (DEVICE-CLASS) @ P* = 1 DATACOMMUNICATION OUT F > P* = 2 DATACOMMUNICATION IN 8 P* = 3 CASETTE OUTPUT 8 P
0x260f58…2610ec Dummy {f00=0x0040, f01=0x0190, f02=» = 6 FLOPPYDISC FILE z D P* = 7 DELETE BATCHES ON USERFILE ( F P* = 8 FREEZE BATCHES ON USER FILE p 8 P* = 9 LISTING LP/GP 8 P*
0x2610ec…261280 Dummy {f00=0x0040, f01=0x0190, f02=»EAD-RECORD d 6 P* = 3 DATA RECORD 8 P* = 4 BALANCE RECORD L 0 P* = 5 CLOSE 4 P* RETCON = RETURN-CODE , P*
0x261280…261414 (1, 536) Dummy {f00=0x0040, f01=0x0190, f02=» CURR BATCH, GO TO NEXT f : P* =-2 SKIP TO BALANCE H P* =-3 RESTART CURRENT BATCH (CANCEL) ^ D P* =-4 ABORT CONVERSION (RETURN) < P*
0x261414…2615a8 Dummy {f00=0x0040, f01=0x0190, f02=» BIN4 = FC-CODE FOR DEVICE t P EJECT " PDECONV PROC FC,TYPE,RETCON 0 6 P IB FC,TRANSM,RECEIV,CASSET JUMP ON DEVICE-CLASS C R . P PRINTA,DISCFD,FLOPPY,DELETE,FREEZE,LISTE PRECEIV PDISCFD PCASSET PERROR * P MOVE RETCON,W4 'F
0x2615a8…26173c Dummy {f00=0x0040, f01=0x0190, f02=»R100,PR200,PR200 JUMP ON TYPE 0F HANDLING C P PR200,PR500 4 P B ERROR J P* Z * P* OPEN DEVICE = ATTACH PRINTER d P* PPR100 $ P PERF ATTDEV,BIN6 ATTACH DEVICE P BOK DECOOK P B RETURN P EJECT P*
0x26173c…2618d0 Dummy {f00=0x0040, f01=0x0190, f02=»298 P MOVE DEBINW3,W1 P PRINT DEDSPRT,DEBINW3,W0 $ P BNOK PR298 F P B DECOOK Z PPR298 l 2 P MOVE RETCON,=W'35' OUTPUT DEVICE NOT OP....' z P B RETURN GO AND CLOSE P* * P* CLOSE DEVICE = DETACH PRINTER P*
0x2618d0…261a64 Dummy {f00=0x0040, f01=0x0190, f02=» THE USERFILE j P* PDELETE P IB TYPE,DECOOK,DEL100 . P B DECOOK L PDEL100 ^ P MOVE RETCON,=W'-5' l 0 P CBNE WORK(W8),W0,DEL110 NOT THE WHOLE FILE P MOVE DATE,HEX00 RESET DATE PDEL110 P B RETURN P EJECT
0x261a64…261bf8 Dummy {f00=0x0040, f01=0x018e, f02=»CHHEAD DATA C j " P FRE400,FRE500 BALANCE CLOSE P < P* OPEN D P R PFRE100 Z P B DECOOK h PFRE200 z P B DECOOK PFRE300 P B DECOOK P* BALANCE RECORD PFRE400 P B DECOOK P* CLOSE PFRE500
0x261bf8…261d8c Dummy {f00=0x0040, f01=0x018e, f02=» P EJECT P* P* BATCH TRANSMISSION P* < PTRANSM F P MOVE BTYPE,TYPE T 4 P IB TYPE,DC100,DC200,DC300 OPEN,BATCHHEAD,DATA C l P DC400,DC500 BALANCE,CLOSE P P & P* REQLEN REQUESTED LENGTH & P*
0x261d8c…261f20 Dummy {f00=0x0040, f01=0x0190, f02=» P* SEND '001'+DATE P* P ( PDC100 0 P TBT DCBAB,DC170 > P MOVE BIN4,W20 V . P DSC1 DSDCFD,ATTACH,BIN4 ATTACH DEVICE DC l P BNOK DCERR * P PERF GETBUF GET 3 CONSECUTIVE BUFFERS P B DC110 OK P B DCERR ERROR
0x261f20…2620b4 (1, 537) Dummy {f00=0x0093, f01=0x0190, f02=»WORK(W17),W0 LENGTH RECORD NO * P MOVE WORK(W19),W0 LENGTH SEQUENCE NO & " P CLEAR BCONT CONTINUATION MARK T P CLEAR BSUPR z P SET SPLITFL NORMAL SPLIT * P MOVE BIN6,=X'0036' FILE CODE PRINTER $ P PERF ATTDEV,BIN6 ATTACH DEVICE P B
0x2620b4…262248 Dummy {f00=0x0093, f01=0x0190, f02=»,TSKADR 0 P DSC1 DSDCFD,TRPAR,BIN4 PASS DCADR TO DRIVER P BNOK DCERR D " P MOVE REQLEN,=W'504' DCREQLEN X , P MOVE RECLGD,=D'128' OR =D'080' ??????? ~ P MOVE DCBUF,=C' ' " P MOVE REQDC,W0 BUFFER POINTER P EDSUB DCBUF,REQDC,SNDFRM2
0x262248…2623dc Dummy {f00=0x0093, f01=0x0190, f02=»N,RET l P* ENT P PDC160 $ P PERF DCSGON SIGN ON 2 P B DC165 OK N P B DCERR ERROR b P x PDC165 P B DECOOK OK P PDC170 ( P MOVE RETCON,=W'-4' ABORT CONVERSION P B DCERRT P PDCERR
0x2623dc…262570 Dummy {f00=0x0093, f01=0x0190, f02=» PDC180 & P DSC1 DSDCFD,TRPAR,W0 PASS DCADR 0 P B RETURN @ P EJECT R P* ` P* BATCHEAD RECORD j P* PDC200 P TBT DCBAB,DC330 ( P TBF BDAFOR,DC300 ANY FORCED FIELDS? , P EDWRT DEDSPRT,FBATC3 PRINT ERROR REPORT
0x262570…262704 Dummy {f00=0x0093, f01=0x0190, f02=»,DC305 PRINTING P CBE TYPE,W2,DC305 PRINTING P B DC308 NO PRINTING < PDC305 X * P* PRINT BATCH HEAD AND BALANCE RECORD f P MOVE DEBINW3,W1 P PRINT DEDSPRT,DEBINW3,W0 P BNOK DC335 PDC308 * P MOVE BIN10,WORK(W13) GE
0x262704…262898 Dummy {f00=0x0093, f01=0x0190, f02=»30 ABORTION PDC310 P MOVE BIN4,W0 " PDC311 8 P PERF CONV,BIN4,FC F P B DECOOK ALL DONE ` P B DC340 WRITE BLOCKS z P B DC315 CUMP FIELD EMPTHY P B DC320 BCD FIELD OVERFLOW " P B DC320 EDIT BUFFER OVERFLOW PDC31
0x262898…262a2c Dummy {f00=0x0093, f01=0x0190, f02=» P* PDC330 P MOVE RETCON,=W'-4' ABORT P B RETURN > P* P P* Z PDC335 d P MOVE RETCON,=W'35' r P B RETURN P* P* WRITE BLOCKS P* P PDC340 P PERF DCWRIT,FC,TYPE,RETCON P B D
0x262a2c…262bc0 Dummy {f00=0x0093, f01=0x0190, f02=»??????? ERROR, SEND TERMINATE ??????? P B DCERR 0 P EJECT @ PDC400 N P* BALANCE FORMAT P B DC300 z PDC500 P TBT DCBAB,DC560 ABORT P PERF DCSGOF P B DC510 P B DCERR PDC510 P MOVE STRG10A,HE
0x262bc0…262d54 (1, 538) Dummy {f00=0x00a2, f01=0x018e, f02=»FD,TRPAR,W0 PASS DCADR 0 P MOVE BIN4,W0 P DSC1 DSDCFD,DETACH,BIN4 6 P PERF DETPRT V P* RELEAS BUFFERS j & P PERF DEPOOL,W6,BIN10,BIN4,STRG10A P B DECOOK PDC560 P MOVE STRG10A,HEX00 P GETTIME STRG10A P MOVE TI
0x262d54…262ee8 Dummy {f00=0x00a2, f01=0x0190, f02=» P MOVE BTYPE,TYPE 6 P IB TYPE,LS100,LS200,LS300, OPEN,BATCHHEAD,DATA, C P LS400,LS500 BALANCE,CLOSE V P z PLS100 P TBT LSBAB,LS170 * P PERF GETBUF GET 3 CONSECUTIVE BUFFERS P B LS110 OK P B LSERR ERROR PLS110
0x262ee8…26307c Dummy {f00=0x00a2, f01=0x0190, f02=»OVE WORK(W19),W0 LENGTH SEQUENCE NO " P CLEAR BCONT CONTINUATION MARK , P CLEAR BSUPR R P CLEAR SPLITFL NNO SPLIT f ( P CLEAR FIRSTFL INITIATE FIRST RECORD $ P PERF ATTDEV,BIN6 ATTACH DEVICE P BNOK LSERR P MOVE STRG10A,HEX00
0x26307c…263210 Dummy {f00=0x00a2, f01=0x018e, f02=» P PLS170 ( P MOVE RETCON,=W'-4' ABORT CONVERSION P B LSERRT J PLSERR 0 P MOVE RETCON,=W'35' OUTPUT DEV NOT OPERABLE j PLSERRT P SET LSBAB P B RETURN P* P* BATCHEAD RECORD P* PLS200
0x263210…2633a4 Dummy {f00=0x00a2, f01=0x0190, f02=» & P MOVE RETCON,=W'-1' GET NEXT BATCH P B RETURN . PLS250 BATCHHEAD OR BALANCE @ P TBT LSBAB,LS170 d P MOVE DEBINW3,W1 | P PRINT DEDSPRT,DEBINW3,W0 P BNOK LSERR 2 P* CONVERT HEADER TO SET CONVERSION INDICATIONS PLS220
0x2633a4…263538 Dummy {f00=0x00a2, f01=0x0190, f02=»ELD NO z P MOVE BIN4,W0 PLS210 $ P PERF CONV,BIN4,FC 2 P B DECOOK ALL DONE L P B LS210 NOT ALL DONE f P B LS315 COMP FIELD EMPTY P B LS320 BCD FIELD OVERFLOW " P B LS320 EDIT BUFFER OVERFLOW P B DECOOK P
0x263538…2636cc Dummy {f00=0x00a2, f01=0x0190, f02=»DD BIN9,W1 $ P MOVE BIN8,W0 RESET FIELD NUMBER PLS310 : P MOVE BIN4,W0 H PLS311 ^ P PERF CONV,BIN4,FC l P B DECOOK ALL DONE P B LS340 WRITE BLOCKS P B LS315 CUMP FIELD EMPTY P B LS320 BCD FIELD OVERFLOW " P B L
0x2636cc…263860 Dummy {f00=0x00a2, f01=0x0190, f02=»SERRT P P* WRITE BLOCKS P , PLS340 4 P PERF LSWRIT,FC,TYPE,RETCON B P B LS310 OK f P B LS310 DUMMY z P B LS310 DUMMY * P MOVE BIN4,W1 CONTINUE IN SAME BUFFER P B LS311 P P PLS400 P* BALA
0x263860…2639f4 (1, 539) Dummy {f00=0x00a2, f01=0x018e, f02=»S570 PLS550 P CLEAR LSBAB P MOVE BIN4,W0 . P PERF DETPRT D P* RELEAS BUFFERS X & P PERF DEPOOL,W6,BIN10,BIN4,STRG10A p P B DECOOK PLS560 P MOVE STRG10A,HEX00 P GETTIME STRG10A P MOVE TIME,STRG10A P
0x2639f4…263b88 Dummy {f00=0x00a2, f01=0x0190, f02=» P EDWRT DEDSPRT,FLSEND P B LS550 " P EJECT 2 P* @ P* FLOPPY DUMPING J P* b P l PFLOPPY t P MOVE BTYPE,TYPE 4 P IB TYPE,FD100,FD200,FD300 OPEN,BATCHHEAD,DATA C P FD400,FD500 BALANCE,CLOSE P P P*
0x263b88…263d1c Dummy {f00=0x00a2, f01=0x0190, f02=»VE BUFFERS t P B FD110 OK P B FDERR ERROR & PFD110 < P MOVE CWFD,W7 HDR RECORD J P MOVE REQFD,=W'128' j 6 P CALL FDIO,DSFD,X'A1',BPOOL(BIN10),REQFD,CWFD OPEN P MOVE BIN4,W20 , P DSC1 DSFD,ATTACH,BIN4 ATTACH DEVICE FD P B
0x263d1c…263eb0 Dummy {f00=0x00a2, f01=0x0190, f02=»ORD COUNT v $ P MOVE WORK(W15),W0 LENGTH HEADER ! ( P MOVE WORK(W17),W0 LENGTH RECORD NO ! : * P MOVE WORK(W19),W0 LENGTH SEQUENCE NO ! f " P CLEAR BCONT CONTINUATION MARK ! P CLEAR BSUPR ! P SET SPLITFL NORMAL SPLIT ! * P MOVE BIN6,=X'0036' FILE
0x263eb0…264044 Dummy {f00=0x00a2, f01=0x018e, f02=»OVE TIME,STRG10A ! P EDWRT DEDSPRT,FFDHDR " " P PERF FDRVOL READ VOLUME LABEL " 6 P B FD150 OK " P B FDERR ERR " p PFD150 " . P IB DEBINW2,FD160,FD180,FD170 CLR,CAN,RET " P* ENT " P " PFD160 " $ P MOVE STR8A,STR8B SAVE FILE NAME
0x264044…2641d8 Dummy {f00=0x00a2, f01=0x0190, f02=» PFD165 # P B DECOOK OK # P # & PFD170 # . ( P MOVE RETCON,=W'-4' ABORT CONVERSION # < P B FDERRT # h P # z PFDERR # 0 P MOVE RETCON,=W'35' OUTP. DEV. NOT OPERABLE # PFDERRT # P SET FDBAB # P B RETURN # P # PFD180 #
0x2641d8…26436c Dummy {f00=0x00a2, f01=0x0190, f02=»55' CHANGE FD # P B RETURN $ P EJECT $ ( P* $ 6 P* BATCHEAD RECORD $ @ P* $ Z PFD200 $ d P TBT FDBAB,FD170 $ r ( P TBF BDAFOR,FD300 ANY FORCED FIELDS? $ , P EDWRT DEDSPRT,FBATC3 PRINT ERROR REPORT $ P SET FDBAB $ & P MOVE RETCON,=W'
0x26436c…264500 Dummy {f00=0x00a2, f01=0x018e, f02=» $ t P CBE TYPE,W2,FD305 PRINTING % P B FD308 NO PRINTING % , PFD305 % H * P* PRINT BATCH HEAD AND BALANCE RECORD % V P MOVE DEBINW3,W1 % P PRINT DEDSPRT,DEBINW3,W0 % P BNOK FDERR % PFD308 % * P MOVE BIN10,WORK(W13) GET BUFFER INDEX %
0x264500…264694 (1, 540) Dummy {f00=0x00a3, f01=0x0190, f02=» % PFD311 & P PERF CONV,BIN4,FC & P B DECOOK ALL DONE & 0 P B FD340 WRITE BLOCKS & J P B FD315 CUMP FIELD EMPTHY & h P B FD320 BCD FIELD OVERFLOW & " P B FD320 EDIT BUFFER OVERFLOW & PFD315 & P MOVE RETCON,W5 & P B FDERRT &
0x264694…264828 Dummy {f00=0x00a3, f01=0x0190, f02=»0 & P PERF FDWRIT,FC,TYPE,RETCON ' P B FD310 OK ' . P B FD360 ERROR ' B P B FDEOF05 EOE ' X * P MOVE BIN4,W1 CONTINUE IN SAME BUFFER ' n P B FD311 ' PFD350 ' P PERF FDLOAD ' P B FD370 OK ' P B FD360 ERROR ' PFD360 ' P M
0x264828…2649bc Dummy {f00=0x00a3, f01=0x018e, f02=»=W'55' CHANGE FLOPPYDISK ' P PERF DERROR,KEYTAB ( . P IB DEBINW2,FD350,FD360,FD170 CLR,CAN,RET ( < P B FD350 ENT ( n PFD370 ( " P PERF FDRVOL READ VOLUME LABEL ( P B FD375 OK ( P B FD360 ERROR ( PFD375 ( . P IB DEBINW2,FD380,FD360,FD
0x2649bc…264b50 Dummy {f00=0x00a3, f01=0x0190, f02=» ( P ) PFD382 ) P TBF FDEOF,FD340 NOT EOF ) * P MOVE RETCON,=W'-6' GET CURRENT RECORD ) > P B RETURN ) l P ) ~ PFDEOF05 ) P SET FDEOF INDICATE EOF ) & P MOVE WORK(W14),BIN8 SAVE FIELD NO ) P B FD360 ) P ) PFDEOF10 ) P
0x264b50…264ce4 Dummy {f00=0x00a3, f01=0x0190, f02=»,WORK(W14) GET FIELD NO ) P MOVE REQFD,=W'128' * P MOVE CWFD,W0 * < > P CALL FDIO,DSFD,X'06',BPOOL(BIN10),REQFD,CWFD WRITE BLOCKS * R P B FD340 * P EJECT * PFD400 * P* BALANCE FORMAT * P B FD300 * PFD500 * P TBT FDBAB,F
0x264ce4…264e78 Dummy {f00=0x00a3, f01=0x0190, f02=»QFD,=W'128' * P MOVE CWFD,W7 + 8 P CALL FDIO,DSFD,X'B8',BPOOL(BIN10),REQFD,CWFD UNLOAD + * PFD515 + f * P MOVE DEBINW4,=W'55' CHANGE FLOPPYDISK + t P PERF DERROR,KEYTAB + . P IB DEBINW2,FD520,FD510,FD170 CLR,CAN,RET + PFD520 + P PERF FDLO
0x264e78…26500c Dummy {f00=0x00a3, f01=0x0190, f02=»OR + PFD530 , . P IB DEBINW2,FD535,FD510,FD170 CLR,CAN,RET , P* ENT , J PFD535 , X $ P PERF FDWVOL WRITE VOLUME LABEL , f P B FD540 OK , P B FD510 ERROR , PFD540 , P MOVE REQFD,=W'128' , P MOVE CWFD,W0 , > P CALL FDIO,DSFD,
0x26500c…2651a0 Dummy {f00=0x00a3, f01=0x0190, f02=»SECTOR , ~ P MOVE REQFD,=W'128' - 8 P CALL FDIO,DSFD,X'B8',BPOOL(BIN10),REQFD,CWFD UNLOAD - * P CLEAR FDEOF RESET EOF - f P MOVE CWFD,W7 - P MOVE REQFD,=W'128' - 8 P CALL FDIO,DSFD,X'A2',BPOOL(BIN10),REQFD,CWFD CLOSE - P MOVE BIN4,W0 - P
0x2651a0…265334 (1, 541) Dummy {f00=0x00a3, f01=0x0190, f02=»560 - P MOVE STRG10A,HEX00 . P GETTIME STRG10A . ( P MOVE TIME,STRG10A . @ P EDWRT DEDSPRT,FFDERR . Z P B FD550 . x P . PFD570 . P MOVE STRG10A,HEX00 . P GETTIME STRG10A . P MOVE TIME,STRG10A . P EDWRT DEDSPRT,FFDEND .
0x265334…2654c8 Dummy {f00=0x00a3, f01=0x0190, f02=») . v P* / P / PGETBUF PROC / * P MOVE BIN10,W3 TOTAL NUMBER OF BUFFERS / 0 , P MOVE BIN4,W3 NO. OF COSECUTIVE BUFFERS / ^ @ P PERF DEPOOL,W2,BIN10,BIN4,STRG10A GET 3 COSECUTIVE BUFFERS / $ P BNOK GETBU2 NO BUFFERS AVAIBLE / , P MOVE WORK(W13
0x2654c8…26565c Dummy {f00=0x00a3, f01=0x0190, f02=»N10),=X'00' RESET TRANSMIT BUFFER / P RET 0 * PGETBU2 0 6 P RET 2 0 D P PEND 0 R P EJECT 0 ` P* 0 n , P* FDRVOL READ VOLUME LABEL AND DISPLAY 0 x P* 0 PFDRVOL PROC 0 P MOVE REQFD,=W'128' 0 & P MOVE BIN13,BIN10 GET BUFFER INDEX 0
0x26565c…2657f0 Dummy {f00=0x00a3, f01=0x0190, f02=» XSTAT DSFD,BIN4 0 P MOVE BIN7,=X'086F' 1 P CALL MASK,BIN4,BIN7 1 4 P BNOK FDRV02 1 P P MOVE BIN7,=W'66' 1 d 8 P XCOPY STR6A,W0,W6,BPOOL(BIN13),BIN7 EXPIRATION DATE 1 ~ 4 P XCOPY STR8A,W0,W8,BPOOL(BIN13),W5 GET FILE NAME 1 $ P MOVE BIN7,W22 GET REC
0x2657f0…265984 Dummy {f00=0x00a3, f01=0x0190, f02=»OL(BIN13),BIN7 GET FD NUMBER 1 z P ATTFMT FCAS02 2 $ P SET DEPROMPT 2 : P DISPLAY 0,W1,W0 2 P P THOME 2 h & P MOVE DEBINW3,W1 REQUESTED LENGTH 2 v 2 P NKI .NE,DEDSDYKB,STR1A,KEYTAB,DEBINW3,DEBINW2 2 P RET 2 PFDRV02 2 P RET 2 2 P PEND 2
0x265984…265b18 Dummy {f00=0x00a3, f01=0x0190, f02=» MOVE BIN13,BIN10 GET BUFFER INDEX 2 ( P ADD BIN13,W2 ADJUST FOR READ BUFFER 3 * * P EDSUB BPOOL(BIN13),BIN7,FRMVOL2 DATE 3 V P MOVE BIN7,W5 3 0 P EDSUB BPOOL(BIN13),BIN7,FRMVOL1 VOLUME NAME 3 P MOVE BIN7,=W'45' 3 . P EDSUB BPOOL(BIN13),BIN7,FRMVOL3
0x265b18…265cac Dummy {f00=0x00a3, f01=0x0190, f02=»(HDR1) 3 P XSTAT DSFD,BIN4 4 P MOVE BIN7,=X'024F' 4 & P CALL MASK,BIN4,BIN7 4 B P 4 ^ P BNOK FDWVO2 4 f & P ADD FDCNT,=D'1' UPDATE FD NUMBER 4 z P MOVE CWFD,=W'26' HDR RECORD 4 ( P MOVE REQFD,=W'128' REQUESTED LENGTH 4 8 P CALL FDIO,DSFD,X'B1
0x265cac…265e40 Dummy {f00=0x00a3, f01=0x0190, f02=»CKS 4 ~ P* 5 P 5 PLSWRIT PROC FC,TYPE,RETCON 5 P PERF BAWRIT,FC,TYPE,RETCON 5 @ P RET 5 d P RET 2 5 p P RET 4 5 ~ P RET 6 5 P PEND 5 P EJECT 5 P* 5 P* FDWRIT WRITE BLOCKS 5 P* 5 P 5 P 5 PFDWRIT PROC FC,T
0x265e40…265fd4 (1, 542) Dummy {f00=0x00a3, f01=0x018e, f02=»F EXTENT 5 PFDWR10 6 P MOVE BIN7,=X'024F' 6 P CALL MASK,BIN4,BIN7 6 : P BERR FDWR20 6 V 4 P IB BTYPE,FDWROP,FDWRHD,FDWRDATA,FDWRBAL,FDWRCL 6 j PFDWROP 6 PFDWRCL 6 P B FDWR20 6 PFDWRHD BATCH HEADER 6 4 P MOVE BPOOL(BIN10),=X'00'
0x265fd4…266168 Dummy {f00=0x00a3, f01=0x0190, f02=» P RET 2 7 PFDWRBAL 7 4 P MOVE BPOOL(BIN10),=X'00' INITIATE OUTPUT BUFFER 7 " P EDIT BPOOL(BIN9),FFD999 7 Z P MOVE BIN4,RECLGD 7 z . P XCOPY BPOOL(BIN10),W0,BIN4,BPOOL(BIN9),W0 7 P PERF FDSEND 7 P RET 7 P* 7 PFDWRDATA 7 P PERF BA
0x266168…2662fc Dummy {f00=0x00a3, f01=0x0190, f02=»JECT 7 P* 8 P* FDLOAD LOAD FD PROCEDURE 8 P* 8 : P 8 D P 8 L PFDLOAD PROC 8 T P MOVE CWFD,W7 HDR RECORD 8 h P MOVE REQFD,=W'128' 8 6 P CALL FDIO,DSFD,X'B7',BPOOL(BIN10),REQFD,CWFD LOAD 8 P XSTAT DSFD,BIN4 8 P CALL TESTB,BIN4,W
0x2662fc…266490 Dummy {f00=0x00a3, f01=0x0190, f02=»OVE CWFD,W7 HDR RECORD 8 P MOVE REQFD,=W'128' 9 8 P CALL FDIO,DSFD,X'B8',BPOOL(BIN10),REQFD,CWFD UNLOAD 9 : P RET 2 9 v P PEND 9 P EJECT 9 P* 9 P* DCRVOL DISPLAY 9 P* 9 PDCRVOL PROC 9 P ATTFMT SNDFRM 9 P SET DEPROMPT 9
0x266490…266624 Dummy {f00=0x00a3, f01=0x018e, f02=» P RET : PDCRV02 : P RET 2 : P PEND : , P EJECT : : P* : H P* BAWRIT WRITE BLOCKS : R P* : p P : z PBAWRIT PROC FC,TYPE,RETCON : PBAWR00 : " P* BIN16 NO OF CHARS TO SEND : . P* BIN4 AVAILABLE SPACE IN OUTPUT BUFFER :
0x266624…2667b8 Dummy {f00=0x00a3, f01=0x0190, f02=» : t ( P MOVE BIN4,RECLGD SET RECORD LENGTH ; , P ADD BCDI21(W5),=D'1' ADD 1 TO RECORD NO ; 4 . P ADD BCDI21(W4),=D'1' ADD 1 TO SEQUENCE NO ; d P CBE BCDI21(W4),=D'1',BAWR50 ; ( P* NOT FIRST TIME (SEQUENCE NO > 1) ; , P* COPY HEADER PART, LENGTH IN WOR
0x2667b8…26694c Dummy {f00=0x00a3, f01=0x018e, f02=»* FIRST OUTPUT RECORD FOR THIS INPUT RECORD ; P MOVE DEBIN3,W0 START POINT < 4 P* < X PBAWR55 < b . P CBL BIN16,BIN4,BAWR58 ROOM FOR EVERYTING? < p P NO ROOM < $ P TBT SPLITFL,BAWR57 NORMAL SPLIT < P FIND PRECEDING & < , P MOVE DEBIN1,BIN
0x26694c…266ae0 Dummy {f00=0x00a3, f01=0x0190, f02=» < r P MOVE DEBIN2,DEBIN1 = , P MATCH BPOOL(BIN9),DEBIN2,W1,STR2A,W0,W1 = $ P BNOK BAWR56 NOT FOUND = T P MOVE BIN15,DEBIN2 = r P B BAWR59 = P*NORMAL SPLIT = PBAWR57 = P MOVE BIN15,BIN4 = P B BAWR59 = ( P* NO OF CHARS, FIT IN AVAILA
0x266ae0…266c74 (1, 543) Dummy {f00=0x00a3, f01=0x0190, f02=»9),W0 COPY FIRST = f 6 P* MOVE BLANKS INTO REMAINING PART OF OUTPUT BUFFER > * P* BIN4 = NO OF CHARS IN OUTPUT BUFFER > R P MOVE BIN4,BIN15 > P ADD BIN4,DEBIN3 ADD HEADER > P* > P MOVE DEBIN1,RECLGD > " P SUB DEBIN1,BIN4 NO OF BLANKS > B P
0x266c74…266e08 Dummy {f00=0x00a3, f01=0x0190, f02=»BE WORK(W17),W0,BAWR70 SKIP IF LENGTH ZERO > . P MOVE STRG10A,BCDI21(W5) CONVERT RECORD NO ? 2 " P MOVE DEBIN1,W10 LENGTH FIELD ? d * P SUB DEBIN1,WORK(W17) FIND START OF NO ? : P XCOPY BPOOL(BIN10),WORK(W16),WORK(W17),STRG10A,DEBIN1 ? P* ? PBAWR70 ?
0x266e08…266f9c Dummy {f00=0x00a3, f01=0x0190, f02=»EQUENCE NO ? n " P MOVE DEBIN1,W10 LENGTH FIELD @ , P SUB DEBIN1,WORK(W19) FIELD START OF NO @ 8 : P XCOPY BPOOL(BIN10),WORK(W18),WORK(W19),STRG10A,DEBIN1 @ h P* @ PBAWR80 @ P* HANDLE END OF RECORD @ * P CBG BIN16,BIN15,BAWR100 NO ROOM, CONT @
0x266f9c…267130 Dummy {f00=0x00a3, f01=0x0190, f02=»'7F' EOR CHAR @ 4 P XCOPY BPOOL(BIN10),BIN4,W1,STR2A,W1 INSERT EOR A P ADD BIN4,W1 A N P* FLOPPY DISK A b P B BAWRSEND A x P* A PBAWR100 A P* A P IB FC, C A P DCWR105, SEND BATCH C A P BAWR105, DUMMY C A P BAWR105, D
0x267130…2672c4 Dummy {f00=0x00a3, f01=0x0190, f02=»105, DUMMY C A P LSWR105 LISTING B P B BAWR105 B . PDCWR105 B @ P PERF DCSEND,FC,TYPE,RETCON B P P B BAWR105 B t P* B PFDWR105 B ( P* CHECK IF CONTINUATION CHAR NEEDED B P TBF BCONT,FDWR150 B P* CONTINUATION B P MOVE DEBI
0x2672c4…267458 Dummy {f00=0x00a3, f01=0x0190, f02=»ATION MARK B v ( P XCOPY BPOOL(BIN10),BIN4,W1,STR2A,W1 C PFDWR150 C > P PERF FDSEND C N P B BAWR105 C b P* C t PLSWR105 C ~ P PERF LSSEND C P B BAWR105 C P* C PBAWR105 C P MOVE CWFD,W0 C 6 P DELETE BPOOL(BIN9),CWFD,BIN15 DELET
0x267458…2675ec Dummy {f00=0x00a3, f01=0x0190, f02=» RET 6 C P* D PBAWR110 REPEAT D P IB FC, C D 0 P BAWR111, SEND BATCH C D B P BAWR111, DUMMY C D b P BAWR111, DUMMY C D | P BAWR111, DUMMY C D P BAWR111, DUMMY C D P BAWR112, FD C D P BAWR111, DUMMY C D P BAWR111, D
0x2675ec…267780 Dummy {f00=0x00a3, f01=0x0190, f02=» P RET 8 E P* E P* E P* E & PBAWRSEND E 0 P* E @ P IB FC, C E J P DCWR205, SEND BATCH C E P BAWR205, DUMMY C E | P BAWR205, DUMMY C E P BAWR205, DUMMY C E P BAWR205, DUMMY C E " P FDWR205, FLOPPY CONVERSION C E
0x267780…267914 (1, 544) Dummy {f00=0x00a4, f01=0x0190, f02=»ETCON E z P B BAWR205 F P B BAWRERR F P* F 2 PFDWR205 F < P PERF FDSEND F L P B BAWR205 F ` P B BAWRERR F r P* F PLSWR205 F P PERF LSSEND F P B BAWR205 F P B BAWRERR F P* F PBAWR205 F PBAWRRET F P RET F
0x267914…267aa8 Dummy {f00=0x00a4, f01=0x0190, f02=»N1,RECLGD F P ADD DEBIN1,W2 G & P WRITE DEDSPRT,BPOOL(BIN10),DEBIN1 G ( P DLETE BPOOL(BIN10),W0,W2 G R P RET G t P PEND G P EJECT G PFDSEND PROC G P MOVE REQFD,=W'128' G P MOVE CWFD,W0 G 2 P CALL FDIO,DSFD,X'06',BPOOL(BIN10),REQ
0x267aa8…267c3c Dummy {f00=0x00a4, f01=0x0190, f02=»,TYPE,RETCON G P* H PDCWR00 H P CBNE TYPE,W4,DCWR010 H , P MOVE BIN4,W0 H J $ P EDSUB BPOOL(BIN10),BIN4,FDC999 H ` P PERF DCSEND,FC,TYPE,RETCON H P RET H P RET 2 H PDCWR010 H P MOVE BIN4,=W'600' H P DSC1 .NW,DSDCFD,STIMO,B
0x267c3c…267dd0 Dummy {f00=0x00a4, f01=0x0190, f02=»0 REPEAT H P PEND I P EJECT I P* I , 8 P* CONVERSI0N OF DATA ENTRY RECORDS TO BPOOL BUFFER I 6 P* RET =RECORD CONVERTED I r P* RET 2 =TRANSMIT I & P* RET 4 =CUMPULSORY FIELD EMPTHY I P* RET 6 =BCD-FIELD OVERFLOW I " P* RET 8 =ED
0x267dd0…267f64 Dummy {f00=0x00a4, f01=0x0190, f02=»PPL = 2 NO TRANSMIT FIELD I B P* APPL = 3 SUPPRESS LEADING ZEROES (IF HEADER:SETR GENEREL) J $ @ P* APPL = 4 LENGTH OF FIELD=MAXL (IF HEADER: SET GENERAL) J j " P* LISTE: ALWAYS SET J . P* FOLLOWING APPL ONLY USED IN BATCHHEADER J 0 P*
0x267f64…2680f8 Dummy {f00=0x00a4, f01=0x0190, f02=»CORD WHICH IS CONTINUED J b & P* LISTE: ALWAYS CLEAR K 0 P* APPL = 15 INSERT BACHNAME IN THIS FIELD K J 8 P* APPL = 16 FIELDS (STARTING WITH &) ARE NOT SPLIT K ~ & P* LSTE: ALWAYS CLEAR K P* K 0 P* APPL = 1XXX XXX=LENGT
0x2680f8…26828c Dummy {f00=0x00a4, f01=0x0190, f02=»SEQUENCE NUMBER FIELD K ` P* L P* BIN4 = WORK ITEM L ( P* BIN7 = MAX LENGTH L D P* BIN8 = FIELD NUMBER L ` " P* BIN9 = INDEX TO EDIT BUFFER L ~ " P* BIN13= DELETE START POINTER L P* BIN16= EDIT POINTER L P* L 4 P* BIN15 = NO OF CHAR
0x26828c…268420 Dummy {f00=0x00a4, f01=0x0190, f02=» WORK(W16) = RECORD NUMBER POSITION L ( P* WORK(W17) = RECORD NUMBER LENGTH M , 2 P* WORK(W18) = CONTINUATION SEQUENCE POSITION M X 0 P* WORD(W19) = CONTINUATION SEQUENCE LENGTH M 0 P* BCDI21(W4) = CONTINUATION SEQUENCE NUMBER M " P* BCDI21(W5) = RE
0x268420…2685b4 (1, 545) Dummy {f00=0x00a4, f01=0x0190, f02=»BCDI21(W4),=D'0' RESET SEQUENCE NO M ( P MOVE BIN13,W0 RESET DELETE POINTER N * ( P MOVE BIN16,BIN13 LOAD EDIT POINTER N V PCON100 N P CLEAR FSUPR N P TBF BSUPR,CON105 N P SET FSUPR N PCON105 N $ P ADD BIN8,W1 UPDATE FIELD NUMBER N " P C
0x2685b4…268748 Dummy {f00=0x00a4, f01=0x018e, f02=» FIELD EMPTHY N | PCON130 O P GETCTL 0,VSEIND GET APPL O $ P* O F 2 P CBL VSEIND,=W'1000',CON131 NORMAL APPL VALUE O P 6 P CBL VSEIND,=W'2000',APL1000 HANDLE RECORD HEADER O 2 P CBL VSEIND,=W'3000',APL2000 HANDLE RECORD NO O 4 P CBL VSEIND,=W'400
0x268748…2688dc Dummy {f00=0x00a4, f01=0x0190, f02=» 4 P* APPL=1000, WHERE XXX=LENGTH OF RECORD HEADER P PAPL1000 P < P SUB VSEIND,=W'1000' P L 8 P MOVE WORK(W15),VSEIND WORK(W15) = LENGTH OF HEADER P h P SET FIRSTFL FIRST TIME P P B CON100 P P* P . P* HANDLE POSITION AND LENGTH OF RECORD
0x2688dc…268a70 Dummy {f00=0x00a4, f01=0x0190, f02=»),BIN7 SET LENGTH OF RECORD NO P * P SUB VSEIND,=W'2000' ADJUST APPL VALUE Q & P B CON131 FURTHER HANDLING Q T P* Q v 0 P* HANDLE POSITION AND LENGTH OF SEQUENCE NO Q PAPL3000 Q < P MOVE WORK(W18),BIN16 SET START POSITION OF SEQUENCE NO Q $ P GET
0x268a70…268c04 Dummy {f00=0x00a4, f01=0x0190, f02=» B CON131 FURTHER HANDLING Q P* R " P* R , PCON131 R 6 P* R D P CBNE BTYPE,W3,CON150 R N P* DATA RECORD R l * P IB VSEIND,CON132,CON100,CON135,CON140 R PCON132 R P B CON190 R P* R PCON135 R P* SUPPRESS LEADING ZEROES R
0x268c04…268d98 Dummy {f00=0x00a4, f01=0x0190, f02=» P* S PCON150 S ( P* IN HEADER, SET GENERAL CONDITIONS S 6 P IB VSEIND,CON152,CON100,CON155,CON160,CON152, C S H , P CON152,CON152,CON152,CON152,CON152, C S 0 P CON152,CON152,CON165,CON170,CON175,CON180 S PCON152 S P B CON190 S P*
0x268d98…268f2c Dummy {f00=0x00a4, f01=0x0190, f02=» NO SUPPRESSION S ( P CBE W9,FC,CON100 LISTE: ALWAYS SET T P CLEAR BSUPR T D P B CON100 T X P* T j PCON165 T t P* EOR CHARACTER T P B CON100 T P* T PCON170 T P* CONTINUATION CHARACTER T * P CBE W9,FC,CON100 LISTE: ALWAYS CLEA
0x268f2c…2690c0 Dummy {f00=0x00a4, f01=0x0190, f02=»,W6 T P MOVE BIN4,W188 U P SUB BIN4,BIN7 LENGTH FIELD U $ P SUB BIN4,BIN16 U H 6 P EDSUB BPOOL(BIN9),BIN16,FMTBATCH INSERT BATCHNAME U ` P B CON260 U P* U PCON180 U , P* FIELDS (STARTING WITH &) ARE NOT SPLIT U $ P CLEAR SPLITFL NOT N
0x2690c0…269254 (1, 546) Dummy {f00=0x00a4, f01=0x0190, f02=» FSUPR,CON195 U ( P CALL EMPTYT,:FMTITEM TEST IF EMPTY V $ P BNZ CON280 EMPTY, IGNORE FIELD V B PCON195 V j P GETCTL 1,BIN7 GET MAXL V x P TSTCTL 0 TEST - ALPHA V P BZ CON200 BCD V P V P* ALPHA V P V * P MOVE BIN4,W188 GET EDIT BUF
0x269254…2693e8 Dummy {f00=0x00a4, f01=0x0190, f02=» BPOOL(BIN9),BIN16,FRMALP V P B CON260 W " P W 4 P EJECT W < P* BCD W J P W X PCON200 W ` & P CBG BIN7,W21,CONER2 BCD-OVERFLOW W n * P MOVE BIN4,W188 GET EDIT BUFFER LENGTH W * P SUB BIN4,BIN7 ADJUST WITH MAX LENGTH W , P SUB BIN4,BIN16 ADJU
0x2693e8…26957c Dummy {f00=0x00a4, f01=0x0190, f02=»BF FSUPR,CON210 W P CBE W9,FC,CON205 X $ P EDSUB BPOOL(BIN9),BIN16,FRMTCS X 2 P MOVE BIN13,BIN16 X Z P B CON280 X t PCON205 IF LISTE X 2 P EDSUB BPOOL(BIN9),BIN16,FRMZCS EDIT 21 DIGITS X P B CON215 X PCON210 X 2 P EDSUB BPOOL(BIN9)
0x26957c…269710 Dummy {f00=0x00a4, f01=0x0190, f02=» B CON250 X PCON220 Y P TBF FSUPR,CON230 Y P CBE W9,FC,CON225 Y : $ P EDSUB BPOOL(BIN9),BIN16,FRMTCD Y T P MOVE BIN13,BIN16 Y | P B CON280 Y PCON225 IF LISTE Y $ P EDSUB BPOOL(BIN9),BIN16,FRMZCD Y P B CON235 Y PCON230 Y $
0x269710…2698a4 Dummy {f00=0x00a4, f01=0x0190, f02=»LENGTH Y v 6 P DELETE BPOOL(BIN9),BIN13,BIN4 DELETE ADDED ZEROES Z PCON260 Z H . P ADD BIN13,BIN7 ADJUST DELETE/EDIT POINTER Z V ( P MOVE BIN16,BIN13 LOAD EDIT POINTER Z PCON280 Z P CBNE W9,FC,CON290 Z : P EDSUB BPOOL(BIN9),BIN16,FRMFILL LISTE: INSE
0x2698a4…269a38 Dummy {f00=0x00a4, f01=0x0190, f02=» Z t & P CLEAR FIRSTFL OUT OF FIRST HEADER [ PCON283 IN FIRST HEADER [ 2 P ADD WORK(W15),W1 [ R PCON285 [ l P MOVE BIN13,BIN16 [ z PCON290 [ ( P CBE VSEIND,W1,CONTRM APPL =1 TRANSM [ P MOVE BIN4,RECLGD [ P CBG BIN16,BIN4,CONTRM [ P B
0x269a38…269bcc Dummy {f00=0x00a4, f01=0x0190, f02=»D EMPTHY [ t $ PCONER2 RET 6 BCD FIELD OVERFLOW & PCONER3 RET 8 EDIT BUFFER OVERFLOW 8 P PEND b P EJECT p P* ~ P* FORMATS P* PFRMFILL FRMT P FILLR ' ',1 P FMEND P PFCOUNT FRMT P FTEXT ' 1'
0x269bcc…269d60 Dummy {f00=0x00a4, f01=0x018e, f02=» FILLR ' ',2 P FEOR ] P FMEND ] " P ] 0 PFRMVOL1 FRMT ] 8 P FCOPY STR8A ] L P FMEND ] ` P ] n PFRMVOL2 FRMT ] v P FMEL '999999',DATE ] P FMEND ] P ] PFRMVOL3 FRMT ] P FMEL '99',FDCNT ] P FMEND ] P ] PFBATC3 FRM
0x269d60…269ef4 (1, 547) Dummy {f00=0x00a4, f01=0x0190, f02=» ] P FNL ^ P FTEXT 'JOBNAME: ' ^ P FCOPY JOBNAME ^ . P FILLR ' ',4 ^ D P FTEXT 'BATCHNAME: ' ^ X P FCOPY BATCH ^ t P FILLR ' ',4 ^ P FMEND ^ P ^ PFMTBATCH FRMT ^ P FCOPY BATCH ^ P FMEND ^ P ^ PFFDHDR FRMT ^ P F
0x269ef4…26a088 Dummy {f00=0x00a4, f01=0x018e, f02=» FNL ^ P FEOR _ P FNL _ $ P FCOPY ='FLOPPY DISC SKRIVNING' _ & P FCOPY =' KLAR' _ N P FLINK HDR _ f P FEOR _ x P FNL _ P FMEND _ P _ PFFDERR FRMT _ P FNL _ P FEOR _ P FNL _ $ P FCOPY ='FLOPPY DISC SKRIVNING' _
0x26a088…26a21c Dummy {f00=0x00a4, f01=0x0190, f02=» _ P FNL ` P FCOPY ='LISTNING' ` P FLINK HDR ` . P FMEND ` @ P ` N PFLSEND FRMT ` V P FNL ` j P FEOR ` v P FNL ` P FCOPY ='LISTNING' ` P FCOPY =' KLAR' ` P FLINK HDR ` P FEOR ` P FNL ` P FMEND ` P ` PFLSE
0x26a21c…26a3b0 Dummy {f00=0x00a4, f01=0x0190, f02=» P FNL a P FMEND a P a PHDR FRMT a & P FILLR ' ',4 a 6 P FTEXT 'DATO: ' a J P FMEL '99-99-99',DATE a b P FILLR ' ',4 a P FTEXT 'TID: ' a P FMEL '99-99-99',TIME a P FEOR a P FNL a P FTEXT 'IND: ' a P FMEL '99999',NU
0x26a3b0…26a544 Dummy {f00=0x00a4, f01=0x0190, f02=» FSL a P FCOPY =C'DEVICE' b P FILLR ':',1 b & P FINP 9 b : P FCOPY STSAVE(W3) b J P FTAB 20 b d P FCOPY =C'FILE' b t P FILLR '-',1 b P FCOPY =C'NAME' b P FILLR ':',1 b P FINP 32 b P FCOPY STR8B b P FNL b P FCOPY =C'EX
0x26a544…26a6d8 Dummy {f00=0x00a4, f01=0x018e, f02=»PY STR8A b P FNL c & P FCOPY =C'OLD VOLUME SEQUENCE NO:' c P FINP 32 c F P FCOPY STR2A c V P FNL c j P FKI 1 c v P FCOPY HEX00 c P FMEND c P c PFFD999 FRMT c P FTEXT =C'SLUTD' c P FMEL '99999',BCDI21(W5) c P FILLR ' ',60
0x26a6d8…26a86c Dummy {f00=0x00a4, f01=0x018e, f02=» * P FMEL 'TTTTTTTTTTTTTTTTTTTT9',:FMTITEM d P FMEND d 2 P d @ PFRMTCS FRMT d H , P FMEL 'TTTTTTTTTTTTTTTTTTTT9-',:FMTITEM d P FMEND d P d PFRMZCD FRMT d * P FMEL 'ZZZZZZZZZZZZZZZZZZZZ9',:FMTITEM d P FMEND d P d PFRMZCS FRMT d
0x26a86c…26aa00 Dummy {f00=0x00a4, f01=0x0190, f02=» d h P FMEND e P e PFRMBCS FRMT e , P FMEL '999999999999999999999-',:FMTITEM e 2 P FMEND e b PSNDFRM FRMT e p P FSL e P FCOPY =C'DATATRANSMISSION' e P FILLR '?',1 e P FNL e P FNL e P FMEND e P* e PSNDFRM2 FRMT e
0x26aa00…26ab94 (1, 548) Dummy {f00=0x00a5, f01=0x0190, f02=»21(W5) e ~ P FMEND f P* f PFDCHDR FRMT f & P FNL f : P FEOR f F P FNL f T " P FCOPY =C'BATCH TRANSMISSION' f ` P FLINK HDR f P FMEND f P* f PFDCEND FRMT f P FNL f P FEOR f P FNL f P FCOPY ='BATCH TRANSMISSION' f
0x26ab94…26ad28 Dummy {f00=0x00a5, f01=0x40a0, f02=» ='BATCH TRANSMISSION' f P FCOPY =' AFBRYDES' g P FLINK HDR g : P FEOR g L P FNL g Z P FMEND g f P* g t P* g ~ P g P END g @ g P* f PFDCEND FRMT f P FNL f P FEOR f P FNL f P FCOPY ='BATCH TRANSMISSION' f
0x26ad28…26aebc Dummy {f00=0x00a5, f01=0x2008, f02=» h 0 & " ADD DEBIN2,W1 UPDATE FIELD NUMBER GETFLD 2,DEBIN2,DEBIN3 < BOK DEC130 BN DEC900 ALL FIELD DONE p & ! B DEC920 COMPULSORY FIELD EMPTHY DEC130 GETCTL 0,DEBIN5 GET APPL @ MOVE DEBINW1,DEBIN4 LOA
0x26aebc…26b050 Dummy {f00=0x00a5, f01=0x0190, f02=» 7jo " 1& W % 4 "1& M 0(W 1& !0) ! 6 W"0 0 $( # _.0 ! _y $5 !( * @ . !4 80 4 o? o0 0 6 4 Am4 0 0 4 6 v k | _ O x T u T
0x26b050…26b1e4 Dummy {f00=0x00a5, f01=0x0190, f02=» * ! & 3 8 ? P + +-0? 1 BATCH IN USESYMBOLICVALUE-SET XXXXTTT9TTTT9XXXXX- o A . 1 . . : k A C : A $ : A NOT . TIME-OUT CDV-ERROR NOT FOUND I/O-ERROR DATE ERR
0x26b1e4…26b378 Dummy {f00=0x00a5, f01=0x0190, f02=»ERED BATCH RECOVERY RUNNING. DISC NOT OPERABLE @ : l IN : k A CHANGE FLOPPY DISC DISC I/O-ERROR : ILLEGAL FORMAT NAME PRESS ENT TO CONFIRM NO WORKSPACE IN CORE FUNCTION NOT ALLOWED USERFILE ASSIGN-ERROR 95 % OF FILESPACE USED PRESS EN
0x26b378…26b50c Dummy {f00=0x00a5, f01=0x0190, f02=»EXECUTED TOO FEW INPUT CHARACTERS OUTPUT DEVICE NOT OPERABLE COMPULSORY FIELD NOT FILLED DEFINED LINE MAXIMUM EXCEEDED MAXIMUM RECORD-LENGTH EXCEEDED !MAXIMUM FORMAT-CODE SIZE EXCEEDED !MAXIMUM NUMBER OF FIELDS EXCEEDED (USERFILE NOT CLOSED IN PREVIOU
0x26b50c…26b6a0 Dummy {f00=0x00a5, f01=0x0190, f02=» : h y : k : l : : z : n : : g : ASD 5 PAGE : WARNING:REFERENCE TO FIELD (F ) OUTSIDE FORMAT DEFINITION ,OCCUPIED RECORDLENGTH CHANGED WITHIN FORMAT: m . SIZE ON DISC: . B $ : ! DOES NOT EXIST IN JOB-DEFINITION OR ON SYSTEM-D
0x26b6a0…26b834 (1, 549) Opaque[0x194]
0x26b834…26b9c8 # DirEnt {nam=»DCCONV«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x1740, f03=0x0000}
0x26b834…26b9c8 IdxSect {
0x26b834…26b9c8 f00 = 0x00ba // 0x26b834 @0x0
0x26b834…26b9c8 f01 = 0x0006 // 0x26b836 @0x2
0x26b834…26b9c8 gno = [ // 0x26b838 @0x4
0x26b834…26b9c8 [0x00]: C0x00ba.0x0.0
0x26b834…26b9c8 [0x01]: C0x00ba.0x1.0
0x26b834…26b9c8 [0x02]: C0x00ba.0x2.0
0x26b834…26b9c8 ]
0x26b834…26b9c8 }
0x26b9c8…26bb5c Dummy {f00=0x00ba, f01=0x018e, f02=» " P IDENT DCCONV NJ-AMT 830224/EV P BATCH TRANSMISSION * P DDUM DEDDIV H P PDIV P ENTRY DCSGON j P ENTRY DCSGOF P ENTRY DCSEND P* P EJECT P* P* KEYTABLE P* PCLR EQU X'8F' CLEAR
0x26bb5c…26bcf0 Dummy {f00=0x00ba, f01=0x018e, f02=» P P P* P* " P , PSTIMO EQU X'0B' 4 PATTACH EQU X'0E' L PDETACH EQU X'0F' d PTRPAR EQU X'00' | P EJECT P* 4 P* THIS MODULE CONTAINS SUBROUTINES TO BE USED " P* IN THE BATCH TRANSMISSION "
0x26bcf0…26be84 Dummy {f00=0x00ba, f01=0x018e, f02=» P* KENDEORD BCDI21(7)? P* & P 0 PDCSGON PROC 8 , P EDSUB DCBUF,REQDC,SIGONF INSERT SIGN ON L P PERF EXCHAN DCEXCHANGE | P RET P RET 2 P PEND P EJECT P* P* DCSGOF SEND SIGN OFF P* P
0x26be84…26c018 Dummy {f00=0x00ba, f01=0x0190, f02=» PDCSEND PROC FC,TYPE,RETCON P* & P* SEND DCDATA 0 6 P IB BTYPE,DCSNDON,DCSNDST,DCSNDDA,DCSNDSL,DCSNDOF F P* PDCSNDDA SEND DATA P MOVE DCWRK,REQDC PREV DATA P ADD DCWRK,BIN4 NEW DATA P CBNG DCWRK,REQLEN,DCSNDDA2
0x26c018…26c1ac Dummy {f00=0x00ba, f01=0x0190, f02=» P EDSUB DCBUF,REQDC,SNDFRM5 6 P XCOPY DCBUF,REQDC,BIN4,BPOOL(BIN10),W0 COPY DATA & " P ADD REQDC,BIN4 SET NEW LENGTH ` P B DCSNDOK P* PDCSNDON PDCSNDST PDCSNDSL PDCSNDOF P CBL REQDC,W6,DCSND4 P MOVE BTYP
0x26c1ac…26c340 Dummy {f00=0x00ba, f01=0x018e, f02=» x $ P B DCSNDNOK SEND AS NEW TYPE???? PDCSND4 0 P MOVE BTYPE,TYPE RESET BTYPE > P EDSUB DCBUF,REQDC,SNDFRM5 b 0 P XCOPY DCBUF,REQDC,BIN4,BPOOL(BIN10),W0 COPY P ADD REQDC,BIN4 SET LENGTH P PERF EXCHAN P B DCSNDOK P PERF TE
0x26c340…26c4d4 (1, 550) Dummy {f00=0x00ba, f01=0x0190, f02=» P* EXCHAN 6 P* DCEXCHANGE AND CHECK RESPONSE DEPENDING ON TYPE " P* OF DATA, HEAD, DATA, BALANCE N P* t PEXCHAN PROC ~ P MOVE DCWRK,W1 P DSC1 DSDCFD,STIMO,DCWRK P MOVE BIN7,W1 & P READ DSDCFD,STR8A,BIN7 DUMMY READ P
0x26c4d4…26c668 Dummy {f00=0x00ba, f01=0x0190, f02=»OVE REQDC,REQLEN SET MAX LENGTH P MOVE DCWRK,=W'600' TIME OUT ( & P DSC1 DSDCFD,STIMO,DCWRK TIME OUT L P READ DSDCFD,DCBUF,REQDC v P BNOK EXCHNOK P* P* CHECK RESPONSE P* P IB BTYPE, C P EXCHANON, C P EX
0x26c668…26c7fc Dummy {f00=0x00ba, f01=0x0190, f02=»NT ANSWER $ P MOVE STR8A,=C'DFH3504' LOOK FOR " P MOVE BIN7,W0 CORRECT RESPONSE : ( P MATCH DCBUF,BIN7,REQDC,STR8A,W0,W7 ` P BNE EXCHNOK P B EXCHOK P* " PEXCHANST AFTER START RECORD PEXCHANDA AFTER DATA RECORD & P M
0x26c7fc…26c990 Dummy {f00=0x00ba, f01=0x0190, f02=» P* PEXCHANSL AFTER SLUTD P PERF WRDC PRINT ANSWER 0 P MOVE STR8A,=C'0002' P P MOVE BIN7,W0 l ( P MATCH DCBUF,BIN7,REQDC,STR8A,W0,W4 P BNE EXCHNOK P B EXCHOK P* PEXCHANOF AFTER SIGN OFF P PERF WR
0x26c990…26cb24 Dummy {f00=0x00ba, f01=0x018e, f02=» TO X'2020272020 ' P EDSUB DCBUF,REQDC,SNDFRM2 P RET @ P* L PEXCHNOK V P RET 2 f P PEND t P EJECT P*SEND TERMINATE PTERMIN PROC P IB BTYPE, C P TERMON, C P TERMST, C P TERMDA, C
0x26cb24…26ccb8 Dummy {f00=0x00ba, f01=0x0190, f02=» t & P MOVE BPOOL(BIN13),=C'TERMINATE ' P MOVE BIN4,W10 2 P MOVE DCBUF,=C' ' H P MOVE REQDC,W0 b P EDSUB DCBUF,REQDC,SNDFRM5 x , P XCOPY DCBUF,REQDC,BIN4,BPOOL(BIN10),W0 P ADD REQDC,BIN4 NEW LENGTH P PERF EXCHAN P B TERMR
0x26ccb8…26ce4c Dummy {f00=0x00ba, f01=0x018e, f02=»WRDC PROC PRINT RECEIVED DC BUFFER $ P CBL REQDC,W1,WRDCRET NO MESSAGE , & P CBG REQDC,REQLEN,WRDCRET TOO LONG T * P* CHECK IF APPLICATION OR CICS MESSAGE ~ * P MOVE BIN13,WORK(W13) GET FIRST BUFFER P ADD BIN13,W2 P MOVE STR8A,=C'DFH'
0x26ce4c…26cfe0 Dummy {f00=0x00ba, f01=0x0190, f02=» x P* P* LOOK FOR 'SBA' 'ADR' 'ADR' P MOVE STR8A,=X'11' 'SBA' 6 P MOVE BIN7,W0 V ( P MATCH DCBUF,BIN7,REQDC,STR8A,W0,W1 l P BNE WRDCRET NO SBA P* $ P ADD BIN7,W3 BYPASS SBA SEQUENSE P MOVE DCWRK,BIN7 " P SUB REQDC
0x26cfe0…26d174 (1, 551) Dummy {f00=0x00ba, f01=0x0190, f02=» DCBUF,DCWRK,REQDC,STR8A,W0,W1 LOOK FOR NEXT SBA P BNE WRDC10 8 P SUB DCWRK,BIN7 DCWRK=LENGTH L * P COPY BPOOL(BIN13),W0,DCWRK,DCBUF,BIN7 p P EDWRT DEDSPRT,WRDCFRM & P ADD DCWRK,W3 BYPASS SBA SEQUENCE " P SUB REQDC,DCWRK ADJUST LENGTH
0x26d174…26d308 Dummy {f00=0x00ba, f01=0x018e, f02=»WRDC10 LAST LINE P B WRDC200 P* , P* CICS MESSAGE 6 P* L PWRDC100 V . P SUB REQDC,BIN7 ADJUST LENGTH (FROM 'DFH') f ( P CBL REQDC,=W'112',WRDC200 LAST LINE P MOVE DCWRK,=W'80' P MOVE STR8A,=C' ' 2 P MATCH DCBUF,DCW
0x26d308…26d49c Dummy {f00=0x00ba, f01=0x0190, f02=» P SUB DCWRK,BIN7 DCWRK=LENGTH * P COPY BPOOL(BIN13),W0,DCWRK,DCBUF,BIN7 ( & P EDWRT DEDSPRT,WRDCFRM PRINT LINE V " P SUB REQDC,DCWRK ADJUST LENGTH P ADD BIN7,DCWRK P* PWRDC200 LAST LINE 0 P MOVE BPOOL(BIN13),=X'00' CLEAR PRIN
0x26d49c…26d630 Dummy {f00=0x00ba, f01=0x0190, f02=»F,BIN7 p P EDWRT DEDSPRT,WRDCFRM P* , PWRDCRET 6 P RET F P PEND R P EJECT ` P* n P* FORMATS x P* P* PSIGONF FRMT P FTEXT 'CSSN PS=' P FMEL '9999',BCDI21(W6) P FTEXT ',NAME=' , P FME
0x26d630…26d7c4 Dummy {f00=0x00ba, f01=0x4114, f02=»SNDFRM2 FRMT P FILLR ' ',2 P FCOPY =X'272020' ( P FMEND B P* P PSNDFRM5 FRMT Z P FCOPY =X'112020' n P FMEND P* PWRDCFRM FRMT P FILLR ' ',2 P FCOPY BPOOL(BIN13) P FMEND P* P P END
0x26d7c4…26d958 Dummy {f00=0x00ba, f01=0x2008, f02=» 0 & " ADD DEBIN2,W1 UPDATE FIELD NUMBER GETFLD 2,DEBIN2,DEBIN3 < BOK DEC130 BN DEC900 ALL FIELD DONE p & ! B DEC920 COMPULSORY FIELD EMPTHY DEC130 GETCTL 0,DEBIN5 GET APPL @ MOVE DEBINW1,DEBIN4 LOA
0x26d958…26daec Dummy {f00=0x00ba, f01=0x0190, f02=» " $ & ' ( ) * , / 3 7 < B J S c s 0 0 0 ( = R g }
0x26daec…26dc80 Dummy {f00=0x00ba, f01=0x0190, f02=» m 4 4 m 4 4 6 "" "" * W< W:m j W( # W W m j W W 4 4 !0 !0I 60 0H Ta 60 0I TO6 $7 B h 'T6W( > h #T%W A h $T W W : m 4 4 6 "" " %
0x26dc80…26de14 (1, 552) Opaque[0x194]
0x26de14…26dfa8 # DirEnt {nam=»A «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x0788, f03=0x0000}
0x26de14…26dfa8 IdxSect {
0x26de14…26dfa8 f00 = 0x003c // 0x26de14 @0x0
0x26de14…26dfa8 f01 = 0x0002 // 0x26de16 @0x2
0x26de14…26dfa8 gno = [ // 0x26de18 @0x4
0x26de14…26dfa8 [0x00]: C0x003c.0x1.0
0x26de14…26dfa8 ]
0x26de14…26dfa8 }
0x26dfa8…26e13c Dummy {f00=0x003c, f01=0x0078, f02=» SCR SKF 1 TRA DEDDIV SCR 0 TRA NYCONV < KPF /O N SCR ASG /E0,TY10 h
0x26e13c…26e2d0 Dummy {f00=0x003c, f01=0x2008, f02=» SKF 1 TRA DEDDIV SCR 0 TRA NYCONV < KPF /O N SCR ASG /E0,TY10 h
0x26e2d0…26e464 Dummy {f00=0x003c, f01=0x0190, f02=»****************************** f P* & L P************************************************************************ 0 P EJECT P DDIV P TERM T1 P UWB CB1 P CWB CB2 P CWB CB3 P CWB CB4 P CWB CB5 P TWB TB2
0x26e464…26e5f8 Dummy {f00=0x003c, f01=0x018e, f02=»WB TB6 P CWB CB6 SHB WORK ITEM P EJECT , P* : P* DATA-SETS D P* ^ P* h P* r PDISK DSET FC=D0,DEV=DU | PDEDSDYKB DSET FC=20 PDEDSSCRN DSET FC=50 PDEDSPRT DSET FC=36 PDSDCFD DSET FC=61,DEV=DC SHB
0x26e5f8…26e78c Dummy {f00=0x003c, f01=0x0190, f02=» P* P* P* P START PTSDE " P STACK 400 6 P EJECT H P* V P* TERMINAL-BLOCK: 1 ` P* ( P* USAGE: DATA RECORD STORING P* PTB1 BLK PRBUF STRG 256 RECORD AREA * POVERFLOW STRG 10 OVE
0x26e78c…26e920 Dummy {f00=0x003c, f01=0x0190, f02=» ^ & P* USAGE: FORMAT-DEFINITION P* 2 PDB1 DBLK < " PFDVBCD BCDI (8),5 1=PAGE SIZE L P 2=LINE NUMBER r P 3=PAGE NUMBER P 4=FIELDNR P 5=FIELDSTART P 6=FIELDLENGTH P 7=MINIMUMLENGTH P 8=USE
0x26e920…26f5c0 (2, 0) DirGranule ((2, 0)) {
0x26e920…26f5c0 DirEnt {nam=»CON10 «, typ=» «, f00=0x0000, f01=0x0000, f02=0x2000, f03=0x0000}
0x26e920…26f5c0 DirEnt {nam=»CONFT «, typ=»UF«, f00=0x019a, f01=0x0198, f02=0x2008, f03=0x0008}
0x26e920…26f5c0 DirEnt {nam=»CONFP «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2010, f03=0x0000}
0x26e920…26f5c0 DirEnt {nam=»CTAB01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2018, f03=0x0000}
0x26e920…26f5c0 DirEnt {nam=»CTAB03«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2020, f03=0x0000}
0x26e920…26f5c0 DirEnt {nam=»CONFU «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2028, f03=0x0000}
0x26e920…26f5c0 DirEnt {nam=»LIST «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2030, f03=0x0000}
0x26e920…26f5c0 DirEnt {nam=»CNFT «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x07f0, f03=0x0000}
0x26e920…26f5c0 DirEnt {nam=»CNJP «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1660, f03=0x0000}
0x26e920…26f5c0 DirEnt {nam=»LISTC «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x20b0, f03=0x0000}
0x26e920…26f5c0 DirEnt {nam=»CNJA «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x07b8, f03=0x0000}
0x26e920…26f5c0 }
0x26f5c0…26f754 (2, 1) Opaque[0x194]
0x26f754…26f8e8 # DirEnt {nam=»CONFT «, typ=»UF«, f00=0x019a, f01=0x0198, f02=0x2008, f03=0x0008}
0x26f754…26f8e8 IdxSect {
0x26f754…26f8e8 f00 = 0x0100 // 0x26f754 @0x0
0x26f754…26f8e8 f01 = 0x0002 // 0x26f756 @0x2
0x26f754…26f8e8 gno = [ // 0x26f758 @0x4
0x26f754…26f8e8 [0x00]: C0x0100.0x1.0
0x26f754…26f8e8 ]
0x26f754…26f8e8 }
0x26f8e8…26fa7c Dummy {f00=0x0100, f01=0x0190, f02=» T; 01; TID=TB; TCL=TB; * LEV=55; : 01; J PTDC=T04; V PLC=03L; f 00; v T; P02; TID=T1; TCL=T1; LEV=60; 01; TDC=T01; LC=01L; 00; T;
0x26fa7c…26fc10 Dummy {f00=0x0100, f01=0x006a, f02=» PTDC=T05; PLC=08L; P01; $ PSDC=S01; 0 PU; @ P001; J PCB1; V P130; b3L; f 00; v T; P02; TID=T1; TCL=T1; LEV=60; 01; TDC=T01; LC=01L; 00; T;
0x26fc10…26fda4 Dummy {f00=0x0100, f01=0x2008, f02=» T05; PLC=08L; P01; $ PSDC=S01; 0 PU; @ P001; J PCB1; V P130; b3L; f 00; v T; P02; TID=T1; TCL=T1; LEV=60; 01; TDC=T01; LC=01L; 00; T;
0x26fda4…26ff38 Dummy {f00=0x0100, f01=0x0190, f02=»T1 SETFREA SETOCC UPDBOLN UPDBIN SETBY J CLEARB TESTB GETVOL RCNTRL WCNTRL b MSKOUTL f ATTBUF v FORCED~ GETVAL P:BAS GETACC < GETGEN @ GETDUP D GETIND H CMPIND b WRITDK x READDK ~ CLO
0x26ff38…2700cc Dummy {f00=0x0100, f01=0x0190, f02=» CDV10 I:EVA0 I:RT1 t VDATCHK 800829 DATCHKK MMDDCK I:EVA0 I:RT1 DDMMCK F *DEDDIV 800829 $$$TRA ^DCTASK 800829 $$$TRAT DCTASK T:DSC0T T:DSC1A T:READ0 T:XSTAF TESTB -
0x2700cc…270260 Dummy {f00=0x0100, f01=0x0190, f02=»RORF DETPRT EMPTYT0 GETFWD8 MASKN T:ATTF T:DISP T:DSC0 T:DSC1 T:EDWR T:GETC T:LWRI T:NKI T:PRINE T:READO T:THOMO T:TSTCR T:XSTAY TESTB C T:AD20 800829 T:AD20A " T:DD20 D:CB10 U:CB10 D:CB20 C:CB20 D:CB30. C:CB30- D:CB40A C:C
0x270260…2703f4 (2, 2) Opaque[0x194]
0x2703f4…270588 # DirEnt {nam=»CONFP «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2010, f03=0x0000}
0x2703f4…270588 IdxSect {
0x2703f4…270588 f00 = 0x0100 // 0x2703f4 @0x0
0x2703f4…270588 f01 = 0x0002 // 0x2703f6 @0x2
0x2703f4…270588 gno = [ // 0x2703f8 @0x4
0x2703f4…270588 [0x00]: C0x0100.0x2.0
0x2703f4…270588 ]
0x2703f4…270588 }
0x270588…27071c Dummy {f00=0x0100, f01=0x017c, f02=» T; P02; TID=T1; TCL=T1; * LEV=60; : 01; J TDC=T01; V LC=01L; f 00; v T; 01; PTID=D2; PTCL=D2; LEV=60; 00; P00; C; P02; PTDC=T03; PLC
0x27071c…2708b0 Dummy {f00=0x0100, f01=0x2008, f02=» P02; TID=T1; TCL=T1; * LEV=60; : 01; J TDC=T01; V LC=01L; f 00; v T; 01; PTID=D2; PTCL=D2; LEV=60; 00; P00; C; P02; PTDC=T03; PLC
0x2708b0…270a44 Dummy {f00=0x0100, f01=0x0190, f02=» . D2 x * ( `@ @ & 0
0x270a44…270bd8 Dummy {f00=0x0100, f01=0x0190, f02=» j p: z > h h 3 p 1 l t x x: 0 0}0 o0 oA T 0 K 0 Ad1 An@m 6 _ @n_ 1 An _% ) !P V _, 6 ## _ jX 3 0 0}@d "P n_r 4 # 6 P 7MW (j "M (
0x270bd8…270d6c Dummy {f00=0x0100, f01=0x0190, f02=» Vv 0 !!W6 'WH ! W+ " W% h * h `h h h 2` W 4 !4 "4 $4 & #4 H "4 4 * 4 | z { !V f 4 * " j !!L 0 /P /0 f 4 0 f 4 4 0 0 0 $0 T 0 0 W 0 W 0 4P +W 4 0 4 j
0x270d6c…270f00 Dummy {f00=0x0100, f01=0x0190, f02=» 4 $ !"4 "!4 !!4 I @w 0 0 V # 4 A 0 _ @ P 0 0 4 b !& bc 4 c b"R b! b 0 `" !($ 5W% a a0$a, 0 `aW a$$a, 0 `a0 ` b#$ ! 0 `f `f b" c$" ! b c b" W !4 ( #M0 T ! ! P.W< !0 P) * 2 *#U 1 *
0x270f00…271094 (2, 3) Opaque[0x194]
0x271094…271228 # DirEnt {nam=»CTAB01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2018, f03=0x0000}
0x271094…271228 IdxSect {
0x271094…271228 f00 = 0x0100 // 0x271094 @0x0
0x271094…271228 f01 = 0x0002 // 0x271096 @0x2
0x271094…271228 gno = [ // 0x271098 @0x4
0x271094…271228 [0x00]: C0x0100.0x3.0
0x271094…271228 ]
0x271094…271228 }
0x271228…2713bc Dummy {f00=0x0100, f01=0x0190, f02=» P IDENT CTAB01 79-08-31/LEKO ENTRY CTAB01 ( 0 PCTAB01 DATA FUNC,FUNC,UNSC,SHIFT,SHIFT,SHIFT > > PFUNC DATA /8C81,/0083,/8488,/8687,/8A89,/8E8D,/9D8B,/858F r : P DATA /3031,/3233,/3435,/3637,/3839,/9A9B,/9C90,/0091 : P DATA /9293,/9496,/989
0x2713bc…271550 Dummy {f00=0x0100, f01=0x0190, f02=»/3839,/8F91,/8580,/8A90 r : P DATA /4041,/4243,/4445,/4647,/4849,/4A4B,/4C4D,/4E4F : P DATA /5051,/5253,/5455,/5657,/5859,/5A5B,/5C5D,/7E00 ^ > PSHIFT DATA /2000,/0000,/0000,/002A,/8B3E,/003F,/3B5F,/3A00 : P DATA /3D21,/2223,/2425,/262F,/2829,/8F91,
0x271550…2716e4 Dummy {f00=0x0100, f01=0x4018, f02=» Z END @ r : P DATA /4041,/4243,/4445,/4647,/4849,/4A4B,/4C4D,/4E4F : P DATA /5051,/5253,/5455,/5657,/5859,/5A5B,/5C5D,/7E00 ^ > PSHIFT DATA /2000,/0000,/0000,/002A,/8B3E,/003F,/3B5F,/3A00 : P DATA /3D21,/2223,/2425,/262F,/2829,/8F91,
0x2716e4…271878 Dummy {f00=0x0100, f01=0x2008, f02=» END @ r : P DATA /4041,/4243,/4445,/4647,/4849,/4A4B,/4C4D,/4E4F : P DATA /5051,/5253,/5455,/5657,/5859,/5A5B,/5C5D,/5EFF ^ > PSHIFT DATA /20FF,/FFFF,/FFFF,/FF2A,/FFFF,/FF3F,/3B5F,/3AFF : P DATA /3D21,/2223,/2425,/262F,/2829,/FFFF,
0x271878…271a0c Dummy {f00=0x0100, f01=0x0190, f02=» SCTMMC SCTLACL SCTMMP 2 SCTLAP F SCTNPE Z SCTSTB8 n SCTOPTT SCTTCTN SCTCDT SCTBUG SCTDMTR , (
0x271a0c…271ba0 Dummy {f00=0x0100, f01=0x4050, f02=» _ :@ L F SCTNPE Z SCTSTB8 n SCTOPTT SCTTCTN SCTCDT SCTBUG SCTDMTR , (
0x271ba0…271d34 (2, 4) Opaque[0x194]
0x271d34…271ec8 # DirEnt {nam=»CTAB03«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2020, f03=0x0000}
0x271d34…271ec8 IdxSect {
0x271d34…271ec8 f00 = 0x0101 // 0x271d34 @0x0
0x271d34…271ec8 f01 = 0x0002 // 0x271d36 @0x2
0x271d34…271ec8 gno = [ // 0x271d38 @0x4
0x271d34…271ec8 [0x00]: C0x0101.0x0.0
0x271d34…271ec8 ]
0x271d34…271ec8 }
0x271ec8…27205c Dummy {f00=0x0101, f01=0x0190, f02=» P IDENT CTAB03 79-02-13/LEKO P ENTRY CTAB03 ( 0 PCTAB03 DATA FUNC,FUNC,UNSC,SHIFT,SHIFT,SHIFT > > 9FUNC DATA /8081,/8283,/8485,/8687,/8889,/8A8B,/8C8D,/8E8F r : P DATA /3031,/3233,/3435,/3637,/3839,/9A9B,/9C9D,/9091 : P DATA /9293,/9495,/969
0x27205c…2721f0 Dummy {f00=0x0101, f01=0x0190, f02=»/3839,/FFFF,/3C0A,/0DFF r : P DATA /4041,/4243,/4445,/4647,/4849,/4A4B,/4C4D,/4E4F : P DATA /5051,/5253,/5455,/5657,/5859,/5A5B,/5C5D,/5EFF ^ > PSHIFT DATA /20FF,/FFFF,/FFFF,/FF2A,/FFFF,/FF3F,/3B5F,/3AFF : P DATA /3D21,/2223,/2425,/262F,/2829,/FFFF,
0x2721f0…272384 Dummy {f00=0x0101, f01=0x4018, f02=» Z END @ r : P DATA /4041,/4243,/4445,/4647,/4849,/4A4B,/4C4D,/4E4F : P DATA /5051,/5253,/5455,/5657,/5859,/5A5B,/5C5D,/5EFF ^ > PSHIFT DATA /20FF,/FFFF,/FFFF,/FF2A,/FFFF,/FF3F,/3B5F,/3AFF : P DATA /3D21,/2223,/2425,/262F,/2829,/FFFF,
0x272384…272518 Dummy {f00=0x0101, f01=0x2008, f02=» END @ r : P DATA /4041,/4243,/4445,/4647,/4849,/4A4B,/4C4D,/4E4F : P DATA /5051,/5253,/5455,/5657,/5859,/5A5B,/5C5D,/5EFF ^ > PSHIFT DATA /20FF,/FFFF,/FFFF,/FF2A,/FFFF,/FF3F,/3B5F,/3AFF : P DATA /3D21,/2223,/2425,/262F,/2829,/FFFF,
0x272518…2726ac Dummy {f00=0x0101, f01=0x0190, f02=»ORTED z PCREDIT EQU 1 P EJECT " P 0 P* 8 P* ABORT I/O REQUEST B P* ^ P h PTABORT LDR* A3,A8 p , P RF(N) TABOER REQUEST ALREADY COMPLETED P ( P CF A15,FNDDWT LOOK FOR DWT ADDRESS P LDR A8,A6 P RF(Z) T
0x2726ac…272840 Dummy {f00=0x0101, f01=0x0190, f02=»OER DEVICE NOT BUSY P P SLC A7,2 $ $ P RF(NN) TABO20 NOT ECHO REQUEST 6 " P LD A6,DWTECH,A6 GET ECHO DWT ^ $ P CF A15,TENDIO ABORT ECHO DEVICE P LDR A6,A8 RESTORE DWT PTABO20 EQU * . P CF A15,ITABRT ABORT IF INTERTASK REQUEST
0x272840…2729d4 (2, 5) Opaque[0x194]
0x2729d4…272b68 # DirEnt {nam=»CONFU «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2028, f03=0x0000}
0x2729d4…272b68 IdxSect {
0x2729d4…272b68 f00 = 0x0101 // 0x2729d4 @0x0
0x2729d4…272b68 f01 = 0x0002 // 0x2729d6 @0x2
0x2729d4…272b68 gno = [ // 0x2729d8 @0x4
0x2729d4…272b68 [0x00]: C0x0101.0x1.0
0x2729d4…272b68 ]
0x2729d4…272b68 }
0x272b68…272cfc Dummy {f00=0x0101, f01=0x00e0, f02=» T; P02; TID=T1; TCL=T1; * LEV=60; : 01; J TDC=T01; V LC=01L; f 00; v C; P01; PTCL=T03; PLC=07L; P02; PSDC=S01; PSDC=S03; LC=01L; 00; T;
0x272cfc…272e90 Dummy {f00=0x0101, f01=0x2008, f02=» P02; TID=T1; TCL=T1; * LEV=60; : 01; J TDC=T01; V LC=01L; f 00; v C; P01; PTCL=T03; PLC=07L; P02; PSDC=S01; PSDC=S03; LC=01L; 00; T;
0x272e90…273024 Dummy {f00=0x0101, f01=0x0190, f02=»
[…0x1…]
0x2731b8…27334c Dummy {f00=0x0101, f01=0x0190, f02=» n 6 $ B 8
0x27334c…2734e0 Dummy {f00=0x0101, f01=0x0190, f02=» ? < DC a DC TK LP 6 GP 0 DU FD DLU * B . D Z p -
0x2734e0…273674 (2, 6) Opaque[0x194]
0x273674…273808 # DirEnt {nam=»LIST «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2030, f03=0x0000}
0x273674…273808 IdxSect {
0x273674…273808 f00 = 0x0101 // 0x273674 @0x0
0x273674…273808 f01 = 0x0002 // 0x273676 @0x2
0x273674…273808 gno = [ // 0x273678 @0x4
0x273674…273808 [0x00]: C0x0101.0x2.0
0x273674…273808 ]
0x273674…273808 }
0x273808…27399c Dummy {f00=0x0101, f01=0x007a, f02=» PRT CONFT PRT CONFP PRT CONFU ( ASM CTAB01 : ASM CTAB03 L SCR ^ ASG /E0,TY10 j
0x27399c…273b30 Dummy {f00=0x0101, f01=0x2008, f02=» CONFT PRT CONFP PRT CONFU ( ASM CTAB01 : ASM CTAB03 L SCR ^ ASG /E0,TY10 j
0x273b30…273cc4 Dummy {f00=0x0101, f01=0x0000, f02=»
[…0x3…]
0x274180…274314 (2, 7) Opaque[0x194]
0x274314…2744a8 # DirEnt {nam=»CNFT «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x07f0, f03=0x0000}
0x274314…2744a8 IdxSect {
0x274314…2744a8 f00 = 0x003f // 0x274314 @0x0
0x274314…2744a8 f01 = 0x0002 // 0x274316 @0x2
0x274314…2744a8 gno = [ // 0x274318 @0x4
0x274314…2744a8 [0x00]: C0x003f.0x2.0
0x274314…2744a8 ]
0x274314…2744a8 }
0x2744a8…27463c Dummy {f00=0x003f, f01=0x0190, f02=» PT; P01; PTID=TB; PTCL=TB; * PLEV=55; : P00; J P01; V PSDC=S02; b PT; r P02; | PTID=T1; PTCL=T1; PLEV=60; P01; PTDC=T01; PLC=01L; P00; PC; P02; PTD
0x27463c…2747d0 Dummy {f00=0x003f, f01=0x000c, f02=» P130; P01; PTID=TB; PTCL=TB; * PLEV=55; : P00; J P01; V PSDC=S02; b PT; r P02; | PTID=T1; PTCL=T1; PLEV=60; P01; PTDC=T01; PLC=01L; P00; PC; P02; PTD
0x2747d0…274964 Dummy {f00=0x003f, f01=0x2008, f02=» P01; PTID=TB; PTCL=TB; * PLEV=55; : P00; J P01; V PSDC=S02; b PT; r P02; | PTID=T1; PTCL=T1; PLEV=60; P01; PTDC=T01; PLC=01L; P00; PC; P02; PTD
0x274964…274af8 Dummy {f00=0x003f, f01=0x0190, f02=» 4 8 F - " r h n ZnZR h-F ,F J T
0x274af8…274c8c Dummy {f00=0x003f, f01=0x0190, f02=» ! ' . 5 < D L T ] f p { ( < S k T 1l
0x274c8c…274e20 Dummy {f00=0x003f, f01=0x0190, f02=»P8 <<HT _ R <A_ <A <a ^ <h = F F ) 1l ' =" z 1l & X X X* T Z0 I R < _ <h =_H ^L _ _R 1l & G _d 1l F '_p R : <<H P < : 1l 1l & R P _v _| V V Q WR
0x274e20…274fb4 (2, 8) Opaque[0x194]
0x274fb4…275148 # DirEnt {nam=»CNJP «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x1660, f03=0x0000}
0x274fb4…275148 IdxSect {
0x274fb4…275148 f00 = 0x00b3 // 0x274fb4 @0x0
0x274fb4…275148 f01 = 0x0002 // 0x274fb6 @0x2
0x274fb4…275148 gno = [ // 0x274fb8 @0x4
0x274fb4…275148 [0x00]: C0x00b3.0x0.0
0x274fb4…275148 ]
0x274fb4…275148 }
0x275148…2752dc Dummy {f00=0x00b3, f01=0x012e, f02=» PT; P02; PTID=T1; PTCL=T1; * PLEV=60; : P01; J PTDC=T01; V PLC=01L; f P00; v PC; P02; PTDC=T03; PLC=01L; PTDC=T02; PLC=02L; P02; PSDC=S01; PSDC=S04; PU;
0x2752dc…275470 Dummy {f00=0x00b3, f01=0x2008, f02=» P02; PTID=T1; PTCL=T1; * PLEV=60; : P01; J PTDC=T01; V PLC=01L; f P00; v PC; P02; PTDC=T03; PLC=01L; PTDC=T02; PLC=02L; P02; PSDC=S01; PSDC=S04; PU;
0x275470…275604 Dummy {f00=0x00b3, f01=0x2008, f02=» M+MU,M+MOUT,M+MU+MOUT HMES 4 FC & : HMES ANY COMBINATION OF ALTERNATIVE 1,2 AND 3 IS VALID, 6 0 HMES AND AT LEAST ONE OF THEM MUST BE CHOOSEN t 0 HMES ALTERNATIVE 4 MAY BE INCLUDED IF NEEDED HEND * HMES ILLEGAL PARAMETER COMBINATIO
0x275604…275798 Dummy {f00=0x00b3, f01=0x0190, f02=» , ( w V X ( x C T:SCUW 4 , ( ( Y * X Y , X F , ( X C & C C v T:IOER , ( ( B P 9 R 9 X , ( !@P X X * b ) Y *
0x275798…27592c Dummy {f00=0x00b3, f01=0x0190, f02=» B U C Q C D T:CLR1 * T:CLR2 < , ( mP X X * $" ~_> @ Y N , ( X * _R X !@XX y X # ~ , ( x V y X X * P , ( P 1 _ 1 X * X
0x27592c…275ac0 Dummy {f00=0x00b3, f01=0x4148, f02=» X n T:CLIT T:EKEY , ( C $ " P y _ x T 2 , ( a@ X H X X * , )$ b P _ : H D !T P d )Wv 9 T UP m d yV& Ph R^ PP #P =T QU [Q e r g t 4 0 i k m
0x275ac0…275c54 (2, 9) Opaque[0x194]
0x275c54…275de8 # DirEnt {nam=»LISTC «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x20b0, f03=0x0000}
0x275c54…275de8 IdxSect {
0x275c54…275de8 f00 = 0x0105 // 0x275c54 @0x0
0x275c54…275de8 f01 = 0x0002 // 0x275c56 @0x2
0x275c54…275de8 gno = [ // 0x275c58 @0x4
0x275c54…275de8 [0x00]: C0x0105.0x2.0
0x275c54…275de8 ]
0x275c54…275de8 }
0x275de8…275f7c Dummy {f00=0x0105, f01=0x0076, f02=» PPRT CONFT PPRT CONFP PPRT CONFU ( PPRT CNFT : PPRT CNJP J SCR Z ASG /E0,TY10 f * HMES ILLEGAL PARAMETER COMBINATION !!! z * HMES FOLLOWING COMBINATIONS ARE VALID: " HMES 1 A,A+AU,A+AOUT,A+AU+AOUT " HMES 2 C,C+CU
0x275f7c…276110 Dummy {f00=0x0105, f01=0x2008, f02=» CONFT PPRT CONFP PPRT CONFU ( PPRT CNFT : PPRT CNJP J SCR Z ASG /E0,TY10 f * HMES ILLEGAL PARAMETER COMBINATION !!! z * HMES FOLLOWING COMBINATIONS ARE VALID: " HMES 1 A,A+AU,A+AOUT,A+AU+AOUT " HMES 2 C,C+CU
0x276110…2762a4 Dummy {f00=0x0105, f01=0x2008, f02=» MES AND AT LEAST ONE OF THEM MUST BE CHOOSEN 0 HMES ALTERNATIVE 4 MAY BE INCLUDED IF NEEDED < HEND p HMES ILLEGAL PARAMETER COMBINATION !!! z * HMES FOLLOWING COMBINATIONS ARE VALID: " HMES 1 A,A+AU,A+AOUT,A+AU+AOUT " HMES 2 C,C+CU
0x2762a4…276438 Dummy {f00=0x0105, f01=0x0190, f02=» , ( a , ( q 4 HALTN d t SCTMSZK SCTSFA SCTEFA SCTIPL SCTANO SCTADA , (
0x276438…2765cc Dummy {f00=0x0105, f01=0x0190, f02=» SCTNOP SCTPSZ SCTMMC 0 SCTLAC D SCTMMPL X SCTLAP0 l SCTNPE SCTSTB SCTOPT SCTBUG SCTDMT~ , (
0x2765cc…276760 Dummy {f00=0x0105, f01=0x407a, f02=»CTDCT ^ _ . D d@ v l SCTNPE SCTSTB SCTOPT SCTBUG SCTDMT~ , (
0x276760…2768f4 (2, 10) Opaque[0x194]
0x2768f4…276a88 # DirEnt {nam=»CNJA «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x07b8, f03=0x0000}
0x2768f4…276a88 IdxSect {
0x2768f4…276a88 f00 = 0x003d // 0x2768f4 @0x0
0x2768f4…276a88 f01 = 0x0002 // 0x2768f6 @0x2
0x2768f4…276a88 gno = [ // 0x2768f8 @0x4
0x2768f4…276a88 [0x00]: C0x003d.0x3.0
0x2768f4…276a88 ]
0x2768f4…276a88 }
0x276a88…276c1c Dummy {f00=0x003d, f01=0x012e, f02=» PT; P01; PTID=T1; PTCL=T1; * PLEV=60; : P01; J PTDC=T01; V PLC=01L; f P00; v PC; P02; PTDC=T03; PLC=02L; PTDC=T02; PLC=02L; P02; PSDC=S01; PSDC=S04; PU;
0x276c1c…276db0 Dummy {f00=0x003d, f01=0x2008, f02=» P01; PTID=T1; PTCL=T1; * PLEV=60; : P01; J PTDC=T01; V PLC=01L; f P00; v PC; P02; PTDC=T03; PLC=02L; PTDC=T02; PLC=02L; P02; PSDC=S01; PSDC=S04; PU;
0x276db0…276f44 Dummy {f00=0x003d, f01=0x2008, f02=» AT LEAST ONE OF THEM MUST BE CHOOSEN 0 HMES ALTERNATIVE 4 MAY BE INCLUDED IF NEEDED 4 HEND h * HMES ILLEGAL PARAMETER COMBINATION !!! t * HMES FOLLOWING COMBINATIONS ARE VALID: " HMES 1 A,A+AU,A+AOUT,A+AU+AOUT " HMES 2 C,C+CU,C+COU
0x276f44…2770d8 Dummy {f00=0x003d, f01=0x0190, f02=» _$ _ y z T:CLR2 ^ T:SCUW . * & Y @_6 x X@ X X # @ , ( u C _. B ]d P C n , ( Q X8_H x XD @ Y c C y , ( XR X x x T:BELL
0x2770d8…27726c Dummy {f00=0x003d, f01=0x0190, f02=» T:LOFS I:EVA0 T:LOPS , , ( @H ( ( > T:CLMI n , ( #H : B C _J + T:PM1 @ T:GRFC , ( ? . X 9 V ! P @ Y T
0x27726c…277400 Dummy {f00=0x003d, f01=0x409a, f02=» @ v YTf a eR k B uT y Q T , P R P V 8 4 VV T P #Q( S P Q8 , 3 < MV SP H @ C _J + T:PM1 @ T:GRFC , ( ? . X 9 V ! P @ Y T
0x277400…2780a0 (3, 0) DirGranule ((3, 0)) {
0x277400…2780a0 DirEnt {nam=»M:DENJ«, typ=» «, f00=0x0000, f01=0x0000, f02=0x2040, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»M:DENJ«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2048, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»TCLASS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2980, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x0000, f01=0x0000, f02=0x2090, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»SCLASS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2080, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»MONTAB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x20a0, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»SYSTAB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2480, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»TDISP «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x20c0, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»LRPINT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24b8, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»TPROC «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2140, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»MSUBS «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2108, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»TTMJOB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2130, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»TOSSIO«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2328, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»SYSLDM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2178, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»SYSLDA«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2200, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»LDTASK«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x22f8, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»DRSW01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2368, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»ST8000«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2350, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»PFTAB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24a0, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»LKMAL «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x25b0, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»CTABX «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24c8, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»TIODMX«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24d0, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»DSKSUB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24d8, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»DVTKB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x27a8, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»DVTGP «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2378, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»DVTDY «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2380, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»DRKB03«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2750, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»DRGP01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2388, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»DRDY01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x23c0, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»DRLT01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2400, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»DRSOP1«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2450, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»DRTW01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x20d8, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»DRLP01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x26c8, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»DRFD01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x07e0, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»EBCDIC«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0778, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»TIMER «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x28e8, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»TMMLKM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2160, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»TLDSEG«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x20f0, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»TABORT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2568, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»MONTIM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2580, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»TOSSFM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2598, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»FMTASK«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x29a0, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»DFTAB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2088, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»DVKB00«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24a8, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»DVDY00«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24b0, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»DVGP01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24f8, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»DVDY02«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2960, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»DVGP03«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2970, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»M:DENJ«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0820, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»CTAB01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2728, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»SYSBUG«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2708, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»M:DEBG«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x2d28, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»DRFDDE«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2a90, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»DRFDDE«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2a98, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»M:DEBF«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x2aa0, f03=0x0000}
0x277400…2780a0 DirEnt {nam=»CTABSH«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2720, f03=0x0000}
0x277400…2780a0 }
0x2780a0…278234 (3, 1) Opaque[0x194]
0x278234…2783c8 # DirEnt {nam=»M:DENJ«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2048, f03=0x0000}
0x278234…2783c8 IdxSect {
0x278234…2783c8 f00 = 0x0102 // 0x278234 @0x0
0x278234…2783c8 f01 = 0x000e // 0x278236 @0x2
0x278234…2783c8 gno = [ // 0x278238 @0x4
0x278234…2783c8 [0x00]: C0x0102.0x1.0
0x278234…2783c8 [0x01]: C0x0102.0x2.0
0x278234…2783c8 [0x02]: C0x0102.0x3.0
0x278234…2783c8 [0x03]: C0x0103.0x0.0
0x278234…2783c8 [0x04]: C0x0103.0x1.0
0x278234…2783c8 [0x05]: C0x0103.0x2.0
0x278234…2783c8 [0x06]: C0x0103.0x3.0
0x278234…2783c8 ]
0x278234…2783c8 }
0x2783c8…27855c Dummy {f00=0x0102, f01=0x0190, f02=» ASG /02,NO MOV TCLASS,/S,TOSSWORK KPF /S,TCLASS 4 SCR J INC TCLASS,TOSSWORK V KPF /O r MOV SCLASS,/S,TOSSWORK KPF /S,SCLASS SCR INC SCLASS,TOSSWORK KPF /O MOV MONTAB,/S,TOSSWORK
0x27855c…2786f0 Dummy {f00=0x0102, f01=0x0190, f02=» MOV TDISP,/S,TOSSWORK KPF /S,TDISP " SCR 6 MOV LRPINT,/S,TOSSWORK B KPF /S,LRPINT ` SCR v MOV TPROC,/S,TOSSWORK KPF /S,TPROC SCR MOV MSUBS,/S,TOSSWORK KPF /S,MSUBS SCR MOV TTMJOB
0x2786f0…278884 Dummy {f00=0x0102, f01=0x0190, f02=»WORK ~ KPF /S,SYSLDM SCR " MOV SYSLDA,/S,TOSSWORK . KPF /S,SYSLDA L SCR b MOV LDTASK,/S,TOSSWORK n KPF /S,LDTASK SCR MOV DRSW01,/S,TOSSWORK KPF /S,DRSW01 SCR MOV ST8000,/S,TOSSWORK
0x278884…278a18 Dummy {f00=0x0102, f01=0x0190, f02=»,LKMAL SCR MOV CTABX,/S,TOSSWORK KPF /S,CTABX 8 SCR L MOV TIODMX,/S,TOSSWORK X KPF /S,TIODMX v SCR INC TIODMX,TOSSWORK KPF /O MOV DSKSUB,/S,TOSSWORK KPF /S,DSKSUB SCR LED DS
0x278a18…278bac Dummy {f00=0x0102, f01=0x0190, f02=»852 EQU 1$$CPU852 EQU 0$$ !!EN " ASM /S . KPF /O < KPF /S J SCR X LED SYSTAB d ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ v ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN AS
0x278bac…278d40 Dummy {f00=0x0102, f01=0x0190, f02=»MUPAG EQU 1$$ z ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN B ASM /S N KPF /O KPF /S j SCR x LED LRPINT ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU85
0x278d40…278ed4 (3, 2) Dummy {f00=0x0102, f01=0x0190, f02=»$ n ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ 6 !!EN b ASM /S n KPF /O | KPF /S SCR LED MSUBS ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$
0x278ed4…279068 Dummy {f00=0x0102, f01=0x0190, f02=»CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ * ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ V !!EN ASM /S KPF /O KPF /S SCR LED TOSSIO ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ( #!!CH $
0x279068…2791fc Dummy {f00=0x0102, f01=0x0190, f02=»SCR LED SYSLDM ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ J ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ v !!EN ASM /S KPF /O KPF /S SCR LED SYSLDA ( #!!CH $$CREDIT EQU
0x2791fc…279390 Dummy {f00=0x0102, f01=0x0190, f02=» KPF /O KPF /S SCR LED LDTASK , ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ > ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ j ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN ASM /S KPF /O KPF /S SCR LED
0x279390…279524 Dummy {f00=0x0102, f01=0x0190, f02=»$ n !!EN ASM /S KPF /O $ KPF /S 2 SCR @ LED ST8000 L ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ^ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN ASM /S KPF /O
0x279524…2796b8 Dummy {f00=0x0102, f01=0x0190, f02=» SCR MOV DVTDY,/S,TOSSWORK KPF /S,DVTDY . SCR B MOV DRKB03,/S,TOSSWORK N KPF /S,DRKB03 l SCR MOV DRGP01,/S,TOSSWORK KPF /S,DRGP01 SCR MOV DRDY01,/S,TOSSWORK KPF /S,DRDY01 SCR
0x2796b8…27984c Dummy {f00=0x0102, f01=0x0190, f02=»V DRTW01,/S,TOSSWORK KPF /S,DRTW01 SCR 2 MOV DRLP01,/S,TOSSWORK > KPF /S,DRLP01 SCR r MOV DRFD01,/S,TOSSWORK ~ KPF /S,DRFD01 SCR LED DRKB03 !!CH $$ X:A$$ 0$$ !!CH $$ X:B$$ 1$$ !!CH
0x27984c…2799e0 Dummy {f00=0x0102, f01=0x0190, f02=»H$$ 0$$ !!CH $$ X:I$$ 0$$ !!CH $$ X:J$$ 082$$ * !!CH $$ X:K$$ 50$$ F ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ` ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN ASM /S KPF /O
0x2799e0…279b74 (3, 3) Dummy {f00=0x0102, f01=0x0190, f02=»D$$ 0$$ !!CH $$ X:E$$ 0$$ !!CH $$ X:F$$ 1$$ * !!CH $$ X:G$$ 1$$ D !!CH $$ X:H$$ 162$$ ^ ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ z ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN
0x279b74…279d08 Dummy {f00=0x0102, f01=0x0190, f02=»C$$ 1$$ !!CH $$ X:D$$ 0$$ !!CH $$ X:E$$ 1$$ * !!CH $$ X:F$$ 0$$ D !!CH $$ X:G$$ 0$$ ^ !!CH $$ X:H$$ 162$$ x ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852
0x279d08…279e9c Dummy {f00=0x0102, f01=0x018e, f02=»B$$ 1$$ !!CH $$ X:C$$ 0$$ !!CH $$ X:D$$ 0$$ * !!CH $$ X:E$$ 01$$ D ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ^ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN ASM /S KPF /O
0x279e9c…27a030 Dummy {f00=0x0102, f01=0x0190, f02=» j ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ 4 !!EN ` ASM /S l KPF /O z KPF /S SCR LED DRTW01 ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$
0x27a030…27a1c4 Dummy {f00=0x0102, f01=0x018e, f02=»!!CH $$ X:A$$ 0$$ !!CH $$ X:B$$ 162$$ ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ 6 ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ b ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN ASM /S KPF /O KPF /S SCR LED DRFD01
0x27a1c4…27a358 Dummy {f00=0x0102, f01=0x0190, f02=» ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ 0 ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN ASM /S KPF /O KPF /S SCR MOV EBCDIC,/S,TOSSWORK KPF /S,EBCDIC SCR
0x27a358…27a4ec Dummy {f00=0x0102, f01=0x0190, f02=»EQU 0$$ t !!EN ASM /S KPF /O * KPF /S 8 SCR F LED DRKB03 R !!CH $$ X:A$$ 0$$ d !!CH $$ X:B$$ 1$$ ~ !!CH $$ X:C$$ 1$$ !!CH $$ X:D$$ 2$$ !!CH $$ X:E$$ 1$$ !!CH $$ X:F$$ 30$$ !!CH $$
0x27a4ec…27a680 Dummy {f00=0x0102, f01=0x0190, f02=»T EQU 0$$CREDIT EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ L !!EN x ASM /S KPF /O KPF /S SCR LED DVTKB !!DL 35 DATA 0,0,0,0,0,0,0,0 DATA 0,0,0,0,
0x27a680…27a814 (3, 4) Dummy {f00=0x0103, f01=0x0190, f02=»!!EN ASM /S KPF /O KPF /S ( SCR 6 LED DRSW01 B !!CH $$ X:B$$ 01$$ T !!CH $$ X:C$$ 00$$ n !!CH $$ X:D$$ 00$$ !!CH $$ X:E$$ 01$$ !!EN ASM /S KPF /O KPF /S SCR LED TOSSIO
0x27a814…27a9a8 Dummy {f00=0x0103, f01=0x0190, f02=»,/S,TOSSWORK KPF /S,TIMER SCR ( MOV TPROC,/S,TOSSWORK 4 KPF /S,TPROC R SCR f MOV TMMLKM,/S,TOSSWORK r KPF /S,TMMLKM SCR MOV TLDSEG,/S,TOSSWORK KPF /S,TLDSEG SCR MOV TABORT,/S,TOSSWORK
0x27a9a8…27ab3c Dummy {f00=0x0103, f01=0x0190, f02=»KPF /S,TOSSFM SCR LED TIMER " ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ 4 ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ` ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN ASM /S KPF /O KPF /S SCR LED TPROC
0x27ab3c…27acd0 Dummy {f00=0x0103, f01=0x0190, f02=»!!EN ASM /S KPF /O KPF /S ( SCR 6 LED TMMLKM B ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ T ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN ASM /S KPF /O KPF /S
0x27acd0…27ae64 Dummy {f00=0x0103, f01=0x0190, f02=»2 EQU 1$$CPU852 EQU 0$$ !!EN ASM /S , KPF /O : KPF /S H SCR V LED TABORT b ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ t ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN ASM
0x27ae64…27aff8 Dummy {f00=0x0103, f01=0x0190, f02=»PAG EQU 1$$ x ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN @ ASM /S L KPF /O Z KPF /S h SCR v LED TOSSFM ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852
0x27aff8…27b18c Dummy {f00=0x0103, f01=0x0190, f02=» 024 !!DL 027 !!DL 028 !!DL 042 , DATA 00 < !!DL 045 X DATA 00 h !!DL 047 DATA 00 !!DL 050 !!DL 051 !!EN ASM /S KPF /O KPF /S SC
0x27b18c…27b320 Dummy {f00=0x0103, f01=0x0190, f02=»SSWORK KPF /S,FMTASK SCR $ MOV DFTAB,/S,TOSSWORK 0 KPF /S,DFTAB N SCR b LED FMTASK n ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ !!EN
0x27b320…27b4b4 (3, 5) Dummy {f00=0x0103, f01=0x0190, f02=» !!DL 027 !!IL 29 DATA /0000,/0000' ( !!IL 30 B DATA /0101,/0101' R !!EN l ASM /S x KPF /O KPF /S SCR LED DRTW01 !!CH $$ X:F$$ /FFFF$$ !!CH $$ X:G$$ /FF00$$ !!EN
0x27b4b4…27b648 Dummy {f00=0x0103, f01=0x0190, f02=» $$ EXTRN BUG$$*$$ !!CH $$ BUG$$ 0$$ !!CH $$ X:C$$ 00000$$ 4 !!CH $$ X:E$$ 00002$$ R !!CH $$ X:D$$ 00005$$ p !!CH $$ X:F$$ 00094$$ !!DL 85 !!DL 123 DATA ILLINT !!DL 125 DAT
0x27b648…27b7dc Dummy {f00=0x0103, f01=0x0190, f02=» DATA ILLINT !!DL 131 DATA ILLINT , !!DL 132 L DATA ILLINT !!DL 133 | DATA ILLINT !!DL 134 DATA ILLINT !!DL 135 DATA ILLINT
0x27b7dc…27b970 Dummy {f00=0x0103, f01=0x018e, f02=»LINT | !!DL 141 ! DATA ILLINT ! !!DL 142 ! < DATA ILLINT ! L !!DL 150 ! l DATA ILLINT ! | !!DL 155 ! DATA ILLINT ! !!DL 156 ! DATA ILLINT ! !!DL 159 !
0x27b970…27bb04 Dummy {f00=0x0103, f01=0x018e, f02=» SCR " LED PFTAB " !!IL 12 " " !!IL 41 " 2 !!DL 043 " B !!DL 046 " R !!DL 047 " b !!DL 048 " r !!DL 051 " !!DL 052 " !!DL 053 " !!DL 054 " !!DL 056 " !!DL 057 " !!DL 058 " !!DL 059 " !!EN "
0x27bb04…27bc98 Dummy {f00=0x0103, f01=0x0190, f02=» " LED DVTKB # ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ # ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ # F ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ # r !!CH $$DVTKB$$DVKB00$$ # !!CH $$KBAD$$KBAD3$$ # !!CH $$/1111$$/1100$$ # !!CH $$BCA$$FFFF$$
0x27bc98…27be2c Dummy {f00=0x0103, f01=0x0190, f02=»!!EN # ASM /S $ KPF /O $ KPF /S $ ( SCR $ 6 LED DVTDY $ B ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ $ T ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ $ ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ $ !!CH $$DVTDY$$DVDY00$$ $ !!CH $$/ABC$$/1850
0x27be2c…27bfc0 Dummy {f00=0x0103, f01=0x0190, f02=»T EQU 0$$CREDIT EQU 1$$ $ ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ % ( #!!CH $$CPU852 EQU 1$$CPU852 EQU 0$$ % L !!CH $$DVTGP$$DVGP01$$ % x !!CH $$/1111$$/2000$$ % !!EN % ASM /S % KPF /O % KPF /S % SCR % LED DVTDY % ( #
0x27bfc0…27c154 (3, 6) Dummy {f00=0x0103, f01=0x0190, f02=» $$DVTDY$$DVDY02$$ % !!CH $$/ABC$$/1850$$ & !!CH $$/1111$$/C000$$ & 6 !!EN & T ASM /S & ` KPF /O & n KPF /S & | SCR & LED DVTGP & ( #!!CH $$CREDIT EQU 0$$CREDIT EQU 1$$ & ( #!!CH $$MMUPAG EQU 0$$MMUPAG EQU 1$$ & ( #!!CH $$C
0x27c154…27c2e8 Dummy {f00=0x0103, f01=0x0190, f02=»KPF /S & SCR ' LED TCLASS ' !!IL 6 ' , EXTRN DVKB00 ' : EXTRN DVDY00 ' Z EXTRN DVGP01 ' z EXTRN DVDY02 ' EXTRN DVGP03 ' !!IL 11 ' DATA TC00 '
0x27c2e8…27c47c Dummy {f00=0x0103, f01=0x0190, f02=» DATA /0020 ( DATA DVKB00 ( $ DATA /00500 ( D DATA DVDY00 ( d TC00E EQU * ( TC01 DATA TC01E-* ( DATA /00360 ( DATA DVGP01 ( TC01E
0x27c47c…27c610 Dummy {f00=0x0103, f01=0x0190, f02=» * ( TC03 DATA TC03E-* ) DATA /00302 ) . DATA DVGP03 ) N TC03E EQU * ) n !!EN ) ASM /S ) KPF /O ) KPF /S ) SCR ) LED SCLASS ) !!IL 6 ) EXTRN DWSI01 )
0x27c610…27c7a4 Dummy {f00=0x0103, f01=0x018e, f02=»00 ) | DATA TC01 * DATA TC02 * ( DATA TC03 * F DATA TC04 * d !!IL 12 * TC00 DATA TC00E-* * DATA /00141 * DATA DWSI01 * TC00E EQU *
0x27c7a4…27c938 Dummy {f00=0x0103, f01=0x0190, f02=» DATA DWTW01 + TC01E EQU * + $ TC02 DATA TC02E-* + @ DATA /00361 + b DATA DWLP01 + TC02E EQU * + TC03 DATA TC03E-* + DATA /00301 +
0x27c938…27cacc Dummy {f00=0x0103, f01=0x0190, f02=» DATA /01F91 , DATA DWFD01 , $ DATA /02FA1 , : DATA DWFD01 , Z DATA /03FB1 , p DATA DWFD01 , TC04E EQU * , !!EN , ASM /S , KPF /O , KPF /S , SCR , LED
0x27cacc…27cc60 Dummy {f00=0x0103, f01=0x018e, f02=» , !!DL 029 - !!DL 030 - !!DL 031 - ( !!DL 032 - 8 !!DL 033 - H !!DL 034 - X !!DL 035 - h !!DL 036 - x !!IL 50 - **** - DATA CTAB01 - !!DL 052 - !!DL 053 - !!DL 055 - !!DL 056 - !!DL 059 -
0x27cc60…27cdf4 (3, 7) Dummy {f00=0x0103, f01=0x00a4, f02=» - ASM /S . KPF /O . KPF /S . $ SCR . 2 ASG /02,LP0F . > SCR . R INC SYSTAB . ^ LKE M . p KPF /L,M:DENJ . ~ ASG /E0,TY10 .
0x27cdf4…27cf88 Dummy {f00=0x0103, f01=0x2008, f02=» / ASM /S . KPF /O . KPF /S . $ SCR . 2 ASG /02,LP0F . > SCR . R INC SYSTAB . ^ LKE M . p KPF /L,M:DENJ . ~ ASG /E0,TY10 .
0x27cf88…27d11c Dummy {f00=0x0103, f01=0x0190, f02=» V P 3 W _ C D ; V & E2 HDf 'W 'W '_6 ? F : ! P ! P ! P ! P 9F ! P 8 W : ! )P9H " I|# T &W &" :I : Gb : P & _ &X _ : I : : : G| p *1 TID ADDR
0x27d11c…27d2b0 Dummy {f00=0x0103, f01=0x0190, f02=»( _ AGz AGx Gn ( @Gv' $ * AG|T( Gn ( AGr AG| ( G| p AGr ) Y V AG G V V L . 1 V L v L AGr : G W G 2 G L @ l# T R L 9F L & L G Q
0x27d2b0…27d444 Dummy {f00=0x0103, f01=0x0190, f02=»Gz : Wp Wl Wh Wd W` W WX WT WP WL WH WD W@ W< W8 W4 W0 W, W( W$ W W W W W W W W W G ** AG~ AG ER AG R AG G L Jb R 4 L 4 $ AGr G U 4 - _ IN G @Gr N* D ILLEGAL OPERATION
0x27d444…27d5d8 Dummy {f00=0x0103, f01=0x0190, f02=»ITHM OVERFLOW STACK OVERFLOW INDEX OVERFLOW ILL INDEX TYPE DIV BY ZERO EDIT BUFFER OVFL EDIT PICTURE OVERFLOW "ALLOCATION ERR AT INITIALIZATION ILLEGAL INSTRUCTION ADDRESS ILLEGAL FORMAT CODE NO FIX BUFFER ALLOCATED FIX BUFFER NOT ALLOWED ILLEGAL
0x27d5d8…27d76c Dummy {f00=0x0103, f01=0x0190, f02=»ILLEGAL DATASET REFERENCE TOO MANY KIA/NKIA STACK LEVELS DISC ERROR; NO REENTER POINT W 9 " R 0 1 Y : ;a V P V P W z x<a R 9a V M : I @M P ( _ @O P @O Pj Pf N V $ $T$ D BR V T D
0x27d76c…27d900 Dummy {f00=0x0103, f01=0x0190, f02=» AO TB( Q ( AM O @O V P ( R W M TB( P : TB( Q : AO AO E AM O V AO @ h# P ( R4 O TB( Q ( AM O @O V P ( R W :
0x27d900…27da94 (3, 8) Opaque[0x194]
0x27da94…27dc28 # DirEnt {nam=»TCLASS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2980, f03=0x0000}
0x27da94…27dc28 IdxSect {
0x27da94…27dc28 f00 = 0x014c // 0x27da94 @0x0
0x27da94…27dc28 f01 = 0x0002 // 0x27da96 @0x2
0x27da94…27dc28 gno = [ // 0x27da98 @0x4
0x27da94…27dc28 [0x00]: C0x014c.0x0.0
0x27da94…27dc28 ]
0x27da94…27dc28 }
0x27dc28…27ddbc Dummy {f00=0x014c, f01=0x0190, f02=» 2 P IDENT TCLASS REL 10.0 80-03-14 870105041000 P : P* B P* L P ENTRY TCLASS V P* l P* v P EXTRN DVKB00 P EXTRN DVDY00 P EXTRN DVGP01 P EXTRN DVDY02 P
0x27ddbc…27df50 Dummy {f00=0x014c, f01=0x0190, f02=» TC01 P DATA TC02 P DATA TC03 . PTCLASE EQU * L PTC00 DATA TC00E-* ` P DATA /0020 P DATA DVKB00 P DATA /0050 P DATA DVDY00 PTC00E
0x27df50…27e0e4 Dummy {f00=0x014c, f01=0x4118, f02=» * PTC02 DATA TC02E-* P DATA /0051 . P DATA DVDY02 N PTC02E EQU * n PTC03 DATA TC03E-* P DATA /0030 P DATA DVGP03 PTC03E EQU * P
0x27e0e4…27e278 Dummy {f00=0x014c, f01=0x2008, f02=» NT TCLASS * * $ * . ENTRY TCLASS 8 * N * X * b * l * v * * TCLASS DATALTCLASE-* TCLASE EQU * END @ 1 INTLT2 INTRT1
0x27e278…27e40c Dummy {f00=0x014c, f01=0x018e, f02=» A1, A3-A4, A7, A11-A12 ARE DESTROYED c P* d 2 PFNDVTC EQU * FIND VTOC ENTRY d < ( P SC A2,ECBFC,A8 SET FILE CODE IN ECB d ` P LDK A2,0 SECTOR NUMBER d P CF A14,FMREAD READ SECTOR 0 d * P LD A2,FM:BUF+VOL:EB VTOC EXTENT BASE d P LDR A12,A
0x27e40c…27e5a0 Dummy {f00=0x014c, f01=0x0190, f02=» P* e P* e & PFVTC10 EQU * ENTRY USED BY RDVTOC e ( P CF A14,FMREAD READ ONE VTOC SECTOR e B $ P LDKL A13,FM:BUF FM:BUF ADDRESS e n $ P LDK A7,VTOCBF VTOC BLOCK FACTOR e P* e PFVTC20 EQU * e & P LD A4,VTC:ST,A13 VTOC STATUS BYTE e P A
0x27e5a0…27e734 (3, 9) Opaque[0x194]
0x27e734…27e8c8 # DirEnt {nam=»/OBJCT«, typ=»OB«, f00=0x0000, f01=0x0000, f02=0x2090, f03=0x0000}
0x27e734…27e8c8 IdxSect {
0x27e734…27e8c8 f00 = 0x0104 // 0x27e734 @0x0
0x27e734…27e8c8 f01 = 0x0076 // 0x27e736 @0x2
0x27e734…27e8c8 gno = [ // 0x27e738 @0x4
0x27e734…27e8c8 [0x00]: C0x0104.0x2.0
0x27e734…27e8c8 [0x01]: C0x0104.0x3.0
0x27e734…27e8c8 [0x02]: C0x0105.0x1.0
0x27e734…27e8c8 [0x03]: C0x0105.0x3.0
0x27e734…27e8c8 [0x04]: C0x0127.0x0.0
0x27e734…27e8c8 [0x05]: C0x0129.0x3.0
0x27e734…27e8c8 [0x06]: C0x0129.0x2.0
0x27e734…27e8c8 [0x07]: C0x012a.0x0.0
0x27e734…27e8c8 [0x08]: C0x012a.0x2.0
0x27e734…27e8c8 [0x09]: C0x0108.0x2.0
0x27e734…27e8c8 [0x0a]: C0x012b.0x2.0
0x27e734…27e8c8 [0x0b]: C0x010a.0x1.0
0x27e734…27e8c8 [0x0c]: C0x012e.0x3.0
0x27e734…27e8c8 [0x0d]: C0x012f.0x0.0
0x27e734…27e8c8 [0x0e]: C0x0133.0x1.0
0x27e734…27e8c8 [0x0f]: C0x0133.0x2.0
0x27e734…27e8c8 [0x10]: C0x0133.0x3.0
0x27e734…27e8c8 [0x11]: C0x0137.0x0.0
0x27e734…27e8c8 [0x12]: C0x0137.0x1.0
0x27e734…27e8c8 [0x13]: C0x0137.0x2.0
0x27e734…27e8c8 [0x14]: C0x0119.0x2.0
0x27e734…27e8c8 [0x15]: C0x011a.0x3.0
0x27e734…27e8c8 [0x16]: C0x011b.0x2.0
0x27e734…27e8c8 [0x17]: C0x0141.0x1.0
0x27e734…27e8c8 [0x18]: C0x0140.0x3.0
0x27e734…27e8c8 [0x19]: C0x0142.0x3.0
0x27e734…27e8c8 [0x1a]: C0x0122.0x3.0
0x27e734…27e8c8 [0x1b]: C0x0124.0x1.0
0x27e734…27e8c8 [0x1c]: C0x0136.0x2.0
0x27e734…27e8c8 [0x1d]: C0x0138.0x2.0
0x27e734…27e8c8 [0x1e]: C0x0145.0x2.0
0x27e734…27e8c8 [0x1f]: C0x0145.0x3.0
0x27e734…27e8c8 [0x20]: C0x013b.0x3.0
0x27e734…27e8c8 [0x21]: C0x013d.0x3.0
0x27e734…27e8c8 [0x22]: C0x0146.0x3.0
0x27e734…27e8c8 [0x23]: C0x0147.0x0.0
0x27e734…27e8c8 [0x24]: C0x0148.0x1.0
0x27e734…27e8c8 [0x25]: C0x0148.0x2.0
0x27e734…27e8c8 [0x26]: C0x0148.0x3.0
0x27e734…27e8c8 [0x27]: C0x0148.0x0.0
0x27e734…27e8c8 [0x28]: C0x0149.0x1.0
0x27e734…27e8c8 [0x29]: C0x014a.0x0.0
0x27e734…27e8c8 [0x2a]: C0x0146.0x1.0
0x27e734…27e8c8 [0x2b]: C0x0151.0x1.0
0x27e734…27e8c8 [0x2c]: C0x0151.0x2.0
0x27e734…27e8c8 [0x2d]: C0x0107.0x0.0
0x27e734…27e8c8 [0x2e]: C0x0127.0x1.0
0x27e734…27e8c8 [0x2f]: C0x0127.0x2.0
0x27e734…27e8c8 [0x30]: C0x0136.0x0.0
0x27e734…27e8c8 [0x31]: C0x014b.0x1.0
0x27e734…27e8c8 [0x32]: C0x014b.0x3.0
0x27e734…27e8c8 [0x33]: C0x014c.0x1.0
0x27e734…27e8c8 [0x34]: C0x0153.0x1.0
0x27e734…27e8c8 [0x35]: C0x0144.0x0.0
0x27e734…27e8c8 [0x36]: C0x0144.0x2.0
0x27e734…27e8c8 [0x37]: C0x0153.0x3.0
0x27e734…27e8c8 [0x38]: C0x0154.0x0.0
0x27e734…27e8c8 [0x39]: C0x0166.0x0.0
0x27e734…27e8c8 [0x3a]: C0x0166.0x1.0
0x27e734…27e8c8 ]
0x27e734…27e8c8 }
0x27e8c8…27ea5c Dummy {f00=0x0104, f01=0x4168, f02=» J F IDENT TCLASS REL 10.0 80-03-14 870105041000 TCLASSK R TCLASSK d DVKB00 x DVDY00 DVGP01 , ( " P 6 DVDY02 DVGP03
0x27ea5c…27ebf0 Dummy {f00=0x0104, f01=0x418a, f02=» J F IDENT SCLASS REL 10.0 80-03-14 870105041000 SCLASSK R SCLASSK d DWSI01 x DWTW01 * & ! 1 DWLP01 DWFD01 * & 6 0
0x27ebf0…27ed84 Dummy {f00=0x0104, f01=0x0190, f02=» J F IDENT MONTAB REL 10.0 80-03-14 870105041000 F B MONTABK SPDLCI FREQUE PAGQUE INTLT1 INTLT2 INTLT3L INTLT4 R 2 . INTRT1 INTRT2 INTRT3 INTRT4 INTAS INTSL MONTABK FREQUE PAGQUE
0x27ed84…27ef18 Dummy {f00=0x0104, f01=0x4110, f02=» INTRT4 SYSLOD CTAB01 0 KBAD3 B * & R GPADN DYADN INTAS INTSL " SPDLCI $ &
0x27ef18…27f0ac Dummy {f00=0x0104, f01=0xc01a, f02=» 4 @ SYSLOD KBAD3 0 KBADN @ * & P TPADN ~ GPADN DNADN DIADN DYADN MSADN ODADN TPAD3 , (
0x27f0ac…27f240 Dummy {f00=0x0104, f01=0x40b8, f02=» J F IDENT TIODMX REL 10.0 80-03-14 870105041000 TIODM FDBMEC R TIODM j FDBMEC | c @ P* 8 P**************************************************** P* (
0x27f240…27f3d4 (3, 10) Dummy {f00=0x0104, f01=0x0190, f02=» J F IDENT DSKSUB REL 10.0 80-03-14 870105041000 F B VOLCLRK VOLNAM VOLADR NVLCHK VOLGET NEWVOL INXDWTL NVLTAB R NVLDMT NVLEND NVLBIT VOLCLRK VOLNAM ECBRL ECBEL , (
0x27f3d4…27f568 Dummy {f00=0x0104, f01=0x0190, f02=» H X H | VOLADR < DWTOR 0 DWTVOL @ , ( 5 p ^ > X $ ^ R NVLCHK R DWTORD DWTNVL: * & Q$ W X Y :g H I , ( i ! P X
0x27f568…27f6fc Dummy {f00=0x0104, f01=0x0190, f02=»VOL SCTFWTC , ( Z.?AZ2 @ Q X " FWTEW1 P EWTVOL b FWTPAR t , ( $XJ ( I T E INXDWTL NVLTAB TTABFM NVLDMT N
0x27f6fc…27f890 Dummy {f00=0x0104, f01=0x402a, f02=» T @ & Z.?AZ2 @ Q X " FWTEW1 P EWTVOL b FWTPAR t , ( $XJ ( I T E INXDWTL NVLTAB TTABFM NVLDMT N
0x27f890…27fa24 Dummy {f00=0x0104, f01=0x0190, f02=» J F IDENT SYSTAB REL 10.0 80-03-14 870105041000 F B SCTMSZK SCTSFA SCTEFA SCTIPL SCTANO SCTADA SCTIOEL SCTPAG R F B SCTSWB SCTNOP SCTPSZ SCTMMC SCTLAC SCTMMPL SCTLAP0 SCTNPE F B SCTSTB SCTOPT SCTTCT SCTCDTB
0x27fa24…27fbb8 Dummy {f00=0x0104, f01=0x0190, f02=»:PB PAG:QF PAG:QB PAG:PA PAG:SBS SWB:NC0 z SWB:DS SWB:ELV SWB:NS 4 SEG:FCL V SEG:NS j SEG:STI ~ SEG:DS SEG:ELV SEG:PB PAG:QF PAG:QB PAG:PA
0x27fbb8…27fd4c Dummy {f00=0x0104, f01=0x018e, f02=» IHRTC ILLINTM IHTWN " , ( 2 IHSOP b CHLT1 r IHFDN , ( , ( ! , ( 1
0x27fd4c…27fee0 Dummy {f00=0x0104, f01=0x0190, f02=» , ( a , ( q 4 HALTN d t SCTMSZK SCTSFA SCTEFA SCTIPL SCTANO SCTADA , (
0x27fee0…280074 (3, 11) Dummy {f00=0x0105, f01=0x0190, f02=» SCTNOP SCTPSZ SCTMMC 0 SCTLAC D SCTMMPL X SCTLAP0 l SCTNPE SCTSTB SCTOPT SCTBUG SCTDMT~ , (
0x280074…280208 Dummy {f00=0x0105, f01=0x407a, f02=»CTDCT ^ _ . D d@ v l SCTNPE SCTSTB SCTOPT SCTBUG SCTDMT~ , (
0x280208…28039c Dummy {f00=0x0105, f01=0x0190, f02=» J F IDENT TDISP REL 10.0 80-03-14 870105041000 H D ! TDISP TPAUSE TEXIT MEXIT QMEXITA ACTDISA DISIOE DISEND` DISQUE R PRUNY RETUR8 DISQUE PRUNY RETUR8 QTJOB QMEXI
0x28039c…280530 Dummy {f00=0x0105, f01=0x0190, f02=»SA DISIOE " TENDIO DISEND` & 2 TPAUSE * F TDISP * Z , ( A W ^ ! Z2 l TTB:ST , ( 9 (X: @ P T M ]J , ) A TTB:SA * & U P P Y
0x280530…2806c4 Dummy {f00=0x0105, f01=0x4048, f02=» > r W !W CP YP* ]P cU 2@ D TPAUSE * F TDISP * Z , ( A W ^ ! Z2 l TTB:ST , ( 9 (X: @ P T M ]J , ) A TTB:SA * & U P P Y
0x2806c4…280858 Dummy {f00=0x0105, f01=0x018e, f02=» J F IDENT LRPINT REL 10.0 80-03-14 870105041000 J F " IHLKM LKM030 LKMRQE LKMERR LKMQDI IHRTC TIMQUE@ MONCLO IHPFARC R INIFLG PFPOSTN IHLKM INTSAV PRUNN TTB:SAT , ( A$
0x280858…2809ec Dummy {f00=0x0105, f01=0x0190, f02=» LKM030 H SWL48 * & 5 HP c P W A , LKMAL Z * & O V ( U P @ j LKMERR t HALTN LKMRQE z * & i V L U LKMQDI
0x2809ec…280b80 Dummy {f00=0x0105, f01=0x0190, f02=»FARC , ( A A Q ? > DISQUEA > , ( ? @ X@ ) A A _L A P PFINIT IHRTC , ( A A _^ A A QMJOB SWLXY , ( Q > ? A
0x280b80…280d14 (3, 12) Dummy {f00=0x0105, f01=0x4140, f02=» 8 x FREBLK , ( K D Q Z P 0 9 " "_ * , ( e _, ? _ P H Z TIMQUE@ H H D ! %T 5P ;P ?W6 UV eP kV Q Q > < Q $
0x280d14…280ea8 Dummy {f00=0x0105, f01=0x018e, f02=» J F IDENT TPROC REL 10.0 80-03-14 870105041000 TWAIT TMWAIT TACTOT R FNDDWT r TWAIT DWTWATL TDISP TACTOT FNDTIDN , ( @ P "R Y
0x280ea8…28103c Dummy {f00=0x0105, f01=0x4144, f02=» DWTTAB * & 3 U "R P X R X , ( M T X T . T G H , ( g Y6 G _` P ,P x LKMRQE` LKMQDIA - _ < 8 P~ R~ Pj )P` 3UR ;
0x28103c…2811d0 Dummy {f00=0x0105, f01=0x0190, f02=» J F IDENT MSUBS REL 10.0 80-03-14 870105041000 D @ SAVE8 QTJOB QMJOB ACTOT ACTOTP EXITY GETBLK FREBLKL FNDDWT R H D ! FNDDWD FNDTID PFINIT SWL48 SWLXY ILLINT@ INTSAV HALTY RELPAG , ( RELPA2' IHRET8V IHRET2 IHRET18
0x2811d0…281364 Dummy {f00=0x0105, f01=0x018e, f02=» ! $P T I QMJOB J . TTMJOB @ ACTOTP T R , ( ; R $ 5 % > ? W ? f ACTOT TTB:SA , ( Y $ W ? T T U U U TTB:ID TTB:SBM
0x281364…2814f8 Dummy {f00=0x0105, f01=0x0190, f02=» , ( B - 1_( U T P 0 U GETBLK 4 FREQUE H , ( _t ? @ T Z FREBLKL * & 0 A 1 Q Q > > 0 @ FNDDWT TTB:TD , ( 1 A P
0x2814f8…28168c Dummy {f00=0x0105, f01=0x0190, f02=»CTTCT * & 3 R Y P _ W 8 X W ? ` , ( Q @ @ P $ H W < IHRET8V l l IHRET2 p IHRET18 t IHRTN v PFINIT x PFTAB , ( i W > > > > > > @ V ?
0x28168c…281820 Dummy {f00=0x0105, f01=0x4122, f02=»TY , ( ! Y ^ _ ? RELPAG < RELPA2' P LKMERRD d A. v H D ! 4 $ 1P ;R SW [W gT$ T P T R #P , ( 5R ;P CW0 KW( ]P gW kW V
0x281820…2819b4 (3, 13) Dummy {f00=0x0127, f01=0x0190, f02=» J F IDENT TTMJOB REL 10.0 80-03-14 870105041000 F B TTB:AMK TTB:MT TTB:CB TTB:SP TTB:SB TTMJOB TTB:QLL TTB:ID R . * TTB:ST TTB:PP TTB:PW TTB:SA TTB:TD TTB:AMK TTB:MT TTB:CB ,
0x2819b4…281b48 Dummy {f00=0x0127, f01=0x40d6, f02=»:ID TTB:ST TTB:PP " TTB:PW 6 TTB:SA J , ( ! #M 1 ^ TTB:TD ( A N @ MK TTB:MT TTB:CB ,
0x281b48…281cdc Dummy {f00=0x0127, f01=0x8190, f02=» J F IDENT TOSSIO REL 10.0 80-04-30 870105041000 J F "dTIO TIO:FM TIOERR TENDIO QUEDEV QUEFIL DC:MIN@ DC:MOT MONMMUC R J F " ECBFC ECBBA ECBRL ECBEL ECBRC ECBCW ECBCW1` ECBCW2 DC:DIX DM:DIX' F B PC:DIXV MX:DIX KB:DIX8
0x281cdc…281e70 Dummy {f00=0x0127, f01=0x8190, f02=» DWTOR DWTOCHV DWTADR DWTTABR DWTWAT DWTTQ DWTOTQ DWTUEC J F " DWTMECj DWTA2 DWTA3 DWTA4 DWTA5 DWTSB12 DWTSB2 DWTTP DWTECH DWTSQ D DWTORD DWTNVL DWTVOLA DWTCHP DWTST DWTBC DWTECBV DWTOP
0x281e70…282004 Dummy {f00=0x0127, f01=0x8190, f02=»C DWTMECj DWTOTQ DWTA2 4 DWTA3 F DWTA4 X DWTA5 j DWTSB12 | DWTSB2 " DWTTP $ DWTORD $ DWTNVL & DWTECH & DWTVOLA .
0x282004…282198 Dummy {f00=0x0127, f01=0x8190, f02=» RECADRV ECHADR DC:DIX ( DM:DIX' < PC:DIXV P MX:DIX d KB:DIX8 x IT:DIXT DK:DIXN ECBFC ECBBA ECBRL ECBEL ECBRC
0x282198…28232c Dummy {f00=0x0127, f01=0x8190, f02=» ! $ TIOERR L , LKMQDI @ , ( A ( , 0 4 8 < C C R QUEDEV f QUEFIL h TTB:STM , ( _ 8W T 8P Y ^ TTB:SA TDISP
0x28232c…2824c0 Dummy {f00=0x0127, f01=0x8190, f02=» XF Y @ t , ( P R T X &P Xh I TTB:PW D , ( Y T # C C V , ( W O " # X Y ) , ( C C x # P Y GETBLKS QTJOB , (
0x2824c0…282654 (3, 14) Dummy {f00=0x0129, f01=0x8190, f02=» h , ( X $? P $ > > , ( 8 , ( F C h , ( F C > B R Q F ! P C TTB:MTO , ( > C > F :c" H ,
0x282654…2827e8 Dummy {f00=0x0129, f01=0x8190, f02=» j , ( U H Q X D B , ( $ T C x > C $ ) _ : DISENDA j , ( X 9BV X & X | , ( D C > X H U H B , ( P P $ # Q >
0x2827e8…28297c Dummy {f00=0x0129, f01=0x8190, f02=»_2 B U X > ? , ( _ X T (@ ^ DC:MIN@ P , ( > > ? _ X T (@ X d , ( L U L Q M , ( X D D P ( ) TENDIO , (
0x28297c…282b10 Dummy {f00=0x0129, f01=0x8190, f02=» h , ( c _ T " # p , ( " X L R P P P (@ 8 , ( ^ X P P # P T h FREBLK: * & P 0P 1 _ ACTOTPO & " W Y
0x282b10…282ca4 Dummy {f00=0x0129, f01=0xc12e, f02=» T P T W4 /P ` H D ! CT GP KW [P aR cP iT m s uP Q P GQ~ QP0 WP* H D !! mT yQL } U( Q2 T V UJ P PL 'Q -P GT OP }U h H D ! U Q4 P !P )P /T OP ]PJ R P P P P8 P0 P P
0x282ca4…282e38 Dummy {f00=0x0129, f01=0x018e, f02=» J F IDENT SYSLDM REL 10.0 80-03-31 870105041000 SYSLDMK R SYSLDMK d SCTSFAD x SYSBAS SCTEFA TCLASS( , ( I A SCLASSL SAV
0x282e38…282fcc Dummy {f00=0x0129, f01=0x018e, f02=» f , ( K , P , - 4 ] CMPADR 8 SCTOPT J , ( i @ 4 Y 5 X SAVE03N SAVE01 * & * _6 : W TTMJOB SCTDMT , (
0x282fcc…283160 Dummy {f00=0x0129, f01=0x0190, f02=» , ( !TTP " @ T NXTBLK 8 , ( ! " Y $ !TTX" A J SCTTCT z SCTNFT, , ( "H 9 A & : ` & @ & V :a @ MULTN SCTNOF SCTFWL * & !
0x283160…2832f4 (3, 15) Dummy {f00=0x0129, f01=0x0190, f02=» " A : FREQUE " SCTBLK 4 , ( eI 4 ` & @ 6 P F BUFSIZM v , ( } _ 3 S S V 8 V SYSBUFM , ( HB W 8 : @ @ , ( @T
0x2832f4…283488 Dummy {f00=0x0129, f01=0x0190, f02=» COP W @ > 3 V @ 3 SAVE30M 0 SCTLAC B , ( @ B 3 @ D T NUMSEG , ( # $ S @ D F V @P , ( = @ 9h !RRP @ ! T SCTADA , (
0x283488…28361c Dummy {f00=0x0129, f01=0x0190, f02=» h * & " : @ SCTDMIL 6 , ( & @ @ J #D# P ; V H , ( _ : @ " P @ P 3 x , ( @ _ @ " P V B 3 , ( S 1 S 9J S ( 3 , (
0x28361c…2837b0 Dummy {f00=0x0129, f01=0x0190, f02=»E19E , ( o N . !TTP " SAVE16 < , ( @H W P N =H N W R V < CR N SAVE17 ~ CONVRT , ( @T N =H N W T N =H N SAVE24 , ( H@ V W X ( @ % 5 T
0x2837b0…283944 Dummy {f00=0x0129, f01=0x0190, f02=» " U " , ( 1 _2 P & , ( Q " U " V , ( m _2 V P * & @P R * & " S ( V X S =J
0x283944…283ad8 Dummy {f00=0x0129, f01=0x0190, f02=» N _ r bREL , ( H N $ !TTT , ( %D : . !TTP P , ( ?H " V W P * , ( Y P , ( w _ P W T
0x283ad8…283c6c Dummy {f00=0x0129, f01=0x0190, f02=» K T + Y@ V , ( T _f V P Y $ !TTX @ , ( @ T " P * & # @ : W N % @ P _ * & ; @ 0 R @ 2 , ( S W N R @
0x283c6c…283e00 Dummy {f00=0x0129, f01=0x0190, f02=» l , ( $ A V W SAVE15 : * & W P P W ` L SAVE14P z , ( ( W b , ( G =h G V b V < , ( V ` P W `
0x283e00…283f94 (3, 16) Dummy {f00=0x012a, f01=0x0190, f02=» $ ! | , ( TTX !CCT P V , ( @ 4 U " $ $ L , ( _. P V | , ( 4 U " $ $ SCTDCT , ( _. @ d @
0x283f94…284128 Dummy {f00=0x012a, f01=0x0190, f02=» Q P W ` W b V b , ( k V < V ` _2 0 , ( U V ` * & 8 8 8 4 D P ^ @ , ( # P H I K , ( T + Y@
0x284128…2842bc Dummy {f00=0x012a, f01=0x0190, f02=» 3 @ " : W h , ( M V h F !SST W !AAT 0 SAVE06 ` , ( k W V 0 V N 0 V jP r SAVE07 , ( _ W l $ q > R P >b SYSLOD , ( W >b &
0x2842bc…284450 Dummy {f00=0x012a, f01=0x0190, f02=» h , ( pP V ` T @ 1 DWTSQ 8 , ( Q a r I r I r H , ( - $# P V l -W W D x , ( K @ V ` T @ 1 Q a , ( g : @ % P H I , (
0x284450…2845e4 Dummy {f00=0x012a, f01=0x0190, f02=» h , ( P @ @ @ D , ( (P W H $ I p % E 8 , ( , a : V h Q R h , ( - $ F !LLT # W j;I , ( K # ;b W 0;a W # T W jW , ( g # T
0x2845e4…284778 Dummy {f00=0x012a, f01=0x0190, f02=» , ( Z t @ tT A t V INTSL 8 , ( W Y0 Z6 v @ vT A H , ( v V L >A 8T 9 0 x , ( @ 1 8 $; # V h ;c F * & + !AAP # $ < $ :
0x284778…28490c Dummy {f00=0x012a, f01=0x0190, f02=» _ / P *_ , ( *T P _ .P _ / V * * & z U Y$ P W X V Z , ( z 3 % W INTLT1 , ( HP _ V XP V x ] |W * & @ x
0x28490c…284aa0 Dummy {f00=0x012a, f01=0x0190, f02=» (P ) @ v @ @ , ( u T " & , ( : N =H N V : N =H N V , ( V : &=H F V : F =H F , ( @ V : F =H F V : , ( @ P N =H N T
0x284aa0…284c34 (3, 17) Dummy {f00=0x012a, f01=0x0190, f02=» d v , ( ] * & t F @ R @ D $ D I:RSTEM F SCTIOE0 X * & y$ L ~ A CRT M " j SYSLDX H D !pC P # N / N G B WP@ P P V P T ;P$ MT wP {
0x284c34…284dc8 Dummy {f00=0x012a, f01=0x0190, f02=» T T W ` H D ! @ V W V P0 #U E MP0 Q _U P R T T 9P H D ! K a eP i Pd P$ P T 3P AR UWT cR W& T h H D !oJ P PT ! > )P 7 aT Tr P, U H D ! }
0x284dc8…284f5c Dummy {f00=0x012a, f01=0x4162, f02=» L H D !` P H V W R W PV Tp P T 1P8 AW( E H GW" MV H D ! ST qPD P( U P P: P W #Q )R =T WWR [T eW, iT uW T H D ! {T W R T W T T /P yT }P P T P$ P U P H D ! W P P W P #P
0x284f5c…2850f0 Dummy {f00=0x012a, f01=0x0190, f02=» J F IDENT SYSLDA REL 10.0 80-05-29 870105041000 D @ JUMPY SYSLDX dREL LDALEN MOVEY ERROR CMPADR NXTBLKL NXTCOM R F B CONVRT GETNUM MULTY MMTAB TABBE MMEND MMDDIV BUFSIZ SYSBUF D @ M:REL I:RSTE SAVE01 SAVE12B SAV
0x2850f0…285284 Dummy {f00=0x012a, f01=0x0190, f02=» SAVE18 SAVE19 SAVE20 SAVE21S SAVE220 v F B SAVE23 SAVE24V SAVE25 SAVE26 SAVE27 SAVE282 SAVE29 SAVE30 0 APPTYPN z I:RSTE * |REL $ W W " , ( 1 ; Z [ : : [ [
0x285284…285418 Dummy {f00=0x012a, f01=0x0190, f02=» SAVE03 SAVE04~ SAVE05 0 SAVE06 D SAVE07 X , ( o l SAVE08 SAVE09 SAVE10 SAVE11 SAVE12B SAVE1
0x285418…2855ac Dummy {f00=0x012a, f01=0x0190, f02=»AVE30 , ( M:REL @ SYSBUF R BUFSIZ f LDALEN z SAVE14I d SAVE15 f SAVE16V l SAVE17 p SAVE18 r SAVE19 t
0x2855ac…285740 Dummy {f00=0x012a, f01=0x0190, f02=» j MMTAB TABBE MMEND , , ( > ERROR n MOVEY " SCTEFA , ( W Z A. c @ , ( @ + V W U R $ ) , (
0x285740…2858d4 (3, 18) Dummy {f00=0x0108, f01=0x0190, f02=» , ( W ^< _@ V _P , ( V V : V 4 , ( J P r d , ( V U _ V , ( + Z K W W :K , ( K W r
0x2858d4…285a68 Dummy {f00=0x0108, f01=0x0190, f02=» <B W |P v , ( @ v : $ V |P v $ , ( w v : V $ V l $ T , ( V M : W V , ( + R R > R W , ( K > <B V x
0x285a68…285bfc Dummy {f00=0x0108, f01=0x0190, f02=» " D P t , ( W V P $;A^ D E , ( D P V P D , ( A P T E _J E _T t , ( + " D T E E D E , ( K % : " R ;B " , (
0x285bfc…285d90 Dummy {f00=0x0108, f01=0x0190, f02=»9a _ " ( ) 8 x , ( ( ) : " $ V P 9A _ 0 : MULTY H , ( W W W ?AP ^ 0 : W ; Z , ( V : : , SCTTCT , ( + X G : J @ 0 V , ( I @
0x285d90…285f24 Dummy {f00=0x0108, f01=0x0190, f02=» RETUR8 , ( 0 R P P B _ , ( : V ) v : 4 @ TTB:SA9 p * & P " D < , H H , ( M v b - I Y0 SCTSFA , ( : @ ` V
0x285f24…2860b8 Dummy {f00=0x0108, f01=0x0190, f02=» , ( U P _ " = D 4 , ( T u Q _n < ^ P = G 4 , ( V W d , ( $ V E J K _X V r * & @ V :B A V 9n A , ( @ @ A
0x2860b8…28624c Dummy {f00=0x0108, f01=0x0190, f02=» @ P P P P _ SCTPSZ ( , ( =" _ @ 9N @ :b @ :b : , ( W V W U j , ( w T 9BW P P , ( P V W U " @ Q V P , ( A.
0x28624c…2863e0 Dummy {f00=0x0108, f01=0x0190, f02=»QUE , ( Y& P , ( ) S P 3 < SCTBUGY l , ( G _ 3 A. ~ SCTSTB , ( c@ @ j " @ W PFINIT , (
0x2863e0…286574 (3, 19) Dummy {f00=0x012b, f01=0x018e, f02=» V pT : r , ( N V l W H V ]" , ( . nT W v W n V ~P B , ( @ W x r , ( @ 9 _v V d , V , ( Y P _ N L % V d V f v , ( @ y
0x286574…286708 Dummy {f00=0x012b, f01=0x0190, f02=» , ( V x % V v % : V V , ( N 9k! P % _ 4 , ( V V W W r d , ( @ 9 W V v ) W b , ( Y@ G v ) - V , ( w W f
0x286708…28689c Dummy {f00=0x012b, f01=0x0190, f02=»_ ` @ ` W W ~ , ( pP 2 V W % $ , ( R , T , ( A 3 " E R W ~ R , ( S R P R Xv _|W T : , ( QA s W x _ V P
0x28689c…286a30 Dummy {f00=0x012b, f01=0x0190, f02=» H - t , ( V I " R E , ( R T E D E @ v D , ( + H v E P #_v W | t , ( K ;b W W t V b v , ( k ( v W p V ` $ W ` N C
0x286a30…286bc4 Dummy {f00=0x012b, f01=0x0190, f02=» .=H p GETNUM , ( N N : d $ SYSLDX T , ( 8" R _ ZY QY : " h , ( @ V H W z W | CRP , ( ' W ` ` H W d , ( B E 2 ;A @
0x286bc4…286d58 Dummy {f00=0x012b, f01=0x0190, f02=» " T @ N =H , ( N @ ) !TTXX !CC ( , ( T !UUT d W X , ( @ 2 .:H N P , ( V _ R :h " , ( ?
0x286d58…286eec Dummy {f00=0x012b, f01=0x018e, f02=» @ W x , ( D V W W , ( ` " W p @ F , ( pP " 4X 1 v , ( R Z0 _ W l a w , ( 3 ` :A W V d 4 W P , (
0x286eec…287080 Dummy {f00=0x012b, f01=0x0190, f02=» f x H D ! W> 2 0 . 1 2 C S Y -V 1W 5U AR w yQ@ R( $ H D !e P V U #V ' ] _Q aR m oV V W V p H D ! P P 7RR ?R GW kP P Pd PL P. V P T 1T H D
0x287080…287214 (3, 20) Dummy {f00=0x010a, f01=0x410a, f02=» W U T H D ! Q P P V !P4 ?P ] h } R T T" P D ' MV H D ! 0 [P U P V P P P0 P Pn WP [ j e j iW oT P8 Pl H D ! T R %P WR {P T W8 T T T Wh P V P. MP @
0x287214…2873a8 Dummy {f00=0x010a, f01=0x0190, f02=» J F IDENT LDTASK REL 10.0 80-03-14 870105041000 F B LT:DSKK LT:SWB TTABLD QLTDSK QLTSWB QLTASK LD:ECBL LD:BUF R LD:BUE PQEMTY LD:STB LD:ECBL LD:BUF L
0x2873a8…28753c Dummy {f00=0x010a, f01=0x0190, f02=» TLDS15 , ( W $V QMEXITL J PAGQUE PAG:QB n , ( u H A 8( @ X PAG:SB , ( H H A ( 1 ) @ H P 1 SEG:PB# T
0x28753c…2876d0 Dummy {f00=0x010a, f01=0x0190, f02=» M | SCTPSZ0 SEG:ELT . TTB:SP @ SEG:FC R * & " (@ @ <a D >a d PAG:PAP SEG:DS ECBCW1I ECBCW2 , ( H D $! C " ,
0x2876d0…287864 Dummy {f00=0x010a, f01=0x0190, f02=» ( C l ECBEL , ( A *9b!0 # U B , C , ( ] * # C & C $S L , ( w B p ' C " C $ | ECBRC , ( _"( B . T :" U RELPA2 SCTIOES
0x287864…2879f8 Dummy {f00=0x010a, f01=0x408c, f02=» QLTASK ACTOT @ 4 f < 6 " , ( iV P V +P* K OU* oS s T F v@ ' C " C $ | ECBRC , ( _"( B . T :" U RELPA2 SCTIOES
0x2879f8…287b8c Dummy {f00=0x010a, f01=0x0190, f02=» J F IDENT DRSW01 REL 10.0 80-03-14 870105041000 H D ! OUTLINK OUTPUT LDREG LDREGE LDREGF STREG GETCHR@ ECHRTN ECHOY R ECHENDN OUTLINK OUTLRT OUTPUT , ( ? 8! W "
0x287b8c…287d20 Dummy {f00=0x010a, f01=0x0190, f02=»WTA5 TDISP LDREG D * & ; @ Y X X Y . LDREGF R LDREGE V p DWTOR DWTECB , ( Q H X X X X ' GETCHR@ j , ( g 4 B U B (
0x287d20…287eb4 (3, 21) Dummy {f00=0x012e, f01=0x4104, f02=» DWTSB2 DWTADR , ( H 9BV X Y X ( ECHADR X ECHRTN j TENDIO ~ * & D V X R , ( W0 P T !P< %P8 qU W V$ V @ (
0x287eb4…288048 Dummy {f00=0x012e, f01=0x0190, f02=» J F IDENT ST8000 REL 10.0 80-06-09 870105041000 ST8000K R ST8000K d IHPFAR x IHLKM IHRTC ILLINT IHTWA IASCUZ , (
0x288048…2881dc Dummy {f00=0x012e, f01=0x4150, f02=» ~ , ( ! , ( 1 N , ( A ~ , ( Q , ( a
0x2881dc…288370 Dummy {f00=0x012e, f01=0x0190, f02=» J F IDENT DRKB03 REL 10.0 80-03-14 870105041000 KBAD3 R KBAD3 b DWTST t * & @ 2 R ? X V Y TDISP LDREGE , ( ! W Y , (
0x288370…288504 Dummy {f00=0x012e, f01=0x0190, f02=» , ( <D X ? ?: T p , ( > > P P C B 4 , ( T B % X . $ d STREG , ( 4 T % X ,T ! W ECHON , ( Y . V ! B P X
0x288504…288698 Dummy {f00=0x012e, f01=0x0190, f02=»R _Q P t , ( OR R W " ! B p W , ( W 0 Z ! B Z D , ( Z& X . 0T N W X t , ( ,P Y . 0 %_. % Y . W _p ECHEND * & P _ C
0x288698…28882c Dummy {f00=0x012e, f01=0x0190, f02=» X R ;GV X v DWTSB2 , ( S p X , $4 P ( , ( o D X .T * W Y , - ? X X , ( :a Z T T W P X :d , ( Y > > |V ? 8 R @ , ( R V @% =cW R P R
0x28882c…2889c0 Dummy {f00=0x012e, f01=0x0190, f02=» > NT 0 x G _ H D ! ( $ V 'W< 7U ;R ?P G U _P iP oWT wPP R Q , H D !&J W T * Pb P T T T W : V * P x H D ! /P$ ;R K * SW [PH aP> gP mP q * wR {Q P R R W Wr
0x2889c0…288b54 (3, 22) Dummy {f00=0x012f, f01=0x4052, f02=» V W2 RB P R P W. P !P CT J <@ N U _P iP oWT wPP R Q , H D !&J W T * Pb P T T T W : V * P x H D ! /P$ ;R K * SW [PH aP> gP mP q * wR {Q P R R W Wr
0x288b54…288ce8 Dummy {f00=0x012f, f01=0x0190, f02=» J F IDENT DRGP01 REL 10.0 80-03-14 870105041000 GPADY ECHOGP R GPADY j DISIOE | , ( P P OUTPUT * & B P B L # +P ! ! , ( ;
0x288ce8…288e7c Dummy {f00=0x012f, f01=0x0190, f02=» U P , ( T Y &_. P R P O]> V , ( _F T Y Y & V Y _^ P , ( C _P " $ P DWTBC , ( $ X & X ]r ! Y , ( Y Y _
0x288e7c…289010 Dummy {f00=0x012f, f01=0x0190, f02=» Y & Y > B B , ( K U $ ! T _ U D ! " , ( k T _ C > X Z^<BR P R LDREG ECHOGP , ( f X _x R V ! * & P P P P R ?Q ! Y E
0x289010…2891a4 Dummy {f00=0x012f, f01=0x4142, f02=» P P v , ( "X _ X " ! ! / X & $ F H D ! x PB P8 #P 1P AT UW cW w > U P" T P4 h H D ! R( Pj V T P . MU$ WT aU kT R P R0 V0 P* P ( $ P
0x2891a4…289338 Dummy {f00=0x012f, f01=0x0190, f02=» J F IDENT DRDY01 REL 10.0 80-03-14 870105041000 DYADY ECHODY R DYADY j OUTPUT | , ( DISIOE * & !@ ! P P & , ( =
0x289338…2894cc Dummy {f00=0x012f, f01=0x0190, f02=» ! B B U , ( $ ! T _ U D ! T . GETCHR ^ , ( _ $$ X" X& X* C p , ( X`" E P 8'0P E , ( T ! T 9 _ ! T @_ ! , ( 5
0x2894cc…289660 Dummy {f00=0x012f, f01=0x0190, f02=» DWTBC , ( ' X ] ! , ( @ B ! ! ! B @ , ( Y & ! W 8!0T 8 !@P p , ( ! $ P ! ! TENDIO , ( ! 1P X & C ,T Y
0x289660…2897f4 (3, 23) Dummy {f00=0x0133, f01=0x0190, f02=» LDREG , ( S Z2<BR > ? Y , ( m! ! T X ! Y @ * & & Zl T _ ! X p ECHODY , ( $ P ! R V ECHRTN * & P P !
0x2897f4…289988 Dummy {f00=0x0133, f01=0x0190, f02=»" Y )U W ! ! , ( / ! Y 4 B * & @ I U )X R X P , ( g X &" Y * X ) V Y ~ , ( ! X $ X & ! X * , ( H `R Y ! !
0x289988…289b1c Dummy {f00=0x0133, f01=0x4180, f02=» ( > n H D ! P b )P -P 3 9 CP SP WP. ]T oR| yR H D ! B 8 U4 T U T P( P TD T )T GP M Y cP Z H D !> gR P 8 W T P P ( P T IQ YR H D ! p uT T P
0x289b1c…289cb0 Dummy {f00=0x0133, f01=0x018e, f02=» J F IDENT DRLT01 REL 10.0 80-03-14 870105041000 D @ CHLT1 CHLT2 CHLT3 CHLT4 OUTLRT CHLTON LOCHANL RECHAN REMFC R DWREMU LOCHANL RECHAN REMFC DWREMU INTLT1
0x289cb0…289e44 Dummy {f00=0x0133, f01=0x0190, f02=» f , ( J ;h # <c$ " P DWTOTQD 8 DWTOCH J OUTLIN , ( = P 4 5 T P ? X U X n DWTST , ( Y > P P P P 0 X , ( u T Y W U U
0x289e44…289fd8 Dummy {f00=0x0133, f01=0x0190, f02=»> 8' T Y X ~ DWTADR RECADR . DWTSB2 @ , ( " ' T P X P R , ( > Z X "X DWTOR DWTECB * & ! 8' T 8Z" X ' X INT
0x289fd8…28a16c Dummy {f00=0x0133, f01=0x4156, f02=»P _ E W Q Y W 8 CHLTON ( , ( @" E 4 % E Y > > < $ $ B @ P A T l H D !@ 3 9P =PR GP _PZ cPF gP kP uT Wn . Tx Rt WP B H D ! P> P4 R0 T T P P B )T
0x28a16c…28a300 Dummy {f00=0x0133, f01=0x018e, f02=» J F IDENT DRSOP1 REL 10.0 80-03-14 870105041000 0 , SOPCT SOPRY IHSOP DWSI01 DWSI02A DWSO01A R SOPCT , ( T 8T 9W B DISIOE SPDLCI , ( ! D 7P P
0x28a300…28a494 (3, 24) Dummy {f00=0x0133, f01=0x0190, f02=» ECBCW ECBEL TENDIO $ , ( W"H X R C C 6 TDISP f SOPRY t v * & o ?A @ A. X DWSI01 , ( @ V 9_: DWSO01A
0x28a494…28a628 Dummy {f00=0x0133, f01=0x403e, f02=» ;W GW W ]R V p (@ : X R C C 6 TDISP f SOPRY t v * & o ?A @ A. X DWSI01 , ( @ V 9_: DWSO01A
0x28a628…28a7bc Dummy {f00=0x0133, f01=0x0190, f02=» J F IDENT DRTW01 REL 10.0 80-03-14 870105041000 TWADY IHTWY TWONY DWTW01 R TWADY v , ( x B U P R DISIOEA , ( ! U ! ! W ! Q ! B , ( ? Z P
0x28a7bc…28a950 Dummy {f00=0x0133, f01=0x0190, f02=» R ?U C ! _f Y (P Y ) , ( _ ^ _ ! P B L * , ( # +P Y , ! U _ X Z DWTST , ( @ T _ W ! Y ! X , ( X ! X P R ?]* U C , ( = _.
0x28a950…28aae4 Dummy {f00=0x0133, f01=0x0190, f02=»WTOR , ( y " h Y _p ? X R X DWTECBN < DWTSB2 N , ( D X ' & P ` DISENDL IHTWY INTSAV * & ! X , _V A * & ? X
0x28aae4…28ac78 Dummy {f00=0x0133, f01=0x0190, f02=» 8 J P 8 B W B W PFPOST " * & ; B W B @ T 8 T Y 4 DWTA4 b DWTA5 r TDISP , ( W H Y Y Y Y . * & @ m ! : X ._B B 1 4 X X , ( X X
0x28ac78…28ae0c Dummy {f00=0x0133, f01=0x415c, f02=» _^ H D ! U P R !U + 4 -W 1 P 5Q 9 v CP M : Q WP cR H D ! R s v P. P( P R Q W R U v P 4 P: P @ U j H D !1 T W @ +P /R 7U G M SP m @ R P 4 @ <
0x28ae0c…28afa0 Dummy {f00=0x0133, f01=0x0190, f02=» J F IDENT DRLP01 REL 10.0 80-03-14 870105041000 & " LPADR ACLPY IHLPY LPONY DWLP01 R LPADR | ACLPY DWTBC , ( D T 1 W B DISIOEC , ( B P P
0x28afa0…28b134 (3, 25) Dummy {f00=0x0133, f01=0x0190, f02=» TDISP DWTA5 , ( } Q 1 Y $ PFPOST T LPONY f DWTST x , ( @ r t @ B X _" ? IHLPY INTSAV DWTOR DWTECB , ( B X
0x28b134…28b2c8 Dummy {f00=0x0133, f01=0x40a2, f02=» r H D ! T WP %PD )P 3V I OT UW _P eP m qT uV W ( t ^ @ X _" ? IHLPY INTSAV DWTOR DWTECB , ( B X
0x28b2c8…28b45c Dummy {f00=0x0133, f01=0x8190, f02=» J F IDENT DRFD01 REL 10.0 80-04-29 870105041000 FDADR IHFDY FDONY DWFD01 R FDADR v NVLCHK , ( 9 ! ! T DWTORD DWTOR VOLNAM , ( H
0x28b45c…28b5f0 Dummy {f00=0x0133, f01=0x8190, f02=» A. p SETIMPT TDISP " , ( m Y W L 2 , ( Y X Y ! X P P b DISIOEL * & P P R P X DISEND ECBRL , (
0x28b5f0…28b784 Dummy {f00=0x0133, f01=0x818e, f02=» B Y " v , ( "0 Y V Y Y , ( ; Y X X T V X R # ;b9B F , ( [ Y Y ) Y X v , ( y !? P P P P ! , ( X P _ X x ^ , (
0x28b784…28b918 Dummy {f00=0x0133, f01=0x8190, f02=» f , ( P P ! # T X P , ( 9@ X &P ! ! B R Q 8 , ( U :C P ! 9DV + ! (@ B h , ( s ! ! ! ! ! , ( ! ( ! ! 9 X Y DWTSB2 ,
0x28b918…28baac Dummy {f00=0x0133, f01=0x8190, f02=» j , ( ! 1 ! * ! ! ! ) , ( 1 ! # X Y _ P P ! : , ( Q P @ 9 4 ! P j , ( oB X 1P B +P T , ( ( C Q V ! ! DWTTAB
0x28baac…28bc40 Dummy {f00=0x0133, f01=0x8190, f02=» @ C Q (Q _ X , ( H X D x ^ ! 0 ECBEL ` , ( ! ! P @ 9 ! T ) p , ( 7D C "W ! ( - ! PFPOST , ( S ) W W Y Y Y Y
0x28bc40…28bdd4 (3, 26) Dummy {f00=0x0137, f01=0x8190, f02=» , ( $ Y W 8 & FDONY 4 DWTA2 F , ( @ Y (_ ? Y ( Y * X P V , ( @ y _* _: Y , ( @ Y Y L Y ! VOLCLR , ( ! ^
0x28bdd4…28bf68 Dummy {f00=0x0137, f01=0x8190, f02=» 0B. X P Y : ! ! ^ , ( X # P Y :A , X A Y & DWTECB V , ( "@ @ B. Y * . Y X h , ( Y C "'? 8 X * IHFDY INTSAVN , ( Y (_ A 0
0x28bf68…28c0fc Dummy {f00=0x0137, f01=0x8190, f02=»:AZl X P Y ! P | , ( W + 7P $ P + < , ( w $ <C ! 9 9 4 X 9C X L , ( : X X 4 B :C | , ( 4 $ ! ^# T @ TOT @ , ( SST X Y W 0 !
0x28c0fc…28c290 Dummy {f00=0x0137, f01=0x8190, f02=» 1 0! D 4 1 Y W (@ TEBCDIR 0 , ( O 0! D 6 ] Y 4 ! B , ( m ;E :B 9A ! U r , ( P jW kQ 4 9 , ( 0" Z Y P Z _ , (
0x28c290…28c424 Dummy {f00=0x0137, f01=0x8190, f02=» DWFD01 * , ( + , ( K B , ( k r , ( , (
0x28c424…28c5b8 Dummy {f00=0x0137, f01=0x8190, f02=» T )V f H D ! 5 9 = A E GT KV" O QR _ e q }PZ P PR P " H D ! P & P D Z P W@ P & n H D !DR ^ P * P & ~ P #P - ^ 1T H D !
0x28c5b8…28c74c Dummy {f00=0x0137, f01=0x8190, f02=»PR R H D ! ^ B R t # Z ' B + 3 ^ ; ? P GP MP H D ! Q UP e i mP uP PV T Q V8 ^ * & t Z H D ! WX W l QR Q & D Z #P + 1T ;W C H D ! G M t Q YWf ]
0x28c74c…28c8e0 Dummy {f00=0x0137, f01=0xc184, f02=» F )P 1W 5 S F [ R ]P c R q T } P P H D ! P P T T J * V X P0 T Z T ? H I J KP O J F H D ! UP ]P, iP & & T` F T H T N H D ! / & W( & T. N * * F
0x28c8e0…28ca74 (3, 27) Dummy {f00=0x0137, f01=0x0190, f02=» J F IDENT EBCDIC REL 10.0 80-03-14 870105041000 TASCIIK TEBCDI R TASCIIK l , ( , ( ! , ( A ABCDEFGHI[.<(+!&JKLMNOPQR]$*);^
0x28ca74…28cc08 Dummy {f00=0x0137, f01=0x416e, f02=»89:#@'=" p , ( ABCDEFGHI[.<(+!&JKLMNOPQR]$*);^ TEBCDI @ , ( -/STUVWXYZ|,%_>?0123456789:#@'= T , ( 7- <=2&p ?' , ( ! @O {[lP}M] Nk`Ka z^L~no , ( A | J
0x28cc08…28cd9c Dummy {f00=0x0137, f01=0x4136, f02=» J F IDENT DVTKB REL 10.0 80-03-14 870105041000 DVTKB R DVTKB b KBADN t & " KB bECH , ( !@ ?
0x28cd9c…28cf30 Dummy {f00=0x0137, f01=0x0190, f02=» J F IDENT TOSSIO REL 10.0 80-04-30 870105041000 J F "dTIO TIO:FM TIOERR TENDIO QUEDEV QUEFIL DC:MIN@ DC:MOT MONMMUC R J F " ECBFC ECBBA ECBRL ECBEL ECBRC ECBCW ECBCW1` ECBCW2 DC:DIX DM:DIX' F B PC:DIXV MX:DIX KB:DIX8
0x28cf30…28d0c4 Dummy {f00=0x0137, f01=0x0190, f02=» DWTOR DWTOCHV DWTADR DWTTABR DWTWAT DWTTQ DWTOTQ DWTUEC J F " DWTMECj DWTA2 DWTA3 DWTA4 DWTA5 DWTSB12 DWTSB2 DWTTP DWTECH DWTSQ D DWTORD DWTNVL DWTVOLA DWTCHP DWTST DWTBC DWTECBV DWTOP
0x28d0c4…28d258 Dummy {f00=0x0137, f01=0x0190, f02=»C DWTMECj DWTOTQ DWTA2 4 DWTA3 F DWTA4 X DWTA5 j DWTSB12 | DWTSB2 " DWTTP $ DWTORD $ DWTNVL & DWTECH & DWTVOLA .
0x28d258…28d3ec Dummy {f00=0x0137, f01=0x0190, f02=» RECADRV ECHADR DC:DIX ( DM:DIX' < PC:DIXV P MX:DIX d KB:DIX8 x IT:DIXT DK:DIXN ECBFC ECBBA ECBRL ECBEL ECBRC
0x28d3ec…28d580 Dummy {f00=0x0137, f01=0x018e, f02=» ! $ FREBLK: , * & A ( , 0 4 8 < ( H 0 ) > TTB:SA l , ( _ $P $ ) U ~ TTB:MTO , ( @ { @ T C @ ,W 0P , ( P > T C
0x28d580…28d714 (3, 28) Dummy {f00=0x0137, f01=0x0190, f02=» SETIMPR , ( A A L W @W T QTJOB F , ( P X T X P 4 Y V TIOERR 2 LKMQDI QUEDEV L , ( / C C 8W QUEFIL N T
0x28d714…28d8a8 Dummy {f00=0x0137, f01=0x0190, f02=» i @P U , ( XT ! X ! X P , , ( X T _l Xf Y @ P R , ( T X &P P H T _ X TTB:PW , ( I Y T # , (
0x28d8a8…28da3c Dummy {f00=0x0137, f01=0x0190, f02=» a$ W Y P R R P , ( } T P (@ (@ " 2 . , ( @ _ > X $? P $ > > ^ , ( , ( , ( F C F C >
0x28da3c…28dbd0 Dummy {f00=0x0137, f01=0x0190, f02=» P B P ~ , ( { 0$ T # R Q > , ( X B U H Q X D B N , ( $ T C x > C $ ) ~ DISENDA , ( _ X 9BV X & , ( @ X D C
0x28dbd0…28dd64 Dummy {f00=0x0137, f01=0x0190, f02=» > P p (_H , ( y _2 B U X DC:MOT P , ( @ > ? _ X T (@ d DC:MIN@ , ( @ ^ > > ? _ X T , ( (@ X L U L Q M , (
0x28dd64…28def8 Dummy {f00=0x0137, f01=0x0190, f02=» X T 4 Y X | , ( S 1 1 X P - M T , ( q $ P _ T " # L , ( p X L R P P P | , ( (@ ^ X P P # , ( P T P 0P 1
0x28def8…28e08c Dummy {f00=0x0137, f01=0x0190, f02=» N H D ! @ ! # % ' ) + W iP W P T T" V$ Pp Wb H D ! P^ T& RP P" WF W( T$ P T #P IW WP iP { P V H D ! T P. T& P P T T W4 EP YT ]P aW qP wR yP T H D ! P Q
0x28e08c…28e220 Dummy {f00=0x0137, f01=0x4048, f02=»PJ R P P P P8 P0 P P P W 2@ DPp Wb H D ! P^ T& RP P" WF W( T$ P T #P IW WP iP { P V H D ! T P. T& P P T T W4 EP YT ]P aW qP wR yP T H D ! P Q
0x28e220…28e3b4 (3, 29) Dummy {f00=0x0119, f01=0x0190, f02=» J F IDENT TIMER REL 10.0 80-03-14 870105041000 TIMER SETIME SETIMP R TIMER r TDISP FNDTIDC LKMRQE , ( $ T GETBLK@ LKMQDI
0x28e3b4…28e548 Dummy {f00=0x0119, f01=0x40ec, f02=» _ ? * & S ^ 4 _ ( TIMQUEA V , ( o @ 1 A _ P 9 > h > ( $ ~ T J : - 4 1 J 3 > P @ ETBLK@ LKMQDI
0x28e548…28e6dc Dummy {f00=0x0119, f01=0x0190, f02=» J F IDENT TMMLKM REL 10.0 80-03-14 870105041000 TCHPAGK TCHMMU TLUSEG R TCHPAGK t TTB:MT LKMQDI TCHMMU FNDTID , ( $' "?:B ] TLU
0x28e6dc…28e870 Dummy {f00=0x0119, f01=0x407a, f02=» ,$ T -_> | RELPAG Q - _H . P -U 3U IT H X d@ vPAGK t TTB:MT LKMQDI TCHMMU FNDTID , ( $' "?:B ] TLU
0x28e870…28ea04 Dummy {f00=0x0119, f01=0x0190, f02=» J F IDENT TLDSEG REL 10.0 80-03-14 870105041000 TLDSEGK TLDS15 TLDS20 R TLDSEGK t TTB:SP SEG:NS LKM030 , ( B T R L U 9C TTB:SB SEG:D
0x28ea04…28eb98 Dummy {f00=0x0119, f01=0x4116, f02=»CTMMP SCTNPE , ( 5 D " @ @ - U SCTLAP P TTB:MT b TTB:CB@ t TTB:SA , ( M $ _ 9B @ T u g@ X > R U 'T 1W. KU l
0x28eb98…28ed2c Dummy {f00=0x0119, f01=0x0190, f02=» J F IDENT TABORT REL 10.0 80-03-14 870105041000 TABORTK R TABORTK d FNDDWT x DWTTAB DWTST , ( "R P X T X R ? DWTECH DWTADR ABTAD
0x28ed2c…28eec0 Dummy {f00=0x0119, f01=0x40a8, f02=» X H x LKMQDI LKMRQE * & " I P @ < ( $ RT PL TF R@ V )P 7P IP f @ , ( "R P X T X R ? DWTECH DWTADR ABTAD
0x28eec0…28f054 (3, 30) Dummy {f00=0x011a, f01=0x0190, f02=» J F IDENT MONTIM REL 10.0 80-03-14 870105041000 GETTIMK SETTIM R GETTIMK l MONCLO , ( @ < ? < ? <(@ $ , ( P B $ 9H C ">h # TTB:SA L
0x28f054…28f1e8 Dummy {f00=0x011a, f01=0x40b2, f02=»P ?_" = > = > = =_D , ( R _ 00 > & <h$ P ( > X ( $ P ?P eP s wP R P p @ $ , ( P B $ 9H C ">h # TTB:SA L
0x28f1e8…28f37c Dummy {f00=0x011a, f01=0x018e, f02=» J F IDENT TOSSFM REL 10.0 80-03-14 870105041000 TOSSFMK FCHECK FCHEC2 R TOSSFMK t , ( " 2 P P P P P P FM:ADM TTABFM ACTDIS , ( ! T
0x28f37c…28f510 Dummy {f00=0x011a, f01=0x018e, f02=» EWTEXL , ( U T L L R Q EWTEXB J * & o U , , _D , ECBRL , ( V :a B # S EWTVOL FNDDWD DWTST , ( H
0x28f510…28f6a4 Dummy {f00=0x011a, f01=0x4180, f02=» FCHEC2 SCTNOF SCTFWT . , ( " _6 _6 " " P @ Q " @ FWTTAB0 p FWTPARL * & @ , Y ," P L $P T L $ &R :AV ' > _ H D ! P* P P" P P P !
0x28f6a4…28f838 Dummy {f00=0x011a, f01=0x0190, f02=» J F IDENT LKMAL REL 10.0 80-03-14 870105041000 LKMAL R LKMAL b bTIO t TWAIT TEXIT TACTOT TPAUSE TIMER TMWAIT TLUSEGC * & UT
0x28f838…28f9cc Dummy {f00=0x011a, f01=0x4082, f02=» * & H TCHMMUC 2 # D & & l@ ~ TWAIT TEXIT TACTOT TPAUSE TIMER TMWAIT TLUSEGC * & UT
0x28f9cc…28fb60 Dummy {f00=0x011a, f01=0x0190, f02=» J F IDENT FMTASK REL 10.0 80-03-15 870105041000 F B FMRDWRK FM:ADM FMINIT TTABFM FWTPAR FWTFNR FWTTABL FWTEW1 R F B FWTEXB FWTVOL EWTEXL EWTEXB EWTVOL FPB:RLL FPB:BF0 FPB:FO F B FPB:BO FPB:FN FPB:EL FPB:V1B
0x28fb60…28fcf4 (3, 31) Dummy {f00=0x011b, f01=0x0190, f02=»:CD FPB:RP z FWTPAR FWTFNR ( FWTTABL < FWTEW1 P FWTVOL " d FWTEXB $ x EWTEXL EWTVOL EWTEXB FPB:RLL FPB:BF0 FPB:FO F
0x28fcf4…28fe88 Dummy {f00=0x011b, f01=0x0190, f02=» FPB:V3 & FPB:S3 , FPB:V4 0 ( FPB:S4 6 < FPB:FR : P FPB:US > d FPB:SHL @ x FPB:MN A FPB:SNI B FPB:IF C FPB:KAV D FPB:CD F FPB:RP L T
0x28fe88…29001c Dummy {f00=0x011b, f01=0x0190, f02=»T SCTNOF TIODM FDBMECS , , ( > A @ @ > SCTFWL n , ( A @ R P % % DWTST DWTADRI * & @ I I I I DWTME
0x29001c…2901b0 Dummy {f00=0x011b, f01=0x0190, f02=» 9 V 1 Y , NVLEND * NVLBITS < & " = P :A A > N FM:ADM x TTB:MTO ECBBA , ( f & T M F , ( @ h Px ' !
0x2901b0…290344 Dummy {f00=0x011b, f01=0x018e, f02=» n FNDDWD , ( U W A " X* X2 " DWTNVLI P , ( u "(@ I $ V V " L b GETBLK * & P V : V V P , ( &W Y Y " V V T Y , (
0x290344…2904d8 Dummy {f00=0x011b, f01=0x018e, f02=» , ( + $ $P # ' P @T #? , ( K W #?$? : _2 J @" P Y 4 , ( k 9 @ J ! T " Y X & $ d ECBRC , ( ' ! P C ( , ( P J : J < W W P X V , (
0x2904d8…29066c Dummy {f00=0x011b, f01=0x0190, f02=» , ( % % Y Y V + V K V , ( E K : V K < V K A V % K C 4 , ( e V & K D X P K @ X 9AV K d , ( 9 !? K > F & G , ( R N ! , ( N P N
0x29066c…290800 Dummy {f00=0x011b, f01=0x0190, f02=» ,( B ( v TTB:SAR , ( P U . T . 8 ( FREBLKS X , ( 5 X>_. : X P 0(@ Y Y j , ( S Y :" "(@ X $ T ( DWTVOLR DFTAB DFTABE , ( o
0x290800…290994 (3, 32) Dummy {f00=0x0141, f01=0x0190, f02=» T X p ECBFC , ( " C : X V P _ : C , ( U : @ @ P , ( V )$ T B , * Y $ * & ! : & $ Y : @ , ( ? P 8 T _ &
0x290994…290b28 Dummy {f00=0x0141, f01=0x4184, f02=» R* P P #V =P P< : P& P6 P H D !Ga T ) n /W 5W 9W = : E S z WW _ g P P W T B H D ! 9 P( T P P 1P, AP ET KW eP uT P P* H D ! G P V W Q : W W T
0x290b28…290cbc Dummy {f00=0x0141, f01=0x40fa, f02=» J F IDENT DFTAB REL 10.0 80-03-14 870105041000 $ DFTAB DFTABE DMTIDP DMTIDS R DFTAB z DFTABE DMTIDP DMTIDS @ PDMTIDP E
0x290cbc…290e50 Dummy {f00=0x0141, f01=0x4128, f02=» J F IDENT PFTAB REL 10.0 80-03-14 870105041000 PFTAB R PFTAB b TWONN t SOPRN CHLTONA FDONN LPONN FMINIT & " UP
0x290e50…290fe4 Dummy {f00=0x0141, f01=0x0190, f02=» J F IDENT DVKB00 REL 10.0 80-03-14 870105041000 DVKB00K R DVKB00K d KBAD3 x CTAB01 , ( KB DVDY00 , ( %@
0x290fe4…291178 Dummy {f00=0x0141, f01=0x4028, f02=» N - 0 / 0 @ $ REL 10.0 80-03-14 870105041000 DVKB00K R DVKB00K d KBAD3 x CTAB01 , ( KB DVDY00 , ( %@
0x291178…29130c Dummy {f00=0x0141, f01=0x4104, f02=» J F IDENT DVDY00 REL 10.0 80-03-14 870105041000 DVDY00K R DVDY00K d DYADN x * & Y % P @ 8 , 8 @
0x29130c…2914a0 Dummy {f00=0x0141, f01=0x4100, f02=» J F IDENT DVGP01 REL 10.0 80-03-14 870105041000 DVGP01K R DVGP01K d GPADN x * & P % @ 4 ( 4 @ ECB ADD
0x2914a0…291634 (3, 33) Dummy {f00=0x0140, f01=0x4104, f02=» J F IDENT DVDY02 REL 10.0 80-03-14 870105041000 DVDY02K R DVDY02K d DYADN x * & Y % P @ 8 , 8 @
0x291634…2917c8 Dummy {f00=0x0140, f01=0x4100, f02=» J F IDENT DVGP03 REL 10.0 80-03-14 870105041000 DVGP03K R DVGP03K d GPADN x * & P % @ 4 ( 4 @ ECB ADD
0x2917c8…29195c Dummy {f00=0x0140, f01=0x0190, f02=» < F IDENT CTAB01 81-06-19/E,VRANG CTAB01K D CTAB01K V , ( 0123 j , ( ! 456789 , ( A ' < +,-. 0123456789 @ABC , ( a DEFGHI
0x29195c…291af0 Dummy {f00=0x0140, f01=0x4030, f02=» < | | | @ ,6-19/E,VRANG CTAB01K D CTAB01K V , ( 0123 j , ( ! 456789 , ( A ' < +,-. 0123456789 @ABC , ( a DEFGHI
0x291af0…291c84 Dummy {f00=0x0140, f01=0x0190, f02=» J F IDENT SYSBUG REL 10.0 80-03-14 870105041000 F B SCTMSZK SCTSFA SCTEFA SCTIPL SCTANO SCTADA SCTIOEL SCTPAG R F B SCTSWB SCTNOP SCTPSZ SCTMMC SCTLAC SCTMMPL SCTLAP0 SCTNPE F B SCTSTB SCTOPT SCTTCT SCTCDTB
0x291c84…291e18 Dummy {f00=0x0140, f01=0x0190, f02=»:PB PAG:QF PAG:QB PAG:PA PAG:SBS SWB:NC0 z SWB:DS SWB:ELV SWB:NS 4 SEG:FCL V SEG:NS j SEG:STI ~ SEG:DS SEG:ELV SEG:PB PAG:QF PAG:QB PAG:PA
0x291e18…291fac Dummy {f00=0x0140, f01=0x018e, f02=» IHRTC ILLINTM IHTWN " , ( 2 IHSOP b CHLT1 r IHFDN , ( , ( ! , ( 1
0x291fac…292140 Dummy {f00=0x0140, f01=0x0190, f02=» , ( a , ( q 4 HALTN d t SCTMSZK SCTSFA SCTEFA SCTIPL SCTANO SCTADA , (
0x292140…2922d4 (3, 34) Dummy {f00=0x0142, f01=0x0190, f02=» SCTNOP SCTPSZ SCTMMC 0 SCTLAC D SCTMMPL X SCTLAP0 l SCTNPE SCTSTB SCTOPT bBUG SCTBUG , (
0x2922d4…292468 Dummy {f00=0x0142, f01=0x408a, f02=» SCTDCT ^ _ > T t@ SCTSTB SCTOPT bBUG SCTBUG , (
0x292468…2925fc Dummy {f00=0x0142, f01=0x0190, f02=» > @ IDENT DEBUGM REL 10.0 80-03-14 870105041000 dBUG F |BUG T SCTLAC d , ( A U A @ , A v , ( A @ ~ A A ~ @ , ( ? A A @ A A @ , (
0x2925fc…292790 Dummy {f00=0x0142, f01=0x0190, f02=» x , ( , ( $ ( , 0 4 H , ( ! 8 < x , ( A , ( a , (
0x292790…292924 Dummy {f00=0x0142, f01=0x0190, f02=» h , ( A T :a R T <a Z _ = , ( :A , >a @ 8 , ( " ! A P UW B h , ( A @ = / M Q , ( a R S T Y G P H L , ( V I
0x292924…292ab8 Dummy {f00=0x0142, f01=0x0190, f02=» *T A _ P A A , ( . , + - ; : ( , ( ! X " H W X " H H X , ( A A A A _T @ P A 1+ , ( !T a X A _ @ A @ A _ , ( ! A UP
0x292ab8…292c4c Dummy {f00=0x0142, f01=0x0190, f02=» W W x , ( 0 _, W , ( ! ! W P @ & 0 H , ( A T A P P x , ( a _b _J A , ( "T @ W @ , (
0x292c4c…292de0 Dummy {f00=0x0142, f01=0x0190, f02=» h , ( _L W @ $ 0 , ( ! W " A W @ A 8 , ( A P 3P h , ( a C @ P @ @ P @ Q , ( A " @ A " T @ W @ , ( ( A
0x292de0…292f74 (3, 35) Dummy {f00=0x0122, f01=0x0190, f02=» $ @ @ @ P , ( ! $ @ A 9 Y ( , ( $ A (>a Y h c A A " X , ( P a $ A (<a P h A , ( @ ) " A H , ( U A @ $
0x292f74…293108 Dummy {f00=0x0122, f01=0x0190, f02=» A " x , ( ! RE RN ME MN W R , ( A ( T ( W P T $ ; V H , ( a ; W &~ P &`P 6 P @ x , ( $ P $W $ T P , ( #~ > V . >A P Y X , (
0x293108…29329c Dummy {f00=0x0122, f01=0x0190, f02=» h , ( ! ^ P _ " , ( @ A ^ T @ 9J A T _ 1@ 8 , ( a _ ^ 9 V >! D A h , ( A > > > > , ( > > > > ^ _ ^ _ ? ? ? ? , ( @ ? A
0x29329c…293430 Dummy {f00=0x0122, f01=0x0190, f02=» ? ? ? ? ? ? ? A > , ( J A A > A A ^ " ( , ( a , , A A :B A Q (P _ # X , ( # H A " A 0 , ( R 9U AR FQ 0:D A , ( _* A " A
0x293430…2935c4 Dummy {f00=0x0122, f01=0x0190, f02=» " A A x , ( A $ T ! " A @ , ( a T 0W 0W A @ T 1W H , ( 1 @ " P A UT @ W x $ T @ W T @ W @ " , ( @ D H L P T X ` d h l p t x | , (
0x2935c4…293758 Dummy {f00=0x0122, f01=0x0190, f02=» Y W W ?W /W : A W ! A A , ( y P _ @ _ 0 , ( I T " T ` , ( A P I T ! A A A A A A , ( A A @ A A @ , ( B A @ >
0x293758…2938ec Dummy {f00=0x0122, f01=0x0190, f02=» 6 @ A P A < V A @ y H D ! & % 1 5 A E Q U a e q u 4 H D ! } P h L R h h : F ! ) P /P 3W 9 h H D ! = L A E Z G N K Q U Y ] a e i m q
0x2938ec…293a80 Dummy {f00=0x0122, f01=0x0190, f02=» S YP k p P p d H D ! T P T W 4 W Z W P F b H D ! W !W )PP ; b A GT K QP U f [ h _ . g Z k F q : w h 8 l H D ! P T W T W P F F 8 F F H D ! x
0x293a80…293c14 (3, 36) Dummy {f00=0x0124, f01=0x0190, f02=» ^ P H D !o P ^ Z P ' Z 5 8 ; X S n a Z k { 8 n Z T H D !< P@ PB p p Z " T ?R, ET IW ST [V kW~ sP wP {P X H D ! / P W TR PJ V P W P W P & W $ H D !% W 3P 9 h IT UT
0x293c14…293da8 Dummy {f00=0x0124, f01=0x4152, f02=» T 6 R U h # 4 + : / 4 9 P = T C X GT H D ! 4 [ _ 8 aT eW i mW q u 8 wT {W P& T W D H D !JP T W T W ?R EW" K h OW U h YW ]W aW eW H D ! @ k oW u yPL } T T P T$
0x293da8…293f3c Dummy {f00=0x0124, f01=0x0190, f02=» J F IDENT DRFD01 REL 10.0 80-04-29 870105041000 FDADR IHFDY FDONY DWFD01 R FDADR v NVLCHK , ( 9 ! ! T DWTORD DWTOR VOLNAM , ( H
0x293f3c…2940d0 Dummy {f00=0x0124, f01=0x0190, f02=» A. p SETIMPT TDISP " , ( m Y W L 2 , ( Y X Y ! X P P b DISIOEL * & P P R P X DISEND ECBRL , (
0x2940d0…294264 Dummy {f00=0x0124, f01=0x018e, f02=» B Y " v , ( "0 Y V Y Y , ( ; Y X X T V X R # ;b9B F , ( [ Y Y ) Y X v , ( y !? P P P P ! , ( X P _ X x ^ , (
0x294264…2943f8 Dummy {f00=0x0124, f01=0x0190, f02=» f , ( P P ! # T X P , ( 9@ X &P ! ! B R Q 8 , ( U :C P ! 9DV + ! (@ B h , ( s ! ! ! ! ! , ( ! ( ! ! 9 X Y DWTSB2 ,
0x2943f8…29458c Dummy {f00=0x0124, f01=0x0190, f02=» j , ( ! 1 ! * ! ! ! ) , ( 1 ! # X Y _ P P ! : , ( Q P @ 9 4 ! P j , ( oB X 1P B +P T , ( ( C Q V ! ! DWTTAB
0x29458c…294720 Dummy {f00=0x0124, f01=0x0190, f02=» @ C Q (Q _ X , ( H X D x ^ ! 0 ECBEL ` , ( ! ! P @ 9 ! T ) p , ( 7D C "W ! ( - ! PFPOST , ( S ) W W Y Y Y Y
0x294720…2948b4 (3, 37) Dummy {f00=0x0136, f01=0x0190, f02=» , ( $ Y W 8 & FDONY 4 DWTA2 F , ( @ Y (_ ? Y ( Y * X P V , ( @ y _* _: Y , ( @ Y Y L Y ! VOLCLR , ( ! ^
0x2948b4…294a48 Dummy {f00=0x0136, f01=0x0190, f02=» 0B. X P Y : ! ! ^ , ( X # P Y :A , X A Y & DWTECB V , ( "@ @ B. Y * . Y X h , ( Y C "'? 8 X * IHFDY INTSAVN , ( Y (_ A 0
0x294a48…294bdc Dummy {f00=0x0136, f01=0x0190, f02=»:AZl X P Y ! P | , ( W + 7P $ P + < , ( w $ <C ! 9 9 4 X 9C X L , ( : X X 4 B :C | , ( 4 $ ! ^# T @ TOT @ , ( SST X Y W 0 !
0x294bdc…294d70 Dummy {f00=0x0136, f01=0x0190, f02=» 1 X W (@ 0! D 4 1 Y TEBCDIR 0 * & O W X T X W (@ 0! D B , ( m 6 1 Y 4 ! ;E :B 9A p , ( ! U P jW k , ( Q 4 9 0" Z , (
0x294d70…294f04 Dummy {f00=0x0136, f01=0x0190, f02=» ) 4 ! " ) 4 DWFD01 < , ( = 4 , ( ] d , ( } , ( , (
0x294f04…295098 Dummy {f00=0x0136, f01=0x0190, f02=» P P& P R P T )V H D ! 5 9 = A E GT KV" O QR _ e q }PZ P PR P D H D ! P 8 P P Z P W@ P 8 H D !DR ^ P * P 8
0x295098…29522c Dummy {f00=0x0136, f01=0x0190, f02=» d 0 P ^ 8 PR t H D ! ^ B R # Z ' B + 3 ^ ; ? P GP MP 0 H D ! Q UP e i mP uP PV T Q V8 ^ 6 8 t | H D ! " WX W l " QR Q 8 Z #P + 1T ;W
0x29522c…2953c0 Dummy {f00=0x0136, f01=0x0190, f02=» P L L L ` H D !$ F )P 1W 5 S F [ R ]P c R q T } P P H D ! P P T T J < V X P0 T Z T ? H I J KP O J h H D ! UP ]P, iP 8 8 T` X T Z T N H D ! 8
0x2953c0…295554 (3, 38) Dummy {f00=0x0138, f01=0x403a, f02=» L 8 d " O $@ 6
0x295554…2956e8 Dummy {f00=0x0138, f01=0x2008, f02=» L = KMD09 DATE = 810326 6876PACK NBR = 0001 ?
0x2956e8…29587c Dummy {f00=0x0138, f01=0x0190, f02=»,A6 P RF(E) RED110 CLEAR P EJECT ( P* 6 P* @ ( P* CHARACTER NOT FOUND IN KEYTABLE J P* v P* P* $ PRED090 LDR A4,A2 COPY CHARACTER P ANK A4,/FF MASK P LDR A1,A7 P SUK A1,1 P RF(Z) RED100 OR
0x29587c…295a10 Dummy {f00=0x0138, f01=0x0190, f02=»F RED110 P* P* PRED100 SUK A4,/20 $ P RF(N) CODERR LESS THAN /20 > P SUK A4,/3F b $ P RF(NP) RED110 CORRECT CHARACTER v P* P* $ PCODERR LDK A1,4 CODE CHECK ERROR P ORS A1,8,A8 . P CF A5,STORE STORE CHARACT
0x295a10…295ba4 Dummy {f00=0x0138, f01=0x0190, f02=»,TWBSP,A6 P RF(E) RED120 BACKSPACE P CC A2,TWCLR,A6 2 P RB(NE) RED035 J P* ` P* j P LDK A3,0 CLEAR ECB-BUFFER t " P RB RED020 GET NEXT CHARACTER P* P* PRED120 SUK A3,1 BACKSPACE & P RB(NN) RED020 GET NEX
0x295ba4…295d38 Dummy {f00=0x0138, f01=0x0190, f02=» P* W R I T E P* 4 P* ORDERS 05 AND 06: BASIC AND STANDARD WRITE $ P* P* f PWRITE EQU * p PTWAOUT EQU * P INH P LDK A4,0 P LDK A2,0 $ P CF A5,STRTIO EXECUTE CIO-START P* P* P CWK
0x295d38…295ecc Dummy {f00=0x0138, f01=0x0190, f02=» P ANK A3,/FF P SUK A3,/2B P RF(Z) WRT030 NO CR OR LF , P* N P* X , P ST A4,DWTHP,A6 HEAD POSITION INDICATOR b P LDK A4,2 $ P LDK A2,CR SEND CARRIAGE RETURN P EJECT P* P* P* $ PWRT010 CF A5,OTR
0x295ecc…296060 Dummy {f00=0x0138, f01=0x0190, f02=» PWRT020 SUK A3,5 P RB(Z) WRT015 SEND SECOND LF P SUK A3,1 D P RF(NZ) WRT030 V P LDK A2,/0C SEND FORM FEED n P RB WRT010 " PWRT030 LDK A3,2 BUFFER POINTER P RF WRT050 GET CHARACTER P* P* P* PWR
0x296060…2961f4 (3, 39) Dummy {f00=0x0145, f01=0x0000, f02=»
[…0xf…]
0x2979a0…297b34 (3, 41) Dummy {f00=0x013b, f01=0x0190, f02=»080 BUFFER IN SYSTEM AREA % & P LDKL A4,BUF DRIVER BUFFER ADDRESS & " 0 P CM BUFFLG,A6 INDICATE BUFFER IN SYSTEM AREA & L P XIF & P* & P IFT MMUPAG=1 & P IFT IBM=1 & P IFT TOSS+CHAN=0 & & P LDKL A4,BUF DRIVER BUFFER ADDRESS & 0 P CM BUFF
0x297b34…297cc8 Dummy {f00=0x013b, f01=0x0190, f02=»OSS+IBM=2 & P LD A1,DWTFIB,A6 ' P RF(Z) FD:090 NOT IBM ' * P XIF ' H P* ' T P IFT IBM=1 ' ^ P IFT MMUPAG=0 ' p ( P LD A4,DWTBA,A6 ASCII OUTPUT ADDRESS ' P XIF ' P* ' P IFT IBM=1 ' P LD A7,DWTRL,A6 REQ. LEN ' P CF A5,ASCII '
0x297cc8…297e5c Dummy {f00=0x013b, f01=0x0190, f02=»FT TOSS+IBM=2 ' P LD A1,DWTFIB,A6 ( P RF(Z) FD:100 TOSS DISC ( . P XIF ( N P* ( Z P IFT MMUPAG=1 ( d P IFF CHAN+IBM=0 ( z 4 P LD A2,DWT:LA,A6 GET FLAG/LOGICAL BUFFER ADDRESS ( ( P RF(Z) FD:100 BUFFER IN SYSTEM AREA ( $ P LD A7,DWTRL,A6 RE
0x297e5c…297ff0 Dummy {f00=0x013b, f01=0x018e, f02=»U TABLE ( t 2 P MVSU A7 MOVE BUFFER FROM SYSTEM TO USER AREA ) & P TL -30,A15 RESTORE MMU FROM STACK ) F P XIF ) p PFD:100 EQU * ) | P ABL FDMSIO ) P* ) P EJECT DRFD01 ) P* ) P******** ) P* * ) P* LOAD * ) P* *
0x297ff0…298184 Dummy {f00=0x013b, f01=0x0190, f02=» P RF(Z) LOAD00 LOAD ORDER * P ADK A3,17 * $ $ P RB(NZ) RQ:ERR ERROR IF NOT LOCK * 6 P* * ^ PLOAD00 EQU * * h P LDK A2,/14 LOCK * | P CF A5,FD:REA * P ANK A3,1 * & P RF(NZ) LOA:80 ENDIO NOT OPERABLE * P* * P IFT TOSS+IBM=2 * P
0x298184…298318 Dummy {f00=0x013b, f01=0x0190, f02=» A3,/26 * P RF(Z) LOA:65 LOCK ORDER + P CF A5,VO:NAM + 0 " P CF A5,LD:RC CHECK RETURN CODE + F P EJECT DRFD01 + l P* + P* READ DATA SET LABEL + P* + P LD A2,ECBCW2,A8 SECTOR NO + P SUK A2,7 + P RF(N) LOA:85 REQUEST ERROR +
0x298318…2984ac Dummy {f00=0x013b, f01=0x0190, f02=»UF + P CF A5,FD:REA , P SLL A1,4 CHECK NO DATA BIT , P RF(NN) LOA:60 NOT NO DATA , D 0 P ORK A3,/10 INDICATE ILLEGAL DATA SET LABEL , f PLOA:60 EQU * , P CF A5,LD:RC , P ENB , * P LD A3,ECBCW2,A8 DATA SET LABEL SECTOR , P LDK A1,DWTD
0x2984ac…298640 Dummy {f00=0x013b, f01=0x0190, f02=»OE , $ P CF A5,STDWT STORE BOE NO IN DWT - P SUK A3,1 CRN - 2 P LDK A1,DWTCRN - H P CF A5,STDWT - ^ P ADK A4,EOE-BOE EOE ADDRESS - r P CF A5,LOGSEC - P LDK A1,DWTEOE - $ P CF A5,STDWT STORE EOE NO IN DWT - P ADK A4,EOD-EOE EOD ADDRESS -
0x298640…2987d4 (3, 42) Dummy {f00=0x013d, f01=0x0190, f02=»NB e P ADR A4,A7 f PASC:10 EQU * f P SUK A4,1 f 0 P LCR A1,A4 EBCDIC CHARACTER f B P ANK A1,/FF f f ( P LC A1,TASCII,A1 TRANSFORM TO ASCII f z 0 P SCR A1,A4 PUT ASCII CHAR. IN OUTPUT BUFFER f P SUK A7,1 f P RB(P) ASC:10 f P RF EB
0x2987d4…298968 Dummy {f00=0x013d, f01=0x0190, f02=»CDIC TRANSFORMES A STRING FROM ASCII TO f P* EBCDIC CODE g 0 8 P* OUTPUT STRING IS PUT IN DRIVER BUFFER g R P* g & P* INPUT: A7 NO OF CHARACTERS g P* A4 = BUFFER ADDRESS g P* g P* OUTPUT: A1 CHANGED
0x298968…298afc Dummy {f00=0x013d, f01=0x0190, f02=»A4,BUF DRIVER BUFFER ADDRESS g P XIF h $ P* h 0 P IFT IBM=1 h : P ADR A4,A7 h L PEBC:10 EQU * h ^ P SUK A4,1 h r P LCR A1,A4 GET ASCII CHAR. h P ANK A1,/FF h P LC A1,TEBCDIC,A1 h P SC A1,BUF-1,A7 h P SUK A7,1 h P RB(P) EBC
0x298afc…298c90 Dummy {f00=0x013d, f01=0x0190, f02=»CT DRFD01 h P* i P********** i P* LOGSEC * i 0 P********* i B P* i T @ P* FUNCTION: LOGSEC TRANSFORMS PHYSICAL SECTOR TO STANDARD i ^ , P* LOGICAL SECTOR (BINARY). i < P* FORMAT OF PHYS. SEC. TT0SS (EBCDIC COD
0x298c90…298e24 Dummy {f00=0x013d, f01=0x0190, f02=» A3 BINARY SECTOR NO i . P* A4 ADDRESS TO PHYS. SEC. + 4 j P* j P PLOGSEC EQU * j Z P CF A5,DECBIN j n P LDR A3,A1 SAVE j P ADK A4,2 j P* j P* MULTIPLY BY 26 j P* j P SLL A3,5 *32 j P LDR A2,A1 j P SLL
0x298e24…298fb8 Dummy {f00=0x013d, f01=0x0190, f02=» j P EJECT DRFD01 k P* k P* CHECK SECTOR NO k * P* k D P LDR A1,A3 k N P SUK A1,25 k ` P RF(NP) LOG:10 k r P CWK A4,BUF+EOD+4 EOD k P RF(E) LOG:02 YES! k P SUKL A1,1898 k P RF LOG:04 k P* k " P* CHECK EOD LESS/EQUA
0x298fb8…29914c Dummy {f00=0x013d, f01=0x0190, f02=»OINTER k x P RTN A5 l P* l P* FATAL ERROR l ( P* l > ( PLOG:05 ADK A5,4 ADJUST STACK POINTER l H " PLOG:10 LDK A1,/10 RETURN CODE l t , P ORRS A1,A6 UPDATE TEMPORARY RETURN CODE l P INH INHIBIT INTERRUPTS l P ABL LOA:90 ERROR ROUTINE l
0x29914c…2992e0 Dummy {f00=0x013d, f01=0x0190, f02=»NSFORMS TWO EBCDIC CODED DIGITS TO l x D P* BINARY. RANGE OF EBCDIC CODE /F0 - /F9 IS CHECKED m * , P* INPUT: A4 ADDRESS TO FIRST DIGIT m r P* OUTPUT: A1 BINARY m P* WORKING REG: A2,A7 m P* m PDECBIN LDK A1,0 m P LDK A
0x2992e0…299474 (3, 43) Dummy {f00=0x0146, f01=0x0000, f02=»
[…0x7…]
0x299f80…29a114 (3, 44) Dummy {f00=0x0147, f01=0x0000, f02=»
[…0x7…]
0x29ac20…29adb4 (3, 45) Dummy {f00=0x0148, f01=0x0000, f02=»
[…0x18…]
0x29d394…29d528 Dummy {f00=0x0148, f01=0x0002, f02=»)
0x29d528…29d6bc Dummy {f00=0x0148, f01=0x0190, f02=» J F IDENT TLDSEG REL 10.0 80-03-14 870105041000 TLDSEGK TLDS15 TLDS20 R TLDSEGK t TTB:SP SEG:NS LKM030 , ( B T R L U 9C TTB:SB SEG:D
0x29d6bc…29d850 Dummy {f00=0x0148, f01=0x4116, f02=»CTMMP SCTNPE , ( 5 D " @ @ - U SCTLAP P TTB:MT b TTB:CB@ t TTB:SA , ( M $ _ 9B @ T u g@ X > R U 'T 1W. KU l
0x29d850…29d9e4 Dummy {f00=0x0148, f01=0x2008, f02=»
0x29d9e4…29db78 Dummy {f00=0x0148, f01=0x0000, f02=»
[…0x2…]
0x29dea0…29e034 (3, 49) Dummy {f00=0x0149, f01=0x0000, f02=»
[…0x7…]
0x29eb40…29ecd4 (3, 50) Dummy {f00=0x014a, f01=0x0000, f02=»
[…0x7…]
0x29f7e0…29f974 (3, 51) Dummy {f00=0x0146, f01=0x018e, f02=» CODE x P LD A1,DWTST,A6 DWT STATUS , P ABL(NN) QUEDEV DISC BUSY, QUEUE REQUEST 0 P* ` P IFT MMUPAG=0 j . P ST A12,ECBCW1,A8 SET SECTOR NUMBER IN ECB P ST A13,ECBCW2,A8 P XIF P* P IFT MMUPAG=1 . P ES A12,ECBCW1,A
0x29f974…29fb08 Dummy {f00=0x0146, f01=0x0190, f02=» EJECT TOSSFM * 6 2* OVERFLOW CORRECTIONS FOR DOUBLE WORD ARITHMETICS & * ` FM:140 EQU * j P IFT CPU852=1 ~ ADK A1,1 P ANR A2,A14 SKIP SIGN BIT P RB FM:110 P XIF * FM:150 EQU * ADK
0x29fb08…29fc9c Dummy {f00=0x0146, f01=0x0190, f02=»BIT z P RB FM:125 * EJECT TOSSFM ( P* @ 0 P* REQUESTED SECTORS CONTINUE IN NEXT EXTENT J P* ~ PFM:170 EQU * IFT XTSPLI=1 & P LDR A1,A4 EWT ADDRESS (2ND BLOCK) $ LDKL A2,FMRDWR DISPATCH ADDRESS ****
0x29fc9c…29fe30 Dummy {f00=0x0146, f01=0x0190, f02=»** P* FCHECK * P* FCHEC2 * P********** . P* @ P* J 6 P* FCHECK/FCHEC2 CONVERTS THE FILE NUMBER TO FWT T . P* ADDRESS AND CHECKS ACCESS PARAMETERS. P* " P* INPUT: A5 = TTAB ADDRESS P* A7 = ORDER C
0x29fe30…29ffc4 Dummy {f00=0x0146, f01=0x0190, f02=»* A2 IS DESTROYED P* " PFCHECK EQU * FCHECK MAIN ENTRY & P IFT MMUPAG=0 L P LDR* A2,A8 FILE NUMBER b P XIF P* P IFT MMUPAG=1 P ELR A2,A8 FILE NUMBER P XIF P* 4 PFCHEC2 EQU * FCHECK 2ND ENTRY (A2 = FI
0x29ffc4…2a0158 Dummy {f00=0x0146, f01=0x0190, f02=»UMBER TOO BIG | 0 P LDKL A3,SCTFWT ADDRESS TO FWT CHAIN POINTER P* J P EJECT TOSSFM T P* l P* v $ PFC:010 EQU * COMPUTE FWT ADDRESS P LDR* A3,A3 NEXT FWT ADDRESS P SUK A2,1 P RB(P) FC:010 P* P* CHECK AC
0x2a0158…2a02ec Dummy {f00=0x0146, f01=0x0190, f02=»1 CHECK IF FWT USED " P RF(Z) FC:050 FILE NOT OPENED , P LD A2,FWTTAB,A3 TTAB ADDRESS (EA TASK) B ( P RF(Z) FC:020 OPENED NON-EXCLUSIVELY r & P CWR A2,A5 EA, CHECK IF THIS TASK . P RF(NE) FC:060 EXCLUSIVE FOR ANOTHER TASK P* PFC:0
0x2a02ec…2a0480 Dummy {f00=0x0146, f01=0x0190, f02=»CAL ORDERS | P ANK A7,/85 BASIC ORDER P* 2 , PFC:040 EQU * COMMON FCHECK RETURN LABEL < P RTN A15 l P* | P EJECT TOSSFM P* P* ERROR RETURNS P* $ PFC:050 EQU * REQUEST ERROR EXIT & P LDKL A1,/7FC0 RETURN
0x2a0480…2a0614 (3, 52) Dummy {f00=0x0151, f01=0x0000, f02=»
[…0xf…]
0x2a1dc0…2a1f54 (3, 54) Dummy {f00=0x0107, f01=0x0190, f02=»NUMBER (S-FILE) v " PVTC:SN EQU 9 SOP SWITCH NUMBER $ PVTC:EN EQU 10 FILE EXTENT NUMBER > $ PVTC:EL EQU 12 FILE EXTENT LENGTH f " PVTC:EB EQU 16 FILE EXTENT BASE $ PVTC:LR EQU 20 LAST RECORD NUMBER PVTC:RL EQU 24 RECORD LENGTH PVTC:BF E
0x2a1f54…2a20e8 Dummy {f00=0x0107, f01=0x0190, f02=» ( PVTC:IF EQU 37 NUMBER OF INDEX FILES ( PVTC:KA EQU 38 KEY ADDRESS IN RECORD 0 PVTC:ST EQU 41 STATUS BYTE P* ~ P EJECT FMTASK P* P* P********************* P* FWT DISPLACEMENTS * P*********************
0x2a20e8…2a227c Dummy {f00=0x0107, f01=0x0190, f02=»TBAS EQU FWTLNK+/10 P XIF P* ( P IFT MMUPAG=1 2 PFWTBAS EQU FWTLNK+/14 H P XIF f P* r < PFWTVTC EQU FWTBAS+/00 VTOC SECTOR NUMBER (FIRST EXTENT) | 0 PFWTPAR EQU FWTBAS+/02 FILE ACCESS PARAMETERS & PFWTFNR EQU FWTBAS+/03 FI
0x2a227c…2a2410 Dummy {f00=0x0107, f01=0x0190, f02=»T 4 PFWTSEX EQU FWTBAS+/08 FILE SECTION/EXTENT NUMBER B PFWTEXL EQU FWTBAS+/0A EXTENT LENGTH IN SECTORS (FIRST EXTENT) B 8 PFWTEW2 EQU FWTBAS+/0C POINTER TO NEXT EWT STRUCTURE : PFWTVOL EQU FWTBAS+/0E VOLUME FILE CODE (FIRST EXTENT) 4 PFWTEXB
0x2a2410…2a25a4 Dummy {f00=0x0107, f01=0x0190, f02=» P********************* P* EWT DISPLACEMENTS * & P********************* D P* b & P* EXTENT WORK TABLE DISPLACEMENTS l P* $ PEWTLNK EQU 0 LINK NEXT EWT BLOCK P* P* BLOCK 1 P* , PEWTSEX EQU 2 FILE SECTION/
0x2a25a4…2a2738 Dummy {f00=0x0107, f01=0x0190, f02=» r PEWTEXB EQU 4 EXTENT BASE P* ( 0 PEWTLEN EQU 6 EXTENT WORK TABLE BLOCK LENGTH 2 P* f EJECT FMTASK p * * ********************* * FPB DISPLACEMENTS * ********************* * ( $* FILE P
0x2a2738…2a28cc Dummy {f00=0x0107, f01=0x018e, f02=»NIZATION z FPB:BO EQU 5 BASIC ORDERS FPB:FN EQU 8 FILE NAME 2 FPB:EL EQU 17 ENLARGE P FPB:V1 EQU 18 VOLUME NAME 1 n FPB:S1 EQU 24 SIZE 1 FPB:V2 EQU 28 VOLUME NAME 2 FPB:S2 EQU 34 SIZE 2 FPB:V3 EQU 38 VOLUME NAME
0x2a28cc…2a2a60 Dummy {f00=0x0107, f01=0x0190, f02=» n " FPB:US EQU 62 NUMBER OF USERS FPB:SH EQU 64 SHAREABILITY . FPB:MN EQU 65 MONITOR NUMBER P $ FPB:SN EQU 66 SOP SWITCH NUMBER t ( #FPB:IF EQU 67 NUMBER OF INDEX FILES ( #FPB:KA EQU 68 KEY ADDRESS IN RECORD PFPB:CD EQU 70 CREATI
0x2a2a60…2a2bf4 (3, 55) Dummy {f00=0x0127, f01=0x0000, f02=»
0x2a2bf4…2a2d88 Dummy {f00=0x0127, f01=0x0006, f02=»$ $ $
0x2a2d88…2a2f1c Dummy {f00=0x0127, f01=0x0190, f02=» 2 P IDENT SYSTAB REL 10.0 80-03-14 870105041000 P : P* B P* L 8 P*************************************************** V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 2 P* SYSTAB = INTERRUPT VECTORS, SYSTEM CONTROL 2 P*
0x2a2f1c…2a30b0 Dummy {f00=0x0127, f01=0x018e, f02=»*************** l P* P* " P EJECT SYSTAB , P* D P* N P*********** X P* ENTRIES * l P*********** P* P* 4 P ENTRY SCTMSZ,SCTSFA,SCTEFA SYSTEM CONTROL TABLE P ENTRY SCTIPL P ENTRY SCTANO,SCTA
0x2a30b0…2a3244 Dummy {f00=0x0127, f01=0x0190, f02=» P ENTRY SCTSTB P ENTRY SCTOPT P ENTRY SCTTCT,SCTCDT 0 P ENTRY SCTBUG L & P ENTRY SCTDMT,SCTDMI,SCTFWT,SCTNOF b & P ENTRY SCTNFT,SCTFWL,SCTBLK,SCTDCT P ENTRY SEG:FC,SEG:NS & P ENTRY SEG:ST,SEG:DS,SEG:EL,SEG:PB & P ENTRY PAG:Q
0x2a3244…2a33d8 Dummy {f00=0x0127, f01=0x0190, f02=»* P* EXTERNALS * P************* P* 6 P* @ P EXTRN TDISP J , P EXTRN IHPFAR POWER FAIL / AUTO RESTART ^ P EXTRN IHLKM LKM INTERRUPT P EXTRN IHRTC REAL TIME CLOCK P EXTRN IHTW TYPEWRITER P EXTRN IHTC CASSETTE T
0x2a33d8…2a356c Dummy {f00=0x0127, f01=0x0190, f02=» NO. 1 p * P EXTRN CHRT2 REMOTE CHANNEL UNIT NO. 2 P EXTRN CHRT3 < P EXTRN CHRT4 P ( P EXTRN IHCC1 CASSETTE CHANGER NO. 1 d ( P EXTRN IHCC2 2 ( P EXTRN IHCC3 3 * P EXTRN CHLT1 LOCAL CHANNEL UNIT
0x2a356c…2a3700 Dummy {f00=0x0127, f01=0x018e, f02=» M) DISC l P EXTRN IHLP LINE PRINTER P EXTRN IHCR CARD-READER 0 ( P EXTRN IHDU1,IHDU2 DISC UNIT NO. 1/2 P 0 P EXTRN IHMD,IASCUZ,ISLCI,ISLCO MINI FIX DISC | P EXTRN IHMT MAG. TAPE $ P EXTRN ILLINT ILLEGAL INTERRUPT P EXTRN HALT HALT R
0x2a3700…2a3894 (3, 56) Dummy {f00=0x0127, f01=0x0190, f02=» P* PSEG:FC EQU -4 FILE CODE $ PSEG:NS EQU -2 NUMBER OF SEGMENTS . PSEG:ST EQU 0 STATUS V $ PSEG:DS EQU 2 DISC SECTOR ADDRESS r " PSEG:EL EQU 4 EFFECTIVE LENGTH $ PSEG:PB EQU 6 PAGE BLOCK ADDRESS P* & PPAG:QF EQU 0 QUEUE POI
0x2a3894…2a3a28 Dummy {f00=0x0127, f01=0x018e, f02=» P* 2 PSWB:NC EQU 0 NUMBER OF COPIES WITHIN SWB TYPE 2 PSWB:DS EQU 2 DISC SECTOR ADDRESS OF FIRST COPY D $ PSWB:EL EQU 4 SWB LENGTH (BYTES) z & PSWB:NS EQU 6 SWB LENGTH (SECTORS) P* P P P P P EJECT SYSTAB
0x2a3a28…2a3bbc Dummy {f00=0x0127, f01=0x0190, f02=» P DATA ILLINT 3 P DATA ILLINT 4 P DATA ILLINT 5 < P DATA ILLINT 6 X P DATA IHTW 7 t P DATA IHTC 8 P DATA IHSOP 9 P DATA ILLINT 10 P DATA ILLINT 11 P DATA ILLINT
0x2a3bbc…2a3d50 Dummy {f00=0x0127, f01=0x0190, f02=»2 17 P DATA CHRT3 18 P DATA CHRT4 19 . P DATA IHCC1 20 J P DATA IHCC2 21 f P DATA ILLINT 22 P DATA IHCC3 23 P DATA CHLT1 24 P DATA CHLT2 25 P DATA CHLT3 26
0x2a3d50…2a3ee4 Dummy {f00=0x0127, f01=0x0190, f02=» | P DATA ILLINT 32 P DATA ILLINT 33 $ P DATA IHLP 34 @ P DATA IHCR 35 Z P DATA ILLINT 36 t P DATA ILLINT 37 P DATA ILLINT 38 P DATA ILLINT 39 P DATA IHDU1 40 P DATA IH
0x2a3ee4…2a4078 Dummy {f00=0x0127, f01=0x0190, f02=»ILLINT 46 P DATA ILLINT 47 P DATA IHCD 48 2 P DATA ILLINT 49 L P DATA ILLINT 50 h P DATA ILLINT 51 P DATA ILLINT 52 P DATA ILLINT 53 P DATA ILLINT 54 P DATA ILLINT 55
0x2a4078…2a420c Dummy {f00=0x0127, f01=0x0190, f02=» 60 P DATA ILLINT 61 P DATA ILLINT 62 ( P DATA TRAP TRAP ROUTINE D P EJECT SYSTAB d P | P* " P* SYSTEM CONTROL TABLE POINTER P* P DATA SCT P P P* P* SYSTEM TRAP P*
0x2a420c…2a43a0 Dummy {f00=0x0127, f01=0x0190, f02=»,A13 P XRR A14,A14 P LD A1,SCTBUG P ABR(NZ) A1 6 P HLT J P* V P EJECT SYSTAB ` P* x P* PX:A EQU 0 MONITOR OPTION ( PX:B EQU 0 DATA MAN .TASKS IN SYSTEM * PX:C EQU 0 DM INDEX RECORD BUFFER SIZE $ PX:
0x2a43a0…2a4534 (3, 57) Dummy {f00=0x0136, f01=0x0190, f02=»B,A6 % P RTN A5 RETURN VIA A5-STACK & P EJECT & 0 P* & > P* & H P* G E T C H R & R P* & j 8 P* SUBROUTINE TO GET ONE CHARACTER FROM ECB-BUFFER & t P* & P* ON ENTRY: & P* & P* A3 = BUFFER INDEX & P* A8 = ECB-AD
0x2a4534…2a46c8 Dummy {f00=0x0136, f01=0x0190, f02=» J P* IF LAST CHARACTER IS REACHED A3 IS STORED IN ECB EFFECTIVE LENGTH ' P* ' R P* ' PGETCHR EQU * ' f P LD A1,4,A8 REQUESTED LENGTH ' z P SUR A1,A3 ' * P RF(NP) GCH010 LAST CHARACTER REACHED ' " P LD A1,2,A8 GET BUFFER ADDRESS ' P ADR
0x2a46c8…2a485c Dummy {f00=0x0136, f01=0x0190, f02=»8 STORE EFFECTIVE LENGTH ' P RTN A5 ( P EJECT ( 0 P* ( > ( P* DEVICE WORK TABLE FOR TYPEWRITER ( H P* ( t P* ( ~ PDWTW01 EQU * TABLE ENTRY ( " P DATA /0010 CHANNEL PARAMETER ( 0 P DATA /8000 STATUS./8000 MEANS DEVICE READY ( P DATA
0x2a485c…2a49f0 Dummy {f00=0x0136, f01=0x0190, f02=»E INDICATOR ( | P DATA 0 TERMINAL QUEUE ) IFT MMUPAG=1 ) 2 & " DATA 0 SAVE AREA USER ECB ADDRESS ) H DATA DEVECB MMU ECB ADDRESS ) r XIF ) P DATA 0 OUTPUT QUEUE LINK ) P DATA 0 SAVE AREA FOR A3 ) P DATA 0 SAVE AREA FOR A4 ) P DAT
0x2a49f0…2a4b84 Dummy {f00=0x0136, f01=0x018e, f02=»CKSPACE KEY ) x P RIGHT BYTE CANCEL KEY * & P DATA /0D00 LEFT BYTE STANDARD EOR * 4 P RIGHT BYTE DOUBLE ZERO * ^ " P DATA 0 HEAD POSITION POINETR * P DATA 0 SAVE AREA FOR A2 * P* * P EJECT DRTW01 * P* * P* * P IFT MMUPAG=
0x2a4b84…2a4d18 Dummy {f00=0x0136, f01=0x403e, f02=» P XIF + P* + P* + P* + $ P END + .@ + :0 LEFT BYTE STANDARD EOR * 4 P RIGHT BYTE DOUBLE ZERO * ^ " P DATA 0 HEAD POSITION POINETR * P DATA 0 SAVE AREA FOR A2 * P* * P EJECT DRTW01 * P* * P* * P IFT MMUPAG=
0x2a4d18…2a4eac Dummy {f00=0x0136, f01=0x2008, f02=» ,
0x2a4eac…2a5040 Dummy {f00=0x0136, f01=0x0190, f02=» r P* P* P EJECT P* * P************ 4 P* ENTRIES: * H P************ P* p P* z * P ENTRY SOPCT S.O.P. CHANNEL UNIT TABLE ( P ENTRY SOPR S.O.P. RECOVERY ROUTINE 2 P ENTRY IHSOP S.O.P. INTERRUPT HANDLER (ALI
0x2a5040…2a51d4 (3, 58) Dummy {f00=0x014b, f01=0x0190, f02=»2,FPBLEN FPB AREA LENGTH E P* F " PFMR:00 EQU * F , P CMR A1 F @ P ADK A1,2 F P P SUK A2,2 F b P RB(P) FMR:00 F t P* F P EJECT FMTASK F P* F P* F P LDR A1,A10 FPB ADDRESS F " P ADK A1,FPB:V2 2ND VOLUME NAME F & P L
0x2a51d4…2a5368 Dummy {f00=0x014b, f01=0x018e, f02=»NTER, INNER LOOP F ~ P* G " PFMR:04 EQU * INNER LOOP ENTRY G " * P STR A4,A1 MOVE SPACES TO VOLUME NAME G H P ADK A1,2 G v P SUK A3,1 G P RB(P) FMR:04 G * P ADK A1,FPB:V2-FPB:S1 NEXT VOLUME NAME G P SUK A2,1 G P RB(P) FMR:02 G P*
0x2a5368…2a54fc Dummy {f00=0x014b, f01=0x0190, f02=» G n P STR A1,A10 H 8 P LD A1,VTC:BF,A13 BLOCK FACTOR AND FILE ORGANIZATION H P ST A1,FPB:BF,A10 H X ( P LD A1,VTC:LR,A13 LAST RECORD NUMBER H r P ST A1,FPB:FR,A10 H $ P LD A1,VTC:LR+2,A13 LRN, PART 2 H P ST A1,FPB:FR+2,A10 H 4 P LD A1,VTC:M
0x2a54fc…2a5690 Dummy {f00=0x014b, f01=0x0190, f02=»INDEX FILES H t P ST A1,FPB:IF,A10 I , P LD A1,VTC:KA,A13 KEY ADDRESS IN RECORD I . P ST A1,FPB:KA,A10 I ^ P LDK A2,1 I x , P LD A1,FWTTAB,A6 SHAREABILITY PARAMETER I P RF(Z) FMR:05 NO EA I 2 P SC A2,FPB:SH,A10 INDICATE OPENED EXCLUSIVELY I
0x2a5690…2a5824 Dummy {f00=0x014b, f01=0x0190, f02=»LE I f , P SC A2,FPB:BO,A10 INDICATE BASIC ORDERS J P* J : PFMR:10 EQU * J D P SLC A1,7 J X P ANK A1,/3F NUMBER OF USERS J j P SC A1,FPB:US,A10 J P* J P EJECT FMTASK J P* J . P* MOVE CREATION DATE AND RETENTION PERIOD J P*
0x2a5824…2a59b8 Dummy {f00=0x014b, f01=0x0190, f02=»ACTERS TO MOVE J | 8 P CF A14,MOVE MOVE CREATION DATE AND RETENTION PERIOD K P* K R $ P* MOVE FILE NAME FROM FWT TO FPB K P* K P LDR A1,A6 FWT ADDRESS K P ADK A1,FWTNAM K . P SUK A3,FPBLEN-FPB:FN-1 POINT TO FILE NAME K & P LDK A2,8 NO OF CHAR
0x2a59b8…2a5b4c Dummy {f00=0x014b, f01=0x0190, f02=» K b P LDR A11,A6 L * P LDR* A12,A11 ADDRESS TO 2ND EWT BLOCK L P* L J P EJECT FMTASK L T P* L l 8 P* READ VOLUME NAME AND COMPUTE SIZE OF FILE SECTION L v P* L PFMR:20 EQU * L $ P LC A2,EWTVOL,A12 DISC FILE CODE L P LDR A13,A2 SAVE
0x2a5b4c…2a5ce0 Dummy {f00=0x014b, f01=0x0190, f02=»A6 VOLUME NAME ADDRESS L " P CF A14,MOVE MOVE VOLUME NAME M * P LD A1,EWTEXL-2,A11 FILE EXTENT LENGTH M D P ANK A1,/FF M r P LD A2,EWTEXL,A11 M P* M P EJECT FMTASK M P* M " P* COMPUTE FILE SECTION SIZE(S) M P* M PFMR:35 EQU *
0x2a5ce0…2a5e74 (3, 59) Dummy {f00=0x014b, f01=0x0190, f02=» CW A7,TTB:SA+14,A5 CHECK IF OPEN ORDER RUNNING U $ P RB(NE) FM:RTC ABORT IF NOT OPEN V 8 & P LDK A7,/20 NEW VOLUME LOADED BIT V ` P TM A4,A7 CHECK RETURN CODE V P RB(Z) FM:RTC NOT NVL, ABORT V * P RB FMREAD NVL AT OPEN, REPEAT REQUEST V P* V
0x2a5e74…2a6008 Dummy {f00=0x014b, f01=0x0190, f02=»** V P* W P* W . P* RELBLK WILL RELEASE THE MONITOR BLOCKS W , P* THAT ARE USED IN THE EWT STRUCTURE. W P P* W P* INPUT: A6 = FWT ADDRESS W P* W $ P* OUTPUT: A1-A4 ARE DESTROYED W P* W . PRELBLK EQU * RELEASE EWT STRUC
0x2a6008…2a619c Dummy {f00=0x014b, f01=0x0190, f02=»L:10 EQU * W P INH X $ P CF A15,FREBLK RELEASE EWT BLOCK X P ENB X F P LDR A4,A3 EWT BLOCK ADDRESS X R P RB(NZ) REL:10 X v P* X PREL:20 EQU * X * P CM FWTVTC,A6 RESET VTOC SECTOR NUMBER X 4 P CM FWTTAB,A6 RESET TTAB ADDRESS (EA PARAMETER)
0x2a619c…2a6330 Dummy {f00=0x014b, f01=0x0190, f02=»** X P* FNDNAM * Y P********** Y P* Y . 2 P* FNDNAM WILL CONVERT THE SUPPLIED FILE CODE Y 8 0 P* TO VOLUME NAME ADDRESS IN THE DISC DWT. Y n P* Y P* INPUT: A2 = FILE CODE Y P* Y P* OUTPUT: A2 = 6 Y ( P* A6 = VOLUM
0x2a6330…2a64c4 Dummy {f00=0x014b, f01=0x0190, f02=» Y ( P CF A15,FNDDWD FIND DISC DWT ADDRESS Z P ENB Z 4 P* Z @ PFNAM05 EQU * Z J P LD A4,DWTST,A6 Z ^ P ANK A4,1 Z v 4 P RF(NZ) FNAM10 POWER ON COMPLETED FOR THIS DISC Z P LKM Z P DATA 0 SWITCH TASKS Z P RB FNAM05 CHECK DISC AGAIN Z
0x2a64c4…2a6658 Dummy {f00=0x014b, f01=0x0190, f02=» A2,6 Z P ADKL A6,DWTVOL-6 [ P RTN A14 [ ( P* [ 8 P EJECT FMTASK [ B P* [ Z P* [ d P********** [ n P* FNDVOL * [ P********** [ P* [ P* [ & P* FNDVOL SEARCHES THE REQUESTED [ $ P* VOLUME SPECIFIED IN THE FPB. [
0x2a6658…2a67ec Dummy {f00=0x014b, f01=0x0190, f02=»FILE CODE IF FOUND, ELSE [ z * P* = 0 IF VOLUME NOT FOUND & P* A1, A3-A4, A12 ARE DESTROYED N P* x ( PFNDVOL EQU * FIND VOLUME (FILE CODE) 4 P LDKL A1,DFTAB-1 DISC FILE CODE TABLE ADDRESS-1 P LDR A12,A6 SAVE FWT ADDRESS
0x2a67ec…2a6980 Dummy {f00=0x014b, f01=0x018e, f02=»OF DFTAB ~ P LCR A2,A1 NEXT FILE CODE ] , P CF A14,FNDNAM FIND VOLUME NAME ADDRESS ] 2 * P LDR* A3,A6 FIRST WORD OF VOLUME NAME ] b P RB(Z) FVOL10 NO VOLUME ] P* ] P EJECT FMTASK ] P* ] P* ] P LDR A3,A10 FPB ADDRESS ] , P A
0x2a6980…2a6b14 (3, 60) Dummy {f00=0x014c, f01=0x0190, f02=» NUMBER e l & P ADKL A13,VTOCRL NEXT VTOC ADDRESS f P SUK A7,1 f : , P RB(P) FVTC20 MORE VTOC:S IN THIS SECTOR f L P ADK A2,1 NEXT VTOC SECTOR f | , P CWR A2,A12 CHECK IF END OF VTOC EXTENT f ( P RB(NE) FVTC10 NOT LAST VTOC SECTOR f P LDK A2,0 RETU
0x2a6b14…2a6ca8 Dummy {f00=0x014c, f01=0x0190, f02=» ADK A1,FWTNAM f P LDR A3,A13 VTOC ADDRESS g P LDK A4,4 LOOP COUNTER g 6 P* g T $ PFVTC60 EQU * COMPARE FILE NAMES g ^ P LDR* A11,A3 g P CWR* A11,A1 g ( P RB(NE) FVTC30 FILE NAMES NOT EQUAL g P ADK A1,2 INCREMENT POINTERS g P ADK A3,2
0x2a6ca8…2a6e3c Dummy {f00=0x014c, f01=0x0190, f02=» P********** h P* FNDFWT * h P********** h ( P* h : P* h D 4 P* FNDFWT IS USED TO FIND OUT IF THE SPECIFIED h N 0 P* FILE IS ALREADY OPENED, AND IF SO RETURN h & P* THE FWT ADDRESS FOR THE FILE. h 6 P* IF NOT OPENED, A FREE FWT ADDRES
0x2a6e3c…2a6fd0 Dummy {f00=0x014c, f01=0x0190, f02=»A6 = FWT ADDRESS (=0 IF NO FREE FWT AVAILABLE) h & P* A1-A4, A7, A11 ARE DESTROYED i 6 P* i ` PFNDFWT EQU * i j P LDK A3,0 i ~ * P LD A7,SCTFWT FWT CHAIN START ADDRESS i P* i PFNDF10 EQU * i P LDK A2,1 i P* i PFNDF15 EQU * i
0x2a6fd0…2a7164 Dummy {f00=0x014c, f01=0x0190, f02=»ECK IF USED i ( P RF(NZ) FNDF20 USED, CHECK FILE NAME j 6 P ADK A3,0 CHECK IF FREE FWT ADDRESS ALREADY SAVED j @ & P RB(NZ) FNDF15 YES, DON'T SAVE IT j z ( P LDR A3,A6 NO, SAVE THIS FWT ADDRESS j P RB FNDF15 CONTINUE SEARCH j P* j P EJECT FMT
0x2a7164…2a72f8 Dummy {f00=0x014c, f01=0x0190, f02=» A2,FWTNAM j P LDR A4,A10 FPB ADDRESS k P ADK A4,FPB:FN k 2 P SUK A7,1 SKIP FWT USED BIT k H P* k l $ PFNDF30 EQU * COMPARE FILE NAMES k v P LDR* A11,A2 k P CWR* A11,A4 k ( P RB(NE) FNDF10 FILE NAMES NOT EQUAL k P ADK A2,2 INCREMENT PO
0x2a72f8…2a748c Dummy {f00=0x014c, f01=0x0190, f02=») FNDF10 NOT THIS FILE k P RTN A14 FILE FOUND, RETURN l P* l B PFNDF40 EQU * FILE NOT FOUND l L P LDR A6,A3 FREE FWT ADDRESS l p P RTN A14 l P* l P EJECT FMTASK l P* l P* l P******** l P* MOVE * l P******** l
0x2a748c…2a7620 Dummy {f00=0x014c, f01=0x0190, f02=» = OUTPUT BUFFER ADDRESS l P* m P* OUTPUT: A2 = 0 m * > P* A1, A3 = ADDRESSES OF LAST MOVED CHARACTERS+1 m D P* A4 IS DESTROYED m P* m PMOVE EQU * MOVE STRING m " P LCR A4,A1 MOVE ONE CHARACTER m P SCR A4,A3 m (
0x2a7620…2a77b4 (3, 61) Dummy {f00=0x0153, f01=0x0000, f02=»
[…0x7…]
0x2a82c0…2a8454 (3, 62) Dummy {f00=0x0144, f01=0x0190, f02=» V P P" !# + W + # X $ X !,f_ X $ X X & !-" !- Y _8 X " X &" Y )U W !# !# !# Y 4 B ) U )X R@ X X &" Y * X ) V Y !- X $ X & !-" X * *F ) `R Y !# !
0x2a8454…2a85e8 Dummy {f00=0x0144, f01=0x0190, f02=»P H U _ T U P U ;C ,$ T -_> - _H "RT PL X TF X R@? V X & X H P X P Y X H P @ D < ? < ? <(@ . $ P B $ 9H C ">h # P >_2 < U = D (@ " $ P B >H<h
0x2a85e8…2a877c Dummy {f00=0x0144, f01=0x0190, f02=»TX 1 0, ! / P B B T P* & T$ L L R Q U , , _D , V :a B # S0 S0 Q Z8 Z< P X _6 _6 " " P2 @ Q, , Y ," P L P T L R :AV ' > _ !
0x2a877c…2a8910 Dummy {f00=0x0144, f01=0x0190, f02=»P H U _ T U P U ;C ,$ T -_> - _H "RT > A0 @ @ 7Z 7Z @ R*P % % @ I I I I _> @ P ! #D9 V 1 Y ! ,P :A ! A! >_2 < U = D (@ " $ P B >H<h
0x2a8910…2a8aa4 Dummy {f00=0x0144, f01=0x0190, f02=» 3 ! 5 A0( 5 P< 6@ P& 8! P6 K @P X T X !? ? 3t W W @W 5@ 4 & 6 W A0( 5 X* 5 X2 " (@ I ' V V " LP V : V V P dW Y Y " V V T Y " Y $ 6 P(_t d(@ - $T
0x2a8aa4…2a8c38 Dummy {f00=0x0144, f01=0x0190, f02=»" P Y 9 @ J ! T " Y X & $ ' 4 ! 5 5 P C P* 4 J : J < W W P X V C W 5 X ! "? K >Q 9 5@W Y B W _.! T 5 T P % Y % Y Y V + V K V K : V K < V K A V % K C V & K
0x2a8c38…2a8dcc Dummy {f00=0x0144, f01=0x0190, f02=» T _ - M @ F Pp G ! _ W C ( B P U 4 T 8 X>_. : X P (@ Y Y Y :" (@ X $ T ( _ ^ ( : 6 6 P" $ 5` 8X 8 , Y $ : _ & / (@ T X " C X 6 V P 6 _ :
0x2a8dcc…2a8f60 Dummy {f00=0x0144, f01=0x0190, f02=»_ & & Y " 4 : : $ - Y : ~ 6 6 6 7 7 7 0123456789 ' < +,-. 0123456789 @ABCDEFGHIJKLMNOPQRSTUVWXYZ[ ]~ * > ?;_: =!"#$%&/() @ABCDEFGHIJKLMNOPQRSTUVWXYZ[ ]^ c
0x2a8f60…2a90f4 (3, 63) Dummy {f00=0x0144, f01=0x0190, f02=» P 0R Q W R ?U C ! _f Y (P Y ) _ ^ _ ! x P: B L # +P Y , ! U _ X T _ W ! Y ! X X ! X P R ?]* U C _. _: ! ! " $ P X , X ]T ! Y h Y _p ? X R X X
0x2a90f4…2a9288 Dummy {f00=0x0144, f01=0x0190, f02=» Y , Y B 9a C " 8 J P: 8 B W0 B W B W B @ T 8 T Y Y Y Y " Y . ! ~ X ._B B 1 4 X X X X ' 4 B U B $" 4 C 4 J * ~ _^ L x B U P
0x2a9288…2a941c Dummy {f00=0x0144, f01=0x0190, f02=» P D T 1 WP B B PD P ! V - 0 P A F# +T W Q P P 1 ! X T V C B Q 1 " Y @ r t @ B X _" ? X Z,W A H ?I X ' { B C X 4
0x2a941c…2a95b0 Dummy {f00=0x0144, f01=0x0190, f02=» Y , Y B 9a C 8 J P: 8 B W0 B W B W B @ T 8 T Y Y Y Y Y . ! ~ X ._B B 1 4 X X X X ' 4 B U B $" 4 C 4 J * ~ _^ L ! 9 ! ~!
0x2a95b0…2a9744 Dummy {f00=0x0144, f01=0x0190, f02=» X N Y ! X P. P P& P R P @ X ! " ! B X ; Z Y B X T < Z0:A Z: ^@ Y@ Y Y B Y ""0 Y V Y Y Y X X T V" X R # ;b9B Y Y ) Y X !? PZ P PR P
0x2a9744…2a98d8 Dummy {f00=0x0144, f01=0x0190, f02=» J _ X p ^ P P ! # T X Pt X &Pf ! ! B Rh Qd :C P J ! 9DV + ! (@ B | ! B ! ! B t ! B ! l ! B ( ! d ! B 9 X Y P 9 " ! _ # J 4 ! * PR C ! ! ! f(@ ! * R _ ! 1 ;h
0x2a98d8…2a9a6c Dummy {f00=0x0144, f01=0x0190, f02=» +PV T ( C Q V8 ! ! ! N _ X J X H p ^ t ! 4WX W l ! 4 C QR (Q _ X X D J x ^ ! ! h ! ~ P @ 9 ! * T ) C W ! ! 4 ( - t ! 4 ) Wf W Y Z Y V Y X Y H @ TLB SLWF Y 8
0x2a9a6c…2a9c00 Dummy {f00=0x0144, f01=0x0190, f02=» " _: Y L " Y F Y L $ Y ! ! # P W ! 9 ! X ^< Y Y F Y X RP 1 Y R 0 Y T 1 0B. X P P Y : ! ! X # P Y P:A , X T A Y T @ B. Y Y J X $ Y C '? X " Y _ A H ? N(@ X V
0x2a9c00…2a9d94 (3, 64) Dummy {f00=0x0153, f01=0x0190, f02=» < $ <C ! 9 9 4 X 9C X : X X 4 B :C J 4 $ J ! # T` @ j TOT @ l SST X Y N JW( 0 J ! # T. X Y N 9 ! N N X FT !d 4 J(@ 0! D 1 Y W (@ J 0! D ] I Y J 4 ! ;E :B
0x2a9d94…2a9f28 Dummy {f00=0x0153, f01=0x0190, f02=» _ ;H 4 | ! 4 (:C J 4 d ! 4 ( 4 X " 4 ! 4 ) 4 9 ! X ^< Y Y Y X P 1 Y 0 Y 1 0B. X P Y : ! ! X # P Y :A , X A Y @ B. Y Y X Y C '? X Y _ A H ? (@ X
0x2a9f28…2aa0bc Dummy {f00=0x0153, f01=0x0190, f02=» ABCDEFGHI[.<(+!&JKLMNOPQR]$*);^-/STUVWXYZ|,%_>? 123456789:#@'=" abcdefghi[.<(+!&j
0x2aa0bc…2aa250 Dummy {f00=0x0153, f01=0x0190, f02=» 7- <=2&p ?' @O {[lP}M] Nk`Ka z^L~no| J Z_m j TOSS v x x x $ ( , 0 4 8 < ( H 0 ) $P $ ) U @ T C
0x2aa250…2aa3e4 Dummy {f00=0x0153, f01=0x0190, f02=» WF @W( T$ P X T X P 4 Y C C 8W T 8P Y ^ 5 ) P U " XT ! X ! X P X T _l Xf Y @ P. R T& X &P P H T _ X I Y T #
0x2aa3e4…2aa578 Dummy {f00=0x0153, f01=0x0190, f02=» P R R P T ~ $P (@ z(@ " 2 @ _ > X $? P 6$ > > F C F C > B R Q F ! P C > C > F :c" H :b"? #" : C > B R Q~ P0 B P*
0x2aa578…2aa70c Dummy {f00=0x0153, f01=0x0190, f02=»9BV X & " X D C > X H UJ H B P PL $ # Q > P _0 # T p > P p (_H _2 B U X ( > ? _ X T (@ ^ > > ? _ X T (@ X L U L Q4 M
0x2aa70c…2aa8a0 Dummy {f00=0x0153, f01=0x0190, f02=» 1 X P - M T $ PJ _ T " # p X L R P P P (@ ^ X P8 P0 # P T P 0P 1 _ W Y > > T " d _ ! ? ^ 4 _
0x2aa8a0…2aaa34 (3, 65) Dummy {f00=0x0154, f01=0x0190, f02=» U _ 9B @ T u X > & "v! " " ~" - - .".x . -n- r0 7t6 # ' )^ ! % Y W B T| ! C X _ H X H p ^ > X ( $ ^ WB X Y $:g H & I &! P& X ! ! P ,P 9A _ H
0x2aaa34…2aabc8 Dummy {f00=0x0154, f01=0x0190, f02=»_ X $ _t0, > > @! A! DW W ^ ! Z2 ! (X: @! P T M ]J , ) A! P* P Y U ( ) 5 & > > [ [ ! Z Z Z ? Z > P~ "R~ Y " Pj T P` ! <UR "R4 PB X R< X T6 X T0.
0x2aabc8…2aad5c Dummy {f00=0x0154, f01=0x0190, f02=» Y " X X Y X X X X ' 4 B U B (" W C (@ > Y Y Y X 9BV$ X & Y " X D V X #V 2 R # % # ? X V Y " !#ZW< Y U R -P % X , ) Y . % X P Y P C WT X " PP
0x2aad5c…2aaef0 Dummy {f00=0x0154, f01=0x0190, f02=» $ 4 T % % X ,T !#.W ' Y . V & !# B P X " _Z B P$ $$ R % C & * !# W Y +PH Y *P> Y (P Y )P & R _Q P OR R W " !# B $@ Wr W 0 Z & !# B Z Z& X . 0T N W X ,P Y . 0 %_. %
0x2aaef0…2ab084 Dummy {f00=0x0154, f01=0x0190, f02=» , $4 P ' X .T * W Y , - " ? X :a Z T T W P X :d Y > > |Vd ? 8 R @R6 V @% =cW2 RBP R P 9 W. _ _ _ _ %0=c X 0P > 0 > >_ P > _v B 1 > NT 0 _ '( ( ) ( PB P8 !
0x2ab084…2ab218 Dummy {f00=0x0154, f01=0x0190, f02=» &_. P4 R( Pj O]> V _F T Y Y & V Y _^ C _P #n #n" $ P X & X ]r !# Y Y Y _ " _ !# !# (H " X C _ X Y & Y > B B U$ $ ! T _ U D ! T _ C > X Z^<BR P f #H X _x
0x2ab218…2ab3ac Dummy {f00=0x0154, f01=0x0190, f02=» P0 P X _ X " '( !# !# X & ( (> )n-h+ + , + !# P P + & + ! B P B H " +P P. T Y ' !# R| X ( Y &R Y & _ Y &_. B 1 , !# + B B U4 $ ! T _ U D !
0x2ab3ac…2ab540 Dummy {f00=0x0154, f01=0x0190, f02=» B P !- B C +4 ^N P R ?] _ C _ #n #n" $ P X ' X ] !# + *H B !-L !- !# + B Y & !-"W *F 8!0T 8 !@P !# $ P !# !# + !# 1P X & C ,T Y & " X Y & Y > X " X &" Y
0x2ab540…2ab6d4 (3, 66) Dummy {f00=0x0166, f01=0x0190, f02=»_B 4 ! ! + 9h # !T}6 ,, !0 @|Thj !! ! j !! 80 _K ! $ !A !@( "90# !T2@e@i@k !" ? 'hZ 2 !TP &6 " _ Ai_8Ae_<" v :WpAkW ! ( ~ !~W)j !! C 80 U !b ! !
0x2ab6d4…2ab868 Dummy {f00=0x0166, f01=0x0190, f02=» = N D ^ P R 1 y s n G a 3 4 X Y - ! " % & ?MDA FETCHING FORMAT:
0x2ab868…2ab9fc Dummy {f00=0x0166, f01=0x018e, f02=» RKIe ! 4 @e@d@ @ _Z@dAe " " R" J Q z R 8 R H * R X R h * R x R J F " D ! U Uj ! !j !!/!j %!8!0R (+0R +( > " 1XFW 1XFAn@m R R R
0x2ab9fc…2abb90 Dummy {f00=0x0166, f01=0x0190, f02=» R S J F " D R Rh 2 RRR R_ R_ 0R (+0R +0X _ "l lU R R S * S f S v * S S S S S S " S ' S
0x2abb90…2abd24 Dummy {f00=0x0166, f01=0x0190, f02=» USE S U 0 T J F " D @ R&| W L !" ! 0X %, ! b &l b &!Z2b '( "lW b &k T , T j $ T z , T . T T T T } T T T J
0x2abd24…2abeb8 Dummy {f00=0x0166, f01=0x0190, f02=» T } U " U } U ( } U 8 & U H U X J F " D ) Rh @ P R$ R_+ Rh " $ kU?R % 0Rk >?R lU?R0R 0} R U h D U * U U U ) U
0x2abeb8…2ac04c Dummy {f00=0x0166, f01=0x0190, f02=» R_ R_ 0R~P + , R U f L V $ T $ V 4 d 4 V D x 4 V T J F " D @@z6 Az R_ @ @z R$XP@ ~U 0R , P& b~ ![) !0R + T b~ V d * V V , V , V 2 V
0x2ac04c…2ac1e0 Dummy {f00=0x0166, f01=0x0190, f02=» ( V W J F " D 6 h[ * !T06 $ $$ 0R , T 0R , @ T 0R + !_6A X @ T ?R W W n # W ~ & W & 50 W SEARCH W $ 0 W & W MODE W $ 0 W &
0x2ac1e0…2ac374 (3, 67) Dummy {f00=0x0166, f01=0x0190, f02=»EREFO w ATTDB ATTWB DEDISC. DEPOOL- DEREC21 MSKOUTL OFRSP RESTOR1 T:ATTF T:DISPF T:THOM TESTB UPDBIN UPDBOL DEREC2 _ 810401 $$$TRAR DEOPBC DEREC2 7 ATTWB CLEARBT CMPIND DEACC DEDISC1 DELASTL DEPOOL0 DEPRUT DERECS DEREFOC D
0x2ac374…2ac508 Dummy {f00=0x0166, f01=0x0002, f02=»,
0x2ac508…2ac69c Dummy {f00=0x0166, f01=0x012e, f02=» PT; P02; PTID=T1; PTCL=T1; * PLEV=60; : P01; J PTDC=T01; V PLC=01L; f P00; v PC; P02; PTDC=T03; PLC=01L; PTDC=T02; PLC=01L; P02; PSDC=S01; PSDC=S04; PU;
0x2ac69c…2ac830 Dummy {f00=0x0166, f01=0x2008, f02=» P02; PTID=T1; PTCL=T1; * PLEV=60; : P01; J PTDC=T01; V PLC=01L; f P00; v PC; P02; PTDC=T03; PLC=01L; PTDC=T02; PLC=01L; P02; PSDC=S01; PSDC=S04; PU;
0x2ac830…2ac9c4 Dummy {f00=0x0166, f01=0x40f2, f02=» @ H IDENT D:DB10 TRA 10.0 81-04-09 F1 O1111 REL 10.0 80-04-11 D:DB10 H D:DB10D Z * & > P P h n * & 0 = > @ &
0x2ac9c4…2acb58 Dummy {f00=0x0166, f01=0x40b2, f02=» @ H IDENT D:DB20 TRA 10.0 81-04-09 F1 O1111 REL 10.0 80-04-11 D:DB20 H D:DB20D Z * & n @ = > @ &
0x2acb58…2accec Dummy {f00=0x0166, f01=0x40b2, f02=» @ H IDENT D:DB30 TRA 10.0 81-04-09 F1 O1111 REL 10.0 80-04-11 D:DB30 H D:DB30D Z * & n n @ = > @ &
0x2accec…2ace80 Dummy {f00=0x0166, f01=0x412c, f02=» @ H IDENT U:CB10 TRA 10.0 81-04-09 F1 O1111 REL 10.0 80-04-11 U:CB10 H U:CB10C Z * & @ n & & = & [ & y & &
0x2ace80…2ad014 (3, 68) Opaque[0x194]
0x2ad014…2ad1a8 # DirEnt {nam=»SCLASS«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2080, f03=0x0000}
0x2ad014…2ad1a8 IdxSect {
0x2ad014…2ad1a8 f00 = 0x0104 // 0x2ad014 @0x0
0x2ad014…2ad1a8 f01 = 0x0002 // 0x2ad016 @0x2
0x2ad014…2ad1a8 gno = [ // 0x2ad018 @0x4
0x2ad014…2ad1a8 [0x00]: C0x0104.0x0.0
0x2ad014…2ad1a8 ]
0x2ad014…2ad1a8 }
0x2ad1a8…2ad33c Dummy {f00=0x0104, f01=0x0190, f02=» 2 P IDENT SCLASS REL 10.0 80-03-14 870105041000 P : P* B P* L P ENTRY SCLASS V P* l P* v P EXTRN DWSI01 P EXTRN DWTW01 P EXTRN DWLP01 P EXTRN DWFD01 P*
0x2ad33c…2ad4d0 Dummy {f00=0x0104, f01=0x0190, f02=» TC02 P DATA TC03 P DATA TC04 , PTCLASE EQU * J PTC00 DATA TC00E-* ^ P DATA /0014 P DATA DWSI01 PTC00E EQU * PTC01 DATA TC01E-* P D
0x2ad4d0…2ad664 Dummy {f00=0x0104, f01=0x0190, f02=»* ~ PTC02 DATA TC02E-* P DATA /0036 , P DATA DWLP01 L PTC02E EQU * l PTC03 DATA TC03E-* P DATA /0030 P DATA DWLP01 PTC03E EQU * PTC
0x2ad664…2ad7f8 Dummy {f00=0x0104, f01=0x409c, f02=» P DATA /02FA P DATA DWFD01 $ P DATA /03FB : P DATA DWFD01 Z PTC04E EQU * p P END @ 03E-* P DATA /0030 P DATA DWLP01 PTC03E EQU * PTC
0x2ad7f8…2ad98c Dummy {f00=0x0104, f01=0x2008, f02=» NT TCLASS * * $ * . ENTRY TCLASS 8 * N * X * b * l * v * * TCLASS DATALTCLASE-* TCLASE EQU * END @ 1 INTLT2 INTRT1
0x2ad98c…2adb20 Dummy {f00=0x0104, f01=0x0190, f02=»ER OF PAGES x P RB AP:010 P* & D P* END OF EXECUTION PATH FOR SYSTEMS WITH MMU OPTION EXCLUSIVELY 0 P* x P EJECT PAP:100 EQU * P* @ P* EXECUTION PATH FOR SYSTEMS WITHOUT MMU OPTION EXCLUSIVELY P* & P LDKL A1,PAG
0x2adb20…2adcb4 (3, 69) Opaque[0x194]
0x2adcb4…2ade48 # DirEnt {nam=»MONTAB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x20a0, f03=0x0000}
0x2adcb4…2ade48 IdxSect {
0x2adcb4…2ade48 f00 = 0x0105 // 0x2adcb4 @0x0
0x2adcb4…2ade48 f01 = 0x0002 // 0x2adcb6 @0x2
0x2adcb4…2ade48 gno = [ // 0x2adcb8 @0x4
0x2adcb4…2ade48 [0x00]: C0x0105.0x0.0
0x2adcb4…2ade48 ]
0x2adcb4…2ade48 }
0x2ade48…2adfdc Dummy {f00=0x0105, f01=0x0190, f02=» 2 P IDENT MONTAB REL 10.0 80-03-14 870105041000 P : P* B 6 P* THIS TABLE CONTAINS ADDRESSES TO CONFIGURATION L P* DEPENDENT MONITOR TABLES P* P* P ENTRY MONTAB,SPDLCI P ENTRY FREQUE P ENTRY PAGQUE P E
0x2adfdc…2ae170 Dummy {f00=0x0105, f01=0x0190, f02=» INTRT3 P ENTRY INTRT4,INTAS,INTSL P* 2 P EXTRN SYSLOD < P**** R P EXTRN CTAB01 ^ P EXTRN KBAD3 t P EXTRN GPAD P EXTRN DYAD P* P P PMONTAB EQU * PFREQUE DATA 0 PPAGQUE DATA 0,0
0x2ae170…2ae304 Dummy {f00=0x0105, f01=0x4112, f02=»INTRT3 DATA 0 PINTRT4 DATA 0 P DATA SYSLOD , P**** @ P DATA CTAB01 L P DATA KBAD3 b P DATA GPAD v P DATA DYAD P* PINTAS DATA 0 PINTSL DATA 0 2 PSPDLCI DATA 0 LIGHTS CORE IMAGE (0=ON 1=OFF) P END
0x2ae304…2ae498 Dummy {f00=0x0105, f01=0x2008, f02=» DATA DYAD P* P* $ P END .@ : DYAD 8 P* L P* V P* ` PMONTAB EQU * j PTCTAB DATA 0 ~ PCDTAB DATA 0 PBLOCKS DATA 0 PDCTAB DATA 0 PINTLT1 DATA 0 PINTLT2 DATA 0 PINTRT1 DATA
0x2ae498…2ae62c Dummy {f00=0x0105, f01=0x0190, f02=»T A4,ECBEL,A8 SET EFFECTIVE LENGTH P* * P IFT MMUPAG=0 4 ( P LD A2,ECBBA,A8 USER BUFFER ADDRESS J P* v P EJECT DSKSUB P* P* PVNAM10 EQU * P LDR* A3,A1 MOVE ONE WORD P STR A3,A2 ( P ADK A1,2 INCREMENT
0x2ae62c…2ae7c0 Dummy {f00=0x0105, f01=0x0190, f02=» P IFT MMUPAG=1 2 P LD A2,DWTTAB,A6 TTAB ADDRESS OF CALLING TASK P TS -30,A15 SAVE RUNNING MMU T P TL TTB:MT,A2 LOAD USER MMU x & P LD A2,DWTUEC,A6 USER ECB ADDRESS ( P EL A2,ECBBA,A2 USER BUFFER ADDRESS P MVSU A4 MOVE VOLUME N
0x2ae7c0…2ae954 (3, 70) Opaque[0x194]
0x2ae954…2aeae8 # DirEnt {nam=»SYSTAB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2480, f03=0x0000}
0x2ae954…2aeae8 IdxSect {
0x2ae954…2aeae8 f00 = 0x0124 // 0x2ae954 @0x0
0x2ae954…2aeae8 f01 = 0x0006 // 0x2ae956 @0x2
0x2ae954…2aeae8 gno = [ // 0x2ae958 @0x4
0x2ae954…2aeae8 [0x00]: C0x0124.0x0.0
0x2ae954…2aeae8 [0x01]: C0x0124.0x2.0
0x2ae954…2aeae8 [0x02]: C0x0124.0x3.0
0x2ae954…2aeae8 ]
0x2ae954…2aeae8 }
0x2aeae8…2aec7c Dummy {f00=0x0124, f01=0x0190, f02=» 2 P IDENT SYSTAB REL 10.0 80-03-14 870105041000 P : P* B P* L 8 P*************************************************** V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 2 P* SYSTAB = INTERRUPT VECTORS, SYSTEM CONTROL 2 P*
0x2aec7c…2aee10 Dummy {f00=0x0124, f01=0x018e, f02=»*************** l P* P* " P EJECT SYSTAB , P* D P* N P*********** X P* ENTRIES * l P*********** P* P* 4 P ENTRY SCTMSZ,SCTSFA,SCTEFA SYSTEM CONTROL TABLE P ENTRY SCTIPL P ENTRY SCTANO,SCTA
0x2aee10…2aefa4 Dummy {f00=0x0124, f01=0x0190, f02=» P ENTRY SCTSTB P ENTRY SCTOPT P ENTRY SCTTCT,SCTCDT 0 P ENTRY SCTBUG L & P ENTRY SCTDMT,SCTDMI,SCTFWT,SCTNOF b & P ENTRY SCTNFT,SCTFWL,SCTBLK,SCTDCT P ENTRY SEG:FC,SEG:NS & P ENTRY SEG:ST,SEG:DS,SEG:EL,SEG:PB & P ENTRY PAG:Q
0x2aefa4…2af138 Dummy {f00=0x0124, f01=0x0190, f02=»* P* EXTERNALS * P************* P* 6 P* @ P EXTRN TDISP J , P EXTRN IHPFAR POWER FAIL / AUTO RESTART ^ P EXTRN IHLKM LKM INTERRUPT P EXTRN IHRTC REAL TIME CLOCK P EXTRN IHTW TYPEWRITER P EXTRN IHTC CASSETTE T
0x2af138…2af2cc Dummy {f00=0x0124, f01=0x0190, f02=» NO. 1 p * P EXTRN CHRT2 REMOTE CHANNEL UNIT NO. 2 P EXTRN CHRT3 < P EXTRN CHRT4 P ( P EXTRN IHCC1 CASSETTE CHANGER NO. 1 d ( P EXTRN IHCC2 2 ( P EXTRN IHCC3 3 * P EXTRN CHLT1 LOCAL CHANNEL UNIT
0x2af2cc…2af460 Dummy {f00=0x0124, f01=0x0190, f02=» M) DISC l P EXTRN IHLP LINE PRINTER P EXTRN IHCR CARD-READER 0 ( P EXTRN IHDU1,IHDU2 DISC UNIT NO. 1/2 P 0 P EXTRN IHMD,IASCUZ,ISLCI,ISLCO MINI FIX DISC | P EXTRN IHMT MAG. TAPE $ P EXTRN ILLINT ILLEGAL INTERRUPT P EXTRN HALT HALT R
0x2af460…2af5f4 (3, 71) Dummy {f00=0x0124, f01=0x0190, f02=»QU -4 FILE CODE $ PSEG:NS EQU -2 NUMBER OF SEGMENTS PSEG:ST EQU 0 STATUS @ $ PSEG:DS EQU 2 DISC SECTOR ADDRESS " PSEG:EL EQU 4 EFFECTIVE LENGTH $ PSEG:PB EQU 6 PAGE BLOCK ADDRESS P* & PPAG:QF EQU 0 QUEUE POINTER FORWARD ( PPA
0x2af5f4…2af788 Dummy {f00=0x0124, f01=0x0190, f02=»QU 0 NUMBER OF COPIES WITHIN SWB TYPE 2 PSWB:DS EQU 2 DISC SECTOR ADDRESS OF FIRST COPY . $ PSWB:EL EQU 4 SWB LENGTH (BYTES) d & PSWB:NS EQU 6 SWB LENGTH (SECTORS) P* P P P P P EJECT SYSTAB P* P* INTE
0x2af788…2af91c Dummy {f00=0x0124, f01=0x0190, f02=» | P DATA ILLINT 4 P DATA ILLINT 5 $ P DATA ILLINT 6 @ P DATA IHTW 7 P DATA ILLINT v P DATA IHSOP 9 P DATA ILLINT P DATA ILLINT P DATA ILLI
0x2af91c…2afab0 Dummy {f00=0x0124, f01=0x0190, f02=» DATA ILLINT P DATA ILLINT P DATA ILLINT 8 P DATA ILLINT X P DATA ILLINT x P DATA ILLINT 22 P DATA ILLINT P DATA CHLT1 24 P DATA ILLINT
0x2afab0…2afc44 Dummy {f00=0x0124, f01=0x0190, f02=»FD 30 P DATA ILLINT 31 P DATA ILLINT 32 . P DATA ILLINT 33 J P DATA IHLP 34 f P DATA ILLINT P DATA ILLINT 36 P DATA ILLINT 37 P DATA ILLINT 38 P DATA ILLINT 39
0x2afc44…2afdd8 Dummy {f00=0x0124, f01=0x0190, f02=» DATA ILLINT P DATA ILLINT 45 P DATA ILLINT 46 4 P DATA ILLINT 47 P P DATA ILLINT l P DATA ILLINT 49 P DATA ILLINT 50 P DATA ILLINT 51 P DATA ILLINT 52 P DATA ILLINT
0x2afdd8…2aff6c Dummy {f00=0x0124, f01=0x018e, f02=»LINT 58 P DATA ILLINT 59 P DATA ILLINT 60 0 P DATA ILLINT 61 L P DATA ILLINT 62 h P DATA TRAP TRAP ROUTINE P EJECT SYSTAB P P* " P* SYSTEM CONTROL TABLE POINTER P* P DATA SCT
0x2aff6c…2b0100 Dummy {f00=0x0124, f01=0x0190, f02=» P* P* DEBUG RESTART ENTRY P* 0 P XRR A13,A13 : P XRR A14,A14 N P LD A1,SCTBUG b P ABR(NZ) A1 x P HLT P* P EJECT SYSTAB P* P* PX:A EQU 0 MONITOR OPTION ( PX:B EQU 0 DATA MAN .TASKS
0x2b0100…2b0294 (3, 72) Dummy {f00=0x0124, f01=0x0190, f02=»TASK p $ PX:F EQU 0 FILE WORK TABLE LENGTH PX:G EQU 0 DC TASK IN SYSTEM 4 P* X P EJECT SYSTAB b P* z P* SYSTEM CONTROL TABLE P* PSCT EQU * P * PSCTMSZ DATA 0 MEMORY SIZE MOD K BYTES & PSCTSFA DATA 0,0 STAR
0x2b0294…2b0428 Dummy {f00=0x0124, f01=0x0190, f02=»FD:F8,F9 r $ PSCTANO DATA 0 APPLICATION NUMBER 4 PSCTADA DATA 0,0 APPLICATION DISC SECTOR ADDRESS 8 . PSCTIOE DATA 0 APPLICATION RESTART ADDRESS p PSCTTCT DATA 0 TCTAB ADDRESS PSCTCDT DATA 0 CDTAB ADDRESS PSCTPAG DATA 0 PAGTAB ADDRESS
0x2b0428…2b05bc Dummy {f00=0x0124, f01=0x0190, f02=»COMMON PART ENTRY x P INDEX REL TTAB 0 PSCTLAC DATA 0 LOGICAL ADDRESS OF COMMON PART 4 & PSCTMMP DATA 0 MMU TABLE PAGE ENTRY h P INDEX REL TTAB * PSCTLAP DATA 0 LOGICAL ADDRESS OF PAGES ( PSCTNPE DATA 0 NUMBER OF PAGE ENTRIES & PSC
0x2b05bc…2b0750 Dummy {f00=0x0124, f01=0x0190, f02=»DSKPAG,15:MMUPAG PSCTBUG DATA 0 DEBUGGER & PSCTDMT DATA X:B DMTASKS IN SYSTEM 6 & P BIT 12:#G, 13:#F, 14:#E, 15:#D ` 2 PSCTDMI DATA 00000 DM INDEX RECORD BUFFER SIZE P EJECT SYSTAB P* P* * PSCTFWT DATA 0 FWT CHAIN STAR
0x2b0750…2b08e4 Dummy {f00=0x0124, f01=0x4188, f02=»BLE LENGTH r ( PSCTBLK DATA 6 NUMBER OF BLOCKS/TASK , PSCTDCT DATA X:G DC-TASK IN SYSTEM/REMOTE > P EJECT SYSTAB n P P* P* SYSTEM STACK P* P RES 143 P DATA /FCC0 AND PSW & PSTB DATA LOOP AND PC FOR IDLE LOOP
0x2b08e4…2b0a78 Dummy {f00=0x0124, f01=0x2008, f02=» P P END INIM @ & P EJECT 2 P @ P* H P* START SYSTEM R P* h P r P LD A13,CVTAPS z * P STR A13,A15 STORE USER START ADDRESS " P STR A7,A15 AND LEVEL ON STACK " P ABL PFINIT INITIALIZE DEVICES
0x2b0a78…2b0c0c Dummy {f00=0x0124, f01=0x0190, f02=» P ANK A3,/FF P SUK A3,/2B P RF(Z) WRT030 NO CR OR LF , P* N P* X , P ST A4,DWTHP,A6 HEAD POSITION INDICATOR b P LDK A4,2 $ P LDK A2,CR SEND CARRIAGE RETURN P EJECT P* P* P* $ PWRT010 CF A5,OTR
0x2b0c0c…2b0da0 Dummy {f00=0x0124, f01=0x0190, f02=» PWRT020 SUK A3,5 P RB(Z) WRT015 SEND SECOND LF P SUK A3,1 D P RF(NZ) WRT030 V P LDK A2,/0C SEND FORM FEED n P RB WRT010 " PWRT030 LDK A3,2 BUFFER POINTER P RF WRT050 GET CHARACTER P* P* P* PWR
0x2b0da0…2b0f34 (3, 73) Opaque[0x194]
0x2b0f34…2b10c8 # DirEnt {nam=»TDISP «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x20c0, f03=0x0000}
0x2b0f34…2b10c8 IdxSect {
0x2b0f34…2b10c8 f00 = 0x0106 // 0x2b0f34 @0x0
0x2b0f34…2b10c8 f01 = 0x0008 // 0x2b0f36 @0x2
0x2b0f34…2b10c8 gno = [ // 0x2b0f38 @0x4
0x2b0f34…2b10c8 [0x00]: C0x0106.0x0.0
0x2b0f34…2b10c8 [0x01]: C0x0106.0x1.0
0x2b0f34…2b10c8 [0x02]: C0x0106.0x2.0
0x2b0f34…2b10c8 [0x03]: C0x0128.0x0.0
0x2b0f34…2b10c8 ]
0x2b0f34…2b10c8 }
0x2b10c8…2b125c Dummy {f00=0x0106, f01=0x0190, f02=» 0 P IDENT TDISP REL 10.0 80-03-14 870105041000 P 8 P* @ P* J 6 P************************************************** T P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TDISP = TOSS DISPATCHER P* 6 P****************
0x2b125c…2b13f0 Dummy {f00=0x0106, f01=0x0190, f02=» WITH 8 REGISTERS ON A15 STACK. v > P* THE DISPATCHER CHECKS IF THERE IS A TASK IN DISPATCHER ( < P* QUEUE WITH HIGHER PRIORITY THAN INTERRUPTED PROGRAM. j : P* - IF SO, THE RUNNING TASK IS QUEUED AND THE HIGHER $ P* PRIORITY TASK IS STARTED.
0x2b13f0…2b1584 Dummy {f00=0x0106, f01=0x0190, f02=» 6 P* ENTRY 'DISIOE' SETS BIT 0 IN A1 BEFORE DISEND. P* B 8 P* ENTRY 'MEXIT' EXITS A MONITOR TASK BEFORE TDISP. L P* H P* ENTRY 'QMEXIT' CALLS QTJOB BEFORE EXIT IS MADE ON MONITOR TASK. P* 0 P* ENTRY 'TEXIT' EXITS A TASK B
0x2b1584…2b1718 Dummy {f00=0x0106, f01=0x0190, f02=» A TASK BEFORE TDISP. t P* D P* ENTRY 'RETUR8' LOADS 8 REGISTERS FROM A15 STACK AND RETURNS. ( P* p P EJECT TDISP z P* P* P*********** P* ENTRIES * P*********** P* P* " P ENTRY TDISP DISPATC
0x2b1718…2b18ac Dummy {f00=0x0106, f01=0x018e, f02=»E TASK AND EXIT MONITOR TASK ~ , P ENTRY ACTDIS ACTIVATE TASK AND DISPATCH $ " P ENTRY DISIOE I/O ERROR ENTRY T & P ENTRY DISEND END I/O AND DISPATCH z 6 P ENTRY DISQUE POINTER TO FIRST TASK IN DISP. QUEUE , P ENTRY PRUN TTAB ADDRESS OF RUNNING TASK
0x2b18ac…2b1a40 Dummy {f00=0x0106, f01=0x0190, f02=» P************* P* P* ( P EXTRN ACTOT ACTIVATE TASK 2 P EXTRN TTB:SA SAVE AREA T P EXTRN TTB:ST STATUS t & P EXTRN TTB:PW PROGRAM STATUS WORD P EXTRN TTB:MT MMUTAB & P EXTRN TTB:CB CURRENT SEGMENT BASE ( P EXTRN T
0x2b1a40…2b1bd4 (3, 74) Dummy {f00=0x0106, f01=0x0190, f02=» QUEUE BACKWARD POINTER ~ P EXTRN TENDIO END I/O P EXTRN EXIT PROGRAM EXIT > 2 P EXTRN QLTDSK ACTIVATE LDTASK AT ENTRY LT:DSK ^ , P EXTRN QTJOB QUEUE TASK FOR DISPATCHING . P EXTRN SCTLAP LOGICAL ADDRESS OF CODE PAGE & P EXTRN SCTMMP MMU
0x2b1bd4…2b1d68 Dummy {f00=0x0106, f01=0x0190, f02=»*************** v P* P* CONDITIONAL ASSEMBLY " P* @ . P***************************************** J P* | . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* PMMUPAG EQU 1 P*
0x2b1d68…2b1efc Dummy {f00=0x0106, f01=0x0190, f02=»U852 EQU 0 P* * . ** A PROGRAM VERSION USING TOSS DISC PAGING & * &* IS OBTAINED BY SETTING DSKPAG EQU 1. X * PDSKPAG EQU 0 * P* @ P* A PROGRAM VERSION PREVENTING SEGMENTS TO MOVE WHEN HAVING > P* APPLICATIO
0x2b1efc…2b2090 Dummy {f00=0x0106, f01=0x0190, f02=» P* P EJECT TDISP P* ( P* D I S Q U E 2 P* J 2 P* POINTER TO FIRST TASK IN DISPATCHER QUEUE T P* PDISQUE DATA 0 P* P* P R U N P* $ P* TTAB ADDRESS OF RUNNING TASK P* PPRUN
0x2b2090…2b2224 Dummy {f00=0x0106, f01=0x018e, f02=» P* PRETUR8 EQU * P " P IFT CPU852=0 * P MLR 8,A15 @ P XIF R P ^ P IFT CPU852=1 f P LDR* A8,A15 | P LDR* A7,A15 P LDR* A6,A15 P LDR* A5,A15 P LDR* A4,A15 P LDR* A3,A15 P LDR* A2,A15 P
0x2b2224…2b23b8 Dummy {f00=0x0106, f01=0x0190, f02=» h P* 2 P* DO EXIT ON (MONITOR) TASK AND GO TO TDISP P* H 2 PQMEXIT CF A15,QTJOB QUEUE TASK FOR DISPATCHING R P* PMEXIT INH P LD A5,PRUN P CM PRUN P* PTEXIT EQU * P CF A15,EXIT P RF TDISP
0x2b23b8…2b254c Dummy {f00=0x0106, f01=0x0190, f02=» RF TDISP P EJECT TDISP P ( P* 0 P* D I S I O E : P* R 6 P* SET BIT 0 IN ECB RETURN CODE AND GO TO DISEND P* PDISIOE LDKL A1,/8000 P P* P* D I S E N D P* $ P* CALL TENDIO AND GO T
0x2b254c…2b26e0 Dummy {f00=0x0106, f01=0x0190, f02=»ISP) r P* PTPAUSE EQU * P EJECT TDISP * P* @ P* T D I S P J P* ` $ P* THIS IS THE DISPATCHER ENTRY j P* PTDISP INH & P LC A1,18,A15 LOAD PSW FROM STACK P ANK A1,/FC P SUK A1,/C4 . P RB(L) R
0x2b26e0…2b2874 (3, 75) Dummy {f00=0x0106, f01=0x0190, f02=» P RB(Z) RETUR8 QUEUE EMPTY P * P LD A5,PRUN 2 $ P RF(Z) TDCQ10 IDLE LOOP RUNNING F & P LD A4,TTB:ST+1,A5 COMPARE RUNNING n 4 P CC A4,TTB:ST+1,A3 AND QUEUED TASK'S PRIORITIES * P RB(NG) RETUR8 RUNNING HIGHER OR SAME $ PTDCQ10 LDR
0x2b2874…2b2a08 Dummy {f00=0x0106, f01=0x0190, f02=»DDR l P RF(Z) TDISSW NONE P LDR* A7,A1 & P RF(N) TDISSW SEGMENT LOADED : 2 P CF A15,QLTDSK SEGM NOT LOADED QUEUE LOAD TASK ^ & P RB TDISCQ TAKE NEXT TASK INSTEAD P XIF P EJECT TDISP P* P* SWITCH TASKS P* *
0x2b2a08…2b2b9c Dummy {f00=0x0106, f01=0x018e, f02=»0 QUEUE OLD TASK FIRST ON PRIORITY P RF(Z) TDSW20 EMPTY QUEUE * 0 PTDSW10 CC A4,TTB:ST+1,A6 COMPARE PRIORITIES L 0 P RF(NG) TDSW20 SAME OR LOWER PRIORITY FOUND P LDR A2,A6 P LDR* A6,A2 , P RB(NZ) TDSW10 STILL SOMETHING IN QUEUE
0x2b2b9c…2b2d30 Dummy {f00=0x0106, f01=0x0190, f02=» P IFT CPU852=0 P MLR 8,A15 P MS 13,TTB:SA+2,A14 , P MLR 2,A15 H P Z P XIF b P IFT CPU852=1 n P LDR* A8,A15 P LDR* A7,A15 P LDR* A6,A15 P LDR* A5,A15 P LDR* A4,A15 P LDR* A3,A15 P LDR* A2,A15
0x2b2d30…2b2ec4 Dummy {f00=0x0106, f01=0x0190, f02=»A14 ~ P ST A9,TTB:SA+18,A14 P ST A8,TTB:SA+16,A14 ( P ST A7,TTB:SA+14,A14 D P ST A6,TTB:SA+12,A14 ` P ST A5,TTB:SA+10,A14 | P ST A4,TTB:SA+8,A14 P ST A3,TTB:SA+6,A14 P ST A2,TTB:SA+4,A14 P ST A1,TTB:SA+2,A14 P
0x2b2ec4…2b3058 Dummy {f00=0x0106, f01=0x0190, f02=»FT DSKPAG+DIFPRI=2 P * P LD A1,TTB:SB,A14 GET SEGM BLOCK ADDR " P RF(Z) TDISST NONE P P LDR* A2,A1 GET SEGM STATUS j P LDKL A3,/1000 , P TM A2,A3 CHECK IF SEGM USED BY INT TASK P RF(NZ) TDISST YES * P ORRS A3,A1 SET SEGM USED
0x2b3058…2b31ec Dummy {f00=0x0106, f01=0x0190, f02=» P* START NEW TASK P* PTDISST LD A14,PRUN & P IFT DSKPAG=1 @ P V * P LD A1,TTB:SB,A14 GET SEGM BLOCK ADDR ^ P RF(Z) TDST30 NONE ( P LD A4,SEG:PB,A1 GET PAGE BLOCK ADDR P IFT DIFPRI=0 P ( P LDR* A2,A4 CHECK IF PAG
0x2b31ec…2b3380 Dummy {f00=0x0106, f01=0x0190, f02=»IN PAGQUE v P RF(NZ) TDST10 YES " P LDR* A3,A1 NO GET SEGM STATUS , 2 P ANKL A3,/1000 CHECK IF SEGM USED BY INT TASK R P RF(Z) TDST20 NO 4 P CW A14,PAG:QB,A4 YES CHECK IF IT WAS THIS TASK P RF(NE) TDST20 NO * P XRRS A3,A1 YES RESET
0x2b3380…2b3514 (3, 76) Dummy {f00=0x0128, f01=0x0190, f02=»E d P STR A2,A3 P ST A3,PAG:QB,A2 P CMR A4 4 P D , PTDST20 LD A1,PAG:PA,A4 GET PAGE ADDRESS L P | P IFT MMUPAG=1 P " P ECR A2,A1 CALC PHYS PAGE ADDR P ANK A2,/FC * P LDR A3,A14 AND MMU PAGE ENTRY IN TTAB
0x2b3514…2b36a8 Dummy {f00=0x0128, f01=0x0190, f02=»UK A4,1 P RF(Z) TDST25 P ADK A2,4 & P ADK A3,2 8 P RB TDST22 J P PTDST25 EQU * d " P TL TTB:MT,A14 LOAD MMU TABLE x 2 P SLL A1,2 UPDATE BASE IN T:A ALSO JUST IN CASE P ANKL A1,/FFE P OR A1,SCTLAP 2 P ES* A1,
0x2b36a8…2b383c Dummy {f00=0x0128, f01=0x0190, f02=»E CURRENT SEGMENT BASE x P XIF P * PTDST30 EQU * 2 P IFT MMUPAG=1 F " P TL TTB:MT,A14 LOAD MMU TABLE P XIF P & PTDST35 LD A1,TTB:SA,A14 GET NEW PC P LD A2,TTB:PW,A14 AND PSW P IFT CPU852=0 P & P MSR 2,A
0x2b383c…2b39d0 Dummy {f00=0x0128, f01=0x0190, f02=»5 PUT PC P STR A2,A15 AND PSW ON STACK & P LD A1,TTB:SA+2,A14 LOAD REGISTERS 4 P LD A2,TTB:SA+4,A14 ^ P LD A3,TTB:SA+6,A14 z P LD A4,TTB:SA+8,A14 P LD A5,TTB:SA+10,A14 P LD A6,TTB:SA+12,A14 P LD A7,TTB:SA+14,A14 P L
0x2b39d0…2b3b64 Dummy {f00=0x0128, f01=0x4098, f02=» z P LD A13,TTB:SA+26,A14 P LD A14,TTB:SA+28,A14 & P D P XIF L P X P RTN A15 START THE TASK ` P P END @ D A4,TTB:SA+8,A14 P LD A5,TTB:SA+10,A14 P LD A6,TTB:SA+12,A14 P LD A7,TTB:SA+14,A14 P L
0x2b3b64…2b3cf8 Dummy {f00=0x0128, f01=0x2008, f02=» p P* P* P END $@ 0K P* > P* H PLKMDIS EQU * R P INH f P LD A5,DISQUE r " P RF(Z) DIS010 NO QUEUE,RETURN & P LD A1,32,A15 LOAD PSW FROM STACK P SRL A1,10 GET LEVEL 4 P CC A1,TTABST+1,A5 A
0x2b3cf8…2b3e8c Dummy {f00=0x0128, f01=0x0190, f02=»CTMSZK SCTSFA SCTEFA $ SCTIPL 8 SCTANO L SCTADA ` , ( @ t SCTIOEL SCTTCT SCTCDTB SCTPAG SCTSWB
0x2b3e8c…2b4020 Dummy {f00=0x0128, f01=0x418a, f02=» SCTSTB SCTOPT bBUG , SCTBUG : , ( 6 N SCTDMT~ ~ SCTDMI SCTFWT SCTNOF SCTNFT SCTFWL SCTBLK
0x2b4020…2b41b4 (3, 77) Opaque[0x194]
0x2b41b4…2b4348 # DirEnt {nam=»LRPINT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24b8, f03=0x0000}
0x2b41b4…2b4348 IdxSect {
0x2b41b4…2b4348 f00 = 0x0125 // 0x2b41b4 @0x0
0x2b41b4…2b4348 f01 = 0x000a // 0x2b41b6 @0x2
0x2b41b4…2b4348 gno = [ // 0x2b41b8 @0x4
0x2b41b4…2b4348 [0x00]: C0x0125.0x3.0
0x2b41b4…2b4348 [0x01]: C0x0126.0x0.0
0x2b41b4…2b4348 [0x02]: C0x012e.0x0.0
0x2b41b4…2b4348 [0x03]: C0x0146.0x2.0
0x2b41b4…2b4348 [0x04]: C0x0149.0x3.0
0x2b41b4…2b4348 ]
0x2b41b4…2b4348 }
0x2b4348…2b44dc Dummy {f00=0x0125, f01=0x018e, f02=» 2 P IDENT LRPINT REL 10.0 80-03-14 870105041000 P : P* B P* L 6 P************************************************** V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 0 P* LRPINT = INTERRUPT HANDLERS FOR LKM, RTC " P*
0x2b44dc…2b4670 Dummy {f00=0x0125, f01=0x0190, f02=» P* P* : P* THIS MODULE CONTAINS MANDATORY INTERRUPT HANDLERS P* FOR TOSS. THESE ARE: V P* v P* -IHLKM: LKM INTERRUPT P* P* -IHRTC: RTC INTERRUPT P* ( P* -IHPFAR: POWER FAILURE INTERRUPT P*
0x2b4670…2b4804 Dummy {f00=0x0125, f01=0x0190, f02=»QUEUE JOB AND DISPATCH v P* ( P* -LKMQDI: QUEUE JOB AND DISPATCH ( P* T P EJECT LRPINT ^ P* v P* P*********** P* ENTRIES * P*********** P* P* & P ENTRY IHLKM LKM INTERRUPT HANDLER 4 P ENT
0x2b4804…2b4998 Dummy {f00=0x0125, f01=0x018e, f02=»RROR d ( P ENTRY LKMQDI QUEUE JOB AND DISPATCH & P ENTRY IHRTC RTC INTERRUPT HANDLER 8 8 P ENTRY TIMQUE POINTER TO FIRST BLOCK IN TIMER QUEUE b P ENTRY MONCLO MONITOR CLOCK 2 P ENTRY IHPFAR POWER FAILURE INTERRUPT HANDLER & P ENTRY INIFLG IN
0x2b4998…2b4b2c Dummy {f00=0x0125, f01=0x0190, f02=» P* EXTERNALS * P************* P* 0 P* : P EXTRN TDISP DISPATCHER D " P EXTRN DISQUE DISPATCHER QUEUE d ( P EXTRN PRUN TTAB OF RUNNING PROGRAM " P EXTRN MEXIT MONITOR TASK EXIT , P EXTRN MONMMU MONITOR (SYSTEM) MMU TABLE
0x2b4b2c…2b4cc0 Dummy {f00=0x0125, f01=0x0190, f02=» LEVEL XY z P EXTRN FREBLK SET BLOCK FREE " P EXTRN SAVE8 SAVE 8 REGISTERS 6 $ P EXTRN PFINIT RESTART OF DEVICES P EXTRN HALT HALT MODULE ( P EXTRN INTSAV INTERRUPT SAVE MODULE P EXTRN RELPAG RELEASE PAGE , P EXTRN TLDSEG LOAD SEG
0x2b4cc0…2b4e54 (3, 78) Dummy {f00=0x0126, f01=0x0190, f02=» OF SAVE AREA IN TTAB x " P EXTRN LKMAL LKM REQUEST TABLE P EJECT LRPINT D P* P* f . P***************************************** p P* P* CONDITIONAL ASSEMBLY P* . P***************************************** P*
0x2b4e54…2b4fe8 Dummy {f00=0x0126, f01=0x0190, f02=» P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. L P* ~ PCPU852 EQU 0 P* * . ** A PROGRAM VERSION USING TOSS DISC PAGING * &* IS OBTAINED BY SETTING DSKPAG EQU 1.
0x2b4fe8…2b517c Dummy {f00=0x0126, f01=0x0190, f02=»ETTING MONCLK EQU 0. ~ P* PX:A EQU 1 & PMONCLK EQU 1 8 P* L P EJECT LRPINT V P* n P* x P* I H L K M P* P* 8 P* THIS IS THE LKM INTERRUPT HANDLER. THE FOLLOWING P* STEPS ARE CARRIED OUT:
0x2b517c…2b5310 Dummy {f00=0x0126, f01=0x0190, f02=»* PROGRAM. P* : P* - EXIT CONDITIONS ARE SET AND A BRANCH IS MADE TO $ P* APPROPRIATE LKM PROCESSOR. ^ P* P* EXIT CONDITIONS ARE: P* * P* A4 = LABEL ADDRESS OF LKM REQUEST 8 P* (A4 = 0 INDICATES NO LA
0x2b5310…2b54a4 Dummy {f00=0x0126, f01=0x0190, f02=» P* : P* ALL OTHER REGISTERS REMAIN UNCHANGED FROM CALLING P* PROGRAM. L P* ` P* j P* t PIHLKM EQU * ~ $ P ST P,INTSAV SAVE LAST INTERRUPT * P RIT /1D RESET INTERNAL INTERRUPT FLAG P* P EJECT LRPINT
0x2b54a4…2b5638 Dummy {f00=0x0126, f01=0x0190, f02=»B:SA+28 SET A15 TO LAST IN SAVE AREA * P STR A14,A15 SAVE USER REGISTERS, -A14 , P STR A13,A15 -A13 Z P STR A12,A15 -A12 t P STR A11,A15 -A11 P STR A10,A15 -A10 P STR A9,A15 -A9 P STR A8,A15 -A8 P STR A7,A15 -A7
0x2b5638…2b57cc Dummy {f00=0x0126, f01=0x0190, f02=»1 P XIF P* P IFT CPU852=0 6 P MS 14,TTB:SA+2,A15 SAVE A1-A14 IN TTAB SAVE AREA 6 P XIF p P* | 0 P LD A5,PRUN GET TTAB ADDRESS OF CALLING TASK * P LDKL A15,0 RESTORE A15 STACK POINTER PLKM010 EQU *-2 P* P
0x2b57cc…2b5960 Dummy {f00=0x0126, f01=0x0190, f02=»STACK POINTER n & P ST A3,TTB:PW,A5 STORE PSW IN TTAB P* @ P IFT MMUPAG=0 J & P LD A3,-2,A2 GET INSTRUCTION CODE ` " P LDR* A6,A2 GET DATA DIRECTIVE P XIF P* P IFT MMUPAG=1 P ANK A3,1 P RF(NZ) LKM015 USER MODE
0x2b5960…2b5af4 (3, 79) Dummy {f00=0x012e, f01=0x0190, f02=»ET DATA DIRECTIVE P XIF P* & P CWK A3,/2804 0 P RF(E) LKM025 LKM F P CWK A3,/6300 ` P RF(E) LKM025 TRAP v P* $ P* STACK OVERFLOW: HALT SYSTEM P* P LDK A1,7 HALT PARAMETER 0 P RF LKM070 HALT SYSTEM DUE T
0x2b5af4…2b5c88 Dummy {f00=0x012e, f01=0x018e, f02=» GET SEGMENT BLOCK ADDRESS P RF(Z) LKM027 NO SEGMENT " " P LCR A4,A3 GET SEGMENT STATUS B , P ANK A4,/1E CHECK IF CORE RESIDENT OR... h 2 P RF(NZ) LKM027 ...USED BY AN INTERRUPTED TASK P* ( P* INSERT PAGE BLOCK IN PAGE QUEUE P*
0x2b5c88…2b5e1c Dummy {f00=0x012e, f01=0x018e, f02=» PLKM027 EQU * P IFF MMUPAG+DSKPAG=0 " P CWK A6,9 CHECK DATA DIRECTIVE 4 ( P ABL(E) TLDSEG LOAD SEGMENT REQUEST Z P XIF P* P EJECT LRPINT P* P* PLKM030 EQU * ( P CM PRUN INDICATE IDLE LOOP RUNNING $ P
0x2b5e1c…2b5fb0 Dummy {f00=0x012e, f01=0x0190, f02=» P* LKM REQUEST WITH LABEL P* & P ADK A2,2 0 , P NGR A3,A3 MAKE DATA DIRECTIVE POSITIVE B P* r P IFT MMUPAG=0 | P LDR* A4,A2 GET LABEL P XIF P* P IFT MMUPAG=1 P ELR A4,A2 GET LABEL P XIF P*
0x2b5fb0…2b6144 Dummy {f00=0x012e, f01=0x0190, f02=»EXT ADDRESS TO $ P ST A2,TTB:SA,A5 EXECUTE IN TTAB " P ADR A3,A3 GET INDEX IN LKMAL > ( P RF(Z) LKMQDI PROGRAM SWITCH REQUEST d P CW A3,LKMAL * P RF(NL) LKMRQE INVALID DATA DIRECTIVE P INH P LD A3,LKMAL,A3 ( P ABR(NZ) A3 BRANCH
0x2b6144…2b62d8 Dummy {f00=0x012e, f01=0x0190, f02=»1,15 INDICATE REQUESTED LKM PROC. NOT PRESENT P* 6 PLKM070 EQU * @ P CF A15,HALT HALT SYSTEM T P* t P* ~ P* L K M R Q E P* 6 P* SET A7 = -1, QUEUE TERMINAL JOB AND DISPATCH. P* P* A5 = TTAB ADDRESS
0x2b62d8…2b646c Dummy {f00=0x012e, f01=0x0190, f02=» L K M Q D I P* ( P* QUEUE TERMINAL JOB AND DISPATCH. P* L P* A5 = TTAB ADDRESS V P* t P* ~ PLKMQDI EQU * P CF A15,QTJOB P* * PT:DISP EQU * COMMON EXIT TO DISPATCHER P ABL TDISP GO TO DISPATCHER
0x2b646c…2b6600 Dummy {f00=0x012e, f01=0x0190, f02=»LER. Z P* P P P & P DATA 0 . & PTTABPF DATA 0 TTAB FOR POWER FAIL > P DATA '#P' h P DATA 0 z PA15SAV DATA 0 P DATA /00C0 P DATA PFTASK P P P P P & PPFX DATA 1 POWER ON/OFF
0x2b6600…2b6794 (3, 80) Dummy {f00=0x0146, f01=0x018e, f02=» * PPFPOST DATA 0 PWF POST PROCESSING FLAG P NZ=PWF POST PROCESSING 6 P EJECT LRPINT X P p P* x * P* POWER FAIL/AUTO RESTART INTERRUPT P* P PIHPFAR EQU * $ P ST P,INTSAV SAVE LAST INTERRUPT & P RIT /17
0x2b6794…2b6928 Dummy {f00=0x0146, f01=0x018e, f02=» P* P IFT CPU852=1 & P CF A15,SAVE8 SAVE A1-A14 ON STACK $ P STR A9,A15 N P STR A10,A15 b P STR A11,A15 v P STR A12,A15 P STR A13,A15 P STR A14,A15 P XIF P P IFT CPU852=0 $ P MSR 14,A15 SAVE A1-A14
0x2b6928…2b6abc Dummy {f00=0x0146, f01=0x0190, f02=» P* POWER ON P* P " " PPOWON LD A15,A15SAV RELOAD A15 * P P P IFT CPU852=1 X P LDR* A14,A15 RESTORE A9-A14 n P LDR* A13,A15 P LDR* A12,A15 P LDR* A11,A15 P LDR* A10,A15 P LDR* A9,A15 P XIF
0x2b6abc…2b6c50 Dummy {f00=0x0146, f01=0x0190, f02=» FOR DISPATCHING p P LDKL A2,TTABPF P CWR A1,A2 0 4 P RB(E) T:DISP ALREADY QUEUED, PWF DURING PFPOST B P STR A1,A2 z P ST A2,DISQUE , P IM PFPOST INDICATE PWF POST PROCESSING P RB T:DISP P EJECT LRPINT P P*
0x2b6c50…2b6de4 Dummy {f00=0x0146, f01=0x0190, f02=»OC FLAG n P CM INIFLG AND INIT FLAG & P CF A15,PFINIT RESTART I/O DEVICES 0 P CM PRUN EXIT PFTASK Z P RB T:DISP v P EJECT LRPINT P* P* I H R T C P* 6 P* THIS IS THE REAL TIME CLOCK INTERRUPT HANDLER. 6 P*
0x2b6de4…2b6f78 Dummy {f00=0x0146, f01=0x0190, f02=»LAG v P IM COUNT $ P RF(P) RTC010 CHECK TIMER QUEUE P RTN A15 F P* V PRTC010 EQU * ` P IFT CPU852=1 t & P CF A15,SAVE8 SAVE A1-A8 ON STACK P XIF P* P IFT CPU852=0 " P MSR 8,A15 SAVE A1-A8 ON STACK P X
0x2b6f78…2b710c Dummy {f00=0x0146, f01=0x0190, f02=»QMJOB P* P IFT MONCLK=1 P IM SECOND . & P RF(P) RTC025 UPDATE MONITOR CLOCK @ P XIF j P* v PRTC020 EQU * $ P CF A15,SWLXY SWITCH TO LEVEL XY P RB T:DISP P* P EJECT LRPINT P* P* P IFT
0x2b710c…2b72a0 Dummy {f00=0x0146, f01=0x0190, f02=»T SECOND SWITCH P ST A4,SECOND P LDK A4,4 . P* @ 2 PMCLO10 LDK A3,60 NUMBER OF MINUTES AND SECONDS J ( PMCLO20 IM MONCLO+2,A4 INCREMENT TIME . P XR A3,MONCLO+2,A4 CHANGE MINUTES OR HOURS $ P RB(NE) RTC020 GO TO DISPATCHER ( P C
0x2b72a0…2b7434 (3, 81) Dummy {f00=0x0149, f01=0x0190, f02=» LDK A3,24 UPDATE HOURS P RB MCLO20 P XIF 2 P* > P* H P* M O N C L O R P* j P* t PMONCLO EQU * ~ P IFT MONCLK=1 & P DATA 0 ACCUMULATED 24 HOUR CARRY P DATA 0 HOUR P DATA 0 MINUTE P DATA 0 SECO
0x2b7434…2b75c8 Dummy {f00=0x0149, f01=0x0190, f02=»S. l P* PCLOCK INH , P LDKL A4,TIMQUE LOAD FIRST TIMER ADDRESS & P* V PCLK10 LDR A6,A4 ` $ PCLK20 LDR* A4,A6 GET TIMER BLOCK x P ABL(Z) MEXIT END OF QUEUE P IM 4,A4 INCREMENT TIMER P RB(N) CLK10 NOT TIME OUT P RF(
0x2b75c8…2b775c Dummy {f00=0x0149, f01=0x0190, f02=» P RB CLK20 P* P EJECT LRPINT P* 8 P* B , PCLK30 CF A15,CLK40 CALL TIME OUT ROUTINE L $ P CF A15,SWL48 SWITCH TO LEVEL 48 | P INH P RB CLK10 P* PCLK40 EQU * P IFT CPU852=1 & P CF A15,SAVE8 SAVE
0x2b775c…2b78f0 Dummy {f00=0x0149, f01=0x0190, f02=»,/C4C0 LEVEL 49 AND ENABLE & P ST A1,18,A15 SET NEW PSW ON STACK ! " P LD A2,2,A4 LOAD DISP BLOCK ! L P LD A1,4,A2 GET PARAMETER ! p $ P ABI 2,A2 GO TO TIME OUT ROUTINE ! P* ! P* ! PCOUNT DATA 0 100 MS SWITCH ! P* ! P* ! P*
0x2b78f0…2b7a84 Dummy {f00=0x0149, f01=0x4022, f02=»* ! P " P END " @ " ST A1,18,A15 SET NEW PSW ON STACK ! " P LD A2,2,A4 LOAD DISP BLOCK ! L P LD A1,4,A2 GET PARAMETER ! p $ P ABI 2,A2 GO TO TIME OUT ROUTINE ! P* ! P* ! PCOUNT DATA 0 100 MS SWITCH ! P* ! P* ! P*
0x2b7a84…2b7c18 Dummy {f00=0x0149, f01=0x2008, f02=» # POINTER z PPFA210 EQU *-2 ( P CM INIFLG RESET INITIALIZATION FLAG . * P CF A15,PFINIT RESTART COMMON DEVICES Z 4 P ABL RETU14 RESTORE A1-A14 FROM INTERRUPT STACK P END @ 13,A15 P STR A14,A15 * P ST A15,PFA210 SAVE A1
0x2b7c18…2b7dac Dummy {f00=0x0149, f01=0x0000, f02=»
[…0x1…]
0x2b7f40…2b80d4 (3, 82) Opaque[0x194]
0x2b80d4…2b8268 # DirEnt {nam=»TPROC «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2140, f03=0x0000}
0x2b80d4…2b8268 IdxSect {
0x2b80d4…2b8268 f00 = 0x010a // 0x2b80d4 @0x0
0x2b80d4…2b8268 f01 = 0x0006 // 0x2b80d6 @0x2
0x2b80d4…2b8268 gno = [ // 0x2b80d8 @0x4
0x2b80d4…2b8268 [0x00]: C0x010a.0x0.0
0x2b80d4…2b8268 [0x01]: C0x010a.0x2.0
0x2b80d4…2b8268 [0x02]: C0x010a.0x3.0
0x2b80d4…2b8268 ]
0x2b80d4…2b8268 }
0x2b8268…2b83fc Dummy {f00=0x010a, f01=0x0190, f02=» 0 P IDENT TPROC REL 10.0 80-03-14 870105041000 P 8 P* @ P* J 6 P************************************************** T P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* TPROC = TOSS LKM PROCESSORS P* P* P*
0x2b83fc…2b8590 Dummy {f00=0x010a, f01=0x0190, f02=»AINS THE FOLLOWING | P* TOSS LKM PROCESSORS: P* : P* - TWAIT = WAIT D P* ` P* - TMWAIT = MULTIPLE WAIT j P* ( P* - TACTOT = ACTIVATE/RESTART TASK P* P EJECT TPROC P* P* P***********
0x2b8590…2b8724 Dummy {f00=0x010a, f01=0x0190, f02=»R l , P ENTRY TACTOT ACTIVATE/RESTART PROCESSOR P EJECT TPROC : P* P P* Z P************* d P* EXTERNALS * z P************* P* P* P EXTRN TDISP DISPATCHER , P EXTRN QTJOB QUEUE TASK FOR DISPATCHING *
0x2b8724…2b88b8 Dummy {f00=0x010a, f01=0x0190, f02=» EXTRN FNDDWT FIND DWT ADDRESS FROM FILE CODE 0 P EXTRN FNDTID FIND TTAB ADDRESS FROM TASK ID 6 P EXTRN TTB:SA TTAB SAVE AREA j P EXTRN DWTST DWT STATUS P EXTRN DWTTAB TTAB ADDRESS * P EXTRN DWTWAT WAIT/ACTIVATE INDICATOR P EJECT T
0x2b88b8…2b8a4c Dummy {f00=0x010a, f01=0x0190, f02=»************************************* P* . . P* A PROGRAM VERSION USING TOSS MMU PAGING 8 * P* IS OBTAINED BY SETTING MMUPAG EQU 1. j P* PMMUPAG EQU 1 P* P EJECT TPROC P* P* P******** P* WAIT *
0x2b8a4c…2b8be0 Dummy {f00=0x010a, f01=0x0190, f02=» 6 P* WANTS TO SYNCHRONIZE WITH A PARTICULAR EVENT. P* > * P* IT IS ENTERED FROM THE LKM HANDLER H & P* WITH THE FOLLOWING PARAMETERS: v P* P* A5 = TTAB ADDRESS P* A8 = ECB ADDRESS P* P* * PTWAIT CF A15,FND
0x2b8be0…2b8d74 (3, 83) Dummy {f00=0x010a, f01=0x018e, f02=»,A8 RETURN IF EVENT COMPLETED P XIF & P* 2 P IFT MMUPAG=1 < ( P ELR A1,A8 RETURN IF EVENT COMPLETED R P XIF ~ P* ( P RF(N) TP:QDI I/O ALREADY COMPLETED 0 P IM DWTWAT,A6 NO, SET WAIT INDICATOR IN DWT P* & PT:DISP ABL
0x2b8d74…2b8f08 Dummy {f00=0x010a, f01=0x0190, f02=» P* P* 8 P* THIS IS THE ACTIVATE/RESTART TASK LKM PROCESSOR. P* T 4 P* THIS MODULE IS ENTERED FROM THE LKM HANDLER ^ ( P* WHEN A TASK HAS TO BE ACTIVATED. P* 0 P* THE FOLLOWING PARAMETERS ARE SUPPLIED:- P* (
0x2b8f08…2b909c Dummy {f00=0x010a, f01=0x0190, f02=»NTIFICATION FOR TASK TO BE ACTIVATED P* , P* 6 PTACTOT EQU * @ $ P CF A15,FNDTID FIND TTAB ADDRESS T P ADK A2,0 SET CR | $ P RF(Z) TP:RQE TASK NOT IN SYSTEM 4 P CF A15,QTJOB QUEUE CALLING TASK FOR DISPATCHING * P LD A3,TTB:SA+6,A5 G
0x2b909c…2b9230 Dummy {f00=0x010a, f01=0x0190, f02=»ASK AND DISPATCH z P* P EJECT TPROC " P* 8 P* B P********** L P* TMWAIT * ^ P********** p P* P* 0 P* THIS IS THE MULTIPLE WAIT LKM PROCESSOR. P* * P* IT IS ENTERED FROM THE LKM HANDLER & P* WI
0x2b9230…2b93c4 Dummy {f00=0x010a, f01=0x0190, f02=»E SPECIFIED EVENTS IS COMPLETED, ~ 6 P* RETURN IS MADE TO THE CALLING TASK VIA TENDIO ( & P* WITH THE FOLLOWING PARAMETERS: b P* , P* A8 = ECB ADDRESS OF COMPLETED EVENT P* > P* IF REQUEST ERROR, A7 := -1 (AND NO RETURN VIA TENDIO
0x2b93c4…2b9558 Dummy {f00=0x010a, f01=0x0190, f02=» TPROC P* P* $ PTMWAIT EQU * MULTIPLE WAIT ENTRY " P LDK A3,0 J P* P IFT MMUPAG=0 f * P LDR* A1,A7 GET NO OF ECB:S IN ECBBLK | P XIF P* P IFT MMUPAG=1 ( P ELR A1,A7 GET NO OF ECB:S IN ECBBLK P XIF
0x2b9558…2b96ec Dummy {f00=0x010a, f01=0x0190, f02=» b P* P IFT MMUPAG=0 P LDR* A8,A7 GET ECB ADDRESS ( & P LDR* A2,A8 GET FIRST WORD OF ECB L P XIF v P* P IFT MMUPAG=1 P ELR A8,A7 GET ECB ADDRESS $ P ELR A2,A8 GET FIRST WORD OF ECB P XIF P* ( P RF(N)
0x2b96ec…2b9880 Dummy {f00=0x010a, f01=0x0190, f02=»NOT FOUND P* P EJECT TPROC P* 2 P* < " P LD A2,DWTST,A6 GET DWT STATUS F P RF(N) TP:RQE NOT BUSY l P CW A5,DWTTAB,A6 2 P RF(NE) TP:RQE REQUEST NOT ISSUED BY THIS TASK 0 P LD A2,DWTWAT,A6 GET WAIT/ACTIVATE INDICATOR
0x2b9880…2b9a14 (3, 84) Dummy {f00=0x010a, f01=0x018e, f02=»F(NZ) TMW:20 NOT THE FIRST ECB IN ECBBLK & P LDR A9,A6 SAVE FIRST DWT ADDRESS 0 P LDR A3,A6 Z P* l PTMW:20 EQU * v 8 P ST A6,DWTWAT,A9 CHAIN THIS DWT WITH THE ONE BEFORE $ P LDR A9,A6 SAVE THIS DWT ADDRESS P SUK A1,1 & P RB(P) T
0x2b9a14…2b9ba8 Dummy {f00=0x010a, f01=0x0190, f02=» PTMW:30 EQU * 4 P ST A8,TTB:SA+16,A5 UPDATE A8 IN TTAB SAVE AREA 2 P ADK A3,0 CHECK FLAG IF FIRST ECB TO WAIT FOR T & P RF(Z) TP:QDI FIRST ECB IN ECBBLK P* : PTMW:40 ADKL A3,DWTWAT POINT TO WAIT/ACTIVATE INDICATOR $ P LDR* A2,A3
0x2b9ba8…2b9d3c Dummy {f00=0x010a, f01=0x40e6, f02=»* P EJECT TPROC P* P* * PTP:RQE EQU * 4 " P ABL LKMRQE LKM REQUEST ERROR H P* n PTP:QDI EQU * x ( P ABL LKMQDI QUEUE TASK AND DISPATCH P* P* P* P END @ VATE INDICATOR $ P LDR* A2,A3
0x2b9d3c…2b9ed0 Dummy {f00=0x010a, f01=0x2008, f02=» TERMINAL NOT IN SYSTEM 8 P CF A15,QTJOB QUEUE CALLING TERMINAL FOR DISPATCHING ( P LDR A5,A2 d P LDR A2,A4 v 0 P RB(Z) TPQUE RESTART: QUEUE FOR DISPATCHING P CF A15,ACTOT ACTIVATION P RB TPDIS GO TO DISPACHER P EJECT
0x2b9ed0…2ba064 Dummy {f00=0x010a, f01=0x0190, f02=»TOTYPE NAME 8 PUPNUMB EQU 7 SAVE AREA NUMBER OF COPIES (SHADOW-TBL) P* P . PUR:REC EQU 6 RECORD LENGTH IN REAL U:BTAB Z * PURADDR EQU 2 ADDRESS TO FIRST REAL UWB PURNUMB EQU 4 NUMBER OF UWB'S PURLENG EQU 6 LENGTH OF UWB P EJECT
0x2ba064…2ba1f8 Dummy {f00=0x010a, f01=0x0190, f02=»***************** P P* TASK DEFINITION BLOCK: & PTDBBT EQU 0 1A BLOCK TYPE F ( PTDBNT EQU TDBBT+1 2N NUMBER OF TASKS h , PTDBID EQU TDBNT+2 6A TASK ID START VALUE , PTDBMC EQU TDBID+6 6A MATCHING TASK CLASS $ PTDBTL EQU TDBMC+6 6A
0x2ba1f8…2ba38c Dummy {f00=0x010a, f01=0x0190, f02=»C EQU 7 TERMINAL DEVICE CLASS PTLC EQU 6 LINE CONNECTION & ( PTDBREC EQU TDC+TLC TDB-RECORD LENGTH H P* t * PSDC EQU 7 SPECIAL DEVICE CLASS-RECORD ~ P* P* COMMON DEVICE DEF. BLOCK: PCDBBT EQU 0 1A BLOCK TYPE 6 PCDBNC EQU CD
0x2ba38c…2ba520 Dummy {f00=0x010a, f01=0x0190, f02=». BLOCK v PUDBBT EQU 0 1A BLOCK TYPE , PUDBNU EQU UDBBT+1 3A NUMBER OF UWB TYPES 2 P* b ( PUDBFST EQU UDBNU+3 FIRST UDB-RECORD l PNAMUWB EQU 3 NAME OF UWB " PNUMUBL EQU 3 NUMBER OF BLOCKS . PUDBREC EQU NAMUWB+NUMUBL UDB RECORD-LENGTH
0x2ba520…2ba6b4 (3, 85) Opaque[0x194]
0x2ba6b4…2ba848 # DirEnt {nam=»MSUBS «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2108, f03=0x0000}
0x2ba6b4…2ba848 IdxSect {
0x2ba6b4…2ba848 f00 = 0x0108 // 0x2ba6b4 @0x0
0x2ba6b4…2ba848 f01 = 0x000e // 0x2ba6b6 @0x2
0x2ba6b4…2ba848 gno = [ // 0x2ba6b8 @0x4
0x2ba6b4…2ba848 [0x00]: C0x0108.0x1.0
0x2ba6b4…2ba848 [0x01]: C0x0108.0x3.0
0x2ba6b4…2ba848 [0x02]: C0x0109.0x0.0
0x2ba6b4…2ba848 [0x03]: C0x0109.0x1.0
0x2ba6b4…2ba848 [0x04]: C0x012a.0x1.0
0x2ba6b4…2ba848 [0x05]: C0x012a.0x3.0
0x2ba6b4…2ba848 [0x06]: C0x012b.0x0.0
0x2ba6b4…2ba848 ]
0x2ba6b4…2ba848 }
0x2ba848…2ba9dc Dummy {f00=0x0108, f01=0x0190, f02=» 0 P IDENT MSUBS REL 10.0 80-03-14 870105041000 P 8 P* @ P* J 6 P************************************************** T P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* MSUBS = MONITOR SUBROUTINES P* P* P*
0x2ba9dc…2bab70 Dummy {f00=0x0108, f01=0x0190, f02=»OLLOWING MONITOR r P* SUBROUTINES: P* 0 , P* -SAVE8 SAVE 8 REGISTERS ON STACK : , P* -QTJOB QUEUE TASK FOR DISPATCHING j 4 P* -QMJOB QUEUE MONITOR JOB FOR DISPATCHING . P* -ACTOT ACTIVATE TASK ON FIFO BASIS . P*
0x2bab70…2bad04 Dummy {f00=0x0108, f01=0x0190, f02=»K SET A MONITOR BLOCK FREE " P* -FNDDWT FIND DWT ADDRESS $ * P* -FNDTID FIND TASK IDENTIFICATION J P* -PFINIT RESTART DEVICE x $ P* -SWL48 SWITCH TO LEVEL 48 $ P* -SWLXY SWITCH TO LEVEL XY P* -HALT HALT MODULE
0x2bad04…2bae98 Dummy {f00=0x0108, f01=0x0190, f02=»******* P* P* " P ENTRY SAVE8 SAVE 8 REGISTERS $ P ENTRY QTJOB QUEUE TASK J " P ENTRY QMJOB QUEUE MONITOR JOB j & P ENTRY ACTOT ACTIVATE TASK (FIFO) & P ENTRY ACTOTP ACTIVATE TASK (LIFO) P ENTRY EXIT PROGRAM EXIT P ENT
0x2bae98…2bb02c Dummy {f00=0x0108, f01=0x0190, f02=»D FIND TASK INDENTIFICATION P ENTRY PFINIT RESTART DEVICE $ $ P ENTRY SWL48 SWITCH TO LEVEL 48 H $ P ENTRY SWLXY SWITCH TO LEVEL XY p , P ENTRY ILLINT ILLEGAL INTERRUPT ROUTINE * P ENTRY INTSAV SAVE AREA LAST INTERRUPT P ENTRY HALT HALT M
0x2bb02c…2bb1c0 Dummy {f00=0x0108, f01=0x0190, f02=»RY IHRET2 A2 " P ENTRY IHRET1 A1 2 P ENTRY IHRTN RETURN WITHOUT ENABLE INTERRUPTS : P EJECT MSUBS p P* P* P************* P* EXTERNALS * P************* P* P* : P EXTRN DISQUE POINTER TO
0x2bb1c0…2bb354 (3, 86) Dummy {f00=0x0108, f01=0x0190, f02=»RN PQEMTY PAGE QUEUE EMPTY FLAG " P EXTRN PAGQUE FREE PAGE QUEUE ( $ P EXTRN SEG:PB PAGE BLOCK ADDRESS N & P EXTRN PAG:QB QUEUE LINK BACKWARD v 4 P EXTRN LKMERR HALT SYSTEM DUE TO FATAL LKM ERROR & P EXTRN TTMJOB TTAB ADDRESS OF MJOB ( P EXTRN
0x2bb354…2bb4e8 Dummy {f00=0x0108, f01=0x0190, f02=»RN TTB:SA SAVE AREA * P EXTRN TTB:PP POINTER TO PENDING QUEUE ( P EXTRN TTB:TD TERMINAL DEVICE TABLE J $ P EXTRN SCTTCT TASK CONTROL TABLE v & P EXTRN SCTCDT COMMON DEVICE TABLE 2 P EXTRN PFTAB TABLE OF DEVICES TO BE RESTARTED P EJECT M
0x2bb4e8…2bb67c Dummy {f00=0x0108, f01=0x0190, f02=»************************************* P* . . P* A PROGRAM VERSION USING TOSS MMU PAGING 8 * P* IS OBTAINED BY SETTING MMUPAG EQU 1. j P* PMMUPAG EQU 1 P* P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SE
0x2bb67c…2bb810 Dummy {f00=0x0108, f01=0x0190, f02=»NG h * &* IS OBTAINED BY SETTING DSKPAG EQU 1. * 8 PDSKPAG EQU 0 B * V P* ` " PSOP EQU /2E SOP DEVICE ADDRESS j P* P EJECT MSUBS P* P* P* S A V E 8 P* 0 P* SUBROUTINE TO SAVE 8 REGISTERS O
0x2bb810…2bb9a4 Dummy {f00=0x0108, f01=0x0190, f02=»A15 P STR A4,A15 P STR A5,A15 P STR A6,A15 4 P STR A7,A15 H P STR A8,A15 , P LD A3,16,A15 LOAD P.C. (RETURN ADDRESS) p , P ST A3,SAVE81 AND MODIFY BRANCH ADDRESS P ST A2,14,A15 P ST A1,16,A15 P LD A3,12,A1
0x2bb9a4…2bbb38 Dummy {f00=0x0108, f01=0x0190, f02=»* Q T J O B P* 2 P* SUBROUTINE TO QUEUE TASK FOR DISPATCHING. P* V P* ENTRY PARAMETER: ` P* | 2 P* A5 = TTAB ADDRESS OF PROGRAM TO BE QUEUED. P* 8 P* THE REQUESTED JOB IS PUT IN DISPATCHER QUEUE ON 8 P* PR
0x2bbb38…2bbccc Dummy {f00=0x0108, f01=0x0190, f02=»* P IFT CPU852=1 $ P STR A1,A15 SAVE A1-A3 ON STACK P STR A2,A15 H P STR A3,A15 P XIF p P* | P IFT CPU852=0 " P MSR 3,A15 SAVE A1-A3 ON STACK P XIF P* . P LDKL A1,DISQUE LOAD QUEUE ANCHOR ADDRESS 2
0x2bbccc…2bbe60 Dummy {f00=0x0108, f01=0x018e, f02=»* P EJECT MSUBS P* P* * 6 PQTJ010 CC A3,TTB:ST+1,A2 COMPARE WITH QUEUED LEVEL 4 P RF(L) QTJ020 INSERT n P LDR A1,A2 SAVE ADDRESS . P LDR* A2,A1 GET NEXT TTAB ADDRESS IN QUEUE $ P RB(NZ) QTJ010 NOT END OF QUEUE P*
0x2bbe60…2bbff4 (3, 87) Dummy {f00=0x0109, f01=0x0190, f02=» P IFT CPU852=0 * P MLR 3,A15 RESTORE A1-A3 FROM STACK... P RTN A15 ...AND RETURN L P XIF j P* v P EJECT MSUBS P* P* P* Q M J O B P* 6 P* SUBROUTINE TO QUEUE MONITOR JOBS ON LEVEL 49. P*
0x2bbff4…2bc188 Dummy {f00=0x0109, f01=0x0190, f02=»B ADDRESS OF MONITOR JOBS AND THE | < P* SUBROUTINE 'ACTOT' IS USED TO ACTIVATE AND QUEUE THE * P* JOB. j P* z P* PQMJOB EQU * P IFT CPU852=1 & P CF A15,SAVE8 SAVE A1-A8 ON STACK P XIF P* P IFT CPU852=0
0x2bc188…2bc31c Dummy {f00=0x0109, f01=0x0190, f02=»* P EJECT MSUBS P* P* * P* A C T O T , A C T O T P 4 P* X & P* SUBROUTINE TO ACTIVATE A TASK. b P* P* ENTRY PARAMETERS: P* P* A1 = PARAMETER 1 P* A2 = DISPATCH ADDRESS P* A3 = SEG
0x2bc31c…2bc4b0 Dummy {f00=0x0109, f01=0x0190, f02=»GRAM IS ` : P* PUT IN DISPATCHER QUEUE VIA SUBROUTINE 'QTJOB'. @ P* - IF PROGRAM IS ACTIVE, THE REQUEST IS PUT IN A PENDING N P* QUEUE. @ P* - ACTOT WILL PUT REQUEST IN PENDING QUEUE ON FIFO BASIS. B P* - ACTOTP WILL PUT REQUEST
0x2bc4b0…2bc644 Dummy {f00=0x0109, f01=0x0190, f02=» n P XIF P* P IFT CPU852=0 P INH 4 " P MSR 8,A15 SAVE A1-A8 ON STACK @ P XIF f P* r P LDK A6,1 INDICATE LIFO | P RF ACT03 P* P EJECT MSUBS P* P* PACTOT EQU * P IFT CPU852=1
0x2bc644…2bc7d8 Dummy {f00=0x0109, f01=0x0190, f02=» P XIF P* PACT01 LDK A6,0 INDICATE FIFO P* > PACT03 EQU * H 0 P LD A7,TTB:SA,A5 GET (OLD) DISPATCH ADDRESS $ P RF(NZ) ACT020 IS PROGRAM ACTIVE " P ST A1,TTB:SA+2,A5 PARAMETER 1 0 P ST A2,TTB:SA,A5 SAVE (NEW) DISPATCH ADDRE
0x2bc7d8…2bc96c Dummy {f00=0x0109, f01=0x0190, f02=»,TTB:SA+4,A5 TO A2 IN SAVE AREA P* ( P IFF MMUPAG+DSKPAG=0 2 6 P CM TTB:SB,A5 INDICATE NOT RUNNING IN ANY SEGMENT N P XIF P* P CF A15,QTJOB QUEUE THE JOB P* P EJECT MSUBS P* P* PACT010 EQU *
0x2bc96c…2bcb00 Dummy {f00=0x0109, f01=0x0190, f02=» FROM STACK... x P RTN A15 ...AND RETURN P XIF 4 P* @ $ P* PUT REQUEST IN PENDING QUEUE J P* r & PACT020 LDR A7,A4 SAVE PARAMETER 2 | $ P CF A15,GETBLK GET A FREE BLOCK P LDR A1,A7 PARAMETER 2 P LDR A2,A4 P CF A15,GE
0x2bcb00…2bcc94 (3, 88) Dummy {f00=0x0109, f01=0x018e, f02=»0 SET CR & P RF(NZ) ACT040 QUEUE ON LIFO BASIS P ADK A5,0 SET CR : $ P RB(NZ) ACT030 NOT END OF QUEUE R P* z PACT040 EQU * " P STR A4,A3 SET BLOCK IN QUEUE P STR A5,A4 P RB ACT010 P* P EJECT MSUBS P*
0x2bcc94…2bce28 Dummy {f00=0x0109, f01=0x0190, f02=» P* ENTRY PARAMETER: P* $ P* A5 = TTAB ADDRESS . P* L P* A3-A4, A7 ARE DESTROYED V P* z P* PEXIT EQU * ( P CM TTB:SA,A5 RESET PROGRAM COUNTER 0 P LD A4,TTB:PP,A5 GET PENDING PROGRAM POINTER $ P RF(Z) I
0x2bce28…2bcfbc Dummy {f00=0x0109, f01=0x0190, f02=»ELEASE BLOCK AND GET PARAMETERS P LDR A7,A1 SAVE PARAMETER 2 ( P LDR A4,A2 L P CF A15,FREBLK ^ P LDR A4,A7 PARAMETER 2 t P RB ACTOT ACTIVATE TASK P* P EJECT MSUBS P* P* P* G E T B L K P* 4 P
0x2bcfbc…2bd150 Dummy {f00=0x0109, f01=0x0190, f02=» P* P* EXIT PARAMETER: P* * ( P* A4 = ADDRESS TO FOUND FREE BLOCK 4 P* ` P* j PGETBLK EQU * t P INH P STR A5,A15 SAVE A5 0 P LD A4,FREQUE GET FIRST BLOCK IN FREE QUEUE P RF(NZ) GBL010 P LDK A1,/B HAL
0x2bd150…2bd2e4 Dummy {f00=0x0109, f01=0x0190, f02=»FREE QUEUE p $ P STR A3,A4 STORE A3-A1 IN BLOCK P ST A2,2,A4 : P ST A1,4,A4 N P LDR* A5,A15 RESTORE A5 b P* P IFT CPU852=1 P RF IHRTN P XIF P* P IFT CPU852=0 P RTN A15 P XIF P* P E
0x2bd2e4…2bd478 Dummy {f00=0x0109, f01=0x018e, f02=»* AND SET THIS BLOCK FREE. P* $ P* ENTRY PARAMETER: . P* J P* A4 = BLOCK ADDRESS T P* r P* EXIT PARAMETERS: | P* & P* A3 = FIRST PARAMETER IN BLOCK $ P* A2 = SECOND " " $ P* A1 = THIRD "
0x2bd478…2bd60c Dummy {f00=0x0109, f01=0x0190, f02=» P ST A4,FREQUE SET BLOCK FREE P LD A2,2,A4 , P LD A1,4,A4 @ P* T P IFT CPU852=1 ^ P RF IHRTN t P XIF P* P IFT CPU852=0 P RTN A15 P XIF P* P EJECT MSUBS P* P* P* F
0x2bd60c…2bd7a0 Dummy {f00=0x0109, f01=0x0190, f02=»S | 8 P* A7 = ORDER CODE WHEN CALLED FROM DATA MANAGEMENT P* A8 = ECB ADDRESS F P* b P* EXIT PARAMETERS: l P* P* A2 = DWT INDEX * P* A6 = DWT ADDRESS IF FOUND, ELSE 0 P* P* P* F N D D W D P*
0x2bd7a0…2bd934 (3, 89) Dummy {f00=0x012a, f01=0x0190, f02=»JECT MSUBS P* P* PFNDDWT EQU * ( P IFT MMUPAG=1 < & P ELR A2,A8 LOAD FILE CODE FROM ECB R P XIF | P* P IFT MMUPAG=0 ( P LDR* A2,A8 LOAD FILE CODE FROM ECB P XIF P* P STR A1,A15 SAVE A1 P L
0x2bd934…2bdac8 Dummy {f00=0x012a, f01=0x0190, f02=»UK A1,4 ( P RF(N) FND110 FILE CODE NOT IN TTAB & P CC A2,1,A6 SEARCH IN DEVICE TABLE < " P RF(E) FND200 FILE CODE FOUND f ( P ADK A6,4 ADDRESS TO NEXT FILE CODE P RB FND100 TRY NEXT P* P EJECT MSUBS P* $ P* SEARCH I
0x2bdac8…2bdc5c Dummy {f00=0x012a, f01=0x0190, f02=» P LDR* A1,A6 CDTAB LENGTH $ P ADK A6,2 POINTER TO FIRST ENTRY $ P* L PFND120 SUK A1,4 V & P RF(N) FND130 FILE CODE NOT FOUND n P CC A2,1,A6 " P RF(E) FND200 FILE CODE FOUND ( P ADK A6,4 ADDRESS TO NEXT FILE CODE & P RB FND120
0x2bdc5c…2bddf0 Dummy {f00=0x012a, f01=0x0190, f02=»DEX z P LD A6,2,A6 LOAD DWT ADDRESS ! P RF IHRET1 ! 0 P* ! B P EJECT MSUBS ! L P* ! b P* ! l P* F N D T I D ! v P* ! B P* SUBROUTINE TO FIND TTAB ADDRESS FROM TASK IDENTIFICATION. ! P* ! P* ENTRY PARAMETER: ! P* !
0x2bddf0…2bdf84 Dummy {f00=0x012a, f01=0x0190, f02=»ATES ILLEGAL IDENTIFICATION ! P* " $ P* " . PFNDTID STR A1,A15 SAVE A1 " 8 P LD* A1,SCTTCT TCTAB LENGTH " Z P AD A1,SCTTCT " ~ P* " PFTI010 SUK A1,2 " P CW A1,SCTTCT " $ P RF(E) FTI030 ALL TTABS EXAMINED " P LDR* A2,A1 TTAB ADD
0x2bdf84…2be118 Dummy {f00=0x012a, f01=0x0190, f02=»0 ILLEGAL IDENTIFICATION " P RF IHRET1 # P* # 2 P EJECT MSUBS # < P* # R P* # , P* RESTORE REGISTERS AND RETURN WITHOUT # f P* ENABLE INTERRUPTS. # P* # P* # P IFT CPU852=1 # PIHRET8 LDR* A8,A15 # P LDR* A7,A15 #
0x2be118…2be2ac Dummy {f00=0x012a, f01=0x0190, f02=»* # PIHRET1 LDR* A1,A15 $ P* $ $ PIHRTN INH $ . $ P ADKL A15,4 ADJUST STACK POINTER $ @ P ABR* A15 AND RETURN $ h P XIF $ P* $ P IFT CPU852=0 $ 0 PIHRET8 MLR 8,A15 RESTORE A1-A8 FROM STACK... $ P RTN A15 ...AND RETURN $ P* $
0x2be2ac…2be440 Dummy {f00=0x012a, f01=0x0190, f02=»... $ h P* % PIHRTN RTN A15 ...AND RETURN % P XIF % : P* % F P EJECT MSUBS % P P* % f P* % p P* P F I N I T % z P* % & P* SUBROUTINE TO RESTART DEVICES. % P* % @ P* ALL RESTART ROUTINES GIVEN IN TABLE 'PFTAB' ARE CALL
0x2be440…2be5d4 (3, 90) Dummy {f00=0x012a, f01=0x0190, f02=»DEX TO FIRST ROUTINE % P* & $ PPFI100 CW A1,PFTAB CHECK IF LAST & & P RF(NL) PFI110 ALL RESTARTED & N P STR A1,A15 SAVE A1 & r P INH & * P CFI A15,PFTAB,A1 CALL RESTART MODULE & P LDR* A1,A15 RESTORE A1 & P ADK A1,2 NEXT DEVICE & P R
0x2be5d4…2be768 Dummy {f00=0x012a, f01=0x0190, f02=»8 & P* ' & P* SWITCH TO LEVEL 48 AND ENABLE. ' P* ' > P* ' H PSWL48 EQU * ' R P STR A1,A15 SAVE A1 ' f P* ' PSWL481 EQU * ' $ P LDKL A1,/C0C0 PSW FOR LEVEL 48 ' P* ' PSWL482 EQU * ' & P ST A1,4,A15 SAVE IT ON A15 STACK
0x2be768…2be8fc Dummy {f00=0x012a, f01=0x018e, f02=» & P* SWITCH TO LEVEL XY AND ENABLE. ( P* ( . . P* LEVEL := 48 IF LEVEL ON STACK IS >= 48 ( 8 0 P* LEVEL := XY " " " " " XY < 48 ( j P* ( > P* THIS MODULE IS TO BE CALLED WITH 8 REGISTERS ON STACK. ( P* ( P* ( PSWLXY EQU
0x2be8fc…2bea90 Dummy {f00=0x012a, f01=0x0190, f02=» ( P LD A1,24,A15 ) " P ANKL A1,/FFFE SYSTEM MODE BIT ) P RB SWL482 ) D P* ) V P EJECT MSUBS ) ` P* ) v P* ) & P* INTERRUPT SAVE AND HALT MODULE ) P* ) P* ) PINTSAV DATA 0 ) PSAVA15 DATA 0 ) P* ) " PILLINT LDK
0x2bea90…2bec24 Dummy {f00=0x012a, f01=0x0190, f02=» $ P STR A9,A15 SAVE A9-A14 ON STACK * P STR A10,A15 * , P STR A11,A15 * @ P STR A12,A15 * T P STR A13,A15 * h P STR A14,A15 * | P XIF * P* * P IFT CPU852=0 * $ P MSR 14,A15 SAVE A1-A14 ON STACK * P XIF * P* * P ST A15,SAVA15
0x2bec24…2bedb8 Dummy {f00=0x012a, f01=0x0190, f02=» P* + < P* RELEASE PAGE AND RESTART LDTASK IF PAGQUE WAS EMPTY + P* + N P* ENTRY PARAMETERS: + X P* + v 6 P* A3 = SEGBLK ADDRESS (PAGBLK ADDRESS IF RELPA2) + " P* A5 = TTAB ADDRESS (RELPA2) + P* + P* EXIT PARAMETER: + P*
0x2bedb8…2bef4c Dummy {f00=0x012a, f01=0x0190, f02=»ANY SEGMENT + j P RF REL:10 , P* , & ( PRELPAG EQU * RELEASE PAGE MAIN ENTRY , 0 , P LD A3,SEG:PB,A3 GET PAGE BLOCK ADDRESS , P* , PREL:10 EQU * , & P LDKL A4,PAGQUE GET PAGQUE ADDRESS , P ST A4,PAG:QB,A3 , 4 P LDR* A4,A4 GET ADDRESS OF F
0x2bef4c…2bf0e0 Dummy {f00=0x012a, f01=0x0190, f02=»DTASK IS IN PAUSE STATE , x P RF(Z) REL:20 - P* - 6 P EJECT MSUBS - @ P* - V P* RESTART LOAD TASK - ` P* - ~ , P CM PQEMTY INDICATE PAGE QUEUE NOT EMPTY - P LDR A4,A5 SAVE A5 - , P LDKL A5,TTABLD GET LDTASK TTAB ADDRESS - $ P CF A1
0x2bf0e0…2bf274 (3, 91) Dummy {f00=0x012b, f01=0x412a, f02=»IF - P* . P IFT DSKPAG=1 . P IFT CPU852=0 . * P RTN A15 . @ P XIF . P P* . P IFT DSKPAG=0 . f 2 PRELPAG EQU * DUMMY ENTRIES TO AVOID ASS. ERR. . | PRELPA2 EQU * . & P ABL LKMERR INDICATE SYSGEN ERROR . P XIF . P* . P*
0x2bf274…2bf408 Dummy {f00=0x012b, f01=0x2008, f02=» / 5 STACK " ~ P LDR* A1,A15 RESTORE A1 # P RTN A15 RETURN TO CALLER # 8 P* # Z P END # d@ # pN WHEN ALL STARTED " ` P EJECT " P* " P* " P* S W L 4 8 " P* " : P* SUBROUTINE TO SWITCH PROGRAM PRIORITY LEVEL TO 48. "
0x2bf408…2bf59c Dummy {f00=0x012b, f01=0x0000, f02=»
[…0x5…]
0x2bfd80…2bff14 (3, 92) Opaque[0x194]
0x2bff14…2c00a8 # DirEnt {nam=»TTMJOB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2130, f03=0x0000}
0x2bff14…2c00a8 IdxSect {
0x2bff14…2c00a8 f00 = 0x0109 // 0x2bff14 @0x0
0x2bff14…2c00a8 f01 = 0x0004 // 0x2bff16 @0x2
0x2bff14…2c00a8 gno = [ // 0x2bff18 @0x4
0x2bff14…2c00a8 [0x00]: C0x0109.0x2.0
0x2bff14…2c00a8 [0x01]: C0x0109.0x3.0
0x2bff14…2c00a8 ]
0x2bff14…2c00a8 }
0x2c00a8…2c023c Dummy {f00=0x0109, f01=0x0190, f02=» 2 P IDENT TTMJOB REL 10.0 80-03-14 870105041000 P : P* B P* L P* MONITOR JOB TASK TABLE V P* v P* P********* P*ENTRIES* P********* P* P* P ENTRY TTB:AM ALLOCATION MAP P ENTRY TTB:MT MM
0x2c023c…2c03d0 Dummy {f00=0x0109, f01=0x0190, f02=»S n P ENTRY TTMJOB TABLE ENTRY ( P ENTRY TTB:QL DISPATCHER QUEUE LINK , & P ENTRY TTB:ID TASK IDENTIFICATION X P ENTRY TTB:ST TASK STATUS " P ENTRY TTB:PP PENDING POINTER & P ENTRY TTB:PW PROGRAM STATUS WORD $ P ENTRY TTB:SA TERMIN
0x2c03d0…2c0564 Dummy {f00=0x0109, f01=0x0190, f02=»***************** x P* P* CONDITIONAL ASSEMBLY $ P* B . P***************************************** L P* ~ . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* PMMUPAG EQU 1 P*
0x2c0564…2c06f8 Dummy {f00=0x0109, f01=0x0190, f02=» TABLE DISPLACEMENT ~ P IFT MMUPAG=1 " P DATA /0000,/0400,/0800,/0C00 2 " P DATA /1000,/1400,/1800,/1C00 X " P DATA /2000,/2400,/2800,/2C00 ~ " P DATA /3000,/3400,/3800,/3C00 P XIF P* & PTTB:CB EQU -6 CURRENT SEGMENT BASE
0x2c06f8…2c088c Dummy {f00=0x0109, f01=0x0190, f02=»K ADDRESS DISPLACEMENT v P DATA 0 P* . P EJECT TTMJOB 8 P* P P* Z PTTMJOB EQU * TTMJOB ENTRY d . PTTB:QL EQU *-TTMJOB DISPATCHER QUEUE LINK P DATA 0 P* , PTTB:ID EQU *-TTMJOB TASK IDENTIFICATION P DATA
0x2c088c…2c0a20 Dummy {f00=0x0109, f01=0x0190, f02=»A 0 P* PTTB:PW EQU *-TTMJOB 4 P DATA /C4C0 PROGRAM STATUS WORD FOR MONITOR JOB 2 P* j P EJECT TTMJOB t P* P* * PTTB:SA EQU *-TTMJOB TERMINAL SAVE AREA P DATA 0 DISPATCH ADDRESS 2 P DATA 0,0,0,0,0,0,0 SAVE A
0x2c0a20…2c0bb4 (3, 93) Dummy {f00=0x0109, f01=0x4014, f02=» P END @
0x2c0bb4…2c0d48 Dummy {f00=0x0109, f01=0x2008, f02=» TMJOB TERMINAL STATUS P DATA 48 * 0 PTTABID EQU *-TTMJOB TERMINAL IDENTIFICATION : P DATA /8000 n PTTABPP EQU *-TTMJOB P DATA 0 * PTTABSA EQU *-TTMJOB TERMINAL SAVE AREA P DATA 0 & P DATA 0,0,0,0,0,0,0,0,0,0,0,
0x2c0d48…2c0edc Dummy {f00=0x0109, f01=0x0190, f02=»************************************* P* . . P* A PROGRAM VERSION USING TOSS MMU PAGING 8 * P* IS OBTAINED BY SETTING MMUPAG EQU 1. j P* PMMUPAG EQU 0 P* P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SE
0x2c0edc…2c1070 Dummy {f00=0x0109, f01=0x0190, f02=»NG h * &* IS OBTAINED BY SETTING DSKPAG EQU 1. * 8 PDSKPAG EQU 0 B * V P* ` " PSOP EQU /2E SOP DEVICE ADDRESS j P* P EJECT MSUBS P* P* P* S A V E 8 P* 0 P* SUBROUTINE TO SAVE 8 REGISTERS O
0x2c1070…2c1204 Dummy {f00=0x0109, f01=0x0190, f02=»A15 P STR A4,A15 P STR A5,A15 P STR A6,A15 4 P STR A7,A15 H P STR A8,A15 , P LD A3,16,A15 LOAD P.C. (RETURN ADDRESS) p , P ST A3,SAVE81 AND MODIFY BRANCH ADDRESS P ST A2,14,A15 P ST A1,16,A15 P LD A3,12,A1
0x2c1204…2c1398 Dummy {f00=0x0109, f01=0x0190, f02=»* Q T J O B P* 2 P* SUBROUTINE TO QUEUE TASK FOR DISPATCHING. P* V P* ENTRY PARAMETER: ` P* | 2 P* A5 = TTAB ADDRESS OF PROGRAM TO BE QUEUED. P* 8 P* THE REQUESTED JOB IS PUT IN DISPATCHER QUEUE ON 8 P* PR
0x2c1398…2c152c Dummy {f00=0x0109, f01=0x0190, f02=»* P IFT CPU852=1 $ P STR A1,A15 SAVE A1-A3 ON STACK P STR A2,A15 H P STR A3,A15 P XIF p P* | P IFT CPU852=0 " P MSR 3,A15 SAVE A1-A3 ON STACK P XIF P* . P LDKL A1,DISQUE LOAD QUEUE ANCHOR ADDRESS 2
0x2c152c…2c16c0 Dummy {f00=0x0109, f01=0x018e, f02=»* P EJECT MSUBS P* P* * 6 PQTJ010 CC A3,TTB:ST+1,A2 COMPARE WITH QUEUED LEVEL 4 P RF(L) QTJ020 INSERT n P LDR A1,A2 SAVE ADDRESS . P LDR* A2,A1 GET NEXT TTAB ADDRESS IN QUEUE $ P RB(NZ) QTJ010 NOT END OF QUEUE P*
0x2c16c0…2c1854 (3, 94) Opaque[0x194]
0x2c1854…2c19e8 # DirEnt {nam=»TOSSIO«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2328, f03=0x0000}
0x2c1854…2c19e8 IdxSect {
0x2c1854…2c19e8 f00 = 0x0119 // 0x2c1854 @0x0
0x2c1854…2c19e8 f01 = 0x0022 // 0x2c1856 @0x2
0x2c1854…2c19e8 gno = [ // 0x2c1858 @0x4
0x2c1854…2c19e8 [0x00]: C0x0119.0x1.0
0x2c1854…2c19e8 [0x01]: C0x0119.0x3.0
0x2c1854…2c19e8 [0x02]: C0x011a.0x0.0
0x2c1854…2c19e8 [0x03]: C0x011a.0x1.0
0x2c1854…2c19e8 [0x04]: C0x013e.0x2.0
0x2c1854…2c19e8 [0x05]: C0x013e.0x3.0
0x2c1854…2c19e8 [0x06]: C0x013f.0x0.0
0x2c1854…2c19e8 [0x07]: C0x013f.0x1.0
0x2c1854…2c19e8 [0x08]: C0x013f.0x2.0
0x2c1854…2c19e8 [0x09]: C0x013f.0x3.0
0x2c1854…2c19e8 [0x0a]: C0x0140.0x0.0
0x2c1854…2c19e8 [0x0b]: C0x0140.0x1.0
0x2c1854…2c19e8 [0x0c]: C0x0140.0x2.0
0x2c1854…2c19e8 [0x0d]: C0x0144.0x3.0
0x2c1854…2c19e8 [0x0e]: C0x0145.0x0.0
0x2c1854…2c19e8 [0x0f]: C0x0145.0x1.0
0x2c1854…2c19e8 [0x10]: C0x0146.0x0.0
0x2c1854…2c19e8 ]
0x2c1854…2c19e8 }
0x2c19e8…2c1b7c Dummy {f00=0x0119, f01=0x0190, f02=» 2 P IDENT TOSSIO REL 10.0 80-04-30 870105041000 P : P REL 10.0 80-03-15 POHO B $ P =1,RELEASE DC-BUFFER UPDATED d P* P* 6 P************************************************** P* $ P* PHILIPS TERMINAL SYSTEM PTS
0x2c1b7c…2c1d10 Dummy {f00=0x0119, f01=0x0190, f02=»** ` P* P* , P* THIS IS THE TOSS I/O LKM PROCESSOR. 6 P* IT CONTAINS THE FOLLOWING MONITOR SUBROUTINES: N P* P* -TIO INITIALIZE I/O P* P* -TENDIO END I/O P* P* -ATTACH ATTACH DEVICE P
0x2c1d10…2c1ea4 Dummy {f00=0x0119, f01=0x0190, f02=» DATA COMMUNICATION MOVE ROUTINE (WRITE) P* 0 4 P* SPECIAL ROUTINES ARE CARRIED OUT IN SYSTEMS : * P* WITH MEMORY MANAGEMENT UNIT (MMU). r P* 8 P* THIS MODULE ALSO CONTAINS STANDARD DISPLACEMENT * P* VALUES FOR ECB, DWT AND DAB AR
0x2c1ea4…2c2038 Dummy {f00=0x0119, f01=0x0190, f02=»* P ENTRY TIO I/O PROCESSOR 0 P ENTRY TIO:FM ENTRY USED BY FILE MANAGEMENT * 0 P ENTRY TIOERR ERROR: QUEUE TASK AND DISPATCH ^ P ENTRY TENDIO END I/O 0 P ENTRY QUEDEV QUEUE REQUEST IN DEVICE QUEUE 4 P ENTRY QUEFIL QUEUE FILE REQUEST IN
0x2c2038…2c21cc Dummy {f00=0x0119, f01=0x0190, f02=»ONMMU MONITOR (SYSTEM) MMU TABLE P* ( P ENTRY ECBFC FILE CODE 2 P ENTRY ECBBA BUFFER ADDRESS P " P ENTRY ECBRL REQUESTED LENGTH t " P ENTRY ECBEL EFFECTIVE LENGTH P ENTRY ECBRC RETURN CODE P ENTRY ECBCW CONTROL WORD P ENTRY
0x2c21cc…2c2360 Dummy {f00=0x0119, f01=0x0190, f02=» DM:DIX DEVICE INDEX DATA MANAGEMENT 2 P ENTRY PC:DIX DEVICE INDEX PROGRAMMED CHANNEL , 0 P ENTRY MX:DIX DEVICE INDEX MULTIPLEX CHANNEL b , P ENTRY KB:DIX DEVICE INDEX KEYBOARD/CTW 6 P ENTRY IT:DIX DEVICE INDEX INTERTASK COMMUNICATION $ P ENTRY D
0x2c2360…2c24f4 (3, 95) Dummy {f00=0x0119, f01=0x0190, f02=» ENTRY ACTADR ACTIVATION ADDRESS P ENTRY ABTADR ABORT ADDRESS ( $ P ENTRY INTADR INTERRUPT ADDRESS L 2 P ENTRY POLADR BUFFER POOL ADDRESS (DC DRIVERS) t 4 P ENTRY HDRLEN BUFFER HEADER LENGTH (DC DRIVERS) " P ENTRY RECADR RECOVERY ADDRESS P
0x2c24f4…2c2688 Dummy {f00=0x0119, f01=0x0190, f02=» ENTRY DWTECB ECB ADDRESS P ENTRY DWTOPT ORDER OPTION " P ENTRY DWTOR INDEX AND ORDER D ( P ENTRY DWTOCH LAST OUTPUT CHARACTER h & P ENTRY DWTADR DRIVER ADDRESS BLOCK P ENTRY DWTTAB TTAB ADDRESS * P ENTRY DWTWAT WAIT/ACTIVATE INDICATOR
0x2c2688…2c281c Dummy {f00=0x0119, f01=0x0190, f02=»U ECB ADDRESS P ENTRY DWTA2 SAVE AREA A2 P ENTRY DWTA3 SAVE AREA A3 8 P ENTRY DWTA4 SAVE AREA A4 Z P ENTRY DWTA5 SAVE AREA A5 | & P ENTRY DWTSB1 STACK BASE 1 IN DWT & P ENTRY DWTSB2 STACK BASE 2 IN DWT P ENTRY DWTTP TIMER POI
0x2c281c…2c29b0 Dummy {f00=0x0119, f01=0x0190, f02=»NTRY DWTNVL NEW VOLUME LOADED FLAGS " P ENTRY DWTVOL DISC VOLUME NAME , P* R P EJECT TOSSIO P* t P* ~ P************* P* EXTERNALS * P************* P* P* " P EXTRN SAVE8 SAVE 8 REGISTERS 0 P EXT
0x2c29b0…2c2b44 Dummy {f00=0x0119, f01=0x018e, f02=»(LIFO) p P EXTRN FNDDWT SEARCH DWT , P EXTRN QTJOB QUEUE TASK FOR DISPATCHING . P EXTRN TDISP DISPATCHER ^ 2 P EXTRN DISEND BRANCH TO DISPATCHER VIA TENDIO ~ * P EXTRN LKMQDI QUEUE TASK AND DISPATCH , P EXTRN GETBLK PUT BLOCK IN PENDING QUE
0x2c2b44…2c2cd8 Dummy {f00=0x0119, f01=0x0190, f02=» ( P EXTRN TTB:ST TASK STATUS AND LEVEL & P EXTRN TTB:PW PROGRAM STATUS WORD 0 P EXTRN TTB:SA SAVE AREA Z P EXTRN TTB:MT MMUTAB z P* P EJECT TOSSIO P* P* . P***************************************** P* P
0x2c2cd8…2c2e6c Dummy {f00=0x0119, f01=0x0190, f02=»AGING l * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* < PMMUPAG EQU 1 F P* Z P* d 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION n . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* PCPU852 EQU 0 P* P*
0x2c2e6c…2c3000 Dummy {f00=0x0119, f01=0x0190, f02=» EQU 1 P* P* 4 P* A PROGRAM VERSION SPECIALIZED FOR THE 857 CPU " * P* IS OBTAINED BY SETTING CPU857 EQU 1. Z P* PX:B EQU 0 PCPU857 EQU 1 P* P EJECT TOSSIO P* P* P*******************
0x2c3000…2c3194 (3, 96) Dummy {f00=0x011a, f01=0x0190, f02=» P* P********************* P* DWT DISPLACEMENTS * 0 P********************* N P* l 2 P* DEVICE WORK TABLE DISPLACEMENTS: FIXED PART v P* & PDWTCHP EQU /00 CHANNEL PARAMETERS PDWTST EQU /02 STATUS PDWTBC EQU /0
0x2c3194…2c3328 Dummy {f00=0x011a, f01=0x0190, f02=» EQU /06 LAST OUTPUT CHARACTER ( PDWTADR EQU /08 DRIVER ADDRESS BLOCK & PDWTTAB EQU /0A TTAB ADDRESS R * PDWTWAT EQU /0C WAIT/ACTIVATE INDICATOR v PDWTTQ EQU /0E TERMINAL QUEUE $ PDWTUEC EQU /10 USER ECB ADDRESS " PDWTMEC EQU /12 MMU ECB A
0x2c3328…2c34bc Dummy {f00=0x011a, f01=0x0190, f02=»1 4 PDWTDRD EQU DWTMEC+2 START OF DRIVER DEFINED PART P XIF B P* N P EJECT TOSSIO X P* p , P* DWT DISPLACEMENTS: DRIVER DEFINED PART z P* , PDWTOTQ EQU DWTDRD+/00 OUTPUT QUEUE LINK & PDWTA2 EQU DWTDRD+/02 SAVE AREA A2
0x2c34bc…2c3650 Dummy {f00=0x011a, f01=0x0190, f02=»B1 EQU DWTDRD+/0A STACK BASE 1 IN DWT . PDWTSB2 EQU DWTDRD+/0E STACK BASE 2 IN DWT . & PDWTTP EQU DWTDRD+/10 TIMER POINTER ` 4 PDWTORD EQU DWTDRD+/10 SAVE AREA INDEX AND ORDER 2 PDWTNVL EQU DWTDRD+/12 NEW VOLUME LOADED FLAGS * PDWTECH EQU DWTDR
0x2c3650…2c37e4 Dummy {f00=0x011a, f01=0x0190, f02=» TOSSIO P* P* P********************* & P* DAB DISPLACEMENTS * D P********************* b P* ( P* DRIVER ADDRESS BLOCK DISPLACEMENTS P* & PKEYLEN EQU -6 DWT KEYTABLE LENGTH $ PBUFLEN EQU -4 DWT BUFFER LENGT
0x2c37e4…2c3978 Dummy {f00=0x011a, f01=0x0190, f02=»RUPT ADDRESS ~ 2 PPOLADR EQU 4 BUFFER POOL ADDRESS (DC DRIVERS) 2 PHDRLEN EQU 6 BUFFER HEADER LENGTH (DC DRIVERS) J " PRECADR EQU 6 RECOVERY ADDRESS PECHADR EQU 8 ECHO ADDRESS P* P* P*********************** P* DEVICE IND
0x2c3978…2c3b0c Dummy {f00=0x011a, f01=0x0190, f02=»OUTINE P F P* FROM ADDRESS TABLES TIOTAB AND TENTAB AT READ/WRITE REQUESTS. P* X $ PDC:DIX EQU -2 DATA COMMUNICATION b PDM:DIX EQU 0 DATA MANAGEMENT $ PPC:DIX EQU 2 PROGRAMMED CHANNEL " PMX:DIX EQU 4 MULTIPLEX CHANNEL PKB:DIX EQU 6
0x2c3b0c…2c3ca0 Dummy {f00=0x011a, f01=0x0190, f02=»* P********************* P* ECB DISPLACEMENTS * ( P********************* F P* d ( P* EVENT CONTROL BLOCK DISPLACEMENTS n P* PECBFC EQU /01 FILE CODE PECBBA EQU /02 BUFFER ADDRESS " PECBRL EQU /04 REQUESTED LENGTH
0x2c3ca0…2c3e34 (3, 97) Dummy {f00=0x011a, f01=0x0190, f02=»ORD 1 x " PECBCW2 EQU /0C CONTROL WORD 2 P* 4 P EJECT TOSSIO > P* V P* ` P IFT MMUPAG=1 j P* P* P********** P* TIOTAB * P********** P* < P* TIOTAB CONTAINS ADDRESSES TO ROUTINES ENTERED FROM
0x2c3e34…2c3fc8 Dummy {f00=0x011a, f01=0x0190, f02=»CI PROGRAMMED CHANNEL, INPUT P DATA TIOMXI MUX, INPUT $ $ P DATA TIOKBI KEYBOARD/CTW, INPUT D 0 P DATA TIOITI INTERTASK COMMUNICATION, INPUT l P* PTINDEX EQU *-TIOTAB P DATA TIODKI DISC, INPUT , P DATA TIOPCO PROGRAMMED CHANNEL, O
0x2c3fc8…2c415c Dummy {f00=0x011a, f01=0x0190, f02=» P DATA TIODKO DISC, OUTPUT P* & P EJECT TOSSIO 0 P* H P* R P********** P* TENTAB * n P********** P* @ P* TENTAB CONTAINS ADDRESSES TO ROUTINES ENTERED FROM TENDIO P* 2 PTENTAB EQU * DEVICE TYPE/ROUTI
0x2c415c…2c42f0 Dummy {f00=0x011a, f01=0x0190, f02=», INPUT $ P DATA TENKBI KEYBOARD/CTW, INPUT 0 P DATA TENITI INTERTASK COMMUNICATION, INPUT 8 P DATA TENDKI DISC, INPUT l , P DATA TENPCO PROGRAMMED CHANNEL, OUTPUT P DATA TENMXO MUX, OUTPUT & P DATA TENKBO KEYBOARD/CTW, OUTPUT 0 P D
0x2c42f0…2c4484 Dummy {f00=0x011a, f01=0x018e, f02=» P* P********** P* MONMMU * P********** 2 P* D P* MONITOR (SYSTEM) MMU TABLE N P* r PMONMMU EQU * | P IFT MMUPAG=1 " P DATA /0000,/0400,/0800,/0C00 " P DATA /1000,/1400,/1800,/1C00 " P DATA /2000,/2400,/280
0x2c4484…2c4618 Dummy {f00=0x011a, f01=0x0190, f02=» P* 2 P* SUBROUTINES BELOW ARE USED BY ATTACH/DETACH P* H P* T I M O U T R P* h P* INPUT: A1 = DWT ADDRESS r . P* A2 = ADDRESS TO 2ND TIMER BLOCK P* P* OUTPUT: A4 = BLOCK ADDRESS P* A5 = TTAB
0x2c4618…2c47ac Dummy {f00=0x011a, f01=0x0190, f02=»MER POINTER ADDRESS P LD A5,2,A2 TTAB ADDRESS P CF A15,FNDBLK < P LDR* A1,A4 R " P STR A1,A2 REMOVE FROM ATT:CH f P CF A15,FREBLK P* P EJECT TOSSIO P* & P* REMOVE TTAB FROM DEVICE QUEUE P* P LDR A
0x2c47ac…2c4940 Dummy {f00=0x011a, f01=0x0190, f02=»IM:20 END OF QUEUE P CWR A1,A5 P RB(NE) TIM:10 NOT FOUND . P* N P EJECT TOSSIO X P* p & P* TTAB FOUND - REMOVE FROM QUEUE z P* P LDR* A1,A1 P STR A1,A2 P* PTIM:20 EQU * P LDK A3,4 . P ADS
0x2c4940…2c4ad4 (3, 98) Dummy {f00=0x013e, f01=0x0190, f02=» P* P IFT MMUPAG=0 * P ST A3,ECBRC,A8 INDICATE ERROR IN ECB $ P XIF R P* ^ P IFT ATTDET=1 h P IFT MMUPAG=1 ~ . P TL TTB:MT,A5 LOAD MMU REGISTERS FROM TTAB * P ES A3,ECBRC,A8 INDICATE ERROR IN ECB . P TL MONMMU LOAD MONI
0x2c4ad4…2c4c68 Dummy {f00=0x013e, f01=0x0190, f02=»OSSIO P* P* F N D B L K P* . ( P* SUBROUTINE TO FIND BLOCK IN ATT:CH 8 P* d P* INPUT: A5 = TTAB ADDRESS n P* 6 P* OUTPUT: A2 = ADDRESS TO PRECEDING BLOCK IN CHAIN 2 P* A4 = BLOCK ADDRESS IF FOUND, ELSE 0
0x2c4c68…2c4dfc Dummy {f00=0x013e, f01=0x0190, f02=»D OF ATT:CH P CW A5,4,A4 P RB(NE) FND:10 NOT FOUND ( P* H PFND:20 EQU * R P IFT CPU852=1 f P ABL IHRTN RETURN | P XIF P* P IFT ATTDET=1 P IFT CPU852=0 P RTN A15 RETURN P XIF P* P I
0x2c4dfc…2c4f90 Dummy {f00=0x013e, f01=0x0190, f02=»ATTACH * P********** ! P* ! " P* ! , * P* THIS MODULE IS CALLED FROM TIO WITH ! 6 P* THE FOLLOWING PARAMETERS: ! d P* ! & P* A3 /8000 (REQUEST ERROR BIT) ! & P* A4 I/O AND ACTIVATE INDICATOR ! P* A5 TTAB ADDRESS ! P* A6
0x2c4f90…2c5124 Dummy {f00=0x013e, f01=0x0190, f02=»ADDRESS BLOCK ! v P* A13 DWT STATUS " P* " 0 PATTACH EQU * ENTRY " : P ADK A4,0 SET CR " T * P RF(NZ) TIOERR I/O AND ACTIVATE ERROR " l P* " P IFT MMUPAG=0 " " P CM ECBRC,A8 RESET RETURN CODE " P XIF " P* " P IFT ATTDET=1 "
0x2c5124…2c52b8 Dummy {f00=0x013e, f01=0x0190, f02=»FT ATTDET=1 " P TM A10,A13 # * P RF(NZ) ATT:40 DEVICE ALREADY ATTACHED # ( P LDR A13,A13 # V P RF(NN) ATT:50 DEVICE BUSY # j P* # P* ATTACH REQUESTING TASK # P* # P ORS A10,DWTST,A6 ATTACH # , P ST A5,DWTTAB,A6 PUT TTAB ADDRESS IN
0x2c52b8…2c544c Dummy {f00=0x013e, f01=0x0190, f02=»* # & P* FREE BLOCK AND TIMER IN ATT:CH $ P* $ 4 P CM* 2,A4 FREE TIMER $ > " P LDR* A3,A4 REMOVE FROM ATT:CH $ Z P STR A3,A2 $ P CF A15,FREBLK RELEASE BLOCK $ P RF ATTRTN END REQUEST $ P* $ PATT:40 CW A5,DWTTAB,A6 $ . P RF(E) TIOER
0x2c544c…2c55e0 Dummy {f00=0x013e, f01=0x0190, f02=» P* % P* SET TIMER % P* % & P IFT MMUPAG=0 % 0 P LD A1,ECBCW,A8 TIME % F P XIF % b P* % n P EJECT TOSSIO % x P* % P* % P IFT ATTDET=1 % P IFT MMUPAG=1 % P EL A1,ECBCW,A8 TIME % P XIF % P* % P IFT A
0x2c55e0…2c5774 (3, 99) Dummy {f00=0x013e, f01=0x0190, f02=»B ADDRESS % P LD A3,ATT:CH ANCHOR & P CF A15,GETBLK BLOCK & . P ST A4,ATT:CH UPDATE ANCHOR & J $ P ADK A4,2 TIMER POINTER ADDRESS & n P LDR A1,A6 DWT ADDRESS & P CF A15,SETIMP SET TIMER & P DATA TIMOUT & P* & PATTIM DATA 0 & P*
0x2c5774…2c5908 Dummy {f00=0x013e, f01=0x0190, f02=» RETURN & P* ' P EJECT TOSSIO ' P* ' 2 P* ' < P********** ' F P* DETACH * ' X P********** ' j P* ' | * P* THIS MODULE IS CALLED FROM TIO WITH ' $ P* THE SAME PARAMETERS AS ATTACH. ' P* ' PDETACH EQU * ' P ADK A4,0 SET
0x2c5908…2c5a9c Dummy {f00=0x013e, f01=0x0190, f02=»F(NE) TIOERR ATTACHED TO OTHER TASK ' P XRS A10,DWTST,A6 DETACH ( , P LDR A3,A5 SAVE TTAB ADDRESS ( L P LD A5,DWTTQ,A6 QUEUE ANCHOR ( p P RF(Z) DET:10 QUEUE EMPTY ( $ P LDR* A2,A5 UPDATE QUEUE ANCHOR ( P ST A2,DWTTQ,A6 ( P CF A15,QTJOB QUEU
0x2c5a9c…2c5c30 Dummy {f00=0x013e, f01=0x0190, f02=»XIT ( f PDETRTN LDK A3,0 RETURN CODE ) P XIF ) 0 P* ) < P EJECT TOSSIO ) F P* ) ^ P* ) h P********** ) r P* TIOERR * ) P********** ) P* ) P* ERROR: FILE CODE UNKNOWN ) ( P* TIOERR IS ALSO USED AS COMMON EXIT ) ( P* FOR MO
0x2c5c30…2c5dc4 Dummy {f00=0x013e, f01=0x0190, f02=»M ECBEL,A8 RESET EFFECTIVE LENGTH ) P XIF * * P* * 6 P IFT MMUPAG=1 * @ * P ES A3,ECBRC,A8 SET RETURN CODE IN ECB * V P LDK A3,0 * * P ES A3,ECBEL,A8 RESET EFFECTIVE LENGTH * P XIF * P* * PTIORTN EQU * * ( P ABL LKMQDI QUEUE TASK AND
0x2c5dc4…2c5f58 Dummy {f00=0x013e, f01=0x018e, f02=» * P* + P* + 8 P* THIS IS THE ROUTINE FOR QUEUEING DEVICE REQUESTS. + > P* THE ROUTINE IS ENTERED AT DIFFERENT LABELS DEPENDING ON + X @ P* WHETHER THE DEVICE IS AN ECHO DEVICE OR NOT, AND DEPENDING + 8 P* ON WHETHER THE DEVICE IS ATTACHED OR NOT
0x2c5f58…2c60ec Dummy {f00=0x013e, f01=0x0190, f02=» + PTIOQ00 LDR A6,A2 , P* , P* QUEUE DEVICE FIRST , * P* , F $ PTIOQ05 ADK A6,DWTTQ QUEUE ANCHOR , P P LDR A2,A6 , x P LDR* A6,A6 , $ P RF TIOQ40 INSERT FIRST IN QUEUE , P* , & PTIOQ10 LDR A6,A2 QUEUE ECHO DEVICE , P* , . PQUED
0x2c60ec…2c6280 Dummy {f00=0x013e, f01=0x0190, f02=»NT , h P LD A1,TTB:ST+1,A5 LEVEL - P* - * P EJECT TOSSIO - 4 P* - L * P* SEARCH QUEUE FOR PLACE OF INSERTION - V P* - PTIOQ30 LDR A2,A6 - $ P LDR* A6,A6 FOLLOW QUEUE TO END - P RF(Z) TIOQ40 END FOUND - & P CC A1,TTB:ST+1,A6 COMPARE
0x2c6280…2c6414 (3, 100) Dummy {f00=0x013f, f01=0x0190, f02=»4 - P STR A6,A5 INSERT IN QUEUE . P STR A5,A2 . , P ADK A4,0 SET CR . > P RF(Z) TIOQ50 NO ACTIVATION . V P SUK A3,2 ACTIVATION . z P* . 4 PTIOQ50 ADS A3,TTB:SA,A5 UPDATE PC TO REPEAT LKM . P* . PTIOQ60 EQU * . P ABL TDISP GO TO D
0x2c6414…2c65a8 Dummy {f00=0x013f, f01=0x0190, f02=» . P* THIS MODULE IS ENTERED WHEN TERMINAL I/O / 2 P* IS REQUIRED. IF A REQUEST CANNOT BE SERVICED / 6 4 P* DUE TO E.G. BUSY DEVICE, THE REQUEST IS QUEUED / l 2 P* AND THE TERMINAL PROGRAM SET IN WAIT STATE. / P* / 2 P* WHEN RUNNING WITH MMU OPTION SPECI
0x2c65a8…2c673c Dummy {f00=0x013f, f01=0x0190, f02=»TH THE FOLLOWING PARAMETERS:- / P* 0 & . P* A1 = PARAMETER WHEN I/O AND ACTIVATION 0 0 P* 0 b $ P* A4 = ZERO, NORMAL I/O REQUEST 0 l ( P* NOT ZERO, I/O AND ACTIVATION 0 P* 0 P* A5 = TTAB ADDRESS 0 P* 0 P* A7 = ORDER CODE 0
0x2c673c…2c68d0 Dummy {f00=0x013f, f01=0x018e, f02=»IVATION DRIVER 0 f * P* WITH THE FOLLOWING REGISTER VAULES:- 1 P* 1 D P* A5 = STACK BASE 2 IN DWT 1 N P* 1 r P* A6 = DWT ADDRESS 1 | P* 1 P* A7 = ORDER CODE 1 P* 1 P* A8 = ECB ADDRESS 1 P* 1 , P* A12 = ADDRESS TO DRIVER AD
0x2c68d0…2c6a64 Dummy {f00=0x013f, f01=0x0190, f02=» 1 P* 2 , P* THE FOLLOWING DWT FIELDS ARE UPDATED:- 2 P* 2 B " P* -DWTOR DWT INDEX AND ORDER 2 L P* -DWTECB ECB ADDRESS 2 r $ P* -DWTST READY AND ECHO FIELDS 2 P* -DWTTAB TTAB ADDRESS 2 & P* -DWTWAT WAIT/ACTIVATE INDICATOR 2 . P* -DW
0x2c6a64…2c6bf8 Dummy {f00=0x013f, f01=0x0190, f02=» FIRST WORD 2 P* -ECBEL EFFECTIVE LENGTH 3 P* -ECBRC RETURN CODE 3 8 P* 3 V P EJECT TOSSIO 3 ` P* 3 x . P* DWT ADDRESS AND CHECK IF REQUEST IS BUSY 3 P* 3 ( PTIO CF A15,FNDDWT SEARCH DWT ADDRESS 3 P* 3 . PTIO:FM EQU * ENTRY U
0x2c6bf8…2c6d8c Dummy {f00=0x013f, f01=0x0190, f02=»R FILE CODE UNKNOWN 3 6 P LD A12,DWTADR,A6 ADDRESS TO DRIVER ADDRESS BLOCK 4 P LD A13,DWTST,A6 DWT STATUS 4 V P* 4 z P EJECT TOSSIO 4 P* 4 @ P* CHECK IF ATTACH/DETACH ORDER OR IF DEVICE IS BUSY/ATTACHED 4 P* 4 P IFT ATTDET=1 4
0x2c6d8c…2c6f20 Dummy {f00=0x013f, f01=0x0190, f02=»RDER 4 z P TM A10,A13 5 P RF(Z) TIO020 NOT ATTACHED 5 P CW A5,DWTTAB,A6 5 B * P RB(NE) TIOQ20 ATTACHED TO OTHER TASK 5 Z P TM A3,A13 5 " P RF(NZ) TIO030 DEVICE NOT BUSY 5 " P RB TIOQ05 BUSY, QUEUE DEVICE 5 P XIF 5 P* 5 PTIO020 EQU *
0x2c6f20…2c70b4 (3, 101) Dummy {f00=0x013f, f01=0x0190, f02=»HECK IF ECHO DEVICE IS BUSY/ATTACHED 5 p P* 6 , * PTIO030 SC A2,DWTOR,A6 STORE DWT INDEX 6 6 P LDK A2,/40 CHECK IF ECHO 6 d P ANR A2,A7 6 P RF(Z) TIO070 NOT ECHO 6 P* 6 " P LD A2,DEVIND,A12 DEVICE INDEX 6 $ P SUK A2,KB:DIX CHECK IF KEYBOARD 6
0x2c70b4…2c7248 Dummy {f00=0x013f, f01=0x0190, f02=»CE 6 v $ P LD A14,DWTST,A2 ECHO DWT STATUS 7 P* 7 2 P IFT ATTDET=1 7 < P TM A10,A14 7 R * P RF(Z) TIO050 ECHO DEVICE NOT ATTACHED 7 f P CW A5,DWTTAB,A2 7 6 P RB(NE) TIOQ10 ECHO DEVICE ATTACHED TO OTHER TASK 7 P TM A3,A14 7 ( P RF(NZ) TIO060 E
0x2c7248…2c73dc Dummy {f00=0x013f, f01=0x0190, f02=»TIO050 TM A3,A14 7 " P RB(Z) TIOQ10 ECHO DEVICE BUSY 8 P* 8 > PTIO060 LDKL A3,/A000 8 H : P XRS A3,DWTST,A2 UPDATE BUSY & ECHO BITS IN DWT STATUS 8 d P* 8 P* UPDATE ECB AND DWT FIELDS 8 P* 8 @ PTIO070 XRS A3,DWTST,A6 UPDATE BUSY & ECHO BITS
0x2c73dc…2c7570 Dummy {f00=0x013f, f01=0x0190, f02=»00 JUMP IF USER MODE 8 P LDKL A2,/7FFF 9 , P ANRS A2,A8 RESET BIT 0 IN ECB FILE CODE 9 2 , P ST A8,DWTECB,A6 SET ACTUAL ECB ADDRESS 9 b ( P CM ECBEL,A8 RESET EFFECTIVE LENGTH 9 $ P CM ECBRC,A8 RESET RETURN CODE 9 P RF TIO110 9 P* 9 P EJECT
0x2c7570…2c7704 Dummy {f00=0x013f, f01=0x0190, f02=»WORD OF USER ECB 9 z 0 P ANR A3,A2 RESET BITS 0,2,3 IN ECB FILE CODE : P ESR A3,A8 : L ( P LD A2,DWTMEC,A6 DWT MMU ECB ADDRESS : ^ , P ST A2,DWTECB,A6 SET ACTUAL ECB ADDRESS : P STR A3,A2 : * P ST A8,DWTUEC,A6 SAVE USER ECB ADDRESS : P LDR A9,A8 :
0x2c7704…2c7898 Dummy {f00=0x013f, f01=0x0190, f02=» PARAMETER : P LDR A1,A8 ; P ADK A1,ECBRL ; $ ( P LDR A8,A2 SET A8 TO DWT ECB ADDRESS ; : P ADK A2,ECBRL ; f P LDK A3,8 ; | . P MVUS A3 MOVE PART OF USER ECB TO DWT ECB ; " P LDR A1,A10 RESTORE PARAMETER ; P XIF ; P* ; P IFT MMUPAG=
0x2c7898…2c7a2c Dummy {f00=0x013f, f01=0x0190, f02=» RESET RETURN CODE ; P XIF < P* < ( P EJECT TOSSIO < 2 P* < J P* < T PTIO110 EQU * < ^ P ECR A3,A7 < r P ANK A3,/FF ORDER OPTION < , P RF(Z) TIO120 NO SPECIAL OPTION IF ZERO < ( P SC A3,DWTOPT,A6 STORE OPTION IN DWT < P* <
0x2c7a2c…2c7bc0 Dummy {f00=0x013f, f01=0x0190, f02=»SS IN DWTTAB < p P* = PTIO130 EQU * = P IFT MMUPAG=0 = 2 & P ST A8,DWTECB,A6 SET ECB ADDRESS = H P XIF = r P* = ~ P EJECT TOSSIO = P* = . P* UPDATE DWTWAT (WAIT/ACTIVATE INDICATOR) = P* = P LDR A2,A4 CHECK PARAMETER = & P
0x2c7bc0…2c7d54 (3, 102) Dummy {f00=0x013f, f01=0x0190, f02=»1 INDICATE WAIT = P RF TIO230 > P* > * < PTIO210 CF A15,GETBLK SAVE PARAMETER AND DISPATCH ADDRESS > 4 P* > t 2 PTIO220 CF A15,QTJOB QUEUE TASK FOR DISPATCHING > ~ P* > 8 PTIO230 ST A4,DWTWAT,A6 STORE WAIT/ACTIVATE INDICATOR > P* > P EJE
0x2c7d54…2c7ee8 Dummy {f00=0x013f, f01=0x0190, f02=» MODE > t " P LD A3,DEVIND,A12 DEVICE INDEX ? , P RF(N) TIO250 NO SPECIAL ACTION REQUIRED ? 4 " P RF(Z) TIO240 DATA MANAGEMENT ? d P CWK A3,DK:DIX CHECK IF DISC ? P RF(NE) TIO235 NOT DISC ? ( P CF A15,TIOCW2 MOVE 2ND CONTROL WORD ? P* ? " P* PE
0x2c7ee8…2c807c Dummy {f00=0x013f, f01=0x018e, f02=»TE ? f . P RF(Z) TIO250 JUMP IF NO READ/WRITE ORDER @ P* @ < PTIO240 EQU * @ F P ENB @ Z < P CFI A15,TIOTAB,A3 BRANCH TO RELEVANT READ/WRITE ROUTINE @ f P XIF @ P* @ * PTIO250 ENB GIVE OTHER TASKS A CHANCE @ P* @ * PTIO260 LDK A5,DWTSB2
0x2c807c…2c8210 Dummy {f00=0x013f, f01=0x0190, f02=» @ P* A P********** A P* SWITCH * A $ P********** A 6 P* A H P* SWITCH PRIORITY LEVEL: A R P* A r ( P* IF CPU851, THEN SWITCH TO LEVEL 12 A | ( P* IF CPU852, " " " " 16 A ( P* IF CPU857, " " " " 16 A P* A $
0x2c8210…2c83a4 Dummy {f00=0x013f, f01=0x0190, f02=»U851: LEVEL 12 A P XIF B P* B " P IFF CPU852+CPU857=0 B , ( P LDK A3,/40 CPU852/CPU857: LEVEL 16 B H P XIF B t P* B ( P SC A3,2,A15 SET NEW LEVEL ON STACK B " P RTN A15 RETURN WITH NEW LEVEL B P* B P EJECT TOSSIO B P* B P
0x2c83a4…2c8538 Dummy {f00=0x013f, f01=0x018e, f02=» @ P* THE APPROPRIATE ROUTINE AT READ/WRITE REQUESTS, DEPENDING C > P* ON THE DEVICE CONNECTION (PROGRAMMED CHANNEL, MUX ETX). C H > P* IF NO READ/WRITE REQUEST, CONDITION REGISTER ON STACK IS C * P* SET TO ZERO, ELSE NOT EQUAL TO ZERO. C P* C P* IN
0x2c8538…2c86cc Dummy {f00=0x013f, f01=0x0190, f02=» . P* CR = 0 IF NO READ/WRITE REQUEST D , P* CR <> 0 IF READ/WRITE REQUEST D 6 P* A4 IS DESTROYED D f P* D , PRD:WR LD A4,DWTOR,A6 ORDER CODE FROM DWT D P ANK A4,/3F D P* D * PRD:WR2 ADKL A15,4 ADJUST STACKPOINTER D P L
0x2c86cc…2c8860 Dummy {f00=0x013f, f01=0x0190, f02=» READ/WRITE INDEX D ( P ABR* A15 RETURN WITHOUT CHANGING CR E P* E F P EJECT TOSSIO E P P* E h P* E r P********** E | P* ORDTAB * E P********** E P* E 2 P* ORDTAB CONTAINS ORDER CONSTANTS AS FOLLOWS: E P* E P* =0: NO RE
0x2c8860…2c89f4 (3, 103) Dummy {f00=0x013f, f01=0x0190, f02=»,1 /00, /01 E P BYTES 1,1 /02, /03 F P BYTES 0,TINDEX+1 /04, /05 F 0 & P BYTES TINDEX+1,TINDEX+1 /06, /07 F R P BYTES TINDEX+1,0 /08, /09 F | P BYTES 1,TINDEX+1 /0A, /0B F P BYTES 0,0 /0C, /0D F P BYTES 0,0 /0E, /0F F P BYTES 0,1 /10,
0x2c89f4…2c8b88 Dummy {f00=0x013f, f01=0x0190, f02=» 0,0 /1A, /1B F P BYTES 0,0 /1C, /1D G P BYTES 0,0 /1E, /1F G 2 P BYTES 0,TINDEX+1 /20, /21 G N P BYTES TINDEX+1,0 /22, /23 G p P BYTES TINDEX+1,0 /24, /25 G P BYTES 0,TINDEX+1 /26, /27 G P BYTES 0,0 /28, /29 G P BYTES 0,0 /2A, /2B G
0x2c8b88…2c8d1c Dummy {f00=0x013f, f01=0x0190, f02=»34, /35 G P BYTES 0,0 /36, /37 H P BYTES 0,0 /38, /39 H , P BYTES 0,0 /3A, /3B H H P BYTES 0,0 /3C, /3D H d P BYTES 0,0 /3E, /3F H P* H P EJECT TOSSIO H P* H P* T I O : D M H P* H 4 P* THIS MODULE IS CALLED BY 'TIO'
0x2c8d1c…2c8eb0 Dummy {f00=0x013f, f01=0x018e, f02=»ON OF THE REQUEST IS 'TEN:DM'. H P* I & " P* INPUT: A8 = DWT ECB ADDRESS I 0 $ P* A9 = USER ECB ADDRESS I V P* I ~ P* OUTPUT: A2 IS DESTROYED I P* I . PTIO:DM EQU * DATA MANAGEMENT, INPUT/OUTPUT I ( P EL A2,ECBBA,A9 USER BUFFER ADDRES
0x2c8eb0…2c9044 Dummy {f00=0x013f, f01=0x0190, f02=» I PA15RTN EQU * J P RTN A15 J P* J , P EJECT TOSSIO J 6 P* J N P* T I O P C I J X P* J n B P* THIS MODULE IS CALLED BY 'TIO' WHEN A READ REQUEST HAS BEEN J x > P* ISSUED AND THE DEVICE IS RUNNING ON PROGRAMMED CHANNEL. J B P* TIOPCI
0x2c9044…2c91d8 Dummy {f00=0x013f, f01=0x0190, f02=»ESPONDING MODULE CALLED BY 'TENDIO' AT J , P* COMPLETION OF THE REQUEST IS 'TENPCI'. K . 4 P* NOTICE THAT ENTRY TIPI05 IS USED BY 'TIOKBI'. K ^ P* K " P* INPUT: A8 = DWT ECB ADDRESS K $ P* A9 = USER ECB ADDRESS K , P* A12 = ADDRESS TO DRIVER
0x2c91d8…2c936c Dummy {f00=0x013f, f01=0x0190, f02=»8 REQUESTED LENGTH K 2 P CW A1,BUFLEN,A12 COMPARE WITH DWT BUFFER SIZE L 6 P RF(G) IO:ERR REQ. LENGTH EXCEEDS DWT BUFFER SIZE L P P* L . PTIPI05 EQU * ENTRY POINT USED BY 'TIOKBI' L ( P EL A1,ECBBA,A9 USER BUFFER ADDRESS L P ANK A1,1 L * P RF(
0x2c936c…2c9500 Dummy {f00=0x013f, f01=0x0190, f02=» L d P ANS A1,ECBBA,A8 M P RTN A15 M P* M 0 P EJECT TOSSIO M : P* M R P* T I O M X I M P* M r B P* THIS MODULE IS CALLED BY 'TIO' WHEN A READ REQUEST HAS BEEN M | > P* ISSUED AND THE DEVICE IS RUNNING ON MULTIPLEXOR CHANNEL. M > P* TI
0x2c9500…2c9694 (3, 104) Dummy {f00=0x0140, f01=0x0190, f02=» CALLED BY 'TENDIO' AT M v , P* COMPLETION OF THE REQUEST IS 'TENMXI'. N N P* NOTICE THAT MODULES 'TIOMXO', 'TIODKI' AND 'TIODKO' ARE EQUAL TO TIOMXI. N N P* N P* INPUT: A5 = TTAB ADDRESS N " P* A8 = DWT ECB ADDRESS N P* A9 = USER ECB ADD
0x2c9694…2c9828 Dummy {f00=0x0140, f01=0x0190, f02=» PTIOMXI EQU * MUX, INPUT O ( P EL A1,ECBBA,A9 USER BUFFER ADDRESS O $ P ECR A2,A1 O P & P ANKL A1,/FFF SKIP 4 LEFTMOST BITS O b P SRL A2,3 O & P ANK A2,/1E MMUTAB INDEX (5 BITS) O P ADR A2,A5 ADD TTAB ADDRESS O * P LC A2,TTB:MT,A2 PHYSICAL PA
0x2c9828…2c99bc Dummy {f00=0x0140, f01=0x0190, f02=» A2,4 O P ORR A1,A2 P 2 P ST A1,ECBBA,A8 STORE MODIFIED BUFFER ADDRESS P P RTN A15 P V P* P f P EJECT TOSSIO P p P* P P* T I O K B I P P* P B P* THIS MODULE IS CALLED BY 'TIO' WHEN A READ REQUEST HAS BEEN P N P* ISSUED AND THE
0x2c99bc…2c9b50 Dummy {f00=0x0140, f01=0x0190, f02=»' AND ENTRY TIPO05 IN 'TIOPCO'. P 4 P* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT Q ( , P* COMPLETION OF THE REQUEST IS 'TENKBI'. Q ` P* Q P* INPUT: A6 = DWT ADDRESS Q P* A7 = ORDER CODE Q " P* A8 = DWT ECB ADDRESS Q P* A9 = USER
0x2c9b50…2c9ce4 Dummy {f00=0x0140, f01=0x018e, f02=» * KEYBOARD/CTW Q $ P LD A1,ECBRL,A8 REQUESTED LENGTH R 2 P CW A1,BUFLEN,A12 COMPARE WITH DWT BUFFER SIZE R @ 6 P RF(G) IO:ERR REQ. LENGTH EXCEEDS DWT BUFFER SIZE R v 6 P CF A15,TIPI05 CHECK AND CORRECT BUFFER ADDRESSES R P CWK A7,1 CHECK ORDER CODE R
0x2c9ce4…2c9e78 Dummy {f00=0x0140, f01=0x0190, f02=» R P EJECT TOSSIO S P* S P* S * P LDR A1,A9 S 4 P ADK A1,8 S F P ADKL A8,12 S X * P ST A8,-2,A8 SET DWT KEYTABLE ADDRESS S l P SUKL A8,4 S * P ELR A3,A4 FIRST WORD OF USER KEYTABLE S P ANK A4,1 S * P RF(NZ) TIKB10 KEYTABLE ADDR
0x2c9e78…2ca00c Dummy {f00=0x0140, f01=0x0190, f02=» 0 P CW A3,KEYLEN,A12 CHECK KEYTABLE BUFFER SIZE T P RF(G) IO:ERR TOO SMALL T 8 P CF A15,TIPO05 T X & P SUKL A8,8 ADJUST DWT ECB ADDRESS T n P* T PTIKB20 EQU * T P RTN A15 T P* T P EJECT TOSSIO T P* T P* T I O I T I T P
0x2ca00c…2ca1a0 Dummy {f00=0x0140, f01=0x0190, f02=»T T t P* U P EJECT TOSSIO U P* U , P* T I O P C O U 6 P* U L B P* THIS MODULE IS CALLED BY 'TIO' WHEN A WRITE REQUEST HAS BEEN U V > P* ISSUED AND THE DEVICE IS RUNNING ON PROGRAMMED CHANNEL. U B P* TIOPCO CHECKS THAT REQUESTED LENGTH DOES
0x2ca1a0…2ca334 (3, 105) Dummy {f00=0x0140, f01=0x0190, f02=»* THE CORRESPONDING MODULE CALLED BY 'TENDIO' AT U , P* COMPLETION OF THE REQUEST IS 'TENPCO'. V 8 6 P* NOTICE THAT MODULE 'TIOKBO' IS EQUAL TO TIOPCO. V h F P* NOTICE ALSO THAT ENTRY TIPO05 IS USED BY 'TIOKBI' AND 'TENITO'. V & P* TIOPCO IS ALSO USED BY 'DC
0x2ca334…2ca4c8 Dummy {f00=0x0140, f01=0x0190, f02=» V r P* W , PTIOPCO EQU * PROGRAMMED CHANNEL, OUTPUT W 4 P LD A2,DWTADR,A6 ADDRESS TO DRIVER ADDRESS BLOCK W B $ P LD A3,ECBRL,A8 REQUESTED LENGTH W z ( P RF(NP) TIPO20 REQUESTED LENGTH <= 0 W 2 P CW A3,BUFLEN,A2 COMPARE WITH DWT BUFFER SIZE W 6 P RF(
0x2ca4c8…2ca65c Dummy {f00=0x0140, f01=0x018e, f02=» P* X : PTIPO05 EQU * ENTRY POINT USED BY 'TIOKBI' AND 'TENITO' X P ADK A3,1 X L . P ANKL A3,/FFFE MAKE REQUESTED LENGTH EVEN X ^ ( P EL A1,ECBBA,A1 USER BUFFER ADDRESS X & P LD A2,ECBBA,A8 DWT BUFFER ADDRESS X 0 P ANKL A2,/FFFE MAKE DWT BUFFER ADD
0x2ca65c…2ca7f0 Dummy {f00=0x0140, f01=0x018e, f02=» 6 PTIPO10 MVUS A3 MOVE (USER BUFFER) TO SYSTEM BUFFER Y P* Y > PTIPO20 RTN A15 Y H P* Y ^ 0 PTIPO30 EQU * USER BUFFER ADDRESS WAS UNEVEN Y h 4 P ORS A4,ECBBA,A8 MAKE DWT BUFFER ADDRESS UNEVEN Y 0 P ELR A4,A1 FIRST CHARACTER FROM USER BUFFER Y 2 P
0x2ca7f0…2ca984 Dummy {f00=0x0140, f01=0x018e, f02=» Y j ( P RB TIPO10 MOVE REMAINING CHARACTERS Z P* Z 4 P EJECT TOSSIO Z > P* Z V P* I O : E R R Z ` P* Z v , P* DRIVER (DWT) MMU BUFFER IS TOO SMALL. Z B P* SET RETURN CODE /8008 (REQUEST ERROR AND INCORRECT LENGTH). Z & P* BRANCH TO DISPAT
0x2ca984…2cab18 Dummy {f00=0x0140, f01=0x0190, f02=» Z n P LD A1,DWTST,A6 DWT STATUS [ P SLL A1,2 CHECK ECHO BIT [ * P RF(NN) IO:E10 NOT ECHO [ J P LDR A1,A6 SAVE DWT ADDRESS [ j & P LD A6,DWTECH,A6 ECHO DWT ADDRESS [ P CF A15,TENDIO [ " P LDR A6,A1 RESTORE DWT ADDRESS [ P* [ PIO:E10 EQU
0x2cab18…2cacac Dummy {f00=0x0140, f01=0x0190, f02=» [ P* T I O M X O P* " PTIOMXO EQU TIOMXI MUX, OUTPUT ( P* N P* T I O K B O X P* n * PTIOKBO EQU TIOPCO KEYBOARD/CTW, OUTPUT x P* P* T I O I T O P* 6 PTIOITO EQU A15RTN INTERTASK COMMUNICATION, OUTPUT
0x2cacac…2cae40 Dummy {f00=0x0140, f01=0x0190, f02=»D M P* ] 6 P* THIS MODULE IS CALLED BY 'TENDIO' WHEN A REQUEST ] . P* FOR DATA MANAGEMENT HAS BEEN COMPLETED. ] P D P* NOTICE THAT MODULES 'TENDKI' AND 'TENDKO' ARE EQUAL TO TEN:DM. ] P* ] P* INPUT: A6 = DWT ADDRESS ] $ P* A8 = USE
0x2cae40…2cafd4 (3, 106) Dummy {f00=0x0140, f01=0x0190, f02=»MEC,A6 MMU ECB ADDRESS ] ( P LD A1,ECBCW2,A1 SECOND CONTROL WORD ^ P ES A1,ECBCW2,A8 ^ J P RTN A15 ^ b P* ^ r P EJECT TOSSIO ^ | P* ^ P* T E N P C I ^ P* ^ D P* THIS MODULE IS CALLED BY 'TENDIO' WHEN A READ REQUEST HAS BEEN ^ @ P*
0x2cafd4…2cb168 Dummy {f00=0x0140, f01=0x0190, f02=» THE USER BUFFER. ^ D P* NOTICE THAT MODULES 'TENKBI' AND 'TENITI' ARE EQUAL TO TENPCI. _ 8 P* NOTICE ALSO THAT ENTRY TEN:DC IS USED BY 'DC:MIN'. _ b P* _ P* INPUT: A6 = DWT ADDRESS _ $ P* A8 = USER ECB ADDRESS _ P* _ & P* OUTPUT: A1
0x2cb168…2cb2fc Dummy {f00=0x0140, f01=0x0190, f02=»EL,A2 EFFECTIVE LENGTH _ " P RF(NP) TEPI30 NO MOVE IF ZERO ` & P LD A1,ECBBA,A2 DWT BUFFER ADDRESS ` D P* ` n . PTEN:DC EQU * ENTRY POINT USED BY 'DC:MIN' ` x ( P EL A2,ECBBA,A8 USER BUFFER ADDRESS ` $ P LDK A3,1 CHECK BUFFER ADDRESSES ` P TM A3,A1
0x2cb2fc…2cb490 Dummy {f00=0x0140, f01=0x0190, f02=»EVEN ` n P* a P EJECT TOSSIO a P* a . P* a 8 2 PTEPI10 EQU * BOTH BUFFER ADDRESSES WERE UNEVEN a B 0 P LDR* A3,A1 FIRST CHARACTER FROM DWT BUFFER a x P ELR A8,A2 a P* a * PTEPI15 ANK A3,/FF SKIP LEFT CHARACTER a ( P ANKL A8,/FF00 SKI
0x2cb490…2cb624 Dummy {f00=0x0140, f01=0x0190, f02=»DK A2,1 a P SUK A4,1 b * P RF(P) TEPI25 MORE CHARACTERS TO MOVE b " P RTN A15 NO, RETURN b P P* b l PTEPI20 TM A3,A2 b v * P RF(Z) TEPI25 USER BUFFER ADDRESS EVEN b " P LDR A3,A1 DWT BUFFER ADDRESS b $ P ADR A3,A4 ADD EFFECTIVE LENGTH b
0x2cb624…2cb7b8 Dummy {f00=0x0140, f01=0x0190, f02=»ACTER b t 4 P CWR A3,A1 COMPARE WITH START ADDRESS OF BUFFER c * P RB(NE) TEPI23 MORE CHARACTERS TO MOVE c F 0 P ADK A1,1 NO, MAKE DWT BUFFER ADDRESS UNEVEN c t P RB TEPI10 c P* c P EJECT TOSSIO c P* c P* c , PTEPI25 LDR A3,A4 CHECK R
0x2cb7b8…2cb94c Dummy {f00=0x0140, f01=0x0190, f02=» P* d PTEPI30 RTN A15 d P* d $ , PTEPI40 EQU * EFFECTIVE LENGTH WAS UNEVEN d . ( P SUK A4,1 MAKE EFFECTIVE LENGTH EVEN d ^ , P RF(Z) TEPI50 ONLY ONE CHARACTER TO MOVE d P LDR A8,A4 NO, SAVE A4 d 0 P MVSU A4 MOVE (SYSTEM BUFFER) TO USER BUFFER d
0x2cb94c…2cbae0 Dummy {f00=0x0140, f01=0x0190, f02=» d f P ELR A3,A2 e P RB TEPI15 e P* e , . PTEPI60 EQU * DWT BUFFER ADDRESS WAS UNEVEN e 6 " P LDR A3,A1 DWT BUFFER ADDRESS e h $ P ADR A1,A4 ADD EFFECTIVE LENGTH e P* e " PTEPI70 LCR A8,A3 ONE CHARACTER e 6 P SC A8,-1,A3 MOVE THIS CHAR. ONE B
0x2cbae0…2cbc74 (3, 107) Dummy {f00=0x0144, f01=0x0190, f02=»ACTERS TO MOVE e x . P SUR A1,A4 NO, RESTORE DWT BUFFER ADDRESS f * P SUK A1,1 MAKE DWT BUFFER ADDRESS EVEN f H P RB TEPI25 f v P* f P EJECT TOSSIO f P* f P* T E N M X I f P* f PTENMXI EQU A15RTN MUX, INPUT f P* f P* T E
0x2cbc74…2cbe08 Dummy {f00=0x0144, f01=0x018e, f02=»K COMMUNICATION, INPUT f v P* g P* T E N D K I g ( P* g > " PTENDKI EQU TEN:DM DISC, INPUT g H P* g n P EJECT TOSSIO g x P* g P* T E N P C O g P* g 0 PTENPCO EQU A15RTN PROGRAMMED CHANNEL, OUTPUT g P* g P* T E N M X O g
0x2cbe08…2cbf9c Dummy {f00=0x0144, f01=0x0190, f02=» g h P* h P* T E N D K O h P* h ( " PTENDKO EQU TEN:DM DISC, OUTPUT h 2 P* h X P EJECT TOSSIO h b P* h z P* T E N I T O h P* h F P* THIS MODULE IS CALLED BY 'TENDIO' WHEN A WRITE REQUEST HAS BEEN h L P* COMPLETED FOR INTERTASK
0x2cbf9c…2cc130 Dummy {f00=0x0144, f01=0x0190, f02=»IOPCO' IS USED FOR MOVING THE DATA. h P* i , P* INPUT: A6 = DWT ADDRESS i 6 P* i X & P* OUTPUT: A1-A4, A8 ARE DESTROYED i b P* i 0 PTENITO EQU * INTERTASK COMMUNICATION, OUTPUT i $ P LD A8,DWTECB,A6 DWT ECB ADDRESS i $ P LD A3,ECBEL,A8 EFFECT
0x2cc130…2cc2c4 Dummy {f00=0x0144, f01=0x0190, f02=» i PTEIO10 RTN A15 j P* j P EJECT TOSSIO j ( P* j @ P* D C : M O T j J P* j ` < P* THIS MODULE IS CALLED BY THE DATA COMMUNICATION DRIVER j j < P* IN PURPOSE TO MOVE THE CONTENTS OF THE USER BUFFER TO j < P* THE DRIVER BUFFER. THE MOVE
0x2cc2c4…2cc458 Dummy {f00=0x0144, f01=0x0190, f02=»NO REGISTERS ARE DESTROYED j P* k " , PDC:MOT EQU * DATA COMMUNICATION, OUTPUT k , " P MSR 8,A15 SAVE A1-A8 ON STACK k $ P SUKL A15,32 ADJUST STACKPOINTER k * P TS 2,A15 SAVE MMU REGISTERS ON STACK k " P LD A5,DWTTAB,A6 TTAB ADDRESS k $ P TL TTB:MT
0x2cc458…2cc5ec Dummy {f00=0x0144, f01=0x0190, f02=»DC:RTN EQU * RETURN TO DC DRIVER k . P TL 2,A15 RESTORE MMU REGISTERS FROM STACK l ( $ P ADKL A15,32 ADJUST STACKPOINTER l Z * P MLR 8,A15 RESTORE A1-A8 FROM STACK... l P RTN A15 ...AND RETURN l P XIF l P* l P EJECT TOSSIO l P* l P*
0x2cc5ec…2cc780 Dummy {f00=0x0144, f01=0x0190, f02=»RIVER BUFFER TO THE USER BUFFER. l f P* m ( P* INPUT: A1 = RETURN CODE m 2 ( P* A4 = DRIVER BUFFER ADDRESS m T P* A6 = DWT ADDRESS m P* m ( P* OUTPUT: NO REGISTERS ARE DESTROYED m P* m PDC:MIN EQU * m P IFT MMUPAG=0 m
0x2cc780…2cc914 (3, 108) Dummy {f00=0x0145, f01=0x0190, f02=» STACK m x P* n P IFT MMUPAG=1 n $ P SUKL A15,32 ADJUST STACKPOINTER n . * P TS 2,A15 SAVE MMU REGISTERS ON STACK n V " P LD A5,DWTTAB,A6 TTAB ADDRESS n $ P TL TTB:MT,A5 LOAD MMU REGISTERS n P XIF n P* n P EJECT TOSSIO n P* n
0x2cc914…2ccaa8 Dummy {f00=0x0145, f01=0x018e, f02=»SS n x P* o " PMINMOV EQU * DC:MIN MOVE ENTRY o P ENB o : P LD A3,DWTECB,A6 ECB ADDRESS o F * P LDR A7,A4 SAVE DRIVER BUFFER ADDRESS o j $ P LD A2,ECBEL,A3 EFFECTIVE LENGTH o " P RF(NP) MIN:40 NOTHING TO MOVE o 8 P CW A2,ECBRL,A3 CHECK IF USER BUFF
0x2ccaa8…2ccc3c Dummy {f00=0x0145, f01=0x0190, f02=» o j P LDR A3,A5 p ( P ANK A3,1 CHECK USER BUFFER ADDRESS p . P RF(NZ) MIN:30 USER BUFFER ADDRESS UNEVEN p F P SUK A2,2 p x , P RF(N) MIN:30 ONLY ONE CHARACTER TO MOVE p P* p P EJECT TOSSIO p P* p P* WORD MOVE p P* p PMIN:
0x2ccc3c…2ccdd0 Dummy {f00=0x0145, f01=0x0190, f02=»2,2 DECREMENT LOOP COUNTER p 2 P RB(NN) MIN:10 AT LEAST ONE MORE WORD TO MOVE q " P* q X PMIN:20 EQU * q b P ADK A2,1 q v P RF(N) MIN:40 MOVE FINISHED q P* q P* CHARACTER MOVE q P* q PMIN:30 EQU * q " P LCR A3,A7 MOVE ONE CHARACTE
0x2ccdd0…2ccf64 Dummy {f00=0x0145, f01=0x0190, f02=» MIN:30 AT LEAST ONE MORE CHARACTER TO MOVE q P XIF r 4 P* r @ P IFT MMUPAG=1 r J * P ST A1,ECBRC,A3 SET RETURN CODE IN ECB r ` $ P LDR A1,A4 DRIVER BUFFER ADDRESS r P LDR A4,A2 EFFECTIVE LENGTH r & P LD A8,DWTUEC,A6 USER ECB ADDRESS r ( P CF
0x2ccf64…2cd0f8 Dummy {f00=0x0145, f01=0x0190, f02=»O r P* s P* s PMIN:40 EQU * s P INH s 2 " P CF A15,TENDIO PERFORM TENDIO s > P* s d P* RELEASE BUFFER s n P* s * P LD A1,DWTADR,A6 DRIVER ADDRESS BLOCK s , P SU A4,HDRLEN,A1 REAL BUFFER ADDRESS =1 s ( P LD A1,POLADR,A1 BUFFER PO
0x2cd0f8…2cd28c Dummy {f00=0x0145, f01=0x0190, f02=»,A2 NEXT BUFFER ADDRESS s , P RB(NZ) MIN:50 NOT LAST BUFFER IN CHAIN t P* t P $ P* INSERT BUFFER AT END OF CHAIN t Z P* t " P STR A4,A2 UPDATE QUEUE LINKS t P CMR A4 t P* t PMIN:60 EQU * t P IFT CPU852=1 t ( P ABL IHRET8 RESTOR
0x2cd28c…2cd420 Dummy {f00=0x0145, f01=0x018e, f02=» MLR 8,A15 RESTORE A1-A8 FROM STACK... t P* u . PDC:MOT RTN A15 ...AND RETURN u 8 P XIF u P* u h P IFT MMUPAG=1 u r " P RB DC:RTN RETURN TO DC DRIVER u P XIF u P* u P* ERROR EXIT u P* u " PMIN:70 EQU * DC:MIN ERROR EXIT u 2 P
0x2cd420…2cd5b4 (3, 109) Dummy {f00=0x0145, f01=0x0190, f02=» P* v P IFT MMUPAG=0 v P IFT CPU852=1 v $ PDC:MOT EQU * v : 2 P ABL IHRTN RETURN WITHOUT ENABLING INTERRUPTS v N P XIF v P* v P EJECT TOSSIO v P* v P* v P********** v P* TENDIO * v P********** v P* v P*
0x2cd5b4…2cd748 Dummy {f00=0x0145, f01=0x0190, f02=» v * P* ACTOTP IS CALLED TO START THE TASK w P* w 6 P* -IF NORMAL I/O WITH WAIT:- w @ P* w d * P* QTJOB IS CALLED TO QUEUE THE TASK w n 8 P* FOR DISPATCHING WITH THE FOLLOWING PARAMETERS:- w P* w P* A5 = TTAB ADDRESS w P* w $
0x2cd748…2cd8dc Dummy {f00=0x0145, f01=0x0190, f02=»TTQ NOT ZERO) w d J P* THAT TASK IS PUT IN DISPATCHER QUEUE TO REPEAT THE LKM INSTRUCTION. x P* x d P EJECT TOSSIO x n P* x P* x 0 P* ENTRY PARAMETERS TO THIS SUBROUTINE ARE:- x P* x P* A1 = RETURN CODE x P* x P* A6 = D
0x2cd8dc…2cda70 Dummy {f00=0x0145, f01=0x0190, f02=»ENT SUBROUTINES ARE PERFORMED. x P* y & P EJECT TOSSIO y 0 P* y H P* END I/O ENTRY y R P* y j PTENDIO EQU * y t P IFT CPU852=1 y & P CF A15,SAVE8 SAVE A1-A8 ON STACK y P XIF y P* y P IFT CPU852=0 y P INH y " P MSR 8,A
0x2cda70…2cdc04 Dummy {f00=0x0145, f01=0x0190, f02=» DWT STATUS y z P INH z ( P LD A5,DWTTQ,A6 TERMINAL QUEUE LINK z P RF(Z) TEN110 NO TASK QUEUED z L P LDKL A2,/800 ATTACH BIT z p P ANR* A2,A4 z & P RF(Z) TEN100 DEVICE NOT ATTACHED z , P CW A5,DWTTAB,A6 ATTACHED TO OTHER TASK z ( P RF(NE) TE
0x2cdc04…2cdd98 Dummy {f00=0x0145, f01=0x0190, f02=»HOR ADDRESS z t P ST A3,DWTTQ,A6 { . P CF A15,QTJOB QUEUE TASK TO REPEAT REQUEST { , P* { ^ P* UPDATE ECB AND DWT { h P* { 0 PTEN110 LD A5,DWTTAB,A6 TTAB ADDRESS FROM DWT { P* { PTEN120 LDKL A2,/8000 { , P ORRS A2,A4 INDICATE DEVICE READ
0x2cdd98…2cdf2c Dummy {f00=0x0145, f01=0x0190, f02=»CH IF ENTERED FROM ECHO OR RECOVERY { ~ P* | , P EJECT TOSSIO | 6 P* | N P* | X * P ORRS A2,A3 SET EVENT COMPLETED IN ECB | b , P ORS A1,ECBRC,A3 SET RETURN CODE IN ECB | P* | P IFT MMUPAG=1 | P LD A4,TTB:PW,A5 PSW | " P ANK A4,1 SY
0x2cdf2c…2ce0c0 Dummy {f00=0x0145, f01=0x0190, f02=»5,32 ADJUST STACKPOINTER | * P TS 2,A15 SAVE MMU REGISTERS ON STACK } . P TL TTB:MT,A5 LOAD MMU REGISTERS FROM TTAB } N P* } P EJECT TOSSIO } P* } P* MOVE DWT ECB TO USER ECB } P* } & P LD A8,DWTUEC,A6 USER ECB ADDRESS } P ELR A
0x2ce0c0…2ce254 (3, 110) Dummy {f00=0x0146, f01=0x0190, f02=»DK A2,ECBEL } P LDK A4,6 ~ 4 P MVSU A4 MOVE EFF. LENGTH, RTN CODE & CNTRL WORD ~ & P* ~ ^ 4 P LD A3,DWTADR,A6 ADDRESS TO DRIVER ADDRESS BLOCK ~ h " P LD A3,DEVIND,A3 DEVICE INDEX ~ , P RF(N) TEN160 NO SPECIAL ACTION REQUIRED ~ " P RF(Z) TEN140 DATA
0x2ce254…2ce3e8 Dummy {f00=0x0146, f01=0x018e, f02=» , P CF A15,RD:WR CHECK IF IT WAS READ/WRITE . P RF(Z) TEN160 JUMP IF NO READ/WRITE ORDER 4 P* f PTEN140 EQU * p P ENB < P CFI A15,TENTAB,A3 BRANCH TO RELEVANT READ/WRITE ROUTINE P* P EJECT TOSSIO P* P* RESTORE MM
0x2ce3e8…2ce57c Dummy {f00=0x0146, f01=0x0190, f02=» d $ P ADKL A15,32 ADJUST STACKPOINTER P XIF 0 P* < P EJECT TOSSIO F P* ^ : P* CHECK IF NO WAIT, WAIT, MULTIPLE WAIT OR ACTIVATION h P* PTEN200 EQU * , P LD A4,DWTWAT,A6 WAIT/ACTIVATE INDICATOR ( P RF(Z) TEN250 NOT WA
0x2ce57c…2ce710 Dummy {f00=0x0146, f01=0x0190, f02=»ACTIVATION P LD A8,DWTECB,A6 ECB ADDRESS P* 6 P IFT MMUPAG=1 @ * P AN A3,TTB:PW,A5 SYSTEM/USER MODE BIT V P RF(Z) TEN210 SYSTEM MODE . P LD A8,DWTUEC,A6 NO, GET USER ECB ADDRESS P XIF P* PTEN210 EQU * 4 P ST A8
0x2ce710…2ce8a4 Dummy {f00=0x0146, f01=0x0190, f02=»XT DWT ADDRESS P RF(Z) TEN240 NO MORE DWT:S P CMR A4 SET TO NO WAIT AGAIN : P LDR A4,A3 ^ P RB TEN220 p P* P EJECT TOSSIO P* P* PTEN230 EQU * 8 P CF A15,FREBLK ACTIVATE: GET PARAMETER AND DISP ADDR . P
0x2ce8a4…2cea38 Dummy {f00=0x0146, f01=0x4150, f02=»PATCHING j P* PTEN250 EQU * $ P CM DWTECB,A6 RESET ECB ADDRESS . P* V PTEN260 EQU * ` P IFT CPU852=1 t P ABL IHRET8 P XIF P* P IFT CPU852=0 * P MLR 8,A15 RESTORE A1-A8 FROM STACK... P RTN A15 ...AND
0x2cea38…2cebcc Dummy {f00=0x0146, f01=0x2008, f02=» NT TOSSIO END @ &
0x2cebcc…2ced60 Dummy {f00=0x0146, f01=0x0000, f02=»
0x2ced60…2ceef4 (3, 111) Opaque[0x194]
0x2ceef4…2cf088 # DirEnt {nam=»SYSLDM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2178, f03=0x0000}
0x2ceef4…2cf088 IdxSect {
0x2ceef4…2cf088 f00 = 0x010b // 0x2ceef4 @0x0
0x2ceef4…2cf088 f01 = 0x003e // 0x2ceef6 @0x2
0x2ceef4…2cf088 gno = [ // 0x2ceef8 @0x4
0x2ceef4…2cf088 [0x00]: C0x010b.0x3.0
0x2ceef4…2cf088 [0x01]: C0x010c.0x0.0
0x2ceef4…2cf088 [0x02]: C0x010c.0x1.0
0x2ceef4…2cf088 [0x03]: C0x010c.0x2.0
0x2ceef4…2cf088 [0x04]: C0x010c.0x3.0
0x2ceef4…2cf088 [0x05]: C0x010d.0x0.0
0x2ceef4…2cf088 [0x06]: C0x010d.0x1.0
0x2ceef4…2cf088 [0x07]: C0x010d.0x2.0
0x2ceef4…2cf088 [0x08]: C0x010d.0x3.0
0x2ceef4…2cf088 [0x09]: C0x010e.0x0.0
0x2ceef4…2cf088 [0x0a]: C0x010e.0x1.0
0x2ceef4…2cf088 [0x0b]: C0x010e.0x2.0
0x2ceef4…2cf088 [0x0c]: C0x010e.0x3.0
0x2ceef4…2cf088 [0x0d]: C0x010f.0x0.0
0x2ceef4…2cf088 [0x0e]: C0x010f.0x1.0
0x2ceef4…2cf088 [0x0f]: C0x010f.0x2.0
0x2ceef4…2cf088 [0x10]: C0x010f.0x3.0
0x2ceef4…2cf088 [0x11]: C0x012e.0x1.0
0x2ceef4…2cf088 [0x12]: C0x012e.0x2.0
0x2ceef4…2cf088 [0x13]: C0x012f.0x1.0
0x2ceef4…2cf088 [0x14]: C0x012f.0x2.0
0x2ceef4…2cf088 [0x15]: C0x012f.0x3.0
0x2ceef4…2cf088 [0x16]: C0x0130.0x0.0
0x2ceef4…2cf088 [0x17]: C0x0130.0x1.0
0x2ceef4…2cf088 [0x18]: C0x0130.0x2.0
0x2ceef4…2cf088 [0x19]: C0x0130.0x3.0
0x2ceef4…2cf088 [0x1a]: C0x0131.0x0.0
0x2ceef4…2cf088 [0x1b]: C0x0131.0x1.0
0x2ceef4…2cf088 [0x1c]: C0x0131.0x2.0
0x2ceef4…2cf088 [0x1d]: C0x0131.0x3.0
0x2ceef4…2cf088 [0x1e]: C0x0132.0x0.0
0x2ceef4…2cf088 ]
0x2ceef4…2cf088 }
0x2cf088…2cf21c Dummy {f00=0x010b, f01=0x0190, f02=» 2 P IDENT SYSLDM REL 10.0 80-03-31 870105041000 P : P REL 10.0 80-03-17 ST B & P =5,FAULTY DISPL. TO MMU BIT MAP b P REL 10.0 80-03-14 ST 0 P =4,MEM. OVERFL. NOT DET. WHEN GEN. TTAB:S P PRR 10.0 80-01-18 , P =3,SEGTAB
0x2cf21c…2cf3b0 Dummy {f00=0x010b, f01=0x0190, f02=»2-07 0 P =1,UNEVEN LENGTH POSS. OF INTERNAL BUFFER P ENTRY SYSLDM @ P*************************** V P* * z P* ENTRIES AND EXTERNALS * P* * P***************************
0x2cf3b0…2cf544 Dummy {f00=0x010b, f01=0x0190, f02=»ADA P EXTRN SCTANO P EXTRN SCTBLK " P EXTRN SCTBUG 8 P EXTRN SCTCDT N P EXTRN SCTDCT d P EXTRN SCTDMI z P EXTRN SCTDMT P EXTRN SCTEFA P EXTRN SCTFWL P EXTRN SCTFWT P EXTRN SCTIOE P EXTRN SCT
0x2cf544…2cf6d8 Dummy {f00=0x010b, f01=0x0190, f02=» P EXTRN SCTIPL P EXTRN STTPSZ P EXTRN SCTPSZ 4 P EXTRN SCTSFA J P EXTRN SCTSTL ` P EXTRN SCTSWB v P EXTRN SCTTCT P EXTRN SYSBAS P EXTRN SYSLOD P EXTRN TCLASS P EXTRN TTMJOB P EXTRN DWTECH
0x2cf6d8…2cf86c Dummy {f00=0x010b, f01=0x0190, f02=» P EXTRN CONVRT P EXTRN NXTBLK P EXTRN SYSLDX 4 P EXTRN SAVE01 J P EXTRN SAVE02 ` P EXTRN SAVE03 v P EXTRN SAVE04 P EXTRN SAVE05 P EXTRN SAVE06 P EXTRN SAVE07 P EXTRN SAVE08 P EXTRN SAVE09
0x2cf86c…2cfa00 Dummy {f00=0x010b, f01=0x018e, f02=» P EXTRN SAVE16 P EXTRN SAVE17 P EXTRN SAVE18 0 P EXTRN SAVE19 F P EXTRN SAVE20 P EXTRN SAVE21 r P EXTRN NUMSEG P EXTRN SAVE23 P EXTRN SAVE24 P EXTRN SAVE25 P EXTRN SAVE26 P EXTRN SAVE27
0x2cfa00…2cfb94 (3, 112) Dummy {f00=0x010c, f01=0x0190, f02=» & P EXTRN I:RSTE DISPL. IN P:MTAB TO P INTERPRETER RESTART ENTRY 2 P* V P* TTAB DISPLACEMENTS ` P* ~ . P EXTRN TTB:CB CURRENT SEGMENT BASE POINTER P EJECT P* P* EXTERNAL SUBROUTINES P* P EXTRN NXTCO
0x2cfb94…2cfd28 Dummy {f00=0x010c, f01=0x0190, f02=» * v , P*************************************** P F ( PMMUPAG EQU 1 MEMORY MANAGEMENT UNIT N & PSWPBLK EQU 0 SWAPPABLE WORK BLOCKS z $ PDSKPAG EQU 0 DSKPAG APPLICATION P EJECT P P* P* CONSTANTS P*
0x2cfd28…2cfebc Dummy {f00=0x010c, f01=0x018e, f02=» $ PWBLEN EQU -4 LENGTH OF WORKBLOCK P , P 8 $ P******************************* D $ P* SAVE01URATION FILE (SAVE01) * l $ P******************************* P P* TASK DEFINITION BLOCK: PTDBBT EQU 0 1A BLOCK TYPE (
0x2cfebc…2d0050 Dummy {f00=0x010c, f01=0x0190, f02=» f $ PTDBTL EQU TDBMC+6 6A TASK LEVEL : PTDBNC EQU TDBTL+6 2N NUMBER OF TERMINAL DEVICE CLASSES 0 P* n & PTDBFST EQU TDBNC+2 FIRST TERM DEF x $ PTDC EQU 7 TERMINAL DEVICE CLASS PTLC EQU 6 LINE CONNECTION ( PTDBREC EQU TDC+TLC TDB-RECOR
0x2d0050…2d01e4 Dummy {f00=0x010c, f01=0x0190, f02=»CK TYPE ~ 6 PCDBNC EQU CDBBT+1 2N NUMBER OF SPEC. DEV. CLASSES ( PSDCFST EQU CDBNC+2 FIRST SDC-RECORD J P* v P* & P* USER WORK BLOCK TYPE DEF. BLOCK PUDBBT EQU 0 1A BLOCK TYPE , PUDBNU EQU UDBBT+1 3A NUMBER OF UWB TYPES P*
0x2d01e4…2d0378 Dummy {f00=0x010c, f01=0x0190, f02=»UWB+NUMUBL UDB RECORD-LENGTH P EJECT $ P**************** 2 P* SOP-HANDLING * J P**************** b PSOP EQU /2E DEVICE ADDRESS z P PLMP1 EQU /400 LAMP 1 CODE PLMP2 EQU /200 PLMP3 EQU /100 PLMP4 EQU /80 PLM
0x2d0378…2d050c Dummy {f00=0x010c, f01=0x0190, f02=» F P***************************************************************** F P* CALL-FORMAT, PERFORMS: CFR A14,A13 * T F P* DATA [REL-ADDRESS] * F P*
0x2d050c…2d06a0 Dummy {f00=0x010c, f01=0x0190, f02=» P PCALL FORM 16=/F697,16 P EJECT . F P***************************************************************** < F P* CONSTANTS USED IN SYSLOD PART M * F P********************************************************
0x2d06a0…2d0834 (3, 113) Dummy {f00=0x010c, f01=0x0190, f02=»* 2 PTTB:AT EQU -46 DISPLACEMENT TO MMU BIT MAP =5 PTTB:MT EQU -38 @ PTTB:SP EQU -4 V PTTB:SB EQU -2 l PTTB:ID EQU 2 PTTB:ST EQU 4 PTTB:PP EQU 6 PTTB:PW EQU 8 PTTB:SA EQU 10 PTTB:TD EQU 40 P EJECT
0x2d0834…2d09c8 Dummy {f00=0x010c, f01=0x0190, f02=» 0 CHANNEL PARAMETER PDWTST EQU 2 STATUS PDWTECB EQU 4 ECB ADDRESS 6 PDWTOR EQU 6 ORDER V PDWTADR EQU 8 ADDRESS BLOCK p PDWTTAB EQU 10 TTAB ADDRESS * PDWTWAT EQU 12 WAIT/ACTIVATE INDICATOR PDWTTQ EQU 14 TERMINAL QUEUE " PDW
0x2d09c8…2d0b5c Dummy {f00=0x010c, f01=0x018e, f02=» " P* * PAGTAB * " P* *********** * P* P PPAGQF EQU 0 Z PPAGQB EQU 2 n PPAGPA EQU 4 PPAGSB EQU 6 P EJECT P* & P* ************* & P* * SEGT
0x2d0b5c…2d0cf0 Dummy {f00=0x010c, f01=0x0190, f02=» * P* ******************* * P* * MISCELLANOUES * 2 * P* ******************* ` P* PBUFLEN EQU -4 PDEVIND EQU -2 PDWTLEN EQU 6 PTDCDD1 EQU 5 PTDCDD2 EQU 6 PLCND1 EQ
0x2d0cf0…2d0e84 Dummy {f00=0x010c, f01=0x0190, f02=»2 LENGTH OF ASCU4Z INTERRUPT TABLE 2 PSCZLEN EQU 16 LENGTH OF SALCUZ INTERRUPT TABLE * 2 PASZBUF EQU 96 LENGTH OF TEMP TABLE FOR ASCU4Z ` 2 PSCZBUF EQU 48 LENGTH OF TEMP TABLE FOR SALCUZ 4 PMINBUF EQU 1984 LENGTH OF TEMP. INT. TABLE AREA P EJE
0x2d0e84…2d1018 Dummy {f00=0x010c, f01=0x0190, f02=» * : P* THIS IS THE MONITOR CONFIGURATION PROGRAM ENTRY * < : P* * z : P* IT IS ENTERED FROM SYSLOD WITH THE FOLLOWING * : P* PARAMETERS:
0x2d1018…2d11ac Dummy {f00=0x010c, f01=0x0190, f02=»CATION OF SYSLDX * r : P* A2 - POINTER TO PREVIOUS LOCATION OF SYSLDX * : P* * ^ : P* * : P**********************************************
0x2d11ac…2d1340 Dummy {f00=0x010c, f01=0x0190, f02=»1,SCTSFA UPDATE START OF FREE AREA P LDR A8,P INIT STACK POINTER * & P ADK A1,2 RELOCATION ROUTINE ENTRY N P CFR A8,A1 x * P ST A13,SCTEFA UPDATE END OF FREE AREA * P LDKL A2,TCLASS GET ADDRESS TO TCLASS . P CWK A2,SCLASS SAME AS ADDRESS TO
0x2d1340…2d14d4 (3, 114) Dummy {f00=0x010c, f01=0x0190, f02=» POINTER TO TCLASS p 0 PNO:TCL LDKL A2,SCLASS GET ADDRESS TO SCLASS , P CALL CHPTRS RELOCATE POINTERS IN SCLASS N 6 P ST A2,SAVE11,A13 SAVE RELOCATED POINTER TO SCLASS ~ P* & P* CLEAR ALL WORDS IN SYSTEM AREA P* P LD A1,SCTEFA
0x2d14d4…2d1668 Dummy {f00=0x010c, f01=0x0190, f02=» P AD A1,M:REL,A13 P ABR A1 P EJECT 0 4 /*********************************************** > 4 /* CHPTRS - CHANGE POINTERS IN TCLASS/SCLASS * v 4 /*********************************************** * , (* ENTRY: A2 - POINTER
0x2d1668…2d17fc Dummy {f00=0x010c, f01=0x018e, f02=»- POINTER TO MOVED TCLASS/SCLASS * ( * WORK REGISTER:A1-A7 2 * P * SUBROUTINES: Z * r PCHPTRS EQU * | P ADR A2,A12 RELOCATE POINTER 2 . LDR A3,A2 GET POINTER TO ORIGIN TCLASS/SCLASS , ' LDR* A4,A3 GET LENGTH OF TCLA
0x2d17fc…2d1990 Dummy {f00=0x010c, f01=0x018e, f02=» z $ ! LDR* A5,A3 GET POINTER TO CLASS ADR A5,A12 RELOCATE 0 STR A5,A3 STORE L $ LDR* A6,A5 GET LENGTH OF CLASS d CHPT20 EQU * * & SUK A6,4 MOORE DEVICES IN THIS CLASS? P RB(NP) CHPT10 NO! ADK A5,4 NEXT DEVICE L
0x2d1990…2d1b24 Dummy {f00=0x010c, f01=0x0190, f02=» r ADR A7,A12 RELOCATE * % STR A7,A5 STORE RELOCATED DW-ADDRESS $ " P LD A8,SCTOPT GET OPTION WORD R P ANKL A8,1 MMU IN SYSTEM? x P RB(Z) CHPT20 NO! , P LD A8,DWTMEC,A7 GET MONITOR ECB ADDRESS & P LDR A9,A8 GET MONITOR ECB ADDRESS
0x2d1b24…2d1cb8 Dummy {f00=0x010c, f01=0x0190, f02=»ESS RELOCATED t , P ST A8,DWTMEC,A7 STORE RELOCATED ADDRESS RB CHPT20 F CHPT30 EQU * X P RTN A14 l P EJECT | 6 2************************************************** 6 2* B:TCT - BUILD TASK CONTROL TABLE * 6 2**********
0x2d1cb8…2d1e4c Dummy {f00=0x010c, f01=0x0190, f02=»ATION DATA l * " * EXIT: A6 - START OF TC:TAB $ * A7 - LENGTH OF TC:TAB B * j * WORK REGISTERS: A2,A3 t * * SUBROUTINES: * . )* TASK CONTROL TABLE LAYOUT . )* ____
0x2d1e4c…2d1fe0 Dummy {f00=0x010c, f01=0x0190, f02=» I TTMJOB I . )* _________________________ , . ** I MONITOR TASKS I ^ . )* _________________________ . ** I USER TASKS I . )* _____
0x2d1fe0…2d2174 (3, 115) Dummy {f00=0x010c, f01=0x0190, f02=»A11,SAVE01,A13 GET START OF SAVE01URATION DATA ( $ LD A7,SCTSFA GET START OF FREE AREA 6 LDR A6,A7 SAVE b & " LDKL A2,TTMJOB GET TTMJOB ADDRESS z ST A2,2,A7 STORE IN TC:TAB * % ADK A7,4 CONTINUE WITH MONITOR TASKS ( P LD A2,SCTOPT ANY
0x2d2174…2d2308 Dummy {f00=0x010c, f01=0x0190, f02=»S IN TC:TAB IF CERTAIN OPTIONS AVALIABLE * @ P* - TO BE PROVIDED * 4 @ P*********************************************************** x P EJECT PBTCT15 EQU * " P LD A2,SCTDMT DATA MANAGEMENT? $ PBTCT
0x2d2308…2d249c Dummy {f00=0x010c, f01=0x018e, f02=»RESERV ENTRY FOR DM-TASK D0 PBTCT25 RB BTCT20 $ PBTCT30 EQU * < * P : 5* COMPUTE NUMBER OF TASKS AND RESERV SPACE IN TC:TAB Z * . )* A11 - POINTER TO TASK DEFINITION BLOCK * 2 P ST A7,SAVE13,A13 SAVE CURRENT USER TASK E
0x2d249c…2d2630 Dummy {f00=0x010c, f01=0x0190, f02=» RF(E) BTCT35 YES ! P LDKL A1,LMP4 FORMAT ERROR ! CALL ERROR HALT ! @ PBTCT35 EQU * ! X * ! l 0 ,* COMPUTE NUMBER OF TASK IN EACH TASK CLASS ! v * ! PBTCT40 EQU * ! $ CALL GETTSK GET NUMBER OF TASKS ! PBTCT50 EQU * ! , P ADK
0x2d2630…2d27c4 Dummy {f00=0x010c, f01=0x018e, f02=» CALL ERROR INDICATE MEMORY OVERFLOW ! PBTCT55 EQU * " , ( $ SUK A1,1 MOORE TASKS IN THIS CLASS? " @ RB(P) BTCT50 YES " l $ CALL NXTBLK SKIP TO NEXT BLOCK " ( # CCK A2,'TT' TASK DEFINITION BLOCK? " RB(E) BTCT40 YES " * " 4 0* ENTRIES
0x2d27c4…2d2958 Dummy {f00=0x010c, f01=0x0190, f02=» & ! STR A7,A6 STORE LENGTH IN TC:TAB # * P ST A6,SCTTCT STORE POINTER TO TC:TAB # . RTN A14 # P EJECT # l 8 P*************************************************** # z 8 P* * # 8 P* B:FWT - BUI
0x2d2958…2d2aec Dummy {f00=0x010c, f01=0x0190, f02=» * # j 8 P*************************************************** $ 8 P* * $ R 8 P* REFERENCED IN: CONMON * $ 8 P* * $ 8 P*
0x2d2aec…2d2c80 Dummy {f00=0x010c, f01=0x018e, f02=»- FILE WORK TABLE LENGTH IN * $ ~ 8 P* BYTES * % * 8 P* * % f 8 P* EXIT: SCTFWT - ADDRESS TO FIRST FWT * % 8 P* SCTNOF - TOTAL NUMBER OF FM-FIL
0x2d2c80…2d2e14 (3, 116) Dummy {f00=0x010d, f01=0x0190, f02=» 8 P* * & 8 P* SUBROUTINES: ERROR,MULT * & @ 8 P* * & | 8 P* FUNCTIONAL DESCRIPTION: * & 8 P* THIS SUBROUTINE R
0x2d2e14…2d2fa8 Dummy {f00=0x010d, f01=0x0190, f02=»N BY THE * & l 8 P* FORMULA: A=L*(G+N*T) * ' 8 P* WHERE A=AREA SIZE IN BYTES * ' T 8 P* L= FWT LENGTH IN BYTES * ' 8 P* G=NUMBER OF GENERAL FM-FILES * ' 8 P
0x2d2fa8…2d313c Dummy {f00=0x010d, f01=0x0190, f02=» * ' 8 P*************************************************** ( , P EJECT ( h PB:FWT EQU * ( v & P LD* A2,SCTTCT GET LENGTH OF TCTAB ( & P AD A2,SCTTCT COMPUTE END OF TCTAB ( * P SU A2,SAVE02,A13 LENGTH OF USER PART (
0x2d313c…2d32d0 Dummy {f00=0x010d, f01=0x0190, f02=»F ADD NUMBER OF GENERAL FM-FILES ( 0 P ST A3,SCTNOF STORE TOTAL NUMBER OF FM-FILES ) ( , P LD A2,SCTFWL GET FILE WORK TABLE LENGTH ) P CALL MULT MULTIPLY ) , P SRL A3,1 NUMBER OF WORDS TO BE RESERVED ) P ADK A3,0 ANY FWT:S AT ALL? ) P RF(Z) FWT70
0x2d32d0…2d3464 Dummy {f00=0x010d, f01=0x0190, f02=»S TO FIRST FWT ) v ( PFWT50 CW A2,SCTEFA MEMORY OVERFLOW? * P RF(NE) FWT60 NOT YET! * B * P LDKL A1,LMP3 INDICATE MEMORY OVERFLOW * ` P CALL ERROR * ( PFWT60 ADK A2,2 RESERVE ANOTHER WORD * $ P SUK A3,1 DECREMENT WORD COUNTER * * P RB(NZ) FWT50 CHEC
0x2d3464…2d35f8 Dummy {f00=0x010d, f01=0x0190, f02=»************** * x * &* MONBLK - GENERATE MONITOR BLOCKS * + * &************************************** + D * + r ( $* NUMBER OF BLOCKS TO BE GENERATED: + | ( P* 20+N*(NUMBER OF TASKS IN SYSTEM) + $ P* WHERE N IS A SYSTEM CONSTANT + $ P* DEFINED A
0x2d35f8…2d378c Dummy {f00=0x010d, f01=0x0190, f02=»* SCTEFA - END OF FREE AREA + * , , . ** EXIT: BLOCKS - POINTER TO FIRST BLOCK , 6 * , h $ * WORK REGISTERS: A1,A2,A7,A12 , r * , * SUBROUTINES: BLKGEN , * , EJECT , PMONBLK EQU * , LDK A1,0 , & ! LD A1
0x2d378c…2d3920 Dummy {f00=0x010d, f01=0x0190, f02=»* , ( P LD* A7,SCTTCT GET LENGTH OF TC:TAB - P* - 6 0 P* GET NUMBER OF BLOCKS PER TASK TO GENERATE - @ P* - t P LD A2,SCTBLK - ~ PMON:10 EQU * - SUK A7,2 MOORE TASKS? - RF(Z) MON:20 NO - P CALL BLKGEN - RB MON:10 - PMO
0x2d3920…2d3ab4 (3, 117) Dummy {f00=0x010d, f01=0x0190, f02=»D BLOCK - * . STR A1,A12 . ST A1,2,A12 . . ST A1,4,A12 . B P* . V F P* CHECK IF BUFFER GREATER THAN 3 WORDS RESERVED FOR SYSLOD PART A . ` 0 P* IF NOT - USE LAST MONITOR BLOCK AS BUFFER . P* . & P LD A1,BUFSIZ,A13 GET BUFFER SIZ
0x2d3ab4…2d3c48 Dummy {f00=0x010d, f01=0x0190, f02=»T A12,SYSBUF,A13 START OF BUFFER . PMON:30 EQU * / ( ADKL A12,6 / < P LD A2,SCTSFA / P P SUK A2,2 / f PMON:40 ADK A2,2 / x P CW A2,SCTEFA / P RF(NE) MON:50 / P LDKL A1,LMP3 / P CALL ERROR / PMON:50 CWR A2,A12 / P RB(NE)
0x2d3c48…2d3ddc Dummy {f00=0x010d, f01=0x0190, f02=»* BLKGEN - GENERATE MONITOR BLOCK * / * %************************************* 0 . * 0 * REFERENCED IN: MONBLK 0 f * 0 * ENTRY: A1=0 0 4 0* A2 - NUMBER OF BLOCKS TO BE GENERATED 0 $ * A12 - NEXT FREE ENTRY 0
0x2d3ddc…2d3f70 Dummy {f00=0x010d, f01=0x0190, f02=» 0 * 1 0 ,* MONITOR BLOCK LAYOUT 1 0 ,* -------------------- 1 F 0 ,* I DATA *+6 I 1 z 0 ,* -------------------- 1 0 ,* I DATA 0
0x2d3f70…2d4104 Dummy {f00=0x010d, f01=0x0190, f02=» -------------------- 1 ~ * 2 " EJECT 2 , PBLKGEN EQU * 2 : LDR A3,A2 2 N PBLK:10 EQU * 2 b RF(Z) BLKEX 2 v ADKL A12,6 2 ST A12,-6,A12 2 P ST A1,-4,A12 2 ST A1,-2,A12 2 SUK A3,1 2 RB BLK:10 2 PBLKE
0x2d4104…2d4298 Dummy {f00=0x010d, f01=0x0190, f02=»UILD SEGMENT TABLE * 2 ( $************************************ 3 * 3 J * &* ENTRY: SCTSFA - START OF FREE AREA 3 T ( $* SCTEFA - END OF FREE AREA 3 , (* SCTLAC - START OF APPLICATION 3 * 3 , (* EXIT: SCTPAG - ADDRESS TO PA
0x2d4298…2d442c Dummy {f00=0x010d, f01=0x0190, f02=» * 3 P* 4 P* CHECK APPLICATION TYPE 4 P* 4 6 ( P LD A1,APPTYP,A13 GET LANGUAGE TYPE 4 @ P CWK A1,'CR' 4 l $ P RF(E) SEG:05 CREDIT APPLICATION 4 P CWK A1,'CO' 4 $ P RF(E) SEG:05 COBOL APPLICATION 4 P RF SEGEX 4 * 4 * BUILD
0x2d442c…2d45c0 Dummy {f00=0x010d, f01=0x0190, f02=»2 STORE IN SEGTAB 4 ( P ADKL A12,2 START OF SEGMENT BLOCKS 5 , P LD A1,SAVE29,A13 GET NUMBER OF SEGMENTS 5 F P STR A1,A12 SAVE 5 v P ADKL A12,2 5 . P ST A12,SAVE30,A13 START OF SEGMENT TABLE 5 * P LDKL A1,/8400 STATUS FOR FIRST BLOCK 5 $ P STR A
0x2d45c0…2d4754 (3, 118) Dummy {f00=0x010d, f01=0x0190, f02=» A2,A1 SAVE POINTER 5 P ADKL A2,6 ADDRESS TO P:BAS 6 P CALL GETCON GET P:BAS 6 @ & P ST A1,2,A12 STORE IN FIRST BLOCK 6 ^ " P ADKL A12,8 BYPASS FIRST BLOCK 6 4 P LD A2,SCTLAC GET LOGICAL ADDRESS TO COMMON PART 6 * P ADKL A2,NUMSEG GET NUMBER OF SEGM
0x2d4754…2d48e8 Dummy {f00=0x010d, f01=0x018e, f02=»10 EQU * 6 P LDK A7,0 STATUS 7 CALL GETCON 7 * * P* LDR A3,A1 SAVE DISC ADDRESS =REL 11 7 > ( P* ANK A3,/FF CLEAR LEFT BYTE =REL 11 7 l , P SRL A1,8 PROGRAM TYPE TO RIGHT BYTE =2 7 ( # CCK A1,'RR' CORE RESIDENT SEGMENT? 7 P RF(E) SEG:30 YES! 7
0x2d48e8…2d4a7c Dummy {f00=0x010d, f01=0x0190, f02=» 7 P ADK A2,2 8 P RF SEG:40 8 PSEG:30 EQU * 8 , * P LDKL A7,/8800 INDICATE LOADED IN CORE 8 @ PSEG:35 EQU * 8 n ADK A2,2 SEGMENT ADDRESS 8 CALL GETCON 8 P* 8 P AD A1,SCTADA+2 8 P RF(O) SEG:36 8 P RF SEG:38 8 PSEG:36
0x2d4a7c…2d4c10 Dummy {f00=0x010d, f01=0x0190, f02=»L ERROR 8 PSEG:40 EQU * 9 P* ORR A7,A3 =REL 11 9 $ P STR A7,A12 9 @ P ST A1,2,A12 9 T P ADK A2,2 EFFECTIVE LENGTH 9 h CALL GETCON 9 & P ST A1,4,A12 SAVE EFFECTIVE LENGTH 9 " P ADKL A12,8 NEXT SEGMENT BLOCK 9 " ADK A2,2 NEXT BLOCK IN S:
0x2d4c10…2d4da4 Dummy {f00=0x010d, f01=0x0190, f02=» A2,2 9 P CW A2,SCTEFA : P RF(NE) SEG:70 : $ P LDKL A1,LMP3 : : ( P CALL ERROR INDICATE MEMORY OVERFLOW : P PSEG:70 CWR A2,A12 : | P RB(NE) SEG:60 : P ST A12,SCTSFA : PSEGEX EQU * : RTN A14 RETURN : P XIF : P IFT SWPBLK=1
0x2d4da4…2d4f38 Dummy {f00=0x010d, f01=0x0190, f02=» * : f D P* * ; D P* * ; f D P* B:SWBT - BUILD SWAPPABLE WORK BLOCK TABLE * ; D P* =======
0x2d4f38…2d50cc Dummy {f00=0x010d, f01=0x0190, f02=» REFERENCED IN: SYSLDM * ; D P* * < > D P* ENTRY: * < D P*
0x2d50cc…2d5260 Dummy {f00=0x010d, f01=0x0190, f02=» * < ^ D P* WORK REGISTERS: A1-A12 * = D P* * = ^ D P* REGISTER USAGE: A8 - DISC ADDRESS TO FIRST COPY * = D P*
0x2d5260…2d53f4 (3, 119) Dummy {f00=0x010d, f01=0x0190, f02=» A11 - POINTER IN CONF. FILE * = ~ D P* A12 - ADDRESS TABLE POINTER * > 6 D P* * > ~ D P* SUBROUTINES: ERROR,GETNUM,GETCON * >
0x2d53f4…2d5588 Dummy {f00=0x010d, f01=0x0190, f02=» * > V D P*************************************************************** ? P EJECT ? V PB:SWBT EQU * ? d & P LD A12,SCTSFA START OF FREE AREA ? x 2 P LD A11,SAVE01,A13 START OF CONFIGURATION FILE ? P* ? : P* SEARCH FOR SWB TYPE DEFINITION BLOC
0x2d5588…2d571c Dummy {f00=0x010d, f01=0x0190, f02=»S! ? 0 P CCK A2,'CC' COMMON DEVICE DEFINITION BLOCK? @ P RF(NE) BSWT20 NO! @ > P ADKL A11,1 @ X " P CALL NXTCOM SKIP COMMON BLOCK @ l 2 PBSWT20 CCK A2,'UU' UWB TYPE DEFINITION BLOCK? @ P RF(NE) BSWT40 NO! @ P ADKL A11,1 NUMBER OF TYPES @ P L
0x2d571c…2d58b0 Dummy {f00=0x010d, f01=0x0190, f02=»BFST-1 FIRST UWB RECORD @ ( PBSWT30 ADKL A11,6 BYPASS UWB RECORD A $ P SUK A1,1 DECR. NUMBER OF TYPES A L P RB(P) BSWT30 MOORE LEFT A t , P LCR A2,A11 GET NEXT CHAR. IN CONF.FILE A 0 PBSWT40 CCK A2,'SS' SWB TYPE DEFINITION BLOCK A P RF(E) BSWT44 YE
0x2d58b0…2d5a44 Dummy {f00=0x010d, f01=0x0190, f02=»F TYPES A v * P ST A11,SAVE23,A13 START OF CONF. DATA B P LDR A6,A11 B > P CALL GETNUM GET 3 DIGITS B R P LDR A5,A5 ZERO? B t $ P RF(Z) SWBERR ILLEGAL NUMBER!!! B , P ST A5,SAVE24,A13 SAVE NUMBER OF RECORDS B ( P LD A8,SCTSWB GET ADDRESS TO $SWAPP
0x2d5a44…2d5bd8 Dummy {f00=0x010d, f01=0x0190, f02=»TO ADDRESS TABLE B n * P CM SAVE14,A13 RESET SWP-BLOCK COUNTER C P ADKL A12,2 FIRST POINTER C F P LDR A10,A12 SAVE C h $ PBSWT50 ADKL A10,2 BYPASS POINTER C ( P SUK A5,1 DECREMENT NUMBER OF TYPES C P RB(P) BSWT50 C P* C & P* GET ADDRESS TO
0x2d5bd8…2d5d6c Dummy {f00=0x010d, f01=0x0190, f02=»DKL A2,S:BTAB DISPL. TO S:BTAB ADDRESS C $ P CALL GETCON GET S:BTAB ADDRESS D . * P LDR A2,A1 GET ADDRESS TO PROT. S:BTAB D V * P RB(Z) SWBERR NO SWB:S IN APPLICATION! D P ADK A1,2 ADDRESS TO NAME D P ST A1,SAVE21,A13 SAVE D 0 P SUK A2,2 ADDRESS TO L
0x2d5d6c…2d5f00 Dummy {f00=0x010d, f01=0x0190, f02=» LDKL A9,0 RESET BLOCK COUNTER D , PBSWT60 STR A10,A12 SAVE POINTER TO BLOCK E & P ST A4,SAVE19,A13 SAVE E V * P LD A11,SAVE23,A13 START OF CONF. DATA E t , P LD A7,SAVE24,A13 NUMBER OF SWB RECORDS E 0 PBSWT65 LD A2,SAVE21,A13 NAME RECORD IN PROT. E $ P C
0x2d5f00…2d6094 (3, 120) Dummy {f00=0x010e, f01=0x0190, f02=»LEFT BYTE E ~ " P LC A3,1,A11 GET SECOND CHAR. F & P CWR A1,A3 TWO FIRST CHAR. EQUAL? F 8 P RF(NE) BSWT70 NO! F b " P ADK A2,2 NEXT CHAR. IN PROT. F | P CALL GETCON GET THIRD CHAR. F P SRL A1,8 ISOLATE CHAR. F 0 P LC A3,2,A11 GET THIRD CHAR. FROM
0x2d6094…2d6228 Dummy {f00=0x010e, f01=0x018e, f02=»WB SKIP NAME F | ( P SUK A7,1 DECREMENT NUMBER OF TYPES G P RB(P) BSWT65 NEXT TYPE G @ P* G ` N P* NO MATCHING NAME IN CONFIGURATION FILE - RESET ALL WORDS IN THIS BLOCK G j P* G P STR A7,A10 1:ST WORD G P ST A7,2,A10 2:ND WORD G P ST A7
0x2d6228…2d63bc Dummy {f00=0x010e, f01=0x0190, f02=» G & P ADKL A11,NAMUWB NUMBER OF COPIES H P LDR A6,A11 H 2 P LDR A3,A2 SAVE POINTER H F & P CALL GETNUM GET NUMBER OF COPIES H f , P SLL A5,8 NUMBER OF COPIES IN LEFT BYTE H : P OR A5,SAVE26,A13 DISC ADDRESS BITS 0-7 IN RIGHT BYTE H " P STR A5,A1
0x2d63bc…2d6550 Dummy {f00=0x010e, f01=0x0190, f02=»,A10 SAVE H P LDR A2,A3 RESTORE POINTER I $ P SUK A2,UPNAME PROTOTYPE ADDRESS I 4 & P CALL GETCON GET PROTOTYPE ADDRESS I P LDR A2,A1 SAVE I & P SUK A2,UPNAME LENGTH OF WORKBLOCK I P CALL GETCON I * P ST A1,SWBLEN,A10 STORE LENGTH OF SWB I 0
0x2d6550…2d66e4 Dummy {f00=0x010e, f01=0x0190, f02=»S I d P RF(O) BSWT88 J P RF BSWT90 J PBSWT88 IM SAVE26,A13 J 2 P CM SAVE25,A13 J N PBSWT90 EQU * J d & P ADK A1,1 INCREMENT SECTOR COUNTER J x " P SUKL A3,256 DECREMENT LENGTH J P RB(P) BSWT86 MOORE SECTORS? J P SUK A5,1 MOORE COPIES? J
0x2d66e4…2d6878 Dummy {f00=0x010e, f01=0x0190, f02=»E26,A13 J P CW A8,SAVE28,A13 K ( P RB(G) SWBERR $SWAP-FILE TOO SMALL! K * P RF(L) BSWT95 K V P LD A8,SAVE25,A13 K l P CW A8,SAVE27,A13 K ( P RF(G) BSWT98 SWAPP-FILE TOO SMALL! K * PBSWT95 ADKL A10,8 START OF NEXT BLOCK K P ADKL A12,2 NE
0x2d6878…2d6a0c Dummy {f00=0x010e, f01=0x0190, f02=»RECORD IN PROT. S:BTAB K | P ST A2,SAVE21,A13 SAVE L 0 P LD A4,SAVE19,A13 GET LENGTH OF PROT. S:BTAB L < P SUK A4,UP:REC DECREMENT L p P RB(P) BSWT60 MOORE TYPES L , P LD A8,SAVE14,A13 ANY BLOCKS GENERATED? L P RF(NE) BSWT99 YES L PBSWT98 LDKL
0x2d6a0c…2d6ba0 Dummy {f00=0x010e, f01=0x0190, f02=»AREA L l P RTN A14 M P XIF M EJECT M ( 6 1************************************************* M 6 6 1* B:DMTT - BUILD DATA MANAGEMENT TASK TABLES * M p 6 1************************************************* M * M * &* ENTRY: SCTSFA - START
0x2d6ba0…2d6d34 (3, 121) Dummy {f00=0x010e, f01=0x0190, f02=»T: M * N ( P* WORK REGISTERS: A1,A3,A5,A7,A12 N * N @ * SUBROUTINES: DMTGEN N J * N h PB:DMTT EQU * N r * % LD A12,SCTSFA GET START OF FREE AREA N ( P LD A7,SCTTCT GET POINTER TO TC:TAB N " ADK A7,4 FIRST DM-TASK ENTRY N $ P L
0x2d6d34…2d6ec8 Dummy {f00=0x010e, f01=0x0190, f02=» P ANK A3,/F MOORE DM-TASKS? O P RF(Z) DMTTEX NO! O & P SRC A3,1 O @ P RF(NN) DMTT30 O R CALL DMTGEN O h DMTT30 EQU * O | P ADK A5,1 O P RB DMTT20 O DMTTEX EQU * O RTN A14 O EJECT O 6 2**********************************
0x2d6ec8…2d705c Dummy {f00=0x010e, f01=0x0190, f02=» * P * ENTRY: A1 - TASK ID P , (* A6 - INDEX RECORD BUFFER SIZE P . 0 ,* A7 - TCTAB ENTRY FOR CURRENT TASK P ^ & "* A12 - START OF FREE AREA P * P * EXIT: P * P P* WORK REGISTERS: A2,A4 P * P
0x2d705c…2d71f0 Dummy {f00=0x010e, f01=0x0190, f02=»0 NO! P P LDK A4,0 RESET PAGE POINTER Q PDMTG10 EQU * Q 2 P CWK A4,/4000 LAST PAGE? Q F P RF(E) DMTG30 YES! Q f " P STR A4,A12 STORE PAGE POINTER Q ( P ADKL A4,/400 INCREMENT PAGE POINTER Q , P ADKL A12,2 INCREMENT MMU ENTRY POINTER Q P RB DM
0x2d71f0…2d7384 Dummy {f00=0x010e, f01=0x0190, f02=» * Q . P LD A1,SAVE30,A13 GET ADDRESS TO SEG.TABLE R P STR A1,A12 STORE TTB:SP R < P ADKL A12,6 R PDMTG40 EQU * R p 2 . STR A12,A7 STORE TTAB ENTRY POINTER IN TC:TAB R " ADK A7,2 NEXT ENTRY IN TC:TAB R * P ST A5,TTB:ID,A12 TASK IDENTIFICATION R
0x2d7384…2d7518 Dummy {f00=0x010e, f01=0x0190, f02=» STATUS R z $ P ST A1,TTB:PW,A12 STORE IN TTAB S " P ADKL A12,40 TERMINAL DEVICES S 8 LDK A1,6 LENGTH S ^ STR A1,A12 STORE S v ADKL A12,40 TASK STACK+2 S , ' LDR A1,A6 GET INDEX RECORD BUFFER SIZE S SLL A1,2 MULTIPLY BY 4 S ( P ADR A
0x2d7518…2d76ac Dummy {f00=0x010e, f01=0x0190, f02=»FLOW S n P RF(NE) DMTG60 NO! T P LDKL A1,LMP3 T & ( P CALL ERROR INDICATE MEMORY OVERFLOW T < PDMTG60 CWR A2,A12 T h P RB(NE) DMTG50 T , ( ST A12,SCTSFA UPDATE START OF FREE AREA T P RTN A14 T EJECT T " ****************************** T
0x2d76ac…2d7840 Dummy {f00=0x010e, f01=0x0190, f02=»NTRY: SAVE01 - START OF SAVE01URATION DATA T * U 4 8 4* EXIT: TC:TAB CONTAIN POINTERS TO ALL TASK TABLES U > * U z * WORK REGISERS: A1-A12 U * U 8 3* SUBROUTINES: CONVRT,GETTSK,TETTDC,GETCLN,GETSDC U * U ( #*
0x2d7840…2d79d4 (3, 122) Dummy {f00=0x010e, f01=0x0190, f02=» TABLE I U ~ * &* I 16 I V * &* I WORDS I V J * &* I______________________I V x * &* TTB:SB I SEGMENT POINTER I V * &* ------------------------ V * &* TAS
0x2d79d4…2d7b68 Dummy {f00=0x010e, f01=0x0190, f02=» ------------------------ V * &* TTB:ST I STATUS/LEVEL I W * * &* ------------------------ W X * &* TTB:PP I PENDING QUEUE I W * &* ------------------------ W * &* TTB:PW I PROGRAM STATUS WORD I
0x2d7b68…2d7cfc Dummy {f00=0x010e, f01=0x0190, f02=»-- W l * &* I REGISTER I X * &* I SAVE I X 8 * &* I AREA I X f * &* I 14 I X * &* I WORDS I X * &* ----------
0x2d7cfc…2d7e90 Dummy {f00=0x010e, f01=0x0190, f02=» TABLE I X z * &* : : Y * &* : : Y F * &* I______________________I Y t P EJECT Y 2 P* TASK SAVE01URATION TABLE LAYOUT Y 0 ,* ____________________
0x2d7e90…2d8024 Dummy {f00=0x010e, f01=0x018e, f02=»I INDEX/FILCODE I Y 0 ,* ------------------------------ Z & 0 ,* I DWT-ADDRESS I Z Z 0 ,* ------------------------------ Z 0 ,* : : Z 0 ,* :
0x2d8024…2d81b8 Dummy {f00=0x010e, f01=0x0190, f02=» 0 ,* ------------------------------ [ 0 ,* I DWT-ADDRESS I [ 8 0 ,* ------------------------------ [ l EJECT [ PB:TT EQU * [ * P ST P,SAVE04,A13 SAVE LOCATION COUNTER [ * % LD A12,SCTSFA GET START O
0x2d81b8…2d834c Dummy {f00=0x010e, f01=0x018e, f02=»U * [ $ LCR A2,A11 GET FIRST BLOCK TYPE ( # CCK A2,'TT' TASK DEFINITION BLOCK? 4 RF(E) BTT20 YES ` P LDKL A1,LMP4 FORMAT ERROR x CALL ERROR PBTT20 EQU * * ( $* GET NUMBER OF TASKS IN THIS CLASS * CALL
0x2d834c…2d84e0 Dummy {f00=0x010e, f01=0x0190, f02=» j SLL A5,8 MOVE TO LEFT BYTE ] * P LC A5,TDBID+5,A11 GET SECOND ID DIGIT ] , . P ST A5,SAVE16,A13 SAVE TASK ID START VALUE ] Z P* ] " P* CHECK IF CREDIT APPLICATION ] P* ] P LD A5,APPTYP,A13 CREDIT? ] P CWK A5,'CR' ] P RF(NE) BTT2
0x2d84e0…2d8674 (3, 123) Dummy {f00=0x010e, f01=0x0190, f02=» A5,8 MOVE TO LEFT BYTE ] . P LC A5,TDBMC+5,A11 GET SECOND CHAR IN TCL ^ $ P CALL GETTCL GET TCL START VALUE ^ R P ST A5,SAVE17,A13 SAVE ^ z PBTT21 EQU * ^ P EJECT ^ * ^ * GET TASK LEVEL ^ * ^ 0 P LC A5,TDBTL+4,A11 GET FIRST DIG
0x2d8674…2d8808 Dummy {f00=0x010e, f01=0x0190, f02=»RY ^ t P ST A1,SAVE24,A13 SAVE _ P EJECT _ ( * _ 6 B P* COMPUTE SIZE OF SAVE01URATION DEPENDENT PART OF TASK TABLE _ @ * _ $ LDKL A10,TTB:TD STANDARD LENGTH _ " P LD A5,SCTOPT GET OPTION WORD _ 4 P ANK A5,/11 CHECK IF EMM AND MMU PAGING IN
0x2d8808…2d899c Dummy {f00=0x010e, f01=0x0190, f02=»B:AT RESERV SPACE FOR BIT MAP _ P RF BTT30 ` & PBTT22 LD A5,SCTOPT ` 8 P SRC A5,1 MMU PAGING? ` R P RF(NN) BTT25 NO ` p , P SUKL A10,TTB:MT 16+2 WORD EXTRA IF MMU ` 2 - SUKL A12,TTB:MT RESERV SPACE FOR EXTRA WORDS ` RF BTT30 ` PBTT25 EQ
0x2d899c…2d8b30 Dummy {f00=0x010e, f01=0x0190, f02=»CB RESERV SPACE FOR EXTRA WORD ` PBTT30 EQU * a & * a : : P* ADD ONE WORD FOR LENGTH OF TASK SAVE01URATION TABLE a D * a ADKL A10,2 a P EJECT a * a < 7* COMPUTE SIZE OF TERMINAL DEVICE CLASS DEPENDENT PART a " P* OF TASK SAVE0
0x2d8b30…2d8cc4 Dummy {f00=0x010e, f01=0x0190, f02=»FST TERMINAL DEVICE CLASS DEFINITION a $ CALL GETTDC GET NUMBER OF TDC:S b , LDR A7,A1 SAVE b T PBTT35 EQU * b l RF(Z) BTT40 b ( $ CALL GETCLN GET CLASS NUMBER (1-99) b & " ADR A1,A1 2*(BINARY CLASS NUMBER) b , P LD A8,SAVE18,A13 GET POINTER
0x2d8cc4…2d8e58 Dummy {f00=0x010e, f01=0x018e, f02=»TE FORMAT ERROR b ~ PBTT37 EQU * c " P ADR A8,A1 GET ENTRY IN TCLASS c , $ P LDR* A8,A8 GET POINTER TO CLASS c R $ P LDR* A8,A8 GET LENGTH OF CLASS c z " SUKL A8,2 EXCLUDE LENGTH WORD c ( $ ADR A10,A8 ADD TO TOTAL TTAB LENGTH c . ) ADR A6,A8 ADD TO TA
0x2d8e58…2d8fec Dummy {f00=0x010e, f01=0x0190, f02=» c PBTT40 EQU * d * d > :* COMPUTE SIZE OF SPECIAL DEVICE CLASS DEPENDENT PART OF d & P* TASK SAVE01URATION TABLE d h * d 6 1 CALL GETSDC GET NUMBER OF SPECIAL DEVICE CLASSES d P ADKL A9,2 FIRST SDC RECORD d LDR A7,A1 SAVE d
0x2d8fec…2d9180 Dummy {f00=0x010e, f01=0x0190, f02=»R) d p , P LD A8,SAVE11,A13 GET POINTER TO SCLASS e P LDR* A2,A8 e : P SUK A2,2 e N P CWR A1,A2 e ` P RF(NG) BTT52 e r P LDKL A1,LMP4 e & P CALL ERROR INDICATE FORMAT ERROR e PBTT52 EQU * e " P ADR A8,A1 GET ENTRY IN SCLASS e $ P LDR*
0x2d9180…2d9314 (3, 124) Dummy {f00=0x010f, f01=0x018e, f02=» TTAB LENGTH e x . ) ADR A6,A8 ADD TO TASK CONF. TABLE LENGTH f ADKL A9,SDC NEXT CLASS f F ( # SUK A7,1 DECREMENT NUMBER OF SDC:S f f RB BTT50 f PBTT55 EQU * f " P ADK A6,2 INCLUDE LENGTH WORD f 2 P LD A7,SAVE13,A13 GET CURRENT ENTRY IN TC:
0x2d9314…2d94a8 Dummy {f00=0x010f, f01=0x0190, f02=» f P* =4 g " P* MEMORY OVERFLOW CHECK =4 g P* =4 g < $ P LDR A1,A11 SAVE REGISTER A11 =4 g J " P LDR A5,A9 SAVE REGISTER A9 =4 g r $ P LDR A11,A12 GET TTAB ADDRESS =4 g ( P ADR A11,A10 COMPUTE END OF TTAB =4 g * P LD A9,SCTEFA GET END OF FRE
0x2d94a8…2d963c Dummy {f00=0x010f, f01=0x0190, f02=»R INDICATE MEMORY OVERFLOW =4 g $ PBTT62 LDR A11,A1 RESTORE A11 =4 h & P LDR A9,A5 RESTORE A9 =4 h N P EJECT =4 h n 8 P* STORE LENGTH OF TASK SAVE01URATION TABLE IN TTAB h * h ST A6,TTB:TD,A12 h * h : 6* STORE TASK LEVEL IN RIGHT
0x2d963c…2d97d0 Dummy {f00=0x010f, f01=0x0190, f02=» STORE TASK LEVEL IN LEFT BYTE OF PROGRAM STATUS WORD h * i > & P SLL A5,10 MOVE LEVEL TO LEFT BYTE i H P ORKL A5,/00C0 i r " P LD A2,SCTOPT GET OPTION WORD i P ANK A2,1 MMU OPTION? i P ORR A5,A2 SET BIT 15 IF MMU i $ ST A5,TTB:PW,A12 STORE
0x2d97d0…2d9964 Dummy {f00=0x010f, f01=0x0190, f02=»A12 STORE IN TTAB i ADK A5,1 INCREMENT TASK ID j 6 P ST A5,SAVE16,A13 SAVE TO NEXT TASK IN SAME CLASS j > P IFF MMUPAG+DSKPAG=0 =3 j x P* j * P* STORE SEGMENT TABLE ADDRESS IN TTAB j P* j 0 P LD A5,SAVE30,A13 GET SEGMENT TABLE ADDRESS j
0x2d9964…2d9af8 Dummy {f00=0x010f, f01=0x0190, f02=»NE) BTT65 NO j P* k ( P* STORE TASK CLASS TO MATCH IN TTAB k P* k J * P LD A5,SAVE17,A13 GET TCL START VALUE k T " P ST A5,TTB:PP,A12 SAVE IN TTAB k P ADK A5,1 INCREMENT TCL k P ST A5,SAVE17,A13 SAVE k PBTT65 EQU * k , ' STR A12,A7 SA
0x2d9af8…2d9c8c Dummy {f00=0x010f, f01=0x0190, f02=»0 GET TTAB LENGTH k 0 P ADS A5,SAVE10,A13 UPDATE START OF FREE AREA l 4 / ADR A12,A10 NEXT TTAB ENTRY IN THIS TASK CLASS l N 6 2 SUKL A8,1 DECREMENT NUMBER OF TASKS IN THIS CLASS l RB BTT60 l P EJECT l PBTT70 EQU * l * l * &* RESET P
0x2d9c8c…2d9e20 Dummy {f00=0x010f, f01=0x0190, f02=»'TT' TASK DEFINITION BLOCK? l P RF(NE) BTT95 m $ P LDKL A2,BTT20 m : P SUKL A2,REL m P P ADR A2,A13 m d P ABR A2 m x PBTT95 EQU * m P =4 m P =4 m P =4 m P =4 m P =4 m P =4 m P =4 m P =4 m
0x2d9e20…2d9fb4 (3, 125) Dummy {f00=0x010f, f01=0x018e, f02=»************************************** m n J J* B:DWTS - BUILD DWT:S FOR SPECIAL DEVICES AND CONNECT TO TASK TABLES n . L J************************************************************************ n | * n * REFERENCED IN: MONCON n * n , (* ENTRY
0x2d9fb4…2da148 Dummy {f00=0x010f, f01=0x0190, f02=» * o * EXIT: o * o * WORK REGISTERS: A1-A12 o ( * o J < 8* SUBROUTINES: GETTSK,GETTDC,GETSDC,GETCLN,NXTBLK,ERROR o T * o EJECT o PB:DWTS EQU * o * o & P* GET START OF SAVE01URATION FILE o * o 2 P LD A11,SA
0x2da148…2da2dc Dummy {f00=0x010f, f01=0x0190, f02=»TION BLOCK o h * p $ LCR A2,A11 GET FIRST CHARACTER p ( # CCK A2,'TT' TASK DEFINITION BLOCK? p D RF(E) DWTS YES p p P LDKL A1,LMP4 FORMAT ERROR p CALL ERROR p PDWTS EQU * p * p * GET ADDRESS TO TC:TAB p * p , P LD
0x2da2dc…2da470 Dummy {f00=0x010f, f01=0x0190, f02=» TASK CLASS p r * q CALL GETTSK q PDWTS20 EQU * q 2 P ST A1,SAVE19,A13 SAVE q F * q d * &* GET CORRESPONDING TASK TABLE (TTAB) q n * q PDWTS25 EQU * q " ADK A7,2 NEXT ENTRY IN TC:TAB q " LDR* A10,A7 GET TTAB ADDRESS q 6 P A
0x2da470…2da604 Dummy {f00=0x010f, f01=0x0190, f02=»A11 START OF TASK DEFINITION BLOCK q , ' ADKL A9,TDBFST START OF TDC DEFINITION r * P EJECT r Z * r h 4 /* GET NUMBER OF TERMINAL DEVICES IN THIS CLASS r r * r CALL GETTDC r P LDR A6,A1 r PDWTS30 EQU * r P RF(Z) DWTS40 r P CAL
0x2da604…2da798 Dummy {f00=0x010f, f01=0x0190, f02=»,A8 GET POINTER TO CLASS r $ P LDR* A8,A8 GET LENGTH OF CLASS s " P SUKL A8,2 EXCLUDE LENGTH WORD s H * P ADR A10,A8 INCREMENT POINTER IN TTAB s n 0 + ADKL A9,TDBREC BYPASS NEXT TDC DEF. RECORD s ( P SUK A6,1 DECREMENT NUMBER OF TDC:S s P RB DWTS30 s
0x2da798…2da92c Dummy {f00=0x010f, f01=0x0190, f02=» s z LDR A1,A1 t PDWTS50 EQU * t P RF(Z) DWTS90 t . P ST A1,SAVE17,A13 SAVE t D * t b * &* GET SPECIAL DEVICE CLASS NUMBER OM t l * t CALL GETCLN t * t 8 3* GET CORRESPONDING SPECIAL DEVICE CLASS IN SCLASS t * t
0x2da92c…2daac0 Dummy {f00=0x010f, f01=0x0190, f02=»DR A5,A6 SAVE t P LDR* A6,A6 GET LENGTH u " P SUK A6,2 EXCLUDE LENGTH WORD u 4 PDWTS60 EQU * u Z ADK A5,4 GET DEVICE u n ( # LDR* A1,A5 GET ADDRESS TO TYPE DWT u ( # LD A3,DWTLEN,A1 GENERATION OF DWT? u P RF(Z) DWTS70 NO u * u * C
0x2daac0…2dac54 (3, 126) Dummy {f00=0x010f, f01=0x0190, f02=»CT u P* v 4 P* RELOCATE MONITOR ECB ADDRESS IF MMU IN SYSTEM v P* v L " P LD A3,SCTOPT GET OPTION WORD v V P ANK A3,1 MMU IN SYSTEM? v | P RF(Z) DWTS65 NO! v ( P LDR A3,A1 GET PROTOTYPE DWT-ADDRESS v * P SUR A3,A2 COMPUTE RELOCATION CONSTANT
0x2dac54…2dade8 Dummy {f00=0x010f, f01=0x018e, f02=»C,A2 STORE IT BACK v PDWTS65 EQU * w $ LDR A1,A2 DT-ADDRESS TO BE USED w . PDWTS70 EQU * w V * w j . ** STORE FILE-CODE AND DWT-ADDRESS IN TTAB w t * w " ST A1,2,A10 STORE DWT-ADDRESS w $ LD A1,-2,A5 GET INDEX/FILECODE w STR A1,A1
0x2dade8…2daf7c Dummy {f00=0x010f, f01=0x0190, f02=» w h RB(P) DWTS60 NEXT DEVICE x P EJECT x * * x 8 4 /* CHECK IF MOORE SPECIAL DEVICES IN THIS CLASS x B * x z ADKL A9,SDC x P LD A1,SAVE17,A13 x SUK A1,1 x RB DWTS50 x PDWTS90 EQU * x * x 8 P* CHECK IF MOORE
0x2daf7c…2db110 Dummy {f00=0x010f, f01=0x0190, f02=» IF MOORE TASK DEFINITION BLOCKS x * y ( CALL NXTBLK y 2 ( # CCK A2,'TT' TASK DEFINITION BLOCK? y F RB(E) DWTS10 YES y r P LD A2,SCTSFA y P SUK A2,2 y PDWTS95 ADK A2,2 y P CW A2,SCTEFA y P RF(NE) DWTS99 y P LDKL A1,LMP3 y
0x2db110…2db2a4 Dummy {f00=0x010f, f01=0x0190, f02=» y EJECT z 4 0************************************************ z 4 0* B:DWTT - BUILD TERMINAL DEVICE WORK TABLES * z N 4 0************************************************ z 4 0************************************************ z * z * REFER
0x2db2a4…2db438 Dummy {f00=0x010f, f01=0x0190, f02=»UBROUTINES: ERROR,GETTSK,GETTDC,GETCLN,GETLCN,DWTGEN,NXTBLK z * { D EJECT { N PB:DWTT EQU * { P* { p 2 P* CLEAR WORK AREA TO BE USED FOR ECHO DEVICE { z & P* AND TEMPORARY INTERRUPT TABLES { P* { " P LDR A1,P GET LOCATION COUNTER { *
0x2db438…2db5cc Dummy {f00=0x010f, f01=0x0190, f02=» BDWT05 YES! { P SUK A1,2 DECREMENT POINTER | P RB BDWT00 | 8 PBDWT05 EQU * | J 2 P LD A11,SAVE05,A13 GET FWT AREA SIZE IN WORDS | ^ 6 P CWK A11,896 LARGE ENOUGTH FOR TEMP. INT. TABLES? | P RF(L) BDWT08 NO! | ( P LD A1,SCTEFA SAVE END OF FREE A
0x2db5cc…2db760 Dummy {f00=0x010f, f01=0x0190, f02=»BDWT25 | PBDWT08 EQU * } P* } " F P* ALLOCATE TEMPORARY WORK AREA IN USED PART OF SYSLDM IF POSSIBLE } , P* } v 2 P LD A11,SAVE10,A13 GET END OF TEMP. INT. TABLE } 4 P SU A11,SCTSFA+2 COMPUTE SIZE OF AVALIABLE AREA } & P CWK A11,MINBUF IS IT BIG
0x2db760…2db8f4 (3, 127) Dummy {f00=0x010f, f01=0x0190, f02=» AREA } h P ST A11,SCTEFA SAVE ~ . P SUKL A11,896+896 START OF TEMP. WORK AREA ~ * P LDR A7,A11 SAVE ~ 2 P SUK A7,SCZBUF START OF TEMP BUFFER FOR SALCUZ ~ t P ST A7,SAVE04,A13 SAVE ~ 2 P SUK A7,ASZBUF START OF TEMP BUFFER FOR ASCU4Z ~ P ST A7,SAV
0x2db8f4…2dba88 Dummy {f00=0x010f, f01=0x0190, f02=» ~ L * ( # LD A11,SCTEFA GET END OF FREE AREA ( $ LD A9,SCTSFA GET START OF FREE AREA > LDK A7,0 RESET WORD COUNTER j PBDWT10 EQU * CWR A11,A9 MEMORY OVERFLOW? RF(NE) BDWT15 NO * P LDKL A1,LMP3 INDICATE MEMORY OVERFLOW
0x2dba88…2dbc1c Dummy {f00=0x010f, f01=0x0190, f02=»ER WORD x $ ADK A7,1 INCREMENT WORD COUNTER RB BDWT10 8 PBDWT20 EQU * J * ^ 6 2* INIT POINTERS TO THE TEMPORARY INTERRUPT TABLES h * P LDR A1,A11 PBDWT25 LD A7,SAVE10,A13 PBDWT30 EQU * , ( STR A11,A7 SAVE INT
0x2dbc1c…2dbdb0 Dummy {f00=0x010f, f01=0x0190, f02=»LL POINTERS INTIATED? RB(NE) BDWT30 NO * P ST A1,SCTEFA UPDATE END OF FREE AREA 8 P EJECT f * t * INIT DWT POINTER ~ * P LD A11,SAVE01,A13 * % LD A12,SCTSFA GET START OF FREE AREA * B >* INIT TC:TAB ENT
0x2dbdb0…2dbf44 Dummy {f00=0x010f, f01=0x0190, f02=»E IN CURRENT USER TASK ENTRY z PBDWT40 EQU * $ * 8 . )* GET NUMBER OF TASKS IN THIS TASK CLASS B * t $ CALL GETTSK GET NUMBER OF TASKS ~ PBDWT50 EQU * ( P ST A1,SAVE19,A13 SAVE BINARY VALUE * @ ;* GET NUMBER OF TERMINA
0x2dbf44…2dc0d8 Dummy {f00=0x010f, f01=0x0190, f02=»DR A1,A1 ANY TERMINAL DEVICES? RF(Z) BDW100 NO & 6 P ST A1,SAVE15,A13 SAVE NUMBER OF TERMINAL DEVICESS > ( P LD* A10,SAVE13,A13 GET TTAB ADDRESS x 6 1 ADKL A10,TTB:TD DISPLACEMENT TO TASK CONF. TABLE * ( #* GET TERMINAL DEVICE CLASS NUM
0x2dc0d8…2dc26c Dummy {f00=0x010f, f01=0x0190, f02=»QU * " CALL GETCLN GET CLASS NUMBER ( P ST A1,SAVE14,A13 SAVE BINARY VALUE 2 * ^ @ <* GET LINE CONNECTION NUMBER FOR THIS TERMINAL DEVICE CLASS h * IN THIS TASK * , ' CALL GETLCN GET LINE CONNECTION NUMBER LDR A6,A1
0x2dc26c…2dc400 Dummy {f00=0x010f, f01=0x0190, f02=»A5,TDC+4,A9 STORE RIGHT ASCII DIGIT 2 - SRL A5,8 MOVE LEFT ASCII DIGIT TI RIGHT BYTE , * & SC A5,TDC+3,A9 STORE LEFT ASCII DIGIT b * : 5* FIND CORRESPONDING TERMINAL DEVICE CLASS IN TCLASS * 2 P LD A2,SAVE14,A13 GET BINARY VALUE OF
0x2dc400…2dc594 (3, 128) Dummy {f00=0x012e, f01=0x0190, f02=»IS IS AN ENTRY IN TCLASS -TO BE SUPPLIED P* 0 $ P LDR* A7,A7 GET POINTER TO CLASS : P EJECT b * p $ * GENERATE DWT:S FOR THIS CLASS z 2 -* A6 - LINE CONNECTION NUMBER (BINARY VALUE) , (* A7 - POINTER TO TERMINAL DEVICE CLASS
0x2dc594…2dc728 Dummy {f00=0x012e, f01=0x0190, f02=» OF DEVICE (INPUT OR OUTPUT) v * $ CALL DWTGEN . PBDWT90 EQU * B < P LD A1,SAVE15,A13 GET NUMBER OF TERMINAL DEVICE CLASSES V , ' SUK A1,1 ANY MOORE IN THIS TASK CLASS? RF(Z) BDW100 NO , P ST A1,SAVE15,A13 SAVE REMAINING NUMBER
0x2dc728…2dc8bc Dummy {f00=0x012e, f01=0x0190, f02=»Y IN TC:TAB n & ! ADK A1,2 INCREMENT ENTRY POINTER P ST A1,SAVE13,A13 SAVE > 8 P LD A1,SAVE19,A13 GET NUMBER OF TASKS IN THIS CLASS " SUK A1,1 ANY MOORE TASKS LEFT P RB(P) BDWT50 , (* CHECK IF MOORE TASK DEFINITION BLOCKS *
0x2dc8bc…2dca50 Dummy {f00=0x012e, f01=0x0190, f02=»MINAL DEVICE WORK TABLES GENERATED * * P LD A2,SCTSFA 4 P SUK A2,2 J PBDW105 ADK A2,2 P CW A2,SCTEFA t P RF(NE) BDW110 P LDKL A1,LMP3 P CALL ERROR PBDW110 CWR A2,A12 P RB(NE) BDW105 , P ST A12,SCTSFA
0x2dca50…2dcbe4 Dummy {f00=0x012e, f01=0x018e, f02=»LD COMMON DEVICE TABLE * , (**************************************** " * R * REFERENCED IN: MONCON * ~ * &* ENTRY: SCTSFA - START OF FREE AREA 4 P* SAVE01 - START OF SAVE01URATION DATA ( $* SCTEFA - END OF
0x2dcbe4…2dcd78 Dummy {f00=0x012e, f01=0x0190, f02=» < P* SUBROUTINES: NXTBLK,GETCTC,GETLCN,GETSDC,GETCLN,MOVE * D EJECT N PB:CDT EQU * 2 P LD A11,SAVE01,A13 START OF SAVE01URATION DATA p & ! LD A12,SCTSFA START OF FREE AREA P LDK A7,0 RESET LENGTH * * %* GET COMMON DE
0x2dcd78…2dcf0c Dummy {f00=0x012e, f01=0x0190, f02=»0 YES ( $ CCK A2,'CC' COMMON DEV. DEF. BLOCK? P RF(NE) BCDTEX NO : P EJECT T P* b : P* RESERVE AREA IN COMMON DEVICE TABLE FOR FILE-CODES l 8 P* AND DWT-ADDRESSES USED BY COMMON TERMINAL DEVICES P* 0 P LDR A9,A11 START OF COM
0x2dcf0c…2dd0a0 Dummy {f00=0x012e, f01=0x0190, f02=»A1 SAVE " PB:CT10 RF(Z) B:CT30 NO MOORE! . P CALL GETCLN GET CLASS IDENT NUMBER (1-99) 6 , P ADR A1,A1 DISPLACEMENT TO CLASS POINTER h , P LD A5,SAVE18,A13 GET POINTER TO TCLASS $ P LDR* A2,A5 GET LENGTH OF TCLASS P SUK A2,2 EXCLUDE LENGTH
0x2dd0a0…2dd234 (3, 129) Dummy {f00=0x012e, f01=0x0190, f02=»20 ADR A1,A5 SELECT ENTRY IN TCLASS $ P LDR* A1,A1 GET POINTER TO CLASS , $ P LDR* A1,A1 GET LENGTH OF CLASS T " P SUK A1,2 EXCLUDE LENGTH WORD | & P ADR A7,A1 INCREMENT CDTAB LENGTH . P ADKL A9,TDC+TLC NEXT RECORD IN CONF. FILE " P SUK A6,1
0x2dd234…2dd3c8 Dummy {f00=0x012e, f01=0x018e, f02=»E-CODES b 8 P* AND DWT-ADDRESSES USED BY COMMON SPECIAL DEVICES P* L CALL GETSDC V ADKL A9,SDCFST-CDBNC j LDR A6,A1 PBCDT10 EQU * RF(Z) BCDTEX CALL GETCLN ADR A1,A1 , P LD A5,SAVE11,A13 GET POINTER
0x2dd3c8…2dd55c Dummy {f00=0x012e, f01=0x0190, f02=» PBCDT15 EQU * P ADR A1,A5 SELECT ENTRY $ P LDR* A1,A1 GET POINTER TO CLASS 8 P LDR* A1,A1 GET LENGTH ` SUK A1,2 ~ ADKL A9,SDC ADR A7,A1 SUK A6,1 RB BCDT10 PBCDTEX EQU * P EJECT P* < P*
0x2dd55c…2dd6f0 Dummy {f00=0x012e, f01=0x0190, f02=»O RESERVE ENTRIES IN COMMON DEVICE TABLE FOR @ P* FILE-CODES AND DWT-ADDRESSES USED FOR DATA COMMUNICATION 4 P* x J P* FILE-CODES AND DWT-ADDRESSES ARE STORED IN THE LAST CLASS IN SCLASS P* & P LD A1,SCTDCT DATA COMMUNICATION? " P LD
0x2dd6f0…2dd884 Dummy {f00=0x012e, f01=0x0190, f02=» , P ORR A6,A1 COPY LAST SCLASS IF NOT ZERO P RF(Z) CDG:15 NO! 4 , P LD A6,SAVE11,A13 GET POINTER TO SCLASS N $ P LDR* A1,A6 GET LENGTH OF SCLASS ~ " P SUK A1,2 EXCLUDE LENGTH WORD $ P ADR A6,A1 LAST ENTRY IN SCLASS * P LDR* A6,A6 GET POIN
0x2dd884…2dda18 Dummy {f00=0x012e, f01=0x0190, f02=»CD:TAB t PCDG:15 EQU * ADK A7,2 " STR A7,A12 4 P ST A12,SCTCDT H ADR A12,A7 ^ EJECT r * 6 1* INIT POINTER TO START OF FREE AREA AND TO CDTAB * ( P LD A10,SCTCDT FIRST ENTRY IN SCTCDT $ P LCR A2,A11 CO
0x2dda18…2ddbac Dummy {f00=0x012e, f01=0x0190, f02=»CDGEX PCDG:18 EQU * P* " > P* GENERATE DEVICE WORK TABLES FOR COMMON TERMINAL DEVICES , P* n * P LDR A9,A11 START OF COMMON DEF. BLOCK x 6 P ADKL A9,SDCFST NUMBER OF COMMON TERMINAL CLASSES & P CALL GETCTC GET NUMBER OF C.T.C. ,
0x2ddbac…2ddd40 Dummy {f00=0x012e, f01=0x0190, f02=»DENT NUMBER x P ST A1,SAVE14,A13 SAVE , P CALL GETLCN GET LINE CONNECTION NUMBER 2 P LDR A6,A1 SAVE b , P LD A2,SAVE14,A13 GET CLASS IDENT NUMBER z & P ADR A2,A2 CONVERT TO DISPLACEMENT , P LD A7,SAVE18,A13 GET POINTER TO TCLASS & P ADR
0x2ddd40…2dded4 (3, 130) Dummy {f00=0x012f, f01=0x018e, f02=»,TDC+TLC NEXT RECORD IN CONF. FILE * P LD A1,SAVE15,A13 GET NUMBER OF C.T.C. * P SUK A1,1 DECREMENT COUNTER X P RB B:CT40 | PB:CT50 CALL ECHO ( P ADKL A10,2 NEXT FREE ENTRY IN CDTAB P EJECT * , '* GET NUMBER OF SPECIAL DEVIC
0x2dded4…2de068 Dummy {f00=0x012f, f01=0x0190, f02=» * & #* GET SPECIAL DEVICE CLASS NUMBER * 8 CALL GETCLN B * V 0 +* GET CORRESPONDING DEVICE CLASS IN SCLASS ` * ADR A1,A1 T , P LD A6,SAVE11,A13 GET POINTER TO SCLASS P ADR A6,A1 SELECT CLASS & P LDR
0x2de068…2de1fc Dummy {f00=0x012f, f01=0x0190, f02=»LENGTH WORD ~ PCDG:30 EQU * ADK A5,4 NEXT DEVICE ( LDR* A1,A5 GET DWT-ADDRESS F ( # LD A3,DWTLEN,A1 GENERATION OF DWT? j RF(Z) CDG:40 NO * * COPY DWT * LDR A2,A12 TO-ADDRESS , ' ADR A12,A3 UPDATE P
0x2de1fc…2de390 Dummy {f00=0x012f, f01=0x0190, f02=»A3,SCTOPT GET OPTION WORD P ANK A3,1 MMU IN SYSTEM? " P RF(Z) CDG:35 NO! B ( P LDR A3,A1 GET PROTOTYPE DWT-ADDRESS * P SUR A3,A2 COMPUTE RELOCATION CONSTANT , P LD A4,DWTMEC,A2 GET MONITOR ECB-ADDRESS P ANKL A4,/FFFE MAKE IT EVEN!
0x2de390…2de524 Dummy {f00=0x012f, f01=0x0190, f02=» * * . ** STORE FILE-CODE AND DWT-ADDRESS IN TTAB * F " ST A1,2,A10 STORE DWT-ADDRESS P LD A1,-2,A5 GET FILE CODE v STR A1,A10 STORE IN TTAB $ ADKL A10,4 NEXT ENTRY IN CD:TAB & " SUK A6,4 DECREMENT DEVICE COUNTER
0x2de524…2de6b8 Dummy {f00=0x012f, f01=0x0190, f02=» P SUKL A8,1 RB CDG:20 PCDGEX EQU * ( " P RF(N) CDG:EX CD:TAB COMPLETE! < " P LD A1,SCTDMT DATA MANAGEMENT b $ P LD A5,SCTDCT DATA COMMUNICATION P ORR A1,A5 DM OR DC? " P LD A5,SCTOPT GET OPTION WORD $ P ANK A5,/E DISC PAGING
0x2de6b8…2de84c Dummy {f00=0x012f, f01=0x0190, f02=» $ P LDR* A1,A5 GET LENGTH OF SCLASS " P SUK A1,2 EXCLUDE LENGTH WORD , P ADR A5,A1 GET LAST ENTRY R * P LDR* A5,A5 GET POINTER TO LAST CLASS t ( P LDR* A6,A5 GET LENGTH OF LAST CLASS " P SUK A6,2 EXCLUDE LENGTH WORD P RB CDG:30 PCD
0x2de84c…2de9e0 Dummy {f00=0x012f, f01=0x0190, f02=»MP3 ( P CALL ERROR INDICATE MEMORY OVERFLOW PCDG:60 CWR A2,A12 8 P RB(NE) CDG:50 R , ( ST A12,SCTSFA UPDATE START OF FREE AREA h RTN A14 RETURN EJECT J F**********************************************************************
0x2de9e0…2deb74 (3, 131) Dummy {f00=0x012f, f01=0x0190, f02=»************** X * 4 /* ENTRY: A1 - LINE CONNECTION NUMBER (BINARY) > :* A7 - POINTER TO TERMINAL DEVICE CLASS IN TCLASS X * &* A6 - LINE CONNECTION NUMBER * * EXIT: * * WORK REGISTERS: A1-A8
0x2deb74…2ded08 Dummy {f00=0x012f, f01=0x0190, f02=»R d ( $ LDR* A8,A7 GET LENGTH OF THIS CLASS $ SUKL A8,2 EXCLUSIVE LENGTH WORD 6 ADK A7,2 FIRST FILECODE ^ PDWT05 EQU * ~ . ) LD A1,2,A7 GET ADDRESS OF PROTOTYPE DWT 0 P LD A6,SAVE08,A13 GET LINE CONNECTION NUMBER P* P* CHE
0x2ded08…2dee9c Dummy {f00=0x012f, f01=0x0190, f02=»0 NO! 2 P CALL B:ITSZ BUILD INTERRUPT TABLE FOR SALCUZ P RF DWT31 D ( PDWT10 CCK A4,'AA' ASCU4Z CONNECTION? V P RF(NE) DWT11 NO! 2 P CALL B:ITAZ BUILD INTERRUPT TABLE FOR AUSCU4Z P RF DWT31 PDWT11 EQU * * 4 /* DER
0x2dee9c…2df030 Dummy {f00=0x012f, f01=0x0190, f02=»MBER AND PROTOTYPE DWT v * CALL I:CHP ( * < @ P* GET CORRECT INTERRUPT TABLE USING SAVE05 (SELECTS TABLE) F " P* AND SAVE06 (SELECTS ENTRY) * 0 P* SAVE05 HOLDS 2*(NUMBER STORED IN BIS 4-6) 4 P* SAVE06 HOLDS THE NUMBER
0x2df030…2df1c4 Dummy {f00=0x012f, f01=0x0190, f02=»,SAVE10,A13 SELECT INTERRUPT TABLE , P LDR* A4,A4 GET INTERRUPT TABLE ADDRESS * $ P LD A3,SAVE06,A13 LINE PARAMETER Z PDWT15 EQU * " RF(Z) DWT17 LINE ENTRY FOUND ADK A4,28 NEXT LINE & " SUK A3,1 DECREMENT LINE PARAMETER
0x2df1c4…2df358 Dummy {f00=0x012f, f01=0x0190, f02=»ADDRESS: 0 P* USE DEVICE ADDRESSES 1-7 FOR INPUT DEVICE & P* OR DEVICE WITHOUT DATA REQUEST D 4 /* USE DEVICE ADDRESSES 8-14 FOR OUTPUT DEVICES n * 0 + LDR* A6,A1 GET FIRST WORD OF PROTOTYPE DWT P LDR A2,A6 SAVE : 5 ANKL A6,/71
0x2df358…2df4ec Dummy {f00=0x012f, f01=0x0190, f02=»UT DEVICE - CHECK IF DEVICE WITH DATA REQUEST P* 6 ( P ANKL A2,/8000 DATA REQUEST BIT SET? @ P RF(Z) DWT20 NO! l P SRL A6,2 P ADK A6,12 RF DWT30 PDWT20 EQU * P SRL A6,2 P SUK A6,2 PDWT30 EQU * A
0x2df4ec…2df680 Dummy {f00=0x012f, f01=0x0190, f02=»A6 DWT ALREADY GENERATED? P RF(Z) DWT32 NO! " P CALL DWT50 : P LDKL A1,DWT70 N P AD A1,M:REL,A13 d P ABR A1 | P* P* CHECK IF DWT IN DRIVER P* PDWT32 LDKL A2,SYSLOD P TNM A1,A2 P RF(NN) DWT34 P C
0x2df680…2df814 (3, 132) Dummy {f00=0x012f, f01=0x0190, f02=»F DWT70 PDWT38 EQU * STR A12,A6 SAVE DWT-ADDRESS $ * H * COPY DEVICE TYPE DWT R * r LDR A2,A12 TO-ADDRESS | P LD A3,DWTOR,A1 LENGTH ADR A12,A3 NEXT FREE ENTRY CALL MOVE P EJECT * $ *
0x2df814…2df9a8 Dummy {f00=0x012f, f01=0x0190, f02=»* CHECK IF INPUT DEVICE * * & LDR* A3,A1 GET FIRST WORD OF TYPE DWT * ANKL A3,/0100 INPUT DEVICE? X P RF(Z) DWT45 NO | * * INPUT DEVICE: * CHECK IF KEYBOARD * LD A3,DWTADR,A1 LD A3,DEVIND,A3
0x2df9a8…2dfb3c Dummy {f00=0x012f, f01=0x0190, f02=»TORE ADDRESS OF KEYBOARD RUNTIME-DWT : P* AND ECHO DEVICE PROTOTYPE-DWT IN ECHO DEVICE TABLE , P* j * t P LD A5,DWTECH,A1 ECHO? ~ RF(Z) DWT40 NO P AD A5,M:REL,A13 4 P LD* A3,SCTSFA+2 GET LENGTH OF ECHO DEVICE TABLE ( P RF(
0x2dfb3c…2dfcd0 Dummy {f00=0x012f, f01=0x0190, f02=»,SCTSFA+2 NEXT FREE ENTRY 8 P STR A2,A4 SAVE RUNTIME DWT-ADDRESS FOR INPUT DEVICE " < P ST A5,2,A4 SAVE PROTOTYPE DWT ADDRESS FOR OUTPUT DEVICE ^ P ADK A3,4 UPDATE LENGTH $ P ST* A3,SCTSFA+2 SAVE NEW LENGTH P EJECT PDWT40 EQU *
0x2dfcd0…2dfe64 Dummy {f00=0x012f, f01=0x0190, f02=»TO START OF BUFFER t $ ST A5,DWTSQ-4,A2 STORE POINTER $ ST A5,DWTSQ-2,A2 STORE POINTER B * j * IF DOUBLE KEYBOARD: t D @* ADD 1 TO DWT-ADDRESS AND SAVE IT IN TEMPORARY INTERRUPT TABLE 6 2* IN ENTRY CORRESPONDING TO SECOND DEVICE ADD
0x2dfe64…2dfff8 Dummy {f00=0x012f, f01=0x0190, f02=»YBOARD v $ LDR A5,A2 GET REAL DWT-ADDRESS ADK A5,1 ADD ONE 6 0 , SUK A3,1 DISPLACEMENT=0 IF DEVICE ADDRESS=1 P ADR A3,A3 BYTE DISPLACEMENT . P AD A3,SAVE07,A13 ENTRY IN INTERRUPT TABLE $ STR A5,A3 STORE DEVICE-ADDRESS RF DW
0x2dfff8…2e018c Dummy {f00=0x012f, f01=0x0190, f02=»S OF PROTOTYPE DWT IS ODD, 0 P* THE DEVICE IS TO BE USED FOR ECHOING ON. " 6 P* THE ADDRESSES OF THE PROTOTYPE- AND RUNTIME-DWT V 0 P* IS THEN STORED IN THE ECHO DEVICE TABLE. P* 0 P LD A5,DWTTAB,A1 GET DEVICE TYPE CHARACTERS , P RF(NN
0x2e018c…2e0320 Dummy {f00=0x012f, f01=0x0190, f02=» P ADK A3,2 INCLUDE LENGTH PDWT55 LDR A4,A3 SAVE LENGTH $ $ P AD A4,SCTSFA+2 NEXT FREE ENTRY H . P STR A1,A4 STORE ADDRESS OF PROTOTYPE DWT p , P ST A2,2,A4 STORE ADDRESS OF RUNTIME DWT P ADK A3,4 UPDATE LENGTH & P ST* A3,SCTSFA+2 STORE
0x2e0320…2e04b4 (3, 133) Dummy {f00=0x0130, f01=0x0190, f02=»D t P ANK A5,1 MMU PAGING? RF(Z) DWT70 ( P EJECT < , P LD A5,DWTMEC,A2 GET MONITOR ECB ADDRESS J ( P LDR A4,A1 GET PROTOTYPE DWT-ADDRESS z * P SUR A4,A2 COMPUTE RELOCATION CONSTANT , P SUR A5,A4 RELOCATE MONITOR ECB ADDRESS $ P ANK
0x2e04b4…2e0648 Dummy {f00=0x0130, f01=0x0190, f02=»TED P* & P LD A5,DWTADR,A2 GET ADDRESS BLOCK 2 P LD A4,BUFLEN,A5 GET LENGTH OF INTERNAL BUFFER @ $ P RF(Z) DWT70 ALLOCATE NO BUFFER! v * L P* ALLOCATE INTERNAL BUFFER AND STORE ADDRESS IN SECOND WORD OF INTERNAL * , P LD A5
0x2e0648…2e07dc Dummy {f00=0x0130, f01=0x0190, f02=»EN ADDRESS r P ST A3,2,A5 SAVE P LDR A3,A4 GET LENGTH , ( P ADK A3,3 ADD BO FERMS CONSTANT+1 =1 J . P ANKL A3,/FFFE MAKE SURE OF EVEN LENGTH =1 v P EJECT * 4 0* CHECK IF INTERNAL BUFFER SIZE IS GREATER THAN 6 1* THE SIZE OF B
0x2e07dc…2e0970 Dummy {f00=0x0130, f01=0x0190, f02=»Z. j * CW A3,BUFSIZ,A13 RF(NG) DWT65 0 ST A3,BUFSIZ,A13 F P ST A12,SYSBUF,A13 ` PDWT65 EQU * z ADR A12,A3 NEXT FREE ENTRY P =1 P =1 P EJECT PDWT70 EQU * P* . P* STORE FILE-
0x2e0970…2e0b04 Dummy {f00=0x0130, f01=0x0190, f02=»ORE IN TASK CONF. TABLE " P ADKL A10,2 NEXT ENTRY IN TTAB " P STR A2,A10 STORE DWT-ADDRESS F P* l , '* CHECK IF MOORE DEVICES IN THIS CLASS v * SUKL A8,4 RF(Z) DWTEX ADK A7,4 NEXT DEVICE P LDKL A1,DWT05
0x2e0b04…2e0c98 Dummy {f00=0x0130, f01=0x0190, f02=»ERY COINCIDENCE n 4 P* BETWEEN THE FIRST POINTER IN ONE POINTER-SET 4 P* AND SECOND POINTER IN THE OTHER POINTER-SET: P 0 P* STORE SECOND POINTER OF FIRST POINTER-SET 2 P* IN RUNTIME-DWT POINTED AT BY FIRST POINTER 2 P* OF SECOND POINTER-S
0x2e0c98…2e0e2c Dummy {f00=0x0130, f01=0x0190, f02=»ICE TABLE IS CLEARED. P* 8 PECHO LD* A3,SCTSFA+2 GET LENGTH OF ECHO DEVICE TABLE ( " P RF(Z) DWT160 NO ECHO DEVICES! d 4 P AD A3,SCTSFA+2 COMPUTE END OF ECHO DEVICE TABLE 2 P LD A1,SCTSFA+2 GET START OF ECHO DEVICE TABLE P ADK A1,2 BYPASS
0x2e0e2c…2e0fc0 Dummy {f00=0x0130, f01=0x0190, f02=» POINTER IN FIRST SET t > PDWT110 CWR* A4,A2 COMPARE WITH FIRST POINTER IN SECOND SET P RF(E) DWT130 COINCIDENCE! ` P ADK A2,4 NEXT POINTER-SET ( P CWR A2,A3 END OF ECHO DEVICE TABLE $ P RB(NE) DWT110 NO:CHECK NEXT SET P RF DWT140 :
0x2e0fc0…2e1154 (3, 134) Dummy {f00=0x0130, f01=0x0190, f02=» STORE DEVICE-ADDRESS TO ECHO-DEVICE P CMR A1 CLEAR FIRST POINTER , " P CM 2,A1 CLEAR SECOND POINTER P $ PDWT140 ADK A1,4 NEXT POINTER-SET v ( P CWR A1,A3 END OF ECHO DEVICE TABLE P RB(NE) DWT90 NO! $ PDWT150 CM* SCTSFA+2 CLEAR LENGTH
0x2e1154…2e12e8 Dummy {f00=0x0130, f01=0x018e, f02=» * %************************************* * 2 * REFERENCED IN: DWTGEN < * , (* ENTRY: A1 - POINTER TO PROTOTYPE DWT f ( #* A2 - POINTER TO REAL DWT * &* A6 - LINE CONNECTION NUMBER * P* A9 - POINTER
0x2e12e8…2e147c Dummy {f00=0x0130, f01=0x0190, f02=» R 0 P* SAVE06 - SELECTS LINE ENTRY (1-8) * < * WORK REGISTERS: A3,A4,A5 F * j * SUBROUTINES: t * EJECT PI:CHP EQU * 0 P LD A6,SAVE08,A13 GET LINE CONNECTION NUMBER * P CWK A6,0032 CONNECTION NUMB
0x2e147c…2e1610 Dummy {f00=0x0130, f01=0x0190, f02=»CONNECTION NUMBER z 0 + LDR* A5,A1 GET FIRST WOED OF PROTOTYPE DWT ( # ANKL A5,/F1F0 CLEAR BITS TO MODIFY N 2 . LDR A3,A6 GET MODIFIED LINE CONNECTION NUMBER z & " LC A4,TDC+5,A9 CHECK TYPE OF LINE CCK A4,'LL' LOCAL LINE? RF(NE) I:CHPR
0x2e1610…2e17a4 Dummy {f00=0x0130, f01=0x0190, f02=» ORR A5,A3 MERGE WITH OLD CONTENTS * % LDR A3,A6 GET LINE CONNECTION NUMBER * ANK A3,/18 GET BITS 11-12 X SRL A3,2 MOVE TO BITS 13-14 z P ST A3,SAVE05,A13 SAVE SRL A3,1 MOVE TO BITS 14-15 & " ORR A5,A3 MERGE WITH OLD CONTENTS
0x2e17a4…2e1938 Dummy {f00=0x0130, f01=0x0190, f02=»I:CH10 0 , ANKL A5,/F1FF CLEAR BITS 4-6 (= STORE ZERO) * P ST A3,SAVE06,A13 SAVE ENTRY SELECTOR B RF I:CH50 p PI:CH10 EQU * ANK A3,2 GET BIT 14 RF(NZ) I:CH20 & " ORKL A5,/0800 STORE 4 IN BITS 4-6 LDK A3,4 ENTRY SELECT
0x2e1938…2e1acc Dummy {f00=0x0130, f01=0x0190, f02=» | RF(NZ) I:CH30 & " ORKL A5,/0200 STORE 1 IN BITS 4-6 LDK A3,1 ENTRY SELECTOR H P ST A3,SAVE06,A13 SAVE h RF I:CH50 PI:CH30 EQU * & " ORKL A5,/0A00 STORE 5 IN BITS 4-6 LDK A3,5 ENTRY SELECTOR P ST A3,SAVE06,A13
0x2e1acc…2e1c60 Dummy {f00=0x0130, f01=0x018e, f02=»UK A3,2 DECREMENT LINE CONNECTION NUMBER RF(N) I:CH70 0 & " ADK A4,1 INCREMENT TABLE SELECTOR F RB I:CH60 p PI:CH70 EQU * ( $ ORR A5,A4 STORE COMPUTED BITS 12-15 SUK A4,4 ANK A4,6 ADK A4,8 P ST A4,SAVE05,A1
0x2e1c60…2e1df4 (3, 135) Dummy {f00=0x0130, f01=0x0190, f02=» P EJECT : P****************************************************** : P* * T : P* B:ITAS - BUILD INTERRUPT TABLES FO ASCU4Z/SALCUZ * : P* ================================================ *
0x2e1df4…2e1f88 Dummy {f00=0x0130, f01=0x0190, f02=» * : P* REFERENCED IN: DWTGEN * 8 : P* * v : P* ENTRY: A1 - POINTER TO PROTOTYPE-DWT * : P* A6 - LINE C
0x2e1f88…2e211c Dummy {f00=0x0130, f01=0x0190, f02=» * n : P* EXIT: A5 - CHANNEL PARAMETER * : P* A6 - LINE ENTRY * Z : P* * : P* WORK REGISTERS: A2,A3,A4,A5,A6
0x2e211c…2e22b0 Dummy {f00=0x0130, f01=0x0190, f02=»* * : P****************************************************** > P EJECT | PB:ITAZ EQU * * P CWK A6,0016 CONNECTION NUMBER <= 16? P RB(G) NUMERR NO! * P CWK A6,0001 CONNECTION NUMBER >=
0x2e22b0…2e2444 Dummy {f00=0x0130, f01=0x0190, f02=»BITZ10 YES * P ADK A2,ASZLEN FIXED NUMBER OF ENTRIES P ST A2,INTAS SAVE @ , PBITZ10 LD A5,SAVE03,A13 FIRST LINE ENTRY Z P RF BITZ30 PB:ITSZ EQU * ( P CWK A6,0004 CONNECTION NUMBER <= 4? P RB(G) NUMERR NO! * P CWK A6,0001 CONNE
0x2e2444…2e25d8 Dummy {f00=0x0130, f01=0x0190, f02=» h P RF(NZ) BITZ20 YES! * P ADK A2,SCZLEN FIXED NUMBER OF ENTRIES $ P ST A2,INTSL SAVE R . PBITZ20 LD A5,SAVE04,A13 FIRST LINE ENTRY? l " PBITZ30 ADR A2,A5 END OF TABLE P SUK A6,1 & P SLL A6,1 CONVERT TO DISPLACEMENT P ADR A6,
0x2e25d8…2e276c Dummy {f00=0x0130, f01=0x0190, f02=»UR A3,A6 COMPUTE RELATIVE DISPLACEMENT " P STR A3,A6 STORE IN LINE ENTRY . P LDK A3,6 TABLE INCREMENT T P ADR* A3,A4 UPDATE LENGTH v P STR A3,A4 STORE NEW LENGTH P LDR* A3,A6 GET DISPLACEMENT 2 PBITZ40 ADR A6,A3 GET START OF LINE CONF.
0x2e276c…2e2900 Dummy {f00=0x0130, f01=0x0190, f02=»OR 3 ALLOWED n P SUK A3,2 MAKE DISPLACEMENT 0 P ADR A6,A3 SELECT ENTRY IN LINE CONF. TABLE 8 0 P LD A4,SAVE08,A13 GET LINE CONNECTION NUMBER l P SUK A4,1 LINE NUMBER 0-15 P LDR A3,A4 SAVE LINE NUMBER P SRL A3,3 SELECT ASCU4Z CARD (
0x2e2900…2e2a94 (3, 136) Dummy {f00=0x0130, f01=0x0190, f02=»ION x " PBITZ50 ADK A3,/C CHANNEL INDEX $ P ANK A3,/F ISOLATE CHANNEL INDEX 2 " P ANK A4,7 ISOLATE LINE NUMBER Z P SRC A4,7 MOVE TO BITS 4-6 , P ORR A4,A3 MERGE LINE NO AND CH. PARAM. 0 P LDR* A5,A1 GET PROTOTYPE CHANNEL PARAMETER > P A
0x2e2a94…2e2c28 Dummy {f00=0x0130, f01=0x0190, f02=» 2 .********************************************** 2 .* B:ITAB - BUILD REAL-TIME INTERRUPT TABLE * : 2 .********************************************** p * * REFERENCED IN: DWTGEN * * &* ENTRY: SCTSFA - START OF FREE AREA
0x2e2c28…2e2dbc Dummy {f00=0x0130, f01=0x0190, f02=» A2 - " " * A3 - " > P* A4 - LENGTH OF LINE SAVE01URATION TABLE B * %* A5 - DEVICE COUNTER ( #* A6 - LINE COUNTER 2 P* A7 - DISPLACEMENT IN SAV
0x2e2dbc…2e2f50 Dummy {f00=0x0130, f01=0x0190, f02=»L INT. TABLE X > 9* A12- LINE ENTRY IN REAL INTERRUPT TABLE * V * SUBROUTINES ` * v P EJECT PB:ITAB EQU * 2 - LD A12,SCTSFA INIT POINTER TO FIRST R. I. T. P LDR A11,A12 $ LDK A7,0 RESET POINTER IN I
0x2e2f50…2e30e4 Dummy {f00=0x0130, f01=0x0190, f02=» LINE CONF. TABLE t * 0 +* GET ADDRESS TO TEMPORARY INTERRUPT TABLE $ * X P LD A10,SAVE10,A13 b ADR A10,A7 | LDR* A10,A10 & P LDK A6,0 RESET LINE ENTRY POINTER PBIT20 EQU * * 8 P* SAVE POINTER TO START O
0x2e30e4…2e3278 Dummy {f00=0x0130, f01=0x0190, f02=» SAVE START OF LINE SAVE01URATION TABLE ~ . ) LDK A4,0 RESET LENGTH OF LINE CONF.TABLE 0 * b 0 -* INIT POINTER IN TEMPORARY INTERRUPT TABLE l * &* TO POINT AT LAST INPUT DEVICE ENTRY * ADKL A10,12 LDK A5,7 ADKL A11,
0x2e3278…2e340c Dummy {f00=0x0130, f01=0x0190, f02=»* PBIT30 EQU * LDR* A1,A10 OCCUPIED ENTRY? RF(NZ) BIT40 YES B PBIT35 EQU * , ( SUK A5,1 NO; CHECK IF LAST DEVICE ENTRY p RF(Z) BIT50 YES * < 7* NO ENTRIES IN THE INPUT DEVICE PART OF THE TEMPORARY 0 +* INT
0x2e340c…2e35a0 Dummy {f00=0x0130, f01=0x0190, f02=» INT. TABLE r RB BIT30 * & F B* AN OCCUPIED ENTRY IN THE TEMPORARY INTERRUPT TABLE HAS OCURRED. 0 D @* COPY THE CONTENTS OF THE INPUT DEVICE PART (INCLUDING ZEROES) z H C* OF THE TEMPORARY INTERRUPT TABLE UP TO AND INCLUDING THIS ENTRY.
0x2e35a0…2e3734 (3, 137) Dummy {f00=0x0131, f01=0x0190, f02=» ENTRY? | RF(Z) BIT50 YES $ SUKL A10,2 NEXT ENTRY IN T.I.T. ( $ SUKL A11,2 NEXT ENTRY IN R.I.T. P * & LDR* A1,A10 GET CONTENT OF NEXT ENTRY x RB BIT40 EJECT PBIT50 EQU * * B >* ALL ENTRIES OF THE INPUT DEVICE P
0x2e3734…2e38c8 Dummy {f00=0x0131, f01=0x0190, f02=» THE TEMPORARY INTERRUPT TABLE. * -INIT DEVICE COUNTER. ( * H ADKL A10,14 R LDK A5,7 f * x L G* SCAN ENTRIES IN OUTPUT DEVICE PART OF THE TEMPORARY INTERRUPT TABLE. $ * -IF AN OCCUPIED ENTRY OCCUR: L P* FIND FIRST
0x2e38c8…2e3a5c Dummy {f00=0x0131, f01=0x0190, f02=» J 6 P* -IF THIS EXTENDS THE LINE SAVE01URATION TABLE: * INCREMENT LENGTH B * ^ PBIT70 EQU * h LDR* A1,A10 OCCUPIED ENTRY? | RF(NZ) BIT90 YES SUK A5,1 LAST ENTRY RF(Z) BIT120 YES PBIT80 EQU * ADK
0x2e3a5c…2e3bf0 Dummy {f00=0x0131, f01=0x0190, f02=»ERRUPT TAB R L P* HAS OCURRED. FIND FIRST UNOCCUPIED ENTRY IN LINE SAVE01URATION TABLE * OF REAL INTERRUPT TABLE. b * P LDR* A2,A11 RF(Z) BIT100 P ADKL A11,2 RB BIT90 EJECT PBIT100 EQU * *
0x2e3bf0…2e3d84 Dummy {f00=0x0131, f01=0x0190, f02=»GTH IF TABLE WAS EXTENDED. * " STR A1,A11 STORE CONTENT , * P LD A1,SAVE23,A13 GET START OF L.C.T. N " LDR A3,A11 GET CURRENT ENTRY | P SUR A3,A1 COMPUTE LENGTH CWR A3,A4 L.C.T. EXTENDED? RF(NG) BIT110 LDR A4,A3
0x2e3d84…2e3f18 Dummy {f00=0x0131, f01=0x0190, f02=»NTRIES OF THIS LINE IN TEMPORARY INTERRUPT TABLE HAS BEEN SCANNE D ?* -IF ANY ENTRY WAS OCCUPIED (LENGTH>0): STORE POINTER TO LINE H L P* SAVE01URATION TABLE IN THIS LINE ENTRY AND STORE LENGTH IN FIRST WOR * " LDR A4,A4 ANY ENTRY OCCUPIED?
0x2e3f18…2e40ac Dummy {f00=0x0131, f01=0x0190, f02=»A12 STORE IN LINE ENTRY 4 / STR A4,A1 STORE LENGTH IN FIRST WORD OF L.C.T. LDR A11,A1 START OF L.C.T. X . ) ADR A11,A4 LAST OCCUPIED ENTRY IN L.C.T. | ADKL A11,2 NEXT FREE ENTRY RF BIT140 EJECT PBIT130 EQU * *
0x2e40ac…2e4240 Dummy {f00=0x0131, f01=0x0190, f02=» CONTAIN ZERO * SUKL A11,2 SKIP LENGTH WORD PBIT140 EQU * D $ ADKL A10,2 NEXT ENTRY IN T.I.T. X $ ADK A6,1 INCREMENT LINE COUNTER CWK A6,8 ALL LINES SCANNED? RF(E) BIT150 YES ADKL A12,2 NEXT LINE ENTRY
0x2e4240…2e43d4 (3, 138) Dummy {f00=0x0131, f01=0x0190, f02=»ANY LINE t P* * P LD A1,SAVE24,A13 ANY DEVICE PRESENT? P RF(Z) BIT155 NO! H 2 P LD A1,SAVE21,A13 GET INTERRUPT TABLE ADDRESS b P ST A1,INTLT1,A7 SAVE P RF BIT158 PBIT155 EQU * . P LD A11,SAVE21,A13 GET START OF FREE AREA
0x2e43d4…2e4568 Dummy {f00=0x0131, f01=0x0190, f02=»LT1-INTRT4) HAS BEEN GENERATED j * & ADK A7,2 NEXT ENTRY IN ITAB 0 CWK A7,16 LAST ENTRY? T RF(E) BIT160 YES r $ LDR A12,A11 GET NEXT FREE ENTRY RB BIT10 PBIT160 EQU * * D @* ALL ENTRIES IN THE TEMPORARY INTE
0x2e4568…2e46fc Dummy {f00=0x0131, f01=0x0190, f02=»BLES HAS BEEN INSERTED IN MOXTAB. l * * P* 4 2 P* MOVE INTERRUPT TABLE FOR SALCUZ AND ASCU4Z > < P* TO CONCATENATE INTERRUPT TABLES FOR CHLT/CHRT DEVICES t P* ( P LD A3,INTAS ANY ASCU4Z CONNECTION? P RF(Z) BIT180 NO! P LDR
0x2e46fc…2e4890 Dummy {f00=0x0131, f01=0x0190, f02=» STORE ADDRESS TO INTERRUPT TABLE $ P ADK A2,ASZLEN LAST LINE ENTRY+2 * , PBIT170 SUK A2,2 DECREMENT ENTRY POINTER R , P LDR* A1,A2 ANY CONNECTION ON THIS LINE? P RF(Z) BIT175 NO! P ADRS A2,A2 RELOCATE POINTER . PBIT175 CW A2,INTAS ALL P
0x2e4890…2e4a24 Dummy {f00=0x0131, f01=0x018e, f02=»A11 GET TO-ADDRESS & P ADR A11,A3 END OF INTERRUPT TABLE & P LD A1,SAVE04,A13 GET FROM-ADDRESS D $ P CALL MOVE MOVE INTERRUPT TABLE n 2 P ST A2,INTSL STORE ADDRESS TO INTERRUPT TABLE $ P ADK A2,SCZLEN LAST LINE ENTRY+2 , PBIT190 SUK A2,2 DECR
0x2e4a24…2e4bb8 Dummy {f00=0x0131, f01=0x0190, f02=» . PBIT195 CW A2,INTSL ALL POINTERS RELOCATED? P RB(NE) BIT190 NO! 6 PBIT200 EQU * P P LD A2,SCTSFA d P SUK A2,2 z PBIT210 ADK A2,2 * P CW A2,SCTEFA CHECK IF MEMORY OVERFLOW P RF(NE) BIT220 P LDKL A1,LMP3 ( P CALL ERRO
0x2e4bb8…2e4d4c Dummy {f00=0x0131, f01=0x0190, f02=»A11,SCTSFA UPDATE START OF FREE AREA RTN A14 RETURN , EJECT D T P*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*= R 6 1* GENERAL SUBROUTINES * T P*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=
0x2e4d4c…2e4ee0 Dummy {f00=0x0131, f01=0x018e, f02=»* GETTSK - GET NUMBER OF TASKS IN A TASK-CLASS * P* < 6 P* GETCTC - GET NUMBER OF COMMON TERMINAL CLASSES F P* 8 4**************************************************** * " P* REFERENCED IN: B:TCT,B:CDT * > :* ENTRY
0x2e4ee0…2e5074 (3, 139) Dummy {f00=0x0131, f01=0x0190, f02=» L * * WORK REGISTERS: A5 * 0 * SUBROUTINES: CONVRT : * Z PGETTSK EQU * d PGETCTC EQU * x P LC A5,TDBNT,A11 SLL A5,8 P LC A5,TDBNT+1,A11 CALL CONVRT RTN A14 EJECT 8 4******
0x2e5074…2e5208 Dummy {f00=0x0131, f01=0x0190, f02=»****************************** z * & * REFERENCED IN: B:TT 0 * P > :* ENTRY: A11 - POINTER TO START OF TASK DEFINITION BLOCK Z * D @* EXIT: A1 - NUMBER OF TERMINAL DEVICE CLASSES (BINRY VALUE) * * WORK REGISTER
0x2e5208…2e539c Dummy {f00=0x0131, f01=0x0190, f02=»NC+1,A11 CALL CONVRT RTN A14 $ EJECT 4 8 3*************************************************** B 8 3* GETSDC - GET NUMBER OF SPECIAL DEVICE CLASSES * ~ 8 3*************************************************** * * REFER
0x2e539c…2e5530 Dummy {f00=0x0131, f01=0x0190, f02=»VICE CLASSES (BINARY VALUE) l * $ * WORK REGISTERS: A5 . * L * SUBROUTINES: CONVRT V * v PGETSDC EQU * LCR A5,A9 P SLL A5,8 LC A5,1,A9 CALL CONVRT RTN A14 EJECT 2 .**********
0x2e5530…2e56c4 Dummy {f00=0x0131, f01=0x0190, f02=»******** j * * REFERENCED IN: B:TT * : 6 2* ENTRY: A9 - POINTER TO CLASS DEFINITION RECORD D * ~ > :* EXIT: A1 - CLASS IDENTIFICATION NUMBER (BINARY VALUE) * * WORK REGISTERS: A5 * * SUBROUTIN
0x2e56c4…2e5858 Dummy {f00=0x0131, f01=0x0190, f02=» RTN A14 RETURN P EJECT . )***************************************** & . )* GETLCN - GET LINE CONNECTION NUMBER * X . )***************************************** * * REFERENCED IN: B:DWTT * 8 3* ENTRY: A9 - POINTE
0x2e5858…2e59ec Dummy {f00=0x0131, f01=0x0190, f02=»S: A5 * * SUBROUTINES: CONVRT * 8 PGETLCN EQU * B P LC A5,LCND1,A9 V P SLL A5,8 n P LC A5,LCND2,A9 P CALL CONVRT RTN A14 P EJECT : P***************************************************** : P
0x2e59ec…2e5b80 Dummy {f00=0x0131, f01=0x0190, f02=»======================= * : P* * 2 : P* REFERENCED IN: B:TT * p : P* * : P* ENTRY: A5 - TCL IN CURRE
0x2e5b80…2e5d14 (3, 140) Dummy {f00=0x0131, f01=0x018e, f02=»TASK CLASS * h : P* * : P* WORK REGISTERS: A1-A7,A10 * T : P* * : P* SUBROUTINES: GETTSK,NXTBLK *
0x2e5d14…2e5ea8 Dummy {f00=0x0131, f01=0x0190, f02=» PGETTCL EQU * P LDR A6,A5 SAVE TCL P LDR A7,A6 TCL START VALUE 4 8 P LDR A10,A11 SAVE POINTER TO CURRENT TASK DEF. BLOCK V 2 P LD A11,SAVE01,A13 START OF CONFIGURATION DATA 4 PTCL:10 CWR A11,A10 ALL PREVIOUS BLOCKS SCANNED? P RF(E) T
0x2e5ea8…2e603c Dummy {f00=0x0131, f01=0x0190, f02=»AR IN TCL p P CWR A5,A6 SAME TCL? P RF(NE) TCL:50 NO! . & P CALL GETTSK GET NUMBER OF COPIES H P ADR A7,A1 INCREMENT TCL r 0 PTCL:50 CALL NXTBLK GET NEXT TASK DEF. BLOCK P RB TCL:10 , PTCL:60 LDR A5,A7 SAVE START VALUE OF TCL P
0x2e603c…2e61d0 Dummy {f00=0x0131, f01=0x0190, f02=»*********************************** * , * REFERENCED IN: SEGGEN 6 * X " * ENTRY: A2 - MEMORY ADDRESS b . )* MMUOPT - MMU OPTION SWITCH (X) * , (* EXIT: A1 - CONTENT OF MEMORY ADDRESS * * WORK RE
0x2e61d0…2e6364 Dummy {f00=0x0131, f01=0x0190, f02=»ON ~ P RF(Z) GCON10 NO MMU ELR A1,A2 & P RF GCON20 8 PGCON10 EQU * J LDR* A1,A2 ^ PGCON20 EQU * r RTN A14 RETURN EJECT B >************************************************************** B >* BINASC - CONVERT A
0x2e6364…2e64f8 Dummy {f00=0x0131, f01=0x0190, f02=» B >************************************************************** * J * REFERENCED IN: B:DWTT T * v , (* ENTRY: A1 - BINARY NUMBER TO CONVERT * 0 ,* EXIT: A5 - TWO-DIGIT ASCII-CODED NUMBER * * WORK REGISTER
0x2e64f8…2e668c Dummy {f00=0x0131, f01=0x018e, f02=» LDK A2,0 LDR A1,A1 PBIN:20 EQU * $ RF(Z) BINEX 8 ADK A2,1 L CWK A2,10 ^ RF(E) BIN:30 p SUK A1,1 RB BIN:20 PBIN:30 EQU * ADKL A5,/0100 LDK A2,0 SUK A1,1 RB BIN:20
0x2e668c…2e6820 Dummy {f00=0x0131, f01=0x0190, f02=» N D P* START MONITOR SAVE01URATION * D P**************************************************************** P PCONMON EQU * ( P CALL B:TCT BUILD TASK CONTROL TABLE & P CALL B:FWT BUILD FILE WORK TABLES ( P CALL
0x2e6820…2e69b4 (3, 141) Dummy {f00=0x0132, f01=0x0190, f02=» 2 P CALL B:SWBT BUILD SWAPPABLE WORK BLOCK TABLE P XIF > 2 P CALL B:DMTT BUILD DATA MANAGEMENT TASK TABLES J & P CALL B:TT BUILD USER TASK TABLES 2 P CALL B:DWTS BUILD SPECIAL DEVICE WORK TABLES 2 P CALL B:DWTT BUILD TERMINAL DEVICE WORK
0x2e69b4…2e6b48 Dummy {f00=0x0132, f01=0x0190, f02=»F ASSEMBLER APPLICATION P* " P LD A4,SCTOPT GET OPTION WORD * ( P RF(N) SLDM80 ASSEMBLER APPLICATION P ( P LD A1,SCTLAC GET ADDRESS TO S:GTAB | P IFF MMUPAG=1 & P LDR* A3,A1 GET ADDRESS TO P:MTAB $ P LD A1,2,A1 GET APPLICATON TYPE
0x2e6b48…2e6cdc Dummy {f00=0x0132, f01=0x0190, f02=»E r 2 P EL A2,I:RSTE,A3 GET INTERPRETER RESTART ENTRY P XIF @ PSLDM70 EQU * L P ST A2,SCTIOE SAVE IN SYSTAB ` P* " P* CHECK IF CREDIT APPLICATION P* P CWK A1,'CR' CREDIT? P RF(NE) SLDM80 NO P IFF MMUPAG=1 "
0x2e6cdc…2e6e70 Dummy {f00=0x0132, f01=0x0190, f02=» P EJECT F P***************************************************************** F P* END OF MONITOR SAVE01URATION PART * ` F P* -CONTINUE WITH APPLICATION SAVE01URATION PART * F P********************
0x2e6e70…2e7004 Dummy {f00=0x0132, f01=0x4060, f02=»T BASE-ADDRESS & P ADKL A8,SYSLDX APPL. CONF. ENTRY P ABR A8 @ P END P@ * END OF MONITOR SAVE01URATION PART * ` F P* -CONTINUE WITH APPLICATION SAVE01URATION PART * F P********************
0x2e7004…2e7198 Dummy {f00=0x0132, f01=0x403c, f02=» 0 P******************************************** @ 8 P ABR A8 @ P END P@ * END OF MONITOR SAVE01URATION PART * ` F P* -CONTINUE WITH APPLICATION SAVE01URATION PART * F P********************
0x2e7198…2e732c Dummy {f00=0x0132, f01=0x2008, f02=» P X ` h p
0x2e732c…2e74c0 Dummy {f00=0x0132, f01=0x0000, f02=»
0x2e74c0…2e7654 (3, 142) Opaque[0x194]
0x2e7654…2e77e8 # DirEnt {nam=»SYSLDA«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2200, f03=0x0000}
0x2e7654…2e77e8 IdxSect {
0x2e7654…2e77e8 f00 = 0x0110 // 0x2e7654 @0x0
0x2e7654…2e77e8 f01 = 0x0056 // 0x2e7656 @0x2
0x2e7654…2e77e8 gno = [ // 0x2e7658 @0x4
0x2e7654…2e77e8 [0x00]: C0x0110.0x0.0
0x2e7654…2e77e8 [0x01]: C0x0110.0x1.0
0x2e7654…2e77e8 [0x02]: C0x0110.0x2.0
0x2e7654…2e77e8 [0x03]: C0x0110.0x3.0
0x2e7654…2e77e8 [0x04]: C0x0111.0x0.0
0x2e7654…2e77e8 [0x05]: C0x0111.0x1.0
0x2e7654…2e77e8 [0x06]: C0x0111.0x2.0
0x2e7654…2e77e8 [0x07]: C0x0111.0x3.0
0x2e7654…2e77e8 [0x08]: C0x0112.0x0.0
0x2e7654…2e77e8 [0x09]: C0x0112.0x1.0
0x2e7654…2e77e8 [0x0a]: C0x0112.0x2.0
0x2e7654…2e77e8 [0x0b]: C0x0112.0x3.0
0x2e7654…2e77e8 [0x0c]: C0x0113.0x0.0
0x2e7654…2e77e8 [0x0d]: C0x0113.0x1.0
0x2e7654…2e77e8 [0x0e]: C0x0113.0x2.0
0x2e7654…2e77e8 [0x0f]: C0x0113.0x3.0
0x2e7654…2e77e8 [0x10]: C0x0114.0x0.0
0x2e7654…2e77e8 [0x11]: C0x0114.0x1.0
0x2e7654…2e77e8 [0x12]: C0x0114.0x2.0
0x2e7654…2e77e8 [0x13]: C0x0114.0x3.0
0x2e7654…2e77e8 [0x14]: C0x0115.0x0.0
0x2e7654…2e77e8 [0x15]: C0x0115.0x1.0
0x2e7654…2e77e8 [0x16]: C0x0115.0x2.0
0x2e7654…2e77e8 [0x17]: C0x0115.0x3.0
0x2e7654…2e77e8 [0x18]: C0x0116.0x0.0
0x2e7654…2e77e8 [0x19]: C0x0116.0x1.0
0x2e7654…2e77e8 [0x1a]: C0x0116.0x2.0
0x2e7654…2e77e8 [0x1b]: C0x0116.0x3.0
0x2e7654…2e77e8 [0x1c]: C0x0117.0x0.0
0x2e7654…2e77e8 [0x1d]: C0x0117.0x1.0
0x2e7654…2e77e8 [0x1e]: C0x0117.0x2.0
0x2e7654…2e77e8 [0x1f]: C0x0132.0x1.0
0x2e7654…2e77e8 [0x20]: C0x0132.0x2.0
0x2e7654…2e77e8 [0x21]: C0x0132.0x3.0
0x2e7654…2e77e8 [0x22]: C0x0133.0x0.0
0x2e7654…2e77e8 [0x23]: C0x0134.0x0.0
0x2e7654…2e77e8 [0x24]: C0x0134.0x1.0
0x2e7654…2e77e8 [0x25]: C0x0134.0x2.0
0x2e7654…2e77e8 [0x26]: C0x0134.0x3.0
0x2e7654…2e77e8 [0x27]: C0x0135.0x0.0
0x2e7654…2e77e8 [0x28]: C0x0135.0x1.0
0x2e7654…2e77e8 [0x29]: C0x0135.0x2.0
0x2e7654…2e77e8 [0x2a]: C0x0135.0x3.0
0x2e7654…2e77e8 ]
0x2e7654…2e77e8 }
0x2e77e8…2e797c Dummy {f00=0x0110, f01=0x018e, f02=» 2 P IDENT SYSLDA REL 10.0 80-05-29 870105041000 P : P REL 10.0 80-03-14 B * P =1,FAULTY STACK BASE WHEN USING MMU ^ P P > P********************************************************** P* $ P* PHILIPS TERMINAL SYS
0x2e797c…2e7b10 Dummy {f00=0x0110, f01=0x0190, f02=» P* > P********************************************************** P* T P* ^ F P* THIS PART OF THE SYSTEM START-UP WILL TAKE CARE OF APPLICATION h B P* (CREDIT) CONFIGURATION AND START OF APPLICATION. SYSLDA IS F P* ENTERED AFTE
0x2e7b10…2e7ca4 Dummy {f00=0x0110, f01=0x0190, f02=» P* ASSEMBLER APPLICATION: J P* NO CONFIGURATION WILL TAKE PLACE. FIRST USER TASK IS ACTIVATED * F P* AND A BRANCH IS MADE TO P F I N I T . ALL USER TASK TTAB'S x $ P* MM-TABLES ARE FILLED IN. P* P* CREDIT APPLICATI
0x2e7ca4…2e7e38 Dummy {f00=0x0110, f01=0x0190, f02=»REAL TASKS & ^ . P* NUMBER OF USER WORK-BLOCK COPIES). H P* SYSLDA THEN MOVES ITSELF TO FOLLOW MONITOR AND WILL ALSO MOVE F , P* DDIV-PROTOTYPE TO FOLLOW SYSLDA. P* H P* APPLICATION WORKBLOCKS, DESCRIPTORS, STACK AND TABLES
0x2e7e38…2e7fcc Dummy {f00=0x0110, f01=0x0190, f02=»LLOCATED AT 'BOTTOM' OF d H P* MEMORY; ELSE, IF NO MMU, BUFFERS ARE ALLOCATED AFTER MONITOR P* 'OVER' SYSLDA. l P* H P* ALL USER TASKS ARE QUEUED VIA A C T O T AND ALL MM-TABLES F P* IN USER TASK TTAB'S ARE FILLED. A
0x2e7fcc…2e8160 Dummy {f00=0x0110, f01=0x0190, f02=»* v P* * P* ENTRIES AND EXTERNALS * . P* * R P*************************** v P P* LABEL ENTRIES , P ENTRY JUMP BYPASS JUMP FOR LOAD-MODULE P ENTRY SYSLDX P ENT
0x2e8160…2e82f4 (3, 143) Dummy {f00=0x0110, f01=0x0190, f02=»RROR $ P ENTRY CMPADR COMPARE ADDRESSES 2 P ENTRY NXTBLK SKIP TO NEXT CONFIGURATION BLOCK 4 4 P ENTRY NXTCOM SKIP COMMONDEVICE DEFINITION BLOCK j * P ENTRY CONVRT CONVERSION ASCII-BINARY 2 P ENTRY GETNUM CONVERT 3 ASCII-DIGITS TO BINARY & P E
0x2e82f4…2e8488 Dummy {f00=0x0110, f01=0x0190, f02=»BSOLUTE START ADDRESS OF WORK-TAB 1 4 P ENTRY MMEND ABSOLUTE END ADDRESS OF WORK-TAB 1 , 2 P ENTRY MMDDIV WORK-TABLE 2 (MM) RELATIVE 'REL' d , P ENTRY BUFSIZ TEMPORARY MOVE-BUFFER SIZE . P ENTRY SYSBUF TEMPORARY MOVE-BUFFER START 4 P ENTRY M:REL
0x2e8488…2e861c Dummy {f00=0x0110, f01=0x0190, f02=»NTRY SAVE05,SAVE06,SAVE07,SAVE08 & P ENTRY SAVE09,SAVE10,SAVE11,SAVE02 ( & P ENTRY SAVE13,SAVE14,SAVE15,SAVE16 R & P ENTRY SAVE17,SAVE18,SAVE19,SAVE20 | & P ENTRY SAVE21,SAVE22,SAVE23,SAVE24 & P ENTRY SAVE25,SAVE26,SAVE27,SAVE28 P ENTRY SAVE29,
0x2e861c…2e87b0 Dummy {f00=0x0110, f01=0x0190, f02=» FREE AREA z 2 P EXTRN SCTLAC LOGICALL ADDRESS TO COMMON PART P EXTRN SCTTCT TC:TAB ADDRESS H P EXTRN SCTSTB A15 STACK-BASE l " P EXTRN SCTEFA END OF FREE AREA " P EXTRN SCTNOP NUMBER OF PAGES P EXTRN SCTPSZ PAGE SIZE P EXTRN SCTMM
0x2e87b0…2e8944 Dummy {f00=0x0110, f01=0x0190, f02=» TABLE f P EXTRN SCTBUG BUGGER ADDRESS P 2 P* EXTERNAL LABELS : 6 P EXTRN SYSLDM START OF MONITOR CONFIGURATION PART T $ P EXTRN PAGQUE PAGE QUEUE POINTER P P* EXTERNAL SUBROUTINES P EXTRN ACTOT QUEUE TASK P EXTRN PFINI
0x2e8944…2e8ad8 Dummy {f00=0x0110, f01=0x0190, f02=»XTRN TTB:SA START OF SAVE AREA IN TTAB 8 P EXTRN TTB:CB DISPL. TO CURRENT SEGMENT BASE ADDRESS . P EJECT j P x P , P*************************************** , P* CONDITIONAL ASSEMBLY * , P********************************
0x2e8ad8…2e8c6c Dummy {f00=0x0110, f01=0x0190, f02=»ER z P PMMUSWB EQU MMUPAG+SWPBLK P 2 PSWBMMU EQU SWPBLK-MMUPAG : P EJECT Z P h P PROGRAM STRUCTURE: p P F P* ------------------------------------------------------- L P* ! RELOCATION ROUTINE
0x2e8c6c…2e8e00 Dummy {f00=0x0110, f01=0x0190, f02=»-------------------------------------------! z F P* ! SAVE & COMMUNICATION AREA. MMU - WORK TABLES ! 4 F P* !-----------------------------------------------------! ~ F P* ! SUBROUTINES. -COMMON TO ALL PARTS IN PROGRAM.
0x2e8e00…2e8f94 (3, 144) Dummy {f00=0x0110, f01=0x018e, f02=» ! PART 2.B F P* ! BUILD REAL TASK-LOCAL DATA AREAS ! F P* ! -QUEUE TASK VIA 'ACTOT' ! j F P* ! -FILL MM-TABLE IN TTAB ! F P*
0x2e8f94…2e9128 Dummy {f00=0x0110, f01=0x0190, f02=» F P* ! -ALLOCATE FIXED BUFFERS AND STACK ! F P* ! -UPDATE TID IN T:A AND SAVE TID IN T:AID TABLE ! N F P* ! -START DEBUGGER (IF ANY) AND START APPLICATION ! F P* !--------------------------
0x2e9128…2e92bc Dummy {f00=0x0110, f01=0x0190, f02=»OVE DDIV PROTOTYPE TO FOLLOW SYSLDA ! F P* ! ! : F P* ! C O M D A T ! F P* ! GENERATE COMMON DATA AREA. PROCESS CWB'S & U
0x2e92bc…2e9450 Dummy {f00=0x0110, f01=0x0190, f02=» ! b F P* ! ! F P* ! C L A D A T ! f F P* ! BUILD TASK CLASS DATA AREAS. PROCESS CWB'S, UWB'S ! F P* !
0x2e9450…2e95e4 Dummy {f00=0x0110, f01=0x0190, f02=» ! -MOVE T:D ! F P* ! -MOVE D.T. & W.B., COPY UWB'S ! H F P* ! -MOVE D.T.'S OF SWB'S AND TWB'S ! F P* ! -SEARCH DBLK-TAB FOR DWB'S. MO
0x2e95e4…2e9778 Dummy {f00=0x0110, f01=0x0190, f02=» ! p F P* ! P R O D A T ! * F P* ! BUILD PROTOTYPE TASK-LOCAL DATA AREAS. ! t F P* ! -GENERATE TWB'S AND RESERVE FOR SWB'S ! F P
0x2e9778…2e990c Dummy {f00=0x0110, f01=0x0190, f02=» ! R F P* ! -INCLUDE DDIV-PROTOTYPE & PART 2.A IN FREE AREA. ! F P* ! -CONTINUE IN PART 2.B ! V F P* !-----------------------------------------------------! N P* ! SUBROUTINES
0x2e990c…2e9aa0 Dummy {f00=0x0110, f01=0x0190, f02=» ! CREDIT APPLICATION: ! ASSEMBLER APPLICATION: ! F P* ! READ CUNFIGURATION FILE ! -FILL MM-TABLES IN ! @ F P* ! AND BUILD SHADOW-TABLES. ! USER TASK TTAB'S. ! F P* ! ! -QUEUE 1:S
0x2e9aa0…2e9c34 (3, 145) Dummy {f00=0x0110, f01=0x0190, f02=»-------------------------! h F P* ! REAL TASKS' IS BUILT AT ! " F P* ! THE END OF MONITOR. ! l F P* ! U:BTAB: ! F P*
0x2e9c34…2e9dc8 Dummy {f00=0x0110, f01=0x0190, f02=» F P* ! ! F P* ! -RELOCATE ALL W.B.-ADDRESSES IN DDIV-PROTOTYPE. ! N F P* ! -REMOVE NOT USED ENTRIES IN T:ATAB ! F P* ! -RELOCATE ADDRESSES IN U
0x2e9dc8…2e9f5c Dummy {f00=0x0110, f01=0x0190, f02=» ! v F P* ! -CONTINUE IN PART 2.A ! 0 F P* !-----------------------------------------------------! z P EJECT P P ***************** P ************
0x2e9f5c…2ea0f0 Dummy {f00=0x0110, f01=0x0190, f02=»********* P P********** P* P:MTAB * 0 P********** B PT:ATAB EQU 0 T PU:BTAB EQU 2 h PP:BAS EQU 6 SEGMENT BASE | . PT:AID EQU 32 ADDRESS TO 'TABLE OF T:A TID' ( PS:BTAB EQU 40 DISP TO S:BTAB ADDRESS , PI:RSTE EQU 42
0x2ea0f0…2ea284 Dummy {f00=0x0110, f01=0x0190, f02=»ITIAL U:BTAB p " PUPADDR EQU 2 PROTOTYPE ADDRESS PUPNAME EQU 4 PROTOTYPE NAME : 8 PUPNUMB EQU 7 SAVE AREA NUMBER OF COPIES (SHADOW-TBL) ^ P* . PUR:REC EQU 6 RECORD LENGTH IN REAL U:BTAB * PURADDR EQU 2 ADDRESS TO FIRST REAL UWB PURNU
0x2ea284…2ea418 Dummy {f00=0x0110, f01=0x0190, f02=»*********** | $ P* CONFIGURATION FILE (CONFIG) * $ P******************************* < P d P* TASK DEFINITION BLOCK: p PTDBBT EQU 0 1A BLOCK TYPE ( PTDBNT EQU TDBBT+1 2N NUMBER OF TASKS , PTDBID EQU TDBNT+2 6A TASK ID START VALUE
0x2ea418…2ea5ac Dummy {f00=0x0110, f01=0x0190, f02=»VICE CLASSES f P* & PTDBFST EQU TDBNC+2 FIRST TERM DEF $ PTDC EQU 7 TERMINAL DEVICE CLASS H PTLC EQU 6 LINE CONNECTION p ( PTDBREC EQU TDC+TLC TDB-RECORD LENGTH P* * PSDC EQU 7 SPECIAL DEVICE CLASS-RECORD P* P* COMMON
0x2ea5ac…2ea740 Dummy {f00=0x0110, f01=0x018e, f02=»+2 FIRST SDC-RECORD P* P* & & P* USER WORK BLOCK TYPE DEF. BLOCK 0 PUDBBT EQU 0 1A BLOCK TYPE Z , PUDBNU EQU UDBBT+1 3A NUMBER OF UWB TYPES | P* ( PUDBFST EQU UDBNU+3 FIRST UDB-RECORD PNAMUWB EQU 3 NAME OF UWB " PNUMUBL
0x2ea740…2ea8d4 (3, 146) Dummy {f00=0x0111, f01=0x018e, f02=» P* T:A * P********* PT:ASTA EQU -14 T:A START ( 6 PCSE EQU -14 CURRENT SEGMENT END (HERE: STACKSIZE) H $ PCSB EQU -12 CURRENT SEGMENT BASE 4 PCSN EQU -10 CURRENT SEGMENT NUMBER (HERE LENGTH 2 P OF ALL DSCB
0x2ea8d4…2eaa68 Dummy {f00=0x0111, f01=0x0190, f02=» j P PT:ATID EQU -4 TASK ID PSTKE EQU -2 STACK END 2 PPA EQU 0 STACK POINTER P PSTKB EQU 2 STACK BASE n " PWATFST EQU 4 FIRST WAT-ELEMENT P* P* DSCB-RECORD: PDSCBL EQU 20 RECORD LENGTH PBA EQU 2 BUFFER ADDR
0x2eaa68…2eabfc Dummy {f00=0x0111, f01=0x0190, f02=» P********* P* T:D * P********* , ( PFCD EQU 0 DISPLACEMENT TO FCB IN T:A > , PT:DTID EQU 2 TASK IDENTIFIER (PROTOTYPE) j , PDATLEN EQU 4 NUMBER OF DATASETS (DSCB'S) & PWATLEN EQU 6 NUMBER OF WATELEMENTS 0 PTWBMSK EQU 8 MASK FO
0x2eabfc…2ead90 Dummy {f00=0x0111, f01=0x0190, f02=»4 MASK FOR UWB'S -"- ( PDWBFST EQU 16 FIRST WORD IN DBLK-TAB ! " P ! N . PSTPREC EQU 4 RECORD LENGTH OF START-POINTS ! V P ! P ! P**************** ! P* SOP-HANDLING * ! P**************** ! PSOP EQU /2E DEVICE ADDRESS ! P !
0x2ead90…2eaf24 Dummy {f00=0x0111, f01=0x0190, f02=» /100 MEMORY OVERFLOW ! & PLMP4 EQU /80 FORMAT ERROR (CONFIG) " PLMP5 EQU /40 TID ERROR " H " PLMP6 EQU /20 UWB OR SWB ERROR " f " PLMP7 EQU /10 MM-TABLE OVERFLOW " PLMP8 EQU 8 " PLMP9 EQU 4 " PLMP10 EQU 2 " PLMP11 EQU 1 " P EJECT "
0x2eaf24…2eb0b8 Dummy {f00=0x0111, f01=0x0190, f02=»OCK " r , PDTLEN EQU -2 LENGTH OF DESCRIPTOR-TABLE # & PSWBLEN EQU 4 DISP TO LENGTH OF SWB # < P # f $ PFCBDD1 EQU 8 DISP TO FIRST DSET # r $ PFCBDD2 EQU 10 DISP TO 2:ND DSET # P # $ PSTKSZ EQU 128 DEFAULT STACK-SIZE # P # & PCREID
0x2eb0b8…2eb24c Dummy {f00=0x0111, f01=0x0190, f02=» P $ PTTBTID EQU 2 TID IN TTAB $ . PT:DSAV EQU 0 SAVE FOR T:D-ADDRESS IN TTAB $ , * PTTB:PP EQU 6 SAVE AREA FOR TCL IN TTAB $ ^ P $ ( PNTPA EQU 4 INTERPRETER START ADDRESS $ & PIHRTC EQU 4 RTC INTERRUPT ADDRESS $ $ PRTCDA EQU /1B RTC DEVICE ADDRE
0x2eb24c…2eb3e0 Dummy {f00=0x0111, f01=0x018e, f02=»A13 * $ h F P* DATA [REL-ADDRESS] * % " F P* * % l F P***************************************************************** % P %
0x2eb3e0…2eb574 (3, 147) Dummy {f00=0x0111, f01=0x0190, f02=» % 6 P************************************************** & 6 P** ** & B 6 P** RELOCATION ROUTINE & STACK INITIALLISATION ** & | 6 P** ** & 6 P************************
0x2eb574…2eb708 Dummy {f00=0x0111, f01=0x0190, f02=»HANDLER & p & P LDR A13,P GET BASE ADDRESS TO A13 ' P SUKL A13,4 ' : P* ADJUST FOR PSW-ROUTINE * ' N P************************** ' p 4 P LDK A3,GETPSW RELATIVE ADDRESS TO 'PSW-ADDRESS' ' P ADR A3,A13 ABSOLUT DITO ' 4 P ST A3,PSW,A13 STORE ADDRESS T
0x2eb708…2eb89c Dummy {f00=0x0111, f01=0x0190, f02=» P RTN A8 ( P ( P ( P* STACK * ( , P********* ( > P* ( P P RES 12 ( Z PSTACKB EQU *-REL-2 ( j P EJECT ( P ( P ( P* ADDRESS TO PSW-ROUTINE * ( P************************** ( P* ( PPSW EQU *-REL (
0x2eb89c…2eba30 Dummy {f00=0x0111, f01=0x0190, f02=» E T P S W * ( v D P* LITTLE SUBROUTINE TO PUT PSW IN STACK FOR CALLING SUBROUTINE * ) . D P**************************************************************** ) v P ) PGETPSW EQU *-REL ) $ P STR A2,A14 SAVE A2 ON A14-STACK ) 0
0x2eba30…2ebbc4 Dummy {f00=0x0111, f01=0x0190, f02=» RTN A14 ) P EJECT * P * & P********************************* * & & P* * * P & P* SUBROUTINE-HANDLER * * z & P* * * & P********************************* * P * PSUBSUB E
0x2ebbc4…2ebd58 Dummy {f00=0x0111, f01=0x0190, f02=» * p P IM 4,A14 + 0 P AD A10,M:REL,A13 ADD FOR SYSLDM RELOCATION + P STR A10,A14 PUT ON STACK + N P LD A10,MUL,A13 RESTORE A10 + p P ABR* A14 + P + P + P + < P******************************************************* + < P* JUMP TO
0x2ebd58…2ebeec Dummy {f00=0x0111, f01=0x0190, f02=»YSLDM + P EJECT , P , ( P************************************ , ( ( P** ** , T ( P** SAVE, AND COMMUNICATION AREA ** , ( P** ** , ( P************************************ , P
0x2ebeec…2ec080 Dummy {f00=0x0111, f01=0x0190, f02=»OD EQU *-REL U:BTAB OLD ADDRESS , P DATA 0 - ( ( PU:BTNW EQU *-REL U:BTAB NEW ADDRESS - 8 P DATA 0 - d ( PS:BTOD EQU *-REL S:BTAB OLD ADDRESS - t P DATA 0 - ( PS:BTNW EQU *-REL S:BTAB NEW ADDRESS - P DATA 0 - . PMOVADD EQU *-REL ADDRESS-CHA
0x2ec080…2ec214 (3, 148) Dummy {f00=0x0111, f01=0x0190, f02=»SS INDICATOR - v P FOR TABLE-SCANNING . P DATA 0 . 2 : PLSTADR EQU *-REL LAST ADDRESS WHEN BUILDING DATA PART . B P DATA 0 . @ PFSTADR EQU *-REL FIRST FREE ADDRESS WHEN ALLOCATING BUFFERS . P DATA 0 . * PNEWAD1 EQU *-REL SAVE FOR W.B. ADDRE
0x2ec214…2ec3a8 Dummy {f00=0x0111, f01=0x0190, f02=» . 6 PFLAG EQU *-REL REAL TASK DATA PROCESSING INDICATOR / P DATA 0 / B " PUWB EQU *-REL U.W.B. INDICATOR / R P DATA 0 / x & PAPPTYP EQU *-REL APPLICATION TYPE / P DATA 0 / $ PSAVE01 EQU *-REL TEMPORARY SAVE / P DATA 0 / PSAVE02 EQU *-R
0x2ec3a8…2ec53c Dummy {f00=0x0111, f01=0x018e, f02=»0 / PSAVE06 EQU *-REL 0 P DATA 0 0 " PSAVE07 EQU *-REL 0 2 P DATA 0 0 J PSAVE08 EQU *-REL 0 Z P DATA 0 0 r PSAVE09 EQU *-REL SAVE AREAS 0 P DATA 0 0 PSAVE10 EQU *-REL 0 P DATA 0 0 PSAVE11 EQU *-REL 0 P DATA 0 0 PSA
0x2ec53c…2ec6d0 Dummy {f00=0x0111, f01=0x018e, f02=» 0 ~ P DATA 0 1 PSAVE26 EQU *-REL 1 P DATA 0 1 0 PSAVE27 EQU *-REL 1 @ P DATA 0 1 X PSAVE28 EQU *-REL 1 h P DATA 0 1 PSAVE29 EQU *-REL 1 P DATA 0 1 PSAVE30 EQU *-REL 1 P DATA 0 1 & PWBADD EQU *-REL W.B.-ADDRESS SAVE 1
0x2ec6d0…2ec864 Dummy {f00=0x0111, f01=0x0190, f02=» 8 PTADISP EQU *-REL DISPLACEMENT IN T:A TO W.B. ADDRESS 2 P DATA 0 2 @ * PDATEND EQU *-REL END OF DDIV PROTOTYPE 2 P P DATA 0 2 ~ ( PMMREL1 EQU *-REL PHYSICALL PAGE BASE 2 P DATA 0 2 * PM:REL EQU *-REL RELOCATION FOR SYSLDM 2 P DATA 0 2 P
0x2ec864…2ec9f8 Dummy {f00=0x0111, f01=0x0190, f02=» *-REL MMTABLE ADDRESS 2 P DATA 0 3 * PMMFROM EQU *-REL 2:ND MMTABLE ADDRESS 3 . P DATA 0 3 0 PFYSPAG EQU *-REL LAST PHYSICALLY PAGE NUMBER 3 l P DATA 0 3 PFSTPAG EQU *-REL 3 ( P DATA 0 FIRST FREE PAGE (PHYSICALL) 3 ( PTTAB EQU *-REL CORRE
0x2ec9f8…2ecb8c Dummy {f00=0x0111, f01=0x0190, f02=»H 3 r P 4 P 4 P 4 & P********************************* 4 " & P* EQUATES FOR SYSLDM SAVE-WORDS * 4 L & P********************************* 4 v P 4 PSAVE14 EQU U:BTOD 4 PSAVE15 EQU U:BTNW 4 PSAVE16 EQU MOVADD 4 PSAVE17 EQU ENDADD
0x2ecb8c…2ecd20 Dummy {f00=0x0111, f01=0x0190, f02=»SAVE24 EQU FLAG 4 P EJECT 5 P 5 & P* MMU TABLES * 5 . P 5 D P 5 L . PMMDDIV EQU *-REL DDIV (& SYSLDA) MM-TABLE 5 T P IFT MMUPAG=1 5 P RES 16 5 P XIF 5 P 5 $ PMMTAB EQU *-REL WORK AREA MM-TAB 5 PTABBE EQU * 5 P IFT MMUPAG=
0x2ecd20…2eceb4 (3, 149) Dummy {f00=0x0111, f01=0x0190, f02=»A 5 n 4 PTTPAG DATA 0 LAST ENTRY (FROM BOTTOM) IN MM-TAB 6 0 PLSTPAG EQU TTPAG-* DISPL. TO 'ENTRY-POINTER' 6 B P DATA 0 6 v P 6 PMMBEG EQU TABBE-* 6 P EJECT 6 P 6 6 P*** *** 6 6 P*** S
0x2eceb4…2ed048 Dummy {f00=0x0111, f01=0x018e, f02=» *** 6 p 6 P************************************************* 7 6 P************************************************* 7 T P 7 P 7 , P** E R R O R ** 7 , P** ** 7 , P**
0x2ed048…2ed1dc Dummy {f00=0x0111, f01=0x0190, f02=» 7 f , P** INPUT :A1=SOP-MESSAGE ** 8 , P** OUTPUT:A2=RELATIVE CALLING ADDRESS** 8 8 , P** (REG-CONTENTS IS SAVED) ** 8 h , P**************************************** 8 P 8 PERROR EQU * 8 P ST A2,SAVE01,A13 SAVE A2 8 . P L
0x2ed1dc…2ed370 Dummy {f00=0x0111, f01=0x0190, f02=»NG PURPOS) 8 | P EJECT 9 P 9 & P** M O V E ** 9 ( & P** ** 9 R & P** ** 9 | & P** MOVE BLOCKS INSIDE MEMORY ** 9 & P** ** 9 & P** INPUT:A1=F
0x2ed370…2ed504 Dummy {f00=0x0111, f01=0x0190, f02=» ** 9 x & P** WORK-REG: A4 ** : & P********************************* : < P : f PMOVE EQU * : r $ PMOVES ADR A1,A3 END OF FROM AREA : P ADR A2,A3 END OF TO-AREA : & P LD A4,SCTEFA GET END OF FREE AREA : P TNM A2,A4 SIGN
0x2ed504…2ed698 Dummy {f00=0x0111, f01=0x0190, f02=» SIGN : n 8 PMOVCK RF(NG) MOVE10 END OF TO-AREA<=END OF FREE AREA ; * P LDKL A1,LMP3 INDICATE MEMORY OVERFLOW ; J P CALL ERROR ; x PMOVE10 SUK A3,1 DEC LENGTH ; P RF(N) MOVE20 ALL DONE ; P SUK A1,1 ; P SUK A2,1 ; P LCR A4,A1 GET CHARACTER
0x2ed698…2ed82c Dummy {f00=0x0111, f01=0x0190, f02=» ; 4 P** M O V I N G ** < 4 P** ** < D 4 P** ** < | 4 P** USES ROUTINE 'MOVE' ABOVE. TO-ADDRESS IS ** < 4 P** ASSUMED TO BE DATA-PART
0x2ed82c…2ed9c0 Dummy {f00=0x0111, f01=0x0190, f02=» 4 P** ** = 4 P** INPUT:A3 & A1 AS IN 'MOVE' ** = < 4 P** OUTPUT: A2=TO-ADDRESS (LSTADR UPDATED) ** = t 4 P** WORK-REG: A4 ** = 4 P************************************
0x2ed9c0…2edb54 (3, 150) Dummy {f00=0x0112, f01=0x0190, f02=»FE MAKE EVEN ADDRESS = P ST A11,SAVE01,A13 SAVE A11 > P ST A9,SAVE12,A13 SAVE A9 > @ P LDR A11,A2 > b * P LD A9,DATEND,A13 END OF PROTOTYP AREA > v " P CALL CMPADR COMPARE ADDRESSES > P RF(NL) MOV020 > ( PMOV010 LDKL A1,LMP3 MEMORY OVERFLOW >
0x2edb54…2edce8 Dummy {f00=0x0112, f01=0x0190, f02=»A13 NEW ADDRESS > ( P LD A9,SAVE12,A13 RESTORE REGISTERS ? P LD A11,SAVE01,A13 ? D P RB MOVES ? ^ P XIF ? p P IFT CREDIT+MMUPAG=2 ? | P EJECT ? ? 4 P** X M O V E ** ? 4 P**
0x2edce8…2ede7c Dummy {f00=0x0112, f01=0x0190, f02=» TWO PHASES:-MOVE TO SYSTEM AREA (BUFBEG) ** ? 4 P** -MOVE TO USER AREA ** @ 6 4 P** IF 'BUFSIZ' (TEMPORARY MOVE-BUFFER) IS NOT** @ n 4 P** BIG ENOUGH THE MOVE IS REPEATED ** @ 4 P**
0x2ede7c…2ee010 Dummy {f00=0x0112, f01=0x0190, f02=» A3=LENGTH (IN BYTES) ** @ 4 P** WORK.REGS:A4,A10 ** A . 4 P************************************************ A f P A PXMOVE EQU * A P ST A1,SAVE09,A13 A P ST A1,SAVE07,A13 A P ST A2,SAVE10,A13 A P
0x2ee010…2ee1a4 Dummy {f00=0x0112, f01=0x0190, f02=» PXMOV05 EQU * B LDR A10,A3 SAVE LENGTH B , ( LDK A4,0 RESET 'NUMBER-OF-MOVE' COUNTER B 8 * P LDR A11,A3 GET LENGTH OF AREA TO MOVE B h 0 P LD A9,BUFSIZ,A13 GET TEMPORARY BUFFER SIZE B . P CALL CMPADR TEMPORARY BUFFER BIG ENOUGTH B " RF(G) SPLIT
0x2ee1a4…2ee338 Dummy {f00=0x0112, f01=0x0190, f02=»ER START-ADDRESS B p $ P TL* MMFROM,A13 LOAD FROM-TABLE C , ( MVUS A3 MOVE DATA-BLOCK TO TEMP. BUFFER C @ 0 P ST A1,SAVE09,A13 SAVE END OF 'FROM' ADDRESS C p P LD A1,SYSBUF,A13 C 0 P LD A2,SAVE08,A13 GET START OF 'TO' ADDRESS C LDR A3,A10 GET LENGTH
0x2ee338…2ee4cc Dummy {f00=0x0112, f01=0x0190, f02=»V30 NO! C P ADR A2,A10 D 0 P ST A2,SAVE08,A13 SAVE START OF 'TO' ADDRESS D $ * P LD A3,SAVE11,A13 GET REQUESTED LENGTH D X $ SUR A3,A10 SUBTRACT MOVED PART D P ST A3,SAVE11,A13 SAVE D P CWR A3,A10 D P RB(NL) XMOV10 D P LDR A10,A3 LAST L
0x2ee4cc…2ee660 Dummy {f00=0x0112, f01=0x0190, f02=» DV BUFSIZ,A13 AND DIVIDE E 2 P LDR A4,A2 GET QUOTIENT (=NUMBER OF MOVES - 1) E & & " LD A10,BUFSIZ,A13 MOVE MAX LENGTH E P RB XMOV10 E E 0 PXMOV30 LD A2,SAVE10,A13 RESTORE 'TO-ADDRESS' E , P LD A1,SAVE07,A13 RESTORE 'FROM-ADDRESS' E P LD
0x2ee660…2ee7f4 (3, 151) Dummy {f00=0x0112, f01=0x0190, f02=»N G ** E v 4 P** ** F 4 P** ** F V 4 P** USES SUBROUTINE 'XMOVE' TO MOVE A BLOCK ** F 4 P** VIA TWO MM-TABLES.PHYSICALL TO-ADDRESS ** F 4 P** IS ALW
0x2ee7f4…2ee988 Dummy {f00=0x0112, f01=0x0190, f02=» &FYSPAG ** F n 4 P** IS UPDATED AND CHECKED. ** G 4 P** ** G N 4 P** INPUT :A1 & A3 AS IN 'XMOVE' ** G 4 P** TTAB=POINTER TO TTAB (OR LIKELY) ** G 4 P** OUTPUT:A2=LOGI
0x2ee988…2eeb1c Dummy {f00=0x0112, f01=0x0190, f02=»***** G f P H PMOVING EQU * H P ST A11,SAVE01,A13 SAVE A11 H * P ST A9,SAVE12,A13 SAVE A9 H N . ) LD A4,FYSPAG,A13 GET ACT. PHYSICALL PAGE H p & P LD A10,TTAB,A13 LOAD TTAB-ADDRESS H 2 . LD A2,LSTPAG,A10 GET LAST TABLE-ENTRY IN TTAB H " LDR*
0x2eeb1c…2eecb0 Dummy {f00=0x0112, f01=0x0190, f02=»400 ADJUST FOR 'SETTAB' H $ P CALL SETTAB NEW PAGE IN TABLE! I 6 PMOV010 LD A11,LSTADR,A13 GET LAST LOGICALL ADDRESS I H ANKL A11,/FFF I * P LDR A9,A3 GET LENGTH OF AREA TO MOVE I 0 P CALL CMPADR ENOUGTH SPACE IN CURRENT PAGE? I P RF(NL) MOV020
0x2eecb0…2eee44 Dummy {f00=0x0112, f01=0x0190, f02=» ADKL A11,4096 PHYSICAL PAGE INCREMENT I P RB MOV015 J . 2 PMOV020 SUR A11,A3 COMPUTE DISPLACEMENT IN PAGE J @ PMOV025 RF(NN) MOV050 J v * PMOV030 CALL SETTAB NEW PAGE IN TABLE! J & ! ADKL A11,4096 NEW PAGE INCREMENT J ( P RB(N) MOV030 NOT ENOUGH. NEW
0x2eee44…2eefd8 Dummy {f00=0x0112, f01=0x0190, f02=» J t " P* A2=CURRENT ENTRY IN MM-TABLE K K . PMOV050 EQU * K 6 , ( ST A2,LSTPAG,A10 SAVE MMU-ENTRY IN TTAB K J 0 , ST A4,FYSPAG,A13 SAVE PHYSICALL PAGE NUMBER K z 4 P LDKL A4,MMBEG CALCULATE TABLE ENTRY DISPLACEM. K & " ADR A4,A10 ABSOLUTE ENTRY ADDRESS
0x2eefd8…2ef16c Dummy {f00=0x0112, f01=0x0190, f02=» * P ORR A2,A11 GET DISPLACEM. WITHIN PAGE L P ANKL A2,/FFFE EVEN ADDRESS L 2 , ' ST A2,LSTADR,A13 SAVE LOGICALL ADDRESS L V P* CHECK ADDRESSES * L P L * P LD A9,FSTPAG,A13 GET FIRST FREE PAGE L P ST A11,SAVE07,A13 SAVE A11 L P LD A11,FYSP
0x2ef16c…2ef300 Dummy {f00=0x0112, f01=0x0190, f02=» P LD A9,FSTADR,A13 M P CALL CMPADR M P RF(NL) MOV090 OK! M 2 PMOV070 LDKL A1,LMP3 M L P CALL ERROR M h PMOV090 EQU * M | P CALL XMOVE MOVE M P LD A9,SAVE12,A13 M ( P LD A11,SAVE01,A13 RESTORE REGISTERS M $ P TL* MMFROM,A13 RESTORE MM
0x2ef300…2ef494 (3, 152) Dummy {f00=0x0112, f01=0x0190, f02=» ** M v 6 P** ** N 6 P** SET NEW PAGE IN MM-TABLE & CHECK IF TABLE ** N Z 6 P** OVERFLOW. ** N 6 P** ** N 6 P
0x2ef494…2ef628 Dummy {f00=0x0112, f01=0x0190, f02=»S UPDATED ** N | 6 P** WORK.REG: A9 ** O & 6 P************************************************* O ` P O PSETTAB EQU * O SUKL A4,/400 GET NEXT PAGE O SUK A2,2 GET NEXT ENTRY O P O " P* CHEC
0x2ef628…2ef7bc Dummy {f00=0x0112, f01=0x0190, f02=» O r P RF(NN) SETT00 P P CWR A9,A2 P P RF SETT05 P 0 PSETT00 CWR A2,A9 OVERFLOW? P B PSETT05 RF(NL) SETT10 NO P d P LDK A1,LMP7 P P CALL ERROR P PSETT10 EQU * P STR A4,A2 STORE IN TABLE P RTN A14 P P XIF P P IFF CREDI
0x2ef7bc…2ef950 Dummy {f00=0x0112, f01=0x018e, f02=» ** P f 4 P** ** Q 4 P** GET WORK BLOCK ADDRESS AND DISPLACE- ** Q F 4 P** MENT IN T:A ** Q ~ 4 P** ** Q 4 P** INPUT : A8= POINTER TO
0x2ef950…2efae4 Dummy {f00=0x0112, f01=0x0190, f02=» Q ^ 4 P** TADISP=A4 ** R 4 P** A11=W.B.-ADDRESS ** R @ 4 P** WBADD=POINTER TO W.B.-ADD IN T:A ** R x 4 P*********************************************** R P R PGETWB EQU * R " P
0x2efae4…2efc78 Dummy {f00=0x0112, f01=0x0190, f02=»T R n P IFT CREDIT-MMUPAG=1 S P LDR* A11,A8 GET T:A-ADDRESS S & P ADR A11,A4 ADD DISPLACEMENT S J P ST A11,WBADD,A13 SAVE S n " P LDR* A11,A11 GET W.B.-ADDRESS S P XIF S P IFT CREDIT+MMUPAG=2 S 0 P LD A11,FLAG,A13 REAL TASK-DATA PROCESSING? S
0x2efc78…2efe0c Dummy {f00=0x0112, f01=0x0190, f02=»NT S v P ST A11,WBADD,A13 SAVE T " P ELR A11,A11 GET W.B.-ADDRESS T ( & P TL* MMFROM,A13 RELOAD FROM-TABLE T N P XIF T x P IFF CREDIT=0 T P RTN A14 T P EJECT T P T P T 8 P** M O V W B ** T
0x2efe0c…2effa0 Dummy {f00=0x0112, f01=0x0190, f02=»K-BLOCK. W.B.-ADDRESS IS UPDATED ** T 8 P** ** U 0 8 P** INPUT: A11=W.B.-ADDRESS ** U l 8 P** OUTPUT: 'WBADD'=POINTER TO MOVED W.B.ADDRESS ** U 8 P** WORK-REGS: A1-A4
0x2effa0…2f0134 (3, 153) Dummy {f00=0x0112, f01=0x0190, f02=»ESS U | P ADKL A1,WBLEN FROM-ADDRESS V P IFT CREDIT-MMUPAG=1 V 0 P LDR* A3,A1 LENGTH V L P CALL MOVING V f 6 P SUKL A2,WBLEN ADJUST TO-ADDRESS FOR DISPLACEMENT V z 4 P ST* A2,WBADD,A13 UPDATE W.B.-ADDRESS AFTER MOVE V P XIF V P IFT CREDIT+MMUP
0x2f0134…2f02c8 Dummy {f00=0x0112, f01=0x0190, f02=» DATA-PART PROCESSING? V | P RF(Z) MOVW10 NO! W P TL* MMTO,A13 LOAD TO-TABLE W 8 : PMOVW10 ES* A2,WBADD,A13 UPDATE W.B.-ADDRESS AFTER MOVE W & P TL* MMFROM,A13 RELOAD FROM-TABLE W P XIF W P IFF CREDIT=0 W P RTN A14 W P EJECT W P
0x2f02c8…2f045c Dummy {f00=0x0112, f01=0x0190, f02=» W Z : P** ** X : P** MOVE DISCRIPTOR TABLE. D.T.-ADDRESS IS UPDATED ** X F : P** ** X : P** INPUT :WBADD POINTS TO W.B.-ADDRESS IN T:A ** X : P** OUTP
0x2f045c…2f05f0 Dummy {f00=0x0112, f01=0x018e, f02=»********************************* X | P Y * PMOVDT EQU * Y 6 6 P LD A1,WBADD,A13 GET POINTER TO W.B-ADDRESS IN WAT Y J & P SUK A1,2 POINTER TO D.T.-ADDRESS Y P IFT CREDIT-MMUPAG=1 Y P LDR* A1,A1 D.T.-ADDRESS Y * P ADKL A1,DTLEN ADJUST FOR LENG
0x2f05f0…2f0784 Dummy {f00=0x0112, f01=0x0190, f02=» Y P SUKL A1,DTLEN Z 4 P ST A2,-2,A3 UPDATE D.T-ADDRESS. A2=NEW ADDRESS Z P XIF Z V P IFT CREDIT+MMUPAG=2 Z b P ELR A1,A1 D.T.-ADDRESS Z ~ * P ADKL A1,DTLEN ADJUST FOR LENGTH WORD Z P AD A1,MOVADD,A13 RELOCATE Z P ELR A3,A1 LENGTH Z P
0x2f0784…2f0918 Dummy {f00=0x0112, f01=0x0190, f02=» Z ` P XIF [ P IFF CREDIT=0 [ P RTN A14 [ * P EJECT [ : P [ H < P** M O V D W B ** [ T < P** ** [ < P**
0x2f0918…2f0aac Dummy {f00=0x0112, f01=0x0190, f02=» < P** ** < P** INPUT : A12=T:D-ADDRESS ** D < P** A8= POINTER TO T:A-ADDRESS ** < P** BIT=BIT NUMBER SAT IN DWBMSK ( 0-15 ) ** < P**
0x2f0aac…2f0c40 Dummy {f00=0x0112, f01=0x0190, f02=»MOVDWB EQU * P ST A6,SAVE05,A13 SAVE A5 ] P LDK A6,0 ] 6 ( PMOVD10 LD A4,BIT,A13 GET BIT NUMBER ] H " P ADK A4,1 FIRST WAT-ELEMENT =1 ] t P IFT CREDIT-MMUPAG=1 ] P LD A2,WATLEN,A12 ] P XIF ] P IFT CREDIT+MMUPAG=2 ] P EL A2,WATLEN,A1
0x2f0c40…2f0dd4 (3, 154) Dummy {f00=0x0113, f01=0x0190, f02=»=TABLE INDEX ] ~ P SUK A2,1 ALL? ^ P RF(N) MOVD60 YES! ^ * P IFT CREDIT-MMUPAG=1 ^ D " P CC A4,DWBFST,A6 SHARED W.B.? ^ ` P XIF ^ P IFT CREDIT+MMUPAG=2 ^ * P EL A10,DWBFST,A6 CHECK IF SHARED W.B. ^ " P SRC A6,1 RIGHT OR LEFT BYTE? ^ P RF(N)
0x2f0dd4…2f0f68 Dummy {f00=0x0113, f01=0x0190, f02=»OINTER ^ x P CWR A4,A10 SHARED W.B.? _ P XIF _ . P IFF CREDIT=0 _ : P RB(NE) MOVD20 NO! _ P P* DWB FOUND * _ j , P NGR A4,A2 CALCULATE DISPLACEMENT IN T:A _ P IFT CREDIT-MMUPAG=1 _ P AD A4,WATLEN,A12 _ P XIF _ P IFT CREDIT+MMUPAG=2 _
0x2f0f68…2f10fc Dummy {f00=0x0113, f01=0x0190, f02=» P SLL A4,2 ` P ADK A4,WATFST+2 ` * P LD A3,NEWAD2,A13 GET NEW W.B.-ADDRESS ` . P IFT CREDIT-MMUPAG=1 ` 2 P ADR* A4,A8 A4=POINTER TO W.B.-ADDRESS IN T:A ` x " P STR A3,A4 CHANGE W.B.-ADDRESS ` P XIF ` P IFT CREDIT+MMUPAG=2 ` . P LD A2,FLAG,
0x2f10fc…2f1290 Dummy {f00=0x0113, f01=0x0190, f02=»OINTER TO W.B.-ADDR IN T:A ` P ADR A4,A10 a " " P ESR A3,A4 CHANGE W.B.-ADDRESS a 6 & P TL* MMFROM,A13 RELOAD FROM-TABLE a P XIF a P IFF CREDIT=0 a P ST A4,WBADD,A13 a . P LD A2,SWITCH,A13 WB-ADDRESS CHANGE ONLY? a P RB(NZ) MOVD10 YES! a
0x2f1290…2f1424 Dummy {f00=0x0113, f01=0x0190, f02=» P b P b 4 P** T W B S W B ** b 4 P** ** b L 4 P** COPY TWB'S AND RESERVE SPACE FOR SWB'S ** b 4 P** ** b 4 P** INPUT : A8=ACTUA
0x2f1424…2f15b8 Dummy {f00=0x0113, f01=0x0190, f02=» ** b d 4 P************************************************ c P c D PTWBSWB EQU * c L P ST A7,SAVE04,A13 SAVE A7 c ` " P LD A7,TWBMSK,A12 GET TWB MASK c P IFT CREDIT+MMUPAG=2 c " P EL A7,TWBMSK,A12 GET TWB MASK c P XIF c P IFF CREDIT=0 c
0x2f15b8…2f174c Dummy {f00=0x0113, f01=0x0190, f02=»ESS c n & P CALL MOVDWB CHANGE DWB-ADDRESSES d P CALL SKIFTA d 6 P RB TWSW10 d J PTWSW20 EQU * d P IFT CREDIT+SWPBLK=2 d p P EJECT d P d P d P* RESERVE SPACE FOR SWB'S * d P*************************** d P XIF d P I
0x2f174c…2f18e0 Dummy {f00=0x0113, f01=0x0190, f02=»REDIT+SWPBLK=2 d P CALL SHIFT e PTWSW30 RF(Z) TARZAN ALL DONE e * P CALL GETWB e N P CALL MOVWB RESERVE SPACE e b ( P ST A2,NEWAD2,A13 SAVE W.B.-ADDRESS e & P CALL MOVDWB CHANGE DWB- ADDRESSES e P CALL SKIFTA e P RB TWSW30 e PTARZAN E
0x2f18e0…2f1a74 (3, 155) Dummy {f00=0x0113, f01=0x0190, f02=» A L L B U F ** e 4 P** ** f 0 4 P** ALLOCATE FIXED DATA SET BUFFERS AND ** f h 4 P** TERMINAL STACK ** f 4 P** **
0x2f1a74…2f1c08 Dummy {f00=0x0113, f01=0x018e, f02=»(IN T:A)=LENGTH OF DSCB'S ** f 4 P** CIA (IN T:A)=DISPL. TO T:A-START ** g ( 4 P** CSE (IN T:A)=STACKSIZE ** g ` 4 P** WORK-REGS. :A1-A4,A9,A11 ** g 4 P************************************************ g P
0x2f1c08…2f1d9c Dummy {f00=0x0113, f01=0x0190, f02=» g r ( P LD A3,CSN,A1 GET DSCB TOTAL LENGTH h P RF(Z) ALLB70 NO DSCB'S h 4 . P ADKL A1,T:ASTA CALC START OF DSCB RECORDS h T " P LDR A10,A1 SAVE START ADDRESS h P XIF h P IFT CREDIT+MMUPAG=2 h P ELR A1,A8 GET T:A-ADDRESS h ( P EL A3,CSN,A1 GET
0x2f1d9c…2f1f30 Dummy {f00=0x0113, f01=0x0190, f02=» h r P XIF i P IFF CREDIT=0 i P SUR A3,A1 i * P NGR A3,A3 i < P SUK A3,DSCBL END CONDITION i N : P ST A3,SAVE04,A13 SAVE ADDRESS TO END OF DSCB-RECORDS i r : PALLB10 SUK A1,DSCBL A1=FIRST WORD IN FIRST DSCB-RECORD i P CW A1,SAVE04,A13 ALL? i
0x2f1f30…2f20c4 Dummy {f00=0x0113, f01=0x0190, f02=»NN) ALLB10 NO! i P ST A9,BA,A1 BUFFER START j P LD A3,RL,A1 BUFFER LENGTH j 8 P ST A3,BL,A1 j Z P LD A2,EL,A1 SHARED BUFFER? j n P RF(Z) NOTSH NO! j & P LDR A4,A1 RESTORE START OF DSCB'S j P XIF j P IFT CREDIT+MMUPAG=2 j $ P ELR A3,A1 G
0x2f20c4…2f2258 Dummy {f00=0x0113, f01=0x0190, f02=» P EL A2,EL,A1 SHARED BUFFER? k P RF(Z) NOTSH NO! k ( & P LDR A4,A1 RESTORE START OF DSCB'S k @ P XIF k j P IFF CREDIT=0 k v P ADK A4,DSCBL FIRST WORD k PALLB20 SUK A2,1 A2=INDEX k P RF(NN) ALLB30 k P LDK A1,LMP4 FORMAT ERROR k P CAL
0x2f2258…2f23ec Dummy {f00=0x0113, f01=0x0190, f02=» P RB(NE) ALLB20 l " P LDK A1,LMP4 BUFFER NOT FOUND l P CALL ERROR l @ P IFT CREDIT-MMUPAG=1 l T ( PALLB40 LD A4,BA,A4 BUFFER ALLOCATED? l p P RF(NZ) ALLB50 YES! l P LDK A1,LMP4 FORMAT ERROR l P CALL ERROR l PALLB50 EQU * l * P ST A4
0x2f23ec…2f2580 Dummy {f00=0x0113, f01=0x0190, f02=»50 YES! l P LDK A1,LMP4 FORMAT ERROR m P CALL ERROR m 2 PALLB50 EQU * m F * P ES A4,BA,A1 AND ESORE IN CURRENT ECB m Z P XIF m P IFF CREDIT=0 m P RB ALLB10 m P m P IFT CREDIT-MMUPAG=1 m PNOTSH LDR A9,A9 PAGING? m P RF(NZ)
0x2f2580…2f2714 (3, 156) Dummy {f00=0x0113, f01=0x0190, f02=» A9,A3 ALLOCATE BUFFER FROM TOP m P ADKL A9,1 n ( P ANKL A9,/FFFE EVEN ADDRESS n : P* CHECK ADDRESS: n ^ P n v " P LD A11,LSTADR,A13 DATA START n P CALL CMPADR n P RF(NL) ALLB60 OK! n P LDKL A1,LMP3 n P CALL ERROR n PALLB60 E
0x2f2714…2f28a8 Dummy {f00=0x0113, f01=0x0190, f02=»FROM 'BOTTOM' n n & P ES A2,BA,A1 STORE BUFFER ADDRESS o P XIF o @ P IFF CREDIT=0 o L P RB ALLB10 o b P o t , P* RESERVE STACK AND SET STACKPOINTERS * o P o PALLB70 EQU * o P IFT CREDIT-MMUPAG=1 o P LDR* A1,A8 GET T:A-ADDRESS o
0x2f28a8…2f2a3c Dummy {f00=0x0113, f01=0x0190, f02=»E o r PALLB80 EQU * p P ST A4,STKB,A1 SET STACKBASE p P STR A4,A1 STACK POINTER p B P CALL MOVING ALLOCATE STACK p b P ST A2,STKE,A1 SET STACK-END p P XIF p P IFT CREDIT+MMUPAG=2 p P ELR A1,A8 GET T:A-ADDRESS p P EL A3,CSE,A1 GET ST
0x2f2a3c…2f2bd0 Dummy {f00=0x0113, f01=0x0190, f02=»ZE p n P CALL MOVING ALLOCATE STACK q " P ES A2,STKE,A1 STORE STACK END q . " P EL A3,STKB,A1 GET STACK SIZE q T " P ADR A2,A3 COMPUTE STACK BASE q z . P SUK A2,2 ADDRESS TO LAST WORD IN STACK =1 q $ P ES A2,STKB,A1 STORE STACK BASE q * P ESR A2,A1 STO
0x2f2bd0…2f2d64 Dummy {f00=0x0113, f01=0x0190, f02=» ** q p 4 P** ** r 4 P** MOVE T:A AND UPDATE DATA SET ADDRESSES IN ** r P 4 P** FORMAT CONTROL BLOCK ** r 4 P** ** r 4 P** INPUT : A8=T
0x2f2d64…2f2ef8 Dummy {f00=0x0113, f01=0x0190, f02=»ART ** r h 4 P** OUTPUT: A2=NEW T:A-ADDRESS ** s 4 P** WORKREGS: A1-A4 ** s H 4 P************************************************ s P s PMOVT:A EQU * s P IFT CREDIT-MMUPAG=1 s P LDR* A1,A8 GET T:A-ADDR
0x2f2ef8…2f308c Dummy {f00=0x0113, f01=0x0190, f02=»WATFST A3=LENGTH s P AD A1,CIA,A1 FROM-ADDRESS t P CALL MOVING t : P LDR* A4,A8 t N " P SU A2,CIA,A4 NEW T:A-ADDRESS t b $ P SU A1,CIA,A4 'OLD' T:A-ADDRESS t P t 8 P* COMPUTE AND STORE ADDRESSES TO DATA-SETS IN FCB * t P t P LD A3,FCD,A
0x2f308c…2f3220 Dummy {f00=0x0113, f01=0x0190, f02=»TASK DATA PROCESSING? t z P RF(Z) MOVT05 NO! u : P SUR A4,A1 ADJUST FOR OLD RELOCATION (OLD T:A-ADDRESS) u 8 PMOVT05 EQU * u v P ADS A4,FCBDD1,A3 u P ADS A4,FCBDD2,A3 u PMOVT10 RTN A14 u P XIF u P IFT CREDIT+MMUPAG=2 u P u P ELR
0x2f3220…2f33b4 (3, 157) Dummy {f00=0x0113, f01=0x0190, f02=»DISPL. TO START u P ADK A3,WATFST A3=LENGTH v P ADR A1,A10 FROM-ADDRESS v 8 P CALL MOVING v X P ELR A4,A8 v l P EL A10,CIA,A4 v ~ P SUR A2,A10 NEW T:A-ADDRESS v " P SUR A1,A10 'OLD' T:A-ADDRESS v 8 P* COMPUTE AND STORE ADDRESSES TO DATA-SETS
0x2f33b4…2f3548 Dummy {f00=0x0113, f01=0x0190, f02=»EAL TASK DATA PROCESSING? v ~ P RF(Z) MOVT05 NO! w " 8 P SUR A4,A1 ADJUST FOR OLD RELOCATION (OLD T:A-ADDR.) w < PMOVT05 EQU * w x P ADR A3,A2 START OF FCB w P TL* MMTO,13 LOAD TO-TABLE w P EL A10,FCBDD1,A3 w P ADR A10,A4 w P ES A10,FCBD
0x2f3548…2f36dc Dummy {f00=0x0113, f01=0x0190, f02=»TN A14 w P XIF x P EJECT x P x ( P x 0 P x 8 6 P** C M P A D R ** x @ 6 P** ** x z 6 P** ** x 6 P** COMPARE ADDRESSES. RES
0x2f36dc…2f3870 Dummy {f00=0x0113, f01=0x0190, f02=» ** x b 6 P** A9 ** y 6 P** OUTPUT: RESULT IN A14-STACK ** y F 6 P************************************************** y P y PCMPADR EQU * y P TNM A11,A9 y P RF(NN) CMPA10 y P CWR
0x2f3870…2f3a04 Dummy {f00=0x0113, f01=0x0190, f02=»T=0 y P EJECT z D P*************************************************************** z D P* * z b D P* ICBMVD - INDICATE CURRENT BLOCK MOVED * z D P* ===================
0x2f3a04…2f3b98 Dummy {f00=0x0113, f01=0x0190, f02=»IN: MOVCOM * z D P* * { : D P* ENTRY: A8 - FIRST T:A POINTER * { D P* A6 - SECOND T:A POINTER
0x2f3b98…2f3d2c Dummy {f00=0x0113, f01=0x0190, f02=» * { Z D P* EXIT: CORRESPONDING BIT IN CURRENT STATCK POINTER * | D P* IN T:A IS SET * | Z D P* * | D P* WORK REGISTERS: A1,A2
0x2f3d2c…2f3ec0 Dummy {f00=0x0113, f01=0x0190, f02=» * | z D P* * } 2 D P*************************************************************** } z P EJECT } PICBMVD EQU * } P LDKL A1,/8000 SET BIT 0 } 6 P LD
0x2f3ec0…2f4054 (3, 158) Dummy {f00=0x0114, f01=0x0190, f02=»UK A2,1 DECREMENT BIT COUNTER } P RB IBAM10 ~ & P* ~ 8 & P* UPDATE MOVED MASK IN FIRST T:A ~ B P* ~ l P XIF ~ v P IFT CREDIT-MMUPAG=1 ~ & PIBAM20 LDR* A2,A8 GET T:A POINTER ~ $ P LDR* A3,A2 GET MOVED BLOCK MASK ~ , P ORR A3,A1 INDICATE CURR
0x2f4054…2f41e8 Dummy {f00=0x0114, f01=0x0190, f02=»* A2,A6 GET T:A POINTER ~ $ P LDR* A3,A2 GET MOVED BLOCK MASK , P ORR A3,A1 INDICATE CURRENT BLOCK MOVED H * P STR A3,A2 STORE NEW MOVED BLOCK MASK x P XIF P IFT CREDIT+MMUPAG=2 $ PIBAM20 ELR A2,A8 GET T:A POINTER $ P ELR A3,A2 GET MOV
0x2f41e8…2f437c Dummy {f00=0x0114, f01=0x0190, f02=»MOVED MASK IN SECOND T:A P* P ELR A2,A6 GET T:A POINTER * $ P ELR A3,A2 GET MOVED BLOCK MASK L , P ORR A3,A1 INDICATE CURRENT BLOCK MOVED t * P ESR A3,A2 STORE NEW MOVED BLOCK MASK P XIF P IFF CREDIT=0 P RTN A14 P EJE
0x2f437c…2f4510 Dummy {f00=0x0114, f01=0x0190, f02=» * ` J P* CHKMVD - CHECK IF BLOCK ALREADY MOVED * J P* ===================================== * l J P* * J P
0x2f4510…2f46a4 Dummy {f00=0x0114, f01=0x0190, f02=» * V J P* ENTRY: A8 - POINTER TO T:A * J P* BIT - BIT NUMBER IN CWB- OR UWB-MASK * b J P* * J P* EXIT:
0x2f46a4…2f4838 Dummy {f00=0x0114, f01=0x0190, f02=»* L J P* WORK REGISTER: A1,A2 * J P* * X J P* SUBROUTINES: * J P*
0x2f4838…2f49cc Dummy {f00=0x0114, f01=0x0190, f02=» EJECT PCHKMVD EQU * P IFT CREDIT-MMUPAG=1 " P LDR* A1,A8 GET T:A POINTER > $ P LDR* A1,A1 GET MOVED BLOCK MASK b P XIF P IFT CREDIT+MMUPAG=2 P ELR A1,A8 GET T:A POINTER $ P ELR A1,A1 GET MOVED BLOCK MASK P XIF P
0x2f49cc…2f4b60 Dummy {f00=0x0114, f01=0x0190, f02=»LL A1,1 NEXT BIT IN MOVED BLOCK MASK $ P SUK A2,1 DECREMENT BIT COUNTER , P RB CHKM10 T PCHKM20 ADK A1,0 SET CR f * P CFI A14,PSW,A13 PUT CONDITION IN PSW P RTN A14 P EJECT P P : P***** S * U * P * E * R * L
0x2f4b60…2f4cf4 (3, 159) Dummy {f00=0x0114, f01=0x018e, f02=» ** d : P** ** : P** CALCULATES BIT NUMBER SAT IN MASK-WORD ** P : P** INPUT : A7=MASK WORD ** : P** OUTPUT: BIT=BIT NUMBER ** :
0x2f4cf4…2f4e88 Dummy {f00=0x0114, f01=0x0190, f02=» PSHIFT EQU * " P CM BIT,A13 RESET BIT COUNTER P LDR A7,A7 > P RF SHIF20 P & PSKIFTA EQU * ENTRY: CONTINUE SHIFT b PSHIF10 IM BIT,A13 P SLL A7,1 PSHIF20 EQU * $ P RF(Z) SHIF30 NO MOORE BITS SAT P RB(NN) SHIF10 *
0x2f4e88…2f501c Dummy {f00=0x0114, f01=0x0190, f02=»L T ** z 4 P** ** " 4 P** ** Z 4 P** MULTIPLICATION (A2) X A3(), A2#0 ** 4 P** ** 4 P** IN
0x2f501c…2f51b0 Dummy {f00=0x0114, f01=0x0190, f02=»****************** r PMULT EQU * P ST A3,MUL,A13 , " P STR A2,A14 SAVE A2 TEMPORARY B P LDK A3,0 h PADD AD A3,MUL,A13 z P SUK A2,1 P RB(NZ) ADD P LDR* A2,A14 P RTN A14 P P IFT MMUPAG=1 P EJECT
0x2f51b0…2f5344 Dummy {f00=0x0114, f01=0x0190, f02=» ** 4 P** FIND LAST USED ENTRY IN MM-TAB. SCAN ** * 4 P** FROM LOW ADDRESS. NOT USED ENTRY=0. ** b 4 P** ** 4 P** INPUT :A3=MM-TABLE ADDRESS ** 4
0x2f5344…2f54d8 Dummy {f00=0x0114, f01=0x0190, f02=»TAB=A3 ** z 4 P** A1=CONTENTS OF 1:ST USED ENTRY ** " 4 P*********************************************** Z P PMMENT EQU * P LDR A9,A3 GET TABLE ADDRESS 6 P SUKL A9,MMBEG ADJUST A9 (LOOKS LIKE TTAB POINTER)
0x2f54d8…2f566c Dummy {f00=0x0114, f01=0x0190, f02=»1,/FC00 P RB(Z) MMEN10 2 P ST A3,LSTPAG,A9 SAVE FIRST FREE PAGE-ADDRESS & P RTN A14 P XIF l P IFF CREDIT=0 x P EJECT P 2 P** G E T T A B ** 2 P** **
0x2f566c…2f5800 Dummy {f00=0x0114, f01=0x0190, f02=» ** | 2 P** INPUT :A8=POINTER TO T:A IN T:ATAB ** " 2 P** OUTPUT:A2=TTAB-ADDRESS ** X 2 P** A1=TID ** 2 P** WORKREGS:A3,A4,A10 ** 2 P**************
0x2f5800…2f5994 (3, 160) Dummy {f00=0x0114, f01=0x018e, f02=»D A1,T:ATID,A10 GET TID TO MATCH " P LD A12,T:DAD,A10 T:D-ADDRESS ( P XIF N P IFT MMUPAG=1 Z P ELR A10,A8 T:A-ADDRESS p P EL A1,T:ATID,A10 GET TID P EL A12,T:DAD,A10 P XIF & PGETTTB EQU * ENTRY. INPUT: A1=TID $ P LD A4
0x2f5994…2f5b28 Dummy {f00=0x0114, f01=0x0190, f02=» * P LDR A3,A1 SAVE A1 (DEBUGGING PURPOS) P LDK A1,LMP5 TID ERROR 2 P CALL ERROR P " PGETT20 LDR* A2,A4 TTAB-ADDRESS d P CW A1,TTB:PP,A2 TCL EQUAL? P RB(NE) GETT10 NO! P ST A2,TTAB,A13 SAVE P RTN A14 P IFF CREDIT=0
0x2f5b28…2f5cbc Dummy {f00=0x0114, f01=0x0190, f02=» ** d 8 P** ** 8 P** QUEUE TASK VIA 'ACTOT' AND SWITCH TO LEVEL ** L 8 P** 0, ENB. ** 8 P** ** 8 P** INPU
0x2f5cbc…2f5e50 Dummy {f00=0x0114, f01=0x0190, f02=»SS ** x 8 P*************************************************** $ P ` PQUEJOB EQU * h P* QUEUE THIS TASK (THIS TID) | P 0 P LDKL A3,RETUR GET RETURN (FROM A15) ADDRESS P ADR A3,A13 RELOCATE P STR A3,A15 PUT
0x2f5e50…2f5fe4 Dummy {f00=0x0114, f01=0x0190, f02=»ABORT INDICATOR $ P LD A8,SCTLAC GET P:MTAB-ADDRESS P LDR A5,A2 GET TTAB-ADDRESS @ P IFT CREDIT-MMUPAG=1 d , P LD A4,WATLEN,A12 NUMBER OF WAT-ELEMENTS P ADK A4,2 P ANKL A4,/FFFE P ADK A4,DWBFST+4 8 P ADR A4,A12 ADD T:A-ADDR
0x2f5fe4…2f6178 Dummy {f00=0x0114, f01=0x0190, f02=»ETT40 ALL! P LD A1,4,A4 DISP ADDRESS P LD A3,2,A4 SEGMENT NUMBER 2 , P LD A2,NTPA,A8 INTERPRETER START ADDRESS T P XIF P IFT CREDIT+MMUPAG=2 , P EL A4,WATLEN,A12 NUMBER OF WAT-ELEMENTS P ADK A4,2 P ANKL A4,/FFFE P ADK
0x2f6178…2f630c Dummy {f00=0x0114, f01=0x0190, f02=»1 DEC. NUMBER OF STARTPOINTS P RF(N) GETT40 ALL! $ P EL A1,4,A4 DISP ADDRESS > P EL A3,2,A4 SEGMENT NUMBER ^ , P EL A2,NTPA,A8 INTERPRETER START ADDRESS P XIF P IFF CREDIT=0 P CF A15,ACTOT $ P ADK A4,STPREC NEXT START-POINT
0x2f630c…2f64a0 Dummy {f00=0x0114, f01=0x0190, f02=» P EJECT P 4 P** M O V M M T ** 4 P** ** R 4 P** ** 4 P** MOVE MM-TABLE ** 4 P**
0x2f64a0…2f6634 (3, 161) Dummy {f00=0x0114, f01=0x0190, f02=» ** j 4 P** OUTPUT:A2=START OF MM-TABLE IN TTAB ** 4 P** A9=TTAB ADDRESS ** J 4 P** WORKREGS:A1,A3 ** 4 P*********************************************** P PMOVMMT EQU *
0x2f6634…2f67c8 Dummy {f00=0x0114, f01=0x0190, f02=»T FILL LAST ENTRY ADDRESS P TL* MMFROM,A13 RELOAD TABLE " P RTN A14 F P XIF V P IFF CREDIT=0 b P EJECT x @ P************************************************************ @ P* *
0x2f67c8…2f695c Dummy {f00=0x0114, f01=0x0190, f02=» R @ P* ====================================================== * @ P* * L @ P* * @ P* REFERENCED IN: SYSLDA PART 2 B.
0x2f695c…2f6af0 Dummy {f00=0x0114, f01=0x0190, f02=» * @ P* A7 - POINTER TO NEXT FREE ENTRY IN REAL T:ATAB * @ P* * T @ P* EXIT: * @ P*
0x2f6af0…2f6c84 Dummy {f00=0x0114, f01=0x0190, f02=» * d @ P* SUBROUTINES: GETTTB * @ P* * @ P************************************************************ PCHTAID EQU * 2 P LDR A8,A7 GET N
0x2f6c84…2f6e18 Dummy {f00=0x0114, f01=0x0190, f02=» ENTRY IN REAL T:ATAB | P IFT CREDIT-MMUPAG=1 ( P LDR* A1,A8 GET POINTER TO REAL T:A : $ P LD A1,T:ATID,A1 GET TCL IN T:A f . PCHT:20 CALL GETTTB GET CORRESPONDING TTAB * P LD A4,TTBTID,A2 GET REAL TID IN TTAB 6 P LD A3,TTB:SA+26,A2 GET CO
0x2f6e18…2f6fac Dummy {f00=0x0114, f01=0x0190, f02=» COMPUTE ENTRY IN AUX. TID TABLE ~ , P STR A4,A3 SAVE TID FOR DEBUGGER PURPOSE ( P XIF X P IFT CREDIT+MMUPAG=2 d & P ELR A1,A8 GET POINTER TO REAL T:A $ P EL A1,T:ATID,A1 GET TCL IN T:A . PCHT:20 CALL GETTTB GET CORRESPONDING TTAB ( P LDR
0x2f6fac…2f7140 Dummy {f00=0x0114, f01=0x0190, f02=»TID IN TTAB *79-04-11* v 6 P LD A3,TTB:SA+26,A2 GET CORRESPONDING T:A-ADDRESS 2 P ES A4,T:ATID,A3 REPLACE TCL IN T:A *79-04-11* X 0 P EL* A3,T:ATNW,A13 GET LENGTH OF REAL T:ATAB $ P NGR A3,A3 NEGATIVE DISPLACEMENT . P ADR A3,A8 COMPUTE ENTRY IN AU
0x2f7140…2f72d4 (3, 162) Dummy {f00=0x0115, f01=0x0190, f02=»L SAVE AREA z P SUK A1,1 DECREMENT TCL P SUKL A8,2 DECREMENT 4 ( P SUK A6,1 DECREMENT NUMBER OF COPIES P P RB(P) CHT:20 NEXT COPY | PCHT:90 RTN A14 P EJECT P P 4 P************************************************ 4 P
0x2f72d4…2f7468 Dummy {f00=0x0115, f01=0x0190, f02=» ** x 4 P************************************************ P X 4 P* BUILD REAL T:A'S. COPY T:A'S ACCORDING TO * ` 4 P* SHADOW TABLE * 4 P* * 4 P
0x2f7468…2f75fc Dummy {f00=0x0115, f01=0x0190, f02=»A MONITOR END ADDRESS . P LD A8,T:ATOD,A13 T:ATAB PROTOTYP ADDRESS * P LD A7,T:ATNW,A13 REAL T:ATAB ADDRESS P P ADK A7,2 ~ P ST A8,SAVE03,A13 SAVE A8 & PSYA310 LD A8,SAVE03,A13 RESTORE A8 P ADKL A8,2 P CW A8,ENDADD,A13 ALL?
0x2f75fc…2f7790 Dummy {f00=0x0115, f01=0x0190, f02=»TTAB GET CORRESPONDING TTAB AND QUEUE P CALL QUEJOB . : P ST A10,TTB:SA+26,A2 SAVE T:A ADDR. IN TTAB (SAVE-A13) B " P LD A1,SCTOPT GET OPTION WORD P ANK A1,2 DISC PAGING? P RF(Z) SYA320 NO! P LDR A1,A10 GET T:A-ADDRESS 0 P ADKL
0x2f7790…2f7924 Dummy {f00=0x0115, f01=0x0190, f02=» STORE IN REAL T:ATAB P ADK A7,2 $ P LDR* A6,A5 GET NUMBER OF COPIES 0 P EJECT X PSYA340 SUK A6,1 f P RF(P) SYA345 NEXT TASK ~ 2 P CALL CHTAID REPLACE TCL:S IN THIS TASK-CLASS P RB SYA310 NEXT TASK-CLASS * PSYA345 LD A12,T:DA
0x2f7924…2f7ab8 Dummy {f00=0x0115, f01=0x0190, f02=»8,A7 CHANGE T:A TO COPY 2 P CALL GETTAB GET CORRESPONDING TTAB AND QUEUE P CALL QUEJOB QUEUE THIS TASK V 2 P ST A10,TTB:SA+26,A2 SAVE T:A-ADDRESS IN TTAB z " P LD A1,SCTOPT GET OPTION WORD P ANK A1,2 DISC PAGING? P RF(Z) SYA348 NO!
0x2f7ab8…2f7c4c Dummy {f00=0x0115, f01=0x0190, f02=»48 ADK A7,2 NEXT ENTRY IN REAL T:ATAB 2 P CALL TWBSWB MOVE TWB'S AND RESERVE FOR SWB'S . " P CALL ALLBUF ALLOCATE BUFFERS d P XIF P IFT CREDIT+MMUPAG=2 * P* GET ACTUAL MM-TABLE ADDRESS AND LOAD P P LDR A1,A5 * P AD* A1,SCTSFA
0x2f7c4c…2f7de0 Dummy {f00=0x0115, f01=0x0190, f02=»GETTAB GET CORRESPONDING TTAB : P ST A10,TTB:SA+26,A2 SAVE T:A ADDR. IN TTAB (SAVE-A13) & P LDR A1,A10 GET T:A-ADDRESS d 0 P ADKL A1,CSB ADDRESS TO CURRENT SEGMENT BASE " P ST A1,TTB:CB,A2 STORE IN TTAB 0 P LD A1,T:DSAV,A2 GET CLASS-LOCAL LAST
0x2f7de0…2f7f74 (3, 163) Dummy {f00=0x0115, f01=0x0190, f02=»ATA TABLE | , P* REMOVE TASK-LOCAL ENTRIES IN MM-TABLE P B P SUK A2,2 START OF TABLE J P LDKL A12,/FC00 j PSYA320 SUK A1,2 NEXT ENTRY P CWR A1,A2 ALL? P RF(E) SYA330 YES! P STR A12,A1 REMOVE ENTRY P RB SYA320 P
0x2f7f74…2f8108 Dummy {f00=0x0115, f01=0x0190, f02=»L A1,T:ATID,A1 GET TID ( P ADK A7,2 NEXT ENTRY IN REAL T:ATAB $ P LDR* A6,A5 GET NUMBER OF COPIES J PSYA340 SUK A6,1 r P RF(P) SYA345 NEXT TASK 2 P CALL CHTAID REPLACE TCL:S IN THIS TASK-CLASS P RB SYA310 NEXT TASK-CLASS PSYA345
0x2f8108…2f829c Dummy {f00=0x0115, f01=0x0190, f02=» TO TTAB v P CALL MOVT:A MOVE T:A $ P ESR A2,A7 STORE IN REAL T:ATAB . @ P ST A2,TTB:SA+26,A9 PUT T:A-ADDRESS IN TTAB. A9=TTAB ADDRESS V P LDR A8,A2 GET T:A-ADDRESS 0 P ADKL A8,CSB ADDRESS TO CURRENT SEGMENT BASE " P ST A8,TTB:CB,A9 STORE I
0x2f829c…2f8430 Dummy {f00=0x0115, f01=0x0190, f02=»WB MOVE TWB'S & RESERVE FOR SWB'S P LD A1,MMTO,A13 GET TO-TABLE * . P ST A1,MMFROM,A13 CHANGE T:A ADDRESS-TABLE N P TLR A1 " P CALL ALLBUF ALLOCATE BUFFERS $ P LD A1,TTAB,A13 GET TTAB-ADDRESS * P CM LSTPAG,A1 CLEAR SAVE-AREA IN TTAB
0x2f8430…2f85c4 Dummy {f00=0x0115, f01=0x0190, f02=» T:A t P XIF P IFF CREDIT=0 P RB SYA340 . P XIF @ P EJECT L PFINISH EQU *-REL Z P r P* ADJUST START OF FREE AREA z P PSYA350 EQU * P IFF CREDIT=0 * P LD A1,LSTADR,A13 GET END OF FREE AREA . P LD A14,SA
0x2f85c4…2f8758 Dummy {f00=0x0115, f01=0x0190, f02=»2 P ORR A1,A2 P XIF P IFF CREDIT=1 ( P LD A1,SCTLAC > P XIF T P IFT MMUPAG-CREDIT=1 ` P ANKL A1,/03FF | P SLL A1,2 P XIF P ST A1,SCTEFA+2 P IFT CREDIT=1 P LD A1,FYSPAG,A13 P IFT MMUPAG-CRED
0x2f8758…2f88ec Dummy {f00=0x0115, f01=0x0190, f02=» P IFT CREDIT-MMUPAG=1 ( P LD A1,FSTADR,A13 START OF FREE AREA $ P RF(NZ) SYA355 P P XIF f P LD A1,SCTSFA r PSYA355 ST A1,SCTSFA+2 P CM SCTSFA P IFT CREDIT=1 P EJECT D ?********************************************
0x2f88ec…2f8a80 Dummy {f00=0x0115, f01=0x0190, f02=»E TABLE * l D ?* ========================= * $ D ?* * l D ?* REFERENCED IN: SYSLDA * D ?*
0x2f8a80…2f8c14 (3, 164) Dummy {f00=0x0115, f01=0x0190, f02=» SCTEFA - END OF FREE AREA * D P* SAVE29 - NUMBER OF SEGMENTS * D D ?* SCTNOP - NUMBER OF PAGES * D ?* SCTPSZ - PAGE SIZE
0x2f8c14…2f8da8 Dummy {f00=0x0115, f01=0x0190, f02=» * d D ?* EXIT: PAGQUE - POINTER TO FIRST FREE PAGE BLOCK * D ?* PAGQUE+2 - POINTER TO LAST FREE PAGE BLOCK+2 * d D ?* * D ?* WORK REGISTERS:
0x2f8da8…2f8f3c Dummy {f00=0x0115, f01=0x0190, f02=»ES: * D ?* * < D ?* * D ?************************************************************
0x2f8f3c…2f90d0 Dummy {f00=0x0115, f01=0x0190, f02=»ATION? h P ABR(Z) A2 NO! " LD A1,SCTOPT GET OPTION WORD $ ANK A1,3 PAGING? J P ABR(Z) A2 NO! d * z L G* RESERV SPACE FOR PAGE BLOCKS CORRESPONDING TO CORE RESIDENT SEGMENTS * , ' LD A11,SCTSFA+2 GET START OF FREE AREA
0x2f90d0…2f9264 Dummy {f00=0x0115, f01=0x0190, f02=» A7,0 RESET PAGE COUNTER PAG:10 EQU * , ' CW A7,SCTNOP EQUAL TO NUMBER OF PAGES? 4 RF(E) PAG:30 YES! d $ LDK A1,0 RESET NUMBER OF WORDS ~ PAG:20 EQU * " ADKL A11,2 INCLUDE NEXT WORD 0 + RF(Z) MEMOFL MEMORY OVERFLOW (64 KB LIM
0x2f9264…2f93f8 Dummy {f00=0x0115, f01=0x0190, f02=»RAM OVERWRITE z " RF(E) MEMOFL MEMORY OVERFLOW! RB PAG:20 < 0 ,PAG:25 ADK A7,1 INCREMENT PAGE BLOCK COUNTER N RB PAG:10 PAG:30 EQU * * 4 /* RESERV MEMORY PAGES IN UNUSED PART OF MEMORY 6 2* AND EXTEND PAGE TABLE WITH
0x2f93f8…2f958c Dummy {f00=0x0115, f01=0x0190, f02=»BITS OF 18-BITS ADDRESS p 4 P SLL A1,14 TWO MOST SIGN BITS OF 16-BITS ADDRESS 4 / LD A2,SCTEFA+2 GET BIT 2-18 OF 18-BITS ADDRESS X & ! SRL A2,2 SKIP TWO RIGHTMOST BITS , P ORR A1,A2 16 BITS PHYSICAL PAGE ADDRESS P LDR A3,A1 SAVE LD A2
0x2f958c…2f9720 Dummy {f00=0x0115, f01=0x018e, f02=»RESS h ( # ANKL A2,/0300 MODIFY FOR PAGE SIZE P ANR A2,A3 EVEN 1-KB LIMIT 8 ( $ ORR A1,A2 MODIFY PAGE ADDRESS LIMIT Z P XIF P IFT CREDIT-MMUPAG=1 $ P LD A1,SCTEFA+2 END OF FREE AREA P LD A10,SCTPSZ PAGE SIZE P XIF P IFT C
0x2f9720…2f98b4 (3, 165) Dummy {f00=0x0115, f01=0x0190, f02=» P CWR A10,A6 P RF PAG:33 PPAG:32 CWR A6,A10 * PPAG:33 RF(NG) PAG:40 D , P SUR A6,A10 COMPUTE ADDRESS TO NEXT PAGE ` LDR A1,A6 GET PAGE ADDRESS P IFT CREDIT+MMUPAG=2 * & ANKL A1,/C000 ADDRESS IN SYSTEM AREA? RF(NZ) PA
0x2f98b4…2f9a48 Dummy {f00=0x0115, f01=0x018e, f02=»PAG:34 LDK A1,0 END OF FREE AREA P XIF ( P IFT CREDIT=1 4 & "PAG:36 LDK A2,0 RESET WORD COUNTER J * %PAG:38 ADKL A11,2 RESERV ANOTHER WORD t RF(Z) PAG:40 64 KB LIMIT $ ADK A2,1 INCREMENT WORD COUNTER CWK A2,4 BLOCK COMPLETE?
0x2f9a48…2f9bdc Dummy {f00=0x0115, f01=0x0190, f02=» P RF(NN) PAG382 P CWR A11,A1 P RF PAG384 . PPAG382 CWR A1,A11 @ 4 PPAG384 RF(NG) PAG:40 NO MOORE MEMORY AVALIABLE! Z PPAG:39 EQU * " CWR A11,A8 PROGRAM OVERWRITE RB(NE) PAG:38 NO! PAG:40 EQU * 6 1 CW A7,SCTNOP
0x2f9bdc…2f9d70 Dummy {f00=0x0115, f01=0x0190, f02=» RF(E) PAG:50 YES! MEMOFL LDKL A1,LMP3 * & OTR A1,0,SOP INDICATE MEMORY OVERFLOW : HLT HALT PROGRAM h 0 PPAG:45 CW A7,SAVE29,A13 MOORE PAGES WANTED? RF(E) PAG:50 YES! $ ADK A7,1 INCREMENT PAGE COUNTER LDR A9,A6 SAVE
0x2f9d70…2f9f04 Dummy {f00=0x0115, f01=0x0190, f02=»NOP SAVE NUMBER OF PAGES ( $ LDR A1,A9 GET ADDRESS TO FIRST PAGE LDR A2,A1 SAVE L P XIF d P IFT CREDIT+MMUPAG=2 p * P SRL A1,14 BIT 0-1 OF 18-BITS ADDRESS ST A1,SCTEFA SAVE . * SLL A2,2 GET BITS 2-15 OF 18-BITS ADDRESS P X
0x2f9f04…2fa098 Dummy {f00=0x0115, f01=0x0190, f02=»TORE PAGE BLOCK ADDRESS IN SEGMENT BLOCKS * 2 LDK A1,0 < @ ; LD A8,SAVE22,A13 PHYSICAL ADDRESS TO FIRST CORE RES. SEGM. N . P LD A11,SAVE30,A13 START OF SEGMENT TABLE , ( LDK A4,0 RESET RESIDENT SEGMENT COUNTER & " LD A12,SCTPAG START
0x2fa098…2fa22c Dummy {f00=0x0115, f01=0x0190, f02=» GET STATUS . ) RF(NN) PAG:65 SEGMENT NOT LOADED IN CORE * & ST A12,6,A11 STORE PAGE BLOCK ADDRESS F , ' STR A1,A12 RESET QUEUE POINTER FORWARD t . ) ST A1,2,A12 RESET QUEUE POINTER BACKWARD $ ST A8,4,A12 STORE PAGE ADDRESS . ) ST A11,6,
0x2fa22c…2fa3c0 Dummy {f00=0x0115, f01=0x0190, f02=»DKL A12,8 NEXT PAGE BLOCK 4 /PAG:65 SUK A6,1 DECREMENT SEGMENT BLOCK COUNTER " RB(P) PAG:60 Z * p < 8* INITIATE PAGE BLOCK FOR FREE PAGES AND LINK TO PAGQUE z * CWR A4,A7 ANY FREE BLOCKS? P RF(E) PAG:90 NO! 4 / ST A1
0x2fa3c0…2fa554 (3, 166) Dummy {f00=0x0116, f01=0x0190, f02=» d LDK A2,0 . *PAG:70 ST A11,2,A12 STORE BACKWARD POINTER $ ST A9,4,A12 STORE PAGE ADDRESS L $ ST A2,6,A12 INDICATE PAGE FREE t * & ADK A4,1 INCREMENT PAGE BLOCK COUNTER CWR A4,A7 LAST PAGE BLOCK? RF(E) PAG:80 YES! , '
0x2fa554…2fa6e8 Dummy {f00=0x0116, f01=0x0190, f02=»DR A12,A1 NEXT PAGE BLOCK ADR A9,A10 NEXT PAGE " RB PAG:70 @ PAG:80 EQU * R & ! LDKL A1,PAGQUE POINTER TO PAGQUE f $ STR A1,A12 STORE IN LAST BLOCK & " ST A12,PAGQUE+2 STORE IN PAGQUE+2 PPAG:90 EQU * PPAGEX EQU *-REL
0x2fa6e8…2fa87c Dummy {f00=0x0116, f01=0x0190, f02=»DIT=0 , P LD A14,SCTLAC TRUE START OF APPLICATION P XIF > P =1 J P =1 X P =1 f P SUKL A14,8 ADJUST FOR MAP t * P ADKL A13,SYA360 CONTINUATION ADDRESS $ P LDK A1,0 INDICATE SYSLOAD ENDED P OTR A1,0,SOP $ P LD A1
0x2fa87c…2faa10 Dummy {f00=0x0116, f01=0x0190, f02=»3,SYA370 RESTORE PROGRAM BASE OINTER P* , P* INIT A15 STACK 6 P* P P LD A15,SCTSTB Z P SUKL A15,4 p P P* START APPLICATION P . P LD A1,IHRTC GET INTERRUPT ADDRESS FOR RTC P ST A1,SAVRTC,A13 SAVE 4 P LDKL A1
0x2faa10…2faba4 Dummy {f00=0x0116, f01=0x0190, f02=» INITIALIZE DEVICES P CF A15,SAVE8 SAVE REGISTERS P* @ F P* WAIT APPROXIMATELY 0.62 SECONDS BEFORE BRANCHING TO DISPATCHER J P* P LDKL A1,/FFFF SET COUNTER PDELAY SRC A2,31 P SUK A1,1 P RB(NZ) DELAY P INH
0x2faba4…2fad38 Dummy {f00=0x0116, f01=0x0190, f02=»ES =1 ~ P* =1 P CIO A1,0,SOP =1 $ P ABL TDISP BRANCH TO DISPATCHER : P =1 b P =1 p P =1 ~ P =1 P* * P* TEMPORARY INTERRUPT ROUTINE FOR RTC P* PIHRTCO EQU *-REL P RIT RTCDA P R
0x2fad38…2faecc Dummy {f00=0x0116, f01=0x0190, f02=» *** 6 P** SYSLOAD PART 2.A ** * 6 P** ** d 6 P************************************************* P 6 P* BUILD COMMON AND TASKCLASS DATA AREA
0x2faecc…2fb060 Dummy {f00=0x0116, f01=0x0190, f02=»*********************************************** P 8 PPART2A EQU *-REL @ P X 0 P******************************************** ` 0 P*** *** 0 P** S U B R O U T I N E S ** 0 P************
0x2fb060…2fb1f4 (3, 167) Dummy {f00=0x0116, f01=0x0190, f02=» ** | 4 P** ** $ 4 P** GET T:D - ADDRESS ** 4 P** ** 4 P** INPUT : A8=POINTER TO T:A (IN T:ATAB) ** 4 P**
0x2fb1f4…2fb388 Dummy {f00=0x0116, f01=0x0190, f02=»DIT-MMUPAG=1 P LDR* A12,A8 T:A ADDRESS P LD A12,T:DAD,A12 4 P XIF N P IFT CREDIT+MMUPAG=2 Z P ELR A12,A8 T:A ADDRESS v P EL A12,T:DAD,A12 P XIF P IFF CREDIT=0 P AD A12,MOVADD,A13 RELOCATE P RTN A14 P E
0x2fb388…2fb51c Dummy {f00=0x0116, f01=0x0190, f02=» ** f 6 P** ** 6 P** SEARCH T:A'S FOR COMMON WORK BLOCKS THAT ** J 6 P** ARE COMMON TO AT LEAST TWO T:A'S, AND MOVE ** 6 P** TO COMMON AREA ** 6 P**
0x2fb51c…2fb6b0 Dummy {f00=0x0116, f01=0x0190, f02=»ASK ** l 6 P** ENDADD=ENDADDRESS OF T:ATAB ** 6 P** TADISP=W.B.-ADDR DISPLACEM. IN T:A ** P 6 P** WORK.REGS: A1-A6,A9,A11,A12 ** 6 P************************************************* P
0x2fb6b0…2fb844 Dummy {f00=0x0116, f01=0x0190, f02=»A-DISPL b ( P ST A11,SAVE06,A13 SAVE W.B.-ADDRESS ( P CM MOVED,A13 CLEAR MOVED INDICATOR < P LDR A6,A8 h PMOVC10 ADK A6,2 NEXT T:A z P CW A6,ENDADD,A13 ALL DONE? P RF(NE) MOVC30 NO PMOVC20 RTN A14 YES! P IFT CREDIT-MMUPAG=1
0x2fb844…2fb9d8 Dummy {f00=0x0116, f01=0x0190, f02=»D A2,WATLEN,A2 NUMBER OF WAT-ELEMENTS P CW A2,BIT,A13 ENOUGHT? . 6 P RB(NG) MOVC10 TO FEW WAT ELEMENTS. TAKE NEXT T:A N . P AD A11,TADISP,A13 W.B.-ADDRESS TO EXAMINE P LDR* A11,A11 . P CW A11,SAVE06,A13 COMPARE W.B.-ADDRESSES P XIF
0x2fb9d8…2fbb6c Dummy {f00=0x0116, f01=0x0190, f02=»,SAVE03,A13 SAVE T:D-ADDRESS TEMPORARY , P EL A2,WATLEN,A2 NUMBER OF WAT-ELEMENTS . P CW A2,BIT,A13 ENOUGHT? ^ 6 P RB(NG) MOVC10 TO FEW WAT ELEMENTS. TAKE NEXT T:A ~ . P AD A11,TADISP,A13 W.B.-ADDRESS TO EXAMINE P ELR A11,A11 . P CW A11,SA
0x2fbb6c…2fbd00 Dummy {f00=0x0116, f01=0x0190, f02=»D? n . P RF(NZ) MOVC50 YES! CHANGE ADDRESSES ONLY & P CALL MOVDT MOVE DESCRIPTOR-TABLE < & P ST A2,NEWAD1,A13 SAVE D.T.-ADRESS f P CALL MOVWB MOV WORK BLOCK P IM MOVED,A13 INDICATE MOVED P LD A4,UWB,A13 UWB-BLOCKS? P RF(Z) MOVC40 NO
0x2fbd00…2fbe94 (3, 168) Dummy {f00=0x0116, f01=0x0190, f02=»CHADR CHANGE ADDRESSES . P CALL ICBMVD INDICATE CURRENT BLOCK MOVED P LDR A11,A8 SAVE T:A-POINTER P ( P ST A12,SAVE25,A13 SAVE T:A-ADDRESS t & P LDR A8,A6 REPLACE POINTER TO T:A * P LD A12,SAVE03,A13 REPLACE T:D-ADDRESS P CALL MOVDWB
0x2fbe94…2fc028 Dummy {f00=0x0116, f01=0x0190, f02=» G E T P R O ** 4 P** ** . 4 P** ** f 4 P** SEARCH U:BTAB PROTOTYPE AND GET NUMBER OF ** 4 P** COPIES. FILL REAL U:BTAB **
0x2fc028…2fc1bc Dummy {f00=0x0116, f01=0x0190, f02=»T W.B. - ADDRESS ** ~ 4 P** OUTPUT: A2=NEW ADDRESS ** & 4 P** WORK-REGS: A1-A5,A9 ** ^ 4 P************************************************ P PGETPRO EQU * ( P LD A3,U:BTOD,A13 GET U:BT
0x2fc1bc…2fc350 Dummy {f00=0x0116, f01=0x0190, f02=»ENGTH d P RF(NN) GETP20 P LDK A1,LMP6 W.B. NOT FOUND! $ P CALL ERROR H PGETP20 EQU * P CW A11,UPADDR,A3 SAME W.B.? p , P RF(E) GETP30 YES! GET NUMBER OF COPIES P ADK A3,UP:REC NEXT P RB GETP10 P 0 P* GET NUMB
0x2fc350…2fc4e4 Dummy {f00=0x0116, f01=0x0190, f02=»11 W.B.-LENGTH * P LC A5,UPNUMB,A3 GET NUMBER OF COPIES P ANK A5,/FF D , P SU A3,U:BTOD,A13 GET TABLE DISPLACEMENT X . P AD A3,U:BTNW,A13 ADD TO NEW TABLE ADDRESS P LDR A9,A3 " P ST A4,URLENG,A9 STORE LENGTH * P ST A5,URNUMB,A9 STORE
0x2fc4e4…2fc678 Dummy {f00=0x0116, f01=0x0190, f02=»1 ONE ALREADY MOVED (IN 'MOVCOM') P RF(NP) GETP50 * PGETP40 CALL MOVWB @ P SUK A5,1 Z P RB(NZ) GETP40 l P & P* UPDATE POINTER IN REAL U:BTAB * & P********************************* PGETP50 EQU * 6 P ST A2,URADDR,A9 S
0x2fc678…2fc80c Dummy {f00=0x0116, f01=0x0190, f02=»:REC SUB RECORD LENGTH FRM TABLE LENGTH P RF(NN) GETP20 0 P LDK A1,LMP6 W.B. NOT FOUND! F P CALL ERROR j PGETP20 EQU * ~ ( P EL A10,UPADDR,A3 CHECK IF SAME W.B. P CWR A11,A10 , P RF(E) GETP30 YES! GET NUMBER OF COPIES P ADK A
0x2fc80c…2fc9a0 Dummy {f00=0x0116, f01=0x018e, f02=» IN U:BTAB * p 0 P******************************************** P H PGETP30 EQU * P P EL A4,WBLEN,A11 W.B.-LENGTH d , P EL A5,UPNUMB-1,A3 GET NUMBER OF COPIES P ANK A5,/FF , P SU A3,U:BTOD,A13 GET TABLE DISPLACEMENT . P AD A3,U:BTN
0x2fc9a0…2fcb34 (3, 169) Dummy {f00=0x0116, f01=0x0190, f02=» " P ES A4,URLENG,A9 STORE LENGTH & P TL* MMFROM,A13 RELOAD FROM TABLE * 0 P* COPY NUMBER OF WORKBLOCKS TO COMMON AREA * T 0 P******************************************** . P SUK A5,1 ONE ALREADY MOVED (IN 'MOVCOM') P RF(NP) GETP50 PGETP
0x2fcb34…2fccc8 Dummy {f00=0x0116, f01=0x0190, f02=»************* | PGETP50 EQU * P TL* MMTO,A13 * 6 P ES A2,URADDR,A9 ESORE ADDRESS TO FIRES IN U:BTAB @ P TL* MMFROM,A13 z P XIF P IFF CREDIT=0 P RTN A14 P EJECT P 2 P** M O V C L A
0x2fccc8…2fce5c Dummy {f00=0x0116, f01=0x0190, f02=»B. ALREADY MOVED TO COMMON ** 2 P** AREA. IF NOT MOVE W.B. & D.T. AND ** & 2 P** CHECK IF ANY DWB'S ** 2 P** ** 2 P** A LOT OF WORKREGS. ** 2 P**********
0x2fce5c…2fcff0 Dummy {f00=0x0116, f01=0x0190, f02=»-ADDRESS TO A11 z & P CALL CHKMVD BLOCK ALREADY MOVED? P RF(NN) MVCL40 NO! B , PMVCL20 CALL SKIFTA GET NEXT BIT IN MASK P RB(NZ) MVCL10 PMVCL30 RTN A14 PMVCL40 CALL MOVDT P CALL MOVWB P LD A4,UWB,A13 UWB-SCANNING
0x2fcff0…2fd184 Dummy {f00=0x0116, f01=0x0190, f02=»WB'S z P RB MVCL20 P EJECT P , P 8 6 P** C H A D R ** D 6 P** ** ~ 6 P** ** 6 P** CHANGE ADDRESS TO
0x2fd184…2fd318 Dummy {f00=0x0116, f01=0x0190, f02=» ** f 6 P** INPUT : A6=POINTER IN T:ATAB TO T:A ** 6 P** NEWADR1=NEW D.T.-ADDRESS ** J 6 P** NEWAD2= NEW W.B.-ADDRESS ** 6 P** TADISP=DISPLACEMENT TO WB-ADDR ** 6 P** WORK.REGS: A
0x2fd318…2fd4ac Dummy {f00=0x0116, f01=0x0190, f02=» CREDIT-MMUPAG=1 P LDR* A1,A6 T:A-ADDRESS . P AD A1,TADISP,A13 ADDRESS TO W.B.-ADDRESS 8 P LD A2,NEWAD2,A13 j P STR A2,A1 & P SUK A1,2 ADDRESS TO D.T.-ADDRESS P LD A2,NEWAD1,A13 P STR A2,A1 P XIF P IFT CREDIT+MMUP
0x2fd4ac…2fd640 Dummy {f00=0x0116, f01=0x0190, f02=» SUK A1,2 ADDRESS TO D.T.-ADDRESS P LD A2,NEWAD1,A13 * P ESR A2,A1 D P XIF V P IFF CREDIT=0 b P RTN A14 x P XIF P IFT CREDIT+SWPBLK=2 P EJECT B P************************************************************** B P*
0x2fd640…2fd7d4 (3, 170) Dummy {f00=0x0117, f01=0x0190, f02=»* B:RSWT - BUILD REAL SWB CONTROL TABLE * B P* ===================================== * F B P* * B P* REFERENCED IN: SYSLDA
0x2fd7d4…2fd968 Dummy {f00=0x0117, f01=0x0190, f02=»BTAB * ^ B P* A5 - LENGTH OF REAL S:BTAB * B P* * Z B P* EXIT: * B P*
0x2fd968…2fdafc Dummy {f00=0x0117, f01=0x0190, f02=» * r B P* SUBROUTINES: * ( B P* * n B P************************************************************** P EJECT P
0x2fdafc…2fdc90 Dummy {f00=0x0117, f01=0x0190, f02=» IN APPLICATION z P LDR* A3,A1 NUMBER OF TYPES P RF(Z) RSWBEX NO MOORE < P LDK A6,0 Z P SUK A5,2 SKIP LENGTH WORD l PRSWB10 ADK A1,2 NEXT TYPE P LDR* A4,A1 POINTER TO BLOCK P LCR A6,A4 NUMBER OF COPIES $ P LD A7,SWBLEN,A4
0x2fdc90…2fde24 Dummy {f00=0x0117, f01=0x0190, f02=»B IN BYTES r P XIF P IFT CREDIT+SWBMMU=2 & P ST A6,2,A2 STORE NUMBER OF COPIES : , P ST A7,4,A2 STORE LENGTH OF SWB IN BYTES d P XIF P IFT CREDIT+SWPBLK=2 & P SUK A5,6 DECREMENTS S:BTAB LENGTH ( P ADK A2,6 INCREMENT POINTER IN BLO
0x2fde24…2fdfb8 Dummy {f00=0x0117, f01=0x018e, f02=»OR EACH SWB TYPE p ( P* AND RESET ALL WORDS IN TID BLOCKS P* D PRSWB20 EQU * N ( P LDR A6,A2 GET ADDRESS TO TID BLOCK b $ P SUR A6,A8 COMPUTE DISPLACEMENT P IFT CREDIT+SWBMMU=2 P LD A1,2,A8 NUMBER OF COPIES P RF(Z) RSWB50 NO C
0x2fdfb8…2fe14c Dummy {f00=0x0117, f01=0x0190, f02=» f . P SUK A5,2 DECREMENT LENGTH OF REAL S:BTAB $ P SUK A1,1 DECR. NUMBER OF COPIES : P RB(P) RSWB30 NEXT COPY b P XIF P IFT CREDIT+MMUSWB=3 $ P EL A1,2,A8 GET NUMBER OF COPIES P RF(Z) RSWB50 NO COPIES! * P ESR A6,A8 STORE POINT
0x2fe14c…2fe2e0 Dummy {f00=0x0117, f01=0x0190, f02=»REAL S:BTAB r ( P SUK A1,1 DECREMENT NUMBER OF COPIES P RB(P) RSWB40 NEXT COPY @ P XIF ` P IFT CREDIT+SWPBLK=2 l PRSWB50 ADKL A8,6 P CWR A8,A4 P RB(NE) RSWB20 " P LDR A5,A5 S:BTAB CONSISTENT? P RF(Z) RSWBEX YES P
0x2fe2e0…2fe474 (3, 171) Dummy {f00=0x0117, f01=0x018e, f02=»********************** " P* START OF PROGRAM PART 2.A * " P***************************** D P j P* LOAD BASE ADDRESS * r P********************* P* A5=START-ADDRESS P* A9=P:MTAB ADDRESS P* SAVE03=DDIV TO-ADDRESS P* SA
0x2fe474…2fe608 Dummy {f00=0x0117, f01=0x0190, f02=» ~ " P LDR A8,P LOAD TEMP. STACKBASE ( P ADK A5,2 ADD FOR RELOCATION ROUTINE . P CFR A8,A5 Z P* MOVE DDIV * l P & P LD A1,SAVE04,A13 GET FROM-ADDRESS $ P LD A2,SAVE03,A13 GET TO ADDRESS . P LDR A3,A9 GET P:MTAB START (=END OF DDIV
0x2fe608…2fe79c Dummy {f00=0x0117, f01=0x0190, f02=»OSGMT NO! ( P LDKL A8,0 RESET FSTADR IF SEGMENTS! P RF SEGMTS > 2 PNOSGMT LD A8,SCTSFA ALLOCATE BUFFERS FROM TOP P " PSEGMTS ST A8,FSTADR,A13 STORE PMOVNXT LDR* A4,A1 GET WORD P STR A4,A2 STORE P ADK A1,2 P ADK A2,2
0x2fe79c…2fe930 Dummy {f00=0x0117, f01=0x0190, f02=» MM-TABLE x P " P LDR A1,A9 GET P:MTAB ADDRESS $ P SRL A1,11 ADJUST FOR ADDRESSING @ P ANK A1,/1E h & P LDK A2,MMTAB-2 GET TABLE ADDRESS | P ADR A2,A13 RELOCATE " P ADR A1,A2 P:MTAB START ENTRY P LDKL A4,/FC00 PSYA205 CWR
0x2fe930…2feac4 Dummy {f00=0x0117, f01=0x0190, f02=» EQU * P* CHANGE TABLE-ADDRESSES P LD A4,MMFROM,A13 . P LD A5,MMTO,A13 H P ST A4,MMTO,A13 ` P ST A5,MMFROM,A13 x P XIF P IFF CREDIT=0 P ANKL A9,/FFFE EVEN ADDRESS , P ST A9,LSTADR,A13 SAVE END OF FREE AREA P
0x2feac4…2fec58 Dummy {f00=0x0117, f01=0x0190, f02=»RENT MM-TABLE z P ADR A3,A13 , P* FIND LAST USED ENTRY IN REAL MMUTAB * * P Z P CALL MMENT b P ST A9,TTAB,A13 v * P ST A1,FYSPAG,A13 SAVE PHYSICALL PAGE * P LD A3,SAVE05,A13 GET LENGTH OF T:ATAB P LDR A5,A3 SAVE * P CALL
0x2fec58…2fedec Dummy {f00=0x0117, f01=0x0190, f02=»SAVE NEW T:ATAB ADDRESS ~ P ADK A2,2 SKIP LENGTH WORD $ P LD A9,SCTLAC GET P:MTAB ADDRESS B $ P ES A2,T:ATAB,A9 STORE IN P:MTAB j $ P* RESERVE PLACE FOR T:AID TABLE P P LDR A3,A5 GET LENGTH P CALL MOVING P TL* MMTO,A13
0x2fedec…2fef80 Dummy {f00=0x0117, f01=0x0190, f02=»ADJUST TABLE ADDRESS P ESR A2,A3 STORE IN P:MTAB P XIF > P IFF CREDIT=0 J ( P LD A3,SAVE06,A13 GET U:BTAB LENGTH ` P LDR A5,A3 SAVE P CALL MOVING RESERVE SPACE 4 P ST A2,U:BTNW,A13 SAVE NEW (REAL) U:BTAB ADDRESS P IFT CREDI
0x2fef80…2ff114 (3, 172) Dummy {f00=0x0117, f01=0x0190, f02=»,SAVE05,A13 GET LENGTH OF T:ATAB P LDR A5,A3 SAVE ( * P CALL MOVING RESERVE SPACE FOR T:ATAB @ " P STR A5,A2 STORE T:ATAB LENGTH n . P ST A2,T:ATNW,A13 SAVE NEW T:ATAB ADDRESS P ADK A2,2 & P ST A2,T:ATAB,A9 SAVE REAL ADDRESS P* RESE
0x2ff114…2ff2a8 Dummy {f00=0x0117, f01=0x018e, f02=»ENGTH-WORD z , P ST A2,T:AID,A9 STORE ADDRESS IN P:MTAB P XIF B P IFT CREDIT+MMUPAG=2 N $ P TL* MMTO,A13 SET CORRECT TABLE j P ESR A5,A2 STORE LENGTH P ADK A2,2 SKIP LENGTH WORD $ P ES A2,U:BTAB,A9 STORE IN P:MTAB P XIF P
0x2ff2a8…2ff43c Dummy {f00=0x0117, f01=0x0190, f02=» f P LDR A5,A3 SAVE P CALL MOVING P ST A2,S:BTNW,A13 4 P XIF N P IFT CREDIT+MMUSWB=3 Z P TL* MMTO,A13 v P ESR A5,A2 P ADK A2,2 P ES A2,S:BTAB,A9 P CALL B:RSWT P XIF P IFT CREDIT+SWBMMU=2 P STR
0x2ff43c…2ff5d0 Dummy {f00=0x0117, f01=0x018e, f02=»AD TABLE | P XIF P IFF CREDIT=0 P EJECT 4 P B P* BUILD COMMON DATA AREA * N P************************** p P* SEARCH CWB'S: P ( P LD A8,T:ATOD,A13 GET T:ATAB ADDRESS P IFT CREDIT-MMUPAG=1 P LDR* A3,A
0x2ff5d0…2ff764 Dummy {f00=0x0117, f01=0x0190, f02=» 0 P ST A3,ENDADD,A13 SAVE END OF T:ATAB ADDRESS PSYA210 EQU * < & P CM UWB,A13 INDICATE CWB-SCANNING P P ADKL A8,2 z P CW A8,ENDADD,A13 ALL DONE? P RF(E) CLADAT YES! $ P CALL T:DADD T:D-ADDRESS TO A12 P IFT CREDIT-MMUPAG=1
0x2ff764…2ff8f8 Dummy {f00=0x0117, f01=0x0190, f02=» P CALL SHIFT SUPER-LOOPA PSYA220 RF(Z) UWBCOM ALL! ( P CALL MOVCOM H P CALL SKIFTA P RB SYA220 p P EJECT P P PUWBCOM EQU * P* SEARCH UWB'S: P* & P IM UWB,A13 INDICATE UWB-SCANNING P
0x2ff8f8…2ffa8c Dummy {f00=0x0117, f01=0x0190, f02=» CREDIT=0 P CALL SHIFT " PSYA230 RB(Z) SYA210 ALL DONE! & PSYA235 CALL MOVCOM L PSYA240 CALL SKIFTA f P RB SYA230 P EJECT P * P* TASK CLASS DATA CONFIGURATION PART * * P************************************** P
0x2ffa8c…2ffc20 Dummy {f00=0x0117, f01=0x0190, f02=»TE CWB x ( P ADKL A8,2 STEP TO NEXT T:A ADDRESS P CW A8,ENDADD,A13 : P RF(E) SYA270 ALL T:A'S DONE T ( P CALL T:DADD GET T:D ADDRESS TO A12 x P P* CALCULATE LENGTH OF T:D P 2 P LD A1,WATLEN,A12 NUMBER OF BYTES-1 IN DBLKTAB
0x2ffc20…2ffdb4 (3, 173) Dummy {f00=0x0132, f01=0x0190, f02=»NTS n P ADR A3,A12 ADD T:D-ADDRESS P LDR* A3,A3 . 0 0 P LDK A2,STPREC GET STARTPOINTS RECORD LENGTH F P CALL MULT AND MULTIPLY z P ADK A3,2 'NUMBER-WORD' P ADR A3,A1 =>LENGTH P LDR A1,A12 FROM-ADDRESS P CALL MOVING MOVE
0x2ffdb4…2fff48 Dummy {f00=0x0132, f01=0x0190, f02=» P IFT CREDIT+MMUPAG=2 ( P* INITIATE MM-ADDRESS TABLE POINTER $ P P $ P LD A1,SCTSFA SHADOW TABLE START X & P AD* A1,SCTSFA ADDRESS TABLE START P ST A1,SAVE06,A13 SAVE " PSYA250 CM UWB,A13 INDICATE CWB ( P ADKL A8,2 STEP TO NEXT T:
0x2fff48…3000dc Dummy {f00=0x0132, f01=0x0190, f02=»E MM-TABLE " P* FILL MM-TABLE ADDRESS TABLE P 8 P LD A1,SAVE06,A13 @ & P ADK A1,2 INCREMENT TABLE POINTER Z P ST A1,SAVE06,A13 RESTORE P STR A2,A1 FILL TABLE ( P CALL T:DADD GET T:D ADDRESS TO A12 4 P ST A12,T:DSAV,A9 SAVE '
0x3000dc…300270 Dummy {f00=0x0132, f01=0x0190, f02=» ADK A1,2 P ANKL A1,/FFFE EVEN ADDRESS ( P ADK A1,DWBFST+4 ADD DISPL. TO FIRST 6 , P LDR A3,A1 GET NUMB. OF START-POINTS... b P ADR A3,A12 . P ELR A3,A3 . 0 P LDK A2,STPREC GET STARTPOINTS RECORD LENGTH P CALL MULT AND MULTIPLY
0x300270…300404 Dummy {f00=0x0132, f01=0x0190, f02=»1,A8 GET T:A ADDRESS * P ES A2,T:DAD,A1 ESORE NEW T:D ADDRESS " P EL A7,CWBMSK,A12 GET CWBMASK J P XIF p P IFF CREDIT=0 | P CALL MOVCLA P EJECT P P P* TASK CLASS DATA UWB'S * P*************************
0x300404…300598 Dummy {f00=0x0132, f01=0x0190, f02=»DIT+MMUPAG=2 P EL A7,UWBMSK,A12 P XIF . P IFF CREDIT=0 : P CALL MOVCLA P P EJECT d P r P ~ " P* MOVE DT:S OF SWB'S & TWB'S * " P****************************** P PSYA260 EQU * P IFT CREDIT-MMUPAG=1
0x300598…30072c Dummy {f00=0x0132, f01=0x0190, f02=»UPAG=2 P EL A7,SWBMSK,A12 P RF(Z) SYA265 NONE ( P CALL SKRITT B PSYA265 EL A7,TWBMSK,A12 V P XIF v P IFF CREDIT=0 P RB(Z) SYA250 P CALL SKRITT P RB SYA250 P PSYA270 RF PRODAT P EJECT P
0x30072c…3008c0 Dummy {f00=0x0132, f01=0x0190, f02=» MOVE D.T ** 4 P** ** 6 4 P*********************************************** n PSKRITT EQU * P CALL SHIFT PNO RF(NZ) NES P RTN A14 PNES CALL GETWB
0x3008c0…300a54 (3, 174) Dummy {f00=0x0132, f01=0x0190, f02=» P & P* BUILD TASKDATA PROTOTYPE AREA * & P********************************* : PPRODAT EQU * d P =00001 x , P LD A1,SAVE02,A13 BUGGER TASK INCLUDED? P RF(Z) SYA275 NO! 2 P CALL GETTTB GET TTAB ADDRESS. TID 'TB' IN A1 &
0x300a54…300be8 Dummy {f00=0x0132, f01=0x018e, f02=»E MMU TABLE P XIF P IFF CREDIT=0 , P LDK A3,2 RESERV ONE WORD FOR TRABUG-T:A 6 P CALL MOVING GET P:BAS f P IFT CREDIT-MMUPAG=1 & P LD A1,SCTLAC GET START OF P:MTAB P LD A1,P:BAS,A1 GET P:BAS $ P STR A1,A2 SAVE IN TRABUG'S
0x300be8…300d7c Dummy {f00=0x0132, f01=0x018e, f02=» 0 P ST A2,TTB:CB,A8 SAVE ADDRESS TO CSB-POINTER PSYA272 EQU * 8 2 P SUKL A2,CSB ADD DISPL. TO CURRENT SEGMENT BAE L P ST A2,TTB:SA+26,A8 SAVE A13 P IFT CREDIT+MMUPAG=2 & P LD A1,SCTLAC GET START OF P:MTAB $ P TL* MMTO,A13 LOAD CORRECT T
0x300d7c…300f10 Dummy {f00=0x0132, f01=0x0190, f02=» & P TL* MMFROM,A13 RELOAD DDIV TABLE P XIF =00001 . P IFF CREDIT=0 =00001 D PSYA275 EQU * b P =00001 v P =00001 0 P IM SWITCH,A13 INDICATE: -NO MORE D.T. MOVE! $ P LD A8,T:ATOD,A13 T:ATAB ADDRESS PSYA280 ADKL A8,2
0x300f10…3010a4 Dummy {f00=0x0132, f01=0x0190, f02=»T:DAD,A12 . 0 P CALL TWBSWB MOVE TWB'S & RESERVE FOR SWB'S P H " P* CALCULATE LENGTH OF DSCB'S * T " P*** *** z P P LDR* A1,A8 GET T:A-ADDRESS & P LD A3,DATLEN,A12 A12=T:D-ADDRESS P LDK A2,DSCBL
0x3010a4…301238 Dummy {f00=0x0132, f01=0x0190, f02=»EMENT r P RF(NZ) SYA285 FCB PRESENT & P SUR A2,A3 MOVD30E A3(DSCB-LENGTH) 0 , P ADKL A2,T:ASTA INCREMENT TO FIRST WORD Z 6 PSYA285 ST A2,CIA,A1 SAVE DISPLACEMENT TO T:A-START " P LD A2,STKB,A1 GET STACK SIZE $ P ST A2,CSE,A1 AND SAVE TEMPORA
0x301238…3013cc Dummy {f00=0x0132, f01=0x0190, f02=»OCATE BUFFERS P CALL MOVT:A MOVE T:A * P STR A2,A8 STORE NEW ADDRESS IN T:ATAB 4 P XIF b P IFT CREDIT+MMUPAG=2 n * P CALL GETTAB SET CORRECT TTAB-ADDRESS , P LD A12,T:DSAV,A2 GET 'OLD' T:D-ADDRESS P 2 P* GET LAST USED ENTRY IN
0x3013cc…301560 Dummy {f00=0x0132, f01=0x0190, f02=»A13 $ P TSR A3 STORE TABLE IN WORK-AREA $ P TL MMDDIV,A13 RELOAD DDIV TABLE 4 P CALL MMENT GET ENTRY " P ST A3,T:DSAV,A2 SAVE IN TTAB z 0 P CALL TWBSWB MOVE TWB'S & RESERVE FOR SWB'S " P* CALCULATE LENGTH OF DSCB'S * " P***
0x301560…3016f4 (3, 175) Dummy {f00=0x0132, f01=0x018e, f02=»H x ( P CALL MULT A3() X (A2) RESULT IN A3 & P ES A3,CSN,A1 SAVE LENG OF DSCB'S 6 ( P EL A2,FCD,A12 GET FCB-DISPLACEMENT ` P RF(NZ) SYA285 FCB PRESENT & P SUR A2,A3 MOVD30E A3(DSCB-LENGTH) , P ADKL A2,T:ASTA INCREMENT TO FIRST WORD 6 P
0x3016f4…301888 Dummy {f00=0x0132, f01=0x0190, f02=» & P LD A2,SCTLAC GET START OF P:MTAB $ P TL* MMTO,A13 LOAD CORRECT TABLE . P EL A2,P:BAS,A2 GET P:BAS V & P TL* MMFROM,A13 RELOAD DDIV TABLE x P ES A2,CSB,A1 AND SAVE " P CALL ALLBUF ALLOCATE BUFFERS P CALL MOVT:A MOVE T:A * P ESR
0x301888…301a1c Dummy {f00=0x0132, f01=0x0190, f02=»M FLAG,A13 INDICATE REAL DATA-PART PROCESSING , P* INCLUDE DDIV AND PART 2.A IN FREE AREA 6 P f . P LDKL A2,PART2A NEW (RELATIVE) END ADDRESS n P ADR A2,A13 ABSOLUT DITO P IFT CREDIT+MMUPAG=2 P LDR A3,A2 P ANKL A3,/F000 $ P SRL
0x301a1c…301bb0 Dummy {f00=0x0132, f01=0x0190, f02=» P* MOVE T:ATAB P * P LD A2,T:ATNW,A13 GET REAL T:A-ADDRESS " P XIF P P IFT CREDIT-MMUPAG=1 * P ST A2,DATEND,A13 SAVE NEW END ADDRESS x P* MOVE T:ATAB P . P LD A2,T:ATNW,A13 GET REAL T:A-TAB ADDRESS P LDR* A1,A2 REAL L
0x301bb0…301d44 Dummy {f00=0x0132, f01=0x0190, f02=»1 MOVE-LENGTH P SUR A2,A3 TO-ADDRESS P ST A2,T:ATOD,A13 SAVE 4 P CALL MOVE R P XIF d P IFT CREDIT+MMUPAG=2 p $ P TL* MMTO,A13 LOAD CORRECT TABLE & P ELR A1,A2 GET REAL T:ATAB LENGTH P TL* MMFROM,A13 RELOAD TABLE P ADR A
0x301d44…301ed8 Dummy {f00=0x0132, f01=0x0190, f02=» GET LENGTH P SUR A2,A3 TO-ADDRESS P ST A2,T:ATOD,A13 SAVE 2 P CALL XMOVE P P XIF d P IFF CREDIT=0 p P P* CONTINUE IN PART 2.B * P * P LDKL A5,PART2B RELATIVE START ADDRESS P ADR A5,A13 ADD BASE ADDRESS P
0x301ed8…30206c Dummy {f00=0x0132, f01=0x0190, f02=»***** h 2 P******* ******* 2 P** ** D 2 P* SYSLOAD PART 1 * z 2 P** ** 2 P*****
0x30206c…302200 Dummy {f00=0x0132, f01=0x0190, f02=» 2 P* SHADOW-TABLES * 2 P* * : 2 P********************************************* p P P XIF P P * P************************************* * P***
0x302200…302394 (3, 176) Dummy {f00=0x0133, f01=0x0190, f02=»********************************* P EJECT * P 8 P D 6 P** C O N V R T ** P 6 P** ** 6 P** ** 6 P** CONVER
0x302394…302528 Dummy {f00=0x0133, f01=0x018e, f02=» ** r 6 P** OUTPUT: A1=BINARY RESULT ** 6 P** WORK.REGS: A3,A2 ** V 6 P************************************************** P PCONVRT EQU * P LDK A1,0 CLEAR RESULT REG
0x302528…3026bc Dummy {f00=0x0133, f01=0x0190, f02=» P SLL A2,3 . P ADR A1,A2 .... P LDR A3,A5 0 P ANK A3,/F GET ONE'S B P ADR A1,A3 ^ P RTN A14 p P EJECT P 6 P** N X T B L K ** 6 P** ** 6
0x3026bc…302850 Dummy {f00=0x0133, f01=0x0190, f02=» ** ~ 6 P** INPUT: A11=ADDRESS TO CURRENT BLOCK-START ** ( 6 P** OUTPUT:A11=ADDRESS TO NEXT BLOCK ** b 6 P** A2=BLOCK TYPE (T,C,U) IN RIGTH BYTE ** 6 P** WORKREGS: A1,A3-A5 **
0x302850…3029e4 Dummy {f00=0x0133, f01=0x0190, f02=»CLASSES f 2 PNXTCOM EQU * ENTRY: SKIP TO NEXT COMMON-BLOCK P LCR A5,A11 F P SLL A5,8 Z P LC A5,1,A11 l P CALL CONVRT P LDK A2,TDBREC P LDR A3,A1 P CALL MULT P ADR A11,A3 P ADKL A11,2 0 P LCR A5,A11 GET NU
0x3029e4…302b78 Dummy {f00=0x0133, f01=0x0190, f02=» P LDR A3,A1 P CALL MULT P ADR A11,A3 A11=NEXT BLOCK ( P ADKL A11,2 J $ P LC A2,TDBBT,A11 GET BLOCK TYPE ^ P RTN A14 P P 8 P** G E T N U M ** 8 P**
0x302b78…302d0c Dummy {f00=0x0133, f01=0x0190, f02=» ** b 8 P** ** 8 P** INPUT : A6=ADDRESS TO FIRST ASCII-CHARACTER ** J 8 P** OUTPUT: A5=BINARY VALUE ** 8 P** WORK.REGS: A2,A4 ** 8 P**********
0x302d0c…302ea0 Dummy {f00=0x0133, f01=0x0190, f02=»SULT REG ~ P SUK A6,1 INIT POINTER PGET030 ADK A6,1 NEXT DIGIT . P LCR A2,A6 GET CHAR P P ANK A2,/F l PGET050 SUK A2,1 ~ " P RF(N) GET100 THIS DIGIT READY P ADR A5,A4 ACCUMULATE P RB GET050 , PGET100 SUK A4,90 NEXT INCREM
0x302ea0…303034 (3, 177) Dummy {f00=0x0134, f01=0x0190, f02=»JECT P P* START OF PROGRAM PART 1 * P 8 4 P* SAVE02=POINTER TO 1:ST USER TASK TTAB-ADDRESS @ $ P* SAVE09=EXECUTION START ADDRESS x P " PSYSLDX EQU *-REL PROGRAM START P* P* INIT A15 STACK P* P LD A15,
0x303034…3031c8 Dummy {f00=0x0134, f01=0x0190, f02=»NTIFICATION r P XIF P IFT MMUPAG=1 P TL MMTAB,A13 %%## 6 P EL A2,CREID,A2 P P XIF h 2 P CM SWITCH,A13 RESET SAVE-AREAS USED IN SYSLDM t P CM FLAG,A13 $ P CWK A2,'CR' CREDIT APPLICATION? ( P RF(E) SYA100 YES! START CONFIGURA
0x3031c8…30335c Dummy {f00=0x0134, f01=0x0190, f02=»CONTINUATION ADDRESS P ADR A4,A13 RELOCATE P STR A4,A15 PUT ON STACK 8 P LDKL A4,/00C0 X P STR A4,A15 PUT PSW ON STACK n P RTN A15 PSYA103 EQU *-REL P XIF P IFT MMUPAG-CREDIT=1 ( P LDKL A4,MMTAB GET MM-TABLE ADDRESS
0x30335c…3034f0 Dummy {f00=0x0134, f01=0x0190, f02=»ENGTH OF TC:TAB | $ P LD A6,SAVE02,A13 1:ST USER TASK P LDR A3,A6 SAVE @ 0 P SU A3,SCTTCT GET DISPLACEMENT TO 1:ST USER X * P SUR A5,A3 => LENGTH OF TC:TAB TO SCAN P* P* INIT UNUSED MMU ENTRIES P* P LDKL A1,/FC00 P L
0x3034f0…303684 Dummy {f00=0x0134, f01=0x0190, f02=»F(E) SYA105 P SUK A4,2 P STR A1,A4 & P RB SYA:10 8 PSYA105 SUK A5,2 ALL? J P RF(N) SYA107 YES! f P LDR* A2,A6 TTAB-ADDRESS P CALL MOVMMT MOVE MM-TABLE P ADK A6,2 NEXT TTAB P RB SYA105 PSYA107 EQU * P XIF
0x303684…303818 Dummy {f00=0x0134, f01=0x0190, f02=»D A2,SCTLAC ADD RELOCATION ADDRESS P LDK A3,0 SEGMENT NUMBER * P CF A15,ACTOT QUEUE TASK J " P LDKL A1,FINISH END OF SYSLDA j P ADR A1,A13 P ABR A1 P XIF PSYA100 EQU * P IFF CREDIT=0 P EJECT P , P* RE
0x303818…3039ac Dummy {f00=0x0134, f01=0x018e, f02=» LD* A2,SCTLAC GET START OF P:MTAB $ P LD A12,T:ATAB,A2 T:ATAB ADDRESS * & P SUKL A12,2 ADJUST FOR LENGTH-WORD R P ST A12,T:ATOD,A13 SAVE | , P LD A4,U:BTAB,A2 GET U:BTAB FROM P:MTAB " P SUK A4,2 INCLUDE LENGTH-WORD $ P ST A4,U:BTOD,A13 SAVE
0x3039ac…303b40 Dummy {f00=0x0134, f01=0x0190, f02=» n P ST A4,S:BTOD,A13 SAVE P XIF & P IFT CREDIT-MMUPAG=1 2 P* T:ATAB PROCESSING: N P j P LDR* A4,A12 T:ATAB-LENGTH v P LDR A3,A4 SAVE * P AD A3,SCTSFA ADD MONITOR END ADDRESS P* CHECK ADDRESSES P " P LDR A11
0x303b40…303cd4 (3, 178) Dummy {f00=0x0134, f01=0x0190, f02=»RFLOW x P CALL ERROR ( PSYA110 LDR A9,A2 GET P:MTAB ADDRESS " P LDK A2,0 N P* CLEAR T:ATAB SHADOW-TABLE: ` P PZERO SUK A3,2 NEXT P STR A2,A3 CLEAR P CW A3,SCTSFA ALL? P RB(NE) ZERO NO! " P STR A4,A3 STORE TAB
0x303cd4…303e68 Dummy {f00=0x0134, f01=0x0190, f02=» SYA120 OK! P LDK A1,LMP4 NO TASK PRESENT P CALL ERROR 8 ( PSYA120 LC A2,TDBMC+4,A11 GET TASK ID L P SLL A2,8 . x P LC A2,TDBMC+5,A11 ... P CWK A2,'TB' BUGGER TASK? P RF(NE) SYA125 NO! : P ST A2,SAVE02,A13 INDICATE BUGGER
0x303e68…303ffc Dummy {f00=0x0134, f01=0x0190, f02=» ADKL A8,2 NEXT T:A P LDR* A6,A8 GET T:A ADDRESS P SUK A4,2 @ P RF(NZ) SYA135 R 0 P LDK A1,LMP5 NO PROTOTYPE FOUND (TID ERROR) h P CALL ERROR PSYA135 EQU * P CW A2,T:ATID,A6 TID EQUAL? P RB(NE) SYA130 NO! P SUR*
0x303ffc…304190 Dummy {f00=0x0134, f01=0x0190, f02=»DDRESS v $ P SUKL A12,2 INCLUDE LENGTH WORD ! & P ST A12,T:ATOD,A13 SAVE IN SYSLDA ! 6 $ P EL A4,U:BTAB,A2 U:BTAB ADDRESS ! ` $ P SUK A4,2 ADJUST FOR LENGTH WORD ! $ P ST A4,U:BTOD,A13 SAVE IN SYSLDA ! P XIF ! P IFT CREDIT+MMUSWB=3 ! ( P EL A4,S
0x304190…304324 Dummy {f00=0x0134, f01=0x0190, f02=»=2 ! ~ P* T:ATAB PROCESSING: " P " & P ELR A4,A12 T:ATAB-LENGTH " 2 P LDR A3,A4 SAVE " T 0 P SLL A3,1 RESERVE FOR MM-TABLE ADDRESS TABLE " l * P AD A3,SCTSFA ADD MONITOR END ADDRESS " P* CHECK ADDRESSES " P " $ P LDR A11,A3 END OF SHADO
0x304324…3044b8 Dummy {f00=0x0134, f01=0x0190, f02=» CALL ERROR " ( PSYA110 LDR A9,A2 GET P:MTAB ADDRESS # P* CLEAR T:ATAB SHADOW-TABLE: # @ P # d PSYA115 SUK A3,2 NEXT # p P CMR A3 CLEAR # P CW A3,SCTSFA ALL? # P RB(NE) SYA115 NO! # " P STR A4,A3 STORE TABLE LENGTH # ( P LD A11,SAVE
0x3044b8…30464c Dummy {f00=0x0134, f01=0x0190, f02=»P4 NO TASK PRESENT # P CALL ERROR $ ( PSYA120 LC A2,TDBMC+4,A11 GET TASK ID $ . P SLL A2,8 . $ Z P LC A2,TDBMC+5,A11 ... $ n P CWK A2,'TB' BUGGER TASK? $ P RF(NE) SYA125 NO! $ 4 P ST A2,SAVE02,A13 INDICATE 'BUGGER TASK PRESENT' $ P RF SYA1
0x30464c…3047e0 Dummy {f00=0x0134, f01=0x0190, f02=»ET T:A ADDRESS $ P SUK A4,2 % P RF(NZ) SYA135 % ( , P LDK A1,LMP5 NO PROT. FOUND (TID ERROR) % > P CALL ERROR % n PSYA135 EQU * % P EL A10,T:ATID,A6 GET TID % P CWR A2,A10 TID EQUAL? % P RB(NE) SYA130 NO! % P ELR A10,A12 % P SUR
0x3047e0…304974 (3, 179) Dummy {f00=0x0134, f01=0x0190, f02=»UMBER OF TASKS % z P SLL A5,8 & P LC A5,TDBNT+1,A11 & ( P CALL CONVRT & B ( P LD A2,SCTSFA START OF SHADOW TABLE & V P ADR A2,A4 & 6 P ADRS A1,A2 STORE NUMBER OF TASKS IN SHADOW TABLE & P & P* SKIP TO NEXT BLOCK & P & PSYA136
0x304974…304b08 Dummy {f00=0x0134, f01=0x0190, f02=» & * P ADKL A11,1 STEP TO NUMBER OF COM.DEV. ' P CALL NXTCOM SKIP COMMON DEF ' 6 PSYA140 CCK A2,'UU' ' Z P RF(NE) SYA141 NO UWB'S ' t 2 P LD A8,U:BTOD,A13 GET MODIFIED U:BTAB ADDRESS ' 6 P CALL USWBTP INSERT NUMBER OF COPIES IN PROTOTYPE ' PSYA1
0x304b08…304c9c Dummy {f00=0x0134, f01=0x0190, f02=» ' ~ P CALL USWBTP ( P XIF ( P IFT CREDIT=1 ( ( P RF SYA152 ( > P EJECT ( P L P*********************************************************************** ( ^ L P* * ( L P* USWBTP
0x304c9c…304e30 Dummy {f00=0x0134, f01=0x0190, f02=»== * ( N L P* * ) L P* REFERENCED IN: SYSLDA * ) ^ L P* * ) L P* ENTRY:
0x304e30…304fc4 Dummy {f00=0x0134, f01=0x0190, f02=» * ) N L P* * * L P* EXIT: * * ^ L P* * * L P* WORK RE
0x304fc4…305158 Dummy {f00=0x0134, f01=0x0190, f02=» * * N L P* SUBROUTINES: GETNUM,ERROR * + L P* * + ^ L P*********************************************************************** + P + PUS
0x305158…3052ec Dummy {f00=0x0134, f01=0x018e, f02=»T IN A5 + r $ P LDR A1,A5 SAVE NUMBER OF UWB'S , PSYA142 EQU * , 8 P LDR A12,A8 , L " P LDR* A3,A12 LENGTH OF U:BTAB , ` ( P ADKL A11,UDBFST-1 FIRST UDB RECORD , PSYA145 EQU * , 0 P LCR A2,A11 GET FIRST CHARACTER FROM CONFIG , P SLL A2,8 ,
0x3052ec…305480 Dummy {f00=0x0134, f01=0x0190, f02=» , h 0 PSYA147 SUK A3,UP:REC DEC. NUMBER OF PROT.'S - P RF(NN) SYA150 - < P LDK A1,LMP6 UWB NOT FOUND - R P CALL ERROR - t PSYA150 EQU * - ( P ADKL A12,UP:REC ADD TO NEXT RECORD - P RB SYA145 - $ PFRSTOK LC A2,2,A11 GET 3:RD CHAR - P CC A2
0x305480…305614 (3, 180) Dummy {f00=0x0134, f01=0x0190, f02=»P TO 'NUMBER OF BOCKS' IN CONFIG - | P LDR A6,A11 . ( P CALL GETNUM CONVERT . < 2 P SC A5,UPNUMB,A12 SAVE IN U:BTAB (SHADOWTABLE) . X . P SUK A1,1 DEC. NO OF TYPES IN CONFIG FILE . P RB(P) SYA142 . P ADKL A11,UDBFST-1 . P RTN A14 . P XIF .
0x305614…3057a8 Dummy {f00=0x0134, f01=0x0190, f02=»MBER OF UWB'S . ~ PSYA142 EQU * / P LDR A12,A8 START OF TABLE / * P ELR A3,A12 LENGTH OF U:BTAB / L ( P ADKL A11,UDBFST-1 FIRST UDB RECORD / p PSYA145 EQU * / 0 P LCR A2,A11 GET FIRST CHARACTER FROM CONFIG / P SLL A2,8 / P LC A2,1,A11 GET 2
0x3057a8…30593c Dummy {f00=0x0134, f01=0x0190, f02=» A3,UP:REC DEC. NUMBER OF PROT.'S / P RF(NN) SYA150 0 * P LDK A1,LMP6 UWB NOT FOUND 0 @ P CALL ERROR 0 b PSYA150 EQU * 0 v ( P ADKL A12,UP:REC ADD TO NEXT RECORD 0 P RB SYA145 0 2 PFRSTOK LC A10,2,A11 GET 3:RD CHAR FROM CONFIG 0 0 P EL A2,UPN
0x30593c…305ad0 Dummy {f00=0x0134, f01=0x0190, f02=» 0 P 1 P* PROTOTYPE FOUND * 1 P******************* 1 0 P 1 L 8 P ADKL A11,NAMUWB SKIP TO 'NUMBER OF BOCKS' IN CONFIG 1 X P LDR A6,A11 1 P CALL GETNUM CONVERT 1 4 P EL A10,UPNUMB-1,A12 SAVE IN U:BTAB SHADOW-TABLE 1 P ANKL A10,/F
0x305ad0…305c64 Dummy {f00=0x0134, f01=0x0190, f02=»L A11,UDBFST-1 1 P RTN A14 2 P XIF 2 & P IFT CREDIT=1 2 2 P EJECT 2 H PSYA152 EQU * 2 V P 2 j & P* GET START OF SYSLOAD AFTER MOVE 2 r P 2 P XIF 2 P IFT CREDIT-MMUPAG=1 2 , P LD* A7,T:ATOD,A13 GET LENGTH OF T:ATAB 2 P XIF 2
0x305c64…305df8 Dummy {f00=0x0134, f01=0x0190, f02=»FF CREDIT=0 2 0 P AD A7,SCTSFA TO-ADDRESS (AFTER SHADOW-TABLE 3 P ADK A7,1 3 H P ANKL A7,/FFFE EVEN ADDRESS 3 Z P 3 ~ P* CALCULATE RELOCATION 3 P 3 P LDR A2,A13 3 $ P SUR A2,A7 MOVE-LENGTH (SYSLDA) 3 P NGR A2,A2 3 4 P ST A2,SAVE04,
0x305df8…305f8c Dummy {f00=0x0134, f01=0x0190, f02=»DRESS (SYSLDA) 3 P ANKL A2,/F000 FIRST PAGE 4 ( P ST A2,MMREL1,A13 SAVE PHYSICAL PAGE 4 8 " P SRL A2,2 SHIFT FOR MM-PAGING 4 d P LDKL A11,MMDDIV 4 . P ADR A11,A13 GET MM-TABLE START ADDRESSS= 4 P LDK A3,16 SET COUNTER 4 ( PSYA157 STR A2,A11 STOR
0x305f8c…306120 Dummy {f00=0x0134, f01=0x0190, f02=» ANKL A7,/FFF GET DISPLACEM. IN PAGE 4 P XIF 5 , P IFF CREDIT=0 5 8 0 P ST A7,SAVE12,A13 SAVE (LOGICAL) TO-ADDRESS 5 N . P ADKL A7,LENGT2 ADD LEN. OF SYSLDA TO MOVE 5 , P ST A7,SAVE03,A13 SAVE NEW DDIV ADDRESS 5 P LDR A6,A7 5 $ P* CALCULATE DDIV
0x306120…3062b4 (3, 181) Dummy {f00=0x0135, f01=0x0190, f02=»F P:MTAB 5 v P IFT CREDIT-MMUPAG=1 6 ( P LD A3,NUMSEG,A1 NUMBER OF SEGMENTS 6 , P XIF 6 X P IFT CREDIT+MMUPAG=2 6 d ( P EL A3,NUMSEG,A1 NUMBER OF SEGMENTS 6 P XIF 6 P IFF CREDIT=0 6 . P LDK A2,SEGREC SEGMENT BLOCK RECORD LENGTH 6 P CALL MU
0x3062b4…306448 Dummy {f00=0x0135, f01=0x0190, f02=»L,A13 AND ADJUST RELOCATION BASE 6 P IFT CREDIT+MMUPAG=2 7 ( P 7 D . P ST A1,SAVE04,A13 SAVE DDIV 'FROM'-ADDRESS 7 L P XIF 7 ~ P IFT CREDIT-MMUPAG=1 7 , P ST A1,SAVE04,A13 SAVE DDIV FROM-ADDRESS 7 P XIF 7 P IFF CREDIT=0 7 " P SUR A6,A1 RELOC
0x306448…3065dc Dummy {f00=0x0135, f01=0x0190, f02=»L (=REAL) LENGTH * 7 . P* REMOVE NOT USED ENTRIES IN T:ATAB * 8 " . P* A9=P:MTAB A6=MOVE-RELOC * 8 T . P***************************************** 8 P IFT CREDIT-MMUPAG=1 8 P 8 P* INITIATE POINTERS 8 P 8 ( P LD A8,T
0x3065dc…306770 Dummy {f00=0x0135, f01=0x0190, f02=»CTSFA GET START OF T:ATAB SHADOW-TAB 8 P LDR A4,A5 2:ND POINTER 9 , & P LDR A2,A8 2:ND POINTER IN T:ATAB 9 L & P LDK A3,2 SET 'NEW' T:ATAB COUNTER 9 v . P SUR A11,A11 CLEAR REAL LENGTH ACCUMULATOR 9 P 9 P* SCAN T:ATAB: 9 P 9 " PSYA160 ADKL A8,2
0x306770…306904 Dummy {f00=0x0135, f01=0x018e, f02=»A 9 ~ * P LDR* A7,A5 GET CONTENTS OF SHADOW-TAB : , P RB(Z) SYA160 THIS T:A IS NOT USED!!!!! : 8 " P ADR A11,A7 ACCUMULATE LENGTH : h , P ADK A3,2 INCREMENT 'NEW' T:ATAB LENGTH : , P ADK A4,2 UPDATE 2:ND SHADOW-TAB ADDRESS : ( P ADK A2,2 UPDATE 2:ND T:AT
0x306904…306a98 Dummy {f00=0x0135, f01=0x018e, f02=» : z . P STR A10,A2 STORE ADDR. (EV. ON NEW PLACE) ; P* RELOCATE W.B.-ADDRESSES ; : P ; $ P LD A12,T:DAD,A1 GET T:D-ADDRESS ; d $ P LD A7,WATLEN,A12 LENGTH OF WAT ; . P ADK A1,WATFST+2 ADD TO FIRST W.B.-ADDRESS ; PSYA165 SUK A7,1 DEC. COUNTER ;
0x306a98…306c2c Dummy {f00=0x0135, f01=0x0190, f02=» ; z P < P LD A8,T:ATOD,A13 T:ATAB < P ELR A3,A8 GET LENGTH < 0 P ADR A3,A8 END OF T:ATAB < N P ST A3,ENDADD,A13 SAVE < n 0 P LD A5,SCTSFA GET START OF T:ATAB SHADOW-TAB < P LDR A4,A5 2:ND POINTER < & P LDR A2,A8 2:ND POINTER IN T:ATAB < &
0x306c2c…306dc0 Dummy {f00=0x0135, f01=0x0190, f02=»60 ADKL A8,2 TAKE NEXT T:A < $ P ADK A5,2 NEXT T:A IN SHADOW-TAB = " P CW A8,ENDADD,A13 = J P RF(E) SYA170 ALL DONE = d P ELR A1,A8 GET T:A = * P LDR* A7,A5 GET CONTENTS OF SHADOW-TAB = , P RB(Z) SYA160 THIS T:A IS NOT USED!!!!! = " P ADR A11,A7 AC
0x306dc0…306f54 (3, 182) Dummy {f00=0x0135, f01=0x0190, f02=» 2:ND T:ATAB ADDRESS = 8 P STR A7,A4 STORE NUMBER OF T:A'S (EV. ON NEW PLACE) > P ELR A10,A8 GET T:A-ADDRESS > X P ADR A10,A6 RELOCATE > | . P ESR A10,A2 STORE ADDR. (EV. ON NEW PLACE) > P* RELOCATE W.B.-ADDRESSES > P > $ P EL A12,T:DAD,A1 GET
0x306f54…3070e8 Dummy {f00=0x0135, f01=0x0190, f02=»ER > v P RB(N) SYA160 TAKE NEXT T:A ? P ELR A10,A1 GET ADDRESS ? . P ADR A10,A6 RELOCATE ? N P ESR A10,A1 ? j P XIF ? ~ P IFF CREDIT=0 ? P ADK A1,4 NEXT W.B. ? P RB SYA165 ? P ? PSYA170 EQU * ? P ST A6,MOVADD,A13 SAVE ? 8 P
0x3070e8…30727c Dummy {f00=0x0135, f01=0x0190, f02=» P IFT CREDIT-MMUPAG=1 @ $ P ST* A3,T:ATOD,A13 AND IN T:ATAB @ P XIF @ H P IFF CREDIT=0 @ T 0 P LDR A2,A11 GET NUMBER OF T:A'S ACCUMULATOR @ j ( P SLL A2,1 CALC. REAL LENGTH (BYTES) @ P ADK A2,2 @ 0 P ST A2,SAVE05,A13 SAVE TOT. NUMBER OF T:A'S
0x30727c…307410 Dummy {f00=0x0135, f01=0x0190, f02=» LEN.) * @ x $ P******************************** A P A 8 P IFT CREDIT-MMUPAG=1 A @ $ P LD A5,U:BTOD,A13 U:BTAB ADDRESS A P LDR* A3,A5 LENGTH A P ST A3,SAVE06,A13 A P ADK A5,2 SKIP LENGTH WORD A P SUK A3,2 -"- A " PSYA180 RF(Z) SYA185 AL
0x307410…3075a4 Dummy {f00=0x0135, f01=0x0190, f02=»ABLE LENGTH A , P ST A3,SAVE06,A13 SAVE LENGTH OF U:BTAB B P ADK A5,2 B D P SUK A3,2 SUB LENGTH-WORD B V PSYA180 RF(Z) SYA185 B x P ELR A10,A5 GET ADDRESS B P ADR A10,A6 RELOCATE B P ESR A10,A5 B P XIF B P IFF CREDIT=0 B 8 P A
0x3075a4…307738 Dummy {f00=0x0135, f01=0x0190, f02=» CREDIT+MMUSWB=3 B P* C $ P* COMPUTE REAL LENGTH OF S:BTAB C " P* C J $ P LD A5,S:BTOD,A13 S:BTAB ADDRESS C T " P ELR A3,A5 LENGTH OF PROTOTYPE C | P LDR A2,A3 SAVE C " P SUK A3,2 EXCLUDE LENGTH WORD C , PSYA190 RF(Z) SYA199 ALL RECORDS SCANNED!
0x307738…3078cc Dummy {f00=0x0135, f01=0x0190, f02=»BER OF COPIES C v P ANK A4,/FF GET RIGHT BYTE D . PSYA192 RF(Z) SYA194 NO MOORE OF THIS TYPE! D 8 P ADK A2,2 INCREMENT LENGTH D j ( P SUK A4,1 DECREMENT NUMBER OF COPIES D P RB SYA192 D 8 PSYA194 ADK A5,UP:REC NEXT RECORD IN S:BTAB PROTOTYPE D $ P S
0x3078cc…307a60 Dummy {f00=0x0135, f01=0x0190, f02=» LDR* A3,A5 LENGTH OF S:BTAB PROTOTYPE D P LDR A2,A3 SAVE E . " P SUK A3,2 EXCLUDE LENGTH WORD E F , PSYA195 RF(Z) SYA199 ALL RECORDS SCANNED! E l $ P LD A4,2,A5 GET PROT. W.B.-ADDR. E P ADR A4,A6 RELOCATE E P ST A4,2,A5 STORE IT BACK E , P LD A4
0x307a60…307bf4 (3, 183) Dummy {f00=0x0135, f01=0x0190, f02=»TH E x ( P SUK A4,1 DECREMENT NUMBER OF COPIES F P RB SYA196 F 6 8 PSYA198 ADK A5,UP:REC NEXT RECORD IN S:BTAB PROTOTYPE F H $ P SUK A3,UP:REC DECREMENT LENGTH F P RB SYA195 F P XIF F P IFT CREDIT+SWPBLK=2 F 0 PSYA199 ST A2,SAVE25,A13 SAVE COMPU
0x307bf4…307d88 Dummy {f00=0x0135, f01=0x0190, f02=» F P ADS A6,T:ATOD,A13 G P ADS A6,U:BTOD,A13 G " P IFT CREDIT+SWPBLK=2 G < P ADS A6,S:BTOD,A13 G X P XIF G r P IFT CREDIT-MMUPAG=1 G ~ P* CALCULATE NEW DDIV END G P G P LDR A5,A9 G P SU A5,SAVE04,A13 END-START G $ P AD A5,SAVE12,A1
0x307d88…307f1c Dummy {f00=0x0135, f01=0x0190, f02=» G v P H P LDK A4,MMDDIV H " P ADR A4,A13 GET TABLE ADDRESS H & & P LDR A5,A13 CALC. REAL RELOCATION H L P SU A5,SAVE12,A13 H v P SU A5,MMREL1,A13 H P SUR A4,A5 RELOCATE H P ST A4,MMTO,A13 AND SAVE H P LDK A4,MMTAB H $ P ADR A4,A13
0x307f1c…3080b0 Dummy {f00=0x0135, f01=0x0190, f02=»D H ~ P SU A5,SAVE04,A13 ENT-START I $ P AD A5,SAVE12,A13 ADD NEW START I . P LDR A6,A5 I V 0 P ANKL A6,/F000 GET LOGICALL PAGE (MM-ENTRY) I h $ P SRL A6,11 ADJUST FOR ADDRESSING I . P ADK A6,MMDDIV ADD RELATIVE START ADDRESS I P ADR A6,A13 RELOCA
0x3080b0…308244 Dummy {f00=0x0135, f01=0x0190, f02=»3 AND SAVE I P XIF J P IFF CREDIT=0 J P* CONTINUE IN PART 2 * J 4 P J R . P LD A2,SAVE12,A13 GET TO-ADDRESS (SYSLDA) J ^ ( P OR A2,MMREL1,A13 PHYSICALL ADDRESS J P LDR A5,A2 SAVE J 0 P LDKL A7,START2 GET EXECUTION START ADDRESS J P
0x308244…3083d8 Dummy {f00=0x0135, f01=0x0190, f02=»DIT-MMUPAG=1 J PNXTMOV LDR* A4,A1 GET WORD K P STR A4,A2 STORE WORD K 6 P ADK A1,2 K T P ADK A2,2 K f P SUK A3,2 DEC. LENGTH K x P RB(NN) NXTMOV K P XIF K P IFT CREDIT+MMUPAG=2 K P MVB A3 K P XIF K P IFF CREDIT=0 K P K
0x3083d8…30856c Dummy {f00=0x0135, f01=0x403c, f02=»ITOR K t P XIF L PLDAEND EQU * L P END L ,@ L 84,A2 STORE WORD K 6 P ADK A1,2 K T P ADK A2,2 K f P SUK A3,2 DEC. LENGTH K x P RB(NN) NXTMOV K P XIF K P IFT CREDIT+MMUPAG=2 K P MVB A3 K P XIF K P IFF CREDIT=0 K P K
0x30856c…308700 Dummy {f00=0x0135, f01=0x2008, f02=» M -ADDRESS w v PHINKAS SUK A1,1 DEC. COUNTER x P RB(N) HINKA TAKE NEXT T:A x < P ADRS A6,A2 RELOCATE x ^ P ADK A2,4 NEXT W.B. x z P RB HINKAS x P x PSTICK EQU * x P* CONTINUE IN PART 2 * x P x P LDKL A1,START2 x " P A
0x308700…308894 (3, 184) Dummy {f00=0x0135, f01=0x0000, f02=»
[…0x7…]
0x3093a0…309534 (3, 185) Opaque[0x194]
0x309534…3096c8 # DirEnt {nam=»LDTASK«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x22f8, f03=0x0000}
0x309534…3096c8 IdxSect {
0x309534…3096c8 f00 = 0x0117 // 0x309534 @0x0
0x309534…3096c8 f01 = 0x000c // 0x309536 @0x2
0x309534…3096c8 gno = [ // 0x309538 @0x4
0x309534…3096c8 [0x00]: C0x0117.0x3.0
0x309534…3096c8 [0x01]: C0x0118.0x0.0
0x309534…3096c8 [0x02]: C0x0118.0x1.0
0x309534…3096c8 [0x03]: C0x0118.0x2.0
0x309534…3096c8 [0x04]: C0x0118.0x3.0
0x309534…3096c8 [0x05]: C0x0119.0x0.0
0x309534…3096c8 ]
0x309534…3096c8 }
0x3096c8…30985c Dummy {f00=0x0117, f01=0x0190, f02=» 2 P IDENT LDTASK REL 10.0 80-03-14 870105041000 P : P* B 6 P************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* LDTASK = LOAD TASK P* P* P* P* 6 P
0x30985c…3099f0 Dummy {f00=0x0117, f01=0x0190, f02=» MEMORY MANAGEMENT SYSTEMS. P* $ & P* IT CONTAINS TWO ENTRY POINTS: . P* X . P* - LT:DSK USED IN DISC PAGING SYSTEMS b 8 P* - LT:SWB USED IN SWAPPABLE WORK BLOCK SYSTEMS P* P* P EJECT LDTASK P* P*
0x3099f0…309b84 Dummy {f00=0x0117, f01=0x0190, f02=»T:SWB SWAPPABLE WORK BLOCK ENTRY P ENTRY TTABLD LOAD TASK TTAB ( 2 P ENTRY QLTDSK ACTIVATE LDTASK AT ENTRY LT:DSK L 2 P ENTRY QLTSWB ACTIVATE LDTASK AT ENTRY LT:SWB " P ENTRY QLTASK ACTIVATE LDTASK " P ENTRY LD:ECB LDTASK ECB AREA P ENT
0x309b84…309d18 Dummy {f00=0x0117, f01=0x0190, f02=»CK BASE x P EJECT LDTASK P* ( P* 2 P************* < P* EXTERNALS * R P************* h P* ~ P* " P EXTRN TLDS15 ENTRY IN TLDSEG " P EXTRN TLDS20 ENTRY IN TLDSEG 2 P EXTRN QMEXIT QUEUE TASK AND EXIT MONITOR
0x309d18…309eac Dummy {f00=0x0117, f01=0x0190, f02=» EXTRN PAGQUE FREE PAGE QUEUE & P EXTRN PAG:QB QUEUE LINK BACKWARDS & P EXTRN PAG:PA PAGE ADDRESS P ( P EXTRN PAG:SB SEGMENT BLOCK ADDRESS r P EXTRN SEG:FC FILE CODE & P EXTRN SEG:DS DISC SECTOR ADDRESS P EXTRN SEG:EL SEGMENT LENGTH
0x309eac…30a040 Dummy {f00=0x0117, f01=0x0190, f02=» & P EXTRN SWB:NS SWB LENGTH (SECTORS) $ P EXTRN ECBBA ECB BUFFER ADDRESS . & P EXTRN ECBRL ECB REQUESTED LENGTH V & P EXTRN ECBEL ECB EFFECTIVE LENGTH P EXTRN ECBRC ECB RETURN CODE $ P EXTRN ECBCW1 ECB CONTROL WORD 1 $ P EXTRN ECBCW2 ECB
0x30a040…30a1d4 (3, 186) Dummy {f00=0x0118, f01=0x018e, f02=»RN TTB:SP SEGTAB ADDRESS P* P EJECT LDTASK * P* B P* L ( P EXTRN SCTIPL PROGRAM LOADING DEVICE V . P EXTRN SCTIOE APPLICATION RESTART ADDRESS P EXTRN SCTPSZ PAGE SIZE * P EXTRN SCTLAP LOGICAL ADDRESS OF PAGES P EJECT
0x30a1d4…30a368 Dummy {f00=0x0118, f01=0x0190, f02=» . P***************************************** P* 6 . P* A PROGRAM VERSION USING TOSS MMU PAGING @ * P* IS OBTAINED BY SETTING MMUPAG EQU 1. r P* PMMUPAG EQU 1 P* P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION
0x30a368…30a4fc Dummy {f00=0x0118, f01=0x018e, f02=»SS SWAPPABLE WORK p 2 P* BLOCKS IS OBTAINED BY SETTING SWPBLK EQU 1. P* P PSWPBLK EQU 0 Z P* n P EJECT LDTASK x P* " P* LDTASK ECB AND BUFFER AREAS P* . PLD:ECB DATA 0,0,0,0,0,0,0 LDTASK ECB AREA P* 4 PLD
0x30a4fc…30a690 Dummy {f00=0x0118, f01=0x0190, f02=» ( PLD:STB EQU *-2 LOAD TASK STACK BASE P* 0 P EJECT LDTASK : P* R P* TTABLD (LOAD TASK TTAB) P* ~ P IFT MMUPAG=1 P RES 16 LDTASK MMU TABLE P XIF P* P DATA 0 CURRENT SEGMENT BASE ( PPQEMTY DATA 0 PA
0x30a690…30a824 Dummy {f00=0x0118, f01=0x0190, f02=»INK v " P DATA '#L' TASK IDENTIFICATION P DATA 49 PRIORITY LEVEL 2 P DATA 0 PENDING POINTER R * P DATA /C4C0 PSW (PROGRAM STATUS WORD) r P DATA 0 DISPATCH ADDRESS 2 P DATA 0,0,0,0,0,0,0 REGISTER SAVE AREA, A1-A14 P DATA 0,0,0,0,0,0,
0x30a824…30a9b8 Dummy {f00=0x0118, f01=0x0190, f02=»********** P* P* D P* LT:DSK PERFORMS LOADING OF DISC RESIDENT SEGMENTS INTO CORE. & P* n * P* INPUT: A1 = SEGMENT BLOCK ADDRESS x 2 P* A3 = TTAB ADDRESS OF CALLING TASK P* P* * PLT:DSK EQU * LDTASK DISC
0x30a9b8…30ab4c Dummy {f00=0x0118, f01=0x0190, f02=»OR CALLING TASK (IF MMU) AND | P* REMOVE PAGE FROM PAGQUE $ P* F P LDR A7,A3 SAVE A3 P P LDR A5,A3 j P INH | P CF A15,TLDS15 , P LDR A5,A7 TTAB ADDRESS OF CALLING TASK * P ABL QMEXIT QUEUE TASK AND EXIT LDTASK P* P E
0x30ab4c…30ace0 Dummy {f00=0x0118, f01=0x0190, f02=»* PLTD:00 EQU * ( P IM PQEMTY INDICATE PAGE QUEUE EMPTY P LKM J P DATA 5 PAUSE LDTASK V P* r " P* TAKE FIRST PAGE FROM PAGQUE | P* PLTD:05 EQU * P LD A2,PAGQUE+2 P CWK A2,PAGQUE $ P RB(E) LTD:00 NO PAGE AVAI
0x30ace0…30ae74 (3, 187) Dummy {f00=0x0118, f01=0x0190, f02=» ADDRESS TO NEXT PAGE BLOCK ( P ST A4,PAGQUE+2 UPDATE QUEUE ANCHOR $ P LDR* A5,A2 PAGQUE ADDRESS P 4 P STR A5,A4 UPDATE QUEUE LINK FORWARD NEXT BLOCK r 0 P CMR A2 RESET QUEUE LINK FORWARD THIS BLOCK , P LDKL A6,/4000 SEGMENT UNDER LOADING BIT
0x30ae74…30b008 Dummy {f00=0x0118, f01=0x0190, f02=» . P ORRS A6,A1 INDICATE SEGMENT UNDER LOADING 0 P ST A2,SEG:PB,A1 SET NEW PAGE BLOCK ADDRESS 6 2 P ST A1,PAG:SB,A2 SET NEW SEGMENT BLOCK ADDRESS j P* P IFT MMUPAG=1 P* 2 P* UPDATE MMU TABLE FOR CALLING TASK AND LDTASK P* (
0x30b008…30b19c Dummy {f00=0x0118, f01=0x018e, f02=»TASK l , P TS TTB:MT,A5 STORE IN LDTASK MMU TABLE 2 P LD A1,TTB:CB,A3 CURRENT SEGMENT BASE ADDRESS < P ST A1,TTB:CB,A5 r P LDR A1,A2 & P LDR A3,A5 TTAB ADDRESS OF LDTASK . P CF A15,TLDS20 UPDATE MMU TABLE FOR LDTASK 6 P TS TTB:MT,A3 ST
0x30b19c…30b330 Dummy {f00=0x0118, f01=0x0190, f02=» P* P ENB P LD A4,SCTPSZ PAGE SIZE & P SRL A4,1 CONVERT LENGTH TO WORDS : $ P LD A6,SEG:EL,A1 SEGMENT LENGTH d & P SRL A6,1 CONVERT LENGTH TO WORDS , P LDR A5,A3 TTAB ADDRESS OF CALLING TASK * P LDR A9,A1 SAVE SEGMENT BLOCK ADDR
0x30b330…30b4c4 Dummy {f00=0x0118, f01=0x0190, f02=»SEGTAB ADDRESS ~ . P LD A12,SEG:FC,A12 SEGMENT DISC FILE CODE , P LD A3,PAG:PA,A2 PAGE ADDRESS (PHYSICAL) H * P LD A2,SEG:DS,A1 SEGMENT DISC ADDRESS x P LDR* A1,A1 P ANK A1,/FF P* P IFT MMUPAG=0 2 P ST* A3,TTB:CB,A5 UPDATE C
0x30b4c4…30b658 Dummy {f00=0x0118, f01=0x0190, f02=» EJECT LDTASK P* P* SET ECB PARAMETERS " P* > & PLTD:20 EQU * ENTRY USED BY LT:SWB H " P LDKL A8,LD:ECB LD:ECB ADDRESS r . P ST A1,ECBCW1,A8 SET SECTOR NUMBER IN ECB P ST A2,ECBCW2,A8 * P STR A12,A8 SET DISC FILE CODE IN ECB
0x30b658…30b7ec Dummy {f00=0x0118, f01=0x0190, f02=» LDR A10,A6 . P ADKL A10,127 NEXT HIGHER MULTIPLE OF 128 P ANKL A10,/7F80 F . P SUR A4,A10 CHECK IF PAGE IS LARGE ENOUGH ^ * P RF(NN) LTD:25 OK, JUST ONE LKM NEEDED P LDR A10,A6 . P ANKL A10,/7F80 NEXT LOWER MULTIPLE OF 128 P*
0x30b7ec…30b980 Dummy {f00=0x0118, f01=0x018e, f02=»:50 INTERMEDIATE BUFFER NEEDED 0 P ST A10,ECBRL,A8 SET REQUESTED LENGTH IN ECB & P* Z P IFT MMUPAG=0 d & P ST A3,ECBBA,A8 SET BUFFER ADDRESS z P XIF P* P EJECT LDTASK P* P* P IFT MMUPAG=1 P ECR A1,A3
0x30b980…30bb14 (3, 188) Dummy {f00=0x0118, f01=0x0190, f02=» P EJECT LDTASK P* . P* SWB: CONVERT LOGICAL ADDRESS TO PHYSICAL & P* X P SRL A1,3 b & P ANK A1,/1E MMUTAB INDEX (5 BITS) t P ADR A1,A5 ADD TTAB ADDRESS * P LC A1,TTB:MT,A1 PHYSICAL PAGE ADDRESS P LDR A2,A1 P ANK A
0x30bb14…30bca8 Dummy {f00=0x0118, f01=0x018e, f02=» MMUPAG=1 P* 2 P* SEGMENT: CONVERT PHYSICAL ADDRESS TO LOGICAL P* R P SLL A3,2 P LDR A12,A3 n 6 P ANKL A12,/FFF CONVERT PHYSICAL ADDRESS TO LOGICAL P OR A12,SCTLAP P* PLTD:40 EQU * & P ST A3,ECBBA,A8 SET BUFF
0x30bca8…30be3c Dummy {f00=0x0118, f01=0x0190, f02=» h 2 P ADK A6,0 CHECK IF ANYTHING LEFT TO READ/WRITE 0 P RF(NP) LTD:70 SEGMENT/SWB HANDLING FINISHED > P* r P EJECT LDTASK | P* . P* NOT ROOM ENOUGH IN PAGE FOR LAST SECTOR: 0 P* READ IT TO MEMORY VIA INTERMEDIATE BUFFER P*
0x30be3c…30bfd0 Dummy {f00=0x0118, f01=0x0190, f02=»LDTASK BUFFER ADDRESS P ST A1,ECBBA,A8 P LDK A2,/80 6 2 P SCR A2,A8 INDICATE BUFFER NOW IN SYSTEM AREA J P ADK A2,/80 A2 := 256 6 P ST A2,ECBRL,A8 SET REQUESTED LENGTH TO ONE SECTOR P ECR A2,A10 * P ADS A2,ECBCW2,A8 UPDATE SEC
0x30bfd0…30c164 Dummy {f00=0x0118, f01=0x0190, f02=»2 PAGE POINTER & P ADR A6,A6 CONVERT LENGTH TO BYTES P* @ P IFT MMUPAG=1 J 2 P MVSU A6 MOVE LAST PART OF SEGMENT/SWB TO PAGE ` P XIF P* P IFT MMUPAG=0 PLTD:65 EQU * P LDR* A10,A1 MOVE ONE WORD P STR A10,A2
0x30c164…30c2f8 Dummy {f00=0x0118, f01=0x018e, f02=»* P EJECT LDTASK P* " P* , PLTD:70 EQU * 6 P IFT SWPBLK=1 J , P LDR A11,A11 CHECK DISC PAGING/SWB FLAG ` P RF(Z) LTD:80 SWB HANDLING P XIF P* 8 P LDKL A4,/C000 INDICATE SEGMENT SUCCESSFULLY LOADED P XRR
0x30c2f8…30c48c Dummy {f00=0x0118, f01=0x0190, f02=» n P IM ECBCW1,A8 P LDKL A2,/7FFF P ANS A2,ECBCW2,A8 4 P RB LTD:60 N P* ` P EJECT LDTASK j P* P* READ ONE SECTOR FROM DISC P* PLTD:90 EQU * P LKM P DATA 1 P LD A2,ECBRC,A8 RETURN CODE
0x30c48c…30c620 Dummy {f00=0x0118, f01=0x0190, f02=» IN PAGQUE AGAIN | P* PLTD:95 ANK A2,1 " P NGR A2,A2 : . P SUK A2,2 ERROR, SET RETURN CODE -2 OR -3 L . P ST A2,TTB:SA+14,A5 SET RETURN CODE IN A7 ~ P* P IFT SWPBLK=1 , P LDR A11,A11 CHECK DISC PAGING/SWB FLAG P RB(Z) L
0x30c620…30c7b4 (3, 189) Dummy {f00=0x0118, f01=0x0190, f02=» $ P LDK A4,1 INDICATE SEGMENT ERROR P SCR A4,A9 , . P LD A4,SCTIOE APPLICATION RESTART ADDRESS > . P ST A4,TTB:SA,A5 SET NEW DISPATCH ADDRESS p P RB LTD:80 P* P EJECT LDTASK P* P* P********** P* LT:SWB *
0x30c7b4…30c948 Dummy {f00=0x0118, f01=0x0190, f02=» A1 = SWAPPABLE WORK BLOCK ADDRESS 2 P* A3 = TTAB ADDRESS OF CALLING TASK , P* A4 = LKM DATA DIRECTIVE b P* P* * PLT:SWB EQU * LDTASK SWB HANDLING ENTRY P IFT SWPBLK=1 P IFT MMUPAG=1 P INH ( P LDKL A5
0x30c948…30cadc Dummy {f00=0x0118, f01=0x0190, f02=» P XIF P* P IFT SWPBLK=1 , P LDR A5,A3 TTAB ADDRESS OF CALLING TASK 4 " P LDR A7,A4 LKM DATA DIRECTIVE d 0 P SUR A11,A11 INDICATE SWB HANDLING (A11 = 0) * P LDR* A3,A1 DISC ADDRESS OF FIRST COPY P ANK A3,/FF P LD A4,S
0x30cadc…30cc70 Dummy {f00=0x0118, f01=0x0190, f02=»ASK P* ! P* ! P LD A1,TTB:SA+14,A5 ! P ANK A1,/FF SWB COPY INDEX ! < P* ! ^ PLTS:10 EQU * ! h P SUK A1,1 ! | P* ! P IFT CPU852=1 ! P RF(NP) LTS:20 ! 4 P ADR A4,A2 COMPUTE DISC ADDRESS OF REQUESTED SWB ! P RF(O) LTS:1
0x30cc70…30ce04 Dummy {f00=0x0118, f01=0x0190, f02=» ! P* " PLTS:20 EQU * " , P LDR A1,A3 DISC ADDRESS OF REQUESTED SWB " & P LDR A2,A4 " V P XIF " h P* " t P IFT SWPBLK=1 " ~ P IFT CPU852=0 " 2 P MUR A1 COMPUTE DISC ADDRESS OF REQUESTED SWB " P DAR A3 " P XIF " P* " P E
0x30ce04…30cf98 Dummy {f00=0x0118, f01=0x0190, f02=»RL A6,1 CONVERT SWB LENGTH TO WORDS " P LDR A4,A6 # , & P LD A12,SCTIPL SWB DISC FILE CODE # > ( P SUK A7,19 CHECK LKM DATA DIRECTIVE # h $ P ABL(Z) LTD:15 LOAD SWB REQUEST # : P LDKL A4,/7FFF PARAMETER TO AVOID INTERMEDIATE BUFFER # 2 P LDK A7,/95 PH
0x30cf98…30d12c Dummy {f00=0x0118, f01=0x0190, f02=» # P* QLTDSK * $ P* QLTSWB * $ P********** $ , P* $ > P* $ H : P* THIS ROUTINE PERFORMS ACTIVATION OF THE LOAD TASK. $ R P* $ : P* ACTIVATION IS AT LT:DSK WHEN DISC PAGING REQUEST. $ B P* ACTIVATION IS AT LT:SWB WHEN SWAPPABLE WORK
0x30d12c…30d2c0 Dummy {f00=0x0118, f01=0x0190, f02=») $ ` 2 P* A3 = TTAB ADDRESS OF CALLING TASK % * P* A4 = LKM DATA DIRECTIVE (LT:SWB) % @ P* % n $ P* OUTPUT: A2, A5 ARE DESTROYED % x P* % P* % 0 PQLTSWB EQU * ACTIVATE LDTASK AT ENTRY LT:SWB % P IFT SWPBLK=1 % $ P LDKL A2,L
0x30d2c0…30d454 (3, 190) Dummy {f00=0x0119, f01=0x4146, f02=»YSTEM % d P XIF & P* & 0 PQLTDSK EQU * ACTIVATE LDTASK AT ENTRY LT:DSK & $ $ P LDKL A2,LT:DSK DISPATCH ADDRESS & X P* & P EJECT LDTASK & P* & P* & PQLTASK EQU * & ( P LDKL A5,TTABLD LDTASK TTAB ADDRESS & P ABL ACTOT ACTIVAT
0x30d454…30d5e8 Dummy {f00=0x0119, f01=0x2008, f02=» ' NT LDTASK PRR 9.1 79-01-17 870105040910 END <@ H* L 6 P************************************************** V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TLDSEG = LOAD SEGMENT P* P* P*
0x30d5e8…30d77c Dummy {f00=0x0119, f01=0x0190, f02=» P RTN A8 ( P ( P ( P* STACK * ( , P********* ( > P* ( P P RES 12 ( Z PSTACKB EQU *-REL-2 ( j P EJECT ( P ( P ( P* ADDRESS TO PSW-ROUTINE * ( P************************** ( P* ( PPSW EQU *-REL (
0x30d77c…30d910 Dummy {f00=0x0119, f01=0x0190, f02=» E T P S W * ( v D P* LITTLE SUBROUTINE TO PUT PSW IN STACK FOR CALLING SUBROUTINE * ) . D P**************************************************************** ) v P ) PGETPSW EQU *-REL ) $ P STR A2,A14 SAVE A2 ON A14-STACK ) 0
0x30d910…30daa4 Dummy {f00=0x0119, f01=0x0190, f02=» RTN A14 ) P EJECT * P * & P********************************* * & & P* * * P & P* SUBROUTINE-HANDLER * * z & P* * * & P********************************* * P * PSUBSUB E
0x30daa4…30dc38 Dummy {f00=0x0119, f01=0x0190, f02=» * p P IM 4,A14 + 0 P AD A10,M:REL,A13 ADD FOR SYSLDM RELOCATION + P STR A10,A14 PUT ON STACK + N P LD A10,MUL,A13 RESTORE A10 + p P ABR* A14 + P + P + P + < P******************************************************* + < P* JUMP TO
0x30dc38…30ddcc Dummy {f00=0x0119, f01=0x0190, f02=»YSLDM + P EJECT , P , ( P************************************ , ( ( P** ** , T ( P** SAVE, AND COMMUNICATION AREA ** , ( P** ** , ( P************************************ , P
0x30ddcc…30df60 Dummy {f00=0x0119, f01=0x0190, f02=»OD EQU *-REL U:BTAB OLD ADDRESS , P DATA 0 - ( ( PU:BTNW EQU *-REL U:BTAB NEW ADDRESS - 8 P DATA 0 - d ( PS:BTOD EQU *-REL S:BTAB OLD ADDRESS - t P DATA 0 - ( PS:BTNW EQU *-REL S:BTAB NEW ADDRESS - P DATA 0 - . PMOVADD EQU *-REL ADDRESS-CHA
0x30df60…30e0f4 (3, 191) Opaque[0x194]
0x30e0f4…30e288 # DirEnt {nam=»DRSW01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2368, f03=0x0000}
0x30e0f4…30e288 IdxSect {
0x30e0f4…30e288 f00 = 0x011b // 0x30e0f4 @0x0
0x30e0f4…30e288 f01 = 0x0008 // 0x30e0f6 @0x2
0x30e0f4…30e288 gno = [ // 0x30e0f8 @0x4
0x30e0f4…30e288 [0x00]: C0x011b.0x1.0
0x30e0f4…30e288 [0x01]: C0x013d.0x2.0
0x30e0f4…30e288 [0x02]: C0x013e.0x0.0
0x30e0f4…30e288 [0x03]: C0x013e.0x1.0
0x30e0f4…30e288 ]
0x30e0f4…30e288 }
0x30e288…30e41c Dummy {f00=0x011b, f01=0x0190, f02=» 2 P IDENT DRSW01 REL 10.0 80-03-14 870105041000 P : B J * R * H C******************************************************************* f * $ * PHILIPS TERMINAL SYSTEM PTS * P* DRSW01 = DRIVER SWITCH
0x30e41c…30e5b0 Dummy {f00=0x011b, f01=0x0190, f02=» L * * 4 0* THIS MODULE CONTAINS THE FOLLOWING FUNCTIONS 8 P* WHICH ARE COMMON PARTS FOR CHANNEL UNIT DRIVERS. T P* P* H D* -OUTPUT SEND ONE CHARACTER,SAVE A3-A5 AND RETURN TO DISPATCHER * 8 4* -OUTLIN
0x30e5b0…30e744 Dummy {f00=0x011b, f01=0x0190, f02=» IF INTERRUPT IS ALLOWED, RESTORE A3-A5 AND RETURN * TO USER VIA A5 < * ` : 5* -LDREGE RESTORE A3-A5 AND RETURN TO USER VIA A5 j * 4 /* -GETCHR GET ONE CHARACTER FROM ECB-BUFFER * * -ECHO ECHO C
0x30e744…30e8d8 Dummy {f00=0x011b, f01=0x0190, f02=» *********** * * & P ENTRY OUTLIN SEND CHARACTER 0 : P ENTRY OUTPUT SAVE REGISTERS, SEND CHAR. AND DISPATCH T ( P ENTRY LDREG RESTORE A3-A5 ANDRETURN . P ENTRY LDREGE WAY BACK FROM ECHO HANDLING P ENTRY LDREGF RETURN
0x30e8d8…30ea6c Dummy {f00=0x011b, f01=0x018e, f02=»HO t P ENTRY ECHO ECHO ROUTINE P ENTRY ECHEND END OF ECHO * EJECT L * Z * d $ ******************************** n $ * EXTERNAL TOSS MODULE ENTRIES * $ ******************************** * & P EXTRN SAVE8 SAVE REGIST
0x30ea6c…30ec00 Dummy {f00=0x011b, f01=0x0190, f02=» P EXTRN OUTSAL SALCUZ DRIVER P EXTRN OUTASC ASCU4Z DRIVER ( EJECT L * Z ****************** d * DWT PARAMETERS * ~ ****************** * * EXTRN DWTST STATUS EXTRN DWTOR ORDER EXTRN DWTEC
0x30ec00…30ed94 (3, 192) Dummy {f00=0x013d, f01=0x0190, f02=» A3 z P EXTRN DWTA4 SAVE AREA A4 P EXTRN DWTA5 SAVE AREA A5 . P EXTRN DWTSB2 STACK BASE 2 P " P EXTRN DWTECH ECHO DEVICE DWT r P* , P EXTRN ECHADR ECHO ADDRESS DISPLACEMENT * P EJECT P* P********************
0x30ed94…30ef28 Dummy {f00=0x013d, f01=0x018e, f02=»ETTING X:A=0 P* PX:A EQU 1 PCECHO EQU X:A 0 P* F , P* BY SETTING X:B=1 DRIVER FOR LOCAL OR P $ P* REMOTE TERMINALS CAN BE USED P* PX:B EQU 1 PLRT EQU 01 P* 2 P* BY SETTING X:C=1 SALCUZ DRIVER CAN B
0x30ef28…30f0bc Dummy {f00=0x013d, f01=0x0190, f02=» P* PX:D EQU 1 PASCU4Z EQU 00 P* 6 < P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION SET @ , P* IS OBTAINED BY SETTING CPU852 EQU 0 P* PCPU852 EQU 0 P* P EJECT P* P* O U T L I N P
0x30f0bc…30f250 Dummy {f00=0x013d, f01=0x0190, f02=»PU852=1 & P CF A15,SAVE8 SAVE A1-A8 ON STACK P XIF : P* F P IFT CPU852=0 P " P MSR 8,A15 SAVE A1-A8 ON STACK f P XIF P* " P LDR* A1,A6 CHANNEL PARAMETER P ANK A1,/F CHANNEL INDEX P* P IFT LRT=1 P SUK
0x30f250…30f3e4 Dummy {f00=0x013d, f01=0x018e, f02=»7,/C P RF(N) OUTL10 P SUK A7,/3 " P ABL(N) OUTASC ASCU4Z 4 P XIF R P* ^ POUTL10 EQU * h P IFT SALCUZ=1 | P SUK A1,/F P ABL(E) OUTSAL SALCUZ P XIF P RF EXIT P EJECT P* P* O U T P U T
0x30f3e4…30f578 Dummy {f00=0x013d, f01=0x0190, f02=» POUTPUT EQU * P ANK A2,/FF P LDR A1,A2 0 P SUK A1,/82 STX ? B P RF(E) OUTP05 YES P SUK A1,/15 ETB ? v P RF(NE) OUTP10 NO POUTP05 EQU * " P LDR* A1,A6 CHANNEL PARAMETER P ANK A1,/C LT? P RF(E) LDRE10
0x30f578…30f70c Dummy {f00=0x013d, f01=0x0190, f02=» EJECT P* P* P* S T R E G " P* 8 : P* INDICATE INTERRUPTS ALLOWED AND SAVE A3-A5 IN DWT B P* P* PSTREG EQU * P INH P LDKL A1,/100 0 P ORS A1,DWTST,A6 INDICATE INTERRUPTS ALLOWED $ P ST A3,DWT
0x30f70c…30f8a0 Dummy {f00=0x013d, f01=0x0190, f02=»CT P* P* L D R E G P* * > P* IF INTERRUPT ALLOWED RESTORE A3-A5 FROM DWT AND RETURN 4 & P* VIA A5. ELSE GO TO DISPATCHER. v P* P* PLDREG EQU * P LD A3,DWTST,A6 P ANKL A3,/100 P RB(Z) EXIT
0x30f8a0…30fa34 (3, 193) Dummy {f00=0x013e, f01=0x0190, f02=» P* P* PLDREGF EQU * & P LD A5,DWTA5,A6 A5 , PLDREGE EQU * V & P LD A3,DWTA3,A6 RELOAD REGISTER A3 j & P LD A4,DWTA4,A6 A4 $ PLDRE10 LD A7,DWTOR,A6 GET ORDER P ANK A7,/FF P LD A8,DWTECB,
0x30fa34…30fbc8 Dummy {f00=0x013e, f01=0x0190, f02=» ONE CHARACTER FROM ECB-BUFFER z P* & P* ON ENTRY: 0 P* F P* A3 = BUFFER INDEX P P* A8 = ECB-ADDRESS n P* P* ON EXIT: P* P* A2 = CHARACTER * P* A1 = 0 IF LAST CHARACTER ELSE # 0 P* J
0x30fbc8…30fd5c Dummy {f00=0x013e, f01=0x018e, f02=»ESTED LENGTH P SUR A1,A3 * P RF(NP) GCH010 LAST CHARACTER REACHED & " P LD A2,2,A8 GET BUFFER ADDRESS T P ADR A2,A3 z P LCR A2,A2 CHAR. TO A2 P ANK A2,/FF $ P ADK A3,1 INCREMENT BUFFER INDEX P RF GCH020 , PGCH010 ST A3,6,A
0x30fd5c…30fef0 Dummy {f00=0x013e, f01=0x0190, f02=» P* P* P* E C H O , E C H E N D P* > < P* SUBROUTINE TO ECHO CHARACTER CONTAINING TWO PARTS, H . P* ONE GENERAL AND ONE DEVICE-DEPENDENT P* 4 P* PART ONE: FIND DWT-ADDRESS OF ECHO-DEVICE, 2 P*
0x30fef0…310084 Dummy {f00=0x013e, f01=0x018e, f02=»ORE CHARACTERS t 2 P* CORRESPONDING TO ONE CHARACTER 4 P* TO BE STORED IN INPUT ECB-BUFFER L P* P* 4 P* PART ONE FOLLOWS AND PART TWO CAN BE FOUND 4 P* IN THE DRIVER MODULE CORRESPONDING TO ECHO P
0x310084…310218 Dummy {f00=0x013e, f01=0x0190, f02=» p 6 P* THE ECHO-ROUTINE SHOULD BE TERMINATED WITH A P* JUMP TO 'ECHRTN'. B P* ` PECHEND EQU * j P* ~ P IFT CECHO=1 P* $ P LDKL A7,/8000 INDICATE END I/O P XIF PECHO EQU * P IFT CECHO=1 & P ST A3,D
0x310218…3103ac Dummy {f00=0x013e, f01=0x0190, f02=») RETUR NO ECHO REQUESTED 0 P LDR A4,A6 SAVE DWT-ADDRESS OF INPUT DEVICE " 2 P LD A6,DWTECH,A6 DWT-ADDRESS OF OUTPUT DEVICE V 6 P ST A4,DWTWAT,A6 SAVE DWT-ADDRESS OF INPUT DEVICE P LDKL A5,DWTSB2 & P ADR A5,A6 STACKBASE-ADDRESS IN A5 . P
0x3103ac…310540 Dummy {f00=0x013e, f01=0x410a, f02=» P IFT CECHO=1 P LDR A7,A7 END? P RF(NN) ERETUR NO 0 ( P CF A15,TENDIO END I/O OUTPUT DEVICE J > PERETUR LD A6,DWTWAT,A6 RELOAD DWT-ADDRESS OF INPUT DEVICE v 4 PRETUR ABL LDREGF RELOAD A3-A5 AND RETURN VIA A5 P* END @
0x310540…3106d4 (3, 194) Dummy {f00=0x013e, f01=0x2008, f02=» RE A3-A5 AND RETURN l * TO USER VIA A5 $ * H : 5* -LDREGE RESTORE A3-A5 AND RETURN TO USER VIA A5 R * 4 /* -GETCHR GET ONE CHARACTER FROM ECB-BUFFER * 6 1* -LOGG LOGG OF INPUT AND OUTPUT CHARA
0x3106d4…310868 Dummy {f00=0x013e, f01=0x0190, f02=»FT TOSS=1 v P IFT IBM=0 w " P DATA 0,0,0 VOLUME NAME BUFFER w $ P IFT MMUPAG+CHAN=2 w J P RES DVBLEN-3 MMU BUFFER w d P XIF w P* w P IFT TOSS+IBM=0 w P IFT MMUPAG+CHAN=2 w P RES DVBLEN MMU BUFFER w P XIF w P* w P EJECT
0x310868…3109fc Dummy {f00=0x013e, f01=0x0190, f02=»* w | P********************* x P* x ( PDWFD01 EQU * x 2 ( PDWTRCW EQU *-DWFD01 TEMP RETURN CODE x F P DATA 0 x r P DATA /8000 DWT STATUS x P DATA 0 ECB ADDRESS x P DATA 0 ORDER x " P DATA FDADR ACTIVATION ADDRESS x P DATA 0 TTAB-ADD
0x3109fc…310b90 Dummy {f00=0x013e, f01=0x0190, f02=» ECB ADDRESS x z DATA DEVECB MMU ECB ADDRESS y XIF y 8 P* y D PDWTA3 EQU *-DWFD01 y N P DATA 0 y h P DATA 0 SAVE AREA y x P DATA 0 y P DATA 0 y " P DATA 0,0,0,0 STACK (3 LEVELS) y P DATA 0 ORDER SAVE AREA y P* y P EJECT
0x310b90…310d24 Dummy {f00=0x013e, f01=0x0190, f02=»ATA /8000 NVL INDICATOR 2 y P DATA /8000 NVL INDICATOR 3 z " ( PDWTVO0 EQU *-DWFD01 VOLUME NAME NO 0 z F P DATA /FFFF,/FFFF,/FFFF z r ( PDWTVO1 EQU *-DWFD01 VOLUME NAME NO 1 z P DATA /FFFF,/FFFF,/FFFF z ( PDWTVO2 EQU *-DWFD01 VOLUME NAME NO 2 z
0x310d24…310eb8 Dummy {f00=0x013e, f01=0x0190, f02=»TATUS WORD z v P DATA 0 { P XIF { " PDWTA5 EQU *-DWFD01 { . P DATA 0 { H * PDWTRTY EQU *-DWFD01 RETRY REQUEST FLAG { X P DATA 0 { $ PDWTTP EQU *-DWFD01 TIMER POINTER { P DATA 0 { P* { P EJECT DRFD01 { P* { P* { P IFT
0x310eb8…31104c Dummy {f00=0x013e, f01=0x018e, f02=»TOR { l P DATA 0 | P* | P IFT OPCLOS=1 | & . PDWTTP2 EQU *-DWFD01 TIMER POINTER FOR OPEN | < P DATA 0 | n 4 PDWTOCF EQU *-DWFD01 OPEN/CLOSE FLAG AT POWER ON | ~ P DATA 0 | P XIF | P* | P EJECT DRFD01 | P* | P* | P
0x31104c…3111e0 Dummy {f00=0x013e, f01=0x0190, f02=» | f P DATA 0 } , PDWTRW EQU *-DWFD01 READ/WRITE INDICATOR } P DATA 0 } H P XIF } X P* } d P IFT IBM=1 } n , PDWTBOE EQU *-DWFD01 BEGINNING OF EXTENT } P DATA 0,0,0,0 } $ PDWTEOD EQU *-DWFD01 END OF DATA } P DATA 0,0,0,0 } & PDWTE
0x3111e0…311374 (3, 195) Opaque[0x194]
0x311374…311508 # DirEnt {nam=»ST8000«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2350, f03=0x0000}
0x311374…311508 IdxSect {
0x311374…311508 f00 = 0x011a // 0x311374 @0x0
0x311374…311508 f01 = 0x0004 // 0x311376 @0x2
0x311374…311508 gno = [ // 0x311378 @0x4
0x311374…311508 [0x00]: C0x011a.0x2.0
0x311374…311508 [0x01]: C0x011b.0x0.0
0x311374…311508 ]
0x311374…311508 }
0x311508…31169c Dummy {f00=0x011a, f01=0x018e, f02=» 2 P IDENT ST8000 REL 10.0 80-06-09 870105041000 P : P ENTRY ST8000 B P* X * P EXTRN IHPFAR,IHLKM,IHRTC,ILLINT,IHTW b P EXTRN IHTC,IHSOP,CHLT1,IHFD ( P EXTRN IASCUZ,ISLCI,ISLCO,CHRT1,IHMD P* ST8000 EQU * P* P
0x31169c…311830 Dummy {f00=0x011a, f01=0x0190, f02=» P DATA ILLINT 13 P DATA ILLINT 6 P DATA IHTW 7 < P DATA IASCUZ 8 V P DATA IHSOP 9 r P DATA ISLCI P DATA ISLCO P DATA CHRT1 12 P DATA IHMD 13 P DAT
0x311830…3119c4 Dummy {f00=0x011a, f01=0x0190, f02=»ATA ILLINT 19 P DATA ILLINT 20 P DATA ILLINT 21 6 P DATA ILLINT 22 R P DATA ILLINT 23 n P DATA ILLINT 24 P DATA ILLINT 25 P DATA ILLINT 26 P DATA ILLINT 27 P DATA ILLINT
0x3119c4…311b58 Dummy {f00=0x011a, f01=0x0190, f02=»NT 123 P DATA ILLINT 124 P DATA ILLINT 125 . P DATA ILLINT 126 J P DATA ILLINT 127 f P DATA ILLINT 128 P DATA ILLINT 129 P DATA ILLINT 130 P DATA ILLINT 131 P DATA ILLINT 132
0x311b58…311cec Dummy {f00=0x011a, f01=0x018e, f02=»37 ~ P DATA ILLINT 138 P DATA ILLINT 139 & P DATA ILLINT 50 B P DATA ILLINT 51 ^ P DATA ILLINT 52 z P DATA ILLINT 53 P DATA ILLINT 54 P DATA ILLINT 55 P DATA ILLINT 56 P D
0x311cec…311e80 Dummy {f00=0x011a, f01=0x4030, f02=» P DATA ILLINT 62 END @ ,NT 139 & P DATA ILLINT 50 B P DATA ILLINT 51 ^ P DATA ILLINT 52 z P DATA ILLINT 53 P DATA ILLINT 54 P DATA ILLINT 55 P DATA ILLINT 56 P D
0x311e80…312014 (3, 196) Dummy {f00=0x011b, f01=0x2008, f02=» NT ST8000 79-09-10 JOS * ( * 2 * < * F * P * Z ENTRY ST8000 d ST8000 EQU * z END @
0x312014…3121a8 Dummy {f00=0x011b, f01=0x018e, f02=»(IN T:A)=LENGTH OF DSCB'S ** f 4 P** CIA (IN T:A)=DISPL. TO T:A-START ** g ( 4 P** CSE (IN T:A)=STACKSIZE ** g ` 4 P** WORK-REGS. :A1-A4,A9,A11 ** g 4 P************************************************ g P
0x3121a8…31233c Dummy {f00=0x011b, f01=0x0190, f02=» g r ( P LD A3,CSN,A1 GET DSCB TOTAL LENGTH h P RF(Z) ALLB70 NO DSCB'S h 4 . P ADKL A1,T:ASTA CALC START OF DSCB RECORDS h T " P LDR A10,A1 SAVE START ADDRESS h P XIF h P IFT CREDIT+MMUPAG=2 h P ELR A1,A8 GET T:A-ADDRESS h ( P EL A3,CSN,A1 GET
0x31233c…3124d0 Dummy {f00=0x011b, f01=0x0190, f02=» h r P XIF i P IFF CREDIT=0 i P SUR A3,A1 i * P NGR A3,A3 i < P SUK A3,DSCBL END CONDITION i N : P ST A3,SAVE04,A13 SAVE ADDRESS TO END OF DSCB-RECORDS i r : PALLB10 SUK A1,DSCBL A1=FIRST WORD IN FIRST DSCB-RECORD i P CW A1,SAVE04,A13 ALL? i
0x3124d0…312664 Dummy {f00=0x011b, f01=0x0190, f02=»NN) ALLB10 NO! i P ST A9,BA,A1 BUFFER START j P LD A3,RL,A1 BUFFER LENGTH j 8 P ST A3,BL,A1 j Z P LD A2,EL,A1 SHARED BUFFER? j n P RF(Z) NOTSH NO! j & P LDR A4,A1 RESTORE START OF DSCB'S j P XIF j P IFT CREDIT+MMUPAG=2 j $ P ELR A3,A1 G
0x312664…3127f8 Dummy {f00=0x011b, f01=0x0190, f02=» P EL A2,EL,A1 SHARED BUFFER? k P RF(Z) NOTSH NO! k ( & P LDR A4,A1 RESTORE START OF DSCB'S k @ P XIF k j P IFF CREDIT=0 k v P ADK A4,DSCBL FIRST WORD k PALLB20 SUK A2,1 A2=INDEX k P RF(NN) ALLB30 k P LDK A1,LMP4 FORMAT ERROR k P CAL
0x3127f8…31298c Dummy {f00=0x011b, f01=0x0190, f02=» P RB(NE) ALLB20 l " P LDK A1,LMP4 BUFFER NOT FOUND l P CALL ERROR l @ P IFT CREDIT-MMUPAG=1 l T ( PALLB40 LD A4,BA,A4 BUFFER ALLOCATED? l p P RF(NZ) ALLB50 YES! l P LDK A1,LMP4 FORMAT ERROR l P CALL ERROR l PALLB50 EQU * l * P ST A4
0x31298c…312b20 Dummy {f00=0x011b, f01=0x0190, f02=»50 YES! l P LDK A1,LMP4 FORMAT ERROR m P CALL ERROR m 2 PALLB50 EQU * m F * P ES A4,BA,A1 AND ESORE IN CURRENT ECB m Z P XIF m P IFF CREDIT=0 m P RB ALLB10 m P m P IFT CREDIT-MMUPAG=1 m PNOTSH LDR A9,A9 PAGING? m P RF(NZ)
0x312b20…312cb4 (3, 197) Opaque[0x194]
0x312cb4…312e48 # DirEnt {nam=»PFTAB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24a0, f03=0x0000}
0x312cb4…312e48 IdxSect {
0x312cb4…312e48 f00 = 0x0125 // 0x312cb4 @0x0
0x312cb4…312e48 f01 = 0x0002 // 0x312cb6 @0x2
0x312cb4…312e48 gno = [ // 0x312cb8 @0x4
0x312cb4…312e48 [0x00]: C0x0125.0x0.0
0x312cb4…312e48 ]
0x312cb4…312e48 }
0x312e48…312fdc Dummy {f00=0x0125, f01=0x018e, f02=» 0 P IDENT PFTAB REL 10.0 80-03-14 870105041000 P 8 P* @ P* J P* POWER FAIL TABLE T P* n D P* THIS TABLE HOLDS ADDRESSES TO MODULES THAT SHOULD BE EXECUTED x P* AFTER MASTER CLEAR P* P* P ENTRY PFTAB TABLE ENTRY
0x312fdc…313170 Dummy {f00=0x0125, f01=0x0190, f02=» P EXTRN SOPR SOP. PANEL ( P EXTRN CHLTON LOCAL/REMOTE TERMINALS " ( P EXTRN C1DRON CASSETTE CHANGER NO. 1 N ( P EXTRN C2DRON 2 z ( P EXTRN C3DRON 3 P EXTRN FDON LINE PRINTER P EXTRN LPON JOS 77-050
0x313170…313304 Dummy {f00=0x0125, f01=0x0190, f02=»UNIT t 0 P EXTRN FMINIT FILE MANAGEMENT INITIALIZATION 0 P EXTRN DMINIT DATA MANAGEMENT INITIALIZATION @ P EXTRN SLCUON SALCUZ t P EXTRN ASCUON ASCU4Z P EXTRN CDON CDC DISC P P P P $ PPFTAB DATA PFTABE-* TABLE LENGTH
0x313304…313498 Dummy {f00=0x0125, f01=0x4050, f02=»NT v PPFTABE EQU * END OF TABLE P* , P* 6 P END @@ LTA MANAGEMENT INITIALIZATION @ P EXTRN SLCUON SALCUZ t P EXTRN ASCUON ASCU4Z P EXTRN CDON CDC DISC P P P P $ PPFTAB DATA PFTABE-* TABLE LENGTH
0x313498…31362c Dummy {f00=0x0125, f01=0x2008, f02=» TON LOCAL/REMOTE TERMINALS P* * P EXTRN DUON DISC UNIT 4 " P EXTRN MTON MAGNETIC YAPE UNIT R P* x P* $ PPFTAB DATA PFTABE-* TABLE LENGTH P DATA TWON P DATA TCDRON P DATA SOPR P DATA DRDCON P DATA
0x31362c…3137c0 Dummy {f00=0x0125, f01=0x407a, f02=»CTDCT ^ _ . D d@ v l SCTNPE SCTSTB SCTOPT SCTBUG SCTDMT~ , (
0x3137c0…313954 (3, 198) Opaque[0x194]
0x313954…313ae8 # DirEnt {nam=»LKMAL «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x25b0, f03=0x0000}
0x313954…313ae8 IdxSect {
0x313954…313ae8 f00 = 0x012d // 0x313954 @0x0
0x313954…313ae8 f01 = 0x0004 // 0x313956 @0x2
0x313954…313ae8 gno = [ // 0x313958 @0x4
0x313954…313ae8 [0x00]: C0x012d.0x2.0
0x313954…313ae8 [0x01]: C0x012d.0x3.0
0x313954…313ae8 ]
0x313954…313ae8 }
0x313ae8…313c7c Dummy {f00=0x012d, f01=0x0190, f02=» 0 P IDENT LKMAL REL 10.0 80-03-14 870105041000 P 8 P* @ $ P* LINK TO MONITOR REQUEST TABLE J @ P* THIS TABLE HOLDS INFORMATION ABOUT MODULES THAT HANDLE THE r ( P* DIFFERENT LINK TO MONITOR REQUESTS P* 2 P ENTRY LKMAL TABLE ENTRY CON
0x313c7c…313e10 Dummy {f00=0x012d, f01=0x0190, f02=» EXTRN TACTOT ACTIVATE OTHER TERMINAL P EXTRN TPAUSE PAUSE TERMINAL . P EXTRN TIMER TIMER R P EXTRN TMWAIT MULTIPLE WAIT l & P EXTRN TLUSEG LOCK/UNLOCK SEGMENT P EXTRN TLDSEG SEGMENT TLDSEG P EXTRN TABORT ABORT FUNCTION $ P EXTRN
0x313e10…313fa4 Dummy {f00=0x012d, f01=0x0190, f02=»CHPAG CHANGE MMU PAGE " P EXTRN TCHMMU CHANGE MMU TABLE P EJECT D P* R $ PLKMAL DATA LKMALE-* TABLE LENGTH P DATA TIO TERMINAL I/O P DATA TWAIT TERMINAL WAIT P DATA TEXIT TERMINAL EXIT ( P DATA TACTOT ACTIVATE OTHER TERMIN
0x313fa4…314138 Dummy {f00=0x012d, f01=0x0190, f02=»NT r P DATA TLDSEG SEGMENT TLDSEG P DATA TABORT ABORT FUNCTION . P DATA 0 R 4 P DATA GETTIM GET CURRENT VALUE OF MONITOR CLOCK n " P DATA SETTIM SET MONITOR CLOCK P DATA 0 P DATA TOSSFM FILE MANAGEMENT
0x314138…3142cc Dummy {f00=0x012d, f01=0x4010, f02=» END @ TLDSEG SEGMENT TLDSEG P DATA TABORT ABORT FUNCTION . P DATA 0 R 4 P DATA GETTIM GET CURRENT VALUE OF MONITOR CLOCK n " P DATA SETTIM SET MONITOR CLOCK P DATA 0 P DATA TOSSFM FILE MANAGEMENT
0x3142cc…314460 Dummy {f00=0x012d, f01=0x2008, f02=» f " P DATA SETTIM SET MONITOR CLOCK PLKMALE EQU * 4 P* H P END R@ ^INAL EXIT R ( P DATA TACTOT ACTIVATE OTHER TERMINAL t P DATA TPAUSE TERMINAL PAUSE P DATA TIMER TIMER P DATA GETBUF GET BUFFER P DATA RELB
0x314460…3145f4 (3, 199) Dummy {f00=0x012d, f01=0x0190, f02=»M VERSION SUPPORTING SPLIT EXTENT I/O * P* IS OBTAINED BY SETTING XTSPLI EQU 1. . P* PXTSPLI EQU 0 f P* z P EJECT TOSSFM P* P* P********** P* TOSSFM * P********** P* P* 8 P* THIS IS TH
0x3145f4…314788 Dummy {f00=0x012d, f01=0x0190, f02=» n P* P* A5 = TTAB ADDRESS P* A7 = ORDER CODE 0 P* A8 = ECB ADDRESS L P* h . P* WHEN FILE ADMINISTRATION IS REQUESTED, r ( P* TOSSFM WILL ACTIVATE THE FMTASK. P* . P* WHEN I/O FUNCTION IS REQUESTED, TOSSFM
0x314788…31491c Dummy {f00=0x012d, f01=0x0190, f02=»JECT TOSSFM P* P* 4 PTOSSFM EQU * FILE MANAGEMENT LKM PROCESSOR ENTRY * P* b P* CHECK ORDER CODE l P* LDR A2,A7 ORDER CODE P ANK A2,/FF SKIP OPTION P XRK A2,/80 WAIT BIT SUK A2,/01 P RF(Z) FM:
0x31491c…314ab0 Dummy {f00=0x012d, f01=0x0190, f02=»E x SUK A2,/11-/05 P RF(Z) FM:030 PHYSICAL READ " SUK A2,/15-/11 F P RF(Z) FM:030 PHYSICAL WRITE ^ SUK A2,/21-/15 $ P RF(Z) FM:010 OPEN/CREATE/EXTEND SUK A2,/22-/21 4 P RF(NZ) FM:RQE REQUEST ERROR IF NOT CLOSE/DELE
0x314ab0…314c44 Dummy {f00=0x012d, f01=0x0190, f02=»ARAMETERS: h * " P* A1 = ORDER CODE AND OPTION * A2 = DISPATCH ADDRESS B * %* A3 = TTAB ADDRESS OF CALLING TASK d P* A4 = ECB ADDRESS * A5 = FMTASK TTAB ADDRESS * PFM:010 EQU * $ P LDR A1,A7 ORDER CODE AN
0x314c44…314dd8 Dummy {f00=0x012d, f01=0x0190, f02=»DR A4,A8 ECB ADDRESS ( # LDKL A5,TTABFM FMTASK TTAB ADDRESS , P ABL ACTDIS ACTIVATE FMTASK AND DISPATCH H * x EJECT TOSSFM * * ********** * FM I/O * ********** * $ * FILE MANAGEMENT I/O FUNC
0x314dd8…314f6c Dummy {f00=0x012d, f01=0x0190, f02=»DK A1,0 CHECK RETURN CODE P RF(Z) FM:050 OK " * : PFM:040 EQU * D P LDR A3,A1 RETURN CODE X . P ABL TIOERR ERROR: QUEUE TASK AND DISPATCH v * EJECT TOSSFM * " P* CHECK RELATIVE SECTOR NUMBER * PFM:0
0x314f6c…315100 Dummy {f00=0x012d, f01=0x0190, f02=» MMUPAG=1 , ' EL A1,ECBCW1,A8 RELATIVE SECTOR NUMBER EL A2,ECBCW2,A8 B XIF Z * f P RF(NZ) FM:060 p ADK A1,0 , P RF(Z) FM:RQE RELATIVE SECTOR NUMBER = 0 * PFM:060 EQU * P ECR A6,A1 P ANK A6,/FF
0x315100…315294 (3, 200) Opaque[0x194]
0x315294…315428 # DirEnt {nam=»CTABX «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24c8, f03=0x0000}
0x315294…315428 IdxSect {
0x315294…315428 f00 = 0x0126 // 0x315294 @0x0
0x315294…315428 f01 = 0x0002 // 0x315296 @0x2
0x315294…315428 gno = [ // 0x315298 @0x4
0x315294…315428 [0x00]: C0x0126.0x1.0
0x315294…315428 ]
0x315294…315428 }
0x315428…3155bc Dummy {f00=0x0126, f01=0x0190, f02=» 0 P IDENT CTABX REL 10.0 80-03-14 870105041000 P 8 P* @ P* CODE CONVERSION TABLE J P* l P* v P ENTRY CTABX P* P* * PC0 EQU 0 CODE CONVERSION COLUMN NO. 0 ( PC1 EQU 0 1 ( PC2 EQU
0x3155bc…315750 Dummy {f00=0x0126, f01=0x4142, f02=» 5 ( PC6 EQU 0 6 " ( PC7 EQU 0 7 N P* z P* P* PCTABX DATA C0 P DATA C1 P DATA C2 P DATA C3 P DATA C4 P DATA C5 P DATA C6
0x315750…3158e4 Dummy {f00=0x0126, f01=0x2008, f02=» C7 EQU 0 7 * 4 * > * H CTABX DATA C1 R DATA C2 h DATA C2 x DATA C3 DATA C4 DATA C5 DATA C6 DATA C7 * * END @
0x3158e4…315a78 Dummy {f00=0x0126, f01=0x0190, f02=» & PDYERR ABL DISIOE I/O REQUEST ERROR P EJECT 2 : P* ACTIONS SPECIFIED BY USER IN RIGHT BYTE IN BUFFER @ P* ARE CARRIED OUT. ~ 0 P* /2B NO MOVING OF PRINT HEAD " P* /30 CR, LF, LF B P* /31
0x315a78…315c0c Dummy {f00=0x0126, f01=0x0190, f02=»ESTED LENGTH | P RF(E) ACDY25 P LDK A3,2 START BUFFER INDEX * " P LD A2,2,A8 GET BUFFER ADDRESS N & P LC A2,1,A2 GET CONTROL CHARACTER t P ANK A2,/FF PACDY25 EQU * * P SUK A2,/2B POSITIONING BEFORE WRITE ? P RF(E) ACDY90
0x315c0c…315da0 Dummy {f00=0x0126, f01=0x0190, f02=» ( P ADK A4,1 INDICATE DOUBLE LINE FEED P 4 P < $ PACDY30 LDK A2,CR CARRIAGE RETURN D PACDY35 LDK A1,1 l 2 P SC A1,DWTAP+1,A6 RESET HEAD POSITION COUNTER 8 P* SEND CARRIAGE RETURN AND ONE OR TWO LINE FEEDS P* PACDY50 E
0x315da0…315f34 (3, 201) Opaque[0x194]
0x315f34…3160c8 # DirEnt {nam=»TIODMX«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24d0, f03=0x0000}
0x315f34…3160c8 IdxSect {
0x315f34…3160c8 f00 = 0x0126 // 0x315f34 @0x0
0x315f34…3160c8 f01 = 0x0002 // 0x315f36 @0x2
0x315f34…3160c8 gno = [ // 0x315f38 @0x4
0x315f34…3160c8 [0x00]: C0x0126.0x2.0
0x315f34…3160c8 ]
0x315f34…3160c8 }
0x3160c8…31625c Dummy {f00=0x0126, f01=0x018e, f02=» 2 P IDENT TIODMX REL 10.0 80-03-14 870105041000 P : P* B 8 P**************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 8 P**************************************************** P* (
0x31625c…3163f0 Dummy {f00=0x0126, f01=0x403c, f02=» $ P DATA /6300 SOMETHING BAD, TRAP P END ,@ 8 : P* B 8 P**************************************************** L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 8 P**************************************************** P* (
0x3163f0…316584 Dummy {f00=0x0126, f01=0x2008, f02=» ES | PTTABE EQU * P* & P END 0@ <LER TERMINAL , P* T P* ^ P ENTRY TTABX TABLE ENTRY h P* P* P* P* P* PTTABX DATA 0 P DATA 60 TERMINAL STATUS & P DATA /EE TERMINAL IDENTIF
0x316584…316718 Dummy {f00=0x0126, f01=0x0190, f02=»ADF@ N FDBAI1 P FDBDBR: X " FDBDMIL Y 6 FDBMRO Z J FDBBLZ ^ FDBMEC ^ r FDBKEY ^ CRNTID CRNSTA CRNCDF TIODM ECBCW * & 6
0x316718…3168ac Dummy {f00=0x0126, f01=0x0190, f02=» _ Y A X T X % T U , ( $P ^ =A Y 6T * CRNGETG Z , ( P H I T l , ( I $ C C T , ( / X?j ?j W _l X X , ( O # Xt
0x3168ac…316a40 Dummy {f00=0x0126, f01=0x0190, f02=»PB:FR ECBRL , ( 6P I , ( @ B Y < H H C N FNDFDB ~ , ( C _ X "" * & 6 Q X C X DT T W Y , ( H H S W
0x316a40…316bd4 (3, 202) Opaque[0x194]
0x316bd4…316d68 # DirEnt {nam=»DSKSUB«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24d8, f03=0x0000}
0x316bd4…316d68 IdxSect {
0x316bd4…316d68 f00 = 0x0126 // 0x316bd4 @0x0
0x316bd4…316d68 f01 = 0x000a // 0x316bd6 @0x2
0x316bd4…316d68 gno = [ // 0x316bd8 @0x4
0x316bd4…316d68 [0x00]: C0x0126.0x3.0
0x316bd4…316d68 [0x01]: C0x0128.0x2.0
0x316bd4…316d68 [0x02]: C0x0128.0x3.0
0x316bd4…316d68 [0x03]: C0x0129.0x0.0
0x316bd4…316d68 [0x04]: C0x0129.0x1.0
0x316bd4…316d68 ]
0x316bd4…316d68 }
0x316d68…316efc Dummy {f00=0x0126, f01=0x0190, f02=» 2 P IDENT DSKSUB REL 10.0 80-03-14 870105041000 P : P* B , P**************************************** L P* | , P* PHILIPS TERMINAL SYSTEM PTS * P* , P* DSKSUB = DISC SUBROUTINES * P* P* P*
0x316efc…317090 Dummy {f00=0x0126, f01=0x0190, f02=»FILE MANAGEMENT SUBROUTINES: P* $ 4 P* - VOLCLR = CLEAR VOLUME NAME(S) IN DISC DWT . < P* - VOLNAM = MOVE VOLUME NAME FROM DWT TO USER BUFFER f 6 P* - VOLADR = COMPUTE VOLUME NAME ADDRESS IN DWT > P* - NVLCHK = CHECK IF NEW VOLUME LOADE
0x317090…317224 Dummy {f00=0x0126, f01=0x0190, f02=» 6 P* - INXDWT = COMPUTE DWT ADDRESS + DOUBLE INDEX 8 P* - NVLTAB = TTAB ADDRESSES FOR TASKS TO HAVE NVL > P* z P* P EJECT DSKSUB P* P* P*********** P* ENTRIES * P*********** P* P* , P
0x317224…3173b8 Dummy {f00=0x0126, f01=0x0190, f02=»ME NAME ADDRESS IN DWT v . P ENTRY NVLCHK CHECK FOR NEW VOLUME LOADED : P ENTRY VOLGET MOVE VOLUME NAME FROM DISC BUFFER TO DWT P , P ENTRY NEWVOL SET NEW VOLUME LOADED BITS 4 P ENTRY INXDWT COMPUTE DWT ADDRESS + DOUBLE INDEX 6 P ENTRY NVLTAB TTAB
0x3173b8…31754c Dummy {f00=0x0126, f01=0x0190, f02=»T MASK | P EJECT DSKSUB P* $ P* . P************* 8 P* EXTERNALS * N P************* d P* z P* 4 P EXTRN IHRTN RETURN WITHOUT ENABLING INTERRUPTS P EXTRN TTABLD LDTASK TTAB P EXTRN TTABFM FMTASK TTAB *
0x31754c…3176e0 Dummy {f00=0x0126, f01=0x0190, f02=»RN DWTTAB TTAB ADDRESS " P EXTRN DWTUEC USER ECB ADDRESS P EXTRN DWTVOL VOLUME NAME D ( P EXTRN DWTNVL NEW VOLUME LOADED FLAG f " P EXTRN EWTVOL VOLUME FILE CODE 2 P EXTRN FWTEW1 POINTER TO 2ND EWT BLOCK IN FWT $ P EXTRN FWTPAR ACCESS PARAM
0x3176e0…317874 (3, 203) Dummy {f00=0x0128, f01=0x0190, f02=»CBEL ECB EFFECTIVE LENGTH P EJECT DSKSUB " P* 8 P* B , P*************************************** L P* | P* CONDITIONAL ASSEMBLY P* , P*************************************** P* P* . P* A PROGRAM VERSION US
0x317874…317a08 Dummy {f00=0x0128, f01=0x0190, f02=»VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. . P* ` PCPU852 EQU 0 j P* ~ * . ** A PROGRAM VERSION USING TOSS DISC PAGING * &* IS OBTAINED BY SETTING DSKPAG EQU 1. * DSKPAG EQU 0
0x317a08…317b9c Dummy {f00=0x0128, f01=0x018e, f02=» P* PSWPBLK EQU 0 P* " P EJECT DSKSUB , P* D P* N 2 P* A PROGRAM VERSION SUPPORTING FILE MANAGEMENT X * P* IS OBTAINED BY SETTING FILMAN EQU 1. P* PX:A EQU 0 PFILMAN EQU 1 P* P* 2 P* A PROG
0x317b9c…317d30 Dummy {f00=0x0128, f01=0x0190, f02=» P* P EJECT DSKSUB P* * P* 4 P********** > P* VOLCLR * P P********** b P* t P* ~ 6 P* VOLCLR WILL CLEAR THE REQUESTED VOLUME NAME(S) " P* IN THE REQUESTED DISC DWT. P* . P* INPUT: A1 = NUMBE
0x317d30…317ec4 Dummy {f00=0x0128, f01=0x0190, f02=» P LDR A2,A1 & P CF A15,VOLADR VOLUME NAME ADDRESS P* D PVCLR10 EQU * N P CMR A1 CLEAR ONE WORD b P ADK A1,2 INCREMENT POINTER $ P SUK A2,2 DECREMENT LOOP COUNTER P RB(P) VCLR10 P RF RETURN P* P EJECT DS
0x317ec4…318058 Dummy {f00=0x0128, f01=0x0190, f02=»E NAME OF SELECTED DISC r 4 P* TO THE USER BUFFER IF REQUESTED LENGTH = 6. P* X P* INPUT: A6 = DWT ADDRESS b P* A8 = ECB ADDRESS P* $ P* OUTPUT: A1-A4 ARE DESTROYED P* PVOLNAM EQU * $ P LD A1,ECBRL,A
0x318058…3181ec Dummy {f00=0x0128, f01=0x0190, f02=»T A4,ECBEL,A8 SET EFFECTIVE LENGTH P* * P IFT MMUPAG=0 4 ( P LD A2,ECBBA,A8 USER BUFFER ADDRESS J P* v P EJECT DSKSUB P* P* PVNAM10 EQU * P LDR* A3,A1 MOVE ONE WORD P STR A3,A2 ( P ADK A1,2 INCREMENT
0x3181ec…318380 Dummy {f00=0x0128, f01=0x0190, f02=» P IFT MMUPAG=1 2 P LD A2,DWTTAB,A6 TTAB ADDRESS OF CALLING TASK P TS -30,A15 SAVE RUNNING MMU T P TL TTB:MT,A2 LOAD USER MMU x & P LD A2,DWTUEC,A6 USER ECB ADDRESS ( P EL A2,ECBBA,A2 USER BUFFER ADDRESS P MVSU A4 MOVE VOLUME N
0x318380…318514 (3, 204) Dummy {f00=0x0128, f01=0x0190, f02=»****** P* VOLADR * P********** P* 2 P* < P* INPUT: A6 = DWT ADDRESS F P* j ( P* OUTPUT: A1 = VOLUME NAME ADDRESS t P* A4 = 6 P* PVOLADR EQU * P LC A4,DWTOR,A6 INDEX P* PVOLA05 EQU *
0x318514…3186a8 Dummy {f00=0x0128, f01=0x0190, f02=»4,1 P RB(NN) VOLA10 P LDK A4,6 " P RF RETURN 4 P* F P EJECT DSKSUB P P* h P* r P********** | P* NVLCHK * P********** P* P* 8 P* NVLCHK IS CALLED AT ACTIVATION FROM DISC DRIVER 8 P* TO
0x3186a8…31883c Dummy {f00=0x0128, f01=0x0190, f02=»A6 = DWT ADDRESS P* 6 P* OUTPUT: A1 = RETURN CODE (/20 IF NVL, ELSE 0) " 0 P* A2 = DWT ADDRESS + DOUBLE INDEX $ P* A3, A4 ARE DESTROYED P* PNVLCHK EQU * $ P LD A2,DWTOR,A6 INDEX AND ORDER 0 P ST A2,DWT
0x31883c…3189d0 Dummy {f00=0x0128, f01=0x0190, f02=»FF RESET BIT 0 (FIRST REQUEST BIT) P ST A1,DWTNVL,A2 * P ANK A1,/FF CHECK IF NVL B " P RF(Z) RETURN RETURN IF NO NVL b " P LD A4,DWTTAB,A6 TTAB ADDRESS P LDK A1,1 " P LDKL A3,NVLTAB NVLTAB ADDRESS P* P EJECT DSKSUB P
0x3189d0…318b64 Dummy {f00=0x0128, f01=0x0190, f02=»,A3 CHECK TTAB ADDRESS $ P RF(E) NVL:20 NVL FOR THIS TASK P SLL A1,1 SHIFT NVL BIT MASK F * P ADK A3,2 POINT TO NEXT TTAB IN NVLTAB j P RB NVL:10 P* PNVL:20 EQU * 0 P AN A1,DWTNVL,A2 CHECK IF NVL FOR THIS TASK & P RF(Z) RETUR
0x318b64…318cf8 Dummy {f00=0x0128, f01=0x0190, f02=»* P* $ PRETURN EQU * COMMON RETURN LABEL P IFT CPU852=1 < 2 P ABL IHRTN RETURN WITHOUT ENABLING INTERRUPTS R P XIF P* P IFT CPU852=0 P RTN A15 P XIF P* P EJECT DSKSUB P* P* P**
0x318cf8…318e8c Dummy {f00=0x0128, f01=0x018e, f02=» DISC DWT AND CHECK IF THERE IS A NEW VOLUME MOUNTED. P* > ( P* INPUT: A2 = DISC BUFFER ADDRESS H 2 P* A3 = FILE CODE (FOR DRIVE WITH INDEX = 0) t 0 P* BIT 0 SET MEANS TEST STATUS ORDER P* A6 = DWT ADDRESS P*
0x318e8c…319020 Dummy {f00=0x0128, f01=0x0190, f02=» * P CF A15,VOLADR DWT VOLUME NAME ADDRESS P LDK A7,0 RESET NVL FLAG 6 P* V PVGET10 EQU * ` , P LDR* A8,A2 ONE WORD OF NEW VOLUME NAME t , P CWR* A8,A1 COMPARE WITH OLD VOLUME NAME P RF(E) VGET20 P LDK A7,1 SET NVL FLAG $ P
0x319020…3191b4 (3, 205) Dummy {f00=0x0129, f01=0x0190, f02=»FFER POINTERS z P ADK A2,2 $ P SUK A4,2 DECREMENT LOOP COUNTER ( P RB(P) VGET10 P P CF A15,INXDWT f P ADK A7,0 CHECK NVL FLAG | " P RB(Z) RETURN RETURN IF NO NVL . P SLA A3,1 CHECK IF TEST STATUS OR RECOVERY & P RB(O) RETURN TEST S
0x3191b4…319348 Dummy {f00=0x0129, f01=0x0190, f02=»THIS DISC l P SLL A7,1 $ P RB(N) RETURN FIXED DISC, NO NVL $ P* L P EJECT DSKSUB V P* n P* x P********** P* NEWVOL * P********** P* P* > P* NEWVOL IS ENTERED FROM THE ROUTINE VOLGET WHEN IT HAS
0x319348…3194dc Dummy {f00=0x0129, f01=0x0190, f02=»THE CONCERNED FILE CODE AND FILES 8 P* OPENED ON THAT VOLUME. TASKS REPRESENTED IN THE * 4 P* TABLE NVLTAB WILL GET RETURN CODE /20 AT THE f ( P* NEXT REQUEST ON THAT FILE CODE. P* 4 P* INPUT: A3 = FILE CODE (DISC ONE FOR DRIVER)
0x3194dc…319670 Dummy {f00=0x0129, f01=0x0190, f02=»* A1-A2 ARE DESTROYED P* PNEWVOL EQU * * P LD A2,NVLBIT NVL BIT MASK > 0 P ST A2,DWTNVL,A4 INDICATE NEW VOLUME LOADED ` P LC A2,DWTOR,A6 INDEX P ANK A2,/3 P ADR A3,A2 ACTUAL FILE CODE P* P EJECT DSKSUB
0x319670…319804 Dummy {f00=0x0129, f01=0x0190, f02=» POINTER r P* > P* SET NEW VOLUME LOADED FOR ALL FILES ON CONCERNED VOLUME P* PNEW:10 EQU * f P LDR* A2,A1 NEXT FWT ADDRESS z P RB(Z) RETURN NO MORE FWT:S P LDR A1,A2 SAVE FWT ADDRESS 2 P ADKL A2,FWTEW1 ADDRESS TO FIRST E
0x319804…319998 Dummy {f00=0x0129, f01=0x0190, f02=»F(NE) NEW:30 P LDKL A2,/8000 NVL BIT 0 P ORS A2,FWTPAR,A1 INDICATE NEW VOLUME LOADED 2 P RB NEW:10 f P* x PNEW:30 EQU * . P LDR* A2,A2 ADDRESS TO NEXT EWT STRUCTURE , P RB(Z) NEW:10 END OF THIS EWT STRUCTURE ( P RB NEW:20 CONTI
0x319998…319b2c Dummy {f00=0x0129, f01=0x0190, f02=»**** P* P* H P* INXDWT WILL COMPUTE THE DWT ADDRESS ADDED TO THE DOUBLED INDEX. P* l P* INPUT: A6 = DWT ADDRESS v P* 0 P* OUTPUT: A4 = DWT ADDRESS + DOUBLE INDEX * P* NO REGISTERS ARE DESTROYED P*
0x319b2c…319cc0 Dummy {f00=0x0129, f01=0x0190, f02=» P* P EJECT DSKSUB P* * P* 4 P********** > P* NVLTAB * P P********** b P* t P* ~ 4 P* NVLTAB HOLDS THE TTAB ADDRESSES OF THE TASKS 6 P* THAT WILL RECEIVE NEW VOLUME LOADED WHEN A NEW P* VOLUME HAS
0x319cc0…319e54 (3, 206) Dummy {f00=0x0129, f01=0x0190, f02=» | P DATA TTABLD LDTASK TTAB P XIF ( P* 4 PNVLDMT EQU * > P IFT FILMAN=1 R P IFT DATMAN=1 h P DATA 0 TTAB #D ~ P DATA 0 TTAB #E P DATA 0 TTAB #F P DATA 0 TTAB #G P XIF P* P IFT FILMAN=1
0x319e54…319fe8 Dummy {f00=0x0129, f01=0x4164, f02=» FILMAN=0 P IFF DSKPAG+SWPBLK=0 P DATA TTABLD LDTASK TTAB . P* N PNVLEND EQU * X P* l PNVLBIT DATA 3 NVL BIT MASK v P XIF P* P IFT FILMAN=0 P IFT DSKPAG+SWPBLK=0 P* PNVLEND EQU * P* P
0x319fe8…31a17c Dummy {f00=0x0129, f01=0x2008, f02=» NT DSKSUB PRR 10.1 79-08-09 CHLO END 2@ >
0x31a17c…31a310 Dummy {f00=0x0129, f01=0x0000, f02=»
[…0x4…]
0x31a960…31aaf4 (3, 207) Opaque[0x194]
0x31aaf4…31ac88 # DirEnt {nam=»DVTKB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x27a8, f03=0x0000}
0x31aaf4…31ac88 IdxSect {
0x31aaf4…31ac88 f00 = 0x013d // 0x31aaf4 @0x0
0x31aaf4…31ac88 f01 = 0x0002 // 0x31aaf6 @0x2
0x31aaf4…31ac88 gno = [ // 0x31aaf8 @0x4
0x31aaf4…31ac88 [0x00]: C0x013d.0x1.0
0x31aaf4…31ac88 ]
0x31aaf4…31ac88 }
0x31ac88…31ae1c Dummy {f00=0x013d, f01=0x0190, f02=» 0 P IDENT DVTKB REL 10.0 80-03-14 870105041000 P 8 " P* KEYBOARD DEVICE WORK TABLE @ P* f P ENTRY DVTKB TABLE ENTRY p P*** ( P EXTRN KBAD POINTER TO ADDRESSBLOCK P EXTRN ECH PMMUPAG EQU 0 P* PDVTKB EQU * TABL
0x31ae1c…31afb0 Dummy {f00=0x013d, f01=0x0190, f02=»ATA DWTEND-DVTKB ORDER ( P DATA KBAD POINTER TO ADDRESS BLOCK P DATA 'KB' TTAB-ADDRESS J $ P DATA 0 WAIT/ACTIVATE INDICATOR j P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DATA DEVECB MMU ECB ADD
0x31afb0…31b144 Dummy {f00=0x013d, f01=0x0190, f02=»ATA 0 SAVE AREA FOR A5 P RES 4 DWT-STACK P DATA 0 TIMER POINTER 6 P DATA ECH ECHO DEVICE T $ P DATA /BCA BACKSPACE AND CANCEL r " P DATA /ED0 EOR AND DOUBLE ZERO 6 P DATA DWTSQ+DVTKB POINTER TO FIRST PLACE IN QUEUE 4 P DATA DWTSQ+DV
0x31b144…31b2d8 Dummy {f00=0x013d, f01=0x40de, f02=»G=1 PDEVECB EQU * P DATA 0,0,0,0,0,0 P DATA 0,0,0,0,0,0,0,0 : P DATA 0,0,0,0,0,0,0,0 X P DATA 0,0,0,0,0,0,0,0 v P DATA 0 P XIF PDWTEND EQU * P* P END @ IRST PLACE IN QUEUE 4 P DATA DWTSQ+DV
0x31b2d8…31b46c Dummy {f00=0x013d, f01=0x2008, f02=» BLE ZERO 6 P DATA DWTSQ+DVTKB POINTER TO FIRST PLACE IN QUEUE 4 P DATA DWTSQ+DVTKB POINTER TO LAST PLACE IN QUEUE R PDWTSQ EQU *-DVTKB P RES 0 P* P END @ 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P R
0x31b46c…31b600 Dummy {f00=0x013d, f01=0x4052, f02=» V W2 RB P R P W. P !P CT J <@ N U _P iP oWT wPP R Q , H D !&J W T * Pb P T T T W : V * P x H D ! /P$ ;R K * SW [PH aP> gP mP q * wR {Q P R R W Wr
0x31b600…31b794 (3, 208) Opaque[0x194]
0x31b794…31b928 # DirEnt {nam=»DVTGP «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2378, f03=0x0000}
0x31b794…31b928 IdxSect {
0x31b794…31b928 f00 = 0x011b // 0x31b794 @0x0
0x31b794…31b928 f01 = 0x0002 // 0x31b796 @0x2
0x31b794…31b928 gno = [ // 0x31b798 @0x4
0x31b794…31b928 [0x00]: C0x011b.0x3.0
0x31b794…31b928 ]
0x31b794…31b928 }
0x31b928…31babc Dummy {f00=0x011b, f01=0x0190, f02=» 0 P IDENT DVTGP REL 10.0 80-03-14 870105041000 P 8 , P* DEVICE WORK TABLE FOR GENERAL PRINTER @ P* p P ENTRY DVTGP TABLE ENTRY z P* P* ( P EXTRN GPAD POINTER TO ADDRESS BLOCK PMMUPAG EQU 0 P* PDVTGP EQU * TABL
0x31babc…31bc50 Dummy {f00=0x011b, f01=0x0190, f02=»ATA DWTEND-DVTGP ORDER ( P DATA GPAD POINTER TO ADDRESS-BLOCK P DATA /C750 TTAB-ADDRESS J $ P DATA 0 WAIT/ACTIVATE INDICATOR j P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DATA DEVECB MMU ECB ADD
0x31bc50…31bde4 Dummy {f00=0x011b, f01=0x40e8, f02=»REA FOR A5 P RES 4 DWT-STACK P DATA 0 TIMER POINTER * " P DATA 0 HEAD POSITIPN POINTER H P IFT MMUPAG=1 n PDEVECB DATA 0,0,0,0,0,0 P XIF PDWTEND EQU * P* P* P END @ DATA DEVECB MMU ECB ADD
0x31bde4…31bf78 Dummy {f00=0x011b, f01=0x2008, f02=» ESS-BLOCK ~ P DATA 0 TTAB-ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR 6 P DATA 0 TERMINAL QUEUE ^ P DATA 0 OUTPUT QUEUE LINK | P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES 4 DWT
0x31bf78…31c10c Dummy {f00=0x011b, f01=0x0190, f02=»******** P* 6 P* THE STANDARD NATIONAL CHARACTER SET IS CHOOSEN > P* BY SETTING X:A TO 0-11 ACCORDING TO THE LIST BELOW =4 T P* P* NCV=0 GREAT BRITAIN P* 1 GERMANY P* 2 FRANCE P* 3 SPAIN
0x31c10c…31c2a0 Dummy {f00=0x011b, f01=0x0190, f02=»GOSLAVIA/FRANCE 2 (DEPEND. ON CHAR GEN) =7 P* 9 USA 6 " P* 10 DENMARK, NORWAY 2 L P U =7(=4) r P* PX:A EQU 0 PSTDNCV EQU X:A P* 6 P* THE LOWER CASE SET CAN BE INCLUDED AS STANDARD P* BY SETTI
0x31c2a0…31c434 (3, 209) Opaque[0x194]
0x31c434…31c5c8 # DirEnt {nam=»DVTDY «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2380, f03=0x0000}
0x31c434…31c5c8 IdxSect {
0x31c434…31c5c8 f00 = 0x011c // 0x31c434 @0x0
0x31c434…31c5c8 f01 = 0x0002 // 0x31c436 @0x2
0x31c434…31c5c8 gno = [ // 0x31c438 @0x4
0x31c434…31c5c8 [0x00]: C0x011c.0x0.0
0x31c434…31c5c8 ]
0x31c434…31c5c8 }
0x31c5c8…31c75c Dummy {f00=0x011c, f01=0x0190, f02=» 0 P IDENT DVTDY REL 10.0 80-03-14 870105041000 P 8 * P* DEVICE WORK TABLE FOR VIDEO DISPLAY @ P* n P ENTRY DVTDY TABLE ENTRY x P* P* ( P EXTRN DYAD POINTER TO ADDRESS BLOCK PMMUPAG EQU 0 P* PDVTDY EQU * TABLE
0x31c75c…31c8f0 Dummy {f00=0x011c, f01=0x0190, f02=»A DWTEND-DVTDY ORDER ( P DATA DYAD POINTER TO ADDRESS-BLOCK P DATA /C459 TTAB-ADDRESS H $ P DATA 0 WAIT/ACTIVATE INDICATOR h P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DATA DEVECB MMU ECB ADDRE
0x31c8f0…31ca84 Dummy {f00=0x011c, f01=0x4150, f02=»A FOR A5 P RES 4 DWT-STACK P DATA 0 TIMER POINTER ( P DATA /101 CURSOR POINTER F ( P DATA /ABC LEFT BYTE=NUMBER OF LINES h " P RIGHT BYTE=CHARACTERS/LINE P DATA 0 BUFFER INDEX P IFT MMUPAG=1 PDEVECB DATA 0,0,0,0,0,0
0x31ca84…31cc18 Dummy {f00=0x011c, f01=0x2008, f02=» S-BLOCK | P DATA 0 TTAB-ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR 4 P DATA 0 TERMINAL QUEUE P DATA 0 OUTPUT QUEUE LINK z P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES 4 DWT-S
0x31cc18…31cdac Dummy {f00=0x011c, f01=0x0190, f02=»DDRESS TO CHANNEL STATUS 3 P* A6: DWT ADDRESS 4 P* 4 : P* EXIT: 4 D P* 4 T P* A1: STATUS AFTER RECOVERY 4 ^ $ P* A2: ADDRESS TO CHANNEL STATUS 4 P* A6: DWT ADDRESS 4 P* 4 P 4 P 4 & PMTRC LDR A7,A2 CALC CHANNEL NUMBER 4 P
0x31cdac…31cf40 Dummy {f00=0x011c, f01=0x0190, f02=» 4 t P CF A5,ONLI 5 P LDR* A3,A2 GET SEQ COUNTER 5 & P ABL(Z) SBOW TAPE SHOULD BE AT BOT 5 @ 8 P LDK A7,MTRBLK REVERSE TAPE TO AVOID ANY OLD BLOCKS 5 j PMTRC05 CF A5,SKPR 5 P SUK A7,1 5 P RB(NZ) MTRC05 5 P 5 * PMTRC10 CF A5,RSQN READ S
0x31cf40…31d0d4 (3, 210) Opaque[0x194]
0x31d0d4…31d268 # DirEnt {nam=»DRKB03«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2750, f03=0x0000}
0x31d0d4…31d268 IdxSect {
0x31d0d4…31d268 f00 = 0x013a // 0x31d0d4 @0x0
0x31d0d4…31d268 f01 = 0x0010 // 0x31d0d6 @0x2
0x31d0d4…31d268 gno = [ // 0x31d0d8 @0x4
0x31d0d4…31d268 [0x00]: C0x013a.0x2.0
0x31d0d4…31d268 [0x01]: C0x013a.0x3.0
0x31d0d4…31d268 [0x02]: C0x013b.0x2.0
0x31d0d4…31d268 [0x03]: C0x013c.0x0.0
0x31d0d4…31d268 [0x04]: C0x013c.0x1.0
0x31d0d4…31d268 [0x05]: C0x013c.0x2.0
0x31d0d4…31d268 [0x06]: C0x013c.0x3.0
0x31d0d4…31d268 [0x07]: C0x013d.0x0.0
0x31d0d4…31d268 ]
0x31d0d4…31d268 }
0x31d268…31d3fc Dummy {f00=0x013a, f01=0x018e, f02=» 2 P IDENT DRKB03 REL 10.0 80-03-14 870105041000 P : & P =1,CIRCULAR BUFFER SIZE CHANGED B P REL 9.1 79-05-23 l P* 0 P******************************************* P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* DR
0x31d3fc…31d590 Dummy {f00=0x013a, f01=0x0190, f02=» b P* P* 0 P* THIS DRIVER HANDLES INPUT FROM NUMERIC . P* AND ALPHANUMERIC KEYBOARDS PTS 6236, P , P* CONNECTED TO CPU VIA CHLT OR CHRT. P* : P* ONLY INPUT DATA FROM DEPRESSED KEYS AND KEY-LOCKS $ P* ARE HANDL
0x31d590…31d724 Dummy {f00=0x013a, f01=0x0190, f02=» P* ECHOED. P* 0 P* THE DRIVER CONSISTS OF FOLLOWING PARTS: " P* V " P* A C K B : ACTIVATION PART ` P* $ P* I H K B : INTERRUPT HANDLER P* P* E C H O : ECHO HANDLER P* $ P* R C K B : RECOVERY
0x31d724…31d8b8 Dummy {f00=0x013a, f01=0x0190, f02=»IC READ ~ P* ORDER 02: STANDARD READ P* ORDER 03: NUMERIC READ 4 & P* ORDER 31: RESET INPUT BUFFER X P* P* P* NORMAL REGISTER USAGE : P* " P* REGISTER A1 : RETURN CODE & P* A2 : INPUT CHARA
0x31d8b8…31da4c Dummy {f00=0x013a, f01=0x0190, f02=» A6 : DWT-ADDRESS P* A7 : ORDER " P* A8 : ECB-ADDRESS @ P* f P* p P* z P* SYSTEM ADAPTATION P* 8 P* CODES FOR SPECIAL CHARACTERS CLEAR, BACKSPACE, 8 P* MULTIPLE ZERO AND STANDARD
0x31da4c…31dbe0 Dummy {f00=0x013a, f01=0x0190, f02=» P* , P* IF TIMING IS WANTED, TIMER POINTER , P* IN DWT MUST BE SET UNEQUAL TO ZERO. > 2 P* STANDARD VALUE FOR TIME-OUT IS 30 SECONDS n 4 P* SINCE LAST DEPRESSED KEY. IF ANOTHER VALUE * P* IS WANTED FOR A SYSTEM, INDICATOR $
0x31dbe0…31dd74 (3, 211) Dummy {f00=0x013a, f01=0x0190, f02=»D VALUE IS 7 CHARACTERS t 8 P* NOTE !!! THAT LENGTH MUST BE THE SAME FOR ALL P* DWT:S IN SYSTEM P EJECT x P* 8 P* BY MEANS OF CONDITIONAL ASSEMBLY IT IS POSSIBLE 8 P* TO EXCLUDE FROM THE DRIVER FOLLOWING FUNCTIONS: P
0x31dd74…31df08 Dummy {f00=0x013a, f01=0x0190, f02=»IFT-FUNCTION | , P* -----KEYBOARD LOCK IF NO KEYLOCK ON P* D P* ENTRIES N P* b P* l P ENTRY KBAD3 ADDRESS-BLOCK v P* P* P* & P* EXTERNAL TOSS MODULE ENTRIES P* P* P* $ P EXTRN DIS
0x31df08…31e09c Dummy {f00=0x013a, f01=0x018e, f02=»TRY v 0 P EXTRN LDREG LOAD REGISTERS A2-A8 AND RETURN 4 P EXTRN STREG STORE REGISTERS AND GO TO DISPATCER @ , P EXTRN LDREGE RETURN FROM ECHOE HANDLING x P EXTRN LDREGF PANIK EXTERN P EXTRN SETIME SET TIME P EXTRN SETIMP SET TIME " P E
0x31e09c…31e230 Dummy {f00=0x013a, f01=0x0190, f02=» r P* P* P* P* DWT PARAMETERS & P* B P* L P* V " P EXTRN DWTCHP CHANEL PARAMETER ` P EXTRN DWTST STATUS EXTRN DWTBC BYTE COUNTER & " EXTRN DWTADR DRIVER ADDRESS BLOCK P EXTRN DWTA3 SAVE AREA A3
0x31e230…31e3c4 Dummy {f00=0x013a, f01=0x018e, f02=» DEVICE DWT ~ P EXTRN DWTTP TIMER POINTER P EXTRN DWTWAT SAVE INPUT DWT 6 P EJECT Z P* h P* r P* | P* CONSTANTS P* P* P* * POVMASK EQU /2 OVERFLOW IN INPUT BUFFER P* . PX:F EQU 8 LENGTH OF
0x31e3c4…31e558 Dummy {f00=0x013a, f01=0x0190, f02=» P* " PTIME EQU 300 TIME OUT CONSTANT P* 4 P EJECT > P* L P* V , P**************************************** ` , P* CONDITIONAL ASSEMBLY * , P**************************************** P* . P* TIME OUT
0x31e558…31e6ec Dummy {f00=0x013a, f01=0x0190, f02=»NCTION MAY BE EXCLUDED BY P* SETTING X:B = 0. " P* @ PX:B EQU 1 J PCECHO EQU 1 P* p > P* BY SETTING X:E = 1 THE FOLOWING POWER OFF FUNCTION z & P* IS INCLUDED IN THE DRIVER. < P* IF THERE IS A READ REQUEST
0x31e6ec…31e880 Dummy {f00=0x013a, f01=0x0190, f02=»T V @ P* AFTER POWER ON IS COMPLETED WITH ZERO IN CONTROL WORD P* OF ECB N P* d P* n PX:E EQU 0 x PPOWOFF EQU 1 P* P* P* N P* BY SETTING X:H = 1 THE KEY A15IS USED AS A NUMERIC SHIFT ON KB 71/72
0x31e880…31ea14 (3, 212) Dummy {f00=0x013b, f01=0x0190, f02=»I EQU 0 PKBLOCK EQU 0 P* $ P* . . P* A PROGRAM VERSION USING TOSS MMU PAGING 8 * P* IS OBTAINED BY SETTING MMUPAG EQU 1. j P* PMMUPAG EQU 1 P* P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SE
0x31ea14…31eba8 Dummy {f00=0x013b, f01=0x0190, f02=» PX:J EQU 10 PDVBLEN EQU 082 P* 0 P* : P* MMU KEY TABLE SIZE D P* b P* l PX:K EQU 10 v PDVBKTB EQU 50 P* P EJECT P* P* P* DWT-DISPLACEMENT P* P* 0 PDWTDRD EQU /
0x31eba8…31ed3c Dummy {f00=0x013b, f01=0x0190, f02=» PSTART EQU DWTDRD+4 P XIF P* * * PDWTCON EQU START+/00 CONVERSION TABLE 4 8 PDWTINQ EQU START+/18 POINTER TO FIRST PLACE IN QUEUE b 8 PDWTUTQ EQU START+/1A POINTER TO LAST PLACE IN QUEUE & PDWTSQ EQU START+/1C START OF QUEUE ( PDWTE
0x31ed3c…31eed0 Dummy {f00=0x013b, f01=0x0190, f02=»ART+/14 BACK-SPACE CHARACTER ( PKBCLR EQU START+/15 CLEAR CHARACTER $ . PKBMZ2 EQU START+/17 DOUBLE ZERO CHARACTER P PKBMZ3 EQU START+/16 P* P EJECT P* TABLES P* P* $ P DATA DVBKTB MMU KEY TABLE SIZE P
0x31eed0…31f064 Dummy {f00=0x013b, f01=0x0190, f02=»A 0 ABORT ROUTINE ADDRESS P DATA IHKB INTERRUPT HANDLER " P IFT POWOFF=1 F P DATA RCKB RECOVERY ROUTINE P XIF P IFT POWOFF=0 P DATA 0 NO RECOVERY P XIF P* P IFT POWOFF=1 P EJECT P* RCKB
0x31f064…31f1f8 Dummy {f00=0x013b, f01=0x0190, f02=» P XIF P* P IFT POWOFF=1 P IFT CPU852=0 0 " P MSR 8,A15 SAVE A1-A8 ON STACK F P XIF l P* x P IFT POWOFF=1 P LD A3,DWTST,A6 BUSY? P RF(NN) RCKB10 P LDKL A1,/200 ( P ORS A1,DWTST,A6 INDICATE POWER OFF
0x31f1f8…31f38c Dummy {f00=0x013b, f01=0x0190, f02=» ACKB P* : P* ACTIVATION PART: CHECS VALIDITY OF ORDERS AND P* V @ P* EXAMINES INPUT BUFFER TO SEE IF SOME QUEUED CHARACTER ` P* P* TO THREAT P* P* P* P* PACKB EQU * P LDKL A1
0x31f38c…31f520 Dummy {f00=0x013b, f01=0x0190, f02=» P RF(NG) AKB100 ILLEGAL ORDER P SUK A4,4 ( P RF(N) AKB200 ORDER 1,2 OR 3 : P SUK A4,/2D ^ P RF(Z) AKB110 ORDER 31 r * PAKB100 ORKL A1,/8000 I/0 REQUEST ERROR P ABL ENDI10 P EJECT P* P* P* & P* ORD
0x31f520…31f6b4 (3, 213) Dummy {f00=0x013c, f01=0x0190, f02=»Q,A6 RESET OUTPUT QUEUE P ABL ENDIO P* 2 P EJECT < P* J P* T P* ORDER 1,2,3 ^ P* x P* P* PAKB200 EQU * P IFT POWOFF=1 P LD A2,DWTST,A6 P ANKL A2,/200 POWER OFF? P RF(E) AKB205 NO
0x31f6b4…31f848 Dummy {f00=0x013c, f01=0x0190, f02=»F(E) AKB205 P CM 10,A8 INDICATE POWER OFF P RF AKB218 8 P XIF J PAKB205 EQU * V P IFT CTIMUT=1 j P LDR* A1,A6 P ANK A1,/40 TIMING? , P RF(E) AKB210 NO TIMING FOR THIS DEVICE! , P LD A4,DWTTP,A6 CHECK IF ALREADY TIMING
0x31f848…31f9dc Dummy {f00=0x013c, f01=0x0190, f02=»OINTER z P ADR A4,A6 ADD DWT-ADDRESS P LDR A1,A6 0 P CF A15,SETIMP SET TIME B 0 P DATA AKBTUT,TIME TIME OUT ROUTINE AND TIME b . P ST A4,DWTTP,A6 STORE TIMER ADDRESS IN DWT P XIF P* P EJECT P* IF ANY KEY-LOCK:
0x31f9dc…31fb70 Dummy {f00=0x013c, f01=0x0190, f02=» IN CASE OF STANDARD OR NUMERIC READ MAKE ECB-CODE & P* AND END I/O. ELSE CONTINUE. > P* h P* r PAKB210 EQU * | " P LD A2,DWTST,A6 ANY KEY-LOCK? P ANK A2,/F P RF(Z) AKB219 P SLL A2,1 P SRN A2,A4 P LDR A
0x31fb70…31fd04 Dummy {f00=0x013c, f01=0x0190, f02=»B212 XRS A4,DWTST,A6 RESET OLD KEY-FLAG P LDR A2,A4 0 P SLL A4,4 B P AN A4,DWTST,A6 T P STR A4,A15 SAVE A4 l P STR A3,A15 P SRN A2,A3 ORDER 1 " P ADR A3,A3 MAKE CHARACTER FLAG P LDR A4,A4 P RF(NE) AKB213 P A
0x31fd04…31fe98 Dummy {f00=0x013c, f01=0x0190, f02=»15 RESTORE A4 P CWK A7,1 $ P RF(E) AKB307 JUMP IF BASIC READ ( " PAKB214 NGR A2,A1 MAKE ECB CODE P P LDR A4,A4 KEY FLAG v P RF(E) AKB215 P SUK A2,4 , PAKB215 ST A2,10,A8 KEY-LOCK CODE IN ECB PAKB218 ABL AKB380 ( PAKB2
0x31fe98…32002c Dummy {f00=0x013c, f01=0x0190, f02=»A1,2,A8 BUFFER ADDRESS P SUK A1,1 P ADR A1,A2 0 & PAKB230 SCR A3,A1 CLEAR ECB BUFFER B P SUK A1,1 l P SUK A2,1 ~ P RB(NE) AKB230 PAKB240 EQU * P LD A1,DWTUTQ,A6 P LCR A2,A1 PAKB245 LDR A4,A2 P XRK A4,/FF
0x32002c…3201c0 Dummy {f00=0x013c, f01=0x018e, f02=»AKB250 CW A1,DWTINQ,A6 SOMETHING IN QUEUE? P RF(NE) AKB255 2 " P CF A5,STREG NOTHING IN QUEUE J P IFT CTIMUT=1 p * P LDR A1,A1 CHECK TIME OUT RETURN CODE P RF(Z) AKB257 NO TIME OUT $ P ABL ENDI05 END I/O AT TIME OUT P XIF
0x3201c0…320354 (3, 214) Dummy {f00=0x013c, f01=0x0190, f02=» l PAKB257 EQU * P LDR A4,A7 P SUK A4,2 . P RF(NN) AKB310 ORDER 2 OR 3 @ P EJECT d P* r P* | P* ORDER 1 BASIC READ P* P* P* 6 PAKB305 CF A15,STORE STORE CHARACTER IN ECB-BUFFER P IFT CECHO
0x320354…3204e8 Dummy {f00=0x013c, f01=0x0190, f02=» KEYS? | P ANK A2,/F P RB(NZ) AKB210 P RB AKB225 6 P EJECT H P* V P* ` P* j 4 P* ORDER 2 OR 3 STANDARD AND NUMERIC READ t P* B P* CHECK IF READ CHARACTER IS FOUND IN KEY-TABLE (IF ANY) P* P*
0x3204e8…32067c Dummy {f00=0x013c, f01=0x0190, f02=»ABLE LENGTH IN A4 P ANK A4,/FF & P ADR A1,A4 LAST PLACE IN KEY-TABLE . P ADK A1,1 X PAKB355 SUK A4,1 j , P RF(N) AKB360 KEY NOT FOUND IN KEY-TABLE P SUK A1,1 NEXT KEY P CCR A2,A1 EOR? P RB(NE) AKB355 NO! P ADK A4,1
0x32067c…320810 Dummy {f00=0x013c, f01=0x0190, f02=»OR-CHARACTER z " P CF A5,ECHO ECHO EOR-CHARACTER ! P XIF ! : P RF AKB380 ! F PAKB360 EQU * ! X P LDR A4,A2 ! l P CC A4,KBMZ2,A6 ! ~ P RF(E) KBMZ20 ! P CC A4,KBMZ3,A6 ! P RF(E) KBMZ30 ! P CC A4,KBBSP,A6 ! P RF(E) KBSP10 ! P
0x320810…3209a4 Dummy {f00=0x013c, f01=0x018e, f02=»ED CHARACTER ! x P RF(N) AKB364 LESS THAN /20 " P SUK A4,/5F CHARACTER > /7F " 8 P RF(P) AKB364 YES " P CWK A7,2 " v $ P RF(E) AKB366 STANDARD READ OK " P ADK A4,/4F " P RF(N) AKB364 " P SUK A4,/A " " P RF(N) AKB366 NUMERIC READ
0x3209a4…320b38 Dummy {f00=0x013c, f01=0x018e, f02=» " P XIF # P CW A3,4,A8 LENGTH OVERFLOW? # " PAKB367 ABL(L) AKB210 NO RETURN # 8 & PAKB368 LDK A1,8 YES SET ERROR CODE # ^ P RF ENDIO END I/O # P EJECT # PKBMZ30 EQU * TRIPPLE ZERO # P LDK A4,3 # P RF KBMZ25 # PKBMZ20 LDK A4,2 DO
0x320b38…320ccc Dummy {f00=0x013c, f01=0x018e, f02=» # P IFT CECHO=1 $ P CF A5,ECHO $ P XIF $ 0 P CW A3,4,A8 $ < P RB(L) KBMZ25 $ P PKBMZ27 EQU * $ f P SUK A4,1 ANY MORE ZEROES $ z $ P RB(L) AKB368 NO,SET RETURN CODE $ P INH $ * P LD A1,DWTUTQ,A6 GET OUTQUEUE POINTER $ P SUR A1,A6
0x320ccc…320e60 Dummy {f00=0x013c, f01=0x0190, f02=» P SUK A1,1 % P RF KBMZ40 % 2 PKBMZ29 ADR A1,A6 GET PREIOUS POINTER POSITION % ( P SUK A1,1 % ^ , PKBMZ40 CW A1,DWTINQ,A6 ANY SPACE LEFT ? % p P RF(E) KBMZ90 NO NOT REALY. % 0 P ST A1,DWTUTQ,A6 STORE NEW OUTQUEUE POINTER % & P LDK A2,/30 STOR
0x320e60…320ff4 (3, 215) Dummy {f00=0x013c, f01=0x0190, f02=» P SCR A4,A1 & $ P ST A1,DWTUTQ,A6 UPPDATE POINTER & ( P LDK A1,/A SET RETURN CODE FOR BOTH & > . PENDIX RF ENDIO LENGTH AND THRUGHPUT ERRORS & j P* & P* & P* & PKBCL10 EQU * CLEAR & P LDK A3,0 & P LDK A2,/18 & P RB AKB366 &
0x320ff4…321188 Dummy {f00=0x013c, f01=0x0190, f02=»AR IN ECB-BUFFER & x P CF A15,STORE ' P SUK A3,1 ' . PKBSP15 LDK A2,/8 ' @ P RB AKB366 ' X P* ' j P* ' t PAKB380 LDK A1,0 RETURN CODE ' ~ P EJECT ' P* ' P* ' , P* THIS IS A COMMON END OF THE DRIVER ' P* ' 2 P* SET E
0x321188…32131c Dummy {f00=0x013c, f01=0x0190, f02=»NH ' P IFT CTIMUT=1 ( P LD A4,DWTTP,A6 ( * P RF(E) ENDI05 NO TIMING ON THIS DEVICE ( 8 P CM* DWTTP,A6 RESET TIMER ( f P CM DWTTP,A6 ( P XIF ( P* ( , PENDI05 ST A3,6,A8 STORE EFFECTIVE LENGTH ( PENDI10 EQU * ( P* ( P IFT CEC
0x32131c…3214b0 Dummy {f00=0x013c, f01=0x0190, f02=» ( P* ) P EJECT ) P* ) P* ) * P* ) 4 P* IHKB ) > P* ) P P* ) Z F P* THIS IS THE INTERRUPT HANDLER ENTERED FROM CHLT/CHRT DRIVER ) d P* ) P* ) P* ) PIHKB EQU * ) P ANK A2,/FF ) * P CF A15,KONVER CONVERT
0x3214b0…321644 Dummy {f00=0x013c, f01=0x0190, f02=»D A3,DWTST,A6 NORMAL CHAR ) P IFT KBLOCK=1 * " P ANK A3,/FF * 8 P RF(Z) EXIT * L P LD A3,DWTST,A6 I/O REQUEST? * ` P XIF * * P RF(N) IHKB15 NO READ REQUEST PENDING * " P SLL A3,7 INTERRUPT ALLOWED ? * 4 P RF(NN) IHKB15 NO, STORE CHARACTER I
0x321644…3217d8 Dummy {f00=0x013c, f01=0x0190, f02=»IME * x P ST* A3,DWTTP,A6 + P XIF + $ , PIHKB07 ABL LDREG RETURN TO READ ROUTINE + 0 , PIHKB12 CF A15,KEYSET SET KEY CODE IN DWT + ` P LDR A3,A3 + P RF(Z) EXIT NO KEY CHANGE + P LD A3,DWTST,A6 + ( P RF(N) EXIT NO READ REQUEST PENDING + P
0x3217d8…32196c Dummy {f00=0x013c, f01=0x0190, f02=»A6 + P ABL AKB210 , P , PIHKB15 LD A1,DWTINQ,A6 , & P LCR A4,A1 , D " P XRK A4,/FF ALREADY OVERFLOW? , V P RF(E) EXIT YES , | P LDR A3,A1 , 4 P CF A15,EOQUEU GET NEXT OUTQUEUE POINTER ADDRESS , P CW A1,DWTUTQ,A6 OVERFLOW? , ( P RF(NZ)
0x32196c…321b00 Dummy {f00=0x013c, f01=0x0190, f02=»NQUEUE POINTER , r PIHKB30 SCR A2,A3 - PEXIT ABL TDISP - . P* - D P EJECT - N P* - P* - f P* - p P* AKBTUT - z P* - & P* THIS IS THE TIME-OUT ROUTINE - P* - P* - P* - P IFT CTIMUT=1 - PAKBTUT EQU * - "
0x321b00…321c94 (3, 216) Dummy {f00=0x013c, f01=0x0190, f02=»ATCH IF NO REQUEST ON - , P RB IHKB07 RESTORE REGISTER AND END I/O . P XIF . N P EJECT . Z P* . h P* . r P* . | P* . P* KEYSET . P* . P* . P* . , P* ON ENTRY: A4= NEG KEY-LOCK VALUE . P* . @ P* ON EXI
0x321c94…321e28 Dummy {f00=0x013c, f01=0x0190, f02=» P LDKL A2,/100 / PSET100 SRL A2,1 / P ADK A4,2 IN A4: 1=OFF 0=ON / 2 P RB(N) SET100 / V $ P ANR A3,A2 CHEC OLD KEY POSITION / l " P RF(NZ) SET300 JUMP IF KEY ON / P LDR A4,A4 / P RF(NZ) SET500 / P RF SET400 / PSET300 LDR A4,A4 /
0x321e28…321fbc Dummy {f00=0x013c, f01=0x0190, f02=»DK A3,1 A3=1 IF KEY LOCK HAS CHANGED / PSET500 LDR* A4,A15 0 , P RTN A15 0 F P EJECT 0 V P* 0 d P* 0 n P* 0 x P* KONVER 0 P* 0 * P* KONVER CONVERTS INPUT CHARACTER 0 P* 0 P* 0 ( P* ON ENTRY: A2= INPUT CHARACTER 0
0x321fbc…322150 Dummy {f00=0x013c, f01=0x0190, f02=»RL,SHIFT 0 P $ P* A5 IS DESTROYED! 1 P* 1 8 P* 1 B PKONVER EQU * 1 L P LDR A4,A2 1 ` P IFT NSHIFT=0 1 r P SUK A4,/7C CODE > /7B 1 P RF(NN) KON500 YES 1 P LDR A4,A2 RESTORE CHARACTER 1 P XIF 1 8 P STR A2,A15 STORE CHARAC
0x322150…3222e4 Dummy {f00=0x013c, f01=0x0190, f02=»N) KON180 ALFANUMERIC 1 P SUK A4,/10 FUNCTION 2 P RF(NN) KON110 NO 2 : P SUK A2,/40 YES 2 T PKON105 EQU * 2 l P ANK A5,/10 2 P SRL A5,3 2 P RF KON200 2 * PKON110 SUK A4,8 (UN)CTRL OR (UN)SHIFT 2 P RF(N) KON400 KEY-LOCK 2 P RF(
0x3222e4…322478 Dummy {f00=0x013c, f01=0x0190, f02=»4,2 2 P RF(N) KON125 CONTROL OFF 3 $ P RF(E) KON140 NUMERICAL SHIFT ON 3 . " P RF KON160 NUMERICAL SHIFT OFF 3 V P XIF 3 | PKON125 EQU * 3 P LDKL A2,/FFDF UNCTRL 3 PKON120 ANR A5,A2 3 PKON130 STR A5,A6 DWTCHP 3 P LDK A4,/10 3 P R
0x322478…32260c Dummy {f00=0x013c, f01=0x0190, f02=» P LDK A2,/90 4 P RF KON150 4 P XIF 4 * PKON145 EQU * 4 6 P LDK A2,/10 SHIFT 4 J PKON150 ORR A5,A2 4 d P RB KON130 4 | PKON160 EQU * 4 P IFT NSHIFT=1 4 P LDR A4,A5 4 P ANK A4,/80 4 P RF(Z) KON165 4 P LDKL A2,/FF7F 4
0x32260c…3227a0 Dummy {f00=0x013c, f01=0x0190, f02=» P RB KON150 5 PKON180 SUK A2,/20 FIND INDEX 5 P ANK A5,/30 5 : P SRL A5,3 5 N P ADK A5,4 5 ` 8 PKON200 LD A4,DWTCON,A6 GET CONVERSION TABLE ADDRESS 5 r P ADR A4,A5 5 P LDR* A4,A4 5 P RF(Z) KON400 5 P ADR A4,A2 5 * P LDR* A2,A15
0x3227a0…322934 (3, 217) Dummy {f00=0x013d, f01=0x018e, f02=»15 5 4 PKON400 LDR* A2,A15 NO CONVERSION, KEEP CHARACTER 6 P RB KON300 6 B P IFT NSHIFT=0 6 T PKON500 EQU * 6 j P LDR A4,A4 KEY CODE /7C 6 ~ P RF(Z) KON600 YES 6 & P LDK A4,1 INDICATE SKIP CHARACTER 6 P RTN A15 6 PKON600 EQU * 6 P S
0x322934…322ac8 Dummy {f00=0x013d, f01=0x0190, f02=» 6 ^ 6 P* ECB-BUFFER AND INCREMENT BUFFER INDEX 7 P* 7 B P* ON ENTRY: 7 L P* 7 b P* A2 = CHARACTER TO STORE 7 l P* A3 = BUFFER INDEX 7 P* 7 P* 7 PSTORE EQU * 7 P LD A4,2,A8 BUFFER ADDRESS 7 P ADR A4,A3 ADD B
0x322ac8…322c5c Dummy {f00=0x013d, f01=0x018e, f02=»P,A15 7 P EJECT 8 P* 8 P* 8 & 6 P* EOQUEU = SUBROUTINE TO GET NEXT QUEUE POINTER 8 0 P* 8 j P* ON ENTRY: 8 t P* 8 P* A1 = QUEUE POINTER 8 P* A6 = DWT-ADDRESS 8 P* 8 P* ON EXIT: 8 P* 8 P* A1 = NE
0x322c5c…322df0 Dummy {f00=0x013d, f01=0x406c, f02=» * P LDK A1,DWTSQ SET QUEUE START ADDRESS 9 PEOQU10 ADR A1,A6 9 2 P RB STORTN 9 J P END 9 @ 9 h 8 j P* ON ENTRY: 8 t P* 8 P* A1 = QUEUE POINTER 8 P* A6 = DWT-ADDRESS 8 P* 8 P* ON EXIT: 8 P* 8 P* A1 = NE
0x322df0…322f84 Dummy {f00=0x013d, f01=0x2008, f02=» : WTCON,A6 GET CONVERSION TABLE ADDRESS ADR A4,A1 6 ADR A4,A2 H ( # LCR A2,A4 GET CHARACTER FROM TABLE Z RTN A15 END @ A4,2 RF(Z) KON180 CTRL RF(N) KON190 SHIFT LDR A1,8 CTRL AND SHIFT
0x322f84…323118 Dummy {f00=0x013d, f01=0x0190, f02=»VATE R P* S P EJECT DRFD01 S P* S . P******************** S 8 P* * S T P* READY INTERRUPT * S p P* * S P******************** S P* S PFDRE EQU * S P LD A2,DWTA2,A6 S * P RB(NZ) F:DISP P
0x323118…3232ac Dummy {f00=0x013d, f01=0x0190, f02=» XIF S P* T P IFF TOSS+IBM=0 T P CM DWTST,A6 SET UNIT BUSY T . P RB FDONVL READ VOLUME NAMES T P P XIF T t P* T P EJECT DRFD01 T P* T P********************* T P* * T P* INTERRUPT HANDLER * T P*
0x3232ac…323440 Dummy {f00=0x013d, f01=0x0190, f02=»2=1 T * P CF A15,SAVE8 SAVE REGISTERS ON STACK U P XIF U : P* U F P IFT CPU852=0 U P " P MSR 8,A15 SAVE A1-A8 ON STACK U f P XIF U P* U P LDKL A6,DWFD01 DWT ADDRESS U P IFT CHAN=1 U P ENB U & P LD A1,DWTUB,A6 GET BUFFER POINTER
0x323440…3235d4 (3, 218) Opaque[0x194]
0x3235d4…323768 # DirEnt {nam=»DRGP01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2388, f03=0x0000}
0x3235d4…323768 IdxSect {
0x3235d4…323768 f00 = 0x011c // 0x3235d4 @0x0
0x3235d4…323768 f01 = 0x000e // 0x3235d6 @0x2
0x3235d4…323768 gno = [ // 0x3235d8 @0x4
0x3235d4…323768 [0x00]: C0x011c.0x1.0
0x3235d4…323768 [0x01]: C0x011c.0x2.0
0x3235d4…323768 [0x02]: C0x011c.0x3.0
0x3235d4…323768 [0x03]: C0x011d.0x0.0
0x3235d4…323768 [0x04]: C0x011d.0x1.0
0x3235d4…323768 [0x05]: C0x011d.0x2.0
0x3235d4…323768 [0x06]: C0x011d.0x3.0
0x3235d4…323768 ]
0x3235d4…323768 }
0x323768…3238fc Dummy {f00=0x011c, f01=0x0190, f02=» 2 P IDENT DRGP01 REL 10.0 80-03-14 870105041000 P : P PRR 10.0 79-12-07 B * P =3,CORRECTION OF MMU BUFFER EQUATE ^ P REL 9.1 79-04-06 & P =1-2,GEN UPDATE TO 8.2+ STATUS P REL 8.2 79-03-16 P =2,IMPROV. OF TEST ORDE
0x3238fc…323a90 Dummy {f00=0x011c, f01=0x0190, f02=»************************************** P* . $ P* PHILIPS TERMINAL SYSTEM PTS 8 P* ` ( P* DRGP01 = DRIVER GENERAL PRINTER j P* P* P* P* P* P* 6 P*************************************************
0x323a90…323c24 Dummy {f00=0x011c, f01=0x0190, f02=». Z P* 8 P* THE DRIVER ALSO INCLUDES DEVICE DEPENDENT ECHO 6 P* FUNCTIONS, WHICH MAKES IT POSSIBLE TO USE THE P 6 P* GENERAL PRINTER AS AN ECHO DEVICE TO ANY KEY- 4 P* BOARD, THAT RUNS UNDER THE GENERAL KEYBOARD P* DRIVER
0x323c24…323db8 Dummy {f00=0x011c, f01=0x0190, f02=» P* ( P* I H G P INTERRUPT HANDLER P* : ( P* R C G P RECOVERY ROUTINE D P* p & P* E C H O G P ECHO FUNCTIONS z P* P EJECT P* * P* THE FOLLOWING ORDERS ARE TREATED: P* P* ORDER
0x323db8…323f4c Dummy {f00=0x011c, f01=0x0190, f02=» P* " P* REGISTER A1 = RETURN CODE ( P* A2 = OUTPUT CHARACTER 4 $ P* A3 = BUFFER INDEX ` $ P* A4 = WORK REGISTER " P* A5 = STACK BASE " P* A6 = DWT-ADDRESS P*
0x323f4c…3240e0 Dummy {f00=0x011c, f01=0x0190, f02=» ECHO OF BACKSPACE (GPBSP) AND CLEAR ~ ( P* (GPCLR) KEYS SHOULD BE DEFINED. , P* X 8 P* BY MEANS OF CONDITIONAL ASSEMBLY THE DRIVER IS b 0 P* ADAPTED TO HANDLE FOLLOWING FUNCTIONS. P* --ROOMLESS POINT : P* --ACCEPTANCE OF SPE
0x3240e0…324274 (3, 219) Dummy {f00=0x011c, f01=0x0190, f02=»ECHOING OF END OF RECORD CHARACTER * P** --SUPPRESION OF TRAILING BLANKS * @ P* --END OF REQUEST WHEN PRINTER HARDWARE BECOMES INACTIVE X P* 6 P* THE CHARACTER CODES FOR ROOMLESS POINT DIGITS F P* IS DEFINED IN A SPECIAL TABLE. STAN
0x324274…324408 Dummy {f00=0x011c, f01=0x0190, f02=»*** P* P* P* ( P ENTRY GPAD ADDRESS TO ADDRESSBLOCK * 0 P ENTRY ECHOGP DEVICE-DEPENDENT ECHO-ROUTINE V P* P* P* P* . P***************************************** . P* EXTERNAL TOSS MODULE ENTRIES
0x324408…32459c Dummy {f00=0x011c, f01=0x0190, f02=»T SUBROUTINE TO SEND CHARACTER P EXTRN TDISP DISPATCHER & > P EXTRN LDREG LOAD REGISTERS A4, A3, A5, A7, A8 AND RETURN F P EXTRN TENDIO END I/O . P EXTRN SAVE8 SAVE 8 REGISTERS ON A15 STACK 0 P EXTRN ECHRTN RETURN TO KEYBOARD AFTER ECHO
0x32459c…324730 Dummy {f00=0x011c, f01=0x0190, f02=»ETERS * P************************ P* 2 P* < P EXTRN DWTST STATUS F EXTRN DWTBC BYTE COUNTER b P EXTRN DWTOR ORDER P EXTRN DWTA3 SAVE AREA A3 P* P EJECT P* P* P************* P* CONS
0x324730…3248c4 Dummy {f00=0x011c, f01=0x0190, f02=»T OF MESSAGE PETB EQU /97 END OF MESSAGE PETX EQU /03 LAST DUMMY 6 PCR EQU /0D CARRIAGE RETURN T PLF EQU /0A LINE FEED v PFFED EQU /0C FORM FEED PSPACE EQU /20 SPACE 0 PPROUT EQU /04 PAPER OUT OR READY SWITCH OFF P*
0x3248c4…324a58 Dummy {f00=0x011c, f01=0x0190, f02=»****************************** P* & 2 P* IT IS POSSIBLE TO EXCLUDE ROOMLESS POINT 0 $ P* FUNCTION BY SETTING X:A = 0 f P* PX:A EQU 1 PCROOM EQU 0 P* 4 P* ACCEPTANCE OF SPECIAL CHARACTER /13 CAN BE 0 P* INC
0x324a58…324bec Dummy {f00=0x011c, f01=0x0190, f02=»ER /14 CAN BE n 0 P* INCLUDED IN THE DRIVER BY SETTING X:C=1 P* J PX:C EQU 0 T PFJOTON EQU 0 f P* z . P* IT IS POSSIBLE TO EXCLUDE ECHOING OF , P* AN EXTRA SPACE AFTER EACH CHARACTER P* BY SETTING X:D=0 P*
0x324bec…324d80 Dummy {f00=0x011c, f01=0x0190, f02=»LE ^ 8 P* TO SUPPRESS ECHOING OF END OF RECORD CHARACTER. 8 P* THIS IS ATTAINED BY SETTING THE CONSTANT X:E=0. F P* PX:E EQU 0 PEORECH EQU 0 P* 4 P* SUPPRESSING OF SPACES IN RIGHT HAND OF LINE P* BY SETTING X:F=
0x324d80…324f14 (3, 220) Dummy {f00=0x011c, f01=0x018e, f02=»RINTER HARDWARE x * P* IS INACTIVE CAN BE CHOSEN BY SETTING P* THE CONSTANT RECEND = 1 F PX:G EQU 0 h PRECEND EQU 1 z P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* PMMUPAG
0x324f14…3250a8 Dummy {f00=0x011c, f01=0x0190, f02=» d P* PCPU852 EQU 0 P* & P* MMU BUFFER SIZE 0 P* L PX:H EQU 120 V PDVBLEN EQU 162 j P* =1 , P* SPECIAL CONDITION FOR ABIS PRINTER =1 PABIS EQU 0 =1 P EJECT P* P* $ P****************
0x3250a8…32523c Dummy {f00=0x011c, f01=0x0190, f02=»10 START OF DRIVER DEFINED PART P* ( P IFT MMUPAG=0 2 PSTART EQU DWTDRD H P XIF ` P* l P IFT MMUPAG=1 v PSTART EQU DWTDRD+4 P XIF P* . PDWTAP EQU START+/12 HEAD POSITION POINTER P* * P****************
0x32523c…3253d0 Dummy {f00=0x011c, f01=0x0190, f02=»BSP EQU /2D BACK SPACE PGPCLR EQU /3F CLEAR P* : P******************** D P* RETURN CODES * ` P******************** | P* 0 PPAROUT EQU /20 PAPER OUT OR READY SWITCH OFF " PCCERR EQU /4 CODE CHECK ERROR " PTPERR EQU /2
0x3253d0…325564 Dummy {f00=0x011c, f01=0x0190, f02=»BLES * P********** P* P* * P IFT CROOM=1 4 P* H PROMTAB EQU * R * P TABLE FOR ROOMLESS POINT CHARACTERS f ( P DATA /2122,/2426,/3B3C,/3E40,/5E5F P* P XIF P* P* P* " P DATA DVBLEN MMU BUF
0x325564…3256f8 Dummy {f00=0x011c, f01=0x0190, f02=»ADDRESS z P DATA IHGP INTERRUPT HANDLER P DATA RCGP RECOVERY ROUTINE 4 . P DATA ECHOGP DEVICE-DEPENDENT ECHO-ROUTINE X P EJECT P* P* A C G P P* 2 P* ACGP = ACTIVATION DRIVER GENERAL PRINTER P* H P* ORD
0x3256f8…32588c Dummy {f00=0x011c, f01=0x0190, f02=» RETURN CODE IS ALSO SET IF TIME-OUT IS SIGNALLED FROM P* CHANNEL UNIT. H P* l > P* ORDER 05: BASIC WRITE. CHARACTER ARE SENT TO PRINTER v " P* FROM ECB-BUFFER P* F P* ORDER 06: STANDARD WRITE. C
0x32588c…325a20 Dummy {f00=0x011c, f01=0x0190, f02=»DK A2,STX START OF MESSAGE P LDR A3,A7 =1 " P RF(Z) ACGP10 ORDER 0 =2 8 P SUK A3,5 =1 X P RF(E) ACGP09 ORDER 5 =1 n P SUK A3,1 =1 ( P ABL(NE) DISIOE I/O REQUEST ERROR =1 * P LD A3,4,A8 ORDER 6 GET REQ LENGTH =1 P RF(Z) ACG
0x325a20…325bb4 (3, 221) Dummy {f00=0x011d, f01=0x0190, f02=» A3,/2B =1 $ P RF(E) ACGP06 CONTROL CHAR 2B =1 P CF A5,OUTPUT SEND STX =1 < P LDK A2,CR =1 ^ P CF A5,OUTPUT =1 t P IFT ABIS=1 =1 P LDK A2,FFED =1 P CWK A3,/31-/2B =1 $ P RF(E) ACGP03 CONTROL CHAR 31 =1 P XIF
0x325bb4…325d48 Dummy {f00=0x011d, f01=0x0190, f02=»DK A2,LF =1 , PACGP03 LDK A1,1 RESET HEAD POS COUNTR =1 P ST A1,DWTAP,A6 =1 D * PACGP06 LDK A3,2 START BUFFER INDEX =1 ` PACGP09 CF A5,OUTPUT =1 P RF ACGP19 =1 P EJECT =2 P* =2 P* ORDER 00: TEST =2 N P*
0x325d48…325edc Dummy {f00=0x011d, f01=0x0190, f02=» CF A5,OUTPUT =2 * P LDK A2,0 SEND CHAR /00=END OF TEST =2 P CF A5,OUTPUT =2 H P RF AGP410 =2 b P EJECT x P* & P* GET, CHECK AND SEND CHARACTER P* (IF ORDER 5 NO CHECK) P* PACGP17 CF A5,OUTPUT 0 PACGP18
0x325edc…326070 Dummy {f00=0x011d, f01=0x0190, f02=» IFT SUPSPA=1 4 P CF A15,SKIPSP SKIP SPACES IN END OF ECB-BUFFER P XIF N P LDK A4,0 Z 6 PACGP20 CF A15,GETCHR GET CHARACTER FROM ECB-BUFFER l P LDR A1,A1 LAST CHARACTER? P RF(NP) AGP400 YES P LDR A1,A2 P SUK A7,5 ORDER 5?
0x326070…326204 Dummy {f00=0x011d, f01=0x0190, f02=»N POINTER n P RB ACGP17 * PACGP22 SUK A1,8 TABULATION CHARACTER ? $ P RF(E) ACGP40 R P IFT ABIS=1 =1 h P CWK A2,/07 BELL ? =1 P RB(E) ACGP09 =1 P XIF =1 P* P IFT TRETON=0 P IFT FJOTON=0 P*
0x326204…326398 Dummy {f00=0x011d, f01=0x0190, f02=» P RB(E) ACGP17 P SUK A1,/C LESS THAN /20 ? P* @ P XIF J P* V P* ` P IFT TRETON=1 j P IFT FJOTON=0 P* P SUK A1,2 /13 ? P RB(E) ACGP17 P SUK A1,/D LESS THAN /20 ? P XIF P* P*
0x326398…32652c Dummy {f00=0x011d, f01=0x0190, f02=»CGP17 P SUK A1,/C LESS THAN /20 ? P* 0 P XIF : P* F & P RF(N) ACGP30 YES,CODE CHECK ERROR P & P SUK A1,/8E ROOMLESS POINT? (AE) z P RF(E) AGP100 P ADK A1,/4F GREATER THAN /5F P RB(NP) ACGP17 NO P SUK A1,/20
0x32652c…3266c0 Dummy {f00=0x011d, f01=0x018e, f02=» PACGP24 EQU * P SUK A1,/D P RF(NZ) ACGP26 NOT CR . " P CM DWTST,A6 SET POS LTR.TO 0 L ( P CM DWTAP,A6 RESET HEAD POS.POIINTER r PACGP26 ADK A1,3 P RB(NZ) ACGP17 NOT LINE FEED P SUK A1,1 * P ADS A1,DWTST,A6 DECREMENT P
0x3266c0…326854 (3, 222) Dummy {f00=0x011d, f01=0x018e, f02=» P ORS A1,8,A8 RETURN CODE P RB ACGP20 ( P EJECT : P* H P* TABULATION R P* j PACGP40 EQU * t , P CF A15,GETCHR GET FIRST ASCII CHARACTER P LDR A4,A2 . P CF A15,GETCHR GET SECOND ASCII CHARACTER P ANK A2,/F
0x326854…3269e8 Dummy {f00=0x011d, f01=0x0190, f02=» 8 PACGP44 SU A2,DWTAP,A6 SUBTRACT HEAD POSITION POINTER P LC A4,DWTBC,A6 @ , P SUR A2,A4 AND REQUESTS POSITION COUNTER X & P TO GET NUMBER OF SPACES TO SEND P RB(NP) ACGP20 P LDR A4,A2 : PACGP45 LDK A2,SPACE LOOP ALSO USED BY RECOVERY
0x3269e8…326b7c Dummy {f00=0x011d, f01=0x018e, f02=»A3 RECOVERY? P RB(NE) ACGP20 * P SC A4,DWTBC,A6 RESET POSITION POINTER * P LDK A3,2 START BUFFER INDEX X P RB ACGP19 | P EJECT P* P* ROOMLESS POINT P* PAGP100 EQU * P* P IFT CROOM=1 P* ( P
0x326b7c…326d10 Dummy {f00=0x011d, f01=0x0190, f02=» P IFF CROOM=1 ! P* ! P ANK A2,/7F ! " P* ! 6 P XIF ! @ P* ! L P RB ACGP17 ! V P EJECT ! h P* ! v P* ! ( P* SEND LAST DUMMY , LOAD A1 WITH ! P* RETURN CODE AND END I/O ! P* ! PAGP400 EQU * ! P LDK A2,ETB END
0x326d10…326ea4 Dummy {f00=0x011d, f01=0x018e, f02=»BIS=1 =1 ! P ANK A2,/4 PAPER IN ? =1 " P RF(NZ) AGP420 YES =1 " 2 " P LDK A1,/20 SET RETURN CODE =1 " P P XIF =1 " v PAGP420 EQU * " 0 P CF A15,UPDAPP UPDATE HEAD POSITION COUNTER " PENDIO CF A15,TENDIO END I/O " $ PEXIT ABL TDISP GO TO
0x326ea4…327038 Dummy {f00=0x011d, f01=0x0190, f02=» " P* # , P* UPDAPP = SUBROUTINE TO UPDATE HEAD # , P* POSITION POINTER WHEN END # B ( P* OF REQUEST IS REACHED # r PUPDAPP EQU * # ( P LC A3,DWTBC,A6 GET POSITION COUNTER # 2 P ADS A3,DWTAP,A6 UPDATE HEAD POSITION POIN
0x327038…3271cc Dummy {f00=0x011d, f01=0x0190, f02=» P* $ * P* SKIPSP = SUBROTINE TO SKIP SPACES $ ( P* IN END OF ECB-BUFFER. $ < 6 P* REQUESTED LENGTH IN ECB IS UPDATED. $ h & P* A1,A2,A4 - WORK REG $ P* $ PSKIPSP EQU * $ ( P LD A1,2,A8 GET BUFFER ADDRESS
0x3271cc…327360 Dummy {f00=0x011d, f01=0x0190, f02=» RL < 3 $ P SUK A1,1 DECR. BA % P LCR A4,A1 GET CHAR % * P CCK A4,/2020 SPACE ? % F P RF(NE) SKIP20 NO % d PSKIP07 SUK A2,1 DECR RL % ~ P RB SKIP05 GET NEXT % PSKIP20 CWK A2,4 % P RF(NG) SKIP30 RL < 5 % P LC A4,-2,A1 GET CHAR %
0x327360…3274f4 (3, 223) Dummy {f00=0x011d, f01=0x0190, f02=»ET NEXT % P* & " PSKIP30 ST A2,4,A8 STORE NEW RL & P RTN A15 & @ P XIF & P P EJECT & P* & j P* I H G P & t P* & P* INTERRUPT & P* & PIHGP EQU * & P LD A4,DWTST,A6 BUSY? & P RB(N) EXIT NO & P SLL A4,2 ECHO M
0x3274f4…327688 Dummy {f00=0x011d, f01=0x0190, f02=» P IFT RECEND=0 ' P RB(NZ) EXIT ' P XIF ' . P IFT RECEND=1 ' : P RB(NZ) AGP430 ' P P XIF ' f P ' r 4 PIHGP10 ABL LDREG RELOAD A3-A5 AND RETURN VIA A5 ' z PIHGP20 LDR A1,A1 =2 ' , P RB(Z) IHGP10 TEST ORDER AND TIME OUT =2 ' P RB ENDIO
0x327688…32781c Dummy {f00=0x011d, f01=0x0190, f02=»GP EQU * ' P LDK A4,COSPAC ( P LDR A7,A7 EOR? ( & P RF(N) ECGP17 YES ( > P* ( X P IFT EORECH=0 ( b P* ( x P SUK A2,/80 EOR-CHARACTER ( P RF(NN) ECGP20 YES ( P ADK A2,/80 ( P* ( P XIF ( P* ( P LDR A1,A2 ( P ANK
0x32781c…3279b0 Dummy {f00=0x011d, f01=0x0190, f02=» CR =1 ( P RF(E) ECGP10 YES =1 ) P SUK A1,/B =1 ) * P RF(E) ECGP50 CLEAR ) @ 8 P SUK A1,/20-/8-/10 CHECK THAT CHAR IS WITHIN /20-/5F ) P RF(N) ECGP20 ) P SUK A1,/5F-/20 ) P RF(P) ECGP20 ) & PECGP10 CF A5,OUTPUT SEND CHARACTER ) ( P I
0x3279b0…327b44 Dummy {f00=0x011d, f01=0x0190, f02=» P* * P IFT COSPAC=1 * P* * $ P LDK A2,SPACE NO SEND SPACE * . P RB ECGP10 * R P* * d P XIF * n P* * z 6 PECGP17 CF A15,UPDAPP UPDATE HEAD POSITION POINTER * ( PECGP20 ABL ECHRTN RETURN TO KEYBOARD * P EJECT * P* * P* B
0x327b44…327cd8 Dummy {f00=0x011d, f01=0x0190, f02=»* * PECGP50 EQU * + " P LDK A2,GPCLR CLEAR CHARACTER + P LDK A4,3 + D P RB ECGP10 + V PECGP60 LDK A2,LF LINE FEED + h P LC A3,DWTBC,A6 + P ANK A3,/FF + " PECGP70 CF A5,OUTPUT SEND CHAR. + P LDK A2,/08 BACKSPACE + P SUK A3,1 +
0x327cd8…327e6c Dummy {f00=0x011d, f01=0x0190, f02=» R C G P + P* , 0 P* RCGP = RECOVERY ROUTINE GENERAL PRINTER , P* , N P* , X ( P* RECOVERY IS CARRIED OUT ONLY IF , b P* ORDER 6 IS RUNNING , P* , P* ON ENTRY: , P* , P* A6 = DWT-ADDRESS , P* A7 = ORDER ,
0x327e6c…328000 Dummy {f00=0x011d, f01=0x0190, f02=» P IFT CPU852=0 - " P MSR 8,A15 SAVE A1-A8 ON STACK - P XIF - @ P* - L P LD A2,DWTST,A6 BUSY ? - V P RB(N) EXIT NO - t ( P LDK A2,SOH RESET PRINT BUFFER CODE - P CF A5,OUTPUT SEND IT - P CWK A7,5 - P RF(E) RCGP10 - P CWK A7,6 OR
0x328000…328194 (3, 224) Dummy {f00=0x011d, f01=0x018e, f02=»6 GET LEFT BYTE OF STATUS WORD - P ANK A2,/4 LINE FEED DONE ? . & P ABL(E) ACGP NO . J P LDK A2,SPACE . b P CF A5,OUTPUT SEND SPACE . x P LDK A2,STX . P CF A5,OUTPUT SEND STX . P LDK A2,CR CARRIAGE RETURN . P LDK A3,0 . 0 P LD A4,DWT
0x328194…328328 Dummy {f00=0x011d, f01=0x4008, f02=»@ / FT BYTE OF STATUS WORD - P ANK A2,/4 LINE FEED DONE ? . & P ABL(E) ACGP NO . J P LDK A2,SPACE . b P CF A5,OUTPUT SEND SPACE . x P LDK A2,STX . P CF A5,OUTPUT SEND STX . P LDK A2,CR CARRIAGE RETURN . P LDK A3,0 . 0 P LD A4,DWT
0x328328…3284bc Dummy {f00=0x011d, f01=0x2008, f02=» 0 YTE OF STATUS WORD % ~ P ANK A2,/4 LINE FEED DONE ? & " P ABL(E) ACGP NO & F P LDK A2,STX & ^ P CF A5,OUTPUT SEND STX & r P LDK A2,CR CARRIAGE RETURN & P LDK A3,0 & 0 P LD A4,DWTAP,A6 GET NUMBER OF SPACES TO SEND & P RB ACGP46 & (
0x3284bc…328650 Dummy {f00=0x011d, f01=0x0190, f02=»RACTER,POS IF CTRL,SHIFT 0 ` $ P* A5 IS DESTROYED! 1 P* 1 H P* 1 R PKONVER EQU * 1 P LDR A4,A2 1 p P IFT NSHIFT=0 1 P SUK A4,/7C CODE > /7B 1 P RF(NN) KON500 YES 1 P LDR A4,A2 RESTORE CHARACTER 1 P XIF 1 8 P STR A2,
0x328650…3287e4 Dummy {f00=0x011d, f01=0x0190, f02=»/40 1 P RF(N) KON180 ALFANUMERIC 2 P SUK A4,/10 FUNCTION 2 . P RF(NN) KON110 NO 2 J P SUK A2,/40 YES 2 d PKON105 EQU * 2 | P ANK A5,/10 2 P SRL A5,3 2 P RF KON200 2 * PKON110 SUK A4,8 (UN)CTRL OR (UN)SHIFT 2 P RF(N) KON400 KEY-
0x3287e4…328978 Dummy {f00=0x011d, f01=0x0190, f02=»1 2 P SUK A4,2 3 P RF(N) KON125 CONTROL OFF 3 $ P RF(E) KON140 NUMERICAL SHIFT ON 3 > " P RF KON160 NUMERICAL SHIFT OFF 3 f P XIF 3 PKON125 EQU * 3 P LDKL A2,/FFDF UNCTRL 3 PKON120 ANR A5,A2 3 PKON130 STR A5,A6 DWTCHP 3 P LDK A
0x328978…328b0c Dummy {f00=0x011d, f01=0x0190, f02=»SHIFT NOT ON 3 P LDK A2,/90 4 P RF KON150 4 ( P XIF 4 : PKON145 EQU * 4 F P LDK A2,/10 SHIFT 4 Z PKON150 ORR A5,A2 4 t P RB KON130 4 PKON160 EQU * 4 P IFT NSHIFT=1 4 P LDR A4,A5 4 P ANK A4,/80 4 P RF(Z) KON165 4 P LDK
0x328b0c…328ca0 Dummy {f00=0x011d, f01=0x0190, f02=» A2,/20 CTRL 4 P RB KON150 5 PKON180 SUK A2,/20 FIND INDEX 5 & P ANK A5,/30 5 J P SRL A5,3 5 ^ P ADK A5,4 5 p 8 PKON200 LD A4,DWTCON,A6 GET CONVERSION TABLE ADDRESS 5 P ADR A4,A5 5 P LDR* A4,A4 5 P RF(Z) KON400 5 P ADR A4,A2 5
0x328ca0…328e34 (3, 225) Opaque[0x194]
0x328e34…328fc8 # DirEnt {nam=»DRDY01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x23c0, f03=0x0000}
0x328e34…328fc8 IdxSect {
0x328e34…328fc8 f00 = 0x011e // 0x328e34 @0x0
0x328e34…328fc8 f01 = 0x0018 // 0x328e36 @0x2
0x328e34…328fc8 gno = [ // 0x328e38 @0x4
0x328e34…328fc8 [0x00]: C0x011e.0x0.0
0x328e34…328fc8 [0x01]: C0x011e.0x1.0
0x328e34…328fc8 [0x02]: C0x011e.0x2.0
0x328e34…328fc8 [0x03]: C0x011e.0x3.0
0x328e34…328fc8 [0x04]: C0x011f.0x0.0
0x328e34…328fc8 [0x05]: C0x011f.0x1.0
0x328e34…328fc8 [0x06]: C0x011f.0x2.0
0x328e34…328fc8 [0x07]: C0x011f.0x3.0
0x328e34…328fc8 [0x08]: C0x0141.0x0.0
0x328e34…328fc8 [0x09]: C0x0141.0x2.0
0x328e34…328fc8 [0x0a]: C0x0141.0x3.0
0x328e34…328fc8 [0x0b]: C0x0142.0x0.0
0x328e34…328fc8 ]
0x328e34…328fc8 }
0x328fc8…32915c Dummy {f00=0x011e, f01=0x0190, f02=» 2 P IDENT DRDY01 REL 10.0 80-03-14 870105041000 P : . P =7,CUR.POS FOR ALL ORDERS EXCEPT ERASE B P PRR 10.0 79-12-07 t 4 P =6,CORRECTION OF SPECIAL CHARTACTER HANDLING P REL 10.1 79-10-19 P =5,ABORT ROUTINE P REL 1
0x32915c…3292f0 Dummy {f00=0x011e, f01=0x0190, f02=».1 79-04-06 , P =2,ERASE ONLY TO LAST POS. OF SCREEN P PRR 9.1 79-01-31 D . P =1 DRIVER ADAPTAD TO HANDLE PTS 6385 ` P PRR 9.1 79-01-12 P P* 6 P************************************************** P* $ P*
0x3292f0…329484 Dummy {f00=0x011e, f01=0x0190, f02=» P* P* 6 P************************************************** P* R P* : P* THIS DRIVER HANDLES OUTPUT TO THE VIDEO DISPLAYS f @ P* PTS 6344, PTS 6342 AND TO THE PLASMA DISPLAYS PTS 6351 P* AND PTS 6386 6 P* T
0x329484…329618 Dummy {f00=0x011e, f01=0x0190, f02=»HO-FUNCTIONS d : P* WHICH MAKES IT POSSIBLE TO USE THE DISPLAY AS AN : P* ECHO-DEVICE TO ANY KEYBOARD, THAT RUNS UNDER THE R ( P* GENERAL KEYBOARD DRIVER DRKB01. P* P* 0 P* THE DRIVER CONSISTS OF FOLLOWING PARTS: P*
0x329618…3297ac Dummy {f00=0x011e, f01=0x018e, f02=»ERY ROUTINE x P* & P* E C H O D Y ECHO FUNCTIONS P* H P R P Z P b P* j * P* THE FOLLOWING ORDERS ARE TREATED: t P* P* ORDER 00: TEST STATUS P* 05: BASIC WRITE " P* 06: STANDARD
0x3297ac…329940 Dummy {f00=0x011e, f01=0x0190, f02=» P* NORMAL REGISTER USAGE P* & " P* REGISTER A1 = RETURN CODE 0 ( P* A2 = OUTPUT CHARACTER V $ P* A3 = BUFFER INDEX $ P* A4 = WORK REGISTER " P* A5 = STACK BASE " P* A6
0x329940…329ad4 (3, 226) Dummy {f00=0x011e, f01=0x0190, f02=»* SYSTEM ADAPTATION P* < P* DISPLAY TYPE MUST BE DEFINED IN FIRST WORD IN DWT. ( P* h * P* --------------------------------- r P* BIT: 10 11 P* -------------- " P* 0 0 PTS 6344 * P* 0
0x329ad4…329c68 Dummy {f00=0x011e, f01=0x0190, f02=» BY MEANS OF CONDITIONAL ASSEMBLY THE DRIVER: 4 P* -CAN HANDLE GRAFIC MODE FOR PTS 6351 OR NOT 8 , P* -IS ADAPTED TO CONTROL ONLY PTS 6344 p : P* -CAN USE LOWER CASE CHAR. GENERATOR COLUMN 6 AND 7 8 P* -CAN SUPPRESS ECHOING OF END OF RECORD
0x329c68…329dfc Dummy {f00=0x011e, f01=0x0190, f02=»JECT P* P* P* P* * P*********** 4 P* ENTRIES * H P*********** P* p P* z P* ( P ENTRY DYAD ADDRESS TO ADDRESSBLOCK 0 P ENTRY ECHODY DEVICE-DEPENDENT ECHO-ROUTINE P* P* P*
0x329dfc…329f90 Dummy {f00=0x011e, f01=0x0190, f02=»******************* z P* P* & $ P EXTRN DISIOE I/O REQUEST ERROR 0 . P EXTRN OUTPUT SUBROUTINE TO SEND CHARACTER X P EXTRN TDISP DISPATCHER > P EXTRN LDREG LOAD REGISTERS A4, A3, A5, A7, A8 AND RETURN P EXTRN TENDIO END I/O .
0x329f90…32a124 Dummy {f00=0x011e, f01=0x0190, f02=» ECB-BUFFER p P EJECT P* " P************************ , P* DWT PARAMETERS * L P************************ l P* P EXTRN DWTST STATUS EXTRN DWTBC BYTE COUNTER P EXTRN DWTOR ORDER P* P EJECT P**
0x32a124…32a2b8 Dummy {f00=0x011e, f01=0x018e, f02=»RESS t " PULSTAR EQU /12 UNDERLINE START " PULSTOP EQU /13 UNDERLINE STOP 2 & PLISTAR EQU /1E LOW INTENSITY START X & PLISTOP EQU /1F LOW INTENSITY STOP PBACKSP EQU /08 BACKSPACE PLF EQU /0A LINE FEED PHOME EQU /0B CURSOR HOME ( P
0x32a2b8…32a44c Dummy {f00=0x011e, f01=0x0190, f02=» z PSTX EQU /82 START OF MESSAGE PETB EQU /97 END OF MESSAGE , PETX EQU /03 LAST DUMMY N . PRETURN EQU /12 RETURN TO ALPHANUMERIC MODE l * PESCAPE EQU /11 ESCAPE TO GRAPHIC MODE " PPOINT EQU /2E POINT CHARACTER 2 PEQU EQU 6 THRESHOLD FO
0x32a44c…32a5e0 Dummy {f00=0x011e, f01=0x0190, f02=»** ~ P* RETURN CODES * P******************** & P* B " PCCERR EQU /4 CODE CHECK ERROR L ( POPERR EQU /1 NOT OPERABLE, POWER OFF r P* P EJECT P* P* . P***************************************** . P* CONDITI
0x32a5e0…32a774 (3, 227) Dummy {f00=0x011e, f01=0x0190, f02=»VER CAN HANDLE GRAFIC MODE FOR PTS 6351 t P* 0 PX:A EQU 0 : PGRAFIC EQU 0 L P* ` < P* BY SETTING X:B = 1 THE DRIVER HANDLES ONLY PTS 6344 j P* PX:B EQU 1 PWHATDY EQU 1 P* P* 8 P* BY SETTING X:C TO 1 L
0x32a774…32a908 Dummy {f00=0x011e, f01=0x0190, f02=» BY MEANS OF CONDITIONAL ASSEMBLY IT IS POSSIBLE 8 P* TO SUPPRESS ECHOING OF END OF RECORD CHARACTER. : 8 P* THIS IS ATTAINED BY SETTING THE CONSTANT X:G=0 v P* PX:D EQU 0 PEORECH EQU 0 P* 0 P* BY SETTING THE CONSTANT
0x32a908…32aa9c Dummy {f00=0x011e, f01=0x0190, f02=» P EJECT P* 2 P* BY SETTING X:F = 1, CURSOR WILL BE STEADY P* INSTEAD OF BLINKING R PX:F EQU 0 r PSTEADY EQU 0 P* < P* THIS DRIVER CAN BE ADAPTED TO MEMORY MANAGEMENT UNIT P* BY SETTING MMUPAG = 1 P*
0x32aa9c…32ac30 Dummy {f00=0x011e, f01=0x0190, f02=»852 EQU 0. p P* PCPU852 EQU 0 P* 0 8 P* BY MEANS OF CONDITIONAL ASSEMBLY IT IS POSSIBLE : < P* TO CHOOSE BETWEEN NINE (9) DIFFERENT CHARACTER SETS. v P P P* CODE COUNTRY P P* 0 GB/NL/B P* 1 D/A/L/CH
0x32ac30…32adc4 Dummy {f00=0x011e, f01=0x0190, f02=»0 PCOUNTRY EQU 0 P* & P* MEMORY MANAGEMENT BUFFER SIZE * P* T P* ^ PX:H EQU 64 h PDVBLEN EQU 162 z P* P EJECT P* P* $ P******************************** $ P* DWT-DISPLACEMENT *
0x32adc4…32af58 Dummy {f00=0x011e, f01=0x0190, f02=»G=0 PSTART EQU DWTDRD P XIF $ P* 0 P IFT MMUPAG=1 : PSTART EQU DWTDRD+4 P P XIF j P* v . PDWTAP EQU START+/12 HEAD POSITION POINTER " PDWTPOS EQU START+/15 POSITIONS PDWTLIN EQU START+/14 LINES & PDWTBIN EQU STA
0x32af58…32b0ec Dummy {f00=0x011e, f01=0x018e, f02=»* P DATA DVBLEN BUFFER LENGTH P DATA 2 DEVICE INDEX , PDYAD EQU * ADDRESS BLOCK H P DATA ACDY ACTIVATION DRIVER h $ P DATA ABDY ABORT ROUTINE ADDRESS P DATA IHDY INTERRUPT HANDLER P DATA RCDY RECOVERY ROUTINE . P DATA ECHODY
0x32b0ec…32b280 Dummy {f00=0x011e, f01=0x0190, f02=» P EJECT P* P* A C D Y P* 0 * P* ACDY = ACTIVATION DRIVER DISPLAY : P* h H P* ORDER 00: TEST STATUS. DUMMY IS SENT TO DISPLAY AND RETURN CODE r 2 P* IS SET IF DISPLAY NOT OPERABLE P* P* > P
0x32b280…32b414 (3, 228) Dummy {f00=0x011e, f01=0x0190, f02=» ORDER 06: STANDARD WRITE. CHARACTERS ARE SENT TO DISPLAY FROM < P* ECB-BUFFER AFTER INDIVIDUAL CODE CHECK. H P* L P* IF A PREDEFINED NUMBER OF CHARACTERS (SEE CONSTANT 'EQU') J P* ARE FOUND EQUAL, FAST O
0x32b414…32b5a8 Dummy {f00=0x011e, f01=0x0190, f02=»1 B P* ORDER 07: WRITE GRAPHIC DISPLAY. THE DISPLAY IS SWITCHED @ P* TO GRAPHIC MODE AND INFORMATION IN ECB-BUFFER P * P* IS SENT TO THE DISPLAY. P* P XIF : P* ORDER /B: CURSOR POSITIONING AND STANDARD W
0x32b5a8…32b73c Dummy {f00=0x011e, f01=0x0190, f02=» V @ P* IS ERASED. THEN STANDARD WRITE (SEE ORDER 6) P* IS EXECUTED. L P* p < P* ORDER 31: ERASE. THE DISPLAY IS ERASED ON THE LINE z < P* WHERE THE CURSOR IS POSITIONED THE NUMBER @ P*
0x32b73c…32b8d0 Dummy {f00=0x011e, f01=0x0190, f02=» IN THE CURSOR POSITION. THE CURSOR RE- * P* MAINS IN THAT POSITION. 0 PACDY EQU * ^ P LDK A3,0 START BUFFER INDEX p P LDK A4,0 COUNTER P LDR A7,A7 ORDER 0 ? P ABL(E) ADY410 YES P LDK A2,STX START OF MESSAGE P
0x32b8d0…32ba64 Dummy {f00=0x011e, f01=0x0190, f02=»NO P IFT GRAFIC=1 P CWK A7,7 ORDER ' ? P ABL(E) ADY500 < P XIF R P IFT WHATDY=0 ^ . P LDK A2,/12 INDICATE SWITCH TO ALPHA MODE t P CF A5,OUTPUT P* P XIF P* PACDY02 EQU * P CWK A7,5 ORDER 5
0x32ba64…32bbf8 Dummy {f00=0x011e, f01=0x0190, f02=» SUK A7,/26 ORDER ERASE ? P ABL(E) ADY160 YES " P* < & PDYERR ABL DISIOE I/O REQUEST ERROR F P EJECT p : P* ACTIONS SPECIFIED BY USER IN RIGHT BYTE IN BUFFER ~ P* ARE CARRIED OUT. 0 P* /2B NO MOVING OF PRINT HEAD
0x32bbf8…32bd8c Dummy {f00=0x011e, f01=0x0190, f02=», LF z P* PACDY20 EQU * $ P LD A2,4,A8 GET REQUESTED LENGTH * P RF(E) ACDY25 R P LDK A3,2 START BUFFER INDEX h " P LD A2,2,A8 GET BUFFER ADDRESS & P LC A2,1,A2 GET CONTROL CHARACTER P ANK A2,/FF PACDY25 EQU * * P SUK
0x32bd8c…32bf20 Dummy {f00=0x011e, f01=0x0190, f02=»ED v " P ADK A2,1 DOUBLE LINE FEEED ? P RF(NE) ACDY30 0 ( P ADK A4,1 INDICATE DOUBLE LINE FEED F P r P z $ PACDY30 LDK A2,CR CARRIAGE RETURN PACDY35 LDK A1,1 2 P SC A1,DWTAP+1,A6 RESET HEAD POSITION COUNTER 8 P* SEND CARRIA
0x32bf20…32c0b4 (3, 229) Dummy {f00=0x011f, f01=0x018e, f02=»F(N) ACDY90 START SECTION ENDED? P LC A1,DWTLIN,A6 LINES ( P CC A1,DWTAP,A6 LAST LINE ? F P RF(L) ACDY55 j ( P LDKL A2,/100 INCREMENT LINE COUNTER P ADS A2,DWTAP,A6 & PACDY55 LDK A2,LF LINE FEED TO SEND P RB ACDY50 ( PACDY65 L
0x32c0b4…32c248 Dummy {f00=0x011f, f01=0x018e, f02=» & P* GET, CHECK AND SEND CHARACTER P* (IF ORDER 5 NO CHECK) . P* P PACDY70 EQU * Z P IFT WHATDY=0 n & P LDR* A4,A6 GET CHANNEL PARAMETER P ANK A4,/10 $ P RF(NZ) ACDY75 NOT 6344 OR 6386 P XIF P LD A4,2,A8 2
0x32c248…32c3dc Dummy {f00=0x011f, f01=0x0190, f02=» P CF A5,OUTPUT 2 PACDY80 CF A15,POSUPD POSITION COUNTER UPDATING P IFT TRASPA=1 T ( P LD A1,2,A8 GET BUFFER ADDRESS (BA) j ( P LD A2,4,A8 GET REQUESTED LENGTH(RL) $ P ADR A1,A2 GET ADD END OF BUFFER PSKIP05 CWK A2,2 P RF(NG
0x32c3dc…32c570 Dummy {f00=0x011f, f01=0x0190, f02=»IP07 SUK A2,1 DECR RL P RB SKIP05 GET NEXT ! PSKIP20 CWK A2,4 ! : P RF(NG) SKIP30 RL < 5 ! R P LC A4,-2,A1 GET CHAR ! p $ P CCK A4,/1111 TABULATION CHAR ? ! P RF(NE) SKIP25 NO! ! P SUK A1,2 DECR BA ! P SUK A2,2 DECR RL ! P RB
0x32c570…32c704 Dummy {f00=0x011f, f01=0x0190, f02=»P07 YES! SKIP IT! ! P SUK A4,/C LOW INT. START? " P RB(Z) SKIP07 YES! " < P SUK A4,1 LOW INT. STOP? " V P RB(Z) SKIP07 YES! " v P* " " PSKIP30 ST A2,4,A8 STORE NEW RL " P XIF " PACDY90 LDK A4,0 " 6 PADY100 CF A15,GETCHR GET CHARACTER F
0x32c704…32c898 Dummy {f00=0x011f, f01=0x0190, f02=»/7F " P LDK A1,5 SET TABLE POINTER # " P CC A2,TABSPE,A1 FAST OUTPUT? # 0 P RF(E) ADY125 # V P SUK A1,1 NO! # l " P LDR* A7,A6 CHANNEL PARAMETER # P ANK A7,/30 GRAFIC DISPLAY ? # P RF(E) ADY110 NO # P LDK A1,5 SET TABLE PONTER # * PAD
0x32c898…32ca2c Dummy {f00=0x011f, f01=0x0190, f02=»4,/80 # , PADY120 ORRS A4,A6 SET LOW INTENSITY MODE $ P LDK A4,0 $ > P RB ACDY50 $ P $ PADY122 CCK A2,/1212 UNDERLINE ? $ b P RF(NE) ADY125 $ " P LDK A4,/40 SET UNDERLINE MODE $ P RB ADY120 $ & PADY125 CCK A2,/1414 FAST OUTPUT ? $ P LDK A
0x32ca2c…32cbc0 Dummy {f00=0x011f, f01=0x0190, f02=» LD A4,4,A8 REQ LENGTH $ P SUR A4,A3 NUMBER OF CHARS % P RF(Z) ADY127 NONE % @ P* % Z P IFT WHATDY=0 % d & P LDR* A7,A6 GET CHANNEL PARAMETER % z P ANK A7,/10 % 2 P RF(NZ) OTHER OTHER DISPLAY THAN 6344 OR 6386? % P XIF % P LDR A3,A1 NO!
0x32cbc0…32cd54 (3, 230) Dummy {f00=0x011f, f01=0x0190, f02=» EQU * % P SUK A1,1 GET NEXT & P RB(NN) ADY110 NOT AT END & ( P LDR A1,A2 MOVE CHARACTER & J P SUK A1,/11 TAB CHAR? (11) & l P RF(E) ADY140 & P SUK A1,/F LESS THAN /20 ? & " P RF(N) ADY130 CODE CHECK ERROR & P SUK A1,/3F GREATER THAN /
0x32cd54…32cee8 Dummy {f00=0x011f, f01=0x0190, f02=»/40 TO /5F & x P XIF ' P RB ACDY70 ' P* ' 0 P* ' : P IFT WHATDY=0 ' D POTHER EQU * ' Z P************************ ' n P* A3 = INDEX ' P* A1 = CHARACTER ' P* A4 = NUMBER ' P************************ ' P LC A2,DWTBC,A6 ' P
0x32cee8…32d07c Dummy {f00=0x011f, f01=0x0190, f02=» ANK A3,/FF ' P ST A4,10,A8 SAVE LENGTH ( P SUR A3,A2 COMPARE ( 4 P RF(NN) OT030 LENGTH OK ( N P ADR A4,A3 ( n P ST A4,10,A8 SAVE LENGTH ( 0 P ADK A4,1 ADJUST NUMBER OF OUTPUT CHARACTERS ( POT030 EQU * ( & P LDR A3,A1 SAVE CHARACTER TO SEN
0x32d07c…32d210 Dummy {f00=0x011f, f01=0x0190, f02=»,10,A8 GET ACT. LENGTH ( POT040 LDK A2,BACKSP ) P CF A5,OUTPUT SENDBACKSPACE ) : P SUK A4,1 DECREMENT LENGTH ) ^ P RB(P) OT040 ) P RB ADY127 ) P XIF ) P EJECT ) P* ) P* CODE CHECK ERROR ) P* ) PADY130 EQU * ) P L
0x32d210…32d3a4 Dummy {f00=0x011f, f01=0x0190, f02=»QU * ) , P CF A15,GETCHR GET FIRST ASCII CHARACTER * P LDR A4,A2 * < . P CF A15,GETCHR GET SECOND ASCII CHARACTER * N P ANK A2,/F * P ANK A4,/F * P RF(E) ADY144 * 0 PADY143 ADK A2,/A FROM DECIMAL TO HEXADECIMAL * P SUK A4,1 * P RB(NE)
0x32d3a4…32d538 Dummy {f00=0x011f, f01=0x0190, f02=»EQUESTS POSITION COUNTER * & P TO GET NUMBER OF SPACES TO SEND + P RB(NP) ADY100 + J P LDR A4,A2 + ` & PADY145 LDK A2,CURRIG CURSOR RIGHT + r PADY146 CF A5,OUTPUT + , P CF A15,POSUPD POSITION COUNTER UPDATING + P SUK A4,1 READY ? + P RB(NE
0x32d538…32d6cc Dummy {f00=0x011f, f01=0x0190, f02=» CHAR TO ERASE + p P IFT WHATDY=0 , " P LDR* A1,A6 CHANNEL PARAMETER , , P ANK A1,/10 GRAFIC DISPLAY? , R P RF(NE) ADY166 YES =2 , v P XIF , & P CF A5,ERA GET LENGTH TO ERASE =2 , P LDK A3,/20 , P CF A5,FASTER FAST OUTPUT , PADY165 L
0x32d6cc…32d860 Dummy {f00=0x011f, f01=0x0190, f02=»ET LENGTH TO ERASE =2 , P* - $ PADY170 SUK A4,1 DECR NO OF CHAR - ( P RF(N) ADY180 ERASE READY - P P LDK A2,/20 SPACE - r P CF A5,OUTPUT SEND IT - P RB ADY170 - PADY180 LD A4,10,A8 - & P CF A5,ERA GET LENGTH TO ERASE =2 - P LDR A3,
0x32d860…32d9f4 (3, 231) Dummy {f00=0x011f, f01=0x0190, f02=» RB(N) ADY165 CURSOR IN ORIGIN POSITION - P LDK A2,BACKSP CURSOR LEFT . 0 P CF A5,OUTPUT SEND IT . R P RB ADY186 AGAIN . p P XIF . P EJECT . P* . * P* ORDER /B CURSOR POSITIONING PART . P* . PADY200 EQU * . P* . P IFT W
0x32d9f4…32db88 Dummy {f00=0x011f, f01=0x0190, f02=» SET CURSOR ADDRESS DIRECT . | P XIF / " * P LD A4,10,A8 GET REQUESTED CURSOR POS / . . P ST A4,DWTAP,A6 UPDATE LINE & POS COUNTER / P CF A5,CURPOS SET CURSOR / P RF ADY380 / P IFT WHATDY=0 / P* GET LINE / * PADY205 LC A4,10,A8 GET REQUE
0x32db88…32dd1c Dummy {f00=0x011f, f01=0x0190, f02=» PADY207 EQU * 0 $ P LC A3,DWTAP,A6 GET ACTUAL LINE 0 PADY210 CWR A4,A3 0 @ . P RF(N) ADY250 REQUESTED LINE ABOVE ACTUAL 0 X P RF(E) ADY300 SAME LINE 0 P LDK A2,LF LINE FEED 0 * P ADK A3,1 INCREMENT ACTUAL LINE NUMBER 0 PADY230 CF A5,OUTPUT
0x32dd1c…32deb0 Dummy {f00=0x011f, f01=0x0190, f02=»ME HOME 0 & P LDK A3,1 RESET ACTUAL LINE NUMBER 1 " P ST A3,DWTAP,A6 RESET POSITION 1 : P RB ADY230 1 ` P* 1 r P* GET POSITION 1 | P* 1 2 PADY300 SC A4,DWTAP,A6 UPDATE HEAD LINE COUNTER 1 ( P LC A4,11,A8 GET REQUESTED POSITION 1 $ P CC A4
0x32deb0…32e044 Dummy {f00=0x011f, f01=0x0190, f02=»SITION ? 1 ~ P RF(NE) ADY305 NO 2 P CWR A4,A3 FIRST LINE ? 2 * P RF(NE) ADY305 NO 2 J P LDK A2,HOME CURSOR GO HOME 2 d P RF ADY330 2 * PADY305 RF(NL) ADY307 REQ. POS NOT ZERO 2 P LDK A4,1 2 0 PADY307 LC A3,DWTAP+1,A6 GET ACTUAL POSITION 2
0x32e044…32e1d8 Dummy {f00=0x011f, f01=0x0190, f02=» ADY370 POSITION FOUND 2 P RF(N) ADY340 BACK 3 P LDK A2,CURRIG CURSOR RIGHT 3 8 & P ADK A3,1 UPDATE POSITION COUNTER 3 PADY330 CF A5,OUTPUT SEND 3 P RB ADY310 3 . PADY340 SUR A3,A4 ACTUAL POS. - WANTED POS. 3 , P CWR A3,A4 COMPARE BACKSTEPS W
0x32e1d8…32e36c Dummy {f00=0x011f, f01=0x0190, f02=»Y330 3 " PADY345 LDK A2,BACKSP BACKSPACE 4 P CF A5,OUTPUT SEND 4 2 P SUK A3,1 LAST BACKSPACE ? 4 L P RB(NE) ADY345 4 n 8 PADY370 SC A4,DWTAP+1,A6 UPDATE HEAD POSITION POINTER 4 P XIF 4 & PADY380 LDK A3,2 START BUFFER INDEX 4 P ABL ACDY90 4
0x32e36c…32e500 Dummy {f00=0x011f, f01=0x0190, f02=» 4 P* 5 P* 5 8 P* SEND LAST DUMMY, SET CURSOR POSITION IN CONTROL 5 4 P* WORD, LOAD A1 WITH RETURN CODE AND END I/0. 5 X P* 5 PADY405 EQU * 5 & P LDR* A1,A6 GET CHANNEL PARAMETER 5 P ANK A1,/30 6344 ? 5 P RF(NE) ADY407 NO 5
0x32e500…32e694 (3, 232) Dummy {f00=0x011f, f01=0x0190, f02=» P CF A5,OUTPUT 6 * PADY406 ANK A4,/80 LOW INTENSITY MODE ? 6 P RF(E) ADY407 6 H & P LDK A2,LISTOP LOW INTENSITY STOP 6 ^ P CF A5,OUTPUT 6 PADY407 EQU * 6 $ P LDK A2,ETB END OF TEXT MESSAGE 6 P CF A5,OUTPUT SEND CHARACTER 6 0 P CF A15,UP
0x32e694…32e828 Dummy {f00=0x011f, f01=0x018e, f02=»F(Z) ADY415 ORDER ERASE =7 6 * P LD A4,DWTAP,A6 GET CURSOR POSITION =4 7 " , P ST A4,10,A8 SAVE CURSOR POS. IN ECB =4 7 P PADY415 EQU * 7 P ADK A7,/31-5 =7 7 ( P RF(NE) ADY420 NOT ORDER BASIC WRITE 7 P LDKL A4,/101 HOME POSITION 7 P ST A4,DWT
0x32e828…32e9bc Dummy {f00=0x011f, f01=0x018e, f02=» 7 P* 8 P EJECT 8 P* 8 P* GRAPHIC PART 8 * P* 8 D PADY500 EQU * 8 N P LDK A2,/11 8 b ( P CF A5,OUTPUT SWITCH TO GRAFIC MODE 8 v & PADY510 CF A15,GETCHR GET CHARACTER 8 P LDR A1,A1 BUFFER EMPTY 8 P RB(E) ADY400 8 P LDR A
0x32e9bc…32eb50 Dummy {f00=0x011f, f01=0x0190, f02=» 8 t P* 9 P* ADDRESS MESSAGE 9 P* 9 . P* SET FIRST OUT PUT IN A2 9 8 P* AND SECOND IN A4 9 P* 9 z P SLL A1,4 9 P LDR A4,A2 9 P SRL A4,4 9 P ORR A4,A1 9 P ANK A2,/F 9 P ANK A4,/7F 9 P ORK A2,/20 9 , PAD
0x32eb50…32ece4 Dummy {f00=0x011f, f01=0x0190, f02=»Y510 9 P EJECT : P* : P* DATA MESSAGE : $ P* : > " P* FIRST OUTPUT IS SET IN A2 : H P* AND SECOND IN A4 : n P* : PADY530 SLL A1,13 : P LDR A4,A2 : P SLL A2,5 : P ORR A1,A2 : P LDK A7,10 : P LDK A2,0 : P
0x32ece4…32ee78 Dummy {f00=0x011f, f01=0x0190, f02=»ADY540 : PADY560 LDR A4,A2 ; P SRL A4,4 ; & P ANK A4,/3F ; 8 P ANK A2,/F ; L P ORK A2,/60 ; ^ P RB ADY515 ; r P* ; P XIF ; P* ; P EJECT ; P* ; , P* UPDAPP = SUBROUTINE TO UPDATE HEAD ; , P* POSITION POINT
0x32ee78…32f00c Dummy {f00=0x011f, f01=0x0190, f02=»DWTAP,A6 UPDATE HEAD POSITION POINTER ; P LDK A3,0 < . , P SC A3,DWTBC,A6 RESET POSITION COUNTER < @ P RTN A15 < p P* < 6 P* POSUPD = SUBROUTINE TO UPDATE ACTUAL POSITION < 0 P* POINTER WHEN REQUEST RUNNING. < > P* A
0x32f00c…32f1a0 Dummy {f00=0x011f, f01=0x0190, f02=» < 2 P AD A2,DWTAP,A6 INCLUDE HEAD POSITION POINTER = P ANK A2,/FF = > " P CC A2,DWTPOS,A6 END OF ROW ? = R P RF(P) POSU10 = x , P IM DWTST,A6 INCREMENT POSITION COUNTER = PPOSU10 RTN A15 = P EJECT = P* = P* I H D Y = P* =
0x32f1a0…32f334 (3, 233) Dummy {f00=0x0141, f01=0x0190, f02=»F(N) IHDY10 = . P LDR A1,A1 RETURN CODE FROM CHANNEL UNIT ? > P RB(NE) ADY420 YES > F 4 PIHDY10 ABL LDREG RELOAD A3-A5 AND RETURN VIA A5 > ` P EJECT > P* > P* R C D Y > P* > ( P* RCDY = RECOVERY ROUTINE DISPLAY > P* > P* >
0x32f334…32f4c8 Dummy {f00=0x0141, f01=0x0190, f02=»T-ADDRESS > P* A7 = ORDER ? P* A8 = ECB-ADDRESS ? * PRCDY EQU * ? H P IFT CPU852=1 ? Z & P CF A15,SAVE8 SAVE A1-A8 ON STACK ? p P XIF ? P* ? P IFT CPU852=0 ? " P MSR 8,A15 SAVE A1-A8 ON STACK ? P XIF ? P* ? P =3
0x32f4c8…32f65c Dummy {f00=0x0141, f01=0x0190, f02=» =1 ? P =1 @ P =1 @ P* @ ( P IFT WHATDY=0 @ 2 P* @ H " P LDR* A2,A6 CHANNEL PARAMETER @ R " P ANK A2,/10 GRAPHIC DISPLAY ? @ x P RF(E) RCDY10 NO @ . P LDK A2,RETURN RETURN TO ALPHANUMERIC MODE @ P CF A5,OUTPUT @ P* @ P
0x32f65c…32f7f0 Dummy {f00=0x0141, f01=0x0190, f02=»BLOCK ? @ x P RF(NE) RCDY20 A P IFT WHATDY=0 =1 A & P IFF STEADY+COUNTRY=0 =1 A @ * P LDR* A2,A6 GET CHANNEL PARAMETERS =1 A b " P ANK A2,/20 PTS 6385/6386 ? =1 A P RF(Z) RCDY14 NO =3 A * P LDK A3,100 SET UP TRANSFER COUNTER =3 A 4 PRCDY12 L
0x32f7f0…32f984 Dummy {f00=0x0141, f01=0x0190, f02=» SUK A3,1 DEC TRANSFER COUNTER =3 A , P RB(P) RCDY12 NOT ENOUGH OF TRANSFERS =3 B * . P LDK A2,CTYCOD SEND 'SET COUNTRY CODE' =1 B Z P CF A5,OUTPUT =1 B * P LDK A2,COUNTRY SEND 'COUNTRY CODE' =1 B P ORK A2,/30 =1 B P CF A5,OUTPUT =1 B P
0x32f984…32fb18 Dummy {f00=0x0141, f01=0x0190, f02=» HOME B x P CF A5,OUTPUT SEND C P LDKL A2,/101 C ( 6 P ST A2,DWTAP,A6 SET HEAD LINE-AND-POSITION COUNTER C > P LDR A3,A3 GET OLD STATUS C x P RB(N) ENDIO NOT BUSY C " P LDK A1,OPERR SET RETURN CODE C PRCDY15 ABL ADY420 C P EJECT C P*
0x32fb18…32fcac Dummy {f00=0x0141, f01=0x0190, f02=» LDK A1,2 INDICATE THROUGHPUT ERROR C P RB RCDY15 D , & PRCDY25 LDK A2,STX START OF MESSAGE D > P CF A5,OUTPUT D h 4 P LC A4,DWTBC,A6 GET NUMBER OF POSITIONS TO BACK D ~ P ANK A4,/FF D P RF(E) RCDY30 D . P CF A5,BACCAN SEND BACKSPACES AND RUB OU
0x32fcac…32fe40 Dummy {f00=0x0141, f01=0x0190, f02=»CHODY = DEVICE-DEPENDENT ECHO-ROUTINE D P* E . PECHODY EQU * E 8 P LDR A7,A7 EOR? E L P RF(N) ECDY17 YES E d P LDR A3,A2 SAVE CHARACTER E ~ P* E P IFT EORECH=0 E P* E P SUK A2,/80 E $ P RF(NN) ECDY20 NOT TO BE ECHOED E P A
0x32fe40…32ffd4 (3, 234) Dummy {f00=0x0141, f01=0x0190, f02=»EAR E & PECDY10 CF A5,OUTPUT SEND CHARACTER F , P CF A15,POSUPD POSITION COUNTER UPDATING F 6 P RF ECDY20 F f 4 PECDY17 CF A15,UPDAPP UPDATE HEAD CURSOR POINTER F x ( PECDY20 ABL ECHRTN RETURN TO KEYBOARD F P* F P* BACKSPACE F P* F PEC
0x32ffd4…330168 Dummy {f00=0x0141, f01=0x0190, f02=» ONE BACKSTEP F ~ P CF A5,BACCAN BACK G P RB ECDY20 G 0 P EJECT G B P* G P P* CLEAR G Z P* G l PECDY50 EQU * G v ( P LC A4,DWTBC,A6 GET POSITION COUNTER G P ANK A4,/FF G P RB(E) ECDY20 FIRST POSITION G P IFT WHATDY=0 G & P LDR
0x330168…3302fc Dummy {f00=0x0141, f01=0x0190, f02=» P XIF H * PECDY60 LDR A3,A4 SAVE POSITION COUNTER H 6 P LD A4,DWTAP,A6 GET HEAD LINE-AND-POSITION COUNTER H > P CF A5,CURPOS SET CURSOR H x P LDR A4,A3 GET POS COUNTER H P ADK A4,1 UPDATE POS COUNTER H P LDK A3,/20 H P CF A5,FASTER FAST OUT
0x3302fc…330490 Dummy {f00=0x0141, f01=0x0190, f02=»CAN = SUBROUTINE TO POSITION CURSOR H 0 P* AT THE PLACE BEFORE REQUEST IF I , 0 P* CLEAR OR BACKWARDS ONE STEP IF I ` P* BACKSPACE. I P* I PBACCAN EQU * I P LDR A3,A4 I ( P LC A2,DWTBC,A6 GET POSITION COUNTER
0x330490…330624 Dummy {f00=0x0141, f01=0x0190, f02=» RF(NP) BACA10 NO I $ P LDK A2,SPACE DESTRUCTIVE SPACE J P RF BACA20 J B " PBACA10 LDK A2,BACKSP BACKSPACE J T P CF A5,OUTPUT SEND J z $ P LDK A2,SPACE DESTRUCTIVE SPACE J P CF A5,OUTPUT SEND J P LDK A2,BACKSP BACKSPACE J PBACA20 CF A5,OUTPU
0x330624…3307b8 Dummy {f00=0x0141, f01=0x018e, f02=» RTN A5 J P EJECT K 4 P*********************************************** K 4 P* CHECK = SUBROUTIN TO CHECK USER BUFFER IN * K V 4 P* ORDER TO GET A REASON FOR USING * K 4 P* 'FAST OUTPUT FACILITY' ON 6344 * K 4 P*
0x3307b8…33094c Dummy {f00=0x0141, f01=0x0190, f02=» K P LD A1,4,A8 L P SUR A1,A3 END OF BUFFER? L P ABL(NP) ACDY75 YES! L > , P LDR A7,A2 SAVE CHER TO SEND (AND CHECK) L Z ( P LDR A2,A4 SAVE BUFFER ADDRESS+INDEX L P LDK A4,1 RESET COUNTER L $ PNEXT ADK A4,1 INCREMENT COUNTER L P SUK A1,1
0x33094c…330ae0 Dummy {f00=0x0141, f01=0x0190, f02=»S! L POUT EQU * M 6 P CWK A4,EQU CONDITION FOR FAST OUTPUT FULLFILLED? M P RF(L) NOFAST NO! M V & P********************************** M p & P* UPDATE ACTUAL POSITION POINTER * M , PFASTOK LC A2,DWTBC,A6 GET HEAD POSITION M P AD A2,DWTAP,A6 M
0x330ae0…330c74 (3, 235) Dummy {f00=0x0141, f01=0x0190, f02=»/LINE M j P SUR A3,A2 AND COMPARE N P SUR A3,A4 N , P RF(NN) HIT N > P ADR A4,A3 N R P ADK A4,1 N d ( PHIT ADS A4,DWTST,A6 UPDATE POSITION N v P*********************** N P* EXECUTE FAST OUTPUT * N P LDR A3,A7 GET CHAR TO SEND N P C
0x330c74…330e08 Dummy {f00=0x0141, f01=0x0190, f02=»6 INC HEAD POS POINTER N P CF A5,CURPOS O " P***************************** O 4 " P* RESTORE A3 (BUFFER INDEX) * O Z * P LD A3,DWTBIN,A6 RESTORE BUFFER INDEX O P SUK A3,1 O P ABL ACDY90 READ NEXT CHAR O P* O . PNOFAST LDR A2,A7 RESTORE OUT
0x330e08…330f9c Dummy {f00=0x0141, f01=0x0190, f02=» 4 P* AT ENTRY A4 = NUMBER OF CHARACTERS P P* P < PFASTER EQU * P F P CWK A4,/60 P Z . P RF(L) FAS010 NUMBER OF CHAR NOT TOO LONG P n P LDK A4,/59 P PFAS010 EQU * P P ADK A4,/20 ADD CONSTANT P P LDK A2,FASTO FAST OUTPUT P
0x330f9c…331130 Dummy {f00=0x0141, f01=0x0190, f02=» P P EJECT Q P* Q P* Q * P* CURPOS = SUBROUTINE TO SET CURSOR Q * > P* AT ENTRY A4 = CURSOR POS (POSITION AND LINE) Q X P* Q PCURPOS EQU * Q P ADKL A4,/1F1F CONVERT Q P LDK A2,SCADD SET CURSOR Q P CF A5,OUTPUT SEND
0x331130…3312c4 Dummy {f00=0x0141, f01=0x018e, f02=»A4 Q & P CF A5,OUTPUT OUTPUT POSITION (X) R P LDR A2,A4 R 4 P RF(NN) CURR10 Y < /80! R F P LDK A2,/7F R f P RF CURR15 R z PCURR10 EQU * R P SRL A2,8 SHIFT RIGHT R PCURR15 EQU * R P CF A5,OUTPUT OUTPUT LINE(Y) R P RTN A5 R P E
0x3312c4…331458 Dummy {f00=0x0141, f01=0x0190, f02=» R 0 P* AT ENTRY A4 = CHAR TO ERASE FROM USER =2 S . P* AT EXIT A4 = CHAR TO END OF SCREEN =2 S < P* =2 S n PERA EQU * =2 S | " P LD A2,DWTPOS,A6 MAX CHAR. =2 S P ANK A2,/FF GET MAX CHAR. =2 S 0 P LC A3,DWTAP+1,A6 CURRENT POS. ON SCREEN =2
0x331458…3315ec Dummy {f00=0x0141, f01=0x4144, f02=»SIDE SCREEN =2 S P RF(L) ERAEND NO =2 T . P LDR A4,A2 OUTSIDE SCREEN MODIFY LENGTH =2 T 2 P LDKL A3,/FFFF SET OVER =4 T d " PERAEND EQU * END SUBROUTINE =2 T P RTN A5 RETURN =2 T PABDY EQU * T , P CF A15,UPDAPP UPDATE CURSOR POSITION =5 T ( P
0x3315ec…331780 Dummy {f00=0x0141, f01=0x2008, f02=» U NE) BACA10 7 P NGR A3,A3 NEGATE REGISTER 7 , P ADS A3,DWTST,A6 UPDATE POSITION COUNTER 7 < P RTN A5 7 l P END 7 |@ 7 6 t P* 6 PBACCAN EQU * 6 P LDR A3,A4 6 " PBACA10 LDK A2,BACKSP BACKSPACE 6 P CF A5,OUTPUT SEND 6 $ P LDK
0x331780…331914 (3, 236) Dummy {f00=0x0142, f01=0x0000, f02=»
[…0x7…]
0x332420…3325b4 (3, 237) Opaque[0x194]
0x3325b4…332748 # DirEnt {nam=»DRLT01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2400, f03=0x0000}
0x3325b4…332748 IdxSect {
0x3325b4…332748 f00 = 0x0120 // 0x3325b4 @0x0
0x3325b4…332748 f01 = 0x0014 // 0x3325b6 @0x2
0x3325b4…332748 gno = [ // 0x3325b8 @0x4
0x3325b4…332748 [0x00]: C0x0120.0x0.0
0x3325b4…332748 [0x01]: C0x0120.0x1.0
0x3325b4…332748 [0x02]: C0x0120.0x2.0
0x3325b4…332748 [0x03]: C0x0120.0x3.0
0x3325b4…332748 [0x04]: C0x0121.0x0.0
0x3325b4…332748 [0x05]: C0x0121.0x1.0
0x3325b4…332748 [0x06]: C0x0121.0x2.0
0x3325b4…332748 [0x07]: C0x0121.0x3.0
0x3325b4…332748 [0x08]: C0x0122.0x0.0
0x3325b4…332748 [0x09]: C0x0122.0x1.0
0x3325b4…332748 ]
0x3325b4…332748 }
0x332748…3328dc Dummy {f00=0x0120, f01=0x0190, f02=» 2 P IDENT DRLT01 REL 10.0 80-03-14 870105041000 P : & P =9,RTN FROM OUTLRT IN INH MODE B P PRR 10.1 79-09-03 l P =8,UPDATE TO 10.1 STATUS P REL 9.1 79-05-23 * P =7,CLT010 DUBLE DEF LABEL, RB - ABL P PRR 9.1 79-05-1
0x3328dc…332a70 Dummy {f00=0x0120, f01=0x0190, f02=» =1-4, GEN UPDATE TO 8.2+ STATUS P REL 8.2 79-04-02 ( P =4,TIMER RESET CORRECTED D P REL 8.2 79-03-22 h P =3,NAK HANDLING CORRECTED P REL 8.2 79-03-16 P =2,IMPROV. OF TEST ORDER P REL 8.2 79-01-11 , P =
0x332a70…332c04 Dummy {f00=0x0120, f01=0x0190, f02=»****************************** | P* & $ P* PHILIPS TERMINAL SYSTEM PTS 0 P* X $ P* DRLT01 = DRIVER CHANNEL UNIT b $ P* FOR LOCAL TERMINALS P* P* P* P* P* 2 P************************************
0x332c04…332d98 Dummy {f00=0x0120, f01=0x0190, f02=»GISTER A2. IF DATA d D P* INPUT OR DATA REQUEST A BRANCH IS MADE TO INTERRUPT HANDLER P* FOR ACTUAL DEVICE. b D P* IF CONTROL CHARACTER, THIS IS EXAMINED AND NECESSARY ACTIONS P* ARE CARRIED OUT. P* < P* THE DRIVER ALSO INCLUD
0x332d98…332f2c Dummy {f00=0x0120, f01=0x0190, f02=»TART ON EVERY CHLT IN SYSTEM t P* $ 2 P* CONTROL WORK TABLES FOR THE CHANNELS ARE . P* INCLUDED IN THE DRIVER. d P EJECT P* P* P* . P* NORMAL REGISTER USAGE IN THE DRIVER:- P* P* A1 = RETURN CODE
0x332f2c…3330c0 Dummy {f00=0x0120, f01=0x0190, f02=»WT-ADDRESS P* A7 = ORDER P* A8 = ECB-ADDRESS ( P* D P* N P* X P EJECT b P* p P*********** z P* ENTRIES * P*********** P* P* & P ENTRY CHLT1 INTERRUPT FROM CHLT01 & P ENTRY CHLT2 INTERRU
0x3330c0…333254 (3, 238) Dummy {f00=0x0120, f01=0x0190, f02=» p P ENTRY CHLTON START OF CHLT 0 P ENTRY LOCHAN NUMBER OF LOCAL CHANNEL UNITS , 0 P ENTRY RECHAN NUMBER OF REMOTE CHANNEL UNITS ` P ENTRY REMFC DUMMY ENTRY P ENTRY DWREMU DUMMY ENTRY P* P EJECT P* . P****************
0x333254…3333e8 Dummy {f00=0x0120, f01=0x018e, f02=» P* & P EXTRN SAVE8 SAVE REGISTERS A1-A8 P EXTRN TDISP DISPATCHER < P EXTRN IHRET8 RESTORE A1-A8 " P EXTRN INTLT1 INTERRUPT TABLE " P EXTRN INTLT2 INTERRUPT TABLE " P EXTRN INTLT3 INTERRUPT TABLE " P EXTRN INTLT4 INTERRUP
0x3333e8…33357c Dummy {f00=0x0120, f01=0x0190, f02=» . P EXTRN OUTLIN SEND CHAR. VIA SWITCH MODULE P* 6 P* @ ( P*********************************** J ( P* DWT PARAMETERS * v ( P*********************************** P EXTRN DWTST STATUS P EXTRN DWTOR ORDER ( P EXT
0x33357c…333710 Dummy {f00=0x0120, f01=0x0190, f02=»TPUT QUEUE & P EXTRN DWTSB2 STACK BASE 2 IN DWT P EXTRN DWTTP TIMER POINTER < 0 P EXTRN INTADR INTERRUPT ADDRESS DISPLACEMENT ^ 0 P EXTRN RECADR RECOVERY ADDRESS DISPLACEMENT P* P EJECT P P* P************* P*
0x333710…3338a4 Dummy {f00=0x0120, f01=0x0190, f02=» t PDRQTIM EQU 30 P* P EJECT ( P* 6 P************************ @ P* CONDITIONAL ASSEMBLY * ` P************************ P* < P* A LOGG FUNCTION OF EVERY INPUT AND OUTPUT CHARACTER 8 P* MAY BE INCLUDED TO THE DRI
0x3338a4…333a38 Dummy {f00=0x0120, f01=0x0190, f02=» ` . P* CHANNELS BY SETTING X:B TO 1,2,3 OR 4 P* : PX:B EQU 1 D PLOCHAN EQU 1 V P* j 8 P* ACKUMULATORS FOR NAK, RETRANSMISSION FAULT AND t 4 P* UNDEFINED CONTROL CHARACTERS ARE UPDATED IN 8 P* THE DRIVER. THIS FUNCTION C
0x333a38…333bcc Dummy {f00=0x0120, f01=0x0190, f02=»TTING X:D = 1 A SOFTWARE TIME OUT HANDLING < P* MISSING DATA REQUESTS FROM PRINTERS CAN BE INCLUDED 2 P* IN THE DRIVER. r < P* AN ACKUMULATOR TO BE UPDATED EVERY TIME A SOFTWARE * P* TIME OUT OCCURS IS ALSO INCLUDED. P* PX:
0x333bcc…333d60 Dummy {f00=0x0120, f01=0x0190, f02=»SET IS OBTAINED BY SETTING CPU852 EQU 0. P* 0 PCPU852 EQU 0 : P* N P EJECT X P f P n PRECHAN EQU 0 v PREMFC EQU 0 PCWTRT1 EQU * PCWTRT2 EQU * PCWTRT3 EQU * PCWTRT4 EQU * PCWTRT5 EQU * PCWTRT6
0x333d60…333ef4 (3, 239) Dummy {f00=0x0120, f01=0x0190, f02=»************************* t : P* C W T L T 1 * " : P***************************************************** ` P* 4 P* CONTROL WORK TABLE FOR LOCAL TERMINAL NO. 1 P* P* PDWA1 EQU /03 DEVICEA
0x333ef4…334088 Dummy {f00=0x0120, f01=0x0190, f02=»-CWTLT1 P DATA 0 LAST OUTPUT WORD * PCWTITA EQU *-CWTLT1 ADDRESS TO INTLT1 0 P DATA INTLT1 ^ PCWTINR EQU *-CWTLT1 INR r P INR A2,0,DWA1 PCWTOTR EQU *-CWTLT1 OTR P OTR A2,0,DWA1 " PCWTCIS EQU *-CWTLT1 CIO-START P CIO
0x334088…33421c Dummy {f00=0x0120, f01=0x0190, f02=» PCWTADD EQU *-CWTLT1 P* P IFT ACKMUL=1 * P* @ P DATA 0 NAK-ACKUMULATOR J $ P DATA 0 RETR. FAULT-ACKUMULATOR j , P DATA 0 UNDEFINED-INTERRUPT-ACKUMULATOR PACKTIM EQU *-CWTLT1 ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR
0x33421c…3343b0 Dummy {f00=0x0120, f01=0x0190, f02=» * : P***************************************************** . P* l 4 P* CONTROL WORK TABLE FOR LOCAL TERMINAL NO. 2 v P* PCWTLT2 EQU * P* P IFT LOCHAN=2 PDWA2 EQU /13 DEVICE ADDRESS
0x3343b0…334544 Dummy {f00=0x0120, f01=0x0190, f02=»DWA2 INR P OTR A2,0,DWA2 OTR P CIO A2,1,DWA2 CIO-START * " P DATA 0 RETRANSMISSION COUNTER J P DATA 0 END OF QUEUE p P* P IFT ACKMUL=1 P* P DATA 0 NAK-ACKUMULATOR $ P DATA 0 RETR. FAULT-ACKUMULATOR , P DATA 0 UN
0x334544…3346d8 Dummy {f00=0x0120, f01=0x0190, f02=»* P EJECT P XIF P IFT LOCHAN=3 $ PDWA2 EQU /13 DEVICE ADDRESS : P* ^ $ P DATA 0 LAST OUTPUT DWT-ADDRESS h P DATA 0 LAST OUTPUT WORD P DATA INTLT2 INTERRUPT TABLE P INR A2,0,DWA2 INR P OTR A2,0,DWA2 OTR P
0x3346d8…33486c Dummy {f00=0x0120, f01=0x0190, f02=» P DATA 0 NAK-ACKUMULATOR $ P DATA 0 RETR. FAULT-ACKUMULATOR $ , P DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR L ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR | P* P XIF P* P* P XIF P IFT LOCHAN=4 P* P* 6 P
0x33486c…334a00 Dummy {f00=0x0120, f01=0x0190, f02=»T-ADDRESS z P DATA 0 LAST OUTPUT WORD P DATA INTLT2 INTERRUPT TABLE 2 P INR A2,0,DWA2 INR V P OTR A2,0,DWA2 OTR p P CIO A2,1,DWA2 CIO-START " P DATA 0 RETRANSMISSION COUNTER P DATA 0 END OF QUEUE P* P IFT ACKMUL=1
0x334a00…334b94 (3, 240) Dummy {f00=0x0120, f01=0x0190, f02=»ATA 0 PRINTER TIMEOUT ACKUMULATOR P* * P XIF 4 P EJECT @ P* N P* X 6 P* CHANNEL UNIT WORK TABLE FOR LOCAL TERMINAL NO.3 b P* PCWTLT3 EQU * P IFT LOCHAN=3 PDWA3 EQU /23 DEVICE ADDRESS P* $ P DATA 0 LA
0x334b94…334d28 Dummy {f00=0x0120, f01=0x0190, f02=»A3 OTR P CIO A2,1,DWA3 CIO-START " P DATA 0 RETRANSMISSION COUNTER . P DATA 0 END OF QUEUE T P* p P IFT ACKMUL=1 z P* P DATA 0 NAK-ACKUMULATOR $ P DATA 0 RETR. FAULT-ACKUMULATOR , P DATA 0 UNDEFINED- INTERRUPT-ACKUMULAT
0x334d28…334ebc Dummy {f00=0x0120, f01=0x0190, f02=»E ADDRESS ~ P* $ P DATA 0 LAST OUTPUT DWT-ADDRESS P DATA 0 LAST OUTPUT WORD D P DATA INTLT3 INTERRUPT TABLE d P INR A2,0,DWA3 INR P OTR A2,0,DWA3 OTR P CIO A2,1,DWA3 CIO-START " P DATA 0 RETRANSMISSION COUNTER P DATA
0x334ebc…335050 Dummy {f00=0x0120, f01=0x0190, f02=» DATA 0 UNDEFINED- INTERRUPT-ACKUMULATOR ( P DATA 0 PRINTER TIMEOUT ACKUMULATOR 0 P* P XIF f P EJECT r P* 4 P* CONTROL WORK TABLE FOR LOCAL TERMINAL NO. 4 P* PCWTLT4 EQU * P* P* P IFT LOCHAN=4
0x335050…3351e4 Dummy {f00=0x0120, f01=0x0190, f02=»ERRUPT TABLE P INR A2,0,DWA4 INR P OTR A2,0,DWA4 OTR . P CIO A2,1,DWA4 CIO-START H " P DATA 0 RETRANSMISSION COUNTER h P DATA 0 END OF QUEUE P* P IFT ACKMUL=1 P* P DATA 0 NAK-ACKUMULATOR $ P DATA 0 RETR. FAULT-
0x3351e4…335378 Dummy {f00=0x0120, f01=0x0190, f02=» P EJECT P* 2 P********************************************** 2 P* C H T A B * V 2 P********************************************** P* 6 P* THIS TABLE HOLDS ADDRESSES OF CONTROLLER WORK 8 P*
0x335378…33550c Dummy {f00=0x0120, f01=0x0190, f02=»ABLE LENGTH P DATA CWTLT1 P DATA CWTLT2 * P IFT LOCHAN=3 > P DATA CWTLT3 T P XIF h P IFT LOCHAN=4 t P DATA CWTLT3 P DATA CWTLT4 P XIF PCHTABE EQU * END OF TABLE P* P* P* P* P
0x33550c…3356a0 Dummy {f00=0x0120, f01=0x0190, f02=»R CHLT l P* P* C H L T 1 P* INTERRUPT FROM CHLT1 . P* N P XIF X P IFT LOCHAN=2 d PCHLT3 EQU * z PCHLT4 EQU * P XIF P IFF LOCHAN=1 PCHLT1 EQU * $ P ST P,INTSAV SAVE LAST INTERRUPT P IFT CPU
0x3356a0…335834 (3, 241) Dummy {f00=0x0121, f01=0x0190, f02=»E A1-A8 ON STACK P XIF P* $ P IFF LOCHAN=1 . . P LDKL A5,CWTLT1 SET CWT-ADDRESS FOR CHLT1 D P RF CLT010 v P* P* C H L T 2 P* INTERRUPT FROM CHLT2 P* PCHLT2 EQU * $ P ST P,INTSAV SAVE LAST INTERRUPT
0x335834…3359c8 Dummy {f00=0x0121, f01=0x0190, f02=» MSR 8,A15 SAVE A1-A8 ON STACK P XIF & P* 2 P IFF LOCHAN=1 < . P LDKL A5,CWTLT2 SET CWT-ADDRESS FOR CHLT2 R P XIF P IFT LOCHAN=2 0 PCLT010 EX CWTINR,A5 EXECUTE INR-INSTRUCTION P* P XIF P* P IFT LOCHAN=3
0x3359c8…335b5c Dummy {f00=0x0121, f01=0x0190, f02=» $ P ST P,INTSAV SAVE LAST INTERRUPT P IFT CPU852=1 , & P CF A15,SAVE8 SAVE A1-A8 ON STACK B P XIF l P* x P IFT LOCHAN=3 P IFT CPU852=0 " P MSR 8,A15 SAVE A1-A8 ON STACK P XIF P* P IFT LOCHAN=3 . P LDKL A5
0x335b5c…335cf0 Dummy {f00=0x0121, f01=0x0190, f02=» P* ! P* ! P* C H L T 2 ! P* INTERRUPT FROM CHLT3 ! 2 P* ! R PCHLT3 EQU * ! $ P ST P,INTSAV SAVE LAST INTERRUPT ! p P IFT CPU852=1 ! & P CF A15,SAVE8 SAVE A1-A8 ON STACK ! P XIF ! P* ! P IFT LOCHAN=4 ! P IFT
0x335cf0…335e84 Dummy {f00=0x0121, f01=0x0190, f02=»CHLT3 ! l P RF CLT010 " P* C H L T 4 " P* INTERRUPT FROM CHLT4 " 6 P* " V PCHLT4 EQU * " ` $ P ST P,INTSAV SAVE LAST INTERRUPT " t P IFT CPU852=1 " & P CF A15,SAVE8 SAVE A1-A8 ON STACK " P XIF " P* " P IFT LOCHAN=4 " P
0x335e84…336018 Dummy {f00=0x0121, f01=0x0190, f02=»FOR CHLT4 " p $ PCLT010 EX CWTINR,A5 EXECUTE INR # P XIF # : P* # F P IFT LOCHAN=1 # P P* # f P* # p P* C H L T 1 # z P* # P* INTERRUPT FROM CHLT1 # P* # PCHLT1 EQU * # PCHLT2 EQU * # PCHLT3 EQU * # PCHLT4
0x336018…3361ac Dummy {f00=0x0121, f01=0x0190, f02=» # " P MSR 8,A15 SAVE A1-A8 ON STACK $ P XIF $ . P* $ : P IFT LOCHAN=1 $ D $ P LDKL A5,CWTLT1 GET CWT-ADDRESS $ Z $ P ST P,INTSAV SAVE LAST INTERRUPT $ P INR A2,0,DWA1 $ P* $ P XIF $ P* $ P IFT LOGING=1 $ . P CF A15,LOGG ** LO
0x3361ac…336340 Dummy {f00=0x0121, f01=0x018e, f02=»DK A1,0 RESET RETURN CODE $ P LDR A3,A2 INPUT WORD IN A3 % " P SRL A3,8 % F P LDR A4,A3 % X $ P ANK A3,/E 2 * LINE NUMBER IN A3 % j P SRL A4,3 % & P ANK A4,/E 2 * DEVICE NUMBER IN A4 % . P ABL(NE) CLT100 INPUT IS A DATA CHARACTER % P ANK A2,
0x336340…3364d4 (3, 242) Dummy {f00=0x0121, f01=0x0190, f02=» % z P* & P* & 0 P* CHECK QUEUE AND SEND IF SOMETHING THERE & P* & P & P LDR* A7,A5 LAST OUTPUT DWT IN A7 & Z P CMR A5 RESET LAST OUTPUT & P LD A6,CWTEQ,A5 OUTPUT QUEUE & P RF(E) CLT020 & P STR A2,A15 SAVE A2 & $ P LD A2,DWTOT
0x3364d4…336668 Dummy {f00=0x0121, f01=0x0190, f02=» & r P LDR* A2,A15 RELOAD A2 ' P EJECT ' & P* ' 4 P* ' > 2 P* CHECK CONTROL CHARACTER AND UPDATE ERROR- ' H 2 P* ACKUMULATORS IF NAK, RETRANSMISSION FAULT ' ~ ( P* OR UNDEFINED CONTROL CHARACTER ' P* ' PCLT020 EQU * ' P LDR A6,A7
0x336668…3367fc Dummy {f00=0x0121, f01=0x0190, f02=» ' P SUK A2,5 7 NAK ? =3 ( P RF(Z) CLT032 =3 ( $ P* ( > P IFT ACKMUL=1 ( H P* ( ^ P =1 ( h P =1 ( v P LDK A7,2 ( $ P SUK A2,/16 RETRANSMISSION FAULT ( P RF(E) CLT025 ( " P ADK A7,2 UNDEFINED INTERRUPT ( PCLT025 ADR A7,
0x3367fc…336990 Dummy {f00=0x0121, f01=0x0190, f02=»* ( P* ) 0 P* NAK, TIME-OUT, RETRANSMISSION FAULT OR ) $ P* UNDEFINED CONTROL CHARACTER ) H P* ) p : P* CHECK LAST OUTPUT AND TRY RECOVERY OF THAT DEVICE ) z 4 P* ONE TIME. IF NOT SUCCESS GO TO DRIVER WITH ) P* MESSAGE NOT OPERABL
0x336990…336b24 Dummy {f00=0x0121, f01=0x018e, f02=» ) b P RF(NE) CLT032 * 0 P LDKL A2,/1000 INDICATE RECOVERY TRIAL DONE * , P XRS A2,DWTST,A6 SET BIT IN STATUS WORD * R 0 PCLT030 LDK A3,2 INDICATE RECOVERY OF DEVICE * P LDK A4,1 =1 * P LDK A4,0 * P RF CPO025 * . PCLT032 LDK A1,NOERR INDI
0x336b24…336cb8 Dummy {f00=0x0121, f01=0x0190, f02=» * P* + B P* ERROR ACKUMULATOR AND RETRANSMISSION COUNTER IS UPDATED. + B P* LAST OUTPUT CHARACTER IS RETRANSMITTED BY CHANNEL DRIVER + X @ P* UP TO SIX TIMES AND IF STILL NO SUCCESS RETURN CODE NOT + , P* OPERABLE IS SENT TO DEVICE DRIVER
0x336cb8…336e4c Dummy {f00=0x0121, f01=0x0190, f02=» 2 P IM CWTRTC,A5 INCREMENT RETRANSMISSION COUNTER , P LD A4,CWTRTC,A5 GET COUNTER , : P SUK A4,7 SEVEN TIMES ? , ^ P RB(E) CLT015 =7(=3) , ~ * P LD A2,CWTLOW,A5 GET LAST OUTPUT WORD , P LDR A1,A5 , * P EX CWTOTR,A1 EXECUTE OTR-INSTRUCTION ,
0x336e4c…336fe0 Dummy {f00=0x0121, f01=0x0190, f02=»CT , P* - P* - P* ACK DATA = 07 - P* - > 2 P* SIMULATE DATA REQUEST IF RETURN CODE FROM - H . P* CHLT OR DEVICE WITHOUT DATA REQUEST, - ~ P* ELSE GO TO DISPATCHER - P* - PCLT040 EQU * - P LDKL A7,/EFFF - 6 P A
0x336fe0…337174 (3, 243) Dummy {f00=0x0121, f01=0x0190, f02=»A7,A6 DEVICE WITHOUT DATA REQUEST? - , P RF(N) CLT110 YES. SIMULATE DATA REQUEST . * P* . Z P IFF SOFTIM=1 . d P* . z PCLT062 EQU * . P RF EXIT . P* . P XIF . P* . P* . P IFT SOFTIM=1 . P* . P EJECT . P* .
0x337174…337308 Dummy {f00=0x0121, f01=0x0190, f02=» BLOCK . p P RF(E) CLT060 / P* / $ P* RESTART TIMER / . P* / H " P LDKL A3,-DRQTIM RESTART TIMER / R P ST* A3,DWTTP,A6 / x P RF EXIT / P* / P* START TIMER / P* / PCLT060 LDR A1,A6 PARAMETER / P LDKL A4,DWTTP TIMER POINT
0x337308…33749c Dummy {f00=0x0121, f01=0x0190, f02=»AND DELAY / ` PCLT062 EQU * 0 P RF EXIT 0 & P 0 6 P EJECT 0 > P* 0 L P* 0 V P* RESET TIMER IF STARTED 0 ` P* 0 P =4 0 P =4 0 P =4 0 P =4 0 P =4 0 P EJECT 0 P* 0 6 P* TIME-OUT ROUTINE HANDLI
0x33749c…337630 Dummy {f00=0x0121, f01=0x0190, f02=»ET POINTER TO TIMER BLOCK 0 P LD A3,DWTST,A6 1 " P SLL A3,2 ECHO MODE ? 1 : P RF(N) CLT110 YES 1 X P* 1 r P IFT ACKMUL=1 1 | P IFF LOCHAN=1 1 P* 1 " P LDR* A5,A6 CHANNEL PARAMETER 1 P ANK A5,/F 1 P SLL A5,1 2 * INDEX 1 ( P A
0x337630…3377c4 Dummy {f00=0x0121, f01=0x0190, f02=» XIF 1 P IFT SOFTIM=1 2 P IFT ACKMUL=1 2 " P IFT LOCHAN=1 2 8 P* 2 N $ P LDKL A5,CWTLT1 GET CWT-ADDRESS 2 X ( P IM ACKTIM,A5 INCREMENT ACKUMULATOR 2 P* 2 P XIF 2 P IFT SOFTIM=1 2 P* 2 $ P LD A7,DWTOR,A6 TEST ORDER ? =2 2
0x3377c4…337958 Dummy {f00=0x0121, f01=0x0190, f02=» P* 3 P XIF 3 P* 3 P EJECT 3 $ P* 3 2 P* POWER ON DATA = 03 3 < P* 3 ^ 6 P* RECOVERY ROUTINES ARE STARTED FOR EVERY DEVICE 3 h 6 P* ON ACTUAL LINE EXCEPT THOSE OCCUPYING CHANNEL 3 $ P* UNIT OR THOSE IN ECHO MODE. 3 P* 3
0x337958…337aec Dummy {f00=0x0121, f01=0x0190, f02=»* A7 = ORDER 3 P* 4 PCHPOWO EQU * 4 " P CF A15,GETLIN 4 6 $ P LDR* A2,A5 GET LAST OUTPUT DWT 4 L . P CM CWTRTC,A5 RESET RETRANSMISSION COUNTER 4 t P LDK A4,0 4 P LDR A3,A6 DEVICE COUNTER 4 P LDR A1,A8 ADDRESS POINTER 4 $ P RF(Z) EXIT
0x337aec…337c80 Dummy {f00=0x0121, f01=0x0190, f02=»F(N) CPO030 4 P SLC A6,1 5 " P LCR A7,A6 LEFT BYTE OF DWTCHP 5 & P ANK A7,1 INPUT DEVICE ? 5 L P RF(NE) CPO025 YES 5 l P LDKL A7,/EFFF 5 ( P ANS A7,DWTST,A6 RESET RECOVERY BIT 5 P LC A7,DWTST,A6 5 P ANK A7,/20 ECHO MODE ? 5 P RF(NE)
0x337c80…337e14 (3, 244) Dummy {f00=0x0121, f01=0x0190, f02=»ESSBLOCK IN A7 5 j . P LD A7,RECADR,A7 ADDRESS TO RECOVERY IN A7 6 P RF(E) CPO030 NO RECOVERY 6 H P LDKL A5,DWTSB2 STACKBASE 6 j P ADR A5,A6 6 P INH 6 & P CFR A15,A7 GO TO RECOVERY ROUTINE 6 ( PCPO030 SUK A3,2 ALL DEVICES THREATED 6 P 6 P
0x337e14…337fa8 Dummy {f00=0x0121, f01=0x0190, f02=»F A15,GETLIN GET DWT-ADDRESS 6 P SUR A6,A4 VALID INTERRUPT ? 7 $ P RB(N) EXIT 7 H P LDR A8,A8 7 P RB(Z) EXIT EXIT NOT DEFINED 7 n P LDR* A6,A8 GET DWT 7 P RB(E) EXIT 7 P ANKL A6,/FFFE 7 . P LCR A7,A6 LEFT BYTE IN CHANNEL PARAMETER 7
0x337fa8…33813c Dummy {f00=0x0121, f01=0x0190, f02=»OR,A6 SET ORDER IN A7 7 P ANK A7,/FF 8 * P LD A8,DWTECB,A6 AND ECB-ADDRESS IN A8 8 2 P IFT SOFTIM=1 8 ` * P LC A3,DWTOCH,A6 GET LAST CHARACTER =4 8 v P ANK A3,/7F =4 8 * P SUK A3,DUMMSP SPECIAL DUMMY=ETX ? =4 8 P RF(NE) CLT120 NO =4 8 $ P L
0x33813c…3382d0 Dummy {f00=0x0121, f01=0x0190, f02=»E) CLT120 NO =4 8 P INH =4 9 P CM* DWTTP,A6 RESET TIMER =4 9 * 2 P CM DWTTP,A6 RESET ADDRESS POINTER TO TIMER =4 9 N PCLT120 EQU * =4 9 P XIF 9 4 P LD A3,DWTADR,A6 ADDRESS TO ADDRESS-BLOCK IN A3 9 P ENB 9 * P ABI INTADR,A3 GO TO INTERRU
0x3382d0…338464 Dummy {f00=0x0121, f01=0x0190, f02=»:- 9 f P* : ( P* A1 = ERROR CODE (A1=0 NOERROR) : B P* (A1=1 NOT OPERABLE , HARDWARE TIME-OUT) : @ P* A6 = DWT-ADDRESS : P* : P* A7 = ORDER : P* : P* A8 = ECB-ADDRESS : P EJECT : P* : P* G E
0x338464…3385f8 Dummy {f00=0x0121, f01=0x0190, f02=» P* ; P* ON ENTRY:- ; P* ; $ P* A3 = LINE NUMBER * 2 ; . P* A4 = DEVICE NUMBER * 2 ; N P* ; p P* ON EXIT:- ; z P* ; 6 P* A6 = TOTAL NUMBER OF DEVICES*2 ON ACTUAL LINE ; < P* A8 = ADDRESS IN 'INTLTX' WHERE DWT-ADDRESS IS FO
0x3385f8…33878c Dummy {f00=0x0121, f01=0x018e, f02=»8,A3 POSITION IN TABLE ; , P LDR* A8,A8 ADDRESS TO TERMINAL SECTION < ( P RF(Z) GTL010 RETURN IF NOT DEFINED < N P LDR* A6,A8 GET ID-WORD < z , P ANK A6,/FF TWO TIMES NUMBER OF DEVICES < 4 P ADR A8,A4 ADDRESS TO DEVICE WORK TABLE POSITION < PGTL010
0x33878c…338920 Dummy {f00=0x0121, f01=0x0190, f02=» P* = : P* SUBROUTINE TO SEND ONE CHARACTER VIA CHANNEL UNIT. = P* = L < P* CHARACTER GIVEN IN A2 IS SENT VIA CHLT IF CONTROL = V 8 P* UNIT IS FREE. IN OTHER CASE DWT IS QUEUED ON A = P* OUTPUT QUEUE THREAD. = P* = P* ON E
0x338920…338ab4 (3, 245) Dummy {f00=0x0122, f01=0x0190, f02=» = P IFF LOCHAN=1 > P* > " P LDR* A1,A6 CHANNEL PARAMETER > ( P ANK A1,/F CHANNEL INDEX > N P SLL A1,1 > n P ADK A1,2 > * P LD A1,CHTAB,A1 GET CWT-ADDRESS IN A1 > P* > P XIF > P* > P* > P IFT LOCHAN=1 > P* >
0x338ab4…338c48 Dummy {f00=0x0122, f01=0x0190, f02=»0 YES > P EJECT ? P* ? P* QUEUE OUTPUT ? & P* ? @ & POUL005 LD A4,CWTEQ,A1 OUTPUT QUEUE ? J P RF(E) OUL020 ? t POUL010 CWR A6,A4 ? . P RF(E) OUL060 THIS DWT IS ALREADY IN QUEUE ? P LD A3,DWTOTQ,A4 ? & P RF(E) OUL030 END OF THREAD
0x338c48…338ddc Dummy {f00=0x0122, f01=0x0190, f02=»A6,DWTOTQ,A4 QUEUE DWT ? * POUL040 CM DWTOTQ,A6 SET END OF THREAD @ P RF OUL060 @ L P EJECT @ ^ P* @ l P* SEND CHARACTER @ v P* @ , POUL050 LDR* A3,A6 GET CHANNEL PARAMETERS @ P ANKL A3,/7F00 @ P ANK A2,/FF @ P ORR A2,A3 @ P
0x338ddc…338f70 Dummy {f00=0x0122, f01=0x0190, f02=»ING=1 @ 0 P CF A15,LOGG ** LOGG OF OUTPUT CHARACTER ** A P XIF A B 4 P ST A2,CWTLOW,A1 STORE LAST OUTPUT IN CWT =6(=3) A N 8 POUL060 SC A2,DWTOCH,A6 STORE OUTPUT CHARACTER IN DWT A POUL070 EQU * A P IFT CPU852=1 A ( P ABL IHRET8 RESTORE A1-A8 AN
0x338f70…339104 Dummy {f00=0x0122, f01=0x0190, f02=»...ADJUST STACK POINTER... =9 A P LDR* P,A15 ...AND RETURN =9 B & P XIF B J P* B V P EJECT B ` P* B n P* C H L T O N B x P* B > P* SUBROUTINE TO RESET CWT AND PERFORM CIO-START OF EVERY B @ P* CHLT IN SYSTEM. THE SUBROUTINE IS ENTERE
0x339104…339298 Dummy {f00=0x0122, f01=0x0190, f02=»TREATED ? B | P RF(NZ) CON020 NO TAKE NEXT C P ABL RTNA15 RETURN AND ENB C 6 * PCON020 LD A5,CHTAB,A1 LOAD CWT-ADDRESS C X P RB(Z) CON010 C $ P EX CWTCIS,A5 EXECUTE CIO-START C P LDR* A6,A5 GET LAST DWT C P RB(Z) CON010 C P CMR A5 RESET
0x339298…33942c Dummy {f00=0x0122, f01=0x0190, f02=»* C P IFT LOCHAN=1 D P* D P CIO A2,1,DWA1 CIO-START D * P LD A6,CWTLT1 GET LAST DWT D J P RF(Z) CON010 D l P CM CWTLT1 RESET LAST OUTPUT D P LDK A2,0 D " P CF A15,OUTLIN SEND CHARACTER D $ PCON010 ABL RTNA15 RETURN AND ENB D P*
0x33942c…3395c0 Dummy {f00=0x0122, f01=0x0190, f02=»INPUT AND D f $ P* OUTPUT CHARACTER ARE LOGGED E P* E : P* E D P* E N P IFT LOGING=1 E X P* E n PLOGG STR A1,A15 E x P LD A1,POINT E P ADK A1,2 E & P CWK A1,BUFE BUFE IS MAX LOGG AREA E P RF(NE) L1 E ( P LDKL A1,BUF SET FIRST
0x3395c0…339754 (3, 246) Dummy {f00=0x0122, f01=0x40b8, f02=»DR* P,A15 RETURN E P* F P* F " PPOINT DATA BUF LOGG POINTER F , P* F P PBUF RES 63 LOGG AREA F Z PBUFE EQU * F v P* F P XIF F P* F P END F @ F
0x339754…3398e8 Dummy {f00=0x0122, f01=0x2008, f02=» G PPOINT DATA BUF LOGG POINTER 9 P* 9 2 PBUF RES 63 LOGG AREA 9 < PBUFE EQU * 9 X P* 9 j P XIF 9 t P* 9 P END 9 @ 9 A1,BUFE BUFE IS MAX LOGG AREA 8 P RF(NE) L1 8 ( P LDKL A1,BUF SET FIRST LOGG ADDRESS 8 PL1 ST A1,P
0x3398e8…339a7c Dummy {f00=0x0122, f01=0x0190, f02=» P RB ECDY20 H P XIF H * PECDY60 LDR A3,A4 SAVE POSITION COUNTER H " 6 P LD A4,DWTAP,A6 GET HEAD LINE-AND-POSITION COUNTER H P P CF A5,CURPOS SET CURSOR H P LDR A4,A3 GET POS COUNTER H P ADK A4,1 UPDATE POS COUNTER H P LDK A3,/20 H P CF
0x339a7c…339c10 Dummy {f00=0x0122, f01=0x0190, f02=»* H 0 P* BACCAN = SUBROUTINE TO POSITION CURSOR I 0 P* AT THE PLACE BEFORE REQUEST IF I > 0 P* CLEAR OR BACKWARDS ONE STEP IF I r P* BACKSPACE. I P* I PBACCAN EQU * I P LDR A3,A4 I ( P LC A2,DWTBC,A6 GE
0x339c10…339da4 Dummy {f00=0x0122, f01=0x0190, f02=»T POSITION I | P RF(NP) BACA10 NO J $ P LDK A2,SPACE DESTRUCTIVE SPACE J , P RF BACA20 J T " PBACA10 LDK A2,BACKSP BACKSPACE J f P CF A5,OUTPUT SEND J $ P LDK A2,SPACE DESTRUCTIVE SPACE J P CF A5,OUTPUT SEND J P LDK A2,BACKSP BACKSPACE J P
0x339da4…339f38 Dummy {f00=0x0122, f01=0x0190, f02=»ON COUNTER J r P RTN A5 K P EJECT K " 4 P*********************************************** K 0 4 P* CHECK = SUBROUTIN TO CHECK USER BUFFER IN * K h 4 P* ORDER TO GET A REASON FOR USING * K 4 P* 'FAST OUTPUT FACILITY' ON 6344 *
0x339f38…33a0cc Dummy {f00=0x0122, f01=0x018e, f02=» P* L P* L P LD A1,4,A8 L P SUR A1,A3 END OF BUFFER? L , P ABL(NP) ACDY75 YES! L N , P LDR A7,A2 SAVE CHER TO SEND (AND CHECK) L j ( P LDR A2,A4 SAVE BUFFER ADDRESS+INDEX L P LDK A4,1 RESET COUNTER L $ PNEXT ADK A4,1 INCREMENT COUNTER L
0x33a0cc…33a260 Dummy {f00=0x0122, f01=0x0190, f02=» P RB(E) NEXT YES! M POUT EQU * M 6 P CWK A4,EQU CONDITION FOR FAST OUTPUT FULLFILLED? M . P RF(L) NOFAST NO! M h & P********************************** M & P* UPDATE ACTUAL POSITION POINTER * M , PFASTOK LC A2,DWTBC,A6 GET HEAD POSITION M P A
0x33a260…33a3f4 (3, 247) Opaque[0x194]
0x33a3f4…33a588 # DirEnt {nam=»DRSOP1«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2450, f03=0x0000}
0x33a3f4…33a588 IdxSect {
0x33a3f4…33a588 f00 = 0x0122 // 0x33a3f4 @0x0
0x33a3f4…33a588 f01 = 0x000a // 0x33a3f6 @0x2
0x33a3f4…33a588 gno = [ // 0x33a3f8 @0x4
0x33a3f4…33a588 [0x00]: C0x0122.0x2.0
0x33a3f4…33a588 [0x01]: C0x0123.0x0.0
0x33a3f4…33a588 [0x02]: C0x0123.0x1.0
0x33a3f4…33a588 [0x03]: C0x0123.0x2.0
0x33a3f4…33a588 [0x04]: C0x0123.0x3.0
0x33a3f4…33a588 ]
0x33a3f4…33a588 }
0x33a588…33a71c Dummy {f00=0x0122, f01=0x018e, f02=» 2 P IDENT DRSOP1 REL 10.0 80-03-14 870105041000 P : P* B P* L @ P************************************************************ V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 2 P* DRSOP1 = DRIVER FOR SYSTEM OPERATORS PANEL
0x33a71c…33a8b0 Dummy {f00=0x0122, f01=0x0190, f02=» P* B P* THIS DRIVER HANDLES INPUT AND OUTPUT ON SYSTEM OPERATOR'S , P* PANEL CONNECTED TO CPU VIA CHCR-SOP X P* P* > P* ON AN INPUT REQUEST THE DEVICE SOFTWARE STATUS IS SET : P* 'BUSY' UNTIL THE INPUT INTERRUPT IS TA
0x33a8b0…33aa44 Dummy {f00=0x0122, f01=0x0190, f02=»ING READ REQUEST,POWER UP r > P* IS INDICATED AND NEXT READ REQUEST IS TERMINATED WITH " P* -2 IN CONTROL WORD d P* P* > P* ON AN OUTPUT REQUEST THE DEVICE SOFTWARE STATUS IS SET > P* 'READY' IMMEDIATELY, SINCE THE OUTPUT DOES N
0x33aa44…33abd8 Dummy {f00=0x0122, f01=0x0190, f02=» ` P* ( P* S O P A S : READ SWITCHES ENTRY P* > * P* S O P A L : ACTIVATE LIGHTS ENTRY H P* v & P* I H S O P : INTERRUPT HANDLER P* " P* S O P R : RECOVERY ROUTINE P* P* P* * P* THE FOLLOWIN
0x33abd8…33ad6c Dummy {f00=0x0122, f01=0x018e, f02=»IGHTS OFF z , P* 39 : WRITE FLASHING LIGHTS P* B P* NORMAL REGISTER USAGE: L P* n " P* REGISTER A1: INPUT/OUTPUT x " P* A2: WORK REGISTER " P* A3: WORK REGISTER " P* A4: WORK REGISTER
0x33ad6c…33af00 Dummy {f00=0x0122, f01=0x0190, f02=» r P* P* P EJECT P* * P************ 4 P* ENTRIES: * H P************ P* p P* z * P ENTRY SOPCT S.O.P. CHANNEL UNIT TABLE ( P ENTRY SOPR S.O.P. RECOVERY ROUTINE 2 P ENTRY IHSOP S.O.P. INTERRUPT HANDLER (ALI
0x33af00…33b094 (3, 248) Dummy {f00=0x0123, f01=0x0190, f02=»**** P* EXTERNALS: * P************** " P* 8 P* TOSS GLOBALS: B P* Z , P EXTRN SAVE8 PUSH REGS A1-A8 ONTO STACK d 4 P EXTRN DISIOE DISPATCHER I/O REQUEST ERROR ENTRY & P EXTRN TDISP DISPATCHER LKM ENTRY . P EXTRN RETUR8 POP
0x33b094…33b228 Dummy {f00=0x0123, f01=0x018e, f02=»I DATA SOP LIGHTS AND FD POWER P EJECT & P 4 P* < ( P************************************ F P* r P* DWT DISPLACEMENTS | P* ( P************************************ P* $ EXTRN DWTCHP CHANNEL PARAMETER EXTRN
0x33b228…33b3bc Dummy {f00=0x0123, f01=0x0190, f02=» EXTRN DWTTAB TTAB ADDRESS * % EXTRN DWTWAT WAIT/ACTIVATE INDICATOR & EXTRN DWTTQ TERMINAL QUEUE T . P EXTRN INTSAV SAVE AREA FOR LAST INTERRUPT x ( P EXTRN ECBEL EFFECTIVE LENGTH IN ECB " P EXTRN ECBCW ECB CONTROL WORD PTIME EQU 5 F
0x33b3bc…33b550 Dummy {f00=0x0123, f01=0x0190, f02=» P PX:A EQU 0 PSOPX EQU 0 " P** 4 P** > 8 P* THIS DRIVER CAN BE MADE TO HANDLE CREDIT ORDERS H P* BY SETTING CREDIT = 1 4 P* ORDERS 05 AND 06 ARE THEN REPLACED BY ORDERS P* /37 AND /38 RESPECTIVLY B P* BY
0x33b550…33b6e4 Dummy {f00=0x0123, f01=0x0190, f02=»N ZERO IS STORED IN THE CONTROL WORD z P* OF THE ECB. , P** D P N PCREDIT EQU 1 V P** j P** t @ P* THE ORDER /39, WRITE FLASHING LIGHTS CAN BE INCLUDED BY ~ P* SETTING X:B=1 P* PX:B EQU 0 PWRFLA EQU 0
0x33b6e4…33b878 Dummy {f00=0x0123, f01=0x0190, f02=» EQU 1 P* P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION " . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* PCPU852 EQU 0 P* PDVBLEN EQU 0 MMU BUFFER SIZE " PDEVIND EQU -2 SOP DEVICE INDEX P*
0x33b878…33ba0c Dummy {f00=0x0123, f01=0x018e, f02=» P XIF P* P IFT MMUPAG=1 PSTART EQU DWTDRD+4 4 P XIF N P* Z & PDWTTP EQU START+/00 TIMER POINTER d P* P EJECT P* P************************** P* S.O.P. DEVICE ADDRESS: * P********************
0x33ba0c…33bba0 Dummy {f00=0x0123, f01=0x0190, f02=» " P* * " P* S.O.P. CHANNEL UNIT TABLE * * " P* * P " P****************************** v P* P* 0 PSOPCT EQU * TABLE STARTS WITH ADDRESS BLOCK: P* P DATA DVBLEN MMU BUFFER SI
0x33bba0…33bd34 (3, 249) Dummy {f00=0x0123, f01=0x0190, f02=»TCHES ENTRY x " P DATA 0 ABORT ROUTINE ADDRESS P* : P DATA DVBLEN MMU BUFFER SIZE D P DATA DEVIND DEVICE INDEX h & PSOPADU EQU * ACTIVATE LIGHTS ENTRY P* & P DATA SOPAL ACTIVATE LIGHTS ENTRY " P DATA 0 ABORT ROUTINE ADDRESS
0x33bd34…33bec8 Dummy {f00=0x0123, f01=0x0190, f02=» " P* * " P* S.O.P. ACTIVATION ROUTINE: * * " P* * P " P****************************** v P* > P* THE ORDER IS ANALYZED AND THE CORRESPONDING I/O ACTION P* IS CARRIED OUT. P*
0x33bec8…33c05c Dummy {f00=0x0123, f01=0x0190, f02=» P* * P RF(NZ) SOPER ERROR IF NOT READ ORDER P* < P* INPUT SWITCH VALUE F P* d * PSOPIN LDR* A2,A6 POWER UP INDICATION ? n P IFT CREDIT=0 P RF(Z) EXIT NO $ P CMR A6 YES CLEAR FOR NEXT REQ. P XIF P IFT CREDIT=
0x33c05c…33c1f0 Dummy {f00=0x0123, f01=0x0190, f02=»HANGES OF S.O.P. LIGHTS P* & PSOPAL EQU * ACTIVATE LIGHTS ENTRY * P* T P LD A3,10,A8 CHANGED LIGHTS ^ , P ANKL A3,/07FF BITS 5-15 CONTROLS LIGHTS P* P LDR A4,A7 COPY ORDER P IFT WRFLA=1 P CCK A4,/3939 P RF(
0x33c1f0…33c384 Dummy {f00=0x0123, f01=0x0190, f02=»/37 P XIF & P RF(Z) SOPON IF SO, TURN ON LIGHTS P* B & P SUK A4,1 SEE IF LIGHTS OFF ORDER L P RF(Z) SOPOFF v & PSOPER ABL(NZ) DISIOE ILLEGAL ORDER P IFT WRFLA=1 P EJECT P* P* P* FLASH LIGHTS P*
0x33c384…33c518 Dummy {f00=0x0123, f01=0x018e, f02=»A6 P LDR A1,A6 P CF A15,SETIMP P DATA FLTUT,TIME 2 P ST A4,DWTTP,A6 J P LDKL A1,/FFBF b P ANS A1,DWTST,A6 SET ON FLAG x PFL010 EQU * . P* A3 CONTAINS LIGHTS THAT SHOULD FLASH * P ORS A3,FLASH STORE NEW LAMPS TO FLASH
0x33c518…33c6ac Dummy {f00=0x0123, f01=0x0190, f02=» PFL020 EQU * P C1R A3,A3 P ANS A3,SPDLCI * P RF SOPONOF @ P* T P EJECT ^ P* l PFLTUT EQU * FLASH TIME OUT v P LDKL A6,DWSO01 P LD A3,FLASH 0 P RF(Z) FL030 NO MORE FLASHING FOR THIS TIME P LDKL A1,-TIME R
0x33c6ac…33c840 Dummy {f00=0x0123, f01=0x0190, f02=»EXIT END I/O P XIF P EJECT P* . PSOPOFF EQU * 8 , P C1R A3,A3 GET COMPLEMENTED CONTROL WORD L 4 P ANS A3,SPDLCI MASK OUT LIGHTS TO BE TURNED OFF | P IFT WRFLA=1 $ P ANS A3,FLASH STOP SOME FLASHING P XIF , P RF SOPONOF
0x33c840…33c9d4 (3, 250) Dummy {f00=0x0123, f01=0x0190, f02=» A3 CONTAINS CONTROL WORD . P ORS A3,SPDLCI SET LIGHTS TO BE TURNED ON $ P IFT WRFLA=1 V P C1R A3,A3 j * P ANS A3,FLASH STOP SOME OTHER FLASHING | P XIF P* P* COMMON ON/OFF PATH: P* 0 PSOPONOFF LD A1,SPDLCI GET LIGHTS
0x33c9d4…33cb68 Dummy {f00=0x0123, f01=0x0190, f02=»********************** P* * P* S.O.P. INTERRUPT HANDLER * B P* * f P**************************** P* P* @ P* THE INTERRUPT HANDLER WILL TAKE CARE OF ALL INTERRUPTS. P*
0x33cb68…33ccfc Dummy {f00=0x0123, f01=0x018e, f02=» CF A15,SAVE8 SAVE A1-A8 ON STACK P XIF * P* 6 P IFT CPU852=0 @ " P MSR 8,A15 SAVE A1-A8 ON STACK V P XIF | P* $ P ST P,INTSAV SAVE LAST INTERRUPT P INR A1,0,SOPDA GET SWITCH P SRN A1,A2 CALC INDEX P IFT CREDIT=0
0x33ccfc…33ce90 Dummy {f00=0x0123, f01=0x0190, f02=» " P LDKL A6,DWSI02 ANY REQUEST ON P LD A4,DWTST,A6 STATUS WORD * P RF(N) IHSOP2 NO N $ P LD A8,DWTECB,A6 GET ECB-ADDRESS f P ST A2,ECBCW,A8 STORE INDEX ( P CM ECBEL,A8 RESET EFFECTIVE LENGTH P LDK A1,0 P CF A15,TENDIO END I/O
0x33ce90…33d024 Dummy {f00=0x0123, f01=0x0190, f02=»WTECB,A6 GET ECB-ADDRESS P & PIHSOP3 ST A2,ECBCW,A8 STORE INDEX ( P R , PENDIO CM ECBEL,A8 RESET EFFECTIVE LENGTH Z P LDK A1,0 P CF A15,TENDIO END I/O P $ PEXIT ABL TDISP GO TO DISPATCHER P EJECT P* * P******
0x33d024…33d1b8 Dummy {f00=0x0123, f01=0x0190, f02=» * * P************************************* * P* X P* b : P* THIS ROUTINE IS A SUBROUTINE TO THE POWER FAILURE l 8 P* RECOVERY ROUTINE (PFAR). IT'S ENTRY POINT SHOULD @ P* BE PRESENT IN THE POWER FAILUR
0x33d1b8…33d34c Dummy {f00=0x0123, f01=0x018e, f02=»DWTCHP j P* P* PSOPR EQU * ENTRY POINT " P IFT CPU852=1 B & P CF A15,SAVE8 SAVE A1-A8 ON STACK X P XIF P* P IFT CPU852=0 " P MSR 8,A15 SAVE A1-A8 ON STACK P XIF P* " P CIO A1,1,SOPDA ACTIVATE INPUT
0x33d34c…33d4e0 Dummy {f00=0x0123, f01=0x0190, f02=» " P LDKL A2,-2 POWER UP INDICATOR P XIF . P IFT CREDIT=1 : P LDK A2,0 P P XIF b P n P IFF SOPX=0 v " P LDKL A6,DWSI02 ANY REQUEST ON $ P LD A4,DWTST,A6 GET STATUS WORD P RF(NN) SOPR1 YES P STR A2,A6 IND POWER U
0x33d4e0…33d674 (3, 251) Dummy {f00=0x0123, f01=0x0190, f02=» STR A2,A6 IND POWER UP P PSOPR2 RB IHSOP1 ( P EJECT @ P* N P* D W S I 0 1 : INPUT DWT X P* | PDWSI01 EQU * , P DATA 0 CHANNEL PARAMETER: POWER UP IND , P DATA /8000 /8000 MEANS DEVICE IS READY P DATA 0 ECB AD
0x33d674…33d808 Dummy {f00=0x0123, f01=0x0190, f02=» & " DATA 0 SAVE AREA USER ECB ADDRESS P DATA DEVECI MMU ECB ADDRESS . PDEVECI EQU * R P DATA 0,0,0,0,0,0 f P XIF P* P* D W S O 0 1 : OUTPUT DWT P* P* PDWSO01 EQU * " P DATA /0040 CHANNEL PARAMETER , P
0x33d808…33d99c Dummy {f00=0x0123, f01=0x0190, f02=» j P DATA 0 TTAB-ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR $ P DATA 0 TERMINAL QUEUE L IFT MMUPAG=1 j & " DATA 0 SAVE AREA USER ECB ADDRESS P DATA DEVECO MMU ECB ADDRESS XIF P DATA 0 TIMER POINTER . PFLASH DATA 0 SAV
0x33d99c…33db30 Dummy {f00=0x0123, f01=0x0190, f02=»* * P* D W S I 0 2 : EXTENDED INPUT DWT ! P* ! 8 P ! B PDWSI02 EQU * ! J P IFF SOPX=0 ! ^ P DATA 0 ! r P DATA /8000 ! P DATA 0 ECB ADDRESS ! P DATA 0 ORDER ! P DATA SOPADI ! P DATA 0,0,0 ! IFT MMUPAG=1 ! & " D
0x33db30…33dcc4 Dummy {f00=0x0123, f01=0x402c, f02=» ! P* " P* " P END " @ " (DWT ! P* ! 8 P ! B PDWSI02 EQU * ! J P IFF SOPX=0 ! ^ P DATA 0 ! r P DATA /8000 ! P DATA 0 ECB ADDRESS ! P DATA 0 ORDER ! P DATA SOPADI ! P DATA 0,0,0 ! IFT MMUPAG=1 ! & " D
0x33dcc4…33de58 Dummy {f00=0x0123, f01=0x2008, f02=» # -ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TERMINAL QUEUE @ P* ^ P END h@ t P* z P* P* D W S O P U : OUTPUT DWT P* P* PDWSOPU EQU * P DATA 0 CHANNEL PARAMETER , P DATA /8000
0x33de58…33dfec Dummy {f00=0x0123, f01=0x0190, f02=»CHTABE-* TABLE LENGTH P DATA CWTLT1 P DATA CWTLT2 4 P IFT LOCHAN=3 H P DATA CWTLT3 ^ P XIF r P IFT LOCHAN=4 ~ P DATA CWTLT3 P DATA CWTLT4 P XIF PCHTABE EQU * END OF TABLE P* P* P* P
0x33dfec…33e180 Dummy {f00=0x0123, f01=0x0190, f02=»HANDLER FOR CHLT v P* P* C H L T 1 " P* INTERRUPT FROM CHLT1 8 P* X P XIF b P IFT LOCHAN=2 n PCHLT3 EQU * PCHLT4 EQU * P XIF P IFF LOCHAN=1 PCHLT1 EQU * $ P ST P,INTSAV SAVE LAST INTERRUPT
0x33e180…33e314 (3, 252) Opaque[0x194]
0x33e314…33e4a8 # DirEnt {nam=»DRTW01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x20d8, f03=0x0000}
0x33e314…33e4a8 IdxSect {
0x33e314…33e4a8 f00 = 0x0106 // 0x33e314 @0x0
0x33e314…33e4a8 f01 = 0x000c // 0x33e316 @0x2
0x33e314…33e4a8 gno = [ // 0x33e318 @0x4
0x33e314…33e4a8 [0x00]: C0x0106.0x3.0
0x33e314…33e4a8 [0x01]: C0x0107.0x1.0
0x33e314…33e4a8 [0x02]: C0x0128.0x1.0
0x33e314…33e4a8 [0x03]: C0x014a.0x1.0
0x33e314…33e4a8 [0x04]: C0x014a.0x2.0
0x33e314…33e4a8 [0x05]: C0x014a.0x3.0
0x33e314…33e4a8 ]
0x33e314…33e4a8 }
0x33e4a8…33e63c Dummy {f00=0x0106, f01=0x0190, f02=» 2 P IDENT DRTW01 REL 10.0 80-03-14 870105041000 P : P B P J P R 6 P************************************************** Z P* $ P* PHILIPS TERMINAL SYSTE PTS P* , P* DRTW01 = DRIVER TYPEWRITER PTS 6862 P*
0x33e63c…33e7d0 Dummy {f00=0x0106, f01=0x0190, f02=»HANDLES INPUT AND OUTPUT TO TYPEWRITERS P* PTS 6862 0 P* D P* N P EJECT X P* f P* p P*********** z P* ENTRIES * P*********** P* P ENTRY TWAD ADDRESS BLOCK P ENTRY IHTW P ENTRY TWON
0x33e7d0…33e964 Dummy {f00=0x0106, f01=0x0190, f02=»R v P EXTRN TDISP DISPATCH $ P EXTRN DISEND DISPATCH AND ENDIO ( * P EXTRN SETIME SET TIME BEFORE TIME-OUT P . P EXTRN SAVE8 SAVE REGISTERS A1-A8 ON STACK ~ EXTRN DWTST STATUS EXTRN DWTBC BYTE COUNTER EXTRN DWTECB ECB ADDRESS
0x33e964…33eaf8 Dummy {f00=0x0106, f01=0x0190, f02=»EA A5 | & ! EXTRN DWTSB1 STACK BASE 1 IN DWT & ! EXTRN DWTSB2 STACK BASE 2 IN DWT 8 P EXTRN DWTTP TIMER POINTER b * P EXTRN INTSAV SAVE AREA LAST INTRRUPT * P EXTRN PFPOST PWF POST PROCESSING FLAG P EJECT P* P* P******
0x33eaf8…33ec8c Dummy {f00=0x0106, f01=0x0190, f02=»EQU /4280 CIO-HALT PTWINR EQU /4A00 INPUT PTWOTR EQU /4200 OUTPUT 8 PTWSST EQU /4AC0 SENSE STATUS V P* z P* P EJECT P* P* P************* P* CONSTANTS * P************* P* P* PCR
0x33ec8c…33ee20 Dummy {f00=0x0106, f01=0x0190, f02=»TIME EQU 300 TIME BEFORE TIME-OUT P* * P* 4 P************************ > P* CONDITIONAL ASSEMBLY* ^ P************************ ~ P* P* PX:A EQU 0 PX:B EQU 0 PX:C EQU 60 PX:D EQU 10 PX:E EQU 6
0x33ee20…33efb4 (3, 253) Dummy {f00=0x0107, f01=0x0190, f02=»IT EQU 1 P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMUPAG EQU 1. L P* z PMMUPAG EQU 1 P* P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU85
0x33efb4…33f148 Dummy {f00=0x0107, f01=0x0190, f02=»NTS * P********************* P* , P* 6 0 PDWTDRD EQU /10 START OF DRIVER DEFINED PART @ P* t P IFT MMUPAG=0 ~ PSTART EQU DWTDRD P XIF P* P IFT MMUPAG=1 PSTART EQU DWTDRD+4 P XIF P* P
0x33f148…33f2dc Dummy {f00=0x0107, f01=0x018e, f02=» * P DATA DVBKTB+DVBKTB MMU KEY TABLE SIZE ( P DATA DVBLEN+DVBLEN MMU BUFFER SIZE 2 P DATA DEVIND DEVICE INDEX ^ PTWAD EQU * P DATA TWA ACTIVATION PART " P DATA 0 ABORT ROUTINE ADDRESS P EJECT P* P* 2 P* ACTIVATI
0x33f2dc…33f470 Dummy {f00=0x0107, f01=0x0190, f02=» & P ABL(Z) IHTW50 REQUESTED LENGTH =0 P* . P* 8 P LDR A2,A7 COPY ORDER B P RF(NP) TWAERR REQUEST ERROR ` P SUK A2,4 P RF(Z) TWAERR REQUEST ERROR P RF(N) TWAIN INPUT REQUEST P SUK A2,2 " P RF(NP) TWAOUT OUTPUT REQU
0x33f470…33f604 Dummy {f00=0x0107, f01=0x0190, f02=»T=1 & P LD A2,DWTTP,A6 GET TIMER POINTER * P RF(Z) TWA010 NO TIMING ON THIS DEVICE 6 P LDR A1,A6 SAVE DWT-ADDRESS d P CF A15,SETIME P DATA TWTUT,TIME , P ST A4,DWTTP,A6 SAVE TIMER BLOCK-ADDRESS P XIF PTWA010 EQU * P I
0x33f604…33f798 Dummy {f00=0x0107, f01=0x018e, f02=»2,DWTST,A6 RESET POINTER P LDKL A2,-2 " P ST A2,10,A8 INDICATE POWER UP 4 P ABL IHTW35 PERFORM ENDIO Z P XIF | PTWA020 LDK A2,/21 P* P* ( PREAD CF A5,STRTIO EXECUTE CIO-START P RF RED030 & PRED020 CF A5,STREG S
0x33f798…33f92c Dummy {f00=0x0107, f01=0x0190, f02=» P LDR A1,A1 P RF(NZ) RED037 P XIF 0 P SUK A7,1 < P RF(P) RED050 ORDERS 02/03 N P* p P* z 0 PRED035 CF A5,STORE STORE CHARACTER IN BUFFER P CW A3,4,A8 $ P RB(L) RED020 GET NEXT CHARACTER P LDR A7,A7 P R
0x33f92c…33fac0 Dummy {f00=0x0107, f01=0x0190, f02=» P EJECT P PRED040 EQU * P 2 P IFT TIMOUT=1 : P LD A7,DWTOR,A6 GET ORDER P P ANK A7,/FF MASK ORDER r P CWK A7,4 P RF(G) RED045 WRITE ORDER " P LD A4,DWTTP,A6 TIMER POINTER * P RF(Z) RED045 NO TIMIMG ON THI
0x33fac0…33fc54 (3, 254) Dummy {f00=0x0128, f01=0x0190, f02=»W40 PERFORM TENDIO P EJECT P* ( P* 2 P* < P* ORDERS 02,03 F P* ^ P* h PRED050 EQU * r " P LD A1,10,A8 GET CONTROL WORD P RF(Z) RED080 NO KEYTABLE " P LCR A4,A1 GET NUMBER OF KEYS P ANK A4,/FF " P
0x33fc54…33fde8 Dummy {f00=0x0128, f01=0x0190, f02=»EMENT ADDRESS $ P CCR A2,A1 CHECK IF IN KEYTABLE " P RB(NE) RED060 NOT IN KEYTABLE > P ADR A4,A4 DOUBLE INDEX d , P ST A4,10,A8 STORE INDEX IN CONTROL WORD , PRED070 CF A5,STORE STORE KEY IN KEYTABLE P RB RED040 EXECUTE CIO-HALT P
0x33fde8…33ff7c Dummy {f00=0x0128, f01=0x0190, f02=»,A6 P RF(E) RED110 CLEAR P EJECT ( P* 6 P* @ ( P* CHARACTER NOT FOUND IN KEYTABLE J P* v P* P* $ PRED090 LDR A4,A2 COPY CHARACTER P ANK A4,/FF MASK P LDR A1,A7 P SUK A1,1 P RF(Z) RED100 OR
0x33ff7c…340110 Dummy {f00=0x0128, f01=0x0190, f02=»F RED110 P* P* PRED100 SUK A4,/20 $ P RF(N) CODERR LESS THAN /20 > P SUK A4,/3F b $ P RF(NP) RED110 CORRECT CHARACTER v P* P* $ PCODERR LDK A1,4 CODE CHECK ERROR P ORS A1,8,A8 . P CF A5,STORE STORE CHARACT
0x340110…3402a4 Dummy {f00=0x0128, f01=0x0190, f02=»,TWBSP,A6 P RF(E) RED120 BACKSPACE P CC A2,TWCLR,A6 2 P RB(NE) RED035 J P* ` P* j P LDK A3,0 CLEAR ECB-BUFFER t " P RB RED020 GET NEXT CHARACTER P* P* PRED120 SUK A3,1 BACKSPACE & P RB(NN) RED020 GET NEX
0x3402a4…340438 Dummy {f00=0x0128, f01=0x0190, f02=» P* W R I T E P* 4 P* ORDERS 05 AND 06: BASIC AND STANDARD WRITE $ P* P* f PWRITE EQU * p PTWAOUT EQU * P INH P LDK A4,0 P LDK A2,0 $ P CF A5,STRTIO EXECUTE CIO-START P* P* P CWK
0x340438…3405cc Dummy {f00=0x0128, f01=0x0190, f02=» P ANK A3,/FF P SUK A3,/2B P RF(Z) WRT030 NO CR OR LF , P* N P* X , P ST A4,DWTHP,A6 HEAD POSITION INDICATOR b P LDK A4,2 $ P LDK A2,CR SEND CARRIAGE RETURN P EJECT P* P* P* $ PWRT010 CF A5,OTR
0x3405cc…340760 Dummy {f00=0x0128, f01=0x0190, f02=» PWRT020 SUK A3,5 P RB(Z) WRT015 SEND SECOND LF P SUK A3,1 D P RF(NZ) WRT030 V P LDK A2,/0C SEND FORM FEED n P RB WRT010 " PWRT030 LDK A3,2 BUFFER POINTER P RF WRT050 GET CHARACTER P* P* P* PWR
0x340760…3408f4 (3, 255) Dummy {f00=0x014a, f01=0x0190, f02=» 6 PWRT050 CF A5,GETCHR GET CHARACTER FROM ECB-BUFFER P LDR A1,A1 > P RB(Z) RED040 LAST CHARACTER R P CWK A7,5 v P RB(Z) WRT040 BASIC WRITE P* P* ( P LDR A1,A2 ORDER 06: STANDARD WRITE P ANK A1,/FF P SUK A1,/0
0x3408f4…340a88 Dummy {f00=0x014a, f01=0x018e, f02=»D LESS THAN /20 P SUK A1,/3F " P RB(NP) WRT040 BETWEEN /20-/5F , P SUK A1,/20 R " P RF(NP) WRT060 BETWEEN /60-/7F f P* P* PERRCOD LDK A1,4 P ORS A1,8,A8 " P RB WRT050 GET NEXT CHARACTER P* P* PWR
0x340a88…340c1c Dummy {f00=0x014a, f01=0x0190, f02=» P* PWRTTAB EQU * 2 P CF A5,GETCHR GET FIRST TAB.POSITION CHARACTER " P LDR A4,A2 COPY X 4 P CF A5,GETCHR GET SECOND TAB. POSITION CHARACTER p P ANK A2,/F P ANK A4,/F P RF(Z) TAB020 PTAB010 ADK A2,/A P SUK A4,1
0x340c1c…340db0 Dummy {f00=0x014a, f01=0x0190, f02=»BER OF SPACES TO BE SENT , P RB(NP) WRT050 NO SPACES SHOULD BE SENT P LDR A4,A2 P " PTAB030 LDK A2,/20 SEND BALNKS b $ PTAB040 CF A5,OTR SEND CHARACTER ( P IM DWTST,A6 INCREMENT BYTE COUNTER P SUK A4,1 & P RB(NZ) TAB030 SEND ANOTHE
0x340db0…340f44 Dummy {f00=0x014a, f01=0x0190, f02=»INDEX x " P RB WRT050 GET NEXT CHARACTER P EJECT 4 P* B P* L P* RECOVERY ROUTINE V P* r P* | P* PTWON EQU * P IFT CPU852=1 & P CF A15,SAVE8 SAVE A1-A8 ON STACK P XIF P* P IFT CPU852=0
0x340f44…3410d8 Dummy {f00=0x014a, f01=0x0190, f02=»200 & P ORS A1,DWTST,A6 INDICATE POWER UP P XIF 6 P LD A1,DWTST,A6 B P RF(N) EXIT DEVICE NOT BUSY Z PTWON10 LD A3,DWTA3,A6 ~ P LD A7,DWTOR,A6 GET ORDER P ANK A7,/FF P LD A8,DWTECB,A6 ECB-ADDRESS P LDKL A5,DWTSB2
0x3410d8…34126c Dummy {f00=0x014a, f01=0x0190, f02=» z P INH P LDK A2,0 $ P CF A5,STRTIO EXECUTE CIO-START & P LDK A2,CR N P LDK A3,0 ` P LD A4,DWTHP,A6 r P ADK A4,1 $ P RB TAB040 REPRINT LAST REQUEST P* PTWON20 LDK A1,TPERR ORDER 05 P ABL DISEND P*
0x34126c…341400 Dummy {f00=0x014a, f01=0x0190, f02=» P* PIHTW EQU * $ P ST P,INTSAV SAVE LAST INTERRUPT $ P IFT CPU852=1 L & P CF A15,SAVE8 SAVE A1-A8 ON STACK b P XIF P* P IFT CPU852=0 " P MSR 8,A15 SAVE A1-A8 ON STACK P XIF P* P LDKL A6,DWTW01
0x341400…341594 (3, 256) Dummy {f00=0x014a, f01=0x0190, f02=»,TWSST P EXR A2 EXECUTE SST P RF(A) IHTW30 ENDIO * P LD A7,DWTOR,A6 GET ORDER F P ANK A7,/FF h P SUK A7,4 | P RF(P) IHTW30 " P LDR* A2,A6 GET DEVICE ADDRESS P ORKL A2,TWINR P EXR A2 EXECUTE INR $ P ANK A2,/7
0x341594…341728 Dummy {f00=0x014a, f01=0x018e, f02=»IMING ON THIS DEVICE ~ P LDKL A1,-TIME P ST* A1,DWTTP,A6 2 P XIF J P* V P* ` PIHTW30 LDK A1,0 j P RF LDREGE RESTORE REGISTERS P P PIHTW35 EQU * P IFT POWUP+TIMOUT=2 P " P LD A1,DWTTP,A6 TIMER POIN
0x341728…3418bc Dummy {f00=0x014a, f01=0x018e, f02=» PIHTW40 EQU * P* P* " , PIHTW50 ST A3,6,A8 SAVE EFFECTIVE LENGTH , PIHTW55 SUK A7,4 P RF(NP) IHTW60 READ ORDER t P* P* $ P LC A3,DWTBC,A6 GET BYTE COUNTER * P ADS A3,DWTHP,A6 UPDATE HEAD POSITION P LDK A3,
0x3418bc…341a50 Dummy {f00=0x014a, f01=0x0190, f02=» P ADK A1,2 ! P SRL A1,1 ! P ST A1,10,A8 ! ( P XIF ! < P LDK A1,0 ! H P ABL DISEND PERFORM TENDIO ! Z P* ! | P* ! P ! PSKIP LDR* A2,A6 ! P ORKL A2,TWSST ! P EXR A2 SST ! P RF(A) EXIT ! P LDR* A2,A6 ! P ORKL
0x341a50…341be4 Dummy {f00=0x014a, f01=0x0190, f02=» ! , PSTRTIO LDKL A1,TWSTRT EXECUTE CIO-START " P RF EXECIO " 8 ( PHLTIO LDKL A1,TWHLT CIO-HALT " J P RF EXECIO " v " POTR LDKL A1,TWOTR OTR " P* " P* " PEXECIO LD A7,PFPOST " P RF(NZ) STREG PFINIT PENDING " P ORR*
0x341be4…341d78 Dummy {f00=0x014a, f01=0x0190, f02=»T,A6 INDICATE INTERRUPTS ALLOWED " $ P ST A3,DWTA3,A6 SAVE REGISTER A3 # ( $ P ST A4,DWTA4,A6 A4 # P $ P ST A5,DWTA5,A6 A5 # x PEXIT ABL TDISP # PHALT ST A2,DWTA2,A6 # " P CF A5,HLTIO EXECUTE CIO-HALT # P LD A2,DWTA2,A6
0x341d78…341f0c Dummy {f00=0x014a, f01=0x0190, f02=»FER # r P* $ P* $ ( PSTORE LD A4,2,A8 GET BUFFER ADDRESS $ $ P ADR A4,A3 GET CHARACTER ADDRESS $ L P SCR A2,A4 STORE CHARACTER $ t $ P ADK A3,1 INCREMENT BUFFER INDEX $ P RTN A5 $ P* $ P* $ P* $ P IFT TIMOUT=1 $ P* $
0x341f0c…3420a0 Dummy {f00=0x014a, f01=0x0190, f02=»ETURN CODE $ z P XIF % P* % P* % ( P EJECT % 2 P* % @ P* % J P* L D R E G E % T P* % l 8 P* RESTORE A3-A5 FROM DWT AND RETURN TO USER VIA A5 % v P* % P* % PLDREGE EQU * % & P LD A3,DWTA3,A6 RELOAD REGISTER A3 % & P LD
0x3420a0…342234 (3, 257) Dummy {f00=0x014a, f01=0x0190, f02=»B,A6 % P RTN A5 RETURN VIA A5-STACK & P EJECT & 0 P* & > P* & H P* G E T C H R & R P* & j 8 P* SUBROUTINE TO GET ONE CHARACTER FROM ECB-BUFFER & t P* & P* ON ENTRY: & P* & P* A3 = BUFFER INDEX & P* A8 = ECB-AD
0x342234…3423c8 Dummy {f00=0x014a, f01=0x0190, f02=» J P* IF LAST CHARACTER IS REACHED A3 IS STORED IN ECB EFFECTIVE LENGTH ' P* ' R P* ' PGETCHR EQU * ' f P LD A1,4,A8 REQUESTED LENGTH ' z P SUR A1,A3 ' * P RF(NP) GCH010 LAST CHARACTER REACHED ' " P LD A1,2,A8 GET BUFFER ADDRESS ' P ADR
0x3423c8…34255c Dummy {f00=0x014a, f01=0x0190, f02=»8 STORE EFFECTIVE LENGTH ' P RTN A5 ( P EJECT ( 0 P* ( > ( P* DEVICE WORK TABLE FOR TYPEWRITER ( H P* ( t P* ( ~ PDWTW01 EQU * TABLE ENTRY ( " P DATA /0010 CHANNEL PARAMETER ( 0 P DATA /8000 STATUS./8000 MEANS DEVICE READY ( P DATA
0x34255c…3426f0 Dummy {f00=0x014a, f01=0x0190, f02=»E INDICATOR ( | P DATA 0 TERMINAL QUEUE ) IFT MMUPAG=1 ) 2 & " DATA 0 SAVE AREA USER ECB ADDRESS ) H DATA DEVECB MMU ECB ADDRESS ) r XIF ) P DATA 0 OUTPUT QUEUE LINK ) P DATA 0 SAVE AREA FOR A3 ) P DATA 0 SAVE AREA FOR A4 ) P DAT
0x3426f0…342884 Dummy {f00=0x014a, f01=0x018e, f02=»CKSPACE KEY ) x P RIGHT BYTE CANCEL KEY * & P DATA /0D00 LEFT BYTE STANDARD EOR * 4 P RIGHT BYTE DOUBLE ZERO * ^ " P DATA 0 HEAD POSITION POINETR * P DATA 0 SAVE AREA FOR A2 * P* * P EJECT DRTW01 * P* * P* * P IFT MMUPAG=
0x342884…342a18 Dummy {f00=0x014a, f01=0x403e, f02=» P XIF + P* + P* + P* + $ P END + .@ + :0 LEFT BYTE STANDARD EOR * 4 P RIGHT BYTE DOUBLE ZERO * ^ " P DATA 0 HEAD POSITION POINETR * P DATA 0 SAVE AREA FOR A2 * P* * P EJECT DRTW01 * P* * P* * P IFT MMUPAG=
0x342a18…342bac Dummy {f00=0x014a, f01=0x2008, f02=» ,
0x342bac…342d40 Dummy {f00=0x014a, f01=0x0190, f02=»K < P* = P* = P********** = P* CREATE * = 0 P********** = B P* = T P* = ^ PCREATE EQU * CREATE FILE = h P* TO BE IMPLEMENTED = P EJECT FMTASK = P* = P* = P********** = P* EXTEND * = P********** = P
0x342d40…342ed4 (3, 258) Opaque[0x194]
0x342ed4…343068 # DirEnt {nam=»DRLP01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x26c8, f03=0x0000}
0x342ed4…343068 IdxSect {
0x342ed4…343068 f00 = 0x0136 // 0x342ed4 @0x0
0x342ed4…343068 f01 = 0x0008 // 0x342ed6 @0x2
0x342ed4…343068 gno = [ // 0x342ed8 @0x4
0x342ed4…343068 [0x00]: C0x0136.0x1.0
0x342ed4…343068 [0x01]: C0x0136.0x3.0
0x342ed4…343068 [0x02]: C0x0137.0x3.0
0x342ed4…343068 [0x03]: C0x0138.0x0.0
0x342ed4…343068 ]
0x342ed4…343068 }
0x343068…3431fc Dummy {f00=0x0136, f01=0x0190, f02=» 2 P IDENT DRLP01 REL 10.0 80-03-14 870105041000 P : P* B P* L > P********************************************************** V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* DRLP01 = DRIVER LINE PRINTER P* P*
0x3431fc…343390 Dummy {f00=0x0136, f01=0x0190, f02=» THIS DRIVER HANDLES ONE LINE PRINTER PTS 6881 CONNECTED < P* TO CPU VIA CHLP ON MULTIPLEX CHANNEL OR PROGRAMMED B P* CHANNEL P* P EJECT DRLP01 P* P* P************************ P* ENTRIES *
0x343390…343524 Dummy {f00=0x0136, f01=0x0190, f02=»HLP INTERRUPT HANDLER P ENTRY LPON RECOVERY ROUTINE & P ENTRY DWLP01 DWT FOR LINE PRINTER B P l P t P | P* P* , P**************************************** , P* EXTERNAL TOSS MODULE ENTRIES * , P****************
0x343524…3436b8 Dummy {f00=0x0136, f01=0x0190, f02=»GS ON STACK z P EXTRN DISIOE REQUEST ERROR EXTRN DWTST STATUS 8 EXTRN DWTBC BYTE COUNTER T EXTRN DWTECB ECB ADDRESS v $ EXTRN DWTOR DWT INDEX AND ORDER P EXTRN DWTA3 SAVE AREA A3 EXTRN DWTA4 SAVE AREA A4 EXT
0x3436b8…34384c Dummy {f00=0x0136, f01=0x0190, f02=»POST PROCESSING FLAG ~ P EJECT DRLP01 P* 4 P* > " P***************************** H " P* CONSTANTS * n " P***************************** P* P* PDWALP EQU /0F & PMUXLP EQU DWALP+DWALP MUX ADDRESS
0x34384c…3439e0 Dummy {f00=0x0136, f01=0x0190, f02=»SEMBLY P* . P***************************************** P* J 2 P* PROGRAMMED CHANNEL MAY BE USED INSTEAD OF T , P* MULTIPLEX CHANNEL BY SETTING X:A=1 P* PX:A EQU 0 PCHAN EQU 0 P* . P* A PROGRAM VERSION US
0x3439e0…343b74 (3, 259) Dummy {f00=0x0136, f01=0x0190, f02=»VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. . P* ` PCPU852 EQU 0 j P* ~ P* MMU BUFFER SIZE P* PX:B EQU 67 PDVBLEN EQU 162 P* P* MMU DEVICE INDEX P* PX:
0x343b74…343d08 Dummy {f00=0x0136, f01=0x0190, f02=»***** ~ P* ORDERS * P*********************** . P* N P* ORDER /00: TEST STATUS. X 8 P* A TST INSTRUCTION IS EXECUTED TO SEE | 0 P* IF LINE PRINTER IS OPERABLE. P* P* ORDER /05: BA
0x343d08…343e9c Dummy {f00=0x0136, f01=0x0190, f02=»UT ANY CHECK. b P* $ P* ORDER /06: STANDARD WRITE. @ P* FIRST WORD IN ECB BUFFER CONTAINS A CONTROL H P* CHARACTER. < P* /2B: PRINT LINE WITHOUT ADVANCING PAPER : P* /30: ADVAN
0x343e9c…344030 Dummy {f00=0x0136, f01=0x018e, f02=»ES A LINE FEED BEFORE l P* PRINTING. P* @ P* J > P* CHARACTERS IN BUFFER SHOULD BE WITHIN THE T > P* INTERVAL /20-/5F. NO CHECK IS CARRIED OUT B P* BY DRIVER. AT THE END OF ECB BU
0x344030…3441c4 Dummy {f00=0x0136, f01=0x0190, f02=» P EJECT DRLP01 P* P* & ( P************************************ 0 ( P* NORMAL REGISTER USAGE * ( P************************************ P* P* P* A1 = RETURN CODE P* A2 = WORK REGISTER P*
0x3441c4…344358 Dummy {f00=0x0136, f01=0x018e, f02=» P* A8 = ECB ADDRESS P* & P* 0 $ P******************************** : $ P* TABLES * b $ P******************************** P* P* * P DATA DVBLEN+DVBLEN MMU BUFFER LENGTH P DATA DEVIND DEVICE
0x344358…3444ec Dummy {f00=0x0136, f01=0x018e, f02=» P* P* A C T I V A T I O N P* . P* 8 PACLP EQU * B P LDK A1,/0D CARRIAGE RETURN T P LDR A7,A7 ORDER 0 ? x P RF(NE) ACLP05 NO P LDKL A4,DWTBC BYTE COUNTER P ADR A4,A6 ADD DWT ADDRESS $ P SCR A1,A4 STORE CAR
0x3444ec…344680 Dummy {f00=0x0136, f01=0x0190, f02=» P SUK A7,5 ORDER 5 ? P RF(E) ACLP30 P SUK A7,1 ORDER 6 ? 6 P RF(E) ACLP10 R P* h PACERR ABL DISIOE r P* P EJECT DRLP01 P* P* PACLP10 EQU * P CWK A2,2 REQ. LENGTH < 2 ? P RF(NL) ACLP12 N
0x344680…344814 (3, 260) Dummy {f00=0x0137, f01=0x0190, f02=» A3,A2 ADDED WITH REQ. LENGTH $ P SCR A1,A3 STORE PRINT CHARACTER & P ADK A2,1 N P LCR A3,A4 ` P ECR A3,A3 r & P LC A3,1,A4 GET CONTROL CHARACTER P ST A3,CONCHA P ANK A3,/FF $ P SUK A3,/2B SUPER POSITIONING ? P RF(NE)
0x344814…3449a8 Dummy {f00=0x0137, f01=0x0190, f02=»DK A1,/0A LINE FEED * P SC A1,1,A4 SECOND CHARACTER IN BUFFER P SUK A3,5 TWO LINE FEEDS ? J P RF(E) ACLP20 YES l P LDK A1,/0C TOP OF FORM P SUK A3,1 WANTED ? P RF(E) ACLP20 YES P LDK A1,/0D CARRIAGE RETURN P* P
0x3449a8…344b3c Dummy {f00=0x0137, f01=0x0190, f02=» P SUK A7,6 ORDER 6 ? P RF(NE) ENDIO P LDR A2,A2 6 P RF(NN) ACLP35 H 4 P IM 6,A8 ADD FOR EXTRA CHAR. AT BUFFER END (/0D) ^ P* PACLP35 EQU * P LD A4,2,A8 BUFFER ADDRESS P LDKL A3,0 PCONCHA EQU *-2 2 P SC A3,1,A
0x344b3c…344cd0 Dummy {f00=0x0137, f01=0x0190, f02=»REQUEST x PEXIT ABL TDISP P* & P EJECT DRLP01 0 P* H P* R P* CIOSTA " P* SUBROUTINE TO SEND BUFFER p P* P* PCIOSTA EQU * P ST A5,DWTA5,A6 SAVE A5 P IFT CHAN=0 6 P ORKL A2,/4000 INDICAT
0x344cd0…344e64 Dummy {f00=0x0137, f01=0x0190, f02=»EGISTER l 2 P WER A4,MUXLP+1 SECOND WRITE EXTERNAL REGISTER P XIF F P* R P IFT CHAN=1 ( P ST A4,DWTA3,A6 SAVE BUFFER ADDRESS p P ADR A4,A2 . P ST A4,DWTA4,A6 SAVE BUFFER END ADDRESS+1 P XIF P* P LD A1,PFPOST
0x344e64…344ff8 Dummy {f00=0x0137, f01=0x0190, f02=»* P EJECT DRLP01 P* " P* , P* RECOVERY ROUTINE 6 P* T P* ^ PLPON EQU * h P IFT CPU852=1 z & P CF A15,SAVE8 SAVE A1-A8 ON STACK P XIF P* P IFT CPU852=0 " P MSR 8,A15 SAVE A1-A8 ON STACK
0x344ff8…34518c Dummy {f00=0x0137, f01=0x018e, f02=»T LP FREE P RF IHLP30 P* $ P EJECT DRLP01 . P* F P* P P* I N T E R R U P T Z P* x P* PIHLP EQU * $ P ST P,INTSAV SAVE LAST INTERRUPT P IFT CHAN=0 P IFT CPU852=1 & P CF A15,SAVE8 SAVE A1-A8
0x34518c…345320 Dummy {f00=0x0137, f01=0x0190, f02=» P IFT CHAN=1 P STR A1,A15 P STR A2,A15 0 P LDKL A2,DWLP01 DWT-ADDRESS D 2 P LD A1,DWTA3,A2 POINTER AT NEXT BYTE IN BUFFER h P LCR A2,A1 NEXT BYTE " P OTR A2,0,DWALP WRITE ONE BYTE P RF(NA) IHLP20 NOT ACCEPTED P LDK
0x345320…3454b4 (3, 261) Dummy {f00=0x0138, f01=0x0190, f02=»BYTE x P CIO A2,0,DWALP CIO HALT PIHLP10 EQU * , P LDR* A2,A15 @ P LDR* A1,A15 T P RTN A15 h P* x P* P* PIHLP20 STR A3,A15 P STR A4,A15 P STR A5,A15 P STR A6,A15 P STR A7,A15 P STR A8,
0x3454b4…345648 Dummy {f00=0x0138, f01=0x0190, f02=»A7,DWTOR,A6 ORDER P ANK A7,/FF P LD A8,DWTECB,A6 ECB ADDRESS . P* R P IFT CHAN=0 4 P RER A3,MUXLP GET NUMBER OF NOT TRANSFERED CHAR. p P ANKL A3,/FFF 8 P LD A2,4,A8 CALCULATE NUMB. OF TRANSFERED CHARACTERS P SUR A2,A3
0x345648…3457dc Dummy {f00=0x0138, f01=0x0190, f02=» A7,6 ORDER 6? P RF(NE) IHLP35 P ADK A2,1 YES , PIHLP35 EQU * B 8 P SU A2,2,A8 CALCULATE NUMB. OF TRANSFERED CHARACTERS V P XIF " P ST A2,6,A8 STORE EFF. LENGTH $ P LD A5,DWTA5,A6 GET STACK VALUE P RTN A5 P* P E
0x3457dc…345970 Dummy {f00=0x0138, f01=0x018e, f02=» P DATA 0 CHANNEL PARAMETER P DATA /8000 STATUS * P DATA 0 ECB ADDRESS D P DATA 0 ORDER ` ( P DATA LPADR ADDRESS TO ADDRESS BLOCK v P DATA 0 TTAB ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR P DATA 0 TERMINAL QUEUE IFT
0x345970…345b04 Dummy {f00=0x0138, f01=0x4130, f02=» t P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE AREA FOR A4 ( P DATA 0 SAVE AREA FOR A5 H P RES 4 DWT STACK h P* P IFT MMUPAG=1 PDEVECB EQU * P DATA 0 P DATA LP:BUF P DATA 0,0,0,0 PLP:BUF RES DVBLEN+1
0x345b04…345c98 Dummy {f00=0x0138, f01=0x2008, f02=» P DATA 0 TTAB-ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR ( P DATA 0 TERMINAL QUEUE P P DATA 0 OUTPUT QUEUE LINK n P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES 4 DWT-STACK P
0x345c98…345e2c Dummy {f00=0x0138, f01=0x0190, f02=»EQU /4280 CIO-HALT PTWINR EQU /4A00 INPUT PTWOTR EQU /4200 OUTPUT 8 PTWSST EQU /4AC0 SENSE STATUS V P* z P* P EJECT P* P* P************* P* CONSTANTS * P************* P* P* PCR
0x345e2c…345fc0 Dummy {f00=0x0138, f01=0x0190, f02=»TIME EQU 300 TIME BEFORE TIME-OUT P* * P* 4 P************************ > P* CONDITIONAL ASSEMBLY* ^ P************************ ~ P* P* PX:A EQU 0 PX:B EQU 0 PX:C EQU 60 PX:D EQU 10 PX:E EQU 6
0x345fc0…346154 (3, 262) Opaque[0x194]
0x346154…3462e8 # DirEnt {nam=»DRFD01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x07e0, f03=0x0000}
0x346154…3462e8 IdxSect {
0x346154…3462e8 f00 = 0x003f // 0x346154 @0x0
0x346154…3462e8 f01 = 0x0022 // 0x346156 @0x2
0x346154…3462e8 gno = [ // 0x346158 @0x4
0x346154…3462e8 [0x00]: C0x003f.0x0.0
0x346154…3462e8 [0x01]: C0x0066.0x1.0
0x346154…3462e8 [0x02]: C0x0066.0x2.0
0x346154…3462e8 [0x03]: C0x0067.0x0.0
0x346154…3462e8 [0x04]: C0x0067.0x1.0
0x346154…3462e8 [0x05]: C0x0067.0x2.0
0x346154…3462e8 [0x06]: C0x0156.0x3.0
0x346154…3462e8 [0x07]: C0x0157.0x0.0
0x346154…3462e8 [0x08]: C0x0157.0x1.0
0x346154…3462e8 [0x09]: C0x0157.0x2.0
0x346154…3462e8 [0x0a]: C0x0157.0x3.0
0x346154…3462e8 [0x0b]: C0x0158.0x0.0
0x346154…3462e8 [0x0c]: C0x0158.0x1.0
0x346154…3462e8 [0x0d]: C0x0158.0x2.0
0x346154…3462e8 [0x0e]: C0x0158.0x3.0
0x346154…3462e8 [0x0f]: C0x0159.0x0.0
0x346154…3462e8 [0x10]: C0x0159.0x1.0
0x346154…3462e8 ]
0x346154…3462e8 }
0x3462e8…34647c Dummy {f00=0x003f, f01=0x0190, f02=» 2 P IDENT DRFD01 REL 10.0 80-04-29 870105041000 P : P* B 2 P********************************************** L P* " P* PHILIPS TERMINAL SYSTEM PTS P* ( P* DRFD01 = DRIVER FOR FLEXIBLE DISK P* P* P* P*
0x34647c…346610 Dummy {f00=0x003f, f01=0x0190, f02=»FOUR DAISY n . P* CHAINED FLEXIBLE DISK DRIVES PTS 6879, 0 P* CONNECTED TO CPU VIA CHANNEL UNIT CHFD ON D & P* MULTIPLEX OR PROGRAMMED CHANNEL x P* P* P EJECT DRFD01 P* P* ORDERS: P* P* /00 TEST STATUS
0x346610…3467a4 Dummy {f00=0x003f, f01=0x0190, f02=»* /06 SEQUENTIAL WRITE -IBM DISC ONLY- P* /11 PHYSICAL READ H P* /15 PHYSICAL WRITE f P* /21 OPEN P* /22 CLOSE P* /24 WRITE DELETED DATA P* /26 LOCK D P* /31 REWIND
0x3467a4…346938 Dummy {f00=0x003f, f01=0x0190, f02=» A5 STACK BASE P* A6 DWT-ADDRESS P* A7 ORDER 6 P* A8 ECB-ADDRESS L P EJECT DRFD01 h P* P*********** P* * P* ENTRIES * P* * P*********** P* $ P ENTRY FDADR AC
0x346938…346acc Dummy {f00=0x003f, f01=0x0190, f02=»CT DRFD01 P* P************* P* * 4 P* EXTERNALS * J P* * ` P************* v P* P EXTRN TDISP DISPATCHER P EXTRN TENDIO ENDIO P EXTRN DISIOE REQUEST ERROR * P EXTRN DISEND PERF
0x346acc…346c60 Dummy {f00=0x003f, f01=0x018e, f02=»TO DWT AND SET NVL v . P EXTRN NVLCHK CHECK FOR NEW VOLUME LOADED EXTRN DWTST STATUS L EXTRN DWTECB ECB ADDRESS h " P EXTRN DWTUEC USER ECB ADDRESS $ EXTRN DWTOR DWT INDEX AND ORDER ( P EXTRN DWTORD ORDER/INDEX SAVE AREA P EXT
0x346c60…346df4 (3, 263) Dummy {f00=0x0066, f01=0x0190, f02=» ( P EXTRN SAVE8 SAVE A1-A8 ON A15 STACK P EXTRN SETIMP TIMER 0 & P EXTRN INTSAV INTERRUPT SAVE AREA L & P EXTRN PFPOST PWF POST PROC. FLAG v & P EXTRN TASCII EBCDIC TO ASCII TAB & P EXTRN TEBCDIC ASCII TO EBCDIC TAB 0 P EXTRN SPDLCI OPEN/C
0x346df4…346f88 Dummy {f00=0x0066, f01=0x0190, f02=»TIVE LENGTH z $ P EXTRN ECBCW1 ECB CONTROL WORD 1 $ P EXTRN ECBCW2 ECB CONTROL WORD 2 < P EJECT DRFD01 d P* | P************************ P* * P* CONDITIONAL ASSEMBLY * P* * P**
0x346f88…34711c Dummy {f00=0x0066, f01=0x0190, f02=»X:A EQU 1 PCHAN EQU 1 P* $ 2 P* A PROGRAM VERSION INCLUDING TOSS DISC FORMAT . ( P* IS OBTAINED BY SETTING TOSS EQU 1. d P* PX:B EQU 0 PTOSS EQU 1 P* 2 P* A PROGRAM VERSION INCLUDING IBM DISC FORMAT ( P* IS OBTAI
0x34711c…3472b0 Dummy {f00=0x0066, f01=0x0190, f02=» * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* 2 PMMUPAG EQU 1 < P* P P* Z 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION d . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P* PCPU852 EQU 0 P* P EJECT DRFD01
0x3472b0…347444 Dummy {f00=0x0066, f01=0x0190, f02=»DED BY SETTING OPCLOS =1 h P* PX:D EQU 0 * POPCLOS EQU 1 < P* P P EJECT DRFD01 Z P* r P* | P* MMU BUFFER SIZE P* P* P IFT MMUPAG=0 PDVBLEN EQU 256 P XIF P* P IFT MMUPAG=1
0x347444…3475d8 Dummy {f00=0x0066, f01=0x0190, f02=»ND EQU 10 P* P EJECT DRFD01 P* 4 P************* > P* * T P* CONSTANTS * j P* * P************* P* & PCUADR EQU 09 CONTROL UNIT ADDRESS & PMUXADR EQU CUADR+CUADR MUX-ADDRESS (
0x3475d8…34776c Dummy {f00=0x0066, f01=0x0190, f02=»923 MAX SECTOR NUMBER IBM DISC ( PBOE EQU 28 BEGIN OF EXTENT POSITION & & PEOE EQU 34 END OF EXTENT POSITION R $ PEOD EQU 74 END OF DATA POSITION | PTIME EQU 20 DELAY - POWER ON & POPENTI EQU 10 DELAY AT OPEN ORDERS P* $ PDIXTAB EQU *
0x34776c…347900 Dummy {f00=0x0066, f01=0x0190, f02=» * P* TABLES * P* * P********** 0 P* B P IFF CHAN+IBM=0 L ( P DATA DVBLEN+DVBLEN MMU BUFFER SIZE d P XIF P* P IFT CHAN=0 P IFT IBM=0 " P DATA 0 INDICATE NO MMU BUFFER P XIF P* P
0x347900…347a94 (3, 264) Dummy {f00=0x0066, f01=0x0190, f02=»D01 P* P*************** P* * . P* TEST STATUS * F P* * ^ P*************** v P* PTESTST EQU * P IFF IBM+TOSS=0 P CF A15,NVLCHK " P STR A1,A6 SAVE NVL INDICATOR P XIF
0x347a94…347c28 Dummy {f00=0x0066, f01=0x0190, f02=»7FFF RESET REQUEST ERROR BIT P ANRS A2,A6 $ P* 8 P IFF TOSS+IBM=0 B " P CF A5,VO:NAM GET VOLUME NAME Z , P LD A1,DWTORD,A6 RESTORE INDEX AND ORDER P ST A1,DWTOR,A6 P CF A15,VOLNAM P ABL END:RC P XIF P* P
0x347c28…347dbc Dummy {f00=0x0066, f01=0x0190, f02=» P* ACTIVATION * P* * P************** 4 P* J PFDAD EQU * ACTIVATION ENTRY T P IFT MMUPAG=1 x P IFT CHAN=0 P CM BUFFLG,A6 P XIF P* $ P LD A2,DWTOR,A6 INDEX AND ORDER 0 P ST A2,DWTORD,A6 S
0x347dbc…347f50 Dummy {f00=0x0066, f01=0x018e, f02=» P IFT OPCLOS=1 P* & P* CHECK IF OPEN OR CLOSE ORDER $ P* N P LDR A1,A7 ORDER X P SUK A1,/21 p P RF(Z) OPEN OPEN P SUK A1,1 " P RF(NZ) FD:ORD NOT CLOSE ORDER P* P EJECT P* P********* P
0x347f50…3480e4 Dummy {f00=0x0066, f01=0x0190, f02=» 2 P* ZERO OF THE SOP LIGHTS EXTERNAL REGISTER P* : " P LDKL A1,/8000 MASK FOR BIT 0 D & P ORS A1,SPDLCI SET OPEN/CLOSE BIT j P RF OPEN10 P* P EJECT P* P******** P* * P* OPEN * P* * P
0x3480e4…348278 Dummy {f00=0x0066, f01=0x0190, f02=»* POPEN EQU * " P LDKL A1,/7FFF MASK FOR BIT 0 ( P ANS A1,SPDLCI CLEAR OPEN/CLOSE BIT B P* n POPEN10 EQU * x 0 P LD A1,SPDLCI SOP LIGHTS AND OPEN/CLOSE DATA " P OTR A1,0,SOPDA OPEN FD DRIVE P* * P* WAIT FOR DRIVE TO B
0x348278…34840c Dummy {f00=0x0066, f01=0x0190, f02=»DWT-ADDR P CF A15,SETIMP WAIT . P DATA OPENRE,OPENTI START ADDR, WAIT TIME , P ABL TDISP EXIT ^ P* v POPENRE EQU * P LDR A6,A1 GET DWT-ADDR , P CM DWTTP2,A6 INDICATE NO TIMER RUNNING P LDK A1,0 RETURN CODE ( P RF DI
0x34840c…3485a0 Dummy {f00=0x0066, f01=0x018e, f02=»FD:ORD EQU * P LC A2,DIXTAB,A3 , P SC A2,DWTA3+1,A6 SAVE DRIVE INDEX MASK , P* P IFT IBM+TOSS=2 f P AN A2,DWTLAB,A6 ~ ( P SC A2,DWTFIB+1,A6 INDICATE TOSS/IBM P XIF P* P CF A5,SETCIO A3,A4 AFFECTED P* P E
0x3485a0…348734 (3, 265) Dummy {f00=0x0067, f01=0x0190, f02=» " P RF(N) INTEST READ/WRITE ORDER P SUK A3,18 * P ABL(NP) LOAD LOAD/UNLOAD < P XIF ^ P* j P IFT IBM=1 t P SUK A3,1 P RF(Z) INTEST BASIC READ P SUK A3,1 " P RF(Z) IBMCHK SEQUENTIAL READ P SUK A3,3 P RF(Z)
0x348734…3488c8 Dummy {f00=0x0067, f01=0x0190, f02=» n P SUK A3,11 P RF(Z) IBMCHK REWIND P SUK A3,7 6 P ABL(NP) LOAD LOAD/UNLOAD H P XIF j P* v PIBMCHK EQU * P IFT TOSS+IBM=2 P LD A4,DWTFIB,A6 & P ABL(NZ) IBMDSK IBM DISC HANDLING P XIF P* P IFT
0x3488c8…348a5c Dummy {f00=0x0067, f01=0x0190, f02=»REQERR ABL DISIOE REQUEST ERROR P* ( 0 PINCLEN EQU * INCORRECT REQUESTED LENGTH EXIT 2 P LDKL A1,/8008 RETURN CODE f P* PDIS:EN EQU * . P ABL DISEND PERFORM TENDIO AND GO TO TDISP P* P EJECT DRFD01 P* P* INPU
0x348a5c…348bf0 Dummy {f00=0x0067, f01=0x018e, f02=»1,0 $ P RB(NZ) DIS:EN NEW VOLUME LOADED P XIF 4 P* @ P LD A3,ECBRL,A8 J 2 P RB(Z) INCLEN INCORRECT INPUT PARAMETER ECBRL b ( P SRC A3,7 NUMBER OF PHYSICAL SECTORS 2 P RB(N) INCLEN INCORRECT INPUT PARAMETER ECBRL P CWK A3,/01FF
0x348bf0…348d84 Dummy {f00=0x0067, f01=0x0190, f02=» P LD A4,DWTFIB,A6 P RF(NZ) INTES5 IBM-DISC P XIF < P* H P IFT TOSS=1 R P LDR A4,A3 f 6 P SRC A4,1 CHECK IF EVEN NUMBER OF PHYSICAL SECTORS x 2 P RB(N) INCLEN INCORRECT INPUT PARAMETER ECBRL 6 P SLL A2,1 TRANSFER TOSS-SEC. NO
0x348d84…348f18 Dummy {f00=0x0067, f01=0x018e, f02=»ECTOR NUMBER v P RB(N) REQERR REQUEST ERROR P SUKL A4,MAXSEC 8 P RB(NN) REQERR REQUEST ERROR P P ADR A4,A3 t " P RB(P) INCLEN INCORRECT LENGTH , P ST A3,DWTNOS,A6 SAVE NUMBER OF SECTORS 2 P ST A2,DWTCW2,A6 DWTCW2 CONTAINING PHYS SEC
0x348f18…3490ac Dummy {f00=0x0067, f01=0x0190, f02=» P ANK A2,/30 4 P ST A2,DWT:BF,A6 SAVE BITS 0-1 IN 18-BIT ADDRESS P XIF T P* ` P EJECT DRFD01 j P* P* MULTIPLE SECTOR IO ENTRY P* PFD:000 EQU * P IFT MMUPAG=1 P IFT CHAN=0 P LD A2,DWT:BF,A6
0x3490ac…349240 Dummy {f00=0x0067, f01=0x0190, f02=»05 FOUR PHYS. SEC. IO P* PFD:003 SUK A2,128 ( P SUK A4,1 B P ADK A3,1 T P RB(NZ) FD:003 f P* | PFD:005 EQU * . P ST A4,DWTSIO,A6 SECTORS IN ONE IO ON DISC ( P ST A2,DWTRL,A6 UPDATE DWTRL FOR BIO . P ST A3,DWTNOS,A6
0x349240…3493d4 (3, 266) Dummy {f00=0x0067, f01=0x0190, f02=»D A2,DWTBA,A6 BUFFER ADDRESS P LD A1,DWT:BF,A6 $ , P RF(NZ) FD:007 BUFFER NOT IN SYSTEM AREA < P LDR A3,A2 l P RF(NN) FD:009 ~ 6 P AD A3,DWTRL,A6 CHECK IF 64K LIMIT WILL BE PASSED P RF(N) FD:009 NO P* P EJECT DRFD01 P*
0x3493d4…349568 Dummy {f00=0x0067, f01=0x0190, f02=»,DWT:PA,A6 6 BIT PHYSICAL BUFFER ADDRESS ( P ADK A1,/4 CREATE ONE MORE MMU ENTRY 0 P SC A1,DWT:PA+2,A6 P ANKL A2,/FFF v P LDR A1,A2 ( P ORK A1,1 INDICATE ADDRESS NOT ZERO P* 8 PFD:009 ST A1,DWT:LA,A6 16 BIT LOGICAL BUFFER ADDRESS
0x349568…3496fc Dummy {f00=0x0067, f01=0x0190, f02=»Z) FD:060 BASIC READ P SUK A1,4 P RF(Z) FD:015 BASIC WRITE . P SUK A1,12 P P RF(Z) FD:060 PHYSICAL READ b P SUK A1,4 P RF(Z) FD:013 PHYSICAL WRITE * P SUK A1,15 CHECK IF WRITE DELETED DATA P* PRQ:ERR EQU * P
0x3496fc…349890 Dummy {f00=0x0067, f01=0x0190, f02=» & P LDK A4,1 WRITE DELETED DATA ORDER ! & PFD:013 EQU * PHYSICAL WRITE ORDER ! . P ADK A4,4 ! X " PFD:015 EQU * BASIC WRITE ORDER ! j P ADK A4,1 ! " P CF A5,BIO PREPARATION FOR CIO ! P* ! P IFT MMUPAG=1 ! P IFT CHAN=0 ! P IFT TOSS+IB
0x349890…349a24 Dummy {f00=0x0067, f01=0x018e, f02=»D A1,DWT:LA,A6 GET FLAG/LOGICAL BUFFER ADDRESS ! ( P RF(Z) FD:019 BUFFER IN SYSTEM AREA " 6 P LDR A7,A3 REQUESTED LENGTH " b P LDR A8,A2 SAVE A2 " & P LDKL A4,BUF DRIVER BUFFER ADDRESS " P LDR A2,A4 " & P TS -30,A15 SAVE RUNNING TASK MMU " ( P T
0x349a24…349bb8 Dummy {f00=0x0067, f01=0x018e, f02=» P LDR A2,A8 RESTORE A2 # 0 P CM BUFFLG,A6 INDICATE BUFFER IN SYSTEM AREA # " PFD:019 EQU * # V P XIF # j P* # v P IFT TOSS+IBM=2 # P LD A1,DWTFIB,A6 # P RF(Z) FD:018 NOT IBM # P XIF # P* # P IFT IBM=1 # , P LDR A7,A3 NO OF C
0x349bb8…349d4c Dummy {f00=0x0067, f01=0x0190, f02=» " P CF A5,FD:WRITE PERFORME WRITE $ * P ANKL A3,/200 CHECK IF WRITE PROTECTED $ * P RF(Z) FD:020 $ X P LDK A3,/40 INDICATE ERROR $ n , P ORRS A3,A6 UPDATE TEMPORARY RETURN CODE $ PFD:020 EQU * $ P RF FD:100 GOTO FDMSIO $ P* $ P EJECT DRF
0x349d4c…349ee0 Dummy {f00=0x0067, f01=0x0190, f02=»******* $ P* % PFD:060 CF A5,BIO % P* % 2 P IFT MMUPAG=1 % < P IFT CHAN=0 % R P IFT TOSS+IBM=2 % f P LD A1,DWTFIB,A6 % ~ P RF(Z) FD:070 TOSS DISC % & P LDKL A4,BUF DRIVER BUFFER ADDRESS % 0 P CM BUFFLG,A6 INDICATE BUFFER IN SYSTEM
0x349ee0…34a074 (3, 267) Dummy {f00=0x0067, f01=0x0190, f02=»FFER IN SYSTEM AREA % & P LDKL A4,BUF DRIVER BUFFER ADDRESS & 0 P CM BUFFLG,A6 INDICATE BUFFER IN SYSTEM AREA & F P XIF & z P* & P IFT MMUPAG=1 & P IFT IBM=1 & P IFT TOSS+CHAN=0 & & P LDKL A4,BUF DRIVER BUFFER ADDRESS & 0 P CM BUFFLG,A6
0x34a074…34a208 Dummy {f00=0x0067, f01=0x0190, f02=»M=2 & P LD A1,DWTFIB,A6 ' P RF(Z) FD:090 NOT IBM ' $ P XIF ' B P* ' N P IFT IBM=1 ' X P IFT MMUPAG=0 ' j ( P LD A4,DWTBA,A6 ASCII OUTPUT ADDRESS ' P XIF ' P* ' P IFT IBM=1 ' P LD A7,DWTRL,A6 REQ. LEN ' P CF A5,ASCII ' P
0x34a208…34a39c Dummy {f00=0x0067, f01=0x0190, f02=»S+IBM=2 ' P LD A1,DWTFIB,A6 ( P RF(Z) FD:100 TOSS DISC ( ( P XIF ( H P* ( T P IFT MMUPAG=1 ( ^ P IFF CHAN+IBM=0 ( t 4 P LD A2,DWT:LA,A6 GET FLAG/LOGICAL BUFFER ADDRESS ( ( P RF(Z) FD:100 BUFFER IN SYSTEM AREA ( $ P LD A7,DWTRL,A6 REQUESTE
0x34a39c…34a530 Dummy {f00=0x0067, f01=0x0190, f02=»E ( n 2 P MVSU A7 MOVE BUFFER FROM SYSTEM TO USER AREA ) & P TL -30,A15 RESTORE MMU FROM STACK ) @ P XIF ) j PFD:100 EQU * ) v P ABL FDMSIO ) P* ) P EJECT DRFD01 ) P* ) P******** ) P* * ) P* LOAD * ) P* * )
0x34a530…34a6c4 Dummy {f00=0x0067, f01=0x0190, f02=»Z) LOAD00 LOAD ORDER ) P ADK A3,17 * $ P RB(NZ) RQ:ERR ERROR IF NOT LOCK * . P* * V PLOAD00 EQU * * ` P LDK A2,/14 LOCK * t P CF A5,FD:REA * P ANK A3,1 * & P RF(NZ) LOA:80 ENDIO NOT OPERABLE * P* * P IFT TOSS+IBM=2 * P LD A1,D
0x34a6c4…34a858 Dummy {f00=0x0067, f01=0x018e, f02=» * P RF(Z) LOA:65 LOCK ORDER + P CF A5,VO:NAM + ( " P CF A5,LD:RC CHECK RETURN CODE + > P EJECT DRFD01 + d P* + | P* READ DATA SET LABEL + P* + P LD A2,ECBCW2,A8 SECTOR NO + P SUK A2,7 + P RF(N) LOA:85 REQUEST ERROR + P S
0x34a858…34a9ec Dummy {f00=0x0067, f01=0x0190, f02=» P CF A5,FD:REA , P SLL A1,4 CHECK NO DATA BIT , P RF(NN) LOA:60 NOT NO DATA , > 0 P ORK A3,/10 INDICATE ILLEGAL DATA SET LABEL , ` PLOA:60 EQU * , P CF A5,LD:RC , P ENB , * P LD A3,ECBCW2,A8 DATA SET LABEL SECTOR , P LDK A1,DWTDSS ,
0x34a9ec…34ab80 Dummy {f00=0x0067, f01=0x0190, f02=» $ P CF A5,STDWT STORE BOE NO IN DWT - P SUK A3,1 CRN - , P LDK A1,DWTCRN - B P CF A5,STDWT - X P ADK A4,EOE-BOE EOE ADDRESS - l P CF A5,LOGSEC - P LDK A1,DWTEOE - $ P CF A5,STDWT STORE EOE NO IN DWT - P ADK A4,EOD-EOE EOD ADDRESS - P
0x34ab80…34ad14 (3, 268) Dummy {f00=0x0156, f01=0x0190, f02=» EOD NO IN DWT - ~ P* . PLOA:65 EQU * . P LDKL A3,/400 . 4 , P ORRS A3,A6 UPDATE TEMPORARY RETURN CODE . J P* . z PLOA:70 EQU * . P XIF . P LD A2,DWTA3,A6 . " P ORS A2,DWTLC,A6 INDICATE LOCK . PLOA:80 EQU * . P ABL END:RC .
0x34ad14…34aea8 Dummy {f00=0x0156, f01=0x0190, f02=» . P* / P EJECT DRFD01 / P* / * P* / 4 P IFF TOSS+IBM=0 / > P* / V P* ERROR , UNLOCK / ` P* / z PLOA:90 EQU * / P LDR A5,A6 / P ADKL A5,DWTSB2 STACK BASE / P LDK A2,/C UNLOCK / P CF A5,FD:REA / P RB LOA:80 /
0x34aea8…34b03c Dummy {f00=0x0156, f01=0x0190, f02=»A4,BUF DRIVER BUFFER ADDRESS / P RTN A5 0 $ P XIF 0 4 P* 0 @ P EJECT DRFD01 0 J P* 0 b P********** 0 l P* * 0 ~ P* UNLOAD * 0 P* * 0 P********** 0 P* 0 PUNLOAD EQU * 0 P IFT IBM=1 0 P* 0 P* DAT
0x34b03c…34b1d0 Dummy {f00=0x0156, f01=0x018e, f02=»2,A8 STORE EOD-NO IN CONTROL WORD OF ECB 0 P* 1 0 , P* READ DATA SET LABEL TO DRIVER BUFFER 1 : P* 1 j P CF A5,DSLIO PREPARE FOR I/O 1 t & P CF A5,FD:REA READ DATA SET LABEL 1 $ P CF A5,UNL:RC RETURN CODE CHECK 1 P ENB 1 P* 1 < P* TRANS
0x34b1d0…34b364 Dummy {f00=0x0156, f01=0x0190, f02=» P* 2 P LDK A1,0 2 PUNL:10 SUK A7,26 2 P RF(N) UNL:20 2 8 P ADK A1,1 2 N P RB UNL:10 2 ` P* 2 r P EJECT DRFD01 2 | P* 2 P* 2 PUNL:20 ADK A7,27 2 P* 2 P* A1 = BINARY TRACK NO 2 * P* A7 = SECTOR NO WITHIN TRAC
0x34b364…34b4f8 Dummy {f00=0x0156, f01=0x0190, f02=» A4,1 2 P SRL A3,8 LEFT BYTE 3 P SCR A3,A4 STORE IN BUFFER 3 * P LDR A7,A1 TRACK 3 L ( P CF A5,BINDEC DEC EBCDIC-CODED IN A3 3 d P SUK A4,3 3 P STR A3,A4 TRACK INTO BUF 3 F P INH INHIBIT INTERRUPTS INHIBIT 3
0x34b4f8…34b68c Dummy {f00=0x0156, f01=0x0190, f02=»WRITE WRITE DATA SET LEBEL 3 $ P CF A5,UNL:RC CHECK RETURN CODE 4 " P CF A5,DSOPCH 4 J P CMR A2 INDICATE NOT OPEN 4 ` P* 4 P EJECT DRFD01 4 P* 4 P* UNLOCK 4 P* 4 P XIF 4 PUNL:70 EQU * 4 P LDK A2,/C UNLOCK 4 P C
0x34b68c…34b820 Dummy {f00=0x0156, f01=0x0190, f02=»LOCK IN DWT 4 t P RB LOA:80 END:IO 5 P* 5 . P IFT IBM=1 5 8 P* 5 J P* UNLOAD RETURN CODE CHECK 5 T P* 5 x PUNL:RC EQU * 5 P ANKL A3,/207 5 P RF(Z) RTN:A5 NO RETURN CODE 5 P ANKL A3,/200 5 & P RF(Z) RTN:A5 NOT WRITE PROTECTED
0x34b820…34b9b4 (3, 269) Dummy {f00=0x0157, f01=0x0190, f02=»EMPORARY RETURN CODE 5 | PRTN:A5 EQU * 6 P RTN A5 6 0 P* 6 @ P EJECT DRFD01 6 J P* 6 b P* 6 l ( PIBMDSK EQU * IBM DISK HANDLING ENTRY 6 v P IFT IBM=1 6 . P CF A15,NVLCHK CHECK IF NEW VOLUME LOADED 6 P ADK A1,0 6 & P ABL(NZ) END:IO
0x34b9b4…34bb48 Dummy {f00=0x0157, f01=0x0190, f02=»,DWTOR+1,A6 ORDER CODE 6 P SUK A1,49 7 P RF(Z) REWIND REWIND FILE 7 0 * P LD A3,ECBRL,A8 CHECK REQUESTED LENGTH 7 R P SUK A3,SECLEN 7 $ P ABL(NZ) INCLEN INCORRECT LENGTH 7 P ADK A1,43 7 $ P RF(Z) SQWRITE SEQUENTIAL WRITE 7 P ADK A1,4 7 0
0x34bb48…34bcdc Dummy {f00=0x0157, f01=0x0190, f02=»AL READ * 7 P******************* 8 P* 8 . . P ADK A2,DWTCRN-DWTEOD A2 = ADDRESS TO CRN 8 8 P LDR* A3,A2 CRN 8 j P ADK A3,1 CRN+1 8 ( P ST A3,ECBCW2,A8 STORE CRN+1 IN ECB 8 P CWK A3,MAXIBM 8 P RF(P) FD:DIS REQUEST ERROR 8 P CWR A3,
0x34bcdc…34be70 Dummy {f00=0x0157, f01=0x0190, f02=» 8 b P* 9 P IFT MMUPAG=0 9 ( P LD A4,ECBBA,A8 USER BUFFER ADDRESS 9 ( P XIF 9 T P* 9 ` P IFT IBM=1 9 j P LDK A7,SECLEN 9 | $ P CF A5,ASCII TRANSFORM TO ASCII 9 P* 9 P EJECT DRFD01 9 P* 9 P* 9 P IFT MMUPAG=1 9 ( P T
0x34be70…34c004 Dummy {f00=0x0157, f01=0x0190, f02=»BUFFER ADDRESS 9 | & P LD A2,DWTUEC,A6 USER ECB ADDRESS : ( P EL A2,ECBBA,A2 USER BUFFER ADDRESS : @ P LDK A7,SECLEN LENGTH : l ( P MVSU A7 MOVE SECTOR TO USER BUFFER : , P TL -30,A15 RESTORE MMU TABLE FROM STACK : P XIF : P* : P IFT IBM=1 :
0x34c004…34c198 Dummy {f00=0x0157, f01=0x0190, f02=»,/1000 RETURN CODE : P RF END:IO ; P* ; , P EJECT DRFD01 ; 6 P* ; N P******************* ; X P* SEQUENTIAL WRITE * ; t P******************* ; P* ; PSQWRIT EQU * ; P* ; P* CHECK IF END OF EXTENT ; P* ; P LDK A1,
0x34c198…34c32c Dummy {f00=0x0157, f01=0x0190, f02=»DIS REQUEST ERROR ; P CWR* A7,A2 < P RF(G) ENDEOE END OF EXTENT < . P* < R P IFT MMUPAG=1 < ( P TS -30,A15 SAVE RUNNING TASK'S MMU < r " P LD A7,DWTTAB,A6 TTAB ADDRESS < P TL TTB:MT,A7 LOAD MMU TABLE < & P LD A1,DWTUEC,A6 USER ECB ADDRES
0x34c32c…34c4c0 Dummy {f00=0x0157, f01=0x0190, f02=»OVE SECTOR TO DRIVER BUFFER < , P TL -30,A15 RESTORE MMU TABLE FROM STACK = $ P XIF = T P* = ` P IFT IBM=1 = j P LDK A4,5 BIO WRITE = | P CF A5,BIOSQ = P LDK A7,SECLEN = , P CF A5,EBCDIC TRANSFORM AND MOVE TO BUF = P* = P EJECT DRFD
0x34c4c0…34c654 (3, 270) Dummy {f00=0x0157, f01=0x0190, f02=»S A1,A6 UPDATE TEMPORARY RETURN CODE = PSQW:05 EQU * > , P CF A5,DSOPCH > @ PSQW:10 EQU * > V 2 P ANKL A3,/207 WRITE PROTECTED OR NOT OPERABLE > j P RF(NZ) END:RC > * P IMR A2 EOD=EOD+1 OR CRN=CRN+1 IN DWT > P LDK A2,SECLEN > , P ST A2,ECBEL,A
0x34c654…34c7e8 Dummy {f00=0x0157, f01=0x0190, f02=»RFD01 > P* ? P********** ? P* REWIND * ? * P********** ? < P* ? N PREWIND EQU * ? X P LDR A3,A2 SAVE EOD ADDRESS ? l P LDK A1,DWTBOE ? P CF A5,DSPAD ? P LDR* A4,A2 BOE ? P STR A4,A3 EOD = BOE ? P LDK A1,DWTCRN ? P CF
0x34c7e8…34c97c Dummy {f00=0x0157, f01=0x018e, f02=» ? P EJECT DRFD01 @ P* @ P***************** @ * P* * @ D P* PERFORM ORDER * @ ^ P* * @ x P***************** @ P* @ P* @ P* INPUT: A2 BIO CONTENTS @ 0 P* A3 NO OF BYTES TO BE TRA
0x34c97c…34cb10 Dummy {f00=0x0157, f01=0x0190, f02=» P XIF A P IFT CHAN=1 A " P LDK A1,0 INDICATOR WRITE MODE A $ P XIF A J P RF FD:800 A V P* A h PFD:REA EQU * A r P IFT CHAN=1 A P LDK A1,1 READ MODE A P XIF A P IFT CHAN=0 A P LDKL A1,/8000 WORDS READ A P XIF A PFD:8
0x34cb10…34cca4 Dummy {f00=0x0157, f01=0x0190, f02=»PAG=1 A 2 P LD A7,BUFFLG,A6 CHECK WHAT BUFFER TO READ TO B ( P RF(Z) FD:810 BUFFER IN SYSTEM AREA B D 0 P LD A7,DWT:BF,A6 BITS 0-1 IN 18-BIT ADDRESS B p P ECR A7,A7 B P ORR A1,A7 B PFD:810 EQU * B P XIF B P* B P IFT CHAN=0 B P O
0x34cca4…34ce38 Dummy {f00=0x0157, f01=0x0190, f02=»JECT DRFD01 B P* C . P* PUT BUFFER START AND END ADDRESS IN DWT C P* C R " P ST A1,DWTRW,A6 INDICATE MODE C P ST A4,DWTUB,A6 C P ADR A3,A4 C " P ST A3,DWTUBE,A6 END ADDRESS+2 C P XIF C & P ST A5,DWTA5,A6 SAVE STACK POINTER C P
0x34ce38…34cfcc Dummy {f00=0x0157, f01=0x0190, f02=»R CIO START C ( P RF(3) END:30 DEVICE ADDRESS UNKNOWN D P RF T:DISP D @ P* D R P EJECT DRFD01 D P* D t * P************************************* D ~ P* D < P* FDMSIO - UPDATE PARAMETERS FOR MULTIPLE SECTOR IO * D * P*
0x34cfcc…34d160 Dummy {f00=0x0157, f01=0x0190, f02=»ER D p P LDR* A1,A6 RETURN CODE E & P ANK A1,/7F GET ERROR RETURN CODE E * P RF(NZ) END:RC E T 0 P LD A2,DWTSIO,A6 GET NUMBER OF SECTORS DONE E j $ P ADS A2,DWTCW2,A6 UPDATE DWTCW2 E P LD A2,DWTRL,A6 E " P ADS A2,ECBEL,A8 UPDATE ECBEL E P LD
0x34d160…34d2f4 (3, 271) Dummy {f00=0x0157, f01=0x0190, f02=»PDATE BUFFER POINTER E P ST A2,DWTBA,A6 F & P RF(N) FDMSI1 NOT PASSED 64K LIMIT F 4 P ADK A4,0 F ^ ( P RF(NN) FDMSI1 NOT PASSED 64K LIMIT F p P LDK A2,/10 F & P ADS A2,DWT:BF,A6 UPDATE BITS 0-1 F PFDMSI1 EQU * F P XIF F P* F P IFT
0x34d2f4…34d488 Dummy {f00=0x0157, f01=0x0190, f02=» P EJECT DRFD01 G P* G P********** G & P* * G 8 P* END:IO * G J P* * G P********** G n P* G P IFT IBM=1 G $ PENDEOE EQU * END OF EXTENT EXIT G P LDKL A1,/2000 RETURN CODE G P RF END:IO G P XIF G P* G
0x34d488…34d61c Dummy {f00=0x0157, f01=0x0190, f02=»D:30 EQU * CU ADDRESS UNKNOWN G P LDK A1,1 NOT OPERABLE H & * P ST A1,DWTST,A6 INDICATE RECOVERY DONE H D P RB END:IO H r P EJECT DRFD01 H P* H P******************** H P* * H P* RECOVERY ROUTINE * H P*
0x34d61c…34d7b0 Dummy {f00=0x0157, f01=0x0190, f02=»IF H P* I P IFT CPU852=0 I " P MSR 8,A15 SAVE A1-A8 ON STACK I * P XIF I P P* I P LDKL A6,DWFD01 DWT ADDRESS I f P CM DWTST,A6 I P IM DWTA2,A6 SET FDON FLAG I P* I P EJECT I P* I P* DELAY 2 SEC I P* I P LD A4
0x34d7b0…34d944 Dummy {f00=0x0157, f01=0x018e, f02=» LDK A4,DWTTP I P ADR A4,A6 J P LDR A1,A6 SAVE A6 J ( P CF A15,SETIMP J B P DATA FDON20,TIME J X P* J r PF:DISP EQU * J | P RB T:DISP J P* J P* TIME OUT ROUTINE J P* J PFDON20 LDR A6,A1 J P CM DWTTP,A6 J P LDKL A5,D
0x34d944…34dad8 Dummy {f00=0x0157, f01=0x0190, f02=» P IFT CHAN=0 K $ P CM BUFFLG,A6 RESET BUFFER FLAG K P XIF K @ P* K L P IFF TOSS+IBM=0 K V 4 P IM DWTST2,A6 SET RECOVERY/READY INT. INDICATOR K n P LDK A3,3 4 VOLUMES K P* K P EJECT DRFD01 K P* K P* K P* READ VOLUME NAM
0x34dad8…34dc6c Dummy {f00=0x0157, f01=0x0190, f02=»,A6 SAVE IT K P CF A5,SETCIO L P LDK A2,/14 L * P CF A5,FD:REA LOCK L > P ANK A3,1 L X P RF(Z) FDON19 OPERABLE L j P LDK A1,6 NOT OPERABLE L $ P CF A15,VOLCLR CLEAR VOLUME NAME L & P RF FDON21 CONTINUE WITH NEXT DISC L P* L PFDON19
0x34dc6c…34de00 Dummy {f00=0x0157, f01=0x0190, f02=» * L P LDK A2,/C M P CF A5,FD:REA UNLOCK M P LDK A3,0 M 8 , P LC A3,DWTOR,A6 GET INDEX FOR LAST VOL. M J P SUK A3,1 M z P RB(NN) FDONLD NEXT VOLUME M P CM DWTOR,A6 M ( P CM DWTST2,A6 INDICATE VOLUMES READ M , P IM DWTST,A6 INDICATE VOLU
0x34de00…34df94 (3, 272) Dummy {f00=0x0157, f01=0x0190, f02=» ORDER IF RUNNING M l P* N " P LD A4,DWTTP2,A6 TIMER POINTER N $ P RF(Z) FDON09 NOT RUNNING N J P CMR A4 STOP TIMER N l $ P CM DWTTP2,A6 INDICATE NO TIMER N PFDON09 EQU * N P* N 6 P* OPEN FD TO MAKE FOLLOWING LOCK ORDER POSSIBLE N P*
0x34df94…34e128 Dummy {f00=0x0157, f01=0x018e, f02=» N p P ORS A2,DWTOCF,A6 SAVE O ( P XRRS A2,A4 SET STATUS WORD TO OPEN O & P LDR* A2,A4 O R & P OTR A2,0,SOPDA SET DRIVE TO OPEN O f P* O PFDON23 EQU * O P XIF O P* O P EJECT O P* O P* LOCK DOORS O P* O P LDK A2,1 O
0x34e128…34e2bc Dummy {f00=0x0157, f01=0x0190, f02=» O z P* P P EJECT P P* P P* PUT DRIVE NO IN CIO INSTR P * P* P N P SRN A2,A3 DRIVE NO IN A3 P X * P CF A5,SETCIO PUT DRVE NO IN CIO-INSTR P z P LDK A2,/14 LOCK P P CF A5,FD:REA P P LD A2,DWTA3,A6 DRIVE IND. P P ANK A3,1 P
0x34e2bc…34e450 Dummy {f00=0x0157, f01=0x018e, f02=»ON25 P P* Q P IFT OPCLOS=1 Q P* Q , D P* RESTORE OPEN/CLOSE STATUS TO SAME VALUE AS BEFORE POWER OFF Q 6 P* Q ~ $ P LD A2,DWTOCF,A6 OPEN/CLOSE FLAG Q " P ORS A2,SPDLCI TO STATUS WORD Q P CM DWTOCF,A6 CLEAR FLAG Q $ P LD A2,SPDLCI OPEN
0x34e450…34e5e4 Dummy {f00=0x0157, f01=0x0190, f02=» Q P* R P CM DWTA2,A6 RESET FDON FLAG R PFDON60 EQU * R 6 P LD A8,DWTECB,A6 R J 0 P ABL(Z) END:IO NO REQUEST, RETURN VIA TENDIO R b P* R P* RETRY REQUEST R P* R P IM DWTRTY,A6 INDICATE RETRY R P LD A7,DWTORD,A6 R , P ST A7,DWT
0x34e5e4…34e778 Dummy {f00=0x0157, f01=0x0190, f02=»* R P EJECT DRFD01 S P* S " P******************** S , P* * S H P* READY INTERRUPT * S d P* * S P******************** S P* S PFDRE EQU * S P LD A2,DWTA2,A6 S * P RB(NZ) F:DISP POWER ON ROUT
0x34e778…34e90c Dummy {f00=0x0157, f01=0x0190, f02=»* S P IFF TOSS+IBM=0 T P CM DWTST,A6 SET UNIT BUSY T " P RB FDONVL READ VOLUME NAMES T D P XIF T h P* T t P EJECT DRFD01 T ~ P* T P********************* T P* * T P* INTERRUPT HANDLER * T P*
0x34e90c…34eaa0 Dummy {f00=0x0157, f01=0x0190, f02=» CF A15,SAVE8 SAVE REGISTERS ON STACK T P XIF U . P* U : P IFT CPU852=0 U D " P MSR 8,A15 SAVE A1-A8 ON STACK U Z P XIF U P* U P LDKL A6,DWFD01 DWT ADDRESS U P IFT CHAN=1 U P ENB U & P LD A1,DWTUB,A6 GET BUFFER POINTER U " P LD
0x34eaa0…34ec34 (3, 273) Dummy {f00=0x0158, f01=0x0190, f02=»RRUPT U x P LD A3,PFPOST V , P RF(NZ) IHDISP POST PROCESSING FLAG SET V $ ( P LD A3,DWTRW,A6 READ/WRITE INDICATOR V T P RF(NZ) IH050 READ V P* V P EJECT DRFD01 V P* V P* V PIH010 EQU * V $ P LDR* A3,A1 ONE WORD FROM BUFFER V
0x34ec34…34edc8 Dummy {f00=0x0158, f01=0x018e, f02=» A2,0,CUADR CIO HALT V PIHDISP EQU * W P ABL TDISP GOTO DISPATCHER W 0 P* W R PIH050 EQU * W P INR A3,0,CUADR READ W p P RB(NA) IH005 W " P STR A3,A1 ONE WORD TO BUFFER W $ P ADK A1,2 UPDATE BUFFER POINTER W P SUK A2,2 W P RB(P)
0x34edc8…34ef5c Dummy {f00=0x0158, f01=0x0190, f02=» P* X P EJECT DRFD01 X P* X & P* X 0 P IFT CHAN=0 X : P SST A3,CUADR STATUS X N P XIF X j P LD A8,DWTECB,A6 ECB ADDRESS X v " P LD A5,DWTA5,A6 STACK POINTER X P LDR A2,A3 STATUS X P SLL A2,1 X P RB(N) FDRE READY INTERRUPT
0x34ef5c…34f0f0 Dummy {f00=0x0158, f01=0x0190, f02=»LT, NOT OPERABLE X ~ P RF(Z) IH:10 RETURN CODE OK Y P ORK A3,4 Y < PIH:10 EQU * Y N P* Y b P EJECT DRFD01 Y l P* Y & P* TRANSFORM RETURN CODE, CU - ECB Y P* Y P ANKL A3,/FF37 Y P RF(Z) IH:80 Y P LDR A1,A3 Y " P ANKL A3,/
0x34f0f0…34f284 Dummy {f00=0x0158, f01=0x0190, f02=»O Y x PIH:70 EQU * Z P LDR A4,A1 Z P ANKL A4,/0400 BIT 5 Z 0 P SLC A4,7 TO BIT 14 Z L P ORR A3,A4 Z h P* Z z P IFT TOSS+IBM=0 Z P LDR A4,A1 Z P ANKL A4,/2000 BIT 2 Z P SLL A4,1 TO BIT 1 Z P ORR A3,A4 Z P XIF Z P* Z
0x34f284…34f418 Dummy {f00=0x0158, f01=0x018e, f02=» Z ~ P ORR A3,A1 [ , P ORRS A3,A6 UPDATE TEMPORARY RETURN CODE [ P ANKL A3,/F7FF [ J PIH:80 EQU * [ ` P LDR A1,A3 [ t P RTN A5 [ P* [ P EJECT DRFD01 [ P* [ 0 P******************************************* [ 0 P*
0x34f418…34f5ac Dummy {f00=0x0158, f01=0x0190, f02=» 0 P******************************************* P* 8 P******* B P* * R P* BIO * b P* * r P******* P* P* INPUT: A8 ECB ADDRESS P* A4 ORDER P* > P* OUTPUT: A2 BITS 0-12 OF CONTRO
0x34f5ac…34f740 Dummy {f00=0x0158, f01=0x0190, f02=»EQU * & P LD A1,DWTCW2,A6 GET SECTOR NUMBER ] ( P SLL A1,3 PUT IN RIGHT BIO POSITION ] 8 6 P LD A2,DWTSIO,A6 GET NUMBER OF SECTORS IN THIS IO ] d P SRC A2,2 ] P ORR A2,A1 COMPLETE BIO ] & P ADR A2,A4 COMPLETE BIO WITH ORDER ] " P LD A4,DWTBA,A
0x34f740…34f8d4 (3, 274) Dummy {f00=0x0158, f01=0x0190, f02=»************* ] P* * ^ P* BIOSQ * ^ 0 P* * ^ J P***************** ^ d P* ^ ~ P* INPUT: A8 ECB ADDRESS ^ P* A4 ORDER ^ P* ^ > P* OUTPUT: A2 BITS 0-12 OF CONTROL WORD USED BY CIO S
0x34f8d4…34fa68 Dummy {f00=0x0158, f01=0x0190, f02=» IBM=1 ^ & P LD A2,ECBCW2,A8 GET SECTOR NUMBER _ ( P SLL A2,3 PUT IN RIGHT BIO POSITION _ 8 & P ADR A2,A4 COMPLETE BIO WITH ORDER _ d P* _ P IFT MMUPAG=0 _ & P LD A4,ECBBA,A8 GET BUFFER ADDRESS _ P XIF _ P* _ P IFT IBM=1 _ P IFT MMU
0x34fa68…34fbfc Dummy {f00=0x0158, f01=0x0190, f02=» RTN A5 _ P XIF ` P* ` P EJECT DRFD01 ` & P* ` < P****************** ` F P* VO:NAM * ` ` P****************** ` z P* ` P* ` PVO:NAM EQU * ` P IFT TOSS+IBM=2 ` P LDK A3,36 LENGTH ` P XIF ` P* ` P IFT
0x34fbfc…34fd90 Dummy {f00=0x0158, f01=0x0190, f02=»DKL A4,BUF READ TO BUFFER ` P CF A5,FD:REA a " P ANK A3,/17 FATAL ERROR a 8 P RF(NZ) VOL:40 a X P IFT IBM=1 a n P LD A2,BUF+32 a P CWK A2,'TO' a P RF(NE) VOL:10 IBM DISC a P LD A2,BUF+34 GET NEXT WORD a P CWK A2,'SS' a P RF(NZ
0x34fd90…34ff24 Dummy {f00=0x0158, f01=0x0190, f02=» DRFD01 a P* b P* b P IFT TOSS=1 b & P LDKL A2,BUF b : P IFT IBM=1 b N P RF VOL:20 b ` P XIF b r P* b ~ P IFT IBM=1 b PVOL:10 EQU * b P LDK A3,10 LENGTH b P LDK A2,/30 BIO b P LDKL A4,BUF READ TO BUFFER b P CF
0x34ff24…3500b8 Dummy {f00=0x0158, f01=0x0190, f02=»TE IBM b x P LDKL A1,/400 c , P ORRS A1,A6 UPDATE TEMPORARY RETURN CODE c $ P LDK A7,10 NO OF CHARACTERS c T 2 P CF A5,ASCII TRANSFER IBM VOLUME NAME TO ASCII c x 0 P LDKL A2,BUF+4 START ADDRESS OF VOLUME NAME c P XIF c P* c P EJECT DRFD01
0x3500b8…35024c Dummy {f00=0x0158, f01=0x0190, f02=»L:30 NOT TEST STATUS c * P ORKL A3,/8000 INDICATE NO NEW NVL SET d PVOL:30 EQU * d J . P CF A15,VOLGET VOLUME NAME TO DWT SET NVL d ^ P LD A8,DWTECB,A6 d P LDK A3,0 d PVOL:40 EQU * d P RTN A5 d P XIF d P* d P IFT IBM=1 d P E
0x35024c…3503e0 Dummy {f00=0x0158, f01=0x0190, f02=»FROM EBCDIC TO d h P* ASCII CODE e . P* INPUT STRING ADDRESS IS BUF e 6 & P* INPUT: A7 NO OF CHARACTERS e h P* A4 = BUFFER ADDRESS e P* OUTPUT: A1 CHANGED e P* A4 = BUFFER ADDRESS e P* A7
0x3503e0…350574 (3, 275) Dummy {f00=0x0158, f01=0x018e, f02=»FT IBM=1 e P ENB f P ADR A4,A7 f PASC:10 EQU * f . P SUK A4,1 f B P LCR A1,A4 EBCDIC CHARACTER f T P ANK A1,/FF f x ( P LC A1,TASCII,A1 TRANSFORM TO ASCII f 0 P SCR A1,A4 PUT ASCII CHAR. IN OUTPUT BUFFER f P SUK A7,1 f P RB(P) ASC
0x350574…350708 Dummy {f00=0x0158, f01=0x0190, f02=» < P* FUNCTION: EBCDIC TRANSFORMES A STRING FROM ASCII TO g P* EBCDIC CODE g D 8 P* OUTPUT STRING IS PUT IN DRIVER BUFFER g f P* g & P* INPUT: A7 NO OF CHARACTERS g P* A4 = BUFFER ADDRESS g P* g P* OUT
0x350708…35089c Dummy {f00=0x0158, f01=0x018e, f02=»PAG=1 g & P LDKL A4,BUF DRIVER BUFFER ADDRESS h P XIF h 8 P* h D P IFT IBM=1 h N P ADR A4,A7 h ` PEBC:10 EQU * h r P SUK A4,1 h P LCR A1,A4 GET ASCII CHAR. h P ANK A1,/FF h P LC A1,TEBCDIC,A1 h P SC A1,BUF-1,A7 h P SUK A7,
0x35089c…350a30 Dummy {f00=0x0158, f01=0x0190, f02=» h P* i P EJECT DRFD01 i P* i * P********** i 4 P* LOGSEC * i F P********* i X P* i j @ P* FUNCTION: LOGSEC TRANSFORMS PHYSICAL SECTOR TO STANDARD i t , P* LOGICAL SECTOR (BINARY). i < P* FORMAT OF PHYS. SE
0x350a30…350bc4 Dummy {f00=0x0158, f01=0x018e, f02=»* i & P* OUTPUT: A3 BINARY SECTOR NO j . P* A4 ADDRESS TO PHYS. SEC. + 4 j 4 P* j f PLOGSEC EQU * j p P CF A5,DECBIN j P LDR A3,A1 SAVE j P ADK A4,2 j P* j P* MULTIPLY BY 26 j P* j P SLL A3,5 *32 j P
0x350bc4…350d58 Dummy {f00=0x0158, f01=0x0190, f02=» P ADR A3,A1 k P* k P EJECT DRFD01 k P* k 8 P* CHECK SECTOR NO k B P* k P LDR A1,A3 k f P SUK A1,25 k x P RF(NP) LOG:10 k P CWK A4,BUF+EOD+4 EOD k P RF(E) LOG:02 YES! k P SUKL A1,1898 k P RF LOG:04 k P* k "
0x350d58…350eec Dummy {f00=0x0158, f01=0x0190, f02=» SUK A4,4 RESET BUFFER POINTER k P RTN A5 l & P* l 6 P* FATAL ERROR l @ P* l V ( PLOG:05 ADK A5,4 ADJUST STACK POINTER l ` " PLOG:10 LDK A1,/10 RETURN CODE l , P ORRS A1,A6 UPDATE TEMPORARY RETURN CODE l P INH INHIBIT INTERRUPTS l P ABL L
0x350eec…351080 Dummy {f00=0x0158, f01=0x0190, f02=»* FUNCTION: DECBIN TRANSFORMS TWO EBCDIC CODED DIGITS TO l D P* BINARY. RANGE OF EBCDIC CODE /F0 - /F9 IS CHECKED m B , P* INPUT: A4 ADDRESS TO FIRST DIGIT m P* OUTPUT: A1 BINARY m P* WORKING REG: A2,A7 m P* m PDECBIN
0x351080…351214 (3, 276) Dummy {f00=0x0158, f01=0x0190, f02=»9 m P RB(P) LOG:05 NOT DIGIT n P ADK A2,9 n * P SUK A7,1 n < P RF(Z) DEC:30 n N & P ADK A4,1 ADDRESS TO SECOND DIGIT n d PDEC:20 SUK A2,1 n P RB(N) DEC:10 NEXT DIGIT n P ADK A1,/A MULTIPLY BY 10 n P RB DEC:20 n PDEC:30 ADR A1,
0x351214…3513a8 Dummy {f00=0x0158, f01=0x0190, f02=»* n 2 P* FUNCTION: PUT DRIVE NO IN CIO INSTRUCTION o P* o @ 8 P* INPUT: A3 DRIVE NO , (BITS 0-13 MUST BE ZEROES o J P* o P* OUTPUT: A3 CHANGED o P* A4 CHANGED o P* o PSETCIO LDKL A4,/FFCF o P ANS A4,FD:CIO o P
0x3513a8…35153c Dummy {f00=0x0158, f01=0x0190, f02=»* BINDEC * o P********** p P* p $ : P* FUNCTION: BINDEC TRANSFORMS A BINARY NUMBER TO TWO p . 0 P* EBCDIC-CODED DIGITS (DECIMAL) p l P* p P* INPUT: A7 BINARY NUMBER p P* p . P* OUTPUT: A3 EBCDIC CODED DECIMAL DIGITS p
0x35153c…3516d0 Dummy {f00=0x0158, f01=0x0190, f02=»N:10 p PBIN:20 ADK A7,10 q P SLL A3,8 q $ * P ORR A3,A7 DECIMAL CONVERTED NO IN A3 q 6 P ORKL A3,/F0F0 EBCDIC CODED q d P RTN A5 q P* q P EJECT DRFD01 q P********* q P* DSLIO * q P********* q P* q 4 P* FUNCTION:
0x3516d0…351864 Dummy {f00=0x0158, f01=0x0190, f02=» 13-15 ZEROES q h P* A3 128 r ( P* A4 DRIVER BUFFER ADDRESS r 2 P* A6 DWT ADDRESS r ^ P* A1 IS CHANGED r P* r PDSLIO LDK A1,DWTDSS r P CF A5,DSPAD r P LDR* A2,A2 r P SLL A2,3 r P LDK A
0x351864…3519f8 Dummy {f00=0x0158, f01=0x0190, f02=»**** r P* s 6 P* FUNCTION: GET EOD-NO AND EOD-NO ADDRESS IN DWT s P* s P P* INPUT: A6 DWT ADDRESS s Z P* s | P* OUTPUT: A2 EOD ADDRESS s , P* A7 EOD-NO (0=NOT OPEN) s P* A1 CHANGED s PDSOPCH LDK A1,DWTE
0x3519f8…351b8c Dummy {f00=0x0158, f01=0x0190, f02=»DSPAD * s P********* t P* t " 2 P* FUNCTION: GET ABSOLUTE ADDRESS OF SPECIFIED t , 6 P* TYPE OF DATA FOR CORRESPONDING DRIVE t b P* t P* INPUT: A1 DWT OFFSET t P* A6 DWT ADDRESS t P* t " P* OUTPUT: A2 ADDRE
0x351b8c…351d20 Dummy {f00=0x0158, f01=0x018e, f02=» ADR A2,A6 t P ADR A2,A1 u P RTN A5 u $ P* u 4 P EJECT DRFD01 u > P* u V P********* u ` P* STDWT * u r P********* u P* u : P* FUNCTION: STORE INPUT WORD IN DWT-AREA DEPENDING OF u P* DRIVE NO u P* u ( P*
0x351d20…351eb4 (3, 277) Dummy {f00=0x0159, f01=0x018e, f02=» P* OUTPUT: A1 UNCHANGED v 0 P* A2 ADDRESS TO WORD IN DWT AREA v & P* A3 UNCHANGED v Z P* A6 UNCHANGED v | P* v PSTDWT EQU * v P CF A5,DSPAD v P STR A3,A2 v P RTN A5 v P XIF v P* v P
0x351eb4…352048 Dummy {f00=0x0159, f01=0x0190, f02=» P XIF w P* w P IFT TOSS=1 w P IFT IBM=0 w . " P DATA 0,0,0 VOLUME NAME BUFFER w @ P IFT MMUPAG+CHAN=2 w f P RES DVBLEN-3 MMU BUFFER w P XIF w P* w P IFT TOSS+IBM=0 w P IFT MMUPAG+CHAN=2 w P RES DVBLEN MMU BUFFER w P X
0x352048…3521dc Dummy {f00=0x0159, f01=0x018e, f02=» w z P* * x P********************* x & P* x D PDWFD01 EQU * x N ( PDWTRCW EQU *-DWFD01 TEMP RETURN CODE x b P DATA 0 x P DATA /8000 DWT STATUS x P DATA 0 ECB ADDRESS x P DATA 0 ORDER x " P DATA FDADR ACTIVATION ADD
0x3521dc…352370 Dummy {f00=0x0159, f01=0x0190, f02=» x & " DATA 0 SAVE AREA USER ECB ADDRESS y DATA DEVECB MMU ECB ADDRESS y 2 XIF y V P* y b PDWTA3 EQU *-DWFD01 y l P DATA 0 y P DATA 0 SAVE AREA y P DATA 0 y P DATA 0 y " P DATA 0,0,0,0 STACK (3 LEVELS) y P DATA 0 ORDER SAVE
0x352370…352504 Dummy {f00=0x0159, f01=0x0190, f02=»000 NVL INDICATOR 1 y P DATA /8000 NVL INDICATOR 2 z P DATA /8000 NVL INDICATOR 3 z @ ( PDWTVO0 EQU *-DWFD01 VOLUME NAME NO 0 z d P DATA /FFFF,/FFFF,/FFFF z ( PDWTVO1 EQU *-DWFD01 VOLUME NAME NO 1 z P DATA /FFFF,/FFFF,/FFFF z ( PDWTVO2 EQU *
0x352504…352698 Dummy {f00=0x0159, f01=0x0190, f02=» ( PDWTST2 EQU *-DWFD01 SAVE STATUS WORD { P DATA 0 { 0 P XIF { @ PDWTA5 EQU *-DWFD01 { L P DATA 0 { f * PDWTRTY EQU *-DWFD01 RETRY REQUEST FLAG { v P DATA 0 { $ PDWTTP EQU *-DWFD01 TIMER POINTER { P DATA 0 { P* { P EJECT DRFD01 {
0x352698…35282c Dummy {f00=0x0159, f01=0x0190, f02=»EQU *-DWFD01 DRIVE LOCK INDICATOR { P DATA 0 | * P* | : P IFT OPCLOS=1 | D . PDWTTP2 EQU *-DWFD01 TIMER POINTER FOR OPEN | Z P DATA 0 | 4 PDWTOCF EQU *-DWFD01 OPEN/CLOSE FLAG AT POWER ON | P DATA 0 | P XIF | P* | P EJECT DRFD0
0x35282c…3529c0 Dummy {f00=0x0159, f01=0x0190, f02=»-DWFD01 BUFFER END ADDRESS+2 | P DATA 0 } $ , PDWTRW EQU *-DWFD01 READ/WRITE INDICATOR } 4 P DATA 0 } d P XIF } t P* } P IFT IBM=1 } , PDWTBOE EQU *-DWFD01 BEGINNING OF EXTENT } P DATA 0,0,0,0 } $ PDWTEOD EQU *-DWFD01 END OF DATA }
0x3529c0…352b54 (3, 278) Dummy {f00=0x0159, f01=0x0190, f02=»ATA 0,0,0,0 } . PDWTDSS EQU *-DWFD01 DATA SET LABEL SECTOR ~ P DATA 0,0,0,0 ~ F P XIF ~ P* ~ h P EJECT DRFD01 ~ r P* ~ P* ~ & PDWTBA EQU *-DWFD01 BUFFER POINTER ~ P DATA 0 ~ ( PDWTRL EQU *-DWFD01 LENGTH IN SUB IO ~ P DAT
0x352b54…352ce8 Dummy {f00=0x0159, f01=0x0190, f02=»DWTSIO EQU *-DWFD01 NUMBER OF SECTORS IN SUB IO ~ P DATA 0 8 P* H P IFT IBM+TOSS=2 R & PDWTFIB EQU *-DWFD01 IBM INDICATOR j P DATA 0 P XIF P* P EJECT DRFD01 P* P* P IFT MMUPAG=1 PDWT:BF EQU *
0x352ce8…352e7c Dummy {f00=0x0159, f01=0x4152, f02=»T:PA EQU *-DWFD01 * P DATA 0 6 BIT PHYSICAL BUFFER ADDRESS P DATA 0 SECOND MMU ENTRY H P* h PDWT:LA EQU *-DWFD01 r * P DATA 0 16 BIT LOGICAL BUFFER ADDRESS P XIF P* P IFT MMUPAG=1 PDEVECB EQU * P DATA 0,0,0,
0x352e7c…353010 Dummy {f00=0x0159, f01=0x2008, f02=» END @
0x353010…3531a4 Dummy {f00=0x0159, f01=0x0190, f02=» P* PVO:NAM EQU * P CF A5,SEEKZ SEEK SECTOR 0 " P ANK A1,1 F 6 P RF(NZ) VO:NA8 SEEK-,THROUGHPUT ERROR,NOT OPERABLE X P CMR A6 SECTOR 0 P IFT NUNITS=2 P CF A5,INXUNI P CM DWTCYL,A2 CYLINDER 0 P XIF P IFT N
0x3531a4…353338 Dummy {f00=0x0159, f01=0x018e, f02=» BUFFER t P CF A5,READ P ANK A1,3 $ 0 P CF A5,BSELOD UPDATE DRIVER BUFFER INDICATOR 6 P XIF j P* v P IFT VERSA3=0 $ P LDKL A1,/8019 READ SECTOR ZERO $ P LDKL A2,BUFFER TO DRIVER BUFFER P CF A5,CIO:50 P ANK A1,3 ER
0x353338…3534cc Dummy {f00=0x0159, f01=0x018e, f02=» x P LD A1,DWTSAV,A6 P RF(Z) VO:NA6 ( P LDKL A3,/80F0 INDICATE TEST STATUS 6 PVO:NA6 EQU * b 2 P CF A15,VOLGET VOLUMR NAME TO DWT INDICATE NVL v P EJECT DRDU01 P* P* PDUNA40 EQU * P LDK A1,1 6 P LDK A7,1
0x3534cc…353660 Dummy {f00=0x0159, f01=0x0190, f02=» x 4 P LD A2,BUFFER+40 CHECK IF RELEASE 10 OR GREATER P CWK A2,/2031 @ $ P RF(NE) DUNA70 REL LESS THAN 10 V : P LD A2,BUFFER+48 GET FORMAT AND DEVICE TYPE PARAMETER ~ 4 PTRANPA EQU * LABEL FOR TRANSFER PARAMETER ORDER * P CF A15,INXDWT GET I
0x353660…3537f4 (3, 279) Opaque[0x194]
0x3537f4…353988 # DirEnt {nam=»EBCDIC«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x0778, f03=0x0000}
0x3537f4…353988 IdxSect {
0x3537f4…353988 f00 = 0x003b // 0x3537f4 @0x0
0x3537f4…353988 f01 = 0x0004 // 0x3537f6 @0x2
0x3537f4…353988 gno = [ // 0x3537f8 @0x4
0x3537f4…353988 [0x00]: C0x003b.0x3.0
0x3537f4…353988 [0x01]: C0x003c.0x0.0
0x3537f4…353988 ]
0x3537f4…353988 }
0x353988…353b1c Dummy {f00=0x003b, f01=0x0190, f02=» 2 P IDENT EBCDIC REL 10.0 80-03-14 870105041000 P : P* B 4 P************************************************ L P* $ P* PHILIPS TERMINAL SYSTEM PTS P* $ P* EBCDIC = EBCDIC/ASCII TABLE P* P* P* P*
0x353b1c…353cb0 Dummy {f00=0x003b, f01=0x0190, f02=» P* P* . P* CONDITIONAL ASSEMBLY (SEE ALSO DRDC15) P* J 2 PX:A EQU 1 CODE , 0=ASCII , 1=EBCDIC (DRDC15) T PCODE EQU X:A 4 PX:B EQU 1 READ COMMAND HANDLING IF = 1 (DRDC15) PRCOM EQU X:B P EJECT P* P*
0x353cb0…353e44 Dummy {f00=0x003b, f01=0x0190, f02=»/0009,/0000 00-07 ~ ( P DATA /0000,/0000,/0C00,/0000 08-0F ( P DATA /1011,/1213,/000A,/0000 10-17 F ( P DATA /0019,/0000,/1C1D,/1E1F 18-1F r ( P DATA /0000,/0000,/0000,/171B 20-27 ( P DATA /0000,/0000,/0005,/0000 28-2F ( P DATA /0000,/1600,
0x353e44…353fd8 Dummy {f00=0x003b, f01=0x0190, f02=»8,/2B21 48-4F z ( P DATA /264A,/4B4C,/4D4E,/4F50 50-57 ( P DATA /5152,/5D24,/2A29,/3B5E 58-5F B ( P DATA /2D2F,/5354,/5556,/5758 60-67 n ( P DATA /595A,/7C2C,/255F,/3E3F 68-6F ( P DATA /1831,/3233,/3435,/3637 70-77 ( P DATA /3839,/3A23,/402
0x353fd8…35416c Dummy {f00=0x003b, f01=0x0190, f02=»F70 90-97 v ( P DATA /7172,/5D24,/2A29,/3B5E 98-9F ( P DATA /2D2F,/7374,/7576,/7778 A0-A7 > ( P DATA /797A,/7C2C,/255F,/3E3F A8-AF j ( P DATA /3031,/3233,/3435,/3637 B0-B7 ( P DATA /3839,/3A23,/4027,/3D22 B8-BF ( P DATA /2041,/4243,/4445,/4
0x35416c…354300 Dummy {f00=0x003b, f01=0x0190, f02=»D8-DF r ( P DATA /2D2F,/5354,/5556,/5758 E0-E7 ( P DATA /595A,/7C2C,/255F,/3E3F E8-EF : ( P DATA /3031,/3233,/3435,/3637 F0-F7 f ( P DATA /3839,/3A23,/4027,/3DFF F8-FF P XIF P EJECT P* P* 2 P* TABLE FOR CONVERSION OF AS
0x354300…354494 (3, 280) Dummy {f00=0x003c, f01=0x0190, f02=» DATA /0005,/1500,/0C00,/0000 08-0F ( P DATA /1011,/1213,/3C3D,/3226 10-17 , ( P DATA /7019,/3F27,/1C1D,/1E1F 18-1F X ( P DATA /404F,/7F7B,/5B6C,/507D 20-27 ( P DATA /4D5D,/5C4E,/6B60,/4B61 28-2F ( P DATA /F0F1,/F2F3,/F4F5,/F6F7 30-37 ( P
0x354494…354628 Dummy {f00=0x003c, f01=0x4158, f02=»A /D7D8,/D9E2,/E3E4,/E5E6 50-57 ( P DATA /E7E8,/E94A,/005A,/5F6D 58-5F ( ( P DATA /0081,/8283,/8485,/8687 60-67 T ( P DATA /8889,/9192,/9394,/9596 68-6F ( P DATA /9798,/99A2,/A3A4,/A5A6 70-77 ( P DATA /A7A8,/A91C,/6A00,/00E0 78-7F 4 P DAT
0x354628…3547bc Dummy {f00=0x003c, f01=0x2008, f02=» NT EBCASC TESTVERSION 1 END (@ 4
0x3547bc…354950 Dummy {f00=0x003c, f01=0x0190, f02=» 0 0}@d "P n_r 4 # 6 P 7MW (j "M ( 0 P 0 * 1W 'W 1 1 1 1 v j !!Ov v" Cv 0 "" VvW 0 0 )W`0 "" Vv 0 !!W6 'WH ! W+ " W% h * h `h h h 2` W 4 !4 "4
0x354950…354ae4 Dummy {f00=0x003c, f01=0x0190, f02=» 4 0 0 0 $0 T 0 0 W 0 W 0 4P +W 4 0 4 j !! % !j !! 0 ) 4 4 @p@q@r@t@v@ @x 2 # !"#$% H ! ( Hx 4 $ !"4 "!4 !!4 I @w 0 0 V # 4 A 0 _ @ P 0 0
0x354ae4…354c78 Dummy {f00=0x003c, f01=0x0190, f02=» c b" W !4 ( #M0 T ! ! P.W< !0 P) * 2 *#U 1 * * 4 & !4 _ 4 I @ / R $ X$ 01 0 0 202 0 1 # 0 L L H B1 8 ,$ &N3 $$/ 1J# Z t#:" H $v$z$ 1F . d ^ ^ , 1 % [ a
0x354c78…354e0c Dummy {f00=0x003c, f01=0x0190, f02=» B " Y # , 6 Q d F J S:T JOBPTS GETDATAMODE NO.:ENTRYTYPE:999999FORMATSEARCHVERIFY CREATEELEMENTNAME: TPROGRAM:REL 10.0SIZE OF DEFINITION VALUE-SETS70 CONVERSION10 SUP
0x354e0c…354fa0 Dummy {f00=0x003c, f01=0x0190, f02=»
0x354fa0…355134 (3, 281) Opaque[0x194]
0x355134…3552c8 # DirEnt {nam=»TIMER «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x28e8, f03=0x0000}
0x355134…3552c8 IdxSect {
0x355134…3552c8 f00 = 0x0147 // 0x355134 @0x0
0x355134…3552c8 f01 = 0x0006 // 0x355136 @0x2
0x355134…3552c8 gno = [ // 0x355138 @0x4
0x355134…3552c8 [0x00]: C0x0147.0x1.0
0x355134…3552c8 [0x01]: C0x0147.0x2.0
0x355134…3552c8 [0x02]: C0x0147.0x3.0
0x355134…3552c8 ]
0x355134…3552c8 }
0x3552c8…35545c Dummy {f00=0x0147, f01=0x0190, f02=» 0 P IDENT TIMER REL 10.0 80-03-14 870105041000 P 8 P* @ P* J 8 P*************************************************** T P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TIMER = TIMER FUNCTIONS P* P* P*
0x35545c…3555f0 Dummy {f00=0x0147, f01=0x0190, f02=»AINS TIMER LKM PROCESSORS AND | " P* THE FOLLOWING SUBROUTINES: & P* L * P* -SETIME: SET BLOCK IN TIMER QUEUE V . P* -SETIMP: SETIME + STORE TIMER POINTER P* P* P EJECT TIMER P* P* P*********** P
0x3555f0…355784 Dummy {f00=0x0147, f01=0x0190, f02=» . P ENTRY SETIMP SETIME + STORE TIMER POINTER P EJECT TIMER 6 P* L P* V P*********** ` P* EXTRNALS * t P************ P* P* P EXTRN TDISP DISPATCHER . P EXTRN LKMQDI QUEUE TERMINAL AND DISPATCH $ P EXTRN
0x355784…355918 Dummy {f00=0x0147, f01=0x0190, f02=»DRESS v , P EXTRN ACTDIS ACTIVATE TASK AND DISPATCH * P EXTRN SAVE8 SAVE 8 REGISTERS ON STACK > 8 P EXTRN TIMQUE POINTER TO FIRST BLOCK IN TIMER QUEUE l 0 P EXTRN IHRET8 RESTORE 8 REGISTERS FROM STACK P EJECT TIMER P* P* . P**
0x355918…355aac Dummy {f00=0x0147, f01=0x0190, f02=»*** j P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU852 EQU 0. P P* PCPU852 EQU 0 P* P EJECT TIMER P* P* P* T I M E R P* ( P* THIS IS THE TIME
0x355aac…355c40 Dummy {f00=0x0147, f01=0x018e, f02=»AM DELAY P* P* A4 = 0 P* A5 = TTAB ADDRESS , P* A8 = DELAY J P* ` P* j P* 2. TIMING AND ACTIVATION t P* P* A1 = PARAMETER 8 P* A4 = DISPATCH ADDRESS OF PROGRAM TO BE ACTIVATED , P* A5 = TTAB AD
0x355c40…355dd4 (3, 282) Dummy {f00=0x0147, f01=0x0190, f02=» PTIMER EQU * P ADK A4,0 SET CR ( P RF(NZ) TIM010 TIMING AND ACTIVATION 4 P* ` P EJECT TIMER j P* P* PROGRAM DELAY P* P LDR A1,A5 SET PARAMETER P ST A8,PAR1+2 SET TIME P CF A15,SETIME PPAR1 D
0x355dd4…355f68 Dummy {f00=0x0147, f01=0x0190, f02=»10 EQU * $ P CF A15,FNDTID FIND TTAB ADDRESS P ADK A2,0 SET CR 8 " P ABL(Z) LKMRQE TTAB NOT FOUND P ( P LDR A3,A2 IN BLOCK: A3=TTAB ADDRESS v , P LDR A2,A4 A2=DISPATCH ADDRESS ( P CF A15,GETBLK A1=PARAMETER . P LDR A1,A4
0x355f68…3560fc Dummy {f00=0x0147, f01=0x0190, f02=»QU * P ABL LKMQDI P* P EJECT TIMER * P* @ P* J P* RETURN AFTER TIME OUT T P* v P* 1.PROGRAM DELAY P* PDELAY EQU * P LDR A5,A1 SET TTAB ADDRESS * P RB QUEDIS QUEUE TASK FOR DISPATCHING
0x3560fc…356290 Dummy {f00=0x0147, f01=0x0190, f02=»ET IT FREE | P LDR A5,A3 SET TTAB ADDRESS * P ABL ACTDIS ACTIVATE TASK AND DISPATCH 6 P* d P EJECT TIMER n P* P* " P* S E T I M E , S E T I M P P* . P* SUBROUTINE TO SET BLOCK IN TIMER QUEUE , P* AND IF SET
0x356290…356424 Dummy {f00=0x0147, f01=0x0190, f02=»POINTER ADDRESS v , P* P1 = DISPATCH ADDRESS AFTER TIME OUT P* P2 = DELAY H P* ^ : P* P1 AND P2 ARE STORED AFTER THE SUBROUTINE REQUEST. h P* P* EXIT PARAMETER:- P* P* A4 = ADDRESS TO TIMER P* P*
0x356424…3565b8 Dummy {f00=0x0147, f01=0x0190, f02=» XIF P* P IFT CPU852=0 P INH , " P MSR 8,A15 SAVE A1-A8 ON STACK 8 P XIF ^ P* j P EJECT TIMER t P* P* * P LDR A6,A4 SAVE TIMER POINTER ADDRESS P LDR A3,A4 . P LD A5,20,A15 LOAD FIRST PARAMETER ADDRESS
0x3565b8…35674c Dummy {f00=0x0147, f01=0x0190, f02=» PROGRAM COUNTER | $ P CF A15,GETBLK GET A FREE BLOCK P LDR A2,A4 @ P C1R A1,A8 R " P CF A15,GETBLK GET TIMER BLOCK d P LD A1,TIMQUE " P STR A1,A4 SET BLOCK IN QUEUE P ST A4,TIMQUE P ADK A4,4 0 P ST A4,10,A15 SET TIMER AD
0x35674c…3568e0 Dummy {f00=0x0147, f01=0x412e, f02=»CT TIMER P* P* PSETEND EQU * & P IFT CPU852=1 : ( P ABL IHRET8 RESTORE A1-A8 AND RETURN P P XIF | P* P IFT CPU852=0 * P MLR 8,A15 RESTORE A1-A8 FROM STACK... P RTN A15 ...AND RETURN P XIF P*
0x3568e0…356a74 (3, 283) Dummy {f00=0x0147, f01=0x2008, f02=» ST A4,TIMQUE P ADK A4,4 0 P ST A4,10,A15 SET TIMER ADDRESS A4 ON STACK 0 P LDR A6,A6 d P RF(Z) SETEND -SETIME v , P STR A4,A6 -SETIMP STORE TIMER POINTER PSETEND ABL IHRET8 P* P END @ GET A FREE BLOC
0x356a74…356c08 Dummy {f00=0x0147, f01=0x0000, f02=»
[…0x6…]
0x357580…357714 (3, 284) Opaque[0x194]
0x357714…3578a8 # DirEnt {nam=»TMMLKM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2160, f03=0x0000}
0x357714…3578a8 IdxSect {
0x357714…3578a8 f00 = 0x010b // 0x357714 @0x0
0x357714…3578a8 f01 = 0x0006 // 0x357716 @0x2
0x357714…3578a8 gno = [ // 0x357718 @0x4
0x357714…3578a8 [0x00]: C0x010b.0x0.0
0x357714…3578a8 [0x01]: C0x010b.0x1.0
0x357714…3578a8 [0x02]: C0x010b.0x2.0
0x357714…3578a8 ]
0x357714…3578a8 }
0x3578a8…357a3c Dummy {f00=0x010b, f01=0x0190, f02=» 2 P IDENT TMMLKM REL 10.0 80-03-14 870105041000 P : P* B P* L 6 P************************************************** V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* ( P* TMMLKM = TOSS MMU LKM PROCESSORS P* P*
0x357a3c…357bd0 Dummy {f00=0x010b, f01=0x0190, f02=»WING n P* TOSS MMU LKM PROCESSORS: P* 0 " P* - TCHPAG = CHANGE MMU PAGE : P* ` $ P* - TCHMMU = CHANGE MMU TABLE j P* & P* - TLUSEG = LOCK/UNLOCK SEGMENT P* P* P EJECT TMMLKM P* P* P**
0x357bd0…357d64 Dummy {f00=0x010b, f01=0x0190, f02=» MMU TABLE | & P ENTRY TLUSEG LOCK/UNLOCK SEGMENT P EJECT TMMLKM < P* T P* ^ P************* h P* EXTERNALS * ~ P************* P* P* 0 P EXTRN FNDTID FIND TTAB ADDRESS FROM TASK ID P EXTRN RELPAG RELEASE
0x357d64…357ef8 Dummy {f00=0x010b, f01=0x0190, f02=» IN TTAB l ( P EXTRN TTB:SP SEGMENT TABLE ADDRESS $ P EXTRN SEG:NS NUMBER OF SEGMENTS < P EJECT TMMLKM d P* | P* P********** P* TCHPAG * P********** P* P* 2 P* THIS IS THE CHANGE MMU PAGE LKM PROCESSOR.
0x357ef8…35808c Dummy {f00=0x010b, f01=0x0190, f02=» AT A TIME. ` P* * P* IT IS ENTERED FROM THE LKM HANDLER & P* WITH THE FOLLOWING PARAMETERS: L P* v P* A5 = TTAB ADDRESS ( P* A7 = PAGE TO BE CHANGED, 0 - 15 * P* A8 = NEW LOCATION OF PAGE, 0 - 63 P* < P* IT
0x35808c…358220 Dummy {f00=0x010b, f01=0x018e, f02=»(IF ANY) p 0 P ADR A7,A7 ADJUST FOR INDEXING IN MMU TABLE P ADR A7,A5 ADD TTAB ADDRESS D P LDR A2,A8 NEW PAGE LOCATION h . P ANK A2,/3F SKIP IRRELEVANT BITS (IF ANY) P SLL A2,2 < P SC A2,TTB:MT,A7 STORE NEW LOCATION OF PAGE IN MMU TABLE
0x358220…3583b4 (3, 285) Dummy {f00=0x010b, f01=0x0190, f02=» P* TCHMMU * P********** P* , P* 6 4 P* THIS IS THE CHANGE MMU TABLE LKM PROCESSOR. @ P* x D P* TCHMMU WILL CHANGE THE MMU TABLE CONTENTS OF REQUESTING TASK 4 P* TO THE MMU TABLE CONTENTS OF SPECIFIED TASK. P*
0x3583b4…358548 Dummy {f00=0x010b, f01=0x0190, f02=»A7 = TASK IDENTIFICATION OF SEARCHED TASK P* 2 ( P* IT RETURNS TO CALLING TASK WITH < P* THE FOLLOWING PARAMETER: h P* 2 P* A7 = UNCHANGED IF REQUEST SUCCESSFUL, ELSE & P* A7 = -1 IF TASK NOT IN SYSTEM P* " PTCHMMU E
0x358548…3586dc Dummy {f00=0x010b, f01=0x0190, f02=» TL TTB:MT,A2 LOAD SEARCHED MMU TABLE CONTENTS 4 P TS TTB:MT,A5 STORE IN MMU TABLE OF CALLING TASK 6 * P RB T:DISP QUEUE TASK FOR DISPATCHING n P* P EJECT TMMLKM P* P* P********** P* TLUSEG * P********** P
0x3586dc…358870 Dummy {f00=0x010b, f01=0x018e, f02=» CORE RESIDENT, ` D P* UNTIL AN UNLOCK SEGMENT REQUEST IS ISSUED FOR THAT SEGMENT. P* ` * P* IT IS ENTERED FROM THE LKM HANDLER j & P* WITH THE FOLLOWING PARAMETERS: P* P* A5 = TTAB ADDRESS P* A7 = SEGMENT NUMBER &
0x358870…358a04 Dummy {f00=0x010b, f01=0x0190, f02=» j " P* THE FOLLOWING PARAMETERS: P* . 2 P* A7 = UNCHANGED IF REQUEST SUCCESSFUL, ELSE 8 P* A7 = -1 IF REQUEST ERROR n P* P* P EJECT TMMLKM P* P* $ PTLUSEG EQU * LOCK/UNLOCK SEGMENT $ P LD A4,TTB:SP,
0x358a04…358b98 Dummy {f00=0x010b, f01=0x0190, f02=»GMENT NUMBER TOO BIG t P RF(NG) TLUS00 OK P* 6 PTLCERR EQU * @ , P ABL LKMRQE BRANCH TO LKM REQUEST ERROR T P* PTLUS00 EQU * , P SLL A3,3 ADJUST FOR INDEXING IN SEGTAB " P ADR A3,A4 ADD SEGTAB ADDRESS " P LCR A4,A3 GET S
0x358b98…358d2c Dummy {f00=0x010b, f01=0x018e, f02=»T IT IS t " P RF(NZ) TLUS10 UNLOCK SEGMENT P* 6 P EJECT TMMLKM @ P* X P* LOCK SEGMENT b P* x 4 P ORRS A4,A3 INDICATE SEGMENT TO BE CORE RESIDENT P RB T:DISP P* P* UNLOCK SEGMENT P* PTLUS10 EQU *
0x358d2c…358ec0 Dummy {f00=0x010b, f01=0x4036, f02=» P* P* P* END &@ 2* 6 P EJECT TMMLKM @ P* X P* LOCK SEGMENT b P* x 4 P ORRS A4,A3 INDICATE SEGMENT TO BE CORE RESIDENT P RB T:DISP P* P* UNLOCK SEGMENT P* PTLUS10 EQU *
0x358ec0…359054 (3, 286) Dummy {f00=0x010b, f01=0x2008, f02=» NT TCHPAG PRR 9.1 78-10-16 870105040910 END <@ H
0x359054…3591e8 Dummy {f00=0x010b, f01=0x0190, f02=» PTMW:30 EQU * 4 P ST A8,TTB:SA+16,A5 UPDATE A8 IN TTAB SAVE AREA 2 P ADK A3,0 CHECK FLAG IF FIRST ECB TO WAIT FOR T & P RF(Z) TP:QDI FIRST ECB IN ECBBLK P* : PTMW:40 ADKL A3,DWTWAT POINT TO WAIT/ACTIVATE INDICATOR $ P LDR* A2,A3
0x3591e8…35937c Dummy {f00=0x010b, f01=0x40e6, f02=»* P EJECT TPROC P* P* * PTP:RQE EQU * 4 " P ABL LKMRQE LKM REQUEST ERROR H P* n PTP:QDI EQU * x ( P ABL LKMQDI QUEUE TASK AND DISPATCH P* P* P* P END @ VATE INDICATOR $ P LDR* A2,A3
0x35937c…359510 Dummy {f00=0x010b, f01=0x2008, f02=» TERMINAL NOT IN SYSTEM 8 P CF A15,QTJOB QUEUE CALLING TERMINAL FOR DISPATCHING ( P LDR A5,A2 d P LDR A2,A4 v 0 P RB(Z) TPQUE RESTART: QUEUE FOR DISPATCHING P CF A15,ACTOT ACTIVATION P RB TPDIS GO TO DISPACHER P EJECT
0x359510…3596a4 Dummy {f00=0x010b, f01=0x0190, f02=»R INF =3 A x & P SUK A3,1 DEC TRANSFER COUNTER =3 B , P RB(P) RCDY12 NOT ENOUGH OF TRANSFERS =3 B : . P LDK A2,CTYCOD SEND 'SET COUNTRY CODE' =1 B j P CF A5,OUTPUT =1 B * P LDK A2,COUNTRY SEND 'COUNTRY CODE' =1 B P ORK A2,/30 =1 B P CF A5,OUTPU
0x3596a4…359838 Dummy {f00=0x010b, f01=0x0190, f02=»CLEHOM CLEAR AND HOME B P CF A5,OUTPUT SEND C P LDKL A2,/101 C 8 6 P ST A2,DWTAP,A6 SET HEAD LINE-AND-POSITION COUNTER C N P LDR A3,A3 GET OLD STATUS C P RB(N) ENDIO NOT BUSY C " P LDK A1,OPERR SET RETURN CODE C PRCDY15 ABL ADY420 C P
0x359838…3599cc Dummy {f00=0x010b, f01=0x0190, f02=»DY25 NO C ( P LDK A1,2 INDICATE THROUGHPUT ERROR D P RB RCDY15 D < & PRCDY25 LDK A2,STX START OF MESSAGE D N P CF A5,OUTPUT D x 4 P LC A4,DWTBC,A6 GET NUMBER OF POSITIONS TO BACK D P ANK A4,/FF D P RF(E) RCDY30 D . P CF A5,BACCAN SEND BACKS
0x3599cc…359b60 Dummy {f00=0x010b, f01=0x0190, f02=»* D 0 P* ECHODY = DEVICE-DEPENDENT ECHO-ROUTINE E P* E > PECHODY EQU * E H P LDR A7,A7 EOR? E P RF(N) ECDY17 YES E t P LDR A3,A2 SAVE CHARACTER E P* E P IFT EORECH=0 E P* E P SUK A2,/80 E $ P RF(NN) ECDY20 NOT TO BE E
0x359b60…359cf4 (3, 287) Opaque[0x194]
0x359cf4…359e88 # DirEnt {nam=»TLDSEG«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x20f0, f03=0x0000}
0x359cf4…359e88 IdxSect {
0x359cf4…359e88 f00 = 0x0107 // 0x359cf4 @0x0
0x359cf4…359e88 f01 = 0x0006 // 0x359cf6 @0x2
0x359cf4…359e88 gno = [ // 0x359cf8 @0x4
0x359cf4…359e88 [0x00]: C0x0107.0x2.0
0x359cf4…359e88 [0x01]: C0x0107.0x3.0
0x359cf4…359e88 [0x02]: C0x0108.0x0.0
0x359cf4…359e88 ]
0x359cf4…359e88 }
0x359e88…35a01c Dummy {f00=0x0107, f01=0x0190, f02=» 2 P IDENT TLDSEG REL 10.0 80-03-14 870105041000 P : P* B P* L 6 P************************************************** V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* P* TLDSEG = LOAD SEGMENT P* P* P*
0x35a01c…35a1b0 Dummy {f00=0x0107, f01=0x0190, f02=»M PROCESSOR, d 0 P* USED IN TOSS MEMORY MANAGEMENT SYSTEMS. P* H P* R P EJECT TLDSEG P* t P* ~ P*********** P* ENTRIES * P*********** P* P* P ENTRY TLDSEG LOAD SEGMENT & P ENTRY TLDS15
0x35a1b0…35a344 Dummy {f00=0x0107, f01=0x0190, f02=»* EXTERNALS * P************* P* , P* 6 0 P EXTRN PRUN TTAB ADDRESS OF RUNNING PROGRAM @ P EXTRN TDISP DISPATCHER t $ P EXTRN LKM030 LKM REQUEST ERROR & P EXTRN PAG:QB QUEUE LINK BACKWARDS $ P EXTRN SEG:NS NUMBER OF SEGMENTS
0x35a344…35a4d8 Dummy {f00=0x0107, f01=0x0190, f02=»TTAB SAVE AREA P EXTRN TTB:MT MMU TABLE & P EXTRN TTB:CB CURRENT SEGMENT BASE 6 ( P EXTRN TTB:SP SEGMENT TABLE ADDRESS ` ( P EXTRN TTB:SB SEGMENT BLOCK ADDRESS 2 P EXTRN QLTDSK ACTIVATE LDTASK AT ENTRY LT:DSK & P EXTRN SCTMMP MMU TABLE PA
0x35a4d8…35a66c Dummy {f00=0x0107, f01=0x0190, f02=» P* . P***************************************** P* @ P* CONDITIONAL ASSEMBLY J P* h . P***************************************** r P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMUPAG EQU 1.
0x35a66c…35a800 Dummy {f00=0x0107, f01=0x0190, f02=»ETTING CPU852 EQU 0. z P* PCPU852 EQU 0 & P* : * D . ** A PROGRAM VERSION USING TOSS DISC PAGING N * &* IS OBTAINED BY SETTING DSKPAG EQU 1. * PDSKPAG EQU 0 * P EJECT TLDSEG P* P* P******
0x35a800…35a994 (3, 288) Dummy {f00=0x0107, f01=0x0190, f02=» IS ENTERED FROM THE LKM HANDLER & P* WITH THE FOLLOWING PARAMETERS: ( P* R 4 P* A2 = DISPATCH ADDRESS (NOT UPDATED BY IHLKM) P* A5 = TTAB ADDRESS P* A7 = SEGMENT NUMBER P* ( P* IT RETURNS TO CALLING TASK WITH " P
0x35a994…35ab28 Dummy {f00=0x0107, f01=0x0190, f02=» ERROR, ELSE z ( P* A7 = -2 IF DISC I/O ERROR, ELSE $ P* A7 = -3 IF DISC NOT OPERABLE @ P* h 2 P* WHEN REQUESTED SEGMENT IS ALREADY IN CORE: r < P* THE REQUEST WILL NOT GO THROUGH THE DISPATCHER AFTER > P* COMPLETION, THUS NO TASK SWI
0x35ab28…35acbc Dummy {f00=0x0107, f01=0x0190, f02=»S NOT IN CORE TLDSEG WILL t : P* ACTIVATE LDTASK WHICH WILL LOAD SEGMENT INTO CORE. " P* ` P* j P EJECT TLDSEG t P* & P* CHECK VALIDITY OF SEGMENT NUMBER P* PTLDSEG EQU * LOAD SEGMENT $ P LD A3,TTB:SP,A5 SEGTAB ADDR
0x35acbc…35ae50 Dummy {f00=0x0107, f01=0x0190, f02=»OO BIG f P RF(NG) TLDS00 OK P* ( $ PTLDERR LDK A6,/FF INDICATE ERROR 2 , P ABL LKM030 BRANCH TO LKM REQUEST ERROR Z P* P* GET SEGMENT BLOCK ADDRESS. P* UPDATE RETURN ADDRESS P* PTLDS00 EQU * , P SLL A1,3 ADJUST F
0x35ae50…35afe4 Dummy {f00=0x0107, f01=0x0190, f02=»S v P* P IFT DSKPAG=0 $ P SUKL A15,4 ADJUST STACKPOINTER * . P ST A2,4,A15 SET DISPATCH ADDRESS ON STACK R P XIF P* " P ADK A7,0 CHECK SEGMENT NUMBER P RF(NZ) TLDS05 NOT SEGMENT 0 0 P ST A7,TTB:SB,A3 RESET SEGMENT BLOCK
0x35afe4…35b178 Dummy {f00=0x0107, f01=0x0190, f02=»R r . P ST A2,4,A15 SET DISPATCH ADDRESS ON STACK P XIF < P RF TLDS40 H P* Z P EJECT TLDSEG d P* | P* PTLDS05 EQU * P IFT DSKPAG=1 2 P ST A1,TTB:SB,A3 UPDATE SEGMENT BLOCK ADDRESS " P LDR* A4,A1 GET SEGMENT
0x35b178…35b30c Dummy {f00=0x0107, f01=0x0190, f02=»* 6 P CF A15,QLTDSK ACTIVATE LOAD TASK AT ENTRY LT:DSK P ABL TDISP GO TO DISPATCHER D P* h PTLDS10 EQU * r $ P SUKL A15,4 ADJUST STACKPOINTER . P ST A2,4,A15 SET DISPATCH ADDRESS ON STACK P XIF P* & PTLDS15 EQU * ENTRY
0x35b30c…35b4a0 Dummy {f00=0x0107, f01=0x0190, f02=» l P* & P LDR* A2,A1 GET QUEUE LINK FORWARD * P RF(Z) TLDS20 PAGE BLOCK NOT IN QUEUE < , P LD A4,PAG:QB,A1 GET QUEUE LINK BACKWARD j 4 P CMR A1 RESET QUEUE LINK FORWARD OF REMOVED BLK " P STR A2,A4 UPDATE QUEUE LINKS P ST A4,PAG:QB,A2
0x35b4a0…35b634 (3, 289) Dummy {f00=0x0108, f01=0x0190, f02=»NTRY USED BY LDTASK & P LD A1,PAG:PA,A1 GET PAGE ADDRESS P* F P IFT MMUPAG=1 P P ECR A2,A1 f P ANK A2,/FC x P* 4 P* GET PAGE ENTRY/ENTRIES TO UPDATE IN MMU TABLE P* 0 P AD A3,SCTMMP POINT TO FIRST USED PAGE ENTRY
0x35b634…35b7c8 Dummy {f00=0x0108, f01=0x0190, f02=»A3 UPDATE PAGE ENTRY P SUK A4,1 ( P RF(NP) TLDS30 NO MORE PAGE ENTRIES . & P ADK A3,2 POINT TO NEXT PAGE ENTRY Z " P ADK A2,4 UPDATE PAGE ADDRESS P RB TLDS25 P* P EJECT TLDSEG P* P* 4 PTLDS30 ANKL A1,/300 CO
0x35b7c8…35b95c Dummy {f00=0x0108, f01=0x018e, f02=» 2 P ES* A1,TTB:CB,A5 UPDATE CURRENT SEGMENT BASE P XIF > P* J P IFT MMUPAG=0 T PTLDS40 EQU * j 2 P ST* A1,TTB:CB,A5 UPDATE CURRENT SEGMENT BASE ~ P XIF P* P IFT CPU852=0 P LDR A6,A5 $ P ML 6,TTB:SA+2,A6 REST
0x35b95c…35baf0 Dummy {f00=0x0108, f01=0x40f0, f02=» n P LD A2,TTB:SA+4,A5 P LD A3,TTB:SA+6,A5 " P LD A4,TTB:SA+8,A5 < P LD A6,TTB:SA+12,A5 V P LD A5,TTB:SA+10,A5 r $ P RTN A15 RETURN TO CALLING TASK P XIF P* P* P* END @ P ML 6,TTB:SA+2,A6 REST
0x35baf0…35bc84 Dummy {f00=0x0108, f01=0x2008, f02=» NT TLDSEG PREREL.9.1 780907 BOFE END 6@ B
0x35bc84…35be18 Dummy {f00=0x0108, f01=0x0190, f02=»** r b 4 P************************************************ s P s B PMOVT:A EQU * s J P IFT CREDIT-MMUPAG=1 s ^ P LDR* A1,A8 GET T:A-ADDRESS s z ( P LD A3,WATLEN,A12 GET LENGTH OF WAT s P SLL A3,2 BYTES s , P SU A3,CIA,A1 ADD DISPLACEMENT TO STAR
0x35be18…35bfac Dummy {f00=0x0108, f01=0x0190, f02=»A-ADDRESS s | $ P SU A1,CIA,A4 'OLD' T:A-ADDRESS t P t : 8 P* COMPUTE AND STORE ADDRESSES TO DATA-SETS IN FCB * t B P t ~ P LD A3,FCD,A12 ANY FCD? t P RF(Z) MOVT10 NO! t P ADR A3,A2 START OF FCB t P LDR A4,A2 SAVE T:A-ADDRESS t 0 P LD
0x35bfac…35c140 Dummy {f00=0x0108, f01=0x0190, f02=»MOVT05 EQU * t P ADS A4,FCBDD1,A3 u P ADS A4,FCBDD2,A3 u . PMOVT10 RTN A14 u H P XIF u ^ P IFT CREDIT+MMUPAG=2 u j P u P ELR A1,A8 GET T:A-ADDRESS u ( P EL A3,WATLEN,A12 GET LENGTH OF WAT u P SLL A3,2 BYTES u P EL A10,CIA,A1 u $
0x35c140…35c2d4 (3, 290) Opaque[0x194]
0x35c2d4…35c468 # DirEnt {nam=»TABORT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2568, f03=0x0000}
0x35c2d4…35c468 IdxSect {
0x35c2d4…35c468 f00 = 0x012b // 0x35c2d4 @0x0
0x35c2d4…35c468 f01 = 0x0004 // 0x35c2d6 @0x2
0x35c2d4…35c468 gno = [ // 0x35c2d8 @0x4
0x35c2d4…35c468 [0x00]: C0x012b.0x1.0
0x35c2d4…35c468 [0x01]: C0x012b.0x3.0
0x35c2d4…35c468 ]
0x35c2d4…35c468 }
0x35c468…35c5fc Dummy {f00=0x012b, f01=0x0190, f02=» 2 P IDENT TABORT REL 10.0 80-03-14 870105041000 P : P* B P* L 6 P************************************************* V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* " P* TABORT = ABORT I/O REQUEST P* P* P*
0x35c5fc…35c790 Dummy {f00=0x012b, f01=0x0190, f02=»AINS THE | ( P* ABORT I/O REQUEST LKM PROCESSOR. P* < P* F P EJECT TABORT P P* h P* r P*********** | P* ENTRIES * P*********** P* P* P ENTRY TABORT P EJECT TABORT P* P*
0x35c790…35c924 Dummy {f00=0x012b, f01=0x0190, f02=» DWTST DWT STATUS & P EXTRN DWTADR DRIVER ADDRESS BLOCK & P EXTRN DWTTAB TTAB ADDRESS IN DWT D 0 P EXTRN DWTWAT WAIT ACTIVATE INDICATOR IN DWT n " P EXTRN DWTECH ECHO DEVICE DWT ( P EXTRN ABTADR ABORT ROUTINE ADDRESS P EXTRN TENDIO END I/
0x35c924…35cab8 Dummy {f00=0x012b, f01=0x0190, f02=» TABORT P* P* . P***************************************** & P* X P* CONDITIONAL ASSEMBLY b P* . P***************************************** P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY
0x35cab8…35cc4c Dummy {f00=0x012b, f01=0x0190, f02=»BORT * P********** P* P* * 4 P* THIS IS THE ABORT I/O REQUEST LKM PROCESSOR. 4 P* l * P* IT IS ENTERED FROM THE LKM HANDLER v & P* WITH THE FOLLOWING PARAMETERS: P* P* A5 = TTAB ADDRESS P* A8 = ECB ADDRE
0x35cc4c…35cde0 Dummy {f00=0x012b, f01=0x0190, f02=»AT MADE THE I/O REQUEST. THUS I/O WITH WAIT CAN P* NOT BE ABORTED. 8 P* T P* ^ PTABORT EQU * h P IFT MMUPAG=0 | & P LDR* A3,A8 GET FIRST WORD OF ECB P XIF P* P IFT MMUPAG=1 $ P ELR A3,A8 GET FIRST WORD OF ECB
0x35cde0…35cf74 (3, 291) Dummy {f00=0x012b, f01=0x0190, f02=» P RF(Z) TABOER DWT UNKNOWN P* & P EJECT TABORT 0 P* H P* R P CW A5,DWTTAB,A6 P RF(NE) TABOER ILLEGAL TASK t P LD A7,DWTST,A6 " P RF(N) TABOER DEVICE NOT BUSY P SLC A7,2 $ P RF(NN) TABO20 NOT ECHO REQUEST
0x35cf74…35d108 Dummy {f00=0x012b, f01=0x018e, f02=»RESS BLOCK f 8 P LD A2,ABTADR,A2 GET ABORT ROUTINE ADDRESS (IF ANY) * P RF(Z) TABO10 NO SPECIAL ABORT ROUTINE N & P CFR A15,A2 PERFORM ABORT ROUTINE | P* PTABO10 EQU * $ P CF A15,TENDIO ABORT ECHO DEVICE P LDR A6,A8 RESTORE DWT
0x35d108…35d29c Dummy {f00=0x012b, f01=0x018e, f02=» : P CF A15,FREBLK I/O AND ACTIVATE. FREE DISPATCHER BLOCK " P CM DWTWAT,A6 INDICATE NO WAIT B P* h PTABO30 EQU * r 8 P LD A2,DWTADR,A6 GET ADDRESS TO DRIVER ADDRESS BLOCK 8 P LD A2,ABTADR,A2 GET ABORT ROUTINE ADDRESS (IF ANY) * P RF(Z) TAB
0x35d29c…35d430 Dummy {f00=0x012b, f01=0x40c4, f02=» t P CF A15,TENDIO ABORT 0 P ABL LKMQDI QUEUE TASK AND GO TO DISPATCHER $ P* X 0 PTABOER ABL LKMRQE GO AND INDICATE LKM ERROR b P* P* P* P END @ D A2,ABTADR,A2 GET ABORT ROUTINE ADDRESS (IF ANY) * P RF(Z) TAB
0x35d430…35d5c4 Dummy {f00=0x012b, f01=0x2008, f02=»
0x35d5c4…35d758 Dummy {f00=0x012b, f01=0x0190, f02=»R r . P ST A2,4,A15 SET DISPATCH ADDRESS ON STACK P XIF < P RF TLDS40 H P* Z P EJECT TLDSEG d P* | P* PTLDS05 EQU * P IFT DSKPAG=1 2 P ST A1,TTB:SB,A3 UPDATE SEGMENT BLOCK ADDRESS " P LDR* A4,A1 GET SEGMENT
0x35d758…35d8ec Dummy {f00=0x012b, f01=0x0190, f02=»* 6 P CF A15,QLTDSK ACTIVATE LOAD TASK AT ENTRY LT:DSK P ABL TDISP GO TO DISPATCHER D P* h PTLDS10 EQU * r $ P SUKL A15,4 ADJUST STACKPOINTER . P ST A2,4,A15 SET DISPATCH ADDRESS ON STACK P XIF P* & PTLDS15 EQU * ENTRY
0x35d8ec…35da80 Dummy {f00=0x012b, f01=0x0190, f02=» l P* & P LDR* A2,A1 GET QUEUE LINK FORWARD * P RF(Z) TLDS20 PAGE BLOCK NOT IN QUEUE < , P LD A4,PAG:QB,A1 GET QUEUE LINK BACKWARD j 4 P CMR A1 RESET QUEUE LINK FORWARD OF REMOVED BLK " P STR A2,A4 UPDATE QUEUE LINKS P ST A4,PAG:QB,A2
0x35da80…35dc14 (3, 292) Opaque[0x194]
0x35dc14…35dda8 # DirEnt {nam=»MONTIM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2580, f03=0x0000}
0x35dc14…35dda8 IdxSect {
0x35dc14…35dda8 f00 = 0x012c // 0x35dc14 @0x0
0x35dc14…35dda8 f01 = 0x0006 // 0x35dc16 @0x2
0x35dc14…35dda8 gno = [ // 0x35dc18 @0x4
0x35dc14…35dda8 [0x00]: C0x012c.0x0.0
0x35dc14…35dda8 [0x01]: C0x012c.0x1.0
0x35dc14…35dda8 [0x02]: C0x012c.0x2.0
0x35dc14…35dda8 ]
0x35dc14…35dda8 }
0x35dda8…35df3c Dummy {f00=0x012c, f01=0x0190, f02=» 2 P IDENT MONTIM REL 10.0 80-03-14 870105041000 P : P* B P* L < P******************************************************* V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* * P* MONTIM = MONITOR CLOCK PROCESSORS P*
0x35df3c…35e0d0 Dummy {f00=0x012c, f01=0x0190, f02=»* THIS MODULE CONTAINS TOSS MONITOR CLOCK PROCESSORS P* @ 0 P* -GETTIM GET TIME FROM MONITOR CLOCK J P* ~ . P* -SETTIM SET TIME IN MONITOR CLOCK P* P EJECT MONTIM P* P* P*********** P* EN
0x35e0d0…35e264 Dummy {f00=0x012c, f01=0x0190, f02=»TOR CLOCK r P EJECT MONTIM P* * P* 4 P************* > P* EXTERNALS * T P************* j P* P* P EXTRN MONCLO MONITOR CLOCK * P EXTRN LKMQDI QUEUE TASK AND DISPATCH P EXTRN TTB:SA TTAB SAVE AREA
0x35e264…35e3f8 Dummy {f00=0x012c, f01=0x0190, f02=»* . P***************************************** P* < . P* A PROGRAM VERSION USING TOSS MMU PAGING F * P* IS OBTAINED BY SETTING MMUPAG EQU 1. x P* PMMUPAG EQU 1 P* P EJECT MONTIM P* P* P* G E T T I
0x35e3f8…35e58c Dummy {f00=0x012c, f01=0x0190, f02=»ADDRESS TO THE USER TIMER CONTROL 2 P* BLOCK IN A8. MONITOR CLOCK IS COPIED INTO * P* TIMER CONTROL BLOCK. ` P* P* PGETTIM EQU * 6 P LDKL A7,MONCLO+6 ADDRESS TO MONITOR CLOCK SECOND P LDK A3,6 COUNTER P LDR* A6,A
0x35e58c…35e720 Dummy {f00=0x012c, f01=0x0190, f02=» A7,2 P LDR* A6,A7 HOURS P ENB ( P* 4 * PGETT10 CF A15,BYTASC CONVERT TO ASCII > P IFT MMUPAG=0 l * P SC A6,1,A8 STORE RIGHTHAND CHARACTER P ECR A6,A6 ( P SCR A6,A8 STORE LEFTHAND CHARACTER P XIF P* P EJE
0x35e720…35e8b4 (3, 293) Dummy {f00=0x012c, f01=0x0190, f02=» GETT15 TCB ADDRESS EVEN P LDR A1,A6 P EL A4,1,A8 2 P ANK A4,/FF F P SLL A1,8 Z P ORR A1,A4 l P ES A1,1,A8 ~ P ELR A4,A8 P SRL A6,8 P ANKL A4,/FF00 P ORR A6,A4 P* 6 PGETT15 ESR A6,A8 SET VALUE IN TI
0x35e8b4…35ea48 Dummy {f00=0x012c, f01=0x0190, f02=»ROM STACK r P RB GETT10 P* $ P EJECT MONTIM . P* F P* P PGETT20 SUK A7,2 Z . P LDR* A6,A7 GET ACCUMULATED 24 HOUR CARRY r 2 P ST A6,TTB:SA+14,A5 STORE IN TTAB SAVE AREA A7 P CMR A7 CLEAR MIDNIGTH CARRY P* P
0x35ea48…35ebdc Dummy {f00=0x012c, f01=0x0190, f02=»E LKM PROCESSOR. x P* 0 P* IT IS ENTERED FROM THE LKM HANDLER WITH " 0 P* ADDRESS TO THE USER TIMER CONTROL BLOCK V 0 P* IN A8. VALUE IN TIMER CONTROL BLOCK IS $ P* COPIED INTO MONITOR CLOCK. P* P* PSETTIM EQU *
0x35ebdc…35ed70 Dummy {f00=0x012c, f01=0x0190, f02=» MMUPAG=0 & P LCR A6,A8 GET LEFTHAND CHARACTER P ECR A6,A6 < ( P LC A6,1,A8 GET RIGHTHAND CHARACTER N P XIF z P* P IFT MMUPAG=1 2 P ELR A6,A8 GET VALUE FROM TIMER CONTROL BLOCK . P LDR A4,A8 GET TIMER CONTROL BLOCK ADDRESS
0x35ed70…35ef04 Dummy {f00=0x012c, f01=0x018e, f02=»RL A4,8 P ORR A6,A4 P* " PSETT15 EQU * , P XIF @ P* L P EJECT MONTIM V P* n P* x $ P CF A15,ASCTBY CONVERT TO BINARY P SUK A3,2 END P RF(E) SETT20 P ADKL A8,2 0 P STR A6,A15 SAVE ON STACK (HOURS
0x35ef04…35f098 Dummy {f00=0x012c, f01=0x0190, f02=» P LDR* A6,A15 ( P STR A6,A7 MINUTES TO MONITOR CLOCK P SUK A7,2 H P LDR* A6,A15 Z & P STR A6,A7 HOURS TO MONITOR CLOCK n P SUK A7,2 P CMR A7 RESET MIDNIGTH CARRY P RB TPDIS P* P EJECT MONTIM P*
0x35f098…35f22c Dummy {f00=0x012c, f01=0x0190, f02=»A6. x P* P* PBYTASC EQU * P LDK A4,0 4 P* F PBYTA10 SUK A6,/A P P RF(N) BYTA20 h P ADKL A4,/100 ~ P RB BYTA10 P* PBYTA20 ADK A6,/A P ADR A6,A4 P ORKL A6,/3030 P RTN A15 P*
0x35f22c…35f3c0 Dummy {f00=0x012c, f01=0x414a, f02=» l P* RESULT IN A6. P* , P* 6 PASCTBY EQU * @ P LDR A4,A6 T P ANK A6,/F f P SRL A4,8 x P ANK A4,/F P RF(E) ASCT20 P* PASCT10 ADK A6,/A P SUK A4,1 P RB(NE) ASCT10 P* PAS
0x35f3c0…35f554 (3, 294) Dummy {f00=0x012c, f01=0x2008, f02=» ASCT10 ADK A6,/A P SUK A4,1 P RB(NE) ASCT10 2 PASCT20 RTN A15 H P END ^@ j P RTN A15 p P* P* 2 P* ASCTBY = SUBROUTINE TO CONVERT A6-CONTENT ( P* FROM ASCII TO BINARY. P* RESU
0x35f554…35f6e8 Dummy {f00=0x012c, f01=0x018e, f02=»RESS BLOCK f 8 P LD A2,ABTADR,A2 GET ABORT ROUTINE ADDRESS (IF ANY) * P RF(Z) TABO10 NO SPECIAL ABORT ROUTINE N & P CFR A15,A2 PERFORM ABORT ROUTINE | P* PTABO10 EQU * $ P CF A15,TENDIO ABORT ECHO DEVICE P LDR A6,A8 RESTORE DWT
0x35f6e8…35f87c Dummy {f00=0x012c, f01=0x018e, f02=» : P CF A15,FREBLK I/O AND ACTIVATE. FREE DISPATCHER BLOCK " P CM DWTWAT,A6 INDICATE NO WAIT B P* h PTABO30 EQU * r 8 P LD A2,DWTADR,A6 GET ADDRESS TO DRIVER ADDRESS BLOCK 8 P LD A2,ABTADR,A2 GET ABORT ROUTINE ADDRESS (IF ANY) * P RF(Z) TAB
0x35f87c…35fa10 Dummy {f00=0x012c, f01=0x40c4, f02=» t P CF A15,TENDIO ABORT 0 P ABL LKMQDI QUEUE TASK AND GO TO DISPATCHER $ P* X 0 PTABOER ABL LKMRQE GO AND INDICATE LKM ERROR b P* P* P* P END @ D A2,ABTADR,A2 GET ABORT ROUTINE ADDRESS (IF ANY) * P RF(Z) TAB
0x35fa10…35fba4 Dummy {f00=0x012c, f01=0x2008, f02=»
0x35fba4…35fd38 Dummy {f00=0x012c, f01=0x0190, f02=» v P* PSYSBAS EQU * PSAVCON DATA BUFLEN & 2 PMXBUF DATA 0 DISC/FLEXIBLE DISC BUFFER ADDRESS @ PSAVMEM DATA 0 SAVE AREA v & PCYLNBR DATA /FFFF CYLINDER NUMBER ( PSECNBR DATA 0 PHYSICAL SECTOR NUMBER " PDEVTAB DATA /1909,/1101,/082
0x35fd38…35fecc Dummy {f00=0x012c, f01=0x0190, f02=»***** T F P* CALL-FORMAT, PERFORMS: CFR A14,A13 * F P* DATA [REL-ADDRESS] * X F P* * F P****************************
0x35fecc…360060 Dummy {f00=0x012c, f01=0x0190, f02=»**************** P* CONDITIONAL ASSEMBLY * P************************** : 0 PCASS EQU 1 1-PROGRAM LOAD DEVICE = CASSETTE , PDISC EQU 1 1-PROGRAM LOAD DEVICE = DISC 8 PFLDISC EQU 1 1-PROGRAM LOAD DEVICE = =FLEXIBLE DISC 8 PMFDISC EQU 1
0x360060…3601f4 (3, 295) Opaque[0x194]
0x3601f4…360388 # DirEnt {nam=»TOSSFM«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2598, f03=0x0000}
0x3601f4…360388 IdxSect {
0x3601f4…360388 f00 = 0x012c // 0x3601f4 @0x0
0x3601f4…360388 f01 = 0x000a // 0x3601f6 @0x2
0x3601f4…360388 gno = [ // 0x3601f8 @0x4
0x3601f4…360388 [0x00]: C0x012c.0x3.0
0x3601f4…360388 [0x01]: C0x012d.0x0.0
0x3601f4…360388 [0x02]: C0x012d.0x1.0
0x3601f4…360388 [0x03]: C0x0149.0x0.0
0x3601f4…360388 [0x04]: C0x0149.0x2.0
0x3601f4…360388 ]
0x3601f4…360388 }
0x360388…36051c Dummy {f00=0x012c, f01=0x0190, f02=» 2 P IDENT TOSSFM REL 10.0 80-03-14 870105041000 P : P* B P* L 6 P************************************************** V P* 6 P* PHILIPS TERMINAL SYSTEM PTS * P* 6 P* TOSSFM = TOSS FILE MANAGEMENT LKM PROC
0x36051c…3606b0 Dummy {f00=0x012c, f01=0x0190, f02=» TOSS FILE MANAGEMENT LKM PROCESSOR HANDLES 4 P* PREPARATIONS FOR DISC I/O, AND ACTIVATION OF 4 2 P* THE FILE MANAGEMENT TASK (FMTASK) FOR FILE l " P* ADMINISTRATION FUNCTIONS. P* P* P EJECT TOSSFM P* P* P
0x3606b0…360844 Dummy {f00=0x012c, f01=0x018e, f02=» ENTRY FCHECK CHECK ACCESS PAR. AND RETURN FWT ADDRESS " P ENTRY FCHEC2 FCHECK 2ND ENTRY > P EJECT TOSSFM d P* | P* P************* P* EXTERNALS * P************* P* P* P EXTRN FMRDWR FM READ/WRITE .
0x360844…3609d8 Dummy {f00=0x012c, f01=0x0190, f02=» " P EXTRN TIO:FM FM ENTRY IN TIO , P EXTRN ACTDIS ACTIVATE TASK AND DISPATCH * " P EXTRN FNDDWD FIND DWT ADDRESS Z 0 P EXTRN TIOERR ERROR: QUEUE TASK AND DISPATCH * P EXTRN SCTFWT FWT CHAIN START ADDRESS " P EXTRN SCTNOF NUMBER OF FILES ( P
0x3609d8…360b6c Dummy {f00=0x012c, f01=0x0190, f02=»LOCK IN FWT n P EXTRN EWTEXL EXTENT LENGTH P EXTRN EWTEXB EXTENT BASE 8 " P EXTRN EWTVOL VOLUME FILE CODE Z & P EXTRN ECBRL ECB REQUESTED LENGTH $ P EXTRN ECBCW1 ECB CONTROL WORD 1 $ P EXTRN ECBCW2 ECB CONTROL WORD 2 P EXTRN DWTST D
0x360b6c…360d00 Dummy {f00=0x012c, f01=0x0190, f02=»L ASSEMBLY P* , P**************************************** P* L . P* A PROGRAM VERSION USING TOSS MMU PAGING V * P* IS OBTAINED BY SETTING MMUPAG EQU 1. P* PMMUPAG EQU 1 P* P* 6 P* A PROGRAM VERSION USING THE EX
0x360d00…360e94 (3, 296) Dummy {f00=0x012d, f01=0x0190, f02=»M VERSION SUPPORTING SPLIT EXTENT I/O * P* IS OBTAINED BY SETTING XTSPLI EQU 1. . P* PXTSPLI EQU 0 f P* z P EJECT TOSSFM P* P* P********** P* TOSSFM * P********** P* P* 8 P* THIS IS TH
0x360e94…361028 Dummy {f00=0x012d, f01=0x0190, f02=» n P* P* A5 = TTAB ADDRESS P* A7 = ORDER CODE 0 P* A8 = ECB ADDRESS L P* h . P* WHEN FILE ADMINISTRATION IS REQUESTED, r ( P* TOSSFM WILL ACTIVATE THE FMTASK. P* . P* WHEN I/O FUNCTION IS REQUESTED, TOSSFM
0x361028…3611bc Dummy {f00=0x012d, f01=0x0190, f02=»JECT TOSSFM P* P* 4 PTOSSFM EQU * FILE MANAGEMENT LKM PROCESSOR ENTRY * P* b P* CHECK ORDER CODE l P* LDR A2,A7 ORDER CODE P ANK A2,/FF SKIP OPTION P XRK A2,/80 WAIT BIT SUK A2,/01 P RF(Z) FM:
0x3611bc…361350 Dummy {f00=0x012d, f01=0x0190, f02=»E x SUK A2,/11-/05 P RF(Z) FM:030 PHYSICAL READ " SUK A2,/15-/11 F P RF(Z) FM:030 PHYSICAL WRITE ^ SUK A2,/21-/15 $ P RF(Z) FM:010 OPEN/CREATE/EXTEND SUK A2,/22-/21 4 P RF(NZ) FM:RQE REQUEST ERROR IF NOT CLOSE/DELE
0x361350…3614e4 Dummy {f00=0x012d, f01=0x0190, f02=»ARAMETERS: h * " P* A1 = ORDER CODE AND OPTION * A2 = DISPATCH ADDRESS B * %* A3 = TTAB ADDRESS OF CALLING TASK d P* A4 = ECB ADDRESS * A5 = FMTASK TTAB ADDRESS * PFM:010 EQU * $ P LDR A1,A7 ORDER CODE AN
0x3614e4…361678 Dummy {f00=0x012d, f01=0x0190, f02=»DR A4,A8 ECB ADDRESS ( # LDKL A5,TTABFM FMTASK TTAB ADDRESS , P ABL ACTDIS ACTIVATE FMTASK AND DISPATCH H * x EJECT TOSSFM * * ********** * FM I/O * ********** * $ * FILE MANAGEMENT I/O FUNC
0x361678…36180c Dummy {f00=0x012d, f01=0x0190, f02=»DK A1,0 CHECK RETURN CODE P RF(Z) FM:050 OK " * : PFM:040 EQU * D P LDR A3,A1 RETURN CODE X . P ABL TIOERR ERROR: QUEUE TASK AND DISPATCH v * EJECT TOSSFM * " P* CHECK RELATIVE SECTOR NUMBER * PFM:0
0x36180c…3619a0 Dummy {f00=0x012d, f01=0x0190, f02=» MMUPAG=1 , ' EL A1,ECBCW1,A8 RELATIVE SECTOR NUMBER EL A2,ECBCW2,A8 B XIF Z * f P RF(NZ) FM:060 p ADK A1,0 , P RF(Z) FM:RQE RELATIVE SECTOR NUMBER = 0 * PFM:060 EQU * P ECR A6,A1 P ANK A6,/FF
0x3619a0…361b34 (3, 297) Dummy {f00=0x012d, f01=0x0190, f02=»RE d P LDKL A14,/7FFF P* " P EJECT TOSSFM , P* D ( P* SEARCH THE FILE EXTENT THAT HOLDS N P* THE REQUESTED SECTORS z * PFM:070 EQU * * P LC A6,EWTEXL-1,A3 FILE EXTENT LENGTH P LD A7,EWTEXL,A3 " P CWR A1,A6
0x361b34…361cc8 Dummy {f00=0x012d, f01=0x0190, f02=»ENT FOUND ~ * PFM:080 EQU * P IFT CPU852=0 0 . P DSR A6 SUBTRACT LENGTH FROM SECTOR NUMBER F P XIF x P* P IFT CPU852=1 2 P SUR A1,A6 SUBTRACT LENGTH FROM SECTOR NUMBER P SUR A2,A7 P RF(NN) FM:090 NOT UNDERFLOW
0x361cc8…361e5c Dummy {f00=0x012d, f01=0x0190, f02=»DRESS TO 2ND EWT BLOCK . ) LDR* A3,A3 ADDRESS TO NEXT EWT STRUCTURE $ P RB(NZ) FM:070 CHECK NEXT EXTENT P * x 4 /FM:RQE EQU * FILE MANAGEMENT REQUEST ERROR EXIT P LDKL A1,/A000 REQUEST ERROR P RB FM:040 * EJECT TOSSF
0x361e5c…361ff0 Dummy {f00=0x012d, f01=0x0190, f02=» LC A10,EWTEXB-1,A4 FILE EXTENT BASE P LD A11,EWTEXB,A4 , * F IFT CPU852=0 P " P DAR A10 COMPUTE SECTOR NUMBER f XIF * IFT CPU852=1 & P ADR A1,A10 COMPUTE SECTOR NUMBER P ADR A2,A11 RF(O) FM:140 OVER
0x361ff0…362184 Dummy {f00=0x012d, f01=0x018e, f02=»ON t SUK A1,1 * EJECT TOSSFM & * > * H PFM:115 EQU * R " P LDR A12,A1 SAVE SECTOR NUMBER f P LDR A13,A2 P* IFT MMUPAG=0 . P LC A3,ECBRL,A8 REQUESTED LENGTH (SECTORS) XIF *
0x362184…362318 Dummy {f00=0x012d, f01=0x0190, f02=» . P ADR A2,A3 COMPUTE LAST REQUESTED SECTOR+1 RF(O) FM:150 OVERFLOW 6 * T PFM:120 EQU * ^ 0 P ADR A6,A10 COMPUTE LAST SECTOR+1 IN EXTENT r P ADR A7,A11 P RF(O) FM:160 OVERFLOW * PFM:125 EQU * P CWR A6,A1 0 P
0x362318…3624ac Dummy {f00=0x012d, f01=0x0190, f02=» P CWR A7,A2 4 P RB(L) FM:RQE ALL SECTORS NOT WITHIN THIS EXTENT P XIF N P* Z P IFT XTSPLI=1 d 4 P RF(L) FM:170 ALL SECTORS NOT WITHIN THIS EXTENT z P CWR A7,A2 4 P RF(L) FM:170 ALL SECTORS NOT WITHIN THIS EXTENT P XIF
0x3624ac…362640 Dummy {f00=0x012d, f01=0x0190, f02=» = DISC INDEX (FROM FNDDWD) 0 P* A4 = 0 (INDICATES NOT I/O-AND-ACTIVATION) $ P* A5 = TTAB ADDRESS X * P* A6 = DISC DWT ADDRESS (FROM FNDDWD) t P* A7 = ORDER CODE P* A8 = ECB ADDRESS * PFM:130 EQU * $ P LC A2,EWTVOL,A4 FIL
0x362640…3627d4 (3, 298) Dummy {f00=0x0149, f01=0x018e, f02=» CODE x P LD A1,DWTST,A6 DWT STATUS , P ABL(NN) QUEDEV DISC BUSY, QUEUE REQUEST 0 P* ` P IFT MMUPAG=0 j . P ST A12,ECBCW1,A8 SET SECTOR NUMBER IN ECB P ST A13,ECBCW2,A8 P XIF P* P IFT MMUPAG=1 . P ES A12,ECBCW1,A
0x3627d4…362968 Dummy {f00=0x0149, f01=0x0190, f02=» EJECT TOSSFM * 6 2* OVERFLOW CORRECTIONS FOR DOUBLE WORD ARITHMETICS & * ` FM:140 EQU * j P IFT CPU852=1 ~ ADK A1,1 P ANR A2,A14 SKIP SIGN BIT P RB FM:110 P XIF * FM:150 EQU * ADK
0x362968…362afc Dummy {f00=0x0149, f01=0x0190, f02=»BIT z P RB FM:125 * EJECT TOSSFM ( P* @ 0 P* REQUESTED SECTORS CONTINUE IN NEXT EXTENT J P* ~ PFM:170 EQU * IFT XTSPLI=1 & P LDR A1,A4 EWT ADDRESS (2ND BLOCK) $ LDKL A2,FMRDWR DISPATCH ADDRESS ****
0x362afc…362c90 Dummy {f00=0x0149, f01=0x0190, f02=»** P* FCHECK * P* FCHEC2 * P********** . P* @ P* J 6 P* FCHECK/FCHEC2 CONVERTS THE FILE NUMBER TO FWT T . P* ADDRESS AND CHECKS ACCESS PARAMETERS. P* " P* INPUT: A5 = TTAB ADDRESS P* A7 = ORDER C
0x362c90…362e24 Dummy {f00=0x0149, f01=0x0190, f02=»* A2 IS DESTROYED P* " PFCHECK EQU * FCHECK MAIN ENTRY & P IFT MMUPAG=0 L P LDR* A2,A8 FILE NUMBER b P XIF P* P IFT MMUPAG=1 P ELR A2,A8 FILE NUMBER P XIF P* 4 PFCHEC2 EQU * FCHECK 2ND ENTRY (A2 = FI
0x362e24…362fb8 Dummy {f00=0x0149, f01=0x0190, f02=»UMBER TOO BIG | 0 P LDKL A3,SCTFWT ADDRESS TO FWT CHAIN POINTER P* J P EJECT TOSSFM T P* l P* v $ PFC:010 EQU * COMPUTE FWT ADDRESS P LDR* A3,A3 NEXT FWT ADDRESS P SUK A2,1 P RB(P) FC:010 P* P* CHECK AC
0x362fb8…36314c Dummy {f00=0x0149, f01=0x0190, f02=»1 CHECK IF FWT USED " P RF(Z) FC:050 FILE NOT OPENED , P LD A2,FWTTAB,A3 TTAB ADDRESS (EA TASK) B ( P RF(Z) FC:020 OPENED NON-EXCLUSIVELY r & P CWR A2,A5 EA, CHECK IF THIS TASK . P RF(NE) FC:060 EXCLUSIVE FOR ANOTHER TASK P* PFC:0
0x36314c…3632e0 Dummy {f00=0x0149, f01=0x0190, f02=»CAL ORDERS | P ANK A7,/85 BASIC ORDER P* 2 , PFC:040 EQU * COMMON FCHECK RETURN LABEL < P RTN A15 l P* | P EJECT TOSSFM P* P* ERROR RETURNS P* $ PFC:050 EQU * REQUEST ERROR EXIT & P LDKL A1,/7FC0 RETURN
0x3632e0…363474 (3, 299) Dummy {f00=0x0149, f01=0x4088, f02=»OLUME LOADED EXIT ~ " P ADK A1,/20 RETURN CODE = /20 P RB FC:040 RETURN @ P* Z * d * n END x@
0x363474…363608 Dummy {f00=0x0149, f01=0x2008, f02=» O t * * * & END 0@ <:127 : XIF L * X EJECT TOSSFM b * z * 8 3FM:170 EQU * MAKE ALL PARAMETERS READY FOR DISC I/O $ LC A2,EWTVOL,A3 FILE CODE DISC ( $ CF A15,FNDDW2 FIND DI
0x363608…36379c Dummy {f00=0x0149, f01=0x0000, f02=»
[…0x5…]
0x363f80…364114 (3, 300) Opaque[0x194]
0x364114…3642a8 # DirEnt {nam=»FMTASK«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x29a0, f03=0x0000}
0x364114…3642a8 IdxSect {
0x364114…3642a8 f00 = 0x014d // 0x364114 @0x0
0x364114…3642a8 f01 = 0x001e // 0x364116 @0x2
0x364114…3642a8 gno = [ // 0x364118 @0x4
0x364114…3642a8 [0x00]: C0x014d.0x0.0
0x364114…3642a8 [0x01]: C0x014d.0x1.0
0x364114…3642a8 [0x02]: C0x014d.0x2.0
0x364114…3642a8 [0x03]: C0x014d.0x3.0
0x364114…3642a8 [0x04]: C0x014e.0x0.0
0x364114…3642a8 [0x05]: C0x014e.0x1.0
0x364114…3642a8 [0x06]: C0x014e.0x2.0
0x364114…3642a8 [0x07]: C0x014e.0x3.0
0x364114…3642a8 [0x08]: C0x014f.0x0.0
0x364114…3642a8 [0x09]: C0x014f.0x1.0
0x364114…3642a8 [0x0a]: C0x014f.0x2.0
0x364114…3642a8 [0x0b]: C0x014f.0x3.0
0x364114…3642a8 [0x0c]: C0x0150.0x0.0
0x364114…3642a8 [0x0d]: C0x0150.0x1.0
0x364114…3642a8 [0x0e]: C0x0150.0x2.0
0x364114…3642a8 ]
0x364114…3642a8 }
0x3642a8…36443c Dummy {f00=0x014d, f01=0x0190, f02=» 2 P IDENT FMTASK REL 10.0 80-03-15 870105041000 P : * B * L 6 2************************************************** V * 6 2* PHILIPS TERMINAL SYSTEM PTS * * 6 2* FMTASK = TOSS FILE MANAGEMENT TASK
0x36443c…3645d0 Dummy {f00=0x014d, f01=0x0190, f02=» TOSS FILE MANAGEMENT TASK CONTAINS THE . ** FOLLOWING FILE ADMINISTRATION MODULES: 0 * b * &* - FMOPEN OPEN/CREATE/EXTEND FILE l $ * - FMCLOS CLOSE/DELETE FILE ( #* - FMRDFP READ FILE PARAMETERS * ( P* A SPECIAL EN
0x3645d0…364764 Dummy {f00=0x014d, f01=0x0190, f02=»* - FMRDWR READ/WRITE (SPLIT EXTENT I/O) * 4 0 P* FMTASK ALSO CONTAINS THE FILE MANAGEMENT > . P* SYSTEM INITIALIZATION ROUTINE, FMINIT. r P* * EJECT FMTASK * * *********** * ENTRIES *
0x364764…3648f8 Dummy {f00=0x014d, f01=0x0190, f02=»S h 0 P ENTRY FMINIT FILE MANAGEMENT INITIALIZATION ENTRY TTABFM FMTASK TTAB > ( P ENTRY FWTPAR FILE ACCESS PARAMETERS ` P ENTRY FWTFNR FILE NUMBER 6 P ENTRY FWTTAB TTAB FOR TASK WITH EXCLUSIVE ACCESS 2 P ENTRY FWTEW1 POINTER TO 2ND EWT
0x3648f8…364a8c Dummy {f00=0x014d, f01=0x0190, f02=»GTH x P ENTRY EWTEXB EXTENT BASE " P ENTRY EWTVOL VOLUME FILE CODE . P* T P EJECT FMTASK ^ P* v P* ENTRY FPB:RL RECORD LENGTH ENTRY FPB:BF BLOCK FACTOR $ ENTRY FPB:FO FILE ORGANIZATION ENTRY FPB:BO BA
0x364a8c…364c20 Dummy {f00=0x014d, f01=0x0190, f02=» | ENTRY FPB:V2 VOLUME NAME 2 ENTRY FPB:S2 SIZE 2 , ENTRY FPB:V3 VOLUME NAME 3 H ENTRY FPB:S3 SIZE 3 l ENTRY FPB:V4 VOLUME NAME 4 ENTRY FPB:S4 SIZE 4 $ ENTRY FPB:FR FILE RECORD NUMBER " ENTRY FPB:US NUMBER OF
0x364c20…364db4 (3, 301) Dummy {f00=0x014d, f01=0x0190, f02=»F NUMBER OF INDEX FILES ( # ENTRY FPB:KA KEY ADDRESS IN RECORD P ENTRY FPB:CD CREATION DATE L " P ENTRY FPB:RP RETENTION PERIOD p EJECT FMTASK * * ************* * EXTERNALS * ************* *
0x364db4…364f48 Dummy {f00=0x014d, f01=0x0190, f02=»BLK GET PARAMETERS FROM MONITOR BLOCK 0 P EXTRN FNDTID FIND TTAB ADDRESS FROM TASK ID . ( P EXTRN FNDDWD FIND DISC DWT ADDRESS b : 6 EXTRN FCHECK CHECK ACCESS PAR. AND RETURN FWT ADDRESS " P EXTRN FCHEC2 FCHECK 2ND ENTRY 4 0 EXTRN LKMERR HALT SYS
0x364f48…3650dc Dummy {f00=0x014d, f01=0x0190, f02=»FTAB z " P EXTRN SCTNOF NUMBER OF FILES * P EXTRN SCTFWT FWT CHAIN START ADDRESS 2 ( P EXTRN SCTFWL FILE WORK TABLE LENGTH ` $ P EXTRN SCTDMT DM TASKS IN SYSTEM P EXTRN NVLTAB NVL TABLE $ P EXTRN NVLDMT DM TASK NVL TABLE P EXTRN NVLEN
0x3650dc…365270 Dummy {f00=0x014d, f01=0x0190, f02=» EXTRN DWTMEC MMU ECB ADDRESS P EXTRN DWTVOL VOLUME NAME & P EXTRN DWTNVL NVL INDICATOR H 2 P EXTRN FDBMEC FDB MMU ECB DISPLACEMENT IN FWT l P* P EJECT FMTASK P* P* P EXTRN TTB:MT MMU TABLE P EXTRN TTB:SA SA
0x365270…365404 Dummy {f00=0x014d, f01=0x0190, f02=»ETURN CODE ~ P EXTRN ECBCW1 CONTROL WORD 1 P EXTRN ECBCW2 CONTROL WORD 2 6 EJECT FMTASK Z * r * | , '*************************************** * * CONDITIONAL ASSEMBLY * , '********************************
0x365404…365598 Dummy {f00=0x014d, f01=0x0190, f02=»AG EQU 1 * * 6 2* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION $ . ** SET IS OBTAINED BY SETTING CPU852 EQU 0. ^ * PCPU852 EQU 0 * * 4 /* A PROGRAM VERSION SUPPORTING SPLIT EXTENT I/O * &* IS OBTAINED
0x365598…36572c Dummy {f00=0x014d, f01=0x0190, f02=» | P* VL DISPLACEMENTS * P******************** $ P* @ P* VOLUME LABEL DISPLACEMENTS J P* n PVOL:VN EQU 0 VOLUME NAME x $ PVOL:EL EQU 6 VTOC EXTENT LENGTH " PVOL:EB EQU 10 VTOC EXTENT BASE $ PVOL:RL EQU 12 VTOC RECORD LENGTH
0x36572c…3658c0 Dummy {f00=0x014d, f01=0x0190, f02=»* $ PVTOCRL EQU 42 VTOC RECORD LENGTH " PVTOCBF EQU 6 VTOC BLOCK FACTOR 2 P* X P EJECT FMTASK b P* z P* P********************** P* VTOC DISPLACEMENTS * P********************** P* , P* VOLUME TABLE OF CONT
0x3658c0…365a54 (3, 302) Dummy {f00=0x014d, f01=0x0190, f02=»NUMBER (S-FILE) v " PVTC:SN EQU 9 SOP SWITCH NUMBER $ PVTC:EN EQU 10 FILE EXTENT NUMBER > $ PVTC:EL EQU 12 FILE EXTENT LENGTH f " PVTC:EB EQU 16 FILE EXTENT BASE $ PVTC:LR EQU 20 LAST RECORD NUMBER PVTC:RL EQU 24 RECORD LENGTH PVTC:BF E
0x365a54…365be8 Dummy {f00=0x014d, f01=0x0190, f02=» ( PVTC:IF EQU 37 NUMBER OF INDEX FILES ( PVTC:KA EQU 38 KEY ADDRESS IN RECORD 0 PVTC:ST EQU 41 STATUS BYTE P* ~ P EJECT FMTASK P* P* P********************* P* FWT DISPLACEMENTS * P*********************
0x365be8…365d7c Dummy {f00=0x014d, f01=0x0190, f02=»TBAS EQU FWTLNK+/10 P XIF P* ( P IFT MMUPAG=1 2 PFWTBAS EQU FWTLNK+/14 H P XIF f P* r < PFWTVTC EQU FWTBAS+/00 VTOC SECTOR NUMBER (FIRST EXTENT) | 0 PFWTPAR EQU FWTBAS+/02 FILE ACCESS PARAMETERS & PFWTFNR EQU FWTBAS+/03 FI
0x365d7c…365f10 Dummy {f00=0x014d, f01=0x0190, f02=»T 4 PFWTSEX EQU FWTBAS+/08 FILE SECTION/EXTENT NUMBER B PFWTEXL EQU FWTBAS+/0A EXTENT LENGTH IN SECTORS (FIRST EXTENT) B 8 PFWTEW2 EQU FWTBAS+/0C POINTER TO NEXT EWT STRUCTURE : PFWTVOL EQU FWTBAS+/0E VOLUME FILE CODE (FIRST EXTENT) 4 PFWTEXB
0x365f10…3660a4 Dummy {f00=0x014d, f01=0x0190, f02=» P********************* P* EWT DISPLACEMENTS * & P********************* D P* b & P* EXTENT WORK TABLE DISPLACEMENTS l P* $ PEWTLNK EQU 0 LINK NEXT EWT BLOCK P* P* BLOCK 1 P* , PEWTSEX EQU 2 FILE SECTION/
0x3660a4…366238 Dummy {f00=0x014d, f01=0x0190, f02=» r PEWTEXB EQU 4 EXTENT BASE P* ( 0 PEWTLEN EQU 6 EXTENT WORK TABLE BLOCK LENGTH 2 P* f EJECT FMTASK p * * ********************* * FPB DISPLACEMENTS * ********************* * ( $* FILE P
0x366238…3663cc Dummy {f00=0x014d, f01=0x018e, f02=»NIZATION z FPB:BO EQU 5 BASIC ORDERS FPB:FN EQU 8 FILE NAME 2 FPB:EL EQU 17 ENLARGE P FPB:V1 EQU 18 VOLUME NAME 1 n FPB:S1 EQU 24 SIZE 1 FPB:V2 EQU 28 VOLUME NAME 2 FPB:S2 EQU 34 SIZE 2 FPB:V3 EQU 38 VOLUME NAME
0x3663cc…366560 Dummy {f00=0x014d, f01=0x0190, f02=» n " FPB:US EQU 62 NUMBER OF USERS FPB:SH EQU 64 SHAREABILITY . FPB:MN EQU 65 MONITOR NUMBER P $ FPB:SN EQU 66 SOP SWITCH NUMBER t ( #FPB:IF EQU 67 NUMBER OF INDEX FILES ( #FPB:KA EQU 68 KEY ADDRESS IN RECORD PFPB:CD EQU 70 CREATI
0x366560…3666f4 (3, 303) Dummy {f00=0x014d, f01=0x0190, f02=»ASK * * TTABFM (FMTASK TTAB) * 4 IFT MMUPAG=1 > RES 16 FMTASK MMU TABLE T XIF t * ( P DATA 0 CURRENT SEGMENT BASE (DUMMY) 2 PVOLUME DATA 0 CURRENT VOLUME NAME DISPLACEMENT " DATA 0 SEGMENT BLOCK ADDRES
0x3666f4…366888 Dummy {f00=0x014d, f01=0x0190, f02=»49 PRIORITY LEVEL DATA 0 PENDING POINTER * P DATA /C4C0 PSW (PROGRAM STATUS WORD) : DATA 0 DISPATCH ADDRESS h 2 . DATA 0,0,0,0,0,0,0 REGISTER SAVE AREA, A1-A14 $ P DATA FM:ECB A8 = FM:ECB ADDRESS P DATA 0,0,0,0,0,0 *
0x366888…366a1c Dummy {f00=0x014d, f01=0x0190, f02=»0,0 * P RES 6 FMTASK STACK $ FM:STB EQU *-2 FMTASK STACK BASE 2 * Z P IFT MMUPAG=1 d , PFM:FPB RES 40 FILE PARAMETER BLOCK AREA z P XIF P* P EJECT FMTASK P* P* P********** P* FMINIT *
0x366a1c…366bb0 Dummy {f00=0x014d, f01=0x0190, f02=»INIT AFTER IPL AND AT POWER ON. x > P* WHEN CALLED AT POWER ON, AN IMMEDIATE RETURN IS MADE. ( P* j < P* FMINIT WILL ZEROIZE THE FWT AREA, AND LINK THE FWT:S t < P* TOGETHER. THE POINTER FWTEW1 IS ALSO INITIALIZED, AS & P* WELL AS FWTFNR (
0x366bb0…366d44 Dummy {f00=0x014d, f01=0x0190, f02=»TASK. ^ P* PFMINIT EQU * FMINIT ENTRY * P LDKL A1,/F03E RTNA15 INSTRUCTION CODE : P ST A1,FMINIT CLOSE THE DOOR h P* P EJECT FMTASK P* P* 8 PFM:BUF EQU FMINIT+2 START OF FMTASK INTERNAL BUFFER P* P
0x366d44…366ed8 Dummy {f00=0x014d, f01=0x0190, f02=» P LDKL A6,/8000 DWT BUSY BIT $ P LDKL A7,TIODM DM ADDRESS BLOCK , P* T PFMI:30 EQU * ^ P IFT MMUPAG=1 r 4 P LDKL A8,FDBMEC FDB MMU ECB DISPLACEMENT IN FWT P ADR A8,A1 MMU ECB ADDRESS P XIF P* " P LDR A2,A1 CURRE
0x366ed8…36706c Dummy {f00=0x014d, f01=0x0190, f02=» FMI:50 INITIALIZATION COMPLETED , P RF(Z) FMI:40 ONE FWT LEFT TO INITIALIZE ( 0 P STR A3,A1 LINK CURRENT FWT TO THE NEXT FWT X $ P ADK A1,2 INCREMENT FWT POINTER P* P EJECT FMTASK P* P* PFMI:40 EQU * P CMR A1
0x36706c…367200 Dummy {f00=0x014d, f01=0x018e, f02=»A3,SCTFWL " P ADK A3,FWTEW2 FWTEW2 ADDRESS . P ST A3,FWTEW1,A2 INITIALIZE FWTEW1 POINTER 8 , P ST A5,FWTFNR,A2 SET FILE NUMBER IN FWT j * P ST A6,DWTST,A2 INDICATE FWT NOT BUSY : P ST A7,DWTADR,A2 DM ADDRESS BLOCK (ACTIVATION ADDRESS) P*
0x367200…367394 (3, 304) Dummy {f00=0x014e, f01=0x0190, f02=» P* P EJECT FMTASK P* & 4 P* FILL IN NVLTAB WITH DM TTAB ADDRESSES (IF ANY) 0 P* h PFMI:50 EQU * r $ P LD A1,SCTDMT DM TASKS IN SYSTEM ( P RF(Z) FMI:75 NO DM TASKS IN SYSTEM P LDK A3,4 LOOP COUNTER & P LDKL A4,NVLDMT
0x367394…367528 Dummy {f00=0x014e, f01=0x0190, f02=»DM TASK NOT IN SYSTEM | , P CF A15,FNDTID FIND DM TASK TTAB ADDRESS P STR A2,A4 STORE IN NVLTAB N P* p PFMI:70 EQU * z & P ADK A4,2 INCREMENT NVLTAB POINTER P ADK A7,1 NEXT DM TASK ID $ P SUK A3,1 DECREMENT LOOP COUNTER P RB(P)
0x367528…3676bc Dummy {f00=0x014e, f01=0x0190, f02=»LIZE BIT MASK P LDK A2,1 " P LDKL A3,NVLTAB NVLTAB ADDRESS ( P* N PFMI:80 EQU * X * P LDR* A4,A3 GET ONE ENTRY FROM NVLTAB l & P RF(Z) FMI:85 THIS ENTRY NOT USED $ P ORR A1,A2 INDICATE TTAB PRESENT P* PFMI:85 EQU *
0x3676bc…367850 Dummy {f00=0x014e, f01=0x0190, f02=»LTAB t P* ! PFMI:90 EQU * ! * P ORR A1,A2 ADD ONE BIT FOR USER TASKS ! * " P ST A1,NVLBIT SET NVL BIT MASK ! X P RTN A15 ! ~ P* ! P IFT MMUPAG=0 ! P RES 57 ! P XIF ! P* ! P IFT MMUPAG=1 ! P RES 52 ! P XIF ! P*
0x367850…3679e4 Dummy {f00=0x014e, f01=0x0190, f02=»LE MANAGEMENT TASK PERFORMS ! * %* FILE ADMINISTRATION FUNCTIONS. IT " $ , '* IS ACTIVATED BY THE FILE MANAGEMENT " R & P* LKM PROCESSOR AT ENTRY FM:ADM. " . P* AFTER SOME HOUSEKEEPING THE FOLLOWING " 6 P* MODULES WILL PERFORM THE FILE ADMINIST
0x3679e4…367b78 Dummy {f00=0x014e, f01=0x0190, f02=» ( " : 0, 2) " j > :* - FMRDFP READ FILE PARAMETERS ( " : 0) # * # b ( P* A SPECIAL ENTRY IS USED FOR I/O # l . P* FUNCTIONS WHERE REQUESTED SECTORS ARE # , P* SPLIT OVER TWO OR MORE FILE EXTENTS: # P* # > :*
0x367b78…367d0c Dummy {f00=0x014e, f01=0x018e, f02=» # P* FM:ADM * $ P********** $ P* $ , * $ 6 * ENTRY PARAMETERS: $ @ * $ ^ " P* A1 = ORDER CODE AND OPTION $ h * %* A3 = TTAB ADDRESS OF CALLING TASK $ P* A4 = USER ECB ADDRESS $ * $ 2 PFM:ADM EQU * FM ADMINISTRATION F
0x367d0c…367ea0 Dummy {f00=0x014e, f01=0x0190, f02=» $ r & P LDKL A14,FM:STB FMTASK STACK BASE % P* % 2 P IFT MMUPAG=0 % < P LD A10,ECBBA,A9 FPB ADDRESS % R P XIF % v P* % P IFT MMUPAG=1 % ( P LDKL A3,TTABFM FMTASK TTAB ADDRESS % P TL TTB:MT,A5 USER MMU TABLE % , P TS TTB:MT,A3 STORE IN
0x367ea0…368034 (3, 305) Dummy {f00=0x014e, f01=0x018e, f02=»DKL A2,FM:FPB FM FPB ADDRESS % P LDR A10,A2 SAVE IT & $ P LDK A4,FPBLEN FPB LENGTH & @ $ P MVUS A4 MOVE USER FPB TO FM:FPB & b P XIF & P* & P EJECT FMTASK & P* & . P* CHECK WHAT FUNCTION THAT IS REQUESTED & 4 P* AND BRANCH TO AP
0x368034…3681c8 Dummy {f00=0x014e, f01=0x0190, f02=» P* ' P* A1 = ORDER OPTION ' * P* A5 = TTAB ADDRESS OF CALLING TASK ' , P* A9 = USER ECB ADDRESS ' Z P* A10 = FPB ADDRESS ' | P* ' $ P ECR A1,A7 ORDER CODE AND OPTION ' P ANK A7,/7F ORDER CODE ' P SUK A7,/03 ' ( P ABL(Z) FMRD
0x3681c8…36835c Dummy {f00=0x014e, f01=0x0190, f02=»* ' ********** ( * FMOPEN * ( ********** ( . * ( @ P* ( J 2 P* FILE MANAGEMENT ADMINISTRATION FUNCTIONS: ( T P* OPEN/CREATE/EXTEND FILE ( P* ( P* ENTRY PARAMETERS: ( P* ( P* A1 = ORDER OPTION ( * P* A5 = T
0x36835c…3684f0 Dummy {f00=0x014e, f01=0x0190, f02=»END FILE ( t P ANK A1,/FF ORDER OPTION ) ( P ABL(NZ) FM:RQE ILLEGAL ORDER OPTION ) 0 P* ) P EJECT FMTASK ) f P* ) ~ P* ) P******** ) P* OPEN * ) P******** ) P* ) P* ) POPEN EQU * OPEN FILE ) 0 P LDK A7,FPB:V1 1ST VOL
0x3684f0…368684 Dummy {f00=0x014e, f01=0x0190, f02=»LUME NOT FOUND ) $ P CF A14,FNDFWT FIND FWT ADDRESS * P ADK A6,0 SET CR * > ( P RF(Z) OP:030 NO FREE FWT AVAILABLE * V " P LDR* A1,A6 FIRST WORD OF FWT * & P ANK A1,1 CHECK IF ALREADY OPENED * P RF(Z) OP:060 NOT OPENED * P* * P* FILE IS AL
0x368684…368818 Dummy {f00=0x014e, f01=0x018e, f02=»B ADDRESS FOR EA TASK * | " P RF(NZ) OP:040 FILE PROTECTED + & P LC A1,FWTPAR,A6 ACCESS PARAMETERS + D P LDR A2,A1 + n P ANK A1,/3F NUMBER OF USERS + P SUK A1,/3F + P ABL(NZ) OP:250 + P* + P EJECT FMTASK + P* + P* ERROR EXIT
0x368818…3689ac Dummy {f00=0x014e, f01=0x018e, f02=» + l P LDKL A4,/8400 RETURN CODE , P RF OP:RTN , * P* , < POP:040 EQU * FILE PROTECTED , F P LDK A4,/40 RETURN CODE , j P RF OP:RTN , P* , & POP:050 EQU * VOLUME/FILE NOT FOUND , 0 P CF A14,RELBLK RELEASE EWT STRUCTURE BLOCKS , P* ,
0x3689ac…368b40 Dummy {f00=0x014e, f01=0x0190, f02=» P EJECT FMTASK - P* - P* FILE IS NOT OPENED BEFORE: - & 0 P* FIND ALL FILE EXTENTS, BUILD FWT AND EWT:S - J P* - ~ POP:060 EQU * - P* - $ P* MOVE FILE NAME FROM FPB TO FWT - P* - P LDR A1,A10 FPB ADDRESS - P ADK A1,FPB:FN -
0x368b40…368cd4 (3, 306) Dummy {f00=0x014e, f01=0x018e, f02=» LDR A2,A12 RESTORE FILE CODE - P RF OP:075 . & P* . 8 P* FIND ONE VOLUME . B P* . POP:070 EQU * . f 0 P ST A7,VOLUME SAVE VOLUME NAME DISPLACEMENT . z P CF A14,FNDVOL FIND VOLUME . P ADK A2,0 . " P RB(Z) OP:050 VOLUME NOT FOUND . P
0x368cd4…368e68 Dummy {f00=0x014e, f01=0x018e, f02=» . p 0 P LDR A11,A2 SAVE CURRENT VTOC SECTOR NUMBER / & P RB(Z) OP:050 NO FILE EXTENT FOUND / < P* / f POP:080 EQU * / p P LDR A1,A6 SAVE FWT ADDRESS / P LDR* A2,A8 DISC FILE CODE / P INH / . P CF A15,FNDDWD DISC DWT ADDRESS AND INDEX / P
0x368e68…368ffc Dummy {f00=0x014e, f01=0x018e, f02=» " P LDR A6,A1 RESTORE FWT ADDRESS 0 ( P LD A3,VTC:EN,A13 FILE EXTENT NUMBER 0 * ( P LD A2,VTC:FO,A13 FILE ORGANIZATION 0 V P ANK A2,/FF 0 P SUK A2,'L' 0 P RF(Z) OP:085 L-FILE 0 * P LD A2,VTC:FS,A13 FILE SECTION NUMBER 0 P SRC A2,2 0 2 P E
0x368ffc…369190 Dummy {f00=0x014e, f01=0x0190, f02=» 0 POP:085 EQU * 1 * P LC A2,VTC:EL+1,A13 FILE EXTENT LENGTH 1 P LD A1,VTC:EL+2,A13 1 J P ADK A3,0 SET CR 1 f $ P RF(Z) OP:090 FIRST FILE EXTENT 1 ~ P INH 1 P CF A15,GETBLK EWT BLOCK 1 1 P RF OP:100 1 P* 1 POP:090 EQU * 1 > P ST
0x369190…369324 Dummy {f00=0x014e, f01=0x0190, f02=» POP:100 EQU * 2 P LDR* A2,A8 VOLUME FILE CODE 2 * P ECR A2,A2 FILE CODE NOW IN LEFT BYTE 2 < ( P LC A2,VTC:EB+1,A13 FILE EXTENT BASE 2 j P LD A1,VTC:EB+2,A13 2 P ADK A3,0 SET CR 2 ( P RF(NZ) OP:120 NOT FIRST FILE EXTENT 2 < P ST A2,FWTEXB-2,A6
0x369324…3694b8 Dummy {f00=0x014e, f01=0x0190, f02=» 2 * P* FIND REMAINING EXTENTS FOR THIS FILE 3 P* 3 6 POP:110 EQU * 3 @ ( P CF A14,FVTC30 FIND NEXT VTOC ENTRY 3 T 0 P LDR A11,A2 SAVE CURRENT VTOC SECTOR NUMBER 3 6 P RF(Z) OP:160 NO MORE FILE EXTENTS ON THIS VOLUME 3 P RB OP:080 3 P* 3
0x3694b8…36964c Dummy {f00=0x014e, f01=0x0190, f02=»CK 1 3 v P CF A15,GETBLK EWT BLOCK 2 4 P ENB 4 . P STR A4,A3 LINK EWT2 TO EWT1 4 : P LDR A1,A6 FWT ADDRESS 4 ^ P ADK A1,FWTEW2 4 | P* 4 POP:130 EQU * 4 * P LDR* A2,A1 ADDRESS NEXT EWT STRUCTURE 4 P RF(NZ) OP:150 4 P* 4 POP:140 EQU
0x36964c…3697e0 Dummy {f00=0x014e, f01=0x0190, f02=»TSEX,A2 FILE SECTION AND EXTENT NUMBER 4 P CC A11,EWTSEX,A3 5 . ( P RB(G) OP:140 INSERT NEW EWT BLOCKS 5 H ( P LDR* A1,A2 ADDRESS TO 2ND EWT BLOCK 5 t P RB OP:130 5 P* 5 P EJECT FMTASK 5 P* 5 P* 5 POP:160 EQU * 5 2 P LD A7,VOLUM
0x3697e0…369974 (3, 307) Dummy {f00=0x014e, f01=0x018e, f02=» LDR A1,A10 FPB ADDRESS 5 $ P ADR A1,A7 POINT TO VOLUME NAME 6 0 P LDR* A1,A1 CHECK IF MORE VOLUMES SPECIFIED 6 H " P RF(Z) OP:170 NO MORE VOLUMES 6 | , P SUKL A1,/2020 SPACES IF NO MORE VOLUMES 6 $ P RB(NZ) OP:070 FIND NEXT VOLUME 6 P* 6 POP:1
0x369974…369b08 Dummy {f00=0x014e, f01=0x0190, f02=» 6 j P* 7 6 P LD A1,FWTVTC,A6 VTOC SECTOR NUMBER, FIRST EXTENT 7 , P RB(Z) OP:050 FIRST FILE EXTENT MISSING 7 L P LDR A1,A6 FWT ADDRESS 7 | P ADK A1,FWTEW1 7 , P LDK A4,0 FILE SECTION AND EXTENT NUMBER 7 P* 7 P EJECT FMTASK 7 P* 7
0x369b08…369c9c Dummy {f00=0x014e, f01=0x018e, f02=»P:230 END OF EWT CHAIN 7 4 P LC A13,EWTSEX,A1 FILE SECTION AND EXTENT NUMBER 8 P LDR A3,A13 8 V $ P ANK A3,/C0 FILE SECTION NUMBER 8 j P LDR A7,A4 8 $ P ANK A7,/C0 FILE SECTION NUMBER 8 , P SUR A7,A3 COMPARE FILE SECTION NUMBERS 8 , P RF(Z) OP:19
0x369c9c…369e30 Dummy {f00=0x014e, f01=0x0190, f02=» 8 , P ANK A3,/3F EXTENT NUMBER SHOULD BE ZERO 9 P RF OP:200 9 8 P* 9 J POP:190 EQU * 9 T P LDR A3,A13 9 h " P ANK A3,/3F FILE EXTENT NUMBER 9 | " P ANK A4,/3F FILE EXTENT NUMBER 9 * P SUR A4,A3 COMPARE FILE EXTENT NUMBER 9 & P ADK A4,1 DIFFEREN
0x369e30…369fc4 Dummy {f00=0x014e, f01=0x018e, f02=» EXTENT NUMBER 9 j P RB OP:180 : P* : ( P EJECT FMTASK : 2 P* : J P* : T POP:230 EQU * : ^ , P LC A2,FPB:SH,A10 SHAREABILITY PARAMETER : r P ANK A2,/FF : " P RF(Z) OP:240 NO EA REQUESTED : , P ST A5,FWTTAB,A6 SET TTAB ADDRESS IN FWT :
0x369fc4…36a158 Dummy {f00=0x014e, f01=0x0190, f02=» : EJECT FMTASK ; P* ; , P* COMMON EXIT FOR ACCEPTED OPEN REQUESTS ; * P* ; Z POP:250 EQU * ; d . P LD A1,FPB:BO,A10 BASIC ORDERS PARAMETERS ; x P ANK A1,/FF ; 2 P RF(NZ) OP:260 BASIC ORDERS WANTED, NO ACTION ; * P ANK A2,/BF PHYSICAL
0x36a158…36a2ec Dummy {f00=0x014e, f01=0x0190, f02=»METERS ; l P LD A4,FWTFNR,A6 FILE NUMBER < P* < 2 P IFT MMUPAG=0 < < * P SC A4,ECBFC,A9 SET FILE NUMBER IN ECB < R P XIF < P* < P IFT MMUPAG=1 < P ELR A2,A9 < P ANKL A2,/FF00 < P ANK A4,/FF FILE NUMBER < P ORR A2,A4 < & P E
0x36a2ec…36a480 Dummy {f00=0x014e, f01=0x0190, f02=»K < P* = P* = P********** = P* CREATE * = 0 P********** = B P* = T P* = ^ PCREATE EQU * CREATE FILE = h P* TO BE IMPLEMENTED = P EJECT FMTASK = P* = P* = P********** = P* EXTEND * = P********** = P
0x36a480…36a614 (3, 308) Dummy {f00=0x014f, f01=0x0190, f02=» = * FMCLOS * > ********** > * > , P* > 6 2 P* FILE MANAGEMENT ADMINISTRATION FUNCTIONS: > @ P* CLOSE/DELETE FILE > v P* > P* ENTRY PARAMETERS: > P* > P* A1 = ORDER OPTION > * P* A5 = TTAB ADDRESS OF CALLING TAS
0x36a614…36a7a8 Dummy {f00=0x014f, f01=0x0190, f02=»R OPTION > ( P ABL(NZ) FM:RQE ILLEGAL ORDER OPTION ? P* ? < P EJECT FMTASK ? F P* ? ^ P* ? h P********* ? r P* CLOSE * ? P********* ? P* ? P* ? PCLOSE EQU * CLOSE FILE ? 2 P CF A14,RDVTOC READ VTOC RECORD (FIRST EXTENT)
0x36a7a8…36a93c Dummy {f00=0x014f, f01=0x018e, f02=»CHECK IF NVL ? ( P RF(Z) CL:010 NVL, DON'T WRITE VTOC @ P ABL FM:RTC ERROR @ @ P* @ Z PCL:005 EQU * @ d ( P LD A1,FPB:FR,A10 FILE RECORD NUMBER @ x P LD A3,FPB:FR+2,A10 @ , P ST A1,VTC:LR,A13 SET LRN IN VTOC RECORD @ P ST A3,VTC:LR+2,A13 @
0x36a93c…36aad0 Dummy {f00=0x014f, f01=0x018e, f02=» P RF(NN) CL:007 NOT NVL A & P LDK A1,/20 SET NVL IN RETURN CODE A " P ST A1,ECBRC,A8 A L P RF CL:010 A d P* A v PCL:007 EQU * A , P CF A14,FM:PWR WRITE VTOC RECORD TO DISC A P* A P EJECT FMTASK A P* A P* A PCL:010 EQU * A
0x36aad0…36ac64 Dummy {f00=0x014f, f01=0x0190, f02=» A r * P SUK A2,1 DECREMENT NO OF USERS BY ONE B 2 P SC A2,FPB:US,A10 RETURN REMAINING NO OF USERS B 6 4 P RF(P) CL:020 DON'T RELEASE FWT IF ANY USER LEFT B l P* B P EJECT FMTASK B P* B P* RELEASE FWT AND EWT BLOCKS B P* B P LDK A2,1
0x36ac64…36adf8 Dummy {f00=0x014f, f01=0x0190, f02=» EQU * B . P ORR A1,A2 PUT TOGETHER ACCESS PARAMETERS C P SC A1,FWTPAR,A6 C @ P* C X PCL:030 EQU * C b P LD A4,ECBRC,A8 RETURN CODE C v P RF FMEXIT RETURN C * C & PCL:040 EQU * ENTRY USED BY FM:LKM C $ P ADKL A14,4 ADJUST STACK POINTER
0x36adf8…36af8c Dummy {f00=0x014f, f01=0x0190, f02=» C P* D PDELETE EQU * DELETE FILE D P* TO BE IMPLEMENTED D 2 EJECT FMTASK D P * D h * D r ********** D | * FMRDFP * D ********** D * D P* D 2 P* FILE MANAGEMENT ADMINISTRATION FUNCTIONS: D P* READ FIL
0x36af8c…36b120 Dummy {f00=0x014f, f01=0x0190, f02=»K D l P* A9 = USER ECB ADDRESS E P* A10 = FPB ADDRESS E , * E H & !FMRDFP EQU * READ FILE PARAMETERS E R P ANK A1,/FF ORDER OPTION E | ( P RF(NZ) FM:RQE ILLEGAL ORDER OPTION E 2 P CF A14,RDVTOC READ VTOC RECORD (FIRST EXTENT) E P ADK A1,0
0x36b120…36b2b4 (3, 309) Dummy {f00=0x014f, f01=0x0190, f02=»2,FPBLEN FPB AREA LENGTH E P* F " PFMR:00 EQU * F , P CMR A1 F @ P ADK A1,2 F P P SUK A2,2 F b P RB(P) FMR:00 F t P* F P EJECT FMTASK F P* F P* F P LDR A1,A10 FPB ADDRESS F " P ADK A1,FPB:V2 2ND VOLUME NAME F & P L
0x36b2b4…36b448 Dummy {f00=0x014f, f01=0x018e, f02=»NTER, INNER LOOP F ~ P* G " PFMR:04 EQU * INNER LOOP ENTRY G " * P STR A4,A1 MOVE SPACES TO VOLUME NAME G H P ADK A1,2 G v P SUK A3,1 G P RB(P) FMR:04 G * P ADK A1,FPB:V2-FPB:S1 NEXT VOLUME NAME G P SUK A2,1 G P RB(P) FMR:02 G P*
0x36b448…36b5dc Dummy {f00=0x014f, f01=0x0190, f02=» G n P STR A1,A10 H 8 P LD A1,VTC:BF,A13 BLOCK FACTOR AND FILE ORGANIZATION H P ST A1,FPB:BF,A10 H X ( P LD A1,VTC:LR,A13 LAST RECORD NUMBER H r P ST A1,FPB:FR,A10 H $ P LD A1,VTC:LR+2,A13 LRN, PART 2 H P ST A1,FPB:FR+2,A10 H 4 P LD A1,VTC:M
0x36b5dc…36b770 Dummy {f00=0x014f, f01=0x0190, f02=»INDEX FILES H t P ST A1,FPB:IF,A10 I , P LD A1,VTC:KA,A13 KEY ADDRESS IN RECORD I . P ST A1,FPB:KA,A10 I ^ P LDK A2,1 I x , P LD A1,FWTTAB,A6 SHAREABILITY PARAMETER I P RF(Z) FMR:05 NO EA I 2 P SC A2,FPB:SH,A10 INDICATE OPENED EXCLUSIVELY I
0x36b770…36b904 Dummy {f00=0x014f, f01=0x0190, f02=»LE I f , P SC A2,FPB:BO,A10 INDICATE BASIC ORDERS J P* J : PFMR:10 EQU * J D P SLC A1,7 J X P ANK A1,/3F NUMBER OF USERS J j P SC A1,FPB:US,A10 J P* J P EJECT FMTASK J P* J . P* MOVE CREATION DATE AND RETENTION PERIOD J P*
0x36b904…36ba98 Dummy {f00=0x014f, f01=0x0190, f02=»ACTERS TO MOVE J | 8 P CF A14,MOVE MOVE CREATION DATE AND RETENTION PERIOD K P* K R $ P* MOVE FILE NAME FROM FWT TO FPB K P* K P LDR A1,A6 FWT ADDRESS K P ADK A1,FWTNAM K . P SUK A3,FPBLEN-FPB:FN-1 POINT TO FILE NAME K & P LDK A2,8 NO OF CHAR
0x36ba98…36bc2c Dummy {f00=0x014f, f01=0x0190, f02=» K b P LDR A11,A6 L * P LDR* A12,A11 ADDRESS TO 2ND EWT BLOCK L P* L J P EJECT FMTASK L T P* L l 8 P* READ VOLUME NAME AND COMPUTE SIZE OF FILE SECTION L v P* L PFMR:20 EQU * L $ P LC A2,EWTVOL,A12 DISC FILE CODE L P LDR A13,A2 SAVE
0x36bc2c…36bdc0 Dummy {f00=0x014f, f01=0x0190, f02=»A6 VOLUME NAME ADDRESS L " P CF A14,MOVE MOVE VOLUME NAME M * P LD A1,EWTEXL-2,A11 FILE EXTENT LENGTH M D P ANK A1,/FF M r P LD A2,EWTEXL,A11 M P* M P EJECT FMTASK M P* M " P* COMPUTE FILE SECTION SIZE(S) M P* M PFMR:35 EQU *
0x36bdc0…36bf54 (3, 310) Dummy {f00=0x014f, f01=0x0190, f02=» M j P ANK A6,/FF N P LD A7,EWTEXL,A11 N * P LDR* A12,A11 ADDRESS TO 2ND EWT BLOCK N 6 & P CC A13,EWTVOL,A12 CHECK FILE CODE N d , P RF(NE) FMR:50 END OF THIS FILE SECTION N P* N P IFT CPU852=0 N * P DAR A6 ACKUMULATE FILE SECTION LENGTH N
0x36bf54…36c0e8 Dummy {f00=0x014f, f01=0x0190, f02=»OW N | P RB FMR:35 O P* O PFMR:45 EQU * O & " P ADK A1,1 OVERFLOW CORRECTION O : P ANKL A2,/7FFF O ` P XIF O v P* O P RB FMR:35 O P* O PFMR:50 EQU * O . P STR A1,A3 STORE FILE SECTION SIZE IN FPB O P ST A2,2,A3 O 0 P ADK A
0x36c0e8…36c27c Dummy {f00=0x014f, f01=0x0190, f02=» O EJECT FMTASK P * P P* P * P********** P 4 P* FMEXIT * P F P********** P X P* P j P* P t & P* COMMON EXIT FOR FILE MANAGEMENT P ~ P* ADMINISTRATION FUNCTIONS P P* P PFMEXIT EQU * P P IFT MMUPAG=1 P P* P 8 P
0x36c27c…36c410 Dummy {f00=0x014f, f01=0x0190, f02=»ADDRESS P x P* Q P LDR A1,A10 FM:FPB ADDRESS Q $ P EL A2,ECBBA,A9 USER FPB ADDRESS Q < P LDK A3,FPBLEN FPB LENGTH Q d $ P MVSU A3 MOVE FM:FPB TO USER FPB Q P XIF Q * Q P EJECT FMTASK Q P* Q P* Q P********** Q P* FM:R
0x36c410…36c5a4 Dummy {f00=0x014f, f01=0x0190, f02=»ETURN CODE Q ~ * P* A5 = TTAB ADDRESS OF CALLING TASK R P* A9 = USER ECB ADDRESS R @ P* R b * PFM:RTC EQU * GENERAL RETURN CODE EXIT R l P IFT MMUPAG=0 R * P ST A4,ECBRC,A9 SET RETURN CODE IN ECB R P XIF R P* R P IFT MMUPAG=1 R *
0x36c5a4…36c738 Dummy {f00=0x014f, f01=0x0190, f02=» * REQUEST ERROR EXIT R P LDKL A4,/8000 RETURN CODE S P RB FM:RTC S @ * S R P EJECT FMTASK S P* S t P* S ~ P********** S P* FM:PWR * S P* FMREAD * S P********** S P* S P* S * P* INPUT: A2 = SECTOR NUMBER, PART
0x36c738…36c8cc Dummy {f00=0x014f, f01=0x0190, f02=»DRESS S t P* T P* OUTPUT: A4 = 0 T P* A7 IS DESTROYED T 2 P* T N & PFM:PWR EQU * PHYSICAL WRITE ENTRY T X P LDK A7,/95 PHYSICAL WRITE T P RF FM:LKM T P* T $ PFMREAD EQU * PHYSICAL READ ENTRY T P LDK A7,/91 PHYSICAL READ T
0x36c8cc…36ca60 Dummy {f00=0x014f, f01=0x0190, f02=» IN ECB T n P LKM U P DATA 1 U P LD A4,ECBRC,A8 RETURN CODE U , " P ANKL A4,/FEFF SKIP RETRY BIT U P P RF(Z) FM:RTN RETURN IF OK U v P* U : P* ERROR: CHECK WHY AND DECIDE IF REQUEST TO BE ABORTED U P* U P LDK A7,/A2 CLOSE ORDER U 4
0x36ca60…36cbf4 (3, 311) Dummy {f00=0x014f, f01=0x0190, f02=» CW A7,TTB:SA+14,A5 CHECK IF OPEN ORDER RUNNING U $ P RB(NE) FM:RTC ABORT IF NOT OPEN V 8 & P LDK A7,/20 NEW VOLUME LOADED BIT V ` P TM A4,A7 CHECK RETURN CODE V P RB(Z) FM:RTC NOT NVL, ABORT V * P RB FMREAD NVL AT OPEN, REPEAT REQUEST V P* V
0x36cbf4…36cd88 Dummy {f00=0x014f, f01=0x0190, f02=»** V P* W P* W . P* RELBLK WILL RELEASE THE MONITOR BLOCKS W , P* THAT ARE USED IN THE EWT STRUCTURE. W P P* W P* INPUT: A6 = FWT ADDRESS W P* W $ P* OUTPUT: A1-A4 ARE DESTROYED W P* W . PRELBLK EQU * RELEASE EWT STRUC
0x36cd88…36cf1c Dummy {f00=0x014f, f01=0x0190, f02=»L:10 EQU * W P INH X $ P CF A15,FREBLK RELEASE EWT BLOCK X P ENB X F P LDR A4,A3 EWT BLOCK ADDRESS X R P RB(NZ) REL:10 X v P* X PREL:20 EQU * X * P CM FWTVTC,A6 RESET VTOC SECTOR NUMBER X 4 P CM FWTTAB,A6 RESET TTAB ADDRESS (EA PARAMETER)
0x36cf1c…36d0b0 Dummy {f00=0x014f, f01=0x0190, f02=»** X P* FNDNAM * Y P********** Y P* Y . 2 P* FNDNAM WILL CONVERT THE SUPPLIED FILE CODE Y 8 0 P* TO VOLUME NAME ADDRESS IN THE DISC DWT. Y n P* Y P* INPUT: A2 = FILE CODE Y P* Y P* OUTPUT: A2 = 6 Y ( P* A6 = VOLUM
0x36d0b0…36d244 Dummy {f00=0x014f, f01=0x0190, f02=» Y ( P CF A15,FNDDWD FIND DISC DWT ADDRESS Z P ENB Z 4 P* Z @ PFNAM05 EQU * Z J P LD A4,DWTST,A6 Z ^ P ANK A4,1 Z v 4 P RF(NZ) FNAM10 POWER ON COMPLETED FOR THIS DISC Z P LKM Z P DATA 0 SWITCH TASKS Z P RB FNAM05 CHECK DISC AGAIN Z
0x36d244…36d3d8 Dummy {f00=0x014f, f01=0x0190, f02=» A2,6 Z P ADKL A6,DWTVOL-6 [ P RTN A14 [ ( P* [ 8 P EJECT FMTASK [ B P* [ Z P* [ d P********** [ n P* FNDVOL * [ P********** [ P* [ P* [ & P* FNDVOL SEARCHES THE REQUESTED [ $ P* VOLUME SPECIFIED IN THE FPB. [
0x36d3d8…36d56c Dummy {f00=0x014f, f01=0x0190, f02=»FILE CODE IF FOUND, ELSE [ z * P* = 0 IF VOLUME NOT FOUND & P* A1, A3-A4, A12 ARE DESTROYED N P* x ( PFNDVOL EQU * FIND VOLUME (FILE CODE) 4 P LDKL A1,DFTAB-1 DISC FILE CODE TABLE ADDRESS-1 P LDR A12,A6 SAVE FWT ADDRESS
0x36d56c…36d700 Dummy {f00=0x014f, f01=0x018e, f02=»OF DFTAB ~ P LCR A2,A1 NEXT FILE CODE ] , P CF A14,FNDNAM FIND VOLUME NAME ADDRESS ] 2 * P LDR* A3,A6 FIRST WORD OF VOLUME NAME ] b P RB(Z) FVOL10 NO VOLUME ] P* ] P EJECT FMTASK ] P* ] P* ] P LDR A3,A10 FPB ADDRESS ] , P A
0x36d700…36d894 (3, 312) Dummy {f00=0x0150, f01=0x0190, f02=» * P RB(NE) FVOL10 VOLUME NAMES NOT EQUAL ^ P ADK A3,2 INCREMENT POINTERS ^ 2 P ADK A6,2 ^ V P SUK A2,2 ^ h P RB(P) FVOL20 ^ z P LCR A2,A1 FILE CODE ^ P* ^ PFVOL25 EQU * ^ $ P LDR A6,A12 RESTORE FWT ADDRESS ^ P RTN A14 ^ P* ^
0x36d894…36da28 Dummy {f00=0x0150, f01=0x0190, f02=» ^ P********** _ P* RDVTOC * _ P********** _ , P* _ > P* _ H 0 P* RDVTOC WILL CALL FCHEC2 FOR CHECK OF THE _ R 2 P* ACCESS PARAMETERS AND READ THE VTOC RECORD _ " P* OF THE FIRST FILE EXTENT. _ P* _ " P* INPUT: A5 = TTAB ADDRES
0x36da28…36dbbc Dummy {f00=0x0150, f01=0x018e, f02=»N FM:BUF _ j , P* A1-A4, A7, A11 ARE DESTROYED ` P* ` @ 8 PRDVTOC EQU * CHECK ACCESS PAR. AND READ VTOC RECORD ` J P IFT MMUPAG=0 ` P LDR* A2,A9 FILE NUMBER ` P XIF ` P* ` P IFT MMUPAG=1 ` P ELR A2,A9 FILE NUMBER ` P X
0x36dbbc…36dd50 Dummy {f00=0x0150, f01=0x0190, f02=» P RF(NZ) RDVT20 ERROR, RETURN a P* a ( P EJECT FMTASK a 2 P* a J P* a T P LDR A6,A3 FWT ADDRESS a ^ 2 P LC A2,FWTVOL,A6 DISC FILE CODE (FIRST EXTENT) a | P SC A2,ECBFC,A8 a 6 P LD A2,FWTVTC,A6 VTOC SECTOR NUMBER (FIRST EXTENT) a 8 P CF
0x36dd50…36dee4 Dummy {f00=0x0150, f01=0x0190, f02=» RDVT20 FIRST EXTENT FOUND a 6 P CF A14,FVTC30 READ NEXT VTOC RECORD FOR THIS FILE b " 0 P RB RDVT10 CHECK IF THIS IS THE FIRST EXTENT b P* b PRDVT20 EQU * b P RTN A14 b P* b P EJECT FMTASK b P* b P* b P********** b P*
0x36dee4…36e078 Dummy {f00=0x0150, f01=0x0190, f02=» RETURN IS MADE WHEN ONE EXTENT b P* HAS BEEN FOUND. c ( P* c D P* INPUT: A2 = FILE CODE c N " P* A5 = TTAB ADDRESS c p P* A6 = FWT ADDRESS c & P* A9 = USER ECB ADDRESS c P* c 6 P* OUTPUT: A2 = VTOC SECTOR NUM
0x36e078…36e20c Dummy {f00=0x0150, f01=0x018e, f02=» A1, A3-A4, A7, A11-A12 ARE DESTROYED c P* d 2 PFNDVTC EQU * FIND VTOC ENTRY d < ( P SC A2,ECBFC,A8 SET FILE CODE IN ECB d ` P LDK A2,0 SECTOR NUMBER d P CF A14,FMREAD READ SECTOR 0 d * P LD A2,FM:BUF+VOL:EB VTOC EXTENT BASE d P LDR A12,A
0x36e20c…36e3a0 Dummy {f00=0x0150, f01=0x0190, f02=» P* e P* e & PFVTC10 EQU * ENTRY USED BY RDVTOC e ( P CF A14,FMREAD READ ONE VTOC SECTOR e B $ P LDKL A13,FM:BUF FM:BUF ADDRESS e n $ P LDK A7,VTOCBF VTOC BLOCK FACTOR e P* e PFVTC20 EQU * e & P LD A4,VTC:ST,A13 VTOC STATUS BYTE e P A
0x36e3a0…36e534 (3, 313) Dummy {f00=0x0150, f01=0x0190, f02=» NUMBER e l & P ADKL A13,VTOCRL NEXT VTOC ADDRESS f P SUK A7,1 f : , P RB(P) FVTC20 MORE VTOC:S IN THIS SECTOR f L P ADK A2,1 NEXT VTOC SECTOR f | , P CWR A2,A12 CHECK IF END OF VTOC EXTENT f ( P RB(NE) FVTC10 NOT LAST VTOC SECTOR f P LDK A2,0 RETU
0x36e534…36e6c8 Dummy {f00=0x0150, f01=0x0190, f02=» ADK A1,FWTNAM f P LDR A3,A13 VTOC ADDRESS g P LDK A4,4 LOOP COUNTER g 6 P* g T $ PFVTC60 EQU * COMPARE FILE NAMES g ^ P LDR* A11,A3 g P CWR* A11,A1 g ( P RB(NE) FVTC30 FILE NAMES NOT EQUAL g P ADK A1,2 INCREMENT POINTERS g P ADK A3,2
0x36e6c8…36e85c Dummy {f00=0x0150, f01=0x0190, f02=» P********** h P* FNDFWT * h P********** h ( P* h : P* h D 4 P* FNDFWT IS USED TO FIND OUT IF THE SPECIFIED h N 0 P* FILE IS ALREADY OPENED, AND IF SO RETURN h & P* THE FWT ADDRESS FOR THE FILE. h 6 P* IF NOT OPENED, A FREE FWT ADDRES
0x36e85c…36e9f0 Dummy {f00=0x0150, f01=0x0190, f02=»A6 = FWT ADDRESS (=0 IF NO FREE FWT AVAILABLE) h & P* A1-A4, A7, A11 ARE DESTROYED i 6 P* i ` PFNDFWT EQU * i j P LDK A3,0 i ~ * P LD A7,SCTFWT FWT CHAIN START ADDRESS i P* i PFNDF10 EQU * i P LDK A2,1 i P* i PFNDF15 EQU * i
0x36e9f0…36eb84 Dummy {f00=0x0150, f01=0x0190, f02=»ECK IF USED i ( P RF(NZ) FNDF20 USED, CHECK FILE NAME j 6 P ADK A3,0 CHECK IF FREE FWT ADDRESS ALREADY SAVED j @ & P RB(NZ) FNDF15 YES, DON'T SAVE IT j z ( P LDR A3,A6 NO, SAVE THIS FWT ADDRESS j P RB FNDF15 CONTINUE SEARCH j P* j P EJECT FMT
0x36eb84…36ed18 Dummy {f00=0x0150, f01=0x0190, f02=» A2,FWTNAM j P LDR A4,A10 FPB ADDRESS k P ADK A4,FPB:FN k 2 P SUK A7,1 SKIP FWT USED BIT k H P* k l $ PFNDF30 EQU * COMPARE FILE NAMES k v P LDR* A11,A2 k P CWR* A11,A4 k ( P RB(NE) FNDF10 FILE NAMES NOT EQUAL k P ADK A2,2 INCREMENT PO
0x36ed18…36eeac Dummy {f00=0x0150, f01=0x0190, f02=») FNDF10 NOT THIS FILE k P RTN A14 FILE FOUND, RETURN l P* l B PFNDF40 EQU * FILE NOT FOUND l L P LDR A6,A3 FREE FWT ADDRESS l p P RTN A14 l P* l P EJECT FMTASK l P* l P* l P******** l P* MOVE * l P******** l
0x36eeac…36f040 Dummy {f00=0x0150, f01=0x0190, f02=» = OUTPUT BUFFER ADDRESS l P* m P* OUTPUT: A2 = 0 m * > P* A1, A3 = ADDRESSES OF LAST MOVED CHARACTERS+1 m D P* A4 IS DESTROYED m P* m PMOVE EQU * MOVE STRING m " P LCR A4,A1 MOVE ONE CHARACTER m P SCR A4,A3 m (
0x36f040…36f1d4 (3, 314) Dummy {f00=0x0150, f01=0x0190, f02=» P* n EJECT FMTASK n * n & * n 0 ********** n : * FMRDWR * n L ********** n ^ * n p P* n z $ * FILE MANAGEMENT I/O FUNCTIONS. n * &* FMRDWR IS ENTERED WHEN THE REQUESTED n & "* SECTORS ARE SPLIT OVER MORE THAN n * ON
0x36f1d4…36f368 Dummy {f00=0x0150, f01=0x4098, f02=»SION n l XIF o * o IFT XTSPLI=1 o " " ABL LKMERR TO BE IMPLEMENTED o 8 XIF o ^ * o j * o t * o ~ END o @ o O FUNCTIONS. n * &* FMRDWR IS ENTERED WHEN THE REQUESTED n & "* SECTORS ARE SPLIT OVER MORE THAN n * ON
0x36f368…36f4fc Dummy {f00=0x0150, f01=0x2008, f02=» p FMTASK ~ * * " * , END 6@ B * H ********** R * FMRDFP * d ********** v * 0 +* FILE MANAGEMENT ADMINISTRATION FUNCTIONS: * READ FILE PARAMETERS * & !FMRDFP EQU * READ FILE PAR
0x36f4fc…36f690 Dummy {f00=0x0150, f01=0x0000, f02=»
[…0x4…]
0x36fce0…36fe74 (3, 315) Opaque[0x194]
0x36fe74…370008 # DirEnt {nam=»DFTAB «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2088, f03=0x0000}
0x36fe74…370008 IdxSect {
0x36fe74…370008 f00 = 0x0104 // 0x36fe74 @0x0
0x36fe74…370008 f01 = 0x0002 // 0x36fe76 @0x2
0x36fe74…370008 gno = [ // 0x36fe78 @0x4
0x36fe74…370008 [0x00]: C0x0104.0x1.0
0x36fe74…370008 ]
0x36fe74…370008 }
0x370008…37019c Dummy {f00=0x0104, f01=0x0190, f02=» 0 P IDENT DFTAB REL 10.0 80-03-14 870105041000 P 8 P* @ 8 P**************************************************** J P* $ P* PHILIPS TERMINAL SYSTEM PTS P* & P* DFTAB = DISC FILE CODE TABLE P* P* P* 8
0x37019c…370330 Dummy {f00=0x0104, f01=0x4102, f02=»NTRY DFTABE P ENTRY DMTIDP P ENTRY DMTIDS * P* @ P* J PDFTAB EQU * T P DATA /F8F9,/FAFB h PDFTABE EQU * PDMTIDP EQU * P DATA /0000,/0000 PDMTIDS EQU * P DATA /0101,/0101 P END @ 8
0x370330…3704c4 Dummy {f00=0x0104, f01=0x2008, f02=» NT DFTAB P* P* DISC FILE CODE TABLE " P* B P ENTRY DFTAB L P ENTRY DFTABE ` P* v P* PDFTAB EQU * P DATA /F0F1 PDFTABE EQU * P END @ END P ENTRY QFDBFL P* P*
0x3704c4…370658 Dummy {f00=0x0104, f01=0x0190, f02=»S h 0 P ENTRY FMINIT FILE MANAGEMENT INITIALIZATION ENTRY TTABFM FMTASK TTAB > ( P ENTRY FWTPAR FILE ACCESS PARAMETERS ` P ENTRY FWTFNR FILE NUMBER 6 P ENTRY FWTTAB TTAB FOR TASK WITH EXCLUSIVE ACCESS 2 P ENTRY FWTEW1 POINTER TO 2ND EWT
0x370658…3707ec Dummy {f00=0x0104, f01=0x0190, f02=»GTH x P ENTRY EWTEXB EXTENT BASE " P ENTRY EWTVOL VOLUME FILE CODE . P* T P EJECT FMTASK ^ P* v P* ENTRY FPB:RL RECORD LENGTH ENTRY FPB:BF BLOCK FACTOR $ ENTRY FPB:FO FILE ORGANIZATION ENTRY FPB:BO BA
0x3707ec…370980 Dummy {f00=0x0104, f01=0x0190, f02=» | ENTRY FPB:V2 VOLUME NAME 2 ENTRY FPB:S2 SIZE 2 , ENTRY FPB:V3 VOLUME NAME 3 H ENTRY FPB:S3 SIZE 3 l ENTRY FPB:V4 VOLUME NAME 4 ENTRY FPB:S4 SIZE 4 $ ENTRY FPB:FR FILE RECORD NUMBER " ENTRY FPB:US NUMBER OF
0x370980…370b14 (3, 316) Opaque[0x194]
0x370b14…370ca8 # DirEnt {nam=»DVKB00«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24a8, f03=0x0000}
0x370b14…370ca8 IdxSect {
0x370b14…370ca8 f00 = 0x0125 // 0x370b14 @0x0
0x370b14…370ca8 f01 = 0x0002 // 0x370b16 @0x2
0x370b14…370ca8 gno = [ // 0x370b18 @0x4
0x370b14…370ca8 [0x00]: C0x0125.0x1.0
0x370b14…370ca8 ]
0x370b14…370ca8 }
0x370ca8…370e3c Dummy {f00=0x0125, f01=0x0190, f02=» 2 P IDENT DVKB00 REL 10.0 80-03-14 870105041000 P : " P* KEYBOARD DEVICE WORK TABLE B P* h P ENTRY DVKB00 TABLE ENTRY r P EXTRN CTAB01 ( P EXTRN KBAD3 POINTER TO ADDRESSBLOCK P EXTRN DVDY00 PMMUPAG EQU 1 P*
0x370e3c…370fd0 Dummy {f00=0x0125, f01=0x0190, f02=»ADDRESS P DATA DWTEND-DVKB00 ORDER ( P DATA KBAD3 POINTER TO ADDRESS BLOCK 2 P DATA 'KB' TTAB-ADDRESS ^ $ P DATA 0 WAIT/ACTIVATE INDICATOR ~ P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DAT
0x370fd0…371164 Dummy {f00=0x0125, f01=0x0190, f02=»VE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES 4 DWT-STACK 6 P DATA 0 TIMER POINTER N P DATA DVDY00 DVDY00O DEVICE l $ P DATA /FFFF BACKSPACE AND CANCEL $ P DATA /9B9A EOR AND DOUBLE ZERO 6 P DATA DWTSQ+DVKB00 POINTER TO FIRST PLAC
0x371164…3712f8 Dummy {f00=0x0125, f01=0x4100, f02=»A 0,0,0,0,0,0,0 P IFT MMUPAG=1 PDEVECB EQU * . P DATA 0,0,0,0,0,0 B P DATA 0,0,0,0,0,0,0,0 P DATA 0,0,0,0,0,0,0,0 z P DATA 0,0,0,0,0,0,0,0 P DATA 0 P XIF PDWTEND EQU * P* P END @ RST PLAC
0x3712f8…37148c Dummy {f00=0x0125, f01=0x2008, f02=» BLE ZERO 6 P DATA DWTSQ+DVTKB POINTER TO FIRST PLACE IN QUEUE 4 P DATA DWTSQ+DVTKB POINTER TO LAST PLACE IN QUEUE R PDWTSQ EQU *-DVTKB P RES 0 P* P END @ 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P R
0x37148c…371620 Dummy {f00=0x0125, f01=0x0190, f02=»ETURN CODE $ z P XIF % P* % P* % ( P EJECT % 2 P* % @ P* % J P* L D R E G E % T P* % l 8 P* RESTORE A3-A5 FROM DWT AND RETURN TO USER VIA A5 % v P* % P* % PLDREGE EQU * % & P LD A3,DWTA3,A6 RELOAD REGISTER A3 % & P LD
0x371620…3717b4 (3, 317) Opaque[0x194]
0x3717b4…371948 # DirEnt {nam=»DVDY00«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24b0, f03=0x0000}
0x3717b4…371948 IdxSect {
0x3717b4…371948 f00 = 0x0125 // 0x3717b4 @0x0
0x3717b4…371948 f01 = 0x0002 // 0x3717b6 @0x2
0x3717b4…371948 gno = [ // 0x3717b8 @0x4
0x3717b4…371948 [0x00]: C0x0125.0x2.0
0x3717b4…371948 ]
0x3717b4…371948 }
0x371948…371adc Dummy {f00=0x0125, f01=0x0190, f02=» 2 P IDENT DVDY00 REL 10.0 80-03-14 870105041000 P : * P* DEVICE WORK TABLE FOR VIDEO DISPLAY B P* p P ENTRY DVDY00 TABLE ENTRY z P* P* ( P EXTRN DYAD POINTER TO ADDRESS BLOCK PMMUPAG EQU 1 P* PDVDY00 EQU * T
0x371adc…371c70 Dummy {f00=0x0125, f01=0x0190, f02=» DATA DWTEND-DVDY00 ORDER ( P DATA DYAD POINTER TO ADDRESS-BLOCK " P DATA /C459 TTAB-ADDRESS N $ P DATA 0 WAIT/ACTIVATE INDICATOR n P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DATA DEVECB MMU ECB
0x371c70…371e04 Dummy {f00=0x0125, f01=0x4158, f02=»VE AREA FOR A5 P RES 4 DWT-STACK P DATA 0 TIMER POINTER . P DATA /101 CURSOR POINTER L * P DATA /1850 LEFT BYTE=NUMBER OF LINES n " P RIGHT BYTE=CHARACTERS/LINE P DATA 0 BUFFER INDEX P IFT MMUPAG=1 PDEVECB DATA 0,0,0,0,
0x371e04…371f98 Dummy {f00=0x0125, f01=0x2008, f02=» S-BLOCK | P DATA 0 TTAB-ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR 4 P DATA 0 TERMINAL QUEUE P DATA 0 OUTPUT QUEUE LINK z P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES 4 DWT-S
0x371f98…37212c Dummy {f00=0x0125, f01=0x2008, f02=» TON LOCAL/REMOTE TERMINALS P* * P EXTRN DUON DISC UNIT 4 " P EXTRN MTON MAGNETIC YAPE UNIT R P* x P* $ PPFTAB DATA PFTABE-* TABLE LENGTH P DATA TWON P DATA TCDRON P DATA SOPR P DATA DRDCON P DATA
0x37212c…3722c0 Dummy {f00=0x0125, f01=0x2008, f02=»
0x3722c0…372454 (3, 318) Opaque[0x194]
0x372454…3725e8 # DirEnt {nam=»DVGP01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x24f8, f03=0x0000}
0x372454…3725e8 IdxSect {
0x372454…3725e8 f00 = 0x0127 // 0x372454 @0x0
0x372454…3725e8 f01 = 0x0002 // 0x372456 @0x2
0x372454…3725e8 gno = [ // 0x372458 @0x4
0x372454…3725e8 [0x00]: C0x0127.0x3.0
0x372454…3725e8 ]
0x372454…3725e8 }
0x3725e8…37277c Dummy {f00=0x0127, f01=0x018e, f02=» 2 P IDENT DVGP01 REL 10.0 80-03-14 870105041000 P : , P* DEVICE WORK TABLE FOR GENERAL PRINTER B P* r P ENTRY DVGP01 TABLE ENTRY | P* P* ( P EXTRN GPAD POINTER TO ADDRESS BLOCK PMMUPAG EQU 1 P* PDVGP01 EQU *
0x37277c…372910 Dummy {f00=0x0127, f01=0x0190, f02=» P DATA DWTEND-DVGP01 ORDER ( P DATA GPAD POINTER TO ADDRESS-BLOCK & P DATA /C750 TTAB-ADDRESS R $ P DATA 0 WAIT/ACTIVATE INDICATOR r P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DATA DEVECB MMU
0x372910…372aa4 Dummy {f00=0x0127, f01=0x40f0, f02=»0 SAVE AREA FOR A5 P RES 4 DWT-STACK P DATA 0 TIMER POINTER 2 " P DATA 0 HEAD POSITIPN POINTER P P IFT MMUPAG=1 v PDEVECB DATA 0,0,0,0,0,0 P XIF PDWTEND EQU * P* P* P END @ DATA DEVECB MMU
0x372aa4…372c38 Dummy {f00=0x0127, f01=0x2008, f02=» ESS-BLOCK ~ P DATA 0 TTAB-ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR 6 P DATA 0 TERMINAL QUEUE ^ P DATA 0 OUTPUT QUEUE LINK | P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES 4 DWT
0x372c38…372dcc Dummy {f00=0x0127, f01=0x018e, f02=» DISC DWT AND CHECK IF THERE IS A NEW VOLUME MOUNTED. P* > ( P* INPUT: A2 = DISC BUFFER ADDRESS H 2 P* A3 = FILE CODE (FOR DRIVE WITH INDEX = 0) t 0 P* BIT 0 SET MEANS TEST STATUS ORDER P* A6 = DWT ADDRESS P*
0x372dcc…372f60 Dummy {f00=0x0127, f01=0x0190, f02=» * P CF A15,VOLADR DWT VOLUME NAME ADDRESS P LDK A7,0 RESET NVL FLAG 6 P* V PVGET10 EQU * ` , P LDR* A8,A2 ONE WORD OF NEW VOLUME NAME t , P CWR* A8,A1 COMPARE WITH OLD VOLUME NAME P RF(E) VGET20 P LDK A7,1 SET NVL FLAG $ P
0x372f60…3730f4 (3, 319) Opaque[0x194]
0x3730f4…373288 # DirEnt {nam=»DVDY02«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2960, f03=0x0000}
0x3730f4…373288 IdxSect {
0x3730f4…373288 f00 = 0x014b // 0x3730f4 @0x0
0x3730f4…373288 f01 = 0x0002 // 0x3730f6 @0x2
0x3730f4…373288 gno = [ // 0x3730f8 @0x4
0x3730f4…373288 [0x00]: C0x014b.0x0.0
0x3730f4…373288 ]
0x3730f4…373288 }
0x373288…37341c Dummy {f00=0x014b, f01=0x0190, f02=» 2 P IDENT DVDY02 REL 10.0 80-03-14 870105041000 P : * P* DEVICE WORK TABLE FOR VIDEO DISPLAY B P* p P ENTRY DVDY02 TABLE ENTRY z P* P* ( P EXTRN DYAD POINTER TO ADDRESS BLOCK PMMUPAG EQU 1 P* PDVDY02 EQU * T
0x37341c…3735b0 Dummy {f00=0x014b, f01=0x0190, f02=» DATA DWTEND-DVDY02 ORDER ( P DATA DYAD POINTER TO ADDRESS-BLOCK " P DATA /C459 TTAB-ADDRESS N $ P DATA 0 WAIT/ACTIVATE INDICATOR n P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DATA DEVECB MMU ECB
0x3735b0…373744 Dummy {f00=0x014b, f01=0x4158, f02=»VE AREA FOR A5 P RES 4 DWT-STACK P DATA 0 TIMER POINTER . P DATA /101 CURSOR POINTER L * P DATA /1850 LEFT BYTE=NUMBER OF LINES n " P RIGHT BYTE=CHARACTERS/LINE P DATA 0 BUFFER INDEX P IFT MMUPAG=1 PDEVECB DATA 0,0,0,0,
0x373744…3738d8 Dummy {f00=0x014b, f01=0x2008, f02=» S-BLOCK | P DATA 0 TTAB-ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR 4 P DATA 0 TERMINAL QUEUE P DATA 0 OUTPUT QUEUE LINK z P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES 4 DWT-S
0x3738d8…373a6c Dummy {f00=0x014b, f01=0x415c, f02=» _^ H D ! U P R !U + 4 -W 1 P 5Q 9 v CP M : Q WP cR H D ! R s v P. P( P R Q W R U v P 4 P: P @ U j H D !1 T W @ +P /R 7U G M SP m @ R P 4 @ <
0x373a6c…373c00 Dummy {f00=0x014b, f01=0x2008, f02=»
0x373c00…373d94 (3, 320) Opaque[0x194]
0x373d94…373f28 # DirEnt {nam=»DVGP03«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2970, f03=0x0000}
0x373d94…373f28 IdxSect {
0x373d94…373f28 f00 = 0x014b // 0x373d94 @0x0
0x373d94…373f28 f01 = 0x0002 // 0x373d96 @0x2
0x373d94…373f28 gno = [ // 0x373d98 @0x4
0x373d94…373f28 [0x00]: C0x014b.0x2.0
0x373d94…373f28 ]
0x373d94…373f28 }
0x373f28…3740bc Dummy {f00=0x014b, f01=0x018e, f02=» 2 P IDENT DVGP03 REL 10.0 80-03-14 870105041000 P : , P* DEVICE WORK TABLE FOR GENERAL PRINTER B P* r P ENTRY DVGP03 TABLE ENTRY | P* P* ( P EXTRN GPAD POINTER TO ADDRESS BLOCK PMMUPAG EQU 1 P* PDVGP03 EQU *
0x3740bc…374250 Dummy {f00=0x014b, f01=0x0190, f02=» P DATA DWTEND-DVGP03 ORDER ( P DATA GPAD POINTER TO ADDRESS-BLOCK & P DATA /C750 TTAB-ADDRESS R $ P DATA 0 WAIT/ACTIVATE INDICATOR r P DATA 0 TERMINAL QUEUE IFT MMUPAG=1 & " DATA 0 SAVE AREA USER ECB ADDRESS DATA DEVECB MMU
0x374250…3743e4 Dummy {f00=0x014b, f01=0x40f0, f02=»0 SAVE AREA FOR A5 P RES 4 DWT-STACK P DATA 0 TIMER POINTER 2 " P DATA 0 HEAD POSITIPN POINTER P P IFT MMUPAG=1 v PDEVECB DATA 0,0,0,0,0,0 P XIF PDWTEND EQU * P* P* P END @ DATA DEVECB MMU
0x3743e4…374578 Dummy {f00=0x014b, f01=0x2008, f02=» ESS-BLOCK ~ P DATA 0 TTAB-ADDRESS $ P DATA 0 WAIT/ACTIVATE INDICATOR 6 P DATA 0 TERMINAL QUEUE ^ P DATA 0 OUTPUT QUEUE LINK | P DATA 0 SAVE AREA FOR A3 P DATA 0 SAVE AREA FOR A4 P DATA 0 SAVE AREA FOR A5 P RES 4 DWT
0x374578…37470c Dummy {f00=0x014b, f01=0x0190, f02=»DRESS S t P* T P* OUTPUT: A4 = 0 T P* A7 IS DESTROYED T 2 P* T N & PFM:PWR EQU * PHYSICAL WRITE ENTRY T X P LDK A7,/95 PHYSICAL WRITE T P RF FM:LKM T P* T $ PFMREAD EQU * PHYSICAL READ ENTRY T P LDK A7,/91 PHYSICAL READ T
0x37470c…3748a0 Dummy {f00=0x014b, f01=0x0190, f02=» IN ECB T n P LKM U P DATA 1 U P LD A4,ECBRC,A8 RETURN CODE U , " P ANKL A4,/FEFF SKIP RETRY BIT U P P RF(Z) FM:RTN RETURN IF OK U v P* U : P* ERROR: CHECK WHY AND DECIDE IF REQUEST TO BE ABORTED U P* U P LDK A7,/A2 CLOSE ORDER U 4
0x3748a0…374a34 (3, 321) Opaque[0x194]
0x374a34…374bc8 # DirEnt {nam=»M:DENJ«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x0820, f03=0x0000}
0x374a34…374bc8 IdxSect {
0x374a34…374bc8 f00 = 0x0041 // 0x374a34 @0x0
0x374a34…374bc8 f01 = 0x0012 // 0x374a36 @0x2
0x374a34…374bc8 gno = [ // 0x374a38 @0x4
0x374a34…374bc8 [0x00]: C0x0041.0x0.0
0x374a34…374bc8 [0x01]: C0x0041.0x1.0
0x374a34…374bc8 [0x02]: C0x0041.0x2.0
0x374a34…374bc8 [0x03]: C0x0041.0x3.0
0x374a34…374bc8 [0x04]: C0x0042.0x0.0
0x374a34…374bc8 [0x05]: C0x0042.0x2.0
0x374a34…374bc8 [0x06]: C0x005f.0x2.0
0x374a34…374bc8 [0x07]: C0x0066.0x0.0
0x374a34…374bc8 [0x08]: C0x0066.0x3.0
0x374a34…374bc8 ]
0x374a34…374bc8 }
0x374bc8…374d5c Dummy {f00=0x0041, f01=0x0190, f02=»7 Ed L L L L L L L L L > L L L L L L L L L L L L L > L L L L L L L L L L L L L L L L L L L L L L L L L L L L L L L R c @ ^ z ^ r h V H 2 Z f9 z
0x374d5c…374ef0 Dummy {f00=0x0041, f01=0x0190, f02=» 4c : @Y/ pJ @ d _ 2Z $"z y ?H T+ V y J t Dh i VR 1H W ] [ ? d % L X! "~ T &b Cn 1 d _ A H " j _ @ j > > U # T @ P H ( ( P c P W6 A j $ V ( U P @ V L
0x374ef0…375084 Dummy {f00=0x0041, f01=0x0190, f02=» H A Q > ? A H A FQ 2_ A F < Q @ P @ Q @ Z Y _ 8 t Q Z P 0 9 _ z $ _, ? _ P H H ? ? ? ? ? ^ A _ _ ^ h $P T I R $ 5 % > ? W ? W ? T
0x375084…375218 Dummy {f00=0x0041, f01=0x0190, f02=» @ 6T R 0 A 6 1 Q Q > > 0 @ 6 1 A 6 P P > " ? * X R Y P _ ? @ 8 R Y P _ W0 8 X W( ? ` @ @ P $ H W W > > > > > > @ DV ? D > _ > ? _ > > ? ^ ! Y ^ _ R ? JA. ~
0x375218…3753ac Dummy {f00=0x0041, f01=0x0190, f02=» " P PR 4 5 T P ? X U X ! > PZ PF P P 0 X T Y Wn U U T X^ T E Y Tx 8RtWP 4 U P> $P4> R0> 8' T Y X ' T P X P " > Z X "X 8' T 8Z" X ' X
0x3753ac…375540 Dummy {f00=0x0041, f01=0x0190, f02=» >B @ P A ! T 8TV 9WD B 7P P A ZW A Z @ ZA.W ? A HI.9 X R C C J ?A @ ZA. X V 9_: v @ ~ 8 x N B < U P
0x375540…3756d4 (3, 322) Dummy {f00=0x0041, f01=0x0190, f02=» P 0R Q W R ?U C ! _f Y (P Y ) _ ^ _ ! x P: B L # +P Y , ! U _ X T _ W ! Y ! X X ! X P R ?]* U C _. _: ! ! " $ P X , X ]T ! Y h Y _p ? X R X X
0x3756d4…375868 Dummy {f00=0x0041, f01=0x0190, f02=» Y , Y B 9a C 8 J P: 8 B W0 B W B W B @ T 8 T Y Y Y Y Y . ! ~ X ._B B 1 4 X X X X ' 4 B U B $" 4 C 4 J * ~ _^ L x B U P
0x375868…3759fc Dummy {f00=0x0041, f01=0x0190, f02=» P D T 1 WP B B PD P V - 0 P A F# +T W Q P P 1 ! X T V C B Q 1 J Y @ r t @ B X _" ? X Z,W A H ?I X ' { B C X 4
0x3759fc…375b90 Dummy {f00=0x0041, f01=0x0190, f02=» Y , Y B 9a C 8 J P: 8 B W0 B W B W B @ T 8 T Y Y Y Y Y . ! ~ X ._B B 1 4 X X X X ' 4 B U B $" 4 C 4 J * ~ _^ L 2 R x 0 R R 0 R " 0 0
0x375b90…375d24 Dummy {f00=0x0041, f01=0x0190, f02=» 0P P > T C T" V$ Y Pp q 0 ) Wb X P^ T& B RPP" A $ @ d A t p WF @W( T$ P X T X P 4 Y C C 8W T 8P Y ^ 5 ) P U XT !
0x375d24…375eb8 Dummy {f00=0x0041, f01=0x0190, f02=» C W4 O " # X Y ) C C x # P Y '? Y Y T # P W d Y P R R P T ( P (@ $(@ " 2 @ _ > X $? P $ > > F C F C
0x375eb8…37604c Dummy {f00=0x0041, f01=0x0190, f02=» 0$ T # R QL > X B U( H Q2 X D B $ T C x > C $ ) _ X 9BV X & J X D C > X H UJ H B P PL $ # Q > P _0 # T p > P p (_H
0x37604c…3761e0 Dummy {f00=0x0041, f01=0x0190, f02=» > J X D D P ( ) 1_f _& ?(@ X P 0P X T 4 Y X 1 1 X P - M T $ PJ _ T " # p X L R P P P (@ : ^ X P8 P0 # P T P 0P 1 _ W
0x3761e0…376374 (3, 323) Dummy {f00=0x0041, f01=0x0190, f02=» d @ 1 A _ P 9 > > T R L U R9C _ T M D W. D D " @ @ - U _ 9B @ T u X > & ! ~! (!2- - .4. . - - " r0 9 ! ! T 9 ! X $ Y l X Y $ 9 X
0x376374…376508 Dummy {f00=0x0041, f01=0x0190, f02=» n X B X ; Z Y B X T < Z0:A Z: ^@ Y@ Y Y B Y ""0 Y V Y Y Y X X T V" X R # ;b9B Y Y ) Y X !? PZ P PR P ! X P _ X x ^ Y X
0x376508…37669c Dummy {f00=0x0041, f01=0x0190, f02=»# T X Pt X &Pf ! ! B Rh Qd :C P ! 9DV + ! (@ B | ! ! ! t ! ! l ! ( ! d ! 9 X Y P 9 " ! _ # 4 ! j PR C ! X ! ! (@ ! j R _ ! B 1 ;h 1 ! B 1 ! X* ! ! ! j ) ! #
0x37669c…376830 Dummy {f00=0x0041, f01=0x0190, f02=» ! _ X X H p ^ t ! tWX W l ! t C QR (Q _ X X D x ^ ! ! ! P @ 9 ! j T ) C W ! t ( - t ! t ) Wf W Y Z Y V Y X Y H @ TLB SLWF Y 8! T6 X Y X C X U X Y R V
0x376830…3769c4 Dummy {f00=0x0041, f01=0x0190, f02=» 2 ! # P W ! 9 ! X ^< Y Y F Y X RP 1 Y R Z 0 Y T 1 0B. X P P Y : ! 2 ! X # P Y P:A , X T A Z Y T @ ZB. Y Y J X $ Y C '? X " Y _ A H ? (@ X V X X K P0 @ T X ZT $C Y B K
0x3769c4…376b58 Dummy {f00=0x0041, f01=0x0190, f02=» : X X 4 B :C 4 $ ! # T` @ TOT @ SST X Y N W( 0 ! # T. X Y N 9 ! X FT 4 X T X W (@ 0! D+ 1 Y W$ X T X W (@ 0! D, 1 Y 4 ! ;E :B 9A ! U
0x376b58…376cec Dummy {f00=0x0041, f01=0x0190, f02=»:C 4 d ! t ( 4 X " 4 ! t ) 4 ^< Y Y Y X P 1 Y 0 Y 1 0B. X P Y : ! ! X # P Y :A , X A Y @ B. Y Y X $ Y C '? X " Y _ A H ? (@ X X K P @ T X T $C Y B K
0x376cec…376e80 Dummy {f00=0x0041, f01=0x0190, f02=» 7 6 "d% ' % Y W B T| C X _ H X H p ^ > X ( $ ^ WB X Y $:g H & I &! P& X d fP ,P 9A
0x376e80…377014 (3, 324) Dummy {f00=0x0041, f01=0x0190, f02=»_ (X _ X $ _t0> > > @ j A j DW W J ^ ! Z2 h (X: @ jP T M ]J , ) A j P* P Y U ( ) 5 & > > [ [ j Z Z Z ? Z > P~ "R~ Y Pj T P` <UR "R4 PB X R< X T6 X
0x377014…3771a8 Dummy {f00=0x0041, f01=0x0190, f02=» Y Y X X Y X X X X ' 4 B U B (" W C (@ > Y Y Y X 9BV$ X & Y " X D V J X ! 2 R " $ "l ? X V Y !! W< Y U R -P $v X , ) Y . $p X P Y P C WT X
0x3771a8…37733c Dummy {f00=0x0041, f01=0x0190, f02=» X . $ 4 T % $T X ,T !! W % Y . V % !"" B P X " _Z B P$ $$ R % C % * !""W Y +PH Y *P> Y (P Y )P % R _Q P OR R W " !"" B " Wr W 0 Z % !"" B Z Z& X . 0T N W X ,P Y . 0 %
0x37733c…3774d0 Dummy {f00=0x0041, f01=0x0190, f02=» " X , $4 P % X .T * W Y , - ? X :a Z T T W P X :d Y > > |Vd ? 8 R @R6 V @% =cW2 RBP R P 9 W. _ _ _ _ %0=c X 0P > 0 > >_ P > _v B 1 > NT 0 _ % ' ' '< PB P8
0x3774d0…377664 Dummy {f00=0x0041, f01=0x0190, f02=» T Y &_. P4 R( Pj O]> V _F T Y Y & V Y _^ C _P ! ! " $ P X & X ]r !! Y Y Y _ " _ !! !! & J X C _ X Y & Y > B B U$ $ ! T _ U D ! T _ C > X Z^<BR P f !
0x377664…3777f8 Dummy {f00=0x0041, f01=0x0190, f02=» !! P0 P X _ X " % !! !! X & & & ' + *8*J* ) !! P P ) & ) B P B H " +P P. T Y ' !! R| X ( Y &R Y & _ Y &_. B 1 +* !! * B B U4 $ ! T _ U
0x3777f8…37798c Dummy {f00=0x0041, f01=0x0190, f02=» ! B P !+ B C ) ^N P R ?] _ C _ ! ! " $ P X ' X ] !! * ( B !+ !+ !! ) B Y & !+ W ( 8!0T 8 !@P !! $ P !! !! * !! 1P X & C ,T Y & J X Y & Y > X " X
0x37798c…377b20 Dummy {f00=0x0041, f01=0x0190, f02=»( R V P P" !! * W * "N X $ X !* _ X $ X X & !+ !+ Y _8 X " X &" Y )U W !! !! !! Y 4 B ( U )X R@ X X &" Y * X ) V Y !+ X $ X & !+ X * ( ( `R Y !
0x377b20…377cb4 (3, 325) Dummy {f00=0x0042, f01=0x0190, f02=» ABCDEFGHI[.<(+!&JKLMNOPQR]$*);^-/STUVWXYZ|,%_>? 123456789:#@'=" abcdefghi[.<(+!&jklmnopqr]$*);^-/stuvwxyz|,%_>?0123456789:#@'=" ABCDEFGHI[.<(+!&JKLMNOPQR]$*);^-/STUVWXYZ|,%_>?0123456789:#@'= 7- <=2&p ?'
0x377cb4…377e48 Dummy {f00=0x0042, f01=0x0190, f02=»"?:B ] P H U _ T U P U ;C ,$ T -_> - _H "RT PL X TF X R@? V X & X H P J X P Y X H P @ J D < ? < ? <(@ . $ P B $ 9H C ">h # P >_2 < U = D
0x377e48…377fdc Dummy {f00=0x0042, f01=0x0190, f02=» P" P P P TX 1 0> / P V B B T P* & T$ L L R Q U , , _D , V :a B # S0 S0 Q Z8 Z< P X p _6 _6 " " P2 @ Q, , Y ," P L P T L R :A
0x377fdc…378170 Dummy {f00=0x0042, f01=0x0190, f02=»"?:B ] P H U _ T U P U ;C ,$ T -_> - _H "RT > A0 @ @ 7l 7l @ R*P % % @ I I I I _> @ P f #D9 V 1 Y d ,P :A f A f >_2 < U = D
0x378170…378304 Dummy {f00=0x0042, f01=0x0190, f02=» Px ' 4 3 ! 5 A0: 5 P< 6R P& 8! P6 K @P X T X !? ? 3 W W @W 5R 5 & 6 W A0: 5 X* 5 X2 " (@ I ' V V " LP V : V V P dW Y Y " V V T Y " Y $ 6$ P(_t
0x378304…378498 Dummy {f00=0x0042, f01=0x0190, f02=»$? 2R _2 J @" P Y 9 @ J ! T " Y X & $ ' 5 ! 5 5 P C P* 5 J : J < W W P X V C W 5 X ! "? K >Q 9 5RW Y B W _.! T 5 T P % Y % Y Y V + V K V K : V K < V
0x378498…37862c Dummy {f00=0x0042, f01=0x0190, f02=» P N & N T _ - M @ F Pp G p _ W C ( B P U 4 T 8 X>_. : X P (@ Y Y Y :" (@ X $ T ( _ ^ ( : 6 6 P" $ 5r 8X 8 , Y $ : _ & / (@ T X " C X
0x37862c…3787c0 Dummy {f00=0x0042, f01=0x0190, f02=» P0 8 T _ & & Y " 4 : : $ - Y : ~ 6 6 6 7,7,7, 0123456789 ' < +,-. 0123456789 @ABCDEFGHIJKLMNOPQRSTUVWXYZ[ ]~ * > ?;_: =!"#$%&/() @ABCDEFGHIJKLMNOPQRS
0x3787c0…378954 (3, 326) Dummy {f00=0x0042, f01=0x0190, f02=» D P _ $ % $P _ % A >f A A A @ " Q" 7p :d @ # U R>P0 P E @( AD @( P2 ? _ * A B|W * A A W :a2 * A @r D & W F W @ F W CRP BAP COP A W F A @ : V, @
0x378954…378ae8 Dummy {f00=0x0042, f01=0x0190, f02=» W W V V 8 !RRT W V X W W V V V PF A @ IbU U^ A Q IbVD Y2 W V @ " TJ W P IbY E ;h E
0x378ae8…378c7c Dummy {f00=0x0042, f01=0x0190, f02=» E T F W V E = V W Y( P Z& = :L < P W <9B @ V W Q E W @E A D @ <j V W <j! P W @ V P _ @ ! P* D 9h !RRP V V
0x378c7c…378e10 Dummy {f00=0x0042, f01=0x0190, f02=» :l 9b ) V _ @ V^ > >x W A>x A>L W W @( @( PH ? > W> @( T @ @(W @ = C W @7n W > > >8 > >8 ?h ? ?< >8 ?p ? ?< >8 ?x ? > >8 > >8 V 00
0x378e10…378fa4 Dummy {f00=0x0042, f01=0x0190, f02=»> _ 0 !;; ? >8_ S ACE AC C @ R @ ! T AB AB @7n V V I E W V $ ) H V 0 !;;P P V PN _ P !;;T X$ W E nX T > : @( < : E > : 0
0x378fa4…379138 Dummy {f00=0x0042, f01=0x0190, f02=»W W W 0 !;;T~ : 0 !00Rr !99U !AARf !ZZQ` 0 !;;TR : ? : ? : ? : ? : ? : ? : 0 )T : !00T W : E TID=TCL=LEV=TDC=T0LC=0SDC=S0A I. : @ C. ? X C.9h! @ @ # " @ @ :A K :
0x379138…3792cc Dummy {f00=0x0042, f01=0x0190, f02=» A7n AAv AAz AA AA AD A> AC AC( : 9e :e Q P 9e @7tP A7t9C) A I " @7t! P " :B A7v t q B J " n : 0 R _ <d?d A7rU <e @7tP A7t<C, D L " @7t$ P " :B A7v t w B J
0x3792cc…379460 Dummy {f00=0x0042, f01=0x0190, f02=» A7v @7tP A7tB J 4R 4 :B 4 @7t: V V 49B @7v 4R @ t w A I ! j : B AD A> AC AC( AB ! T B B W AB AB I ! : 9D @ @7pr s @7nA I T - A _ I N T V S : E C
0x379460…3795f4 (3, 327) Dummy {f00=0x005f, f01=0x0190, f02=»Tx xB. ? <X B.9 H7x Q B|_ @r_ !SSTF 0 U7~ P A X X W W X X S W W W : V W V T W P D V T W F P P V W @ $ P p W E T : AD D _
0x3795f4…379788 Dummy {f00=0x005f, f01=0x0190, f02=» [ [ : T W A A I ! : 9D W Z A. c @ V W U E R $ )_ :
0x379788…37991c Dummy {f00=0x005f, f01=0x0190, f02=» V _P V V : V J P GL r IbV U GL _ V GL Z K W W :K W r IbQ R t IbV E F v : V W V E ) : V <B W |P v
0x37991c…379ab0 Dummy {f00=0x005f, f01=0x0190, f02=»RR > R W > <B V x V |P v 1 v W V z ` G _f V : W R R I P Gn G W x G I _ V : " D Pd W V PL $;A^ D E D P. V E P E P T E E _J F E _T " D T E F E
0x379ab0…379c44 Dummy {f00=0x005f, f01=0x0190, f02=» : V P 9a _ " ( ) 8 ( ) : " $ V P 9A _ 0 : W W W ?AP ^ 0 : W ; V : : , X G : J @ 0 V @ E 0 H W : ? ? R 0 R P P B _ l : V ) I
0x379c44…379dd8 Dummy {f00=0x005f, f01=0x0190, f02=» ` $ $ W I $ I H J ) P _ " = D 4 Q J~_n I J Jh I = G $ HR V W $ H V E J K _X V r V :B A V 9n A @ A A V V @ ! @ P P
0x379dd8…379f6c Dummy {f00=0x005f, f01=0x0190, f02=»W U " @ Q V P A. V P _b A 9n A :B A V .V 3 S Y& P4 8 8 S P 3 _ 8 3 : h A. @ j @ W A : A A
0x379f6c…37a100 Dummy {f00=0x005f, f01=0x0190, f02=»P N W x G N Ir G _v V d , V E P _ N L % V d V f v G G v U G v G v : I P Gn I V I : G G V ~P N W x G _$ 8 V V x % V v % : V V F 9k! P % _ V V
0x37a100…37a294 (3, 328) Dummy {f00=0x0066, f01=0x0190, f02=» v ` " W p W ~ pP0 Mp R I P M| I _ W ~ R I X4 M| I _ ` @ ` W W ~ pPn I Jh V W % Mp R , I F " E R N` W ~ R N` R P P, R Xv P,_|W I T : Gn G W x G I _ V P8 I I
0x37a294…37a428 Dummy {f00=0x0066, f01=0x0190, f02=»I E R T E D E @ v H v E H I #_v W | ;b W W t V b v ( v W p V ` $ W ` F ;h 0 :C # : .=H N QP I .=H N QP I N : d 8" R _ ZY QY : @
0x37a428…37a5bc Dummy {f00=0x0066, f01=0x0190, f02=» E N :H N TBT W W8 2 " T @ E N =H N QP @ ) Qj !TTXX !CCT Qn !UUT d R Wh Q 2 .:H N P V E _ R :h " Q YV : v `?A @ W W :b
0x37a5bc…37a750 Dummy {f00=0x0066, f01=0x0190, f02=» pP. " 4X 1 R Z0 _ W l a w ` :A W V d 4 W P _ W ` W d V V W W V V >k 8 W W t V V x A 7n c cBP T W r cB T W @ @ %
0x37a750…37a8e4 Dummy {f00=0x0066, f01=0x0190, f02=» @ P @ " P : V _ W W . !TTP E b @ T E Y Qj !TTX" A 9 A : ` @ V :a @ I @ A @ I ;a P$ W @ A @ T E A : 6 ` @ P VF_ VF 3 S S V V W @ @ T
0x37a8e4…37aa78 Dummy {f00=0x0066, f01=0x0190, f02=» @ V Pf b 9h !RRP @ ! T W* b @ S W @ U E 3 S b S Yd @ @ T E : @ @ @ #D# P ; V Wj _ : @ " P @ P 3 _ @ " P V 3 S 1 S 9J S
0x37aa78…37ac0c Dummy {f00=0x0066, f01=0x0190, f02=»CRT N =H N b W p N =H N QP W | ( @ % 5 T W @ = V W = V b P0 b< r " U E _2 b. P0 b< " U E _2 V tP IbR E
0x37ac0c…37ada0 Dummy {f00=0x0066, f01=0x0190, f02=» X D : . !TTP E V b W t * b P b< r _ b. Pd W p b< V 8 8 4 D P$ E @ # P H I K T + Y@ V p _f V t Y Qj !TTX @ @ T E
0x37ada0…37af34 (3, 329) Dummy {f00=0x0066, f01=0x0190, f02=»T E P _ V A V W b W t b PT W f ( b< W d bL b G =h G V d V r < ] V f P W f _B _X V W V t Yv Qj !TTX @ @ T E : Qj !TTX !CCTr b
0x37af34…37b0c8 Dummy {f00=0x0066, f01=0x0190, f02=» @ ! P V 8 8 8 3 . !CCP W b P0 W f b< W d bL V d V r < ] V f _2 _X b. U^ b< V 8 8 8 4 D P$ E @ # P H I K T + Y@ _`R& @ @ @ % P V
0x37b0c8…37b25c Dummy {f00=0x0066, f01=0x0190, f02=»P _ W $ q > R P >b W >b & 8P ^ _6 V 7 V W R 9 W D E ) $ PV D L Tp D &P V ` T @ 1 Q a 0 I , I . $# P8 V -W( ^ W" D V ` T @ 1 Q a : @ % PD H I H
0x37b25c…37b3f0 Dummy {f00=0x0066, f01=0x0190, f02=» W H $ I & % E , a : V Q R $ F !LLT # W ;I # ;b W ;a WR# T W W,# T W W # T W W W R _ $ W : E Y Z V @ VT A V V W Y0 Z6 X @ XT A X V >A 8
0x37b3f0…37b584 Dummy {f00=0x0066, f01=0x0190, f02=» *T P _ / P *_ *T P$ _ .P _ / V z U Y$ P W | V z 3 % W P _ V |P V v ] <W v P _ @ VP V E A V (P ) @ V @ XP V E A X (P ) @ X @ @ T
0x37b584…37b718 Dummy {f00=0x0066, f01=0x0190, f02=»P N =H N T b Qj_ : @ ! P (W ( : 00=H 00 P P _ _ : U U U V` WB W Y Z [ ` @ R @ $ D L * A CRT M " c&c0c6c< c| Pd 6d@ Qdt 0d cNcTc^cdcj ! 1 6 0
0x37b718…37b8ac Dummy {f00=0x0066, f01=0x0190, f02=» 8' Y d4 _ / P 4% P dh 8' Y d VP P 4% P d X ( @ T
0x37b8ac…37ba40 Dummy {f00=0x0066, f01=0x0190, f02=» ' 0 9 B M Y e q ~ 3 H ] s 6 Q l ! $ $ ' + K / v 4 ? ? F W J @7 R ! 4 ,END OF FORMAT FOUND PRESS R
0x37ba40…37bbd4 (3, 330) Opaque[0x194]
0x37bbd4…37bd68 # DirEnt {nam=»CTAB01«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2728, f03=0x0000}
0x37bbd4…37bd68 IdxSect {
0x37bbd4…37bd68 f00 = 0x0139 // 0x37bbd4 @0x0
0x37bbd4…37bd68 f01 = 0x0002 // 0x37bbd6 @0x2
0x37bbd4…37bd68 gno = [ // 0x37bbd8 @0x4
0x37bbd4…37bd68 [0x00]: C0x0139.0x1.0
0x37bbd4…37bd68 ]
0x37bbd4…37bd68 }
0x37bd68…37befc Dummy {f00=0x0139, f01=0x0190, f02=» " P IDENT CTAB01 81-06-19/E,VRANG P ENTRY CTAB01 * 0 PCTAB01 DATA FUNC,FUNC,UNSC,SHIFT,SHIFT,SHIFT @ > PFUNC DATA /0081,/8083,/8485,/8687,/8889,/8A8B,/8C8D,/8E8F t : P DATA /3031,/3233,/3435,/3637,/3839,/9A9B,/9C9D,/9091 : P DATA /9293,/9495,/9
0x37befc…37c090 Dummy {f00=0x0139, f01=0x0190, f02=»7,/3839,/8F91,/8580,/8A90 t : P DATA /4041,/4243,/4445,/4647,/4849,/4A4B,/4C4D,/4E4F " : P DATA /5051,/5253,/5455,/5657,/5859,/5A5B,/5C5D,/7E00 ` > PSHIFT DATA /2000,/0000,/0000,/002A,/8B3E,/003F,/3B5F,/3A00 : P DATA /3D21,/2223,/2425,/262F,/2829,/8F9
0x37c090…37c224 Dummy {f00=0x0139, f01=0x401a, f02=»0 END @ t : P DATA /4041,/4243,/4445,/4647,/4849,/4A4B,/4C4D,/4E4F " : P DATA /5051,/5253,/5455,/5657,/5859,/5A5B,/5C5D,/7E00 ` > PSHIFT DATA /2000,/0000,/0000,/002A,/8B3E,/003F,/3B5F,/3A00 : P DATA /3D21,/2223,/2425,/262F,/2829,/8F9
0x37c224…37c3b8 Dummy {f00=0x0139, f01=0x2008, f02=» END @ r : P DATA /4041,/4243,/4445,/4647,/4849,/4A4B,/4C4D,/4E4F : P DATA /5051,/5253,/5455,/5657,/5859,/5A5B,/5C5D,/5EFF ^ > PSHIFT DATA /20FF,/FFFF,/FFFF,/FF2A,/FFFF,/FF3F,/3B5F,/3AFF : P DATA /3D21,/2223,/2425,/262F,/2829,/FFFF,
0x37c3b8…37c54c Dummy {f00=0x0139, f01=0x0190, f02=» d 0 P ^ 8 PR t H D ! ^ B R # Z ' B + 3 ^ ; ? P GP MP 0 H D ! Q UP e i mP uP PV T Q V8 ^ 6 8 t | H D ! " WX W l " QR Q 8 Z #P + 1T ;W
0x37c54c…37c6e0 Dummy {f00=0x0139, f01=0x0190, f02=» P L L L ` H D !$ F )P 1W 5 S F [ R ]P c R q T } P P H D ! P P T T J < V X P0 T Z T ? H I J KP O J h H D ! UP ]P, iP 8 8 T` X T Z T N H D ! 8
0x37c6e0…37c874 (3, 331) Opaque[0x194]
0x37c874…37ca08 # DirEnt {nam=»SYSBUG«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2708, f03=0x0000}
0x37c874…37ca08 IdxSect {
0x37c874…37ca08 f00 = 0x0138 // 0x37c874 @0x0
0x37c874…37ca08 f01 = 0x0006 // 0x37c876 @0x2
0x37c874…37ca08 gno = [ // 0x37c878 @0x4
0x37c874…37ca08 [0x00]: C0x0138.0x1.0
0x37c874…37ca08 [0x01]: C0x0138.0x3.0
0x37c874…37ca08 [0x02]: C0x0143.0x1.0
0x37c874…37ca08 ]
0x37c874…37ca08 }
0x37ca08…37cb9c Dummy {f00=0x0138, f01=0x0190, f02=» 2 P IDENT SYSBUG REL 10.0 80-03-14 870105041000 P : P* B P* L 8 P*************************************************** V P* $ P* PHILIPS TERMINAL SYSTEM PTS P* 2 P* SYSBUG = INTERRUPT VECTORS, SYSTEM CONTROL 2 P*
0x37cb9c…37cd30 Dummy {f00=0x0138, f01=0x018e, f02=»*************** l P* P* " P EJECT SYSBUG , P* D P* N P*********** X P* ENTRIES * l P*********** P* P* 4 P ENTRY SCTMSZ,SCTSFA,SCTEFA SYSTEM CONTROL TABLE P ENTRY SCTIPL P ENTRY SCTANO,SCTA
0x37cd30…37cec4 Dummy {f00=0x0138, f01=0x0190, f02=» P ENTRY SCTSTB P ENTRY SCTOPT P ENTRY SCTTCT,SCTCDT 0 P ENTRY SCTBUG L & P ENTRY SCTDMT,SCTDMI,SCTFWT,SCTNOF b & P ENTRY SCTNFT,SCTFWL,SCTBLK,SCTDCT P ENTRY SEG:FC,SEG:NS & P ENTRY SEG:ST,SEG:DS,SEG:EL,SEG:PB & P ENTRY PAG:Q
0x37cec4…37d058 Dummy {f00=0x0138, f01=0x0190, f02=»* P* EXTERNALS * P************* P* 6 P* @ P EXTRN TDISP J , P EXTRN IHPFAR POWER FAIL / AUTO RESTART ^ P EXTRN IHLKM LKM INTERRUPT P EXTRN IHRTC REAL TIME CLOCK P EXTRN IHTW TYPEWRITER P EXTRN IHTC CASSETTE T
0x37d058…37d1ec Dummy {f00=0x0138, f01=0x0190, f02=» NO. 1 p * P EXTRN CHRT2 REMOTE CHANNEL UNIT NO. 2 P EXTRN CHRT3 < P EXTRN CHRT4 P ( P EXTRN IHCC1 CASSETTE CHANGER NO. 1 d ( P EXTRN IHCC2 2 ( P EXTRN IHCC3 3 * P EXTRN CHLT1 LOCAL CHANNEL UNIT
0x37d1ec…37d380 Dummy {f00=0x0138, f01=0x018e, f02=» M) DISC l P EXTRN IHLP LINE PRINTER P EXTRN IHCR CARD-READER 0 ( P EXTRN IHDU1,IHDU2 DISC UNIT NO. 1/2 P 0 P EXTRN IHMD,IASCUZ,ISLCI,ISLCO MINI FIX DISC | P EXTRN IHMT MAG. TAPE $ P EXTRN ILLINT ILLEGAL INTERRUPT P EXTRN HALT HALT R
0x37d380…37d514 (3, 332) Dummy {f00=0x0138, f01=0x0190, f02=» PSEG:FC EQU -4 FILE CODE $ PSEG:NS EQU -2 NUMBER OF SEGMENTS $ PSEG:ST EQU 0 STATUS L $ PSEG:DS EQU 2 DISC SECTOR ADDRESS h " PSEG:EL EQU 4 EFFECTIVE LENGTH $ PSEG:PB EQU 6 PAGE BLOCK ADDRESS P* & PPAG:QF EQU 0 QUEUE POINTER FORWA
0x37d514…37d6a8 Dummy {f00=0x0138, f01=0x0190, f02=» 2 PSWB:NC EQU 0 NUMBER OF COPIES WITHIN SWB TYPE 2 PSWB:DS EQU 2 DISC SECTOR ADDRESS OF FIRST COPY : $ PSWB:EL EQU 4 SWB LENGTH (BYTES) p & PSWB:NS EQU 6 SWB LENGTH (SECTORS) P* P P P P P EJECT SYSBUG P*
0x37d6a8…37d83c Dummy {f00=0x0138, f01=0x0190, f02=»LINT 3 P DATA ILLINT 4 P DATA ILLINT 5 0 P DATA ILLINT 6 L P DATA IHTW 7 h P DATA ILLINT P DATA IHSOP 9 P DATA ILLINT P DATA ILLINT P D
0x37d83c…37d9d0 Dummy {f00=0x0138, f01=0x0190, f02=» P DATA ILLINT P DATA ILLINT $ P DATA ILLINT D P DATA ILLINT d P DATA ILLINT P DATA ILLINT 22 P DATA ILLINT P DATA CHLT1 24 P DAT
0x37d9d0…37db64 Dummy {f00=0x0138, f01=0x0190, f02=» P DATA IHFD 30 P DATA ILLINT 31 P DATA ILLINT 32 : P DATA ILLINT 33 V P DATA IHLP 34 r P DATA ILLINT P DATA ILLINT 36 P DATA ILLINT 37 P DATA ILLINT 38 P DATA IL
0x37db64…37dcf8 Dummy {f00=0x0138, f01=0x0190, f02=» P DATA ILLINT P DATA ILLINT 45 $ P DATA ILLINT 46 @ P DATA ILLINT 47 P DATA ILLINT x P DATA ILLINT 49 P DATA ILLINT 50 P DATA ILLINT 51 P DATA ILLINT 52 P
0x37dcf8…37de8c Dummy {f00=0x0138, f01=0x0190, f02=» P DATA ILLINT 58 P DATA ILLINT 59 P DATA ILLINT 60 < P DATA ILLINT 61 X P DATA ILLINT 62 t P DATA TRAP TRAP ROUTINE P EJECT SYSBUG P P* " P* SYSTEM CONTROL TABLE POINTER P*
0x37de8c…37e020 Dummy {f00=0x0138, f01=0x0190, f02=»LT P P* P* DEBUG RESTART ENTRY P* : P XRR A13,A13 D P XRR A14,A14 X P LD A1,SCTBUG l P ABR(NZ) A1 P HLT P* P EJECT SYSBUG P* P* PX:A EQU 0 MONITOR OPTION ( PX:B EQU 0 DATA M
0x37e020…37e1b4 (3, 333) Dummy {f00=0x0143, f01=0x0190, f02=» OF FILES/TASK z $ PX:F EQU 0 FILE WORK TABLE LENGTH PX:G EQU 0 DC TASK IN SYSTEM > P* b P EJECT SYSBUG l P* P* SYSTEM CONTROL TABLE P* PSCT EQU * P * PSCTMSZ DATA 0 MEMORY SIZE MOD K BYTES & PSCTSFA DAT
0x37e1b4…37e348 Dummy {f00=0x0143, f01=0x0190, f02=» MD:F4,F5 FD:F8,F9 | $ PSCTANO DATA 0 APPLICATION NUMBER 4 PSCTADA DATA 0,0 APPLICATION DISC SECTOR ADDRESS B . PSCTIOE DATA 0 APPLICATION RESTART ADDRESS z PSCTTCT DATA 0 TCTAB ADDRESS PSCTCDT DATA 0 CDTAB ADDRESS PSCTPAG DATA 0 PAGTAB
0x37e348…37e4dc Dummy {f00=0x0143, f01=0x0190, f02=»MMU TABLE COMMON PART ENTRY P INDEX REL TTAB $ 0 PSCTLAC DATA 0 LOGICAL ADDRESS OF COMMON PART > & PSCTMMP DATA 0 MMU TABLE PAGE ENTRY r P INDEX REL TTAB * PSCTLAP DATA 0 LOGICAL ADDRESS OF PAGES ( PSCTNPE DATA 0 NUMBER OF PAGE ENTRIES
0x37e4dc…37e670 Dummy {f00=0x0143, f01=0x0190, f02=» 13:FM,14:DSKPAG,15:MMUPAG PSCTBUG DATA BUG DEBUGGER " & PSCTDMT DATA X:B DMTASKS IN SYSTEM B & P BIT 12:#G, 13:#F, 14:#E, 15:#D l 2 PSCTDMI DATA 00000 DM INDEX RECORD BUFFER SIZE P EJECT SYSBUG P* P* * PSCTFWT DATA 0 FW
0x37e670…37e804 Dummy {f00=0x0143, f01=0x018c, f02=»FILE WORK TABLE LENGTH ~ ( PSCTBLK DATA 6 NUMBER OF BLOCKS/TASK , PSCTDCT DATA X:G DC-TASK IN SYSTEM/REMOTE J P EJECT SYSBUG z P P* P* SYSTEM STACK P* P RES 143 P DATA /FCC0 AND PSW & PSTB DATA LOOP AND PC FOR
0x37e804…37e998 Dummy {f00=0x0143, f01=0x4008, f02=»@ K TABLE LENGTH ~ ( PSCTBLK DATA 6 NUMBER OF BLOCKS/TASK , PSCTDCT DATA X:G DC-TASK IN SYSTEM/REMOTE J P EJECT SYSBUG z P P* P* SYSTEM STACK P* P RES 143 P DATA /FCC0 AND PSW & PSTB DATA LOOP AND PC FOR
0x37e998…37eb2c Dummy {f00=0x0143, f01=0x2008, f02=» P P END INIM @ & P EJECT 2 P @ P* H P* START SYSTEM R P* h P r P LD A13,CVTAPS z * P STR A13,A15 STORE USER START ADDRESS " P STR A7,A15 AND LEVEL ON STACK " P ABL PFINIT INITIALIZE DEVICES
0x37eb2c…37ecc0 Dummy {f00=0x0143, f01=0x0190, f02=» " _: Y L " Y F Y L $ Y ! ! # P W ! 9 ! X ^< Y Y F Y X RP 1 Y R 0 Y T 1 0B. X P P Y : ! ! X # P Y P:A , X T A Y T @ B. Y Y J X $ Y C '? X " Y _ A H ? N(@ X V
0x37ecc0…37ee54 (3, 334) Opaque[0x194]
0x37ee54…37efe8 # DirEnt {nam=»M:DEBG«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x2d28, f03=0x0000}
0x37ee54…37efe8 IdxSect {
0x37ee54…37efe8 f00 = 0x0169 // 0x37ee54 @0x0
0x37ee54…37efe8 f01 = 0x0014 // 0x37ee56 @0x2
0x37ee54…37efe8 gno = [ // 0x37ee58 @0x4
0x37ee54…37efe8 [0x00]: C0x0169.0x1.0
0x37ee54…37efe8 [0x01]: C0x0169.0x2.0
0x37ee54…37efe8 [0x02]: C0x0169.0x3.0
0x37ee54…37efe8 [0x03]: C0x016a.0x0.0
0x37ee54…37efe8 [0x04]: C0x016c.0x1.0
0x37ee54…37efe8 [0x05]: C0x016d.0x0.0
0x37ee54…37efe8 [0x06]: C0x016d.0x1.0
0x37ee54…37efe8 [0x07]: C0x016d.0x2.0
0x37ee54…37efe8 [0x08]: C0x016d.0x3.0
0x37ee54…37efe8 [0x09]: C0x016e.0x0.0
0x37ee54…37efe8 ]
0x37ee54…37efe8 }
0x37efe8…37f17c Dummy {f00=0x0169, f01=0x0190, f02=»D Nq L L L L L L L L L ' L L L L L L L L L L L L L' L L L L L L L L L L L L L L L L L L L L L L L L L L L L L L L R c @ T ^ z ^ r h V H 2 Z f9 z
0x37f17c…37f310 Dummy {f00=0x0169, f01=0x0190, f02=» 4c : @Y/ pJ @ d _ 2Z $"z y ?H T+ V y J t Dh i VR 1H W ] [ ? d % L X! "~ T &b Cn 1 d _ A H " , _ @, > > U # T @ P H ( ( P c P W6 A, $ V ( U P @ V L
0x37f310…37f4a4 Dummy {f00=0x0169, f01=0x0190, f02=» H A Q > ? A H A FQ 2_ A F < Q @ P @ Q @ Z Y _ 8 , Q Z P 0 9 _ z $ _, ? _ P H H ? ? ? ? ? ^ A _ _ ^ , $P T I R $ 5 % > ? W ? W ? T
0x37f4a4…37f638 Dummy {f00=0x0169, f01=0x0190, f02=» @+ T R 0 A+ 1 Q Q > > 0 @+ 1 A+ P P > " ? * X R Y P _ ? @ 8 R Y P _ W0 8 X W( ? ` @ @ P $ H W W > > > > > > @ DV ? D > _ > ? _ > > ? ^ ! Y ^ _ R ? JA. ~
0x37f638…37f7cc Dummy {f00=0x0169, f01=0x0190, f02=» " P PR 4 5 T P ? X U X . > PZ PF P P 0 X T Y Wn U U T X^ T E - Y Tx 8RtWP 4 U P> $P4> R0> 8' T Y X ' T P X P " > - Z X "X 8' T 8Z" X ' X
0x37f7cc…37f960 Dummy {f00=0x0169, f01=0x0190, f02=» >B @ P A . T 8TV 9WD B 7P P - A+ W A+ @+ A.W ? A HI.9 X R C C J - ?A @+ A. X V 9_: v @ ~ 8 x N B < U P
0x37f960…37faf4 (3, 335) Dummy {f00=0x0169, f01=0x0190, f02=» P 0R Q W R ?U C ! _f Y (P Y ) _ ^ _ ! x P: B L # +P Y , ! U _ X T _ W ! Y ! X X ! X P R ?]* U C _. _: ! ! " $ P X , X ]T ! Y h Y _p ? X R X X
0x37faf4…37fc88 Dummy {f00=0x0169, f01=0x0190, f02=» Y , Y B 9a C - 8 J P: 8 B W0 B W B W B @ T 8 T Y Y Y Y - Y . ! ~ X ._B B 1 4 X X X X ' 4 B U B $" 4 C 4 J * ~ _^ L x B U P
0x37fc88…37fe1c Dummy {f00=0x0169, f01=0x0190, f02=» P D T 1 WP B B PD P - V - 0 P A F# +T W Q P P 1 ! X T V C B Q 1 J - Y @ r t @ B X _" ? X Z,W A H ?I X ' { B C X 4
0x37fe1c…37ffb0 Dummy {f00=0x0169, f01=0x0190, f02=» Y , Y B 9a C 8 J P: 8 B W0 B W B W B @ T 8 T Y Y Y Y Y . ! ~ X ._B B 1 4 X X X X ' 4 B U B $" 4 C 4 J * ~ _^ L 2 R x 0 R R 0 R " 0 0
0x37ffb0…380144 Dummy {f00=0x0169, f01=0x0190, f02=» 0P P > T C T" V$ Y Pp q 0 ) Wb X P^ T& B RPP" A $ @ d A t p WF @W( T$ P X T X P 4 Y C C 8W T 8P Y ^ 5 ) P U - XT !
0x380144…3802d8 Dummy {f00=0x0169, f01=0x0190, f02=» C W4 O " # X Y ) C C x # P Y '? Y Y T # P W d Y P R R P T ( P (@ $(@ " 2 @ _ > X $? P $ > > F C F C
0x3802d8…38046c Dummy {f00=0x0169, f01=0x0190, f02=» 0$ T # R QL > X B U( H Q2 X D B $ T C x > C $ ) _ X 9BV X & J - X D C > X H UJ H B P PL $ # Q > P _0 # T p > P p (_H
0x38046c…380600 Dummy {f00=0x0169, f01=0x0190, f02=» > J X D D P ( ) 1_f _& ?(@ X P 0P X T 4 Y X 1 1 X P - M T $ PJ _ T " # p X L R P P P (@ : ^ X P8 P0 # P T P 0P 1 _ W
0x380600…380794 (3, 336) Dummy {f00=0x0169, f01=0x0190, f02=» d @ 1 A _ P 9 > > T R L U R9C _ T M D W. D D " @ @ - U _ 9B @ T u X > & - , - - (- :" :T : ; ;n 9 : & r=L 0 A V U A P @ , A x A r @ ~ A !h A ~ @ A !<
0x380794…380928 Dummy {f00=0x0169, f01=0x0190, f02=» R $ ( , 0 4 8 < 2 _ S A
0x380928…380abc Dummy {f00=0x0169, f01=0x0190, f02=»P UW B @ = / 0 M Q n R h S Z T Y ( G P H L V " I ^ U t _v A P_ NO! A A A A A A A A *T A _ P A A V . r , + - ; : X " H W X
0x380abc…380c50 Dummy {f00=0x0169, f01=0x0190, f02=» T " ( ^ @ P A A " @ n tT @ XW @ A X W W 0 n _, W W V PP @ & 0 n T A P P _b _J A $ tT @ X W @ T @ W @ @
0x380c50…380de4 Dummy {f00=0x0169, f01=0x0190, f02=» 0 n W t A W @ A n P 3P C @ P @ @ P @ Q A t @ A " T @ W @ A z " A tP P @ _2 P tT z 0 P P _ @ t v @ @ @ P
0x380de4…380f78 Dummy {f00=0x0169, f01=0x0190, f02=» ` H A @ v @ @ T A A P@ @ PB t @ ! T A @ A # A t l RE FRN GME RMN S W R, ( T ( W P T $ ; V ; W~&~ P &`P 6 P @ $ P $W $ TR
0x380f78…38110c Dummy {f00=0x0169, f01=0x0190, f02=» v A p A r pW ^ P _ " ^ T @ 9J A T _ 1@ _ ^ 9 V >! D A A > > > > > > > > ^ _ ^ _ ? ? ? ? ? A ^ @ ? ? X > > > > > > > @ V >
0x38110c…3812a0 Dummy {f00=0x0169, f01=0x0190, f02=» A " A " 0R$ 9U AR FQ 0:D A " _* A " " A L A N n T A N A L " R _U . " A : A " A A $ T ! " A @ T 0W 0W A @ T 1W 1 @ "
0x3812a0…381434 (3, 337) Dummy {f00=0x016a, f01=0x0190, f02=» ! R :W" W W W ?W /W : A! W ! A! A PL ! _ @ _ I T " T A P I T$! A A A A A A A A A!F A @ A @ >
0x381434…3815c8 Dummy {f00=0x016a, f01=0x0190, f02=» " ,* 9 !&(! T 9 !( X $ Y + & X Y $ 9 X !P T4 A+ W A+ @+ A. R t"J - Y R WF L! Y X N Y !) X P. P P& P R P # X %* - - ,* B X ; Z Y B X T < Z0:A Z:
0x3815c8…38175c Dummy {f00=0x016a, f01=0x0190, f02=» X !? PZ P PR P !( X P * _ X x ^ Y X P !) !&( P @ 9W@ !( X P * Y !&, X P X !( X P X * _ X p ^ &L P P !&,# T X Pt X &Pf !( !$ B Rh Qd :C P * !&,9DV + !$ (@ B | !)
0x38175c…3818f0 Dummy {f00=0x016a, f01=0x0190, f02=»% (@ !) R _ !) *T 1 ;h 1 !) 1 !) * !&( !% !) ) !&,# X Y P_ P P !) P @ 9 4 ,* & !) P X 1P B " +PV T ( C Q V8 !(v !&, !) _ X * X H p ^ t !) WX W l !) C QR (Q _
0x3818f0…381a84 Dummy {f00=0x016a, f01=0x0190, f02=» Z Y V Y X Y H @ TLB SLWF Y 8! T6 X Y X C X U X Y R V Y " W 8 J - Y _ ? + Y Y X LP y L_* L t& _: Y L " Y F Y L! Y !) !&,# P + W !( 9 !&, X ^< Y Y F Y X RP 1 Y R +
0x381a84…381c18 Dummy {f00=0x016a, f01=0x0190, f02=» X " Y _ A H ? + (@ X V X X K P0 @ T X ZT $C Y B - K & % Y B K X H :AZl X JP Y J ! P + 7P, $ P + < $ <C ! 9 9 4 X 9C X : X X 4 B :C * 4 $ * !&,# T` @*& TOT @*( SST X Y
0x381c18…381dac Dummy {f00=0x016a, f01=0x0190, f02=» T X W * (@ 0! D9x 1 Y 4 !) ;E :B 9A !) U *TP jW kQ 4 9 $ 0" Z Y P Z _ 4 A&F;D A&F 4 R _ ;H 4 | !) (:C * 4 d !) ( 4 X " 4 !) ) 4 ^< Y Y Y X P 1 Y
0x381dac…381f40 Dummy {f00=0x016a, f01=0x0190, f02=» X " Y _ A H ? (@ X X K P @ T X T $C Y B K & % Y B K X :AZl X P ! +
0x381f40…3820d4 (3, 338) Dummy {f00=0x016c, f01=0x0190, f02=» > X ( $ ^ WB X Y $:g H & I &! P& X , , P ,P 9A _ H &P I & > , P Y , X"; [&;! P &Z.?AZ2 @, Q & X " $XJ ( I T E _ (X _ X $ _t< > > @, A, DW W J ^ !
0x3820d4…382268 Dummy {f00=0x016c, f01=0x0190, f02=» "R~ Y - Pj T P` - <UR "R4 PB X R< X T6 X T0. T G Y6 G _` P ,P - _ ? 8! W0" P T 8! P< P8 . Y Y Y Y - X X Y X X X X ' 4 B U B (" W C
0x382268…3823fc Dummy {f00=0x016c, f01=0x0190, f02=»W< Y U R -P 0 X , ) Y . 0 X P Y P C WT X " PP:A: R Q W Y <D X ? ?: T p > 2 > Pb P C 0 B 0 T B % X . $ 4 T % 0 X ,T !.8W 2 Y . V 2 !. B P X " _Z B
0x3823fc…382590 Dummy {f00=0x016c, f01=0x0190, f02=»Wr W 0 Z 2 !. B Z Z& X . 0T N W X ,P Y . 0 %_. % Y . W _p P 2 _ C !. - " 1 QPR X R(;GV$ .R 1 P8 X R2;GV. X " /J X , $4 P 2 X .T * W Y , - - ? X :a Z T T W P X
0x382590…382724 Dummy {f00=0x016c, f01=0x0190, f02=» > >_ P > _v B 1 > NT 0 _ 22 3 4 3 PB P8 - B P B L # +P !. !. T !. Y & !. W !. !. W !. Y Y 3b .x U P" T Y &_. P4 R( Pj O]> V _F T Y Y & V Y _^ C _P .x .x
0x382724…3828b8 Dummy {f00=0x016c, f01=0x0190, f02=» U$ $ ! T _ U D ! T _ C > X Z^<BR P f .R X _x R0 V0 ! P* P P P" R ?Q !. Y R Q 3R . -_ ? _ X # !. ^ Y _( ? X Z !. P0 P X _ X " 22 !. !. X & 3 3H 4x8r6 6
0x3828b8…382a4c Dummy {f00=0x016c, f01=0x0190, f02=» Y & _ Y &_. B 1 7 !. 6 B B U4 $ ! T _ U D ! T _ $$ X" X& X* C .x 6> X`" E4rP( 8'0P E4rTD ! T 9 _ ! T @_ ! .x B P !8 B C 6> ^N P R ?] _ C _ .x .x" $
0x382a4c…382be0 Dummy {f00=0x016c, f01=0x0190, f02=» !. !. 6 !. 1P X & C ,T Y & J - X Y & Y > X " X &" Y )Q Y > X Z2<BR > .R ? Y !. T X !. Y & Zl 6 T _ !. X $ P !7p 5P R V P P" !. 6 W 6 . X $ X !7p_ X $ X X & !8,
0x382be0…382d74 (3, 339) Dummy {f00=0x016d, f01=0x0190, f02=»" Y * X ) V Y !8 X $ X & !8, X * 5P 5 `R Y !. !. !. 4 !. V !. V W :h !. 4 X )" X '# R 4 6 > ABCDEFGHI[.<(+!&JKLMNOPQR]$*);^
0x382d74…382f08 Dummy {f00=0x016d, f01=0x0190, f02=»&JKLMNOPQR]$*);^-/STUVWXYZ|,%_>?0123456789:#@'= 7- <=2&p ?' @O {[lP}M] Nk`Ka z^L~no| J Z_m j TOSS' "?:B ] P H U _ T U P U ;C ,$ T -_> -
0x382f08…38309c Dummy {f00=0x016d, f01=0x0190, f02=» <(@ ;F $ P B $ 9H C ">h # P >_2 < U = D (@ " $ P B >H<h ; P ?_" = > = > = =_D R _ 00 > & <h$ P > " 2 P* P P" P P P TX >N < - <P P V B B T P* & T$
0x38309c…383230 Dummy {f00=0x016d, f01=0x0190, f02=» _6 _6 " " P2 @ Q, , Y ," P L P T L R :AV ' > _ k`Ka z^L~no| #A 1 < =N "?:B ] P H U _ T U P U ;C ,$ T -_> -
0x383230…3833c4 Dummy {f00=0x016d, f01=0x0190, f02=» #D9 V 1 Y , ,P :A , A, >_2 < U = D (@ " $ P B >H<h ; P ?_" = > = > = =_D R _ 00 > < < T M F < Px ' @ @(! A A< B P< B P& 8! P6 K @P X T X !?
0x3833c4…383558 Dummy {f00=0x016d, f01=0x0190, f02=» : V V P dW Y Y " V V T Y " Y $ B P(_t d(@ - $T 1 %_" Y (_ @< 0P $P X X $ $P, # ' P @T #?W #?$? > _2 J @" P Y 9 @ J ! T " Y X & $ ' A ! A
0x383558…3836ec Dummy {f00=0x016d, f01=0x0190, f02=»T P % Y % Y Y V + V K V K : V K < V K A V % K C V & K D X P K @ X 9AV K 9 !? K > F C & G C R A C N ! N P N & N T _ - M @ F Pp G , _ W C (
0x3836ec…383880 Dummy {f00=0x016d, f01=0x0190, f02=» C$P" $ A 8X 8 , Y $ : _ & <R(@ T X " C X B V P B _ : C A @=X @=| =T A =N V )$ T B * Y $ : & $ Y : @ P0 8 T _ & & Y " 4 : : $ - Y : ~
0x383880…383a14 (3, 340) Dummy {f00=0x016d, f01=0x0190, f02=»HIJKLMNOPQRSTUVWXYZ[ ]~ * > ?;_: =!"#$%&/() @ABCDEFGHIJKLMNOPQRSTUVWXYZ[ ]^ c ($SWAP A A A A A. Q@ UU @ @ ! P$>B @R* AR* @R* E D P _ $ % $P _ % A >f A A A
0x383a14…383ba8 Dummy {f00=0x016d, f01=0x0190, f02=» & W F W @ F W CRP BAP COP A W F A @ : V, @ P RP;b=H : G: F G:W =J : R F P W W @ $ P @ R| W W U R" W W V V 8 !RRT W V X W W V
0x383ba8…383d3c Dummy {f00=0x016d, f01=0x0190, f02=» P U Y RP G RJ Y P @ P @ T W - RJP _ T <B :L A W A A W RJ T F W V RP = V W Y(
0x383d3c…383ed0 Dummy {f00=0x016d, f01=0x0190, f02=» @ H V W H ! P W @ V P _ @ ! P* Q.9h !RRP V V H W _> RP Q. Q. P V V PZ W @ @ ! T _ P :l 9b ) V _ @ V^ K J W AJ
0x383ed0…384064 Dummy {f00=0x016d, f01=0x0190, f02=» J KL J K L K J K L K J K L KR J KR J V 00P& L$ K L KL J L L KF J _0 KR J V 00P L$ L L KL J _ 0 !TTX W AJ !CCT CC AK6 K2_ 0 !;; L4 J _ S AO AP O @ R @ ! T AOP AOd @C V
0x384064…3841f8 Dummy {f00=0x016d, f01=0x0190, f02=»X$ W R` nX T K( : L I. : RP K* : 0 !TTT 0 !;;T : W W 0 !99Q P !00R P 00W 11 AK P.=H_, !11R T$ 0 !LLP !RRP !AAP !SSP W W W 0 !;;T~ : 0 !00Rr !99U !AARf !ZZQ` 0 !;;TR : L< : L@
0x3841f8…38438c Dummy {f00=0x016d, f01=0x0190, f02=» L C. LX X C.9h! L L # " L L :A K : A T.I T P 1 I P < R P A _> RP : @ " P P D MD AMz AM~ AM AM W M AC AM AM AN AN" AQ AK* AO AO : 9e :e Q P
0x38438c…384520 Dummy {f00=0x016d, f01=0x0190, f02=» AC U <e @C P AC <C, D L " @C $ P " :B AC t w B J " r R,Q$ @ ( = @C Q @C "| _@ _$ : AN AN AN AN N AQ AK* AO AO : h:B* AC @C P AC B J 4R 4 :B 4 @C : V V 49B @C 4R @
0x384520…3846b4 (3, 341) Dummy {f00=0x016d, f01=0x0190, f02=»A I T - A _ I N T V S : RP O O 9PJ S Y T@ $ 1T: C !CCTr : 1P P$_ P =H P ] @ T X W n : YX d C !CCTx xB. LX <X B.9 HC Q N _ L _ !SSTF 0 UC P A
0x3846b4…384848 Dummy {f00=0x016d, f01=0x0190, f02=» F P P V W @ $ P p W R` T : AP Q _ 0V , - P X 9A_ : @ ! P (W ( :W> 2 W 0 . " A A A A AK* 2 ; Z [ : : [ [ : `
0x384848…3849dc Dummy {f00=0x016d, f01=0x0190, f02=» W Z A. c @ V W U RP R $ )_ : W W W W W U Q@ V V v x W V V v p R( W V W ^< _@ V _P V V : V J P S r
0x3849dc…384b70 Dummy {f00=0x016d, f01=0x0190, f02=»R v : V W V RP ) : V <B W |P v v : $ S V |P v w v : V $ V l $ S V M : W V R RR > R W > <B V x V |P v 1 v W V z
0x384b70…384d04 Dummy {f00=0x016d, f01=0x0190, f02=» V RPP RP P T RP E _J S E _T " D T E S E D E % : " R ;B S " R P( |P v v : V W 0 : V P 9a _ " ( ) 8 ( ) : " $ V P 9A _ 0 : W W W ?AP
0x384d04…384e98 Dummy {f00=0x016d, f01=0x0190, f02=» ? R 0 R P P B _ , : V ) VT v : 4P: " D Vz , H H $ M v b - I Y0 : @ ` V b pP ` $ $ W Vp $ I H V ) P _ " = D
0x384e98…38502c Dummy {f00=0x016d, f01=0x0190, f02=» V 9n A @ A A V V @ ! @ P P P P|_ _ @ 9N @ :b @ :b V W U6 T 9BW P P( P V W U " @ Q V P A. V P _b A 9n A :B A
0x38502c…3851c0 Dummy {f00=0x016d, f01=0x0190, f02=» h A. @ j @ W A : A A - > l : V R S W n V pT : N V l W H V ]" . nT" T4 W v T W n V ~P Z W x T [ U T _v V d , V RP P _ N
0x3851c0…385354 (3, 342) Dummy {f00=0x016d, f01=0x0190, f02=» 8 V V x % V v % : V V R 9k! P % _ V V W W r VT W V S v ) W b G S v ) - V S W f v ) G v ` " W p W ~ pP0 Y R V(P Y V0_ W ~ R V(X4 Y V0
0x385354…3854e8 Dummy {f00=0x016d, f01=0x0190, f02=» R Z R P R Xv _|W V(T : S T4 W x T V0_ V P8 Vz I V S C C $ @ v D B I v W z ` pPl Vp H - V VT I T " R V@ E R T E D E @ v H v E T U #_v W |
0x3854e8…38567c Dummy {f00=0x016d, f01=0x0190, f02=» .=H N ] V@ N : d 8" R _ ZY QY : @ V H W z W | CRP W ` ` H W d 2 ;A @ U R RP - @ - N !TTP RP N :H N TBT W W8 2 " T @ RP N =H N ] @
0x38567c…385810 Dummy {f00=0x016d, f01=0x0190, f02=» " ^$ YV : v `?A @ W W :b / W W @ W D V@ V W W ` " W p @ pP. " 4X 1 R Z0 _ W l a w ` :A W V d
0x385810…3859a4 Dummy {f00=0x016d, f01=0x0190, f02=» x A C o o P aJ W r o aJ W @ @ % o> V , P@ , - 4 ] 4 U Y 5 X * _6 : W @ ] @ P @ " P : V _ W W . !TTP RP n @ T RP Y ]
0x3859a4…385b38 Dummy {f00=0x016d, f01=0x0190, f02=» ` @ P b _ b 3 S S V V W @ @ T RP : P S S _ : V CRP COP W @ 3 V 3 3 @ o o S @ V Pf o 9h !RRP @ ! T W* o @ S W
0x385b38…385ccc Dummy {f00=0x016d, f01=0x0190, f02=» _ : @ " P @ P 3 _ @ " P V 3 S 1 S 9J S ( 3 ( 9B @ @ T RP : W . !TTP RP n W t N =H N W l V CRT N =H N n W p N =H N ] W | ( @ % 5 T W @ = V
0x385ccc…385e60 Dummy {f00=0x016d, f01=0x0190, f02=» U RP _2 V tP U R RP S ( V | S =J @ " S V l S W l V S V CRT V p S W p W W _ ] !TTT d Q> : . !TTP RP V n W t * n
0x385e60…385ff4 (3, 343) Dummy {f00=0x016e, f01=0x0190, f02=» K T + Y@ V p _f V t Y ] !TTX @ @ T RP : W % @ P _ R @ WT R @ 0 W ` W W& T RP P _ V A V W n W t n
0x385ff4…386188 Dummy {f00=0x016e, f01=0x0190, f02=»] !TTX @ @ T RP : ] !TTX !CCTr n P, n V r 4 U RP $ $ _. n P, n V 4 U RP $ $ _. @ @ @ ! P V 8 8 8 3 . !CCP W n P0
0x386188…38631c Dummy {f00=0x016e, f01=0x0190, f02=»P H I K T + Y@ _`R& @ @ @ % P V 4 4 4 _r @ @ T RP : W V F !SST l WJ !AAT l W> l V V 0 V P _ W $ q > R P >b W >b & 8P kD k V D V W
0x38631c…3864b0 Dummy {f00=0x016e, f01=0x0190, f02=» -W( kDW" D V ` T @ 1 Q a : @ % PD H I H T P( H U V U W < + + P jF V : ` P: @ @ @ D (P W H $ I & % E , a : V Q R $ F !LLT # W
0x3864b0…386644 Dummy {f00=0x016e, f01=0x0190, f02=» Y Z + @+ T A+ V W Y0 Z6 + @+ T A+ V >A 8T 9 0 1 8 $; # V ;c F !AAP # $ < $ : W | v z *T P _ / P *_ *T P$ _ .P _ /
0x386644…3867d8 Dummy {f00=0x016e, f01=0x0190, f02=» R` A+ (P ) @+ @+ P V R` A+ (P ) @+ @ @ T RP : N =H N ] : N =H N ] : &=H F ] : F =H F ] : F =H F ] : P N =H N T n ] _ : @ ! P (W ( : 00=H 00 P P _
0x3867d8…38696c Dummy {f00=0x016e, f01=0x0190, f02=»o o Pp 6p Qp 0q( o o o o o ! 1 6 0 + + + + . KB pFC, !AAP p p(p( 84h Y p _ /
0x38696c…386b00 Dummy {f00=0x016e, f01=0x0190, f02=» P 42( P qP + ( @ T RP : N =H N ] : N =H N ] : &=H F ] : F =H F ] : F =H F ] : P N =H N T n ] _ : @ ! P (W ( : 00=H 00 P P _
0x386b00…386c94 (3, 344) Opaque[0x194]
0x386c94…386e28 # DirEnt {nam=»DRFDDE«, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2a90, f03=0x0000}
0x386c94…386e28 IdxSect {
0x386c94…386e28 f00 = 0x0154 // 0x386c94 @0x0
0x386c94…386e28 f01 = 0x0002 // 0x386c96 @0x2
0x386c94…386e28 gno = [ // 0x386c98 @0x4
0x386c94…386e28 [0x00]: C0x0154.0x2.0
0x386c94…386e28 ]
0x386c94…386e28 }
0x386e28…386fbc Dummy {f00=0x0154, f01=0x0190, f02=» PLED DRFD01,/S,## P##IL 0 P CONV, 81-04-18,DK1 * $ P ONLY VALID FOR DATA ENTRY,DK1 H P##DL 906 p ( P CF A5,ASC:01 TRANSFORM TO ASCII DK1 P##DL 967 0 P CF A5,EBC:01 TRANSFORM AND MOVE TO BUF DK1 P##DL 1576 4 P CF A5
0x386fbc…387150 Dummy {f00=0x0154, f01=0x018e, f02=»01 BUFFER NOT IN SYSTEM AREA DK1 * P LD A4,DWTBA,A6 GET BUFFER ADDRESS DK1 ( P RF ASC:02 DK1 V PASC:01 EQU * DK1 n P##IL 1617 PASC:02 EQU * DK1 P##DL 1648 4 P LD A1,DWT:LA,A6 GET LOGICAL BUFFER ADDRESS DK1 0 P RF(NZ) EB
0x387150…3872e4 Dummy {f00=0x0154, f01=0x0134, f02=» P##IL 1652 PEBC:02 EQU * DK1 P##IL 1653 0 P ENB DK1 B P##RE 1660,$$ SC$$* SC$$ T . P SCR A1,A4 PUT EBCDIC IN OUTPUT BUFFER DK1 t P##RE 1663,$$ LDKL$$* LDKL$$ P##EN PKPF /S,DRFDDE PSCR PASM DRFDDE
0x3872e4…387478 Dummy {f00=0x0154, f01=0x2008, f02=» 1652 PEBC:02 EQU * DK1 P##IL 1653 0 P ENB DK1 B P##RE 1660,$$ SC$$* SC$$ T . P SCR A1,A4 PUT EBCDIC IN OUTPUT BUFFER DK1 t P##RE 1663,$$ LDKL$$* LDKL$$ P##EN PKPF /S,DRFDDE PSCR PASM DRFDDE
0x387478…38760c Dummy {f00=0x0154, f01=0x0190, f02=» SCTNOP SCTPSZ SCTMMC 0 SCTLAC D SCTMMPL X SCTLAP0 l SCTNPE SCTSTB SCTOPT bBUG SCTBUG , (
0x38760c…3877a0 Dummy {f00=0x0154, f01=0x408a, f02=» SCTDCT ^ _ > T t@ SCTSTB SCTOPT bBUG SCTBUG , (
0x3877a0…387934 (3, 345) Opaque[0x194]
0x387934…387ac8 # DirEnt {nam=»DRFDDE«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2a98, f03=0x0000}
0x387934…387ac8 IdxSect {
0x387934…387ac8 f00 = 0x0154 // 0x387934 @0x0
0x387934…387ac8 f01 = 0x0022 // 0x387936 @0x2
0x387934…387ac8 gno = [ // 0x387938 @0x4
0x387934…387ac8 [0x00]: C0x0154.0x3.0
0x387934…387ac8 [0x01]: C0x016f.0x2.0
0x387934…387ac8 [0x02]: C0x016f.0x3.0
0x387934…387ac8 [0x03]: C0x0170.0x0.0
0x387934…387ac8 [0x04]: C0x0170.0x1.0
0x387934…387ac8 [0x05]: C0x0170.0x2.0
0x387934…387ac8 [0x06]: C0x0170.0x3.0
0x387934…387ac8 [0x07]: C0x0171.0x0.0
0x387934…387ac8 [0x08]: C0x0171.0x1.0
0x387934…387ac8 [0x09]: C0x0171.0x2.0
0x387934…387ac8 [0x0a]: C0x0171.0x3.0
0x387934…387ac8 [0x0b]: C0x0172.0x0.0
0x387934…387ac8 [0x0c]: C0x0172.0x1.0
0x387934…387ac8 [0x0d]: C0x0172.0x2.0
0x387934…387ac8 [0x0e]: C0x0172.0x3.0
0x387934…387ac8 [0x0f]: C0x0173.0x0.0
0x387934…387ac8 [0x10]: C0x0173.0x1.0
0x387934…387ac8 ]
0x387934…387ac8 }
0x387ac8…387c5c Dummy {f00=0x0154, f01=0x0190, f02=» 2 P IDENT DRFD01 REL 10.0 80-04-29 870105041000 P CONV, 81-04-18,DK1 : $ P ONLY VALID FOR DATA ENTRY,DK1 X P P* 2 P********************************************** P* " P* PHILIPS TERMINAL SYSTEM PTS P* ( P* DRF
0x387c5c…387df0 Dummy {f00=0x0154, f01=0x0190, f02=»******* j P* P* 0 P* THIS DISK DRIVER HANDLES UP TO FOUR DAISY $ . P* CHAINED FLEXIBLE DISK DRIVES PTS 6879, X 0 P* CONNECTED TO CPU VIA CHANNEL UNIT CHFD ON & P* MULTIPLEX OR PROGRAMMED CHANNEL P* P* P EJECT DRF
0x387df0…387f84 Dummy {f00=0x0154, f01=0x0190, f02=» -IBM DISC ONLY- t P* /05 BASIC WRITE * D P* /06 SEQUENTIAL WRITE -IBM DISC ONLY- F P* /11 PHYSICAL READ P* /15 PHYSICAL WRITE P* /21 OPEN P* /22 CLOSE P* /24 WRITE DELET
0x387f84…388118 Dummy {f00=0x0154, f01=0x0190, f02=»38 UNLOAD P* P* ENTRY PARAMETERS: P* : P* A5 STACK BASE D P* A6 DWT-ADDRESS ` P* A7 ORDER | P* A8 ECB-ADDRESS P EJECT DRFD01 P* P*********** P* * P* ENTRIES *
0x388118…3882ac Dummy {f00=0x0154, f01=0x018e, f02=»RY FDON RECOVERY ROUTINE P ENTRY DWFD01 DWT-ADDRESS P EJECT DRFD01 B P* Z P************* d P* * z P* EXTERNALS * P* * P************* P* P EXTRN TDISP DISPATCHER P EXTRN TENDI
0x3882ac…388440 Dummy {f00=0x0154, f01=0x0190, f02=» & P EXTRN VOLNAM VOLUME NAME ADDRESS 0 P EXTRN VOLGET VOLUME NAME TO DWT AND SET NVL . . P EXTRN NVLCHK CHECK FOR NEW VOLUME LOADED b P EXTRN DWTST STATUS P EXTRN DWTECB ECB ADDRESS " P EXTRN DWTUEC USER ECB ADDRESS $ P EXTRN DWTOR DWT
0x388440…3885d4 (3, 346) Dummy {f00=0x016f, f01=0x018e, f02=» EXTRN DWTSB2 STACK BASE 2 IN DWT P EXTRN TTB:MT MMU TABLE * ( P EXTRN SAVE8 SAVE A1-A8 ON A15 STACK J P EXTRN SETIMP TIMER v & P EXTRN INTSAV INTERRUPT SAVE AREA & P EXTRN PFPOST PWF POST PROC. FLAG & P EXTRN TASCII EBCDIC TO ASCII TAB
0x3885d4…388768 Dummy {f00=0x016f, f01=0x0190, f02=» n & P EXTRN ECBRL ECB REQUESTED LENGTH & P EXTRN ECBEL ECB EFFECTIVE LENGTH 2 $ P EXTRN ECBCW1 ECB CONTROL WORD 1 $ P EXTRN ECBCW2 ECB CONTROL WORD 2 P EJECT DRFD01 P* P************************ P* *
0x388768…3888fc Dummy {f00=0x016f, f01=0x0190, f02=»EAD OF PROGRAMMED x P* CHANNEL BY SETTING X:A = 0 P* > PX:A EQU 1 H PCHAN EQU 1 Z P* l 2 P* A PROGRAM VERSION INCLUDING TOSS DISC FORMAT v ( P* IS OBTAINED BY SETTING TOSS EQU 1. P* PX:B EQU 0 PTOSS EQU 1 P*
0x3888fc…388a90 Dummy {f00=0x016f, f01=0x0190, f02=»M EQU 1 P* . P* A PROGRAM VERSION USING TOSS MMU PAGING * P* IS OBTAINED BY SETTING MMUPAG EQU 1. L P* z PMMUPAG EQU 1 P* P* 6 P* A PROGRAM VERSION USING THE EXTENDED INSTRUCTION . P* SET IS OBTAINED BY SETTING CPU85
0x388a90…388c24 Dummy {f00=0x016f, f01=0x0190, f02=»HICH CONTROLS THE POWER l D P* TO THE DISK DRIVE UNIT CAN BE INCLUDED BY SETTING OPCLOS =1 P* h PX:D EQU 0 r POPCLOS EQU 1 P* P EJECT DRFD01 P* P* P* MMU BUFFER SIZE P* P* P IFT MMUPA
0x388c24…388db8 Dummy {f00=0x016f, f01=0x0190, f02=»* P* P* MMU DEVICE INDEX P* 0 P* : PDEVIND EQU 10 D P* Z P EJECT DRFD01 d P* | P************* P* * P* CONSTANTS * P* * P************* P* & PCUADR EQU
0x388db8…388f4c Dummy {f00=0x016f, f01=0x0190, f02=»TOR LENGTH ~ & PMAXSEC EQU 2002 MAX SECTOR NUMBER . PMAXIBM EQU 1923 MAX SECTOR NUMBER IBM DISC < ( PBOE EQU 28 BEGIN OF EXTENT POSITION n & PEOE EQU 34 END OF EXTENT POSITION $ PEOD EQU 74 END OF DATA POSITION PTIME EQU 20 DELAY - POWER ON
0x388f4c…3890e0 Dummy {f00=0x016f, f01=0x0190, f02=» P* P EJECT DRFD01 P* & P********** 0 P* * B P* TABLES * T P* * f P********** x P* P IFF CHAN+IBM=0 ( P DATA DVBLEN+DVBLEN MMU BUFFER SIZE P XIF P* P IFT CHAN=0 P IFT I
0x3890e0…389274 (3, 347) Dummy {f00=0x016f, f01=0x0190, f02=»RESS r " P DATA 0 ABORT ROUTINE ADDRESS P* 2 P EJECT DRFD01 < P* T P*************** ^ P* * v P* TEST STATUS * P* * P*************** P* PTESTST EQU * P IFF IBM+TOSS=0
0x389274…389408 Dummy {f00=0x016f, f01=0x018e, f02=» P ANK A1,1 $ P RF(NZ) DIS:EN DISC NOT OPERABLE * P LDKL A2,/7FFF RESET REQUEST ERROR BIT > P ANRS A2,A6 l P* P IFF TOSS+IBM=0 " P CF A5,VO:NAM GET VOLUME NAME , P LD A1,DWTORD,A6 RESTORE INDEX AND ORDER P ST A1,DWTOR,A6
0x389408…38959c Dummy {f00=0x016f, f01=0x0190, f02=» P EJECT DRFD01 P* P************** & P* * < P* ACTIVATION * R P* * h P************** ~ P* PFDAD EQU * ACTIVATION ENTRY P IFT MMUPAG=1 P IFT CHAN=0 P CM BUFFLG,A6 P XIF
0x38959c…389730 Dummy {f00=0x016f, f01=0x0190, f02=»RN CODE t P LDK A3,0 P LC A3,DWTOR,A6 GET INDEX " P* D P IFT OPCLOS=1 N P* d & P* CHECK IF OPEN OR CLOSE ORDER n P* P LDR A1,A7 ORDER P SUK A1,/21 P RF(Z) OPEN OPEN P SUK A1,1 " P RF(NZ) FD:ORD N
0x389730…3898c4 Dummy {f00=0x016f, f01=0x0190, f02=»* P* 4 P* CLOSE IS PERFORMED BY WRITING A ONE TO BIT 2 P* ZERO OF THE SOP LIGHTS EXTERNAL REGISTER L P* " P LDKL A1,/8000 MASK FOR BIT 0 & P ORS A1,SPDLCI SET OPEN/CLOSE BIT P RF OPEN10 P* P EJECT P*
0x3898c4…389a58 Dummy {f00=0x016f, f01=0x0190, f02=»RO TO BIT j 2 P* ZERO OF THE SOP LIGHTS EXTERNAL REGISTER. P* H POPEN EQU * R " P LDKL A1,/7FFF MASK FOR BIT 0 d ( P ANS A1,SPDLCI CLEAR OPEN/CLOSE BIT P* POPEN10 EQU * 0 P LD A1,SPDLCI SOP LIGHTS AND OPEN/CLOSE DATA " P
0x389a58…389bec Dummy {f00=0x016f, f01=0x0190, f02=»SET p ( P ADR A4,A6 A4:=TIMER POINTER ADDRESS P LDR A1,A6 SAVE DWT-ADDR 8 P CF A15,SETIMP WAIT X . P DATA OPENRE,OPENTI START ADDR, WAIT TIME t P ABL TDISP EXIT P* POPENRE EQU * P LDR A6,A1 GET DWT-ADDR , P CM DWTTP2,A
0x389bec…389d80 Dummy {f00=0x016f, f01=0x0190, f02=»CT P* & P* PUT DRIVE NO IN CIO-INSTRUCTION P* > PFD:ORD EQU * H P LC A2,DIXTAB,A3 , P SC A2,DWTA3+1,A6 SAVE DRIVE INDEX MASK t P* P IFT IBM+TOSS=2 P AN A2,DWTLAB,A6 ( P SC A2,DWTFIB+1,A6 INDICATE TOSS/IBM
0x389d80…389f14 (3, 348) Dummy {f00=0x0170, f01=0x0190, f02=» TESTST TEST STATUS P* P IFT IBM=0 & P SUK A3,38 8 " P RF(N) INTEST READ/WRITE ORDER J P SUK A3,18 p P ABL(NP) LOAD LOAD/UNLOAD P XIF P* P IFT IBM=1 P SUK A3,1 P RF(Z) INTEST BASIC READ P SUK A3,1
0x389f14…38a0a8 Dummy {f00=0x0170, f01=0x018e, f02=»TIAL WRITE | P SUK A3,32 & P RF(N) INTEST PHYSICAL READ/WRITE $ P SUK A3,11 N P RF(Z) IBMCHK REWIND ` P SUK A3,7 | P ABL(NP) LOAD LOAD/UNLOAD P XIF P* PIBMCHK EQU * P IFT TOSS+IBM=2 P LD A4,DWTFIB,A6 &
0x38a0a8…38a23c Dummy {f00=0x0170, f01=0x0190, f02=» p P XIF P* P EJECT DRFD01 P* 4 P* > $ PREQERR ABL DISIOE REQUEST ERROR H P* p 0 PINCLEN EQU * INCORRECT REQUESTED LENGTH EXIT z P LDKL A1,/8008 RETURN CODE P* PDIS:EN EQU * . P ABL DISEND PERFORM TENDIO
0x38a23c…38a3d0 Dummy {f00=0x0170, f01=0x0190, f02=»S+IBM=0 . P CF A15,NVLCHK CHECK IF NEW VOLUME LOADED P ADK A1,0 B $ P RB(NZ) DIS:EN NEW VOLUME LOADED T P XIF | P* P LD A3,ECBRL,A8 2 P RB(Z) INCLEN INCORRECT INPUT PARAMETER ECBRL ( P SRC A3,7 NUMBER OF PHYSICAL SECTORS
0x38a3d0…38a564 Dummy {f00=0x0170, f01=0x018e, f02=»D A2,ECBCW2,A8 GET SECTOR NUMBER P* ( P IFT IBM+TOSS=2 2 P LD A4,DWTFIB,A6 J P RF(NZ) INTES5 IBM-DISC b P XIF P* P IFT TOSS=1 P LDR A4,A3 6 P SRC A4,1 CHECK IF EVEN NUMBER OF PHYSICAL SECTORS 2 P RB(N) INCLEN IN
0x38a564…38a6f8 Dummy {f00=0x0170, f01=0x0190, f02=» P* PINTES5 EQU * P XIF " * P LDR A4,A2 SAVE PHYSICAL SECTOR NUMBER . P RB(N) REQERR REQUEST ERROR P SUKL A4,MAXSEC P RB(NN) REQERR REQUEST ERROR P ADR A4,A3 " P RB(P) INCLEN INCORRECT LENGTH , P ST A3,DWTNOS,A6 SAV
0x38a6f8…38a88c Dummy {f00=0x0170, f01=0x018e, f02=» ECB BUFFER ADDRESS | P* P IFT MMUPAG=1 & P LCR A2,A8 < P ANK A2,/30 N 4 P ST A2,DWT:BF,A6 SAVE BITS 0-1 IN 18-BIT ADDRESS b P XIF P* P EJECT DRFD01 P* P* MULTIPLE SECTOR IO ENTRY P* PFD:000 EQU
0x38a88c…38aa20 Dummy {f00=0x0170, f01=0x0190, f02=» P LDKL A2,512 P LDK A4,3 P SUK A3,4 * & P RF(NN) FD:005 FOUR PHYS. SEC. IO < P* f PFD:003 SUK A2,128 p P SUK A4,1 P ADK A3,1 P RB(NZ) FD:003 P* PFD:005 EQU * . P ST A4,DWTSIO,A6 SECTORS IN ONE IO ON
0x38aa20…38abb4 (3, 349) Dummy {f00=0x0170, f01=0x0190, f02=» P* P* P IFT MMUPAG=1 P IFF CHAN+IBM=0 . " P LD A2,DWTBA,A6 BUFFER ADDRESS F P LD A1,DWT:BF,A6 l , P RF(NZ) FD:007 BUFFER NOT IN SYSTEM AREA P LDR A3,A2 P RF(NN) FD:009 6 P AD A3,DWTRL,A6 CHECK IF 64K LIMIT WILL BE P
0x38abb4…38ad48 Dummy {f00=0x0170, f01=0x0190, f02=»/F0 P SRL A3,2 P SLL A1,2 P ORR A1,A3 0 2 P SC A1,DWT:PA,A6 6 BIT PHYSICAL BUFFER ADDRESS B ( P ADK A1,/4 CREATE ONE MORE MMU ENTRY x P SC A1,DWT:PA+2,A6 P ANKL A2,/FFF P LDR A1,A2 ( P ORK A1,1 INDICATE ADDRESS NOT ZER
0x38ad48…38aedc Dummy {f00=0x0170, f01=0x018e, f02=» LD A1,DWTOR,A6 P ANK A1,/3F ORDER P SUK A1,1 2 P RF(Z) FD:060 BASIC READ D P SUK A1,4 d P RF(Z) FD:015 BASIC WRITE v P SUK A1,12 P RF(Z) FD:060 PHYSICAL READ P SUK A1,4 P RF(Z) FD:013 PHYSICAL WRITE * P SUK
0x38aedc…38b070 Dummy {f00=0x0170, f01=0x0190, f02=» < P* WRITE DELETED DATA, PHYSICAL AND BASIC WRITE ORDERS ! P* ! D & P LDK A4,1 WRITE DELETED DATA ORDER ! N & PFD:013 EQU * PHYSICAL WRITE ORDER ! x P ADK A4,4 ! " PFD:015 EQU * BASIC WRITE ORDER ! P ADK A4,1 ! " P CF A5,BIO PREPARATION FOR C
0x38b070…38b204 Dummy {f00=0x0170, f01=0x0190, f02=» P XIF " P* " P IFT MMUPAG=1 " P IFF CHAN+IBM=0 " 0 4 P LD A1,DWT:LA,A6 GET FLAG/LOGICAL BUFFER ADDRESS " H ( P RF(Z) FD:019 BUFFER IN SYSTEM AREA " P LDR A7,A3 REQUESTED LENGTH " P LDR A8,A2 SAVE A2 " & P LDKL A4,BUF DRIVER BUFFER ADD
0x38b204…38b398 Dummy {f00=0x0170, f01=0x0190, f02=» FROM USER TO SYSTEM AREA " | & P TL -30,A15 RESTORE MMU FROM STACK # " P LDR A2,A8 RESTORE A2 # L 0 P CM BUFFLG,A6 INDICATE BUFFER IN SYSTEM AREA # j PFD:019 EQU * # P XIF # P* # P IFT TOSS+IBM=2 # P LD A1,DWTFIB,A6 # P RF(Z) FD:018 NO
0x38b398…38b52c Dummy {f00=0x0170, f01=0x0190, f02=» # P XIF $ P* $ P EJECT DRFD01 $ P* $ 6 P* $ @ " P CF A5,FD:WRITE PERFORME WRITE $ J * P ANKL A3,/200 CHECK IF WRITE PROTECTED $ p P RF(Z) FD:020 $ P LDK A3,/40 INDICATE ERROR $ , P ORRS A3,A6 UPDATE TEMPORARY RETURN CODE $ PFD
0x38b52c…38b6c0 Dummy {f00=0x0170, f01=0x0190, f02=» $ ~ P* PHYSICAL READ * % P* * % " P***************** % < P* % V PFD:060 CF A5,BIO % ` P* % x P IFT MMUPAG=1 % P IFT CHAN=0 % P IFT TOSS+IBM=2 % P LD A1,DWTFIB,A6 % P RF(Z) FD:070 TOSS DISC % & P LDKL A4,BUF
0x38b6c0…38b854 (3, 350) Dummy {f00=0x0170, f01=0x0190, f02=»1 % P IFT CHAN=1 & P LD A1,DWT:LA,A6 & ( P RF(Z) FD:080 BUFFER IN SYSTEM AREA & 6 & P LDKL A4,BUF DRIVER BUFFER ADDRESS & b 0 P CM BUFFLG,A6 INDICATE BUFFER IN SYSTEM AREA & P XIF & P* & P IFT MMUPAG=1 & P IFT IBM=1 & P IFT TOSS+
0x38b854…38b9e8 Dummy {f00=0x0170, f01=0x0190, f02=» EQU * & P CF A5,FD:REA PERFORM READ ' P* ' 0 P IFT TOSS+IBM=2 ' : P LD A1,DWTFIB,A6 ' R P RF(Z) FD:090 NOT IBM ' j P XIF ' P* ' P IFT IBM=1 ' P IFT MMUPAG=0 ' ( P LD A4,DWTBA,A6 ASCII OUTPUT ADDRESS ' P XIF ' P* ' P
0x38b9e8…38bb7c Dummy {f00=0x0170, f01=0x0190, f02=»* ' P* ( P IFT MMUPAG=1 ( P IFT CHAN=0 ( * P IFT TOSS+IBM=2 ( > P LD A1,DWTFIB,A6 ( V P RF(Z) FD:100 TOSS DISC ( n P XIF ( P* ( P IFT MMUPAG=1 ( P IFF CHAN+IBM=0 ( 4 P LD A2,DWT:LA,A6 GET FLAG/LOGICAL BUFFER ADDRESS ( (
0x38bb7c…38bd10 Dummy {f00=0x0170, f01=0x0190, f02=»0,A15 SAVE RUNNING TASK MMU ( ( P TL DWT:PA,A6 LOAD PSEUDO MMU TABLE ) $ 2 P MVSU A7 MOVE BUFFER FROM SYSTEM TO USER AREA ) P & P TL -30,A15 RESTORE MMU FROM STACK ) P XIF ) PFD:100 EQU * ) P ABL FDMSIO ) P* ) P EJECT DRFD01 ) P*
0x38bd10…38bea4 Dummy {f00=0x0170, f01=0x0190, f02=»R CODE ) | P RF(Z) UNLOAD UNLOAD ORDER * P ADK A3,1 * 0 P RF(Z) LOAD00 LOAD ORDER * B P ADK A3,17 * b $ P RB(NZ) RQ:ERR ERROR IF NOT LOCK * t P* * PLOAD00 EQU * * P LDK A2,/14 LOCK * P CF A5,FD:REA * P ANK A3,1 * & P RF(NZ) LOA:80
0x38bea4…38c038 Dummy {f00=0x0170, f01=0x0190, f02=» P IFT IBM=1 + P LC A3,DWTOR+1,A6 GET ORDER + P SUK A3,/26 + : P RF(Z) LOA:65 LOCK ORDER + N P CF A5,VO:NAM + n " P CF A5,LD:RC CHECK RETURN CODE + P EJECT DRFD01 + P* + P* READ DATA SET LABEL + P* + P LD A2,ECBCW2,A8 SEC
0x38c038…38c1cc Dummy {f00=0x0170, f01=0x0190, f02=» P SLL A2,3 BIO , P LDK A3,80 LENGTH , P LDKL A4,BUF , 4 P CF A5,FD:REA , H P SLL A1,4 CHECK NO DATA BIT , ^ P RF(NN) LOA:60 NOT NO DATA , 0 P ORK A3,/10 INDICATE ILLEGAL DATA SET LABEL , PLOA:60 EQU * , P CF A5,LD:RC , P ENB ,
0x38c1cc…38c360 Dummy {f00=0x0170, f01=0x0190, f02=» CF A5,LOGSEC TRANSFORM TO LOGICAL SECTOR , P LDK A1,DWTBOE - 2 $ P CF A5,STDWT STORE BOE NO IN DWT - H P SUK A3,1 CRN - p P LDK A1,DWTCRN - P CF A5,STDWT - P ADK A4,EOE-BOE EOE ADDRESS - P CF A5,LOGSEC - P LDK A1,DWTEOE - $ P CF A5,S
0x38c360…38c4f4 (3, 351) Dummy {f00=0x0170, f01=0x0190, f02=» INHIBIT - b P LDK A1,DWTEOD . $ P CF A5,STDWT STORE EOD NO IN DWT . 2 P* . Z PLOA:65 EQU * . d P LDKL A3,/400 . x , P ORRS A3,A6 UPDATE TEMPORARY RETURN CODE . P* . PLOA:70 EQU * . P XIF . P LD A2,DWTA3,A6 . " P ORS A2,
0x38c4f4…38c688 Dummy {f00=0x0170, f01=0x0190, f02=»T ERROR . ~ , P SCR A1,A6 UPDATE TEMPORARY RETURN CODE / P XIF / @ P* / L P EJECT DRFD01 / V P* / n P* / x P IFF TOSS+IBM=0 / P* / P* ERROR , UNLOCK / P* / PLOA:90 EQU * / P LDR A5,A6 / P ADKL A5,DWTSB2 STACK BASE
0x38c688…38c81c Dummy {f00=0x0170, f01=0x0190, f02=» / P ANK A3,/17 FATAL ERROR 0 P RB(NZ) LOA:90 0 ( & P LDKL A4,BUF DRIVER BUFFER ADDRESS 0 > P RTN A5 0 h P XIF 0 x P* 0 P EJECT DRFD01 0 P* 0 P********** 0 P* * 0 P* UNLOAD * 0 P* * 0 P********** 0
0x38c81c…38c9b0 Dummy {f00=0x0170, f01=0x0190, f02=»7,0 SET CR (CHECK EOD) 0 P RF(Z) UNL:70 NOT OPEN 1 4 P ST A7,12,A8 STORE EOD-NO IN CONTROL WORD OF ECB 1 < P* 1 t , P* READ DATA SET LABEL TO DRIVER BUFFER 1 ~ P* 1 P CF A5,DSLIO PREPARE FOR I/O 1 & P CF A5,FD:REA READ DATA SET LABEL 1 $ P C
0x38c9b0…38cb44 Dummy {f00=0x0170, f01=0x0190, f02=»F A5,DSOPCH EOD-NO TO A7 1 P* 2 P* DIVIDE EOD BY 26 2 * P* 2 F P LDK A1,0 2 P PUNL:10 SUK A7,26 2 b P RF(N) UNL:20 2 z P ADK A1,1 2 P RB UNL:10 2 P* 2 P EJECT DRFD01 2 P* 2 P* 2 PUNL:20 ADK A7,27 2 P* 2
0x38cb44…38ccd8 Dummy {f00=0x0170, f01=0x0190, f02=» LDKL A4,BUF+EOD+4 ADDRESS TO POS 79 2 P SCR A3,A4 3 , P SUK A4,1 3 > P SRL A3,8 LEFT BYTE 3 P P SCR A3,A4 STORE IN BUFFER 3 l P LDR A7,A1 TRACK 3 ( P CF A5,BINDEC DEC EBCDIC-CODED IN A3 3 P SUK A4,3 3 P STR A3,A4 TRACK INTO BUF 3 F P I
0x38ccd8…38ce6c Dummy {f00=0x0170, f01=0x0190, f02=» PREPARE FOR I/O 3 P ORK A2,5 PHYSICAL WRITE 4 ( P CF A5,FD:WRITE WRITE DATA SET LEBEL 4 8 $ P CF A5,UNL:RC CHECK RETURN CODE 4 d P CF A5,DSOPCH 4 P CMR A2 INDICATE NOT OPEN 4 P* 4 P EJECT DRFD01 4 P* 4 P* UNLOCK 4 P* 4
0x38ce6c…38d000 Dummy {f00=0x0170, f01=0x0190, f02=» P C1 A2,DWTA3,A6 INDEX MASK 5 , P ANS A2,DWTLC,A6 INDICATE UNLOCK IN DWT 5 & P RB LOA:80 END:IO 5 V P* 5 p P IFT IBM=1 5 z P* 5 P* UNLOAD RETURN CODE CHECK 5 P* 5 PUNL:RC EQU * 5 P ANKL A3,/207 5 P RF(Z) RTN:A5 NO RETURN CO
0x38d000…38d194 (3, 352) Dummy {f00=0x0171, f01=0x0190, f02=»Z) RTN:A5 NOT OPEN 5 P LDK A3,/40 6 , P ORRS A3,A6 UPDATE TEMPORARY RETURN CODE 6 . PRTN:A5 EQU * 6 ^ P RTN A5 6 r P* 6 P EJECT DRFD01 6 P* 6 P* 6 ( PIBMDSK EQU * IBM DISK HANDLING ENTRY 6 P IFT IBM=1 6 . P CF A15,NVLCHK CHE
0x38d194…38d328 Dummy {f00=0x0171, f01=0x0190, f02=»CR (CHECK EOD) 6 " P RF(Z) FD:DIS NOT OPEN, ERROR 7 P LC A1,DWTOR+1,A6 ORDER CODE 7 < P SUK A1,49 7 ` P RF(Z) REWIND REWIND FILE 7 r * P LD A3,ECBRL,A8 CHECK REQUESTED LENGTH 7 P SUK A3,SECLEN 7 $ P ABL(NZ) INCLEN INCORRECT LENGTH 7 P ADK A1,
0x38d328…38d4bc Dummy {f00=0x0171, f01=0x0190, f02=» DRFD01 7 P* 8 P******************* 8 P* SEQUENTIAL READ * 8 8 P******************* 8 T P* 8 p . P ADK A2,DWTCRN-DWTEOD A2 = ADDRESS TO CRN 8 z P LDR* A3,A2 CRN 8 P ADK A3,1 CRN+1 8 ( P ST A3,ECBCW2,A8 STORE CRN+1 IN ECB 8 P
0x38d4bc…38d650 Dummy {f00=0x0171, f01=0x0190, f02=» CF A5,BIOSQ 8 2 P CF A5,FD:REA READ SECTOR POINTED AT BY CRN+1 9 P* 9 J P IFT MMUPAG=0 9 T ( P LD A4,ECBBA,A8 USER BUFFER ADDRESS 9 j P XIF 9 P* 9 P IFT IBM=1 9 P LDK A7,SECLEN 9 ( P CF A5,ASC:01 TRANSFORM TO ASCII DK1 9 P* 9
0x38d650…38d7e4 Dummy {f00=0x0171, f01=0x0190, f02=»DRESS 9 x P TL TTB:MT,A7 LOAD MMU TABLE : & P LDKL A1,BUF DRIVER BUFFER ADDRESS : 2 & P LD A2,DWTUEC,A6 USER ECB ADDRESS : ( P EL A2,ECBBA,A2 USER BUFFER ADDRESS : P LDK A7,SECLEN LENGTH : ( P MVSU A7 MOVE SECTOR TO USER BUFFER : , P TL -30,A15
0x38d7e4…38d978 Dummy {f00=0x0171, f01=0x0190, f02=»CRN : ~ P* ; P* END OF DATA ; P* ; . $ PSQR:10 LDKL A1,/1000 RETURN CODE ; 8 P RF END:IO ; ` P* ; r P EJECT DRFD01 ; | P* ; P******************* ; P* SEQUENTIAL WRITE * ; P******************* ; P* ; PSQWRIT EQU *
0x38d978…38db0c Dummy {f00=0x0171, f01=0x0190, f02=»CW2,A8 STORE EOD IN ECB C. W. ; P CWK A7,MAXIBM < & P RF(P) FD:DIS REQUEST ERROR < < P CWR* A7,A2 < ` P RF(G) ENDEOE END OF EXTENT < t P* < P IFT MMUPAG=1 < ( P TS -30,A15 SAVE RUNNING TASK'S MMU < " P LD A7,DWTTAB,A6 TTAB ADDRESS <
0x38db0c…38dca0 Dummy {f00=0x0171, f01=0x0190, f02=» DRIVER BUFFER ADDRESS < P LDK A7,SECLEN LENGTH = * P MVUS A7 MOVE SECTOR TO DRIVER BUFFER = < , P TL -30,A15 RESTORE MMU TABLE FROM STACK = j P XIF = P* = P IFT IBM=1 = P LDK A4,5 BIO WRITE = P CF A5,BIOSQ = P LDK A7,SECLEN = 0 P
0x38dca0…38de34 (3, 353) Dummy {f00=0x0171, f01=0x0190, f02=»200 = P RF(Z) SQW:05 > P LDK A1,/40 WRITE PROTECTED > " , P ORRS A1,A6 UPDATE TEMPORARY RETURN CODE > F PSQW:05 EQU * > v P CF A5,DSOPCH > PSQW:10 EQU * > 2 P ANKL A3,/207 WRITE PROTECTED OR NOT OPERABLE > P RF(NZ) END:RC > * P IMR A2
0x38de34…38dfc8 Dummy {f00=0x0171, f01=0x0190, f02=»FD:DIS EQU * > P ABL DISIOE REQUEST ERROR ? P* ? 6 P EJECT DRFD01 ? @ P* ? X P********** ? b P* REWIND * ? t P********** ? P* ? PREWIND EQU * ? P LDR A3,A2 SAVE EOD ADDRESS ? P LDK A1,DWTBOE ? P CF A5,DSPAD ? P LDR
0x38dfc8…38e15c Dummy {f00=0x0171, f01=0x018e, f02=» -1 ? | P LDK A1,0 RETURN CODE @ P RF END:IO @ * P XIF @ < P* @ H P EJECT DRFD01 @ R P* @ j P***************** @ t P* * @ P* PERFORM ORDER * @ P* * @ P***************** @ P* @ P* @
0x38e15c…38e2f0 Dummy {f00=0x0171, f01=0x0190, f02=» PFD:WRI EQU * A P IFT CHAN=0 A P LDKL A1,/C000 WORDS,WRITE A , P XIF A N P IFT CHAN=1 A Z " P LDK A1,0 INDICATOR WRITE MODE A n P XIF A P RF FD:800 A P* A PFD:REA EQU * A P IFT CHAN=1 A P LDK A1,1 READ MODE A P XIF A
0x38e2f0…38e484 Dummy {f00=0x0171, f01=0x0190, f02=»RDS A v P* B P EJECT DRFD01 B P* B . P* B 8 P IFT MMUPAG=1 B B 2 P LD A7,BUFFLG,A6 CHECK WHAT BUFFER TO READ TO B X ( P RF(Z) FD:810 BUFFER IN SYSTEM AREA B 0 P LD A7,DWT:BF,A6 BITS 0-1 IN 18-BIT ADDRESS B P ECR A7,A7 B P ORR A1,
0x38e484…38e618 Dummy {f00=0x0171, f01=0x0190, f02=»4,MUXADR+1 SECOND WER B P XIF C P IFT CHAN=1 C * P* C > P EJECT DRFD01 C H P* C ` . P* PUT BUFFER START AND END ADDRESS IN DWT C j P* C " P ST A1,DWTRW,A6 INDICATE MODE C P ST A4,DWTUB,A6 C P ADR A3,A4 C " P ST A3,DWTUBE,A6 E
0x38e618…38e7ac Dummy {f00=0x0171, f01=0x0190, f02=» C h 0 PFD:CIO EQU * LABEL USED FOR CHANGE OF CUADR D P CIO A2,1,CUADR CIO START D < ( P RF(3) END:30 DEVICE ADDRESS UNKNOWN D ^ P RF T:DISP D P* D P EJECT DRFD01 D P* D * P************************************* D P* D < P* FDMSI
0x38e7ac…38e940 Dummy {f00=0x0171, f01=0x0190, f02=»*** D n P* E PFDMSIO EQU * E & P IM DWTCW2,A6 UPDATE SECTOR NUMBER E * P LDR* A1,A6 RETURN CODE E T & P ANK A1,/7F GET ERROR RETURN CODE E t P RF(NZ) END:RC E 0 P LD A2,DWTSIO,A6 GET NUMBER OF SECTORS DONE E $ P ADS A2,DWTCW2,A6 UPDATE DWTCW2
0x38e940…38ead4 (3, 354) Dummy {f00=0x0171, f01=0x018e, f02=»FT MMUPAG=1 E & P LD A4,DWTBA,A6 GET BUFFER POINTER F $ P ADR A2,A4 UPDATE BUFFER POINTER F > P ST A2,DWTBA,A6 F f & P RF(N) FDMSI1 NOT PASSED 64K LIMIT F ~ P ADK A4,0 F ( P RF(NN) FDMSI1 NOT PASSED 64K LIMIT F P LDK A2,/10 F & P ADS A2,DWT:BF
0x38ead4…38ec68 Dummy {f00=0x0171, f01=0x0190, f02=» P XIF G 2 P ABL FD:000 MORE SECTORS IN MULTIPLE SECTOR IO G P* G F P EJECT DRFD01 G P P* G h P********** G r P* * G P* END:IO * G P* * G P********** G P* G P IFT IBM=1 G $ PENDEOE EQU * END OF EXTENT EXIT
0x38ec68…38edfc Dummy {f00=0x0171, f01=0x0190, f02=»D:IO EQU * G P CF A15,TENDIO H PT:DISP ABL TDISP H ( P* H @ $ PEND:30 EQU * CU ADDRESS UNKNOWN H J P LDK A1,1 NOT OPERABLE H r * P ST A1,DWTST,A6 INDICATE RECOVERY DONE H P RB END:IO H P EJECT DRFD01 H P* H P******************** H
0x38edfc…38ef90 Dummy {f00=0x0171, f01=0x0190, f02=» * H P IFT CPU852=1 I & P CF A15,SAVE8 SAVE A1-A8 ON STACK I P XIF I J P* I V P IFT CPU852=0 I ` " P MSR 8,A15 SAVE A1-A8 ON STACK I v P XIF I P* I P LDKL A6,DWFD01 DWT ADDRESS I P CM DWTST,A6 I P IM DWTA2,A6 SET FDON FLAG I
0x38ef90…38f124 Dummy {f00=0x0171, f01=0x0190, f02=»,-TIME I " P ST* A4,DWTTP,A6 RESTART TIMER J P RB T:DISP J 4 PFDON10 LDK A4,DWTTP J F P ADR A4,A6 J b P LDR A1,A6 SAVE A6 J t P CF A15,SETIMP J P DATA FDON20,TIME J P* J PF:DISP EQU * J P RB T:DISP J P* J P* TIME OUT ROU
0x38f124…38f2b8 Dummy {f00=0x0171, f01=0x0190, f02=»ONVL EQU * ENTRY USED BY READY INTERRUPT ROUTINE J P IFT MMUPAG=1 K 8 P IFT CHAN=0 K N $ P CM BUFFLG,A6 RESET BUFFER FLAG K b P XIF K P* K P IFF TOSS+IBM=0 K 4 P IM DWTST2,A6 SET RECOVERY/READY INT. INDICATOR K P LDK A3,3 4 VOLUMES K
0x38f2b8…38f44c Dummy {f00=0x0171, f01=0x0190, f02=»LUME NAME K z & P LC A4,DIXTAB,A3 DRIVE INDEX MASK L P SC A4,DWTA3+1,A6 SAVE IT L < P CF A5,SETCIO L ^ P LDK A2,/14 L t P CF A5,FD:REA LOCK L P ANK A3,1 L P RF(Z) FDON19 OPERABLE L P LDK A1,6 NOT OPERABLE L $ P CF A15,VOLCLR CLEAR VOL
0x38f44c…38f5e0 Dummy {f00=0x0171, f01=0x0190, f02=»ND. BIT L v , P ANRS A2,A6 UPDATE TEMPORARY RETURN CODE M PFDON21 EQU * M @ P LDK A2,/C M T P CF A5,FD:REA UNLOCK M f P LDK A3,0 M , P LC A3,DWTOR,A6 GET INDEX FOR LAST VOL. M P SUK A3,1 M P RB(NN) FDONLD NEXT VOLUME M P CM DWTOR,A6 M
0x38f5e0…38f774 (3, 355) Dummy {f00=0x0171, f01=0x0190, f02=» P* N P EJECT N P* N : P* TERMINATE WAIT REQUEST FOR OPEN ORDER IF RUNNING N & P* N d " P LD A4,DWTTP2,A6 TIMER POINTER N n P RF(Z) FDON09 NOT RUNNING N P CMR A4 STOP TIMER N $ P CM DWTTP2,A6 INDICATE NO TIMER N PFDON09 EQU * N
0x38f774…38f908 Dummy {f00=0x0171, f01=0x018e, f02=» LDKL A2,/8000 OPEN/CLOSE BIT MASK N $ P ANR* A2,A4 A2:=OPEN/CLOSE FLAG O * P ORS A2,DWTOCF,A6 SAVE O R ( P XRRS A2,A4 SET STATUS WORD TO OPEN O p P LDR* A2,A4 O & P OTR A2,0,SOPDA SET DRIVE TO OPEN O P* O PFDON23 EQU * O P XIF O P* O
0x38f908…38fa9c Dummy {f00=0x0171, f01=0x0190, f02=» P ANR A1,A2 P P RF(Z) FDON30 NOT LOCKED P P ST A2,DWTA3,A6 SAVE P 6 P* P R P EJECT P P* P j P* PUT DRIVE NO IN CIO INSTR P t P* P P SRN A2,A3 DRIVE NO IN A3 P * P CF A5,SETCIO PUT DRVE NO IN CIO-INSTR P P LDK A2,/14 LOCK P
0x38fa9c…38fc30 Dummy {f00=0x0171, f01=0x0190, f02=» PFDON30 EQU * Q P SLL A2,1 Q P CWK A2,/0010 Q * P RB(NE) FDON25 Q @ P* Q V P IFT OPCLOS=1 Q ` P* Q v D P* RESTORE OPEN/CLOSE STATUS TO SAME VALUE AS BEFORE POWER OFF Q P* Q $ P LD A2,DWTOCF,A6 OPEN/CLOSE FLAG Q " P ORS A2,SPDLCI
0x38fc30…38fdc4 Dummy {f00=0x0171, f01=0x0190, f02=»OSED Q h P XIF R P* R P EJECT R " P* R 0 P* ANY REQUEST R : P* R P P CM DWTA2,A6 RESET FDON FLAG R Z PFDON60 EQU * R ~ P LD A8,DWTECB,A6 R 0 P ABL(Z) END:IO NO REQUEST, RETURN VIA TENDIO R P* R P* RETRY REQUEST R P* R
0x38fdc4…38ff58 Dummy {f00=0x0171, f01=0x0190, f02=»VE LENGTH R v P ANK A7,/3F ORDER S P ABL FDAD REACTIVATE S , P* S H P EJECT DRFD01 S R P* S j P******************** S t P* * S P* READY INTERRUPT * S P* * S P******************** S P* S
0x38ff58…3900ec Dummy {f00=0x0171, f01=0x0190, f02=» S z P* T P IFT TOSS+IBM=0 T P RB FDON60 T * P XIF T < P* T H P IFF TOSS+IBM=0 T R P CM DWTST,A6 SET UNIT BUSY T j P RB FDONVL READ VOLUME NAMES T P XIF T P* T P EJECT DRFD01 T P* T P********************* T P*
0x3900ec…390280 Dummy {f00=0x0171, f01=0x0190, f02=» * T $ P ST P,INTSAV SAVE LAST INTERRUPT U P IFT CPU852=1 U 2 * P CF A15,SAVE8 SAVE REGISTERS ON STACK U H P XIF U v P* U P IFT CPU852=0 U " P MSR 8,A15 SAVE A1-A8 ON STACK U P XIF U P* U P LDKL A6,DWFD01 DWT ADDRESS U P IFT C
0x390280…390414 (3, 356) Dummy {f00=0x0172, f01=0x0190, f02=»5 EQU * U P SST A3,CUADR GET STATUS V " P RF(A) IH:000 READY INTERRUPT V 0 P LD A3,PFPOST V V , P RF(NZ) IHDISP POST PROCESSING FLAG SET V l ( P LD A3,DWTRW,A6 READ/WRITE INDICATOR V P RF(NZ) IH050 READ V P* V P EJECT DRFD01 V P* V
0x390414…3905a8 Dummy {f00=0x0172, f01=0x0190, f02=»UPDATE BUFFER POINTER V P SUK A2,2 W P RB(P) IH010 W 0 P CIO A2,0,CUADR CIO HALT W D PIHDISP EQU * W d P ABL TDISP GOTO DISPATCHER W x P* W PIH050 EQU * W P INR A3,0,CUADR READ W P RB(NA) IH005 W " P STR A3,A1 ONE WORD TO BUFFER
0x3905a8…39073c Dummy {f00=0x0172, f01=0x0190, f02=»US W ~ P RB(NA) *-2 X PIH:000 EQU * X P INH X 2 P XIF X > P* X J P EJECT DRFD01 X T P* X l P* X v P IFT CHAN=0 X P SST A3,CUADR STATUS X P XIF X P LD A8,DWTECB,A6 ECB ADDRESS X " P LD A5,DWTA5,A6 STACK POINTER X P L
0x39073c…3908d0 Dummy {f00=0x0172, f01=0x0190, f02=»DWTRTY,A6 RESET RETRY FLAG X P LDR A1,A3 Y " & P ANK A1,5 DATA FAULT, NOT OPERABLE Y 4 P RF(Z) IH:10 RETURN CODE OK Y ^ P ORK A3,4 Y PIH:10 EQU * Y P* Y P EJECT DRFD01 Y P* Y & P* TRANSFORM RETURN CODE, CU - ECB Y P* Y P
0x3908d0…390a64 Dummy {f00=0x0172, f01=0x0190, f02=»O DATA Y | P RF(Z) IH:70 NOT NO DATA Z P ORK A3,4 SET BIT 13 ALSO Z . PIH:70 EQU * Z P P LDR A4,A1 Z d P ANKL A4,/0400 BIT 5 Z v P SLC A4,7 TO BIT 14 Z P ORR A3,A4 Z P* Z P IFT TOSS+IBM=0 Z P LDR A4,A1 Z P ANKL A4,/2000 BIT 2
0x390a64…390bf8 Dummy {f00=0x0172, f01=0x0190, f02=» Z ~ P ORR A3,A4 [ P ANK A1,/10 BIT 11 [ P SRC A1,5 TO BIT 0 [ 4 P ORR A3,A1 [ N , P ORRS A3,A6 UPDATE TEMPORARY RETURN CODE [ ` P ANKL A3,/F7FF [ PIH:80 EQU * [ P LDR A1,A3 [ P RTN A5 [ P* [ P EJECT DRFD01 [ P* [ 0 P
0x390bf8…390d8c Dummy {f00=0x0172, f01=0x0190, f02=» * [ p 0 P* * 0 P******************************************* H P* | P******* P* * P* BIO * P* * P******* P* P* INPUT: A8 ECB ADDRESS P*
0x390d8c…390f20 Dummy {f00=0x0172, f01=0x0190, f02=»NSFERED l " P* A4 BUFFER ADDRESS ] P* ] 6 PBIO EQU * ] @ & P LD A1,DWTCW2,A6 GET SECTOR NUMBER ] R ( P SLL A1,3 PUT IN RIGHT BIO POSITION ] | 6 P LD A2,DWTSIO,A6 GET NUMBER OF SECTORS IN THIS IO ] P SRC A2,2 ] P ORR A2,A1 COMPLETE
0x390f20…3910b4 (3, 357) Dummy {f00=0x0172, f01=0x0190, f02=» A5 ] P* ^ P EJECT DRFD01 ^ P* ^ , P* ^ 6 P***************** ^ @ P* * ^ Z P* BIOSQ * ^ t P* * ^ P***************** ^ P* ^ P* INPUT: A8 ECB ADDRESS ^ P* A4 ORDER ^
0x3910b4…391248 Dummy {f00=0x0172, f01=0x0190, f02=» A4 BUFFER ADDRESS ^ P* _ " PBIOSQ EQU * _ , P IFT IBM=1 _ @ & P LD A2,ECBCW2,A8 GET SECTOR NUMBER _ R ( P SLL A2,3 PUT IN RIGHT BIO POSITION _ | & P ADR A2,A4 COMPLETE BIO WITH ORDER _ P* _ P IFT MMUPAG=0 _ & P LD A4,ECBBA,A8 GET BU
0x391248…3913dc Dummy {f00=0x0172, f01=0x018e, f02=»* _ P IFT IBM=1 ` $ P LDK A3,SECLEN REQUESTED LENGTH ` P RTN A5 ` D P XIF ` T P* ` ` P EJECT DRFD01 ` j P* ` P****************** ` P* VO:NAM * ` P****************** ` P* ` P* ` PVO:NAM EQU * ` P IFT TOS
0x3913dc…391570 Dummy {f00=0x0172, f01=0x0190, f02=» P XIF a P* a P IFT TOSS=1 a P LDK A2,0 BIO a . P LDKL A4,BUF READ TO BUFFER a D P CF A5,FD:REA a h P ANK A3,/17 FATAL ERROR a ~ P RF(NZ) VOL:40 a P IFT IBM=1 a P LD A2,BUF+32 a P CWK A2,'TO' a P RF(NE) VOL:10 IBM DISC
0x391570…391704 Dummy {f00=0x0172, f01=0x0190, f02=»NS A1,DWTLAB,A6 INDICATE TOSS DISC a P XIF b * P* b 6 P EJECT DRFD01 b @ P* b X P* b b P IFT TOSS=1 b l P LDKL A2,BUF b P IFT IBM=1 b P RF VOL:20 b P XIF b P* b P IFT IBM=1 b PVOL:10 EQU * b P LDK A3,10 LENGTH b
0x391704…391898 Dummy {f00=0x0172, f01=0x0190, f02=» & P LD A1,DWTA3,A6 DRIVE NO BIT MASK c " P ORS A1,DWTLAB,A6 INDICATE IBM c . P LDKL A1,/400 c T , P ORRS A1,A6 UPDATE TEMPORARY RETURN CODE c j P LDK A7,10 NO OF CHARACTERS c 4 P CF A5,ASC:01 TRANSFER IBM VOL NAME TO ASCII DK1 c 0 P LDKL A2,BUF+4 STA
0x391898…391a2c Dummy {f00=0x0172, f01=0x0190, f02=» c P LDK A3,/F8 FILE CODE d P LD A1,DWTST2,A6 d & " P RF(NZ) VOL:30 NOT TEST STATUS d > * P ORKL A3,/8000 INDICATE NO NEW NVL SET d d PVOL:30 EQU * d . P CF A15,VOLGET VOLUME NAME TO DWT SET NVL d P LD A8,DWTECB,A6 d P LDK A3,0 d PVOL:40
0x391a2c…391bc0 Dummy {f00=0x0172, f01=0x0190, f02=» P********* e P* e : P* FUNCTION: ASCII TRANSFORMS A STRING FROM EBCDIC TO e P* ASCII CODE e ^ . P* INPUT STRING ADDRESS IS BUF e ~ & P* INPUT: A7 NO OF CHARACTERS e P* A4 = BUFFER ADDRESS e P* OUTPUT:
0x391bc0…391d54 (3, 358) Dummy {f00=0x0172, f01=0x0190, f02=» GET LOGICAL BUFFER ADDRESS DK1 e 0 P RF(NZ) ASC:01 BUFFER NOT IN SYSTEM AREA DK1 f ( * P LD A4,DWTBA,A6 GET BUFFER ADDRESS DK1 f P RF ASC:02 DK1 f PASC:01 EQU * DK1 f P IFT MMUPAG=1 f & P LDKL A4,BUF DRIVER BUFFER ADDRESS f P XIF f P
0x391d54…391ee8 Dummy {f00=0x0172, f01=0x018e, f02=»DIC CHARACTER f P ANK A1,/FF g ( P LC A1,TASCII,A1 TRANSFORM TO ASCII g * 0 P SCR A1,A4 PUT ASCII CHAR. IN OUTPUT BUFFER g V P SUK A7,1 g P RB(P) ASC:10 g P RF EBC:90 g P* g P EJECT DRFD01 g P* g P********** g P* EBCD
0x391ee8…39207c Dummy {f00=0x0172, f01=0x0190, f02=» 8 P* OUTPUT STRING IS PUT IN DRIVER BUFFER h P* h @ & P* INPUT: A7 NO OF CHARACTERS h J P* A4 = BUFFER ADDRESS h t P* h P* OUTPUT: A1 CHANGED h P* A4 = BUFFER ADDRESS h P* A7 CHANGED h PEB
0x39207c…392210 Dummy {f00=0x0172, f01=0x0190, f02=»BA,A6 GET BUFFER ADDRESS DK1 h P RF EBC:02 DK1 i $ PEBC:01 EQU * DK1 i < P IFT MMUPAG=1 i V & P LDKL A4,BUF DRIVER BUFFER ADDRESS i l P XIF i P* i PEBC:02 EQU * DK1 i P IFT IBM=1 i P ENB DK1 i P ADR A4,A7 i PEBC:10 EQU *
0x392210…3923a4 Dummy {f00=0x0172, f01=0x0190, f02=»1,A4 PUT EBCDIC IN OUTPUT BUFFER DK1 i P SUK A7,1 j , P RB(P) EBC:10 j > ( P* LDKL A4,BUF DRIVER BUFFER ADDRESS j T PEBC:90 EQU * j P INH INHIBIT INTERRUPTS j P RTN A5 j P* j P EJECT DRFD01 j P* j P********** j P* LOGS
0x3923a4…392538 Dummy {f00=0x0172, f01=0x0190, f02=»R (BINARY). j t < P* FORMAT OF PHYS. SEC. TT0SS (EBCDIC CODE) k * P* TT = TRACK, SS=SECTOR k T P* k , P* INPUT: A4 ADDRESS TO PHYS. SECTOR k P* k & P* OUTPUT: A3 BINARY SECTOR NO k . P* A4 ADDRESS
0x392538…3926cc Dummy {f00=0x0172, f01=0x018e, f02=»TIPLY BY 26 k P* l P SLL A3,5 *32 l P LDR A2,A1 l 4 P SLL A2,2 l F P SUR A3,A2 *28 l X P SLL A1,1 l n P SUR A3,A1 *26 l P CF A5,DECBIN l P SUK A1,1 l P ADR A3,A1 l P* l P EJECT DRFD01 l P* l P* CHECK SEC
0x3926cc…392860 Dummy {f00=0x0172, f01=0x0190, f02=» P SUKL A1,1898 m P RF LOG:04 m P* m , " P* CHECK EOD LESS/EQUAL 74001 m 6 P* m PLOG:02 SUKL A1,1899 m f PLOG:04 EQU * m " P RF(P) LOG:10 NOT ACC SEC. NO m " P SUK A4,4 RESET BUFFER POINTER m P RTN A5 m P* m P* FATAL ERR
0x392860…3929f4 (3, 359) Dummy {f00=0x0172, f01=0x0190, f02=»N CODE m n P INH INHIBIT INTERRUPTS n P ABL LOA:90 ERROR ROUTINE n . P* n P P EJECT DRFD01 n Z P* n r P********** n | P* DECBIN* n P********** n P* n > P* FUNCTION: DECBIN TRANSFORMS TWO EBCDIC CODED DIGITS TO n D P*
0x3929f4…392b88 Dummy {f00=0x0172, f01=0x0190, f02=» P* WORKING REG: A2,A7 o P* o $ PDECBIN LDK A1,0 o . P LDK A7,2 o F PDEC:10 LCR A2,A4 DIGIT o X P ANK A2,/FF o v P SUK A2,/F0 o P RB(N) LOG:05 o P SUK A2,9 o P RB(P) LOG:05 NOT DIGIT o P ADK A2,9 o P SUK A7,1 o
0x392b88…392d1c Dummy {f00=0x0172, f01=0x018e, f02=»TIPLY BY 10 o P RB DEC:20 p PDEC:30 ADR A1,A2 p & P RTN A5 p > P XIF p N P* p Z P EJECT DRFD01 p d P* p | P********** p P* SETCIO * p P********** p P* p 2 P* FUNCTION: PUT DRIVE NO IN CIO INSTRUCTION p P* p 8 P*
0x392d1c…392eb0 Dummy {f00=0x0172, f01=0x018e, f02=» PSETCIO LDKL A4,/FFCF q P ANS A4,FD:CIO q P SLL A3,4 q 6 P ORS A3,FD:CIO q H P RTN A5 q ^ P IFT IBM=1 q n P* q P EJECT DRFD01 q P* q P********** q P* BINDEC * q P********** q P* q : P* FUNCTION: BINDEC TRANSFO
0x392eb0…393044 Dummy {f00=0x0172, f01=0x0190, f02=» q . P* OUTPUT: A3 EBCDIC CODED DECIMAL DIGITS r P* A7 CHANGED r : P* r X PBINDEC LDK A3,0 r b PBIN:10 SUK A7,10 r z P RF(N) BIN:20 r P ADK A3,1 r P RB BIN:10 r PBIN:20 ADK A7,10 r P SLL A3,8 r * P ORR A3,A7 DECIMAL
0x393044…3931d8 Dummy {f00=0x0172, f01=0x0190, f02=»LIO * r P********* s P* s 4 P* FUNCTION: PREPARE FOR READING DATA SET LABEL s * P* s b P* INPUT: A6 DWT ADDRESS s l P* s : P* OUTPUT: A2 BITS 0-12 SECTOR NO, BITS 13-15 ZEROES s P* A3 128 s ( P* A4 DRIVER
0x3931d8…39336c Dummy {f00=0x0172, f01=0x0190, f02=»SPAD s P LDR* A2,A2 t P SLL A2,3 t P LDK A3,128 t 2 P LDKL A4,BUF t F P RTN A5 t Z P* t j P EJECT DRFD01 t t P* t P********** t P* DSOPCH * t P********** t P* t 6 P* FUNCTION: GET EOD-NO AND EOD-NO ADDRESS IN DWT
0x39336c…393500 Dummy {f00=0x0172, f01=0x0190, f02=» t h P* A1 CHANGED u PDSOPCH LDK A1,DWTEOD u & P CF A5,DSPAD u B P LDR* A7,A2 EOD-NO u V P RTN A5 u p P* u P EJECT DRFD01 u P* u P********* u P* DSPAD * u P********* u P* u 2 P* FUNCTION: GET ABSOLUTE AD
0x393500…393694 (3, 360) Dummy {f00=0x0173, f01=0x0190, f02=» A6 DWT ADDRESS u P* v " P* OUTPUT: A2 ADDRESS TO DATA v $ P* A6 DWT ADDRESS v J P* v l " PDSPAD LC A2,DWTOR,A6 DRIVE NO v v P ANK A2,/3 v P ADR A2,A2 v P ADR A2,A6 v P ADR A2,A1 v P RTN A5 v P* v P EJECT D
0x393694…393828 Dummy {f00=0x0173, f01=0x0190, f02=»ING OF v ` P* DRIVE NO w P* w , ( P* INPUT: A1 OFFSET TO DWT AREA w 6 . P* A3 WORD TO BE STORED IN DWT w b P* A6 DWT ADDRESS w P* w P* OUTPUT: A1 UNCHANGED w 0 P* A2 ADDRESS TO WORD IN
0x393828…3939bc Dummy {f00=0x0173, f01=0x0190, f02=»TR A3,A2 w P RTN A5 x P XIF x P* x , P EJECT DRFD01 x 6 P* x N " P* D R I V E R B U F F E R x X P* x ~ PBUF EQU * x P IFT IBM=1 x P RES DVBLEN x P XIF x P* x P IFT TOSS=1 x P IFT IBM=0 x " P DATA 0,0,0
0x3939bc…393b50 Dummy {f00=0x0173, f01=0x0190, f02=»MUPAG+CHAN=2 x P RES DVBLEN MMU BUFFER y P XIF y 2 P* y > P EJECT DRFD01 y H P* y ` P********************* y j P* * y P* DEVICE WORK TABLE * y P* * y P********************* y P* y
0x393b50…393ce4 Dummy {f00=0x0173, f01=0x0190, f02=» P DATA 0 ORDER z " P DATA FDADR ACTIVATION ADDRESS z P DATA 0 TTAB-ADDRESS z @ $ P DATA 0 WAIT/ACTIVATE INDICATOR z P DATA 0 TERMINAL QUEUE z P* z IFT MMUPAG=1 z & " DATA 0 SAVE AREA USER ECB ADDRESS z DATA DEVECB MMU ECB ADDRESS
0x393ce4…393e78 Dummy {f00=0x0173, f01=0x018e, f02=»0,0,0,0 STACK (3 LEVELS) z P DATA 0 ORDER SAVE AREA { P* { @ P EJECT DRFD01 { J P* { b P* { l P IFF TOSS+IBM=0 { v P DATA /8000 NVL INDICATOR 0 { P DATA /8000 NVL INDICATOR 1 { P DATA /8000 NVL INDICATOR 2 { P DATA /8000 NV
0x393e78…39400c Dummy {f00=0x0173, f01=0x0190, f02=» { j P DATA /FFFF,/FFFF,/FFFF | ( PDWTVO2 EQU *-DWFD01 VOLUME NAME NO 2 | ( P DATA /FFFF,/FFFF,/FFFF | T ( PDWTVO3 EQU *-DWFD01 VOLUME NAME NO 3 | t P DATA /FFFF,/FFFF,/FFFF | ( PDWTST2 EQU *-DWFD01 SAVE STATUS WORD | P DATA 0 | P XIF | P
0x39400c…3941a0 Dummy {f00=0x0173, f01=0x0190, f02=» | p P DATA 0 } P* } P EJECT DRFD01 } " P* } : P* } D P IFT IBM=1 } N , PDWTLAB EQU *-DWFD01 DISC LABEL INDICATOR } ` P DATA 0 } P XIF } P* } , PDWTLC EQU *-DWFD01 DRIVE LOCK INDICATOR } P DATA 0 } P* } P IFT OPC
0x3941a0…394334 (3, 361) Dummy {f00=0x0173, f01=0x0190, f02=» DATA 0 } P XIF ~ P* ~ P EJECT DRFD01 ~ & P* ~ > P* ~ H P IFT CHAN=1 ~ R 6 PDWTUB EQU *-DWFD01 POINTER AT NEXT WORD IN BUFFER ~ f P DATA 0 ~ , PDWTUBE EQU *-DWFD01 BUFFER END ADDRESS+2 ~ P DATA 0 ~ , PDWTRW EQU *-DWFD01 READ/
0x394334…3944c8 Dummy {f00=0x0173, f01=0x0190, f02=»0,0,0 ~ $ PDWTEOD EQU *-DWFD01 END OF DATA P DATA 0,0,0,0 6 & PDWTEOE EQU *-DWFD01 END OF EXTENT L P DATA 0,0,0,0 v * PDWTCRN EQU *-DWFD01 CURRENT RECORD NO P DATA 0,0,0,0 . PDWTDSS EQU *-DWFD01 DATA SET LABEL SECTOR P DATA
0x3944c8…39465c Dummy {f00=0x0173, f01=0x0190, f02=» ( PDWTRL EQU *-DWFD01 LENGTH IN SUB IO P DATA 0 0 & PDWTCW2 EQU *-DWFD01 SECTOR NUMBER @ P DATA 0 j . PDWTNOS EQU *-DWFD01 SECTOR NUMBER COUNTER z P DATA 0 4 PDWTSIO EQU *-DWFD01 NUMBER OF SECTORS IN SUB IO P DATA 0 P*
0x39465c…3947f0 Dummy {f00=0x0173, f01=0x0190, f02=» P* P IFT MMUPAG=1 PDWT:BF EQU *-DWFD01 ( $ P DATA 0 SAVE AREA BUFFER ADDRESS D PBUFFLG EQU *-DWFD01 l P DATA 0 P* P IFF CHAN+IBM=0 PDWT:PA EQU *-DWFD01 * P DATA 0 6 BIT PHYSICAL BUFFER ADDRESS P DAT
0x3947f0…394984 Dummy {f00=0x0173, f01=0x407e, f02=»FT MMUPAG=1 PDEVECB EQU * P DATA 0,0,0,0,0,0,0 ( P XIF D P* P P* Z P* d P END n@ z1 l P DATA 0 P* P IFF CHAN+IBM=0 PDWT:PA EQU *-DWFD01 * P DATA 0 6 BIT PHYSICAL BUFFER ADDRESS P DAT
0x394984…394b18 Dummy {f00=0x0173, f01=0x2008, f02=» END @
0x394b18…394cac Dummy {f00=0x0173, f01=0x0190, f02=» ! c % c { t * & c _ & !? 0 %% 8 | * & + ? !6 (DTdt_ * ? + ? | @ * & I ,< j ! ! 9 @iW Ai? P | n * & g ! : ? A W @ ! < A ? @ ? < ! | * & < A ? @ ? < ! < A ? @ ? < | * & ! < @ ?
0x394cac…394e40 Dummy {f00=0x0173, f01=0x0190, f02=» $ ? "r= ( 2 | * & 07 6 'h #Q !j } * & 9 , w j 1!w!Ii j 2! ! !j "" } N * & W j $" mHj -P !2 } | * & u _ &{ { )P !Ix 6 } * & * ? &{ { *P } * &
0x394e40…394fd4 (3, 362) Opaque[0x194]
0x394fd4…395168 # DirEnt {nam=»M:DEBF«, typ=»LM«, f00=0x0000, f01=0x0000, f02=0x2aa0, f03=0x0000}
0x394fd4…395168 IdxSect {
0x394fd4…395168 f00 = 0x0155 // 0x394fd4 @0x0
0x394fd4…395168 f01 = 0x0014 // 0x394fd6 @0x2
0x394fd4…395168 gno = [ // 0x394fd8 @0x4
0x394fd4…395168 [0x00]: C0x0155.0x0.0
0x394fd4…395168 [0x01]: C0x0155.0x1.0
0x394fd4…395168 [0x02]: C0x0155.0x2.0
0x394fd4…395168 [0x03]: C0x0155.0x3.0
0x394fd4…395168 [0x04]: C0x0159.0x2.0
0x394fd4…395168 [0x05]: C0x0159.0x3.0
0x394fd4…395168 [0x06]: C0x015a.0x0.0
0x394fd4…395168 [0x07]: C0x015a.0x1.0
0x394fd4…395168 [0x08]: C0x016c.0x2.0
0x394fd4…395168 [0x09]: C0x016c.0x3.0
0x394fd4…395168 ]
0x394fd4…395168 }
0x395168…3952fc Dummy {f00=0x0155, f01=0x0190, f02=»C NqJ L L L L L L L L L ' L L L L L L L L L L L L L' L L L L L L L L L L L L L L L L L L L L L L L L L L L L L L L R c @ T ^ z ^ r h V H 2 Z f9 z
0x3952fc…395490 Dummy {f00=0x0155, f01=0x0190, f02=» 4c : @Y/ pJ @ d _ 2Z $"z y ?H T+ V y J t Dh i VR 1H W ] [ ? d % L X! "~ T &b Cn 1 d _ A H " , _ @, > > U # T @ P H ( ( P c P W6 A, $ V ( U P @ V L
0x395490…395624 Dummy {f00=0x0155, f01=0x0190, f02=» H A Q > ? A H A FQ 2_ A F < Q @ P @ Q @ Z Y _ 8 , Q Z P 0 9 _ z $ _, ? _ P H H ? ? ? ? ? ^ A _ _ ^ , $P T I R $ 5 % > ? W ? W ? T
0x395624…3957b8 Dummy {f00=0x0155, f01=0x0190, f02=» @+ T R 0 A+ 1 Q Q > > 0 @+ 1 A+ P P > " ? * X R Y P _ ? @ 8 R Y P _ W0 8 X W( ? ` @ @ P $ H W W > > > > > > @ DV ? D > _ > ? _ > > ? ^ ! Y ^ _ R ? JA. ~
0x3957b8…39594c Dummy {f00=0x0155, f01=0x0190, f02=» " P PR 4 5 T P ? X U X - > PZ PF P P 0 X T Y Wn U U T X^ T E , Y Tx 8RtWP 4 U P> $P4> R0> 8' T Y X ' T P X P " > , Z X "X 8' T 8Z" X ' X
0x39594c…395ae0 Dummy {f00=0x0155, f01=0x0190, f02=» >B @ P A - T 8TV 9WD B 7P P , A+ W A+ @+ A.W ? A HI.9 X R C C J , ?A @+ A. X V 9_: v @ ~ 8 x N B < U P
0x395ae0…395c74 (3, 363) Dummy {f00=0x0155, f01=0x0190, f02=» P 0R Q W R ?U C ! _f Y (P Y ) _ ^ _ ! x P: B L # +P Y , ! U _ X T _ W ! Y ! X X ! X P R ?]* U C _. _: ! ! " $ P X , X ]T ! Y h Y _p ? X R X X
0x395c74…395e08 Dummy {f00=0x0155, f01=0x0190, f02=» Y , Y B 9a C , 8 J P: 8 B W0 B W B W B @ T 8 T Y Y Y Y , Y . ! ~ X ._B B 1 4 X X X X ' 4 B U B $" 4 C 4 J * ~ _^ L x B U P
0x395e08…395f9c Dummy {f00=0x0155, f01=0x0190, f02=» P D T 1 WP B B PD P , V - 0 P A F# +T W Q P P 1 ! X T V C B Q 1 J , Y @ r t @ B X _" ? X Z,W A H ?I X ' { B C X 4
0x395f9c…396130 Dummy {f00=0x0155, f01=0x0190, f02=» Y , Y B 9a C 8 J P: 8 B W0 B W B W B @ T 8 T Y Y Y Y Y . ! ~ X ._B B 1 4 X X X X ' 4 B U B $" 4 C 4 J * ~ _^ L 2 R x 0 R R 0 R " 0 0
0x396130…3962c4 Dummy {f00=0x0155, f01=0x0190, f02=» 0P P > T C T" V$ Y Pp q 0 ) Wb X P^ T& B RPP" A $ @ d A t p WF @W( T$ P X T X P 4 Y C C 8W T 8P Y ^ 5 ) P U , XT !
0x3962c4…396458 Dummy {f00=0x0155, f01=0x0190, f02=» C W4 O " # X Y ) C C x # P Y '? Y Y T # P W d Y P R R P T ( P (@ $(@ " 2 @ _ > X $? P $ > > F C F C
0x396458…3965ec Dummy {f00=0x0155, f01=0x0190, f02=» 0$ T # R QL > X B U( H Q2 X D B $ T C x > C $ ) _ X 9BV X & J , X D C > X H UJ H B P PL $ # Q > P _0 # T p > P p (_H
0x3965ec…396780 Dummy {f00=0x0155, f01=0x0190, f02=» > J X D D P ( ) 1_f _& ?(@ X P 0P X T 4 Y X 1 1 X P - M T $ PJ _ T " # p X L R P P P (@ : ^ X P8 P0 # P T P 0P 1 _ W
0x396780…396914 (3, 364) Dummy {f00=0x0155, f01=0x0190, f02=» d @ 1 A _ P 9 > > T R L U R9C _ T M D W. D D " @ @ - U _ 9B @ T u X > & -n, - , (- : :B : : ; 9 9 & r=: 0 A V U A P @ , A x A r @ ~ A !h A ~ @ A !<
0x396914…396aa8 Dummy {f00=0x0155, f01=0x0190, f02=» R $ ( , 0 4 8 < 2 _ S A
0x396aa8…396c3c Dummy {f00=0x0155, f01=0x0190, f02=»P UW B @ = / 0 M Q n R h S Z T Y ( G P H L V " I ^ U t _v A P_ NO! A A A A A A A A *T A _ P A A V . r , + - ; : X " H W X
0x396c3c…396dd0 Dummy {f00=0x0155, f01=0x0190, f02=» T " ( ^ @ P A A " @ n tT @ XW @ A X W W 0 n _, W W V PP @ & 0 n T A P P _b _J A $ tT @ X W @ T @ W @ @
0x396dd0…396f64 Dummy {f00=0x0155, f01=0x0190, f02=» 0 n W t A W @ A n P 3P C @ P @ @ P @ Q A t @ A " T @ W @ A z " A tP P @ _2 P tT z 0 P P _ @ t v @ @ @ P
0x396f64…3970f8 Dummy {f00=0x0155, f01=0x0190, f02=» ` H A @ v @ @ T A A P@ @ PB t @ ! T A @ A # A t l RE FRN GME RMN S W R, ( T ( W P T $ ; V ; W~&~ P &`P 6 P @ $ P $W $ TR
0x3970f8…39728c Dummy {f00=0x0155, f01=0x0190, f02=» v A p A r pW ^ P _ " ^ T @ 9J A T _ 1@ _ ^ 9 V >! D A A > > > > > > > > ^ _ ^ _ ? ? ? ? ? A ^ @ ? ? X > > > > > > > @ V >
0x39728c…397420 Dummy {f00=0x0155, f01=0x0190, f02=» A " A " 0R$ 9U AR FQ 0:D A " _* A " " A L A N n T A N A L " R _U . " A : A " A A $ T ! " A @ T 0W 0W A @ T 1W 1 @ "
0x397420…3975b4 (3, 365) Dummy {f00=0x0155, f01=0x0190, f02=» ! R :W" W W W ?W /W : A! W ! A! A PL ! _ @ _ I T " T A P I T$! A A A A A A A A A!F A @ A @ >
0x3975b4…397748 Dummy {f00=0x0155, f01=0x0190, f02=» " , 9 !&(! T 9 !( X $ Y + & X Y $ 9 X !P T4 A+ W A+ @+ A. R t"J , Y R WF L! Y X N Y !) X P. P P& P R P # X %* , , , B X ; Z Y B X T < Z0:A Z:
0x397748…3978dc Dummy {f00=0x0155, f01=0x0190, f02=» X !? PZ P PR P !( X P ) _ X x ^ Y X P !) !&( P @ 9W@ !( X P ) Y !&, X P X !( X P X ) _ X p ^ &L P P !&,# T X Pt X &Pf !( !$ B Rh Qd :C P ) !&,9DV + !$ (@ B | !)
0x3978dc…397a70 Dummy {f00=0x0155, f01=0x0190, f02=»% (@ !) R _ !) *B 1 ;h 1 !) 1 !) * !&( !% !) ) !&,# X Y P_ P P !) P @ 9 4 , & !) P X 1P B " +PV T ( C Q V8 !(v !&, !( _ X ) X H p ^ t !) WX W l !) C QR (Q _
0x397a70…397c04 Dummy {f00=0x0155, f01=0x0190, f02=» Z Y V Y X Y H @ TLB SLWF Y 8! T6 X Y X C X U X Y R V Y " W 8 J , Y _ ? * Y Y X LP y L_* L t& _: Y L " Y F Y L! Y !) !&,# P + W !( 9 !&, X ^< Y Y F Y X RP 1 Y R +
0x397c04…397d98 Dummy {f00=0x0155, f01=0x0190, f02=» X " Y _ A H ? * (@ X V X X K P0 @ T X ZT $C Y B , K & % Y B K X H :AZl X JP Y J ! P + 7P, $ P + < $ <C ! 9 9 4 X 9C X : X X 4 B :C ) 4 $ ) !&,# T` @* TOT @* SST X Y
0x397d98…397f2c Dummy {f00=0x0155, f01=0x0190, f02=» D9f ]) Y ) 4 !)x ;E :B 9A !)x U *BP jW kQ 4 9 $ 0" Z Y P Z _ 4 A&F;D A&F 4 R _ ;H 4 | !) (:C ) 4 d !) ( 4 X " 4 !) ) 4 9 !&, X ^< Y Y Y X P 1 Y
0x397f2c…3980c0 Dummy {f00=0x0155, f01=0x0190, f02=» X " Y _ A H ? (@ X X K P @ T X T $C Y B K & % Y B K ! +
0x3980c0…398254 (3, 366) Dummy {f00=0x0159, f01=0x0190, f02=» ^ WB X Y $:g H & I &! P& X , , P ,P 9A _ H &P I & > , P Y , X"; [&;! P &Z.?AZ2 @, Q & X " $XJ ( I T E _ (X _ X $ _t< > > @, A, DW W J ^ ! Z2 , (X: @, P T
0x398254…3983e8 Dummy {f00=0x0159, f01=0x0190, f02=»Pj T P` , <UR "R4 PB X R< X T6 X T0. T G Y6 G _` P ,P - _ ? 8! W0" P T 8! P< P8 - Y Y Y Y , X X Y X X X X ' 4 B U B (" W C (@ > Y
0x3983e8…39857c Dummy {f00=0x0159, f01=0x0190, f02=» R -P 0 X , ) Y . 0 X P Y P C WT X " PP:A: R Q W Y <D X ? ?: T p > 1 > Pb P C 0 B 0 T B % X . $ 4 T % 0 X ,T !.&W 2 Y . V 1 !. B P X " _Z B P$ $$ R %
0x39857c…398710 Dummy {f00=0x0159, f01=0x0190, f02=»1 !. B Z Z& X . 0T N W X ,P Y . 0 %_. % Y . W _p P 1 _ C !. , " 1| QPR X R(;GV$ .@ 1J P8 X R2;GV. X " /8 X , $4 P 2 X .T * W Y , - , ? X :a Z T T W P X :d Y > > |
0x398710…3988a4 Dummy {f00=0x0159, f01=0x0190, f02=»_v B 1 > NT 0 _ 2 3 4 3 PB P8 , B P B L # +P !. !. T !. Y & !. W !. !. W !. Y Y 3P .f U P" T Y &_. P4 R( Pj O]> V _F T Y Y & V Y _^ C _P .f .f" $ P X & X
0x3988a4…398a38 Dummy {f00=0x0159, f01=0x0190, f02=»T _ U D ! T _ C > X Z^<BR P f .@ X _x R0 V0 ! P* P P P" R ?Q !. Y R Q 3@ . -_ ? _ X # !. ^ Y _( ? X Z !. P0 P X _ X " 2 !. !. X & 3 36 4f8`6 6 7 6T
0x398a38…398bcc Dummy {f00=0x0159, f01=0x0190, f02=»_. B 1 7 !. 6 B B U4 $ ! T _ U D ! T _ $$ X" X& X* C .f 6, X`" E4`P( 8'0P E4`TD ! T 9 _ ! T @_ ! .f B P !7 B C 6, ^N P R ?] _ C _ .f .f" $ P X ' X
0x398bcc…398d60 Dummy {f00=0x0159, f01=0x0190, f02=». 1P X & C ,T Y & J , X Y & Y > X " X &" Y )Q Y > X Z2<BR > .@ ? Y !. T X !. Y & Zl 6r T _ !. X $ P !7^ 5> R V P P" !. 6 W 6z . X $ X !7^_ X $ X X & !8 !7 Y _8
0x398d60…398ef4 (3, 367) Dummy {f00=0x0159, f01=0x0190, f02=» Y !7 X $ X & !8 X * 5> 4 `R Y !. !. !. 4 !. V !. V W :h !. 4 X )" X '# R 4 6z > ABCDEFGHI[.<(+!&JKLMNOPQR]$*);^-/STUVWXYZ|,%_>? 1
0x398ef4…399088 Dummy {f00=0x0159, f01=0x0190, f02=»STUVWXYZ|,%_>?0123456789:#@'= 7- <=2&p ?' @O {[lP}M] Nk`Ka z^L~no| J Z_m j TOSS' "?:B ] P H U _ T U P U ;C ,$ T -_> - _H "RT PL X
0x399088…39921c Dummy {f00=0x0159, f01=0x0190, f02=» B $ 9H C ">h # P >_2 < U = D (@ " $ P B >H<h ;J P ?_" = > = > = =_D R _ 00 > & <h$ P > " 2 P* P P" P P P TX >< < , <> P V B B T P* & T$ L L R
0x39921c…3993b0 Dummy {f00=0x0159, f01=0x0190, f02=» _6 " " P2 @ Q, , Y ," P L P T L R :AV ' > _ k`Ka z^L~no| #A 1 < =< "?:B ] P H U _ T U P U ;C ,$ T -_> - _H "RT > A
0x3993b0…399544 Dummy {f00=0x0159, f01=0x0190, f02=» Y , ,P :A , A, >_2 < U = D (@ " $ P B >H<h ;J P ?_" = > = > = =_D R _ 00 > < < T M F < Px ' @ @ ! A A< B P< B P& 8! P6 K @P X T X !? ? ? W W
0x399544…3996d8 Dummy {f00=0x0159, f01=0x0190, f02=» P dW Y Y " V V T Y " Y $ B P(_t d(@ - $T 1 %_" Y (_ @< 0P $P X X $ $P, # ' P @T #?W #?$? > _2 J @" P Y 9 @ J ! T " Y X & $ ' Az! A B6 P C P* Az
0x3996d8…39986c Dummy {f00=0x0159, f01=0x0190, f02=» % Y Y V + V K V K : V K < V K A V % K C V & K D X P K @ X 9AV K 9 !? K > F B & G B R A B N ! N P N & N T _ - M @ F Pp G , _ W C ( B P U
0x39986c…399a00 Dummy {f00=0x0159, f01=0x0190, f02=»X 8 , Y $ : _ & <@(@ T X " C X B| V P B _ : C A @=F @=j =B A =< V )$ T B * Y $ : & $ Y : @ P0 8 T _ & & Y " 4 : : $ - Y : ~ C&C&CV
0x399a00…399b94 (3, 368) Dummy {f00=0x015a, f01=0x0190, f02=»Z[ ]~ * > ?;_: =!"#$%&/() @ABCDEFGHIJKLMNOPQRSTUVWXYZ[ ]^ c ($SWAP A A A A A. Q. UU @ @ ! P$>B @R AR @R E D P _ $ % $P _ % A >f A A A @ " Q" C :d
0x399b94…399d28 Dummy {f00=0x015a, f01=0x0190, f02=» F W CRP BAP COP A W F A @ : V, @ P R>;b=H : G( F G(W =J : R F P W W @ $ P @ R| W W U R" W W V V 8 !RRT W V X W W V V V PF A
0x399d28…399ebc Dummy {f00=0x015a, f01=0x0190, f02=» U Y R> G R8 Y P @ P @ T W - R8P _ T <B :L A W A A W R8 T F W V R> = V W Y( P Z& =
0x399ebc…39a050 Dummy {f00=0x015a, f01=0x0190, f02=»H ! P W @ V P _ @ ! P* Q 9h !RRP V V H W _> R> Q Q P V V PZ W @ @ ! T _ P :l 9b ) V _ @ V^ J J W AJ AJ W W
0x39a050…39a1e4 Dummy {f00=0x015a, f01=0x0190, f02=»L K J K L K J K L K@ J K@ J V 00P& L K L K: J K L K4 J _0 K@ J V 00P L K L K: J _ 0 !TTX W AI !CCT CC AK$ K _ 0 !;; L" J _ S AO AO Ov @ R @ ! T AO> AOR @C V V I
0x39a1e4…39a378 Dummy {f00=0x015a, f01=0x0190, f02=» nX T K : L I : R> K : 0 !TTT 0 !;;T : W W 0 !99Q P !00R P 00W 11 AKp P.=H_, !11R T$ 0 !LLP !RRP !AAP !SSP W W W 0 !;;T~ : 0 !00Rr !99U !AARf !ZZQ` 0 !;;TR : L* : L. : L2 : L6
0x39a378…39a50c Dummy {f00=0x015a, f01=0x0190, f02=» X C.9h! L L # " L L :A K : A T.I T P 1 I P < R P A _> R> : @ " P P D M2 AMh AMl AM AM W M AC AM AM AN AN AP AK AO| AO : 9e :e Q P 9e @C P AC 9C)
0x39a50c…39a6a0 Dummy {f00=0x015a, f01=0x0190, f02=» AC <C, D L " @C $ P " :B AC t w B J " r R,Q$ @ ( = @C Q @C "| _@ _$ : AN AN AN AN Nv AP AK AO| AO : h:B* AC @C P AC B J 4R 4 :B 4 @C : V V 49B @C 4R @ t w A I ! j
0x39a6a0…39a834 (3, 369) Dummy {f00=0x015a, f01=0x0190, f02=»_ I N T V S : R> O| O 9PJ S Y T@ $ 1T: C !CCTr : 1P P$_ P =H P ] @ T X W n : YX d C !CCTx xB. LF <X B.9 HC Q N _ L _ !SSTF 0 UC P A X X W W X
0x39a834…39a9c8 Dummy {f00=0x015a, f01=0x0190, f02=» V W @ $ P p W RN T : AP| P _ 0V , - P X 9A_ : @ ! P (W ( :W> 2 W 0 . " A A A A AK 2 ; Z [ : : [ [ : `
0x39a9c8…39ab5c Dummy {f00=0x015a, f01=0x0190, f02=» Z A. c @ V W U R> R $ )_ : W W W W W U Q@ V V v x W V V v p R( W V W ^< _@ V _P V V : V J P S r U V U S
0x39ab5c…39acf0 Dummy {f00=0x015a, f01=0x0190, f02=» V W V R> ) : V <B W |P v v : $ S V |P v w v : V $ V l $ S V M : W V R RR > R W > <B V x V |P v 1 v W V z ` T"_f V : W
0x39acf0…39ae84 Dummy {f00=0x015a, f01=0x0190, f02=» R> P T R> E _J S E _T " D T E S E D E % : " R ;B S " R P( |P v v : V W 0 : V P 9a _ " ( ) 8 ( ) : " $ V P 9A _ 0 : W W W ?AP ^ 0 : W ; V
0x39ae84…39b018 Dummy {f00=0x015a, f01=0x0190, f02=» 0 R P P B _ , : V ) VB v : 4P: " D Vh , H H $ M v b - I Y0 : @ ` V b pP ` $ $ W V^ $ I H V ) P _ " = D 4 Q V _n Vh
0x39b018…39b1ac Dummy {f00=0x015a, f01=0x0190, f02=» A V V @ ! @ P P P P|_ _ @ 9N @ :b @ :b V W U6 T 9BW P P( P V W U " @ Q V P A. V P _b A 9n A :B A V
0x39b1ac…39b340 Dummy {f00=0x015a, f01=0x0190, f02=» j @ W A : A A , > l : U R S W n V pT : N V l W H V ]" . nT" T" W v S W n V ~P Zp W x TJ Z U TJ _v V d , V R> P _ N L % V d V f
0x39b340…39b4d4 (3, 370) Dummy {f00=0x016c, f01=0x0190, f02=» % : V V Rz 9k! P % _ V V W W r VB W V S v ) W b G S v ) - V S W f v ) G v ` " W p W ~ pP0 Y R V P Y V _ W ~ R V X4 Y V _ ` @ ` W
0x39b4d4…39b668 Dummy {f00=0x016c, f01=0x0190, f02=» R Xv _|W V T : S T" W x TJ V _ V P8 Vh I V S C C $ @ v D B I v W z ` pPl V^ H - V VB I T " R V. E R T E D E @ v H v E T U| #_v W | ;b W W t V
0x39b668…39b7fc Dummy {f00=0x016c, f01=0x0190, f02=» V. N : d 8" R _ ZY QY : @ V H W z W | CRP W ` ` H W d 2 ;A @ U R R> - @ - N !TTP R> N :H N TBT W W8 2 " T @ R> N =H N ] @ ) ] !TTXX !
0x39b7fc…39b990 Dummy {f00=0x016c, f01=0x0190, f02=» YV : v `?A @ W W :b / W W @ W D V. V W W ` " W p @ pP. " 4X 1 R Z0 _ W l a w ` :A W V d 4 W P
0x39b990…39bb24 Dummy {f00=0x016c, f01=0x0190, f02=»C o o P a8 W r o a8 W @ @ % o, V , P@ , - 4 ] 4 U Y 5 X * _6 : W @ ] @ P @ " P : V _ W W . !TTP R> nx @ T R> Y ] !TTX" A 9 A
0x39bb24…39bcb8 Dummy {f00=0x016c, f01=0x0190, f02=» b 3 S S V V W @ @ T R> : P S S _ : V CRP COP W @ 3 V 3 3 @ n n S @ V Pf n 9h !RRP @ ! T W* n @ S W @ U
0x39bcb8…39be4c Dummy {f00=0x016c, f01=0x0190, f02=»@ P 3 _ @ " P V 3 S 1 S 9J S ( 3 ( 9B @ @ T R> : W . !TTP R> nx W t N =H N W l V CRT N =H N n W p N =H N ] W | ( @ % 5 T W @ = V W = V
0x39be4c…39bfe0 Dummy {f00=0x016c, f01=0x0190, f02=» _2 V tP U R R> S ( V | S =J @ " S V l S W l V S V CRT V p S W p W W _ ] !TTT dn Q, : . !TTP R> V nx W t * n P n r
0x39bfe0…39c174 (3, 371) Dummy {f00=0x016c, f01=0x0190, f02=»Y@ V p _f V t Y ] !TTX @ @ T R> : W % @ P _ R @ WT R @ 0 W ` W W& T R> P _ V A V W nx W t n PT W f (
0x39c174…39c308 Dummy {f00=0x016c, f01=0x0190, f02=» T R> : ] !TTX !CCTr nx P, n V r 4 U R> $ $ _. n P, n V 4 U R> $ $ _. @ @ @ ! P V 8 8 8 3 . !CCP W nx P0 W f n W d n
0x39c308…39c49c Dummy {f00=0x016c, f01=0x0190, f02=» K T + Y@ _`R& @ @ @ % P V 4 4 4 _r @ @ T R> : W V F !SST l WJ !AAT l W> l V V 0 V P _ W $ q > R P >b W >b & 8P k2 k V C V W R 9 W D
0x39c49c…39c630 Dummy {f00=0x016c, f01=0x0190, f02=» ` T @ 1 Q a : @ % PD H I H T P( H U V U W < + + P j4 V : ` P: @ @ @ D (P W H $ I & % E , a : V Q R $ F !LLT # W ;I # ;b W ;a
0x39c630…39c7c4 Dummy {f00=0x016c, f01=0x0190, f02=»+ T A+ V W Y0 Z6 + @+ T A+ V >A 8T 9 0 1 8 $; # V ;c F !AAP # $ < $ : W | v z *T P _ / P *_ *T P$ _ .P _ / V z U Y$
0x39c7c4…39c958 Dummy {f00=0x016c, f01=0x0190, f02=» @+ @+ P V RN A+ (P ) @+ @ @ T R> : N =H N ] : N =H N ] : &=H F ] : F =H F ] : F =H F ] : P N =H N T nx ] _ : @ ! P (W ( : 00=H 00 P P _ _ : a
0x39c958…39caec Dummy {f00=0x016c, f01=0x0190, f02=» Qp 0q o o o o o ! 1 6 0 * * * * . KB p4C !AAP pr p p 84V Y p _ / P
0x39caec…39cc80 Dummy {f00=0x016c, f01=0x0190, f02=» 42 P q> + ( @ T R> : N =H N ] : N =H N ] : &=H F ] : F =H F ] : F =H F ] : P N =H N T nx ] _ : @ ! P (W ( : 00=H 00 P P _ _ : a
0x39cc80…39ce14 (3, 372) Opaque[0x194]
0x39ce14…39cfa8 # DirEnt {nam=»CTABSH«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2720, f03=0x0000}
0x39ce14…39cfa8 IdxSect {
0x39ce14…39cfa8 f00 = 0x0139 // 0x39ce14 @0x0
0x39ce14…39cfa8 f01 = 0x0002 // 0x39ce16 @0x2
0x39ce14…39cfa8 gno = [ // 0x39ce18 @0x4
0x39ce14…39cfa8 [0x00]: C0x0139.0x0.0
0x39ce14…39cfa8 ]
0x39ce14…39cfa8 }
0x39cfa8…39d13c Dummy {f00=0x0139, f01=0x0190, f02=» P IDENT CTABSH 79-08-31/LEKO ENTRY CTAB01 ( 0 PCTAB01 DATA FUNC,FUNC,UNSC,SHIFT,SHIFT,SHIFT > > PFUNC DATA /8C81,/0083,/8488,/8687,/8A89,/8E8D,/9D8B,/858F r : P DATA /3031,/3233,/3435,/3637,/3839,/9A9B,/9C90,/0091 : P DATA /9293,/9496,/989
0x39d13c…39d2d0 Dummy {f00=0x0139, f01=0x0190, f02=»/3839,/8F91,/8580,/8A90 r : P DATA /4041,/4243,/4445,/4647,/4849,/4A4B,/4C4D,/4E4F : P DATA /5051,/5253,/5455,/5657,/5859,/5A5B,/5C5D,/7E00 ^ > PSHIFT DATA /2000,/0000,/0000,/002A,/8B3E,/003F,/3B5F,/3A00 : P DATA /3D21,/2223,/2425,/262F,/2829,/8F91,
0x39d2d0…39d464 Dummy {f00=0x0139, f01=0x4018, f02=» Z END @ r : P DATA /4041,/4243,/4445,/4647,/4849,/4A4B,/4C4D,/4E4F : P DATA /5051,/5253,/5455,/5657,/5859,/5A5B,/5C5D,/7E00 ^ > PSHIFT DATA /2000,/0000,/0000,/002A,/8B3E,/003F,/3B5F,/3A00 : P DATA /3D21,/2223,/2425,/262F,/2829,/8F91,
0x39d464…39d5f8 Dummy {f00=0x0139, f01=0x2008, f02=» END @ r : P DATA /4041,/4243,/4445,/4647,/4849,/4A4B,/4C4D,/4E4F : P DATA /5051,/5253,/5455,/5657,/5859,/5A5B,/5C5D,/5EFF ^ > PSHIFT DATA /20FF,/FFFF,/FFFF,/FF2A,/FFFF,/FF3F,/3B5F,/3AFF : P DATA /3D21,/2223,/2425,/262F,/2829,/FFFF,
0x39d5f8…39d78c Dummy {f00=0x0139, f01=0x0190, f02=» SCTNOP SCTPSZ SCTMMC 0 SCTLAC D SCTMMPL X SCTLAP0 l SCTNPE SCTSTB SCTOPT bBUG SCTBUG , (
0x39d78c…39d920 Dummy {f00=0x0139, f01=0x408a, f02=» SCTDCT ^ _ > T t@ SCTSTB SCTOPT bBUG SCTBUG , (
0x39d920…39e5c0 (4, 0) DirGranule ((4, 0)) {
0x39d920…39e5c0 DirEnt {nam=»TOOL «, typ=» «, f00=0x0000, f01=0x0000, f02=0x2730, f03=0x0000}
0x39d920…39e5c0 DirEnt {nam=»P1370 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2ca8, f03=0x0000}
0x39d920…39e5c0 DirEnt {nam=»TSUTL1«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2cd8, f03=0x0000}
0x39d920…39e5c0 DirEnt {nam=»CPDKMT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2ce8, f03=0x0000}
0x39d920…39e5c0 DirEnt {nam=»ASCEBC«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2d08, f03=0x0000}
0x39d920…39e5c0 DirEnt {nam=»ASMRUT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2d20, f03=0x0000}
0x39d920…39e5c0 DirEnt {nam=»LIST «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2de8, f03=0x0000}
0x39d920…39e5c0 }
0x39e5c0…39e754 (4, 1) Opaque[0x194]
0x39e754…39e8e8 # DirEnt {nam=»P1370 «, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2ca8, f03=0x0000}
0x39e754…39e8e8 IdxSect {
0x39e754…39e8e8 f00 = 0x0165 // 0x39e754 @0x0
0x39e754…39e8e8 f01 = 0x0004 // 0x39e756 @0x2
0x39e754…39e8e8 gno = [ // 0x39e758 @0x4
0x39e754…39e8e8 [0x00]: C0x0165.0x1.0
0x39e754…39e8e8 [0x01]: C0x0166.0x2.0
0x39e754…39e8e8 ]
0x39e754…39e8e8 }
0x39e8e8…39ea7c Dummy {f00=0x0165, f01=0x0190, f02=» " IDENT P1370 * 790220 C.EKERT P* * L P* THIS SUBROUTINE COPIES THE CONTENTS OF ONE ENTIRE DISK TO ANOTHER DIS 4 F P* THE RECEIVING DISK IS GIVEN A NEW VOLUMENAME WHICH IS PASSED AS * P* A PARAMETER IN THE CALLING SEQUENCE. P* 6 P*
0x39ea7c…39ec10 Dummy {f00=0x0165, f01=0x0190, f02=» > P* <OUFC> * BIN * FILECODE OF RECEIVING DISK ( DAUGHTER ) L P* <OUVLNM> * LIT * VOLUME NAME GIVEN TO THE RECEIVING DISK. ( DAUGHTER ) F P* * P* ROUTINE ADAPTED TO COPY A 5M DISK. P* P* P DDUM FORCEB PDIV ENT
0x39ec10…39eda4 Dummy {f00=0x0165, f01=0x018e, f02=»,$OUVLNM * % MOVE IOWK1,W0 * INIT. SECTOR COUNTER P13705 > CALL CHANFC,DKFILE,INFC L PERF DKIO,W0 l BNE P1370E CBNE IOWK1,W8,P1370A P COPY BUFFER,W2,W6,STRW06,W0 P1370A P SUB IOWK1,W8 CALL CHANFC
0x39eda4…39ef38 Dummy {f00=0x0165, f01=0x0190, f02=» P EJECT DKIO PROC X $ MOVE BINWK3,=X'828F' * DK-MASK & 0 + MOVE BINWK1,W0 * INIT. RECORD/BLOCK COUNT. N MOREIO MOVE BINWK2,=W'410' CBE X,W0,READ WRITE 8 P CALL IOREPL,DKFILE,X'85',BUFFER,BINWK1,BINWK2,IOWK1
0x39ef38…39f0cc Dummy {f00=0x0165, f01=0x4112, f02=»NWK2,IOWK1 f ANALYS XSTAT DKFILE,BINWK2 CALL MASK,BINWK2,BINWK3 < BNE ERROR ( # ADD IOWK1,W1 * INCR. SECTOR COUNT. n P ADD BINWK1,=W'410' P CBNE BINWK1,=W'3280',MOREIO ERROR RET PEND END
0x39f0cc…39f260 Dummy {f00=0x0165, f01=0x2008, f02=» K1 f ANALYS XSTAT DKFILE,BINWK2 CALL MASK,BINWK2,BINWK3 < BNE ERROR ( # ADD IOWK1,W1 * INCR. SECTOR COUNT. n P ADD BINWK1,=W'410' P CBNE BINWK1,=W'3280',MOREIO ERROR RET PEND END
0x39f260…39f3f4 (4, 2) Dummy {f00=0x0166, f01=0x0190, f02=» B " Y # , 6 Q d F J S:T JOBPTS GETDATAMODE NO.:ENTRYTYPE:999999FORMATSEARCHVERIFY CREATEELEMENTNAME: TPROGRAM:REL 10.0SIZE OF DEFINITION VALUE-SETS70 CONVERSION10 SUPERVISORY FUNCTIONS1 99
0x39f3f4…39f588 Dummy {f00=0x0166, f01=0x0190, f02=»
0x39f588…39f71c Dummy {f00=0x0166, f01=0x0190, f02=»A-ENTRY U h d ' . ) e e @ " f d f @ , ( f d T g T ( f ! ~ ! + * h dG 0 20 $ - - 30 - - 40 ! 50 % 60 & /
0x39f71c…39f8b0 Dummy {f00=0x0166, f01=0x0190, f02=» ! ' . 5 < D L T ] f p { ( < S k ! & A C g g ` | N G G4 & + P _ Eb G G ;d # + Eb G #0 0T ' Eb '
0x39f8b0…39fa44 Dummy {f00=0x0166, f01=0x0190, f02=» $ - G - - X " X $ ! P W2 X $ X " R W V R W V % _ " D $ D LF -j X $ X y & -R X x & Y " - G - !0P< <! T( T W$ < X ! P ?A W ?AW
0x39fa44…39fbd8 Dummy {f00=0x0166, f01=0x0190, f02=» & G ( : $ Y ( x P Y * Z x y Wv X " J X X . 8 ! -j X 0P X T 5 ! Y * Z y X V& X ( $ x C ( Y * X Y , $ X X C & C C ( B Ph9 R^9 X !@PP X
0x39fbd8…39fd6c Dummy {f00=0x0166, f01=0x0190, f02=» X X * $" ~_> @ Y X * _R X !@XX y X # x V y X X * $ P P 1 _ 1 Z X * ~ X X * $" X D % " X # X * $ y _< X # X * y $ X 1 1 X !@T X $ " P y _ x T X H X
0x39fd6c…39ff00 Dummy {f00=0x0166, f01=0x0190, f02=»Tf B 9 R 9 X ! T `_ y C Q " T $ $ X ! X X ! x Y~ Y _ X "@P B R y C B P 9 V `_F9 VV X ! T X !@X y C _d y C C X !? x P Q( B y " y $ c -T C _$ _ | y _6 x
0x39ff00…3a0094 (4, 3) Opaque[0x194]
0x3a0094…3a0228 # DirEnt {nam=»TSUTL1«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2cd8, f03=0x0000}
0x3a0094…3a0228 IdxSect {
0x3a0094…3a0228 f00 = 0x0166 // 0x3a0094 @0x0
0x3a0094…3a0228 f01 = 0x0004 // 0x3a0096 @0x2
0x3a0094…3a0228 gno = [ // 0x3a0098 @0x4
0x3a0094…3a0228 [0x00]: C0x0166.0x3.0
0x3a0094…3a0228 [0x01]: C0x0167.0x0.0
0x3a0094…3a0228 ]
0x3a0094…3a0228 }
0x3a0228…3a03bc Dummy {f00=0x0166, f01=0x0190, f02=» * P IDENT TSUTL1 80-07-04/HEJA CDD NYTT P 800225 C.EKERT 2 * L : 6* STANDARD 'CREDIT' INTERFACE TO TOSS UTLITY PACKAGE V * ENTRY TSUTL1 * * P EXTRN CRFILE P EXTRN DLFILE P EXTRN COPVOL
0x3a03bc…3a0550 Dummy {f00=0x0166, f01=0x0190, f02=» P DATA 'CRF',CRFILE P DATA 'DLF',DLFILE P DATA 'CDD',COPVOL 8 DATA /FFFF R * f * p EJECT z * * 2 .* CALL TSUTL1,'UTL',PBLOCK,BUF1,BUF2,RNCD * * PTSUTL1 EQU * P* 2 P* P
0x3a0550…3a06e4 Dummy {f00=0x0166, f01=0x0190, f02=» CC A8,0,A9 RF(NZ) NEXT LC A8,1,A7 0 CC A8,1,A9 D RF(NZ) NEXT X LC A8,2,A7 l CC A8,2,A9 RF(NZ) NEXT ( P LD A7,4,A7 * UTIL. ADDR. NOW IN A7 P* P* SET UP PARAMETERBLOCK P*
0x3a06e4…3a0878 Dummy {f00=0x0166, f01=0x0190, f02=»TILITYINDEX IN A7 " P* PARAMETERBLOCKADDRESS IN A8 P* CALL TOSS UTILITY @ P* P MS 14,SAVER * SAVE REGS. f ( P LDR A12,A8 * PAR.BLOCK ADDR. TO A12 P CFR A14,A7 * CALL UTIL. P* " P* RETURN CODE FROM UTIL IN A1 P*
0x3a0878…3a0a0c Dummy {f00=0x0166, f01=0x40d6, f02=» $ P ABL I:RT1 * RETURN TO 'CREDIT' PNEXT EQU * , P ADK A7,6 > P LDR* A8,A7 P P CWK A8,X'FFFF' d P RB(Z) RETURN | P RB LOOP1 PSAVER RES 14 * SAVE AREA. END @ " P* RETURN CODE FROM UTIL IN A1 P*
0x3a0a0c…3a0ba0 Dummy {f00=0x0166, f01=0x2008, f02=» I:RT1 * RETURN TO 'CREDIT' PNEXT EQU * , P ADK A7,6 > P LDR* A8,A7 P P CWK A8,X'FFFF' d P RB(Z) RETURN | P RB LOOP1 PSAVER RES 14 * SAVE AREA. END @ " P* RETURN CODE FROM UTIL IN A1 P*
0x3a0ba0…3a0d34 (4, 4) Dummy {f00=0x0167, f01=0x0190, f02=»W Y ( : X , Y X $ Y X &T Y Y Y WD V $:H D Y D :H Y ! P V Y G W Y ! P G&W V Y , V Y : G T : 2' " P T I W G* T : , : -j 5r , C -` X -r : "0P '
0x3a0d34…3a0ec8 Dummy {f00=0x0167, f01=0x0190, f02=» C 5 :( R : V E V D ' $ T ( W - P Eb X =' V W V Y =P - : 6 .4 6 .B 6 .Z . . . Z Z / 1 6 / . W 6 / . 5 4 6 / . 5 5 ' / G C 4 G
0x3a0ec8…3a105c Dummy {f00=0x0167, f01=0x0190, f02=» _6 G ( Eb G G V Eb 2 ;B P0 J T / ( D W4 _. / ( W G & F : ( Eb 2 & >A >A 2 $ G & V D 9a 9 V @ rW @ T W X R V 8
0x3a105c…3a11f0 Dummy {f00=0x0167, f01=0x0190, f02=» , V ( - 4T V 5 ( W, V P& W$ U V X 9T I Y Eb 2 ' >A >A 2 $ V L ;a ; R@ @ 8 ? X Q* ( V )<B ?H ( Eb 0 ( 6 G "
0x3a11f0…3a1384 Dummy {f00=0x0167, f01=0x0190, f02=» ( G ' Eb 6 ZR C 4 3 ZR 4 3 28 4 _ G &:K : 3 / 4 3 / ZR 4 3 / _ _. 3 / 4 3 C ( B B @ C ( ( B B C C ( C C
0x3a1384…3a1518 Dummy {f00=0x0167, f01=0x0190, f02=»6t 28 C _" W 5 4 3 / 4 _ 6 6 6d P G <H : 3 W 6 6d G &P B V C / <H : 6 6t C C W 6 C C J4 ' W 781"&$ 39#$;< '()*+,-! 6 6 6d G P _D 6 B G 'W 6 ( W G
0x3a1518…3a16ac Dummy {f00=0x0167, f01=0x0190, f02=»% P C + Y. Eb 5 I "%@P "% P& B C C 4 "5 # B P B P B 5 P C : 6 5r R 5 C 4 C B B P C 5 : V I C B : ( ' P 5 I : 6 6d % Y G8 C G & R V C G
0x3a16ac…3a1840 Dummy {f00=0x0167, f01=0x0190, f02=» _ G C : : 6 6t "! P ZR : G P C W $0 P C X : C "!@P ") # B C B % C : W 7 6 V :a 8v 7@ 5 ' ( 7 ( J V T P W - 7~ 4 6 K V K V V K V
0x3a1840…3a19d4 (4, 5) Opaque[0x194]
0x3a19d4…3a1b68 # DirEnt {nam=»CPDKMT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2ce8, f03=0x0000}
0x3a19d4…3a1b68 IdxSect {
0x3a19d4…3a1b68 f00 = 0x0167 // 0x3a19d4 @0x0
0x3a19d4…3a1b68 f01 = 0x0008 // 0x3a19d6 @0x2
0x3a19d4…3a1b68 gno = [ // 0x3a19d8 @0x4
0x3a19d4…3a1b68 [0x00]: C0x0167.0x1.0
0x3a19d4…3a1b68 [0x01]: C0x0167.0x2.0
0x3a19d4…3a1b68 [0x02]: C0x0167.0x3.0
0x3a19d4…3a1b68 [0x03]: C0x0168.0x0.0
0x3a19d4…3a1b68 ]
0x3a19d4…3a1b68 }
0x3a1b68…3a1cfc Dummy {f00=0x0167, f01=0x0190, f02=» " P IDENT CPDKMT * 790122 C.EKERT D ?*************************************************************** * * r D ?* COPY DISK TO 1/2 INC. MAG-TAPE ( & REVERSE) UTILITY. * | D ?* *
0x3a1cfc…3a1e90 Dummy {f00=0x0167, f01=0x0190, f02=»LITY. * ^ @ P* THE UTILITY HAS BEEN ADAPTED TO BE CALLED FROM A * @ P* 'CREDIT'-PROGRAM. TWO ENTRYPOINTS ARE PROVIDED, 'CDT' * V @ P* AND 'CTD'. THE 'CDT' ENTRY CAUSES A DISK TO BE SAVED ON * @ P* A MAGNETIC TAPE AND 'CTD' RESTORES THE D
0x3a1e90…3a2024 Dummy {f00=0x0167, f01=0x0190, f02=»CTOR BY SECTOR * f @ P* AND BLOCKED BEFORE TRANFERRED TO THE TAPE.. * @ P* * ^ @ P* NOTES: * @ P* IMMEDIATLY WHEN AN I/O-FAILURE
0x3a2024…3a21b8 Dummy {f00=0x0167, f01=0x0190, f02=»CH CONTAINS THE DEVICE * n @ P* DEPENDENT RETURNCODE FROM THE DRIVER. NO AUTOMATIC * " @ P* RECOVERY PROCEDURE IS INITIATED. * f @ P* * @ P* 'CREDIT' INTERFACE:
0x3a21b8…3a234c Dummy {f00=0x0167, f01=0x0190, f02=»RST,LAST,SLTH,BLKF,BUFF,RETC * v @ P* <CDT> : : ENTRY DISK TO TAPE COPY ROUTINE * . @ P* <DKFC> :BIN : DISK - FILE CODE. * r @ P* <MTFC> :BIN : MAG. TAPE FILE CODE. * @ P* <FRST> :BIN
0x3a234c…3a24e0 Dummy {f00=0x0167, f01=0x0190, f02=» : SECTOR LENGTH IN BYTES * @ P* <BLKF> :BIN : BLOCKING FACTOR (RECORDS/BLOCK) * 6 @ P* <BUFF> :STRG: I/O-BUFFER ADDRESS * z @ P* <RETC> :BIN : RETURN CODE. * @ P*
0x3a24e0…3a2674 (4, 6) Dummy {f00=0x0167, f01=0x018e, f02=» THE RETURNCODE CONTAINS THE RETURNCODE * @ P* FROM THE DRIVER AND THE 1:ST BYTE IN THE * > @ P* I/O-BUFFER CONTAINS A 'M' OR A 'D' * @ P* INDICATING THE FAILING UNIT. * @
0x3a2674…3a2808 Dummy {f00=0x0167, f01=0x0190, f02=» D ?*************************************************************** * L $ ENTRY CDT * COPY DISK TO TAPE V ( # ENTRY CTD * RESTORE DISK FROM TAPE ~ * * , ( EXTRN I:EVA0 * RETREIVE CALLING PARAMS. , ' EXTRN I:RT1 * RETURN TO '
0x3a2808…3a299c Dummy {f00=0x0167, f01=0x018e, f02=»CTOR TO 1/2 INC. TAPE. p * * TO TAPE INITIALIZATIONS. ( * L , ' LDK A7,X'91' * ORDERCODE PHYSICAL READ V SC A7,DKORDR * & LDK A7,X'85' * ORDERCODE 'WRITE TAPE' SC A7,MTORDR LDKL A7,MTIOLB ST A7,SWTCH2
0x3a299c…3a2b30 Dummy {f00=0x0167, f01=0x0190, f02=» " LDKL A7,X'AA61' * WTM - MASK ST A7,MTMSK1 . * D * & LDK A7,X'A2' * ORDERCODE WRT TAPEMARK N P SC A7,MTHEAD | RF TPMRK * * EJECT * * CTD EQU * * 4 0* RESTORE DISK FR
0x3a2b30…3a2cc4 Dummy {f00=0x0167, f01=0x0190, f02=» WRITE DISK n SC A7,DKORDR * * * % LDK A7,X'82' * ORDERCODE 'READ TAPE' 4 SC A7,MTORDR b * x P LDKL A7,RETURN ST A7,SWTCH2 * LDKL A7,MTIO ST A7,SWTCH1 * ( # LDKL A7,X'B87F' * MASK
0x3a2cc4…3a2e58 Dummy {f00=0x0167, f01=0x0190, f02=»X'82' * ORDERCODE 'READ TAPE' P SC A7,MTHEAD & * < * F EJECT P * ^ * h & "* WRITE / BYPASS 1:ST TAPE MARK. r * TPMRK EQU * , P CF A14,I:EVA0 * RETREIVE DISK FILE CODE P LDR* A7,A9 P ST A7,DKE
0x3a2e58…3a2fec Dummy {f00=0x0167, f01=0x0190, f02=» NO. j P LDR* A7,A9 ( P ST A7,DKECBC * SAVE IN CONTROL WORD . P CF A14,I:EVA0 * RETREIVE LAST SECTOR NO. L P LDR* A7,A9 ~ * P ST A7,DKSECN * SAVE IN LOOP CONTROL. , P CF A14,I:EVA0 * RETREIVE SECTOR LENGTH P LDR* A7,A9 P ST
0x3a2fec…3a3180 Dummy {f00=0x0167, f01=0x0190, f02=»T & P LDR A2,A6 * CALC. MT-BUFFER SIZE P MUR A7 4 & P ST A2,MTECBL * SAVE MT-BUFFERSIZE D * P CF A14,I:EVA0 * RETREIVE BUFFER ADDR. n ST A9,MTECBB ST A9,DKECBB P CM RECCNT P LDK A7,X'00' PMTHEAD EQU *-1 L
0x3a3180…3a3314 (4, 7) Dummy {f00=0x0167, f01=0x0190, f02=»DKL A7,X'0000' MTMSK1 EQU *-1 P AN A7,MTECBR , RF(NZ) MTERR B P LDKL A7,NXTBLK X P ST A7,SWTCH3 p ABL X'0000' PSWTCH1 EQU *-1 * DKIO / MTIO * * EJECT * * DISK - I/O *
0x3a3314…3a34a8 Dummy {f00=0x0167, f01=0x018e, f02=»SIS. * P LDKL A7,X'820F' P AN A7,DKECBR . RF(NZ) DKERR D P* Z , P* REPEAT I/O IF 'NEW VOLUME' DETECTED. d P* $ P LDK A7,X'80' * MASK 'NEW VOL.' P AN A7,DKECBR P RB(NZ) DKIO * REPEAT I/O *
0x3a34a8…3a363c Dummy {f00=0x0167, f01=0x0190, f02=» F A* SECTOR READ. INCREMENT BUFFER POINTER & CHECK IF END OF BUFFER * N $ P LD A7,DKECBB *LOAD BUFFER ADDR. X ( P AD A7,DKECBL * ADD ON RECORD LENGTH ( P ST A7,DKECBB * SAVE NEW BUFF. ADDR. * < 8* CHECK IF LAST SECTOR PROCESSED AND
0x3a363c…3a37d0 Dummy {f00=0x0167, f01=0x0190, f02=» *-1 *MTIOLB / RETURN P* " P* CHECK IF BLOCK IS COMPLETE. ( P* N P LD A7,RECCNT X P CW A7,BLKFCT n & P RF(Z) MTIO * YES! TRANS. TO TAPE , ' RB DKIO * READ NEXT SECTOR IF NOT LAST * * EJECT *
0x3a37d0…3a3964 Dummy {f00=0x0167, f01=0x0190, f02=» LDKL A7,WRTPMK ST A7,SWTCH3 * 2 * NORMAL TAPE-I/O ENTRY. < * ^ MTIO EQU * h " LDK A7,X'00' * LOAD ORDERCODE z MTORDR EQU *-1 LDKL A8,MTECB LKM DATA 1 * * RETURN CODE ANALYSI
0x3a3964…3a3af8 Dummy {f00=0x0167, f01=0x018e, f02=»ETURN IF LAST SECTOR ELSE PERPARE FOR NEXT BLOCK. * : ABL X'0000' D $ PSWTCH3 EQU *-1 * NXTBLK / WRTPMK X * * * NXTBLK EQU * P LD A7,MTECBB ( % ST A7,DKECBB * RESTORE BUFFER ADDR. & P CM RECCNT * RESET R
0x3a3af8…3a3c8c Dummy {f00=0x0167, f01=0x018e, f02=» x * WRTPMK EQU * * & * WRITE TAPE MARK 0 * J " LDK A7,X'A2' * ORDERCODE WTM T P LDKL A8,MTECB z LKM DATA 1 LDKL A7,X'1000' P AN A7,MTECBR RF(Z) MTERR * * PRETURN
0x3a3c8c…3a3e20 Dummy {f00=0x0167, f01=0x0190, f02=» MTERR EQU * $ P LDKL A8,'M' * INDICATE MAG.TAPE , P LD A6,MTECBR * PICK UP DRIVER RET. CODE D P RF ERRHDL t * * DKERR EQU * P LDKL A8,'D' * INDICATE DISK LDKL A6,DKECBR * * ERRHDL EQU
0x3a3e20…3a3fb4 (4, 8) Dummy {f00=0x0168, f01=0x0190, f02=»F A14,I:EVA0 * PICK UP ADDR. OF RETURNCODE ( P STR A6,A9 * TRANS. DRIVER RET. CODE 2 * ^ * h ( P ABL I:RT1 * RETURN TO 'CREDIT' USER r * * * EJECT * * 0 ,* EVENT CONTROL BLOCKS. MAG. TAPE AND DI
0x3a3fb4…3a4148 Dummy {f00=0x0168, f01=0x0190, f02=»TH (8 SECTORS) p MTECBR DATA 0 * RETURN CODE * PMTECBC DATA 0 * NO BLOCK SEQUENCE NO. : * h * r * | . )DKECB DATA /00F0 * FILE CODE FIXED DISK 1 DKECBB DATA 0 * BUFFER ADDR. & PDKECBL DATA 410,0 * SECTOR LENGTH DK
0x3a4148…3a42dc Dummy {f00=0x0168, f01=0x408c, f02=»CTOR n PBLKFCT DATA 0 *BLOCK FACTOR * PRECCNT DATA 0 * RECORD IN BLOCK COUNT. 0 * ^ * h * r END |@ DATA /00F0 * FILE CODE FIXED DISK 1 DKECBB DATA 0 * BUFFER ADDR. & PDKECBL DATA 410,0 * SECTOR LENGTH DK
0x3a42dc…3a4470 Dummy {f00=0x0168, f01=0x2008, f02=» PBLKFCT DATA 0 *BLOCK FACTOR * PRECCNT DATA 0 * RECORD IN BLOCK COUNT. 0 * ^ * h * r END |@ DATA /00F0 * FILE CODE FIXED DISK 1 DKECBB DATA 0 * BUFFER ADDR. & PDKECBL DATA 410,0 * SECTOR LENGTH DK
0x3a4470…3a4604 Dummy {f00=0x0168, f01=0x0190, f02=» | 7 F l p t x6 &90 A! P K 4 0 A! P K 4 0 Av P K 4 0 Av P K 4 0 Av e 4 0 Av e 4 @ 0 >0 P 64 <0 P 54 0 P A 4 !0 P 34 E bR * )bR* I 0 A R V 4 0 A R V K E I b )*R b R*
0x3a4604…3a4798 Dummy {f00=0x0168, f01=0x0190, f02=»$"` uV> av uajb " " b ( bR#j $"u b^&jb "R" b bR j $" b 5W j ""u j $" j &"* u`Hp *? v? u? ` _ u) 5 ? j` " $ `: 0 ja " " a ua j $" ` )? u`? j` " "_2As ua? @u@v E 0 ? !"? 1AxW-j " - R R _9 W I
0x3a4798…3a492c Dummy {f00=0x0168, f01=0x0190, f02=» -jc " c c R c R _a _) +_% 0 c c 4 ! ! ! " V 0 _ " b )*R b R* !4 "bR * )bR* & 4 @k@lja " "j` " $(` AlW= ` Rgjd " "j ""a (a # d ja " $ a a RCj ""d a d`W ` (a AkIl'W a R jd " $j $"` a R `vIs `! d` 4
0x3a492c…3a4ac0 Dummy {f00=0x0168, f01=0x0190, f02=»! "R! ! ! " Q E! "! [ 3@ 4 H #@ C!!"C! !T !!RT "!R0" A!R 4 H 0 _ #! R R W A T A @p Cv! Cv! H Vv0! Av Tg `vP Ap ?v` #! RTj v " % j !! jGv " ! Apj !'! $! P Ap R$ ! ! " T Ev "v P Ev & 0" AvR 5@ Cv!W Hp ?@
0x3a4ac0…3a4c54 (4, 9) Opaque[0x194]
0x3a4c54…3a4de8 # DirEnt {nam=»ASCEBC«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2d08, f03=0x0000}
0x3a4c54…3a4de8 IdxSect {
0x3a4c54…3a4de8 f00 = 0x0168 // 0x3a4c54 @0x0
0x3a4c54…3a4de8 f01 = 0x0004 // 0x3a4c56 @0x2
0x3a4c54…3a4de8 gno = [ // 0x3a4c58 @0x4
0x3a4c54…3a4de8 [0x00]: C0x0168.0x1.0
0x3a4c54…3a4de8 [0x01]: C0x0168.0x2.0
0x3a4c54…3a4de8 ]
0x3a4c54…3a4de8 }
0x3a4de8…3a4f7c Dummy {f00=0x0168, f01=0x0190, f02=» " IDENT ASCEBC * 790119 C.EKERT L I************************************************************************ * I* z H I* ASCII / EBCDIC CODE CONVERSION ROUTINE WITH 'CREDIT' INTERFACE. I* D I* 2 ENTRYPOINTS 'ASCEBC' AND 'EBCASC' PROVID
0x3a4f7c…3a5110 Dummy {f00=0x0168, f01=0x0190, f02=»UENCE: x . I* CALL ASCEBC,BUFFER . I* CALL EBCASC,BUFFER @ F I* THE ENTIRE CONTENTS OF THE 'BUFFER' IS CONVERTED r I* L I******************************************************************
0x3a5110…3a52a4 Dummy {f00=0x0168, f01=0x0190, f02=»* & ! EXTRN TASCII * ASCII CONV. TABLE ( # EXTRN TEBCDIC * EBCDIC CONV. TABLE 4 & " EXTRN I:EVA0 * RETEIVE PARAMETERS ` & P EXTRN I:RT1 * RETURN TO 'CREDIT' * * EJECT * * * CONVERT ASCII TO EBCDIC.
0x3a52a4…3a5438 Dummy {f00=0x0168, f01=0x0190, f02=» * EBCASC EQU * LDKL A6,TASCII " * : * D SETUP EQU * N ST A6,CONVTB b & ! CF A14,I:EVA0 * RETREIVE PARAMS. x * A9 = BUFF START * A5 = BUFF END LDK A6,0 * CLEAR WORK REG. NEXTCH EQU *
0x3a5438…3a55cc Dummy {f00=0x0168, f01=0x40aa, f02=»NVTB EQU *-1 " P SCR A6,A5 * RESTORE NEW BYTE CWR A9,A5 * LAST BYTE???? : RB(NZ) NEXTCH $ P ABL I:RT1 * RETURN TO 'CREDIT' r END @ = BUFF START * A5 = BUFF END LDK A6,0 * CLEAR WORK REG. NEXTCH EQU *
0x3a55cc…3a5760 Dummy {f00=0x0168, f01=0x2008, f02=» *-1 " P SCR A6,A5 * RESTORE NEW BYTE CWR A9,A5 * LAST BYTE???? : RB(NZ) NEXTCH $ P ABL I:RT1 * RETURN TO 'CREDIT' r END @ = BUFF START * A5 = BUFF END LDK A6,0 * CLEAR WORK REG. NEXTCH EQU *
0x3a5760…3a58f4 (4, 10) Dummy {f00=0x0168, f01=0x0190, f02=» h~ !X8H !( @ h~ U !j~ ! ! !P !0# ! N_m ? j !! '( !1j !& !j !! ( * j +& 'j !! ( j ! ! ! 9 ? jy " $ j !! 1 j !! 2 j !! (I !Y A ! p ! ? ! 0 !h & !&P !0# !< _ ( ) +h & '&
0x3a58f4…3a5a88 Dummy {f00=0x0168, f01=0x0190, f02=» h^ !T f^ ! !j^ !U !j '! !j !! ( _N ! ( + ~UWhj !! ' !QU I N! 9 ! : ;b ! W:0 ^ h^ U !P :! ;j !!^ b ! f^ ! !A j ! !d^ ! j '! !j !! (( + b +$~ WR j !! '( ! j !! 0 (j ! !W0 )W# + Aj !
0x3a5a88…3a5c1c Dummy {f00=0x0168, f01=0x0190, f02=» 6 <W U j !!~ W j !! (W Uj ! j '!!! !j !!~ j (!~ _+( # j (! !j !!~ 4 I H~*H $H !@~ W 0$@mI~ Hn @f $U W I~ W I Ao 2 H~ I Ao { _ H{ 2 _ 2 b & . #K~M g "pK s_W!gC ? /_>Iz H 0
0x3a5c1c…3a5db0 Dummy {f00=0x0168, f01=0x0190, f02=»Hm @ P&@jP A W3Ao ,P !_ g  L@mAo? H 0 Hm ! &@h@jP #W @fPO $0 TF 8 h ! !T #P ( -& Ub & ? Ub & @ .P )gC Ao? AzAzT @mA *P @ ? @ @m8 @xP 2 !! h ( & H #: W ? Im1I~ I & h ( & H I ) ?"I ) ?#I H
0x3a5db0…3a5f44 Dummy {f00=0x0168, f01=0x0190, f02=»({ % H~ - !gC Az? @z? H~ C < I 0 ! W 0 ! W /8 0 ! 0$? Az % h ( & J K @o?(@m!gC C~8)?(@zC~8*?(?$Km Jz I gC T Io Ao #: _3Ao@ T / 2 %% + % # #g W ! #g #20 ! &_ I~ Jo K _@ @ !0$@o ( P W 6 - _ Hm 0 ! A %V
0x3a5f44…3a60d8 Dummy {f00=0x0168, f01=0x0190, f02=» 10 ! !0$ (V ? ##2 2 2 322 1& _ Co<$Cm<$Cz8$0 ! 2 %% 4 !X b !U *8 0% ? h ! & ? C <$ h ( & H I ?0 g( " @oW $ 2 %% 5 ): @oA ?6C <$Hz @ T Cm<$Io I~ #V - ? @o@z Ub & 5 +@mA{ *V#( - 1 0 ! 0$ { &{ mU_"@{Ao? m
0x3a60d8…3a626c Dummy {f00=0x0168, f01=0x0190, f02=» !g2 @m?:?;@ _/0 + 0 , A~4 @~P + , 4 _ ; $ - ; Y g , $ C 3 N + l z g O m
0x3a626c…3a6400 Dummy {f00=0x0168, f01=0x0190, f02=» G Y R *FTX J BC JC FTJBJD FETCHING FORMAT: FROM DISC. @ UF 0 % * $ h h Ub & 5 +@mA{ *V#( - 1 0 ! 0$ { &{ mU_"@{Ao? m
0x3a6400…3a6594 (4, 11) Opaque[0x194]
0x3a6594…3a6728 # DirEnt {nam=»ASMRUT«, typ=»SC«, f00=0x0000, f01=0x0000, f02=0x2d20, f03=0x0000}
0x3a6594…3a6728 IdxSect {
0x3a6594…3a6728 f00 = 0x0169 // 0x3a6594 @0x0
0x3a6594…3a6728 f01 = 0x0006 // 0x3a6596 @0x2
0x3a6594…3a6728 gno = [ // 0x3a6598 @0x4
0x3a6594…3a6728 [0x00]: C0x0169.0x0.0
0x3a6594…3a6728 [0x01]: C0x016e.0x1.0
0x3a6594…3a6728 [0x02]: C0x016e.0x2.0
0x3a6594…3a6728 ]
0x3a6594…3a6728 }
0x3a6728…3a68bc Dummy {f00=0x0169, f01=0x0190, f02=» IDENT ASMRUT DATE:81-02-26 P* ( ( P ENTRY ZASEB CONVERT ASCII TO EBCDIC 2 ( P ENTRY ZEBAS CONVERT EBCDIC TO ASCII ^ * P ENTRY CDV10 CDV CHECK ON STRING ITEM P ENTRY CDV110 "- P ENTRY CDV111 "- P* P EXTRN I:EVA0 P
0x3a68bc…3a6a50 Dummy {f00=0x0169, f01=0x0190, f02=»TINE: ZASEB P* P* SHORT NAME: ZE P* 6 D P* PURPOSE: CONVERTS STRING FROM ASCII TO EBCDIC OR VICE VERSA @ P* : P* CALL: CALL ZASEB,STR,START,NCH (ASCII->EBCDIC) : P* CALL ZEBAS,STR,START,NCH (EBCDIC->ASCII)
0x3a6a50…3a6be4 Dummy {f00=0x0169, f01=0x0190, f02=» FIRST CH.POS=0 0 P* NCH = # CH:S TO BE CONVERTED. " 6 P* =0 -> REST OF STRING CONVERTED V P* L P************************************************************************ P* P* 000 ZASEB 'SEQ'
0x3a6be4…3a6d78 Dummy {f00=0x0169, f01=0x0190, f02=»******************************************************** P EJECT @ PPOS EQU A4 POINTER IN STRING N PNCH EQU A7 #CH:S r PCH EQU A5 CHARACTER & PCONVTB EQU A6 START OF CONV.TABLE PWR EQU A8 WORK-REGISTER PSAD EQU A9 PARAM.START A
0x3a6d78…3a6f0c Dummy {f00=0x0169, f01=0x018e, f02=»BAS EQU * P LDKL CONVTB,TASCII P* . PZE000S EQU * 8 P* L P*** GET PARAMETERADDRESSES V P* z P* P CALL I:EVA0 1.PARAM: STRING ( P LDR POS,SAD POS := START OF STRING & P LDR NCH,EAD NCH := END OF STRING P
0x3a6f0c…3a70a0 Dummy {f00=0x0169, f01=0x0190, f02=» P CALL I:EVA0 3.PARAM: NCH P LDR* WR,SAD * P RF(NP) ZE010 NCH=0? > P LDR NCH,WR NCH>0 Z PZE010 EQU * t P LDK CH,0 CLEAR CH P CWK CONVTB,TEBCDIC P RF(NE) ZE050O P* & P*** CONVERT FROM ASCII TO EBCDIC P
0x3a70a0…3a7234 (4, 12) Dummy {f00=0x016e, f01=0x0190, f02=»M CONV.TABLE | PCNVTB1 EQU *-1 P SCR CH,POS RESTORE NEW BYTE * P ADK POS,1 STEP POINTER N P SUK NCH,1 NCH := NCH - 1 n P RB(P) ZE100I PZE100E EQU * P RF ZE050E P* & P*** CONVERT FROM EBCDIC TO ASCII P*
0x3a7234…3a73c8 Dummy {f00=0x016e, f01=0x0190, f02=»ABLE t PCNVTB2 EQU *-1 P SCR CH,POS RESTORE NEW BYTE " P ADK POS,1 STEP POINTER F P SUK NCH,1 NCH := NCH - 1 f P RB(P) ZE200I PZE200E EQU * PZE050E EQU * PZE000E EQU * P ABL I:RT1 RETURN P EJECT P* 790
0x3a73c8…3a755c Dummy {f00=0x016e, f01=0x0190, f02=» IN THE STRING b : P* AS CHECK DIGIT(S) IF YOU WANT THE ROUTINE TO , P* CREATE CORRECT CHECK- DIGIT(S) T P* ( P* INPUT CAN BE OF VARIABLE LENGTH P* P* 6 P* CALLING FORMAT: 1. CALL CDV10,STRING,BIN 6 P
0x3a755c…3a76f0 Dummy {f00=0x016e, f01=0x0190, f02=» 'STRING' = A STRING VARIABLE HOLDING THE B P* INPUT TO MAKE CDV-CHECK ON > L P* (NOT NUMERIC CHARACTERS ARE SKIPPED) H P* 'BIN' = A BINARY ITEM HOL
0x3a76f0…3a7884 Dummy {f00=0x016e, f01=0x0190, f02=» UNSUCCESSFUL j P* P* OUTPUT: CR = 0 OK $ P* CR = 1 NOT OK D P* l , P* 'STRING' IS UNCHANGED v F P* 'BIN' HOLDS CHECK-DIGIT(S) IF CR=1 (ELSE BIN=0) P EJECT P* US
0x3a7884…3a7a18 Dummy {f00=0x016e, f01=0x0190, f02=»4 CHARACTER SAVE AREA * P* A5 POINTER TO INPUT STRING $ 2 P* A6 MAX VALUE FOR RESTART OF WEIGHT R * P* A7 DIVIDEND FOR TOTAL SUM " P* A10 SUM OF PRODUCTS P* P* P* PARAMETERS FOR CDV
0x3a7a18…3a7bac Dummy {f00=0x016e, f01=0x0190, f02=» Z : P* DIVIDEND FOR TOTAL SUM 10 11 11 P EJECT F PCDV110 EQU * T " P LDK A6,11 LOAD RESTART LIMIT h PCD005 EQU * P LDK A7,11 LOAD DIVIDEND P RF CDV20 P* P* PCDV111 EQU * " P LDK A6,10 L
0x3a7bac…3a7d40 Dummy {f00=0x016e, f01=0x0190, f02=»DIVIDEND PCDV20 EQU * ( P CALL I:EVA0 ADDRESS TO INPUT STRING $ P LDK A2,1 LOAD START WEIGHT P P SUR A10,A10 ZERO TO SUM t PCDV30 EQU * P CWR A5,A9 P RF(E) CDV60 IF FINISHED P LC A4,-1,A5 GET CHARACTER P CCK A4,'00'
0x3a7d40…3a7ed4 (4, 13) Dummy {f00=0x016e, f01=0x0190, f02=»* MULTIPLY AND ACCUMULATE ONE DIGIT P LDR A1,A2 SET WEIGHT . PCDV40 EQU * L P ADR A10,A4 ADD TO SUM ` P SUK A1,1 DECREMENT COUNTER ~ P RB(P) CDV40 IF MORE TO ADD P CWK A6,2 & P RF(NE) CDV45 RESTART LIMIT =/= 2 & ! CWR A
0x3a7ed4…3a8068 Dummy {f00=0x016e, f01=0x0190, f02=»9 ADJUST SUM CDV45 EQU * ADK A2,1 INCREMENT WEIGHT ( CWR A2,A6 J " RF(NG) CDV50 IF NOT MAX LIMIT LDK A2,1 RESTART WEIGTH CDV50 EQU * SUK A5,1 DECREMENT POINTER RB CDV30 CONTINUE * CDV60 EQU
0x3a8068…3a81fc Dummy {f00=0x016e, f01=0x417a, f02=»11 FROM SUM x RB(P) CDV70 SUM STILL > 0 RF(Z) CDVOUT IF CDV-OK 6 P NGR A10,A10 GET CHECK DIGIT V LDK A6,1 INDICATE NOT OK z CDVOUT EQU * & ! CALL I:EVA0 GET CHECK-DIGIT ITEM * & STR A10,A9 STORE CHECK-DIGIT IF ERROR
0x3a81fc…3a8390 Dummy {f00=0x016e, f01=0x2008, f02=» SUM x RB(P) CDV70 SUM STILL > 0 RF(Z) CDVOUT IF CDV-OK 6 P NGR A10,A10 GET CHECK DIGIT V LDK A6,1 INDICATE NOT OK z CDVOUT EQU * & ! CALL I:EVA0 GET CHECK-DIGIT ITEM * & STR A10,A9 STORE CHECK-DIGIT IF ERROR
0x3a8390…3a8524 Dummy {f00=0x016e, f01=0x0190, f02=»TTTTTTT9 ! I D DELETED INSERTED + ON UNIT:U i + WITHIN JOB: k RECOVERY RUNNING. RECORD CORRECTION F FREEZING OF BATCH l CONFIRM RECORD INSERT CONFIRM RECORD DELETE: RECORD MUST BE VERIFIED ENTER WANT
0x3a8524…3a86b8 Dummy {f00=0x016e, f01=0x0190, f02=»FF* RECOVERY OF : k B : l RUNNING. ( ',!.%)$&"#-* $ * 0 7 ? G P Y c0 m * 5 A Q c w
0x3a86b8…3a884c Dummy {f00=0x016e, f01=0x0190, f02=» L @ D H( &Ad1 An@m 6 0 _ @n_ ( !'( _&3 @d0 0} h* h _? ! 4 6 99 W 2 !8 "8 #8 W j " # L j " "# P|j " $# Pr? ! !6 +; ^# 8Zb !" Xj !# 'bc (c" 3? 1? ? @ W' ## 7 ! ? " 5 " " ! T T
0x3a884c…3a89e0 Dummy {f00=0x016e, f01=0x0190, f02=»2 _ !0 #$} & 2 _,4 j 1! ! !j 2! ! 4 R ! 4 Hd ? ! 8T & ( !0 #$}? ) _ ! Zb "" " < $ U@f@e0 " An 2 _ ! : ! @ ; W < " ! j " j $" Af07~ 0 "P 07~ j~#!
0x3a89e0…3a8b74 (4, 14) Opaque[0x194]
0x3a8b74…3a8d08 # DirEnt {nam=»LIST «, typ=»UF«, f00=0x0000, f01=0x0000, f02=0x2de8, f03=0x0000}
0x3a8b74…3a8d08 IdxSect {
0x3a8b74…3a8d08 f00 = 0x016f // 0x3a8b74 @0x0
0x3a8b74…3a8d08 f01 = 0x0002 // 0x3a8b76 @0x2
0x3a8b74…3a8d08 gno = [ // 0x3a8b78 @0x4
0x3a8b74…3a8d08 [0x00]: C0x016f.0x1.0
0x3a8b74…3a8d08 ]
0x3a8b74…3a8d08 }
0x3a8d08…3a8e9c Dummy {f00=0x016f, f01=0x0070, f02=» PRT /S,P1370 ASM TSUTL1 ASM CPDKMT * ASM ASCEBC < ASM ASMRUT N ASG /E0,TY10 `ASG /E0,TY10 p@ OREPLA MASK T:XSTA9 | + ! + ' 3 3
0x3a8e9c…3a9030 Dummy {f00=0x016f, f01=0x2008, f02=» /S,P1370 ASM TSUTL1 ASM CPDKMT * ASM ASCEBC < ASM ASMRUT N ASG /E0,TY10 `ASG /E0,TY10 p@ OREPLA MASK T:XSTA9 | + ! + ' 3 3
0x3a9030…3a91c4 Dummy {f00=0x016f, f01=0x0190, f02=»)c ' ) ' j (! '!f c! ! d!? ` 4 j b c a j c!a! b b! c!f cb db4 j b u a4 u $ #@g c hZ a b! +2 jc!! b"c W 6 b! !jc!! b"c b! !W, ! b! !Hg ( 'b `3d b!Z` b! ! !@g _ " ,0 b! ! `bh `!Z2
0x3a91c4…3a9358 Dummy {f00=0x016f, f01=0x0190, f02=»b! ! ' j '!! b ' j b!Z= 'b '!Ag_ 4 b!jc!! b c ` m ` f b!d b` `! ` b` ` !Hg '`4 1& P # W !05 p! u ! " !! w jw!! {1j !! {2 w d "2@h u" ! Kh !@k ~60 oT @j~ # # - b o -( q0 TF b , ! , " , # E h )
0x3a9358…3a94ec Dummy {f00=0x016f, f01=0x0190, f02=» &%W #$d &%( A b ~6Ak_Dj~ b #* Ii !"d &%W #$d &% ~6Ak4 + 1& P W !2 1& P # W ! 4 @l #hQ 0 !0 6 F MMMMMM? !j !! !_9 "_> Hj j !! {(j { ! % { $! 0 ""Il _h !Ah? Al - ! j !!
0x3a94ec…3a9680 Dummy {f00=0x016f, f01=0x0190, f02=» !: ":H "< #:H #< $:H $< %<H %:H "8 # oU U b ! " # $ + ~E U # hQ 0 !T 2 W W #_) !j !! !( "Q Ii "_H ! `! a! !07 h )Q ! ! # `" a j a` j a` ! ( !_ $ 6 1j b#~ W j b#~#W j