> Tech > 12. Pratiquer un retrait homogène.

12. Pratiquer un retrait homogène.

Tech - Par Renaud ROSSET - Publié le 24 juin 2010

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

Mac en entreprise : le levier d’un poste de travail moderne

Mac en entreprise : le levier d’un poste de travail moderne

Ce livre blanc répond aux 9 questions clés des entreprises sur l’intégration du Mac : sécurité, compatibilité, gestion, productivité, coûts, attractivité talents, RSE et IA, et l’accompagnement sur mesure proposé par inmac wstore.