Routine: BKMVA9

Information

BKMVA9 ;PRXM/HC/JGH-HMS PATIENT REGISTER; [ 1/19/2005 7:16 PM ] ; 09 Jun 2005 12:58 PM

Call Graph

Call Graph Total: 17

Package	Total	Call Graph
VA Fileman	8	^%DT HELP^%DTC EN^DDIOL ^DIE $$IENS^DILF ($$GET1,GETS)^DIQ ^DIR ^DIWP
IHS HIV Management System	3	($$BKMIEN,$$BKMPRIV,$$BKMREG,$$HIVIEN,$$I,$$VALID,NOGO)^BKMIXX3 ($$GETALL,INIT)^BKMVA1 HDR^BKMVA51
Registration	3	EN^VALM ($$SETFLD,FULL)^VALM1 SET^VALM10
Kernel	2	($$FMTE,$$NOW)^XLFDT DISP^XQORM1
IHS VA Utilities	1	^XBFMK

Entry Points

Name	Comments	DBIA/ICR reference
HELP	; -help
HDR	; -header
AIDCHLP	; EP -AIDS State Confirmation DT Special Help
AIDRHLP	; EP -AIDS State Reporting DT Special Help
GETALL	;
PNOTHLP	; EP -Partner Notification Special Help
PNOTFORM	; Partner notification ; Assume DFN & DUZ exist ; OSTAT utilized in input template
INIT	; -init vars & list array
PNOTDT	; EP -Input Transform for Partner Notification DT
STAT(DFN,FLD)	; get current AIDS/HIV State Reportng/Confirmation or Partnr Notification Status
MAINFORM	; State Reporting/Confirmation ; Assume DFN & DUZ exist ; OSTAT utilized in input template
EN	; -EP for BKMV UPD1 State
HIVRHLP	; EP -HIV State Reporting DT Special Help
EXEN	; EP -Called by GETNOT^BKMVA1A ; Assume DFN exists
HIVRDT	; EP -Input Transform for State HIV Reporting DT
YNP(PROMPT,DFLT)	;Yes/No question
HIVCDT	; EP -Input Transform for State HIV Confirmation DT
MAINX	; Exit point for MAINFORM
AIDRDT	; EP -Input Transform for State AIDS Reporting DT
HIVCHLP	; EP -HIV State Confirmation DT Special Help
EXIT	; -exit
AIDCDT	; EP -Input Transform for State AIDS Confirmation DT
PNOTX	; PNOTFORM Exit point

External References

