Routine: APCLTAX0

Package	Total	Call Graph
Patient Care Component Reports	4	(DDS,DIC,DIE,DIK,DIR,FILE)^APCLDIC (,LAB,LABTEST,TAXHEAD,X,Y)^APCLTAX1 (ATTRIB,OTHER)^APCLTAX2 (LABINIT,PROCESS)^APCLTAX4
Registration	3	EN^VALM TERM^VALM0 CLEAR^VALM1
IHS VA Utilities	1	$$DIR^XBDIR
VA Fileman	1	^DIR

Package	Total	Caller Graph
Patient Care Component Reports	3	APCLTAX1 APCLTAX2 APCLTAX4

Entry Points

Name	Comments	DBIA/ICR reference
LABADD	;EP;ADD LAB TO LAB TAXONOMY
TAXEDIT	;EP;EDIT AN EXISTING TAXONOMY
TAXEXIT
TEBACK
BACK	;EP;SETUP FOR RETURN TO LISTMAN
TAXDISP	;DISPLAY TAXONOMIES
TIADD	;EP;TO ADD ITEM TO TAXONOMY
SELECT	;SELECT AN EXISTING TAXONOMY
TERM	;EP;SET QMAN DICTIONARY OF TERMS VALUES
LE
APCLTF1	;EP;
VALM(APCLX)	;EP;VALM INTERFACE
TISEL	;EP;SELECT EXISTING ITEM FROM A TAXONOMY
TAX	;EP;TAXONOMY MANAGEMENT
TAXRX1	;
TIREMOVE	;EP;TO REMOVE ITEM FROM TAXONOMY
TAXINIT	;EP;INITIALIZE ARRAY FOR TAXONOMY DISPLAY
TAXRX	;PROCESS TAXONOMIES
LADD	;EP
PAUSE	;EP
DLAB	;EP;DELETE LAB FROM LAB TAXONOMY
TABACK
TIBACK
HEADER	;EP;TO SET HEADER CODE
Z(X)	;SET TMP NODE
TIINIT	;EP;TO LIST ITEMS ON TAXONOMY
APCLTF	;EP;
L1	;
TE1	;EP
TILIST	;EP;TO DISPLAY ITEMS ON TAXONOMY LIST
SLAB	;SELECT EXISTING LAB FROM LAB TAXONOMY
TAXADD	;EP;ENTER A NEW TAXONOMY
EDIT	;EP;EDIT A TAXONOMY
TI1
TAX1
LABEDIT	;EP;EDIT LAB IN LAB TAXONOMY

External References

