1с и битрикс exchange?

Question

[kabashowlab]

Всем привет.
Есть необходимость выгрузки заказов в 1с. 1с пилиная 4мя человеками и стандартного модуля обмена там уже нет.
Есть скрипт, который должен сохранять заказы в папку 1c на сервере.
Он рабочий. Работает на старом сайте.
Беда в том что мы ставим новый сайт, а скрипт не работает на новом, быть может кто может подсказать что делаю не так.

<?
define("CATALOG_EXPORT_FILE", $_SERVER["DOCUMENT_ROOT"]."/1c/price.dat");
define("ORDERS_EXPORT_DIR", $_SERVER["DOCUMENT_ROOT"]."/1c/orders/");

function GetCatalogToExport(){
if(CModule::IncludeModule("iblock")&&
CModule::IncludeModule("catalog")){

$arFilter = array(
"IBLOCK_ID" => CATALOG_IBLOCK_ID,
"ACTIVE" => "Y"
);

$dbElement = CIBlockElement::GetList(array("ID"=>"ASC"), $arFilter);
while($arElement = $dbElement->GetNext()){
//$arList[$arList["ID"]] = $arList["NAME"];
$dbPrice = CPrice::GetList(
array("CATALOG_GROUP_ID"=>"ASC"),
array("PRODUCT_ID" => $arElement["ID"])
);
while($arPrice = $dbPrice->GetNext()){
$arElement["PRICE"][] = $arPrice;
}
$arReturn[] = $arElement;
}
return $arReturn;
}
}

function StrCatalogExport(){
$str = "";
$arCatalog = GetCatalogToExport();
foreach($arCatalog as $arElement){
$name = str_replace("\t", "", $arElement["NAME"]);
$str .= $arElement["ID"]."\t".trim($name);
foreach($arElement["PRICE"] as $arPrice){
$str .= "\t".$arPrice["CATALOG_GROUP_NAME"]."/".$arPrice["PRICE"];
}
$str .= "\n";
}
return $str;
}

function SaveCatalogToFile(){
$strCatalog = StrCatalogExport();
file_put_contents(CATALOG_EXPORT_FILE, $strCatalog);
}

//orders

function SaveOrderToFile($ID){
if(CModule::IncludeModule("sale")){
$arOrder = CSaleOrder::GetByID($ID);

$dbProp = CSaleOrderPropsValue::GetList(
array("SORT" => "ASC"),
array("ORDER_ID" => $ID)
);

$arReturn["ORDER"] = $arOrder;

while($arProp = $dbProp->GetNext()){
$arReturn["PROP"][$arProp["CODE"]] = $arProp;
}

$arBasketItems = array();

$dbBasketItems = CSaleBasket::GetList(
array("DATE_INSERT" => "DESC"),
array("LID" => SITE_ID, "ORDER_ID" => $ID),
false,
false,
array("ID",
"MODULE",
"PRODUCT_ID",
"QUANTITY",
"PRICE",
"WEIGHT")
);

while($arItem = $dbBasketItems->Fetch()){
$arReturn["BASKET"][] = $arItem;
}

$str = $arOrder["ID"]."\t".$arOrder["PRICE"]."\t".$arOrder["DATE_INSERT"]."\n";
$str .= $arReturn["PROP"]["LAST_NAME"]["VALUE"]."\t".$arReturn["PROP"]["NAME"]["VALUE"]."\t".$arReturn["PROP"]["SECOND_NAME"]["VALUE"]."\n";
$str .= $arReturn["PROP"]["PHONE"]["VALUE"]."\n";
$str .= $arReturn["PROP"]["CITY"]["VALUE"].", р. ".$arReturn["PROP"]["AREA"]["VALUE"].", ул. ".$arReturn["PROP"]["DELIVERY_STREET"]["VALUE"].", д. ".$arReturn["PROP"]["DELIVERY_DOM"]["VALUE"].", кв./оф. ".$arReturn["PROP"]["DELIVERY_KV"]["VALUE"].", этаж ".$arReturn["PROP"]["DELIVERY_ET"]["VALUE"].", под. ".$arReturn["PROP"]["DELIVERY_PD"]["VALUE"].", персон ".$arReturn["PROP"]["DELIVERY_PERS"]["VALUE"]."\n";
$str .= $arReturn["PROP"]["COMMENT"]["VALUE"]."\n";
$str .= "@@@";
foreach($arReturn["BASKET"] as $arProduct){
$str .= "\n".$arProduct["PRODUCT_ID"]."\t".$arProduct["QUANTITY"]."\t".$arProduct["PRICE"];
}

file_put_contents(ORDERS_EXPORT_DIR.$arOrder["ID"].".ord", $str);

//return $arReturn;
}
}

?>

это сам файл скрипта.
Обработчик кину в комент к этому сообщению. Папки созданы по путям.

Comments

[kabashowlab]

<?include("include/ajax.php");?>
<?include("include/ipgeobase.php");?>
<?include("php_interface/include/1c_exchange.php");?>
подключил в initе

Вот старый инит.
Копирую если часть кода эту. Фаталит.
<?
define("CATALOG_IBLOCK_ID", 1); //ИБ каталога
define("DELIVERY_PRICE_IBLOCK_ID", 2); //ИБ Цены для доставки
define("CITY_IBLOCK_ID", 5); //ИБ Время,тел. службы доставки по городам

define("RS_PATH", "/r");

