EMBarbosa

Olá, Seja bem vindo ao fórum. Esperamos que ele seja de ajuda a resolver seus problemas. Realmente, por vezes é frustrante o trabalho de desenvolver softwares. Ainda assim, por favor, mantenha o nível profissional em suas mensagens. Temos regras simples para manter um ambiente saudável.

Olá, Não tenho muita experiência no FMX com essa parte. Dito isso, notei que tem correções no Delphi Rio 10.3.1 para essa action. Veja aqui https://quality.embarcadero.com/browse/RSP-18961 Você está utilizando a última versão 10.3.1? Fora isso, talvez você precise verificar o evento "onDidFinishTaking" para salvar o arquivo primeiro. Pelo que deu pra entender do help, o crop é ativado depois que o foi carregado. Talvez isso exija que ele esteja salvo.

Olá Lincoln, Esse me parece ser outro erro e não tem relação com este tópico.

A nota técnica (NT) 005/2018 adiou para algumas UFs a implantação disso em produção pra 07/05/2019. Para outras isso passa a valer em produção no último dia útil de abril. Veja a página 4, "Histórico de Alterações / Cronograma" da referida NT.

Não existe mais esse if que você mencionou. Por isso eu que disse que você não testou com a alteração que enviei ao SVN.

Como eu acabei de enviar uma correção ao SVN, tente atualizar e testar com o que está no SVN. Caso note que ainda assim é necessário uma correção, por favor, anexe o arquivo alterado para análise.

Enviei a alteração na Revisão 16866. Queiram por favor fazer a atualização, testar e reportar qualquer problema.

A sugestão foi enviada ao SVN na revisão 1683. Mas precisamos de uma correção melhor. De acordo com a versão 1.20 da NT 02/2018: A tag vICMSSubstituto tem ocorrência facultativa (0-1) em todos os grupos; A tag pST tem ocorrência facultativa (0-1) no grupo ICMSST (id = N10b); Na forma como está no SVN nessa revisão esses pontos não conseguem ser atendidos.

Você comparou esse com o xml gerado pelo seu programa que não foi enviado?

Olá Willian, Que estranho ele não ter essa função... Não tem um manual ou help que indique como importar os dados?

Ué... testei com o arquivo que você anexou acima...

Olá Willian, Encontrei esse aplicativo no site da Receita. Ele não serve como validador dos dados ou estrutura?

Enviado ao SVN na revisão 16857. Muito obrigado pela sugestão.

Me parece ok. Enviei ao SVN na revisão 16856. Queira por favor testar e validar. Fique atento principalmente a reimpressão não estar faltando nenhum dado que deveria ser impresso.

Isso é feito porque você está carregando o xml de terceiros. O componente então vai verificar se o xml está assinado e se não estiver vai ser assinado e validado antes de colocá-lo na fila para enviar. Essa alteração modifica o comportamento do componente e por isso precisamos ter um pouco de cautela. Se isso for alterado, por exemplo, precisaria ser nos dois métodos ao mesmo tempo (LoadFromString e LoadFromStringINI). Vou pedir uma ajuda ao @Italo Jurisato Junior pra ajudar a analisar essa questão.

Muito obrigado pela correção. Foi enviada ao SVN na revisão 16849. Também aproveitei para criar um teste unitário para esse erro.

Esse problema só acontece com o Delphi 7. Foi enviada uma correção para esse problema na revisão 16848. Esse erro acontece pois você tem versões diferentes da ACBrUtil.pas compiladas no seu computador. É provável que uma versão do Delphi está pegando os arquivos da outra.

Olá, Enviei alterações baseadas nessa sugestão na revisão 16847. Mas suas alterações não foram implementadas totalmente. Notei que o método function TEventos.LoadFromString da unit ACBreSocialEventos.pas foi alterado removendo o SaveToFiles. Mas isso já é utilizado pelo componente. Qual o motivo dessa remoção?

Olá Arce, Testei no tanto no Lazarus como no Delphi e funcionou corretamente. Utilizando o programa de exemplo, fiz as seguintes alterações no evento "onclick" do botão "btnCarregarXML": procedure TFExemploEsocial.btnCarregarXMLClick(Sender: TObject); var i: Integer; S5011: TS5011; begin OpenDialog1.Title := 'Selecione o Evento (Arquivo XML)'; OpenDialog1.DefaultExt := '*.xml'; OpenDialog1.Filter := 'Arquivos XML (*.xml)|*.xml|Todos os Arquivos (*.*)|*.*'; OpenDialog1.InitialDir := ACBreSocial1.Configuracoes.Arquivos.PathSalvar; if OpenDialog1.Execute then begin MemoResp.Clear; MemoResp.Lines.LoadFromFile(OpenDialog1.FileName); S5011 := TS5011.Create; S5011.Xml:= MemoResp.Lines.Text; end; MemoResp.Lines.Clear; MemoResp.Lines.Add('XML de Eventos Carregado com Sucesso!'); MemoResp.Lines.Add(' '); ...// as demais linhas deixei não alterei.. Talvez tenha alguma coisa que eu não entendi. Queira verificar, por favor.

Olá, uma alteração foi enviada ao SVN na revisão 16846 com base na sua sugestão. Queira atualizar e testar e reportar qualquer problema.

Muito obrigado pela sugestão. Uma correção foi enviada para os documentos CT-e, MDFe e NFe na revisão 16845.

Não tenho muita experiência no Tef Direção. Mas essa extensão 001 não é o número do terminal? Veja essa mensagem de um usuário chamado marciodc:

Verifique qual parâmetro você está passando para o método ACBrTEFD1.AtivarGP( ) e se esse é mesmo o modelo que deve utilizar com o Tef Direção.

Esse evento foi removido na versão 2.5, mas ainda não foi removido do SVN. Vamos remover, mas enquanto isso, você já pode remover do seu programa.

Olá pessoal, esse tópico já ficou maior que o necessário. Estou fechando. Por favor, criem novos tópicos para quaisquer novos ajustes ainda necessários conforme as regras do fórum. Muito obrigado pela compreensão.