TABLE РПО_НАЧ_АМОРТ FORWARD;
TABLE РПО_НАЧ_АМОРТ_TR FORWARD;

--TABLE РПО_ДНФА FORWARD;
--TABLE РПО_ОТЧЕТЫ_СТРОКИ FORWARD;
TABLE РПО_НФА_СПРАВКА_ПРОВОДКИ FORWARD;

TABLE РПО_ТРЕБОВ_НАКЛАДНАЯ = "ТРЕБОВАНИЕ-НАКЛАДНАЯ. Типовая межотраслевая форма N М-11";
  ЗАЩИТА       :BOOLEAN; --Защита от изменения документа
  ТОЧН         :INTEGER; --Точность расчетов
  УЧРЕЖД       :STRING; --Наименование учреждения
  ОКПО         :STRING; --ОКПО учреждения
  КОД_П_ОТК    :STRING; --Код подразделения отправителя
  КОД_П_КУД    :STRING; --Код подразделения получателя
  КОД_М_ОТК    :STRING; --Код местонахождения отправителя
  КОД_М_КУД    :STRING; --Код местонахождения получателя
  ИМЯ_М_ОТК    :STRING; --Наименование местонахождения отправителя
  ИМЯ_М_КУД    :STRING; --Наименование местонахождения получателя
  ВИД_Д_ОТП    :STRING; --Вид деятельности отправителя
  ВИД_Д_ПОЛ    :STRING; --Вид деятельности получателя
  НОМЕР        :INTEGER; --Номер накладной по порядку
  НОМЕРБУМ     :STRING; --Номер накладной по порядку бумажный
  ДАТА_НАК     :DATE; --Дата накладной
  КОДОПЕР      :STRING; --Код операции
  КОД_СИНТ     :STRING; --Код синтетического учета
  КОД_АНАЛ     :STRING; --Код аналитического учета
  УЧ_ЕД_ВЫП    :STRING; --Учетная единица выпуска продукции (работ, услуг)
  ФИО_Ч_КОГО   :STRING; --Ф.И.О. через кого
  КОД_ТРЕБОВАЛ :STRING; --Код МОЛ затребовал
  ФИО_ТРЕБОВАЛ :STRING; --Ф.И.О. затребовал
  ФИО_РАЗРЕШИЛ :STRING; --Ф.И.О. разрешил
  SUBTAB ПОЗИЦИИ;
    СЧНФА      :STRING;
    КОД_НФА    :STRING;
    ИМЯ_НФА    :STRING;
    НОМЕН_НОМ  :STRING; --Номенклатурный номер
    КОД_ИНВ    :STRING;
    ВЕД_ИНВ    :STRING;
    КОД_ЕДИЗМ  :STRING;
    ИМЯ_ЕДИЗМ  :STRING;
    КОЛ_ЗАТРЕБ :REAL;
    КОЛ_ОТПУЩ  :REAL;
    ЦЕНА_НФА   :REAL;
    СУММА_НФА  :REAL;
    СКЛАД_НОМ  :STRING; --Порядковый номер по складской картотеке
  ENDSUB;
  SUBTAB ПОДПИСЬ = "Подписи";
    ПОЛЕ      :STRING;
    ДОЛЖНОСТЬ :STRING; --значение поля ПОЛЕ_ДОЛЖНОСТЬ
    ФИО       :STRING; --значение поля ПОЛЕ_ФИО
    ДАТА      :DATE;
    ВРЕМЯ     :INTEGER;
  ENDSUB;

  КОД_ОТПУС    :STRING; --Код МОЛ отпустил
  ФИО_ОТПУС    :STRING; --Ф.И.О. отпустил
  ФИО_ПОЛУЧ    :STRING; --Ф.И.О. получил
  ДОЛ_ОТПУС    :STRING; --Должность отпустил
  ДОЛ_ПОЛУЧ    :STRING; --Должность получил
  ДНФАID       :INTEGER; --Ссылка на запись в картотеке движение НФА
  RECCRD       :INTEGER; -- ссылка на картотеку CRD
  CRD          :STRING;  -- ссылка на картотеку по ее имени
  BLNCRD       :STRING;  --Бланк редактор картотеки родителя CRD
  CREATEDUSER  :STRING;
  MODIFIEDUSER :STRING;
ENDTAB;

TABLE РПО_ИНВКАРТ_ОС = "Инвентарная карточка учета ОС"; --Данные учета НФА
  НФА            :STRING; --Код учета НФА
  ИНВ            :STRING(45); --Учетный номер НФА
  --Данные для отображения в браузере
  НФА_ИМЯ        :STRING; --НФА
  МХЭИМЯ         :STRING; --Местонахождение
  МОЛИМЯ         :STRING; --Материально отвественное лицо
  ШТРИХКОД       :STRING; --Электронный код учета объекта (штрихкод)
  --ДАННЫЕ ИНВЕНТАРНОЙ КАРТОЧКИ
  --Шапка
  НОМЕР          :INTEGER; --Номер инвентарной карточки (электронный)
  НОМЕРБУМ       :STRING(15); --Номер инвентарной карточки (бумажный)
  DD             :DATE; --Дата инвентарной карточки (дата принятия к учету)
  ЗАЩИТА         :BOOLEAN;
  ОБЪЕКТ1        :STRING; --Наименование объекта (полное)
  ОБЪЕКТ2        :STRING; --Наименование объекта (полное)
  ОБЪЕКТ3        :STRING; --Наименование объекта (полное)
  ОКОФ           :STRING(10);
  УЧРЕЖДЕНИЕ     :STRING;
  ОКПОУЧРЕЖ      :STRING(15);
  СТРПОДР        :STRING; --Структурное подразделение
  НФА_НАЗНАЧЕНИЕ :STRING;
  ИЗГОТОВИТЕЛЬ   :STRING;
  ОКПОИЗГ        :STRING(15);
  МХЭ            :STRING; --Местонахождение
  МОЛ            :STRING; --Материально отвественное лицо
  --Строка перед таблицами
  ИНВ_ВЕД        :STRING; --Ведомственный инвентарный номер
  АМОРТ_ГРУП     :INTEGER; --Группа амортизации
  АМОРТ_СРОК     :REAL; --Срок полезного использования (лет)
  СЧЕТНФА        :STRING(35); --Счет бюджетного учета НФА
  --Заполнил
  ЗАПОЛНИЛДОЛ    :STRING;
  ЗАПОЛНИЛ       :STRING; --Таблица ввода в эксплуатацию
  ПАСПОРТ        :STRING(240); --Паспорт, свидетельство чертеж (проект, модель, тип, марка)
  ЗАВОД_НОМ      :STRING(60); --Заводской номер
  ИНОЙ_НОМ       :STRING(60); --Иной номер
  ДАТА_ИЗГ       :DATE; --Дата выпуска (изготовления)
  ДАТ_ВЭКСП      :DATE; --Дата акта ввода в эксплуатацию
  НОМ_ВЭКСП      :STRING(20); --Номер акта ввода в эксплуатацию
  ПЕРВ_СТОИМ     :REAL; --Балансовая стоимость
  П_СУММА_МЕС    :REAL; --Сумма месячная амортизации
  П_АМОРТ_НАКОП  :REAL; --Накопленная амортизация
  FIRST_DATE     :STRING; --Первая дата начисления
  МХЭ_FIRST      :STRING; --Первое Местонахождение
  МОЛ_FIRST      :STRING; --Первый МОЛ
  --Таблица амортизации
  SUBTAB НАЧ_АМОРТ = "Амортизация объекта";
    ДАТ_АКТА     :DATE; --Дата акта приема отремонтированных ОС
    НОМ_АКТА     :STRING(20); --Номер акта приема отремонтированных ОС
    БАЛ_СТОИМ    :REAL; --Балансовая стоимость
    СУММА_МЕС    :REAL; --Сумма месячная амортизации
    АМОРТ_НАКОП  :REAL; --Накопленная амортизация
    DATE_ACCOUNT :DATE; --Дата начисления
    ТИП          :INTEGER; --Тип смены нормы начисления амортизации (реконструкция, переоценка и т.д. )
  ENDSUB;
  SUBTAB НАЧ_АМОРТ_Т = "Амортизация объекта";
    ДАТ_АКТА     :DATE; --Дата акта приема отремонтированных ОС
    НОМ_АКТА     :STRING(20); --Номер акта приема отремонтированных ОС
    БАЛ_СТОИМ    :REAL; --Балансовая стоимость
    СУММА_МЕС    :REAL; --Сумма месячная амортизации
    АМОРТ_НАКОП  :REAL; --Накопленная амортизация
    DATE_ACCOUNT :DATE; --Дата начисления
    ТИП          :INTEGER; --Тип смены нормы начисления амортизации (реконструкция, переоценка и т.д. )
  ENDSUB;
  СТОИМ_ОТЧ      :REAL; --Балансовая стоимость на дату отчета
  СНАЧ_ЭКСП      :REAL; --Начислено с начала в эксплуатации
  LAST_DATE      :DATE; --Последняя дата начисления
  --Таблица реконструкции и модернизации
  SUBTAB РЕКОНСТРУКЦИЯ = "Реконструкция, модернизация, достройка, дооборудование, частичная ликвидация";
    ДАТА  :DATE; --Дата накладной
    ЖО    :STRING(20); --Журнал-ордер
    СУММА :REAL; --Начисленная сумма
  ENDSUB;
  --Таблица реконструкции и модернизации текушего периода
  SUBTAB РЕКОНСТРУКЦИЯ_Т = "Реконструкция, модернизация, достройка, дооборудование, частичная ликвидация";
    ДАТА  :DATE; --Дата накладной
    ЖО    :STRING(20); --Журнал-ордер
    СУММА :REAL; --Начисленная сумма
  ENDSUB;
  SUBTAB ПЕРЕОЦЕНКА = "Результаты переоценки";
    ДАТА  :DATE; --Дата накладной
    ЖО    :STRING(20); --Журнал-ордер
    СУММА :REAL; --Начисленная сумма
  ENDSUB;
  SUBTAB ПЕРЕОЦЕНКА_Т = "Результаты переоценки";
    ДАТА  :DATE; --Дата накладной
    ЖО    :STRING(20); --Журнал-ордер
    СУММА :REAL; --Начисленная сумма
  ENDSUB;
  ОПРИХ_ДАТА     :DATE;
  ОПРИХ_ЖО       :STRING;
  ВЫБЫТ_ДАТА     :DATE;
  ВЫБЫТ_ЖО       :STRING;
  ВЫБЫТ_ПРИЧ     :STRING;
  SUBTAB ВНУТ_ПЕРЕМЕЩ = "Внутреннее перемещение объекта";
    ДАТА  :DATE; --Дата накладной
    НОМЕР :STRING(20); --Номер накладной
    ЖО    :STRING(20); --Журнал-ордер
    МХЭ   :STRING; --Местонахождение
    МОЛ   :STRING; --Материальноответственное лицо
  ENDSUB;
  SUBTAB ВНУТ_ПЕРЕМЕЩ_Т = "Внутреннее перемещение объекта";
    ДАТА  :DATE; --Дата накладной
    НОМЕР :STRING(20); --Номер накладной
    ЖО    :STRING(20); --Журнал-ордер
    МХЭ   :STRING; --Местонахождение
    МОЛ   :STRING; --Материальноответственное лицо
  ENDSUB;
  ИМЯ_СТ1        :STRING;
  ИМЯ_СТ2        :STRING;
  ИМЯ_СТ3        :STRING;
  ИМЯ_СТ4        :STRING;
  ВОЗМОЖНЫДМ     :BOOLEAN;
  SUBTAB ХАРОС = "Краткая индивидуальная характеристика объекта";
    НАИМЕН_ПР   :STRING; --наименование признаков
    ОСН         :STRING; --основной объект
    ПРИСТР1     :STRING; --наименование пристроек
    ПРИСТР2     :STRING; --наименование пристроек
    ПРИСТР3     :STRING; --наименование пристроек
    ПРИСТР4     :STRING; --наименование пристроек
    --Драгоценных материалы :
    НАИМЕН_ОБ   :STRING; --наименование объекта
    НАИМЕН_ДРАГ :STRING; --наименование драг. материала
    ЕДИЗМ_ДРАГ  :STRING(50); --единица измерения драг. материала
    ОКЕИ_ДРАГ   :STRING(15); --код единицы измерения
    КОЛИЧ       :REAL; --количество драг. материала
    ----------- поля драгмет    -------
    ДРАГМЕТ00              :REAL; -- МПГ
    ДРАГМЕТ01              :REAL; -- Золото
    ДРАГМЕТ02              :REAL; -- Серебро
    ДРАГМЕТ03              :REAL; -- Платина
    ДРАГМЕТ04              :REAL; -- Палладий
    ДРАГМЕТ05              :REAL; -- Иридий
    ДРАГМЕТ06              :REAL; -- Родий
    ДРАГМЕТ07              :REAL; -- Рутений
    ДРАГМЕТ08              :REAL; -- Осмий
  ENDSUB;
  CREATEDUSER    :STRING;
  MODIFIEDUSER   :STRING;
  ДНФАID         :INTEGER; --Ukey Движения НФА из которого сформирована карточка
  LASTUPDATE     :DATE;
  КОНВ           :INTEGER; --Признак конвертации
  SUBTAB ИНВКАРТ = "Карточки гр.учета";
    НК :INTEGER; --Номер инвентарной карточки
  ENDSUB;
  SUBTAB ИЗМЦЕН = "Реконструкция, модернизация, переоценка, кап. вложения";
    РЕКДАТ  :DATE;
    РЕКНЖО  :STRING(9);
    РЕКСУМ  :REAL;
    КАПДАТ  :DATE;
    КАПНЖО  :STRING(9);
    КАПСУМ  :REAL;
    ПЕРДАТ  :DATE;
    ПЕРНЖО  :STRING(9);
    ПЕРСУМ  :REAL;
    ПЕРДАТ1 :DATE;
    ПЕРНЖО1 :STRING(9);
    ПЕРСУМ1 :REAL;
  ENDSUB;
  SUBTAB ДВИЖ = "Приход, внутр.перемещение, выбытие";
    ПРИХДАТ       :DATE;
    ПРИХНЖО       :STRING(9);
    ВНПЕР_НАКЛДАТ :DATE;
    ВНПЕР_НАКЛНОМ :STRING;
    ВНПЕР_НЖО     :STRING(9);
    ВНПЕР_МЕСТО   :STRING;
    ВНПЕР_МОЛ     :STRING;
    ВЫБДАТ        :DATE;
    ВЫБНЖО        :STRING(9);
    ВЫБПРИЧ       :STRING;
    НОМКАРТ       :STRING(20);
  ENDSUB;
  SUBTAB ЧАСТИ = "Части ОС";
    ПАСПОРТ       :STRING(50); --Паспорт, чертеж, N, проект, модель, марка, заводской N
    ЗАВОД_НОМ     :STRING(50); --заводской номер
    ЗАВОД_НОМ1    :STRING(50); --заводской номер
    ДАТА_ВЫП      :DATE; --Дата выпуска (изготовления)
    ДАТА_АКТ_ЭКСП :DATE; --дата и номер акта о вводе в эксплуатацию
    НОМ_АКТ_ЭКСП  :STRING(50);
    ПЕРВ_СТОИМ    :REAL; --Первоначальная (кадастровая стоимость)
    СРОКЭКСП      :STRING(50);
    КОД_НОРМ      :STRING(50);
    НАМ           :REAL;
    НАМСУМ        :REAL;
    АМСУМ         :REAL;
  ENDSUB;
  СНЯТИЕ_С_УЧЕТА  :DATE;

  РНФИ            :STRING; --Реестровый номер федерального имущества (РНФИ)
  ГРЗ             :STRING; --Государственный регистрационный знак
  ВИД             :STRING; --Вид
  СТОИМ_ИНАЯ      :REAL; --иная стоимость
  ДОК_ИЗЪЯТИЯ     :STRING; --документы изъятия из оборота
  ДОК_ОГРАНИЧЕНИЯ :STRING; --документы ограничения оборота
  КАРТА           :STRING; --номер карты
  КАРТ2007        :INTEGER; --ссылка на картотеку по ее имени
  RECCRD       :INTEGER; -- ссылка на картотеку CRD
  CRD          :STRING;  -- ссылка на картотеку по ее имени
  BLNCRD       :STRING;  --Бланк редактор картотеки родителя CRD
  UNIQUE "НФА;ИНВ;MODIFIEDUSER";
