|
It also sort of takes you out of a global market as well. Thanks, Mark Mark D. Walter Senior Programmer/Analyst CCX, Inc. mwalter@xxxxxxxxxx http://www.ccxinc.com |---------+-----------------------------> | | Steve Morrison | | | <smorrison@beaconi| | | ns.com> | | | Sent by: | | | rpg400-l-bounces@m| | | idrange.com | | | | | | | | | 11/10/2004 09:32 | | | AM | | | Please respond to | | | RPG programming on| | | the AS400 / | | | iSeries | |---------+-----------------------------> >-----------------------------------------------------------------------------------------------------------------------------| | | | To: RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx> | | cc: | | Subject: RE: Memory Allocation Question | >-----------------------------------------------------------------------------------------------------------------------------| >>> * Use the Social Security Number as the customer number if SSN is valid. I would rethink this idea of using the SSN as the customer number. I don't like the use of the SSN as a identifier. It's a privacy/identity theft issue. In fact, the prescription plan at work just issued new ID cards, changing the account number from the SSN to another number. I'd be concerned about liability if a customer's identity was comprised because of the use of the SSN as the account number. Steve Morrison Beacon Insurance 940-720-4672 -----Original Message----- From: Francis Lapeyre [mailto:flapeyre@xxxxxxxxxxx] Sent: Tuesday, November 09, 2004 9:39 PM To: 'RPG programming on the AS400 / iSeries' Subject: RE: Memory Allocation Question I have a routine to kinda/sorta validate Social Security numbers. There are some obvious bad combinations. Here it is: * Social Security Number broken down into parts D DS Inz D Key_Ssn 9 0 D Area 3 0 Overlay(Key_Ssn) D Group 2 0 Overlay(Key_Ssn:*NEXT) D Serial 4 0 Overlay(Key_Ssn:*NEXT) D SSN_Ok N Inz(*OFF) * Determine if SSN is valid. * Use the Social Security Number as the customer number if SSN is valid. -- 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.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 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.