CarlosSolla

Sim, faz um tempo que não atualizo, estou na revisão 31538. Peço desculpas, verifiquei agora a revisão mais recente e a função LerCampo nem existe mais nela. Uma pena, porém, a funcionalidade que permite utilizar o Navegador ter sido retirada; eu prefiro consultar diretamente o site do governo pela garantia de que ali os dados estão sempre atualizados. Vou então fazer uma cópia da unit ACBRConsultaCNPJ e inclui-la diretamente no meu projeto. Agradeço pela atenção de todos.

Eu utilizo o evento SolicitarCaptcha que faz a consulta usando o TEdgeBrowser. o codigo utilizado no evento é o seguinte: procedure TFormCadTercImpDados.ACBrConsultaCNPJSolicitarCaptcha(var AHtml: string); var Url: string; begin Url := 'https://solucoes.receita.fazenda.gov.br/Servicos/cnpjreva/Cnpjreva_Solicitacao.asp?cnpj=' + editCNPJ.text; AHtml := TFNavegar.Navegar(Url); end; a classe TFNavegar está na unit em anexo. Grato ACBrConsultaCNPJNavegar.dfm ACBrConsultaCNPJNavegar.pas

Bom dia pessoal! Um cliente me passou uma situação em que fez uma consulta de CNPJ e retornou o nome com uma "&" no lugar do E-Comercial. Dei uma pesquisada e vi que no html o E-Comercial aparece desta forma. Então para resolver o problema eu inclui uma linha a mais na função TACBrConsultaCNPJ.LerCampo : if linha = NomeCampo then begin Result := StringReplace(Trim(Texto[i+1]),' ',' ',[rfReplaceAll]); Result := StringReplace(Result,'&','&',[rfReplaceAll]); // linha incluída Texto.Delete(I); break; end; end Isso resolveu o problema aqui, mas não tenho certeza se essa é a melhor solução. Em anexo a unit alterada. Abraços ACBrConsultaCNPJ.pas

Boa tarde! Também passei o caso para o suporte do eSocial, e inicialmente recebi uma reposta orientando para eu mudar a incidência de IRRF da rubrica 231-"Desconto de Adiantamento de 13º Salário" que foi a que gerou o negativo, para a incidência IRRF=12. Esta rubrica gerou um negativo no tpInfoIR=7900, porque ela é um desconto e não havia nenhuma outra rubrica de vencimento no mês com o mesmo tipo de incidência (codIncIRRF=09). Ao que parece os eventos com CodIncIRRF=09 entram no totalizador do tpInfoIR=7900. Após eu argumentar que fazer isso iria gerar uma totalização errada da base de IRRF 13º, reponderam o seguinte: Porém eu não cheguei a reenviar os eventos, pois o cliente já havia fechado a folha, e decidiu manter como estava. Vamos ver então se nos próximos envios não vai mais aparecer esta advertência. at.

Bom dia Ítalo! Agradeço muito. Abraço!

Bom dia pessoal! Estou usando o componente ACBRPagFor para gerar arquivos de pagamento de funcionários, para os funcionário que tem conta em bancos diferentes do banco da empresa, é utilizado o serviço de pagamento a fornecedores. Surgiram 2 funcionários que tem conta nos bancos 380-PicPay e 536-Neon. Estes 2 bancos não existiam na lista existente na unit ACBrPagForConversao.PAS, então alterei a mesma incluindo estes 2 bancos. Gostaria de saber se seria possível incluir esta alteração no repositório. O foi alterarado na revisão 31538. Grato! ACBrPagForConversao.pas

Bom dia a todos! Eu recebi a seguinte advertencia ao enviar, já na versão S-1.2, o evento S-1210 ref. o mês 12 de um funcionário: Ocorrência nº 1 código 1895 Tipo 2 Descrição: O registro [tpInfoIR]=7900 e demonstrativo=xxxx foi zerado pelo sistema, pois o seu valor era negativo Acredito que este erro ocorre porque existem rubricas de desconto como por exemplo a rubrica "Desconto Adiantamento de 13º salário", que eu classifiquei com a natureza da rubrica = 5504 e o tpInfoIR=09 (Verba transitada pela folha de pagamento de natureza diversa de rendimento ou retenção/isenção/dedução de IR); então ao totalizar os valores por tpInfoIR o eSocial não encontra nenhuma outra rubrica de vencimento com este mesmo tpInfoIR, gerando um total negativo para este totalizador. Minha preocupação é se esta configuração da rubrica que eu fiz está correta. Estranho é que, neste caso acima, mesmo a rubrica estando com tpInfoIR = 09, o eSocial totaliza na 7900; Porém ocorreram outros casos em que a ocorrência, retorna o totalizador 79, conforme abaixo: Ocorrência nº 1 código 1895 Tipo 2 Descrição: O registro [tpInfoIR]=79 e demonstrativo=xxxx foi zerado pelo sistema, pois o seu valor era negativo Agradeço muito se houver alguém que possa me orientar sobre esta parte de configuração das rubricas. Estou perdido quanto a isso, e os funcionários de RH das empresas também tem dificuldade com isso. Abraços

