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

Package: PCE Patient Care Encounter

Global: ^AUPNVSIT


Information

FileMan FileNo FileMan Filename Package
9000010 VISIT PCE Patient Care Encounter

Description

Directly Accessed By Routines, Total: 251

Package Total Routines
PCE Patient Care Encounter 135 PXAICPT    PXAIPL    PXAIPOVV    PXAIPRV    PXAIPRVV    PXAIVSTV    PXAPIDEL    PXAPIIM
PXBAPI1    PXBAPI21    PXBGPRV4    PXBMCPT    PXBMPOV    PXBMPRV    PXBMSTP    PXBSTOR1
PXCAVST1    PXCE ADD/EDIT KNOWN ENCOUNTER    PXCEAE    PXCEAE1    PXCECCLS    PXCECPT1    PXCED800    PXCEHLOC
PXCEICR    PXCEINTR    PXCEPAT    PXCESC    PXCESDAM    PXCEVFI2    PXCEVFIL    PXCPTAPI
PXDXUTL    PXHFMEASREPAIR    PXICLN1    PXICLN17    PXKCO    PXKENC    PXKENCOUNTER    PXKFCPT1
PXKMAIN2    PXQMAIN1    PXRRPRDP    PXVUTL    ^AUPNVCPT    ^AUPNVICR    PXKMCODE    PXPXRM1
PXRRPCE3    PXUTLSTP    VSITGET    VSITKIL    VSITPUT1    VSITSTAT    ^AUPDVIMM    ^AUPNVIMM
^AUPNVPOV    ^AUPNVPRV    PXRHS04    PXRRWLS2    VSITOE    ^AUPNVSIT    ^AUPNVSK    AUPNVSIT
PXAI    PXAICPTV    PXAIPOV    PXAIVST    PXAPI    PXAPIOE    PXBAPI    PXBDPRV
PXBGCPT    PXBGPRV    PXBGPRV2    PXBGPRV3    PXBGSTP    PXBGVST    PXBMCPT2    PXBPCPT
PXBPL    PXBPSTP    PXBSTOR    PXCE    PXCE ENCOUNTER EDIT    PXCEC800    PXCECPT    PXCECSTP
PXCEEXP    PXCEPOV1    PXCEPRV    PXCESK    PXCEVFI1    PXCEVFI5    PXICLN27    PXICLN9B
PXKMAIN    PXKMASC    PXKVST    PXMCEVNT    PXMCLINK    PXPXRM    PXPXRMI1    PXQGVST
PXQMAIN4    PXQPPUTIL    PXQPPUTILR    PXQUTL    PXQUTL3A    PXRRFDSE    PXRRMDR    PXUTL1
PXVDIS    PXVRPC4A    PXVRPC7A    PXVUTIL    PXVXR    ^AUPNVHF    PXVRPC8    ^AUPNVPED
^AUPNVTRT    ^AUPNVXAM    PXPNARR    PXPXRMI2    PXRRECSE    PXRRPCE1    PXRRWLSE    PXVP217
PXVRESP    PXVSC    PXVWPXML    VSIT    VSITDEF    VSITVAR    VSITVID    
Scheduling 29 SCCVPCE    SCENIA2    SCRPW1    SCRPW18    SCRPW24    SD53103A    SD5396PT    SD53P491
SDAMEVT3    SDAMOL1    SDAMVSC    SDCED    SDCO22    SDEC25B    SDECALV    SDECALV1
SDECALVR    SDECAPI4    SDECUTL    SDECV    SDES2SETCHECKOUT    SDESCHECKOUT    SDESUNDOCHECKOUT    SDOEOE
SDSCAPI    SDSCEDT    SDSCUTL    SDVSIT    SDVSIT2    
Text Integration Utility 16 TIUCCRHL7P2    TIUEDS    TIUENV    TIUEPN    TIULV    TIUP134    TIUP146    TIUPNCVX
TIUPXAP3    TIUPXPM    TIUSRVLC    TIUSRVLV    TIUSRVP    TIUVISIT    TIUXRC1    TIUXRC3
Virtual Patient Record 15 VPRDJ04    VPRDJ04A    VPRDJ09    VPRDPXAM    VPRDPXED    VPRDPXHF    VPRDPXSK    VPRENC
VPREVNT    VPRHSX2    VPRP20    VPRSDADG    VPRSDAHX    VPRSDAV    VPRSDAVF    
Clinical Reminders 13 PXRMDATE    PXRMDLLC    PXRMETXR    PXRMFNFT    PXRMG2E1    PXRMGECV    PXRMIMM    PXRMLOCF
PXRMLOCL    PXRMMST    PXRMNTFY    PXRMVSIT    PXRMXX    
Enterprise Health Management Platform 5 HMPDJ02    HMPDJ02A    HMPDJ04    HMPDJ04E    HMPWB5    
Order Entry Results Reporting 5 ORFSKT    ORWGAPI6    ORWGAPI8    ORWPCE1    ORWPCE3    
Oncology 4 ONC DISEASE INDEX    ONC DISEASE INDEX CASEFINDING    ^ONCO(169.99    ONCFUNC    
Womens Health 4 PROCEDURE ACTIONS    WVUTL11    ^WV(790.8    ^WV(791    
Clinical Case Registries 3 RORHL18    RORHL19    RORUTL21    
VA FileMan 3 ^DDE    ITEM    YEAR    
Integrated Billing 2 IB20P565    IBEFUNC3    
Prosthetics 2 RMPR145P    RMPRPCED    
Accounts Receivable 1 RCXVDC5    
Automated Medical Information Exchange 1 DVBABTIU    
Barcode Medication Administration 1 PSBVITFL    
Clinical Information Resource Network 1 RGHOUT    
DSS Extracts 1 ECXSURG    
Enrollment Application System 1 EASUER    
Kernel 1 ^ORD(101    
Lab Service 1 LREPI3    
Medicine 1 MCPOS04    
Mental Health 1 YSBWHIGH    
Pharmacy Benefits Management 1 PSUDEM2    
Registration 1 DGPMVBUR    

Accessed By FileMan Db Calls, Total: 60

Package Total Routines
Scheduling 21 SCENIA2    SCMCENCT    SCRPW1    SD53P491    SDAMVSC    SDCO0    SDEC25    SDEC25B
SDECAPI4    SDECUTL    SDECV    SDES25    SDES2SETCHECKOUT    SDESCHECKOUT    SDRPA08    SDSCAPI
SDSCEDT    SDSCLM    SDSCNSCP    SDSCOMP    SDVSIT    
PCE Patient Care Encounter 13 PXAIVSTV    PXCAVST    PXCEPAT    PXCESIT    PXQMAIN4    PXRRECSC    PXRRGPRT    PXRRMDR
PXRRMDR1    VSITKIL    VSITOE    VSITPUT1    VSITVID    
Text Integration Utility 5 TIUHL7P2    TIUP134P    TIUP146P    TIUP149P    TIUVISIT    
Clinical Reminders 4 PXRMLOCF    PXRMXGPR    PXRMXSC    PXRMXTD    
Integrated Billing 4 IBCD    IBCD2    IBCSC10B    IBCU41    
Enterprise Health Management Platform 3 HMPDJ04    HMPDJ09    HMPEQLM    
Clinical Case Registries 2 RORHL18    RORHL19    
Accounts Receivable 1 RCXVUTIL    
Automated Information Collection System 1 IBDFRPC6    
Automated Medical Information Exchange 1 DVBCREPT    
Clinical Information Resource Network 1 RGHOUT    
Master Patient Index VistA 1 MPIFDODC    
Oncology 1 ONCOPRT    
Prosthetics 1 RMPR145P    
Womens Health 1 WVMGRP1    

Pointed To By FileMan Files, Total: 45

Package Total FileMan Files
Medicine 15 ECHO(#691)[900]    CARDIAC CATHETERIZATION(#691.1)[900]    ELECTROCARDIOGRAM (EKG)(#691.5)[900]    HOLTER(#691.6)[900]    EXERCISE TOLERANCE TEST(#691.7)[900]    ELECTROPHYSIOLOGY (EP)(#691.8)[900]    HEMATOLOGY(#694)[900]    GENERATOR IMPLANT(#698)[900]    V LEAD IMPLANT(#698.1)[900]    A LEAD IMPLANT(#698.2)[900]    PACEMAKER SURVEILLANCE(#698.3)[900]    ENDOSCOPY/CONSULT(#699)[900]    GENERALIZED PROCEDURE/CONSULT(#699.5)[900]    PULMONARY FUNCTION TESTS(#700)[900]    RHEUMATOLOGY(#701)[900]    
PCE Patient Care Encounter 14 V IMMUNIZATION DELETED(#9000080.11)[.03]    V CPT(#9000010.18)[.03]    V HEALTH FACTORS(#9000010.23)[.03]    V IMM CONTRA/REFUSAL EVENTS(#9000010.707)[.03]    V IMMUNIZATION(#9000010.11)[.03]    V PATIENT ED(#9000010.16)[.03]    V POV(#9000010.07)[.03]    V PROVIDER(#9000010.06)[.03]    V STANDARD CODES(#9000010.71)[.03]    VISIT(#9000010)[.12]    V SKIN TEST(#9000010.12)[.03]    V TREATMENT(#9000010.15)[.03]    V EXAM(#9000010.13)[.03]    PCE DEVICE INTERFACE MODULE ERRORS(#839.01)[.03]    
Womens Health 3 WV PATIENT(#790)[#790.05(4)#790.16(4)]    WV PROCEDURE(#790.1)[#790.23(2)]    WV DATA NEEDING REVIEW(#790.8)[2#790.801(12)]    
Registration 2 PATIENT MOVEMENT(#405)[.27]    PTF(#45)[#45.06(.06)]    
Text Integration Utility 2 TIU DOCUMENT(#8925)[.031207]    TIU AUDIT TRAIL(#8925.5)[1.111.12]    
Clinical Procedures 1 CP TRANSACTION(#702)[.13]    
Clinical Reminders 1 REMINDER EXTRACT SUMMARY(#810.3)[#810.31(.07)]    
Emergency Department Integration Software 1 ED LOG(#230)[.12]    
Event Capture 1 EVENT CAPTURE PATIENT(#721)[28]    
Integrated Billing 1 CLAIMS TRACKING(#356)[.03]    
Prosthetics 1 RECORD OF PROS APPLIANCE/REPAIR(#660)[8.12]    
Radiology Nuclear Medicine 1 RAD/NUC MED PATIENT(#70)[#70.03(27)]    
Scheduling 1 OUTPATIENT ENCOUNTER(#409.68)[.05]    
Surgery 1 SURGERY(#130)[.015]    

Pointer To FileMan Files, Total: 12

Package Total FileMan Files
Kernel 4 OPTION(#19)[.24]    PACKAGE(#9.4)[81202]    PROTOCOL(#101)[.25]    NEW PERSON(#200)[.23]    
PCE Patient Care Encounter 4 PATIENT/IHS(#9000001)[.05]    VISIT(#9000010)[.12]    LOCATION(#9999999.06)[.06]    PCE DATA SOURCE(#839.7)[81203]    
Scheduling 2 CLINIC STOP(#40.7)[.08]    HOSPITAL LOCATION(#44)[.22]    
Integrated Billing 1 PFSS ACCOUNT(#375)[.26]    
Registration 1 ELIGIBILITY CODE(#8)[.21]    

Fields, Total: 41

Field # Name Loc Type Details
.01 VISIT/ADMIT DATE&TIME 0;1 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="EST" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  OCT 18, 2018
  • HELP-PROMPT:  Enter the Visit/Admit Date and Time
  • DESCRIPTION:  VISIT/ADMIT DATE & TIME must be between the patient's date of birth and today. In the VA this reflects the visit appointment and or event date time.
  • DELETE TEST:  .01,0)= I 1
  • GROUP:  VA/IHS
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  9000010^B
    1)= S ^AUPNVSIT("B",$E(X,1,30),DA)=""
    2)= K ^AUPNVSIT("B",$E(X,1,30),DA)
    Regular B cross reference on .01 Visit/Admit Date&Time ^AUPNVSIT("B",Visit/Admit Date&Time,ien)=""
  • CROSS-REFERENCE:  9000010^AAHTOO^MUMPS
    1)= I $P(^AUPNVSIT(DA,0),U,5),$P(^(0),U,7)]"",$P(^(0),U,7)="H" S ^AUPNVSIT("AAH",$P(^AUPNVSIT(DA,0),U,5),((9999999-$P(X,".",1))_$S($P(X,".",2)'="":"."_$P(X,".",2),1:"")),DA)=""
    2)= I $P(^AUPNVSIT(DA,0),U,5),$P(^(0),U,7)]"",$P(^(0),U,7)="H" K ^AUPNVSIT("AAH",$P(^AUPNVSIT(DA,0),U,5),((9999999-$P(X,".",1))_$S($P(X,".",2)'="":"."_$P(X,".",2),1:"")),DA)
    This cross-reference indexes hospitalization visits (#.07=H) by patient and inverse visit date. Used to get at the last N hospitalizations.
  • CROSS-REFERENCE:  9000010^AA-TOO^MUMPS
    1)= I $P(^AUPNVSIT(DA,0),U,5) S ^AUPNVSIT("AA",$P(^AUPNVSIT(DA,0),U,5),((9999999-$P(X,".",1))_$S($P(X,".",2)'="":"."_$P(X,".",2),1:"")),DA)=$S(+$P(^AUPNVSIT(DA,0),U,21):+$P(^(0),U,21),1:"")
    2)= I $P(^AUPNVSIT(DA,0),U,5) K ^AUPNVSIT("AA",$P(^AUPNVSIT(DA,0),U,5),((9999999-$P(X,".",1))_$S($P(X,".",2)'="":"."_$P(X,".",2),1:"")),DA)
    This cross-reference indexes visits by patient and inverse date. It is used to find the last N visits for a patient. The name AA-TOO signifies that the cross-reference uses several field values and therefore, the index AA
    is set on all the fields.
  • CROSS-REFERENCE:  9000010^AET1^MUMPS
    1)= I $P($G(^AUPNVSIT(DA,150)),U,3)]"",$P($G(^AUPNVSIT(DA,0)),U,22)]"",$P($G(^AUPNVSIT(DA,0)),U,5)]"" S ^AUPNVSIT("AET",$P(^AUPNVSIT(DA,0),U,5),X,$P(^AUPNVSIT(DA,0),U,22),$P(^AUPNVSIT(DA,150),U,3),DA)=""
    2)= I $P($G(^AUPNVSIT(DA,150)),U,3)]"",$P($G(^AUPNVSIT(DA,0)),U,22)]"",$P($G(^AUPNVSIT(DA,0)),U,5)]"" K ^AUPNVSIT("AET",$P(^AUPNVSIT(DA,0),U,5),X,$P(^AUPNVSIT(DA,0),U,22),$P(^AUPNVSIT(DA,150),U,3),DA)
    Cross-reference for OE 3 and CPRS, this gives the patient, visit date/time, hospital location, encounter type, visit IEN.
  • CROSS-REFERENCE:  9000010^ADEL2^MUMPS
    1)= I $G(DUZ("AG"))'?1"I"0.1"HS",+$P(^AUPNVSIT(DA,0),"^",9)'>0 S ^AUPNVSIT("ADEL",+X,DA)=""
    2)= K ^AUPNVSIT("ADEL",+X,DA)
    This sets the "delete" flag based upon the Dependent Entry Count.
  • CROSS-REFERENCE:  9000010^AHL2^MUMPS
    1)= I $P(^AUPNVSIT(DA,0),U,22) S ^AUPNVSIT("AHL",$P(^AUPNVSIT(DA,0),U,22),((9999999-$P(X,".",1))_$S($P(X,".",2)'="":"."_$P(X,".",2),1:"")),DA)=""
    2)= I $P(^AUPNVSIT(DA,0),U,22) K ^AUPNVSIT("AHL",$P(^AUPNVSIT(DA,0),U,22),((9999999-$P(X,".",1))_$S($P(X,".",2)'="":"."_$P(X,".",2),1:"")),DA)
    This cross-reference indexes visits by hospital location and inverse date. It is used to find a date/time range of visits by hospital location. The cross-reference uses several field values and therefore, the index 'AHL'
    is set on all the fields. The name AHL2 signifies that the cross-reference uses several field values and therefore, the index AHL is set on all the fields.
.02 DATE VISIT CREATED 0;2 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="EXRS" D ^%DT S X=Y K:DTX) X
  • LAST EDITED:  OCT 17, 2018
  • HELP-PROMPT:  Enter the date and time the visit was created.
  • DESCRIPTION:  The date and time when a new visit is added. It is generated automatically and set to NOW.
  • GROUP:  IHS/VA
    UNEDITABLE
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.03 TYPE 0;3 SET
************************REQUIRED FIELD************************
  • 'I' FOR IHS;
  • 'C' FOR CONTRACT;
  • 'T' FOR TRIBAL;
  • 'O' FOR OTHER;
  • '6' FOR 638 PROGRAM;
  • 'V' FOR VA;
  • 'AF' FOR AIR FORCE;
  • 'N' FOR NAVY;
  • 'E' FOR EHR;
  • 'ARMY' FOR ARMY;
  • 'USCG' FOR COAST GUARD;

  • LAST EDITED:  SEP 25, 2019
  • HELP-PROMPT:  Select the type of visit.
  • DESCRIPTION:  The type of visit. The purpose is to differentiate between various categories of visits, such as a visit provided by contract care funds versus a regular VA visit. This field is set automatically.
  • GROUP:  IHS
.05 PATIENT NAME 0;5 POINTER TO PATIENT/IHS FILE (#9000001)
************************REQUIRED FIELD************************
PATIENT/IHS(#9000001)

  • LAST EDITED:  OCT 17, 2018
  • HELP-PROMPT:  Enter the patient.
  • DESCRIPTION:  Pointer to the Patient file.
  • GROUP:  IHS
    UNEDITABLE
  • CROSS-REFERENCE:  9000010^C
    1)= S ^AUPNVSIT("C",$E(X,1,30),DA)=""
    2)= K ^AUPNVSIT("C",$E(X,1,30),DA)
  • CROSS-REFERENCE:  9000010^AA^MUMPS
    1)= S ^AUPNVSIT("AA",X,((9999999-$P(+^AUPNVSIT(DA,0),".",1))_$S($P(+^AUPNVSIT(DA,0),".",2)'="":"."_$P(+^(0),".",2),1:"")),DA)=$S(+$P(^AUPNVSIT(DA,0),U,21):+$P(^(0),U,21),1:"")
    2)= K ^AUPNVSIT("AA",X,((9999999-$P(+^AUPNVSIT(DA,0),".",1))_$S($P(+^AUPNVSIT(DA,0),".",2)'="":"."_$P(+^(0),".",2),1:"")),DA)
    Indexes visits by patient and inverse visit date. Used to find the last N visits of a patient.
  • CROSS-REFERENCE:  9000010^AAHTOO2^MUMPS
    1)= I $P(^AUPNVSIT(DA,0),U,7)]"",$P(^(0),U,7)="H" S ^AUPNVSIT("AAH",X,((9999999-$P(+^AUPNVSIT(DA,0),".",1))_$S($P(+^AUPNVSIT(DA,0),".",2)'="":"."_$P(+^(0),".",2),1:"")),DA)=""
    2)= I $P(^AUPNVSIT(DA,0),U,7)]"",$P(^(0),U,7)="H" K ^AUPNVSIT("AAH",X,((9999999-$P(+^AUPNVSIT(DA,0),".",1))_$S($P(+^AUPNVSIT(DA,0),".",2)'="":"."_$P(+^(0),".",2),1:"")),DA)
    Indexes hospitalization visits by patient and inverse visit date. Used to find the last N hospitalizations for a given patient.
  • CROSS-REFERENCE:  9000010^AET2^MUMPS
    1)= I $P($G(^AUPNVSIT(DA,150)),U,3)]"",$P($G(^AUPNVSIT(DA,0)),U,22)]"" S ^AUPNVSIT("AET",X,$P(^AUPNVSIT(DA,0),U,1),$P(^AUPNVSIT(DA,0),U,22),$P(^AUPNVSIT(DA,150),U,3),DA)=""
    2)= I $P($G(^AUPNVSIT(DA,150)),U,3)]"",$P($G(^AUPNVSIT(DA,0)),U,22)]"" K ^AUPNVSIT("AET",X,$P(^AUPNVSIT(DA,0),U,1),$P(^AUPNVSIT(DA,0),U,22),$P(^AUPNVSIT(DA,150),U,3),DA)
    Cross-reference for OE 3 and CPRS, this gives the patient, visit date/time, hospital location, encounter type, and visit IEN.
.06 LOC. OF ENCOUNTER 0;6 POINTER TO LOCATION FILE (#9999999.06) LOCATION(#9999999.06)

  • LAST EDITED:  SEP 12, 2018
  • HELP-PROMPT:  Enter the Institution where the Visit took place.
  • DESCRIPTION:  Pointer to the Location file, location where the visit took place. In the VA, the Location file entries will be based on the current entries in the Institution file, so this field represents the institution.
  • GROUP:  IHS
.07 SERVICE CATEGORY 0;7 SET
************************REQUIRED FIELD************************
  • 'A' FOR AMBULATORY;
  • 'H' FOR HOSPITALIZATION;
  • 'I' FOR IN HOSPITAL;
  • 'C' FOR CHART REVIEW;
  • 'T' FOR TELECOMMUNICATIONS;
  • 'N' FOR NOT FOUND;
  • 'S' FOR DAY SURGERY;
  • 'O' FOR OBSERVATION;
  • 'E' FOR EVENT (HISTORICAL);
  • 'R' FOR NURSING HOME;
  • 'D' FOR DAILY HOSPITALIZATION DATA;
  • 'X' FOR ANCILLARY PACKAGE DAILY DATA;

  • LAST EDITED:  SEP 12, 2018
  • HELP-PROMPT:  Enter the Service Category
  • DESCRIPTION:  Service Category represents what kind of service was provided.
    The population of this field is dependent upon entries provided by applications as well as default values and calculated codes.
  • GROUP:  IHS
  • CROSS-REFERENCE:  9000010^AAH^MUMPS
    1)= I X="H",$P(^AUPNVSIT(DA,0),U,5)]"" S ^AUPNVSIT("AAH",$P(^AUPNVSIT(DA,0),U,5),((9999999-$P(+^(0),".",1))_$S($P(+^(0),".",2):"."_$P(+^(0),".",2),1:"")),DA)=""
    2)= I X="H",$P(^AUPNVSIT(DA,0),U,5)]"" K ^AUPNVSIT("AAH",$P(^AUPNVSIT(DA,0),U,5),((9999999-$P(+^(0),".",1))_$S($P(+^(0),".",2):"."_$P(+^(0),".",2),1:"")),DA)
    Indexes hospitalization visits by patient and inverse visit date. Used to find the last N hospitalizations for a patient.
.08 DSS ID 0;8 POINTER TO CLINIC STOP FILE (#40.7) CLINIC STOP(#40.7)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,3)=""""!($P(^(0),U,3)'<$P(^AUPNVSIT(DA,0),U))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  OCT 17, 2018
  • HELP-PROMPT:  Enter the clinic in which the visit took place.
  • DESCRIPTION:  This is a pointer to the Clinic Stop file. It is the clinic in which this visit took place.
  • SCREEN:  S DIC("S")="I $P(^(0),U,3)=""""!($P(^(0),U,3)'<$P(^AUPNVSIT(DA,0),U))"
  • EXPLANATION:  ALLOW PAST VISITS
  • GROUP:  IHS/VA
.09 DEPENDENT ENTRY COUNT 0;9 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  OCT 17, 2018
  • HELP-PROMPT:  Enter an integer between 0 and 999.
  • DESCRIPTION:  This is a count of how many "V" file entries are pointing to this visit. If the count is zero, the visit should be deleted. This field is updated by a cross-reference in each "V" file that calls routine ADD^AUPNVSIT or
    SUB^AUPNVSIT. This field should never be edited by hand.
    WRITE AUTHORITY: ^
  • GROUP:  IHS/VA
    UNEDITABLE
  • CROSS-REFERENCE:  9000010^ADEL^MUMPS
    1)= I $G(DUZ("AG"))'?1"I"0.1"HS" S:X'>0 ^AUPNVSIT("ADEL",+^AUPNVSIT(DA,0),DA)="" K:X>0 ^AUPNVSIT("ADEL",+^AUPNVSIT(DA,0),DA)
    2)= Q
.11 DELETE FLAG 0;11 SET
  • '0' FOR ACTIVE;
  • '1' FOR DELETED;

  • LAST EDITED:  OCT 17, 2018
  • HELP-PROMPT:  Enter 1 to signify the visit has been deleted, 0 otherwise.
  • DESCRIPTION:  Flag set to signify that the visit has been deleted.
    WRITE AUTHORITY: ^
  • GROUP:  IHS/VA
    UNEDITABLE
.12 PARENT VISIT LINK 0;12 POINTER TO VISIT FILE (#9000010) VISIT(#9000010)

  • LAST EDITED:  OCT 22, 2018
  • HELP-PROMPT:  Enter the Parent Visit Link.
  • DESCRIPTION:  The Parent Visit Link field points back to the Visit file.
  • GROUP:  IHS/VA
  • CROSS-REFERENCE:  9000010^AD
    1)= S ^AUPNVSIT("AD",$E(X,1,30),DA)=""
    2)= K ^AUPNVSIT("AD",$E(X,1,30),DA)
    PARENT VISIT LINK
  • CROSS-REFERENCE:  9000010^APV^MUMPS
    1)= D ADD^AUPNVSIT
    2)= D SUB^AUPNVSIT
    This updates the dependent entry count when a child visit is created.
.13 DATE LAST MODIFIED 0;13 DATE

  • INPUT TRANSFORM:  S %DT="EXRS" D ^%DT S X=Y K:DTX) X
  • LAST EDITED:  OCT 17, 2018
  • HELP-PROMPT:  Enter the date and time when visit was last modified.
  • DESCRIPTION:  Date and time when the visit was last modified. Any time a field in the visit file or a V-File is added or deleted, this field is automatically updated with the current date and time. This field is set automatically.
  • GROUP:  IHS/VA
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.18 CHECK OUT DATE&TIME 0;18 DATE

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  FEB 17, 1994
  • HELP-PROMPT:  Enter the date and time the patient checked out.
  • DESCRIPTION:  This field is the date and time the patient checked out for this visit.
  • TECHNICAL DESCR:  
    This data is passed from the MCCR event data capture and then passed from PCE to PIMS 5.3 for automated check-out.
.21 ELIGIBILITY 0;21 POINTER TO ELIGIBILITY CODE FILE (#8) ELIGIBILITY CODE(#8)

  • INPUT TRANSFORM:  S DIC("S")="I $D(^DPT($S($D(DFN):DFN,1:$P(^AUPNVSIT(DA,0),""^"",5)),""E"",+Y,0))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  SEP 13, 2018
  • HELP-PROMPT:  Select the eligibility which best describes the patient's entitlement to care for this visit.
  • DESCRIPTION:  
    Defines the patient's eligibility for this visit.
  • SCREEN:  S DIC("S")="I $D(^DPT($S($D(DFN):DFN,1:$P(^AUPNVSIT(DA,0),""^"",5)),""E"",+Y,0))"
  • EXPLANATION:  Only valid eligibilities for this patient.
  • GROUP:  VA
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  9000010^AVAA2^MUMPS
    1)= I +$P(^AUPNVSIT(DA,0),"^",5) S ^AUPNVSIT("AA",$P(^AUPNVSIT(DA,0),"^",5),((9999999-$P(+^AUPNVSIT(DA,0),"."))_$S($P(+^AUPNVSIT(DA,0),".",2)'="":"."_$P(+^(0),".",2),1:"")),DA)=$S(+X:+X,1:"")
    2)= I +$P(^AUPNVSIT(DA,0),"^",5),$D(^AUPNVSIT("AA",$P(^AUPNVSIT(DA,0),"^",5),((9999999-$P(+^AUPNVSIT(DA,0),"."))_$S($P(+^AUPNVSIT(DA,0),".",2)'="":"."_$P(+^(0),".",2),1:"")),DA)) S ^(DA)=""
    3)= This is a required field.
    Set the "AA" cross-reference equal to the patient's eligibility (pointer).
.22 HOSPITAL LOCATION 0;22 POINTER TO HOSPITAL LOCATION FILE (#44) HOSPITAL LOCATION(#44)

  • LAST EDITED:  FEB 23, 2007
  • HELP-PROMPT:  Answer with the name of the hospital location where this visit occurred.
  • DESCRIPTION:  
    The hospital location where this visit occurred.
  • GROUP:  VA
  • CROSS-REFERENCE:  9000010^AHL^MUMPS
    1)= S ^AUPNVSIT("AHL",X,(9999999-$P($P(^AUPNVSIT(DA,0),U,1),".",1))_$S($P($P(^(0),U,1),".",2)'="":"."_$P($P(^(0),U,1),".",2),1:""),DA)=""
    2)= K ^AUPNVSIT("AHL",X,(9999999-$P($P(^AUPNVSIT(DA,0),U,1),".",1))_$S($P($P(^(0),U,1),".",2)'="":"."_$P($P(^(0),U,1),".",2),1:""),DA)
    This cross-reference indexes visits by hospital location and inverse date. It is used to find a date/time range of visits by hospital location. The cross-reference uses several field values and therefore, the index 'AHL'
    is set on all the fields.
  • CROSS-REFERENCE:  9000010^AET3^MUMPS
    1)= I $P($G(^AUPNVSIT(DA,150)),U,3)]"",$P($G(^AUPNVSIT(DA,0)),U,5)]"" S ^AUPNVSIT("AET",$P(^AUPNVSIT(DA,0),U,5),$P(^AUPNVSIT(DA,0),U,1),X,$P(^AUPNVSIT(DA,150),U,3),DA)=""
    2)= I $P($G(^AUPNVSIT(DA,150)),U,3)]"",$P($G(^AUPNVSIT(DA,0)),U,5)]"" K ^AUPNVSIT("AET",$P(^AUPNVSIT(DA,0),U,5),$P(^AUPNVSIT(DA,0),U,1),X,$P(^AUPNVSIT(DA,150),U,3),DA)
    Cross-reference for OE 3 and CPRS, this gives the patient, visit date/time, hospital location, encounter type, and visit IEN.
.23 CREATED BY USER 0;23 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  OCT 17, 2018
  • HELP-PROMPT:  Enter the user who created or updated the visit.
  • DESCRIPTION:  This field contains the USER passed in by the application calling the PCE API ($$DATA2PCE^PXAPI) to create or update the visit. If USER is not defined DUZ will be used.
    If something other than $$DATA2PCE^PXAPI is used to create or update the entry then DUZ will be used.
  • GROUP:  VA
.24 OPTION USED TO CREATE 0;24 POINTER TO OPTION FILE (#19) OPTION(#19)

  • LAST EDITED:  OCT 17, 2018
  • HELP-PROMPT:  Enter the option under which this visit was created.
  • DESCRIPTION:  If known, the option under which this visit was created.
  • GROUP:  VA
.25 PROTOCOL 0;25 POINTER TO PROTOCOL FILE (#101) PROTOCOL(#101)

  • LAST EDITED:  OCT 15, 2018
  • HELP-PROMPT:  Select the Protocol that was used to create this visit.
  • DESCRIPTION:  This is the protocol which was used to create this visit. This field is set automatically.
.26 PFSS ACCOUNT REFERENCE 0;26 POINTER TO PFSS ACCOUNT FILE (#375) PFSS ACCOUNT(#375)

  • LAST EDITED:  JUN 02, 2005
  • DESCRIPTION:  
    The number by which all VistA applications will reference an external medical billing system account number for purposes of attaching charges for 1st or 3rd party billing.
  • TECHNICAL DESCR:  
    A pointer to the PFSS ACCOUNT FILE (#375)
2101 OUTSIDE LOCATION 21;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>50!($L(X)<2) X
  • LAST EDITED:  JUN 03, 1992
  • HELP-PROMPT:  Answer must be 2-50 characters in length.
  • DESCRIPTION:  
    Free text location of service.
15001 VISIT ID 150;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<8)!'(X?4.10NU1"-"3.4U) X
  • LAST EDITED:  OCT 18, 2018
  • HELP-PROMPT:  Enter the unique visit ID.
  • DESCRIPTION:  This is the unique visit ID, it is set by Visit Tracking and cannot be changed.
    UNEDITABLE
  • CROSS-REFERENCE:  9000010^VID
    1)= S ^AUPNVSIT("VID",$E(X,1,30),DA)=""
    2)= K ^AUPNVSIT("VID",$E(X,1,30),DA)
15002 PATIENT STATUS IN/OUT 150;2 SET
  • '1' FOR IN;
  • '0' FOR OUT;

  • LAST EDITED:  OCT 15, 2018
  • HELP-PROMPT:  Enter the patient's status at the time of the visit.
  • DESCRIPTION:  This is an indicator of the patient's status at the time of the visit. It is set automatically using the API $$IP^VSITCK1.
15003 ENCOUNTER TYPE 150;3 SET
  • 'P' FOR PRIMARY;
  • 'O' FOR OCCASION OF SERVICE;
  • 'S' FOR STOP CODE;
  • 'A' FOR ANCILLARY;
  • 'C' FOR CREDIT STOP;

  • LAST EDITED:  OCT 18, 2018
  • HELP-PROMPT:  Enter the Encounter Type.
  • DESCRIPTION:  This field notes the encounter type.
  • CROSS-REFERENCE:  9000010^AET^MUMPS
    1)= I $P($G(^AUPNVSIT(DA,0)),U,5)]"",$P($G(^AUPNVSIT(DA,0)),U,22)]"" S ^AUPNVSIT("AET",$P(^AUPNVSIT(DA,0),U,5),$P(^AUPNVSIT(DA,0),U,1),$P(^AUPNVSIT(DA,0),U,22),X,DA)=""
    2)= I $P($G(^AUPNVSIT(DA,0)),U,5)]"",$P($G(^AUPNVSIT(DA,0)),U,22)]"" K ^AUPNVSIT("AET",$P(^AUPNVSIT(DA,0),U,5),$P(^AUPNVSIT(DA,0),U,1),$P(^AUPNVSIT(DA,0),U,22),X,DA)
    Cross-reference for OE 3 and CPRS, this gives the patient, visit date/time, hospital location, encounter type, and visit IEN.
80001 SERVICE CONNECTED 800;1 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  OCT 18, 2018
  • HELP-PROMPT:  If this visit is treating a service connected problem, enter 'YES' here.
  • DESCRIPTION:  
    This field will be used to indicate if this visit was for treating a VA patient based on a service connected problem.
  • TECHNICAL DESCR:  
    This field may be passed to the Visit based on the MCCR event data capture.
80002 AGENT ORANGE EXPOSURE 800;2 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  OCT 18, 2018
  • HELP-PROMPT:  If this visit is treating an agent orange exposure problem, enter 'YES' here.
  • DESCRIPTION:  
    This field is used to indicate that this visit represents treatment of a VA patient for a problem that is related to Agent Orange Exposure.
  • TECHNICAL DESCR:  
    This data may be passed to the Visit from MCCR event data capture.
80003 IONIZING RADIATION EXPOSURE 800;3 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  OCT 17, 2018
  • HELP-PROMPT:  If this visit is treating a problem related to Ionizing Radiation Exposure, enter 'YES'.
  • DESCRIPTION:  This field is used to indicate that this visit represents treatment of a VA patient for a problem that is related to Ionizing Radiation Exposure.
  • TECHNICAL DESCR:  
    This data may be passed to the Visit from MCCR event data capture.
80004 SW ASIA CONDITIONS 800;4 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  OCT 18, 2018
  • HELP-PROMPT:  If this visit is treating a problem related to SW Asia Conditions Exposure, enter 'YES'.
  • DESCRIPTION:  
    This field is used to indicate that this visit represents treatment of a VA patient for a problem that is related to Southwest Asia Conditions Exposure.
  • TECHNICAL DESCR:  
    This data may be passed to the Visit from the MCCR event data capture.
80005 MILITARY SEXUAL TRAUMA 800;5 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  OCT 17, 2018
  • HELP-PROMPT:  If this visit is treating a problem related to Military Sexual Trauma, enter 'YES'.
  • DESCRIPTION:  Indicates whether the patient's visit was related to Military Sexual Trauma.
80006 HEAD AND/OR NECK CANCER 800;6 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  OCT 18, 2018
  • HELP-PROMPT:  If this visit is treating a problem related to Head/Neck Cancer, enter 'YES'.
  • DESCRIPTION:  
    This field is used to indicate that the visit represents treatment of a VA patient for a problem that is related to Head and/or Neck Cancer.
80007 COMBAT VETERAN 800;7 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  OCT 17, 2018
  • HELP-PROMPT:  If this visit is treating a problem related to combat, enter 'YES'.
  • DESCRIPTION:  This field is used to indicate that the visit represents treatment of a VA patient for a problem that is related to combat.
80008 PROJ 112/SHAD 800;8 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  JUN 02, 2005
  • HELP-PROMPT:  If this visit is treating a problem related to PROJ 112/SHAD, enter 'YES'.
  • DESCRIPTION:  Project 112/SHAD was the name of the overall program for both shipboard and land-based biological and chemical testing that was conducted by the United States (U.S.) military between 1962 and 1973. Project SHAD (Shipboard
    Hazard and Defense) was the shipboard portion of these tests.
80011 SERVICE CONNECTION EDIT FLAG 800;11 SET
  • '0' FOR EDITABLE;
  • '1' FOR NOT EDITABLE;

  • LAST EDITED:  OCT 18, 2018
  • HELP-PROMPT:  Enter 1 to prevent user editing of the Service Connection classification.
  • DESCRIPTION:  This field is used to determine if the Service Connection Classification for the Visit can be edited by the user.
  • TECHNICAL DESCR:  The Service Connected classification is not editable if either any of the diagnosis Service Connection classifications are 'Yes' or all the diagnosis Service Connection classifications are 'No'.
80012 AGENT ORANGE EDIT FLAG 800;12 SET
  • '0' FOR EDITABLE;
  • '1' FOR NOT EDITABLE;

  • LAST EDITED:  OCT 18, 2018
  • HELP-PROMPT:  Enter 1 to prevent user editing of the Agent Orange classification.
  • DESCRIPTION:  This field is used to determine if the Agent Orange Classification for the Visit can be edited by the user.
  • TECHNICAL DESCR:  The Agent Orange classification is not editable if either any of the diagnosis Agent Orange classifications are 'Yes' or all the diagnosis Agent Orange classifications are 'No'.
80013 IONIZING RADIATION EDIT FLAG 800;13 SET
  • '0' FOR EDITABLE;
  • '1' FOR NOT EDITABLE;

  • LAST EDITED:  OCT 18, 2018
  • HELP-PROMPT:  Enter 1 to prevent user editing of the Ionizing Radiation classification
  • DESCRIPTION:  This field is used to determine if the Ionizing Radiation classification for the Visit can be edited by the user.
  • TECHNICAL DESCR:  The Ionizing Radiation classification is not editable if either any of the diagnosis Ionizing Radiation classifications are 'Yes' or all the diagnosis Ionizing Radiation classifications are 'No'.
80014 SW ASIA CONDITIONS EDIT FLAG 800;14 SET
  • '0' FOR EDITABLE;
  • '1' FOR NOT EDITABLE;

  • LAST EDITED:  OCT 18, 2018
  • HELP-PROMPT:  Enter 1 to prevent user editing of the SW Asia Conditions classification.
  • DESCRIPTION:  This field is used to determine if the Southwest Asia Conditions classification for the Visit can be edited by the user.
  • TECHNICAL DESCR:  The Southwest Asia Conditions classification is not editable if either any of the diagnosis Southwest Asia Conditions classifications are 'Yes', or all the diagnosis Southwest Asia Conditions classifications are 'No'.
80015 MST EDIT FLAG 800;15 SET
  • '0' FOR EDITABLE;
  • '1' FOR NOT EDITABLE;

  • LAST EDITED:  OCT 18, 2018
  • HELP-PROMPT:  Enter 1 to prevent user editing of the Military Sexual Trauma classification
  • DESCRIPTION:  This field is used to determine if the Military Sexual Trauma classification for the Visit can be edited by the user.
  • TECHNICAL DESCR:  The Military Sexual Trauma classification is not editable if either any of the diagnosis Military Sexual Trauma classifications are 'Yes', or all the diagnosis Military Sexual Trauma classifications are 'No'.
80016 HEAD AND NECK CANCER EDIT FLAG 800;16 SET
  • '0' FOR EDITABLE;
  • '1' FOR NOT EDITABLE;

  • LAST EDITED:  OCT 18, 2018
  • HELP-PROMPT:  Enter 1 to prevent user editing of the Head and Neck Cancer classification
  • DESCRIPTION:  This field is used to determine if the Head and/or Neck Cancer classification can be edited by the user.
  • TECHNICAL DESCR:  The Head and/or Neck Cancer classification is not editable if either any of the diagnosis Head and/or Neck Cancer classifications are 'Yes', or all the diagnosis Head and/or Neck Cancer classifications are 'No'.
80017 COMBAT VETERAN EDIT FLAG 800;17 SET
  • '0' FOR EDITABLE;
  • '1' FOR NOT EDITABLE;

  • LAST EDITED:  OCT 22, 2018
  • HELP-PROMPT:  Enter 1 to prevent user editing of the combat Veteran classification.
  • DESCRIPTION:  This field is used to determine if the Combat Veteran classification can be edited by the user.
  • TECHNICAL DESCR:  The Combat Veteran classification is not editable if either any of the diagnosis Combat Veteran classifications are 'Yes', or all the diagnosis Combat Veteran classifications are 'No'.
80018 PROJ 112/SHAD EDIT FLAG 800;18 SET
  • '0' FOR EDITABLE;
  • '1' FOR NOT EDITABLE;

  • LAST EDITED:  OCT 18, 2018
  • HELP-PROMPT:  Enter 1 to prevent user editing of the PROJ 112/SHAD classification.
  • DESCRIPTION:  This field is used to determine if the PROJ 112/SHAD classification can be edited by the user.
  • TECHNICAL DESCR:  The PROJ 112/SHAD classification is not editable if either any of the diagnosis PROJ 112/SHAD classifications are 'Yes, or all the diagnosis PROJ 112/SHAD classifications are 'No'.
81101 COMMENTS 811;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>245!($L(X)<1) X
    MAXIMUM LENGTH: 245
  • LAST EDITED:  SEP 13, 2018
  • HELP-PROMPT:  Answer must be 1-245 characters in length.
  • DESCRIPTION:  A field to add comments as they pertain to a visit.
81202 PACKAGE 812;2 POINTER TO PACKAGE FILE (#9.4) PACKAGE(#9.4)

  • LAST EDITED:  OCT 22, 2018
  • HELP-PROMPT:  Enter the Package that wanted the visit created.
  • DESCRIPTION:  This is a pointer to the Package that wanted the visit created.
    UNEDITABLE
81203 DATA SOURCE 812;3 POINTER TO PCE DATA SOURCE FILE (#839.7) PCE DATA SOURCE(#839.7)

  • LAST EDITED:  OCT 22, 2018
  • HELP-PROMPT:  Enter the PCE Data Source that wanted this visit created.
  • DESCRIPTION:  This is a pointer to the PCE Data Source file and is the source that wanted the visit created.
    UNEDITABLE

ICR, Total: 5

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #907
  • Clinical Reminders
  • Emergency Department Integration Software
  • Womens Health
  • ADVANCED PROSTHETICS ACQUISITION TOOL
  • ICR #7033
  • Scheduling
  • ICR #2598
  • Clinical Information Resource Network
  • ADVANCED PROSTHETICS ACQUISITION TOOL
  • VISIT/ADMIT DATE&TIME (.01).
    Access: Read w/Fileman

    ICR #2617
  • Clinical Information Resource Network
  • VISIT/ADMIT DATE&TIME (.01).
    Access: Read w/Fileman

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

    LOC. OF ENCOUNTER (.06).
    Access: Read w/Fileman

    PARENT VISIT LINK (.12).
    Access: Read w/Fileman

    CHECK OUT DAT&TIME (.18).
    Access: Read w/Fileman

    HOSPITAL LOCATION (.22).
    Access: Read w/Fileman

    ENCOUNTER TYPE (15003).
    Access: Read w/Fileman

    VISIT ID (15001).
    Access: Read w/Fileman

    PATIENT STATUS IN/OUT (15002).
    Access: Read w/Fileman

    ICR #6264
  • VA Point of Service
  • TYPE (.03).
    Access: Write w/Fileman

    PATIENT NAME (.05).
    Access: Write w/Fileman

    SERVICE CATEGORY (.07).
    Access: Write w/Fileman

    External References

    Name Field # of Occurrence
    ^%DT .01+1, .02+1, .13+1, .18+1
    ADD^AUPNVSIT .12(XREF 3S)
    POSTSLCT^AUPNVSIT ACT+1
    SUB^AUPNVSIT .12(XREF 3K)
    ^DIC .08+1, .21+1
    Y^DIQ ID.22+1

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^%ZOSF("TEST" ACT+1
    ^AUPNVSIT - [#9000010] .01(XREF 2S), .01(XREF 2K), .01(XREF 3S), .01(XREF 3K), .01(XREF 4S), .01(XREF 4K), .01(XREF 5S), .01(XREF 6S), .01(XREF 6K), .05(XREF 2S)
    .05(XREF 2K), .05(XREF 3S), .05(XREF 3K), .05(XREF 4S), .05(XREF 4K), .07(XREF 1S), .07(XREF 1K), .09(XREF 1S), .21(XREF 1S), .21(XREF 1K)
    .22(XREF 1S), .22(XREF 1K), .22(XREF 2S), .22(XREF 2K), 15003(XREF 1S), 15003(XREF 1K)
    ^AUPNVSIT("AA" .01(XREF 3S), .01(XREF 3K), .05(XREF 2S), .05(XREF 2K), .21(XREF 1S), .21(XREF 1K)
    ^AUPNVSIT("AAH" .01(XREF 2S), .01(XREF 2K), .05(XREF 3S), .05(XREF 3K), .07(XREF 1S), .07(XREF 1K)
    ^AUPNVSIT("AD" .12(XREF 1S), .12(XREF 1K)
    ^AUPNVSIT("ADEL" .01(XREF 5S), .01(XREF 5K), .09(XREF 1S)
    ^AUPNVSIT("AET" .01(XREF 4S), .01(XREF 4K), .05(XREF 4S), .05(XREF 4K), .22(XREF 2S), .22(XREF 2K), 15003(XREF 1S), 15003(XREF 1K)
    ^AUPNVSIT("AHL" .01(XREF 6S), .01(XREF 6K), .22(XREF 1S), .22(XREF 1K)
    ^AUPNVSIT("B" .01(XREF 1S), .01(XREF 1K)
    ^AUPNVSIT("C" .05(XREF 1S), .05(XREF 1K)
    ^AUPNVSIT("VID" 15001(XREF 1S), 15001(XREF 1K)
    ^DD(44 ID.22+1
    ^DPT - [#2] ID.05+1
    ^SC - [#44] ID.22+1

    Naked Globals

    Name Field # of Occurrence
    ^( .21(XREF 1K)
    ^(0 ID.05+1, ID.22+1, .01(XREF 2S), .01(XREF 2K), .01(XREF 3S), .05(XREF 2S), .05(XREF 2K), .05(XREF 3S), .05(XREF 3K), .07(XREF 1S)
    .07(XREF 1K), .21(XREF 1S), .21(XREF 1K), .22(XREF 1S), .22(XREF 1K)
    ^(150 ID15001+1

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> %DT .01+1*, .02+1*, .13+1*, .18+1*
    %I ID.22+1*!
    >> C ID.22+1*
    >> DA .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .01(XREF 3S), .01(XREF 3K), .01(XREF 4S), .01(XREF 4K), .01(XREF 5S), .01(XREF 5K)
    .01(XREF 6S), .01(XREF 6K), .05(XREF 1S), .05(XREF 1K), .05(XREF 2S), .05(XREF 2K), .05(XREF 3S), .05(XREF 3K), .05(XREF 4S), .05(XREF 4K)
    .07(XREF 1S), .07(XREF 1K), .09(XREF 1S), .12(XREF 1S), .12(XREF 1K), .21(XREF 1S), .21(XREF 1K), .22(XREF 1S), .22(XREF 1K), .22(XREF 2S)
    .22(XREF 2K), 15001(XREF 1S), 15001(XREF 1K), 15003(XREF 1S), 15003(XREF 1K)
    DIC ID.05+1, ID.22+1, .08+1!*, .21+1!*
    DIC("S" .08+1*, .08SCR+1*, .21+1*, .21SCR+1*
    >> DIE .08+1, .21+1
    DT .02+1, .13+1
    DUZ("AG" ACT+1, .01(XREF 5S), .09(XREF 1S)
    U ID.05+1, ID.22+1, ID15001+1, .01(XREF 2S), .01(XREF 2K), .01(XREF 3S), .01(XREF 3K), .01(XREF 4S), .01(XREF 4K), .01(XREF 6S)
    .01(XREF 6K), .05(XREF 2S), .05(XREF 3S), .05(XREF 3K), .05(XREF 4S), .05(XREF 4K), .07(XREF 1S), .07(XREF 1K), .22(XREF 1S), .22(XREF 1K)
    .22(XREF 2S), .22(XREF 2K), 15003(XREF 1S), 15003(XREF 1K)
    X ACT+1*, .01+1*!, .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), .01(XREF 3S), .01(XREF 3K), .01(XREF 4S), .01(XREF 4K)
    .01(XREF 5S), .01(XREF 5K), .01(XREF 6S), .01(XREF 6K), .02+1*!, .05(XREF 1S), .05(XREF 1K), .05(XREF 2S), .05(XREF 2K), .05(XREF 3S)
    .05(XREF 3K), .05(XREF 4S), .05(XREF 4K), .07(XREF 1S), .07(XREF 1K), .08+1*!, .09+1!, .09(XREF 1S), .12(XREF 1S), .12(XREF 1K)
    , .13+1*!, .18+1*!, .21+1*!, .21(XREF 1S), .22(XREF 1S), .22(XREF 1K), .22(XREF 2S), .22(XREF 2K), 2101+1!, 15001+1!
    15001(XREF 1S), 15001(XREF 1K), 15003(XREF 1S), 15003(XREF 1K), 81101+1!
    >> Y ID.22+1*, .01+1, .02+1, .08+1, .13+1, .18+1, .21+1
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All