Thiago ao invés de:
>

>with thisform
>  .combo1.rowsource = ""
>  select desc_ati from atitudes where .text1.value = codi_ati into cursor tmpati
>  .combo1.rowsource = "tmpati"
>  .combo1.requery
>endwith
>

Use:

em tempo de desenho, na propriedade rowsource do campo coloque:

select desc_ati from atitudes where wform.text1.value = codi_ati into cursor tmpati


na propriedade rowsourcetype do campo coloque:

3 (sql statment)


No load (do FORM) faça:

public wform
wform=thisform

E então no momento da re-atualização apenas faça:

thisform.combo1.requery()

Claudio