Alteração Acbrctedacteqrretrato

[Alisson Suart]

Boa noite a todos,

 

Ítalo e outros moderadores, gostaria de saber como enviar ou postar as alterações no QRRetrato do DACTe, pois estava faltando uma informação importante na hora da impressão do CT-e Substituto. Eu utilizo bastante a impressão e havia modificado a primeira versão apenas comigo, porem ao atualizar o ACBr, tive o problema de perder as alterações.

 

A alteração é bem simples, apenas uma inclusão em uma linha.

 

  qrlProdPredominante.Caption := (FCTe.infCTeNorm.infCarga.proPred) or (FCTe.InfCTeSub.InfCarga.proPred);
  qrlOutrasCaracCarga.Caption := (FCTe.infCTeNorm.InfCarga.xOutCat) or (FCTe.infCTeSub.InfCarga.xOutCat);

 

nestas 2 linhas, inclui o or + info do Substituto para imprimir.

 

 

Estou a disposição se precisarem.

 

Att.

 

 

 

[Italo Giurizzato Junior]

Bom dia Chico,

 

Esta correto isso?

 

Na estrutura do XML tanto na versão 1.04 quanto na versão 2.00, "infCarga" esta definida dentro da estrutura "infCTeNorm" e não existe "infCarga" dentro de "infCTeSub".

[Alisson Suart]

Bom dia Italo,

 

Então cara, aqui funcionou corretamente. Foi a única forma de sair a banda de impressão do produto, quando o CTe é substituto. Aqui funcionou perfeito.

 

Faltou um detalhe, tem outro local que precisa alterar.

 

  qrb_04_DadosNotaFiscal.Enabled:=(FCTe.Ide.tpCTe = tcNormal) or (FCTe.Ide.tpCTe = tcSubstituto);

 

Esta parte da nota fiscal tb precisa incluir, acabei me esquecendo de informar ontem. Estou inclusive testando a emissão em clientes e esta funcionando, porém me deparei agora com outro problema.

 

Na parte dos documentos, no caso da nota fiscal, quando o CTe esta substituto ele esta consumindo um espaço em branco grande, com isso o CTe não cabe em uma folha A4. Estou tentando achar o motivo aqui.

 

Mas o detalhe do produto, funcionou sim. Perfeitamente. Se quiser, posto os Xmls / PDF para visualizarem como ficou.

[Italo Giurizzato Junior]

Chico,

 

Me desculpe, mas isso:

 

qrlProdPredominante.Caption := (FCTe.infCTeNorm.infCarga.proPred) or (FCTe.InfCTeSub.InfCarga.proPred);
qrlOutrasCaracCarga.Caption := (FCTe.infCTeNorm.InfCarga.xOutCat) or (FCTe.infCTeSub.InfCarga.xOutCat);

 

esta errado, o infCTeSub não contem infCarga, favor consultar o manual tanto da versão 1.04 quanto da 2.00

 

Outra coisa, a linha:

 

qrb_04_DadosNotaFiscal.Enabled:=(FCTe.Ide.tpCTe = tcNormal) or (FCTe.Ide.tpCTe = tcSubstituto);

 

Faz tempo que existe no código.

 

Algo esta errado com os seus fontes, a minha sugestão é que você apague os fontes e baixe novamente.

[Alisson Suart]

Ok, vou checar novamente o Manual e os dados e posto aqui novamente.

[Alisson Suart]

Italo, peço desculpas, realmente havia algo de errado na minha versão.

Atualizei e esta parte do produto resolveu.

 

Fiquei na duvida na seguinte informação:

 

  qrb_08_Itens.Enabled:=(FCTe.Ide.tpCTe = tcNormal)  or (FCTe.Ide.tpCTe = tcComplemento) or (FCTe.Ide.tpCTe = tcSubstituto);

 

Neste linha acima, dentro do form não tem o tcSubstituto, onde mostra os dados dos documentos originários. 

 

Acho que seria necessário né. Outra coisa que acontece é quando o documento eh do tipo NFe, a numeração da chave sai formatada como CNPJ, ai fica estranho a informação.

 

me corrija se estiver errado.

 

obrigado desde já.

[Italo Giurizzato Junior]

Boa tarde Chico,

 

A chave é formata de tal forma para facilitar a identificação de todos os campos que a compõe.

 

Quanto a linha mencionada não sei, o meu cliente nunca emitiu um CT-e Substituido.

 

É preciso fazer testes com e sem o tcSubstituido para ver como que fica.

[Alisson Suart]

Boa tarde,

 

Entendi. Bom, então acho que essa parte da chave blz.

 

Quanto a linha mencionada, confirmei com meu cliente, e ele disse que realmente precisa sair, então eu adicionei na minha versão aqui, esta linha do substituído.

 

Agora esta funcionando perfeitamente.

 

Obrigado.

[Italo Giurizzato Junior]

Boa tarde Chico,

 

Alteração feita e já disponibilizada.

[Alisson Suart]

Obrigado. Já vou baixar a versão nova.