OOPSUTL1 ;HINES/WAA-Utilities Routines ;3/24/98
Source file <OOPSUTL1.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EMP(IEN,SSN,OPEN) | ; DIC filter for Employee enter edit
|
|
WS | ; The following 4 subroutines are added with Patch 8 - DOL project
; Sets the "W" xref. A routine call is used to prevent the inadvertent ; re-indexing of xref. Xref is used for determining which records ; should be included in transmission of claims to DOL. When the record ; is placed in a Mailman message (WC xref set) this xref is killed. ; Variables ; WOK = set in OOPSWCE, used to prevent inadvertent ; re-indexing of ^OOPS(2260,"AW",X,IEN) ; IEN = uses IEN for DA of file 2260 ; X = field 67 (DUZ) |
|
WK | ; Kills the "AW" xref. See above as reason for manually setting
; WOK = set in OOPSWCE, used to prevent inadvertent reindex ; IEN = uses IEN for DA of file 2260 ; X = field 67, file 2260 = DUZ |
|
WCS | ; Sets the "AWC" xref. A routine call is used to prevent inadvertent
; re-indexing of the xref. Xref is used for determining which records ; were included in Mailman messages that transmitted claims to DOL ; Variables ; WOK = set in OOPSWCE, used to prevent inadvertent ; re-indexing of ^OOPS(2260,"AW",DUZ,IEN) ; IEN = record ID file 2260 ; X = field 66 - Date Transmitted to DOL |
|
WCK | ; Kills the "AWC" xref. See above as reason for manually setting
; WOK = set in OOPSWCE, used to prevent inadvertent reindex ; IEN = uses IEN for DA of file 2260 ; X = field 66 - Date Transmitted to DOL |
|
OPEN(IEN,OPEN) | ; Determine if record is open
|
|
EDSTA(IEN,CALLER) | ; Gives the status of form to allows the user to
|
|
EDSEL(IEN,CALLER) | ; Allow you to select the form part to edit
|
|
CLRES(IEN,CALLER,FORM) | ; Clean out electronic SIG
|
|
PAID(IEN,FLD) | ; Get the data value from the PAID file (#450), if employee
; Input - IEN internal entry number of case in file 2260 ; - FLD the PAID field number to retrieve ; - NAME Name of Person Involved, used to get PAID IEN ; - VAL Data value from the PAID #450, field #FLD ; Output - DESC Description from Paid, if there |
|
PAYP(PAY) | ; Map PAID Pay Plan to higher category for DOL project
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^OOPS(2260 - [#2260] | GET1^DIQ |
^PRSPC - [#450] | FIND^DIC, GET1^DIQ |