21 messaggi dal 21 gennaio 2004
Salve
Ricevo un errore e non riesco a venirne fuori. Qualcuno potrebbe darmi una mano?

invio l'errore:

Message:
---------------------
String or binary data would be truncated.
The statement has been terminated.


Source:
---------------------
.Net SqlClient Data Provider


StackTrace:
---------------------
in System.Data.SqlClient.SqlConnection.OnError(SqlException exception, Boolean breakConnection)
in System.Data.SqlClient.SqlInternalConnection.OnError(SqlException exception, Boolean breakConnection)
in System.Data.SqlClient.TdsParser.ThrowExceptionAndWarning(TdsParserStateObject stateObj)
in System.Data.SqlClient.TdsParser.Run(RunBehavior runBehavior, SqlCommand cmdHandler, SqlDataReader dataStream, BulkCopySimpleResultSet bulkCopyHandler, TdsParserStateObject stateObj)
in System.Data.SqlClient.SqlCommand.FinishExecuteReader(SqlDataReader ds, RunBehavior runBehavior, String resetOptionsString)
in System.Data.SqlClient.SqlCommand.RunExecuteReaderTds(CommandBehavior cmdBehavior, RunBehavior runBehavior, Boolean returnStream, Boolean async)
in System.Data.SqlClient.SqlCommand.RunExecuteReader(CommandBehavior cmdBehavior, RunBehavior runBehavior, Boolean returnStream, String method, DbAsyncResult result)
in System.Data.SqlClient.SqlCommand.InternalExecuteNonQuery(DbAsyncResult result, String methodName, Boolean sendToPipe)
in System.Data.SqlClient.SqlCommand.ExecuteNonQuery()
in clsVisure.memDettPregiudizDB(Object oResp, Object nIDCliente, String& sKey, String sInputKeyAnag) in G:\webtaxus\Inetpub\TaxusNetV2\App_Code\clsVisure.vb:riga 4788


Procedura:
---------------------
memDettPregiudizDB

Vi ringrazio anticipatamente

arcifan
in generale è un errore che capita quando tenti di inserire una stringa troppo lunga in un campo di testo (varchar o nvarchar).

Nell'errore però vedo un "ExecuteReader"...puoi postare un pò di codice? Anche la struttra della tabella se possibile..

Davide Guida
Technical Architect @ Razorfish Healthware
http://davideguida.altervista.org
mizrael ha scritto:
in generale è un errore che capita quando tenti di inserire una stringa troppo lunga in un campo di testo (varchar o nvarchar).

Nell'errore però vedo un "ExecuteReader"...puoi postare un pò di codice? Anche la struttra della tabella se possibile..


giustissimo.

vedi questa riga:
G:\webtaxus\Inetpub\TaxusNetV2\App_Code\clsVisure.vb:riga 4788
lorenzo_ ha scritto:

vedi questa riga:
G:\webtaxus\Inetpub\TaxusNetV2\App_Code\clsVisure.vb:riga 4788


ehhmm... cosa dovrei vedere in particolare? :D

Davide Guida
Technical Architect @ Razorfish Healthware
http://davideguida.altervista.org
179 messaggi dal 12 luglio 2007
che tipo di operazione stavi facento? read insert update delete? posta il codice che stai usando.

Stai facendo una Insert o Update? stai mandando nel db un valore troppo grosso per il campo.
Stai facendo una Read? il valore letto è troppo grande per dove lo vuoi mettere. Se usi un datatable tipizzato può essere che hai cambiato la dimensione di un campo nel db ma non hai rinfrescato lo schema del datatable che è rimasto piccolo.
21 messaggi dal 21 gennaio 2004
Invio il codice richiesto.

Public Function memDettPregiudizDB(ByVal oResp As Object, ByVal nIDCliente As Object, ByRef sKey As String, ByVal sInputKeyAnag As String) As String

Dim oConn As SqlConnection = Nothing
Dim oCmd As SqlClient.SqlCommand
Dim sCmdText As String
Dim oParam As SqlClient.SqlParameter
Dim nIdOutput As Long = 0
Dim oXmlDoc As New XmlDocument

