RPGLE comment écrire un nom de zone de se type content-Type

[BrigitteG]

Bonjour,

Est-il possible d'écrire un nom de zone sous forme content-Type en rpgle ?

Code : Tout sélectionner

 Dcl-ds GetAccess Qualified Inz;
     Dcl-ds headers;
         Content-Type char(500);
     end-ds;
    sslCertificateStoreFile char(1000);
    sslCertificateStorePassword char(20);
    signalErrors  char(20);
end-ds;

J'ai essayé en mettant des " ou des ' mais j'ai toujours une erreur.

c'est pour être utilisé dans un DATA-GEN.

Merci pour votre aide

[nbonnet]

Bonjour,

je pense qu'il faut faire plus simple :

Code : Tout sélectionner

json_object('header'      value 'content-type,application/json')

[BrigitteG]

Merci,

C'est ce que j'ai fait en premier, mais je voulais utiliser data-gen.

Je vais rester avec le value json_object.

[Hurri]

Bonjour,

Un peu en retard sur le coup, je pense que tu peux solutionner ton problème grâce à une astuce que Scott Klement avait fourni. Je reprend d'ailleurs le contenu du document que tu pourrais trouver à cette adresse.

Code : Tout sélectionner

dcl-ds address qualified;
  name varchar(13);
  name_name varchar(30) inz('customer name');
  street varchar(30);
  name_street varchar(14) inz('street address');
  city varchar(20);
  state char(2);
  postal varchar(10);
end-ds;

data-gen invoice %data(MyFile: 'doc=file renameprefix=name_ ') %gen('YAJLDTAGEN');

Comme tu peux le voir les valeurs "customer name" ou "street address" ne pouvaient figurer car contenant un blanc.
Il suffit de donner un nom unique commençant par name_ de remplir avec inz('Nom du champ') le nom qui sera utilisé pour le json, et enfin de préciser l'option de renommage de tout ce qui est préfixé avec name_