int procura(int codp)
{ int p;
  p= 0;
  fseek(pn,0, SEEK_SET);
  fread(&clientenulo, sizeof(Tclientes), 1, pn);
  while ((!feof(pn)) && (clientenulo.cod!=codp))
  {  fread(&clientenulo, sizeof(Tclientes),1, pn);
     p++;
  }     
  if (clientenulo.cod == codp)
     return p;
  else{
     p=-1;
  }
  if (p=-1){
  p= 0;
  fseek(ps,0, SEEK_SET);
  fread(&clientenulo, sizeof(Tclientes), 1, ps);
  while ((!feof(ps)) && (clientenulo.cod!=codp))
  {  fread(&clientenulo, sizeof(Tclientes),1, ps);
     p++;
  }     
  if (clientenulo.cod == codp)
     return p;
  else{
     return -1;
  }
}