* @author SARL OpenXtrem <*****@*****.**>
* @license GNU General Public License, see http://www.gnu.org/licenses/gpl.html
* @version $Revision: 19460 $
*/
function redirect()
{
echo CAppUI::getMsg();
CApp::rip();
}
if (!class_exists("DOMDocument")) {
trigger_error("sorry, DOMDocument is needed");
return;
}
CCanDo::checkRead();
$doc = new CMbXMLDocument();
$doc->setSchema("modules/dPlabo/remote/prescription.xsd");
if (!$doc->checkSchema()) {
CAppUI::setMsg("Schema manquant", UI_MSG_ERROR);
redirect();
}
$mbPrescription = new CPrescriptionLabo();
// Chargement de la prescription
$mb_prescription_id = CValue::post("prescription_labo_id", null);
if (!$mb_prescription_id) {
CAppUI::setMsg("Veuillez spécifier une prescription", UI_MSG_ERROR);
redirect();
}
if ($mbPrescription->load($mb_prescription_id)) {
$mbPrescription->loadRefs();
}
// Chargement de l'id400 "labo code4" du praticien
