Николай Ефремов (Все сообщения пользователя)

function getOptimalPriceResultHandler(&$arFields)
{
   // Если у товара не задано других скидок, то вычисляем по старой цене
   if($arFields['PRODUCT_ID'] && empty($arFields['DISCOUNT'])) {
      $dbOldPrice = CPrice::GetList(
          array(),
          array(
              "PRODUCT_ID" => $arFields['PRODUCT_ID'],
              "CATALOG_GROUP_ID" => OLD_PRICE_CATALOG_GROUP_ID,
            "CAN_ACCESS" => "Y"
          )
      );
      
      $arResultPrice = &$arFields['RESULT_PRICE'];
      
      // Если старая цена установлена для товара, то вычисляем скидку
      if(($arOldPrice = $dbOldPrice->Fetch()) &&
         $arResultPrice['CURRENCY'] == $arOldPrice['CURRENCY'] &&
         $arOldPrice['PRICE'] > $arFields['DISCOUNT_PRICE'])
      {         
         $arResultPrice['UNROUND_BASE_PRICE'] = $arResultPrice['BASE_PRICE'] = $arOldPrice["PRICE"];
         $arResultPrice['DISCOUNT'] = $discountValue = $arOldPrice["PRICE"] - $arFields['DISCOUNT_PRICE'];
         $arResultPrice['PERCENT'] = $discountPercent = round((100*$discountValue) / $arOldPrice["PRICE"], 0);
         
         $arFields['DISCOUNT'] = array(
            "ID" => 0,
            "SORT" => 0,
            "ACTIVE" => 'Y',
            "RENEWAL" => 'N',
            "VALUE_TYPE" => 'F',
            "SITE_ID" => SITE_ID,
            "VALUE" => $discountValue,
            "CURRENCY" => $arResultPrice['CURRENCY'],
            "NAME" => $arOldPrice['CATALOG_GROUP_NAME'],
         );
         $arFields['DISCOUNT_LIST'] = array($arFields['DISCOUNT']);
      }
   }
}

AddEventHandler("sale", "OnSaleCheckPrepareData", "CheckProductPrint");
function CheckProductPrint($arFields, $type)
{
   if (empty($arFields['PRODUCTS']) && !empty($arFields['ORDER']))
   {
      $arProducts = array();
      $basket = $arFields['ORDER']->getBasket();
      $arBasketItems = $basket->getBasketItems();
      
      foreach ($arBasketItems as $basketItem)
      {
         $arProduct = array();
         $arProduct['ENTITY'] = $basketItem;
         $arItemFields = $basketItem->getFields();
         
         $arProduct['PRODUCT_ID'] = $arItemFields['PRODUCT_ID'];
         $arProduct['NAME'] = $arItemFields['NAME'];
         $arProduct['BASE_PRICE'] = $arItemFields['BASE_PRICE'];
         $arProduct['PRICE'] = $arItemFields['PRICE'];
         $arProduct['QUANTITY'] = $arItemFields['QUANTITY'];
         $arProduct['SUM'] = $arItemFields['QUANTITY'] * $arItemFields['PRICE'];
         if ($arItemFields['VAT_INCLUDED'] == 'Y')
            $arProduct['VAT'] = $arItemFields['VAT_RATE'] / ($arItemFields['VAT_RATE'] + 100) * $arItemFields['PRICE'];
         else
            $arProduct['VAT'] = $arItemFields['VAT_RATE'] / 100 * $arItemFields['PRICE'];
         if (!empty($arItemFields['DISCOUNT_PRICE'])) // Не знаю, правильно ли так
            $arProduct['DISCOUNT'] = array('PRICE' => $arItemFields['DISCOUNT_PRICE'], 'TYPE' => 'C');
         // Тупо все товары, если есть в реквизитах или свойство определяющее услугу/работу, то надо переопределить
         $arProduct['PAYMENT_OBJECT'] = \Bitrix\Sale\Cashbox\Check::PAYMENT_OBJECT_COMMODITY;
         
         $arProducts[] = $arProduct;
      }
      
      $arFields['PRODUCTS'] = $arProducts;
   }
   
   return $arFields;
}

[
    [ORDER] => Bitrix\Sale\Order Object
    [PAYMENTS] => Array(
            [0] => Array(
                    [ENTITY] => Bitrix\Sale\Payment Object

                    [IS_CASH] => A
                    [TYPE] => cashless
                    [SUM] => 4270
                )
        )
    [PRODUCTS] => Array(
            [0] => Array(
                    [ENTITY] => Bitrix\Sale\BasketItem Object

                    [PRODUCT_ID] => 29442
                    [NAME] => Простой порошок
                    [BASE_PRICE] => 4270
                    [PRICE] => 4270
                    [SUM] => 4270
                    [QUANTITY] => 1
                    [VAT] => 0
                    [PAYMENT_OBJECT] => commodity
                )
        )
    [BUYER] => Array(
            [EMAIL] => ne_skazhu@mail.ru
            [PHONE] => 9555123456
        )
    [TOTAL_SUM] => 4270
]

use Bitrix\Main;
Main\EventManager::getInstance()->addEventHandler('sale', 'OnSaleBasketBeforeSaved', Array(CKitSetPriceHandlers, basketBeforeSavedHandler));
Main\EventManager::getInstance()->addEventHandler('sale', 'OnSaleOrderBeforeSaved', Array(CKitSetPriceHandlers, orderBeforeSavedHandler));

