Ir para conteúdo
  • Cadastre-se

dev botao

  • Este tópico foi criado há 3767 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Postado (editado)

Colegas,

 

Já existe exemplo de declarações, chamadas das funções da NFCe para a linguagem C#?

 

Pois o último que baixamos vimos só para delphi e não programamos nessa linguagem, só em C#....

 

Muito obrigado pela atenção

 

um abraço do amigo Rezende!

Editado por RezendeGO
Postado (editado)

Você tem que substituir os arquivos ACBrNFeDANFEFRDM.pas e ACBrNFeDANFEFRDM.dfm da pasta \Fontes\ACBrNFe2\ para os que postei

 

Ítalo, Gostaria de saber se essas alterações sugeridas pelo usuário que alterou o danfe, não pode resultar na criação de um novo componente para impressão do Danfe da NFC, dessa forma não teria que substituir os arquivos do DANFE da nota fiscal eletrônica.

 

Att. Solivan

Editado por Solivan

Sistema de Automação Comercial para diversos segmentos
NF-e, NFC-e, SPED Fiscal - www.arenasoft.com.br

Postado

Ítalo, Gostaria de saber se essas alterações sugeridas pelo usuário que alterou o danfe, não pode resultar na criação de um novo componente para impressão do Danfe da NFC, dessa forma não teria que substituir os arquivos do DANFE da nota fiscal eletrônica.

 

Att. Solivan

 

Solivan,

 

A alteração da Danfe para NFCe sugerida neste post não causa problemas no uso da Danfe para NFe..

Postado

Solivan,

 

A alteração da Danfe para NFCe sugerida neste post não causa problemas no uso da Danfe para NFe..

Certo, você diz que não interfere no uso da NF-e, mas da forma que está sem subir para o SVN, fica ruim de está controlando pois atualizo o meu ACBr diaramente e o interessante é que a alteração fosse feita de forma permanente.

 

Solivan

Sistema de Automação Comercial para diversos segmentos
NF-e, NFC-e, SPED Fiscal - www.arenasoft.com.br

Postado

mas eu não informo essa tag. e mesmo assim o componente gera,

mas eu fiz uma alteração no acbr, e resolvi, muito obrigado.

bom dia, amigo o seu GerarStringQrCodeNFC consultar NFc-e deu certo ? vc poderia colocar o seu codigo de consultar ?

 

Ebnezer.

Postado

bom dia, amigo o seu GerarStringQrCodeNFC consultar NFc-e deu certo ? vc poderia colocar o seu codigo de consultar ?

 

Ebnezer.

com relação ao qrcode ainda existe erros, pra mim ja apareceu erro 100 e erro 220, mas mesmo assim a nfc-e aparece no site

Postado

Para quem ainda esta com problemas pra gerar o qrCode vou postar aqui da maneira que esta funcionando, pelo menos para o MT:

 

procedure TfrmDanfeECF.GerarQrCode;
var
  s_aux, dh_emi, s_hash: string;
