| 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 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
|