integer function fdds_errors()
integer ier,pct
...
if (fdds_errors().eq.0) then
ier=fdds_prtcon('%3i% Complete\n\0',pct)
endif
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_info Control printing
fdds_closepr Close printfile