home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / CLIPPER / DATABASE / MYB_203.ZIP / MYB_203.EXE / SEE_IT.MRG < prev   
Encoding:
Text File  |  1993-05-04  |  2.3 KB  |  64 lines
  1. <# _Date      := CMONTH(DATE()) +" "+ ALLTRIM(STR(DAY(DATE()))) +","+ STR(YEAR(DATE())) >
  2. <# _To        := "" >
  3. <# _DoNothing := {|| NIL} >
  4. <# _SkipThis  := {|| EMPTY( LAST_NAME ) .or. EMPTY( LAST_CALL ) .or. EMPTY( ADDRESS_1 )} >
  5. <# _StopBlock := {|| TONE(2222,1), TONE(2222,1), FERASE("SEE_IT.TXT"), STOP(.T.)} >
  6. <# _StartTime := SECONDS() >
  7. <# _ElapTime  := "" >
  8. <# _LetterNo  := 0 >
  9. <
  10.   _ElapTime := ALLTRIM(STR( SECONDS() - _StartTime )),
  11.   DBEVAL ( _DoNothing,, _SkipThis,, .T.),
  12.   IF( STOP(), EVAL(_StopBlock ), NIL )
  13. >
  14.                                                   Boris Borzic
  15.                                                   Armada Systems
  16.                                                   P.O. Box 3111, Station D
  17.                                                   Willowdale, Ontario
  18.                                                   M2R 3G5, Canada
  19. < _Date >
  20.  
  21. < TRIMLINES (
  22.      TRIM (TRIM (SAL) +" "+ FIRST_NAME) +" "+ LAST_NAME + _LF +
  23.      TITLE     + _LF +
  24.      COMPANY   + _LF +
  25.      ADDRESS_1 + _LF +
  26.      ADDRESS_2 + _LF +
  27.      TRIM (CITY)+ ", " + STATE + _LF +
  28.      ZIP_CODE  + _LF )
  29. >
  30.  
  31. Dear < _To := TRIM( TRIM( SAL ) + " " + LAST_NAME ) >,
  32.  
  33. I would like to introduce you to MyBASE, a very powerful and easy to use
  34. PC database package!
  35.  
  36. You can use MyBASE in DOS or Windows to; view, edit, sort, search, group,
  37. filter, replace, copy/paste, merge, print, fax or export data in many
  38. ways. On top of all this, MyBASE includes:
  39.  
  40.    * Context sensitive and user customizable help.
  41.    * Multi-user network support.
  42.    * Password access.
  43.    * Quick and simple database indexing and view setup.
  44.    * Text file merging with automatic execution of external procedures.
  45.    * Record tagging, data filtering and searching.
  46.    * Data entry validation.
  47.    * Automatic telephone dialer.
  48.    * Ability to run data-driven, external programs, from within MyBASE.
  49.  
  50. I'm certain <_To >, there are many ways in which MyBASE can help you
  51. become more productive. Give it a try, and see for yourself!
  52.  
  53. Thanks,
  54.  
  55. Boris Borzic
  56.  
  57. P.S. This is letter number: < LTRIM( STR( _LetterNo := _LetterNo + 1 )) >, elapsed time is: < _ElapTime > seconds.
  58. <
  59.   PUT   ("STATUS", PADL(_ElapTime + " Sec", LEN(STATUS)) ),
  60.   WRITE ("SEE_IT.TXT"),
  61.   RUN   ("TYPE SEE_IT.TXT", 96)
  62. >
  63.  
  64.