Name	Field # of Occurrence
DDS^APCLDIC	EDIT+4
DIC^APCLDIC	L1+9, TI1+19
DIE^APCLDIC	LE+4
DIK^APCLDIC	DLAB+7, TIREMOVE+11
DIR^APCLDIC	TAX1+5, TAXRX1+7, TAXADD+15, SELECT+4, SLAB+4, TISEL+4, LADD+4
FILE^APCLDIC	TAXADD+22, L1+20, TI1+31, LADD+11
^APCLTAX1	TI1+7
LAB^APCLTAX1	TAXRX1+16
LABTEST^APCLTAX1	LADD+14
TAXHEAD^APCLTAX1	TAX1+1
X^APCLTAX1	TI1+21
Y^APCLTAX1	TIINIT+15
ATTRIB^APCLTAX2	TAXADD+1
OTHER^APCLTAX2	TAX1+8
LABINIT^APCLTAX4	BACK+2
PROCESS^APCLTAX4	TAXINIT+3
^DIR	TAX+7
EN^VALM	VALM+3
TERM^VALM0	VALM+2, BACK+5
CLEAR^VALM1	VALM+4, L1+1, TI1+11
$$DIR^XBDIR	PAUSE+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"This taxonomy setup option has been disabled. Each individual package" Line Location: TAX+1
Function Call: WRITE	Prompt: !,"that requires taxonomy setup will have it's own menu option for setting" Line Location: TAX+2
Function Call: WRITE	Prompt: !,"up the taxonomies required by the package. For example, to update the" Line Location: TAX+3
Function Call: WRITE	Prompt: !,"taxonomies for the CRS report follow the menu path CI05-SET-TAX." Line Location: TAX+4
Function Call: WRITE	Prompt: !,"To update the taxonomies required by the 2005 Diabetes Audit use" Line Location: TAX+5
Function Call: WRITE	Prompt: !,"the taxonomy setup option provided in the 2005 Diabetes Audit menu.",!! Line Location: TAX+6
Function Call: WRITE	Prompt: @IOF Line Location: TAXRX1+1
Function Call: WRITE	Prompt: !?10,"Select one of the following ",!?10 Line Location: TAXRX1+2
Function Call: WRITE	Prompt: "Diabetes Mgt System Taxonomy" Line Location: TAXRX1+3
Function Call: WRITE	Prompt: "Categories to review." Line Location: TAXRX1+4
Function Call: WRITE	Prompt: ! Line Location: TAXADD+14
Function Call: WRITE	Prompt: !!,"The ",Y," taxonomy already exists." Line Location: TAXADD+17
Function Call: WRITE	Prompt: ! Line Location: SELECT+3
Function Call: WRITE	Prompt: !,"Lab tests currently in this taxonomy:" Line Location: L1+2
Function Call: WRITE	Prompt: !,$P(^LAB(60,$P(^ATXLAB(APCLTDA,21,X,0),U),0),U) Line Location: L1+3
Function Call: WRITE	Prompt: !!,"Select lab tests to add." Line Location: L1+4
Function Call: WRITE	Prompt: ! Line Location: L1+8
Function Call: WRITE	Prompt: ! Line Location: SLAB+3
Function Call: WRITE	Prompt: !!,"The ",$P(^ATXAX(APCLTDA,0),U)," taxonomy is READ ONLY.",!,"You cannot add items to it." Line Location: TIADD+1
Function Call: WRITE	Prompt: !!,"The ",$P(^ATXAX(APCLTDA,0),U)," taxonomy is READ ONLY.",!,"You cannot remove items from it." Line Location: TIREMOVE+1
Function Call: WRITE	Prompt: ! Line Location: TISEL+3
Function Call: WRITE	Prompt: ! Line Location: LADD+3
Function Call: WRITE	Prompt: !!,"The ",Y," taxonomy already exists." Line Location: LADD+6
Routine Call	VALM Line Location: VALM+3
Routine Call	DIR Line Location: TAX+7

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^LAB(60 - [#60]	Classic Fileman Calls
^ATXAX - [#9002226]	Classic Fileman Calls
^ATXLAB - [#9002228]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AMQQ(1 - [#9009071]	TERM+2
^AMQQ(5 - [#9009075]	TAXRX1+18, TERM+1, APCLTF+1
^ATXAX - [#9002226]	SELECT+8, TIINIT+4, TIINIT+10, TIINIT+12, TIINIT+13, TIADD+1, TI1+4, TI1+5, TI1+30*, TI1+31 , TIREMOVE+1
^ATXAX("B"	TAXADD+17
^ATXLAB - [#9002228]	L1+3, L1+11, L1+12, L1+14, L1+17*
^ATXLAB("B"	LADD+6
^LAB(60 - [#60]	L1+3
^TMP("APCLTMP"	TAXINIT+1!
^TMP("APCLVR"	TAXEXIT+2!, TAXINIT+1!, TAXINIT+24, TIINIT+2!, Z+2*

Label References

Name	Line Occurrences
APCLTF	TAXADD+3
BACK	TABACK+1, TEBACK+1, EDIT+6, LABADD+2, LABEDIT+3, LABEDIT+5, DLAB+3, DLAB+8, TIBACK+1, TIREMOVE+13
L1	LABADD+1
LADD	LADD+6
LE	LABEDIT+4
PAUSE	TIADD+1, TIREMOVE+1
SELECT	TAXEDIT+1
SLAB	LABEDIT+2, DLAB+2
TABACK	TAXADD+16, TAXADD+24, LADD+5
TAX1	TAX+9
TAXADD	TAXADD+17
TAXDISP	TAXRX1+24
TAXEXIT	TAX1
TAXINIT	BACK+3
TAXRX	TAX1+9
TAXRX1	TAXRX+1
TEBACK	TAXEDIT+2
TERM	TAXRX1+22
TI1	TIADD+2
TIBACK	TI1+24, TIREMOVE+3
TIINIT	BACK+4
TILIST	TAXADD+25, TE1+1
TISEL	TIREMOVE+2
VALM	TAXDISP+1, TILIST+1
Z	TAXINIT+7, TAXINIT+9, TAXINIT+11, TAXINIT+13, TAXINIT+22, TAXINIT+26, TIINIT+5, TIINIT+7, TIINIT+28

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
A	TAXINIT+5~, TAXINIT+18, TAXINIT+19, TAXINIT+20, TAXINIT+21, TAXINIT+22, TIINIT+8~, TIINIT+22, TIINIT+23, TIINIT+24* , TIINIT+25, TIINIT+26, TIINIT+27*, TIINIT+28, TIINIT+30
APCL	TI1!
APCL(	TI1+6*
APCL("HIGH"	TI1+23*, TI1+29
APCL("LOW"	TI1+9, TI1+22*, TI1+25
APCLADA	TAXEXIT!, TAXEXIT+1!, TAXRX1+18*, TAXRX1+19, TERM+1, APCLTF+1, TAXADD+1, TAXADD+2
APCLANAM	TAXEXIT!, TAXEXIT+1!, TAXRX1+10, TAXRX1+11, TAXRX1+12, TAXRX1+13, TAXRX1+14, TAXRX1+15, TAXRX1+16, TAXRX1+17 , TAXRX1+18, TAXADD+4, TAXADD+5, TAXADD+6, TAXADD+7, TAXADD+8, TAXADD+9, TAXADD+10, TAXADD+11, TAXINIT+6 , TI1+2, TI1+16, TI1+17
APCLCANN	TAXEXIT!, TAXEXIT+1!, TAXADD+4, TAXADD+5, TAXADD+6, TAXADD+7, TAXADD+8, TAXADD+9, TAXADD+10, TAXADD+11 , TAXADD+21
APCLFILE	TAXEXIT+1!, APCLTF1+3*
APCLGO	TAXEXIT!, TABACK, TEBACK, EDIT+5, TIBACK, TIREMOVE+12*, BACK+3, BACK+4
APCLHIGH	TAXEXIT+1!, TIINIT+16, TIINIT+20*, TIINIT+27
APCLI	TIREMOVE+4~, TIREMOVE+5*
APCLILE	TAXEXIT+1!
APCLINK	TAXEXIT!, TAXRX1+24, TERM+1*, TERM+2, TAXADD+21
APCLINK0	TAXEXIT!, TAXRX1+23, TERM+2*
APCLJ	TAXEXIT!, SELECT+1, TAXINIT+2!, TAXINIT+27, SLAB+1, TIINIT+2!, TIINIT+17, TIINIT+21*, TIINIT+23, TIINIT+30 , TISEL+1
APCLJ(	SELECT+6, SELECT+7, TAXINIT+23, SLAB+6, SLAB+7, TIINIT+30, TIREMOVE+6, TIREMOVE+7
APCLLDA	TAXEXIT!, L1+12, L1+21, LE, SLAB+7, DLAB+5, TIINIT+11, TIINIT+12, TIINIT+13, TIINIT+16 , TIINIT+29, TIINIT+30, TIREMOVE+7*, TIREMOVE+9
APCLLOW	TAXEXIT+1!, TIINIT+16, TIINIT+18, TIINIT+19, TIINIT+20, TIINIT+26, TIINIT+29
APCLOUT	TAX+9, TAXEXIT!, TAXRX+1
APCLQUIT	TAX+9, TAXEXIT!, TAX1+6, TAXRX+1, TAXRX+2!, TAXRX1+8, TAXADD+16, TAXEDIT+2!, SELECT+5, LABADD+1 , L1+10, LABEDIT+3!, SLAB+5, SLAB+6, DLAB+3!, TIADD+2, TIADD+3!, TI1+8, TI1+20, TI1+24 , TIREMOVE+3!, TISEL+5, LADD+5
APCLRXDA	TAXEXIT+1!
APCLRXVC	TAXEXIT+1!
>> APCLTAX	TAXINIT+4
>> APCLTAX(	TAXINIT+16, TAXINIT+23
APCLTDA	TAXEXIT!, TAXEXIT+1!, TAXADD+23, TAXADD+24, SELECT+7, SELECT+8, EDIT+1, L1+3, L1+11, L1+12 , L1+14, L1+15, LE+1, SLAB+6, SLAB+7, DLAB+4, TIINIT+4, TIINIT+10, TIINIT+12, TIINIT+13 , TIINIT+30, TIADD+1, TI1+4, TI1+5, TI1+26, TI1+27, TI1+30, TI1+31, TIREMOVE+1, TIREMOVE+6 , TIREMOVE+7, TIREMOVE+8, LADD+12*, LADD+13
APCLTF	TAXEXIT!, APCLTF+1*, APCLTF1+1, APCLTF1+2, TI1+14
APCLTFDA	TAXEXIT!, APCLTF1+3*, TAXADD+21, TI1+2
APCLTFF	TAXEXIT!, APCLTF1+1, APCLTF1+2, APCLTF1+3, APCLTF1+4
APCLTFNA	TAXEXIT!, APCLTF1+4*, TI1+17
APCLTNAM	TAXEXIT!, TAXEXIT+1!, TAXADD+18, SELECT+8, TI1+13, LADD+7*, LADD+10
APCLTYPE	TAXEXIT+1!, TAX1+7*, TAX1+8
APCLWHCH	TAXEXIT!, TAXRX1+9*, EDIT+2, EDIT+3, BACK+2
APCLX	TAXEXIT!, TAXRX1+21, TAXINIT+25, VALM~, VALM+3, TIINIT+9, TIINIT+10, TIINIT+12, TIREMOVE+4~, TIREMOVE+5* , TIREMOVE+6, TIREMOVE+7
APCLY	TAXEXIT!, TIINIT+1!, TIREMOVE+5, TISEL+6*
APCLY(	TIINIT+16*, TIINIT+19, TIINIT+20, TIINIT+29
APLCGO	TAXEXIT+1!
APLCJ	TAXEXIT+1!
B	TIINIT+8~
>> DA	EDIT+1, LE, DLAB+5, TIREMOVE+9
>> DA(1	L1+15, L1+17, L1+18, LE+1, LE+2, DLAB+4, DLAB+6, TI1+26, TIREMOVE+8*, TIREMOVE+10
>> DIC	TAXADD+19, L1+5, L1+18, TI1+14, TI1+27, LADD+8
>> DIC("A"	L1+7, TI1+16, TI1+17*
>> DIC("DR"	TAXADD+21, TI1+29, LADD+10*
>> DIC(0	TAXADD+20, L1+6, L1+19, TI1+15, TI1+28, LADD+9
>> DIE	EDIT+2, LE+2
>> DIK	DLAB+6, TIREMOVE+10
DIR	TAX+7!
DIR("A"	TAX+7, TAX1+4, TAXRX1+6, TAXADD+13, SELECT+2, LABEDIT+1, SLAB+2, DLAB+1, TISEL+2, LADD+2
DIR(0	TAX+7, TAX1+3, TAXRX1+5, TAXADD+12, SELECT+1, SLAB+1, TISEL+1, LADD+1
>> DR	EDIT+3, LE+3
DT	TAXADD+21, LADD+10
>> DUOUT	PAUSE+4
DUZ	TAXADD+21, LADD+10
IO	PAUSE+1
IO(0	PAUSE+1
IOF	TAXRX1+1
IOST	PAUSE+2
U	TERM+1, APCLTF+1, APCLTF1+3, APCLTF1+4, SELECT+8, TAXINIT+23, L1+3, L1+17, TIINIT+4, TIINIT+16 , TIINIT+20, TIINIT+29, TIINIT+30, TIADD+1, TI1+6, TI1+9, TI1+25, TI1+29, TIREMOVE+1
>> VALMBCK	BACK+1*
>> VALMCC	VALM+1*
VALMCNT	TAX1+2, TAXINIT+2!, TIINIT+3, Z+1, Z+2
>> VALMSG	HEADER+1*
X	TAXADD+18, TAXINIT+5~, TAXINIT+6, TAXINIT+7, TAXINIT+8, TAXINIT+9, TAXINIT+10, TAXINIT+11, TAXINIT+12, TAXINIT+13 , TAXINIT+15, TAXINIT+16, TAXINIT+21, TAXINIT+23, TAXINIT+25, TAXINIT+26, L1+3~, L1+16, TIINIT+4, TIINIT+5 , TIINIT+6, TIINIT+7, TIINIT+8~, TIINIT+13, TIINIT+14, TI1+1~, TI1+3, TI1+4, TI1+5, TI1+6 , TI1+9, TI1+22, TI1+25, TI1+29, TI1+31, Z~, Z+2, LADD+7
>> XBQ	PAUSE+4*
Y	TAX1+6, TAX1+7, TAXRX1+8, TAXRX1+9, TAXRX1+10, TAXRX1+11, TAXRX1+12, TAXRX1+13, TAXRX1+14, TAXRX1+15 , TAXRX1+16, TAXRX1+17, TAXADD+16, TAXADD+17, TAXADD+18, TAXADD+21, TAXADD+23, SELECT+5, SELECT+6, SELECT+7 , TAXINIT+5~, L1+10, L1+11, L1+12, L1+14, L1+16, L1+21, SLAB+5, SLAB+6, SLAB+7 , TIINIT+8~, TI1+1~, TI1+5, TI1+6, TI1+20, TISEL+5, TISEL+6, LADD+5, LADD+6, LADD+7 , LADD+12, PAUSE+3
Y(0	L1+13, L1+14
Z	TAXINIT+5~, TAXINIT+14, TAXINIT+17, TAXINIT+18, TAXINIT+23, TAXINIT+27, TIINIT+8~, TI1+1~

Customize PDF page

Package: Patient Care Component Reports

Routine: APCLTAX0

Information

Source Information

Call Graph

Call Graph Total: 9

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: