Hola... utilizando el debug me percate que:
Código Delphi
[-]
dmConexion.cdsModArtCantidad.Params.ParamByName('pIDART').AsInteger :=
dmConexion.cdsTempModArtCantidadID_ARTICULO.AsInteger;
dmConexion.cdsModArtCantidad.Active := True; dmConexion.cdsModArtCantidad.Edit; if (dmConexion.cdsModArtCantidad.State in [dsBrowse]) then
begin
dmConexion.cdsModArtCantidad.Edit end;
Saludos