From e302b12a6bf668d6892804e056de142ece656eb3 Mon Sep 17 00:00:00 2001 From: demiliani Date: Mon, 14 Sep 2026 11:56:31 +0200 Subject: [PATCH] Encode job queue conflict in fixtures --- ...queue-category-code-serializes-conflicting-jobs.bad.al | 8 +++++--- ...ueue-category-code-serializes-conflicting-jobs.good.al | 8 +++++--- 2 files changed, 10 insertions(+), 6 deletions(-) diff --git a/microsoft/knowledge/performance/job-queue-category-code-serializes-conflicting-jobs.bad.al b/microsoft/knowledge/performance/job-queue-category-code-serializes-conflicting-jobs.bad.al index be4a60a..fbd0b39 100644 --- a/microsoft/knowledge/performance/job-queue-category-code-serializes-conflicting-jobs.bad.al +++ b/microsoft/knowledge/performance/job-queue-category-code-serializes-conflicting-jobs.bad.al @@ -1,9 +1,11 @@ codeunit 50113 "Job Queue Category Bad" { - procedure ConfigurePostingJobs(var PostSales: Record "Job Queue Entry"; var PostPurchases: Record "Job Queue Entry") + procedure ConfigureJobsForSharedExclusiveResource(var SalesPostingJob: Record "Job Queue Entry"; var PurchasePostingJob: Record "Job Queue Entry"; ExclusiveResourceId: Text[250]) begin // Both jobs update the same posting resources, but nothing prevents overlap. - PostSales.Validate("Job Queue Category Code", ''); - PostPurchases.Validate("Job Queue Category Code", ''); + SalesPostingJob.Validate("Parameter String", ExclusiveResourceId); + PurchasePostingJob.Validate("Parameter String", ExclusiveResourceId); + SalesPostingJob.Validate("Job Queue Category Code", ''); + PurchasePostingJob.Validate("Job Queue Category Code", ''); end; } \ No newline at end of file diff --git a/microsoft/knowledge/performance/job-queue-category-code-serializes-conflicting-jobs.good.al b/microsoft/knowledge/performance/job-queue-category-code-serializes-conflicting-jobs.good.al index a60af48..f77200b 100644 --- a/microsoft/knowledge/performance/job-queue-category-code-serializes-conflicting-jobs.good.al +++ b/microsoft/knowledge/performance/job-queue-category-code-serializes-conflicting-jobs.good.al @@ -1,6 +1,6 @@ codeunit 50113 "Job Queue Category Good" { - procedure ConfigurePostingJobs(var PostSales: Record "Job Queue Entry"; var PostPurchases: Record "Job Queue Entry") + procedure ConfigureJobsForSharedExclusiveResource(var SalesPostingJob: Record "Job Queue Entry"; var PurchasePostingJob: Record "Job Queue Entry"; ExclusiveResourceId: Text[250]) var JobQueueCategory: Record "Job Queue Category"; begin @@ -10,7 +10,9 @@ codeunit 50113 "Job Queue Category Good" end; // The shared category lets only one conflicting posting job run at a time. - PostSales.Validate("Job Queue Category Code", 'POSTING'); - PostPurchases.Validate("Job Queue Category Code", 'POSTING'); + SalesPostingJob.Validate("Parameter String", ExclusiveResourceId); + PurchasePostingJob.Validate("Parameter String", ExclusiveResourceId); + SalesPostingJob.Validate("Job Queue Category Code", 'POSTING'); + PurchasePostingJob.Validate("Job Queue Category Code", 'POSTING'); end; } \ No newline at end of file