The operation could not complete because a record in the job queue entry table was locked by another user. Please retry the activity in NAV 2018

Business Central/NAV General Discussions
1

Hi Team

I experienced the above error, I wrote this below code in a codeunit

//Number of users = 4/ Four
ImprestHeader.CALCFIELDS("Pending Approvals");
IF (ImprestHeader."Pending Approvals" = 4) AND (ImprestHeader."Request Status" = ImprestHeader."Request Status"::"Pending Approval") THEN BEGIN
  Approval.RESET;
  Approval.SETRANGE("Table ID",52121500);
  Approval.SETRANGE("Document No.",ImprestHeader."No.");
  IF Approval.FINDFIRST THEN BEGIN REPEAT
    IF (Approval."Sequence No." = 1) AND (Approval.Status = Approval.Status::Open) THEN
      Approval.VALIDATE(Status,Approval.Status::Canceled);
    Approval.MODIFY;
  UNTIL Approval.NEXT = 0;
  END;
END;

//Number of users = 1/ One
ImprestHeader.CALCFIELDS("Pending Approvals");
IF (ImprestHeader."Pending Approvals" = 1) AND (ImprestHeader."Request Status" = ImprestHeader."Request Status"::"Pending Approval") THEN BEGIN
  Approval.RESET;
  Approval.SETRANGE("Table ID",52121500);
  Approval.SETRANGE("Document No.",ImprestHeader."No.");
  IF Approval.FINDFIRST THEN BEGIN REPEAT
      IF (Approval."Sequence No." = 3) AND (Approval.Status = Approval.Status::Open) THEN
      Approval.VALIDATE(Status,Approval.Status::Canceled);
    Approval.MODIFY;
    UNTIL Approval.NEXT = 0;
    END;
END;

//Number of users = 1/ One
ImprestHeader.CALCFIELDS("Pending Approvals");
IF (ImprestHeader."Pending Approvals" = 1) AND (ImprestHeader."Request Status" = ImprestHeader."Request Status"::Released) THEN BEGIN
  Approval.RESET;
  Approval.SETRANGE("Table ID",52121500);
  Approval.SETRANGE("Document No.",ImprestHeader."No.");
  IF Approval.FINDFIRST THEN BEGIN REPEAT
      IF (Approval."Sequence No." = 3) AND (Approval.Status = Approval.Status::Open) THEN
      Approval.VALIDATE(Status,Approval.Status::Canceled);
    Approval.MODIFY;
    UNTIL Approval.NEXT = 0;
    END;
END;

//Approve
ImprestHeader.CALCFIELDS("Pending Approvals");
IF (ImprestHeader."Pending Approvals" = 0) AND (ImprestHeader."Request Status" = ImprestHeader."Request Status"::"Pending Approval") THEN BEGIN
  ImprestHeader."Request Status" := ImprestHeader."Request Status"::Released;
  ImprestHeader.MODIFY;
END;
COMMIT;

This code on a report

CleanedApprovals.ImprestDocument("Imprest Header");
COMMIT;

After run it, it worked yesterday but today it was showing the above error message.

2

Errorjob queue.PNG
Errorjob queue.PNG1354×666 64.5 KB

That is the error message displayed

3

It’s hard to say what can be the cause of this deadlock. You need to collect some more data on the processes that are running at the moment of the locking.

I think, NAV SQL Tracing should help you here. Enable tracing, as explained here:

https://cloudblogs.microsoft.com/dynamics365/no-audience/2012/09/18/example-of-how-to-use-sql-tracing-feature-to-profile-al-code/?source=nav

When selecting the events to trace, add the Lock:Deadlock event - this can give a clue on the code that locks the table.

4

Thanks, Alexander Drogin

5

Some input should be there in the Event Log!!