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 |