Routine: AZAXCAD

Information

AZAXCAD ;IHS/PHXAO/AEF - CAD/STATIN STUDY DATA EXTRACT

Call Graph

Call Graph Total: 6

Package	Total	Call Graph
Kernel	2	HOME^%ZIS ^%ZISC
VA Fileman	2	WAIT^DICD ^DIR
IHS VA Utilities	1	^XBKVAR
Local Area Programs	1	($$AGE,$$DRUG,$$FNAME,$$FORMAT,$$ICD,$$LOC,$$LOCN,$$LOCP,$$LOCR,$$LOCVM,$$NDC,$$PATH,$$PICD,$$SCAT,$$SCATP,$$SCATR,$$SCATV,$$SCATVM,$$SEX,$$SITE,$$SLDATE,$$UID,$$VISDT,HFS)^AZAXCADU

Entry Points

Name	Comments	DBIA/ICR reference
DL	;----- DATE LOOP
POV(AZAXVSD0,AZAXDFN,AZAXI)	;
INITIAL(AZAXRXD0,AZAXPDTS)	;
REFILLS(AZAXD0,AZAXPDTS)	;
FILE	;
LOOP2(AZAXPDTS,AZAXD)	;
D	;----- DRUGS BEING SEARCHED:
LOOP1(AZAXDTS,AZAXI,AZAXP)	;
PARTIAL(AZAXD0,AZAXPDTS)	;
TXT	;----- PRINT OPTION TEXT
EN	;----- MAIN ENTRY POINT
SET2C(AZAXD0,AZAXD1)	;
P	;----- ICD PROCEDURE CODES BEING SEARCHED:
I	;----- ICD DIAGNOSIS CODES BEING SEARCHED:
BLD(AZAXI,AZAXP,AZAXD)	;
SET2A(AZAXD0)	;
DATES(AZAXTXT,AZAXY)	;
LOOP3(AZAXPDTS,AZAXD)	;
PROC(AZAXVSD0,AZAXDFN,AZAXP)	;
DESC	;----- PROGRAM DESCRIPTION
PUT(AZAXTYPE)	;
SET3(AZAXVMD0)	;
SET2B(AZAXD0,AZAXD1)	;
SET1(AZAXVSD0,AZAXDFN,AZAXICNA)	;

External References

