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",