Jump to content

Marcelo A. Rodrigues

Membros
  • Content Count

    53
  • Joined

  • Last visited

Community Reputation

11 Good

About Marcelo A. Rodrigues

  • Rank
    Membro
  • Birthday 11/20/1991

Profile Information

  • Sexo
    Masculino
  • Localização
    Itápolis, SP

Recent Profile Visitors

789 profile views
  1. Entendi Italo, realmente se possuir duas seguradoras não irá mostrar os dados da segunda. Para resolver esse problema de mais de uma Seguradora, teriamos que colocar os dados da Seguradora como um bloco que ocuparia toda a largura da folha, abaixo do "Vale Pedágio". Nessa nova versão que vai entrar QR Code, qual é a idéia, refazer a impressão já existente ou apenas acrescentar os novos campos? (ainda não li sobre as mudanças)
  2. Faltou o anexo do arquivo .dfm.. ACBrMDFeDAMDFeRLRetrato.dfm
  3. Bom dia, Sobre essa alteração do "Numero da Averbação", tenho um cliente que está questionando por cortar o campo na impressão. Eu fiz um ajuste na impressão, não sei se ficou da melhor forma, caso queiram subir o ajuste ou dar uma outra ideia para não cortar o campo. Segue em anexo o ajuste e o print do manual com o tamanho do campo ACBrMDFeDAMDFeRLRetrato.lfm ACBrMDFeDAMDFeRLRetrato.pas
  4. Bom dia! No ambiente de Homologação para São Paulo, está gerando esse erro também quando não possui o campo INSS no XML Modifiquei o código para testar, conforme abaixo, e foi enviado normalmente: if (((CTe.ide.UFIni <> CTe.ide.UFFim) or (CTe.ide.UFEnv = 'RS') or (CTe.ide.UFEnv = 'SP')) and (CTe.ide.indIEToma = inNaoContribuinte)) and ((CTe.Imp.infTribFed.vPIS > 0) or (CTe.Imp.infTribFed.vCOFINS > 0) or (CTe.Imp.infTribFed.vIR > 0) or ((CTe.Imp.infTribFed.vINSS > 0) or (InformarINSS = 1)) or (CTe.Imp.infTribFed.vCSLL > 0)) then begin Gerador.wGrupo('infTribFed', '#125'); Gerador.wCampo(tcDe2, '#', 'vPIS ', 01, 15, 0, CTe.Imp.infTribFed.vPIS, DSC_VPIS); Gerador.wCampo(tcDe2, '#', 'vCOFINS', 01, 15, 0, CTe.Imp.infTribFed.vCOFINS, DSC_VCOFINS); Gerador.wCampo(tcDe2, '#', 'vIR ', 01, 15, 0, CTe.Imp.infTribFed.vIR, DSC_VIR); Gerador.wCampo(tcDe2, '#', 'vINSS ', 01, 15, InformarINSS, CTe.Imp.infTribFed.vINSS, DSC_VINSS); Gerador.wCampo(tcDe2, '#', 'vCSLL ', 01, 15, 0, CTe.Imp.infTribFed.vCSLL, DSC_VCSLL); Gerador.wGrupo('/infTribFed'); end; Mesmo passando zerado os campos PIS, COFINS, IR, INSS e CSLL envia normalmente no ambiente de Homologação
  5. Caso use o ACBrETQ, eu estava com o mesmo problema, até ser corrigido na atualização do dia 12/12/2017, revisão 14281. -- ACBrETQPpla -- [*] Inclusão de um valor mínimo(220) para aAvançoEtq em "ComandosFinalizarEtiqueta". (por: Elias César)
  6. Boa tarde. Precisei diminuir a velocidade da impressão de etiquetas de um cliente, como no ACBr não estava implementada essa opção, realizei os ajustes necessários. Segue em anexo os fontes para análise, e um print do manual. Obrigado! ACBrETQ.pas ACBrETQClass.pas ACBrETQEpl2.pas ACBrETQPpla.pas
  7. Bom dia, Eu pego os retornos do manifesto da seguinte forma: with ACBrMDFe.WebServices.EnvEvento do begin EventoRetorno.retEvento.Items[0].RetInfEvento.cStat EventoRetorno.retEvento.Items[0].RetInfEvento.xMotivo EventoRetorno.retEvento.Items[0].RetInfEvento.nProt EventoRetorno.RetEvento.Items[0].RetInfEvento.tpEvento EventoRetorno.RetEvento.Items[0].RetInfEvento.chMDFe EventoRetorno.RetEvento.Items[0].RetInfEvento.nSeqEvento end; att.
  8. Conforme a Graça postou acima, você deve apenas incluir o novo motorista ao MDF-e
  9. Bom dia, É possível apenas incluir um novo motorista no manifesto que está em aberto: ACBrMDFe1.EventoMDFe.Evento.Clear; ACBrMDFe1.EventoMDFe.idLote := XNumeroLote; with ACBrMDFe1.EventoMDFe.Evento.Add do begin InfEvento.chMDFe := xChaveAcesso; infEvento.CNPJ := xCNPJ; infEvento.dhEvento := Now; infEvento.tpEvento := teInclusaoCondutor; infEvento.nSeqEvento := nSeqEvento; infEvento.detEvento.nProt := xProtocolo; infEvento.detEvento.xNome := xNomeMotoristaAIncluir; infEvento.detEvento.CPF := xCPFMotorista; end; // Enviar o evento inclusao de condutor if ACBrMDFe1.EnviarEvento(xNumeroLote) then begin
  10. Bom dia, No mês passado eu tive o mesmo problema que o Wesller, meu cliente precisava enviar o MDF-e com o proprietário do veículo sendo pessoa física. Só consegui transmitir o MDF-e com o ajuste sugerido pelo Wesller.
  11. Boa tarde A tag nAver é um campo dentro da lista aver: with seg.Add do begin respSeg := ''; CNPJCPF := ''; xSeg := ''; CNPJ := ''; nApol := ''; with aver.Add do begin nAver := ''; end; end;
  12. Boa tarde, Tenho a seguinte situação de MDF-e: VersaoDF = ve300 MDFe.Ide.tpEmit = teTranspCargaPropria MDFe.Ide.modal = moRodoviario MDFe.Ide.tpTransp = ttTAC Quando informo o proprietário do veículo com um CNPJ diferente da empresa emitente do Manifesto, ele é autorizado com sucesso. Quando informo o proprietário do veículo com um CPF, sendo diferente da empresa emitente do Manifesto, ele não é autorizado sendo exibido o erro: "458-Rejeição: Tipo de Transportador não deve ser informado para Emitente de Carga Própria proprietário do veículo". Alguém sabe me dizer se para pessoa Física proprietário do veículo o campo "tpTransp" também não deverá ser informado?
  13. Bom dia Wagner. Pelo o que entendi, você quer recuperar as chaves de acesso dos MDFe que estão pendentes. Para retornar essas chaves de acesso você pode fazer algo nesse sentido: if ACBrMDFe.WebServices.ConsultaMDFeNaoEnc( SomenteNumeros( xCNPJ ) ) then begin if ACBrMDFe.WebServices.ConsMDFeNaoEnc.cStat = 111 then begin for nPos := 0 to ACBrMDFe.WebServices.ConsMDFeNaoEnc.InfMDFe.Count - 1 do begin ACBrMDFe.WebServices.ConsMDFeNaoEnc.InfMDFe[nPos].chMDFe; //Retorna a chave de acesso ACBrMDFe.WebServices.ConsMDFeNaoEnc.InfMDFe[nPos].nProt; //Retorna o protocolo end; end; end; att
  14. Bom dia Fernando. Você pode cancelar o MDFe através do evento: infEvento.tpEvento := teCancelamento;
×
×
  • Create New...