Sub-Field: 455.512

Parent File	Name	Number	Package
T&L UNIT(#455.5)	OT/CT APPROVER	455.512	PAID

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	OT/CT APPROVER	0;1	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) INPUT TRANSFORM: `I $D(X) S DINUM=X` LAST EDITED: `NOV 10, 1990` DESCRIPTION: `This is a pointer into file 200 and represents an OT/CT approver for this T&L unit.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `455.512^B` `1)= S ^PRST(455.5,DA(1),"A","B",$E(X,1,30),DA)=""` `2)= K ^PRST(455.5,DA(1),"A","B",$E(X,1,30),DA)` CROSS-REFERENCE: `455.5^AA^MUMPS` `1)= S ^PRST(455.5,"AA",DA,DA(1))=""` `2)= K ^PRST(455.5,"AA",DA,DA(1))` `This is a cross-reference by User of all T&L units for which the user is an OverTime/CompTime approver.`

OT/CT APPROVER

0;1

POINTER TO NEW PERSON FILE (#200)

INPUT TRANSFORM: I $D(X) S DINUM=X
LAST EDITED: NOV 10, 1990
DESCRIPTION:
This is a pointer into file 200 and represents an OT/CT approver for this T&L unit.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 455.512^B
1)= S ^PRST(455.5,DA(1),"A","B",$E(X,1,30),DA)=""
2)= K ^PRST(455.5,DA(1),"A","B",$E(X,1,30),DA)
CROSS-REFERENCE: 455.5^AA^MUMPS
1)= S ^PRST(455.5,"AA",DA,DA(1))=""
2)= K ^PRST(455.5,"AA",DA,DA(1))
This is a cross-reference by User of all T&L units for which the user is an OverTime/CompTime approver.