ScrollbarTarget
"file-view-scroller"
{ [0 1 .01 .1 null] 1
  { null 1 ItemValue sub /moveviewport
    PileDict PileID get Ref cvn get TargetDict exch get /Text get send } }
{}