/**
  * @param string          $line     Ligne analysée
  * @param CHprim21Patient &$patient Patient lié
  *
  * @return bool
  */
 function segmentP($line, &$patient)
 {
     if (!$this->has_header) {
         return false;
     }
     if (!$patient->bindToLine($line, $this)) {
         return false;
     }
     $patient->store();
     $medecin = new CHprim21Medecin();
     if ($medecin->bindToLine($line, $this)) {
         if ($medecin->external_id) {
             $medecin->store();
         }
     }
     $sejour = new CHprim21Sejour();
     if ($sejour->bindToLine($line, $this, $patient, $medecin)) {
         if ($sejour->external_id) {
             $sejour->store();
         }
     }
     return true;
 }
 *
 * @category Hprim21
 * @package  Mediboard
 * @author   SARL OpenXtrem <*****@*****.**>
 * @license  GNU General Public License; see http://www.gnu.org/licenses/gpl.html
 * @version  SVN: $Id: httpreq_link_hprim_objects.php 21867 2014-02-03 08:18:27Z nicolasld $
 * @link     http://www.mediboard.org
 */
CCanDo::checkRead();
CApp::setTimeLimit(240);
$date_limite = CMbDT::date("- 1 month");
$qte_limite = 1000;
$tag_ipp = CPatient::getTagIPP();
$tag_sejour = CSejour::getTagNDA();
// Gestion des médecins
$hprimMedecin = new CHprim21Medecin();
$where = array();
$where["user_id"] = "IS NULL";
/** @var CHprim21Medecin[] $listHprimMedecins */
$listHprimMedecins = $hprimMedecin->loadList($where);
$total = count($listHprimMedecins);
// Liaison à un médecin existant
$nouv = 0;
foreach ($listHprimMedecins as $_medecin) {
    $_medecin->loadRefExchange();
    $echg_hprim = $_medecin->_ref_echange_hprim21;
    $medecin = new CMediusers();
    $ljoin = array();
    $ljoin["users"] = "users.user_id = users_mediboard.user_id";
    $where = array();
    $where["users_mediboard.adeli"] = " = '{$_medecin->external_id}'";