Pour revenir au sujet initial, voici un code COBOL que j'ai écrit il y a quelques années - lors d'une refonte sans specs, après la détermination du type de paiement :


IF TYPE-PAIEMENT-TIP...