Painel de líderes

@Juliomar Marchetti basicamente iniciei um projeto do tipo Service Application e fiz os seguintes passos: 1-A plicação cliente insere uma NFCe numa tabela com o status interno 1 e fica aguardando por até 25 segundos 2-Os Status possíveis são: 1-Para Enviar, 2-Erro, 3-Corrigido, 4-Enviando, 99-Enviado 3-O Serviço fica monitorando essa tabela e procura NFCes com os status 1 e 3 (para enviar e corrigido) 4-Quando o serviço detecta NFCes nesses status ele tenta enviá-los, em sucesso ele gera o XML e PDF e guarda numa outra tabela nfe_arqs (que contem em formato binários o XML e o PDF gerados) em caso de erro sistema emite o NFCe em forma offline para posteriormente ser corrigido e reenviado em até 24hrs 5-A Aplicação cliente que estava num laço aguardando lê o novo status que na maioria das vezes é 99 (enviado) e nesse momento carrega o XML e emite o NFCe, caso o status seja erro o sistema informa que o NFCe será emitido em forma offline para liberar o caixa. 6-O serviço fica rodando em segundo plano e a cada 1 segundo verifica a tabela de NFCes

Prezados, Realizei algumas alterações bem como correções na unit “ACBrBancoBanestes”, sendo elas: procedure LerRetorno400 No manual na pagina 14 item 6.1.2 fala a respeito do tamanho do nosso numero no arquivo retorno Notem que o nosso numero é composto de 10 números, mas eles estava copiando apenas 8. Corrigido isso. Antes: NossoNumero := Copy(Linha,63,8); Depois: NossoNumero := Copy(Linha,63,10); Também a propriedade "Carteira" está sendo atribuída com sendo aviso de movimentação. Mas logo abaixo no código a mesma "Carteira" está sendo atribuída com a informação correta. 1 Vez: Carteira := copy(Linha,83,3); 2 Vez Carteira := Copy(Linha,108,1); Removido a primeira citação da carteira "Carteira := copy(Linha,83,3);" pois o correto é Carteira := Copy(Linha,108,1); Removido o bloco: ACBrBanco.ACBrBoleto.DataCreditoLanc := StringToDateTimeDef(Copy(ARetorno[1],111,2)+'/'+ Copy(ARetorno[1],113,2)+'/'+ Copy(ARetorno[1],115,2),0, 'DD/MM/YY' ); Pois as posições que estão sendo copiadas são referente ao filler – brancos, não tem valor algum. Criado variável “CodAvisoMov” referente ao “Código do Lançamento (Aviso Movimentação)” No manual na pagina 14 menciona essa informação que vem no retorno. No anexo XII contém uma lista de códigos que segundo o banco são meios para identificar se deve ou não realizar a baixa. Por exemplo, o banco informou que se nesta posição vier os códigos abaixo a baixa poderá ser processada. Obs.: Apesar desta informação ser parecida com o código de ocorrência, não é a mesma coisa, por exemplo no arquivo de retorno mencionado acima, temos duas informações em cada uma de suas posições. Segue unit em anexo. ACBrBancoBanestes.pas

Boa tarde, Depois das últimas atualizações no ACBr, alguns clientes me questionaram sobre não estar imprimindo "ISENTO" no campo da inscrição estadual no destinatário. Alguns cliente participam de licitações e alguns órgãos "segundo eles", o obrigam a informar na impressão ISENTO. Desta forma eu coloquei uma instrução para imprimir isento. Gostaria de compartilhar caso alguém necessite. Na minha opinião seria interessante colocar na próxima atualização do ACBr. unit ACBrNFeDANFeRL; class procedure TfrlDANFeRL.Imprimir(....){ if Length( trim( FNFe.Dest.IE )) = 0 then FNFe.Dest.IE := 'ISENTO';* }

Só retornando a resposta, funcionou normalmente. Agradeço a todos.

