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! |