©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
BQIAGE ;PRXM/HC/ALA - Age Function calls ; 06 Nov 2006 1:23 PM
Source file <BQIAGE.m>
| Package | Total | Call Graph |
|---|---|---|
| IHS Patient | 1 | $$AGE^AUPNPAT |
| Kernel | 1 | $$FMDIFF^XLFDT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| AGE(D0,PDATE,QUAL) | ;EP
; Description ; This program is copied from the computed AGE field (2,.033) which ; calculates the AGE of a person based on their DOB (date of birth) ; and either the current date (DT) or their DOD (date of death) ; ; It has been modified to use another date passed into this function ; instead of just the previous two dates, DT and DOD. ; ; Input ; D0 - Patient IEN ; PDATE - Other date to compare patient's date of birth with ; QUAL - Include qualifier (YRS, DYS, MOS) |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | AGE+22, AGE+31, AGE+46 |
| Name | Field # of Occurrence |
|---|---|
| ^( | AGE+22, AGE+31, AGE+46 |
| ^(0 | AGE+22 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| AUX | AGE+19~, AGE+47*, AGE+48 |
| D0 | AGE~, AGE+17, AGE+22, AGE+31, AGE+46 |
| DT | AGE+22, AGE+31, AGE+46 |
| PDATE | AGE~, AGE+16*, AGE+17, AGE+22, AGE+31, AGE+46 |
| QFLR | AGE+19~, AGE+48*, AGE+49 |
| QUAL | AGE~, AGE+16*, AGE+17, AGE+20*, AGE+21, AGE+45, AGE+49 |
| U | AGE+26, AGE+36, AGE+46 |
| X | AGE+19~, AGE+22*, AGE+23*, AGE+24*, AGE+25*, AGE+26*, AGE+27*, AGE+28*, AGE+29*, AGE+30* , AGE+31*, AGE+32*, AGE+33*, AGE+34*, AGE+35, AGE+36*, AGE+37*, AGE+38*, AGE+39*, AGE+40* , AGE+41*, AGE+46*, AGE+47, AGE+48, AGE+49 |
| Y | AGE+19~, AGE+30*, AGE+41* |
| Y(2 | AGE+22*, AGE+23*, AGE+24*, AGE+25*, AGE+26, AGE+27*, AGE+28*, AGE+29, AGE+30, AGE+31* , AGE+32*, AGE+33*, AGE+34, AGE+35*, AGE+36, AGE+37*, AGE+38*, AGE+40, AGE+41 |