Il existe plusieurs méthodes pour faire du CSV, la solution la plus connue est la commande CPYTOIMPF.
Les procédures SQL peuvent offrir une alternative intéressante dans certains cas, voici un exemple.
Cette exemple utilise « Dynamic Compound Statement » avec la procédure QSYS2.IFS_WRITE_UTF8
quauoopt est le fichier des options PDM
BEGIN
— Génération fichier + entête
CALL QSYS2.IFS_WRITE_UTF8(PATH_NAME =>’/tmp/qauoopt.csv’,
LINE => ‘Option;Commande’,
OVERWRITE => ‘REPLACE’,
END_OF_LINE => ‘NONE’);
— Boucle de traitement des lignes
FOR SELECT option concat ‘;’ concat command as TEXTE From QGPL.QUAUOOPT DO
CALL QSYS2.IFS_WRITE_UTF8(PATH_NAME => ‘/tmp/qauoopt.csv’,
LINE => TEXTE);
END FOR;
END
Remarque :
Cette solution ne peut pas s’appliquer partout , en effet un « ; » dans une zone pourrait poser un problème à la lecture.
A l’inverse vous pouvez ajouter des instructions comme dans la fichiers XLS par exemple.
Il y a plusieurs procédures qui vous permettent de gérer l’IFS, et ca nous simplifie la tache.
pour retrouver les informations sur SQL services, https://www.ibm.com/support/pages/ibm-i-services-sql