fdds_closepr2 - close a print file

SYNOPSIS

#include <fdds.h> (fixed-format sources)
#include <f90dds.h> (free-format sources)

integer function fdds_closepr2(status)

integer status

DESCRIPTION

fdds_closepr2 writes a 'NORMAL TERMINATION' message to the console if no error messages have been printed via fdds_prterr, otherwise, an 'ABNORMAL TERMINATION' message will be written. The program will terminate with an exit() call with the "status" value (NOTE: some systems may only return the low order byte). If the print file has been opened, the message will also be written into it, the print file will be closed and the console message will include the program name. The routine will never return.

EXAMPLES

      integer ier
      ...
      ier=fdds_closepr2(24)

SEE ALSO

fdds_openpr Open a printfile
fdds_savepr Redirect to printfile
fdds_prthdr Print header
fdds_sprintf Print to string
fdds_prtmsg Print a message
fdds_prtcon Print to console
fdds_prterr Print error message
fdds_errors Query errors
fdds_info Control printing

AUTHOR

Jerry Ehlers, BP America (May 2003)