Re: IF Clause in /FREE format

[dmosley@xxxxxxxxxx]

Take your "C" away in position 6...

David L. Mosley, Jr.
Systems Analyst
2000 CentreGreen Way
Suite 250
Cary, NC 27513

www.dancik.com


                                                                                
                                                        
                      "Peter Vidal"                                             
                                                        
                      <Peter_Vidal@xxxxx         To:      rpg400-l@xxxxxxxxxxxx 
                                                        
                      com>                       cc:                            
                                                        
                      Sent by:                   Subject: IF Clause in /FREE 
format                                                     
                      rpg400-l-bounces@x                                        
                                                        
                      idrange.com                                               
                                                        
                                                                                
                                                        
                                                                                
                                                        
                      07/01/2003 09:21                                          
                                                        
                      AM                                                        
                                                        
                      Please respond to                                         
                                                        
                      RPG programming on                                        
                                                        
                      the AS400 /                                               
                                                        
                      iSeries                                                   
                                                        
                                                                                
                                                        
                                                                                
                                                        




Hi list:

In my sea of ignorance, thirsty of adventure, I have started to write some
code
using the /FREE format, now that we are on V5.2.  I have an IF statement as
follows:

C/Free
C         If Tcode = 'TA' or Tcode = 'ON' or Tcode = 'OF';
.
.
.
.
C/End-Free


... but this IF clause is in error:
Operation code is not valid; specification is ignored.

What's up doc?

TIA,
Peter Vidal
Pall Aeropower Corp.
SR Programmer Analyst
WWW.Pall.com / 727-539-8448, x2414

"A good player makes himself look good; a great player makes the team look
good."
Author unknown


_______________________________________________
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.