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 |  Pointer To FileMan Files |  Fields |  ICR |  Found Entries |  All
Print Page as PDF
Global: ^PXD(811.1

Package: PCE Patient Care Encounter

Global: ^PXD(811.1


Information

FileMan FileNo FileMan Filename Package
811.1 PCE CODE MAPPING PCE Patient Care Encounter

Description

Directly Accessed By Routines, Total: 2

Package Total Routines
PCE Patient Care Encounter 2 PXKMAIN2    PXUACM    

Accessed By FileMan Db Calls, Total: 2

Package Total Routines
Order Entry Results Reporting 1 ORWPCE2    
PCE Patient Care Encounter 1 PXUACM    

Pointer To FileMan Files, Total: 3

Package Total FileMan Files
Utility Tables 2 IMMUNIZATION(#9999999.14)[.01.02]    SKIN TEST(#9999999.28)[.01.02]    
CPT Files 1 CPT(#81)[.01.02]    

Fields, Total: 5

Field # Name Loc Type Details
.01 FILE ENTRY 0;1 VARIABLE POINTER
************************REQUIRED FIELD************************
CPT(#81)  IMMUNIZATION(#9999999.14)  SKIN TEST(#9999999.28)  

  • LAST EDITED:  MAY 30, 2003
  • 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)'="",$P(^(0),U,3)'="" S ^PXD(811.1,"AA",$P(X,";"),$P(^PXD(811.1,DA,0),"^",3),$P(^PXD(811.1,DA,0),"^",5),DA)=""
    2)= Q:$P(^PXD(811.1,DA,0),U,3)=""  Q:$P(^PXD(811.1,DA,0),U,5)=""  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)
    IHS/ITSC/LJF 5/29/2003 - On Set Statement, added check for 3rd piece of zero node so data would install via KIDS in another database.  On Kill Statement, added check for both 3rd and 5th pieces.
.02 RELATED SUPPORTING FILE ENTRY 0;2 VARIABLE POINTER IMMUNIZATION(#9999999.14)  SKIN TEST(#9999999.28)  CPT(#81)  

  • 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'.
.03 FROM 0;3 FREE TEXT
************************REQUIRED FIELD************************

  • 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(811.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)
.04 TO 0;4 FREE TEXT
************************REQUIRED FIELD************************

  • 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
.05 ON/OFF FLAG 0;5 SET
************************REQUIRED FIELD************************
  • '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

ICR, Total: 2

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #3055
  • ORDER ENTRY/RESULTS REPORTING
  • NAME (.01).
    Access: Read w/Fileman

    ICR #5193
  • HEALTH DATA & INFORMATICS
  • ALL FIELDS (ALL).
    Access: Read w/Fileman

    Loop through each entry and use FileMan to query thefields needed for Mapping Validation.
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  ICR |  Found Entries |  All