Entendi sim. justamente o que eu faço. Estava verificando o que você me passou . fiz a configuração e irei tirar o comando de consultar o status toda vez que for emitir a NF-e OBS: Depois da configuração no ACbrMonitorPlus , só ocorreu o erro uma vez , justamente quando o cliente tirou em um tempo menor que 3 minutos. Muito obrigado mesmo.

Ola Boa Tarde Sou novo com a ferramenta AcbrBoleto e gostaria de apenas uma Rápida informação No contrato Do Banco Bradesco apenas vem uma numeração para 'ACESSORIO ESCRITURAL NEGOCIADO : ' esta numeração Seria o Codigo Cedente ou a Carteira ??? para emissão de Boleto

Boa tarde Intelli... Eu fiz da seguinte forma: Depois da ACBrSAT1.ConsultarStatusOperacional; ('TIPO DE LAN..: ' + TipoLanToStr(ACBrSAT1.Rede.tipoLan)); ('IP...........: ' + Trim(ACBrSAT1.Rede.lanIP)); ('GATEWAY DE REDE: ' + Trim(ACBrSAT1.Rede.lanGW)); ('DDNS1 DE REDE..: ' + Trim(ACBrSAT1.Rede.lanDNS1)); ('DDNS2 DE REDE..: ' + Trim(ACBrSAT1.Rede.lanDNS2)); //no emulador da SEFAZ, o retorno esta trocado if Length(Trim(ACBrSAT1.Rede.lanMask)) = 17 then ('MÁSCARA DE REDE: ' + Trim(ACBrSAT1.Status.LAN_MAC)) else ('MÁSCARA DE REDE: ' + Trim(ACBrSAT1.Rede.lanMask));

manda esse contador justificar o pedido com bases legais (ler NT). compete a ele mostrar porque o motivo da solitação

Eu estou entendendo a necessidade do Igor. Trata-se do caso de prefeituras e algumas empresas como empreiteiras que tem a IE = ISENTO. Sim, realmente eles exigem. Quando Dest.indIEDest = inIsento a tag IE := '',mas deveria ser 'ISENTO'´(mas o xml não permite a palavra ISENTO, e como o Danfe depende do xml também não sai nada no campo IE). No meu caso, estou fazendo uma gambiarra imprimindo nos dados adicionais essa informação. Então se fosse colocado essa condição no DANFE resolveria. Se Dest.indIEDest = inIsento imprime a palavra ISENTO no campo IE.

pelo delphi tem como fazer?

Entendeu Célio? Para simplificar para você. Antes do seu código: Coloque: Veja se terá a data que deseja.

Por favor então fique a vontade para descrever aqui! com certeza os que vem pesquisar irão achar seu tópico com a resposta!

O ACBr tem sim implementado o AdministrarCSC, mas apenas o estado do Amazonas implantou o Webservice. Para outros estados tem que ser feito pelas respectivas SEFAZ, geralmente o contador faz esse cadastro.

Ao ler os depoimentos dos colegas desenvolvedores sobre os casos de sucesso usando o ACBr nos mais variados setores, ficava imaginando qual seria a sensação de conseguir alcançar um objetivo que muitas vezes parece muito distante, pensava quando seria a minha vez. Bom, finalmente esse dia chegou, após um bom tempo de batalha, é com muita ALEGRIA que informo que consegui homologar o PAF-ECF e também o TEF Dedicado. Sou do Ceará, mais especificamente Fortaleza. Homologuei o PAF na Universidade Federal do Ceará(UFC) e o TEF com a SITEF. Gostaria de agradecer a toda comunidade ACBr e também parabenizá-los pelo excelente trabalho. Sem os componentes do projeto, o trabalho teria sido muito maior e não teria conseguido a tempo. Usei ACBrECF,ACBrAAC,ACBrEAD,ACBrPAF,ACBrSPEDFiscal,ACBrSINTEGRA,ACBrNFe e ACBrBlocoX. Além dos excelentes componentes, contei com a "consultoria" e experiência de vários colegas, que nos momentos de maior sufoco, prontamente me socorreram. ACBr, INENARRÁVEL! Obrigado galera, que DEUS os abençoe.