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