RE: How to detect a letter?

Hi Michael
This is what I do
D Fromchar c Const('ABCDEFGHIJKLMNOPQRSTUVWXYZabc-
D defghijklmnopqrstuvwxyz')
D Tochar c Const(' -
D ')

C eval Newfield =
C %xlate(Fromchar:Tochar:%trim(Oldfield))

Then see what the contents of Newfield is
If its ALL spaces - the Oldfield contained only upper and lower case a thru z
Obviously you can change the contents of Fromchar to what you need

Alan Shore
E-mail : ASHORE@xxxxxxxx
Phone [O] : (631) 200-5019
Phone [C] : (631) 880-8640
'If you're going through hell, keep going.'
Winston Churchill

-----Original Message-----
From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Koester, Michael
Sent: Wednesday, December 09, 2015 11:54 AM
To: RPG400-L@xxxxxxxxxxxx
Subject: How to detect a letter?

I'm guessing that someone has already had to do this:
I need to validate that a string contains a letter (A-Z or a-z) as part of an edit routine for valid email passwords.

I could brute-force this with for-loops scanning for each letter, but I suspect there is a more elegant solution. Ideas? Preferred solution would be RPG and/or SQL supported by v7.1.

(Hoped to find a previous discussion of this in the archives, but my creativity failed me for getting the right search words.) Many thanks.

Michael Koester
Programmer/Analyst
DataEast - Granite State Communications

--
This is the RPG programming on the IBM i (AS/400 and 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.