Name	Field # of Occurrence
^%DT	HIVRDT+5, HIVCDT+5, AIDRDT+5, AIDCDT+5, PNOTDT+4
HELP^%DTC	HIVRHLP+3, HIVCHLP+3, AIDRHLP+3, AIDCHLP+3, PNOTHLP+3
$$BKMIEN^BKMIXX3	GETALL+5, MAINFORM+9, PNOTFORM+9, STAT+3
$$BKMPRIV^BKMIXX3	MAINFORM+5, PNOTFORM+5
$$BKMREG^BKMIXX3	GETALL+6, MAINFORM+11, PNOTFORM+11, STAT+5
$$HIVIEN^BKMIXX3	EN+2, EXEN+3, MAINFORM+7, PNOTFORM+7
$$I^BKMIXX3	GETALL+37, GETALL+61
$$VALID^BKMIXX3	EN+4, EXEN+5
NOGO^BKMIXX3	MAINFORM+6, PNOTFORM+6
$$GETALL^BKMVA1	EN+11
INIT^BKMVA1	EN+12
HDR^BKMVA51	HDR+1
EN^DDIOL	MAINFORM+32, PNOTFORM+26, HIVRHLP+11, HIVCHLP+11, AIDRHLP+11, AIDCHLP+11, PNOTHLP+9
^DIE	MAINFORM+33, MAINFORM+53, MAINFORM+58, MAINFORM+63, MAINFORM+68, PNOTFORM+32, PNOTFORM+35, PNOTFORM+49
$$IENS^DILF	GETALL+9, MAINFORM+21, MAINFORM+39, PNOTFORM+21, PNOTFORM+25, PNOTFORM+41
$$GET1^DIQ	GETALL+21, GETALL+22, GETALL+30, GETALL+31, GETALL+44, GETALL+45, GETALL+53, GETALL+54, GETALL+63, GETALL+64 , GETALL+65, MAINFORM+22, MAINFORM+23, MAINFORM+24, MAINFORM+25, MAINFORM+26, MAINFORM+27, MAINFORM+28, MAINFORM+29, MAINFORM+40 , MAINFORM+41, MAINFORM+42, MAINFORM+43, MAINFORM+44, MAINFORM+45, MAINFORM+46, MAINFORM+47, PNOTFORM+22, PNOTFORM+23, PNOTFORM+28 , PNOTFORM+42, PNOTFORM+43, STAT+7, HIVRDT+2, HIVRDT+3, HIVRDT+4, HIVCDT+2, HIVCDT+3, HIVCDT+4, AIDRDT+2 , AIDRDT+3, AIDRDT+4, AIDCDT+2, AIDCDT+3, AIDCDT+4, PNOTDT+2, PNOTDT+3
GETS^DIQ	GETALL+14
^DIR	YNP+16
^DIWP	YNP+7
EN^VALM	EN+9, EXEN+8
$$SETFLD^VALM1	GETALL+16, GETALL+17, GETALL+18, GETALL+24, GETALL+25, GETALL+26, GETALL+33, GETALL+34, GETALL+35, GETALL+39 , GETALL+40, GETALL+41, GETALL+47, GETALL+48, GETALL+49, GETALL+56, GETALL+57, GETALL+58, GETALL+67, GETALL+68 , GETALL+69
FULL^VALM1	MAINFORM+14, PNOTFORM+14
SET^VALM10	GETALL+19, GETALL+27, GETALL+36, GETALL+37, GETALL+42, GETALL+50, GETALL+59, GETALL+61, GETALL+70
^XBFMK	GETALL+3, GETALL+72, MAINFORM+4, MAINFORM+13, PNOTFORM+4, PNOTFORM+13
$$FMTE^XLFDT	GETALL+21, GETALL+22, GETALL+30, GETALL+31, GETALL+44, GETALL+45, GETALL+53, GETALL+54, GETALL+64, GETALL+65
$$NOW^XLFDT	MAINFORM+52, MAINFORM+57, MAINFORM+62, MAINFORM+67, PNOTFORM+48
DISP^XQORM1	HELP+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"There is no HMS register defined." Line Location: EN+3
Function Call: WRITE	Prompt: !,"No Patient entered or Patient Not In Register <Enter>" Line Location: EN+11
Function Call: WRITE	Prompt: !,"There is no HMS register defined." Line Location: EXEN+4
Function Call: WRITE	Prompt: !,"You are not a valid HMS user." Line Location: EXEN+5
Function Call: WRITE	Prompt: ! Line Location: HELP+1
Routine Call	VALM Line Location: EN+9 EXEN+8
Routine Call	DIE Line Location: MAINFORM+33 MAINFORM+53 MAINFORM+58 MAINFORM+63 MAINFORM+68 PNOTFORM+32 PNOTFORM+35 PNOTFORM+49
Routine Call	DIR Line Location: YNP+16

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^BKM(90451 - [#90451]	MAINFORM+32, MAINFORM+69, PNOTFORM+26, PNOTFORM+50
^TMP("BKMVA9"	EN+8!, EN+10!, EXEN+7!, EXEN+9!, MAINX+1!, PNOTX+1!
^UTILITY($J	YNP+6!, YNP+8, YNP+10

Label References

Name	Line Occurrences
GETALL	INIT+1, MAINX+2, PNOTX+2
MAINX	MAINFORM+32
PNOTX	PNOTFORM+26

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %DT	HIVRDT+5, HIVCDT+5, AIDRDT+5, AIDCDT+5, PNOTDT+4*
AIDCDT	AIDRDT+1~, AIDRDT+2*, AIDRDT+9
AIDRDT	AIDCDT+1~, AIDCDT+2*, AIDCDT+9
BFL	HIVRDT+6, HIVCDT+6, AIDRDT+6, AIDCDT+6, PNOTDT+5*, HIVRHLP+3!, HIVCHLP+3!, AIDRHLP+3!, AIDCHLP+3!, PNOTHLP+3!
BKMDT	GETALL+1~, GETALL+21, GETALL+25, GETALL+30, GETALL+34, GETALL+44, GETALL+48, GETALL+53, GETALL+57
BKMDTE	GETALL+2~, GETALL+22, GETALL+26, GETALL+31, GETALL+35, GETALL+45, GETALL+49, GETALL+54, GETALL+58, GETALL+65* , GETALL+69
BKMIEN	MAINFORM+3~, MAINFORM+9, MAINFORM+10, MAINFORM+11, MAINFORM+20, MAINFORM+31, MAINFORM+32, MAINFORM+38, MAINFORM+69, PNOTFORM+3~ , PNOTFORM+9, PNOTFORM+10, PNOTFORM+11, PNOTFORM+20, PNOTFORM+25, PNOTFORM+26, PNOTFORM+34, PNOTFORM+40, PNOTFORM+50, STAT+1~ , STAT+3*, STAT+4, STAT+5, STAT+7
BKMIENS	MAINFORM+3~, MAINFORM+21, MAINFORM+22, MAINFORM+23, MAINFORM+24, MAINFORM+25, MAINFORM+26, MAINFORM+27, MAINFORM+28, MAINFORM+29 , MAINFORM+39, MAINFORM+40, MAINFORM+41, MAINFORM+42, MAINFORM+43, MAINFORM+44, MAINFORM+45, MAINFORM+46, MAINFORM+47, PNOTFORM+3~ , PNOTFORM+21, PNOTFORM+22, PNOTFORM+23, PNOTFORM+41, PNOTFORM+42, PNOTFORM+43
BKMPRIV	MAINFORM+3~, MAINFORM+5, MAINFORM+6, PNOTFORM+3~, PNOTFORM+5, PNOTFORM+6
BKMREG	MAINFORM+3~, MAINFORM+11, MAINFORM+12, MAINFORM+20, MAINFORM+38, PNOTFORM+3~, PNOTFORM+11, PNOTFORM+12, PNOTFORM+20, PNOTFORM+25 , PNOTFORM+40, STAT+1~, STAT+5*, STAT+6, STAT+7
BKMSTAT	GETALL+2~, GETALL+20, GETALL+25, GETALL+28, GETALL+34, GETALL+43, GETALL+48, GETALL+51, GETALL+57
BKMSTATI	GETALL+2~, GETALL+20, GETALL+25, GETALL+29, GETALL+34, GETALL+43, GETALL+48, GETALL+52, GETALL+57
BKMTOT	YNP+1~, YNP+8*, YNP+9, YNP+12, YNP+13
BKMV	MAINFORM+3~, PNOTFORM+3~
BKMV("POST"	MAINFORM+40, MAINFORM+41, MAINFORM+42, MAINFORM+43, MAINFORM+44, MAINFORM+45, MAINFORM+46, MAINFORM+47, MAINFORM+49, MAINFORM+54 , MAINFORM+59, MAINFORM+64, PNOTFORM+42, PNOTFORM+43, PNOTFORM+45
BKMV("PRE"	MAINFORM+22, MAINFORM+23, MAINFORM+24, MAINFORM+25, MAINFORM+26, MAINFORM+27, MAINFORM+28, MAINFORM+29, MAINFORM+49, MAINFORM+54 , MAINFORM+59, MAINFORM+64, PNOTFORM+22, PNOTFORM+23, PNOTFORM+45
BKMVA9	GETALL+1~
BKMVA9("90451.01"	GETALL+20, GETALL+28, GETALL+29, GETALL+43, GETALL+51, GETALL+52
BKMVA9E	GETALL+1~
CAT	GETALL+1~
DA	GETALL+7!, GETALL+8, GETALL+9, MAINFORM+19!, MAINFORM+20, MAINFORM+21, MAINFORM+30!, MAINFORM+31, MAINFORM+37!, MAINFORM+38 , MAINFORM+39, PNOTFORM+19!, PNOTFORM+20, PNOTFORM+21, PNOTFORM+24!, PNOTFORM+25, PNOTFORM+33!, PNOTFORM+34, PNOTFORM+39!, PNOTFORM+40 , PNOTFORM+41, HIVRDT+2, HIVCDT+2, AIDRDT+2, AIDCDT+2
DA(1	GETALL+8, MAINFORM+20, MAINFORM+38, MAINFORM+51, MAINFORM+56, MAINFORM+61, MAINFORM+66, PNOTFORM+20, PNOTFORM+25, PNOTFORM+30 , PNOTFORM+40, PNOTFORM+47, HIVRDT+2, HIVRDT+3, HIVCDT+2, HIVCDT+3, AIDRDT+2, AIDRDT+3, AIDCDT+2, AIDCDT+3 , PNOTDT+2
DA0	GETALL+1~
DA1	GETALL+1~, GETALL+6*, GETALL+8
DA2	GETALL+1~, GETALL+5*, GETALL+6, GETALL+8
DFLT	YNP~, YNP+2*, YNP+15
DFN	EN+11, GETALL+5, MAINFORM+9, PNOTFORM+9, STAT~, STAT+3, HIVRDT+1~, HIVRDT+3, HIVRDT+4, HIVCDT+1~ , HIVCDT+3, HIVCDT+4, AIDRDT+1~, AIDRDT+3, AIDRDT+4, AIDCDT+1~, AIDCDT+3, AIDCDT+4, PNOTDT+1~, PNOTDT+2* , PNOTDT+3
>> DIE	MAINFORM+31, MAINFORM+51, MAINFORM+56, MAINFORM+61, MAINFORM+66, PNOTFORM+30, PNOTFORM+34, PNOTFORM+47
DIR	YNP+1~
DIR("A"	YNP+12, YNP+13, YNP+14*
DIR("B"	YNP+15*
DIR(0	YNP+3*
DIROUT	YNP+1~
DIRUT	YNP+1~
DIWL	YNP+1~, YNP+7*, YNP+8, YNP+10
DIWR	YNP+1~, YNP+7*
DOB	HIVRDT+1~, HIVRDT+4, HIVRDT+7, HIVCDT+1~, HIVCDT+4, HIVCDT+7, AIDRDT+1~, AIDRDT+4, AIDRDT+7, AIDCDT+1~ , AIDCDT+4, AIDCDT+7, PNOTDT+1~, PNOTDT+3*, PNOTDT+6
>> DR	MAINFORM+31, MAINFORM+52, MAINFORM+57, MAINFORM+62, MAINFORM+67, PNOTFORM+31, PNOTFORM+34, PNOTFORM+48
DT	HIVRDT+8, HIVCDT+8, AIDRDT+8, AIDCDT+8, PNOTDT+7
DTOUT	YNP+1~, YNP+16
DUOUT	YNP+1~, YNP+16
DUZ	EN+4, EXEN+5, MAINFORM+5, PNOTFORM+5
>> DV	HIVRHLP+1, HIVCHLP+1, AIDRHLP+1, AIDCHLP+1, PNOTHLP+1*
ENTER	EN+1~
FLD	STAT~, STAT+7
HELP	HIVRHLP+2!, HIVRHLP+11, HIVRHLP+12!, HIVCHLP+2!, HIVCHLP+11, HIVCHLP+12!, AIDRHLP+2!, AIDRHLP+11, AIDRHLP+12!, AIDCHLP+2! , AIDCHLP+11, AIDCHLP+12!, PNOTHLP+2!, PNOTHLP+9, PNOTHLP+10!
HELP(1	HIVRHLP+5, HIVRHLP+6, HIVCHLP+5, HIVCHLP+6, AIDRHLP+5, AIDRHLP+6, AIDCHLP+5, AIDCHLP+6, PNOTHLP+5, PNOTHLP+6
HELP(2	HIVRHLP+7, HIVRHLP+8, HIVCHLP+7, HIVCHLP+8, AIDRHLP+7, AIDRHLP+8, AIDCHLP+7, AIDCHLP+8, PNOTHLP+7, PNOTHLP+8
HELP(3	HIVRHLP+9, HIVRHLP+10, HIVCHLP+9, HIVCHLP+10, AIDRHLP+9, AIDRHLP+10, AIDCHLP+9, AIDCHLP+10
HIVCDT	HIVRDT+1~, HIVRDT+2*, HIVRDT+9
HIVIEN	EN+1~, EN+2, EN+3, EXEN+2~, EXEN+3, EXEN+4, MAINFORM+3~, MAINFORM+7, MAINFORM+8, PNOTFORM+3~ , PNOTFORM+7, PNOTFORM+8
HIVRDT	HIVCDT+1~, HIVCDT+2*, HIVCDT+9
IENS	GETALL+1~, GETALL+9, GETALL+14, GETALL+20, GETALL+21, GETALL+22, GETALL+28, GETALL+29, GETALL+30, GETALL+31 , GETALL+43, GETALL+44, GETALL+45, GETALL+51, GETALL+52, GETALL+53, GETALL+54, GETALL+63, GETALL+64, GETALL+65 , PNOTFORM+3~, PNOTFORM+25, PNOTFORM+28
II	YNP+1~, YNP+9*, YNP+10, YNP+12, YNP+13
OSTAT	MAINFORM+3~, PNOTFORM+3~
PDAT	GETALL+1~, GETALL+64*, GETALL+68
PNOT	GETALL+1~, GETALL+63*, GETALL+68
PNOTI	GETALL+2~, GETALL+63*, GETALL+68
PROMPT	YNP~, YNP+5, YNP+7, YNP+14
RSTAT	GETALL+1~, GETALL+20, GETALL+28, GETALL+29, GETALL+30, GETALL+43, GETALL+51, GETALL+52, GETALL+53
SRCAT	MAINFORM+33!
STAT	STAT+1~, STAT+2, STAT+4, STAT+6, STAT+7, STAT+8
TEXT	GETALL+1~, GETALL+15, GETALL+16, GETALL+17, GETALL+18, GETALL+19, GETALL+23, GETALL+24, GETALL+25, GETALL+26 , GETALL+27, GETALL+32, GETALL+33, GETALL+34, GETALL+35, GETALL+36, GETALL+38, GETALL+39, GETALL+40, GETALL+41 , GETALL+42, GETALL+46, GETALL+47, GETALL+48, GETALL+49, GETALL+50, GETALL+55, GETALL+56, GETALL+57, GETALL+58 , GETALL+59, GETALL+66, GETALL+67, GETALL+68, GETALL+69, GETALL+70, YNP+1~, YNP+10, YNP+11, YNP+12 , YNP+13
VALM0	GETALL+4*, EXIT+1!
VALMAR	GETALL+4*, EXIT+1!
VALMCNT	GETALL+4, GETALL+19, GETALL+27, GETALL+36, GETALL+37, GETALL+42, GETALL+50, GETALL+59, GETALL+61, GETALL+70 , EXIT+1!
VALMHDR	EXIT+1!
VALMPGE	GETALL+1~, GETALL+4*
X	HELP+1, YNP+1~, YNP+7, HIVRDT+5, HIVRDT+6!, HIVRDT+7!, HIVRDT+8!, HIVRDT+9!, HIVCDT+5, HIVCDT+6! , HIVCDT+7!, HIVCDT+8!, HIVCDT+9!, AIDRDT+5, AIDRDT+6!, AIDRDT+7!, AIDRDT+8!, AIDRDT+9!, AIDCDT+5, AIDCDT+6! , AIDCDT+7!, AIDCDT+8!, AIDCDT+9!, PNOTDT+4*, PNOTDT+5!, PNOTDT+6!, PNOTDT+7!, HIVRHLP+4, HIVCHLP+4, AIDRHLP+4 , AIDCHLP+4, PNOTHLP+4
Y	YNP+1~, YNP+17, HIVRDT+1~, HIVRDT+5, HIVRDT+6, HIVCDT+1~, HIVCDT+5, HIVCDT+6, AIDRDT+1~, AIDRDT+5 , AIDRDT+6, AIDCDT+1~, AIDCDT+5, AIDCDT+6, PNOTDT+1~, PNOTDT+4, PNOTDT+5

Customize PDF page

Package: IHS HIV Management System

Routine: BKMVA9

Information

Source Information

Call Graph

Call Graph Total: 17

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: