LRVR4 ;DALOI/CJS/DALOI/FHS - LAB ROUTINE DATA VERIFICATION; Jul 30, 2024@13:42
Source file <LRVR4.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
LOOP | ;
|
|
V36 | ;
|
|
V3 | ;
|
|
V37 | ||
V25 | ;
|
|
V20 | ||
V35 | ;
|
|
LRCFL | ;
|
|
EDIT | ;
|
|
RANGE | ;
; If results from another system, use flags returned with results ; and set LRNG,LRNGS with normals from message. ; Check for LRDUZ(2) set for performing lab or performing lab set (piece 9) in LRSB(LRSB) array. |
|
RQ | ||
NR | ||
PLNR | ; Performing lab normal ranges, use instead of current local ranges
; Retrieve from results when "NPC" node = 2 or greater ; and set LRNG and LRNGS with normals from HL7 message/interface. |
|
CKPLNR | ; Check performing lab normal ranges and set abnormal flag
; based on HL7 messages/interface. |
|
SUBS | ||
WT | ||
COM | ;from LRVR5
|
|
LRSBCOM | ;Display/store comments from the instrument
|
|
LRSBCOM1 | ; Store instrument comments in file #63
; Check for duplicate comments in ^LAH and ^LR globals |
|
FILECOM(LRDFN,LRIDT,LRCMT) | ; File comment in field #99
; Call with LRDFN = ien of patient in file #63 ; LRIDT = ien of specimen date/time ; LRCMT = comment to store |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | GETS^DIQ |
63.04 | EXTERNAL^DILFD, GET1^DID |