IBMi (AS400) fans only ' Journaling database physical files (tables)

Journaling database physical files is a powerful, built-in OS feature. It allows you to audit data file changes.
Tracks additions, updates, deletions of a physical file.



Let's see how it works.

Scenario: I have a phisical file (Tabel) called CLANA00F, I wont tracks additions, updates and deletions about CLANA00F.



Step 1: CRTJRNRCV create a journal receiver in your library
CRTJRNRCV JRNRCV(VDOTEST1/JRCV) THRESHOLD(1500000) TEXT('My Journal Receiver')

Step 2: CRTJRN create a journal into the journal receiver
CRTJRN JRN(VDOTEST1/JRNL) JRNRCV(VDOTEST1/JRCV)

Here is the just created journal receiver and the journal. 

Step 3: STRJRNPF start auditing
STRJRNPF FILE(VDOTEST1/CLANA00F) JRN(VDOTEST1/JRNL) IMAGES(*BOTH) OMTJRNE(*OPNCLO) // the option OMTJRNE(*OPNCLO) omit open and close entries.
// Open and close operations on the specified file members do not create open and close journal entries. It saves some storage space in the attached receivers.                                     

                                                       


Since now on, any changes to the CLANA00F file will be recorded in the journal.



Now I show you with a practical example.



I add a new record to CLANA00F

Let's see what the journal shows:
DSPJRN JRN(VDOTEST1/JRNL) FILE((VDOTEST1/CLANA00F))

Perform option 5 in each row

The 3rd row PT - Record added shows and the entry specific data

I update a record in CLANA00F (I change ITA with FRA)
Let's see what the journal shows:
DSPJRN JRN(VDOTEST1/JRNL) FILE((VDOTEST1/CLANA00F))

I delete a record in CLANA00F
Let's see what the journal shows:
DSPJRN JRN(VDOTEST1/JRNL) FILE((VDOTEST1/CLANA00F))

Now let's see the whole history of CLANA00F

Type . . . . . . . . :   JF - Start journaling for file
Type . . . . . . . . :   JM - Start journaling for member
Type . . . . . . . . :   PT - Record added
Type . . . . . . . . :   UB - Update, before-image
Type . . . . . . . . :   UP - Update, after-image
Type . . . . . . . . :   DL - Record deleted
With option 5 in each row, you can see the entry specific data.



That's it.

I appreciate all the comments made on this blog.

#IBMiSample

Each IBMi user knows they run the most efficient system. All others just have too much money.