if qtmp.RecordCount > 0 then
        Integrareweb := qtmp.FieldByName('valoare').AsString
    else
        Integrareweb := '000';

    Integrareweb := '100';