File Creation

Hi!

I have one package (Primary) that calls 4 Packages(1,2,3,4) throw an SQL Server Connection.
That 4 packages create 4 distinct files from a a Streamwriter.
The files area created in a Script component

I call the execution of the packages from an Web Page that calls the job an execute the package Primary.

The first two packages (1,2) create the file and everithing goes ok.

The third one(3) "blows up" with the exception:

System.NullReferenceException: Object reference not set to an instance of an object. at Microsoft.SqlServer.Dts.Pipeline.ScriptComponentHost.HandleUserException(Exception e) at Microsoft.SqlServer.Dts.Pipeline.ScriptComponentHost.ProcessInput(Int32 inputID, PipelineBuffer buffer) at Microsoft.SqlServer.Dts.Pipeline.ManagedComponentHost.HostProcessInput(IDTSManagedComponentWrapper90 wrapper, Int32 inputID, IDTSBuffer90 pDTSBuffer, IntPtr bufferWirePacket)

The next try that i made was to comment in the package Primary the execution of the packages 1,2 and run the package 3,4.

The package 3 run ok and the package 4 blows up with


"System.ArgumentOutOfRangeException: Index and length must refer to a location within the string. Parameter name: length at Microsoft.SqlServer.Dts.Pipeline.ScriptComponentHost.HandleUserException(Exception e) at Microsoft.SqlServer.Dts.Pipeline.ScriptComponentHost.ProcessInput(Int32 inputID, PipelineBuffer buffer) at Microsoft.SqlServer.Dts.Pipeline.ManagedComponentHost.HostProcessInput(IDTSManagedComponentWrapper90 wrapper, Int32 inputID, IDTSBuffer90 pDTSBuffer, IntPtr bufferWirePacket)"

The next try that i made was to comment in the package Primary the execution of the packages 1,2,3 and run the package 4.

It run Ok.

When the package 3 and 4 blows up they create the file but they don't write.

In all the executions that i made i deleted the files that were created.

When I run the packages from the development solution and using file system connection everything runs.

Here is the code of the script component:


Imports System

Imports System.Data

Imports System.Math

Imports Microsoft.SqlServer.Dts.Pipeline.Wrapper

Imports Microsoft.SqlServer.Dts.Runtime.Wrapper

Imports System.IO

Public Class ScriptMain

Inherits UserComponent



Dim directorio As String

Private textwriter As StreamWriter

Private separador As String = ";"

Private cabecalho As Boolean = True

Dim linha As String = ""




Public Overrides Sub PreExecute()

directorio = Trim(Variables.Directory) & Trim(Variables.FileName)

textwriter = New StreamWriter(directorio, False)

End Sub

Public Overrides Sub Input0_ProcessInputRow(ByVal Row As Input0Buffer)



If cabecalho Then

Dim DataProc As String = Row.var1

Dim DataInf As String = Row.var2
DataProc = DataProc.Substring(0, 4) _

& "/" & DataProc.Substring(4, 2) _

& "/" & DataProc.Substring(6, 2)

DataInf = DataInf.Substring(0, 4) _

& "/" & DataInf.Substring(4, 2) _

& "/" & DataInf.Substring(6, 2)



textwriter.WriteLine(Variables.var3 _

& separador & Trim(var1) _

& separador & Trim(var2)



cabecalho = False

End If





Dim var7 As String = ""

If Not Row.var7_IsNull Then

var7 = Row.var7.ToString

End If


With textwriter



linha = Trim(Row.var1) _

& separador & Trim(DataProc) _

& separador & Trim(DataInf ) _

& separador & Trim(var7)


.WriteLine(linha)

End With

End Sub


Public Overrides Sub PostExecute()

textwriter.Close()



End Sub

End Class

In the four Script Components the code is the same only change the value of the variables.

I'm sorry for my English and the variables here in the code were changed so it can be an error in the variables but forget that.

Can anyone help me!?