FUNCTION ShowMin()
  y2 = format("˙Reservation˙","M16")
  screen print 22 1 14 15 y2
  y3 = format(" Not ready for delivery ","M27")
  screen print 22 17 4 7 y3
  y4 = format(" Ready for delivery ","M23")
  screen print 22 44 10 7 y4
'   y5 = format("˙Order HELD˙","M12")
'   screen print 22 58 fgp bge y5
  y6 = format("˙Assisting ","M14")
  screen print 22 67 11 15 y6
END FUNCTION ' ShowMin()