"DATE_DOCUMENT" => $_REQUEST["DOC_DATE"],
			"CREATED_BY" => $userId,
			"MODIFIED_BY" => $userId,
			"COMMENTARY" => $_REQUEST["CAT_DOC_COMMENTARY"],
		);
		if($contractorId > 0)
			$arGeneral["CONTRACTOR_ID"] = $contractorId;
		if(strlen($currency) > 0)
			$arGeneral["CURRENCY"] = $currency;
		if(strlen($_REQUEST["CAT_DOCUMENT_SUM"]) > 0)
			$arGeneral["TOTAL"] = doubleval($_REQUEST["CAT_DOCUMENT_SUM"]);

		if($ID > 0)
		{
			unset($arGeneral['CREATED_BY']);
			if(CCatalogDocs::update($ID, $arGeneral))
				$docId = $ID;
		}
		else
			$ID = $docId = CCatalogDocs::add($arGeneral);
		if($ID > 0)
		{
			$dbElement = CCatalogStoreDocsElement::getList(array(), array("DOC_ID" => $ID), false, false, array("ID"));
			while($arElement = $dbElement->Fetch())
			{
				CCatalogStoreDocsElement::delete($arElement["ID"]);
				$dbDocsBarcode = CCatalogStoreDocsBarcode::getList(array(), array("DOC_ELEMENT_ID" => $arElement["ID"]), false, false, array("ID"));
				while($arDocsBarcode = $dbDocsBarcode->Fetch())
					CCatalogStoreDocsBarcode::delete($arDocsBarcode["ID"]);
			}
		}
                            $docId = CCatalogDocs::add($arGeneral);
                        }
                        $res = CIBlockElement::GetByID(intval($data[0]));
                        if ($ar_res = $res->GetNext()) {
                            $stock = intval($data[1]);
                            $z++;
                            $arAdditional = array("AMOUNT" => $stock, "ELEMENT_ID" => $ar_res["ID"], "PURCHASING_PRICE" => floatval($data[2]), "STORE_TO" => $_REQUEST["STORE_TO"] ? intval($_REQUEST["STORE_TO"]) : 1, "ENTRY_ID" => $z, "DOC_ID" => $docId);
                            $total += $arAdditional["PURCHASING_PRICE"] * $stock;
                            $docElementId = CCatalogStoreDocsElement::add($arAdditional);
                        } else {
                            $notice .= GetMessage("ELCORSO_WAREHOUSECSVIMPORT_ELEMENT") . $data[0] . ' ' . GetMessage("ELCORSO_WAREHOUSECSVIMPORT_NE_NAYDEN") . "\r\n";
                        }
                    }
                }
                //CCatalogDocs::conductDocument($docId, $USER->GetID());
                CCatalogDocs::update($docId, array("TOTAL" => $total));
                LocalRedirect("/bitrix/admin/warehouse_import_admin.php?ID=" . $ID . "&mess=import&docId=" . $docId . "&z=" . $z . "&lang=" . LANG);
                fclose($handle);
            }
        }
        //        else
        //		{
        //			$message = new CAdminMessage(GetMessage("ELCORSO_WAREHOUSECSVIMPORT_PUSTOY_FAYL"));
        //		}
    } else {
        $message = new CAdminMessage(GetMessage("ELCORSO_WAREHOUSECSVIMPORT_NE_ZAGRUJEN_FAYL"));
    }
}
$APPLICATION->SetTitle(GetMessage("ELCORSO_WAREHOUSE_IMPORT_edit"));
require_once $_SERVER["DOCUMENT_ROOT"] . "/bitrix/modules/main/include/prolog_admin_after.php";
$aTabs = array(array("DIV" => "edit1", "TAB" => GetMessage("ELCORSO_WAREHOUSECSVIMPORT_REDAKTIROVANIE_IMPOR"), "ICON" => "main_user_edit", "TITLE" => GetMessage("ELCORSO_WAREHOUSECSVIMPORT_REDAKTIROVANIE_IMPOR")));