Painel de líderes

Boa tarde Marcelo, Favor atualizar os fontes, reinstale o ACBr e faça novos testes.

Hum.. pode ser configuração na área de Base de Conhecimentos.. verificando..

Boa tarde @Ita Júnior Atualizei, refiz os testes e funcionou perfeitamente. Muito obrigado pela atenção. Pode fechar.

Boa tarde Marcelo, Eu não fiz nenhuma alteração no provedor DataSmart. Por favor abra a Unit DataSmart e altere o XMLToStr por IncluirCDATA nas function que montam o Request. Depois reinstale o ACBr e faça os testes.

Boa tarde Marcelo, Já esta no SVN.

Boa tarde Eliandro, Já esta no SVN.

Certo, e isso é exclusivo do Tecnos. Enviei um email para o suporte do Tecnos, vou ver se eles me respondem, qqr coisa lhe comunico. Mas muito obrigado por enquanto.

O Instalador do ACBr não é compatível com essa versão do Delphi Veja esse tópico:

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

Marcelo, Acredito que o jeito é incluir na lista de erros o A0000 e a aplicação tratar esse erro como não erro. Já inclui na minha lista de tarefas para incluir o A0000 na lista de erros, apesar dele não ser um erro. TK-2220

Eliandro, Muito obrigado pelos testes e retorno. Já inclui na minha lista de tarefas para realizar essa alteração. TK-2219

Normalizado.

basta desmarcar no instalador mas o problema seu é que tu já havia a muito tempo instalado manualmente o componente. então olhe que tu tem arquivos perdidos no seu windows. principalmente na pasta documentos publicos

Bom dia Marcelo, No retorno consta na lista de erros o erro A0000, que para mim não é um erro e sim uma mensagem acusando que a operação foi realizada com sucesso. Acho que o tratamento a ser feito é verificar a quantidade de erros presentes na lista de erros, se for zero significa que não temos nenhum erro, logo pegamos o numero do protocolo e realizamos a consulta para obter o XML da nota.

Depurando isso ocorre na primeira linha né? ou tu não depurou? se é na primeira linha quer dizer que tu não tem uma notafiscal carregada

Devido ainda não saber o motivo o jeito foi mesmo enviar em contingência. Obrigado mais uma vez a você Renato.

Boa noite Renato, obrigado pela ajuda. Também estive vendo isso no portal, achei muito estranho por isso postei aqui.

Olá Italo, Muito obrigado pelo seu breve retorno, competente como sempre. Vou atualizar aqui e tentar no ambiente de produção. Muito obrigado mais uma vez. Michel Abrão.

Este tópico lhe ajudará na resolução desse problema... Se após atualizar o ACBr, você está tendo problemas de exibição das Mensagens do Operador/Cliente, isso se deve devido a uma mudança na API, que agora tem um parâmetro novo, com a indicação que a Mensagem deve ser exibida em Todas as telas... Para ajustar os seus fontes, é bem simples, basta adicionar uma condição para Terminal = tmTodas Exemplo para aplicações que usam o componente ACBrTEFD procedure TFormPrincipal.PayGoWebExibeMensagem(Mensagem: String; Terminal: TACBrTEFPGWebAPITerminalMensagem; MilissegundosExibicao: Integer); var FormExibeMensagem: TFormExibeMensagem; begin if (Mensagem = '') then begin if (Terminal in [tmCliente, tmTodas]) then // <--------- AQUI ---------- MensagemTEF('',' ') ; if (Terminal in [tmOperador, tmTodas]) then MensagemTEF(' ','') ; end else if MilissegundosExibicao >= 0 then begin FormExibeMensagem := TFormExibeMensagem.Create(Self); try FormExibeMensagem.Mensagem := Mensagem; FormExibeMensagem.TempoEspera := MilissegundosExibicao; FormExibeMensagem.ShowModal; finally FormExibeMensagem.Free; end; end else begin if (Terminal in [tmCliente, tmTodas]) then // <--------- AQUI ---------- MensagemTEF('',Mensagem) ; if (Terminal in [tmOperador, tmTodas]) then MensagemTEF(Mensagem,'') ; end; end; Exemplo para aplicações que usam o componente ACBrTEFAPI procedure TFormPrincipal.ACBrTEFAPI1QuandoExibirMensagem( const Mensagem: String; Terminal: TACBrTEFAPITela; MilissegundosExibicao: Integer); var FormExibeMensagem: TFormExibeMensagem; begin if (Mensagem = '') then begin if (Terminal in [telaCliente, telaTodas]) then // <--------- AQUI ----------- MensagemTEF('',' '); if (Terminal in [telaOperador, telaTodas]) then MensagemTEF(' ',''); end else if (MilissegundosExibicao >= 0) then begin FormExibeMensagem := TFormExibeMensagem.Create(Self); try FormExibeMensagem.Mensagem := Mensagem; FormExibeMensagem.TempoEspera := MilissegundosExibicao; FormExibeMensagem.ShowModal; finally FormExibeMensagem.Free; end; end else begin if (Terminal in [telaCliente, telaTodas]) then // <--------- AQUI ----------- MensagemTEF('',Mensagem); if (Terminal in [telaOperador, telaTodas]) then MensagemTEF(Mensagem,''); end; end;

