Control Data Corporation 3300 Reference Manual page 189

Computer systems usasi cobol/ master
Table of Contents

Advertisement

USASI COdOl l.t
I
MAS1~~
2.1
00014
00015
00016
000 1 7
00018
OOOllj
OO()20
00021
00022
00023
00024
0002~
0002h
00027
00028
00029
000 3 0
00031
00032
00033
00031+
00035
00036
00037
00038
00039
00040
000
4
1
00042
0001+3
00044
00045
000 4 0
00041
0004~
00049
00050
00051
00052
000 5 3
00054
00055
00056
DGOO.l.v
uc-nO.l.1
[Juno
1,:
J (Ph) .I.
,j
u':
0 0.1.
<+
UA1A
DIVISION.
tILE
SECTION-
rU
FILE-A
LA8EL
~ECO~OS A~~ O~ITTE0
OATA
RFCORU IS
CA~O-IMAGE.
01
CA~O-IMAGE-
02
OEPT-NO
PICfURE X(5).
02 SECT-NO PlcrURE
~(~).
02 GROUP-NO PIC
xes).
02
AMNT-NO
PIC
9(3}Vq(2).
fo!)
FILE-B
LAd!L REtOHOS
~HE
OMITTEo
REPORT IS
~EPowT-A.
HEtJu,·H SEC T I Of-J.
~o
HEPORT-A
cONTkOLS
A~E
FI
N
4L. DEPT-NO.
SECT-NO
PA~E
LIMIT 15 bO lINES
HEADIN(~
1
FIRST
!)ETAIL
10
LAST
DFT~IL
SO
FOOTINc;
5S-
01
TYPE
IS HEPJHT
HEAOl~G
LINE
n2.
02
COLu~N
02
~IC
xx
VALUE
IS ,RH_.
10/14/68
02
COLUMN
5~
tJIC
~(15)
VALU~
'EXPENSE
ACCOUNT-.
U1
TytJE IS PAGE
HEADING
LINE PLuS 2.
02
COLUMN
i
PIC
X~
JALUE
_Pri_
02
COLUMN 110 PIC X(4)
VALUE
-PAGE-.
f)?
COLUMN 11 5 PIC
9qq
SOURCE IS PAGE-COUNTER.
02
LINE
PLUS 1
COLUMN
90 PIC X(8)
VALUE
~GROUP
NO_.
02
COLUMN 100 PIC X(7) VALUE
.EXPENSE~.
01
TYPE IS
CO!H~OL
~EAUING
FINAL LINE PLUS 2-
02
COLUMN
4
PIC XXX VALUE *CHF-.
02
COLUMN
bO
PIC
X(}7)
VALUE 'ITEMIZED BY GROUP,.
U1
TyPE IS
CO~TROl ~EADING
DEPT.NO LINE PLUS 2.
02
COLUMN 5 pIC
X~X
VALUE
_~HA_.
02
COLUMN 70 tJIC X(7) VALUE
,DEPT.NO_.
01
TYP~
IS
CO~T~OL
HEADING
SECT_NO
LINE PLUS 1
NEXT GROUP PLUS 2.
02
COLUMN
6 PIC XXX
VALUE
-CHS-.
02
COLUMN
80
PIC X(1) VALUE _SECTION_.
01
DETAIL-ITEM
TyPE
DETAIL
LINE PLUS 1.
02
COLUMN
7 PIC XX VhLUE
-DE-.
02
nEPT
PIC X(S)
COLU~N
70 SOURCE DEPT-NO
GROUP
INDICATE.

Advertisement

Table of Contents
loading
Need help?

Need help?

Do you have a question about the 3300 and is the answer not in the manual?

Subscribe to Our Youtube Channel

This manual is also suitable for:

3500

Table of Contents