L’utilisation de RPG pour la programmation Web présente un avantage important (entre autres) : une bonne partie de la logique est similaire à celle de l’écran vert, car la plupart des fonctions sont essentiellement les mêmes, mais exécutées dans un ordre différent. J’ai donc agi logiquement : j’ai pris
Le programme de saisie de commandes (Order Entry)
une copie du programme de saisie de commandes existant et je l’ai modifié. Les principaux changements logiques sont les suivants :
- Supprimer toutes les références au fichier écran et toute logique de bouclage concernant l’affichage et l’entrée d’un écran.
- Diviser le traitement d’un écran (désormais une page) en deux procédures : une pour l’entrée et une pour la sortie (par exemple la sous-procédure EditHeader() originale est devenue EditHeader() et DisplayPage2().
- Ajouter la logique chargée de traiter la persistance (ou l’information d’état) pour chaque navigateur demandeur.
- Inclure le code CGIDEV2 pour charger un document HTML (en utilisant GetHTMLIFS()), extraire les valeurs de variables (en utilisant ZhbGetInput() et ZhbGetVar()), mettre à jour les valeurs de variables sur une page Web (en utilisant UpdHTMLVar()) et écrire des sections d’une page Web (en utilisant wrtSection()). La figure 7 montre une partie des D-specs et la ligne directrice du programme de saisie de commandes ACMECGIR4.
La structure de données (en A) contient l’information d’état pour la commande courante. Elle est mappée (en utilisant le pointeur basing) à l’élément approprié de la matrice orders dans l’espace utilisateur ORDERS. Le programme détermine quelle page a fait la demande (en B), extrait le numéro ID (index) et l’ID (tampon horodateur) de la page demandeuse (en C), puis libère l’information d’état si la commande est annulée (en D).
Ensuite, en utilisant le numéro ID et l’ID extraits, il mappe la structure de données à l’élément approprié de la matrice orders dans l’espace utilisateur ORDERS (en E). Enfin, il extrait et traite les données pour la page demandeuse (en F), place le numéro ID et l’ID sur la page suivante (en G), puis définit et affiche la page suivante (en H). Pour installer et exécuter cet exemple, procédez ainsi :
- Téléchargez et installez CGIDEV2 à partir du site IBM ou de Easy400.
- Restaurez la bibliothèque RPGWEB à partir du fichier de sauvegarde RPGWEB1.
- Restaurez le répertoire acmecgi à partir du fichier de sauvegarde RPGWEB2.
- Assurez-vous que QTMHHTTP et QTMHHTTP1 ont accès à la bibliothèque RPGWEB et au répertoire acmecgi.
- Configurez un serveur HTTP avec une directive CGI pour la bibliothèque RPGWEB.
Téléchargez cette ressource
Guide de technologie 5G pour l’entreprise
Pourquoi la 5G est-elle faite pour votre entreprise ? La 5G peut améliorer la vitesse, la fiabilité et la capacité de votre réseau, permettant ainsi une meilleure collaboration, une productivité accrue et une prise de décision plus rapide. Notre livre blanc " The Big Book of Enterprise 5G" vous fournit les informations stratégiques dont vous avez besoin pour prendre des décisions éclairées et préparer votre entreprise à prospérer dans l'ère de la 5G. Cradlepoint, part of Ericsson est le leader mondial des solutions de réseau sans fil 4G LTE et 5G fournies via le cloud. Connectez vos employés, lieux et objets avec la 4G LTE et la 5G pour un WAN sans fil d'entreprise.
Les articles les plus consultés
A travers cette chaîne
A travers ITPro
