-----Original Message-----
From: Donald Frantum [mailto:[log in to unmask]]
Sent: Friday, February 22, 2002 2:46 PM
To: [log in to unmask]
Subject: RE: [HP3000-L] redirection file
Okay,
Leonard's advice about the temp file resolved the 10000 record limit issue,
but now it only creating a temp file. Is there a way to get a permanent
file created?
I know I have been asking a lot, but this is my first time doing this and my
resources are limited.
Thanks,
Donald
-----Original Message-----
From: [log in to unmask]
[mailto:[log in to unmask]]
Sent: Friday, February 22, 2002 12:52 PM
To: Donald Frantum
Subject: Re: [HP3000-L] redirection file
Are you sure you have the asterisk?
Purge the output file before you run this. It may just be a 10000 record
file left over, and the file equation cannot override an existing file
Make sure you purge the output file in both temporary and permanent
domains:
PURGE file,TEMP
PURGE file
If I were running this, I'd set it to 1000000. No harm as I said before.
===================
Leonard S. Berkowitz
Perot Health Care Systems
(Harvard Pilgrim Health Care account)
voice: 617-509-1212
fax: 617-509-3737
pager: 781-226-2431
Donald Frantum <[log in to unmask]>@RAVEN.UTC.EDU> on 02/22/2002
01:28:17 PM
Please respond to Donald Frantum <[log in to unmask]>
Sent by: HP-3000 Systems Discussion <[log in to unmask]>
To: [log in to unmask]
cc:
Subject: [HP3000-L] redirection file
No matter what I do, I am still getting an END OF FILE at 10000 records.
Since using the FILE POIDET=POIDET.GRP,NEW;DISC=500000 command, I am no
longer getting errors at the end of the file.
Could there be a problem when using HPSTDIN in the following?
setvar _my_eof finfo(HPSTDIN,"eof")
setvar _my_i 0
while setvar(_my_eof,_my_eof-1) >= 0
input _my_rec
setvar _my_rec_4 str(_my_rec,1,4)
setvar _my_rec_len len(_my_rec)
setvar _my_rec_rest str(_my_rec,11,_my_rec_len-11)
setvar _my_i _my_i + 1
setvar _my_i_str rht('000000'+rtrim(ltrim("!_my_i")),6)
echo !_my_rec_4!_my_i_str!_my_rec_rest
endwhile
Thanks in advance,
Donald
* 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 *
|
