Tuesday, July 3, 2018

LS NAV - Prevent Manager Override of Credit Limits on POS

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