|
Colon should be used as the separater for arguments to the subprocedure
LEFT.
----------------------
Scott
Scott A. Schollenberger
Chief Technology Officer
TENEX Systems, Inc.
2011 Renaissance Blvd., Suite 100
King of Prussia, PA 19406
Phone: 610-239-9988 Ext. 305
Fax: 610-239-9995
E-mail: saschollenberger@xxxxxxxxxxxx
Web: www.tenexsys.com
IBM Certified Specialist - eServer i5 iSeries Technical Solutions
Implementer V5R3
CONFIDENTIALITY NOTICE: This email message, including any attachments, is
for the sole use of the intended recipient(s) and contains confidential and
privileged information. Any unauthorized review, use, disclosure or
distribution is prohibited. If you are not the intended recipient, please
contact the sender by reply email and destroy all copies of the original
message.
----------------------
"They that can give up essential liberty to obtain a little temporary
safety deserve neither liberty nor safety." --Benjamin Franklin
----------------------
Larry Bolhuis
<lbolhuis@arbsol.
com> To
Sent by: Midrange Systems Mailing List
midrange-l-bounce <MIDRANGE-L@xxxxxxxxxxxx>
s@xxxxxxxxxxxx cc
Subject
10/20/2005 04:03 LEFT Error (Or PICNIC Error...)
PM REFORMATTED
Please respond to
Midrange Systems
Technical
Discussion
<midrange-l@midra
nge.com>
OK This is driving me freeking nuts. What is wrong with this eval
statement?
IPT1 and IPT2 are 15 character alpha fields. LN is a 2.0 numberic field.
The errors are from the compiler.
EVAL IPT2 = LEFT(IPT1,LN)
> abb
> cc
*RNF0604 20 a The token is not valid; token is ignored.
*RNF0312 20 b A right parenthesis is expected but is not found.
*RNF5377 20 c The end of the expression is expected.
PLEASE tell me whats wrong or just hit me!!
Yes that's a comma above the 'a'.
- Larry
ps: V5R3, RPGLE program.
--
Larry Bolhuis IBM eServer Certified Systems Expert:
Vice President iSeries Technical Solutions V5R3
Arbor Solutions, Inc. iSeries LPAR Technical Solutions V5R3
1345 Monroe NW Suite 259 iSeries Linux Technical Solutions V5R3
Grand Rapids, MI 49505 iSeries Windows Integration Technical
Solutions V5R3
IBM eServer Certified Systems Specialist
(616) 451-2500 iSeries System Administrator for
OS/400 V5R3
(616) 451-2571 - Fax AS/400 RPG IV Developer
(616) 260-4746 - Cell iSeries System Command Operations V5R2
If you can read this, thank a teacher....and since it's in English,
thank a soldier.
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2025 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.