Версия ИРБИС 32 2010.1

По служебному случаю возникла необходимость в корректировке 8 тысяч записей. База данных однообразна - каждая запись содержит 800 полей, каждая из 4 подполей с одинаковыми идентификаторами. Стоит задача пройтись по ним, и если подполе ^C не пустое, то перезаписать его. Вручную вбивать 800 полей в твп файл нудно, как можно обойтись меньшей кровью?

Хотел сделать что-то типа

* 1 mpl,if p(v*^C) then v*^C else '' fi

по старой памяти из других языков программирования, но к сожалению в документации такого не нашёл. Хотя при моей внимательности, не удивлюсь, что я там пропустил при чтении несколько строк...



Редактировано 1 раз. Последний раз 23.11.2017 14:28 пользователем Алексей Артемьев.

Вам лучше воспользоваться глобальной корректировкой. Использовать ТВП нецелесообразно - писать больше (необходимо учесть все используемые поля), чем вбить 800 полей.

woodyfon написал(а):
-------------------------------------------------------
> Вам лучше воспользоваться глобальной
> корректировкой. Использовать ТВП нецелесообразно -
> писать больше (необходимо учесть все используемые
> поля), чем вбить 800 полей.

Если честно, не увидел между ними разницы... Кроме наличия итератора. Я догадался только, что можно использовать CORREC вкупе с NEWMFN, но дальше застопорился. CORREC - потому что текущая запись записывается в модальное поле 1001, но вот что бы записать результат обратно в поле, надо опять же явно указать его номер. А номеров-то 800 с лишним =) Как быть?



Редактировано 1 раз. Последний раз 23.11.2017 08:42 пользователем Алексей Артемьев.

Не поняла - зачем вам CORREC? Вым надо откорректирвать сами записи, а не какие-то другие связанные записи. Запустили все записи на корр-ку и добавляйте что вам нужно.