× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



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.



As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.