Галактика в вопросах и ответах

Спасибо, я сделал немоного другим способом, просто думал, что это как-то исправляется не кодом... Спасибо всем за помощь.

Это логично, что spdocnal отсутствует, с 0 налог не возьмешь, но почему обнуляется поле полностью?
Т.е. Totsail2.SUMNDS был равен 1000 (к примеру), а после нулевой записи становится равен 0... Помоему это глюк, или я что-то не понимаю...

Далее заполняется поля таблицы (set ...) и происходит update... В примере поля не все указаны... Там как минимум Totsail2.cbasedoc заполняется, чтобы при повторном обращении по индексу позицианироваться на записи... Весь код будет достаточно громоздким.

Там не нужен current, т.к. запись вставляется пустая... К тому же работает все прекрасно если spsopr.price <> 0.

If getfirst Totsail2 where (( do_nrec == Totsail2.cbasedoc )) <> tsOK then If insert in Totsail2<>tsOK then { message('Не удалось добавить запись в структуру Totsail2'); exit; } if spsopr.price <> 0 then { set Totsail2.SUMNDS := Totsail2.SUMNDS + spdocnal.summa; set Totsail2.SUMMA := Totsail2.SUMMA...

см. настройку Доступ к таблицам...
Если там нет, то PROTECT...

1. Создали таблицу с необходимыми нам полями и полями Галки. Добавли туда поле со ссылкой на katmc.nrec. Получилось приблизитеьлно следующее: Create Table D_GAL.Sert "Приложение к МЦ" With Table_Code = 28002 With Replace ( NREC : Comp "NREC", // "номер записи" LASTUSER ...

Вообще мы решили эту проблему несколько иначе: 1. Добавили в словарь ещё Базу, в которой вся необходимая информация по МЦ и храниться (Ссылка на katmc)... 2. Переделали все отчёты. Проблемы возникают только когда МЦ будут удаляться, т.к. ссылка остаётся, но это можно тоже исправить, если конечно нуж...

А заносить часть информации в katmc.name, а другую в ATTRVAL.VSTRING. Итого 80+120=200.
Так не устроит?

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

if .... 
{ 
  abort; 
  exit; 
} 

по-любому

Заработало. Спасибо.

Все равно не хочет закрываться.

Пробовал, не помогло...

cmInit: { ... if getlast spsopr=tsOK then dat := spsopr.dsopr else begin message('Данные не обнаружены !!!',2); CloseInterface(cmOK); end; ... } Почему Если записей нет, то интерфейс не закрывается по CloseInterface? Атлантис 3.03.22...

У нас CATALOGS около 8 часов конвертился, советую просто подождать...

Попробуй убрать order... Очень часто это является причиной получения не полной информации в интерфейсе.