Dim s_dp_TipoEffetto As String = ""
Dim s_dp_CodiceAtto As String = ""
Dim s_dp_IdGenAtto As String = ""
Dim s_dp_IdPartAtto As String = ""
Dim s_dp_DataRegAtto As String = ""
Dim s_dp_CodUfficio As String = ""
Dim s_dp_ComuneUff As String = ""
Dim s_dp_CodCatUfficio As String = ""
Dim s_dp_ProvUff As String = ""
Dim s_dp_CodCatDocum As String = ""
Dim s_dp_CodDocum As String = ""
Dim s_dp_DescrDoc As String = ""
Dim s_dp_NoteGeneriche As String = ""

Dim s_dp_ConservatLireImpTot As String = ""
Dim s_dp_ConservatLireCapitFinanz As String = ""
Dim s_dp_ConservatLireSpeseFinanz As String = ""
Dim s_dp_ConservatLireFlImpTotale As String = ""
Dim s_dp_ConservatLireFlCapitFinanz As String = ""
Dim s_dp_ConservatLireFlSpeseFinanz As String = ""
Dim s_dp_ConservatEuroImpTot As String = ""
Dim s_dp_ConservatEuroCapitFinanz As String = ""
Dim s_dp_ConservatEuroSpeseFinanz As String = ""
Dim s_dp_ConservatEuroFlImpTotale As String = ""
Dim s_dp_ConservatEuroFlCapitFinanz As String = ""
Dim s_dp_ConservatEuroFlSpeseFinanz As String = ""

Dim s_dp_Trib_DataUdienza As String = ""
Dim s_dp_Trib_OraUdienza As String = ""
Dim s_dp_Trib_Curatore_Nome As String = ""
Dim s_dp_Trib_Curatore_Ind As String = ""
Dim s_dp_Trib_Curatore_ComuneRes As String = ""
Dim s_dp_Trib_Curatore_ProvRes As String = ""

Dim s_dp_NumAnagraContro As Integer = 0
Dim s_dp_NumAnagraFavore As Integer = 0
Dim s_dp_NumBeniColpiti As Integer = 0

Dim s_dp_Contro_PersF_Cognome As String = ""
Dim s_dp_Contro_PersF_Nome As String = ""
Dim s_dp_Contro_PersF_DNascita As String = ""
Dim s_dp_Contro_PersF_Sesso As String = ""
Dim s_dp_Contro_PersF_ComNascita As String = ""
Dim s_dp_Contro_PersF_ProvNascita As String = ""
Dim s_dp_Contro_PersF_CodFisc As String = ""

Dim s_dp_Contro_PersGiur_Nominativo As String = ""
Dim s_dp_Contro_PersGiur_CodFisc As String = ""
Dim s_dp_Contro_PersGiur_ComSede As String = ""
Dim s_dp_Contro_PersGiur_ProvSede As String = ""
Dim s_dp_Contro_PersGiur_NatGiur As String = ""
Dim s_dp_Contro_PersGiur_CodABI As String = ""


Dim s_dp_Favore_PersF_Cognome As String = ""
Dim s_dp_Favore_PersF_Nome As String = ""
Dim s_dp_Favore_PersF_DNascita As String = ""
Dim s_dp_Favore_PersF_Sesso As String = ""
Dim s_dp_Favore_PersF_ComNascita As String = ""
Dim s_dp_Favore_PersF_ProvNascita As String = ""
Dim s_dp_Favore_PersF_CodFisc As String = ""

Dim s_dp_Favore_PersGiur_Nominativo As String = ""
Dim s_dp_Favore_PersGiur_CodFisc As String = ""
Dim s_dp_Favore_PersGiur_ComSede As String = ""
Dim s_dp_Favore_PersGiur_ProvSede As String = ""
Dim s_dp_Favore_PersGiur_NatGiur As String = ""
Dim s_dp_Favore_PersGiur_CodABI As String = ""

Dim s_dp_PrimoBeneColpito_Prov As String = ""
Dim s_dp_PrimoBeneColpito_Comune As String = ""

Dim oNodePrinc As XmlNode
Dim oNode1Liv As XmlElement
Dim oNode2Liv As XmlElement
Dim oNode3Liv As XmlElement
Dim oNode4Liv As XmlElement


memDettPregiudizDB = False

Try

If oFnz.OpenConn(ConfigurationManager.AppSettings("sqlConnectionString"), oConn) = True Then

'oXmlDoc.Load("D:\Progetti\dev\Asp.Net\TaxusNet\AreaVisure\dd.xml")
'oXmlDoc.Load("D:\Progetti\dev\Asp.Net\TaxusNet\AreaVisure\altea.xml")

