>Hi all,
>
>To achieve the result of tables relations, I'm using a SELECT SQL statement
>which take a few seconds and meanwhile it processing I would like to make a bar processing, but I don't have any idea.
>
>
>Many thanks in advance
>
>Budianto M.

If you're talking about Progress Bar, just issue set talk on before your select statement and then immediately after restore it back to original. E.g.

local llHalt, lcOnEscape, lcSetEscape, lcSetTalk
lcSetTalk=set('talk')
llHalt=.f.
lcSetEscape=set('escape')
lcOnEscape=on('escape')
set escape on
on escape llHalt=.t. && This would allow to stop SQL by pressing ESC
set talk on && to show progressbar
set talk window
select *....
if lcSetTalk="OFF"
   set talk off
endif
if lcSetEscape="OFF"
   set escape off
endif
on escape &lcOldEscape

BTW, the idea of termination SQL by pressing ESC belongs to Mike Asherman (if, of course, he didn't inherit it :))