Print Page as PDF
SET AUDIT ON NEW PERSON FILE #200 FIELDS ICR (4122)

SET AUDIT ON NEW PERSON FILE #200 FIELDS    ICR (4122)

Name Value
NUMBER 4122
IA # 4122
FILE NUMBER 200
GLOBAL ROOT VA(200,
DATE CREATED 2010/12/13
CUSTODIAL PACKAGE KERNEL
USAGE Private
TYPE File
DBIC APPROVAL STATUS APPROVED
NAME SET AUDIT ON NEW PERSON FILE #200 FIELDS
GENERAL DESCRIPTION
The LAB SERVICE package (LSRP project) has a
requirement that specific fields are to be set to be audited on patch
installation for the NEW PERSON file (#200).  We are requesting a one-time use
ICR that allows us to set this access on specific fields in file 200 using the
supported API for this purpose (TURNON^DIAUTL).  This would be done in our
post installation routine for patch LR*5.2*393  The fields are:

Top level:

.01   NAME
.132  OFFICE PHONE
.137  VOICE PAGER
.138  DIGITAL PAGER
4     SEX
5     DOB
7     DISUSER
9     SSN
9.2   TERMINATION DATE
41.99 NPI
9000  VPID

51    KEYS (subfile #200.051)
.01 KEY
GLOBAL REFERENCE
GLOBAL REFERENCE FIELD NUMBER
VA(200,D0,0)
FIELD NUMBER ACCESS FIELD NAME LOCATION
.01 Both R/W w/Fileman NAME 0;1
7 Both R/W w/Fileman DISUSER 0;7
9.2 Both R/W w/Fileman TERMINATION DATE 0;11
VA(200,D0,2)
FIELD NUMBER ACCESS FIELD NAME LOCATION
.132 Both R/W w/Fileman OFFICE PHONE .13;2
VA(200,D0,1)
FIELD NUMBER ACCESS FIELD NAME LOCATION
9 Both R/W w/Fileman SSN 1;9
5 Both R/W w/Fileman DOB 1;3
4 Both R/W w/Fileman SEX 1;2
VA(200,D0,VPID)
FIELD NUMBER ACCESS FIELD NAME LOCATION
9000 Both R/W w/Fileman VPID VPID;1
VA(200,D0,NPI)
FIELD NUMBER ACCESS FIELD NAME LOCATION
41.99 Both R/W w/Fileman NPI NPI;1
VA(200,D0,51,D1,0)
FIELD NUMBER ACCESS FIELD NAME LOCATION
.01 Both R/W w/Fileman KEY 0;1
VA(200,D0,51)
FIELD NUMBER ACCESS FIELD NAME LOCATION
51 Both R/W w/Fileman KEYS 51;0
STATUS Active
DURATION Till Otherwise Agreed
ID VA(200,
SUBSCRIBING PACKAGE
SUBSCRIBING PACKAGE SUBSCRIBING DETAILS
LAB SERVICE
The Fileman Read/Write access would be for setting the
AUDITING feature only.
DATE ACTIVATED 2010/12/15