main_new_version.php 45 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831
  1. <?php
  2. $max_ec = ini_get('max_execution_time'); //set max_excution_time
  3. ini_set('max_execution_time', '600');
  4. $memory_limit = "";
  5. $action = "";
  6. if (isset($_GET['action']))
  7. $action = strtolower($_GET['action']);
  8. if (isset($_POST['action']))
  9. $action = strtolower($_POST['action']);
  10. include "include.ini.php";
  11. include 'service/ocean_booking.class.php';
  12. include 'service/ocean_order.class.php';
  13. include 'service/operation_log.class.php';
  14. include 'service/search.class.php';
  15. include 'service/column.class.php';
  16. include 'service/ajax.class.php';
  17. include 'service/login.class.php';
  18. include 'service/tools.class.php';
  19. include 'service/robot.class.php';
  20. include 'service/AIClientFactory.php';
  21. //为了调用,临时做一个登录动作 如果是正式版 要注释掉菜单System Settings
  22. //$_POST['uname'] = "ra.admin";
  23. //$_POST['psw'] = common::excuteOneSql("select ra_password from public.ra_online_user where user_login = 'ra.admin'");
  24. // $name =strpos(common::ip(), "192.168.0.158") !== false || strpos(common::ip(), "192.168.0.161s") !== false ? "dddde" : 'ra.admin';
  25. // $_POST['uname'] = $name;
  26. // $_POST['psw'] = common::excuteOneSql("select ra_password from public.ra_online_user where user_login = '".$name."'");
  27. // login::getInstance()->do_login_auto();
  28. //验证路由权限
  29. common::securityCheckHandNew($action);
  30. if (_is_only_vgm()) {
  31. Header("Location:main.php?action=main");
  32. }
  33. error_log("--------------前端请求post参数---------------");
  34. error_log(utils::jsonFiltration("null", "\"\"", json_encode($_POST)));
  35. error_log("--------------前端请求get参数---------------");
  36. error_log(utils::jsonFiltration("null", "\"\"", json_encode($_GET)));
  37. //Operation log 日志记录
  38. utils::operation_log_records();
  39. switch ($action) {
  40. case 'ocean_booking':
  41. ocean_booking::getInstance()->ocean_booking();
  42. break;
  43. case 'ocean_order':
  44. ocean_order::getInstance()->ocean_order();
  45. break;
  46. case 'ajax':
  47. echo ajax::getInstance()->run();
  48. break;
  49. case 'opreation_log':
  50. echo operation_log::getInstance()->operation_log();
  51. break;
  52. case 'main':
  53. //如果在没有登录前,没有登录信息,指定用户
  54. if(!isset($_SESSION['ONLINE_USER'])){
  55. $menuList = array();
  56. $menuList[] = array("index"=>'1',"label"=>"Dashboard","icon"=>"icon_data_fill_b","path"=>"/dashboard");
  57. $menuList[] = array("index"=>'2',"label"=>"Booking","icon"=>"icon_booking__fill_b","path"=>"/booking");
  58. $menuList[] = array("index"=>'3',"label"=>"Tracking","icon"=>"icon_tracking__fill_b","path"=>"/tracking");
  59. } else {
  60. //d登录后,根据配置的权限,是否显示
  61. if (_isAdmin())
  62. $sql = "select f_column, min(menu_id) as menu_id, max(menu_icon_font) as menu_icon_font from public.ra_online_permission where has_new_version=true group by f_column order by min(order_by)";
  63. elseif (_isNewUser())
  64. $sql = "select f_column, min(menu_id) as menu_id, max(menu_icon_font) as menu_icon_font from public.ra_online_permission where has_new_version=true and customer_check = true group by f_column ORDER BY min(order_by)";
  65. else
  66. $sql = "select p.f_column, min(menu_id) as menu_id, max(menu_icon_font) as menu_icon_font from public.ra_online_user_permission up left join public.ra_online_permission p on up.p_id = p.id where has_new_version=true and lower(user_name) = '" . common::check_input(strtolower(_getLoginName())) . "' group by p.f_column ORDER BY min(p.order_by)";
  67. $rs = common::excuteListSql($sql);
  68. if (empty($rs) && _isApexLogin()) {
  69. $sql = "select f_column, min(menu_id) as menu_id, max(menu_icon_font) as menu_icon_font from public.ra_online_permission where has_new_version=true and default_check = true group by f_column ORDER BY min(order_by)";
  70. $rs = common::excuteListSql($sql);
  71. }
  72. $menuSetting = array("Ocean Booking" => array("label"=>"Booking","path"=>"/booking","icon"=>"icon_booking__fill_b"),
  73. "Ocean B/L Info." => array("label"=>"Tracking","path"=>"/tracking","icon"=>"icon_tracking__fill_b"));
  74. $menuList = array();
  75. $menuList[] = array("index"=>'1',"label"=>"Dashboard","icon"=>"icon_data_fill_b","path"=>"/dashboard");
  76. $index = 2;
  77. foreach ($rs as $value) {
  78. if ($value['f_column'] == "Shipment Info."){
  79. if (_isAdmin())
  80. $ll = common::excuteListSql("select s_column, url_action, sub_menu_id from public.ra_online_permission where has_new_version=true and f_column = '" . common::check_input($value['f_column']) . "' ORDER BY order_by");
  81. elseif (_isNewUser())
  82. $ll = common::excuteListSql("select s_column, url_action, sub_menu_id from public.ra_online_permission where has_new_version=true and customer_check = true and f_column = '" . common::check_input($value['f_column']) . "' ORDER BY order_by");
  83. else
  84. $ll = common::excuteListSql("select s_column, url_action, sub_menu_id from public.ra_online_permission p left join public.ra_online_user_permission gp on gp.p_id = p.id where has_new_version=true and f_column = '" . common::check_input($value['f_column']) . "' and lower(gp.user_name) = '" . common::check_input(strtolower(_getLoginName())) . "' ORDER BY p.order_by");
  85. if (empty($ll) && _isApexLogin()) {
  86. $ll = common::excuteListSql("select s_column, url_action, sub_menu_id from public.ra_online_permission where has_new_version=true and f_column = '" . common::check_input($value['f_column']) . "' and default_check = true ORDER BY order_by");
  87. }
  88. //单独拼接URL
  89. foreach ($ll as $v) {
  90. if($v['s_column'] =="Ocean Booking" || $v['s_column'] =="Ocean B/L Info."){
  91. $urlData = $menuSetting[$v['s_column']];
  92. $menuList[] = array("index"=>"$index","label"=>$urlData['label'],"icon"=>$urlData['icon'],"path"=>$urlData['path']);
  93. $index = $index + 1;
  94. }
  95. }
  96. }
  97. }
  98. // $menuList[] = array("index"=>$index,"label"=>"System Management","icon"=>"icon_system__management_fill_b","type"=>"list",
  99. // "children"=>array(array("index" =>$index.'-1',"label" =>"Operation Log","path"=>"/Operationlog")));
  100. $systemManagement = array("index"=>"$index","label"=>"System Management","icon"=>"icon_system__management_fill_b","type"=>"list");
  101. $children = array();
  102. $children[] = array("index" =>$index.'-1',"label" =>"System Message","path"=>"/system-message");
  103. $children[] = array("index" =>$index.'-2',"label" =>"System Settings","path"=>"/SystemSettings");
  104. //只有chud的账户可以看日志记录
  105. if(_getLoginName() == "chud" || _getLoginName() == "IT.Andywu" || _getLoginName() == "ra.admin"){
  106. $children[] = array("index" =>$index.'-3',"label" =>"Operation Log","path"=>"/Operationlog");
  107. //$children[] = array("index" =>$index.'-4',"label" =>"Prompt Configuration","path"=>"/PromptConfiguration");
  108. }
  109. $systemManagement["children"] = $children;
  110. if (!empty($children)){
  111. $menuList[] = $systemManagement;
  112. }
  113. }
  114. common::echo_json_encode(200, $menuList);
  115. exit();
  116. break;
  117. case 'main_filter':
  118. $data = common::getManagement();
  119. common::echo_json_encode(200, $data['dashboard_filter']);
  120. exit();
  121. break;
  122. case 'main_report':
  123. //分担查询
  124. include ONLINE_ROOT . 'libs' . DS . 'map_config.ini.php';
  125. //这里只剩下r3,r4的查询
  126. $type = $_REQUEST["r_type"];
  127. $sqlWhere = ' and ' . common::searchExtendHand_KLN("ocean", $_SESSION["ONLINE_USER"]);
  128. $sqlWhere = " " . $sqlWhere;
  129. $sqlWhere .= common::getDashboardTransportationSqlWhere();
  130. $sqlWhere = common::check_input($sqlWhere);
  131. // $list = common::excuteListSql("select * from public.online_order_status_date_kln_pending('$type'::text, '$sqlWhere'::text) "
  132. // . "r (c bigint, e integer, b integer, d text)");
  133. $sql = "select * from public.online_order_status_date_kln_pending('$type'::text, '$sqlWhere'::text) "
  134. . "r (c bigint, e integer, b integer, d text)";
  135. $list = $mapdb->GetAll($sql) or ( (!$mapdb->ErrorMsg()) or error_log(common::dbLog($mapdb, $sql), 0));
  136. $key = "[";
  137. $value = "[";
  138. $totalValue = 0;
  139. foreach ($list as $vv) {
  140. if ($key != "[") {
  141. $key .= ",";
  142. $value .= ",";
  143. }
  144. if ($type == "r2" || $type == "r3" || $type == "r4") {
  145. $key .= '"' . $vv["d"] . '"';
  146. $value .= '{"value":"' . $vv["c"] . '","name":"' . $vv["d"] . '" }';
  147. $totalValue = $totalValue + $vv["c"];
  148. } else {
  149. if ($vv["e"] == -1) {
  150. $key .= '"Over 80 Days"';
  151. $value .= '{"value":"' . $vv["c"] . '","name":"Over 80 Days"}';
  152. } else {
  153. $key .= '"' . $vv["b"] . '-' . $vv["e"] . ' Days"';
  154. $value .= '{"value":"' . $vv["c"] . '","name":"' . $vv["b"] . '-' . $vv["e"] . ' Days"}';
  155. }
  156. $totalValue = $totalValue + $vv["c"];
  157. }
  158. }
  159. $key .= "]";
  160. $value .= "]";
  161. //处理返回原表数据格式 r1 r3 r4的数据返回
  162. $data = common::mian_repot_do($value,$type,$totalValue);
  163. common::echo_json_encode(200, $data);
  164. exit();
  165. break;
  166. case 'main_report_etd':
  167. //分担查询
  168. include ONLINE_ROOT . 'libs' . DS . 'map_config.ini.php';
  169. //这里只有r1查询
  170. $type = "r1";
  171. $container_type = "";
  172. $date_type = strtolower($_REQUEST["date_type"]);
  173. if (empty($_REQUEST["date_start"])) {
  174. $bdate = "null";
  175. } else {
  176. $bdate = $_REQUEST["date_start"];
  177. $bdate = "'$bdate'";
  178. }
  179. if (empty($_REQUEST["date_end"])) {
  180. $edate = "null";
  181. } else {
  182. $edate = $_REQUEST["date_end"];
  183. $edate = "'$edate'";
  184. }
  185. $sqlWhere = ' and ' . common::searchExtendHand_KLN("ocean", $_SESSION["ONLINE_USER"]);
  186. $sqlWhere = " " . $sqlWhere;
  187. $sqlWhere = $sqlWhere . common::getDashboardTransportationSqlWhere();
  188. $sqlWhere = common::check_input($sqlWhere);
  189. // $list = common::excuteListSql("select * from public.online_order_status_date_kln_r1_r2('$type'::text, 'eta'::text, 'etd'::text, $bdate, $edate, '$sqlWhere'::text, '$container_type'::text,'$date_type'::text) "
  190. // . "r (c bigint, e integer, b integer, d text)");
  191. $sql = "select * from public.online_order_status_date_kln_r1_r2('$type'::text, 'eta'::text, 'etd'::text, $bdate, $edate, '$sqlWhere'::text, '$container_type'::text,'$date_type'::text) "
  192. . "r (c bigint, e integer, b integer, d text)";
  193. $list = $mapdb->GetAll($sql) or ( (!$mapdb->ErrorMsg()) or error_log(common::dbLog($mapdb, $sql), 0));
  194. $key = "[";
  195. $value = "[";
  196. $totalValue = 0;
  197. foreach ($list as $vv) {
  198. if ($key != "[") {
  199. $key .= ",";
  200. $value .= ",";
  201. }
  202. if ($type == "r2" || $type == "r3" || $type == "r4") {
  203. $key .= '"' . $vv["d"] . '"';
  204. $value .= '{"value":"' . $vv["c"] . '","name":"' . $vv["d"] . '" }';
  205. $totalValue = $totalValue + $vv["c"];
  206. } else {
  207. if ($vv["e"] == -1) {
  208. $key .= '"Over 80 Days"';
  209. $value .= '{"value":"' . $vv["c"] . '","name":"Over 80 Days"}';
  210. } else {
  211. $key .= '"' . $vv["b"] . '-' . $vv["e"] . ' Days"';
  212. $value .= '{"value":"' . $vv["c"] . '","name":"' . $vv["b"] . '-' . $vv["e"] . ' Days"}';
  213. }
  214. $totalValue = $totalValue + $vv["c"];
  215. }
  216. }
  217. $key .= "]";
  218. $value .= "]";
  219. //处理返回原表数据格式 r1 r3 r4的数据返回
  220. $data = common::mian_repot_do($value,$type,$totalValue);
  221. common::echo_json_encode(200, $data);
  222. exit();
  223. break;
  224. case 'main_report_kpi':
  225. //分担查询
  226. include ONLINE_ROOT . 'libs' . DS . 'map_config.ini.php';
  227. $type = $_REQUEST["r_type"];
  228. $sqlWhere = ' and ' . common::searchExtendHand_KLN("ocean", $_SESSION["ONLINE_USER"]);
  229. $sqlWhere = " " . $sqlWhere;
  230. $sqlWhere = $sqlWhere . common::getDashboardTransportationSqlWhere();
  231. $sqlWhere = common::check_input($sqlWhere);
  232. $date_type = strtolower($_REQUEST["date_type"]);
  233. if (isset($_REQUEST['date_start']) && !empty($_REQUEST['date_start']))
  234. $sqlWhere .= " and $date_type >= ''" . common::usDate2sqlDate($_REQUEST['date_start']) . " 00:00:00''";
  235. if (isset($_REQUEST['date_end']) && !empty($_REQUEST['date_end']))
  236. $sqlWhere .= " and $date_type <= ''" . common::usDate2sqlDate($_REQUEST['date_end']) . " 23:59:59''";
  237. // $list = common::excuteListSql("select * from public.online_order_status_date_kln_kpi('$type'::text,'$sqlWhere'::text) "
  238. // . "r (c bigint, d text)");
  239. $sql = "select * from public.online_order_status_date_kln_kpi('$type'::text,'$sqlWhere'::text) "
  240. . "r (c bigint, d text)";
  241. $list = $mapdb->GetAll($sql) or ( (!$mapdb->ErrorMsg()) or error_log(common::dbLog($mapdb, $sql), 0));
  242. $key = "[";
  243. $value = "[";
  244. $totalValue = 0;
  245. foreach ($list as $vv) {
  246. if ($key != "[") {
  247. $key .= ",";
  248. $value .= ",";
  249. }
  250. if ($type == "ata_r3" || $type == "atd_r4" ) {
  251. $key .= '"' . $vv["d"] .'"';
  252. $value .= '{"value":"' . $vv["c"] . '","name":"' . $vv["d"] .'"}';
  253. $totalValue = $totalValue + $vv["c"];
  254. }
  255. }
  256. $key .= "]";
  257. $value .= "]";
  258. //处理返回原表数据格式
  259. $ETDList = array();
  260. $value_arr = json_decode($value,true);
  261. foreach($value_arr as $arr){
  262. $color = common::getItemStyle($type,$arr['name']);
  263. if($arr['name'] == "0 Day"){
  264. $arr['name'] = "≤1 Day";
  265. }
  266. if($arr['name'] == "7 Days"){
  267. $arr['name'] = "≥7 Days";
  268. }
  269. $ETDList[] = array("value" =>intval($arr['value']),"name" =>$arr['name'],"itemStyle" =>array("color" =>$color));
  270. }
  271. // 排序依据的键数组(这里我们用一个数字数组来表示)
  272. $order = ["≤1 Day", "1-2 Days", "3-6 Days","≥7 Days"];
  273. $ETDList = utils::arrayOrderBykeys($order,$ETDList,"name");
  274. if($type == 'atd_r4'){
  275. $data = array("ETDList" =>$ETDList,"ETD_Radius"=>array('30%','50%'),"title1" =>"Departure","title2" =>"(ATD-ETD)","download_name" => "KPI Departure");
  276. }
  277. if($type == 'ata_r3'){
  278. $data = array("ETDList" =>$ETDList,"ETD_Radius"=>array('30%','50%'),"title1" =>"Arrival","title2" =>"(ATA-ETA)","download_name" => "KPI Arrival");
  279. }
  280. common::echo_json_encode(200, $data);
  281. exit();
  282. break;
  283. case 'main_report_container_bar':
  284. //新UI 20 40 45 3份数据同时查询,且是柱状图,所以与r3 r4查询分开
  285. $container_type ='';
  286. $ContainerCounSeries = array();
  287. $date_type = strtolower($_REQUEST["date_type"]);
  288. $type = $_REQUEST["r_type"];
  289. if (empty($_REQUEST["date_start"])) {
  290. $bdate = "null";
  291. } else {
  292. $bdate = $_REQUEST["date_start"];
  293. $bdate = "'$bdate'";
  294. }
  295. if (empty($_REQUEST["date_end"])) {
  296. $edate = "null";
  297. } else {
  298. $edate = $_REQUEST["date_end"];
  299. $edate = "'$edate'";
  300. }
  301. $list= array();
  302. $sqlWhere = ' and ' . common::searchExtendHandNew("ocean", $_SESSION["ONLINE_USER"]);
  303. $sqlWhere = common::check_input($sqlWhere);
  304. $sqlWhere = " " . $sqlWhere;
  305. //这个20 40 45都查询出来。否则值查询都对应的size,其他的不查询
  306. $value_arr = common::excuteListSql("select * from public.online_order_status_date_kln_r1_r2('$type'::text, 'eta'::text, 'etd'::text, $bdate, $edate, '$sqlWhere'::text, '$container_type'::text, '$date_type'::text) "
  307. . "r (month_group text, _20_rc numeric, _40_rc numeric, _45_rc numeric)");
  308. $key_arr = array();
  309. $container_type_arr = array("20","40","45");
  310. foreach($container_type_arr as $_container_type){
  311. $data = array();
  312. //每一个size 的所有月份总计
  313. $total = 0;
  314. //每一个size 对应的最大值
  315. $max = 0;
  316. foreach($value_arr as $arr){
  317. $data[] = intval($arr['_'.$_container_type.'_rc']);
  318. $total = $total + intval($arr['_'.$_container_type.'_rc']);
  319. $max = $max < intval($arr['_'.$_container_type.'_rc']) ? intval($arr['_'.$_container_type.'_rc']) : $max;
  320. if ($_container_type == '20'){
  321. $key_arr[] = $arr['month_group'];
  322. }
  323. }
  324. $ContainerCounSeries[$_container_type] = array("data"=>$data,"total"=>$total,"max"=>$max);
  325. }
  326. //处理返回时数据格式
  327. $ContainerCounSeries_return = array();
  328. //横坐标栏位
  329. $ContainerCount_Title = $key_arr;
  330. //所查的所有模式计算总和
  331. $total = 0;
  332. //所有size下的最大值,方便标注计算最长的Y坐标
  333. $max_all = 0;
  334. foreach($ContainerCounSeries as $k =>$v){
  335. //这个type 是页面传过来的。这个固定r2
  336. $color = common::getItemStyle($type,$k);
  337. $total = $total + $v['total'];
  338. $ContainerCounSeries_return[] = array("name"=>strval($k),"type"=>"bar","emphasis" => array("focus" =>"none"),
  339. "stack" =>"总计","data" =>$v['data'],"itemStyle" =>array("color" =>$color));
  340. $max_all = $max_all + $v['max'];
  341. }
  342. //计算Y坐标的间隔
  343. $interval = utils::calculateTicks(0,$max_all,5);
  344. if($interval == 0){
  345. //处理返回默认值
  346. $interval = 2;
  347. }
  348. $returnData = array("ContainerCount_Title"=>"Total: $total","ContainerCountList" =>$ContainerCount_Title,"ContainerCounSeries" =>$ContainerCounSeries_return,
  349. "min" => 0,"Max" =>$interval*5,"interval" =>$interval,"download_name" => "Container Count");
  350. //demo
  351. // $json = '{"code":200,"data":{"ContainerCount_Title":"Total: 463518","ContainerCountList":["OCT,23","NOV,23","DEC,23","JAN,24","FEB,24","MAR,24","APR,24","MAY,24","JUN,24","JUL,24","AUG,24","SEP,24","OCT,24"],"ContainerCounSeries":[{"name":"20","type":"bar","emphasis":{"focus":"none"},"stack":"\u603b\u8ba1","data":[4400,8600,8804,9271,8961,8793,8534,9476,9530,10277,10081,8997,5784],"itemStyle":{"color":"#FF7500"}},{"name":"40","type":"bar","emphasis":{"focus":"none"},"stack":"\u603b\u8ba1","data":[13652,28021,30422,30136,26320,27035,23979,26494,28406,33318,32318,30962,16369],"itemStyle":{"color":"#FFAC66"}},{"name":"45","type":"bar","emphasis":{"focus":"none"},"stack":"\u603b\u8ba1","data":[189,337,415,437,439,321,250,320,324,603,328,415,200],"itemStyle":{"color":"#FFE3CC"}}],"min":0,"Max":45000,"interval":9000}}';
  352. // $returnData = json_decode($json,true);
  353. // echo json_encode($returnData);
  354. // exit();
  355. common::echo_json_encode(200, $returnData);
  356. exit();
  357. break;
  358. case 'main_report_co2e_bar':
  359. $returnData = common::getCo2eBar();
  360. common::echo_json_encode(200, $returnData);
  361. exit();
  362. break;
  363. case 'main_report_top10_bar':
  364. $returnData = common::getTopBarNew();
  365. common::echo_json_encode(200, $returnData);
  366. exit();
  367. break;
  368. case 'main_report_revenue':
  369. $returnData = common::getRevenue();
  370. common::echo_json_encode(200, $returnData);
  371. exit();
  372. break;
  373. case 'main_map':
  374. $uncode = $_POST["uncode"];
  375. $serial_no = $_POST["serial_no"];
  376. $unall = explode("|", $uncode);
  377. $sql = "";
  378. if (!empty($unall[0]) && $unall[0] != "''") {
  379. $sql .= "select lon as lng, lat as lat, uncode, 'Place of receipt: '||name1 as location_namewo, 'por' as type from vessel.vt_unlocode where "
  380. . "lon<>0 and lat<>0 and lon is not null and lat is not null and uncode in "
  381. . "($unall[0])";
  382. }
  383. if (!empty($unall[1]) && $unall[1] != "''") {
  384. if (!empty($sql)) {
  385. $sql .= " union ";
  386. }
  387. $sql .= "select lon as lng, lat as lat, uncode, 'POL: '||name1 as location_namewo, 'pol' as type from vessel.vt_unlocode where "
  388. . "lon<>0 and lat<>0 and lon is not null and lat is not null and uncode in "
  389. . "($unall[1])";
  390. }
  391. if (!empty($unall[2]) && $unall[2] != "''") {
  392. if (!empty($sql)) {
  393. $sql .= " union ";
  394. }
  395. $sql .= "select lon as lng, lat as lat, uncode, 'POD: '||name1 as location_namewo, 'pod' as type from vessel.vt_unlocode where "
  396. . "lon<>0 and lat<>0 and lon is not null and lat is not null and uncode in "
  397. . "($unall[2])";
  398. }
  399. if (!empty($unall[3]) && $unall[3] != "''") {
  400. if (!empty($sql)) {
  401. $sql .= " union ";
  402. }
  403. $sql .= "select lon as lng, lat as lat, uncode, 'Place of delivery: '||name1 as location_namewo, 'poe' as type from vessel.vt_unlocode where "
  404. . "lon<>0 and lat<>0 and lon is not null and lat is not null and uncode in "
  405. . "($unall[3])";
  406. }
  407. $tkStatus = common::excuteListSql("select tl.by_pickup, g.consignee_exp, g.pickup_from_exp, c.ctnr, g.deliveryto_exp, g.serial_no, tl.location, tl.type, tl.id,
  408. to_char(tl.upload_time, 'MM/DD/YYYY HH24:MI:SS') as utime
  409. from public.tk_general g, public.tk_commodity c left join public.tk_location tl on c.serial_no=tl.serial_no
  410. where g.serial_no=c.serial_no and g.bol=(select m_bol from public.ocean where serial_no='$serial_no') order by tl.order_id");
  411. foreach ($tkStatus as $vv) {
  412. $ll = explode(",", $vv["location"]);
  413. if ($vv["by_pickup"] == "t") {
  414. $pf = explode("\r\n", $vv["pickup_from_exp"]);
  415. $pf = common::check_input($pf[0]) . "(" . $vv["ctnr"] . ")";
  416. $dt = explode("\r\n", $vv["consignee_exp"]);
  417. $dt = common::check_input($dt[0]) . "(" . $vv["ctnr"] . ")";
  418. } else {
  419. $pf = explode("\r\n", $vv["consignee_exp"]);
  420. $pf = common::check_input($pf[0]) . "(" . $vv["ctnr"] . ")";
  421. $dt = explode("\r\n", $vv["deliveryto_exp"]);
  422. $dt = common::check_input($dt[0]) . "(" . $vv["ctnr"] . ")";
  423. }
  424. if ($vv["type"] == "26" && !empty($ll[1])) {
  425. if (!empty($sql)) {
  426. $sql .= " union ";
  427. }
  428. $sql .= "select '" . $ll[1] . "' as lng, '" . $ll[0] . "' as lat, '" . $vv["ctnr"] . "' as uncode, 'Pick up: " . $vv["utime"] . "<br>'||'" . $pf . "' as location_namewo, 'pickup' as type";
  429. } elseif ($vv["type"] == "25" && !empty($ll[1])) {
  430. if (!empty($sql)) {
  431. $sql .= " union ";
  432. }
  433. $sql .= "select '" . $ll[1] . "' as lng, '" . $ll[0] . "' as lat, '" . $vv["ctnr"] . "' as uncode, 'Delivery: " . $vv["utime"] . "<br>'||'" . $dt . "' as location_namewo, 'delivery' as type";
  434. }
  435. }
  436. if (!empty($sql)) {
  437. $gps = common::excuteListSql($sql . "");
  438. }
  439. if (!empty($serial_no)) {
  440. $all = explode(",", $serial_no);
  441. foreach ($all as $a) {
  442. $rs = common::excuteOneSql("select public.get_vessel_position('$a'::text)");
  443. if (!empty($rs)) {
  444. $rss = explode("|", $rs);
  445. $lng_lat = explode(",", $rss[1]);
  446. $gps[] = array("lng" => $lng_lat[0], "lat" => $lng_lat[1], "uncode" => "", "location_namewo" => "", "type" => "vessel", "vessel_name" => $rss[2], "m_shipname" => "", "mmsi" => "", "imo" => "", "m_shipstate" => "", "m_shiptype" => "", "m_dest" => "", "m_newshiparrive" => "", "m_newlasttime" => "", "lasttime" => "", "sub" => "");
  447. }
  448. }
  449. }
  450. $data = array("gps" => $gps);
  451. common::echo_json_encode("200", $data);
  452. exit();
  453. break;
  454. case 'main_map_new':
  455. include ONLINE_ROOT . 'libs' . DS . 'map_config.ini.php';
  456. //修改添加port_of_transshipment 和port_of_transshipment_name的坐标获取(有为空的可能)
  457. $serial_no = $_REQUEST["serial_no"];
  458. $_schemas = $_REQUEST['_schemas'];
  459. if(empty($_schemas)){
  460. $_schemas ="public";
  461. }
  462. //$serial_no = "F41E6016-1A97-4C93-8198-53D8B3B26220";
  463. $transport_mode = common::excuteOneSql("SELECT transport_mode FROM public.kln_ocean ko
  464. WHERE ko.serial_no = '$serial_no' and order_from = '$_schemas'");
  465. if($transport_mode == "sea"){
  466. $sql = "with ss as (select '$serial_no' as sn)
  467. , aa as (
  468. select place_of_receipt_un, place_of_delivery_un, fport_of_loading_un, mport_of_discharge_un, port_of_loading, port_of_discharge, place_of_delivery_exp, place_of_receipt_exp,dd.*
  469. from public.kln_ocean oo
  470. left join LATERAL (
  471. select (select uncode from ports where code = o.port_of_transshipment) as port_of_transshipment_un,
  472. port_of_transshipment_name
  473. from $_schemas.ocean o where o.serial_no=oo.serial_no order by id desc limit 1
  474. ) dd on true
  475. where serial_no=(select sn from ss) limit 1
  476. )
  477. , rr as (
  478. select lon as lng, lat as lat, 'Origin' as label, port_of_loading as infor, 1 as sort, null::timestamp without time zone as stime, 'pol'::text as ptype
  479. from vessel.vt_unlocode, aa where (lat<=90 and lat>=-90) and (lon<=180 and lon>=-180) and lon is not null and lat is not null and uncode=fport_of_loading_un
  480. union all
  481. select lon as lng, lat as lat, 'Destination' as label, port_of_discharge as infor, 2 as sort, null::timestamp without time zone as stime, 'pod'::text as ptype
  482. from vessel.vt_unlocode, aa where (lat<=90 and lat>=-90) and (lon<=180 and lon>=-180) and lon is not null and lat is not null and uncode=mport_of_discharge_un
  483. union all
  484. select lon as lng, lat as lat, 'Transfer' as label, port_of_transshipment_name as infor, 3 as sort, null::timestamp without time zone as stime, 'poe'::text as ptype
  485. from vessel.vt_unlocode, aa where (lat<=90 and lat>=-90) and (lon<=180 and lon>=-180) and lon is not null and lat is not null and uncode=port_of_transshipment_un
  486. )
  487. select * from rr order by sort, stime";
  488. } elseif ($transport_mode == "air"){
  489. $sql = "with ss as (select '$serial_no' as sn)
  490. , aa as (
  491. select place_of_receipt_un, place_of_delivery_un, fport_of_loading_un, mport_of_discharge_un, port_of_loading, port_of_discharge, place_of_delivery_exp, place_of_receipt_exp
  492. from public.kln_ocean oo
  493. where serial_no=(select sn from ss) limit 1
  494. )
  495. , rr as (
  496. select lon as lng, lat as lat, 'Origin' as label, port_of_loading as infor, 1 as sort, null::timestamp without time zone as stime, 'pol'::text as ptype
  497. from vessel.vt_unlocode, aa where (lat<=90 and lat>=-90) and (lon<=180 and lon>=-180) and lon is not null and lat is not null and uncode=fport_of_loading_un
  498. union all
  499. select lon as lng, lat as lat, 'Destination' as label, port_of_discharge as infor, 2 as sort, null::timestamp without time zone as stime, 'pod'::text as ptype
  500. from vessel.vt_unlocode, aa where (lat<=90 and lat>=-90) and (lon<=180 and lon>=-180) and lon is not null and lat is not null and uncode=mport_of_discharge_un
  501. )
  502. select * from rr order by sort, stime";
  503. }
  504. $rss = common::excuteListSql($sql);
  505. //$rss = $mapdb->GetAll($sql);
  506. //先固定死
  507. // $json = '[{"lng":"100.78594000","lat":"13.68521000","label":"Origin","infor":"LAT KRABANG, THAILAND","sort":"0","stime":null,"ptype":"por"},
  508. // {"lng":"100.88333333","lat":"13.08333333","label":"Destination","infor":"LAEM CHABANG PORT,THAILAND","sort":"1","stime":null,"ptype":"pol"},
  509. // {"lng":"-122.28640000","lat":"37.79784000","label":"Transfer","infor":"OAKLAND, CA, USA","sort":"2","stime":null,"ptype":"pod"}]';
  510. //$rss = json_decode($json,true);
  511. ///global $mapdb;
  512. //查询线(包含所有的线) 空运不查询航线
  513. if ($transport_mode == "air"){
  514. $Line =array();
  515. }else{
  516. error_log("select * from get_track_data('$serial_no',true)");
  517. $map_sql = "select * from get_track_data('$serial_no',true)";
  518. $Line = $mapdb->GetAll($map_sql) or ( (!$mapdb->ErrorMsg()) or error_log(common::dbLog($mapdb, $map_sql), 0));
  519. }
  520. $solidLine = array();
  521. $dottedLine = array();
  522. $rangePoint = array();
  523. foreach($Line as $line){
  524. if($line['tp'] == "1"){
  525. $solidLine[] = $line;
  526. }elseif($line['tp'] == "0"){
  527. $dottedLine[] = $line;
  528. }else{
  529. $rangePoint[] = $line;
  530. }
  531. }
  532. //如果没有虚线,这这个范围点也是异常的,不需要显示
  533. if(empty($dottedLine)){
  534. $rangePoint = array();
  535. }
  536. $data = array("point"=>$rss,"solidLine"=>$solidLine,"dottedLine"=>$dottedLine,"rangePoint"=>$rangePoint);
  537. common::echo_json_encode(200, $data);
  538. //common::echo_json_encode(200, $rss);
  539. exit();
  540. break;
  541. case 'main_welcome':
  542. //分担查询
  543. include ONLINE_ROOT . 'libs' . DS . 'map_config.ini.php';
  544. $cp = common::check_input($_POST ['cp']); //current_page
  545. $ps = common::check_input($_POST ['ps']); //ps
  546. if (empty($ps))
  547. $ps = 10;
  548. $sqlWhere = ' where ' . common::searchExtendHand_KLN("ocean", $_SESSION["ONLINE_USER"]);
  549. $sqlWhere .= common::getDashboardTransportationSqlWhere();
  550. // test dome
  551. // $_POST['is_default'] = "no";
  552. // $_POST['date_start'] =null;
  553. // $_POST['date_end'] = null;
  554. //默认初始条件:ALL& ETD& Current Month 当前月的1号到最后一天 这个默认条件已经废除,前端不会这样传参数
  555. if (isset($_POST['is_default']) && strtolower($_POST['is_default']) == "yes" && false){
  556. $sqlWhere .= "and etd>='" . date("Y-m") . "-01' and etd<='" . date("Y-m") . "-01'::date + interval '1 month'";
  557. } else {
  558. $date_type = strtolower(common::check_input($_POST ['date_type']));
  559. if (isset($_POST['date_start']) && !empty($_POST['date_start']))
  560. $sqlWhere .= " and $date_type >= '" . common::usDate2sqlDate($_POST['date_start']) . " 00:00:00'";
  561. if (isset($_POST['date_end']) && !empty($_POST['date_end']))
  562. $sqlWhere .= " and $date_type <= '" . common::usDate2sqlDate($_POST['date_end']) . " 23:59:59'";
  563. }
  564. if (isset($_POST['customer']) && !empty($_POST['customer'])){
  565. $sqlWhere .= " and (shipper ilike '%".common::check_input($_POST['customer'])."%' or shipper_id ilike '%".common::check_input($_POST['customer'])."%'
  566. or consignee ilike '%".common::check_input($_POST['customer'])."%' or consignee_id ilike '%".common::check_input($_POST['customer'])."%')";
  567. }
  568. $rc = $_POST ['rc'];
  569. if ($rc == - 1) {
  570. $sql = "SELECT count(1) from public.kln_ocean" . $sqlWhere;
  571. //$rc = common::excuteOneSql($sql);
  572. $rc = $mapdb->GetOne($sql) or ( (!$mapdb->ErrorMsg()) or error_log(common::dbLog($mapdb, $sql), 0));
  573. }
  574. $tp = ceil($rc / $ps);
  575. if ($rc > 0) {
  576. $sql = "SELECT order_from as _schemas,serial_no, consignee, shipper, h_bol,final_desination_uncode, transport_mode,
  577. to_char(etd, 'MM/DD/YYYY'::text) as etd,
  578. to_char(eta, 'MM/DD/YYYY'::text) AS eta,
  579. fport_of_loading_un, mport_of_discharge_un, place_of_receipt_un, place_of_delivery_un, booking_no,
  580. f_vessel,f_voyage,origin,
  581. CASE
  582. WHEN ((m_iffbcf is not null or m_iffbcf is null) and m_iffcpu is null and m_iffrec is null and m_iffdep is null and m_iffarr is null and m_iffdel is null) THEN 'Created'::text
  583. WHEN ((m_iffcpu is not null or m_iffrec is not null) and m_iffdep is null and m_iffarr is null and m_iffdel is null) THEN 'Cargo Received'::text
  584. WHEN (m_iffdep is not null and m_iffarr is null and m_iffdel is null) THEN 'Departure'::text
  585. WHEN (m_iffarr is not null and m_iffdel is null) THEN 'Arrived'::text
  586. WHEN (m_iffdel is not null) THEN 'Completed'::text
  587. ELSE 'Created'::text
  588. END AS new_status
  589. FROM public.kln_ocean $sqlWhere";
  590. //$sqlWhere and last_status_315_update_time is not null";
  591. $sql .= " ORDER BY eta desc,id DESC limit " . $ps . " offset " . ($cp - 1) * $ps;
  592. //$sql .= " ORDER BY last_status_315_update_time DESC limit " . $ps . " offset " . ($cp - 1) * $ps;
  593. //$rss = common::excuteListSql($sql);
  594. $rss = $mapdb->GetAll($sql) or ( (!$mapdb->ErrorMsg()) or error_log(common::dbLog($mapdb, $sql), 0));
  595. //RecentStatusList
  596. $RecentStatusList = array();
  597. foreach ($rss as $key => $value) {
  598. $serial_no = $value["serial_no"];
  599. $_schemas_bk = $value['_schemas'];
  600. $_schemas = $value['_schemas'];
  601. if($_schemas == "public"){
  602. $_schemas = "ocean";
  603. }
  604. //单独取查询milestone信息
  605. if ($value['transport_mode'] == "sea"){
  606. $milestone_sql = "select a.act_date,a.act_time,sn.description,a.timezone,
  607. a.code as dd_code
  608. from public.ocean_milestone a
  609. inner join public.customer_service_milestone_sno sn on sn.code=a.code and sn.type = 'sea'
  610. where a.serial_no='$serial_no'
  611. and a.code in (select regexp_split_to_table('IFFBCF,IFFCPU,IFFREC,IFFDEP,IFFARR,IFFDEL', ','))
  612. and a.act_date is not null
  613. order by sn.sno desc limit 1";
  614. } elseif ($value['transport_mode'] == "air"){
  615. //air milestone 的Departed实际描述要替换: IFFDEP =》 IFFONB
  616. $milestone_sql = "select a.act_date,a.act_time,sn.description,a.timezone,
  617. a.code as dd_code
  618. from $_schemas_bk.air_milestone a
  619. inner join public.customer_service_milestone_sno sn on sn.code=a.code and sn.type = 'air'
  620. where a.serial_no='$serial_no'
  621. and a.code in (select regexp_split_to_table('IFFBCF,IFFCPU,IFFREC,IFFONB,IFFARR,IFFDEL', ','))
  622. and a.act_date is not null
  623. order by sn.sno desc limit 1";
  624. }
  625. $milestone = common::excuteObjectSql($milestone_sql);
  626. $value["act_date"] = $milestone["act_date"];
  627. $value["act_time"] = $milestone["act_time"];
  628. $value["description"] = $milestone["description"];
  629. $value["timezone"] = $milestone["timezone"];
  630. $value["dd_code"] = $milestone["dd_code"];
  631. $timezone = "";
  632. //按照最新execl Timezone From 来自于origin
  633. if($value['dd_code'] == "IFFBCF" || $value['dd_code'] == "IFFCPU"){
  634. $sql = "SELECT (select time_zone from public.city_timezone where uncode = LEFT(c.country, 2) || COALESCE(c.city_code,'')) as timezone
  635. FROM $_schemas.contacts c WHERE c.contact_id = '".$value['origin']."'";
  636. $timezone = common::excuteOneSql($sql);
  637. }
  638. //按照最新execl Timezone From 来自于final_destination
  639. if($value['dd_code'] == "IFFDEL"){
  640. $sql = "select time_zone from public.city_timezone where uncode = '".$value['final_desination_uncode']."'";
  641. $timezone = common::excuteOneSql($sql);
  642. }
  643. if($value['dd_code'] == "IFFREC" || $value['dd_code'] == "IFFDEP" || $value['dd_code'] == "IFFARR"){
  644. $EDI315Time = array();
  645. if ($value['transport_mode'] == "sea"){
  646. //Timezone From 来自于EDI315
  647. $EDI315Time = common::getEDI315Time($serial_no,$value['_schemas']);
  648. }
  649. if($value['dd_code'] == "IFFREC" || $value['dd_code'] == "IFFDEP"){
  650. //先以EDI315 时区为准,如果没有这代表数据是手动输入,或者没有同步情况
  651. $timezone = $EDI315Time[$value['dd_code']]['timezone'];
  652. if(empty($timezone)){
  653. if($value['dd_code'] == "IFFREC"){
  654. $sql = "select time_zone from public.city_timezone where uncode = '".$value['place_of_receipt_un']."'";
  655. }else{
  656. $sql = "select time_zone from public.city_timezone where uncode = '".$value['fport_of_loading_un']."'";
  657. }
  658. $timezone = common::excuteOneSql($sql);
  659. }
  660. }
  661. if($value['dd_code'] == "IFFARR"){
  662. $timezone = $EDI315Time[$value['dd_code']]['timezone'];
  663. if(empty($timezone)){
  664. $sql = "select time_zone from public.city_timezone where uncode = '".$value['mport_of_discharge_un']."'";
  665. $timezone = common::excuteOneSql($sql);
  666. }
  667. }
  668. }
  669. $Arrived = $value['description'];
  670. $startStation=$value['fport_of_loading_un'];
  671. $endStation=$value['mport_of_discharge_un'];
  672. if ($value['transport_mode'] == "sea"){
  673. $startStation=$value['place_of_receipt_un'];
  674. $endStation=$value['place_of_delivery_un'];
  675. }
  676. if ($value['transport_mode'] == "air"){
  677. $startStation=!empty($ocean['place_of_receipt_un'])? $ocean['place_of_receipt_un'] : $ocean['fport_of_loading_un'];
  678. $endStation=!empty($ocean['place_of_delivery_un']) ? $ocean['place_of_delivery_un'] : $ocean['mport_of_discharge_un'];
  679. }
  680. $RecentStatusList[] = array("Title"=>$value['h_bol'],
  681. "name"=>utils::outDisplayForMerge($value['f_vessel'],$value['f_voyage']),
  682. "bookingNumber" =>$value['booking_no'],
  683. "IsSubscribe" =>false,
  684. "shipperName"=>$value['shipper'],
  685. "consigneeName" =>$value['consignee'],
  686. "startStation"=>$startStation,
  687. "endStation"=>$endStation,
  688. "ETD"=>$value['etd'],
  689. "ETA"=>$value['eta'],
  690. "type"=>$value['new_status'],
  691. "Arrived"=>$Arrived,
  692. "Time"=>$value["act_date"],
  693. "act_time" =>$value["act_time"],
  694. "timezone"=>$timezone,
  695. "_schemas"=>$value["_schemas"],
  696. "transport_mode"=>$value["transport_mode"],
  697. 'is_subscribe' =>common::checkedSubscribe($value['serial_no']),
  698. "a" =>common::deCode($value['serial_no'], 'E'));
  699. }
  700. $data = common::getManagement();
  701. $arrTmp = array('searchData' => $RecentStatusList,
  702. 'Management' => $data['Management'],
  703. 'dashboard_filter' => $data['dashboard_filter'],
  704. 'is_customer' =>_isCustomerLogin(),
  705. 'rc' => $rc,
  706. 'ps' => $ps,
  707. 'cp' => $cp,
  708. 'tp' => $tp);
  709. } else {
  710. $data = common::getManagement();
  711. $arrTmp = array('searchData' => array(),
  712. 'Management' => $data['Management'],
  713. 'dashboard_filter' => $data['dashboard_filter']);
  714. }
  715. common::echo_json_encode(200,$arrTmp);
  716. exit();
  717. break;
  718. case 'save_layout':
  719. $management = json_encode($_POST["management"]);
  720. $dashboard_filter = json_encode($_POST["dashboardObj"]);
  721. $_param = "";
  722. if(!empty($_POST["management"])){
  723. $_param .= " management = '$management' ";
  724. }
  725. if(isset($_POST["dashboardObj"]) && !empty($dashboard_filter)){
  726. $_param .= ",dashboard_filter = '$dashboard_filter' ";
  727. }
  728. if(!empty($_param)){
  729. common::excuteUpdateSql("update public.ra_online_user set $_param where lower(user_login) = '" . strtolower(_getLoginName()) . "'");
  730. }
  731. $returnData = array("msg" => "success");
  732. common::echo_json_encode(200, $returnData);
  733. exit();
  734. break;
  735. case 'password':
  736. tools::getInstance()->updatePassword();
  737. break;
  738. case 'tools':
  739. tools::getInstance()->markSystem();
  740. break;
  741. case 'robot':
  742. robot::getInstance()->robot_prompt_configuration();
  743. break;
  744. case 'system_setting':
  745. tools::getInstance()->user_system_setting();
  746. break;
  747. case 'monitoring_setting':
  748. tools::getInstance()->user_monitoring_setting();
  749. break;
  750. case 'notifications_rules':
  751. tools::getInstance()->notifications_rules();
  752. break;
  753. case 'user_guide':
  754. $rootPath = realpath(dirname(__FILE__)) . DS;
  755. //common::download_file($rootPath."images\ACE-M1_ISF_ACI_User_Guide\ACE-M1_ISF_ACI_User_Guide.pdf", "ACE-M1_ISF_ACI_User_Guide_V2.0.pdf");
  756. // PDF文件在服务器上的位置
  757. $filename = $rootPath."userFile". DS."KLN_Online_User_Guide_24.11.26.pdf";
  758. $display_name = "KLN_Online_User_Guide_24_11_26.pdf";
  759. // Header content type
  760. header("Content-type: application/pdf");
  761. header("Content-Length: " . filesize($filename));
  762. header("Content-Disposition:attachment;filename=\"" . $display_name . "\"");
  763. // 将文件发送到浏览器。
  764. readfile($filename);
  765. break;
  766. case 'feature_update':
  767. $id = $_REQUEST["id"];
  768. $rootPath = realpath(dirname(__FILE__)) . DS;
  769. //common::download_file($rootPath."images\ACE-M1_ISF_ACI_User_Guide\ACE-M1_ISF_ACI_User_Guide.pdf", "ACE-M1_ISF_ACI_User_Guide_V2.0.pdf");
  770. // PDF文件在服务器上的位置
  771. $filename = $rootPath."upload". DS."feature_update_".$id.".pdf";
  772. $display_name = "feature_update.pdf";
  773. // Header content type
  774. header("Content-type: application/pdf");
  775. header("Content-Length: " . filesize($filename));
  776. header("Content-Disposition:inline;filename=\"" . $display_name . "\"");
  777. // 将文件发送到浏览器。
  778. readfile($filename);
  779. break;
  780. default:
  781. $data = array(
  782. 'msg' => 'Page not found',
  783. );
  784. common::echo_json_encode(500, $data);
  785. }
  786. $db->Close();
  787. $db = null;
  788. if ($max_ec > 0)
  789. ini_set('max_execution_time', $max_ec); //recover old value
  790. if (!empty($memory_limit))
  791. ini_set('memory_limit', $memory_limit);
  792. ?>