Re: API to retrieve a list of all attached receivers for a given journal

Hi Jeff

I'm not sure, either, but take a look at the docs again for Retrieve Journal Information - one of the options for information to retrieve is journal receiver directory information - that seems to be exactly what you're looking for. A quick look showed me there are entries for each receiver in the return variable. The contents of those entries is in a section further down in the documentation.

I could be reading in too much, man, but that's all I know on a Monday!!

Vern

On 10/17/2016 11:42 AM, Jeff Young wrote:

Thanks Vern, but I do not see that doing what I need (maybe I am missing
something?)
What I want to do programmatically is the equivalent of WRKNRA
journal_name, then F15=Work with Receiver directory


Work with Journal Attributes



Journal . . . . . . : S2KJRN Library . . . . . . : ##MMXJRN



Attached receiver . : S2KRCV1819 Library . . . . . . : ##MMXJRN



Text . . . . . . . . : MIMIX - BLDJRNENV



ASP . . . . . . . . : 1 Journaled objects:

Message queue . . . : JRNMSGQ Current . . . . . : 32694

Library . . . . . : ##MMXJRN Maximum . . . . . : 10000000

Manage receivers . . : *SYSTEM Recovery count . . . : *SYSDFT

Delete receivers . . : *NO Receiver size options:
*RMVINTENT
Journal cache . . . : *NO *MAXOPT2

Manage delay . . . . : 10 Fixed length data . : *JOB

Delete delay . . . . : 10 *USR

Journal type . . . . : *LOCAL *PGM

Journal state . . . : *ACTIVE

Minimize entry data : *NONE




Bottom
F13=Display journaled files F14=Display journaled access paths

F15=Work with receiver directory F24=More keys


Work with Receiver Directory


Journal . . . . . . : S2KJRN Library . . . . . . : ##MMXJRN



Total size of receivers (in kilobytes) . . . . . . . . . . . :
170162132


Type options, press Enter.

4=Delete 8=Display attributes





Attach Save

Opt Receiver Library Number Date Status Date

S2KRCV1519 ##MMXJRN 00001 10/03/16 ONLINE
00/00/00
S2KRCV1520 ##MMXJRN 00002 10/04/16 ONLINE
00/00/00
S2KRCV1521 ##MMXJRN 00003 10/04/16 ONLINE
00/00/00
S2KRCV1522 ##MMXJRN 00004 10/04/16 ONLINE
00/00/00
S2KRCV1523 ##MMXJRN 00005 10/04/16 ONLINE
00/00/00
S2KRCV1524 ##MMXJRN 00006 10/04/16 ONLINE
00/00/00

More...
Parameters or command

===>

F3=Exit F4=Prompt F5=Refresh F9=Retrieve F11=Display size

F12=Cancel F17=Top F18=Bottom



Are there any API's that will let me do this?
Unfortunately, there is no command for the F15=Work with Receiver
Directory, and no command to output the data to a file either.

Jeff Young
Sr. Programmer Analyst

On Mon, Oct 17, 2016 at 12:26 PM, Vernon Hamberg <vhamberg@xxxxxxxxxxxxxxx>
wrote:

Hi Jeff

I think you can get what you want from this API - at least a list of
journal receivers - it's under the heading of Journal receiver directory
information - this is key #1 for type of information.

Once you have the list of receivers, there's another API to get receiver
information.

How's that? Hope it's the right direction to send you!

Vern

On 10/17/2016 9:40 AM, Jeff Young wrote:

All,
Is there an API that will allow be to get a list of all attached receivers
for a given journal?
I have found this: Retrieve Journal Information
(QjoRetrieveJournalInformation) API,
but that does not seem to do what I want.


I have a tool from the old RPGIVTOOLS library that given a file and
journal
name will create an output file with the journal common data and the
fields
from the data file.
I am looking to enhance that by getting the current journal from the file
using the RTVOBJD command, and then getting a list of all attached
receivers for that journal along with the date/time attached and detached.

Is there any API that I can use for that?
If so, does anyone have some sample code using it?
I am comfortable using the system API's, pointers and User Spaces.

TIA,


Jeff Young
Sr. Programmer Analyst

--
This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L)
mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.