7 include_once (
"FDL/Class.WDoc.php");
24 "m1" =>
"SendMailToVeto",
31 self::Tconvalescent => array(
32 "m1" =>
"toHealthCard"
48 "e2" => self::transfered,
53 "e1" => self::convalescent,
60 "e2" => self::convalescent,
61 "t" => self::Tconvalescent
65 "e1" => self::convalescent,
80 include_once (
"FDL/mailcard.php");
82 $subject = sprintf((
"Disease of %s ") , $this->doc->title);
83 $zone =
"ZOO:DE_MAIL_SICK:S";
85 $to = $this->GetRValue(
"WAN_IDVETO:US_MAIL");
87 if (!$this->doc->getHealthCardId())
$err = $this->doc->createHealthCard();
91 SetHttpVar(
"redirect_act",
"CONFIRMMAIL&state=$newstate&ulink=Y&mzone=$zone&mail_from=$from&mail_to=$to&mail_format=html&mail_subject=$subject&mid=" . $this->doc->id);
99 include_once (
"FDL/mailcard.php");
100 include_once (
"FDL/Lib.Dir.php");
101 $idcarnet = $this->doc->getHealthCardId();
103 $carnet =
new_Doc($this->dbaccess, $idcarnet);
104 $err = $this->doc->canEdit();
107 SetHttpVar(
"redirect_act",
"GENERIC_EDIT&id=" . $idcarnet);
110 SetHttpVar(
"redirect_act",
"FDL_CARD&id=" . $idcarnet);
115 function A2($newstate)
118 SetHttpVar(
"redirect_act",
"DMEANDIED&state=$newstate&id=" . $this->doc->id);
new_Doc($dbaccess, $id= '', $latest=false)
SendMailToVeto($newstate)
if($file) if($subject==""&&$file) if($subject=="") $err