Pedagio no MDF-e

ALA · 1 Dezembro, 2017

Senhores bom dia. Estou adicionando os dados do pedagio no MDF-e, mas o mesmo não esta aparecendo no XML...

Estou utilizando a rotina abaixo:

                     with rodo.valePed.disp.Add do
                     begin
                        // CA55 //
                        if Trim( MDFe_PEDAGIO.FieldByName( 'MCP_CA55_CNPJ_FORNECEDORA' ).AsString ) <> EmptyStr then
                        begin
                           CNPJForn := MDFe_PEDAGIO.FieldByName( 'MCP_CA55_CNPJ_FORNECEDORA' ).AsString;
                        end;
                        // CA56 //
                        if Trim( MDFe_PEDAGIO.FieldByName( 'MCP_CA56_CNPJ_PAGAMENTO' ).AsString ) <> EmptyStr then
                        begin
                           CNPJPg := MDFe_PEDAGIO.FieldByName( 'MCP_CA56_CNPJ_PAGAMENTO' ).AsString;
                        end;
                        // CA57 //
                        if Trim( MDFe_PEDAGIO.FieldByName( 'MCP_CA57_NR_COMP_COMPRA' ).AsString ) <> EmptyStr then
                        begin
                           nCompra := MDFe_PEDAGIO.FieldByName( 'MCP_CA57_NR_COMP_COMPRA' ).AsString;
                        end;
                        // CA58 //
                        vValePed := MDFe_PEDAGIO.FieldByName( 'MCP_CA58_VLR_VALE_PEDAGIO' ).AsCurrency;
                     end;