home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / xbase / library / dbase / log / maint.prg < prev    next >
Encoding:
Text File  |  1987-03-10  |  647 b   |  37 lines
  1. * MAINT.PRG 
  2. * MISC MAINTIANANCE FUNCTIONS
  3. * 03/10/87
  4. CLEAR
  5. DO WHILE .T.
  6. ?
  7. ?
  8. ?
  9. ?
  10. ? '                 *******  MAINTAINANCE FUNCTIONS *******'
  11. ?
  12. ?
  13. ? '                  0 - RETURN TO MAIN MENU'
  14. ? '                  1 - ADD A CONFIRMED COUNTRY TO CHECKLIST'
  15. ? '                  2 - ADD A CONFIRMED STATE TO CHECKLIST'
  16. ? '                  3 - ADD A QSL MANAGER TO MANAGERS LIST'
  17. ?
  18. ?
  19. ACCEPT 'Function desired? ' TO ACT
  20. STORE UPPER(ACT) TO ACT
  21. IF ACT = '0'
  22.    CLEAR 
  23.    RETURN
  24. ENDIF
  25. IF ACT = '1'
  26.    DO ADCOUNTR
  27. ENDIF
  28. IF ACT = '2'
  29.    DO ADDSTATE
  30. ENDIF
  31. IF ACT = '3'
  32.    DO ADQSLMAN
  33. ENDIF
  34. RELEASE ACT
  35. CLEAR
  36. ENDDO
  37. RETURN