DataMuseum.dk

Presents historical artifacts from the history of:

Philips Data Systems

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Philips Data Systems

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download

⟦fe330f90e⟧

    Length: 4796 (0x12bc)
    Notes: pts_type(UF)
    Names: »M:PROC.UF«

Derivation

└─⟦26dca8ec8⟧ Bits:30009711 Philips computer tape "RÅKON-DIVFMT"
    └─⟦this⟧ »REMIT2/M:PROC.UF« 

PTS(SC)

$KMDALL 
$KMDGEN KMD=999,VER=@VER=03$$,REL=@REL=02$$,MOD=9991$$ @999=
$KMDGEN KMD=998,VER=@VER=03$$,REL=@REL=02$$,MOD=9981$$ @998=
$KMDGEN KMD=975,VER=@VER=03$$,REL=@REL=02$$,MOD=9751$$ @975=
$KMDGEN KMD=976,VER=@VER=03$$,REL=@REL=02$$,MOD=9761$$ @976=
$KMDGEN KMD=167,VER=@VER=03$$,REL=@REL=02$$,MOD=1671$$ @167=
$KMDGEN KMD=173,VER=@VER=03$$,REL=@REL=02$$,MOD=1731$$ @173=
$KMDGEN KMD=221,VER=@VER=03$$,REL=@REL=02$$,MOD=2211$$ @221=
$KMDGEN KMD=235,VER=@VER=03$$,REL=@REL=02$$,MOD=2351$$ @235=
$KMDGEN KMD=255,VER=@VER=03$$,REL=@REL=02$$,MOD=2551$$ @255=
$KMDGEN KMD=259,VER=@VER=03$$,REL=@REL=02$$,MOD=2591$$ @259=
$KMDGEN KMD=261,VER=@VER=03$$,REL=@REL=02$$,MOD=2611$$ @261=
$KMDGEN KMD=267,VER=@VER=03$$,REL=@REL=02$$,MOD=2671$$ @267=
$KMDGEN KMD=269,VER=@VER=03$$,REL=@REL=02$$,MOD=2691$$ @269=
$KMDGEN KMD=305,VER=@VER=03$$,REL=@REL=02$$,MOD=3051$$ @305=
$KMDGEN KMD=379,VER=@VER=03$$,REL=@REL=02$$,MOD=3791$$ @379=
$KMDGEN KMD=441,VER=@VER=03$$,REL=@REL=02$$,MOD=4411$$ @441=
$KMDGEN KMD=461,VER=@VER=03$$,REL=@REL=02$$,MOD=4611$$ @461=
$KMDGEN KMD=461R,VER=@VER=03$$,REL=@REL=02$$,MOD=4612$$ @4612=
$KMDGEN KMD=461X,VER=@VER=03$$,REL=@REL=02$$,MOD=4613$$ @4613=
$KMDGEN KMD=481,VER=@VER=03$$,REL=@REL=02$$,MOD=4811$$ @481=
$KMDGEN KMD=487,VER=@VER=03$$,REL=@REL=02$$,MOD=4871$$ @487=
$KMDGEN KMD=499,VER=@VER=03$$,REL=@REL=02$$,MOD=4991$$ @499=
$KMDGEN KMD=525,VER=@VER=03$$,REL=@REL=02$$,MOD=5251$$ @525=
$KMDGEN KMD=527,VER=@VER=03$$,REL=@REL=02$$,MOD=5271$$ @527=
$KMDGEN KMD=539,VER=@VER=03$$,REL=@REL=02$$,MOD=5391$$ @539=
$KMDGEN KMD=569D,VER=@VER=04$$,REL=@REL=02$$,MOD=569D$$ @569D=
$KMDGEN KMD=569X,VER=@VER=04$$,REL=@REL=02$$,MOD=569X$$ @569X=
$KMDGEN KMD=743,VER=@VER=03$$,REL=@REL=02$$,MOD=7431$$ @743=
$KMDGEN KMD=791,VER=@VER=03$$,REL=@REL=02$$,MOD=7911$$ @791=
$KMDGEN KMD=787,VER=@VER=03$$,REL=@REL=02$$,MOD=7871$$ @787=
$KMDGEN KMD=805,VER=@VER=03$$,REL=@REL=02$$,MOD=8051$$ @805=
$KMDGEN KMD=821,VER=@VER=03$$,REL=@REL=02$$,MOD=8211$$ @821=
END 
$NJ 
ASG /E1,TY10
MES * PLEASE INPUT YOUR INPUT * 
MES * END WITH "ASG /E0,TY10" * 
RDA /A
KPF /A,NJ 
ASG /E0,DK,NJ 
END 
$ASG2 
ASG /E0,TY10
END 
$LEDLS
LED LEDLS,/A
KPF /A,LEDFIL 
ASG /E0,DK,LEDFIL 
END 
$KMDGEN 
LED KM@KMD=,/A,/EE
!!CH $$%VER$$@VER=03$$
!!CH $$%REL$$@REL=02$$
!!CH $$%MOD$$@MOD=9751$$
!!EN
KPF /A,KMDFIL 
ASG /E0,DK,KMDFIL 
END 
$INCGEN 
INC /OBJCT,DK:PROD
END 

