Renato Rubinho

Boa noite, Você precisa preencher: * Emitente.WSUser: Inscr. Seq. de 5 dígitos, informação passada pelo provedor. * Emitente.WSSenha: Senha para utilização do webservice. * Emitente.WSChaveAutoriz: Token ../trunk2/Fontes/ACBrDFe/ACBrNFSeX/Provedores/Siappa.GravarXml.pas function TNFSeW_Siappa.GerarXml: Boolean; . . . NFSeNode.AppendChild(AddNode(tcStr, '#1', 'ws_001_in_prest_insc_seq', 1, 8, 1, Usuario, '')); NFSeNode.AppendChild(AddNode(tcStr, '#1', 'ws_001_in_prest_cnpj', 14, 14, 1, OnlyNumber(NFSe.Prestador.IdentificacaoPrestador.CpfCnpj), '')); NFSeNode.AppendChild(AddNode(tcStr, '#1', 'ws_001_in_prest_ws_senha', 1, 20, 1, Senha, '')); NFSeNode.AppendChild(AddNode(tcStr, '#1', 'ws_001_in_prest_ws_token', 1, 20, 1, ChaveAutoriz, ''));

Boa tarde, Veja se resolve preenchendo a IM do tomador, talvez o provedor utilize esse critério em alguma situação interna.

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

Respondido no outro tópico, fechando o tópico antigo.

Veja no programa de exemplo como ler um XML, no botão Distribuição por último NSU. Caso tenha novas dúvidas, favor abrir um novo tópico, fechando este e o outro antigos com a mesma dúvida. 3.1 - Não faça flooding - Inundar o fórum com posts repetidos, com a mesma dúvida ou as mesmas palavras é chamado de flooding. Isso é proibido. Apenas um post feito no lugar certo é suficiente. Pesquise antes de postar, talvez sua dúvida já está respondida em outro post. Favor leia as regras do fórum.

Boa tarde, Obrigado pelo retorno. Por favor aguarde os consultores enviarem o fonte para o SVN e avisaremos aqui quando for feito.

Boa noite, Está utilizando o programa de exemplo? Veja se as propriedades para salvar os xmls estão marcadas, conforme detalhado neste tópico.

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

Boa noite, Já está no SVN.

Boa tarde, Todos os registros da nova versão são assíncronos. Você sempre receberá lote em processamento, quando não houverem erros de comunicação. Você receberá um protocolo e deverá utilizar o método para consultar o protocolo e obter o resultado do processamento.

Boa noite @MessiasNatal13 Pode fazer um teste com essa unit mesclada com sua implementação? Atualize os fontes, substitua a unit atual por esta, reinstale os componentes e faça novos testes. Por favor, confirme se ficou ok para que os consultores enviem o novo fonte para o SVN. pcnReinfR1000.pas

Boa tarde, Os registros 4XXX existem apenas na versao 2.1, tem que utilizar essa versão para enviá-los. A versão 2.1 contempla todos os registros, todos tem que funcionar na nova versão. Que tipo de problema está ocorrendo no envio dos demais registros na versão nova?

Boa tarde, Até o momento o ambiente de produção não havia sido liberado para a versão 2.1. Foram feitos testes em produção restrita e não apresentou este tipo de problema. Caso não esteja com os fontes mais recentes, experimente atualizar, reinstalar os componentes e fazer uma nova transmissão para avaliar. Se o problema persistir, favor anexar os soaps do envio e retorno para análise ou se considerar que sejam dados sensíveis, envie para o e-mail [email protected]

Boa tarde, Está com os fontes atualizados e reinstalou os componentes após a atualização? Como estão as configurações de ssl e tls. Confirme se está utilizando TLS1.2

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.

