Global: ^ESP(912.5

FileMan FileNo	FileMan Filename	Package
912.5	ESP POLICE TRAINING	Police and Security

Directly Accessed By Routines, Total: 6

Package	Total	Routines
Police and Security	6	ESP TRAINING ESP TRAINING3 ESP TRAINING4 ^ESP(912.5 SUBJECT TRAINING DATE

Package	Total	FileMan Files
Kernel	1	NEW PERSON(#200)[.01]

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	ATTENDEE	0;1	POINTER TO NEW PERSON FILE (#200)	**********************REQUIRED FIELD********************** NEW PERSON(#200) INPUT TRANSFORM: `S DIC("S")="I $D(^VA(200,""AK.ESP POLICE"",$P(^(0),U)))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X S:$D(X) DINUM=X` LAST EDITED: `JUL 19, 1993` HELP-PROMPT: `Answer must be [3-30 characters].` DESCRIPTION: `Enter the name of the police officer receiving credit for the training. The officer's name must be entered into the NEW PERSON file (200) and must also be assigned the ESP POLICE Security Key.` SCREEN: `S DIC("S")="I $D(^VA(200,""AK.ESP POLICE"",$P(^(0),U)))"` EXPLANATION: `Select a police officer currently assigned to the Service.` NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `912.5^B` `1)= S ^ESP(912.5,"B",$E(X,1,30),DA)=""` `2)= K ^ESP(912.5,"B",$E(X,1,30),DA)`
5	TRAINING DATE	5;0	DATE Multiple #912.55	912.55 DESCRIPTION: `This field is used to record the date that training was received.`

ATTENDEE

0;1

POINTER TO NEW PERSON FILE (#200)

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

INPUT TRANSFORM: S DIC("S")="I $D(^VA(200,""AK.ESP POLICE"",$P(^(0),U)))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X S:$D(X) DINUM=X
LAST EDITED: JUL 19, 1993
HELP-PROMPT: Answer must be [3-30 characters].
DESCRIPTION:
Enter the name of the police officer receiving credit for the training. The officer's name must be entered into the NEW PERSON file (200) and must also be assigned the ESP POLICE Security Key.
SCREEN: S DIC("S")="I $D(^VA(200,""AK.ESP POLICE"",$P(^(0),U)))"
EXPLANATION: Select a police officer currently assigned to the Service.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 912.5^B
1)= S ^ESP(912.5,"B",$E(X,1,30),DA)=""
2)= K ^ESP(912.5,"B",$E(X,1,30),DA)

TRAINING DATE

5;0

DATE Multiple #912.55

DESCRIPTION:
This field is used to record the date that training was received.

Name	Field # of Occurrence
^DIC	.01+1

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