Routine: GMTSLRSE

Package	Total	Call Graph
Health Summary	2	$$RESULT^GMTSLRCE (DEM,REGDTM4)^GMTSU

Package	Total	Caller Graph
Health Summary	2	GMTSLRS7 GMTSLRSC

Entry Points

Name	Comments	DBIA/ICR reference
XTRCT	; Extract Selected Lab Test ; ; Call with LRDFN lab patient ; GMTS1 begin date ; GMTS2 end date ; MAX occurence limit ; SEX "M" or "F" ; TEST IFN to ^LAB(60) ; RWIDTH optional ; ; Returns ^TMP("LRS",$J,GMTSI,IDRWDT)= ; DRWDT^SPEC^TEST^RESULT^FLAG^UNIT^LO^HI ; ; Where GMTSI=Order (1 to MAX) ; IDRWDT=9999999-Draw Date/time ; DRWDT=Draw Date/Time (internal) ; SPEC=Specimen (int;ext) ; TEST=Test (int;ext) ; RESULT=Numeric Result ; FLAG=Reference flag (H,H,L,L) ; UNIT=Unit of measure (ext) ; LO=Reference/Therapeutic Lower bound ; HI=Ref/Ther Upper Bound ;	ICR #293 Status: Retired Usage: Private ICR #2799 Status: Retired Usage: Private
CHEM	; Gets all Chemistry tests w/in time/occurrence constraints
CHSET	; Sets Chemistry locals for printing

Name

Comments

DBIA/ICR reference

XTRCT

; Extract Selected Lab Test
;
; Call with LRDFN lab patient
; GMTS1 begin date
; GMTS2 end date
; MAX occurence limit
; SEX "M" or "F"
; TEST IFN to ^LAB(60)
; RWIDTH optional
;
; Returns ^TMP("LRS",$J,GMTSI,IDRWDT)=
; DRWDT^SPEC^TEST^RESULT^FLAG^UNIT^LO^HI
;
; Where GMTSI=Order (1 to MAX)
; IDRWDT=9999999-Draw Date/time
; DRWDT=Draw Date/Time (internal)
; SPEC=Specimen (int;ext)
; TEST=Test (int;ext)
; RESULT=Numeric Result
; FLAG=Reference flag (H,*H,L,*L)
; UNIT=Unit of measure (ext)
; LO=Reference/Therapeutic Lower bound
; HI=Ref/Ther Upper Bound
;

ICR #293

Status: Retired

Usage: Private

ICR #2799

Status: Retired

Usage: Private

CHEM

; Gets all Chemistry tests w/in time/occurrence constraints

CHSET

; Sets Chemistry locals for printing

External References

Name	Field # of Occurrence
$$RESULT^GMTSLRCE	CHSET+3
DEM^GMTSU	XTRCT+25
REGDTM4^GMTSU	CHSET+4

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^LAB(60 - [#60]	XTRCT+24, XTRCT+25, CHEM+1, CHSET+6, CHSET+7
^LAB(61 - [#61]	CHSET+5
^LR - [#63]	CHEM+2, CHSET+2, CHSET+5, CHSET+13, CHSET+15
^TMP("LRS"	XTRCT+24!, CHSET+10, CHSET+12, CHSET+15

Label References

Name	Line Occurrences
CHEM	XTRCT+25
CHSET	CHEM+2

Naked Globals

Name	Field # of Occurrence
^(	CHEM+2, CHSET+2, CHSET+6
^(0	CHSET+6, CHSET+7

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AGE	XTRCT+24~, XTRCT+25*
CNT	XTRCT+24~, XTRCT+25, CHEM+2
COM	XTRCT+24~, CHSET+14, CHSET+15
DESCR	CHSET+1~, CHSET+7*, CHSET+8
DRWDT	CHSET+1~, CHSET+2, CHSET+4, CHSET+12
FLAG	CHSET+1~, CHSET+2*, CHSET+12
GMI	XTRCT+24~, CHSET+15*
GMIDT	CHSET+1~, CHSET+10, CHSET+11, CHSET+12, CHSET+15
>> GMTS1	CHEM+1
>> GMTS2	CHEM+2
>> GMTSAGE	XTRCT+25
>> GMTSI	XTRCT+24, CHSET+10, CHSET+12
HI	CHSET+1~, CHSET+8*, CHSET+9, CHSET+12
IDRWDT	CHEM+1~, CHEM+2, CHSET+2, CHSET+5, CHSET+10, CHSET+11, CHSET+13, CHSET+15
LO	CHSET+1~, CHSET+8*, CHSET+9, CHSET+12
>> LRDFN	CHEM+2, CHSET+2, CHSET+5, CHSET+13, CHSET+15
>> MAX	CHEM+2
PTR	CHEM+1~*, CHEM+2, CHSET+2
RESULT	CHSET+1~, CHSET+2, CHSET+3, CHSET+12
>> RWIDTH	CHSET+3
SITE	CHSET+1~, CHSET+5*, CHSET+7
SPEC	CHSET+1~, CHSET+5*, CHSET+12
>> TEST	XTRCT+24, XTRCT+25, CHEM+1, CHSET+3, CHSET+6, CHSET+7
THER	CHSET+1~, CHSET+7*, CHSET+8
TNM	CHSET+1~, CHSET+6*, CHSET+12
U	XTRCT+24, XTRCT+25, CHEM+1, CHEM+2, CHSET+2, CHSET+5, CHSET+6, CHSET+7, CHSET+8, CHSET+12
UNIT	CHSET+1~, CHSET+8*, CHSET+12
X	XTRCT+24~, CHSET+4*!

Customize PDF page

Package: Health Summary

Routine: GMTSLRSE

Information

Source Information

Call Graph

Call Graph Total: 2

Caller Graph

Caller Graph Total: 2