André Franco
Membros-
Total de ítens
113 -
Registro em
-
Última visita
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Tudo que André Franco postou
-
Julio, eu ajustei via componente DACTeFR, porém sem resultados. Onde posso encontrar um exemplo de ajustar?
-
Caramba, ajustei ao meu modo as margens no componente mas continua cortando! Você tem as suas margens para eu testar aqui? Fico grato Sim é Fast
-
Olá, pessoal! A impressão do CT-e está mostra na tela normal, porém, na impressão em qualquer impressora fica cortando do lado esquerdo. As impressoras imprimem outros documentos corretamente. Estava tudo tranquilo, foi após uma atualização. o que pode ser?
-
Perfeito, agora sim corrigido.
-
Sim Testando
-
Pessoal quando imprime o DACTe pelo Fast Report com várias notas esse não imprime Tomador, Destinatário.... Números de páginas errado. 26191110806990000103570010000377821626337564-cte.pdf 26191110806990000103570010000377821626337564-cte.xml
-
mudar para openssl é isso? se for me passa print de sua configuração por favor. utilizo wincrypt Opa! tem como enviar a configuração (print) eu utilizo wincrypt
-
atualizei novamente e persiste
-
SIM absolutamente dessa pasta atualizei hoje svn
-
Removi continua aparecendo essa mensagem: os shcemas todos atualizados das pasta do acbr não sei mais o que fazer roblemas na validação do CT-e. Falha na validação dos dados do Conhecimento: 2198 Element '{http://www.portalfiscal.inf.br/cte}infCTeSupl' is unexpected according to content model of parent element '{http://www.portalfiscal.inf.br/cte}CTe'. Expecting: {http://www.w3.org/2000/09/xmldsig#}Signature.
-
infCTeSupl.qrCodCTe := fgtSempre; tb dar erro: [dcc32 Error] uCteEmissao.pas(2705): E2010 Incompatible types: 'string' and 'TForcarGeracaoTag' no proprio componente ja está setado : Configuracoes.Geral.GerarInfCTeSupl := fgtSempre;
-
Não funciona, algum exemplo por favor. os schemas estão atualizados caramba help
-
fiz e continua. também atualizei os schemas e renomeei os cteTiposBasico_v3.00.xsd infCTeSupl.qrCodCTe := 'sempre'; CteMontar.Conhecimentos.GerarCTe;
-
Olá! Fiz todos procedimentos: atualizei, acbr, ajustei a propriedade, e mesmo assim recebo essa mensagem abaixo. Tem alimentar algo na montagem do cte? Estou fazendo assim: infCTeSupl.qrCodCTe := DM.qrDocumentosCteNfeCHAVE.AsString; Algo a ver com opensll ou wincrypto? Problemas na validação do CT-e. Falha na validação dos dados do Conhecimento: 2198 Element '{http://www.portalfiscal.inf.br/cte}infCTeSupl' is unexpected according to content model of parent element '{http://www.portalfiscal.inf.br/cte}CTe'. Expecting: {http://www.w3.org/2000/09/xmldsig#}Signature.
-
Rejeição 716 cnpj / cpf do responsável pela geração do CIOT inválido
André Franco replied to Turbo Drive's tópico in ACBrMDFe
Opa Júlio. Muito obrigado pelo retorno. Pode encerrar o tópico Erro meu amigo ajustei o código para: if DM.qryManifestociot.AsString <> '' then begin with rodo.infANTT.infCIOT.Add do begin CIOT := DM.qryManifestociot.AsString; CNPJCPF := DM.qryManifestocnpj.AsString; end; end; -
Rejeição 716 cnpj / cpf do responsável pela geração do CIOT inválido
André Franco replied to Turbo Drive's tópico in ACBrMDFe
Oi Júlio, ajustei o código para informar o CNPJ do responsável pela geração do CIOT. O CNPJ informando é o correto pela geração do CIOT. rodo.infANTT.infCIOT.Add.CIOT := DM.qryManifestociot.AsString; rodo.infANTT.infCIOT.Add.CNPJCPF := DM.qryManifestocnpj.AsString; Só que agora está retornando a mensagem ao transmitir: -
Conexão WS com HTTPRio sem Certificado
André Franco replied to Alisson Suart's tópico in Object Pascal - Delphi & Lazarus
Seria ótimo -
Rejeição 716 cnpj / cpf do responsável pela geração do CIOT inválido
André Franco replied to Turbo Drive's tópico in ACBrMDFe
Pessoal estou com esse erro de rejeição. Porém meu cliente precisa informar o n° do CIOT Antes do dia 15/07 sempre foi informado o nº do CIOT e sem problemas. Ajudem-me por favor. -
Conexão WS com HTTPRio sem Certificado
André Franco replied to Alisson Suart's tópico in Object Pascal - Delphi & Lazarus
Não utilizo esse componente para CIOT do ACBr. Tenho rotinas próprias. Sim, eles tem homologação. -
Na verdade não é o FortesReport e sim o ABCR. Na emissão do CT-e sempre da erro informando que já existe frmDACTeRLRetrato. Com FASTREPORT não acontece. A rotina é a mesma.
-
RESOLVIDO Desenvolvo com UNIGUI, ACBR com ele não é compatível, infelizmente.
-
Alguém pode ajudar? não sei mexer com FASTREPORT do ACBR o DACTe
-
Olá! o DACTE do FASTREPORT (DACTE.fr3 e DACTE_RETRATO.fr3) não imprime alguns dados que no FORTESREPORT imprime: Observações Dados específicos do Modal Uso Exclusivo do Emissor do CT-e Segue imagens do FAST E FORTES, segue também o xml. xml.xml
-
Conexão WS com HTTPRio sem Certificado
André Franco replied to Alisson Suart's tópico in Object Pascal - Delphi & Lazarus
Olá! Alisson, estou com problema sério no meu emissor CIOT do e-frete. Ele está homologado junto ao e-frete, uns clientes já o utiliza. Ele procura o certificado do cliente que está no repositório e compara com a série que guardo numa tabela, até aí tudo bem ele vai e valida o CIOT, ou veiculo,motorista... Agora a bronca é: Tem micro na mesma empresa que não consegue enviar o CIOT, dá erro de Ticket não pode ser nulo, enquanto outro valida normalmente. Como é sua rotina do certificado e assinatura no onBeforePost? Será que você pode me ajudar. Você utiliza CAMPICOM? Como é para fazer o login no e-frete através de logon e senha. Te agradeço se puder me ajudar. Segue minha rotina de certificado e assinatura: procedure CarregaCertificado(const HTTPReqResp: THTTPReqResp; Data: Pointer); var Store: IStore; Certs: ICertificates; Cert: ICertificate2; CertContext: ICertContext; PCertContext: PCCERT_CONTEXT; I: Integer; begin Store := CoStore.Create; Store.Open(CAPICOM_CURRENT_USER_STORE, 'MY', CAPICOM_STORE_OPEN_MAXIMUM_ALLOWED); Certs := Store.Certificates as ICertificates2; For I := 1 to Certs.Count do Begin Cert := IInterface(Certs.Item) as ICertificate2; if UpperCase(Cert.SerialNumber) = UpperCase(DM.qrEmpresaSERIECERTIFICADO.AsString) then Break; End; (* any certificates found? *) if (Certs.Count > 0) and (I <= Certs.Count) then begin (* get the certificate context *) Cert := IInterface(Certs.Item) as ICertificate2; CertContext := Cert as ICertContext; CertContext.Get_CertContext(Integer(PCertContext)); (* set the certificate to use for the SSL connection *) if InternetSetOption(Data, INTERNET_OPTION_CLIENT_CERT_CONTEXT, PCertContext, Sizeof(CERT_CONTEXT)) = False then begin ShowMessage('Something went wrong'); end; end; end; -
Por favor tem como colocar o repositório para atualizar o ACBr? Por favor tem como colocar no repositório a atualização colocada acima feita pelo Magaiver?
