include_once("start.inc");
$OOPSGlobal["JAVA"] = OOPSBuildJavaCall('iss');
if(empty($DOC))
OOPSRedir("/");
$BILLINGGlobal["DOC"] = $DOC;
if(!empty($DOWN)) {
} else {
switch($DOC) {
case "BIS":
$BILLINGGlobal["PRODUCT"] = "PETER-SERVICE BIS";
break;
case "ITC":
$BILLINGGlobal["PRODUCT"] = "PETER-SERVICE ITC";
break;
case "HRS":
$BILLINGGlobal["PRODUCT"] = "PETER-SERVICE HRS";
break;
case "RSS":
$BILLINGGlobal["PRODUCT"] = "PETER-SERVICE RSS";
break;
case "SCC":
$BILLINGGlobal["PRODUCT"] = "PETER-SERVICE SCC";
break;
default:
OOPSRedir("/");
}
if(!empty($ADD)) {
$RC = OOPSCheckMailAddr($ISS_MAIL);
$OK = true;
switch($RC) {
case MAILADDR_SYNTAX:
$BILLINGGlobal["ERR_MAIL"] = "Ошибка написания почтого адреса";
$OK = false;
break;
case MAILADDR_DOMAIN_NAME:
list($n,$d) = explode("@",$ISS_MAIL);
$BILLINGGlobal["ERR_MAIL"] = "Ошибка написания доменного имени [".$d."]";
$OK = false;
break;
case MAILADDR_DOMAIN_EXISTS:
list($n,$d) = explode("@",$ISS_MAIL);
$BILLINGGlobal["ERR_MAIL"] = "Домена [".$d."] не существует";
$OK = false;
break;
case MAILADDR_MX_EXISTS:
list($n,$d) = explode("@",$ISS_MAIL);
$BILLINGGlobal["ERR_MAIL"] = "Домен [".$d."] не имеет почты";
$OK = false;
break;
case MAILADDR_NAME:
list($n,$d) = explode("@",$ISS_MAIL);
$BILLINGGlobal["ERR_MAIL"] = "Имя [".$n."] ошибочно";
$OK = false;
break;
case MAILADDR_LEN:
list($n,$d) = explode("@",$ISS_MAIL);
$BILLINGGlobal["ERR_MAIL"] = "Длина адреса превышает 128 символов";
$OK = false;
break;
}
if($OK) {
OOPSRedir("products/download/send");
} else {
$BILLINGGlobal["ERR_MAIL"] = "
* ".$BILLINGGlobal["ERR_MAIL"]."";
}
} else {
$OOPSGlobal["ERR_MAIL"] = "";
}
}
include_once("stop.inc");
?>