PSO LM RENEW MENU (2465)    PROTOCOL (101)

View in ViViaN Menu
Name Value
NAME PSO LM RENEW MENU
ITEM TEXT Rx Renew
ITEM
PACKAGE OUTPATIENT PHARMACY
EXIT ACTION K PSOLM
ENTRY ACTION S PSOLM=1
SCREEN I $$PKIACT^PSOLMUTL
HEADER D A^PSOORUT3,SHOW^VALM,HDR^PSOERUT5("A") S:$G(PSOACT)["E" XQORM("#")=$O(^ORD(101,"B","PSO LM RNEW EDIT",0))_"^1:"_$S($G(PSOREEDT):10,1:8)
TYPE menu
CREATOR USER,EIGHTYNINE
TIMESTAMP 2023-12-15 13:20:47