fread(&cambio,grandaria,1,pfMedicos);
while((!ferror(pfMedicos)) && (!feof(pfMedicos)) && (!ferror(pf2)))
{
if(num!=cambio.num_col)
fwrite(&cambio,grandaria,1,pf2);//escribo el registro en el fichero nuevo
else
fseek(pfMedicos,-grandaria,SEEK_CUR);
fwrite(&cambio,grandaria,1,pf2);
}
fread(&cambio,grandaria,1,pfMedicos);