Проверка ИНН Сотрудников России

24.02.10

Учетные задачи - Зарплата

Проверка ИНН Сотрудников
	 Функция ОстатокОтДеления(Делимое, Делитель);
  
    Возврат Делимое - Делитель * Цел(Делимое / Делитель);
  
КонецФункции

Процедура ПроверкаИНН(ВходИНН)
  
    Перем МассИНН[12];
    Перем ДляРасчета[11];
    Перем Сумма_;
    Перем Остаток;
    Перем Флаг;
    Флаг = 0;
  
    Для Сч = 1 По 12 Цикл
        МассИНН[Сч] = 0;
        Если Сч < 12 Тогда
            ДляРасчета[Сч] = 0;
        КонецЕсли;
        МассИНН[Сч] = Число(Сред(ВходИНН, Сч, 1));
    КонецЦикла;
    ДляРасчета[1]    = МассИНН[1]    * 7;
    ДляРасчета[2]    = МассИНН[2]    * 2;
    ДляРасчета[3]    = МассИНН[3]    * 4;
    ДляРасчета[4]    = МассИНН[4]    * 10;
    ДляРасчета[5]    = МассИНН[5]    * 3;
    ДляРасчета[6]    = МассИНН[6]    * 5;
    ДляРасчета[7]    = МассИНН[7]    * 9;
    ДляРасчета[8]    = МассИНН[8]    * 4;
    ДляРасчета[9]    = МассИНН[9]    * 6;
    ДляРасчета[10]    = МассИНН[10]    * 8;
    Сумма_ = 0;
    Для Сч = 1 По 10 Цикл
        Сумма_ = Сумма_ + ДляРасчета[Сч];
    КонецЦикла;
    Остаток = ОстатокОтДеления(Сумма_, 11);
    Если Остаток = 10 Тогда
        Остаток = 0;
    КонецЕсли;
    Если Остаток = МассИНН[11] Тогда
        Флаг = 1;
    Иначе
        Сообщить("ИНН не верен! Исправьте! (первая контрольная цифра не верна)");
        Возврат ;
    КонецЕсли;
    Если Флаг = 1 Тогда
        ДляРасчета[1]    = МассИНН[1]    * 3;
        ДляРасчета[2]    = МассИНН[2]    * 7;
        ДляРасчета[3]    = МассИНН[3]    * 2;
        ДляРасчета[4]    = МассИНН[4]    * 4;
        ДляРасчета[5]    = МассИНН[5]    * 10;
        ДляРасчета[6]    = МассИНН[6]    * 3;
        ДляРасчета[7]    = МассИНН[7]    * 5;
        ДляРасчета[8]    = МассИНН[8]    * 9;
        ДляРасчета[9]    = МассИНН[9]    * 4;
        ДляРасчета[10]    = МассИНН[10]    * 6;
        ДляРасчета[11]    = МассИНН[11]    * 8;
        Сумма_ = 0;
        Для Сч = 1 По 11 Цикл
            Сумма_ = Сумма_ + ДляРасчета[Сч];
        КонецЦикла;
        Остаток = ОстатокОтДеления(Сумма_, 11);
        Если Остаток = 10 Тогда
            Остаток = 0;
        КонецЕсли;
        Если Остаток = МассИНН[12] Тогда
            Предупреждение("ИНН верен!");
        Иначе
            Сообщить("ИНН не верен! Исправьте! (вторая контрольная цифра не верна)");
        КонецЕсли;
    КонецЕсли;
  
КонецПроцедуры

См. также

Зарплата Перенос данных 1C Программист Бухгалтер Бухгалтерский учет 7.7 Сложные периодические расчеты 1С:Бухгалтерия 7.7 1С:Зарплата и Управление Персоналом 3.x Россия Бухгалтерский учет Платные (руб)

Как известно, Бухгалтерия 7.7 не имеет штатной возможности для обмена с ЗУП 3.1. Данная разработка пригодится тем, кто перешел с ЗиК 2.3 на ЗУП 3.1, но вынужден по каким-то своим причинам оставаться на Бухгалтерии 7.7.

18000 руб.

29.09.2020    13772    2    0    

5

Рабочее место Учет рабочего времени Кадровый учет Бухгалтер Руководитель проекта Платформа 1С v7.7 Конфигурации 1cv7 Управленческий учет Абонемент ($m)

Данное решение предназначено для упрощенного варианта электронного учёта рабочего времени сотрудников предприятия. Печать титульного листа и таблицы табеля учёта рабочего времени. Печать бейджиков сотрудников. Автоматическая регистрация и расчет рабочего времени по штрих-коду сотрудника. Загрузка сотрудников из справочника. Формирование штрих-кода сотрудника. Совместимо с любой конфигурацией 1С:7.7.

5 стартмани

13.12.2017    30669    17    etmarket    5    

