Sub-Field: 618.419

Parent File	Name	Number	Package
MENTAL HEALTH INPT(#618.4)	PAST TEAMS	618.419	Mental Health

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	PAST TEAMS	0;1	POINTER TO MENTAL HEALTH TEAM FILE (#618.2)	MENTAL HEALTH TEAM(#618.2) DESCRIPTION: `Previous team assigned to the patient. This data is automatically set by the package.` CROSS-REFERENCE: `618.419^B` `1)= S ^YSG("INP",DA(1),6,"B",$E(X,1,30),DA)=""` `2)= K ^YSG("INP",DA(1),6,"B",$E(X,1,30),DA)`
1	DATE ENTERED	0;2	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="ETX" D ^%DT S X=Y K:Y<1 X` DESCRIPTION: `Date the patient entered ward and was assigned the specific team.`
2	ENTERED BY	0;3	POINTER TO NEW PERSON FILE (#200)	**********************REQUIRED FIELD********************** NEW PERSON(#200) DESCRIPTION: `This is the DUZ of the person implemating the transfer of the patient from one ward to another. This is automatically upedted.`

PAST TEAMS

0;1

POINTER TO MENTAL HEALTH TEAM FILE (#618.2)

DESCRIPTION:
Previous team assigned to the patient. This data is automatically set by the package.
CROSS-REFERENCE: 618.419^B
1)= S ^YSG("INP",DA(1),6,"B",$E(X,1,30),DA)=""
2)= K ^YSG("INP",DA(1),6,"B",$E(X,1,30),DA)

DATE ENTERED

0;2

DATE

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

INPUT TRANSFORM: S %DT="ETX" D ^%DT S X=Y K:Y<1 X
DESCRIPTION:
Date the patient entered ward and was assigned the specific team.

ENTERED BY

0;3

POINTER TO NEW PERSON FILE (#200)

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

DESCRIPTION:
This is the DUZ of the person implemating the transfer of the patient from one ward to another. This is automatically upedted.