ЗАРАНЕЕ СПАСИБО ВСЕМ ЗА ПОМОЩЬhttp://www.sql.ru/forum/images/happy.gif
Есть VB6 и FASTREPORT
Есть три набора данных (далее НД) в ADO рекордсетах
в faste данные пытаюсь отобразить с пом.TfrxADOQuery или TfrxADOTable

1)первый главный цикл на мастердата посредством TfrxADOQuery или TfrxADOTable (из-за сложности построения единого SQL для всего отчёта)
2)подчинённые два НД состоят из ADO рекордсетов 2 и 3(на 2 и 3 НД есть так же SQL строки запроса) , которые в цикле первого ADO рекордсета должны досылать на детейлдата посредством TfrxADOQuery или TfrxADOTable

но когда запускаю первый цикл из двух строк отображается только одна из двух строк первого НД + 1/2 подчиненных НД c SQL2иSQL3

Ребята, помогите пожалуйста разобраться http://www.sql.ru/forum/images/smoke.gif
в процедуре VB6 объявлены:
--------------------------------------------------------------
Dim frDB As TfrxADODatabase
Set FRX = New FastReport.TfrxReport
Dim RST As ADODB.Recordset 'основной цикл
Dim frQueryWorksTLB As TfrxADOTable
Dim frQueryWorks As TfrxADOQuery

есть sql2 sql3 - для подчинённых НД
RST цикл
в нем два один за другим НД для летэйла


НА МАСТЕРДАТА отображается одна строка а там их как минимум две
основной ado-рекордсет открываю так:
RST.CursorLocation = adUseClient
RST.Open frQuery, CN, adOpenStatic, adLockReadOnly, adLockUnspecified ' adCmdText

потом цикл...
With RST
While Not .EOF
Set frQuery1 = FRX.FindObjectEx("q")
FR_qInit frQueryWorks, SQL1
Set frMemo = FRX.FindObjectEx("Memo1")
frMemo.Memo = '123
Set frQuery2 = FRX.FindObject("qSrc")
FR_qInit frQueryWares, SQL2
Set frMemo = FRX.FindObjectEx("Memo2")
frMemo.Memo = '456
'/////////////////
RST.MoveNext
Wend'