RE: OVRTAPF Not Working in CL

["Richard Hartman" <r_hartman@xxxxxxxxxxx>]

The OVRSCOPE(*JOB) fixed my problem, but I will look into your advice. I 
have a lot of testing with that program still.

Thank you for responding.
Richard


From: "Orsburn, Glen O" <orsburn@foxvalley.tec.wi.us>
Reply-To: RPG400-L@midrange.com
To: "'RPG400-L@midrange.com'" <RPG400-L@midrange.com>
Subject: RE: OVRTAPF Not Working in CL
Date: Thu, 2 Dec 1999 09:57:38 -0600

Richard,

First time replying to one of these message.  I had something like this
happening to me.  The job was taking on another Call Stack level that was
messing me up.  Have you already look at your stack to see if this is
occurring.



-----Original Message-----
From: Richard Hartman [mailto:r_hartman@hotmail.com]
Sent: Wednesday, December 01, 1999 3:44 PM
To: RPG400-L@midrange.com
Subject: OVRTAPF Not Working in CL


I don't know if this is the right place to ask this question but I could not

find a list specific to the CL language.

When I run the following code from the command line, the routine works fine.

When I run it from CL, I recieve message CPA4091 saying that it is using
*FMT7GB. Which I don't believe should occur if my override is working.

I am using an 8mm tape. Running a V4R2M0 machine.
Does anybody know, or heard of such a problem?

INZTAP     DEV(TAP03) NEWOWNID(*NONE) CHECK(*NO) +
              DENSITY(*FMT2GB)
OVRTAPF    FILE(QTAPE) REELS(*NL) +
              DENSITY(*FMT2GB) SECURE(*YES)
CPYTOTAP   FROMFILE(FILE) TOFILE(QTAPE) +
              TODEV(TAP03) +
              TOREELS(*NL) TORCDLEN(436) +
              TOENDOPT(*UNLOAD) TOVOL(*NONE) +
              TOBLKLEN(32700) TORCDBLK(*FB)

Thanks in advance.
Richard Hartman

______________________________________________________
Get Your Private, Free Email at http://www.hotmail.com
+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator:
david@midrange.com
+---
+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: 
david@midrange.com
+---

______________________________________________________
Get Your Private, Free Email at http://www.hotmail.com
+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---