Italo Giurizzato Junior

Bom dia Diogo, Muito obrigado pela colaboração, já inclui na minha lista para analise. TK-5094 Observação: a inclusão do bloco de linhas que destrói o objeto FretDistDFeInt e o recria novamente já faz um bom tempo que foi incluído. Faz quanto tempo que você não atualiza os seus fontes?

Bom dia Willian, Muito obrigado pela colaboração, já inclui na minha lista de tarefas. TK-5089

Bom dia @gary.rj, Para ficar claro. No XML do RPS a tag Aliquota esta com o valor 2, já no XML da NFS-e referente a este RPS a tag Aliquota esta com o valor 4, é isso? Se sim, você deve entrar em contato com a prefeitura e ou provedor e pedir esclarecimentos. Uma vez que o XML da NFS-e é gerado pelo webservice do provedor.

Bom dia @xim.logan, No programa exemplo do componente ACBrNFSeX temos 3 procedure para exemplificar a alimentação do componente com os dados do serviço prestado. Como você notou tem uma procedure referente ao layout da ABRASF, devemos nos basear nessa procedure se o provedor segue a verão 1 ou 2 do layout da ABRASF. A procedure referente ao layout próprio, devemos nos basear nessa procedure se o provedor não segue o layout da ABRASF. Por fim, a procedure referente ao layout do Padrão Nacional nos apresenta como alimentar o componente se o prestador de serviço for MEI ou se a cidade em questão aderiu a emissão das notas de seus contribuintes segundo o Padrão Nacional.

Bom dia @gerasoft, Para você entender o porque de que alguns campos estão zerados ou vazios, basta abrir o XML e verificar se a informação existe no XML. Outra coisa, abra a unit IPM.LerXml (uma vez que o provedor é IPM versão 1.00) e verifica se nessa unit tem alguma linha que lê alguma tag do XML e armazena o seu conteúdo no campo CodLCServ (por exemplo). Se não tem a linha isso explica o motivo desse campo estar retornando uma string vazia. No que se refere ao campo ItemListaServico devemos sempre ao alimentar o componente para emitir a nota, informar esse campo no formato xx.yy o componente vai remover o ponto ou o zero a esquerda se assim o provedor exige. Portanto ao ler essa informação do XML se estiver 702, o componente formata essa informação deixando-a no formato xx.yy dai temos como resposta 07.02 Espero ter ajudado.

Bom dia @PHCASTANHO, Complementando o que o @Juliomar Marchetti já lhe passou. Você deve ter notado que alguns campos ao serem alimentados eles não são alimentados com um numero ou um string e sim com algo que chamamos de enumerados. Exemplos: tiRetrato; teNormal; taHomologacao; mdRodoviario; tsTranspValores; inContribuinte; Na unit que você tem a rotina que alimenta o componente com os dados do CTe, em uses devemos declarar a unit que contem a definição desses enumerados. Exemplo: uses pcnConversao, pcnConversaoCTe; Alguns enumerados estão definidos na unit pcnConversao e outros em pcnConversaoCTe. Como você esta usando o componente ACBrCTe tente informar somente o pcnConversaoCTe, se o Delphi reclamar a ausência de definição de mais algum enumerado, você declara também o pcnConversao.

Bom dia Edson, O envio do CT-e na versão 4 é síncrono para todas as UF. Esse erro ocorre no programa exemplo também?

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

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

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

Tópico movido para a área do SAC, para que o SLA de respostas seja considerado

Tópico movido para a área do SAC, para que o SLA de respostas seja considerado

Boa tarde Antonio, Já esta no SVN.

Boa tarde @C4Dev, Já esta no SVN.

Boa tarde Marcos, Muito obrigado pela colaboração, já inclui na minha lista de tarefas. TK-5080

Boa tarde @daniel_mirassol, Veja o código do botão [Criar e enviar síncrono] do programa exemplo.

Bom dia @PHCASTANHO, Isso aqui esta errado: F_DM.ACBrCTe1.Conhecimentos.Add.CTe.infCTe.versao := 4.0; F_DM.ACBrCTe1.Conhecimentos.Add.CTe.Ide.cUF := 0125 ; // UFtoCUF(edtEmitUF.Text); F_DM.ACBrCTe1.Conhecimentos.Add.CTe.Ide.CFOP := 6932; (...) O correto é: With F_DM.ACBrCTe1.Conhecimentos.Add.CTe do begin infCTe.versao := 4.0; Ide.cUF := 0125 ; // UFtoCUF(edtEmitUF.Text); Ide.CFOP := 6932; (...) end; Cada ADD executado o componente entende que você deseja adicionar mais um item (CT-e) a lista. Outra coisa de onde você tirou o código 0125 ? Todas as UF possuem um código IBGE formado por 2 dígitos. Por favor estude o programa exemplo do componente, tenha em mãos os manuais do CT-e, caso contrario você não vai sair do lugar.

Felipe, Já inclui na minha lista de tarefas para analise dessa questão. TK-5076

Boa tarde @C4Dev, Muito obrigado pela colaboração, já inclui na minha lista de tarefas. TK-5075

Boa tarde Walter, O ambiente de homologação pode estar com problemas, faça um teste enviando para o de produção. Outra coisa: Você tem fontes do ACBr com alterações locais? Verifica se não tem nenhuma unit do ACBr com uma bolinha vermelha em seu ícone, caso afirmativo delete a unit. Atualize todos os fontes de todas as pastas. Reinstale o ACBr com a opção de apagar arquivos antigos marcada. Compile a aplicação com a opção Build. Por fim repita os testes.

Boa tarde @edson vieira, Veja o botão [Criar e Enviar modo Síncrono] do programa exemplo do componente ACBrCTe.

Boa tarde Luiz, Na unit pcnAuxiliar temos as funções: function ExtrairChaveMsg(const AMsg: String): String; function ExtrairProtocoloMsg(const AMsg: String): String; Com essas funções você consegue extrair a chave e o protocolo da mensagem. Informação que você precisa para efetuar o encerramento.

Boa tarde @maggiore, No programa exemplo do componente temos o seguinte: //40 - ICMS Isento Imp.ICMS.SituTrib := cst40; Imp.ICMS.ICMS45.CST:= cst40; //41 - ICMS não Tributada Imp.ICMS.SituTrib := cst41; Imp.ICMS.ICMS45.CST:= cst41; //51 - ICMS diferido Imp.ICMS.SituTrib := cst51; Imp.ICMS.ICMS45.CST:= cst51; } Você esta informando o valor do campo SituTrib ?

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

Boa tarde @JeannyPaiva, Já esta no SVN.