Routine: VAFCPDAT

Package	Total	Call Graph
VA Fileman	5	NOW^%DTC ^DIC $$GET1^DIQ EN^DIQ1 ^DIR
Registration	3	(NOTICE,PTSEC)^DGSEC4 CMORHIS^VAFCPDT2 $$SITE^VASITE
Kernel	2	$$FMTE^XLFDT EN^XUTMDEVQ
Uncategorized	1	$$MPINODE^MPIFAPI

Package	Total	Caller Graph
Registration	3	VAFCEHLM VAFCMGA1 VAFCPDT2

Entry Points

Name	Comments	DBIA/ICR reference
QUIT	;
HIS	;find ICN history
CONT	;Continue to VAFCPDT2 for CMOR data and extended data
SUB	;removed listing of subscribers for RG1.023
SS
ICNHDR
START	;Entry point without device call, used for RPC calls	ICR #3299 Status: Active Usage: Private
DONE	;
TFHDR	;
TF	;List Treating Facilities for this patient
MAIN	; Entry point with device call	ICR #3299 Status: Active Usage: Private

External References

Name	Field # of Occurrence
NOW^%DTC	START+2
NOTICE^DGSEC4	START+39, START+40
PTSEC^DGSEC4	START+33
^DIC	TF+19
$$GET1^DIQ	START+25
EN^DIQ1	START+10, TF+6, TF+11, HIS+10
^DIR	START+62, SS
$$MPINODE^MPIFAPI	START+22
CMORHIS^VAFCPDT2	CONT+1
$$SITE^VASITE	START+3
$$FMTE^XLFDT	START+2, START+12, TF+16
EN^XUTMDEVQ	MAIN+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF,!," " Line Location: START+5
Function Call: WRITE	Prompt: @IOF,! Line Location: START+29
Function Call: WRITE	Prompt: !,"MPI/PD Data for: ",NAME," (DFN #",DFN,")" Line Location: START+30
Function Call: WRITE	Prompt: !!,"Access denied: Required parameters not defined" Line Location: START+34
Function Call: WRITE	Prompt: ?50,"*PATIENT MARKED SENSITIVE*" Line Location: START+35
Function Call: WRITE	Prompt: !!,"Access not allowed on your own PATIENT (#2) file entry" Line Location: START+36
Function Call: WRITE	Prompt: !!,"Access denied: Your SSN is not defined" Line Location: START+37
Function Call: WRITE	Prompt: !,"Printed ",HDT," at ",SITENAM,!,LN Line Location: START+41
Function Call: WRITE	Prompt: !,"ICN : ",ICN,?40,"CMOR: ",CMOR Line Location: START+44
Function Call: WRITE	Prompt: !,"SSN : ",SSN Line Location: START+45
Function Call: WRITE	Prompt: !?9,"SSN Verification Status: ",SSNVER Line Location: START+46
Function Call: WRITE	Prompt: !?9,"Pseudo SSN Reason: ",PREAS Line Location: START+47
Function Call: WRITE	Prompt: !?9,"Pseudo SSN Reason : ",PREAS Line Location: START+48
Function Call: WRITE	Prompt: !,"Sex : ",SEX Line Location: START+49
Function Call: WRITE	Prompt: !,"Claim #: ",CLAIM Line Location: START+50
Function Call: WRITE	Prompt: !,"Date of Birth: ",DOB Line Location: START+51
Function Call: WRITE	Prompt: !,"Date of Death: ",DOD Line Location: START+52
Function Call: WRITE	Prompt: !,"Multiple Birth Indicator: ",MBI Line Location: START+53
Function Call: WRITE	Prompt: " (Bad Address Indicator: ",BAI,")" Line Location: START+54
Function Call: WRITE	Prompt: !?9,STR1 Line Location: START+55
Function Call: WRITE	Prompt: !?9,STR2 Line Location: START+56
Function Call: WRITE	Prompt: !?9,STR3 Line Location: START+57
Function Call: WRITE	Prompt: !?9,$E(CTY,1,20)_", "_$G(ST)_" "_$G(ZIP) Line Location: START+58
Function Call: WRITE	Prompt: !,"Phone #: ",PHN Line Location: START+59
Function Call: WRITE	Prompt: ! Line Location: START+63
Function Call: WRITE	Prompt: !,"No Treating Facilities found." Line Location: TF+22
Function Call: WRITE	Prompt: " - changed ",HISDT Line Location: HIS+16
Function Call: WRITE	Prompt: !!,"Treating Facilities:",?22,"Station:",?32,"DT Last Treated",?54,"Event Reason" Line Location: TFHDR+1
Function Call: WRITE	Prompt: !,"--------------------",?22,"--------",?32,"---------------",?54,"------------" Line Location: TFHDR+2
Function Call: WRITE	Prompt: !!,"ICN History:",!,"------------" Line Location: ICNHDR+0
Function Call: WRITE	Prompt: ! Line Location: SS+1
Routine Call	DIC Line Location: TF+19
Routine Call	DIR Line Location: START+62 SS

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^VAT(391.72 - [#391.72]	Classic Fileman Calls
^DGCN(391.91 - [#391.91]	Classic Fileman Calls
^DIC(4 - [#4]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DGCN(391.91 - [#391.91]	TF+3, TF+4
^DPT - [#2]	HIS+1, HIS+7
^DPT("AICNL"	START+27

Label References

Name	Line Occurrences
CONT	HIS+1
ICNHDR	HIS+6, HIS+15
QUIT	START+34, START+36, START+37, START+65, TF+23, HIS+3, HIS+7, DONE+1
SS	TF+29, HIS+4, HIS+14, DONE+2
SUB	TF+22
TFHDR	TF+1, TF+30

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	START+2, QUIT+1!
BAI	START+9~, START+16*, START+54
CHG	QUIT+3!
CHGNODE	QUIT+3!
CLAIM	START+9~, START+15*, START+50
CMOR	START+23, START+25, START+44, QUIT+1!
CTY	START+9~, START+18*, START+58
D	QUIT+3!
DA	START+8, START+10!, START+32~, TF+5, TF+6!, TF+10, TF+11!, HIS+8, HIS+10!
DA(	HIS+8*
>> DFN	START+4, START+8, START+11, START+12, START+13, START+14, START+15, START+16, START+17, START+18 , START+19, START+20, START+21, START+22, START+27, START+30, START+33, START+39, START+40, TF+3 , TF+4, TF+30, HIS+1, HIS+5, HIS+7, HIS+8, HIS+15
DIC	START+8, START+10!, START+32~, TF+5, TF+6!, TF+10, TF+11!, TF+19!, HIS+8*, HIS+10! , QUIT+1!
DIC(0	TF+19*
DIFF	START+23*, QUIT+4!
DIQ	START+8, START+10!, START+32~, TF+5, TF+6!, TF+10, TF+11!, HIS+9, HIS+10!
DIQ(0	START+8, TF+5, TF+10, HIS+9
DIR	START+62!, QUIT+1!, SS!
DIR(0	START+62, SS
DIRUT	QUIT+1!
DNODE	QUIT+1!
DNODE(2	START+11, START+12, START+13, START+14, START+15, START+16, START+17, START+18, START+19, START+20 , START+21
DOB	START+9~, START+12*, START+51
DOD	START+9~, START+14*, START+52
DR	START+8, START+10!, START+32~, TF+5, TF+6!, TF+10, TF+11!, HIS+8, HIS+10!
DR(	HIS+8*
GOT	START+26*, QUIT+1!
HDT	START+2*, START+7, START+41, QUIT+1!
HIS	HIS+7*, HIS+8, HIS+11, HIS+12, QUIT+1!
HISDT	HIS+12*, HIS+16, QUIT+1!
HISICN	HIS+11*, HIS+16, QUIT+1!
HISNODE	QUIT+4!
HISNODE(	HIS+11, HIS+12
ICN	START+6, START+9~, START+23, START+24, START+26, START+27*, START+44
INST	TF+7, TF+8, TF+9, TF+10, TF+12, QUIT+4!
IOF	START+5, START+29, TF+30, HIS+5, HIS+15
IOSL	START+60, TF+28, HIS+3, HIS+13
IOST	START+60, TF+28, HIS+3, HIS+13, DONE+2
JJ	START+63, QUIT+1!, SS+1
LIEN	QUIT+1!
LINST	QUIT+1!
LN	START+1*, START+7, START+41, QUIT+2!
LN2	START+1*, TF+30, HIS+5, HIS+15, QUIT+4!
LNQ	TF+29, HIS+4, HIS+14, DONE+2, QUIT+4!, SS+1
LSTDT	TF+14, TF+16, TF+21, TF+27*, TF+31, QUIT+2!
LSTSORT	TF+15, TF+16, TF+21, TF+23*, TF+24, TF+25, TF+26, TF+27, QUIT+4!
MBI	START+9~, START+13*, START+53, QUIT+4!
MNODE	START+22*, START+24, START+25, START+27, QUIT+2!
NAME	START+9~, START+11*, START+30, TF+30, HIS+5, HIS+15, QUIT+4!
NOTRPC	MAIN+1*, MAIN+4!, START+5, START+29
PHN	START+9~, START+19*, START+59
PREAS	START+9~, START+21*, START+47, START+48
QFLG	START+1, START+62, START+65, TF+23, TF+24, TF+28, TF+29, HIS+3, HIS+4, HIS+7 , HIS+13, HIS+14, DONE+1, QUIT+4!, SS*
REACODE	TF+17*, TF+18, TF+19, QUIT+2!
REASON	TF+17, TF+20, TF+21, TF+25*, TF+31, QUIT+2!
RESULT	START+32~, START+33
RESULT(1	START+34, START+35, START+36, START+37, START+38, START+39, START+40
RGDFN	QUIT+4!
RGSENS	START+32~
SCN	START+23*, QUIT+2!
SCORE	START+23*, QUIT+2!
SCRDT	START+23*, QUIT+4!
SENSTV	START+32~
SEX	START+9~, START+14*, START+49
SITE	START+3*, QUIT+2!
SITEIEN	START+3*, QUIT+2!
SITENAM	START+3*, START+6, START+41, QUIT+2!
SITENUM	START+3*, START+26, QUIT+2!
SS	START+63, QUIT+3!, SS+1
SSN	START+9~, START+11*, START+45
SSNVER	START+9~, START+20*, START+46, START+47, START+48
ST	START+9~, START+18*, START+58
STA	QUIT+4!
STA(4	TF+12
STATION	TF+7, TF+12, TF+21, TF+26*, TF+31, QUIT+4!
STR1	START+9~, START+17*, START+55
STR2	START+9~, START+17*, START+56
STR3	START+9~, START+17*, START+57
SUBARR	QUIT+3!
SUBN	QUIT+3!
TERM	QUIT+3!
TERMDT	QUIT+3!
TF	TF+3*, TF+4, QUIT+3!
TFARR	TF+2!, TF+22, QUIT+3!
TFARR(	TF+21*, TF+23, TF+24, TF+25, TF+26, TF+27
TFDATA	QUIT+3!
TFDATA(	TF+8, TF+13, TF+14, TF+17
TFIEN	TF+4*, TF+5, TF+8, TF+13, TF+14, TF+17, TF+21, QUIT+3!
TFNM	TF+13, TF+21, TF+24, TF+25, TF+26, TF+27, TF+31, QUIT+3!
VAFCSEN	START+32~, START+39, START+40
X	TF+19*!
Y	START+62, QUIT+3!, SS
Y(0	TF+20
ZIP	START+9~, START+18*, START+58
ZTSAVE	MAIN+2!, MAIN+3
ZTSAVE("DFN"	MAIN+2*

Customize PDF page

Package: Registration

Routine: VAFCPDAT

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: