planox. Por  Hi Planox

I add a table Holidays with a Holidays ate field how can add holidays in this script.

Rafael Sanchis Yes, you could of course also integrate a holiday check. But let's solve the existing problem first. 

Planox

For what I needed it is ok if you think it can be improved I hear options. Thanks.

if Plan5_Editable < Plan4_Editable then
        alert("Date Plan 5 cannot be less than Date Plan 4")
    else
        "ok"
    end and
(
        let curRec := this;
        let xDate := cnt(select Holidays where Date = curRec.Plan5_Editable);
        if xDate > 0 then
            let result := dialog("", " Thid DATE is a HOLIDAY Date. We Proceed ?", ["Si", "No"]);
            if result = "No" then
                Plan5_Editable := false
            end
        end
    )

Rafael Sanchis 

Hi Rafel, I don't understand what your script does exactly, but if it works, it's good.

I have a table called "Feiertage" in which all holidays up to 2040 are entered with a 'Datum' and 'Bezeichnung'. My script above could be expanded as follows if holidays should not be taken into account:

let myID := this;
let myDay := Beginn;
let lastDay := Ende;
while myDay <= lastDay do
   if weekday(myDay) < 5 then
      if cnt(select Feiertage where Datum = myDay) < 1 then
         let neuEintrag := (create 'Einträge');
         neuEintrag.(Planung := myID);
         neuEintrag.(Datum := myDay)
      end
   end;
   myDay := myDay + 1
end

Panox Thanks. 

The first alert won't let me include a Plan Date 5 less than the plan date 4.

 The second alert Date Plan 5 does not allow me to include a holiday date

https://youtu.be/avuWOAcXS58?feature=shared