Routine: VSIT

Call Graph

Call Graph Total: 18

Package	Total	Call Graph
PCE Patient Care Encounter	11	($$ACTIVE,$$GETPKG,$$PKG,$$PKG2IEN,$$PKGON)^VSIT0 $$VSIT^VSITASK SND^VSITBUL SETALL^VSITCK $$IP^VSITCK1 ($$REQUIRED,DEFAULTS)^VSITDEF FLD^VSITFLD LST^VSITGET VSITAPI^VSITOE ^VSITPUT ALL^VSITVAR
VA Fileman	4	NOW^%DTC DT^DICRW ^DIE GETS^DIQ
Registration	2	$$GETCUR^DGNTAPI $$FILEHNC^DGNTAPI1
IHS Patient	1	(ADD,SUB)^AUPNVSIT

Package	Total	Caller Graph
PCE Patient Care Encounter	20	PXAI PXAPI PXAPIDEL PXBAPI PXCA0 PXCE PXICLN1 PXICLN9B PXIPOST PXKCO PXKFVST PXKMAIN PXKMASC PXKVST PXQFS PXUTLSTP PXUTLVST VSITDEF VSITSTAT VSITVID
Scheduling	7	SCDXFU03 SCMSVUT0 SD53103A SDAMXOE SDPCE SDVSIT0 SDYDPOST
Lab Service	3	LRCAPES LRCAPPH LRCAPPHX
Order Entry Results Reporting	3	ORQQVS ORWPFSS4 ORWPT16
IHS Electronic Health Record	2	BEHOENC1 BEHOENCX
Text Integration Utility	2	TIU VISIT ID TIUENV
Barcode Medication Administration	1	PSBPXFL
IHS Changes To Pharmacy	1	APSPPCCV
Inpatient Medications	1	PSJLMUTL
Registration	1	DGPMEVT
VueCentric Framework	1	CIAVINIT

Package

Total

Caller Graph

PCE Patient Care Encounter

PXAI  PXAPI  PXAPIDEL  PXBAPI  PXCA0  PXCE  PXICLN1  PXICLN9B
PXIPOST  PXKCO  PXKFVST  PXKMAIN  PXKMASC  PXKVST  PXQFS  PXUTLSTP
PXUTLVST  VSITDEF  VSITSTAT  VSITVID

Scheduling

SCDXFU03 SCMSVUT0 SD53103A SDAMXOE SDPCE SDVSIT0 SDYDPOST

Lab Service

LRCAPES LRCAPPH LRCAPPHX

Order Entry Results Reporting

ORQQVS ORWPFSS4 ORWPT16

IHS Electronic Health Record

BEHOENC1 BEHOENCX

Text Integration Utility

TIU VISIT ID TIUENV

Barcode Medication Administration

PSBPXFL

IHS Changes To Pharmacy

APSPPCCV

Inpatient Medications

PSJLMUTL

Registration

DGPMEVT

VueCentric Framework

CIAVINIT

Entry Points

Name	Comments	DBIA/ICR reference
QUIT	; - end of job
SUB	; - subtract from dependency count ; called via cross references on pointer files	ICR #1902 Status: Active Usage: Controlled Subscription
PKG(PKG,VALUE)	;-Entry point to add package to multiple in tracking param	ICR #1908 Status: Active Usage: Private
VID2IEN(VID)	; -- Call with Visit's ID and returns the Visit IEN	ICR #1903 Status: Active Usage: Controlled Subscription
IEN2VID(IEN)	; -- Call with Visit IEN and returns the Visit ID	ICR #1903 Status: Active Usage: Controlled Subscription
UPD	; Update Visit File	ICR #1901 Status: Active Usage: Private
PKG2IEN(PKG)	;Pass in package name space and ; returns pointer to the package in the Package file #9.4	ICR #1904 Status: Active Usage: Controlled Subscription
LOOKUP(IEN,FMT,WITHIEN)	; -- Lookup a visit and return all of its information	ICR #1906 Status: Active Usage: Controlled Subscription
HISTORIC(IEN)	; -- Returns 1 if it is an Historical visit ("E" in #.07) ; 0 if it is not an Historical visit. ; -1 if the IEN is bad	ICR #1907 Status: Active Usage: Private
ADD	; - add to dependency count ; called via cross references on pointer files	ICR #1902 Status: Active Usage: Controlled Subscription
GET(VDT,DFN,PRAM,VSIT)	; find or create a visit
DONE
EXIT	;
PKGON(PKG)	; -- Returns the active flage for the package ; 1 the package can create visits ; 0 the package cannot create visits ; -1 called wrong or could not find package in VT parameters file	ICR #1904 Status: Active Usage: Controlled Subscription
MODIFIED(IEN)	;Sets the Date Last Modified (.13) field to NOW	ICR #1901 Status: Active Usage: Private
SELECTED(DFN,SDT,EDT,HOSLOC,ENCTYPE,NENCTYPE,SERVCAT,NSERVCAT,LASTN)	; ; -- Returns selected visits depending on screens passed in.	ICR #1905 Status: Active Usage: Controlled Subscription

External References

Name	Field # of Occurrence
NOW^%DTC	UPD+5
ADD^AUPNVSIT	ADD+2
SUB^AUPNVSIT	SUB+3
$$GETCUR^DGNTAPI	UPD+31
$$FILEHNC^DGNTAPI1	UPD+34
DT^DICRW	GET+36
^DIE	UPD+16, UPD+17
GETS^DIQ	UPD+23
$$ACTIVE^VSIT0	GET+16
$$GETPKG^VSIT0	GET+13
$$PKG^VSIT0	PKG+4
$$PKG2IEN^VSIT0	PKG2IEN+2
$$PKGON^VSIT0	PKGON+4
$$VSIT^VSITASK	GET+50
SND^VSITBUL	DONE
SETALL^VSITCK	GET+29
$$IP^VSITCK1	GET+32
$$REQUIRED^VSITDEF	GET+34
DEFAULTS^VSITDEF	GET+40, GET+47
FLD^VSITFLD	GET+27, UPD+7
LST^VSITGET	GET+44
VSITAPI^VSITOE	SELECTED+2
^VSITPUT	GET+41, GET+48
ALL^VSITVAR	QUIT+4, LOOKUP+30

FileNo	Call Tags
^AUPNVSIT - [#9000010]	GETS^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVSIT - [#9000010]	UPD+2, UPD+10, UPD+36, IEN2VID+1, IEN2VID+2, LOOKUP+26, HISTORIC+3
^AUPNVSIT("VID"	VID2IEN+2
^DIC(150.9 - [#150.9]	GET+18
^TMP("VSITDD"	GET+20!, DONE+2!, UPD+11, UPD+12, UPD+15, UPD+16, UPD+37!
^TMP($J	GET+20!, DONE

Name	Line Occurrences
$$GET	VSIT+18
$$VID2IEN	LOOKUP+25
DONE	GET+15, GET+16, GET+18, GET+34
QUIT	GET+39, GET+46, GET+49, GET+50, GET+51
UPD	MODIFIED+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	UPD+4~, UPD+6
%H	UPD+4~
%I	UPD+4~
DA	UPD+3~, UPD+8*
DFN	VSIT+18, GET~, GET+22, UPD+28, SELECTED~, SELECTED+2
DGARR	UPD+27~
DGARR("STAT"	UPD+32
DIE	UPD+3~, UPD+8*
DR	UPD+3~, UPD+9, UPD+15, UPD+16, UPD+17
DT	GET+36
EDT	SELECTED~, SELECTED+2
ENCTYPE	SELECTED~, SELECTED+2
FMT	LOOKUP~, LOOKUP+27, LOOKUP+28, LOOKUP+30
HNCARR	UPD+21~, UPD+22!
HNCARR(9000010	UPD+25
HNCERR	UPD+21~, UPD+22!, UPD+24
HOSLOC	SELECTED~, SELECTED+2
IEN	IEN2VID~, IEN2VID+1, IEN2VID+2, VID2IEN+1~, VID2IEN+2, VID2IEN+3, LOOKUP~, LOOKUP+24, LOOKUP+25, LOOKUP+26 , LOOKUP+30, LOOKUP+31, HISTORIC~, HISTORIC+3, MODIFIED~, MODIFIED+3
LASTN	SELECTED~, SELECTED+2
NENCTYPE	SELECTED~, SELECTED+2
NSERVCAT	SELECTED~, SELECTED+2
PCEXDFN	UPD+27~, UPD+28, UPD+29, UPD+30, UPD+31, UPD+34
PKG	PKG2IEN~, PKG2IEN+2, PKG~, PKG+4, PKGON~, PKGON+4
PRAM	GET~, GET+23
>> PXAA("PATIENT"	UPD+29
SDELG0	UPD+27~, UPD+31, UPD+32, UPD+33, UPD+34*
SDT	SELECTED~, SELECTED+2
SERVCAT	SELECTED~, SELECTED+2
VALUE	PKG~, PKG+4
VDT	GET~, GET+21
VID	VID2IEN~, VID2IEN+2
VSIT	VSIT+18, GET~, GET+44, MODIFIED+2~
VSIT(	UPD+11, UPD+13, UPD+15, UPD+16
VSIT("CLN"	GET+25
VSIT("DSS"	GET+25*
VSIT("IEN"	VSIT+18, GET+15, GET+16, GET+18, GET+20!, GET+34, GET+49, GET+50, GET+51, GET+52* , QUIT+3, QUIT+4, DONE, DONE+3, UPD+1, UPD+2, UPD+8, UPD+10, UPD+23, UPD+25 , UPD+36, MODIFIED+3
VSIT("MDT"	UPD+6*
VSIT("PAT"	GET+22*, GET+32, GET+50
VSIT("PKG"	GET+10, GET+11
VSIT("VDT"	GET+21*, GET+32
VSIT(0	VSIT+18, GET+23*, GET+39, GET+46, GET+50, GET+51, DONE
VSITDATA	UPD+3~, UPD+13*
VSITDR	UPD+3~, UPD+9, UPD+11, UPD+12, UPD+13, UPD+15, UPD+16
VSITFLD	UPD+3~, UPD+12*
VSITGET	GET+44, GET+46, GET+49, GET+50, GET+51, DONE+1!
VSITGET(	GET+50
VSITGET(1	GET+49, GET+51
VSITIPM	GET+32~*
>> VSITPKG	GET+10, GET+11*, GET+13
VSITPKGP	GET+12~, GET+13*, GET+15, GET+16
WITHIEN	LOOKUP~, LOOKUP+29*, LOOKUP+30
X	UPD+4~
>> Y	GET+50*

Customize PDF page

Package: PCE Patient Care Encounter

Routine: VSIT

Information

Source Information

Call Graph

Call Graph Total: 18

Caller Graph

Caller Graph Total: 42

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: