$errorMessage = "";
$arResult["BP"] = array("~NAME" => $_POST["NAME"], "NAME" => htmlspecialcharsbx($_POST["NAME"]), "~ACTIVE" => $_POST["ACTIVE"] == "Y" ? "Y" : "N", "ACTIVE" => $_POST["ACTIVE"] == "Y" ? "Y" : "N", "~LOGIN" => $_POST["LOGIN"], "LOGIN" => htmlspecialcharsbx($_POST["LOGIN"]), "~IMPORT_SIZE" => 10, "IMPORT_SIZE" => 10, "~IMPORT_PERIOD" => intval($_POST["IMPORT_PERIOD"]), "IMPORT_PERIOD" => intval($_POST["IMPORT_PERIOD"]), "~IMPORT_PROBABILITY" => intval($_POST["IMPORT_PROBABILITY"]), "IMPORT_PROBABILITY" => intval($_POST["IMPORT_PROBABILITY"]), "~IMPORT_RESPONSIBLE" => intval($_POST["IMPORT_RESPONSIBLE"]) > 0 ? intval($_POST["IMPORT_RESPONSIBLE"]) : false, "IMPORT_RESPONSIBLE" => intval($_POST["IMPORT_RESPONSIBLE"]) > 0 ? intval($_POST["IMPORT_RESPONSIBLE"]) : false, "~IMPORT_PUBLIC" => $_POST["IMPORT_PUBLIC"] == "Y" ? "Y" : "N", "IMPORT_PUBLIC" => $_POST["IMPORT_PUBLIC"] == "Y" ? "Y" : "N", "~IMPORT_PREFIX" => $_POST["IMPORT_PREFIX"], "IMPORT_PREFIX" => htmlspecialcharsbx($_POST["IMPORT_PREFIX"]), "~SCHEME" => $_POST["SCHEME"] == "https" ? "https" : "http", "SCHEME" => $_POST["SCHEME"] == "https" ? "https" : "http", "~SERVER" => $_POST["SERVER"], "SERVER" => htmlspecialcharsbx($_POST["SERVER"]), "~PORT" => intval($_POST["PORT"]) > 0 ? intval($_POST["PORT"]) : 80, "PORT" => intval($_POST["PORT"]) > 0 ? intval($_POST["PORT"]) : 80, "~IMPORT_GROUP_ID" => intval($_POST["IMPORT_GROUP_ID"]) > 0 ? intval($_POST["IMPORT_GROUP_ID"]) : false, "IMPORT_GROUP_ID" => intval($_POST["IMPORT_GROUP_ID"]) > 0 ? intval($_POST["IMPORT_GROUP_ID"]) : false, "DATA_SYNC_PERIOD" => intval($_POST["DATA_SYNC_PERIOD"]));
if (strlen($_POST["PASSWORD"]) > 0) {
$arResult["BP"]["~PASSWORD"] = $_POST["PASSWORD"];
$arResult["BP"]["PASSWORD"] = htmlspecialcharsbx($_POST["PASSWORD"]);
}
if (strlen($_POST["LOGIN"]) <= 0) {
$errorMessage .= GetMessage("BPWC_WNC_EMPTY_LOGIN") . "<br>";
}
if (strlen($_POST["SERVER"]) <= 0) {
$errorMessage .= GetMessage("BPWC_WNC_EMPTY_URL") . "<br>";
}
if (strlen($_POST["PASSWORD"]) <= 0 && $arParams["ID"] <= 0) {
$errorMessage .= GetMessage("BPWC_WNC_EMPTY_PASSWORD") . "<br>";
}
$arLimitationSettings = CCrmExternalSale::GetLimitationSettings();
if ($arLimitationSettings["MAX_DAYS"] > 0 && $arResult["BP"]["IMPORT_PERIOD"] > $arLimitationSettings["MAX_DAYS"]) {
$arResult["BP"]["IMPORT_PERIOD"] = $arResult["BP"]["~IMPORT_PERIOD"] = $arLimitationSettings["MAX_DAYS"];
}
if ($arLimitationSettings["MAX_SHOPS"] > 0 && $arParams["ID"] <= 0) {
$cnt = CCrmExternalSale::Count();
if ($cnt >= $arLimitationSettings["MAX_SHOPS"]) {
$errorMessage .= GetMessage("BPWC_WNC_MAX_SHOPS") . "<br>";
}
}
if (strlen($errorMessage) <= 0) {
$arFields = array("NAME" => $arResult["BP"]["~NAME"], "ACTIVE" => $arResult["BP"]["~ACTIVE"], "LOGIN" => $arResult["BP"]["~LOGIN"], "IMPORT_SIZE" => $arResult["BP"]["~IMPORT_SIZE"], "IMPORT_PERIOD" => $arResult["BP"]["~IMPORT_PERIOD"], "IMPORT_PROBABILITY" => $arResult["BP"]["~IMPORT_PROBABILITY"], "IMPORT_RESPONSIBLE" => $arResult["BP"]["~IMPORT_RESPONSIBLE"], "IMPORT_PUBLIC" => $arResult["BP"]["~IMPORT_PUBLIC"], "IMPORT_PREFIX" => $arResult["BP"]["~IMPORT_PREFIX"], "IMPORT_ERRORS" => 0, "SCHEME" => $arResult["BP"]["~SCHEME"], "SERVER" => $arResult["BP"]["~SERVER"], "PORT" => $arResult["BP"]["~PORT"], "IMPORT_GROUP_ID" => $arResult["BP"]["~IMPORT_GROUP_ID"], "COOKIE" => false);
if (strlen($_POST["SERVER"]) > 0) {
$arCrmUrl = parse_url($_POST["SERVER"]);
$crmUrlHost = $arCrmUrl["host"] ? $arCrmUrl["host"] : $arCrmUrl["path"];
$crmUrlScheme = $arCrmUrl["scheme"] ? strtolower($arCrmUrl["scheme"]) : strtolower($_POST["SCHEME"]);
