Painel de líderes

Bom dia.. Achei !! ehehhe Para que a tecla ENTER execute o evento onKeyDown é necessário que a propriedade ReturnKeyType:=Go O detalhe é que no TEdit essa propriedade aparece no Object Inspector, mas no TNumberBox não. No caso do TNumberBox deve-se setar essa propriedade via código dessa forma: NumberBox1.ReturnKeyType:=TReturnKeyType.Go ; Grande abraço !

Pode ser várias coisas, entre elas: Se você ficar verificando o status do sat repetidamente, ele pode entrar em processamento. Verifica no log do sat, se ao tentar EnviarVenda por exemplo, existem antes muitas consultas de Status. Outra coisa pode ser que o sat ficou muito tempo sem transmitir os cupons por falta de internet e agora esta enviando os cupons da memoria, mas isso só acontece se ficar muitos dias sem transmitir, alem de depender do movimento da loja. Esse tópico pode ajudar também: Espero ter ajudado!

Boa tarde. Obrigada por compartilhar, adicionado para validação. Att.

Boa tarde Carlos, A SEFAZ-MG é campeã em gerar problemas para os seus contribuintes, com certeza andaram (como de costume) alterando alguma coisa que esteja provocando essa demora no processamento. Aguarde mais alguns minutos e realiza a consulta do CT-e enviado.

Boa. Alterei o código para salvar a qtde de parcelas(cre.recordcount), e o numero da parcela(1,2,3,4....) direto em cada registro do contas a receber. Dessa forma, na geração da remessa eu pego direto da tabela de contas a receber, onde eu já tenho gravado esses valores, impedindo burradas dentro da geração da remessa. Bora testar. Te respondo a tarde. Grato por enquanto. Claudiomir

Bom dia pessoa, fiz um teste aqui e aparentemente está funcionando. na unit acbrconsultacnpj.pas alterei as seguintes linhas: // HTTPGet('https://www.receita.fazenda.gov.br/pessoajuridica/cnpj/cnpjreva/captcha/gerarCaptcha.asp'); // GetCaptchaURL HTTPGet('https://servicos.receita.fazenda.gov.br/Servicos/cnpjreva/captcha/gerarCaptcha.asp'); // GetCaptchaURL e // HTTPSend.Headers.Add('Referer: https://www.receita.fazenda.gov.br/pessoajuridica/cnpj/cnpjreva/Cnpjreva_solicitacao3.asp'); // HTTPPost('https://www.receita.fazenda.gov.br/pessoajuridica/cnpj/cnpjreva/valida.asp'); HTTPSend.Headers.Add('Referer: https://servicos.receita.fazenda.gov.br/Servicos/cnpjreva/Cnpjreva_solicitacao3.asp'); HTTPPost('https://servicos.receita.fazenda.gov.br/Servicos/cnpjreva/valida.asp');

Enviei ajuste para o repositório, rev. 18548. Favor atualizar os fontes e testar novamente.

Boa tarde! Estava realizando alguns testes na União de Arquivos SPED ECF, e notei que no arquivo não estava sendo gerado alguns registros, sendo necessário realizar as alterações citadas nas classes abaixo: * unit ACBrEFDBloco_C_Importar -> Atribuído valores nas variáveis "NUM_TANQUE" e "QTDE", na procedure "TACBrSpedFiscalImportar_BlocoC.RegC171". * unit ACBrEFDBloco_H_Importar -> Criado a procedure "RegH990", onde é atribuído valor à variável "QTD_LIN_H", e será chamada na procedure "AnalisaRegistro". * unit ACBrEFDBloco_1_Importar -> Criado as seguintes procedures: "Reg1300", "Reg1310", "Reg1320", "Reg1350", "Reg1360", "Reg1370", que serão chamadas na procedure "AnalisaRegistro". ACBrEFDBloco_H_Importar.pas ACBrEFDBloco_1_Importar.pas ACBrEFDBloco_C_Importar.pas

Bom dia. Realizado atualização do arquivo ISSJoinvile.ini, pois não possuía o link para impressão em ambiente de Produção. Conforme conversado com o @Maiquel que ajudou na homologação deste provedor, não está sendo possível validar o XML contra o Schemas, sugiro a alteração no ini para não validar. [Schemas] Validar=0 Realizado correção na leitura do XML de retorno adicionando o seguinte trecho de código na função: TNFSeR.LerNFSe_ABRASF_V2, pois não estava marcando a variável como cancelada ao fazer a consulta de uma NFS-e cancelada na prefeitura. if NFSe.Status = srCancelado then NFSe.Cancelada := snSim else NFSe.Cancelada := snNao; ISSJoinville.ini pnfsNFSeR.pas

