18_ACCOUNTS 18 ACCOUNTS
18_ACCOUNTS 18_ACCOUNTS
User Manual: Pdf 18_ACCOUNTS
Open the PDF directly: View PDF
.
Page Count: 16

()
o
o
o
o
o
o
o
o
o
o
o
q
ASSEMBLER/OS3
V1~O
09/21/74
2232
··L.TilGTHOF·ry:rG
....
"00'6'22
.......................................
'006'21
p.
00602
P
00001
P
0037'3
P
04540
.....
00310
.....
(JoaOD
P
OU312 P
..
·········4:0·43·3····
..
·
..
·············
..
······
00574
P
.............................
U O.:>.2Jjp
...
PA
GE
1
3
3+001
4
1
ACCD
UN
TS
IDENT
ACCOUNTS
..
__
."
INCLUDE
···········1'SYSMAC·
S
YS
~lAC
COSY/
03
V401
08/17/74
..........
"
............................................................
E NT
Ry..··'FORM
F t
..
AG'
8
..
······9·
...
10,
11
11+001
11+002
ENTRY
ACCWORDS
ENTRY
LOG
.
..................................................................
ENTRY MESFCAG
ENTRY MSFCHRG
liNT
RY···
.PTPCHRG
ENTRY DAYSCHD
ENTRY
SHIFTRA
............
.....
·E
NT
Ry·····
..
·
..
r
..
PM
WrCH
f;'
................................................
.
ENTRY UOHASH
..
;N.IBy................
.!J
..
Q5
EL.fCT
A
ABORT
ACCNUM
A
CCPRINT
"AceS'TUFF'"
8IT19
BIT23
BUSy·····
..
·
F ASTQN
·F
INK
...................................................
.
FLAGS
FA.srTMAX
UR
I·H,;;""''''
HSI
LOC
..
··
FOR
USE
AS
ACCHASK
0/
1
..
__
._.
__
._.
__
._.
_____
.
___
.
____
._.
___
..
__
.
___
.
_________
.
__________
.
__
.
___
._.
____________________
..
_______
.
....
,;()
()
o
()
o
C)
()
o
o
o
o
o
o
o

o
o
o
o
()
()
o
o
o
o
o.
dl
o
at:
0"
ASSEMOLER~OS3
Vl.O
09/21/74
2232
07773
07774
""00000
00001
04000
04003
00000
..
·\]··0·000
01UOO
00001
.
'0'0002'
OOOU3
00003
QOOOO
00014
00035
00037
'00
(roo····
00002
on
00·3
00004
00005
000
000
Oila
DOli
tJ
Of!
...
00003
o
GO
04
00005
00006
infO
07
PAGE
2
71
72
73
74
75
76
77
78
79
80
.
·81
82
83
84
85
(\6
87
87+001
88···
89
90
91
92
93
94'
ACCOUN
rs
EXT
....
EXT
DINT
EQU
EINT
EQU
.
I'MP
URE'···EQU
PFlOC EQU
CORE
EQU
'ClJREXX
EOlJ
PFR
EOU
P
FW
··[QU
rlPF8
EQU
Xl
EQU
X
2''''
...
·Etl.
U
X3
EQU
b~~TK
.
~§H
PRIVBIT
EOU
NU
DATE
cQll
EQU
ZLIsT
ZlOC
77738
77743
00000'
...............
.
0018
PFlOC"'21'i1
...
CORE+3
.....
.
o 00 a
0000
10008
12
358
378
USER
DIRECTORY
DEFINITIONS
aDAGe
UOTIMLIM
·UCNFHLTM
UOS
F8LHl
UOFlAGS
DS'FBtKS
UDT
HIE
SET
IF
SJ3
REQUIRED
ON
LCGIN
NUMBER
OF
USERS
"~5f.
>/-
......
.
••••••••••••••••••••
>1-
•••••••••••••••
>1->1-.>1-
••••••
>1-
••••••••••••
>1-
••••••••••••
...
.....•.
:'1'.....
.......
........
...
.
••
FILE
CONTROL
ELOCK
OEFI~ITIONS
•
.~
.
~
.
..,.
ACCOUNTING
WORD
(MUST
BE
O)
•
LOAD
POINT
BLOCK
•
.
CORE
POINT ER' I FNON;';'ZERO ¥
IF
81123
=
1,
CCRE
8LeCK
HAS
•
BEEN
WRITTEN
IN~n-·-
•.
BLOCK
NUMBER
Of
THE
CURRENT
BLOC·
CURRENT
POSITION
FOINTER
•
{REL"
...
POSIT.······WI
..
THIN···8tOCK
..
C8PJ·'HJ/.'
8IT23
SEZ
READ-ONLY
•
BIT22
SEZ
AT
LOAD
POINT •
"'HIT2T
SEZ
ENiJDFDATA·
8112U
SEZ
FILE
NARK
JUST
READ
•
.......
'1'
.....................................................
.
..
'"
.¥
BIl18
8IN~RY
RECORD
FRCCESSE·
8IT1?
SEZ
ABNCRMAl/UNAVAllABLE
•
·eIliS··S
EZ'
ADDRESS.ERROR··
.......
,
.....
.
8IT15
SEZ
SAVED
FILE •
NUMBER
OF
BLOCKS
BEYOND
•
....
THE
...
CURREN
r
£5
LeCk
...
.
...
..
.......
..
EQU
6
END
POSITION
POINTER
•
BIT22
..
SEZTHE
FILE
HAS
CHANGED
•
81121
SEZ
POSITIONER
READY
•
SIT20
SEZ
DESTRUCTIVE
READ
•
""FItE
'LJIRE6TGR
'f'"
BITS
15-18
CONTAIN
THE
HT
..
BITS
00-14
CONTAIN
END
POSITION
.....
TTOTAC'LENGTHINBLOCKS
.............................
.
•••••••••••••••••••••••••••••••••••••••••••••••••••••••••••••
00001
TFILE
EQU
018
FILE
......•.......
00002
TLF
EQU
028
LINE~PRINTER
······
..
0
UO'03'"''
...........
.........
···;:;·;:;.'7·
..
··················-······
··RTPON·······EQU··
.....,
...
"038
"CA
RD
PONCH
00004
HTCR
EOU
048
CARD
READER
ltOllOS'
..
HHLT..........£QO.058.............
MAGNETI
C TAPE...
OD006
HTTTY
EOU
068
TELETYFE
00007
211
HTPLOT
EOU
078
XIV PLOTTER
.,"._
•...
·•
__
..
m..
....
_,
••
~
.....
'·0·
e·u
1:
0
..
····
..
·_"·······,
..
···
..
•··
-,
....
-
...
~
.......
,.,
·,·
..
2·:1:·2··
...
····
..
•
..
······
........
·H,T,N·U!::·!::··
.......
··
..
··EO
H····--··,·,········,.··1·
aH·
...................
,.
............................
,
..
,
...........
e
Nt:'f
N ·E""·'·ING 'INE
R:
Q0011 213
HTTV
EQU
118
CRT
DISPLAY
"
(l
.
.v
(]
...
()
A.lj
0
{
0
0
Cl~
{'-"
dJ
I-
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0

aD
()
o
o
o
o
o
o
o
o
o
()
o
0.;
o
0'
.......
.
0;
():
ASSEMSLER/OS3
V1.0
00000
·····LiOO·I2
00013
U0014
00015
00016
0001:7
09/21/74
2232
PAGE
3
·'21
215
.
·21:
6
217
218
'219'
220
.~)?
~
1Q~
105+001
ACCOUN
TS
HTRAF
EQU
HrT
ASK
EQU
. HTI"ISF
EQU
HTPTP
EQU
HHIAX
EQU
HH1ASK
·············fQU
~c.
.
RifNoaF;"ACCESS
F
H.E
FUTURE
INPUT
FOR REMOTE
BATCH
USER
OISKPAGK
PAPER
TAPE
PUNCH
(NUM8R
OF
HARCWARE
TYPES) + 1
···MASK···FCR····THE
H
AROWARETYPE··
.'f~<
"l-
¥
~>J.
'f¥
'PPI-
>J..~'>f>J..'!:>,'
>;
>;.
>;.>r.
>;-
"f
Jf.
>,UP1-
>;.
>PI- Jf.
>;.
Jf.4/-.
>f:.Jf.
Jf.
"fJf.>;'>J.:V-
Jf.>,<Jf.
Jf.
>f
Jf.
Jf.JI.
"I-
'I
Jf.
:'1-.lJ.~'!..lJ.."I:¥
¥!J.Jf.lJ."
¥:>J:"I-
¥ ¥ ¥
DAYSCHO
ass
1:
LOW
HOUR
FOR
EACH
SHIFT
. ......•
;()
o
o
o
o
c)
o
o
o
o
o
o
o
o
o
o
o

o
()
o
()
o
o
o
o
o
Oi
o
05
ASSEM8LER/OS3
Vl.0
09/21114
2232
PAGE
110
·111
112
113
·····114
115
116
117
118
119
120
121
i22
123
124
125
"
..
126
127
12
8
129
"130
1.31
132
133-
1;34
135····· ...
136
4
ACCOUNTS
>I-
>;,
JI.
J,<
"'$0'
>;,
>I-
>;,
>t-
>I-
J{-
..
'f.
>I-
>I-
~".e_
;;;.
..
3:'0"
'f.
'"
""'/-
...
>;.
"1-
-If.'
'f.
..
:'1'
'f.
.
THE
FORt1AT
OF
THE
ACCOUNTING
FILE
TS·A-SERIES
OF
·17
WORD
RECORDS.
THE
FIRST
WORD
OF
THE
RECORD
IS
00000017
IF
THE
RECORD
IS
A
NORMAL
ACCOUNTING
RECORD
OR
A
4COOOOOO
IF
IT
IS
fHEEND
OFTHE'FTLE
..
WORD
~~C·
400000
OOORO
0
oobol
7
WORD
00
DATE
AND
HOUR
FROM
RF
37
WORD·
01~ACCOUNTNUM8ER
WORO
02
USER
CODE
WORD
03 SAVE FILE SlOCK
TOTAL
'HORO'04"TERMTNA
L l\UM8ER
-INS
ITS:1:5-23
TRAFFIC
IN
BITS
6-14
WdRDO
5
WC
RD
06
WORD
07
WORD
08
WORD
09
WORD
:1:0
WORD
11
I</ORD
12
'WOR013
..
WORD
14
~~ORD
15
BATCH
QUEUE
NUMBER
IN
8ITSO-5
CPU TINE
IN
HIlLISECONOS"
........
.
ELAPSED
WALL
CLOCK
TIME
IN
SECONDS
REGORDS
OUTPUT
TO
PRINARYL
INE
·PRINTER
REGORDS
OUTPUT
TO
THE
PUNCH
REGORDS
OUTPUl
10
THE
PLOTTER
NtH18ER
OFINPlJT
CARDS
READ
MILLISECONDS
OF
TAPE
DRIVE
ACTIVITY
NUMBER
OF
SPECIAL
INPUT
RECORDS
REGOROS'rCFAPERTAPEPUNCH
..................
.
RECORDS
TO
REMOTE
LINE
PRINTERS
···SECONDSOF lJSER
DISKPAGKTIKE
. ,.ie)
G
c o
1,0
o
o
o
o
o
o
o
o
o
o
o
o
- - - - - - - -
--
- - - - - - - - -
-----
----"-
- - -
_._-
- -
-.--.-
-.-.-.-.--
--
-----
..
----.----
--.--.--
-.-.-
--
~,----.-.-.-.-
--
---
_.-
-,--
------
- - -
--.-
-
-'--
-
--.-
-
_._._,-
-
--
---
-
-_.-
---
--

(1)
i
()
~
i
()
I 0
I
I 0
I
0
()
°
°
0
C)
0
0
0
0,
Oi
0"
0'
0,)
°
"JD
'\,
I."
Oi)
ASS
El'1
t3LE
RIOS
3 Vi.O
09/21/74
2232
00001
P
00001
14600000
"
"'00002'
40
37777
T'X
00003
05100001
·0,0004 ,0·100
OU
2,3,
p.
00005
20100002
00U06
5350DIJOU
OO~07
2frlfrOfr06-
00010
176U0017
00011
05677777
X
'0001Z'
'Q10uOD14
P
QOiJ13
1460000
·,00014
536ilOi}O
OJ015
2027777
U0016
120777
.
"0
O'U
17""3
rt"?7'77"7·J··'V'··"··"·'··'"
OOlJ2Q
5
00021
2
·····lfODZZ·'3
o
''',········
..
,',··'''';:;D
JOO
..
·0·0·0··:3
0003
0003
""00036'
01]037
00040
OOlTZiT
00042
00043
00Q44
00045
····"'00048
00047
00050
OOOST
00052
00053
OOtl54
00055
7764000
'00056"'20'3'77777'
X
00057
031U0322
P
00060
20377777
X
. U
DU
61'
'03Z0IrO'63P
00062
00000431
P
o 0 0 6 3 . 2 0 0
0·0
6·0
2·P,
..
,.,
..
,
...
".,,,",,.,'
00064
40000600
P
00065
14277777
X
00'0
66'14'i3tJtl
D70'P
00067
01000537
P
00070
54100603
P
····00071'05100755···'·····
00072
01000116
P
00073,
14417756
00074
40000603
P
n0075
n200001
"'ClOO'7
6
""141
OOilOO
00077
77650001
PA
GE
141
142·
143
Aceo
UN
TS
LOGOFF
ROUTINE
);. 'I-',/- '/-'
Jf~<'-'iJ;:-'i~<
4',.<' >j.',/-'¥-'i '¥,,,:i,f,' 1f.':;;' Jf''I-',>/-'Jf 'I-'",'.if. 'f.'
>f.
'1-Jf
.>J.
>/:".
Jf
V·~c.>J.'I-
Jf
'I->;"'/-.>J.
"i
.:iJ'i,f,,,,,.>f'l- ¥
>J.
!J.
lJ.];I.:;;':;;'
11-
':].'/-
i}
JJ.
'I-.>J.
Jf".
>J.
'I-
'If >j.
,{o
>J.'
,
'I-
Jf
,
:;;.
. LOG
EXECUTIVE
REQUEST
'f
1
Lt4
.;;.
USER
MUST
dE
IN
CONTROL
~ODE
AND
145"+
llt 6 .
Ip·········LOG
IN
""HA
V
E"\:10
Bf U
SE
R' N
Ul'IBERINA
Q""'"'',
'OR''''''''
IF
LOGOFF
HAVE
0
IN
A
147
14e
"
......
, "V'"
"EFFECT
rVEAOOR'ES$
OF
INS
lRUCTI
ONSHCiCllD'BET
HE
LUN OF
SiANOARO
OUTPUT
IF
IT
HAS
NOT
YET
SEEN
UNEQUIPPED
sa
THAT
149
150···,·
151
.*
..
,.,
...
, ....
,.,.,
ITCAN8E
CHARGED
FOR
IF
NEEDED
,
.....
,
.,
....
,
..
'I-
'f
•••••
:;;.
•••
""
••••
*
•••••••••••••••••
*
••••••
:;;.:;;.
••
:;;..;;..'1-:;;..:;;..'1-
•••
:;;.'I-
••••
Jf:;;.
•••••••••
"..
LOG
EQU
'I'
ENA
0
"STAII,PS'A
ISG
1,Xl
U J
P,X
lOG
.,
...
,........,'"
..
"..,.,
LDA
lt1,Xl
TAr
X1+CN8LK
..
,·tOtl.··'''·''·'···''·'''EPPyX1:+CN8LK·
ANA 1
78
AS;:;
LPTABl
UJF
"
'>1-+2"
...........
"
.........
,,,'
o
··",··,"',····,··X2··
LPTI'\G,X2
,Xi
i·'He,·"·'
,.""",
"'"
"',,"
'f),',
'X2'·''''
,
U
CEXIT,
X2
24-
····FFLOG+PFR
UDPFRSTR
2.4
..
lJOPSA,PSA
UDSRCH03
~
PFLOG+PFw
'';:l',.',
Of""~H1'ir
'
'':';
tJ
P,"""
.,
'A"" o "t,rv,,,,
AZJ,NE
U6~~aHD5
LOA
ACCNUM
PSA
"AI
J';GF"
"-¥t2'
.....
J
..........
.
HLT
UDSRCHX5
·.LOA
...
ACCWOROS
STA
ADDRESS
ENI
READ,X2
"'EN'f""
"U"",
'''''1'-+2 'iX'
3""'"
UJP
UDIOX
Lor
POSITION
Xl
ISG
'HPFB~i9,Xl
UJP
ACCOl
ENA
,S....~,17
STA
POSITION
ENI
1,X2
"'ENI
.
'''O',X1'
....
,
.....
PFA
PFlOC+PFR
MARK
THE
ENDer
THE'PSALIST
STANOARDOUTFUT·{}OES·I\'OT
EXIST
LOAD
THE
CONTROL
BLOCK
ADDRESS
, "
WH
AT
KIN1JOFP
RINTER
OO"WE'HAV E
IF
"NOI
.4
PRI
NTER
...
N,UM6ER
.---
LOAD
PCINTER
TO
PRINTER
CONTROL
MACRO
PICK
UP
PROPER
ACCOUNTING
. W 0 R
0""
.,
...
""
,.,
..
'.''''
...
,
..
,
..........
'.,
.........
,'
..
,
..
,.,.,
.......
",
LOAD
THE
LINE
PRINTER
TOTAL
..
CHARGE
FORTHEPRurrERRECORDS
PREVENT
FURTHER
TOIL
LOAD
THE
END
POINTER
·······ADVANCE
THE
Bt-,O···P·Q·INTER,
JUMP
IF
ALREADY
ACTIVE
SAVE
THE
RETURN
ADDRESS
.'1!,
c'r:I"V'A'T
ET
HE
etJEUE'·'
..
·'
..
,··
....
,
..
,
..
"',
..
··
..
·
..
,
..
··
..
··
....
,
..
,
..
"
..
,,·
..
,"
.........
,
..
"
...
,
...
~,
..
,
..
,
ENTER
THE
INTERRUPT
ADDRESS
ENTER
THE
RETU~N
ADDRESS
.
Of3TA
IN
SO
HE"CCRETO'PLAY
···\fIT R
MP
IF
CORE
~AS
AVAILABLE
AM
AND
WtUfFORTHEINTER.RUPT
SAVE
THE
PAGE
FILE
WORD
LOAD
THE
PSA
ADDRESS
LOAD
THE
PAGE
FILE
WORD
'tOAD
THE'
"t};CCOlf
N'T'
NtJ
M8ER·
..
··
......
,
....
JUMF
IF
LCGIN
IS
THE
USER
LeGGED
ON
JUMP
'IF
·SO····
......................................
.
CONTROL
MODE
ELEW
IT
AGAIN
·LOAO
THECURRENT·8LOCKNUM8ER
SAVE
IT
FOR
REFERENCE
READ
IN
THE
CURRENT
BLOCK
tOAD
THE
INTRA-BLOCK
FOSITION
SKIP'
IF'
AN
EXT
ENSION
'ISkEEOEO
...
THLPOSITION
WILL8EZERC
AT,THE,
END
OF
THE
OPERATION
ONE
BLOCK
IS
NEEDED
·····SEtECT·'MASS'SlORA'GE···DEvTeEz£:RO
..
'·'''···~'''··
........ , ... ,
........................
"
1'1'
uJ
o
o
o
l
()
o
o
o
o
o
()
o
o
o
o
o
o
o

/'lih
(p
Q
()
o
o
o
()
o
o
o
(J
o
o
?,
0"
0"
01
ASS
E M 8
LE
R
/0
S 3 V L D 0 9 j 2
1/
7 4
22"
2
'00
lGOlf40CO
112
P
D01u1
77730000
QOI02
00771777
X,
00103
40000002
P
00104
40004000
00t05
"'14217777'X
00106
14700577
P
001Ll7 141UOOO;:)
OD1I01lf300i12P
00111
01000544
P
1]01121460000u
00113
776
1
tU001
J011
L
t
llflIJ0755
001i
5 .
01
ODD
120
P
U0116
20000601
P
00117
401U4023
'00120
T46000Z:C
00121
34000603
P
0012215477775
.
00123
5.3010037
00124
4310lt002
U
0125
47100141
P
00126
00700312
P
00127
21177777
X
'0 OT3 0
203001117
"'X'
00131
536JOOOO
I)
0132,,1200
Otl02
00133
17600003
00134
53500000
'00135
······20
100i27X
00136
03600140
P
00137
130D0030
00140
..
4!lOQ G 5
05
P
00141
1410000Q
.......DO
142.2530
O£l6()
..
X
00143
4510400
1
+
00144
lL
f7JOOOO
00:1:452037'77'77
'X
00146
37077777
X
00147
031U0151
P
00150
21377777X
00151
2D377777
X
[1015245104010
00153
25277777
X
00154
45104012
'0015520277777
X"
00156
21200000
00157
0450000D
····0016·0
'21601JI1
00
00161
4510
ft
00162
252.7
I.X
00163
45104
0
00164
20277
7 X
ilOt65
·
..
··4018
4·iJ22
00166
147QOOOO
00167
41000604
P
001
TO
..
2037
T77T
X
00171
45104016
00172203IZ7l7X
00173
21377777
X
00174
1+5104Q05
QOii'S'"
2frsT7777
....
X
..
00176
12077754
00177
4410
1
+007
"002
00'
530
2U
0
35'
00201
12000006
,00202
3.411.L400]
PJ-\GE
Aceo
UN
TS
LOGOFF
ROUTINE
221
222
223
224
225
228
227
228
229
.
230
231···
232
233
234
235
236
····UDXFF
..
Ace
01
'237
....
··AGC02
?,
A
-~~
23S
240
241
........
2it
1:
+ 0
{)
i·····
241+002
241+003
241'+0(14
241+005
24"1+006
241+007
241+[JG8
..
24'1: +
fJO
g
..
2t
t1+010
241H111
2'41+01'2
03
241+013
A
04
253
254
255
°256
257
258
12'5'9
261]
261
262
263
2&4
265
265
~:::67
svrtr
UOXPF·
VFD
A12/0INT
·RTJ
GET8LK
STA
ACCWOROS
STA
CORE
EN!
\>1
RITEX2"
.
ENQ
EXPAND
ENI
3.,Xl
..
ENI
Jj. +27
X3
UJP
UOIOZ
ENA
..
,I,MPURE
.....
.
APF
PFLOC+PFW
ENI
WPF6-19,Xl
U::Jp··mA
CCU2
LOA
F M
~.~.~
......{9RE,±19, X
1.
RAD
POSITION
INA,S·-2
TMQ
DATE
STAG COREXX-1,Xl
STr
·A
OCO
4X
1'·
RTJ
SHIFTRAT
LDQ
RATETAB,Xl
LOA
"ACCSTUFF,
PSA"
TAl
X2
·SHA
·2·
ANA
3
TA
I X1
·······LfJA···
·········
..
·RATETAS·,Xi:
AQJ
ACC03
SHA
24
'ST
A Rp.TE FACT
ENI
IMPURE,Xl
N
LDAQ.ACCNUM,
PSA,
STAQ GOREXX+l,Xl
ENO
Q
LDASYSeOeE,PSA
LPA
81T19
AlJ,
¥+?
LOQ~~CrnlE,
PSA
LOA
TOTALTIM,PSA
S~AQCOREXX+5,Xi
LOAQ
LPREC,X2
STAQ
COREXX+7,Xl
···
..
······t:DA······
···············'PtOTRECrX2'···
LOO
Q
X2
')'
>0'
~
0 '
t?J~';i
..
OX2
ST A Q C X X +
9,
Xl
...
LD.AQ.... P
EO,
X2
SlAC
C
XX+13,Xl
LOA
M IME,X2
·eOi,(EXX+·ll3,Xl"·"
o
TOTAL
TXTOT AL,
Sll
COREXX+l1,
X1
...
SFI3L
KS.,PSA
..
TERi"iINAL
,FSA
GOREXX+3,Xl
oS
ElECT·,PSA'
.....
-24+5
COREXX+4,
Xl
NU"o
...
, ...... .
6
C
OREXX+4,
X L
PREVENT
INTERFERENCE
GET A FILE BLCCK
S10RE
THE
NEW
CURRENT
BLOCK
STORE
THE
FCR~ARO
POI~TER
INITIATE
THE
WRITE
OF
THE
FILE
MARKINJO
.IMEEXTENSIO~
BLOCK
ENTER
THE POSITION
OF
THE
°pRESENTACCOUN
TING'RECOR 0
LOAD
THE
FILE
MARK
WORO
·······~~··~·~~,fAEI~6~lt£5Nay28~EMENT
.
ADVANCE
THE
PCSITION
COMPENS
ATE
FOR
THEI-R
GAP
LOAD
THE
CURRENT
DATE
AND
HOUR
SAVE
INDEX
CNE.
FINO
WHICH
SHIFT
IT
IS.
GET
HE
RATE
FeR THIS SHIFTo
TOOK
ATrRE"
RATEAr'COGON'llME~
POINTER
TO
THE
ACCOUNTING STUFF.
GET
THE
LOGON
RATE
FACTOR
USE
THE
LARGEST
RATE.
SAVE
FCRCOMP
l
TIN
G
RESTORE
THE
INDEX
1
LOAD
ThE
,ACCOUNT
NUMBERS
~IALt
CLOCK
THt
GE'r
SYSTEM
00
C
GET
BATCH
BIT
~Ul~P
:rf
~ATCti
Jv~G=OJ
LOAD
THE
CPU
TIME
--,
..
,
LOAD
LINES
PRINTED
AND
CARDS
PUNCHED
··tOAf]·
P1:0TTER"RECOROS'
IS
THERE
A
CARD
READER
PCINTER
SKIP
IF
NOT
LO
AD
THE
NUM8
ER'CF
CARDS'
R.EAD
.LOAD
FAFER .TAFEF.UNCH.
AN
ORE\'10TE
LINE
PRINTER
RECORDS
LOAD
SECONDS
CF
USER
DISK
PACK
....
nTIM
E'A
N
fj-·SAV
EIer··
SET
SPECIAL
I~PLT
RECORDS
TO
0
SET
THE
CHARGE
TO
ZERO
.
LOAOTHETAFEACTIVITYWCRD
..
LOAOTHETOIALSAVEOFILESPACE
LOA 0
THE
T E R
MIN
Jl
L N U M
8-E
R.
L:OA81hE"tlAlCH'TERMINAt··NUMBER··
....... ""
....
.
'GETNUMBEROF USERS'
AND
SAVE
FOR
THE STATISTICS
'.
Cl;
y'
OJ
.C1
()
:.
0
u 0
;/),
0
t"
I
i:,{
0
0
0
0
0
0
0
0
0
0
0
0
0
0
0
-_._----,,-,--
_.-
-
-.--
--,.-,-,-----
..
_------,--
...
-
-,._,_._._._-,-_._-------,--_._--_.
__
._.-
-.-
--'-'-'-'-'-'-
--
--_.
__
._,---_.-.
__
._.-

,~
I
~
a:
C)
()
0
0
0
0
()
0
0
0
0
0
()
0
a
0
S1
0'
0,
0
ASS E
tvl3LE
RIOS
3
Vi.D
09;21/74
2232
PAGE
7
ACCOUN
fS
LOGOFF
ROUTIt,E
i;.;';"·'i-if.·J{.'J,;;·if.jriJ.'f·)j.·4""'~
ifiJ.·Jj.jj:~·iJ.·4·''':f;.;,;.·;,;.ft..¥'f··iJ.;';'jj:·!iJ:J;.·¥
""f.;y.¥¥>i-:iJ.J;.~¥
'I-;';";"4.y.'44
'f. 4¥-ft..·¥ ¥
:f¥'J.
iJ.',/-"''I-
'J.
iJ.
>J.>J.
i:-iJ.
iJ.4
4i-
¥ ..
288
¥
'I-
·····288
...
>r.....
THE
FOLLOWING
CODE
<TO ACG08·)·DETERMTNES·IFA·
.1f
290
'f.
USER
IS
A HIGH-SPEED
DEVICE
USER,
AND
IF
SO
HE
¥
291 'f. IS
CHARGED
FOR
EACH
DEVICE
USED.
NOTE
THAT
A
>J.
.......
H··292·
.....
J{-........HUSER·IS·CHARGEO······A
..
HSERVICECHARGEFOREACH'"
.....
".
~~~
:____
~~~I2~A~S~2~
~~g~R~H~ko~FE~~H~A~ET~§£EoD~MICES
:
29S"',\<'CHARGEO'FOR
THREE
RECORDS
ANd
TH.REESERVICE.1f
296
'f.
CHARGES.
>J.
29·7
299
0020'3'
·····5311)0
000
.....
·
....................
·H
•••••••••••
•
...................................................
c"<.
00204
53600000
00205
13000011
'00206'
"'17600377
002lJ7
11t780000
00·21041104017·
00211
14177777
X
01]212
14700377
00213
····13000017
00214
OS277777
00215
01000233
J
0216
130((001t'
00217
20100214
X
00220.5370·0·0·[10
00221
20300001
00222
53700000
.N····~·········~"O
022"3
..
~·203Q~O(jD
O'N~'"
00224
0440lJOIJO
00225
15600310
o 0
22~6··342U4·lrf7
00227
14600000
00230
A04fH1Z
23·
FL~
00231
13000030
00232
01000212
P
304
305·
30
E
307
0023
~3'P
...
~'"
~
.......
~...........
..
...
m
•.
· ... ·
.......
,
..
·.~
.••
··
.... · .•
··.·.·M
••
,~.<:#.
:3
200
.
00233
1)023.4,.
00235
~00236
······1
U0237
2
:3
3
.~
......
COMRUTE
THECHtlRGES
FOR
THE·
CONTROL
MODE
ROUTINE
.....
'1-
..
00240
403
SAVE
VALUE
IN
USERS
REGISTER
FILE
·
....
···
..
·
....
·~OD24l:·
..
··1
..
53tJ·
00242
147Q
00243
1307
~
...
~
..
0
0244
""37
07
00245
04-
00
21+
6~~
..
i5
00247
50
II
00250
4010
00251
151iJ
00252
13Ul
'00253176U
00254
5120062Q
P
I)
0255
..
·340u
n6
G
'+
00256
02200237
3ft 6
31
+
7-
3l+ 8
34·9
"05'0--
DV
j\
···f~AO
IJI
i,Xl
-12
'0777
COST
+COSTl-1,
X2
TOTAL~··
ACCLOOP,X2
00257
20000600
P
351
LOA
ADDRESS
00260
14200105
X
352
ENI
WRITE,X
OU25r"14300253
P
..................................................................
~
...........
'353ENT""+2,'X3
00262
01000537
P
354
UJP
UDIax
VENT' S IG
t\EXTn~STal'C"'"
SKIP
IF
EVEN
NUMBER
Of EIGHTS
R.OU
t\
\J
UP
. .
......
.
MULTIPLY
BY
THE
SHIFT
RATE.
SAVE
MODIFIED
NUM8ER
OF
RECORDS
LQAD
THE
ADDRESS
Of THIS
BLOCK
.AND
..
~~RIJE:.JL.qlJJ
.
00263
.
253D
0.142
...
X.
.
......................................................
355..
.LOA
Q.
ACC.NUM.,.PSA... .
.....
LOAD
THE
ACCOUNT.NUM8ERS
00264
00700522
P
356
RTJ
OSRCH
SEARCH
FOR
THIS
COMBINATION
00265
04400DOO
357
ASE,S
WE
HAVE
TO
FINO
THE
ENTRY
.....
w
•••
,,"
•••••
Q 0·266···,·
..
·
..
00"
0
0-
0266·
......................
,
.......
····3
s·c
..
·
..
···
.....
"·Hi::
T
....
·
..
·····
........
......
"
....
-'(0
••.•
,".............................
..
.....................
······OrHER~~lSE····
HOYl"OIB
....
H
E··to
G·ON~·"'·"M.'''~''
OQ267
20300172
X 359
LOA
SF8LKS
PSA
LOAD
THE
TOTAL
SAVED
FILE
SPACE
00270
31377777
X
360
S8A
ISF8LK~,PSA
CALCULATE
THE
CHANGE
IN
SPACE
.......
(T027T
'30
1U'1+005'361"
ADA
CORE+~UOSFBCKS,Xr·AOD·TN"THE
....
lNTTIAC
....
IJA:[OE
........
.
00272
05400000
362..
ASG,S 0
PREVENT
NEGATIVE
TOTALS
.........................
00273
.. 1460UOOO.......
36.3.ENA..
..
........
0......
........
.
.....
.
00274
401G400G
364
STA
CORE+UOSF8LKS,X1
STORE
TOTAL
INTC
THE
DIRECTORY
00275
20000604
P 365
LOA
TOTAL
LOAD
THE
CPU
EQUIVALENT
.'
~
.~
....
u'·Oa27
6
·403tJ0056X·u,u
"36
6"~···"·'"'"
""""STA~"""'''u,",
..
'A,'PSA""
.·
...
·
...
,~~·
......
,.u
...•..
·~"·
....
·""
.. ·
.....
"··"~."
00277
12077774
367
SHA-3
<Ji
o
o
o
o
o
o
o
o
o
o
o
o
o
o
o

rr.'
IJ'
o
o
o
o
o
o
'0
o
o
o
......
,.
y
di
o
0'
o
ASSEM8LER/OS3
Vl.D
09/21/74
2232
PAGE
B
ACCOUNTS
'U0300341u40
07
3b8'R"AD
00301
2U377777
X
369
LOA
~0302
12Q~0012370
SHA
00303
17600001
371
ANA
00304
16477777
372
XOA,S
0030534077777-X373
RAO-
.
00306
20000600
P
374
LOA
00307
14200260
X
375
ENI
TO
31 0
14300474
P
376
ENI
00311
01000536
P
377
UJP
00312.
01000000
377+001
···,SHIFTRATUJP
00313
177DU037
377+002
ANQ
00314
14117777
X
377+003
ENI
.....
003"15
224001}
ul}
POO(rOOu
····'377+
0 U
4-
SHFT
0
l'
'LAeH
00316
Q37U0312
P
377+005
AQJ,LT
00317
02500315
P
377+006
IJO
0'032014100
:314 X
377+007
....
ENI'
00321
01000312
P
377+008
UJP
..
LOGOFF
ROUTINE
CORE+U
oT
1M
E,
)(
1
UoesITS,PSA
24-14
000018
-0
····SCREA~I········
.
ADDRESS
WRITE,X2
UoSRCH07,X3
UoIO
IMPURE
373
NSHIFT,
Xl
oAYSeHDX1
S
HIF
fRAT
SHFT_.l,XJ
NSHIFT,Xl
SHIFTRAT
UPDATE
THE
TOTAL
FRCCESSCR
TtME
TURN
OFF
THE
~OISE
MAKER
IF
THIS
JOB
NUMBER
IS
8EINGWATCHED
REWRITE
INTO
THE
DIRECTORY
ENTERTHERErURN ADDRESS
..
THIS
ROUTINE
FINDS
THE:SHIFT
IS
IN
Q
UPON
ENTRY.
RETURN--WEtVE
FCUNT
IT.
'-'USE
THE'UPPER'SCH
EDUU::
IF
OUr.
RETURN
cr
" ')(1)
It
,()
-,
0
i.
0
u 0
0;
..
,a._
:.,U
;:
~
C)
0
0
0
0
0
0
0
0
0
0
0
0
0
0
---
---
---
- - - - -
----
--
-
---------.---.---------.-,---,-----.---.~.--.-
--.-
-.-
-,--
-.-._-
--.-
_._-----,----.------.---_._.
__
._----
-
----
-
----.-.-.~-.--.-
..
-,-.-------------"-.-----,-

