Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: AUPNVSIT

Package: IHS Patient

Routine: AUPNVSIT


Information

AUPNVSIT ; IHS/CMI/LAB - EDITS FOR AUPNVSIT (VISIT:9000010) 24-MAY-1993 ; 30 Sep 2010 2:13 PM

Source Information

Source file <AUPNVSIT.m>

Call Graph

Call Graph Total: 13

Package Total Call Graph
VA Fileman 4 ^DIE  DD^DIK  1^DIK1  $$GET1^DIQ  
IHS Patient 2 (FTF,SETPRIM,WHSEEN)^AUPNMAP  ^AUPNPAT  
Kernel 2 ^%ZTLOAD  $$NOW^XLFDT  
Emergency Room 1 SYNC^AMERPOV  
IHS VA Utilities 1 EN^XBNEW  
Mental Health Social Services 1 EN^AMHEHR  
Patient Care Component Reports 1 $$CLINIC^APCLV  
Uncategorized 1 ($$A08,A08)^BTSEVENT  

Caller Graph

Caller Graph Total: 96

Package Total Caller Graph
Patient Care Component 47 APCDACC  APCDACCR  APCDALV  APCDALVR  APCDCAF1  APCDCAF3  APCDCAF6  APCDCAFC  
APCDCHKI  APCDCHKJ  APCDCVD  APCDCVDT  APCDDUPP  APCDDVE  APCDEA2  APCDEA3  
APCDEAP  APCDEATC  APCDEDTC  APCDEFM  APCDEHI2  APCDEHTC  APCDEL  APCDELM  
APCDELMP  APCDEM  APCDFDEC  APCDFUNC  APCDK  APCDKBV  APCDKFDE  APCDKIV  
APCDKLV  APCDKMV  APCDKPV  APCDKRV  APCDKUL  APCDKULD  APCDPE2  APCDR001  
APCDRETR  APCDRPOV  APCDT601  APCDVDLT  APCDVM2  APCDVMDD  APCDVMRG  
Emergency Room 6 AMER31  AMEREDTT  AMERPCC1  AMERPCC3  AMERVER  AMERVSIT  
IHS Changes To Scheduling 5 ASDP5E  ASDP7E  ASDV  BSDCO1  BSDV  
IHS Emergency Dept Dashboard 4 BEDDINJ  BEDDPOV  BEDDSYNC  BEDDUTID  
Data Warehouse Export System 3 BDW1VBL  BDWDDR  BDWRDR  
Patient Care Component Data Transmission 3 APCPDR  APCPREDO  APCPSRE  
Clinical Scheduling for Windows 2 BSDX25  BSDX25B  
IHS Changes To ADT 2 BDGPCCE2  BDGPCCEL  
IHS Dental System 2 ADEAPC  ADEAPC2  
Mental Health Social Services 2 AMHBHAPI  AMHPCCL  
Patient Care Component Surveillance 2 APCSSIL2  APCSSLAB  
Registration 2 DGPTXX14  DGPTXX7  
Text Integration Utility 2 TIUPNCV  TIUPNCVX  
iCare 2 BQICAEXP  BQICAVAL  
Alcohol Chemical Dependency 1 ACDPCCL7  
GUI Objects 1 BGOUTL2  
IHS Changes To Pharmacy 1 APSPCCD  
IHS Electronic Health Record 1 BEHOENPC  
IHS Mods To Radiology Nuclear Medicine 1 BRAPCC  
IHS Patient 1 AUPN9918  
IHS Patient Merge 1 BPMMRG  
IHS Support HL7 Interfaces 1 BHLPV1I  
Immunization Tracking 1 BIVISIT  
PCE Patient Care Encounter 1 VSIT  
Patient Care Component Reports 1 APCLSIL2  
Radiology Nuclear Medicine 1 EXAMINATIONS  

Entry Points

Name Comments DBIA/ICR reference
CHKLOC(Y) ; SCREEN OUT E CODES AND INACTIVE CODES
ALPHA(VISIT) ; - returns 3rd character of pseudo prefix form encounter location
QBHV ;queue BH visit creation/update to background
VSIT01B ;
SUB ; SUBTRACT FROM DEPENDENCY COUNT
VSIT01 ;EP;9000010,.01 (VISIT,VISIT/ADMIT DATE&TIME)
POSTSLCT ;
LZERO(V,L) ;EP - left zero fill
A08 ;EP - for BTS per Christy Smith, Daou 5/12/05
ADD ; ADD TO DEPENDENCY COUNT
DEL ;EP;*** EXTERNAL ENTRY POINT *** SET DELETE FLAG
; The following exclusive NEW excepted from SAC by the Director, DSD. Request dated 12.14.92. No suspense was mandated.
MFI(Y) ;EP - called to determine whether a visit is an MFI visit
UIDV(VISIT) ;EP - generate unique ID for visit
VCN(AUPNVSIT,AUPNADD) ;EP; *** EXTERNAL ENTRY POINT ***
; Returns Visit Control Number (VCN) on visit if already there
; Creates VCN and adds to visit if AUPNADD set to 1
; Returns a number if VCN found or created; returns "" if not
; If asked to add VCN and failed, 2nd piece VCN = error code:msg
INACLOC(Y) ;EP - return 1 if inactive, 0 if active
BH(V) ;
UID(VISIT) ;EP - generate unique ID for visit
MOD ;PEP;MODIFY A VISIT OR V FILE ENTRY

