Routine: EASEZC1

Information

EASEZC1 ;ALB/jap/pjh - Compare 1010EZ Data with VistA Database ; 11/5/09 5:46pm

Package	Total	Call Graph
Enrollment Application System	5	(A408,C1N408,SP408)^EASEZC2 (C202,C206,C3216,SORT)^EASEZC3 ($$KEY711,ADD71201,LINKUP)^EASEZU1 LOCAL711^EASEZU2 $$VERSION^EASEZU4
Registration	3	$$GET^DGENA $$CATEGORY^DGENA4 $$EXT^DGENU
VA FileMan	2	$$EXTERNAL^DILFD EN^DIQ1

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 12

Package	Total	Caller Graph
Enrollment Application System	12	EASEZC2 EASEZC3 EASEZF3 EASEZFM EASEZI1 EASEZL1 EASEZP6F EASEZPF EASEZPV2 EASEZPVD EASEZPVI EASEZRPF

Entry Points

Name	Comments	DBIA/ICR reference
EN(EASAPP,EASDFN)	;this entry point is called as soon as user has selected an Application
GET(EASLINK,EASFFF)	;get data from existing Patient database
C2	;get data from file #2 into local array L711
C201	;get data in Alias subfile #2.01 into local array L711 ; using ien(s) local array ALIAS
C2101	;get data in Disposition subfile #2.101 into local array L711 ; using ien(s) local array DISPOS
C2711	;get data in Current Enrollment #27.11 into local array L711 ; using ien(s) local array ENROLL
ENR(CUR,VDATA)	;get data for current enrollment from VistA database
C408	;get data from financial files into tmp mapping array ; using ien(s) local array INCREL

External References

Name	Field # of Occurrence
$$GET^DGENA	ENR+4
$$CATEGORY^DGENA4	ENR+7
$$EXT^DGENU	ENR+6, ENR+9, ENR+10
$$EXTERNAL^DILFD	ENR+8
EN^DIQ1	GET+17, GET+26
A408^EASEZC2	C408+5
C1N408^EASEZC2	C408+9
SP408^EASEZC2	C408+7
C202^EASEZC3	EN+55
C206^EASEZC3	EN+54
C3216^EASEZC3	EN+56
SORT^EASEZC3	EN+58
$$KEY711^EASEZU1	EN+24, C201+6, C2711+5
ADD71201^EASEZU1	C2+18, C2101+16, C2711+15
LINKUP^EASEZU1	C2+16, C201+15, C2101+14, C2711+13
LOCAL711^EASEZU2	EN+22
$$VERSION^EASEZU4	EN+19

