LREGFR ;DALOI/STAFF - Calculate Creatinine-eGFR ;Nov 12, 2020@15:02
Source file <LREGFR.m>
| 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) |
|
| CHKDUP(LRDFN,LRIDT,LRSBCOM) | ; Check for duplicate comment
; Call with LRDFN = File #63 internal entry number ; LRIDT = inverse date/time ; LRSBCOM = comment to check if duplicate |
| 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 |