PowerApps Book a room Template; How do I add all day option

[leslie_rivera]

I am trying to use the Book a Room template but the duration's are limited to up to 4 hrs and I need to be able to allow users to book all day events. Also I don't see an option for reoccurring..

Basically we set up 4 offices for our remote users so when they need to work in the office they can book the room. So I need to be able to let them book all day and for multiple days if needed.

[Nollzie]

I have the same request. I would like to add the option of all day and multiple days./

Any help would be appreciated.

[leslie_rivera]

I wasnt able to update the app for multiple days but I was able to add an "All workday" button which updated the start and end times..

onSelect :
Set(StartDateTime, Time(8,0,0));
Set(EndDateTime, Time(17,0,0));

[Nollzie]

Thanks Leslie, when you click the "All Workday" button, how can I make it adjust the Start End Time boxes 

[leslie_rivera]

On the AdjustDateScreen > Button3_4

You can set your Start and End time. This is the code I have for the OnSelect of that button:

If(Mod(Minute(Now()), 30) <= 14,
Set(StartDateTime, DateAdd(Now(), -Mod(Minute(Now()), 30), TimeUnit.Minutes));
Set(EndDateTime, DateAdd(StartDateTime, 30, TimeUnit.Minutes)),
Mod(Minute(Now()), 30) >= 15,
Set(StartDateTime, DateAdd(Now(), -Mod(Minute(Now()), 30) + 30, TimeUnit.Minutes));
Set(EndDateTime, DateAdd(StartDateTime, 30, TimeUnit.Minutes)),
Set(StartDateTime, Now());
Set(EndDateTime, DateAdd(Now(), -Mod(Minute(Now()), 30) + 60, TimeUnit.Minutes))
);

Set(StartDateTime, DateTimeValue(Date(Year(Now()),Month(Now()),Day(Now())) & " " & Time(6,0,0)));
Set(EndDateTime, DateTimeValue(Date(Year(Now()), Month(Now()),Day(Now())) & " " & Time(18,0,0)));

Set(StartDateTimeUTC, Text(DateAdd(StartDateTime, TimeZoneOffset(), TimeUnit.Minutes), "[$-en-US]yyyy-mm-ddThh:mm") & ":00.000Z");
Set(EndDateTimeUTC, Text(DateAdd(EndDateTime, TimeZoneOffset(), TimeUnit.Minutes), "[$-en-US]yyyy-mm-ddThh:mm") & ":00.000Z");

Set(BookForMeeting, false);

If(NoRoomsList,

Navigate(RoomSelectScreen, BorderStyle.None),

Navigate(RoomListSelectScreen, BorderStyle.None)
),

Set(BookForMeeting, true);
Set(StartDateTime, Blank());
Set(StartDateTimeUTC, Blank());
Set(EndDateTime, Blank());
Set(EndDateTimeUTC, Blank());
Navigate(MeetingSelectScreen, BorderStyle.None)

)