5

Универсальные функции Программист Платформа 1С v7.7 Платформа 1С v8.3 Конфигурации 1cv8 Конфигурации 1cv7 Абонемент ($m)

Я очень часто использую группировку данных по полю и полям, как в восьмерке, так и в семерке. Это аналог запроса Итоги, но там строится дерево, а в большинстве случаев нужны "плоские данные". Да и делать запрос в большинстве случаев более накладный процесс, чем работа с ТЗ. Все достоинства такого подхода приведены на примере метода универсального списания по париям, а так же отбора строк в ТЗ по произвольному условию. Для 7.7 еще отчеты сравнения двух ТЗ. Работая с различными базами для упрощения сравнения номенклатуры, или как аналог джойнов(join), сделал сравнение двух таблиц значений по нескольким полям. Пока группировки полей должны быть уникальны. Часто приходится искать дубли, для универсального поиска есть ДублиВТзПоПолю и пример в Тест.ert.

1 стартмани

25.06.2015    39517    4    Serginio    4    

4

Кадровый учет Системный администратор Программист Бухгалтер Расчет 7.7 1С:Зарплата и кадры 7.7 Россия Бухгалтерский учет Налоговый учет Управленческий учет Бесплатно (free)

ЗиК 7.7 постепенно сходит на нет. Но, возможно, кому-то из нас все-таки когда-либо еще не раз придется столкнуться с этой конфигурацией. Поскольку работы по ней и заказов всё меньше и меньше, знания о ней и опыт постепенно угасают. Мой опыт с ЗиК 7.7 длиной в 14 лет терять просто так неохота. В этой статье я запишу, чтобы не забыть, важные моменты об этой конфигурации, чтобы самому не забыть, и вдруг кто-то получит это в наследство на сопровождение и будет вынужден (иначе не скажешь) это обслуживать. Или еще можно рассматривать эту статью как модное нынче «Письмо самому себе в прошлое».

18.11.2014    44025    Lapitskiy    26    

55

Зарплата Бухгалтер Бухгалтерский учет 7.7 1С:Бухгалтерия 7.7 Украина Бухгалтерский учет НДФЛ Абонемент ($m)

Просто запустим обработку. Файл "СтавкиНалоговЗарплата2014.ert" - выполнить.

1 стартмани

22.01.2014    28599    2    kompas-dm    1    

1

Зарплата Бухгалтер Бухгалтерский учет 7.7 1С:Бухгалтерия 7.7 1С:Производство+Услуги+Бухгалтерия 1С:Упрощенное налогообложение 7.7 Россия Бухгалтерский учет ФОМС, ЕФС Платные (руб)

Новая справка для расчета пособий по временной нетрудоспособности в соответствии с приказом Министерства труда и социальной защиты № 182Н от 30.04.2013 года (учитывая изменения вплоть до 2017 года). Справку необходимо выдавать на руки при увольнении сотрудника. Может помочь при расчете среднего заработка при нетрудоспособности сотрудников. Будет незаменимым помощником для бухгалтеров, осуществляющих расчеты по заработной плате, при отсутствии специализированной программы.

2000 руб.

03.08.2013    81782    31    21    

39

Регламентированный учет и отчетность Зарплата Бухгалтер Расчет 7.7 1С:Зарплата и кадры 7.7 Россия Бухгалтерский учет ФОМС, ЕФС Абонемент ($m)

При подготовке к сдаче отчета в ПФР столкнулся с тем, что программа не учитывает переплату - не распределяет сумму уплаченных взносов, превышающую начисленную, даже если это оплата проходит в январе 2013 за декабрь 2012. В случае, когда есть долг по оплате на начало периода (например, за декабрь 2012 платят в январе 2013) сумма уплаченных взносов может быть больше суммы начисленных. Программа же ставит сумму уплаченных взносов равную сумме начисленных. В этой обработке распределяются суммы уплаченных взносов, превышающих начисленные, а так же внесены исправления, связанные с возможными ошибками при формировании штатной обработки из 335 релиза (в пачки попадали ненужные уволенные, неправильно распределялись уплаты взносов, при выгрузке в файл возникали ошибки).

1 стартмани

20.04.2013    31142    425    mirrr    65    

41
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. wondermaker 24.02.10 10:34 Сейчас в теме
Это Украина или Россия :) ?
2. Andrew_flyer 84 24.02.10 17:12 Сейчас в теме
3. ArCtic 3 24.02.10 17:20 Сейчас в теме
4. v_id 106 19.04.10 22:02 Сейчас в теме
Функция ОстатокОтДеления(Делимое, Делитель);

Возврат Делимое - Делитель * Цел(Делимое / Делитель);

КонецФункции


Можно (нужно?) проще. Для примера набери в табло 101%10 - сам поймешь. В типовых часто используется.
Оставьте свое сообщение