superedit-DB_PROCEDURES_CREATE.php 39 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913
  1. <?php
  2. // procedury do optymalnegi przyjemnego i szybkiego widoku danych procesow
  3. // bazowe konstruktory twardych struktur danych systemowych
  4. //version @2014-01-22 bindera
  5. //@2014-02-05 ustalono, ze ten plik zostanie rozrzucony po pojedynczych skryptach php, ktore beda wyzwalane przez klase zaprojektowana przez Piotra, ktora
  6. //na podobnej zasadzie co WordPress bedzie czytac tabele z dostepnymi pluginami, gdzie te skryupty beda pozglaszane/lub beda sie zglaszac
  7. if(isset($_SERVER["argv"][1])) {
  8. //wymuszenie argumentu z polecenia (ta zmienna oznaczac ma domene (np. biuro.biall-net.pl )
  9. //php -r"include('/Library/Server/Web/Data/Sites/Default/SE/superedit-SQIX_STRUCTURE_DB_SYNC.php') ;" biuro.biall-net.pl
  10. $_SERVER['SERVER_NAME']=$_SERVER["argv"][1];
  11. $_REQUEST['SYSTEM_PROFILE_STRING_IMPORT_EXPORT']=$_SERVER["argv"][2]; //filtr do importu
  12. $_REQUEST['submit']=true;
  13. define('DS', DIRECTORY_SEPARATOR);
  14. define('APP_PATH_ROOT', dirname(__FILE__));
  15. define('APP_PATH_WWW', dirname(__FILE__));
  16. define('APP_PATH_CONFIG', APP_PATH_ROOT . DS . 'config');
  17. require_once APP_PATH_ROOT . DS . 'se-lib' . DS . 'Lib.php';
  18. Lib::loadClass('V');
  19. Lib::loadClass('Config');
  20. Lib::loadClass('DB');
  21. Lib::loadClass('User');
  22. session_start();
  23. include_once(APP_PATH_CONFIG.'/.config-'.$_SERVER['SERVER_NAME'].'.php');
  24. include('superedit-DEBUG_S.php');
  25. // $PROJ_mount_point=Config::getConfFile('import_db', '') ;
  26. // print_r($PROJ_mount_point);
  27. } else {
  28. if($_SESSION['ADM_ADMIN_LEVEL']<>0) die('niewlasciwy admin level != 0');
  29. if(!isset($_SESSION['ADM_ADMIN_LEVEL'])) die('brak admin level - zle wyzwolenie funkcji');
  30. }
  31. function DB_PROCEDURES_CREATE($DB=null) {
  32. DEBUG_S(-3,"Deklaruje zmienna SQL do wykonania instalacji procedur",null,__FILE__,__FUNCTION__,__LINE__);
  33. $sql['turn_off_database_locking']="SET SESSION TRANSACTION ISOLATION LEVEL READ UNCOMMITTED ;";
  34. //! CRM_ZASOBY_BEGIN
  35. $sql['drop_CRM_LISTA_ZASOBOW_hierarchy_sys_connect_by_path']="drop function if exists CRM_LISTA_ZASOBOW_hierarchy_sys_connect_by_path";
  36. $sql['create_CRM_LISTA_ZASOBOW_hierarchy_sys_connect_by_path']="CREATE DEFINER=`root`@`localhost` FUNCTION `CRM_LISTA_ZASOBOW_hierarchy_sys_connect_by_path`(`delimiter` TEXT, `node` INT) RETURNS text CHARSET latin2
  37. READS SQL DATA
  38. BEGIN
  39. DECLARE _path TEXT;
  40. DECLARE _type CHAR(255);
  41. DECLARE _lvl INT;
  42. DECLARE _cpath TEXT;
  43. DECLARE _id INT;
  44. DECLARE _id_cur INT;
  45. DECLARE EXIT HANDLER FOR NOT FOUND RETURN _path;
  46. SET _id = COALESCE(node, @id);
  47. SET _path = '';
  48. SET _lvl=1;
  49. the_loop: LOOP
  50. SET _lvl =_lvl+1;
  51. IF _lvl>100 THEN
  52. RETURN concat('ERROR',_path);
  53. LEAVE the_loop;
  54. END IF;
  55. SELECT PARENT_ID,`DESC`,ID
  56. INTO _id,_type,_id_cur
  57. FROM CRM_LISTA_ZASOBOW
  58. WHERE id = _id
  59. AND COALESCE(id <> @start_with, TRUE);
  60. SET _path = CONCAT(_type, delimiter, _path);
  61. END LOOP the_loop;
  62. END";
  63. //!_CRM_LISTA_ZASOBOW_tree_UPDATE
  64. $sql['drop__CRM_LISTA_ZASOBOW_tree_UPDATE']="DROP TRIGGER IF EXISTS `_CRM_LISTA_ZASOBOW_tree_UPDATE`";
  65. $sql['create__CRM_LISTA_ZASOBOW_tree_UPDATE']="CREATE DEFINER=`root`@`localhost` TRIGGER `_CRM_LISTA_ZASOBOW_tree_UPDATE` BEFORE UPDATE ON `CRM_LISTA_ZASOBOW` FOR EACH ROW BEGIN
  66. IF NEW.PARENT_ID<>OLD.PARENT_ID or NEW.`DESC`<>OLD.`DESC` THEN
  67. SET NEW.path = CRM_LISTA_ZASOBOW_hierarchy_sys_connect_by_path('/', NEW.PARENT_ID);
  68. update CRM_WSKAZNIK ik set ik.path_CRM_LISTA_ZASOBOW=CRM_LISTA_ZASOBOW_hierarchy_sys_connect_by_path('/', NEW.ID) where path_CRM_LISTA_ZASOBOW like concat('%',NEW.ID,'%');
  69. -- update CRM_LISTA_ZASOBOW ik set ik.path=CRM_LISTA_ZASOBOW_hierarchy_sys_connect_by_path('/', ik.ID) where path like concat('%',OLD.`DESC`,'%') and ik.ID<>OLD.ID;
  70. END IF;
  71. END
  72. ";
  73. //!_CRM_LISTA_ZASOBOW_tree_UPDATE_after
  74. $sql['drop__CRM_LISTA_ZASOBOW_tree_UPDATE_after']="DROP TRIGGER IF EXISTS `_CRM_LISTA_ZASOBOW_tree_UPDATE_after`";
  75. /*$sql['create__CRM_LISTA_ZASOBOW_tree_UPDATE_after']="CREATE DEFINER=`root`@`localhost` TRIGGER `_CRM_LISTA_ZASOBOW_tree_UPDATE_after` AFTER UPDATE ON `CRM_LISTA_ZASOBOW` FOR EACH ROW BEGIN
  76. IF NEW.PARENT_ID<>OLD.PARENT_ID or NEW.`DESC`<>OLD.`DESC` THEN
  77. -- update CRM_LISTA_ZASOBOW ik set ik.path=CRM_LISTA_ZASOBOW_hierarchy_sys_connect_by_path('/', ik.ID) where path like concat('%',OLD.`DESC`,'%');
  78. update CRM_WSKAZNIK ik set ik.path_CRM_LISTA_ZASOBOW=CRM_LISTA_ZASOBOW_hierarchy_sys_connect_by_path('/', ik.ID_ZASOB) where path_CRM_LISTA_ZASOBOW like concat('%',OLD.`DESC`,'%');
  79. END IF;
  80. END
  81. ";
  82. */
  83. //!_CRM_LISTA_ZASOBOW_tree_INSERT
  84. $sql['drop__CRM_LISTA_ZASOBOW_tree_INSERT']="DROP TRIGGER IF EXISTS `_CRM_LISTA_ZASOBOW_tree_INSERT`";
  85. $sql['create__CRM_LISTA_ZASOBOW_tree_INSERT']="CREATE DEFINER=`root`@`localhost` TRIGGER `_CRM_LISTA_ZASOBOW_tree_INSERT` BEFORE INSERT ON `CRM_LISTA_ZASOBOW` FOR EACH ROW BEGIN
  86. SET NEW.path = CRM_LISTA_ZASOBOW_hierarchy_sys_connect_by_path('/', NEW.PARENT_ID);
  87. END
  88. ";
  89. //!_CRM_WSKAZNIK_tree_INSERT
  90. $sql['drop__CRM_WSKAZNIK_tree_INSERT']="DROP TRIGGER IF EXISTS `_CRM_WSKAZNIK_tree_INSERT`";
  91. $sql['create__CRM_WSKAZNIK_tree_INSERT']="CREATE DEFINER=`root`@`localhost` TRIGGER `_CRM_WSKAZNIK_tree_INSERT` BEFORE INSERT ON `CRM_WSKAZNIK` FOR EACH ROW BEGIN
  92. SET NEW.path_CRM_LISTA_ZASOBOW = CRM_LISTA_ZASOBOW_hierarchy_sys_connect_by_path('/', NEW.ID_ZASOB);
  93. END
  94. ";
  95. //!_CRM_WSKAZNIK_tree_UPDATE
  96. $sql['drop__CRM_WSKAZNIK_tree_UPDATE']="DROP TRIGGER IF EXISTS `_CRM_WSKAZNIK_tree_UPDATE`";
  97. $sql['create__CRM_WSKAZNIK_tree_UPDATE']="CREATE DEFINER=`root`@`localhost` TRIGGER `_CRM_WSKAZNIK_tree_UPDATE` BEFORE UPDATE ON `CRM_WSKAZNIK` FOR EACH ROW BEGIN
  98. IF NEW.ID_ZASOB<>OLD.ID_ZASOB THEN
  99. SET NEW.path_CRM_LISTA_ZASOBOW = CRM_LISTA_ZASOBOW_hierarchy_sys_connect_by_path('/', NEW.ID_ZASOB);
  100. END IF;
  101. END
  102. ";
  103. //! event do aktualizacji PROJEKTOW - raz dziennie wszystkie przemapowac TODO trigger powinien aktualizowac pozostale powiazane rekordy, ktore zmienily strukture po zmianie struktury projektow
  104. $sql['event_delete_CRM_LISTA_ZASOBOW__CRM_WSKAZNIK_tree']="drop event if exists _CRM_LISTA_ZASOBOW__CRM_WSKAZNIK_tree_event";
  105. $sql['event_create_CRM_LISTA_ZASOBOW__CRM_WSKAZNIK_tree']="CREATE DEFINER=root@localhost EVENT _CRM_LISTA_ZASOBOW__CRM_WSKAZNIK_tree_event
  106. ON SCHEDULE EVERY 1 DAY
  107. STARTS str_to_date( date_format(now(), '%Y%m%d 0500'), '%Y%m%d %H%i' ) + INTERVAL 1 DAY
  108. DO
  109. BEGIN
  110. update CRM_LISTA_ZASOBOW set path=CRM_LISTA_ZASOBOW_hierarchy_sys_connect_by_path('/',ID);
  111. update CRM_WSKAZNIK set path_CRM_LISTA_ZASOBOW=CRM_LISTA_ZASOBOW_hierarchy_sys_connect_by_path('/',ID_ZASOB);
  112. END
  113. ";
  114. //! CRM_ZASOBY_END
  115. //!IN7_MK_BAZA_DYSTRYBUCJI_hierarchy_sys_connect_by_path
  116. $sql['drop_IN7_MK_BAZA_DYSTRYBUCJI_hierarchy_sys_connect_by_path']="drop function if exists IN7_MK_BAZA_DYSTRYBUCJI_hierarchy_sys_connect_by_path";
  117. $sql['create_IN7_MK_BAZA_DYSTRYBUCJI_hierarchy_sys_connect_by_path']="CREATE DEFINER=`root`@`localhost` FUNCTION `IN7_MK_BAZA_DYSTRYBUCJI_hierarchy_sys_connect_by_path`(`delimiter` TEXT, `node` INT) RETURNS text CHARSET latin2
  118. READS SQL DATA
  119. BEGIN
  120. DECLARE _path TEXT;
  121. DECLARE _type CHAR(255);
  122. DECLARE _lvl INT;
  123. DECLARE _cpath TEXT;
  124. DECLARE _id INT;
  125. DECLARE _id_cur INT;
  126. DECLARE EXIT HANDLER FOR NOT FOUND RETURN _path;
  127. SET _id = COALESCE(node, @id);
  128. SET _path = _id;
  129. SET _lvl=1;
  130. the_loop: LOOP
  131. SET _lvl =_lvl+1;
  132. IF _lvl>100 THEN
  133. RETURN concat('ERROR',_path);
  134. LEAVE the_loop;
  135. END IF;
  136. SELECT P_ID,M_DIST_TYPE,ID
  137. INTO _id,_type,_id_cur
  138. FROM IN7_MK_BAZA_DYSTRYBUCJI
  139. WHERE id = _id
  140. AND COALESCE(id <> @start_with, TRUE);
  141. SET _path = CONCAT(_id, delimiter, _path);
  142. END LOOP the_loop;
  143. END";
  144. //!_IN7_MK_BAZA_DYSTRYBUCJI_tree_UPDATE
  145. $sql['drop__IN7_MK_BAZA_DYSTRYBUCJI_tree_UPDATE']="DROP TRIGGER IF EXISTS `_IN7_MK_BAZA_DYSTRYBUCJI_tree_UPDATE`";
  146. $sql['create__IN7_MK_BAZA_DYSTRYBUCJI_tree_UPDATE']="CREATE DEFINER=`root`@`localhost` TRIGGER `_IN7_MK_BAZA_DYSTRYBUCJI_tree_UPDATE` BEFORE UPDATE ON `IN7_MK_BAZA_DYSTRYBUCJI` FOR EACH ROW BEGIN
  147. IF NEW.P_ID<>OLD.P_ID THEN
  148. SET NEW.path = IN7_MK_BAZA_DYSTRYBUCJI_hierarchy_sys_connect_by_path('-', NEW.P_ID);
  149. update IN7_DZIENNIK_KORESP ik set ik.path=IN7_MK_BAZA_DYSTRYBUCJI_hierarchy_sys_connect_by_path('-', NEW.ID) where path like concat('%',NEW.ID,'%');
  150. END IF;
  151. END
  152. ";
  153. //!_IN7_MK_BAZA_DYSTRYBUCJI_tree_INSERT
  154. $sql['drop__IN7_MK_BAZA_DYSTRYBUCJI_tree_INSERT']="DROP TRIGGER IF EXISTS `_IN7_MK_BAZA_DYSTRYBUCJI_tree_INSERT`";
  155. $sql['create__IN7_MK_BAZA_DYSTRYBUCJI_tree_INSERT']="CREATE DEFINER=`root`@`localhost` TRIGGER `_IN7_MK_BAZA_DYSTRYBUCJI_tree_INSERT` BEFORE INSERT ON `IN7_MK_BAZA_DYSTRYBUCJI` FOR EACH ROW BEGIN
  156. SET NEW.path = IN7_MK_BAZA_DYSTRYBUCJI_hierarchy_sys_connect_by_path('-', NEW.P_ID);
  157. END
  158. ";
  159. //!_IN7_DZIENNIK_KORESP_tree_INSERT
  160. $sql['drop__IN7_DZIENNIK_KORESP_tree_INSERT']="DROP TRIGGER IF EXISTS `_IN7_DZIENNIK_KORESP_tree_INSERT`";
  161. $sql['create__IN7_DZIENNIK_KORESP_tree_INSERT']="CREATE DEFINER=`root`@`localhost` TRIGGER `_IN7_DZIENNIK_KORESP_tree_INSERT` BEFORE INSERT ON `IN7_DZIENNIK_KORESP` FOR EACH ROW BEGIN
  162. IF NEW.ID_PROJECT IS NOT NULL THEN
  163. SET NEW.path = IN7_MK_BAZA_DYSTRYBUCJI_hierarchy_sys_connect_by_path('-', NEW.ID_PROJECT);
  164. END IF;
  165. END
  166. ";
  167. //!_IN7_DZIENNIK_KORESP_tree_UPDATE
  168. $sql['drop__IN7_DZIENNIK_KORESP_tree_UPDATE']="DROP TRIGGER IF EXISTS `_IN7_DZIENNIK_KORESP_tree_UPDATE`";
  169. $sql['create__IN7_DZIENNIK_KORESP_tree_UPDATE']="CREATE DEFINER=`root`@`localhost` TRIGGER `_IN7_DZIENNIK_KORESP_tree_UPDATE` BEFORE UPDATE ON `IN7_DZIENNIK_KORESP` FOR EACH ROW BEGIN
  170. IF NEW.ID_PROJECT is null THEN
  171. SET NEW.path = '';
  172. ELSEIF OLD.ID_PROJECT IS NULL or NEW.ID_PROJECT<>OLD.ID_PROJECT THEN
  173. SET NEW.path = IN7_MK_BAZA_DYSTRYBUCJI_hierarchy_sys_connect_by_path('-', NEW.ID_PROJECT);
  174. END IF;
  175. END
  176. ";
  177. //! event do aktualizacji PROJEKTOW - raz dziennie wszystkie przemapowac TODO trigger powinien aktualizowac pozostale powiazane rekordy, ktore zmienily strukture po zmianie struktury projektow
  178. $sql['event_delete_IN7_MK_BAZA_DYSTRYBUCJI__IN7_DZIENNIK_KORESP_tree']="drop event if exists _IN7_MK_BAZA_DYSTRYBUCJI__IN7_DZIENNIK_KORESP_tree_event";
  179. $sql['event_create_IN7_MK_BAZA_DYSTRYBUCJI__IN7_DZIENNIK_KORESP_tree']="CREATE DEFINER=root@localhost EVENT _IN7_MK_BAZA_DYSTRYBUCJI__IN7_DZIENNIK_KORESP_tree_event
  180. ON SCHEDULE EVERY 1 DAY
  181. STARTS str_to_date( date_format(now(), '%Y%m%d 0500'), '%Y%m%d %H%i' ) + INTERVAL 1 DAY
  182. DO
  183. BEGIN
  184. update IN7_MK_BAZA_DYSTRYBUCJI set path=IN7_MK_BAZA_DYSTRYBUCJI_hierarchy_sys_connect_by_path('-',ID);
  185. update IN7_DZIENNIK_KORESP set path=IN7_MK_BAZA_DYSTRYBUCJI_hierarchy_sys_connect_by_path('-',ID_PROJECT);
  186. END
  187. ";
  188. //!hierarchy_connect_by_parent_eq_prior_id_with_level_and_loop
  189. $sql['drop_hierarchy_connect_by_parent_eq_prior_id_with_level_and_loop']="drop function if exists hierarchy_connect_by_parent_eq_prior_id_with_level_and_loop";
  190. $sql['create_hierarchy_connect_by_parent_eq_prior_id_with_level_and_loop']="CREATE DEFINER=`root`@`localhost` FUNCTION `hierarchy_connect_by_parent_eq_prior_id_with_level_and_loop`(`value` INT, `maxlevel` INT) RETURNS int(11)
  191. READS SQL DATA
  192. BEGIN
  193. DECLARE _id INT;
  194. DECLARE _parent INT;
  195. DECLARE _next INT;
  196. DECLARE _i INT;
  197. DECLARE CONTINUE HANDLER FOR NOT FOUND SET @id = NULL;
  198. SET _parent = @id;
  199. SET _id = -1;
  200. SET _i = 0;
  201. IF @id IS NULL THEN
  202. RETURN NULL;
  203. END IF;
  204. LOOP
  205. SELECT MIN(id)
  206. INTO @id
  207. FROM CRM_PROCES
  208. WHERE PARENT_ID = _parent
  209. AND id > _id
  210. AND id <> @start_with
  211. AND COALESCE(@level < maxlevel, TRUE);
  212. IF @id IS NOT NULL OR _parent = @start_with THEN
  213. SET @level = @level + 1;
  214. RETURN @id;
  215. END IF;
  216. SET @level := @level - 1;
  217. SELECT id, PARENT_ID
  218. INTO _id, _parent
  219. FROM CRM_PROCES
  220. WHERE id = _parent;
  221. SET _i = _i + 1;
  222. END LOOP;
  223. RETURN NULL;
  224. END
  225. ";
  226. $sql['drop_hierarchy_connect_by_iscycle']="drop function if exists hierarchy_connect_by_iscycle";
  227. $sql['create_hierarchy_connect_by_iscycle']="CREATE DEFINER=`root`@`localhost` FUNCTION `hierarchy_connect_by_iscycle`(`node` INT) RETURNS int(11)
  228. READS SQL DATA
  229. BEGIN
  230. DECLARE _id INT;
  231. DECLARE _loop INT;
  232. DECLARE _node INT;
  233. DECLARE EXIT HANDLER FOR NOT FOUND RETURN 0;
  234. SET _id = COALESCE(node, @id);
  235. SET _loop = 0;
  236. SET _node = 0;
  237. LOOP
  238. SELECT PARENT_ID
  239. INTO _id
  240. FROM CRM_PROCES
  241. WHERE id = _id;
  242. IF _id = @start_with THEN
  243. SET _loop := _loop + 1;
  244. END IF;
  245. IF _id = COALESCE(node, @id) THEN
  246. SET _node = _node + 1;
  247. END IF;
  248. IF _loop >= 2 THEN
  249. RETURN _node;
  250. END IF;
  251. END LOOP;
  252. END";
  253. $sql['drop_hierarchy_sys_connect_by_path']="drop function if exists hierarchy_sys_connect_by_path";
  254. $sql['create_hierarchy_sys_connect_by_path']="CREATE DEFINER=`root`@`localhost` FUNCTION `hierarchy_sys_connect_by_path`(`delimiter` TEXT, `node` INT) RETURNS text CHARSET latin2
  255. READS SQL DATA
  256. BEGIN
  257. DECLARE _path TEXT;
  258. DECLARE _type CHAR(255);
  259. DECLARE _cpath TEXT;
  260. DECLARE _id INT;
  261. DECLARE _id_cur INT;
  262. DECLARE EXIT HANDLER FOR NOT FOUND RETURN _path;
  263. SET _id = COALESCE(node, @id);
  264. SET _path = _id;
  265. LOOP
  266. SELECT PARENT_ID,TYPE,ID
  267. INTO _id,_type,_id_cur
  268. FROM CRM_PROCES
  269. WHERE id = _id
  270. AND COALESCE(id <> @start_with, TRUE);
  271. SET _path = CONCAT(_id, delimiter, _path);
  272. END LOOP;
  273. END";
  274. $sql['drop_CRM_PROCES_tree_detect_init']="drop function if exists CRM_PROCES_tree_detect_init";
  275. $sql['create_CRM_PROCES_tree_detect_init']="CREATE DEFINER=`root`@`localhost` FUNCTION `CRM_PROCES_tree_detect_init`(`node` INT) RETURNS text CHARSET latin2
  276. READS SQL DATA
  277. BEGIN
  278. DECLARE _path INT;
  279. DECLARE _type CHAR(255);
  280. DECLARE _cpath TEXT;
  281. DECLARE _id INT;
  282. DECLARE _id_cur INT;
  283. DECLARE EXIT HANDLER FOR NOT FOUND RETURN _path;
  284. SET _id = COALESCE(node, @id);
  285. LOOP
  286. SELECT PARENT_ID,TYPE,ID
  287. INTO _id,_type,_id_cur
  288. FROM CRM_PROCES
  289. WHERE id = _id
  290. AND COALESCE(id <> @start_with, TRUE);
  291. if _type = 'PROCES_INIT' THEN
  292. SET _path = _id_cur;
  293. END IF;
  294. END LOOP;
  295. END";
  296. $sql['drop__CRM_PROCES_STATS_proc_wiev']="drop table if exists _CRM_PROCES_STATS_proc_wiev;";
  297. $sql['create__CRM_PROCES_STATS_proc_wiev']="create table _CRM_PROCES_STATS_proc_wiev
  298. SELECT hi.ID,CRM_PROCES_tree_detect_init(hi.ID) as ID_PROCES_INIT,CONCAT(REPEAT(' ', lvl - 1), hi.id) AS treeitem,
  299. hierarchy_sys_connect_by_path('/', hi.id) AS path,
  300. PARENT_ID, lvl,
  301. CASE
  302. WHEN lvl >= @maxlevel THEN 1
  303. ELSE COALESCE(
  304. (
  305. SELECT 0
  306. FROM CRM_PROCES hl
  307. WHERE hl.PARENT_ID = ho.id
  308. AND hl.id <> @start_with
  309. LIMIT 1
  310. ), 1)
  311. END AS is_leaf,
  312. hierarchy_connect_by_iscycle(hi.id) AS is_cycle
  313. FROM (
  314. SELECT hierarchy_connect_by_parent_eq_prior_id_with_level_and_loop(id, @maxlevel) AS id,
  315. CAST(@level AS SIGNED) AS lvl
  316. FROM (
  317. SELECT @start_with := 0,
  318. @id := @start_with,
  319. @level := 0,
  320. @maxlevel := NULL
  321. ) vars, CRM_PROCES
  322. WHERE @id IS NOT NULL
  323. ) ho
  324. JOIN CRM_PROCES hi
  325. ON hi.id = ho.id ;";
  326. $sql['alter__CRM_PROCES_STATS_proc_wiev_unique_id']="alter table _CRM_PROCES_STATS_proc_wiev add unique(ID)";
  327. $sql['alter__CRM_PROCES_STATS_proc_wiev_modify_path']="alter table _CRM_PROCES_STATS_proc_wiev modify path varchar(255)";
  328. $sql['alter__CRM_PROCES_STATS_proc_wiev_modify_treeitem']="alter table _CRM_PROCES_STATS_proc_wiev modify treeitem varchar(255)";
  329. //!_CRM_PROCES_STATS_proc_wiev_UPDATE
  330. $sql['drop__CRM_PROCES_STATS_proc_wiev_UPDATE']="DROP TRIGGER IF EXISTS `_CRM_PROCES_STATS_proc_wiev_UPDATE`";
  331. $sql['create__CRM_PROCES_STATS_proc_wiev_UPDATE']="CREATE DEFINER=`root`@`localhost` TRIGGER `_CRM_PROCES_STATS_proc_wiev_UPDATE` AFTER UPDATE ON `CRM_PROCES` FOR EACH ROW BEGIN
  332. IF NEW.PARENT_ID<>OLD.PARENT_ID THEN
  333. SET SESSION TRANSACTION ISOLATION LEVEL READ UNCOMMITTED ;
  334. replace into _CRM_PROCES_STATS_proc_wiev
  335. SELECT hi.ID,CRM_PROCES_tree_detect_init(hi.ID) as ID_PROCES_INIT,CONCAT(REPEAT(' ', lvl - 1), hi.id) AS treeitem,
  336. hierarchy_sys_connect_by_path('/', hi.id) AS path,
  337. PARENT_ID, lvl,
  338. CASE
  339. WHEN lvl >= @maxlevel THEN 1
  340. ELSE COALESCE(
  341. (
  342. SELECT 0
  343. FROM CRM_PROCES hl
  344. WHERE hl.PARENT_ID = ho.id
  345. AND hl.id <> @start_with
  346. LIMIT 1
  347. ), 1)
  348. END AS is_leaf,
  349. hierarchy_connect_by_iscycle(hi.id) AS is_cycle
  350. FROM (
  351. SELECT hierarchy_connect_by_parent_eq_prior_id_with_level_and_loop(id, @maxlevel) AS id,
  352. CAST(@level AS SIGNED) AS lvl
  353. FROM (
  354. SELECT @start_with := 0,
  355. @id := @start_with,
  356. @level := 0,
  357. @maxlevel := 1000
  358. ) vars, CRM_PROCES
  359. WHERE @id IS NOT NULL
  360. ) ho
  361. JOIN CRM_PROCES hi
  362. ON hi.id = ho.id ;
  363. END IF;
  364. END
  365. ";
  366. //!_CRM_PROCES_STATS_proc_wiev_INSERT
  367. $sql['_drop__CRM_PROCES_STATS_proc_wiev_INSERT']="DROP TRIGGER IF EXISTS `_CRM_PROCES_STATS_proc_wiev_INSERT`;";
  368. $sql['create__CRM_PROCES_STATS_proc_wiev_INSERT']="CREATE DEFINER=`root`@`localhost` TRIGGER `_CRM_PROCES_STATS_proc_wiev_INSERT` AFTER INSERT ON `CRM_PROCES` FOR EACH ROW BEGIN
  369. IF NEW.PARENT_ID>0 THEN
  370. SET SESSION TRANSACTION ISOLATION LEVEL READ UNCOMMITTED ;
  371. replace into _CRM_PROCES_STATS_proc_wiev
  372. SELECT hi.ID,CRM_PROCES_tree_detect_init(hi.ID) as ID_PROCES_INIT,CONCAT(REPEAT(' ', lvl - 1), hi.id) AS treeitem,
  373. hierarchy_sys_connect_by_path('/', hi.id) AS path,
  374. PARENT_ID, lvl,
  375. CASE
  376. WHEN lvl >= @maxlevel THEN 1
  377. ELSE COALESCE(
  378. (
  379. SELECT 0
  380. FROM CRM_PROCES hl
  381. WHERE hl.PARENT_ID = ho.id
  382. AND hl.id <> @start_with
  383. LIMIT 1
  384. ), 1)
  385. END AS is_leaf,
  386. hierarchy_connect_by_iscycle(hi.id) AS is_cycle
  387. FROM (
  388. SELECT hierarchy_connect_by_parent_eq_prior_id_with_level_and_loop(id, @maxlevel) AS id,
  389. CAST(@level AS SIGNED) AS lvl
  390. FROM (
  391. SELECT @start_with := 0,
  392. @id := @start_with,
  393. @level := 0,
  394. @maxlevel := 1000
  395. ) vars, CRM_PROCES
  396. WHERE @id IS NOT NULL
  397. ) ho
  398. JOIN CRM_PROCES hi
  399. ON hi.id = ho.id ;
  400. END IF;
  401. END";
  402. $sql['drop__CRM_PROCES_GOTO_CACHE']="drop table if exists _CRM_PROCES_GOTO_CACHE;";
  403. $sql_tmp['select_CRM_PROCES_GOTO_CACHE']="select t1.ID,t1.ID_PROCES_INIT,t2.IF_TRUE_GOTO , t2.IF_TRUE_GOTO_FLAG, now() as TIMESTAMP
  404. from _CRM_PROCES_STATS_proc_wiev t1
  405. inner join CRM_PROCES as t2 on ( t1.ID=t2.ID and t2.IF_TRUE_GOTO>0 and t2.IF_TRUE_GOTO_FLAG='GOTO_AND_RETURN' )
  406. -- inner join CRM_PROCES as t3 on ( t2.IF_TRUE_GOTO=t3.ID and t2.IF_TRUE_GOTO>0 and t2.IF_TRUE_GOTO_FLAG='GOTO_AND_RETURN' ) TODO@2014-09-04 trzeba rekursywnie podlapac wzajemne powiazania
  407. where t1.ID_PROCES_INIT>0
  408. ";
  409. $sql['create__CRM_PROCES_GOTO_CACHE']="create table _CRM_PROCES_GOTO_CACHE ".$sql_tmp['select_CRM_PROCES_GOTO_CACHE'] ;
  410. $sql['alter__CRM_PROCES_GOTO_CACHE_ID']="alter table _CRM_PROCES_GOTO_CACHE add index(ID)" ;
  411. $sql['alter__CRM_PROCES_GOTO_CACHE_ID_PROCES_INIT_type']="alter table _CRM_PROCES_GOTO_CACHE modify ID_PROCES_INIT int(11)" ;
  412. $sql['alter__CRM_PROCES_GOTO_CACHE_ID_PROCES_INIT']="alter table _CRM_PROCES_GOTO_CACHE add index(ID_PROCES_INIT)" ;
  413. $sql['alter__CRM_PROCES_GOTO_CACHE_IF_TRUE_GOTO']="alter table _CRM_PROCES_GOTO_CACHE add index(IF_TRUE_GOTO)" ;
  414. $sql['event_delete_CRM_PROCES_GOTO_CACHE']="drop event if exists _CRM_PROCES_GOTO_CACHE_event";
  415. $sql['event_create_CRM_PROCES_GOTO_CACHE']="CREATE DEFINER=root@localhost EVENT _CRM_PROCES_GOTO_CACHE_event
  416. ON SCHEDULE EVERY 1 DAY
  417. STARTS str_to_date( date_format(now(), '%Y%m%d 0500'), '%Y%m%d %H%i' ) + INTERVAL 1 DAY
  418. DO
  419. BEGIN
  420. SET SESSION TRANSACTION ISOLATION LEVEL READ UNCOMMITTED ;
  421. truncate table _CRM_PROCES_INIT_STATS;
  422. replace into _CRM_PROCES_INIT_STATS ".$sql_tmp['select_CRM_PROCES_GOTO_CACHE']." ;
  423. END
  424. ";
  425. $sql['drop__CRM_PROCES_STATS']="drop table if exists _CRM_PROCES_STATS ;";
  426. $sql_tmp['select__CRM_PROCES_STATS']="select t1.ID , t2.ID_PROCES_INIT , count(t1.ID) as CSteps
  427. , (select count(ID) from CRM_IMAGE where REMOTE_TABLE='CRM_PROCES' and REMOTE_ID=t1.ID and A_STATUS!='DELETED' ) as CPics
  428. , (select count(ID) from CRM_PROCES_HIST where ID_USERS2=t1.ID ) as CProcEdits
  429. , (select count(ID) from CRM_WSKAZNIK where ID_PROCES=t1.ID and A_STATUS!='DELETED') as CRes
  430. , (select count(cwh.ID) from CRM_WSKAZNIK_HIST cwh left join CRM_WSKAZNIK as cw on cwh.ID_USERS2=cw.ID where cw.ID_PROCES=t1.ID ) as CResorEdits
  431. , (select count(ctph.ID) from CRM_TESTY_PYTANIA_HIST as ctph left join CRM_TESTY_PYTANIA as ctp on ctp.ID=ctph.ID_USERS2 where ctp.ID_PROCES=t1.ID ) as CQuestEdits
  432. , (select count(ci.ID) from CRM_IMAGE ci left join CRM_WSKAZNIK as cw on ci.REMOTE_ID=cw.ID and ci.REMOTE_TABLE='CRM_WSKAZNIK' where cw.ID_PROCES=t1.ID ) as CResPics
  433. , (select count(ci.ID) from CRM_IMAGE ci left join CRM_WSKAZNIK as cw on ci.REMOTE_ID=cw.ID_ZASOB and ci.REMOTE_TABLE='CRM_LISTA_ZASOBOW' where cw.ID_PROCES=t1.ID ) as CResPicsS
  434. , (select count(ID) from CRM_TESTY_PYTANIA where ID_PROCES=t1.ID ) as CQuest
  435. , (select count(ID) from CRM_TESTY_PYTANIA where ID_PROCES=t1.ID and TEST_TYPE='TEORETYCZNY' ) as CQuestTeor
  436. , (select count(ID) from CRM_TESTY_PYTANIA where ID_PROCES=t1.ID and TEST_TYPE='PRAKTYCZNY' ) as CQuestPract -- pytania praktyczne
  437. , (select count(cto.ID) from CRM_TESTY_ODPOWIEDZI as cto left join CRM_TESTY_PYTANIA as ctp on cto.ID_PYTANIE=ctp.ID where ctp.ID_PROCES=t1.ID ) as CQRes -- udzielono odpowiedzi
  438. , (select count(cto.ID) from CRM_TESTY_ODPOWIEDZI as cto left join CRM_TESTY_PYTANIA as ctp on cto.ID_PYTANIE=ctp.ID where ctp.ID_PROCES=t1.ID and ctp.TEST_TYPE='PRAKTYCZNY' ) as CQPRes -- udzielono odpowiedzi praktycznych
  439. , (select count(cto.ID) from CRM_TESTY_ODPOWIEDZI as cto left join CRM_TESTY_PYTANIA as ctp on cto.ID_PYTANIE=ctp.ID where ctp.ID_PROCES=t1.ID and cto.OCENA<1 ) as CQErrRes -- udzielono slabych odpowiedzi
  440. , (select count(distinct(au.ID)) from ADMIN_USERS as au left join CRM_AUTH_PROFILE as cap on au.ID=cap.REMOTE_ID and
  441. cap.REMOTE_TABLE='ADMIN_USERS' and cap.A_STATUS!='DELETED' left join CRM_WSKAZNIK as cw on cap.ID_ZASOB=cw.ID_ZASOB and cw.A_STATUS!='DELETED' where cw.ID_PROCES=t1.ID and au.A_STATUS='NORMAL' ) as CWorkers -- pracownikow aktualnie wykonujacych proces - blad w strukturach ADMIN_USERS statusy WAITING
  442. -- , (select count(distinct(au.ID)) from ADMIN_USERS as au
  443. -- left join CRM_AUTH_PROFILE as cap on au.ID=cap.REMOTE_ID and cap.REMOTE_TABLE='ADMIN_USERS' and cap.A_STATUS!='DELETED'
  444. -- left join CRM_WSKAZNIK as cw on cap.ID_ZASOB=cw.ID_ZASOB and cw.A_STATUS!='DELETED'
  445. -- left join CRM_TESTY_ODPOWIEDZI as cto on cto.A_RECORD_CREATE_AUTHOR=au.ADM_ACCOUNT
  446. -- left join CRM_TESTY_PYTANIA as ctp on ctp.ID=cto.ID_PYTANIE
  447. -- left join _CRM_PROCES_STATS_proc_wiev as cps on cps.ID=cw.ID_PROCES
  448. -- where cw.ID_PROCES=cps.ID and au.A_STATUS='NORMAL' and ctp.ID_PROCES=t1.ID and cps.ID_PROCES_INIT=t1.ID ) as CQAWorkers -- pracownikow ktorzy maja aktualny proces
  449. , (select count(distinct(cto.ID)) from CRM_TESTY_ODPOWIEDZI as cto left join CRM_TESTY_PYTANIA as ctp on cto.ID_PYTANIE=ctp.ID
  450. left join CRM_WSKAZNIK as cw on cw.ID_PROCES=ctp.ID_PROCES
  451. left join _CRM_PROCES_STATS_proc_wiev as cps on cps.ID=cw.ID_PROCES
  452. left join CRM_WSKAZNIK as cw1 on cw1.ID_PROCES=cps.ID_PROCES_INIT
  453. left join CRM_AUTH_PROFILE as cap on cap.ID_ZASOB=cw1.ID_ZASOB
  454. left join ADMIN_USERS as au on au.ID=cap.REMOTE_ID and cap.REMOTE_TABLE='ADMIN_USERS' and au.A_STATUS='NORMAL'
  455. where cw.ID_PROCES = t1.ID and au.ADM_ACCOUNT=cto.A_RECORD_CREATE_AUTHOR and cto.OCENA>1 and ctp.TEST_TYPE='TEORETYCZNY') as CQTAnsOk -- pracownicy ktorzy sa przyporzadkowani do procesow ile udzielili odpowiedzi
  456. , (select count(distinct(cto.ID)) from CRM_TESTY_ODPOWIEDZI as cto left join CRM_TESTY_PYTANIA as ctp on cto.ID_PYTANIE=ctp.ID
  457. left join CRM_WSKAZNIK as cw on cw.ID_PROCES=ctp.ID_PROCES
  458. left join _CRM_PROCES_STATS_proc_wiev as cps on cps.ID=cw.ID_PROCES
  459. left join CRM_WSKAZNIK as cw1 on cw1.ID_PROCES=cps.ID_PROCES_INIT
  460. left join CRM_AUTH_PROFILE as cap on cap.ID_ZASOB=cw1.ID_ZASOB
  461. left join ADMIN_USERS as au on au.ID=cap.REMOTE_ID and cap.REMOTE_TABLE='ADMIN_USERS' and au.A_STATUS='NORMAL'
  462. where cw.ID_PROCES = t1.ID and au.ADM_ACCOUNT=cto.A_RECORD_CREATE_AUTHOR and cto.OCENA>1 and ctp.TEST_TYPE='PRAKTYCZNY') as CQPWAnsOk -- pracownicy ktorzy sa przyporzadkowani do procesow ile udzielili odpowiedzi
  463. , (select count(distinct(cto.ID)) from CRM_TESTY_ODPOWIEDZI as cto left join CRM_TESTY_PYTANIA as ctp on cto.ID_PYTANIE=ctp.ID
  464. left join CRM_WSKAZNIK as cw on cw.ID_PROCES=ctp.ID_PROCES
  465. left join _CRM_PROCES_STATS_proc_wiev as cps on cps.ID=cw.ID_PROCES
  466. left join CRM_WSKAZNIK as cw1 on cw1.ID_PROCES=cps.ID_PROCES_INIT
  467. left join CRM_AUTH_PROFILE as cap on cap.ID_ZASOB=cw1.ID_ZASOB
  468. left join ADMIN_USERS as au on au.ID=cap.REMOTE_ID and cap.REMOTE_TABLE='ADMIN_USERS'
  469. where cw.ID_PROCES = t1.ID and au.ADM_ACCOUNT=cto.A_RECORD_CREATE_AUTHOR and cto.OCENA>1 and ctp.TEST_TYPE='PRAKTYCZNY') as CQPAnsOk -- pracownicy ktorzy sa przyporzadkowani do procesow ile udzielili odpowiedzi praktycznych
  470. , (select min(A_RECORD_CREATE_DATE) from CRM_WSKAZNIK where ID_PROCES=t1.ID and A_STATUS!='DELETED') as MinResCreDate
  471. , (select max(A_RECORD_UPDATE_DATE) from CRM_WSKAZNIK where ID_PROCES=t1.ID and A_STATUS!='DELETED') as MaxResUpdDate
  472. , (select min(A_RECORD_CREATE_DATE) from CRM_PROCES where ID=t1.ID and A_STATUS!='DELETED') as MinProcCreDate
  473. , (select max(A_RECORD_UPDATE_DATE) from CRM_PROCES where ID=t1.ID and A_STATUS!='DELETED') as MaxProcUpdDate
  474. from
  475. _CRM_PROCES_STATS_proc_wiev as t2 join CRM_PROCES as t1 on t1.ID=t2.ID
  476. -- where t2.ID_PROCES_INIT=994
  477. -- group by t2.ID_PROCES_INIT
  478. group by t1.ID
  479. order by t1.A_RECORD_UPDATE_DATE desc";
  480. $sql['create__CRM_PROCES_STATS']="create table _CRM_PROCES_STATS
  481. ".$sql_tmp['select__CRM_PROCES_STATS'] ;
  482. $sql['alter__CRM_PROCES_STATS_unique_id']="alter table _CRM_PROCES_STATS add unique(ID)";
  483. $sql['drop__CRM_PROCES_INIT_STATS']="drop table if exists _CRM_PROCES_INIT_STATS";
  484. $sql_tmp['select_CRM_PROCES_INIT_STATS']="select t1.ID_PROCES_INIT as ID,left(t2.`DESC`,100) as `DESC`,t3.path, t3.lvl,sum(CSteps) as SCSteps,sum(CPics) as SCPics ,sum(CProcEdits+CResorEdits) as SCPREdits,
  485. sum(CQuestEdits) as SCQuestEdits,sum(CResPics) as SCResPics , sum(CResPicsS) as SCResPicsS,sum(CQuest) as SCQuest,sum(CQuestPract) as SCQuestPract,
  486. sum(CQRes) as SCQRes,sum(CQPRes) as SCQPRes,sum(CQErrRes) as CQErrRes,sum(CWorkers) as SCWorkers,sum(CQTAnsOk) as SCQTAnsOk,sum(CQPWAnsOk) as CQPWAnsOk, sum(CQPAnsOk) as SCQPAnsOk
  487. ,(select count(ID) from CRM_TESTY where ID_PROCES_INIT=t1.ID_PROCES_INIT and TEST_TYPE='TEORETYCZNY') as STestTeor
  488. ,(select count(ID) from CRM_TESTY where ID_PROCES_INIT=t1.ID_PROCES_INIT and TEST_TYPE='PRAKTYCNZY') as STestPrakt
  489. ,(select avg(OCENA) from CRM_TESTY where ID_PROCES_INIT=t1.ID_PROCES_INIT) as AvgMark
  490. ,(select avg(DISCOUNT) from CRM_TESTY where ID_PROCES_INIT=t1.ID_PROCES_INIT) as AvgDiscount
  491. ,min(MinProcCreDate) as MinProcCreDate , max(MaxProcUpdDate) as MaxProcUpdDate
  492. -- todo lista osob ktora powinna zdac test teoretyczny i taka sama praktyczny wyliczana w oparciu o to czy sa testy i ile jest stanowisk
  493. , (
  494. select if ((select sum(CQuestTeor) from _CRM_PROCES_STATS where ID_PROCES_INIT=t1.ID_PROCES_INIT)>0,
  495. concat('brak:',sum(if(ct.ID<1 or ct.ID is null ,1,0)),'/popraw:' ,
  496. sum(if(ct.OCENA > 0 and ct.OCENA<2.5,1,0)) ) ,0) from ADMIN_USERS as au
  497. left join CRM_AUTH_PROFILE as cap on cap.REMOTE_ID=au.ID and cap.REMOTE_TABLE='ADMIN_USERS' and cap.A_STATUS in ('NORMAL','WAITING')
  498. left join CRM_WSKAZNIK as cw on cw.ID_ZASOB=cap.ID_ZASOB
  499. left join CRM_TESTY as ct on ct.ID_PROCES_INIT=cw.ID_PROCES and ct.ID_TESTER=au.ID and ct.TEST_TYPE='TEORETYCZNY'
  500. where au.A_STATUS='NORMAL' and cw.ID_PROCES=t1.ID_PROCES_INIT
  501. ) as CTTWinfo
  502. , (
  503. select if ((select sum(CQuestTeor) from _CRM_PROCES_STATS where ID_PROCES_INIT=t1.ID_PROCES_INIT)>0,
  504. concat('brak:',sum(if(ct.ID<1 or ct.ID is null ,1,0)),'/popraw:' ,
  505. sum(if(ct.OCENA > 0 and ct.OCENA<2.5,1,0)) ) ,0) from ADMIN_USERS as au
  506. left join CRM_AUTH_PROFILE as cap on cap.REMOTE_ID=au.ID and cap.REMOTE_TABLE='ADMIN_USERS' and cap.A_STATUS in ('NORMAL','WAITING')
  507. left join CRM_WSKAZNIK as cw on cw.ID_ZASOB=cap.ID_ZASOB
  508. left join CRM_TESTY as ct on ct.ID_PROCES_INIT=cw.ID_PROCES and ct.ID_TESTER=au.ID and ct.TEST_TYPE='PRAKTYCZNY'
  509. where au.A_STATUS='NORMAL' and cw.ID_PROCES=t1.ID_PROCES_INIT
  510. ) as CTPWinfo
  511. , '' as A_ADM_COMPANY, '' as A_CLASSIFIED
  512. from _CRM_PROCES_STATS as t1
  513. left join CRM_PROCES as t2 on t1.ID_PROCES_INIT=t2.ID
  514. left join _CRM_PROCES_STATS_proc_wiev as t3 on t3.ID=t1.ID_PROCES_INIT
  515. group by t1.ID_PROCES_INIT
  516. ";
  517. $sql['create__CRM_PROCES_INIT_STATS']="create table _CRM_PROCES_INIT_STATS ".$sql_tmp['select_CRM_PROCES_INIT_STATS'];
  518. $sql['alter__CRM_PROCES_INIT_STATS_mod_id']="alter table _CRM_PROCES_INIT_STATS modify ID int(11)";
  519. $sql['alter__CRM_PROCES_INIT_STATS_add_uniq']="alter table _CRM_PROCES_INIT_STATS add unique(ID)";
  520. $sql['alter__CRM_PROCES_INIT_STATS_SCPREdits']="alter table `_CRM_PROCES_INIT_STATS` CHANGE `SCPREdits` `SCPREdits` decimal(42,0)";
  521. $sql['event_delete_CRM_PROCES_INIT_STATS']="drop event if exists _CRM_PROCES_INIT_STATS_event";
  522. $sql['event_create_CRM_PROCES_INIT_STATS']="CREATE DEFINER=root@localhost EVENT _CRM_PROCES_INIT_STATS_event
  523. ON SCHEDULE EVERY 1 DAY
  524. STARTS str_to_date( date_format(now(), '%Y%m%d 0500'), '%Y%m%d %H%i' ) + INTERVAL 1 DAY
  525. DO
  526. BEGIN
  527. SET SESSION TRANSACTION ISOLATION LEVEL READ UNCOMMITTED ;
  528. replace into _CRM_PROCES_INIT_STATS ".$sql_tmp['select_CRM_PROCES_INIT_STATS']." ;
  529. END
  530. ";
  531. $sql['event_delete_CRM_PROCES_STATS']="drop event if exists _CRM_PROCES_STATS_event";
  532. $sql['event_create_CRM_PROCES_STATS']="CREATE DEFINER=root@localhost EVENT _CRM_PROCES_STATS_event
  533. ON SCHEDULE EVERY 1 DAY
  534. STARTS str_to_date( date_format(now(), '%Y%m%d 0500'), '%Y%m%d %H%i' ) + INTERVAL 1 DAY
  535. DO
  536. BEGIN
  537. SET SESSION TRANSACTION ISOLATION LEVEL READ UNCOMMITTED ;
  538. replace into _CRM_PROCES_STATS ".$sql_tmp['select__CRM_PROCES_STATS']." ;
  539. END
  540. ";
  541. /*
  542. -- stworzenie tabeli do planowania harmonogramow testow i szkolen
  543. -- proponuje widok!
  544. -- drop table if exists _CRM_PROCES_USER_STATS;
  545. -- create table _CRM_PROCES_USER_STATS
  546. -- DROP VIEW _CRM_PROCES_USER_STATS_wiev;
  547. */
  548. $sql['drop_CRM_LISTA_ZASOBOW_tree_detect_kierownik']="drop function if exists CRM_LISTA_ZASOBOW_tree_detect_kierownik";
  549. $sql['create_CRM_LISTA_ZASOBOW_tree_detect_kierownik']="CREATE DEFINER=`root`@`localhost` FUNCTION `CRM_LISTA_ZASOBOW_tree_detect_kierownik`(`node` INT) RETURNS text CHARSET latin2
  550. READS SQL DATA
  551. BEGIN
  552. DECLARE _path INT;
  553. DECLARE _type CHAR(255);
  554. DECLARE _cpath TEXT;
  555. DECLARE _id INT;
  556. DECLARE _id_cur INT;
  557. DECLARE _group_name CHAR(255);
  558. DECLARE EXIT HANDLER FOR NOT FOUND RETURN _group_name;
  559. SET _id = COALESCE(node, @id);
  560. SELECT NAME from LDAP_GROUPS where ID=node
  561. INTO _group_name;
  562. label1: LOOP
  563. SELECT t1.PARENT_ID,t1.TYPE,t1.ID
  564. INTO _id,_type,_id_cur
  565. FROM CRM_LISTA_ZASOBOW t1
  566. WHERE t1.id = _id
  567. -- AND COALESCE(id <> @start_with, TRUE);
  568. ;
  569. if _type = 'STANOWISKO' and node!=_id_cur THEN
  570. SET _path = _id_cur;
  571. SELECT NAME from LDAP_GROUPS where ID=_id_cur
  572. INTO _group_name;
  573. RETURN _group_name;
  574. LEAVE label1;
  575. END IF;
  576. END LOOP label1;
  577. END";
  578. $sql['replace__CRM_PROCES_USER_STATS_wiev_to_group']="create or replace definer=`root`@`localhost` view _CRM_PROCES_USER_STATS_wiev_to_group as
  579. select concat(au.ID,cw.ID,0) as ID,cps.ID as ID_PROCES , left(cps.`DESC`,50) as `DESC`
  580. ,au.ADM_ACCOUNT
  581. ,cps.path
  582. , 'TEORETYCZNY' as TEST_TYPE,cps.SCQuest , max(ct.OCENA) as OCENA , max(ct.TEST_END) as TEST_END
  583. -- , max(if(ct.TEST_TYPE='TEORETYCZNY',ct.OCENA,NULL)) as OCENA_T
  584. -- , max(if(ct.TEST_TYPE='PRAKTYCZNY',ct.OCENA,NULL)) as OCENA_P
  585. , au.EMPLOYEE_TYPE , au.A_RECORD_CREATE_DATE, au.A_RECORD_UPDATE_DATE , au.L_APPOITMENT_DATE, au.L_APPOITMENT_INFO, au.L_APPOITMENT_USER
  586. from ADMIN_USERS as au
  587. left join CRM_AUTH_PROFILE as cap on cap.REMOTE_ID=au.ID and cap.REMOTE_TABLE='ADMIN_USERS' and cap.A_STATUS in ('NORMAL','WAITING')
  588. left join CRM_WSKAZNIK as cw on cw.ID_ZASOB=cap.ID_ZASOB and cw.A_STATUS in ('NORMAL','WAITING')
  589. left join CRM_TESTY as ct on ct.ID_PROCES_INIT=cw.ID_PROCES and ct.ID_TESTER=au.ID and ct.TEST_TYPE='TEORETYCZNY'
  590. left join _CRM_PROCES_INIT_STATS as cps on cps.ID=cw.ID_PROCES
  591. where au.A_STATUS='NORMAL'
  592. and cps.SCQuest>0
  593. group by au.ID, cps.ID
  594. -- order by ct.OCENA desc
  595. -- limit 10
  596. -- dodatkowe GOTO_AND_RETURN
  597. union
  598. select concat(au.ID,cw.ID,1) as ID,cps.ID as ID_PROCES , left(cps.`DESC`,50) as `DESC`
  599. ,au.ADM_ACCOUNT
  600. ,cps.path
  601. , 'TEORETYCZNY' as TEST_TYPE,cps.SCQuest , max(ct.OCENA) as OCENA , max(ct.TEST_END) as TEST_END
  602. -- , max(if(ct.TEST_TYPE='TEORETYCZNY',ct.OCENA,NULL)) as OCENA_T
  603. -- , max(if(ct.TEST_TYPE='PRAKTYCZNY',ct.OCENA,NULL)) as OCENA_P
  604. , au.EMPLOYEE_TYPE , au.A_RECORD_CREATE_DATE, au.A_RECORD_UPDATE_DATE , au.L_APPOITMENT_DATE, au.L_APPOITMENT_INFO, au.L_APPOITMENT_USER
  605. from ADMIN_USERS as au
  606. left join CRM_AUTH_PROFILE as cap on cap.REMOTE_ID=au.ID and cap.REMOTE_TABLE='ADMIN_USERS' and cap.A_STATUS in ('NORMAL','WAITING')
  607. left join CRM_WSKAZNIK as cw on cw.ID_ZASOB=cap.ID_ZASOB and cw.A_STATUS in ('NORMAL','WAITING')
  608. left join _CRM_PROCES_GOTO_CACHE as cpgc on cpgc.ID_PROCES_INIT=cw.ID_PROCES
  609. left join CRM_TESTY as ct on ct.ID_PROCES_INIT=cpgc.IF_TRUE_GOTO and ct.ID_TESTER=au.ID and ct.TEST_TYPE='TEORETYCZNY'
  610. left join _CRM_PROCES_INIT_STATS as cps on cps.ID=cpgc.IF_TRUE_GOTO
  611. where au.A_STATUS='NORMAL'
  612. and cps.SCQuest>0
  613. group by au.ID, cps.ID
  614. union
  615. select concat(au.ID,cw.ID,2) as ID, cps.ID as ID_PROCES , left(cps.`DESC`,50) as `DESC`
  616. ,au.ADM_ACCOUNT
  617. ,cps.path
  618. , 'PRAKTYCZNY' as TEST_TYPE, cps.SCQuestPract , max(ct.OCENA) as OCENA, max(ct.TEST_END) as TEST_END
  619. , au.EMPLOYEE_TYPE , au.A_RECORD_CREATE_DATE, au.A_RECORD_UPDATE_DATE , au.L_APPOITMENT_DATE, au.L_APPOITMENT_INFO, au.L_APPOITMENT_USER
  620. from ADMIN_USERS as au
  621. left join CRM_AUTH_PROFILE as cap on cap.REMOTE_ID=au.ID and cap.REMOTE_TABLE='ADMIN_USERS' and cap.A_STATUS in ('NORMAL','WAITING')
  622. left join CRM_WSKAZNIK as cw on cw.ID_ZASOB=cap.ID_ZASOB and cw.A_STATUS in ('NORMAL','WAITING')
  623. left join CRM_TESTY as ct on ct.ID_PROCES_INIT=cw.ID_PROCES and ct.ID_TESTER=au.ID and ct.TEST_TYPE='PRAKTYCZNY'
  624. left join _CRM_PROCES_INIT_STATS as cps on cps.ID=cw.ID_PROCES
  625. where au.A_STATUS='NORMAL'
  626. and cps.SCQuestPract>0
  627. group by au.ID,cps.ID
  628. -- dodatkowe GOTO_AND_RETURN
  629. union
  630. select concat(au.ID,cw.ID,3) as ID, cps.ID as ID_PROCES , left(cps.`DESC`,50) as `DESC`
  631. ,au.ADM_ACCOUNT
  632. ,cps.path
  633. , 'PRAKTYCZNY' as TEST_TYPE, cps.SCQuestPract , max(ct.OCENA) as OCENA, max(ct.TEST_END) as TEST_END
  634. , au.EMPLOYEE_TYPE, au.A_RECORD_CREATE_DATE, au.A_RECORD_UPDATE_DATE , au.L_APPOITMENT_DATE, au.L_APPOITMENT_INFO, au.L_APPOITMENT_USER
  635. from ADMIN_USERS as au
  636. left join CRM_AUTH_PROFILE as cap on cap.REMOTE_ID=au.ID and cap.REMOTE_TABLE='ADMIN_USERS' and cap.A_STATUS in ('NORMAL','WAITING')
  637. left join CRM_WSKAZNIK as cw on cw.ID_ZASOB=cap.ID_ZASOB and cw.A_STATUS in ('NORMAL','WAITING')
  638. left join _CRM_PROCES_GOTO_CACHE as cpgc on cpgc.ID_PROCES_INIT=cw.ID_PROCES
  639. left join CRM_TESTY as ct on ct.ID_PROCES_INIT=cpgc.IF_TRUE_GOTO and ct.ID_TESTER=au.ID and ct.TEST_TYPE='PRAKTYCZNY'
  640. left join _CRM_PROCES_INIT_STATS as cps on cps.ID=cpgc.IF_TRUE_GOTO
  641. where au.A_STATUS='NORMAL'
  642. and cps.SCQuestPract>0
  643. group by au.ID,cps.ID
  644. ";
  645. $sql['replace__CRM_PROCES_USER_STATS_wiev']="create or replace definer=`root`@`localhost` view _CRM_PROCES_USER_STATS_wiev as
  646. select ID,ID_PROCES, `DESC`, ADM_ACCOUNT, EMPLOYEE_TYPE,A_RECORD_CREATE_DATE, A_RECORD_UPDATE_DATE ,L_APPOITMENT_DATE,L_APPOITMENT_INFO, L_APPOITMENT_USER, path,TEST_TYPE,SCQuest,OCENA,TEST_END
  647. from _CRM_PROCES_USER_STATS_wiev_to_group
  648. group by ADM_ACCOUNT,ID_PROCES,TEST_TYPE ";
  649. $sql['event_drop_CRM_PROCES_USER_OCENA_OKRES']="drop event if exists CRM_PROCES_USER_OCENA_OKRES_event ";
  650. $sql['event_create_CRM_PROCES_USER_OCENA_OKRES']=" CREATE DEFINER=root@localhost EVENT CRM_PROCES_USER_OCENA_OKRES_event
  651. ON SCHEDULE EVERY 1 DAY
  652. STARTS str_to_date( date_format(now(), '%Y%m%d 0600'), '%Y%m%d %H%i' ) + INTERVAL 1 DAY
  653. DO
  654. BEGIN
  655. SET SESSION TRANSACTION ISOLATION LEVEL READ UNCOMMITTED ;
  656. insert ignore into CRM_PROCES_USER_OCENA_OKRES (ID,CW_ID,DATE,ID_PROCES,`DESC`,OPIS_ZASOB,L_APPOITMENT_USER,A_CLASSIFIED,A_ADM_COMPANY,FUNCTION)
  657. select '', group_concat(cw.ID) as CW_ID , now() ,cps.ID as ID_PROCES , left(cps.`DESC`,200) as `DESC` , group_concat(cw.`OPIS_ZASOB`) as OPIS_ZASOB
  658. ,au.ADM_ACCOUNT ,CRM_LISTA_ZASOBOW_tree_detect_kierownik(cw.ID_ZASOB),CRM_LISTA_ZASOBOW_tree_detect_kierownik(cw.ID_ZASOB),concat('[',cz.ID,'] ',cz.`DESC`)
  659. from ADMIN_USERS as au
  660. left join CRM_AUTH_PROFILE as cap on cap.REMOTE_ID=au.ID and cap.REMOTE_TABLE='ADMIN_USERS' and cap.A_STATUS in ('NORMAL','WAITING') and cap.SHOW_IN_PERIOD_MARK!='NO'
  661. left join CRM_WSKAZNIK as cw on cw.ID_ZASOB=cap.ID_ZASOB and cw.A_STATUS in ('NORMAL','WAITING')
  662. left join CRM_LISTA_ZASOBOW as cz on cz.ID=cw.ID_ZASOB
  663. -- left join CRM_TESTY as ct on ct.ID_PROCES_INIT=cw.ID_PROCES and ct.ID_TESTER=au.ID and ct.TEST_TYPE='TEORETYCZNY'
  664. left join _CRM_PROCES_INIT_STATS as cps on cps.ID=cw.ID_PROCES
  665. where au.A_STATUS='NORMAL' and cps.ID is not null
  666. -- and cps.SCQuest>0
  667. group by au.ID, cps.ID , cw.ID;
  668. END
  669. ";
  670. $sql['event_shedule_init']="SET GLOBAL event_scheduler = ON";
  671. foreach($sql as $ind=>$sql_) {
  672. DEBUG_S(-3,'wykonuje zapytanie sql dla '.$ind,$sql_,__FILE__,__FUNCTION__,__LINE__);
  673. if(!empty($DB)) {
  674. $DB->query($sql_) or die('Problem z zapytaniem '.mysql_error());
  675. } else {
  676. DB::query($sql_) or die('Problem z zapytaniem '.mysql_error());
  677. }
  678. }
  679. //-- alter table _CRM_PROCES_USER_STATS add unique(ID,TEST_TYPE,ADM_ACCOUNT);
  680. } //eof func
  681. ?>