How to email a report directly from grid

[-Jinx-]

Re: How to email a report directly from grid

Just get rid of sessionfolder or whatever it's called <SessionFolder> I think? I had that problem too back when I upgraded to V12. I don't think it's related. If you are on V12.3 like me, then the problem is most likely the one I'm experiencing now. The answer may be in the new "Prototype Function" notes that show up when targeting Xbasic with a report...

function reportForEmail as c (e as p)
'This function is called after the report has printed
'The e object that is passed in includes:
'e.tmpl - the component definition
'e.dataSubmitted - data from the component
'e.fileSessionKey - the key where the binary data for the report that was printed is stored in session storage.

'The function can return Javascript to execute in the browser.

'Using the e.fileSessionKey value you can retrieve the binary data for the report
'For example
'dim b as b 
'session.GetDataFromFile(b,e.fileSessionKey)
'dim size as n 
'size = b.size()
'if size = 0 then 
'' ---- there must have been an error - no data was retrieved
'end if 
	
	
'Sample code to e-mail the report using the Mandril email service -----
'dim key as c 
'key = e.fileSessionKey
'dim b as b 
'get the binary day for the report
'session.GetDataFromFile(b,key)
'dim size as n 
'size = b.size()
'if size = 0 then 
'	reportForEmail = "alert('Report was not sent.');"
'	exit function
'end if 
'If you don't have a Mandrill secret key, sign up at Mandrill.com
'dim mysecretkey as c = ""   'if you leave this blank the key value is read from a setting in Project Properties
'dim ms as p
'ms.send_to = "specify comma delimited list of email addresses"
'ms.from_email = "your email address"
'ms.subject = "put email subject here"
'ms.message_html = "put email body here"
'dim ms.attachmentsArray[1] as p
'ms.attachmentsArray[1].name = "NameOfFile.pdf"   'if the report was an html report, use the .html extension
'ms.attachmentsArray[1].type = resolve_mime_type("pdf") 'if the report was an html report, use the 'html'
'ms.attachmentsArray[1].content = base64encode(b)
'dim pResult as p
'pResult = email_send_mandrill(mysecretkey,ms)
'if pResult.error = .f. then 
'	reportForEmail = "alert('Report sent.');"
'else
'	__name = "alert('Report was not sent.');"
'end if 
end function

I think it may use some type of key now which is screwing things up.

This is messing up my mojo right now too so I'm going to try to fix this ASAP

[-Jinx-]

Re: How to email a report directly from grid

I've submitted a bug report. Hopefully we can get this cleared up.

[-Jinx-]

Re: How to email a report directly from grid

OK,
Evidently, the way I was doing it wasn't even supposed to work at all EVER. LOL. There's a "proper" way to do it that isn't really documented very well. The function prototype notes I posted above hint at it but don't actually tell you how to do it.

So, you have to do something like this:

function reportForEmail as c (e as p)

dim ajaxResponse as C
dim reportName as C = e.reportFilename
dim vjscmd as c
dim key as c
key = e.fileSessionKey
dim b as b
session.getDataFromFile(b,key)
file.From_blob(reportName,b)
	debug(1)              
                session.fileName=e.reportFilename
                ajaxResponse="{grid.object}.setValue('D','REPORTFILENAME','"+js_escape(session.fileName)+"');"
                reportForEmail=ajaxResponse
           
end function

Then you'll have to use the

file.remove(reportName)

in another callback so your server doesn't fill with temp files.

OR you can do it the Xbasic way which is the way I do it now normally (probably the way Ghandi is talking about.)

But the Xbasic way will need to use the new methods as well if you are on V12.3. On 11 both my method and Ghandi's will work OK.

[-Jinx-]

Re: How to email a report directly from grid

Instead of using e.reportFilename Selwyn just informed me that you can do this instead:

dim reportName as c = request.GetRequestTempFileName("pdf")

probably a better idea in case the e.reportFilename goes away as well.

[CharlesParker]

Re: How to email a report directly from grid

It would be really much more helpful if the box that says attachment...just allowed you to select a report or a file...from a genie.
Speaking of genies I am glad Alpha decided to go with them. Wizards are used way too much and nobody would use a witch...a Warnock maybe

[-Jinx-]

Re: How to email a report directly from grid

It would be really much more helpful if the box that says attachment...just allowed you to select a report or a file...from a genie.
Speaking of genies I am glad Alpha decided to go with them. Wizards are used way too much and nobody would use a witch...a Warnock maybe

A warlock you mean? Haha. Yup, but a wizard or warlock in his right mind would just frag you if you annoyed him. Genies HAVE to give you some wishes. Unfortunately, like Alpha's Genies, they can be pretty tricky with said wishes.

Yeah, it sure would be a lot easier if you could automatically attach a report to an email.

[CharlesParker]

Re: How to email a report directly from grid

Yes "Warlock" unfortunately I use a program called auto-corrupt.

[-Jinx-]

Re: How to email a report directly from grid

Yes "Warlock" unfortunately I use a program called auto-corrupt.

My Note 4 wanted to type "Warnock" also.

Anyway, I had to redo all of my applications that email attached reports to use the new method I just described above. So it does work with the latest build of 12.3. I just had to spend all day messing around with it. Par for the course though. It seems every upgrade messes up something I did so I'm getting used to it. Not too surprising I guess, since parts of my code date back to version 10.

[CharlesParker]

Re: How to email a report directly from grid

So what method did you use? I mean did you use what you posted or the advice Selwyn gave? Do you still have to get rid of the temp files?

[CharlesParker]

Re: How to email a report directly from grid

Update: This is working for me FINALLY!!!
I did try to use
dim reportName as c = request.GetRequestTempFileName("pdf")
in place of
dim reportName as C = e.reportFilename

BUT that caused the attachment to fail. I am creating a lot of temporary files, that I would like to clean up/delete during this process.
just not 100% sure where to put the code snippet provided here.

On a somewhat unrelated note:
Out of curiosity I googled Warnock, it's an interesting topic, John Warnock was the founder of Adobe and then theres Bryan Warnock noted for
"Warnocks Dilemma" which is defined as,

“Warnock's Dilemma: The act of choosing whether the lack of response to a discussion-list post is because of its brilliance (there's nothing to add) or because of its stupidity (it doesn't deserve comment).”

[CharlesParker]

Re: How to email a report directly from grid

There's always a new issue right? This is not without issue as well. So the report is emailed however the PDF does not appear as does the html print out so the invoice number is cut off. It's almost as if the right margin is different. Might be a design of the report issue - but again the report is printing and this will open up new avenues for me of learning.

Thanks to Jinx and Ghandi (and of course Selwyn) for taking the time they did to help!

[GGandhi]

Re: How to email a report directly from grid

Update: This is working for me FINALLY!!!

very good.

[Scott B]

Re: How to email a report directly from grid

I did reply to your pm and showed how I do it.
have you had any chance to look at it?

Gandhi, would you be kind enough to share your method? Thank you.

[Scott B]

Re: How to email a report directly from grid

I did reply to your pm and showed how I do it.
have you had any chance to look at it?

Gandhi, would you be kind enough to share your method? Thank you.

[GGandhi]

Re: How to email a report directly from grid

are you trying to send a report as pdf via email?