Routine: BKMVA1B

Call Graph

Call Graph Total: 13

Package	Total	Call Graph
IHS HIV Management System	5	($$BKMIEN,$$BKMPRIV,$$BKMREG,$$DIAG,$$HIVIEN,NOGO)^BKMIXX3 ($$EXISTHAP,$$EXISTNOT,GETHAP,GETNOT)^BKMVA1A ($$YNP,DXHIST)^BKMVA1B REGDC^BKMVA1C ITAX^BKMVA1U
VA Fileman	5	EN^DDIOL (,FILE,UPDATE)^DIE $$IENS^DILF ($$GET1,GETS)^DIQ ^DIR
IHS VA Utilities	1	^XBFMK
Kernel	1	$$NOW^XLFDT
Registration	1	FULL^VALM1

Package	Total	Caller Graph
IHS HIV Management System	2	BKMVA1 BKMVA1B
iCare	1	BQIRGTHM

Package

Total

Caller Graph

IHS HIV Management System

BKMVA1 BKMVA1B

iCare

BQIRGTHM

Entry Points

Name	Comments	DBIA/ICR reference
GETDXCAT(DFN)	;
COMPVALS(IENS,TYP1,TYP2)	;EP - Called from TESTEDIT^BKMVA1A ; Compare pre/post edit fields to populate other fields ; Assumes existence of BKMV array ; Inputs: ; TYP1 = Subscript value like "PRE" ; TYP2 = Subscript value like "POST"
DSPCC	;EP - Display Clinical Categories
DIAG(DFN)	;EP - Return HMS Diagnosis Category
GETVALS(IENS,TYP)	;EP - Called from TESTEDIT^BKMVA1A ; Build pre/post edit fields to track changes
LDVAL(IENS)	; Load initial data values for input template BKMV PATIENT RECORD
YNP(PROMPT,DFLT)	;EP - Yes/No question
FOLL()	;EP -Where Followed prompt
PROMPTS(DFN,BKMSKIP)	;EP - Patient Record prompts. ; BKMSKIP indicates whether or not prompts that are populated ; should be skipped when using input template BKMV PATIENT RECORD ; Populates DIRUT if timeout or up-arrow to exit
PROMPTX	; Secondary point following unsuccessful lock attempt ; Notifications including state reporting status, state confirmation status and partner notification status ; PRXM/HC/BHS - 05/22/2006 - Update prompt text per IHS
DXHIST(BKMIENS,BKMDUZ,BKMDX)	;EP - Update Date/Time of HMS Diagnosis Category History for File 90451 ; Input variables: ; BKMIENS - IEN list formatted for File 90451.01 ; BKMDUZ - User IEN from File 200 ; BKMDX - Internal code from HMS DIAGNOSIS CATEGORY (??) ; Output variables: ; Record updated in File 90451 ; Initialize variables
DSPCDC	;EP - Display CDC Etiology Categories
LDREC(DFN,GUI)	;EP - Load recommended values for HMS Diagnosis Category, Initial HIV Date and ; Initial AIDS Date based on taxonomies ; this will first load the appropriate taxonomies and then calculate ; recommended values and store them in the following variables: ; DIAGCAT (Diagnosis); IAIDSDT (Initial AIDS date) ; HAIDSDT (Initial HIV date)

External References

Name	Field # of Occurrence
$$BKMIEN^BKMIXX3	FOLL+2, DIAG+2, GETDXCAT+6, PROMPTS+10, PROMPTS+54
$$BKMPRIV^BKMIXX3	GETDXCAT+3, PROMPTS+22
$$BKMREG^BKMIXX3	FOLL+3, DIAG+3, GETDXCAT+8, PROMPTS+11, PROMPTS+55
$$DIAG^BKMIXX3	GETDXCAT+16
$$HIVIEN^BKMIXX3	GETDXCAT+4, PROMPTS+9
NOGO^BKMIXX3	GETDXCAT+3, PROMPTS+22
$$EXISTHAP^BKMVA1A	PROMPTX+9
$$EXISTNOT^BKMVA1A	PROMPTX+4
GETHAP^BKMVA1A	PROMPTX+9
GETNOT^BKMVA1A	PROMPTX+4
$$YNP^BKMVA1B	PROMPTX+4, PROMPTX+9
DXHIST^BKMVA1B	GETDXCAT+40, COMPVALS+31
REGDC^BKMVA1C	LDREC+13
ITAX^BKMVA1U	LDREC+10
EN^DDIOL	LDREC+8, PROMPTS+24
^DIE	GETDXCAT+34, GETDXCAT+39, PROMPTS+25
FILE^DIE	GETDXCAT+19, COMPVALS+35
UPDATE^DIE	DXHIST+18
$$IENS^DILF	FOLL+5, DIAG+5, GETDXCAT+11, GETDXCAT+22, PROMPTS+13, PROMPTS+58
$$GET1^DIQ	FOLL+6, FOLL+7, DIAG+6, GETDXCAT+13, GETDXCAT+14, GETDXCAT+24, GETDXCAT+25
GETS^DIQ	LDVAL+3, GETVALS+7
^DIR	YNP+6, FOLL+12
FULL^VALM1	PROMPTS+19
^XBFMK	YNP+2, GETDXCAT+2, GETDXCAT+41
$$NOW^XLFDT	DXHIST+15, GETDXCAT+33, COMPVALS+26, COMPVALS+34

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?3,"Select one of the following clinical classifications:" Line Location: DSPCC+4
Function Call: WRITE	Prompt: !?3,$P(CCSTR,U),?13,$P(CCSTR,U,2) Line Location: DSPCC+7
Function Call: WRITE	Prompt: ! Line Location: DSPCC+8
Function Call: WRITE	Prompt: !!?3,"Select one of the following CDC Etiology categories:" Line Location: DSPCDC+3
Function Call: WRITE	Prompt: !?3,$P(CDCSTR,U,2),?13,$P(CDCSTR,U) Line Location: DSPCDC+6
Function Call: WRITE	Prompt: ! Line Location: DSPCDC+7
Routine Call	DIE Line Location: DXHIST+18
Routine Call	DIE Line Location: GETDXCAT+34 GETDXCAT+39 PROMPTS+25
Routine Call	DIE Line Location: GETDXCAT+19 COMPVALS+35
Routine Call	DIR Line Location: YNP+6 FOLL+12

