STANDARD DATA DICTIONARY #40.15 -- OPC ERRORS FILE 9/29/25 PAGE 1
STORED IN ^SDASE( *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 5.3)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains the field name(s) and number(s) which is/are required and was/were found to be invalid. Once the invalid data
is entered the entry will be automatically purged from the file. Accurate reporting on the Amis 223 is dependent on the
maintenance of this file utilizing the "OPC MENU" option in the SD module.
DD ACCESS: @
RD ACCESS: d
WR ACCESS: D
DEL ACCESS: D
LAYGO ACCESS: D
CROSS
REFERENCED BY: FACILITY(AF), NAME(B)
40.15,.01 NAME 0;1 POINTER TO PATIENT FILE (#2) (Required)
INPUT TRANSFORM: S DINUM=X
LAST EDITED: JAN 05, 1984
DESCRIPTION:
This field contains the pointer value of the patient file.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 40.15^B
1)= S ^SDASE("B",$E(X,1,30),DA)=""
2)= K ^SDASE("B",$E(X,1,30),DA)
40.15,.02 FACILITY 0;2 POINTER TO MEDICAL CENTER DIVISION FILE (#40.8)
LAST EDITED: MAY 17, 1988
DESCRIPTION:
This field contains the pointer value of the Medical Center Division.
CROSS-REFERENCE: 40.15^AF
1)= S ^SDASE("AF",$E(X,1,30),DA)=""
2)= K ^SDASE("AF",$E(X,1,30),DA)
40.15,.09 SSN ; COMPUTED
MUMPS CODE: X ^DD(40.15,.09,9.2) S X=$P(Y(40.15,.09,101),U,9) S D0=Y(40.15,.09,2)
9.2 = S Y(40.15,.09,2)=$S($D(D0):D0,1:""),Y(40.15,.09,1)=$S($D(^SDASE(D0,0)):^(0),1:""),D0=$P(Y(40.
15,.09,1),U,1) S:'$D(^DPT(+D0,0)) D0=-1 S Y(40.15,.09,101)=$S($D(^DPT(D0,0)):^(0),1:"")
ALGORITHM: NAME:SSN
DESCRIPTION: This field stores the 9 digit social security number of the patient who has been identified as
having missing data and requires editing the OPC ERROR in order for the workload to be transmitted
to the Austin DPC.
40.15,1 FIELD NAME 1;0 Multiple #40.16 (Add New Entry without Asking)
DESCRIPTION:
This contains the name of the field that needs to be corrected.
40.16,.01 FIELD NAME 0;1 FREE TEXT (Multiply asked)
INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>30!($L(X)<3) X
LAST EDITED: SEP 15, 1988
HELP-PROMPT: ANSWER MUST BE 3-30 CHARACTERS IN LENGTH
DESCRIPTION:
This contains the name of the field that needs to be corrected.
40.16,1 PATIENT FILE FIELD NUMBER 0;2 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999999)!(X<.0000001)!(X?.E1"."9N.N) X
HELP-PROMPT: TYPE A NUMBER BETWEEN .0000001 AND 9999999
DESCRIPTION:
This field contains the number of the field within the patient file that needs to be corrected.
40.16,2 SAMPLE FILE PIECE NUMBER 0;3 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>25)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: JAN 05, 1984
HELP-PROMPT: TYPE A WHOLE NUMBER BETWEEN 1 AND 25
DESCRIPTION:
This field contains the number of the field in the OPC file that needs to be corrected.
40.16,3 SPECIFIC DATE APPLIED 0;4 DATE
INPUT TRANSFORM: S %DT="ETX" D ^%DT S X=Y K:Y<1 X
LAST EDITED: SEP 21, 1988
DESCRIPTION:
This field contains the date the error was located and placed in this file.
CROSS-REFERENCE: 40.16^AB^MUMPS
1)= S ^SDASE(DA(1),"AB",X,$P(^SDASE(DA(1),1,DA,0),U),DA)=""
2)= K ^SDASE(DA(1),"AB",X,$P(^SDASE(DA(1),1,DA,0),U),DA)
40.16,4 DIVISION 0;5 POINTER TO MEDICAL CENTER DIVISION FILE (#40.8)
LAST EDITED: SEP 19, 1988
DESCRIPTION:
This field contains the pointer value of the Medical Center Division.
40.15,2 VISIT DATE MESSAGE MSG;0 Multiple #40.152 (Add New Entry without Asking)
DESCRIPTION:
This field contains the error message related to the visit date.
40.152,.001 DATE DATE
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1 X
LAST EDITED: MAY 11, 1988
DESCRIPTION:
This field contains the visit date.
40.152,.01 VISIT DATE MESSAGE 0;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>80!($L(X)<3) X
LAST EDITED: MAY 17, 1988
HELP-PROMPT: ANSWER MUST BE 3-80 CHARACTERS IN LENGTH
DESCRIPTION:
This field contains the error message related to the visit date.
CROSS-REFERENCE: 40.152^B
1)= S ^SDASE(DA(1),"MSG","B",$E(X,1,30),DA)=""
2)= K ^SDASE(DA(1),"MSG","B",$E(X,1,30),DA)
40.152,2 DIVISION 0;2 POINTER TO MEDICAL CENTER DIVISION FILE (#40.8)
LAST EDITED: MAY 17, 1988
DESCRIPTION:
This field contains the pointer value of the Medical Center Division.
FILES POINTED TO FIELDS
MEDICAL CENTER DIVISION (#40.8) FACILITY (#.02)
VISIT DATE MESSAGE:DIVISION (#2)
FIELD NAME:DIVISION (#4)
PATIENT (#2) NAME (#.01)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):