'metto il ris fra nuovi tag poichkè il metoto va in errore se vengono restituiti più atti
oXmlDoc.LoadXml("<Taxus>" & oResp.Atti & "</Taxus>")


For Each oNodePrinc In oXmlDoc.GetElementsByTagName("ci:Atto")
oNode1Liv = oNodePrinc
oNode2Liv = oNode1Liv.GetElementsByTagName("ci:DatiGenerali").ItemOf(0)
If Not oNode2Liv Is Nothing Then
s_dp_TipoEffetto = cNothingingStr_InnerText(oNode2Liv.GetElementsByTagName("ci:TipoEffetto").ItemOf(0))
s_dp_CodiceAtto = cNothingingStr_InnerText(oNode2Liv.GetElementsByTagName("ci:CodiceAtto").ItemOf(0))
s_dp_IdGenAtto = cNothingingStr_InnerText(oNode2Liv.GetElementsByTagName("ci:IdentificativoGeneraleAtto").ItemOf(0))
s_dp_IdPartAtto = cNothingingStr_InnerText(oNode2Liv.GetElementsByTagName("ci:IdentificativoParticolareAtto").ItemOf(0))
s_dp_DataRegAtto = cNothingingStr_InnerText(oNode2Liv.GetElementsByTagName("ci:DataRegistrazioneAtto").ItemOf(0))
s_dp_CodUfficio = cNothingingStr_InnerText(oNode2Liv.GetElementsByTagName("ci:CodiceUfficio").ItemOf(0))
s_dp_CodCatUfficio = cNothingingStr_InnerText(oNode2Liv.GetElementsByTagName("ci:CodiceCategoriaUfficio").ItemOf(0))
s_dp_ComuneUff = cNothingingStr_InnerText(oNode2Liv.GetElementsByTagName("ci:ComuneUfficio").ItemOf(0))
s_dp_ProvUff = cNothingingStr_InnerText(oNode2Liv.GetElementsByTagName("ci:ProvinciaUfficio").ItemOf(0))
s_dp_CodCatDocum = cNothingingStr_InnerText(oNode2Liv.GetElementsByTagName("ci:CodiceCategoriaDocumento").ItemOf(0))
s_dp_CodDocum = cNothingingStr_InnerText(oNode2Liv.GetElementsByTagName("ci:CodiceDocumento").ItemOf(0))
s_dp_DescrDoc = cNothingingStr_InnerText(oNode2Liv.GetElementsByTagName("ci:DescrizioneCodiceDocumento").ItemOf(0))
s_dp_NoteGeneriche = cNothingingStr_InnerText(oNode2Liv.GetElementsByTagName("ci:NoteGeneriche").ItemOf(0))
End If
oNode2Liv = oNode1Liv.GetElementsByTagName("ci:DatiConservatoria").ItemOf(0)
If Not oNode2Liv Is Nothing Then
oNode3Liv = oNode2Liv.GetElementsByTagName("ci:Lire").ItemOf(0)
If Not oNode3Liv Is Nothing Then
s_dp_ConservatLireFlImpTotale = cNothingingStr_InnerText(oNode3Liv.GetElementsByTagName("ci:FlagImportoTotale").ItemOf(0))
s_dp_ConservatLireFlCapitFinanz = cNothingingStr_InnerText(oNode3Liv.GetElementsByTagName("ci:FlagImportoFinanziato").ItemOf(0))
s_dp_ConservatLireFlSpeseFinanz = cNothingingStr_InnerText(oNode3Liv.GetElementsByTagName("ci:FlagImportoSpesa").ItemOf(0))
s_dp_ConservatLireImpTot = cNothingingStr_InnerText(oNode3Liv.GetElementsByTagName("ci:ImportoTotale").ItemOf(0))
s_dp_ConservatLireCapitFinanz = cNothingingStr_InnerText(oNode3Liv.GetElementsByTagName("ci:CapitaleFinanziato").ItemOf(0))
s_dp_ConservatLireSpeseFinanz = cNothingingStr_InnerText(oNode3Liv.GetElementsByTagName("ci:SpeseFinanziamento").ItemOf(0))
End If
oNode3Liv = oNode2Liv.GetElementsByTagName("ci:Euro").ItemOf(0)
If Not oNode3Liv Is Nothing Then
s_dp_ConservatEuroFlImpTotale = cNothingingStr_InnerText(oNode3Liv.GetElementsByTagName("ci:FlagImportoTotale").ItemOf(0))
s_dp_ConservatEuroFlCapitFinanz = cNothingingStr_InnerText(oNode3Liv.GetElementsByTagName("ci:FlagImportoFinanziato").ItemOf(0))
s_dp_ConservatEuroFlSpeseFinanz = cNothingingStr_InnerText(oNode3Liv.GetElementsByTagName("ci:FlagImportoSpesa").ItemOf(0))
s_dp_ConservatEuroImpTot = cNothingingStr_InnerText(oNode3Liv.GetElementsByTagName("ci:ImportoTotale").ItemOf(0))
s_dp_ConservatEuroCapitFinanz = cNothingingStr_InnerText(oNode3Liv.GetElementsByTagName("ci:CapitaleFinanziato").ItemOf(0))
s_dp_ConservatEuroSpeseFinanz = cNothingingStr_InnerText(oNode3Liv.GetElementsByTagName("ci:SpeseFinanziamento").ItemOf(0))
End If
oNode3Liv = Nothing
End If
oNode2Liv = oNode1Liv.GetElementsByTagName("ci:DatiTribunale").ItemOf(0)
If Not oNode2Liv Is Nothing Then
s_dp_Trib_DataUdienza = cNothingingStr_InnerText(oNode2Liv.GetElementsByTagName("ci:DataUdienza").ItemOf(0))
s_dp_Trib_OraUdienza = cNothingingStr_InnerText(oNode2Liv.GetElementsByTagName("ci:OraUdienza").ItemOf(0))
End If
If Not oNode2Liv Is Nothing Then
oNode3Liv = oNode2Liv.GetElementsByTagName("ci:Curatore").ItemOf(0)
If Not oNode3Liv Is Nothing Then
s_dp_Trib_Curatore_Nome = cNothingingStr_InnerText(oNode3Liv.GetElementsByTagName("ci:Nominativo").ItemOf(0))
s_dp_Trib_Curatore_Ind = cNothingingStr_InnerText(oNode3Liv.GetElementsByTagName("ci:Indirizzo").ItemOf(0))
s_dp_Trib_Curatore_ComuneRes = cNothingingStr_InnerText(oNode3Liv.GetElementsByTagName("ci:ComuneResidenza").ItemOf(0))
s_dp_Trib_Curatore_ProvRes = cNothingingStr_InnerText(oNode3Liv.GetElementsByTagName("ci:ProvinciaResidenza").ItemOf(0))
End If
oNode3Liv = Nothing

