Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^PXV(920.3

Package: PCE Patient Care Encounter

Global: ^PXV(920.3


Information

FileMan FileNo FileMan Filename Package
920.3 IMM ADMINISTRATION SITE (BODY) PCE Patient Care Encounter

Description

Directly Accessed By Routines, Total: 9

Package Total Routines
PCE Patient Care Encounter 9 EFFECTIVE DATE/TIME    PXAPIIM    PXPXRM    PXPXRM1    PXVP215    ^PXV(920.3    PXVP217    PXVP233
PXVRPC8    

Accessed By FileMan Db Calls, Total: 1

Package Total Routines
PCE Patient Care Encounter 1 PXRPC    

Pointed To By FileMan Files, Total: 6

Package Total FileMan Files
PCE Patient Care Encounter 6 V IMMUNIZATION DELETED(#9000080.11)[1303]    V IMMUNIZATION(#9000010.11)[1303]    V SKIN TEST(#9000010.12)[1212]    IMM DEFAULT RESPONSES(#920.05)[#920.051(1303)]    IMM ADMINISTRATION SITE (BODY)(#920.3)[99.97]    IMM ROUTES TO SITES(#920.6)[#920.61(.01)]    

Pointer To FileMan Files, Total: 1

Package Total FileMan Files
PCE Patient Care Encounter 1 IMM ADMINISTRATION SITE (BODY)(#920.3)[99.97]    

Fields, Total: 6

Field # Name Loc Type Details
.01 SITE 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
  • LAST EDITED:  FEB 27, 2015
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
  • DESCRIPTION:  
    This is area on the body of the patient where the immunization/vaccine was administered. The entry is expected to be 3-30 characters with all alpha characters being uppercase
  • TECHNICAL DESCR:  This is the area of a patient's body to where a vaccine can be administered. The entry is expected to be 3-30 characters, with the alpha characters being all uppercase. The entry here should correspond to one of the
    entries the HL7 0163 Body Site Codeset table.
  • AUDIT:  YES, ALWAYS
  • PRE-LOOKUP:  I $G(DIC(0))["L",'$D(XUMF) K X D EN^DDIOL("Entries must be edited via the Master File Server (MFS).","","!?5")
  • DELETE TEST:  1,0)= D:'$D(XUMF) EN^DDIOL("Entries must be inactivated via the Master File Server(MFS).","","!?5") I '$D(XUMF)
  • LAYGO TEST:  1,0)= D:'$D(XUMF) EN^DDIOL("Entries must be added via the Master File Server(MFS).","","!?5") I $D(XUMF)
    WRITE AUTHORITY: ^
  • CROSS-REFERENCE:  920.3^B
    1)= S ^PXV(920.3,"B",$E(X,1,30),DA)=""
    2)= K ^PXV(920.3,"B",$E(X,1,30),DA)
.02 HL7 CODE 0;2 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>4!($L(X)<2)!'(X?2.4U) X
  • LAST EDITED:  FEB 27, 2015
  • HELP-PROMPT:  Answer must be 2-4 uppercase characters in length and is required.
  • DESCRIPTION:  
    This is the corresponding HL7 code for this site. It must 2-4 uppercase characters and entry is required.
  • TECHNICAL DESCR:  
    This is the HL7 code for this site, based on the HL7 0163 Body Site Codeset table. Entry is expected to be 2-4 uppercase characters and is required.
  • AUDIT:  YES, ALWAYS
    WRITE AUTHORITY: ^
  • CROSS-REFERENCE:  920.3^B^MNEMONIC
    1)= S:'$D(^PXV(920.3,"B",$E(X,1,30),DA)) ^(DA)=1
    2)= I $D(^PXV(920.3,"B",$E(X,1,30),DA)),^(DA) K ^(DA)
    This mnemonic cross reference updates the "B" index to allow lookups by the HL7 Code for this administration route.
99.97 REPLACED BY VHA STANDARD TERM VUID;3 POINTER TO IMM ADMINISTRATION SITE (BODY) FILE (#920.3) IMM ADMINISTRATION SITE (BODY)(#920.3)

  • LAST EDITED:  MAR 27, 2015
  • HELP-PROMPT:  Enter the term that replaces this term.
  • DESCRIPTION:  This field is populated when one Term/Concept replaces another Term/Concept. The field is controlled by standardization and should only be changed by standardization processes. This field contains a pointer to a VHA
    standard term that replaces this entry.
  • AUDIT:  YES, ALWAYS
    WRITE AUTHORITY: ^
    UNEDITABLE
  • CROSS-REFERENCE:  920.3^AREPLACETERM
    1)= S ^PXV(920.3,"AREPLACETERM",$E(X,1,30),DA)=""
    2)= K ^PXV(920.3,"AREPLACETERM",$E(X,1,30),DA)
    This cross-reference can be used to identify the replacement entries associated with a Term/Concept.
