miv32, коннект делаешь один раз и этого достаточно.
В главной программе, та что черненькая в проекте (и первый запуск приложения происходит оттуда), объявляешь Public pnConnHandle. В нужном месте (например после проверки пароля на вход) делаешь подключение pnConnHandle = SQLSTRINGCONNECT(lcDSN,.T.) один раз и забываешь про SQLSTRINGCONNECT. А дальше используешь только SQLExec(pConnectionHandle,"бла бла бла","имя курсора"). А SQLDISCONNECT используешь при выходе из программы.
Использовать pnConnHandle = SQLSTRINGCONNECT(lcDSN,.T.) каждый раз, когда тебе надо какие то данные выбрать не надо, следовательно и SQLDISCONNECT потом делать не надо.

miv32, а для чего плодить то? Какой смысл в ОДНОМ приложении плодить одно и то же подключение? Или у Вас несколько разных таблиц (например, 5 файлов *.gdb или *.fbd) и для разных форм Вы их подключаете и чего то там с ними мудрите?

SQLSTRINGCONNECT([lShared] | [cConnectString [, lSharable]]) - Устанавливает Соединение с Источником Данных используя строку параметров Соединения.

SQLEXEC(nStatementHandle [, cSQLCommand [, cCursorName[, aCountInfo]]]) - Передает команду SQL удаленному Источнику Данных (Серверу), где данная команда обрабатывается.

SQLDISCONNECT(nStatementHandle) - Закрывает Соединение с удаленным источником Данных .


Зашел в программу, создал подключение SQLSTRINGCONNECT, дальше в программе используешь SQLEXEC, перед выходом из программы SQLDISCONNECT.

miv32Ну вот смотри, для примера.
В модальной форме я должен получить курсор опять-таки через sqlconnect.
Спрашивается, получать новый хендл или из главной формы его тянуть?

Хорошо, что пример написал. Я Вас понял. )))
Чтобы получать курсоры в модальной форме (да и в любой последующей) НЕ НАДО снова и снова использовать sqlconnect. Не надо!!! Подключение уже есть к твоему источнику данных, т.е. к таблице *.gdb или *.fbd (оно создалось вот тут pnConnHandle = SQLSTRINGCONNECT(lcDSN,.T.)).
И это подключение НЕ НАДО КАЖДЫЙ РАЗ пересоздавать!!! Его делаешь один раз и всё! Т.е. получать новый хендл не надо!
Просто при Init-событии модальной формы, чтобы получить курсор используешь команду SQLExec(pnConnHandle,"select * from table1","name_cursor"). После этой команды создастся курсор name_cursor с данными из таблицы table1.
А дальше