Solutions

Boa noite peço desculpas o xml esta erro, porem o erro agora é outro segue a imagem e o xml correto para verificação.
 

 
 
trecho do meu codigo:
 
         with Imposto do          begin            // lei da transparencia nos impostos            vTotTrib := DM.ItemNotaFiscalTOTAL_TRIBUTO.Value;            with ICMS do            begin              if DM.ItemNotaFiscalCST.Value = '000' then              begin //               CST      := cst00;                CSOSN    := csosn202;                orig     := oeNacional;                modBC    := dbiValorOperacao;                vBC      := DM.ItemNotaFiscalBASE_ICMS.Value;                pICMS    := DM.ItemNotaFiscalICMS.Value;                vICMS    := DM.ItemNotaFiscalVALOR_ICMS.Value;             end              else if DM.ItemNotaFiscalCST.Value = '060' then  // 3 - Sub. Tributaria              begin //               CST      := cst60;                CSOSN    := csosn500;                orig     := oeNacional; //               modBC    := dbiValorOperacao; //               vBC      := 0; //               pICMS    := 0; //               vICMS    := 0;                modBCST  := dbisMargemValorAgregado;                pMVAST   := 0;                pRedBCST := 0;                vBCST    := DM.ItemNotaFiscalBASE_ICMS_SUBS.Value;                pICMSST  := DM.ItemNotaFiscalICMS_SUBS.Value;                vICMSST  := DM.ItemNotaFiscalVALOR_ICMS_SUBS.Value;                pRedBC   := 0;              end              else              if (DM.ItemNotaFiscalCST.Value = '040') or   // 1 - Isento                 (DM.ItemNotaFiscalCST.Value = '020') then // 2 - Não tributado              begin              with II do              begin                vBc      := 0;                vDespAdu := 0;                vII      := 0; //DM.ItemNotaFiscalVALOR_TOTAL.AsFloat;                vIOF     := 0;              end;              end;            end;          end;        end;      DM.ItemNotaFiscal.Next;      until DM.ItemNotaFiscal.Eof; 32150404242926000144550010000000171000000175-nfe.xml