PHP CValue::request方法代码示例

$admit_bed = CValue::request("admit_bed");
$admit_attending_doctor = CValue::request("admit_attending_doctor");
$admit_referring_doctor = CValue::request("admit_referring_doctor");
$admit_consulting_doctor = CValue::request("admit_consulting_doctor");
$admit_admitting_doctor = CValue::request("admit_admitting_doctor");
$admit_id_number = CValue::request("admit_id_number");
$admit_namespace_id = CValue::request("admit_namespace_id");
$admit_universal_id = CValue::request("admit_universal_id");
$admit_universal_id_type = CValue::request("admit_universal_id_type");
$admit_identifier_type_code = CValue::request("admit_identifier_type_code");
$continue = CValue::request("continue");
$cancel = CValue::request("cancel");
$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");
$quantity_limited_request = CValue::request("quantity_limited_request", "1");
$patient_naissance = null;
if ($patient_year || $patient_month || $patient_day) {
    $patient_naissance = "on";
}
$naissance = null;
if ($patient_naissance == "on") {
    $year = $patient_year ? "{$patient_year}-" : "____-";
    $month = $patient_month ? "{$patient_month}-" : "__-";
    $day = $patient_day ? "{$patient_day}" : "__";
    if ($day != "__") {
        $day = str_pad($day, 2, "0", STR_PAD_LEFT);
    }
    $naissance = $year . $month . $day;
}
$patient = new CPatient();

<?php

/**
 * Import CExchangeDataFormatConfig
 *  
 * @category EAI
 * @package  Mediboard
 * @author   SARL OpenXtrem <dev@openxtrem.com>
 * @license  GNU General Public License, see http://www.gnu.org/licenses/gpl.html 
 * @version  SVN: $Id:$ 
 * @link     http://www.mediboard.org
 */
