Routine: BKMVSSR

Package	Total	Call Graph
IHS HIV Management System	9	$$PAUSE^BKMIXX3 RLK^BKMPLKP EN^BKMVC1 EN^BKMVSSR1 EN^BKMVSSR2 (EN,HDR,HDR1)^BKMVSSR3 EN^BKMVSSR4 EN^BKMVSSR5 EN^BKMVSSR6
Kernel	4	^%ZIS ^%ZISC ^%ZTLOAD $$FMDIFF^XLFDT
VA Fileman	3	$$FIND1^DIC $$GET1^DIQ ^DIR

Package	Total	Caller Graph
IHS HIV Management System	1	BKMVA1

Entry Points

Name	Comments	DBIA/ICR reference
EN	;PRIMARY REPORT ENTRY POINT ; Check taxonomies - added per bugzilla #1497
PATDEMO	;GET PATIENT DEMOGRAPHICS
DQUE	;ENTRY FROM QUEUE
QUE(DFN)	;QUEUE REPORT FOR PRINT/DISPLAY
AGE	;GET PATIENT DOB AND DIAGNOSIS INFO AND CALCULATE AGE AT DIAGNOSIS
TYPE()	;Type of report requested
EN1	;EP - Secondary entry point from within REP action of Review/Edit Patient HMS Record Data option
XIT	;KILL LOCALS AND EXIT
FAC	;GATHER FACILITY DATA
CKAGE()	;Call AGE subroutine and confirm eligibility for report
DQUE1	;
PRACDIAG	;GATHER PROVIDER DATA

External References

