По категориям - выкладываю на общественную проверку фрагмент кода с тарифами персучёта-2012:
Пояснения: CatCode - код категории ЗЛ (один или несколько в строке), SZVTarifVznosov - тариф взносов (в виде десятичной дроби) суммарно на страховую и накопительную часть.
Это используется для проверки базы за 2012 год. Превышение 512 т. р. в персучёте отражаться не должно. Единственное - заменю ошибку предупреждением, чтобы не было заворотов из-за ошибок округлений.
Моряков (ЧЭС) не обрабатываю, т. к. по ним, насколько я понимаю изменения в 192п, указываются только начисленные (вернее, эквивалентные) суммы.
Всё остальное оставляю как есть - больше из алгоритмов для целей программы ничего не меняется.
Код:
if (CatCode = 'НР') or (CatCode = 'ВЖНР') or (CatCode = 'ВПНР') then SZVTarifVznosov := 0.22 else if (CatCode = 'ИНЖУ') or (CatCode = 'ВЖИЖ') or (CatCode = 'ВПИЖ') then SZVTarifVznosov := 0.22 else if (CatCode = 'СМИ') or (CatCode = 'ВЖСИ') or (CatCode = 'ВПСИ') then SZVTarifVznosov := 0.208 else if (CatCode = 'ООИ') or (CatCode = 'ВЖОИ') or (CatCode = 'ВПОИ') then SZVTarifVznosov := 0.16 else if (CatCode = 'СХ') or (CatCode = 'ВЖСХ') or (CatCode = 'ВПСХ') then SZVTarifVznosov := 0.16 else if (CatCode = 'ХМН') or (CatCode = 'ВЖМН') or (CatCode = 'ВПМН') then SZVTarifVznosov := 0.16 else if (CatCode = 'ЕСХН') or (CatCode = 'ВЖЕН') or (CatCode = 'ВПЕН') then SZVTarifVznosov := 0.16 else if (CatCode = 'ТВЭЗ') or (CatCode = 'ВЖТЗ') or (CatCode = 'ВПТЗ') then SZVTarifVznosov := 0.08 else if (CatCode = 'ХО') or (CatCode = 'ВЖХО') or (CatCode = 'ВПХО') then SZVTarifVznosov := 0.08 else if (CatCode = 'ОДИТ') or (CatCode = 'ВЖИТ') or (CatCode = 'ВПИТ') then SZVTarifVznosov := 0.08 else if (CatCode = 'ПНЭД') or (CatCode = 'ВЖЭД') or (CatCode = 'ВПЭД') then SZVTarifVznosov := 0.2 else if (CatCode = 'АСБ') or (CatCode = 'ВЖСБ') or (CatCode = 'ВПСБ') then SZVTarifVznosov := 0.2 else if (CatCode = 'ИЦС') or (CatCode = 'ВЖЦС') or (CatCode = 'ВПЦС') then SZVTarifVznosov := 0.14 // ЧЭС/ ВЖЭС/ ВПЭС не обрабатываем
Это используется для проверки базы за 2012 год. Превышение 512 т. р. в персучёте отражаться не должно. Единственное - заменю ошибку предупреждением, чтобы не было заворотов из-за ошибок округлений.
Моряков (ЧЭС) не обрабатываю, т. к. по ним, насколько я понимаю изменения в 192п, указываются только начисленные (вернее, эквивалентные) суммы.
Всё остальное оставляю как есть - больше из алгоритмов для целей программы ничего не меняется.
Комментарий