home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 5 / 05.iso / a / a063 / 6.img / SAMPLE / APTFORMS / PRINT.C < prev    next >
Encoding:
C/C++ Source or Header  |  1990-08-24  |  599 b   |  33 lines
  1. #include <sybfront.h>
  2. #include <sybdb.h>
  3. #include <sybfrs.h>
  4.  
  5. #if MSDOS
  6. #    include    "aforms.h"
  7. #endif /* MSDOS */
  8.  
  9. /*
  10. **    PRINTFORM  - Print the form to the default printer.
  11. **    
  12. **    The user has selected the "Print Form" menu option.
  13. */
  14.  
  15. printform(context, argarray)
  16. FRSCONTEXT      *context;
  17. POINTER         argarray[];
  18. {
  19.     /*
  20.     ** Print the form with a header -- today's date and form title.
  21.     */
  22.  
  23.     if ( fsprint( fscurform(context), FRS_HEADER) == SUCCEED)
  24.     {
  25.         fsmessage("The order will be printed.");
  26.     }
  27.     else
  28.     {
  29.         fsmessage("Unable to print the order.");
  30.     }
  31.     return;
  32. }
  33.