Dados fiscais relacionados ao CSOSN.[Resolvido]

[malk182]

Estava dando uma olhada nas fontes e vi no arquivo pcnModeloNfe.pas na pasta do PCN2 que mostra como preencher o ICMS e ICMS ST em função do CST. Gostaria de saber se alguem as mesmas informações porém para o uso do CSOSN.

Tabela existente no pcnModelNfe.pas:

....

    NFe.Det[i].Imposto.ICMS.orig := oeNacional;                    // N11 - Origem da mercadoria

                                                                   //         (0)=oeNacional

                                                                   //         (1)=oeEstrangeiraImportacaoDireta

                                                                   //         (2)=oeEstrangeiraAdquiridaBrasil

    NFe.Det[i].Imposto.ICMS.CST  := cst00;                         // N12 - Tributação do ICMS

                                                                   //         (00)=cst00

                                                                   //         (10)=cst10

                                                                   //         (20)=cst20

                                                                   //         (30)=cst30

                                                                   //         (40)=cst40

                                                                   //         (41)=cst41

                                                                   //         (50)=cst50

                                                                   //         (51)=cst51

                                                                   //         (60)=cst60

                                                                   //         (70)=cst70

                                                                   //         (90)=cst90

    if NFe.Det[i].Imposto.ICMS.CST = cst00 then

    begin

      NFe.Det[i].Imposto.ICMS.modBC := dbiMargemValorAgregado;     // N13 - Modalidade de determinação da BC do ICMS

      NFe.Det[i].Imposto.ICMS.vBC := 0;                            // N15 - Valor da BC do ICMS

      NFe.Det[i].Imposto.ICMS.pICMS := 0;                          // N16 - Alíquota do imposto

      NFe.Det[i].Imposto.ICMS.vICMS := 0;                          // N17 - Valor do ICMS

    end;

    if NFe.Det[i].Imposto.ICMS.CST = cst10 then

    begin

      NFe.Det[i].Imposto.ICMS.modBC := dbiMargemValorAgregado;     // N13 - Modalidade de determinação da BC do ICMS

      NFe.Det[i].Imposto.ICMS.vBC := 0;                            // N15 - Valor da BC do ICMS

      NFe.Det[i].Imposto.ICMS.pICMS := 0;                          // N16 - Alíquota do imposto

      NFe.Det[i].Imposto.ICMS.vICMS := 0;                          // N17 - Valor do ICMS

      NFe.Det[i].Imposto.ICMS.modBCST := dbisMargemValorAgregado;  // N18 - Modalidade de determinação da BC do ICMS ST

      NFe.Det[i].Imposto.ICMS.pMVAST := 0;                         // N19 - Percentual da margem de valor Adicionado do ICMS ST

      NFe.Det[i].Imposto.ICMS.pRedBCST := 0;                       // N20 - Percentual da Redução de BC do ICMS ST

      NFe.Det[i].Imposto.ICMS.vBCST := 0;                          // N21 - Valor da BC do ICMS ST

      NFe.Det[i].Imposto.ICMS.pICMSST := 0;                        // N22 - Alíquota do imposto do ICMS ST

      NFe.Det[i].Imposto.ICMS.vICMSST := 0;                        // N23 - Valor do ICMS ST

    end;

    if NFe.Det[i].Imposto.ICMS.CST = cst20 then

    begin

      NFe.Det[i].Imposto.ICMS.modBC := dbiMargemValorAgregado;     // N13 - Modalidade de determinação da BC do ICMS

      NFe.Det[i].Imposto.ICMS.pRedBC := 0;                         // N14 - Percentual da Redução de BC do ICMS

      NFe.Det[i].Imposto.ICMS.vBC := 0;                            // N15 - Valor da BC do ICMS

      NFe.Det[i].Imposto.ICMS.pICMS := 0;                          // N16 - Alíquota do imposto

      NFe.Det[i].Imposto.ICMS.vICMS := 0;                          // N17 - Valor do ICMS

    end;

    if NFe.Det[i].Imposto.ICMS.CST = cst30 then

    begin

      NFe.Det[i].Imposto.ICMS.modBCST := dbisMargemValorAgregado; // N18 - Modalidade de determinação da BC do ICMS ST

      NFe.Det[i].Imposto.ICMS.pMVAST := 0;                        // N19 - Percentual da margem de valor Adicionado do ICMS ST

      NFe.Det[i].Imposto.ICMS.pRedBCST := 0;                      // N20 - Percentual da Redução de BC do ICMS ST

      NFe.Det[i].Imposto.ICMS.vBCST := 0;                         // N21 - Valor da BC do ICMS ST

      NFe.Det[i].Imposto.ICMS.pICMSST := 0;                       // N22 - Alíquota do imposto do ICMS ST

      NFe.Det[i].Imposto.ICMS.vICMSST := 0;                       // N23 - Valor do ICMS ST

    end;

    if NFe.Det[i].Imposto.ICMS.CST = cst51 then

    begin

      NFe.Det[i].Imposto.ICMS.modBC := dbiMargemValorAgregado;     // N13 - Modalidade de determinação da BC do ICMS

      NFe.Det[i].Imposto.ICMS.pRedBC := 0;                         // N14 - Percentual da Redução de BC do ICMS

      NFe.Det[i].Imposto.ICMS.vBC := 0;                            // N15 - Valor da BC do ICMS

      NFe.Det[i].Imposto.ICMS.pICMS := 0;                          // N16 - Alíquota do imposto

      NFe.Det[i].Imposto.ICMS.vICMS := 0;                          // N17 - Valor do ICMS

    end;

    if NFe.Det[i].Imposto.ICMS.CST = cst60 then

    begin

      NFe.Det[i].Imposto.ICMS.vBCST := 0;                          // N21 - Valor da BC do ICMS ST

      NFe.Det[i].Imposto.ICMS.vICMSST := 0;                        // N23 - Valor do ICMS ST

    end;

    if NFe.Det[i].Imposto.ICMS.CST = cst70 then

    begin

      NFe.Det[i].Imposto.ICMS.modBC := dbiMargemValorAgregado;     // N13 - Modalidade de determinação da BC do ICMS

      NFe.Det[i].Imposto.ICMS.pRedBC := 0;                         // N14 - Percentual da Redução de BC do ICMS

      NFe.Det[i].Imposto.ICMS.vBC := 0;                            // N15 - Valor da BC do ICMS

      NFe.Det[i].Imposto.ICMS.pICMS := 0;                          // N16 - Alíquota do imposto

      NFe.Det[i].Imposto.ICMS.vICMS := 0;                          // N17 - Valor do ICMS

      NFe.Det[i].Imposto.ICMS.modBCST := dbisMargemValorAgregado;  // N18 - Modalidade de determinação da BC do ICMS ST

      NFe.Det[i].Imposto.ICMS.pMVAST := 0;                         // N19 - Percentual da margem de valor Adicionado do ICMS ST

      NFe.Det[i].Imposto.ICMS.pRedBCST := 0;                       // N20 - Percentual da Redução de BC do ICMS ST

      NFe.Det[i].Imposto.ICMS.vBCST := 0;                          // N21 - Valor da BC do ICMS ST

      NFe.Det[i].Imposto.ICMS.pICMSST := 0;                        // N22 - Alíquota do imposto do ICMS ST

      NFe.Det[i].Imposto.ICMS.vICMSST := 0;                        // N23 - Valor do ICMS ST

    end;

    if NFe.Det[i].Imposto.ICMS.CST = cst90 then

    begin

      NFe.Det[i].Imposto.ICMS.modBC := dbiMargemValorAgregado;     // N13 - Modalidade de determinação da BC do ICMS

      NFe.Det[i].Imposto.ICMS.pRedBC := 0;                         // N14 - Percentual da Redução de BC do ICMS

      NFe.Det[i].Imposto.ICMS.vBC := 0;                            // N15 - Valor da BC do ICMS

      NFe.Det[i].Imposto.ICMS.pICMS := 0;                          // N16 - Alíquota do imposto

      NFe.Det[i].Imposto.ICMS.vICMS := 0;                          // N17 - Valor do ICMS

      NFe.Det[i].Imposto.ICMS.modBCST := dbisMargemValorAgregado;  // N18 - Modalidade de determinação da BC do ICMS ST

      NFe.Det[i].Imposto.ICMS.pMVAST := 0;                         // N19 - Percentual da margem de valor Adicionado do ICMS ST

      NFe.Det[i].Imposto.ICMS.pRedBCST := 0;                       // N20 - Percentual da Redução de BC do ICMS ST

      NFe.Det[i].Imposto.ICMS.vBCST := 0;                          // N21 - Valor da BC do ICMS ST

      NFe.Det[i].Imposto.ICMS.pICMSST := 0;                        // N22 - Alíquota do imposto do ICMS ST

      NFe.Det[i].Imposto.ICMS.vICMSST := 0;                        // N23 - Valor do ICMS ST

    end;

                                                                   // N13 - Modalidade de determinação da BC do ICMS

                                                                   //         (0)=dbiMargemValorAgregado

                                                                   //         (1)=dbiPauta

                                                                   //         (2)=dbiPrecoTabelado

                                                                   //         (3)=dbiValorOperacao


                                                                   // N18 - Modalidade de determinação da BC do ICMS ST

                                                                   //         (0)=dbisPrecoTabelado       – Preço tabelado ou máximo sugerido;

                                                                   //         (1)=dbisListaNegativa       - Lista Negativa (valor);

                                                                   //         (2)=dbisListaPositiva       - Lista Positiva (valor);

                                                                   //         (3)=dbisListaNeutra         - Lista Neutra (valor);

                                                                   //         (4)=dbisMargemValorAgregado - Margem Valor Agregado (%);

                                                                   //         (5)=dbisPauta               - Pauta (valor)


...[/code]

[malk182]

Resolvido.

Encontrei as informações no arquivo pcnNfeW.pas a partir da linha 1016.