Boa tarde! Deu certinho agora. Muito obrigado a todos! Abraços!

Boa tarde a todos Estava apresentando um erro ao processar o evento 5012 no retorno da S-1299, não estava conseguindo pegar a versão do evento de forma apropriada. Fiz uma pequena correção na linha 285 pces5012.pas : de s := Copy(FXML, Pos('/evt/evtIrrf/', FXML)+18, 16); para s := Copy(FXML, Pos('/evt/evtIrrf/', FXML)+13, 16); Em anexo unit corrigida. pcesS5012.pas

Boa tarde a todos, Estava obtendo erro ao enviar o evento S-2240 e notei que tem 2 erros na linha 591 da unit ACBreSocial\PCNeSocial\pcesS2240.pas. Detectei 2 erros nesta linha: 1- Conforme o layout data inicial da tag dtFimCondicao é 16/01/2023 e está como 16/01/2022; 2-Na condição DateToStr(objInfoExpRisco.dtFimCondicao) <> dDataBrancoNula), no meu caso a função DateToStr retorna '30/12/99' enquanto a constante dDataBrancoNula = '30.12.1899' Acertei trocando a linha para essa: if ((objInfoExpRisco.dtIniCondicao >= StringToDateTime('16/01/2023')) and (objInfoExpRisco.dtFimCondicao > 0)) then Abraço!

Boa tarde! Consegui implementar o recurso da marca d'água na DANFE do FastReports, utilizando uma Banda Overlay com uma frxImage. Porém para funcionar, além de ter que incluir estes 2 componentes no arquivo FR3, é necessário alterar as units ACBrNFeDANFEFR.pas e ACBrNFeDANFEFRDM.pas Para utilizar o recurso criei 3 propriedades na unit ACBrNFeDANFEFR, as quais devem ser especificadas no código do programa. LogoMarcaDAguaPngFileName: String => se especificado ira ativar a marca d'agua, e deve conter o caminho do arquivo PNG que contem a imagem , que já deve ser bem transparente. LogoMarcaDAguaTop: Double => Posição vertical que a marca d'agua deve ser impressa na pagina da DANFE LogoMarcaDAguaHeight: Double => Altura da imagem Estou postando aqui para ver se pode ser útil a alguém, porém não tenho experiência com os componentes ACBR , e também só alterei a DANFE retrato. Abraço a todos! ACBrNFeDANFEFR.pas ACBrNFeDANFEFRDM.pas DANFeRetrato.fr3

Bom dia a todos! Esta semana ocorreu caso em que o cliente teve que fazer uma nota fiscal de devolução de uma venda exportação. A natureza de operação utilizada foi a 3211. A Sefaz retornava Rejeição 525: CFOP de Importação e não informado dados da DI. Porém o cliente não tinha a declaração de importação, pois não se tratava de importação e sim de uma devolução de exportação Pesquisei na internet e encontrei o tópico abaixo, orientando para preencher o campo DI com o termo "NIHIL', porém o ACBR faz uma validação do nº do DI e não aceitava. Para conseguir fazer o teste eu alterei a unit pcnNFeW, na linha 920, para aceitar. Após esta alteração consegui autorizar a NF, porém não tenho certeza se a solução foi a adequada, mas estou postando aqui caso alguém mais passe por esta situação. https://documentacao.senior.com.br/bancodesolucoes/erp/21702.htm Muito obrigado! pcnNFeW.pas

Ola BigWings, Boa tarde! Atualizei e colei a sua unit aqui, fiz vários testes e deu certo. Mais uma vez agradeço a todos. Abraço!

Boa tarde Italo, Agradeço muito!

Boa tarde Italo, É isso mesmo, só sai correto a primeira, as demais cartas saiam errado, com dados da primeira NFe, então fiz esta correção na TACBrNFeDANFEFR.ImprimirEVENTO, para resolver o problema aqui, mas toda vez que atualizo os componentes ACBR tenho que ficar revisando. Abraço!