Re: List remote journals and the status -- MIDRANGE-L

As I suspected, the heavy lifting has already been done, in this case by Carsten Flensburg. In his article in System i News, APIs By Example: Manage Journal Receivers posted October 2004, he presents a command MNGJRNRCV. Based on my quick once over, it looks like this is nearly perfect. I have the System i Network Resources library CDs (several of them) but I don't find that specific source on them. Furthermore when I click on the link on the article (number 60975) the URL is not there.

Anyone know where I might find the code he wrote?

Jim Oberholtzer
Chief Technical Architect
Agile Technology Architects

On 11/21/2011 10:14 AM, Vern Hamberg wrote:

And Jim

Just fill in&jrnrcvnam and&jrnrcvlib with what you get in your list
for each call - the qualified-name parameter then is constructed
automagically.

Vern

On 11/21/2011 8:29 AM, Jim Oberholtzer wrote:

> Gary,
>
> Good thought but I don't need to ask the remote systems to send me
> anything, the local (main) system has all the information needed. The
> API Retrieve Journal Information will retrieve everything. Getting a
> list of the journal receivers is as easy as you suggest.
>
> Since my target audience for this function are administrators, most of
> whom have little or no experience in RPG of any flavor I was hoping to
> do the entire process in CL. (This is also partly due to my own
> extraordinarily rusty RPG skills) At this moment it looks doable. And
> before the chorus starts, yes, it would much faster and better to manage
> in RPG with subfiles and all, even better in COBOL but the concept of
> getting in done in CL is just appealing to me, so let's not have a
> discussion about the better place to do it.
>
> Now, does anyone have an example of calling the Remote Journal
> Information API in CL?
>
> Once I get the project done, I'll post to open source.
>
>
> Jim Oberholtzer
> Chief Technical Architect
> Agile Technology Architects
>
>
> On 11/18/2011 3:46 PM, Monnier, Gary wrote:

>> Jim,
>>
>>
>>
>> Can you can use a series of SBMRMTCMD/RUNRMTCMD commands to run
>> something like the following?
>>
>>
>>
>> CRTLIB LIB(MYTMPLIB)
>>
>> DSPOBJD OBJ(*ALL/*ALL) OBJTYPE(*JRN) OUTPUT(*OUTFILE)
>> OUTFILE(MYTMPLIB/JOURNALS)
>>
>> Run a command or call a program that utilizes the
>> Retrieve Journal Information (QjoRetrieveJournalInformation) API and
>> puts the info
>>
>> into a table (MYTMPLIB/RMTJRNINFO). You will probably have to have this
>> installed. SNTNETF of a save file might do the trick.
>>
>> SNDNETF FILE(MYTMPLIB/RMTJRNINFO) TOUSRID((SOMEID
>> SOMEADR))
>>
>> DLTLIB LIB(MYTMPLIB)
>>
>>
>>
>> So now you have a list of all the remote journals and their attributes
>> on the remote system.
>>
>>
>>
>> An idea anyway.
>>
>>
>>
>> Gary
>>
>>
>>
>>
>>
>> -----Original Message-----
>> From:midrange-l-bounces+gary.monnier=terex.com@xxxxxxxxxxxx
>> [mailto:midrange-l-bounces+gary.monnier=terex.com@xxxxxxxxxxxx] On
>> Behalf Of Jim Oberholtzer
>> Sent: Friday, November 18, 2011 12:20 PM
>> To: Midrange Systems Technical Discussion
>> Subject: List remote journals and the status
>>
>>
>>
>> Does any have a program (green screen) or know of a way to list all the
>> remote journals and their status on the remote system in one panel. I
>> know I can display each ones attributes and use the appropriate F key to
>>
>>
>> get there but I was hoping for a more time effective solution. Must be
>>
>>
>> V5R4 at this point.
>>
>> Thanks!
>>
>>
>>
>> --
>>
>> Jim Oberholtzer
>>
>> Chief Technical Architect
>>
>> Agile Technology Architects
>>
>>
>>
>> --