Json & Powercobol

[Joseg]

Olá,

Alguém conseguio implementar uma boa solução em Powercobol?
Em Windev não tenho problemas, mas neste caso preferia tudo no ambiente Cobol.
Este utilitário ajuda muito (jq), mas não é pratico para capturar o resultado ou então não estou a usar a melhor forma (output para um ficheiro de texto).

Gracias
Jose

[fastpho]

@Joseg, Una opcion puede ser por el control scriptControl , otra puede ser con el control JsonObject de Chilkat es free , implementando todo desde powercobol .
Ejemplo JsonObject

      INVOKE ChilkatJsonObject1 "LoadFile" USING "C:\archivojson.txt" RETURNING ReturnValue 
      display "resultado load:" , ReturnValue
      if ReturnValue not = 1 then
           INVOKE pow-self "DisplayMessage" USING "error"
           exit program
      end-if. 
     
      move  "Size" OF ChilkatJsonObject1 to CantidadOBJ.
     
      display "ChilkatJsonObject1 size:" , CantidadOBJ.
 
 
      INVOKE ChilkatJsonObject1 "SizeOfArray" USING "usuarios" RETURNING IndiceArray
      
      display "IndiceArray: " , IndiceArray.

Saludos