OPNQRYF result issue
Last Post 08 Jan 2013 09:56 AM by StuckinParis. 2 Replies.
AddThis - Bookmarking and Sharing Button Printer Friendly
  •  
  •  
  •  
  •  
  •  
Sort:
PrevPrev NextNext
You are not authorized to post a reply.
Author Messages
StuckinParis
New Member
New Member
Posts:2

--
08 Jan 2013 03:44 AM
I've got an OPNQRYF that if I put the results into a file via CPYFRMQRYF the dataset is correct, but if I run DSPPFM on the file it doesn't.it displays the file with the dataset as before it has been overridden

The code I use:

DCL VAR(&SELECTA) TYPE(*CHAR) LEN(93) +
VALUE('CONO55 *EQ "DA" +
*AND DNSD55 *EQ 1130102 +
*AND (ORDN55 *GE "0607691" *AND +
ORDN55 *LE "0607691")')

OVRDBF FILE(OEP55) SHARE(*YES)

OPNQRYF FILE((OEP55 *FIRST *ONLY) (OEP55E *FIRST +
*ONLY)) OPTION(*INP) FORMAT(OEP55) +
QRYSLT(&SELECTA) KEYFLD((OEP55/CONO55 +
*ASCEND *N) (OEP55/ORDN55 *ASCEND *N) +
(OEP55/ORDL55 *ASCEND *N) +
(OEP55/CATN55 *ASCEND *N)) +
UNIQUEKEY(4) JFLD((OEP55/CONO55 +
OEP55E/CONO55 *EQ) (OEP55/ORDN55 +
OEP55E/ORDN55 *EQ) (OEP55/ORDL55 +
OEP55E/ORDL55 *EQ)) MAPFLD((CONO55 +
'OEP55/CONO55' *CALC *N *N *CALC) +
(ORDN55 'OEP55/ORDN55' *CALC *N *N +
*CALC) (ORDL55 'OEP55/ORDL55' *CALC *N +
*N *CALC)) SEQONLY(*NO)
Scott Mildenberger
New Member
New Member
Posts:66

--
08 Jan 2013 09:47 AM
As described on this page, DSPPFM is one of the commands that ignores overrides

http://publib.boulder.ibm.com/infoc...3eoscd.htm

Scott
StuckinParis
New Member
New Member
Posts:2

--
08 Jan 2013 09:56 AM
Thanks for that
You are not authorized to post a reply.

Acceptable Use Policy