while true
    x = fentrybox(" Enter Reservation reference ",6,"*2AU*4#","")
    if x = -1
      continue while
    end if
    $resref = ptstr
    messbox(" Confirm Reservation reference"&$resref|"? (y/n) ",1,1,1)
    if ptstr == "Y"
      exit while
    else
      continue while
    end if
  end while