GustavoKato

boa tarde, alguém simulou?

aí já não sei te dizer... acredito que seja melhor manter apenas a mais recente

está utilizando os schemas corretos? Extraia o arquivo da pasta acbr\Exemplos\ACBrCTe\Delphi\Schemas\V200 na pasta configurada no componente

Juliomar Marchetti, enviei por inbox pois são informações de produção. minha "solução de contorno" foi na Unit ACBrUtil function SeparaDados... begin .. if MantemChave then begin PosIni := Pos(UChave, UTexto)-1; PosFim := Pos('/' + UChave, UTexto) + length(UChave) + 3; if (PosIni = 0) or (PosFim = 0) then begin PosIni := Pos('NS2:' + UChave, UTexto) - 1; PosFim := Pos('/NS2:' + UChave, UTexto) + length(UChave) + 3; end; end else begin if UChave = 'RODO' then begin PosIni := Pos('<RODO', UTexto) + Pos('>', copy(UTexto, Pos('<RODO', UTexto), length(UTexto))); PosFim := Pos('/' + UChave, UTexto); end else begin PosIni := Pos(UChave, UTexto) + Pos('>', copy(UTexto, Pos(UChave, UTexto), length(UTexto))); PosFim := Pos('/' + UChave, UTexto); end; if (PosIni = 0) or (PosFim = 0) then begin PosIni := Pos('NS2:' + UChave, UTexto) + Pos('>', copy(UTexto, Pos('NS2:' + UChave, UTexto), length(UTexto))); PosFim := Pos('/NS2:' + UChave, UTexto); end; end; .. end;

Verifique a versão do ACBrCTe que está utilizando, provavelmente estava 1.04c e agora está na 2.0

XML previamente gerado, carrego o XML em uma stringStream, executo o LoadFromStream e valido.

Boa tarde, Italo. O erro ainda continua ocorrendo class function MDFeUtil.Valida(const AXML: AnsiString; var AMsg: AnsiString; const APathSchemas: string = ''): Boolean; begin {$IFDEF ACBrMDFeOpenSSL} Result := ValidaLibXML(AXML, AMsg, APathSchemas) and ValidaModalLibXML(AXML, AMsg, APathSchemas); {$ELSE} Result := ValidaMSXML(AXML, AMsg, APathSchemas) and ValidaModalMSXML(AXML, AMsg, APathSchemas) {$ENDIF} end; nos meus fontes está caindo no bloco do ELSE, estou usando a instalação padrão do ACBr com delphi XE... acredito que seja CAPICOM Obrigado

Bom dia! Desculpem desenterrar o tópico, porém estou com este mesmo erro mas ao gerar MDF-e e a causa é exatamente a mesma do Mark. O nome da empresa e email, contém 'Rodo' Sei que há um forum específico para MDF-e porém o problema é o mesmo e pelo que ví a unit tbm é. Obrigado

Marque o Tópico com "Resolvido"

Me corrijam se estiver errado. A transportadora A é contratada e emite um CT-e normal, a transportadora B é subcontratada para realizar o frete e emite um CT-e de subcontratação informando o CT-e da transportadora A como DACTE anterior (pelo que lí, há situções que não será necessário). será que não está confundindo o CT-e da contratada com o CT-e da subcontratada?

Boa tarde, a linha "QRCTe.QRPrinter.Free;" foi adicionada por mim, sem ela alguns objetos estavam ficando perdidos na memória ocasionando memory leaks, imperceptivel em pequenas quantidades. Porém desenvolvi um gerenciador que roda como serviço, que transmite e gera mais de 300 CT-es por dia e o mesmo acabava travando por conta destes objetos. Atualmente roda sem problemas com estas linhas. O problema pode ter origem em outra parte do código.

o CT-e de substituição foi devidamente autorizado?

Boa tarde. O ct-e não é cancelado, ele fica com um evento "Substituição" se não me engano

Bom dia, eles devem estar aceitando até 30 dias (lembrando que Dezembro tem 31 dias) porém é melhor o cliente tentar se habituar a cancelar dentro destas 168 horas.

boa tarde. Até pq acho não conseguirá realizar a inutilização pois os ct-es foram gerados. Provavelmente terá que importar os ct-es emitidos.

boa tarde, Italo ou algum outro commiter q estiver verificando o problema, será q não é referente a uma correção que propus neste tópico?

Bom dia. Pelo que entendo, peso é diferente de volume... por exemplo pode ocorrer de 10 ton em um único volume. No sistema que trabalho é informado o peso e a quantidade de volumes

Anexe o XML do pedido de autorização que fica mais fácil de identificar a possível falha

Boa tarde, O manifesto contem a relação dos CT-es transportados, caso seja o MDFe vide o tópico citado pelo Italo.

Não é caso de ct-e de Anulação / Substituição? Se os CT-es não foram vistoriados, cancelaria e emitiria um novo com os valores corretos (não é correto se o frete foi efetuado mas a burocracia é menor, e também se estiver no prazo)

Eu tinha alterado este trecho que também deu certo with Reg1001.Registro1900.Items[intFor] do begin //if Length(CNPJ) > 0 then Check(funChecaCNPJ(CNPJ), '(0-1900) %s-%s, o CNPJ "%s" digitado é inválido!', [CNPJ]); Add( LFill( '1900' ) + LFill( CNPJ ) + LFill( COD_MOD ) + LFill( SER ) + LFill( SUB_SER ) + LFill( CodSitFToStr(COD_SIT) ) + LFill( VL_TOT_REC,0,2 ) + LFill( QUANT_DOC,0 ) + LFill( CstPisToStr(CST_PIS) ) + LFill( CstCofinsToStr(CST_COFINS) ) + LFill( CFOP, 4, True ) + // permite o CFOP ficar vazio LFill( INF_COMPL ) + LFill( COD_CTA ) ) ; end;

segue anexo a unit alterada ACBrCTeDACTeQR.pas

Encontrei o erro, na rotina TfrmDACTeQR.SavePDF adicionar QRCTe.QRPrinter.Free; no finally Espero ter colaborado abraço

bom dia galera, obrigado pelas respostas mas não é nenhum dos casos... acredito q o problema esteja no quick report, os objetos TQRx são proporcionais as vezes q chamo o ACBrCTe1.Conhecimentos.ImprimirPDF;

nenhuma luz?