How to End a Journaling Environment

Step 1

You must first end journaling for all objects journaled to the journal.  

To view existing journaled object, the command WRKJRNA can be used.

WRKJRNA JRN(LIBRARY/JOURNAL) press enter and then F19 and select option 40 to get a summary.

Then use each command below to end journaling for the object types you found being journaled to this journal.

Note: you will need to specify your journal and journal library name, shown above as example text JOURNAL and LIBRARY.

Step 2

Any remote journals attached to the journal must be removed.  Use the WRKJRNA command to view the remote journal information.

WRKJRNA JRN(LIBRARY/JOURNAL) press enter and then F16.  You will need to note the Relational Database Name, Remote journal and library and the state of any remote journals listed. 

If the remote journal is active you will need to inactivate by using the CHGRMTJRN command:

CHGRMTJRN RDB(RDBNAME) SRCJRN(S_LIBRARY/S_JOURNAL) TGTJRN(T_LIBRARY/T_JOURNAL) JRNSTATE(*INACTIVE)

NOTE: S_LIBRARY/S_JOURNAL is the journal you are attempting to delete.

T_LIBRARY/T_JOURNAL is the remote journal found on the WRKJRNA / F16 command.

After the remote journal is inactive you can remove using the RMVRMTJRN command.

RMVRMTJRN RDB(RDBNAME) SRCJRN(S_LIBRARY/S_JOURNAL) TGTJRN(T_LIBRARY/T_JOURNAL)

Step 3

Delete the journal.

DLTJRN JRN(LIBRARY/JOURNAL)

Delete the journal receiver.

DLTJRNRCV JRNRCV(LIBRARY/JRNRCV)

Note: You can use a generic name for the receivers to include all receivers. If the journal receivers are not saved, you will get a message that states journal receiver was not fully saved. At that point you can reply I for ignore and the receivers will be deleted.  You can also use DLTOPT(*IGNINQMSG) to auto reply I.