home *** CD-ROM | disk | FTP | other *** search
/ Oakland CPM Archive / oakcpm.iso / sigm / vol155 / samscrm.cmd < prev    next >
Encoding:
Text File  |  1984-04-29  |  870 b   |  20 lines
  1. *SAMSCRM-SAMPLE PROGRAM MENU-SCREEN  REFER TO PUBLIC DOMAIN NOTICE
  2. *DATE OF LAST UPDATE 05/10/83        DATED 5/20/83 BY DOUGLAS G. COUSE
  3. *REVISION NUMBER 001.00              PROGRAM # SAM001 OR SAM002 OR SAMMENU
  4.  
  5. *NOTE----any comment labelled (*P-) is a procedural section numbering reference
  6. *that should be used in flowcharting and other program documentation.
  7.  
  8. *P-001-{START}. Screen literal display section.
  9. SET INTENSITY OFF
  10. @  1,25 SAY "*********************"
  11. @  2,25 SAY "*     THE MENU      *"
  12. @  3,25 SAY "*********************"
  13. @  7, 0 SAY "----------------------------------------------------------------------------"
  14. @ 22, 0 SAY "----------------------------------------------------------------------------"
  15. SET INTENSITY ON
  16. @ 14,05 SAY "1. Enter New Name & Number Data "
  17. @ 15,05 SAY "2. Update or inquire about Old Name & Number Data"
  18. RETURN
  19. *P-001-{END}.
  20.