Skip to content

KVSPSAREFlatManagement#

Procedures#

CheckFlatAlreadyAssignedToJob(Record KVSPSAREFlat) :#

procedure CheckFlatAlreadyAssignedToJob(Flat: Record "KVSPSAREFlat"):

JobBudgetLineForFlatExists(Record KVSPSA Job Budget Line, Code[20]) : Boolean#

procedure JobBudgetLineForFlatExists(var KVSPSAJobBudgetLine: Record "KVSPSA Job Budget Line"; FlatNo: Code[20]): Boolean

JobBudgetLineForFlatExists(Code[20]) : Boolean#

procedure JobBudgetLineForFlatExists(FlatNo: Code[20]): Boolean

JobBudgetLineForJobFlatExists(Record KVSPSAJobPSPLine, Record KVSPSAREJobFlat) : Boolean#

procedure JobBudgetLineForJobFlatExists(KVSPSAJobPSPLine: Record "KVSPSAJobPSPLine"; JobFlat: Record "KVSPSAREJobFlat"): Boolean

Events#

KVSPSAREOnBeforeCheckFlatIsSold(Code[20], Boolean, Boolean) :#

Summary: Use this event if you want to add a sales status check for an flat.

[IntegrationEvent(false, false)]
procedure KVSPSAREOnBeforeCheckFlatIsSold(FlatNo: Code[20]; var IsSold: Boolean; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAREFlatManagement", 'KVSPSAREOnBeforeCheckFlatIsSold', '', false, false)]
local procedure DoSomethingKVSPSAREOnBeforeCheckFlatIsSold(FlatNo: Code[20]; var IsSold: Boolean; var IsHandled: Boolean)
begin
end;

Parameters:

  • FlatNo: No. for the flat.
  • IsSold: Should be set to true if the flat is sold.
  • IsHandled: Should be set to true if the case was handled.

KVSPSAREOnBeforeCheckStateOfSales(Code[20], Boolean, Boolean) :#

Summary: Use this event to allow or disallow the change of the unit price for a job flat, even if the status is sold.

[IntegrationEvent(false, false)]
procedure KVSPSAREOnBeforeCheckStateOfSales(JobNo: Code[20]; var ChangeUnitPriceAllowed: Boolean; var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAREFlatManagement", 'KVSPSAREOnBeforeCheckStateOfSales', '', false, false)]
local procedure DoSomethingKVSPSAREOnBeforeCheckStateOfSales(JobNo: Code[20]; var ChangeUnitPriceAllowed: Boolean; var IsHandled: Boolean)
begin
end;

Parameters:

  • JobNo: Job, where the flat is located.
  • ChangeUnitPriceAllowed: Should be set to true if the unit price must be changed.
  • IsHandled: Should be set to true if the case was handled.

KVSPSAREOnBeforeCheckSendNotificationForJQE(Boolean) :#

Summary: Use this event to disable notification for missing job queue entry

[IntegrationEvent(false, false)]
local procedure KVSPSAREOnBeforeCheckSendNotificationForJQE(var IsHandled: Boolean): 

[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAREFlatManagement", 'KVSPSAREOnBeforeCheckSendNotificationForJQE', '', false, false)]
local procedure DoSomethingKVSPSAREOnBeforeCheckSendNotificationForJQE(var IsHandled: Boolean)
begin
end;

Parameters:

  • IsHandled: Should be set to true if the case was handled.