Routine: PXRMTAXD

Package	Total	Call Graph
Clinical Reminders	6	(DELEXTL,EXPAND)^PXRMBXTL BLDLIST^PXRMFRPT $$VCODE^PXRMLEX ($$CHGUID,SENODE,STC,STCC,SUID)^PXRMTAXD SAVETC^PXRMTXIM POSTSAVE^PXRMTXSM
DRG Grouper	3	$$CODEN^ICDEX $$STATCHK^ICPTAPIU $$CPT^ICPTCOD
VA Fileman	3	EN^DDIOL (FILE,UPDATE)^DIE $$GET1^DIQ
Kernel	1	(BMES,MES)^XPDUTL
Lexicon Utility	1	($$CSYS,$$PERIOD)^LEXU

Package	Total	Caller Graph
Clinical Reminders	4	PXRMEXU0 PXRMP26I PXRMTAXD PXRMTXSM

Entry Points

Name	Comments	DBIA/ICR reference
CHK(CODE)	;IHS/MSC/MGHCheck to see if there is more than 1 IEN for this code Patch 1007
KENODE(DA,X)	;Kill the "AE" (coding system, code) index.
SUIDC(DA,X)	;Copy codes from the Use in Dialog Codes multiple to the Selected
CSYSOPTR(CODESYS)	;Output transform for Coding System field of Use in Dialogs
SUID(DA,X)	;Set the "AUID" Use in Dialog index.
TAXKILL(TAXIEN)	;Called whenever a taxonony item is killed. Called from new-
INUSE(TIEN,CHKTYP)	;Check to see if a taxonomy is in use. Used for the "DEL"
TAXCOUNT(TAXIEN)	;Count the expanded taxonomy entries and set the 0 node.
KTCC(DA,X)	;KILL the "ATCC" (term, coding system, code) index.
RBLDUID	;Rebuild the "AUID" index for all entries.	ICR #6120 Status: Active Usage: Private
SENODE(DA,X)	;Set the "AE" (coding system, code) index.
TAXEDIT(TAXIEN,KI)	;Whenever a taxonony item is edited rebuild the expanded
KUID(DA,X)	;Kill the "AUID" Use in Dialog index and remove the code
STC(DA,X)	;Set the "ATC" (term, coding system) index.
KILLUIDC(IEN,CODE,CODESYS)	;Remove codes from the Use In Dialogs Codes multiple
KUIDC(DA,X)	;When a code is deleted from the Use In Dialog Codes multiple
CHGUID(IEN,CODESYS,CODE,UID)	;For a coding system code pair in the 20
SAVEUIDC(IEN,CODESYS,CODE)	;Save codes marked as Use In Dialog in the
STCC(DA,X)	;Set the "ATCC" (term, coding system, code) index.
RBLD20I	;Rebuild all the indexes on the 20 node.
KTC(DA,X)	;Kill the "ATC" (term, coding system) index.
CDINPTR(CODE)	;Input transform for code field of Use in Dialogs Code multiple.

Name	Field # of Occurrence
EN^DDIOL	CDINPTR+6, INUSE+17
FILE^DIE	CHGUID+19, KILLUIDC+6, KUIDC+13
UPDATE^DIE	SAVEUIDC+8
$$GET1^DIQ	INUSE+15
$$CODEN^ICDEX	SENODE+9, SENODE+10
$$STATCHK^ICPTAPIU	SENODE+14, SENODE+16
$$CPT^ICPTCOD	CHK+5
$$CSYS^LEXU	CSYSOPTR+3
$$PERIOD^LEXU	SUID+7
DELEXTL^PXRMBXTL	TAXEDIT+9, TAXKILL+9
EXPAND^PXRMBXTL	TAXEDIT+10
BLDLIST^PXRMFRPT	INUSE+5
$$VCODE^PXRMLEX	CDINPTR+2
$$CHGUID^PXRMTAXD	KUIDC+15, SUIDC+8
SENODE^PXRMTAXD	RBLD20I+27
STC^PXRMTAXD	RBLD20I+22
STCC^PXRMTAXD	RBLD20I+29
SUID^PXRMTAXD	RBLD20I+31, RBLDUID+17
SAVETC^PXRMTXIM	SUIDC+13
POSTSAVE^PXRMTXSM	SUIDC+14
BMES^XPDUTL	RBLD20I+3
MES^XPDUTL	RBLD20I+7

Name	Line Occurrences (* Changed, ! Killed)
^ICPT("B"	CHK+3
^PXD(811.2 - [#811.2]	CHGUID+4, CHGUID+5, CHGUID+6, CHGUID+7, CHGUID+8, CHGUID+10, CHGUID+11, KENODE+3, KENODE+4!, KILLUIDC+2 , KILLUIDC+4, KTC+3, KTC+4!, KTCC+3, KTCC+4, KTCC+5!, KUID+4, KUID+5, KUID+6!, KUIDC+6 , KUIDC+7!, KUIDC+9, KUIDC+10, RBLD20I+5, RBLD20I+6, RBLD20I+8!, RBLD20I+9!, RBLD20I+10!, RBLD20I+11!, RBLD20I+13 , RBLD20I+15, RBLD20I+16, RBLD20I+19, RBLD20I+23, RBLD20I+25, RBLDUID+4, RBLDUID+5!, RBLDUID+7, RBLDUID+9, RBLDUID+11 , RBLDUID+13, SAVEUIDC+3, SENODE+3, SENODE+17, STC+3, STC+4, STCC+3, STCC+4, STCC+5, SUID+4 , SUID+5, SUID+20, SUIDC+4, SUIDC+5, SUIDC+6
^PXD(811.3 - [#811.3]	TAXCOUNT+6, TAXCOUNT+7*
^TMP("PXRMCODES"	SUIDC+11!, SUIDC+12*
^TMP($J	INUSE+4!, INUSE+6!, INUSE+10, INUSE+14, INUSE+18!

Name	Line Occurrences
$$CHK	SENODE+13
KILLUIDC	KUID+7
SAVEUIDC	SUID+27
TAXCOUNT	TAXEDIT+11, TAXKILL+10

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ACTCODE	SENODE+2~, SENODE+13*, SENODE+14, SENODE+15
ACTDT	SUID+2~, SUID+9, SUID+10, SUID+11, SUID+17, SUID+20
BDESC	SUID+2~, SUID+18, SUID+19
CHKTYP	INUSE~, INUSE+7, INUSE+8
CODE	CDINPTR~, CDINPTR+2, CDINPTR+5, CHGUID~, CHGUID+5, CHGUID+11, KILLUIDC~, KILLUIDC+2, KILLUIDC+4, SAVEUIDC~ , SAVEUIDC+3, SAVEUIDC+6, CHK~, CHK+3
CODEP	SENODE+2~, SENODE+7, SENODE+9, SENODE+10, SENODE+14, SENODE+15, SENODE+16, SENODE+17
CODESYS	CDINPTR+1~, CHGUID~, CHGUID+5, CHGUID+6, CHGUID+7, CSYSOPTR~, CSYSOPTR+3, KENODE+2~, KENODE+3, KENODE+4 , KILLUIDC~, KILLUIDC+2, KILLUIDC+4, KTCC+2~, KTCC+4, KTCC+5, KUID+3~, KUID+4, KUID+5, KUID+6 , KUID+7, RBLD20I+1~, RBLD20I+16, RBLD20I+17, RBLD20I+18, RBLD20I+19, RBLD20I+20, SAVEUIDC~, SAVEUIDC+3, SAVEUIDC+7 , SENODE+2~, SENODE+3, SENODE+9, SENODE+10, SENODE+11, SENODE+16, SENODE+17, STCC+2~, STCC+4, STCC+5 , SUID+2~, SUID+4, SUID+5, SUID+7, SUID+20, SUID+27
CODESYSL	CDINPTR+1~
CPT	CHK+1~, CHK+5*, CHK+6
D0	RBLD20I+1~, RBLD20I+6, RBLD20I+7, RBLD20I+8, RBLD20I+9, RBLD20I+10, RBLD20I+11, RBLD20I+12, RBLD20I+13, RBLD20I+15 , RBLD20I+16, RBLD20I+19, RBLD20I+23, RBLD20I+25, RBLDUID+1~, RBLDUID+3, RBLDUID+4*, RBLDUID+5, RBLDUID+6, RBLDUID+7 , RBLDUID+9, RBLDUID+11, RBLDUID+13
D1	RBLD20I+1~, RBLD20I+12, RBLD20I+13, RBLD20I+14, RBLD20I+15, RBLD20I+16, RBLD20I+19, RBLD20I+23, RBLD20I+25, RBLDUID+1~ , RBLDUID+6, RBLDUID+7, RBLDUID+8, RBLDUID+9, RBLDUID+11, RBLDUID+13
D2	RBLD20I+1~, RBLD20I+14, RBLD20I+15, RBLD20I+16, RBLD20I+19, RBLD20I+21, RBLD20I+23, RBLD20I+25, RBLDUID+1~, RBLDUID+8* , RBLDUID+9*, RBLDUID+10, RBLDUID+11, RBLDUID+13
D3	RBLD20I+1~, RBLD20I+21, RBLD20I+23, RBLD20I+24, RBLD20I+25, RBLDUID+1~, RBLDUID+10, RBLDUID+11, RBLDUID+12, RBLDUID+13
DA	KENODE~, KTC~, KTCC~, KUID~, KUIDC~, RBLD20I+1~, RBLD20I+24, RBLD20I+27, RBLD20I+29, RBLD20I+31 , RBLDUID+1~, RBLDUID+12, RBLDUID+17, SENODE~, STC~, STC+4, STCC~, SUID~, SUIDC~, SUIDC+5
DA(1	KENODE+3, KTC+3, KTCC+4, KUID+4, KUIDC+6, KUIDC+7, KUIDC+9, KUIDC+10, KUIDC+11, KUIDC+15 , RBLD20I+21, RBLDUID+10, SENODE+3, STC+3, STC+4, STCC+4, SUID+4, SUIDC+4, SUIDC+5, SUIDC+6 , SUIDC+8, SUIDC+13, SUIDC+14
DA(2	KENODE+3, KTC+3, KTC+4, KTCC+3, KTCC+4, KUID+4, RBLD20I+14, RBLDUID+8, SENODE+3, STC+3 , STC+4, STCC+3, STCC+4, SUID+4
DA(3	KENODE+3, KENODE+4, KTCC+3, KTCC+4, KTCC+5, KUID+4, KUID+5, KUID+6, KUID+7, RBLD20I+12* , RBLDUID+6*, SENODE+3, SENODE+17, STCC+3, STCC+4, STCC+5, SUID+4, SUID+5, SUID+20, SUID+27
DATA	CDINPTR+1~, SUID+2~, SUID+7
DATA(	SUID+10, SUID+11, SUID+17
>> DDS	CSYSOPTR+3
>> DIUTIL	TAXEDIT+6, TAXKILL+6
FDA	CHGUID+2~, SAVEUIDC+4~
FDA(	CHGUID+14, CHGUID+18, SAVEUIDC+6, SAVEUIDC+7
FNUM	INUSE+3~, INUSE+11*, INUSE+15
IEN	CHGUID~, CHGUID+4, CHGUID+5, CHGUID+6, CHGUID+7, CHGUID+8, CHGUID+10, CHGUID+11, CHGUID+13, CHGUID+17 , INUSE+3~, INUSE+13, INUSE+14, INUSE+15, KILLUIDC~, KILLUIDC+2, KILLUIDC+4, SAVEUIDC~, SAVEUIDC+3, SAVEUIDC+5 , CHK+1~, CHK+2, CHK+3, CHK+5, CHK+6, TAXCOUNT+4~, TAXCOUNT+5, TAXCOUNT+6
IENS	CHGUID+2~, CHGUID+13, CHGUID+14, CHGUID+17, CHGUID+18, KILLUIDC+3~, KILLUIDC+4, KILLUIDC+5, KUIDC+8~, KUIDC+11 , KUIDC+12, SAVEUIDC+4~, SAVEUIDC+5*, SAVEUIDC+6, SAVEUIDC+7
INACTDT	SUID+2~, SUID+12, SUID+14, SUID+15, SUID+20
IND	CHGUID+2~, CHGUID+6*, CHGUID+8, CHGUID+10, CHGUID+11, CHGUID+13, CHGUID+17
JND	CHGUID+2~, CHGUID+7*, CHGUID+8, CHGUID+10, CHGUID+11, CHGUID+13, CHGUID+17
KFDA	KILLUIDC+3~, KUIDC+8~
KFDA(	KILLUIDC+5, KUIDC+12
KI	TAXEDIT~, TAXEDIT+10
KND	CHGUID+2~, CHGUID+9, CHGUID+10, CHGUID+11, CHGUID+13
LDESC	SUID+2~, SUID+17*, SUID+19, SUID+20
MSG	CHGUID+2~, KILLUIDC+3~, KUIDC+8~, SAVEUIDC+4~
NAME	INUSE+3~, RBLD20I+1~, RBLD20I+4, RBLD20I+5, RBLD20I+6, RBLD20I+7
NCHG	CHGUID+2~, CHGUID+3, CHGUID+12, CHGUID+19, CHGUID+20, KUIDC+8~, KUIDC+15, SUIDC+7~, SUIDC+8, SUIDC+9
NL	INUSE+3~, INUSE+9, INUSE+12, INUSE+15, INUSE+16
NUID	CHGUID+2~, CHGUID+8, CHGUID+15, CHGUID+16*, CHGUID+18
NUM	CHK+1~, CHK+2, CHK+4, CHK+7, TAXCOUNT+4~, TAXCOUNT+5, TAXCOUNT+6, TAXCOUNT+7
>> PXRMEXCH	SUID+26, TAXEDIT+8, TAXKILL+8
RESULT	CDINPTR+1~, SUID+2~, SUID+7*, SUID+8
SAVE	CHK+1~, CHK+2, CHK+6, CHK+7*, CHK+8
TAXIEN	TAXCOUNT~, TAXCOUNT+7, TAXEDIT~, TAXEDIT+9, TAXEDIT+10, TAXEDIT+11, TAXKILL~, TAXKILL+9, TAXKILL+10
TCCDA	RBLD20I+1~, RBLD20I+21*, RBLD20I+22
TCCDA(1	RBLD20I+14*
TCCDA(2	RBLD20I+12*
TCCX	RBLD20I+1~, RBLD20I+22
TCCX(1	RBLD20I+20*
TEMP	RBLD20I+1~, RBLD20I+25, RBLD20I+26, RBLD20I+28, RBLDUID+1~, RBLDUID+13, RBLDUID+14, RBLDUID+15, SUID+2~, SUID+11* , SUID+12, SUID+16, SUID+18
TERM	CHGUID+2~, CHGUID+3, CHGUID+4, CHGUID+5, CHGUID+6, CHGUID+7, KTC+2~, KTC+3, KTC+4, KTCC+2~ , KTCC+3, KTCC+5, KUIDC+8~, STC+2~, STC+3, STC+4, STCC+2~, STCC+3, STCC+5
TERMIND	KUIDC+8~, KUIDC+10*, KUIDC+11
TEXT	CDINPTR+1~, CDINPTR+6, INUSE+3~, INUSE+17
TEXT(	INUSE+12, INUSE+15, INUSE+16*
TEXT(1	CDINPTR+4, INUSE+7, INUSE+8*
TEXT(2	CDINPTR+5*
TIEN	INUSE~, INUSE+5, INUSE+10, INUSE+14
TYPE	INUSE+3~, INUSE+9, INUSE+10, INUSE+11, INUSE+12, INUSE+14
U	CHGUID+6, CHGUID+7, CHGUID+8, CHGUID+11, CSYSOPTR+3, KENODE+3, KTCC+4, KUID+4, KUIDC+10, RBLD20I+16 , RBLD20I+19, RBLD20I+26, RBLD20I+28, RBLDUID+14, RBLDUID+15, SENODE+3, SENODE+14, SENODE+16, CHK+6, STC+4 , STCC+4, SUID+4, SUID+12, SUID+16, SUID+18, SUID+20, TAXCOUNT+7
UID	CHGUID~, CHGUID+14, CHGUID+15, CHGUID+16, RBLD20I+1~, RBLDUID+1~
VALID	CDINPTR+1~, CDINPTR+2*, CDINPTR+3, CDINPTR+7
VP	SUID+2~, SUID+16*, SUID+20
X	KENODE~, KTC~, KTCC~, KUID~, KUIDC~, RBLD20I+1~, RBLD20I+27, RBLD20I+29, RBLD20I+31, RBLDUID+1~ , RBLDUID+17, SENODE~, STC~, STCC~, SUID~, SUIDC~
X(1	KENODE+4, KTC+4, KTCC+5, KUID+5, KUID+6, KUID+7, RBLD20I+26, RBLDUID+14, SENODE+7, SENODE+9 , SENODE+10, SENODE+13, SENODE+14, SENODE+16, SENODE+17, STC+4, STCC+5, SUID+5, SUID+7, SUID+20 , SUID+27, SUIDC+4, SUIDC+5, SUIDC+6, SUIDC+8, SUIDC+12
X(2	RBLD20I+28, RBLD20I+30, RBLDUID+15, RBLDUID+16, STCC+5, SUID+3, SUID+27, SUIDC+4, SUIDC+5, SUIDC+6 , SUIDC+8, SUIDC+12
>> X1(1	KUIDC+6, KUIDC+7, KUIDC+9, KUIDC+10, KUIDC+15
>> X1(2	KUIDC+6, KUIDC+7, KUIDC+9, KUIDC+10, KUIDC+15

Customize PDF page

Package: Clinical Reminders

Routine: PXRMTAXD

Information

Source Information

Call Graph

Call Graph Total: 14

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: