This error message is very annoying - annyone know what it means?

[drgarytraub]

Every time I make ANY change to the components or pages of this module, and then re-publish each, I get this error message:

500 Internal Server Error
"Script Error
Error:Script: /AMAv5.0/Scheduler_Totals.a5w line:17
x_Scheduler_Total = a5w_run_Component(tmpl_Scheduler_Total)
Property not found
f.Value.dump method not found."

Like I said, if I re-publish each changed page and component, I still get this error message. Even if I re-publish the entire application with the setting to just re-publish any files that have changed, I still get the error message. Only if I re-publish the ENTIRE application, then I do not get the error message. That works. Only problem, the application is large enough that republishing it in its entirety takes at least an hour!!!

Does anyone understand what might be going on here???

Gary

[Steve Workings]

Re: This error message is very annoying - annyone know what it means?

f.Value.dump method not found."

It most likely means one of your scripts in the component's events is expecting a variable named "f" that doesn't exist, at least much of the time.

A good way to trap this kind of error is to first check that the variable exists.

if eval_valid("f")
  somethinghere = f.Value.dump()
end if

[drgarytraub]

Re: This error message is very annoying - annyone know what it means?

Good morning Steve,

Thanks for responding.

Where would I put that code?

But also, I am not sure I understand how that addresses the question of why a full, re-publishing of the entire site does NOT produce the error. Or said differently, What does republishing the entire app do that, re-publishing just the changed components and pages does not do??

Looking to understand ...

Gary

[Pat Bremkamp]

Re: This error message is very annoying - annyone know what it means?

I can't help with the question of why the error does or does not appear based on publishing all, but I can help you know where to look.

Rreading the error message, it says the problem is actually in a component named Scheduler_Total. The error is in the component, not in the page, because it is happening in the line that processes the component. If it is always the same component name, then you can look in that component.

If the component name changes, or it happens in a variety of components, then I would suspect that you have made a change to a table (perhaps a field name) and not updated the change in the components. It is important, when you make a change, to always refresh the table in the component or you won't see any error messages as you work on the component.

Pat

[drgarytraub]

Re: This error message is very annoying - annyone know what it means?

Pat,

Thanks so much for answering.

The component is a dialog component called Scheduler_Totals - alpha apparently truncates the last "s"

The dialog has 4 fields, 2 of them date fields called date1 and date2, and 2 are character fields called prov1 and prov2.

Here is the Xbasic code in the AfterValidate event:

session.date1=CurrentForm.Controls.Date1
session.date2=CurrentForm.Controls.Date2
session.prov1=CurrentForm.Controls.Prov1
session.prov2=CurrentForm.Controls.prov2


dim tblv as p
tblv=table.open("view_total_on_sched")
tblv.zap(.t.)
tblv.close()
tblv=table.open("view_total_on_sched")

dim tbl as p
dim query.filter as c
dim query.order as c
dim query.options as c
dim sdate1 as d
dim sdate2 as d
dim sprov1 as c
dim sprov2 as c
sdate1=ctod(CurrentForm.Controls.Date1)
sdate2=ctod(CurrentForm.Controls.Date2)
sprov1=CurrentForm.Controls.Prov1
sprov2=CurrentForm.Controls.prov2

dim tfee as n
dim tiexp as n
dim tpexp as n
dim two as n
dim ttexp as n

dim tblp as p
dim ndxp as p
tblp=table.open("provider")
query.filter="scheduleable='Yes' .and. prov>=sprov1 .and. prov<=sprov2"
query.order="prov"
query.options=""
ndxp=tblp.query_create()
dim tprov as c
while .not. tblp.fetch_eof()
tprov=tblp.prov
tfee=0.00
tiexp=0.00
tpexp=0.00
two=0.00
ttexp=0.00

tbl=table.open("appointments")
query.filter="appt='Y' .and. date>=sdate1 .and. date<=sdate2 .and. prov=tprov"
query.order="prov"
query.options=""
tbl.query_create()
tbl.fetch_first()
while .not. tbl.fetch_eof()
tfee=tfee+tbl.fee
tiexp=tiexp+tbl.insexp
tpexp=tpexp+tbl.ptexp
two=two+tbl.wo
ttexp=ttexp+tbl.Totexp
tbl.fetch_next()
end while

tblv.enter_begin()
tblv.Prov=tprov
tblv.Fee=tfee
tblv.Insexp=tiexp
tblv.Ptexp=tpexp
tblv.Wo=two
tblv.Totexp=ttexp
tblv.enter_end()

tblp.fetch_next()
end while

tblv.close()

CurrentForm.RedirectTarget="Scheduler_Totals_View.a5w"


I do not see any errors. Do you see anything wrong with this code?

Any thoughts would bey very much appreciated.

Gary

[Pat Bremkamp]

Re: This error message is very annoying - annyone know what it means?

Since you asked, I'll give it a try. Yes, I do see some errors...especially opening tables and not closing them. Looks like you open the appointments table every time you go through the loop, but never close it. So, you have multiple instances of that table open.

Also, you should use the path alias when you open a table, like
tblv=table.open("[PathAlias.ADB_Path]\view_total_on_sched")

That said, the publishing problem is not due to an aftervalidate code error. The publish process does not validate your code. If you were getting that error when you run the page, then it could be a code error.

The component builder is dropping the last "s" on your component name when it creates the alias back in the line

tmpl_Scheduler_Total = a5w_run_Component(tmpl_Scheduler_Totals)

Pat

[drgarytraub]

Re: This error message is very annoying - annyone know what it means?

Hi Pat,

Thanks again for looking.

I always add path alias before running the app from the internet, but it causes no problems when running from the local webroot.

Thanks for catching the lack of a tbl.close() within the while loop!

You mentioned alpha drops the "s" - is there any consequence to that? And why do they drop the "s", is the name too long?

And, now I am back to what do you think might be causing a full re-publish to work, but a partial not?

Gary

[Steve Workings]

Re: This error message is very annoying - annyone know what it means?

Gary - you showed us the AfterValidate code. Is this when you get the error? Or do you get it at another stage? Do you have any code in this component with a .value.dump included?

[Pat Bremkamp]

Re: This error message is very annoying - annyone know what it means?

There is no adverse affect from droping the "s". It's because the name is too long.

I was still thinking that the error occurred in the publish process. Is that true, or is it when you run the page after a full (or not) publish?

The only time I use .dump() is when working on an array which comes from a multiselect dropdown or checkboxes. you didn't mention one of those in your component.

Pat

[drgarytraub]

Re: This error message is very annoying - annyone know what it means?

Steve and Pat,

The error ddid not occur during publishing, only when running the application, and only if the publish was partial. This apparently has something to do with use of dropdowns in the dialog, which was suggested to me by Jerry Brightbill. Removing drop downs from the dialog removes the problem, which is not acceptable (because I need drop downs), but it at least allows me to futher refine that component in that I can make a change, publish just it, and then test it.

Also, I do not use any code that contains a .dump method. The only code I use in that dialog component is: what I showed you in the AfterValidate event, and the following in the Initilaize event:

dim tdow as n
tdow=dow(date())

dim tdate1 as d

if tdow=1
tdate1=date()
else if tdow=2
tdate1=date()-1
else if tdow=3
tdate1=date()-2
else if tdow=4
tdate1=date()-3
else if tdow=5
tdate1=date()-4
else if tdow=6
tdate1=date()-5
else if tdow=7
tdate1=date()-6
end if

CurrentForm.Controls.date1=dtoc(tdate1)
CurrentForm.Controls.date2=dtoc(tdate1+6)

Gary

[Steve Workings]

Re: This error message is very annoying - annyone know what it means?

Gary - we're guessing away here and taking days to solve your problem. Maybe it's time you gave us a copy of the pertinent component, underlying data etc.

[drgarytraub]

Re: This error message is very annoying - annyone know what it means?

Steve,

Not having done that before, how do I do it?

[Steve Workings]

Re: This error message is very annoying - annyone know what it means?

Zip up the pertinent files (your component and any necessary table or tables) and upload 'em here using the "Manage Attachments" button at the bottom of the message editor.

Make sure you don't share confidential data in your tables.