Re: Autojournal files in a library

Hello Rob,

I just checked the documentation and see no mention of the *ALL and *ALLOPR
special values that occupy the last 20 bytes of your QDFTJRN data area:
http://publib.boulder.ibm.com/infocenter/iseries/v5r3/topic/dbp/rbafoimplicitjournal.htm

- What are these values supposed to do?

Another issue that I recently found with the QDFTJRN automatic journal
facility is that whereas STRJRNPF requires *CHANGE + *OBJMGT authority to
the journal object, the QDFTJRN automatic journal requires an additional
*OBJALTER authority..!

Best regards,
Carsten Flensburg


----- Original Message ----- 
From: <rob@xxxxxxxxx>
To: <midrange-l@xxxxxxxxxxxx>
Sent: Wednesday, November 23, 2005 3:03 PM
Subject: Autojournal files in a library


> I seem to be having an issue trying to automatically journal files with
> the following:
> CRTJRNRCV JRNRCV(ROB/QSQJRN0001)
> CRTJRN JRN(ROB/QSQJRN) JRNRCV(ROB/QSQJRN0001)
> CRTDTAARA DTAARA(ROB/QDFTJRN)
>           TYPE(*CHAR)
>           LEN(40)
>           VALUE('ROB       QSQJRN    *ALL      *ALLOPR   ')
> STRSQL
> CREATE TABLE ROB/MYFILE
>   (THEKEY INT NOT NULL as identity,
>    CREATEDATE DATE,
>    sOMETEXT VARCHAR (20),
>    IFSFILE DATALINK LINKTYPE URL FILE LINK CONTROL MODE DB2OPTIONS,
>    PRIMARY KEY (THEKEY))
> SQL7905-Table MYFILE in ROB created but could not be journaled.
> WRKJRNA ROB/QSQJRN
> Journal  . . . . . . :   QSQJRN          Library  . . . . . . :   ROB
>
> Attached receiver  . :   QSQJRN0001      Library  . . . . . . :   ROB
>
> Text . . . . . . . . :   *BLANK
>
> ASP  . . . . . . . . :   1               Receiver size options:   *MAXOPT1
> Message queue  . . . :   QSYSOPR         Fixed length data  . :   *JOB
>   Library  . . . . . :     *LIBL                                  *USR
> Manage receivers . . :   *SYSTEM                                  *PGM
> Delete receivers . . :   *NO
> Journal cache  . . . :   *NO
> Manage delay . . . . :   10
> Delete delay . . . . :   10
> Journal type . . . . :   *LOCAL
> Journal state  . . . :   *ACTIVE
> Minimize entry data  :   *NONE
>
> However if I do
> STRJRNPF FILE(ROB/MYFILE) JRN(ROB/QSQJRN) IMAGES(*BOTH)
> it works.