Запрос
работает.
|Select
     |Период.objid as Идент,
     |Период.value as Состояние
     |from 1sconst as Период
     |where
     | Период.date IN
     |(Select
     |max(Константа.date)
     |from 1sconst as Константа
     |where
     |(Константа.date<=:ВыбДата~~)
Добавляю строку идентификации
     "|and(Константа.objid=Период.objid)"

, и он перестаёт работать. Ошибка

FAILED! ICommandText::Execute(): Operation is invalid for a Memo, General or Picture field.
подскажите в чём проблема.

     |SELECT Сотрудники.CODE Код
     |      , Сотрудники.DESCR Наименование
     |      , $Сотрудники.ДокументУдЛичность ДокументУдЛичность
     |,Сотрудники1.СостояниеФизлица  СостояниеФизлица
     |FROM $Справочник.Сотрудники AS Сотрудники
     |left join
     |(Select Период.objid as objid,
     |Период.value as СостояниеФизлица
     |from 1sconst as Период
     |where
     | Период.date IN
     |(Select
     |max(Константа.date)
     |from 1sconst as Константа
     |where (Константа.date<=:ВыбДата~~)
     |and (Константа.id=$ИсторияРеквизита.Сотрудники.СостояниеФизлица)
     |and(Константа.objid=Период.objid)
     |)and
     | (период.id=$ИсторияРеквизита.Сотрудники.СостояниеФизлица)
     | ) as Сотрудники1 on Сотрудники1.objid=Сотрудники.id
     |GROUP BY Сотрудники.CODE
     |      , Сотрудники.DESCR
     |      , $Сотрудники.ДокументУдЛичность
     |";
Это полностью запрос.

Задача получить из зика состояние сотрудников, т.е. работают или уволены.

Запрос выдаёт ошибку синтаксиса, когда начинаю смотреть подзапрос по периодическим реквизитам выдаёт вышеописанную ошибку

но ведь это не SQL база а дбф.  Поэтому и запрос такой работать не будет.
И ещё это обращение из основной базы к зику...

Покажи строку подключения. Думаю что ты используешь не OLE DB

[quote author=Sky7003 link=1210143863/0#7 date=1210221884]      oledb=СоздатьОбъект("OLEDBData");      
     СтрокаСоединения="Provider=VFPOLEDB.1;Deleted=Yes;Data Source="+фирмы1.путьзик+";Mode=ReadWrite;Collating Sequence=Machine";
           Сообщить(фирмы1.путьзик);
     oledb.ПрисоединитьИБ(СокрЛП(фирмы1.путьзик),СтрокаСоединения);
     command=oledb.СоздатьКоманду();

[/quote]
Если SP2 то не нужно Deleted=Yes;
Вот мой код когда перекидывал Сотров из ЗиК(DBF) в SQL бухию новую и не стандартной конфы
не оптимален, но для разовой операции 1 мин  или 10 сек роли не играют
[code]
[quote author=Sky7003 link=1210143863/0#7 date=1210221884]      oledb=СоздатьОбъект("OLEDBData");      
     СтрокаСоединения="Provider=VFPOLEDB.1;Deleted=Yes;Data Source="+фирмы1.путьзик+";Mode=ReadWrite;Collating Sequence=Machine";
           Сообщить(фирмы1.путьзик);
     oledb.ПрисоединитьИБ(СокрЛП(фирмы1.путьзик),СтрокаСоединения);
     command=oledb.СоздатьКоманду();

[/quote]
Если SP2 то не нужно Deleted=Yes;
Вот мой код когда перекидывал Сотров из ЗиК(DBF) в SQL бухию новую и не стандартной конфы
не оптимален, но для разовой операции 1 мин  или 10 сек роли не играют
           МД = СоздатьОбъект("MetaDataWork");
           БД=СоздатьОбъект("OLEDBData");
           Каталог=СокрЛП(ПутьКБазе)+"\";
           СтрокаСоединения="Provider=VFPOLEDB.1;Data Source="+Каталог+";Mode=ReadWrite;Extended Properties="";User ID="";Password="";Mask Password=False;Collating Sequence=RUSSIAN;DSN=""";;
           БД.ПрисоединитьИБ(Каталог,СтрокаСоединения);
           РС=БД.СоздатьКоманду();            
           
           МД.ПрисоединитьМД(Каталог+"1cv7.md");
           Текст="
           | SELECT
           | Сотр.Code  AS Код
           |,Сотр.Descr as ФИО      
           |,$Сотр.АдресПрописка as АдресПрописка
           |,$Сотр.ИНН as ИНН
           |,$Сотр.ДокументУдЛичность as ДокументУдЛичность
           |,cСостояние.value as Состояние
           |,cПодразделение.Value as   КодПодр
           |,Подр.Code as КодПодразделения  
           |,Долж.Descr as Должность
           |,cДолжность.Value as Дол
           |FROM $Справочник.Сотрудники as Сотр
           |INNER JOIN
           |(
           |
           |   SELECT   DISTINCT
           |       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 cСостояние ON cСостояние.objid = Сотр.id AND cСостояние.value = '    66   '    
           |
           |INNER JOIN
           |(
           |   SELECT   DISTINCT
           |       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 cПодразделение ON cПодразделение.objid = Сотр.id  
           |
           |LEFT JOIN (SELECT * FROM $Справочник.Подразделения AS Под ) as Подр  ON Подр.ID =   cПодразделение.Value    
           | -- Должность    
           |
           |INNER JOIN
           |(
           |
           |   SELECT   DISTINCT
           |       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 cДолжность ON cДолжность.objid = Сотр.id
           |
           |LEFT JOIN (SELECT * FROM $Справочник.Должности AS Дол ) as Долж  ON Долж.ID =  cДолжность.Value    
           |
           |
           |WHERE Сотр.ISFOLDER =2      
           |And Сотр.IsMark = ''
           |
           |";
           РС.отладка(0);
           РС.УстановитьТекстовыйПараметр("ВыбДата",Дата("01.04.2008"));
           ТЗ=РС.ВыполнитьИнструкцию(Текст );



[/code]

особой разницы между вашими вариантами и своим я ненашёл. Попробовал и то и другое. неработает.

     |SELECT Сотрудники.CODE Код
     |      , Сотрудники.DESCR Наименование
     |      , $Сотрудники.ДокументУдЛичность ДокументУдЛичность
     |,cСостояние.СостояниеФизлица  СостояниеФизлица
     |,:база база
     |FROM $Справочник.Сотрудники AS Сотрудники
     |INNER JOIN
     |(
     |
     |   SELECT   DISTINCT
     |       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 cСостояние ON cСостояние.objid = Сотр.id AND cСостояние.value = '    66   '   
     |
     |GROUP BY Сотрудники.CODE
     |      , Сотрудники.DESCR
     |      , $Сотрудники.ДокументУдЛичность
     |";
ошибка синтаксиса

Может у меня стоит какаята глюченая версия драйвера VFPOLEDB???

проблема решена. Всем спасибо

Я использовал старый драйвер vfpoledb из за этово он и не принимал верные запросы