Re: How to detect a letter?

[Keith McCully <keithmccully@xxxxxxxxx>]

Since it's for a password, shouldn't it also include some numerics and
maybe some special characters too?

On 9 December 2015 at 17:04, Alan Shore <ashore@xxxxxxxx> wrote:

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