Name | Value |
---|---|
NAME | GMPL VIEW RESTORE |
ITEM TEXT | Preferred View |
PACKAGE | PROBLEM LIST |
ENTRY ACTION | S X=$$VIEW^GMPLX1(DUZ) W:'$L(X) !,"You have no preferred view defined.",! Q:'$L(X) S:X'=GMPLVIEW("VIEW") GMPREBLD=1,GMPLVIEW("VIEW")=X K X S:GMPLVIEW("PROV") GMPLVIEW("PROV")=0,GMPREBLD=1 S:GMPLVIEW("ACT")'="A" GMPLVIEW("ACT")="A",GMPREBLD=1 |
DESCRIPTION | This action will replace the currently specified view with the user's pre-defined preferred view. |
TYPE | action |
CREATOR | USER,ONE |
TIMESTAMP | 1996-09-24 16:44:51 |