créer um mebre de PDS en REXX [Résolu]

[qqoos]

bonjour,

Dans un programme REXX, je voudrais créer un membre dans un PDS déjà existant.

ex: mon.pds(mbr1)

j'ai un trou de mémoire !!

[gilgeorg]

Bonjour,

la réponse est simple en effet :

renseigner le stem In. avec les données à écrire

Code :

1
2
3
4
5
6
7
"ALLOC DD(DDOUT) DSN(mon.pds(mbr)) SHR"      
                                                             
"EXECIO * Diskw DDOUT (STEM In. Finis"                       
IF Rc > 0 Then Do                                            
   Return 88 /*ALLOCATION Fichier En Sortie Impossible  */   
END                                                          
"FREE  DD(DDOUT)"

Gilles