How to set “Minimal Charge” in RK7

Step 1: On manager station in Service - Scripts – Operations create 2 operations:

1. Bill (and enter next script after first string)

var

summa:double;

begin

  if not RKCheck.Valid then Exit;

  summa:=RKCheck.CurrentOrder.Visit.GuestCnt*10;

  if RKCheck.CurrentOrder.ToPaySum < summa then
    
   begin

    RKCheck.CreateCheckItemByReferenceCode(rkrefDiscounts, '150');

    if SYS.ObjectInheritsFrom(TObject(RKCheck.CurrentCheckItem), 'TDiscountItem') then
     
     begin

      TDiscountItem(RKCheck.CurrentCheckItem).SrcAmount := summa - RKCheck.CurrentOrder.ToPaySum;

      TDiscountItem(RKCheck.CurrentCheckItem).ValueChanged := True;      

      TDiscountItem(RKCheck.CurrentCheckItem).ChargeSource := chsHuman;      

     end;

   end;

  RK7.PostOperation(rkoPrintBill, 0);

end;
 

* 10 here is sum of minimal charge in basic currency

* 150 here is discount code

1. Receipt (and enter next script after first string)

var

summa:double;

begin

  if not RKCheck.Valid then Exit;

  summa:=RKCheck.CurrentOrder.Visit.GuestCnt*10;

  if RKCheck.CurrentOrder.ToPaySum < summa then
   
   begin

    RKCheck.CreateCheckItemByReferenceCode(rkrefDiscounts, '150');

    if SYS.ObjectInheritsFrom(TObject(RKCheck.CurrentCheckItem), 'TDiscountItem') then
     
     begin

      TDiscountItem(RKCheck.CurrentCheckItem).SrcAmount := summa - RKCheck.CurrentOrder.ToPaySum;

      TDiscountItem(RKCheck.CurrentCheckItem).ValueChanged := True;      

      TDiscountItem(RKCheck.CurrentCheckItem).ChargeSource := chsHuman;      

    end;

  end; 

RK7.PostOperation(RKOCalcOrder,0);

end;
 

* 10 here is sum of minimal charge in basic currency

* 150 here is discount code

Step 2: On manager station in Money - Discounts and Markups create markup with next adjustments:

Code: 150 (it may be different, but must be equal with rkrefDiscounts, '150' in script body)

Name: Minimal Charge (or Minimal Charge Rest)

Changeable value: ON

Count type: Amount (it is important!)

Combine any: ON

On order: ON

Other ticks are OFF and settings are DEFAULT.

There is no need to set any values in Details. Left it as is.

Step 3: On manager station in Service – Operation – User Operations:

1. Select 1`st user operation (rkoUser01) and in Scripting add Bill script. Change user operation name to Bill (for example).
2. Select 10`th user operation (rkoUser10) and in Scripting add Receipt script. Change user operation name to Receipt (for example).

Step 4: On manager station in Options – User interface – Function Keys – Order Operations – Operations Selector create:

1. Button Bill and it’s properties in Operation and Operation For Empty set Bill
2.  Button Receipt and it’s properties in Operation and Operation For Empty set Receipt

Step 5: On manager station in Options – User interface – Selectors – Order – Operation Selector – Receipt: Operation Selector

1. Copy Standard supply (with all subitems), name it Minimal Charge (for example).
2. Click on Operation selector and delete default Bill function key. Add here newly created function key Bill (Add selector button – Function key. In new window select Order operations – Operation Selector. Choose our Bill). Using green arrows (right mouse click on button) you can adjust it`s position on cash station.
3. Click on Pay and delete default Bill function key. Add here newly created function key Bill (Add selector button – Function key. In new window select Order operations – Operation Selector. Choose our Bill). Using green arrows (right mouse click on button) you can adjust it`s position on cash station.
4. Click on Pay and delete default Receipt function key. Add here newly created function key Receipt (Add selector button – Function key. In new window select Order operations – Operation Selector. Choose our Receipt). Using green arrows (right mouse click on button) you can adjust it`s position on cash station.

Step 6: Now just add this selector (click on our Minimal Charge) in usage by clicking “gear” button and dragging it onto main screen.