[Configuração de Diretórios ACBRNFe1 Path]

Bom dia

eu faço da seguinte forma ao criar o form

 LerConfiguracao;

ex: edtemailpath.text:='c:\seu sistema';

 edtpdf.text:=edtemailpath.text+'\'+copy(datetostr(date),7,4)+copy(datetostr(date),4,2)+'\Pdf';
 edtNFE.text:=edtemailpath.text+'\'+copy(datetostr(date),7,4)+copy(datetostr(date),4,2)+'\NFE';
 edtinu.text:=edtemailpath.text+'\'+copy(datetostr(date),7,4)+copy(datetostr(date),4,2)+'\Inu';
 edteve.text:=edtemailpath.text+'\'+copy(datetostr(date),7,4)+copy(datetostr(date),4,2)+'\eventos'; //eve
 edtman.text:=edtemailpath.text+'\'+copy(datetostr(date),7,4)+copy(datetostr(date),4,2)+'\Eventos\confirmacao';
 edtcce.text:=edtemailpath.text+'\'+copy(datetostr(date),7,4)+copy(datetostr(date),4,2)+'\Cce';
 edtdepec.text:=edtemailpath.text+'\'+copy(datetostr(date),7,4)+copy(datetostr(date),4,2)+'\Dpec';
 edtpathlogs.text:=edtnfe.text;

Dir := trim(edtpdf.Text);
if not DirectoryExists(Dir) then
  BEGIN
     ForceDirectories(Dir);
  END;

     GravarConfiguracao;

///gravo os paths no INI a partir dos edits
     LerConfiguracao;
//carrego os edits a partir do ini

Espero que ajude

 

[Salvar a Chave da Nota Nfce]

Bom dia

 

utilizo assim

     table3CHAVE.Value:=trim(copy(ACBrNFe1.NotasFiscais.Items[0].NFe.infNFe.ID, (length(ACBrNFe1.NotasFiscais.Items[0].NFe.infNFe.ID)-44)+1, 44)+'-NFe.xml');
     TABLE3NRPROT.value:=ACBrNFe1.WebServices.Retorno.NFeRetorno.ProtNFe.Items[0].nProt;
     TABLE3recibo.value:=ACBrNFe1.WebServices.Retorno.NFeRetorno.nRec;
 

 

Espero que ajude

 

[smtp error: unable to login]

Tive este problema em alguns clientes com provedores diferentes

solução

criei um email só para receber/enviar notas no R7

ex:

[email protected]

smtp.r7.com

porta 465

resolvi o problema de todos os clientes

 

[Erro ao transmitir NFe]

   

     iDE.IndFinal:= cFconsumidorfinal;   // CONSUMIDOR FINAL 0-nao   1-sim
     Dest.indIEDest:=inNaoContribuinte;  //Nao contribuinte
 

seria isto?

 

[Arquivo de schema não informado]

Bom dia Regys,

sim eu utilizo um arquivo de configurações .INI como no exemplo do acbr, logo que abro a aplicação passo os parametros ao componente,

tentei até mesmo na hora de gerar a NFE informando novamente a pasta, mas não resolveu, da mesma forma faço na NFe e não da problemas,

apenas na NFCe. ja tentei assim

acbrnfe1.configuracoes.arquivos.pathschemas:='c:\centcons\schemas\ve310';

também não acatou...

criei um display para ver se o componente estava recebendo o path, e me mostrou o path normal..

utilizei os esquemas da pasta ...\exemplos\schemas\nfe  como o Ítalo citou em outro topico

o erro ocorre no fonte AcbrDfeSSL na linha 343

function TDFeSSL.Validar(const ConteudoXML: String; ArqSchema: String;
  out MsgErro: String): Boolean;
begin
  if EstaVazio(ArqSchema) then
    raise EACBrDFeException.Create('Arquivo de Schema não especificado');

utilizo capicom, delphi7 e windows7 profissional original

 

[[Ot] - Desenvolvedores Autônomos Podem Ficar Fora Do Sat]

Bom dia,

Bem, vai ai 

acesse o site da sefaz /SAT

menu-->  acesso ao sistema de retaguarda-->contribuinte/desenvolvedor--->acesso ao acgrSat

1- entre em contribuinte e  credencie a empresa com certificado digital proprio

vincular o sistema para uso próprio

2 - entre em software house  e vincule a softhouse com o cnpj e certificado da propria empresa citando que o sistema e de uso proprio

após isto vá em

---> Gerenciar cód. de segurança

gere  o codigo CSC

imprima tudo que puder, pois alguns dados são solicitados na ativação do SAT

a partir do proprio programa que acompanha o SAT, efetue o credenciamento informando os dados que voce imprimiu

RESUMINDO:  a ativação é feita da mesma forma que se fosse uma softhouse, so muda ao cadastrar o sistema, informando

