Re: How to Invoke a constant in a Java class from RPG

As per Davids request responded here originating from the question on the
midrange list

Don,

Your prototype needs the level parameter I believe.

D setLevel PR EXTPROC(*JAVA :
'java.util.logging+
D .Logger' : 'setLevel' )
D like(jint) value

D wwLevel S like(jint)


wwLevel = *loval ;
setLevel(getLoggerRet : wwLevel) ;

Best regards,
-Arco




2017-01-11 13:48 GMT+01:00 Don Brown <DBrown@xxxxxxxxxx>:

Thanks Arco

That may be a way to represent the ALL but it does not solve how I can do
it in a single parameter. The prototype setLevel only has one parameter.

Sent from my iPhone

On 11 Jan. 2017, at 21:55, Arco Simonse <arco400@xxxxxxxxx> wrote:

Hi Don,

According to the documentation

https://docs.oracle.com/javase/7/docs/api/java/util/logging/Level.html#ALL

the ALL level is represented by Integer.MIN_VALUE and not string.

Would it help if you define a variable as java integer, initialize it

with

*loval, and use that as parameter?

Best regards,
-Arco

2017-01-11 6:42 GMT+01:00 Don Brown <DBrown@xxxxxxxxxx>:

I am trying to get logging working in Java to investigate an issue with

a

class failing.

In doing so I used the Rdi option to generate the Java method Calls.

In Java to set the logging level you can do;

Logger.getLogger("Braintree").setLevel(Level.ALL);

What I don't know how to do in RPG is set the constant ALL where ALL is

a

constant in class Level that returns a Level object.

In RPG I have the following;



D getLogger PR O CLASS(*JAVA :

'java.util.logging.L+

D ogger' )
D EXTPROC(*JAVA :

'java.util.logging+

D .Logger' : 'getLogger' )
D STATIC
D
D loggerName O CLASS(*JAVA :

'java.lang.String' )

D setLevel PR EXTPROC(*JAVA :

'java.util.logging+

D .Logger' : 'setLevel' )

D newString pr o extproc(*java
D : 'java.lang.String'
D : *constructor)
D value 25a const varying

D loggerNameJ S O CLASS(*JAVA :

'java.lang.String' )

D getLoggerRet S O CLASS(*JAVA :

'java.util.logging.L+

D ogger' )

D LevelJ S O CLASS(*JAVA :

'java.util.logging.L+

D evel' )

loggerNameJ = newString('Braintree');
getLoggerRet = getLogger( loggerNameJ );

LevelJ = newString('ALL');
setLevel(getLoggerRet : LevelJ);

The program will not compile as the prototype for setLevel only expects
one parameter.


Any suggestions appreciated


Don Brown


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

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: http://amzn.to/2dEadiD

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

Please contact support@xxxxxxxxxxxx for any subscription related

questions.

Help support midrange.com by shopping at amazon.com with our affiliate

link: http://amzn.to/2dEadiD
--
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.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: http://amzn.to/2dEadiD