XUSEC ISO ARTIFICIAL (207) FUNCTION (.5)
Name
Value
NAME
XUSEC ISO ARTIFICIAL
MUMPS CODE
S X=$S($E($P($G(^VA(200,D0,1)),"^",9),1,5)["00000":1,1:0)
EXPLANATION
WILL BRING A 1 BACK IF THIS PERSON HAS 5 LEADING ZEROS IN THEIR SSN OR A 0 IF NOT
DATE-VALUED
NO