o que e de uso proprio, o cnpj e certificado da propria empresa.   Note que com o certificado da SEFAZ, eu tentei e não funcionou.

Detalhe: optamos pela Nfce, por ser mais simples no momento da emissão, mas mesmo assim tivemos que ativar o sat, para

efeito de contingencia. (estamos falando do abmbiente de Produção).

baixe o manual passo a passo de ativação do SAT na sefaz.

espero que ajude..

 

[Arquivo de schema não informado]

Boa tarde,

Hoje migrei  a  NFCe para o trunk 2, mas estou com o problema do erro:

Arquivo de schema não informado.

ja defini no componente,  informei em tempo de execução e nada, da o erro e não gera o xml.

EX: acbrnfe1.Configuracoes.arquivos.Pathschemas:=edit_chemas.Text;

Alguém tem alguma sugestão.

Obrigado

 

[envCCe_v1.00.xsd não encontrado]

Boa tarde,

Hoje migrei  a  NFCe para o trunk 2, mas estou com o problema do erro:

Arquivo de schema não informado.

ja defini no componente,  informei em tempo de execução e nada, da o erro e não gera o xml.

EX: acbrnfe1.Configuracoes.arquivos.Pathschemas:=edtpathschemas.Text;

Alguém tem alguma sugestão.

Obrigado

 

Desculpem fiz o post acima  no local errado

 

[Crl do certificado]

Valeu foleyjf,

 

resolvido...

 

[Crl do certificado]

Bom dia,

não achei nenhum tópico ref. a este erro não mudei nada no sistema, e hoje ao emitir a primeira nota 

para Ginfes, apos digitar a senha do certificado A3 retorna o seguinte erro.

Não foi possivela cessar a CRL do certificado.

Já tentei todo tipo de configuração e não resolveu.

Alguem já passou por issso

 

 

[FastReport/FortsReport Número de Cópias]

Bom dia, Wilson_jr

Apos analizar o programa exemplo da Nfe, e o arquivo .INI  ,

verifiquei que havido sido implementado alguns atributos no

componente, os quais eu não estava configurando corretamente,

após fazer estas correções, resolvi varios erros que estavam dando

no meu sistema.

EX: de erros

Numero de copias

não existem mais arquivos

etc...

 

[FastReport/FortsReport Número de Cópias]

Bom dia

 

estou tendo problemas com os 2, tanto no fast com o no forts, quando mando para a impressora

occore isto.

 

[FastReport/FortsReport Número de Cópias]

Bom dia,

Desculpem se dupliquei o tópico, mas efetuando pesquisas ha uma semana e tudo

que achei ref. ao assunto não resolveu meu problema.

formatei o PC, re-instalei win,delphhi7 ,acbr  Trunk2  e ao utilizar o fast ou fortsreport da nfe, não respeita o nro de copias

esta duplicando, se informo 1 imprime 2, se inf. 2 imprime 4.. etc...

tentei usar um printdialogs mas não respeita também o nro de copias.

informei em tempo de execução, mas também nao funcionou.

utilei o preview , mas também não funcionou

ex:

if (edtimp.text='1') then
begin
  //FORTSREPORT
 ACBrNFe1.DANFE:=ACBrNFEDANFERL1;
ACBrNFEDANFERL1.NUMCopiAs := strtoint(nrcopias.TEXT);
ACBrNFEDANFERL1.LOGO := EDTLOGOMARCA.TEXT;
ACBrNFEDANFERL1.PATHPDF := EDTPDF.TEXT;
end
else
begin
//FASTREPORT
 ACBrNFe1.DANFE:=ACBrNFEDANFEFR1;
ACBrNFEDANFEFR1.dmDanfe.frxReport.PrintOptions.Copies := strtoint(nrcopias.TEXT);
ACBrNFEDANFEFR1.dmDanfe.frxReport.PrintOptions.ShowDialog := True;
ACBrNFEDANFEFR1.FastFile := ExtractFileDir(application.ExeName) + '\Report\DANFERETRATONOVO.fr3';
ACBrNFEDANFEFR1.LOGO := EDTLOGOMARCA.TEXT;
ACBrNFEDANFEFR1.PATHPDF := EDTPDF.TEXT;
ACBrNFEDANFEFR1.NUMCOPIAS := strtoint(nrcopias.TEXT);
end;

Alguem ja passou por  isto ???

 

[[Ot] - Desenvolvedores Autônomos Podem Ficar Fora Do Sat]

Ola Dalton, eu consigui ativar o sat.

cadastrei o sistema como uso próprio

e ativei o SAT normalmente com  o certificado da própria empresa.

 

 

[DIFAL - Duvidas Finais]

Boa Tarde,

apos varios testes com a partilha de icms, me deparei com um problema

utilizei as valores mostrados na nt 2015;003 v1.40 

