Discussion :

[sam01]

Bonjour à tous,

j'aimerais mettre un volume DISNEW par batch ISMF, mais j'ai le message d'erreur suivante :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
- Session £ 1 -------------------------------------------------------       
- ACBQVAI1 SCDS('SMSX.SCDS2.SCDS') SG(SXDB) VOL(XDU001) FROM() TO() SUF()
  TYPE() STATUSALL(DISNEW) STATUS() UPDHLVLSCDS() ADDVOL                    
- ACBQVAI1 SCDS('SMSX.SCDS2.SCDS') SG(SXDB) VOL(XDU001) FROM() TO() SUF()
  TYPE() STATUSALL(DISNEW) STATUS() UPDHLVLSCDS() ADDVOL                    
- ACBQVAI1 SCDS('SMSX.SCDS2.SCDS') SG(SXDB) VOL(XDU001) FROM() TO() SUF()
  TYPE() STATUSALL(DISNEW) STATUS() UPDHLVLSCDS() ADDVOL                    
- SMSX.SCDS2.SCDS; APPLICATION(DGT6 - SG)                                   
- XDU001 already exists in the specified CDS                                
- APPLICATION(DGT6 - SG); FUNCTION(VOLUME)                                  
- SMSX.SCDS2.SCDS                                                           
- RETURN CODE(0008); REASON CODE(3265)                                      
- Session £ 1 -------------------------------------------------------

c'est le deuxième step qui plante en code 08

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
22
23
24
//XX40DISN JOB (S),MSGCLASS=X,CLASS=O                                                     
//ADDVOL1 EXEC ACBJBAOB,                                               
//        PLIB1='SYS1.DGTPLIB'                                         
//SYSUDUMP DD  SYSOUT=*                                                
//TEMPFILE  DD  DSN=&&VOLADDS,DISP=(NEW,KEEP),                         
//  SPACE=(CYL,(15,15)),LRECL=300,RECFM=F,BLKSIZE=300                  
//SYSTSIN  DD *                                                        
PROFILE PREFIX(XX003X2)                                                
ISPSTART CMD(ACBQBAI9) +                                               
BATSCRW(132) BATSCRD(27) BREDIMAX(3) BDISPMAX(99999999)                
/*                                                                     
//VOLADD  DD  *                                                        
UPDHLVLSCDS()                                                          
SCDSNAME('SMSX.SCDS2.SCDS') VOL(XDU001) SG(SXDB) STATUSALL(DISNEW)  
/*                                                                     
//VOLALT  DD  *                                                        
/*                                                                     
/*                                                
//ADDVOL2 EXEC ACBJBAOB,                          
//        PLIB1='SYS1.DGTPLIB'                    
//SYSUDUMP DD  SYSOUT=*                           
//SYSTSIN  DD DSN=&&VOLADDS,DISP=(OLD,DELETE)     
//***********************************************

[bernard59139]

un début de réponse https://www.ibm.com/support/knowledg...s200/s2141.htm

Il faut passer par le ddname VOLALT. La syntaxe ressemble, mais je suis plus dans le métier "disque", donc, à à vérifier!!
Dans la sys1.samplib, il y a un membre qui donne toutes les info nécessaires.
a+