LREGFR2 ;DALOI/SDV/AH/GDU Calculate Creatinine-eGFR ;Nov 12, 2020@15:02
Source file <LREGFR2.m>
Package | Total | Call Graph |
---|---|---|
VA FileMan | 2 | $$GET1^DID $$GET1^DIQ |
Kernel | 1 | $$FMDIFF^XLFDT |
Lab Service | 1 | FILECOM^LRVR4 |
Registration | 1 | DEM^VADPT |
Name | Comments | DBIA/ICR reference |
---|---|---|
STRT(DFN,LRTR) | ; Start Processing the Routine
; Call with DFN = parent file ien ; LRTR = serum creatinine value as mg/dl |
|
RACE(DFN) | ; Get Race
; Call with DFN = ien of PATIENT file (#2) ; Returns XRC = 1 (African American) ; 0 (non African American) ; U (unknown) |
FileNo | Call Tags |
---|---|
^LAB(60 - [#60] | GET1^DIQ |
^LAB(62.1 - [#62.1] | GET1^DIQ |
63.04 | GET1^DID |
^LRT(67 - [#67] | GET1^DIQ |
^LRT(67.1 - [#67.1] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^LR - [#63] | STRT+24 |
^TMP("LR" | STRT+22 |
Name | Line Occurrences |
---|---|
$$RACE | STRT+46 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
AGE | STRT+7~, STRT+27*, STRT+28*, STRT+29, STRT+34, STRT+53 |
DFN | STRT~, STRT+39, STRT+40, STRT+46, RACE~, RACE+19 |
>> DOB | STRT+28 |
DUZ | STRT+59 |
DUZ(2 | STRT+59 |
>> LRCDT | STRT+28 |
LRDC | STRT+7~, STRT+10*, STRT+11 |
>> LRDFN | STRT+15, STRT+24, STRT+31, STRT+36, STRT+43, STRT+60 |
>> LRDPF | STRT+38, STRT+39, STRT+40, RACE+11, RACE+18 |
LREGFR | STRT+52~, STRT+53*, STRT+54*, STRT+55*, STRT+56, STRT+58 |
>> LRGVP | STRT+5 |
>> LRIDT | STRT+15, STRT+24, STRT+31, STRT+36, STRT+43, STRT+60 |
>> LRNG | STRT+10 |
LRRC | STRT+7~, STRT+46*, STRT+55, STRT+60 |
>> LRSB | STRT+18, STRT+23 |
>> LRSB( | STRT+18, STRT+23, STRT+30*, STRT+35*, STRT+42*, STRT+58*, STRT+59* |
LRTN | STRT+7~, STRT+13*, STRT+14, STRT+18, STRT+22, STRT+24, STRT+30, STRT+35, STRT+42, STRT+57 , STRT+58, STRT+59 |
LRTR | STRT~, STRT+18, STRT+23, STRT+51, STRT+53 |
LRX | STRT+7~, STRT+11*, STRT+12, STRT+52~, STRT+57*, STRT+58 |
LRY | STRT+7~, STRT+10*, STRT+12*, STRT+13 |
PRMT | STRT+52~ |
SEX | STRT+7~, STRT+37*, STRT+38*, STRT+39*, STRT+40*, STRT+41, STRT+54 |
U | STRT+38, RACE+14, RACE+15 |
VADM | RACE+12~ |
VADM(12 | RACE+14 |
VADM(5 | STRT+38 |
VADM(8 | RACE+15 |
X | STRT+7~ |
XA | RACE+6~, RACE+7*, RACE+25 |
XB | RACE+6~, RACE+7*, RACE+25 |
XC | RACE+6~, RACE+7*, RACE+25 |
XD | RACE+6~, RACE+7*, RACE+28 |
XE | RACE+6~, RACE+7*, RACE+28 |
XRC | RACE+6~, RACE+8*, RACE+14*, RACE+15*, RACE+19*, RACE+22*, RACE+25*, RACE+28*, RACE+30*, RACE+31 |
Y | STRT+7~ |