Maintain Commission Script

Menu: Tools | Maintain Commission Script...

Introduction

To execute a simple commission script to determine the commission rate based on the payment age (Payment Date - Invoice Date).

Sales Commission Script module is required.

Maintain Commission Script

Browse mode in Maintain Style. See the below screenshot.

To Create New Commission Script

1. See the below screemshot.

Field Name	Explanation
Code	Input the new code.
Description	Input the commission script description.
Script	Load the commission script.

2. Example of the scripts:

a. Script 1

OnOpen Script

procedure CalculateCommission(AKODocAmt, AAge: variant; var Value: variant);
begin
  if AAge < 10 then
    Value := AKODocAmt * 0.05
  else if AAge < 20 then
    Value := AKODocAmt * 0.03
  else if AAge < 30 then
    Value := AKODocAmt * 0.02
  else
    Value := AKODocAmt * 0.005;
end;

b. Script 2

OnOpen Script
ObjectPascal begin Amount:= Qty * UnitPrice * 0.5; end;