KVSPSAJobBudgetLinePrice#
Procedures#
CopyToBuffer(Codeunit Price Calculation Buffer Mgt.) : Boolean#
procedure CopyToBuffer(var PriceCalculationBufferMgt: Codeunit "Price Calculation Buffer Mgt."): Boolean
GetAssetType() : Enum#
Summary: Gets the asset type based on the type of the current job budget line. This procedure determines the asset type by checking the type of the job budget line and assigns it to the AssetType variable. The AssetType variable is of type "Price Asset Type" enum.
procedure GetAssetType(): Enum Price Asset Type
Returns: Returns the asset type as an enum "Price Asset Type".
GetLine(Variant) :#
Summary: Gets the current job budget line. This procedure retrieves the current job budget line and assigns it to the LineVariant parameter.
procedure GetLine(var LineVariant: Variant):
Parameters:
LineVariant: Passed as a reference, this variant will hold the current job budget line.
GetLine(Variant, Variant) :#
Summary: Gets the current job budget line and clears the header variant. This procedure retrieves the current job budget line and assigns it to the LineVariant parameter.
procedure GetLine(var HeaderVariant: Variant; var LineVariant: Variant):
Parameters:
HeaderVariant: Passed as a reference, this variant will be cleared and is not used in this procedure.LineVariant: Passed as a reference, this variant will hold the current job budget line.
GetPriceType() : Enum#
Summary: Gets the current price type. This procedure retrieves the current price type and returns it as an enum "Price Type".
procedure GetPriceType(): Enum Price Type
Returns: Returns the current price type as an enum "Price Type".
GetTableNo() : Integer#
Summary: Gets the table number for the job budget line. This procedure retrieves the table number for the job budget line and returns it as an integer.
procedure GetTableNo(): Integer
Returns: returns the table number as an integer.
IsDiscountAllowed() : Boolean#
Summary: Checks if a discount is allowed based on the current job budget line and price type. This procedure evaluates whether a discount can be applied to the current job budget line.
procedure IsDiscountAllowed(): Boolean
Returns: Returns true if a discount is allowed, otherwise false.
IsPriceUpdateNeeded(Enum Price Amount Type, Boolean, Integer) : Boolean#
procedure IsPriceUpdateNeeded(AmountType: Enum "Price Amount Type"; FoundPrice: Boolean; CalledByFieldNo: Integer): Boolean
SetAssetSourceForSetup(Record Dtld. Price Calculation Setup) : Boolean#
Summary: Sets the asset source for the detailed price calculation setup. This procedure initializes a new "Dtld. Price Calculation Setup" record and sets its properties based on the current job budget line.
procedure SetAssetSourceForSetup(var DtldPriceCalculationSetup: Record "Dtld. Price Calculation Setup"): Boolean
Parameters:
DtldPriceCalculationSetup: Passed as a reference, this record will hold the detailed price calculation setup.
Returns: Returns true if the asset source was successfully set, otherwise false.
SetLine(Enum Price Type, Variant) :#
procedure SetLine(PriceType: Enum "Price Type"; LineVariant: Variant):
SetLine(Enum Price Type, Variant, Variant) :#
procedure SetLine(PriceType: Enum "Price Type"; HeaderVariant: Variant; LineVariant: Variant):
SetPrice(Enum Price Amount Type, Record Price List Line) :#
procedure SetPrice(AmountType: Enum "Price Amount Type"; PriceListLine: Record "Price List Line"):
SetSources(Codeunit Price Source List) :#
procedure SetSources(var NewPriceSourceList: Codeunit "Price Source List"):
Update(Enum Price Amount Type) :#
procedure Update(AmountType: Enum "Price Amount Type"):
ValidatePrice(Enum Price Amount Type) :#
procedure ValidatePrice(AmountType: Enum "Price Amount Type"):
Verify() :#
Summary: Verifies the job budget line fields. This procedure checks the fields of the job budget line to ensure they are correctly set.
procedure Verify():
Events#
KVSPSAOnAfterAddSources(Record KVSPSA Job Budget Line, Enum Price Type, Codeunit Price Source List) :#
[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterAddSources(JobBudgetLine: Record "KVSPSA Job Budget Line"; PriceType: Enum "Price Type"; var PriceSourceList: Codeunit "Price Source List"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAJobBudgetLinePrice", 'KVSPSAOnAfterAddSources', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterAddSources(JobBudgetLine: Record "KVSPSA Job Budget Line"; PriceType: Enum "Price Type"; var PriceSourceList: Codeunit "Price Source List")
begin
end;
KVSPSAOnAfterFillBuffer(Record Price Calculation Buffer, Record KVSPSA Job Budget Line) :#
[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterFillBuffer(var PriceCalculationBuffer: Record "Price Calculation Buffer"; JobBudgetLine: Record "KVSPSA Job Budget Line"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAJobBudgetLinePrice", 'KVSPSAOnAfterFillBuffer', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterFillBuffer(var PriceCalculationBuffer: Record "Price Calculation Buffer"; JobBudgetLine: Record "KVSPSA Job Budget Line")
begin
end;
KVSPSAOnAfterGetAssetType(Record KVSPSA Job Budget Line, Enum Price Asset Type) :#
[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterGetAssetType(JobBudgetLine: Record "KVSPSA Job Budget Line"; var AssetType: Enum "Price Asset Type"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAJobBudgetLinePrice", 'KVSPSAOnAfterGetAssetType', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterGetAssetType(JobBudgetLine: Record "KVSPSA Job Budget Line"; var AssetType: Enum "Price Asset Type")
begin
end;
KVSPSAOnAfterSetPrice(Record KVSPSA Job Budget Line, Record Price List Line, Enum Price Amount Type) :#
[IntegrationEvent(false, false)]
local procedure KVSPSAOnAfterSetPrice(var JobBudgetLine: Record "KVSPSA Job Budget Line"; PriceListLine: Record "Price List Line"; AmountType: Enum "Price Amount Type"):
[EventSubscriber(ObjectType::Codeunit, Codeunit::"KVSPSAJobBudgetLinePrice", 'KVSPSAOnAfterSetPrice', '', false, false)]
local procedure DoSomethingKVSPSAOnAfterSetPrice(var JobBudgetLine: Record "KVSPSA Job Budget Line"; PriceListLine: Record "Price List Line"; AmountType: Enum "Price Amount Type")
begin
end;