Oracle 10g + DBS 2006

[mpvargasParticipante]

Caro Rodrigo,

Segue abaixo o que foi solicitado:

1)Estrutura da Tabela Clientes

desc fazenda.clientes

Name Null Type

CLI_EMPRESA NOT NULL VARCHAR2(2)
CLI_CODIGO NOT NULL NUMBER(4)
CLI_NOME NOT NULL VARCHAR2(50)
CLI_ENDERECO NOT NULL VARCHAR2(50)
CLI_BAIRRO NOT NULL VARCHAR2(30)
CLI_CIDADE NOT NULL VARCHAR2(30)
CLI_ESTADO NOT NULL VARCHAR2(2)
CLI_CEP NOT NULL VARCHAR2(8)
CLI_FONE_COM VARCHAR2(15)
CLI_FONE_RES VARCHAR2(15)
CLI_FONE_CEL VARCHAR2(15)
CLI_FAX VARCHAR2(15)
CLI_TIPO_PESSOA VARCHAR2(1)
CLI_CIC VARCHAR2(18)
CLI_EMAIL VARCHAR2(40)

2)Fragmento do arquivo texto

101000HELDER HENRIQUE GALERA E OUTROS …
701001MARIA AMELIA FACURY NOVAIS …
801002ANTONIO VILLELA COUTO …

3)Trecho da aplicação

with DataModule do
  begin
    cdsClientes.Insert;
    cdsClientesCLI_EMPRESA.AsString := wempresa;
    cdsClientesCLI_CODIGO.AsFloat := StrToFloat(wcodigo);
    cdsClientesCLI_NOME.AsString := wnome;
    cdsClientesCLI_ENDERECO.AsString := wendereco;
    cdsClientesCLI_BAIRRO.AsString := wbairro;
    cdsClientesCLI_CIDADE.AsString := wcidade;
    cdsClientesCLI_ESTADO.AsString := westado;
    cdsClientesCLI_CEP.AsString := wcep;
    cdsClientesCLI_FONE_COM.AsString := wtele;
    cdsClientesCLI_FONE_RES.AsString := '';
    cdsClientesCLI_FONE_CEL.AsString := '';
    cdsClientesCLI_FAX.AsString := '';
    cdsClientesCLI_TIPO_PESSOA.AsString := wtipo;
    cdsClientesCLI_CIC.AsString := wcic;
    cdsClientesCLI_EMAIL.AsString := wemail;
    cdsClientes.Post;
  end;