Pablo Ricardo

Há a possiblidade de ter a consulta com 'itens' tendo o hash da chave da NFe sem passar pelo CAPTCHA utilizando o ACBr?

Eu tenho linha com a seguinte descrição '|0200|4|SALGADOS|||KG|00|19051000||||17|'. Preciso separar os dados do pipe para salvar no banco. Alguma sujestão? ReadLn(txt, line); if True then if (Pos('|0200|', line)) = 1 then begin fArq.Add(line); //fdquery.... end; if (pos('|0000|', line)) = 1 then begin //fdquery.... fArq.Add(line); end; if (pos('|0005|', line)) = 1 then begin //fdquery.... fArq.Add(line); end; if (pos('|C460|', line)) = 1 then begin //fdquery.... fArq.Add(line); flagCF := True; end else begin if flagCF = True then if (pos('|C490|', line)) = 0 then //fdquery.... fArq.Add(line) else flagCF := False; end

procedure TfrmImportacaoSPED.LoadArquivo; var txt: TextFile; line: String; posicao: Integer; flag: Boolean; begin flag := False; AssignFile(txt, edtPath.Text); Reset(txt); if fArq = nil then fArq := TStringList.Create else fArq.Clear; fArq.BeginUpdate; while not Eof(txt) do begin ReadLn(txt, line); if True then if (pos('|C460|', line)) <> 0 then begin fArq.Add(line); flag := True; end else begin if flag = True then fArq.Add(line); end; end; CloseFile(txt); fArq.EndUpdate; mmo1.Text := fArq.Text; FreeAndNil(fArq); end; Funcionou para o que estou pensando em fazer. Muito obrigado pessoal.

ReadLn(txt, line); if True then if (pos('|C460|', line)) <> 0 then Consegui separar assim... más o pos não me parece recomendado pra

Gostaria de comparar os dados de uma string utilizando a mesma forma do Like do sql. Ex.: while not Eof(txt) do begin ReadLn(txt, line); if True then if Trim(line) = LIKE '|0150|' then end; Importação do SPED Fiscal, só quero alguns blocos. Alguma idéia, recomendação?

O erro só ocorre no firemonkey e estou sem rumo para concertar. Se alguém puder ajudar. Muito obrigado.

Tudo bem. Muito obrigado!

Pessoal, estou fazendo a consulta, lendo o xml (exemplo: 20141016095824-nfe-dest.xml) para pegar o NSU. Após isso ou fazer o loop -1 do contador do nsu para trazer todos os xml's. Posteriormente irei filtrar os xml's das notas dentro do intervalo que está na tag <dEmi> (exemplo: <dEmi>2014-10-01</dEmi>) para fazer o processo de confirmação e fazer o download do xml, salvar em banco e trabalhar com dados dos itens (o que é a intensão da aplicação). Esse caminho que estou seguindo é o correto mesmo ou estou tomando rumo diferente? Ainda não conheço o ACBrNfe a fundo pra saber se vou fazer algo desnecessário, que ele já faz. edit.: Estou cogitando ler captcha e montar pela informação web...

Me deparei com ACBr agora pela necessidade de baixar as destinadas. Observando o exemplo que vem com o instalador e utilizando o software da sefaz (aplicativo de manifestação do destinatário) me surgiu algumas dúvidas. No software da sefaz eu procuro pelos últimos 15 dias ou do último NSU coletado até o momento. Já na ACBr não tem essa limitação de "search". Pelo que entendi elas estarão disponíveis por 180 dias então iria baixar sempre o último NSU, comparar a <dhResp>2014-10-15T09:16:00</dhResp> e vê se é o que me serve. Pensei em fazer isso manualmente, o ACBr faz essa conparação? Porque se sim, ainda não encontrei. Também não encontrei opção de confirmação de operação para fazer o download. Esse webservice vai ser desativado, para utilizar o novo webservice as propriedades parâmetros para consumir é praticamente o mesmo né? Alguma sujestão de caminho a seguir?

Já estou fazendo isso. Más obrigado de qualquer forma. Edit.: imaginei que teria alguma coisa no instalador ou algo do tipo, por isso a pergunta.

Não estou conseguindo instalar os pacotes dos relórios (XE7) e então não roda esse exemplo. Alguém tem alguma idéia de como resolver sem ser removendo as declarações? Só preciso testar alguma das opções. Não preciso dos relatórios. Muito obrigado. Reinstalei todos os componentes para vocês enxergarem por completo.