Récupération d'un Result Set
19 Février 2017 , Rédigé par Pam007 Publié dans #SqlRpg
// Voir fmr050 **freectl-opt option(*srcstmt :*nodebugio) actgrp(‘MILAN’) ; dcl-ds enregw; mois packed(2) ; code packed(8) ; codcli char(8) ;end-ds ; dcl-ds nullw int(5) dim(3) ; dcl-s mylocator sqltype(result_set_locator) ; exec sql call fmr050(7) ;...
Fonction & Result Set
17 Février 2017 , Rédigé par Pam007 Publié dans #Sql
create or replace function milan/fmr040 (p_mois dec(2))returns table (mois dec(2), code dec(8), codcli char(8))specific milan/fmr040return select t1.mois, t1.code, t2.codcli from fmr015p as t0 join fichier2 as t2 on t0.codcli = t2.codcli join fichier1...
Procédure & Result Set
15 Février 2017 , Rédigé par Pam007 Publié dans #Sql
create or replace procedure milan/fmr050 (in p_mois dec(2))specific milan/fmr050dynamic result sets 1set option dbgview = *source b1:begindeclare c1 cursor with return for select t1.mois, t1.code, t2.codcli from fmr015p as t0 join fichier2 as t2 on t0.codcli...
/image%2F1025633%2F20151122%2Fob_b0e74c_pam007i.png)