Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points
Print Page as PDF
Routine: LRDAGE

Package: Lab Service

Routine: LRDAGE


Information

LRDAGE ;DFW/MRL/DALOI/FHS - RETURN TIMEFRAME IN DAYS, MONTHS OR YEARS; 15 MAR 90

Source Information

Source file <LRDAGE.m>

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
Info |  Source |  Entry Points