Normal, estas 2 líneas tienen que estar fuera del begin.. end (del else) para que siempre se ejecute, sea 30-60, o bien 90, en ambos casos debe ejecutarse:
Código Delphi
[-]
ADOSPImporteCuentasxPagar.ExecProc;
EditImporte.Text := ADOSPImporteCuentasxPagar.Parameters.ParamValues ['@Importe'];
Creo que estas un poquito espeso (no te ofendas, nos suele pasar mucho a los programadores)
, una vueltita por el parque suele ayudar
Saludos.