Reinaldo Silveira

Olá pessoal. Alguém tem mais detalhes sobre essa autenticação dos correios? Como e onde se cadastrar, se é gratuito ou pago, valores, etc. Obrigado!

Entendo. Para as outras manifestações (exceto Desconhecimento), normalmente o xml completo é disponibilizado após alguns minutos. Agora com a bendita Operação não realizada, mesmo após 24 horas da manifestação, somente o resumo.

Boa tarde. Ajudou a compreender melhor o cenário, mas ainda não sanou minha dúvida. Não sei se é algum mal funcionamento do componente, ou se é algo relacionado à Sefaz.

Você não especificou seu cenário (qual banco utiliza, se a tabela possui auto-incremento , etc...) Mas no geral, você pode tentar algo assim: INSERT INTO TB_PRODUTO(DESCRICAO, PRECO) SELECT DESCRICAO, PRECO FROM TB_PRODUTO;

Bom dia pessoal! De acordo com a NT 2014/002 que trata da Distribuição de DF-e: Faço da seguinte forma: ACBrNFe1.DistribuicaoDFePorChaveNFe(UFtoCUF(edtUF.Text), edtCnpj.Text, edtChave.Text); if ACBrNFe1.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[0].resDFe.chDFe <> '' then if ACBrNFe1.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items[0].schema = schprocNFe then ... Quando a nota é manifestada como Ciência da Operação ou Confirmação de Operação, obtenho a nota completa (schema = schprocNFe), mas na Operação não Realizada, somente o resumo (schema = schresNFe). Segundo a NT, não deveria ser disponibilizada a NF completa? Obrigado a todos.

dreamsoft_PR, Você não disse qual banco está utilizando. Mas no geral, você poderia utilizar uma tabela derivada. Algo assim: select * from ( select i.codvend ,sum(i.vlrtotal) soma_item ,(select sum(c.vlrtotal) from tab_vend c where c.codvend = i.codvend group by c.codvend) soma_venda from tab_item i left join tab_vend w on (w.codvend = i.codvend) where w.datvend >= :dae group by i.codvend ) where soma_venda < soma_item Outra alternativa semelhante é utilizar a cláusula WITH Faça uns testes e compartilhe o resultado. Abraço.

Teste o seguinte Valtran: uses Jpeg, PngImage, Clipbrd; procedure LoadImageFromFile(pArquivo: String; pImgDest: TDBImage); var Jpeg: TJPEGImage; Bitmap: TBitmap; Png: TPngImage; lsExt: String; begin lsExt := LowerCase(ExtractFileExt(pArquivo)); if (lsExt = '.jpeg') or (lsExt = '.jpg') then begin Jpeg := TJpegImage.Create; Jpeg.CompressionQuality := 50; Jpeg.LoadFromFile(pArquivo); Clipboard.Assign(Jpeg); Jpeg.Free; end else if lsExt = '.bmp' then begin Bitmap := TBitmap.Create; Bitmap.LoadFromFile(pArquivo); Clipboard.Assign(Bitmap); Bitmap.Free; end else if lsExt = '.png' then begin Png := TPngImage.Create; Png.LoadFromFile(pArquivo); Clipboard.Assign(Png); Png.Free; end; pImgDest.PasteFromClipboard; Clipboard.Clear; end; Use o seguinte comando para inserir a imagem no campo ligado do DBImage: if OpenDialog1.Execute then LoadImageFromFile(OpenDialog1.FileName, DBImage1); Essa é apenas uma das forma de se fazer. Qualquer dúvida posta aí.

No repositório do ACBr existe um exemplo de como listar as notas: C:\ACBr\Exemplos\ACBrDFe\ACBrNFe\DistribuicaoDFe.txt Dá pra ter uma boa ideia do funcionamento baseando-se por lá.

alguma dica, pessoal?

Se for no SQL Server, como o Juliomar disse não é possível. Essa seria uma alternativa: DECLARE @PARAM NVARCHAR(MAX) = :para DECLARE @SQL NVARCHAR(MAX) = 'select * from TAB_CLIE where CODCLIE in ('+ @PARAM +')' EXEC sp_executesql @SQL Em outros bancos pode ser possível (no Firebird pelo que me lembro dá certo).

Olá amigos. Ao tentar validar o xml CT-e em anexo pelo método: ACBrCTe1.Conhecimentos.LoadFromFile(...); ACBrCTe1.Conhecimentos.Validar; recebo a seguinte exception: Observei que o xml possui caracteres acentuados, mas está sem a literal '<?xml version="1.0" encoding="UTF-8"?>' no início do arquivo. Caso eu adicione, o arquivo é validado normalmente. Alguma ideia de como proceder? obs.: quando baixo o xml da receita, ele vem dessa forma (sem o encoding). obs2: fontes e schemas atualizados. Obrigado! 35180802012862004661570410000495991481082965.xml