End If

oNode2Liv = oNode1Liv.GetElementsByTagName("ci:NumeroAnagraficheContro").ItemOf(0)
If Not oNode2Liv Is Nothing Then
s_dp_NumAnagraContro = cNothingingStr_InnerText(oNode2Liv)
End If

oNode2Liv = oNode1Liv.GetElementsByTagName("ci:NumeroAnagraficheAFavore").ItemOf(0)
If Not oNode2Liv Is Nothing Then
s_dp_NumAnagraFavore = cNothingingStr_InnerText(oNode2Liv)
End If

oNode2Liv = oNode1Liv.GetElementsByTagName("ci:NumeroBeniColpiti").ItemOf(0)
If Not oNode2Liv Is Nothing Then
s_dp_NumBeniColpiti = cNothingingStr_InnerText(oNode2Liv)
End If

oNode2Liv = oNode1Liv.GetElementsByTagName("ci:PrimaAnagraficaContro").ItemOf(0)
If Not oNode2Liv Is Nothing Then
oNode3Liv = oNode2Liv.GetElementsByTagName("ci:PersonaGiuridica").ItemOf(0)
If Not oNode3Liv Is Nothing Then
oNode4Liv = oNode3Liv.GetElementsByTagName("ci:DatiAnagrafici").ItemOf(0)
If Not oNode4Liv Is Nothing Then
s_dp_Contro_PersGiur_Nominativo = cNothingingStr_InnerText(oNode4Liv.GetElementsByTagName("ci:RagioneSociale").ItemOf(0))
s_dp_Contro_PersGiur_CodFisc = cNothingingStr_InnerText(oNode4Liv.GetElementsByTagName("ci:CodiceFiscaleImpresa").ItemOf(0))
s_dp_Contro_PersGiur_ComSede = cNothingingStr_InnerText(oNode4Liv.GetElementsByTagName("ci:ComuneSedeLegale").ItemOf(0))
s_dp_Contro_PersGiur_ProvSede = cNothingingStr_InnerText(oNode4Liv.GetElementsByTagName("ci:ProvinciaSedeLegale").ItemOf(0))
s_dp_Contro_PersGiur_NatGiur = cNothingingStr_InnerText(oNode4Liv.GetElementsByTagName("ci:FormaGiuridica").ItemOf(0))
s_dp_Contro_PersGiur_CodABI = cNothingingStr_InnerText(oNode4Liv.GetElementsByTagName("ci:CodiceABI").ItemOf(0))
End If
oNode4Liv = Nothing
End If
oNode3Liv = Nothing
oNode3Liv = oNode2Liv.GetElementsByTagName("ci:PersonaFisica").ItemOf(0)
If Not oNode3Liv Is Nothing Then
oNode4Liv = oNode3Liv.GetElementsByTagName("ci:DatiAnagrafici").ItemOf(0)
If Not oNode4Liv Is Nothing Then
s_dp_Contro_PersF_Cognome = cNothingingStr_InnerText(oNode4Liv.GetElementsByTagName("ci:Cognome").ItemOf(0))
s_dp_Contro_PersF_Nome = cNothingingStr_InnerText(oNode4Liv.GetElementsByTagName("ci:Nome").ItemOf(0))
s_dp_Contro_PersF_DNascita = cNothingingStr_InnerText(oNode4Liv.GetElementsByTagName("ci:DataDiNascita").ItemOf(0))
s_dp_Contro_PersF_Sesso = cNothingingStr_InnerText(oNode4Liv.GetElementsByTagName("ci:Sesso").ItemOf(0))
s_dp_Contro_PersF_ComNascita = cNothingingStr_InnerText(oNode4Liv.GetElementsByTagName("ci:ComuneNascita").ItemOf(0))
s_dp_Contro_PersF_ProvNascita = cNothingingStr_InnerText(oNode4Liv.GetElementsByTagName("ci:ProvinciaNascita").ItemOf(0))
s_dp_Contro_PersF_CodFisc = cNothingingStr_InnerText(oNode4Liv.GetElementsByTagName("ci:CodiceFiscale").ItemOf(0))
End If
oNode4Liv = Nothing
End If
oNode3Liv = Nothing
End If

