func doWork(_data, index)
  if(linked(Data))
    println(saved_data, ' := ', _data, ';')
  end 
  event(onIndex, Index)
end

func Data()
  return(saved_data)
end

func doWork(_data, index)
  fvar(old)
  old = block.select(BLK_PRIV_VAR)
  println(i, ':integer;')
  block.select(old)
  println(i, ' := ', Index, ';')
  if(linked(Data))
    println(saved_data, ' := ', _data, ';')
  end 
  event(onIndex, i)
end

func Data()
  return(saved_data)
end