1. Роман прав, CalcFields - свойство DataItem, где можно перечислить поля, которые надо посчитать принудительно. Попробуйте, выкинув код из OnBeforeExportRecord
2. ошибка в том, что надо было рассчитанные значения в выгружаемую переменную-то вернуть...
<div class='CALtop'>C/AL</div><div class='CAL'>rItem.CALCFIELDS... <- посчитали в пустоту
Item := rItem; <- надо добавить, если не обращать внимания на п.1</div>