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: ^AUPNVCPT

Package: PCE Patient Care Encounter

Global: ^AUPNVCPT


Information

FileMan FileNo FileMan Filename Package
9000010.18 V CPT PCE Patient Care Encounter

Description

Directly Accessed By Routines, Total: 46

Package Total Routines
PCE Patient Care Encounter 34 CPT MODIFIER    PX10118P    PXAAVCPT    PXAICPT    PXAIMOD    PXAPI    PXAPIOE    PXBPCPT
PXBPMOD    PXBPPRV    PXBSTOR1    PXBUTL3    PXCECPT    PXCPTAPI    PXICLN17    PXICLN27
PXICLN9B    PXKENCOUNTER    PXKFCPT1    PXKMAIN1    PXKMOD    PXPNARR    PXPXRM    PXPXRMI1
PXQFV    PXQPPUTIL    PXQUTL    PXQUTL3    PXQUTL3A    PXRRPCE1    PXRRWLS2    PXSCH2
PXVRPC4A    ^AUPNVCPT    
Scheduling 3 SCRPW14    SDES2GETEXPENTRY    SDES2GETXPENTRY2    
Clinical Reminders 2 PXRMERRH    PXRMVCPT    
Pharmacy Benefits Management 2 PSUDEM2    PSUDEM3    
VA FileMan 2 ITEM    YEAR    

Accessed By FileMan Db Calls, Total: 17

Package Total Routines
PCE Patient Care Encounter 8 PX10118P    PXBGCPT    PXBIBB    PXCECPT    PXCEVFIL    PXICLN17    PXPXRMI1    PXRRMDR
Integrated Billing 2 IBCCPT    IBCD3    
Scheduling 2 SDES2GETEXPENTRY    SDES2GETXPENTRY2    
Virtual Patient Record 2 VPRDJ09    VPRSDAVF    
Automated Information Collection System 1 IBDFRPC6    
Enterprise Health Management Platform 1 HMPDJ09    
Lab Service 1 LRCAPES1    

Pointer To FileMan Files, Total: 10

