Page 1 sur 1

HTTPGetCLOB et RPG

Posté : lun. 25 janv. 2016, 16:50:24
par Lundi400
Bonjour

L'exécution de l'instruction SQL suivante se déroule sans problème sous iSeries Navigator :

Code : Tout sélectionner

Values SYSTOOLS.HTTPGETCLOB('http://www.volubis.fr' ,'') ;
J'essaie d'utiliser dans un programme RPG ces fonctions HTTPGetCLOB avec la syntaxe :

Code : Tout sélectionner

 D sqlres          s                   sqltype(CLOB :10000)

Exec SQL
Select                                           
SYSTOOLS/HTTPGETCLOB('http://www.volubis.fr' ,'')
into :sqlRes                  
From SYSIBM/SYSDUMMY1; 
SQL me renvoie l'erreur -302 (Conversion error on host variable)

Quelle syntaxe ou déclaration dois-je utiliser ?

Merci pour votre aide

CCSID

Posté : lun. 25 janv. 2016, 17:12:02
par cmasse
Chez moi ce source compil ET fonctionne

Code : Tout sélectionner

**FREE
    dcl-s  sqlres sqltype(CLOB :10000);
    dcl-s msg char(50);
Exec SQL
 VALUES
   SYSTOOLS.HTTPGETCLOB('http://www.volubis.fr' ,'')
   into :sqlRes ;
 msg = %subst(sqlres_data : 1 : 50);
 dsply msg;
*INLR = *on;            

CCSID à 65535 ? si oui CHGJOB CCSID(297) avant de lancer le PGM.

Posté : lun. 25 janv. 2016, 17:46:02
par Lundi400
FORMIDABLE :lol:

Ca marche

Un grand merci