Hi John,
Will the command run from QCMD? Do you get any syntax messages when you
try?
Gary
-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of jmmckee
Sent: Wednesday, March 30, 2011 2:40 PM
To: Midrange Systems Technical Discussion
Subject: OPNQRYF syntax error in PDM
I don't men to ask a programming question. Just need somebody else's
eyeballs to look at a OPNQRYF. PDM is complaining "The end of the
expression is expected" and has highlighted a line I will highlight with
and <<<. The purpose of the mapped fields is to convert a numeric
date stored as yymmdd to character and append that to a century. I am
obviously missing something. May be making it harder than it needs to
be.
I appreciate your thoughts.
eval cmdbuf = 'opnqryf ' +
'file((badplpp)) qryslt(''' +
'dscdte *ge "' + start + '" *and ' +
'dscdte *le "' + end + '" *and hsp ' +
'*eq "' + hsp + '"'') keyfld((' +
'lpmrc#) (lpacct)) mapfld((' +
'lpcen2#c lpcen2 *char 2) ' +
'(lpldd#c lpldd *char 6) ' +
'(mmdd#c %sst(lpldd#c 3 4) *char 4) ' +
>>> '(yy#c %sst(lpldd#c 1 2) *char 2) ' + <<<
'(dscdte lpcen2#c || yy#c ' +
'|| mmdd#c'' *char 8)' +
' (lphsp#z lphsp# *zoned 3 0 ) ' +
'(hsp lphsp#z *char 3))'
John McKee
As an Amazon Associate we earn from qualifying purchases.