Re: RPG-RISC Question

Vernon,

In a message dated 97-09-16 05:34:03 EDT, you write:

> >I just heard this from a friend upgrading from CISC to RISC.  Under CISC,
you
>  >were allowed to perform a MOVEA '001X10' *IN,50 in order to set
indicators
>  >50-55 with new values while ignoring *IN53.  My initial reaction was
"well,
>  >you're just using too darned many indicators" until this person pointed
out
>  >that the indicators in question controlled screen attributes (where IS my
>  >"FLDATR MyField Protect" DDS keyword, anyhow?).  Anyhow, I was told that 
> the
>  >"X" doesn't work under RISC.  Anyone with a different idea?
>  >
>  
>  Dean
>  
>  I just tried that code and got the following:
>  
>  * QRG5184 Severity:  30   Number:    1
                                    
>            Message . . . . :   Factor 2 not valid for result-field entry of

>              *IN, *INxx, or *IN,xx. Specification ignored.
                 
>  
>  at the end of the compile listing. This was on a V3R7 box but with target
>  release V3R2. So the good old RPGIII compiler didn't like it.

Thanks Vernon.  One of these days I'm going to start verifying this guy's
comments before I post about them.  We don't have an RPG compiler on our RISC
box, but I didn't think to check it out on the CISC myself...

Regards,

Dean Asmussen
Enterprise Systems Consulting, Inc.
Fuquay-Varina, NC  USA
E-Mail:  DAsmussen@AOL.COM

"Let us be thankful for the fools.  But for them the rest of us could not
succeed." --(Mark Twain)
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to "MIDRANGE-L@midrange.com".
| To unsubscribe from this list send email to MAJORDOMO@midrange.com
|    and specify 'unsubscribe MIDRANGE-L' in the body of your message.
| Questions should be directed to the list owner/operator: david@midrange.com
+---