Comme si dessous avec l'exemple sur le célèbre fichier hello1 de la bibliothèque CGIDEV2 en RPG ILE format FREE

Vous pouvez récupérer l'outil CRTVARALL à l'adresse as400.fr qui le fera pour vous.

/Free                                   
 //                                     
          Begsr SETVAR ;                
 //                                     
 // filing all variables                
 // clear all HTM output                
 //                                     
 updHTMLvar('FIRSTNAME':FIRSTNAME:'0') ;
 updHTMLvar('LASTNAME':LASTNAME) ;      
 updHTMLvar('OSRLS':OSRLS) ;            
 //                                     
          Endsr ;                       
 //                                     
/End-Free                               

PLB