**********************************************************************
* Project : MK00000182
* RPG source : JAVAMAILP2
* Date : 02/25/2002
* Programmer : James Zhang
* Desc. : /copy source for pgm JAVAMAIL.
**********************************************************************
* JavaMail sendMail method.
**********************************************************************
* java method
D sendMail1 PR 5I 0 ExtProc(*JAVA:Class1:'sendMail')
D STATIC
* method parameters
D from O Class(*JAVA:'java.lang.String')
D Const
D to O Class(*JAVA:'java.lang.String')
D Const
D replyTo O Class(*JAVA:'java.lang.String')
D Const
D subject O Class(*JAVA:'java.lang.String')
D Const
D text O Class(*JAVA:'java.lang.String')
D Const
**********************************************************************
* JavaMailwithAttachment sendMail method.
**********************************************************************
* java method
D sendMail2 PR 5I 0 ExtProc(*JAVA:Class2:'sendMail')
D STATIC
* method parameters
D from O Class(*JAVA:'java.lang.String')
D Const
D to O Class(*JAVA:'java.lang.String')
D Const
D replyTo O Class(*JAVA:'java.lang.String')
D Const
D subject O Class(*JAVA:'java.lang.String')
D Const
D text O Class(*JAVA:'java.lang.String')
D Const
D filename1 O Class(*JAVA:'java.lang.String')
D Const
D filename2 O Class(*JAVA:'java.lang.String')
D Const
D filename3 O Class(*JAVA:'java.lang.String')
D Const
D filename4 O Class(*JAVA:'java.lang.String')
D Const
D filename5 O Class(*JAVA:'java.lang.String')
D Const
D filename6 O Class(*JAVA:'java.lang.String')
D Const
D filename7 O Class(*JAVA:'java.lang.String')
D Const
D filename8 O Class(*JAVA:'java.lang.String')
D Const
**********************************************************************
* getBytes - Converts a string to a byte array for use in a char field
**********************************************************************
D getBytes PR 30A ExtProc(*JAVA:
D 'java.lang.String':
D 'getBytes')
D Varying
**********************************************************************
* newString constructor that accepts a byte array
* (an alphnumeric variable in RPG speak). It
* returns a string object.
**********************************************************************
D newString PR O ExtProc(*JAVA:
D 'java.lang.String':
D *CONSTRUCTOR)
D Class(*JAVA:'java.lang.String')
D byes 9999A Const Varying
**********************************************************************
* BigD2String conversion that accepts THIS
* instance of BigDecimal and returns a string object.
**********************************************************************
D BigD2String PR O ExtProc(*JAVA:
D 'java.math.BigDecimal':
D 'toString')
D Class(*JAVA:'java.lang.String')