CSQ1MSTR - REPLY DEVICE NAME OR 'CANCEL'

Todo lo relacionado con la web desde un mainframe,conectividad,J2EE
tatindgp
Colaborador
Colaborador
Mensajes: 141
Registrado: 25 Feb 2008, 15:09
País: Argentina
Ciudad: Buenos Aires
Ocupación: Analista de desarrollo
Ubicación: BsAS Argentina

Re: CSQ1MSTR - REPLY DEVICE NAME OR 'CANCEL'

Mensaje por tatindgp » 10 Dic 2011, 17:46

LuisFer,
El Jcl que encontre para armar el mio, el cual no me di cuenta y perdi. ¿serias tan amable de indicarme que dejo y que quito?, porque talvez cuando yo habia armado el mio, le saque cosas que no debia, como por ejemplo el paso de linkedicion..por eso aqui te pongo el que yo tome de ejemplo.


//SYGDCS02 JOB SWT,'SYGD',MSGCLASS=O,MSGLEVEL=(1,1),
// NOTIFY=SYGD,CLASS=A,REGION=6M
//********************************************************************
//* JOB SUBMITTED FROM SYSP1.OSRSA1.CNTL(D03CS02) ***
//* DOC: UCLIN FOR CSQPARM REASSEMBLE CSQZPARM ***
//********************************************************************
//UCLIN EXEC PGM=GIMSMP,PARM='PROCESS=WAIT',DYNAMNBR=120
//SMPCSI DD DISP=SHR,DSN=SMP.GLOBAL.CSI
//SMPOUT DD SYSOUT=*
//SMPRPT DD SYSOUT=*
//SMPLIST DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SMPPUNCH DD SYSOUT=*
//SMPCNTL DD *
SET BOUNDARY(OSTARG1).
// DD DSN=SYSP1.USERSRC(CSQPARM),DISP=SHR
//*
//******************************************************************
//* 20.10.1999 : WEJ
//* - AN NEUE MQM-VERSION ANGEPASST
//*
//* 05.11.1997 : RUW
//* - LOG-ARCHIVIERUNG AUSGESCHALTET
//* - DUAL-ACTIVE-LOGGING AUSGESCHALTET
//* - DUAL-ARCHIVE-LOGGING AUSGESCHALTET
//* - NAME DES PARAMETERSATZES JETZT SYS1.SCSQAUTH(CSQZPSWT)
//*
//******************************************************************
//******************************************************************
//* *
//* @START_COPYRIGHT@ *
//* STATEMENT: LICENSED MATERIALS - PROPERTY OF IBM *
//* *
//* 5655-A95 *
//* (C) COPYRIGHT IBM CORPORATION. 1993, 1998 *
//* *
//* STATUS: VERSION 2 RELEASE 1 *
//* @END_COPYRIGHT@ *
//* *
//******************************************************************
//* CUSTOMIZE THIS JOB HERE FOR YOUR INSTALLATION
//* YOU MUST DO GLOBAL CHANGES ON THESE PARAMETERS USING YOUR EDITOR
//******************************************************************
//*
//* IBM MQSERIES FOR OS/390
//* THIS JOB ASSEMBLES AND LINKS A NEW SYSTEM PARAMETER MODULE.
//* EDIT THE PARAMETERS FOR THE CSQ6LOGP,
//* CSQ6ARVP AND CSQ6SYSP MACROS TO DETERMINE YOUR
//* SYSTEM PARAMETERS.
//* SEE "MQSERIES FOR OS/390 SYSTEM MANAGEMENT GUIDE"
//* FOR A FULL DESCRIPTION OF THE PARAMETERS.
//*
//* REPLACE ++THLQUAL++ ==>> MQM
//* WITH THE HIGH LEVEL QUALIFIER OF THE
//* SCSQMACS AND SCSQAUTH TARGET LIBRARIES.
//*
//* REPLACE ++HLQ.USERAUTH++ ==> MQM.SCSQAUTH,UNIT=3390,VOL=SER=OSRSA1
//* WITH THE DATA SET NAME OF THE AUTHORIZED
//* LOAD LIBRARY IN WHICH TO STORE YOUR
//* SYSTEM PARAMETER MODULE.
//*
//* REPLACE ++NAME++ ==> CSQZPSWT
//* WITH THE NAME OF YOUR SYSTEM PARAMETER
//* MODULE.
//******************************************************************
//LOGP EXEC PGM=ASMA90,PARM='DECK,NOOBJECT,LIST,XREF(SHORT)',
// REGION=4M
//SYSLIB DD DSN=MQM.SCSQMACS,DISP=SHR,UNIT=3390,VOL=SER=OSRSA1
// DD DSN=SYS1.MACLIB,DISP=SHR,UNIT=3390,VOL=SER=OSRSB1
//SYSUT1 DD UNIT=SYSDA,SPACE=(1700,(400,400))
//SYSUT2 DD UNIT=SYSDA,SPACE=(1700,(400,400))
//SYSUT3 DD UNIT=SYSDA,SPACE=(1700,(400,400))
//SYSPUNCH DD DSN=&&LOGP,
// UNIT=SYSDA,DISP=(,PASS),
// SPACE=(400,(100,100,1))
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
CSQ6LOGP INBUFF=28, LOG INPUT BUFFER SIZE KB X
MAXALLC=3, MAX ALLOCATED ARCHLOG VOLS X
MAXARCH=500, MAX ARCH LOG VOLUMES X
OFFLOAD=NO, ARCHIVING NOT ACTIVE X
OUTBUFF=400, LOG OUTPUT BUFFER SIZE X
TWOACTV=NO, DUAL ACTIVE LOGGING X
TWOARCH=NO, DUAL ARCHIVE LOGGING X
TWOBSDS=YES, DUAL BSDS X
WRTHRSH=20 ACTIVE LOG BUFFERS
END
//ARVP EXEC PGM=ASMA90,
// PARM='DECK,NOOBJECT,LIST,XREF(SHORT)',
// REGION=4M
//SYSLIB DD DSN=MQM.SCSQMACS,DISP=SHR,UNIT=3390,VOL=SER=OSRSA1
// DD DSN=SYS1.MACLIB,DISP=SHR,UNIT=3390,VOL=SER=OSRSB1
//SYSUT1 DD UNIT=SYSDA,SPACE=(1700,(400,400))
//SYSUT2 DD UNIT=SYSDA,SPACE=(1700,(400,400))
//SYSUT3 DD UNIT=SYSDA,SPACE=(1700,(400,400))
//SYSPUNCH DD DSN=&&ARVP,
// UNIT=SYSDA,DISP=(,PASS),
// SPACE=(400,(100,100,1))
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
CSQ6ARVP ALCUNIT=BLK, ARCLOG ALLOCATION UNIT X
ARCPFX1=CSQARC1, DSN PREFIX FOR ARCLOG1 X
ARCPFX2=CSQARC2, DSN PREFIX FOR ARCLOG2 X
ARCRETN=9999, ARCLOG RETENION PERIOD DAYS X
ARCWRTC=(1,3,4), ARCHIVE WTO ROUTE CODE X
ARCWTOR=YES, PROMPT BEFORE ARCLOG MOUNT X
BLKSIZE=20480, ARCLOG BLOCKSIZE X
CATALOG=NO, CATALOG ARCLOG DATASETS X
COMPACT=NO, ARCHIVE LOGS COMPACTED X
PRIQTY=4320, PRIMARY SPACE ALLOCATION X
PROTECT=NO, NO DISCRETE PROFILES CREATED X
QUIESCE=5, MAX QUIESCE TIME IN SECONDS X
SECQTY=540, SECONDARY SPACE ALLOCATION X
TSTAMP=NO, NO TIMESTAMP SUFFIX IN DSN X
UNIT=TAPE ARCLOG ALLOCATION UNIT
END
//SYSP EXEC PGM=ASMA90,
// PARM='DECK,NOOBJECT,LIST,XREF(SHORT)',
// REGION=4M
//SYSLIB DD DSN=MQM.SCSQMACS,DISP=SHR,UNIT=3390,VOL=SER=OSRSA1
// DD DSN=SYS1.MACLIB,DISP=SHR,UNIT=3390,VOL=SER=OSRSB1
//SYSUT1 DD UNIT=SYSDA,SPACE=(1700,(400,400))
//SYSUT2 DD UNIT=SYSDA,SPACE=(1700,(400,400))
//SYSUT3 DD UNIT=SYSDA,SPACE=(1700,(400,400))
//SYSPUNCH DD DSN=&&SYSP,
// UNIT=SYSDA,DISP=(,PASS),
// SPACE=(400,(100,100,1))
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
CSQ6SYSP CTHREAD=300, TOTAL NUMBER OF CONNECTIONS X
CMDUSER=CSQOPR, DEFAULT USERID FOR COMMANDS X
EXITLIM=30, EXIT TIMEOUT (SEC) X
EXITTCB=8, NUMBER OF EXIT SERVER TCBS X
IDBACK=20, NUMBER OF NON-TSO CONNECTIONSX
IDFORE=100, NUMBER OF TSO CONNECTIONS X
LOGLOAD=10000, LOG RECORD CHECKPOINT NUMBER X
OTMACON=(,,DFSYDRU0,2147483647,CSQ), OTMA PARAMETERS X
QMCCSID=0, QMGR CCSID X
ROUTCDE=1, DEFAULT WTO ROUTECODE X
SMFACCT=NO, GATHER SMF ACCOUNTING X
SMFSTAT=NO, GATHER SMF STATS X
STATIME=30, STATISTICS RECORD INTERVAL X
TRACSTR=YES, TRACING AUTO START X
TRACTBL=99, GLOBAL TRACE TABLE SIZE X4K X
WLMTIME=30 WLM QUEUE SCAN INTERVAL (SEC)
END
//LKED EXEC PGM=IEWL,
// PARM='SIZE=(900K,124K),RENT,NCAL,LIST,AMODE=31,RMODE=ANY'
//SYSLMOD DD DSN=MQM.SCSQAUTH,UNIT=3390,VOL=SER=OSRSA1,DISP=SHR
//SYSUT1 DD UNIT=SYSDA,DCB=BLKSIZE=1024,
// SPACE=(1024,(200,20))
//SYSPRINT DD SYSOUT=*
//ARVP DD DSN=&&ARVP,DISP=(OLD,DELETE)
//LOGP DD DSN=&&LOGP,DISP=(OLD,DELETE)
//SYSP DD DSN=&&SYSP,DISP=(OLD,DELETE)
//OLDLOAD DD DSN=MQM.SCSQAUTH,DISP=SHR,UNIT=3390,VOL=SER=OSRSA1
//SYSLIN DD *
INCLUDE SYSP
INCLUDE ARVP
INCLUDE LOGP
INCLUDE OLDLOAD(CSQZPARO)
ENTRY CSQZMSTR
NAME CSQZPARM(R)




Saludos y gracias :medito:
Los torpes abren caminos que luego los sabios recorreran.

Saludos y gracias
Tatindgp

Avatar de Usuario
LuisFer
Colaborador Senior
Colaborador Senior
Mensajes: 375
Registrado: 27 May 2006, 16:06
País: España
Ciudad: Madrid
Ocupación: Otra

Re: CSQ1MSTR - REPLY DEVICE NAME OR 'CANCEL'

Mensaje por LuisFer » 11 Dic 2011, 13:51

A grandes rasgos el JCL es correcto:
Cambia solo

Código: Seleccionar todo

UNIT=TAPE ARCLOG ALLOCATION UNIT 
por

Código: Seleccionar todo

UNIT=DASD ARCLOG ALLOCATION UNIT 
Supongo que con eso te valdrá

Saludos
No me sigas, puedo no guiarte, no vayas delante , puedo no seguirte, caminemos juntos y sé simplemente, mi amigo.

tatindgp
Colaborador
Colaborador
Mensajes: 141
Registrado: 25 Feb 2008, 15:09
País: Argentina
Ciudad: Buenos Aires
Ocupación: Analista de desarrollo
Ubicación: BsAS Argentina

Re: CSQ1MSTR - REPLY DEVICE NAME OR 'CANCEL'

Mensaje por tatindgp » 12 Dic 2011, 15:58

LuisFer,
Volvi a armar el JCL poniendo lo que me indicaste y me quedo asi, lo corri y termino OK :

//IBMUSER1 JOB 1,BILL,MSGCLASS=X,NOTIFY=&SYSUID
//*
//* JCLLIB ORDER=CSQ531.SVSC.INSTALL
//*
//******************************************************************
//* *
//* @START_COPYRIGHT@ *
//* Statement: Licensed Materials - Property of IBM *
//* *
//* 5655-F10 *
//* (C) Copyright IBM Corporation. 1993, 2002 *
//* *
//* Status: Version 5 Release 3 *
//* @END_COPYRIGHT@ *
//* *
//******************************************************************
//* IBM WebSphere MQ for z/OS *
//*
//* This job assembles and links a new system parameter module.
//*
//* Edit the parameters for the
//* CSQ6LOGP, CSQ6ARVP, and CSQ6SYSP macros
//* to determine your system parameters.
//*
//******************************************************************
//* *
//* MORE INFORMATION - See: *
//* "WebSphere MQ for z/OS System Setup Guide" *
//* for information about this customization job *
//* and a full description of the parameters. *
//* *
//******************************************************************
//* CUSTOMIZE THIS JOB HERE FOR YOUR INSTALLATION
//* YOU MUST DO GLOBAL CHANGES ON THESE PARAMETERS USING YOUR EDITOR
//*
//* Replace ++THLQUAL++
//* with the high level qualifier of the
//* SCSQMACS and SCSQAUTH target libraries.
//*
//* Replace ++HLQ.USERAUTH++
//* with the data set name of the authorized
//* load library in which to store your
//* system parameter module.
//*
//* Replace ++NAME++
//* with the name of your system parameter
//* module.
//* Note - do NOT use the default version
//* name of CSQZPARM if you are using the
//* IBM library SCSQAUTH to store your
//* system parameter module.
//*
//******************************************************************
//*
//* Assemble step for CSQ6LOGP
//*
//LOGP EXEC PGM=ASMA90,PARM='DECK,NOOBJECT,LIST,XREF(SHORT)',
// REGION=4M
//SYSLIB DD DSN=CSQ531.SCSQMACS,DISP=SHR
// DD DSN=SYS1.MACLIB,DISP=SHR
//SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
//SYSPUNCH DD DSN=&&LOGP,
// UNIT=SYSDA,DISP=(,PASS),
// SPACE=(400,(100,100,1))
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
CSQ6LOGP INBUFF=60, ARCHIVE LOG BUFFER SIZES (KB) X
OUTBUFF=4000, - INPUT AND OUTPUT X
MAXRTU=2, MAX ALLOCATED ARCHIVE LOG UNITS X
DEALLCT=0, ARCHIVE LOG DEALLOCATE INTERVAL X
OFFLOAD=YES, ARCHIVING ACTIVE X
MAXARCH=500, MAX ARCHIVE LOG VOLUMES X
TWOACTV=YES, DUAL ACTIVE LOGGING X
TWOARCH=YES, DUAL ARCHIVE LOGGING X
TWOBSDS=YES, DUAL BSDS X
WRTHRSH=20 ACTIVE LOG BUFFERS
END
/*
//*
//* Assemble step for CSQ6ARVP
//*
//ARVP EXEC PGM=ASMA90,COND=(0,NE),
// PARM='DECK,NOOBJECT,LIST,XREF(SHORT)',
// REGION=4M
//SYSLIB DD DSN=CSQ531.SCSQMACS,DISP=SHR
// DD DSN=SYS1.MACLIB,DISP=SHR
//SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
//SYSPUNCH DD DSN=&&ARVP,
// UNIT=SYSDA,DISP=(,PASS),
// SPACE=(400,(100,100,1))
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
CSQ6ARVP ALCUNIT=BLK, UNITS FOR PRIQTY/SECQTY X
ARCPFX1=CSQARC1, DSN PREFIX FOR ARCHIVE LOG 1 X
ARCPFX2=CSQARC2, DSN PREFIX FOR ARCHIVE LOG 2 X
ARCRETN=9999, ARCHIVE LOG RETENION (DAYS) X
ARCWRTC=(1,3,4), ARCHIVE WTO ROUTE CODE X
ARCWTOR=YES, PROMPT BEFORE ARCHIVE LOG MOUNT X
BLKSIZE=28672, ARCHIVE LOG BLOCKSIZE X
CATALOG=NO, CATALOG ARCHIVE LOG DATA SETS X
COMPACT=NO, ARCHIVE LOGS COMPACTED X
PRIQTY=4320, PRIMARY SPACE ALLOCATION X
PROTECT=NO, DISCRETE SECURITY PROFILES X
QUIESCE=5, MAX QUIESCE TIME (SECS) X
SECQTY=540, SECONDARY SPACE ALLOCATION X
TSTAMP=NO, TIMESTAMP SUFFIX IN DSN X
UNIT=DASD, ARCHIVE LOG DEVICE TYPE 1 X
UNIT2= ARCHIVE LOG DEVICE TYPE 2
END
/*
//*
//* Assemble step for CSQ6SYSP
//*
//SYSP EXEC PGM=ASMA90,COND=(0,NE),
// PARM='DECK,NOOBJECT,LIST,XREF(SHORT)',
// REGION=4M
//SYSLIB DD DSN=CSQ531.SCSQMACS,DISP=SHR
// DD DSN=SYS1.MACLIB,DISP=SHR
//SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
//SYSPUNCH DD DSN=&&SYSP,
// UNIT=SYSDA,DISP=(,PASS),
// SPACE=(400,(100,100,1))
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
CSQ6SYSP CTHREAD=300, TOTAL NUMBER OF CONNECTIONS X
CMDUSER=CSQOPR, DEFAULT USERID FOR COMMANDS X
EXITLIM=30, EXIT TIMEOUT (SEC) X
EXITTCB=8, NUMBER OF EXIT SERVER TCBS X
IDBACK=20, NUMBER OF NON-TSO CONNECTIONS X
IDFORE=100, NUMBER OF TSO CONNECTIONS X
LOGLOAD=500000, LOG RECORD CHECKPOINT NUMBER X
OTMACON=(,,DFSYDRU0,2147483647,CSQ), OTMA PARAMETERS X
QINDXBLD=WAIT, QUEUE INDEX BUILDING X
QMCCSID=0, QMGR CCSID X
QSGDATA=(,,,), QUEUE-SHARING GROUP DATA X
RESAUDIT=YES, RESLEVEL AUDITING X
ROUTCDE=1, DEFAULT WTO ROUTE CODE X
SMFACCT=NO, GATHER SMF ACCOUNTING X
SMFSTAT=NO, GATHER SMF STATS X
STATIME=30, STATISTICS RECORD INTERVAL (MIN) X
TRACSTR=YES, TRACING AUTO START X
TRACTBL=99, GLOBAL TRACE TABLE SIZE X4K X
WLMTIME=30, WLM QUEUE SCAN INTERVAL (SEC) X
SERVICE=0 IBM SERVICE USE ONLY
END
/*
//*
//* LINKEDIT ARVP, LOGP, and SYSP into a
//* system parameter module.
//*
//LKED EXEC PGM=IEWL,COND=(0,NE),
// PARM='SIZE=(900K,124K),RENT,NCAL,LIST,AMODE=31,RMODE=ANY'
//*
//* OUPUT AUTHORIZED APF LIBRARY FOR THE NEW SYSTEM
//* PARAMETER MODULE.
//*
//SYSLMOD DD DSN=CSQ531.CSQ1.SCSQAUTH,DISP=SHR
//SYSUT1 DD UNIT=SYSDA,DCB=BLKSIZE=1024,
// SPACE=(1024,(200,20))
//SYSPRINT DD SYSOUT=*
//ARVP DD DSN=&&ARVP,DISP=(OLD,DELETE)
//LOGP DD DSN=&&LOGP,DISP=(OLD,DELETE)
//SYSP DD DSN=&&SYSP,DISP=(OLD,DELETE)
//*
//* LOAD LIBRARY containing the default system
//* parameter module (CSQZPARM).
//*
//OLDLOAD DD DSN=CSQ531.SCSQAUTH,DISP=SHR
//SYSLIN DD *
INCLUDE SYSP
INCLUDE ARVP
INCLUDE LOGP
INCLUDE OLDLOAD(CSQZPARM)
ENTRY CSQZMSTR
NAME CSQZPARM(R) Your system parameter module name
/*
//








Pero igual continuo teniedo el mismo problema del mensaje "CSQ1MSTR - REPLY DEVICE NAME OR 'CANCEL'" al iniciar nuevamente el sistema (hacer de nuevo IPL)

y cuando veo el spool de la salida de CSQ1MSTR sigo viendo esto:

IEF506I CSQ1MSTR CSQ1MSTR SYS00009 - NO STORAGE VOLUMES. 'VOLUME=PRIVATE' ASSUMED.
IKJ56221I DATA SET CSQARC1.B0000004 NOT ALLOCATED, VOLUME NOT AVAILABLE+
IKJ56221I VOLUME NECESSARY TO SATISFY YOUR REQUEST NOT ON SYSTEM, AND CANNOT BE MOUNTED
IEF506I CSQ1MSTR CSQ1MSTR SYS00010 - NO STORAGE VOLUMES. 'VOLUME=PRIVATE' ASSUMED.
IKJ56883I DATA SET CSQARC1.B0000004 NOT ALLOCATED, REQUEST CANCELED
IEF506I CSQ1MSTR CSQ1MSTR SYS00011 - NO STORAGE VOLUMES. 'VOLUME=PRIVATE' ASSUMED.
IKJ56221I DATA SET CSQARC2.B0000004 NOT ALLOCATED, VOLUME NOT AVAILABLE+
IKJ56221I VOLUME NECESSARY TO SATISFY YOUR REQUEST NOT ON SYSTEM, AND CANNOT BE MOUNTED
IEF506I CSQ1MSTR CSQ1MSTR SYS00012 - NO STORAGE VOLUMES. 'VOLUME=PRIVATE' ASSUMED.
IKJ56883I DATA SET CSQARC2.B0000004 NOT ALLOCATED, REQUEST CANCELED


Es com que no le da importancia a lo que hice y como que no encuentra discos de storage o algo por el estilo.
Los torpes abren caminos que luego los sabios recorreran.

Saludos y gracias
Tatindgp

Tintxiko
Colaborador
Colaborador
Mensajes: 138
Registrado: 09 Dic 2003, 18:58
País: España
Ciudad: Vitoria
Ocupación: Otra

Re: CSQ1MSTR - REPLY DEVICE NAME OR 'CANCEL'

Mensaje por Tintxiko » 13 Dic 2011, 06:48

Hola, revisa el miembro COMMND00 de PARMLIB, no sea que en el IPL ponga OFFLINE los discos que tienes definidos como STORAGE.

Saludos.
Salud para todos.

Tintxiko

Avatar de Usuario
Vicente
Colaborador avanzado
Colaborador avanzado
Mensajes: 543
Registrado: 21 Jul 2011, 04:52
País: España
Ciudad: Malaga
Ocupación: Técnico en Sistemas

Re: CSQ1MSTR - REPLY DEVICE NAME OR 'CANCEL'

Mensaje por Vicente » 14 Dic 2011, 14:40

Hola
¿Utilizastes el mandato de consola D U,DASD como te indiqué para ver los tipos de discos disponibles?
En SYSLOG, previo al mensaje REPLY DEVICE NAME OR CANCEL es posible que salgan otros mensajes proponiendo discos o direcciones a responder. ¿Que sale?
Saludos
Varios días probando, equivocandote y volviendo a probar
pueden ahorrarte quince minutos de lectura de un manual.

tatindgp
Colaborador
Colaborador
Mensajes: 141
Registrado: 25 Feb 2008, 15:09
País: Argentina
Ciudad: Buenos Aires
Ocupación: Analista de desarrollo
Ubicación: BsAS Argentina

Re: CSQ1MSTR - REPLY DEVICE NAME OR 'CANCEL'

Mensaje por tatindgp » 16 Dic 2011, 20:00

Vicente,
EL camando D U,DASD me arrojo esto:
00- 13.21.37 D U,DASD
IEE457I 13.21.37 UNIT STATUS FRAME 1 F E SYS=DGP1
UNIT TYPE STATUS VOLSER VOLSTATE
0120 3380 F-NRD /RSDNT
0121 3380 F-NRD /RSDNT
0122 3380 F-NRD /RSDNT
0123 3380 F-NRD /RSDNT
0124 3380 F-NRD /RSDNT
0125 3380 F-NRD /RSDNT
0126 3380 F-NRD /RSDNT
0127 3380 F-NRD /RSDNT
IEE457I 13.21.37 UNIT STATUS FRAME LAST F E
UNIT TYPE STATUS VOLSER VOLSTATE
0128 3380 F-NRD /RSDNT
0129 3380 F-NRD /RSDNT
012A 3380 F-NRD /RSDNT
012B 3380 F-NRD /RSDNT
012C 3380 F-NRD /RSDNT
012D 3380 F-NRD /RSDNT
012E 3380 F-NRD /RSDNT
012F 3380 F-NRD /RSDNT
IEE612I CN=01 DEVNUM=0700 SYS=DGP1


Mi VATLST00 la modifique y la deje asi, le agregue el disco WORK03

VIEW ADCD.ZOSV14S.PARMLIB(VATLST00) - 01.02
Command ===>
****** ***************************** Top of Data ****
000001 VATDEF IPLUSE(PRIVATE),SYSUSE(PRIVATE)
000002 FILE01,0,0,3390 ,Y
000003 WORK03,0,0,3390 ,Y
000004 S4RES2,0,2,3390 ,Y
000005 S4RES1,0,2,3390 ,Y
000006 S4USS1,0,2,3390 ,Y



La salida de la SYSLOG me da esta información:

*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
VTAMAP10I Issuing "S NFSS".
S NFSS
$HASP100 NFSS ON STCINRDR
$HASP100 HTTPD1 ON STCINRDR
VTAMAP10I Issuing "%CSQ1 START QMGR".
%CSQ1 START QMGR
IEF695I START HTTPD1 WITH JOBNAME HTTPD1 IS ASSIGNED TO USER WEBSRV
, GROUP IMWEB
IEF695I START NFSS WITH JOBNAME NFSS IS ASSIGNED TO USER START1
, GROUP SYS1
$HASP373 HTTPD1 STARTED
$HASP373 NFSS STARTED
IEF403I HTTPD1 - STARTED - TIME=13.07.09
IEF403I NFSS - STARTED - TIME=13.07.09
S CSQ1MSTR
$HASP100 CSQ1MSTR ON STCINRDR
IEF695I START CSQ1MSTR WITH JOBNAME CSQ1MSTR IS ASSIGNED TO USER START2
, GROUP SYS1
$HASP373 CSQ1MSTR STARTED
IEF403I CSQ1MSTR - STARTED - TIME=13.07.10
VTAMAP11I Pausing 30 seconds...
CSQY000I %CSQ1 IBM WebSphere MQ for z/OS V5.3.1
CSQY001I %CSQ1 QUEUE MANAGER STARTING, USING PARAMETER MODULE CSQZPARM
CSQ3111I %CSQ1 CSQYSCMD - EARLY PROCESSING PROGRAM IS V5.3.1 LEVEL 951
002-000
CSQY100I %CSQ1 SYSTEM parameters ...
CSQY101I %CSQ1 CTHREAD=300, IDBACK=20, IDFORE=100, LOGLOAD=500000
CSQY102I %CSQ1 CMDUSER=CSQOPR, QMCCSID=0, ROUTCDE=( 1)
CSQY103I %CSQ1 SMFACCT=NO (00000000), SMFSTAT=NO (00000000), STATIME=30
CSQY104I %CSQ1 OTMACON= 956
( , ,DFSYDRU0,2147483647,CSQ)
CSQY105I %CSQ1 TRACSTR=( 1), TRACTBL=99
CSQY106I %CSQ1 EXITTCB=8, EXITLIM=30, WLMTIME=30
CSQY107I %CSQ1 QSGDATA=( , , ,4)
CSQY108I %CSQ1 RESAUDIT=YES, QINDXBLD=WAIT
CSQY110I %CSQ1 LOG parameters ...
CSQY111I %CSQ1 INBUFF=60, OUTBUFF=4000, MAXRTU=2, MAXARCH=500
CSQY112I %CSQ1 TWOACTV=YES, TWOARCH=YES, TWOBSDS=YES
CSQY113I %CSQ1 OFFLOAD=YES, WRTHRSH=20, DEALLCT=0
CSQY120I %CSQ1 ARCHIVE parameters ...
CSQY121I %CSQ1 UNIT=DASD, UNIT2=, ALCUNIT=BLK, 966
PRIQTY=4320, SECQTY=540, BLKSIZE=28672
CSQY122I %CSQ1 ARCPFX1=CSQARC1, ARCPFX2=CSQARC2, TSTAMP=NO
CSQY123I %CSQ1 ARCRETN=9999, ARCWTOR=YES, ARCWRTC=( 1 ,3 ,4)
CSQY124I %CSQ1 CATALOG=NO, COMPACT=NO, PROTECT=NO, QUIESCE=5
CSQJ127I %CSQ1 SYSTEM TIME STAMP FOR BSDS=2011-12-15 13:04:22.39
CSQJ001I %CSQ1 CURRENT COPY 1 ACTIVE LOG DATA SET IS 971
DSNAME=CSQ531.CSQ1.LOGCOPY1.DS01, STARTRBA=000000000000
ENDRBA=000000437FFF
CSQJ001I %CSQ1 CURRENT COPY 2 ACTIVE LOG DATA SET IS 972
DSNAME=CSQ531.CSQ1.LOGCOPY2.DS01, STARTRBA=000000000000
ENDRBA=000000437FFF
CSQJ099I %CSQ1 LOG RECORDING TO COMMENCE WITH 973
STARTRBA=000000437000
CSQW130I %CSQ1 'GLOBAL' TRACE STARTED, ASSIGNED TRACE NUMBER 01
CSQH025I %CSQ1 CSQHINIT SUBSYSTEM security switch set 975
OFF, internal error
CSQH004I %CSQ1 CSQHINIT STAT call failed for class 976
MQADMIN, SAF return code=00000004, ESM return code=00000004
CSQP001I %CSQ1 Buffer pool 0 has 50000 buffers
CSQP001I %CSQ1 Buffer pool 1 has 20000 buffers
CSQP001I %CSQ1 Buffer pool 2 has 50000 buffers
CSQP001I %CSQ1 Buffer pool 3 has 20000 buffers
CSQP007I %CSQ1 Page set 0 uses buffer pool 0
CSQP007I %CSQ1 Page set 1 uses buffer pool 0
CSQP007I %CSQ1 Page set 2 uses buffer pool 1
CSQP007I %CSQ1 Page set 3 uses buffer pool 2
CSQP007I %CSQ1 Page set 4 uses buffer pool 3
CSQV452I %CSQ1 CSQVXLDR Cluster workload exits not available
CSQR001I %CSQ1 RESTART INITIATED
CSQR003I %CSQ1 RESTART - PRIOR CHECKPOINT RBA=0000004359AE
CSQR004I %CSQ1 RESTART - UR COUNTS - 989
IN COMMIT=0, INDOUBT=0, INFLIGHT=0, IN BACKOUT=0
CSQI049I %CSQ1 Page set 0 has media recovery 990
RBA=0000004359AE, checkpoint RBA=0000004359AE
CSQI049I %CSQ1 Page set 1 has media recovery 991
RBA=0000004359AE, checkpoint RBA=0000004359AE
CSQI049I %CSQ1 Page set 2 has media recovery 992
RBA=0000004359AE, checkpoint RBA=0000004359AE
CSQI049I %CSQ1 Page set 3 has media recovery 993
RBA=0000004359AE, checkpoint RBA=0000004359AE
CSQI049I %CSQ1 Page set 4 has media recovery 994
RBA=0000004359AE, checkpoint RBA=0000004359AE
CSQR030I %CSQ1 Forward recovery log range 995
from RBA=0000004359AE to RBA=000000436202
CSQR005I %CSQ1 RESTART - FORWARD RECOVERY COMPLETE - 996
IN COMMIT=0, INDOUBT=0
CSQR032I %CSQ1 Backward recovery log range 997
from RBA=000000436202 to RBA=000000436202
CSQR006I %CSQ1 RESTART - BACKWARD RECOVERY COMPLETE - 998
INFLIGHT=0, IN BACKOUT=0
CSQR002I %CSQ1 RESTART COMPLETED
CSQP018I %CSQ1 CSQPBCKW CHECKPOINT STARTED FOR ALL BUFFER POOLS
%CSQ1 DISPLAY THREAD(*) TYPE(INDOUBT)
CSQP019I %CSQ1 CSQP1DWP CHECKPOINT COMPLETED FOR 002
BUFFER POOL 0, 9 PAGES WRITTEN
CSQP019I %CSQ1 CSQP1DWP CHECKPOINT COMPLETED FOR 003
BUFFER POOL 1, 2 PAGES WRITTEN
CSQP019I %CSQ1 CSQP1DWP CHECKPOINT COMPLETED FOR 004
BUFFER POOL 2, 2 PAGES WRITTEN
CSQP019I %CSQ1 CSQP1DWP CHECKPOINT COMPLETED FOR 005
BUFFER POOL 3, 3 PAGES WRITTEN
CSQP021I %CSQ1 Page set 0 new media recovery 006
RBA=000000437F58, checkpoint RBA=000000437F58
CSQP021I %CSQ1 Page set 1 new media recovery 007
RBA=000000437F58, checkpoint RBA=000000437F58
CSQP021I %CSQ1 Page set 2 new media recovery 008
RBA=000000437F58, checkpoint RBA=000000437F58
CSQP021I %CSQ1 Page set 3 new media recovery 009
RBA=000000437F58, checkpoint RBA=000000437F58
CSQP021I %CSQ1 Page set 4 new media recovery 010
RBA=000000437F58, checkpoint RBA=000000437F58
CSQJ002I %CSQ1 END OF ACTIVE LOG DATA SET 011
DSNAME=CSQ531.CSQ1.LOGCOPY1.DS01, STARTRBA=000000000000
ENDRBA=000000437FFF
CSQJ001I %CSQ1 CURRENT COPY 1 ACTIVE LOG DATA SET IS 012
DSNAME=CSQ531.CSQ1.LOGCOPY1.DS02, STARTRBA=000000438000
ENDRBA=00000086FFFF
CSQJ002I %CSQ1 END OF ACTIVE LOG DATA SET 013
DSNAME=CSQ531.CSQ1.LOGCOPY2.DS01, STARTRBA=000000000000
ENDRBA=000000437FFF
CSQJ001I %CSQ1 CURRENT COPY 2 ACTIVE LOG DATA SET IS 014
DSNAME=CSQ531.CSQ1.LOGCOPY2.DS02, STARTRBA=000000438000
ENDRBA=00000086FFFF
IKJ56221I DATA SET CSQARC1.B0000001 NOT ALLOCATED, VOLUME NOT AVAILABLE+
IKJ56221I VOLUME NECESSARY TO SATISFY YOUR REQUEST NOT ON SYSTEM, AND
CANNOT BE MOUNTED
IEF244I CSQ1MSTR CSQ1MSTR - UNABLE TO ALLOCATE 1 UNIT(S) 017
AT LEAST 1 OFFLINE UNIT(S) NEEDED.
IEF877E CSQ1MSTR NEEDS 1 UNIT(S) 018
FOR CSQ1MSTR SYS00010
FOR VOLUME PRIVAT- 1
OFFLINE, NOT ACCESSIBLE
0300-031F 0321-03BF
:
IEF878I END OF IEF877E FOR CSQ1MSTR CSQ1MSTR SYS00010
Los torpes abren caminos que luego los sabios recorreran.

Saludos y gracias
Tatindgp

Avatar de Usuario
Vicente
Colaborador avanzado
Colaborador avanzado
Mensajes: 543
Registrado: 21 Jul 2011, 04:52
País: España
Ciudad: Malaga
Ocupación: Técnico en Sistemas

Re: CSQ1MSTR - REPLY DEVICE NAME OR 'CANCEL'

Mensaje por Vicente » 17 Dic 2011, 20:40

Veo en SYSLOG
Hola
No conozco CSQ, por lo que no me estoy involucrando mucho en este problema, pero trateré de arrojar algo de luz, en base a lo que veo y se de z/OS:

CSQY120I %CSQ1 ARCHIVE parameters ...
CSQY121I %CSQ1 UNIT=DASD, UNIT2=, ALCUNIT=BLK, 966
Por estas dos lineas anteriores, se puede deducir que se configura el archivado de log para que se haga en dispositivos agrupados bajo el nombre esotérico de DASD

IEF506I CSQ1MSTR CSQ1MSTR SYS00010 - NO STORAGE VOLUMES. 'VOLUME=PRIVATE' ASSUMED.
Por la linea anterior se puede deducir que al no disponer de discos STORAGE el sistema va a usar tipo PRIVATE.
Por lo que la falta de STORAGE no debe ser un problema.
Pierde ahora importancia la discusión sobre el miembro VATLST00 y la salida del mandato D U,DASD.
Aunque en vista de ambos, y sin conocer la dirección del disco WORK03 (que aclararía bastante la cuestión) me pregunto si en IPL se está usando el mientro VATLST00 que se cree o si se ha hecho IPL después de modificarlo.

No obstante, como he dicho este no parece ser el problema.

IEF244I CSQ1MSTR CSQ1MSTR - UNABLE TO ALLOCATE 1 UNIT(S) 017
AT LEAST 1 OFFLINE UNIT(S) NEEDED.
IEF877E CSQ1MSTR NEEDS 1 UNIT(S) 018
FOR CSQ1MSTR SYS00010
FOR VOLUME PRIVAT- 1
OFFLINE, NOT ACCESSIBLE
0300-031F 0321-03BF
El grupo de líneas anteriores indican que se solicita un volumen PRIVAT (no STORAGE)
Y que bajo el esotérico DASD, están definidas los dispositivos de direcciones 0300 a 031F y de 0321 a 03BF, pero están todos offline.

Y ahora las preguntas e ideas:
¿Qué dispositivos tienes bajo el esotérico DASD en la tabla EDT definida en HCD?
¿Por qué las direcciones 0300 - 03BF están offline?
¿Existe en lo parámetros de archivado uno para especificar VOLSER?

Si no puedes responder o cambiar facilmente estas definiciones de dispositivos en los ficheros IODF, prueba a utilizar el esotérico SYSDA que es más estandar; o también 3380 o 3390 en función de tus discos.
Es decir configurar los parámetros de archivado con UNIT=SYSDA o UNIT=3390 o UNIT=3380

Aunque no conozco IBM WebSphere MQ, ahora tengo curiosidad por saber como termina esto, por favor, cuando lo soluciones dinos como ha sido.
Saludos
Varios días probando, equivocandote y volviendo a probar
pueden ahorrarte quince minutos de lectura de un manual.

tatindgp
Colaborador
Colaborador
Mensajes: 141
Registrado: 25 Feb 2008, 15:09
País: Argentina
Ciudad: Buenos Aires
Ocupación: Analista de desarrollo
Ubicación: BsAS Argentina

Re: CSQ1MSTR - REPLY DEVICE NAME OR 'CANCEL'

Mensaje por tatindgp » 22 Dic 2011, 19:51

LuisFer, Vicente,
FInalmente logre encontrar la solución, lo que hice fue convinar un poco de lo que ambos me habian explicado, de modo que estos fueron los pasos para resolver mi problema:

1- En el jcl que hacemos esto, lo que debemos de pones no es DASD en UNIt, sino 3390,
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
CSQ6ARVP ALCUNIT=BLK, UNITS FOR PRIQTY/SECQTY X
ARCPFX1=CSQARC1, DSN PREFIX FOR ARCHIVE LOG 1 X
ARCPFX2=CSQARC2, DSN PREFIX FOR ARCHIVE LOG 2 X
ARCRETN=9999, ARCHIVE LOG RETENION (DAYS) X
ARCWRTC=(1,3,4), ARCHIVE WTO ROUTE CODE X
ARCWTOR=YES, PROMPT BEFORE ARCHIVE LOG MOUNT X
BLKSIZE=28672, ARCHIVE LOG BLOCKSIZE X
CATALOG=NO, CATALOG ARCHIVE LOG DATA SETS X
COMPACT=NO, ARCHIVE LOGS COMPACTED X
PRIQTY=4320, PRIMARY SPACE ALLOCATION X
PROTECT=NO, DISCRETE SECURITY PROFILES X
QUIESCE=5, MAX QUIESCE TIME (SECS) X
SECQTY=540, SECONDARY SPACE ALLOCATION X
TSTAMP=NO, TIMESTAMP SUFFIX IN DSN X
UNIT=3390, ARCHIVE LOG DEVICE TYPE 1 X
UNIT2= ARCHIVE LOG DEVICE TYPE 2


2- En la VATLST00 agregue por las dudas un dico de storage , ya que vi que tenia solo uno, igual funciona sin ponerlo tambien, lo importante es tener uno de storage al menos.


3- Luego de los pasos anteriores realice un IPL (reinicie el sistema) y note que el mensaje de "CSQ1MSTR - REPLY DEVICE NAME OR 'CANCEL'" ya no estaba...pero cuando veo el spol de CSQ1MSTR y del SYSLOG, note que me indicaba que los archivos con prefijo CSQARC1. y CSQARC2., no los podia alocar un usuario XXXXX cuando arranca el Z/os, por lo que hice fue darle permisos a ese usuario XXXXX para que pueda alocar archivos con los prefijos CSQARC1. y CSQARC2. y litos asunto solucionado.


Desde ya les quiero agradecer toda la informacion y buena predisposicion al momento de compartir sus conocimiento, es bueno ver un foro donde postea y reponde gente la cual sabe mucho y se toma muy enserio las cosas. :reverencia:
Los torpes abren caminos que luego los sabios recorreran.

Saludos y gracias
Tatindgp

Avatar de Usuario
LuisFer
Colaborador Senior
Colaborador Senior
Mensajes: 375
Registrado: 27 May 2006, 16:06
País: España
Ciudad: Madrid
Ocupación: Otra

Re: CSQ1MSTR - REPLY DEVICE NAME OR 'CANCEL'

Mensaje por LuisFer » 23 Dic 2011, 02:24

Me alegra que lo hayas solucionado.

Saludos :arriba: :brindis:
No me sigas, puedo no guiarte, no vayas delante , puedo no seguirte, caminemos juntos y sé simplemente, mi amigo.

Avatar de Usuario
Vicente
Colaborador avanzado
Colaborador avanzado
Mensajes: 543
Registrado: 21 Jul 2011, 04:52
País: España
Ciudad: Malaga
Ocupación: Técnico en Sistemas

Re: CSQ1MSTR - REPLY DEVICE NAME OR 'CANCEL'

Mensaje por Vicente » 23 Dic 2011, 05:21

Hola tantindgp:
Gracias por decirnos que ya funciona.
Yo también me alegro de que te haya funcionado.

Pero sospecho que no han acabado aquí tus problemas.

Veo que configuraste UNIT=3390, esto ha debido ser la clave, más que las modificaciones a VATLST.
Ahora los ficheros de LOG están escribiendose en discos 3390.
Ahora tu problema es gestionar los espacios en disco, lo más probable es que si no haces nada se llenen los discos con ficheros de LOG y puedas tener problemas. Lo habitual es copiarlos a cinta y borrarlos.

Veo también que tienes CATALOG=NO, esto hace que no veas los ficheros si no pones el VOLSER en el que se encuentren. Tendrás que buscarlos por los distintos discos, esto complicaría una posible automatización del copiado y borrado. Catalogar o no este tipo de ficheros es decisión de cada instalación y está condicionada a que cada fichero que se cree tenga nombre único que no exista en otro disco.

Saludos y hasta otra ocasión.
Varios días probando, equivocandote y volviendo a probar
pueden ahorrarte quince minutos de lectura de un manual.

tatindgp
Colaborador
Colaborador
Mensajes: 141
Registrado: 25 Feb 2008, 15:09
País: Argentina
Ciudad: Buenos Aires
Ocupación: Analista de desarrollo
Ubicación: BsAS Argentina

Re: CSQ1MSTR - REPLY DEVICE NAME OR 'CANCEL'

Mensaje por tatindgp » 23 Dic 2011, 19:11

Vicente,
Veo que mi alegria duro poco jajaj, a ver si entiendo...lo que deberia de hacer es agregar VOL=SER=OSRSA1 a mi jcl, donde OSRSA1 sera igual al nombre del disco donde se grabaran los archivos, por ejemplo en mi caso se graban en un que se llama FILE01 y poner el CATALOG en YES:


De manera que me quede algo asi:
//* Assemble step for CSQ6ARVP
//*
//ARVP EXEC PGM=ASMA90,COND=(0,NE),
// PARM='DECK,NOOBJECT,LIST,XREF(SHORT)',
// REGION=4M
//SYSLIB DD DSN=CSQ531.SCSQMACS,DISP=SHR,UNIT=3390,VOL=SER=OSRSA1
// DD DSN=SYS1.MACLIB,DISP=SHR,UNIT=3390,VOL=SER=OSRSB1
//SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(1,1))
//SYSPUNCH DD DSN=&&ARVP,
// UNIT=SYSDA,DISP=(,PASS),
// SPACE=(400,(100,100,1))
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
CSQ6ARVP ALCUNIT=BLK, UNITS FOR PRIQTY/SECQTY X
ARCPFX1=CSQARC1, DSN PREFIX FOR ARCHIVE LOG 1 X
ARCPFX2=CSQARC2, DSN PREFIX FOR ARCHIVE LOG 2 X
ARCRETN=9999, ARCHIVE LOG RETENION (DAYS) X
ARCWRTC=(1,3,4), ARCHIVE WTO ROUTE CODE X
ARCWTOR=YES, PROMPT BEFORE ARCHIVE LOG MOUNT X
BLKSIZE=28672, ARCHIVE LOG BLOCKSIZE X
CATALOG=YES, CATALOG ARCHIVE LOG DATA SETS X
COMPACT=NO, ARCHIVE LOGS COMPACTED X
PRIQTY=4320, PRIMARY SPACE ALLOCATION X
PROTECT=NO, DISCRETE SECURITY PROFILES X
QUIESCE=5, MAX QUIESCE TIME (SECS) X
SECQTY=540, SECONDARY SPACE ALLOCATION X
TSTAMP=NO, TIMESTAMP SUFFIX IN DSN X
UNIT=3390, ARCHIVE LOG DEVICE TYPE 1 X
UNIT2= ARCHIVE LOG DEVICE TYPE 2
END


Luego no se de que manera podria automatizar alguna tarea para que borree los archivos, por ejemplo cuando yo haga ipl del sistema se borren los archivos de log..¿o podria hacer un simple jcl que antes de hacer ipl yo lo ejecute menualmente y este borre los archivos de log?
Los torpes abren caminos que luego los sabios recorreran.

Saludos y gracias
Tatindgp

Avatar de Usuario
LuisFer
Colaborador Senior
Colaborador Senior
Mensajes: 375
Registrado: 27 May 2006, 16:06
País: España
Ciudad: Madrid
Ocupación: Otra

Re: CSQ1MSTR - REPLY DEVICE NAME OR 'CANCEL'

Mensaje por LuisFer » 24 Dic 2011, 03:40

Para descartar los Logs puedes usar el parámetro ARCRETN de la macro CSQ6ARVP
ARCRETN
Specifies the retention period, in days, to be used when the archive log data set is created.
The parameter must be in the range zero through 9999.
The default is 9999.
Suggested settings:
Test system 3
In a test system, archive logs are probably not required over long periods.
Production system 9 999 (default)
Set this value high to effectively switch automatic archive log deletion off.
Discarding archive log data sets is discussed in the WebSphere MQ for z/OS System Administration Guide.
... pero te aconsejo leer lo siguiente http://publib.boulder.ibm.com/infocente ... 11900_.htm
Saludos..
No me sigas, puedo no guiarte, no vayas delante , puedo no seguirte, caminemos juntos y sé simplemente, mi amigo.

Avatar de Usuario
Vicente
Colaborador avanzado
Colaborador avanzado
Mensajes: 543
Registrado: 21 Jul 2011, 04:52
País: España
Ciudad: Malaga
Ocupación: Técnico en Sistemas

Re: CSQ1MSTR - REPLY DEVICE NAME OR 'CANCEL'

Mensaje por Vicente » 24 Dic 2011, 07:25

Hola Tatindgp
En esta ocasión el sistema ha puesto el archivo de LOG en el disco FILE01, pero en otra no tiene por qué ser así.
CATALOG=YES te garantiza una localización cómoda del fichero, pero con la condición de que el nombre sea único.

En cuanto a VOL=SER sospecho que estás hablando de JCL y no de parámetros de la configuración de MQ, que es donde debería escribirse, si es que es posible.
Como dije no conozco MQ. Sobre esto habrá que seguir a LuisFer.
He hechado un vistazo al manual que recomienda LuisFer, leelo despacio y decide si deseas conservar o no los ficheros de log.

Utilizar ARCRETN para poner un periodo de retención corto a los ficheros está bien, pero NO provoca el borrado de los mismos de los discos, zOS nunca borrará ficheros cuya fecha de expiración haya caducado.
Automatizar estos procesos de copia y borrado en función de llenado y/o caducidad de los ficheros no siempre es trivial, depende de muchos factores, entre ellos, los más importantes están el uso que se haga de Websphere MQ y la necesidad de los datos de log; te podrían llevar incluso a programar una exit en ensamblador.
Pero por la facilidad que tienes para hacer IPL, sospecho que en tu caso no los necesitas y podría bastar añadir al final del jcl de arranque de MQ un par de lineas para que, si ha terminado bien, se borren los ficheros, es decir algo así como:
//LOG1 DD DSN=....,DISP=(DELETE,KEEP,KEEP)
Siempre que conozcas los nombres de los ficheros y estén catalogados, si no necesitas conservarlos, tienes muchas opciones para borrarlos.

Dejémonos aconsejar por LuisFer

Saludos
Varios días probando, equivocandote y volviendo a probar
pueden ahorrarte quince minutos de lectura de un manual.

tatindgp
Colaborador
Colaborador
Mensajes: 141
Registrado: 25 Feb 2008, 15:09
País: Argentina
Ciudad: Buenos Aires
Ocupación: Analista de desarrollo
Ubicación: BsAS Argentina

Re: CSQ1MSTR - REPLY DEVICE NAME OR 'CANCEL'

Mensaje por tatindgp » 24 Dic 2011, 08:52

Vicente, LuisFer,
Viendo lo que me estan diciendo, me surge una duda, ¿que ocurre si pongo el ARCRETN en ves de 9999 le pongo 0000 y caltalog en YES?, por que por lo que vi si pongo ARCRETN=0001 me los crea para que duren 1 dia...y con el catalog en YES los veo..pero al poner ARCRETN=0000 y calalog en YES ..no los veo a los archivos.

ARCRETN=9999, ARCHIVE LOG RETENION (DAYS) X
CATALOG=YES, CATALOG ARCHIVE LOG DATA SETS X



Y si otra idea buena es la que comentas Vicente de poner //LOG1 DD DSN=....,DISP=(DELETE,KEEP,KEEP) ..ya que en este caso los archivos yo los conozco.
Los torpes abren caminos que luego los sabios recorreran.

Saludos y gracias
Tatindgp

tatindgp
Colaborador
Colaborador
Mensajes: 141
Registrado: 25 Feb 2008, 15:09
País: Argentina
Ciudad: Buenos Aires
Ocupación: Analista de desarrollo
Ubicación: BsAS Argentina

Re: CSQ1MSTR - REPLY DEVICE NAME OR 'CANCEL'

Mensaje por tatindgp » 24 Dic 2011, 13:43

Disculpen...le pongo 0000 y si aparecen ..vi mal...
Los torpes abren caminos que luego los sabios recorreran.

Saludos y gracias
Tatindgp

Responder