Précédent   Forum des professionnels en informatique > Systèmes > Autres systèmes > z/OS
z/OS Forum d'entraide sur z/OS et MVS (Multiple Virtual Storage), les systèmes d'exploitation des ordinateurs « mainframes » IBM : JCL, Tso, Ispf, Vsam, Racf, SMS, Cics, Ims, OPC, Ca-7, Control-M, Dialog Manager ...
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 12/12/2011, 17h10   #1
Membre confirmé
 
Inscription : mars 2004
Messages : 1 187
Détails du profil
Informations forums :
Inscription : mars 2004
Messages : 1 187
Points : 233
Points : 233
Par défaut forcer un code retour

Bonjour à tous,

est-il possible de forcer le code retour d'un programme quelconque PGM=TITI avec la commande SET MAXCC ?

Pour l'instant, je ne l'utilise que pour IDCAMS...

Est-ce valable pour les autres programmes ?

Merci d'avance pour vote réponse.
sam01 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 12/12/2011, 18h49   #2
Membre chevronné
 
Avatar de bernard59139
 
Administrateur de base de données
Inscription : octobre 2006
Messages : 503
Détails du profil
Informations personnelles :
Localisation : France

Informations professionnelles :
Activité : Administrateur de base de données

Informations forums :
Inscription : octobre 2006
Messages : 503
Points : 688
Points : 688
Sauf si c'est prévu, il est impossible de forcer le Rc d'un programme.

IDCAMS, c'est prévu.
Il y a aussi ADRDSSU qui permet cela, syntaxe à vérifier.
a+
bernard59139 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 13/12/2011, 10h16   #3
Membre confirmé
 
Inscription : mars 2004
Messages : 1 187
Détails du profil
Informations forums :
Inscription : mars 2004
Messages : 1 187
Points : 233
Points : 233
Bonjour bernard59139 et merci pour ta réponse.

Existe-t'il alors un programme qui génère des code retour ?

J'aimerais par exemple provoquer un code retour 12 si le step précédent fait un code 8 ?

En réalité, mon souci est le suivant :

j'ai un job avec plusieurs steps. Certains steps font des code 8 qui doivent faire planter la chaîne sur TWS et d'autres steps font des codes 8 qui ne doivent pas faire planter la chaîne....
sam01 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 14/12/2011, 04h49   #4
Membre chevronné
 
Avatar de bernard59139
 
Administrateur de base de données
Inscription : octobre 2006
Messages : 503
Détails du profil
Informations personnelles :
Localisation : France

Informations professionnelles :
Activité : Administrateur de base de données

Informations forums :
Inscription : octobre 2006
Messages : 503
Points : 688
Points : 688
bonjour

Tu devras te faire un step d'erreur dont l'exécution sera conditionnée sur le résultat des steps précédents.
exemple:
Code :
1
2
3
4
5
6
7
//S1 EXEC PGM=TOTO
/*
//STEPERR EXEC PGM=IDCAMS,COND=(0,NE) 
//SYSPRINT DD SYSOUT=*
//SYSIN      DD *
  SET MAXCC=12
/*
bernard59139 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 14/12/2011, 09h29   #5
Membre confirmé
 
Inscription : mars 2004
Messages : 1 187
Détails du profil
Informations forums :
Inscription : mars 2004
Messages : 1 187
Points : 233
Points : 233
OK, merci pour ton aide.

C'est simple mais efficace
sam01 est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 03h12.


 
 
 
 
Partenaires

Hébergement Web