LRVRPOC ;DALOI/JMC - POINT OF CARE VERIFICATION; DEC 13, 2024@11:21
Source file <LRVRPOC.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; Entry Point Call with LRLL=Load/Worklist IEN
|
|
| NEXT | ; Clean up between entries
|
|
| END | ; Clean up and quit
; Release lock |
|
| LOOK | ; Check for data
|
|
| FNLRDFN(DFN) | ;Lookup/set LRDFN and define patient variables
|
|
| NEWPT(DFN) | ;Set ^LR( root for patient
|
|
| DPT(DFN) | ;
|
|
| REPLAB(LROLLOC) | ;Check parameter for reporting facility
|
|
| DATA(LRLL,LAIEN) | ;Extract results into LROT(
|
| FileNo | Call Tags |
|---|---|
| ^DPT - [#2] | GET1^DIQ |
| ^DIC(4 - [#4] | GET1^DIQ |
| ^DG(40.8 - [#40.8] | GET1^DIQ |
| ^DIC(42 - [#42] | GET1^DIQ |
| ^SC - [#44] | GET1^DIQ |
| ^LAHM(62.48 - [#62.48] | GET1^DIQ |
| ^LAHM(62.49 - [#62.49] | GET1^DIQ |