<DETAIL> activate "PUBLICATIONS".TITLEINFO("PUB.MODEL", TITLE.PUB, PUBCOUNT.STATUS) PUBSTATUS.STATUS = $status if ( $procerror < 0 )    putmess $procerrorcontext endif