1
2
3
4
5
..6
Показывать по
10
20
40
сообщений
Новая тема
Ответить
Николай Иванов
активный пользователь
офлайн
Дата регистрации: 13.04.2017
Сообщений: 31
Здравствуйте. Используется последний релиз Зарплата и управление персоналом КОРП, редакция 2.5 (2.5.184.1). Платформа 1С:Предприятие 8.3 (8.3.18.1289).
Формируется регламентный отчет «Расчет по страховым взносам» за 1-й квартал 2023 г.. Отчет формируется по новой форме, ошибок не возникает. Но при попытке заполнить отчет по соответствующей кнопке возникает ошибка «Во время заполнения отчета произошла ошибка: Ошибка при вызове метода контекста (Выполнить)». Никакой дополнительной информации не указывается, в журнале регистрации также никакой информации по ошибке нет. В отладчике видно, что ошибка возникает в процедуре “РасчетПоказателей_РСВ_2023», на этапе выполнения запроса, когда обрабатывается свойство «ЧисленностьЗастрахованныхВРазрезеТарифов2023». Отследить детально сложно, одно из подозрений, что не заполнены какие-то справочные данные, хотя вроде как тарифы заполнены.
Возможно нужно сделать какие-то дополнительные настройки для выполнения этого отчета, но какие – непонятно.
Может быть, кто-то сталкивался с этой ошибкой, подскажите пожалуйста пути решения. Или же, может быть, это ошибка релиза?
gvf
активный пользователь
офлайн
Дата регистрации: 10.04.2023
Сообщений: 5
Николай Иванов,
Проблема в общем модуле «ЗаполнениеРегламентированнойОтчетности» процедуре «РасчетПоказателей_РСВ_2023»
в этом коде (здесь ничего не отбирается):
|ОБЪЕДИНИТЬ ВСЕ
|
|ВЫБРАТЬ
| ЗНАЧЕНИЕ(Перечисление.ТарифыСтраховыхВзносов.ОрганизацииЗанимающиесяОбщепитом),
| Доходы.Период,
| Доходы.ФизЛицо
|ИЗ
| ВТЗастрахованныеЛицаОрганизации КАК Доходы
| ЛЕВОЕ СОЕДИНЕНИЕ ВТВидыТарифныхСтавокОрганизаций КАК ВидыТарифныхСтавокОрганизаций
| ПО Доходы.Период = ВидыТарифныхСтавокОрганизаций.Период
|ГДЕ
| Доходы.ЗастрахованПФР
| И ЕСТЬNULL(ВидыТарифныхСтавокОрганизаций.ВидТарифаСтраховыхВзносов, ЗНАЧЕНИЕ(Перечисление.ТарифыСтраховыхВзносов.ОбщийНалоговыйРежим)) = ЗНАЧЕНИЕ(Перечисление.ТарифыСтраховыхВзносов.ОрганизацииЗанимающиесяОбщепитом)
| И Доходы.ВидТарифаСтраховыхВзносов В (ЗНАЧЕНИЕ(Перечисление.ТарифыСтраховыхВзносов.ОрганизацииЗанимающиесяОбщепитом), ЗНАЧЕНИЕ(Перечисление.ТарифыСтраховыхВзносов.ОбщийНалоговыйРежим))
и этом (обращение к «КодыТарифов», похоже нет соединения с временной таблицей):
|////////////////////////////////////////////////////////////////////////////////
|ВЫБРАТЬ РАЗЛИЧНЫЕ
| ЗастрахованныеНаОПС.ВидТарифаСтраховыхВзносов КАК ВидТарифаСтраховыхВзносов,
| ЕСТЬNULL(КодыТарифов.Код, «»??»») КАК КодТарифа,
| МЕСЯЦ(ЗастрахованныеНаОПС.Период) КАК Период,
| ЗастрахованныеНаОПС.ФизЛицо КАК ФизЛицо,
| 1 КАК КоличествоОПС
|ПОМЕСТИТЬ ВТЗастрахованныеПоМесяцам
|ИЗ
| ВТЗастрахованныеНаОПС КАК ЗастрахованныеНаОПС»;
И еще в форме «ФормаОтчета2023Кв1» самого отчета процедуре «ФормаОтчета2023Кв1» (цикл по неопределенно) в э
том коде;
Для Каждого ДопСтрока Из ДопСтрокСтраницы Цикл
СвойстваМнЧУровня2 = СвойстваМногострочныхЧастей.Найти(ДопСтрока.Ключ, «ИД»);
Если СвойстваМнЧУровня2 <> Неопределено Тогда
СвойстваМнЧУровня2.ТекущееКоличествоСтрок = 0;
КонецЕсли;
КонецЦикла;
gvf
активный пользователь
офлайн
Дата регистрации: 10.04.2023
Сообщений: 5
Николай Иванов,
* И еще в форме «ФормаОтчета2023Кв1» самого отчета процедуре «ЗаполнитьАвто» (цикл по неопределенно) в э
том коде;
Николай Иванов
активный пользователь
офлайн
Дата регистрации: 13.04.2017
Сообщений: 31
gvf,
Спасибо большое, эту процедуру и имел ввиду, что ошибка возникает в этой процедуре. И что-то были сомнения на строчку запроса
| ЕСТЬNULL(КодыТарифов.Код, «»??»») КАК КодТарифа,
— возможно, не прав, но это обращение к временной таблице, а поля там возможно нет такого, хотя в процедуре много временных таблиц, возможно и ошибаюсь.
А варианты исправления Вы не знаете случайно или ждать обновление/исправления от 1С?
gvf
активный пользователь
офлайн
Дата регистрации: 10.04.2023
Сообщений: 5
Николай Иванов,
«А варианты исправления Вы не знаете случайно или ждать обновление/исправления от 1С?»
Не знаю можно ли здесь писать варианты исправления, для этого нужно понимать суть происходящего в отчете (чего я не знаю).
В запросе с этим кодом «| ЕСТЬNULL(КодыТарифов.Код, «»??»») КАК КодТарифа,» , если смотреть на предыдущий код в этой же процедуре не хватает соединения с ВТ «ВТКодыТарифов»
NadinPr
активный пользователь
офлайн
Дата регистрации: 26.03.2012
Сообщений: 9
gvf, спасибо тебе, добрый человек! сэкономил массу времени
NadinPr
активный пользователь
офлайн
Дата регистрации: 26.03.2012
Сообщений: 9
Николай Иванов, как уже сказано выше, необходимо найти кусок кода и подправить, а потом уже можно ждать у
моря погоды
обновление:
1.общий модуль — заполнениеРегламентированнойОтчетности — РасчетПоказателей_РСВ_2023
поискать строку ВТЗастрахованныеНаОПС КАК ЗастрахованныеНаОПС
добавить туда кусок кода:
|////////////////////////////////////////////////////////////////////////////////
|ВЫБРАТЬ РАЗЛИЧНЫЕ
| ЗастрахованныеНаОПС.ВидТарифаСтраховыхВзносов КАК ВидТарифаСтраховыхВзносов,
| ЕСТЬNULL(КодыТарифов.Код, «»??»») КАК КодТарифа,
| МЕСЯЦ(ЗастрахованныеНаОПС.Период) КАК Период,
| ЗастрахованныеНаОПС.ФизЛицо КАК ФизЛицо,
| 1 КАК КоличествоОПС
|ПОМЕСТИТЬ ВТЗастрахованныеПоМесяцам
|ИЗ
| ВТЗастрахованныеНаОПС КАК ЗастрахованныеНаОПС
//Вставлено 12 апреля 2023
| ЛЕВОЕ СОЕДИНЕНИЕ ВТКодыТарифов КАК КодыТарифов
| ПО ЗастрахованныеНаОПС.ВидТарифаСтраховыхВзносов = КодыТарифов.ВидТарифаСтраховыхВзносов
| И (ГОД(ЗастрахованныеНаОПС.Период) МЕЖДУ КодыТарифов.ГодС И КодыТарифов.ГодПо)
//Вставлено 12 апреля 2023
2. отчеты — РегламентированныйОтчетРасчетПоСтраховымВзносам — ФормаОтчета2023Кв1
в алгоритме формы найти строку СвойстваМнЧУровня2 = СвойстваМногострочныхЧастей.Найти(ДопСтрока.Ключ, «ИД»)
заменить это
Для Каждого ДопСтрока Из ДопСтрокСтраницы Цикл
СвойстваМнЧУровня2 = СвойстваМногострочныхЧастей.Найти(ДопСтрока.Ключ, «ИД»);
Если СвойстваМнЧУровня2 <> Неопределено Тогда
СвойстваМнЧУровня2.ТекущееКоличествоСтрок = 0;
КонецЕсли;
КонецЦикла;
на это
Если ДопСтрокСтраницы <> Неопределено Тогда
Для Каждого ДопСтрока Из ДопСтрокСтраницы Цикл
СвойстваМнЧУровня2 = СвойстваМногострочныхЧастей.Найти(ДопСтрока.Ключ, «ИД»);
Если СвойстваМнЧУровня2 <> Неопределено Тогда
СвойстваМнЧУровня2.ТекущееКоличествоСтрок = 0;
КонецЕсли;
КонецЦикла;
КонецЕсли;
Николай Иванов
активный пользователь
офлайн
Дата регистрации: 13.04.2017
Сообщений: 31
NadinPr, NadinPr, NadinPr, gvf,
Понятно, спасибо!
Надеюсь это многим пригодится!
Ларионов Сергей
Дата регистрации: 11.04.2023
Сообщений: 3
NadinPr,
Класс, Спасибо! Заработало!
vitaly smetanin
Дата регистрации: 12.04.2023
Сообщений: 3
Скажите, пожалуйста
Есть кусок кода | ВТЗастрахованныеНаОПС КАК ЗастрахованныеНаОПС»;
Куда вставить код нужно? Вместо?
Читают тему:
- Remove From My Forums
-
Question
-
Hi All,
I’m facing a strange problem..
I’ve developed few reports. they are working fine in develop environment. after successfull testing they were published on web.
in web version, all reports are executing for first time.. if I change any of parameters values or without chaning also..
if I press «View Report» following error occurs..- An error has occurred during report processing. (rsProcessingAborted)
- Query execution failed for data set ‘dsMLGDB2Odbc’. (rsErrorExecutingCommand)
- For more information about this error navigate to the report server on the local server machine, or enable remote errors
- Query execution failed for data set ‘dsMLGDB2Odbc’. (rsErrorExecutingCommand)
please suggest any alternative ways to overcome this issue
thanks in adv. - An error has occurred during report processing. (rsProcessingAborted)
Answers
-
This, unfortunately, is a known issue. The problem is that if you are viewing the report and then you update it, there is some metadata which needs to be rebound when you press the View Report button. This doesn’t get rebound correctly.
The solution is to navigate back to the folder containing the report and run it again.
Hope that helps,
-Lukasz
Got a bug or feature request? Tell me about it at http://connect.microsoft.com.
This posting is provided «AS IS» with no warranties, and confers no rights.
-
Marked as answer by
Friday, September 11, 2009 2:56 PM
-
Marked as answer by
- Remove From My Forums
Ошибка при выполнении выгрузки данных.
-
Вопрос
-
Доброго времени суток уважаемые представители компании Microsoft, я являюсь системным администратором городской больницы №4 г. Владимира, у нас есть важная медицинская программулина MedBase,
недавно у Вас приобрели новый сервер, ну и решили перенести эту программу на новый сервер, установили бесплатный SQL server 2008 r2 express, саму программу MedBase, вроде все работает но при создании отчета выдает следущую ошибку:
«При выполнении запроса произошла ошибка: Поставщик OLE DE «Microsoft.ACE.OLEDB. 12.0» для связанного сервера «(null)» вернул сообщение «Произошли ошибки во время выполнения многошаговой операции OLE DE. По
возможности, проверьте значения всех состояний OLE DE. Работа не выполнена.» — это ошибка SQL server полюбому вот мне очень хочется ее исправить потому что отчеты не делаются… ПОМОГИТЕЕЕЕЕ-
Перемещено
30 апреля 2013 г. 8:07
sql
-
Перемещено
Ответы
-
-
Помечено в качестве ответа
Иван ПродановMicrosoft contingent staff, Moderator
30 апреля 2013 г. 13:46
-
Помечено в качестве ответа
-
Все решили проблемку: простите за беспокойство … поставщики решили проблему, вот прям только что … в среде SQL выполнить запрос:
EXEC master.dbo.sp_MSset_oledb_prop N’Microsoft.ACE.OLEDB.12.0′, N’AllowInProcess’, 1
GO
EXEC master.dbo.sp_MSset_oledb_prop N’Microsoft.ACE.OLEDB.12.0′, N’DynamicParameters’, 1
GOМне помогло
-
Помечено в качестве ответа
ad_sergeev
30 апреля 2013 г. 11:09
-
Помечено в качестве ответа
а как этим воспользоваться на практике?
Функиця приблизительно такая.
В один прекрастный момент выдает ошибку, я думаю она связана с чтением данных из Excel.
ЧТо тут проверять к чему этот Error привязывать?
Dim objXLApp As Object
Set objXLApp = CreateObject(«Excel.Application»)
objXLApp.Workbooks.Open FileName:=Me![TempData], UpdateLinks:=0
objXLApp.Visible = False
Set con = Application.CurrentProject.Connection
Set rsWell = CreateObject(«ADODB.Recordset»)
For CallCur = CallStr To CallEnd Step 1
WellName = objXLApp.Worksheets(«Лист»).Range(«A» & CallCur).Value
rsWell.Open «ReportWell», con, adOpenDynamic, adLockOptimistic, adCmdTable
rsWell.AddNew
rsWell!WellName = WellName
rsWell.Update
Next CallCur
Set rsWell = Nothing
Set con = Nothing
objXLApp.Application.Quit
Set objXLApp = Nothing
Ситуация следующая:
Написал макрос для выгрузки данных из базы SQL Server в Excel. У меня все работает корректно. Отправил файл с макросом коллеге и у него появляется данная ошибка. Отдел безопасности говорит, что доступ ему предоставили.
Строка соединения:
ConnectionString = "Provider=SQLOLEDB;Data Source=server name; " _
& "Initial Catalog=database name; Integrated Security=SSPI; " _
& "IsolationLevel=adXactReadUncommitted"
Весь код
Dim con As New ADODB.Connection
Dim rec As New ADODB.Recordset, rec2 As New ADODB.Recordset
Dim vac As String
rec.CursorType = adOpenKeyset
rec.LockType = adLockOptimistic
rec2.CursorType = adOpenKeyset
rec2.LockType = adLockOptimistic
Application.ScreenUpdating = False
Лист1.Unprotect Password:="пароль"
лист2.Unprotect Password:="пароль"
лист1.Activate
лист1.Range("A7:U7").Select
лист1.Range(Selection, Selection.End(xlDown)).Select
Selection.ClearContents
лист2.Activate
лист2.Range("A7:R7").Select
лист2.Range(Selection, Selection.End(xlDown)).Select
Selection.ClearContents
лист1.Activate
con.Open
rec.Open "SELECT * " & _
"FROM [database].[schema].[table] " & _
"WHERE [UserName] like '" & Application.UserName & "'", con
If rec.RecordCount <> 1 Then
MsgBox "Сообщение" & _
vbNewLine & "Продолжение сообщения", vbOKOnly
Else
vac = rec.Fields("Столбец")
rec.Close
If vac <> "значение" Then
rec.Open "SELECT *" & _
"FROM [database].[schema].[table2]" & _
"Where [Столбец2] = '" & vac & "'", con
rec2.Open "SELECT *" & _
"FROM [database].[schema].[table3]" & _
"Where [Столбец2] = '" & vac & "'", con
Else
rec.Open "SELECT *" & _
"FROM [database].[schema].[table2]", con
rec2.Open "SELECT *" & _
"FROM [database].[schema].[table3]", con
End If
Лист1.Range("A7").CopyFromRecordset rec
Лист2.Range("A7").CopyFromRecordset rec2
MsgBox "Готово"
End If
Лист1.Protect Password:="Пароль", _
Contents:=True, DrawingObjects:=False, AllowUsingPivotTables:=True, _
AllowSorting:=True, AllowFiltering:=True
Лист2.Protect Password:="Пароль", _
Contents:=True, DrawingObjects:=False, AllowUsingPivotTables:=True, _
AllowSorting:=True, AllowFiltering:=True
Лист1.Activate