Re: RPG + POI question

[Scott Klement <rpg400-l@xxxxxxxxxxxxxxxx>]

It would have to be an object of the DRAWING_CLASS -- whatever string 
that constant references -- not the workbook.

-SK

On 12/22/22 4:54 PM, Jon Paris wrote:
> I believe that SSDrawing_createPicture is an instance method - so although the proto only lists two parms there is a hidden first parm required - I guess the workbook ?  I am so rusty on this stuff as I haven't used in 10+ years.
>
> Study the protos of some of the other methods you are using that don't barf, and it should become obvious what you need.
>
>
> Jon P.
>
> > On Dec 22, 2022, at 3:39 PM, DEnglander--- via RPG400-L <rpg400-l@xxxxxxxxxxxxxxxxxx> wrote:
> >
> > Thank you Jon.
> >
> > Here are the messages:
> >
> > *RNF7535 30   9822 050400  The type and attributes of parameter 2 do not
> > match those
> >                            of the prototype.
> > *RNF5406 30   9822 050400  The call passed fewer parameters than the
> > prototype
> >                            indicates are required.
> >
> >
> > Here is the invocation:
> >
> > 9822     ssdrawing_createpicture(h_anchor : h_picture);
> >
> >
> > Parameters for above:
> > dcl-s  h_anchor           like(ssclientanchor);
> > dcl-s  h_picture          int(10 : 0)            inz;
> >
> >
> > Prototype [courtesy of Scott Klement]:
> >      ?*+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
> >      ?* SSDrawing_createPicture(): Establish a picture by associating
> >      ?*      an anchor in a sheet with a picture that has already been
> >      ?*      loaded into the workbook.
> >      ?*
> >      ?*       anchor = anchor object that describes how this
> >      ?*                    picture is attached to the sheet
> >      ?* pictureIndex = index of picture loaded into Workbook
> >      ?*
> >      ?* returns the SSPicture object
> >      ?*+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
> >      D SSDrawing_createPicture...
> >      D                 PR                  like(SSPicture)
> >      D                                     extproc(*JAVA
> >      D                                     : DRAWING_CLASS
> >      D                                     : 'createPicture')
> >      D   anchor                            like(SSClientAnchor)
> >      D   pictureIndex                10i 0 value
> >
> >
> > This sequence:
> >
> > h_picture = ss_addpicture(h_book : p_logo : ss_pic_jpeg);
> > h_anchor = new_SSClientAnchor(h_book : 1 : 1 : 4 : 4 : 9 : 0 : 9 : 1);
> > ssdrawing_createpicture(h_anchor : h_picture);
> >
> >
> > Thank you!
> >
> > Doug
> >
> >
> > "CONFIDENTIALITY NOTICE:  This e-mail transmission (and/or the attachments accompanying it) contain confidential information belonging to the sender.  The information is intended only for the use of the intended recipient.  If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution or the taking of any action in reliance on the contents of the information is strictly prohibited.  Any unauthorized interception of this transmission is illegal under the law.  If you have received this transmission in error, please promptly notify the sender by reply e-mail, and then destroy all copies of the transmission."
> > --
> > This is the RPG programming on IBM i (RPG400-L) mailing list
> > To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
> > To subscribe, unsubscribe, or change list options,
> > visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
> > or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
> > Before posting, please take a moment to review the archives
> > at https://archive.midrange.com/rpg400-l.
> >
> > Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related questions.
> >
> > Help support midrange.com by shopping at amazon.com with our affiliate link: https://amazon.midrange.com