begin
  dh_emi := GetUTC( CodigoParaUF(facbr.NotasFiscais.Items[0].NFe.Ide.cUF),
              StrToDateTime(FormatDateTime('dd/mm/yyyy',facbr.NotasFiscais.Items[0].NFe.Ide.dEmi)+' '+
              FormatDateTime('hh:mm:ss', facbr.NotasFiscais.Items[0].NFe.Ide.dEmi)));
  dh_emi := StrToHex( FormatDateTime('yyyy-mm-dd',facbr.NotasFiscais.Items[0].NFe.Ide.dEmi)+'T'+
              FormatDateTime('hh:mm:ss', facbr.NotasFiscais.Items[0].NFe.Ide.dEmi)+dh_emi );

  if (FAcbr.NotasFiscais.Items[0].NFe.ide.tpAmb = taHomologacao) then
  begin
    FIdToken := '000001';
  end;
  if (FAcbr.NotasFiscais.Items[0].NFe.ide.tpAmb = taHomologacao) then
  begin
    FToken := Copy(FAcbr.NotasFiscais.Items[0].NFe.Emit.CNPJCPF, 1, 8)+IntToStr(YearOf(Now))+'0001';
  end;

  s_aux :='chNFe=<chaveacesso>'+
          '&nVersao=100'+
          '&tpAmb=<ambiente>'+
          IIf(facbr.NotasFiscais.Items[0].NFe.Dest.CNPJCPF<>'', '&cDest=<cnpj_dest>', '')+
          '&dhEmi=<data_hora>'+
          '&vNF=<valor>'+
          '&vICMS=<valor_icms>'+
          '&digVal=<digito_val>'+
          '&cIdToken=<id_token><token>';

  s_aux := StringReplace(s_aux, '<chaveacesso>', SomenteNumeros(facbr.NotasFiscais.Items[0].NFe.infNFe.ID), []);
  s_aux := StringReplace(s_aux, '<ambiente>', TpAmbToStr(facbr.NotasFiscais.Items[0].NFe.Ide.tpAmb), []);
  s_aux := StringReplace(s_aux, '<data_hora>', dh_emi, []);
  s_aux := StringReplace(s_aux, '<valor>', StringReplace(FormatFloat('##,##0.00',facbr.NotasFiscais.Items[0].NFe.Total.ICMSTot.vNF),',','.',[]),[] );
  s_aux := StringReplace(s_aux, '<valor_icms>', StringReplace(FormatFloat('##,##0.00',facbr.NotasFiscais.Items[0].NFe.Total.ICMSTot.vICMS),',','.',[]),[] );
  s_aux := StringReplace(s_aux, '<digito_val>', StrToHex(facbr.NotasFiscais.Items[0].NFe.signature.DigestValue), []);
  s_aux := StringReplace(s_aux, '<id_token>', FIdToken, []);
  s_aux := StringReplace(s_aux, '<cnpj_dest>', facbr.NotasFiscais.Items[0].NFe.Dest.CNPJCPF, []);

  with TACBrEAD.Create(nil) do
  try
    s_hash := StringReplace(s_aux,'<token>',FToken,[]);
    s_hash := CalcularHash(s_hash, dgstSHA1);
  finally
    Free;
  end;

  s_aux :=  StringReplace(s_aux,'<token>', '',[]) + '&cHashQRCode='+s_hash;
  s_aux := GetSiteConsulta( CodigoParaUF(FAcbr.NotasFiscais.Items[0].NFe.Ide.cUF), FAcbr.NotasFiscais.Items[0].NFe.Ide.tpAmb ) +'?'+ s_aux;

  MontarQrCode(s_aux);

end;

Notem que, quando for gerar o hash, deve ser feito com IdToken e Com o Token, para homologação deve ser IdToken = '000001',

e Token, (primeiros 8 digitos do CNPJ)+Ano+0001. Quando for gerar o qrCode deve remover o "token" e deixar apenas o IdToken senão não vai fechar e vai retornar o erro 100.

 

pra quem tiver interesse segue uma string do qr_code funcionando.

http://homologacao.sefaz.mt.gov.br/nfce/consultanfce?chNFe=51131115319954000139650050000001031175076630&nVersao=100&tpAmb=2&dhEmi=323031332D31312D30375431363A33343A35322D30333A3030&vNF=111.01&vICMS=19.98&digVal=486256502F3478596278784230314470377466474E4151356949553D&cIdToken=000001&cHashQRCode=56A39A17537CAB21C1632887C332BE95CD1BD51F

Abaixo a string sob a qual foi gerado o hash

STRING:
chNFe=51131115319954000139650050000001031175076630&nVersao=100&tpAmb=2&dhEmi=323031332D31312D30375431363A33343A35322D30333A3030&vNF=111.01&vICMS=19.98&digVal=486256502F3478596278784230314470377466474E4151356949553D&cIdToken=0000011531995420130001


HASH: 
56A39A17537CAB21C1632887C332BE95CD1BD51F
  • Curtir 2
Postado

Colegas como não temos programador em Delphi na nossa empresa estávamos pensando em usar o ACBrMonitor até que conseguirmos colocar prá rodar a NFCe no nosso sistema que é em C#....

 

Agora a resposta do colega acima me assusta pois pretendo usar o ACBrMonitor justamente prá emitir NFCe no Mato Grosso...

 

O executável ACBrMonitor então para MT não estaria 100% ok? Pois o colega acima sugeriu alterações no fonte.....

 

Obrigado pela atenção.

 

Um abraço do amigo Rezende.

Postado

Ola Rezende,

 

O ACBrMonitor esta funcionando para emissão de NFC-e, apenas o DANFE que não temos nada oficial ainda, portanto, você terá que efetuar a impressão por conta própria, o que não é grande problema.

 

A emissão, cancelamento, consulta, enfim, todos os processos da NFC-e podem ser feitos, inclusive eu creio já haver varios usuários utilizando pra esse fim.

  • Membros Pro
Postado

 

Para quem ainda esta com problemas pra gerar o qrCode vou postar aqui da maneira que esta funcionando, pelo menos para o MT:

 

procedure TfrmDanfeECF.GerarQrCode;
var
  s_aux, dh_emi, s_hash: string;
begin
  dh_emi := GetUTC( CodigoParaUF(facbr.NotasFiscais.Items[0].NFe.Ide.cUF),
              StrToDateTime(FormatDateTime('dd/mm/yyyy',facbr.NotasFiscais.Items[0].NFe.Ide.dEmi)+' '+
              FormatDateTime('hh:mm:ss', facbr.NotasFiscais.Items[0].NFe.Ide.dEmi)));
  dh_emi := StrToHex( FormatDateTime('yyyy-mm-dd',facbr.NotasFiscais.Items[0].NFe.Ide.dEmi)+'T'+
              FormatDateTime('hh:mm:ss', facbr.NotasFiscais.Items[0].NFe.Ide.dEmi)+dh_emi );

  if (FAcbr.NotasFiscais.Items[0].NFe.ide.tpAmb = taHomologacao) then
  begin
    FIdToken := '000001';
  end;
  if (FAcbr.NotasFiscais.Items[0].NFe.ide.tpAmb = taHomologacao) then
  begin
    FToken := Copy(FAcbr.NotasFiscais.Items[0].NFe.Emit.CNPJCPF, 1, 8)+IntToStr(YearOf(Now))+'0001';
  end;

  s_aux :='chNFe=<chaveacesso>'+
          '&nVersao=100'+
          '&tpAmb=<ambiente>'+
          IIf(facbr.NotasFiscais.Items[0].NFe.Dest.CNPJCPF<>'', '&cDest=<cnpj_dest>', '')+
          '&dhEmi=<data_hora>'+
          '&vNF=<valor>'+
          '&vICMS=<valor_icms>'+
          '&digVal=<digito_val>'+
          '&cIdToken=<id_token><token>';

  s_aux := StringReplace(s_aux, '<chaveacesso>', SomenteNumeros(facbr.NotasFiscais.Items[0].NFe.infNFe.ID), []);
  s_aux := StringReplace(s_aux, '<ambiente>', TpAmbToStr(facbr.NotasFiscais.Items[0].NFe.Ide.tpAmb), []);
  s_aux := StringReplace(s_aux, '<data_hora>', dh_emi, []);
  s_aux := StringReplace(s_aux, '<valor>', StringReplace(FormatFloat('##,##0.00',facbr.NotasFiscais.Items[0].NFe.Total.ICMSTot.vNF),',','.',[]),[] );
  s_aux := StringReplace(s_aux, '<valor_icms>', StringReplace(FormatFloat('##,##0.00',facbr.NotasFiscais.Items[0].NFe.Total.ICMSTot.vICMS),',','.',[]),[] );
  s_aux := StringReplace(s_aux, '<digito_val>', StrToHex(facbr.NotasFiscais.Items[0].NFe.signature.DigestValue), []);
  s_aux := StringReplace(s_aux, '<id_token>', FIdToken, []);
  s_aux := StringReplace(s_aux, '<cnpj_dest>', facbr.NotasFiscais.Items[0].NFe.Dest.CNPJCPF, []);

  with TACBrEAD.Create(nil) do
  try
    s_hash := StringReplace(s_aux,'<token>',FToken,[]);
    s_hash := CalcularHash(s_hash, dgstSHA1);
  finally
    Free;
  end;

  s_aux :=  StringReplace(s_aux,'<token>', '',[]) + '&cHashQRCode='+s_hash;
  s_aux := GetSiteConsulta( CodigoParaUF(FAcbr.NotasFiscais.Items[0].NFe.Ide.cUF), FAcbr.NotasFiscais.Items[0].NFe.Ide.tpAmb ) +'?'+ s_aux;

  MontarQrCode(s_aux);

end;

Notem que, quando for gerar o hash, deve ser feito com IdToken e Com o Token, para homologação deve ser IdToken = '000001',

e Token, (primeiros 8 digitos do CNPJ)+Ano+0001. Quando for gerar o qrCode deve remover o "token" e deixar apenas o IdToken senão não vai fechar e vai retornar o erro 100.

 

