LRAPRES ;DALOI/STAFF,PMK - AP ESIG RELEASE REPORT ;17 Sep 2013 10:52 AM
Source file <LRAPRES.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| MAIN | ;
 | 
|
| ACCPN | ; Prompt for accession number or patient name
 | 
|
| TITLE | ; Title
 | 
|
| CPTCHK | ; Determine if CPT is activated
 | 
|
| DEMARR | ;
 | 
|
| MENU | ;
 | 
|
| SECTION | ; Choose Anatomic Pathology section (AU,SP,CY,EM)
 | 
|
| ACCYR | ; Determine Accession Year
 | 
|
| RELCHK | ; Perform series of checks
 | 
|
| BROWSE | ; Display the report in the browser
 | 
|
| ESIG | ; Prompt for electronic signature
 | 
|
| TIUPREP | ;
 | 
|
| RELEASE | ; Release the report
 | 
|
| STORE | ; Store report in TIU
 | 
|
| WKLD | ; Capture workload
 | 
|
| ACCCOMP | ; Complete tests on accession
 | 
|
| END | ; Clean-up variables and quit
 | 
| 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 | 
  | 
| FileNo | Call Tags | 
|---|---|
| ^LR - [#63] | Classic Fileman Calls, GET1^DIQ |