Routine: DGEN1

Call Graph Total: 11

Package	Total	Call Graph
Registration	10	($$MTPRMPT,$$PRT1010,$$SEL1010)^DG1010P ($$ASK,$$CANCEL,$$ENRPAT)^DGEN ($$FINDCUR,$$GET)^DGENA (BLD,MESSAGE)^DGENL EN^DGENLEH EN^DGENLR ($$ON,$$PENDING)^DGENQRY $$SEND^DGENQRY1 GETPAT^DGRPTU (FULL,PAUSE)^VALM1
VA Fileman	1	^DIR

Name	Comments	DBIA/ICR reference
EH	;Entry point for DGEN EXPAND HISTORY protocol ; Input -- DFN Patient IEN ; Output -- VALMBCK R =Refresh screen
PEZ	;Entry point for DGENUP PRINT 1010EZ-EZR protocol (DG5.3624)
EHQ
SPQ
SP	;Entry point for DGEN SELECT PATIENT protocol ; Input -- None ; Output -- DFN Patient IEN ; VALMBCK R =Refresh screen
CE	;Entry point for DGEN CEASE ENROLLMENT protocol ; Input -- DFN Patient IEN ; Output -- VALMBCK R =Refresh screen
CHECK	;Entry point for the DGEN CHECK QUERY STATUS protocol
QUERY	;entry point for DGEN SEND ENROLLMENT QUERY protocol
EP	;Entry point for DGEN ENROLL PATIENT protocol ; Input -- DFN Patient IEN ; Output -- VALMBCK R =Refresh screen

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Enrollment/Eligibility Query sent...",!! Line Location: EP+5
Function Call: WRITE	Prompt: !!,">>> Patient enrollment record was not created." Line Location: EP+14
Function Call: WRITE	Prompt: !!,">>> Patient's enrollment was not ceased." Line Location: CE+16
Function Call: WRITE	Prompt: !!,^TMP("DGEN",$J,DGLINE,0) Line Location: EH+17
Function Call: WRITE	Prompt: "sending of enrollment queries turned off" Line Location: QUERY+1
Routine Call	DIR Line Location: QUERY+7

Name	Line Occurrences (* Changed, ! Killed)
^TMP("DGEN"	EH+17
^TMP("DGENIDX"	EH+16

Name	Line Occurrences
EHQ	EH+8

Name	Field # of Occurrence
^(	EH+16

Name	Field # of Occurrence
>> DFN	EP+5, EP+12, EP+19, CE+11, CE+15, CE+21, EH+19, EH+20, SP+14*, SP+17 , QUERY+11, QUERY+16, CHECK+1, CHECK+4, PEZ+6, PEZ+7
DGDFN	SP+4~, SP+9, SP+12, SP+14
DGENOUT	EP+7~, EP+12, EP+13, CE+3~, CE+8
DGENR	CE+3~, CE+13, CE+15
DGENRIEN	CE+3~, CE+11, CE+13, EH+15~, EH+16, EH+19
DGI	EH+3~, EH+12, EH+14, EH+16
DGLINE	EH+15~, EH+16*, EH+17
DGSELY	EH+3~, EH+7
DGSELY(	EH+14
DGSELY("ERR"	EH+8
DGSELY("^"	EH+8
DGTASK	PEZ+1~, PEZ+3, PEZ+7
DIR	QUERY+2~, QUERY+9!
DIR("?"	QUERY+6*
DIR("A"	QUERY+3*
DIR("B"	QUERY+4*
DIR(0	QUERY+5*
>> DIRUT	QUERY+8
DUZ	QUERY+10
ERROR	QUERY+2~, QUERY+11, QUERY+14
MTIEN	PEZ+1~, PEZ+3, PEZ+6, PEZ+7
NOTIFY	QUERY+2~, QUERY+10*, QUERY+11
RPTSEL	PEZ+1~, PEZ+3, PEZ+4, PEZ+5, PEZ+7
>> VALMBCK	EP+8, EP+20, CE+4, CE+22, EH+4, EH+21, SP+5, SP+18, QUERY+17, CHECK+9 , PEZ+8*
>> XQORNOD(0	EH+7
>> Y	QUERY+10

Information