<?php


class Re_px extends MY_Controller
{
   var $db_smartone;

   public function index()
   {
      echo "RE Px API";
   }

   public function __construct()
   {
      parent::__construct();

      $this->db_smartone = $this->load->database("onedev", true);
   }
   
   public function search_old()
   {
      $prm = $this->sys_input;
      $max_rst = 99;

      $id = $prm["order_id"];

      // QUERY TOTAL
    //   $sql = "";
    //   $query = $this->db_smartone->query($sql);

    //   if ($query) { 
    //      $tot_count = $query->result_array()[0]["total"]; 
    //   } 
    //   else {
    //      $this->sys_error_db("re count", $this->db_smartone);
    //      exit;
    //   }
    $tot_count = 0;
      $sql = "SELECT T_TestID 
                FROM t_orderdetail JOIN t_test ON T_OrderDetailT_TEstID = T_TestID
                WHERE T_OrderDetailT_OrderHeaderID = ?
                AND T_OrderDetailIsActive = 'Y'
                AND T_TestParentT_TestID = 0";
      $query = $this->db_smartone->query($sql, [$id]);

      if ($query) {
          $rst = [];
         $rows = $query->result_array();
         foreach ($rows as $k => $v)
         {
            $sql = "WITH RECURSIVE ancestors AS 
                        ( 
                        SELECT t_testid, t_testname,
                        T_OrderDetailResult result, T_OrderDetailResult result_old, T_OrderDetailNote note, T_OrderDetailID id,
                        T_OrderDetailT_TestIsResult is_result, T_TestIsQuantitative is_quantitative,
                        1 level FROM t_orderdetail 
                        JOIN t_test ON T_OrderDetailT_TestID = T_TestID
                        WHERE T_OrderDetailIsActive = 'Y'
                        AND T_OrderDetailT_OrderHeaderID = ?
                        AND t_testid = ?

                        UNION

                        SELECT g.t_testid, g.t_testname,
                        T_OrderDetailResult result, T_OrderDetailResult result_old, T_OrderDetailNote note, T_OrderDetailID id,
                        T_OrderDetailT_TestIsResult is_result, g.T_TestIsQuantitative is_quantitative,
                        level+1 level
                        FROM ancestors a, t_orderdetail f
                        JOIN t_test g ON f.T_OrderDetailT_TestID = g.T_TestID
                        
                        WHERE T_OrderDetailIsActive = 'Y'
                        AND T_OrderDetailT_OrderHeaderID = ?
                        AND g.t_testparentt_testid = a.t_testid and g.t_testisactive = 'Y' )
                    SELECT * FROM ancestors;";
            $query = $this->db_smartone->query($sql, [$id, $v['T_TestID'], $id]);

            $r = $query->result_array();
            foreach($r as $k => $v) {
               if ($v['is_result'] == "Y" && $v['is_quantitative'] == "N")
               {
                  $v['template'] = [];
                  $x = $this->db_smartone->query("CALL sp_master_resulttemplate_get('{$v['t_testid']}')");
                  $this->clean_mysqli_connection($this->db_smartone->conn_id);
                  if ($x)
                     $v['template'] = $x->result_array();
               }
               
               $rst[] = $v;
            }
         }
            
         $result = array("total" => $tot_count, "records" => $rst, "total_display" => sizeof($rows), "q" => $this->db_smartone->last_query());
         $this->sys_ok($result);
      } 
      else {
         $this->sys_error_db("RE Px rows", $this->db_smartone);
         exit;
      }
   }

