Delphi - llamada procedure?

procedure TFmFichaExpediente.edCodEgrExit(Sender: TObject);
begin
cambio_estado_sobre;
end;

procedure TFmFichaExpediente.edNumSobExit(Sender: TObject);
begin
//edIdeCliPetExit;
cambio_estado_sobre;
end;

procedure TFmFichaExpediente.cambio_estado_sobre(Sender: TObject);
begin
if (edCodEgr.text = 'RES') and (ednumsob.asfloat <> 0) then
edCodEgr.text := 'CER';
end;

¿Porque me da error en la segunda linea cuando llamo el procedimiento cambo_estado_sobre.?

(las variables estan declaradas como a acontinuacion os indico:
procedure edCodEgrExit(Sender: TObject);
procedure edNumSobExit(Sender: TObject);
procedure cambio_estado_sobre(Sender: TObject);

Creo que tienes que pasarle el parámetro al procedure:

cambio_estado_sobre (Sender);

De todos modos, cuando da un error, lo mejor es decir que error da para que nos hagamos una idea.

Saludos.

así ha sido; muchas gracias

Pon el procedimiento para ver el error que da porque el procediento esta bien a la hora de llamarlo