Global: ^ESP(912.5

Information

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

The ESP POLICE TRAINING file contains data recording the types of training, subject matter and number of minutes of training received for each VA Police Officer.

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.