Codeunit "Membership Management LYCAP"

ID 70345260

Namespace: CapVision.Sales.CustomerLoyalty

Properties

Name	Value
Access	Public
SingleInstance	True

Methods

Post

procedure Post(SalesInvHeader: Record "Sales Invoice Header")

Parameters

Name	Type	Description
SalesInvHeader	Record "Sales Invoice Header"

Post

procedure Post(SalesCrMemoHeader: Record "Sales Cr.Memo Header")

Parameters

Name	Type	Description
SalesCrMemoHeader	Record "Sales Cr.Memo Header"

CalculateLine

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

Parameters

Name	Type	Description
SalesHeader	Record "Sales Header"
SalesLine	Record "Sales Line"

CalculateLine

procedure CalculateLine(SalesInvHeader: Record "Sales Invoice Header"; var SalesInvLine: Record "Sales Invoice Line")

Parameters

Name	Type	Description
SalesInvHeader	Record "Sales Invoice Header"
SalesInvLine	Record "Sales Invoice Line"

CalculateLine

procedure CalculateLine(SalesCrMemoHeader: Record "Sales Cr.Memo Header"; var SalesCrMemoLine: Record "Sales Cr.Memo Line")

Parameters

Name	Type	Description
SalesCrMemoHeader	Record "Sales Cr.Memo Header"
SalesCrMemoLine	Record "Sales Cr.Memo Line"

PostSubscriptionYesNo

procedure PostSubscriptionYesNo(var Customer: Record Customer)

Parameters

Name	Type	Description
Customer	Record Customer

PostPayment

procedure PostPayment(CustLedgerEntry: Record "Cust. Ledger Entry")

Parameters

Name	Type	Description
CustLedgerEntry	Record "Cust. Ledger Entry"

PostSubscription

Enregistre la souscription à un programme de fidélité pour le client spécifié.

procedure PostSubscription(var Customer: Record Customer; MembershipProgramCode: Code[20]; MembershipLevelCode: Code[20]; SalespersonCode: Code[20]; PostingDate: Date; DocumentNo: Code[20])

Parameters

Name	Type	Description
Customer	Record Customer
MembershipProgramCode	Code[20]
MembershipLevelCode	Code[20]
SalespersonCode	Code[20]
PostingDate	Date
DocumentNo	Code[20]

PostAdjustment

Obsolete

This element will become obsolete from version V21.202212. This function will be removed in a future release

[Obsolete(This function will be removed in a future release,V21.202212)]
procedure PostAdjustment(Customer: Record Customer; LoyaltyPoint: Decimal)

Parameters

Name	Type	Description
Customer	Record Customer
LoyaltyPoint	Decimal

PostAdjustment

procedure PostAdjustment(CustomerNo: Code[20]; MembershipProgramCode: Code[20]; LoyaltyPoint: Decimal; PostingDate: Date; DocumentNo: Code[20])

Parameters

Name	Type	Description
CustomerNo	Code[20]
MembershipProgramCode	Code[20]
LoyaltyPoint	Decimal
PostingDate	Date
DocumentNo	Code[20]

Events

OnBeforeCheckLineAllowsLoyaltyPoints

[IntegrationEvent(False,False)]
local procedure OnBeforeCheckLineAllowsLoyaltyPoints(VarRec: Variant; Type: Enum "Sales Line Type"; No: Code[20]; var Ret: Boolean; var Handled: Boolean)

Parameters

Name	Type	Description
VarRec	Variant
Type	Microsoft.Sales.Document."Sales Line Type"
No	Code[20]
Ret	Boolean
Handled	Boolean

OnBeforeCalculateLineForSalesInvLine

[IntegrationEvent(False,False)]
local procedure OnBeforeCalculateLineForSalesInvLine(SalesInvHeader: Record "Sales Invoice Header"; var SalesInvLine: Record "Sales Invoice Line"; var Handled: Boolean)

Parameters

Name	Type	Description
SalesInvHeader	Record "Sales Invoice Header"
SalesInvLine	Record "Sales Invoice Line"
Handled	Boolean

OnBeforeCalculateLineForSalesCrMemoLine

[IntegrationEvent(False,False)]
local procedure OnBeforeCalculateLineForSalesCrMemoLine(SalesCrMemoHeader: Record "Sales Cr.Memo Header"; var SalesCrMemoLine: Record "Sales Cr.Memo Line"; var Handled: Boolean)

Parameters

Name	Type	Description
SalesCrMemoHeader	Record "Sales Cr.Memo Header"
SalesCrMemoLine	Record "Sales Cr.Memo Line"
Handled	Boolean

OnBeforeCalculateLineForSalesLine

[IntegrationEvent(False,False)]
local procedure OnBeforeCalculateLineForSalesLine(SalesHeader: Record "Sales Header"; var SalesLine: Record "Sales Line"; var Handled: Boolean)

Parameters

Name	Type	Description
SalesHeader	Record "Sales Header"
SalesLine	Record "Sales Line"
Handled	Boolean

OnBeforePostPaymentFromCustLedgEntry

[IntegrationEvent(False,False)]
local procedure OnBeforePostPaymentFromCustLedgEntry(CustLedgerEntry: Record "Cust. Ledger Entry"; var Handled: Boolean)

Parameters

Name	Type	Description
CustLedgerEntry	Record "Cust. Ledger Entry"
Handled	Boolean

OnBeforePostEntryFromCustLedgEntry

[IntegrationEvent(False,False)]
local procedure OnBeforePostEntryFromCustLedgEntry(CustLedgerEntry: Record "Cust. Ledger Entry"; var MembershipEntry: Record "Membership Ledger Entry LYCAP")

Parameters

Name	Type	Description
CustLedgerEntry	Record "Cust. Ledger Entry"
MembershipEntry	Table CapVision.Sales.CustomerLoyalty."Membership Ledger Entry LYCAP"

OnBeforeCalculateLineForPostedReceiptLine

Se produit avant de calculer les points de fidélité pour une ligne de ticket de caisse.

[IntegrationEvent(False,False)]
internal procedure OnBeforeCalculateLineForPostedReceiptLine(PostedReceiptHeaderRef: RecordRef; PostedReceiptLineRef: RecordRef; var LoyaltyPointCalculationMethod: Enum "Loyalty Pt. Calc. Type LYCAP"; var LoyaltyPoints: Decimal; var Handled: Boolean)

Parameters

Name	Type	Description
PostedReceiptHeaderRef	RecordRef
PostedReceiptLineRef	RecordRef
LoyaltyPointCalculationMethod	Enum CapVision.Sales.CustomerLoyalty."Loyalty Pt. Calc. Type LYCAP"
LoyaltyPoints	Decimal
Handled	Boolean

Remarks

Cet événement est déclenché dans le cadre de la dépendance faible avec CAP Caisse.

See also

• Codeunit