ENDTAB;

TABLE РПО_НАЧ_АМОРТ_TR = "Ведомость начисленной амортизации (проводки)";
  CREATEDUSER  :STRING;
  MODIFIEDUSER :STRING;
  ПРОВОДИТЬ    :BOOLEAN; --Включать документ в обработку, либо нет
  ДАТОПЕР      :DATE; --Дата операции
  ВЕДОМОСТЬ    :РПО_НАЧ_АМОРТ;
  ОТЧМЕС       :INTEGER; --Отчетный месяц (для уникальности)
  ОТЧГОД       :INTEGER; --Отчетный год   (для уникальности)
  ПЕРИОД       :STRING;
  НФА          :STRING; --Код учета НФА
  ИНВНОМ       :STRING; --Инвентарный номер
  АМОМЕС       :REAL; --Амортизация за месяц
  СЧДЕБ        :STRING; --Счет дебета
  СЧКРЕ        :STRING; --Счет кредита
  ПРИЗН        :STRING; --Аналитические признаки
  CLOSEDMODFOB :BOOLEAN;
  РПО_КЛЮЧ     :STRING;
  КОНВ         :INTEGER;
ENDTAB;
TABLE РПО_НАЧ_АМОРТ = "Ведомость начисленной амортизации";
  CREATEDUSER   :STRING;
  MODIFIEDUSER  :STRING;
  ПРОВОДИТЬ     :BOOLEAN; --Включать документ в обработку, либо нет
  ДАТОПЕР       :DATE; --Дата операции
  ОТЧМЕС        :INTEGER; --Отчетный месяц (для уникальности)
  ОТЧГОД        :INTEGER; --Отчетный год   (для уникальности)
  РЕКВ          :STRING; --КОНТРАГЕНТ; --Собственные реквизиты
  ПЕРИОД        :STRING;
  ПРИЗНД        :STRING; --Дополнительная аналитика
  SUBTAB ПОЗИЦИИ = "Табличная часть";
    НФА    :STRING; --Код учета НФА
    ИНВНОМ :STRING; --Инвентарный номер
    НОРМА  :REAL; --Использованная месячная норма амортизации
    КОЛ    :REAL; --Количество (справочно);
    СТОБАЛ :REAL; --Балансовая стоимость
    АМОМЕС :REAL; --Амортизация за месяц
    АМОВСЕ :REAL; --Амортизация ВСЕГО
    СЧДЕБ  :STRING; --Счет дебета
    СЧКРЕ  :STRING; --Счет кредита
    ПРИЗН  :STRING; --Аналитические признаки
    ЭКСПЛ  :BOOLEAN; --Цена до 10'000 руб. в эксплуатации: списано 100% амортизации
    --для совместимости
    НАИМЕН :STRING; --Наименование основного средства
    ДАТПРИ :DATE; --Дата принятия на баланс/к учету
    СТОГОД :REAL; --Стоимость на начало года
    АМГРУППА :INTEGER; --
    СРОК     :INTEGER; -- срок начисления амортизации(мес)
    АМОВСЕПР :REAL; --Амортизация ВСЕГО в процентах
    TR     :РПО_НАЧ_АМОРТ_TR;
  ENDSUB;
  ДОЛЖНИСП      :STRING; --Должность исполнителя
  ФИОИСП        :STRING; --Ф.И.О. исполнителя
  ДАТАИСП       :DATE; --Дата составления документа (исполнителя)
  CLOSEDMODFOB  :BOOLEAN;
  РПО_КЛЮЧ      :STRING;
  КОНВ          :INTEGER;
  ПРОВОДИТЬ_БУХ :BOOLEAN; --Флаг наличия проводок БУХ
  SUBTAB ПОЗИЦИИ_БУХ;
    НФАПР :STRING;
    СУМ   :REAL;
    ДСЧЕТ :STRING(36);
    КСЧЕТ :STRING(36);
    КМНТ  :STRING;
    АН    :STRING;
  ENDSUB;
  UNIQUE "ОТЧМЕС;ОТЧГОД;MODIFIEDUSER";
