Subject: | |
From: | |
Reply To: | |
Date: | Fri, 22 Feb 2002 12:28:17 -0600 |
Content-Type: | text/plain |
Parts/Attachments: |
|
|
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 *
|
|
|