SYS : intérêt d'une dtaara en qshell

Par exemple récupérer le résultat d'un grep dans une dtaara pour automatiser un traitement.

Un exemple qui parle bien, c'est savoir si un fichier a bien été transféré par, en fait lire le fichier STDOUT

Vous devez créer une dtaara alpha de 5 de long dans une bibliothèque autre que qtemp

STRQSH cmd('grep -c "226 Transfer OK" /QSYS.LIB/FTP.LIB/Qlogftp.FILE/test.MBR      |  datarea
 -w  /QSYS.LIB/FTP.lib/result.dtaara')   

Vous devez ensuite lire la dtaara par un rtvdtaara, en position 1 vous trouvez le nombre de fois que l'occurence a été rencontré, dans notre cas 0 ou 1

dcl &res *char 1

 RTVDTAARA DTAARA(RESULT (1 1)) RTNVAR(&RES)

if cond(&res = '0') then(do)

/* traitement envoi non effectué */

enddo