External References

Name Field # of Occurrence
^%ZTLOAD QBHV+18
SYNC^AMERPOV MOD+12
EN^AMHEHR BH+4, QBHV+2, QBHV+9, QBHV+12
$$CLINIC^APCLV BH+6
FTF^AUPNMAP MOD+7
SETPRIM^AUPNMAP MOD+11
WHSEEN^AUPNMAP MOD+8
^AUPNPAT POSTSLCT+2
$$A08^BTSEVENT A08+2
A08^BTSEVENT MOD+13
^DIE MOD+5, MOD+19, DEL+5, DEL+11, DEL+12, VCN+35
DD^DIK DEL+4
1^DIK1 DEL+4
$$GET1^DIQ UIDV+4
EN^XBNEW MOD+12, QBHV+9
$$NOW^XLFDT DEL+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: " <Required variables do not exist>"
  • Line Location: VSIT01+3
Routine Call
  • DIE
  • Line Location:
    • MOD+5
    • MOD+19
    • DEL+5
    • DEL+11
    • DEL+12
    • VCN+35

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AUPNVSIT - [#9000010] Classic Fileman Calls
^AUTTLOC - [#9999999.06] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AMERVSIT("AD" MOD+12
^AMHBHPC("C" BH+16
^AMHREC - [#9002011] QBHV+5
^AMHREC("AVISIT" QBHV+4
^AUPNPAT - [#9000001] VCN+20
^AUPNVPOV("AD" QBHV+8
^AUPNVPRV - [#9000010.06] BH+10
^AUPNVPRV("AD" BH+9, QBHV+7
^AUPNVSIT - [#9000010] VSIT01B+3, POSTSLCT+2, ADD+1, ADD+2, ADD+3*, ADD+5*, ADD+6, SUB+1, SUB+2*, SUB+3
, SUB+4, SUB+5*, SUB+6, MOD+4, MOD+19, QBHV+6, DEL+3, DEL+6*, DEL+7*, DEL+10*
, DEL+11, DEL+12, VCN+13, VCN+17, VCN+18, VCN+19, VCN+23, VCN+36, ALPHA+2, CHKLOC+6
, MFI+2, MFI+4, MFI+5
^AUPNVSIT("ADWO" DEL+9*
^AUPNVSIT("AMFI" ADD+4, ADD+5*, SUB+5*
^AUPNVSIT("APCIS" DEL+8*
^AUPNVSIT("AVCN" VCN+28
^AUPNVSIT("VCN" VCN+31
^AUTTLOC - [#9999999.06] ALPHA+3, UID+3, INACLOC+5, CHKLOC+5, CHKLOC+11
^AUTTSITE(1 ADD+5, SUB+5, MOD+16, MOD+17, DEL+11, DEL+12, UID+3*, UID+4, UIDV+4
^BDWSITE(1 DEL+9
^DIC(7 - [#7] BH+14
^VA(200 - [#200] BH+12

Label References

Name Line Occurrences
$$ALPHA VCN+29
$$BH MOD+14
$$CHKLOC INACLOC+4
$$LZERO UID+5, UIDV+6
A08 MOD+13
QBHV MOD+14
VSIT01B VSIT01+2

Naked Globals

Name Field # of Occurrence
^(0 POSTSLCT+2, ADD+2*, ADD+5, SUB+3*, MOD+19

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% BH+5~, BH+8*, BH+9*, BH+10, QBHV+13*, LZERO+1~, LZERO+2*
A CHKLOC+4~
>> ACHSDIEN CHKLOC+2
>> ALPHA VCN+29*, VCN+30, VCN+31, VCN+33
>> APCDCAT VSIT01B+3
>> APCDDATE CHKLOC+8, CHKLOC+11
>> APCDFVOK VSIT01B+4
>> APCDVSIT CHKLOC+6, CHKLOC+11
AUPNADD VCN~, VCN+12, VCN+14, VCN+16
>> AUPNDOB VSIT01+2, VSIT01B+6
>> AUPNDOD VSIT01+2, VSIT01B+5
AUPNHLER A08+2*, A08+3!
>> AUPNPAT VSIT01+1, POSTSLCT+2
>> AUPNTALK VSIT01+1, VSIT01+3, VSIT01B+4, VSIT01B+5, VSIT01B+6
>> AUPNVCN VCN+33*, VCN+35, VCN+36, VCN+37
AUPNVSIT POSTSLCT+1*, POSTSLCT+2, MOD+2, MOD+3, MOD+4, MOD+5, MOD+12, MOD+14, MOD+19, QBHV+4
, QBHV+6, QBHV+7, QBHV+8, DEL+2, DEL+3*, DEL+4, DEL+5, DEL+6, DEL+7, DEL+8
, DEL+9, DEL+10, DEL+11, DEL+12, VCN~, VCN+12, VCN+13, VCN+16, VCN+17, VCN+18
, VCN+19, VCN+23, VCN+29, VCN+35, VCN+36, A08+1, A08+2
AUPNY POSTSLCT+1*, POSTSLCT+3!
C BH+5~, BH+6*, BH+7, BH+10*, BH+11, BH+12*, BH+13, BH+14*, BH+15, BH+16
>> COUNT VCN+28*, VCN+31*, VCN+32, VCN+33
D CHKLOC+4~, CHKLOC+6*, CHKLOC+9
DA VSIT01B+3, MOD+5*!, MOD+19*, MOD+20!, DEL+4*, DEL+5*!, DEL+11*!, DEL+12*!, VCN+35*
>> DFN VCN+19*, VCN+20, VCN+28, VCN+31, VCN+33
DIE MOD+5*!, MOD+19*, MOD+20!, DEL+5*!, DEL+11*!, DEL+12*!, VCN+35*
>> DIFGLINE CHKLOC+1, MFI+3
>> DIK DEL+4*
DIU MOD+5!, MOD+20!
DIV MOD+5!, MOD+20!
DR MOD+5*!, MOD+19*, MOD+20!, DEL+5*!, DEL+11*!, DEL+12*!, VCN+35*
DT VSIT01+2, VSIT01B+4, MOD+5, DEL+2, DEL+7, DEL+8, DEL+9, VCN+16
DUZ ADD+5, SUB+5, MOD+18, DEL+2, DEL+6, DEL+11, DEL+12, VCN+16
DUZ("AG" VSIT01B+5, CHKLOC+3
G BH+5~, BH+8*, BH+9, BH+16*, BH+18, QBHV+3~, QBHV+4*, QBHV+5
I LZERO+1~, LZERO+2*, CHKLOC+4~, CHKLOC+5*, CHKLOC+8, CHKLOC+9
L LZERO~, LZERO+2
S VSIT01B+2~, VSIT01B+3*, VSIT01B+5
U VSIT01B+3, POSTSLCT+2, ADD+2, ADD+3, ADD+5, SUB+2, SUB+3, SUB+4, SUB+5, MOD+17
, MOD+19, BH+10, BH+12, BH+14, QBHV+5, QBHV+6, DEL+2, DEL+3, DEL+6, DEL+7
, DEL+9, DEL+10, DEL+11, DEL+12, VCN+13, VCN+16, VCN+18, VCN+19, VCN+23, VCN+36
, ALPHA+2, ALPHA+3, CHKLOC+5, CHKLOC+6, CHKLOC+11, MFI+4, MFI+5, UIDV+4
V BH~, BH+6, BH+9, LZERO~, LZERO+2*, LZERO+3
VISIT ALPHA~, ALPHA+2, UID~, UID+1, UID+5, UIDV~, UIDV+1, UIDV+6
X VSIT01+1!, VSIT01+4!, VSIT01B+4!, VSIT01B+5!, VSIT01B+6!, ADD+1, ADD+2, ADD+3, ADD+4, ADD+5
, ADD+6, SUB+1, SUB+2, SUB+3, SUB+4, SUB+5, SUB+6, DEL+4*, VCN+11~, VCN+13*
, VCN+14, ALPHA+1~, ALPHA+2*, ALPHA+3, UID+2~, UID+4*, UID+5, INACLOC+3~, INACLOC+4*, INACLOC+6
, UIDV+2~, UIDV+4*, UIDV+5*, UIDV+6
Y POSTSLCT+1, POSTSLCT+2*, POSTSLCT+3*, INACLOC~, INACLOC+1, INACLOC+4, INACLOC+5, CHKLOC~, CHKLOC+5, CHKLOC+11
, MFI~, MFI+1, MFI+2, MFI+4, MFI+5
>> Z LZERO+2*
ZTDESC QBHV+3~, QBHV+15*
ZTDTH QBHV+3~, QBHV+17*
ZTIO QBHV+3~, QBHV+16*
>> ZTQUEUED VSIT01+1, VSIT01+3, VSIT01B+4, VSIT01B+5, VSIT01B+6, ADD+1, SUB+1
ZTRTN QBHV+3~, QBHV+14*
ZTSAVE QBHV+3~
ZTSAVE( QBHV+13*
ZTSK QBHV+3~, QBHV+19!

Marked Items

Name Field # of Occurrence
$T(A08^BTSEVENT MOD+13
$T(EN^AMHEHR BH+4, QBHV+2, QBHV+9, QBHV+12
$T(SYNC^AMERPOV MOD+12
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All