Sub-Field: 452.8894

Parent File	Name	Number	Package
452.889	STUDENT NAME	452.8894	PAID

Details

Field #	Name	Loc	Type	Details
.01	STUDENT NAME	0;1	POINTER TO NEW PERSON FILE (#200)	**********************REQUIRED FIELD********************** NEW PERSON(#200) LAST EDITED: `MAY 20, 1993` DESCRIPTION: `This field contains the name of the employee attending this class.` CROSS-REFERENCE: `452.8894^B` `1)= S ^PRSE(452.8,DA(2),3,DA(1),1,"B",$E(X,1,30),DA)=""` `2)= K ^PRSE(452.8,DA(2),3,DA(1),1,"B",$E(X,1,30),DA)` `Main index on Student Sub-file containing entries that point to the New Person (#200) File.`
1	SERVICE	0;2	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S X=$$UP^XLFSTR(X) K:$L(X)>30!($L(X)<3) X` LAST EDITED: `AUG 22, 1994` HELP-PROMPT: `Answer must be 3-30 characters in length` DESCRIPTION: `This field associates a service with an employee.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`
3	S.S.N.	0;4	NUMBER	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:+X'=X!(X>999999999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `JUN 02, 1994` HELP-PROMPT: `Type a Number between 1 and 999999999, 0 Decimal Digits.` DESCRIPTION: `This field contains the employee's social security number.`
4	EMPLOYEE/NON-EMPLOYEE	0;3	SET	'N' FOR NON-EMPLOYEE; 'E' FOR EMPLOYEE; INPUT TRANSFORM: `S X=$$UP^XLFSTR(X)` LAST EDITED: `SEP 23, 1994` DESCRIPTION: `This field indicates whether the student is an employee or non-employee.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER`