Routine: LRSCTX1

Package	Total	Call Graph
Kernel	4	($$FMTE,$$NOW)^XLFDT ($$TRIM,$$UP)^XLFSTR $$NAME^XUAF4 $$NAME^XUSER
Lab Service	4	($$BLDERTX,$$LOGIT,$$OK2LOG,$$TNUM)^LRERT SCTUPD^LRERT1 $$DELHIER^LRSCT $$GETLOCK^LRUTIL
MailMan	2	^XMD $$GOTLOCAL^XMXAPIG
VA FileMan	2	$$GET1^DID (FILE,UPDATE)^DIE
Automated Lab Instruments	1	$$NVAF^LA7VHLU2
Health Data and Informatics	1	LABXCPT^HDISVAP1

Package	Total	Caller Graph
Lab Service	1	LRSCTX

Name	Comments	DBIA/ICR reference
FILE(LRFILE,LRIN,LRERROR,HLINFO)	; ; Private helper method ; Set the new term into the target file ; Inputs ; LRFILE: Target File # (61, 61.2, 62) ; LRIN:<byref><opt> Array holding field values. ; : .01=New entry's .01 field value ; : 20=SCT Code ; : 21=SCT Status code ; : 22=SCT Hierarchy text ; LRERROR:<byref> See Outputs ; HLINFO:<byref> HL7 info array (from EN^LRSCTX) ; Outputs ; The IEN of the entry to use ; LRERROR: Error message for the process.
NOTIFY(LRTXT,LRFILE,LRFIEN,LRSCT,HLINFO)	;

Name	Field # of Occurrence
$$GET1^DID	NOTIFY+85
FILE^DIE	FILE+67
UPDATE^DIE	FILE+55
LABXCPT^HDISVAP1	NOTIFY+62
$$NVAF^LA7VHLU2	NOTIFY+42
$$BLDERTX^LRERT	NOTIFY+51
$$LOGIT^LRERT	NOTIFY+80
$$OK2LOG^LRERT	NOTIFY+33
$$TNUM^LRERT	NOTIFY+45
SCTUPD^LRERT1	NOTIFY+131
$$DELHIER^LRSCT	FILE+42
$$GETLOCK^LRUTIL	FILE+34
$$FMTE^XLFDT	NOTIFY+95
$$NOW^XLFDT	NOTIFY+24
$$TRIM^XLFSTR	FILE+43, NOTIFY+25
$$UP^XLFSTR	FILE+44, NOTIFY+26, NOTIFY+114
^XMD	NOTIFY+123
$$GOTLOCAL^XMXAPIG	NOTIFY+119
$$NAME^XUAF4	NOTIFY+41
$$NAME^XUSER	NOTIFY+114

