Routine: PSSDRDO2

Information

PSSDRDO2 ;BIR/LE-Display Dosing related information for DRUG File(#50) entry ;07/14/15

Source file <PSSDRDO2.m>

Name	Comments	DBIA/ICR reference
CLEFF(PSSVAPRD)	;Retrieve and write Clinical Effects of Drug fields
CLEFFS	;
CLEFFW(PSSPKG,PSSOMIT,PSSEXLMT)	;

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"CLINICAL EFFECT DURATION: ",$S($D(^TMP($J,"PSSVAPR",PSSNIEN,108)):"YES",1:"NO") Line Location: CLEFF+19
Function Call: WRITE	Prompt: !?3,PSSPACK2," DURATION LIMIT: " Line Location: CLEFFW+5
Function Call: WRITE	Prompt: PSSEXLMT Condition for execution: PSSOMIT=0 Line Location: CLEFFW+5
Function Call: WRITE	Prompt: !?6,"OMIT EXP/DC ORDER CHECK: ",$S(PSSOMIT=1:"YES",PSSOMIT=0:"NO",1:"") Line Location: CLEFFW+6