Error al insertar registro

[[Caral]]

Hola egostar

Código Delphi [-]
with DataModule1 do begin
    
     DataModule1.BeginTrans; // esto?
     Llamadas.Active := False;
     Llamadas.Active := True;
     LLamadas.Insert;

     Llamadas.FieldByName('Fecha').Value           := StrToDate(Fecha);
     Llamadas.FieldByName('Extension').Value       := Extension;
     Llamadas.FieldByName('Hora').Value            := StrToTime(HoraLlamada);
     Llamadas.FieldByName('Prefijo').Value         := Prefijo;
     Llamadas.FieldByName('Numero').Value          := Numero;
     Llamadas.FieldByName('Codigo').Value          := Fac;
     Llamadas.FieldByName('Departamento').Value    := Nivel1;
     Llamadas.FieldByName('CCostos').Value         := Nivel2;
     Llamadas.FieldByName('Troncal').Value         := Troncal;
     Llamadas.FieldByName('Carrier').Value         := Carrier;
     Llamadas.FieldByName('Ciudad').Value          := Ciudad;
     Llamadas.FieldByName('Estado').Value          := Estado;
     Llamadas.FieldByName('SMedido').Value         := SMedido;
     Llamadas.FieldByName('Costo').Value           := CostoLla;
     Llamadas.FieldByName('Iva').Value             := Iva;
     Llamadas.FieldByName('Duracion').Value        := Duracion;
     Llamadas.FieldByName('DurEntera').Value       := Round(DurEntera);
     Llamadas.FieldByName('ExtensionOrigen').Value := ExtOrigen;
     Llamadas.FieldByName('Empresa').Value         := Empresa;

     Llamadas.Post;
     DataModule1.CommitTrans;  // Esto?
     Llamadas.Transaction.Commit; // no Se

No se podria ir por ahi.
Saludos