formula

            Bsorig         :=(valorproduto+frete)-desconto+ipi;
            Basedest       :=BsOrig;
            PicmSufDest    :=18.00-2.00;  //2 fcp
            PicmsInter     :=12.00; //% aliquota destino (normal)
            PicmsinterPart := 40.00;             //40% 2016, 60% 2017  , 80% 2018  ,% 100 2019
            bsorig         :=bsorig/(1-(picmsinter/100));    //valor icms remetente
            Basedest       :=Basedest/(1-(xperc/100));  //base destino
            VbcUfDest      :=Basedest;               //base destino
            Vfcpufdest     :=(VbcUfDest*Pfcpufdest)/100;        // valor icms pobreza
            VicmsUFDest    :=((vbcufDest*Picmsufdest)/100);  //icms destino                  //valor icms destino
            VicmsUFRemet   :=(bsorig*Picmsinter)/100;  //valor icms remetente

resultado

-<ICMSUFDest>

<vBCUFDest>1219.51</vBCUFDest>

<pFCPUFDest>2.0000</pFCPUFDest>

<pICMSUFDest>16.0000</pICMSUFDest>

<pICMSInter>12.00</pICMSInter>

<pICMSInterPart>40.0000</pICMSInterPart>

<vFCPUFDest>24.39</vFCPUFDest>

<vICMSUFDest>195.12</vICMSUFDest>

<vICMSUFRemet>136.36</vICMSUFRemet>

</ICMSUFDest>

DIFAL = R$ 83,15 JA SOMADO O FCP

os cantadores estão contestando dizendo que o site abaixo utiliza outra formula e disponibilizou um simulador o

qual da diferença do calculo anterior

http://www.asseinfo.com.br/blog/difal-diferencial-de-aliquota-icms/

formula

            Bsorig         :=(valorproduto+frete)-desconto+ipi;
            Basedest       :=BsOrig;
            PicmSufDest    :=18.00-2.00;  //2 fcp
            PicmsInter     :=12.00; //% aliquota destino (normal)
            PicmsinterPart := 40.00;             //40% 2016, 60% 2017  , 80% 2018  ,% 100 2019
            VbcUfDest      :=Basedest;               //base destino
            Vfcpufdest     :=(VbcUfDest*(Pfcpufdest/100));        // valor icms pobreza
            xdifal         :=bsorig*((xperc-picmsinter)/100);
            VicmsUFDest    :=xdifal*(40.00/100);  //icms destino                  //valor icms destino
            VicmsUFRemet   :=xdifal*(60.00/100);;  //valor icms remetente
            IcmPobre:=icmpobre+Vfcpufdest;
            Icmdest :=icmdest +VIcmsUFdest;      //totais
            Icmremet:=icmremet+VIcmsUFremet;
 

resultado

-<ICMSUFDest>

<vBCUFDest>1000.00</vBCUFDest>

<pFCPUFDest>2.0000</pFCPUFDest>

<pICMSUFDest>16.0000</pICMSUFDest>

<pICMSInter>12.00</pICMSInter>

<pICMSInterPart>40.0000</pICMSInterPart>

<vFCPUFDest>20.00</vFCPUFDest>

<vICMSUFDest>24.00</vICMSUFDest>

<vICMSUFRemet>36.00</vICMSUFRemet>

</ICMSUFDest>

VALOR DIFAL  R$ 44,00  JA SOMADO O FCP

 

alguém tem alguma sugestão

 

[Mudar Caminho Do Danfe Em Pdf]

Ola

 

eu nao uso o preview, portanto defino o s paths a partir de edit´s

//defino o path

 edtpdf.text:= ExtractFileDir(application.ExeName) +'\'+copy(datetostr(date),7,4)+copy(datetostr(date),4,2)+'\Pdf';

ex: no fastreport

ACBrNFEDANFEFR1.FastFile := ExtractFileDir(application.ExeName) + '\Report\DANFERETRATONOVO.fr3';
ACBrNFEDANFEFR1.LOGO := EDTLOGOMARCA.TEXT;
ACBrNFEDANFEFR1.PATHPDF := EDTPDF.TEXT;    <<<-------------------------
PRINTDIALOG1.EXECUTE;
    ACBrNFe1.NotasFiscais.Imprimir;
    ACBrNFe1.NotasFiscais.ImprimirPDF;
 

[DIFAL - Dúvidas vICMSUFDest]

Bom dia

Acredito que ele deve ser  somado no DIFAL para emitir a guia

 

[AcbrMail ao enviar o executável para de funcionar]

