ACBrNFeWebServices.pas
pcnConversao.pas ACBrDFe.Conversao.pas pcnConversaoNFe.pas ACBrNFe.Conversao.pas ACBrNFe.EventoClass.pas ACBrNFe.EnvEvento.pas
ACBrNFeWebServices.pas
pcnConversao.pas ACBrDFe.Conversao.pas pcnConversaoNFe.pas ACBrNFe.Conversao.pas ACBrNFe.EventoClass.pas ACBrNFe.EnvEvento.pas
Estou anexando implementações para os eventos
112130 Perecimento, perda, roubo ou furto durante o transporte contratado pelo fornecedor
112140 Fornecimento não realizado com pagamento antecipado
Essas implementações contém o que já foi implementados nos tópicos abaixo e também leitura de alguns eventos em Json.
Os 4 eventos implementados foram gerados e transmitidos com sucesso para o Sefaz.
Para as implementações de leitura dos dados através de Json em eventos já implementados, também foram homologados no Sefaz (implementação seguindo ao padrão do XSD).
https://www.projetoacbr.com.br/forum/topic/87185-implementação-do-evento-112150-atualização-da-data-de-previsão-de-entrega/
https://www.projetoacbr.com.br/forum/topic/87048-cancelamento-de-evento-110001-divergência-entre-nt-e-schema-na-descrição-do-evento/
Segue lista de alterações por unit aplicadas nos 3 tópicos aberto
ACBrNFe.EnvEvento.pas e ACBrNFe.WebServices.pas
Implementado geração de XML para os tipos:
teAtualizacaoDataPrevisaoEntrega
tePerecPerdaRouboFurtoTranspContratFornec
teFornecNaoRealizPagAntec
teAceiteDebitoApuracaoNotaCredito
ACBrNFe.EnvEvento.pas
Implementado leitura para Json para os tipos:
teCancGenerico
tePagIntegLibCredPresAdq
teDestItemConsPessoal
teAceiteDebitoApuracaoNotaCredito
teAtualizacaoDataPrevisaoEntrega
tePerecPerdaRouboFurtoTranspContratFornec
teFornecNaoRealizPagAntec
teSolicApropCredPres
tePerecPerdaRouboFurtoTranspContratAqu
teImobilizacaoItem
teSolicApropCredBensServicos
ACBrDFe.Conversao.pas
TACBrTipoEvento adicionado teAtualizacaoDataPrevisaoEntrega
TACBrTipoEventoArrayStrings adicionado 112150
TACBrTipoEventoDescricaoArrayStrings AtualizacaoDataPrevisaoEntrega
TryStrTocCredPres ajustado para adicionar zero a esquerda se tiver apenas 1 digito (adicionado uses ACBrUtil.Strings)
ACBrNFe.Conversao.pas
TSchemaNFe adicionado schAtualizacaoDataPrevisaoEntrega
TSchemaNFeArrayStrings adicionado AtualizacaoDataPrevisaoEntrega
TEventoArrayStrings adicionado e212120
TIndAceitacao e TIndAceitacaoArrayStrings novo Enum e seus valores utilizados nos eventos 211128, 212110 e 212120
IndAceitacaoToStr e StrToIndAceitacao conversão para TIndAceitacao
StrToTpEventoNFe adicionado 110001, 212120, teCancGenerico, teAtualizacaoDataPrevisaoEntrega
SchemaEventoToStr adicionado e110001, e112150, schCancGenerico, schAtualizacaoDataPrevisaoEntrega
pcnConversao.pas
adicionado teAtualizacaoDataPrevisaoEntrega nas constantes
TpcnTpEventoString adicionado 112150
TpEventoToDescStr adicionado AtualizacaoDataPrevisaoEntrega e teAtualizacaoDataPrevisaoEntrega
pcnConversaoNFe.pas
TSchemaNFe adicionado schAtualizacaoDataPrevisaoEntrega
TSchemaNFeArrayStrings adicionado AtualizacaoDataPrevisaoEntrega
TEventoArrayStrings adicionado e212110 e212120
adicionado TIndAceitacao e TIndAceitacaoArrayStrings
adicionado IndAceitacaoToStr e StrToIndAceitacao
StrToTpEventoNFe 110001, 112150, teCancGenerico, teAtualizacaoDataPrevisaoEntrega,
SchemaEventoToStr e110001, e112150, schCancGenerico, schAtualizacaoDataPrevisaoEntrega
ACBr.EventoClass.pas
Adicionado classe TgItemNaoFornecidoCollectionItem
adicionado classe TgItemNaoFornecidoCollection
TgControleEstoquePerecimento adicionado FvIBS e FvCBS
TDetEvento adicionado gItemNaoFornecido indAceitacao dPrevEntrega
getDescEvento/DescricaoTipoEvento ajuste descrição teCancGenerico e adicionado descrição para teAtualizacaoDataPrevisaoEntrega
Usei o recurso de arrastar e soltar, acabou invertendo a ordem entre o post e os arquivos