Sub-Field: 404.9101

Parent File	Name	Number	Package
SCHEDULING PARAMETER(#404.91)	FILE DELETION LOG	404.9101	Scheduling

Details

Field #	Name	Loc	Type	Details
.01	SCHEDULING FILE NUMBER	0;1	NUMBER	INPUT TRANSFORM: `K:+X'=X!(X>409.5)!(X<40.1)!(X?.E1"."3N.N) X IF $D(X),X'=40.1,X'=40.15,X'=409.43,X'=409.44,X'=409.5 K X` LAST EDITED: `JAN 08, 1999` HELP-PROMPT: `Enter 40.1, 40.15, 409.43, 409.44 or 409.5.` DESCRIPTION: The number of the Scheduling file deleted. NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `404.9101^B` 1)= S ^SD(404.91,DA(1),"DELETED","B",$E(X,1,30),DA)="" 2)= K ^SD(404.91,DA(1),"DELETED","B",$E(X,1,30),DA)
.02	DATE/TIME OF DELETION	0;2	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `OCT 09, 1998` DESCRIPTION: Date and time when file was deleted.
.03	USER EXECUTING DD DELETION	0;3	POINTER TO NEW PERSON FILE (#200)	**********************REQUIRED FIELD********************** NEW PERSON(#200) LAST EDITED: `JAN 28, 1999` HELP-PROMPT: `User responsible for deleting the file.` DESCRIPTION: User responsible for deleting the file data dictionary and templates.
.04	USER EXECUTING DATA DELETION	0;4	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `JAN 28, 1999` DESCRIPTION: User responsible for deleting the file data.