eu utilizo a base do demo do acbr

 

  ACBrNFe1.NotasFiscais.Clear;

    para:=trim(table3email.value);
    CC:=TstringList.Create;
    try
    CC.add(trim(edtCC.text));
    assunto:='Nota Fiscal Eletronica';
    arqemail:=' NFe - '+floattostr(table3fatura.value);
    edtemailassunto.text:=assunto+arqemail;
    xcomple:=trim(edtemailpath.Text)+'\'+copy(datetostr(table3data.value),7,4)+copy(datetostr(table3data.value),4,2)+'\nfe\';
    ACBrNFe1.NotasFiscais.LoadFromFile(PathWithDelim(XCOMPLE)+trim(table3nfe.value));
      ACBrMail1.Host := edtSmtpHost.Text;
      ACBrMail1.Port := edtSmtpPort.Text;
      ACBrMail1.Username := edtSmtpUser.Text;
      ACBrMail1.Password := edtSmtpPass.Text;
      ACBrMail1.From := edtSmtpUser.Text;
      ACBrMail1.SetSSL := cbEmailSSL.Checked; // SSL - Conexão Segura
      ACBrMail1.SetTLS := cbEmailSSL.Checked; // Auto TLS
      ACBrMail1.ReadingConfirmation := False; //Pede confirmação de leitura do email
      ACBrMail1.UseThread := False;           //Aguarda Envio do Email(não usa thread)
      ACBrMail1.FromName := edtemitrazao.text;

      ACBrNFe1.NotasFiscais.Items[0].EnviarEmail( Para, edtEmailAssunto.Text,
                                               mmEmailMsg.Lines
                                               , True  // Enviar PDF junto
                                               , CC    // Lista com emails que serão enviado cópias - TStrings
                                               , nil); // Lista de anexos - TStrings

     finally
    CC.Free;
    end;
     MemoResp.Lines.add('     '+floattostr(table3fatura.value)+'  --->  '+trim(table3CLIENTE.value));
     MemoResp.Lines.add('                  Email  Enviado...');
  ACBrNFe1.NotasFiscais.Clear;

   acbrmail1.Clear;       <---------   coloquei esta opção apos cada email , enviando 3 emails ,diminuiu para 1 minuto por email

   também tente usar a porta 465
  end;

[AcbrMail ao enviar o executável para de funcionar]

Ola Jean

testei em varias maquinas, todos os clientes que estou atualizando a nfe, esta dando este problema de lentidão e travando

em um cliente até resetei o roteador e re-configurei tudo mas não resolveu

 

[Erro calculo da partilha em produção (CofinST)]

Oi Denerbuzato

após o meu ultimo post, o contador instalou o emissor gratuito e emitiu a nota fiscal normalmente sem informar a partilha

 

agora fiquei perdido

 

[Erro calculo da partilha em produção (CofinST)]

Ola

usei o validador do site sefaz.RS notei a seguinte diferença no cabecalho dos xmls

homologaçãp

<?xml version="1.0" encoding="UTF-8"?>
-<nfeProc xmlns="http://www.portalfiscal.inf.br/nfe" versao="3.10">

-<NFe xmlns="http://www.portalfiscal.inf.br/nfe">

-<infNFe versao="3.10" Id="NFe35160100721388000110550010000004991000004993">-<ide>

 

Produção

<?xml version="1.0" encoding="UTF-8"?>
-<NFe xmlns="http://www.portalfiscal.inf.br/nfe">

-<infNFe Id="NFe35160104369976000197550010000004991000004993" versao="3.10">-<ide>

produção nao montou a segunda linha, como mostra o validador do RS, mas os schemas estão iguais tanto n o cliente como no meu PC

estou emitindo NFE de SP  para TO

empresa no Simples Nacional

[Erro calculo da partilha em produção (CofinST)]

ola Denerbuzato

o erro e o seguinte

in unospected according content model of parentt element http://portafiscal/nfeimposto

http://portalfiscal.inf.br/nfe/COFINST

Estou emitindo a nfe para pessoa FISICA

Cfop  6107 venda de produção a consumidor final não contribuinte fora do estado

calculei a partilha de bens normalmente masme retorna este erro e  nao valida

 

[Erro calculo da partilha em produção (CofinST)]

Bom dia

procurei em varios topicos mas nao achei nada relacionado

em homologação gero a nfe a autoriza  normalmente, mas a mesma

nota em produção rejeita e da um erro de COFINST

alguem ja passou por issso

segue xml em anexo

 

35160104369976000197550010000004991000004993-nfe.xml

[AcbrMail ao enviar o executável para de funcionar]

Juliomar note , atualizei as dlls e continuou demorando, 

abri meu outlook e ja estava recebendo o email e o sistema ainda esta parado.

mudei a propriedade   acbrmail.attempts:=1      // antes estava 3  diminuiu para 2 minutos

mas ainda esta lento, nao sei se esta propriedade tem a ver

 

 

[AcbrMail ao enviar o executável para de funcionar]

Ola Juliomar,

Verdade , vou testar , atualizei o acbr mas não atulizei as dlls do cliente, se der certo posto aqui