LongRange Developer Forum

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

else

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

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?

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

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.