Skip to content

KVSKBASalesContractManagement#

Procedures#

ReleaseContract(Record KVSKBASalesContractHeader) :#

Summary: Function releases a sales contract

procedure ReleaseContract(var SalesContractHeader: Record "KVSKBASalesContractHeader"): 

Parameters:

  • SalesContractHeader: Sales contract to be released

CheckSalesLineContractLine(Record Sales Header, Record Sales Line, Record KVSKBASalesContractHeader, Record KVSKBASalesContractLine, Boolean) :#

Summary: Checks contract header and line with sales document data

procedure CheckSalesLineContractLine(SalesHeader: Record "Sales Header"; SalesLine: Record "Sales Line"; SalesContractHeader: Record "KVSKBASalesContractHeader"; SalesContractLine: Record "KVSKBASalesContractLine"; CheckonPosting: Boolean): 

Parameters:

  • SalesHeader: Specifies the sales header that contains the data for checking the contracts.
  • SalesLine: Specifies the sales line that contains the data for checking the contracts.
  • SalesContractHeader: Specifies the sales contract header to be checked.
  • SalesContractLine: Specifies the sales contract line to be checked.
  • CheckonPosting: Indicates whether the check is executed when psoting.

ContractCheckSalesLinesFromQuote(Record Sales Header, Record Sales Line) :#

Summary: Checks contract header and line at creating a order line or an invoice line from quote line

procedure ContractCheckSalesLinesFromQuote(SalesHeader: Record "Sales Header"; SalesLine: Record "Sales Line"): 

Parameters:

  • SalesHeader: Specifies the sales header that contains the data for checking the contracts.
  • SalesLine: Specifies the sales line that contains the data for checking the contracts.

Events#

OnAfterCheckContractLineOnFinishing(Record KVSKBASalesContractHeader, Record KVSKBASalesContractLine) :#

