Routine: BSDX41J

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Info
Source
Call Graph
Caller Graph
Entry Points
External References
Global Variables Directly Accessed
Label References
Local Variables

Package	Total	Call Graph
Referred Care Information System	3	($$CTR,$$TOFAC)^BMC ^BMCREF $$AVDOS^BMCRLU
Clinical Scheduling for Windows	2	$$FILL^BSDX41 DISPREF^BSDX41F
IHS VA Utilities	1	($$VAL,$$VALI,ENP)^XBDIQ1
Kernel	1	$$FMTE^XLFDT
Patient Care Component	1	$$DATE^APCHSMU
Patient Care Component Reports	1	$$START1^APCLDF
VA Fileman	1	C^%DTC

Package

Total

Call Graph

Referred Care Information System

($$CTR,$$TOFAC)^BMC ^BMCREF $$AVDOS^BMCRLU

Clinical Scheduling for Windows

$$FILL^BSDX41 DISPREF^BSDX41F

IHS VA Utilities

($$VAL,$$VALI,ENP)^XBDIQ1

Kernel

$$FMTE^XLFDT

Patient Care Component

$$DATE^APCHSMU

Patient Care Component Reports

$$START1^APCLDF

VA Fileman

C^%DTC

Package	Total	Caller Graph
Clinical Scheduling for Windows	1	BSDX41

Package

Total

Caller Graph

Clinical Scheduling for Windows

BSDX41

Entry Points

Name	Comments	DBIA/ICR reference
WRTDX2	; WRITE ONE DX
HS	;EP-called from health summary
LPRT2	;
EKGPRT	;computers/prints ekg info
WRTCAT	; WRITE DX/SVC CAT
WRTDXPX	; WRITE DX's and PX's
EKGLABX	;
LSET	;
WRTREF	; WRITE RCIS REFERRAL ENTRY
WRTPX	; WRITE PX'S FOR THIS REFERRAL
MCIS	; *********** MANAGED CARE MIS * 90001
LPRT	;
WRTPXLP	; LOOP THRU PX ENTRIES
MRL	; ******************** MOST RECENT LAB * 9000010.09 *******
XIT	;
EKGLAB	;ENTRY POINT - EKG display in most recent lab panel
REORDER	;reorder by accession, parent and child
LDATE
WRTCATS	; WRITE PX CAT
MRLX
WRTDXLP	; LOOP THRU DX ENTRIES
WRTPX2	; WRITE ONE PX
MCISX	;MCIS EXIT
WRTCATD	; WRITE DX CAT
WRTDX	; WRITE DX'S FOR THIS REFERRAL
LBLD

External References

Name	Field # of Occurrence
C^%DTC	HS+7
$$DATE^APCHSMU	LPRT2+2
$$START1^APCLDF	EKGLAB+3
$$CTR^BMC	HS+1
$$TOFAC^BMC	WRTREF+19
^BMCREF	WRTREF+3
$$AVDOS^BMCRLU	WRTREF+8
$$FILL^BSDX41	LPRT+2, LPRT+3, LPRT+4, LPRT+5, LPRT+6, LPRT2+6, LPRT2+7, LPRT2+8, LPRT2+9, LPRT2+10 , LPRT2+15, LPRT2+16, LPRT2+17, LPRT2+18, LPRT2+19, EKGPRT+6, WRTREF+9, WRTREF+13, WRTREF+17, WRTREF+19 , WRTDX2+3, WRTDX2+4, WRTDX2+8, WRTPX2+3, WRTPX2+4, WRTPX2+8, WRTCATD+3, WRTCATS+4
DISPREF^BSDX41F	MRL+9
$$VAL^XBDIQ1	WRTREF+13, WRTREF+17, WRTREF+20
$$VALI^XBDIQ1	LSET+2
ENP^XBDIQ1	WRTDX2+7, WRTPX2+7, WRTCATD+1, WRTCATS+2
$$FMTE^XLFDT	LPRT2+2, WRTREF+9, WRTREF+12

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("TEST"	MCIS+5
^APCHSCTL - [#9001015]	LPRT2+21
^AUPNVDXP("AC"	EKGLAB+1
^AUPNVLAB - [#9000010.09]	REORDER+3, REORDER+4, REORDER+5, LSET+1, LSET+2, LPRT2+2, LPRT2+18, LPRT2+19, LPRT2+23, LPRT2+25 , LPRT2+26, LPRT2+28
^AUPNVLAB("AA"	MRL+1, LBLD+1, LDATE, LDATE+1
^AUTNPOV - [#9999999.27]	WRTDX2+6, WRTPX2+6
^BMCDX - [#90001.01]	WRTDX2+1
^BMCDX("AD"	WRTDX+1, WRTDXLP+2
^BMCPARM - [#90001.31]	WRTREF+16
^BMCPX - [#90001.02]	WRTPX2+1
^BMCPX("AD"	WRTPX+1, WRTPXLP+2
^BMCREF - [#90001]	WRTREF+1
^BMCREF("AA"	HS+2, HS+8, HS+14
^BMCREF("D"	MCIS+6
^BSDXTMP($J	LPRT+7, LPRT2+11, LPRT2+20, LPRT2+25, LPRT2+28, EKGPRT+5, EKGPRT+6, MCIS+2, MCIS+3, MCIS+8 , HS+1, HS+4, HS+5, HS+10, HS+11, WRTREF+7, WRTREF+10, WRTREF+13, WRTREF+17, WRTREF+19 , WRTREF+20, WRTDX+2, WRTDX2+8, WRTPX+2, WRTPX2+8, WRTCATD+3, WRTCATS+4*
^ICD9 - [#80]	WRTDX2+3
^ICPT - [#81]	WRTPX2+3
^LAB(60 - [#60]	LSET+5, LPRT2+1
^TMP($J	MRLX+1!, LBLD!, REORDER+1, REORDER+2, REORDER+6, REORDER+8!, LSET+4, LSET+5, LPRT+9, LPRT+10 , LPRT+11, LPRT+12, LPRT+13, LPRT+14
^VA(200 - [#200]	WRTREF+18

Label References

Name	Line Occurrences
EKGLAB	MRL+1, MRL+7
EKGLABX	EKGLAB+4
EKGPRT	EKGLAB+11
HS	MCIS+5
LBLD	MRL+6
LDATE	LBLD+1
LPRT	MRL+6
LPRT2	LPRT+15
LSET	LDATE+1
MCISX	MCIS+6
MRLX	MRL+1
REORDER	LBLD+2
WRTCATD	WRTDX+1, WRTCAT+1
WRTCATS	WRTPX+1, WRTCAT+2
WRTDX	WRTDXPX+1
WRTDX2	WRTDXLP+2
WRTDXLP	WRTDX+5, WRTDX+6
WRTDXPX	WRTREF+21
WRTPX	WRTDXPX+3
WRTPX2	WRTPXLP+2
WRTPXLP	WRTPX+5, WRTPX+6
WRTREF	HS+14

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	REORDER+3*, REORDER+6
>> %1	REORDER+4*, REORDER+6
>> %2	REORDER+5*, REORDER+6
APCHCHIL	LPRT+11*, LPRT+12, LPRT+13, LPRT+14, LPRT+16!, LPRT2+13
APCHS	EKGLAB+2!
APCHS(1	EKGLAB+7, EKGLAB+10, EKGLABX+1!
APCHSACC	LPRT+9*, LPRT+10, LPRT+11, LPRT+12, LPRT+13, LPRT+14, LPRT+16!
>> APCHSCVD	LPRT+14, EKGPRT+1
APCHSDFN	MRLX!, LDATE+1, LSET+1, LSET+2, LSET+5, LPRT+13, LPRT2+2, LPRT2+18, LPRT2+19, LPRT2+23 , LPRT2+25, LPRT2+26, LPRT2+28
>> APCHSDLM	LDATE+1, EKGLAB+8
APCHSERR	EKGLAB+3*, EKGLAB+4, EKGLAB+6!, EKGLABX+1!
APCHSFN	MRL+9*, MRL+10!
APCHSIVD	MRLX!, LDATE, LDATE+1, LSET+5, EKGLAB+7, EKGLAB+8
APCHSLL	MRLX!
APCHSLR	MRLX!, LSET+1, LSET+2, LSET+3, LSET+4, LSET+5, LPRT+14, LPRT2+17, EKGPRT+2, EKGPRT+3* , EKGPRT+6
APCHSLRT	MRLX!, LBLD+1*, LDATE, LDATE+1, LSET+4, LSET+5
APCHSLRT(	EKGPRT+1, EKGPRT+2
APCHSLRT("EKG"	EKGLAB+10*
APCHSLT	MRLX!, LPRT+12, LPRT+13, LPRT+14, LPRT+16!, LPRT2+1, EKGLAB+9, EKGPRT+1, EKGPRT+2
APCHSLTD	MRLX!, LPRT+14, LPRT2+16, EKGPRT+1, EKGPRT+6
APCHSLTX	MRLX!, LSET+5, LPRT2+1, LPRT2+14, EKGLAB+9*, EKGPRT+6
APCHSLW	MRLX!, EKGPRT+4*, EKGPRT+6
APCHSN	MRLX!, LSET+1*, LSET+2, LSET+3
APCHSNMX	MRLX!
>> APCHSNPG	LPRT2+4
APCHSPAR	LPRT+10*, LPRT+11, LPRT+12, LPRT+13, LPRT+14, LPRT+16!
>> APCHSPAT	MRL+1, LBLD+1, LDATE, LDATE+1, EKGLAB+1, EKGLAB+3, MCIS+6, HS+2, HS+8, HS+14
>> APCHSQ	LBLD+1*
>> APCHSQIT	LPRT+9, LPRT+10, LPRT2+23, LPRT2+26, HS+14, WRTDXPX+2, WRTDXLP+2, WRTPXLP+2
>> APCHSRDT	LPRT2+2*, LPRT2+15
APCHST	MRL+9*, MRL+10!
>> APCHSTYP	LPRT2+21
>> APCHSX	LPRT2+23, LPRT2+25, LPRT2+26, LPRT2+28
BMCCHSCT	XIT+1!
BMCDFN	XIT+1!
BMCDIEN	XIT+1!, WRTDXLP+1, WRTDXLP+2, WRTDX2+1, WRTDX2+7
>> BMCMCC	WRTREF+15, WRTREF+16, WRTREF+17
BMCPFH	XIT+1!, WRTDX+6, WRTDXLP+1, WRTDX2+10, WRTPX+6, WRTPXLP+1, WRTPX2+10
BMCPFS	XIT+1!, WRTDX+4, WRTDX+6, WRTDX2+2, WRTPX+4, WRTPX+6, WRTPX2+2
BMCPIEN	XIT+1!, WRTPXLP+1, WRTPXLP+2, WRTPX2+1, WRTPX2+7
BMCRDATE	HS+13, HS+14, XIT+1!
BMCREC	XIT+1!
BMCRIEN	HS+14*, XIT+1!, WRTREF+1, WRTREF+2, WRTREF+8, WRTREF+13, WRTREF+17, WRTREF+19, WRTREF+20, WRTDX+1 , WRTDXLP+2, WRTPX+1, WRTPXLP+2, WRTCATD+1, WRTCATS+2
BMCRIO	XIT+1!
BMCRNUMB	XIT+1!
BMCRREC	XIT+1!, WRTREF+1*, WRTREF+9, WRTREF+12, WRTREF+18
BMCRSTAT	XIT+1!, WRTREF+5, WRTDX+6, WRTPX+6
BMCRTYPE	XIT+1!
BMCX	XIT+1!
BMCX(".019"	WRTDX2+7, WRTPX2+7
BMCX(".12"	WRTCATD+1
BMCX(".13"	WRTCATS+2
BMCYAGO	HS+7*, HS+8, HS+14, XIT+1!
>> BSDXI	LPRT+7, LPRT2+11, LPRT2+20, LPRT2+25, LPRT2+28, EKGPRT+5, EKGPRT+6, MCIS+2, MCIS+3, MCIS+8 , HS+1, HS+4, HS+5, HS+10, HS+11, WRTREF+7, WRTREF+10, WRTREF+13, WRTREF+17, WRTREF+19 , WRTREF+20, WRTDX+2, WRTDX2+8, WRTPX+2, WRTPX2+8, WRTCATD+3, WRTCATS+4*
>> BSDXTMP	LPRT+1, LPRT+2, LPRT+3, LPRT+4, LPRT+5, LPRT+6, LPRT+7, LPRT+8, LPRT2+5, LPRT2+6* , LPRT2+7, LPRT2+8, LPRT2+9, LPRT2+10, LPRT2+11, LPRT2+12, LPRT2+13, LPRT2+14, LPRT2+15, LPRT2+16* , LPRT2+17, LPRT2+18, LPRT2+19, LPRT2+20, WRTREF+8, WRTREF+9, WRTREF+10, WRTREF+11, WRTREF+12, WRTREF+13 , WRTREF+14, WRTREF+18, WRTREF+19, WRTDX2+3, WRTDX2+4, WRTDX2+8, WRTDX2+9, WRTPX2+3, WRTPX2+4, WRTPX2+8 , WRTPX2+9, WRTCATD+2, WRTCATD+3, WRTCATD+4, WRTCATS+3, WRTCATS+4, WRTCATS+5*
DIEN	XIT+1!
DT	HS+7
DUZ(2	WRTREF+16
U	REORDER+2, REORDER+3, REORDER+4, REORDER+5, LSET+1, LSET+2, LSET+3, LSET+4, LSET+5, LPRT+13 , LPRT+14, LPRT2+1, LPRT2+2, LPRT2+18, LPRT2+19, LPRT2+21, LPRT2+26, LPRT2+28, EKGLAB+7, EKGLAB+10 , EKGPRT+1, EKGPRT+2, WRTREF+9, WRTREF+12, WRTREF+16, WRTREF+18, WRTDX2+2, WRTDX2+3, WRTDX2+4, WRTDX2+5 , WRTDX2+6, WRTPX2+2, WRTPX2+3, WRTPX2+4, WRTPX2+5, WRTPX2+6
X	REORDER+1, REORDER+2, REORDER+6, MCIS+4~, MCIS+5, HS+7, WRTDX2+1, WRTDX2+2, WRTDX2+3, WRTDX2+4 , WRTDX2+5, WRTDX2+6, WRTDX2+7, WRTDX2+8, WRTPX2+1, WRTPX2+2, WRTPX2+3, WRTPX2+4, WRTPX2+5, WRTPX2+6* , WRTPX2+7, WRTPX2+8, WRTCATD+1, WRTCATD+3, WRTCATS+2*, WRTCATS+4
>> X1	HS+7*
>> X2	HS+7*
Y	MRLX!, REORDER+2, REORDER+3, REORDER+4, REORDER+5, LPRT+14, EKGPRT+1, WRTREF+2

Customize PDF page

Package: Clinical Scheduling for Windows

Routine: BSDX41J

Information

Source Information