Janio Aguiar

Provisoriamente estou fazendo como abaixo, mas acho que deve haver uma maneira mais fácil, para os padrões windeveiros; sMembroVar is string = "NAOENCERRADOS" + MyStrZero(nContaElem,3) FOR EACH MemberVariant OF jRetorno.NAOENCERRADOS IF MemberVariant..Name = sMembroVar THEN sChvMdf is string = MemberVariant.ChMDFe nContaElem++ sMembroVar = "NAOENCERRADOS" + MyStrZero(nContaElem,3) END END

Boa tarde, Alguem tem ideia de como ler o Json abaixo? Lembrando que "NAOENCERRADOS002... 003... 004..." etc eu nao sei se tera ou nao. Pode ter centenas, ou nenhum. Obg PS: Versao 23 Json : { "NAOENCERRADOS" : { "CStat" : 111, "CUF" : 23, "NAOENCERRADOS002" : { "CNPJCPF" : "07439697000140", "ChMDFe" : "23210507439697000140580010000000131000000180", "Msg" : "", "NProt" : "923210000001056" }, "NAOENCERRADOS003" : { "CNPJCPF" : "07439697000155", "ChMDFe" : "23210507439697000140580010000000131000001254", "Msg" : "", "NProt" : "923210000001056" }, "Msg" : "", "TpAmb" : "2", "VerAplic" : "RS20210422122621", "Versao" : "RS20210422122621", "XMotivo" : "Consulta não encerrados localizou MDF-e nessa situação" } }

Tenho uma outra rotina de importação de xml do Cupom Eletronico (SAT), que segue o mesmo padrao e tbm 100% Sugestões: - Jogue o TableAddLine num variável - coloque essa variável junto a table e nao a coluna, tipo Table_XXXXX[nLinhaAdicionada].COL_XXXX e nao Table_XXXXX.COL_XXXX[nLinhaAdicionada] - Faça teste puxando o xml de um arquivo e não de uma string como vc ta fazendo

Bom dia, faço semelhante a vc, e tem sido 100% ate o momento TableDeleteAll(TABLE_Produtos) FOR EACH Produto OF xml.nfeProc.NFe.infNFe ON det nX is int = TableAddLine(TABLE_Produtos) TABLE_Produtos[nX].COL_CodNcm = Produto.prod.NCM TABLE_Produtos[nX].COL_VlrOut = Produto.prod.vOutro TABLE_Produtos[nX].COL_VlrFrt = Produto.prod.vFrete

Dica sensacional, Vilani

Rinaldo, Table por programação ate que funciona. Mas table linkada a uma query isso não funciona

Bom dia! Num controle Table linkada a uma query, como faço pra apagar todas as linhas da table sem re-executar a query? TableDeleteAll não funciona nesse caso

Qual Android desses aparelho que não da certo? Android com versão >= 10 (se nao me engano), vc tem que ir em CONFIGURAÇÕES DO APP, e permitir gravar

Pra meu desespero, acabo de acessar o cliente e... advinha

Complicado. Eh um monitor, sem interface com usuario. O sistema tem q fechar e abrir sem interação com ninguém. Acho q vou permitir abrir mais de uma instancia pq ao meu ver nao tem jeito mesmo. O interessante eh que esse app está rodando em VARIOS computadores, mas APENAS em 1 ocorre isso.

Ja tentou o TableSelectPlus()?? Ao marcar/desmarcar o chekbox, vc pega a linha da table e manda um TableSelectPlus passando a linha. É puro chute

Nao é dessa forma que vc JA está fazendo? estou vendo varias linhas selecionadas rsrs

UMA linha ou VARIAS linhas?

IF isso ExeTerminate("MeuPrograma.Exe") // se fechar aqui RestartProgram() // essa linha nao é executada END