RE:Validate Email address in RPGLE (Ashish Kulkarni)

message: 2
date: Fri, 17 Oct 2008 11:04:44 -0400
from: "Ashish Kulkarni" <ashish.kulkarni13@xxxxxxxxx>
subject: Re: Validate Email address in RPGLE

Hi

Would you let me know how to get the code page of job, and
convert '@'

or any link where i can get this information

Regards

Ash

On Fri, Oct 17, 2008 at 8:40 AM, Bradley V. Stone
<bvstone@xxxxxxxxxxxx>wrote:

What I do is retrieve the Code page of the job, then convert the
literal '@'
from the code page I developed on to the job's, then scan for that.

Bradley V. Stone
BVSTools - www.bvstools.com
eRPG SDK - www.erpgsdk.com

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of Takken, Cor
Sent: Friday, October 17, 2008 6:53 AM
To: RPG programming on the AS400 / iSeries
Subject: RE: Validate Email address in RPGLE


You don't want to check an email address only by the

presence of the

@-sign. A much better idea is to check it using regular

expressions.

This will not remove the limitation of the CCSID,

however there must

be a way to represent the string to check in unicode or

the likes.

Just my incomplete 2 cents,

Cor

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-
bounces@xxxxxxxxxxxx] On Behalf Of Ashish Kulkarni
Sent: vrijdag 17 oktober 2008 13:25
To: RPG programming on the AS400 / iSeries
Subject: Validate Email address in RPGLE

HiDoes anyone have sample of validating email address in RPGLE

program,

For example in RPGLE i can write
'@':1 Scan $1SeMail @Pos
If @Pos = 0
//process error here
endif

But this code will only work if CCSID is 37, as @ will

be valid

only for CCSID 37, but what is CCSID is different.
How do i check for the character,
Does anyone have any idea or sample code to do so

Ash
--
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 e-mail and any attachment is for authorised use by

the intended

recipient(s) only. It may contain proprietary material,

confidential

information and/or be subject to legal privilege. It

should not be

copied, disclosed to, retained or used by, any other

party. If you

are not an intended recipient then please promptly delete this
e-mail and any attachment and all copies and inform the sender.
Thank you.


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