Leonard,
I don't think there is a 'simple' way, short of reading each line in the
spoolfile and counting the number of 'used' columns. We have NBSPOOL in
our shop and it has a command whereby a spool file can be converted to a
'regular' text file. Even that utility, which presumably has access to the
'internals' of a spoolfile, when it is asked to 'auto' determine the record
length of the resulting text file, it scans the entire spoolfile as a
separate step, and then builds the text file.
The command file below will 'count' the characters in each line and report
the number of characters in the longest record.
Regards
Paul Christidis
<SYS>:print spflwdth
setvar maxlen 0
setjcw cierror = 0
while cierror = 0 do
continue
input sp > $null
setvar maxlen MAX(maxlen,LEN(RTRIM(sp)))
endwhile
echo MaxRecLen = !maxlen
<SYS>:
An actual usage of it:
<SYS>:spflwdth <o34973.out.hpspool
MaxRecLen = 79
Is there any way of determining the "width" of a spoolfile, i. e., the
maximum column number
actually used.
For example, I could set a file equation:
FILE REPORT;DEV=LP,1;REC=-228,,F,ASCII
but actually use only the first 210 positions.
It's the 210 that I am trying to find, not the 228.
Thanks.
--
Leonard S. Berkowitz
Perot Health Care Systems
(Harvard Pilgrim Health Care account)
voice: 617-509-1212
fax: 617-509-1955
pager: 781-226-2431
The information contained in this email message and any attachments
may be privileged and/or confidential. It is for intended
addressee(s) only. If you are not the intended recipient, you are
hereby notified that any review, disclosure, reproduction, distribution
or other use of this communication is strictly prohibited. If you
received this email in error, please notify the sender by reply and
delete the message without saving, copying or disclosing it. Thank you.
* 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 *
|
