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 |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^AUPNVXAM

Package: PCE Patient Care Encounter

Global: ^AUPNVXAM


Information

FileMan FileNo FileMan Filename Package
9000010.13 V EXAM PCE Patient Care Encounter

Description

Directly Accessed By Routines, Total: 10

Package Total Routines
PCE Patient Care Encounter 9 PXAIXAM    PXKENCOUNTER    PXMEASCF    PXMEASUREMENT    PXPXRM    PXPXRMI2    ^AUPNVXAM    PXQUTL3B
PXRHS05    
Scheduling 1 SCRPW25    

Accessed By FileMan Db Calls, Total: 6

Package Total Routines
PCE Patient Care Encounter 3 PXCEXAM    PXPXRMI2    PXRHS05    
Automated Information Collection System 1 IBDFRPC6    
Clinical Reminders 1 PXRMEXAM    
Virtual Patient Record 1 VPRDPXAM    

Pointer To FileMan Files, Total: 7

Package Total FileMan Files
PCE Patient Care Encounter 4 PATIENT/IHS(#9000001)[.02]    VISIT(#9000010)[.03]    EXAM(#9999999.15)[.01]    PCE DATA SOURCE(#839.7)[81203]    
Kernel 2 PACKAGE(#9.4)[81202]    NEW PERSON(#200)[1202, 1204]    
Lexicon Utility 1 UCUM CODES(#757.5)[221]    

Fields, Total: 15

Field # Name Loc Type Details
.01 EXAM 0;1 POINTER TO EXAM FILE (#9999999.15)
************************REQUIRED FIELD************************
EXAM(#9999999.15)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,4)'=1" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  AUG 10, 2017
  • HELP-PROMPT:  Enter the exam which was done to the patient.
  • DESCRIPTION:  
    This is the entry in the Exam file that represents what type of exam was done at the encounter.
  • SCREEN:  S DIC("S")="I $P(^(0),U,4)'=1"
  • EXPLANATION:  Allow only active Exams to be selected.
  • CROSS-REFERENCE:  9000010.13^B
    1)= S ^AUPNVXAM("B",$E(X,1,30),DA)=""
    2)= K ^AUPNVXAM("B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  9000010.13^AATOO^MUMPS
    1)= I $P(^AUPNVXAM(DA,0),U,2)]"",$P(^(0),U,3)]"" S ^AUPNVXAM("AA",$P(^AUPNVXAM(DA,0),U,2),X,(9999999-$P(+^AUPNVSIT($P(^AUPNVXAM(DA,0),U,3),0),".",1)),DA)=""
    2)= I $P(^AUPNVXAM(DA,0),U,2)]"",$P(^(0),U,3)]"" K ^AUPNVXAM("AA",$P(^AUPNVXAM(DA,0),U,2),X,(9999999-$P(+^AUPNVSIT($P(^AUPNVXAM(DA,0),U,3),0),".",1)),DA)
    This cross-reference is used for searches in sequence by patient, exam pointer, inverted visit date, and internal entry number.
    "AA",PATIENT,EXAM,VISIT,DA
  • RECORD INDEXES:  ACR (#1667)
.02 PATIENT NAME 0;2 POINTER TO PATIENT/IHS FILE (#9000001)
************************REQUIRED FIELD************************
PATIENT/IHS(#9000001)

  • LAST EDITED:  AUG 10, 2017
  • HELP-PROMPT:  Enter the patient who received the exam.
  • DESCRIPTION:  
    This is the patient who received the exam.
    UNEDITABLE
  • CROSS-REFERENCE:  9000010.13^AATOO2^MUMPS
    1)= I $P(^AUPNVXAM(DA,0),U,3)]"" S ^AUPNVXAM("AA",X,+^AUPNVXAM(DA,0),(9999999-$P(+^AUPNVSIT($P(^AUPNVXAM(DA,0),U,3),0),".",1)),DA)=""
    2)= I $P(^AUPNVXAM(DA,0),U,3)]"" K ^AUPNVXAM("AA",X,+^AUPNVXAM(DA,0),(9999999-$P(+^AUPNVSIT($P(^AUPNVXAM(DA,0),U,3),0),".",1)),DA)
    This cross-reference is used for searches in sequence by patient, exam pointer, inverted visit, and internal entry number.
    "AA",PATIENT,EXAM,VISIT,DA
  • CROSS-REFERENCE:  9000010.13^C
    1)= S ^AUPNVXAM("C",$E(X,1,30),DA)=""
    2)= K ^AUPNVXAM("C",$E(X,1,30),DA)
    This cross reference is used for look-up of exams by patient.
  • RECORD INDEXES:  ACR (#1667)
.03 VISIT 0;3 POINTER TO VISIT FILE (#9000010)
************************REQUIRED FIELD************************
VISIT(#9000010)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,5)=$P(^AUPNVXAM(DA,0),U,2)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  AUG 10, 2017
  • HELP-PROMPT:  Enter the visit date/time for the encounter where the exam was done.
  • DESCRIPTION:  
    This is the encounter in the Visit file that represents when and where the exam was done.
  • SCREEN:  S DIC("S")="I $P(^(0),U,5)=$P(^AUPNVXAM(DA,0),U,2)"
  • EXPLANATION:  VISIT MUST BE FOR CURRENT PATIENT
    UNEDITABLE
  • CROSS-REFERENCE:  9000010.13^AD
    1)= S ^AUPNVXAM("AD",$E(X,1,30),DA)=""
    2)= K ^AUPNVXAM("AD",$E(X,1,30),DA)
    This cross-reference is used for searches by the visit pointer and internal entry number.
    "AD",VISIT,DA
  • CROSS-REFERENCE:  9000010.13^AA^MUMPS
    1)= Q:$P(^AUPNVXAM(DA,0),U,2)="" S ^AUPNVXAM("AA",$P(^AUPNVXAM(DA,0),U,2),+^AUPNVXAM(DA,0),(9999999-$P(+^AUPNVSIT(X,0),".",1)),DA)=""
    2)= Q:$P(^AUPNVXAM(DA,0),U,2)="" K ^AUPNVXAM("AA",$P(^AUPNVXAM(DA,0),U,2),+^AUPNVXAM(DA,0),(9999999-$P(+^AUPNVSIT(X,0),".",1)),DA)
    This cross-reference is used for searches in sequence by patient, exam pointer, inverted visit, internal entry number.
    "AA",PATIENT,EXAM,VISIT,DA
  • CROSS-REFERENCE:  9000010.13^AV10^MUMPS
    1)= D ADD^AUPNVSIT
    2)= D SUB^AUPNVSIT
    This cross-reference adds and subtracts from the dependent entry count in the VISIT file.
  • RECORD INDEXES:  ACR (#1667)
.04 RESULT 0;4 SET
  • 'A' FOR ABNORMAL;
  • 'N' FOR NORMAL;

  • LAST EDITED:  SEP 01, 1995
220 MAGNITUDE 220;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>25!($L(X)<1)!('$$VMAGNITUDE^PXINPTR(.X)) X
    MAXIMUM LENGTH: 25
  • LAST EDITED:  MAR 28, 2022
  • HELP-PROMPT:  Enter the magnitude of the measurement, a positive or negative number, up to 14 digits and 9 decimal places.
  • DESCRIPTION:  If a measurement has been recorded for an entry in this file, this is the magnitude of the measurement.
  • AUDIT:  EDITED OR DELETED
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
221 UCUM CODE 220;2 POINTER TO UCUM CODES FILE (#757.5) UCUM CODES(#757.5)

  • LAST EDITED:  MAR 28, 2022
  • HELP-PROMPT:  Enter the UCUM code of the measurement.
  • DESCRIPTION:  If a measurement has been recorded for an entry in this file, this is the unit of the measurement.
  • AUDIT:  EDITED OR DELETED
1201 EVENT DATE AND TIME 12;1 DATE

  • INPUT TRANSFORM:  S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  AUG 10, 2017
  • HELP-PROMPT:  Enter the date and time the exam was given.
  • DESCRIPTION:  This is the date and time the exam was given by the provider. This date and time may be different from the Visit Date and Time. For example, for clinic appointment visits, the Visit Date and Time is the date and time of
    the appointment, not the time the provider performed the clinical event.
    The date may be an imprecise date but cannot be a future date.
  • TECHNICAL DESCR:  Event Date and Time defaults to NOW and reflects the actual time the exam was done. The Event Date does not have to be the Visit Date, but it cannot be a future date.
    If a user wants to enter a historical exam the user should use the Historical Encounter entry action to document the historical exam. Historical entries will not be eligible for credit.
    PCE data sources for automatic (scanning) data capture will be blank unless the Event Date and Time are passed to PCE for filing.
  • RECORD INDEXES:  ACR (#1667)
1202 ORDERING PROVIDER 12;2 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  MAY 13, 1996
  • HELP-PROMPT:  Enter the provider who ordered this exam.
  • DESCRIPTION:  
    This field can be used to document the provider who ordered the exam.
1204 ENCOUNTER PROVIDER 12;4 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  DEC 19, 1994
  • HELP-PROMPT:  Enter the provider who gave the exam.
  • DESCRIPTION:  
    This is the provider who gave the exam.
80101 EDITED FLAG 801;1 SET
  • '1' FOR EDITED;

  • LAST EDITED:  NOV 26, 2018
  • HELP-PROMPT:  Enter 1 if the original exam data is being edited.
  • DESCRIPTION:  
    This field is automatically set to 1 if PCE detects that any original exam data is being edited.
  • TECHNICAL DESCR:  PCE filing logic automatically compares the before and after pictures of the record to determine if the edited flag should be set to "1".
80102 AUDIT TRAIL 801;2 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>85!($L(X)<2) X
  • LAST EDITED:  NOV 26, 2018
  • HELP-PROMPT:  The answer must be 2 to 85 characters.
  • DESCRIPTION:  
    This field is populated automatically by the PCE filing logic. The format of the field is as follows: Pointer to PCE data source file_"-"_A for Add or E for Edit_" "_DUZ of the person who entered the data_";"...
  • TECHNICAL DESCR:  The PCE filing logic requires a pointer to the PCE Data Source file. If this is not passed, then PCE filing logic will not process the data.
    If the record is a new record, then an "A" is used to specify the source that added the data. If the record existed previously, PCE filing logic compares the old and new records of information. An "E" will be
    automatically used if the filing logic finds the data has been edited. If "E" is used, then the Edited Flag field is automatically set to 1.
    The DUZ is stored in its internal format to represent the user who performed the addition or editing of data for this record.
    Iterations of editing will be concatenated to the previous Data Source value, up to 85 characters.
81101 COMMENTS 811;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>245!($L(X)<1) X
  • LAST EDITED:  JUL 11, 1995
  • HELP-PROMPT:  Enter a comment 1-245 characters in length.
  • DESCRIPTION:  
    This is a comment related to the patient's exam. The provider may enter this manually via the PCE User Interface.
81201 VERIFIED 812;1 SET
  • '1' FOR ELECTRONICALLY SIGNED;
  • '2' FOR VERIFIED BY PACKAGE;

  • LAST EDITED:  NOV 26, 2018
  • HELP-PROMPT:  Enter 1 if verified by electronic signature or 2 if verified by package.
  • DESCRIPTION:  This is used to note how the event was verified and is automatically entered by the software.
  • TECHNICAL DESCR:  This is automatically entered by the software and is uneditable for users.
    UNEDITABLE
81202 PACKAGE 812;2 POINTER TO PACKAGE FILE (#9.4) PACKAGE(#9.4)

  • LAST EDITED:  DEC 11, 2018
  • HELP-PROMPT:  Enter the VistA package from which this record originated.
  • DESCRIPTION:  This is the VistA package from which this exam record originated through PCE.
    This is automatically entered by the software and uneditable by users.
    UNEDITABLE
81203 DATA SOURCE 812;3 POINTER TO PCE DATA SOURCE FILE (#839.7) PCE DATA SOURCE(#839.7)

  • LAST EDITED:  NOV 26, 2018
  • HELP-PROMPT:  Select the data source for this exam entry through PCE.
  • DESCRIPTION:  This is the data source for this exam. It is set automatically by the PCE software and uneditable by users.
    UNEDITABLE

ICR, Total: 1

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #2311
  • Scheduling
    		•  'AD' xref.Fileman captioned output of entire V EXAM record.

    External References

    Name Field # of Occurrence
    ^%DT 1201+1
    ADD^AUPNVSIT .03(XREF 3S)
    SUB^AUPNVSIT .03(XREF 3K)
    ^DIC .01+1, .03+1
    $$VMAGNITUDE^PXINPTR 220+1
    KVFILE^PXPXRM IXACRKL+1
    SVFILE^PXPXRM IXACRSL+1

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^AUPNVSIT - [#9000010] ID.03+1, .01(XREF 3S), .01(XREF 3K), .02(XREF 2S), .02(XREF 2K), .03(XREF 2S), .03(XREF 2K)
    ^AUPNVXAM - [#9000010.13] .01(XREF 3S), .01(XREF 3K), .02(XREF 2S), .02(XREF 2K), .03(XREF 2S), .03(XREF 2K)
    ^AUPNVXAM("AA" .01(XREF 3S), .01(XREF 3K), .02(XREF 2S), .02(XREF 2K), .03(XREF 2S), .03(XREF 2K)
    ^AUPNVXAM("AD" .03(XREF 1S), .03(XREF 1K)
    ^AUPNVXAM("B" .01(XREF 1S), .01(XREF 1K)
    ^AUPNVXAM("C" .02(XREF 3S), .02(XREF 3K)
    ^DD("DD" ID.03+1
    ^DPT - [#2] ID.02+1
    ^PXRMINDX(9000010.13 IXACRKEIC+1!

    Naked Globals

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

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> %DT 1201+1*
    AIHSY ID.03+1*!
    >> DA IXACRSL+1, IXACRKL+1, .01(XREF 1S), .01(XREF 1K), .01(XREF 3S), .01(XREF 3K), .02(XREF 2S), .02(XREF 2K), .02(XREF 3S), .02(XREF 3K)
    , .03(XREF 1S), .03(XREF 1K), .03(XREF 2S), .03(XREF 2K)
    DIC ID.02+1, ID.03+1, .01+1!*, .03+1!*
    DIC("S" .01+1*, .01SCR+1*, .03+1*, .03SCR+1*
    >> DIE .01+1, .03+1
    U ID.02+1, ID.03+1, .01(XREF 3S), .01(XREF 3K), .02(XREF 2S), .02(XREF 2K), .03(XREF 2S), .03(XREF 2K)
    X IXACRSL+1, IXACRKL+1, .01+1*!, .01(XREF 1S), .01(XREF 1K), .01(XREF 3S), .01(XREF 3K), .02(XREF 2S), .02(XREF 2K), .02(XREF 3S)
    , .02(XREF 3K), .03+1*!, .03(XREF 1S), .03(XREF 1K), .03(XREF 2S), .03(XREF 2K), 220+1!, 1201+1*!, 80102+1!, 81101+1!
    >> Y ID.03+1*, .01+1, .03+1, 1201+1
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  ICR |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All