Codeunit 18091512 EOS077 Point Redempt. Mgmt.
Codeunit 18091512 EOS077 Point Redempt. Mgmt.
Methods
FindIncExpFixedAmount
procedure FindIncExpFixedAmount(pAccountNo: Code[20]; var POSTransLine: Record "LSC POS Trans. Line"; var POSTransaction: Record "LSC POS Transaction"; var CurrInput: Text): Text[30]
Parameters / Return Value
pAccountNo
Code[20]POSTransLine
Record "LSC POS Trans. Line"POSTransaction
Record "LSC POS Transaction"CurrInput
Text[]Returns
Text[30]
SetGlobalSalesType
procedure SetGlobalSalesType()
GetMemberAvailableDiscount
procedure GetMemberAvailableDiscount(var POSTransaction: Record "LSC POS Transaction"): Text
Parameters / Return Value
POSTransaction
Record "LSC POS Transaction"Returns
Text[]
GetAvailDisc
procedure GetAvailDisc(StoreNo: Code[10]; PointBalance: Decimal; ClubCode: Code[10]; SchemeCode: Code[10]): Decimal
Parameters / Return Value
StoreNo
Code[10]PointBalance
DecimalClubCode
Code[10]SchemeCode
Code[10]Returns
Decimal
GetMemberNextDiscountPoints
procedure GetMemberNextDiscountPoints(var POSTransaction: Record "LSC POS Transaction"): Text
Parameters / Return Value
POSTransaction
Record "LSC POS Transaction"Returns
Text[]
GetMemberAvailableDiscount_Caption
procedure GetMemberAvailableDiscount_Caption(var POSTransaction: Record "LSC POS Transaction"): Text
Parameters / Return Value
POSTransaction
Record "LSC POS Transaction"Returns
Text[]
GetMemberNextDiscountPoints_Caption
procedure GetMemberNextDiscountPoints_Caption(var POSTransaction: Record "LSC POS Transaction"): Text
Parameters / Return Value
POSTransaction
Record "LSC POS Transaction"Returns
Text[]
GetMemberAccountClub_Desc
procedure GetMemberAccountClub_Desc(var POSTransaction: Record "LSC POS Transaction"): Text
Parameters / Return Value
POSTransaction
Record "LSC POS Transaction"Returns
Text[]
GetMemberAccountScheme_Desc
procedure GetMemberAccountScheme_Desc(var POSTransaction: Record "LSC POS Transaction"): Text
Parameters / Return Value
POSTransaction
Record "LSC POS Transaction"Returns
Text[]
GetNextDiscPts
procedure GetNextDiscPts(StoreNo: Code[10]; PointBalance: Decimal; ClubCode: Code[10]; SchemeCode: Code[10]): Decimal
Parameters / Return Value
StoreNo
Code[10]PointBalance
DecimalClubCode
Code[10]SchemeCode
Code[10]Returns
Decimal
CalcPoints
procedure CalcPoints(CurrencyCode_p: Code[10]; Date_p: Date; ItemCategory_p: Code[10]; ProductGroup_p: Code[10]; ItemNo_p: Code[20]; MembershipCard: Record "LSC Membership Card"; ActivePriceGroup_p: Code[10]; var MemberPointSetup: Record "LSC Member Point Setup"): Boolean
Parameters / Return Value
CurrencyCode_p
Code[10]Date_p
DateItemCategory_p
Code[10]ProductGroup_p
Code[10]ItemNo_p
Code[20]MembershipCard
Record "LSC Membership Card"ActivePriceGroup_p
Code[10]MemberPointSetup
Record "LSC Member Point Setup"Returns
Boolean
GetMember1AttributeValue
procedure GetMember1AttributeValue(var POSTransaction: Record "LSC POS Transaction"): Text
Parameters / Return Value
POSTransaction
Record "LSC POS Transaction"Returns
Text[]
GetMember1AttributeValue_Desc
procedure GetMember1AttributeValue_Desc(var POSTransaction: Record "LSC POS Transaction"): Text
Parameters / Return Value
POSTransaction
Record "LSC POS Transaction"Returns
Text[]
Events
OnBeforeGetRedemptionPointSetup
local procedure OnBeforeGetRedemptionPointSetup(var IsHandled: Boolean; ClubCode: Code[10]; var AvailableDiscount: Decimal)
Parameters / Return Value
IsHandled
BooleanClubCode
Code[10]AvailableDiscount
Decimal
OnBeforeProcessPointRedemption
local procedure OnBeforeProcessPointRedemption(var CurrInput: Text; var IncExpAccount: Record "LSC Income/Expense Account"; var POSTransaction: Record "LSC POS Transaction"; var POSTransLine: Record "LSC POS Trans. Line"; var Proceed: Boolean)
Parameters / Return Value
CurrInput
Text[]IncExpAccount
Record "LSC Income/Expense Account"POSTransaction
Record "LSC POS Transaction"POSTransLine
Record "LSC POS Trans. Line"Proceed
Boolean
Feedback
Was this page helpful?
Glad to hear it! Please tell us how we can improve.
Sorry to hear that. Please tell us how we can improve.