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

12. Pratiquer un retrait homogène.

Tech - Par iTPro - Publié le 24 juin 2010
email

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 gratuitement cette ressource

Guide de Services Cloud Managés

Guide de Services Cloud Managés

Accélérer votre transformation digitale, protéger et sécuriser vos environnements Cloud avec les offres de support, d'accompagnement et de services managés. Découvrez le TOP 3 des Services Managés pour accompagner la transformation de vos environnements Cloud, gagner en agilité et en sécurité dans un monde d'incertitudes.

Tech - Par iTPro - Publié le 24 juin 2010