Daniel Simoes

Era pra ser idêntico... já que o valor a ser criptografado, a chave Privada, e a rotina de Criptografia são os mesmos

Recompile o Package ACBrComum... a ACBrStrToUTF8 está em ACBrUtil... Rodar o ACBrInstall deve forçar a recompilação de todos os pacotes

Analisando os fontes, notei certa dificuldade em compreender o significado de cada propriedade nova... A abreviação do nome não deixa que a propriedade seja usada de forma intuitiva... Também notei que foram efetuadas muitas modificações na Unit ACBrNFeDANFeRLRetrato... (fica difícil de rastrear se todos os objetos existentes continuam lá) Não me sinto a vontade para subir as modificações... Deixo a decisão para outro commiter com mais experiencia no DANFE em Fortes

Não consegui reproduzir exatamente o mesmo problema... Mas apliquei várias modificações com o intuito de verificar se o Path definido para a gravação do PDF, está correto...

Você deve usar: NFe.EnviarEmailEvento(cEmailDestino,cArqXMLEvento,[cArqXMLNFe],cEnviaPDF,[cAssunto],[cEmailsCopias],[cAnexos]) No comando anterior ele irá tentar ler do XML uma Nota Fiscal... como ela não existe ocorre o erro...

Muito obrigado pela colaboração... Enviei para o SVN com pequenos ajustes... As Datas em ObjectPascal são do tipo Double... O valor "30/12/1899", representa 0 (zero)... Se o valor for positivo, é o numero de dias a partir dessa data, negativo, dias para trás dessa data... Nas decimais ele armazena o numero de segundos desde a meia noite... Portanto, poderia ser escrito como: "(NFe.Ide.dSaiEnt <> 0)"

Não consigo reproduzir com as informações que você forneceu... Observe que para mim é impossível saber o valor dos campos que estão na sua Query... (Ex:DM.qrConf.FieldByName('END_ARQ_ENV_RESP').AsString) Por favor faça um mini projeto, atribuindo todos os valores necessários para o teste, antes de chamar o método de Consulta..

Primeiro instale o Fortes CE, de acordo com as instruções dele... E certifique-se de que o mesmo está instalado corretamente no Delphi

Capture o Log do SAT... Deve ter mais informações lá

Qual comando você está executando ?

Apague essas BPLs geradas do diretório do Seu Delphi, antes de efetuar uma nova instalação...

provavelmente ele não está achando a BPL do Fortes Report... onde ela foi gerada ? Certifique-se que esse diretório consta no PATH da máquina (ou use o Environment, override na IDE para redefinir o PATH)

http://www.projetoacbr.com.br/forum/topic/24414-erro-com-sats-bematech-e-sweda-produção/?do=findComment&comment=157772

Provavelmente você não está usando o Fortes CE... atualmente não há ninguém dando suporte dessa versão do Fortes

Estude os fontes do SATTeste.exe... use o ";"

Muito provavelmente NÃO... Mas nada impede você de ajustar os fontes do antigo e recompilá-lo... Ou ainda contratar alguém com conhecimentos de Delphi para realizar essa tarefa

Provavelmente você está usando a Largura da barras muito alta... tente 1 ou 2.. (zero) usará o valor default

Todas as modificações que fiz estão no Branches para Lazarus https://github.com/fortesinformatica/fortesreport-ce/tree/lazarus

Como eu já disse antes... eu não tenho a menor intenção de implementar isso... (Não é simples... USB não é um "padrão" como o protocolo Serial) Se desejar implementar e enviar para o projeto seus fontes para analise, fique a vontade...

Observe as propriedades de ACBrSAT.Resposta... lá tem vários dos registradores que podem ser traduzidos por esses métodos.... Veja também os fontes em: ACBrSATClass.pas procedure TACBrSATResposta.SetRetornoStr(AValue : String) ; var index : integer; AStr: String; begin { ***** RETORNOS DO SAT POR COMANDO ***** AtivarSAT....................: numeroSessao, EEEEE, mensagem, cod, mensagemSEFAZ, CSR ComunicarCertificadoICPBRASIL: numeroSessao, EEEEE, mensagem, cod, mensagemSEFAZ EnviarDadosVenda.............: numeroSessao, EEEEE, CCCC, mensagem, cod, mensagemSEFAZ, base64, timeStamp, chaveConsulta, valorTotalCFe, CPFCNPJValue, assinaturaQRCOD CancelarUltimaVenda..........: numeroSessao, EEEEE, CCCC, mensagem, cod, mensagemSEFAZ, base64, timeStamp, chaveConsulta, valorTotalCFe, CPFCNPJValue, assinaturaQRCOD ConsultarSAT.................: numeroSessao, EEEEE, mensagem, cod, mensagemSEFAZ TesteFimAFim.................: numeroSessao, EEEEE, mensagem, cod, mensagemSEFAZ, base64, timeStamp, numDocFiscal, chaveConsulta ConsultarStatusOperacional...: numeroSessao, EEEEE, mensagem, cod, mensagemSEFAZ, ConteudoRetorno ConsultarNumeroSessao........: numeroSessao, EEEEE, mensagem, cod, mensagemSEFAZ (ou retorno da Sessão consultada) ConfigurarInterfaceDeRede....: numeroSessao, EEEEE, mensagem, cod, mensagemSEFAZ AssociarAssinatura...........: numeroSessao, EEEEE, mensagem, cod, mensagemSEFAZ AtualizarSoftwareSAT.........: numeroSessao, EEEEE, mensagem, cod, mensagemSEFAZ ExtrairLogs..................: numeroSessao, EEEEE, mensagem, cod, mensagemSEFAZ, base64 BloquearSAT..................: numeroSessao, EEEEE, mensagem, cod, mensagemSEFAZ DesbloquearSAT...............: numeroSessao, EEEEE, mensagem, cod, mensagemSEFAZ TrocarCodigoDeAtivacao.......: numeroSessao, EEEEE, mensagem, cod, mensagemSEFAZ } .....

Juliomar.. parece ser "trunk", e não "trunk2"... No Fortes CE o nome de Package seria: FortesReportCE_Win32_DXE8_vcl (por enquanto)

Vamos por partes... imaginei que você estivesse falando do XML de retorno, mas aparentemente é o XML de envio.... Qual é o passo a passo para gerar o mesmo no SATTeste.exe ? Como ele deve estar configurado ? O que exatamente é o problema ? Como está e como deveria estar ? Já tentou editar o XML e envia-lo para o SAT ? o que ocorre ? {$IFDEFs} são resolvidos apenas em tempo de compilação... Acho que compreendi o que você diz... o método TCFeW.GerarXml, apenas irá adicionar a Tag com o tipo UTF8, se a IDE suportar UTF8 de forma nativa... isso indica que o XML não precisará ser convertido antes do envio (pois já está em UTF8) Porém observe em: TACBrSAT.EnviarDadosVenda, que o XML é convertido para UTF8 (se necessário)... Ou seja, o componente mantém o XML na codificação nativa da IDE... isso permite que você possa manipulá-lo e lê-lo de forma tranquila (pois usa o mesmo encoding de sua IDE) Porém, antes do envio, ele converte o mesmo para UTF8, que é o que determina a Especificação técnica do SAT

Ahh.. acho que peguei... Repare que há um parâmetro em ACBrSAT.CFe.GerarXML function GerarXML( ApenasTagsAplicacao: Boolean = false) : AnsiString ; Ou seja... da maneira que está.. ele está gerando Tags que são de preenchimento do SAT e não da aplicação... corrigindo o seu código, ficaria algo como: SAT.EnviarDadosVenda(SAT.CFe.GerarXML( True )); Se o CFe está na memória.. tudo que você precisa fazer é chamar: SAT.EnviarDadosVenda

Estranho... é como se o Compilador estivesse avaliando ambas as expressões, sem se preocupar com o Booleano... Enfim... a correção é justa, e não causará efeito colateral... Enviado para o SVN... obrigado

Tópico fechado por desacordo comercial