Obtener mensajes de una queue en MQ

Todo lo relacionado con MQ en ambiente OS/390 o z/OS
Responder
Avatar de Usuario
marcopooh
Usuario
Usuario
Mensajes: 7
Registrado: 28 Dic 2014, 23:25
País: México
Ciudad: D.F.
Ocupación: Programador

Obtener mensajes de una queue en MQ

Mensaje por marcopooh » 27 Feb 2015, 17:37

Necesito obtener los mensajes de una Queue, para esto me proporcionaron el siguiente JCL :

//* PROGRAM CSQ4BVJ1 ISSUES MQGET ON A QUEUE.
//* (EXEC AND PARM STATEMENTS ARE COMMENTED OUT AS SHIPPED)
//*
//* - FIRST PARM (++QMGR++) QUEUE MANAGER NAME
//* - SECOND PARM (++QUEUE++) QUEUE NAME
//* - THIRD PARM (++MSGS++) THE NUMBER OF MESSAGES TO GET-(9999)
//* - FOURTH PARM (++GET++) GET TYPE-(B)ROWSE/(D)ESTRUCTIVE
//* - FIFTH PARM (++SYNC++) (S)YNCPOINT/(N)O SYNCPOINT
//* MESSAGES ARE PRINTED TO DD SYSPRINT
//*
//*********************************************************************
//GETMSGS EXEC PGM=CSQ4BVJ1,REGION=1024K,
// PARM=('QMGR,QUEUE.NAME,9999,D,N')
//STEPLIB DD DSN=MQSERIES.SCSQLOAD,DISP=SHR
//SYSDBOUT DD SYSOUT=*
//SYSABOUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSOUX DD SYSOUT=*
//CEEDUMP DD SYSOUT=*

La duda es en cuanto al parametro GET TYPE, la opcion (D)estructive que accion tendra? vaciara esa Queue? para no borrar los mensajes debe ser (B)rowse? :?:

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

Re: Obtener mensajes de una queue en MQ

Mensaje por LuisFer » 28 Feb 2015, 08:00

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

Avatar de Usuario
marcopooh
Usuario
Usuario
Mensajes: 7
Registrado: 28 Dic 2014, 23:25
País: México
Ciudad: D.F.
Ocupación: Programador

Re: Obtener mensajes de una queue en MQ

Mensaje por marcopooh » 02 Mar 2015, 18:57

LuisFer escribió:Así es....
Gracias! :arriba:

Avatar de Usuario
marcopooh
Usuario
Usuario
Mensajes: 7
Registrado: 28 Dic 2014, 23:25
País: México
Ciudad: D.F.
Ocupación: Programador

Re: Obtener mensajes de una queue en MQ

Mensaje por marcopooh » 02 Mar 2015, 20:42

LuisFer:

Se nos presento el siguiente error:

CSQP017I -Q CSQPEXT1 PAGE SET EXPANSION IS STARTING FOR PAGE
IEC070I 104-204,NMXQMSTR,NMXQMSTR,CSQP0004,6116,ND131C,
IEC070I MQS.TLIB.NMXQ.PSID04,MQS.TLIB.NMXQ.PSID04.DATA,UCAT.D
CSQP014I -Q CSQPEXT1 PAGE SET EXPANSION HAS FAILED
FOR PAGE SET 4 . ALL FUTURE REQUESTS TO EXTEND THIS PAGE SET
REJECTED

El cual con ayuda de IBM se soluciono, este tema debio verlo el admin de MQ pero lamentablemente ya no esta y me estan dando esta tarea a mi :duda: con la cual me estoy intentando enganchar leyendo manuales y por medio del foro... como te comente el problema lo soluciono IBM por unica ocasion, los siguientes errores (que espero no se den tan pronto y no sean criticos) los tendre que ver yo, me queda claro el tema de las queues, canales, (lo basico), pero que a que se refiere con page set? tendras algunas notas/manual basico de administrador?

Gracias!!

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

Re: Obtener mensajes de una queue en MQ

Mensaje por LuisFer » 04 Mar 2015, 05:47

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

Avatar de Usuario
marcopooh
Usuario
Usuario
Mensajes: 7
Registrado: 28 Dic 2014, 23:25
País: México
Ciudad: D.F.
Ocupación: Programador

Re: Obtener mensajes de una queue en MQ

Mensaje por marcopooh » 05 Mar 2015, 12:05

ok, lo reviso gracias!

Responder