address ispexec "display panel(repl1000)"     /*                   */
   if rc=8 then exit                            /*                   */
   if rc>8 then exit rc                          /*                   */
   if zcmd="CAN" ! zcmd="CANCEL" then exit