99.98 MASTER ENTRY FOR VUID VUID;2 SET
************************REQUIRED FIELD************************
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  FEB 27, 2015
  • HELP-PROMPT:  Enter YES if this is the Master entry.
  • DESCRIPTION:  
    This field identifies the Master entry for a VUID associated with a Term/Concept.
  • AUDIT:  YES, ALWAYS
    WRITE AUTHORITY: ^
    UNEDITABLE
  • CROSS-REFERENCE:  920.3^AVUID
    1)= S ^PXV(920.3,"AVUID",$E(X,1,30),DA)=""
    2)= K ^PXV(920.3,"AVUID",$E(X,1,30),DA)
    3)= XXX--CAN'T BE ALTERED BY A PROGRAMMER
    This cross-reference is by VUID.
  • RECORD INDEXES:  AMASTERVUID (#423)
99.99 VUID VUID;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S X=+X K:$L(X)>20!($L(X)<1)!'(X?1.20N) X
  • LAST EDITED:  FEB 27, 2015
  • HELP-PROMPT:  Answer must be 1-20 characters in length.
  • DESCRIPTION:  
    VHA Unique ID (VUID). A unique meaningless integer assigned to reference terms VHA wide.
  • AUDIT:  YES, ALWAYS
    WRITE AUTHORITY: ^
    UNEDITABLE
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  920.3^AVUID
    1)= S ^PXV(920.3,"AVUID",$E(X,1,30),DA)=""
    2)= K ^PXV(920.3,"AVUID",$E(X,1,30),DA)
    3)= XXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
    This cross-reference is by VUID.
  • RECORD INDEXES:  AMASTERVUID (#423)
99.991 EFFECTIVE DATE/TIME TERMSTATUS;0 DATE Multiple #920.399 920.399

  • DESCRIPTION:  
    Describes the pair Status and Effective Date/Time for each reference term.
    WRITE AUTHORITY: ^

Found Entries, Total: 18

SITE: LEFT ARM    SITE: LEFT DELTOID    SITE: LEFT GLUTEUS MEDIUS    SITE: LEFT LOWER FOREARM    SITE: LEFT THIGH    SITE: LEFT VASTUS LATERALIS    SITE: RIGHT ARM    SITE: RIGHT DELTOID    
SITE: RIGHT GLUTEUS MEDIUS    SITE: RIGHT LOWER FOREARM    SITE: RIGHT THIGH    SITE: RIGHT VASTUS LATERALIS    SITE: RIGHT VENTRAGLUTEAL    SITE: LEFT VENTRAGLUTEAL    SITE: BILATERAL NARES    SITE: LEFT NARIS    
SITE: RIGHT NARIS    SITE: LEFT AND RIGHT DELTOID    

External References

Name Field # of Occurrence
EN^DDIOL .01TPL+1, .01DEL1+1, .01LAYGO1+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PXV(920.3 - [#920.3] IXAMASTERVUIDSL+1*, IXAMASTERVUIDKL+1!, IXAMASTERVUIDKEIC+1!, .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K), 99.97(XREF 1S), 99.97(XREF 1K), 99.98(XREF 1S)
, 99.98(XREF 1K), 99.99(XREF 1S), 99.99(XREF 1K)

Naked Globals

Name Field # of Occurrence
^( .02(XREF 1S), .02(XREF 1K)
^(0 ID.02+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA IXAMASTERVUIDSL+1, IXAMASTERVUIDKL+1, .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K), 99.97(XREF 1S), 99.97(XREF 1K), 99.98(XREF 1S), 99.98(XREF 1K)
, 99.99(XREF 1S), 99.99(XREF 1K)
>> DIC(0 .01TPL+1
U ID.02+1
X .01+1!, .01TPL+1!, .01(XREF 1S), .01(XREF 1K), .02+1!, .02(XREF 1S), .02(XREF 1K), 99.97(XREF 1S), 99.97(XREF 1K), 99.98(XREF 1S)
, 99.98(XREF 1K), 99.99+1*!, 99.99(XREF 1S), 99.99(XREF 1K)
X(1 IXAMASTERVUIDSL+1, IXAMASTERVUIDKL+1
X(2 IXAMASTERVUIDSL+1, IXAMASTERVUIDKL+1
>> XUMF .01TPL+1, .01DEL1+1, .01LAYGO1+1
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  Found Entries |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All