PSJU LM RENEW (2513)    PROTOCOL (101)

View in ViViaN Menu
Name Value
NAME PSJU LM RENEW
ITEM TEXT Renew
PACKAGE INPATIENT MEDICATIONS
EXIT ACTION K ^TMP("PSJINTER",$J)
ENTRY ACTION D:$$ASKDISP^PSGSICH1 OVRDISP^PSGSICH2($G(DFN),$G(PSJORD),3) D RENEW^PSJOE(DFN,PSJORD)
TYPE action
CREATOR USER,SEVENTEEN
TIMESTAMP 2012-01-30 10:42:05