Pessoal, Vi muitos tópicos com dúvidas para instalação das versões que não permitem compilação por linha de comando. Caso seja útil, segue resumo para a instalação manual com passos que funcionaram para mim. Não utilizo todos os módulos do componente, mas acredito que tudo funcione corretamente seguindo esses passos. Testei vários projetos e todos compilaram. Atenção: A versão CE não destina-se a testes e não deve ser instalada na sua empresa caso o seu faturamento geral ultrapassar os limites estabelecidos. Neste caso, solicite uma licença trial e evite ficar irregular. No final do tópico coloquei um link de outro tópico contendo destaques dos valores e condições para utilização da versão CE. Instalar o ACBr no Delphi CE ou Trial 1. Descompactar a pasta ACBrInstall_CE no raiz do ACBr ---> ACBrInstall_CE.zip 2. Dependências 2.1. Instalar o fortes reports: https://github.com/fortesinformatica/fortesreport-ce * Abrir o .dpk * Botão direito sobre ele e clicar em Build * Botão direito e clicar em Install 2.2. Quem possui e utiliza o Fast, instalar o Fast 2.3. Unit scope names: Acessar Tools / Options / Language / Delphi / Library / Unit scope names >>> Adicionar “Vcl” na lista * O arquivo Registrar_UnitScopeNames_Vcl.reg preenche a informação, sobrepondo o padrão , que é em branco. Fazer com o Delphi fechado. 3. Grupos de projetos para geração das bpls * para evitar retrabalho, veja o erro 4.1 pois pelos meus testes sempre foi necessário alterar para “.dres” no DCLACBr_Comum.dpk 3.1. Quem possui o Fast, ignorar o item 3.2, abrir o InstalacaoFR.groupproj e processar o Build All com o botão direito no grupo InstalacaoFR 3.2. Quem não possui o Fast, abrir o InstalacaoRL.groupproj e processar o Build All com o botão direito no grupo InstalacaoRL 4. Erros 4.1. Caso ocorra o erro "Resource ACBR not found" * Botão direito sobre o DCLACBr_Comum.bpl, “View Source” * Alterar de {$R *.otares} para {$R *.dres} 4.2. Caso ocorram erros como Graphics, Forms, Controls , etc “not found“: * Caso não tenha feito a configuração geral no item 2.3, pode ser feito por pacote: adicionar Vcl em Project / Options / Building / Delphi Compiler / Unit scope names 4.3. Se ocorrerem erros nas classes do Fortes ( TfrmCTeDAInutRL, TfrlGuiaRL, TfrlDAMDFeRL, TfrmMDFeDAEventoRL, TfrlXDANFSeRL ) na primeira abertura do grupo de projetos, basta ignorá-los e dar ok, pois estão reclamando das dependências que ainda serão instaladas no grupo. 4.4. Caso ocorram erros como "Fortes report Unit 'RLReport' not found": (colaboração do @felipe de souza) * Adicionar ao library o caminho do source \trunk\source 5. Após compilar todos os pacotes, executar o arquivo para vincular(instalar) os componentes ao Delphi * Feche o Delphi para registrar as bpls 5.1. RegistrarComponentesFR.reg para quem possui o Fast, não precisando executar o item 5.2 5.2. RegistrarComponentesRL.reg para quem não possui o Fast Obs: Não possuo o Fast então não tive como compilar nem testar o .reg para validar, apenas adicionei os pacotes no grupo e gerei o arquivo. Caso alguém valide e precise de ajustes, por favor compartilhe a correção para ajudar os demais. Conforme mencionado no início, segue tópico contendo destaques dos valores e condições para utilização da versão CE.

Apesar do manual exemplificar um GUID com parâmetros de entrada(XPTO + CIELO), desconheço qualquer função de geração de GUID que aceite parâmetros de entrada. https://pt.wikipedia.org/wiki/Identificador_Único_Global Você pode seguir o exemplo que vc postou, buscar por "GUID generator" no google e usar os diversos sites que fazem a geração online, ou seguir este exemplo - https://www.devmedia.com.br/criar-guid-em-tempo-de-execucao/16715