OOPSSUP1 ;HINES/WAA-S/E Supervisor Edit routine ;04/17/1998
Source file <OOPSSUP1.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| EN1(CALLER) | ;  Main Entry Point
 | 
|
| SELECT | ; Select a form
 ; Injury (2162,CA1) ; Illness (2162,CA2) ; VA form 2162 ; Get the type of incident ; If the supporting global doesn't exist force the ; Supervisor to fill both the 2162 and supporting form.  | 
|
| INCIDENT(CALLER) | ; Select a case
 | 
|
| SUP(IEN) | ; Supervisor Screen
 | 
|
| SAFETY(IEN) | ; Safety officer screen
 | 
|
| FORMS | ; Process Form
 | 
|
| SIGNS(FORM) | ; Sign/validate Document
 | 
|
| FILE | ;File the ES and send a bull
 | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  | 
| FileNo | Call Tags | 
|---|---|
| ^OOPS(2260 - [#2260] | Classic Fileman Calls, GET1^DIQ |