Realizar un Locate en un Dataset que se encuentra en Edicion..

[ygkw]

Hola muchachos, nuevamente los estoy visitando

Ayer estube trabajando con un DBGrid que se encuentra conectado a un TDataset por medio de un TDataSource y en el cual cargo los detalles de los comprobantes de venta, compra, etc.

Lo que he tratado de hacer es que cuando se este haciendo una nueva factura o comprobante (en modo de Insercion o Edicion) no pueda duplicar un mismo codigo de articulo en la grilla ya que mi tabla tiene el campo codigo como parte de la Clave Primaria y en el caso de que sea duplicado se posicione en el codigo que ya estaba anteriormente.

IMPORTANTE: LO QUE QUIERO CON ESTO ES QUE CUANDO SE INGRESE UN CODIGO QUE YA EXISTE, BUSQUE LA POSICION EN QUE ESTA EL CODIGO ANTERIOR Y QUE SE TRASLADE EL FOCO A LA FILA Y COLUMNA DEL CODIGO ANTERIOR. ASI SI EL OPERADOR DESEA AGREGAR MAS CANTIDAD DE UN PRODUCTO QUE YA HABIA CARGADO ANTERIORMENTE, DIRECTAMENTE SE POSICIONE EN LA COLUMNA DE LA CANTIDAD Y LA FILA DEL CODIGO ANTERIOR PARA EDITARLO MAS RAPIDAMENTE.

Para el tema de la deteccion de codigos duplicados estube buscando de que valide de alguna manera en el evento OnValidate del campo anticulo en el dataset, que no se esten duplicando los codigos mediante alguna funcion que valide el constraint de la DB para el PK el tiempo de ejecucion, deseado, sin enbargo no encontre informacion para eso.

Con respecto al tema de posicionar en la fila del codigo anterior surgio la idea de utilizar el locate en el dataset_detalle, lo interesante es que funciona a nivel del dataset, pero los datos no se reflejan correctamente en el dbgrid distorsionandolos.

Tambien probe una opcion interesante, que es la de manejar la tabla como un stringgrid, lo que me permite moverme correctamente a nivel de grilla pero que no se refleja en el Dataset.

Código Delphi [-]
begin  
with TStringGrid(DBGrid1) do    
  begin      
    Row:=VaribleFilaAnterior;//Fila en donde se encuentra el codigo anterior      
    Col:=3;  //Columna donde se modifica la cantidad del articulo.      
    SetFocus;
  end;
end;

Ojala que alguien tenga una idea de como hacer funcionar esto..

Saludos..

[Neftali [Germán.Estévez]]

No repitas hilos, por favor.
Cuando tengas que modificar uno existente usa el botón de EDITAR (que supongo que es lo que ha pasado).

[ygkw]

Lamento haber repetido los hilos, al tratar de editarlo porque no me funcionaba bien la etiqueta para el codigo de delphi, me apure en tratar de guardarlo y lo publique nuevamente sin querer..

Gracias por corregirlo..

[Rayku]

SUPONGAMOS Q TIENES UNA RELACION DE FACTURAS Y TU PRESIONAS EL BOTON MODIFICAR, UNA VEZ HECHO LO GRABAS, Y NECESITAS ACTULIZAR LOS DATOS EN TU GRID, Y UBICARTE EN EL MISMO REGISTRO

PASO 1 . GUARDAS EN VARIABLES AUXILIARES LOS DATOS NECESARIOS PARA UBICAR TU REGISTRO

PASO 2 Refrescar; (HACES LA CONSULTA Q REFRESQUE)

PASO 3 LOCALIZAS
ADOQuery.Locate('SerieNotaVenta;NroNotaVenta',VarArrayOf([Serie,NroFactura]),[loCaseInsensitive]);

OK SUERTE

[[Lepe]]

No he leído el hilo al completo, pero estando en edición, si quieres saber un valor de otro registro, puedes usar el método LookUp del dataset, realiza la búsqueda sin modificar la posición actual.

Otra forma sería lanzar una consulta, pero es algo más laborioso, tú decides.

Saludos

[Rayku]

Si Funcionaria,

Disculpa Pero La Edicion La Haces Con Un Update Del Ado, O Por Consulta Sql?

Haz Una Edicion Por Sql, Y De Esa Manera Podras Usar El Locate, Filter, Incluso Recorrer El Ado Para Los Resultados Q Desees Y Luego Lanzar Tu Actualizacion Por Sql A Tu Tabla O Tablas Y Luego Refrescar Tus Datos Para Q Se Actualizen