Тема: Ошибка при добавлении параметра номенклатуры
Здравствуйте.
Из БД Оракл беру данные и заношу в параметры номенклатуры
Выделяю всю номенклатуру одного класса, запускаю макрос, сначала выполняется.
Затем на какой то записи возникает ошибка:
"Значение параметра должно быть вещественным числом."
Значение вводимого или заменяемого параметра точно действительное число, потому что, если я выделяю несколько записей (в том числе запись, на которой заткнулся макрос) и запускаю макрос, он выполняется без проблем.
Помогите, пожалуйста, в чем ошибка или загвоздка?
Макрос необходимо будет запускать регулярно для синхронизации, эта ошибка сильно беспокоит меня
Sub Poisk_PAR_CODE_2(NNN, Params, ParamPar0, p0, v0, z0 )
'Call TCSApp.ShowMessageBox(" Сообщение ", p0 )
If p0 <> "" Then
Params.First
If Params.Locate("PAR_CODE", ParamPar0, 0) Then
' параметр найден
If Trim(Params.Properties("PAR_VALUE").DisplayText) <> Trim(p0) Then
' значение параметра не совпадает с Парусом - заменить
If Params.EditAction.Enabled Then
If Params.SetParameterValueByParCode( ParamPar0, p0, 0, True ) Then
z0 = z0 + 1
End If
Else
Call TCSApp.ShowMessageBox("Сообщение ", "Нет прав на редактирование" )
End If
End If
Else
' параметра нет - добавить
If Params.AppendAction.Enabled Then
If Params.SetParameterValueByParCode( ParamPar0, p0, 0, True ) Then
v0 = v0 + 1
End If
Else
Call TCSApp.ShowMessageBox("Сообщение ", "Нет прав на добавление" )
End If
End If
End If
End Sub