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.
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
>
>I also tried
>
>COPY FROM=O66.out.hpspool;TO=holdfile;YES
>
>(The from= and to= is valid syntax for the copy command)
>
>Both of them fail witht the same error -- cannot open the source file
>but the source file does exist.
>
>I did the copy command manually at the colon prompt and it worked ok.....
>
>
>Brian.
>
>
>
>On Sat, 3 Nov 2007 19:18:37 +0000, Roy Brown
><[log in to unmask]> wrote:
>
>>In message <[log in to unmask]>, Craig Lalley
>><[log in to unmask]> writes
>>>----- Original Message ----
>>>From: Brian Donaldson <[log in to unmask]>
>>>To: [log in to unmask]
>>>Sent: Saturday, November 3, 2007 10:06:47 AM
>>>Subject: COPY command issue
>>>
>>>I do the following command inside a COBOL program using the COMMAND
>>>intrinsic:
>>>
>>>COPY FROM=O66.out.hpsspool;TO=holdfile;YES
>>>
>>>The COMMAND intrinsic failed, returning an error code telling me it
>>>could not locate the source file.
>>>***************
>>>
>>>Brian,
>>>
>>>Unless you have a typo and meant to do an FCOPY, the copy command
>>>above will fail.
>>>
>>>COPY 066.OUT.HPSPOOL, holdfile
>>>
>>>will work.
>>>
>>>-Craig
>>
>>Even if it was a typo for FCOPY, or even if COPY allowed that syntax,
>>the second typo, 'hpsspool' (2 s's) would getcha...
>>
>>--
>>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 *
|