Если использовать параметры в запросе то вложенный запрос работает:            
     ТекстЗапроса = "SELECT
     |Док.IDDoc as [Док $Документ.НакладнаяТоварыОпт]
     |,$Док.Валюта As [Валюта $Справочник.Валюты]
     |,(select TOP 1 cast(value as numeric(18,4))    FROM  1SConst   where id = $ИсторияРеквизита.Валюты.Курс  and date <= :НачДата~~ and objid = [i][color=#00ff00]:ф_Валюта[/color][/i] ORDER BY date desc,time desc,docid desc) As Курс
     |FROM $Документ.НакладнаяТоварыОпт AS Док";      
Если поменять параметр [i][color=#00ff00]:ф_Валюта[/color][/i] на значение [i]$Док.Валюта[/i] то все хана:
     ТекстЗапроса = "SELECT
     |Док.IDDoc as [Док $Документ.НакладнаяТоварыОпт]
     |,$Док.Валюта As [Валюта $Справочник.Валюты]
     |,(select TOP 1 cast(value as numeric(18,4))    FROM  1SConst   where id = $ИсторияРеквизита.Валюты.Курс  and date <= :НачДата~~ and objid = [i][color=#00ff00]$Док.Валюта[/color][/i] ORDER BY date desc,time desc,docid desc) As Курс
     |FROM $Документ.НакладнаяТоварыОпт AS Док";      

бери не топ, а max(date)

Ну, ты еще и неверно свой курс вычисляешь - надо на дату документа, а не на начДата

чет не пойму как мне поменять TOP на MAX куда  вставить MAX в этой строке (select TOP 1 cast(value as numeric(18,4))    FROM  1SConst   where id = $ИсторияРеквизита.Валюты.Курс  and date <= :НачДата~~ and objid = :ф_Валюта ORDER BY date desc,time desc,docid desc)

Порылся на форуме нашел не много другое решении, но как подставить дату текущего документа???, если параметр подставлять то все ОК:
     ТекстЗапроса = "SELECT
     |Док.IDDoc as [Док $Документ.НакладнаяТоварыОпт]
     |,$Док.Валюта As [Валюта $Справочник.Валюты]
     |,Журнал.Date as Дата
   |,Курс.Value as Курс
     |FROM $Документ.НакладнаяТоварыОпт AS Док
     |LEFT JOIN 1SJOURN AS Журнал ON Док.IDDoc = Журнал.IDDOC
     |LEFT JOIN (
     |          SELECT  
   |          c_dt.objid as objid
   |         ,c_dt.value as value
   |          FROM 1sconst as c_dt
     |          WHERE
     |               c_dt.date IN (SELECT MAX(c.date)  
     |               FROM 1sconst as c
     |               WHERE
     |               (c.date <= :НачДата~~) AND (c.id = $ИсторияРеквизита.Валюты.Курс) AND (c.objid = c_dt.objid)
     |          )AND c_dt.id = $ИсторияРеквизита.Валюты.Курс
     |) as Курс ON Курс.objid = $Док.Валюта  
     |";      
КАК ВМЕСТО :НачДата~~ подставить Журнал.Date???? когда подставляешь то пишет не найдена колонка!!!!!!!!! Не ужели ни кто не сталкивался! Заранее благодарен если кто подскажет!!!

Кароче запросом 1С++ эту праблемку не решить только SQLite поможет жаль, 1С++ быстрей раза в 3 работает, чем SQLite

Это понятно! Но думаю если с временной таблицей, то эффект от скорости уйдет, поэтому целесообразней в данном случаи SQLite - текст запроса намного проще.Интересно как автор класса  ПрямогоЗапроса, от этого ушел! Я так понимаю у него если запущенно монопольно, то запрос выполняется через SQLite иначе чере OLE DB! Он же как то реализовал Срезпоследних! попробую я на досуге написать  через ПрямойЗапрос!

Спасибо! Тогда и пробовать не буду!