ENDTAB;
TABLE РПО_АКТЫ_УНФА = "Акты учета НФА"; --Поля общие для всех актов
  CREATEDUSER    :STRING;
  MODIFIEDUSER   :STRING;
  НОМЕРАКТА      :INTEGER; --номер акта
  БУМНОМЕР       :STRING; --номер акта (бумажный)
  ДАТААКТА       :DATE; --дата акта
  КОДФОРМЫ       :STRING; --Комиссия
  ДОЛПРЕДКОМ     :STRING; --должность председателя комиссии
  ФИОПРЕДКОМ     :STRING; --Ф.И.О. председателя комиссии
  --Комиссия      :Комиссия;
  ВКЛ_КОМИССИЯ_2 :BOOLEAN;
  SUBTAB КОМИССИЯ = "Члены комиссии";
    ДОЛЧЛЕНКОМ :STRING; --должность члена комиссии
    ФИОЧЛЕНКОМ :STRING; --Ф.И.О. члена комиссии
  ENDSUB;
  ДОЛПРЕДКОМ_2   :STRING; --должность председателя комиссии
  ФИОПРЕДКОМ_2   :STRING; --Ф.И.О. председателя комиссии
  SUBTAB КОМИССИЯ_2 = "Члены комиссии";
    ДОЛЧЛЕНКОМ_2 :STRING; --должность члена комиссии
    ФИОЧЛЕНКОМ_2 :STRING; --Ф.И.О. члена комиссии
  ENDSUB;
  УЧРЕЖДЕНИЕ     :STRING; --наименование организации-заказчика (организации-получателя)
  ОКПОУЧРЕЖ      :STRING; --ОКПО организации-заказчика (организации-получателя)
  ПОУЧРЕЖ        :STRING; --наименование структурного подразделения организации-заказчика (организации-получателя) - АНАЛИТИКА
  КОДПОУЧРЕЖ     :STRING; --код подразделения организации-заказчика (организации-получателя)
  ФИОРУКУЧРЕЖ    :STRING; --Ф.И.О. руководителя организации-заказчика (организации-получателя)
  ДАТАПОДРУК     :DATE; --дата подписи документа руководителем организации-заказчика (организации-получателя)
  --Присутствует в ОС-1, ОС1-а, ОС1-б, (АКТ о списании МАТЗАПАСОВ), (АКТ о списании ХОЗИНВЕНТАРЯ)
  SUBTAB СТРЗАК = "Строки заключения";
    ЗАКЛЮЧЕНИЕ :STRING; --заключение комиссии
  ENDSUB;
  SUBTAB СТРПРИЛ = "Строки приложения";
    ПРИЛОЖЕНИЕ :STRING; --заключение комиссии
    ШТ         :INTEGER;
    ЛИСТ       :INTEGER;
  ENDSUB;
  ДОЛЖНРУКУЧРЕЖ  :STRING; --должность руководителя организации-заказчика (организации-получателя)
  --
  ИСПОЛНИТЕЛЬ    :STRING; --наименование организации-исполнителя (организации-сдатчика)
  ОКПОИСПОЛ      :STRING; --ОКПО организации-исполнителя (организации-сдатчика)
  ПОИСПОЛ        :STRING; --наименование структурного подразделения организации-исполнителя (организации-сдатчика) - АНАЛИТИКА
  КОДПОИСПОЛ     :STRING; --код структурного подразделения организации-исполнителя (организации-сдатчика)
  ДОЛЖНМОЛСДАЛ   :STRING; --должность МОЛ сдающего НФА
  ФИОМОЛСДАЛ     :STRING; --Ф.И.О. МОЛ сдающего НФА
  ДАТАМОЛСДАЛ    :DATE; --дата сдачи НФА МОЛ
  ДОЛЖНМОЛПРИН   :STRING; --должность МОЛ принимающего на хранение НФА
  ФИОМОЛПРИН     :STRING; --Ф.И.О. МОЛ принимающего на хранение НФА
  ДАТАМОЛПРИН    :DATE; --дата принятия НФА МОЛ на хранение
  ФИОГЛБУХПРИН   :STRING; --Ф.И.О. главного бухгалтера принимающего НФА
  --Присутствует в ОС-1, ОС1-а, ОС1-б
  АДРЕСУЧРЕЖ     :STRING; --адрес и телефон организации-заказчика (организации-получателя)
  БАНКУЧРЕЖ      :STRING; --банковские реквизиты организации-заказчика (организации-получателя)
  ДОЛЖНРУКИСПОЛ  :STRING; --должность руководителя организации-исполнителя (организации-сдатчика)
  ФИОРУКИСПОЛ    :STRING; --Ф.И.О. руководителя организации-исполнителя (организации-сдатчика)
  ДАТАПОДИСПОЛ   :DATE; --дата подписи документа руководителем организации-исполнителя (организации-сдатчика)
  АДРЕСИСПОЛ     :STRING; --адрес и телефон организации-исполнителя (организации-сдатчика)
  БАНКИСПОЛ      :STRING; --банковские реквизиты организации-исполнителя (организации-сдатчика)
  --
  ВИДДОКОСН      :INTEGER; --вид документа основания (приказ, распоряжение и т.д.)
  ОБЯЗДОКОСН1    :STRING; --обязательства документа основания
  ОБЯЗДОКОСН2    :STRING; --обязательства документа основания
  НОМЕРДОКОСН    :STRING; --номер документа основания
  ДАТАДОКОСН     :DATE; --дата документа основания
  ДАТАПРИНБУХ    :DATE; --дата принятия к бухгалтерскому учету
  ДАТАСПИСБУХ    :DATE; --дата списания с бухгалтерского учета
  СЧЕТУНФА       :STRING; --балансовый счет, субсчет
  КОДАНАУНФА     :STRING; --код аналитического учета
  --
  ИЗГОТОВИТЕЛЬ   :STRING; --наименование организации-изготовителя (проектировщика, исполнителя строительных работ и т.д.)
  SUBTAB ДОЛЯСОБСТВ = "Доля участников в общей собственности";
    УЧАСТНИК :STRING; --наименование участника
    ДОЛЯ     :REAL; --доля участника (в процентах)
  ENDSUB;
  ВАЛ            :STRING;
  ВАЛКУРС        :REAL;
  ВАЛКУРСНАДАТУ  :DATE;
  ВАЛСУММА       :REAL;
  ДАТАЗАКЛЮЧ     :DATE; --дата результата испытания
  SUBTAB СТРТЕХДОК = "Строки других характеристик";
    ПРИЛТЕХДОК :STRING; --приложение, техническая документация
  ENDSUB;
  ТАБНОММОЛСДАЛ  :STRING; --табельный номер МОЛ сдающего НФА
  ФИОГЛБУХСДАЛ   :STRING; --Ф.И.О. главного бухгалтера сдающего НФА
  ДОЛЖНПРИН      :STRING; --должность принимающего НФА
  ФИОПРИН        :STRING; --Ф.И.О. МОЛ принимающего НФА
  ДАТАПРИН       :DATE; --дата принятия НФА
  ДАТАДОВЕР      :DATE; --дата доверенности
  НОМЕРДОВЕР     :STRING; --номер доверенности
  КОМУДОВЕР      :STRING; --кому выдана доверенность
  ТАБНОММОЛПРИН  :STRING; --табельный номер МОЛ принимающего на хранение НФА
  --Присутствует в (АКТ о списании МАТЗАПАСОВ), (АКТ о списании ХОЗИНВЕНТАРЯ), (АКТ о списании ЛИТЕРАТУРЫ)
  МОЛ            :STRING; --Ф.И.О. МОЛ учреждения
  ТАБНОММОЛ      :STRING; --табельный номер МОЛ
  КОМПРИК        :STRING; --приказ на формирование комиссии
  КОМПРИКДАТА    :DATE; --дата приказа на формирование комиссии
  КОМПРИКНОМЕР   :STRING; --номер приказа на формирование комиссии
  КОМПРИК_2      :STRING; --приказ на формирование комиссии
  КОМПРИКДАТА_2  :DATE; --дата приказа на формирование комиссии
  КОМПРИКНОМЕР_2 :STRING; --номер приказа на формирование комиссии
  ДАТАОФОР       :DATE; --дата оформления документа
  ДАТАОФОР_2     :DATE; --дата оформления документа
  --Присутствует в ОС-1 в ОС1-а
  КОДОКОФ        :STRING;
  АМОРТГРУППА    :INTEGER; --номер амортизационной группы
  ИНВНОМЕР       :STRING; --инвентарный номер
  ИНВНОМЕРВЕД    :STRING; --инвентарный номер ведомственный
  ЗАВНОМЕР       :STRING; --заводской номер, номер транспорта
  НОМГОСРЕГ      :STRING; --номер госрегистрации прав на недвижимость
  ДАТАГОСРЕГ     :DATE; --дата госрегистрации прав на недвижимость
  НОМСОГЛ        :STRING; --номер и документ согласования
  ДАТАСОГЛ       :DATE; --дата согласования
  --
  ОБЪЕКТ         :STRING; --наименование НФА
  МЕСТООБЪЕКТА   :STRING; --место нахождения объекта на момент приема-передачи
  --
  НОМЕРКАРТОЧ    :STRING; --номер карточки учета НФА
  ДАТАКАРТОЧ     :DATE; --дата составления карточки учета НФА
  --Присутствует в (АКТ о  списании ХОЗИНВЕНТАРЯ), (АКТ о списании ЛИТЕРАТУРЫ)
  НАКЛНОМЕР      :STRING; --номер накладной сданных на склад материалов полученные от выбытия
  НАКЛДАТА       :DATE; --дата накладной сданных на склад материалов полученные от выбытия
  --Присутствует только в ОС-1
  НЕСООТ         :BOOLEAN; --соответствует требованиям, либо нет
  SUBTAB СТРНЕСООТ = "Строки несоответствия";
    НЕСООТСТР :STRING; --строка-указание, что нужно для соответствия
  ENDSUB;
  ТРЕБ           :BOOLEAN; --требует доработки, либо нет
  SUBTAB СТРТРЕБ = "Строки доработки";
    ТРЕБСТР :STRING; --строка-указание, что нужно для доработки
  ENDSUB;
  SUBTAB СТРДРХАР = "Строки других характеристик";
    ДРУГХАР :STRING; --строка-указание, что нужно для доработки
  ENDSUB;
  SUBTAB СТРЦЕЛЬ = "Строка описания цели";
    ЦЕЛЬ :STRING; --цель передачи (назначение принимаемых объектов ОС); также причина списания
  ENDSUB;
  ДОГОВОРНОМЕР   :STRING; --номер договора на ремонт, реконструкцию, модернизацию
  ДОГОВОРДАТА    :DATE; --дата договора на ремонт, реконструкцию, модернизацию
  ДАТАС_РДОГ     :DATE; --дата начала ремонта по договору
  ДАТАПО_РДОГ    :DATE; --дата окончания ремонта по договору
  ДАТАС_РФАКТ    :DATE; --дата начала ремонта фактически
  ДАТАПО_РФАКТ   :DATE; --дата окончания ремонта по фактически
  --
  РАБНЕВЫПОЛ     :BOOLEAN; --признак выполнения работ
  SUBTAB СТРЧТОНЕВЫП = "Строка-указание, какие работы не выполнены";
    ЧТОНЕВЫПОЛН :STRING; --строка-указание, какие работы не выполнены
  ENDSUB;
  ВИДРАБОТ       :INTEGER; --если 1-ремонт, если 2-реконструкция, если 3-модернизация
  SUBTAB СТРИЗМХАР = "Изменения в характеристике объекта";
    ИЗМХАРАКТ :STRING; --изменения в характеристике объекта
  ENDSUB;
  ПОИЛИОРГ       :BOOLEAN; --в поле исполнитель вводится подразделение или организация
  --Присутствует только в (АКТ о списании ХОЗИНВЕНТАРЯ)
  ПОИНВЕН        :STRING; --наименование проверяемого структурного подразделения
  КОДПОИНВЕН     :STRING; --код проверяемого структурного подразделения
  НАКЛСУММА      :REAL; --сумма накладной сданных на склад материалов полученные от выбытия
  --Присутствует только в (АКТ о списании ЛИТЕРАТУРЫ)
  ДЕБЕТСЧ        :STRING;
  КРЕДИТСЧ       :STRING; --Таблица  ОС-1, ОС-1а, ОС-1б, ОС-4
  SUBTAB СОСТОС = "Таблица состояния ОС";
    ДАТНАЧСТР    :DATE; --дата начала строительства
    ДАТКОНСТР    :DATE; --дата конца строительства
    ДАТМОДЕР     :DATE; --дата последней модернезации, достройки, реконструкции
    ГОДВЫПУСКА   :DATE; --дата выпуска (год)
    ДАТАВВЭКСП   :DATE; --дата ввода в эксплуатацию (первоначальная)
    ДАТАКАПРЕМ   :DATE; --дата последнего капитального ремонта
    ФАКТСРОКЭК   :STRING; --фактический срок эксплуатации
    СРОКПОЛИСП   :STRING; --срок полезного использования
    СУМНАЧАМОРТ  :REAL; --сумма начмсленной амортизациии (износа), руб.
    ОСТСТОИМ     :REAL; --остаточная стоимость ОС, руб.
    ПОКСТОИМ     :REAL; --стоимость приобретения ОС (договорная), руб.
    БАЛАНССТОИМ  :REAL; --первоначальная стоимость на дату принятия к бухучету ОС
    БАЛАНССТОИМП :REAL; --первоначальная принятая стоимость на дату принятия к бухучету ОС
    СРОКНОВИСП   :STRING; --срок полезного использования (для получателя)
    МЕТОДИЗНОСА  :STRING; --способ начисления амортизации
    НОРМААМОРТ   :REAL; --норма амортизации
    ОКОФ         :STRING;
    --
    ОС           :STRING; --код ОС
    НАИМЕНОС     :STRING; --наименование ОС
    АМОРТГРУППА  :INTEGER; --номер амортизационной группы
    ИНВНОМЕРВЕД  :STRING; --инвентарный номер ведомственный
    ИНВНОМЕР     :STRING; --инвентарный номер
    ИНВНОМЕРП    :STRING; --инвентарный номер
    ИНВНКАРТНОМП :STRING;
    ИНВНКАРТДАТП :DATE;
    ЗАВНОМЕР     :STRING; --заводской номер
    РЕЕСТРНОМЕР  :STRING; --реестровый номер
    ИНОЙНОМЕР    :STRING; --иной номер
    ДАТАПРИНБУХ  :DATE; --дата принятия к бухгалтерскому учету
    ДАТАСУЧГАИ   :DATE; --дата снятия с учета в ГИБДД (ГАИ)
    ПОКВСЕГО     :REAL; --стоимость приобретения ОС всего (договорная), руб. (ОКУД 03060313)
    ДОЛЯ         :REAL; --доля участника (в процентах)
    ПРИЧСПИС     :STRING; --причина списания
    ПАСПОРТ      :STRING; --причина списания
    СЧЕТ         :STRING;
    ДЕБАМ        :STRING;
    КРЕАМ        :STRING;
    ДЕБОСТ       :STRING;
    КРЕОСТ       :STRING;
    --
    ХАРОС        :STRING; --Краткая характеристика ОС
    ПРИМЕЧАНИЕ   :STRING; --Примечание
    НАИМДРАГМАТ  :STRING; --Наименование драгоценного материала
    ННДРАГМАТ    :STRING; --Номенклатурный номер драгоценного материала
    ЕДИЗМДРАГМАТ :STRING; --Ед. изм. драгоценного материала
    КОЛДРАГМАТ   :INTEGER; --Количество драгоценного материала
    МАССАДРАГМАТ :REAL; --Масса драгоценного материала
    ----------- поля драгмет    -------
    ДРАГМЕТ00    :REAL; --МПГ
    ДРАГМЕТ01    :REAL; --Золото
    ДРАГМЕТ02    :REAL; --Серебро
    ДРАГМЕТ03    :REAL; --Платина
    ДРАГМЕТ04    :REAL; --Палладий
    ДРАГМЕТ05    :REAL; --Иридий
    ДРАГМЕТ06    :REAL; --Родий
    ДРАГМЕТ07    :REAL; --Рутений
    ДРАГМЕТ08    :REAL; --Осмий
    --
    ПРОБЕГСНАЧ   :REAL; --пробег с начала эксплуатации
    ПРОБЕГСРЕМ   :REAL; --пробег после последнего капитального ремонта
  ENDSUB;
  ОБЪЕКТ1        :STRING;
  ОБЪЕКТ2        :STRING;
  ОБЪЕКТ3        :STRING;
  ОБЪЕКТ4        :STRING;
  SUBTAB ХАРЗДАНИЯ = "Количественные и качественные характеристики ОС";
    AОБЩПЛ   :REAL;
    AЭТАЖЕЙ  :INTEGER;
    AСТРОИТV :REAL;
    AПОДЗЕМV :REAL;
    AВСТРV   :REAL;
    AВСТРПV  :REAL;
    AПV      :REAL;
    AМАТЕР   :REAL;
    AПРИМ    :STRING;
  ENDSUB;
  SUBTAB ХАРОС = "Краткая индивидуальная характеристика объекта ОС";
    НАИМОБ       :STRING; --Наименование объекта ОС, приспособление, принадлежность
    КОЛ          :INTEGER; --Количество
    ОБЪЕКТ0      :STRING;
    ОБЪЕКТ1      :STRING;
    ОБЪЕКТ2      :STRING;
    ОБЪЕКТ3      :STRING;
    ОБЪЕКТ4      :STRING;
    --
    ОБЪЕКТДРАГМАТ:STRING; --Наименование драгоценного материала
    НАИМДРАГМАТ  :STRING; --Наименование драгоценного материала
    ННДРАГМАТ    :STRING; --Номенклатурный номер драгоценного материала
    ЕДИЗМДРАГМАТ      :STRING; --Ед. изм. драгоценного материала
    ЕДИЗМДРАГМАТ_ОКЕИ :STRING; --Ед. изм. драгоценного материала
    КОЛДРАГМАТ   :REAL; --Количество драгоценного материала
    МАССАДРАГМАТ :REAL; --Масса драгоценного материала
    ПРИМЕЧАНИЕ   :STRING; --Комментарий
    --
    НОМТЕХПАСП   :STRING; --номер технического паспорта
    НОМДВИГ      :STRING; --номер двигателя
    НОМШАССИ     :STRING; --номер шасси
    ГРУЗОПОДЪЕМ  :REAL; --грузоподъемность, вместимость
    МАССАПОПАСП  :REAL; --масса объекта по паспорту
    ----------- поля драгмет    -------
    ДРАГМЕТ00    :REAL; --МПГ
    ДРАГМЕТ01    :REAL; --Золото
    ДРАГМЕТ02    :REAL; --Серебро
    ДРАГМЕТ03    :REAL; --Платина
    ДРАГМЕТ04    :REAL; --Палладий
    ДРАГМЕТ05    :REAL; --Иридий
    ДРАГМЕТ06    :REAL; --Родий
    ДРАГМЕТ07    :REAL; --Рутений
    ДРАГМЕТ08    :REAL; --Осмий
  ENDSUB;


  SUBTAB ДОГОВОРРЕМОНТ = "Сведения о договорах на момент передачи в ремонт";
    НОМЕР      :STRING;
    ДАТА       :DATE;
    НАЧАЛО     :DATE;
    КОНЕЦ      :DATE;
    НАЧАЛОФ    :DATE;
    КОНЕЦФ     :DATE;
    ПРИМЕЧАНИЕ :STRING; --наименование ОС
  ENDSUB;

  SUBTAB ДОРЕМОНТА = "Сведения о состоянии объектов ОС на момент передачи в ремонт";
    НАИМЕНОС   :STRING; --наименование ОС
    ИНВНОМЕР   :STRING; --инвентарный номер
    РЕЕСТРНОМЕР:STRING;
    ПАСНОМЕР   :STRING; --номер паспорта
    ИНОЙНОМЕР  :STRING;
    ЗАВНОМЕР   :STRING; --заводской номер
    ОСТСТОИМ   :REAL; --остаточная (восстановительная) стоимость ОС, руб.
    БАЛСТОИМ   :REAL; --балансовая (восстановительная) стоимость ОС, руб.
    ФАКТСРОКЭК :STRING; --фактический срок эксплуатации
  ENDSUB;
  SUBTAB ЗАТРРЕМОНТА = "Сведения о затратах, связанных с ремонтом объектов ОС";
    НАИМЕНОС    :STRING; --наименование ОС
    ВИДРАБ      :STRING; --вид работ
    ЗАТРДЕМОНТ  :REAL; --затраты на демонтаж
    СТОИМРЕМДОГ :REAL; --стоимость ремонта по договору
    СТОИММОДДОГ :REAL; --стоимость модернизации по договору
    СТОИМРЕМФАК :REAL; --стоимость ремонта фактически
    СТОИММОДФАК :REAL; --стоимость модернизации фактически
    ТРАНСРАСХ   :REAL; --затраты по транспортировке оборудования
    ПРИМЕЧ      :STRING; --примечание
    СТОИМПОСЛЕ  :REAL; --стоимость объекта ОС после ремонта
    СРОК        :INTEGER; --стоимость объекта ОС после ремонта
  ENDSUB;
  SUBTAB СПИСХОЗИНВ = "Ценности, подлежащие выбытию и исключению из учета";
    ХОЗИНВЕН  :STRING; --наименование хозинвентаря
    ЛЕТЭКСПЛ  :INTEGER; --количество лет в эксплуатации
    КОЛПРЕДМ  :REAL; --количество предметов
    ЦЕНАЕД    :REAL; --цена предмета за единицу
    СЧДЕБЕТА  :STRING; --счет учета Дебета хозинвентаря
    СЧКРЕДИТА :STRING; --счет учета Кредита хозинвентаря
  ENDSUB;
  SUBTAB ПОЛУЧМАТЕР = "Полученные, в результате списания, материалы";
    НАИМЕНМАТ :STRING; --наименование материала, полученного в результате списания
    КОДМАТ    :STRING; --код материала (номенклатурный номер)
    ЕДИЗМ     :STRING; --единица измерения материала
    КОЛПРЕДМ  :REAL; --количество предметов
    ЦЕНАЕД    :REAL; --цена предмета за единицу
    ЦЕЛЬИСПОЛ :STRING; --цель использования материала
    --Для ОС-4б
    ВИДДОК    :STRING; --вид документа (поступило от списания)
    ДАТДОК    :DATE; --дата документа (поступило от списания)
    НОМДОК    :STRING; --номер документа (поступило от списания)
    СЧДЕБ     :STRING; --счет учета Дебета  матзапасов
    СЧКРЕ     :STRING; --счет учета Кредита матзапасов
    ПОРНОМ    :INTEGER; --порядковый номер записи в карточке учета материалов
  ENDSUB;
  SUBTAB СПИСМАТЕР = "Фактическое расходование материалов";
    НАИМЕНМАТ  :STRING; --наименование списываемого материала
    КОДМАТ     :STRING; --код списываемого материала
    ЕДИЗМ      :STRING; --единица измерения материала
    НОРМАРАСХ  :REAL; --норма расхода материала
    ФИЗР_КОЛВО :REAL; --фактически израсходовано - количество материала
    ФИЗР_ЦЕНА  :REAL; --фактически израсходовано - цена материала
    ВИДРАСХОДА :STRING; --направление расхода
    СЧДЕБЕТА   :STRING; --счет учета Дебета матзапасов
    СЧКРЕДИТА  :STRING; --счет учета Кредита матзапасов
  ENDSUB;
  SUBTAB СПИСЛИТЕРТ1 = "Списание литературы (таблица 1)";
    ИНВЕННОМЕР :STRING; --инвентарный номер издания
    КНИГА      :STRING; --автор книги и название
    КОЛИЧКНИГ  :INTEGER; --количество книг
    ЦЕНАКНИГИ  :REAL; --цена за 1 книгу
  ENDSUB;
  SUBTAB СПИСЛИТЕРТ2 = "Списание литературы (таблица 2)";
    ИНВЕННОМЕР :STRING; --инвентарный номер издания
    КНИГА      :STRING; --автор книги и название
    КОЛИЧКНИГ  :INTEGER; --количество книг
    ЦЕНАКНИГИ  :REAL; --цена за 1 книгу
  ENDSUB;
  ДОЛЖНМОЛ       :STRING; --должность МОЛ
  РЕГНОМЕР       :STRING; --регистрационный номер
  SUBTAB ЗАТРСПИСАН = "Затраты, связанные со списанием";
    ВИДРАБ     :STRING; --вид работ
    ДОКДАТНОМ1 :STRING; --документ и его дата, номер (затраты на демонтаж)
    ДЕМЗАТРАТЫ :REAL; --затраты на демонтаж, руб.
    ДЕМСЧДЕБ   :STRING; --счет дебета (затраты на демонтаж)
    ДЕМСЧКРЕ   :STRING; --счет кредита (затраты на демонтаж)
    ДОКДАТНОМ2 :STRING; --документ и его дата, номер (поступило от списания)
    НАИММАТЕР  :STRING; --наименование материальных ценностей
    НОМЕНКНОМ  :STRING; --номенклатурный номер (материала)
    ЕДИЗМ      :STRING; --единица измерения (материала)
    КОЛИЧ      :REAL; --количество
    ЦЕНА       :REAL; --стоимость единицы, руб.
    СПИССЧДЕБ  :STRING; --счет дебета (поступило от списания)
    СПИССЧКРЕ  :STRING; --счет кредита (поступило от списания)
  ENDSUB;
  SUBTAB ПРИНЯТЬДЕТАЛИ = "Принятие к бухучету узлов, деталей";
    КАТОЛНОМ  :STRING; --номер по каталогу
    НОМЕНКНОМ :STRING; --номенклатурный номер
    НАИМЕНДЕТ :STRING; --наименование узла, детали
    ЕДИЗМ     :STRING; --единица измерения (узла, детали)
    КОЛИЧ     :REAL; --количество
    ЦЕНА      :REAL; --стоимость единицы, руб.
    ПРИМЕЧ    :STRING; --примечание
  ENDSUB;
  ДНФАID         :INTEGER; --ДНФАID
  RECCRD         :INTEGER; --ссылка на картотеку CRD
  CRD            :STRING; --ссылка на картотеку по ее имени
  BLNCRD         :STRING; --Бланк редактор картотеки родителя CRD
  ВИДДОП1        :INTEGER;
  ДОЛДОП1        :STRING; --должность (дополнительно)
  ФИОДОП1        :STRING; --Ф.И.О. (дополнительно)
  ДАТАДОП1       :DATE; --дата подписи (дополнительно)
  ВИДДОП2        :INTEGER;
  ДОЛДОП2        :STRING; --должность (дополнительно)
  ФИОДОП2        :STRING; --Ф.И.О. (дополнительно)
  ДАТАДОП2       :DATE; --дата подписи (дополнительно)
  ВИДДОП3        :INTEGER;
  ДОЛДОП3        :STRING; --должность (дополнительно)
  ФИОДОП3        :STRING; --Ф.И.О. (дополнительно)
  ДАТАДОП3       :DATE; --дата подписи (дополнительно)
  ВИДСТРЗАК1     :INTEGER;
  SUBTAB СТРЗАК1 = "Строки заключения";
    ЗАКЛЮЧЕНИЕ1 :STRING; --заключение
  ENDSUB;
  SUBTAB ПОДПИСЬ = "Подписи";
    ПОЛЕ      :STRING;
    ДОЛЖНОСТЬ :STRING; --значение поля ПОЛЕ_ДОЛЖНОСТЬ
    ФИО       :STRING; --значение поля ПОЛЕ_ФИО
    ДАТА      :DATE;
    ВРЕМЯ     :INTEGER;
  ENDSUB;
  SUBTAB РЕКВИЗИТ = "Реквизиты и коды";
    ПОЛЕ      :STRING;
    ИМЯ       :STRING; --значение поля ПОЛЕ_ИМЯ
    ИНН       :STRING; --значение поля ПОЛЕ_ИНН
    ОКПО      :STRING; --значение поля ПОЛЕ_ОКПО
    КПП       :STRING; --значение поля ПОЛЕ_КПП
    КБП       :STRING; --значение поля ПОЛЕ_КБП
    ДАТ       :DATE;   --значение поля ПОЛЕ_ДАТ
    ЦЕЛ       :INTEGER;--значение поля ПОЛЕ_ЦЕЛ
    ЧИС       :REAL;   --значение поля ПОЛЕ_ЧИС
    СТР       :STRING; --значение поля ПОЛЕ_СТР
    ЗАП       :INTEGER; --значение поля ПОЛЕ_ЗАП
  ENDSUB;
  БУХ_ЖО_ДАТА :DATE;
  SUBTAB ПОЗИЦИИ_БУХ = "Обороты";
    КОД        :STRING;
    ДЕБ        :STRING; --Индификатор балансового счета
    КРЕ        :STRING;
    КОЛИЧЕСТВО :REAL; --
    СУММА      :REAL; -- сумма
    ВАЛЮТА     :STRING;
    ПРИМЕЧАНИЕ :STRING;
  ENDSUB;
