Une analyse QUERY est un composant AS400 un peu obsolète, et peu maintenable.

Il est souvent plus intéressant (et plus standard) de gérer cette analyse au format SQL.

C'est à ce moment que la commande RTVQMQRY intervient. Celle ci permet de convertir une définition QUERY en requète SQL.

La commande suivante va créer un membre source appelé MONQRY dans QSQLSRC. 

RTVQMQRY QMQRY(QGPL/MONQRY) SRCFILE(QTEMP/QSQLSRC) ALWQRYDFN(*YES) 
 

Ce membre va contenir les informations suivantes :

H QM4 05 Q 01 E V W E R 01 03 09/02/09 09:50                              
V 1001 050 liste de tous les fic minitel à epurer                         
V 5001 004 *HEX                                                           
SELECT                                                                    
  ALL       MBLIB, MBFILE, MBFTYP, MBTXT, MBMXRL, MBNRCD, MBNDTR, MBDSZ2  
  FROM      QGPL/OBJ T01                                            
  WHERE     MBFTYP = 'P'                                                  
  ORDER BY  MBLIB ASC, MBFILE ASC                                         
 

Pour l'exemple, les 3 premières lignes sont du bruit et peuvent être supprimées.

 Cet article vous a été utile, n'hésitez pas à le partager.