CALCPRINT()
 To get/set the calculator printing status.          
------------------------------------------------------------------------------

 Syntax

      CALCPRINT( [<nNewStatus>] )  -> nOldStatus

 Arguments

      <nNewStatus> is an optional numeric parameter containing the new
      printing status.

      If you specify 0, all printing will occur normally.
      (When "Printing" is turned on, all lines will be printed as they are
      entered).

      If you specify 1, all printing will be held until you exit the 
      calculator - then all lines will be printed at once.

      If you specify 2, all calculator printing will be held during the 
      entire execution of the application.  You must then specify
      CalcPrint(-1) to force a print, or CalcPrint(-2) to cancel a print,
      or CalcPrint(1) to allow the calculator to print all lines at the
      end of the next use.

      If you specify 3, all printing will be suspended, and not kept
      in memory.

      Defaults to 0 if no network is detected, or 1 is a network is detected.

 Returns

      CALCPRINT() returns the current CALCPRINT() printing status.

 Description

     -----------------------------------------------------------------------
     . NOTE

      Printing must be turned on by user pressing the "P" key during use
      for any printing to occur.

     -----------------------------------------------------------------------

      You may use CALCPRINT() to get/set the calculator printing status.

      Regarding the parameter <nNewStatus>:

      . If it is 0, all printing will occur normally.  After the user
        presses "P" to begin printing, each line will be sent to the
        printer whenever the paper scrolls. 
        (NON-NETWORK DEFAULT)

      . If it is 1, all printing will be held until the user exits the
        calculator.  At that time, all lines (during that specific use
        of the calculator) will be printed.  The tape is then purged
        and recording starts again at the next iteration.
        (NETWORK DEFAULT)

      . If it is 2, all printing will be held throughout the execution
        of the application regardless of how many times the user enters
        and exits the calculator.

        To affect printing while in this status, you may:

           . Call CALCPRINT(-1) with the -1 parameter:
             This will force a print of the tape and purge it for the
             next or current use.

           . Call CALCPRINT(-2) with the -2 parameter:
             This will purge the tape for the next or current use.

           . Call CALCPRINT(1) with the 1 parameter:
             This will 'tell' the Calculator to print the tape at the 
             end of the next or current use of the calculator.

             ---------------------------------------------------------------
             . NOTE

             The current CALCPRINT() status DOES NOT CHANGE if you call it
             with a -1 or -2.  For example, if you first issue CalcPrint(2)
             and later print the tape by issuing CalcPrint(-1), if you then
             print the status ( ? CalcPrint() ), it will return a 2.

             ---------------------------------------------------------------


     -----------------------------------------------------------------------
     . NOTE

      Although highly unlikely, if the length of the calculator tape exceeds 
      32,000 characters, it will cease to record further lines until purged.

     -----------------------------------------------------------------------

 Examples

     ** Example 1 - normal printing (line by line)

        CalcPrint(0)  //print each line as received 
        Calculator()

     ** Example 2 - hold printing until end of each calculator use

        CalcPrint(1)  //hold until end of calculator
        Calculator()  // (prints at end)

     ** Example 3 - hold printing indefinitely

        CalcPrint(2)  //hold printing until further commands change it
        Calculator()  // (nothing is printed)

        ...

        CalcPrint(-1) //forces a complete print of all calculator uses
     or CalcPrint(-2) //purges print tape in memory.

 Files: CALC.LIB

 Author: Touchstone Business Creations          CompuServe ID: 73670,2561
         28613 River Glen Ct. #1
         Menifee, CA 92584-8987 USA

         (909) 679-3364

 Owner : (c) Copyright, 1991,92,93 Touchstone Business Creations