STANDARD DATA DICTIONARY #811.1 -- PCE CODE MAPPING FILE 9/29/25 PAGE 1
STORED IN ^PXD(811.1, (141 ENTRIES) SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 1.0)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file is used to map entries from two different file to each other. It functions as a table.
NOTE: As of patch PX*1.0*215, this file has been superseded. The mappings of immunizations and skin tests to CPT codes are now
contained in the CODING SYSTEM multiple of the IMMUNIZATION (#9999999.14) and SKIN TEST (#9999999.28) files themselves.
DD ACCESS: @
WR ACCESS: @
DEL ACCESS: @
LAYGO ACCESS: @
IDENTIFIED BY: FROM (#.03)[R]
CROSS
REFERENCED BY: FILE ENTRY(AA), FROM(AA1), ON/OFF FLAG(AA2), FILE ENTRY(B)
LAST MODIFIED: NOV 18,2016@17:12:51
811.1,.01 FILE ENTRY 0;1 VARIABLE POINTER (Required)
FILE ORDER PREFIX LAYGO MESSAGE
81 1 C n CPT entry
9999999.14 3 I n IMMUNIZATIONS
9999999.28 4 S n SKIN TEST
LAST EDITED: FEB 21, 1995
HELP-PROMPT: Enter the coding system and entry here (e.g. C.90732)
DESCRIPTION: This field is a variable pointer which allows coded system entries to be mapped to an entry in
PCE's supporting files. For example, a CPT code for Pneumovax, 90732 would be the value entered
here, and the Related Supporting entry field would be PNEUMO-VAC in the Immunization file. DO NOT
use any general code such as 'OTHER SKIN TESTS' or 'OTHER PROCEDURE'.
CROSS-REFERENCE: 811.1^B
1)= S ^PXD(811.1,"B",$E(X,1,30),DA)=""
2)= K ^PXD(811.1,"B",$E(X,1,30),DA)
CROSS-REFERENCE: 811.1^AA^MUMPS
1)= I $P(^PXD(811.1,DA,0),"^",5)'="" S ^PXD(811.1,"AA",$P(X,";"),$P(^PXD(811.1,DA,0),"^",3),$P(^PXD
(811.1,DA,0),"^",5),DA)=""
2)= K ^PXD(811.1,"AA",$P(X,";"),$P(^PXD(811.1,DA,0),"^",3),$P(^PXD(811.1,DA,0),"^",5))
PXD("AA",FIRST ; PIECE OF FILE ENTRY FIELD,FROM,ON/OFF FLAG,DA)
811.1,.02 RELATED SUPPORTING FILE ENTRY 0;2 VARIABLE POINTER
FILE ORDER PREFIX LAYGO MESSAGE
9999999.14 1 I n IMMUNIZATION
9999999.28 2 S n SKIN TEST
81 6 C n CPT
LAST EDITED: JAN 11, 1995
DESCRIPTION: A pointer to the second file encolved in this mapping. DO NOT point this field to anything that is
general in nature such as 'OTHER SKIN TESTS' or 'OTHER IMMUNIZATION'.
811.1,.03 FROM 0;3 FREE TEXT (Required)
INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>4!($L(X)<2) X
LAST EDITED: MAR 23, 1995
HELP-PROMPT: Answer must be 2-4 characters in length.
DESCRIPTION: The 2 or 3 letter mnemonic that stands for the file that the data came from or that is also being
populated at this time. IMM = V IMMUNIZATIONS, CPT=V CPT ,and SK=V SKIN TESTS
CROSS-REFERENCE: 811.1^AA1^MUMPS
1)= I $P(^PXD(811.1,DA,0),"^",5)'="" S ^PXD(811.1,"AA",$P($P(^PXD(811.1,DA,0),"^"),";"),X,$P(^PXD(8
11.1,DA,0),"^",5),DA)=""
2)= K ^PXD(811.1,"AA",$P($P(^PXD(811.1,DA,0),"^"),";"),X,$P(^PXD(811.1,DA,0),"^",5),DA)
811.1,.04 TO 0;4 FREE TEXT (Required)
INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>4!($L(X)<2) X
LAST EDITED: APR 05, 1995
HELP-PROMPT: Answer must be 2-4 characters in length.
DESCRIPTION: The 2 or 3 letter mnemonic that stands of the file that the data is going also be put into.
IMM=VIMMUNIZATIONS, CPT=V CPT, and SK=VSKIN TESTS
811.1,.05 ON/OFF FLAG 0;5 SET (Required)
'1' FOR ON;
'0' FOR OFF;
LAST EDITED: APR 24, 1995
DESCRIPTION: A switch that tells us that this mapping is valid, and the mapping and storing of the data is
allowed to occur.
CROSS-REFERENCE: 811.1^AA2^MUMPS
1)= S ^PXD(811.1,"AA",$P($P(^PXD(811.1,DA,0),"^"),";"),$P(^PXD(811.1,DA,0),"^",3),X,DA)=""
2)= K ^PXD(811.1,"AA",$P($P(^PXD(811.1,DA,0),"^"),";"),$P(^PXD(811.1,DA,0),"^",3),X,DA)
X REF ,POINTER NUMBER,FROM MNEMONIC,ON/OFF FLAG,DA
FILES POINTED TO FIELDS
CPT (#81) FILE ENTRY (#.01)
RELATED SUPPORTING FILE ENTRY (#.02)
IMMUNIZATION (#9999999.14) FILE ENTRY (#.01)
RELATED SUPPORTING FILE ENTRY (#.02)
SKIN TEST (#9999999.28) FILE ENTRY (#.01)
RELATED SUPPORTING FILE ENTRY (#.02)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
PX CODE MAPPING PRINT MAR 07, 1995@15:03 USER #0 PCE CODE MAPPING LIST
SORT TEMPLATE(S):
PX CODE MAPPING MAR 07, 1995@14:03 USER #0
SORT BY: ]FROM// (FROM not null)
WITHIN FROM, SORT BY: FILE ENTRY// (FILE ENTRY not null)
FORM(S)/BLOCK(S):