Codeunit 7031 Price Source - All
- App
- Base Application
- Namespace
- Microsoft.Pricing.Source
- Versions
- 17-28
Versions171819202122232425262728
Source29
Source in 29
src/Layers/W1/BaseApp/Pricing/Source/PriceSourceAll.Codeunit.al44 lines, Copyright (c) Microsoft Corporation. MIT
// ------------------------------------------------------------------------------------------------
// Copyright (c) Microsoft Corporation. All rights reserved.
// Licensed under the MIT License. See License.txt in the project root for license information.
// ------------------------------------------------------------------------------------------------
namespace Microsoft.Pricing.Source;
using Microsoft.Pricing.PriceList;
codeunit 7031 "Price Source - All" implements "Price Source"
{
procedure GetNo(var PriceSource: Record "Price Source")
begin
PriceSource.InitSource();
end;
procedure GetId(var PriceSource: Record "Price Source")
begin
PriceSource.InitSource();
end;
procedure IsForAmountType(AmountType: Enum "Price Amount Type"): Boolean
begin
exit(true);
end;
procedure IsSourceNoAllowed() Result: Boolean;
begin
Result := false;
end;
procedure IsLookupOK(var PriceSource: Record "Price Source"): Boolean
begin
exit(false)
end;
procedure VerifyParent(var PriceSource: Record "Price Source") Result: Boolean
begin
PriceSource.InitSource();
end;
procedure GetGroupNo(PriceSource: Record "Price Source"): Code[20];
begin
end;
}