Scripting current date + 6 days?

[kfutter]

We are currently converting a large number of databases from v6 to v8, and I've come across my first real problem so far. A calendar db we have has some scripted buttons that show records for the current date + up to one month ahead. I noticed that converting to v8 updated the syntax of the scripts to be v8 compliant, but they no longer work. I didn't write the original scripts, but have managed to get only the one that selects the current date to work. Anything that appends a set range to the current date just pops up a dialogue box complaining about invalid find criteria.

The important lines of the converted script are like so:

Enter Find Mode []

Insert Calculated Result [select; calendar::date; "//..."&GetAsText(Get(CurrentDate)+6)]

Insert Calculated Result [select; calendar::Level; "1"]

Perform Find []

I've tried a few variations on this theme, but no go. Anyone know how to achieve this in FM 8?

Cheers,

Kevin

[Ender]

I'd try it this way:

Enter Find Mode []

Set Field [ calendar::date; get(currentdate) & "..." & Get(CurrentDate)+6]

Set Field [ calendar::Level; 1]

Perform Find []

[kfutter]

Thanks. I actually tried something similar to that, but still using a calculated result. Needless to say, it didn't work, but I'll give your variation a go and report back.

Cheers,

Kevin

[kfutter]

Just a quick report back - works like a charm! Must remember from now on: Set Field, Set Field, Set Field ...

Cheers and thanks,

Kevin