Hola.
Cita:
Empezado por elmago00
....
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
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
...
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