Routine: LRRPU

Information

LRRPU ;VA/DALOI/JMC - Interim Report Results Utility ; 22-Oct-2013 09:22 ; MKK

Source Information

Source file <LRRPU.m>

Call Graph

Call Graph Total: 7

Package	Total	Call Graph
VA Fileman	3	$$GET1^DID ($$EXTERNAL,$$ROOT)^DILFD $$GET1^DIQ
Kernel	2	$$FMDIFF^XLFDT ($$TRIM,$$UP)^XLFSTR
IHS Changes To Lab	1	ZEROFIX^BLR7OGMP
Lab Service	1	($$DATE,DATE)^LRDAGE

Caller Graph

Caller Graph Total: 13

Package	Total	Caller Graph
Lab Service	11	LR7OB63 LR7OGG LR7OGMC LR7OR2 LR7OSUM1 LRCAPDAR LRDIQ LRRP1 LRRP1VA LRVER4 LRVR4
Dietetics	1	FHASM4
Pharmacy Benefits Management	1	PSULRHL1

Entry Points

Name	Comments	DBIA/ICR reference
CALCAGE(DOB,LRCDT)	; Calculate age based on difference between DOB and collection date.
TSTRES(LRDFN,LRSS,LRIDT,LRDN,LR60,LRCODE)	; Test results and parameters ; Call with LRDFN = ien of entry in file #63 ; LRSS = subscript in file #63, currently only "CH" supported ; LRIDT = inverse date/time of result ; LRDN = ien of data name in "CH" subscript ; LR60 = pointer to file 60 test related to this dataname (optional) ; LRCODE = 1 - return NLT/LOINC codes (optional)	ICR #4658 Status: Active Usage: Controlled Subscription
ZEROFIX(F60PTR,RESULT)	; EP - Leading & Trailing Zero Fix for Results

External References

Name	Field # of Occurrence
ZEROFIX^BLR7OGMP	TSTRES+19
$$GET1^DID	TSTRES+25
$$EXTERNAL^DILFD	TSTRES+26
$$ROOT^DILFD	TSTRES+49
$$GET1^DIQ	TSTRES+85, TSTRES+89, TSTRES+90
$$DATE^LRDAGE	CALCAGE+7
DATE^LRDAGE	CALCAGE+7
$$FMDIFF^XLFDT	CALCAGE+10
$$TRIM^XLFSTR	TSTRES+74, TSTRES+75
$$UP^XLFSTR	ZEROFIX+3

