RARTE3 ;HISC/GJC-Create a skeletal report, store in Error Reports multiple ;2/4/97 09:39
Source file <RARTE3.m>
| Package | Total | Call Graph | 
|---|---|---|
| Kernel | 1 | $$NOW^XLFDT | 
| VA Fileman | 1 | UPDATE^DIE | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| EN1(RADA) | ; Create the 'Error Reports' sub-record. ; Input: 'RADA': IEN of the report in file 74. ; Create the record, enter when the report was unverified. | |
| WARN1 | ||
| CHK17 | ; called from routine RARTE1 ; check 17th piece of exam with same pat/dttm/longcn ; values of RAOK: ; 1 = unknown case no. or unknown case ien, CAN'T DELETE REPORT ; 2 = exm doesn't point to this rpt, CAN DELETE BUT NOT UPGRADE EXM STAT ; 3 = all okay | |
| WARN2 | ||
| WARNQ | ||
| ZERO | ; setup the ^TMP($J,"RA AUTOE" global with a zero node | |
| PRESS | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^RADPT - [#70] | CHK17+12, CHK17+14 | 
| ^RARPT - [#74] | ZERO+1*, ZERO+4* | 
| ^TMP($J | EN1+3, EN1+9, EN1+10!, ZERO+3, ZERO+4 | 
| Name | Line Occurrences | 
|---|---|
| PRESS | CHK17+11, CHK17+13, CHK17+14 | 
| WARN1 | CHK17+11, CHK17+13 | 
| WARN2 | CHK17+14 | 
| ZERO | EN1+10 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| DTIME | PRESS | 
| I | ZERO+2~*, ZERO+3*, ZERO+4 | 
| >> RA0 | CHK17+7, CHK17+10 | 
| >> RACN | CHK17+10*, CHK17+11, CHK17+12 | 
| >> RACNI | CHK17+12*, CHK17+13, CHK17+14 | 
| RACNT | EN1+4~, EN1+9*, ZERO+1 | 
| RADA | EN1~, EN1+5, EN1+8*, ZERO+1, ZERO+4 | 
| RADA(1 | EN1+8*, ZERO+1, ZERO+4 | 
| >> RADFN | CHK17+7*, CHK17+12, CHK17+14 | 
| >> RADTI | CHK17+7*, CHK17+12, CHK17+14 | 
| RAIEN | EN1+4~, CHK17+14 | 
| RAIEN(1 | EN1+8 | 
| RANEW | EN1+4~ | 
| RANEW( | EN1+5* | 
| RANOW | EN1+4~*, EN1+5, ZERO+1 | 
| >> RAOK | CHK17+6*, WARN1+2*, WARN2+1* | 
| X | EN1+4~, PRESS* |