Re: RPG-RISC Question

[Vern Hamberg <hambergv@xxxxxxxxxxxxxx>]

At 01:57 AM 9/13/97 -0400, you wrote:
>Hello All,
>
>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.

Cheers

Vernon Hamberg
Systems Software Programmer
Old Republic National Title Insurance Company
400 Second Avenue South
Minneapolis, MN 55401
(612) 371-1111 x480
+---
| 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
+---