Not enough storage is available to complete this
Publicado por hsuarez (8 intervenciones) el 17/05/2007 19:35:46
Buen dia, tengo un problema que no he podido resolver se trata de que quiero importar informacion de un servidor a otro utilizando un package y data driven query task, el detalle es que cuando utilizon un lookup para poder utilizar update o insert me sale el mensajito
"Not enough storage is available to complete this operation"
Lo mas raro de esto es que en una maquina si funciona.
este es el codigo
'**********************************************************************
' Visual Basic Transformation Script
'************************************************************************
' Copy each source column to the destination column
Function Main()
DTSDestination("LicenSitioUltUPD") = DTSSource("LicenSitioUltUPD")
DTSDestination("LicenFeHoINS") = DTSSource("LicenFeHoINS")
DTSDestination("LicenFeHoUPD") = DTSSource("LicenFeHoUPD")
DTSDestination("PersoCve") = DTSSource("PersoCve")
DTSDestination("DoctoEstaCve") = DTSSource("DoctoEstaCve")
DTSDestination("LicenPRN") = DTSSource("LicenPRN")+DTSLookups("cont").Execute(DTSSource("LicenCve"))
DTSDestination("LicenCve") = DTSSource("LicenCve")
if DTSLookups("exists").Execute(DTSSource("LicenCve")) = 0 then
Main = DTSTransformstat_InsertQuery
else
Main = DTSTransformStat_UpdateQuery
end if
End Function
"Not enough storage is available to complete this operation"
Lo mas raro de esto es que en una maquina si funciona.
este es el codigo
'**********************************************************************
' Visual Basic Transformation Script
'************************************************************************
' Copy each source column to the destination column
Function Main()
DTSDestination("LicenSitioUltUPD") = DTSSource("LicenSitioUltUPD")
DTSDestination("LicenFeHoINS") = DTSSource("LicenFeHoINS")
DTSDestination("LicenFeHoUPD") = DTSSource("LicenFeHoUPD")
DTSDestination("PersoCve") = DTSSource("PersoCve")
DTSDestination("DoctoEstaCve") = DTSSource("DoctoEstaCve")
DTSDestination("LicenPRN") = DTSSource("LicenPRN")+DTSLookups("cont").Execute(DTSSource("LicenCve"))
DTSDestination("LicenCve") = DTSSource("LicenCve")
if DTSLookups("exists").Execute(DTSSource("LicenCve")) = 0 then
Main = DTSTransformstat_InsertQuery
else
Main = DTSTransformStat_UpdateQuery
end if
End Function
Valora esta pregunta


0