Pesquisar na Comunidade

Tem algum problema do DABPe nao sair formatado igual no manual? Estou imprimindo em uma impressora 57mm integrada ao celular. Estou terminando de fazer a impressão, mas queria saber se pode dar algum problema para meu cliente se nao tiver de acordo com a receita, todos os dados vão ser impressos como solicitados, mas só não to conseguindo formatá-los igual o manual sugere.

Boa noite, estou com uma duvida em relação ao BPe, pelo que eu vi, não existe ainda uma maneira de gerar o pdf do BPe transmitido, só imprimindo pelo ESCPOS. Eu desenvolvi um app no Flutter para emitir o BPe. Basicamente ele funciona da seguinte maneira, eu tenho um servidor vps e nesse servidor tem um serviço que eu fiz que fica observando se algum aparelho mandou algum BPe para que seja transmitido, se tiver ele utiliza o ACBrBPe para transmitir e salvar o xml, como o ACBr não tem como gerar o pdf meu app não está imprimindo o DABPe. A solução que eu achei foi montar o DABPe no meu app. Eu já tenho todos os dados para a montagem da impressão, só falta o da string do QRCode. Como eu faço pra capturar essa informação?

Estou trabalhando com o componente ACBrBPe, estou carregando um xml com o comando: ACBrBPe1.Bilhetes.LoadFromFile(arquivo); Estou precisando acessar as informações da tag <chBpe>, estou utilizando o seguinte código : ACBrBPe1.Bilhetes.Items[0].BPe.procBPe.chBPe mas está retornando vazio. Está acontecendo com alguém ? Como deveria acessar essa informação ? BPe31190917675992000150630010000000041022931540-env.xml

[HELP] [INFRAESTRUTURA] [ARQUITETURA] Pessoal, preciso de alguns conselhos/ajuda para implementar a arquitetura de um sistema que irei participar do desenvolvimento. A EMPRESA: É uma empresa de transportes marítimos de Ferry-boats, e agora precisa de um sistema computacional pois é necessário emitir o BPe, que é o bilhete de passagem eletrônico. O CENÁRIO: A empresa não possuía nenhuma infraestrutura de TI e todos os bilhetes eram vendidos em blocos de papel. Antes mesmo de entrarem em contato com a empresa em que trabalho para desenvolver o sistema, a empresa cliente tomou a liberdade de comprar 4 servidores. A ideia da compra surgiu por eles possuírem 3 pontos de venda e a sede da empresa, imaginando que poderiam alocar os servidores em cada um desses pontos de forma local. OS REQUISITOS: O sistema deve possuir um módulo de bilheteria, que deve ser instalado no windows, para venda de passagem e emissão de documento fiscal da compra; um módulo administrativo, que deve ser implementado em Angular, para configuração de viagens, embarcações, cadastros de funcionários e emissão de relatórios; e também um módulo web para a venda de passagens online, que deve também ser implementado em Angular. Sabendo disso nós queríamos desenvolver a aplicação em ASP.NET Core, por já estarmos estudando a um certo tempo. Porém, com isso surgiram dúvidas que ainda não solucionamos. São elas: 1. Como deixar numa mesma solution uma API em ASP.NET Core e o software Windows Forms, para reaproveitarmos lógica de negócios? Seria adequado utilizar Class Libraries .NET Standard nos projetos que terão responsabilidade de acesso a dados e regras de negócios? Conseguiria manter numa mesma solution tudo isso sem qualquer problema? 2. Sabendo da infraestrutura de rede precária na empresa, como eu poderia fazer a integração/sincronização dessas informações? Como eu poderia aproveitar esses 4 servidores, já que caso perca conexão com a internet eu poderia continuar vendendo bilhete por contigência, mas depois isso deveria ser sincronizado com um servidor da sede, por exemplo. 3. O módulo administrativo deve ser acessado somente dentro da SEDE, porém todas as informações de cadastros de viagens devem ser acessíveis pelas aplicações de bilheteria que estarão em pontos remotamente distantes da sede. E o módulo de vendas online deve ser acessível na internet por qualquer pessoa. Sendo esses dois módulos aplicações Angular, eu conseguiria permitir que um fosse acessado através de um domínio tal como "www.vendasonline.com.br" e outro fosse acessado somente na rede interna ad sede? DESCULPEM-ME PELA EXTENSA PERGUNTA, MAS QUANTO MAIS PESQUISO, MAIS DUVIDAS SURGEM EM RELAÇÃO A ESSES PONTOS. DESDE JÁ, AGRADEÇO A TODOS!

Preciso desenvolver um emissor de BPe - Bilhete de Passagem Eletrônico, e estou em duvida se os dados do passageiro são obrigatórios, principalmente o cpf. Se alguém ja desenvolveu este tipo de sistema me tire essa dúvida.

Boa tarde, gostaria de saber se há possibilidade da geração de BPe´s pelo ACBrMonitor Plus? Se sim se há uma lista de comandos para serem utilizados. Grato pela atenção.

Olá! Sou novo aqui no fórum, e tenho que assumir que cheguei aqui por conta de um projeto no qual estou trabalhando. O projeto é desenvolvido em C# e atualmente preciso efetuar a integração e geração de um BPE, pois a empresa cliente é uma administradora de portos que emite passagens e pelas novas determinações deve emitir o BPE. O problema é que, após ler previamente o MOC disponibilizado pela SEFAZ, algumas coisas estão me deixando com dúvida nessa geração do documento e na integração com a SEFAZ Virtual. Um exemplo disso é que dentro da tag <ide> do BPe, existem a informação <dhCont> e <xJust>, que são referentes a data e hora da entrada em contingência e a justificativa, porém se eu não estiver gerando isso em contingência, como devo preencher, já que é um campo obrigatório?

Função para selecionar o certificado digital function SelCert: string; var Store: IStore3; CertsLista, CertsSelecionado: ICertificates2; CertDados: ICertificate; lSigner: TSigner; lSignedData: TSignedData; Cert: TCertificate; Ov: OleVariant; begin Result := ''; Store := CoStore.Create; try Store.Open(CAPICOM_CURRENT_USER_STORE, 'My', CAPICOM_STORE_OPEN_MAXIMUM_ALLOWED); except On E: Exception do begin MsgErro(E.Message); Exit; end; end; try CertsLista := Store.Certificates as ICertificates2; CertsSelecionado := CertsLista.Select ('Certificado(s) Digital(is) disponível(is)', 'Selecione o Certificado Digital para uso no aplicativo', False); except On E: Exception do begin MsgErro('Operação cancelada pelo usuário!'); Exit; end; end; if not(CertsSelecionado.Count = 0) then begin CertDados := IInterface(CertsSelecionado.Item[1]) as ICertificate2; lSigner := TSigner.Create(nil); lSigner.Certificate := CertDados; lSignedData := TSignedData.Create(nil); lSignedData.Content := ' '; try lSignedData.Sign(lSigner.DefaultInterface, false, CAPICOM_ENCODE_BINARY); except On E : Exception do begin MsgErro('Erro na autenticação do Certificado Digital!'); Exit; end; end; Cert := TCertificate.Create(nil); Ov := IInterface(CertsSelecionado.Item[1]) as ICertificate2; Cert.ConnectTo(IDispatch(Ov) as ICertificate2); Result := Cert.Export(CAPICOM_ENCODE_BASE64); lSignedData.Free; lSigner.Free; end; Store.Close; end; function MontaFileAssinatura(const URI: String): String; var ArquivoXml: string; begin ArquivoXml := '<Signature xmlns="http://www.w3.org/2000/09/xmldsig#">' + '<SignedInfo>' + '<CanonicalizationMethod Algorithm="http://www.w3.org/TR/2001/REC-xml-c14n-20010315"/>' + '<SignatureMethod Algorithm="http://www.w3.org/2000/09/xmldsig#rsa-sha1"/>' + '<Reference URI="#' + URI + '">'+ '<Transforms>' + '<Transform Algorithm="http://www.w3.org/2000/09/xmldsig#enveloped-signature"/>' + '<Transform Algorithm="http://www.w3.org/TR/2001/REC-xml-c14n-20010315"/>' + '</Transforms>' + '<DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1"/>' + '<DigestValue></DigestValue>' + '</Reference>' + '</SignedInfo>' + '<SignatureValue></SignatureValue>' + '<KeyInfo>' + '<X509Data>' + '<X509Certificate></X509Certificate>'+ '</X509Data>' + '</KeyInfo>' + '</Signature>'; Result := ArquivoXml; end; Com ou sem no da assinatura não esta funcionando function MontaFileXml(const FileXml, Id: string): string; begin Result := FileXml; // Result := StringReplace(FileXml, ':CERTIFICADO', MontaFileAssinatura(Id), [rfReplaceAll]); end; Função que deveria assinar o documento xml passado como parametro function Assinar(const FileXml, Id: string; var FileOut: string): Boolean; var A: TDFeSSL; B: TDFeSSLXmlSignXmlSec; C: TDFeWinCrypt; I: Integer; fileXmlNew, s : string; F : TStringList; begin fileXmlNew := MontaFileXml(FileXml, Id); Result := False; try try A := TDFeSSL.Create; A.SSLCryptLib := cryOpenSSL; A.SSLXmlSignLib := xsXmlSec; try C:= TDFeWinCrypt.Create(A); s := SelCert; if not Empty(s) then begin try if C.CarregarCertificadoPublico(AnsiString(s))then begin B:= TDFeSSLXmlSignXmlSec.Create(A); F := TStringList.Create; with F do begin Add(fileXmlNew); s := ''; for I := 0 to Count - 1 do S := S + Trim(StringReplace(StringReplace(Pchar(Strings[I]), #13, '', [rfReplaceAll]),#10,'',[rfReplaceAll])); Text := '<?xml version="1.0" encoding="iso-8859-1"?>' + B.Assinar(S,'Signature',''); FileOut := Text; end; end else begin MsgAdverte('Certificado digital selecionado inválido'); Exit; end; except On E1 : Exception do begin MsgErro('Erro durante a seleção do certificado ->' + sLineBreak + E1.Message); Exit; end; end; end else Exit; except On E2 : Exception do begin MsgErro('Erro ao carregar biblioteca do certificado digital ->' + sLineBreak + E2.Message); Exit; end; end; except On E3 : Exception do begin MsgErro('Erro ao carregar biblioteca dinâmica wincrypt do certificado digital ->' + sLineBreak + E3.Message); Exit; end; end; finally FreeAndNil(B); FreeAndNil(C); FreeAndNil(A); end; Result := True; end; Procedimento que passa o arquivo já formatado para realização da assinatura procedure TFormImportaXMLNFe.AdvGlowButton1Click(Sender: TObject); const xml: string = '<?xml version="1.0" encoding="UTF-8"?>'+ '<enviNFe versao="2.00" xmlns="http://www.portalfiscal.inf.br/nfe">' + '<idLote>71</idLote>' + '<NFe>' + '<infNFe id="NFe31120723401920000117550020000295121002311579" versao="2.00">' + '<cUF>35</cUF>' + '<cNF>518005127</cNF>' + '<natOp>Venda a vista</natOp>' + '<mod>55</mod>' + '<serie>1</serie>' + '<dEmi>2012-05-06</dEmi>' + '<tpAmb>2</tpAmb>' + '</infNFe>' + '</NFe>' + '</enviNFe>'; xml: string = '<?xml version="1.0" encoding="UTF-8"?>'+ '<enviNFe versao="2.00" xmlns="http://www.portalfiscal.inf.br/nfe">' + '<idLote>71</idLote>' + '<NFe>' + '<infNFe id="NFe31120723401920000117550020000295121002311579" versao="2.00">' + '<cUF>35</cUF>' + '<cNF>518005127</cNF>' + '<natOp>Venda a vista</natOp>' + '<mod>55</mod>' + '<serie>1</serie>' + '<dEmi>2012-05-06</dEmi>' + '<tpAmb>2</tpAmb>' + '</infNFe>' + ':CERTIFICADO' + '</NFe>' + '</enviNFe>'; var xmlAssi : string; begin inherited; if Assinar(xml,'NFe31120723401920000117550020000295121002311579', xmlAssi) then begin MsgAvisa('xml assinado: ' + sLineBreak + xmlAssi); end; end; Não completa o processo e sempre gera exceção, será que os desenvolvedores do componente não poderia criar um exemplo somente de uso dos componentes em questão já com o arquivo da nfe, cte, bpe para ser assinado.

Boa Tarde Ao consultar o status do serviço, apresenta o erro Sessão "", não encontrada no arquivo "ACBrBPeServicos" Alguém poderá orientar como corrigir?

Boa Tarde, Ao tentar cancelar um bpe estou recebendo a mensagem de schema inválido. O erro também ocorre no portal do BPe. Toda ajuda é bem vinda. Grato desde já. 1-ped-eve.xml

Bom dia senhores, Antes de mais nada, meus mais sinceros votos de um Feliz Natal a todos. Acabei de atualizar o ACBr e ao tentar utilizar o exemplo do componente BPe apresenta o seguinte erro: Class TACBrBPeDABPeESCPOS not found. Qualquer ajuda é bem vinda! Abraços a todos

Boa tarde pessoal, estou iniciando agora um projeto com o ACBRBPe porém ao instalar o componente está retornando um erro ao compilar [dcc32 Fatal Error] ACBr_BPe.dpk(94): E2202 Required package 'ACBr_SM' not found ACBr_SM.dcu está faltando, alguém pode ajudar? Acabei de baixar do repositório do SVN atualizado. Desde já agradeço a cooperação.