× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



Yes there is a way,

Since you must have already figured that you need to CPYSPLF the printer output to a physical file then the following should accomplish what you desire.
It just joins every 1st and 2nd records together into one record.

CRTPF FILE(QTEMP/DSPLOG) RCDLEN(132)

CPYSPLF FILE(QPDSPLOG) TOFILE(DSPLOG) SPLNBR(*LAST)

RUNSQL SQL('create table qtemp/hstlog as (
with X as (select rrn(A) as seq,A.* from dsplog A where left(dsplog,3)=''CPF'')
, Y as (select rrn(B) as seq,B.* from dsplog B where left(dsplog,3)='' '')
select X.dsplog as X1,Y.dsplog as Y1 from X join Y on X.seq=Y.seq-1) with data')
COMMIT(*NC)

RUNQRY QRYFILE((HSTLOG))

Cheers, Peter

-----Original Message-----
From: MIDRANGE-L [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Steinmetz, Paul
Sent: Saturday, 18 February 2017 10:49 AM
To: 'Midrange Systems Technical Discussion'
Subject: [IE] Is there a way to DSPLOG LOG(QHST) OUTPUT(*PRINT) MSGID(CPF3145) to an outifle or to a spoolfile that doesn't wrap.

Is there a way to DSPLOG LOG(QHST) OUTPUT(*PRINT) MSGID(CPF3145) to an outifle or to a spoolfile that doesn't wrap.

I need an easy way to track access path rebuilds.
The below wraps, not easy to read.
I'd like to dump the output, sort descending by the time used field 00:00:01.

DSPLOG LOG(QHST) OUTPUT(*PRINT) MSGID(CPF3145)

5770SS1 V7R1M0 100423 History Log PENCOR06 2/17/17 8:39:39 Page 0001
MSGID SEV MSG TYPE
CPF3145 00 INFO Access path built for member CBG7REL0 file CBG7REL0 library CABLEFILES in 00:00:01.
QDBSRV04 QSYS 150219 QDBMAINT 0000 02/17/17 00:26:00.115878 QSYS
CPF3145 00 INFO Access path built for member CBBOREL0 file CBBOREL0 library CABLEFILES in 00:00:01.
QDBSRV05 QSYS 150220 QDBMAINT 0000 02/17/17 00:26:00.163651 QSYS
CPF3145 00 INFO Access path built for member CBIWREL0 file CBIWREL0 library CABLEFILES in 00:00:01.
QDBSRV04 QSYS 150219 QDBMAINT 0000 02/17/17 00:26:00.176451 QSYS
CPF3145 00 INFO Access path built for member CBJEREL0 file CBJEREL0 library CABLEFILES in 00:00:01.
QDBSRV04 QSYS 150219 QDBMAINT 0000 02/17/17 00:26:00.276308 QSYS
CPF3145 00 INFO Access path built for member TOLRSQ03 file TOLRSQ03 library BRFILES in 01:23:54.
QDBSRV05 QSYS 150220 QDBMAINT 0000 02/14/17 03:45:10.908309 QSYS
CPF3145 00 INFO Access path built for member TOLRSQ01 file TOLRSQ01 library BRFILES in 01:21:52.

Thank You
_____
Paul Steinmetz
IBM i Systems Administrator

Pencor Services, Inc.
462 Delaware Ave
Palmerton Pa 18071

610-826-9117 work
610-826-9188 fax
610-349-0913 cell
610-377-6012 home

psteinmetz@xxxxxxxxxx
http://www.pencor.com/

--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a moment to review the archives at http://archive.midrange.com/midrange-l.

Please contact support@xxxxxxxxxxxx for any subscription related questions.

Help support midrange.com by shopping at amazon.com with our affiliate link: http://amzn.to/2dEadiD
############################################################## This correspondence is for the named person's use only. It may contain confidential or legally privileged information, or both. No confidentiality or privilege is waived or lost by any mistransmission. If you receive this correspondence in error, please immediately delete it from your system and notify the sender. You must not disclose, copy or rely on any part of this correspondence if you are not the intended recipient. Any views expressed in this message are those of the individual sender, except where the sender expressly, and with authority, states them to be the views of Veda. If you need assistance, please contact Veda :- Australia http://www.veda.com.au/contact-us New Zealand http://www.veda.co.nz/contact-veda ##############################################################

As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.