pra quem tiver interesse segue uma string do qr_code funcionando.

http://homologacao.sefaz.mt.gov.br/nfce/consultanfce?chNFe=51131115319954000139650050000001031175076630&nVersao=100&tpAmb=2&dhEmi=323031332D31312D30375431363A33343A35322D30333A3030&vNF=111.01&vICMS=19.98&digVal=486256502F3478596278784230314470377466474E4151356949553D&cIdToken=000001&cHashQRCode=56A39A17537CAB21C1632887C332BE95CD1BD51F

Abaixo a string sob a qual foi gerado o hash

STRING:
chNFe=51131115319954000139650050000001031175076630&nVersao=100&tpAmb=2&dhEmi=323031332D31312D30375431363A33343A35322D30333A3030&vNF=111.01&vICMS=19.98&digVal=486256502F3478596278784230314470377466474E4151356949553D&cIdToken=0000011531995420130001


HASH: 
56A39A17537CAB21C1632887C332BE95CD1BD51F

Boa tarde,

 

Não estou conseguindo validar um QrCode em Ambiente Produção, o que será que tem de errado, em Homologação funciona blz, utilizando o código acima.

 

http://www.sefaz.mt.gov.br/nfce/consultanfce?chNFe=51131108150892000119650020000000011001491748&nVersao=100&tpAmb=1&cDest=06949316000100&dhEmi=323031332d31312d31325431343a33313a33382d30333a3030&vNF=6.03&vICMS=0.00&digVal=4759516c69795352412b5450466d6b3264313844706830495856633d&cIdToken=000001&cHashQRCode=0F2D9645B9A4A7B580264FB2907083172F0C2455

Atenciosamente,

Márcio Lopes

Analista de Sistemas

  • Membros Pro
Postado (editado)

Boa Tarde Roberto.Godinho,

 

Sim estou utilizando o token fornecido pela sefaz.

 

O estranho é quando eu troco o tpAmb para 2 funciona, mas retorna "Erro 100 - QR Code Inválido."

 

Conforme o manual teria que ser assim:

Identificação do Ambiente (1 – Produção, 2 – Homologação)

 

??????????????????

 

Segue URL do QrCode:

 

http://www.sefaz.mt.gov.br/nfce/consultanfce?chNFe=51131108150892000119650020000000011001491748&nVersao=100&tpAmb=2&cDest=06949316000100&dhEmi=323031332d31312d31325431343a33313a33382d30333a3030&vNF=6.03&vICMS=0.00&digVal=4759516c69795352412b5450466d6b3264313844706830495856633d&cIdToken=000001&cHashQRCode=A62B1600E68B761D8E0AAE942ABFEB6F6944DBC2

Editado por marciotga

Atenciosamente,

Márcio Lopes

Analista de Sistemas

Postado (editado)

Roberto, algo estranho neste pedaço de código:

 

  if (FAcbr.NotasFiscais.Items[0].NFe.ide.tpAmb = taHomologacao) then
  begin
    FIdToken := '000001';
  end;
  if (FAcbr.NotasFiscais.Items[0].NFe.ide.tpAmb = taHomologacao) then
  begin
    FToken := Copy(FAcbr.NotasFiscais.Items[0].NFe.Emit.CNPJCPF, 1, 8)+IntToStr(YearOf(Now))+'0001';
  end;

 

Não falta o ambiente de produção aí?

Editado por lvr
Postado

pra mim não falta pq as propriedades FToken e FIdToken são informadas antes de entrar nesta função, só são alteradas se o ambiente for Homologação, neste caso eu gero o IdToken e Token para homologação.

Postado

 

 

Para quem ainda esta com problemas pra gerar o qrCode vou postar aqui da maneira que esta funcionando, pelo menos para o MT:

 

procedure TfrmDanfeECF.GerarQrCode;
var
  s_aux, dh_emi, s_hash: string;
begin
  dh_emi := GetUTC( CodigoParaUF(facbr.NotasFiscais.Items[0].NFe.Ide.cUF),
              StrToDateTime(FormatDateTime('dd/mm/yyyy',facbr.NotasFiscais.Items[0].NFe.Ide.dEmi)+' '+
              FormatDateTime('hh:mm:ss', facbr.NotasFiscais.Items[0].NFe.Ide.dEmi)));
  dh_emi := StrToHex( FormatDateTime('yyyy-mm-dd',facbr.NotasFiscais.Items[0].NFe.Ide.dEmi)+'T'+
              FormatDateTime('hh:mm:ss', facbr.NotasFiscais.Items[0].NFe.Ide.dEmi)+dh_emi );

  if (FAcbr.NotasFiscais.Items[0].NFe.ide.tpAmb = taHomologacao) then
  begin
    FIdToken := '000001';
  end;
  if (FAcbr.NotasFiscais.Items[0].NFe.ide.tpAmb = taHomologacao) then
  begin
    FToken := Copy(FAcbr.NotasFiscais.Items[0].NFe.Emit.CNPJCPF, 1, 8)+IntToStr(YearOf(Now))+'0001';
  end;

  s_aux :='chNFe=<chaveacesso>'+
          '&nVersao=100'+
          '&tpAmb=<ambiente>'+
          IIf(facbr.NotasFiscais.Items[0].NFe.Dest.CNPJCPF<>'', '&cDest=<cnpj_dest>', '')+
          '&dhEmi=<data_hora>'+
          '&vNF=<valor>'+
          '&vICMS=<valor_icms>'+
          '&digVal=<digito_val>'+
          '&cIdToken=<id_token><token>';

  s_aux := StringReplace(s_aux, '<chaveacesso>', SomenteNumeros(facbr.NotasFiscais.Items[0].NFe.infNFe.ID), []);
  s_aux := StringReplace(s_aux, '<ambiente>', TpAmbToStr(facbr.NotasFiscais.Items[0].NFe.Ide.tpAmb), []);
  s_aux := StringReplace(s_aux, '<data_hora>', dh_emi, []);
  s_aux := StringReplace(s_aux, '<valor>', StringReplace(FormatFloat('##,##0.00',facbr.NotasFiscais.Items[0].NFe.Total.ICMSTot.vNF),',','.',[]),[] );
  s_aux := StringReplace(s_aux, '<valor_icms>', StringReplace(FormatFloat('##,##0.00',facbr.NotasFiscais.Items[0].NFe.Total.ICMSTot.vICMS),',','.',[]),[] );
  s_aux := StringReplace(s_aux, '<digito_val>', StrToHex(facbr.NotasFiscais.Items[0].NFe.signature.DigestValue), []);
  s_aux := StringReplace(s_aux, '<id_token>', FIdToken, []);
  s_aux := StringReplace(s_aux, '<cnpj_dest>', facbr.NotasFiscais.Items[0].NFe.Dest.CNPJCPF, []);

  with TACBrEAD.Create(nil) do
  try
    s_hash := StringReplace(s_aux,'<token>',FToken,[]);
    s_hash := CalcularHash(s_hash, dgstSHA1);
  finally
    Free;
  end;

  s_aux :=  StringReplace(s_aux,'<token>', '',[]) + '&cHashQRCode='+s_hash;
  s_aux := GetSiteConsulta( CodigoParaUF(FAcbr.NotasFiscais.Items[0].NFe.Ide.cUF), FAcbr.NotasFiscais.Items[0].NFe.Ide.tpAmb ) +'?'+ s_aux;

  MontarQrCode(s_aux);

end;

Notem que, quando for gerar o hash, deve ser feito com IdToken e Com o Token, para homologação deve ser IdToken = '000001',

e Token, (primeiros 8 digitos do CNPJ)+Ano+0001. Quando for gerar o qrCode deve remover o "token" e deixar apenas o IdToken senão não vai fechar e vai retornar o erro 100.

 

pra quem tiver interesse segue uma string do qr_code funcionando.

http://homologacao.sefaz.mt.gov.br/nfce/consultanfce?chNFe=51131115319954000139650050000001031175076630&nVersao=100&tpAmb=2&dhEmi=323031332D31312D30375431363A33343A35322D30333A3030&vNF=111.01&vICMS=19.98&digVal=486256502F3478596278784230314470377466474E4151356949553D&cIdToken=000001&cHashQRCode=56A39A17537CAB21C1632887C332BE95CD1BD51F

Abaixo a string sob a qual foi gerado o hash

STRING:
chNFe=51131115319954000139650050000001031175076630&nVersao=100&tpAmb=2&dhEmi=323031332D31312D30375431363A33343A35322D30333A3030&vNF=111.01&vICMS=19.98&digVal=486256502F3478596278784230314470377466474E4151356949553D&cIdToken=0000011531995420130001


HASH: 
56A39A17537CAB21C1632887C332BE95CD1BD51F

Boa tarde,

 

Não estou conseguindo validar um QrCode em Ambiente Produção, o que será que tem de errado, em Homologação funciona blz, utilizando o código acima.

 

http://www.sefaz.mt.gov.br/nfce/consultanfce?chNFe=51131108150892000119650020000000011001491748&nVersao=100&tpAmb=1&cDest=06949316000100&dhEmi=323031332d31312d31325431343a33313a33382d30333a3030&vNF=6.03&vICMS=0.00&digVal=4759516c69795352412b5450466d6b3264313844706830495856633d&cIdToken=000001&cHashQRCode=0F2D9645B9A4A7B580264FB2907083172F0C2455

 

boa tarde, amigo essa funcao "GetSiteConsulta" ?? voce tem ela 

Postado

segue ai, no entanto eu apenas testei o do MT em homologação.

function TfrmReport.GetSiteConsulta(UF: string; Ambiente: TpcnTipoAmbiente ): string;
const
  site_uf_prod : array[0..6] of string =
     ('http://www.sefaznet.ac.gov.br/nfe/NFe.jsp?opc=3',
     'http://sistemas.sefaz.am.gov.br/nfceweb/consultarNFCe.jsp',
     'http://www.nfce.sefaz.ma.gov.br/portal/consultarNFCe.jsp',
     'http://www.sefaz.mt.gov.br/nfe/portal/consultanfce',
     'http://www.nfe.rn.gov.br/portal/consultarNFCe.jsp',
     'https://www.sefaz.rs.gov.br/NFCE/NFCE-COM.aspx',
     'http://www.nfe.se.gov.br/portal/consultarNFCe.jsp');
  site_uf_hom : array[0..6] of string =
      ('http://hml.sefaznet.ac.gov.br',
      'http://homnfe.sefaz.am.gov.br/nfceweb/consultarNFCe.jsp',
      'http://www.hom.nfce.sefaz.ma.gov.br/portal/consultarNFCe.jsp',
      'http://homologacao.sefaz.mt.gov.br/nfce/consultanfce',
      'http://www.hom.nfe.rn.gov.br/portal/consultarNFCe.jsp',
      'https://www.sefaz.rs.gov.br/NFCE/NFCE-COM.aspx',
      'http://www.hom.nfe.se.gov.br/portal/consultarNFCe.jsp');
begin
  case Ambiente of
    taProducao:  begin
          if UF = 'AC' then
            Result := site_uf_prod[0]
          else if UF = 'AM' then
            Result := site_uf_prod[1]
          else if UF = 'MA' then
            Result := site_uf_prod[2]
          else if UF = 'MT' then
            Result := site_uf_prod[3]
          else if UF = 'RN' then
            Result := site_uf_prod[4]
          else if UF = 'RS' then
            Result := site_uf_prod[5]
          else if UF = 'SE' then
            Result := site_uf_prod[6]
        end;
    taHomologacao:  begin
          if UF = 'AC' then
            Result := site_uf_hom[0]
          else if UF = 'AM' then
            Result := site_uf_hom[1]
          else if UF = 'MA' then
            Result := site_uf_hom[2]
          else if UF = 'MT' then
            Result := site_uf_hom[3]
          else if UF = 'RN' then
            Result := site_uf_hom[4]
          else if UF = 'RS' then
            Result := site_uf_hom[5]
          else if UF = 'SE' then
            Result := site_uf_hom[6]
        end;
  end;

end;
Postado

Boa Tarde, Alguem sabe me Dizer se esta nos planos de fazer a integração do AcbrNFC-e com o ACBrECF eu vi em um posta a algum tempo procurei e não encontrei o mesmo e se tem alguma previsão...

 

Obrigado

Postado

Roberto Godinho,

 

Estou com um problema na impressão do NFCe em FastReport que ainda não consegui resolver.

 

O problema ocorre quando há mais de uma folha na impressão e o PageHeader "Emitente" é impresso em todas elas. Mesmo a impressão do cupom ser em sequencia imprime o PageHeader "Emitente" várias vezes conforme o preview do FastReport.

 

O que poderia ser feito para resolver é a propriedade "PrintOnFirstPage" ficar "True" somente na primeira página.

 

Abraço.

  • Membros Pro
Postado

Certo, você diz que não interfere no uso da NF-e, mas da forma que está sem subir para o SVN, fica ruim de está controlando pois atualizo o meu ACBr diaramente e o interessante é que a alteração fosse feita de forma permanente.

 

