Цитата: 2016.01.12 (Tuesday) 13:46:37 1.32.2.0 sp2 Sm.Main ( EGAISI )
----- Прерывание работы программы -----
сообщение: "Неправильный результат из-за исключения, возникшего во время операции. См. описание исключения в InnerException."
исключение: System.Reflection.TargetInvocationException
источник: System
метод: Void RaiseExceptionIfNecessary()
в System.ComponentModel.AsyncCompletedEventArgs.RaiseExceptionIfNecessary()
в Sm.Forms.ModalWorker.ModalWorkerEngine.RunModal_Completed(Object sender, RunWorkerCompletedEventArgs e)
в Sm.Core.TaskWorker.OnRunWorkerCompleted(RunWorkerCompletedEventArgs e)
----- Причина исключения, уровень вложения 1 -----
сообщение: "ORA-00001: нарушено ограничение уникальности (SUPERMAG.SMCEGAISARTICLES_PK)
ORA-06512: на line 1"
исключение: System.Data.OracleClient.OracleException
источник: System.Data.OracleClient
данные: соединено с: База даных=ATRONDP; Пользователь=хоменко
текст команды: begin for vRec in (Select S.Article, E.ProductAlcCode, E.ProductFullName from Supermag.SMSpec S, Supermag.SMEgaisDocSpec E, Supermag.SMEgaisDocHeader H where E.WBRegId='TTN-0001175811' and E.ProductAlcCode is not null and E.LinkSpecItem=S.SpecItem and H.WBRegId='TTN-0001175811' and S.DocType=H.LinkDocType and S.DocID=H.LinkDocID and not exists (select * from Supermag.SMEgaisArticles A where A.Article=S.Article and A.AlcCode=E.ProductAlcCode)) loop Insert into Supermag.SMEgaisArticles(Article, AlcCode, ProductFullName) values(vRec.Article, vRec.ProductAlcCode, vRec.ProductFullName); Supermag.SMAutoPost('EA',vRec.Article||' '||vRec.ProductAlcCode,0,NULL,vRec.Article); end loop; end;
тип команды: Text
метод: Void CheckError(System.Data.OracleClient.OciErrorHandle, Int32)
в System.Data.OracleClient.OracleConnection.CheckError(OciErrorHandle errorHandle, Int32 rc)
в System.Data.OracleClient.OracleCommand.Execute(OciStatementHandle statementHandle, CommandBehavior behavior, Boolean needRowid, OciRowidDescriptor& rowidDescriptor, ArrayList& resultParameterOrdinals)
в System.Data.OracleClient.OracleCommand.ExecuteNonQueryInternal(Boolean needRowid, OciRowidDescriptor& rowidDescriptor)
в System.Data.OracleClient.OracleCommand.ExecuteNonQuery()
в Sm.Server.Database.OracleSafeCommand.ExecuteNonQuery()
в Sm.BusinessServer.CommonObjects.OracleBO.ExecuteNonQuery(BusinessOperation businessOperation, String commandText)
в Sm.BusinessServer.CommonObjects.OracleBO.Sm.AppServer.Link.IOracleBO.ExecuteNonQueryBegin(BusinessOperation businessOperation, String commandText, Nullable`1& result)
в Sm.AppServer.Link.Client.OracleWrapper.<>c__DisplayClass1d.<ExecuteNonQuery>b__1b(IOracleBO bo)
в Sm.BusinessServer.LocalServer.LocalClient`1.Do[TResult](Func`2 function)
в Sm.AppServer.Link.Client.OracleWrapper.ExecuteNonQuery(IServerWcfFactory server, String commandText, Int32 moduleRole, Int32[] functionRoles)
в Sm.Egais.EgaisLinkEditModel.DoAcceptData(Boolean warningOff)
в Sm.Egais.EgaisEditModel.<AcceptData>b__12(Boolean warningOff)
в Sm.Forms.InspectHandle.Inspect(IConfigColor configColor, InspectInvoker method)
в Sm.Egais.EgaisEditModel.<AcceptData>b__11(Object s, TaskWorkEventArgs e)
в Sm.Core.TaskWorker.OnDoWork(DoWorkEventArgs e)
в Sm.Core.TaskWorkerBase.InternalBackgroundWorker.OnDoWork(DoWorkEventArgs e)
в System.ComponentModel.BackgroundWorker.WorkerThreadStart(Object argument)
вот как то так...