Ir para conteúdo
  • Cadastre-se

dev botao

Suposto BUG no componente ACBrSPED


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

Recommended Posts

Olá,

Eu estou tentando definir via código o path e o nome do arquivo a ser gerado através do componente ACBrSPED. No entanto, não funciona. Só funciona os parâmetros definidos visualmente pela paleta de propriedades. Faço dessa forma:

  AcbrSpedFiscal.Path:= DiretorioDoExecutavel;

  ACBrSpedFiscal.Arquivo:= 'meuArquivo.txt';

Mas ele obedece a propriedade visual. Alguém têm esse mesmo problema? Já reenstalei o componente e nada.

Obg.

Link para o comentário
Compartilhar em outros sites

Experimente informar somente o nome do arquivo com o caminho completo, ex:

    SPEDPisCofins.Arquivo := DiretorioDoExecutavel+'\meuArquivo.txt';

não sei se será necessário a adição da "\" antes do "meuArquivo.txt", mas fica a dica.

- Sou desenvolvedor.

- De que linguagem, delphi? .NET? Java?

- Qualquer uma, sou desenvolvedor.

Link para o comentário
Compartilhar em outros sites

Experimente informar somente o nome do arquivo com o caminho completo, ex:

    SPEDPisCofins.Arquivo := DiretorioDoExecutavel+'\meuArquivo.txt';

não sei se será necessário a adição da "\" antes do "meuArquivo.txt", mas fica a dica.

Olá, markapollo. Ele continuou obedecendo as propriedades gráficas.

Mais alguma sugestão?

Obg.

Link para o comentário
Compartilhar em outros sites

  • 7 meses depois ...
  • Moderadores

Bom dia

utilizo desde a primeira versão do meu PAF e seto o caminho em tempo de execução e não tenho problemas

em que hora você seta as duas propriedades?

abaixo segue uma parte do meu código


    fACBrSped.Arquivo := PDV.PDVDesenvolvedora.DesenvNumeroLaudo + {}

    copy(PDVCaixa.ECF_numero_serie,{}

    Length(PDVCaixa.ECF_numero_serie) -13,14)+{}

    FormatDateTime('ddmmyyyy', now) + '.txt';


    fACBrSped.Path := ExtractFilePath(Application.ExeName);

    fACBrSped.Delimitador := '|';

    fACBrSped.TrimString := false;

    fACBrSped.CurMascara := '#0.00';

    fACBrSped.DT_INI := cxdtdtIni.Date;

    fACBrSped.DT_FIN := cxdtdtFim.Date;

    //=============================================================================

    with fACBrSped.Bloco_0 do

      begin

Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

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

 

Link para o comentário
Compartilhar em outros sites

Bom dia

utilizo desde a primeira versão do meu PAF e seto o caminho em tempo de execução e não tenho problemas

em que hora você seta as duas propriedades?

abaixo segue uma parte do meu código


    fACBrSped.Arquivo := PDV.PDVDesenvolvedora.DesenvNumeroLaudo + {}

    copy(PDVCaixa.ECF_numero_serie,{}

    Length(PDVCaixa.ECF_numero_serie) -13,14)+{}

    FormatDateTime('ddmmyyyy', now) + '.txt';


    fACBrSped.Path := ExtractFilePath(Application.ExeName);

    fACBrSped.Delimitador := '|';

    fACBrSped.TrimString := false;

    fACBrSped.CurMascara := '#0.00';

    fACBrSped.DT_INI := cxdtdtIni.Date;

    fACBrSped.DT_FIN := cxdtdtFim.Date;

    //=============================================================================

    with fACBrSped.Bloco_0 do

      begin

Ô Juliomar, obrigado! Então... eu faço isso antes de gerar o txt. Faço o seguinte:
   Diretorio:= CriaDiretorio('Vendas_do_Periodo') ;

   ACBrSpedFiscal.Path:= Diretorio;


  ACBrSpedFiscal.Arquivo := 'SPED_'+FormatDateTime('ddmmyyyyhhmmss',now)+'.txt';

  ACBrSpedFiscal.SaveFileTXT ;

Inclusive, antes de dar o SaveFileTXT, eu dou um showMessage nas propriedades Arquivo e Path, e elas retornam conforme eu coloquei via código, o problema é na hora de salvar mesmo.

Obrigado!

Link para o comentário
Compartilhar em outros sites

  • Consultores

Não é estranho não. Quando você usa o comando TACBrSPEDFiscal.IniciaGeracao ele passa a informação da propriedade Path e NomedoArquivo para os blocos internos do componente. Isso é muito importante para que, caso aconteça alguma mudança nessas propriedades durante a geração do arquivo, não se mude o caminho do arquivo que será gerado, principalmente se estiver fazendo uma geração concomitante.

[]'s

Consultor SAC ACBr

Elton
Profissionalize o ACBr na sua empresa, conheça o ACBr Pro.

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Um engenheiro de Controle de Qualidade(QA) entra num bar. Pede uma cerveja. Pede zero cervejas.
Pede 99999999 cervejas. Pede -1 cervejas. Pede um jacaré. Pede asdfdhklçkh.
Link para o comentário
Compartilhar em outros sites

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

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • 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.