CCanDo::checkAdmin();
$actor_guid = CValue::request("actor_guid");
$format_config_guid = CValue::request("format_config_guid");
$file = isset($_FILES['import']) ? $_FILES['import'] : null;
if (!empty($file) && ($contents = file_get_contents($file['tmp_name']))) {
    $actor = CMbObject::loadFromGuid($actor_guid);
    $format_config = CMbObject::loadFromGuid($format_config_guid);
    if (!$format_config->sender_class || !$format_config->sender_id) {
        $format_config->sender_class = $actor->_class;
        $format_config->sender_id = $actor->_id;
    }
    $dom = new CMbXMLDocument();
    $dom->loadXML($contents);
    $root_name = $dom->documentElement->nodeName;
    $fields = $format_config->getPlainFields();
    unset($fields[$format_config->_spec->key]);
    unset($fields["sender_id"]);
    unset($fields["sender_class"]);
    if ($root_name == $format_config->_class) {

<?php

/**
 * dPccam
 *
 * @category Ccam
 * @package  Mediboard
 * @author   SARL OpenXtrem <dev@openxtrem.com>
 * @license  GNU General Public License, see http://www.gnu.org/licenses/gpl.html
 * @version  SVN: $Id:\$
 * @link     http://www.mediboard.org
 */
CCanDo::checkRead();
$keywords = CValue::request("_codes_ccam", "%%");
$date = CMbDT::date(null, CValue::request("date", CMbDT::date()));
$codes = array();
$code = new CDatedCodeCCAM();
foreach ($code->findCodes($keywords, $keywords) as $_code) {
    $_code_value = $_code["CODE"];
    $code = CDatedCodeCCAM::get($_code_value, $date);
    if ($code->code != "-") {
        $codes[$_code_value] = $code;
    }
}
// Création du template
$smarty = new CSmartyDP();
$smarty->debugging = false;
$smarty->assign("keywords", $keywords);
$smarty->assign("codes", $codes);
$smarty->assign("nodebug", true);
$smarty->display("httpreq_do_ccam_autocomplete.tpl");

 /**
  * Login function, handling standard login, loginas, LDAP connection
  * Preferences get loaded on success
  *
  * @param bool $force_login To allow admin users to login as someone else
  *
  * @return boolean Job done
  */
 static function login($force_login = false)
 {
     $ldap_connection = CAppUI::conf("admin LDAP ldap_connection");
     $allow_login_as_ldap = CAppUI::conf("admin LDAP allow_login_as_admin");
     // Login as
     $loginas = trim(CValue::request("loginas"));
     $passwordas = trim(CValue::request("passwordas"));
     // LDAP
     $ldap_guid = trim(CValue::get("ldap_guid"));
     // Standard login
     $username = trim(CValue::request("username"));
     $password = trim(CValue::request("password"));
     // Token sign-in
     $token_hash = trim(CValue::request("token"));
     // Test login and password validity
     $user = new CUser();
     $user->_is_logging = true;
     // -------------- Login as: no need to provide a password for administrators
     if ($loginas) {
         if (self::$instance->user_type != 1 && !$force_login) {
             self::setMsg("Auth-failed-loginas-admin", UI_MSG_ERROR);
             return false;
         }
         $username = $loginas;
         $password = $ldap_connection ? $passwordas : null;
         if (self::$instance->user_type == 1 && $allow_login_as_ldap) {
             $password = null;
         }
         $user->user_username = $username;
         $user->_user_password = $password;
     } elseif ($ldap_connection && $ldap_guid) {
         try {
             $user = CLDAP::getFromLDAPGuid($ldap_guid);
         } catch (Exception $e) {
             self::setMsg($e->getMessage(), UI_MSG_ERROR);
             return false;
         }
     } elseif ($token_hash) {
         $token = CViewAccessToken::getByHash($token_hash);
         if (!$token->isValid()) {
             self::setMsg("Auth-failed-invalidToken", UI_MSG_ERROR);
             return false;
         }
         $token->useIt();
         $token->applyParams();
         $user->load($token->user_id);
         self::$instance->auth_method = "token";
     } elseif (self::$auth_info && self::$auth_info->user_id) {
         $auth = self::$auth_info;
         $user->load($auth->user_id);
         self::$instance->auth_method = $auth->auth_method;
     } else {
         if (!$username) {
             self::setMsg("Auth-failed-nousername", UI_MSG_ERROR);
             return false;
         }
         if (!$password) {
             self::setMsg("Auth-failed-nopassword", UI_MSG_ERROR);
             return false;
         }
         $user->user_username = $username;
         $user->_user_password = $password;
         self::$instance->weak_password = self::checkPasswordWeakness($user);
     }
     if (!$user->_id) {
         $user->loadMatchingObject();
         self::$instance->auth_method = "basic";
     }
     // User template case
     if ($user->template) {
         self::setMsg("Auth-failed-template", UI_MSG_ERROR);
         return false;
     }
     // LDAP case (when not using a ldap_guid), we check is the user in the LDAP directory is still allowed
     // TODO we shoud check it when using ldap_guid too
     if ($ldap_connection && $username) {
         $user_ldap = new CUser();
         $user_ldap->user_username = $username;
         $user_ldap->loadMatchingObject();
         $idex = $user_ldap->loadLastId400(CAppUI::conf("admin LDAP ldap_tag"));
         // The user in linked to the LDAP
         if ($idex->_id) {
             $ldap_guid = $idex->id400;
             $user_ldap->_user_password = $password;
             $user_ldap->_bound = false;
             try {
                 $user = CLDAP::login($user_ldap, $ldap_guid);
                 if (!$user->_bound) {
                     self::setMsg("Auth-failed-combination", UI_MSG_ERROR);
                     return false;
                 }
             } catch (CMbInvalidCredentialsException $e) {
//.........这里部分代码省略.........

/**
 * Select merge fields EAI
 *  
 * @category EAI
 * @package  Mediboard
 * @author   SARL OpenXtrem <dev@openxtrem.com>
 * @license  GNU General Public License, see http://www.gnu.org/licenses/gpl.html 
 * @version  SVN: $Id:$ 
 * @link     http://www.mediboard.org
 */
CApp::setTimeLimit(240);
CApp::setMemoryLimit("512M");
CCanDo::checkAdmin();
$d1_id = CValue::request("domain_1_id");
$d2_id = CValue::request("domain_2_id");
$idex_ids = CValue::request("idex_ids", array());
/* Traitement prélable pour passer en "trash" les idexs en erreurs */
foreach ($idex_ids as $_idex => $idex_id) {
    $idex = new CIdSante400();
    $idex->load($idex_id);
    $idex->tag = "trash_{$idex->tag}";
    $idex->store();
}
/* checkMerge */
$domains_id = array($d1_id, $d2_id);
$domains = array();
$checkMerge = array();
if (count($domains_id) != 2) {
    $checkMerge[] = CAppUI::tr("mergeTooFewObjects");
}
foreach ($domains_id as $domain_id) {

 /**
  * Enforce the current view to be rerouted on a slave SQL server if slave datasource is available
  *
  * @return void
  */
 static function enforceSlave()
 {
     // Enslaved views are supposably session stallers so close session preventively
     CSessionHandler::writeClose();
     // URL param enslave prevention
     if (CValue::request("enslave") === "0") {
         return;
     }
     // Test wether a slave datasource has been configured
     if (!CAppUI::conf("db slave dbhost")) {
         return;
     }
     // Check connection to the slave datasource or abandon std datasource rerouting
     if (!CSQLDataSource::get("slave", true)) {
         return;
     }
     self::$enslaved = true;
     self::$slavestate = true;
     self::rerouteStdDS();
 }

<?php

/**
 * $Id$
 *  
 * @package    Mediboard
 * @subpackage patients
 * @author     SARL OpenXtrem <dev@openxtrem.com>
 * @license    GNU General Public License, see http://www.gnu.org/licenses/gpl.html
 * @version    $Revision$
 * @link       http://www.mediboard.org
 */
CCanDo::check();
$needle = CValue::request('_search_constants', 0);
$list_constantes = CConstantesMedicales::$list_constantes;
$results = array();
if ($needle) {
    foreach ($list_constantes as $_constant => $params) {
        if (strpos($_constant, 'cumul') !== false) {
            continue;
        }
        $search_elements = array();
        $search_elements[] = CMbString::removeDiacritics(strtolower($_constant));
        $search_elements[] = CMbString::removeDiacritics(strtolower(CAppUI::tr("CConstantesMedicales-{$_constant}")));
        $search_elements[] = CMbString::removeDiacritics(strtolower(CAppUI::tr("CConstantesMedicales-{$_constant}-court")));
        $search_elements[] = CMbString::removeDiacritics(strtolower(CAppUI::tr("CConstantesMedicales-{$_constant}-desc")));
        if (strpos(implode('|', $search_elements), $needle) !== false) {
            $results[] = $_constant;
        }
    }
}

    $index = $info;
    $info = 1;
}
// Output the charset header in case of an ajax request
if ($ajax = CValue::request("ajax")) {
    $suppressHeaders = 1;
    $index = $ajax;
    $ajax = 1;
}
// Raw output for export purposes
if ($raw = CValue::request("raw")) {
    $suppressHeaders = 1;
    $index = $raw;
}
// Check if we are in the dialog mode
if ($dialog = CValue::request("dialog")) {
    $index = $dialog;
    $dialog = 1;
}
CAppUI::$dialog =& $dialog;
// clear out main url parameters
$m = $a = $u = $g = "";
CMbPerformance::mark("input");
// Locale
require __DIR__ . "/locales/core.php";
if (empty($locale_info["names"])) {
    $locale_info["names"] = array();
}
setlocale(LC_TIME, $locale_info["names"]);
if (empty($locale_info["charset"])) {
    $locale_info["charset"] = "UTF-8";

 * @category SIP
 * @package  Mediboard
 * @author   SARL OpenXtrem <dev@openxtrem.com>
 * @license  GNU General Public License, see http://www.gnu.org/licenses/gpl.html
 * @version  SVN: $Id: ajax_refresh_exchange.php 15880 2012-06-15 08:14:36Z phenxdesign $
 * @link     http://www.mediboard.org
 */
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);

 * @category Webservices
 * @package  Mediboard
 * @author   SARL OpenXtrem <dev@openxtrem.com>
 * @license  GNU General Public License, see http://www.gnu.org/licenses/gpl.html 
 * @version  SVN: $Id:$ 
 * @link     http://www.mediboard.org
 */
global $m, $a;
CCanDo::checkRead();
// première étape : désactiver le cache lors de la phase de test
ini_set("soap.wsdl_cache_enabled", "0");
$wsdl = CValue::get('wsdl');
$username = CValue::request('username');
$password = CValue::request('password');
$classname = CValue::request('class', "CEAISoapHandler");
$wsdl_mode = CValue::request('wsdl_mode', "CWSDLRPCEncoded");
// Génération du fichier WSDL
if (isset($wsdl)) {
    if (!$classname || !class_exists($classname, true)) {
        return;
    }
    $class = new $classname();
    header('Content-Type: application/xml; charset=iso-8859-1');
    $wsdlFile = new $wsdl_mode();
    // Pour garder en référence les fonctions a decrire
    $wsdlFile->_soap_handler = $class;
    $wsdlFile->addTypes();
    $wsdlFile->addMessage();
    $wsdlFile->addPortType();
    $wsdlFile->addBinding();
    $wsdlFile->addService($username, $password, $m, $a, $classname);