Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping

Print Page as PDF

Sub-Field: 50.0214

Package: Pharmacy Data Management

DRUG(#50)-->50.0214

Sub-Field: 50.0214

Information

Parent File	Name	Number	Package
DRUG(#50)	ACTIVITY LOG	50.0214	Pharmacy Data Management

Details

Field #	Name	Loc	Type	Details
.01	ACTIVITY LOG	0;1	DATE	INPUT TRANSFORM: `S %DT="ETXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `AUG 06, 1993` DESCRIPTION: `Date the activity occurred.` TECHNICAL DESCR: `Date (Multiply asked)` CROSS-REFERENCE: `50.0214^B` `1)= S ^PSDRUG(DA(1),4,"B",$E(X,1,30),DA)=""` `2)= K ^PSDRUG(DA(1),4,"B",$E(X,1,30),DA)`
1	REASON	0;2	SET	'E' FOR EDIT; LAST EDITED: `AUG 06, 1993` HELP-PROMPT: `Enter code to indicate the activity taking place for this entry.` DESCRIPTION: `The activity responsible for this entry.`
2	INITIATOR OF ACTIVITY	0;3	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `AUG 06, 1993` HELP-PROMPT: `Enter the name of the person initiating the activity.` DESCRIPTION: `Pointer to the New Person file. The person initiating this activity.`
3	FIELD EDITED	0;4	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>25!($L(X)<3) X` LAST EDITED: `AUG 06, 1993` HELP-PROMPT: `Answer must be 3-25 characters in length.` DESCRIPTION: `The free text name of the field that is being edited.`
4	NEW VALUE	0;5	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>25!($L(X)<3) X` LAST EDITED: `AUG 06, 1993` HELP-PROMPT: `Answer must be 3-25 characters in length.` DESCRIPTION: `The new value of the field being edited.`
5	NDF UPDATE	0;6	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>25!($L(X)<3) X` LAST EDITED: `JAN 23, 2001` HELP-PROMPT: `Answer must be 3-25 characters in length.` DESCRIPTION: `This field will be set to the text 'NDF Update' if this change was made by an NDF Data Update patch.` TECHNICAL DESCR: `Hard set to 'NDF Update' by the post-install routine of an NDF Data Update patch.` `DELETE AUTHORITY: ^` `WRITE AUTHORITY: ^`