Routine: BZXBPNA

Package	Total	Call Graph
Kernel	3	(,HOME)^%ZIS ^%ZISC ^%ZTLOAD
VA Fileman	3	NOW^%DTC $$GET1^DIQ ^DIR
IHS VA Utilities	1	^XBKVAR
Phoenix	1	QUE^BZXBPNA

Package	Total	Caller Graph
Phoenix	1	BZXBPNA

Entry Points

Name	Comments	DBIA/ICR reference
QUE(ZTRTN,ZTSAVE,ZTDESC)	;
QUIT	;
BADADR	;EP
DQ1	;----- QUEUED JOB STARTS HERE
CUTOFF(BZXDT,BZXOUT)	;
CHKNAM(NAM)	;CHECK NAME FORMAT
NOW()	;
PRINTA(BZXDT)	;
ONE(DFN)	;
HDR(BZXPAGE,BZXOUT,BZXTITLE)	;
BADPTNAM	;Find bad names
AD1CHK(X)	;

External References

Name	Field # of Occurrence
NOW^%DTC	NOW+4
^%ZIS	QUE+5
HOME^%ZIS	BADADR+5
^%ZISC	DQ1+19, QUIT+3
^%ZTLOAD	QUE+10
QUE^BZXBPNA	PRINTA+9
$$GET1^DIQ	ONE+10, ONE+21
^DIR	HDR+6, CUTOFF+7
^XBKVAR	BADADR+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"PATIENT NAME",?25,"MEDICAID NAME",?50,"MEDICARE NAME" Line Location: BADPTNAM+1
Function Call: WRITE	Prompt: !,NAME Line Location: BADPTNAM+13
Function Call: WRITE	Prompt: !,NAME Line Location: BADPTNAM+18
Function Call: WRITE	Prompt: !,NAME Line Location: BADPTNAM+24
Function Call: WRITE	Prompt: !,"THIS REPORT PRINTS A LISTING OF BAD ADDRESSES IN THE VA PATIENT FILE" Line Location: BADADR+7
Function Call: WRITE	Prompt: ! Line Location: BADADR+8
Function Call: WRITE	Prompt: !,"DFN #"_DFN_" IS MISSING A ZERO NODE" Line Location: ONE+6
Function Call: WRITE	Prompt: !,"("_DFN_")" Line Location: ONE+27
Function Call: WRITE	Prompt: ?12,BZXNAME,?37,BZXSSN Line Location: ONE+28
Function Call: WRITE	Prompt: !,BZXADDR Line Location: ONE+29
Function Call: WRITE	Prompt: !,BZXADDR2 Line Location: ONE+30
Function Call: WRITE	Prompt: !,BZXADDR3 Line Location: ONE+31
Function Call: WRITE	Prompt: !,BZXCITY_", "_BZXSTATE_" "_BZXZIP Line Location: ONE+32
Function Call: WRITE	Prompt: ! Line Location: ONE+33
Function Call: WRITE	Prompt: @IOF Line Location: HDR+10
Function Call: WRITE	Prompt: !,BZXTITLE Line Location: HDR+11
Function Call: WRITE	Prompt: ?49,$$NOW Line Location: HDR+12
Function Call: WRITE	Prompt: " PAGE ",BZXPAGE Line Location: HDR+13
Function Call: WRITE	Prompt: ! Line Location: HDR+14
Function Call: WRITE	Prompt: "-" Line Location: HDR+15
Function Call: WRITE	Prompt: !! Line Location: HDR+16
Function Call: WRITE	Prompt: !,"Task #",$G(ZTSK)," queued" Line Location: QUE+11
Routine Call	%ZIS Line Location: BADADR+5
Routine Call	DIR Line Location: HDR+6 CUTOFF+7
Routine Call	%ZIS Line Location: QUE+5

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DPT - [#2]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNMCD - [#9000004]	BADPTNAM+16
^AUPNMCD("B"	BADPTNAM+15
^AUPNMCR - [#9000003]	BADPTNAM+21, BADPTNAM+22
^AUPNVSIT - [#9000010]	BADPTNAM+8, DQ1+13
^AUPNVSIT("AC"	BADPTNAM+7, DQ1+12
^DD("DD"	NOW+6
^DPT - [#2]	BADPTNAM+3, BADPTNAM+4, BADPTNAM+11, DQ1+9, ONE+5, ONE+13, ONE+16

Label References

Name	Line Occurrences
$$AD1CHK	ONE+12
$$CHKNAM	BADPTNAM+12, BADPTNAM+17, BADPTNAM+23
$$NOW	HDR+12
@(	QUE+12
CUTOFF	BADADR+11
HDR	DQ1+5, DQ1+15
ONE	DQ1+17
PRINTA	BADADR+14
QUIT	BADADR+16

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	NOW+3~, NOW+7
%H	NOW+3~
%I	NOW+3~
%ZIS	QUE+3~, QUE+4*
BZXADDR	ONE+3~, ONE+10, ONE+11, ONE+12, ONE+29
BZXADDR2	ONE+3~, ONE+17*, ONE+30
BZXADDR3	ONE+3~, ONE+18*, ONE+31
BZXCITY	ONE+3~, ONE+19, ONE+20, ONE+32
BZXDATA	ONE+3~, ONE+13, ONE+14, ONE+15, ONE+16, ONE+17, ONE+18, ONE+19, ONE+23
BZXDONE	BADPTNAM+5, BADPTNAM+7, BADPTNAM+27, DQ1+2~, DQ1+10, DQ1+12, DQ1+14
BZXDT	BADADR+3~, BADADR+11, BADADR+14, PRINTA~, DQ1+13, CUTOFF~, CUTOFF+9*
BZXGOOD	BADPTNAM+12, BADPTNAM+13, ONE+3~, ONE+8, ONE+11, ONE+12, ONE+20, ONE+22, ONE+24*, ONE+25
BZXNAME	ONE+3~, ONE+14*, ONE+28
BZXOUT	BADADR+3~, BADADR+10, BADADR+11, BADADR+12, DQ1+2~, DQ1+4, DQ1+5, DQ1+6, DQ1+9, DQ1+12 , DQ1+15, DQ1+16, HDR~, HDR+7, HDR+8, CUTOFF~, CUTOFF+8
BZXPAGE	DQ1+2~, DQ1+4, DQ1+5, DQ1+15, HDR~, HDR+4, HDR+9, HDR+13
BZXSSN	ONE+3~, ONE+15*, ONE+28
BZXSTATE	ONE+3~, ONE+21, ONE+22, ONE+32
BZXTITLE	PRINTA+2~, PRINTA+4*, PRINTA+6, DQ1+5, DQ1+15, HDR~, HDR+11
BZXVIEN	DQ1+2~, DQ1+11, DQ1+12, DQ1+13
BZXZIP	ONE+3~, ONE+23, ONE+24, ONE+32
DFN	BADPTNAM+2, BADPTNAM+3, BADPTNAM+4, BADPTNAM+7, BADPTNAM+11, BADPTNAM+15, BADPTNAM+21, BADPTNAM+22, DQ1+2~, DQ1+8* , DQ1+9*, DQ1+12, DQ1+17, ONE~, ONE+5, ONE+6, ONE+9, ONE+13, ONE+16, ONE+27
DIR	BADADR+3~, HDR+2~, CUTOFF+3~
DIR("?"	CUTOFF+6*
DIR("A"	CUTOFF+5*
DIR(0	HDR+5, CUTOFF+4
DIRUT	HDR+2~, CUTOFF+3~
DT	NOW+5
DTOUT	HDR+2~, CUTOFF+3~
DUOUT	HDR+2~, CUTOFF+3~
>> FLG	BADPTNAM+9, BADPTNAM+13, BADPTNAM+18, BADPTNAM+24
I	HDR+2~, HDR+15*
IENS	ONE+3~, ONE+9*, ONE+10, ONE+21
IO	QUE+3~
IO("Q"	QUE+7, QUE+8!
IOF	HDR+10
IOM	HDR+15, QUE+9
ION	QUE+9
IOSL	DQ1+15, QUE+9
IOST	HDR+4, QUE+9
>> MCAIDIEN	BADPTNAM+14, BADPTNAM+15, BADPTNAM+16
MCAIDNAM	BADPTNAM+10!, BADPTNAM+16, BADPTNAM+17, BADPTNAM+19, BADPTNAM+20
MCARNAM	BADPTNAM+10!, BADPTNAM+22, BADPTNAM+23, BADPTNAM+25, BADPTNAM+26
NAM	CHKNAM~, CHKNAM+1, CHKNAM+2
NAME	BADPTNAM+10!, BADPTNAM+11*, BADPTNAM+12, BADPTNAM+13, BADPTNAM+18, BADPTNAM+24
POP	QUE+3~, QUE+6
U	BADPTNAM+11, BADPTNAM+16, BADPTNAM+22, ONE+14, ONE+15, ONE+17, ONE+18, ONE+19, ONE+23
>> VIEN	BADPTNAM+6, BADPTNAM+7, BADPTNAM+8
X	BADADR+3~, HDR+2~, CUTOFF+3~, NOW+3~, AD1CHK~, AD1CHK+3, AD1CHK+4
Y	BADADR+3~, HDR+2~, HDR+7, CUTOFF+3~, CUTOFF+8, CUTOFF+9, NOW+3~, NOW+5*, NOW+7
ZTDESC	PRINTA+2~, PRINTA+6*, PRINTA+9, QUE~
ZTIO	QUE+3~, QUE+9*
ZTRTN	PRINTA+2~, PRINTA+5*, PRINTA+9, QUE~, QUE+12
ZTSAVE	PRINTA+2~, PRINTA+9, QUE~
ZTSAVE("BZXDT"	PRINTA+8*
ZTSAVE("BZXTITLE"	PRINTA+7*
ZTSK	QUE+3~, QUE+11

Customize PDF page

Package: Phoenix

Routine: BZXBPNA

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: