Lucas G. dos Santos

Renato, O problema está no arquivo XSD. Utilizando os arquivos da pasta do ACBr funcionou normalmente. Porém comparei os dois arquivos e não consegui identificar nenhuma diferença entre eles. O arquivo que estou analisando é o evtExclusao-v_S_01_00_00.xsd Vou anexar a minha pasta, a qual acontece o erro, caso queira fazer um teste. Muito obrigado por ajudar. schemas_Ruim.rar

Olá, Estou com erro ao tentar enviar o evento S3000 do e-social. Outros eventos estão funcionando normalmente, o erro ocorre apenas no S3000. Retorna a mensagem abaixo: Mensagem: Falha na validação dos dados do evento: evtExclusao-v_S_01_00_00 Erro: Schema inválido Testei com a configuração: Teste 1: SSLLib := libWinCrypt; SSLCryptLib := cryWinCrypt; SSLHttpLib := httpWinHttp; SSLXmlSignLib := xsLibXml2 Teste 2: SSLLib := libOpenSSL; SSLCryptLib := cryOpenSSL; SSLHttpLib := httpOpenSSL; SSLXmlSignLib := xsLibXml2; Os schemas estão em um diretório local, junto com o executável. Tentei as sugestões do @BigWings no tópico abaixo, mas não funcionou. Em anexo está o XML de exemplo. Se alguém já passou por isso e puder ajudar, eu agradeço. S3000_exemplo.xml

Márcio, Conseguiu resolver? estou com o mesmo problema para os registro S3000. Obrigado.

Fernando, Lembrei de outra situação que ocorreu comigo e que retornava esse mesmo erro. Eu assinei o XML com um certificado e estava tentando transmitir com outro. Quando ao exemplo de XML pode baixar do tópico acima que o Renato citou.

O problema era que eu não estava ajustando a propriedade TipoEmpregador do componente antes de enviar o evento: Meu código: eSocialComponente.Configuracoes.Geral.TipoEmpregador := tePessoaJuridica; if (Length(SomenteNumeros(sCNPJEmpregador)) = 11) then eSocialComponente.Configuracoes.Geral.TipoEmpregador := tePessoaFisica; Obrigado Renato por tentar ajudar.

Fernando, Tente isso antes de enviar: eSocialComponente.Configuracoes.Geral.TipoEmpregador := tePessoaJuridica; if (Length(SomenteNumeros(sCNPJEmpregador)) = 11) then eSocialComponente.Configuracoes.Geral.TipoEmpregador := tePessoaFisica; No meu caso passou.

Olá, A alteração gerou um problema na identificação do evento S2220, no meu caso. O inicio do XML contém: <?xml version="1.0" encoding="UTF-8"?><eSocial xmlns="http://www.esocial.gov.br/schema/evt/evtMonit/v_S_01_00_00"><evtMonit Id="ID2040074 ..... Na linha 2821, do arquivo pcesConversaoeSocial está o seguinte código: strSearchValue := Trim(Copy(s, intChar + 1, intLastPos - intChar - 1)); Utilizando o trecho do XML de exemplo, o valor atribuido a variável strSearchValue foi: "vtMonit I" Esse evento não existe, a função copiou um caracter pra frente, deixei da seguinte forma: strSearchValue := Trim(Copy(s, intChar, intLastPos - intChar - 1)); Apenas removi o "+ 1" e no meu caso resolveu. Passou a retornar: "evtMonit". Anexei o arquivo com o ajuste. Obs.: Utilizo a versão 2005 do delphi. pcesConversaoeSocial.pas

Renato, No manual encontrei o seguinte: A identificação única do evento (Id) é composta por 36 caracteres, conforme o que segue: IDTNNNNNNNNNNNNNNAAAAMMDDHHMMSSQQQQQ ID - Texto Fixo "ID"; T - Tipo de Inscrição do Empregador (1 - CNPJ; 2 - CPF); NNNNNNNNNNNNNN - Número do CNPJ ou CPF do empregador - Completar com zeros à direita. No caso de pessoas jurídicas, o CNPJ informado deve conter 8 ou 14 posições de acordo com o enquadramento do contribuinte para preenchimento do campo {ideEmpregador/nrInsc} do evento S-1000, completando-se com zeros à direita, se necessário. AAAAMMDD - Ano, mês e dia da geração do evento; HHMMSS - Hora, minuto e segundo da geração do evento; QQQQQ - Número sequencial da chave. Incrementar somente quando ocorrer geração de eventos na mesma data/hora, completando com zeros à esquerda. OBS.: No caso de pessoas jurídicas, o CNPJ informado deverá conter 8 ou 14 posições de acordo com o enquadramento do contribuinte para preenchimento do campo {ideEmpregador/nrInsc} do evento S-1000, completando-se com zeros à direita, se necessário. Se eu entendi corretamente o primeiro digito é referente ao tipo de inscrição e não o ambiente. De qualquer forma obrigado do retorno.

Olá Renato, Muito obrigado pelo seu retorno. No meu caso o ambiente é produção, por isso tpAmb=1. O detalhe é que esse erro ocorre apenas quando eu tento enviar com o grupo idEmpregador com o campo tpInsc=2 (CPF). Se alguém conseguisse me enviar XML autorizado, com empregado CPF, eu poderia analisar e tentar identificar o que eu estou errando. Meus contatos próximos utilizam apenas CNPJ.

Olá, Estou com dificuldade em autorizar eventos de SST quando utilizo tipo de inscrição CPF no empregador. Segue trecho do XML com o erro de retorno: <codigo>609</codigo> <descricao>Código inválido.</descricao> <tipo>1</tipo> <localizacao>/eSocial/envioLoteEventos/eventos/evento/@Id</localizacao> Já verifiquei o ID do XML e não consegui identificar o problema. Outro detalhe é que estou transmitindo por procuração. Então o certificado que utilizo para assinar e transmitir é de outra empresa. Em anexo está o XML que estou tentando enviar e o retorno. Alguém já passou por está situação e poderia me auxiliar? XML_S2220.xml XML_S2220_retorno.xml

Funcionou. Pelo que eu li no manual 4.1 da DANFE NFC-e, de dezembro de 2016 pode imprimir outras informações. Fiquei com dúvida quanto a organização das informações na impressão. Mas como não tenho certeza não alterei nada sobre isso. Obrigado.

Olá, Segue em anexo dois arquivos com a inclusão da impressão do campo obsCont na DANFE com Fortes.. Adicionei junto ao campo infCpl para impressão. Alterei o modelo A4 e o modelo para impressora térmica. Obrigado. ACBrDANFCeFortesFr.pas ACBrDANFCeFortesFrA4.pas

Atualizado e testado, tudo certo com as duas modificações Juliomar, muito obrigado.

Eu vi que o trecho acima já estava comentado. Não sei dizer se é correto, mas se for necessário o usuário pode informar no campo obsCont que vai imprimir da mesma forma. O único detalhe é observar a quantidade de caracteres que nesse campo é de 160 ou pode usar o campo xObs que tem 2000 posições. Nesse caso fica a critério do usuário informar ou não conforme a necessidade. Obrigado.

Acho que você se referiu ao aéreo. Não encontrei nada sobre. Eu tinha visto esse código comentado e não acho que seja necessário. Eu acredito que qualquer observação que deva sair na DACTE tem que constar no XML autorizado. Por isso, no arquivo eu removi a linha com a condição de não imprimir. Obrigado.

Acredito que se está no XML autorizado e protocolado, não tem problema em ser impresso. Apenas comentei a linha com a condição que não permitia imprimir. ACBrCTeDACTeRLRetrato.pas

