Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping

Info | Source | Call Graph | Caller Graph | Entry Points | External References | Label References | Local Variables | All

Print Page as PDF

Routine: LRDAGE

Package: Lab Service

Routine: LRDAGE

Information

LRDAGE ;DFW/MRL/DALOI/FHS - RETURN TIMEFRAME IN DAYS, MONTHS OR YEARS;JUL 06, 2010 3:14 PM

Source Information

Source file <LRDAGE.m>

Call Graph

Call Graph Total: 3

Package	Total	Call Graph
VA Fileman	2	^%DT GETS^DIQ
Kernel	1	($$DT,$$FMDIFF)^XLFDT

Caller Graph

Caller Graph Total: 5

Package	Total	Caller Graph
Lab Service	3	LRLNC63A LRRP1 LRRPU
IHS Changes To Lab	2	BLRAGUT BLRAGUT1

Entry Points

Name	Comments	DBIA/ICR reference
DFN(DFN,FILE,LRCDT)	; Call returns patient age based on specimen collection date ; Age is returned as day (dy) month (mo) or years (yr) ; DFN = IEN of patient ; FILE = File number where patient is found ; LRCDT = Specimen collection date otherwise age will be calculated ; using the current date ; Sex is a coded value of Male = "M" (default) Female = "F" ; DOD = Date of Death
DATE(DOB,LRCDT)	;Entry point if passing only a valid Date without patient ; Dates must be defined in VA FileManager internal format. ; DOB, Date of birth ; LRCDT = collection date ; Date formate error will return 99yr
CALC	;Calculate timeframe based on difference between DOB and collection ; date. Time is stripped off. ; .0001-24 hour = dy ; 0-29 days = dy ; 30-730 dy = mo ; >24 mo = yr

External References

Name	Field # of Occurrence
^%DT	DATE+19, DATE+22
GETS^DIQ	DFN+12
$$DT^XLFDT	DFN+9, DATE+9
$$FMDIFF^XLFDT	CALC+12

Label References

Name	Line Occurrences
$$DATE	DFN+16

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	DATE+8~, DATE+22!
>> AGE	DFN+11, DFN+16
DFN	DFN~, DFN+12, DFN+13, DFN+14, DFN+15
DOB	DFN+14, DFN+16, DATE~, DATE+10, DATE+12, DATE+13, DATE+17, DATE+18, CALC+8, CALC+9 , CALC+10, CALC+12
>> DOD	DFN+15*
FILE	DFN~, DFN+12, DFN+13, DFN+14, DFN+15
LRCDT	DFN~, DFN+9, DFN+10, DFN+16, DATE~, DATE+9, DATE+13, DATE+17, DATE+18, DATE+20 , CALC+8, CALC+9, CALC+10, CALC+12
LRSAGE	DFN+8~
LRSAGE(	DFN+13, DFN+14, DFN+15
>> SEX	DFN+11, DFN+13
X	DATE+8~, DATE+13, DATE+20, CALC+10, CALC+11, CALC+12, CALC+13, CALC+14*
Y	DATE+8~, DATE+19, DATE+22

Info | Source | Call Graph | Caller Graph | Entry Points | External References | Label References | Local Variables | All