|
var clavet : integer;
begin
clavet := 10000;
CEditpaso.Value := (Clavet+CEditCuenta.Value); dmm.ADOTOrdenPago.Append;
dmm.ADOTOrdenPago.FieldByName('CUENTAOR').Value := CEditpaso.Value;
dmm.ADOTOrdenPago.FieldByName('CUENTA').Value:= CEditCuenta.Text;
dmm.ADOTOrdenPago.FieldByName('ORDENP').AsInteger:= n.AsInteger;
dmm.ADOTOrdenPago.FieldByName('FECHA').AsString:=DEditIngreso.Text;
dmm.ADOTOrdenPago.FieldByName('rutproveedores').Value := MkRut.Text;
dmm.ADOTOrdenPago.Post;
Lo siento este era el codigo correcto
en donde dice cuantaor debo grabar el numero 133000129981523
y en cuenta el valor de 1523
y los otros no tengo problemas
pero en el cuentaor me graba cualquier cosa memos el numero
|