Package Total FileMan Files
PCE Patient Care Encounter 4 PATIENT/IHS(#9000001)[.02]    VISIT(#9000010)[.03]    PROVIDER NARRATIVE(#9999999.27)[.0480201]    PCE DATA SOURCE(#839.7)[81203]    
CPT HCPCS Codes 2 CPT MODIFIER(#81.3)[#9000010.181(.01)]    CPT(#81)[.01]    
Kernel 2 PACKAGE(#9.4)[81202]    NEW PERSON(#200)[12021204]    
DRG Grouper 1 ICD DIAGNOSIS(#80)[.05.09.1.11.12.13.14.15]    
Order Entry Results Reporting 1 ORDER(#100)[.17]    

Fields, Total: 28

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

  • INPUT TRANSFORM:  S DIC("S")="I $P($$CPT^ICPTCOD(+Y),""^"",7)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  DEC 17, 2018
  • HELP-PROMPT:  Enter a CPT code or the name of the procedure done to the patient.
  • DESCRIPTION:  This is the entry in the CPT file that most closely represents the clinical procedure done to the patient during the encounter. The preferred text for the procedure performed may be specified in the Provider Narrative
    field.
    This field is used for Administrative and Clinical purposes. If a procedure performed is to be billable, the CPT code must be specified here.
  • SCREEN:  S DIC("S")="I $P($$CPT^ICPTCOD(+Y),""^"",7)"
  • EXPLANATION:  Only active CPTs
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  9000010.18^B
    1)= S ^AUPNVCPT("B",$E(X,1,30),DA)=""
    2)= K ^AUPNVCPT("B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  9000010.18^AATOO^MUMPS
    1)= I $P(^AUPNVCPT(DA,0),U,2)]"",$P(^(0),U,3)]"" S ^AUPNVCPT("AA",$P(^AUPNVCPT(DA,0),U,2),X,(9999999-$P(+^AUPNVSIT($P(^AUPNVCPT(DA,0),U,3),0),".",1)),DA)=""
    2)= I $P(^AUPNVCPT(DA,0),U,2)]"",$P(^(0),U,3)]"" K ^AUPNVCPT("AA",$P(^AUPNVCPT(DA,0),U,2),X,(9999999-$P(+^AUPNVSIT($P(^AUPNVCPT(DA,0),U,3),0),".",1)),DA)
    This cross-reference is used for searches in sequence by patient, CPT internal entry number, inverted visit date, and internal entry number.
    "AA",PATIENT,CPT,VISIT,DA
  • RECORD INDEXES:  ACR (#849)
.02 PATIENT NAME 0;2 POINTER TO PATIENT/IHS FILE (#9000001)
************************REQUIRED FIELD************************
PATIENT/IHS(#9000001)

  • LAST EDITED:  DEC 17, 2018
  • HELP-PROMPT:  Enter the patient to whom the procedure was done.
  • DESCRIPTION:  This is the patient to whom the procedure was done during the encounter.
  • TECHNICAL DESCR:  This is a pointer to the PATIENT/IHS file, #9000001, which is DINUMED to the PATIENT file, #2. This field is always stuffed by the application. No editing is allowed.
    UNEDITABLE
  • CROSS-REFERENCE:  9000010.18^AATOO2^MUMPS
    1)= I $P(^AUPNVCPT(DA,0),U,3)]"" S ^AUPNVCPT("AA",X,+^AUPNVCPT(DA,0),(9999999-$P(+^AUPNVSIT($P(^AUPNVCPT(DA,0),U,3),0),".",1)),DA)=""
    2)= I $P(^AUPNVCPT(DA,0),U,3)]"" K ^AUPNVCPT("AA",X,+^AUPNVCPT(DA,0),(9999999-$P(+^AUPNVSIT($P(^AUPNVCPT(DA,0),U,3),0),".",1)),DA)
    This cross-reference is used for searches in sequence by patient, CPT internal entry number, inverted visit date, and internal entry number.
    "AA",PATIENT,CPT,VISIT,DA
  • CROSS-REFERENCE:  9000010.18^C
    1)= S ^AUPNVCPT("C",$E(X,1,30),DA)=""
    2)= K ^AUPNVCPT("C",$E(X,1,30),DA)
    This cross-reference allows look-up on the file by the patient's name.
  • RECORD INDEXES:  ACR (#849)
.03 VISIT 0;3 POINTER TO VISIT FILE (#9000010)
************************REQUIRED FIELD************************
VISIT(#9000010)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,5)=$P(^AUPNVCPT(DA,0),U,2)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  DEC 17, 2018
  • HELP-PROMPT:  Enter the visit date/time for the encounter where the procedure was done.
  • DESCRIPTION:  This is the encounter or occasion of service defined in the VISIT file that represents when and where the procedure was done.
  • TECHNICAL DESCR:  This is a pointer to the VISIT file, #9000010. This field is stuffed by the applications. No editing is allowed.
  • SCREEN:  S DIC("S")="I $P(^(0),U,5)=$P(^AUPNVCPT(DA,0),U,2)"
  • EXPLANATION:  VISIT MUST BE FOR CURRENT PATIENT
    UNEDITABLE
  • CROSS-REFERENCE:  9000010.18^AD
    1)= S ^AUPNVCPT("AD",$E(X,1,30),DA)=""
    2)= K ^AUPNVCPT("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.18^AA^MUMPS
    1)= Q:$P(^AUPNVCPT(DA,0),U,2)="" S ^AUPNVCPT("AA",$P(^AUPNVCPT(DA,0),U,2),+^AUPNVCPT(DA,0),(9999999-$P(+^AUPNVSIT(X,0),".",1)),DA)=""
    2)= Q:$P(^AUPNVCPT(DA,0),U,2)="" K ^AUPNVCPT("AA",$P(^AUPNVCPT(DA,0),U,2),+^AUPNVCPT(DA,0),(9999999-$P(+^AUPNVSIT(X,0),".",1)),DA)
    This cross-reference is used for searches in sequence by patient, CPT internal entry number, inverted visit date, and internal entry number.
    "AA",PATIENT,CPT,VISIT,DA
  • CROSS-REFERENCE:  9000010.18^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 (#849)
.04 PROVIDER NARRATIVE 0;4 POINTER TO PROVIDER NARRATIVE FILE (#9999999.27)
************************REQUIRED FIELD************************
PROVIDER NARRATIVE(#9999999.27)

  • INPUT TRANSFORM:  S DIC(0)=$S($D(PXKLAYGO):"LOX",$D(APCDALVR):"LO",$D(ZTQUEUED):"LO",1:"EMQLO") D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  DEC 17, 2018
  • HELP-PROMPT:  Enter the providers preferred text identifying the procedure done.
  • DESCRIPTION:  This is the narrative the provider uses to represent the procedure that was done. The text may be different from the CPT file's procedure name text, but should not have a significantly different meaning. The CPT code in
    the CPT (.01) field should be the CPT code that "most closely" represents the provider narrative for the procedure done.
  • TECHNICAL DESCR:  This is a pointer to the PROVIDER NARRATIVE file, #9999999.27. Disk space is saved by storing ONE entry in the Provider Narrative file for each unique narrative. The provider narrative is often repetitive, especially if
    the data capture mode is automated (e.g., AICS Encounter Forms).
.05 DIAGNOSIS 0;5 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#80)

  • INPUT TRANSFORM:  D ICDEN^PXCECPT1 K:Y<0 X
  • LAST EDITED:  DEC 17, 2018
  • HELP-PROMPT:  Enter the ICD diagnosis related to the procedure done.
  • DESCRIPTION:  This is the diagnosis, from the ICD Diagnosis file, associated with the procedure performed.
  • TECHNICAL DESCR:  
  • SCREEN:  S DIC("S")="D ^AUPNSICD" S DIC(0)=$P(DIC(0),"E")_$P(DIC(0),"E",2)
  • EXPLANATION:  Dx cannot be an inactive code, and it must be appropriate
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.07 PRINCIPAL PROCEDURE 0;7 SET
  • 'Y' FOR YES;
  • 'N' FOR NO;

  • LAST EDITED:  AUG 10, 2017
  • HELP-PROMPT:  Enter 'Y' if this is the principal procedure done at the encounter.
  • DESCRIPTION:  This field identifies this procedure as the principal procedure done to the patient at the encounter.
  • RECORD INDEXES:  ACR (#849)
.09 DIAGNOSIS 2 0;9 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#80)

  • INPUT TRANSFORM:  D ICDEN^PXCECPT1 K:Y<0 X
  • LAST EDITED:  DEC 17, 2018
  • HELP-PROMPT:  Enter the ICD diagnosis related to the procedure done.
  • DESCRIPTION:  
    This is the diagnosis, from the ICD Diagnosis file, associated with the procedure performed.
  • SCREEN:  S DIC("S")="D ^AUPNSICD" S DIC(0)=$P(DIC(0),"E")_$P(DIC(0),"E",2)
  • EXPLANATION:  Dx cannot be an inactive code, and it must be appropriate
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.1 DIAGNOSIS 3 0;10 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#80)

  • INPUT TRANSFORM:  D ICDEN^PXCECPT1 K:Y<0 X
  • LAST EDITED:  DEC 17, 2018
  • HELP-PROMPT:  Enter the ICD diagnosis related to the procedure done.
  • DESCRIPTION:  
    This is the diagnosis, from the ICD Diagnosis file, associated with the procedure performed.
  • SCREEN:  S DIC("S")="D ^AUPNSICD" S DIC(0)=$P(DIC(0),"E")_$P(DIC(0),"E",2)
  • EXPLANATION:  Dx cannot be an inactive code, and it must be appropriate
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.11 DIAGNOSIS 4 0;11 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#80)

  • INPUT TRANSFORM:  D ICDEN^PXCECPT1 K:Y<0 X
  • LAST EDITED:  DEC 19, 2018
  • HELP-PROMPT:  Enter the ICD diagnosis related to the procedure done.
  • DESCRIPTION:  This is the diagnosis, from the ICD Diagnosis file, associated with the procedure performed.
  • SCREEN:  S DIC("S")="D ^AUPNSICD" S DIC(0)=$P(DIC(0),"E")_$P(DIC(0),"E",2)
  • EXPLANATION:  Dx cannot be an inactive code, and it must be appropriate
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.12 DIAGNOSIS 5 0;12 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#80)

  • INPUT TRANSFORM:  D ICDEN^PXCECPT1 K:Y<0 X
  • LAST EDITED:  DEC 19, 2018
  • HELP-PROMPT:  Enter the ICD diagnosis related to the procedure done.
  • DESCRIPTION:  This is the diagnosis, from the ICD Diagnosis file, associated with the procedure performed.
  • SCREEN:  S DIC("S")="D ^AUPNSICD" S DIC(0)=$P(DIC(0),"E")_$P(DIC(0),"E",2)
  • EXPLANATION:  Dx cannot be an inactive code, and it must be appropriate
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.13 DIAGNOSIS 6 0;13 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#80)

  • INPUT TRANSFORM:  D ICDEN^PXCECPT1 K:Y<0 X
  • LAST EDITED:  DEC 19, 2018
  • HELP-PROMPT:  Enter the ICD diagnosis related to the procedure done.
  • DESCRIPTION:  This is the diagnosis, from the ICD Diagnosis file, associated with the procedure performed.
  • SCREEN:  S DIC("S")="D ^AUPNSICD" S DIC(0)=$P(DIC(0),"E")_$P(DIC(0),"E",2)
  • EXPLANATION:  Dx cannot be an inactive code, and it must be appropriate
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.14 DIAGNOSIS 7 0;14 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#80)

  • INPUT TRANSFORM:  D ICDEN^PXCECPT1 K:Y<0 X
  • LAST EDITED:  DEC 19, 2018
  • HELP-PROMPT:  Enter the ICD diagnosis related to the procedure done.
  • DESCRIPTION:  This is the diagnosis, from the ICD Diagnosis file, associated with the procedure performed.
  • SCREEN:  S DIC("S")="D ^AUPNSICD" S DIC(0)=$P(DIC(0),"E")_$P(DIC(0),"E",2)
  • EXPLANATION:  Dx cannot be an inactive code, and it must be appropriate
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.15 DIAGNOSIS 8 0;15 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#80)

  • INPUT TRANSFORM:  D ICDEN^PXCECPT1 K:Y<0 X
  • LAST EDITED:  DEC 19, 2018
  • HELP-PROMPT:  Enter the ICD diagnosis related to the procedure done.
  • DESCRIPTION:  This is the diagnosis, from the ICD Diagnosis file, associated with the procedure performed.
  • SCREEN:  S DIC("S")="D ^AUPNSICD" S DIC(0)=$P(DIC(0),"E")_$P(DIC(0),"E",2)
  • EXPLANATION:  Dx cannot be an inactive code, and it must be appropriate
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.16 QUANTITY 0;16 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  DEC 17, 2018
  • HELP-PROMPT:  Enter a number between 1 and 999 indicating how many times, this procedure was done.
  • DESCRIPTION:  
    This is the number of times this procedure was done to the patient during the encounter.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.17 ORDER REFERENCE 0;17 POINTER TO ORDER FILE (#100) ORDER(#100)

  • LAST EDITED:  DEC 17, 2018
  • HELP-PROMPT:  Enter the order for this procedure.
  • DESCRIPTION:  Pointer to the order in the ORDER file, #100, that ordered the procedure.
  • TECHNICAL DESCR:  This field provides a place for the Surgery package to store the pointer to the entry in the ORDER file, #100, that is associated with this procedure.
.19 DEPARTMENT CODE 0;19 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>3!($L(X)<3) X
  • LAST EDITED:  APR 25, 2005
  • HELP-PROMPT:  Answer must be 3 characters in length.
  • DESCRIPTION:  
    The 3-digit code that defines the service area associated with the charge by the sending application.
  • TECHNICAL DESCR:  All CPT-based charges coming through PCE, which are not already associated with one of the Department Codes, are assigned a Department Code. The Department Code assigned is the Stop Code associated (in the HOSPITAL
    LOCATION file, #44) with the Hospital Location of the patient visit/encounter.
.2 PFSS CHARGE ID 0;20 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  DEC 17, 2018
  • HELP-PROMPT:  Type a Number between 1 and 99999999, 0 Decimal Digits
  • DESCRIPTION:  A numeric identifier of not more than 8 digits that uniquely identifies the charge item in the external medical billing system. This data item is referred to as the "PFSS Charge Identifier" within the PFSS project
    documentation.
  • TECHNICAL DESCR:  The application providing the data to the PFSS CHARGE CACHE file uses $$GETCHGID^IBBAPI to obtain a unique identifying number for the original charge.
1 CPT MODIFIER 1;0 POINTER Multiple #9000010.181 9000010.181

  • DESCRIPTION:  
  • SCREEN:  S DIC("S")="N PXC,PXM,PXV,PXD S PXC=$P(^AUPNVCPT(D0,0),U),PXV=$P(^AUPNVCPT(D0,0),U,3),PXD=$P($G(^AUPNVSIT(PXV,0)),U) I $$MODP^ICPTMOD(PXC,Y,""I"",PXD)"
  • EXPLANATION:  The selected modifier must go with the CPT code.
1201 EVENT DATE AND TIME 12;1 DATE

  • INPUT TRANSFORM:  S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  DEC 17, 2018
  • HELP-PROMPT:  Enter the date and time the procedure was done.
  • DESCRIPTION:  This is the date and time the procedure was performed. 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.
    Date and time may be before or after the Visit date, with the restriction the date cannot be a future date.
  • TECHNICAL DESCR:  Event Date and Time defaults to NOW and reflects the actual time the service was provided. 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 procedure, the user should use the Historical Encounter entry action to document the historical procedure. 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 (#849)
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 procedure.
  • DESCRIPTION:  
    This field can be used to document the provider who ordered the procedure.
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 performed the procedure.
  • DESCRIPTION:  
    This is the provider who performed the procedure.
80101 EDITED FLAG 801;1 SET
  • '1' FOR EDITED;

  • LAST EDITED:  DEC 17, 2018
  • HELP-PROMPT:  Enter 1 if the original V CPT data is being edited.
  • DESCRIPTION:  This field is automatically set to 1 if PCE detects that any original procedure 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:  DEC 17, 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, the 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 adding or editing of data for this record.
    Iterations of editing will be concatenated to the previous data source value, up to 85 characters.
80201 PROVIDER NARRATIVE CATEGORY 802;1 POINTER TO PROVIDER NARRATIVE FILE (#9999999.27) PROVIDER NARRATIVE(#9999999.27)

  • INPUT TRANSFORM:  S DIC(0)=$S($D(PXKLAYGO):"LOX",$D(APCDALVR):"LO",$D(ZTQUEUED):"LO",1:"EMQLO") D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  DEC 17, 2018
  • HELP-PROMPT:  Enter the provider narrative category.
  • DESCRIPTION:  This field is the heading or category used to represent the provider narrative on the scanner form. It may be useful for understanding how providers are grouping data for use on the encounter form, and may help determine
    clinical data base definitions in the future.
  • TECHNICAL DESCR:  This field was added for use in the VA. It is used to identify the common groupings of clinical terminology used by providers. This field is only captured from automated data capture sources, such as AICS.
  • SCREEN:  S DIC(0)=$S($D(PXKLAYGO):"LOX",$D(APCDALVR):"LO",$D(ZTQUEUED):"LO",1:"EMQLO")
  • EXPLANATION:  OLD LOOKUP
81101 COMMENTS 811;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>245!($L(X)<1) X
    MAXIMUM LENGTH: 245
  • LAST EDITED:  DEC 17, 2018
  • HELP-PROMPT:  Answer must be 1-245 characters in length.
  • DESCRIPTION:  This is a comment related to the procedure performed. 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:  DEC 17, 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 17, 2018
  • HELP-PROMPT:  Enter the VistA package from which this procedure originated.
  • DESCRIPTION:  This is the VistA package from which this procedure 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:  DEC 17, 2018
  • HELP-PROMPT:  Select the data source for this procedure entry through PCE.
  • DESCRIPTION:  This is the data source for this procedure. It is set automatically and uneditable by users.
    UNEDITABLE

ICR, Total: 1

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #2627
  • Clinical Information Resource Network
  • CPT (.01).
    Access: Read w/Fileman

    PATIENT NAME (.02).
    Access: Read w/Fileman

    VISIT (.03).
    Access: Read w/Fileman

    PROVIDER NARRATIVE (.04).
    Access: Read w/Fileman

    EVENT DATE AND TIME (1201).
    Access: Read w/Fileman

    ORDERING PROVIDER (1202).
    Access: Read w/Fileman

    External References

    Name Field # of Occurrence
    ^%DT 1201+1
    ADD^AUPNVSIT .03(XREF 3S)
    SUB^AUPNVSIT .03(XREF 3K)
    ^DIC .01+1, .03+1, .04+1, 80201+1
    ICDEN^PXCECPT1 .05+1, .09+1, .1+1, .11+1, .12+1, .13+1, .14+1, .15+1
    KVFILEC^PXPXRM IXACRKL+1
    SVFILEC^PXPXRM IXACRSL+1

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^AUPNVCPT - [#9000010.18] .01(XREF 3S), .01(XREF 3K), .02(XREF 2S), .02(XREF 2K), .03(XREF 2S), .03(XREF 2K)
    ^AUPNVCPT("AA" .01(XREF 3S), .01(XREF 3K), .02(XREF 2S), .02(XREF 2K), .03(XREF 2S), .03(XREF 2K)
    ^AUPNVCPT("AD" .03(XREF 1S), .03(XREF 1K)
    ^AUPNVCPT("B" .01(XREF 1S), .01(XREF 1K)
    ^AUPNVCPT("C" .02(XREF 3S), .02(XREF 3K)
    ^AUPNVSIT - [#9000010] ID.03+1, .01(XREF 3S), .01(XREF 3K), .02(XREF 2S), .02(XREF 2K), .03(XREF 2S), .03(XREF 2K)
    ^DD("DD" ID.03+1
    ^DPT - [#2] ID.02+1
    ^PXRMINDX(9000010.18 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*!
    >> APCDALVR .04+1, 80201+1, 80201SCR+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!*, .04+1!*, 80201+1!*
    DIC("S" .01+1*, .01SCR+1*, .03+1*, .03SCR+1*, .05SCR+1*, .09SCR+1*, .1SCR+1*, .11SCR+1*, .12SCR+1*, .13SCR+1*
    , .14SCR+1*, .15SCR+1*
    DIC(0 .04+1*, .05SCR+1*, .09SCR+1*, .1SCR+1*, .11SCR+1*, .12SCR+1*, .13SCR+1*, .14SCR+1*, .15SCR+1*, 80201+1*
    , 80201SCR+1*
    >> DIE .01+1, .03+1, .04+1, 80201+1
    >> PXKLAYGO .04+1, 80201+1, 80201SCR+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), .04+1*!, .05+1!, .09+1!, .1+1!
    , .11+1!, .12+1!, .13+1!, .14+1!, .15+1!, .16+1!, .19+1!, .2+1!, 1201+1*!, 80102+1!
    , 80201+1*!, 81101+1!
    >> Y ID.03+1*, .01+1, .03+1, .04+1, .05+1, .09+1, .1+1, .11+1, .12+1, .13+1
    , .14+1, .15+1, 1201+1, 80201+1
    >> ZTQUEUED .04+1, 80201+1, 80201SCR+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