Routine: BKMVA51

Information

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

Source file <BKMVA51.m>

Package	Total	Call Graph
IHS HIV Management System	3	($$HIVIEN,$$VALID)^BKMIXX3 $$PAD^BKMIXX4 $$HRN^BKMVA1
Registration	3	EN^VALM $$SETFLD^VALM1 SET^VALM10
Kernel	2	$$FMTE^XLFDT DISP^XQORM1
VA Fileman	2	$$IENS^DILF $$GET1^DIQ
IHS VA Utilities	1	^XBFMK

Package	Total	Caller Graph
IHS HIV Management System	2	BKMVA61 BKMVA9

Name	Comments	DBIA/ICR reference
EN	;ENTRY POINT -- ListMan template BKMV PCC MED REVIEW ; Assumes existence of DFN,DUZ
HDR	; EP - Header code ; Assumes existence of DUZ
GETALL(DFN)	; Build ListMan display array of patient medication information ; Input variables: ; DFN - IEN for File 2 ; Output variables: ; VALMAR - Builds ListMan array ; VALMCNT - List array count ; VALM0
INIT	; -- init variables and list array ; Assumes existence of DFN
EXIT	;clean up used variables.
HELP	; -- help code

Name	Field # of Occurrence
$$HIVIEN^BKMIXX3	EN+3
$$VALID^BKMIXX3	EN+5
$$PAD^BKMIXX4	HDR+4, HDR+5, HDR+7
$$HRN^BKMVA1	HDR+5
$$IENS^DILF	HDR+3, GETALL+17
$$GET1^DIQ	HDR+3, HDR+5, HDR+6, GETALL+20, GETALL+21, GETALL+22, GETALL+23
EN^VALM	EN+8
$$SETFLD^VALM1	GETALL+19, GETALL+20, GETALL+21, GETALL+22, GETALL+23
SET^VALM10	GETALL+24
^XBFMK	EN+7, EN+9, GETALL+8, GETALL+26
$$FMTE^XLFDT	HDR+7, GETALL+19
DISP^XQORM1	HELP+2

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"There is no HMS register defined." Line Location: EN+4
Function Call: WRITE	Prompt: ! Line Location: HELP+2
Routine Call	VALM Line Location: EN+8

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVMED("AA"	GETALL+12, GETALL+14
^TMP("BKMVA51"	EN+6!, EXIT+1!

Name	Line Occurrences
EXIT	EN+10
GETALL	INIT+2

Name	Field # of Occurrence
BKMDOD	HDR+2~, HDR+6*, HDR+7
DA	HDR+2~, HDR+3, GETALL+15, GETALL+17
DFN	HDR+5, HDR+6, INIT+2, GETALL~, GETALL+12, GETALL+14
DUZ	EN+5
DUZ(2	HDR+3
HIVIEN	EN+2~, EN+3*, EN+4
IENS	HDR+2~, HDR+3, GETALL+7~, GETALL+17, GETALL+20, GETALL+21, GETALL+22, GETALL+23
MEDDT	GETALL+7~, GETALL+16*, GETALL+19, GETALL+25
MEDIEN	GETALL+7~, GETALL+13, GETALL+14, GETALL+15
PMEDDT	GETALL+7~, GETALL+11, GETALL+19, GETALL+25
RCRDHDR	HDR+2~, HDR+5, HDR+7, HDR+8
RMEDDT	GETALL+7~, GETALL+11, GETALL+12, GETALL+14, GETALL+16
SITE	HDR+2~, HDR+3*, HDR+4
TEXT	GETALL+7~, GETALL+18, GETALL+19, GETALL+20, GETALL+21, GETALL+22, GETALL+23, GETALL+24
VALM0	GETALL+9*, EXIT+2!
VALMAR	GETALL+9*, EXIT+2!
VALMCNT	GETALL+9, GETALL+24, EXIT+2!
VALMHDR	EXIT+2!
VALMHDR(1	HDR+4*
VALMHDR(2	HDR+8*
X	HELP+1~, HELP+2*