Pesquisa resultou em 5 ocorrências

por Henry
08 Dez 2020 16:39
Fórum: [x]Harbour
Tópico: leia um formato json de string
Respostas: 7
Exibições: 1574

leia um formato json de string

===============================================
|| RESOLVIDO ||
===============================================

Remontei a linha JSON e fiz uma adaptação de acordo com seus códigos.

e agora funciona, ainda não entendi o que não funcionava com o código anterior.

mas agradeço sua ajuda, agora ...
por Henry
08 Dez 2020 16:06
Fórum: [x]Harbour
Tópico: leia um formato json de string
Respostas: 7
Exibições: 1574

leia um formato json de string

gilbertosilverio
Muito obrigado por responder:


Tentei adaptar o código com base no que você postou:


hRet:={}
nLen:= hb_JsonDecode(cJSNAllData, @hRet )
msginfo( valtoprg(cJSNAllData) ) // - visualizar o todo o arquivo txt
If Len(hRet) != 0

// quando atinge a linha da condição IF: if HB ...
por Henry
08 Dez 2020 15:41
Fórum: [x]Harbour
Tópico: leia um formato json de string
Respostas: 7
Exibições: 1574

leia um formato json de string

Se eu estiver usando o Harbor Minigui Extended + Borland

// esta parte do código, isso me marca um erro: res := hb_JsonDecode( cJSNAllData )

res := hb_JsonDecode( cJSNAllData )
FOR EACH aItem IN res[ "detalle" ]
? aItem[ "descripcion" ]
? aItem[ "precioUnitario" ]
NEXT


Date: 2020-12-08 Time ...
por Henry
08 Dez 2020 15:26
Fórum: [x]Harbour
Tópico: leia um formato json de string
Respostas: 7
Exibições: 1574

leia um formato json de string

agora eu coloco para adaptar suas contribuições.
muito agradecido

Henry Herrera
por Henry
08 Dez 2020 05:26
Fórum: [x]Harbour
Tópico: leia um formato json de string
Respostas: 7
Exibições: 1574

leia um formato json de string

Olá a todos
Eu postei anteriormente, mas acho que não foi gravado.
Eu tenho uma string formatada em JSON como esta

{
"detalhe": [{
"tipo": "bom",
"moeda": "GTQ",
"data de transmissão": "2020-12-07",
"descrição": "Parafusos 1/2, rosca americana",
"quantidade": "10,00",
"unitMedida": "UNI",
"desconto ...