#include <string.h>
#include "extern.h"

makfname(fdir,fno,fnam)
	char fdir[];
	int fno;
	char fnam[];
	{    char  fdata[41],offset;
	     int   drn;

	      drn = fno / 100;
	      strcpy(fdata,msgpass); strcat(fdata,MSG_FIL);
          sprintf(fnam,"%s%02d\\msg%04d",fdata,drn,fno);
		  offset = fno / 1000;
		  fnam[0] = fnam[0] + offset;
             
	      if ( ! strncmp(fdir,"PDS",3))
	              { strcpy(fdata,pdspass); strcat(fdata,PDS_FIL);
                        sprintf(fnam,"%s%02d\\pds%04d",fdata,drn,fno);
                       }

              if ( ! strncmp(fdir,"DAT",3))
	              { strcpy(fdata,datpass); strcat(fdata,DAT_FIL);
                        sprintf(fnam,"%s%02d\\dat%04d",fdata,drn,fno);
                       }

	    return(0);
	}

