J'ai une question qui pourrait intéresser plusieurs personnes:
Il fut un temps où l'espace disque était restreint.
Pour gagner de la place nous avons mis dans une zone ALPHA un tableau de mini zones packées . (par exemple une zone de 6 & pouvait contenir un tableau de 3 zones numériques packées de 3.0)
Est t il possible de découper ces zones packées (toutes de même longueur) en zones individuelles par une requette sql , et le transferer par Client access.
NB: nous sommes encore en version V5R3 de l'os/400 ?
1 /cast( substr(zone , debut , lg) as decimal(7 , 2) ) en pur SQL
2/ une fonction RPG dans un programme de service, qui "dépacte" , via une DS par exemple, et enregistrée en tant que fonction SQL par quelque chose comme :
CREATE FUNCTION mabib/EXTRACTCAR (ZONE CHAR(50), NUMERO INTEGER )
RETURNS DEC(7 , 2)
EXTERNAL NAME 'MABIB/EXTRACTCAR(EXTRACTCAR)'
PARAMETER STYLE GENERAL
RETURNS NULL ON NULL INPUT ;