Name	Field # of Occurrence
^%ZIS	QUE+2
^%ZISC	XIT+1
^%ZTLOAD	QUE+6
$$PAUSE^BKMIXX3	DQUE1+8
RLK^BKMPLKP	EN+9
EN^BKMVC1	EN+3
EN^BKMVSSR1	DQUE+4
EN^BKMVSSR2	DQUE+5
EN^BKMVSSR3	DQUE1+1
HDR^BKMVSSR3	DQUE1+6
HDR1^BKMVSSR3	DQUE1+6
EN^BKMVSSR4	DQUE1+2
EN^BKMVSSR5	DQUE1+3
EN^BKMVSSR6	DQUE1+4
$$FIND1^DIC	AGE+4
$$GET1^DIQ	AGE+2, AGE+3, AGE+6, AGE+8, AGE+9, FAC+1, FAC+2, FAC+3, FAC+4, FAC+5 , FAC+6, FAC+7, PATDEMO+1, PATDEMO+2, PATDEMO+5, PATDEMO+6, PATDEMO+7, PATDEMO+9, PATDEMO+12, PATDEMO+13 , PATDEMO+14, PATDEMO+15, PATDEMO+16, PATDEMO+17, PATDEMO+18, PATDEMO+19, PATDEMO+20, PATDEMO+21, PRACDIAG+1, PRACDIAG+2 , PRACDIAG+3, PRACDIAG+4
^DIR	TYPE+7, CKAGE+7
$$FMDIFF^XLFDT	AGE+14, AGE+15, AGE+16

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Patient age at diagnosis less than 13. Not a reportable case." Line Location: CKAGE+3
Routine Call	DIC Line Location: AGE+4
Routine Call	DIR Line Location: TYPE+7 CKAGE+7
Routine Call	%ZIS Line Location: QUE+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DIC(10.2 - [#10.2]	GET1^DIQ
^DPT - [#2]	GET1^DIQ
^VA(200 - [#200]	GET1^DIQ
^DIC(4 - [#4]	GET1^DIQ
^AUPNPAT - [#9000001]	GET1^DIQ
9000001.41	GET1^DIQ
^BKM(90451 - [#90451]	FIND1^DIC
90451.01	GET1^DIQ
^AUTTSITE - [#9999999.39]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	PATDEMO+11

Label References

Name	Line Occurrences
$$CKAGE	EN+10, EN1+5
$$TYPE	EN+6, EN1+2
AGE	CKAGE+1
DQUE1	DQUE+2
FAC	DQUE+3
PATDEMO	DQUE+3
PRACDIAG	DQUE+3
QUE	EN+8, EN+11, EN1+4, EN1+6
XIT	EN+7, EN+8, EN+9, EN+10, EN+12, QUE+2, QUE+3, DQUE+4, DQUE+5, DQUE1+1 , DQUE1+2, DQUE1+3, DQUE1+4, EN1+3, EN1+4, EN1+5, EN1+7

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	XIT+10!
%H	XIT+10!
%ZIS	QUE+2!*
BKM	PATDEMO+10, PATDEMO+11, XIT+4!
BKM0	XIT+4!
BKM1	XIT+4!
BKM2	XIT+4!
BKMCC	XIT+4!
BKMCKDT	XIT+5!
BKMDAY	XIT+9!
BKMDDT	AGE+1, AGE+8, AGE+9*, AGE+14, XIT+3!
BKMDIAG	AGE+6, AGE+7, AGE+8, AGE+9, XIT+3!
BKMDT	XIT+3!
BKMHAART	XIT+4!
BKMHDR	XIT+4!
BKMHDR1	XIT+4!
BKMICD	XIT+5!
BKMIEN	XIT+4!
BKMLINE	XIT+5!
BKMLINE1	XIT+5!
BKMLOC	FAC+1*, FAC+2, FAC+3, FAC+4, FAC+5, FAC+6, FAC+7, PATDEMO+6, XIT+5!
BKMNDT	XIT+5!
BKMPAD	XIT+5!
BKMPCP	XIT+5!
BKMPROV	PRACDIAG+1, PRACDIAG+2, PRACDIAG+3, PRACDIAG+4*, XIT+3!
BKMQTY	XIT+9!
BKMSEC	XIT+6!
BKMSICD	XIT+6!
BKMSIG	XIT+9!
BKMVADD1	PATDEMO+15*, PATDEMO+22, XIT+2!
BKMVADD2	PATDEMO+16*, PATDEMO+23, XIT+2!
BKMVADD3	PATDEMO+17*, PATDEMO+24, XIT+2!
BKMVADDL	PATDEMO+22, PATDEMO+23, PATDEMO+24, PATDEMO+25, PATDEMO+26, PATDEMO+27, XIT+6!
BKMVAGED	AGE+14, AGE+15, AGE+16, AGE+17, XIT+6!, CKAGE+2
BKMVCITY	PATDEMO+18*, PATDEMO+25, XIT+2!
BKMVCNTY	PATDEMO+21*, XIT+7!
BKMVDOB	AGE+2*, AGE+14, AGE+15, AGE+16, XIT+3!
BKMVDOD	AGE+3*, AGE+15, PATDEMO+3, XIT+6!
BKMVETH	PATDEMO+10, PATDEMO+11, PATDEMO+12*, XIT+2!
BKMVETO	XIT+7!
BKMVHRN	PATDEMO+6*, XIT+7!
BKMVLABS	XIT+7!
BKMVLAD	FAC+3*, XIT+8!
BKMVLAD1	FAC+4*, XIT+8!
BKMVLCTY	FAC+6*, XIT+8!
BKMVLN	XIT+8!
BKMVLOC	FAC+2*, XIT+8!
BKMVLST	FAC+5*, XIT+8!
BKMVLZIP	FAC+7*, XIT+8!
BKMVNDT	XIT+7!
BKMVPHN	PATDEMO+13*, XIT+7!
BKMVPOB	PATDEMO+14*, XIT+6!
BKMVPPH	PRACDIAG+3*, XIT+3!
BKMVPST	PATDEMO+19*, PATDEMO+26, XIT+2!
BKMVPZP	PATDEMO+20*, PATDEMO+27, XIT+2!
BKMVRCE	PATDEMO+7, PATDEMO+8, PATDEMO+9*, XIT+9!
BKMVSDTH	PATDEMO+2*, XIT+9!
BKMVSEX	PATDEMO+1*, XIT+9!
BKMVSTAT	PATDEMO+3, PATDEMO+5, XIT+9!
BKMX	EN+5, DQUE+4, DQUE+5, DQUE1+1, DQUE1+2, DQUE1+3, DQUE1+4, DQUE1+6, DQUE1+8, XIT+4! , EN1+1, CKAGE+2, CKAGE+8
DFLAG	EN+2~, EN+3*
DFN	EN+4~, EN+9, EN+11, AGE+2, AGE+3, AGE+4, PATDEMO+1, PATDEMO+2, PATDEMO+6, PATDEMO+7 , PATDEMO+9, PATDEMO+11, PATDEMO+13, PATDEMO+14, PATDEMO+15, PATDEMO+16, PATDEMO+17, PATDEMO+18, PATDEMO+19, PATDEMO+20 , PATDEMO+21, QUE~, DQUE+2, EN1+6
DIR	XIT+10!, TYPE+1!, CKAGE+4!
DIR("?"	TYPE+4, TYPE+5, TYPE+6*
DIR("A"	TYPE+3, CKAGE+6
DIR("B"	CKAGE+6*
DIR(0	TYPE+2, CKAGE+5
DIWF	XIT+10!
DIWL	XIT+10!
DIWR	XIT+10!
DT	AGE+16
DTOUT	EN+7, XIT+10!, EN1+3, CKAGE+8
DUOUT	EN+7, XIT+10!, EN1+3, CKAGE+8
GLOBAL	XIT+10!
IEN	AGE+4*, AGE+5, AGE+6, AGE+8, AGE+9, PATDEMO+5, PRACDIAG+1, PRACDIAG+2, XIT+10!
IO	DQUE+1
IO("Q"	QUE+3, QUE+6!
IOC	QUE+2!
IOP	QUE+2!
IOSL	DQUE1+6
IOST	DQUE1+5
PAGE	XIT+9!
POP	QUE+2, XIT+10!
TYPE	EN+6, EN+8, XIT+10!, EN1+2, EN1+4
U	PATDEMO+11
X	XIT+10!
Y	XIT+10!, TYPE+8, CKAGE+8
>> ZTDESC	QUE+4*
ZTIO	QUE+2!
>> ZTRTN	QUE+4*
>> ZTSAVE("BKM*"	QUE+5*
>> ZTSAVE("DFN"	QUE+5*
>> ZTSAVE("IEN"	QUE+5*
>> ZTSK	QUE+6

Customize PDF page

Package: IHS HIV Management System

Routine: BKMVSSR

Information

Source Information

Call Graph

Call Graph Total: 16

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: