Não gera as tags IBSCBS

[Roberto Oliveira]

Olá pessoal não estou conseguindo gerar as tags no xml do IBSCBS. Os demais campos da notas seguem normais, mas esses não são gerados:

                  with IBSCBS do
                      begin
                        //cstNenhum, cst000, cst010, cst011, cst200, cst210, cst220, cst221, cst222, cst400, cst410, cst510, cst550, cst620, cst800, cst810, cst820, cst830
                        CST := cst000;
                        //Veja diretamente na unit ACBrDFe.Conversao os valores válidos...
                        cClassTrib := ct000001;
                        gIBSCBS.vBC := BaseIBSCBS;

                        //grupo IBS

                        gIBSCBS.gIBSUF.pIBSUF := 0.05;
                        gIBSCBS.gIBSUF.vIBSUF := BaseIBSCBS*0.0005;//valor do IBS

                        gIBSCBS.gIBSUF.gRed.pRedAliq := 0;
                        gIBSCBS.gIBSUF.gRed.pAliqEfet := 0.05;

                        gIBSCBS.gIBSMun.pIBSMun := 0.05;
                        gIBSCBS.gIBSMun.vIBSMun := BaseIBSCBS*0.0005;

                        gIBSCBS.gIBSMun.gRed.pRedAliq := 0;
                        gIBSCBS.gIBSMun.gRed.pAliqEfet := 0;

                        totalIBS:=totalIBS+gIBSCBS.gIBSUF.vIBSUF;

                        //grupo CBS
                        gIBSCBS.gCBS.pCBS := 0.90;
                        gIBSCBS.gCBS.vCBS := BaseIBSCBS*0.009;//valor do CBS

                        gIBSCBS.gCBS.gRed.pRedAliq := 0;
                        gIBSCBS.gCBS.gRed.pAliqEfet := 0.90;
                        totalCBS:=totalCBS+gIBSCBS.gCBS.vCBS;
                      end;

[BigWings]

16 horas atrás, Roberto Oliveira disse:

                        CST := cst000;
                        //Veja diretamente na unit ACBrDFe.Conversao os valores válidos...
                        cClassTrib := ct000001;

Você está com os fontes muito desatualizados.

O cClassTrib é informado em string e não mais enumerado.