Discussion :

[zukir]

Bonjour

J'aimerais pouvoir, dans mon programme Cobol BATCH lancé via un JCL, lire tous les membres d'un PDS (liste donnée dans un fichier en entrée).

Existe-t-il des routines ou sous-programmes système qui permettent de faire cette action ? A défaut, connaissez-vous les modules qui permettent de faire des appels à des sous-routines EARL ou REXX dans un pgm COBOL ?

Merci pour votre aide
cdt

[zukir]

bonjour

Ne cherchez plus , j'ai trouvé la reponse dans la Doc IBM

Dans mon cas, il suffit de faire appel a un sous routine C qui est implementée sous MVS .

le sous programme s'appel PUTENV , le pgm cobol appelant doit etre en option de compile CBL NODYNAM

PUTENV positionne une variable d'environnement et on peut affecter cette adresse pour l'ouverture du fichier en dynamique sans avoir a le declarer dans le JCL via un DD.

si vous êtes interessés par la methode je posterai un bout de mon code .

Merci tout de meme d'avoir cherché .

a+

[lolowiko]

J'ai ceci à vous proposer également

http://www.grandsysteme.com/ALLOCATI...EN%20COBOL.htm

Cdt

[zukir]

merci ... mais ton liens semble Hs ... mais je ne connaissais pas le site qui est pas mal fait ...

merci tout de meme de l'info