Announcement

**Steve Workings** · 09-18-2006, 10:41 AM

Re: Print (To PDF) problem with build 4130

Dunno about everything, but one error I spy immediately:

You have this snippet:

Code:

"Manure_Auto_Print@[PathAlias.ADB_Path]\Manure_data.dbf"

Reports are in the data dictionaries. So you should point to the .ddd instead of the .dbf, e.g.:

Code:

"Manure_Auto_Print@[PathAlias.ADB_Path]\Manure_data.ddd"

**Jesse Sanders** · 09-18-2006, 12:59 PM

Re: Print (To PDF) problem with build 4130

Steve,
That fucntion is correct it refrences the DBF or the SET not the DDD file.
Jesse

**Pat Bremkamp** · 09-18-2006, 03:12 PM

Re: Print (To PDF) problem with build 4130

Jesse,

I am getting the same error. In my case, the report prints successfully on the local host, but not on the remote (FirmSupport). It used to work when Alpha was hosting, so I suspect some kind of path or permissions problem.

That's not an answer...but misery loves company!

Pat

**Steve Workings** · 09-18-2006, 03:53 PM

Re: Print (To PDF) problem with build 4130

One of us is missing the other here:

The code you showed me references the .dbf. It should reference the .ddd.

Also, I have a bunch of stuff on FirmSupport servers, with no pdf problems.

**Pat Bremkamp** · 09-18-2006, 05:55 PM

Re: Print (To PDF) problem with build 4130

Yes, switching to .ddd fixed my problem.

I can only guess that using .dbf worked on the local host because during my testing I had the database open???

Steve, what's the proper extension for sets?

Thanks,
Pat

**Steve Workings** · 09-18-2006, 07:56 PM

Re: Print (To PDF) problem with build 4130

You're on track. Refer to the .Set

**George Corder** · 11-06-2006, 09:48 PM

Re: Print (To PDF) problem with build 4130

I am having the same problem. I have a local intranet app that has been working for months. It has been some time since I updated but am on 4130_3033. I can browse and edit data but cannot generate my 2 pdf reports. I enter the from and to dates and choose the radio button of the report I want to see but the page just sits there. The Reset button on my report page does not clear the two date fields like it should either.

This is the code for my reporting page:

Code:

IF eval_valid("fromdate") = .f. .or. eval_valid("todate") = .f. Then
goto skipreport
end if 
dim filter as c 
dim order as c

Filter = "transdate >= {"+fromdate+"} .and. transdate <= {"+todate+"}"
Order = "Branchid"

Dim filename as c 
select
    case radiobutton3="1"
    	 filename = session.session_folder + chr(92) + "tempreport.pdf"
   		 filename = report.saveas("MonthlyTellerActivity@<ADB_Path>\tellertotals.dbf","pdf",filter,order,filename,.f.)
		 if file.exists(filename) 
			currentform.RedirectTarget = session.session_url + "tempreport.pdf?" + rand_string(5)
		end if
	case radiobutton3="2"
		 filename = session.session_folder + chr(92) + "tempreport.pdf"
		 filename = report.saveas("MonthlyTellerReport@<ADB_Path>\tellertotals.dbf","pdf",filter,order,filename,.f.)
		 if file.exists(filename) 
		 	currentform.RedirectTarget = session.session_url + "tempreport.pdf?" + rand_string(5)
		end if

end select
skipreport:

**Jesse Sanders** · 11-07-2006, 08:52 AM

Re: Print (To PDF) problem with build 4130

George,
My problem was with the report itself. Generating the report caused vewrsion 7 problems so the whole system hung. the problem was with a function I used to make a graph on the document. Char_Multi() caused the system to hang. I replaced it with replicate(chr(103),calc->Rate_pH) and every thing worked.
Make sure that the report is working first.
That is the only help I can give.
Jesse

**Steve Workings** · 11-07-2006, 09:36 AM

Re: Print (To PDF) problem with build 4130

George -

Your scripting is also attempting to pull reports out of dbfs. They don't exist there.

Where you have

tellertotals.dbf

for example, you should have

tellertotals.ddd

See other pieces of this thread below.

**George Corder** · 11-07-2006, 10:44 AM

Re: Print (To PDF) problem with build 4130

Thanks Steve, I don't know why this has worked for me this long. Steve Wood helped me with this very code here in this thread which I compared to see if my existing code had changed.
I altered my component code as follows but still get the same behavior.

Code:

IF eval_valid("fromdate") = .f. .or. eval_valid("todate") = .f. Then
goto skipreport
end if 
dim filter as c 
dim order as c

Filter = "transdate >= {"+fromdate+"} .and. transdate <= {"+todate+"}"
Order = "Branchid"

Dim filename as c 
select
    case radiobutton3="1"
    	 filename = session.session_folder + chr(92) + "tempreport.pdf"
   		 filename = report.saveas("MonthlyTellerActivity@<ADB_Path>\tellertotals.ddd","pdf",filter,order,filename,.f.)
		 if file.exists(filename) 
			currentform.RedirectTarget = session.session_url + "tempreport.pdf?" + rand_string(5)
		end if
	case radiobutton3="2"
		 filename = session.session_folder + chr(92) + "tempreport.pdf"
		 filename = report.saveas("MonthlyTellerReport@<ADB_Path>\tellertotals.ddd","pdf",filter,order,filename,.f.)
		 if file.exists(filename) 
		 	currentform.RedirectTarget = session.session_url + "tempreport.pdf?" + rand_string(5)
		end if

end select
skipreport:

**Steve Workings** · 11-07-2006, 11:38 AM

Re: Print (To PDF) problem with build 4130

Where does the value for "radiobutton3" come from? After insuring that radiobutton3 does indeed carry a value, the next thing I'd do is:

- Forget the case statements, etc. for a minute, and see if you can just get a script running to print a report. Once you're successful with that, you can start putting the If/EndIf and Case statements around it.

- You may find it benficial to use the between() function for your filter. That's probably not the immediate cause of trouble here, but worth using.

**George Corder** · 11-07-2006, 12:42 PM

Re: Print (To PDF) problem with build 4130

It's from my reports.a5w dialog page.

**Steve Workings** · 11-07-2006, 12:59 PM

Re: Print (To PDF) problem with build 4130

I can't tell from reading your messages:

Is the print code on a seperate A5W page called by the dialog's AfterValidate event? If it is, then it looks to me like you haven't properly shared the radiobutton3 value across pages. It should be set up as a session variable instead.

You can help verify whether the value for radiobutton3 is being passed, by putting this code on the print page:

<%A5
? "Radiobutton3 Value = " + radiobutton3
%>

Or, maybe I'm wrong and this is in the dialog's Aftervalidate event. Tell me/us that and I can be more targeted.

**Steve Wood** · 11-07-2006, 03:08 PM

Re: Print (To PDF) problem with build 4130

Steve Wood helped me with this very code

My only help was with the filter.

Announcement

The Alpha Software Forum Participation Guidelines

Print (To PDF) problem with build 4130

Print (To PDF) problem with build 4130

Comment

Comment

Comment

Comment

Comment

Comment

Comment

Comment

Comment

Comment

Comment

Comment

Comment

Comment