Routine: OOPSGUI4

Information

OOPSGUI4 ;WIOFO/LLH-RPC BROKER CALLS ;10/02/01

Name	Comments	DBIA/ICR reference
PAID(RESULTS,NAME)	; retrieves PAID employee and data from file 450 ; Input: NAME - the Employee or partial Name Passed in ; Output: RESULTS - array containing PAID fields in the order returned ; from FIND^DIC
ASISTS(RESULTS,NAME)	; Lookup on ASISTS Accident Reporting file_2260 ; Input: - Name or partial name of person to lookup on ; Output: - array with name of person, sex, DOB, and SSN
PER(RESULTS,NAME)	; Lookup for Non-Paid Employee (New Person file_ ; Input: - Name or partial name of person to lookup on ; Output: - array with name of new person, sex, DOB, and SSN
SUPER(RESULTS,NAME,EMPSSN)	; Lookup for Supervisors or anyone from the New ; Person file. Broker call will also be used to ; lookup Union Reps for the Enter/Edit Union Information. ; Input: NAME - Name or partial name of person to lookup on ; SSN - SSN of the Person Involved if called from 2162 ; Output: RESULTS - array with name of new person, sex, DOB, and SSN
LOAD(RESULTS,ARR)	; Create new OOPS record ; Input: ARR - contains data entered from the Create Incident ; Report Option ; Output: RESULTS - status message
DELETE	;Delete incomplete case
VAL(DA,FIELD,VALUE)	;Validate Input ; Input: DA - IEN of the ASISTS record ; FIELD - field number for data to be validated ; VALUE - data to be validated ; Output: none
DUP(RESULTS,SSN)	; Duplicate Case error checking broker call ; Input: INPUT - SSN of current ASISTS case number ; Output: RESULTS - return array with case information

FileNo	Call Tags
^VA(200 - [#200]	FIND^DIC, GET1^DIQ
^OOPS(2260 - [#2260]	Classic Fileman Calls, FIND^DIC, GET1^DID, GET1^DIQ, VAL^DIE
^PRSPC - [#450]	FIND1^DIC, FIND^DIC, GET1^DIQ