Jump to content

110.png

Curso Gratuito para todos Usuários
+ Super Treinamento Assinando o SAC Anual

botao_campanha_thulio.png

sem_ttulo-620.fw_-e1583866078274.png 

Curso Dominando o ACBrMonitor
Novo Módulo Soluções de Varejo
Assine o SAC ACBr em qualquer plano e tenha acesso

Saiba Mais

Balança SM100 performance surpreendente

Tecnologia Japonesa   Teclado e Visor resistentes a água
Consumo inteligente de etiquetas   Baixo custo de manutenção
Comunicação Ethernet e WIFI independentes

Saiba Mais

Impressora de Etiquetas ELGIN - L42 PRO

Protocolos PPLA, PPLB, ZPL, EPL (automático)
Porta USB padrão Opcionais: Ethernet, Serial, Paralela
Sensor de Etiquetas Móvel Garantia de 18 meses

Saiba mais

Gustavo Déo da Silva

Membros
  • Content Count

    60
  • Joined

  • Last visited

Community Reputation

31 Excellent

About Gustavo Déo da Silva

  • Rank
    Membro

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

  1. Bom dia... Você fez alguma alteração no componente? Pois, de padrão o componente não está preparado para estes estados devido a falta de WS. Poderia compartilhar com nós a solução?
  2. Boa tarde @BigWings.... Unit: ACBrGNREGuiaFRDM Método: procedure TdmACBrGNREFR.CarregaDados; Linha: 170 Na melhoria da impressão da GNRE que eu havia sugerido e vc fez uma modificação para Retrocompatibilidade, acabou ficando com uma pequena falha, no momento do teste, eu não percebi que o SVN não havia sobreposto minha modificação no arquivo local, e acabei testando em cima da minha própria sugestão... Agora que deletei os fontes e baixei novamente, percebi que ficou com falha.. Segue nova sugestão, respeitando a sua alteração anterior, somente a origem da comparação ficou errada... Antes case TipoDocEmitente of Agora : case FieldByName('TipoDocEmitente').AsInteger of Me desculpe pela falha no teste... Fico no aguardo.. Att.: Gustavo Déo ACBrGNREGuiaFRDM.pas
  3. Boa tarde amigo... a primeira coisa a verificar seria o código dos campos extras "c39_camposExtras"... pois na versão de produção, não existe o campo 91 e 73 na tabela... Se vc pegou estes campos na homologação, infelizmente o governo não manteve os mesmos códigos na produção... Também passei por esta dificuldade... Verifique esta configuração, e reporte se deu certo... Obrigado!! Att.: Gustavo Déo
  4. Boa Tarde @Italo Jurisato Junior, @Juliana Tamizou... O Distrito Federal ainda se encontra na Versão 1.00, não está disponível a versão 2.00 Realizei uma nova transmissão, e agora foi realizado com sucesso... Pode ter sido uma instabilidade da receita... De momento o tópico está resolvido.. Obrigado!!!
  5. Eu que agradeço... O tópico pode ser encerrado... Obrigado...
  6. Bom dia... Eu já havia testado com a versão 1.00 no modelo que passei e havia funcionado... Mas sua solução tb funcionou perfeitamente... Obrigado!!! Att.: Gustavo Déo
  7. Se resolver o problema, reportar no fórum para que possam fechar o tópico.. Se tiver mais alguma dificuldade, deixe um comentário, eu passei por algumas dificuldades e agora estou conseguindo emitir as guias.. Abraços!!!...
  8. Boa tarde amigo @Leonardo Moreira... Também passei por essa dificuldade... Acontece que essa inscrição estadual, só deve ser informada, caso a empresa emitente tenha inscrição estadual na UF de destino para o recolhimento por apuração do imposto, no geral, ela não deve ser informada... Espero que tenha ajudado com o problema... Att.: Gustavo Déo
  9. Boa Tarde amigo @adrhohmann... Amigo, alguns estados ainda estão gerando na versão 1.0, sendo assim o arquivo "xxxx-GUIA" é TXT, no componente, tem a propriedade "SalvarTXT", e na sua imagem está marcado como False... Deixe como True.. Abraços... Att.: Gustavo Déo...
  10. ACBrGNREGuiaFRDM.pas Segue o anexo... Att.: Gustavo Déo ACBrGNREGuiaFRDM.pas
  11. Soluções sugeridas e em produção no tópico abaixo.
  12. Bom dia @Italo Jurisato Junior, @Juliana Tamizou... Nova sugestão de melhoria para a impressão da GNRE.. Unit : ACBrGNREGuiaFRDM método: procedure TdmACBrGNREFR.CarregaDados; Na impressão da Guia em Fast Report, quando a origem do dado é o XML da Versão 2.0, o cnpj do emitente está ficando em branco, pois uma propriedade (TipoDocEmitente) usada no Case, é vazia devido a não existir no XML... Sendo assim proponho a seguinte solução... Antes case TipoDocEmitente of 1: FieldByName('DocEmitente').AsString := FormatMaskText('000\.000\.000\-00;0', DocEmitente); 2: FieldByName('DocEmitente').AsString := FormatMaskText('00\.000\.000\/0000\-00;0', DocEmitente); 3: FieldByName('DocEmitente').AsString := RemoverZeros(DocEmitente); end; Corrigido... if Length(DocEmitente) = 11 then FieldByName('DocEmitente').AsString := FormatMaskText('000\.000\.000\-00;0', DocEmitente) else if Length(DocEmitente) = 14 then FieldByName('DocEmitente').AsString := FormatMaskText('00\.000\.000\/0000\-00;0', DocEmitente) else FieldByName('DocEmitente').AsString := RemoverZeros(DocEmitente); Segue unit corrigida em anexo... Att.: Gustavo Déo ACBrGNREGuiaFRDM.pas
  13. Bom dia @Juliana Tamizou, @Italo Jurisato Junior, @Juliomar Marchetti estou validando o GNRE, e fiz novas melhorias para a impressão... Unit: ACBrGNREGuiasRetorno No método LerXML, acrescentado as informações Complementares if Leitor.rExtrai(Nivel, 'informacoesComplementares') <> '' then GNRERetorno.InfoComplementares := Leitor.rCampo(tcStr, 'informacao'); No método LoadFromString Antes... if Pos('ns1:guia versao="2.00">', XMLString) > 0 then Agora if Pos('guia versao="2.00">', XMLString) > 0 then Retirado o 'ns1:', pois quando é carregado através do arquivo Guia, não há esse prefixo nas tag... Segue em anexo para validação.. Seria de grande valia entrar em produção... ACBrGNREGuiasRetorno.pas
  14. Bom dia @Juliana Tamizou... Não... no outro, eu estava com problema de comunicação no Web Service com um erro genérico em vários estados.. Neste em específico, consigo fazer o envio da Guia, porém o DF me retorna um erro de layout sendo que no Site da fazenda, não exige tal informação do erro. Att.: Gustavo Déo
×
×
  • Create New...