Re: CL Wrapper

Hello Ken,

Creating a command interface to the API is another option:

/*-------------------------------------------------------------------*/
/*                                                                   */
/*  Compile options:                                                 */
/*    CrtCmd Cmd( CHGJRNRCYC )                                       */
/*           Pgm( QJOCHRVC )                                         */
/*           SrcMbr( CBX705X )                                       */
/*           HlpPnlGrp( CBX705H )                                    */
/*           HlpId( *CMD )                                           */
/*                                                                   */
/*-------------------------------------------------------------------*/
        Cmd        Prompt( 'Change journal recovery count' )

        Parm       RCYCOUNT      *Int4                          +
                   Range( 10000  2000000000 )                   +
                   Min( 1 )                                     +
                   Expr( *YES )                                 +
                   Prompt( 'Recovery count' )

        Parm       ERROR         *Int4                          +
                   Constant( 0 )

Best regards,
Carsten Flensburg

----- Original Message ----- 
From: "Graap, Ken" <keg@xxxxxxxxxxxxx>
To: "'Midrange'" <midrange-l@xxxxxxxxxxxx>
Sent: Friday, August 05, 2005 11:30 PM
Subject: CL Wrapper


> Has anyone created a CL Wrapper for the QJOCHRVC API ...
>
> Kenneth
>
> ****************************************
> Kenneth E. Graap
> IBM Certified Specialist
> AS/400e Professional System Administrator
> NW Natural (Gas Services)
> keg@xxxxxxxxxxxxx
> Phone: 503-226-4211 x5537
> FAX:    603-849-0591
> ****************************************
>
> -- 
> This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/midrange-l.
>