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?
Principal Programmer Analyst
IT Supply Chain/Replenishment
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).
OVRDBF FILE(APDTLWK2) TOFILE(*CURLIB/&FILE) +
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
| www.trainorglass.com <http://www.trainorglass.com
As an Amazon Associate we earn from qualifying purchases.