7 include_once (
"FDL/Class.WDoc.php");
26 "m1" =>
"SendMailToVeto",
33 self::Tconvalescent => array(
34 "m1" =>
"toHealthCard"
50 "e2" => self::transfered,
55 "e1" => self::convalescent,
62 "e2" => self::convalescent,
63 "t" => self::Tconvalescent
67 "e1" => self::convalescent,
82 include_once (
"FDL/mailcard.php");
84 $subject = sprintf((
"Disease of %s ") , $this->doc->title);
85 $zone =
"ZOO:DE_MAIL_SICK:S";
87 $to = $this->GetRValue(
"WAN_IDVETO:US_MAIL");
89 if (!$this->doc->getHealthCardId())
$err = $this->doc->createHealthCard();
93 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);
101 include_once (
"FDL/mailcard.php");
102 include_once (
"FDL/Lib.Dir.php");
103 $idcarnet = $this->doc->getHealthCardId();
105 $carnet =
new_Doc($this->dbaccess, $idcarnet);
106 $err = $this->doc->canEdit();
109 SetHttpVar(
"redirect_act",
"GENERIC_EDIT&id=" . $idcarnet);
112 SetHttpVar(
"redirect_act",
"FDL_CARD&id=" . $idcarnet);
117 function A2($newstate)
120 SetHttpVar(
"redirect_act",
"DMEANDIED&state=$newstate&id=" . $this->doc->id);
SendMailToVeto($newstate)
new_Doc($dbaccess, $id= '', $latest=false)
if($file) if($subject==""&&$file) if($subject=="") $err