HexDump

0x0000…0010 (0, 0, 400)  Head {h00=0x000c, h01=0x0050, text=»$KMDALL «, t00=0x0000, t01=0x0004}
0x0010…0054              Head {h00=0x0040, h01=0x0050, text=»$KMDGEN KMD=999,VER=@VER=03$$,REL=@REL=02$$,MOD=9991$$ @999=«, t00=0x0000, t01=0x0014}
0x0054…0098              Head {h00=0x0040, h01=0x0050, text=»$KMDGEN KMD=998,VER=@VER=03$$,REL=@REL=02$$,MOD=9981$$ @998=«, t00=0x0000, t01=0x0058}
0x0098…00dc              Head {h00=0x0040, h01=0x0050, text=»$KMDGEN KMD=975,VER=@VER=03$$,REL=@REL=02$$,MOD=9751$$ @975=«, t00=0x0000, t01=0x009c}
0x00dc…0120              Head {h00=0x0040, h01=0x0050, text=»$KMDGEN KMD=976,VER=@VER=03$$,REL=@REL=02$$,MOD=9761$$ @976=«, t00=0x0000, t01=0x00e0}
0x0120…0164              Head {h00=0x0040, h01=0x0050, text=»$KMDGEN KMD=167,VER=@VER=03$$,REL=@REL=02$$,MOD=1671$$ @167=«, t00=0x0000, t01=0x0124}
0x0164…01a8              Head {h00=0x0040, h01=0x0050, text=»$KMDGEN KMD=173,VER=@VER=03$$,REL=@REL=02$$,MOD=1731$$ @173=«, t00=0x0000, t01=0x0168}
0x01a8…01ec              Head {h00=0x0040, h01=0x0050, text=»$KMDGEN KMD=221,VER=@VER=03$$,REL=@REL=02$$,MOD=2211$$ @221=«, t00=0x0001, t01=0x001c}
0x01ec…0230              Head {h00=0x0040, h01=0x0050, text=»$KMDGEN KMD=235,VER=@VER=03$$,REL=@REL=02$$,MOD=2351$$ @235=«, t00=0x0001, t01=0x0060}
0x0230…0274              Head {h00=0x0040, h01=0x0050, text=»$KMDGEN KMD=255,VER=@VER=03$$,REL=@REL=02$$,MOD=2551$$ @255=«, t00=0x0001, t01=0x00a4}
0x0274…02b8              Head {h00=0x0040, h01=0x0050, text=»$KMDGEN KMD=259,VER=@VER=03$$,REL=@REL=02$$,MOD=2591$$ @259=«, t00=0x0001, t01=0x00e8}
0x02b8…02fc              Head {h00=0x0040, h01=0x0050, text=»$KMDGEN KMD=261,VER=@VER=03$$,REL=@REL=02$$,MOD=2611$$ @261=«, t00=0x0001, t01=0x012c}
0x02fc…0340              Head {h00=0x0040, h01=0x0050, text=»$KMDGEN KMD=267,VER=@VER=03$$,REL=@REL=02$$,MOD=2671$$ @267=«, t00=0x0001, t01=0x0170}
0x0340…0384              Head {h00=0x0040, h01=0x0050, text=»$KMDGEN KMD=269,VER=@VER=03$$,REL=@REL=02$$,MOD=2691$$ @269=«, t00=0x0002, t01=0x0024}
0x0384…03c8              Head {h00=0x0040, h01=0x0050, text=»$KMDGEN KMD=305,VER=@VER=03$$,REL=@REL=02$$,MOD=3051$$ @305=«, t00=0x0002, t01=0x0068}
0x03c8…040c              Head {h00=0x0040, h01=0x0050, text=»$KMDGEN KMD=379,VER=@VER=03$$,REL=@REL=02$$,MOD=3791$$ @379=«, t00=0x0002, t01=0x00ac}
0x040c…0450              Head {h00=0x0040, h01=0x0050, text=»$KMDGEN KMD=441,VER=@VER=03$$,REL=@REL=02$$,MOD=4411$$ @441=«, t00=0x0002, t01=0x00f0}
0x0450…0494              Head {h00=0x0040, h01=0x0050, text=»$KMDGEN KMD=461,VER=@VER=03$$,REL=@REL=02$$,MOD=4611$$ @461=«, t00=0x0002, t01=0x0134}
0x0494…04da              Head {h00=0x0042, h01=0x0050, text=»$KMDGEN KMD=461R,VER=@VER=03$$,REL=@REL=02$$,MOD=4612$$ @4612=«, t00=0x0002, t01=0x0178}
0x04da…0520              Head {h00=0x0042, h01=0x0050, text=»$KMDGEN KMD=461X,VER=@VER=03$$,REL=@REL=02$$,MOD=4613$$ @4613=«, t00=0x0003, t01=0x002e}
0x0520…0564              Head {h00=0x0040, h01=0x0050, text=»$KMDGEN KMD=481,VER=@VER=03$$,REL=@REL=02$$,MOD=4811$$ @481=«, t00=0x0003, t01=0x0074}
0x0564…05a8              Head {h00=0x0040, h01=0x0050, text=»$KMDGEN KMD=487,VER=@VER=03$$,REL=@REL=02$$,MOD=4871$$ @487=«, t00=0x0003, t01=0x00b8}
0x05a8…05ec              Head {h00=0x0040, h01=0x0050, text=»$KMDGEN KMD=499,VER=@VER=03$$,REL=@REL=02$$,MOD=4991$$ @499=«, t00=0x0003, t01=0x00fc}
0x05ec…0630              Head {h00=0x0040, h01=0x0050, text=»$KMDGEN KMD=525,VER=@VER=03$$,REL=@REL=02$$,MOD=5251$$ @525=«, t00=0x0003, t01=0x0140}
0x0630…0674              Head {h00=0x0040, h01=0x0050, text=»$KMDGEN KMD=527,VER=@VER=03$$,REL=@REL=02$$,MOD=5271$$ @527=«, t00=0x0003, t01=0x0184}
0x0674…06b8              Head {h00=0x0040, h01=0x0050, text=»$KMDGEN KMD=539,VER=@VER=03$$,REL=@REL=02$$,MOD=5391$$ @539=«, t00=0x0004, t01=0x0038}
0x06b8…06fe              Head {h00=0x0042, h01=0x0050, text=»$KMDGEN KMD=569D,VER=@VER=04$$,REL=@REL=02$$,MOD=569D$$ @569D=«, t00=0x0004, t01=0x007c}
0x06fe…0744              Head {h00=0x0042, h01=0x0050, text=»$KMDGEN KMD=569X,VER=@VER=04$$,REL=@REL=02$$,MOD=569X$$ @569X=«, t00=0x0004, t01=0x00c2}
0x0744…0788              Head {h00=0x0040, h01=0x0050, text=»$KMDGEN KMD=743,VER=@VER=03$$,REL=@REL=02$$,MOD=7431$$ @743=«, t00=0x0004, t01=0x0108}
0x0788…07cc              Head {h00=0x0040, h01=0x0050, text=»$KMDGEN KMD=791,VER=@VER=03$$,REL=@REL=02$$,MOD=7911$$ @791=«, t00=0x0004, t01=0x014c}
0x07cc…0810              Head {h00=0x0040, h01=0x0050, text=»$KMDGEN KMD=787,VER=@VER=03$$,REL=@REL=02$$,MOD=7871$$ @787=«, t00=0x0004, t01=0x0190}
0x0810…0854              Head {h00=0x0040, h01=0x0050, text=»$KMDGEN KMD=805,VER=@VER=03$$,REL=@REL=02$$,MOD=8051$$ @805=«, t00=0x0005, t01=0x0044}
0x0854…0898              Head {h00=0x0040, h01=0x0050, text=»$KMDGEN KMD=821,VER=@VER=03$$,REL=@REL=02$$,MOD=8211$$ @821=«, t00=0x0005, t01=0x0088}
0x0898…08a4              Head {h00=0x0008, h01=0x0050, text=»END «, t00=0x0005, t01=0x00cc}
0x08a4…08b0              Head {h00=0x0008, h01=0x0050, text=»$NJ «, t00=0x0005, t01=0x00d8}
0x08b0…08c4              Head {h00=0x0010, h01=0x0050, text=»ASG /E1,TY10«, t00=0x0005, t01=0x00e4}
0x08c4…08ec              Head {h00=0x0024, h01=0x0050, text=»MES * PLEASE INPUT YOUR INPUT * «, t00=0x0005, t01=0x00f8}
0x08ec…0914              Head {h00=0x0024, h01=0x0050, text=»MES * END WITH "ASG /E0,TY10" * «, t00=0x0005, t01=0x0120}
0x0914…0922              Head {h00=0x000a, h01=0x0050, text=»RDA /A«, t00=0x0005, t01=0x0148}
0x0922…0934              Head {h00=0x000e, h01=0x0050, text=»KPF /A,NJ «, t00=0x0005, t01=0x0156}
0x0934…094a              Head {h00=0x0012, h01=0x0050, text=»ASG /E0,DK,NJ «, t00=0x0005, t01=0x0168}
0x094a…0956              Head {h00=0x0008, h01=0x0050, text=»END «, t00=0x0005, t01=0x017e}
0x0956…0964              Head {h00=0x000a, h01=0x0050, text=»$ASG2 «, t00=0x0005, t01=0x018a}
0x0964…0978              Head {h00=0x0010, h01=0x0050, text=»ASG /E0,TY10«, t00=0x0006, t01=0x0008}
0x0978…0984              Head {h00=0x0008, h01=0x0050, text=»END «, t00=0x0006, t01=0x001c}
0x0984…0992              Head {h00=0x000a, h01=0x0050, text=»$LEDLS«, t00=0x0006, t01=0x0028}
0x0992…09a6              Head {h00=0x0010, h01=0x0050, text=»LED LEDLS,/A«, t00=0x0006, t01=0x0036}
0x09a6…09bc              Head {h00=0x0012, h01=0x0050, text=»KPF /A,LEDFIL «, t00=0x0006, t01=0x004a}
0x09bc…09d6              Head {h00=0x0016, h01=0x0050, text=»ASG /E0,DK,LEDFIL «, t00=0x0006, t01=0x0060}
0x09d6…09e2              Head {h00=0x0008, h01=0x0050, text=»END «, t00=0x0006, t01=0x007a}
0x09e2…09f2              Head {h00=0x000c, h01=0x0050, text=»$KMDGEN «, t00=0x0006, t01=0x0086}
0x09f2…0a0c              Head {h00=0x0016, h01=0x0050, text=»LED KM@KMD=,/A,/EE«, t00=0x0006, t01=0x0096}
0x0a0c…0a2a              Head {h00=0x001a, h01=0x0050, text=»!!CH $$%VER$$@VER=03$$«, t00=0x0006, t01=0x00b0}
0x0a2a…0a48              Head {h00=0x001a, h01=0x0050, text=»!!CH $$%REL$$@REL=02$$«, t00=0x0006, t01=0x00ce}
0x0a48…0a68              Head {h00=0x001c, h01=0x0050, text=»!!CH $$%MOD$$@MOD=9751$$«, t00=0x0006, t01=0x00ec}
0x0a68…0a74              Head {h00=0x0008, h01=0x0050, text=»!!EN«, t00=0x0006, t01=0x010c}
0x0a74…0a8a              Head {h00=0x0012, h01=0x0050, text=»KPF /A,KMDFIL «, t00=0x0006, t01=0x0118}
0x0a8a…0aa4              Head {h00=0x0016, h01=0x0050, text=»ASG /E0,DK,KMDFIL «, t00=0x0006, t01=0x012e}
0x0aa4…0ab0              Head {h00=0x0008, h01=0x0050, text=»END «, t00=0x0006, t01=0x0148}
0x0ab0…0ac0              Head {h00=0x000c, h01=0x0050, text=»$INCGEN «, t00=0x0006, t01=0x0154}
0x0ac0…0ada              Head {h00=0x0016, h01=0x0050, text=»INC /OBJCT,DK:PROD«, t00=0x0006, t01=0x0164}
0x0ada…0ae6              Head {h00=0x0008, h01=0x0050, text=»END «, t00=0x0006, t01=0x017e}
0x0ae6…0aea (7, 1, 8)    Head {h00=0x2004, h01=0x0000}
0x0aea…0aee              00 07 00 04                                                                                                                                                                                                                                       ┆    ┆
0x0aee…0b3e (8, 0, 400)  00 0e 00 48 00 32 54 52 41 20 41 44 4d 36 00 00 00 04 00 2a 00 26 00 00 44 41 54 45 20 20 38 32 20 2f 31 30 20 2f 30 38 20 20 20 54 49 4d 45 20 31 30 48 2d 32 38 4d 2d 31 34 53 2d 00 00 00 16 00 52 00 50 30 30 4c 41 42 45 4c 20 3d 20 4b 4d   ┆   H 2TRA ADM6     * &  DATE  82 /10 /08   TIME 10H-28M-14S-     R P00LABEL = KM┆
0x0b3e…0b8e              44 31 32 20 20 20 20 20 20 20 20 20 20 20 20 20 44 41 54 45 20 3d 20 20 38 31 20 20 30 34 20 20 32 38 20 20 31 32 31 36 50 41 43 4b 20 4e 42 52 20 3d 20 20 30 30 31 32 20 20 20 20 52 45 4d 49 54 32 00 00 00 44 00 06 00 02 00 31 00 00 00 9a   ┆D12             DATE =  81  04  28  1216PACK NBR =  0012    REMIT2   D     1    ┆
0x0b8e…0bde              00 74 00 70 00 2b 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d   ┆ t p +--------------------------------------------------------------------------┆
0x0bde…0c2e              2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 00 00 00 a4 00 74 00 70 00 32 2a 20 43 52 45 44 49 54 20 54 52 41 4e 53 4c 41 54 4f 52 20 20 52 45 4c 20 34 2e 32 20 38 30 30 31 31   ┆------------------------------------     t p 2* CREDIT TRANSLATOR  REL 4.2 80011┆
0x0c2e…0c7e              38 20 2a 20 20 44 41 54 41 20 44 49 56 49 53 49 4f 4e 20 20 20 20 20 20 20 20 20 20 20 20 20 20 2a 20 49 44 45 4e 54 20 41 44 4d 36 20 20 20 20 20 2a 20 44 41 54 45 20 38 32 31 30 30 38 20 2a 20 50 41 47 45 20 30 30 30 31 20 2a 00 00 01 1c   ┆8 *  DATA DIVISION              * IDENT ADM6     * DATE 821008 * PAGE 0001 *    ┆
0x0c7e…0cce (9, 0, 400)  00 74 00 70 00 32 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d   ┆ t p 2--------------------------------------------------------------------------┆
0x0cce…0d1e              2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 00 01 00 04 00 06 00 02 00 30 00 01 00 7c 00 74 00 70 00 32 20 20 20 20 20 20 20 20 49 58 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆------------------------------------         0   | t p 2        IX              ┆
0x0d1e…0d6e              20 20 20 20 20 4c 49 4e 45 20 20 4c 41 42 45 4c 20 20 20 20 4f 50 43 4f 44 45 20 20 4f 50 45 52 41 4e 44 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 4f 4d 4d 45 4e 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆     LINE  LABEL    OPCODE  OPERANDS                  COMMENT                   ┆
0x0d6e…0dbe              20 20 20 20 20 43 00 01 00 86 00 06 00 02 00 32 00 01 00 fe 00 5e 00 70 00 32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 30 30 30 20 20 20 20 20 20 20 20 20 20 20 49 44 45 4e 54 20 20 20 41 44   ┆     C         2     ^ p 2                             0000           IDENT   AD┆
0x0dbe…0e0e              4d 36 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 38 32 30 39 32 34 20 4e 4a 20 00 01 01 08 00 40 00 70 00 32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 30 30 31 20 20 20   ┆M6                      820924 NJ      @ p 2                             0001   ┆
0x0e0e…0e5e (10, 0, 400) 20 20 20 20 20 20 20 20 44 44 55 4d 20 20 20 20 4b 4d 44 30 38 20 00 01 01 6a 00 06 00 02 00 31 00 02 00 1e 00 74 00 70 00 2b 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d   ┆        DDUM    KMD08    j     1     t p +--------------------------------------┆
0x0e5e…0eae              2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 00 02 00 28 00 74 00 70   ┆------------------------------------------------------------------------   ( t p┆
0x0eae…0efe              00 32 2a 20 43 52 45 44 49 54 20 54 52 41 4e 53 4c 41 54 4f 52 20 20 52 45 4c 20 34 2e 32 20 38 30 30 31 31 38 20 2a 20 20 50 52 4f 43 45 44 55 52 45 20 44 49 56 49 53 49 4f 4e 20 20 20 20 20 20 20 20 20 2a 20 49 44 45 4e 54 20 41 44 4d 36   ┆ 2* CREDIT TRANSLATOR  REL 4.2 800118 *  PROCEDURE DIVISION         * IDENT ADM6┆
0x0efe…0f4e              20 20 20 20 20 2a 20 44 41 54 45 20 38 32 31 30 30 38 20 2a 20 50 41 47 45 20 30 30 30 32 20 2a 00 02 00 a0 00 74 00 70 00 32 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d   ┆     * DATE 821008 * PAGE 0002 *     t p 2--------------------------------------┆
0x0f4e…0f9e              2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 2d 00 02 01 18 00 06 00 02   ┆------------------------------------------------------------------------        ┆
0x0f9e…0fee (11, 0, 398) 00 30 00 02 01 90 00 74 00 70 00 32 4c 4f 43 20 20 4f 43 20 4f 50 45 52 41 4e 44 53 20 20 20 20 20 20 20 20 20 20 20 20 20 4c 49 4e 45 20 20 4c 41 42 45 4c 20 20 20 20 4f 50 43 4f 44 45 20 20 4f 50 45 52 41 4e 44 53 20 20 20 20 20 20 20 20   ┆ 0     t p 2LOC  OC OPERANDS             LINE  LABEL    OPCODE  OPERANDS        ┆
0x0fee…103e              20 20 20 20 20 20 20 20 20 20 43 4f 4d 4d 45 4e 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 43 00 03 00 0a 00 06 00 02 00 32 00 03 00 82 00 36 00 70 00 32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆          COMMENT                        C         2     6 p 2                  ┆
0x103e…108e              20 20 20 20 20 20 20 20 20 20 20 30 30 30 32 20 20 20 20 20 20 20 20 20 20 20 50 44 49 56 00 03 00 8c 00 40 00 70 00 32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 30 30 33 20 20 20 20 20 20 20   ┆           0002           PDIV     @ p 2                             0003       ┆
0x108e…10de              20 20 20 20 45 4e 54 52 59 20 20 20 41 44 4d 36 30 30 00 03 00 c6 00 40 00 70 00 32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 30 30 34 20 20 20 20 20 20 20 20 20 20 20 45 58 54 20 20 20 20 20   ┆    ENTRY   ADM600     @ p 2                             0004           EXT     ┆
0x10de…112c              53 50 43 4c 52 41 00 03 01 0a 00 40 00 70 00 32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 30 30 35 20 20 20 20 20 20 20 20 20 20 20 45 58 54 20 20 20 20 20 53 50 43 4c 52 53 00 03 01 4e         ┆SPCLRA     @ p 2                             0005           EXT     SPCLRS   N┆
0x112c…117c (12, 0, 400) 00 40 00 70 00 32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 30 30 36 20 20 20 20 20 20 20 20 20 20 20 45 58 54 20 20 20 20 20 53 50 4c 49 4e 38 00 04 00 04 00 40 00 70 00 32 20 20 20 20 20 20   ┆ @ p 2                             0006           EXT     SPLIN8     @ p 2      ┆
0x117c…11cc              20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 30 30 37 20 20 20 20 20 20 20 20 20 20 20 45 58 54 20 20 20 20 20 53 4c 55 54 49 44 00 04 00 48 00 40 00 70 00 32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20   ┆                       0007           EXT     SLUTID   H @ p 2                  ┆
0x11cc…121c              20 20 20 20 20 20 20 20 20 20 20 30 30 30 38 20 20 20 20 20 20 20 20 20 20 20 45 58 54 20 20 20 20 20 52 41 57 52 49 54 00 04 00 8c 00 40 00 70 00 32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30   ┆           0008           EXT     RAWRIT     @ p 2                             0┆
0x121c…126c              30 30 39 20 20 20 20 20 20 20 20 20 20 20 45 58 54 20 20 20 20 20 57 52 49 54 49 44 00 04 00 d0 00 40 00 70 00 32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 30 31 30 20 20 20 20 20 20 20 20 20   ┆009           EXT     WRITID     @ p 2                             0010         ┆
0x126c…12bc              20 20 45 58 54 20 20 20 20 20 4c 41 4d 50 4f 46 00 04 01 14 00 40 00 70 00 32 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 30 31 31 20 20 20 20 20 20 20 20 20 20 20 45 58 54 20 20 20 20 20 41 44   ┆  EXT     LAMPOF     @ p 2                             0011           EXT     AD┆

Reduced view