Name	Line Occurrences
$$NOTIFY	FILE+74

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DATA	NOTIFY+14~, NOTIFY+50!, NOTIFY+51
DATA(	NOTIFY+54
DIERR	FILE+17~, FILE+18~, FILE+39!, FILE+61!
DUZ	NOTIFY+114
HLINFO	FILE~, FILE+74, NOTIFY~
HLINFO("FSEC"	NOTIFY+49, NOTIFY+101
HLINFO("MSH"	NOTIFY+39, NOTIFY+98
HLINFO("OBX"	NOTIFY+59, NOTIFY+60, NOTIFY+102, NOTIFY+103
HLINFO("R4"	NOTIFY+38
I	NOTIFY+15~, NOTIFY+53, NOTIFY+54, NOTIFY+110, NOTIFY+111
II	NOTIFY+15~
LR4	NOTIFY+14~, NOTIFY+38*, NOTIFY+40, NOTIFY+41, NOTIFY+42
>> LR6247	NOTIFY+21*, NOTIFY+75
LRERROR	FILE~, FILE+21!, FILE+22, FILE+28, FILE+31, FILE+33, FILE+36, FILE+58*, FILE+73
LRFDA	FILE+18~, FILE+39!, FILE+61!
LRFDA(1	FILE+54, FILE+63, FILE+65, FILE+66
LRFDAIEN	FILE+17~, FILE+18~, FILE+39!, FILE+61!
LRFDAIEN(1	FILE+56
LRFIEN	NOTIFY~, NOTIFY+19*, NOTIFY+45, NOTIFY+48, NOTIFY+51, NOTIFY+73, NOTIFY+87, NOTIFY+90
LRFILE	FILE~, FILE+19, FILE+24, FILE+25, FILE+26, FILE+28, FILE+36, FILE+54, FILE+58, FILE+63 , FILE+65, FILE+66, FILE+74, NOTIFY~, NOTIFY+18, NOTIFY+30, NOTIFY+45, NOTIFY+48, NOTIFY+51, NOTIFY+72 , NOTIFY+85, NOTIFY+87, NOTIFY+90
LRFILENAME	NOTIFY+84~, NOTIFY+85*, NOTIFY+87, NOTIFY+90
LRFMERTS	FILE+17~, FILE+51*
LRFMERTS("STS"	FILE+52, FILE+53
LRHDI	NOTIFY+15~, NOTIFY+46!, NOTIFY+66!
LRHDI("ERROR"	NOTIFY+65
LRHDI(2	NOTIFY+47, NOTIFY+48, NOTIFY+49, NOTIFY+54, NOTIFY+56, NOTIFY+57, NOTIFY+58, NOTIFY+59, NOTIFY+60*
LRHDIERR	NOTIFY+15~, NOTIFY+64!, NOTIFY+77, NOTIFY+105, NOTIFY+125
LRHDIERR("ERROR"	NOTIFY+65*
LRIEN	FILE+18~, FILE+39!, FILE+40, FILE+54, FILE+61!, FILE+62, FILE+63, FILE+65, FILE+66
LRIN	FILE~, NOTIFY+14~, NOTIFY+29!, NOTIFY+33, NOTIFY+69!, NOTIFY+80, NOTIFY+81!
LRIN(	FILE+30, FILE+41, FILE+74
LRIN("FIEN"	NOTIFY+73*
LRIN("FILE"	NOTIFY+30, NOTIFY+72
LRIN("HDIERR"	NOTIFY+77*
LRIN("PREV"	NOTIFY+32, NOTIFY+78, NOTIFY+79*
LRIN("R6247"	NOTIFY+75*
LRIN("SCT"	NOTIFY+31, NOTIFY+74
LRIN("STSEXC"	NOTIFY+76*
LRIN("TDT"	NOTIFY+71*
LRIN("TNUM"	NOTIFY+70*
LRIN(20	FILE+64, FILE+65, FILE+74
LRIN(21	FILE+63
LRIN(22	FILE+66
LRLCK	FILE+17~, FILE+23, FILE+24, FILE+25, FILE+26, FILE+27, FILE+34, FILE+70
LRMSG	FILE+17~, FILE+18~, FILE+39!, FILE+57, FILE+61!
LRMTXT	NOTIFY+84~
LRMTXT(	NOTIFY+111*
LRMTXT("A"	NOTIFY+110
LRMTXT(1	NOTIFY+90*
LRMTXT(10	NOTIFY+99*
LRMTXT(11	NOTIFY+100*
LRMTXT(12	NOTIFY+101*
LRMTXT(13	NOTIFY+102*
LRMTXT(14	NOTIFY+103*
LRMTXT(15	NOTIFY+107*
LRMTXT(16	NOTIFY+108*
LRMTXT(2	NOTIFY+91*
LRMTXT(3	NOTIFY+92*
LRMTXT(4	NOTIFY+93*
LRMTXT(5	NOTIFY+94*
LRMTXT(6	NOTIFY+95*
LRMTXT(7	NOTIFY+96*
LRMTXT(8	NOTIFY+97*
LRMTXT(9	NOTIFY+98*
LRNIEN	FILE+17~, FILE+20, FILE+56, FILE+57, FILE+60, FILE+62, FILE+73, FILE+74, FILE+76
LRSCT	NOTIFY~, NOTIFY+20*, NOTIFY+31, NOTIFY+74, NOTIFY+99
LRTXT	NOTIFY~, NOTIFY+16*, NOTIFY+17, NOTIFY+25, NOTIFY+33, NOTIFY+80, NOTIFY+92
NODE	NOTIFY+106~, NOTIFY+109, NOTIFY+111
NOTIFY	NOTIFY+14~, NOTIFY+22, NOTIFY+125, NOTIFY+126*, NOTIFY+133
NOW	NOTIFY+14~, NOTIFY+24*, NOTIFY+45, NOTIFY+47, NOTIFY+71, NOTIFY+95, NOTIFY+130
SFAC	NOTIFY+14~, NOTIFY+39*, NOTIFY+57, NOTIFY+97
SFNM	NOTIFY+14~, NOTIFY+37, NOTIFY+41, NOTIFY+58, NOTIFY+97
SITE	NOTIFY+14~
STR	NOTIFY+14~, NOTIFY+27*, NOTIFY+35!
STR2	NOTIFY+14~
TDT	NOTIFY+129~, NOTIFY+130*
TEXT	NOTIFY+15~, NOTIFY+25, NOTIFY+26, NOTIFY+27, NOTIFY+35!
TMPNM	NOTIFY+15~, NOTIFY+23*
TNUM	NOTIFY+15~, NOTIFY+45*, NOTIFY+47, NOTIFY+70, NOTIFY+96
TYPE	NOTIFY+15~, NOTIFY+36, NOTIFY+43, NOTIFY+56
VAF	NOTIFY+15~, NOTIFY+42*, NOTIFY+43
X	FILE+17~, FILE+34, FILE+35, FILE+41, FILE+42, FILE+43, FILE+44, FILE+45, FILE+54, FILE+74* , NOTIFY+15~, NOTIFY+33, NOTIFY+34, NOTIFY+51, NOTIFY+80, NOTIFY+114, NOTIFY+117
XMDUZ	NOTIFY+84~, NOTIFY+117*
XMMG	NOTIFY+84~, NOTIFY+124
XMSUB	NOTIFY+84~, NOTIFY+87, NOTIFY+88
XMTEXT	NOTIFY+84~, NOTIFY+122*
XMY	NOTIFY+84~
XMY("G.LAB MA	PPING" , NOTIFY+119*
XMY("G.LMI"	NOTIFY+120*
XMZ	NOTIFY+84~, NOTIFY+124
Y	FILE+17~, NOTIFY+15~

Customize PDF page

Package: Lab Service

Routine: LRSCTX1

Information

Source Information

Call Graph

Call Graph Total: 14

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 1

Entry Points

External References

Label References

Local Variables

Legend: