Как узнать предыдущий репрокод?

Многие пользователи DairyComp 305 задают вопрос: как узнать предыдущий репрокод животного?

Сегодняшний пост посвящён именно этой теме.

Для решения задачи нам потребуется 3 дополнительных пункта:
PRC – 1 тип – предыдущий репрокод
CRC – 1 тип – вспомогательная переменная для расчёта PRC
PRPRO – 65 тип, 9 таблица – описание каждой переменной PRC, аналогичное описанию репродуктивных кодов животных:
0 – ERROR
1 – БРАК
2 – НОВОТЕЛ
3 – ЯЛОВАЯ
4 – ОСЕМЕН
5 – СТЕЛН
6 – СУХОСТ
7 – ВЫБЫЛО
8 – БЫК

После создания пунктов необходимо создать команду PRCCAL в меню alter3, определив её следующим образом:
PRC=CRC FOR PRC<>CRC RC<>CRCL!CRC=RC FOR RC<>CRC
Команда готова. Осталось вставить её в планировщик DairyComp (меню alter6) с интервалом выполнения каждые 3 часа. Таким образом, мы обеспечим обновление параметра PRC каждые 3 часа.

Последний шаг – добавить в определение событий (alter9) во все события, которые вы используете для выбытия животных (sold, died, emcull), конструкцию PRC=RC в начало команды,чтобы получилось следующее
ENTER PRC=RC EC=14 EDAY CAR

Рассмотрим пример.
1. Вводим корове отел. Коды определятся следующим образом: RC=2 CRC=2 PRC=6
2. Вводим осеменение. RC=4 CRC=4 PRC=2
3. Вводим событие БРАК. RC=1 CRC=1 PRC=4
4. Вводим осеменение. RC=4 CRC=4 PRC=1
5. Вводим событие Яловая. RC=3 CRC=3 PRC=4