Routine: ATXENP

Package	Total	Call Graph
VA Fileman	3	^DIC ^DIE IX1^DIK
IHS VA Utilities	1	^XBKVAR
Kernel	1	^%ZTLOAD

Package

Total

Call Graph

VA Fileman

^DIC ^DIE IX1^DIK

IHS VA Utilities

^XBKVAR

Kernel

^%ZTLOAD

Package	Total	Caller Graph
Taxonomy	3	ATXPOS1 ATXPOS2 ATXPOS3
Patient Care Component	1	APCHPOST

Package

Total

Caller Graph

Taxonomy

ATXPOS1 ATXPOS2 ATXPOS3

Patient Care Component

APCHPOST

Name	Comments	DBIA/ICR reference
ZTM	;ENTRY POINT FOR TASKMAN
GETVAL	;GET RANGE OF DFNS
EOJ	;
DFNS	;
ADD	;ADDS PTS TO TAXONOMY IN PT TAXONOMY FILE
START	;
INIT	;
TSKMN	;EP
LOOP	;GET PTS FROM V POV FILE FOR THIS ICD CODE DFN

Name	Field # of Occurrence
^%ZTLOAD	TSKMN+4
^DIC	START+2, START+11
^DIE	START+8
IX1^DIK	ADD+7
^XBKVAR	INIT+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,$C(7),"Patients already entered under this taxonomy in the Pt Taxonomy file!" Line Location: START+4
Function Call: WRITE	Prompt: !,$C(7),"ICD Codes have not been entered into this taxonomy!" Line Location: START+5
Function Call: WRITE	Prompt: !,$C(7),"Taxonomy now",^(ATXX)," Try later." Line Location: START+7
Function Call: WRITE	Prompt: !,$C(7),"You have no date for entries to be added to the PT TAXONOMY file.",!,"Entries will not be made until a date is indicated." Line Location: START+9
Function Call: WRITE	Prompt: !!,$C(7),"Entries for this taxonomy into the Pt Taxonomy file, will now occur via Taskman",!,"in background!" Line Location: TSKMN+1
Routine Call	DIE Line Location: START+8
Routine Call	DIC Line Location: START+2 START+11

FileNo	Call Tags
^ATXAX - [#9002226]	Classic Fileman Calls
^ATXPAT - [#9002227]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ATXAX - [#9002226]	START+5, START+8, START+9, START+12, DFNS+1, ADD+2
^ATXPAT - [#9002227]	START+4, START+8, START+11, ADD+1, ADD+3, ADD+4, ADD+5*
^AUPNVPOV - [#9000010.07]	LOOP+3, ADD+2
^AUPNVPOV("B"	LOOP+3
^AUPNVSIT - [#9000010]	ADD+2
^ICD9("BA"	GETVAL+1, GETVAL+3
^TMP("ATXTAX"	START+7, TSKMN+2*, ZTM+2!

Name	Line Occurrences
ADD	LOOP+3
DFNS	ZTM+1
EOJ	ATXENP+5, ZTM+4
GETVAL	DFNS+1
INIT	ATXENP+3
LOOP	GETVAL+1, GETVAL+3
START	ATXENP+4, START+4, START+5, START+7
TSKMN	START+13

Name	Field # of Occurrence
^(	START+7, DFNS+1, ADD+3
^(0	DFNS+1, ADD+3, ADD+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	TSKMN+3*
ATXDFN	GETVAL+1, GETVAL+3, LOOP+1, LOOP+3, EOJ+1!
ATXHI	EOJ+1!
ATXHIV	DFNS+1*, GETVAL+2, GETVAL+3, EOJ+1!
ATXL	DFNS+1, GETVAL+3, LOOP+3*, EOJ+1!
ATXLO	EOJ+1!
ATXLOV	DFNS+1, GETVAL+1, GETVAL+2, GETVAL+3, EOJ+1!
ATXPAT	EOJ+1!
ATXPD	LOOP+3*, ADD+3, ADD+4, ADD+5, ADD+6, ADD+7, EOJ+1!
ATXPV	LOOP+2, LOOP+3, ADD+2, EOJ+1!
ATXSS	DFNS+1*, EOJ+1!
ATXTRT	START+1!
ATXVIS	ADD+2*, EOJ+1!
ATXWT	EOJ+1!
ATXX	START+6*, START+7, START+8, START+9, START+11, START+12, TSKMN+2, ZTM+2, DFNS+1, ADD+1 , ADD+2, ADD+3, ADD+4, ADD+5, ADD+6, ADD+7, EOJ+1!
DA	START+8!, ADD+7!
DA(1	ADD+7*
DIADD	START+11*!
DIC	START+2!, START+11!
DIC("DR"	START+11*
DIC("S"	START+2*
DIC(0	START+2, START+11
DIE	START+8*!
DIK	ADD+7*!
DR	START+8*!, START+11!
DT	START+11, START+12, TSKMN+4, ADD+6
DTIME	ADD+6
DUZ	START+11, ADD+6
IO	ADD+6
IOF	ADD+6
IOM	ADD+6
>> IOS	ADD+6
IOSL	ADD+6
IOST	ADD+6
>> IOXY	ADD+6
U	INIT+2*, START+8, START+9, START+12, DFNS+1, LOOP+3, ADD+2, ADD+3, ADD+5, ADD+6
>> X	START+11*
>> XQDIC	ADD+6
>> XQPSM	ADD+6
>> XQY	ADD+6
>> XQYO	ADD+6
>> Y	START+3, START+4, START+5, START+6, START+8, START+10
>> ZTDESC	TSKMN+4*
>> ZTDTH	TSKMN+4*
>> ZTIO	TSKMN+4*
>> ZTQUEUED	ZTM+3, ADD+6
>> ZTREQ	ZTM+3*
>> ZTRTN	TSKMN+4*
ZTSAVE	TSKMN+3!
ZTSAVE(	TSKMN+3*
ZTSK	TSKMN+4!

Customize PDF page

Package: Taxonomy

Routine: ATXENP

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: