× 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.



--
--
[ Picked text/plain from multipart/alternative ]
add a line:

   CHGVAR(&UNBR) VALUE(&UNBR + 1)


--------------------------------------------
Booth Martin
MartinB@Goddard.edu
802-454-8315 x235
--------------------------------------------
-------Original Message-------

From: midrange-l@midrange.com
Date: Monday, December 17, 2001 09:04:22 AM
To: midrange-l@midrange.com
Subject: Simple Problem

[ 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.


.
--
[ Content of type unknown/unknown deleted ]
--



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.