CWizard::__MoveDirFiles

function __MoveDirFiles(&$arFiles)
{
	if (!is_array($arFiles) || !array_key_exists("FILES", $arFiles))
		return;

	foreach ($arFiles["FILES"] as $arFile)
	{
		//Delete
		if (array_key_exists("DELETE", $arFile) && $arFile["DELETE"] <> '')
		{
			if ($arFile["DELETE"] == "/" || $arFile["DELETE"] == "/bitrix" || $arFile["DELETE"] == "/bitrix/")
				continue;

			DeleteDirFilesEx($arFile["DELETE"]);
			continue;
		}

		//Copy
		if (!array_key_exists("FROM", $arFile) && !array_key_exists("TO", $arFile))
			continue;

		$rewrite = (array_key_exists("REWRITE", $arFile) && $arFile["REWRITE"] == "N" ? false : true);
		$recursive = (array_key_exists("RECURSIVE", $arFile) && $arFile["RECURSIVE"] == "N" ? false : true);

		$arFile["TO"] = Rel2Abs("/", $arFile["TO"]);

		CopyDirFiles(
			$_SERVER["DOCUMENT_ROOT"].$this->path."/".$arFile["FROM"],
			$_SERVER["DOCUMENT_ROOT"].$arFile["TO"],
			$rewrite,
			$recursive
		);
	}
}