RARTVER2 ;HISC/FPT-On-line Verify Radiology Reports (cont.) ;11/19/97 13:47
Source file <RARTVER2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| RESTORE | ; Restore the variables that were saved above.
|
|
| RASET | ; raset^rautl2 returns radfn,radti,racni's "P"-node
|
|
| RETURN | ; On-line verifier deletes resident pre-verification values. Report
; will reappear in the resident's list of choices for the resident ; pre-verification option |
|
| SETTMP | ;
|
|
| PRTRPT | ||
| LOCK | ; Display the warning message when a user is trying to edit a
; locked report |
|
| ERR(RA) | ; Display inactive physician message.
|
|
| DISRPT | ; Display the report
|
|
| EDTCHK | ; is user permitted to edit?
|
|
| ADDLRPT | ; add'l reports to be verified
|
|
| SAVE | ; Save key variables. User can first print a report to a slave printer
; in which case the key variables are killed by the printing program. ; These variables are needed if the user then decides to CONTINUE ; editing the STATUS. |
|
| CU | ; clean-up variables
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^RARPT - [#74] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | RASET+1 |
| ^RA(72 - [#72] | EDTCHK+2 |
| ^RADPT - [#70] | EDTCHK+1 |
| ^RAMIS(71 - [#71] | RASET+1 |
| ^RARPT - [#74] | ADDLRPT+3, ADDLRPT+5, LOCK+2 |
| ^TMP($J | ADDLRPT+4, SETTMP+2*, CU+2! |
| ^VA(200 - [#200] | ERR+1, ERR+2 |
| ^XUSEC("RA MGR" | EDTCHK+4 |
| Name | Line Occurrences |
|---|---|
| RASET | DISRPT+1 |
| SETTMP | ADDLRPT+8, ADDLRPT+9, ADDLRPT+10, ADDLRPT+11, ADDLRPT+12 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | ADDLRPT+3, RASET+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | CU+1! |
| %DT | CU+1! |
| %W | CU+1! |
| %Y1 | CU+1! |
| D | CU+3! |
| D0 | CU+3! |
| D1 | CU+3! |
| DA | CU+1!, RETURN+13~, RETURN+14* |
| DDER | CU+3! |
| DGO | CU+1! |
| DI | CU+1! |
| DIC | CU+1! |
| DIE | RETURN+13~, RETURN+14* |
| DIR | ADDLRPT+13!, RETURN+3~, LOCK+3! |
| DIR("?" | RETURN+5*, RETURN+6*, RETURN+7*, RETURN+8*, RETURN+9* |
| DIR("A" | ADDLRPT+13*, RETURN+4* |
| DIR(0 | ADDLRPT+13*, RETURN+10*, LOCK+3* |
| DIROUT | ADDLRPT+13!, RETURN+3~, LOCK+3! |
| DIRUT | ADDLRPT+13!, RETURN+3~, RETURN+12, LOCK+3! |
| DISYS | CU+3! |
| DIWF | CU+1! |
| DIWR | CU+1! |
| DLAYGO | CU+3! |
| DR | RETURN+13~, RETURN+14* |
| DTOUT | ADDLRPT+13!, RETURN+3~, LOCK+3! |
| DUOUT | ADDLRPT+13!, RETURN+3~, LOCK+3! |
| DUZ | EDTCHK+4 |
| I | CU+1! |
| ION | PRTRPT+2* |
| >> IOP | PRTRPT+2* |
| OREND | CU+1! |
| POP | CU+1! |
| RA | CU+1!, ERR~, ERR+1, ERR+2 |
| RACHOICE | ADDLRPT+2, ADDLRPT+8, ADDLRPT+9, ADDLRPT+10, ADDLRPT+11, ADDLRPT+12, CU+1! |
| RACI | CU+3! |
| RACN | CU+1!, LOCK+2*, LOCK+3! |
| RACNI | CU+1!, EDTCHK+1 |
| RACS | CU+1! |
| RACT | CU+1! |
| RAD | ADDLRPT+3, CU+1! |
| RADATE | CU+1! |
| RADFN | CU+1!, RASET+1, EDTCHK+1 |
| RADIV | CU+1! |
| RADTE | CU+1! |
| RADTI | CU+1!, EDTCHK+1 |
| RADUP | CU+1! |
| RADUZ | CU+1! |
| RAERR | CU+1! |
| RAFLG | CU+1! |
| RAI | SAVE+4~, SAVE+5*, RESTORE+1~, RESTORE+2*, RESTORE+3* |
| RAIMGTYI | CU+1! |
| RAIMGTYJ | CU+1! |
| RAJ1 | CU+1! |
| >> RAMDV | EDTCHK+5 |
| >> RAMES | PRTRPT+3* |
| >> RAMLC | PRTRPT+2 |
| RANM | CU+2! |
| RANME | CU+2!, RASET+1* |
| RANUM | CU+2! |
| RAONLINE | CU+2! |
| RAOR | CU+2! |
| RAOUT | CU+2! |
| RAPGM | CU+2! |
| RAPRC | CU+2!, RASET+1* |
| RAPRIT | CU+2! |
| RARAD | CU+2! |
| RARADHLD | ADDLRPT+3, CU+2! |
| RARDX | CU+2!, EDTCHK+7* |
| RARESFLG | CU+2! |
| RARLTV | CU+2! |
| RARLTVFL | ADDLRPT+14*, CU+2! |
| RARPDT | CU+2! |
| RARPT | ADDLRPT+1*, ADDLRPT+3*, ADDLRPT+4, ADDLRPT+5, ADDLRPT+6, SETTMP+1, SETTMP+2, CU+2!, RETURN+14, RASET+1 , LOCK+2 |
| RARPTX | CU+2! |
| RARTDT | ADDLRPT+3*, ADDLRPT+4, SETTMP+2, CU+2! |
| RARTVER | CU+2!, DISRPT+1*! |
| RARTVERF | CU+2! |
| RASAVE | RESTORE+4! |
| RASAVE( | SAVE+5*, RESTORE+3 |
| RASET | CU+2! |
| RASIG | CU+2! |
| RASN | CU+2! |
| RASTAFF | CU+2! |
| RASTATUS | EDTCHK+1*, EDTCHK+2!, EDTCHK+3! |
| RASTI | CU+2! |
| RATOT | ADDLRPT+1*, ADDLRPT+13*, ADDLRPT+14, SETTMP+2*, CU+2! |
| RAVER | CU+2! |
| RAVNB | CU+2! |
| RAXX | CU+2! |
| RPTX | CU+2! |
| U | ADDLRPT+8, ADDLRPT+9, ADDLRPT+10, ADDLRPT+11 |
| X | ADDLRPT+5*, ADDLRPT+7, ADDLRPT+8, ADDLRPT+9, ADDLRPT+10, ADDLRPT+11, CU+2! |
| X1 | CU+3! |
| Y | SETTMP+1*, CU+2!, RETURN+12, DISRPT+1, RASET+1* |
| Y(0 | RASET+1* |
| ZTSK | CU+3! |