diff --git a/src/System Application/App/Agent/Interaction/Internal/AgentTaskImpl.Codeunit.al b/src/System Application/App/Agent/Interaction/Internal/AgentTaskImpl.Codeunit.al
index 47ff6de66d..5a9983d01a 100644
--- a/src/System Application/App/Agent/Interaction/Internal/AgentTaskImpl.Codeunit.al
+++ b/src/System Application/App/Agent/Interaction/Internal/AgentTaskImpl.Codeunit.al
@@ -186,7 +186,7 @@ codeunit 4300 "Agent Task Impl."
[EventSubscriber(ObjectType::Codeunit, Codeunit::"System Action Triggers", GetPageSummary, '', true, true)]
local procedure OnGetGetPageSummary(PageId: Integer; Bookmark: Text; var Summary: Text)
var
- TempPageSummaryParameters: Record "Page Summary Parameters";
+ TempPageSummaryParameters: Record "Page Summary Parameters" temporary;
PageSummaryProvider: Codeunit "Page Summary Provider";
begin
if PageId = 0 then begin
diff --git a/src/System Application/App/Agent/Setup/AgentCard.Page.al b/src/System Application/App/Agent/Setup/AgentCard.Page.al
index dd1af2c193..67d809d25c 100644
--- a/src/System Application/App/Agent/Setup/AgentCard.Page.al
+++ b/src/System Application/App/Agent/Setup/AgentCard.Page.al
@@ -253,7 +253,7 @@ page 4315 "Agent Card"
end;
var
- TempUserSettingsRecord: Record "User Settings";
+ TempUserSettingsRecord: Record "User Settings" temporary;
Language: Codeunit Language;
ProfileDisplayName, CopilotAvailabilityTxt : Text;
ProfileChangedQst: Label 'Changing the agent''s profile may affect its accuracy and performance. It could also grant access to unexpected fields and actions.\\Do you want to continue?';
diff --git a/src/System Application/App/Agent/Setup/AgentImpl.Codeunit.al b/src/System Application/App/Agent/Setup/AgentImpl.Codeunit.al
index 5e5ffb6472..c2d2116e0e 100644
--- a/src/System Application/App/Agent/Setup/AgentImpl.Codeunit.al
+++ b/src/System Application/App/Agent/Setup/AgentImpl.Codeunit.al
@@ -126,7 +126,7 @@ codeunit 4301 "Agent Impl."
local procedure SetProfile(Agent: Record Agent; var AllProfile: Record "All Profile")
var
- TempUserSettingsRecord: Record "User Settings";
+ TempUserSettingsRecord: Record "User Settings" temporary;
UserSettings: Codeunit "User Settings";
begin
UserSettings.GetUserSettings(Agent."User Security ID", TempUserSettingsRecord);
@@ -147,7 +147,7 @@ codeunit 4301 "Agent Impl."
procedure UpdateLocalizationSettings(AgentUserSecurityID: Guid; var NewUserSettingsRec: Record "User Settings")
var
Agent: Record Agent;
- TempUserSettingsRecord: Record "User Settings";
+ TempUserSettingsRecord: Record "User Settings" temporary;
UserSettings: Codeunit "User Settings";
begin
GetAgent(Agent, AgentUserSecurityID);
@@ -176,7 +176,7 @@ codeunit 4301 "Agent Impl."
local procedure AssignCompany(AgentUserSecurityID: Guid; CompanyName: Text)
var
Agent: Record Agent;
- TempUserSettingsRecord: Record "User Settings";
+ TempUserSettingsRecord: Record "User Settings" temporary;
UserSettings: Codeunit "User Settings";
begin
GetAgent(Agent, AgentUserSecurityID);
diff --git a/src/System Application/App/Agent/Setup/SetupPart/AgentSetupBuffer.Table.al b/src/System Application/App/Agent/Setup/SetupPart/AgentSetupBuffer.Table.al
index ae8ad8da36..6cc03efafc 100644
--- a/src/System Application/App/Agent/Setup/SetupPart/AgentSetupBuffer.Table.al
+++ b/src/System Application/App/Agent/Setup/SetupPart/AgentSetupBuffer.Table.al
@@ -190,7 +190,7 @@ table 4310 "Agent Setup Buffer"
internal procedure GetUserSettings(var TempNewUserSetting: Record "User Settings" temporary)
var
- TempFetchedUserSettings: Record "User Settings";
+ TempFetchedUserSettings: Record "User Settings" temporary;
Agent: Codeunit Agent;
begin
if not TempUserSettings.FindFirst() then begin
diff --git a/src/System Application/App/Agent/Setup/SetupPart/AgentSetupImpl.Codeunit.al b/src/System Application/App/Agent/Setup/SetupPart/AgentSetupImpl.Codeunit.al
index 6513b3ba4b..1961d478cc 100644
--- a/src/System Application/App/Agent/Setup/SetupPart/AgentSetupImpl.Codeunit.al
+++ b/src/System Application/App/Agent/Setup/SetupPart/AgentSetupImpl.Codeunit.al
@@ -138,7 +138,7 @@ codeunit 4325 "Agent Setup Impl."
local procedure UpdateFields(var AgentSetupBuffer: Record "Agent Setup Buffer"; UserSecurityID: Guid; AgentMetadataProvider: Enum "Agent Metadata Provider"; DefaultUserName: Code[50]; DefaultDisplayName: Text[80])
var
Agent: Record Agent;
- TempUserSettings: Record "User Settings";
+ TempUserSettings: Record "User Settings" temporary;
Language: Codeunit Language;
AgentMetadata: Interface IAgentMetadata;
begin
@@ -166,7 +166,7 @@ codeunit 4325 "Agent Setup Impl."
[Scope('OnPrem')]
procedure OpenLanguageAndRegionPage(var AgentSetupBuffer: Record "Agent Setup Buffer"): Boolean
var
- TempUserSettings: Record "User Settings";
+ TempUserSettings: Record "User Settings" temporary;
Language: Codeunit Language;
AgentUserSettings: Page "Agent User Settings";
begin
@@ -209,7 +209,7 @@ codeunit 4325 "Agent Setup Impl."
internal procedure AppendAgentSummary(var AgentSetupBuffer: Record "Agent Setup Buffer"; SummaryText: Text): Text
var
- TempUserSettings: Record "User Settings";
+ TempUserSettings: Record "User Settings" temporary;
Language: Codeunit Language;
NewSummaryText: Text;
begin
@@ -240,7 +240,7 @@ codeunit 4325 "Agent Setup Impl."
local procedure CreateAgent(var AgentSetupBuffer: Record "Agent Setup Buffer"): Guid
var
AgentRecord: Record Agent;
- TempNewUserSettings: Record "User Settings";
+ TempNewUserSettings: Record "User Settings" temporary;
TemporaryAgentAccessControl: Record "Agent Access Control" temporary;
Agent: Codeunit Agent;
begin
@@ -257,7 +257,7 @@ codeunit 4325 "Agent Setup Impl."
local procedure UpdateAgent(var AgentSetupBuffer: Record "Agent Setup Buffer")
var
AgentRecord: Record Agent;
- TempNewUserSettings: Record "User Settings";
+ TempNewUserSettings: Record "User Settings" temporary;
TemporaryAgentAccessControl: Record "Agent Access Control" temporary;
Agent: Codeunit Agent;
begin
diff --git a/src/System Application/App/AppSource Gallery/src/AppSourceProductList.Page.al b/src/System Application/App/AppSource Gallery/src/AppSourceProductList.Page.al
index 1720e8de5f..447538caf2 100644
--- a/src/System Application/App/AppSource Gallery/src/AppSourceProductList.Page.al
+++ b/src/System Application/App/AppSource Gallery/src/AppSourceProductList.Page.al
@@ -199,7 +199,7 @@ page 2515 "AppSource Product List"
local procedure ReloadAllProducts()
var
- TempAppSourceProduct: Record "AppSource Product";
+ TempAppSourceProduct: Record "AppSource Product" temporary;
begin
TempAppSourceProduct.Copy(Rec);
AppSourceProductManager.GetProductsAndPopulateRecord(TempAppSourceProduct);
diff --git a/src/System Application/App/Azure AD User Management/src/AzureADUserMgmtImpl.Codeunit.al b/src/System Application/App/Azure AD User Management/src/AzureADUserMgmtImpl.Codeunit.al
index d40cd24b22..1ca104f4d1 100644
--- a/src/System Application/App/Azure AD User Management/src/AzureADUserMgmtImpl.Codeunit.al
+++ b/src/System Application/App/Azure AD User Management/src/AzureADUserMgmtImpl.Codeunit.al
@@ -272,7 +272,7 @@ codeunit 9017 "Azure AD User Mgmt. Impl."
var
AccessControl: Record "Access Control";
TempAccessControlWithDefaultPermissions: Record "Access Control" temporary;
- TempPermissionSetInPlanBuffer: Record "Permission Set In Plan Buffer";
+ TempPermissionSetInPlanBuffer: Record "Permission Set In Plan Buffer" temporary;
PlanConfiguration: Codeunit "Plan Configuration";
UsersInPlans: Query "Users in Plans";
begin
diff --git a/src/System Application/App/Azure Storage Services Authorization/src/StorServAuthImpl.Codeunit.al b/src/System Application/App/Azure Storage Services Authorization/src/StorServAuthImpl.Codeunit.al
index a5066cc4be..4b9fb96665 100644
--- a/src/System Application/App/Azure Storage Services Authorization/src/StorServAuthImpl.Codeunit.al
+++ b/src/System Application/App/Azure Storage Services Authorization/src/StorServAuthImpl.Codeunit.al
@@ -13,7 +13,7 @@ codeunit 9063 "Stor. Serv. Auth. Impl."
procedure CreateSAS(SigningKey: SecretText; SignedVersion: Enum "Storage Service API Version"; SignedServices: List of [Enum "SAS Service Type"]; SignedResources: List of [Enum "SAS Resource Type"]; SignedPermissions: List of [Enum "SAS Permission"]; SignedExpiry: DateTime): Interface "Storage Service Authorization"
var
- TempOptionalParams: Record "SAS Parameters";
+ TempOptionalParams: Record "SAS Parameters" temporary;
begin
TempOptionalParams.Init();
exit(CreateSAS(SigningKey, SignedVersion, SignedServices, SignedResources, SignedPermissions, SignedExpiry, TempOptionalParams));
diff --git a/src/System Application/App/Barcode/src/Dynamics Barcode Provider/Dynamics2DProvider.Codeunit.al b/src/System Application/App/Barcode/src/Dynamics Barcode Provider/Dynamics2DProvider.Codeunit.al
index 5be113e930..fe7ebbfb0b 100644
--- a/src/System Application/App/Barcode/src/Dynamics Barcode Provider/Dynamics2DProvider.Codeunit.al
+++ b/src/System Application/App/Barcode/src/Dynamics Barcode Provider/Dynamics2DProvider.Codeunit.al
@@ -30,7 +30,7 @@ codeunit 9223 "Dynamics 2D Provider" implements "Barcode Image Provider 2D"
procedure EncodeImage(InputText: Text; BarcodeSymbology2D: Enum "Barcode Symbology 2D"): Codeunit "Temp Blob"
var
- TempBarcodeEncodeSettings2D: Record "Barcode Encode Settings 2D";
+ TempBarcodeEncodeSettings2D: Record "Barcode Encode Settings 2D" temporary;
begin
TempBarcodeEncodeSettings2D.Init();
exit(EncodeImage(InputText, BarcodeSymbology2D, TempBarcodeEncodeSettings2D));
diff --git a/src/System Application/App/Barcode/src/IDAutomation 1D Provider/IDAutomation1DProvider.Codeunit.al b/src/System Application/App/Barcode/src/IDAutomation 1D Provider/IDAutomation1DProvider.Codeunit.al
index 59e74b3fd6..89f0e2c498 100644
--- a/src/System Application/App/Barcode/src/IDAutomation 1D Provider/IDAutomation1DProvider.Codeunit.al
+++ b/src/System Application/App/Barcode/src/IDAutomation 1D Provider/IDAutomation1DProvider.Codeunit.al
@@ -29,7 +29,7 @@ codeunit 9215 "IDAutomation 1D Provider" implements "Barcode Font Provider"
procedure EncodeFont(InputText: Text; Encoder: Enum "Barcode Symbology"): Text;
var
- TempBarcodeEncodeSettings: Record "Barcode Encode Settings";
+ TempBarcodeEncodeSettings: Record "Barcode Encode Settings" temporary;
begin
exit(EncodeFont(InputText, Encoder, TempBarcodeEncodeSettings));
end;
@@ -46,7 +46,7 @@ codeunit 9215 "IDAutomation 1D Provider" implements "Barcode Font Provider"
procedure ValidateInput(InputText: Text; BarcodeSymbology: Enum "Barcode Symbology")
var
- TempBarcodeEncodeSettings: Record "Barcode Encode Settings";
+ TempBarcodeEncodeSettings: Record "Barcode Encode Settings" temporary;
begin
ValidateInput(InputText, BarcodeSymbology, TempBarcodeEncodeSettings);
end;
diff --git a/src/System Application/App/Email/src/Account/EmailAccountImpl.Codeunit.al b/src/System Application/App/Email/src/Account/EmailAccountImpl.Codeunit.al
index b80f3c6c3c..63122c5660 100644
--- a/src/System Application/App/Email/src/Account/EmailAccountImpl.Codeunit.al
+++ b/src/System Application/App/Email/src/Account/EmailAccountImpl.Codeunit.al
@@ -27,7 +27,7 @@ codeunit 8889 "Email Account Impl."
procedure GetAllAccounts(LoadLogos: Boolean; var TempEmailAccount: Record "Email Account" temporary)
var
- TempEmailAccounts: Record "Email Account";
+ TempEmailAccounts: Record "Email Account" temporary;
Connector: Enum "Email Connector";
EmailConnector: Interface "Email Connector";
begin
@@ -66,7 +66,7 @@ codeunit 8889 "Email Account Impl."
[InherentPermissions(PermissionObjectType::TableData, Database::"Email Rate Limit", 'rd')]
procedure DeleteAccounts(var EmailAccountsToDelete: Record "Email Account"; HideDialog: Boolean)
var
- TempCurrentDefaultEmailAccount: Record "Email Account";
+ TempCurrentDefaultEmailAccount: Record "Email Account" temporary;
EmailRateLimitToDelete: Record "Email Rate Limit";
ConfirmManagement: Codeunit "Confirm Management";
EmailScenario: Codeunit "Email Scenario";
@@ -104,8 +104,8 @@ codeunit 8889 "Email Account Impl."
local procedure HandleDefaultAccountDeletion(CurrentDefaultAccountId: Guid; Connector: Enum "Email Connector"; HideDialog: Boolean)
var
- TempAllEmailAccounts: Record "Email Account";
- TempNewDefaultEmailAccount: Record "Email Account";
+ TempAllEmailAccounts: Record "Email Account" temporary;
+ TempNewDefaultEmailAccount: Record "Email Account" temporary;
EmailScenario: Codeunit "Email Scenario";
NewDefaultEmailAccountSelected: Boolean;
begin
@@ -176,7 +176,7 @@ codeunit 8889 "Email Account Impl."
procedure IsAnyAccountRegistered(): Boolean
var
- TempEmailAccount: Record "Email Account";
+ TempEmailAccount: Record "Email Account" temporary;
begin
GetAllAccounts(false, TempEmailAccount);
@@ -185,7 +185,7 @@ codeunit 8889 "Email Account Impl."
procedure IsAccountRegistered(EmailAccountId: Guid; EmailConnector: Enum "Email Connector"): Boolean
var
- TempEmailAccount: Record "Email Account";
+ TempEmailAccount: Record "Email Account" temporary;
begin
if IsNullGuid(EmailAccountId) then
exit(false);
diff --git a/src/System Application/App/Email/src/Account/EmailAccountWizard.Page.al b/src/System Application/App/Email/src/Account/EmailAccountWizard.Page.al
index ae32f3d934..4f7fa8d16b 100644
--- a/src/System Application/App/Email/src/Account/EmailAccountWizard.Page.al
+++ b/src/System Application/App/Email/src/Account/EmailAccountWizard.Page.al
@@ -419,7 +419,7 @@ page 8886 "Email Account Wizard"
trigger OnInit()
var
- TempDefaultAccount: Record "Email Account";
+ TempDefaultAccount: Record "Email Account" temporary;
EmailAccountImpl: Codeunit "Email Account Impl.";
EmailScenario: Codeunit "Email Scenario";
begin
@@ -576,7 +576,7 @@ page 8886 "Email Account Wizard"
end;
var
- TempRegisteredAccount: Record "Email Account";
+ TempRegisteredAccount: Record "Email Account" temporary;
RegisteredRateLimit: Record "Email Rate Limit";
MediaResourcesStandard: Record "Media Resources";
MediaResourcesDone: Record "Media Resources";
diff --git a/src/System Application/App/Email/src/Account/EmailAccounts.Page.al b/src/System Application/App/Email/src/Account/EmailAccounts.Page.al
index 669196e553..2048b91556 100644
--- a/src/System Application/App/Email/src/Account/EmailAccounts.Page.al
+++ b/src/System Application/App/Email/src/Account/EmailAccounts.Page.al
@@ -579,7 +579,7 @@ page 8887 "Email Accounts"
end;
var
- TempDefaultEmailAccount: Record "Email Account";
+ TempDefaultEmailAccount: Record "Email Account" temporary;
EmailAccountImpl: Codeunit "Email Account Impl.";
EmailRateLimitImpl: Codeunit "Email Rate Limit Impl.";
IsDefault: Boolean;
diff --git a/src/System Application/App/Email/src/Email/EmailAttachmens/EmailScenarioAttachImpl.Codeunit.al b/src/System Application/App/Email/src/Email/EmailAttachmens/EmailScenarioAttachImpl.Codeunit.al
index 362c38d697..38f5c0f4cc 100644
--- a/src/System Application/App/Email/src/Email/EmailAttachmens/EmailScenarioAttachImpl.Codeunit.al
+++ b/src/System Application/App/Email/src/Email/EmailAttachmens/EmailScenarioAttachImpl.Codeunit.al
@@ -90,7 +90,7 @@ codeunit 8902 "Email Scenario Attach Impl."
procedure AddAttachmentToMessage(var Message: Codeunit "Email Message"; CurrentEmailScenario: Enum "Email Scenario")
var
- TempEmailAttachments: Record "Email Attachments";
+ TempEmailAttachments: Record "Email Attachments" temporary;
AttachmentsCount: Integer;
begin
if CurrentEmailScenario.AsInteger() <> 0 then begin
diff --git a/src/System Application/App/Email/src/Email/EmailAttachmens/EmailScenarioAttachSetup.Page.al b/src/System Application/App/Email/src/Email/EmailAttachmens/EmailScenarioAttachSetup.Page.al
index 2d2b843c4b..8202e13fe9 100644
--- a/src/System Application/App/Email/src/Email/EmailAttachmens/EmailScenarioAttachSetup.Page.al
+++ b/src/System Application/App/Email/src/Email/EmailAttachmens/EmailScenarioAttachSetup.Page.al
@@ -104,7 +104,7 @@ page 8897 "Email Scenario Attach Setup"
trigger OnAction()
var
EmailScenarioAttachments: Record "Email Scenario Attachments";
- TempSelectedScenarios: Record "Email Account Scenario";
+ TempSelectedScenarios: Record "Email Account Scenario" temporary;
FeatureTelemetry: Codeunit "Feature Telemetry";
ScenariosForAccount: Page "Email Scenarios for Account";
begin
diff --git a/src/System Application/App/Email/src/Email/EmailImpl.Codeunit.al b/src/System Application/App/Email/src/Email/EmailImpl.Codeunit.al
index e275ad0ac1..d3f699a5d6 100644
--- a/src/System Application/App/Email/src/Email/EmailImpl.Codeunit.al
+++ b/src/System Application/App/Email/src/Email/EmailImpl.Codeunit.al
@@ -77,7 +77,7 @@ codeunit 8900 "Email Impl"
procedure SaveAsDraft(EmailMessage: Codeunit "Email Message"; EmailAccountId: Guid; EmailConnector: Enum "Email Connector"; var EmailOutbox: Record "Email Outbox")
var
- TempEmailAccountRecord: Record "Email Account";
+ TempEmailAccountRecord: Record "Email Account" temporary;
EmailMessageImpl: Codeunit "Email Message Impl.";
begin
if not EmailMessageImpl.Get(EmailMessage.GetId()) then
@@ -93,7 +93,7 @@ codeunit 8900 "Email Impl"
procedure Enqueue(EmailMessage: Codeunit "Email Message"; EmailScenario: Enum "Email Scenario"; NotBefore: DateTime)
var
- TempEmailAccount: Record "Email Account";
+ TempEmailAccount: Record "Email Account" temporary;
EmailScenarios: Codeunit "Email Scenario";
begin
EmailScenarios.GetEmailAccount(EmailScenario, TempEmailAccount);
@@ -110,7 +110,7 @@ codeunit 8900 "Email Impl"
procedure Send(EmailMessage: Codeunit "Email Message"; EmailScenario: Enum "Email Scenario"): Boolean
var
- TempEmailAccount: Record "Email Account";
+ TempEmailAccount: Record "Email Account" temporary;
EmailScenarios: Codeunit "Email Scenario";
begin
EmailScenarios.GetEmailAccount(EmailScenario, TempEmailAccount);
@@ -156,7 +156,7 @@ codeunit 8900 "Email Impl"
procedure Reply(EmailMessage: Codeunit "Email Message"; EmailAccountId: Guid; EmailConnector: Enum "Email Connector"; var EmailOutbox: Record "Email Outbox"; NotBefore: DateTime; InBackground: Boolean; ReplyToAll: Boolean): Boolean
var
- TempEmailAccountRec: Record "Email Account";
+ TempEmailAccountRec: Record "Email Account" temporary;
CurrentUser: Record User;
Email: Codeunit Email;
EmailDispatcher: Codeunit "Email Dispatcher";
@@ -208,7 +208,7 @@ codeunit 8900 "Email Impl"
procedure RetrieveEmails(EmailAccountId: Guid; Connector: Enum "Email Connector"; var EmailInbox: Record "Email Inbox")
var
- TempFilters: Record "Email Retrieval Filters";
+ TempFilters: Record "Email Retrieval Filters" temporary;
begin
TempFilters.Insert();
RetrieveEmails(EmailAccountId, Connector, EmailInbox, TempFilters);
@@ -453,7 +453,7 @@ codeunit 8900 "Email Impl"
procedure OpenInEditor(EmailMessage: Codeunit "Email Message"; EmailScenario: Enum "Email Scenario"; IsModal: Boolean): Enum "Email Action"
var
- TempEmailAccount: Record "Email Account";
+ TempEmailAccount: Record "Email Account" temporary;
EmailScenarios: Codeunit "Email Scenario";
begin
EmailScenarios.GetEmailAccount(EmailScenario, TempEmailAccount);
@@ -546,7 +546,7 @@ codeunit 8900 "Email Impl"
local procedure Send(EmailMessage: Codeunit "Email Message"; EmailAccountId: Guid; EmailConnector: Enum "Email Connector"; InBackground: Boolean; NotBefore: DateTime; var EmailOutbox: Record "Email Outbox"): Boolean
var
- TempEmailAccountRec: Record "Email Account";
+ TempEmailAccountRec: Record "Email Account" temporary;
CurrentUser: Record User;
Email: Codeunit Email;
EmailMessageImpl: Codeunit "Email Message Impl.";
diff --git a/src/System Application/App/Email/src/Email/Outbox/EmailEditor.Codeunit.al b/src/System Application/App/Email/src/Email/Outbox/EmailEditor.Codeunit.al
index 8ec291330a..8c17e46684 100644
--- a/src/System Application/App/Email/src/Email/Outbox/EmailEditor.Codeunit.al
+++ b/src/System Application/App/Email/src/Email/Outbox/EmailEditor.Codeunit.al
@@ -126,7 +126,7 @@ codeunit 8906 "Email Editor"
procedure CreateOutbox(var EmailOutbox: Record "Email Outbox")
var
- TempDefaultEmailAccount: Record "Email Account";
+ TempDefaultEmailAccount: Record "Email Account" temporary;
EmailScenario: Codeunit "Email Scenario";
begin
EmailOutbox."User Security Id" := UserSecurityId();
@@ -281,7 +281,7 @@ codeunit 8906 "Email Editor"
procedure AttachFromRelatedRecords(EmailMessageID: Guid);
var
- TempEmailRelatedAttachment: Record "Email Related Attachment";
+ TempEmailRelatedAttachment: Record "Email Related Attachment" temporary;
Email: Codeunit Email;
EmailRelatedAttachmentsPage: Page "Email Related Attachments";
begin
@@ -416,7 +416,7 @@ codeunit 8906 "Email Editor"
procedure LookupRecipients(MessageID: Guid; var Text: Text): Boolean
var
- TempSuggestedEmailAddressLookup: Record "Email Address Lookup";
+ TempSuggestedEmailAddressLookup: Record "Email Address Lookup" temporary;
EmailRelatedRecord: Record "Email Related Record";
EmailAddressLookup: Codeunit "Email Address Lookup";
EmailAddressLookupPage: Page "Email Address Lookup";
@@ -499,7 +499,7 @@ codeunit 8906 "Email Editor"
internal procedure PopulateRelatedRecordCache(MessageID: Guid)
var
EmailRelatedRecord: Record "Email Related Record";
- TempEmailAddressLookupRecord: Record "Email Address Lookup";
+ TempEmailAddressLookupRecord: Record "Email Address Lookup" temporary;
EmailAddressLookup: Codeunit "Email Address Lookup";
begin
EmailRelatedRecord.SetFilter("Email Message Id", MessageID);
diff --git a/src/System Application/App/Email/src/Email/Sent/EmailViewer.Page.al b/src/System Application/App/Email/src/Email/Sent/EmailViewer.Page.al
index ee670efabe..c2a65723ca 100644
--- a/src/System Application/App/Email/src/Email/Sent/EmailViewer.Page.al
+++ b/src/System Application/App/Email/src/Email/Sent/EmailViewer.Page.al
@@ -227,7 +227,7 @@ page 12 "Email Viewer"
end;
var
- TempEmailAccount: Record "Email Account";
+ TempEmailAccount: Record "Email Account" temporary;
EmailMessageImpl: Codeunit "Email Message Impl.";
EmailViewer: Codeunit "Email Viewer";
EmailImpl: Codeunit "Email Impl";
diff --git a/src/System Application/App/Email/src/Lookup/EmailAddressLookup.Page.al b/src/System Application/App/Email/src/Lookup/EmailAddressLookup.Page.al
index f784efda73..f092fa727c 100644
--- a/src/System Application/App/Email/src/Lookup/EmailAddressLookup.Page.al
+++ b/src/System Application/App/Email/src/Lookup/EmailAddressLookup.Page.al
@@ -109,7 +109,7 @@ page 8944 "Email Address Lookup"
protected procedure LookupFullAddressList(EmailAddressEntity: Enum "Email Address Entity")
var
- TempEmailAddressLookup: Record "Email Address Lookup";
+ TempEmailAddressLookup: Record "Email Address Lookup" temporary;
EmailAddressLookupImpl: Codeunit "Email Address Lookup Impl";
begin
if EmailAddressLookupImpl.LookupEmailAddress(EmailAddressEntity, TempEmailAddressLookup) then begin
diff --git a/src/System Application/App/Email/src/Lookup/EmailAddressLookupImpl.Codeunit.al b/src/System Application/App/Email/src/Lookup/EmailAddressLookupImpl.Codeunit.al
index 2fca02d2fa..f7513be904 100644
--- a/src/System Application/App/Email/src/Lookup/EmailAddressLookupImpl.Codeunit.al
+++ b/src/System Application/App/Email/src/Lookup/EmailAddressLookupImpl.Codeunit.al
@@ -24,7 +24,7 @@ codeunit 8944 "Email Address Lookup Impl"
procedure LookupEmailAddress(Entity: Enum "Email Address Entity"; var EmailAddressLookupRec: Record "Email Address Lookup"): Boolean
var
- TempEmailAddressLookupSuggestions: Record "Email Address Lookup";
+ TempEmailAddressLookupSuggestions: Record "Email Address Lookup" temporary;
EmailAddressLookup: Codeunit "Email Address Lookup";
IsHandled: Boolean;
begin
diff --git a/src/System Application/App/Email/src/Message/EmailAttachments.Page.al b/src/System Application/App/Email/src/Message/EmailAttachments.Page.al
index 37c33cee24..87bb329886 100644
--- a/src/System Application/App/Email/src/Message/EmailAttachments.Page.al
+++ b/src/System Application/App/Email/src/Message/EmailAttachments.Page.al
@@ -84,7 +84,7 @@ page 8889 "Email Attachments"
trigger OnAction()
var
- TempEmailAttachments: Record "Email Attachments";
+ TempEmailAttachments: Record "Email Attachments" temporary;
FeatureTelemetry: Codeunit "Feature Telemetry";
EmailChooseScenarioAttachments: Page "Email Choose Scenario Attach";
begin
diff --git a/src/System Application/App/Email/src/Message/EmailMessageImpl.Codeunit.al b/src/System Application/App/Email/src/Message/EmailMessageImpl.Codeunit.al
index 4d1a8217f0..6e1f7a7ed8 100644
--- a/src/System Application/App/Email/src/Message/EmailMessageImpl.Codeunit.al
+++ b/src/System Application/App/Email/src/Message/EmailMessageImpl.Codeunit.al
@@ -619,7 +619,7 @@ codeunit 8905 "Email Message Impl."
procedure GetRelatedAttachments(EmailMessageId: Guid; var EmailRelatedAttachmentOut: Record "Email Related Attachment"): Boolean
var
- TempEmailRelatedAttachment: Record "Email Related Attachment";
+ TempEmailRelatedAttachment: Record "Email Related Attachment" temporary;
EmailRelatedRecord: Record "Email Related Record";
Email: Codeunit Email;
EmailImpl: Codeunit "Email Impl";
diff --git a/src/System Application/App/Email/src/Scenario/EmailScenarioImpl.Codeunit.al b/src/System Application/App/Email/src/Scenario/EmailScenarioImpl.Codeunit.al
index 18354c9093..c16f6b314a 100644
--- a/src/System Application/App/Email/src/Scenario/EmailScenarioImpl.Codeunit.al
+++ b/src/System Application/App/Email/src/Scenario/EmailScenarioImpl.Codeunit.al
@@ -17,7 +17,7 @@ codeunit 8892 "Email Scenario Impl."
procedure GetEmailAccount(Scenario: Enum "Email Scenario"; var EmailAccount: Record "Email Account"): Boolean
var
EmailScenario: Record "Email Scenario";
- TempAllEmailAccounts: Record "Email Account";
+ TempAllEmailAccounts: Record "Email Account" temporary;
EmailAccounts: Codeunit "Email Account";
begin
EmailAccounts.GetAllAccounts(TempAllEmailAccounts);
@@ -81,9 +81,9 @@ codeunit 8892 "Email Scenario Impl."
/// A flatten tree structure representing the all the email accounts and the scenarios assigned to them.
procedure GetScenariosByEmailAccount(var Result: Record "Email Account Scenario")
var
- TempEmailAccounts: Record "Email Account";
- TempEmailAccountScenarios: Record "Email Account Scenario";
- TempDefaultAccount: Record "Email Account";
+ TempEmailAccounts: Record "Email Account" temporary;
+ TempEmailAccountScenarios: Record "Email Account Scenario" temporary;
+ TempDefaultAccount: Record "Email Account" temporary;
EmailAccount: Codeunit "Email Account";
DisplayName: Text[2048];
Position: Integer;
@@ -181,7 +181,7 @@ codeunit 8892 "Email Scenario Impl."
procedure AddScenarios(EmailAccount: Record "Email Account Scenario"): Boolean
var
EmailScenario: Record "Email Scenario";
- TempSelectedScenarios: Record "Email Account Scenario";
+ TempSelectedScenarios: Record "Email Account Scenario" temporary;
ScenariosForAccount: Page "Email Scenarios for Account";
begin
EmailAccountImpl.CheckPermissions();
@@ -263,7 +263,7 @@ codeunit 8892 "Email Scenario Impl."
procedure ChangeAccount(var EmailScenario: Record "Email Account Scenario"): Boolean
var
- TempSelectedAccount: Record "Email Account";
+ TempSelectedAccount: Record "Email Account" temporary;
Scenario: Record "Email Scenario";
EmailAccount: Codeunit "Email Account";
AccountsPage: Page "Email Accounts";
diff --git a/src/System Application/App/Email/src/Scenario/EmailScenarioSetup.Page.al b/src/System Application/App/Email/src/Scenario/EmailScenarioSetup.Page.al
index b2502c894e..0127cc77c2 100644
--- a/src/System Application/App/Email/src/Scenario/EmailScenarioSetup.Page.al
+++ b/src/System Application/App/Email/src/Scenario/EmailScenarioSetup.Page.al
@@ -209,7 +209,7 @@ page 8893 "Email Scenario Setup"
end;
var
- TempSelectedEmailAccountScenario: Record "Email Account Scenario";
+ TempSelectedEmailAccountScenario: Record "Email Account Scenario" temporary;
EmailScenarioImpl: Codeunit "Email Scenario Impl.";
EmailAccountImpl: Codeunit "Email Account Impl.";
EmailAccountId: Guid;
diff --git a/src/System Application/App/Extension Management/src/ExtensionMarketplace.Codeunit.al b/src/System Application/App/Extension Management/src/ExtensionMarketplace.Codeunit.al
index 6b3cac1b2f..907a7c635c 100644
--- a/src/System Application/App/Extension Management/src/ExtensionMarketplace.Codeunit.al
+++ b/src/System Application/App/Extension Management/src/ExtensionMarketplace.Codeunit.al
@@ -219,7 +219,7 @@ codeunit 2501 "Extension Marketplace"
[TryFunction]
procedure InstallAppsourceExtension(MarketplaceApplicationId: Text; TelemetryURL: Text);
var
- TempExtensionInstallationRecord: Record "Extension Installation";
+ TempExtensionInstallationRecord: Record "Extension Installation" temporary;
ExtensionInstallationPage: Page "Extension Installation";
AppId: Guid;
begin
@@ -239,7 +239,7 @@ codeunit 2501 "Extension Marketplace"
[TryFunction]
procedure InstallAppsourceExtension(AppId: Guid; TelemetryURL: Text)
var
- TempExtensionInstallationRecord: Record "Extension Installation";
+ TempExtensionInstallationRecord: Record "Extension Installation" temporary;
ExtensionInstallationPage: Page "Extension Installation";
begin
if IsNullGuid(AppId) then begin
diff --git a/src/System Application/App/Guided Experience/src/Checklist Administration/Checklist.Page.al b/src/System Application/App/Guided Experience/src/Checklist Administration/Checklist.Page.al
index 77338821df..7775aeb5d1 100644
--- a/src/System Application/App/Guided Experience/src/Checklist Administration/Checklist.Page.al
+++ b/src/System Application/App/Guided Experience/src/Checklist Administration/Checklist.Page.al
@@ -85,7 +85,7 @@ page 1993 Checklist
trigger OnAction()
var
- TempChecklistItemBuffer: Record "Checklist Item Buffer";
+ TempChecklistItemBuffer: Record "Checklist Item Buffer" temporary;
begin
TempChecklistItemBuffer.ID := CreateGuid();
TempChecklistItemBuffer.Code := '0';
diff --git a/src/System Application/App/Guided Experience/src/Checklist Banner/ChecklistBanner.Page.al b/src/System Application/App/Guided Experience/src/Checklist Banner/ChecklistBanner.Page.al
index a3c541d832..55e3101dce 100644
--- a/src/System Application/App/Guided Experience/src/Checklist Banner/ChecklistBanner.Page.al
+++ b/src/System Application/App/Guided Experience/src/Checklist Banner/ChecklistBanner.Page.al
@@ -343,7 +343,7 @@ page 1990 "Checklist Banner"
}
var
- TempChecklistItemBuffer: Record "Checklist Item Buffer";
+ TempChecklistItemBuffer: Record "Checklist Item Buffer" temporary;
ChecklistBannerImpl: Codeunit "Checklist Banner Impl.";
ChecklistImplementation: Codeunit "Checklist Implementation";
ChecklistStatus: Enum "Checklist Status";
diff --git a/src/System Application/App/MCP/src/Configuration/Codeunits/MCPConfigImplementation.Codeunit.al b/src/System Application/App/MCP/src/Configuration/Codeunits/MCPConfigImplementation.Codeunit.al
index 43d2e57c77..bb4c6a510e 100644
--- a/src/System Application/App/MCP/src/Configuration/Codeunits/MCPConfigImplementation.Codeunit.al
+++ b/src/System Application/App/MCP/src/Configuration/Codeunits/MCPConfigImplementation.Codeunit.al
@@ -345,7 +345,7 @@ codeunit 8351 "MCP Config Implementation"
internal procedure ValidateConfiguration(var MCPConfiguration: Record "MCP Configuration"; OnActivate: Boolean)
var
- TempMCPConfigurationWarning: Record "MCP Config Warning";
+ TempMCPConfigurationWarning: Record "MCP Config Warning" temporary;
begin
// Raise warning if any issues found
if not FindWarningsForConfiguration(MCPConfiguration.SystemId, TempMCPConfigurationWarning) then begin
@@ -722,7 +722,7 @@ codeunit 8351 "MCP Config Implementation"
internal procedure LookupAPIVersions(PageId: Integer; var APIVersion: Text[30])
var
PageMetadata: Record "Page Metadata";
- TempMCPAPIVersion: Record "MCP API Version";
+ TempMCPAPIVersion: Record "MCP API Version" temporary;
Versions: List of [Text];
Version: Text[30];
begin
diff --git a/src/System Application/App/MCP/src/Configuration/Pages/MCPToolsByAPIGroup.Page.al b/src/System Application/App/MCP/src/Configuration/Pages/MCPToolsByAPIGroup.Page.al
index c924f7c404..d9288875d9 100644
--- a/src/System Application/App/MCP/src/Configuration/Pages/MCPToolsByAPIGroup.Page.al
+++ b/src/System Application/App/MCP/src/Configuration/Pages/MCPToolsByAPIGroup.Page.al
@@ -56,7 +56,7 @@ page 8354 "MCP Tools By API Group"
}
var
- TempMCPAPIPublisherGroup: Record "MCP API Publisher Group";
+ TempMCPAPIPublisherGroup: Record "MCP API Publisher Group" temporary;
MCPConfigImplementation: Codeunit "MCP Config Implementation";
APIPublisher: Text;
APIGroup: Text;
diff --git a/src/System Application/App/Page Summary Provider/src/PageSummaryProviderImpl.Codeunit.al b/src/System Application/App/Page Summary Provider/src/PageSummaryProviderImpl.Codeunit.al
index 6d64b27c44..79dde9cace 100644
--- a/src/System Application/App/Page Summary Provider/src/PageSummaryProviderImpl.Codeunit.al
+++ b/src/System Application/App/Page Summary Provider/src/PageSummaryProviderImpl.Codeunit.al
@@ -24,7 +24,7 @@ codeunit 2717 "Page Summary Provider Impl."
procedure GetPageSummary(Parameters: Text): Text
var
- TempPageSummaryParameters: Record "Page Summary Parameters";
+ TempPageSummaryParameters: Record "Page Summary Parameters" temporary;
begin
TempPageSummaryParameters.FromJson(Parameters);
exit(GetPageSummary(TempPageSummaryParameters));
diff --git a/src/System Application/App/Performance Profiler/src/PerformanceProfiler.Page.al b/src/System Application/App/Performance Profiler/src/PerformanceProfiler.Page.al
index 85aa581949..fcbc988096 100644
--- a/src/System Application/App/Performance Profiler/src/PerformanceProfiler.Page.al
+++ b/src/System Application/App/Performance Profiler/src/PerformanceProfiler.Page.al
@@ -308,8 +308,8 @@ page 24 "Performance Profiler"
procedure UpdateData()
var
- TempRawProfilingNodes: Record "Profiling Node";
- TempCallTreeProfilingNodes: Record "Profiling Node";
+ TempRawProfilingNodes: Record "Profiling Node" temporary;
+ TempCallTreeProfilingNodes: Record "Profiling Node" temporary;
begin
FeatureTelemetry.LogUptake('0000GMQ', PerformanceProfilingFeatureTxt, Enum::"Feature Uptake Status"::Used);
UpdateControlProperties(); // update controls in case the following lines throw an error
diff --git a/src/System Application/App/Performance Profiler/src/ProfilingChartHelper.Codeunit.al b/src/System Application/App/Performance Profiler/src/ProfilingChartHelper.Codeunit.al
index 85fb4b3681..45faaa2fcb 100644
--- a/src/System Application/App/Performance Profiler/src/ProfilingChartHelper.Codeunit.al
+++ b/src/System Application/App/Performance Profiler/src/ProfilingChartHelper.Codeunit.al
@@ -28,7 +28,7 @@ codeunit 1926 "Profiling Chart Helper"
/// ProfilingDataProcessor must be initialized for this method to work.
procedure GetChartData(ProfilingAggregationType: Enum "Profiling Aggregation Type"; AggregateBySelfTime: Boolean; ChartLabels: List of [Text]; ChartValues: List of [Integer])
var
- TempAggregatedProfilingNode: Record "Profiling Node";
+ TempAggregatedProfilingNode: Record "Profiling Node" temporary;
ProfilingDataProcessor: Codeunit "Profiling Data Processor";
Identifier: Text;
begin
diff --git a/src/System Application/App/Performance Profiler/src/ProfilingDataProcessor.Codeunit.al b/src/System Application/App/Performance Profiler/src/ProfilingDataProcessor.Codeunit.al
index 1899bde76f..c01b555f05 100644
--- a/src/System Application/App/Performance Profiler/src/ProfilingDataProcessor.Codeunit.al
+++ b/src/System Application/App/Performance Profiler/src/ProfilingDataProcessor.Codeunit.al
@@ -19,8 +19,8 @@ codeunit 1923 "Profiling Data Processor"
InherentPermissions = X;
var
- TempRawProfilingNodes: Record "Profiling Node";
- TempCallTreeProfilingNodes: Record "Profiling Node";
+ TempRawProfilingNodes: Record "Profiling Node" temporary;
+ TempCallTreeProfilingNodes: Record "Profiling Node" temporary;
///
/// Initializes the profiling data processor with the profiling data.
@@ -147,8 +147,8 @@ codeunit 1923 "Profiling Data Processor"
local procedure GetChildrenFilterView(var RootProfilingNode: Record "Profiling Node"): Text
var
- TempNextNonChildProfilingNode: Record "Profiling Node";
- TempChildrenProfilingNodes: Record "Profiling Node";
+ TempNextNonChildProfilingNode: Record "Profiling Node" temporary;
+ TempChildrenProfilingNodes: Record "Profiling Node" temporary;
begin
TempChildrenProfilingNodes.SetRange(Indentation, RootProfilingNode.Indentation + 1);
@@ -165,8 +165,8 @@ codeunit 1923 "Profiling Data Processor"
local procedure ComputeFullTimeAggregate(var RootProfilingNode: Record "Profiling Node"; ProfilingAggregationType: Enum "Profiling Aggregation Type"; var AggregatedProfilingNode: Record "Profiling Node")
var
- TempChildProfilingNodes: Record "Profiling Node";
- TempCurrProfilingNode: Record "Profiling Node";
+ TempChildProfilingNodes: Record "Profiling Node" temporary;
+ TempCurrProfilingNode: Record "Profiling Node" temporary;
ExclusionSet: DotNet GenericHashSet1;
ChildExclusionSet: DotNet GenericHashSet1;
NodeStack: DotNet Stack;
diff --git a/src/System Application/App/Permission Sets/src/PermissionSetLookupList.Page.al b/src/System Application/App/Permission Sets/src/PermissionSetLookupList.Page.al
index 4a0e662f80..26486824da 100644
--- a/src/System Application/App/Permission Sets/src/PermissionSetLookupList.Page.al
+++ b/src/System Application/App/Permission Sets/src/PermissionSetLookupList.Page.al
@@ -62,7 +62,7 @@ page 9878 "Permission Set Lookup List"
end;
var
- TempSelectedRecord: Record "PermissionSet Buffer";
+ TempSelectedRecord: Record "PermissionSet Buffer" temporary;
internal procedure GetSelectedRecord(var CurrSelectedRecord: Record "PermissionSet Buffer")
begin
diff --git a/src/System Application/App/Permission Sets/src/PermissionSetRelationImpl.Codeunit.al b/src/System Application/App/Permission Sets/src/PermissionSetRelationImpl.Codeunit.al
index 5a482c0b99..66f581b63d 100644
--- a/src/System Application/App/Permission Sets/src/PermissionSetRelationImpl.Codeunit.al
+++ b/src/System Application/App/Permission Sets/src/PermissionSetRelationImpl.Codeunit.al
@@ -67,7 +67,7 @@ codeunit 9856 "Permission Set Relation Impl."
procedure SelectPermissionSets(CurrAppId: Guid; CurrRoleID: Code[30]; CurrScope: Option System,Tenant): Boolean
var
- TempPermissionSetBuffer: Record "PermissionSet Buffer";
+ TempPermissionSetBuffer: Record "PermissionSet Buffer" temporary;
PermissionType: Option Include,Exclude;
begin
VerifyUserCanEditPermissionSet(CurrAppId);
@@ -92,7 +92,7 @@ codeunit 9856 "Permission Set Relation Impl."
procedure ModifyPermissionSet(CurrAppId: Guid; CurrRoleID: Code[30]; CurrScope: Option System,Tenant; RelatedAppId: Guid; RelatedRoleId: Code[30]; PermissionType: Option Include,Exclude): Boolean
var
- TempPermissionSetBuffer: Record "PermissionSet Buffer";
+ TempPermissionSetBuffer: Record "PermissionSet Buffer" temporary;
TenantPermissionSetRel: Record "Tenant Permission Set Rel.";
begin
VerifyUserCanEditPermissionSet(CurrAppId);
diff --git a/src/System Application/App/Regex/src/RegexImpl.Codeunit.al b/src/System Application/App/Regex/src/RegexImpl.Codeunit.al
index 579e0e1e50..3350390a7c 100644
--- a/src/System Application/App/Regex/src/RegexImpl.Codeunit.al
+++ b/src/System Application/App/Regex/src/RegexImpl.Codeunit.al
@@ -319,7 +319,7 @@ codeunit 3961 "Regex Impl."
procedure Regex(Pattern: Text)
var
- TempRegexOptions: Record "Regex Options";
+ TempRegexOptions: Record "Regex Options" temporary;
begin
Regex(Pattern, TempRegexOptions);
end;
diff --git a/src/System Application/App/Security Groups/src/CopySecurityGroup.Page.al b/src/System Application/App/Security Groups/src/CopySecurityGroup.Page.al
index bd0cb3bd26..715634639f 100644
--- a/src/System Application/App/Security Groups/src/CopySecurityGroup.Page.al
+++ b/src/System Application/App/Security Groups/src/CopySecurityGroup.Page.al
@@ -136,7 +136,7 @@ page 9873 "Copy Security Group"
end;
var
- TempSelectedSecurityGroup: Record "Security Group Buffer";
+ TempSelectedSecurityGroup: Record "Security Group Buffer" temporary;
SecurityGroup: Codeunit "Security Group";
SourceSecurityGroupCode: Code[20];
NewSecurityGroupCodeValue: Code[20];
diff --git a/src/System Application/App/Security Groups/src/InheritedPermissionSetsPart.Page.al b/src/System Application/App/Security Groups/src/InheritedPermissionSetsPart.Page.al
index bf2fc0d379..3653425c88 100644
--- a/src/System Application/App/Security Groups/src/InheritedPermissionSetsPart.Page.al
+++ b/src/System Application/App/Security Groups/src/InheritedPermissionSetsPart.Page.al
@@ -61,7 +61,7 @@ page 9821 "Inherited Permission Sets Part"
[Scope('OnPrem')]
procedure Refresh()
var
- TempSecurityGroupMemberBuffer: Record "Security Group Member Buffer";
+ TempSecurityGroupMemberBuffer: Record "Security Group Member Buffer" temporary;
SecurityGroup: Codeunit "Security Group";
begin
SecurityGroup.GetMembers(TempSecurityGroupMemberBufferToRefresh);
@@ -113,7 +113,7 @@ page 9821 "Inherited Permission Sets Part"
end;
var
- TempSecurityGroupMemberBufferToRefresh: Record "Security Group Member Buffer";
+ TempSecurityGroupMemberBufferToRefresh: Record "Security Group Member Buffer" temporary;
PermissionSetNotFound: Boolean;
IsInitializedByCaller: Boolean;
}
diff --git a/src/System Application/App/Security Groups/src/NewSecurityGroup.Page.al b/src/System Application/App/Security Groups/src/NewSecurityGroup.Page.al
index 5ab0690544..46bf371554 100644
--- a/src/System Application/App/Security Groups/src/NewSecurityGroup.Page.al
+++ b/src/System Application/App/Security Groups/src/NewSecurityGroup.Page.al
@@ -162,7 +162,7 @@ page 9872 "New Security Group"
end;
var
- TempSelectedSecurityGroup: Record "Security Group Buffer";
+ TempSelectedSecurityGroup: Record "Security Group Buffer" temporary;
SecurityGroup: Codeunit "Security Group";
NewSecurityGroupCodeValue: Code[20];
NewSecurityGroupNameValue: Text;
diff --git a/src/System Application/App/Security Groups/src/SecurityGroupImpl.Codeunit.al b/src/System Application/App/Security Groups/src/SecurityGroupImpl.Codeunit.al
index be610727e3..f847db6daa 100644
--- a/src/System Application/App/Security Groups/src/SecurityGroupImpl.Codeunit.al
+++ b/src/System Application/App/Security Groups/src/SecurityGroupImpl.Codeunit.al
@@ -204,7 +204,7 @@ codeunit 9871 "Security Group Impl."
UserProperty: Record "User Property";
[SecurityFiltering(SecurityFilter::Ignored)]
DummySecurityGroup: Record "Security Group";
- TempLocalSecurityGroupBuffer: Record "Security Group Buffer";
+ TempLocalSecurityGroupBuffer: Record "Security Group Buffer" temporary;
EntraGroupId: Text;
NavUserAccountHelper: DotNet NavUserAccountHelper;
LocalWindowsGroupName: Text;
@@ -249,7 +249,7 @@ codeunit 9871 "Security Group Impl."
procedure GetGroups(var SecurityGroupBuffer: Record "Security Group Buffer"; FetchGroupNames: Boolean)
var
SecurityGroup: Record "Security Group";
- TempLocalSecurityGroupBuffer: Record "Security Group Buffer";
+ TempLocalSecurityGroupBuffer: Record "Security Group Buffer" temporary;
begin
TempLocalSecurityGroupBuffer.Copy(SecurityGroupBuffer, true);
TempLocalSecurityGroupBuffer.Reset();
@@ -282,7 +282,7 @@ codeunit 9871 "Security Group Impl."
procedure GetMembers(var SecurityGroupMemberBuffer: Record "Security Group Member Buffer"): List of [Code[20]]
var
SecurityGroup: Record "Security Group";
- TempLocalSecurityGroupMemberBuffer: Record "Security Group Member Buffer";
+ TempLocalSecurityGroupMemberBuffer: Record "Security Group Member Buffer" temporary;
FeatureTelemetry: Codeunit "Feature Telemetry";
SkippedSecurityGroups: List of [Code[20]];
begin
@@ -533,7 +533,7 @@ codeunit 9871 "Security Group Impl."
procedure SendNotificationForDeletedGroups(var SecurityGroupBuffer: Record "Security Group Buffer")
var
- TempLocalSecurityGroupBuffer: Record "Security Group Buffer";
+ TempLocalSecurityGroupBuffer: Record "Security Group Buffer" temporary;
MissingGroupsNotification: Notification;
GroupCodesTextBuilder: TextBuilder;
MissingGroupCodes: Text;
diff --git a/src/System Application/App/Security Groups/src/SecurityGroups.Page.al b/src/System Application/App/Security Groups/src/SecurityGroups.Page.al
index dfd60b43ab..21aa205614 100644
--- a/src/System Application/App/Security Groups/src/SecurityGroups.Page.al
+++ b/src/System Application/App/Security Groups/src/SecurityGroups.Page.al
@@ -301,7 +301,7 @@ page 9871 "Security Groups"
local procedure GetSelectedGroupCodes(): List of [Code[20]];
var
- TempSecurityGroupBuffer: Record "Security Group Buffer";
+ TempSecurityGroupBuffer: Record "Security Group Buffer" temporary;
GroupCodes: List of [Code[20]];
begin
TempSecurityGroupBuffer.Copy(Rec, true);
diff --git a/src/System Application/App/Security Groups/src/UserSecurityGroupsPart.Page.al b/src/System Application/App/Security Groups/src/UserSecurityGroupsPart.Page.al
index 3c02e847da..0048672386 100644
--- a/src/System Application/App/Security Groups/src/UserSecurityGroupsPart.Page.al
+++ b/src/System Application/App/Security Groups/src/UserSecurityGroupsPart.Page.al
@@ -27,7 +27,7 @@ page 9848 "User Security Groups Part"
trigger OnDrillDown()
var
- TempSecurityGroupBuffer: Record "Security Group Buffer";
+ TempSecurityGroupBuffer: Record "Security Group Buffer" temporary;
SecurityGroups: Page "Security Groups";
begin
TempSecurityGroupBuffer.SetRange(Code, Rec."Security Group Code");
diff --git a/src/System Application/App/SharePoint/src/graph/SharePointGraphClientImpl.Codeunit.al b/src/System Application/App/SharePoint/src/graph/SharePointGraphClientImpl.Codeunit.al
index 3f392d432b..47f61244c7 100644
--- a/src/System Application/App/SharePoint/src/graph/SharePointGraphClientImpl.Codeunit.al
+++ b/src/System Application/App/SharePoint/src/graph/SharePointGraphClientImpl.Codeunit.al
@@ -1348,7 +1348,7 @@ codeunit 9120 "SharePoint Graph Client Impl."
/// An operation response object containing the result of the operation.
procedure DownloadLargeFile(ItemId: Text; var TempBlob: Codeunit "Temp Blob"): Codeunit "SharePoint Graph Response"
var
- TempGraphDriveItem: Record "SharePoint Graph Drive Item";
+ TempGraphDriveItem: Record "SharePoint Graph Drive Item" temporary;
SharePointGraphResponse: Codeunit "SharePoint Graph Response";
ChunkTempBlob: Codeunit "Temp Blob";
ChunkInStream: InStream;
@@ -1431,7 +1431,7 @@ codeunit 9120 "SharePoint Graph Client Impl."
/// An operation response object containing the result of the operation.
procedure DownloadLargeFileByPath(FilePath: Text; var TempBlob: Codeunit "Temp Blob"): Codeunit "SharePoint Graph Response"
var
- TempGraphDriveItem: Record "SharePoint Graph Drive Item";
+ TempGraphDriveItem: Record "SharePoint Graph Drive Item" temporary;
SharePointGraphResponse: Codeunit "SharePoint Graph Response";
ChunkTempBlob: Codeunit "Temp Blob";
ChunkInStream: InStream;
@@ -1901,8 +1901,8 @@ codeunit 9120 "SharePoint Graph Client Impl."
/// An operation response object containing the result of the operation.
procedure CopyItemByPath(ItemPath: Text; TargetFolderPath: Text; NewName: Text): Codeunit "SharePoint Graph Response"
var
- TempGraphDriveItem: Record "SharePoint Graph Drive Item";
- TempTargetFolderItem: Record "SharePoint Graph Drive Item";
+ TempGraphDriveItem: Record "SharePoint Graph Drive Item" temporary;
+ TempTargetFolderItem: Record "SharePoint Graph Drive Item" temporary;
SharePointGraphResponse: Codeunit "SharePoint Graph Response";
begin
EnsureInitialized();
@@ -2005,8 +2005,8 @@ codeunit 9120 "SharePoint Graph Client Impl."
/// An operation response object containing the result of the operation.
procedure MoveItemByPath(ItemPath: Text; TargetFolderPath: Text; NewName: Text): Codeunit "SharePoint Graph Response"
var
- TempGraphDriveItem: Record "SharePoint Graph Drive Item";
- TempTargetFolderItem: Record "SharePoint Graph Drive Item";
+ TempGraphDriveItem: Record "SharePoint Graph Drive Item" temporary;
+ TempTargetFolderItem: Record "SharePoint Graph Drive Item" temporary;
SharePointGraphResponse: Codeunit "SharePoint Graph Response";
TargetFolderId: Text;
begin
diff --git a/src/System Application/App/User Details/src/UserDetailsImpl.Codeunit.al b/src/System Application/App/User Details/src/UserDetailsImpl.Codeunit.al
index 3a429576ea..d3b49b9871 100644
--- a/src/System Application/App/User Details/src/UserDetailsImpl.Codeunit.al
+++ b/src/System Application/App/User Details/src/UserDetailsImpl.Codeunit.al
@@ -16,7 +16,7 @@ codeunit 775 "User Details Impl."
procedure Get(var UserDetails: Record "User Details")
var
User: Record User;
- TempLocalUserDetails: Record "User Details";
+ TempLocalUserDetails: Record "User Details" temporary;
UserDetailsFacade: Codeunit "User Details";
begin
TempLocalUserDetails.Copy(UserDetails, true);
diff --git a/src/System Application/App/User Settings/src/UserSettings.Page.al b/src/System Application/App/User Settings/src/UserSettings.Page.al
index 0af34d7486..6353534d79 100644
--- a/src/System Application/App/User Settings/src/UserSettings.Page.al
+++ b/src/System Application/App/User Settings/src/UserSettings.Page.al
@@ -158,7 +158,7 @@ page 9204 "User Settings"
end;
var
- TempOldUserSettings: Record "User Settings";
+ TempOldUserSettings: Record "User Settings" temporary;
Language: Codeunit Language;
TimeZoneSelection: Codeunit "Time Zone Selection";
UserSettingsImpl: Codeunit "User Settings Impl.";
diff --git a/src/System Application/App/User Settings/src/UserSettingsImpl.Codeunit.al b/src/System Application/App/User Settings/src/UserSettingsImpl.Codeunit.al
index 960690758d..5bd81e2af6 100644
--- a/src/System Application/App/User Settings/src/UserSettingsImpl.Codeunit.al
+++ b/src/System Application/App/User Settings/src/UserSettingsImpl.Codeunit.al
@@ -155,7 +155,7 @@ codeunit 9175 "User Settings Impl."
procedure UpdateUserSettings(NewUserSettings: Record "User Settings")
var
- TempCurrentUserSettings: Record "User Settings";
+ TempCurrentUserSettings: Record "User Settings" temporary;
begin
GetUserSettings(NewUserSettings."User Security ID", TempCurrentUserSettings);
UpdateUserSettings(TempCurrentUserSettings, NewUserSettings);
@@ -458,7 +458,7 @@ codeunit 9175 "User Settings Impl."
procedure OpenUserSettings(UserSecurityID: Guid)
var
- TempUserSettingsRec: Record "User Settings";
+ TempUserSettingsRec: Record "User Settings" temporary;
UserSettings: Codeunit "User Settings";
SettingsPageID: Integer;
Handled: Boolean;
diff --git a/src/System Application/App/Word Templates/src/WordTemplateImpl.Codeunit.al b/src/System Application/App/Word Templates/src/WordTemplateImpl.Codeunit.al
index 0f1f01067b..93e7dce87b 100644
--- a/src/System Application/App/Word Templates/src/WordTemplateImpl.Codeunit.al
+++ b/src/System Application/App/Word Templates/src/WordTemplateImpl.Codeunit.al
@@ -848,7 +848,7 @@ codeunit 9988 "Word Template Impl."
internal procedure AddSelectedTable(var WordTemplatesRelatedBuffer: Record "Word Templates Related Buffer"; WordTemplateCode: Code[30]; var TempWordTemplateField: Record "Word Template Field" temporary): Boolean
var
- TempRecordSelectionBuffer: Record "Record Selection Buffer";
+ TempRecordSelectionBuffer: Record "Record Selection Buffer" temporary;
AllObjWithCaption: Record AllObjWithCaption;
RecordSelection: Codeunit "Record Selection";
RelatedCode: Code[5];
@@ -1195,7 +1195,7 @@ codeunit 9988 "Word Template Impl."
internal procedure GetCustomMergeFields(TableId: Integer; RelatedTableCode: Code[5]; var MailMergeFields: List of [Text]; var WordTemplateField: Record "Word Template Field")
var
- TempWordTemplateCustomFieldRecord: Record "Word Template Custom Field";
+ TempWordTemplateCustomFieldRecord: Record "Word Template Custom Field" temporary;
WordTemplateCodeunit: Codeunit "Word Template";
WordTemplateCustomField: Codeunit "Word Template Custom Field";
WordTemplateFieldSelection: Codeunit "Word Template Field Selection";
diff --git a/src/rulesets/CodeCop.ruleset.json b/src/rulesets/CodeCop.ruleset.json
index e40bc43fd3..22e3c8153e 100644
--- a/src/rulesets/CodeCop.ruleset.json
+++ b/src/rulesets/CodeCop.ruleset.json
@@ -292,8 +292,7 @@
},
{
"id": "AA0073",
- "action": "None",
- "justification": "Temporary"
+ "action": "Error"
},
{
"id": "AA0074",
@@ -950,8 +949,7 @@
},
{
"id": "AA0237",
- "action": "None",
- "justification": "Temporary"
+ "action": "Error"
},
{
"id": "AA0238",