0 / 0 / 0
Регистрация: 25.05.2010
Сообщений: 22

помогитееее, глупая ошибка, но не могу выявить причину

29.05.2010, 01:52. Показов 11453. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Помогите пожалуйста, при проводке Начисления зарплаты у меня вылезает ошибка Преобразование значения к типу Число не может быть выполнено


Код ( (Unknown Language)):
Процедура РасчитатьНачисления(НаборЗаписейРегистра , ТребуемыйВидРасчета, СписокПерсонала) Экспорт
Регистратор=НаборЗаписейРегистра.Отбор.Р егистратор.Значение;
//Рассчитать первичные записи
Если ТребуемыйВидРасчета=ПланыВидовРасчета.Ви дыНачислений.Оклад тогда

Запрос=Новый Запрос;
Запрос.Текст=
"Выбрать
|НачисленияДанныеГрафика.ЗначениеПериодД ействия КАК Норма,
|НачисленияДанныеГрафика.ЗначениеФактиче скийПериодДействия КАК Факт,
| НачисленияДанныеГрафика.НомерСтроки КАК НомерСтроки
|ИЗ
| РегистрРасчета.Начисления.ДанныеГрафика( Регистратор=&Регистратор И
| ВидРасчета=&ВидРасчета И
| Персонал В(&СписокПерсонала))
| Как НачисленияДанныеГрафика";

Запрос.УстановитьПараметр("Регистратор", НаборЗаписейРегистра.Отбор.Регистратор.З начение);
Запрос.УстановитьПараметр("ВидРасчета",Т ребуемыйВидРасчета);
Запрос.УстановитьПараметр("СписокПерсона ла", СписокПерсонала);
ВыборкаРезультата=Запрос.Выполнить().Выб рать();
Для Каждого ЗаписьРегистра Из НаборЗаписейРегистра Цикл
СтруктураНомер=Новый Структура("НомерСтроки");
СтруктураНомер.НомерСтроки=ЗаписьРегистр а.НомерСтроки;
ВыборкаРезультата.Сбросить();
Если ВыборкаРезультата.НайтиСледующий(Структу раНомер) тогда
Если ВыборкаРезультата.Норма=0 тогда
Сообщить("ВидРасчета:Оклад-Нет Рабочих дней в заданном периоде",);
ЗаписьРегистра.Результат=0;
Иначе
//Рассчитать оклад по фактическому периоду и исходным данным
ЗаписьРегистра.Результат =(ЗаписьРегистра.ИсходныеДанные/ВыборкаРезультата.Норма)*ВыборкаРезульта та.Факт; //<-------------------------тут ошибка-------------
Сообщить("Выполнен расчет"+ЗаписьРегистра.Регистратор+"-"+ ЗаписьРегистра.ВидРасчета+"-"+ЗаписьРегистра.Персонал,);
КонецЕсли;
КонецЕсли;
КонецЦикла;


//Рассчитать вторичные записи
иначеЕсли ТребуемыйВидРасчета=ПланыВидовРасчета.Ви дыНачислений.Премия тогда
Запрос= Новый Запрос;
Запрос.Текст =
"Выбрать
| НачисленияБазаНачисления.РезультатБаза КАК База,
| НачисленияБазаНачисления.НомерСтроки КАК НомерСтроки
|ИЗ
| РегистрРасчета.Начисления.БазаНачисления (&ИзмеренияОсновного,
| &ИзмеренияБазового,,
| Регистратор=&Регистратор И
| ВидРасчета=&ВидРасчета И
| Персонал В(&СписокПерсонала))
| КАК НачисленияБазаНачисления";

Измер = Новый Массив(1);
Измер[0]="Персонал";
Запрос.УстановитьПараметр("ИзмеренияОсно вного", Измер);
Запрос.УстановитьПараметр("ИзмеренияБазо вого", Измер);
Запрос.УстановитьПараметр("Регистратор", Регистратор);
Запрос.УстановитьПараметр("ВидРасчета", ТребуемыйВидРасчета);
Запрос.УстановитьПараметр("СписокПерсона ла", СписокПерсонала);
ВыборкаРезультата=Запрос.Выполнить().Выб рать();
Для Каждого ЗаписьРегистра Из НаборЗаписейРегистра Цикл
СтруктураНомер=Новый Структура("НомерСтроки");
СтруктураНомер.НомерСтроки=ЗаписьРегистр а.НомерСтроки;
ВыборкаРезультата.Сбросить();
Если ВыборкаРезультата.НайтиСледующий(Структу раНомер) тогда
ЗаписьРегистра.Результат=ВыборкаРезульта та.База*(10/100);
Сообщить("Выполнен расчет"+ЗаписьРегистра.Регистратор+"-"+ЗаписьРегистра.ВидРасчета+"-"+ЗаписьРегистра.Персонал,);
КонецЕсли;
КонецЦикла;
КонецЕсли;
КонецПроцедуры
Ошибка в ВыборкаРезультата.Норма и ВыборкаРезультата.Факт, Работаю по Родченко
мне кажеться что ошибка не от туда идёт, ао этому выложил бызу (она очень маленькая) очень надо помогите, пожалуйста
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
29.05.2010, 01:52
Ответы с готовыми решениями:

Работа со списками. В чем такая глупая ошибка не могу найти?
В чем такая глупая ошибка не могу найти? program sp; type {Тип основных данных.} TElem=real; n=^L1; L1 = record ...

Как выявить причину исчезновения соединения
У меня adsl линия В последнее время когда захожу на определенные сайты с ноутбука (в т.ч мобильный телефон) выбивает из вайфая и...

Как выявить причину ошибки рендеринга?
Создал TableLayout. Начал заполнять ячейки. где0то перемудрил. Выдается ошибка (см ниже). Не отображается форма. Как быть, где поправить? ...

1
0 / 0 / 0
Регистрация: 25.05.2010
Сообщений: 22
29.05.2010, 11:22
всё, ошибка найдена. График работы и график выдачи зарплаты не совпадал
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
29.05.2010, 11:22
Помогаю со студенческими работами здесь

Зависание намертво. Как выявить причину?
Доброго времени суток Проблема - зависание компьютера. Симптомы всегда одинаковые: зависание &quot;насмерть&quot; - изображение...

Как выявить причину в домашних условиях?
Проблема в том, что с недавнего времени начал тормозить комп при игре( фифа 11) и просмотре видео... Винду менял(поставил на новый...

Помогите разобраться. Нужно выявить причину игнора.
Всем привет. Сегодня не выдержал и решил написать уже Вам.) В общем ситуация такова. Есть сайт: http://svadba-tambov.ru/ До...

Ошибка в коде, не могу понять причину
Ошибка в строчке 67: 'p.MESWERT::getEinheit' does not have class type. В чем причина? #include &lt;cassert&gt; #include &lt;iostream&gt; ...

глупая задача, никак въехать не могу
Постараюсь вспомнить корректное условие.... Есть n людей, и у каждого человека есть m номер, по введенному номеру он отсеивает этого...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

Новые блоги и статьи
Логирование в C# ASP.NET Core с помощью Serilog, ElasticSearch, Kibana
stackOverflow 25.04.2025
Помните те времена, когда для анализа проблемы приходилось подключаться к серверу, искать нужный лог-файл среди десятков других и вручную фильтровать тысячи строк в поисках ошибки? К счастью, эти дни. . .
Полностью асинхронный счётчик на логике (сумматорах) трёх состояний и асинхронных регистрах трёх состояний. Структура "электронный Buttom Up"
Hrethgir 25.04.2025
Программа для симуляции схемы - Logisim Evolution В общем какое-то время отвлёкся, так было надо, теперь когда запилю это на verilog и FPGA , досоставлю заявку в ФИПС на полезную модель - не готов. . .
Автоматизация Amazon Web Services (AWS) с Boto3 в Python
py-thonny 25.04.2025
Облачные вычисления стали неотъемлемой частью современной ИТ-инфраструктуры, а Amazon Web Services (AWS) занимает лидирующие позиции среди провайдеров облачных услуг. Управление многочисленными. . .
Apache Kafka vs RabbitMQ в микросервисной архитектуре
ArchitectMsa 25.04.2025
Современная разработка ПО всё чаще склоняется к микросервисной архитектуре — подходу, при котором приложение разбивается на множество небольших, автономных сервисов. В этой распределённой среде. . .
Параллельное программирование с OpenMP в C++
NullReferenced 24.04.2025
Параллельное программирование — подход к созданию программ, когда одна задача разбивается на несколько подзадач, которые могут выполняться одновременно. Оно стало необходимым навыком для. . .
Цепочки методов в C# с Fluent API
UnmanagedCoder 24.04.2025
Современное программирование — это не только решение функциональных задач, но и создание кода, который удобно поддерживать, расширять и читать. Цепочки методов и Fluent-синтаксис в C# стали мощным. . .
Мульти-тенантные БД с PostgreSQL Row Security
Codd 23.04.2025
Современные облачные сервисы и бизнес-приложения всё чаще обслуживают множество клиентов в рамках единой программной инфраструктуры. Эта архитектурная модель, известная как мульти-тенантность, стала. . .
Реализация конвейеров машинного обучения с Python и Scikit-learn
AI_Generated 23.04.2025
Мир данных вокруг нас растёт с каждым днём, и умение эффективно обрабатывать информацию стало необходимым навыком. Специалисты по машинному обучению ежедневно сталкиваются с задачами предобработки. . .
Контроллеры Kubernetes Ingress: Сравнительный анализ
Mr. Docker 23.04.2025
В Kubernetes управление входящим трафиком представляет собой одну из ключевых задач при построении масштабируемых и отказоустойчивых приложений. Ingress — это API-объект, который служит вратами. . .
Оптимизация кода Python с Cython и Numba
py-thonny 23.04.2025
Python прочно обосновался в топе языков программирования благодаря своей простоте и гибкости. Разработчики любят его за читабельность кода и богатую экосистему библиотек. Но у этой медали есть и. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru