Pour prendre des exemples de files d'attente de données et les
programmes pour effectuer un test, créez les files d'attente en entrant les
commandes ci-dessus. Ensuite, copiez le code de cet article sur l'AS/400 ou
téléchargez-le à l'adresse http://www.news400.com. Utilisez les commandes suivantes
pour créer les programmes :
Essayez vous-même
CRTBNDRPG PGM(RPGISCOOL/DTAQCL) +
SRCFILE(RPGISCOOL/APISRC)
CRTBNDRPG PGM(RPGISCOOL/DTAQSR) +
SRCFILE(RPGISCOOL/APISRC)
Utilisez les commandes suivantes pour exécuter les programmes :
SBMJOB CMD(CALL PGM(RPGISCOOL/DTAQSR))
CALL PGM(RPGISCOOL/DTAQCL)
Si tout se passe comme prévu, la réponse suivante s’affichera :
Hello Client 075608, thanks for calling
Cet article
est extrait du Redbook Who Knew You Could Do That with RPG IV? (SG24-5402),
copyright IBM. Utilisé avec autorisation.
Téléchargez cette ressource
Préparer l’entreprise aux technologies interconnectées
Avec la « quatrième révolution industrielle », les environnements hyperconnectés entraînent de nouveaux risques en matière de sécurité. Découvrez, dans ce guide Kaspersky, comment faire face à cette nouvelle ère de vulnérabilité.
Les articles les plus consultés
Les plus consultés sur iTPro.fr
- Baromètre de la Transformation digitale 2024 en France
- Le secteur financier reste dans la ligne de mire des cyberattaquants
- CyberPatriot ®, le SOC de dernière génération de CHEOPS TECHNOLOGY
- L’IA comme levier d’évangélisation du COMEX à la cybersécurité
- Intégration et utilisation de l’IA en 3 conseils clés