Boa noite, Está correto, este .reg adiciona no registro do Windows os caminhos das bpls geradas. Quando você deu um clique duplo nele, qual foi a mensagem? Verifique no registro do Windows se as informações foram adicionadas em: HKEY_CURRENT_USER\Software\Embarcadero\BDS\21.0\Known Packages Caso o problema persista, para fazer manualmente o mesmo que o .reg faz, após o Build ALL, clique com o botão direto sobre cada pacote iniciado com "DCL" e clique em instalar.

Boa tarde, Mesmo relato ontem no discord. https://discord.com/channels/798697718800318484/841297523485573140/1077311799436771432

Boa tarde, A dúvida é se você tem uma cópia do ACBrNFSeXServicos.ini junto ao seu exe. O ACBr não mantém fontes no git, apenas no SVN. Esses fontes não estão atualizados. Veja como está está município no fonte oficial. https://svn.code.sf.net/p/acbr/code/trunk2/Fontes/ACBrDFe/ACBrNFSeX/ACBrNFSeXServicos.ini [4309506] ; Inclu�do em 17/02/2023 Nome=Guarani das Missoes UF=RS Provedor=Pronim Versao=2.03 ProRecepcionar=http://guaranidasmissoes.govbr.cloud/NFSe.Portal.Integracao/services.svc HomRecepcionar= Apague essa pasta do git, baixe os fontes do SVN e reinstale os componentes marcando a opção de apagar versões anteriores. https://svn.code.sf.net/p/acbr/code/trunk2 Veja maiores detalhes neste link: https://projetoacbr.com.br/fontes/

Essa é uma questão a fazer na Receita, talvez no fale conosco. Ao meu ver, apesar do nome, para os eventos não periódicos ela serve apenas para listar o que há no período informado para o evento consultado. Já para os eventos periódicos, note que retorna o número do recibo. Respondendo a dúvida original, o número do recibo está na consulta de protocolo, para os eventos não periódicos e periódicos.

A consulta de protocolo retorna o número do recibo.

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

Sem problemas, são só avisos para melhorar o uso do fórum. Tente assim: //cnProtestarCorrido CodigoNegativacao=1 //diCorridos TipoDiasProtesto=0 DataProtesto=dd/mm/yyyy DiasDeProtesto=NN *** Para entender o contexto, veja o código do componente que trata o preenchimento destes valores. {C�digo para Protesto / Negativa��o} case CodigoNegativacao of cnProtestarCorrido : ACodProtesto := '1'; cnProtestarUteis : ACodProtesto := '2'; cnNegativar : ACodProtesto := '8'; cnNaoProtestar : ACodProtesto := '3'; else case TipoDiasProtesto of diCorridos : ACodProtesto := '1'; else ACodProtesto := '2'; end; end; {Data e Dias de Protesto / Negativa��o} if (ACodProtesto = '8') then begin DataProtestoNegativacao := DateToStr(DataNegativacao); DiasProtestoNegativacao := IntToStr(DiasDeNegativacao); end else begin if (ACodProtesto <> '3') then begin DataProtestoNegativacao := DateToStr(DataProtesto); DiasProtestoNegativacao := IntToStr(DiasDeProtesto); end else begin DataProtestoNegativacao := ''; DiasProtestoNegativacao := '0'; end; end; Composição do segmento. IfThen((DataProtestoNegativacao <> '') and (StrToInt(DiasProtestoNegativacao) > 0), ACodProtesto, '3') + // 221 - C�digo de protesto IfThen((DataProtestoNegativacao <> '') and (StrToInt(DiasProtestoNegativacao) > 0), PadLeft(DiasProtestoNegativacao, 2, '0'), '00') + // 222 a 223 - Prazo para protesto (em dias)

Boa noite, Quais valores deveriam ser preenchidos nas posições 221 e 222-223?

3.1 - Não faça flooding - Inundar o fórum com posts repetidos, com a mesma dúvida ou as mesmas palavras é chamado de flooding. Isso é proibido. Apenas um post feito no lugar certo é suficiente. Pesquise antes de postar, talvez sua dúvida já está respondida em outro post. Favor leia as regras do fórum. Seguindo no outro tópico.