RE: /free snafu

[MWalter@xxxxxxxxxxxxxxx]

The compiler kicks it out. If I preface it with EVAL it works fine. The
thing is if this was the old way, it would work.

Thanks,

Mark

Mark D. Walter
Senior Programmer/Analyst
CCX, Inc.
mwalter@xxxxxxxxxx
http://www.ccxinc.com


                                                                                
                                                                    
                    "Bartell, Aaron L.                                          
                                                                    
                    (TC)"                      To:     "'RPG programming on the 
AS400 / iSeries'" <rpg400-l@xxxxxxxxxxxx>                           
                    <ALBartell@xxxxxxxx        cc:                              
                                                                    
                    rp.com>                    Subject:     RE: /free snafu     
                                                                    
                    Sent by:                                                    
                                                                    
                    rpg400-l-bounces@xx                                         
                                                                    
                    drange.com                                                  
                                                                    
                                                                                
                                                                    
                                                                                
                                                                    
                    06/24/2003 04:26 PM                                         
                                                                    
                    Please respond to                                           
                                                                    
                    RPG programming on                                          
                                                                    
                    the AS400 / iSeries                                         
                                                                    
                                                                                
                                                                    
                                                                                
                                                                    




How do you know it is not "OK"?  That is how I do my assignment operations
and I don't have any troubles.  I am on V5R1.

Aaron Bartell

-----Original Message-----
From: MWalter@xxxxxxxxxxxxxxx [mailto:MWalter@xxxxxxxxxxxxxxx]
Sent: Tuesday, June 24, 2003 3:23 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: /free snafu


I've found a little problem with /free

This statement is not OK:
     delete = 'Y';
However this one is:
     eval delete = 'Y';

You mean to tell me that the compiler can't see that this is an assignment
instruction?

Thanks,

Mark

Mark D. Walter
Senior Programmer/Analyst
CCX, Inc.
mwalter@xxxxxxxxxx
http://www.ccxinc.com

_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.
_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.