Routine: PXRMTXIM

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Info
Source
Call Graph
Caller Graph
Entry Points
External References
Global Variables Directly Accessed
Label References
Local Variables

Information

PXRMTXIM ;SLC/PKR - Taxonomy import/create routines. ;13-Aug-2015 12:21;du

Source Information

Source file <PXRMTXIM.m>

Call Graph

Call Graph Total: 22

Package	Total	Call Graph
Clinical Reminders	7	$$ASKYN^PXRMEUT $$GETEHF^PXRMEXHF $$VCODESYS^PXRMLEX START^PXRMTXCE $$SAVETC^PXRMTXIM POSTSAVE^PXRMTXSM AWRITE^PXRMUTIL
VA Fileman	5	BROWSE^DDBR EN^DDIOL ^DDS UPDATE^DIE ^DIR
Kernel	4	$$FTG^%ZISH $$NOW^XLFDT $$LOW^XLFSTR (BMES,MES)^XPDUTL
DRG Grouper	2	($$ICDDX,$$ICDOP)^ICDEX $$CPT^ICPTCOD
IHS Mods To Patient Care Encounter	1	(LEXCHK,PASTECSV)^BPXRMEXT
Lexicon Utility	1	($$CSDATA,$$CSYS,$$PERIOD)^LEXU
Registration	1	FULL^VALM1
Toolkit	1	$$GETURL^XTHC10

Caller Graph

Caller Graph Total: 7

Package	Total	Caller Graph
Clinical Reminders	7	PXRMEXU4 PXRMEXWB PXRMP26D PXRMTAXD PXRMTAXL PXRMTXIC PXRMTXIM

Entry Points

Name	Comments	DBIA/ICR reference
PASTECSV(NODE)	;Paste the CSV file.
IMPTAX(IEN,PXRMTIEN)	;Import codes from other taxonomies.
RBLCKHF(NODEIN,NODEOUT)	;FTG^%ZISH breaks lines at 255 characters. This could
RBLCKWEB(NODEIN,NODEOUT)	;GETURL^XTHC10 breaks lines at 245 characters. This
PERCHK(CODE,CODESYS,TERM,NCODES,NL,TEXTOUT)	;Use $$PERIOD^LEXU
IMPCSV(IEN,NODE)	;Import comma separated data into the Lexicon Term/Code
IMP(IEN)	;Import codes into a taxonomy.
ISCSV(LINE)	;Verify that LINE is in CSV format with a least 3 pieces of
UPDCL(IEN,TEXT)	;Add an entry to the change log.
LOADHF(NODEOUT)	;Load the CSV host file into ^TMP.
LEXCHK(CODE,CODESYS,TERM,NCODES,NL,TEXTOUT)	;Use $$TAX^LEX10CS
CRETAX(FLAGS,TXDATA,ERRMSG)	;Create a taxonomy based on the data in TXDATA.
SAVETC(IEN)	;Save the term/code.
LOADWEB(NODEOUT)	;Load the CSV file from a web site into ^TMP

External References

