Brian:
I remember doing something like this in my past, and I used file equates
to the actual files.
Do file equations of the the two files and reference them from within
the program.
Olav.
Brian Donaldson wrote:
>Ugh, I had an epiphany about this problem earlier this morning, discovering
>what the problem really is.
>
>It's a bug in my program that only surfaced when I tried to process
>NM spoolfiles in the application.
>
>The scenario is:
>
>Open/read perm file, build temp file of same name. This part works ok.
>
>Process records in perm file, writing processed data to temp file. Works ok.
>
>At the eof on perm file, this is what happens and is buggy (not sure yet how I
>will resolve the issue)
>
>Original Step 1) FCLOSE perm file with 4 disposition (close and delete)
>Original Step 2) FCLOSE temp file with 1 disposition (close and save in perm
>directory)
>
>This worked just fine, no problem. Except for one little potential flaw in this
>logic --
>
>Execute Step 1) -- Perm file is gone
>
>Potentially a SYSTEM FAILURE could happen right here.........
>
>Thus both the perm and temp files are gone bye-bye!!
>
>I know, the chances of that happening are much less than the chances are
>of me winning the lottery, but...
>
>So I came up with a contingency to get around this potential logic flaw --
>
>New Step 1) FCLOSE perm file with zero disposition (no change)
>
>COPY perm file to hold file of same name
>
>This is where my problem started with the COPY command in the program.
>
>I discovered it is trying to copy the *temp* file to the hold file. BOO BOO...
>
>It needs to be copying the *PERM* file into the hold file.
>
>This problem has existed all along but only seemed to raise its ugly head
>when I started processing spoolfiles.
>
>So I will have to figure out another solution......
>
>Thanks to all who responded to my posting on this matter.
>
>Your help is very much appreciated.
>
>Brian.
>
>
>On Sun, 4 Nov 2007 10:22:07 +0000, Roy Brown
><[log in to unmask]> wrote:
>
>
>
>>In message <[log in to unmask]>, Brian
>>Donaldson <[log in to unmask]> writes
>>
>>
>>>Apparently, the copy problem only happens in the program with spoolfiles.
>>>The copy command works fine on other file types.
>>>
>>>I also tried fcopy with the same error:
>>>
>>>FCOPY FROM=O23.OUT.HPSPOOL;TO=HOLDFILE;NEW
>>>
>>>HP31900A.05.04 FILE COPIER (C) HEWLETT-PACKARD CO. 1999
>>>*105*
>>>CAN'T OPEN FROMFILE
>>>DISPLAY FILE INFORMATION (Y OR N) ?
>>>
>>>ABORT
>>>Program aborted per user request. (CIERR 989)
>>>
>>>I also discovered that the rename command doesn't work on spoolfiles
>>>
>>>
>either --
>
>
>>>:RENAME O66.OUT.HPSPOOL,HOLDFILE
>>>RENAME FOR THE GIVEN FILE TYPE IS NOT SUPPORTED (FSERR 392)
>>>RENAME failed due to file system error. Not renamed. (CIERR 373)
>>>
>>>
>>>Brian.
>>>
>>>
>>You wouldn't by any chance be writing this spoolfile in the same program
>>you are trying to copy it with, would you?
>>
>>
>>
>>>On Sat, 3 Nov 2007 15:37:00 -0400, Brian Donaldson
>>>
>>>
><[log in to unmask]>
>
>
>>>wrote:
>>>
>>>
>>>
>>>>Sorry, my email typo --
>>>>
>>>>the code in the program says --
>>>>
>>>>COPY O66.out.hpspool,holdfile;YES
>>>>
>>>>
>>When seeking help with errors in code, I cannot recommend the use of cut
>>and paste highly enough.
>>
>>It saves everybody, including you, from going off on wild goose chases
>>:-)
>>
>>ATB
>>
>>Roy
>>
>>--
>>Roy Brown 'Have nothing in your houses that you do not know to be
>>Kelmscott Ltd useful, or believe to be beautiful' William Morris
>>
>>* 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 *
>
>
>
* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *
|