CTe Simplificado - DACTe FR Total a Receber

[LucaCampos]

Boa tarde. é valida essa alteração para sair o Total a Receber da DACTe.
Incluir o fCTe.det[i].vRec ao invés de 0.

procedure TACBrCTeDACTEFR.CarregaComponentesPrestacao;
var
i, j: Integer;
begin
with cdsComponentesPrestacao do
begin
    if FCTe.ide.tpCTe in [tcCTeSimp, tcSubstCTeSimpl] then
    begin
     for i := 0 to (fCTe.det.Count - 1) do
     begin
        for j := 0 to (fCTe.det[i].Comp.Count - 1) do
        begin
         Append;
         FieldByName('Nome').AsString        := fCTe.det[i].comp[j].xNome;
         FieldByName('Valor').AsFloat        := fCTe.det[i].comp[j].vComp;
         FieldByName('TotalServico').AsFloat := fCTe.total.vTPrest;
--->         FieldByName('TotalReceber').AsFloat := fCTe.det[i].vRec;
         Post;
        end;
     end;

 

[juliomar.marchetti]

Necessário conferir o manual e ver o que deve ser somado.
chegou a olhar ele?

[Daianne Renasoft]

No manual as tags referente Valor a Receber constam dessa forma.

 

 

[juliomar.marchetti]

Em 03/10/2025 at 14:20, Daianne Renasoft disse:

No manual as tags referente Valor a Receber constam dessa forma.

 

 

Resolvido o problema acima?

[Daianne Renasoft]

Não no componente, para que o valor saia preenchido na DACTE nosso Desenvolvedor está ajustando manualmente sempre que atualiza o componente.

[juliomar.marchetti]

favor anexar os arquivos modificados

[Rodrigo Fernandes Soares]

    ACBrCTeDACTEFR: Corrige o "Valor a Receber" saindo zerado no DACTE
    do CT-e Simplificado (tpCTe in [tcCTeSimp, tcSubstCTeSimpl]).
    No método TACBrCTeDACTEFR.CarregaComponentesPrestacao, o campo
    'TotalReceber' do dataset cdsComponentesPrestacao estava fixo em zero
    no trecho do CT-e Simplificado. Com isso, o "Valor a Receber" era
    impresso zerado mesmo quando o vRec/vTRec vinha preenchido e válido
    no XML.
    Passa a usar fCTe.total.vTRec, acompanhando a linha anterior, que já
    utiliza fCTe.total.vTPrest no 'TotalServico'.

ACBrCTeDACTEFR.pas

[juliomar.marchetti]

25 minutos atrás, Rodrigo Fernandes Soares disse:

    ACBrCTeDACTEFR: Corrige o "Valor a Receber" saindo zerado no DACTE
    do CT-e Simplificado (tpCTe in [tcCTeSimp, tcSubstCTeSimpl]).
    No método TACBrCTeDACTEFR.CarregaComponentesPrestacao, o campo
    'TotalReceber' do dataset cdsComponentesPrestacao estava fixo em zero
    no trecho do CT-e Simplificado. Com isso, o "Valor a Receber" era
    impresso zerado mesmo quando o vRec/vTRec vinha preenchido e válido
    no XML.
    Passa a usar fCTe.total.vTRec, acompanhando a linha anterior, que já
    utiliza fCTe.total.vTPrest no 'TotalServico'.

ACBrCTeDACTEFR.pas 126.59 kB · 0 downloads

no svn

At revision: 46992

[juliomar.marchetti]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.