idlastro / FITS ASCII & Binary Table I/O: TBHELP

[Source code]

NAME
TBHELP
PURPOSE
Routine to print a description of a FITS binary table header
CALLING SEQUENCE
TBHELP, h, [TEXTOUT = ]
INPUTS
h - FITS header for a binary table, string array
OPTIONAL INPUT KEYWORD
TEXTOUT - scalar number (0-7) or string (file name) controling 
        output device (see TEXTOPEN).  Default is TEXTOUT=1, output 
        to the user's terminal    
METHOD
FITS Binary Table keywords NAXIS*,EXTNAME,TFIELDS,TTYPE*,TFORM*,TUNIT*,
are read from the header and displayed at the terminal
A FITS header is recognized as bein for a binary table if the keyword 
XTENSION has the value 'BINTABLE' or 'A3DTABLE'
NOTES
Certain fields may be truncated in the display
SYSTEM VARIABLES
Uses the non-standard system variables !TEXTOUT and !TEXTUNIT.   These
are automatically defined by TBHELP if they have not been defined
previously. 
PROCEDURES USED
REMCHAR, SXPAR(), TEXTCLOSE, TEXTOPEN, ZPARCHECK 
HISTORY
W. Landsman       February, 1991
Parsing of a FITS binary header made more robust    May, 1992
Added TEXTOUT keyword      August 1997
Define !TEXTOUT if not already present   W. Landsman  November 2002
Slightly more compact display   W. Landsman August 2005
Fix Aug 2005 error omitting TFORM display W. Landsman Sep 2005