Name | Value |
---|---|
NUMBER | 3024 |
IA # | 3024 |
FILE NUMBER | 2 |
GLOBAL ROOT | DD(2 |
DATE CREATED | 2003/06/10 |
CUSTODIAL PACKAGE | VA FILEMAN |
USAGE | Private |
TYPE | File |
NAME | ID Nodes in Patient (#2) file |
GENERAL DESCRIPTION | DG*5.3*249, DGSEC Modifications and Privacy Act Compliance for Employees, modifies the identifiers on the DOB (#.03) and Social Security Number (#.09) fields in the Patient (#2) file to: ^DD(2,0,"ID",.03) = D EN^DDIOL($TR($$DOB^DPTLK1(Y,1),"/","-"),,"?$X+2") ^DD(2,0,"ID",.09) = D EN^DDIOL($$SSN^DPTLK1(Y),,"?$X+2") The DOB and SSN function calls in DPTLK1 are new with this patch. If the patient's primary eligibility code is Employee, *SENSITIVE* will be displayed for the DOB and SSN fields until the user verifies they want to access the restricted record. The post-init routine, DG53249P, will set the "ID" nodes: DG53249P ;ALB/JAP - Patch 249 postinstall ; 1/11/00 12:56pm ;;5.3;Registration;**249**;Aug 13, 1993 ; EN ;entry point from install ;update identifier code in patient file S ^DD(2,0,"ID",.03)="D EN^DDIOL($TR($$DOB^DPTLK1(Y,1),""/"",""-""),,""?$X+2"")" S ^DD(2,0,"ID",.09)="D EN^DDIOL($$SSN^DPTLK1(Y),,""?$X+2"")" Q |
STATUS | Retired |
ID | DD(2 |
SUBSCRIBING PACKAGE | REGISTRATION |