RE: MOVEA & Eval (was *Blanks and *Blank)

eval a = ' ' will set the entire array to blanks.
The same as specifying INZ('Y') on the D-Spec, it will initialize every
element of the array to 'Y'.

The first example was a MOVE, the second a MOVEA.

Brad
> -----Original Message-----
> From: Bob Crothers [SMTP:bob@cstoneindy.com]
> Sent: Tuesday, October 20, 1998 8:18 AM
> To:   'MIDRANGE-L@midrange.com'
> Subject:      RE: MOVEA & Eval (was *Blanks and *Blank)
> 
> That looks like a MOVE, not a MOVEA.
> 
> In the C world, a MOVE is loosely equivalent to a a(1) = ' ' (set 1 
> element to a ' ') where a movea is equivilent to a memset(a, 0, 
> sizeof(a)); (set entire array to hex 0)
> 
> Bob
> 
> -----Original Message-----
> From: Stone, Brad V (TC) [SMTP:bvstone@taylorcorp.com]
> Sent: Tuesday, October 20, 1998 11:23 AM
> To:   'MIDRANGE-L@midrange.com'
> Subject:      RE: MOVEA & Eval (was *Blanks and *Blank)
> 
> eval a(1) = ' '
> eval a = ' '
> 
> Coming from a pc background, I recognize ' ' and prefer not to use
> *BLANKS (or *BLANK).
> 
> Bradley V. Stone
> Taylor Corporation - OASIS Programmer/Analyst 
> bvstone@taylorcorp.com
> Phone: 1-507-625-6464 x3147
> Fax: 1-507-625-8937
> 
> 
> 
> 
> > -----Original Message-----
> > From:       Bob Crothers [SMTP:bob@cstoneindy.com]
> > Sent:       Tuesday, October 20, 1998 5:11 AM
> > To: 'MIDRANGE-L@midrange.com'
> > Subject:    RE: MOVEA & Eval (was *Blanks and *Blank)
> >
> > So educate me...can and how do you do the equivalent of an MOVEA 
> with
> > an eval?
> >
> > One of the problems of being an ISV is that you are always several
> > years behind the rest of the world in the features you are using.
> >  Since we have just recently raised the minimum os level we support 
> to
> >
> > V3R1, we are just now starting to get into ILE.
> >
> > Bob
> > -----Original Message-----
> > From:       Stone, Brad V (TC) [SMTP:bvstone@taylorcorp.com]
> > Sent:       Tuesday, October 20, 1998 8:14 AM
> > To: 'MIDRANGE-L@midrange.com'
> > Subject:    RE: *Blanks and *Blank
> >
> > I prefer using eval.  :)
> >
> > Bradley V. Stone
> >
> > > -----Original Message-----
> > > From:     Bob Crothers [SMTP:bob@cstoneindy.com]
> > > Sent:     Tuesday, October 20, 1998 2:21 AM
> > > To:       'MIDRANGE-L@midrange.com'
> > > Subject:  RE: *Blanks and *Blank
> > >
> > > There is a huge difference between what MOVE and MOVEA does.
> > >
> > > MOVE treats the array element like a single field.  MOVEA ignores
> > > element boundaries.
> > >
> > > In the example, MOVE will blank out the first element in the array
> 
> > but
> > >
> > > leave 2 thru 100 alone.
> > >
> > > MOVEA will blank out all elements starting with the element
> > > specified...in this case, since you specified 1, the entire array.
> > >
> > > And if you do a MOVE *BLANK ar1 where ar1 is an array and you did
> > not
> > > specify an array element, it will also blank out the entire array.
> > >
> > > The moral is unless you know you need to use MOVEA, you should
> > > probably do a MOVE or MOVEL.
> > >
> > > And of course, there is no difference in the below between *BLANK
> > and
> > > *BLANKS in the below....because there never (that I know of) is a
> > > difference between *BLANK and *BLANKS (besides the S)
> > >
> > > Bob
> > >
> > > -----Original Message-----
> > > From:     Patpong W. [SMTP:patpong@zi-th.com]
> > > Sent:     Monday, October 19, 1998 9:13 PM
> > > To:       MIDRANGE-L@midrange.com
> > > Subject:  Re: *Blanks and *Blank
> > >
> > > Hans,
> > >
> > > I think this two keywords may differ when using with array
> > element(s)
> > > such
> > > the following:-
> > >
> > > A is an alpha array with a hundred elements, 1 byte each.
> > >
> > >   MOVE            *BLANK  A,1
> > >   MOVE            *BLANKS A,1
> > >   MOVEA   *BLANK  A,1
> > >   MOVEA   *BLANKS A,1
> > >
> > > So, what is difference for these samples?
> > >
> > > PPW
> > > ----------
> > > > From: Hans Boldt <boldt@ca.ibm.com>
> > > > To: MIDRANGE-L@midrange.com
> > > > Subject: Re: *Blanks and *Blank
> > > >
> > > > >Maybe this's a stupid question, but please explain it to me.
> > > > >My question is :
> > > > >* What diferences between *BLANKS and *BLANK at RPG ?
> > > >
> > > > No difference.
> > > >
> > > > Hans Boldt, ILE RPG Development, IBM Toronto Lab, 
> boldt@ca.ibm.com
> > > > +---
> > > > | This is the Midrange System Mailing List!
> > > > | To submit a new message, send your mail to
> > > MIDRANGE-L@midrange.com.
> > > > | To subscribe to this list send email to
> > > MIDRANGE-L-SUB@midrange.com.
> > > > | To unsubscribe from this list send email to
> > > MIDRANGE-L-UNSUB@midrange.com.
> > > > | Questions should be directed to the list owner/operator:
> > > david@midrange.com
> > > > +---
> > > +---
> > > | This is the Midrange System Mailing List!
> > > | To submit a new message, send your mail to
> > MIDRANGE-L@midrange.com.
> > > | To subscribe to this list send email to
> > MIDRANGE-L-SUB@midrange.com.
> > > | To unsubscribe from this list send email to
> > > MIDRANGE-L-UNSUB@midrange.com.
> > > | Questions should be directed to the list owner/operator:
> > > david@midrange.com
> > > +---
> > >
> > > +---
> > > | This is the Midrange System Mailing List!
> > > | To submit a new message, send your mail to
> > MIDRANGE-L@midrange.com.
> > > | To subscribe to this list send email to
> > MIDRANGE-L-SUB@midrange.com.
> > > | To unsubscribe from this list send email to
> > > MIDRANGE-L-UNSUB@midrange.com.
> > > | Questions should be directed to the list owner/operator:
> > > david@midrange.com
> > > +---
> > +---
> > | This is the Midrange System Mailing List!
> > | To submit a new message, send your mail to 
> MIDRANGE-L@midrange.com.
> > | To subscribe to this list send email to 
> MIDRANGE-L-SUB@midrange.com.
> > | To unsubscribe from this list send email to
> > MIDRANGE-L-UNSUB@midrange.com.
> > | Questions should be directed to the list owner/operator:
> > david@midrange.com
> > +---
> >
> > +---
> > | This is the Midrange System Mailing List!
> > | To submit a new message, send your mail to 
> MIDRANGE-L@midrange.com.
> > | To subscribe to this list send email to 
> MIDRANGE-L-SUB@midrange.com.
> > | To unsubscribe from this list send email to
> > MIDRANGE-L-UNSUB@midrange.com.
> > | Questions should be directed to the list owner/operator:
> > david@midrange.com
> > +---
> +---
> | This is the Midrange System Mailing List!
> | To submit a new message, send your mail to MIDRANGE-L@midrange.com.
> | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
> | To unsubscribe from this list send email to 
> MIDRANGE-L-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator: 
> david@midrange.com
> +---
> 
> +---
> | This is the Midrange System Mailing List!
> | To submit a new message, send your mail to MIDRANGE-L@midrange.com.
> | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
> | To unsubscribe from this list send email to
> MIDRANGE-L-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator:
> david@midrange.com
> +---
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---