FileNo	Call Tags
^DGEN(27.15 - [#27.15]	EXTERNAL^DILFD

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(	GET+24
^EAS(712 - [#712]	EN+13, EN+15, EN+17, EN+26, EN+27, EN+29, EN+32, EN+50
^TMP("EZDATA"	EN+28, EN+36, EN+37, EN+47, EN+52, EN+53, C2+5, C2+6, C2+14, C201+7 , C201+8, C201+10, C201+12, C201+13, C2101+8, C2101+9, C2101+11, C2101+12, C2711+10*, C2711+11
^TMP("EZINDEX"	C2101+6, C2101+7

Label References

Name	Line Occurrences
$$GET	EN+47, C2+7, C201+10, C2101+9
ENR	EN+51, C2711+9

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACCEPT	EN+11~, EN+28*, EN+36, EN+37, EN+53
ADATA	C201+5~, C201+8, C201+11, C2101+5~, C2101+8, C2711+4~
>> ALIAS(	C201+9, C201+10, C201+15
ARRAY	GET+8~
ARRAY(	GET+18, GET+27
B	C201+5~, C201+9*, C201+10, C201+15, C2101+5~, C2711+4~
C2711KEY	EN+11~, EN+24*, EN+49
CUR	EN+50, EN+51!, C2711+4~, C2711+6, C2711+7, C2711+8, C2711+9, C2711+13, C2711+15, ENR~ , ENR+4
DA	GET+8~, GET+16, GET+22
DA(	GET+25*
DGENCAT	ENR+2~, ENR+7, ENR+8, ENR+11
DGENR	C2711+4~, ENR+4
DGENR("PRIORITY"	ENR+9
DGENR("STATUS"	ENR+5, ENR+6
DGENR("SUBGRP"	ENR+10
DIC	GET+8~, GET+16, GET+22
DIQ	GET+8~, GET+16, GET+22
DIQ(0	GET+16, GET+22
>> DISPOS(1	C2101+9, C2101+14, C2101+16
DR	GET+8~, GET+16, GET+24
DR(	GET+25*
EASAEL	C2+3~, C2+6, C2+16, C2+18, C201+5~, C201+13, C201+15, C2101+5~, C2101+12, C2101+14 , C2101+16, C2711+4~, C2711+11, C2711+13, C2711+15
EASAPP	EN~, EN+13, EN+15, EN+17, EN+19, EN+26, EN+27, EN+29, EN+32, EN+50 , EN+58, C2+16, C2+18, C201+15, C2101+14, C2101+16, C2711+13, C2711+15
EASDFN	EN~, EN+13, EN+15, EN+40, EN+42, EN+45, C2+7, C2+16, C2+18, ENR+7
>> EASEZNEW	EN+17*, EN+40
EASFFF	GET~, GET+9
EASLINK	GET~, GET+11, GET+12, GET+16, GET+18, GET+22, GET+25, GET+27
>> EASVRSN	EN+19*
>> ENROLL(1	C2711+6
F	EN+41*, EN+42, EN+43!
FD	EN+41*, EN+42, EN+43!
FFF	EN+11~, EN+28*, EN+41, EN+45, EN+47
FIELD	GET+8~, GET+9*, GET+10, GET+16, GET+18, GET+25, GET+27
FILE	GET+8~, GET+9*, GET+10, GET+11, GET+14, GET+16, GET+18, GET+19, GET+22, GET+24
FLD	C2101+5~, C2101+6*, C2101+7
IEN	EN+11~, EN+28*, EN+36, EN+37, EN+47, EN+52, EN+53
>> INCREL(408	C408+3
KEY	EN+11~, EN+28, EN+49, C2+3~, C2+5, C2+6, C2+14, C2+18, C201+5~, C201+6* , C201+7, C201+8, C201+10, C201+12, C201+13, C2101+5~, C2101+7, C2101+8, C2101+9, C2101+11 , C2101+12, C2101+16, C2711+4~, C2711+5, C2711+10, C2711+11, C2711+15
LINK	EN+11~, EN+32, EN+42, EN+45*, EN+46, EN+47, EN+52
M	C201+5~, C201+7*, C201+8, C201+12, C201+13, C2711+4~
MAP	C2+3~, C2+5*, C2+7, C2+10
MULTIPLE	EN+11~, EN+28*, EN+36, EN+37, EN+47, EN+52, EN+53
ORIG	EN+11~, EN+29, EN+34, EN+35, EN+36
RTR	GET+8~, GET+18, GET+27, GET+28
SF	EN+41*, EN+42, EN+43!
SUBFILE	GET+8~, GET+9*, GET+11, GET+12, GET+14, GET+19, GET+24, GET+25, GET+27
SUBIEN	EN+11~, EN+26*, EN+27, EN+29, EN+32, EN+36, EN+37, EN+50, EN+53
U	EN+13, EN+15, EN+17, EN+28, EN+29, EN+32, EN+36, EN+37, EN+41, EN+45 , EN+47, EN+50, EN+52, EN+53, GET+9, C2+5, C2+6, C2+10, C201+8, C201+13 , C2101+12, C2711+11
UPD	EN+11~, EN+29*, EN+35, EN+36, EN+37
VDATA	EN+51, EN+52!, C2+3~, C2+7, C2+8, C2+11, C2+12, C2+14, C201+5~, C201+10 , C201+11, C201+12, C2101+5~, C2101+9, C2101+10, C2101+11, C2711+4~, C2711+6, C2711+9, C2711+10 , ENR~, ENR+3, ENR+6, ENR+9, ENR+10, ENR+11*
X	EN+11~, EN+27, EN+28, EN+29, EN+47*, GET+8~, C201+5~, C2101+5~, C2711+4~
Y	EN+11~, GET+8~

Customize PDF page

Package: Enrollment Application System