Fujitsu BS2000/OSD COBOL2000 V1.5 Benutzerhandbuch Seite 378

Adressliste
(12)
(13)
COBOL2000 V01.5A00 KOPIEREN
(3) (4) (5)
MODULE GROUP POSITION
SOURCE REL REL IN GROUP LEV
SEQ-NO ADDR ADDR DEC
00015
00017 00000BB8 000000 00000001
00018 00000BB8 000000 00000001
MODULE GROUP POSITION
SOURCE REL REL IN GROUP LEV
SEQ-NO ADDR ADDR DEC
00021
00023 00000CC0 000000 00000001
00024 00000CC0 000000 00000001
00025 00000CC8 000008 00000009
00026 00000CC8 000008 00000009
COBOL2000 V01.5A00 KOPIEREN
MODULE GROUP POSITION
SOURCE REL REL IN GROUP LEV
SEQ-NO ADDR ADDR DEC
00001 00000068
00001
00028 00000DC8 000000 00000001
00029
00030 EXTERNAL 000000 00000001
00031 00000DD0 000000 00000001
00032 00000DD8 000000 00000001
00033 00000DE0 000000 00000001
COBOL2000 V01.5A00 KOPIEREN
(12)
LVL SOURCE UNIT NAME
SOURCE REL SECTION NAME
SEQ-NO ADDR PARAGRAPH NAME
000 KOPIEREN
00035 00001040 ABLAUF
00049 00001280 READ-SAM
378
LVL
Schachtelungstiefe des Programms, beginnend bei 000 für das äußerste Pro-
gramm.
ÜBERSETZUNGSEINHEITNAME / SECTION NAME / PARAGRAPH NAME
Angabe des Übersetzungseinheitnamens und der darin vorhandenen Kapitel- und
Paragrafennamen.
LOCATOR MAP LISTING
DATA DIVISION
FILE SECTION
FILE NAME
FILE SERIAL NO.
ADDR LHE FCB
(6) (7) (8)
NO
FD SAM-DATEI
01 SAM-SATZ
05 ZEICHEN
FILE NAME
FILE SERIAL NO.
ADDR LHE FCB
NO
FD ISAM-DATEI
01 ISAM-SATZ
05 ISAM-SCHLUESSEL
05 SATZ-INHALT
10 FILLER
DATA DIVISION
WORKING-STORAGE SECTION
NO
G77 TALLY
G77 RETURN-CODE
01 FILLER
88 DATEI-ENDE
01 ISAM-DATEI-ZUSTAND
01 LAENGE
01 ISAM-SATZ-LAENGE
01 SAM-SATZ-LAENGE
PROCEDURE DIVISION
(13)
KOPIEREN
SAM-DATEI
001
000003A8
(9)
LENGTH IN BYTES
DEC HEX
0000000255 000000FF
0000000001 00000001 DISPLAY
ISAM-DATEI
002
00000790
LENGTH IN BYTES
DEC HEX
0000000263 00000107
0000000008 00000008 ZONED DEC R00009 M00038 R00041
0000000255 000000FF
0000000001 00000001 DISPLAY
LOCATOR MAP LISTING
KOPIEREN
LENGTH IN BYTES
DEC HEX
0000000004 00000004 COMP
0000000004 00000004 COMP-5
0000000001 00000001 DISPLAY
0000000002 00000002 DISPLAY
0000000002 00000002 BINARY
0000000002 00000002 BINARY
0000000002 00000002 BINARY
LOCATOR MAP LISTING
(11)
REFERENCED
BY STATEMENTS
R00037 R00045
09:58:34 2009-02-12 PAGE 0004
(1)
(2)
(10) (11)
REFERENCED
FORMAT BY STATEMENTS
R00006 R00036 R00047 R00051
REFERENCED
FORMAT BY STATEMENTS
R00007 M00036 R00047
R00042
M00051
09:58:34 2009-02-12 PAGE 0005
REFERENCED
FORMAT BY STATEMENTS
r00039 m00052
R00039 R00052
A00010
R00018 R00026 M00050
A00022 M00040
A00016 R00040
09:58:34 2009-02-12 PAGE 0006
Anhang
U41113-J-Z125-6