ENDTAB;


TABLE РПО_ВНУТР_ПЕРЕМЕЩ_ОС = "Накладная на внутреннее перемещение объектов ОС";
  ЗАЩИТА       :BOOLEAN;
  ТОЧН         :INTEGER;
  УЧРЕЖД       :STRING;
  ОКПО         :STRING;
  КОД_М_ОТК    :STRING;
  КОД_М_КУД    :STRING;
  НОМЕР        :INTEGER;
  НОМЕРБУМ     :STRING;
  ДАТА_НАК     :DATE;
  SUBTAB ПОЗИЦИИ;
    КОД_НФА    :STRING;
    КОД_ИНВ    :STRING;
    СЧДЕБ      :STRING;
    ДАТА_ПРИОБ :DATE;
    ВЕД_ИНВ    :STRING;
    КОЛ_НФА    :REAL;
    ЦЕНА_НФА   :REAL;
    СУММА_НФА  :REAL;
  ENDSUB;
  SUBTAB ПОДПИСЬ = "Подписи";
    ПОЛЕ      :STRING;
    ДОЛЖНОСТЬ :STRING; --значение поля ПОЛЕ_ДОЛЖНОСТЬ
    ФИО       :STRING; --значение поля ПОЛЕ_ФИО
    ДАТА      :DATE;
    ВРЕМЯ     :INTEGER;
  ENDSUB;

  ПРИМЕЧ1      :STRING;
  ПРИМЕЧ2      :STRING;
  СДАЛ_ДОЛЖ    :STRING;
  ПРИН_ДОЛЖ    :STRING;
  СДАЛ_МОЛ     :STRING;
  ПРИН_МОЛ     :STRING;
  СДАЛ_ТАБНОМ  :STRING;
  ПРИН_ТАБНОМ  :STRING;
  СДАЛ_ДАТА    :DATE;
  ПРИН_ДАТА    :DATE;
  ГЛ_БУХ       :STRING;
  ДНФАID       :INTEGER;
  RECCRD       :INTEGER; -- ссылка на картотеку CRD
  CRD          :STRING;  -- ссылка на картотеку по ее имени
  BLNCRD       :STRING;  --Бланк редактор картотеки родителя CRD
  CREATEDUSER  :STRING;
  MODIFIEDUSER :STRING;
ENDTAB;

TABLE РПО_НАКЛАДНАЯ = "Расходные накладные";
  CREATEDUSER  :STRING;
  MODIFIEDUSER :STRING;
  КОДФОРМЫ     :STRING; -- 0504234(или пусто)=накладная234; 0504205=отпуск на сторону 0504204=требование-накладная
  РЕКВ         :STRING; --Собственные реквизиты
  РЕКВП        :STRING; --Реквизиты получателя
  РЕЕСТР       :STRING; --номер реестра
  ПОСТ         :STRING; --Поставщик,перевозчик
  НОМЕР        :INTEGER; --Номер, порядковый
  НОМЕРБУМ     :STRING(9); --Номер, на бумажном документе
  НАРЯД        :STRING; --номер наряда
  ЗАКДАТА      :DATE; --дата заказа
  ДАТА         :DATE; --дата
  ОСНОВАНИЕ    :STRING; --номер сопроводительного документа
  МОЛ          :STRING; --ФИО лица, принявшего материалы
  ФИОК         :STRING; --ФИО лица, отпустившего материалы
  ПРИМЕЧАНИЕ :STRING;
  --Служебные поля
  SUBTAB ПОЗИЦИИ = "Табличная часть накладной";
    НФА_КОД    :STRING; --наименование
    НФА_ИМЯ    :STRING; --наименование
    ТМЦ        :STRING; --наименование
    КАТ        :STRING; --Категория / сорт
    ДЕБСЧЕТ    :STRING; --Индификатор балансового счета
    КРЕСЧЕТ    :STRING;
    ДОККОЛ     :REAL; --количество по документу(затребовано)
    КОЛИЧ      :REAL; --количество(отпущено)
    ЦЕНА       :REAL; --цена
    НДС        :REAL; --ставка НДС
    СУММА_НФА  :REAL; -- сумма
    СУММА_НДС  :REAL; -- сумма с НДС
    ЕДИЗМ      :STRING; --единица измерения
    ЕДИЗМ_ОКЕИ :STRING; --ОКЕИ ед. измерения
    CPS_КОММЕН :STRING; --комментарий (для системы "продовольствие")

    N_УЧН      :STRING;--учетный N
    N_ИНВ      :STRING;--инвентарный N
    N_ИНВКАРТ  :STRING;--N инвентарной карточки
    N_ЗН       :STRING;--заводской N
    N_СН       :STRING;--серийный N
    N_КАРТ     :STRING;--Порядковый N по складской картотеке
    N_ПАСП     :STRING;
    N_РНФИ     :STRING;
    N_ОКОФ     :STRING;
    N_РЕЕСТР   :STRING;
    N_НОМЕНКЛ  :STRING;
    N_РОСТ     :STRING;
    N_РАЗМЕР   :STRING;
    N_СОРТ     :STRING;
    N_ПРТ      :STRING;-- партия, серия
    ПРИМЕЧАНИЕ :STRING;

  ENDSUB;
  SUBTAB ПОДПИСЬ = "Подписи";
    ПОЛЕ      :STRING;
    ДОЛЖНОСТЬ :STRING; --значение поля ПОЛЕ_ДОЛЖНОСТЬ
    ФИО       :STRING; --значение поля ПОЛЕ_ФИО
    ДАТА      :DATE;
    ВРЕМЯ     :INTEGER;
  ENDSUB;
  SUBTAB РЕКВИЗИТ = "Реквизиты и коды";
    ПОЛЕ      :STRING;
    ИМЯ       :STRING; --значение поля ПОЛЕ_ИМЯ
    ИНН       :STRING; --значение поля ПОЛЕ_ИНН
    ОКПО      :STRING; --значение поля ПОЛЕ_ОКПО
    КПП       :STRING; --значение поля ПОЛЕ_КПП
    КБП       :STRING; --значение поля ПОЛЕ_КБП
    ДАТ       :DATE;   --значение поля ПОЛЕ_ДАТ
    ЦЕЛ       :INTEGER;--значение поля ПОЛЕ_ЦЕЛ
    ЧИС       :REAL;   --значение поля ПОЛЕ_ЧИС
    СТР       :STRING; --значение поля ПОЛЕ_СТР
  ENDSUB;
  БУХ_ЖО_ДАТА :DATE;
  SUBTAB ПОЗИЦИИ_БУХ = "Обороты";
    КОД        :STRING;
    ДЕБ        :STRING; --Индификатор балансового счета
    КРЕ        :STRING;
    КОЛИЧЕСТВО :REAL; --
    СУММА      :REAL; -- сумма
    ВАЛЮТА     :STRING;
    ПРИМЕЧАНИЕ :STRING;
  ENDSUB;

  НАЛОГСПРОДАЖ :REAL; --ставка налога с продаж
  МОЛ1         :STRING; --ФИО лица, принявшего материалы
  ДОЛ          :STRING; --Должность отпустил
  ДОЛ1         :STRING; --Должность получил
  ДНФАID       :INTEGER; --ДНФАID
  RECCRD       :INTEGER; --ссылка на картотеку CRD
  CRD          :STRING; --ссылка на картотеку по ее имени
  BLNCRD       :STRING; --Бланк редактор картотеки родителя CRD
  ДНФА         :STRING; --аналитика ДНФА
  CLOSEDMODFOB      :BOOLEAN;
  CURRENTRECORD     :РПО_НАКЛАДНАЯ; --ссылка на текущий UKEY, вариант защиты записи от удаления для локальной версии при установленном флаге [проверка ссылочной целостности]
ENDTAB;


TABLE РПО_НФА = "Нефинансовые активы и группы НФА";
  CREATEDUSER       :STRING;
  MODIFIEDUSER      :STRING;
  ПРИЗНАК           :STRING; --код аналитического учета НФА или группы
  ИМЯ               :STRING; --наименование признака или группы
  ИМЯ1              :STRING; --наименование признака или группы
  ИМЯ2              :STRING; --наименование признака или группы
  ИМЯ3              :STRING; --наименование признака или группы
  ГНФА              :BOOLEAN; --является группой/комплектом
  КВ                :BOOLEAN; --является объектом капитальных вложений
  ГРНФАКВ           :STRING(15);
  ПРИЗНАККВ         :STRING; --код аналитического учета НФА(106) или группы
  ИМЯКВ             :STRING; --наименование признака или группы
  ГРУППУЧЕТ         :BOOLEAN; --По данному НФА формируется группавая инв карточка
  ЕДИЗМ             :STRING;
  ЕДИЗМОКЕИ         :STRING(25); --ед. изм
  ТОЧНОСТЬ          :INTEGER;
  ГРНФА             :STRING(15);
  ГРОС              :STRING(5);
  КЛИДЕНТ           :STRING(9);
  КОМКЛИДЕН         :STRING;
  ОКОФ              :STRING(10);
  НОРМАМОРТ         :REAL;
  НОРМАМОРТ02       :REAL;
  НОРМАМОРТ09       :REAL;
  КЛГРУПП           :INTEGER;
  КЛГРУПП02         :INTEGER;
  КЛГРУПП09         :INTEGER;
  СРОКАМ            :REAL; --Срок полезного использования (лет)
  СРОКАМ02          :REAL; --Срок полезного использования для ОС принятых к учету до 01.01.2007
  СРОКАМ09          :REAL; --Срок полезного использования для ОС принятых к учету c 01.01.2009
  ПОСУДА            :BOOLEAN; --Входит в группу "Посуда"
  НЕСПИСЫВАТЬДО1000 :BOOLEAN; --Входит в группу ОС не списываемых при выдаче в эксплуатацию при цене менее 1001 руб
  ФИКСЦЕНА          :BOOLEAN;
  АМОРТ0            :BOOLEAN; --не начислять амортизацию
  ЕДИЗМ1            :STRING;
  ЕДИЗМОКЕИ1        :STRING(25); --ед. изм
  КОЭФ              :REAL;
  КОНВ              :INTEGER;
  ГРУППАВИД         :STRING;
  ГРУППАКОД         :STRING;
  ГРУППАССЫЛКА      :STRING;
  ГРУППАВИД1        :STRING;
  ГРУППАКОД1        :STRING;
  ГРУППАССЫЛКА1     :STRING;
  ГРУППАВИД2        :STRING;
  ГРУППАКОД2        :STRING;
  ГРУППАССЫЛКА2     :STRING;
  СРОКВЕД           :INTEGER; --Срок полезного использования (мес) ведомственный
  КОДВЕД            :STRING; 
  ГРУППАВЕД         :STRING; 
  CLOSEDMODFOB      :BOOLEAN;
  CURRENTRECORD     :РПО_НФА; --ссылка на текущий UKEY, вариант защиты записи от удаления для локальной версии при установленном флаге [проверка ссылочной целостности]
  cps_ПРОДКАЛОР     :REAL; --- Калорийность (для системы продовольствие)
  cps_ПРОДТИП       :STRING; --- Тип продукта: мясо, рыба и т.д. (для системы продовольствие)
  NN_NFA            :STRING; -- номер карточки
  КОДЛГТ_НИ         :INTEGER; -- код льготы налога на имущество
  SUBTAB РПО_ОТЧЕТЫ_СТРОКИ = "ОТЧЕТЫ";
    ОТЧЕТ :РПО_ОТЧЕТЫ_СТРОКИ;
    PATH  :STRING;
    ROOT  :РПО_ОТЧЕТЫ_СТРОКИ;
  ENDSUB;
  --UNIQUE "ГрНФА;ПРИЗНАК;MODIFIEDUSER";
  --UNIQUE "ГрНФА;ПРИЗНАК;ГрНФАКВ;ПРИЗНАККВ;MODIFIEDUSER";
ENDTAB;



TABLE РПО_ОПЕРАЦИИДНФА = "Движение НФА";
  CREATEDUSER   :STRING;
  MODIFIEDUSER  :STRING;
  РПО_КЛЮЧ      :STRING;
  NNDAY         :INTEGER; --Номер по порядку для обработки оперции
  НОМЕР         :STRING(10); --Строковый номер документа
  ДАТОПЕР       :DATE; --дата фактического перемещения ТМЦ
  ДНФА          :РПО_ДНФА;
  АН_ДНФА       :STRING;
  INI           :STRING; --свои номера заголовков|свойство "общий столбец"[0=нет;1=да]|формат вывода[1,2,3]
  --Схема       :STRING;
  --КО          :STRING;  -- Идентификатор вызываемой типовой операции
  --ВИД_ДВИЖЕНИЯ:INTEGER; -- 1-Оприходование      2-перемещение;   3-передача; 4-списание;
  --5-начисление износа; 6-переоценка ТМЦ; 7-определяется пользователем
  ПРОВОДИТЬ     :BOOLEAN; --Флаг наличия проводок
  ПРОВЕРИТЬ     :BOOLEAN; --Служебное поле для сопоставления с ошибок с номерами записей в подтаблице
  ФИКС          :BOOLEAN; --Проводки формируются по фиксированной подтаблице ПОЗИЦИИ_ФИКС иначе ПОЗИЦИИ
  НФА_Ш         :STRING;
  ТНФА          :STRING(40);
  КОЛНФА_Ш      :REAL;
  КОЛНФА_К      :REAL; -- контрольная сумма
  ТКОЛНФА       :STRING(40);
  СУМНФА_Ш      :REAL;
  СУМНФА_К      :REAL; -- контрольная сумма
  ТСУМНФА       :STRING(40);
  ЦЕНАНФА_Ш     :REAL;
  ЦЕНАНФА_К     :REAL;
  ТЦЕНАНФА      :STRING(40);
  СЧНФА_Ш       :STRING;
  ТСЧНФА        :STRING(40);
  КОРСЧНФА_Ш    :STRING;
  ТКОРСЧНФА     :STRING(40);
  АМСЧНФА_Ш     :STRING;
  ТАМСЧНФА      :STRING(40);
  АМСУМНФА_Ш    :REAL;
  АМСУМНФА_К    :REAL;
  ТАМСУМНФА     :STRING(40);
  АН01_Ш        :STRING;
  ТАН01         :STRING(40);
  АН02_Ш        :STRING;
  ТАН02         :STRING(40);
  АН03_Ш        :STRING;
  ТАН03         :STRING(40);
  АН04_Ш        :STRING;
  ТАН04         :STRING(40);
  АН05_Ш        :STRING;
  ТАН05         :STRING(40);
  АН06_Ш        :STRING;
  ТАН06         :STRING(40);
  АН07_Ш        :STRING;
  ТАН07         :STRING(40);
  АН08_Ш        :STRING;
  ТАН08         :STRING(40);
  АН09_Ш        :STRING;
  ТАН09         :STRING(40);
  АН10_Ш        :STRING;
  ТАН10         :STRING(40);
  АН11_Ш        :STRING;
  ТАН11         :STRING(40);
  АН12_Ш        :STRING;
  ТАН12         :STRING(40);
  АН13_Ш        :STRING;
  ТАН13         :STRING(40);
  АН14_Ш        :STRING;
  ТАН14         :STRING(40);
  АН15_Ш        :STRING;
  ТАН15         :STRING(40);
  АН16_Ш        :STRING;
  ТАН16         :STRING(40);
  АН17_Ш        :STRING;
  ТАН17         :STRING(40);
  АН18_Ш        :STRING;
  ТАН18         :STRING(40);
  АН19_Ш        :STRING;
  ТАН19         :STRING(40);
  АН20_Ш        :STRING;
  ТАН20         :STRING(40);
  АН21_Ш        :STRING;
  ТАН21         :STRING(40);
  АН22_Ш        :STRING;
  ТАН22         :STRING(40);
  АН23_Ш        :STRING;
  ТАН23         :STRING(40);
  АН24_Ш        :STRING;
  ТАН24         :STRING(40);
  АН25_Ш        :STRING;
  ТАН25         :STRING(40);
  Ч01_Ш         :REAL;
  Ч01_К         :REAL;
  ТЧ01          :STRING(40);
  Ч02_Ш         :REAL;
  Ч02_К         :REAL;
  ТЧ02          :STRING(40);
  Ч03_Ш         :REAL;
  Ч03_К         :REAL;
  ТЧ03          :STRING(40);
  Ч04_Ш         :REAL;
  Ч04_К         :REAL;
  ТЧ04          :STRING(40);
  Ч05_Ш         :REAL;
  Ч05_К         :REAL;
  ТЧ05          :STRING(40);
  СЧ01_Ш        :STRING;
  ТСЧ01         :STRING(40);
  СЧ02_Ш        :STRING;
  ТСЧ02         :STRING(40);
  СЧ03_Ш        :STRING;
  ТСЧ03         :STRING(40);
  СЧ04_Ш        :STRING;
  ТСЧ04         :STRING(40);
  СЧ05_Ш        :STRING;
  ТСЧ05         :STRING(40);
  СЧ06_Ш        :STRING;
  ТСЧ06         :STRING(40);
  СЧ07_Ш        :STRING;
  ТСЧ07         :STRING(40);
  СЧ08_Ш        :STRING;
  ТСЧ08         :STRING(40);
  СЧ09_Ш        :STRING;
  ТСЧ09         :STRING(40);
  СЧ10_Ш        :STRING;
  ТСЧ10         :STRING(40);
  СЧ11_Ш        :STRING;
  ТСЧ11         :STRING(40);
  Д01_Ш         :DATE;
  ТД01          :STRING(40);
  Д02_Ш         :DATE;
  ТД02          :STRING(40);
  Д03_Ш         :DATE;
  ТД03          :STRING(40);
  Д04_Ш         :DATE;
  ТД04          :STRING(40);
  Д05_Ш         :DATE;
  ТД05          :STRING(40);
  ОСНОВАНИЕ     :STRING; --основание движения
  УСЛОСТНФА     :INTEGER; -- 0=расчет по виду операции (ДНФА.ПРИХ.* без проверки остатков)
                          -- 1=расчет остатков и проверка до проводки
                          -- 2=расчет остатков и проверка после проводки
                          -- 3=расчет остатков и проверка до и после проводки
  УСЛОСТНФАДО   :INTEGER; -- 0=проверять и сумму и количество
                          -- 1=проверять остаток суммы >=0
                          -- 2=проверять остаток количества >=0
                          -- 3=проверять остаток количества =1
  УСЛОСТНФАПОСЛЕ:INTEGER; -- 0=проверять и сумму и количество
                          -- 1=проверять остаток суммы >=0
                          -- 2=проверять остаток количества >=0
                          -- 3=проверять остаток количества =1
  SUBTAB ПОЗИЦИИ;
    НФА      :STRING; --НФА
    ИМЯНФА   :STRING;
    КОЛНФА   :REAL;
    СУМНФА   :REAL;
    АМСУМНФА :REAL;
    СЧНФА    :STRING(36);
    КОРСЧНФА :STRING(36);
    АМСЧНФА  :STRING(36);
    УЧННФА   :STRING;
    ОСТНФА   :STRING; --список признаков через "&" для подсчета остатков
    --если данные общие для всей подтаблицы, то для всех берется значение первой записи
    АН01     :STRING;
    АН02     :STRING;
    АН03     :STRING;
    АН04     :STRING;
    АН05     :STRING;
    АН06     :STRING;
    АН07     :STRING;
    АН08     :STRING;
    АН09     :STRING;
    АН10     :STRING;
    АН11     :STRING;
    АН12     :STRING;
    АН13     :STRING;
    АН14     :STRING;
    АН15     :STRING;
    АН16     :STRING;
    АН17     :STRING;
    АН18     :STRING;
    АН19     :STRING;
    АН20     :STRING;
    АН21     :STRING;
    АН22     :STRING;
    АН23     :STRING;
    АН24     :STRING;
    АН25     :STRING;
    Ч01      :REAL;
    Ч02      :REAL;
    Ч03      :REAL;
    Ч04      :REAL;
    Ч05      :REAL;
    СЧ01     :STRING(36);
    СЧ02     :STRING(36);
    СЧ03     :STRING(36);
    СЧ04     :STRING(36);
    СЧ05     :STRING(36);
    СЧ06     :STRING(36);
    СЧ07     :STRING(36);
    СЧ08     :STRING(36);
    СЧ09     :STRING(36);
    СЧ10     :STRING(36);
    СЧ11     :STRING(36);
    КМНТ     :STRING;
    Д01      :DATE;
    Д02      :DATE;
    Д03      :DATE;
    Д04      :DATE;
    Д05      :DATE;
    cps_КОММЕНТ           :STRING;   -- комментарий для прод накладной BSoft
ENDSUB;
  СОСТАВИЛ      :STRING; --Unique "ВИД_ДВИЖЕНИЯ;НОМЕРБУМ";
  МАКСКОЛПРОВ   :INTEGER; --максимальное количество проводок для данной операции
  SUBTAB ДОК;
    UKEYCRD :INTEGER; --ссылка на документ
    ВИДДОК  :STRING(63); --ПРИЗНАК=ВидДОК
  ENDSUB;
  SUBTAB ПОЗИЦИИ_ФИКС;
    ОСТНФА   :STRING;
    НФАПР    :STRING;
    КОЛНФАПР :REAL;
    СУМ      :REAL;
    КМНТ     :STRING;
    ДСЧЕТ    :STRING(36);
    КСЧЕТ    :STRING(36);
    ДАН01    :STRING;
    ДАН02    :STRING;
    ДАН03    :STRING;
    ДАН04    :STRING;
    ДАН05    :STRING;
    ДАН06    :STRING;
    ДАН07    :STRING;
    ДАН08    :STRING;
    ДАН09    :STRING;
    ДАН10    :STRING;
    ДАН11    :STRING;
    ДАН12    :STRING;
    ДАН13    :STRING;
    ДАН14    :STRING;
    ДАН15    :STRING;
    ДАН16    :STRING;
    ДАН17    :STRING;
    ДАН18    :STRING;
    ДАН19    :STRING;
    ДАН20    :STRING;
    ДАН21    :STRING;
    ДАН22    :STRING;
    ДАН23    :STRING;
    ДАН24    :STRING;
    ДАН25    :STRING;
    КАН01    :STRING;
    КАН02    :STRING;
    КАН03    :STRING;
    КАН04    :STRING;
    КАН05    :STRING;
    КАН06    :STRING;
    КАН07    :STRING;
    КАН08    :STRING;
    КАН09    :STRING;
    КАН10    :STRING;
    КАН11    :STRING;
    КАН12    :STRING;
    КАН13    :STRING;
    КАН14    :STRING;
    КАН15    :STRING;
    КАН16    :STRING;
    КАН17    :STRING;
    КАН18    :STRING;
    КАН19    :STRING;
    КАН20    :STRING;
    КАН21    :STRING;
    КАН22    :STRING;
    КАН23    :STRING;
    КАН24    :STRING;
    КАН25    :STRING;
    НОМЕРПП  :INTEGER; --порядковый номер строки для первой проводки из данной строки, иначе =0
  ENDSUB;
  SUBTAB ПОЗИЦИИ_БУХ;
    ОСТНФА   :STRING;
    НФАПР    :STRING;
    КОЛНФАПР :REAL;
    СУМ      :REAL;
    КМНТ     :STRING;
    ДСЧЕТ    :STRING(36);
    КСЧЕТ    :STRING(36);
    ДАН01    :STRING;
    ДАН02    :STRING;
    ДАН03    :STRING;
    ДАН04    :STRING;
    ДАН05    :STRING;
    ДАН06    :STRING;
    ДАН07    :STRING;
    ДАН08    :STRING;
    ДАН09    :STRING;
    ДАН10    :STRING;
    ДАН11    :STRING;
    ДАН12    :STRING;
    ДАН13    :STRING;
    ДАН14    :STRING;
    ДАН15    :STRING;
    ДАН16    :STRING;
    ДАН17    :STRING;
    ДАН18    :STRING;
    ДАН19    :STRING;
    ДАН20    :STRING;
    ДАН21    :STRING;
    ДАН22    :STRING;
    ДАН23    :STRING;
    ДАН24    :STRING;
    ДАН25    :STRING;
    КАН01    :STRING;
    КАН02    :STRING;
    КАН03    :STRING;
    КАН04    :STRING;
    КАН05    :STRING;
    КАН06    :STRING;
    КАН07    :STRING;
    КАН08    :STRING;
    КАН09    :STRING;
    КАН10    :STRING;
    КАН11    :STRING;
    КАН12    :STRING;
    КАН13    :STRING;
    КАН14    :STRING;
    КАН15    :STRING;
    КАН16    :STRING;
    КАН17    :STRING;
    КАН18    :STRING;
    КАН19    :STRING;
    КАН20    :STRING;
    КАН21    :STRING;
    КАН22    :STRING;
    КАН23    :STRING;
    КАН24    :STRING;
    КАН25    :STRING;
    НОМЕРПП  :INTEGER; --порядковый номер строки для первой проводки из данной строки, иначе =0
  ENDSUB;
  CLOSEDMODFOB  :BOOLEAN;
  CURRENTRECORD :РПО_ОПЕРАЦИИДНФА; --ссылка на текущий UKEY, вариант защиты записи от удаления для локальной версии при установленном флаге [проверка ссылочной целостности]
  КОНВ          :INTEGER;
  ПРОВОДИТЬ_БУХ :BOOLEAN; --Флаг наличия проводок БУХ
ENDTAB;

TABLE РПО_ОСТ_НФА = "Ввод остатков НФА"; --TABLE РПО_НАЧ_АМОРТ = "Ведомость начисленной амортизации";
  CREATEDUSER               :STRING;
  MODIFIEDUSER              :STRING;
  ПРОВОДИТЬ                 :BOOLEAN; --Включать документ в обработку, либо нет
  М                         :STRING(50); --справочник М КОД
  М_ИМЯ                     :STRING; --справочник М НАИМЕНОВАНИЕ
  МОЛ                       :STRING(50); --справочник МОЛ КОД
  МОЛ_ИМЯ                   :STRING; --справочник МОЛ НАИМЕНОВАНИЕ
  ДАТОПЕР                   :DATE; --Дата ввода остатков
  ГОДОСТ                    :STRING(4); --год в котором вводим остатки
  РПО_КЛЮЧ                  :STRING;
  КМНТ                      :STRING; --КОММЕНТАРИЙ
  ИТОГОСУМНФА               :REAL; --Итого по документу: сумма НФА
  ИТОГОКОЛНФА               :REAL; --Итого по документу: количество НФА
  УЧИТЫВАТЬДРАГМЕТ          :BOOLEAN; --Учитывать драг.мет
  SUBTAB ПОЗИЦИИ = "Табличная часть";
    НФА                  :STRING; --Код учета НФА
    СЧНФА                :STRING(36); --Счет НФА
    СУМНФА               :REAL; --Балансовая стоимость
    КОЛНФА               :REAL; --Количество
    ДОПАН                :STRING;
    СЧ00                 :STRING(36); --Счет для ввода остатков
    РУЧАН1               :STRING(35); --Аналитика ручного ввода (заводской ном)
    РУЧАН2               :STRING(35); --Аналитика ручного ввода (Рост, размер...)
    ГОДАПЕРЕОЦЕНОК       :STRING(30);
    КОЭФПЕРЕОЦЕНОК       :STRING;
    СУМПЕРЕОЦЕНОКНФА     :STRING;
    СУМПЕРЕОЦЕНОКНФАИТОГ :REAL;
    ДЕБПЕРЕОЦЕНОК        :STRING(36);
    КРЕПЕРЕОЦЕНОК        :STRING(36);
    ФКР0                 :STRING(20); --ФКР до 2008г
    ----------- поля драгмет    -------
    ДРАГМЕТ00              :REAL; -- МПГ
    ДРАГМЕТ01              :REAL; -- Золото
    ДРАГМЕТ02              :REAL; -- Серебро
    ДРАГМЕТ03              :REAL; -- Платина
    ДРАГМЕТ04              :REAL; -- Палладий
    ДРАГМЕТ05              :REAL; -- Иридий
    ДРАГМЕТ06              :REAL; -- Родий
    ДРАГМЕТ07              :REAL; -- Рутений
    ДРАГМЕТ08              :REAL; -- Осмий
  ENDSUB;
  CLOSEDMODFOB              :BOOLEAN;
  НОМЕР                     :STRING(25);
  НОВЫЙОТЧЕТНЫЙПЕРИОДНАЧАЛО :DATE;
  SUBTAB ПОЗИЦИИ_БУХ;
    НФАПР    :STRING;
    КОЛНФАПР :REAL;
    СУМ      :REAL;
    ДСЧЕТ    :STRING(36);
    КСЧЕТ    :STRING(36);
    КМНТ     :STRING;
    АН       :STRING;
    ФКР0     :STRING(20); --ФКР до 2008г
  ENDSUB;
  КОНВ                      :INTEGER;
  CURRENTRECORD             :РПО_ОСТ_НФА; --ссылка на текущий UKEY, вариант защиты записи от удаления для локальной версии при установленном флаге [проверка ссылочной целостности]
  СВЕРНУТЬБУХ               :BOOLEAN; --расчет итоговых свернутых проводок для ПОЗИЦИИ_БУХ
  ОБЩАН                     :STRING; --общая аналитика
  --Признаки учавствуют для каждого НФА
  ТЕКУЩИЙРЕГИОН             :STRING; --регион для переоценки зданий и сооружений
  ТЕКУЩИЙРЕГИОН_К0          :REAL; --коэфициент переоценки с предидущей переоценки
  ТЕКУЩИЙРЕГИОН_К1          :REAL; --коэфициент переоценки 1
  ТЕКУЩИЙРЕГИОН_К2          :REAL; --коэфициент переоценки 2
  ТЕКУЩИЙРЕГИОН_К3          :REAL; --коэфициент переоценки 3
  ТЕКУЩИЙРЕГИОН_К4          :REAL; --коэфициент переоценки 4
  SUBTAB ПОЗИЦИИОС = "Табличная часть";
    НФА                    :STRING; --Код учета НФА
    СЧНФА                  :STRING(36); --Счет НФА
    СУМНФА                 :REAL; --Балансовая стоимость
    КОЛНФА                 :REAL; --Количество
    СЧ00                   :STRING(36); --Счет для ввода остатков
    РУЧАН1                 :STRING(35); --Аналитика ручного ввода (заводской ном)
    РУЧАН2                 :STRING(35); --Аналитика ручного ввода (Рост, размер...)
    ДОПАН                  :STRING; --доп аналитические признаки
    ----------- поля для ОС -----------
    ДЕБАМОРТ00             :STRING(36); --дебет амортизации остатки
    СЧЕТАМОРТ              :STRING(36); --Счет амортизации
    ДЕБАМОРТ               :STRING(36); --дебет амортизации
    ДЭКСПЛ                 :DATE; --Дата ввода в эксплуатацию
    ДЭКСПЛММДДГГ           :STRING(18); --Дата начала начисления амортизации (ГГ.1976 ММДД.07.12)
    ДУЧЕТ                  :DATE; --Дата принятия к учету в нашей организации
    УЧНОМ                  :STRING(50); --Уникальный порядковый учетный номер данного НФА
    СУМАМ00                :REAL; --Начисленная амортизация за прошлые года
    СУМАМ01                :REAL; --Начисленная амортизация январь
    СУМАМ02                :REAL; --Начисленная амортизация февраль
    СУМАМ03                :REAL; --Начисленная амортизация март
    СУМАМ04                :REAL; --Начисленная амортизация апрель
    СУМАМ05                :REAL; --Начисленная амортизация май
    СУМАМ06                :REAL; --Начисленная амортизация июнь
    СУМАМ07                :REAL; --Начисленная амортизация июль
    СУМАМ08                :REAL; --Начисленная амортизация август
    СУМАМ09                :REAL; --Начисленная амортизация сентябрь
    СУМАМ10                :REAL; --Начисленная амортизация октябрь
    СУМАМ11                :REAL; --Начисленная амортизация ноябрь
    СУМАМ12                :REAL; --Начисленная амортизация декабрь
    НЕТМЕСАМОРТ            :INTEGER; --Пропущенно месяцев амортизации\ добавлено к сроку эксплуатации
    ----------- поля драгмет    -------
    ДРАГМЕТ00              :REAL; -- МПГ
    ДРАГМЕТ01              :REAL; -- Золото
    ДРАГМЕТ02              :REAL; -- Серебро
    ДРАГМЕТ03              :REAL; -- Платина
    ДРАГМЕТ04              :REAL; -- Палладий
    ДРАГМЕТ05              :REAL; -- Иридий
    ДРАГМЕТ06              :REAL; -- Родий
    ДРАГМЕТ07              :REAL; -- Рутений
    ДРАГМЕТ08              :REAL; -- Осмий
    ----------- поля переоценки -------
    ГОДАПЕРЕОЦЕНОК         :STRING(30);
    КОЭФПЕРЕОЦЕНОК         :STRING;
    СУМПЕРЕОЦЕНОКНФА       :STRING;
    СУМПЕРЕОЦЕНОКАМОРТ     :STRING;
    СУМПЕРЕОЦЕНОКНФАИТОГ   :REAL;
    СУМПЕРЕОЦЕНОКАМОРТИТОГ :REAL;
    ДЕБПЕРЕОЦЕНОК          :STRING(36);
    КРЕПЕРЕОЦЕНОК          :STRING(36);
    ДЕБПЕРЕОЦЕНОКАМОРТ     :STRING(36);
    КРЕПЕРЕОЦЕНОКАМОРТ     :STRING(36);
    КМНТ                   :STRING;
    ДОПАНПЕР               :STRING; --доп аналитические признаки
    ФКР0                   :STRING(20); --ФКР до 2008г
  ENDSUB;
  ПРОВОДИТЬ_БУХ             :BOOLEAN; --Флаг наличия проводок БУХ
  ПЕРЕОЦЕНКА                :BOOLEAN; --Формирует проводки по переоценке
  ------- общая аналитика начало -----------
