Voir le message plus bas concernant YAJLINTO
L'appel de web service et traitement des données est tout nouveau pour moi.
Dans mon programme j'ai défini
Code : Tout sélectionner
dcl-s profil varchar(200);
dcl-s url varchar(2000);
dcl-s response varchar(5000);
dcl-ds adresse;
access_token varchar(1000);
userName char(5);
departement char(2);
end-ds;
Code : Tout sélectionner
exec SQL
values
QSYS2.HTTP_POST(:url, :profil, :option) into :response;
{"access_token":"eyJhbGciOiJ…uyRa-Bfzax7s ","userName":"GDS71","departement":"71"}██
J'utilise data-into pour récupérer la valeur de access_token.
Code : Tout sélectionner
Data-into adresse %Data(response:'doc=string trim=all') %parser('JSONPARSE');
J'ai comme erreur et là je n'arrive pas à la comprendre
![Embarassed :oops:](./images/smilies/icon_redface.gif)
ID message . . . . . . : RNX0356
Message . . . . : Le document pour l'opération DATA-INTO ne correspond pas à la variable RPG ; code raison 1.
Cause . . . . . : Lors de l'analyse syntaxique d'un document pour l'opération DATA-INTO, l'analyseur syntaxique a détecté que le document ne correspond pas à la variable RPG "adresse", or, cela n'est pas autorisé par les options.
Code raison : 1. La sous-zone exacte pour laquelle l'erreur a été détectée est adresse. Les options sont "doc=string trim=all". Le nom du document est *N ; *N indique le document n'est pas un fichier externe.
L'analyseur syntaxique est 'JSONPARSE'. *N indique que l'analyseur syntaxique est un pointeur de procédure.
Pouvez-vous m'aider ?
Je vous en remercie d'avance.