Cómo ordenar mensajes alfabéticos
-
26-10-2019 - |
Pregunta
WRKMSG - ¿Cómo puedo ordenar los mensajes alfabéticamente?
¿Hay alguna forma posible de clasificar esos mensajes de una manera que me gusta tenerlos?
Solución
Supongo que quiere decir que desea ordenar las definiciones de mensajes almacenadas en un archivo de mensaje, en lugar del contenido actual de una cola de mensajes. Puede crear una tabla de base de datos (es decir, un archivo) para recibir las descripciones de mensajes y luego hacer lo que desee con esos registros.
Normalmente puedes DSPMSGD
a un archivo de impresión. Pero crearemos un archivo o tabla física, y anularemos la salida del DSPMSGD
comando a nuestro archivo. Los primeros tres registros son basura, para nuestros propósitos, y los descartaremos usando CPYF
desde un archivo de trabajo en nuestro archivo final.
Haga las cosas más fáciles estableciendo su biblioteca como actual.
CHGCURLIB mylib
Puede definir sus archivos en DDS, pero lo demostraré en SQL.
STRSQL
Para crear su archivo de trabajo y archivo de resultados:
CREATE TABLE qtemp/workfile
( x1 char(1),
msgid char(7),
sev char(2),
msgtxt char(132)
)
CREATE TABLE myfile
( msgid char(7),
sev char(2),
msgtxt char(132)
)
Salga de SQL para volver a una línea de comando.
Anular el archivo de salida para el DSPMSGD
Complete a su archivo de trabajo y recopile sus datos.
OVRDBF QPMSGD workfile
DSPMSGD RANGE(*FIRST *LAST) MSGF(some_msgf)
DETAIL(*BASIC) OUTPUT(*PRINT)
CPYF workfile myfile MBROPT(*replace)
FROMRCD(4) FMTOPT(*MAP *DROP)
Ahora puede volver a SQL y ver los frutos de su trabajo.
STRSQL
SELECT *
from myfile
order by msgtxt
Otros consejos
No es que haya visto nunca. Vienen aparecen en orden de fecha y hora. Estoy seguro de que se almacenan en un archivo físico en algún lugar donde quizás pueda consultarlo, pero generalmente elimino mis mensajes lo antes posible.