ENDTAB;



TABLE РПО_ОКЕИ_ГРУППЫ = "Пользовательские группы и Единицы измерения";
  CREATEDUSER  :STRING;
  MODIFIEDUSER :STRING;
  ВИД          :STRING(45); --код
  КОД          :STRING(15); --код
  НАИМЕНОВАНИЕ :STRING; --наименование
  НУО          :STRING; --национальное условное обозначение
  МУО          :STRING; --международное условное обозначение
  НКБО         :STRING; --национальное кодовое буквенное обозначение
  МКБО         :STRING; --международное кодовое буквенное обозначение
  ГРНФА        :STRING; --ГрНФА
  UNIQUE "ВИД;КОД;MODIFIEDUSER";
ENDTAB;

TABLE РПО_ВЕДОМОСТЬ_МАТ = "Ведомость выдачи материалов и ОС<1000 на нужды учреждения";
  ЗАЩИТА        :BOOLEAN;
  НОМ_ДОК       :INTEGER;
  НОМ_БУМ       :STRING;
  БАЛ105        :BOOLEAN; -- флаги настроек расчета
  ЗАБ105        :BOOLEAN; -- флаги настроек расчета
  БАЛ101        :BOOLEAN; -- флаги настроек расчета
  ЗАБ101        :BOOLEAN; -- флаги настроек расчета
  МОЛкакФ       :BOOLEAN; -- флаги настроек расчета
  ДУТВ          :DATE;   --дата утверждения
  ДЗА           :DATE;   --дата заполнения
  РУК_ДОЛЖН     :STRING; --Руководитель должность
  РУК           :STRING; --Руководитель Ф.И.О.
  РУК_REC       :STRING; --Ссылка на запись картотеки
  ГЛБУХ         :STRING; --Главный бухгалтер Ф.И.О.
  ГЛБУХ_ДОЛЖН   :STRING; --Главный бухгалтер должность
  ГЛБУХ_REC     :STRING; --Ссылка на запись картотеки
  УЧР           :STRING; --Учреждение (аналитический признак)
  УЧР_Н         :STRING; --Учреждение (наименование)
  УЧР_О         :STRING; --Учреждение (ОКПО)
  ПОДР          :STRING; --Структурное подразделение (признак)
  ПОДР_Н        :STRING; --Структурное подразделение (расшифровка)
  МОЛ           :STRING; --Материально ответственное лицо (признак)
  МОЛ_Н         :STRING; --Материально ответственное лицо (расшифровка)
  МАТВЫДАЛ      :STRING; --Материалы выдал Ф.И.О.
  МАТВЫДАЛ_ДОЛЖН:STRING; --Материалы выдал должность
  МАТВЫДАЛ_REC  :STRING; --Ссылка на запись картотеки
  SUBTAB КОЛБУХЗАП;
    БУХДЕБ :STRING;
    БУХКРЕ :STRING;
  ENDSUB;
  SUBTAB КОЛМАТ;
    МАТ_Н     :STRING;
    МАТ_КОД   :STRING;
    ЕДИЗМ_Н   :STRING;
    ЕДИЗМ_КОД :STRING;
    ЦЕНА      :REAL;
  ENDSUB;
  SUBTAB КОЛФИО;
    ФИО_Н     :STRING;
    ФИО_КОД   :STRING;
    КС        :STRING;
  ENDSUB;
  SUBTAB КОЛФИО_ВЫДАНО;
    МАТ_ФИО:INTEGER;
    ВЫДАНО :REAL;
  ENDSUB;
  SUBTAB ПОДПИСЬ = "Подписи";
    ПОЛЕ      :STRING;
    ДОЛЖНОСТЬ :STRING; --значение поля ПОЛЕ_ДОЛЖНОСТЬ
    ФИО       :STRING; --значение поля ПОЛЕ_ФИО
    ДАТА      :DATE;
    ВРЕМЯ     :INTEGER;
  ENDSUB;

  ДНФАID        :INTEGER;
  RECCRD        :INTEGER; --ссылка на картотеку CRD
  CRD           :STRING; --ссылка на картотеку по ее имени
  BLNCRD        :STRING; --ссылка на картотеку по ее имени
  CREATEDUSER   :STRING;
  MODIFIEDUSER  :STRING;
ENDTAB;

TABLE РПО_ВНУТР_ПЕРЕМ_МОЛ = "Внутреннее перемещение всех НФА с МОЛ";
  CREATEDUSER    :STRING(60);
  MODIFIEDUSER   :STRING(60);
  ПРОВОДИТЬ      :BOOLEAN; --Провести документ по учету
  НОМЕР          :INTEGER; --Номер накладной по порядку
  НОМЕРБУМ       :STRING(40); --Номер накладной по порядку бумажный
  NNDAY          :INTEGER; --Номер по порядку для обработки оперции
  ДАТАОПЕР       :DATE; --Дата операции
  МОЛ_ОТККОД     :STRING; --МОЛ откуда код
  МОЛ_ОТКИМЯ     :STRING; --МОЛ откуда имя
  МХЭ_ОТККОД_ОБЩ :STRING; --местонахождение откуда код
  МХЭ_ОТКИМЯ_ОБЩ :STRING; --местонахождение откуда имя
  ДОП_VOCКОД     :STRING; --выбор дополнительного справочника
  ДОП_АНАКОД     :STRING; --фильтр по признаку дополнительного справочника
  ДОП_VOCИМЯ     :STRING; --выбор дополнительного справочника
  ДОП_АНАИМЯ     :STRING; --фильтр по признаку дополнительного справочника
  ДОП_УСЛ_ОСТ_АН :STRING; --дополнительные условия для расчета остатков по аналитике
  ДОП_УСЛ_ОСТ_СЧ :STRING; --дополнительные условия для расчета остатков по счетам
  VOC_CALC_ОСТ   :STRING; --справочники для расчета остатков
  SUBTAB ДОК;
    UKEYCRD :INTEGER; --ссылка на документ
    ВИДДОК  :STRING(63); --ПРИЗНАК=ВидДОК
  ENDSUB;
  SUBTAB ПОЗИЦИИ;
    МХЭ_ОТККОД  :STRING;
    МХЭ_ОТКИМЯ  :STRING;
    НФА_КОД     :STRING;
    НФА_ИМЯ     :STRING;
    ИНВ_КОД     :STRING(40);
    УЧН_КОД     :STRING(40);
    МХЭ_КУДАКОД :STRING;
    МХЭ_КУДАИМЯ :STRING;
    МОЛ_КУДАКОД :STRING;
    МОЛ_КУДАИМЯ :STRING;
    ЦЕНА        :REAL;
    КОЛВО       :REAL;
    СУММАП      :REAL;
    ЕДИЗМ       :STRING(40);
    ДСЧЕТ       :STRING(60);
    ДОПАНА01    :STRING;
    ДОПАНА02    :STRING;
    ДОПАНА03    :STRING;
    ДОПАНА04    :STRING;
    ДОПАНА05    :STRING;
    ДОПАНА06    :STRING;
    ДОПАНА07    :STRING;
    ДОПАНА08    :STRING;
    ДОПАНА09    :STRING;
    ДОПАНА10    :STRING;
    ДОПАНАИТОГО :STRING;
    ПРИЗН       :STRING;
    УСЛОСТНФА   :STRING;
    ИСКЛ        :BOOLEAN;
  ENDSUB;
  CLOSEDMODFOB   :BOOLEAN;
  CURRENTRECORD  :РПО_ВНУТР_ПЕРЕМ_МОЛ; --ссылка на текущий UKEY, вариант защиты записи от удаления для локальной версии при установленном флаге [проверка ссылочной целостности]
  КМНТ           :STRING; --комментарий
ENDTAB;

TABLE ИНВВЕДОМОСТЬ_0504087 = "Инвентаризационная опись по объектам нефинансовых активов ОКУД 0504087";
  КОДФОРМЫ           :STRING; --0504087,0317004(ИНВ3),0317001(ИНВ1)
  CREATEDUSER        :STRING(60);
  MODIFIEDUSER       :STRING(60);
  UPFIELD            :INTEGER; --верхнее поле листа при печати
  DOWNFIELD          :INTEGER; --нижнее поле листа при печати
  LEFTFIELD          :INTEGER; --левое поле листа при печати
  RIGHTFIELD         :INTEGER; --правое поле листа при печати
  HPAGE              :INTEGER; --высота листа
  WPAGE              :INTEGER; --ширина листа
  KALC               :INTEGER; --масштаб печати
  БАЛ                :BOOLEAN;
  ЗАБ                :BOOLEAN;
  РАЗБСЧ             :BOOLEAN;
  ФАКТ               :BOOLEAN;
  USEМХЭ             :BOOLEAN;
  НЕТПО              :BOOLEAN;
  НЕРЕЗ              :BOOLEAN;
  НЕКОЛНОЛЬ          :BOOLEAN;
  ПРИМ               :BOOLEAN;
  NUMER              :STRING;
  НАДАТУ             :DATE;
  УЧРЕЖ_КОД          :STRING;
  УЧРЕЖ_ИМЯ          :STRING;
  ОКПО               :STRING;
  КОД_ПО             :STRING;
  КОД_МОЛ            :STRING;
  КОД_МХЭ            :STRING;
  ИМЯ_ПО             :STRING;
  ИМЯ_МОЛ            :STRING;
  ИМЯ_МХЭ            :STRING;
  SORTFIELD          :STRING; --имя поля подтаблицы ПОЗИЦИИ для сортировки
  МОЛДОЛЖ            :STRING;
  НОМСЧ              :STRING;
  НОМПРИИНВ          :STRING;
  ДАТПРИИНВ          :DATE; --дата выхода приказа об инвентаризации
  МЕСТОИНВ           :STRING;
  ДАТНАЧИНВ          :DATE; --дата начала инвентаризации
  ДАТКОНИНВ          :DATE; --дата конца инвентаризации
  ДАТРАСИНВ          :DATE; --дата расписки МОЛа
  --nn1          :String;
  --nn9          :String;
  ДАТПОЯИНВ          :DATE; --дата объяснения МОЛа
  ДОЛПРОВЕРИЛ        :STRING;
  ФИОПРОВЕРИЛ        :STRING;
  ДАТПРОВЕРИЛ        :DATE; --дата комиссии
  ДОЛПРЕДКОМ         :STRING;
  ФИОПРЕДКОМ         :STRING;
  ДАТКОМИНВ          :DATE; --дата комиссии
  РАСЧИТАН_ВИД_ИТОГИ :BOOLEAN;
  SUBTAB КОМИССИЯ;
    ДОЛЧЛЕНКОМ :STRING;
    ФИОЧЛЕНКОМ :STRING;
  ENDSUB;
  SUBTAB МОЛ;
    ДОЛМОЛ :STRING;
    ФИОМОЛ :STRING;
  ENDSUB;
  ДАТМОЛ             :DATE; --дата мол
  SUBTAB СТРОКИПОЯСН;
    ПОЯСН :STRING;
  ENDSUB;
  SUBTAB СТРОКИЗАКЛ;
    ЗАКЛ :STRING;
  ENDSUB;
  SUBTAB СТРОКИДОПУСЛ;
    ДОПСПР   :STRING;
    ДОППРИЗН :STRING;
  ENDSUB;
  SUBTAB ПОЗИЦИИ;
    НФА_КОД    :STRING;
    КОД        :STRING;
    ДОКАРЕНДА  :STRING;
    ДОКРЕГ     :STRING; --паспорт и т.п
    ГОДВЫПУСКА :DATE;
    ИНВЕН      :STRING; --учн
    АНРАЗР     :STRING; --дополнительная аналитика
    СЧЕТРАЗР   :STRING; --группа счетов
    НФА_ИМЯ    :STRING;
    ИНВ_ИМЯ    :STRING; --имя из инвентарной карточки
    СЧЕТ       :STRING; --счет учета
    НОМЕРИНВ   :STRING; --инвентарный номер
    ЕДИЗМ      :STRING;
    ЗН         :STRING; --заводской номер
    КОМПЛЕКТ   :INTEGER;
    УЧКОМПЛЕКТ :BOOLEAN; --входит в комплект (true=является дополнением к основной записи копмлект,т.е. сумма не учитывается), если запись основная УЧКОМПЛЕКТ=false
    ШТРИХКОД   :STRING;
    ЦЕНА       :REAL;
    КОЛФАКТ    :REAL;
    СУМФАКТ    :REAL;
    КОЛУЧЕТ    :REAL;
    СУМУЧЕТ    :REAL;
    ПРИМЕЧ     :STRING;
    РУЧНОЙВВОД :BOOLEAN;
    РАЗРЫВСТР  :BOOLEAN; --следующая строка на новой странице
    ВЫСОТАСТР  :INTEGER; --высота строки в десятых долях мм
  ENDSUB;
  SUBTAB ПОДПИСЬ = "Подписи";
    ПОЛЕ      :STRING;
    ДОЛЖНОСТЬ :STRING; --значение поля ПОЛЕ_ДОЛЖНОСТЬ
    ФИО       :STRING; --значение поля ПОЛЕ_ФИО
    ДАТА      :DATE;
    ВРЕМЯ     :INTEGER;
  ENDSUB;
  SUBTAB ДОППОЛЕ_С = "Список дополнительных не картотечных полей";
    ПОЛЕ     :STRING; --имя поля
    ЗНАЧЕНИЕ :STRING; --значение поля
  ENDSUB;
  SUBTAB ДОППОЛЕ_Ц = "Список дополнительных не картотечных полей";
    ПОЛЕ     :STRING; --имя поля
    ЗНАЧЕНИЕ :INTEGER; --значение поля
  ENDSUB;
  SUBTAB ДОППОЛЕ_Д = "Список дополнительных не картотечных полей";
    ПОЛЕ     :STRING; --имя поля
    ЗНАЧЕНИЕ :DATE; --значение поля
  ENDSUB;
  SUBTAB ДОППОЛЕ_Ч = "Список дополнительных не картотечных полей";
    ПОЛЕ     :STRING; --имя поля
    ЗНАЧЕНИЕ :REAL; --значение поля
  ENDSUB;
  SUBTAB ДОППОЛЕ_Л = "Список дополнительных не картотечных полей";
    ПОЛЕ     :STRING; --имя поля
    ЗНАЧЕНИЕ :BOOLEAN; --значение поля
  ENDSUB;

  CLOSEDMODFOB       :BOOLEAN;
  КМНТ               :STRING; --комментарий
ENDTAB;

