> Tech > Essayez vous-même

Essayez vous-même

Tech - Par Renaud ROSSET - Publié le 24 juin 2010

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

SIEM & PME : Comment construire la boîte noire de votre SI ?

SIEM & PME : Comment construire la boîte noire de votre SI ?

Passez à la cybersécurité proactive, transformez la collecte et l’analyse des logs en un bouclier dynamique contre les cybermenaces. Découvrez comment mettre en place une approche SIEM modulaire, évolutive et accessible, pour anticiper, détecter et réagir efficacement aux attaques.

Les plus consultés sur iTPro.fr

A lire aussi sur le site

À la une de la chaîne Tech