Ir para conteúdo
  • Cadastre-se

dev botao

Rejeição 1871 - pBCOp - cst=010


Ver Solução Respondido por André Ferreira de Moraes,
  • Este tópico foi criado há 2305 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • Membros Pro
Postado

Estou emitindo a NFe em anexo.

Recebo a rejeição da imagem.

O código que uso na geração é o seguinte:

                                                     if Copy(IBDSitensCT.AsString,2,2) = '10' then
                                                                      begin
                                                                          CST         := cst10;
                                                                          ICMS.pRedBC := IBDSitensINDRED.Value;
                                                                          ICMS.vBC    := IBDSitensBCICM.AsCurrency;
                                                                          ICMS.pICMS  := IBDSitensALIQICM.Value;
                                                                          ICMS.vICMS  := IBDSitensVRICM.Value;
                                                                     
                                                                          ICMS.vBCFCP := IBDSitensVBCFCP.AsCurrency;
                                                                          ICMS.pFCP   := IBDSitensPFCP.Value;
                                                                          ICMS.vFCP   := IBDSitensVFCP.AsCurrency;

                                                                          // ST
                                                                          ICMS.modBCST := StrTomodBCST(ok,Copy(IBDSitensMODBC_ST.AsString,1,1) );
                                                                          ICMS.pRedBCST := IBDSitensINDRED_ST.Value;
                                                                          ICMS.pMVAST   := IBDSitensINDADD_ST.Value;
                                                                          ICMS.vBCST    := IBDSitensBCICMSUBST.Value;
                                                                          ICMS.pICMSST  := IBDSitensALIQ_ST.Value;
                                                                          ICMS.vICMSST  := IBDSitensVRICMSUBST.Value;
                                                                          ICMS.UFST     := IBDSitensUF_ST.AsString;
                                                                                                                                                  
                                                                          ICMS.vBCFCPST := IBDSitensVBCFCPST.AsCurrency;
                                                                          ICMS.pFCPST   := IBDSitensPFCPST.Value;
                                                                          ICMS.vFCPST   := IBDSITENSVFCPST.AsCurrency;

                                                                      end;

 

Eu tenho a impressão que a tag pBCOp não deveria ser gerada para CST=010, mas mesmo deixando ela zerada ele é criada.

 

Capturar1.JPG

NF_TESTE.XML

J.Humberto Munhoz

BomSoft Sistemas

Mococa - SP

 

BomSoft.JPG.feafd9ad3bb7c05eb372c8d833e71ec5.JPG

 

  • Membros Pro
Postado
2 horas atrás, André Ferreira de Moraes disse:

Vc deve informar o CST como cstPart10 e não informar os campos vBCFCPST, pFCPST e vFCPST

Obrigado, fiz isso e no teste em homologação deu certo. Agora enviei para o cliente enviar em Produção.

Existe algum tópico que mostre quando usar cst10 e cstPart10 ?

 

Obrigado.

J.Humberto Munhoz

BomSoft Sistemas

Mococa - SP

 

BomSoft.JPG.feafd9ad3bb7c05eb372c8d833e71ec5.JPG

 

×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.