Sub-Field: 50.095

Parent File	Name	Number	Package
DRUG(#50)	DT/TM DISP UNIT PRICE CHANGED	50.095	Pharmacy Data Management

Details

Field # Name Loc Type Details

Field #	Name	Loc	Type	Details
.01	DT/TM DISP UNIT PRICE CHANGED	0;1	DATE	INPUT TRANSFORM: `S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `MAY 22, 2018` HELP-PROMPT: `Enter the Date/Time the dispense unit price was changed.` DESCRIPTION: `This field tracks the Date and Time whenever the PRICE PER DISPENSE UNIT (#16) field is changed. It is set using a trigger cross-reference on the PRICE PER DISPENSE UNIT (#16) field.` CROSS-REFERENCE: `50.095^B` `1)= S ^PSDRUG(DA(1),950,"B",$E(X,1,30),DA)=""` `2)= K ^PSDRUG(DA(1),950,"B",$E(X,1,30),DA)`
1	EDITED BY	0;2	POINTER TO NEW PERSON FILE (#200)	NEW PERSON(#200) LAST EDITED: `MAY 22, 2018` HELP-PROMPT: `Select the person making the price change.` DESCRIPTION: `This is the name of the person making the price change.`
3	NEW VALUE	0;3	NUMBER	INPUT TRANSFORM: `S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>99999.99999)!(X<0) X` LAST EDITED: `MAY 22, 2018` HELP-PROMPT: `Type a dollar amount between 0 and 99999.99999, 5 decimal digits.` DESCRIPTION: `This is the new price value to be tracked.`

DT/TM DISP UNIT PRICE CHANGED

0;1

DATE

INPUT TRANSFORM: S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
LAST EDITED: MAY 22, 2018
HELP-PROMPT: Enter the Date/Time the dispense unit price was changed.
DESCRIPTION:
This field tracks the Date and Time whenever the PRICE PER DISPENSE UNIT (#16) field is changed. It is set using a trigger cross-reference on the PRICE PER DISPENSE UNIT (#16) field.
CROSS-REFERENCE: 50.095^B
1)= S ^PSDRUG(DA(1),950,"B",$E(X,1,30),DA)=""
2)= K ^PSDRUG(DA(1),950,"B",$E(X,1,30),DA)

EDITED BY

0;2

POINTER TO NEW PERSON FILE (#200)

NEW VALUE

0;3

NUMBER

INPUT TRANSFORM: S:X["$" X=$P(X,"$",2) K:X'?.N.1".".2N!(X>99999.99999)!(X<0) X
LAST EDITED: MAY 22, 2018
HELP-PROMPT: Type a dollar amount between 0 and 99999.99999, 5 decimal digits.
DESCRIPTION:
This is the new price value to be tracked.