Solivan

Boa Tarde,

 

Também estou utilizando essa atualizações em produção, seria interessante subir para o SVN.

 

Att,

Atenciosamente,

Márcio Lopes

Analista de Sistemas

Postado

Bom dia a todos. Gostaria de saber se o ACBrECF poderá emitir NFC-e? Estou preocupado, pois estou quase terminando de programar um PDV com o ECF normal usando esse componente.

 

Atenciosamente

Jerson Seling

  • Moderadores
Postado

Bom dia a todos. Gostaria de saber se o ACBrECF poderá emitir NFC-e? Estou preocupado, pois estou quase terminando de programar um PDV com o ECF normal usando esse componente.

 

Atenciosamente

Jerson Seling

E uma ideia que o Daniel falou em um post, mas ainda não se tem nada começado pelo menos que eu saiba para tornar isso realidade

Mas no caso do seu PDV com ECF e também por causa do Paf não é obrigatório a NF-e, bem no caso a NFC-e possui poucas diferenças onde é possível conciliar com a sua emissão de NF-e e lá ter a emissão também !

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Transparent-02.png
 

 

Postado (editado)

Roberto Godinho,

 

Estou com um problema na impressão do NFCe em FastReport que ainda não consegui resolver.

 

O problema ocorre quando há mais de uma folha na impressão e o PageHeader "Emitente" é impresso em todas elas. Mesmo a impressão do cupom ser em sequencia imprime o PageHeader "Emitente" várias vezes conforme o preview do FastReport.

 

O que poderia ser feito para resolver é a propriedade "PrintOnFirstPage" ficar "True" somente na primeira página.

 

Abraço.

 

Ola lvr,

 

Alterei a banda correspondente ás informações do Emitente de modo que só apareçam na primeira página.

Não tenho certeza se eu estava com a ultima versão que você havia disponibilizado, se acaso não estiver anexe a ultima que eu altero pra ti.

 

E desculpe a demora, estava sobrecarregado com a implementação da NFSe, queria terminar antes de entrar de férias.  

 

 

Abraço.

DANFeNFCe.rar

Editado por Roberto.Godinho
Postado (editado)

Ola lvr,

 

Alterei a banda correspondente ás informações do Emitente de modo que só apareçam na primeira página.

Não tenho certeza se eu estava com a ultima versão que você havia disponibilizado, se acaso não estiver anexe a ultima que eu altero pra ti.

 

E desculpe a demora, estava sobrecarregado com a implementação da NFSe, queria terminar antes de entrar de férias.  

 

 

Abraço.

 

Roberto,

 

Não ficou bom :smile: explico:

 

1 - Os dados do emitente imprime duas vezes (uma abaixo da outra) porque o Header1 está como filho (child) do ReportTitle. Tirando esta vinculação imprime correto somente uma vez e somente na primeira página o Danfe completo, porém o Danfe simplificado só imprime com Header1 sendo "child".

 

2 - O cabeçalho dos produtos (GroupHeaderDadosProdutosHeader) também está imprimindo na "segunda folha", devendo setar a propriedade "ReprintOnNewPage" para False.

 

3 - Não sei como está fazendo com as margens porque passando pelo código não funciona, estou alterando manual.

Editado por lvr
Postado (editado)

Boa tarde lvr,

 

creio que agora esta de acordo, no entanto não entendi qual o problema com as margens, na minha mini-impressora está saindo correto, utilizo uma bematech MO 4000-TH. Verifique a largura da bobina e as colunas da impressora. Se não for o caso detalhe aqui qual o problema com as margens Se for só largura você pode ajustar ou avisa que eu ajusto pra ti.

 

Anexei juntamente ao fr3 4 testes, send eles simplificado/detalhado com e sem logo.

danfenfce.rar

Editado por Roberto.Godinho
Postado

Boa tarde pessoal alguém já testou a DLL da Daruma pra gerar o QRCode?, ela só aceita 255 caracteres no stCodigo e não estou sabendo aumentar isso, mas gera belezinha.

 

function eGerarQrCodeArquivo_DUAL_DarumaFramework(stPath: AnsiString; stCodigo: AnsiString): Integer; StdCall; External 'DarumaFrameWork.dll';
 

 

  • Este tópico foi criado há 3767 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Visitante
Este tópico está agora fechado para novas respostas
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...