como verificar a estrutura da coluna no ssis?

Solução

Detalhes

1. Primeiro, adicione um gerenciador de conexões de arquivo simples.
2. No gerenciador de conexões de arquivo simples, vá para a guia Avançado, remova todas as colunas e mantenha apenas uma coluna (Coluna0) .
3. Altere o tipo de coluna para DT_WSTR e o comprimento para 4000.
4. Adicionar uma Dataflow task
5. Dentro da Dataflow task adicione uma fonte de arquivo simples, um componente de script e um destino OLEDB.
6. Abra o componente de script, vá para a guia Input/Output e adicione 8 colunas de saída (Distributer_Code,Cust_code,cust_name,cust_add,zip,tel,dl_number,gstin)
7. Altere o idioma do script para Visual Basic.
8. 
   Dentro do script escreva o seguinte código.
   

   Dim Distributer_Code as integer = -1
   Dim Cust_code as integer = -1
   Dim cust_name as integer = -1
   Dim cust_add as integer = -1
   Dim zip as integer = -1
   Dim tel as integer = -1
   Dim dl_number as integer = -1
   Dim gstin as integer = -1
   Dim intRowIndex as integer = 0
   
   Public Overrides Sub Input0_ProcessInputRow(ByVal Row As Input0Buffer)
   
       If intRowIndex = 0 then
   
           Dim strfields() as string = Row.Column0.split(CChar("|"))
           Dim idx as integer = 0
   
           For idx = 0 To strFields.length - 1
   
               Select case str
   
               Case "Distributer_Code"
                   Distributer_Code = idx  
               Case "Cust_code"
                   Cust_code = idx 
               Case "cust_name"
                   cust_name = idx 
               Case "cust_add"
                   cust_add = idx  
               Case "zip"
                   zip = idx   
               Case "tel"
                   tel = idx   
               Case "dl_number"
                   dl_number = idx 
               Case "gstin"
                   gstin = idx 
   
               End Select
   
           Next
   
       Else
   
           Dim strfields() as string = Row.Column0.split(CChar("|"))
   
           If Distributer_Code > -1 Then Row.DistributerCode = strfields(Distributer_Code)
           If Cust_code > -1 Then Row.Custcode = strfields(Cust_code)
           If cust_name > -1 Then Row.custname = strfields(cust_name)
           If cust_add > -1 Then Row.custadd = strfields(cust_add)
           If zip > -1 Then Row.zip = strfields(zip)
           If tel > -1 Then Row.tel = strfields(tel)
           If dl_number > -1 Then Row.dlnumber = strfields(dl_number)
           If gstin > -1 Then Row.gstin = strfields(gstin)
   
       End If
   
   
       intRowIndex += 1
   
   End Sub
   

9. 
   Mapeie as colunas de saída para o destino OLEDB