I think I have tried all the suggestion given, even the exact command that
Tom wrote below, but if I use a * in my ECHO command I end up with a FSERR
54 (Invalid file reference) and a CIERR 9425 (couldn't open output
redirection file). If I don't use a *, the date is changed, but only in a
temporary file.
I therefore presume that there is something wrong with the code before the
ECHO command. I have tried rewriting the whole thing differently, but so
far no luck, but I will continue testing.
thanks ... Terry
At 10:33 23/05/99 -0400, Tom Madigan wrote:
>Terry:
>
>The 3000 has a rather nasty habit of assuming where you want a file kept
>(either in temporary or permanent file domain). I've been bitten by this
same
>beast many times in the past. Try the following:
>
> :BUILD DATEFILE.SYSOPER;REC=,,F,ASCII;DISC=1
> :FILE DATEFILE=DATEFILE.SYSOPER,OLD;DEV=DISC
> :ECHO !DATE>*DATEFILE
>
>The :BUILD creates a permanent file. The :FILE equation tells the system
that
>you want to use the permanent file (,OLD) you just created and that it's a
>disk file (;DEV=DISC) rather than being shoveled off to a printer somewhere.
>When you do the :ECHO statement, the asterisk forces the system to recognize
>the :FILE equation you set up and the date is echoed to the permanent file
>rather than some temporary file where it thinks it should go.
>
>Hope this helps!!
>
>Tom Madigan
>SE Pennsylvania
>
>"My opinions are strictly my own ... Who else would want 'em?"
>
>Terry Prime <[log in to unmask]> wrote:
>> Hi,
>> I have the following command procedure set up to change the date in an
>> indirect file used in a turbostore batch job.
>>
>> SETVAR DATE,"!HPMONTH/!HPDATE/!HPYEAR"
>> SETVAR DIR,"@[log in to unmask]@[log in to unmask]@.@3000@"
>> SETVAR NEW,";DIRECTORY;INTER;PROGRESS=3"
>> SETVAR NEW1,"COMPRESS=HIGH;MAXTAPEBUF;DATE>=!DATE"
>> FILE DDFS.SYSOPER,OLD;DEV=DISC
>> FILE DDFS1.SYSOPER,OLD;DEV=DISC
>> FILE DDFS2.SYSOPER,OLD;DEV=DISC
>> IF HPDAY=7 THEN
>> PURGE DDFS1.SYSOPER.SYS
>> PURGE DDFS2.SYSOPER.SYS
>> COPY DDFS.SYSOPER,DDFS1.SYSOPER
>> COPY DDFS.SYSOPER,DDFS2.SYSOPER
>> ECHO !DIR>DDFS1.SYSOPER.SYS
>> ECHO !NEW!NEW1>>DDFS1.SYSOPER.SYS
>> ECHO ;ONLINE=START>>DDFS1.SYSOPER.SYS
>> COPY DDFS1.SYSOPER.SYS,DDFS.SYSOPER.SYS
>> DELETEVAR etc
>>
>> This creates a temporary file which is unfortunately deleted when the
>> session is discontinued. I thought that the DEV=DISC parameter would
>> create a permanent file on disc. What am I missing?
>>
>> thanks ... Terry
>>
>> <><><><><><><><><><><><><><><><><><><><><><><><>
>> Growing old is mandatory, acting old is optional
>>
>> Terry Prime
>> Client Services Officer
>> Queensland University of Technology
>> (07) 38641784
>
>
>____________________________________________________________________
>Get your own FREE, personal Netscape WebMail account today at
http://webmail.netscape.com.
>
>
<><><><><><><><><><><><><><><><><><><><><><><><>
Growing old is mandatory, acting old is optional
Terry Prime
Client Services Officer
Queensland University of Technology
(07) 38641784
|