* @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