oNode2Liv = oNode1Liv.GetElementsByTagName("ci:PrimaAnagraficaAFavore").ItemOf(0)
If Not oNode2Liv Is Nothing Then
oNode3Liv = oNode2Liv.GetElementsByTagName("ci:PersonaGiuridica").ItemOf(0)
If Not oNode3Liv Is Nothing Then
s_dp_Favore_PersGiur_Nominativo = cNothingingStr_InnerText(oNode3Liv.GetElementsByTagName("ci:RagioneSociale").ItemOf(0))
s_dp_Favore_PersGiur_CodFisc = cNothingingStr_InnerText(oNode3Liv.GetElementsByTagName("ci:CodiceFiscaleImpresa").ItemOf(0))
s_dp_Favore_PersGiur_ComSede = cNothingingStr_InnerText(oNode3Liv.GetElementsByTagName("ci:ComuneSedeLegale").ItemOf(0))
s_dp_Favore_PersGiur_ProvSede = cNothingingStr_InnerText(oNode3Liv.GetElementsByTagName("ci:ProvinciaSedeLegale").ItemOf(0))
s_dp_Favore_PersGiur_NatGiur = cNothingingStr_InnerText(oNode3Liv.GetElementsByTagName("ci:FormaGiuridica").ItemOf(0))
s_dp_Favore_PersGiur_CodABI = cNothingingStr_InnerText(oNode3Liv.GetElementsByTagName("ci:CodiceABI").ItemOf(0))
End If
oNode3Liv = Nothing
oNode3Liv = oNode2Liv.GetElementsByTagName("ci:PersonaFisica").ItemOf(0)
If Not oNode3Liv Is Nothing Then
s_dp_Favore_PersF_Cognome = cNothingingStr_InnerText(oNode3Liv.GetElementsByTagName("ci:Cognome").ItemOf(0))
s_dp_Favore_PersF_Nome = cNothingingStr_InnerText(oNode3Liv.GetElementsByTagName("ci:Nome").ItemOf(0))
s_dp_Favore_PersF_DNascita = cNothingingStr_InnerText(oNode3Liv.GetElementsByTagName("ci:DataDiNascita").ItemOf(0))
s_dp_Favore_PersF_Sesso = cNothingingStr_InnerText(oNode3Liv.GetElementsByTagName("ci:Sesso").ItemOf(0))
s_dp_Favore_PersF_ComNascita = cNothingingStr_InnerText(oNode3Liv.GetElementsByTagName("ci:ComuneNascita").ItemOf(0))
s_dp_Favore_PersF_ProvNascita = cNothingingStr_InnerText(oNode3Liv.GetElementsByTagName("ci:ProvinciaNascita").ItemOf(0))
s_dp_Favore_PersF_CodFisc = cNothingingStr_InnerText(oNode3Liv.GetElementsByTagName("ci:CodiceFiscale").ItemOf(0))
End If
oNode3Liv = Nothing
End If
oNode2Liv = oNode1Liv.GetElementsByTagName("ci:PrimoBeneColpito").ItemOf(0)
If Not oNode2Liv Is Nothing Then
s_dp_PrimoBeneColpito_Prov = cNothingingStr_InnerText(oNode2Liv.GetElementsByTagName("ci:Provincia").ItemOf(0))
s_dp_PrimoBeneColpito_Comune = cNothingingStr_InnerText(oNode2Liv.GetElementsByTagName("ci:Comune").ItemOf(0))
End If
oNode2Liv = Nothing


