Save_Image error

Please do not use to report errors- use your regional help desk.
Please mark posts as being for RPG or RDMLX (LANSA) developer.
To subscribe by email, display this forum, scroll to the end and select ‘Subscribe Forum’.
Post Reply
Posts: 93
Joined: Mon Jul 16, 2012 3:19 am

Save_Image error

Post by soapagent » Thu Aug 24, 2017 11:58 pm

I have a long range app which allows the user to take a photo and upload it to the iSeries. I have the following code

#Com_Owner.Save_Image Name(ADDIMAGE) Filename(#ifslnm) Result(#Iresult)

If Cond(#Iresult *EQ 1)

... Create database record


Message Msgid(mbo0004) Msgf(HSCMSG) Msgdta(#Iresult)

The result code is appearing in the message (I've only seen a screen print) as U0 (with an acute accent over the U).

This function has always worked in the past and it works for me internally. Its just failing in the field. The only difference I can think of is the quality of the connection.

The only code change this year was the addition of two lines to set the image size.

#Com_Owner.Set_Image Layout_Row(3) Layout_Col(1) Layout_Cols(4) Allowchange(True) Blankimageresource('AttachPhotoHere2.png') Name(ADDIMAGE) Newimage_Thumbnail(25%)

#Com_Owner.Set Property('ADDIMAGE.NewImage.Resize.Width.LD') To('960')
#Com_Owner.Set Property('ADDIMAGE.NewImage.Resize.Height.LD') To('720')

Anything spring to mind?

Posts: 289
Joined: Tue Apr 17, 2012 7:21 pm

Re: Save_Image error

Post by tsupartono » Fri Aug 25, 2017 12:39 am

When did this start failing?
Has there been any updates (SP, EPC) recently applied to the LANSA installation on the IBM i?

Posts: 93
Joined: Mon Jul 16, 2012 3:19 am

Re: Save_Image error

Post by soapagent » Fri Aug 25, 2017 1:34 am

Sorry Tony, I did some more checking and someone had changed the authority on the upload folder so the writes were being rejected. Its working again now.

Many thanks for the rapid response.

Have a good weekend.

Post Reply