SoloCodigo

Fire..
Vale me surgio un problema con un cajero automatico...

si tengo.. este procedimiento pero lo unico q quiero cambiar es un pin pero al contrario lo que me hace me crea un registro nuevo con todos los datos y me deja el anterior en la misma posicion y con el mismo pin.... que son  nombre telefono saldo y demas cosas pero lo que pretendo es que solamente me cambie el pin no se si hay alguna opcion para solo cambiar un registro en dicho archivo sin tener que tocar los demas registros.. si esta por alli mau y me sabes responder te lo agradeceria.....

por que ya no se q hacer alli..

procedure cambiopin;
var
nuevo_pin:integer;
begin
clrscr;
 Gotoxy(25,9);Writeln ('su numero de pin es: ', nr_pin);
 Gotoxy(25,11);Writeln ('Ingrese nuevo pin');
 gotoxy (28,12);readln (nuevo_pin);
 cliente.pin:=nuevo_pin;
 write (arqalu,cliente);
 gotoxy( 28,13); writeln ('su nuevo numero de pin es ',cliente.pin);
 end;

les mando el codigo para q lo chequeen......

      pero por mas q intento no logro arreglarlo..

  chauuu