Fix AcquireToken procedure for on-prem environment

[Copilot]

Problem

The AcquireToken procedure references AzureADAppSetup.FindFirst() without a guard, which fails on-prem when no setup record exists.

Investigation Result

The code snippet does not exist in this repository. After exhaustive search:

• AzureADAppSetup table — not found
• AzureADAuthFlow codeunit — not found
• AcquireTokenFromCacheAsSecretText() — not found
• AcquireTokenFromCacheWithCredentialsAsSecretText() — not found

This code appears to be from the Base Application, not BCApps/System Application.

Recommended Fix

If located, change:

else begin
    AzureADAppSetup.FindFirst();  // Fails if record doesn't exist
    AccessToken := ...
end;

To:

else begin
    if not AzureADAppSetup.FindFirst() then
        exit;
    AccessToken := ...
end;

Action Required

Please provide the file path or confirm if this should be addressed in a different repository.

---

💬 We'd love your input! Share your thoughts on Copilot coding agent in our 2 minute survey.