Ir para conteúdo
  • Cadastre-se

gobbo

Membros
  • Total de ítens

    97
  • Registro em

  • Última visita

  • Days Won

    2

Posts postados por gobbo

  1. Boa tarde.

    Após separação dos pacotes Runtime e Designtime, o componente ACBrPAF não está mais sendo instalado adequadamente pelo ACBrInstall_Trunk2.exe.

    (https://www.projetoacbr.com.br/forum/topic/56512-separação-dos-pacotes-runtime-e-designtime-do-delphi/?do=findComment&comment=370401)

     

    Somente é instalado o pacote (ACBr_PAF), não possibilitando acessar o componente visual do pacote (DCLACBr_PAF).

    Segue o log do instalador para análise:

     

    log_Delphi_2005_Win32.txt

    • Curtir 1
  2. Em 11/01/2019 at 10:46, EMBarbosa disse:

    Não consegui descobrir pelo site deles. Isso é o mesmo que uma NFS-e ou é outra coisa diferente?

    http://www.pmf.sc.gov.br/sites/notaeletronica/index.php?pagina=home&menu=0

    É o mesmo que uma NFS-e, porém num layout específico fora do padrão dos demais municípios, utilizando REST para troca de dados.

    Como também estávamos com o prazo estourado, utilizamos uma integradora para facilitar a transmissão:

    http://www.dfe.com.br

     

    • Curtir 1
  3. Após atualização de hoje (build 14690), o pacote do DANFe para FastReports não está mais compilando em Delphi antigos:

    tratamento para a função split funcionar em win64
    https://www.projetoacbr.com.br/forum/topic/41181-erro-informações-complementares-no-danfe/?do=findComment&comment=271808
     

    código-fonte: ACBrNFeDANFEFRDM.pas

    linha: 277

     

    function TACBrNFeFRClass.Split(const ADelimiter, AString: string): TSplitResult;
    var
      vRows: TStrings;
      vI: Integer;
    begin
      vRows := TStringList.Create;
      try
        vRows.Delimiter := ADelimiter[1];
        vRows.StrictDelimiter := True;
        vRows.DelimitedText := AString;
        SetLength(Result, vRows.Count);
    
        for vI := 0 to vRows.Count - 1 do
          Result[vI] := vRows.Strings[vI];
    
      finally
        FreeAndNil(vRows);
      end;
    end;

     

    Problema de retro-compatibilidade com versões anteriores do Delphi (no meu caso Delphi 2005), não há a propriedade "StrictDelimiter".

    Há alguma diretiva de compilação que pode ser usada para manter essa retro-compatibilidade?

     

    • Curtir 1
  4. PRIORI CONSULTORIA E SISTEMAS LTDA
    http://www.priori-sc.com.br
    Fone: (48) 3348-3646
    Contato: Vilmar

    Software: PRIORICFG 3.0
    Laudo: UNO2662017
    Re-Homologação: 17/10/2017

    ER: 02.05
    Perfil: V
    Roteiro de testes: 1.0 – 05/2017
    Homologador: Fernando
    http://bell.unochapeco.edu.br/lts/?p=3162

    Componentes ACBr: ACBrECF, ACBrTEFD, ACBrAAC, ACBrEAD, ACBrBlocoX, ACBrPAF, ACBrNFe, ACBrDANFEFR, ACBrMail, ACBrIBPTax, ACBrSintegra, ACBrSpedFiscal

    Outros componentes: FastReport 5.5.11, RaveReport 11.0.12, ZipMaster, Orpheus
    SGBD: PostgreSQL 9.5

    Programadores: Leandro e Vilmar

    • Curtir 1
  5. Estou tendo problemas ao gerar o arquivo do Bloco X - Redução Z.

    O valor do GT está bem alto no meu ECF (R$ 4.533.781.611,57) e isso faz o arquivo da Redução Z gerar um valor "negativo" (0000000-1888372219).

    Pesquisando no código-fonte, encontrei esse trecho:

      FGerador.wCampo(tcStr, '', 'VendaBrutaDiaria', 1, 14, 1, IntToStrZero(TruncFix(VendaBrutaDiaria*100),14));
      FGerador.wCampo(tcStr, '', 'GT', 1, 18, 1, IntToStrZero(TruncFix(GT*100), 18));

    Utilizo Delphi 2005 e esse trecho está causando o erro da transformação do valor (R$ 4.533.781.611,57) num valor negativo (0000000-1888372219).

    Apenas alterei para o trecho abaixo e funcionou:
     

      FGerador.wCampo(tcStr, '', 'VendaBrutaDiaria', 1, 14, 1, VendaBrutaDiaria);
      FGerador.wCampo(tcStr, '', 'GT', 1, 18, 1, GT);

    Segue o código-fonte para análise.

    ACBrBlocoX_ReducaoZ.pasC:\Users\Leandro\Documents\Priori\Fontes\Projetos\ACBr\Fontes\ACBrDFe\ACBrBlocoX\ACBrBlocoX_ReducaoZ.pas
     

    • Curtir 1
  6. Boa noite Claudiomir.

    Infelizmente não é esse campo [Titulo."Sacado_CNPJCPF"] , esse é o Cnpj/Cpf do sacado.

    Existe o campo [Titulo."Sacado_Avalista"], porém ele somente retorna o "Nome" do avalista, que já estou usando no campo discriminado "Sacador/Avalista" do boleto.

    O que preciso seria o campo [Titulo."Sacado_Avalista_CNPJCPF"], para imprimir o campo "CNPJ/CPF" da linha "Sacador/Avalista" do boleto.

    A classe TACBrSacadoAvalista já possui todos esses campos necessários para o Avalista:

    TACBrSacadoAvalista = class
      private
        fTipoPessoa  : TACBrPessoa;
    
        fNomeAvalista: String;
        fCNPJCPF     : String;
        fLogradouro  : String;
        fNumero      : String;
        fComplemento : String;
        fBairro      : String;
        fCidade      : String;
        fUF          : String;
        fCEP         : String;
        fEmail       : String;
        fFone        : String;
        fInscricaoNr : String;
      public
        property Pessoa      : TACBrPessoa read fTipoPessoa  write fTipoPessoa;
        property NomeAvalista: String  read fNomeAvalista    write fNomeAvalista;
        property CNPJCPF     : String  read fCNPJCPF     write fCNPJCPF;
        property Logradouro  : String  read fLogradouro  write fLogradouro;
        property Numero      : String  read fNumero      write fNumero;
        property Complemento : String  read fComplemento write fComplemento;
        property Bairro      : String  read fBairro      write fBairro;
        property Cidade      : String  read fCidade      write fCidade;
        property UF          : String  read fUF          write fUF;
        property CEP         : String  read fCEP         write fCEP;
        property Email       : String  read fEmail       write fEmail;
        property Fone        : String  read fFone        write fFone;
        property InscricaoNr : String  read fInscricaoNr write fInscricaoNr;
      end;

    Porém não temos acesso no relatório do FastReport.

     

    Alguma ideia?

     

    Leandro Gobbo

  7. Boa tarde.

     

    Estou em fase final de homologação dos boletos Unicred (Bradesco) e me foi solicitado a impressão do Cnpj/Cpf do avalista no boleto (FastReport).

    Consultando os fontes, há somente um field chamado "Sacado_Avalista" que é abastecido somente com o "Nome" do avalista a ser impresso no boleto.

    Dúvida: há algum field específico para esse campo "Cnpj/Cpf do Avalista"?

     

    Obrigado

    Leandro Gobbo

  8. Pessoal, boa tarde.

     

    Ao gerar o arquivo "Registros do PAF-ECF", percebemos que nos registros P2, D2 e E2 o segundo campo CNPJ (CNPJ do estabelecimento usuário do PAF-ECF) está sendo gerado ZERADO.

     

    Consultando o código de geração (WriteRegistro), este campo era proveniente de seus registros pai (P1, D1 e E1) :

    
              strRegistroP2 := strRegistroP2 + LFill('P2') +
                                               LFill(FRegistroP1.CNPJ, 14) +
                                               RFill(COD_MERC_SERV, 14) +
              strRegistroD2 := strRegistroD2 + LFill('D2') +
                                               LFill(FRegistroD1.CNPJ, 14) +
                                               RFill(NUM_FAB, 20) +
    
    
              strRegistroE2 := strRegistroE2 + LFill('E2') +
                                               LFill(FRegistroE1.CNPJ, 14) +
                                               RFill(COD_MERC, 14) +

    Mas, segundo o exemplo do PAF, estes registros pai (P1, D1 e E1) não são mais utilizados.

     

     

    As dúvidas:

     

    - O exemplo está incompleto, onde na geração do arquivo, deveríamos criar um registro pai (P1, D1 e E1) e definirmos seu CNPJ ?

     

    - O código-fonte está incompleto, onde esta propriedade CNPJ deveria ser criada diretamente em cada registro filho (P2.CNPJ  e  D2.CNPJ  e  E2.CNPJ ) ?

     

     

     

    No aguardo de orientações.

     

     

    Leandro Gobbo

  9. Boa tarde.

     

    Também estamos com o mesmo problema. O homologador da Unochapecó insiste que devem ser gerados 2 arquivos idênticos:

     

    "• Arq. MF: gera arquivo binário SEM a EAD e outro arquivo TXT que será uma cópia do binário mais a linha do EAD, ambos com mesmo nome do arquivo."

     

     

     

    Volmir, você teve algum retorno diferente deles?

  10. Boa tarde.

     

    Também percebemos a mudança de layout na ER 02.02 em alguns registros (D2, R02, R04, R05, R06 e R07), principalmente quanto ao tamanho dos campos COO/CCF que aumentaram de 6 para 9 dígitos.

     

    Seguem os códigos modificados para sua avaliação.

     

     

    ACBrPAF.zip

  11. Instale o certificado digital no Windows Server como "Administrador".

     

    Atribua as permissões no seu aplicativo (MeuCTe.exe) aos "usuários" do Windows Server de acordo com suas diretivas de segurança (quem pode e quem não pode executar, ou então dê permissão total a todos).

     

    Se nada disso funcionar, mude as propriedades do seu aplicativo (MeuCTe.exe) e selecione "Executar como Administrador".

     

     

    Tente ai e nos responda qual das alternativas funcionou.

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