HP3000-L Archives

November 2007, Week 1

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
Olav Kappert <[log in to unmask]>
Reply To:
Olav Kappert <[log in to unmask]>
Date:
Sun, 4 Nov 2007 20:19:05 -0500
Content-Type:
text/plain
Parts/Attachments:
text/plain (155 lines)
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 *

ATOM RSS1 RSS2