Discussion :

[rataos]

Bonjour,
Existe-t-il une instruction en COBOL qui permet de mettre un programme COBOL en attente.
J'ai un programme qui fait une boucle et je voudrait qu'il s'arrete 20 secondes entre chaque boucle.


Merci

[Luc Orient]

... Existe-t-il une instruction en COBOL qui permet de mettre un programme COBOL en attente ...

Je ne pense pas qu'une telle instruction existe en COBOL.
A mon avis, il faut passer par une primitive du système d'exploitation.
Quel est le votre ?

[Hédhili Jaïdane]

Bonjour,
Existe-t-il une instruction en COBOL qui permet de mettre un programme COBOL en attente.
J'ai un programme qui fait une boucle et je voudrait qu'il s'arrete 20 secondes entre chaque boucle.


Merci

Pour AS400-iSeries : à ma connaissance : non, mais il y a des astuces. Entre autres, tu peux faire un petit pgm CL qui exécute la commande DLYJOB DLY(20) et dans le pgm Cobol tu fais un CALL au programme CL. Bien entendu, tu peux faire en sorte que ton pgm CL soit un peu plus généraliste pour attendre un intervalle de temps ou une heure précise en lui passant des paramètres comme le type d'attente et sa valeur.

Pour les autres OS, je rejoins Luc. Il faut appel à l'OS via un s/pgm ou une API.

Cordialement
Hédhili Jaïdane