Пример #1
0
$sejour->_service = $admit_service;
$sejour->_chambre = $admit_room;
$sejour->_lit = $admit_bed;
$sejour->_praticien_attending = $admit_attending_doctor;
// Praticien
$sejour->_praticien_referring = $admit_referring_doctor;
// Nom du médecin adressant
$sejour->_praticien_admitting = $admit_admitting_doctor;
// Médecin traitant
$sejour->_praticien_consulting = $admit_consulting_doctor;
$cn_receiver_guid = CValue::sessionAbs("cn_receiver_guid");
if ($cn_receiver_guid) {
    $receiver_hl7v2 = CMbObject::loadFromGuid($cn_receiver_guid);
    $receivers = array($receiver_hl7v2);
} else {
    $receiver_hl7v2 = new CReceiverHL7v2();
    $receiver_hl7v2->actif = 1;
    $receiver_hl7v2->group_id = CGroups::loadCurrent()->_id;
    $receivers = $receiver_hl7v2->loadMatchingList();
}
$profil = "PDQ";
$transaction = "ITI21";
$message = "QBP";
$code = "Q22";
if ($admit_class || $admit_service || $admit_room || $admit_bed || $admit_attending_doctor || $admit_referring_doctor || $admit_consulting_doctor || $admit_admitting_doctor) {
    $transaction = "ITI22";
    $code = "ZV1";
}
if ($cancel) {
    $message = "QCN";
    $code = "J01";
Пример #2
0
<?php

/**
 * Find candidates
 *
 * @category SIP
 * @package  Mediboard
 * @author   SARL OpenXtrem <*****@*****.**>
 * @license  GNU General Public License, see http://www.gnu.org/licenses/gpl.html
 * @version  SVN: $Id:$
 * @link     http://www.mediboard.org
 */
CCanDo::checkAdmin();
$cn_receiver_guid = trim(CValue::getOrSessionAbs("cn_receiver_guid"));
$receiver = new CReceiverHL7v2();
$objects = CReceiverHL7v2::getObjectsBySupportedEvents(array("CHL7EventQBPQ22", "CHL7EventQBPZV1"), $receiver);
/** @var CInteropReceiver[] $receivers */
$receivers = array();
foreach ($objects as $event => $_receivers) {
    if (!$_receivers) {
        continue;
    }
    /** @var CInteropReceiver[] $_receivers */
    foreach ($_receivers as $_receiver) {
        $_receiver->loadRefGroup();
        $receivers[$_receiver->_guid] = $_receiver;
    }
}
// Création du template
$smarty = new CSmartyDP();
$smarty->assign("pointer", null);
Пример #3
0
/**
 * $Id$
 *
 * @category HL7
 * @package  Mediboard
 * @author   SARL OpenXtrem <*****@*****.**>
 * @license  GNU General Public License, see http://www.gnu.org/licenses/gpl.html
 * @version  $Revision$
 * @link     http://www.mediboard.org
 */
CCanDo::checkAdmin();
$object_class = trim(CValue::getOrSession("object_class"));
$object_id = trim(CValue::getOrSession("object_id"));
$cn_receiver_guid = trim(CValue::getOrSessionAbs("cn_receiver_guid"));
$object = null;
if ($object_class && $object_id) {
    $object = CMbObject::loadFromGuid("{$object_class}-{$object_id}");
}
$receiver = new CReceiverHL7v2();
$receiver->group_id = CGroups::loadCurrent()->_id;
$receiver->actif = "1";
$receivers = $receiver->loadMatchingList();
$object_classes = array("COperation", "CSejour");
$smarty = new CSmartyDP();
$smarty->assign("object_class", $object_class);
$smarty->assign("object_classes", $object_classes);
$smarty->assign("object_id", $object_id);
$smarty->assign("object", $object);
$smarty->assign("receivers", $receivers);
$smarty->assign("cn_receiver_guid", $cn_receiver_guid);
$smarty->display("vw_test_hl7v2.tpl");
 */
CCanDo::checkAdmin();
$person_id_number = CValue::request("person_id_number");
$person_namespace_id = CValue::request("person_namespace_id");
$person_universal_id = CValue::request("person_universal_id");
$person_universal_id_type = CValue::request("person_universal_id_type");
$person_identifier_type_code = CValue::request("person_identifier_type_code");
$domains_returned_namespace_id = CValue::request("domains_returned_namespace_id");
$domains_returned_universal_id = CValue::request("domains_returned_universal_id");
$domains_returned_universal_id_type = CValue::request("domains_returned_universal_id_type");
$cn_receiver_guid = CValue::sessionAbs("cn_receiver_guid");
/** @var CReceiverHL7v2 $receiver_hl7v2 */
if ($cn_receiver_guid) {
    $receiver_hl7v2 = CStoredObject::loadFromGuid($cn_receiver_guid);
} else {
    $receiver_hl7v2 = new CReceiverHL7v2();
    $receiver_hl7v2->actif = 1;
    $receiver_hl7v2->group_id = CGroups::loadCurrent()->_id;
    $receiver_hl7v2->loadObject();
}
if (!$receiver_hl7v2 || !$receiver_hl7v2->_id) {
    CAppUI::stepAjax("No receiver", UI_MSG_WARNING);
    return;
}
CAppUI::stepAjax("From: " . $receiver_hl7v2->nom);
$profil = "PIX";
$transaction = "ITI9";
$message = "QBP";
$code = "Q23";
$patient = new CPatient();
$iti_handler = new CITIDelegatedHandler();