Re: QPROCT and QPRODT

"Dennis Lovelady" <iseries-HF96MFG82JhWk0Htik3J/[email protected]> Fri, 30 Apr 2010 10:24:02 -0400
Newsgroups gmane.comp.lang.as400.mi
Message-ID <001d01cae870$cde5a180$69b0e480$@com>
> you can use ANY Branch/indicator Keyword from an eligible Keyword
> Group for an op-code and QPRCRTPG doesn't care.

Sorry, it must be slow-day for me (well, I mean moreso than usual).  I have
read the above several times and still am not sure what's being said.  Which
part (below) surprised you?  I'd really like to understand, 'cuz I'm sure
I'm missing something key.

> To my surprise, the following compiled successfully:
> 
> DCL DD MYVAR PKD(1,0) INIT(P'0');
> DCL DD INDICATOR CHAR(1);
> ADDN(IS) MYVAR,1 /POS(INDICATOR);
> ADDN(IS) MYVAR,1 /HI(INDICATOR);
> ADDN(IS) MYVAR,1 /MXD(INDICATOR);
> ADDN(IS) MYVAR,1 /NOR(INDICATOR);
> ADDN(IS) MYVAR,1 /TR(INDICATOR);
> ADDN(IS) MYVAR,1 /ZC(INDICATOR);
> PEND;

Dennis Lovelady
http://www.linkedin.com/in/dennislovelady
--
Phil Rizzuto (to Yogi Berra, driving to a banquet) :
  "Yogi, we're lost."
  "Yeah, but we're making good time." 



_______________________________________________
This is the MI Programming on the AS400 / iSeries (MI400) mailing list
To post a message email: MI400-Zwy7GipZuJhWk0Htik3J/[email protected]
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/mi400
or email: MI400-request-Zwy7GipZuJhWk0Htik3J/[email protected]
Before posting, please take a moment to review the archives
at http://archive.midrange.com/mi400.