%++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
%.COPYRIGHT  (c)  1990 European Southern Observatory
%.IDENT      copy_ad.hlq
%.AUTHOR     KB, IPG/ESO
%.KEYWORDS   MIDAS, help files, COPY/AD
%.PURPOSE    On-line help file for the command: COPY/AD
%.VERSION    1.0  14-MAR-1987 : Creation, KB
%.VERSION    1.1  17-AUG-2014 : KB
%----------------------------------------------------------------
\se
SECTION./AD
\es\co
COPY/AD 					17-AUG-2014  KB
\oc\su
COPY/AD ASCII_file dest_frame dest_desc [max_len]
	copy contents of ASCII file to character descriptor of dest_frame 
\us\pu
Purpose:   
	  Copy contents of ASCII file to character descriptor of a Midas
          frame.
\up\sy
Syntax:    
          COPY/AD ASCII_file dest_frame dest_desc [max_len]
\ys\pa
          ASCII file = name of input ASCII file
\ap\pa
          dest_frame = name of destination frame
\ap\pa
          dest_desc = name of character destination descriptor,
\\
              the descr. will be created as a char. array
\ap\pa
          max_len = max. length, i.e. no. of bytes, per descr. element
\\
              each element of the descr. will correspond to a record of the
              ASCII file if `max_len' is big enough, otherwise the next
              element of the descr. is filled with the remainder of the
              record;
\\
              if max_len < 1 then the actual max. record length of the ASCII
              file is used (but not larger than 100 - see the Notes);
\\
              defaulted to 72
\ap\sa
See also:
          COPY/DA, COPY/DK, COPY/KD, WRITE/DESCR
\as\no
Note:      
          AT most 100 chars. of a record of the ASCII input file are read,
          longer records are truncated.
\on\exs
Examples:
\ex
          COPY/AD 1997-05-20T14:20:57.rb calibrate03 ESO.REDBLOCK 
            Copy the contents of the reduction block definition file
            `1997-05-20T14:20:57.rb' into descriptor ESO.REDBLOCK of frame 
            `calibrate03.bdf'.
            Records which are longer than 72 chars. are split up and stored 
            in two consecutive elements of ESO.REDBLOCK.
\xe \sxe
