home *** CD-ROM | disk | FTP | other *** search
/ Shareware Overload / ShartewareOverload.cdr / database / trl14db.zip / TRLPRG.EXE / TRLIB.PRG < prev    next >
Text File  |  1990-10-22  |  1KB  |  46 lines
  1. * TRLIB.PRG
  2. * Authors: Alastair Dallas, Ralph Davis, Tom Rettig, Leonard Zerman
  3. * Placed in the Public Domain by Tom Rettig Associates, 10/22/1990.
  4. *
  5. * NOTE: This file is called automatically by TRLIB.EXE when
  6. *       loading dBASE.
  7. *
  8.  
  9. SET TALK OFF
  10.  
  11. * Set up five public memvars (must be stored in this order).
  12. PUBLIC tr_retc, tr_retd, tr_retl, tr_retn, tr_dfmt, fox
  13.  
  14. * Return memvars must be initialized before storing anything else.
  15. tr_retc = SPACE(254)
  16. tr_retd = CTOD("  /  /  ")
  17. tr_retl = .F.
  18. tr_retn = 0.00
  19.  
  20. * Set return memvar addresses.
  21. LOAD Trret
  22. *                       Order must remain:
  23. CALL trret WITH tr_retc     && first
  24. CALL trret WITH tr_retd     && second
  25. CALL trret WITH tr_retl     && third
  26. CALL trret WITH tr_retn     && fourth
  27. RELEASE MODULE trret
  28.  
  29. * Load trlib variable-passer and function-executor.
  30. LOAD Trpass
  31. LOAD Trexe
  32.  
  33. * Set the date format (must be uppercase).
  34. tr_dfmt = "AMERICAN"
  35.  
  36. ***********************************
  37. * Do <your command file name> here:
  38.  
  39. ***********************************
  40.  
  41. * Return to interactive dBASE if your program does not QUIT.
  42. SET TALK ON
  43. RETURN
  44. * eof
  45.  
  46.