Ir para conteúdo
  • Cadastre-se

dev botao

tpDoc 99 - Não gera tag


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

Recommended Posts

  • Membros Pro

Bom dia.

Ao incluir um registro de Documento com o tipo 99, o componente não está gerando a tag <tpDoc>99 </tpDoc>.

segue trecho correspondente:
            <infDoc>
                <infOutros>
                    <tpDoc/>
                    <descOutros>PED</descOutros>
                    <nDoc>1</nDoc>
                    <dEmi>2020-05-23</dEmi>
                    <vDocFisc>1000.00</vDocFisc>
                </infOutros>
            </infDoc>

Isto tem alguma relação com os schemas ?

Luis Fernando Vilela

Open Data Informatica Ltda

Link para o comentário
Compartilhar em outros sites

  • Membros Pro
14 minutos atrás, Juliomar Marchetti disse:

Bom dia.

Não, mas com combinações de tags

Olá Juliomar,

Verificando a Classe: 

Constatei que na linha 1675, existe a referencia a um item do TMemIniFile que não foi definido,
          tpDoc      := StrToTpDocumento(OK,INIRec.ReadString(sSecao,'tpDoc','01'));

Não seria esse o problema??

Luis Fernando Vilela

Open Data Informatica Ltda

Link para o comentário
Compartilhar em outros sites

  • Membros Pro
2 minutos atrás, Juliomar Marchetti disse:

tu tá usando o monitor?

Não... usando apenas o componente TACBrCte..

Estou investigando o motivo dessa tag não estar sendo preenchida e sendo recusada pela SEFAZ.

Pelo manual, ela deveria ser preenchida com 99, porem algo está fazendo com que ela seja anulada no xml...

Luis Fernando Vilela

Open Data Informatica Ltda

Link para o comentário
Compartilhar em outros sites

  • Membros Pro
1 minuto atrás, BigWings disse:

Como está alimentando a tag no componente?

              with infDoc.infOutros.New do
              begin
                tpDoc      := TpCteTipoDocumento(99);
                descOutros := Movimentos_Documentostipo.AsWideString;
                nDoc       := Movimentos_Documentosdocumento.AsWideString;
                dEmi       := Movimentos_Documentosdt_emissao_nf.AsDateTime;
                vDocFisc   := Movimentos_Documentosvl_documento.AsFloat;
              end;

Luis Fernando Vilela

Open Data Informatica Ltda

Link para o comentário
Compartilhar em outros sites

  • Moderadores
  • Solution
4 minutos atrás, fefevilela disse:

                tpDoc      := TpCteTipoDocumento(99);

Dessa forma está acessando pelo índice do enumerado, e não pelo valor.

Faça:

Citar

          tpDoc      := StrToTpDocumento(ok, '99');

 

Equipe ACBr BigWings
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

 

 

Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 1403 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Visitante
Este tópico está agora fechado para novas respostas
×
×
  • 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.