fisharebest / webtrees

		Database::prepare("DELETE FROM `##dates`      WHERE d_gid =? AND d_file =?")->execute(array($gid, $ged_id));

		//-- delete any unlinked places

		foreach ($placeids as $p_id) {

			$num =

				Database::prepare("SELECT count(pl_p_id) FROM `##placelinks` WHERE pl_p_id=? AND pl_file=?")

					->execute(array($p_id, $ged_id))

					->fetchOne();

			if ($num == 0) {

				Database::prepare("DELETE FROM `##places` WHERE p_id=? AND p_file=?")->execute(array($p_id, $ged_id));

			}

		}

		Database::prepare("DELETE FROM `##name` WHERE n_id=? AND n_file=?")->execute(array($gid, $ged_id));

		Database::prepare("DELETE FROM `##link` WHERE l_from=? AND l_file=?")->execute(array($gid, $ged_id));

				$par[$i] = 'unknown';

			}

			$placelist = $this->createPossiblePlaceNames($par[$i], $i + 1);

			foreach ($placelist as $key => $placename) {

				$pl_id = (int) Database::prepare(

					"SELECT pl_id FROM `##placelocation` WHERE pl_level = :level AND pl_parent_id = :parent_id AND pl_place LIKE :placename"

				)->execute(array(

					'level'     => $i,

					'parent_id' => $place_id,

					'placename' => $placename,

				))->fetchOne();

				if ($pl_id) {

					break;

				}

			}

			if (!$pl_id) {

				break;

			}

		for ($i = 0; $i < count($par); $i++) {

			$par[$i]   = trim($par[$i]);

			$placelist = $this->createPossiblePlaceNames($par[$i], $i + 1);

			foreach ($placelist as $placename) {

				$pl_id = (int) Database::prepare(

					"SELECT p_id FROM `##places` WHERE p_parent_id = :place_id AND p_file = :tree_id AND p_place = :placename"

				)->execute(array(

					'place_id'  => $place_id,

					'tree_id'   => $WT_TREE->getTreeId(),

					'placename' => $placename,

				))->fetchOne();

				if ($pl_id) {

					break;

				}

			}

			if (!$pl_id) {

				break;

			}