RE: Validation and Encryption

[Joe Teff <jteff19@xxxxxxx>]

----------
> Can anyone give me any info on using the Lhun Checksum algorithm and
> Blowfish Des 3 encryption on the AS/400, if any exists that is?
>
>Thanks Bleddyn

I found an example of the Luhn algorithm in a magazine several months. I coded 
it in RPG/LE and use it in an Order Entry program. It does more than just a 
checksum. It also validates the issuer of the credit card (i.e. AX cards must 
start with a "3" and contain 15 digits). I was always going to go back and 
change this to a subprocedure after V3R2 was loaded, but just never got to it. 
I'll get a copy of the code and post it later in the week. I do not remember 
what magazine that I found it in.

Joe Teff
QDS
Bloomington, MN

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---