> Tech > Réaménagement de 101 (3)

Réaménagement de 101 (3)

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

Les composants qui constituent la vue et le contrôleur sont en place. Le moment est venu de construire le modèle chargé de contrôler le traitement. C'est le rôle du programme City002 (figure 13). Il utilise une approche « finite state machine » pour traiter les cinq étapes identifiées précédemment. Autrement

dit, le programme boucle
dans une logique qui détermine l’état
de traitement courant et exécute un
bloc de code approprié.

En A dans la section définitions, je
définis une constante pour représenter
chacun des états possibles. A n’importe
quel moment, le programme doit travailler
sur l’une de ces étapes. Le champ
CurrentStep détermine l’étape sur laquelle
le programme travaille à  cet instant.
Le traitement commence par définir
l’étape courante pour qu’elle
ordonne au programme de demander
une abréviation d’état. Le programme
fait alors une boucle dans un bloc Select
jusqu’à  ce que l’état ordonne au programme
de sortir (CurrentStep =
StepExit). Le bloc Select contient une
section pour chacune des quatre étapes
de traitement. A la fin de chacune de ces
sections, le programme définit la valeur
de CurrentStep pour contrôler la section section
du bloc Select qui s’exécutera au
prochain passage dans la boucle.

Après quelques détails liés à  la compilation,
nous en aurons fini avec la nouvelle
application. Tout d’abord, il nous
faudra un répertoire de liaison nommé
AppBndDir. Après avoir compilé les
programmes de service, vous ajouterez
une entrée pour chacun d’eux à  ce répertoire
de liaison. Vous compilerez les
programmes de service pour exécution
dans le groupe d’activation de l’appelant
en spécifiant ActGrp(*New) sur la
commande CrtSrvPgm (Create Service
Program). Certaines des procédures
présentes dans les programmes de service
ouvrent des fichiers, mais pour des
raisons de performances elles ne les ferment
pas à  chaque passage dans la procédure.
Pour être certain que le système
se débarrassera de ces ressources à  la
fin, il faut compiler le programme
City002 pour exécution dans un nouveau
groupe d’activation, en spécifiant
ActGrp(*New) sur la commande
CrtPgm (Create Program). Quand
City002 se termine, le groupe d’activation
se termine lui aussi et le système libère
des ressources.

Téléchargez gratuitement cette ressource

IBMi et Cloud : Table ronde Digitale

IBMi et Cloud : Table ronde Digitale

Comment faire évoluer son patrimoine IBMi en le rendant Cloud compatible ? Comment capitaliser sur des bases saines pour un avenir serein ? Faites le point et partagez l'expertise Hardis Group et IBM aux côtés de Florence Devambez, DSI d'Albingia.

Tech - Par iTPro - Publié le 24 juin 2010