Routine: DVBCXFRC

Package	Total	Call Graph
VA FileMan	6	$$FIND1^DIC FILE^DICN (,UPDATE)^DIE ^DIK $$VFILE^DILFD GETS^DIQ
Automated Medical Information Exchange	5	KILL^DVBCUTIL ($$EXAM,DELSER)^DVBCUTL4 ($$UPRR,UPRS)^DVBCUTL8 (BULL1,BULL10,BULL11,BULL2,BULL3,BULL8,BULL9)^DVBCXFRD EN1^DVBCXFRS
MailMan	1	^XMB
Registration	1	$$PRIM^VASITE

Name	Field # of Occurrence
$$FIND1^DIC	EN1+10, PATEDIT+2
FILE^DICN	REQEDIT+7, PATEDIT+30, SETVARS+9, CRTMSE+7
^DIE	REQEDIT+11, REQEDIT+12, REQEDIT+13, REQEDIT+14, REQEDIT+24, REQEDIT+25, REQEDIT+27, REQEDIT+43, PATEDIT+38, ADDEDIT+4
UPDATE^DIE	REQEDIT+32, REQEDIT+36
^DIK	REQEDIT+46
$$VFILE^DILFD	PATEDIT+35, PATEDIT+42
GETS^DIQ	PATEDIT+8
KILL^DVBCUTIL	EXIT+10
$$EXAM^DVBCUTL4	SETVARS+8
DELSER^DVBCUTL4	EXIT
$$UPRR^DVBCUTL8	REQEDIT+21, REQEDIT+40
UPRS^DVBCUTL8	REQEDIT+29
BULL1^DVBCXFRD	REQEDIT+8
BULL10^DVBCXFRD	PATEDIT+10, PATEDIT+24
BULL11^DVBCXFRD	EN1+10
BULL2^DVBCXFRD	SETVARS+8, SETVARS+10
BULL3^DVBCXFRD	PATEDIT+31
BULL8^DVBCXFRD	EN1+8
BULL9^DVBCXFRD	PATEDIT+4
EN1^DVBCXFRS	EN1+5
$$PRIM^VASITE	EN1+8
^XMB	EN1+13