No fonte tem a condição para não imprimir no caso do aéreo. No arquivo ACBrCTeDACTeRLRetrato.pas linha 2341. Está assim: if FCTe.Ide.modal <> mdAereo then begin for i := 0 to (FCTe.Compl.ObsCont.Count - 1) do with FCTe.Compl.ObsCont.Items do begin rlmObsExcEmitente.Lines.Add(StringReplace(xCampo, '&lt;BR&gt;', #13#10, [rfReplaceAll, rfIgnoreCase]) + ': ' + StringReplace(xTexto, '&lt;BR&gt;', #13#10, [rfReplaceAll, rfIgnoreCase])); end; end; A minha dúvida é se isso está correto. Não encontrei nada que justifique essa condição, por isso pedi ajuda. Segue o arquivo 41161226052418000136570010000000061018100002-cte.xml.

Olá, Estou com dúvida quanto a impressão do campo obsCont quando o CT-e é da modalidade aéreo. Vi que tem um tópico antigo que cita esse detalhe, mas sem reposta.( ) Na época o tópico cita a impressão no QuickReport. Hoje no Fortes tem o mesmo código. Fiz uma pesquisa sobre isso e não consegui encontrar a resposta, então recorri ao fórum. Existe algum motivo para não imprimir a observação quando a modalidade é aéreo? Desde já agradeço.

Tudo certo Juliomar. Obrigado.

Olá, Segue em anexo o arquivo ACBrCargaBal.pas com a inclusão da geração dos arquivos de integração com o software URF32 para balanças Urano. Obrigado. ACBrCargaBal.pas

Olá, Fiz a modificação para aumentar o tamanho da impressão do QR Code e funcionou perfeitamente. Está em anexo os dois arquivos caso alguém queira testar. Obrigado. ACBrNFeDANFeQRNFCe.rar

Italo, Obrigado pelo retorno. Verificando o XML vi que o trecho do protocolo estava incorreto. Da seguinte forma: protNFe versao="3.10"> <infProt Id="ID"> <tpAmb>2</tpAmb> <verAplic>PR-v3_3_7</verAplic> <chNFe>41150609068416000116650010000115591017764300</chNFe> <dhRecbto/> <nProt/> <digVal/> <cStat>618</cStat> <xMotivo> Chave de Acesso inválida (modelo diferente de 55). Chave: 41150609068416000116650010000115591017764300 </xMotivo> </infProt> </protNFe> Fiz um ajuste no programa e passou a gravar corretamente com a mensagem de Autorizado uso. <protNFe versao="3.10"> <infProt Id="ID141150000072939"> <tpAmb>2</tpAmb> <verAplic>PR-v3_1_0</verAplic> <chNFe>41150609068416000116650010000115601010864300</chNFe> <dhRecbto>2015-06-12T08:35:17-03:00</dhRecbto> <nProt>141150000072939</nProt> <digVal>Xp1acARy9nk6IzzRqq7jDP1TSNI=</digVal> <cStat>100</cStat> <xMotivo>Autorizado o uso da NF-e</xMotivo> </infProt> </protNFe> Obs.: Os trechos são de NFC-e diferentes. Um antes da correção e outros após. Feito isso imprimindo em impressora laser consegui consultar o QR Code. Porém na impressora não fiscal ainda não funcionou. Estudando os fontes vi que é possível aumentar o tamanho do QR Code na unit ACBrNFeDANFeQRNFCe na procedure qrb08_QRCodeBeforePrint. Porém quando faço qualquer modificação nesse arquivo o Delphi não compila minha modificação. Poderia me orientar como faço para aumentar o tamanho do QR Code? Acredito que a qualidade do papel e da impressão pode estar prejudicando a consulta e aumentando o tamanho possa melhorar. Obrigado pela atenção.

Olá, Estou fazendo testes na impressão da DANFE de NFC-e e utilizando ACBrNFeDANFEQR, porém os aplicativos leitores que estou testando não conseguem consultar o QR Code. Utilizando o ACBrNFeDANFeESCPOS funciona perfeitamente. Alguém já teve esse problema? Modifiquei o exemplo DemoDANFEEscPos para utilizar o ACBrNFeDANFEQR e ocorre o mesmo problema. O problema ocorre imprimindo na impressora laser e também na não fiscal (Bematech MP-4200TH). Pesquisei no fórum e não encontrei nada sobre esse tive de problema. Desde já agradeço a todos.

Rodando o apagarAcbr.bat e reinstalando consegui abrir o Delphi. Obrigado pela ajuda.