code below. But Tried several previuos versions where code was 100% working...same
Set(
DateSelectedVar;
DateValue(Text(DateValue2.SelectedDate; "dd/mm/yyyy"))
)
;;
ClearCollect(
Appointments;
Strunjan_1
)
;;
If(
IsEmpty(
Filter(
Appointments;
DateSelectedVar >= DateValue('Datum in ura prihoda') And DateSelectedVar <= DateAdd(DateValue('Datum in ura odhoda'); -1)
)
);
Notify("Termin je prost"; NotificationType.Success);
Notify("Termin NI prost"; NotificationType.Error)
)
;;
If(
IsBlank(DataCardValue2.Text) ||
IsBlank(DataCardValue3.Text) ||
IsBlank(DataCardValue4.Text) ||
IsBlank(DataCardValue5.Text);
Notify(
"Prosimo, izpolnite naslednja obvezna polja: " &
Concatenate(
If(IsBlank(DataCardValue2.Text); "Ime in Priimek, "; "");
If(IsBlank(DataCardValue3.Text); "Število oseb, "; "");
If(IsBlank(DataCardValue4.Text); "Telefonska številka, "; "");
If(IsBlank(DataCardValue9.Text); "Naslov, "; "");
If(IsBlank(DataCardValue8.Text); "Davčna številka, "; "");
If(IsBlank(DataCardValue10.Selected); "Zaposlen v enoti, "; "");
If(IsBlank(DataCardValue5.Text); "E-mail"; "")
);
NotificationType.Error
)
;
/* Add the code to prevent saving if the date is unavailable */
If(
IsEmpty(
Filter(
Appointments;
DateSelectedVar >= DateValue('Datum in ura prihoda') And DateSelectedVar <= DateAdd(DateValue('Datum in ura odhoda'); -1)
)
);
SubmitForm(Form1);;
ResetForm(Form1);;
Navigate(Screen1)
)
)
