Routine: DGENL2

Information

DGENL2 ;ALB/RMO - Patient Enrollment - Build List Area Cont.;16 JUN 1997 ; 7/8/05 1:37pm

Source Information

Source file <DGENL2.m>

Call Graph

Call Graph Total: 5

Package	Total	Call Graph
Registration	4	($$FINDPRI,$$GET)^DGENA $$EXT^DGENU $$SETSTR^VALM1 CNTRL^VALM10
VA Fileman	1	$$EXTERNAL^DILFD

Caller Graph

Caller Graph Total: 1

Package	Total	Caller Graph
Registration	1	DGENL1

Entry Points

Name	Comments	DBIA/ICR reference
SET(DGARY,DGLINE,DGTEXT,DGCOL,DGON,DGOFF,DGSUB,DGNUM,DGDATA,DGCNT)	; -- set display array ; Input -- DGARY Global array subscript ; DGLINE Line number ; DGTEXT Text ; DGCOL Column to start at (optional) ; DGON Highlighting on (optional) ; DGOFF Highlighting off (optional) ; DGSUB Secondary list subscript (optional) ; DGNUM Selection number (optional) ; DGDATA Data associated with selection (optional) ; Output -- DGCNT Number of lines in the list
PHEART(DFN,DGENRIEN,PHENRDT)	;find Purple Heart information based on enrollment date
HIS(DGARY,DFN,DGENRIEN,DGLINE,DGCNT)	;Enrollment history ; Input -- DGARY Global array subscript ; DFN Patient IEN ; DGENRIEN Enrollment IEN ; DGLINE Line number ; Output -- DGCNT Number of lines in the list

External References

Name	Field # of Occurrence
$$FINDPRI^DGENA	HIS+18
$$GET^DGENA	HIS+19
$$EXT^DGENU	HIS+23, HIS+24, HIS+26
$$EXTERNAL^DILFD	HIS+25, PHEART+22, PHEART+23, PHEART+24
$$SETSTR^VALM1	SET+14
CNTRL^VALM10	SET+15

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DPT - [#2]	EXTERNAL^DILFD
^DGEN(27.11 - [#27.11]	EXTERNAL^DILFD

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DGEN(27.11 - [#27.11]	PHEART+6, PHEART+7, PHEART+9, PHEART+10
^DPT - [#2]	PHEART+8, PHEART+11, PHEART+16, PHEART+17, PHEART+19, PHEART+21
^TMP(	SET+13, SET+14, SET+17

Label References

Name	Line Occurrences
SET	HIS+10, HIS+14, HIS+16, HIS+22, HIS+23, HIS+24, HIS+25, HIS+26

Naked Globals

Name	Field # of Occurrence
^(0	SET+13

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DFN	HIS~, PHEART~, PHEART+6, PHEART+8, PHEART+9, PHEART+11, PHEART+16, PHEART+17, PHEART+19, PHEART+21
DGARY	HIS~, HIS+10, HIS+14, HIS+16, HIS+22, HIS+23, HIS+24, HIS+25, HIS+26, SET~ , SET+13, SET+14, SET+17
DGCNT	HIS~, HIS+10, HIS+14, HIS+16, HIS+22, HIS+23, HIS+24, HIS+25, HIS+26, SET~ , SET+12*
DGCOL	SET~, SET+14, SET+15
DGDATA	SET~, SET+17
DGENR	HIS+6~, HIS+19
DGENR("DATETIME"	HIS+26
DGENR("EFFDATE"	HIS+23
DGENR("PRIORITY"	HIS+25
DGENR("STATUS"	HIS+24
DGENR("SUBGRP"	HIS+25
DGENRIEN	HIS~, HIS+17, PHEART~, PHEART+4, PHEART+6, PHEART+9
DGLINE	HIS~, HIS+8, HIS+10, HIS+13, HIS+14, HIS+15, HIS+16, HIS+21*, HIS+22, HIS+23 , HIS+24, HIS+25, HIS+26, SET~, SET+12, SET+13, SET+14, SET+15, SET+17
DGNUM	HIS+6~, HIS+9, HIS+20, HIS+22, SET~, SET+17
DGOFF	SET~, SET+15
DGON	SET~, SET+15
DGPRIEN	HIS+6~, HIS+17, HIS+18, HIS+19, HIS+22
DGSTART	HIS+6~, HIS+8*
DGSUB	SET~, SET+17
DGTEXT	SET~, SET+14, SET+15
>> IORVOFF	HIS+10
>> IORVON	HIS+10
NXTDIF	PHEART+2~, PHEART+3, PHEART+15, PHEART+16
NXTENDT	PHEART+1~, PHEART+5, PHEART+10, PHEART+12, PHEART+13, PHEART+14
NXTENR	PHEART+1~, PHEART+9*, PHEART+10
NXTENTM	PHEART+2~, PHEART+14*, PHEART+15
NXTPHDT	PHEART+2~, PHEART+11*, PHEART+12, PHEART+13, PHEART+14, PHEART+16, PHEART+17
NXTPHTM	PHEART+2~, PHEART+14*, PHEART+15
PHARY	PHEART+1~, PHEART+21*, PHEART+22, PHEART+23, PHEART+24
PHDIERR	PHEART+1~, PHEART+22, PHEART+23, PHEART+24
PHENRDT	PHEART~, PHEART+4, PHEART+8, PHEART+11, PHEART+12, PHEART+14
PHENTM	PHEART+2~, PHEART+14*, PHEART+15
PHI	PHEART+1~, PHEART+22*, PHEART+25
PHREC	PHEART+2~, PHEART+16, PHEART+17, PHEART+18, PHEART+19*, PHEART+20, PHEART+21
PHRR	PHEART+1~, PHEART+24*, PHEART+25
PHST	PHEART+1~, PHEART+23*, PHEART+25
PRVDIF	PHEART+2~, PHEART+3, PHEART+15, PHEART+16
PRVENDT	PHEART+1~, PHEART+5, PHEART+7
PRVENR	PHEART+1~, PHEART+6*, PHEART+7
PRVPHDT	PHEART+2~, PHEART+8*, PHEART+18, PHEART+19
U	PHEART+3*, PHEART+7, PHEART+10, PHEART+22, PHEART+23, PHEART+24
X	SET+11~, SET+13*, SET+14

Customize PDF page

Package: Registration

Routine: DGENL2

Call Graph Total: 5

Caller Graph Total: 1