Core  3.2
PHP API documentation
 All Data Structures Namespaces Files Functions Variables Pages
Class.WTestSyntaxErrorImp8.php
Go to the documentation of this file.
1 <?php
2 /*
3  * @author Anakeen
4  * @package FDL
5 */
6 
7 include_once ("FDL/Class.WDoc.php");
8 
9 class WTestSyntax extends WDoc
10 {
11  var $attrPrefix = "WAN"const alive = "alive"; // N_("alive")
12  const dead = "dead"; // N_("dead")
13  const transfered = "transfered"; // N_("transfered")
14  const sick = "sick"; // N_("sick")
15  const convalescent = "convalescent"; // N_("convalescent")
16  const T1 = "T1"; // N_("T1")
17  const Tsick = "Tsick"; // N_("Tsick")
18  const Tconvalescent = "Tconvalescent"; // N_("Tconvalescent")
19  const T3 = "T3"; // N_("T3")
20  var $firstState = self::alive;
21  var $transitions = array(
22  self::T1 => array() ,
23  self::Tsick => array(
24  "m1" => "SendMailToVeto",
25  "ask" => array(
26  "wan_idveto",
27  "wan_veto"
28  ) ,
29  "nr" => true
30  ) ,
31  self::Tconvalescent => array(
32  "m1" => "toHealthCard"
33  ) ,
34  self::T3 => array(
35  "m1" => "A2"
36  )
37  );
38 
39  var $cycle = array(
40  array(
41  "e1" => self::alive,
42  "e2" => self::sick,
43  "t" => self::Tsick
44  ) ,
45 
46  array(
47  "e1" => self::alive,
48  "e2" => self::transfered,
49  "t" => self::T1
50  ) ,
51 
52  array(
53  "e1" => self::convalescent,
54  "e2" => self::dead,
55  "t" => self::T1
56  ) ,
57 
58  array(
59  "e1" => self::sick,
60  "e2" => self::convalescent,
61  "t" => self::Tconvalescent
62  ) ,
63 
64  array(
65  "e1" => self::convalescent,
66  "e2" => self::alive,
67  "t" => self::T1
68  ) ,
69 
70  array(
71  "e1" => self::sick,
72  "e2" => self::dead,
73  "t" => "T3"
74  )
75  );
76 
77  function SendMailToVeto($newstate)
78  {
79  global $action;
80  include_once ("FDL/mailcard.php");
81 
82  $subject = sprintf(("Disease of %s ") , $this->doc->title);
83  $zone = "ZOO:DE_MAIL_SICK:S";
84 
85  $to = $this->GetRValue("WAN_IDVETO:US_MAIL");
86  $cc = "";
87  if (!$this->doc->getHealthCardId()) $err = $this->doc->createHealthCard();
88 
89  if ($err != "") return $err;
90  SetHttpVar("redirect_app", "FDL");
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);
92 
93  return "->";
94  }
95 
96  function toHealthCard($newstate)
97  {
98  global $action;
99  include_once ("FDL/mailcard.php");
100  include_once ("FDL/Lib.Dir.php");
101  $idcarnet = $this->doc->getHealthCardId();
102 
103  $carnet = new_Doc($this->dbaccess, $idcarnet);
104  $err = $this->doc->canEdit();
105  if ($err == "") {
106  SetHttpVar("redirect_app", "GENERIC");
107  SetHttpVar("redirect_act", "GENERIC_EDIT&id=" . $idcarnet);
108  } else {
109  SetHttpVar("redirect_app", "FDL");
110  SetHttpVar("redirect_act", "FDL_CARD&id=" . $idcarnet);
111  }
112  return "";
113  }
114 
115  function A2($newstate)
116  {
117  SetHttpVar("redirect_app", "TICKET");
118  SetHttpVar("redirect_act", "DMEANDIED&state=$newstate&id=" . $this->doc->id);
119  return "->";
120  }
121 } //class
122 
123 ?>
global $action
SetHttpVar($name, $def)
Definition: Lib.Http.php:150
$to
$subject
new_Doc($dbaccess, $id= '', $latest=false)
$cc
if($file) if($subject==""&&$file) if($subject=="") $err
← centre documentaire © anakeen