Meta name parser error: модификатор не определен для типа ":ПредДата~~"

Вот текст запроса


Если ПустоеЗначение(ДокВызова)=0 Тогда
       Если ДокВызова.Выбран()=1  Тогда    
           ВидЗапроса=3; 
           Если ЕстьПодключение=0 Тогда
               ДатаЗапроса=СформироватьПозициюДокумента(ДокВызова.ТекущийДокумент(),-1);
           Иначе          
               МД=СоздатьОбъект("MetaDataWork");
               ущийДокумент(),-1));
           КонецЕсли;   
       Иначе 
           ДатаЗапроса=ДокВызова.ДатаДок;
           Если ДатаЗапроса>ПолучитьДатуТА() Тогда
               ДатаЗапроса=ПолучитьДатуТА();
               ВидЗапроса=1;
           Иначе
               ВидЗапроса=2;
           КонецЕсли;   
       КонецЕсли;
    Иначе 
       ВидЗапроса=1;
       ДатаЗапроса=ПолучитьДатуТА();
    КонецЕсли;

ИмяТаблицы="#Список";

       БыстрыйЗапрос.УложитьСписокОбъектов(СписокЭлементов,ИмяТаблицы,"Номенклатура"); 
      
       ТекстЗапроса="
       |SELECT
       |    Рег.Фирма AS [Фирма $Справочник.Фирмы], 
       |    Рег.Склад AS [Склад $Справочник.МестаХранения], 
       |    Рег.Товар AS [Товар $Справочник.Номенклатура],
       |   Рег.Партия AS [Партия $Документ],
       |    SUM(Рег.ОстатокТовара) AS Остаток,
       |    SUM(Рег.ЦенаВхода) AS ЦенаВх,
       |    SUM(Рег.ПродажнаяЦена) AS ЦенаПр
       |FROM
       |    (SELECT   
       |        $Рег_1.Фирма AS Фирма,
       |        $Рег_1.Склад AS Склад,
       |        $Рег_1.Товар AS Товар, 
       |        $Рег_1.Партия AS Партия, 
       |        $Рег_1.ОстатокТовара AS ОстатокТовара,
       |        $Рег_1.ЦенаВхода AS ЦенаВхода,
       |        $Рег_1.ПродажнаяЦена AS ПродажнаяЦена
       |    FROM
       |        $РегистрИтоги.ПродажныеЦены AS Рег_1
       |    WHERE
       |        (PERIOD = :ПредМесяц~~)
       |        AND ($Рег_1.Склад=:Склад)
       |        AND ($Рег_1.Фирма=:Фирма)
       |";
       Если СписокЭлементов.РазмерСписка()<>0 Тогда   
           ТекстЗапроса=ТекстЗапроса+"
           |AND ($Рег_1.Товар IN (SELECT Val FROM "+ИмяТаблицы+"))"; 
       КонецЕсли;   
       ТекстЗапроса=ТекстЗапроса+"
       |
       |    UNION ALL
       |
       |    SELECT   
       |        $Рег_2.Фирма AS Фирма,
       |        $Рег_2.Склад AS Склад,
       |        $Рег_2.Товар AS Товар,
       |        $Рег_2.Партия AS Партия,   
       |        $Рег_2.ЦенаВхода AS ЦенаВхода, 
       |        $Рег_2.ПродажнаяЦена AS ПродажнаяЦена,
       |        $Рег_2.ОстатокТовара*(1-Рег_2.debkred*2) AS ОстатокТовара
       |    FROM
       |        $Регистр.ПродажныеЦены AS Рег_2
       |    INNER JOIN
       |        1sjourn jr ON Рег_2.iddoc = jr.iddoc
       |            AND (jr.date BETWEEN :НачалоМесяца~~ AND :ПредДата~~)
       |            AND ($ФлагРегистра.ПродажныеЦены = 1)
       |    WHERE
       |        ($Рег_2.Склад=:Склад)
       |        AND ($Рег_2.Фирма=:Фирма)
       |";
       Если СписокЭлементов.РазмерСписка()<>0 Тогда   
           ТекстЗапроса=ТекстЗапроса+"
           |AND ($Рег_2.Товар IN (SELECT Val FROM "+ИмяТаблицы+"))"; 
       КонецЕсли;   
       ТекстЗапроса=ТекстЗапроса+"
       |    ) Рег
       |GROUP BY   
       |   Рег.Фирма,
       |   Рег.Склад,
       |    Рег.Товар,
       |    Рег.Партия";   
      
       //БыстрыйЗапрос.Отладка(1);

      
       БыстрыйЗапрос.УстановитьТекстовыйПараметр("Список",ИмяТаблицы);
       БыстрыйЗапрос.УстановитьТекстовыйПараметр("Фирма",ФирмаОтгрузки);
       БыстрыйЗапрос.УстановитьТекстовыйПараметр("Склад",СкладОтгрузки); 
       БыстрыйЗапрос.УстановитьТекстовыйПараметр("ПредДата",ДатаЗапроса);
       Если ВидЗапроса=3 Тогда
           ова.ДатаДок-1)));
           аДок));
       Иначе   
           проса-1)));
           ;
       КонецЕсли;


ошибка возникает тогда, когда вызов происходит из уже сохранённого документа. по ветке


Если ДокВызова.Выбран()=1  Тогда    
           ВидЗапроса=3; 
           Если ЕстьПодключение=0 Тогда
               ДатаЗапроса=СформироватьПозициюДокумента(ДокВызова.ТекущийДокумент(),-1);
           Иначе          
               МД=СоздатьОбъект("MetaDataWork");
               ущийДокумент(),-1));
           КонецЕсли;

база dbf


подключение :

ЕстьПодключение=0;
    Если СПП_Загружена=1 Тогда   
       БыстрыйЗапрос=СоздатьОбъект("ODBCRecordSet");
       БазаДанныхСкуль=СоздатьОбъект("ODBCDataBase");   
       БазаДанных=СоздатьОбъект("OLEDBData");
       Если БазаДанныхСкуль.ЕстьСоединение()=0 Тогда
           // Это база дбф

           Если МонопольныйРежим()=1 Тогда
               ЕстьПодключение=0;
               Возврат;
           КонецЕсли;
           Соединение = Шаблон("Provider=VFPOLEDB.1;Data Source=[КаталогИБ()];Mode=ReadWrite");
     

JohnyDeath писал(а) 08. Декабря 2008 :: 08:57:


Хорошо - мне надо получить остатки на "позиция текущего документа"-1

как?

JohnyDeath писал(а) 08. Декабря 2008 :: 09:04:



сенькс. буду пробовать

Что такое "DTOS"?