Ver Mensaje Individual
  #2  
Antiguo 06-12-2016
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola.
Cita:
Empezado por elmago00 Ver Mensaje
....
Lo que yo hago es extraer los primeros 6 números de todos los registros de la columna id asi:
Podrías simplemente hacer:
Código Delphi [-]
...
begin
  ComboBox1.Items.Clear;
  ZQuery1.Close;
  ZQuery1.SQL.Text := 'SELECT SUBSTRING(ID FROM 1 FOR 6) AS DATO FROM TIPOMAYOR';
  ZQuery1.Open;
  while not ZQuery1.Eof do
  begin
    ComboBox1.Items.Add( ZQuery1.FieldByName( 'DATO' ).AsString );
    ZQuery1.Next;
  end;
  ZQuery1.Close;
  ...

Cita:
Empezado por elmago00 Ver Mensaje
para actualizar sus valores de acuerdo a sus primeros 6 numeros, que los reconoce como hijos, yo lo hago asi..
Código Delphi [-]
ZQUERY1.SQL.ADD('UPDATE tablamayor Set SALDO='2561150.25' where id='1101010000');
Sería mejor así:
Código Delphi [-]
begin
  ZQuery1.Close;
  ZQuery1.SQL.Text := 'UPDATE TABLAMAYOR SET SALDO = :SALDO WHERE ID = :ID';
  ZQuery1.ParamByName('SALDO').AsCurrency := valor_saldo;
  ZQuery1.ParamByName('ID').AsString      := valor_id;
  ZQuery1.ExecSQL;
...

Cita:
Empezado por elmago00 Ver Mensaje
...
para saber cuales son sus hijos yo uso la esto

Código Delphi [-]
id regexp '+char(39)+'^'+1101+char(39));
pero debo hacerlo de de la suma de los valores de sus ·hijos",..
puedo hacer uno por uno,pero debo hacerlo automático.
actualizar todos los registros mayores, de acuerdo a los valores de sus hijos, de forma secuencial, uno tras otro.
para no tener que digitar manualmente la cuenta mayor a la que le sumare los valores de sus hijos..
Aqui ya no entiendo el planteo del problema.

La otra duda que me queda es el papel que juega en todo esto TIPOMENOR (o TABLAMENOR ? ) , ya que no aparece en ninguna parte del código.

Saludos
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....

Última edición por ecfisa fecha: 06-12-2016 a las 16:08:24.
Responder Con Cita