home *** CD-ROM | disk | FTP | other *** search
/ ftp.barnyard.co.uk / 2015.02.ftp.barnyard.co.uk.tar / ftp.barnyard.co.uk / cpm / walnut-creek-CDROM / MBUG / MBUG102.ARC / MENU5.CMD < prev    next >
OS/2 REXX Batch file  |  1979-12-31  |  1KB  |  40 lines
  1. *MENU5.PRG
  2. DO WHILE T
  3. RELEASE ALL
  4. SET TALK OFF
  5. ERASE
  6. ? '+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++'
  7. ?
  8. ?  '       BACK  ORDER MAINTENANCE MENU',DATE()
  9. ?
  10. ? '       PRESS THE KEY REQUIRED TO ENTER THE DESIRED MODE'
  11. ?
  12. ?'        KEY....................MODE'
  13. ?
  14. ?'         1         MENU FOR  DISPLAY OF BACK ORDERS '
  15. ?'         2         CANCEL ANY BACK ORDERS SHIPPED OR NOT REQUIRED'
  16. ?'         3         WRITE ORDERS FROM THE BACK ORDERS'
  17. ?'         R         RETURN TO THE MAIN MENU'
  18. ?'++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++'
  19. WAIT TO DEC
  20. STORE !(DEC) TO DEC
  21. IF DEC='3'
  22. DO a:RITEBACK
  23. ENDIF
  24. IF DEC='2'
  25. DO a:CANBACK
  26. LOOP
  27. ENDIF
  28. IF DEC='R'
  29. RETURN
  30. ENDIF
  31. IF DEC='1'
  32. DO a:BACKCHEK
  33. ENDIF
  34. ENDDO
  35. ......MODE'
  36. ?
  37. ?'         1   TO    MENU FOR  DISPLAY OF BACK ORDERS '
  38. ?'         2   TO    CANCEL ANY BACK ORDERS SHIPPED OR NOT REQUIRED'
  39. ?'         3   TO    WRITE ORDERS FROM THE BACK ORDERS'
  40. ?'         R   TO    RETURN TO THE MAI