class CKitSetPriceHandlers
{
   private function recalcBasketKitSets(\Bitrix\Sale\Basket $basket, $changeSetPrice = false)
   {
      $arBasketItems = $basket->getBasketItems();
      
      foreach ($arBasketItems as $basketItem)
         if ($basketItem->isBundleParent() && $basketItem->getFields()->isChanged('PRICE'))
         {
            $kitSetPrice = $basketItem->getField('PRICE');
            $kitSetBasePrice = $basketItem->getField('BASE_PRICE');            
            $kitSetCurrency = $basketItem->getField('CURRENCY');
            $kitSetQuantity = $basketItem->getField('QUANTITY');
            $kitSetDiscount = $kitSetBasePrice > 0 ? $kitSetPrice / $kitSetBasePrice : 1;
            $setCompTotalBasePrice = 0;
            $setCompTotalPrice = 0;
            $bMatchCurrency = true;
            
            if (!$kitSetQuantity) continue;
               
            $arBundleItems = $basketItem->getBundleCollection()->getBasketItems();
            
            foreach ($arBundleItems as $bundleItem)
            {
               if ($bundleItem->getField('CURRENCY') <> $kitSetCurrency)
                  $bMatchCurrency = false;
               $setCompQuantity = $bundleItem->getField('QUANTITY');
               $setCompTotalPrice += $bundleItem->getField('PRICE') * $setCompQuantity / $kitSetQuantity;
               $setCompTotalBasePrice += $bundleItem->getField('BASE_PRICE') * $setCompQuantity / $kitSetQuantity;
            }
            
            if ($setCompTotalPrice == $kitSetPrice || !$bMatchCurrency || !$setCompTotalBasePrice) // Цены комплекта и комплектующих уже выравнены, или что-то пошло не так
               continue;
            elseif (!$changeSetPrice || $setCompTotalPrice > $kitSetPrice) // Пересчитать цены компонентов (округление выполняется классами модуля)
               foreach ($arBundleItems as $bundleItem)
               {
                  $bundleItemNewPrice = $kitSetPrice * $bundleItem->getField('BASE_PRICE') / $setCompTotalBasePrice;
                  $bundleItem->setFieldNoDemand('PRICE', $bundleItemNewPrice);
               }
            else // Переназначить цену комплекта в меньшую сторону с учетом изначальной скидки (округление выполняется классами модуля)
            {
               foreach ($arBundleItems as $bundleItem) {
                  $bundleItemNewPrice = $bundleItem->getField('PRICE') * $kitSetDiscount;
                  $bundleItem->setFieldNoDemand('PRICE', $bundleItemNewPrice);
               }
               
               $kitSetNewPrice = $setCompTotalPrice * $kitSetDiscount;
               $kitSetNewFields = array(
                  'PRICE' => $kitSetNewPrice,
                  'BASE_PRICE' => $setCompTotalPrice,
                  'DISCOUNT_PRICE' => $setCompTotalPrice - $kitSetNewPrice
               );
               $basketItem->setFieldsNoDemand($kitSetNewFields);
            }
         }
   }
   
   function basketBeforeSavedHandler(Main\Event $event)
   {
      /** @var Basket $basket */
      $basket = $event->getParameter("ENTITY");
      
      self::recalcBasketKitSets($basket, true);
      
      return new Main\EventResult(Main\EventResult::SUCCESS);
   }
   
   function orderBeforeSavedHandler(Main\Event $event)
   {
      $order = $event->getParameter("ENTITY");
      $basket = $order->getBasket();
      
      self::recalcBasketKitSets($basket);
      
      return new Main\EventResult(Main\EventResult::SUCCESS);
   }
}

Если НайденныйСтатус <> Неопределено тогда
   Результат = НайденныйСтатус.Служба;
КонецЕсли;

Иначе
   Результат = Документ.[U]СпособДоставки[/U];

Если ДокументXML.ХозОперация = "Заказ товара" тогда...

Функция ПолучитьСоглашение(ПараметрыОбмена, ЮрФизЛицо,ДокументXML)
    
    Если ЮрФизЛицо = Перечисления.ЮрФизЛицо.ФизЛицо И ЗначениеЗаполнено(ПараметрыОбмена.КонтрагентФизлицо) тогда    
        Возврат ПараметрыОбмена.КонтрагентФизлицо;     
    КонецЕсли;
    
    лСоглашение = Справочники.СоглашенияСКлиентами.ПустаяСсылка();
    
    Возврат лСоглашение;
    
КонецФункции

...
<ЗначенияРеквизитов>
   <ЗначениеРеквизита>
      <Наименование>Дата оплаты</Наименование>
      <Значение>25.05.2017 11:35:03</Значение>
   </ЗначениеРеквизита>
   <ЗначениеРеквизита>
      <Наименование>Номер платежного документа</Наименование>
      <Значение>123456</Значение>
   </ЗначениеРеквизита>
   <ЗначениеРеквизита>
      <Наименование>Метод оплаты</Наименование>
      <Значение>Банковская карта</Значение>
   </ЗначениеРеквизита>
   <ЗначениеРеквизита>
      <Наименование>Метод оплаты ИД</Наименование>
      <Значение>2</Значение>
   </ЗначениеРеквизита>
   ...
   <ЗначениеРеквизита>
      <Наименование>Заказ оплачен</Наименование>
      <Значение>true</Значение>
   </ЗначениеРеквизита>
   ...