Décalez de deux espaces les commandes à exécuter dans un groupe DO, y compris aux groupes V5R3 associés à DOUNTIL, DOWHILE et DOFOR. Si la commande DO est exécutée comme résultat d’un test (comme IF, ELSE, WHEN, OTHERWISE), décalez le groupe par rapport au test original. Cette manière de grouper
12. Pratiquer un retrait homogène.

les instructions montre plus clairement lesquelles appartiennent au groupe DO :
If (&Action = ‘A’) Do
Call PgmA
Enddo
Dofor &Int From(0) To(9)
Chgvar &Offset ((&Int * 10) + 1)
Chgvar &Outq (%Substring(&Dta &Offset 10))
Enddo
Décaler les commandes MONMSG du niveau commande par rapport à leur commande associée. Pour les groupes DO exécutés par les commandes MONLSG du niveau commande, déclarer les groupes par rapport à la commande MONMSG :
Rcvmsg Msgtype(*Last) Msg(&Msg)
MonMsg CPF0000
Quand une instruction IF a une instruction ELSE associée, aligner ELSE sur IF. Aligner ENDDO avec l’instruction initiale qui a commencé le groupe.
Téléchargez cette ressource

État des lieux de la sécurité cloud-native
L’État des lieux de la sécurité cloud-native vous offre une analyse complète des problématiques, des tendances et des priorités qui sous-tendent les pratiques de sécurité cloud-native dans le monde entier. Une lecture indispensable pour renforcer votre stratégie de sécurité dans le cloud. Une mine d’infos exclusives pour élaborer votre stratégie de sécurité cloud-native.
Les articles les plus consultés
Les plus consultés sur iTPro.fr
- Le Club EBIOS, une communauté dédiée à la gestion des risques autour de la méthode EBIOS
- La difficile mise en conformité avec les réglementations pour les entreprises françaises
- Les risques liés à l’essor fulgurant de l’IA générative
- Pourquoi est-il temps de repenser la gestion des vulnérabilités ?
- Reporting RSE : un levier d’innovation !
