Book A Room App stops showing all my available rooms for not reason. Only show my top room listed, Meaning only one room comes up. If there any changes that we need dont know? I created a new one from the Template and it's doing the same.
Please help, I did everything at my end and can't resolve this issue. All Available rooms show up in Outlook, no issue there.
Thanks, Learn IT
Here is the code:
Set(IsPrevRoomSelect, false);
If(DateTimeRoomChange,
Set(AvailableRoomsCounter, 1);
UpdateContext({ShowLoading: true});
Set(RoomsLeft, Blank());
If(!NoRoomsList,
ClearCollect(AllRooms, Office365.GetRoomsInRoomList(RoomsListsGallery.Selected.Address).value)
);
Set(DateTimeRoomChange, false);
/*
If(CountRows(AllRooms) > 20,
Set(AllRoomsConnector, Concat(FirstN(AllRooms, 20), Address & ";"));
If(CountRows(AllRooms) > 40,
Set(AllRoomsConnector1, Concat(LastN(FirstN(AllRooms, 40), 20), Address & ";"))
),
Set(AllRoomsConnector, Concat(AllRooms, Address & ";"))
);
*/
Set(AllRoomsConnector, Concat(FirstN(AllRooms, 20), Address & ";"));
Concurrent(
ClearCollect(AvailableRooms, Office365.FindMeetingTimes({RequiredAttendees: AllRoomsConnector, IsOrganizerOptional: true,
Start: StartDateTimeUTC, End: EndDateTimeUTC, MeetingDuration: DateDiff(StartDateTime, EndDateTime, Minutes),
MinimumAttendeePercentage: "1", ActivityDomain: "Unrestricted"})),
If(CountRows(AllRooms) > 20,
If(CountRows(AllRooms) > 40,
Set(AllRoomsConnector1, Concat(LastN(FirstN(AllRooms, 40), 20), Address & ";")),
Set(AllRoomsConnector1, Concat(LastN(AllRooms, CountRows(AllRooms) - 20), Address & ";"))
);
ClearCollect(AvailableRooms1, Office365.FindMeetingTimes({RequiredAttendees: AllRoomsConnector1, IsOrganizerOptional: true,
Start: StartDateTimeUTC, End: EndDateTimeUTC, MeetingDuration: DateDiff(StartDateTime, EndDateTime, Minutes),
MinimumAttendeePercentage: "1", ActivityDomain: "Unrestricted"})
),
Clear(AvailableRooms1)
)
);
If(CountRows(AllRooms) > 20,
Collect(AvailableRooms, AvailableRooms1)
);
ClearCollect(AvailableRoomsSorted, SortByColumns(First(AvailableRooms).MeetingTimeSuggestions, "Confidence", Descending), If(CountRows(AllRooms) > 20, SortByColumns(Last(AvailableRooms).MeetingTimeSuggestions, "Confidence", Descending)));
ClearCollect(AvailableRoomsConcat, Concat(Filter(First(AvailableRoomsSorted).AttendeeAvailability, Availability = "Free"),
Attendee.EmailAddress.Address, ","), If(CountRows(AllRooms) > 20, Concat(Filter(Last(AvailableRoomsSorted).AttendeeAvailability, Availability = "Free"),
Attendee.EmailAddress.Address, ",")));
ClearCollect(AvailableRoomEmails, Split(First(AvailableRoomsConcat).Value, ","), If(CountRows(AllRooms) > 20, Split(Last(AvailableRoomsConcat).Value, ",")));
ClearCollect(AvailableRoomEmailName, AddColumns(RenameColumns(AvailableRoomEmails, "Result", "Email"), "Name",
LookUp(AllRooms, Email = Address).Name));
UpdateContext({ShowLoading: false});
Set(RoomsLeft, CountRows(AllRooms) - 40 * AvailableRoomsCounter)
);
Clear(AvailableRooms);
Clear(AvailableRooms1)
