Hi! - I am getting an error when calling a java program from RPG

 

The Java Virtual Machine has ended.                                   

Function check. MCH74A5 unmonitored by QJVAJNI at statement 0000002959

  instruction X'0000'.                                                

Pointer not set for location referenced.                              

Internal failure in compiler or subroutine.                           

Application error.  RNX9998 unmonitored by SENDEMAIL at statement *N, 

  instruction X'0000'.                                                

 

Code looks like this:

main            PR                  EXTPROC(*JAVA                     

                                     : 'com.tsi.email.SimpleSendEmail' 

                                     : 'main')                         

                                     STATIC                            

                                 O   class(*JAVA:'java.lang.String')   

                                     CONST                             

                                     Dim(4)                            

                                     Options(*varSize)                 

 newString       PR              O   EXTPROC(*JAVA:                    

                                     'java.lang.String':               

                                     *CONSTRUCTOR)                     

                              100A   CONST VARYING                     

 args            S                   like(newstring)                   

                                     Dim(4)                            

                                                                       

/free                                                                  

 args(1) = newString('robglasener@xxxxxxxxxxxxx');                     

 args(2) =  newString('rglasener@xxxxxxxxxxxxxxxx');                   

args(3) = newString('Important Message from AS/400');            

args(4) = newString('Here is a sample message from the AS/400'); 

main(args);                                                      

return;                                                          

                                                                 

*INLR = *ON;                                                     

/end-free                       

 

I am thinking that it has something to do the way I have the args array
setup. Any help would be greatly appreciated. Thanks



As an Amazon Associate we earn from qualifying purchases.

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2025 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.