Routine: PSIVSTAT

Information

PSIVSTAT ;BIR/PR-BUILD COST TRANS NODE, ENTER COMPILE ;6 Nov 98 / 4:45 PM

Source file <PSIVSTAT.m>

Name	Comments	DBIA/ICR reference
RETDET	;Get the ward that returns or destroyed need to be associated with.
LBWD	;Get the ward we that we are printing labels on.
SKIP	;
DSS	; Update DSS for IV extract
Q1
EN	;Compile IV stats hold file here.
Q
CNT
SET
NOCOST	;Send message if the drug is missing a unit cost.
MSG