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

Vern,
Just noticed that the Retrieve Journal Information *will* return the data I
am looking for.
Has anyone used this API?
It seems that Key 1 (Receiver Information) is what I am looking for, but do
I need to provide a data field for the maximum size of all returned data?
Also, I am a bit confused on how to traverse the data returned.

Any information will be appreciated.





Jeff Young
Sr. Programmer Analyst

On Mon, Oct 17, 2016 at 12:42 PM, Jeff Young <jyoung0950@xxxxxxxxx> 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.