sCmdText = "sp_tCribisRicercaAttoPregiudizievoli_Insert"
oCmd = New SqlClient.SqlCommand(sCmdText, oConn)
oCmd.CommandType = CommandType.StoredProcedure
oParam = oCmd.Parameters.Add("@dp_idgruppo", SqlDbType.Decimal, 10)
oParam.Direction = ParameterDirection.Output

oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_idanagra", oCast.cStrNullSP(nIDCliente)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_idappogruppo", oCast.cDblNullSP(nIdOutput)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_TipoEffetto", oCast.cStrNullSP(s_dp_TipoEffetto)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_CodiceAtto", oCast.cStrNullSP(s_dp_CodiceAtto)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_IdGenAtto", oCast.cStrNullSP(s_dp_IdGenAtto)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_IdPartAtto", oCast.cStrNullSP(s_dp_IdPartAtto)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_DataRegAtto", oCast.cStrNullSP(s_dp_DataRegAtto)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_CodUfficio", oCast.cStrNullSP(s_dp_CodUfficio)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_CodCatUfficio", oCast.cStrNullSP(s_dp_CodCatUfficio)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_ComuneUff", oCast.cStrNullSP(s_dp_ComuneUff)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_ProvUff", oCast.cStrNullSP(s_dp_ProvUff)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_CodCatDocum", oCast.cStrNullSP(s_dp_CodCatDocum)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_CodDocum", oCast.cStrNullSP(s_dp_CodDocum)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_DescrDoc", oCast.cStrNullSP(s_dp_DescrDoc)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_NoteGeneriche", oCast.cStrNullSP(s_dp_NoteGeneriche)))

oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_ConservatLireImpTot", oCast.cStrNullSP(s_dp_ConservatLireImpTot)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_ConservatLireCapitFinanz", oCast.cStrNullSP(s_dp_ConservatLireCapitFinanz)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_ConservatLireSpeseFinanz", oCast.cStrNullSP(s_dp_ConservatLireSpeseFinanz)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_ConservatLireFlImpTotale", oCast.cStrNullSP(s_dp_ConservatLireFlImpTotale)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_ConservatLireFlCapitFinanz", oCast.cStrNullSP(s_dp_ConservatLireFlCapitFinanz)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_ConservatLireFlSpeseFinanz", oCast.cStrNullSP(s_dp_ConservatLireFlSpeseFinanz)))

oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_ConservatEuroImpTot", oCast.cStrNullSP(s_dp_ConservatEuroImpTot)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_ConservatEuroCapitFinanz", oCast.cStrNullSP(s_dp_ConservatEuroCapitFinanz)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_ConservatEuroSpeseFinanz", oCast.cStrNullSP(s_dp_ConservatEuroSpeseFinanz)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_ConservatEuroFlImpTotale", oCast.cStrNullSP(s_dp_ConservatEuroFlImpTotale)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_ConservatEuroFlCapitFinanz", oCast.cStrNullSP(s_dp_ConservatEuroFlCapitFinanz)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_ConservatEuroFlSpeseFinanz", oCast.cStrNullSP(s_dp_ConservatEuroFlSpeseFinanz)))

oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_Trib_DataUdienza", oCast.cStrNullSP(s_dp_Trib_DataUdienza)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_Trib_OraUdienza", oCast.cStrNullSP(s_dp_Trib_OraUdienza)))

oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_Trib_Curatore_Nome", oCast.cStrNullSP(s_dp_Trib_Curatore_Nome)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_Trib_Curatore_Ind", oCast.cStrNullSP(s_dp_Trib_Curatore_Ind)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_Trib_Curatore_ComuneRes", oCast.cStrNullSP(s_dp_Trib_Curatore_ComuneRes)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_Trib_Curatore_ProvRes", oCast.cStrNullSP(s_dp_Trib_Curatore_ProvRes)))

oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_NumAnagraContro", oCast.cStrNullSP(s_dp_NumAnagraContro)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_NumAnagraFavore", oCast.cStrNullSP(s_dp_NumAnagraFavore)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_NumBeniColpiti", oCast.cStrNullSP(s_dp_NumBeniColpiti)))

oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_Contro_PersF_Cognome", oCast.cStrNullSP(s_dp_Contro_PersF_Cognome)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_Contro_PersF_Nome", oCast.cStrNullSP(s_dp_Contro_PersF_Nome)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_Contro_PersF_DNascita", oCast.cStrNullSP(s_dp_Contro_PersF_DNascita)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_Contro_PersF_Sesso", oCast.cStrNullSP(s_dp_Contro_PersF_Sesso)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_Contro_PersF_ComNascita", oCast.cStrNullSP(s_dp_Contro_PersF_ComNascita)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_Contro_PersF_ProvNascita", oCast.cStrNullSP(s_dp_Contro_PersF_ProvNascita)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_Contro_PersF_CodFisc", oCast.cStrNullSP(s_dp_Contro_PersF_CodFisc)))

oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_Contro_PersGiur_Nominativo", oCast.cStrNullSP(s_dp_Contro_PersGiur_Nominativo)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_Contro_PersGiur_CodFisc", oCast.cStrNullSP(s_dp_Contro_PersGiur_CodFisc)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_Contro_PersGiur_ComSede", oCast.cStrNullSP(s_dp_Contro_PersGiur_ComSede)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_Contro_PersGiur_ProvSede", oCast.cStrNullSP(s_dp_Contro_PersGiur_ProvSede)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_Contro_PersGiur_NatGiur", oCast.cStrNullSP(s_dp_Contro_PersGiur_NatGiur)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_Contro_PersGiur_CodABI", oCast.cStrNullSP(s_dp_Contro_PersGiur_CodABI)))

oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_Favore_PersF_Cognome", oCast.cStrNullSP(s_dp_Favore_PersF_Cognome)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_Favore_PersF_Nome", oCast.cStrNullSP(s_dp_Favore_PersF_Nome)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_Favore_PersF_DNascita", oCast.cStrNullSP(s_dp_Favore_PersF_DNascita)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_Favore_PersF_Sesso", oCast.cStrNullSP(s_dp_Favore_PersF_Sesso)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_Favore_PersF_ComNascita", oCast.cStrNullSP(s_dp_Favore_PersF_ComNascita)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_Favore_PersF_ProvNascita", oCast.cStrNullSP(s_dp_Favore_PersF_ProvNascita)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_Favore_PersF_CodFisc", oCast.cStrNullSP(s_dp_Favore_PersF_CodFisc)))

oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_Favore_PersGiur_Nominativo", oCast.cStrNullSP(s_dp_Favore_PersGiur_Nominativo)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_Favore_PersGiur_CodFisc", oCast.cStrNullSP(s_dp_Favore_PersGiur_CodFisc)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_Favore_PersGiur_ComSede", oCast.cStrNullSP(s_dp_Favore_PersGiur_ComSede)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_Favore_PersGiur_ProvSede", oCast.cStrNullSP(s_dp_Favore_PersGiur_ProvSede)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_Favore_PersGiur_NatGiur", oCast.cStrNullSP(s_dp_Favore_PersGiur_NatGiur)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_Favore_PersGiur_CodABI", oCast.cStrNullSP(s_dp_Favore_PersGiur_CodABI)))

oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_PrimoBeneColpito_Prov", oCast.cStrNullSP(s_dp_PrimoBeneColpito_Prov)))
oCmd.Parameters.Add(New SqlClient.SqlParameter("@dp_PrimoBeneColpito_Comune", oCast.cStrNullSP(s_dp_PrimoBeneColpito_Comune)))


