gFiltersMFilters и таблица MFiltersForInsert

[Zver]

Уважаемые форумчане,
Переходим на новые патчи. В одной из доработок используется макропеременная gFiltersMFilters.

В новом файле переписан код макропеременной и в нём используется таблица MFiltersForInsert. При компиляции возникает ошибка "Таблица MFiltersForInsert отсутствует в словаре".

Найти описание этой таблицы не удалось. Где можно его найти?

P.S.
Описание gFiltersMFilters в старом файле:

Код: Выделить всё

#declare gFiltersMFilters
public function CopyDocument: comp;
{
  var SFiltersNRec : comp;
  SFiltersNRec := SFilters.NRec;
  SFilters.NRec := 0;
  insert current SFilters;
  CopyDocument := SFilters.NRec;
  _LOOP MFilters where (( SFiltersNRec == MFilters.cSFilters ))
    {
      MFilters.NRec := 0;
      insert current MFilters;
    }
}

public function NextDocument: comp;
{
  NextDocument := GetNextNRec(#SFilters, 0)
}

public procedure DeleteDocument(aDoc : comp);
{
  delete all MFilters where((aDoc  == MFilters.cSFilters));
  delete SFilters where((aDoc  == SFilters.NRec));
}
#end

И в новом:

Код: Выделить всё

#declare gFiltersMFilters
public function CopyDocument: comp;
{
//  Message('CopyDocument= '+SFilters.NRec,Information);
  var SFiltersNRec : comp;
  SFiltersNRec := SFilters.NRec;
  SFilters.NRec := 0;
  insert current SFilters;
  CopyDocument := SFilters.NRec;
//  _LOOP MFilters where (( SFiltersNRec == MFilters.cSFilters ))
  var i : word;
  for ( i := GetFirst MFilters where (( SFiltersNRec == MFilters.cSFilters ));
        i = tsOk;
        i := GetNext MFilters where (( SFiltersNRec == MFilters.cSFilters )))
   if ( GetFirst MFiltersForInsert where (( MFilters.NRec == MFiltersForInsert.NRec )) =tsOk )
    {
      MFiltersForInsert.NRec := 0;
      MFiltersForInsert.cSFilters := CopyDocument;
      insert current MFiltersForInsert;
//      Message('MFiltersInsert =   '+MFiltersForInsert.NRec+'   wType='+MFiltersForInsert.wType,Information);
    }
}

public function NextDocument: comp;
{
  NextDocument := GetNextNRec(#SFilters, 0)
}

public procedure DeleteDocument(aDoc : comp);
{
  delete all MFilters where((aDoc  == MFilters.cSFilters));
  delete SFilters where((aDoc  == SFilters.NRec));
}
#end 

[Den]

MFiltersForInsert это, наверное, alias MFilters

[Maverick]

MFiltersForIsert - это синоним таблицы MFilers. Инфа достоверная

[Zver]

Спасибо, помогло.

Пересобрал ресурс.