Ir para conteúdo
  • Cadastre-se

Italo Giurizzato Junior

Consultores
  • Total de ítens

    36.099
  • Registro em

  • Última visita

  • Days Won

    1.001

Posts postados por Italo Giurizzato Junior

  1. Graça,

    Fiz mais algumas alterações no DACTe, agora o espaço reservado para "USO EXCLUSIVO DO EMISSOR DO CT-E" é impresso por último.

    Por favor atualize e teste.

    Aguardo retorno.

  2. Boa tarde Graça,

    O DANFe que você imprimiu, qual componente você utiliza (Versão Quick Report ou Rave)?

    Qual é a fonte utilizada no DANFe? Eu chequei no DANFe Quick Report parece ser o Courier New.

  3. Boa tarde Graça,

    Alterei o Tipo da fonte de Arial para Courier New, os titulos dos campos que estavam com tamanho 4 alterei para 5 (igual o do DANFe para Quick Report) já os campos que estavam com tamanho 6, alguns alterei para 8 outros para 7 por questão de espaço.

    Não terminei, falta o quadro OBS e os dados especificos do modal.

    Atualize os fontes e realize um teste e me de um retorno.

  4. Boa tarde a Todos,

    Primeiro, para gerar o DACTe em PDF basta apenas descomentar a última linha do arquivo ACBr.inc que encontra-se na pasta ...\Fontes\Comum

    
    //------------------------------------------------------------------------------
    
    // Definições para o Quick Report
    
    //------------------------------------------------------------------------------
    
    
    // Descomente a linha abaixo caso o Quick Report tenha suporte a PDF
    
    // {$DEFINE QReport_PDF}
    
    

    Segundo, verifique se a versão do QR que você possui tem o filtro para gerar arquivos em PDF.

    Um detalhe importante é exatamente essa linha do ACBr.inc que deve ser descomentada para que seja possível gerar o DANFe em PDF usando o componente ACBrNFeDANFeQR (versão em Quick Report).

    Espero ter ajudados a todos.

  5. Boa tarde Master Software,

    O meu cliente utiliza o certificado A1, e com este certificado o componente ACBrCTe funciona sem problemas.

    Quanto ao A3, existem outros colegas do fórum que utilizam e segundo os relatos, também funciona.

    O certificado A1 pelo que pude ver é muito mais tranquilo, basta instalar e configurar o componente com o numero de série do certificado.

  6. Boa tarde Moroni,

    No componente ACBrCTeDACTeQR possui uma propriedade chamada ProtocoloCTE, favor não atribuir nada a essa propriedade.

    Ve se resolve o problema.

    Se possível poste o XML, assinado, autorizado para que possamos analizarmos melhor.

    Espero ter ajudado.

  7. Boa tarde Graça,

    Vamos aos questionamentos:

    1. Realmente a fonte utilizada no CT-e, tanto o tipo quanto ao tamanho, dos títulos e campos são diferentes dos utilizados na NF-e (versão Quick Report). Vou procurar na medida do possível compatibilizar.

    2. No CT-e foram incluidos as propriedades para definir as Margens e elas possui os mesmos valores Defauts da NF-e. Vou checar a espessura das bordas.

    4. Fiz uma correção, em uma das chamadas esta faltando um parametro, favor baixar a atualização e testar.

    5. Não existe ainda uma versão do DACTe em Paisagem, somente Retrato.

    6. Solicitação atendida, favor baixar a atualização e testar.

  8. Bom dia Master Software

    Sim você precisa de um certificado.

    Existe um gratuito fornecido pela SEFAZ do RS.

    Link:

    http://www.sefaz.rs.gov.br/Site/MontaMe ... nfe_assDig

    Mas, este certificado só serve para assinar o XML, logo você não vai consegui realizar os demais testes tais como enviar, cancelar, etc...

    Portanto você deve adquirir um certificado, ou conseguir um com algum cliente seu.

    O link postado por você procede.

    O certificado pode ser do tipo A1 ou A3.

    Veja este link para obter mais informações sobre os certificados:

    http://loja.certificadodigital.com.br/s ... rAplicacao

  9. Boa tarde Antonio Carlos,

    Conforme foi postado você passa para o componente o Numero de Série e a Senha do Certificado.

    Muito bem ao executar a aplicação a aplicação solicita novamente a senha?

    O componente foi colocado em um form ou Data Module que fica sempre criado enquanto a sua aplicação estiver em execução?

    Ou foi colocado em um form que é criado dinamicamente (exemplo ao emitir o CT-e) ?

    Na minha aplicação coloquei em um Data Module e o deixo criado enquanto ela fica em execução.

  10. Antonio Carlos,

    No caso do A3 você deve configurar desta forma:

    // Configurações -> Certificados

    ACBrCTe1.Configuracoes.Certificados.NumeroSerie:=' informar o numero de série ';

    ACBrCTe1.Configuracoes.Certificados.Senha:=' informar a senha ';

  11. Boa tarde a todos,

    Desculpe foi falha minha, em estar postando somente agora, mas antes tarde do que nunca.

    Conforme solicitação (Caso 613 do Mantis) criei novos tipos para a geração do CT-e.

    Logo vários campos de várias classes tiveram os seus tipos alterados, vamos a eles:

    Classe: TEntrega

    Campo: TipoData: Integer; --> TipoData: TpcteTipoDataPeriodo;

    TipoHora: Integer; --> TipoHora: TpcteTipoHorarioIntervalo;

    Classe: TSemData

    Campo: tpPer: Integer; --> tpPer: TpcteTipoDataPeriodo;

    Classe: TComData

    Campo: tpPer: Integer; --> tpPer: TpcteTipoDataPeriodo;

    Classe: TNoPeriodo

    Campo: tpPer: Integer; --> tpPer: TpcteTipoDataPeriodo;

    Classe: TSemHora

    Campo: tpHor: Integer; --> tpHor: TpcteTipoHorarioIntervalo;

    Classe: TComHora

    Campo: tpHor: Integer; --> tpHor: TpcteTipoHorarioIntervalo;

    Classe: TNoInter

    Campo: tpHor: Integer; --> tpHor: TpcteTipoHorarioIntervalo;

    Classe: TinfOutrosCollectionsItem

    Campo: tpDoc: String; --> tpDoc: TpcteTipoDocumento;

    Classe: TidDocAntPapCollectionsItem

    Campo: tpDoc: Integer; --> tpDoc: TpcteTipoDocumentoAnterior;

    Classe: TValePed

    Campo: respPg: Integer; --> respPg: TpcteRspPagPedagio;

    Classe: TDispCollectionsItem

    Campo: tpDisp: Integer; --> tpDisp: TpcteTipoDispositivo;

    Classe: TVeicCollectionsItem

    Campo: tpProp: String; --> tpProp: TpcteTipoPropriedade;

    tpVeic: Integer; --> tpDisp: TpcteTipoVeiculo;

    tpRod: Integer; --> tpRod: TpcteTipoRodado;

    tpCar: Integer; --> tpCar: TpcteTipoCarroceria;

    Valores dos Tipos Criados:

    TpcteTipoDataPeriodo = (tdSemData, tdNaData, tdAteData, tdApartirData, tdNoPeriodo);

    TpcteTipoHorarioIntervalo = (thSemHorario, thNoHorario, thAteHorario, thApartirHorario, thNoIntervalo);

    TpcteTipoDocumento = (tdDeclaracao, tdOutros);

    TpcteTipoDocumentoAnterior = (daCTRC, daCTAC, daACT, daNF7, daNF27, daCAN, daCTMC, daATRE, daDTA, daCAI, daCCPI, daCA, daTIF, daOutros);

    TpcteRspPagPedagio = (rpEmitente, rpRemetente, rpExpedidor, rpRecebedor, rpDestinatario, rpTomadorServico);

    TpcteTipoDispositivo = (tdCartaoMagnetico, tdTAG, tdTicket);

    TpcteTipoPropriedade = (tpProprio, tpTerceiro);

    TpcteTipoVeiculo = (tvTracao, tvReboque);

    TpcteTipoRodado = (trNaoAplicavel, trTruck, trToco, trCavaloMecanico, trVAN, trUtilitario, trOutros);

    TpcteTipoCarroceria = (tcNaoAplicavel, tcAberta, tcFechada, tcGraneleira, tcPortaContainer, tcSider);

    Exemplo de Utilização:

    
       compl.Entrega.TipoData:=StrToTpDataPeriodo(okConversao, IntToStr(DM_CNT.Conhec2EntregaTipoData.AsInteger));
    
       case DM_CNT.Conhec2EntregaTipoData.AsInteger of
    
            0: compl.Entrega.semData.tpPer:=tdSemData;
    
        1,2,3: begin
    
                compl.Entrega.comData.tpPer:=StrToTpDataPeriodo(okConversao, IntToStr(DM_CNT.Conhec2EntregaTipoData.AsInteger));
    
                compl.Entrega.comData.dProg:=DM_CNT.Conhec2EntregaDataI.AsDateTime;
    
               end;
    
            4: begin
    
                compl.Entrega.noPeriodo.tpPer:=tdNoPeriodo;
    
                compl.Entrega.noPeriodo.dIni:=DM_CNT.Conhec2EntregaDataI.AsDateTime;
    
                compl.Entrega.noPeriodo.dFim:=DM_CNT.Conhec2EntregaDataF.AsDateTime;
    
               end;
    
       end;
    
    
       compl.Entrega.TipoHora:=StrToTpHorarioIntervalo(okConversao, IntToStr(DM_CNT.Conhec2EntregaTipoHora.AsInteger));
    
       case DM_CNT.Conhec2EntregaTipoHora.AsInteger of
    
            0: compl.Entrega.semHora.tpHor:=thSemHorario;
    
        1,2,3: begin
    
                compl.Entrega.comHora.tpHor:=StrToTpHorarioIntervalo(okConversao, IntToStr(DM_CNT.Conhec2EntregaTipoHora.AsInteger));
    
                compl.Entrega.comHora.hProg:=StrToTime(DM_CNT.Conhec2EntregaHoraI.AsString);
    
               end;
    
            4: begin
    
                compl.Entrega.noInter.tpHor:=thNoIntervalo;
    
                compl.Entrega.noInter.hIni:=StrToTime(DM_CNT.Conhec2EntregaHoraI.AsString);
    
                compl.Entrega.noInter.hFim:=StrToTime(DM_CNT.Conhec2EntregaHoraF.AsString);
    
               end;
    
       end;
    
    

    O exemplo se refere apenas a classe TEntrega.

    Espero ter ajudado.

  12. Rogih,

    No arquivo ACBr.inc que encontra-se na pasta ...\Fontes\ACBrComum, temos a seguinte linha:

    //{$DEFINE ACBrCTeOpenSSL}

    ela esta comentada, como acima?

    foram instalas as DLLs que encontram-se na pasta ...\DLLs\Capicom ?

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