(1) что-то типо этого:
RS = CreateObject("ODBCRECORDSET");
ТекстЗапроса = "
SELECT
СпрТовары.Code [ТоварКод $Число]
FROM
WHERE
РегПродажи.DATE_TIME_IDDOC BETWEEN :НачДата AND :КонДата~
";
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший