Table of Contents

Codeunit "Advanced Discounts PRCAP"

ID 70344650
Namespace: CapVision.CapBusiness.Pricing.AdvancedDiscounts

Methods

ApplyDiscounts

Applies the line discounts to a sales line

procedure ApplyDiscounts(SalesOrderDiscount: Record "Sales Order Discounts PRCAP")

Parameters

Name Type Description
SalesOrderDiscount Table CapVision.CapBusiness.Pricing.AdvancedDiscounts."Sales Order Discounts PRCAP"

Any line discount

ApplyDiscounts

Applies the line discounts to a sales line

procedure ApplyDiscounts(var SalesLine: Record "Sales Line")

Parameters

Name Type Description
SalesLine Record "Sales Line"

The sales line to which the discounts will be applied

ApplyDiscounts

procedure ApplyDiscounts(var SalesHeader: Record "Sales Header")

Parameters

Name Type Description
SalesHeader Record "Sales Header"

DeleteDiscounts

Deletes all discounts from a line

procedure DeleteDiscounts(SalesLine: Record "Sales Line")

Parameters

Name Type Description
SalesLine Record "Sales Line"

DeleteDiscounts

Deletes all header discounts

procedure DeleteDiscounts(SalesHeader: Record "Sales Header")

Parameters

Name Type Description
SalesHeader Record "Sales Header"

RecalculateDiscounts

procedure RecalculateDiscounts(SalesLine: Record "Sales Line")

Parameters

Name Type Description
SalesLine Record "Sales Line"

RecalculateDiscounts

procedure RecalculateDiscounts(var SalesOrderDiscount: Record "Sales Order Discounts PRCAP"; AmountBeforeDiscount: Decimal)

Parameters

Name Type Description
SalesOrderDiscount Table CapVision.CapBusiness.Pricing.AdvancedDiscounts."Sales Order Discounts PRCAP"
AmountBeforeDiscount Decimal

RecalculateDiscounts

procedure RecalculateDiscounts(var SalesOrderDiscount: Record "Sales Order Discounts PRCAP"; AmountBeforeDiscount: Decimal; RecreateFrom: Integer)

Parameters

Name Type Description
SalesOrderDiscount Table CapVision.CapBusiness.Pricing.AdvancedDiscounts."Sales Order Discounts PRCAP"
AmountBeforeDiscount Decimal
RecreateFrom Integer

CopyFromPriceLine

Copies and applies the discounts setup in the price lines

procedure CopyFromPriceLine(PriceListLine: Record "Price List Line"; SalesLine: Record "Sales Line")

Parameters

Name Type Description
PriceListLine Record "Price List Line"
SalesLine Record "Sales Line"

CopyFromCustInvoiceDisc

procedure CopyFromCustInvoiceDisc(CustInvoiceDisc: Record "Cust. Invoice Disc."; SalesHeader: Record "Sales Header")

Parameters

Name Type Description
CustInvoiceDisc Record "Cust. Invoice Disc."
SalesHeader Record "Sales Header"

ApplyFreeQuantity

Converts a free quantity to a discount %. Manages the difference between the old and new free quantity to adjust the discount % accordingly when the free quantity is updated.

procedure ApplyFreeQuantity(var SalesLine: Record "Sales Line"; xSalesLine: Record "Sales Line")

Parameters

Name Type Description
SalesLine Record "Sales Line"
xSalesLine Record "Sales Line"

ApplyFreeQuantity

procedure ApplyFreeQuantity(var SalesLine: Record "Sales Line")

Parameters

Name Type Description
SalesLine Record "Sales Line"

CheckDiscount

Checks that the discount applied does not conflicts with the free quantity

procedure CheckDiscount(SalesLine: Record "Sales Line")

Parameters

Name Type Description
SalesLine Record "Sales Line"

CopyOrderDiscountsToInvoice

procedure CopyOrderDiscountsToInvoice(FromSalesHeader: Record "Sales Header"; SalesInvoiceHeader: Record "Sales Invoice Header")

Parameters

Name Type Description
FromSalesHeader Record "Sales Header"
SalesInvoiceHeader Record "Sales Invoice Header"

See also