TABLE РПО_НАКЛАДНАЯ_М15 = "НАКЛАДНАЯ. Типовая межотраслевая форма N М-15";
  CREATEDUSER  :STRING;
  MODIFIEDUSER :STRING;
  ЗАЩИТА       :BOOLEAN; --Защита от изменения документа
  ТОЧН         :INTEGER; --Точность расчетов
  УЧРЕЖД       :STRING; --Наименование учреждения
  ОКПО         :STRING; --ОКПО учреждения
  КОД_П_ОТК    :STRING; --Код подразделения отправителя
  КОД_П_КУД    :STRING; --Код подразделения получателя
  КОД_П_ОТВ    :STRING; --Код подразделения ответственношо
  КОД_М_ОТК    :STRING; --Код местонахождения отправителя
  КОД_М_КУД    :STRING; --Код местонахождения получателя
  КОД_М_ОТВ    :STRING; --Код местонахождения ответственношо
  ИМЯ_М_ОТК    :STRING; --Наименование местонахождения отправителя
  ИМЯ_М_КУД    :STRING; --Наименование местонахождения получателя
  ИМЯ_М_ОТВ    :STRING; --Наименование местонахождения ответственношо
  ВИД_Д_ОТП    :STRING; --Вид деятельности отправителя
  ВИД_Д_ПОЛ    :STRING; --Вид деятельности получателя
  ВИД_Д_ОТВ    :STRING; --Вид деятельности ответственношо
  КОД_ИСПОЛНИТЕЛЯ:STRING;

  НОМЕР        :INTEGER; --Номер накладной по порядку
  НОМЕРБУМ     :STRING; --Номер накладной по порядку бумажный
  ДАТА_НАК     :DATE; --Дата накладной
  КОДОПЕР      :STRING; --Код операции
  КОД_СИНТ     :STRING; --Код синтетического учета
  КОД_АНАЛ     :STRING; --Код аналитического учета
  УЧ_ЕД_ВЫП    :STRING; --Учетная единица выпуска продукции (работ, услуг)
  ФИО_Ч_КОГО   :STRING; --Ф.И.О. через кого
  КОД_ТРЕБОВАЛ :STRING; --Код МОЛ затребовал
  ФИО_ТРЕБОВАЛ :STRING; --Ф.И.О. затребовал
  ФИО_РАЗРЕШИЛ :STRING; --Ф.И.О. разрешил
  ДОЛ_РАЗРЕШИЛ :STRING; --Должность разрешил
  SUBTAB ПОЗИЦИИ;
    СЧНФА      :STRING;
    КОД_НФА    :STRING;
    ИМЯ_НФА    :STRING;
    НОМЕН_НОМ  :STRING; --Номенклатурный номер
    КОД_ИНВ    :STRING;
    ВЕД_ИНВ    :STRING;
    КОД_ЕДИЗМ  :STRING;
    ИМЯ_ЕДИЗМ  :STRING;
    КОЛ_ЗАТРЕБ :REAL;
    КОЛ_ОТПУЩ  :REAL;
    ЦЕНА_НФА   :REAL;
    СУММА_НФА  :REAL;
    СУММА_НДС  :REAL;
    ПАСП_НОМ   :STRING;
    СКЛАД_НОМ  :STRING; --Порядковый номер по складской картотеке
  ENDSUB;
  SUBTAB ПОДПИСЬ = "Подписи";
    ПОЛЕ      :STRING;
    ДОЛЖНОСТЬ :STRING; --значение поля ПОЛЕ_ДОЛЖНОСТЬ
    ФИО       :STRING; --значение поля ПОЛЕ_ФИО
    ДАТА      :DATE;
    ВРЕМЯ     :INTEGER;
  ENDSUB;

  ОСНОВАНИЕ    :STRING;
  РеквП        :STRING;

  ДОЛ_ГЛБУХ    :STRING;
  ФИО_ГЛБУХ    :STRING;
  КОД_ОТПУС    :STRING; --Код МОЛ отпустил
  ФИО_ОТПУС    :STRING; --Ф.И.О. отпустил
  ФИО_ПОЛУЧ    :STRING; --Ф.И.О. получил
  ДОЛ_ОТПУС    :STRING; --Должность отпустил
  ДОЛ_ПОЛУЧ    :STRING; --Должность получил
  ДНФАID       :INTEGER; --Ссылка на запись в картотеке движение НФА
  RECCRD       :INTEGER; --ссылка на картотеку CRD
  CRD          :STRING; --ссылка на картотеку по ее имени
  BLNCRD       :STRING; --Бланк редактор картотеки родителя CRD
  CLOSEDMODFOB :BOOLEAN;
ENDTAB;

TABLE РПО_ОТЧЕТЫ_ГРУППЫ = "Настройки отчетов - группы для строк"; -- массивы условий для расчета каждой строки из картотеки [РПО_ОТЧЕТЫ_СТРОКИ]
  РПО_ОТЧЕТЫ_СТРОКА :РПО_ОТЧЕТЫ_СТРОКИ;
  УСЛ_ПРИЗН         :STRING; --условие на признаки или признак константа
  УСЛ_ПРИЗН_ГР      :STRING; --условие на признаки по которым происходило раскрытие
  КАРТ              :STRING; --картотека
  ОТ_КАРТ           :BOOLEAN; --расчет от картотеки
  УСЛ_КАРТ          :STRING; --фильтр на картотеку
  АВТОГРУППА        :BOOLEAN; --список признаков формируется в момент расчета по УСЛ_ПРИЗН,УСЛ_КАРТ
  СЧИТАТЬАВТОГРУППУ :INTEGER; --0-расчет автогруппы+константы по автогруппе;1-считать только автогруппу без констант;3-автогруппа закрыта, считать только константы;4-не считать автогруппу и ее константы
  ПОЛЕ1             :STRING; --имя строкового поля в картотеке КАРТ
  УСЛ_ПОЛЕ1СООТВ    :BOOLEAN; --условие на соотв(ПОЛЕ1,*УСЛ_ПОЛЕ1*) или не соотв(ПОЛЕ1,*УСЛ_ПОЛЕ1*)
  УСЛ_ПОЛЕ1         :STRING; --символы содержащиеся в поле1
  УСЛ1_2            :BOOLEAN; --связка между первым и вторым условием (или,и)
  ПОЛЕ2             :STRING; --имя строкового поля в картотеке КАРТ
  УСЛ_ПОЛЕ2СООТВ    :BOOLEAN; --условие на соотв(ПОЛЕ2,*УСЛ_ПОЛЕ2*) или не соотв(ПОЛЕ2,*УСЛ_ПОЛЕ2*)
  УСЛ_ПОЛЕ2         :STRING; --символы содержащиеся в поле2
  CREATEDUSER       :STRING;
  MODIFIEDUSER      :STRING;
  CLOSEDMODFOB      :BOOLEAN;
ENDTAB;
TABLE РПО_НФА_СПРАВКА = "Справка по НФА";
  CREATEDUSER    :STRING(60);
  MODIFIEDUSER   :STRING(60);
  ПРОВОДИТЬ      :BOOLEAN; --Провести документ по учету
  НОМЕР          :INTEGER; --Номер накладной по порядку
  НОМЕРБУМ       :STRING(40); --Номер накладной по порядку бумажный
  NNDAY          :INTEGER; --Номер по порядку для обработки оперции
  ДАТАОПЕР       :DATE; --Дата операции
  МОЛ_ОТККОД     :STRING; --МОЛ откуда код
  МОЛ_ОТКИМЯ     :STRING; --МОЛ откуда имя
  МХЭ_ОТККОД_ОБЩ :STRING; --местонахождение откуда код
  МХЭ_ОТКИМЯ_ОБЩ :STRING; --местонахождение откуда имя
  ДОП_АН_КОД     :STRING;
  SUBTAB ДОК;
    UKEYCRD :INTEGER; --ссылка на документ
    ВИДДОК  :STRING(63); --ПРИЗНАК=ВидДОК
  ENDSUB;
  ДОП_УСЛ_ОСТ_АН :STRING; --дополнительные условия для расчета остатков по аналитике
  ДОП_УСЛ_ОСТ_СЧ :STRING; --дополнительные условия для расчета остатков по счетам
  VOC_CALC_ОСТ   :STRING; --справочники для расчета остатков
  SUBTAB УСЛ_ОСТ;
    СПР   :STRING;
    ПРИЗН :STRING;
  ENDSUB;
  SUBTAB ДОП_ПАРАМ;
    ПАРАМ_ИМЯ :STRING;
    ПАРАМ_ЗНЧ :STRING;
  ENDSUB;
  НФА_СПРАВКА    :STRING;
  SUBTAB ПОЗИЦИИ;
    TR :РПО_НФА_СПРАВКА_ПРОВОДКИ;
  ENDSUB;
  SUBTAB ПОДПИСЬ = "Подписи";
    ПОЛЕ      :STRING;
    ДОЛЖНОСТЬ :STRING; --значение поля ПОЛЕ_ДОЛЖНОСТЬ
    ФИО       :STRING; --значение поля ПОЛЕ_ФИО
    ДАТА      :DATE;
    ВРЕМЯ     :INTEGER;
  ENDSUB;

  CLOSEDMODFOB   :BOOLEAN;
  КМНТ           :STRING; --комментарий
  СПОСОБ_РАСЧЕТА :INTEGER;
  UNIQUE "НФА_СПРАВКА";
ENDTAB;


TABLE РПО_НФА_СПРАВКА_ПРОВОДКИ = "Проводки для справки по НФА";
  ДАТАОПЕР        :DATE; --Дата операции
  РПО_НФА_СПРАВКА :РПО_НФА_СПРАВКА;
  CREATEDUSER     :STRING(60);
  MODIFIEDUSER    :STRING(60);
  НФА_СПРАВКА     :STRING;
  НФА_КОД         :STRING;
  УЧН_КОД         :STRING(40);
  КОЛНФА          :REAL;
  СУМНФА          :REAL;
  АМСУМНФА        :REAL;
  СЧНФА           :STRING(36); -- *.?.101.0?.310|*.?.105.0?.340||*.?.106.0?.340
  СЧНФАЗАБ        :STRING(15); -- ЗАБ.??.101.??|ЗАБ.??.105.??|ЗАБ.??.106.??
  СЧНФАКРЕ        :STRING(36); -- *.?.101.0?.410|*.?.105.0?.440||*.?.106.0?.440
  АМСЧНФА         :STRING(36); -- *.?.104.0?.410
  АМСЧНФАДЕБ      :STRING(36); -- *.?.401.01.271|*.?.106.04.340
  ОСТНФА          :STRING; --список признаков через "&" для подсчета остатков
  ОСТАМНФА        :STRING; --список признаков через "&" для подсчета остатков
  ДОПАНА01        :STRING;
  ДОПАНА02        :STRING;
  ДОПАНА03        :STRING;
  ДОПАНА04        :STRING;
  ДОПАНА05        :STRING;
  ДОПАНА06        :STRING;
  ДОПАНА07        :STRING;
  ДОПАНА08        :STRING;
  ДОПАНА09        :STRING;
  ДОПАНА10        :STRING;
  ПРОВОДИТЬ       :BOOLEAN;
  СУММА1          :REAL;
  КОЛ1            :REAL;
  КМНТ1           :STRING;
  ОБЩАН1          :STRING;
  СЧДЕБ1          :STRING;
  СЧКРЕ1          :STRING;
  СУММА2          :REAL;
  КОЛ2            :REAL;
  КМНТ2           :STRING;
  ОБЩАН2          :STRING;
  СЧДЕБ2          :STRING;
  СЧКРЕ2          :STRING;
  СУММА3          :REAL;
  КОЛ3            :REAL;
  КМНТ3           :STRING;
  ОБЩАН3          :STRING;
  СЧДЕБ3          :STRING;
  СЧКРЕ3          :STRING;
  ДЭКСПЛ          :date;
  ДУЧЕТ           :date;
  ИСКЛ            :BOOLEAN;
  EDIT            :BOOLEAN;
  НЕТАМОРТ        :INTEGER;
  СПОСОБ_РАСЧЕТА  :INTEGER;
  CLOSEDMODFOB    :BOOLEAN;
  КМНТ            :STRING; --комментарий
ENDTAB;

TABLE РПО_СТАТУС_ДОК = "Состояние обработки документа";
  CREATEDUSER  :STRING;
  MODIFIEDUSER :STRING;
  СТАТУС       :INTEGER; --статус обработки
  СТАТУС_КОД   :STRING; --статус обработки
  СТАТУС_ДОП1  :STRING; --статус обработки
  СТАТУС_ДОП2  :STRING; --статус обработки
  СТАТУС_ДОП3  :STRING; --статус обработки
  KEY          :STRING; --Условие для восстановления при неверном/потеряном/двойном RECCRD (документ-предок сменил UKEY)
  RECCRD       :INTEGER; --ссылка на картотеку CRD
  CRD          :STRING; --ссылка на картотеку документа по ее имени
  BLNCRD       :STRING; --Бланк редактор картотеки документа
  GUID_SUBTAB  :STRING; --ссылка на запись подтаблицы документа
  CRD_SUBTAB   :STRING; --ссылка на подтаблицу документа
  CLOSEDMODFOB :BOOLEAN;
ENDTAB;


