Le script SQL ci-dessous permet d'appeler un programme de type SRVPGM en SQL:
Code : Tout sélectionner
drop FUNCTION CIF_NUM1;                   
CREATE FUNCTION CIF_NUM1 (                
                               char( 2)       
                             , char( 2)       
                             , char(10)       
                              , char(10)         
                              , char(30)         
                              , char( 1)         
                              , char(10)         
                              , char(10)         
                              , numeric(14, 0)   
                              , numeric(14, 0)   
                              )                  
                     RETURNS    numeric(14, 0)   
 EXTERNAL NAME 'CIF_NUM1(CIF_NUM1)'          
 LANGUAGE RPGLE PARAMETER STYLE                  
 general RETURNS NULL ON NULL INPUT              
 MODIFIES SQL DATA                               
 not fenced;                             Mais dans mon programme RPG les 4 derniers paramètres sont déclarés comme non obligatoire:
Code : Tout sélectionner
yy_lsys                       10    const options(*nopass)
yy_lbib                       10    const options(*nopass)
yy_nmin                       14s 0 const options(*nopass)
yy_nmax                       14s 0 const options(*nopass)   Merci d'avance