Ted,
If I had to guess I would say the file is being interpreted as a numbered
file. The difference between numbered and unnumbered is 8 bytes. So, Print
is stripping off the last 8 bytes (thinking it's a numbered file) and
showing you the 00. Quad and Editor are reading in the file as numbered,
reading the last 8 as the line number in 99999.999 format, so they think the
line number is 5.98 and shows you what they think the data is 00. Printing
it with the "nonum" options shows it all. COBOL and Suprtool happen to have
gotten it write.
Thanx,
Jon
-----Original Message-----
From: HP-3000 Systems Discussion [mailto:[log in to unmask]]On
Behalf Of Ted Johnson
Sent: Thursday, December 20, 2001 2:35 PM
To: [log in to unmask]
Subject: [HP3000-L] Data Strangeness
Has anyone seen something like this before?
Thanks,
Ted
FILENAME CODE ------------LOGICAL RECORD----------- ----SPACE----
SIZE TYP EOF LIMIT R/B SECTORS #X MX
RANDCF 10B FA 1 1 128 16 1 2
:print randcf
00
**USING QUAD**
/t randcf
File numbered
Nbr Rec: 1 Rec Size: 10 Bytes
File code: 0 File Access: IN/OUT
/l all
5.98 00
**USING EDITOR**
:editor
HP32201A.09.00 EDIT/3000 THU, DEC 20, 2001, 2:16 PM
(C) HEWLETT-PACKARD CO. 1993
/t randcf
/l all
5.98 00
**USING QUAD with the input file specified as unnumbered**
/t randcf:u
File unnumbered
Nbr Rec: 1 Rec Size: 10 Bytes
File code: 0 File Access: IN/OUT
/l all
1 0000005980
Another view of things...
:print randcf;nonum
0000005980
Suprtool reads the file correctly as does COBOL.
--
********************************************************
Ted Johnson [log in to unmask]
Information Systems
Wake Forest University 336-758-4374
Winston-Salem, NC 27109 336-758-7127 FAX
"You live and learn. Or you don't live long."
-- Robert Heinlein
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
|