include_once($_SERVER["DOCUMENT_ROOT"]."/bitrix/php_interface/include/geo_lib.php");
include_once($_SERVER["DOCUMENT_ROOT"]."/bitrix/php_interface/include/manager_conf.php");
include_once($_SERVER["DOCUMENT_ROOT"]."/bitrix/php_interface/include/custom_mail.php");
include_once($_SERVER["DOCUMENT_ROOT"]."/bitrix/php_interface/include/1c_exchange.php");


AddEventHandler("main", "OnBeforeUserUpdate", "ConvertCityCodeToName");
AddEventHandler("main", "OnBeforeUserAdd", "ConvertCityCodeToName");

AddEventHandler("iblock", "OnAfterIBlockElementAdd", "SaveCatalogToFile");
AddEventHandler("iblock", "OnAfterIBlockElementUpdate", "SaveCatalogToFile");
//AddEventHandler("sale", "OnOrderAdd", "SaveOrderToFile");



function FmSes($key, $value){
$_SESSION["FM"][$key] = $value;
}

function d($debug){
global $D;
$D = $debug;
}

function FmPriceFormat($price){
return number_format($price, 0, "", "");
}

function FmUserInfo(){
global $USER;
$uId = $USER->GetID();
$dbUser = $USER->GetByID($uId);
$arUser = $dbUser->Fetch();

if(strlen($arUser["PERSONAL_STREET"])>0){
$arDelivery = unserialize($arUser["PERSONAL_STREET"]);
$arUser["DELIVERY_STREET"] = $arDelivery[0];
$arUser["DELIVERY_DOM"] = $arDelivery[1];
$arUser["DELIVERY_PD"] = $arDelivery[2];
$arUser["DELIVERY_KV"] = $arDelivery[3];
$arUser["DELIVERY_ET"] = $arDelivery[4];
$arUser["DELIVERY_PERS"] = $arDelivery[5];
$arUser["COMMENT"] = $arDelivery[6];
}

return $arUser;
}

function FmIsBasket(){
if(CModule::IncludeModule("sale") &&
CModule::IncludeModule("catalog")&&
CModule::IncludeModule("iblock")){

$arBasketItems = array();

$dbBasketItems = CSaleBasket::GetList(
array("DATE_INSERT" => "DESC"),
array(
"FUSER_ID" => CSaleBasket::GetBasketUserID(),
"LID" => SITE_ID,
"ORDER_ID" => "NULL"
),
false, false,
array("ID",
"MODULE",
"QUANTITY")
);

$totalQuantity = 0;

while($arItems = $dbBasketItems->Fetch()){
$totalQuantity = $totalQuantity + $arItems["QUANTITY"];
}

if($totalQuantity>0){
return true;
} else return false;
}
}

function FmBasketList(){

if(CModule::IncludeModule("sale") &&
CModule::IncludeModule("catalog")&&
CModule::IncludeModule("iblock")){

$arBasketItems = array();

$dbBasketItems = CSaleBasket::GetList(
array("DATE_INSERT" => "DESC"),
array(
"FUSER_ID" => CSaleBasket::GetBasketUserID(),
"LID" => SITE_ID,
"ORDER_ID" => "NULL"
),
false,
false,
array("ID",
//"CALLBACK_FUNC", "
"MODULE",
"PRODUCT_ID",
"QUANTITY",
//"DELAY",
"CAN_BUY",
"PRICE",
"WEIGHT")
);

$totalPrice = 0;
$totalKkal = 0;
$totalWeight = 0;

$obCache = new CPHPCache;

while($arItems = $dbBasketItems->Fetch()){
$quantity = $arItems["QUANTITY"];

$productId = $arItems["PRODUCT_ID"];

//product by id
$lifeTime = 60*60*3;
$cacheId = $productId;

if($obCache->InitCache($lifeTime, $cacheId, "/")){ // если кеш есть и он ещё не истек то
// получаем закешированные переменные
$vars = $obCache->GetVars();
$arProduct = $vars["arProduct"];
} else { // иначе обращаемся к базе

$dbElement = CIBlockElement::GetByID($productId);
if($arElement = $dbElement->GetNext()){
//property kkal
$dbKkalProp = CIBlockElement::GetProperty($arElement["IBLOCK_ID"], $arElement["ID"], array("sort" => "asc"), Array("CODE"=>"KKAL"));
if($arKkalProp = $dbKkalProp->Fetch()){
$kkal = IntVal($arKkalProp["VALUE"]);
} else {
$kkal = 0;
}
$arElement["KKAL"] = $kkal;
$arElement["IMG"] = CFile::GetFileArray($arElement["PREVIEW_PICTURE"]);
}

$arProduct = $arElement;

if($obCache->StartDataCache()){

$obCache->EndDataCache(array( // записываем в файл кеша
"arProduct" => $arProduct
));
}
}

$totalPrice = $totalPrice + $arItems["PRICE"]*$quantity;
$totalKkal = $totalKkal + $arProduct["KKAL"]*$quantity;
$totalWeight = $totalWeight + $arItems["WEIGHT"]*$quantity;

$arItems["PRODUCT"] = $arProduct;
$arResult["LIST"][$arItems["ID"]] = $arItems;

}

$arResult["ORDER"] = array(
"PRICE" => $totalPrice,
"KKAL" => $totalKkal,
"WEIGHT" => $totalWeight,
);

if(count($arResult["LIST"])>0){
return $arResult;
} else {
return false;
}
}
}