Global: ^PRSE(452.5

Information

FileMan FileNo	FileMan Filename	Package
452.5	PRSE EDUCATION PRESENTATION MEDIA	PAID

Package	Total	Routines
PAID	3	LABOR DISTRIBUTION PRSEED4 ^PRSE(452.5

Package	Total	Routines
PAID	1	PRSEED4

Package	Total	FileMan Files
PAID	1	PRSE EDUCATION REGISTRATION(#452.8)[2]

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	MEDIA SOURCE	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S X=$$UP^XLFSTR(X) K:$L(X)>20!($L(X)<3)!'(X'?1P.E) X` LAST EDITED: `FEB 16, 1994` HELP-PROMPT: `Answer must be 3-20 characters in length` DESCRIPTION: `This field contains the method of media presentation, e.g., video, class room.` TECHNICAL DESCR: `FREE TEXT FIELD` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `452.5^B` `1)= S ^PRSE(452.5,"B",$E(X,1,30),DA)=""` `2)= K ^PRSE(452.5,"B",$E(X,1,30),DA)` `Main index of file entries by media source name.`

MEDIA SOURCE

0;1

FREE TEXT

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

INPUT TRANSFORM: S X=$$UP^XLFSTR(X) K:$L(X)>20!($L(X)<3)!'(X'?1P.E) X
LAST EDITED: FEB 16, 1994
HELP-PROMPT: Answer must be 3-20 characters in length
DESCRIPTION:
This field contains the method of media presentation, e.g., video, class room.
TECHNICAL DESCR:
FREE TEXT FIELD
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 452.5^B
1)= S ^PRSE(452.5,"B",$E(X,1,30),DA)=""
2)= K ^PRSE(452.5,"B",$E(X,1,30),DA)
Main index of file entries by media source name.

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

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

Name	Field # of Occurrence
>> DA	.01(XREF 1S), .01(XREF 1K)
X	.01+1*!, .01(XREF 1S), .01(XREF 1K)