Настройка акций в Кассире - История изменений

Agk: /* Примеры акций */

2018-09-14T11:58:28Z

‎Примеры акций

Agk в 11:56, 14 сентября 2018

2018-09-14T11:56:11Z

Aleksnick: /* Примеры акций */

2016-11-22T07:00:15Z

‎Примеры акций

Aleksnick: /* Примеры акций */

2016-11-22T06:59:59Z

‎Примеры акций

Olgav: /* Создаем в кассире ТМС */

2016-10-11T04:42:00Z

‎Создаем в кассире ТМС

Olgav: /* Создаем в кассире ТМС */

2016-10-11T04:41:24Z

‎Создаем в кассире ТМС

Agk: /* Создаем в кассире ТМС */

2016-04-18T05:20:54Z

‎Создаем в кассире ТМС

Agk: /* Выполняем скрипт */

2016-04-18T05:20:02Z

‎Выполняем скрипт

Aleksnick: /* Примеры акций */

2016-04-15T14:33:55Z

‎Примеры акций

Aleksnick: /* Примеры акций */

2016-04-15T14:32:26Z

‎Примеры акций

← Предыдущая		Версия 11:58, 14 сентября 2018
Строка 456:		Строка 456:


−	==Видео==	+	=Видео=
	* [[Файл:Ролик по акциям2.mp4]]		* [[Файл:Ролик по акциям2.mp4]]

← Предыдущая		Версия 11:56, 14 сентября 2018
Строка 454:		Строка 454:

	[[Problems:Настройка системы скидок для сети\|'''ПОСМОТРЕТЬ ЕЩЕ ПРИМЕРЫ''']]		[[Problems:Настройка системы скидок для сети\|'''ПОСМОТРЕТЬ ЕЩЕ ПРИМЕРЫ''']]
		+
		+
		+	==Видео==
		+	* [[Файл:Ролик по акциям2.mp4]]

← Предыдущая		Версия 07:00, 22 ноября 2016
Строка 453:		Строка 453:


−	[[Problems:Настройка системы скидок для сети\|'''ЕЩЕ ПРИМЕРЫ''']]	+	[[Problems:Настройка системы скидок для сети\|'''ПОСМОТРЕТЬ ЕЩЕ ПРИМЕРЫ''']]

← Предыдущая		Версия 06:59, 22 ноября 2016
Строка 451:		Строка 451:
	* '''PERC_DSC''' - процентная скидка на позицию в % (например 0.15)		* '''PERC_DSC''' - процентная скидка на позицию в % (например 0.15)
	* '''STATUS''', 1 - правило активно, 0 - неактивно		* '''STATUS''', 1 - правило активно, 0 - неактивно
		+
		+
		+	[[Problems:Настройка системы скидок для сети\|'''ЕЩЕ ПРИМЕРЫ''']]

@@ Строка 355: / Строка 355: @@
   '''-305 как  RecalcDSC(0); '''
   '''-332 как  RecalcDSC(1); '''
 Скрипт должен выглядеть примерно так:
 uses
    p10112u1;
@@ Строка 362: / Строка 362: @@
    RecalcDSC(0);
 end;
 ==Пример №2 (старый мех-м)==

@@ Строка 336: / Строка 336: @@
     begin
        ChequeList.Active.P_Index:= ChequeList.Active.IndexByPartID(iq.FieldByName('part_id_out').AsInteger);
-       ChequeList.Active.P_SetDiscount(-1*iq.FieldByName('DISCOUNT').AsFloat)
+       if (iq.FieldByName('BARCODE_DSC').AsString = '') Then
        iq.next;
     End;
@@ Строка 345: / Строка 348: @@
      iq.free;
   end;
 end;

@@ Строка 7: / Строка 7: @@
 <pre>
 /******************************************************************************/
-/***                Generated by IBExpert 15.04.2016 9:50:31                ***/
+/***                Generated by IBExpert 18.04.2016 9:25:20                ***/
 /******************************************************************************/
@@ Строка 24: / Строка 24: @@
 CREATE TABLE DSC_RULES (
-     ID          INTEGER NOT NULL,
+     ID           INTEGER NOT NULL,
-     DATE_BEG    DM_DATE NOT NULL /* DM_DATE = DATE */,
+     DATE_BEG     DM_DATE NOT NULL /* DM_DATE = DATE */,
-     DATE_END    DM_DATE NOT NULL /* DM_DATE = DATE */,
+     DATE_END     DM_DATE NOT NULL /* DM_DATE = DATE */,
-     MMBSH1      DM_TEXT /* DM_TEXT = VARCHAR(250) */,
+     MMBSH1       DM_TEXT /* DM_TEXT = VARCHAR(250) */,
-     NDS_O1      DM_ID_NULL /* DM_ID_NULL = BIGINT */,
+     NDS_O1       DM_ID_NULL /* DM_ID_NULL = BIGINT */,
-     SNAME1      DM_TEXT /* DM_TEXT = VARCHAR(250) */,
+     SNAME1       DM_TEXT /* DM_TEXT = VARCHAR(250) */,
-     SNAME2      DM_TEXT /* DM_TEXT = VARCHAR(250) */,
+     SNAME2       DM_TEXT /* DM_TEXT = VARCHAR(250) */,
-     SNAME3      DM_TEXT /* DM_TEXT = VARCHAR(250) */,
+     SNAME3       DM_TEXT /* DM_TEXT = VARCHAR(250) */,
-     SNAME4      DM_TEXT /* DM_TEXT = VARCHAR(250) */,
+     SNAME4       DM_TEXT /* DM_TEXT = VARCHAR(250) */,
-     SNAME5      DM_TEXT /* DM_TEXT = VARCHAR(250) */,
+     SNAME5       DM_TEXT /* DM_TEXT = VARCHAR(250) */,
-     PRICE_MIN   DM_DOUBLE /* DM_DOUBLE = DOUBLE PRECISION */,
+     PRICE_MIN    DM_DOUBLE /* DM_DOUBLE = DOUBLE PRECISION */,
-     PRICE_MAX   DM_DOUBLE /* DM_DOUBLE = DOUBLE PRECISION */,
+     PRICE_MAX    DM_DOUBLE /* DM_DOUBLE = DOUBLE PRECISION */,
-     QUANT_DIV   DM_ID_NULL /* DM_ID_NULL = BIGINT */,
+     QUANT_DIV    DM_ID_NULL /* DM_ID_NULL = BIGINT */,
-     QUANT_DSC   DM_ID_NULL /* DM_ID_NULL = BIGINT */,
+     QUANT_DSC    DM_ID_NULL /* DM_ID_NULL = BIGINT */,
-     SUM_DSC     DM_DOUBLE /* DM_DOUBLE = DOUBLE PRECISION */,
+     SUM_DSC      DM_DOUBLE /* DM_DOUBLE = DOUBLE PRECISION */,
-     PERC_DSC    DM_DOUBLE /* DM_DOUBLE = DOUBLE PRECISION */,
+     PERC_DSC     DM_DOUBLE /* DM_DOUBLE = DOUBLE PRECISION */,
-     STATUS      SMALLINT NOT NULL,
+    BARCODE_DSC  DM_TEXT /* DM_TEXT = VARCHAR(250) */,
-     COMMENTS    DM_TEXT /* DM_TEXT = VARCHAR(250) */,
+     STATUS       SMALLINT NOT NULL,
-     D$UUID      DM_UUID /* DM_UUID = CHAR(36) NOT NULL */,
+     COMMENTS     DM_TEXT /* DM_TEXT = VARCHAR(250) */,
-     D$SRVUPDDT  DM_DATETIME /* DM_DATETIME = TIMESTAMP */
+     D$UUID       DM_UUID /* DM_UUID = CHAR(36) NOT NULL */,
 );
@@ Строка 135: / Строка 136: @@
 /***                               Privileges                               ***/
 /******************************************************************************/
 SET TERM ^ ;
@@ Строка 144: / Строка 146: @@
 returns (
      PART_ID_OUT integer,
-     DISCOUNT DM_DOUBLE)
+     DISCOUNT DM_DOUBLE,
 as
 declare variable SNAME DM_TEXT;
@@ Строка 168: / Строка 171: @@
 declare variable MMBSH1 DM_TEXT;
 declare variable NDS_O1 DM_ID_NULL;
 begin
 -------------------- Описание параметров ---------------------------------------------------
@@ Строка 177: / Строка 181: @@
 --PART_ID_OUT - список партий по которым нужно обновить скидку
 --DISCOUNT - скидка в рублях
 ------------------- Описание DSC_RULES ------------------------------------------------------
@@ Строка 187: / Строка 192: @@
 --SUM_DSC - суммовая скидка на позицию в рублях
 --PERC_DSC - процентная скидка на позицию в % (например 0.15)
 --STATUS, 1 - правило активно, 0 - неактивно
@@ Строка 195: / Строка 201: @@
    select UPPER(sname), price, abs(quant), coalesce(nds,0), UPPER(mmbsh) from vw_doc_detail_active where doc_id = :doc_id and part_id = :part_id_in into :sname, :price, :quant, :nds_o, :mmbsh;
-   for select MMBSH1, NDS_O1, SNAME1,SNAME2,SNAME3,SNAME4,SNAME5,PRICE_MIN,PRICE_MAX,QUANT_DIV,QUANT_DSC,SUM_DSC,PERC_DSC
+   for select MMBSH1, NDS_O1, SNAME1,SNAME2,SNAME3,SNAME4,SNAME5,PRICE_MIN,PRICE_MAX,QUANT_DIV,QUANT_DSC,SUM_DSC,PERC_DSC,BARCODE_DSC
          from DSC_RULES dr where status = 1 and dr.date_beg <= current_date and dr.date_end >= current_date
-       into :MMBSH1, :NDS_O1, :SNAME1,:SNAME2,:SNAME3,:SNAME4,:SNAME5,:PRICE_MIN,:PRICE_MAX,:QUANT_DIV,:QUANT_DSC,:SUM_DSC,:PERC_DSC do
+       into :MMBSH1, :NDS_O1, :SNAME1,:SNAME2,:SNAME3,:SNAME4,:SNAME5,:PRICE_MIN,:PRICE_MAX,:QUANT_DIV,:QUANT_DSC,:SUM_DSC,:PERC_DSC,:BARCODE do
    begin
      NO_DSC = 0;
@@ Строка 263: / Строка 269: @@
                if (SUM_DSC is not null) then DISCOUNT = SUM_DSC*Trunc(sum_quant/QUANT_DIV);
                if (PERC_DSC is not null) then DISCOUNT = :quant*:price*PERC_DSC;
              end
            else
-             DISCOUNT = 0;
+             Begin
            suspend;
          End
@@ Строка 272: / Строка 282: @@
      --Суммовая скидка
-     if ((NO_DSC = 0) and (DEL = 0) and (SUM_DSC is not null)) then
+     if ( (NO_DSC = 0) and (DEL = 0) and ((SUM_DSC is not null) or (BARCODE is not null)) ) then
      Begin
        DISCOUNT =  :quant*SUM_DSC;
        suspend;
        exit;
@@ Строка 280: / Строка 291: @@
      --Процентная скидка
-     if ((NO_DSC = 0) and (DEL = 0) and (PERC_DSC is not null)) then
+     if ( (NO_DSC = 0) and (DEL = 0) and ((PERC_DSC is not null) or (BARCODE is not null)) ) then
      Begin
        DISCOUNT =  :quant*:price*PERC_DSC;
        suspend;
        exit;
@@ Строка 300: / Строка 312: @@
 GRANT EXECUTE ON PROCEDURE PR_GET_DSC_RULES TO SYSDBA;
 </PRE>

@@ Строка 419: / Строка 419: @@
 . На все товары с НДС опт. 18%, - скидка 15%;
-[[Файл:Примеры_акций.png|left|Окно программы]]
+[[Файл:Примеры_акций.png|Окно программы]]
 * '''DATE_BEG''' и '''DATE_END''' - период действия скидки

← Предыдущая		Версия 14:32, 15 апреля 2016
Строка 420:		Строка 420:

	[[Файл:Примеры_акций.png\|left\|Окно программы]]		[[Файл:Примеры_акций.png\|left\|Окно программы]]
		+
		+	* '''DATE_BEG''' и '''DATE_END''' - период действия скидки
		+	* '''MMBSH1''' - группа товара
		+	* '''NDS_O1''' - ставка НДС опт (10,18,12 ....)
		+	* '''SNAME1''' ... '''SNAME5''' - слова, которым должна соответствовать позиция для того, чтобы скидка назначилась (все не обязательны)
		+	* '''PRICE_MIN''' и '''PRICE_MAX''' - ценовой диапазон, которому должна соответствовать позиция, чтобы скидка назначилась (все не обязательны)
		+	* '''QUANT_DIV''' и '''QUANT_DSC''', для условий типа: при покупке 4х штук (QUANT_DIV) одна(QUANT_DSC) в подарок
		+	* '''SUM_DSC''' - суммовая скидка на позицию в рублях
		+	* '''PERC_DSC''' - процентная скидка на позицию в % (например 0.15)
		+	* '''STATUS''', 1 - правило активно, 0 - неактивно