Name	Field # of Occurrence
HOME^%ZIS	EN+5
^%ZISC	PUT+33
$$AGE^AZAXCADU	SET1+24
$$DRUG^AZAXCADU	INITIAL+12, SET2A+13, SET2B+14, SET2C+14, LOOP3+20, SET3+14
$$FNAME^AZAXCADU	PUT+8
$$FORMAT^AZAXCADU	PUT+28
$$ICD^AZAXCADU	LOOP1+19, POV+13
$$LOC^AZAXCADU	SET1+19
$$LOCN^AZAXCADU	SET1+26, SET2A+17, SET2B+16, SET3+20
$$LOCP^AZAXCADU	SET2A+17
$$LOCR^AZAXCADU	SET2B+16
$$LOCVM^AZAXCADU	SET3+20
$$NDC^AZAXCADU	SET3+17
$$PATH^AZAXCADU	PUT+11
$$PICD^AZAXCADU	PROC+13
$$SCAT^AZAXCADU	SET1+28
$$SCATP^AZAXCADU	SET2A+18
$$SCATR^AZAXCADU	SET2B+17
$$SCATV^AZAXCADU	SET1+28
$$SCATVM^AZAXCADU	SET3+21
$$SEX^AZAXCADU	SET1+23
$$SITE^AZAXCADU	SET1+34, SET1+35, LOOP2+20, LOOP2+25, SET2A+30, SET2A+31, SET2B+31, SET2B+32, SET2C+29, SET2C+30 , LOOP3+23, SET3+27, SET3+28, PUT+5, PUT+11
$$SLDATE^AZAXCADU	SET1+27, SET2A+23, SET2B+22, SET2C+20, SET3+15
$$UID^AZAXCADU	SET1+22, SET2A+12, SET2B+13, SET2C+13, SET3+13
$$VISDT^AZAXCADU	SET1+17, SET3+10
HFS^AZAXCADU	PUT+14
WAIT^DICD	EN+19
^DIR	DL+9, DL+14
^XBKVAR	EN+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"NO "_AZAXTYPE_" DATA FOUND!" Line Location: PUT+6
Function Call: WRITE	Prompt: X Line Location: PUT+30
Function Call: WRITE	Prompt: ! Line Location: PUT+31
Function Call: WRITE	Prompt: !?5,"FILE "_AZAXFILE_" HAS BEEN CREATED" Line Location: PUT+35
Function Call: WRITE	Prompt: ! Line Location: DL+4
Function Call: WRITE	Prompt: *7,!?5,"ENDING DATE cannot be less than BEGINNING DATE" Line Location: DL+19
Function Call: WRITE	Prompt: !,X Line Location: TXT+3
Routine Call	%ZIS Line Location: EN+5
Routine Call	DIR Line Location: DL+9 DL+14

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVMED - [#9000010.14]	LOOP3+18, SET3+8
^AUPNVMED("AD"	LOOP3+17
^AUPNVPOV - [#9000010.07]	POV+12
^AUPNVPOV("AD"	POV+11
^AUPNVPRC - [#9000010.08]	PROC+12
^AUPNVPRC("AD"	PROC+11
^AUPNVSIT - [#9000010]	LOOP1+17, LOOP1+18
^AUPNVSIT("B"	LOOP1+14, LOOP1+16, LOOP3+13, LOOP3+15
^PS(55 - [#55]	LOOP2+22, LOOP2+23
^PSRX - [#52]	INITIAL+5, INITIAL+9, REFILLS+8, REFILLS+9, PARTIAL+8, PARTIAL+9, SET2A+8, SET2A+20, SET2B+9, SET2B+19 , SET2C+9, SET2C+17
^TMP("AZAX"	EN+7!, EN+31!, SET1+34, SET1+35, LOOP2+17, LOOP2+20, LOOP2+25, SET2A+30, SET2A+31, SET2B+31* , SET2B+32, SET2C+29, SET2C+30, LOOP3+23, SET3+27, SET3+28*, PUT+5, PUT+20, PUT+22, PUT+24 , PUT+26, PUT+27

Label References

Name	Line Occurrences
BLD	EN+21
DATES	EN+11, EN+15
DL	DL+18
FILE	EN+29
INITIAL	LOOP2+26
LOOP1	EN+23
LOOP2	EN+25
LOOP3	EN+27
PARTIAL	LOOP2+28
POV	LOOP1+21
PROC	LOOP1+22
PUT	FILE+5
REFILLS	LOOP2+27
SET1	LOOP1+20, POV+16, PROC+16
SET2A	INITIAL+16
SET2B	REFILLS+12
SET2C	PARTIAL+12
SET3	LOOP3+24
TXT	EN+9

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%FILE	PUT+3~, PUT+14, PUT+17
AZAXBEG	LOOP1+8~, LOOP1+10, LOOP1+12, LOOP3+7~, LOOP3+9, LOOP3+11, DL+2~, DL+12*, DL+18, DL+20
AZAXD	EN+2~, EN+21, EN+25, EN+27, LOOP2~, LOOP3~, BLD~
AZAXD(	INITIAL+14, LOOP3+22, BLD+9*
AZAXD0	POV+8~, POV+10, POV+11, POV+12, PROC+8~, PROC+10, PROC+11, PROC+12, REFILLS~, REFILLS+8 , REFILLS+9, REFILLS+12, PARTIAL~, PARTIAL+8, PARTIAL+9, PARTIAL+12, SET2A~, SET2A+8, SET2A+17, SET2A+18 , SET2A+20, SET2A+27, SET2A+30, SET2B~, SET2B+9, SET2B+16, SET2B+17, SET2B+19, SET2B+28, SET2B+31 , SET2C~, SET2C+9, SET2C+17, SET2C+26, SET2C+29, PUT+3~, PUT+19, PUT+20, PUT+22, PUT+24 , PUT+26, PUT+27
AZAXD1	REFILLS+5~, REFILLS+7, REFILLS+8, REFILLS+9, REFILLS+12, PARTIAL+5~, PARTIAL+7, PARTIAL+8, PARTIAL+9, PARTIAL+12 , SET2B~, SET2B+16, SET2B+17, SET2B+19, SET2C~, SET2C+17, PUT+3~, PUT+21, PUT+22, PUT+24 , PUT+26, PUT+27
AZAXD2	PUT+3~, PUT+23, PUT+24, PUT+26, PUT+27
AZAXD3	PUT+3~, PUT+25, PUT+26, PUT+27
AZAXDATA	SET2A+6~, SET2A+8, SET2A+9, SET2A+13, SET2A+14, SET2A+15, SET2A+16, SET2A+20, SET2A+21, SET2A+24 , SET2B+7~, SET2B+9, SET2B+10, SET2B+14, SET2B+15, SET2B+19, SET2B+20, SET2B+23, SET2B+24, SET2B+25 , SET2C+7~, SET2C+9, SET2C+10, SET2C+14, SET2C+15, SET2C+17, SET2C+18, SET2C+21, SET2C+22, SET2C+23 , LOOP3+7~, LOOP3+18, LOOP3+19, LOOP3+20, SET3+6~, SET3+8, SET3+9, SET3+10, SET3+14, SET3+16 , SET3+17, SET3+18, SET3+19
AZAXDFN	LOOP1+8~, LOOP1+17, LOOP1+20, LOOP1+21, LOOP1+22, POV~, POV+16, PROC~, PROC+16, SET1~ , SET1+22, SET1+23, SET1+24, SET1+30, SET1+34, LOOP2+15~, LOOP2+19, LOOP2+20, LOOP2+22, LOOP2+23 , LOOP2+25, SET2A+6~, SET2A+9, SET2A+12, SET2A+26, SET2A+30, SET2B+7~, SET2B+10, SET2B+13, SET2B+27 , SET2B+31, SET2C+7~, SET2C+10, SET2C+13, SET2C+25, SET2C+29, LOOP3+7~, LOOP3+19, LOOP3+23, SET3+6~ , SET3+9, SET3+13, SET3+23, SET3+27
AZAXDGD0	INITIAL+3~, INITIAL+9*, INITIAL+10, INITIAL+12
AZAXDGNA	INITIAL+3~, INITIAL+12, INITIAL+13, INITIAL+14, LOOP3+7~, LOOP3+20, LOOP3+21, LOOP3+22
AZAXDRG	BLD+5!
AZAXDSP	INITIAL+3~, INITIAL+5, INITIAL+6, INITIAL+7, REFILLS+5~, REFILLS+9, REFILLS+10, REFILLS+11, PARTIAL+5~, PARTIAL+9* , PARTIAL+10, PARTIAL+11, SET2A+6~, SET2A+21, SET2A+23, SET2A+28, SET2A+30, SET2B+7~, SET2B+20, SET2B+22 , SET2B+29, SET2B+31, SET2C+7~, SET2C+18, SET2C+20, SET2C+27, SET2C+29, SET3+6~, SET3+10, SET3+15 , SET3+25, SET3+27
AZAXDT	LOOP1+8~, LOOP1+12, LOOP1+14, LOOP1+16, LOOP3+7~, LOOP3+11, LOOP3+13, LOOP3+15
AZAXDTS	EN+2~, EN+13*, EN+23, LOOP1~, LOOP1+10, LOOP1+11
AZAXEND	LOOP1+8~, LOOP1+11, LOOP1+14, LOOP3+7~, LOOP3+10, LOOP3+13, DL+2~, DL+17*, DL+18, DL+20
AZAXFILE	PUT+3~, PUT+8*, PUT+9, PUT+14, PUT+35
AZAXI	EN+2~, EN+21, EN+23, LOOP1~, LOOP1+21, POV~, BLD~
AZAXI(	LOOP1+20, POV+15, BLD+7*
AZAXICD	BLD+5!
AZAXICD0	LOOP1+8~, LOOP1+18, LOOP1+19, POV+8~, POV+12, POV+13, PROC+8~, PROC+12*, PROC+13
AZAXICDNA	POV+8~
AZAXICNA	LOOP1+8~, LOOP1+19, LOOP1+20, POV+13, POV+14, POV+15, POV+16, PROC+8~, PROC+13*, PROC+14 , PROC+15, PROC+16, SET1~, SET1+25, SET1+32, SET1+34
AZAXLOC	SET1+15~, SET1+19*, SET1+26
AZAXOUT	PUT+3~, PUT+14, PUT+15
AZAXP	EN+2~, EN+21, EN+23, LOOP1~, LOOP1+22, PROC~, BLD~
AZAXP(	PROC+15, BLD+8*
AZAXPATH	PUT+3~, PUT+11*, PUT+12, PUT+14
AZAXPDTS	EN+2~, EN+17*, EN+25, EN+27, LOOP2~, LOOP2+26, LOOP2+27, LOOP2+28, INITIAL~, INITIAL+6 , INITIAL+7, REFILLS~, REFILLS+10, REFILLS+11, PARTIAL~, PARTIAL+10, PARTIAL+11, LOOP3~, LOOP3+9, LOOP3+10
AZAXPRC	BLD+5!
AZAXPSD1	LOOP2+15~, LOOP2+21, LOOP2+22, LOOP2+23
AZAXRXD0	LOOP2+15~, LOOP2+23*, LOOP2+24, LOOP2+26, LOOP2+27, LOOP2+28, INITIAL~, INITIAL+5, INITIAL+9, INITIAL+16
AZAXTXT	DATES~, DL+7, DL+8, DL+13
AZAXTYPE	FILE+3~, FILE+5*, PUT~, PUT+5, PUT+6, PUT+8, PUT+24, PUT+26, PUT+27
AZAXVMD0	LOOP3+7~, LOOP3+16, LOOP3+17, LOOP3+18, LOOP3+24, SET3~, SET3+8, SET3+20, SET3+21, SET3+24 , SET3+27
AZAXVSD0	LOOP1+8~, LOOP1+15, LOOP1+16, LOOP1+17, LOOP1+18, LOOP1+20, LOOP1+21, LOOP1+22, POV~, POV+11 , POV+16, PROC~, PROC+11, PROC+16, SET1~, SET1+17, SET1+19, SET1+28, SET1+31, SET1+34 , LOOP3+7~, LOOP3+14, LOOP3+15, LOOP3+17
AZAXVSDT	SET1+15~, SET1+17, SET1+18, SET1+27
AZAXY	EN+2~, EN+11, EN+12, EN+13, EN+15, EN+16, EN+17, DATES~, DL+5, DL+20
DIR	DL+2~
DIR("?"	DL+8*
DIR("A"	DL+7, DL+13
DIR(0	DL+6*
DIRUT	DL+2~, DL+10, DL+15
DTOUT	DL+2~, DL+10, DL+15
DUOUT	DL+2~, DL+10, DL+15
I	TXT+2~, TXT+3, BLD+3~, BLD+7, BLD+8, BLD+9
IOST	PUT+35
U	LOOP1+10, LOOP1+11, LOOP1+17, LOOP1+18, POV+12, PROC+12, SET1+22, SET1+23, SET1+24, SET1+25 , SET1+26, SET1+27, SET1+28, INITIAL+5, INITIAL+6, INITIAL+7, INITIAL+9, REFILLS+9, REFILLS+10, REFILLS+11 , PARTIAL+9, PARTIAL+10, PARTIAL+11, SET2A+9, SET2A+12, SET2A+13, SET2A+14, SET2A+15, SET2A+16, SET2A+17 , SET2A+18, SET2A+21, SET2A+23, SET2A+24, SET2B+10, SET2B+13, SET2B+14, SET2B+15, SET2B+16, SET2B+17 , SET2B+20, SET2B+22, SET2B+23, SET2B+24, SET2B+25, SET2C+10, SET2C+13, SET2C+14, SET2C+15, SET2C+18 , SET2C+20, SET2C+21, SET2C+22, SET2C+23, LOOP3+9, LOOP3+10, LOOP3+19, LOOP3+20, SET3+9, SET3+10 , SET3+13, SET3+14, SET3+15, SET3+16, SET3+17, SET3+18, SET3+19, SET3+20, SET3+21, DL+20
X	PUT+3~, PUT+27, PUT+28, PUT+29, PUT+30, DL+2~, TXT+2~, TXT+3, BLD+3~, BLD+7 , BLD+8, BLD+9
Y	DL+2~, DL+11, DL+12, DL+16, DL+17
Z	SET1+15~, SET1+21, SET1+22, SET1+23, SET1+24, SET1+25, SET1+26, SET1+27, SET1+28, SET1+34 , SET2A+6~, SET2A+11, SET2A+12, SET2A+13, SET2A+14, SET2A+15, SET2A+16, SET2A+17, SET2A+18, SET2A+23* , SET2A+24, SET2A+30, SET2B+7~, SET2B+12, SET2B+13, SET2B+14, SET2B+15, SET2B+16, SET2B+17, SET2B+22 , SET2B+23, SET2B+24, SET2B+25, SET2B+31, SET2C+7~, SET2C+12, SET2C+13, SET2C+14, SET2C+15, SET2C+20 , SET2C+21, SET2C+22, SET2C+23, SET2C+29, SET3+6~, SET3+12, SET3+13, SET3+14, SET3+15, SET3+16 , SET3+17, SET3+18, SET3+19, SET3+20, SET3+21*, SET3+27

Marked Items

Name	Field # of Occurrence
$T(D+I	BLD+9
$T(DESC+I	TXT+3
$T(I+I	BLD+7
$T(P+I	BLD+8

Customize PDF page

Package: Local Area Programs

Routine: AZAXCAD

Information

Source Information

Call Graph

Call Graph Total: 6

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items