Stuff

public text v1 · immutable

#522724

·published 2007-05-30 14:44 UTC

        SqlEjecuta(SqlMySql,'insert into monedas(id_moneda,CODIGO,DESCRIPCION,ABREVIACION,MONEDANACIONAL,ORDEN,ESTADO) values('+
        IntToStr(SQLQuery1.FieldByName('id_moneda').AsInteger)+',"'+
        SQLQuery1.FieldByName('CODIGO').AsString+'","'+
        SQLQuery1.FieldByName('DESCRIPCION').AsString+'","'+
        SQLQuery1.FieldByName('ABREVIACION').AsString+'","'+
        SQLQuery1.FieldByName('MONEDANACIONAL').AsString+'",'+
        IntToStr(SQLQuery1.FieldByName('ORDEN').AsInteger)+',"'+
        SQLQuery1.FieldByName('ESTADO').AsString+'")');
        MuestraProcesoMsg('Web: Moneda Insertada "'+SQLQuery1.FieldByName('DESCRIPCION').AsString+'"');