Скорее всего, проблема заключается в технологии выполнения запросов в FoxPro. Дело в том, что сначала, еще ДО собственно выполнения запроса происходит формирование структуры выходного курсора. Того, куда будет записан результат выборки.

Чтобы это сделать, FoxPro берет "первые попавшиеся" записи из таблиц-источников, поля которых указаны в списке полей и выражений опции SELECT. На основании этих данных выполняется определение типов и размерностей полей. И вот здесь есть несколько "засад".

1. Функция Date() выдаст указанную ошибку, если один из параметров равен нулю


Откуда 0? Ну, вероятно, у Вас все-таки есть в таблице запись, в которой поле zhis.monthfor не заполнено. Пустое. Вот и получили сообщение об ошибке.

2. Размерность символьных полей определяется также по первому вычисленному значению. Это значит, что если первый попавшийся месяц - это, скажем, "Март", то будет сформировано поле размерностью в 4 символа. И название всех остальных месяцев будет "обрезано" до первых 4 символов.

=====================================================

Далее соображения "общего" плана.

Использовать функции, результат работы которых зависит от используемого модуля локализации, как минимум, не осторжно.

Результат работы функции CMONTH() напрямую зависит от того, какая библиотека локализации vfpXrenu.dll или vfpXrrus.dll использована. Если использована русская библиотека, то имена месяцев будут по русски, если английская - по английски. При этом, следует иметь в виду, что вероятность глюков и ошибок в локализованных библиотеках значительно выше, чем в англоязычной.

Поэтому, для подобных функций проще писать замену. Т.е. свои собственные функции, которые возвращают то, что требуется но всегда на нужном языке вне зависимости от используемой библиотеки. В данном случае, можно сделать такую функцию


Соответственно в запросе можно просто вызвать эту функцию

Это не обязательно ошибка данных. Это действительно особенность "нулевого" прогона Select-SQL. Просто, при определенных условиях (каких - не известно), в этом самом "нулевом" прогоне может использоваться фиктиная запись, значение всех полей у которой BLANK. Т.е. не заполнено.

Если интересно, то обсуждение этой особенности для VFP9 было здесь

http://forum.foxclub.ru/read.php?29,239391,page=1

Алексей Цингауз - это один из разработчиков VFP9. "Лечение" в том и заключается, что всегда предполагать возможность существования подобной записи. Функция EVL() собственно и заменяет пустое значение на указанное во втором параметре.