OOPSWCSE ;WIOFO/LLH-Workers' Comp Sign for Employee ;01/20/01
Source file <OOPSWCSE.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN1(CALLER) | ; Entry point for routine
; Input: CALLER = "S" for Safety Officer ; "H" for Employee Health ; "W" for Workers' Comp |
|
WCPS4E | ; allow WCP to sign for employee if all approvals given
|
|
EXIT | ;
|
|
VALID() | ; make sure same person is not signing for both safety and EH and if
; signed from menu option being called not needed again - so quit |
|
SCR(IEN) | ; Screen to allow access to claims that have not been
; signed by the Employee ; Input: IEN = Internal record number of claim |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^OOPS(2260 - [#2260] | Classic Fileman Calls, GET1^DIQ |