FileNo	Call Tags
63.04	EXTERNAL^DILFD, GET1^DID
^LAM - [#64]	GET1^DIQ
^LAB(95.3 - [#95.3]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^BLRUCUM - [#90475.3]	TSTRES+55
^DD(63.04	ZEROFIX+12, ZEROFIX+14
^LAB(60 - [#60]	TSTRES+52, TSTRES+53, ZEROFIX+9
^LAM("E"	TSTRES+84
^LR - [#63]	TSTRES+12, TSTRES+34, TSTRES+47, TSTRES+48

Name	Line Occurrences
$$CALCAGE	TSTRES+51
ZEROFIX	TSTRES+61, TSTRES+62

Name	Field # of Occurrence
^(0	TSTRES+47

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AGE	TSTRES+46~, TSTRES+51, CALCAGE+9, CALCAGE+10*, CALCAGE+11
>> DFN	TSTRES+47*, TSTRES+50
>> DILOCKTM	ZEROFIX+1
>> DISYS	ZEROFIX+1
>> DN	ZEROFIX+9*, ZEROFIX+10, ZEROFIX+12, ZEROFIX+14
DOB	TSTRES+46~, TSTRES+50*, TSTRES+51, CALCAGE~, CALCAGE+7, CALCAGE+10
>> DP	ZEROFIX+16*, ZEROFIX+17, ZEROFIX+28
DT	ZEROFIX+1
DTIME	ZEROFIX+1
DUZ	ZEROFIX+1
F60PTR	ZEROFIX~, ZEROFIX+1, ZEROFIX+7, ZEROFIX+9
>> I	TSTRES+83*, TSTRES+84, TSTRES+87
IO	ZEROFIX+1
>> IOBS	ZEROFIX+1
IOF	ZEROFIX+1
IOM	ZEROFIX+1
ION	ZEROFIX+1
>> IOS	ZEROFIX+1
IOSL	ZEROFIX+1
IOST	ZEROFIX+1
>> IOT	ZEROFIX+1
>> IOXY	ZEROFIX+1
LR60	TSTRES~, TSTRES+19, TSTRES+52*, TSTRES+53, TSTRES+61, TSTRES+62
LR61	TSTRES+46~, TSTRES+48*, TSTRES+53
LR64	TSTRES+81~, TSTRES+84*, TSTRES+85
LRCDT	TSTRES+46~, TSTRES+48*, TSTRES+51, CALCAGE~, CALCAGE+7, CALCAGE+10
LRCODE	TSTRES~, TSTRES+80
LRDFN	TSTRES~, TSTRES+12, TSTRES+34, TSTRES+47, TSTRES+48
LRDN	TSTRES~, TSTRES+12, TSTRES+25, TSTRES+26, TSTRES+52
LRDPF	TSTRES+46~, TSTRES+47*, TSTRES+49
LRFLAG	TSTRES+11~, TSTRES+33, TSTRES+34, TSTRES+36, TSTRES+45
LRHI	TSTRES+46~, TSTRES+57*, TSTRES+62, TSTRES+67, TSTRES+68
LRIDT	TSTRES~, TSTRES+12, TSTRES+34, TSTRES+48
LRLO	TSTRES+46~, TSTRES+57*, TSTRES+61, TSTRES+66, TSTRES+68
LRNR	TSTRES+11~, TSTRES+33*, TSTRES+37, TSTRES+38, TSTRES+39
LRSS	TSTRES~, TSTRES+12, TSTRES+25, TSTRES+34, TSTRES+48
LRTHI	TSTRES+46~, TSTRES+57*, TSTRES+65, TSTRES+70, TSTRES+71
LRTLO	TSTRES+46~, TSTRES+57*, TSTRES+65, TSTRES+69, TSTRES+71
LRX	TSTRES+11~, TSTRES+12, TSTRES+17, TSTRES+20, TSTRES+24, TSTRES+33, TSTRES+34, TSTRES+77, TSTRES+82, TSTRES+96 , TSTRES+98
LRY	TSTRES+11~, TSTRES+24, TSTRES+26, TSTRES+27, TSTRES+37, TSTRES+38, TSTRES+39, TSTRES+56, TSTRES+68, TSTRES+71 , TSTRES+74, TSTRES+75, TSTRES+77, TSTRES+93, TSTRES+96, TSTRES+98, TSTRES+100
>> ORIGRSLT	ZEROFIX+19*, ZEROFIX+26
RESULT	ZEROFIX~, ZEROFIX+1, ZEROFIX+3, ZEROFIX+5, ZEROFIX+19, ZEROFIX+20, ZEROFIX+21, ZEROFIX+22, ZEROFIX+24, ZEROFIX+26* , ZEROFIX+28, ZEROFIX+30
SEX	TSTRES+46~, TSTRES+50*
>> STR	ZEROFIX+14*, ZEROFIX+16
>> SYMBOL	ZEROFIX+19, ZEROFIX+21, ZEROFIX+30
U	TSTRES+47, TSTRES+55, TSTRES+57, ZEROFIX+1
X	TSTRES+11~, TSTRES+26, TSTRES+27, TSTRES+46~, TSTRES+48, TSTRES+49, TSTRES+50, TSTRES+53, TSTRES+55, TSTRES+56 , TSTRES+57, TSTRES+82, TSTRES+83, TSTRES+84, TSTRES+87, TSTRES+88, TSTRES+89, TSTRES+90, TSTRES+92, TSTRES+93 , CALCAGE+10*
>> XPARSYS	ZEROFIX+1
>> XQXFLG	ZEROFIX+1
Y	TSTRES+11~, TSTRES+84, TSTRES+85, TSTRES+86, TSTRES+87, TSTRES+89, TSTRES+92
Y(0	TSTRES+90, TSTRES+91, TSTRES+92
ZFRES	TSTRES+16~, TSTRES+17*, TSTRES+19, TSTRES+20, TSTRES+21!

Customize PDF page

Package: Lab Service

Routine: LRRPU

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 13

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items