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 gratuitement cette ressource
HP Elite Slice G2 : optimisez la collaboration… et votre budget !
Téléchargez cette étude Forrester et découvrez comment booster la collaboration tout en dégageant un excellent R.O.I grâce au système de vidéoconférence HP Elite Slice G2 avec Microsoft Teams !
Les articles les plus consultés
A travers cette chaîne
A travers ITPro
