In LS Retail POS, if a customer is assigned to a transaction, and it goes over the credit limit, a manager is allowed to override the credit limit.
This should be removed to only display a warning, but not allow override
-------------------------
C99001570
C99008900 POS functions
Customer."Credit Limit
IF (Customer."Credit Limit (LCY)" <> 0) THEN BEGIN
cBalanceOverLimit := (Customer."Balance (LCY)" + Customer."Amt. Charged On POS" - Customer."Amt. Charged Posted" + Payment) - Customer."Credit Limit (LCY)";
IF cBalanceOverLimit > 0 THEN BEGIN
//MOD1
//IF NOT MgrKey THEN BEGIN
IF (MgrKey) OR (NOT MgrKey) THEN BEGIN
//MOD1
MessageTxt := STRSUBSTNO(Text050,Customer."No.");
EXIT(FALSE);
No comments:
Post a Comment