Re: Simple Problem

[Narayanan Pillai <strqst400@xxxxxxxxx>]

try

chgvar &unbr (&unbr + 1 )

pillai
senior tech architect
american medical & life insurance

--- hrishikesh kotwal <hdkotwal@hotmail.com> wrote:
> [ Converted text/html to text/plain ]
>
> Hi All,
>
>
>
> Following is my CLP:
>
> ...+... 2 ...+... 3 ...+... 4 ...+... 5 ...+.
> **** Beginning of data **********************
>   PGM
>
>   DCL        VAR(&JNBR) TYPE(*CHAR) LEN(6)
>   DCL        VAR(&UNBR) TYPE(*DEC) LEN(9 0)
>
>   RTVDTAARA  DTAARA(CMBDA4E) RTNVAR(&UNBR)
>
>   RTVJOBA    NBR(&JNBR)
>
>
>
>   CALL       PGM(CMBR440) PARM(&JNBR &UNBR)
>
>   CHGDTAARA  DTAARA(CMBDA4E) VALUE(&UNBR)
>
>   ENDPGM
> ******* End of data *************************
>
> I want to add 1 to &UNBR and then pass it to my RPG
> program. How do I add 1 to
> &UNBR? Is is possible in CL?TIA.
> Regards,
>
> Hrishikesh Kotwal
>
> >From: Mark.Pace@ncgicorp.com
> >Reply-To: midrange-l@midrange.com
> >To: midrange-l@midrange.com
> >Subject: RE: new partition problem
> >Date: Mon, 17 Dec 2001 08:33:51 -0500
> >
> >
> > >Mark,
> > >If I recall correctly, the default service tools
> profiles/passwords are:>>
> > >QSECOFR QSECOFR
> > >QSRV QSRV
> > >22222222 22222222
> > >11111111 11111111
> >
> > >Have you tried, (or changed) these?
> >
> > >Andy Nolen-Parkhouse
> >
> >Andy -
> >Yes I tried all of those - here are the results.
> Not sure what to try
> >next.......
> >
> >OS/400 Guest Partition Console
> > 1: LINUX1
> > 2: BYNARI
> >2
> >BYNARI : Enter OS/400 service tools userid:
> >
> >11111111
> >REMOTE PANEL KEY AUTHORITY REQUIRED FOR THIS
> PARTITION
> >BYNARI : Invalid OS/400 service tools
> authentication.
> >BYNARI : Enter OS/400 service tools userid:
> >
> >22222222
> >REMOTE PANEL KEY AUTHORITY REQUIRED FOR THIS
> PARTITION
> >BYNARI : Invalid OS/400 service tools
> authentication.
> >BYNARI : Enter OS/400 service tools userid:
> >
> >qsecofr
> >QSECOFR PROFILE NOT VALID FOR GUEST PARTITION
> CONSOLE
> >BYNARI : Invalid OS/400 service tools
> authentication.
> >BYNARI : Enter OS/400 service tools userid:
> >
> >qsrv
> >REMOTE PANEL KEY AUTHORITY REQUIRED FOR THIS
> PARTITION
> >BYNARI : Invalid OS/400 service tools
> authentication.
> >BYNARI : Enter OS/400 service tools userid:
> >
> >
> >Mark D Pace
> >Senior Systems Engineer
> >Mainline Information Systems
> >1700 Summit Lake Drive
> >Tallahassee, FL. 32311
> >mark.pace@ncgicorp.com
> >Phone: 850-219-5184
> >Fax: 850-219-5050
> >http://www.mainline.com
> >
> >
> >_______________________________________________
> >This is the Midrange Systems Technical Discussion
> (MIDRANGE-L) mailing list
> >To post a message email: MIDRANGE-L@midrange.com
> >To subscribe, unsubscribe, or change list options,
> >visit:
>
http://lists.midrange.com/cgi-bin/listinfo/midrange-l
> >or email: MIDRANGE-L-request@midrange.com
> >Before posting, please take a moment to review the
> archives
> >at http://archive.midrange.com/midrange-l.
> >
>
>
------------------------------------------------------------------------------
> Get your FREE download of MSN Explorer at
> http://explorer.msn.com[1].
>
> ===References:===
>   1. http://go.msn.com/bql/hmtag_etl_EN.asp
>
> _______________________________________________
> This is the Midrange Systems Technical Discussion
> (MIDRANGE-L) mailing list
> To post a message email: MIDRANGE-L@midrange.com
> To subscribe, unsubscribe, or change list options,
> visit:
>
http://lists.midrange.com/cgi-bin/listinfo/midrange-l
> or email: MIDRANGE-L-request@midrange.com
> Before posting, please take a moment to review the
> archives
> at http://archive.midrange.com/midrange-l.
>


__________________________________________________
Do You Yahoo!?
Check out Yahoo! Shopping and Yahoo! Auctions for all of
your unique holiday gifts! Buy at http://shopping.yahoo.com
or bid at http://auctions.yahoo.com