   public function search()
   {
      $prm = $this->sys_input;
      $max_rst = 99;

      $id = $prm["order_id"];
      $lang = $this->lang_default_code;
      $lang_id = isset($prm['lang_id']) ? $prm['lang_id'] : '0';

      if ($lang_id != 0)
      {
         $l = $this->db_smartone->where("Nat_LangID", $lang_id)->get("nat_lang")->row();
         $lang = $l->Nat_LangCode;
      }

      $tot_count = 0;
      $lq = "";
      $group_id = 0;
      if (isset($prm['group_id']))
        $group_id = $prm['group_id'];

    //   if ($lang == $this->lang_default_code)
    //   {
          if ($group_id != 0)
          {
            $sql = "SELECT IFNULL(y.T_TesTID, x.t_testid) t_testid, 
            IFNULL(y.T_TestName, x.t_testname) t_testname, 
            IFNULL(y.T_TestNat_TesTID, x.nattest_id) nattest_id,
            IFNULL(y.T_OrderDetailResult, x.result) result,
            IFNULL(y.T_OrderDetailResult, x.result_old) result_old,
            y.T_OrderDetailResultFlag result_flag,
            IFNULL(y.T_OrderDetailNote, x.note) note,
            IFNULL(y.T_OrderDetailNote, x.note_old) note_old,
            IFNULL(y.T_OrderDetailID, x.id) id,
            IFNULL(y.T_OrderDetailT_TestIsResult, x.is_result) is_result,
            IFNULL(y.T_TestIsQuantitative, x.is_quantitative) is_quantitative,
            IFNULL(y.T_OrderDetailNat_NormalValueID, x.normal_id) normal_id,
            IFNULL(y.T_OrderDetailNormalValueNote, x.normal_note) normal_note,
            IFNULL(y.T_OrderDetailNat_UnitName, x.unit_name) unit_name,
            IFNULL(y.T_OrderdetailNat_MethodeID, x.methode_id) methode_id,
            IFNULL(y.T_OrderdetailNat_MethodeName, x.methode_name) methode_name,
            IFNULL(y.T_OrderDetailVerification, x.T_OrderDetailVerification) T_OrderDetailVerification,
            IFNULL(y.T_OrderDetailT_OrderHeaderID, x.T_OrderDetailT_OrderHeaderID) T_OrderDetailT_OrderHeaderID,
            IFNULL(y.T_OrderDetailT_TestSasCode, x.T_OrderDetailT_TestSasCode) T_OrderDetailT_TestSasCode,
            y.T_OrderSampleReceive sample_receive,
            y.T_OrderSampleWorklistReceive sample_worklist_receive,
            y.T_OrderSampleProcessing sample_processing,
            
            IF(y.T_OrderDetailAddOnPreAnalytic = 'Y', y.T_OrderDetailAddOnPreAnalytic, y.PreAnalyticIsOk) pre_analytic,
            CAST( level + (LENGTH(y.T_OrderDetailT_TestSasCode) - LENGTH(x.T_OrderDetailT_TestSasCode))/2 as SIGNED) level,
            y.T_OrderDetailAddOnResample `resample`, y.T_OrderDetailAddOnResampleStatus resample_status,
            y.T_OrderDetailAddOnRef ref, y.T_OrderDetailVerification verification, y.T_OrderDetailValidation validation
                FROM (
        SELECT IFNULL(a.t_testid, b.t_testid) t_testid, IFNULL(a.t_testname, b.t_testname) t_testname,
              T_OrderDetailResult result, T_OrderDetailResult result_old, T_OrderDetailNote note, T_OrderDetailNote note_old, T_OrderDetailID id,
              T_OrderDetailT_TestIsResult is_result, a.T_TestIsQuantitative is_quantitative,
              COUNT(b.T_TestID) level, T_OrderDetailNat_NormalValueID normal_id,
              T_OrderDetailNormalValueNote normal_note, T_OrderDetailNat_UnitName unit_name,
              T_OrderdetailNat_MethodeID methode_id, T_OrderdetailNat_MethodeName methode_name,
              a.T_TestNat_TestID nattest_id, count(T_ResultInstrumentID) as result_instrument_n,
              T_OrderDetailVerification, T_OrderDetailT_OrderHeaderID, IFNULL(T_OrderDetailT_TestSasCode, b.T_TestSasCode) T_OrderDetailT_TestSasCode,
              T_OrderSampleReceive, T_OrderSampleProcessing, T_OrderSampleWorklistReceive, PreAnalyticID,
              T_OrderDetailResultFlag result_flag,
              T_OrderDetailAddOnResample `resample`, T_OrderDetailAddOnResampleStatus resample_status
           FROM t_orderdetail
           JOIN t_orderheader ON T_OrderDetailT_OrderHeaderID = T_OrderHeaderID
           JOIN t_test a ON T_OrderDetailT_TestID = a.T_TestID
                JOIN documentation_group_detail ON DocumentationGroupDetailNat_SubGroupID = a.T_TestNat_SubGroupID
                    AND DocumentationGroupDetailIsActive = 'Y'
                JOIN documentation_group ON DocumentationGroupDetailDocumentationGroupID = DocumentationGroupID
                    AND DocumentationGroupName = 'lab'

            LEFT JOIN (SELECT T_OrderSampleT_SampleTypeID, T_OrderSampleReceive, T_OrderSampleProcessing, T_OrderSampleWorklistReceive
                        FROM t_ordersample WHERE T_OrderSampleT_OrderHeaderID = ?
                        AND T_OrderSampleIsactive = 'Y'
                        GROUP BY T_OrderSampleT_SampleTypeID) os 
                        ON (( a.T_TestT_SampleTypeID = os.T_OrderSampleT_SampleTypeID AND a.T_TestIsResult = 'Y'))
            
           LEFT JOIN t_test b ON a.T_TestSasCode LIKE CONCAT(b.T_TestSasCode, '%')
           
           LEFT JOIN t_resultinstrument ON T_ResultInstrumentT_OrderDetailID = T_OrderDetailID
           LEFT JOIN pre_analytic ON PreAnalyticNat_TestID = a.T_TestNat_TestID AND PreAnalyticDate = date(now()) and PreAnalyticIsActive = 'Y'
                AND PreAnalyticT_WorklistID = ?
            LEFT JOIN t_orderdetailaddon ON T_OrderDetailID = T_OrderDetailAddOnT_OrderDetailID
           WHERE T_OrderDetailT_OrderHeaderID = ?
           AND T_OrderDetailIsActive = 'Y'
           AND T_OrderDetailT_TestID IN 
           ( SELECT T_WorklistDetailT_TestID 
            FROM t_worklistdetail
            WHERE T_WorklistDetailIsactive = 'Y' ANd T_WorklistDetailT_WorklistID = ?
           )
           GROUP BY a.T_TestID
           ORDER BY T_OrderDetailT_TestSasCode ASC
         ) x
           
        LEFT JOIN (
            SELECT *
            FROM t_orderdetail 
            LEFT JOIN t_orderheader ON T_OrderDetailT_OrderHeaderID = T_OrderHeaderID
            LEFT JOIN t_test ON T_OrderDetailT_TestID = T_TestID
            LEFT JOIN documentation_group_detail ON DocumentationGroupDetailNat_SubGroupID = T_TestNat_SubGroupID
                AND DocumentationGroupDetailIsActive = 'Y'
            LEFT JOIN documentation_group ON DocumentationGroupDetailDocumentationGroupID = DocumentationGroupID
                AND DocumentationGroupName = 'lab'
            LEFT JOIN (SELECT T_OrderSampleT_SampleTypeID, T_OrderSampleReceive, T_OrderSampleProcessing, T_OrderSampleWorklistReceive
                        FROM t_ordersample WHERE T_OrderSampleT_OrderHeaderID = ?
                        AND T_OrderSampleIsactive = 'Y'
                        GROUP BY T_OrderSampleT_SampleTypeID) os ON T_TestT_SampleTypeID = os.T_OrderSampleT_SampleTypeID
            LEFT JOIN pre_analytic ON PreAnalyticNat_TestID = T_TestNat_TestID AND PreAnalyticDate = date(now()) and PreAnalyticIsActive = 'Y'
                AND PreAnalyticT_WorklistID = ?
            LEFT JOIN t_orderdetailaddon ON T_OrderDetailID = T_OrderDetailAddOnT_OrderDetailID
            WHERE T_OrderDetailT_OrderHeaderID = ?
            AND T_OrderDetailIsActive = 'Y'
        ) y 
            ON x.T_OrderDetailT_OrderHeaderID = y.T_OrderDetailT_OrderHeaderID
            AND y.T_OrderDetailT_TestSasCode LIKE CONCAT(x.T_OrderDetailT_TestSasCode, '%')

        GROUP BY t_testid
         order by y.T_TestSasCode
         ";
        
            $query = $this->db_smartone->query($sql, [$id, $group_id, $id, $group_id, $id, $group_id, $id]);
                    $lq = $this->db_smartone->last_query();
          }
          else
          {
            $sql = "SELECT *, cOUNT(a2.T_OrderDetailID) level FROM (
                SELECT IFNULL(y.T_OrderDetailT_TestID, x.T_OrderDetailT_TestID) t_testid, 
                IFNULL(y.T_OrderDetailT_TestName, y.T_OrderDetailT_TestName) t_testname,
                  y.T_OrderDetailResult result, y.T_OrderDetailResult result_old, y.T_OrderDetailNote note, y.T_OrderDetailNote note_old, y.T_OrderDetailID id,
                  y.T_OrderDetailT_TestIsResult is_result, a.T_TestIsQuantitative is_quantitative,
                  y.T_OrderDetailResultFlag result_flag,
                  y.T_OrderDetailNat_NormalValueID normal_id,
                  y.T_OrderDetailNormalValueNote normal_note, y.T_OrderDetailNat_UnitName unit_name,
                  y.T_OrderdetailNat_MethodeID methode_id, y.T_OrderdetailNat_MethodeName methode_name,
                  a.T_TestNat_TestID nattest_id, a.T_TestID tx_id, count(T_ResultInstrumentID) as result_instrument_n,
                  y.T_OrderDetailVerification, T_OrderSampleReceive sample_receive,
                  T_OrderSampleProcessing sample_processing, T_OrderSampleWorklistReceive sample_worklist_receive,
                  IF(T_OrderDetailAddOnPreAnalytic = 'Y', T_OrderDetailAddOnPreAnalytic, PreAnalyticIsOk) pre_analytic,
                  T_OrderHeaderID order_id, y.T_OrderDetailT_TestSasCode test_sas_code,
                  tx.T_TestSasCode,
                  T_OrderDetailAddOnResample `resample`, T_OrderDetailAddOnResampleStatus resample_status,
                    T_OrderDetailAddOnRef ref, y.T_OrderDetailVerification verification, y.T_OrderDetailValidation validation
               FROM t_orderdetail x
                
                JOIN t_test tx ON x.T_OrderDetailT_TestID = T_TestID
                JOIN documentation_group_detail ON DocumentationGroupDetailNat_SubGroupID = tx.T_TestNat_SubGroupID
                    AND DocumentationGroupDetailIsActive = 'Y'
                JOIN documentation_group ON DocumentationGroupDetailDocumentationGroupID = DocumentationGroupID
                    AND DocumentationGroupName = 'lab'

               LEFT JOIN t_orderdetail y ON x.T_OrderDetailT_TestSasCode LIKE CONCAT(y.T_OrderDetailT_TestSasCode, '%')
                    AND x.T_OrderDetailT_OrderHeaderID = y.T_OrderDetailT_OrderHeaderID
                    AND y.T_OrderDetailIsActive = 'Y'

                LEFT JOIN t_orderdetailaddon ON x.T_OrderDetailID = T_OrderDetailAddOnT_OrderDetailID

               JOIN t_orderheader ON y.T_OrderDetailT_OrderHeaderID = T_OrderHeaderID
               LEFT JOIN t_test a ON y.T_OrderDetailT_TestID = a.T_TestID
                AND a.T_TestIsNonLab = ''
                LEFT JOIN (SELECT T_OrderSampleT_SampleTypeID, T_OrderSampleReceive, T_OrderSampleProcessing, T_OrderSampleWorklistReceive
                        FROM t_ordersample WHERE T_OrderSampleT_OrderHeaderID = ?
                        AND T_OrderSampleIsactive = 'Y'
                        GROUP BY T_OrderSampleT_SampleTypeID) os ON a.T_TestT_SampleTypeID = os.T_OrderSampleT_SampleTypeID

               LEFT JOIN t_resultinstrument ON T_ResultInstrumentT_OrderDetailID = x.T_OrderDetailID
               LEFT JOIN pre_analytic ON PreAnalyticNat_TestID = a.T_TestNat_TestID AND PreAnalyticDate = date(now()) and PreAnalyticIsActive = 'Y'
               WHERE x.T_OrderDetailT_OrderHeaderID = ?
               AND x.T_OrderDetailIsActive = 'Y'
               GROUP BY y.T_OrderDetailT_TestID
               ORDER BY y.T_OrderDetailT_TestSasCode ASC) a1

               LEFT JOIN t_orderdetail a2 ON a2.T_OrderDetailT_OrderHeaderID = a1.order_id
                AND a2.T_OrderDetailIsActive = 'Y'
                AND a1.test_sas_code LIKE CONCAT(a2.T_OrderDetailT_testSasCode, '%')

                GROUP BY a1.t_testid
                order by a1.T_TestSasCode
            ";
            $query = $this->db_smartone->query($sql, [$id, $id]);
            $lq = $this->db_smartone->last_query();
          }
         
         
    //   }
    //   else
    //   {
    //      $sql = "SELECT a.t_testid, T_OrderDetailLangNat_TestLangName t_testname,
    //               T_OrderDetailLangResult result, T_OrderDetailLangResult result_old, T_OrderDetailLangNote note, T_OrderDetailLangNote note_old, T_OrderDetailLangID id,
    //               T_OrderDetailT_TestIsResult is_result, a.T_TestIsQuantitative is_quantitative,
    //               COUNT(b.T_TestID) level, T_OrderDetailVerification
    //            FROM t_orderdetail
    //            JOIN t_test a ON T_OrderDetailT_TestID = a.T_TestID
    //             AND a.T_TestIsNonLab = ''
    //            LEFT JOIN t_test b ON a.T_TestSasCode LIKE CONCAT(b.T_TestSasCode, '%')
    //            JOIN t_orderdetaillang ON T_OrderDetailLangT_OrderDetailID = T_OrderDetailID
    //               AND T_OrderDetailLangIsActive = 'Y'
    //               AND T_OrderDetailLangNat_LangID = ?
    //            WHERE T_OrderDetailT_OrderHeaderID = ?
    //            AND T_OrderDetailIsActive = 'Y'
    //            GROUP BY a.T_TestID
    //            ORDER BY T_OrderDetailT_TestSasCode ASC
    //         ";
    //      $query = $this->db_smartone->query($sql, [$lang_id, $id ]);
    //   }
      
