f_evt_get_tagopen
- f_evt_get_tagopen
-  CALLING     
 -  f_evt_get_tagopen(channel,tagfile,lmdfile,header,print)
 -  PURPOSE     
 -  Open tag and lmd file
 -  ARGUMENTS   
 - 
 -   channel    
 -  s_evt_channel* , must be allocated.
 -   tagfile    
 -  Name of tag file
 -   filename   
 -  LMD file name
 -   header     
 -  address of CHARS pointer. If it is not NULL, then
                try to return file header or other information
                about server. If it is NULL, then returns nothing.
 -   print      
 -  Print flag: 1=verbose */
 -  Return type 
 -  INTS4         .
 -  Status codes
 - 
-                GETEVT__SUCCESS   
 -  success.
 -                GETEVT__NOFILE    
 -  file does not exist.
 -                GETEVT__TAGRDERR  
 -  tag file read error.
 -                GETEVT__RDERR     
 -  read server error.
 
 -  Declaration 
 - 
                INTS4 f_evt_get_tagopen(
                     s_evt_channel *,CHARS *,CHARS *,CHARS **,INTS4);
 -  FUNCTION    
 -  Open tag file and lmd file. If no tag file is found,
                a standard f_evt_get_open is called. In this case
                following tag functions call standard f_evt_get functions.