[IntegrationEvent(false, false)]
local procedure OnAfterCheckContractLineOnFinishing(KVSKBASalesContractHeader: Record "KVSKBASalesContractHeader"; var KVSKBASalesContractLine: Record "KVSKBASalesContractLine"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesContractManagement", 'OnAfterCheckContractLineOnFinishing', '', false, false)]
local procedure DoSomethingOnAfterCheckContractLineOnFinishing(KVSKBASalesContractHeader: Record "KVSKBASalesContractHeader"; var KVSKBASalesContractLine: Record "KVSKBASalesContractLine")
begin
end;

OnAfterCheckContractLineOnReleasing(Record KVSKBASalesContractHeader, Record KVSKBASalesContractLine) :#

[IntegrationEvent(false, false)]
local procedure OnAfterCheckContractLineOnReleasing(KVSKBASalesContractHeader: Record "KVSKBASalesContractHeader"; var KVSKBASalesContractLine: Record "KVSKBASalesContractLine"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesContractManagement", 'OnAfterCheckContractLineOnReleasing', '', false, false)]
local procedure DoSomethingOnAfterCheckContractLineOnReleasing(KVSKBASalesContractHeader: Record "KVSKBASalesContractHeader"; var KVSKBASalesContractLine: Record "KVSKBASalesContractLine")
begin
end;

OnAfterCheckSalesLineContractLine(Record Sales Header, Record Sales Line, Record KVSKBASalesContractHeader, Record KVSKBASalesContractLine, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnAfterCheckSalesLineContractLine(SalesHeader: Record "Sales Header"; SalesLine: Record "Sales Line"; KVSKBASalesContractHeader: Record "KVSKBASalesContractHeader"; KVSKBASalesContractLine: Record "KVSKBASalesContractLine"; OnPosting: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesContractManagement", 'OnAfterCheckSalesLineContractLine', '', false, false)]
local procedure DoSomethingOnAfterCheckSalesLineContractLine(SalesHeader: Record "Sales Header"; SalesLine: Record "Sales Line"; KVSKBASalesContractHeader: Record "KVSKBASalesContractHeader"; KVSKBASalesContractLine: Record "KVSKBASalesContractLine"; OnPosting: Boolean)
begin
end;

OnAfterCopySalesContract(Record KVSKBASalesContractHeader, Record KVSKBASalesContractHeader, Boolean, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnAfterCopySalesContract(FromKVSKBASalesContractHeader: Record "KVSKBASalesContractHeader"; var ToKVSKBASalesContractHeader: Record "KVSKBASalesContractHeader"; IncludeHeader: Boolean; DeletePricesAndDisc: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesContractManagement", 'OnAfterCopySalesContract', '', false, false)]
local procedure DoSomethingOnAfterCopySalesContract(FromKVSKBASalesContractHeader: Record "KVSKBASalesContractHeader"; var ToKVSKBASalesContractHeader: Record "KVSKBASalesContractHeader"; IncludeHeader: Boolean; DeletePricesAndDisc: Boolean)
begin
end;

OnAfterEnterItemReference(Record KVSKBASalesContractLine) :#

[IntegrationEvent(false, false)]
local procedure OnAfterEnterItemReference(var KVSKBASalesContractLine: Record "KVSKBASalesContractLine"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesContractManagement", 'OnAfterEnterItemReference', '', false, false)]
local procedure DoSomethingOnAfterEnterItemReference(var KVSKBASalesContractLine: Record "KVSKBASalesContractLine")
begin
end;

OnAfterFinishContract(Record KVSKBASalesContractHeader) :#

[IntegrationEvent(false, false)]
local procedure OnAfterFinishContract(var KVSKBASalesContractHeader: Record "KVSKBASalesContractHeader"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesContractManagement", 'OnAfterFinishContract', '', false, false)]
local procedure DoSomethingOnAfterFinishContract(var KVSKBASalesContractHeader: Record "KVSKBASalesContractHeader")
begin
end;

OnAfterGetTempValidContractLines(Record Sales Header, Record Sales Line, Record KVSKBATempTableWithNo, Boolean, Record KVSKBASalesContractLine, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnAfterGetTempValidContractLines(SalesHeader: Record "Sales Header"; SalesLine: Record "Sales Line"; var KVSKBATempTableWithNo: Record "KVSKBATempTableWithNo" temporary; OnlyGetFirstContractLine: Boolean; var TempSalesContractLine: Record "KVSKBASalesContractLine" temporary; var Found: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesContractManagement", 'OnAfterGetTempValidContractLines', '', false, false)]
local procedure DoSomethingOnAfterGetTempValidContractLines(SalesHeader: Record "Sales Header"; SalesLine: Record "Sales Line"; var KVSKBATempTableWithNo: Record "KVSKBATempTableWithNo" temporary; OnlyGetFirstContractLine: Boolean; var TempSalesContractLine: Record "KVSKBASalesContractLine" temporary; var Found: Boolean)
begin
end;

OnAfterLookupSalesContractLines(Record Sales Header, Record Sales Line, Record KVSKBASalesContractLine, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnAfterLookupSalesContractLines(SalesHeader: Record "Sales Header"; SalesLine: Record "Sales Line"; var KVSKBASalesContractLine: Record "KVSKBASalesContractLine"; var LineSelected: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesContractManagement", 'OnAfterLookupSalesContractLines', '', false, false)]
local procedure DoSomethingOnAfterLookupSalesContractLines(SalesHeader: Record "Sales Header"; SalesLine: Record "Sales Line"; var KVSKBASalesContractLine: Record "KVSKBASalesContractLine"; var LineSelected: Boolean)
begin
end;

OnAfterLookupItemReference(Record KVSKBASalesContractLine, Record Item Reference) :#

[IntegrationEvent(false, false)]
local procedure OnAfterLookupItemReference(KVSKBASalesContractLine: Record "KVSKBASalesContractLine"; var ReturnItemReference: Record "Item Reference"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesContractManagement", 'OnAfterLookupItemReference', '', false, false)]
local procedure DoSomethingOnAfterLookupItemReference(KVSKBASalesContractLine: Record "KVSKBASalesContractLine"; var ReturnItemReference: Record "Item Reference")
begin
end;

OnAfterSetDefaultSalesperson(Record KVSKBASalesContractHeader) :#

[IntegrationEvent(false, false)]
local procedure OnAfterSetDefaultSalesperson(var KVSKBASalesContractHeader: Record "KVSKBASalesContractHeader"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesContractManagement", 'OnAfterSetDefaultSalesperson', '', false, false)]
local procedure DoSomethingOnAfterSetDefaultSalesperson(var KVSKBASalesContractHeader: Record "KVSKBASalesContractHeader")
begin
end;

OnAfterReleaseContract(Record KVSKBASalesContractHeader) :#

[IntegrationEvent(false, false)]
local procedure OnAfterReleaseContract(var KVSKBASalesContractHeader: Record "KVSKBASalesContractHeader"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesContractManagement", 'OnAfterReleaseContract', '', false, false)]
local procedure DoSomethingOnAfterReleaseContract(var KVSKBASalesContractHeader: Record "KVSKBASalesContractHeader")
begin
end;

OnAfterReopenContract(Record KVSKBASalesContractHeader) :#

[IntegrationEvent(false, false)]
local procedure OnAfterReopenContract(var KVSKBASalesContractHeader: Record "KVSKBASalesContractHeader"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesContractManagement", 'OnAfterReopenContract', '', false, false)]
local procedure DoSomethingOnAfterReopenContract(var KVSKBASalesContractHeader: Record "KVSKBASalesContractHeader")
begin
end;

OnAfterVerifyContractLineChange(Record KVSKBASalesContractLine, Record KVSKBASalesContractLine, Integer) :#

[IntegrationEvent(false, false)]
local procedure OnAfterVerifyContractLineChange(NewKVSKBASalesContractLine: Record "KVSKBASalesContractLine"; OldKVSKBASalesContractLine: Record "KVSKBASalesContractLine"; CalledFromFieldNo: Integer): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesContractManagement", 'OnAfterVerifyContractLineChange', '', false, false)]
local procedure DoSomethingOnAfterVerifyContractLineChange(NewKVSKBASalesContractLine: Record "KVSKBASalesContractLine"; OldKVSKBASalesContractLine: Record "KVSKBASalesContractLine"; CalledFromFieldNo: Integer)
begin
end;

OnBeforeCheckContractLineOnFinishing(Record KVSKBASalesContractHeader, Record KVSKBASalesContractLine, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeCheckContractLineOnFinishing(KVSKBASalesContractHeader: Record "KVSKBASalesContractHeader"; var KVSKBASalesContractLine: Record "KVSKBASalesContractLine"; var Ishandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesContractManagement", 'OnBeforeCheckContractLineOnFinishing', '', false, false)]
local procedure DoSomethingOnBeforeCheckContractLineOnFinishing(KVSKBASalesContractHeader: Record "KVSKBASalesContractHeader"; var KVSKBASalesContractLine: Record "KVSKBASalesContractLine"; var Ishandled: Boolean)
begin
end;

OnBeforeCheckContractLineOnReleasing(Record KVSKBASalesContractHeader, Record KVSKBASalesContractLine, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeCheckContractLineOnReleasing(KVSKBASalesContractHeader: Record "KVSKBASalesContractHeader"; var KVSKBASalesContractLine: Record "KVSKBASalesContractLine"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesContractManagement", 'OnBeforeCheckContractLineOnReleasing', '', false, false)]
local procedure DoSomethingOnBeforeCheckContractLineOnReleasing(KVSKBASalesContractHeader: Record "KVSKBASalesContractHeader"; var KVSKBASalesContractLine: Record "KVSKBASalesContractLine"; var IsHandled: Boolean)
begin
end;

OnBeforeCheckSalesLineContractLine(Record Sales Header, Record Sales Line, Record KVSKBASalesContractHeader, Record KVSKBASalesContractLine, Boolean, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeCheckSalesLineContractLine(SalesHeader: Record "Sales Header"; SalesLine: Record "Sales Line"; KVSKBASalesContractHeader: Record "KVSKBASalesContractHeader"; SalesContractLine: Record "KVSKBASalesContractLine"; OnPosting: Boolean; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesContractManagement", 'OnBeforeCheckSalesLineContractLine', '', false, false)]
local procedure DoSomethingOnBeforeCheckSalesLineContractLine(SalesHeader: Record "Sales Header"; SalesLine: Record "Sales Line"; KVSKBASalesContractHeader: Record "KVSKBASalesContractHeader"; SalesContractLine: Record "KVSKBASalesContractLine"; OnPosting: Boolean; var IsHandled: Boolean)
begin
end;

OnBeforeCopySalesContract(Record KVSKBASalesContractHeader, Record KVSKBASalesContractHeader, Boolean, Boolean, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeCopySalesContract(FromKVSKBASalesContractHeader: Record "KVSKBASalesContractHeader"; var ToKVSKBASalesContractHeader: Record "KVSKBASalesContractHeader"; IncludeHeader: Boolean; DeletePricesAndDisc: Boolean; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesContractManagement", 'OnBeforeCopySalesContract', '', false, false)]
local procedure DoSomethingOnBeforeCopySalesContract(FromKVSKBASalesContractHeader: Record "KVSKBASalesContractHeader"; var ToKVSKBASalesContractHeader: Record "KVSKBASalesContractHeader"; IncludeHeader: Boolean; DeletePricesAndDisc: Boolean; var IsHandled: Boolean)
begin
end;

OnBeforeEnterItemReference(Record KVSKBASalesContractLine, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeEnterItemReference(var KVSKBASalesContractLine: Record "KVSKBASalesContractLine"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesContractManagement", 'OnBeforeEnterItemReference', '', false, false)]
local procedure DoSomethingOnBeforeEnterItemReference(var KVSKBASalesContractLine: Record "KVSKBASalesContractLine"; var IsHandled: Boolean)
begin
end;

OnBeforeFinishContract(Record KVSKBASalesContractHeader, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeFinishContract(var KVSKBASalesContractHeader: Record "KVSKBASalesContractHeader"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesContractManagement", 'OnBeforeFinishContract', '', false, false)]
local procedure DoSomethingOnBeforeFinishContract(var KVSKBASalesContractHeader: Record "KVSKBASalesContractHeader"; var IsHandled: Boolean)
begin
end;

OnBeforeGetTempValidContractLines(Record Sales Header, Record Sales Line, Record KVSKBATempTableWithNo, Boolean, Record KVSKBASalesContractLine, Boolean, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeGetTempValidContractLines(SalesHeader: Record "Sales Header"; SalesLine: Record "Sales Line"; var KVSKBATempTableWithNo: Record "KVSKBATempTableWithNo" temporary; OnlyGetFirstContractLine: Boolean; var TempSalesContractLine: Record "KVSKBASalesContractLine" temporary; var Found: Boolean; var Ishandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesContractManagement", 'OnBeforeGetTempValidContractLines', '', false, false)]
local procedure DoSomethingOnBeforeGetTempValidContractLines(SalesHeader: Record "Sales Header"; SalesLine: Record "Sales Line"; var KVSKBATempTableWithNo: Record "KVSKBATempTableWithNo" temporary; OnlyGetFirstContractLine: Boolean; var TempSalesContractLine: Record "KVSKBASalesContractLine" temporary; var Found: Boolean; var Ishandled: Boolean)
begin
end;

OnBeforeLookupItemReference(Record KVSKBASalesContractLine, Record Item Reference, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeLookupItemReference(KVSKBASalesContractLine: Record "KVSKBASalesContractLine"; var ReturnItemReference: Record "Item Reference"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesContractManagement", 'OnBeforeLookupItemReference', '', false, false)]
local procedure DoSomethingOnBeforeLookupItemReference(KVSKBASalesContractLine: Record "KVSKBASalesContractLine"; var ReturnItemReference: Record "Item Reference"; var IsHandled: Boolean)
begin
end;

OnBeforeLookupSalesContractLines(Record Sales Header, Record Sales Line, Record KVSKBASalesContractLine, Boolean, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeLookupSalesContractLines(SalesHeader: Record "Sales Header"; SalesLine: Record "Sales Line"; var KVSKBASalesContractLine: Record "KVSKBASalesContractLine"; var LineSelected: Boolean; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesContractManagement", 'OnBeforeLookupSalesContractLines', '', false, false)]
local procedure DoSomethingOnBeforeLookupSalesContractLines(SalesHeader: Record "Sales Header"; SalesLine: Record "Sales Line"; var KVSKBASalesContractLine: Record "KVSKBASalesContractLine"; var LineSelected: Boolean; var IsHandled: Boolean)
begin
end;

OnBeforeReleaseContract(Record KVSKBASalesContractHeader, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeReleaseContract(var KVSKBASalesContractHeader: Record "KVSKBASalesContractHeader"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesContractManagement", 'OnBeforeReleaseContract', '', false, false)]
local procedure DoSomethingOnBeforeReleaseContract(var KVSKBASalesContractHeader: Record "KVSKBASalesContractHeader"; var IsHandled: Boolean)
begin
end;

OnBeforeReopenContract(Record KVSKBASalesContractHeader, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeReopenContract(var KVSKBASalesContractHeader: Record "KVSKBASalesContractHeader"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesContractManagement", 'OnBeforeReopenContract', '', false, false)]
local procedure DoSomethingOnBeforeReopenContract(var KVSKBASalesContractHeader: Record "KVSKBASalesContractHeader"; var IsHandled: Boolean)
begin
end;

OnBeforeSetDefaultSalesperson(Record KVSKBASalesContractHeader, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeSetDefaultSalesperson(var KVSKBASalesContractHeader: Record "KVSKBASalesContractHeader"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesContractManagement", 'OnBeforeSetDefaultSalesperson', '', false, false)]
local procedure DoSomethingOnBeforeSetDefaultSalesperson(var KVSKBASalesContractHeader: Record "KVSKBASalesContractHeader"; var IsHandled: Boolean)
begin
end;

OnBeforeVerifyContractLineChange(Record KVSKBASalesContractLine, Record KVSKBASalesContractLine, Integer, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeVerifyContractLineChange(NewKVSKBASalesContractLine: Record "KVSKBASalesContractLine"; OldVSKBASalesContractLine: Record "KVSKBASalesContractLine"; CalledFromFieldNo: Integer; var Ishandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesContractManagement", 'OnBeforeVerifyContractLineChange', '', false, false)]
local procedure DoSomethingOnBeforeVerifyContractLineChange(NewKVSKBASalesContractLine: Record "KVSKBASalesContractLine"; OldVSKBASalesContractLine: Record "KVSKBASalesContractLine"; CalledFromFieldNo: Integer; var Ishandled: Boolean)
begin
end;

OnCopySalesContractOnBeforeModifyToSalesContractLine(Record KVSKBASalesContractLine, Record KVSKBASalesContractLine, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnCopySalesContractOnBeforeModifyToSalesContractLine(FromKVSKBASalesContractLin: Record "KVSKBASalesContractLine"; var ToKVSKBASalesContractLine: Record "KVSKBASalesContractLine"; DeletePricesAndDisc: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesContractManagement", 'OnCopySalesContractOnBeforeModifyToSalesContractLine', '', false, false)]
local procedure DoSomethingOnCopySalesContractOnBeforeModifyToSalesContractLine(FromKVSKBASalesContractLin: Record "KVSKBASalesContractLine"; var ToKVSKBASalesContractLine: Record "KVSKBASalesContractLine"; DeletePricesAndDisc: Boolean)
begin
end;

OnReleaseContractOnBeforeChangeSalesContractStatus(Record KVSKBASalesContractHeader) :#

[IntegrationEvent(false, false)]
local procedure OnReleaseContractOnBeforeChangeSalesContractStatus(var KVSKBASalesContractHeader: Record "KVSKBASalesContractHeader"): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesContractManagement", 'OnReleaseContractOnBeforeChangeSalesContractStatus', '', false, false)]
local procedure DoSomethingOnReleaseContractOnBeforeChangeSalesContractStatus(var KVSKBASalesContractHeader: Record "KVSKBASalesContractHeader")
begin
end;

OnBeforeCheckVariantCodeatContractLineOnReleasing(Record KVSKBASalesContractLine, Boolean) :#

[IntegrationEvent(false, false)]
local procedure OnBeforeCheckVariantCodeatContractLineOnReleasing(SalesContractLine: Record "KVSKBASalesContractLine"; var IsHandled: Boolean): 
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSKBASalesContractManagement", 'OnBeforeCheckVariantCodeatContractLineOnReleasing', '', false, false)]
local procedure DoSomethingOnBeforeCheckVariantCodeatContractLineOnReleasing(SalesContractLine: Record "KVSKBASalesContractLine"; var IsHandled: Boolean)
begin
end;