PB utilisation REXX par appel COBOL

icalinf · 26/10/2007, 11h48

Bonjour,

J'ai le cas suivant :

Un EXIT linké en LINKLIST appel un programme développé en REXX qui de ce fait, doit aussi être compilé en LINKLIST. Ce programme REXX doit contenir des ordres TDO et ISPF.

Comment puis-je adresser les espaces adresse pour TSO et ISPSTART pour ce REXX?

Merci à tous

Benouze · 26/10/2007, 17h40

Bonjour,

Cette section du forum est réservée à l'aide aux nouveaux concernant l'utilisation du forum.
Pour les questions techniques il faut poster dans les sections correspondantes.
Je n'ai rien compris à ta question mais peut-être auras-tu plus de chances de trouver des réponses en posant ta question ici :
http://www.developpez.net/forums/f27/autres-langages/autres-langages/

A+

Luc Orient · 26/10/2007, 21h55

Citation:

Envoyé par Benouze

... Je n'ai rien compris à ta question mais peut-être auras-tu plus de chances de trouver des réponses en posant ta question ici :
http://www.developpez.net/forums/forumdisplay.php?f=27

ça c'est du mainframe IBM ... donc plus z/OS que strictement COBOL ...

donc ici je dirais :
Forum MVS

SPACHFR · 29/10/2007, 10h54

Salut,

Il faut coder dans ton rexx l'espace adresse aux quels tu t'adresses...

ex:

Address TSO

ou
Address ISPEXEC

Pour allouer un fichier via l'espace address TSO/E:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
address tso
 "alloc fi(sysexec) da(’schoen.rexx’) shr"
 "myexec"

La commande "address" est assez compléte, regardes le référence guide Rexx
sur le site IBM

référence : http://www.elink.ibmlink.ibm.com/pub...X&PBL=SA227790

User guide :
http://www.elink.ibmlink.ibm.com/pub...X&PBL=SA227791

Homer-ac · 13/11/2007, 17h02

Si c'est du TSO, pas de problème, ISPF est starté,
En Batch, il faut passer par un ISPSTART ISPF avec tout le cortège des lib ISPxLIB à mettre en ligne.
Je dois avoir mis dans un coin un exemple de COBOL Batch qui appelle un REXX. Je ferai des recherches si ça peut intéresser qqun. Un piège toutefois que je n'ai pas été fichu de résoudre, le REXX appelé en batch peut très bien passer des cdes ISPF mais le pool fonctions ISPF est réinitialisé après chaque appel ce qui interdit ou limite certaines commandes. Il faut passer par des ISPEXEC VPUT shared ou profile pour gérer les communications.
nb. Il existe des exemples COBOL de ce type en z/OS dans la SAMPLIB COBOL mais les 3/4 du code sont inutiles, ce qui n'en facilite pas la lecture.

26/10/2007, 11h48	#1
icalinf Invité de passage Inscription : octobre 2007 Messages : 3 Détails du profil Informations personnelles : Localisation : France, Hérault (Languedoc Roussillon) Informations forums : Inscription : octobre 2007 Messages : 3 Points : 0 Points : 0	PB utilisation REXX par appel COBOL Bonjour, J'ai le cas suivant : Un EXIT linké en LINKLIST appel un programme développé en REXX qui de ce fait, doit aussi être compilé en LINKLIST. Ce programme REXX doit contenir des ordres TDO et ISPF. Comment puis-je adresser les espaces adresse pour TSO et ISPSTART pour ce REXX? Merci à tous
	00

26/10/2007, 17h40	#2
Benouze Membre confirmé Inscription : avril 2006 Messages : 208 Détails du profil Informations forums : Inscription : avril 2006 Messages : 208 Points : 224 Points : 224	Bonjour, Cette section du forum est réservée à l'aide aux nouveaux concernant l'utilisation du forum. Pour les questions techniques il faut poster dans les sections correspondantes. Je n'ai rien compris à ta question mais peut-être auras-tu plus de chances de trouver des réponses en posant ta question ici : http://www.developpez.net/forums/f27/autres-langages/autres-langages/ A+
	00

13/11/2007, 17h02	#5
Homer-ac Membre expérimenté Inscription : octobre 2007 Messages : 449 Détails du profil Informations personnelles : Localisation : France Informations forums : Inscription : octobre 2007 Messages : 449 Points : 518 Points : 518	Si c'est du TSO, pas de problème, ISPF est starté, En Batch, il faut passer par un ISPSTART ISPF avec tout le cortège des lib ISPxLIB à mettre en ligne. Je dois avoir mis dans un coin un exemple de COBOL Batch qui appelle un REXX. Je ferai des recherches si ça peut intéresser qqun. Un piège toutefois que je n'ai pas été fichu de résoudre, le REXX appelé en batch peut très bien passer des cdes ISPF mais le pool fonctions ISPF est réinitialisé après chaque appel ce qui interdit ou limite certaines commandes. Il faut passer par des ISPEXEC VPUT shared ou profile pour gérer les communications. nb. Il existe des exemples COBOL de ce type en z/OS dans la SAMPLIB COBOL mais les 3/4 du code sont inutiles, ce qui n'en facilite pas la lecture.
	00

Outils de la discussion
Afficher une version imprimable Envoyer un lien vers cette page par email