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 |