Cte - Complemento De Valores

[Wiglan Mariani]

Boa tarde, 

 

Estou verificando que na versão 2.0 do Cte, o complemento de Valores agora deve ser informado apenas a chave do CTe complementado, além disso, somente 1 Cte pode ser complementado, diferentemente da versão anterior que era informado N Ctes complementados.

 

Implementando isso, percebi que na impressão do Dacte, ainda temos mais de 1 cte complementado e também  é apresentado a chave do Cte e o Valor complementado, o qual vai sair sempre zerado.

 

Isto esta correto mesmo ou ainda é necessário implementar a impressão correta do Dacte?

 

Obrigado! 

 

 

[snoopyfael]

Estou tendo um problema parecido ao imprimir a DACTE o valor complementado sai corretamente, mas ao carregar o componente com o XML via LoadFromStream o valor complementado sempre sai zero. 

 

Alguma solução para esse problema?

[Juliomar Marchetti]

Bom dia

O problema está ao carregar o xml ao componente?

ao efetuar o load chegaram a debugar pra ver como está preenchendo o componente?

assim será fácil de achar o problema!

[snoopyfael]

Bom dia

O problema está ao carregar o xml ao componente?

ao efetuar o load chegaram a debugar pra ver como está preenchendo o componente?

assim será fácil de achar o problema!

 

Meu problema é ao carregar o xml ao componente...

 

Vou adicionar as units ao projeto para debugar.

[snoopyfael]

Debugando a unit pcteCTeR:

  (* Grupo da TAG <infCteComp> ************************************************)
  if Leitor.rExtrai(1, 'infCteComp') <> ''
  then begin
    CTe.InfCTeComp.Chave := Leitor.rCampo(tcStr, 'chave');

    if Leitor.rExtrai(2, 'vPresComp') <> ''
    then begin
      CTe.infCTeComp.vPresComp.vTPrest := Leitor.rCampo(tcDe2,'vTPrest');

      i01 := 0;
      while Leitor.rExtrai(3, 'compComp', '', i01 + 1) <> '' do
      begin
        CTe.InfCTeComp.vPresComp.compComp.Add;
        CTe.InfCTeComp.vPresComp.compComp[i01].xNome := Leitor.rCampo(tcStr, 'xNome');
        CTe.InfCTeComp.vPresComp.compComp[i01].vComp := Leitor.rCampo(tcDe2, 'vComp');
        inc(i01);
      end;
    end;

Mas no xml as informaçõs dos valores complementados não vem dentro da tag <infCteComp> segue xml usado.

31140416883860000150570010000000221000000229.xml

[Juliomar Marchetti]

O seu arquivo ACBr.inc está marcado  ou melhor comentando a versão 1.04 e está para a 2.0?

[snoopyfael]

O seu arquivo ACBr.inc está marcado  ou melhor comentando a versão 1.04 e está para a 2.0?

Sim esta rodando a versão 2.0

[Wiglan Mariani]

Se vc esta usando a versão 2.0 do Cte, onde vc esta informando o valor complementado, uma vez que segundo a nota técnica so existe o campo chave do Cte complementado. 

 

[snoopyfael]

Se vc esta usando a versão 2.0 do Cte, onde vc esta informando o valor complementado, uma vez que segundo a nota técnica so existe o campo chave do Cte complementado. 

             with InfCTeComp do
                begin
                  Chave := Cabecalho.Chave;
                  vPresComp.vTPrest := Rodape.ValorFrete;

[Wiglan Mariani]

Justamente, na versão 2.0 do Cte, somente a chave do cte complementado é utilizado e enviado para a Receita. 

 

Isso esta disponivel no Manual_CTe_v2_0.pdf pagina 148.

 

O que acredito que esteja pendente de fazer, é no Dacte do Acbr, retirar a impressão de varios Ctes complementados deixando apenas 1 e retirar o Valor complementado, restando somente 1 chave do Cte complementado.

[snoopyfael]

Justamente, na versão 2.0 do Cte, somente a chave do cte complementado é utilizado e enviado para a Receita. 

 

Isso esta disponivel no Manual_CTe_v2_0.pdf pagina 148.

 

O que acredito que esteja pendente de fazer, é no Dacte do Acbr, retirar a impressão de varios Ctes complementados deixando apenas 1 e retirar o Valor complementado, restando somente 1 chave do Cte complementado.

 

Como migramos da versão 1.4 para 2.0 isso pasou dispercebido...

 

Problema e convencer os clientes que não é necessarios sair impresso esse valor mais.

[Wiglan Mariani]

sim, isso mesmo, 

 

por isso escrevi esse tópico, para saber o quanto antes quando vamos conseguir tirar aquele Valor Complementado  0,00 R$ do Dacte, por que enquanto ele aparecer la, 

 

os clientes reclamam e reclamam e reclamam shaushaushuah

 

moderadores e demais parceiros, alguma previsão desta questão?

[Juliomar Marchetti]

Em qual gerenciador de relatório? 

caso tenha alterado anexe ao post que avaliamos!

lembrando de deixar compatível com a versão 1.04!

[Alisson Suart]

Bom dia,

 

Até legal ver vocês comentando, pois no meu caso, o cliente solicita que não aparece os dados do motorista e nem da Nota fiscal no complementar.

Ao meu ver, realmente isto deveria acontecer, pois vc esta complementando / anexando um ao outro, entao nao haveria necessidade, mas como explicar isso a eles ? O que vocês tem feito com vossos clientes ? hehehehehe

[Italo Giurizzato Junior]

Boa tarde a todos,

 

Na versão 1.04 tínhamos dentro do grupo <infCteComp> não só a chave do CT-e complementado como também os valores da prestação e tributos.

 

Na versão 2.00 temos agora apenas a chave, portanto os valores que sofreram complementação são informados nos respectivos campos dentro dos grupos <vPrest> e <imp>.

 

Se pararmos para analisar um CT-e complementar não mais é do que uma carta de correção que nos permite neste caso complementar um valor que ficou faltando.

 

Pensando por este lado, não faz nenhum sentido no CT-e Complementar ser impresso os dados do motorista por exemplo.

 

Eu não tenho como realizar esse teste mas algum de vocês poderia imprimir o DACTE de um CT-e complementar usando o programa gratuito da SEFAZ para que possamos ter uma ideia de como seria o DACTE?

[Alisson Suart]

Boa tarde,

 

fiz a impressão, utilizando o programa da Sefaz, porém usando o XML gerado pelo ACBr.

Ao meu ver, mesmo nao constando os campos que comentei, no meu caso, por exemplo, se fosse pra sair, algo como motorista, nota fiscal, etc, apareceriam os respectivos campos em branco.

 

Acredito que o ACBr esta de acordo com o layout. Imprimi na versao 2.0

 

O Campo valor Complementado, ele aparece, então talvez precisamos ver o que não foi preenchido, neste meu caso mesmo, nao sei porque nao apareceu. Vou analisar meu XML.

 

Abraços.

Editado 23 Abril, 2014 por chicobentodm

[ALA]

Senhores, bom dia. Na versão 1.4 estou preenchendo as tags <vPrest> e <imp> com os dados do CT-e pai ( complementado ) e com os dados do CT-e filho ( complemento ). Na versão 2.0 deve preencher as tags <vPrest> e <imp> apenas com os dados do CT-e filho( complemento ) ?

[Italo Giurizzato Junior]

Bom dia ALA,

 

Exatamente.

[ALA]

Ítalo, boa tarde. Estou tentando enviar um CT-e complementar de impostos. Mas o valor do imposto não esta sendo setado no XML pelo componente.

Obs.: Não existe valor do serviço apenas valor de icms.

[Italo Giurizzato Junior]

Boa tarde ALA,

 

Como você esta alimentando o ICMS nesse CT-e de complemento?

[ALA]

Ítalo, bom dia. Abaixo parte do código que estou utilizando para alimentar o componente. Neste caso estou informando valor para o ICMS mas não existe valor para o total do serviço, pq o CT-e e de complemento de impostos. Os valores enviados são do CT-e complementar e não do CT-e pai.

 

 

                      {$IFDEF PL_200}
                          with infCTeComp do   // 1-1
                      {$ELSE}
                          with infCTeComp.Add do   // 1-10
                      {$ENDIF}
                      begin
                         { CAMPOS OBRIGATORIOS
                          Página 116, Campo #467: chave (chave do CTe complementado)
                          Página 117, Grupo #468: vPresComp (valores da prestação de serviço)
                          Campo #469: vTPrest (valor total da prestação de serviço complementado)
                          Grupo #473: impComp (informações relativas aos impostos complementados)
                          dentro deste grupo tem os grupos e campos que dependem da classificação tributária do serviço.
                         }
                         // DADOS DO CONHECIMENTO PAI
                         Chave                        := Cte_PAI.FieldByName( 'CTR_CHAVE_CTE'           ).AsString; // v 1.4, 2.00
                         vPresComp.vTPrest            := Cte_PAI.FieldByName( 'CTR_VLR_TOTAL_PRESTACAO' ).AsCurrency;  // v 1.4
                         //VPresComp.compComp.Add.xNome := vPrest.comp.Items[0].xNome; // v 1.4
                         // DADOS DO CONHECIMENTO COMPLEMENTAR
                         vPresComp.compComp.Add.vComp := Cte.FieldByName( 'CTR_VLR_TOTAL_PRESTACAO' ).AsCurrency; // v 1.4
                         compl.xObs                   := compl.xObs + ' VLR. COMPLEMENTADO: ' + FormatCurr('##,##0.00', Cte_PAI.FieldByName( 'CTR_VLR_TOTAL_PRESTACAO' ).AsCurrency ); // solicitado por Carlos para Transtrinta

                         // INICIO TRIBUTAÇÃO //
                         // CTE - COMPLEMTNAR - ICMS - COMPLEMENTAR - mantis 0003788 //
                         //  INICIO - COMPLEMENTAR //
                         //  Informações relativas ao Impostos Complementados
                         // TpcnCSTIcms = (cst00, cst10, cst20, cst30, cst40, cst41, cst45, cst50, cst51, cst60, cst70, cst80, cst81, cst90);
                         case Tributacao.FieldByName( 'STR_CODIGO' ).AsInteger  of
                            00: begin
                                    ImpComp.ICMSComp.SituTrib     := cst00;
                                    ImpComp.ICMSComp.ICMS00.CST   := cst00; // Tributação Normal ICMS
                                    ImpComp.ICMSComp.ICMS00.vBC   := Cte.FieldByName( 'CTR_VLR_BASE_ICMS' ).ASCurrency;
                                    ImpComp.ICMSComp.ICMS00.pICMS := Cte.FieldByName( 'CTR_ALIQUOTA_ICMS' ).ASCurrency;
                                    ImpComp.ICMSComp.ICMS00.vICMS := Cte.FieldByName( 'CTR_VLR_ICMS'      ).ASCurrency;
                                    // Assembla 1947
                                   { compl.xObs                    := compl.xObs + '; CST-ICMS: 0'      + Tributacao.FieldByName( 'STR_CODIGO' ).AsString
                                                                                + ' BASE DE CALCULO: ' + FormatCurr('##,##0.00' ,Cte.FieldByName( 'CTR_VLR_BASE_ICMS' ).AsCurrency )
                                                                                + ' PERC. ALIQUOTA: '  + FormatCurr('##,##0.00' ,Cte.FieldByName( 'CTR_ALIQUOTA_ICMS' ).AsCurrency )
                                                                                + ' VALOR: '           + FormatCurr('##,##0.00' ,Cte.FieldByName( 'CTR_VLR_ICMS'      ).AsCurrency );}
                                end;
                            20: begin
                                    ImpComp.ICMSComp.SituTrib      := cst20;
                                    ImpComp.ICMSComp.ICMS20.CST    := cst20; // Tributação com BC reduzida do ICMS
                                    ImpComp.ICMSComp.ICMS20.pRedBC := Cte.FieldByName( 'CTR_PERC_REDUCAO_BASE_ICMS' ).AsCurrency;
                                    ImpComp.ICMSComp.ICMS20.vBC    := Cte.FieldByName( 'CTR_VLR_BASE_ICMS'          ).ASCurrency;
                                    ImpComp.ICMSComp.ICMS20.pICMS  := Cte.FieldByName( 'CTR_ALIQUOTA_ICMS'          ).ASCurrency;
                                    ImpComp.ICMSComp.ICMS20.vICMS  := Cte.FieldByName( 'CTR_VLR_ICMS'               ).ASCurrency;
                                    {// Assembla 1947
                                    compl.xObs                     := compl.xObs + '; CST-ICMS: 0'     + Tributacao.FieldByName( 'STR_CODIGO' ).AsString
                                                                                + ' BASE DE CALCULO: ' + FormatCurr('##,##0.00' ,Cte.FieldByName( 'CTR_VLR_BASE_ICMS' ).AsCurrency )
                                                                                + ' PERC. ALIQUOTA: '  + FormatCurr('##,##0.00' ,Cte.FieldByName( 'CTR_ALIQUOTA_ICMS' ).AsCurrency )
                                                                                + ' VALOR: '           + FormatCurr('##,##0.00' ,Cte.FieldByName( 'CTR_VLR_ICMS'      ).AsCurrency );}
                                end;
                            40: begin
                                   ImpComp.ICMSComp.SituTrib   := cst40;
                                   ImpComp.ICMSComp.ICMS45.CST := cst40; // ICMS Isento
                                   // Assembla 1947
                                   //compl.xObs                  := compl.xObs + '; CST-ICMS: 0' + Tributacao.FieldByName( 'STR_CODIGO' ).AsString;
                                end;
                            41: begin
                                   ImpComp.ICMSComp.SituTrib   := cst41;
                                   ImpComp.ICMSComp.ICMS45.CST := cst41; // ICMS não Tributada
                                   // Assembla 1947
                                   //compl.xObs                  := compl.xObs + '; CST-ICMS: 0' + Tributacao.FieldByName( 'STR_CODIGO' ).AsString;
                                end;
                            51: begin
                                   ImpComp.ICMSComp.SituTrib   := cst51;
                                   ImpComp.ICMSComp.ICMS45.CST := cst51; // ICMS diferido
                                   // Assembla 1947
                                   //compl.xObs                  := compl.xObs + '; CST-ICMS: 0' + Tributacao.FieldByName( 'STR_CODIGO' ).AsString;
                                end;
                            60: begin
                                    ImpComp.ICMSComp.SituTrib          := cst60;
                                    ImpComp.ICMSComp.ICMS60.CST        := cst60; // Tributação atribuida ao tomador ou 3. por ST
                                    ImpComp.ICMSComp.ICMS60.vBCSTRet   := 0;
                                    ImpComp.ICMSComp.ICMS60.pICMSSTRet := 0;
                                    ImpComp.ICMSComp.ICMS60.vICMSSTRet := 0;
                                    ImpComp.ICMSComp.ICMS60.vCred      := 0;
                                    // Assembla 1947
                                    //compl.xObs                         := compl.xObs + '; CST-ICMS: 0' + Tributacao.FieldByName( 'STR_CODIGO' ).AsString;
                                end;
                            90: begin
                                    ImpComp.ICMSComp.SituTrib      := cst90;
                                    ImpComp.ICMSComp.ICMS90.CST    := cst90; // ICMS Outros
                                    ImpComp.ICMSComp.ICMS90.pRedBC := Cte.FieldByName( 'CTR_PERC_REDUCAO_BASE_ICMS' ).AsCurrency;
                                    ImpComp.ICMSComp.ICMS90.vBC    := Cte.FieldByName( 'CTR_VLR_BASE_ICMS'          ).ASCurrency;
                                    ImpComp.ICMSComp.ICMS90.pICMS  := Cte.FieldByName( 'CTR_ALIQUOTA_ICMS'          ).ASCurrency;
                                    ImpComp.ICMSComp.ICMS90.vICMS  := Cte.FieldByName( 'CTR_VLR_ICMS'               ).ASCurrency;
                                    ImpComp.ICMSComp.ICMS90.vCred  := 0;
                                    // Assembla 1947
                                    {compl.xObs                     := compl.xObs   + '; CST-ICMS: 0'      + Tributacao.FieldByName( 'STR_CODIGO' ).AsString
                                                                                   + ' BASE DE CALCULO: ' + FormatCurr('##,##0.00' ,Cte.FieldByName( 'CTR_VLR_BASE_ICMS' ).AsCurrency )
                                                                                   + ' PERC. ALIQUOTA: '  + FormatCurr('##,##0.00' ,Cte.FieldByName( 'CTR_ALIQUOTA_ICMS' ).AsCurrency )
                                                                                   + ' VALOR: '           + FormatCurr('##,##0.00' ,Cte.FieldByName( 'CTR_VLR_ICMS'      ).AsCurrency );}

                                end;
                         end;
                      end;
 

Editado 3 Junho, 2014 por ALA

[Infoel]

Pessoal,

Estou com o Acbr atualizado e

no Acbr.inc está definido {$DEFINE PL_200}

porém estou tentando validar um Cte de complementação e recebo a seguinte mensagem:

 

--------------------------

Falha na validação dos dados do Conhecimento 7

Content for element '{http://www.portalfiscal.inf.br/cte}infCteComp' is incomplete according to the DTD/Schema.

Expecting: {http://www.portalfiscal.inf.br/cte}vPresComp.

---------------------------

 

Li aqui no fórum que na versão 2.0 só é necessário a chave do cte sendo complementado e preencher o resto como se 

 

fosse um cte normal somente com os valores do complemento. 

Mas porquê essa mensagem?

[Italo Giurizzato Junior]

Boa noite,

 

E os schemas, são da versão 2.00?

 

Antes de executar o Valida, execute o Assinar, desta forma vamos ter o XML salvo em disco.

 

Com o XML fica mais fácil analisar o problema.

[maiko_bito]

Olá pessoal. Vi este tópico e resolvi aproveitar, tenho uma dúvida, que acredito ser relacionada ao assunto. Tenho um cliente que se utiliza muito do conhecimento de tipo complemento de impostos e valores, recentemente mudei meu projeto da versão 104 para 200, tem funcionado direitinho, porém agora ao fazer um conhecimento de frete do tipo complemento, meu cliente precisa incrementar o valor do ICMS, ele faz o conhecimento, transmite normalmente, mas ao imprimir o DaCTe sai o ICMS do conhecimento original, e não os valores do complemento, resumindo na aliquota, base, valor do imposto, ta imprimindo o ICMS do conhecimento original, e não os dados complementados. Estou alimentando apenas os campos do grupo "ImpComp.ICMSComp" com os valores do imposto complementado, e nos campos do grupo "Imp.ICMS" eu alimento os dados do conhecimento original. Se eu mudar passar a informar os valores complementados no grupo "Imp.ICMS." dai imprime no DaCTe mas não sei se isso seria o certo a se fazer. 

[Italo Giurizzato Junior]

Boa tarde Maiko,

 

Você chegou a estudar a estrutura do XML (CT-e versão 2.00)?

 

Esta disponível no Portal Nacional do CT-e o Manual versão 2.00a do CT-e.