Acredito que não seja erro, mas alguma falta de lógica na função, ou alguma falta de informação de mim parte.
mas a inconsistência está aqui;
function TGuiasRetorno.LoadFromFile(CaminhoArquivo: string): boolean;
var GNRERetorno : TGNRERetorno;
ArquivoRetorno: TStringList;
i: Integer;
begin
try
ArquivoRetorno := TStringList.Create;
ArquivoRetorno.LoadFromFile(CaminhoArquivo);
Result := True;
GNRERetorno := TACBrGNRE(ACBrGNRE).GuiasRetorno.Add.GNRE;
for i := 0 to ArquivoRetorno.Count - 1 do
begin
if SameText(Copy(ArquivoRetorno.Strings, 1, 1), '0') then
- A condição "if SameText(Copy(ArquivoRetorno.Strings, 1, 1), '0') then ", os arquivos que estou carregando não entram nessa condição.
estou tentando carregar esse xml:
<?xml version="1.0" encoding="UTF-8" standalone="true"?>
-<TLote_GNRE xmlns="http://www.gnre.pe.gov.br">-<guias>-<TDadosGNRE><c01_UfFavorecida>RS</c01_UfFavorecida><c02_receita>100099</c02_receita><c27_tipoIdentificacaoEmitente>1</c27_tipoIdentificacaoEmitente>-<c03_idContribuinteEmitente><CNPJ>51467447000106</CNPJ></c03_idContribuinteEmitente><c28_tipoDocOrigem>10</c28_tipoDocOrigem><c04_docOrigem>0008556</c04_docOrigem><c06_valorPrincipal>971.34</c06_valorPrincipal><c10_valorTotal>971.34</c10_valorTotal><c14_dataVencimento>2014-01-17</c14_dataVencimento><c16_razaoSocialEmitente>Rodabras Ind. Bras. Rodas e Autopecas Ltda</c16_razaoSocialEmitente><c17_inscricaoEstadualEmitente>417003492110</c17_inscricaoEstadualEmitente><c18_enderecoEmitente>Rua Palmeiras</c18_enderecoEmitente><c19_municipioEmitente>02774</c19_municipioEmitente><c20_ufEnderecoEmitente>SP</c20_ufEnderecoEmitente><c21_cepEmitente>13484080</c21_cepEmitente><c34_tipoIdentificacaoDestinatario>1</c34_tipoIdentificacaoDestinatario><c36_inscricaoEstadualDestinatario>100038522</c36_inscricaoEstadualDestinatario><c37_razaoSocialDestinatario>G.M.V. COML DE FERRAGENS LTDA</c37_razaoSocialDestinatario><c38_municipioDestinatario>00606</c38_municipioDestinatario><c33_dataPagamento>2014-01-17</c33_dataPagamento>-<c05_referencia><periodo>1</periodo><mes>01</mes><ano>2014</ano></c05_referencia></TDadosGNRE></guias></TLote_GNRE>
Alguém tem alguma idéia?