Eduardo Brigoni

Boa tarde Mauricio Elias, isso é na hora de dar entrada no estoque ou na venda do produto?

Boa tarde, também estou perdido pra fazer esses cálculos de icms efetivo.

Oi Sérgio Assunção, sei que é muito tempo desde essa dúvida mas fiz exatamente como você disse e funcionou perfeitamente, porém não precisei compartilhar a impressora. Abraço valeu.

Simplesmente show.

Boa tarde finoue, já verifiquei que não esta saindo o código da carteira no código de barras e nem na linha digitável. Segue o código: with ACBrTitulo.ACBrBoleto do begin DigitoNossoNumero := CalcularDigitoVerificador(ACBrTitulo); FatorVencimento := CalcularFatorVencimento(ACBrTitulo.Vencimento); CodigoBarras := '033'+//Identificação do Banco '9'+//Código da moeda padrão 9 REAL FatorVencimento +//Fator de vendicmento IntToStrZero(Round(ACBrTitulo.ValorDocumento*100),10)+//Valor nominal '9'+// Fixo 9 PadLeft(trim(Cedente.CodigoCedente),7,'0')+//Código do cedente PadLeft(ACBrTitulo.NossoNumero + DigitoNossoNumero, 13,'0')+//Nosso numero com DV '0'+//IOF – Seguradoras (Se 7% informar 7. Limitado a 9%) PadLeft(trim(Cedente.Modalidade),3,'0');//Carteira 101 DigitoCodBarras := CalcularDigitoCodigoBarras(CodigoBarras); end; Result:= '033' + '9'+ DigitoCodBarras + Copy(CodigoBarras,5,39); Segue o manual de código de barras de Janeiro de 2015, se você olhar na página 6 vai ver que está faltando o DV do código de barras no código e já fazendo um teste. 20150121_Layout de Código de Barras Santander Janeiro 2015v 29.pdf

Boa tarde finoue, ele já é preenchido direto no meu código pra que o usuario não coloque nada errado. Mas obrigado. ACBrBoleto.Cedente.Modalidade := '101'.

Boa tarde Pessoal, estou homologando no Santander e deixo o novo manual de Março de 2017 Layout CNAB400. H7800 Layout CNAB 400 com registro (padrão 353) março 2017 v 2.15.pdf

Bom dia pessoal, eu sempre tenho que verificar essas linhas 738 e 752 do ACBrBancoSantander.pas toda vez que atualizo, e sempre tenho que trocar pelo seguinte: Cedente.Complemento + Space(6)//Complemento O Santander sempre nos passa o complemento da seguinte forma "I31", na minha tela de configuração neste campo eu coloco exatamente o que o banco me passa. Estou fazendo mais 4 homologações no Santander e tenho 10 lojas que estão rodando sem problema, mas na última atualização a linha digitável não esta indo o código da carteira que sempre uso o 101 na minha tela de configuração do sistema. Segue a resposta do banco. Linha Digitável Enviado 0339939936 22100000508 03385900000 9 71870000017918 Esperado 0339939936 22100000508 03385901016 3 71870000017918.

Me ajudou muito, obrigado, abraço.

Bom dia Pessoal, fiz os testes criando o componente e instanciando ele quando eu entro na rotina para enviar a nota. Obrigado a todos pela ajuda. No CarregaComponente NFE := TACBrNFe.Create(Self); DF := TACBrNFeDANFEFR.Create(Self); NFE.DANFE := DF; No DestroiComponente if Assigned(NFE) then NFE.Destroy; if Assigned(DF) then DF.Destroy; Rotina de Envio da Nota if(ValidaNfe = False) then Exit else begin dm_principal.CarregaComponente; //Aqui crio o componente dm_principal.DF.FastFile := TConfig.instancia.Danfe.FastFile; dm_principal.NFE.NotasFiscais.Clear; //Alimenta o componente if(dm_principal.GeraNfe)then //passo 1 begin dm_principal.NFE.NotasFiscais.Items[0].GravarXML(); arquivo := dm_principal.NFE.NotasFiscais.Items[0].NomeArq; //Enviar if(dm_principal.NFE.Enviar(1,False))then begin dm_principal.NFE.NotasFiscais.Clear; dm_principal.NFE.NotasFiscais.LoadFromFile(arquivo); dm_principal.NFE.Consultar; if(RespostaEnviar)then //Aqui gravo no banco e faço a impressão se cStat = 100 begin if(dm_principal.NFE.WebServices.Retorno.xMotivo = 'Autorizado o uso da NF-e')then FinalizaNota else if(Copy(dm_principal.NFE.WebServices.Retorno.xMotivo,0,29) = 'Rejeicao: Duplicidade de NF-e')then MessageDlg('Tente novamente',mtWarning, [mbOK],0) else dm_principal.VoltaNumeroNfe; end else dm_principal.VoltaNumeroNfe; end else dm_principal.VoltaNumeroNfe; end else ac_cancelar.Execute; end; dm_principal.DestroiComponente; Aqui destruo o componente

