LRRPLUA ;DALOI/JMC - Lab Report Performing Lab Utility ;10/28/11 16:33
Source file <LRRPLUA.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| SETPL(LRREF,LR4) | ; Set performing lab reference into workbench
 ; Call with LRREF = performing lab reference ; LR4 = performing lab IEN in file #4  | 
|
| ROLLUPPL(LRDFN,LRSS,LRIDT) | ; Roll up performing labs and store in file #63
 ; Call with LRDFN = File #63 internal entry number ; LRSS = File #63 subscript ; LRIDT = inverse date/time of entry in file #63  | 
|
| MERGE | ; Check and merge entries where appropriate.
 | 
|
| CHCHK | ; Find "on file" performing lab for a "CH" test result.
 | 
|
| MIAPCHK | ; Find performing lab for a MI or AP subscript reference
 | 
|
| CHKNODE | ; Check if "on file" node or parent exists and delete "incoming" if it matches "on file" lab
 | 
|
| TEST | ; Entry point to test/debug
 | 
|
| TEST2 | ; Entry point test printing performing lab for an accession
 | 
|
| NOASK | ; Set reference to performing lab in file #63 If ASK PERFORMING LAB =NO
 ; Update if already set otherwise create a new record.  | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  |