Set rsParent = db.OpenRecordsrsParentet(strSQL)
http://www.sql.ru/forum/1092055/oshibka-tranzakciya-ne-mozhet-byt-zapushhena-slishkom-bolshoe-chislo-vlozhennyh-tranzakciy