"в 496 это не исправлено !!!<br><br><br>решение заменить кусок :<br><br>Функция глНомерШкалыСтраховыхВзносовПФР(ФизЛицо, ДатаОпределения = '31.12.2004') Экспорт<br> <br> ДатаРождения = ФизЛицо.ФизЛицо.ДатаРождения;<br> Если ПустоеЗначение(ДатаРождения) = 1 Тогда<br> Возврат -1<br> ИначеЕсли ДатаРождения >= РабочаяДата() Тогда<br> Возврат -2<br> Иначе<br> ГодРождения = ДатаГод(ДатаРождения)<br> КонецЕсли;<br> <br> Пол = ВРег(Строка(ФизЛицо.ФизЛицо.Пол));<br> Если ПустоеЗначение(Пол) = 1 Тогда<br> Возврат -1<br> КонецЕсли;<br> <br> Если Найти(Пол,"М") > 0 Тогда // мужчины<br> глСообщениеТрассировки(глСообщенияТрассировки, "Физическое лицо _П01 является мужчиной "+ГодРождения+" года рождения", 0, 0, ФизЛицо);<br> Если ГодРождения < 1953 Тогда<br> Возврат 1<br> ИначеЕсли ГодРождения < 1967 Тогда<br> Возврат 2<br> Иначе<br> Возврат 3<br> КонецЕсли;<br> ИначеЕсли Найти(Пол,"Ж") > 0 Тогда // женщины<br> глСообщениеТрассировки(глСообщенияТрассировки, "Физическое лицо _П01 является женщиной "+ГодРождения+" года рождения", 0, 0, ФизЛицо);<br> Если ГодРождения < 1957 Тогда<br> Возврат 1<br> ИначеЕсли ГодРождения < 1967 Тогда<br> Возврат 2<br> Иначе<br> Возврат 3<br> КонецЕсли;<br> КонецЕсли;<br> <br> Возврат -1<br> <br>КонецФункции // глНомерШкалыСтраховыхВзносовПФР()<br><br><br>на следующий кусок :<br><br>Функция глНомерШкалыСтраховыхВзносовПФР(ФизЛицо, ДатаОпределения = '31.12.2004') Экспорт<br> <br> ДатаРождения = ФизЛицо.ДатаРождения;<br> Если ПустоеЗначение(ДатаРождения) = 1 Тогда<br> Возврат -1<br> ИначеЕсли ДатаРождения >= РабочаяДата() Тогда<br> Возврат -2<br> Иначе<br> ГодРождения = ДатаГод(ДатаРождения)<br> КонецЕсли;<br> <br> Пол = ВРег(Строка(ФизЛицо.Пол));<br> Если ПустоеЗначение(Пол) = 1 Тогда<br> Возврат -1<br> КонецЕсли;<br> <br> Если Найти(Пол,"М") > 0 Тогда // мужчины<br> глСообщениеТрассировки(глСообщенияТрассировки, "Физическое лицо _П01 является мужчиной "+ГодРождения+" года рождения", 0, 0, ФизЛицо);<br> Если ГодРождения < 1953 Тогда<br> Возврат 1<br> ИначеЕсли ГодРождения < 1967 Тогда<br> Возврат 2<br> Иначе<br> Возврат 3<br> КонецЕсли;<br> ИначеЕсли Найти(Пол,"Ж") > 0 Тогда // женщины<br> глСообщениеТрассировки(глСообщенияТрассировки, "Физическое лицо _П01 является женщиной "+ГодРождения+" года рождения", 0, 0, ФизЛицо);<br> Если ГодРождения < 1957 Тогда<br> Возврат 1<br> ИначеЕсли ГодРождения < 1967 Тогда<br> Возврат 2<br> Иначе<br> Возврат 3<br> КонецЕсли;<br> КонецЕсли;<br> <br> Возврат -1<br> <br>КонецФункции // глНомерШкалыСтраховыхВзносовПФР()<br>"