Name	Field # of Occurrence
$$FTG^%ZISH	LOADHF+11
LEXCHK^BPXRMEXT	LEXCHK+3
PASTECSV^BPXRMEXT	PASTECSV+1
BROWSE^DDBR	IMPCSV+87
EN^DDIOL	IMP+5, IMPCSV+8, IMPCSV+25, IMPCSV+55, IMPCSV+57, IMPTAX+11, IMPTAX+26, ISCSV+10, LOADHF+12, LOADWEB+9 , LOADWEB+17
^DDS	UPDCL+12
UPDATE^DIE	CRETAX+19, SAVETC+10, UPDCL+7
^DIR	IMP+15, IMPTAX+12, LOADWEB+4
$$ICDDX^ICDEX	CRETAX+36
$$ICDOP^ICDEX	CRETAX+37
$$CPT^ICPTCOD	CRETAX+39, CRETAX+40
$$CSDATA^LEXU	CRETAX+46
$$CSYS^LEXU	IMPCSV+19, IMPCSV+22
$$PERIOD^LEXU	PERCHK+4
$$ASKYN^PXRMEUT	IMPCSV+61, IMPCSV+89, IMPTAX+27
$$GETEHF^PXRMEXHF	LOADHF+3
$$VCODESYS^PXRMLEX	IMPCSV+32
START^PXRMTXCE	IMP+27
$$SAVETC^PXRMTXIM	CRETAX+51
POSTSAVE^PXRMTXSM	CRETAX+52, IMPCSV+93, IMPTAX+38
AWRITE^PXRMUTIL	SAVETC+14
FULL^VALM1	SAVETC+12
$$NOW^XLFDT	UPDCL+3
$$LOW^XLFSTR	LOADWEB+7
BMES^XPDUTL	CRETAX+24
MES^XPDUTL	CRETAX+25, SAVETC+13
$$GETURL^XTHC10	LOADWEB+13

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PXD(811.2 - [#811.2]	IMP+2, IMPTAX+10, IMPTAX+15, IMPTAX+16, IMPTAX+18, IMPTAX+19, IMPTAX+36, SAVETC+5
^TMP("PXRMCODES"	CRETAX+26!, CRETAX+50, IMPCSV+91, IMPTAX+31!, IMPTAX+36*, IMPTAX+39!, SAVETC+3
^TMP($J	IMPCSV+3, IMPCSV+6!, IMPCSV+9, IMPCSV+10, IMPCSV+42, IMPCSV+43, IMPCSV+53, IMPCSV+54, IMPCSV+77, IMPCSV+81 , IMPCSV+91, IMPCSV+95!, LOADHF+7!, LOADHF+12!, LOADHF+14!, LOADWEB+11!, LOADWEB+18!, LOADWEB+20!, PERCHK+8, PERCHK+9 , PERCHK+10, PERCHK+11, RBLCKHF+4!, RBLCKHF+6, RBLCKHF+7, RBLCKHF+8, RBLCKHF+13, RBLCKHF+16, RBLCKHF+17, RBLCKHF+21 , RBLCKHF+22, RBLCKWEB+4!, RBLCKWEB+6, RBLCKWEB+7, RBLCKWEB+8, RBLCKWEB+10, RBLCKWEB+16, RBLCKWEB+19, RBLCKWEB+20, RBLCKWEB+25* , RBLCKWEB+26*

Label References

Name	Line Occurrences
$$IMPCSV	IMP+20, IMP+24, IMP+33
$$IMPTAX	IMP+28
$$ISCSV	IMPCSV+11
$$LOADHF	IMP+18
$$LOADWEB	IMP+31
$$PERCHK	IMPCSV+38, IMPCSV+48
$$SAVETC	IMPCSV+92, IMPTAX+37
LEXCHK	IMPCSV+39, IMPCSV+49
PASTECSV	IMP+23
RBLCKHF	LOADHF+13
RBLCKWEB	LOADWEB+19
UPDCL	IMP+21, IMP+25, IMP+29, IMP+34

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ANS	IMPCSV+4~, IMPCSV+61, IMPCSV+62, IMPCSV+89, IMPCSV+90, IMPTAX+3~, IMPTAX+13*, IMPTAX+20, IMPTAX+21
CDATA	CRETAX+11~, CRETAX+44!, CRETAX+46
CDATA("LEX"	CRETAX+47
CDATA("SYS"	CRETAX+48
CHAR	RBLCKHF+3~, RBLCKHF+11, RBLCKHF+12, RBLCKHF+13, RBLCKHF+19, RBLCKHF+20, RBLCKHF+21, RBLCKWEB+3~, RBLCKWEB+13, RBLCKWEB+14 , RBLCKWEB+15, RBLCKWEB+16, RBLCKWEB+22, RBLCKWEB+23, RBLCKWEB+24, RBLCKWEB+25
CLASS	IMP+1~, IMP+2*, IMP+3
CODE	CRETAX+11~, CRETAX+43, CRETAX+46, CRETAX+49, CRETAX+50, IMPCSV+4~, IMPCSV+35, IMPCSV+36, IMPCSV+37, IMPCSV+38 , IMPCSV+39, IMPCSV+45, IMPCSV+46, IMPCSV+47, IMPCSV+48, IMPCSV+49, IMPCSV+52, IMPCSV+53, IMPCSV+54, IMPCSV+74 , IMPCSV+75*, IMPCSV+77, IMPCSV+78, IMPCSV+81, LEXCHK~, LEXCHK+3, PERCHK~, PERCHK+4, PERCHK+7, PERCHK+8 , PERCHK+9, PERCHK+10, PERCHK+11
CODEP	CRETAX+11~, CRETAX+29, CRETAX+30, CRETAX+32, CRETAX+36, CRETAX+37, CRETAX+39, CRETAX+40, CRETAX+41, CRETAX+42
CODESYS	CRETAX+11~, CRETAX+31, CRETAX+36, CRETAX+37, CRETAX+40, CRETAX+42, CRETAX+46, CRETAX+49, CRETAX+50, IMPCSV+4~ , IMPCSV+17, IMPCSV+19, IMPCSV+22, IMPCSV+24, IMPCSV+28, IMPCSV+32, IMPCSV+38, IMPCSV+39, IMPCSV+48, IMPCSV+49 , IMPCSV+65, IMPCSV+66, IMPCSV+67, IMPCSV+68, IMPCSV+76, IMPCSV+77, IMPCSV+78, IMPCSV+81, IMPTAX+3~, IMPTAX+19 , IMPTAX+25, IMPTAX+28, IMPTAX+34, IMPTAX+35, IMPTAX+36, LEXCHK~, LEXCHK+3, PERCHK~, PERCHK+4, PERCHK+8 , PERCHK+9, PERCHK+10, PERCHK+12
CODESYSN	IMPCSV+4~
CODESYSN(	IMPCSV+19*, IMPCSV+67, IMPCSV+78
CODESYST	CRETAX+11~, CRETAX+27, CRETAX+28, CRETAX+30, CRETAX+31, CRETAX+32, CRETAX+36, CRETAX+37, CRETAX+39, CRETAX+40 , CRETAX+41
DA	UPDCL+8!, UPDCL+9*
DA(1	UPDCL+9*
DDSFILE	UPDCL+8!, UPDCL+10*
DDSFILE(1	UPDCL+10*
DESC	CRETAX+11~
DESC(1	CRETAX+13*
DIR	IMP+1~, IMPTAX+3~, LOADWEB+1~
DIR("??"	IMP+14*
DIR("A"	IMP+13, LOADWEB+3
DIR("B"	IMPTAX+7*
DIR(0	IMP+9, IMP+10, IMP+11, IMP+12, IMPTAX+5, IMPTAX+6, LOADWEB+2*
>> DR	UPDCL+11*
DT	CRETAX+36, CRETAX+37, CRETAX+46
DUPL	IMPCSV+4~, IMPCSV+55, IMPCSV+71
DUPL(	IMPCSV+54*, IMPCSV+75, IMPCSV+78
DUZ	UPDCL+4
DUZ(0	IMP+3
EMSG	CRETAX+21~, CRETAX+25
EMSG(	CRETAX+23*
ERRMSG	CRETAX~
ERRMSG(	CRETAX+42, CRETAX+49
FDA	CRETAX+11~, SAVETC+1~, UPDCL+1~
FDA(	CRETAX+15, CRETAX+16, CRETAX+17, CRETAX+18, SAVETC+8, SAVETC+9, UPDCL+3, UPDCL+4, UPDCL+6
FDAIEN	CRETAX+11~, UPDCL+1~
FDAIEN(1	CRETAX+51, CRETAX+52, CRETAX+53, UPDCL+9
FILE	LOADHF+2~, LOADHF+5*, LOADHF+11
FLAGS	CRETAX~, CRETAX+19
FMT	CRETAX+11~, CRETAX+33*, CRETAX+36, CRETAX+37
GBL	LOADHF+2~, LOADHF+8, LOADHF+9, LOADHF+11
HDR	LOADWEB+1~, LOADWEB+13
IC	CRETAX+21~, CRETAX+23*
IEN	IMP~, IMP+2, IMP+20, IMP+21, IMP+24, IMP+25, IMP+28, IMP+29, IMP+33, IMP+34 , IMPCSV~, IMPCSV+92, IMPCSV+93, IMPTAX~, IMPTAX+37, IMPTAX+38, SAVETC~, SAVETC+5, SAVETC+7, UPDCL~ , UPDCL+2, UPDCL+9
IENS	CRETAX+11~, CRETAX+14, CRETAX+15, CRETAX+16, CRETAX+17, CRETAX+18, SAVETC+1~, SAVETC+7, SAVETC+8, UPDCL+1~ , UPDCL+2*, UPDCL+3, UPDCL+4, UPDCL+6
IMP	IMPTAX+3~, IMPTAX+20, IMPTAX+27, IMPTAX+28
IND	IMPCSV+4~, IMPCSV+7, IMPCSV+9, IMPCSV+10, IMPCSV+15, IMPCSV+42, IMPCSV+43, IMPTAX+3~, IMPTAX+14, IMPTAX+15 , IMPTAX+16, IMPTAX+18, IMPTAX+19, LOADWEB+1~, RBLCKHF+3~, RBLCKHF+5, RBLCKHF+6, RBLCKHF+7, RBLCKHF+8, RBLCKHF+16 , RBLCKHF+17, RBLCKWEB+3~, RBLCKWEB+5, RBLCKWEB+6, RBLCKWEB+7, RBLCKWEB+10, RBLCKWEB+19, RBLCKWEB+20, SAVETC+1~, SAVETC+2* , SAVETC+6*, SAVETC+7
IORI	IMPCSV+86~
IOSTBM	IMPCSV+86~
ISCSV	ISCSV+3~, ISCSV+4*, ISCSV+5, ISCSV+12
JND	IMPCSV+4~, IMPCSV+34, IMPCSV+35, IMPCSV+41, IMPCSV+42, IMPCSV+43, IMPTAX+3~, IMPTAX+17, IMPTAX+18, IMPTAX+19 , LOADWEB+1~, RBLCKHF+3~, RBLCKHF+10, RBLCKHF+11, RBLCKHF+15, RBLCKHF+16, RBLCKHF+17, RBLCKWEB+3~, RBLCKWEB+12, RBLCKWEB+13 , RBLCKWEB+18, RBLCKWEB+19*, RBLCKWEB+20
KND	IMPCSV+4~, IMPCSV+44, IMPCSV+45, RBLCKHF+3~, RBLCKHF+18, RBLCKHF+19, RBLCKWEB+3~, RBLCKWEB+21*, RBLCKWEB+22
L1	RBLCKHF+3~, RBLCKHF+9, RBLCKHF+12, RBLCKHF+13, RBLCKHF+20, RBLCKHF+21, RBLCKHF+22, RBLCKWEB+3~, RBLCKWEB+11, RBLCKWEB+15* , RBLCKWEB+16, RBLCKWEB+24, RBLCKWEB+25*, RBLCKWEB+26
LEN	RBLCKWEB+3~, RBLCKWEB+7*, RBLCKWEB+8
LHF	LOADHF+2~, LOADHF+11*, LOADHF+12
LINE	ISCSV~, ISCSV+2, ISCSV+4, ISCSV+9
LOADOK	IMP+1~, IMP+18, IMP+19, IMP+31, IMP+32
MSG	CRETAX+11~, CRETAX+20, SAVETC+1~, SAVETC+11, UPDCL+1~
NATOK	IMP+1~, IMP+3*, IMP+4
NCODES	IMPCSV+4~, IMPCSV+33, IMPCSV+38, IMPCSV+39, IMPCSV+48, IMPCSV+49, IMPCSV+56, LEXCHK~, LEXCHK+3, PERCHK~ , PERCHK+6, PERCHK+7
NCODES(	IMPCSV+28, IMPCSV+66, IMPCSV+67, IMPCSV+68, PERCHK+12
NL	IMPCSV+4~, IMPCSV+7, IMPCSV+15, IMPCSV+16, IMPCSV+29, IMPCSV+32, IMPCSV+38, IMPCSV+39, IMPCSV+48, IMPCSV+49 , IMPCSV+50, IMPCSV+63, IMPCSV+64, IMPCSV+67, IMPCSV+69, IMPCSV+72, IMPCSV+73, IMPCSV+78, IMPCSV+79, IMPCSV+82* , IMPCSV+83, IMPCSV+84, LEXCHK~, LEXCHK+3, PERCHK~, PERCHK+7*
NL1	LOADWEB+1~, RBLCKHF+3~, RBLCKHF+5, RBLCKHF+7, RBLCKHF+8, RBLCKHF+13, RBLCKHF+21, RBLCKHF+22, RBLCKWEB+3~, RBLCKWEB+5* , RBLCKWEB+8, RBLCKWEB+9, RBLCKWEB+10, RBLCKWEB+16, RBLCKWEB+25, RBLCKWEB+26
NL2	LOADWEB+1~, RBLCKHF+3~, RBLCKHF+9, RBLCKHF+13, RBLCKHF+21, RBLCKHF+22, RBLCKWEB+3~, RBLCKWEB+11, RBLCKWEB+16, RBLCKWEB+25* , RBLCKWEB+26*
NODE	IMPCSV~, IMPCSV+3, IMPCSV+9, IMPCSV+10, IMPCSV+42, IMPCSV+43, IMPCSV+95, PASTECSV~, PASTECSV+1
NODEIN	RBLCKHF~, RBLCKHF+6, RBLCKHF+7, RBLCKHF+8, RBLCKHF+16, RBLCKHF+17, RBLCKWEB~, RBLCKWEB+6, RBLCKWEB+7, RBLCKWEB+10 , RBLCKWEB+19, RBLCKWEB+20
NODEOUT	LOADHF~, LOADHF+13, LOADWEB~, LOADWEB+11, LOADWEB+19, RBLCKHF~, RBLCKHF+8, RBLCKHF+13, RBLCKHF+21, RBLCKHF+22 , RBLCKWEB~, RBLCKWEB+8, RBLCKWEB+10, RBLCKWEB+16, RBLCKWEB+25, RBLCKWEB+26
OPTION	IMP+1~, IMP+16*, IMP+17, IMP+22, IMP+26, IMP+30
PATH	LOADHF+2~, LOADHF+5*, LOADHF+11
PDATA	PERCHK+2~, PERCHK+4
>> PXRMINST	IMP+3
PXRMTIEN	IMP+1~, IMP+28, IMPTAX~
PXRMTIEN(	IMPTAX+9
REF	CRETAX+21~, CRETAX+22, CRETAX+23
RESULT	CRETAX+12~, CRETAX+36, CRETAX+37, CRETAX+39, CRETAX+40, CRETAX+41, CRETAX+42, CRETAX+43, CRETAX+46, IMPCSV+4~ , IMPCSV+22, IMPCSV+23, IMPCSV+26, IMPCSV+27, IMPCSV+30, IMPCSV+38, IMPCSV+39, IMPCSV+48, IMPCSV+49, LOADWEB+1~ , LOADWEB+13, LOADWEB+14, LOADWEB+16, PERCHK+2~, PERCHK+4*, PERCHK+5, PERCHK+13
SAVED	IMP+1~, IMP+20, IMP+21, IMP+24, IMP+25, IMP+28, IMP+29, IMP+33, IMP+34, IMPCSV+5~ , IMPCSV+7, IMPCSV+56, IMPCSV+88, IMPCSV+93, IMPCSV+97, IMPTAX+3~, IMPTAX+29, IMPTAX+38*, IMPTAX+40
SAVELIST	IMPTAX+3~
SAVELIST(	IMPTAX+28*, IMPTAX+30, IMPTAX+33, IMPTAX+35
SAVEOK	CRETAX+12~, CRETAX+51, CRETAX+52, IMPCSV+5~, IMPCSV+92, IMPCSV+93, IMPTAX+3~, IMPTAX+37*, IMPTAX+38
SUCCESS	SAVETC+1~, SAVETC+2, SAVETC+9, SAVETC+15, SAVETC+16
TC	CRETAX+12~, CRETAX+47, CRETAX+48, CRETAX+49, CRETAX+50, SAVETC+1~, SAVETC+2, SAVETC+3, SAVETC+5, SAVETC+8 , SAVETC+13
TEMP	CRETAX+12~, CRETAX+32, CRETAX+33, CRETAX+34, IMPCSV+5~, IMPCSV+10, IMPCSV+11, IMPCSV+12, IMPCSV+17, IMPCSV+34 , IMPCSV+35, IMPCSV+43, IMPCSV+44, IMPCSV+45, IMPCSV+65, IMPCSV+68, IMPCSV+69, LOADHF+2~, LOADHF+3, LOADHF+4 , LOADHF+5, RBLCKHF+3~, RBLCKHF+7, RBLCKHF+8, RBLCKHF+10, RBLCKHF+11, RBLCKHF+17, RBLCKHF+18, RBLCKHF+19, RBLCKWEB+3~ , RBLCKWEB+7, RBLCKWEB+8, RBLCKWEB+10, RBLCKWEB+12, RBLCKWEB+13, RBLCKWEB+20, RBLCKWEB+21, RBLCKWEB+22
TERM	IMPCSV+5~, IMPCSV+12, IMPCSV+13, IMPCSV+14, IMPCSV+16, IMPCSV+38, IMPCSV+39, IMPCSV+48, IMPCSV+49, IMPCSV+80* , IMPCSV+81, IMPCSV+82, IMPTAX+4~, IMPTAX+16, IMPTAX+24, IMPTAX+28, IMPTAX+32, IMPTAX+33, IMPTAX+35, IMPTAX+36 , LEXCHK~, LEXCHK+3, PERCHK~, PERCHK+8, PERCHK+9, PERCHK+10
TEXT	IMPCSV+5~, IMPCSV+24, IMPCSV+25, IMPCSV+27, IMPCSV+29, IMPTAX+4~, IMPTAX+26, ISCSV+6~, ISCSV+10, LOADWEB+1~ , LOADWEB+15, LOADWEB+16, LOADWEB+17, UPDCL~, UPDCL+5
TEXT(1	IMPTAX+22, ISCSV+7
TEXT(2	IMPTAX+23, ISCSV+8
TEXT(3	IMPTAX+24, ISCSV+9
TEXT(4	IMPTAX+25*
TEXTOUT	IMPCSV+5~, IMPCSV+38, IMPCSV+39, IMPCSV+48, IMPCSV+49, LEXCHK~, LEXCHK+3, PERCHK~
TEXTOUT(	IMPCSV+15, IMPCSV+16, IMPCSV+29, IMPCSV+32, IMPCSV+50, IMPCSV+63, IMPCSV+64, IMPCSV+67, IMPCSV+69, IMPCSV+72 , IMPCSV+73, IMPCSV+78, IMPCSV+79, IMPCSV+82, IMPCSV+83, IMPCSV+84, PERCHK+7*
TIEN	IMPTAX+4~, IMPTAX+8, IMPTAX+9, IMPTAX+10, IMPTAX+15, IMPTAX+16, IMPTAX+18, IMPTAX+19, IMPTAX+28, IMPTAX+29* , IMPTAX+30*, IMPTAX+33, IMPTAX+35, IMPTAX+36
TNAME	IMPTAX+4~, IMPTAX+10*, IMPTAX+11
TXDATA	CRETAX~
TXDATA("CLASS"	CRETAX+17
TXDATA("CODE"	CRETAX+28, CRETAX+30, CRETAX+32
TXDATA("NAME"	CRETAX+15, CRETAX+24
TXDATA("SOURCE"	CRETAX+13
TXDATA("SPONSOR"	CRETAX+18
U	CRETAX+33, CRETAX+34, CRETAX+40, CRETAX+41, CRETAX+42, CRETAX+43, CRETAX+47, IMP+2, IMPCSV+19, IMPCSV+27 , IMPTAX+10, IMPTAX+19, LOADHF+5, LOADWEB+5, LOADWEB+14, LOADWEB+16
UID	CRETAX+12~, CRETAX+34*, CRETAX+50
URL	LOADWEB+1~, LOADWEB+6*, LOADWEB+13
>> VALMBCK	IMP+7, IMP+35, IMPCSV+58, IMPCSV+96
WPTMP	UPDCL+1~
WPTMP(1	UPDCL+5*
X	IMP+1~, IMPTAX+4~, LOADWEB+1~
Y	IMP+1~, IMP+16, IMPTAX+4~, IMPTAX+13, LOADWEB+1~, LOADWEB+5, LOADWEB+6, LOADWEB+7*, LOADWEB+8

Customize PDF page

Package: Clinical Reminders

Routine: PXRMTXIM

Call Graph Total: 22

Caller Graph Total: 7