Eu coloqueis os passos daquela forma mas eu não fazia assim eu simplesmente alimentava o componente e enviava e esperava pelo cStat = 100 para gravar e ja acontecia isso. Mas vou tentar o seguinte vou criar o componente ao invés de colocar no form e depois do envio da nota eu dou um componente.free talvez assim funcione.

Pois é fiz dessa forma que vc falou e ainda continua. Primeira nota autoriza normal, depois desativo a rede e ela autoriza do mesmo jeito.

O Valida e Assina já esta dentro do Enviar. Mas vou tentar. Valeu

Mas é exatamente o que faço e continua o problema, hoje o cliente reclamou de novo e dessa vez ele emitiu uma nota e não ficou gravado no banco. No meu caso só salvo se o cstat = 100.

Pois é, mesmo dando acbr1.notasfiscais.clear hoje aconteceu de novo em produção.

Boa tarde, pesquisei nos tópicos algo relacionado ao meu problema e não achei, se caso existir outro tópico me perdoem. Uso o componente acbrnfe e capicom. Estou com o seguinte problema: Teste 1. Envio a primeira nota em homologação e tudo certo a nota é autorizada e feita a impressão e gravo no banco. Faço varias notas em sequencia e tudo certo. Teste 2. Desativo a rede para simular problemas na internet na hora do envio e pra minha surpresa a nota é autorizada e quando debugo para ver que chave esta carregada no componente está carregada a chave da nota anterior e o xmotivo também da nota anterior que foi autorizada mesmo eu usando ACBrNFe1.NotasFiscais.Clear; antes de enviar a nota e no final da operação. Meus passos são os seguintes: 1. ACBrNFe1.NotasFiscais.Clear; 2. Alimento o componente; 3. ACBrNFe1.NotasFiscais.Items[0].GravarXML(); 4. arquivo := ACBrNFe1.NotasFiscais.Items[0].NomeArq; 5. ACBrNFe1.Enviar(1,False); 6. ACBrNFe1.NotasFiscais.Clear; ACBrNFe1.NotasFiscais.LoadFromFile(arquivo); ACBrNFe1.Consultar; 7. Se nota autorizada faço a impressão e gravo no banco. Se eu estiver fazendo algo errado então peço a ajuda dos colegas.

Na verdade só liberaram depois que assinamos o contrato mas claro que as senhas para acesso que são fornecidas pela Auttar não compartilhei e também não falaram nada a respeito de compartilhar esse material.

E ai vai os manuais que a Auttar me passou. Manual de instalação CTFClient-Integração DLL.docx ROTEIRO_FLUXOS.doc Teste de Desligamento_Rev07.xls

Boa tarde pessoal, sei que é um post de 2014 mas para não abrir outro tópico quero compartilhar o exemplo de integração com TEF Auttar via DLL que me foi passado. Exemplo delphi.zip

Bom dia, o digito da conta e agência é o ultimo número, por exemplo agência 3917 digito 7 e conta 130004444 digito 4.

Olá pessoal tenho tido muitos problemas com esse servidor BHISS, pelo que disse a prefeitura de Porto Alegre eles ainda não tem o código fonte do sistema do webservice e assim não podem fazer nenhuma melhoria. Segue o forum para desenvolvedores da NFSe de porto alegre para mais informações. https://groups.google.com/forum/#!forum/nota-legal-porto-alegre-desenvolvedores Eduardo Brigoni [email protected]

Olá kzarlopes, verifique seu nome de usuário e senha para conexão com o site.

Ola pessoal estou homologando para 4 lojas em porto alegre. [email protected]

Ola pessoal aqui em Gravatai RS uso tambem a Ipm no site eles disponibilizaram um integrador semelhante ao monitor acbr por troca de arquivos, seu sistema gera o xml que tambem e bem simples na pasta indicada pelo integrador ipm e o integrador processa e te devolve um txt de resposta, mas outra dificuldade com a ipm e que nao existe ambiente de homologacao tive que fazer algumas notas com valores bem baixo pra teste e depois cancelar.

Bom dia pessoal tambem tive este problema o que acontece e o seguinte a Procempa contratou uma empresa a ProData que esta tendo alguns problemas com fertificados feito na Safeweb como no meu caso mas desde ontem consigo fazer os testes em homologacao no meu sistema com o ACBrNFSe sem problemas.