TABLE РПО_АКТПРМАТ = "Акт приема материалов ОКУД 0315004 (Форма М-7)";
  CREATEDUSER  :STRING;
  MODIFIEDUSER :STRING;
  ЗАЩИТА       :BOOLEAN; --Защита от изменения документа
  НОМЕРПОР     :INTEGER; --Номер документа по порядку
  НОМЕРБУМ     :STRING;  --Номер документа по порядку бумажный
  ДАТААКТА     :DATE;    --Дата документа
  ОРГ_НАИМ     :STRING;  --Наименование учреждения
  ОРГ_ОКПО     :STRING;  --ОКПО учреждения
  ОРГ_RREC     :STRING;  --ссылка на учреждение
  ДОЛ_УТВЕР    :STRING;  --должность руководителя
  ФИО_УТВЕР    :STRING;  --Ф.И.О. руководителя
  ДАТ_УТВЕР    :DATE;    --дата утверждения документа
  МХЭ_КОД      :STRING;  --место составления акта (код)
  МХЭ_ИМЯ      :STRING;  --место составления акта (наименование)
  НАЧПР_ЧАС    :INTEGER; --начало приема часы
  НАЧПР_МИН    :INTEGER; --начало приема минуты
  КОНПР_ЧАС    :INTEGER; --конец приема часы
  КОНПР_МИН    :INTEGER; --конец приема минуты
  ПРИБЫЛ_ГРУЗ  :STRING;  --принят и осмотрен груз, прибывший по сопроводительным документам
  НОМ_СЕРТКАЧ  :STRING;  --номер сертификата качества
  СТАНЦИЯ      :STRING;  --станция назначения
  ДАТ_СОПРДОК  :DATE;    --дата сопроводительного транспортного документа
  НОМ_СОПРДОК  :STRING;  --номер сопроводительного транспортного документа
  НОМ_ВАГОНЫ   :STRING;  --номера вагонов
  ИНФО_ОТПР    :STRING;  --отправитель
  ИНФО_ПОСТ    :STRING;  --поставщик
  ИНФО_ПОЛУЧ   :STRING;  --получатель
  ИНФО_СТРАХ   :STRING;  --страховая компания
  ДАТАОТПР     :DATE;    --дата отправки продукции со станции (пристани, порта) или со склада отправителя
  НОМ_ДОГОВ    :STRING;  --договор номер
  ДАТ_ДОГОВ    :DATE;    --договор дата
  ТЕЛЕГРАММА   :STRING;  --дата и номер телефонограммы или телеграммы о вызове отправителя (заготовителя)
  SUBTAB СОПР_ДОК;
    ПЛОМБА     :STRING;  --отметка об опломбировании груза
    КОЛМЕСТ    :STRING;  --количество мест
    ВИДУПАК    :STRING;  --вид упаковки
    НАИМПРОД   :STRING;  --наименование продукции, товара (груза) или номера контейнеров
    ЕДИЗМ      :STRING;  --единица измерения
    ГРУЗОТП    :REAL;    --масса груза, т. отправителя
    ГРУЗДОР    :REAL;    --масса груза, т. дороги, пристани
    ПРИМЕЧ     :STRING;  --особые отметки отправителя по накладной
  ENDSUB;
  SUBTAB DATTIME;
    DDПРБТ     :DATE;    --дата прибытия на станцию (пристань, порт) назначения
    DDВЫДЧ     :DATE;    --дата выдачи груза органом транспорта
    DDВСКР     :DATE;    --дата вскрытия вагона и других транспортных средств
    DDДОСТ     :DATE;    --дата доставки на склад получателя
    HHПРБТ     :INTEGER; --часы прибытия на станцию (пристань, порт) назначения
    HHВЫДЧ     :INTEGER; --часы выдачи груза органом транспорта
    HHВСКР     :INTEGER; --часы вскрытия вагона и других транспортных средств
    HHДОСТ     :INTEGER; --часы доставки на склад получателя
    MMПРБТ     :INTEGER; --минуты прибытия на станцию (пристань, порт) назначения
    MMВЫДЧ     :INTEGER; --минуты выдачи груза органом транспорта
    MMВСКР     :INTEGER; --минуты вскрытия вагона и других транспортных средств
    MMДОСТ     :INTEGER; --минуты доставки на склад получателя
  ENDSUB;
  SUBTAB ХРАНЕНИЕ;
    ОПИСАНИЕ   :STRING;  --условия хранения продукции на складе получателя
  ENDSUB;
  SUBTAB ТАРА;
    ОПИСАНИЕ   :STRING;  --состояние тары и упаковки в момент осмотра продукции
  ENDSUB;
  SUBTAB ДРУГОЕ;
    ОПИСАНИЕ   :STRING;  --другие данные
  ENDSUB;
  ТипПроверки  :STRING;  --метод определения количества недостающей продукции
  SUBTAB РАСХОЖДЕНИЯ;
    НФАКОД   :STRING;  --материальные ценности (код)
    НФАИМЯ   :STRING;  --материальные ценности (наименование)
    НОМЕНК   :STRING;  --номенклатурный номер
    ЕИ_КОД   :STRING;  --единица измерения (код ОКЕИ)
    ЕИ_ИМЯ   :STRING;  --единица измерения (название)
    ДОК_СОРТ :STRING;  --по документам: сорт
    ДОК_КОЛЛ :REAL;    --по документам: количество
    ДОК_ЦЕНА :REAL;    --по документам: цена, руб. коп.
    ДОК_СУММ :REAL;    --по документам: сумма, руб. коп.
    ФКТ_СОРТ :STRING;  --фактически: сорт
    ФКТ_КОЛЛ :REAL;    --фактически: количество
    ФКТ_ЦЕНА :REAL;    --фактически: цена, руб. коп.
    ФКТ_СУММ :REAL;    --фактически: сумма, руб. коп.
    ORDНОМЕР :STRING;  --порядковый номер записи по складской картотеке
    БОЙ_КОЛЛ :REAL;    --брак и бой: количество
    БОЙ_СУММ :REAL;    --брак и бой: сумма, руб. коп.
    НЕТ_КОЛЛ :REAL;    --недостачи: количество
    НЕТ_СУММ :REAL;    --недостачи: сумма, руб. коп.
    ИЗЛ_КОЛЛ :REAL;    --излишки: количество
    ИЗЛ_СУММ :REAL;    --излишки: сумма, руб. коп.
    НОМПСПРТ :STRING;  --номер паспорта
  ENDSUB;
  ТИПОПЕР    :STRING;  --код вида операции
  КОДПО      :STRING;  --структурное подразделение
  КОДДЕЯТЕЛ  :STRING;  --вид деятельности
  КОДСКЛАД   :STRING;  --код склада
  КОДПОСТ    :STRING;  --код поставщика
  КОДСЧЕТ    :STRING;  --счет, субсчет
  КОДСПРАВ   :STRING;  --код аналитического учета
  НОМСОПРДОК :STRING;  --номер сопроводительного документа
  SUBTAB ЗАКЛЮЧЕНИЕ;
    ОПИСАНИЕ   :STRING;  --заключение комиссии
  ENDSUB;
  SUBTAB ДОКУМЕНТЫ;
    ОПИСАНИЕ   :STRING;  --приложение. перечень прилагаемых документов
  ENDSUB;
  SUBTAB КОМИССИЯ;
    ДОЛЖЧК     :STRING;  --должность
    ФИО_ЧК     :STRING;  --расшифровка подписи
    ДОК_ЧК     :STRING;  --номер и дата выдачи документа о полномочиях и наименование организации, выдавшей документы
  ENDSUB;
  SUBTAB ПОДПИСЬ = "Подписи";
    ПОЛЕ      :STRING;
    ДОЛЖНОСТЬ :STRING; --значение поля ПОЛЕ_ДОЛЖНОСТЬ
    ФИО       :STRING; --значение поля ПОЛЕ_ФИО
    ДАТА      :DATE;
    ВРЕМЯ     :INTEGER;
  ENDSUB;

  ДАТ_ПРИНЦЕН  :DATE;    --материальные ценности приняты и оприходованы
  НОМ_КОММАКТ  :STRING;  --коммерческий акт - номер
  ДАТ_КОММАКТ  :DATE;    --коммерческий акт - дата
  ФИО_ЗАВСКЛАД :STRING;  --заведующий складом
  ДНФАID       :INTEGER; --ссылка на запись в картотеке движение НФА
  RECCRD       :INTEGER; --ссылка на картотеку CRD
  CRD          :STRING;  --ссылка на картотеку по ее имени
  BLNCRD       :STRING;  --бланк редактор картотеки родителя CRD
ENDTAB;

TABLE РПО_ПРИХ_ОРДЕР = "Приходный ордер (типовая форма N'М4 ОКУД 0315003)";
  ЗАЩИТА       :BOOLEAN; --Защита от изменения документа
  ТОЧН         :INTEGER; --Точность расчетов
  НОМЕР        :INTEGER; --Номер накладной по порядку
  НОМЕРБУМ     :STRING;  --Номер накладной по порядку бумажный
  ДАТА_НАК     :DATE;    --Дата накладной (совставления)
  ПДР_НАИМ     :STRING;  --Структурное подразделение наименование
  ПДР_КОД      :STRING;  --Структурное подразделение код
  УЧР_НАИМ     :STRING;  --Организация наименование
  УЧР_ОКПО     :STRING;  --Организация ОКПО
  УЧР_REFI     :INTEGER; --Ссылка на Контрагента
  КОД_ОПЕР     :STRING;  --Код вида операции
  МХЭ_КОД      :STRING;  --Склад (код)
  МХЭ_ИМЯ      :STRING;  --Склад (наименование)
  ПОСТ_КОД     :STRING;  --Поставщик (код)
  ПОСТ_ИМЯ     :STRING;  --Поставщик (наименование)
  СТРАХОВ      :STRING;  --Страховая компания
  КОД_СИНТ     :STRING;  --Код синтетического учета
  КОД_АНАЛ     :STRING;  --Код аналитического учета
  НОМ_СОПР     :STRING;  --Номер документа сопроводительного
  НОМ_ПЛАТ     :STRING;  --Номер документа платежного
  SUBTAB ПОЗИЦИИ;
    НФА_КОД    :STRING; --НФА (материальные ценности) код
    НФА_ИМЯ    :STRING; --НФА (материальные ценности) наименование
    КОД_НОМ    :STRING; --Номенклатурный номер
    КОД_УЧН    :STRING; --Учетный номер
    КОД_ИНВ    :STRING; --Инвентарный номер
    КОД_ЕДИЗМ  :STRING; --Единица измерения код
    ИМЯ_ЕДИЗМ  :STRING; --Единица измерения наименование
    КОЛ_ДОКМ   :REAL;   --Количество по документу
    КОЛ_ПРИН   :REAL;   --Количество принято
    ЦЕНАП_НФА  :REAL;   --Цена, руб. коп.
    СУММА_НФА  :REAL;   --Сумма без учета НДС, руб. коп.
    НДС_СТАВ   :REAL;   --Cтавка НДС
    НДС_СУММ   :REAL;   --Сумма НДС, руб. коп.
    ВСЕГО_НФА  :REAL;   --Всего с учетом НДС, руб. коп.
    ПСПРТ_НОМ  :STRING; --Номер паспорта
    СКЛАД_НОМ  :STRING; --Порядковый номер по складской картотеке
  ENDSUB;
  SUBTAB ПОДПИСЬ = "Подписи";
    ПОЛЕ      :STRING;
    ДОЛЖНОСТЬ :STRING; --значение поля ПОЛЕ_ДОЛЖНОСТЬ
    ФИО       :STRING; --значение поля ПОЛЕ_ФИО
    ДАТА      :DATE;
    ВРЕМЯ     :INTEGER;
  ENDSUB;

  ДОЛ_ОТПУС    :STRING; --МОЛ отпустил (должность)
  КОД_ОТПУС    :STRING; --МОЛ отпустил (код)
  ФИО_ОТПУС    :STRING; --МОЛ отпустил (Ф.И.О.)
  ДОЛ_ПОЛУЧ    :STRING; --МОЛ получил (должность)
  КОД_ПОЛУЧ    :STRING; --МОЛ получил (код)
  ФИО_ПОЛУЧ    :STRING; --МОЛ получил (Ф.И.О.)
  ДНФАID       :INTEGER; --Ссылка на запись в картотеке движение НФА
  RECCRD       :INTEGER; --ссылка на картотеку CRD
  CRD          :STRING;  --ссылка на картотеку по ее имени
  BLNCRD       :STRING;  --Бланк редактор картотеки родителя CRD
  CREATEDUSER  :STRING;
  MODIFIEDUSER :STRING;
ENDTAB;

TABLE РПО_НАКЛ_НАРЯД = "Накладная-наряд";
  ЗАЩИТА       :BOOLEAN; --Защита от изменения документа
  ДАТ_ДОК      :DATE; --Дата накладной
  НОМ_ДОК      :INTEGER; --Номер накладной по порядку
  НОМ_БУМ      :STRING; --Номер накладной по порядку бумажный
  ОРГ_НАИМЕН   :STRING; --Наименование учреждения
  ОРГ_ОКПО     :STRING; --ОКПО учреждения
  ОРГ_REC      :STRING; --ссылка на учреждение
  МХЭ_КОД      :STRING; --Код местонахождения
  МХЭ_ИМЯ      :STRING; --Наименование местонахождения
  ПОЛУЧ_ИМЯ    :STRING; --Наименование организации получателя
  ПОЛУЧ_КОД    :STRING; --Код организации получателя
  АДРЕС        :STRING;
  ОСНОВАНИЕ    :STRING;
  ДЛЖ_РУК      :STRING;
  ФИО_РУК      :STRING;
  REC_РУК      :STRING;
  ДЛЖ_БУХ      :STRING;
  ФИО_БУХ      :STRING;
  REC_БУХ      :STRING;
  SUBTAB ПОЗИЦИИ;
    TBL_NKU :STRING; --N карт. учета
    TBLКНФА :STRING; --Код имущества
    TBLННФА :STRING; --Наименование имущества
    TBLУЧНИ :STRING; --Учетный номер
    TBLЕДИЗ :STRING; --Ед.изм.
    TBLКОЛН :REAL; --Количество затребовано
    TBLКОЛО :REAL; --Количество отпущено
    TBLЦЕНА :REAL; --Цена за позицию
    TBLСУММ :REAL; --Сумма позиции
    TBL_КБК :STRING; --КБК
  ENDSUB;
  SUBTAB ПОДПИСЬ = "Подписи";
    ПОЛЕ      :STRING;
    ДОЛЖНОСТЬ :STRING; --значение поля ПОЛЕ_ДОЛЖНОСТЬ
    ФИО       :STRING; --значение поля ПОЛЕ_ФИО
    ДАТА      :DATE;
    ВРЕМЯ     :INTEGER;
  ENDSUB;

  ДНФАID       :INTEGER; --Ссылка на запись в картотеке движение НФА
  RECCRD       :INTEGER; --Ссылка на картотеку CRD
  CRD          :STRING; --Ссылка на картотеку по ее имени
  BLNCRD       :STRING; --Бланк редактор картотеки родителя CRD
  CREATEDUSER  :STRING;
  MODIFIEDUSER :STRING;
  CLOSEDMODFOB :BOOLEAN;
ENDTAB;

TABLE ТББ_АМТКОРР_Т FORWARD;

TABLE ТББ_АМТКОРР_З = "Расчет-корректировка амортизации - заголовок";
 ПРОВОДИТЬ  :BOOLEAN; --флаг проводки
 SYSKEY_CLC :STRING;  --системный ключ расчета-корректировки
 ДАТОТЧ     :DATE;    --дата отчета
 ДАТПРД     :DATE;    --дата проводок
 ОТЧАНА     :STRING;  --дополнительный фильтр аналитики расчета
 УЧТГОД     :INTEGER; --учетный год
 УЧТМЕС     :INTEGER; --учетный месяц
 --
 УЧР_SREF   :STRING;  --учреждение - ссылка на контрагента
 УЧР_НАИМ   :STRING;  --учреждение - наименование
 УЧР_ОКПО   :STRING;  --учреждение - ОКПО
 ИСПREF     :STRING;  --исполнитель - ссылка на сотрудника
 ИСПФИО     :STRING;  --исполнитель - Ф.И.О.
 ИСПДОЛ     :STRING;  --исполнитель - должность
 ДАТИСП     :DATE;    --дата подписи (исполнения)
 ИТГБСУМY   :REAL;    --ИТОГО балансовая сумма на начало года   (только НЕинвентарные ОС)
 ИТГБСУМC   :REAL;    --ИТОГО балансовая сумма на отчетную дату (только НЕинвентарные ОС)
 --
 ELEMENTS   :INTEGER; --количество элементов (для контроля)
 COUNTSAVE  :INTEGER; --флаг сохранения (для обновлений)
 --
 SUBTAB Позиции;
   TRANS :ТББ_АМТКОРР_Т;
 ENDSUB;
 --
 CLOSEDMODFOB :BOOLEAN;
 CREATEDUSER    :STRING;
 MODIFIEDUSER   :STRING;
 UNIQUE "SYSKEY_CLC";
ENDTAB;

TABLE ТББ_АМТКОРР_Т = "Расчет-корректировка амортизации - таблица";
 R_HEAD   :ТББ_АМТКОРР_З; -- ссылка на заголовок
 R_ДАТА   :DATE;          -- дата проводки
 R_УЧЕТ   :BOOLEAN;       -- флаг проведения по учету
 R_SAVE   :INTEGER;       -- флаг сохранения
 --
 КОДНФА   :STRING;        -- код НФА
 НМННФА   :STRING;        -- наименование НФА
 ИНВНОМ   :STRING;        -- инвентарный номер
 УЧННОМ   :STRING;        -- учетный номер
 ДАТУЧТ   :DATE;          -- дата принятия к учету
 ДАТЭКС   :DATE;          -- дата ввода в эксплуатацию
 СРКНРМ   :STRING;        -- срок эксплутации - норма
 СРКФКТ   :STRING;        -- срок эксплутации - факт
 НОВОЕ_   :BOOLEAN;       -- новое имущество или было в эксплуатации
 БЛСУМY   :REAL;          -- балансовая сумма на начало года
 БЛСУМC   :REAL;          -- балансовая сумма на отчетную дату
 АМФКТY   :REAL;          -- начисленная амортизация факт   на начало года
 АМРЧТY   :REAL;          -- начисленная амортизация расчет на начало года
 АМКОРY   :REAL;          -- сумма корректировки амортизации на начало года
 АМФКТC   :REAL;          -- начисленная амортизация факт   на отчетную дату
 АМРЧТC   :REAL;          -- начисленная амортизация расчет на отчетную дату
 АМКОРC   :REAL;          -- сумма корректировки амортизации на отчетную дату
 РЕЗУЛ_   :INTEGER;       -- статус результата проверки 
 -- статус результата проверки может принимать значения (0 - не проверялась; 1 - запись проверена и сней все ОК; 2 - запись проверена и необходима правка; 3 - запись проверена и запись пропущена в результате ошибки или неполноты данных
 КБКПРВ   :STRING;        -- КБК проводки
 ДЕБПРY   :STRING;        -- дебет  проводки на начало года
 КРЕПРY   :STRING;        -- кредит проводки на начало года
 ДЕБПРC   :STRING;        -- дебет  проводки на отчетную дату
 КРЕПРC   :STRING;        -- кредит проводки на отчетную дату
 ПРИЧИН   :STRING;        -- метод исправления или описание ошибки (текст)
 STATE_   :INTEGER;       -- классификация типа записи для возможных исправления
 ИСКЛЮЧ   :BOOLEAN;       -- исключить строку (пользователь)
 TRANS_   :BOOLEAN;       -- позиция с проводкой
 ДОПАНА   :STRING;        -- дополнительная аналитика
 РЕЗFLD   :STRING;        -- резервное поле
  --
 CLOSEDMODFOB :BOOLEAN;
 CREATEDUSER    :STRING;
 MODIFIEDUSER   :STRING;
ENDTAB;