FileNo	Call Tags
^DIC(4 - [#4]	GET1^DIQ
^BKM(90451 - [#90451]	Classic Fileman Calls
90451.01	GET1^DIQ, GETS^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^BKM(90451 - [#90451]	PROMPTS+24, PROMPTS+64
^BKM(90451.5 - [#90451.5]	DSPCDC+4, DSPCDC+5, DSPCDC+6
^BKMV(90451.7 - [#90451.7]	DSPCC+5, DSPCC+6, DSPCC+7
^TMP("BKMAIDS"	LDREC+15!
^TMP("BKMCD4"	LDREC+15!
^TMP("BKMCD4AB"	LDREC+16!
^TMP("BKMHIV"	LDREC+15!
^TMP("BKMHIVP"	LDREC+16!
^TMP("BKMTST"	LDREC+16!

Name	Line Occurrences
COMPVALS	PROMPTS+62
GETVALS	PROMPTS+18, PROMPTS+60
PROMPTX	PROMPTS+24

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	DXHIST+19!
BKMCC	PROMPTS+5~, COMPVALS+6~, COMPVALS+9!
BKMCC(	COMPVALS+12, COMPVALS+13, COMPVALS+14, COMPVALS+15, COMPVALS+18, COMPVALS+22, COMPVALS+25, COMPVALS+26, COMPVALS+30, COMPVALS+34
BKMCHK	GETDXCAT+1~
BKMDIAG	PROMPTS+5~
BKMDUZ	DXHIST~, DXHIST+9, DXHIST+17
BKMDX	DXHIST~, DXHIST+16
BKMETI	PROMPTS+6~, PROMPTS+7*
BKMIEN	FOLL+1~, FOLL+2, FOLL+3, FOLL+4, DIAG+1~, DIAG+2, DIAG+3, DIAG+4, GETDXCAT+1~, GETDXCAT+6* , GETDXCAT+7, GETDXCAT+8, GETDXCAT+10, GETDXCAT+21, GETDXCAT+40, PROMPTS+4~, PROMPTS+10, PROMPTS+11, PROMPTS+12, PROMPTS+21 , PROMPTS+24, PROMPTS+54, PROMPTS+55, PROMPTS+57, PROMPTS+64
BKMIENS	FOLL+1~, FOLL+5, FOLL+6, DXHIST~, DXHIST+9, DXHIST+12, DIAG+1~, DIAG+5, DIAG+6, GETDXCAT+11* , GETDXCAT+13, GETDXCAT+14, GETDXCAT+18, GETDXCAT+22, GETDXCAT+24, GETDXCAT+25, PROMPTS+4~, PROMPTS+13, PROMPTS+18, PROMPTS+58* , PROMPTS+60, PROMPTS+62, COMPVALS+12, COMPVALS+13, COMPVALS+14, COMPVALS+15, COMPVALS+18, COMPVALS+22, COMPVALS+25, COMPVALS+26 , COMPVALS+30, COMPVALS+31, COMPVALS+34
BKMREG	FOLL+1~, FOLL+3, FOLL+4, DIAG+1~, DIAG+3, DIAG+4, GETDXCAT+1~, GETDXCAT+8, GETDXCAT+9, GETDXCAT+10 , GETDXCAT+21, GETDXCAT+40, PROMPTS+4~, PROMPTS+11, PROMPTS+12, PROMPTS+55*, PROMPTS+57
BKMSKIP	PROMPTS~
BKMV	PROMPTS+5~
BKMV(	GETVALS+3!, GETVALS+8*, COMPVALS+8, COMPVALS+11, COMPVALS+17, COMPVALS+20, COMPVALS+22, COMPVALS+23, COMPVALS+25, COMPVALS+28 , COMPVALS+30, COMPVALS+31, COMPVALS+33
BKMV("POST"	GETDXCAT+24, GETDXCAT+25, GETDXCAT+27, GETDXCAT+35, GETDXCAT+40
BKMV("PRE"	GETDXCAT+13, GETDXCAT+14, GETDXCAT+27, GETDXCAT+31, GETDXCAT+35, GETDXCAT+38
BKMVAL	LDVAL+2!, LDVAL+4*
BKMVUP	GETDXCAT+1~
BKMVUP(	GETDXCAT+18*
CC	DSPCC+2~, DSPCC+3, DSPCC+5, DSPCC+6
CCIEN	DSPCC+2~, DSPCC+6*, DSPCC+7
CCSTR	DSPCC+2~, DSPCC+7*
CDC	DSPCDC+1~, DSPCDC+2, DSPCDC+4, DSPCDC+5
CDCIEN	DSPCDC+1~, DSPCDC+5*, DSPCDC+6
CDCSTR	DSPCDC+1~, DSPCDC+6*
DA	FOLL+1~, FOLL+4, FOLL+5, DIAG+1~, DIAG+4, DIAG+5, GETDXCAT+10, GETDXCAT+11, GETDXCAT+18!, GETDXCAT+20! , GETDXCAT+21, GETDXCAT+22, PROMPTS+12, PROMPTS+13, PROMPTS+20!, PROMPTS+21, PROMPTS+56!, PROMPTS+57*, PROMPTS+58
DA(1	FOLL+4, DIAG+4, GETDXCAT+10, GETDXCAT+21, GETDXCAT+30, GETDXCAT+37, PROMPTS+12, PROMPTS+57
DFLT	YNP~, YNP+1*, YNP+5
DFN	FOLL+2, DIAG~, DIAG+2, LDREC~, LDREC+13, GETDXCAT~, GETDXCAT+6, PROMPTS~, PROMPTS+10, PROMPTS+54 , PROMPTX+4, PROMPTX+9
DIAGCAT	GETDXCAT+1~, GETDXCAT+16*, GETDXCAT+17, GETDXCAT+18
>> DIE	GETDXCAT+30, GETDXCAT+37, PROMPTS+21*
>> DIE("NO^"	PROMPTS+14*
DIR	FOLL+8~
DIR("A"	YNP+4, FOLL+11
DIR("B"	YNP+5, FOLL+9
DIR(0	YNP+3, FOLL+10
DIRUT	PROMPTS+16!, PROMPTX+5
>> DR	GETDXCAT+31, GETDXCAT+33, GETDXCAT+38, PROMPTS+21
>> DTOUT	YNP+6, FOLL+14
>> DUOUT	YNP+6, FOLL+14
DUZ	GETDXCAT+3, GETDXCAT+40, PROMPTS+22, COMPVALS+31
DUZ(2	FOLL+7
FDA	DXHIST+11!, DXHIST+19!
FDA(	DXHIST+15, DXHIST+16, DXHIST+17*
FOLL	FOLL+1~, FOLL+6, FOLL+7, FOLL+9, PROMPTS+6~
GUI	LDREC~, LDREC+7*, LDREC+8
HIVIEN	GETDXCAT+1~, GETDXCAT+4, GETDXCAT+5, PROMPTS+4~, PROMPTS+9, PROMPTX+9
IENS	DXHIST+8~, DXHIST+12*, DXHIST+15, DXHIST+16, DXHIST+17, LDVAL~, LDVAL+3, LDVAL+4, GETVALS~, GETVALS+7 , GETVALS+8, COMPVALS~
OBKMDIAG	PROMPTS+5~
PROMPT	YNP~, YNP+4
TEMP	LDVAL+1~, GETVALS+2~
TEMP(	LDVAL+4, GETVALS+8
TYP	GETVALS~, GETVALS+3, GETVALS+8
TYP1	COMPVALS~, COMPVALS+7, COMPVALS+8, COMPVALS+20, COMPVALS+22, COMPVALS+23, COMPVALS+25, COMPVALS+28, COMPVALS+30, COMPVALS+33
TYP2	COMPVALS~, COMPVALS+7, COMPVALS+8, COMPVALS+11, COMPVALS+17, COMPVALS+20, COMPVALS+23, COMPVALS+28, COMPVALS+31, COMPVALS+33
U	DSPCC+7, DSPCDC+6, COMPVALS+11
X	FOLL+13, DXHIST+19!
Y	YNP+7, FOLL+8~, FOLL+13, FOLL+15, DXHIST+19!

Customize PDF page

Package: IHS HIV Management System

Routine: BKMVA1B

Information

Source Information

Call Graph

Call Graph Total: 13

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: