You can STRJRNPF with no issues.
ENDJRNPF changed beginning with V6R1.
From the V6R1 MTU.
Journaling enhancements
Reduced lock levels required for journal commands and APIs:
The lock levels have been reduced for several journal CL commands and APIs. In earlier releases, the lock
level was O_RDONLY and O_SHARE_NONE for integrated file system objects and *EXCL for all other
object types. The lock levels are now O_RDONLY and O_SHARE_RDWR for integrated file system
objects and *EXCLRD for all other object types. The following are the commands and the APIs that have
changed:
v End Journal Physical File (ENDJRNPF) - file. (Note: You cannot end journaling of a physical file that
has uncommitted changes.)
v End Journal Access Path (ENDJRNAP) - file and access paths of members.
v End Journal Object (ENDJRNOBJ) - data areas and data queues.
v End Journal (ENDJRN) and QjoEndJournal API - data areas, data queues, and integrated file system
objects.
v Start Journal Access Path (STRJRNAP) - file and access paths of members.
v Start Journal Object (STRJRNOBJ) - data areas and data queues.
v Start Journal (STRJRN) and QjoStartJournal API - data areas and data queues.
-----Original Message-----
From: MIDRANGE-L [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Rob Berendt
Sent: Friday, February 16, 2018 4:43 PM
To: Midrange Systems Technical Discussion
Subject: Re: Interesting RGZPFM while active results
Then, in summary,
- if you're extremely tight on space then doing a reorg while active is probably not the answer.
- If you're not that tight but you want to reorg and just have to do it while active and you don't usually journal then you could start journalling and discard when complete. Then again, I think you have to get an *EXCLRD lock on the file to start journalling. But if you need to retain receivers reorg while active is probably not desired.
?
Rob Berendt
--
IBM Certified System Administrator - IBM i 6.1 Group Dekko Dept 1600 Mail to: 2505 Dekko Drive
Garrett, IN 46738
Ship to: Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com
From: "Steinmetz, Paul" <PSteinmetz@xxxxxxxxxx>
To: "'MIDRANGE-L (midrange-l@xxxxxxxxxxxx)'" <midrange-l@xxxxxxxxxxxx>
Date: 02/16/2018 04:32 PM
Subject: Interesting RGZPFM while active results
Sent by: "MIDRANGE-L" <midrange-l-bounces@xxxxxxxxxxxx>
P7 - 8205 80 gm mem, NWS SSD
V7R3
I just ran a RGZPFM while active to gain the space back from a large
amount of deleted records.
3 hours 20 minutes.
The file had 18.5 million deleted records, 26.5 million active records.
Before
Source Creation Last Change Deleted
Member Size Type Date Date Time Records
Records
STMTM1P 13,675,724,800 12/11/16 02/12/18 15:27:30
26,580,672 18,520,125
After
STMTM1P 8,069,996,544 12/11/16 02/16/18 15:31:24
26,580,672 0
To use RGZPFM while active, the file needs to be journaled.
STRJRNPF FILE(D1PENFILES/STMTM1P) JRN(D1BRFILES/ICOMSJRN).
RGZPFM FILE(D1PENFILES/STMTM1P) MBR(STMTM1P) RBDACCPTH(*NO)
ALWCANCEL(*YES) LOCK(*SHRUPD).
The system managed journal created 136 journal receivers, each appox. 2 gb
totaling about 270 gb.
This was in user ASP 02, which saw an increase of 10%, hitting its 95%
threshold.
It took 270 gb of temporary storage (sum of all the jrnrcv) to gain 5 gb
back.
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/
midrange.com
