Sub-Field: 50.6899

Parent File	Name	Number	Package
VA PRODUCT(#50.68)	EFFECTIVE DATE/TIME	50.6899	National Drug File

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	EFFECTIVE DATE/TIME	0;1	DATE	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `S %DT="ESTX" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `MAY 11, 2005` DESCRIPTION: This is the date/time when the Status of the reference term was established. WRITE AUTHORITY: ^ UNEDITABLE NOTES: `XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER` CROSS-REFERENCE: `50.6899^B` 1)= S ^PSNDF(50.68,DA(1),"TERMSTATUS","B",$E(X,1,30),DA)="" 2)= K ^PSNDF(50.68,DA(1),"TERMSTATUS","B",$E(X,1,30),DA)
.02	STATUS	0;2	SET	**********************REQUIRED FIELD********************** '1' FOR ACTIVE; '0' FOR INACTIVE; LAST EDITED: `MAY 11, 2005` DESCRIPTION: `The Status of a reference term is either 'ACTIVE' or 'INACTIVE'. If the term'ACTIVE', then the term will be accessible by end-users to document a particular patient event. If 'INACTIVE', then the term will only be` accessible by the application to display legacy data. WRITE AUTHORITY: ^ UNEDITABLE

EFFECTIVE DATE/TIME

0;1

DATE

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

DESCRIPTION:

This is the date/time when the Status of the reference term was established.

WRITE AUTHORITY:  ^

UNEDITABLE

CROSS-REFERENCE: 50.6899^B

1)= S ^PSNDF(50.68,DA(1),"TERMSTATUS","B",$E(X,1,30),DA)=""

2)= K ^PSNDF(50.68,DA(1),"TERMSTATUS","B",$E(X,1,30),DA)

STATUS

0;2

SET

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