Global: ^PRSE(452.51

FileMan FileNo	FileMan Filename	Package
452.51	PRSE EMPLOYEE PURPOSE OF TRAINING	PAID

Directly Accessed By Routines, Total: 6

Package	Total	Routines
PAID	6	PRSEFIX ^PRSE(452.51 LABOR DISTRIBUTION PRSEED12 PRSEED9 PRSEPOL1

Package	Total	FileMan Files
PAID	2	PRSE STUDENT EDUCATION TRACKING(#452)[4.1] PRSE EDUCATION REGISTRATION(#452.8)[10]

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	PURPOSE OF TRAINING	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S X=$$UP^XLFSTR(X) K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X` LAST EDITED: `FEB 16, 1994` HELP-PROMPT: `Answer must be 3-30 characters in length` DESCRIPTION: `This field contains a reason for attending a program or class. Refer to VA Form 5-4691, field 9.` TECHNICAL DESCR: `FREE TEXT FIELD` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `452.51^B` `1)= S ^PRSE(452.51,"B",$E(X,1,30),DA)=""` `2)= K ^PRSE(452.51,"B",$E(X,1,30),DA)` `Main index of file entries by purpose of training name.`
1	PAID CODE	0;2	FREE TEXT	INPUT TRANSFORM: `S X=$$UP^XLFSTR(X) K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>3!($L(X)<1) X` LAST EDITED: `AUG 22, 1994` HELP-PROMPT: `Answer must be 1-3 characters in length.` DESCRIPTION: `This is a code associated with this reason for training to be used by the PAID system.` TECHNICAL DESCR: `FREE TEXT FIELD` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `452.51^CODE` `1)= S ^PRSE(452.51,"CODE",$E(X,1,30),DA)=""` `2)= K ^PRSE(452.51,"CODE",$E(X,1,30),DA)` `Indexes file entries by PAID code.`

PURPOSE OF TRAINING

0;1

FREE TEXT

************************REQUIRED FIELD************************

INPUT TRANSFORM: S X=$$UP^XLFSTR(X) K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
LAST EDITED: FEB 16, 1994
HELP-PROMPT: Answer must be 3-30 characters in length
DESCRIPTION:
This field contains a reason for attending a program or class. Refer to VA Form 5-4691, field 9.
TECHNICAL DESCR:
FREE TEXT FIELD
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 452.51^B
1)= S ^PRSE(452.51,"B",$E(X,1,30),DA)=""
2)= K ^PRSE(452.51,"B",$E(X,1,30),DA)
Main index of file entries by purpose of training name.

PAID CODE

0;2

FREE TEXT

INPUT TRANSFORM: S X=$$UP^XLFSTR(X) K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>3!($L(X)<1) X
LAST EDITED: AUG 22, 1994
HELP-PROMPT: Answer must be 1-3 characters in length.
DESCRIPTION:
This is a code associated with this reason for training to be used by the PAID system.
TECHNICAL DESCR:
FREE TEXT FIELD
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 452.51^CODE
1)= S ^PRSE(452.51,"CODE",$E(X,1,30),DA)=""
2)= K ^PRSE(452.51,"CODE",$E(X,1,30),DA)
Indexes file entries by PAID code.

PURPOSE OF TRAINING: MISSION OR PROGRAM CHANGE	PURPOSE OF TRAINING: NEW TECHNOLOGY	PURPOSE OF TRAINING: NEW WORK ASSIGNMENT	PURPOSE OF TRAINING: IMPROVE PRESENT PERFORMANCE	PURPOSE OF TRAINING: MEET FUTURE STAFFING NEEDS	PURPOSE OF TRAINING: DEVELOP NEW SKILLS	PURPOSE OF TRAINING: TRADE OR CRAFT APPRENTICESHIP	PURPOSE OF TRAINING: ORIENTATION
PURPOSE OF TRAINING: ADULT BASIC EDUCATION	PURPOSE OF TRAINING: EMPLOYEE FINANCED

Name	Field # of Occurrence
$$UP^XLFSTR	.01+1, 1+1

Name	Line Occurrences (* Changed, ! Killed)
^PRSE(452.51 - [#452.51]	.01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K)

Name	Field # of Occurrence
^(0	ID1+1