elton.barbosa

Olá Dércio, Esse tipo de dúvida, geralmente você precisa tirar com o contador da empresa que vai gerar o SPED. Ou, no caso mais extremo, contratar um contador para sua empresa para ajudar a fazer os cálculos e a gerar esses arquivos no seu sistema. Depende muito da UF, da empresa e de diversos fatores que nós talvez por falta de formação contábil poderíamos ajudar. Mas eu entendo sua frustração, porque já passei muito por isso... Esses registros foram adicionados antes de 2011 para serem utilizados para outras apurações de ICMS. Não necessariamente de ICMS ST Retido ou Efetivo. Só devem usar esses registros os contribuintes de UF cuja Administração Tributária Estadual exige por meio de legislação específica essas apurações. Nesse caso a UF vai instituir e disponibilizar a a Tabela 5.3 com códigos que contenham “3”, “4” e 5” no quarto caractere (“Tipos de Apuração de ICMS”). Ela está disponível para download no site do SPED. Você precisa consultar a tabela 5.3 mencionada acima da UF do contribuinte e a legislação estadual para saber se realmente isso é necessário e qual código utilizar. Importante notar que o guia prático versão 3.01 na página 229, diz que os valores válidos para esse campo estão relacionados com os registros C197 e D197 que você deve estar gerando de acordo com legislação específica do estado. Não sei dizer se corresponde ao ICMS ST Retido. Mas posso responder que está relacionado ao C197 (ou D197) porque todo registro 1900 é baseado na geração do C197 e D197 conforme escrito acima. Note que esse campo também tem explicação de validação do seu valor no guia prático (pág. 231). O Valor deve bater com somatório do C197. Agora você entrou numa parte da legislação que eu realmente, ou pelo menos a princípio, não saberia dizer nada. Em especial porque não estou ciente da legislação do RS. Apenas posso informar que ambos os campos tem validação nesses registros e que o campo VL_TOT_AJ_DEBITOS_OA está relacionado com o Registro 1921. Espero ter ajudado de alguma forma.

Olá Fabiano, Vamos por partes. Realmente. Eu fui até conferir, mas essas classes específicas e suas propriedades não foram afetadas pelos ajustes recentes. Pelo menos desde 2015 elas já estavam desse modo. Eu entendi que você gostaria que o projeto publicasse essas propriedades. Até discutimos sobre essa possibilidade. Mas isso é desnecessário. Desde o Delphi 2010 quando a RTTI foi reescrita, é possível acessar as propriedades que não são published. É por isso e por outros motivos, (cof, cof, generics, cof), que frameworks avançados como o Spring4D e DSharp funcionam apenas com o Delphi 2010 em diante. Colocar essas propriedades como published gera um warning no compilador que queremos evitar: W1055 PUBLISHED caused RTTI ($M+) to be added to type 'TACBrSacado' Mas como as propriedades estão acessíveis por RTTI, você não está sem saída. Com eu disse acima, você não precisa mudar seu código para não usar o RTTI. Talvez você precise usar o seu código para acessar o RTTI de forma atualizada. Ou talvez você deva verificar algum framework para fazer isso. Mas enfim, isso é uma decisão de acordo com o seu projeto. Veja nesse artigo em português como a RTTI pode acessar propriedades não published. Há vários outros artigos na net que estão em inglês. Eu gosto dessa série aqui porque ele segue uma linha de raciocínio e dessa coleção de posts que fala de assuntos diferentes. Achei interessante o que você fez. Mas não é o que eu recomendaria de uso do RTTI no entanto. Tenho impressão que, a menos que você tenha um teste unitário para isso, se alguém alterar um campo do Dataset você só perceberia isso rodando o programa. Acho melhor quando esse tipo de problema gere erro na compilação. Mas enfim, essa é mais uma opinião pessoal. Bom trabalho por aí.

Suspeitei desde o princípio... Se quiser anexar essas alterações, poderemos analisar. Pensamos em algo semelhante ao discutirmos entre os devs sobre esse problema. Vejam a mensagem acima.

Olá, Seja bem vindo ao fórum. Esperamos que ele seja de ajuda a resolver seus problemas. Realmente, por vezes é frustrante o trabalho de desenvolver softwares. Ainda assim, por favor, mantenha o nível profissional em suas mensagens. Temos regras simples para manter um ambiente saudável.

Olá, Não tenho muita experiência no FMX com essa parte. Dito isso, notei que tem correções no Delphi Rio 10.3.1 para essa action. Veja aqui https://quality.embarcadero.com/browse/RSP-18961 Você está utilizando a última versão 10.3.1? Fora isso, talvez você precise verificar o evento "onDidFinishTaking" para salvar o arquivo primeiro. Pelo que deu pra entender do help, o crop é ativado depois que o foi carregado. Talvez isso exija que ele esteja salvo.

Olá Lincoln, Esse me parece ser outro erro e não tem relação com este tópico.

A nota técnica (NT) 005/2018 adiou para algumas UFs a implantação disso em produção pra 07/05/2019. Para outras isso passa a valer em produção no último dia útil de abril. Veja a página 4, "Histórico de Alterações / Cronograma" da referida NT.

Não existe mais esse if que você mencionou. Por isso eu que disse que você não testou com a alteração que enviei ao SVN.

Como eu acabei de enviar uma correção ao SVN, tente atualizar e testar com o que está no SVN. Caso note que ainda assim é necessário uma correção, por favor, anexe o arquivo alterado para análise.

Enviei a alteração na Revisão 16866. Queiram por favor fazer a atualização, testar e reportar qualquer problema.

A sugestão foi enviada ao SVN na revisão 1683. Mas precisamos de uma correção melhor. De acordo com a versão 1.20 da NT 02/2018: A tag vICMSSubstituto tem ocorrência facultativa (0-1) em todos os grupos; A tag pST tem ocorrência facultativa (0-1) no grupo ICMSST (id = N10b); Na forma como está no SVN nessa revisão esses pontos não conseguem ser atendidos.

Você comparou esse com o xml gerado pelo seu programa que não foi enviado?

Olá Willian, Que estranho ele não ter essa função... Não tem um manual ou help que indique como importar os dados?

Ué... testei com o arquivo que você anexou acima...

Olá Willian, Encontrei esse aplicativo no site da Receita. Ele não serve como validador dos dados ou estrutura?

Enviado ao SVN na revisão 16857. Muito obrigado pela sugestão.

Me parece ok. Enviei ao SVN na revisão 16856. Queira por favor testar e validar. Fique atento principalmente a reimpressão não estar faltando nenhum dado que deveria ser impresso.

Isso é feito porque você está carregando o xml de terceiros. O componente então vai verificar se o xml está assinado e se não estiver vai ser assinado e validado antes de colocá-lo na fila para enviar. Essa alteração modifica o comportamento do componente e por isso precisamos ter um pouco de cautela. Se isso for alterado, por exemplo, precisaria ser nos dois métodos ao mesmo tempo (LoadFromString e LoadFromStringINI). Vou pedir uma ajuda ao @Italo Jurisato Junior pra ajudar a analisar essa questão.

Muito obrigado pela correção. Foi enviada ao SVN na revisão 16849. Também aproveitei para criar um teste unitário para esse erro.

Esse problema só acontece com o Delphi 7. Foi enviada uma correção para esse problema na revisão 16848. Esse erro acontece pois você tem versões diferentes da ACBrUtil.pas compiladas no seu computador. É provável que uma versão do Delphi está pegando os arquivos da outra.

Olá, Enviei alterações baseadas nessa sugestão na revisão 16847. Mas suas alterações não foram implementadas totalmente. Notei que o método function TEventos.LoadFromString da unit ACBreSocialEventos.pas foi alterado removendo o SaveToFiles. Mas isso já é utilizado pelo componente. Qual o motivo dessa remoção?

Olá Arce, Testei no tanto no Lazarus como no Delphi e funcionou corretamente. Utilizando o programa de exemplo, fiz as seguintes alterações no evento "onclick" do botão "btnCarregarXML": procedure TFExemploEsocial.btnCarregarXMLClick(Sender: TObject); var i: Integer; S5011: TS5011; begin OpenDialog1.Title := 'Selecione o Evento (Arquivo XML)'; OpenDialog1.DefaultExt := '*.xml'; OpenDialog1.Filter := 'Arquivos XML (*.xml)|*.xml|Todos os Arquivos (*.*)|*.*'; OpenDialog1.InitialDir := ACBreSocial1.Configuracoes.Arquivos.PathSalvar; if OpenDialog1.Execute then begin MemoResp.Clear; MemoResp.Lines.LoadFromFile(OpenDialog1.FileName); S5011 := TS5011.Create; S5011.Xml:= MemoResp.Lines.Text; end; MemoResp.Lines.Clear; MemoResp.Lines.Add('XML de Eventos Carregado com Sucesso!'); MemoResp.Lines.Add(' '); ...// as demais linhas deixei não alterei.. Talvez tenha alguma coisa que eu não entendi. Queira verificar, por favor.

Olá, uma alteração foi enviada ao SVN na revisão 16846 com base na sua sugestão. Queira atualizar e testar e reportar qualquer problema.

Muito obrigado pela sugestão. Uma correção foi enviada para os documentos CT-e, MDFe e NFe na revisão 16845.

Não tenho muita experiência no Tef Direção. Mas essa extensão 001 não é o número do terminal? Veja essa mensagem de um usuário chamado marciodc: