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

⟦7b762887a⟧ 

    Length: 4526 (0x11ae)
    Notes: pts_type(UF)
    Names: »KM481.UF«

Derivation

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

PTS(SC)

PRT KM481 
PRT C481
MES SYDLANGELAND KOMMUNE, REMITTERING 
MES INCLUDES BUDGET 
SCR 
LED KMD08,/S
!!CH $$26$$22$$ 
!!CH $$-4$$4$$ TRANS 40 
!!RE 41,$$56$$100$$ SCREEN SIZE 
!!DL 61,62 FD03,FD04
!!DL 67,108 RK
!!DL 151,167 LP 
!!DL 224,231
MF1KBV STRG 32X'C1C2C3C4C5C6C750' DEV. ADR. 
MF1GTP STRG 32X'C8C94A4B4C4D4E4F' DV ADR, GTP/LP
MF1CU STRG X'6F4F' CU ADDRESS 
CNFHC STRGI (16),'GA' 
!!DL 235,236
FROMKX STRGI (3)2C'TD','TE','  '
!!RE 240,$$FALSE$$TRUE$$ CBKOFLG
!!RE 241,$$FALSE$$TRUE$$ CKTFLAG
!!RE 242,$$FALSE$$FALSE$$ CCLKTFLG
!!RE 244,$$FALSE$$TRUE$$ CTRVALG
!!RE 247,$$TRUE$$FALSE$$ CKTAUTO
!!RE 248,$$FALSE$$TRUE$$ DC 
!!RE 249,$$FALSE$$FALSE$$ CCYWRTF 
!!RE 250,$$FALSE$$FALSE$$ CADM22F 
!!RE 251,$$FALSE$$FALSE$$ C5MDISK 
!!RE 252,$$TRUE$$FALSE$$ CKASFLG
!!RE 253,$$TRUE$$FALSE$$ CSLDFLG
!!RE 279,$$FALSE$$TRUE$$ CREMITFL 
!!RE 288,$$FALSE$$TRUE$$ CTEXTFLG 
!!RE 289,$$FALSE$$TRUE$$ CSTRKFLG 
!!RE 290,$$FALSE$$TRUE$$ CBUDTFLG 
!!DL 331
CFLAG BINI (3,2),X'0051',X'0000',X'0068',X'0000',X'0068',X'0000'
!!RE 361,$$FALSE$$TRUE$$ BUDGET (TR 40-49)
!!RE 362,$$FALSE$$TRUE$$ CFAKT10
!!RE 374,$$TRUE$$FALSE$$ TRUE=FORSUPPLEMENT 
!!RE 416,$$01014610$$%VER%REL%MOD$$ 
!!RE 476,$$FALSE$$FALSE$$GENERATE LEVNR 5X XXXXXX CC
!!RE 478,$$TRUE$$TRUE$$ VAL CHECK 
!!RE 485,$$21$$21$$ CKTMAX
!!RE 490,$$128$$80$$ RECLGD 
!!RE 492,$$OD-KOM$$SYDLGD$$ 
!!RE 493,$$7$$7$$ CKTINDX 
!!RE 494,$$20$$20$$ INDEX FILE
!!RE 495,$$5$$5$$ CKTTOP
!!DL 496,497
FROMTX STRGI (3)2C'  ','KA','KB'
!!DL 817,1091 RK
!!DL 1101,1102 LP 
!!DL 1103,1105 RK 
!!DL 1107 RK
!!DL 1156,1175 RK 
!!DL 1192,1203 LP 
!!DL 1250,1262 RK 
!!DL 1265 RK
!!EN
NOD C 
TRA /S,NL 
INC DIV267
NOD R 
LED SCREEN,/S 
!!CH $$KEY461$$KEY261$$ 
!!CH $$SL461$$SLCOP$$ 
!!EN
TRA /S,NL 
LED RGSTRT
!!DL 68,71
!!JN GENDAT,1,4 
!!EN
TRA /S,NL 
NOD R 
INC RGMAIN
INC RGSUBS
INC RGSUB1
INC RGSUB2
INC RGSUB3
NOD R 
INC RGKLAR
INC KTPLN 
INC KTOPR 
NOD R 
INC RGADM 
NOD R 
INC ADM5
INC SUBAPL
INC REMPRT
NOD R 
INC KMDIO 
INC DKSUBS
INC REMTXT
NOD R 
INC RGFRMT
INC REMFMT
NOD R 
INC REMLEV
INC ADM6
NOD R 
INC REMTR 
LED REMBDT
!!DL 65,67
 MOVE GSWBIN8,=W'42'
!!DL 80,82
 MOVE GSWBIN7,CBIN11
!!DL 177,250
B821PR PROC 
 RET
 PEND 
!!DL 668 FILLR '4',2
 FILLR '6',2
!!IL 688
 FILLR '4',2
 FEOR 
!!DL 691 3-3-2-2
 FMEL '999E-99E-999E-99',GTDUPF(CBIN1)
!!DL 694 3-3-2-2
 FMEL '999E-99E-999E-99',TTARKSAV 
!!IL 712
 FILLR ' ',1
!!EN
TRA /S,NL 
NOD R 
LED BUDGET
!!CH $$999E-999E-99E-99$$999E-99E-999E-99$$ 
!!EN
TRA /S,NL 
INC RAADUM
INC REMSUB
INC REMRED
INC RGSUB4
TLK U,4K
INC PRT 
LED VDUPRT
!!CH $$BUFNR	EQU	2$$BUFNR	EQU	1$$ 
!!EN
ASM /S,NL 
INC START 
INC TB3270
$INCGEN 
LKE M 
KPF /L,RGL481 
SCR 
MES $PDISC M=M:221,MU=M:POOL92,A=RGL481,C=C481
$ASG2

Full view