A12 Report problems

[canc]

Hi everyone

we have a project written in a5 v11, that loads reports on web pages, this is done so the reports can by dynamic as opposed to being off a button

We are testing this app in v12 and have a problem when doing the above.

Our xbasic code opens up a sql table and gets a path to the report that is in the database , so in a11 for example we have

invoice_email_wtm_man@c:\a5webroot\l...ravelcloud.alb

When we try to run the some code in V12, we receive an error saying path not found ..., how can I reference the v12 project reports

thanks in advance

john

[[email protected]]

Re: A12 Report problems

If you are using projectreports then the reports are not in the alb anymore but are separate files.

hth

Pieter

[canc]

Re: A12 Report problems

Hi Pieter

Thanks for the reply, I understand that the reports are all now separate and in the example above, I have a report called
invoice_email_wtm_man.a5prt

We have tried to use that filename along with a host of others but just do not seem to be able to get it right, in my example would you know what we should be looking for ?

thanks

john

[Peter.Greulich]

Re: A12 Report problems

I guess I don't understand what you are trying to do? You can have code with branching and decision making and print whatever report you want. Not sure why you need a path to the report?

[canc]

Re: A12 Report problems

Hi Peter
We need to do it this way because there are separate report layouts depending on what department the user is connected to...

So we have to get the path to the report dynamically when we run the code.., the working in a11 is this, with the variable layout set as the path above...


dim pdfopts as p

dim source as c

Dim filename as c = Request.GetRequestTempFileName("pdf")

filename = report.saveas(layout,"pdf","","",Source,.f.,"",NULL_VALUE(),opts)

' filename = report.saveas(layout,"pdf",filter,order,filename,.f.,opts)

if file.exists(filename)
Session.SaveDataAsFile("tempreport.pdf",file.to_blob(filename))
Response.Redirect( Session.FormatFileDataURL("tempreport.pdf") )
end if

cn.close(connection)

So i think we just need to figure out the v12 syntax ?

thanks

john

[mikeallenbrown]

Re: A12 Report problems

I think your first step needs to be placing a debug(1) at the beginning of your function then stepping through it. When you get to the point of failure you'll get an error message. You can also explore the different elements of your function while in debug.

Alternatively you can import your reports from the workspace dictionary. In V12 reports can be individual components, if you will, and published separately. You can then just use action javascript to run reports however you need.

Ashampoo_Snap_Friday, May 18, 2018_09h45m07s_009_.png

Ashampoo_Snap_Friday, May 18, 2018_09h45m40s_010_.png

[neosys]

Re: A12 Report problems

I am hoping that this is the right place for my problem of running an Alpha Five v.10.5 web application on Alpha Anywhere.


My problem is in the web components (dialog) with the following xbasic code in the AfterValidate event. I have tried creating new dialog component from the legacy dialog component with limited success. I am also aware that session.session_folder function is not available in Alpha Anywhere. I have tried solutions offered by both Richard and others on this forum but so far with no success.

I would appreciate it if someone can help in converting the below five lines of code so that it would give the desired result in Alpha Anywhere.

filename = session.session_folder + chr(92) + "r6.pdf"
filename = report.saveas("by30daysmortality@<adb_path>\amputee.set", "pdf", filter, order, filename,.f.)
if file.exists(filename)
currentform.RedirectTarget = session.session_url + "r6.pdf?" + rand_string(5)
end if

[mikeallenbrown]

Re: A12 Report problems

Raj, this is the version 12 part of the forum.

Here is the version 10 section: https://www.alphasoftware.com/alphaf...r-Applications

[neosys]

Re: A12 Report problems

Hi Mike

Yes, I am aware this is V12 thread. My question was regarding porting across a web component written in V10.5 into V12.

[Matrix]

Re: A12 Report problems

If your reports are "Project Reports" defined in the Web Projects Control Panel, the reports are published to the webroot. I note from an example I have in one of my apps that you need to pass the fully qualified filename as the "Layout_Name" argument. This appears to be undocumented so I'm not sure how I figured it out...

Based on your example, this would be as follows:

dim pdfopts as p

dim source as c

dim layout as c

Dim filename as c = Request.GetRequestTempFileName("pdf")

layout = "C:\A5Webroot\invoice_email_wtm_man.a5rpt"

filename = report.saveas(layout,"pdf","","",Source,.f.,"",NULL_VALUE(),opts)

However review of the current documentation identifies that there is now web specific functions available that do mention that the layoutname needs to be fully qualified.

Suggest using a5w_report_saveas() function moving forward though the above technique is still working for my application with the current release.
https://www.alphasoftware.com/docume...20Function.xml

[neosys]

Re: A12 Report problems

Thank you Jason for your reply.

My reports are not project reports. My web application is based on a dbf and not sql database. In Alpha V12, I can open my reports from the Control Panel but not with xbasic code from within a web component.

Essentially what I am looking for is to replace the following xbasic code which works in my Alpha Five v10.5 web application but not in Alpha V12.

filename = session.session_folder + chr(92) + "r6.pdf"
filename = report.saveas("by30daysmortality@<adb_path>\amputee.set", "pdf", filter, order, filename,.f.)
if file.exists(filename)
currentform.RedirectTarget = session.session_url + "r6.pdf?" + rand_string(5)
end if

Any help will be much appreciated.

Regards and thanks

Raj