))) PLIB     SKELT    ...
)ATTR
  % TYPE( TEXT   ) INTENS( HIGH ) SKIP( ON )
  + TYPE( TEXT   ) INTENS( LOW  ) SKIP( ON )
  _ TYPE( INPUT  ) INTENS( HIGH )
  ! TYPE( OUTPUT ) INTENS( HIGH ) SKIP( ON )
  @ TYPE( OUTPUT ) INTENS( LOW  ) SKIP( ON )
)BODY EXPAND(||) WIDTH(&ZSCREENW)
%|-|
      panel title
      +|-|
%Command ===>_ZCMD
                                                              %Scroll ===>_ZAMT+
+ column titles                                               %PF1 for HELP
)MODEL
_z!var1
)INIT
  .ZVARS = '(SEL)'
  .HELP = ISR00000
)REINIT
)PROC
  IF (.PFKEY = 'PF05')
      &PFKEY = 'F5'
      .RESP = END
)END