FileNo	Call Tags
^DPT - [#2]	Classic Fileman Calls, FIND1^DIC, GETS^DIQ
2.3216	VFILE^DILFD
^DVB(396.3 - [#396.3]	Classic Fileman Calls
^DVB(396.4 - [#396.4]	Classic Fileman Calls
^DIC(4 - [#4]	FIND1^DIC

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	EN1+13, PATEDIT+22
^DG(391 - [#391]	ELIG+2
^DIC(21 - [#21]	ELIG+5
^DIC(4 - [#4]	REQ0+3, REQ0+4
^DIC(5 - [#5]	DEM1+1, DEM1+2
^DIC(8 - [#8]	ELIG+3, ELIG+4
^DVB(396.3 - [#396.3]	REQEDIT+16, REQEDIT+17*
^VA(200 - [#200]	EN1+13

Name	Line Occurrences
@(	EN1+6
ADDEDIT	PATEDIT+33
CRTMSE	PATEDIT+42
EXIT	EN1+8, EN1+10, EN1+12
PATEDIT	EN1+12
REQEDIT	EN1+12
SETVARS	REQEDIT+44

Name	Field # of Occurrence
^(0	EN1+13, REQEDIT+16*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ADR1	EXIT+2!, DEM1*, ADDEDIT+2
ADR2	EXIT+2!, DEM1*, ADDEDIT+2
ADR3	EXIT+2!, DEM1*, ADDEDIT+2
BUSPHON	EXIT+2!, DEM1*, ADDEDIT+3
BYEAR	PATEDIT+1~
BYEAR(1	PATEDIT+18*, PATEDIT+19
BYEAR(2	PATEDIT+18*, PATEDIT+19
CFLOC	EXIT+2!, ELIG, REQ0+1, REQ0+3, REQ0+4, PATEDIT+35
CFREQ	EXIT+2!, REQ0+1*, REQEDIT+12
CITY	EXIT+2!, DEM1*, ADDEDIT+2
CLTY	EXIT+2!, RDAT+2*, REQEDIT+31
CNT	EN1+5!, REMK, REQEDIT+16, REQEDIT+17*
CNTA	EN1+5*, EN1+12!
CNTY	EXIT+2!, DEM1, DEM1+2, DEM1+4*, ADDEDIT+3
CNUM	EXIT+2!, ELIG*, PATEDIT+35
CSPT	EXIT+8!
CTR	EXIT+5!, REQEDIT+33, REQEDIT+37
DA	REQEDIT+1!, REQEDIT+8, REQEDIT+22, REQEDIT+28, REQEDIT+30!, REQEDIT+41, REQEDIT+46!, PATEDIT+28!, PATEDIT+30, PATEDIT+31 , PATEDIT+34, ADDEDIT+1*, ADDEDIT+4!, CRTMSE+1~
DA(1	REQEDIT+23, REQEDIT+42, CRTMSE+2*
DD	REQEDIT+1!, REQEDIT+15!, REQEDIT+30!, PATEDIT+28!, SETVARS+9!
DFN	EXIT+2!, REQEDIT+4, REQEDIT+5, PATEDIT+25, PATEDIT+30*, PATEDIT+34, ADDEDIT+1, CRTMSE+2
DGMSGF	EXIT+1!, PATEDIT+32*
DIC	REQEDIT+1!, REQEDIT+5, REQEDIT+15!, REQEDIT+30!, PATEDIT+25!, PATEDIT+28!, PATEDIT+29, SETVARS+4, SETVARS+11!, CRTMSE+1~ , CRTMSE+2
DIC("DR"	REQEDIT+6, PATEDIT+29, SETVARS+6, SETVARS+7, CRTMSE+6*
DIC(0	REQEDIT+5, PATEDIT+29, SETVARS+5, CRTMSE+3
DIE	REQEDIT+10, REQEDIT+15!, REQEDIT+23, REQEDIT+30!, REQEDIT+42, PATEDIT+34, ADDEDIT+1*, ADDEDIT+4!
DIK	REQEDIT+46*!
DLAYGO	REQEDIT+5, REQEDIT+7!, PATEDIT+29, PATEDIT+30!, SETVARS+5, SETVARS+11!, CRTMSE+1~, CRTMSE+3, CRTMSE+7!
DMAS	EXIT+4!, REQ0+2*, REQEDIT+14
DO	REQEDIT+1!, REQEDIT+15!, REQEDIT+30!, PATEDIT+28!, SETVARS+9!, CRTMSE+7!
DOB	EXIT+2!, DEM0*, PATEDIT+14, PATEDIT+18, PATEDIT+29
DOB2	PATEDIT+1~, PATEDIT+22*, PATEDIT+23
DR	REQEDIT+1!, REQEDIT+11, REQEDIT+12, REQEDIT+13, REQEDIT+14, REQEDIT+24, REQEDIT+25, REQEDIT+26, REQEDIT+43, PATEDIT+28! , ADDEDIT+2, ADDEDIT+3
DR(1	PATEDIT+35, PATEDIT+36, PATEDIT+37*
DT	EN1+13, REQEDIT+13, REQEDIT+16, SETVARS+6
DTOUT	CRTMSE+1~
DUOUT	CRTMSE+1~
DUZ	EN1+13, REQEDIT+25
DVBADMNM	EXIT+1!, REQEDIT+18*, SETVARS+3
DVBCARAY	PATEDIT+1~
DVBCARAY(2	PATEDIT+10, PATEDIT+12, PATEDIT+14, PATEDIT+16, PATEDIT+18, PATEDIT+22, PATEDIT+23
DVBCDIV	EN1+8*, EXIT+3!, REQEDIT+12
DVBCERR	PATEDIT+1~, PATEDIT+7!
DVBCERR(1	PATEDIT+12, PATEDIT+21
DVBCERR(2	PATEDIT+12, PATEDIT+23
DVBCI	EN1+6*, EXIT+3!
DVBCIENS	PATEDIT+1~, PATEDIT+7*, PATEDIT+8, PATEDIT+10, PATEDIT+12, PATEDIT+14, PATEDIT+16, PATEDIT+18, PATEDIT+22, PATEDIT+23
DVBCNEW	EN1+13, PATEDIT+2!, PATEDIT+28*
DVBCPT	PATEDIT+1~, PATEDIT+2*, PATEDIT+4, PATEDIT+6, PATEDIT+7, PATEDIT+25, PATEDIT+27
DVBDTYPE	EXIT+1!, ELIG+1*, CRTMSE+6
>> DVBINF	RDAT+4*, REQEDIT+14
DVBNULL	EXIT+4!
DVBSBRCH	EXIT+1!, ELIG+1*, CRTMSE+6
DVP	EXIT+8!
DVRRIEN	EN1+4~, EXIT+9!, REQEDIT+4, PATEDIT+25, PATEDIT+30
ECF	EXIT+3!, RDAT+2*, REQEDIT+12
ELIGCOD	EXIT+3!, ELIG, ELIG+3, ELIG+4*, PATEDIT+35
ELIGSDT	EXIT+3!, ELIG*, PATEDIT+36
ELIGST	EXIT+3!, ELIG*, PATEDIT+36
>> ERR	REQEDIT+33, REQEDIT+37
EXAMS	EXIT+3!, EXAM*, REQEDIT+44
EXM	EXIT+3!, REQEDIT+44*, SETVARS+6
EXMRS	EXIT+1!, SETVARS+2*, SETVARS+7
>> FDA(	REQEDIT+31, REQEDIT+35
>> FIND	REQEDIT+33, REQEDIT+37
HOMPHON	EXIT+3!, DEM1*, ADDEDIT+3
I	EXIT+3!, REQEDIT+44*, SETVARS+2
II	EXIT+3!, SPEC*
INUM	EXIT+5!, RDAT+4*, REQEDIT+26
LREXMDT	EXIT+3!, REQ0+1, REQ0+2, REQEDIT+12
NAME1	PATEDIT+1~
NAME1(1	PATEDIT+15*, PATEDIT+17
NAME1(2	PATEDIT+15*, PATEDIT+17
NAME2	PATEDIT+1~
NAME2(1	PATEDIT+16*, PATEDIT+17
NAME2(2	PATEDIT+16*, PATEDIT+17
OLREQDA	EXIT+4!, REQ0*, REQEDIT+6
OREQDA	EXIT+4!, RDAT*, REQEDIT+24
OTHDIS	EXIT+4!, ODIS*, REQEDIT+11
OTHDIS1	EXIT+4!, ODIS*, REQEDIT+11
OTHDIS2	EXIT+4!, ODIS*, REQEDIT+11
OUT	EN1+5!, EN1+10, EN1+12, REQEDIT+8, REQEDIT+44, REQEDIT+46, PATEDIT+4, PATEDIT+10, PATEDIT+12, PATEDIT+14 , PATEDIT+17, PATEDIT+19, PATEDIT+20, PATEDIT+31, SETVARS+8, SETVARS+10
PDSRV	EXIT+4!, ELIG, ELIG+5, PATEDIT+35
PIEN	EXIT+5!, RDAT*, REQEDIT+24
PNAM	EN1+13, EXIT+5!, DEM0*, PATEDIT+14, PATEDIT+15, PATEDIT+29
POBC	EXIT+8!
POBS	EXIT+8!
POWSTAT	EXIT+5!, ELIG*, PATEDIT+36
PREF	EXIT+8!
PRIO	EXIT+5!, REQ0+1*, REQEDIT+6
RD	EXIT+5!, RDAT+1*, REQEDIT+24
RD1	EXIT+9!, RDES+1*, REQEDIT+39, REQEDIT+43
RDAT	EN1+4~, EXIT+9!, RDAT+5*, REQEDIT+13, REQEDIT+14, REQEDIT+20
RDIV	EXIT+5!
REASONS	EXIT+1!, EXIT+4!, EXAM*, SETVARS+1, SETVARS+2, SETVARS+7
REMK	EXIT+4!
REMK(	REMK*, REQEDIT+17
REQDA	EXIT+5!, REQEDIT+8*, REQEDIT+16, REQEDIT+17, REQEDIT+21, REQEDIT+23, REQEDIT+29, REQEDIT+31, REQEDIT+35, REQEDIT+40 , REQEDIT+42, REQEDIT+46, SETVARS+6
REQDT	EXIT+5!
RIEN	EXIT+4!
RO	EN1+10, EXIT+5!, REQ0, REQEDIT+6
RONAM	EN1+10, EXIT+5!, REQ0*
RQDT	EXIT+5!, REQ0+2*, REQEDIT+14
RR	EXIT+5!, RDAT+1*, REQEDIT+24
RRDIV	EXIT+5!
RRDT	EXIT+5!, RDAT+2*, REQEDIT+21, REQEDIT+29, REQEDIT+40
RRF	EXIT+4!, RDAT*, REQEDIT+24
RRFD	EXIT+6!, RDAT+3*, REQEDIT+25
RRFIEN	EXIT+5!, RDAT+3*, REQEDIT+26
RRFSTN	EXIT+5!, RDAT+3*, REQEDIT+26
RRIEN	EXIT+6!, REQEDIT+28*, REQEDIT+29
RRIF	EXIT+4!, REQEDIT+21, REQEDIT+22, REQEDIT+40, REQEDIT+41
RRR	EXIT+6!, REQEDIT+28*, REQEDIT+29
RRST	EXIT+6!, REQEDIT+28*, REQEDIT+29
RRT	EXIT+5!, RDAT+1*, REQEDIT+25
RRUP	EXIT+7!
RRXM	EXIT+6!
>> RTRN(	REQEDIT+33, REQEDIT+37
SEX	EXIT+6!, DEM0*, PATEDIT+29
SITE	EXIT+6!, USER*
SITE1	EXIT+6!, USER*, REQEDIT+13, REQEDIT+18
SPEC	EXIT+6!
SPEC(	SPEC*
SPEC(1	REQEDIT+35
SRVCON	EXIT+6!, ELIG*, PATEDIT+35
SRVEDT	EXIT+6!, ELIG*, PATEDIT+35, PATEDIT+42, CRTMSE+4
SRVPCT	EXIT+7!, ELIG*, PATEDIT+35
SRVSDT	EXIT+6!, ELIG*, PATEDIT+35, CRTMSE+6
SSN	EN1+13, EXIT+7!, DEM0*, PATEDIT+2, PATEDIT+12, PATEDIT+29
STATE	EXIT+7!, DEM1, DEM1+1, DEM1+2, DEM1+3*, ADDEDIT+2
STN	EXIT+5!, RDAT+4*, REQEDIT+26
SUB	EN1+6*, EXIT+8!
TYPE	EXIT+1!, ELIG+1*, ELIG+2
TYPEPTR	EXIT+8!, ELIG+1, ELIG+2, PATEDIT+37
U	EN1+13, DEM0, USER, DEM1, ELIG, ELIG+1, REQ0, REQ0+1, REQ0+2, ODIS , REQEDIT+17, REQEDIT+44, SETVARS+2
USER	EXIT+8!, USER*
USERNM	EXIT+7!
VETST	EXIT+7!, ELIG*, PATEDIT+36
X	EXIT+7!, REQEDIT+1!, REQEDIT+5, REQEDIT+17, REQEDIT+18, PATEDIT+1~, PATEDIT+15, PATEDIT+16, PATEDIT+25!, PATEDIT+28! , PATEDIT+29, SETVARS+8, SETVARS+11!, CRTMSE+1~, CRTMSE+4
XEXAMS	EXIT+7!
XLN	EN1+6*, EN1+12!, DEM0, USER, DEM1, ELIG, ELIG+1, REQ0, REQ0+1, REQ0+2 , ODIS, EXAM, REMK, RDAT, RDAT+1, RDAT+2, RDAT+3, RDAT+4, RDES+1, SPEC
XMB	EN1+5~, EN1+13*
XMB(1	EN1+13*
XMB(2	EN1+13*
XMB(3	EN1+13*
XMB(4	EN1+13*
XMCNT	EXIT+7!
XMER	EN1+6, EXIT+8!
XMORPV	EXIT+1!, SETVARS+3*, SETVARS+7
XMREC	EN1+5, EN1+6, EXIT+8!
XMRG	EN1+5, EN1+6, EN1+12, EXIT+8!
XMVAR	EXIT+7!
Y	EN1+13, REQEDIT+1!, REQEDIT+8, REQEDIT+17, PATEDIT+1~, PATEDIT+22*, PATEDIT+25!, PATEDIT+28!, PATEDIT+30, SETVARS+10 , SETVARS+11!, CRTMSE+1~
ZI	EXIT+8!, REQEDIT+17*
ZIP	EXIT+7!, DEM1*, ADDEDIT+3
ZIP4	EXIT+7!, DEM1*, ADDEDIT+3

Customize PDF page

Package: Automated Medical Information Exchange

Routine: DVBCXFRC

Information

Source Information

Call Graph

Call Graph Total: 13

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
EN1	;N XMB,RDAT,RSTS,CM,SP,UP K OUT,CNT
EXIT
DEM0
USER
DEM1
ELIG
REQ0
ODIS
EXAM
REMK
RDAT
RDES
SPEC
REQEDIT	; ** Add entry to file #396.3 (request)
PATEDIT	; ** Lookup and/or Add entry to file #2 (patient)
SETVARS	; Add entry to file #396.4 (exam)
ADDEDIT	; Add Patient address
CRTMSE	;create LAST MSE entry for patient in sub-file 2.3216