OOPSPRT2 ;HINES/WAA-Print CA1/CA2 Routines ;3/24/98
Source file <OOPSPRT2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN1(CALLER) | ;
; Input: ; Caller O = Safety Officer ; S = Supervisor ; E = Employee ; |
|
| EXIT | ;
|
|
| FORM() | ;Select a form to print
|
|
| SELECT(CALLER) | ; Select a case to print
|
|
| EMP(IEN) | ; Employee
|
|
| SUP(IEN) | ; Supervisor
|
|
| SAF(IEN) | ; Safety Officer
|
|
| DEVICE | ; This is the device selection routine.
|
|
| ; This is the main print portion of the routine
|
||
| END | ; exit the report
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^OOPS(2260 - [#2260] | Classic Fileman Calls, GET1^DIQ |