struct intercomm
       {
        int   source_code;  
        int   record_code;  
	int  resource[3];
    char *hd_ptr;      
       };