Routine: PSSLDEDT

Information

PSSLDEDT ;BIR/RTR-Edit Local Possible Dosage Unit/Dosage ;06/23/07

Name	Comments	DBIA/ICR reference
EDT	;Edit New Local Possible Dosages Fields Numeric Dose and Dose Unit
EDTX	;
UL	;unlock drug
TEST(PSSLVTST)	;See if drug need Dose Unit and Numeric Dose defined

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: EDTX+4
Function Call: WRITE	Prompt: ! Line Location: EDTX+5
Function Call: WRITE	Prompt: !!,"This drug is not matched to NDF and therefore will be excluded from dosing",!,"checks." Line Location: EDTX+11
Function Call: WRITE	Prompt: !!,"Another person is editing this drug.",! Line Location: EDTX+12
Function Call: WRITE	Prompt: $G(PSSLVSXX)_" "_$G(PSSLVUNX) Line Location: EDTX+21
Function Call: WRITE	Prompt: " "_$G(PSSLVUNX) Line Location: EDTX+23
Function Call: WRITE	Prompt: " Unit: "_$G(PSSLVUNX) Line Location: EDTX+36
Function Call: WRITE	Prompt: !!,"No local possible dosages exist for this drug." Line Location: TEST+4