oCmd.ExecuteNonQuery()
nIdOutput = oCast.cNullDbl(oCmd.Parameters("@dp_idgruppo").Value)
oCmd = Nothing
sKey = CStr(nIdOutput)


s_dp_TipoEffetto = ""
s_dp_CodiceAtto = ""
s_dp_IdGenAtto = ""
s_dp_IdPartAtto = ""
s_dp_DataRegAtto = ""
s_dp_CodUfficio = ""
s_dp_ComuneUff = ""
s_dp_CodCatUfficio = ""
s_dp_ProvUff = ""
s_dp_CodCatDocum = ""
s_dp_CodDocum = ""
s_dp_DescrDoc = ""
s_dp_NoteGeneriche = ""

s_dp_ConservatLireImpTot = ""
s_dp_ConservatLireCapitFinanz = ""
s_dp_ConservatLireSpeseFinanz = ""
s_dp_ConservatLireFlImpTotale = ""
s_dp_ConservatLireFlCapitFinanz = ""
s_dp_ConservatLireFlSpeseFinanz = ""
s_dp_ConservatEuroImpTot = ""
s_dp_ConservatEuroCapitFinanz = ""
s_dp_ConservatEuroSpeseFinanz = ""
s_dp_ConservatEuroFlImpTotale = ""
s_dp_ConservatEuroFlCapitFinanz = ""
s_dp_ConservatEuroFlSpeseFinanz = ""

s_dp_Trib_DataUdienza = ""
s_dp_Trib_OraUdienza = ""
s_dp_Trib_Curatore_Nome = ""
s_dp_Trib_Curatore_Ind = ""
s_dp_Trib_Curatore_ComuneRes = ""
s_dp_Trib_Curatore_ProvRes = ""

s_dp_NumAnagraContro = 0
s_dp_NumAnagraFavore = 0
s_dp_NumBeniColpiti = 0

s_dp_Contro_PersF_Cognome = ""
s_dp_Contro_PersF_Nome = ""
s_dp_Contro_PersF_DNascita = ""
s_dp_Contro_PersF_Sesso = ""
s_dp_Contro_PersF_ComNascita = ""
s_dp_Contro_PersF_ProvNascita = ""
s_dp_Contro_PersF_CodFisc = ""

s_dp_Contro_PersGiur_Nominativo = ""
s_dp_Contro_PersGiur_CodFisc = ""
s_dp_Contro_PersGiur_ComSede = ""
s_dp_Contro_PersGiur_ProvSede = ""
s_dp_Contro_PersGiur_NatGiur = ""
s_dp_Contro_PersGiur_CodABI = ""


s_dp_Favore_PersF_Cognome = ""
s_dp_Favore_PersF_Nome = ""
s_dp_Favore_PersF_DNascita = ""
s_dp_Favore_PersF_Sesso = ""
s_dp_Favore_PersF_ComNascita = ""
s_dp_Favore_PersF_ProvNascita = ""
s_dp_Favore_PersF_CodFisc = ""

s_dp_Favore_PersGiur_Nominativo = ""
s_dp_Favore_PersGiur_CodFisc = ""
s_dp_Favore_PersGiur_ComSede = ""
s_dp_Favore_PersGiur_ProvSede = ""
s_dp_Favore_PersGiur_NatGiur = ""
s_dp_Favore_PersGiur_CodABI = ""

s_dp_PrimoBeneColpito_Prov = ""
s_dp_PrimoBeneColpito_Comune = ""



Next
If sInputKeyAnag <> "" Then
oFnz.ExecSQL("INSERT INTO tCribisRicercaParamAttoPregiudizievoli (pp_idgruppo, pp_keyanag ) VALUES (" _
& oCast.cNullDbl(nIdOutput) & ", " & oCast.cStrNullSql(sInputKeyAnag) & ") ", oConn)
End If


End If

Catch ex As Exception
oFnz.GestError(ex, System.Reflection.MethodInfo.GetCurrentMethod.Name, nIDCliente, sKey)

End Try

End Function

arcifan
mizrael ha scritto:
... è un errore che capita quando tenti di inserire una stringa troppo lunga in un campo di testo (varchar o nvarchar).


Direi che l'intuizione è giusta

Gianluca
http://www.gianlucaesposito.it

Torna al forum | Feed RSS

ASPItalia.com non è responsabile per il contenuto dei messaggi presenti su questo servizio, non avendo nessun controllo sui messaggi postati nei propri forum, che rappresentano l'espressione del pensiero degli autori.