Discussion :

[sam01]

Bonjour à tous,

lorsque je lance un job par un REXX, j'ai de temps en temps le message suivant :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
ISPSTART CMD(%REXX01) 
ISPF system data set allocation error - press Enter to continue. 
Temporary control card data set cannot be allocated. 
Data set 'USER.SPFTEMP1.CNTL' in use by another user, try later. 
PROBLEME DE SOUMISSION DU JCL DU SQUELETTE 
ISPD117 
The initially invoked CLIST ended with a return code = 8 
NULLFILE was preallocated (no free was done). 
READY 
END

Je dois me déloguer pour pouvoir exécuter mon rexx.

Voici comment je lance mon REXX :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
//REXX  EXEC PGM=IKJEFT01,DYNAMNBR=100,REGION=4M    
//SYSTSIN  DD  *                                       
PROFILE NOPREFIX                                       
ISPSTART CMD(%REXX01)                                
//SYSPROC  DD DSN=ISP.V1R12M0.SISPCLIB,DISP=SHR        
//SYSEXEC  DD  DISP=SHR,DSN=&REXX                      
//SYSTSPRT DD  SYSOUT=*                                
//ISPPROF  DD  DSN=&&PROF,DISP=(NEW,PASS),             
//     DCB=(LRECL=80,BLKSIZE=6160,RECFM=FB),    
//     SPACE=(TRK,(2,1,2)),UNIT=VIO             
//ISPMLIB  DD  DSN=ISP.V1R12M0.SISPMENU,DISP=SHR
//ISPSLIB  DD  DSN=ISP.V1R12M0.SISPSENU,DISP=SHR
//         DD  DSN=URET.SKELS,DISP=SHR          
//ISPPLIB  DD  DSN=ISP.V1R12M0.SISPPENU,DISP=SHR
//ISPTLIB  DD  DSN=ISP.V1R12M0.SISPTENU,DISP=SHR
//SYSTSPRT DD  SYSOUT=*                         
//SYSTERM  DD  SYSOUT=*                         
//SYSABEND DD  SYSOUT=*                         
//ISPLOG DD SYSOUT=*,                           
// LRECL=120,BLKSIZE=2400,DSORG=PS,RECFM=FB

Merci d'avance pour votre aide.

[bernard59139]

ajoute ceci dans le jcl

Code :

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

1
2
//ISPCTL1  DD  DISP=NEW,UNIT=VIO,SPACE=(TRK,(1,1)), 
//         DCB=(LRECL=80,BLKSIZE=800,RECFM=FB)

bonne journée

[sam01]

Bonjour bernard59139,

merci pour ton aide.

Je te ferai un retour car le problème est aléatoire.

[bernard59139]

aléatoire, non, je n'y crois pas du tout.