RE: OVRDBF doesn't seem to be working

I am passing &FILE to AP340 just to display the file name on the output.
The program is input primary over APDTLWK2

FAPDTLWK2IPE E K DISK







Bob Ostrowski | Senior Programmer/Analyst
TRAINOR GLASS COMPANY | National - IT
11901 S. Austin Ave. | Alsip, IL 60803
T 708.293.4218 | F 708.293.6218
bob.ostrowski@xxxxxxxxxxxxxxxx | www.trainorglass.com





-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Morgan, Paul
Sent: Friday, May 27, 2011 8:18 AM
To: Midrange Systems Technical Discussion
Subject: RE: OVRDBF doesn't seem to be working

Robert,

Because you've done an override from APDTLWK2 to &FILE the program has
to reference APDTLWK2 instead of &FILE for the override to take effect.
Because &FILE has a different key that APDTLWK2 if AP340 is compiled
over APDTLWK2 then I'm not sure that override will work.

What's the code in AP340 look like that references APDTLWK2 and &FILE?

Paul Morgan

Principal Programmer Analyst
IT Supply Chain/Replenishment

-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Robert Ostrowski
Sent: Friday, May 27, 2011 9:01 AM
To: Midrange Systems Technical Discussion
Subject: OVRDBF doesn't seem to be working

The OVRDBF command below doesn't seem to be working. APDTLWK2 is a
logical file keyed on Vendor Name and Invoice Number.
When AP340 (simple print program) is called, the program uses the sort
order in &FILE (Vendor Number, Invoice Number).

Any suggestions?


OVRDBF FILE(APDTLWK2) TOFILE(*CURLIB/&FILE) +
OVRSCOPE(*JOB) SHARE(*YES)

CALL PGM(*CURLIB/AP340) PARM(&FILE)






Bob Ostrowski | Senior Programmer/Analyst
TRAINOR GLASS COMPANY | National - IT
11901 S. Austin Ave. | Alsip, IL 60803
T 708.293.4218 | F 708.293.6218
bob.ostrowski@xxxxxxxxxxxxxxxx <mailto:bob.ostrowski@xxxxxxxxxxxxxxxx>
| www.trainorglass.com <http://www.trainorglass.com>