Boa Tarde, A versão 2.00 do GNRE foi adiada: [ERRATA] Portal GNRE - Atualização da Versão para 2.0 Prezado Contribuinte, do XML de lote. A versão 1.00 será aceita até o dia 30/04/2020 e até este período o portal estará apto a receber as duas versões. A versão 2.0 contempla três opções para geração das guias: 1. GNRE Simples - esta opção equivale à geração da GNRE atual,ou seja, geração de guia para apenas um pagamento. 2. GNRE com Múltiplos Documentos de Origem - nesta opção poderão ser adicionados múltiplos documentos de origem, desde que mantida a mesma UF destinatária, o mesmo Contribuinte Emitente, o mesmo Código de Receita e o mesmo Tipo de Documento de Origem. 3. GNRE com Múltiplas Receitas - nesta opção poderão ser adicionados diversos códigos de receitas, desde que se mantenha a mesma UF destinatária e o mesmo Contribuinte Emitente. Nesta opção serão aceitos vários códigos de receita, inclusive podendo repetir o mesmo código de receita. Para os contribuintes que utilizam os serviços (webservices) de automação que o Portal disponibiliza,será necessário adequar suas aplicações para a nova estrutura do XML versão 2.0. Para maiores detalhes, acessar o Portal GNRE no ambiente de Testes/Homologação (http://www.testegnre.pe.gov.br) e clicar no menu Automação. Neste link, você encontrará: • Manual para Preenchimento do Lote: o Formato do arquivo (versão 1.0 e 2.0) o Dicionário de dados do arquivo XML (versão 1.0 e 2.0) o Regras de Preenchimento • Anexos • Links para as empresas solicitarem a utilização dos webservices • Manual de Integração do Contribuinte (versão 2.0) • Endereço dos serviços (webservices) Em caso de dúvidas encaminhar e-mail para [email protected]. Atenciosamente, Gestor Nacional do GNRE Secretaria da Fazenda do Estado de Pernambuco http://www.testegnre.pe.gov.br/gnre/portal/GNRE_Principal.jsp

Boa tarde Filipe, Muito obrigado pela colaboração, já enviei para o repositório.

Opa, claro! fiz o teste Pessoal, e perfeito, fiz um com erro, NÃO imprimiu nada! Corrigi, enviei, emitiu as 2 VIAS! OK: C:\sicaf\ACBrBPe\Logs\11191207835038000204630010000000191111609405-bpe.xml Autorizado o uso do BP-e [Envio] CStat=100 CUF=11 Msg=Autorizado o uso do BP-e NProt=311190000037924 NRec= TMed=0 VerAplic=RS20191021100423 Versao=RS20191021100423 XMotivo=Autorizado o uso do BP-e tpAmb=2 Já retirei a impressão Manual, Agora tá TOP! Já vou conseguir instalar no cliente ainda HOJE! VLW ACBr!

Boa tarde Natan, Por favor anexe a unit alterada, assim fica mais fácil de nós analisarmos. Desde já muito obrigado pela colaboração.

Ja tentou desabilitar a instalação automática de drivers no windows? https://mswiki.com.br/windows-8-1-desabilitando-instalacao-automatica-de-driver/

Então se esta usando o C# a string que retorna do metodo é no formato ini. Você pode fazer um parser de ini que é super facil ou utilizar alguma biblioteca para isso, você encontra varias no nuget. Ex.: https://github.com/JaegerMa/SharpINI - https://www.nuget.org/packages/SharpINI/ E carregar a string assim. var retorno = ACBrSat.EnviarCFe(xmlPath); var parsed = INIReader.ReadINI(retorno); var arquivo = parsed["ENVIO"]["Arquivo"];

ops, vou verificar, obrigado...

Só alterando o componente. Veja o tópico abaixo:

Acredito que você ajustar sua rotina pra não preencher o nome e endereço caso o CPF/CNPJ/IDEstrangeiro não esteja informado. Ou, o mais indicado, sempre carregar novamente o XML na impressão para evitar qualquer discrepância.

Pessoal pode ignorar o ticket, aparentemente era problema na SEFAZ, aguardamos cerca de 2 horas e tentamos transmitir o mesmo CTe e ele foi autorizado.

Então, inicialmente vou desenvolver as classes separadas do ACBr, caso tenha êxito na empreitada tento incluir no projeto com a ajuda do pessoal!

Pessoal, Sei que já está disponível a implementação da Nota MS Premiada no componente, como o tópico abaixo: Só abri esse tópico para informar que a SEFAZ/MS alterou o conteúdo retornado, que antes era assim: Dezenas: ( 06 11 19 38 45 50 54 ) Para agora assim (fiz teste hoje): NOTA MS PREMIADA | DEZENAS: ( 01 04 13 18 20 24 45 60 ) | www.notamspremiada.ms.gov.br Como eu utilizo um DANFE próprio vou precisar ajustá-los, não sei se para quem utilizam os DANFEs do componente se algo precisará ser ajustado. Repassada a informação para conhecimento da comunidade. Um grande abraço e sucesso a todos, Fabrício Gomes Araújo

Consegui resolver o problema, fazendo todas as atualizações do windows pendentes da maquina, em especial a instalação do service pack1.

Você pode até criar uma classe no ACBrTEFD para isso. Mas não sei se é a melhor saída pra vocês.

UAU! Agora gostei! heheh! Parabéns pela agilidade! Fico grato mais uma vez! VLW

Boa tarde Juliana, As alterações nos fontes do Monitor já foram feitas, se faz necessário agora disponibilizar uma nova versão do mesmo e por fim realizar novos testes. Em anexo as units alteradas. ACBrLibBPeRespostas.pas DoACBrBPeUnit.pas

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

Se o CNPJ da prefeitura estiver relacionado na NFe, ela pode obter o XML pelo método DistribuicaoDFe. Senão, não é possível.

Obrigado pelos esclarecimentos

Observação: Realizei os testes na EPSON TM-T20, Elgin i7 e Elgin i9; No previsualizar, não ficou bonito, porém dessa maneira, é possível imprimir, inclusive pela tela do previsualizar

No ACBrSATExtratoFortesFR, se alterar o UnlimitedHeight para False, a impressora já consegue realizar a impressão tranquilamente; A altura como 20cm, por pagina, consegui realizar a impressão sem cortar os itens, naquelas impressoras chinesas (sem marca) RLLayout.PageSetup.PaperHeight := 200 ; RLLayout.UnlimitedHeight := False; ACBrSATExtratoFortesFr.pas

Já está no SVN... Obrigado @Renato Gil

Resolvido, Obrigado.

Perfeito, muito obrigado!!

Bom dia Magno, Como você utiliza o monitor, acredito que o comando que você utiliza deve possuir um parâmetro onde você defini se deseja que o bilhete seja impresso automaticamente ou não. A principio esse parâmetro tem como valor padrão True, ou seja, o bilhete vai ser impresso. Outra coisa, se não me falha a memória se o bilhete for rejeitado a sua impressão não é realizada. O que deve esta ocorrendo, a sua rotina esta gerando e enviando o bilhete para SEFAZ, e em seguida executando o método para imprimir. Se o bilhete é autorizado é impresso duas vezes, uma pelo método Enviar e outra pelo método Imprimir. Se o bilhete não é autorizado esta sendo impresso, porque, esta sendo executado o método Imprimir. Se você remover da sua aplicação a execução do método Imprimir, primeiro se o bilhete for autorizado será impresso somente uma vez, segundo se não for autorizado, não será impresso nada. Faça esse teste.

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

Exclui todos os arquivo do ACBr e baixei e instalei novamente os componentes; Na pasta do meu projeto, exclui também as .dcu; A revisão que vem pelo SVN é 18.544

Esse tamanho voce nao precisa mexer... mas se mexer, tem que saber o tamanho correto pelo manual. Vamos la, se isso está ficando diferente depois, vc pode ter colocado o DV do nosso numero junto com o campo nosso numero. Na segunda impressão, se repassar para o componente somado, o componente usa parte ele apenas. Veja como uso para gerar tanto 1a via, quanto 2a via class procedure TFuncBoleto.AtribuirDadosAoTitulo(var ATituloNaLista: TACBrTitulo; AQryServico: TDataSet; ADataEmissaoTituloDataDocumento: TDate; Rem_Ocorrencia_Remban: Integer; ADocumentoRec: string; ANumeroSlip, ADVSlip: string; AVencimento: TDate; ATotalParcelas, AParcela: Integer; AEmpresaRec: Integer; AAutoIncRec: Int64; AValor: Currency; AFisicaJuridica, ACnpjCpf, ANome, AEndereco, ANumeroEndereco, AComplementoEndereco, ABairro, ACidade, AUF, ACEP, AEmail, ATelefone, AAvalista, ACnpjCpfAvalista, ALogradouroAvalista, ANumeroEnderecoAvalista, AComplementoAvalista, ABairroAvalista, ACidadeAvalista, AUFAvalista, ACepAvalista, AEmailAvalista, ATelefoneAvalista, AInscricaoNrAvalista, AObsTextoCedente: string ); var L: Integer; S: string; begin ATituloNaLista.EspecieDoc := AQryServico.FieldByName('ESPECIE_DOCUMENTO_SER').AsString; // banco inter 77 ATituloNaLista.UsoBanco := AQryServico.FieldByName('USO_BANCO_SER').AsString; if AQryServico.FieldByName('ACEITE_SER').AsString = 'S' then ATituloNaLista.Aceite := atSim else ATituloNaLista.Aceite := atNao; ATituloNaLista.LocalPagamento := AQryServico.FieldByName('LOCAL_PAGAMENTO_SER').AsString; if AQryServico.FieldByName('TIPODOCUMENTO_SER').AsInteger = 2 then ATituloNaLista.TipoImpressao := tipCarne else ATituloNaLista.TipoImpressao := tipNormal; // ATituloNaLista.Moeda := QryServico.FieldByName('MOEDA_SER').AsString; ATituloNaLista.Carteira := AQryServico.FieldByName('CARTEIRA_SER').AsString; if AQryServico.FieldByName('RESPONSABILIDADE_ENVIO_SER').AsInteger = 1 then ATituloNaLista.CarteiraEnvio := tceBanco else // 0 zero ATituloNaLista.CarteiraEnvio := tceCedente; // read fCarteiraEnvio write fCarteiraEnvio default tceCedente; ATituloNaLista.TotalParcelas := ATotalParcelas; ATituloNaLista.Parcela := AParcela; // Zeramentos, para ser preenchido posterior a essa funcao ATituloNaLista.DataAbatimento := 0; ATituloNaLista.DataBaixa := 0; ATituloNaLista.DataCredito := 0; ATituloNaLista.DataDesconto := 0; ATituloNaLista.DataMoraJuros := 0; ATituloNaLista.DataOcorrencia := 0; ATituloNaLista.DataProtesto := 0; ATituloNaLista.PercentualMulta := 0; ATituloNaLista.ValorAbatimento := 0; ATituloNaLista.ValorDesconto := 0; ATituloNaLista.ValorDespesaCobranca := 0; ATituloNaLista.ValorIOF := 0; ATituloNaLista.ValorMoraJuros := 0; ATituloNaLista.ValorOutrasDespesas := 0; ATituloNaLista.ValorOutrosCreditos := 0; ATituloNaLista.MultaValorFixo := (AQryServico.FieldByName('REM_MULTA_VP_SER').AsString = 'F'); // ATituloNaLista.OcorrenciaOriginal.CodigoBanco := ''; // ATituloNaLista.OcorrenciaOriginal.Descricao := ''; ATituloNaLista.DescricaoMotivoRejeicaoComando.Clear; ATituloNaLista.MotivoRejeicaoComando.Clear; ATituloNaLista.DataDocumento := ADataEmissaoTituloDataDocumento; ATituloNaLista.DataProcessamento := Now; ATituloNaLista.NossoNumero := ANumeroSlip; // aqui nosso numero ATituloNaLista.Vencimento := AVencimento; ATituloNaLista.NumeroDocumento := ADocumentoRec; if (TFuncBoleto.ACBrBoleto.Banco.Numero = 104) and (TFuncBoleto.ACBrBoleto.LayoutRemessa = c240) then // caixa - nojento - 19 ATituloNaLista.NumeroDocumento := ATituloNaLista.ACBrBoleto.Banco.MontarCampoNossoNumero(ATituloNaLista); if AQryServico.FieldByName('REM_PROTESTAR_SER').AsInteger = 1 then begin ATituloNaLista.DataProtesto := AVencimento + AQryServico.FieldByName('REM_PROTESTAR_APOS_XDIAS_SER').AsInteger; ATituloNaLista.TipoDiasProtesto := diCorridos; // , diUteis end else begin ATituloNaLista.DataProtesto := 0; ATituloNaLista.TipoDiasProtesto := diUteis; end; // baixar if AQryServico.FieldByName('REM_BAIXAR_DEVOLVER_SER').AsInteger = 1 then begin ATituloNaLista.DataBaixa := AVencimento + AQryServico.FieldByName('REM_DIAS_BAIXAR_SER').AsInteger; ATituloNaLista.DataLimitePagto := AVencimento + AQryServico.FieldByName('REM_DIAS_BAIXAR_SER').AsInteger; end else begin ATituloNaLista.DataBaixa := 0; end; // Identificador do titulo na empresa (* Historico Primeira versao que saiu, seu numero era composto como: Até 10/10/2016 era: Strzero( codigo_rec, 12 ) + Strzero(13,0) A partir de 11/10/2016 passou ser E+StrZero(empresa,4,0) + B + Strzero(codigo_rec, 12, 0) + Strzero(7,0) *) S := 'E' + StrZero(AEmpresaRec, 4, 0); // 5 S := S + 'B' + StrZero(AAutoIncRec, 12, 0); // 13 = 18 S := S + StringOfChar('0', 7); // completar 25 posicoes ATituloNaLista.SeuNumero := S; (* 0=Registrar remessa {Gerar primeira remessa} 1=Baixar {Pedido de Baixa} 2=Conceder Abatimento {Concessão de Abatimento} 3=Cancelar Abatimento {Cancelamento de Abatimento concedido} 4=Alterar Vencimento {Alteração de vencimento} 5=Alterar Numero Controle {Alteração de seu número} 6=Protestar {Pedido de protesto} 7=Cancelar Instrucao Protesto Baixa {Sustar protesto e baixar} 8=Cancelar Instrucao Protesto {Sustar protesto e manter na carteira} 9=Outras Ocorrencias {Alteração de Outros Dados} *) case Rem_Ocorrencia_Remban of 0: ATituloNaLista.OcorrenciaOriginal.Tipo := toRemessaRegistrar; 1: ATituloNaLista.OcorrenciaOriginal.Tipo := toRemessaBaixar; 2: ATituloNaLista.OcorrenciaOriginal.Tipo := toRemessaConcederAbatimento; 3: ATituloNaLista.OcorrenciaOriginal.Tipo := toRemessaCancelarAbatimento; 4: ATituloNaLista.OcorrenciaOriginal.Tipo := toRemessaAlterarVencimento; 5: ATituloNaLista.OcorrenciaOriginal.Tipo := toRemessaAlterarNumeroControle; 6: ATituloNaLista.OcorrenciaOriginal.Tipo := toRemessaProtestar; 7: ATituloNaLista.OcorrenciaOriginal.Tipo := toRemessaCancelarInstrucaoProtestoBaixa; 8: ATituloNaLista.OcorrenciaOriginal.Tipo := toRemessaCancelarInstrucaoProtesto; 9: ATituloNaLista.OcorrenciaOriginal.Tipo := toRemessaOutrasAlteracoes; else TCaixasDeDialogo.Erro('Código de ocorrência: ' + Rem_Ocorrencia_Remban.ToString + ' inválida.', true); end; ATituloNaLista.ValorDocumento := AValor; if AFisicaJuridica = 'J' then ATituloNaLista.Sacado.Pessoa := pJuridica else if AFisicaJuridica = 'F' then ATituloNaLista.Sacado.Pessoa := pFisica else ATituloNaLista.Sacado.Pessoa := pOutras; ATituloNaLista.Sacado.CNPJCPF := ACnpjCpf; ATituloNaLista.Sacado.NomeSacado := ANome; ATituloNaLista.Sacado.Logradouro := AEndereco; ATituloNaLista.Sacado.Complemento := AComplementoEndereco; ATituloNaLista.Sacado.Numero := ANumeroEndereco; ATituloNaLista.Sacado.Bairro := ABairro; ATituloNaLista.Sacado.CEP := ACEP; ATituloNaLista.Sacado.Cidade := ACidade; ATituloNaLista.Sacado.UF := AUF; ATituloNaLista.Sacado.Email := AEmail; ATituloNaLista.Sacado.Fone := ATelefone; // Avalista L := Length(SoDigito(ACnpjCpfAvalista)); if L > 11 then ATituloNaLista.Sacado.SacadoAvalista.Pessoa := pJuridica else if L > 0 then ATituloNaLista.Sacado.SacadoAvalista.Pessoa := pFisica else ATituloNaLista.Sacado.SacadoAvalista.Pessoa := pOutras; ATituloNaLista.Sacado.Avalista := AAvalista; ATituloNaLista.Sacado.SacadoAvalista.CNPJCPF := ACnpjCpfAvalista; ATituloNaLista.Sacado.SacadoAvalista.NomeAvalista := AAvalista; ATituloNaLista.Sacado.SacadoAvalista.Logradouro := ALogradouroAvalista; ATituloNaLista.Sacado.SacadoAvalista.Numero := ANumeroEnderecoAvalista; ATituloNaLista.Sacado.SacadoAvalista.Complemento := AComplementoAvalista; ATituloNaLista.Sacado.SacadoAvalista.Bairro := ABairroAvalista; ATituloNaLista.Sacado.SacadoAvalista.Cidade := ACidadeAvalista; ATituloNaLista.Sacado.SacadoAvalista.UF := AUFAvalista; ATituloNaLista.Sacado.SacadoAvalista.CEP := ACepAvalista; ATituloNaLista.Sacado.SacadoAvalista.Email := AEmailAvalista; ATituloNaLista.Sacado.SacadoAvalista.Fone := ATelefoneAvalista; ATituloNaLista.Sacado.SacadoAvalista.InscricaoNr := AInscricaoNrAvalista; S := AObsTextoCedente; ATituloNaLista.Mensagem.Text := S; ATituloNaLista.Informativo.Text := ''; // Não pode passar, senao vai como valor para remessa, posicao 157 a 158 no cnab400 sicoob ATituloNaLista.Instrucao1 := ''; ATituloNaLista.Instrucao2 := ''; ATituloNaLista.Instrucao3 := ''; end; como fica gravado no programa: Não tem erro, até boleto de outro programa quando converto tenho feito reimpressão.

Boa noite Italo. Fiz a atualização dos fontes, realmente não me dei conta disso. Feita a atualização, fiz o teste e continuei recebendo erro, porém já estava recebendo o XML de retorno com as parcelas.. Debuguei e encontrei o problema. Fiz a inclusão do seguinte código na linha 320 da function TRetornoNFSe.LerXml : //tratar resposta betha V110 if not Nivel1 then Nivel1 := (leitor.rExtrai(1, 'ConsultarNfseRpsRespostaV110') <> ''); Problema resolvido. Próxima missão: imprimir as parcelas nas DANFS-e. Vou estudar o fonte o volto a informar. Muito Obrigado.

Olá AGrif... Que complicada está essa situação. Tente ver se a sugestão desse tópico resolve o seu problema:

Está com os fontes atualizados? O PA mudou o ambiente de autorização do SVAN para a SVRS uns meses atrás.

Se usar um aplicativo de teste do fabricante funciona? Porque pode ser algum problema no equipamento.

Boa tarde. Não fui claro o suficiente, me perdoe por isso. Vamos construir um cenário: 1º Pedido de inutilização de 1025 ate 1030 - Gravamos no nosso sistema que vai ser pedido está inutilização 2º Sefaz não responde em tempo, ou a internet caí. Como sabemos não existe consulta, certo? Mas temos como nos virar, a partir disto vamos as possibilidades 1º Pedimos a inutilização novamente some da 1025 até 1026 por exemplo >>>>>>>>> Retorno: 256|Rejeição: Uma NF-e da faixa já está inutilizada na Base de dados da SEFAZ e ficamos sem protocolo. e temos outras possibilidades de retorno dependendo do nosso pedido. 2º Mas o segredo e fazer o mesmo pedido novamente O retorno >>>>>>>>>>>>>>>>>>>>>> 563|Rejeição: Já existe pedido de Inutilização com a mesma faixa de inutilização[N prot. 2316465468798] Somente devemos extrair o número de protocolo e se tivermos armazenado as informações do pedido corretamente, como você mesmo disse podemos até montar o XML do recibo. Uma boa tarde a todos. Desculpe-me pela demora. Edit - NT 2015 - Sobre o comentado acima. 03. Serviço:Inutilização de numeração(item 4.4 do MOC) 03.1 Sobre o Processamento do Pedido de Inutilização Atualmente já é verificada a existência de um Pedido de Inutilização de Numeração em duplicidade (mesma faixa de numeração a ser inutilizada), rejeitando o novo Pedido de Inutilização com o erro “563-Rejeição: Já existe pedido de Inutilização com a mesma faixa de inutilização”. Para esta rejeição, será informado na resposta o Número do Protocolo de Autorização do Pedido de Inutilização anteriormente autorizado (tag: retInutNFe/infInut/nProt). Ou seja se houver protocolo na mensagem de retorno, significa que já se encontra devidamente autorizado e registrado na SEFAZ a dita inutilização

Vai ter mais alguma coisa para corrigir no retorno, a principio a geração do XML está OK, gerei 12 NFS-es e todas foram autorizadas

A margens dos documentos do fast-report no acbr passaram a ser interpretadas como "mm" em vez de "cm". Considere essa propriedades. object ACBrNFeDANFEFR1: TACBrNFeDANFEFR MargemInferior = 8.000000000000000000 MargemSuperior = 8.000000000000000000 MargemEsquerda = 6.000000000000000000 MargemDireita = 5.000000000000000000 EspessuraBorda = 10 end Tenha uma boa tarde.

Tópico fechado por falta de retorno do usuário

1989 - CP500 Basic colégio técnico depois dbase, clipper, C, Pascal, C++,Delphi, PHP, Perl , Java, flluter

Você já conhece os equipamentos da Jetway? A Jetway é uma nova empresa do grupo Tanca, possuí os principais equipamentos para Automação Comercial e uma linha exclusiva dedicada ao segmento de Food&Service, neste relatório apresentaremos o SAT JS-1000. Apresentação do aparelho. Download e instalação de drivers. Rápida configuração no SATTeste e Envio de venda. Ambiente Computador Notebook Dell Sistema Operacional Windows 10 64Bit Processador Intel i5-7200 Memória 8 GB USB 3.1 de 1º Geração Características Técnicas SAT Modelo JS-1000 Processador 400MHz Versão Software Base: 03.00.01 Layouts Suportados: 0,07 e 0,08 1GB de memória de armazenamento Duas portas Ethernet 10/100MBPs Interface USB 2.0 para comunicação com o AC Alimentação elétrica via USB, não necessita de fonte externa 9 LEDs indicadores de informações do SAT Botão de reset Dimensões: 26mm x 110mm x 90mm (A x L x C) Peso: < 100 gramas Driver SAT disponível para os sistemas operacionais Windows x32 e x64, da versão 7 à 10 e para Linux x86 e x64. Download de Drivers e manuais Todos os drivers, bibliotecas e manuais utilizados neste relatório estão disponíveis no link abaixo: http://www.jetway.com.br/suporte/suporte-e-downloads/ Comunicação Acompanhe alguns exemplos de configuração para comunicação com o SAT em diferentes sistemas operacionais. Windows 10 Em ambiente com Windows 10 não foi necessário realizar nenhuma instalação de Driver, pois foi reconhecido automaticamente, o que facilita muito as instalações no dia a dia. Veja abaixo como o Windows reconheceu o equipamento: Windows 7 Como no Windows 10 o equipamento reconheceu automaticamente, realizamos um teste de comunicação no Windows 7, neste caso foi necessário realizar a instalação do driver conforme descrito em Jetway - Manual do utilitario Pág. 7 Nota: O JS-1000 é totalmente compatível com os drivers da linha Tanca. Software de Ativação Jetway O software de ativação fornecido pelo fabricante, possui uma interface simples e intuitiva, acompanhe em Jetway – Manual do utilitario Pág. 19 para ver como realizar o processo. Função SuperLog SuperLog é uma característica única do JS-1000 que permite a extração de alguns dados a mais no LOG extraído. Exemplos de dados do SuperLog: Validade do Certificado; Data da primeira ativação; Informações do contribuinte cadastrado (CNPJ, IE, Razão Social e Endereço); Regime Tributário; Número do próximo CFe; Data e Hora do último CFe transmitido e última comunicação SEFAZ; Quantidade de Cupons (Vendas e Cancelados) a transmitir e a processar; Configurações de Rede e Diagnóstico de rede; Estes dados podem ser acessados pelo software de ativação dos fabricantes Jetway e Tanca, ou pela extração de LOG do SATTeste. Os dados podem auxiliar equipes de desenvolvimento e suporte técnico, fazendo com que a análise das ocorrências sejam mais rápidas e precisa. O acesso a esta função é simples, veja abaixo quais passos seguir: Execute o software do fabricante SAT_Jetway_Ativação.exe e em seguida selecione a opção SuperLog, será solicitado o Código de Ativação, após a validação será exibido o Log. O exemplo na imagem abaixo, exibe todos os dados informados pelo SuperLog. Comunicação com o demo SATTeste O demo SATTeste é um exemplo que utiliza o componente ACBrSAT, por ele é possível realizar todas as operações principais do SAT, para saber mais sobre o demo e aprender como Ativar o SAT pelo SATTeste, veja este vídeo gravado pelo Junior Santos: Comunicação entre ACBr e SAT Veja abaixo um exemplo de configuração para comunicação do SAT com o demo SATTeste. A DLL do SAT está disponível junto ao software de ativação, basta fazer o download do software, descompactá-lo e copiar a DLL para onde preferir. O SAT JS-1000 é compatível também com a DLL da linha Tanca TS-1000, tornando simples a troca de ambos equipamentos caso necessário. Acompanhe abaixo a configuração dos dados no demo utilizado: Configurações: Dados do SAT CFe Tipo de chamada: satDinamico_stdcall Nome da DLL: SAT.dll (Diretório para onde copiou a DLL) Código de Ativação: 12345678 Versão XML: 0,08 Página de Código: 65001 UTF8: Habilitado Exemplo de configuração dos campos da tabela acima: Configurações: Dados Emitente CNPJ: 32.333.764/0001-95 Insc. Estadual: 562.451.232.115 Configurações: Dados Sw. House CNPJ: 16.716.114/0001-72 Assinatura Sw. House: SGR-SAT SISTEMA DE GESTAO E RETAGUARDA DO SAT Testes de Desempenho Através do demo SATTeste, realizamos vendas com diferentes quantidade de itens, cada tipo de venda foi repetida 5 vezes, em cada venda realizada, foi medido o tempo de envio até o recebimento do XML, e ao final calculado o tempo médio, não foi considerado o tempo de decodificação do XML pelo demo. O último teste realizado foi com 501* itens para simular um erro, pois o máximo permitido é de 500 itens, desta forma calculamos também o tempo médio da resposta de retorno. Acompanhe na tabela abaixo o resultado dos testes: * Ao processar o XML de *501 itens o SAT retorna o seguinte erro:|Rejeição: Erro não identificado| Nota: O tempo medido nesse teste, é computado desde o início da transmissão do XML para o SAT, até a recepção do XML de venda, gerado como resposta pelo SAT. Ou seja, é uma medição diferente do que a Especificação Técnica do SAT preconiza, onde apenas o tempo de Geração do XML da venda é considerado. No gráfico abaixo é possível observar com facilidade a variação de tempo para cada tipo de teste realizado: Consideração O SAT JS-1000 é um dos menores aparelhos do mercado, possui um design moderno pensado em clientes exigentes. O hardware é composto de 2 interfaces de rede ethernet que permitem o compartilhamento de internet entre aparelho e computador, 9 leds de status, botão de reset e alimentação através de 1 porta USB Em ambiente com Windows 10 não foi necessário instalar nenhum driver, pois foi reconhecido automaticamente facilitando a instalação no dia a dia, em versões anteriores é necessária realizar o procedimento de instalação de drivers. Veja mais detalhes em Jetway - Manual SAT JS-1000. É possível também utilizar os drivers do Tanca TS-1000, pois o JS-1000 é totalmente compatível com estes. O SuperLog disponível no equipamento é simples e uma ótima ferramenta que auxilia equipes de suporte técnico no dia a dia fornecendo dados importantes do equipamento. Os tempos médios apresentados nos testes estão dentro do esperado, o aparelho possui um bom desempenho no processamento dos XML e comunicação. Não foram apresentados lentidões ou travamentos durante os testes. O equipamento sinaliza para o contribuinte sobre os cupons não transmitidos para a Sefaz. Tal sinalização é realizada através do LED “Pendente”, que pisca de acordo com o número de dias que os cupons estão na memória pendente de transmissão para a Sefaz, este recurso pode ser útil para o próprio contribuinte se atentar e não ultrapassar o limite de dias permitido pela Sefaz. A Tanca é uma das empresas pioneira no suporte ao Layout 0.08 e sua nova marca já nasce com esta característica. Para quem já utiliza equipamentos Tanca, pode ficar tranquilo pois os equipamentos Jetway, possuem a mesma qualidade e confiabilidade, trazendo um design moderno e arrojado. Acesse ao site e saiba mais sobre a empresa: www.jetway.com.br Amostras: Veja abaixo os XML de uma venda e seu cancelamento: Venda: XML de envio:AD20191216152140-583450-env.xml XML de retorno: AD35191232333764000195599000174870001612969675.xml Cancelamento: XML de envio: ADC35191232333764000195599000174870001612969675-env.xml XML de retorno:ADC35191232333764000195599000174870001620356490.xml Cupons Emitidos: Venda/Cancelamento

ja resolvir, achei codigo fixo da versão anterior. Obrigado!

Pessoal, boa tarde. SEFAZ validando o valor do ICMS desonerado sempre maior que zero, porém, quando não tenho base ou quando o valor do produto é 0,01 centavo, por exemplo, teria que enviar o valor do icms desonerado zerado, porém a Sefaz está validando. Informando 0,01 notamos que a NFC-e é autorizada. Alguém está procedendo da mesma maneira tendo se deparado com uma situação semelhante?

Porque não Doar a comunidade? Acredito que o ACBr o ajudou então seria muito interessante de sua parte