Do not let any software impress you!

Only let it convince your intellect.
Slider img 1
Do not look for a business paradise!

It is a waste of time.
Slider img 2
Only yourself can push you uphill.

There is no easy road to prizes.
Slider img 3
Productivity is the name of the game.

And you have to conquer it.
Slider img 4
As long as you understand it,

you will start to build your know-how.
Slider img 5
We can help with that.

We have the tools and the method.
Slider img 6
Procedure : AU_AUTOSCRIPT7

AutoScript

{.................another database example...........}

start_sql "*" "KOSMOS"
   SELECT AU_BUSINESS, TITLE
   FROM AU_BUSINESS
end_sql
q = QueryByName()
call TExecute(q)

count = TRecordCount(q)

call message("BUSINESS ID, TITLE")

call TFirst(q)
for i = 1 to count
    id = TGetFld(q,"AU_BUSINESS")
    name = TGetFld(q,"TITLE")

    call message(id,", ",name)

    call TNext(q)
next
call FreeEmbSQL(q)