Olá amigos. Segue resposta da Sefaz SP, assumindo a "cagada" da antecipação da validação do GTIN: Prezado contribuinte , Identificamos que regras de validação envolvendo GTIN foram indevidamente inseridas na última versão do sistema NF-e publicada em produção. Já estamos atuando para sanar essa complicação. Agradecemos o contato e pedimos desculpas pelo transtorno. ” ________________________________________________________ Mensagem Original: Data de início da obrigatoriedade Bom dia. De acordo com a nota técnica 2017.001 da NF-e 4.0, a validação do GTIN (tags cEAN e cEANTrib) entrariam em vigor no ambiente de produção somente em 01/12/2018. Porém, desde ontem (23/07/2018) as notas estão sendo rejeitadas pelo motivo: "Rejeição 889: Obrigatória a informação do GTIN para o produto". Gostaria de saber se foi algum erro interno na Sefaz SP ou se realmente o prazo foi adiantado, pois não encontrei nenhuma referência a respeito. Aguardo retorno, obrigado.

Obrigado Juliomar!

kaciane, atualmente para a versão 4.00 a unit retorna assim: '0 - REMETENTE' '1 - DESTINATARIO' '2 - TERCEIROS' '3 - PROP/REMT' '4 - PROP/DEST' '9 - SEM FRETE'

Olá amigos. Algum commiter poderia aumentar o tamanho do campo ModFrete na unit ACBrNFeDANFEFRDM.pas por gentileza? Mais precisamente na linha 1593, pois está cortando na impressão do danfe quando a string é '1 - DESTINATARIO' (16 caracteres) - este campo é preenchido pelo método modFreteToDesStr da unit pcnConversaoNFe. Posso alterar nos meus fontes, mas seria legal deixar atualizado para todo mundo. Obrigado.

Não sei se é o seu caso, mas quando tive esse problema notei que os fields do tipo TFMTBCDField (tipo NUMERIC no Firebird) não eram agregados corretamente. Já fields do tipo TFloatField (tipo DOUBLE PRECISION) funcionavam corretamente. Apenas para teste, tente dar um cast na sua consulta: select cast(CAMPO as double precision) as CAMPO from... Depois remova o campo do dataset e do clientdataset, adicione novamente (veja se foi criado como TFloatField) e crie o aggregate novamente.

Qual DB você usa? Já tive problemas com aggregate de campos tipo NUMERIC do Firebird.

conforme falei anteriormente, este é o mesmo xml baixado da Sefaz.

Entendo. E qual a saída neste caso, verificar junto à transportadora?

Debugando aqui, verifiquei a seguinte situação: na unit ACBrCTeConhecimentos, no método Validar tem a seguinte instrução (linha 348): RetornarConteudoEntre(AXML, '<CTe xmlns', '</CTe>') porém, este xml em questão não possui a declaração namespace <CTe xmlns=”http://www.portalfiscal.inf.br/cte”>, está somente <CTe>, conforme comparativo abaixo: Minha dúvida agora é a seguinte: este xml poderia ter sido validado desta forma, ou seja, é permitido autorizar um CT-e sem esta namespace? Obrigado pela ajuda!

sim.

Reinstalei o ACBr apagando os arquivos antigos, segundo orientação do Felipe, mas o erro continua. Desculpa a ignorância Italo, mas pelo validador da Sefaz RS mostra que a assinatura está válida. Também tentei baixar o CT-e direto da receita, mas o conteúdo do xml é idêntico ao que eu anexei anteriormente. Agora fiquei na dúvida, este xml está correto ou não?

Boa tarde pessoal. Estou tentando validar o CT-e em anexo pelo método: ACBrCTe1.Conhecimentos.LoadFromFile(...); ACBrCTe1.Conhecimentos.Validar; mas retorna o seguinte erro: Arquivo "Erro_v3.00.xsd" não encontrado. Acabei de atualizar os fontes (a pasta de Schemas também está atualizada), mas o erro persiste. Alguma ideia? Obrigado. 41180448740351000327570000013704871471254024.xml

Observe que se você fazer a consulta assim: LIKE '%AFASTADOR%MEDIO%' você obterá resultado. Ou seja, substituindo o caractere espaço por porcentagem, sua pesquisa ficará mais flexível. Tente algo assim: qry.Close; qry.SQL.Add('SELECT * FROM TB_PRODUTO WHERE DESCRICAO LIKE :pesquisa'); qry.Params[0].Value := '%'+ StringReplace(edtPesquisa.Text, ' ', '%', [rfReplaceAll]) +'%'; qry.Open; Eu uso desta forma e nunca tive problemas.

Entendi. Muito obrigado pelo retorno!