      if ($query) {
         $rst = [];
         $rows = $query->result_array();

         foreach($rows as $k => $v) 
         {
            if ($v['is_result'] == "Y" && $v['is_quantitative'] == "N")
            {
               $v['template'] = [];
               $x = $this->db_smartone->query("CALL sp_master_resulttemplate_get('{$v['t_testid']}')");
               $this->clean_mysqli_connection($this->db_smartone->conn_id);
               if ($x)
                  $v['template'] = $x->result_array();
            }
            
            // IF Rujukan, by pas Pre Analytik
            if ($v['ref'] == 'Y')
                $v['pre_analytic'] = 'Y';
                
            $rst[] = $v;
         }
            
         $result = array("total" => $tot_count, "records" => $rst, "total_display" => sizeof($rows), "q" => $lq);
         $this->sys_ok($result);
      } 
      else {
         $this->sys_error_db("RE Px rows", $this->db_smartone);
         exit;
      }
   }

   public function save()
   {
      $prm = $this->sys_input;
      $data = json_decode($prm["data"]);
      $lang = $this->lang_default_code;
      $lang_id = isset($prm['lang_id']) ? $prm['lang_id'] : '0';

      if ($lang_id != 0)
      {
         $l = $this->db_smartone->where("Nat_LangID", $lang_id)->get("nat_lang")->row();
         $lang = $l->Nat_LangCode;
      }

      $ids = [];
      foreach ($data as $k => $v)
      {
        $y = $this->db_smartone->query("SELECT fn_process_sample_handling_perfect('{$v->order_id}', '{$v->test_id}') c")
                                ->row();
        $req_status = $y->c;

         if ($lang == $this->lang_default_code)
         {
            $this->db_smartone->set('T_OrderDetailResult', $v->result)
                              ->set('T_OrderDetailNote', $v->note)
                              ->set('T_OrderDetailReqStatus', $req_status)
                              ->where('T_OrderDetailID', $v->id)
                              ->update('t_orderdetail');
         }
         else
         {
            $this->db_smartone->set('T_OrderDetailLangResult', $v->result)
                              ->set('T_OrderDetailLangNote', $v->note)
                              ->where('T_OrderDetailLangID', $v->id)
                              ->update('t_orderdetaillang');
         }
         
         $ids[] = $v->id;                           
      }

      // LOG Process
      $order = $this->db_smartone->select('T_OrderDetailT_OrderHeaderID id, T_OrderHeaderLabNumber lab_number', false)
                                 ->join('t_orderheader', 'T_OrderHeaderID = T_OrderDetailT_OrderHeaderID')
                                 ->where('T_OrderDetailID', $data[0]->id)
                                 ->get('t_orderdetail')
                                 ->row();

      $dblog = $this->load->database("onelog", true);
      $dblog->set('Log_ProcessCode', 'PROCESS.Result.Entry')
            ->set('Log_ProcessOrderID', $order->id)
            ->set('Log_ProcessOrderNumber', $order->lab_number)
            ->set('Log_ProcessJson', json_encode($data))
            ->set('Log_ProcessUserID', $this->sys_user['M_UserID'])
            ->insert('log_process');
      // END OF Log Process
      //auto calculation
      $this->load->library("Resultcalc");
      $rows = $this->resultcalc->auto($order->id);

      $this->sys_ok($ids);
   }

   public function save_template()
   {
      $prm = $this->sys_input;

      $n = $this->db_smartone->select("COUNT(T_ResultTemplateID) n")
                           ->where("T_ResultTemplateT_TestID", $prm['test_id'])
                           ->where("T_ResultTemplateIsActive", "Y")
                           ->where("T_ResultTemplateValue", $prm['value'])
                           ->get('t_resulttemplate')
                           ->row();
      if ($n->n > 0)
      {
         $this->sys_error_db("Insert Result Template", $this->db_smartone);
         return;
      }

      $r = $this->db_smartone->set("T_ResultTemplateT_TestID", $prm['test_id'])
                              ->set("T_ResultTemplateValue", $prm['value'])
                              ->insert('t_resulttemplate');
      if ($r)
      {
         $template = [];
         $x = $this->db_smartone->query("CALL sp_master_resulttemplate_get('{$prm['test_id']}')");
         $this->clean_mysqli_connection($this->db_smartone->conn_id);
         if ($x)
            $template = $x->result_array();

         $this->sys_ok($template);
      }
   }

   public function export()
   {
      $prm = $this->sys_input;

      $sql = "CALL sp_process_result_lang(?, ?, ?, ?)";
      $query = $this->db_smartone->query($sql, [$prm['order_id'], $prm['lang_id'], $prm['is_si'], $this->sys_user['M_UserID']]);
      if ($query)
      {
         $r = $query->row();
         if ($r->status == "OK")
         {
            $this->sys_ok($r->data);
            return;
         }

         $this->sys_error_db("Message : " . $r->message, $this->db_smartone);
      }
      else
      {
         $this->sys_error_db("Lang Result", $this->db_smartone);
         return;
      }
   }

   public function search_group()
   {
      $prm = $this->sys_input;
      $max_rst = 50;

      // QUERY TOTAL
      $sql = "select count(*) total
                from t_worklist
                where T_WorklistIsActive = 'Y'
                order by T_WorklistName ASC";
      $query = $this->db_smartone->query($sql);

      if ($query) { 
         $tot_count = $query->result_array()[0]["total"]; 
      } 
      else {
         $this->sys_error_db("worklist count", $this->db_smartone);
         exit;
      }

      $sql = "select T_WorklistID group_id, T_WorklistName group_name
                from t_worklist
                where T_WorklistIsActive = 'Y'
                order by T_WorklistName ASC
                limit 0, {$max_rst}";
      $query = $this->db_smartone->query($sql);

      if ($query) { 
         $rows = $query->result_array();
         foreach ($rows as $k => $v)
            $rows[$k]['data'] = json_decode($v['data']);
         $result = array("total" => $tot_count, "records" => $rows, "total_display" => sizeof($rows), "q" => $this->db_smartone->last_query());
         $this->sys_ok($result);
      } 
      else {
         $this->sys_error_db("worklist rows", $this->db_smartone);
         exit;
      }
   }

    public function search_rerun()
    {
        $prm = $this->sys_input;
        $id = $prm["detail_id"];
        
        $sql = "CALL sp_process_result_rerun(?)";
        $query = $this->db_smartone->query($sql, [$id]);
        
        if ($query) 
        {
            $rows = $query->result_array();
            $this->sys_ok(["records"=>$rows]);
        } 
        else {
            $this->sys_error_db("Rerun rows", $this->db_smartone);
            exit;
        }
    }

}