OOPSGUI1 ;WIOFO/LLH - RPC routines ;9/3/01
Source file <OOPSGUI1.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
OPT(RESULTS,INP) | ; Returns the ASISTS GUI Menus user has access to
; INP - Input String containing the version of GUI making call ; RESUTLS - return value for broker call ; P1 = 1 DUZ defined ; P2 = 1 Emp Health menu accessible ; P3 = 1 Employee menu accessible ; P4 = 1 Supervisor menu accessible ; P5 = 1 Safety Officer menu accessible ; P6 = 1 Union menu accessible ; P7 = 1 Workers' Comp menu accessible ; P8 = SSN from New Person file for user ; P9 = server version # |
|
SETSIGN(RESULTS,INPUT,SIGN) | ; This subroutine validates that the signature
; can be entered and is valid ; Input: INPUT - Contains the IEN of the ASISTS case, the form type, ; and the field number. The field number is used ; to trigger what validation should be preformed on ; the fields in the form so that the signature can ; be applied. The fourth parameter is a special flag ; indicating the Workers Comp is signing for employee ; Format is IEN^FORM^FIELD^WCFLAG ; SIGN - contains the signature test to be encrypted. ; Output: RESULTS - is an array containing a list of fields that did ; not pass the data validation and must be corrected ; prior to applying a signature. |
|
SIGN | ; All field validated, file signature
|
|
VALIDATE(X) | ; Validate Electronic Sign code
; Input: X - contains the signature to be validated ; Output: VSIGN - contains a 1 if a valid e-signature, a 0 if not valid |
|
CHKPAID | ; check to make sure PAID fields have data, if not populate
; this subroutine can be removed when go completely to GUI |
|
VALEMP(RESULTS,INPUT) | ; This broker call should be used if the Pay
; Plan = "OT" (other) to determine if the claim ; can be successfully submitted to DOL. The PERSONNEL ; STATUS is assumed to equal 1 (employee) |
RPC Name | Call Tags |
---|---|
OOPS REMOTE GET USER OPTIONS | OPT |
OOPS VALIDATE AND SIGN | SETSIGN |
OOPS CHECK PAID EMP DATA | VALEMP |
FileNo | Call Tags |
---|---|
^DIC(19 - [#19] | GET1^DIQ |
^VA(200 - [#200] | GET1^DIQ |
^OOPS(2260 - [#2260] | Classic Fileman Calls, GET1^DIQ |