~(J)
~
,
1°
()
o
o
o
o
o
()
o
o
()
o
!
01
o
ASSEW3LER/OS3
Vl.D
09/21/74
2232
PAGE 9
ACCOUNTS
LOGIN
ROUTINE
00322
P
Cr03
22"'2
0 '3uOZ
53'X'"
00323
u3300325
P
00324
00000325
P
00'32"525300276
X
00326
45300322
X
.............................
00327
..
00700522·
p.
00330
03100474
P
00331
20300175
X
'U0332
·····120'77754
00333
16677777
X
00334
536uOOOO
'0
033
5'"
'20
T04006
.
00336
40300267
00337
...
40300270
00340
20104002
U
0341
31104007
351
382
383
384
"385
386
387
388
389
391
.....
'f.
...
..
········Of····
392
UOSRCH05
·
..
·
..
····
...
3·9·3·····
....
·········,
....
············
..
···
394
395
396
397
398
399
399+001
"399+'OQ2
399+003
399+004
404······
........
.
LCGHI···ROUTINE·
ERROR
CODES
••
"
••.•••.•
w
•••.•
•
.•.•.
tEG'A
t'j
OB/US
ERG
00 E
JOB
NUM8ER
OUT
OF
TIME
ILLEGAL
J03/USER
CODE
'E
XPERi~ENTAL
·OS3
IS
RUNNING
EQU
If.
to·A'·············
ACCNUWrPSA
·······IS·THE··
USER
AlREADy·tOGGEO
IN'"
AZJ,LT
.+2
JUMP
IF
NOT
HLT
·+1
WHAT
DO
WE.DO.NEX1
CtrAQ'~r,ps/fLOAoTHE'
JOBI
USER
NUMBER
S!AQ
AGGNUM,PSA
SET
THE
ACCOU~T
NUMBERS
Rid
UOSRCH
SEARCH
THEU~ER
DIRECTORY
AZJ,NE
NORMSYS
JUMP
IF
NCT
FCUNO
LOA
SELECT,PSA
GET
QUEUE
NUMBER
SHA"'24+
5 .
GET
T
HE
ACTU.AL
QUEUE
NUMBER·'
XO
FASTQN
COMPARE
IT
WITH
THE
FASTQ
PNTR
TA X 2
.............
X2~JJg.O
..
O
r:HLlf...fAST.
QU.EUE
CD
··CORE+OO·SF3CKS',Xf
4
STA
SFBLKS~PSA
If
.
STA
. .ISF.dlK""PSA
SET
THE
TOTAL
SAVED
FILE
SPACE
4
LOA
CORE+UDTIMLIM,X1
4
S8A
CORE+UDTIME,X1
If.''
""'00342
····
...
054'7~7777·X"·M
u0343
01000346
P
"408'1'0
tit..···"
..
·..
,.,'
··,tt::;'
GwS'
.....
FASTfMAX'
...............
,
....
,
...............
,',
.......
,
"'~SKT
P'IF'
U
S2
R'
MA'X"
..
,
...........
"~
...............
,..,
..............
"
...
"
..........
"
..
,"'
.........
,.,
...................................
"
...................
,
.............
,
........
,
.....
,
...
..
408+0Q2
UJP'
~+3
OTHERWISE
SKIP
CHECK
.
0034[.
05200001
40e+003
ISG 1
X2
SKIP
IF
NOT
IN
FAST
QUEUE
'li08+!lOii'
·······ENA
FASrTNAXTHEN
SET
I r T
C',-riEf-fAXTMUR
"0'0
34
5'
...
1'460
O:?r4Z
00346
1+0377777
o
0347·03
20
0355
00350
12000001
409
STA
!I~bIM~~SA
SET
THE
ABSOLUTE
TIME
LIMIT
....
410.,
..
AlJ·
t
GE·
..
···
..
····uD;;,RCH"'··CJ····
..
··
·
...
·,JUMPIF···
TIME
..
I-S··l-EFT
..
411
3HA
1
IF
USER
IS
50%
OVER
HIS
ORGINAL
412
ADA
GORE+UOTIMLIM,Xi
TIME
LIMIT
REFUSE
TO
LET
HIM
••
,
...
,,'
....................
'
..
,.
•
••
W'
4
·:1:'S··
...
··
".
.
....
,
...
"
......
,
.........
,
....
, ,
..
'
....
,·
..
,,··'·
..
·
..
AZ·
J
:J:i..
+3 .
···
..
·t::
O-(j
,
....
IN········
..
.
.....
,
................
,
...........
,
..........
,
................
,..........
..
.....
,.,
...
,.,
..........
,
..............
,
..
,
..
'"
.......
,'
..
",
..
.
00351
:30104002
..
0035203200'3'55'
P
00353
141ll000t
.
QQ3~~
01000475
P
..........
U0355P
00355
20104003
ll035
6 . 0
5!,l.7177
,X
00357
01000362
P +
00360
05200001
+
···
..
003
6i..i4'o'0035ErX····
m
...
,'
••••••••••
,~
..
,
....
,
...
4"1'7+'004''''
00362
40377777
X
418
00363
20104004
419
'a03544Q
37777'1
x
...
·4'ZO·
.....
00365
1170DOOil 6
DOD
0
421
..
00365...
·37.
1u
4tH)
5....
;.2.2
.....................................
.
00367
21300
X
423
00370
12400
424
.,
............
~
.......
"""Cl03'11
·
....
1·7·'10 ·;j·7fiU··"
00372
531]40000
00373
16600000
····
...
·
..
·········
..
··················00374
40'377777
X
00375
20104005
00376
,21300i45X
00377
121+00004
00400
05500000
.
........
..
.....
0
0401':17
4''1'7756
..,',.....
.
00402
40300301
X
00403
12000013
"00404'
0030IFt'iJ6
P
OOy05
03300474
P
an~Oh
1~000027,
00407
17600001
00410
03000431
P
,
....
",
....
'0'0
41:1
...
'
...
·;)4
05·030'5-'7(
.....
'
ENI
i.Xi
ENTER
THE
ERRCR
ceDE
UJP
UOSRG
'ECiU'
If.
LOA
ORE+UOMF8LIM,Xi
.····
..
ASG,S·......
ASTMMAX····,SKIPIFUSERI'fAXMF8LKS
.,
................................................................
.
UJP
4+3
OTHERWISE
IGNORE
THE
CHECK
ISG
1,X2
SKIP
IF
NOT
THE
FAST
USER
··
...
'····~
...
'~···'''''E-N··A'··
....
,
...........................
,p
...
AS'-r'Mt'l
A
..
'X
..
··'
...
·····~
...
··...
........
··
..
··
...
·
........
··
..
·T
..
H·EN
.....
·S
e·r
.....
T
O·
..
··M1J.
..
X'IMtiM
.............
···
..
·
.....
·
.....
·
...
·····
.......
··
...
·"
..
·
...........
·.,
....
,
........................................
,
..................
"
.........................................
,
..................
.
STA
MFBLKLIM,PSA
SET
THE
SCRATCH
FILE
SPACE
LIMIT
LOA
CORE+UDSF8LIM
Xi
·····
...
··'snr
...
·'·
............
SFHCkCft1;
PSl~
...
L....
.....
SE'r'T
HE
SAG
FILE
SPACE
LIMIT'
[CHA,S
JDDODDB
..
,·L?
A,
C
CRE+UOFLAGS,X
1
..
SELECT
,PSA
6--i-5
FINO
THE
INPUT
QUEUE
NUMBER
037uOB
..
·······"
..
·,·........
o
+II'IPURE
.....
SET
..
ME:'S$AGE81T.FOR
DATE.
'RF77PSA
D
CORE~UDFLAGS,X1
LOAD
THE
FLAGS
~ORD
AGAIN
UJ.Q···
.............
·5·YS·GODE,PSA
......................................
GET
SYSTEMCOCE
SHQ
23-19
BATCH
eIT
TC
FOST
Q~G,S
0
SIP
IF
NOT
BATCH
'AN·A'S-1?
..
····.....
....
....
...............
,......
..
TA
i<
E"AWf!.;·Y·SA"TC
H'US
ER
S
.....
p RI0RITy........
..
'
......
',....
......
.
STA
UDBITS,PSA
AND
SAVE
IN
THE
PSA
SHA
23-PRIV8IT
CHECK
THE
BIT
SJ3'
....
+2
..
'
...............
····JOM
p"
IF
"CHECK
I N
G'NO
TNEE
OED
AZJ,LT UDSRCH07
JUMP
FOR
FAIL
TEST
S8A.·
..
·
.......
,·.··
....
·
........
·
..
2·
4+
P.R
TV
S·IT,""1·4
+·J·CHEC
K S
CRE
AMBIT
ANA 1
MASK
TO
1
BIT
AZJ,EQ
UDSRC
5
JUMP
IF
ALRIGHT
...................................
·R·A·e···
..
····"
...
···S{;RE·A
··'''''PHE···e
o-NSO
..
l:·E-'
.....
····
..
"··
...
·····~··
............
,
..........................
,,,
............
,
........
~
.......
"
..
.
00412
20077777
X
0"
-·····
..
········
..
·················8·Ht±·~·
.
·5l~3·
..
galr·p
LOA
BUSY
MAKE
SURE
THE
MESSAGE
CAN
8E
CUTP
ENO
10
ONLY
TEN
MESSAGES
BACKED
UP
AO'J,GE
UDSRGHXS"OON";tTFRIRTnrrSCNE8UI
SCREAM
0"
0>
U0415
11002424
P
.
D0416
1!t70a02Q
00417777:30000
U0420
14200422
P
0042·1··01·IJ7·7777·X"
....
·
00422
14200424
P
ODS05 0
ECHA
STARS
............................
ENQ..STARSL
..
VFD
A12/DINT
ENI
"+2,X2
ENTER
THE
RETURN
........
"
.............
,
............
Udp·"
·
...
·"
....
,··
.....
··OPMS·G
..
···
...
·,·······
................................................
"
.............................
,
...
"
...
,
................
,
...............
"
.....
'
...
.
ENI
·+2,X2
ENTER
THE
RETURN
Ii o
o
o
o
o
o
o
o
o
o
o
o

()
o
o
o
()
o
o
o
o
o
o
o
ASSEM8LER/OS3
Vl.U
09/21/74
2232
Jb423
01077777
X
00424
110J2424
P
00505
U
00425
14700020·
UO~26
14200430
P
00427
01000421
X
00430
17'74U
;)
00'
00431
14600000
00432
44377777
X
rrD~33
144f7777
X
00434
34300024
X
·00435
5301-0037·
00436
OU700312
P
iJ
0 43 7
:5
310
000
(}
U0440'
12000026
00441
21300130
X
00442
17777777
00443''53040000
.
00444
40300441
X
u044Si47UOOOU
U0446 5:16QOOOO
00447
202lJrJOOO
00'450
"
~046000
GO' .
00 1
-151
416JIJOaO
00452
14100006
0016
3"412
OOC
G r
()0454
15200
00455
..
0250.0
00456
203UO
00457
14177
o
0460"~"'4i's7'7777"X'
..
~.,~
......
~
....
,
00461
1530000:t
00462
02500460
00453
'1:4700002
00464
41377777
X
00465..
537.130
(l
o 0 46 6
47
3ll
(j 5
00467
777:)00
......
00470
Q
047
i
00472
00473'
U Q
47
,+ .. lC'
..
u
00474
1410000
OOit?
GO
LJ75"'20fj-7?'77
00476
35300326
00477
40300476
1)0500
1450Dl102
0050
i
..........................
lJ
0
..
5.0
2.
."'~'J·u···,,·'"'.,"'u.<'-
_.~.·_
..
~
••••
•
••••
N
U 0 50:3
00504
PAGE
10
ACCOUNTS
LOGIN
ROUTINE
441
442
443
444
445
446
447
UOSRCHX5
448t,JuSgCfjD6
·····449
450
450+001
.
450+lJ02
450+003
~450+
00 4
...
~
..................
.
450+005
450+006
4:50+007
45
e
···45a:
461
462
UJ
PAGC
P
RIN
T
ECHA
STARS
ENO
·S
TARSL
O~~
~tRsa2
V F
0·····
..
'A:t2:1
E1
NT'
ENA
0
SWA
IN~.!L~SAAI'T
ENA;S
l:::in
RAO
I080UNO,PSA
THQ·
···oATE··
RfJ
SHIFTRAT
TIA
Xi
SHA
22
LOQ
ACCSTUFF,PSA
ANQ
...
.7.177Tp
...
AQA······································
STA
ACCSTUFF,PSA
ENG!.
····0
TAl
X 2
LOA
U,X2
····0····
.
O,X2
8-1-1
Xi
····1,
XZ·'
..........................
.
1
X2
if:
!,Z,Xl
rl,PSA
ZLIsr
,Xi
ZtOCPSA····
1,PSA
......
~-?,>(1.
....
:1J
•
..
2+H-lP
~
T
H1L
IH,
PSA
1'1
FBt. KL !
1.1".8
Xi
UDSRCHt16
PRINT
CUT
THE
JC8/USERNUKBER
INDICATE
LEGAL
JOe/USER
NUMBER
.
....
SE T
TH
E .
USE
RS
IND
EX
.1
CLEAR
THE
MASS
STORAGE
WAIT
GET
THE
CURRENT
DATE
GET
THE
SHIFT
NUMBER
FOR
HIM.
AND
PUT
IT
IN
THE
ACCSTUFF
WORD
"AND
PUYIT
IN
THE
ACCSTUFF'WORO
.
GET
ACCSTUFF
POINTER
THROWAWAY
OLD
RATE
SCHED
ADD
TOGETrlER
................ '
...
.
CHECK
FOR
A
BATCH
JOB
ZERO
THE
CARD
COUNTER
CL,EAR.At,L
. .EUJJTtlE
....
f.IB S T
..
WORO
..
LOAD
THE
NEXT
LINK
OF
THE
QUEUE
ZERO
OUT
THE
APPROPRIATE
COUNTERS
L
OJ)
F
LJ
N
TI
L.DC
!'IE.
HEPSAINDEX
..
HE
CURRENT
FSA
ADDRESS
NT
INTERFERENCE
MpuIF"HOREui
NTHEQUEUE'
EAR
THE
QUEUE
POINTER
-
".
.
~
ERROR
CODE
2/3
ILLEGAL
NUMBER
INOICATE
USER
IS
.....
NCi
I
..
L,.OG.(;
..
E.QON
rIME LIMIT
AND
THE
FILE
SP.pCELIMIT
ODE
TO
A
U
050
5
4,·~~~·¥·~·¥·*···h
+
, ..................................................... ,
..........................................................................................
.
10
..
'.'
.............
...................................................... . u·.·
..
· ..•••• · ... ·
...•...•.
,
.......................
,.....
...............
..••
.............................
..........................
..
....................... _ .................... , .................................................
,_
....................................................
,......
..
,
:)0
o
c>
I.e)
o
o
o
o
o
o
o
o
o
o
o
o
o
o

([
t
a~
1
()
C)
o
o
ASS
E
~18
LE
RI
as
3
V1.0
U9/21/74
2232
PAGE
'00511"14101.000
00512
20300477
X
,0051314-577171
00514
06004000
00515
01000553
P
\J
05162
5
~~
I)
0
512
. X
00517
33104000
00520
134LlOOOO
00521""""03nr0512
P'
00522
01000000
··,0,0530
····21077177
,x·
00531
03700533
P
00532
14600DOO
005'33'
4QO 0060
O-PH'
J0534
14200065
X
00535
14300511
P
.
II
0536"3
0077
777
'X
U0537
P
.
500
501
502
503
504
'·505
506
507
5uB'
509
··510
511
512
.............................
'.
··················5·1·3
514
515
'·516
517
····518·
519
520
··52t·,
522
523
"'524'--
11
ACCOUNT;;,
UOSRCHoe--'EI'ff
UDSRCHO
9
LOA
UDSRCH
ENQ,S
MEQ
UJP
tDAQ
S8AQ
SCAQ
AZJ,
NE
UJP
USER
JIRECiORY
SEARCH
ROUTINE
W
PF3,;ia
ACCNUM,FSA
777778··,
cor<E+UDACC,8
UOSi<.CH11
·
..
·ACCNUMPSA
CORE+UDACC
7
X1
..
UUSRCH09
H1PURE
ENTER
THE:
LENGfH
·bF
THE'
aIOCk
LOAD
THE
ACCOUNT
~UMBER
SE
ARCH·
ON·
ALL
BIT
S
SEARCH
FOR
THE
NUMBER
NOT
FOUND
IN
THIS
BLOCK
LOAD
Att-48'
8TTS'W
ORTt-:·
..
AND
CHECK
THE!"
JUMP
IF
NOT
A COMPLETE
MATCH
"'"
-.,.,
"---
-_..
''''''
--"
THE
FOLLOWING
IS
THE
SCATTER
FUNCTION
FOR
ThE
USER
DIRECTORY
,wAQA
MUA
AQA
UOHASH
'UOSELEGTVFO"A91IMPLJRE,AI5/*+
IMPURE,
A24/IMPlJRE'
UOSRCH1:0
LOQ·
·UDlENGT·H,
AQJ,
L T
¥-
+2
ENA
0
STAA
OORESS·"
.......
..
~~I
~B~2c~TI8
X3
...
U010
UOIOX
··ADAUSERDIR.,L
..
EQU
¥-
u···",·,1J0537
13000030
()
00540
77650001
0054-1
12000011
'0054'2-"'1-3000:0'3tl"
525
526
527
SHAQ·24
..
PFA
PFLOC+PFR
o
o
o
o
(J
o
0
-.
>~
0,
Oli
005
L
,3
14-1010iHl
00544
47300573
P
J0:5Lt5
'143li056l~P
Ll05 i
t677730000
···,·,···,·[),054;7·,O
fJ777
777·
X
00550
14600000
(0551
77640001
"00552
'-"'OioOtJOO'u'-"
00553
20004000
00554
03100560.P'
..
J0555
...
4tf30
0335
x
00556
14600001
0(1557
...
tHOO
0522
P
00560
20000600
P
00561
15600001
00562-01'0
tJ
0530p·"··
o 0
'56
3 0 0
17
7
77
? X
00561+
77740000
·rJO'S6S·!.+730
0552
.
P'
00566
54300576
P
00
567,77
650001,--
00570
44000550
P
U0571
130UIHl17
····00·5·72·········77
00573
01
00574
C057S
00576
00577
00000000
0000
0·0
0
u,·,
00000000
77777777
...........
,
.............
·
..
···········[J·iJ·60
fj-··,P··········
OOE02
00
c04
no
EO
5
00601
P
'006D3'P-
528
SHA
9
...•••..
'
...................
··
..
···5·2·9····················,
..... N
••••••••••••••••••••••
.......
···SHA-ct············
..
···
..
··········2·/f··
530
ENI
WPFB
Xi
·g·~l
..
g~{...
····gg~g~~~t-~~3
533
VFO
A12/DINT
····3~:i
4
.........
····
..
,,·······················,·,··,R1
J·
..
FINK
535
UDPFRSTR
ENA
IMPURE
536
APF
PFLOC+PFW
,]{3'7-
u, ·1JOE:XI
..
T·~U;JP·
··
....
IMPtJR
E"
.
538
UOSRGH11
LOA
CORE+UOACC
SAVE
THE
CONTINUATION
ADDRESS
RETORNTtfTHt:CCR
peET
rON
ROUTINE
,·CA
LLTHE·· MASS··,··STCRAGf,····ORIVER·
RESTORE
THE
PPGE
FILE
WORD
EX·IT·'······~······
539
AZJ.,.N
~
+4
.
5q:'0
Sf
A
········SFBCRS·,PCLEAR
fHt
SAliE·FILESPACE
COUNTER
541
ENA
1
NON-EXISTANT
ACCOUNT/USER
CODe
5£.2·,.
UJfL
UOSRCH
......
.
543
LOA
ADDRESS
LOAD
THE
CURRENT
BLOCK
NUMBER
544
INA
1
ADVANCE
TO
THE
~EXT
BLOCK
557
, 55·8
559
560
561~·
562
563
564
565
.....
566
566+001
UDIoam
UDHASH
VFD
"UOQUEUE,VFD
UDPSA
VFO
EXPAND
VFD
'ADO
RESS
·"EQU·
FM
EQU
Ace
W
ORG
S
:3S
S
, P OSTTIO'/'l
TGU
TOTAL
BSS
, ,
"'"
~'"
"""
"'---
RAl
EFACT
ass
tJDSRCHi·O·····················
AND
·····T·Ry·A:GAIN·······
..
····
MACHERR
IRRECOVERABLE
ERROR
A12/EINT
ENABLE
THE
INTERRUPTS
.........
~
..
"'U
DE:XI
r,·X3·SAV
ETHER
£1
U
RlfA
ODR
E SS··
UDPSA,PSA
LOAD
THE
PSA
INDEX
pr:
LQ
c·+.
P F R
UDPFRSTR
15
..
SAVE
THE
PAGE
FILE
HaRD
w
••••••.
·
.....
~.,
•• ·
•••
to.AO···
...
TH2.-PAGE.FILE
..
WORO
......
.
CONTINUE
FRQCESSING
A24/IMPURE
SCATTER
FUNCTION
CONSTANT
09/000,A15/IMRLRE
····EN·.Q···.p
SA
P·OTNTER.
09/000~A15/IMPURE
CURRENT
PSA
peINTER
024/77r77777,A24/IMPURE,024/40000000
........
,
.....
'
E,XP'A'
NO
+'i
......
,
.........................
..
EXPl~NO+2
2
···ACCWORDS+I·
1
1
FACTOR
FOR
SHIFT CHARGING.
...
-~---~.-.-----------------
'>("1"
\..V
, "/1;;
()
o
o
o
o
o
o
()
o
o
o
o
o
o
o
o

<I
fl":
'Jv
()
()
()
o
o
o
o
o
o
o
o
o
01
o
o
o
ASSENl1LER/OS3
V1.0
09/21/74
2232
PAGE
00606
P
00606······01700
DOD
00607
U02200011
00610
00611
0004000D
··00612··
00613
00065252
00615
a\)
02
G Q D 0
··OD 61 6
..
·OiJ
Q2Q
O!)
0
00617
00240000
··00·620·
00·046314··
572
··573
574
575
576
577
578
579
580
582
583
584
585
586
587
588
··58'9
591
592
12
ACCOUN
TS
SILLING
INFORMATION
TABLES
"'~¥~4¥~.~
••
¥.¥
•••
¥.¥¥
••
~¥.¥
••
~
••
~¥~.¥
••
~~
••
¥
•••••••••••••••••••••
~
••
~.~~
••
~<
>I-
·.~HEFOLLOWINGTABL~CON~AINS-CONVERSIO~FACTORSFORA
ROUGH
¥
..
•
APPROXIMATION
OF
Joe
COST
ITALICS
eN
ROUGH
>I-
4,t
If.
·"'.··TA8t::
EVAL·l:JES'ARE'(u~ITS·21'i2)
PE RGENT
...
,
......
"1-
,.
".
.
COST
....•.
"., •.
".,->f'
"
.>,<
tNTiUES
IN
THIS
TA8LE
ARE
IN
IHESAt'lEQRDER
A~,
THEY
ARE
,IN
THE
ACGOUNl
INC
.
RECORDS
....
MACRO
NA·ME
DEC
CHARGE
DEC
CHAr'!GE
OEC
CHARGE
OEC
"PAR
.. ,
""
..
CHAR
GE"
($PAR(Z)¥21'12
BYTE
$PAR(1)J/$PAR(1)
CPU
SECONDS
.,
3(.~60~
.
.rO-)"O.306u-,.gg'~?'20
$300.00
PER
:36000Q.0
..
M
..
S
..
E:G
.;,..:
'
T,-.;:'
.
BYTE
·30(fOOT7 joO 00
WALL,CL
OC
K·
TIME
200,3500
$2.00
PER
3600
SEC
(36GO.2+12
BYTE
2001/2DO
LINE
PRINTER
RECORDS
$1.25
PER1DOD LINES
25)
1125·
..
....
...
.
.....
··,··PUNCHEDCAROS
.
250,1000
$2.50
PER
iODD
CARDS
{100Q¥2+12
BYTE
25Q)/250
PLOTTER
RECCRCS
$1.00
PER
510
RECORDS
10r.0/
10
G········
................................ .
C
AROS
READ
FER
1000
CARDS
TAPE
DRIVE
ACTIVITY
3
1000
$0.03
PER iODD
MSEC
110rrO'\<21'1"2
fn
TE3J
13
...................................................
.
CIAl
INPUT
RECORDS
PER.
100
RECORDS
PAPER
50,100
$0.50
TTOO"'"2'r'128YTE 50T150
.............
.
E PUNCH
RECORDS
taq
8ECQ.RD$
.....
,REMCTCLINE
..
RRIKIERRECOROS
5u,100U
0005
FOR
10U
~ECOROS
(10aO·2~12
BYTE
50)/5D
USER
DISK
PACK
TIME
CHARGE
750
3600
$7
.50
PER~6Q.9.;?t:C
·OEC
. ·······r
36U!J¥21'T2
..
BYT
e·7
5·0
177
51r·
..............
.
.'
•
00
013
....................................................................
,
............................
,
.......
···,uoJ..·t,.I.·················,·,·",·,·,··v,U-.J··I·1...
",
...•.•..•
, .... (.,. \0(
:'t:~CO
SL
...
,"', ..... ,"",.".,
.
,.,
. .16667..
.......
".
........
$
..
5
UFO
RT
APE.M
CU
N
TIN
G .
\
"'------,.,--------"""
...
---
•••.
,.,."
•...
,
.••..
,.,
.....
, ..... ,
..•
,
.....
,.,."
.......
",.,.,"',····
..
··,····
.... ··,·,,,il,fl,··,·,'l
·1··u"'····
..
··,,,··,,·,,,··,·
....
,
..
,·""'·,··,··",··,·,,·
..
,,,
..
,,·,,··,
..
,"'··
....
·,,'·,··'···6,··2
'1"
..
·'·······
..
,··,··''';..
.......
·
..
P··T·p·'e·H·R6t'·,····
..
E"f,}·U"
..
··,··,·
..
,·,··,
..
·
..
,··,··
..
··
..
·
'''''''2
"Q,f)
...
"'''
.......
"
..
,
.............
"
....
"
.......
,,,.,.
",.".""
"
..••
".
.''''''.''.'.''''''
...
$.:1.:
·.'·f),O·"·'··F'GR····'·
P"/l.
P
'E"R'·
....
T"·'Ap·E
..
''''·'··HA'N'·D·t··T·N·G
..
·'·,··,,,
....
,···"~
......
'''
..
,,
.....
,
...
,
.......
'''.,,-,...
""
...
,.,
.......
,
..
,.~
....
,
..
",""'
..
,.,."
..
".,.,."
...
,,
.....
,.,.,,
.......
"
....
..
628
~
o
o
'j
'0
o
0
()
0
0
0
0
o
o
o
o
()
o
o
----
-
---
-
~------.~--.----
- - -
---
--------.-
--
-----
---
---.-----.--.-,--.--~--.-
- -
_.-
_._,-
~-
-
-,_
.....
-- -
_.-
-
-.-
_._'- -
--
-.,-
--
-,--
--.~
--
-
-.-,~-.-~-.----.---
-,--_.-
-
--
-.-.-.-
--- -
-.-.-
--
-_.
__
._---
-----.-
----

CD
ASSEM8LER/GS3
Vl.0
09/21/7~
2232
PAGE
13
ACCOUN[S
BILLING
INFORMATION
TABLES
. ·····629
04540
630
MSFCHRG
EQU
2400
$5.00
FOR
DISK
PACK
MOUNTING
OJ
~
~'
~
()
J 0
J
I
.OJl6.ZJ
Z6
..
?21
~
..
:5L
.....
630+002
FORMFLAG
OCT
669
......
...
............
··········ENO·
....]6527557
FIRST
WQRD
..
Of .
.t.CRM.S
...
REC.O.ROS
NO
LINES
·
..
[;lITH·ERRORS
I 0 o
I
0 o
0
.......
,._
...................................... .
1.0
0
0 o
0 o
(:J
o
0 o
()
o
0 o
o:!
...................................
_
....
C)
Cl' o
()
("
o
01;
0:_
0'
o
II"
I
..
4;
C)
0"
()

([,
ASSEMBLER/OS3
V1.D
09/21/74
2233
PAGE
1
ACCOUNTS
()
()
o
o
o
o
o
o
o
o
01
A x
X
'/-
A80RT
·ACCOi·
A
(C02
ACC08
.................
···0011
6P
"ACCCL:R
ACCLOOP
ACCHEQ
ACCNUrvf
ACC03·
ACC04
AccpRINT
AGGS'fUPF
A
CCWOR.
0
ACC\WRDS
ADDRESS
8IT19
8lT23
>f
8LKR
3U;:'Y
>;.
'.
C
8P
C
NS.LK
GOR!;
..
.....................
CORER
COREXX
COST
COSTL
',<
Cpp·
..
·
DATE
-D.A.Y.S
CJ'!-D"
-
OINT
EINT
EPP
EXPAND
FAST
M~lAX
FASTCJ,N
FASTHIAX
FINK
FLAGS
X
x
·X
X
00120P
OLJ233P
'00223P
QD237P
UO.21~P.
GO
11+
OP
00141P
o
QUO
0
00602P
'u0600p
00005
....
00003
00000
Q4qao
x
...
x.
x
..
QtHl02
04003
00606P
00 G
i:3
00004
uQ037
onooop
l
FM
D0601P
"FORrIFL:AG-''''
....
'u0621P"
GEE1LK
X
GETBUFF
GTV]UFFP'
'f
HIGHHOUR
>1:.
H S1 L 0 C
..
HSITA8
H~ITA!3L
J/.
..
·HfCR·
1(-
HTFILE
>t-
HTlP
>.'
-RTWISK
>f
RTMAX
>1-
••
RIMSE....................
__
..
¥
HTMT
•
H1NULL
00010
,
.....
·J,l··H
TPLOT· ·······
..
·····
..
····tHJ·OB7·
¥
HTPTP
U0015
'I-
RTPUN
00U03
>f'HTR
A
FOllin
2
16
203
n0056p
.
17
235
·····215
000
72P
.
237
234
00ll5P
324
310
U0215P
316
"321
0
0230
P
330
348
00256P
307
323
00232P
"-18205
OOO~O~
489
00477P
241
+12
..
241+10
00l3.6P
241+13
241+1
00125P
19
441
G0423P
....
20
..
·····
...
171
.
OOO
..
t7fD
71
173
OU021P
563
564
00604P
56
f
20
9 . llo·iJ64"·p"
21
257
00146P
..........................
·22·
·4870
0475p·
.
aa
22+1
434+1
OD412P
,'6'"
87
0006P
I~....
0000
P
o
335p··
0366P
GOGOP
Q124P
tJ
65P
309
a
214P
3[16
G021iP
>I-
RIIASK
00013
215
0;
····
..
·~·~T+ty·
...........
····g8
gft·····~il··
..
.
Ii
X
:3
0
448
00432P
366
00276P
25300142P
501
00512P
'241+4'UU130P
316
00223P
7
OOOODP
351
"OG257p
163
DOOOlP
225
00104P
407
00340P
429
00375P
254
00143?
276
00171P
;3
96
G 0 3 2 SF
..
3550026:3
P
505
00516P
'''''450+5'00441P
...
20B
00063P
·············
..
·········
..
······3740
030
6P
236
00117P
'4'08-·
0034iP~
503
00514P
2~
..
0
....
G0152P
279
(J0174P
'3'~~O
····OO237p·'
..
···
..
·····'
..
··341
..
00250
p
...
346
00254P
3lj·6
...
Q.Q
2.2.4.P
450+1
Q043SP
.3
77+40
0
·3·lS?
222
OGI01P
547
DOS64P
408+4
OG345P
181
0003!)P
312
00217P
437
U0417P
393
00322P"
458"00444'P
224
00103P
····521
...
0053"3
p'"
361
a02?1?
1i12
..
003S
ip····
50:6
00517P
263
00154P
282
0Oll?P
478
DOlfE?P
'397
00326P
364
D0274P
417
. iJO·355P
538
00553P
268
00161P
285
OQ202P
533
IJ0546P
7
"'I~IPU
RE···
.....
····•······
..
·····~
..
·
..
O·G{}O·{}
..
····
w.
•
..
•
....
·•
.. •·
...
•••
..
;7-6
·
....
2dl
w·1101.1:-2p·
....
·
..
2·41·+1:
..
3··Q01:-41·P
..
,·
,
..
·
..
;H7+1···· 0
031
..
2p
....
··
""427
..
OO·37
..
3p
....
·
....
··"
....
4,85·
..
Q
..
O
47·4P
516
00526P
516
00526P
516
OOS27P
535
00550P
537
00552P
·
..
TOHOUNO·····
..
···
X
........
~~~
..
g
..
Rg~4~
.........................
~
..
~~g.g.~.~.~~......
5 5
~
...
Q
..
05.]§f'
560
O.Q6.0Q.F
ISF3ll<S
X
360
00270P
406
00337P
o
............................
)
..
/-
.......
tg~H
a U
R···t:.···
X
...
D.O
001£.
00001
....
8 0 0
00
o.P.. .
..................................................
.
0)
488
00476P
()
()
Q
368
00300P
4i9
OO363P
.10
270
00163P
305
002iOP
o
o
o
o
o
o
o
o
o
o
o
o
o
o

G)
(]
"
i.
t,;
~
()
I
0
I
()
0
0
()
0
()
0
0
o
o
~il
U
7
o·
0'
ASS
al8LER/OS3
lPTIX8C····
MACHERR
Vi.u
09/21/74
2233
PA
GE
2
ACCO
UN
IS
~1
ESFLAG _
MF9LKLIM
!1F
t3LK
S
HZ
'MSFCHRG
uE
MSFTHIE
i-ISWAIT
NHSHAIT
NORMSYS
c
NSHIFT
NU
x
X
.
·····(]·0·3
73P
x
X
(]
0
47
4P
x····
........
..
00035
07777777
X
'OPMSG
.......
u····,,··X···
..
·_·
PFLOC
00001
"PFP,'
DOD
00'
PFW
00000
·····PLOTREC
POSITION
PRIV6IT
PSA
35
:165
"'iJO
36
546
00563P
427·
··9
0
O·fj·O.op····
37
418
003E2P
38
475
00464P
"6'30""10'U
0000
fl'
39
271
00154P
40
175
00023P
'4T
"449
00433P
485
42
oaDnop
41+1377+
300314F
89
283
002DDP
42+1
336+1
00244P
(,.~····················439·0·0
if·Z1:P········
..
·
78
DOOOOP
536
OOSSlP
..
··19if0I105Ip····
202
00055P
..
···2-6 4···ua·1·55 P
492
00502P
399
OG330P
.
377+7·
00320
p
.....
"'445'
0"04'2
7P"
198
0005iP
550
UQ56?P
220
OUff77P
232
Ol.l113P
......................................................
213
OOU7DP
217
00074P
430+1
00403P
430+4
00406P
202
00055P
553
00572P
'521
00540p'
536
OOS5iP
238
(10121P
"158'
. 0
(J
(J02P
.....
····171
.
GO
0
17P
'"
...
"177
...
GO
024
P
201
00054P
203
OOD56P
205
OD060P
25900150P
26.0
JJD151P
275
D0170P
32700
235'
P 35'
5"00
263
P
.......................
_....
359"
n026tp
39
D0322P
395
00325P
397
DD326P
..
··40
··O·o.3·46·P···
·418·
(}0362
P
···4200
C364P
4~
004D2P
44
00432P
450
OD434P
47
00460P
47
G0461P
475
OD464P
............................................................................................................... / ...
1<
00477P
OSt}1P
.........................
·
..
492·
..
rJO
502P'
PTPCHRG
"""
~"'-"""
"~··'·"PT·PR'E'C·'"''
RATE
FACT
····
..
··RATETA8
..
·····
..
··········
..
·
..
·····x
READ X
DOSOSP
~
REGRATES OU25iP
RF60
....
·········
...........
·······
......
·,,·
..
··
.. ··
..
·
..
·····
RF77
>1-.
RPSAPT~
"'seRE-AM
SELECT
SFHLKLII1.
SF8LKS
S HFT
.1
00566
P
OOOGOP
ri,'~
'00:1'62'p'
..
00140P
..
(}
0
l·Z.7·P··········
.
00065P
339+1
0021~7P
2·41·+8·
·!lO·.1··35.fL
..
522
OC534P
4J4
399+1.
359
423
00361'P
405
OGl336P
220
00077P
550
D0567P
553
00572P
232
00113P
527
00540P
1840
0033P"i8
7"00036
P193
OO"OLt4P
241+4
00130P
253
00142P
256
00145P
27700172F
27.a
0017.3P
28.0
0.0
175P
36'0
0027QP3'o6'''b0276P
369
00301P
39S+1
00331P
405
00336P
40e
00337P
423·
..
· 0
0367P
..
428
·0
Q·374P429+1
00376P
45D+5
D0441P
458
OQ444P
469
00456P
476
DOlto5P
477
D0466P
488
00476P
·'~·
..
'
..
·········5nt··
..
··l10512P·H
....
··
....
·5·05
..
005·16P
······
.... ,
..
···········5
..
4000555P
......................
fl
()
.
I'~
. ,
\.J!J
()
o
o
UI
1,0
0
,
.-,~,
,.,'
--.
~,
...
0
0
540
00555P
0
"S
HIFTRAT':::
....
nfl··!:'
....
w
........
•
..
• .. •
....
·")!e1··""·9
.....
r\·(1··-!
..
'?lC::,
..
C\·
.. ·
..........
··
......
·
......
7}7·7·+·5·
·(Hl.··..;;:
..
i
..
;;.·:·C\··
....
·
..
··
..
··
..
"3''77'+8
..
,
OQ32'1p··
..
···450+2tJ:'04
..
36P
SPSERGHR
STARS
····
..
··
..
·········
..
STARST
..
·····
SH8IT
.
'1:
... SYSGN
.............
.
SYSCODE
>I-
SYSVAL
T
..
·1··
...
·
....
····
........
·
....
··
12
TERHINAL
"·C¥-
'TFC"
........
.
T
IfvlLIM
.
TOTAL.
TOTAL
TIt1
TPMNTCHG _
·HT·8T·A!::···
UDACC
UD8ITS
ODEXIT'"
U
JFLA
GS
UDHASH.
_
UDIO
UOI8ENO
at:JIO~1kIT'"
UDIOX
aOIaz
UO!::ENGTH
UOHF8LIM
.
UOPEr~STR
.
UOPSA
UOQUEUE
UDSEl::ECT-
UDSF8LIM
x
.0
x
40433
00000
········58
,.-=
a~
':l J
60
9T
61
565
6f:
624
··63
94
X 6 1
+
····U
0'5
52F
'''537'
00005
98
409
00345
271400157
26C
00151
12
GOiJDOP
"
..
·275
a
tl:l::
7 !Jp
..
503
OOS14P
369
00301P
429+1
00376P
"nr6
OiJG35P
........................
.
5(J6 00:517P
430
00i
r
02P
192
ao
Cl43
P"
429
00375P
422
00366P
Ofl574P
...
557
..
..
13
OOUUiJ
P .
..
514.00524P
00536P
524
00573P
554
·fl
0564P
547'"
00537P
525
00544P
531
X'
. .
.....................................
65'
00003
.
D0550P
00576P
0057
SP
"00526P
00004
96
......
535
.
559
558
......
·
..
···
..
·
..
·
..
51:6···
97
377
00311P
531
00544P
··S·32·
....
u054Sp·
..........
..
212
G0067P
354
00262P
230
00111P
Sl8GG53Dr-
417
00355P
......
1.99
...
aO.052P
..........................
481004
Z2P
187
00036P
201
00054P
183
00032P
184
00033P
....
.......
····:1:4
..
0 00"0 0
..
p
..
419
00363P
538
00553P
"r96"00047F
551
..
0.0570P
.
327
00235P
480
00471P
477
00466F
549
00566P
0
()
0
0
0
Cl
0
0
...
-"'1
U
0

(Ii
(]
(j
0
()
0
0
0
0
0
0
0
0
()
q;;
d1
0
~
;,
aL
Oi'
0'
il
Q,I
0'
ASS E t'IBLERI
OS
3
UiJSFGCKS
UDSRCH
UDSRCH01·
UDSRCH02
UOSi~CH03
UDSRGH04
....
UDSRCH05
UDSRCH06
. UDSRCH 07
UDSRCH08
UOSRGHU9
UOSRCHiO
UDSRGH11
'UDSRGHX5
'
UDSRCHX7
UOSRGHZS
Uti
TIM
E'
UOTH1Lli'I
.
UD,XPF····
USERDIR
'I-
USRNUt1
,
WCTIME
WPF3
ItIRITE
"""X1
........
.
X2
,.
X3·,·
V1..tl
Og/21/1
l+
OGOG6
2233
99
509
x
x
OOS22P
, 00 G
it
4?
00047P
OiJllS5P
GOOS6P
00322P
00432P
OLi474P
OiJ5i1P
,,00512P
OIJ530P
00553P
'OU
if31P
00475P
{]
a
35
SF
"O'ilOO
7'
a
I)
0 I) 2
..
[J
011ZF
X··
Olono
""~
,--"
GOU02
OUOG3
·,·,········1,93
196
202
203
392
4
L.
8
4 e4
..
500
·501
5113
538
447
486
416
"100
95
···23-1
66
67
84
·85
XLOG ...... , """"
ou
023P"
XREOENO
7.LIST
ZLOC'
PAGE 3 AGGOUNTS
361002/1P
364
[OZ74P
356
00264P
39~
00327P
.
185
0 0 0
34
p,.
188
U0037P
191
00042P
479'00470P'
204
00057P
494
00504P
37600310F
'43]+~
OU4D5P
523
00535P
508,0052iP
545
OOS62P
504
00515P
207
00062
P430+'600
l+iDP
,
415
00354P
41Q
0034'7P
"'368
UG30'OP'4080D
34IP'
407
OOJ40F
412
00351P
221
00100
p.,
52400536P
233
O(J114P
352
00260
P
161
000'0
SP
194
UQ04SP
236-
·OUil7P,··
2:
41
+
13
OOi41P
272
00lSSP
:;-
OiJ2:iOP'
G02S1P
OG31?P
i"£f'
oa353'p
465
00452
P
.
,50
I).
,005,11
P
169
aODiS,p
196
GOO
47P
·······284·
[jui:S5P
.
710
!.,..Ii"""
:;.t
D0226?
375
!:H}.3lJ7P
..
, 44'4'
'00425
?
2
ClO534P
:t
..
Oil
OOS
P
1 Of.l24[lP
.J.
:1
GOSl;4P
~
404
00335P
542
00557P
SOD
aOS!l?
375
O!J307P
162
OOlf06P
213
0OO70P
241
..
00124F··
254
00143P
275
00171P
305
0021:1:P'
351
OIJ2?lP
7+7
0032DP
417'
C0355P'
468
00455P
, ..
·5··05
OD5!?P
172
0OO2lJP
210
GOO65P
"'265'
.
OU:t56P
.'.
"<
",.-
UiC:
?
G0233P
99+4
00334P
461
uG446P
o tH.·i·or
GG24iP
IJ0545P
530
D0543F
1'63
..
flu
GOlf'
214
0OO71?
241+1··,·,
G0125F
261
G0152P
279
00174F
'-312-00217P
.
364
00274P
404
003.3SF
4T9"
003€;3P
..
470
DiJ457P
S.3G
(I
[l·543P·
174
OG022P
21
j9
OOO/SF
·······267
nOfti
GP'H
329
OG2.3EF
408+3
G0344P
"462
D
044
7P
3·13
00220F
353
OOZ61?
548
OOSESP
o
o
173
O[f02iP
"183'00032P'
219
OOOl6P
228
00107P
241+3
··OQ12tF
241
+8·
(10134P
263
00154P
268
00161P
282
00177P
285
00202P
'326'"
o
0234P'"
'3'3 0
"OO'237P'
368
G0300?
377+3
00314P
4G7
00340P
408
....
OO341P
'422
00366P
429
00375P
o
473
00462P
485
00474P
182
OOD3iP
186
0OO35P
226
0010SP
241+5
00131P
o
"u269
00162P
"'271
00164P
346
00254P
348
00256P
417
+3
0036QP
1+38
..
,
00420P
"'404
uOitS1P
"466
00453P
o
,,3<14
002.21P
315
00222P
376
00310P
481
00472P
o
o
o
,.
0
,
o
o
C)
o
o
o
---------
_____________
•
______
•
___
._
••
_.
___
,~._._._._.~
,_.
______
,
____
•
____
••
_____
•
___
r
____
._
••
_.
__
•
__________
___
•
___
•
__
•
___
•
____
~_.
_____
,
__
•
______
._.
____
•
______
_