Directory access is forbidden.
+ + + diff --git a/application/helpers/index.html b/application/helpers/index.html new file mode 100755 index 00000000..b702fbc3 --- /dev/null +++ b/application/helpers/index.html @@ -0,0 +1,11 @@ + + + +Directory access is forbidden.
+ + + diff --git a/application/helpers/uuid_helper.php b/application/helpers/uuid_helper.php new file mode 100644 index 00000000..1828d216 --- /dev/null +++ b/application/helpers/uuid_helper.php @@ -0,0 +1,24 @@ + + + +Directory access is forbidden.
+ + + diff --git a/application/index.html b/application/index.html new file mode 100755 index 00000000..b702fbc3 --- /dev/null +++ b/application/index.html @@ -0,0 +1,11 @@ + + + +Directory access is forbidden.
+ + + diff --git a/application/language/english/index.html b/application/language/english/index.html new file mode 100755 index 00000000..b702fbc3 --- /dev/null +++ b/application/language/english/index.html @@ -0,0 +1,11 @@ + + + +Directory access is forbidden.
+ + + diff --git a/application/language/index.html b/application/language/index.html new file mode 100755 index 00000000..b702fbc3 --- /dev/null +++ b/application/language/index.html @@ -0,0 +1,11 @@ + + + +Directory access is forbidden.
+ + + diff --git a/application/libraries/Ai_whisper.php b/application/libraries/Ai_whisper.php new file mode 100644 index 00000000..e0425973 --- /dev/null +++ b/application/libraries/Ai_whisper.php @@ -0,0 +1,197 @@ + "ERR", "message" => "Error: File not found."]; + } + + // Get file extension and appropriate MIME type + $extension = strtolower(pathinfo($audioPath, PATHINFO_EXTENSION)); + $mimeType = $this->getMimeType($extension); + + // Create CURLFile with correct MIME type + $curlFile = new CURLFile( + $audioPath, // File path + $mimeType, // MIME type + basename($audioPath) // Filename + ); + + // Prepare the multipart form data + $postFields = [ + 'file' => $curlFile, + 'model' => $this->whisperModelName, + 'response_format' => 'verbose_json', + 'timestamp_granularities' => ['segment'], + 'language' => $this->whisperLanguage, + ]; + + // Initialize cURL session + $ch = curl_init(); + + // Set cURL options + curl_setopt_array($ch, [ + CURLOPT_URL => self::API_URL, + CURLOPT_RETURNTRANSFER => true, + CURLOPT_POST => true, + CURLOPT_POSTFIELDS => $postFields, + CURLOPT_HTTPHEADER => [ + 'Authorization: Bearer ' . self::API_KEY, + // Don't set Content-Type header - cURL will set it automatically with boundary + ], + CURLOPT_TIMEOUT => 300, // 5 minutes timeout for large files + CURLOPT_SSL_VERIFYPEER => true, + ]); + + // Execute request + $response = curl_exec($ch); + $httpCode = curl_getinfo($ch, CURLINFO_HTTP_CODE); + $error = curl_error($ch); + + curl_close($ch); + + // Handle cURL errors + if ($error) { + return ["status" => "ERR", "message" => "cURL Error: " . json_encode($error, true)]; + } + + // Handle API errors + if ($httpCode !== 200) { + $errorData = json_decode($response, true); + return ["status" => "ERR", "message" => "API Error: " . ($errorData['error'] ?? "Unknown error occurred")]; + } + + // Decode and return the response + $result = json_decode($response, true); + return [ + 'status' => 'OK', + 'data' => $this->processDiarization($result, $persons), + ]; + } + + private function getMimeType($extension) + { + $mimeTypes = [ + 'mp3' => 'audio/mpeg', + 'wav' => 'audio/wav', + 'm4a' => 'audio/mp4', + 'ogg' => 'audio/ogg' + ]; + + return isset($mimeTypes[$extension]) ? $mimeTypes[$extension] : 'audio/mpeg'; + } + + // * INFO: Sementara begini dulu sampai bisa diarize pakai python + private function processDiarization($response, $persons) + { + $result = [ + 'diarized' => [], + 'raw' => $response + ]; + + // Create array of speaker IDs based on number of persons + $speakers = []; + for ($i = 1; $i <= $persons; $i++) { + $speakers[] = sprintf("SPEAKER_%02d", $i); + } + + // Track current speaker index + $currentSpeakerIndex = 0; + $speakerCount = count($speakers); + + foreach ($response['segments'] as $segment) { + // * 20250224: Maybe digunakan sometime + // $diarizedSegment = [ + // 'who' => $speakers[$currentSpeakerIndex], + // 'start' => $segment['start'], + // 'end' => $segment['end'], + // 'text' => trim($segment['text']) + // ]; + + $convo = $speakers[$currentSpeakerIndex] . ": " . trim($segment['text']); + + $result['diarized'][] = $convo; + // $result['raw'][] = $diarizedSegment; + + $currentSpeakerIndex = ($currentSpeakerIndex + 1) % $speakerCount; + } + + return $result; + } + + private function langChainDiarization($response) + { + $prompt = "This is a Whisper transcript of a 2-person conversation using Bahasa Indonesia. " . + "Identify speakers and segment the dialogue based on context because segmentation from whisper is sometimes wrong. " . + "Return the result in JSON format:\n" . + "{\n" . + "\"text\": \"Full transcription text...\",\n" . + "\"diarized\": [\n" . + "{\n" . + "\"who\": \"Speaker 1 or Speaker 2\",\n" . + "\"start\": timestamp,\n" . + "\"end\": timestamp,\n" . + "\"text\": \"...\"\n" . + "}\n" . + "]\n" . + "}\n" . + "Ensure accurate segmentation and speaker attribution.\n" . + "The convo:\n\n" . + $response['text']; + + $payload = json_encode([ + "model" => $this->diarizeModelName, + "messages" => [ + [ + "role" => "system", + "content" => "You are a helpful assistant that analyzes conversations and identifies speakers." + ], + [ + "role" => "user", + "content" => $prompt, + ] + ], + "options" => ["temperature" => $this->temperatureDiarize], + "stream" => false + ]); + + // Initialize cURL + $ch = curl_init(self::API_URL); + curl_setopt($ch, CURLOPT_RETURNTRANSFER, true); + curl_setopt($ch, CURLOPT_POST, true); + curl_setopt($ch, CURLOPT_HTTPHEADER, [ + "Content-Type: application/json", + "Authorization: Bearer " . self::API_KEY + ]); + curl_setopt($ch, CURLOPT_POSTFIELDS, $payload); + + // Execute request + $response = curl_exec($ch); + if (curl_errno($ch)) { + $error = curl_error($ch); + curl_close($ch); + return ["status" => "ERR", "message" => curl_error($ch)]; + } + curl_close($ch); + + $response = strip_tags($response); + $responseData = json_decode($response, true); + $content = $responseData['choices'][0]['message']['content']; + + if (is_null($responseData) || !isset($content)) { + return ["status" => "ERR", "message" => "raw : $response"]; + } + } +} diff --git a/application/libraries/Autosamplingverif.php b/application/libraries/Autosamplingverif.php new file mode 100644 index 00000000..326e7620 --- /dev/null +++ b/application/libraries/Autosamplingverif.php @@ -0,0 +1,230 @@ +db_onedev = $CI->load->database("default", true); + } + + function clean_mysqli_connection( $dbc ) +{ + while( mysqli_more_results($dbc) ) + { + if(mysqli_next_result($dbc)) + { + $result = mysqli_use_result($dbc); + + if( get_class($result) == 'mysqli_stmt' ) + { + mysqli_stmt_free_result($result); + } + else + { + unset($result); + } + } + } +} + + function doaction($rst_id,$samplingtime,$userid){ + $sql = "call sp_fo_barcode_generate_again_not_exist(" . $rst_id . ")"; + $this->db_onedev->query($sql); + $this->clean_mysqli_connection($this->db_onedev->conn_id); + + $sql = "SELECT * + FROM t_orderheader + JOIN t_orderheaderaddon ON T_OrderHeaderAddOnT_OrderHeaderID = T_OrderHeaderID + WHERE T_OrderHeaderID = {$rst_id}"; + //echo $sql; + $row_addon = $this->db_onedev->query($sql)->row_array(); + + $readytime = date('Y-m-d H:i:s', strtotime($samplingtime)); + //echo $readytime; + $sql = "UPDATE t_ordersample + SET + T_OrderSampleSampling = 'Y', + T_OrderSampleSamplingDate = DATE('{$samplingtime}'), + T_OrderSampleSamplingTime = TIME('{$samplingtime}'), + T_OrderSampleSamplingUserID = {$userid}, + T_OrderSampleReceive = 'Y', + T_OrderSampleReceiveDate = DATE('{$samplingtime}'), + T_OrderSampleReceiveTime = TIME('{$samplingtime}'), + T_OrderSampleReadyToProcessDateTime = '{$readytime}', + T_OrderSampleVerification = 'Y', + T_OrderSampleVerificationDate = CURDATE(), + T_OrderSampleVerificationTime = CURTIME(), + T_OrderSampleVerificationUserID = {$userid}, + T_OrderSampleSendHandling = 'Y', + T_OrderSampleSendHandlingDate = CURDATE(), + T_OrderSampleSendHandlingTime = CURTIME(), + T_OrderSampleSendHandlingUserID = {$userid}, + T_OrderSampleReceiveUserID = {$userid}, + T_OrderSampleReceiveHandling = 'Y', + T_OrderSampleReceiveHandlingDate = CURDATE(), + T_OrderSampleReceiveHandlingTime = CURTIME(), + T_OrderSampleReceiveHandlingUserID = {$userid} + WHERE + T_OrderSampleT_OrderHeaderID = {$rst_id}"; + $upd_ordersample = $this->db_onedev->query($sql); + //echo $sql; + $sql = "SELECT * + FROM t_ordersample + JOIN t_barcodelab ON T_OrderSampleT_BarcodeLabID = T_BarcodeLabID AND T_BarcodeLabIsActive = 'Y' + JOIN t_sampletype ON T_SampleTypeID = T_OrderSampleT_SampleTypeID + JOIN t_bahan ON T_SampleTypeT_BahanID = T_BahanID + JOIN t_samplestation ON T_BahanT_SampleStationID = T_SampleStationID + WHERE + T_OrderSampleT_OrderHeaderID = {$rst_id} AND + T_OrderSampleIsActive = 'Y'"; + $data_loop = $this->db_onedev->query($sql)->result_array(); + if ($data_loop) { + foreach ($data_loop as $ks => $vs) { + $sql = "INSERT INTO t_ordersamplereq( + T_OrderSampleReqT_OrderHeaderID, + T_OrderSampleReqT_SampleStationID, + T_OrderSampleReqT_OrderSampleID, + T_OrderSampleReqNat_PositionID, + T_OrderSampleReqStatus, + T_OrderSampleReqs, + T_OrderSampleReqUserID, + T_OrderSampleReqCreated + ) + VALUES( + {$rst_id}, + {$vs['T_SampleStationID']}, + {$vs['T_OrderSampleID']}, + '2', + 'Y', + '[]', + {$userid}, + NOW() + )ON DUPLICATE KEY UPDATE + T_OrderSampleReqStatus = 'Y', + T_OrderSampleReqs = '[]', + T_OrderSampleReqUserID = {$userid}"; + //echo $sql; + $this->db_onedev->query($sql); + + $sql = "INSERT INTO sample_by_step( + SampleByStepM_StatusSampleCode, + SampleByStepT_OrderHeaderID, + SampleByStepT_BarcodeLabID, + SampleByStepRequirementStatus, + SampleByStepRequirements, + SampleByStepUserID, + SampleByStepDateTime + ) + VALUES( + 'SAMPLING.Sampling.Sampled', + {$rst_id}, + {$vs['T_BarcodeLabID']}, + 'Y', + '[]', + {$userid}, + '{$row_addon['T_OrderHeaderAddOnOnlySampleTime']}' + )"; + $this->db_onedev->query($sql); + + $sql = "INSERT INTO sample_by_step( + SampleByStepM_StatusSampleCode, + SampleByStepT_OrderHeaderID, + SampleByStepT_BarcodeLabID, + SampleByStepRequirementStatus, + SampleByStepRequirements, + SampleByStepUserID, + SampleByStepDateTime + ) + VALUES( + 'SAMPLING.Sampling.Received', + {$rst_id}, + {$vs['T_BarcodeLabID']}, + 'Y', + '[]', + {$userid}, + '{$row_addon['T_OrderHeaderAddOnOnlySampleTime']}' + )"; + $this->db_onedev->query($sql); + + $sql = "INSERT INTO sample_by_step( + SampleByStepM_StatusSampleCode, + SampleByStepT_OrderHeaderID, + SampleByStepT_BarcodeLabID, + SampleByStepRequirementStatus, + SampleByStepRequirements, + SampleByStepUserID, + SampleByStepDateTime + ) + VALUES( + 'SAMPLING.Verification.Verify', + {$prm['sample']['T_OrderHeaderID']}, + {$prm['sample']['T_BarcodeLabID']}, + '{$prm['sample']['requirement_status']}', + '{$requirements}', + {$userid}, + NOW() + )"; + $this->db_onedev->query($sql); + + $sql = "INSERT INTO sample_by_step( + SampleByStepM_StatusSampleCode, + SampleByStepT_OrderHeaderID, + SampleByStepT_BarcodeLabID, + SampleByStepRequirementStatus, + SampleByStepRequirements, + SampleByStepUserID, + SampleByStepDateTime + ) + VALUES( + 'SAMPLING.Verification.To.Handling', + {$prm['sample']['T_OrderHeaderID']}, + {$prm['sample']['T_BarcodeLabID']}, + '{$prm['sample']['requirement_status']}', + '{$requirements}', + {$userid}, + NOW() + )"; + $this->db_onedev->query($sql); + + $sql = "INSERT INTO sample_by_step( + SampleByStepM_StatusSampleCode, + SampleByStepT_OrderHeaderID, + SampleByStepT_BarcodeLabID, + SampleByStepRequirementStatus, + SampleByStepRequirements, + SampleByStepUserID, + SampleByStepDateTime + ) + VALUES( + 'SAMPLING.Handling.From.Verification', + {$prm['sample']['T_OrderHeaderID']}, + {$prm['sample']['T_BarcodeLabID']}, + '{$prm['sample']['requirement_status']}', + '{$requirements}', + {$userid}, + NOW() + )"; + $this->db_onedev->query($sql); + + $query = " INSERT INTO t_sampling_queue_last_status ( + T_SamplingQueueLastStatusT_SampleStationID, + T_SamplingQueueLastStatusT_OrderHeaderID, + T_SamplingQueueLastStatusT_SamplingQueueStatusID, + T_SamplingQueueLastStatusUserID) + VALUES( + {$vs['T_SampleStationID']}, + {$rst_id}, + '5', + {$userid}) + ON DUPLICATE KEY UPDATE + T_SamplingQueueLastStatusT_SamplingQueueStatusID = 5, + T_SamplingQueueLastStatusUserID = {$userid}"; + //echo $query; + $this->db_onedev->query($query); + } + } + + } + +} diff --git a/application/libraries/Ciqrcode.php b/application/libraries/Ciqrcode.php new file mode 100644 index 00000000..da7cad7c --- /dev/null +++ b/application/libraries/Ciqrcode.php @@ -0,0 +1,106 @@ +initialize($config); + } + + public function initialize($config = array()) { + $this->cacheable = (isset($config['cacheable'])) ? $config['cacheable'] : $this->cacheable; + $this->cachedir = (isset($config['cachedir'])) ? $config['cachedir'] : FCPATH.$this->cachedir; + $this->errorlog = (isset($config['errorlog'])) ? $config['errorlog'] : FCPATH.$this->errorlog; + $this->quality = (isset($config['quality'])) ? $config['quality'] : $this->quality; + $this->size = (isset($config['size'])) ? $config['size'] : $this->size; + + // use cache - more disk reads but less CPU power, masks and format templates are stored there + if (!defined('QR_CACHEABLE')) define('QR_CACHEABLE', $this->cacheable); + + // used when QR_CACHEABLE === true + if (!defined('QR_CACHE_DIR')) define('QR_CACHE_DIR', $this->cachedir); + + // default error logs dir + if (!defined('QR_LOG_DIR')) define('QR_LOG_DIR', $this->errorlog); + + // if true, estimates best mask (spec. default, but extremally slow; set to false to significant performance boost but (propably) worst quality code + if ($this->quality) { + if (!defined('QR_FIND_BEST_MASK')) define('QR_FIND_BEST_MASK', true); + } else { + if (!defined('QR_FIND_BEST_MASK')) define('QR_FIND_BEST_MASK', false); + if (!defined('QR_DEFAULT_MASK')) define('QR_DEFAULT_MASK', $this->quality); + } + + // if false, checks all masks available, otherwise value tells count of masks need to be checked, mask id are got randomly + if (!defined('QR_FIND_FROM_RANDOM')) define('QR_FIND_FROM_RANDOM', false); + + // maximum allowed png image width (in pixels), tune to make sure GD and PHP can handle such big images + if (!defined('QR_PNG_MAXIMUM_SIZE')) define('QR_PNG_MAXIMUM_SIZE', $this->size); + } + + public function generate($params = array()) { + if (isset($params['black']) + && is_array($params['black']) + && count($params['black']) == 3 + && array_filter($params['black'], 'is_int') === $params['black']) { + QRimage::$black = $params['black']; + } + + if (isset($params['white']) + && is_array($params['white']) + && count($params['white']) == 3 + && array_filter($params['white'], 'is_int') === $params['white']) { + QRimage::$white = $params['white']; + } + + $params['data'] = (isset($params['data'])) ? $params['data'] : 'QR Code Library'; + if (isset($params['savename'])) { + $level = 'L'; + if (isset($params['level']) && in_array($params['level'], array('L','M','Q','H'))) $level = $params['level']; + + $size = 4; + if (isset($params['size'])) $size = min(max((int)$params['size'], 1), 10); + + QRcode::png($params['data'], $params['savename'], $level, $size, 2); + return $params['savename']; + } else { + $level = 'L'; + if (isset($params['level']) && in_array($params['level'], array('L','M','Q','H'))) $level = $params['level']; + + $size = 4; + if (isset($params['size'])) $size = min(max((int)$params['size'], 1), 10); + + QRcode::png($params['data'], NULL, $level, $size, 2); + } + } +} + +/* end of file */ diff --git a/application/libraries/Etlfisik.php b/application/libraries/Etlfisik.php new file mode 100644 index 00000000..b41a55b3 --- /dev/null +++ b/application/libraries/Etlfisik.php @@ -0,0 +1,3273 @@ +db_smartone = $CI->load->database("default", true); + $this->db_onedev = $CI->load->database("default", true); + } + + function clean_mysqli_connection($dbc) + { + while (mysqli_more_results($dbc)) { + if (mysqli_next_result($dbc)) { + $result = mysqli_use_result($dbc); + + if (get_class($result) == 'mysqli_stmt') { + mysqli_stmt_free_result($result); + } else { + unset($result); + } + } + } + } + + function generate_kelainan_by_order($orderID,$userID){ + $this->generate_kelainan_nonlab($orderID,$userID); + $this->generate_kelainan_lab($orderID,$userID); + //$this->generate_kelainan_lab($orderID,$userID); + $this->generate_all_fisik($orderID,$userID); + $sql = "SELECT * + FROM t_orderheader + JOIN so_resultentry ON So_ResultEntryT_OrderHeaderID = T_OrderHeaderID AND So_ResultEntryNonlab_TemplateID = 27 AND + So_ResultEntryIsActive = 'Y' + WHERE + T_OrderHeaderID = ? AND T_OrderHeaderIsActive = 'Y'"; + $query = $this->db_onedev->query($sql,array($orderID)); + $rst_fisik = $query->result_array(); + $soReID = 0; + if(count($rst_fisik)> 0){ + $soReID = $rst_fisik[0]['So_ResultEntryID']; + } + + $this->generate_summaries($orderID,$soReID,$userID,$debugID=0); + + $sql = " SELECT 'lab' as type, + T_KelainanLabID, + Mcu_KelainanName, + fn_get_translate_word_separator_comma(Mcu_KelainanName,2) as Mcu_KelainanNameEng, + Mcu_FitnessCategoryID, + Mcu_FitnessCategoryName, + Mcu_FitnessCategoryEng, + Mcu_FitnessCategoryLevel, + Nat_TestName + FROM t_kelainan_lab + JOIN mcu_summarylab ON T_KelainanLabMcu_SummaryLabID = Mcu_SummaryLabID + JOIN mcu_kelainan ON Mcu_summaryLabMcu_KelainanID = Mcu_KelainanID + JOIN mcu_fitness_category ON Mcu_SummaryLabMcu_FitnessCategoryID = Mcu_FitnessCategoryID + JOIN nat_test ON Mcu_SummaryLabNat_TestID = Nat_TestID + WHERE + T_KelainanLabT_OrderHeaderID = ? AND + T_KelainanLabIsActive= 'Y' + UNION + SELECT 'nonlab' as type, + T_KelainanNonLabID, + Mcu_KelainanName, + fn_get_translate_word_separator_comma(Mcu_KelainanName,2) as Mcu_KelainanNameEng, + Mcu_FitnessCategoryID, + Mcu_FitnessCategoryName, + Mcu_FitnessCategoryEng, + Mcu_FitnessCategoryLevel, + Nat_TestName + FROM t_kelainan_nonlab + JOIN mcu_summarynonlab ON T_KelainanNonLabMcu_SummaryNonlabID = Mcu_SummaryNonlabID + JOIN mcu_kelainan ON Mcu_SummaryNonlabMcu_KelainanID = Mcu_KelainanID + JOIN mcu_fitness_category ON Mcu_SummaryNonlabMcu_FitnessCategoryID = Mcu_FitnessCategoryID + JOIN nat_test ON Mcu_SummaryNonlabNat_TestID = Nat_TestID + WHERE + T_KelainanNonLabT_OrderHeaderID = ? AND + T_KelainanNonLabIsActive= 'Y' + UNION + SELECT 'fisik' as type, + T_KelainanFiskID, + Mcu_KelainanName, + fn_get_translate_word_separator_comma(Mcu_KelainanName,2) as Mcu_KelainanNameEng, + Mcu_FitnessCategoryID, + Mcu_FitnessCategoryName, + Mcu_FitnessCategoryEng, + Mcu_FitnessCategoryLevel, + GROUP_CONCAT(CONCAT(Mcu_FisikValueLabel,'|',Mcu_FisikValueSegment,'|',Mcu_FisikValueCategory)) as Nat_TestName + FROM t_kelainan_fisik + JOIN mcu_fisiksummary ON T_KelainanFiskMcu_FisikSummaryID = Mcu_FisikSummaryID + JOIN mcu_kelainan ON Mcu_FisikSummaryMcu_KelainanID = Mcu_KelainanID + JOIN mcu_fitness_category ON Mcu_FisikSummaryMcu_FitnessCategoryID = Mcu_FitnessCategoryID + JOIN mcu_fisiksummarydetail ON Mcu_FisikSummaryDetailMcu_FisikSummaryID = Mcu_FisikSummaryID AND + Mcu_FisikSummaryDetailIsActive = 'Y' + JOIN mcu_fisikvalue ON Mcu_FisikValueT_OrderHeaderID = T_KelainanFiskT_OrderHeaderID AND + Mcu_FisikSummaryDetailCode = Mcu_FisikValueCode AND Mcu_FisikValueIsActive = 'Y' + WHERE + T_KelainanFiskT_OrderHeaderID = ? AND + T_KelainanFiskIsActive = 'Y' + GROUP BY T_KelainanFiskID"; + $query = $this->db_onedev->query($sql,array($orderID,$orderID,$orderID)); + //echo $this->db_onedev->last_query(); + $rtn = $query->result_array(); + $status = array("id"=>"1","name" => "BAIK", "name_eng" => "FIT FOR WORK" ,"level" => "1"); + if(count($rtn) > 0){ + $max = 0; + foreach ($rtn as $key => $value) { + if(intval($value['Mcu_FitnessCategoryLevel']) > $max){ + $max = intval($value['Mcu_FitnessCategoryLevel']); + $status = array("id"=> $value['Mcu_FitnessCategoryID'],"name" => $value['Mcu_FitnessCategoryName'], "name_eng" => $value['Mcu_FitnessCategoryEng'] ,"level" => $value['Mcu_FitnessCategoryLevel']); + } + + } + } + + + $resposne = array("status" => $status,"data" => $rtn); + + return $resposne; + } + + function generate_kelainan_nonlab($orderID,$userID){ + $sql = "SELECT So_ResultEntryID, T_OrderHeaderID, T_TestNat_TestID, Mcu_SummaryNonlabID, Mcu_SummaryNonlabMcu_KelainanID, Mcu_SummaryNonlabID + FROM so_resultentry_category_result + JOIN so_resultentry ON So_ResultEntryCategoryResultSo_ResultEntryID = So_ResultEntryID AND + So_ResultEntryStatus <> 'NEW' AND So_ResultEntryIsActive = 'Y' + JOIN t_orderheader ON So_ResultEntryT_OrderHeaderID = T_OrderHeaderID AND T_OrderHeaderIsActive = 'Y' AND + T_OrderHeaderID = ? + JOIN t_orderdetail ON So_ResultEntryT_OrderDetailID = T_OrderDetailID AND T_OrderDetailIsActive = 'Y' + JOIN t_test ON T_OrderDetailT_TestID = T_TestID + JOIN mcu_summarynonlab ON Mcu_SummaryNonlabNat_TestID = T_TestNat_TestID AND + Mcu_SummaryNonlabIsActive = 'Y' AND So_ResultEntryCategoryNonlabConclusionDetailID IN (Mcu_SummaryNonlabConclusionDetailIDs) + WHERE + So_ResultEntryCategoryResultIsActive = 'Y'"; + + $qry = $this->db_onedev->query($sql,array($orderID)); + if (!$qry) { + echo $this->db_onedev->last_query(); + echo json_encode([ + "status" => "ERR", + "message" => "Error get order | " . $this->db_onedev->error()["message"] + ]); + exit; + } + + $rows = $qry->result_array(); + $sql = "UPDATE t_kelainan_nonlab SET + T_KelainanNonLabIsActive = 'N' + WHERE + T_KelainanNonLabT_OrderHeaderID = ? AND + T_KelainanNonLabIsActive = 'Y' + "; + $qry = $this->db_onedev->query($sql,array($orderID)); + + foreach ($rows as $key => $value) { + + + $sql = "INSERT INTO t_kelainan_nonlab ( + T_KelainanNonLabSo_ResultEntryID, + T_KelainanNonLabT_OrderHeaderID, + T_KelainanNonLabNat_TestID, + T_KelainanNonLabMcu_SummaryNonlabID, + T_KelainanNonLabCreatedUserID, + T_KelainanLabNonCreated + ) VALUES(?,?,?,?,?,NOW())"; + $qry = $this->db_onedev->query($sql,[ + $value['So_ResultEntryID'], + $value['T_OrderHeaderID'], + $value['T_TestNat_TestID'], + $value['Mcu_SummaryNonlabID'], + $userID + ]); + } + + } + + function generate_kelainan_lab($orderid) + { + $sql = "SELECT + T_OrderHeaderID,T_OrderHeaderLabNumber, + T_TestName, T_OrderDetailID, T_OrderDetailResult, T_OrderDetailNat_MethodeID, + T_OrderDetailNat_MethodeID, T_OrderDetailNat_MethodeName, + T_OrderDetailMinValue, T_OrderDetailMaxValue, T_OrderDetailMinValueInclusive, + T_OrderDetailMaxValueInclusive, + T_OrderDetailNormalValueNote, + Mcu_SummaryLabID, + Mcu_SummaryLabValue, + Mcu_SummaryLabNat_MethodeID, + Mcu_SummaryLabWithMethode, + Mcu_SummaryLabType, + Mcu_SummaryLabIsNormalValue, + Mcu_SummaryLabIsRange, + Mcu_SummaryLabMinInclusive, + Mcu_SummaryLabMinValue, + Mcu_SummaryLabMaxInclusive, + Mcu_SummaryLabMaxValue, + Mcu_KelainanID, Mcu_KelainanName, Mcu_KelainanClasification, + Nat_TestID, + Nat_TestCode, + mcu_kelainangroup.* + from t_orderdetail + join t_orderheader on T_OrderHeaderID = {$orderid} + and T_OrderHeaderID = T_OrderDetailT_OrderHeaderID + and T_OrderDetailIsActive = 'Y' + JOIN m_patient + ON T_OrderHeaderM_PatientID = M_PatientID + JOIN m_sex ON M_PatientM_SexID = M_SexID + join t_test + on T_OrderDetailT_TestID = T_TestID + join nat_test ON T_TestNat_TestID = Nat_TestID + join mcu_summarylab on T_TestNat_TestID = Mcu_SummaryLabNat_TestID AND Mcu_SummaryLabIsActive = 'Y' + AND (Mcu_SummaryLabGender = 'A' OR (Mcu_SummaryLabGender <> 'A' AND Mcu_SummaryLabGender = CASE + WHEN LOWER(M_SexNameLang) = 'male' THEN 'M' + WHEN LOWER(M_SexNameLang) = 'female' THEN 'F' + else '' + END)) + join mcu_kelainan on Mcu_SummaryLabMcu_KelainanID = Mcu_KelainanID + join mcu_kelainangroup on Mcu_KelainanMcu_KelainanGroupID = Mcu_KelainanGroupID"; + //echo $sql; + $qry = $this->db_onedev->query($sql); + if (!$qry) { + echo $this->db_onedev->last_query(); + echo json_encode([ + "status" => "ERR", + "message" => "Error get order | " . $this->db_onedev->error()["message"] + ]); + exit; + } + + $rows = $qry->result_array(); + $results = []; + + + + foreach ($rows as $r) { + $result_value = $r['T_OrderDetailResult']; + + $value_comparison = 0; + //echo $r['Mcu_SummaryLabIsNormalValue']; + $kelainan = []; + $notavailable = []; + if (trim($result_value) == 'NA') { + $notavailable = $r; + } elseif ($r['Mcu_SummaryLabIsNormalValue'] == 'Y') { + if ($r['Mcu_SummaryLabType'] == '<' || $r['Mcu_SummaryLabType'] == '<=') { + $value_comparison = $r['T_OrderDetailMinValue']; + } + if ($r['Mcu_SummaryLabType'] == '>' || $r['Mcu_SummaryLabType'] == '>=') { + $value_comparison = $r['T_OrderDetailMaxValue']; + } + if ($r['Mcu_SummaryLabType'] == '!=') { + $result_value = strtolower(trim($result_value)); + $value_comparison = strtolower(trim($r['T_OrderDetailNormalValueNote'])); + } + + + + //echo "Y"; + if ($r['Mcu_SummaryLabWithMethode'] == 'N' && $this->dynamic_comparison($result_value, $r['Mcu_SummaryLabType'], $value_comparison)) { + //echo $r['T_TestName']." : ".$r['Mcu_KelainanName'].", "; + $kelainan = $r; + $results[] = array('test' => $r['T_TestName'], 'nat_test' => $r['Nat_TestCode'], 'kelainan' => $r['Mcu_KelainanName'], 'orderdetailID' => $r['T_OrderDetailID'], 'orderheaderID' => $r['T_OrderHeaderID'], 'nat_testID' => $r['Nat_TestID'], 'mcu_summarylabID' => $r['Mcu_SummaryLabID']); + } + } else if ($r['Mcu_SummaryLabIsRange'] == 'Y') { + // Mcu_SummaryLabIsNormalValue, + // Mcu_SummaryLabIsRange, + // Mcu_SummaryLabMinInclusive, + // Mcu_SummaryLabMinValue, + // Mcu_SummaryLabMaxInclusive, + // Mcu_SummaryLabMaxValue, + $isWithinMin = $r['Mcu_SummaryLabMinInclusive'] === 'Y' ? floatval($result_value) >= floatval($r['Mcu_SummaryLabMinValue']) : floatval($result_value) > floatval($r['Mcu_SummaryLabMinValue']); + $isWithinMax = $r['Mcu_SummaryLabMaxInclusive'] === 'Y' ? floatval($result_value) <= floatval($r['Mcu_SummaryLabMaxValue']) : floatval($result_value) < floatval($r['Mcu_SummaryLabMaxValue']); + + if ($isWithinMax && $isWithinMin) { + $kelainan = $r; + $results[] = array('test' => $r['T_TestName'], 'nat_test' => $r['Nat_TestCode'], 'kelainan' => $r['Mcu_KelainanName'], 'orderdetailID' => $r['T_OrderDetailID'], 'orderheaderID' => $r['T_OrderHeaderID'], 'nat_testID' => $r['Nat_TestID'], 'mcu_summarylabID' => $r['Mcu_SummaryLabID']); + } + } else { + $value_comparison = $r['Mcu_SummaryLabValue']; + if ($r['Mcu_SummaryLabType'] == '!=' || $r['Mcu_SummaryLabType'] == '==') { + if ($this->dynamic_comparison($result_value, $r['Mcu_SummaryLabType'], $value_comparison)) { + //echo $r['T_TestName']." : ".$r['Mcu_KelainanName'].", "; + $kelainan = $r; + $results[] = array('test' => $r['T_TestName'], 'nat_test' => $r['Nat_TestCode'], 'kelainan' => $r['Mcu_KelainanName'], 'orderdetailID' => $r['T_OrderDetailID'], 'orderheaderID' => $r['T_OrderHeaderID'], 'nat_testID' => $r['Nat_TestID'], 'mcu_summarylabID' => $r['Mcu_SummaryLabID']); + } + } else { + if (is_numeric($result_value) && $this->dynamic_comparison($result_value, $r['Mcu_SummaryLabType'], $value_comparison)) { + //echo $r['T_TestName']." : ".$r['Mcu_KelainanName'].", "; + $kelainan = $r; + $results[] = array('test' => $r['T_TestName'], 'nat_test' => $r['Nat_TestCode'], 'kelainan' => $r['Mcu_KelainanName'], 'orderdetailID' => $r['T_OrderDetailID'], 'orderheaderID' => $r['T_OrderHeaderID'], 'nat_testID' => $r['Nat_TestID'], 'mcu_summarylabID' => $r['Mcu_SummaryLabID']); + } + } + } + + if (count($results) > 0) { + $sql = "UPDATE t_kelainan_lab + SET T_KelainanLabIsActive = 'N' + WHERE + T_KelainanLabT_OrderHeaderID = {$orderid}"; + $this->db_onedev->query($sql); + + foreach ($results as $v_result) { + $sql_kel_lab = "SELECT * + FROM t_kelainan_lab + WHERE T_KelainanLabT_OrderDetailID = ? + GROUP BY T_KelainanLabT_OrderDetailID"; + $qry_kel_lab = $this->db_onedev->query($sql_kel_lab, array($v_result['orderdetailID'])); + if ($qry_kel_lab) { + $rows_kel = $qry_kel_lab->result_array(); + } else { + $this->sys_error_db("select kelainan lab", $this->db_onedev); + exit; + } + + if (count($rows_kel) > 0) { + + // print_r($v_result['orderdetailID']); + // exit; + + $sql_update_kel = "UPDATE t_kelainan_lab + SET T_KelainanLabT_OrderDetailID = {$v_result['orderdetailID']}, + T_KelainanLabT_OrderHeaderID = {$v_result['orderheaderID']}, + T_KelainanLabNat_TestID = {$v_result['nat_testID']}, + T_KelainanLabMcu_SummaryLabID = {$v_result['mcu_summarylabID']}, + T_KelainanLabCreatedUserID = 1, + T_KelainanLabIsActive = 'Y', + T_KelainanLabCreated = NOW() + WHERE T_KelainanLabID = {$rows_kel[0]['T_KelainanLabID']}"; + $qry_update_kel = $this->db_onedev->query($sql_update_kel); + if (!$qry_update_kel) { + echo $this->db_onedev->last_query(); + //$this->db_onedev->trans_rollback(); + $this->sys_error_db('error', 'Error update lab: ' . $this->db_onedev); + exit; + } + } else { + // print_r('insert'); + // exit; + $sql_insert_lab = "INSERT INTO t_kelainan_lab( + T_KelainanLabT_OrderDetailID, + T_KelainanLabT_OrderHeaderID, + T_KelainanLabNat_TestID, + T_KelainanLabMcu_SummaryLabID, + T_KelainanLabCreatedUserID, + T_KelainanLabCreated) + VALUES( + '{$v_result['orderdetailID']}', + '{$v_result['orderheaderID']}', + '{$v_result['nat_testID']}', + '{$v_result['mcu_summarylabID']}', + 1, + NOW())"; + $qry_insert_lab = $this->db_onedev->query($sql_insert_lab); + + if (!$qry_insert_lab) { + //$this->db_onedev->trans_rollback(); + echo $this->db_onedev->last_query(); + $this->sys_error_db('error', 'Error insert kelainan lab: ' . $this->db_onedev); + exit; + } + } + } + } + } + } + + function generate_kelainan_lab_x($orderid) + { + $sql = "SELECT + T_OrderHeaderID,T_OrderHeaderLabNumber, + T_TestName, T_OrderDetailID, T_OrderDetailResult, T_OrderDetailNat_MethodeID, + T_OrderDetailNat_MethodeID, T_OrderDetailNat_MethodeName, + T_OrderDetailMinValue, T_OrderDetailMaxValue, T_OrderDetailMinValueInclusive, + T_OrderDetailMaxValueInclusive, + Mcu_SummaryLabID, + Mcu_SummaryLabValue, + Mcu_SummaryLabNat_MethodeID, + Mcu_SummaryLabWithMethode, + Mcu_SummaryLabType, + Mcu_SummaryLabIsNormalValue, + Mcu_SummaryLabIsRange, + Mcu_SummaryLabMinInclusive, + Mcu_SummaryLabMinValue, + Mcu_SummaryLabMaxInclusive, + Mcu_SummaryLabMaxValue, + Mcu_KelainanID, Mcu_KelainanName, Mcu_KelainanClasification, + Nat_TestID, + Nat_TestCode, + mcu_kelainangroup.* + from t_orderdetail + join t_orderheader on T_OrderHeaderID = {$orderid} + and T_OrderHeaderID = T_OrderDetailT_OrderHeaderID + and T_OrderDetailIsActive = 'Y' + JOIN m_patient + ON T_OrderHeaderM_PatientID = M_PatientID + join t_test + on T_OrderDetailT_TestID = T_TestID + join nat_test ON T_TestNat_TestID = Nat_TestID + join mcu_summarylab on T_TestNat_TestID = Mcu_SummaryLabNat_TestID AND Mcu_SummaryLabIsActive = 'Y' + AND (Mcu_SummaryLabGender = 'A' OR (Mcu_SummaryLabGender <> 'A' AND Mcu_SummaryLabGender = CASE + WHEN LOWER(M_PatientGender) = 'male' THEN 'M' + WHEN LOWER(M_PatientGender) = 'female' THEN 'F' + else '' + END)) + join mcu_kelainan on Mcu_SummaryLabMcu_KelainanID = Mcu_KelainanID + join mcu_kelainangroup on Mcu_KelainanMcu_KelainanGroupID = Mcu_KelainanGroupID"; + //echo $sql; + $qry = $this->db_onedev->query($sql); + if (!$qry) { + echo $this->db_onedev->last_query(); + echo json_encode([ + "status" => "ERR", + "message" => "Error get order | " . $this->db_onedev->error()["message"] + ]); + exit; + } + + $rows = $qry->result_array(); + $results = []; + + + + foreach ($rows as $r) { + $result_value = $r['T_OrderDetailResult']; + + $value_comparison = 0; + //echo $r['Mcu_SummaryLabIsNormalValue']; + $kelainan = []; + $notavailable = []; + if (trim($result_value) == 'NA') { + $notavailable = $r; + } elseif ($r['Mcu_SummaryLabIsNormalValue'] == 'Y') { + if ($r['Mcu_SummaryLabType'] == '<' || $r['Mcu_SummaryLabType'] == '<=') { + $value_comparison = $r['T_OrderDetailMinValue']; + } + if ($r['Mcu_SummaryLabType'] == '>' || $r['Mcu_SummaryLabType'] == '>=') { + $value_comparison = $r['T_OrderDetailMaxValue']; + } + //echo "Y"; + if ($r['Mcu_SummaryLabWithMethode'] == 'N' && $this->dynamic_comparison($result_value, $r['Mcu_SummaryLabType'], $value_comparison)) { + //echo $r['T_TestName']." : ".$r['Mcu_KelainanName'].", "; + $kelainan = $r; + $results[] = array('test' => $r['T_TestName'], 'nat_test' => $r['Nat_TestCode'], 'kelainan' => $r['Mcu_KelainanName'], 'orderdetailID' => $r['T_OrderDetailID'], 'orderheaderID' => $r['T_OrderHeaderID'], 'nat_testID' => $r['Nat_TestID'], 'mcu_summarylabID' => $r['Mcu_SummaryLabID']); + } + } else if ($r['Mcu_SummaryLabIsRange'] == 'Y') { + // Mcu_SummaryLabIsNormalValue, + // Mcu_SummaryLabIsRange, + // Mcu_SummaryLabMinInclusive, + // Mcu_SummaryLabMinValue, + // Mcu_SummaryLabMaxInclusive, + // Mcu_SummaryLabMaxValue, + $isWithinMin = $r['Mcu_SummaryLabMinInclusive'] === 'Y' ? floatval($result_value) >= floatval($r['Mcu_SummaryLabMinValue']) : floatval($result_value) > floatval($r['Mcu_SummaryLabMinValue']); + $isWithinMax = $r['Mcu_SummaryLabMaxInclusive'] === 'Y' ? floatval($result_value) <= floatval($r['Mcu_SummaryLabMaxValue']) : floatval($result_value) < floatval($r['Mcu_SummaryLabMaxValue']); + + if ($isWithinMax && $isWithinMin) { + $kelainan = $r; + $results[] = array('test' => $r['T_TestName'], 'nat_test' => $r['Nat_TestCode'], 'kelainan' => $r['Mcu_KelainanName'], 'orderdetailID' => $r['T_OrderDetailID'], 'orderheaderID' => $r['T_OrderHeaderID'], 'nat_testID' => $r['Nat_TestID'], 'mcu_summarylabID' => $r['Mcu_SummaryLabID']); + } + } else { + $value_comparison = $r['Mcu_SummaryLabValue']; + if ($r['Mcu_SummaryLabType'] == '!=' || $r['Mcu_SummaryLabType'] == '==') { + if ($this->dynamic_comparison($result_value, $r['Mcu_SummaryLabType'], $value_comparison)) { + //echo $r['T_TestName']." : ".$r['Mcu_KelainanName'].", "; + $kelainan = $r; + $results[] = array('test' => $r['T_TestName'], 'nat_test' => $r['Nat_TestCode'], 'kelainan' => $r['Mcu_KelainanName'], 'orderdetailID' => $r['T_OrderDetailID'], 'orderheaderID' => $r['T_OrderHeaderID'], 'nat_testID' => $r['Nat_TestID'], 'mcu_summarylabID' => $r['Mcu_SummaryLabID']); + } + } else { + if (is_numeric($result_value) && $this->dynamic_comparison($result_value, $r['Mcu_SummaryLabType'], $value_comparison)) { + //echo $r['T_TestName']." : ".$r['Mcu_KelainanName'].", "; + $kelainan = $r; + $results[] = array('test' => $r['T_TestName'], 'nat_test' => $r['Nat_TestCode'], 'kelainan' => $r['Mcu_KelainanName'], 'orderdetailID' => $r['T_OrderDetailID'], 'orderheaderID' => $r['T_OrderHeaderID'], 'nat_testID' => $r['Nat_TestID'], 'mcu_summarylabID' => $r['Mcu_SummaryLabID']); + } + } + } + + if (count($results) > 0) { + $sql = "UPDATE t_kelainan_lab + SET T_KelainanLabIsActive = 'N' + WHERE + T_KelainanLabT_OrderHeaderID = {$orderid}"; + $this->db_onedev->query($sql); + + foreach ($results as $v_result) { + $sql_kel_lab = "SELECT * + FROM t_kelainan_lab + WHERE T_KelainanLabT_OrderDetailID = ? + GROUP BY T_KelainanLabT_OrderDetailID"; + $qry_kel_lab = $this->db_onedev->query($sql_kel_lab, array($v_result['orderdetailID'])); + if ($qry_kel_lab) { + $rows_kel = $qry_kel_lab->result_array(); + } else { + $this->sys_error_db("select kelainan lab", $this->db_onedev); + exit; + } + + if (count($rows_kel) > 0) { + + // print_r($v_result['orderdetailID']); + // exit; + + $sql_update_kel = "UPDATE t_kelainan_lab + SET T_KelainanLabT_OrderDetailID = {$v_result['orderdetailID']}, + T_KelainanLabT_OrderHeaderID = {$v_result['orderheaderID']}, + T_KelainanLabNat_TestID = {$v_result['nat_testID']}, + T_KelainanLabMcu_SummaryLabID = {$v_result['mcu_summarylabID']}, + T_KelainanLabCreatedUserID = 1, + T_KelainanLabIsActive = 'Y', + T_KelainanLabCreated = NOW() + WHERE T_KelainanLabID = {$rows_kel[0]['T_KelainanLabID']}"; + $qry_update_kel = $this->db_onedev->query($sql_update_kel); + if (!$qry_update_kel) { + echo $this->db_onedev->last_query(); + //$this->db_onedev->trans_rollback(); + $this->sys_error_db('error', 'Error update lab: ' . $this->db_onedev); + exit; + } + } else { + // print_r('insert'); + // exit; + $sql_insert_lab = "INSERT INTO t_kelainan_lab( + T_KelainanLabT_OrderDetailID, + T_KelainanLabT_OrderHeaderID, + T_KelainanLabNat_TestID, + T_KelainanLabMcu_SummaryLabID, + T_KelainanLabCreatedUserID, + T_KelainanLabCreated) + VALUES( + '{$v_result['orderdetailID']}', + '{$v_result['orderheaderID']}', + '{$v_result['nat_testID']}', + '{$v_result['mcu_summarylabID']}', + 1, + NOW())"; + $qry_insert_lab = $this->db_onedev->query($sql_insert_lab); + + if (!$qry_insert_lab) { + //$this->db_onedev->trans_rollback(); + echo $this->db_onedev->last_query(); + $this->sys_error_db('error', 'Error insert kelainan lab: ' . $this->db_onedev); + exit; + } + } + } + } + } + } + + function dynamic_comparison($varleft, $op, $varright) + { + + switch ($op) { + case "=": + return $varleft == $varright; + case "!=": + return $varleft != $varright; + case ">=": + return $varleft >= $varright; + case "<=": + return $varleft <= $varright; + case ">": + return $varleft > $varright; + case "<": + return $varleft < $varright; + default: + return true; + } + } + + function generate_kelainan_lab_old($orderid) + { + $sql = "select + T_OrderHeaderID,T_OrderHeaderLabNumber, + T_TestName, T_OrderDetailID, T_OrderDetailResult, T_OrderDetailNat_MethodeID, + T_OrderDetailNat_MethodeID, T_OrderDetailNat_MethodeName, + T_OrderDetailMinValue, T_OrderDetailMaxValue, T_OrderDetailMinValueInclusive, + T_OrderDetailMaxValueInclusive, + Mcu_SummaryLabID, + Mcu_SummaryLabValue, + Mcu_SummaryLabNat_MethodeID, + Mcu_SummaryLabWithMethode, + Mcu_SummaryLabType, + Mcu_SummaryLabIsNormalValue, + Mcu_KelainanID, Mcu_KelainanName, Mcu_KelainanClasification, + Nat_TestID, + Nat_TestCode, + mcu_kelainangroup.* + from t_orderdetail + join t_orderheader on T_OrderHeaderID = {$orderid} + and T_OrderHeaderID = T_OrderDetailT_OrderHeaderID + and T_OrderDetailIsActive = 'Y' + join t_test + on T_OrderDetailT_TestID = T_TestID + join nat_test ON T_TestNat_TestID = Nat_TestID + join mcu_summarylab on T_TestNat_TestID = Mcu_SummaryLabNat_TestID AND Mcu_SummaryLabIsActive = 'Y' + join mcu_kelainan on Mcu_SummaryLabMcu_KelainanID = Mcu_KelainanID + join mcu_kelainangroup on Mcu_KelainanMcu_KelainanGroupID = Mcu_KelainanGroupID"; + //echo $sql; + $qry = $this->db_onedev->query($sql); + if (!$qry) { + echo $this->db_onedev->last_query(); + echo json_encode([ + "status" => "ERR", + "message" => "Error get order | " . $this->db_onedev->error()["message"] + ]); + exit; + } + + $rows = $qry->result_array(); + $results = []; + + + + foreach ($rows as $r) { + $result_value = $r['T_OrderDetailResult']; + + $value_comparison = 0; + //echo $r['Mcu_SummaryLabIsNormalValue']; + $kelainan = []; + $notavailable = []; + if (trim($result_value) == 'NA') { + $notavailable = $r; + } elseif ($r['Mcu_SummaryLabIsNormalValue'] == 'Y') { + if ($r['Mcu_SummaryLabType'] == '<' || $r['Mcu_SummaryLabType'] == '<=') { + $value_comparison = $r['T_OrderDetailMinValue']; + } + if ($r['Mcu_SummaryLabType'] == '>' || $r['Mcu_SummaryLabType'] == '>=') { + $value_comparison = $r['T_OrderDetailMaxValue']; + } + //echo "Y"; + if ($r['Mcu_SummaryLabWithMethode'] == 'N' && $this->dynamic_comparison($result_value, $r['Mcu_SummaryLabType'], $value_comparison)) { + //echo $r['T_TestName']." : ".$r['Mcu_KelainanName'].", "; + $kelainan = $r; + $results[] = array('test' => $r['T_TestName'], 'nat_test' => $r['Nat_TestCode'], 'kelainan' => $r['Mcu_KelainanName'], 'orderdetailID' => $r['T_OrderDetailID'], 'orderheaderID' => $r['T_OrderHeaderID'], 'nat_testID' => $r['Nat_TestID'], 'mcu_summarylabID' => $r['Mcu_SummaryLabID']); + } + } else { + $value_comparison = $r['Mcu_SummaryLabValue']; + if ($r['Mcu_SummaryLabType'] == '!=' || $r['Mcu_SummaryLabType'] == '==') { + if ($this->dynamic_comparison($result_value, $r['Mcu_SummaryLabType'], $value_comparison)) { + //echo $r['T_TestName']." : ".$r['Mcu_KelainanName'].", "; + $kelainan = $r; + $results[] = array('test' => $r['T_TestName'], 'nat_test' => $r['Nat_TestCode'], 'kelainan' => $r['Mcu_KelainanName'], 'orderdetailID' => $r['T_OrderDetailID'], 'orderheaderID' => $r['T_OrderHeaderID'], 'nat_testID' => $r['Nat_TestID'], 'mcu_summarylabID' => $r['Mcu_SummaryLabID']); + } + } else { + if (is_numeric($result_value) && $this->dynamic_comparison($result_value, $r['Mcu_SummaryLabType'], $value_comparison)) { + //echo $r['T_TestName']." : ".$r['Mcu_KelainanName'].", "; + $kelainan = $r; + $results[] = array('test' => $r['T_TestName'], 'nat_test' => $r['Nat_TestCode'], 'kelainan' => $r['Mcu_KelainanName'], 'orderdetailID' => $r['T_OrderDetailID'], 'orderheaderID' => $r['T_OrderHeaderID'], 'nat_testID' => $r['Nat_TestID'], 'mcu_summarylabID' => $r['Mcu_SummaryLabID']); + } + } + } + + if (count($results) > 0) { + $sql = "UPDATE t_kelainan_lab + SET T_KelainanLabIsActive = 'N' + WHERE + T_KelainanLabT_OrderHeaderID = {$orderid}"; + $this->db_onedev->query($sql); + + foreach ($results as $v_result) { + $sql_kel_lab = "SELECT * + FROM t_kelainan_lab + WHERE T_KelainanLabT_OrderDetailID = ? + GROUP BY T_KelainanLabT_OrderDetailID"; + $qry_kel_lab = $this->db_onedev->query($sql_kel_lab, array($v_result['orderdetailID'])); + if ($qry_kel_lab) { + $rows_kel = $qry_kel_lab->result_array(); + } else { + $this->sys_error_db("select kelainan lab", $this->db_onedev); + exit; + } + + if (count($rows_kel) > 0) { + + $sql_update_kel = "UPDATE t_kelainan_lab + SET T_KelainanLabT_OrderDetailID = {$v_result['orderdetailID']}, + T_KelainanLabT_OrderHeaderID = {$v_result['orderheaderID']}, + T_KelainanLabNat_TestID = {$v_result['nat_testID']}, + T_KelainanLabMcu_SummaryLabID = {$v_result['mcu_summarylabID']}, + T_KelainanLabCreatedUserID = 1, + T_KelainanLabIsActive = 'Y', + T_KelainanLabCreated = NOW() + WHERE T_KelainanLabID = {$rows_kel[0]['T_KelainanLabID']}"; + $qry_update_kel = $this->db_onedev->query($sql_update_kel); + if (!$qry_update_kel) { + echo $this->db_onedev->last_query(); + //$this->db_onedev->trans_rollback(); + $this->sys_error_db('error', 'Error update lab: ' . $this->db_onedev); + exit; + } + } else { + // print_r('insert'); + // exit; + $sql_insert_lab = "INSERT INTO t_kelainan_lab( + T_KelainanLabT_OrderDetailID, + T_KelainanLabT_OrderHeaderID, + T_KelainanLabNat_TestID, + T_KelainanLabMcu_SummaryLabID, + T_KelainanLabCreatedUserID, + T_KelainanLabCreated) + VALUES( + '{$v_result['orderdetailID']}', + '{$v_result['orderheaderID']}', + '{$v_result['nat_testID']}', + '{$v_result['mcu_summarylabID']}', + 1, + NOW())"; + $qry_insert_lab = $this->db_onedev->query($sql_insert_lab); + + if (!$qry_insert_lab) { + //$this->db_onedev->trans_rollback(); + echo $this->db_onedev->last_query(); + $this->sys_error_db('error', 'Error insert kelainan lab: ' . $this->db_onedev); + exit; + } + } + } + } + } + } + + function insert_data_etl($data,$userid){ + if($data){ + + /*$sql = "UPDATE mcu_fisikvalue SET + Mcu_FisikValueIsActive = 'N', + Mcu_FisikValueLastUpdated = NOW() , + Mcu_FisikValueLastUpdatedUserID = ? + WHERE + Mcu_FisikValueT_OrderHeaderID = ? AND + Mcu_FisikValueCode = ? AND + Mcu_FisikValueIsActive = 'Y'"; + $qry = $this->db_smartone->query($sql,array($userid,$data['order_id'],$data['code'])); + if (! $qry) { + return false; + }*/ + + $sql = "SELECT COUNT(*) as xcount, Mcu_FisikValueID as id + FROM mcu_fisikvalue + WHERE + Mcu_FisikValueT_OrderHeaderID = ? AND + Mcu_FisikValueCode = ? + LIMIT 1 + "; + $qry = $this->db_smartone->query($sql,array($data['order_id'],$data['code'])); + if (! $qry) { + return false; + } + + //echo $this->db_smartone->last_query(); + //print_r($data); + //echo $data['code']; + /*if($data['code'] == 'bmi_classification_asia_pacific'){ + echo $this->db_smartone->last_query(); + }*/ + + $exist_dt = $qry->row_array(); + /*if($data['code'] == 'bmi_classification_asia_pacific'){ + print_r($exist_dt); + }*/ + + if($exist_dt['xcount'] > 0){ + $sql = "UPDATE mcu_fisikvalue SET + Mcu_FisikValueIsActive = 'Y', + Mcu_FisikValueLastUpdated = NOW() , + Mcu_FisikValueLastUpdatedUserID = ?, + Mcu_FisikValueLabel = ?, + Mcu_FisikValueNote = ?, + Mcu_FisikValueSegment = ?, + Mcu_FisikValueCategory = ? + WHERE + Mcu_FisikValueID = ? + "; + $qry = $this->db_smartone->query($sql,array($userid,$data['label'],$data['note'],$data['segment'],$data['category'],$exist_dt['id'])); + }else{ + $sql = "INSERT INTO mcu_fisikvalue ( + `Mcu_FisikValueT_OrderHeaderID`, + `Mcu_FisikValueCode`, + `Mcu_FisikValueLabel`, + `Mcu_FisikValueNote`, + `Mcu_FisikValueSegment`, + `Mcu_FisikValueCategory`, + `Mcu_FisikValueCreated`, + `Mcu_FisikValueCreatedUserID` + ) VALUES(?,?,?,?,?,?,NOW(),?)"; + $qry = $this->db_smartone->query($sql,array( + $data['order_id'], + $data['code'], + $data['label'], + $data['note'], + $data['segment'], + $data['category'], + $userid + )); + if (! $qry) { + return false; + } + } + } + } + + function generate_all_fisik($orderID,$userid){ + $this->status_gizi($orderID,$userid); + $this->persepsi_warna($orderID,$userid); + $this->visus($orderID,$userid); + + $sql = "SELECT * + FROM so_resultentry + WHERE + So_ResultEntryNonlab_TemplateID = 27 AND + So_ResultEntryT_OrderHeaderID = ? AND + So_ResultEntryIsActive = 'Y' + LIMIT 1"; + $qry = $this->db_smartone->query($sql,array($orderID)); + if (! $qry) { + return false; + } + //echo $this->db_smartone->last_query(); + $results = $qry->result_array(); + if(count($results) > 0){ + $soReID = $results[0]['So_ResultEntryID']; + + $this->keluhan($soReID,$userid); + $this->riwayat_penyakit($soReID,$userid); + $this->penyakit_keluarga($soReID,$userid); + $this->kebiasaan_hidup($soReID,$userid); + $this->fisik_konsumsiobatteratur($soReID,$userid); + $this->imunasi($soReID,$userid); + $this->vital_sign($soReID,$userid); + $this->keadaan_umum($soReID,$userid); + $this->kepala_wajah($soReID,$userid); + $this->mata($soReID,$userid); + $this->lapang_pandang($soReID,$userid); + $this->telinga($soReID,$userid); + $this->hidung($soReID,$userid); + $this->gigi($soReID,$userid); + $this->mulut($soReID,$userid); + $this->leher($soReID,$userid); + $this->thorax($soReID,$userid); + $this->paru($soReID,$userid); + $this->jantung($soReID,$userid); + $this->perut($soReID,$userid); + $this->sistem_integumen($soReID,$userid); + $this->genitourinaria($soReID,$userid); + $this->anggota_gerak($soReID,$userid); + $this->sistem_persyarafan($soReID,$userid); + $this->smell_test($soReID,$userid); + $this->low_back_pain_screening_test($soReID,$userid); + $this->loop_k3($soReID,$userid); + + } + + return true; + } + + function visus($orderID,$userid) { + $ret_array = []; + + $sql = " SELECT * , T_SamplingAdditionalFisikVisusID as visus_id + FROM t_samplingso_additional_fisik_visus + WHERE + T_SamplingAdditionalFisikVisusT_OrderHeaderID = ? LIMIT 1"; + $qry = $this->db_smartone->query($sql,array($orderID)); + if (! $qry) { + return false; + } + + $row_result = $qry->row_array(); + //echo $this->db_smartone->last_query(); + + + if($row_result && intval($row_result['visus_id']) > 0){ + + + + $visus = array(); + $visus_kiri = ""; + $visus_kanan = ""; + $visus_kesimpulan = ""; + $normal = array("20/20", "20/25","6/6","6/7.5","6/7,5"); + $miopia_od = false; + $miopia_os = false; + $miopia_od_value = ''; + $miopia_os_value = ''; + $astigmatismus_od = false; + $astigmatismus_os = false; + $astigmatismus_od_value = ''; + $astigmatismus_os_value = ''; + $presbiopia_ods = false; + $presbiopia_ods_value = ''; + $x_od = false; + $x_os = false; + $x_od_value = ""; + $x_os_value = ""; + $od_visus = "20/20"; + $os_visus = "20/20"; + if($row_result['T_SamplingAdditionalFisikVisusTKODV'] == '6/7,5' || $row_result['T_SamplingAdditionalFisikVisusTKODV'] == '6/6' || $row_result['T_SamplingAdditionalFisikVisusTKODV'] == '6/7.5') + $od_visus = $row_result['T_SamplingAdditionalFisikVisusTKODV'] ; + + if($row_result['T_SamplingAdditionalFisikVisusTKOSV'] == '6/7,5' || $row_result['T_SamplingAdditionalFisikVisusTKOSV'] == '6/6' || $row_result['T_SamplingAdditionalFisikVisusTKOSV'] == '6/7.5') + $os_visus = $row_result['T_SamplingAdditionalFisikVisusTKOSV'] ; + + + + if((strtolower($row_result['T_SamplingAdditionalFisikVisusTKODV']) != "normal" && $row_result['T_SamplingAdditionalFisikVisusTKODV'] != "" && $row_result['T_SamplingAdditionalFisikVisusTKODV'] != "-") && ($row_result['T_SamplingAdditionalFisikVisusTKOSV'] != "" && $row_result['T_SamplingAdditionalFisikVisusTKOSV'] != "-" && strtolower($row_result['T_SamplingAdditionalFisikVisusTKODV']) != "normal" && strtolower($row_result['T_SamplingAdditionalFisikVisusTKOSV']) != "normal")){ + $visus[] = array( + "xx1" => "Tanpa Kacamata", + "xx2" => "OD : ", + "xx3" => $row_result['T_SamplingAdditionalFisikVisusTKODV'] + ); + + $visus[] = array( + "xx1" => "Tanpa Kacamata", + "xx2" => "OS", + "xx3" => $row_result['T_SamplingAdditionalFisikVisusTKOSV'] + ); + + + $rst['kelainan'] = "Kelainan refraksi (tanpa kacamata)"; + + if (!in_array($row_result['T_SamplingAdditionalFisikVisusTKODV'], $normal)){ + $value_koreksi_od = ""; + $od_sph = $row_result['T_SamplingAdditionalFisikVisusODSPH']; + if($od_sph != "" && $od_sph != "-" && $od_sph != "--" && $od_sph != "/-" && $od_sph != "/" && $od_sph != "-/" && strtolower(trim($od_sph)) != 'plano'){ + if ($visus_kanan != "") $visus_kanan .= ", "; + $visus_kanan .= $od_sph." (Miopia)"; + + $miopia_od = true; + $miopia_od_value = $od_sph; + } + + + $od_cyl = $row_result['T_SamplingAdditionalFisikVisusODCYL']; + + //$od_cyl = $row_result['T_SamplingAdditionalFisikVisusODCYL']; + if($od_cyl != "" && $od_cyl != "-" && $od_cyl != "--" && $od_cyl != "/-" && $od_cyl != "/" && $od_cyl != "-/"){ + if ($visus_kanan != "") $visus_kanan .= ", "; + $visus_kanan .= "Cyl ".$od_cyl; + + $astigmatismus_od = true; + $astigmatismus_od_value = $od_cyl; + } + + + $od_x = $row_result['T_SamplingAdditionalFisikVisusODX']; + //echo $od_x; + if($od_x != "" && $od_x != "-" && $od_x != "--" && $od_x != "/-" && $od_x != "/" && $od_x != "-/"){ + $visus_kanan .= " axis ".$od_x." (Astigmatismus)"; + $x_od = true; + $x_od = $od_x; + }else{ + if($od_cyl != "" && $od_cyl != "-" && $od_cyl != "--" && $od_cyl != "/-" && $od_cyl != "/" && $od_cyl != "-/") + $visus_kanan .= " (Astigmatismus)"; + } + //$value_koreksi_od .= "X (".$od_x.") "; + + + + } + + if (!in_array($row_result['T_SamplingAdditionalFisikVisusTKOSV'], $normal)){ + $value_koreksi_os = ""; + $os_sph = $row_result['T_SamplingAdditionalFisikVisusOSSPH']; + if(strtolower(trim($os_sph)) != "tidak terkoreksi" && strtolower(trim($os_sph)) != "tidak dapat dinilai" && $os_sph != "" && $os_sph != "-" && $os_sph != "--" && $os_sph != "/-" && $os_sph != "/" && $os_sph != "-/" && strtolower(trim($os_sph)) != 'plano'){ + if ($visus_kiri != "") $visus_kiri .= ", "; + $visus_kiri .= $os_sph." (Miopia)"; + + $miopia_os = true; + $miopia_os_value = $os_sph; + } + + $os_cyl = $row_result['T_SamplingAdditionalFisikVisusOSCYL']; + + if(strtolower(trim($os_cyl)) != "tidak terkoreksi" && strtolower(trim($os_cyl)) != "tidak dapat dinilai" && $os_cyl != "" && $os_cyl != "-" && $os_cyl != "--" && $os_cyl != "/-" && $os_cyl != "/" && $os_cyl != "-/"){ + if ($visus_kiri != "") $visus_kiri .= ", "; + $visus_kiri .= "Cyl ".$os_cyl; + + $astigmatismus_os = true; + $astigmatismus_os_value = $os_cyl; + } + + + $os_x = $row_result['T_SamplingAdditionalFisikVisusOSX']; + + if(strtolower(trim($os_x)) != "tidak terkoreksi" && strtolower(trim($os_x)) != "tidak dapat dinilai" && $os_x != "" && $os_x != "-" && $os_x != "--" && $os_x != "/-" && $os_x != "/" && $os_x != "-/"){ + //if ($visus_kiri != "") $visus_kiri .= ", "; + $visus_kiri .= " axis ".$os_x." (Astigmatismus)"; + $x_os = true; + $x_os = $os_x; + }else{ + if($os_cyl != "" && $os_cyl != "-") + $visus_kiri .= " (Astigmatismus)"; + } + + } + + } + + if((strtolower($row_result['T_SamplingAdditionalFisikVisusDKODV']) != "normal" && $row_result['T_SamplingAdditionalFisikVisusDKODV'] != "" && $row_result['T_SamplingAdditionalFisikVisusDKODV'] != "-") && ($row_result['T_SamplingAdditionalFisikVisusDKOSV'] != "" && $row_result['T_SamplingAdditionalFisikVisusDKOSV'] != "-" && strtolower($row_result['T_SamplingAdditionalFisikVisusDKODV']) != "normal" && strtolower($row_result['T_SamplingAdditionalFisikVisusDKOSV']) != "normal")){ + $visus[] = array( + "xx1" => "Dengan Kacamata", + "xx2" => "OD : ", + "xx3" => $row_result['T_SamplingAdditionalFisikVisusDKODV'] + ); + + $visus[] = array( + "xx1" => "Dengan Kacamata", + "xx2" => "OS", + "xx3" => $row_result['T_SamplingAdditionalFisikVisusDKOSV'] + ); + + $rst['kelainan'] = "Kelainan refraksi (dengan kacamata)"; + $od_visus = $row_result['T_SamplingAdditionalFisikVisusDKODV'] ; + $os_visus = $row_result['T_SamplingAdditionalFisikVisusDKOSV'] ; + + + $value_koreksi_od = ""; + $od_sph = $row_result['T_SamplingAdditionalFisikVisusODSPH']; + if(strtolower(trim($od_sph)) != "tidak terkoreksi" && strtolower(trim($od_sph)) != "tidak dapat dinilai" && $od_sph != "" && $od_sph != "-" && $od_sph != "--" && $od_sph != "/-" && $od_sph != "/" && $od_sph != "-/" && strtolower(trim($od_sph)) != 'plano'){ + if ($visus_kanan != "") $visus_kanan .= ", "; + $visus_kanan .= $od_sph." (Miopia)"; + + $miopia_od = true; + $miopia_od_value = $od_sph; + } + + $od_cyl = $row_result['T_SamplingAdditionalFisikVisusODCYL']; + + if(strtolower(trim($od_cyl)) != "tidak terkoreksi" && strtolower(trim($od_cyl)) != "tidak dapat dinilai" && $od_cyl != "" && $od_cyl != "-" && $od_cyl != "--" && $od_cyl != "/-" && $od_cyl != "/" && $od_cyl != "-/"){ + if ($visus_kanan != "") $visus_kanan .= ", "; + $visus_kanan .= "Cyl ".$od_cyl; + + $astigmatismus_od = true; + $astigmatismus_od_value = $od_cyl; + } + + $od_x = $row_result['T_SamplingAdditionalFisikVisusODX']; + if(strtolower(trim($od_x)) != "tidak terkoreksi" && strtolower(trim($od_x)) != "tidak dapat dinilai" && $od_x != "" && $od_x != "-" && $od_x != "--" && $od_x != "/-" && $od_x != "/" && $od_x != "-/"){ + //if ($visus_kanan != "") $visus_kanan .= ", "; + $visus_kanan .= " axis ".$od_x." (Astigmatismus)"; + $x_od = true; + $x_od = $od_x; + }else{ + if($od_cyl != "" && $od_cyl != "-" && $od_cyl != "--" && $od_cyl != "/-" && $od_cyl != "/" && $od_cyl != "-/") + $visus_kanan .= " (Astigmatismus)"; + } + //$value_koreksi_od .= "X (".$od_x.") "; + + + + + + $value_koreksi_os = ""; + $os_sph = $row_result['T_SamplingAdditionalFisikVisusOSSPH']; + if(strtolower(trim($os_sph)) != "tidak terkoreksi" && strtolower(trim($os_sph)) != "tidak dapat dinilai" && $os_sph != "" && $os_sph != "-" && $os_sph != "--" && $os_sph != "/-" && $os_sph != "/" && $os_sph != "-/" && strtolower(trim($os_sph)) != 'plano'){ + if ($visus_kiri != "") $visus_kiri .= ", "; + $visus_kiri .= $os_sph." (Miopia)"; + + $miopia_os = true; + $miopia_os_value = $os_sph; + } + + $os_cyl = $row_result['T_SamplingAdditionalFisikVisusOSCYL']; + + if(strtolower(trim($os_cyl)) != "tidak terkoreksi" && strtolower(trim($os_cyl)) != "tidak dapat dinilai" && $os_cyl != "" && $os_cyl != "-" && $os_cyl != "--" && $os_cyl != "/-" && $os_cyl != "/" && $os_cyl != "-/"){ + if ($visus_kiri != "") $visus_kiri .= ", "; + $visus_kiri .= "Cyl ".$os_cyl; + + $astigmatismus_os = true; + $astigmatismus_os_value = $os_cyl; + } + + $os_x = $row_result['T_SamplingAdditionalFisikVisusOSX']; + + if(strtolower(trim($os_x)) != "tidak terkoreksi" && strtolower(trim($os_x)) != "tidak dapat dinilai" && $os_x != "" && $os_x != "-" && $os_x != "--" && $os_x != "/-" && $os_x != "/" && $os_x != "-/"){ + $visus_kiri .= " axis ".$os_x." (Astigmatismus)"; + $x_os = true; + $x_os = $os_x; + }else{ + if($os_cyl != "" && $os_cyl != "-" && $os_cyl != "--" && $os_cyl != "/-" && $os_cyl != "/" && $os_cyl != "-/") + $visus_kiri .= " (Astigmatismus)"; + } + //$value_koreksi_os .= "X (".$os_x.") "; + + + } + + if(($row_result['T_SamplingAdditionalFisikVisusTKODV'] != "" && $row_result['T_SamplingAdditionalFisikVisusTKODV'] != "-") && ($row_result['T_SamplingAdditionalFisikVisusTKOSV'] != "" && $row_result['T_SamplingAdditionalFisikVisusTKOSV'] != "-")){ + if (!in_array($row_result['T_SamplingAdditionalFisikVisusTKODV'], $normal) && $visus_kanan == ''){ + $visus_kanan = "Miopia"; + $miopia_od = true; + $miopia_od_value = ""; + } + + if (!in_array($row_result['T_SamplingAdditionalFisikVisusTKOSV'], $normal) && $visus_kiri == ''){ + $visus_kiri = "Miopia"; + $miopia_os = true; + $miopia_os_value = ""; + } + } + + if(($row_result['T_SamplingAdditionalFisikVisusDKODV'] != "" && $row_result['T_SamplingAdditionalFisikVisusDKODV'] != "-") && ($row_result['T_SamplingAdditionalFisikVisusDKOSV'] != "" && $row_result['T_SamplingAdditionalFisikVisusDKOSV'] != "-")){ + if (!in_array($row_result['T_SamplingAdditionalFisikVisusDKODV'], $normal) && $visus_kanan == ''){ + $visus_kanan = "Miopia"; + $miopia_od = true; + $miopia_od_value = ""; + } + + if (!in_array($row_result['T_SamplingAdditionalFisikVisusDKOSV'], $normal) && $visus_kiri == ''){ + $visus_kiri = "Miopia"; + $miopia_os = true; + $miopia_os_value = ""; + } + } + + $od_add = $row_result['T_SamplingAdditionalFisikVisusADD']; + if($od_add != "" && $od_add != "-" && $od_add != "--" && $od_add != "/-" && $od_add != "/" && $od_add != "-/"){ + if ($visus_kanan != "") $visus_kanan .= ", "; + $visus_kanan .= $od_add." (Presbiopia)"; + + if ($visus_kiri != "") $visus_kiri .= ", "; + $visus_kiri .= $od_add." (Presbiopia)"; + + + $presbiopia_ods = true; + $presbiopia_ods_value = $od_add; + } + + + + } + + $data_insert = array( + 'code' => 'visus', + 'label' => 'visus', + 'note' => $rst['kelainan'], + 'segment' => 'visus', + 'category' => 'mata', + 'order_id' => $orderID + ); + $this->insert_data_etl($data_insert,$userid); + //$this->insert_code('visus','visus'); + + if($miopia_od){ + $data_insert = array( + 'code' => 'visus_miopia_od', + 'label' => 'visus Miopia OD', + 'note' => $miopia_od_value, + 'segment' => 'visus', + 'category' => 'mata', + 'order_id' => $orderID + ); + $this->insert_data_etl($data_insert,$userid); + //$this->insert_code('visus_miopia_od','visus Miopia OD'); + } + if($miopia_os){ + $data_insert = array( + 'code' => 'visus_miopia_os', + 'label' => 'visus Miopia OS', + 'note' => $miopia_os_value, + 'segment' => 'visus', + 'category' => 'mata', + 'order_id' => $orderID + ); + $this->insert_data_etl($data_insert,$userid); + //$this->insert_code('visus_miopia_os','visus Miopia OS'); + } + if($miopia_od){ + $in_value = ["20/30","20/40"]; + $exp_value_od = explode("/",$od_visus); + if(isset($exp_value_od[1]) && intval($exp_value_od[1]) < 50){ + $data_insert = array( + 'code' => 'visus_miopia_od_30_40', + 'label' => 'visus Miopia OD 20/30 20/40', + 'note' => $miopia_od_value, + 'segment' => 'visus', + 'category' => 'mata', + 'order_id' => $orderID + ); + $this->insert_data_etl($data_insert,$userid); + //$this->insert_code('visus_miopia_od_30_40','visus Miopia OD 20/30 20/40'); + } + if(isset($exp_value_od[1]) && intval($exp_value_od[1]) > 50){ + $data_insert = array( + 'code' => 'visus_miopia_od_over_50', + 'label' => 'visus Miopia OD > 20/50', + 'note' => $miopia_od_value, + 'segment' => 'visus', + 'category' => 'mata', + 'order_id' => $orderID + ); + $this->insert_data_etl($data_insert,$userid); + //$this->insert_code('visus_miopia_ods_over_50','visus Miopia ODS > 20/50'); + } + } + + if($miopia_os){ + + $in_value = ["20/30","20/40"]; + $exp_value_os = explode("/",$os_visus); + //print_r($exp_value_os); + if(isset($exp_value_os[1]) && intval($exp_value_os[1]) < 50){ + $data_insert = array( + 'code' => 'visus_miopia_os_30_40', + 'label' => 'visus Miopia OS 20/30 20/40', + 'note' => $miopia_os_value, + 'segment' => 'visus', + 'category' => 'mata', + 'order_id' => $orderID + ); + $this->insert_data_etl($data_insert,$userid); + //$this->insert_code('visus_miopia_od_30_40','visus Miopia OD 20/30 20/40'); + } + if(isset($exp_value_os[1]) && intval($exp_value_os[1]) > 50){ + $data_insert = array( + 'code' => 'visus_miopia_os_over_50', + 'label' => 'visus Miopia OS > 20/50', + 'note' => $miopia_os_value, + 'segment' => 'visus', + 'category' => 'mata', + 'order_id' => $orderID + ); + $this->insert_data_etl($data_insert,$userid); + //$this->insert_code('visus_miopia_ods_over_50','visus Miopia ODS > 20/50'); + } + } + + if($astigmatismus_od){ + $data_insert = array( + 'code' => 'visus_astigmatismus_od', + 'label' => 'visus Astigmatismus OD', + 'note' => $astigmatismus_od_value, + 'segment' => 'visus', + 'category' => 'mata', + 'order_id' => $orderID + ); + $this->insert_data_etl($data_insert,$userid); + //$this->insert_code('visus_astigmatismus_od','visus Astigmatismus OD'); + } + if($astigmatismus_os){ + $data_insert = array( + 'code' => 'visus_astigmatismus_os', + 'label' => 'visus Astigmatismus OS', + 'note' => $astigmatismus_os_value, + 'segment' => 'visus', + 'category' => 'mata', + 'order_id' => $orderID + ); + $this->insert_data_etl($data_insert,$userid); + //$this->insert_code('visus_astigmatismus_os','visus Astigmatismus OS'); + } + if($astigmatismus_od && $astigmatismus_os){ + $data_insert = array( + 'code' => 'visus_astigmatismus_ods', + 'label' => 'visus Astigmatismus ODS', + 'note' => $astigmatismus_os_value, + 'segment' => 'visus', + 'category' => 'mata', + 'order_id' => $orderID + ); + $this->insert_data_etl($data_insert,$userid); + //$this->insert_code('visus_astigmatismus_ods','visus Astigmatismus ODS'); + } + if($x_od){ + $data_insert = array( + 'code' => 'visus_x_od', + 'label' => 'visus X OD', + 'note' => $x_od_value, + 'segment' => 'visus', + 'category' => 'mata', + 'order_id' => $orderID + ); + $this->insert_data_etl($data_insert,$userid); + //$this->insert_code('visus_x_od','visus X OD'); + } + if($x_os){ + $data_insert = array( + 'code' => 'visus_x_os', + 'label' => 'visus X OS', + 'note' => $x_od_value, + 'segment' => 'visus', + 'category' => 'mata', + 'order_id' => $orderID + ); + $this->insert_data_etl($data_insert,$userid); + //$this->insert_code('visus_x_os','visus X OS'); + } + if($presbiopia_ods){ + $data_insert = array( + 'code' => 'visus_presbiopia_ods', + 'label' => 'visus Presbiopia ODS', + 'note' => $presbiopia_ods_value, + 'segment' => 'visus', + 'category' => 'mata', + 'order_id' => $orderID + ); + $this->insert_data_etl($data_insert,$userid); + //$this->insert_code('visus_presbiopia_ods','visus Presbiopia ODS'); + } + } + + function visus_old($orderID,$userid) { + $sql = " SELECT * , T_SamplingAdditionalFisikVisusID as visus_id + FROM t_samplingso_additional_fisik_visus + WHERE + T_SamplingAdditionalFisikVisusT_OrderHeaderID = ? LIMIT 1"; + $qry = $this->db_smartone->query($sql,array($orderID)); + if (! $qry) { + return false; + } + + $row_result = $qry->row_array(); + + + $visus = array(); + $visus_kiri = ""; + $visus_kanan = ""; + $visus_kesimpulan = ""; + $normal = array("20/20", "20/25"); + $rst['kelainan'] = "Normal"; + $miopia_od = false; + $miopia_os = false; + $miopia_od_value = ''; + $miopia_os_value = ''; + $astigmatismus_od = false; + $astigmatismus_os = false; + $astigmatismus_od_value = ''; + $astigmatismus_os_value = ''; + $presbiopia_od = false; + $presbiopia_os = false; + $presbiopia_od_value = ''; + $presbiopia_os_value = ''; + + if($row_result){ + if(($row_result['T_SamplingAdditionalFisikVisusTKODV'] != "" && $row_result['T_SamplingAdditionalFisikVisusTKODV'] != "-") && ($row_result['T_SamplingAdditionalFisikVisusTKOSV'] != "" && $row_result['T_SamplingAdditionalFisikVisusTKOSV'] != "-")){ + $visus[] = array( + "xx1" => "Tanpa Kacamata", + "xx2" => "OD : ", + "xx3" => $row_result['T_SamplingAdditionalFisikVisusTKODV'] + ); + + $visus[] = array( + "xx1" => "Tanpa Kacamata", + "xx2" => "OS", + "xx3" => $row_result['T_SamplingAdditionalFisikVisusTKOSV'] + ); + + $rst['kelainan'] = "Kelainan refraksi (tanpa kacamata)"; + + if (!in_array($row_result['T_SamplingAdditionalFisikVisusTKODV'], $normal)){ + $value_koreksi_od = ""; + $od_sph = $row_result['T_SamplingAdditionalFisikVisusODSPH']; + if($od_sph != "" && $od_sph != "-" && $od_sph != "--" && $od_sph != "/-" && $od_sph != "/" && $od_sph != "-/" && strtolower(trim($od_sph)) != 'plano'){ + if ($visus_kesimpulan != "") $visus_kesimpulan .= ", "; + $visus_kesimpulan .= "Miopia OD"; + + $miopia_od = true; + $miopia_od_value = $od_sph; + } + + $od_cyl = $row_result['T_SamplingAdditionalFisikVisusODCYL']; + if($od_cyl != "" && $od_cyl != "-" && $od_cyl != "--" && $od_cyl != "/-" && $od_cyl != "/" && $od_cyl != "-/"){ + if ($visus_kesimpulan != "") $visus_kesimpulan .= ", "; + $visus_kesimpulan .= "Astigmatismus OD"; + + $astigmatismus_od = true; + $astigmatismus_od_value = $od_cyl; + } + + + $od_x = $row_result['T_SamplingAdditionalFisikVisusODX']; + if($od_x != "" && $od_x != "-" && $od_x != "--" && $od_x != "/-" && $od_x != "/" && $od_x != "-/") + $value_koreksi_od .= "X (".$od_x.") "; + + $od_add = $row_result['T_SamplingAdditionalFisikVisusADD']; + if($od_add != "" && $od_add != "-" && $od_add != "--" && $od_add != "/-" && $od_add != "/" && $od_add != "-/"){ + if ($visus_kesimpulan != "") $visus_kesimpulan .= ", "; + $visus_kesimpulan .= "Presbiopia OD"; + + $presbiopia_od = true; + + $presbiopia_od_value = ""; + $presbiopia_os_value = ""; + + } + + } + + if (!in_array($row_result['T_SamplingAdditionalFisikVisusTKOSV'], $normal)){ + $value_koreksi_os = ""; + $os_sph = $row_result['T_SamplingAdditionalFisikVisusOSSPH']; + if(strtolower(trim($os_sph)) != "tidak terkoreksi" && strtolower(trim($os_sph)) != "tidak dapat dinilai" && $os_sph != "" && $os_sph != "-" && $os_sph != "--" && $os_sph != "/-" && $os_sph != "/" && $os_sph != "-/" && strtolower(trim($os_sph)) != 'plano'){ + if ($visus_kesimpulan != "") $visus_kesimpulan .= ", "; + $visus_kesimpulan .= "Miopia OS"; + } + + + $os_cyl = $row_result['T_SamplingAdditionalFisikVisusOSCYL']; + if(strtolower(trim($os_cyl)) != "tidak terkoreksi" && strtolower(trim($os_cyl)) != "tidak dapat dinilai" && $os_cyl != "" && $os_cyl != "-" && $os_cyl != "--" && $os_cyl != "/-" && $os_cyl != "/" && $os_cyl != "-/"){ + if ($visus_kesimpulan != "") $visus_kesimpulan .= ", "; + $visus_kesimpulan .= "Astigmatismus OS"; + } + + + $os_x = $row_result['T_SamplingAdditionalFisikVisusOSX']; + if(strtolower(trim($os_x)) != "tidak terkoreksi" && strtolower(trim($os_x)) != "tidak dapat dinilai" && $os_x != "" && $os_x != "-" && $os_x != "--" && $os_x != "/-" && $os_x != "/" && $os_x != "-/") + $value_koreksi_os .= "X (".$os_x.") "; + + $od_add = $row_result['T_SamplingAdditionalFisikVisusADD']; + if($od_add != "" && $od_add != "-" && $od_add != "--" && $od_add != "/-" && $od_add != "/" && $od_add != "-/"){ + if ($visus_kesimpulan != "") $visus_kesimpulan .= ", "; + $visus_kesimpulan .= "Presbiopia OS"; + } + + + } + } + + if(($row_result['T_SamplingAdditionalFisikVisusDKODV'] != "" && $row_result['T_SamplingAdditionalFisikVisusDKODV'] != "-") && ($row_result['T_SamplingAdditionalFisikVisusDKOSV'] != "" && $row_result['T_SamplingAdditionalFisikVisusDKOSV'] != "-")){ + $visus[] = array( + "xx1" => "Dengan Kacamata", + "xx2" => "OD : ", + "xx3" => $row_result['T_SamplingAdditionalFisikVisusDKODV'] + ); + + $visus[] = array( + "xx1" => "Dengan Kacamata", + "xx2" => "OS", + "xx3" => $row_result['T_SamplingAdditionalFisikVisusDKOSV'] + ); + + $rst['kelainan'] = "Kelainan refraksi (dengan kacamata)"; + + + $value_koreksi_od = ""; + $od_sph = $row_result['T_SamplingAdditionalFisikVisusODSPH']; + if(strtolower(trim($od_sph)) != "tidak terkoreksi" && strtolower(trim($od_sph)) != "tidak dapat dinilai" && $od_sph != "" && $od_sph != "-" && $od_sph != "--" && $od_sph != "/-" && $od_sph != "/" && $od_sph != "-/" && strtolower(trim($od_sph)) != 'plano'){ + if ($visus_kesimpulan != "") $visus_kesimpulan .= ", "; + $visus_kesimpulan .= "Miopia OD"; + } + + + $od_cyl = $row_result['T_SamplingAdditionalFisikVisusODCYL']; + if(strtolower(trim($od_cyl)) != "tidak terkoreksi" && strtolower(trim($od_cyl)) != "tidak dapat dinilai" && $od_cyl != "" && $od_cyl != "-" && $od_cyl != "--" && $od_cyl != "/-" && $od_cyl != "/" && $od_cyl != "-/"){ + if ($visus_kesimpulan != "") $visus_kesimpulan .= ", "; + $visus_kesimpulan .= "Astigmatismus OD"; + } + + + $od_x = $row_result['T_SamplingAdditionalFisikVisusODX']; + if(strtolower(trim($od_x)) != "tidak terkoreksi" && strtolower(trim($od_x)) != "tidak dapat dinilai" && $od_x != "" && $od_x != "-" && $od_x != "--" && $od_x != "/-" && $od_x != "/" && $od_x != "-/") + $value_koreksi_od .= "X (".$od_x.") "; + + $od_add = $row_result['T_SamplingAdditionalFisikVisusADD']; + if($od_add != "" && $od_add != "-" && $od_add != "--" && $od_add != "/-" && $od_add != "/" && $od_add != "-/"){ + if ($visus_kesimpulan != "") $visus_kesimpulan .= ", "; + $visus_kesimpulan .= "Presbiopia OD"; + } + + + + + $value_koreksi_os = ""; + $os_sph = $row_result['T_SamplingAdditionalFisikVisusOSSPH']; + if(strtolower(trim($os_sph)) != "tidak terkoreksi" && strtolower(trim($os_sph)) != "tidak dapat dinilai" && $os_sph != "" && $os_sph != "-" && $os_sph != "--" && $os_sph != "/-" && $os_sph != "/" && $os_sph != "-/" && strtolower(trim($os_sph)) != 'plano'){ + if ($visus_kesimpulan != "") $visus_kesimpulan .= ", "; + $visus_kesimpulan .= "Miopia OS"; + } + + $os_cyl = $row_result['T_SamplingAdditionalFisikVisusOSCYL']; + if(strtolower(trim($os_cyl)) != "tidak terkoreksi" && strtolower(trim($os_cyl)) != "tidak dapat dinilai" && $os_cyl != "" && $os_cyl != "-" && $os_cyl != "--" && $os_cyl != "/-" && $os_cyl != "/" && $os_cyl != "-/"){ + if ($visus_kesimpulan != "") $visus_kesimpulan .= ", "; + $visus_kesimpulan .= "Astigmatismus OS"; + } + + $os_x = $row_result['T_SamplingAdditionalFisikVisusOSX']; + if(strtolower(trim($os_x)) != "tidak terkoreksi" && strtolower(trim($os_x)) != "tidak dapat dinilai" && $os_x != "" && $os_x != "-" && $os_x != "--" && $os_x != "/-" && $os_x != "/" && $os_x != "-/") + $value_koreksi_os .= "X (".$os_x.") "; + + $od_add = $row_result['T_SamplingAdditionalFisikVisusADD']; + if($od_add != "" && $od_add != "-" && $od_add != "--" && $od_add != "/-" && $od_add != "/" && $od_add != "-/"){ + if ($visus_kesimpulan != "") $visus_kesimpulan .= ", "; + $visus_kesimpulan .= "Presbiopia OS"; + } + + + } + + $rst['kesimpulan'] = $visus_kesimpulan; + + $data_insert = array( + 'code' => 'visus', + 'label' => 'visus', + 'note' => $rst['kelainan'], + 'segment' => 'visus', + 'category' => 'mata', + 'order_id' => $orderID + ); + $this->insert_data_etl($data_insert,$userid); + } + } + + function insert_code($code,$label){ + /*$sql = "INSERT INTO fisik_template_code( + FisikTemplateCodeName, + FisikTemplateCodeLabel, + FisikTemplateCodeCreated, + FisikTemplateCodeCreatedUserID + ) + VALUES( + ?,?,NOW(),555 + )"; + $qry = $this->db_smartone->query($sql,array($code,$label)); + if (! $qry) { + return false; + }*/ + } + + function status_gizi($id,$userid) { + $sql = "SELECT * + FROM t_samplingso_additional_fisik_bbtb + WHERE + T_SamplingAdditionalFisikBBTBT_OrderHeaderID = ? AND + T_SamplingAdditionalFisikBBTBIsActive = 'Y' + LIMIT 1"; + $qry = $this->db_smartone->query($sql,array($id)); + if (! $qry) { + return false; + } + //echo $this->db_smartone->last_query(); + $row_results = $qry->result_array(); + //print_r($row_result); + if(count($row_results) > 0){ + $row_result = $row_results[0]; + $status_gizi = array(); + $bb = $row_result["T_SamplingAdditionalFisikBBTBValueBB"]; + $tb = $row_result["T_SamplingAdditionalFisikBBTBValueTB"]; + $standart_bmi = $row_result["T_SamplingAdditionalFisikBBTBStandart"]; + $get_bmi = $this->hitung_bmi($bb,$tb,$standart_bmi); + $bmi = $get_bmi['bmi']; + + $classification = $get_bmi['class']; + //echo $classification; + + $data_insert_tb = array( + 'code' => 'tb', + 'label' => $tb, + 'note' => $tb, + 'segment' => 'status_gizi', + 'category' => '', + 'order_id' => $id + ); + $this->insert_data_etl($data_insert_tb,$userid); + //$this->insert_code('tb',$tb); + + $data_insert_bb = array( + 'code' => 'bb', + 'label' => $bb, + 'note' => $bb, + 'segment' => 'status_gizi', + 'category' => '', + 'order_id' => $id + ); + $this->insert_data_etl($data_insert_bb,$userid); + //$this->insert_code('bb',$bb); + + $data_insert_bmi = array( + 'code' => 'bmi', + 'label' => $bmi, + 'note' => $bmi, + 'segment' => 'status_gizi', + 'category' => $standart_bmi, + 'order_id' => $id + ); + $this->insert_data_etl($data_insert_bmi,$userid); + //$this->insert_code('bmi',$bmi); + + $data_insert_bmi_class = array( + 'code' => 'bmi_classification_'.$standart_bmi, + 'label' => $classification, + 'note' => $classification, + 'segment' => 'status_gizi', + 'category' => $standart_bmi, + 'order_id' => $id + ); + //print_r($data_insert_bmi_class); + $this->insert_data_etl($data_insert_bmi_class,$userid); + //$this->insert_code('bmi_classification_'.$standart_bmi,$classification); + } + + return true; + } + + function persepsi_warna($id,$userid) { + $sql = "SELECT IFNULL(T_SamplingAdditionalFisikBWPWValue,'Z') as result, + IFNULL(T_SamplingAdditionalFisikBWPWVAngka,'') as angka + FROM t_samplingso_additional_fisik_bw + WHERE + T_SamplingAdditionalFisikBWT_OrderHeaderID = ? + LIMIT 1"; + $qry = $this->db_smartone->query($sql,array($id)); + if (! $qry) { + return false; + } + + + $row_results = $qry->result_array(); + if(count($row_results) > 0){ + $row_result = $row_results[0]; + $hasil = 'Bahan belum'; + if($row_result['result'] == 'BW'){ + $hasil = 'Red Green Deficiency'; + } + if($row_result['result'] == 'N'){ + $hasil = 'Normal'; + } + if($row_result['result'] == 'X'){ + $hasil = 'Tidak dilakukan'; + } + $data_insert_bw = array( + 'code' => 'bw', + 'label' => $row_result['result'], + 'note' => $hasil, + 'segment' => 'mata', + 'category' => '', + 'order_id' => $id + ); + $this->insert_data_etl($data_insert_bw,$userid); + //$this->insert_code('bw',$row_result['result']); + + $data_insert_bwv = array( + 'code' => 'bw_value', + 'label' => $row_result['angka'], + 'note' => $row_result['angka'], + 'segment' => 'mata', + 'category' => '', + 'order_id' => $id + ); + $this->insert_data_etl($data_insert_bwv,$userid); + //$this->insert_code('bw_value',$row_result['angka']); + } + + + } + + + + function hitung_bmi($bb,$tb,$standart_bmi){ + $tb = $tb/100; + $bmi = ''; + $classs = ""; + $bmi_valuex= 0; + if(intval($bb) != 0 && intval($tb) != 0){ + $bmi = $bb / ($tb * $tb); + $bmi_valuex = number_format($bmi,2); + + if($standart_bmi === 'asia_pacific'){ + if($bmi_valuex < 18.5) + $classs = 'Underweight'; + + if($bmi_valuex >= 18.5 && $bmi_valuex < 23) + $classs = 'Normal'; + + if($bmi_valuex >= 23 && $bmi_valuex < 25) + $classs = 'Overweight'; + + if($bmi_valuex >= 25 && $bmi_valuex < 30) + $classs = 'Obese I'; + + if($bmi_valuex >= 30) + $classs = 'Obese II'; + } + + if($standart_bmi === 'who'){ + if($bmi_valuex < 18.5) + $classs = 'Underweight'; + + if($bmi_valuex >= 18.5 && $bmi_valuex < 25){ + $classs = 'Normal'; + } + + if($bmi_valuex >= 25 && $bmi_valuex < 30){ + $classs = 'Overweight'; + } + + if($bmi_valuex >= 30) + $classs = 'Obese'; + } + + if($standart_bmi === 'kemenkes'){ + if($bmi_valuex < 18.5) + $classs = 'Underweight'; + + if($bmi_valuex >= 18.5 && $bmi_valuex < 25.1) + $classs = 'Normal'; + + if($bmi_valuex >= 25.1 && $bmi_valuex < 27) + $classs = 'Overweight'; + + if($bmi_valuex >= 27) + $classs = 'Obese'; + } + } + + + + + + return array( + 'bmi' => $bmi_valuex, + 'class' => $classs + ); + } + + function keluhan($id,$userid){ + $rst = []; + $sql = "SELECT * + FROM fisik_template + JOIN so_resultentry_fisik_umum ON So_ResultEntryFisikUmumFisikTemplateID = FisikTemplateID AND So_ResultEntryFisikUmumSo_ResultEntryID = ? + JOIN so_resultentry ON So_ResultEntryFisikUmumSo_ResultEntryID = So_ResultEntryID + WHERE + FisikTemplateIsActive = 'Y' AND + FisikTemplateTableName = 'fisik_keluhan' + ORDER BY FisikTemplateCode ASC + LIMIT 1 + "; + $qry = $this->db_smartone->query($sql, array($id)); + // echo $this->db_smartone->last_query(); + $datas = $qry->result_array(); + if($datas && count($datas) > 0){ + $order_header_id = $datas[0]['So_ResultEntryT_OrderHeaderID']; + $valdata = json_decode($datas[0]['So_ResultEntryFisikUmumDetails'], true); + $details = $valdata['details']; + foreach ($details as $key => $value) { + if($value['chx'] == '1'){ + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code'], + 'label' => $value['label'], + 'note' => $value['value'], + 'segment' => 'fisik_keluhan', + 'category' => '' + ); + $this->insert_data_etl($data_insert,$userid); + $rst[] = $data_insert; + } + //$this->insert_code($value['id_code'],$value['label']); + + } + } + + return $rst; + } + + function riwayat_penyakit($id,$userid){ + $rst = []; + $sql = "SELECT * + FROM fisik_template + JOIN so_resultentry_fisik_umum ON So_ResultEntryFisikUmumFisikTemplateID = FisikTemplateID AND + So_ResultEntryFisikUmumSo_ResultEntryID = ? + JOIN so_resultentry ON So_ResultEntryFisikUmumSo_ResultEntryID = So_ResultEntryID + WHERE + FisikTemplateIsActive = 'Y' AND + FisikTemplateTableName = 'fisik_penyakit' + ORDER BY FisikTemplateCode ASC + LIMIT 1 + "; + $qry = $this->db_smartone->query($sql, array($id)); + // echo $this->db_smartone->last_query(); + $datas = $qry->result_array(); + if($datas && count($datas) > 0){ + $order_header_id = $datas[0]['So_ResultEntryT_OrderHeaderID']; + $valdata = json_decode($datas[0]['So_ResultEntryFisikUmumDetails'], true); + $header_details = $valdata['details']; + foreach ($header_details as $k => $v) { + $details = $v['details']; + foreach ($details as $key => $value) { + if($value['chx'] == '1'){ + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code'], + 'label' => $value['label'], + 'note' => $value['value'], + 'segment' => $value['segment_name'], + 'category' => $value['table_name'] + ); + $this->insert_data_etl($data_insert,$userid); + $rst[] = $data_insert; + } + //$this->insert_code($value['id_code'],$value['label']." | ".$value['segment_name']); + + } + } + } + + return $rst; + } + + function penyakit_keluarga($id,$userid){ + $rst = []; + $sql = "SELECT * + FROM fisik_template + JOIN so_resultentry_fisik_umum ON So_ResultEntryFisikUmumFisikTemplateID = FisikTemplateID AND So_ResultEntryFisikUmumSo_ResultEntryID = ? + JOIN so_resultentry ON So_ResultEntryFisikUmumSo_ResultEntryID = So_ResultEntryID + WHERE + FisikTemplateIsActive = 'Y' AND + FisikTemplateTableName = 'fisik_penyakitkeluarga' + ORDER BY FisikTemplateCode ASC + LIMIT 1 + "; + $qry = $this->db_smartone->query($sql, array($id)); + // echo $this->db_smartone->last_query(); + $datas = $qry->result_array(); + if($datas && count($datas) > 0){ + $order_header_id = $datas[0]['So_ResultEntryT_OrderHeaderID']; + $valdata = json_decode($datas[0]['So_ResultEntryFisikUmumDetails'], true); + $details = $valdata['details']; + foreach ($details as $key => $value) { + $results = []; + $options = $value['options']; + foreach ($options as $ko => $vo) { + if($vo['selected'] == '1') + $results[] = $vo['label']; + } + + if(count($results) > 0){ + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code'], + 'label' => $value['label'], + 'note' => join(", ",$results), + 'segment' => $value['table_name'], + 'category' => $value['table_name'], + ); + $this->insert_data_etl($data_insert,$userid); + $rst[] = $data_insert; + } + //$this->insert_code($value['id_code'],$value['label']); + + } + } + + return $rst; + } + + + function kebiasaan_hidup($id,$userid){ + $rst = []; + $sql = "SELECT * + FROM fisik_template + JOIN so_resultentry_fisik_umum ON So_ResultEntryFisikUmumFisikTemplateID = FisikTemplateID AND So_ResultEntryFisikUmumSo_ResultEntryID = ? + JOIN so_resultentry ON So_ResultEntryFisikUmumSo_ResultEntryID = So_ResultEntryID + WHERE + FisikTemplateIsActive = 'Y' AND + FisikTemplateTableName = 'fisik_kebiasaanhidup' + ORDER BY FisikTemplateCode ASC + LIMIT 1 + "; + $qry = $this->db_smartone->query($sql, array($id)); + // echo $this->db_smartone->last_query(); + $datas = $qry->result_array(); + if($datas && count($datas) > 0){ + $order_header_id = $datas[0]['So_ResultEntryT_OrderHeaderID']; + $valdata = json_decode($datas[0]['So_ResultEntryFisikUmumDetails'], true); + $header_details = $valdata['details']; + foreach ($header_details as $k => $v) { + $details = $v['details']; + foreach ($details as $key => $value) { + if($value['chx'] == '1'){ + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code'], + 'label' => $value['label'], + 'note' => $value['value'], + 'segment' => $value['segment_name'], + 'category' => $value['table_name'] + ); + $this->insert_data_etl($data_insert,$userid); + $rst[] = $data_insert; + } + //$this->insert_code($value['id_code'],$value['label']." | ".$value['segment_name']); + } + } + } + + return $rst; + } + + function fisik_konsumsiobatteratur($id,$userid){ + $rst = []; + $sql = "SELECT * + FROM fisik_template + JOIN so_resultentry_fisik_umum ON So_ResultEntryFisikUmumFisikTemplateID = FisikTemplateID AND So_ResultEntryFisikUmumSo_ResultEntryID = ? + JOIN so_resultentry ON So_ResultEntryFisikUmumSo_ResultEntryID = So_ResultEntryID + WHERE + FisikTemplateIsActive = 'Y' AND + FisikTemplateTableName = 'fisik_konsumsiobatteratur' + ORDER BY FisikTemplateCode ASC + LIMIT 1 + "; + $qry = $this->db_smartone->query($sql, array($id)); + // echo $this->db_smartone->last_query(); + $datas = $qry->result_array(); + if($datas && count($datas) > 0){ + $order_header_id = $datas[0]['So_ResultEntryT_OrderHeaderID']; + $valdata = json_decode($datas[0]['So_ResultEntryFisikUmumDetails'], true); + $details = $valdata['details']; + foreach ($details as $key => $value) { + if($value['chx'] == '1'){ + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code'], + 'label' => $value['label'], + 'note' => $value['value'], + 'segment' => $value['table_name'], + 'category' => $value['table_name'] + ); + $this->insert_data_etl($data_insert,$userid); + $rst[] = $data_insert; + } + //$this->insert_code($value['id_code'],$value['label']); + } + } + + return $rst; + } + + + function imunasi($id,$userid){ + $rst = []; + $sql = "SELECT * + FROM fisik_template + JOIN so_resultentry_fisik_umum ON So_ResultEntryFisikUmumFisikTemplateID = FisikTemplateID AND So_ResultEntryFisikUmumSo_ResultEntryID = ? + JOIN so_resultentry ON So_ResultEntryFisikUmumSo_ResultEntryID = So_ResultEntryID + WHERE + FisikTemplateIsActive = 'Y' AND + FisikTemplateTableName = 'fisik_riwayatimunisasi' + ORDER BY FisikTemplateCode ASC + LIMIT 1 + "; + $qry = $this->db_smartone->query($sql, array($id)); + // echo $this->db_smartone->last_query(); + $datas = $qry->result_array(); + if($datas && count($datas) > 0){ + $order_header_id = $datas[0]['So_ResultEntryT_OrderHeaderID']; + $valdata = json_decode($datas[0]['So_ResultEntryFisikUmumDetails'], true); + $header_details = $valdata['details']; + foreach ($header_details as $k => $v) { + $details = $v['details']; + foreach ($details as $key => $value) { + if($value['chx'] == '1'){ + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code'], + 'label' => $value['label'], + 'note' => $value['value'], + 'segment' => $value['segment_name'], + 'category' => $value['table_name'] + ); + $this->insert_data_etl($data_insert,$userid); + $rst[] = $data_insert; + } + //$this->insert_code($value['id_code'],$value['label']." | ".$value['segment_name']); + } + } + } + + return $rst; + } + + function vital_sign($id,$userid){ + $rst = []; + $sql = "SELECT * + FROM fisik_template + JOIN so_resultentry_fisik_umum ON So_ResultEntryFisikUmumFisikTemplateID = FisikTemplateID AND So_ResultEntryFisikUmumSo_ResultEntryID = ? + JOIN so_resultentry ON So_ResultEntryFisikUmumSo_ResultEntryID = So_ResultEntryID + WHERE + FisikTemplateIsActive = 'Y' AND + FisikTemplateTableName = 'tanda_vital' + ORDER BY FisikTemplateCode ASC + LIMIT 1 + "; + $qry = $this->db_smartone->query($sql, array($id)); + // echo $this->db_smartone->last_query(); + $datas = $qry->result_array(); + if($datas && count($datas) > 0){ + $order_header_id = $datas[0]['So_ResultEntryT_OrderHeaderID']; + $valdata = json_decode($datas[0]['So_ResultEntryFisikUmumDetails'], true); + $details = $valdata['details']; + foreach ($details as $key => $value) { + if($value['id_code'] == 'tanda_vital_5'){ + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code'].'_1', + 'label' => $value['label_x'], + 'note' => $value['value_x'], + 'segment' => 'tekanan_darah', + 'category' => $value['table_name'] + ); + $this->insert_data_etl($data_insert,$userid); + //$this->insert_code($value['id_code'].'_1',$value['label_x']); + $rst[] = $data_insert; + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code'].'_2', + 'label' => $value['label_y'], + 'note' => $value['value_y'], + 'segment' => 'tekanan_darah', + 'category' => $value['table_name'] + ); + $this->insert_data_etl($data_insert,$userid); + //$this->insert_code($value['id_code'].'_2',$value['label_y']); + $rst[] = $data_insert; + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => 'tekanan_darah_conclusion', + 'label' => $value['standart'], + 'note' => $value['value'], + 'segment' => 'tekanan_darah', + 'category' => $value['table_name'] + ); + $this->insert_data_etl($data_insert,$userid); + //$this->insert_code('tekanan_darah_conclusion',$value['label_y']); + $rst[] = $data_insert; + } + + if($value['id_code'] == 'tanda_vital_6'){ + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code'], + 'label' => $value['chx_y'] == '1'?$value['label_y']:$value['label_x'], + 'note' => $value['value'], + 'segment' => 'suhu', + 'category' => $value['table_name'] + ); + $this->insert_data_etl($data_insert,$userid); + //$this->insert_code($value['id_code'],'Suhu'); + $rst[] = $data_insert; + } + + if($value['id_code'] == 'tanda_vital_1'){ + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code'], + 'label' => $value['label'], + 'note' => $value['value'], + 'segment' => 'denyut_nadi', + 'category' => $value['table_name'] + ); + $this->insert_data_etl($data_insert,$userid); + //$this->insert_code($value['id_code'],$value['label']); + $rst[] = $data_insert; + } + + if($value['id_code'] == 'tanda_vital_2'){ + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code'], + 'label' => $value['chx_y'] == '1'?$value['label_y']:$value['label_x'], + 'note' => $value['value'], + 'segment' => 'ritme_denyut_nadi', + 'category' => $value['table_name'] + ); + $this->insert_data_etl($data_insert,$userid); + //$this->insert_code($value['id_code'],'Denyut Nadi'); + $rst[] = $data_insert; + } + + if($value['id_code'] == 'tanda_vital_3'){ + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code'], + 'label' => $value['label'], + 'note' => $value['value'], + 'segment' => 'laju_pernafasan', + 'category' => $value['table_name'] + ); + $this->insert_data_etl($data_insert,$userid); + //$this->insert_code($value['id_code'],$value['label']); + $rst[] = $data_insert; + } + + if($value['id_code'] == 'tanda_vital_4'){ + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code'], + 'label' => $value['chx_y'] == '1'?$value['label_y']:$value['label_x'], + 'note' => $value['value'], + 'segment' => 'pola_nafas', + 'category' => $value['table_name'] + ); + $this->insert_data_etl($data_insert,$userid); + //$this->insert_code($value['id_code'],'Pola Nafas'); + $rst[] = $data_insert; + } + + } + } + + return $rst; + } + + + function keadaan_umum($id,$userid){ + $rst = []; + $sql = "SELECT * + FROM fisik_template + JOIN so_resultentry_fisik_umum ON So_ResultEntryFisikUmumFisikTemplateID = FisikTemplateID AND So_ResultEntryFisikUmumSo_ResultEntryID = ? + JOIN so_resultentry ON So_ResultEntryFisikUmumSo_ResultEntryID = So_ResultEntryID + WHERE + FisikTemplateIsActive = 'Y' AND + FisikTemplateTableName = 'keadaan_umum' + ORDER BY FisikTemplateCode ASC + LIMIT 1 + "; + $qry = $this->db_smartone->query($sql, array($id)); + // echo $this->db_smartone->last_query(); + $datas = $qry->result_array(); + if($datas && count($datas) > 0){ + $order_header_id = $datas[0]['So_ResultEntryT_OrderHeaderID']; + $valdata = json_decode($datas[0]['So_ResultEntryFisikUmumDetails'], true); + $details = $valdata['details']; + foreach ($details as $key => $value) { + if($value['chx_x'] == '1'){ + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code']+'_x', + 'label' => $value['label_x'], + 'note' => $value['value'], + 'segment' => $value['table_name'], + 'category' => $value['table_name'] + ); + $this->insert_data_etl($data_insert,$userid); + } + if($value['chx_y'] == '1'){ + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code'].'_y', + 'label' => $value['label_y'], + 'note' => $value['value'], + 'segment' => $value['table_name'], + 'category' => $value['table_name'] + ); + $this->insert_data_etl($data_insert,$userid); + } + + ////$this->insert_code($value['id_code'],'Keadaan Umum'); + $rst[] = $data_insert; + } + } + + return $rst; + } + + function kepala_wajah($id,$userid){ + $rst = []; + $sql = "SELECT * + FROM fisik_template + JOIN so_resultentry_fisik_umum ON So_ResultEntryFisikUmumFisikTemplateID = FisikTemplateID AND So_ResultEntryFisikUmumSo_ResultEntryID = ? + JOIN so_resultentry ON So_ResultEntryFisikUmumSo_ResultEntryID = So_ResultEntryID + WHERE + FisikTemplateIsActive = 'Y' AND + FisikTemplateTableName = 'kepala_wajah' + ORDER BY FisikTemplateCode ASC + LIMIT 1 + "; + $qry = $this->db_smartone->query($sql, array($id)); + // echo $this->db_smartone->last_query(); + $datas = $qry->result_array(); + if($datas && count($datas) > 0){ + $order_header_id = $datas[0]['So_ResultEntryT_OrderHeaderID']; + $valdata = json_decode($datas[0]['So_ResultEntryFisikUmumDetails'], true); + $details = $valdata['details']; + foreach ($details as $key => $value) { + if($value['chx'] == '1' && $value['is_normal'] == 'N'){ + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code'], + 'label' => $value['label'], + 'note' => $value['value'], + 'segment' => $value['table_name'], + 'category' => $value['table_name'] + ); + $this->insert_data_etl($data_insert,$userid); + $rst[] = $data_insert; + } + //$this->insert_code($value['id_code'],$value['label'].' | '.$value['table_name']); + } + } + + return $rst; + } + + function mata($id,$userid){ + $rst = []; + $sql = "SELECT * + FROM fisik_template + JOIN so_resultentry_fisik_umum ON So_ResultEntryFisikUmumFisikTemplateID = FisikTemplateID AND + So_ResultEntryFisikUmumSo_ResultEntryID = ? + JOIN so_resultentry ON So_ResultEntryFisikUmumSo_ResultEntryID = So_ResultEntryID + WHERE + FisikTemplateIsActive = 'Y' AND + FisikTemplateTableName = 'mata' + ORDER BY FisikTemplateCode ASC + LIMIT 1 + "; + $qry = $this->db_smartone->query($sql, array($id)); + // echo $this->db_smartone->last_query(); + $datas = $qry->result_array(); + if($datas && count($datas) > 0){ + $order_header_id = $datas[0]['So_ResultEntryT_OrderHeaderID']; + $valdata = json_decode($datas[0]['So_ResultEntryFisikUmumDetails'], true); + $details = $valdata['details']; + foreach ($details as $key => $value) { + if($value['chx'] == '1'){ + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code'], + 'label' => $value['label'], + 'note' => $value['value'], + 'segment' => 'mata', + 'category' => 'mata' + ); + $this->insert_data_etl($data_insert,$userid); + $rst[] = $data_insert; + } + //$this->insert_code($value['id_code'],$value['label']." | Mata"); + + } + } + + return $rst; + } + + function lapang_pandang($id,$userid){ + $rst = []; + $sql = "SELECT * + FROM fisik_template + JOIN so_resultentry_fisik_umum ON So_ResultEntryFisikUmumFisikTemplateID = FisikTemplateID AND + So_ResultEntryFisikUmumSo_ResultEntryID = ? + JOIN so_resultentry ON So_ResultEntryFisikUmumSo_ResultEntryID = So_ResultEntryID + WHERE + FisikTemplateIsActive = 'Y' AND + FisikTemplateTableName = 'lapang_pandang' + ORDER BY FisikTemplateCode ASC + LIMIT 1 + "; + $qry = $this->db_smartone->query($sql, array($id)); + // echo $this->db_smartone->last_query(); + $datas = $qry->result_array(); + if($datas && count($datas) > 0){ + $order_header_id = $datas[0]['So_ResultEntryT_OrderHeaderID']; + $valdata = json_decode($datas[0]['So_ResultEntryFisikUmumDetails'], true); + $details = $valdata['details']; + $value_data = $details[0]; + + if($value_data['chx_x'] == '1'){ + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => 'lapang_pandang_x', + 'label' => $value_data['label_x'], + 'note' => $value_data['value'], + 'segment' => 'lapang_pandang', + 'category' => 'lapang_pandang' + ); + $this->insert_data_etl($data_insert,$userid); + + $rst[] = $data_insert; + } + + if($value_data['chx_y'] == '1'){ + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => 'lapang_pandang_y', + 'label' => $value_data['label_y'], + 'note' => $value_data['value'], + 'segment' => 'lapang_pandang', + 'category' => 'lapang_pandang' + ); + $this->insert_data_etl($data_insert,$userid); + + $rst[] = $data_insert; + } + //$this->insert_code('lapang_pandang_x','Lapang Pandang Tidak Normal'); + //$this->insert_code('lapang_pandang_y','Lapang Pandang Normal'); + } + + return $rst; + } + + function telinga($id,$userid){ + $rst = []; + $sql = "SELECT * + FROM fisik_template + JOIN so_resultentry_fisik_umum ON So_ResultEntryFisikUmumFisikTemplateID = FisikTemplateID AND + So_ResultEntryFisikUmumSo_ResultEntryID = ? + JOIN so_resultentry ON So_ResultEntryFisikUmumSo_ResultEntryID = So_ResultEntryID + WHERE + FisikTemplateIsActive = 'Y' AND + FisikTemplateTableName = 'telinga' + ORDER BY FisikTemplateCode ASC + LIMIT 1 + "; + $qry = $this->db_smartone->query($sql, array($id)); + // echo $this->db_smartone->last_query(); + $datas = $qry->result_array(); + if($datas && count($datas) > 0){ + $order_header_id = $datas[0]['So_ResultEntryT_OrderHeaderID']; + $valdata = json_decode($datas[0]['So_ResultEntryFisikUmumDetails'], true); + $details = $valdata['details']; + foreach ($details as $key => $value) { + if($value['chx'] == '1'){ + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code'], + 'label' => $value['label'], + 'note' => $value['value'], + 'segment' => 'telinga', + 'category' => 'telinga' + ); + $this->insert_data_etl($data_insert,$userid); + $rst[] = $data_insert; + } + //$this->insert_code($value['id_code'],$value['label'].' | Telinga'); + } + } + + return $rst; + } + + function hidung($id,$userid){ + $rst = []; + $sql = "SELECT * + FROM fisik_template + JOIN so_resultentry_fisik_umum ON So_ResultEntryFisikUmumFisikTemplateID = FisikTemplateID AND + So_ResultEntryFisikUmumSo_ResultEntryID = ? + JOIN so_resultentry ON So_ResultEntryFisikUmumSo_ResultEntryID = So_ResultEntryID + WHERE + FisikTemplateIsActive = 'Y' AND + FisikTemplateTableName = 'hidung' + ORDER BY FisikTemplateCode ASC + LIMIT 1 + "; + $qry = $this->db_smartone->query($sql, array($id)); + // echo $this->db_smartone->last_query(); + $datas = $qry->result_array(); + if($datas && count($datas) > 0){ + $order_header_id = $datas[0]['So_ResultEntryT_OrderHeaderID']; + $valdata = json_decode($datas[0]['So_ResultEntryFisikUmumDetails'], true); + $details = $valdata['details']; + foreach ($details as $key => $value) { + if($value['chx'] == '1'){ + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code'], + 'label' => $value['label'], + 'note' => $value['value'], + 'segment' => 'hidung', + 'category' => 'hidung' + ); + $this->insert_data_etl($data_insert,$userid); + $rst[] = $data_insert; + } + //$this->insert_code($value['id_code'],$value['label'].' | Hidung'); + } + } + + return $rst; + } + + function gigi($id,$userid){ + $rst = []; + $sql = "SELECT * + FROM fisik_template + JOIN so_resultentry_fisik_umum ON So_ResultEntryFisikUmumFisikTemplateID = FisikTemplateID AND + So_ResultEntryFisikUmumSo_ResultEntryID = ? + JOIN so_resultentry ON So_ResultEntryFisikUmumSo_ResultEntryID = So_ResultEntryID + WHERE + FisikTemplateIsActive = 'Y' AND + FisikTemplateTableName = 'gigi' + ORDER BY FisikTemplateCode ASC + LIMIT 1 + "; + $qry = $this->db_smartone->query($sql, array($id)); + // echo $this->db_smartone->last_query(); + $datas = $qry->result_array(); + if($datas && count($datas) > 0){ + $order_header_id = $datas[0]['So_ResultEntryT_OrderHeaderID']; + $valdata = json_decode($datas[0]['So_ResultEntryFisikUmumDetails'], true); + $details = $valdata['details']; + foreach ($details as $key => $value) { + if($value['chx'] == '1'){ + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code'], + 'label' => $value['label'], + 'note' => $value['value'], + 'segment' => 'gigi', + 'category' => 'gigi' + ); + $this->insert_data_etl($data_insert,$userid); + $rst[] = $data_insert; + } + //$this->insert_code($value['id_code'],$value['label'].' | Gigi'); + + } + } + + return $rst; + } + + function mulut($id,$userid){ + $rst = []; + $sql = "SELECT * + FROM fisik_template + JOIN so_resultentry_fisik_umum ON So_ResultEntryFisikUmumFisikTemplateID = FisikTemplateID AND So_ResultEntryFisikUmumSo_ResultEntryID = ? + JOIN so_resultentry ON So_ResultEntryFisikUmumSo_ResultEntryID = So_ResultEntryID + WHERE + FisikTemplateIsActive = 'Y' AND + FisikTemplateTableName = 'mukosa_rongga_mulut' + ORDER BY FisikTemplateCode ASC + LIMIT 1 + "; + $qry = $this->db_smartone->query($sql, array($id)); + //echo $this->db_smartone->last_query(); + $datas = $qry->result_array(); + if($datas && count($datas) > 0){ + $order_header_id = $datas[0]['So_ResultEntryT_OrderHeaderID']; + $valdata = json_decode($datas[0]['So_ResultEntryFisikUmumDetails'], true); + $header_details = $valdata['details']; + //print_r($header_details); + foreach ($header_details as $k => $v) { + $details = $v['details']; + foreach ($details as $key => $value) { + $segment = strtolower(str_replace(" ","_",$value['segment_name'])); + if($value['chx'] == '1'){ + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code'], + 'label' => $value['label'], + 'note' => $value['value'], + 'segment' => $segment, + 'category' => $value['table_name'] + ); + $this->insert_data_etl($data_insert,$userid); + $rst[] = $data_insert; + } + //$this->insert_code($value['id_code'],$value['label']." | ".$segment); + + } + } + } + + return $rst; + } + + function leher($id,$userid){ + $rst = []; + $sql = "SELECT * + FROM fisik_template + JOIN so_resultentry_fisik_umum ON So_ResultEntryFisikUmumFisikTemplateID = FisikTemplateID AND + So_ResultEntryFisikUmumSo_ResultEntryID = ? + JOIN so_resultentry ON So_ResultEntryFisikUmumSo_ResultEntryID = So_ResultEntryID + WHERE + FisikTemplateIsActive = 'Y' AND + FisikTemplateTableName = 'leher' + ORDER BY FisikTemplateCode ASC + LIMIT 1 + "; + $qry = $this->db_smartone->query($sql, array($id)); + // echo $this->db_smartone->last_query(); + $datas = $qry->result_array(); + if($datas && count($datas) > 0){ + $order_header_id = $datas[0]['So_ResultEntryT_OrderHeaderID']; + $valdata = json_decode($datas[0]['So_ResultEntryFisikUmumDetails'], true); + $details = $valdata['details']; + foreach ($details as $key => $value) { + if($value['chx'] == '1'){ + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code'], + 'label' => $value['label'], + 'note' => $value['value'], + 'segment' => 'leher', + 'category' => 'leher' + ); + $this->insert_data_etl($data_insert,$userid); + $rst[] = $data_insert; + } + //$this->insert_code($value['id_code'],$value['label'].' | Leher'); + } + } + + return $rst; + } + + function thorax($id,$userid){ + $rst = []; + $sql = "SELECT * + FROM fisik_template + JOIN so_resultentry_fisik_umum ON So_ResultEntryFisikUmumFisikTemplateID = FisikTemplateID AND + So_ResultEntryFisikUmumSo_ResultEntryID = ? + JOIN so_resultentry ON So_ResultEntryFisikUmumSo_ResultEntryID = So_ResultEntryID + WHERE + FisikTemplateIsActive = 'Y' AND + FisikTemplateTableName = 'thorax' + ORDER BY FisikTemplateCode ASC + LIMIT 1 + "; + $qry = $this->db_smartone->query($sql, array($id)); + // echo $this->db_smartone->last_query(); + $datas = $qry->result_array(); + if($datas && count($datas) > 0){ + $order_header_id = $datas[0]['So_ResultEntryT_OrderHeaderID']; + $valdata = json_decode($datas[0]['So_ResultEntryFisikUmumDetails'], true); + $details = $valdata['details']; + foreach ($details as $key => $value) { + if($value['chx'] == '1'){ + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code'], + 'label' => $value['label'], + 'note' => $value['value'], + 'segment' => 'thorax', + 'category' => 'thorax' + ); + $this->insert_data_etl($data_insert,$userid); + $rst[] = $data_insert; + } + //$this->insert_code($value['id_code'],$value['label'].' | Thorax'); + } + } + + return $rst; + } + + function paru($id,$userid){ + $rst = []; + $sql = "SELECT * + FROM fisik_template + JOIN so_resultentry_fisik_umum ON So_ResultEntryFisikUmumFisikTemplateID = FisikTemplateID AND + So_ResultEntryFisikUmumSo_ResultEntryID = ? + JOIN so_resultentry ON So_ResultEntryFisikUmumSo_ResultEntryID = So_ResultEntryID + WHERE + FisikTemplateIsActive = 'Y' AND + FisikTemplateTableName = 'paru' + ORDER BY FisikTemplateCode ASC + LIMIT 1 + "; + $qry = $this->db_smartone->query($sql, array($id)); + // echo $this->db_smartone->last_query(); + $datas = $qry->result_array(); + if($datas && count($datas) > 0){ + $order_header_id = $datas[0]['So_ResultEntryT_OrderHeaderID']; + $valdata = json_decode($datas[0]['So_ResultEntryFisikUmumDetails'], true); + $details = $valdata['details']; + foreach ($details as $key => $value) { + if($value['chx'] == '1'){ + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code'], + 'label' => $value['label'], + 'note' => $value['value'], + 'segment' => 'paru', + 'category' => 'paru' + ); + $this->insert_data_etl($data_insert,$userid); + $rst[] = $data_insert; + } + //$this->insert_code($value['id_code'],$value['label'].' | Paru'); + } + } + + return $rst; + } + + function jantung($id,$userid){ + $rst = []; + $sql = "SELECT * + FROM fisik_template + JOIN so_resultentry_fisik_umum ON So_ResultEntryFisikUmumFisikTemplateID = FisikTemplateID AND So_ResultEntryFisikUmumSo_ResultEntryID = ? + JOIN so_resultentry ON So_ResultEntryFisikUmumSo_ResultEntryID = So_ResultEntryID + WHERE + FisikTemplateIsActive = 'Y' AND + FisikTemplateTableName = 'jantung' + ORDER BY FisikTemplateCode ASC + LIMIT 1 + "; + $qry = $this->db_smartone->query($sql, array($id)); + //echo $this->db_smartone->last_query(); + $datas = $qry->result_array(); + if($datas && count($datas) > 0){ + $order_header_id = $datas[0]['So_ResultEntryT_OrderHeaderID']; + $valdata = json_decode($datas[0]['So_ResultEntryFisikUmumDetails'], true); + $header_details = $valdata['details']; + //print_r($header_details); + foreach ($header_details as $k => $v) { + $details = $v['details']; + foreach ($details as $key => $value) { + $segment = strtolower(str_replace(" ","_",str_replace("/","",$value['segment_name']))); + if($value['chx'] == '1'){ + + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code'], + 'label' => $value['label'], + 'note' => $value['value'], + 'segment' => $segment, + 'category' => $value['table_name'] + ); + $this->insert_data_etl($data_insert,$userid); + $rst[] = $data_insert; + } + //$this->insert_code($value['id_code'],$value['label']." | ".$segment); + } + } + } + + return $rst; + } + + function perut($id,$userid){ + $rst = []; + $sql = "SELECT * + FROM fisik_template + JOIN so_resultentry_fisik_umum ON So_ResultEntryFisikUmumFisikTemplateID = FisikTemplateID AND So_ResultEntryFisikUmumSo_ResultEntryID = ? + JOIN so_resultentry ON So_ResultEntryFisikUmumSo_ResultEntryID = So_ResultEntryID + WHERE + FisikTemplateIsActive = 'Y' AND + FisikTemplateTableName = 'perut' + ORDER BY FisikTemplateCode ASC + LIMIT 1 + "; + $qry = $this->db_smartone->query($sql, array($id)); + //echo $this->db_smartone->last_query(); + $datas = $qry->result_array(); + if($datas && count($datas) > 0){ + $order_header_id = $datas[0]['So_ResultEntryT_OrderHeaderID']; + $valdata = json_decode($datas[0]['So_ResultEntryFisikUmumDetails'], true); + $header_details = $valdata['details']; + //print_r($header_details); + foreach ($header_details as $k => $v) { + if($v['name'] != 'Hernia' && $v['name'] != 'Pengukuran'){ + $details = $v['details']; + foreach ($details as $key => $value) { + $segment = strtolower(str_replace(" ","_",$v['name'])); + if($value['chx'] == '1'){ + + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code'], + 'label' => $value['label'], + 'note' => $value['value'], + 'segment' => $segment, + 'category' => $value['table_name'] + ); + $this->insert_data_etl($data_insert,$userid); + $rst[] = $data_insert; + } + //$this->insert_code($value['id_code'],$value['label']." | ".$segment); + } + } + + if($v['name'] == 'Hernia'){ + $details = $v['details']; + foreach ($details as $key => $value) { + if($value['id_code'] == 'perut_13'){ + if($value['chx'] == '1'){ + $segment = strtolower(str_replace(" ","_",$v['name'])); + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code'], + 'label' => $value['label'], + 'note' => $value['value'], + 'segment' => $segment, + 'category' => $value['table_name'] + ); + $this->insert_data_etl($data_insert,$userid); + $rst[] = $data_insert; + } + //$this->insert_code($value['id_code'],$value['label'].' | Hernia '.$segment); + } + + if($value['id_code'] == 'perut_14'){ + $segment = strtolower(str_replace(" ","_",$v['name'])); + if($value['chx'] == '1'){ + $child_details = $value['details']; + foreach ($child_details as $kx => $vx) { + if($vx['id_code'] == 'perut_14_1'){ + if($vx['chx_value'] == '1'){ + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $vx['id_code'], + 'label' => $vx['label'], + 'note' => '', + 'segment' => $segment, + 'category' => $value['table_name'] + ); + $this->insert_data_etl($data_insert,$userid); + $rst[] = $data_insert; + } + //$this->insert_code($value['id_code'],$value['label'].' | Hernia '.$segment); + } + + if($vx['id_code'] != 'perut_14_1'){ + if($vx['chx_a_value'] == '1'){ + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $vx['id_code'].'_'.$vx['chx_a_label'], + 'label' => $vx['label'], + 'note' => $vx['chx_a_label'], + 'segment' => $segment, + 'category' => $value['table_name'] + ); + $this->insert_data_etl($data_insert,$userid); + $rst[] = $data_insert; + } + + if($vx['chx_b_value'] == '1'){ + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $vx['id_code'].'_'.$vx['chx_b_label'], + 'label' => $vx['label'], + 'note' => $vx['chx_b_label'], + 'segment' => $segment, + 'category' => $value['table_name'] + ); + $this->insert_data_etl($data_insert,$userid); + $rst[] = $data_insert; + } + //$this->insert_code($vx['id_code'].'_'.$vx['chx_a_label'],$value['label'].' | Hernia '.$segment); + //$this->insert_code($vx['id_code'].'_'.$vx['chx_b_label'],$value['label'].' | Hernia '.$segment); + } + + } + } + //$this->insert_code($value['id_code'],$value['label']); + } + + + } + } + + if($v['name'] == 'Hernia'){ + $details = $v['details']; + } + + } + } + + return $rst; + } + + function sistem_integumen($id,$userid){ + $rst = []; + $sql = "SELECT * + FROM fisik_template + JOIN so_resultentry_fisik_umum ON So_ResultEntryFisikUmumFisikTemplateID = FisikTemplateID AND So_ResultEntryFisikUmumSo_ResultEntryID = ? + JOIN so_resultentry ON So_ResultEntryFisikUmumSo_ResultEntryID = So_ResultEntryID + WHERE + FisikTemplateIsActive = 'Y' AND + FisikTemplateTableName = 'sistem_integumen' + ORDER BY FisikTemplateCode ASC + LIMIT 1 + "; + $qry = $this->db_smartone->query($sql, array($id)); + //echo $this->db_smartone->last_query(); + $datas = $qry->result_array(); + if($datas && count($datas) > 0){ + $order_header_id = $datas[0]['So_ResultEntryT_OrderHeaderID']; + $valdata = json_decode($datas[0]['So_ResultEntryFisikUmumDetails'], true); + $header_details = $valdata['details']; + //print_r($header_details); + foreach ($header_details as $k => $v) { + $details = $v['details']; + foreach ($details as $key => $value) { + $segment = strtolower(str_replace(" ","_",$value['segment_name'])); + if($value['chx'] == '1'){ + + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code'], + 'label' => $value['label'], + 'note' => $value['value'], + 'segment' => $segment, + 'category' => $value['table_name'] + ); + $this->insert_data_etl($data_insert,$userid); + + $rst[] = $data_insert; + } + //$this->insert_code($value['id_code'],$value['label']." | ".$segment); + } + } + } + + return $rst; + } + + function genitourinaria($id,$userid){ + $rst = []; + $sql = "SELECT * + FROM fisik_template + JOIN so_resultentry_fisik_umum ON So_ResultEntryFisikUmumFisikTemplateID = FisikTemplateID AND + So_ResultEntryFisikUmumSo_ResultEntryID = ? + JOIN so_resultentry ON So_ResultEntryFisikUmumSo_ResultEntryID = So_ResultEntryID + WHERE + FisikTemplateIsActive = 'Y' AND + FisikTemplateTableName = 'genitourinaria' + ORDER BY FisikTemplateCode ASC + LIMIT 1 + "; + $qry = $this->db_smartone->query($sql, array($id)); + // echo $this->db_smartone->last_query(); + $datas = $qry->result_array(); + if($datas && count($datas) > 0){ + $order_header_id = $datas[0]['So_ResultEntryT_OrderHeaderID']; + $valdata = json_decode($datas[0]['So_ResultEntryFisikUmumDetails'], true); + $details = $valdata['details']; + foreach ($details as $key => $value) { + if($value['chx'] == '1'){ + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code'], + 'label' => $value['label'], + 'note' => $value['value'], + 'segment' => 'genitourinaria', + 'category' => 'genitourinaria' + ); + $this->insert_data_etl($data_insert,$userid); + $rst[] = $data_insert; + } + //$this->insert_code($value['id_code'],$value['label'].' Genitourinaria'); + } + } + + return $rst; + } + + function anggota_gerak($id,$userid){ + $rst = []; + $sql = "SELECT * + FROM fisik_template + JOIN so_resultentry_fisik_umum ON So_ResultEntryFisikUmumFisikTemplateID = FisikTemplateID AND So_ResultEntryFisikUmumSo_ResultEntryID = ? + JOIN so_resultentry ON So_ResultEntryFisikUmumSo_ResultEntryID = So_ResultEntryID + WHERE + FisikTemplateIsActive = 'Y' AND + FisikTemplateTableName = 'anggota_gerak' + ORDER BY FisikTemplateCode ASC + LIMIT 1 + "; + $qry = $this->db_smartone->query($sql, array($id)); + //echo $this->db_smartone->last_query(); + $datas = $qry->result_array(); + if($datas && count($datas) > 0){ + $order_header_id = $datas[0]['So_ResultEntryT_OrderHeaderID']; + $valdata = json_decode($datas[0]['So_ResultEntryFisikUmumDetails'], true); + $header_details = $valdata['details']; + //print_r($header_details); + foreach ($header_details as $k => $v) { + $details = $v['details']; + foreach ($details as $key => $value) { + if($value['chx'] == '1'){ + $segment = strtolower(str_replace(" ","_",str_replace("/","",$value['segment_name']))); + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code'], + 'label' => $value['label'], + 'note' => $value['value'], + 'segment' => $segment, + 'category' => $value['table_name'] + ); + $this->insert_data_etl($data_insert,$userid); + $rst[] = $data_insert; + } + //$this->insert_code($value['id_code'],$value['label']." | ".$segment); + } + } + } + + return $rst; + } + + function sistem_persyarafan($id,$userid){ + $rst = []; + $sql = "SELECT * + FROM fisik_template + JOIN so_resultentry_fisik_umum ON So_ResultEntryFisikUmumFisikTemplateID = FisikTemplateID AND So_ResultEntryFisikUmumSo_ResultEntryID = ? + JOIN so_resultentry ON So_ResultEntryFisikUmumSo_ResultEntryID = So_ResultEntryID + WHERE + FisikTemplateIsActive = 'Y' AND + FisikTemplateTableName = 'sistem_persyarafan' + ORDER BY FisikTemplateCode ASC + LIMIT 1 + "; + $qry = $this->db_smartone->query($sql, array($id)); + //echo $this->db_smartone->last_query(); + $datas = $qry->result_array(); + if($datas && count($datas) > 0){ + $order_header_id = $datas[0]['So_ResultEntryT_OrderHeaderID']; + $valdata = json_decode($datas[0]['So_ResultEntryFisikUmumDetails'], true); + $header_details = $valdata['details']; + //print_r($header_details); + foreach ($header_details as $k => $v) { + $details = $v['details']; + foreach ($details as $key => $value) { + if($value['chx'] == '1'){ + $segment = strtolower(str_replace(" ","_",str_replace("&","",$value['segment_name']))); + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code'], + 'label' => $value['label'], + 'note' => $value['value'], + 'segment' => $segment, + 'category' => $value['table_name'] + ); + $this->insert_data_etl($data_insert,$userid); + $rst[] = $data_insert; + } + //$this->insert_code($value['id_code'],$value['label']." | ".$segment); + } + } + } + + return $rst; + } + + function smell_test($id,$userid){ + $rst = []; + $sql = "SELECT * + FROM fisik_template + JOIN so_resultentry_fisik_umum ON So_ResultEntryFisikUmumFisikTemplateID = FisikTemplateID AND So_ResultEntryFisikUmumSo_ResultEntryID = ? + JOIN so_resultentry ON So_ResultEntryFisikUmumSo_ResultEntryID = So_ResultEntryID + WHERE + FisikTemplateIsActive = 'Y' AND + FisikTemplateTableName = 'smell_test' + ORDER BY FisikTemplateCode ASC + LIMIT 1 + "; + $qry = $this->db_smartone->query($sql, array($id)); + //echo $this->db_smartone->last_query(); + $datas = $qry->result_array(); + if($datas && count($datas) > 0){ + $order_header_id = $datas[0]['So_ResultEntryT_OrderHeaderID']; + $valdata = json_decode($datas[0]['So_ResultEntryFisikUmumDetails'], true); + $header_details = $valdata['details']; + //print_r($header_details); + foreach ($header_details as $k => $v) { + $details = $v['details']; + foreach ($details as $key => $value) { + if($value['chx'] == '1'){ + $segment = strtolower(str_replace(" ","_",$value['segment_name'])); + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code'], + 'label' => $value['label'], + 'note' => $value['value'], + 'segment' => $segment, + 'category' => $value['table_name'] + ); + $this->insert_data_etl($data_insert,$userid); + $rst[] = $data_insert; + } + //$this->insert_code($value['id_code'],$value['label']." | ".$segment); + } + } + } + + return $rst; + } + + function low_back_pain_screening_test($id,$userid){ + $rst = []; + $sql = "SELECT * + FROM fisik_template + JOIN so_resultentry_fisik_umum ON So_ResultEntryFisikUmumFisikTemplateID = FisikTemplateID AND So_ResultEntryFisikUmumSo_ResultEntryID = ? + JOIN so_resultentry ON So_ResultEntryFisikUmumSo_ResultEntryID = So_ResultEntryID + WHERE + FisikTemplateIsActive = 'Y' AND + FisikTemplateTableName = 'low_back_pain_screening_test' + ORDER BY FisikTemplateCode ASC + LIMIT 1 + "; + $qry = $this->db_smartone->query($sql, array($id)); + //echo $this->db_smartone->last_query(); + $datas = $qry->result_array(); + if($datas && count($datas) > 0){ + $order_header_id = $datas[0]['So_ResultEntryT_OrderHeaderID']; + $valdata = json_decode($datas[0]['So_ResultEntryFisikUmumDetails'], true); + $header_details = $valdata['details']; + //print_r($header_details); + foreach ($header_details as $k => $v) { + $details = $v['details']; + foreach ($details as $key => $value) { + if($value['chx'] == '1'){ + $segment = strtolower(str_replace(" ","_",$value['segment_name'])); + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code'], + 'label' => $value['label'], + 'note' => $value['value'], + 'segment' => $segment, + 'category' => $value['table_name'] + ); + $this->insert_data_etl($data_insert,$userid); + $rst[] = $data_insert; + } + //$this->insert_code($value['id_code'],$value['label']." | ".$segment); + } + } + } + + return $rst; + } + + function k3($type,$id,$userid){ + $rst = []; + $sql = "SELECT * + FROM fisik_template + JOIN so_resultentry_fisik_umum ON So_ResultEntryFisikUmumFisikTemplateID = FisikTemplateID AND + So_ResultEntryFisikUmumSo_ResultEntryID = ? + JOIN so_resultentry ON So_ResultEntryFisikUmumSo_ResultEntryID = So_ResultEntryID + WHERE + FisikTemplateIsActive = 'Y' AND + `FisikTemplateType` = 'k3' AND + FisikTemplateTableName = ? + ORDER BY FisikTemplateCode ASC + LIMIT 1 + "; + $qry = $this->db_smartone->query($sql, array($id,$type)); + // echo $this->db_smartone->last_query(); + $datas = $qry->result_array(); + if($datas && count($datas) > 0){ + $order_header_id = $datas[0]['So_ResultEntryT_OrderHeaderID']; + $valdata = json_decode($datas[0]['So_ResultEntryFisikUmumDetails'], true); + $details = $valdata['details']; + foreach ($details as $key => $value) { + if($value['chx'] == '1'){ + $data_insert = array( + 'order_id' => $order_header_id, + 'code' => $value['id_code'], + 'label' => $value['label'], + 'note' => '', + 'segment' => $type, + 'category' => $type + ); + $this->insert_data_etl($data_insert,$userid); + $rst[] = $data_insert; + } + //$this->insert_code($value['id_code'],$value['label'].' | '.$type); + } + } + + return $rst; + } + + function loop_k3($id,$userid){ + $rspn = []; + $arr = ['faktor_fisik','faktor_kimia','faktor_biologi','faktor_ergonomi','faktor_psikologi']; + foreach ($arr as $key => $value) { + $rtn = $this->k3($value,$id,$userid); + if(count($rtn) > 0) + $rspn[] = $rtn; + } + return $rspn; + } + + function generate_summaries($orderID,$soReID,$userID,$debugID=0){ + $sql = "UPDATE t_kelainan_fisik SET + T_KelainanFiskIsActive = 'N', + T_KelainanFiskDeletedUserID = ? , + T_KelainanFiskDeleted = NOW() + WHERE + T_KelainanFiskT_OrderHeaderID = ? AND + T_KelainanFiskIsActive = 'Y'"; + $query = $this->db_smartone->query($sql,[ + $userID, + $orderID + ]); + $kelainanrst = []; + $sql = "SELECT * + FROM mcu_fisiksummary + JOIN mcu_kelainan ON Mcu_kelainanID = Mcu_FisikSummaryMcu_KelainanID + WHERE Mcu_FisikSummaryIsActive = 'Y'"; + $query = $this->db_smartone->query($sql); + $rumus_summaries = $query->result_array(); + //print_r($rumus_summaries); + + foreach ($rumus_summaries as $key => $value) { + //echo $value['Mcu_KelainanName']; + $results = []; + $sql = "SELECT * + FROM mcu_fisiksummarydetail + WHERE + Mcu_FisikSummaryDetailMcu_FisikSummaryID = ? AND + Mcu_FisikSummaryDetailIsActive = 'Y'"; + + $query = $this->db_smartone->query($sql,[$value['Mcu_FisikSummaryID']]); + $details = $query->result_array(); + foreach ($details as $k => $v) { + if($v['Mcu_FisikSummaryDetailType'] == 'VK'){ + $sql = "SELECT * + FROM mcu_fisikvalue + WHERE + Mcu_FisikValueT_OrderHeaderID = ? AND + Mcu_FisikValueIsActive = 'Y' AND + Mcu_FisikValueCode = ? AND + Mcu_FisikValueNote = ?"; + $query = $this->db_smartone->query($sql,[$orderID,$v['Mcu_FisikSummaryDetailCode'],$value['Mcu_KelainanName']]); + /*if($value['Mcu_FisikSummaryID'] == 2){ + echo $this->db_smartone->last_query(); + }*/ + $exist_rows = $query->result_array(); + $return_x = false; + if(count($exist_rows) > 0){ + $return_x = true; + } + $results[] = $return_x; + } + + if($v['Mcu_FisikSummaryDetailType'] == 'V'){ + $sql = "SELECT * + FROM mcu_fisikvalue + JOIN mcu_fisiksummarydetail + ON Mcu_FisikSummaryDetailIsActive = 'Y' + AND Mcu_FisikSummaryDetailCode = Mcu_FisikValueCode + AND Mcu_FisikValueCode = ? + AND Mcu_FisikSummaryDetailType = 'V' + JOIN mcu_fisiksummary + ON Mcu_FisikSummaryDetailMcu_FisikSummaryID = Mcu_FisikSummaryID + AND Mcu_FisikSummaryMcu_KelainanID = ? + WHERE Mcu_FisikValueT_OrderHeaderID = ? + AND Mcu_FisikValueIsActive = 'Y' + AND Mcu_FisikSummaryDetailValue REGEXP CONCAT('(^|, )', TRIM(Mcu_FisikValueNote), '(,|$)')"; + $query = $this->db_smartone->query($sql,[$v['Mcu_FisikSummaryDetailCode'],$value['Mcu_KelainanID'],$orderID]); + if($value['Mcu_FisikSummaryID'] == $debugID){ + echo $this->db_smartone->last_query(); + } + $exist_rows = $query->result_array(); + $return_x = false; + if(count($exist_rows) > 0){ + $return_x = true; + } + $results[] = $return_x; + } + + if($v['Mcu_FisikSummaryDetailType'] == 'C'){ + $sql = "SELECT * + FROM mcu_fisikvalue + WHERE + Mcu_FisikValueT_OrderHeaderID = ? AND + Mcu_FisikValueIsActive = 'Y' AND + Mcu_FisikValueCode = ?"; + $query = $this->db_smartone->query($sql,[$orderID,$v['Mcu_FisikSummaryDetailCode']]); + if($value['Mcu_FisikSummaryID'] == $debugID){ + echo $this->db_smartone->last_query(); + } + + $exist_rows = $query->result_array(); + $return_x = false; + if(count($exist_rows) > 0){ + $return_x = true; + } + $results[] = $return_x; + } + } + //if($value['Mcu_FisikSummaryID'] == 2) + //print_r($results); + + $is_kelainan = false; + if($value['Mcu_FisikSummaryType'] == "AND"){ + if(!in_array(false,$results)) + $is_kelainan = true; + + //if($value['Mcu_FisikSummaryID'] == $debugID){ + // echo "AND"; + // print_r($results); +//} + + } + if($value['Mcu_FisikSummaryType'] == "OR"){ + if(in_array(true,$results)) + $is_kelainan = true; + + //if($value['Mcu_FisikSummaryID'] == $debugID){ + // echo "OR"; + // print_r($results); + //} + } + + //if($value['Mcu_FisikSummaryMcu_KelainanID'] == 27) + // echo $this->db_smartone->last_query(); + if($is_kelainan){ + + //if($value['Mcu_FisikSummaryID'] == 2){ + // echo "IHIR"; + //} + $sql = "INSERT INTO t_kelainan_fisik( + T_KelainanFiskSo_ResultEntryID, + T_KelainanFiskT_OrderHeaderID, + T_KelainanFiskMcu_KelainanID, + T_KelainanFiskMcu_FisikSummaryID, + T_KelainanFiskCreatedUserID, + T_KelainanFiskCreated + ) VALUES(?,?,?,?,?,NOW())"; + $query = $this->db_smartone->query($sql,[ + $soReID, + $orderID, + $value['Mcu_FisikSummaryMcu_KelainanID'], + $value['Mcu_FisikSummaryID'], + $userID + ]); + $kelainanrst[] = array( + 'id' => $value['Mcu_FisikSummaryMcu_KelainanID'], + 'name' => $value['Mcu_KelainanName'] + ); + } + + } + } + + function translate_word($word,$langid=1){ + if($langid == 1){ + return $word; + } + else{ + $sql = "SELECT * FROM translate_word WHERE Translate_WordIsActive = 'Y' AND Translate_WordFrom = '{$word}'"; + //echo $sql; + $qry = $this->db_smartone->query($sql); + if (! $qry) { + return $word; + } + + $rows = $qry->result_array(); + if(count($rows) > 0){ + return $rows[0]["Translate_WordTo"]; + }else{ + return $word; + } + } + } + + function translate_multiline_text($text, $langid = 1) { + // Split the text into lines + $lines = explode("\n", $text); + + // Translate each line + $translated_lines = array_map(function($line) use ($langid) { + // Remove the leading "- " and translate the rest + $trimmed_line = ltrim($line, "- "); + return "- " . $this->translate_sentence($trimmed_line, $langid); + }, $lines); + + // Join the translated lines back into a multiline string + return implode("\n", $translated_lines); + } + + function translate_sentence($sentence, $langid = 1) { + // Split the sentence into words + $words = preg_split('/[\s-]+/', $sentence); + + // Translate each word + $translated_words = array_map(function($word) use ($langid) { + return $this->translate_word($word, $langid); + }, $words); + + // Join the translated words back into a sentence + return implode(' ', $translated_words); + } + +} diff --git a/application/libraries/Excel.php b/application/libraries/Excel.php new file mode 100644 index 00000000..a2ff4d7d --- /dev/null +++ b/application/libraries/Excel.php @@ -0,0 +1,14 @@ + + diff --git a/application/libraries/Generateqrreport.php b/application/libraries/Generateqrreport.php new file mode 100644 index 00000000..fa64d2b3 --- /dev/null +++ b/application/libraries/Generateqrreport.php @@ -0,0 +1,638 @@ +=3)', + `QR_PrintOutRetryCount` int(11) NOT NULL DEFAULT 0 + COMMENT 'Berapa kali sudah dicoba upload, maksimal 3', + `QR_PrintOutLastRetryAt` datetime DEFAULT NULL + COMMENT 'Waktu percobaan upload terakhir yang gagal', + `QR_PrintOutUploadedAt` datetime DEFAULT NULL + COMMENT 'Waktu upload PDF ke dedicated server berhasil', + `QR_PrintOutCreatedAt` datetime NOT NULL DEFAULT CURRENT_TIMESTAMP + COMMENT 'Waktu token QR dibuat', + `QR_PrintOutCreatedByUserID` int(11) NOT NULL DEFAULT 0 + COMMENT 'UserID yang mencetak laporan', + `QR_PrintOutIsActive` tinyint(1) NOT NULL DEFAULT 1 + COMMENT '1=aktif, 0=dinonaktifkan (mis. hasil direvisi)', + PRIMARY KEY (`QR_PrintOutID`), + UNIQUE KEY `uq_qr_uuid` (`QR_PrintOutUUID`), + KEY `idx_order_header` (`QR_PrintOutT_OrderHeaderID`), + KEY `idx_upload_status` (`QR_PrintOutUploadStatus`), + KEY `idx_retry` (`QR_PrintOutUploadStatus`, `QR_PrintOutRetryCount`) +) ENGINE=InnoDB DEFAULT CHARSET=latin1 + COMMENT='Token QR Code untuk verifikasi keaslian laporan hasil laboratorium'; + */ +/** + * Generateqrreport Library + * + * Library untuk generate QR Code pada laporan hasil laboratorium. + * QR Code berisi URL langsung ke file PDF di dedicated server. + * Saat QR di-scan, browser langsung membuka file PDF tersebut. + * + * Arsitektur: + * + * ┌─ PHP App (ini) ──────────────────────────────────────────────┐ + * │ 1. saveQRPrintout(verifyBaseURL='https://ds.com/files') │ + * │ → UUID + verifyURL = https://ds.com/files/{uuid}.pdf │ + * │ verifyURL = URL final PDF = yang di-encode ke QR Code │ + * │ 2. generateQRImageBase64(verifyURL) → embed QR ke PDF cetak │ + * │ 3. saveTempPDF() → simpan PDF sementara di /tmp/ │ + * └──────────────────────────────────────────────────────────────┘ + * │ + * ▼ + * ┌─ Golang Upload Tool ─────────────────────────────────────────┐ + * │ - Poll PHP API: getPendingUploads() │ + * │ - Ambil TempFilePath dari row │ + * │ - Upload PDF ke dedicated server pada path sesuai verifyURL │ + * │ - Berhasil → callback confirmUpload($uuid) │ + * │ - Gagal → callback incrementRetry($uuid) │ + * └──────────────────────────────────────────────────────────────┘ + * + * ┌─ Dedicated Server ───────────────────────────────────────────┐ + * │ - Serve file PDF statis │ + * │ - URL: https://ds.com/files/{uuid}.pdf │ + * │ - Saat QR di-scan → browser langsung buka PDF ini │ + * └──────────────────────────────────────────────────────────────┘ + * + * Tabel yang digunakan: qr_printout + * (lihat: sql/qr_printout_updated.sql untuk DDL lengkap) + */ +class Generateqrreport +{ + /** @var CI_DB_driver */ + protected $db_smartone; + + /** @var CI_DB_driver */ + protected $db_onedev; + + function __construct() + { + $CI = & get_instance(); + $this->db_smartone = $CI->load->database("default", true); + $this->db_onedev = $CI->load->database("default", true); + + $this->_loadQRLib(); + } + + // ========================================================================= + // PRIVATE HELPERS + // ========================================================================= + + /** + * Load phpqrcode library jika belum di-include. + */ + private function _loadQRLib() + { + if (!class_exists('QRcode', false)) { + $libPath = APPPATH . 'libraries/qrcode/'; + if (!defined('QR_CACHEABLE')) + define('QR_CACHEABLE', false); + if (!defined('QR_CACHE_DIR')) + define('QR_CACHE_DIR', APPPATH . 'cache/'); + if (!defined('QR_LOG_DIR')) + define('QR_LOG_DIR', APPPATH . 'logs/'); + if (!defined('QR_FIND_BEST_MASK')) + define('QR_FIND_BEST_MASK', true); + if (!defined('QR_FIND_FROM_RANDOM')) + define('QR_FIND_FROM_RANDOM', false); + if (!defined('QR_PNG_MAXIMUM_SIZE')) + define('QR_PNG_MAXIMUM_SIZE', 1024); + + include_once $libPath . 'phpqrcode.php'; + } + } + + /** + * Generate UUID v4. + * + * @param bool $withHyphens true → 36 char 'xxxxxxxx-xxxx-4xxx-yxxx-xxxxxxxxxxxx' + * false → 32 char hex tanpa tanda hubung + * @return string + */ + private function _generateUUID($withHyphens = true) + { + $data = random_bytes(16); + $data[6] = chr(ord($data[6]) & 0x0f | 0x40); // version 4 + $data[8] = chr(ord($data[8]) & 0x3f | 0x80); // variant bits + + $uuid = vsprintf('%s%s-%s-%s-%s-%s%s%s', str_split(bin2hex($data), 4)); + return $withHyphens ? $uuid : str_replace('-', '', $uuid); + } + + /** + * Normalisasi UUID: konversi 32-char (tanpa hyphen) ke format 36-char standar. + * + * @param string $uuid + * @return string lowercase 36-char UUID + */ + private function _normalizeUUID($uuid) + { + $uuid = trim($uuid); + if (strlen($uuid) === 32 && strpos($uuid, '-') === false) { + $uuid = substr($uuid, 0, 8) . '-' + . substr($uuid, 8, 4) . '-' + . substr($uuid, 12, 4) . '-' + . substr($uuid, 16, 4) . '-' + . substr($uuid, 20); + } + return strtolower($uuid); + } + + /** + * Validasi format UUID v4 (8-4-4-4-12). + * + * @param string $uuid + * @return bool + */ + private function _validateUUIDFormat($uuid) + { + return (bool)preg_match( + '/^[0-9a-f]{8}-[0-9a-f]{4}-4[0-9a-f]{3}-[89ab][0-9a-f]{3}-[0-9a-f]{12}$/', + strtolower($uuid) + ); + } + + // ========================================================================= + // PUBLIC METHODS — QR TOKEN + // ========================================================================= + + /** + * Buat record QR baru di tabel qr_printout. + * + * verifyURL = URL LANGSUNG ke file PDF di dedicated server. + * URL ini yang di-encode ke gambar QR Code. + * Golang tool akan upload PDF ke path/URL ini. + * + * Contoh: + * verifyBaseURL = 'https://files.lab.rs.com/reports' + * verifyURL = 'https://files.lab.rs.com/reports/{uuid}.pdf' + * + * @param array $params Wajib: + * - orderHeaderID (int) FK ke t_orderheader + * - groupResultName (string) Label group, mis: 'HEMATOLOGI' + * - verifyBaseURL (string) Base URL folder PDF di dedicated server, + * contoh: 'https://files.lab.rs.com/reports' + * Hasilnya: {verifyBaseURL}/{uuid}.pdf + * Opsional: + * - groupResultID (int) default 0 + * - testID (int) default 0 + * - createdByUserID (int) default 0 + * @return array [ + * 'success' => bool, + * 'uuid' => string|null, // 36-char dengan hyphen + * 'uuid_short' => string|null, // 32-char tanpa hyphen + * 'verifyURL' => string|null, // URL PDF final = yang di-encode ke QR Code + * 'qr_printout_id' => int|null, + * 'message' => string + * ] + */ + public function saveQRPrintout(array $params) + { + $required = ['orderHeaderID', 'groupResultName', 'verifyBaseURL', 'QR_PrintOutReportURL']; + foreach ($required as $field) { + if (empty($params[$field])) { + return [ + 'success' => false, + 'uuid' => null, + 'uuid_short' => null, + 'verifyURL' => null, + 'qr_printout_id' => null, + 'message' => "Parameter '{$field}' wajib diisi.", + ]; + } + } + + $uuid = $this->_generateUUID(true); + $uuidShort = str_replace('-', '', $uuid); + + // verifyURL = URL langsung ke PDF: {base}/{uuid}.pdf + // Golang akan upload PDF ke path ini di dedicated server + $verifyURL = rtrim($params['verifyBaseURL'], '/') . '/' . str_replace('-', '', $uuid) . '.pdf'; + + $data = [ + 'QR_PrintOutT_OrderHeaderID' => (int)$params['orderHeaderID'], + 'QR_PrintOutGroup_ResultID' => (int)($params['groupResultID'] ?? 0), + 'QR_PrintOutT_TestID' => (int)($params['testID'] ?? 0), + 'QR_PrintOutGroup_ResultName' => $params['groupResultName'], + 'QR_PrintOutUUID' => $uuid, + 'QR_PrintOutVerifyURL' => $verifyURL, // URL final PDF = yang di-encode ke QR Code + 'QR_PrintOutReportURL' => $params['QR_PrintOutReportURL'], // URL sumber PDF di PHP server (Golang fetch dari sini) + 'QR_PrintOutTempFilePath' => '', + 'QR_PrintOutUploadStatus' => 'pending', + 'QR_PrintOutRetryCount' => 0, + 'QR_PrintOutLastRetryAt' => null, + 'QR_PrintOutUploadedAt' => null, + 'QR_PrintOutCreatedAt' => date('Y-m-d H:i:s'), + 'QR_PrintOutCreatedByUserID' => (int)($params['createdByUserID'] ?? 0), + 'QR_PrintOutIsActive' => 1, + ]; + + $this->db_smartone->insert('qr_printout', $data); + + if ($this->db_smartone->affected_rows() === 0) { + return [ + 'success' => false, + 'uuid' => null, + 'uuid_short' => null, + 'verifyURL' => null, + 'qr_printout_id' => null, + 'message' => 'Gagal menyimpan data QR Printout ke database.', + ]; + } + + return [ + 'success' => true, + 'uuid' => $uuid, + 'uuid_short' => $uuidShort, + 'verifyURL' => $verifyURL, // ini yang di-encode ke gambar QR Code + 'qr_printout_id' => $this->db_smartone->insert_id(), + 'message' => 'OK', + ]; + } + + /** + * Nonaktifkan QR Code (misal karena hasil direvisi dan QR lama tidak boleh diakses). + * + * @param string $uuid + * @return bool + */ + public function deactivateQR($uuid) + { + $uuid = $this->_normalizeUUID($uuid); + $this->db_smartone->where('QR_PrintOutUUID', $uuid) + ->update('qr_printout', ['QR_PrintOutIsActive' => 0]); + return $this->db_smartone->affected_rows() > 0; + } + + // ========================================================================= + // PUBLIC METHODS — QR IMAGE + // ========================================================================= + + /** + * Generate QR Code sebagai Base64 PNG string. + * Hasil bisa langsung di-embed ke HTML/PDF:"; + $kesimpulan .= ucwords(strtolower($da["title"])) . " : " . $rst_x; + } + //echo $kesimpulan; + } elseif ($da["title"] == "MATA") { + $rst_x = ''; + foreach ($da["details"] as $db) { + if ($db["chx"] == "1" && $db["is_normal"] == "N" && $db["label"] != "Lain-lain") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["label"] . " " . $db["value"]; + } + if ($db["label"] == "Lain-lain" && $db["chx"] == "1") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["value"]; + } + } + + if ($rst_x !== '') { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= ucwords(strtolower($da["title"])) . " : " . $rst_x; + } + //echo $kesimpulan; + } + elseif ($da["title"] == "TELINGA") { + $rst_x = ''; + foreach ($da["details"] as $db) { + if ($db["chx"] == "1" && $db["is_normal"] == "N" && $db["label"] != "Lain-lain") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["label"] . " " . $db["value"]; + } + if ($db["label"] == "Lain-lain" && $db["chx"] == "1") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["value"]; + } + } + + if ($rst_x !== '') { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= ucwords(strtolower($da["title"])) . " : " . $rst_x; + } + } elseif ($da["title"] == "HIDUNG") { + $rst_x = ''; + foreach ($da["details"] as $db) { + if ($db["chx"] == "1" && $db["is_normal"] == "N" && $db["label"] != "Lain-lain") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["label"] . " " . $db["value"]; + } + if ($db["label"] == "Lain-lain" && $db["chx"] == "1") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["value"]; + } + } + + if ($rst_x !== '') { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= ucwords(strtolower($da["title"])) . " : " . $rst_x; + } + //echo $kesimpulan; + } + elseif ($da["title"] == "GIGI") { + $rst_x = ''; + foreach ($da["details"] as $db) { + if ($db["chx"] == "1" && $db["is_normal"] == "N" && $db["label"] != "Lain-lain") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["label"] . " " . $db["value"]; + } + if ($db["label"] == "Lain-lain" && $db["chx"] == "1") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["value"]; + } + } + + if ($rst_x !== '') { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= ucwords(strtolower($da["title"])) . " : " . $rst_x; + } + //echo $kesimpulan; + } elseif ($da["title"] == "MULUT") { + $s_rst = ''; + foreach ($da["details"] as $db) { + $s_res = ""; + foreach ($db["details"] as $dc) { + if ($dc["chx"] == "1" && $dc["is_normal"] == "N" && $dc["label"] != 'Lain-lain') { + if ($s_res != "") $s_res .= ", "; + $s_res .= $dc["label"] . " " . $dc["value"]; + } + if ($dc["label"] == 'Lain-lain' && $dc["chx"] == "1") { + if ($s_res != "") $s_res .= ", "; + $s_res .= $dc["value"]; + } + } + if ($s_res != "") { + if ($s_rst != "") $s_rst .= "
"; + $s_rst .= "" . $db["name"] . " : " . $s_res . ""; + } + } + if ($s_rst != "") { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= "" . ucwords(strtolower($da["title"])) . "
"; + $kesimpulan .= $s_rst; + } + //echo $kesimpulan; + + } elseif ($da["title"] == "LEHER") { + $rst_x = ''; + foreach ($da["details"] as $db) { + if ($db["chx"] == "1" && $db["is_normal"] == "N" && $db["label"] != "Lain-lain") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["label"] . " " . $db["value"]; + } + if ($db["label"] == "Lain-lain" && $db["chx"] == "1") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["value"]; + } + } + + if ($rst_x !== '') { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= ucwords(strtolower($da["title"])) . " : " . $rst_x; + } + } elseif ($da["title"] == "THORAX / DADA") { + $rst_x = ''; + foreach ($da["details"] as $db) { + if ($db["chx"] == "1" && $db["is_normal"] == "N" && $db["label"] != "Lain-lain") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["label"] . " " . $db["value"]; + } + if ($db["label"] == "Lain-lain" && $db["chx"] == "1") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["value"]; + } + } + + if ($rst_x !== '') { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= ucwords(strtolower($da["title"])) . " : " . $rst_x; + } + //echo $kesimpulan; + } elseif ($da["title"] == "PARU-PARU") { + $rst_x = ''; + foreach ($da["details"] as $db) { + if ($db["chx"] == "1" && $db["is_normal"] == "N" && $db["label"] != "Lain-lain") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["label"] . " " . $db["value"]; + } + if ($db["label"] == "Lain-lain" && $db["chx"] == "1") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["value"]; + } + } + + if ($rst_x !== '') { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= ucwords(strtolower($da["title"])) . " : " . $rst_x; + } + } elseif ($da["title"] == "JANTUNG") { + $s_rst = ''; + foreach ($da["details"] as $db) { + $s_res = ""; + foreach ($db["details"] as $dc) { + if ($dc["chx"] == "1" && $dc["is_normal"] == "N" && $dc["label"] != 'Lain-lain') { + if ($s_res != "") $s_res .= ", "; + $s_res .= " ( " . $dc["label"] . " : ". $dc["value"] . " )"; + } + if ($dc["label"] == 'Lain-lain' && $dc["chx"] == "1") { + if ($s_res != "") $s_res .= ", "; + $s_res .= $dc["value"]; + } + } + if ($s_res != "") { + if ($s_rst != "") $s_rst .= "
"; + $s_rst .= "" . $db["name"] . " : " . $s_res . ""; + } + } + if ($s_rst != "") { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= ucwords(strtolower($da["title"])) . "
"; + $kesimpulan .= $s_rst; + } + } elseif ($da["title"] == "PERUT / ABDOMEN") { + $s_res = ""; + $rst_x = ''; + foreach($da["details"] as $gp) { + if($gp["name"] != 'Hernia' && $gp["name"] != 'Pengukuran' ){ + foreach($gp["details"] as $xd) { + if ($xd["chx"] == 1 && $xd["is_normal"] == "N" && $xd["label"] != 'Lain-lain' && $xd['label'] != 'Tidak Ada'){ + $arr_result[] = array($gp["name"],$xd["label"],$xd["value"]) ; + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $gp["name"]." : ".$db["label"] . " " . $db["value"]; + + if ($s_res != "") $s_res .= ", "; + $s_res .= $xd["label"] . " " . $xd["value"]; + } + + if ($xd["label"] == 'Lain-lain' && $xd["chx"] == "1") { + if ($s_res != "") $s_res .= ", "; + $s_res .= $xd["value"]; + } + + + } + }elseif($gp["name"] == 'Hernia') { + //print_r($gp["details"][1]); + if($gp["details"][1]["chx"] == 1){ + $hasil = $gp["details"][1]["value"]; + $hasil_detail = ""; + //print_r($gp["details"][1]); + if($gp["details"][1]["details"][0]["chx_value"] == 1){ + if($hasil_detail != "") $hasil_detail .= ", "; + $hasil_detail .= " ".$gp["details"][1]["details"][0]["label"]; + } + //print_r($gp["details"][1]["details"][1]); + if($gp["details"][1]["details"][1]["chx_a_value"] == 1 || $gp["details"][1]["details"][1]["chx_b_value"] == 1 ){ + $ds_hasil = ""; + if($gp["details"][1]["details"][1]["chx_a_value"] == 1){ + if($ds_hasil != "") $ds_hasil .= ", "; + $ds_hasil .= $gp["details"][1]["details"][1]["chx_a_label"]; + } + + if($gp["details"][1]["details"][1]["chx_b_value"] == 1){ + if($ds_hasil != "") $ds_hasil .= ", "; + $ds_hasil .= $gp["details"][1]["details"][1]["chx_b_label"]; + } + + if($hasil_detail != "") $hasil_detail .= ", "; + $hasil_detail .= " ".$gp["details"][1]["details"][1]["label"]." (".$ds_hasil.")"; + } + + if($gp["details"][1]["details"][2]["chx_a_value"] == 1 || $gp["details"][1]["details"][2]["chx_b_value"] == 1 ){ + $ds_hasil = ""; + if($gp["details"][1]["details"][2]["chx_a_value"] == 1){ + if($ds_hasil != "") $ds_hasil .= ", "; + $ds_hasil .= $gp["details"][1]["details"][1]["chx_a_label"]; + } + + if($gp["details"][1]["details"][2]["chx_b_value"] == 1){ + if($ds_hasil != "") $ds_hasil .= ", "; + $ds_hasil .= $gp["details"][1]["details"][2]["chx_b_label"]; + } + + if($hasil_detail != "") $hasil_detail .= ", "; + $hasil_detail .= " ".$gp["details"][1]["details"][2]["label"]." (".$ds_hasil.")"; + } + + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $gp["name"]." : ".$gp["details"][1]["label"] . " " . $hasil.$hasil_detail ; + + if ($s_res != "") $s_res .= ", "; + $s_res .= $gp["name"]." : ".$gp["details"][1]["label"] . " " . $hasil.$hasil_detail ; + } + + + + } + elseif($gp["name"] == 'Pengukuran' ){ + $perut[] = array( + "mm1" => $gp["name"], + "mm2" => $gp["details"][0]["label"]." : ".$gp["details"][0]["value"]." ".$gp["details"][0]["unit"], + "mm3" => $gp["details"][1]["label"]." : ".$gp["details"][1]["value"]." ".$gp["details"][1]["unit"] + ); + if ($rst_x != "") $rst_x .= ", ";{ + $rst_x .= $gp["details"][0]["label"]." : ".$gp["details"][0]["value"]." ".$gp["details"][0]["unit"] ; + $rst_x .= $gp["details"][1]["label"]." : ".$gp["details"][1]["value"]." ".$gp["details"][1]["unit"] ; + } + + } + + } + + + if ($s_res != "") { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= ucwords(strtolower($da["title"])) . "
"; + $kesimpulan .= $s_res; + } + + //echo $kesimpulan; + } + /*elseif ($da["title"] == "PERUT / ABDOMEN") { + foreach ($da["details"] as $db) { + $s_res = ""; + if($db['name'] != 'Hernia' ){ + foreach ($db["details"] as $dc) { + if ($dc["chx"] == "1" && $dc["is_normal"] == "N" && $dc["label"] != 'Lain-lain' && $dc['label'] != 'Tidak Ada') { + if ($s_res != "") $s_res .= ", "; + $s_res .= $dc["label"] . " " . $dc["value"]; + } + if ($dc["label"] == 'Lain-lain' && $dc["chx"] == "1") { + if ($s_res != "") $s_res .= ", "; + $s_res .= $dc["value"]; + } + } + }else{ + foreach ($db["details"] as $dc) { + if ($dc["chx"] == "1" && $dc["is_normal"] == "N" && $dc["label"] != 'Lain-lain' && $dc['label'] != 'Tidak Ada') { + + $regio_value = ""; + + foreach ($dc['details'] as $k_regio => $v_regio) { + if($v_regio['chx_a_value'] == "1" || $v_regio['chx_b_value'] == "1"){ + $check_regio = ""; + if($v_regio['chx_a_value'] == "1"){ + if ($check_regio != "") $check_regio .= ", "; + $check_regio .= $v_regio['chx_a_label']; + } + if($v_regio['chx_b_value'] == "1"){ + if ($check_regio != "") $check_regio .= ", "; + $check_regio .= $v_regio['chx_b_label']; + } + + if ($regio_value != "") $regio_value .= ", "; + $regio_value .= $v_regio['label']. " (".$check_regio.")" ; + } + } + + if ($s_res != "") $s_res .= ", "; + $s_res .= $regio_value; + } + + } + } + + if ($s_res != "") { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= $db["name"] . " : " . $s_res; + } + } + //echo $kesimpulan; + }*/ elseif ($da["title"] == "GENITOURINARIA") { + $rst_x = ''; + foreach ($da["details"] as $db) { + if ($db["chx"] == "1" && $db["is_normal"] == "N" && $db["label"] != "Tidak diperiksa" && $db["label"] != "Lain-lain") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["label"] . " " . $db["value"]; + } + if ($db["label"] == "Lain-lain" && $db["chx"] == "1") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["value"]; + } + } + + if ($rst_x !== '') { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= ucwords(strtolower($da["title"])) . " : " . $rst_x; + } + } elseif ($da["title"] == "ANGGOTA GERAK") { + foreach ($da["details"] as $db) { + $s_res = ""; + foreach ($db["details"] as $dc) { + if ($dc["chx"] == "1" && $dc["is_normal"] == "N" && $dc["label"] != 'Lain-lain') { + if ($s_res != "") $s_res .= ", "; + $s_res .= "( " . $dc["label"] . " ) " . $dc["value"]; /* perubahan 180320 */ + } + if ($dc["label"] == 'Lain-lain' && $dc["chx"] == "1") { + if ($s_res != "") $s_res .= ", "; + $s_res .= $dc["value"]; + } + } + if ($s_res != "") { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= $db["name"] . " : " . $s_res; + } + } + } elseif ($da["title"] == "SISTEM PERSYARAFAN") { + foreach ($da["details"] as $db) { + $s_res = ""; + foreach ($db["details"] as $dc) { + if ($dc["chx"] == "1" && $dc["is_normal"] == "N" && $dc["label"] != 'Lain-lain') { + if ($s_res != "") $s_res .= ", "; + $s_res .= "( " . $dc["label"] . " ) " . $dc["value"]; /* perubahan 180320 */ + } + if ($dc["label"] == 'Lain-lain' && $dc["chx"] == "1") { + if ($s_res != "") $s_res .= ", "; + $s_res .= $dc["value"]; + } + } + if ($s_res != "") { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= $db["name"] . " : " . $s_res; + } + } + } elseif ($da["title"] == "SMELL TEST") { + foreach ($da["details"] as $db) { + $s_res = ""; + foreach ($db["details"] as $dc) { + if ($dc["chx"] == "1" && $dc["is_normal"] == "N" && $dc["label"] != 'Lain-lain') { + if ($s_res != "") $s_res .= ", "; + $s_res .= "( " . $dc["label"] . " ) " . $dc["value"]; /* perubahan 180320 */ + } + if ($dc["label"] == 'Lain-lain' && $dc["chx"] == "1") { + if ($s_res != "") $s_res .= ", "; + $s_res .= $dc["value"]; + } + } + if ($s_res != "") { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= $db["name"] . " : " . $s_res; + } + } + } elseif ($da["title"] == "LOW BACK PAIN SCREENING TEST") { + foreach ($da["details"] as $db) { + $s_res = ""; + foreach ($db["details"] as $dc) { + if ($dc["chx"] == "1" && $dc["is_normal"] == "N" && $dc["label"] != 'Lain-lain') { + if ($s_res != "") $s_res .= ", "; + $s_res .= "( " . $dc["label"] . " ) " . $dc["value"]; /* perubahan 180320 */ + } + if ($dc["label"] == 'Lain-lain' && $dc["chx"] == "1") { + if ($s_res != "") $s_res .= ", "; + $s_res .= $dc["value"]; + } + } + if ($s_res != "") { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= $db["name"] . " : " . $s_res; + } + } + //echo $kesimpulan; + } elseif ($da["title"] == "SISTEM INTEGUMEN") { + foreach ($da["details"] as $db) { + $s_res = ""; + foreach ($db["details"] as $dc) { + if ($dc["chx"] == "1" && $dc["is_normal"] == "N" && $dc["label"] != 'Lain-lain') { + if ($s_res != "") $s_res .= ", "; + $s_res .= "( " . $dc["label"] . " ) " . $dc["value"]; + } + if ($dc["label"] == 'Lain-lain' && $dc["chx"] == "1") { + if ($s_res != "") $s_res .= ", "; + $s_res .= $dc["value"]; + } + } + if ($s_res != "") { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= $db["name"] . " : " . $s_res; + } + } + + //echo $kesimpulan; + + + + + } + } + if ($kesimpulan == "") { + $kesimpulan = "Tidak ditemukan kelainan."; + } else { + $kesimpulan = "Pada saat ini didapatkan kelainan berupa :
" . $kesimpulan; + } + return $kesimpulan; + } + + function insert_t_kelainan_fisik($kelainans,$order_header_id,$re_id){ + + /*foreach ($kelainans as $key => $value) { + + $sql = "UPDATE t_kelainan_fisik SET T_KelainanFiskIsActive = 'N' WHERE T_KelainanFiskSo_ResultEntryID = ? AND T_KelainanFiskMcu_SummaryFisikID = ?"; + $qry = $this->db_smartone->query($sql, array($re_id, $value['Mcu_SummaryFisikID'])); + + $sql = "INSERT INTO t_kelainan_fisik ( + T_KelainanFiskSo_ResultEntryID, + T_KelainanFiskT_OrderHeaderID, + T_KelainanFiskMcu_SummaryFisikID, + T_KelainanLabNonCreated + ) + VALUES ( + ?,?,?,NOW() + )"; + + $qry = $this->db_smartone->query($sql, array($re_id, $order_header_id, $value['Mcu_SummaryFisikID'])); + }*/ + return true; + + } + + function hitung_bmi($bb,$tb,$standart_bmi){ + $tb = $tb/100; + $bmi = ''; + $classs = ""; + $bmi_valuex= 0; + if(intval($bb) != 0 && intval($tb) != 0){ + $bmi = $bb / ($tb * $tb); + $bmi_valuex = number_format($bmi,2); + + if($standart_bmi === 'asia_pacific'){ + if($bmi_valuex < 18.5) + $classs = 'Underweight'; + + if($bmi_valuex >= 18.5 && $bmi_valuex < 23) + $classs = 'Normal'; + + if($bmi_valuex >= 23 && $bmi_valuex < 25) + $classs = 'Overweight'; + + if($bmi_valuex >= 25 && $bmi_valuex < 30) + $classs = 'Obese I'; + + if($bmi_valuex >= 30) + $classs = 'Obese II'; + } + + if($standart_bmi === 'who'){ + if($bmi_valuex < 18.5) + $classs = 'Underweight'; + + if($bmi_valuex >= 18.5 && $bmi_valuex < 25){ + $classs = 'Normal'; + } + + if($bmi_valuex >= 25 && $bmi_valuex < 30){ + $classs = 'Overweight'; + } + + if($bmi_valuex >= 30) + $classs = 'Obese'; + } + + if($standart_bmi === 'kemenkes'){ + if($bmi_valuex < 18.5) + $classs = 'Underweight'; + + if($bmi_valuex >= 18.5 && $bmi_valuex < 25.1) + $classs = 'Normal'; + + if($bmi_valuex >= 25.1 && $bmi_valuex < 27) + $classs = 'Overweight'; + + if($bmi_valuex >= 27) + $classs = 'Obese'; + } + } + + + + + + return array( + 'bmi' => $bmi_valuex, + 'class' => $classs + ); + } + + function generate_all_kelainan_fisik($mgm_mcuid,$limit){ + $sql = "SELECT * + FROM so_resultentry + JOIN t_orderheader ON So_ResultEntryT_OrderHeaderID = T_OrderHeaderID AND T_OrderHeaderIsActive = 'Y' AND + T_OrderHeaderMgm_McuID = ? + WHERE + So_ResultEntryNonlab_TemplateID = 27 AND So_ResultEntryIsActive = 'Y' + LIMIT ?"; + $qry = $this->db_smartone->query($sql, array($mgm_mcuid,intval($limit))); + // echo $this->db_smartone->last_query(); + $datas = $qry->result_array(); + if($datas && count($datas) > 0){ + foreach ($datas as $key => $value) { + $this->generate_kelainan_fisik($value['So_ResultEntryID']); + } + } + } + + function generate_kelainan_fisik($id) + { + $kesimpulan = ""; + $all_kelainans = []; + + $sql = "SELECT * + FROM fisik_template + JOIN so_resultentry_fisik_umum ON So_ResultEntryFisikUmumFisikTemplateID = FisikTemplateID AND So_ResultEntryFisikUmumSo_ResultEntryID = ? + JOIN so_resultentry ON So_ResultEntryFisikUmumSo_ResultEntryID = So_ResultEntryID + WHERE + FisikTemplateIsActive = 'Y' AND + FisikTemplateType = 'Riwayat' + ORDER BY FisikTemplateCode ASC + "; + $qry = $this->db_smartone->query($sql, array($id)); + // echo $this->db_smartone->last_query(); + $xriwayats = $qry->result_array(); + $order_header_id = $xriwayats[0]['So_ResultEntryT_OrderHeaderID']; + $re_id = $xriwayats[0]['So_ResultEntryID']; + $riwayat_data = []; + foreach ($xriwayats as $key => $value) { + $riwayat_data[] = json_decode($value['So_ResultEntryFisikUmumDetails'], true); + } + //print_r($riwayat_data); + foreach ($riwayat_data as $riwayat_da) { + //print_r($riwayat_da); + //echo $riwayat_da["title"]; + if ($riwayat_da["title"] == "KELUHAN SAAT INI") { + //print_r($riwayat_da["details"]); + foreach ($riwayat_da["details"] as $riwayat_db) { + if (($riwayat_db["chx"] == "1" || $riwayat_db["chx"] != false) && $riwayat_db["label"] == 'Gastritis (maag)') { + if ($kesimpulan != "") $kesimpulan .= ", "; + $kesimpulan .= $riwayat_db["label"] . " " . $riwayat_db["value"]; + } + } + }elseif ($riwayat_da["title"] == "RIWAYAT KEBIASAAN HIDUP") { + $rst_x = ''; + foreach ($riwayat_da["details"] as $db) { + foreach ($db['details'] as $dc) { + $rows_summary = $this->get_kelainans($dc["id_code"]); + if(count($rows_summary) > 0){ + $kelainans = []; + foreach ($rows_summary as $key => $value) { + if($value['Mcu_SummaryFisikType'] == 'C' && $dc["chx"] == "1"){ + $kelainans[] = $value; + $all_kelainans[] = $value; + } + } + + if(count($kelainans) > 0){ + $this->insert_t_kelainan_fisik($kelainans,$order_header_id,$re_id); + } + } + } + } + } + } + + $kode_gigi = array( + "X" => "Berlubang", + "C" => "Tambalan", + "O" => "Tanggal", + "R" => "Sisa akar", + "A" => "Gigi Palsu", + "K" => "Karang Gigi" + ); + + $sql = "SELECT * + FROM fisik_template + JOIN so_resultentry_fisik_umum ON So_ResultEntryFisikUmumFisikTemplateID = FisikTemplateID AND So_ResultEntryFisikUmumSo_ResultEntryID = ? + JOIN so_resultentry ON So_ResultEntryFisikUmumSo_ResultEntryID = So_ResultEntryID + JOIN t_orderheader ON So_ResultEntryT_OrderHeaderID = T_OrderHeaderID + JOIN m_patient ON T_OrderHeaderM_PatientID = M_PatientID + WHERE + FisikTemplateIsActive = 'Y' AND + FisikTemplateType = 'Fisik' + ORDER BY FisikTemplateCode ASC + "; + $qry = $this->db_smartone->query($sql, array($id)); + // echo $this->db_smartone->last_query(); + $xfisiks = $qry->result_array(); + $order_header_id = $xfisiks[0]['So_ResultEntryT_OrderHeaderID']; + $re_id = $xfisiks[0]['So_ResultEntryID']; + $fisik_data = []; + foreach ($xfisiks as $kex => $valux) { + $fisik_data[] = json_decode($valux['So_ResultEntryFisikUmumDetails'], true); + } + //print_r($fisik_data); + + $sexcode = $xfisiks[0]["M_PatientGender"] == 'male' ? 'L' : 'P'; + + foreach ($fisik_data as $da) { + //echo $da["title"]; + if ($da["title"] == "TANDA VITAL") { + foreach ($da["details"] as $db) { + //print_r($db); + if ($db["chx_x"] == "1" && $db["id_code"] != 'tanda_vital_5') { + if ($kesimpulan != "") $kesimpulan .= ", "; + $kesimpulan .= $db["label"] . " " . $db["label_x"]; + } + if ($db["id_code"] == "tanda_vital_1") { + //echo $db["value"]; + if (intval($db["value"]) > 100) { + if ($kesimpulan != "") $kesimpulan .= ", "; + $kesimpulan .= "Takhikardi " . " ( " . $db["value"] . " x/menit )"; + } + if (intval($db["value"]) < 60) { + if ($kesimpulan != "") $kesimpulan .= ", "; + $kesimpulan .= "Bradikardi " . " ( " . $db["value"] . " x/menit )"; + } + } + if ($db["id_code"] == "tanda_vital_3") { + if (intval($db["value"]) > 20 || intval($db["value"]) < 16) { + if ($kesimpulan != "") $kesimpulan .= ", "; + $kesimpulan .= $db["label"] . " ( " . $db["value"] . " x/menit )"; + } + } + if ($db["id_code"] == 'tanda_vital_5' && $db["value"] != 'NORMAL' && $db["value"] != 'OPTIMAL' && $db['value'] != 'HIGH NORMAL') { + if ($kesimpulan != "") $kesimpulan .= ", "; + $kesimpulan .= $db["label"] . " " . $db["value_x"] . "/" . $db["value_y"]." " . $db["unit"] . " ( " . ucwords(strtolower($db["value"])) . " )"; + } + + //echo $db['value']." - "; + //echo $db["id_code"]; + $rows_summary = $this->get_kelainans($db["id_code"]); + //print_r($rows_summary); + if(count($rows_summary) > 0){ + $kelainans = []; + foreach ($rows_summary as $key => $value) { + $val = strtolower($db['value']); + $val = str_replace("stadium","stage",$val); + if($value['Mcu_SummaryFisikType'] == 'SD'){ + if(strtolower($value['Mcu_KelainanName']) == $val){ + $kelainans[] = $value; + $all_kelainans[] = $value; + + } + } + } + + if(count($kelainans) > 0){ + $this->insert_t_kelainan_fisik($kelainans,$order_header_id,$re_id); + } + + } + + } + } elseif ($da["title"] == "STATUS GIZI") { + $bmi_value = ""; + + //echo json_encode($da['details']); + foreach ($da["details"] as $db) { + + if ($db["id_code"] == "status_gizi_4") $bmi_value = $db["value"]; + if ($db["chx_x"] == "1") { + if ($kesimpulan != "") $kesimpulan .= ", "; + $kesimpulan .= $db["label"] . " " . $db["label_x"]; + } + if (($db["id_code"] == "status_gizi_6" && $db["value"] != "Normal" && $db["value"] != '-')) { + //echo $db["value"] ; + if ($kesimpulan != "") $kesimpulan .= ", "; + $kesimpulan .= $db["value"] . " ( BMI : $bmi_value )"; + + //echo $kesimpulan; + } + //echo $kesimpulan; + if ($db["id_code"] == "status_gizi_3") { + if (intval($db["value"]) >= 90 && $sexcode == 'L') { + if ($kesimpulan != "") $kesimpulan .= ", "; + $kesimpulan .= $db["label"] . " " . " ( " . $db["value"] . " cm )"; + } + if (intval($db["value"]) >= 80 && $sexcode == 'P') { + if ($kesimpulan != "") $kesimpulan .= ", "; + $kesimpulan .= $db["label"] . " " . " ( " . $db["value"] . " cm )"; + } + } + + $rows_summary = $this->get_kelainans($db["id_code"]); + if(count($rows_summary) > 0){ + $kelainans = []; + foreach ($rows_summary as $key => $value) { + if($value['Mcu_SummaryFisikType'] == 'SD'){ + if($value['Mcu_KelainanName'] == $db['value']){ + $kelainans[] = $value; + $all_kelainans[] = $value; + } + } + } + + if(count($kelainans) > 0){ + $this->insert_t_kelainan_fisik($kelainans,$order_header_id,$re_id); + } + + } + } + } elseif ($da["title"] == "KEADAAN UMUM") { + foreach ($da["details"] as $db) { + if ($db["chx_x"] == "1") { + if ($kesimpulan != "") $kesimpulan .= ", "; + $kesimpulan .= $db["label"] . " : ( " . $db["label_x"] . " ) " . $db["value"]; + } + } + //echo $kesimpulan; + } elseif ($da["title"] == "KEPALA WAJAH") { + //echo json_encode($da["details"]); + $rst_x = ''; + foreach ($da["details"] as $db) { + if ($db["chx"] == "1" && $db["is_normal"] == "N" && $db["label"] != "Lain-lain") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["label"] . " " . $db["value"]; + } + if ($db["label"] == "Lain-lain" && $db["chx"] == "1") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["value"]; + } + } + //echo $kesimpulan; + + if ($rst_x !== '') { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= ucwords(strtolower($da["title"])) . " : " . $rst_x; + } + //echo $kesimpulan; + } elseif ($da["title"] == "MATA") { + $rst_x = ''; + foreach ($da["details"] as $db) { + if ($db["chx"] == "1" && $db["is_normal"] == "N" && $db["label"] != "Lain-lain") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["label"] . " " . $db["value"]; + } + if ($db["label"] == "Lain-lain" && $db["chx"] == "1") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["value"]; + } + } + + if ($rst_x !== '') { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= ucwords(strtolower($da["title"])) . " : " . $rst_x; + } + //echo $kesimpulan; + } elseif ($da["title"] == "PERSEPSI WARNA") { + $rst_x = ''; + foreach ($da["details"] as $db) { + if ($db["chx"] == "1" && $db["is_normal"] == "N" && $db["label"] != "Lain-lain") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["label"] . " " . $db["value"]; + } + if ($db["label"] == "Lain-lain" && $db["chx"] == "1") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["value"]; + } + + $rows_summary = $this->get_kelainans($db["id_code"]); + if(count($rows_summary) > 0){ + $kelainans = []; + foreach ($rows_summary as $key => $value) { + if($value['Mcu_SummaryFisikType'] == 'C'){ + if($db["chx"] == "1"){ + $kelainans[] = $value; + $all_kelainans[] = $value; + } + } + } + + if(count($kelainans) > 0){ + $this->insert_t_kelainan_fisik($kelainans,$order_header_id,$re_id); + } + } + } + + if ($rst_x !== '') { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= ucwords(strtolower($da["title"])) . " : " . $rst_x; + } + //echo $kesimpulan; + } elseif ($da["title"] == "VISUS JAUH") { + + $s_rst = ''; + foreach ($da["details"] as $db) { + $str_data = ""; + $r_ods = ''; + $xr_ods = array(); + $kelainan = ''; + foreach ($db['details'] as $dc) { + if ($dc['chx'] == '1' && $dc['segment_name'] == 'Tanpa kacamata' && ($dc['value'] != '' && $dc['value'] != '20/20')) { + $r_ods .= $dc['label'] . " : " . $dc['value'] . " "; + array_push($xr_ods, $dc['value']); + } + if ($dc['chx'] == '1' && $dc['segment_name'] == 'Dengan kacamata' && $dc['value'] != '') { + if ($dc['value'] != '20/20') + $r_ods .= $dc['label'] . " : " . $dc['value'] . " "; + + array_push($r_ods); + array_push($xr_ods, $dc['value']); + } + } + //print_r($xr_ods); + if (!empty($xr_ods)) { + if ($db['name'] == 'Tanpa kacamata') { + $kelainan = "Kelainan refraksi". " " . strtolower($db['name']); + $str_data .= $kelainan . " ( " . $r_ods . ")"; + } + if ($db['name'] == 'Dengan kacamata') { + $all66 = true; + foreach ($xr_ods as $xd => $xv) { + if ($xv != '20/20') { + $all66 = false; + } + } + if ($all66) { + $kelainan = "Kelainan refraksi terkoreksi". " " . strtolower($db['name']) ; + } else { + $kelainan = "Kelainan refraksi". " " . strtolower($db['name']) ; + } + if ($r_ods != '') + $str_data .= $kelainan . " ( " . $r_ods . ")"; + else + $str_data .= $kelainan; + } + $s_rst .= $str_data; + + $rows_summary = $this->get_kelainans($db["id_code"]); + if(count($rows_summary) > 0){ + $kelainans = []; + foreach ($rows_summary as $key => $value) { + if($value['Mcu_SummaryFisikType'] == 'SD'){ + if($value['Mcu_KelainanName'] == $kelainan){ + $kelainans[] = $value; + $all_kelainans[] = $value; + } + } + } + + if(count($kelainans) > 0){ + $this->insert_t_kelainan_fisik($kelainans,$order_header_id,$re_id); + } + + } + } + //echo $str_data; + + + + } + if ($s_rst != "") { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= $s_rst; + } + //echo $kesimpulan; + } elseif ($da["title"] == "TELINGA") { + $rst_x = ''; + foreach ($da["details"] as $db) { + if ($db["chx"] == "1" && $db["is_normal"] == "N" && $db["label"] != "Lain-lain") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["label"] . " " . $db["value"]; + } + if ($db["label"] == "Lain-lain" && $db["chx"] == "1") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["value"]; + } + + $rows_summary = $this->get_kelainans($db["id_code"]); + if(count($rows_summary) > 0){ + $kelainans = []; + foreach ($rows_summary as $key => $value) { + if($value['Mcu_SummaryFisikType'] == 'C' && $db["chx"] == "1"){ + $kelainans[] = $value; + $all_kelainans[] = $value; + } + } + + if(count($kelainans) > 0){ + $this->insert_t_kelainan_fisik($kelainans,$order_header_id,$re_id); + } + } + } + + if ($rst_x !== '') { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= ucwords(strtolower($da["title"])) . " : " . $rst_x; + } + } elseif ($da["title"] == "HIDUNG") { + $rst_x = ''; + foreach ($da["details"] as $db) { + if ($db["chx"] == "1" && $db["is_normal"] == "N" && $db["label"] != "Lain-lain") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["label"] . " " . $db["value"]; + } + if ($db["label"] == "Lain-lain" && $db["chx"] == "1") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["value"]; + } + + $rows_summary = $this->get_kelainans($db["id_code"]); + if(count($rows_summary) > 0){ + $kelainans = []; + foreach ($rows_summary as $key => $value) { + if($value['Mcu_SummaryFisikType'] == 'C' && $db["chx"] == "1"){ + $kelainans[] = $value; + $all_kelainans[] = $value; + } + } + + if(count($kelainans) > 0){ + $this->insert_t_kelainan_fisik($kelainans,$order_header_id,$re_id); + } + } + + } + + if ($rst_x !== '') { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= ucwords(strtolower($da["title"])) . " : " . $rst_x; + } + //echo $kesimpulan; + } + elseif ($da["title"] == "GIGI") { + $rst_x = ''; + foreach ($da["details"] as $db) { + if ($db["chx"] == "1" && $db["is_normal"] == "N" && $db["label"] != "Lain-lain") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["label"] . " " . $db["value"]; + } + if ($db["label"] == "Lain-lain" && $db["chx"] == "1") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["value"]; + } + + $rows_summary = $this->get_kelainans($db["id_code"]); + if(count($rows_summary) > 0){ + $kelainans = []; + foreach ($rows_summary as $key => $value) { + if($value['Mcu_SummaryFisikType'] == 'CSD' && $db["chx"] == "1"){ + if($value['Mcu_KelainanName'] == $db["label"]){ + $kelainans[] = $value; + $all_kelainans[] = $value; + } + } + } + + if(count($kelainans) > 0){ + $this->insert_t_kelainan_fisik($kelainans,$order_header_id,$re_id); + } + } + } + + if ($rst_x !== '') { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= ucwords(strtolower($da["title"])) . " : " . $rst_x; + } + //echo $kesimpulan; + } elseif ($da["title"] == "MULUT") { + $s_rst = ''; + foreach ($da["details"] as $db) { + $s_res = ""; + foreach ($db["details"] as $dc) { + // print_r($dc); + if ($dc["chx"] == "1" && $dc["is_normal"] == "N" && $dc["label"] != 'Lain-lain') { + if ($s_res != "") $s_res .= ", "; + $s_res .= $dc["label"] . " " . $dc["value"]; + } + if ($dc["label"] == 'Lain-lain' && $dc["chx"] == "1") { + if ($s_res != "") $s_res .= ", "; + $s_res .= $dc["value"]; + } + + $rows_summary = $this->get_kelainans($dc["id_code"]); + if(count($rows_summary) > 0){ + $kelainans = []; + foreach ($rows_summary as $key => $value) { + if($value['Mcu_SummaryFisikType'] == 'C' && $dc["chx"] == "1"){ + $kelainans[] = $value; + $all_kelainans[] = $value; + } + } + + if(count($kelainans) > 0){ + $this->insert_t_kelainan_fisik($kelainans,$order_header_id,$re_id); + } + } + } + if ($s_res != "") { + if ($s_rst != "") $s_rst .= "
"; + $s_rst .= "" . $db["name"] . " : " . $s_res . ""; + } + } + if ($s_rst != "") { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= "" . ucwords(strtolower($da["title"])) . "
"; + $kesimpulan .= $s_rst; + } + //echo $kesimpulan; + + } elseif ($da["title"] == "LEHER") { + $rst_x = ''; + foreach ($da["details"] as $db) { + if ($db["chx"] == "1" && $db["is_normal"] == "N" && $db["label"] != "Lain-lain") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["label"] . " " . $db["value"]; + } + if ($db["label"] == "Lain-lain" && $db["chx"] == "1") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["value"]; + } + } + + if ($rst_x !== '') { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= ucwords(strtolower($da["title"])) . " : " . $rst_x; + } + } elseif ($da["title"] == "THORAX / DADA") { + $rst_x = ''; + foreach ($da["details"] as $db) { + if ($db["chx"] == "1" && $db["is_normal"] == "N" && $db["label"] != "Lain-lain") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["label"] . " " . $db["value"]; + } + if ($db["label"] == "Lain-lain" && $db["chx"] == "1") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["value"]; + } + } + + if ($rst_x !== '') { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= ucwords(strtolower($da["title"])) . " : " . $rst_x; + } + //echo $kesimpulan; + } elseif ($da["title"] == "PARU-PARU") { + $rst_x = ''; + foreach ($da["details"] as $db) { + if ($db["chx"] == "1" && $db["is_normal"] == "N" && $db["label"] != "Lain-lain") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["label"] . " " . $db["value"]; + } + if ($db["label"] == "Lain-lain" && $db["chx"] == "1") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["value"]; + } + } + + if ($rst_x !== '') { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= ucwords(strtolower($da["title"])) . " : " . $rst_x; + } + } elseif ($da["title"] == "JANTUNG") { + $s_rst = ''; + foreach ($da["details"] as $db) { + $s_res = ""; + foreach ($db["details"] as $dc) { + if ($dc["chx"] == "1" && $dc["is_normal"] == "N" && $dc["label"] != 'Lain-lain') { + if ($s_res != "") $s_res .= ", "; + $s_res .= " ( " . $dc["label"] . " : " . $dc["label_x"] . " " . $dc["value"] . " )"; + } + if ($dc["label"] == 'Lain-lain' && $dc["chx"] == "1") { + if ($s_res != "") $s_res .= ", "; + $s_res .= $dc["value"]; + } + + $rows_summary = $this->get_kelainans($dc["id_code"]); + if(count($rows_summary) > 0){ + $kelainans = []; + foreach ($rows_summary as $key => $value) { + if($value['Mcu_SummaryFisikType'] == 'C' && $dc["chx"] == "1"){ + $kelainans[] = $value; + $all_kelainans[] = $value; + } + } + + if(count($kelainans) > 0){ + $this->insert_t_kelainan_fisik($kelainans,$order_header_id,$re_id); + } + } + } + if ($s_res != "") { + if ($s_rst != "") $s_rst .= "
"; + $s_rst .= "" . $db["name"] . " : " . $s_res . ""; + } + } + if ($s_rst != "") { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= ucwords(strtolower($da["title"])) . "
"; + $kesimpulan .= $s_rst; + } + } elseif ($da["title"] == "PERUT / ABDOMEN") { + + $rst_x = ''; + foreach($da["details"] as $gp) { + if($gp["name"] != 'Hernia' && $gp["name"] != 'Pengukuran' ){ + foreach($gp["details"] as $xd) { + if ($xd["chx"] == 1 ){ + $arr_result[] = array($gp["name"],$xd["label"],$xd["value"]) ; + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $gp["name"]." : ".$xd["label"] . " " . $xd["value"]; + + } + + $rows_summary = $this->get_kelainans($xd["id_code"]); + if(count($rows_summary) > 0){ + $kelainans = []; + foreach ($rows_summary as $key => $value) { + if($value['Mcu_SummaryFisikType'] == 'C' && $xd["chx"] == "1"){ + $kelainans[] = $value; + $all_kelainans[] = $value; + } + } + + if(count($kelainans) > 0){ + $this->insert_t_kelainan_fisik($kelainans,$order_header_id,$re_id); + } + } + } + }elseif($gp["name"] == 'Hernia') { + //print_r($gp["details"][1]); + if($gp["details"][1]["chx"] == 1){ + $hasil = $gp["details"][1]["value"]; + $hasil_detail = ""; + //print_r($gp["details"][1]); + if($gp["details"][1]["details"][0]["chx_value"] == 1){ + if($hasil_detail != "") $hasil_detail .= ", "; + $hasil_detail .= " ".$gp["details"][1]["details"][0]["label"]; + } + //print_r($gp["details"][1]["details"][1]); + if($gp["details"][1]["details"][1]["chx_a_value"] == 1 || $gp["details"][1]["details"][1]["chx_b_value"] == 1 ){ + $ds_hasil = ""; + if($gp["details"][1]["details"][1]["chx_a_value"] == 1){ + if($ds_hasil != "") $ds_hasil .= ", "; + $ds_hasil .= $gp["details"][1]["details"][1]["chx_a_label"]; + } + + if($gp["details"][1]["details"][1]["chx_b_value"] == 1){ + if($ds_hasil != "") $ds_hasil .= ", "; + $ds_hasil .= $gp["details"][1]["details"][1]["chx_b_label"]; + } + + if($hasil_detail != "") $hasil_detail .= ", "; + $hasil_detail .= " ".$gp["details"][1]["details"][1]["label"]." (".$ds_hasil.")"; + } + + if($gp["details"][1]["details"][2]["chx_a_value"] == 1 || $gp["details"][1]["details"][2]["chx_b_value"] == 1 ){ + $ds_hasil = ""; + if($gp["details"][1]["details"][2]["chx_a_value"] == 1){ + if($ds_hasil != "") $ds_hasil .= ", "; + $ds_hasil .= $gp["details"][1]["details"][1]["chx_a_label"]; + } + + if($gp["details"][1]["details"][2]["chx_b_value"] == 1){ + if($ds_hasil != "") $ds_hasil .= ", "; + $ds_hasil .= $gp["details"][1]["details"][2]["chx_b_label"]; + } + + if($hasil_detail != "") $hasil_detail .= ", "; + $hasil_detail .= " ".$gp["details"][1]["details"][2]["label"]." (".$ds_hasil.")"; + } + + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $gp["name"]." : ".$gp["details"][1]["label"] . " " . $hasil.$hasil_detail ; + + $rows_summary = $this->get_kelainans($gp["details"][1]["id_code"]); + if(count($rows_summary) > 0){ + $kelainans = []; + foreach ($rows_summary as $key => $value) { + if($value['Mcu_SummaryFisikType'] == 'C' && $gp["details"][1]["chx"] == "1"){ + $kelainans[] = $value; + $all_kelainans[] = $value; + } + } + + if(count($kelainans) > 0){ + $this->insert_t_kelainan_fisik($kelainans,$order_header_id,$re_id); + } + } + } + + if($gp["details"][0]["chx"] == 1){ + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $gp["name"]." : ".$gp["details"][0]["label"]; + + $rows_summary = $this->get_kelainans($gp["details"][0]["id_code"]); + if(count($rows_summary) > 0){ + $kelainans = []; + foreach ($rows_summary as $key => $value) { + if($value['Mcu_SummaryFisikType'] == 'C' && $gp["details"][0]["chx"] == "1"){ + $kelainans[] = $value; + $all_kelainans[] = $value; + } + } + + if(count($kelainans) > 0){ + $this->insert_t_kelainan_fisik($kelainans,$order_header_id,$re_id); + } + } + } + + } + elseif($gp["name"] == 'Pengukuran' ){ + $perut[] = array( + "mm1" => $gp["name"], + "mm2" => $gp["details"][0]["label"]." : ".$gp["details"][0]["value"]." ".$gp["details"][0]["unit"], + "mm3" => $gp["details"][1]["label"]." : ".$gp["details"][1]["value"]." ".$gp["details"][1]["unit"] + ); + if ($rst_x != "") $rst_x .= ", ";{ + $rst_x .= $gp["details"][0]["label"]." : ".$gp["details"][0]["value"]." ".$gp["details"][0]["unit"] ; + $rst_x .= $gp["details"][1]["label"]." : ".$gp["details"][1]["value"]." ".$gp["details"][1]["unit"] ; + } + + } + + } + + + + + //echo $kesimpulan; + } elseif ($da["title"] == "GENITOURINARIA") { + $rst_x = ''; + foreach ($da["details"] as $db) { + if ($db["chx"] == "1" && $db["is_normal"] == "N" && $db["label"] != "Tidak diperiksa" && $db["label"] != "Lain-lain") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["label"] . " " . $db["value"]; + } + if ($db["label"] == "Lain-lain" && $db["chx"] == "1") { + if ($rst_x != "") $rst_x .= ", "; + $rst_x .= $db["value"]; + } + } + + if ($rst_x !== '') { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= ucwords(strtolower($da["title"])) . " : " . $rst_x; + } + } elseif ($da["title"] == "ANGGOTA GERAK") { + foreach ($da["details"] as $db) { + $s_res = ""; + foreach ($db["details"] as $dc) { + if ($dc["chx"] == "1" && $dc["is_normal"] == "N" && $dc["label"] != 'Lain-lain') { + if ($s_res != "") $s_res .= ", "; + $s_res .= "( " . $dc["label"] . " ) " . $dc["value"]; /* perubahan 180320 */ + } + if ($dc["label"] == 'Lain-lain' && $dc["chx"] == "1") { + if ($s_res != "") $s_res .= ", "; + $s_res .= $dc["value"]; + } + + $rows_summary = $this->get_kelainans($dc["id_code"]); + if(count($rows_summary) > 0){ + $kelainans = []; + foreach ($rows_summary as $key => $value) { + if($value['Mcu_SummaryFisikType'] == 'C' && $dc["chx"] == "1"){ + $kelainans[] = $value; + $all_kelainans[] = $value; + } + } + + if(count($kelainans) > 0){ + $this->insert_t_kelainan_fisik($kelainans,$order_header_id,$re_id); + } + } + } + if ($s_res != "") { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= $db["name"] . " : " . $s_res; + } + } + } elseif ($da["title"] == "SISTEM PERSYARAFAN") { + foreach ($da["details"] as $db) { + $s_res = ""; + foreach ($db["details"] as $dc) { + if ($dc["chx"] == "1" && $dc["is_normal"] == "N" && $dc["label"] != 'Lain-lain') { + if ($s_res != "") $s_res .= ", "; + $s_res .= "( " . $dc["label"] . " ) " . $dc["value"]; /* perubahan 180320 */ + } + if ($dc["label"] == 'Lain-lain' && $dc["chx"] == "1") { + if ($s_res != "") $s_res .= ", "; + $s_res .= $dc["value"]; + } + + $rows_summary = $this->get_kelainans($dc["id_code"]); + if(count($rows_summary) > 0){ + $kelainans = []; + foreach ($rows_summary as $key => $value) { + if($value['Mcu_SummaryFisikType'] == 'C' && $dc["chx"] == "1"){ + $kelainans[] = $value; + $all_kelainans[] = $value; + } + } + + if(count($kelainans) > 0){ + $this->insert_t_kelainan_fisik($kelainans,$order_header_id,$re_id); + } + } + } + if ($s_res != "") { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= $db["name"] . " : " . $s_res; + } + } + } elseif ($da["title"] == "SMELL TEST") { + foreach ($da["details"] as $db) { + $s_res = ""; + foreach ($db["details"] as $dc) { + if ($dc["chx"] == "1" && $dc["is_normal"] == "N" && $dc["label"] != 'Lain-lain') { + if ($s_res != "") $s_res .= ", "; + $s_res .= "( " . $dc["label"] . " ) " . $dc["value"]; /* perubahan 180320 */ + } + if ($dc["label"] == 'Lain-lain' && $dc["chx"] == "1") { + if ($s_res != "") $s_res .= ", "; + $s_res .= $dc["value"]; + } + + $rows_summary = $this->get_kelainans($dc["id_code"]); + if(count($rows_summary) > 0){ + $kelainans = []; + foreach ($rows_summary as $key => $value) { + if($value['Mcu_SummaryFisikType'] == 'C' && $dc["chx"] == "1"){ + $kelainans[] = $value; + $all_kelainans[] = $value; + } + } + + if(count($kelainans) > 0){ + $this->insert_t_kelainan_fisik($kelainans,$order_header_id,$re_id); + } + } + } + if ($s_res != "") { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= $db["name"] . " : " . $s_res; + } + } + } elseif ($da["title"] == "LOW BACK PAIN SCREENING TEST") { + foreach ($da["details"] as $db) { + $s_res = ""; + foreach ($db["details"] as $dc) { + if ($dc["chx"] == "1" && $dc["is_normal"] == "N" && $dc["label"] != 'Lain-lain') { + if ($s_res != "") $s_res .= ", "; + $s_res .= "( " . $dc["label"] . " ) " . $dc["value"]; /* perubahan 180320 */ + } + if ($dc["label"] == 'Lain-lain' && $dc["chx"] == "1") { + if ($s_res != "") $s_res .= ", "; + $s_res .= $dc["value"]; + } + + $rows_summary = $this->get_kelainans($dc["id_code"]); + if(count($rows_summary) > 0){ + $kelainans = []; + foreach ($rows_summary as $key => $value) { + if($value['Mcu_SummaryFisikType'] == 'C' && $dc["chx"] == "1"){ + $kelainans[] = $value; + $all_kelainans[] = $value; + } + } + + if(count($kelainans) > 0){ + $this->insert_t_kelainan_fisik($kelainans,$order_header_id,$re_id); + } + } + } + if ($s_res != "") { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= $db["name"] . " : " . $s_res; + } + } + //echo $kesimpulan; + } elseif ($da["title"] == "SISTEM INTEGUMEN") { + foreach ($da["details"] as $db) { + $s_res = ""; + foreach ($db["details"] as $dc) { + if ($dc["chx"] == "1" && $dc["is_normal"] == "N" && $dc["label"] != 'Lain-lain') { + if ($s_res != "") $s_res .= ", "; + $s_res .= "( " . $dc["label"] . " ) " . $dc["value"]; + } + if ($dc["label"] == 'Lain-lain' && $dc["chx"] == "1") { + if ($s_res != "") $s_res .= ", "; + $s_res .= $dc["value"]; + } + + $rows_summary = $this->get_kelainans($dc["id_code"]); + if(count($rows_summary) > 0){ + $kelainans = []; + foreach ($rows_summary as $key => $value) { + if($value['Mcu_SummaryFisikType'] == 'C' && $dc["chx"] == "1"){ + $kelainans[] = $value; + $all_kelainans[] = $value; + } + } + + if(count($kelainans) > 0){ + $this->insert_t_kelainan_fisik($kelainans,$order_header_id,$re_id); + } + } + } + if ($s_res != "") { + if ($kesimpulan != "") $kesimpulan .= "
"; + $kesimpulan .= $db["name"] . " : " . $s_res; + } + } + + //echo $kesimpulan; + + + + + } + } + + $rst_statusgizi = $this->status_gizi($id); + //print_r($rst_statusgizi); + $rows_summary = $this->get_kelainans("status_gizi_6"); + if(count($rows_summary) > 0){ + $kelainans = []; + foreach ($rows_summary as $key => $value) { + if($value['Mcu_SummaryFisikType'] == 'SD'){ + if($value['Mcu_KelainanName'] == $rst_statusgizi['xclassification']){ + $kelainans[] = $value; + $all_kelainans[] = $value; + } + } + } + + if(count($kelainans) > 0){ + $this->insert_t_kelainan_fisik($kelainans,$order_header_id,$re_id); + } + } + + $rst_persepsi_warna = $this->persepsi_warna($id); + $rows_summary = $this->get_kelainans("persepsi_warna_3"); + $persepsi_warna_hasil = "Normal"; + if($rst_persepsi_warna == 'BW'){ + $persepsi_warna_hasil = "Red Green Deficiency"; + } + + if(count($rows_summary) > 0){ + $kelainans = []; + foreach ($rows_summary as $key => $value) { + if($value['Mcu_SummaryFisikType'] == 'SD'){ + if($value['Mcu_KelainanName'] == $persepsi_warna_hasil){ + $kelainans[] = $value; + $all_kelainans[] = $value; + } + } + } + + if(count($kelainans) > 0){ + $this->insert_t_kelainan_fisik($kelainans,$order_header_id,$re_id); + } + } + + $rows_summary = $this->get_kelainans("visus"); + $rst_visus = $this->visus($id); + //print_r($rst_visus); + //echo $rst_visus['kelainan']; + + if(count($rows_summary) > 0){ + $kelainans = []; + foreach ($rows_summary as $key => $value) { + if($value['Mcu_SummaryFisikType'] == 'SD'){ + if($value['Mcu_KelainanName'] == $rst_visus['kelainan']){ + $kelainans[] = $value; + $all_kelainans[] = $value; + } + } + } + + if(count($kelainans) > 0){ + $this->insert_t_kelainan_fisik($kelainans,$order_header_id,$re_id); + } + } + + return $all_kelainans; + } +} diff --git a/application/libraries/Mcu.php b/application/libraries/Mcu.php new file mode 100644 index 00000000..ec9f5934 --- /dev/null +++ b/application/libraries/Mcu.php @@ -0,0 +1,14 @@ + Array( T_SampleTypeID + // + function export($param) { + $CI =& get_instance(); + $this->db = $CI->load->database("onedev",true); + foreach($param as $orderHeaderID => $samples ) { + $s_samples = impode(",",$samples); + } + } +} diff --git a/application/libraries/Mongo_db.php b/application/libraries/Mongo_db.php new file mode 100644 index 00000000..27fb66d2 --- /dev/null +++ b/application/libraries/Mongo_db.php @@ -0,0 +1,2020 @@ +CI =& get_instance(); + $this->CI->load->config('mongo_db'); + $this->config = $this->CI->config->item('mongo_db'); + $this->param = $param; + $this->connect(); + } + + /** + * -------------------------------------------------------------------------------- + * Class Destructor + * -------------------------------------------------------------------------------- + * + * Close all open connections. + */ + function __destruct() + { + if(is_object($this->connect)) + { + //$this->connect->close(); + } + } + + /** + * -------------------------------------------------------------------------------- + * Prepare configuration for mongoDB connection + * -------------------------------------------------------------------------------- + * + * Validate group name or autoload default group name from config file. + * Validate all the properties present in config file of the group. + */ + + private function prepare() + { + if(is_array($this->param) && count($this->param) > 0 && isset($this->param['activate']) == TRUE) + { + $this->activate = $this->param['activate']; + } + else if(isset($this->config['active']) && !empty($this->config['active'])) + { + $this->activate = $this->config['active']; + }else + { + show_error("MongoDB configuration is missing.", 500); + } + + if(isset($this->config[$this->activate]) == TRUE) + { + if(empty($this->config[$this->activate]['hostname'])) + { + show_error("Hostname missing from mongodb config group : {$this->activate}", 500); + } + else + { + $this->hostname = trim($this->config[$this->activate]['hostname']); + } + + if(empty($this->config[$this->activate]['port'])) + { + show_error("Port number missing from mongodb config group : {$this->activate}", 500); + } + else + { + $this->port = trim($this->config[$this->activate]['port']); + } + + if(isset($this->config[$this->activate]['no_auth']) == FALSE + && empty($this->config[$this->activate]['username'])) + { + show_error("Username missing from mongodb config group : {$this->activate}", 500); + } + else + { + $this->username = trim($this->config[$this->activate]['username']); + } + + if(isset($this->config[$this->activate]['no_auth']) == FALSE + && empty($this->config[$this->activate]['password'])) + { + show_error("Password missing from mongodb config group : {$this->activate}", 500); + } + else + { + $this->password = trim($this->config[$this->activate]['password']); + } + + if(empty($this->config[$this->activate]['database'])) + { + show_error("Database name missing from mongodb config group : {$this->activate}", 500); + } + else + { + $this->database = trim($this->config[$this->activate]['database']); + } + + if(empty($this->config[$this->activate]['db_debug'])) + { + $this->debug = FALSE; + } + else + { + $this->debug = $this->config[$this->activate]['db_debug']; + } + + if(empty($this->config[$this->activate]['return_as'])) + { + $this->return_as = 'array'; + } + else + { + $this->return_as = $this->config[$this->activate]['return_as']; + } + + if(empty($this->config[$this->activate]['legacy_support'])) + { + $this->legacy_support = false; + } + else + { + $this->legacy_support = $this->config[$this->activate]['legacy_support']; + } + + if(empty($this->config[$this->activate]['read_preference']) || + !isset($this->config[$this->activate]['read_preference'])) + { + $this->read_preference = MongoDB\Driver\ReadPreference::RP_PRIMARY; + } + else + { + $this->read_preference = $this->config[$this->activate]['read_preference']; + } + + if(empty($this->config[$this->activate]['read_concern']) || + !isset($this->config[$this->activate]['read_concern'])) + { + $this->read_concern = MongoDB\Driver\ReadConcern::MAJORITY; + } + else + { + $this->read_concern = $this->config[$this->activate]['read_concern']; + } + + + } + else + { + show_error("mongodb config group : {$this->activate} does not exist.", 500); + } + } + + /** + * Sets the return as to object or array + * This is useful if library is used in another library to avoid issue if config values are different + * + * @param string $value + */ + public function set_return_as($value) + { + if(!in_array($value, ['array', 'object'])) + { + show_error("Invalid Return As Type"); + } + $this->return_as = $value; + } + + /** + * -------------------------------------------------------------------------------- + * Connect to MongoDB Database + * -------------------------------------------------------------------------------- + * + * Connect to mongoDB database or throw exception with the error message. + */ + + private function connect() + { + $this->prepare(); + try + { + $dns = "mongodb://{$this->hostname}:{$this->port}/{$this->database}"; + if(isset($this->config[$this->activate]['no_auth']) == TRUE && $this->config[$this->activate]['no_auth'] == TRUE) + { + $options = array(); + } + else + { + $options = array('username'=>$this->username, 'password'=>$this->password); + } + + $this->connect = $this->db = new MongoDB\Driver\Manager($dns, $options); + + } + catch (MongoDB\Driver\Exception\Exception $e) + { + if(isset($this->debug) == TRUE && $this->debug == TRUE) + { + show_error("Unable to connect to MongoDB: {$e->getMessage()}", 500); + } + else + { + show_error("Unable to connect to MongoDB", 500); + } + } + } + + /** + * -------------------------------------------------------------------------------- + * //! Insert + * -------------------------------------------------------------------------------- + * + * Insert a new document into the passed collection + * + * @usage : $this->mongo_db->insert('foo', $data = array()); + */ + public function insert($collection = "", $insert = array()) + { + if (empty($collection)) + { + show_error("No Mongo collection selected to insert into", 500); + } + + if (!is_array($insert) || count($insert) == 0) + { + show_error("Nothing to insert into Mongo collection or insert is not an array", 500); + } + + if(isset($insert['_id']) === false) + { + $insert['_id'] = new MongoDB\BSON\ObjectId; + } + + $bulk = new MongoDB\Driver\BulkWrite(); + $bulk->insert($insert); + + $writeConcern = new MongoDB\Driver\WriteConcern(MongoDB\Driver\WriteConcern::MAJORITY, 1000); + + try + { + $write = $this->db->executeBulkWrite($this->database.".".$collection, $bulk, $writeConcern); + return $this->convert_document_id($insert); + } + // Check if the write concern could not be fulfilled + catch (MongoDB\Driver\Exception\BulkWriteException $e) + { + $result = $e->getWriteResult(); + + if ($writeConcernError = $result->getWriteConcernError()) + { + if(isset($this->debug) == TRUE && $this->debug == TRUE) + { + show_error("WriteConcern failure : {$writeConcernError->getMessage()}", 500); + } + else + { + show_error("WriteConcern failure", 500); + } + } + } + // Check if any general error occured. + catch (MongoDB\Driver\Exception\Exception $e) + { + if(isset($this->debug) == TRUE && $this->debug == TRUE) + { + show_error("Insert of data into MongoDB failed: {$e->getMessage()}", 500); + } + else + { + show_error("Insert of data into MongoDB failed", 500); + } + } + } + + /** + * -------------------------------------------------------------------------------- + * Batch Insert + * -------------------------------------------------------------------------------- + * + * Insert a multiple document into the collection + * + * @usage : $this->mongo_db->batch_insert('foo', $data = array()); + * @return : bool or array : if query fail then false else array of _id successfully inserted. + */ + public function batch_insert($collection = "", $insert = array()) + { + if (empty($collection)) + { + show_error("No Mongo collection selected to insert into", 500); + } + + if (!is_array($insert) || count($insert) == 0) + { + show_error("Nothing to insert into Mongo collection or insert is not an array", 500); + } + + $doc = new MongoDB\Driver\BulkWrite(); + + foreach ($insert as $ins) + { + if(isset($ins['_id']) === false) + { + $ins['_id'] = new MongoDB\BSON\ObjectId; + } + $doc->insert($ins); + } + + $writeConcern = new MongoDB\Driver\WriteConcern(MongoDB\Driver\WriteConcern::MAJORITY, 1000); + + try + { + $result = $this->db->executeBulkWrite($this->database.".".$collection, $doc, $writeConcern); + return $result; + } + // Check if the write concern could not be fulfilled + catch (MongoDB\Driver\Exception\BulkWriteException $e) + { + $result = $e->getWriteResult(); + + if ($writeConcernError = $result->getWriteConcernError()) + { + if(isset($this->debug) == TRUE && $this->debug == TRUE) + { + show_error("WriteConcern failure : {$writeConcernError->getMessage()}", 500); + } + else + { + show_error("WriteConcern failure", 500); + } + } + } + // Check if any general error occured. + catch (MongoDB\Driver\Exception\Exception $e) + { + if(isset($this->debug) == TRUE && $this->debug == TRUE) + { + show_error("Insert of data into MongoDB failed: {$e->getMessage()}", 500); + } + else + { + show_error("Insert of data into MongoDB failed", 500); + } + } + } + + /** + * -------------------------------------------------------------------------------- + * //! Select + * -------------------------------------------------------------------------------- + * + * Determine which fields to include OR which to exclude during the query process. + * If you want to only choose fields to exclude, leave $includes an empty array(). + * + * @usage: $this->mongo_db->select(array('foo', 'bar'))->get('foobar'); + */ + public function select($includes = array(), $excludes = array()) + { + if ( ! is_array($includes)) + { + $includes = array(); + } + if ( ! is_array($excludes)) + { + $excludes = array(); + } + if ( ! empty($includes)) + { + foreach ($includes as $key=> $col) + { + if(is_array($col)){ + //support $elemMatch in select + $this->selects[$key] = $col; + }else{ + $this->selects[$col] = 1; + } + } + } + if ( ! empty($excludes)) + { + foreach ($excludes as $col) + { + $this->selects[$col] = 0; + } + } + return ($this); + } + + /** + * -------------------------------------------------------------------------------- + * //! Where + * -------------------------------------------------------------------------------- + * + * Get the documents based on these search parameters. The $wheres array should + * be an associative array with the field as the key and the value as the search + * criteria. + * + * @usage : $this->mongo_db->where(array('foo' => 'bar'))->get('foobar'); + */ + public function where($wheres, $value = null) + { + if (is_array($wheres)) + { + foreach ($wheres as $wh => $val) + { + $this->wheres[$wh] = $val; + } + } + else + { + $this->wheres[$wheres] = $value; + } + return $this; + } + + /** + * -------------------------------------------------------------------------------- + * or where + * -------------------------------------------------------------------------------- + * + * Get the documents where the value of a $field may be something else + * + * @usage : $this->mongo_db->where_or(array('foo'=>'bar', 'bar'=>'foo'))->get('foobar'); + */ + public function where_or($wheres = array()) + { + if (is_array($wheres) && count($wheres) > 0) + { + if ( ! isset($this->wheres['$or']) || ! is_array($this->wheres['$or'])) + { + $this->wheres['$or'] = array(); + } + foreach ($wheres as $wh => $val) + { + $this->wheres['$or'][] = array($wh=>$val); + } + return ($this); + } + else + { + show_error("Where value should be an array.", 500); + } + } + + /** + * -------------------------------------------------------------------------------- + * Where in + * -------------------------------------------------------------------------------- + * + * Get the documents where the value of a $field is in a given $in array(). + * + * @usage : $this->mongo_db->where_in('foo', array('bar', 'zoo', 'blah'))->get('foobar'); + */ + public function where_in($field = "", $in = array()) + { + if (empty($field)) + { + show_error("Mongo field is require to perform where in query.", 500); + } + + if (is_array($in) && count($in) > 0) + { + $this->_w($field); + $this->wheres[$field]['$in'] = $in; + return ($this); + } + else + { + show_error("in value should be an array.", 500); + } + } + + /** + * -------------------------------------------------------------------------------- + * Where in all + * -------------------------------------------------------------------------------- + * + * Get the documents where the value of a $field is in all of a given $in array(). + * + * @usage : $this->mongo_db->where_in_all('foo', array('bar', 'zoo', 'blah'))->get('foobar'); + */ + public function where_in_all($field = "", $in = array()) + { + if (empty($field)) + { + show_error("Mongo field is require to perform where all in query.", 500); + } + + if (is_array($in) && count($in) > 0) + { + $this->_w($field); + $this->wheres[$field]['$all'] = $in; + return ($this); + } + else + { + show_error("in value should be an array.", 500); + } + } + + /** + * -------------------------------------------------------------------------------- + * Where not in + * -------------------------------------------------------------------------------- + * + * Get the documents where the value of a $field is not in a given $in array(). + * + * @usage : $this->mongo_db->where_not_in('foo', array('bar', 'zoo', 'blah'))->get('foobar'); + */ + public function where_not_in($field = "", $in = array()) + { + if (empty($field)) + { + show_error("Mongo field is require to perform where not in query.", 500); + } + + if (is_array($in) && count($in) > 0) + { + $this->_w($field); + $this->wheres[$field]['$nin'] = $in; + return ($this); + } + else + { + show_error("in value should be an array.", 500); + } + } + + /** + * -------------------------------------------------------------------------------- + * Where greater than + * -------------------------------------------------------------------------------- + * + * Get the documents where the value of a $field is greater than $x + * + * @usage : $this->mongo_db->where_gt('foo', 20); + */ + public function where_gt($field = "", $x) + { + if (!isset($field)) + { + show_error("Mongo field is require to perform greater then query.", 500); + } + + if (!isset($x)) + { + show_error("Mongo field's value is require to perform greater then query.", 500); + } + + $this->_w($field); + $this->wheres[$field]['$gt'] = $x; + return ($this); + } + + /** + * -------------------------------------------------------------------------------- + * Where greater than or equal to + * -------------------------------------------------------------------------------- + * + * Get the documents where the value of a $field is greater than or equal to $x + * + * @usage : $this->mongo_db->where_gte('foo', 20); + */ + public function where_gte($field = "", $x) + { + if (!isset($field)) + { + show_error("Mongo field is require to perform greater then or equal query.", 500); + } + + if (!isset($x)) + { + show_error("Mongo field's value is require to perform greater then or equal query.", 500); + } + + $this->_w($field); + $this->wheres[$field]['$gte'] = $x; + return($this); + } + + /** + * -------------------------------------------------------------------------------- + * Where less than + * -------------------------------------------------------------------------------- + * + * Get the documents where the value of a $field is less than $x + * + * @usage : $this->mongo_db->where_lt('foo', 20); + */ + public function where_lt($field = "", $x) + { + if (!isset($field)) + { + show_error("Mongo field is require to perform less then query.", 500); + } + + if (!isset($x)) + { + show_error("Mongo field's value is require to perform less then query.", 500); + } + + $this->_w($field); + $this->wheres[$field]['$lt'] = $x; + return($this); + } + + /** + * -------------------------------------------------------------------------------- + * Where less than or equal to + * -------------------------------------------------------------------------------- + * + * Get the documents where the value of a $field is less than or equal to $x + * + * @usage : $this->mongo_db->where_lte('foo', 20); + */ + public function where_lte($field = "", $x) + { + if (!isset($field)) + { + show_error("Mongo field is require to perform less then or equal to query.", 500); + } + + if (!isset($x)) + { + show_error("Mongo field's value is require to perform less then or equal to query.", 500); + } + + $this->_w($field); + $this->wheres[$field]['$lte'] = $x; + return ($this); + } + + /** + * -------------------------------------------------------------------------------- + * Where between + * -------------------------------------------------------------------------------- + * + * Get the documents where the value of a $field is between $x and $y + * + * @usage : $this->mongo_db->where_between('foo', 20, 30); + */ + public function where_between($field = "", $x, $y) + { + if (!isset($field)) + { + show_error("Mongo field is require to perform greater then or equal to query.", 500); + } + + if (!isset($x)) + { + show_error("Mongo field's start value is require to perform greater then or equal to query.", 500); + } + + if (!isset($y)) + { + show_error("Mongo field's end value is require to perform greater then or equal to query.", 500); + } + + $this->_w($field); + $this->wheres[$field]['$gte'] = $x; + $this->wheres[$field]['$lte'] = $y; + return ($this); + } + + /** + * -------------------------------------------------------------------------------- + * Where between and but not equal to + * -------------------------------------------------------------------------------- + * + * Get the documents where the value of a $field is between but not equal to $x and $y + * + * @usage : $this->mongo_db->where_between_ne('foo', 20, 30); + */ + public function where_between_ne($field = "", $x, $y) + { + if (!isset($field)) + { + show_error("Mongo field is require to perform between and but not equal to query.", 500); + } + + if (!isset($x)) + { + show_error("Mongo field's start value is require to perform between and but not equal to query.", 500); + } + + if (!isset($y)) + { + show_error("Mongo field's end value is require to perform between and but not equal to query.", 500); + } + + $this->_w($field); + $this->wheres[$field]['$gt'] = $x; + $this->wheres[$field]['$lt'] = $y; + return ($this); + } + + /** + * -------------------------------------------------------------------------------- + * Where not equal + * -------------------------------------------------------------------------------- + * + * Get the documents where the value of a $field is not equal to $x + * + * @usage : $this->mongo_db->where_ne('foo', 1)->get('foobar'); + */ + public function where_ne($field = '', $x) + { + if (!isset($field)) + { + show_error("Mongo field is require to perform Where not equal to query.", 500); + } + + if (!isset($x)) + { + show_error("Mongo field's value is require to perform Where not equal to query.", 500); + } + + $this->_w($field); + $this->wheres[$field]['$ne'] = $x; + return ($this); + } + + /** + * -------------------------------------------------------------------------------- + * Like + * -------------------------------------------------------------------------------- + * + * Get the documents where the (string) value of a $field is like a value. The defaults + * allow for a case-insensitive search. + * + * @param $flags + * Allows for the typical regular expression flags: + * i = case insensitive + * m = multiline + * x = can contain comments + * l = locale + * s = dotall, "." matches everything, including newlines + * u = match unicode + * + * @param $enable_start_wildcard + * If set to anything other than TRUE, a starting line character "^" will be prepended + * to the search value, representing only searching for a value at the start of + * a new line. + * + * @param $enable_end_wildcard + * If set to anything other than TRUE, an ending line character "$" will be appended + * to the search value, representing only searching for a value at the end of + * a line. + * + * @usage : $this->mongo_db->like('foo', 'bar', 'im', FALSE, TRUE); + */ + public function like($field = "", $value = "", $flags = "i", $enable_start_wildcard = TRUE, $enable_end_wildcard = TRUE) + { + if (empty($field)) + { + show_error("Mongo field is require to perform like query.", 500); + } + + if (empty($value)) + { + show_error("Mongo field's value is require to like query.", 500); + } + + $field = (string) trim($field); + $this->_w($field); + $value = (string) trim($value); + $value = quotemeta($value); + if ($enable_start_wildcard !== TRUE) + { + $value = "^" . $value; + } + if ($enable_end_wildcard !== TRUE) + { + $value .= "$"; + } + $regex = "/$value/$flags"; + $this->wheres[$field] = new MongoRegex($regex); + return ($this); + } + + /** + * -------------------------------------------------------------------------------- + * // Get + * -------------------------------------------------------------------------------- + * + * Get the documents based upon the passed parameters + * + * @usage : $this->mongo_db->get('foo'); + */ + public function get($collection = "") + { + if (empty($collection)) + { + show_error("In order to retrieve documents from MongoDB, a collection name must be passed", 500); + } + + try{ + + $read_concern = new MongoDB\Driver\ReadConcern($this->read_concern); + $read_preference = new MongoDB\Driver\ReadPreference($this->read_preference); + + $options = array(); + $options['projection'] = $this->selects; + $options['sort'] = $this->sorts; + $options['skip'] = (int) $this->offset; + $options['limit'] = (int) $this->limit; + $options['readConcern'] = $read_concern; + + $query = new MongoDB\Driver\Query($this->wheres, $options); + $cursor = $this->db->executeQuery($this->database.".".$collection, $query, $read_preference); + + // Clear + $this->_clear(); + $returns = array(); + + if ($cursor instanceof MongoDB\Driver\Cursor) + { + $it = new \IteratorIterator($cursor); + $it->rewind(); + + while ($doc = (array)$it->current()) + { + if ($this->return_as == 'object') + { + $returns[] = (object) $this->convert_document_id($doc); + } + else + { + $returns[] = (array) $this->convert_document_id($doc); + } + $it->next(); + } + } + + if ($this->return_as == 'object') + { + return (object)$returns; + } + else + { + return $returns; + } + } + catch (MongoDB\Driver\Exception $e) + { + if(isset($this->debug) == TRUE && $this->debug == TRUE) + { + show_error("MongoDB query failed: {$e->getMessage()}", 500); + } + else + { + show_error("MongoDB query failed.", 500); + } + } + } + + /** + * -------------------------------------------------------------------------------- + * // Get where + * -------------------------------------------------------------------------------- + * + * Get the documents based upon the passed parameters + * + * @usage : $this->mongo_db->get_where('foo', array('bar' => 'something')); + */ + public function get_where($collection = "", $where = array()) + { + if (is_array($where) && count($where) > 0) + { + return $this->where($where) + ->get($collection); + } + else + { + show_error("Nothing passed to perform search or value is empty.", 500); + } + } + + /** + * -------------------------------------------------------------------------------- + * // Find One + * -------------------------------------------------------------------------------- + * + * Get the single document based upon the passed parameters + * + * @usage : $this->mongo_db->find_one('foo'); + */ + public function find_one($collection = "") + { + + if (empty($collection)) + { + show_error("In order to retrieve documents from MongoDB, a collection name must be passed", 500); + } + + try{ + + $read_concern = new MongoDB\Driver\ReadConcern($this->read_concern); + $read_preference = new MongoDB\Driver\ReadPreference($this->read_preference); + + $options = array(); + $options['projection'] = $this->selects; + $options['sort'] = $this->sorts; + $options['skip'] = (int) $this->offset; + $options['limit'] = (int) 1; + $options['readConcern'] = $read_concern; + + $query = new MongoDB\Driver\Query($this->wheres, $options); + $cursor = $this->db->executeQuery($this->database.".".$collection, $query, $read_preference); + + // Clear + $this->_clear(); + $returns = array(); + + if ($cursor instanceof MongoDB\Driver\Cursor) + { + $it = new \IteratorIterator($cursor); + $it->rewind(); + + while ($doc = (array)$it->current()) + { + if ($this->return_as == 'object') + { + $returns[] = (object) $this->convert_document_id($doc); + } + else + { + $returns[] = (array) $this->convert_document_id($doc); + } + $it->next(); + } + } + + if ($this->return_as == 'object') + { + return (object)$returns; + } + else + { + return $returns; + } + } + catch (MongoDB\Driver\Exception $e) + { + if(isset($this->debug) == TRUE && $this->debug == TRUE) + { + show_error("MongoDB query failed: {$e->getMessage()}", 500); + } + else + { + show_error("MongoDB query failed.", 500); + } + } + } + + /** + * -------------------------------------------------------------------------------- + * Count + * -------------------------------------------------------------------------------- + * + * Count the documents based upon the passed parameters + * + * @usage : $this->mongo_db->count('foo'); + */ + public function count($collection = "") + { + if (empty($collection)) + { + show_error("In order to retrieve documents from MongoDB, a collection name must be passed", 500); + } + + try{ + + $read_concern = new MongoDB\Driver\ReadConcern($this->read_concern); + $read_preference = new MongoDB\Driver\ReadPreference($this->read_preference); + + $options = array(); + $options['projection'] = array('_id'=>1); + $options['sort'] = $this->sorts; + $options['skip'] = (int) $this->offset; + $options['limit'] = (int) $this->limit; + $options['readConcern'] = $read_concern; + + $query = new MongoDB\Driver\Query($this->wheres, $options); + $cursor = $this->db->executeQuery($this->database.".".$collection, $query, $read_preference); + $array = $cursor->toArray(); + // Clear + $this->_clear(); + return count($array); + } + catch (MongoDB\Driver\Exception $e) + { + if(isset($this->debug) == TRUE && $this->debug == TRUE) + { + show_error("MongoDB query failed: {$e->getMessage()}", 500); + } + else + { + show_error("MongoDB query failed.", 500); + } + } + } + + /** + * -------------------------------------------------------------------------------- + * Count All Results + * -------------------------------------------------------------------------------- + * + * Alias to count method for compatibility with CI Query Builder + * + * @usage : $this->mongo_db->count('foo'); + */ + public function count_all_results($collection = "") + { + return $this->count($collection); + } + + /** + * -------------------------------------------------------------------------------- + * Set + * -------------------------------------------------------------------------------- + * + * Sets a field to a value + * + * @usage: $this->mongo_db->where(array('blog_id'=>123))->set('posted', 1)->update('blog_posts'); + * @usage: $this->mongo_db->where(array('blog_id'=>123))->set(array('posted' => 1, 'time' => time()))->update('blog_posts'); + */ + public function set($fields, $value = NULL) + { + $this->_u('$set'); + if (is_string($fields)) + { + $this->updates['$set'][$fields] = $value; + } + elseif (is_array($fields)) + { + foreach ($fields as $field => $value) + { + $this->updates['$set'][$field] = $value; + } + } + return $this; + } + + /** + * -------------------------------------------------------------------------------- + * Unset + * -------------------------------------------------------------------------------- + * + * Unsets a field (or fields) + * + * @usage: $this->mongo_db->where(array('blog_id'=>123))->unset('posted')->update('blog_posts'); + * @usage: $this->mongo_db->where(array('blog_id'=>123))->set(array('posted','time'))->update('blog_posts'); + */ + public function unset_field($fields) + { + $this->_u('$unset'); + if (is_string($fields)) + { + $this->updates['$unset'][$fields] = 1; + } + elseif (is_array($fields)) + { + foreach ($fields as $field) + { + $this->updates['$unset'][$field] = 1; + } + } + return $this; + } + + /** + * -------------------------------------------------------------------------------- + * Add to set + * -------------------------------------------------------------------------------- + * + * Adds value to the array only if its not in the array already + * + * @usage: $this->mongo_db->where(array('blog_id'=>123))->addtoset('tags', 'php')->update('blog_posts'); + * @usage: $this->mongo_db->where(array('blog_id'=>123))->addtoset('tags', array('php', 'codeigniter', 'mongodb'))->update('blog_posts'); + */ + public function addtoset($field, $values) + { + $this->_u('$addToSet'); + if (is_string($values)) + { + $this->updates['$addToSet'][$field] = $values; + } + elseif (is_array($values)) + { + $this->updates['$addToSet'][$field] = array('$each' => $values); + } + return $this; + } + + /** + * -------------------------------------------------------------------------------- + * Push + * -------------------------------------------------------------------------------- + * + * Pushes values into a field (field must be an array) + * + * @usage: $this->mongo_db->where(array('blog_id'=>123))->push('comments', array('text'=>'Hello world'))->update('blog_posts'); + * @usage: $this->mongo_db->where(array('blog_id'=>123))->push(array('comments' => array('text'=>'Hello world')), 'viewed_by' => array('Alex')->update('blog_posts'); + */ + public function push($fields, $value = array()) + { + $this->_u('$push'); + if (is_string($fields)) + { + $this->updates['$push'][$fields] = $value; + } + elseif (is_array($fields)) + { + foreach ($fields as $field => $value) + { + $this->updates['$push'][$field] = $value; + } + } + return $this; + } + + /** + * -------------------------------------------------------------------------------- + * Pop + * -------------------------------------------------------------------------------- + * + * Pops the last value from a field (field must be an array) + * + * @usage: $this->mongo_db->where(array('blog_id'=>123))->pop('comments')->update('blog_posts'); + * @usage: $this->mongo_db->where(array('blog_id'=>123))->pop(array('comments', 'viewed_by'))->update('blog_posts'); + */ + public function pop($field) + { + $this->_u('$pop'); + if (is_string($field)) + { + $this->updates['$pop'][$field] = -1; + } + elseif (is_array($field)) + { + foreach ($field as $pop_field) + { + $this->updates['$pop'][$pop_field] = -1; + } + } + return $this; + } + + /** + * -------------------------------------------------------------------------------- + * Pull + * -------------------------------------------------------------------------------- + * + * Removes by an array by the value of a field + * + * @usage: $this->mongo_db->pull('comments', array('comment_id'=>123))->update('blog_posts'); + */ + public function pull($field = "", $value = array()) + { + $this->_u('$pull'); + $this->updates['$pull'] = array($field => $value); + return $this; + } + + /** + * -------------------------------------------------------------------------------- + * Rename field + * -------------------------------------------------------------------------------- + * + * Renames a field + * + * @usage: $this->mongo_db->where(array('blog_id'=>123))->rename_field('posted_by', 'author')->update('blog_posts'); + */ + public function rename_field($old, $new) + { + $this->_u('$rename'); + $this->updates['$rename'] = array($old => $new); + return $this; + } + + /** + * -------------------------------------------------------------------------------- + * Inc + * -------------------------------------------------------------------------------- + * + * Increments the value of a field + * + * @usage: $this->mongo_db->where(array('blog_id'=>123))->inc(array('num_comments' => 1))->update('blog_posts'); + */ + public function inc($fields = array(), $value = 0) + { + $this->_u('$inc'); + if (is_string($fields)) + { + $this->updates['$inc'][$fields] = $value; + } + elseif (is_array($fields)) + { + foreach ($fields as $field => $value) + { + $this->updates['$inc'][$field] = $value; + } + } + return $this; + } + + /** + * -------------------------------------------------------------------------------- + * Multiple + * -------------------------------------------------------------------------------- + * + * Multiple the value of a field + * + * @usage: $this->mongo_db->where(array('blog_id'=>123))->mul(array('num_comments' => 3))->update('blog_posts'); + */ + public function mul($fields = array(), $value = 0) + { + $this->_u('$mul'); + if (is_string($fields)) + { + $this->updates['$mul'][$fields] = $value; + } + elseif (is_array($fields)) + { + foreach ($fields as $field => $value) + { + $this->updates['$mul'][$field] = $value; + } + } + return $this; + } + + /** + * -------------------------------------------------------------------------------- + * Maximum + * -------------------------------------------------------------------------------- + * + * The $max operator updates the value of the field to a specified value if the specified value is greater than the current value of the field. + * + * @usage: $this->mongo_db->where(array('blog_id'=>123))->max(array('num_comments' => 3))->update('blog_posts'); + */ + public function max($fields = array(), $value = 0) + { + $this->_u('$max'); + if (is_string($fields)) + { + $this->updates['$max'][$fields] = $value; + } + elseif (is_array($fields)) + { + foreach ($fields as $field => $value) + { + $this->updates['$max'][$field] = $value; + } + } + return $this; + } + + /** + * -------------------------------------------------------------------------------- + * Minimum + * -------------------------------------------------------------------------------- + * + * The $min updates the value of the field to a specified value if the specified value is less than the current value of the field. + * + * @usage: $this->mongo_db->where(array('blog_id'=>123))->min(array('num_comments' => 3))->update('blog_posts'); + */ + public function min($fields = array(), $value = 0) + { + $this->_u('$min'); + if (is_string($fields)) + { + $this->updates['$min'][$fields] = $value; + } + elseif (is_array($fields)) + { + foreach ($fields as $field => $value) + { + $this->updates['$min'][$field] = $value; + } + } + return $this; + } + + /** + * -------------------------------------------------------------------------------- + * //! distinct + * -------------------------------------------------------------------------------- + * + * Finds the distinct values for a specified field across a single collection + * + * @usage: $this->mongo_db->distinct('collection', 'field'); + */ + public function distinct($collection = "", $field="") + { + if (empty($collection)) + { + show_error("No Mongo collection selected for update", 500); + } + + if (empty($field)) + { + show_error("Need Collection field information for performing distinct query", 500); + } + + try + { + $documents = $this->db->{$collection}->distinct($field, $this->wheres); + $this->_clear(); + if ($this->return_as == 'object') + { + return (object)$documents; + } + else + { + return $documents; + } + } + catch (MongoCursorException $e) + { + if(isset($this->debug) == TRUE && $this->debug == TRUE) + { + show_error("MongoDB Distinct Query Failed: {$e->getMessage()}", 500); + } + else + { + show_error("MongoDB failed", 500); + } + } + } + + /** + * -------------------------------------------------------------------------------- + * //! Update + * -------------------------------------------------------------------------------- + * + * Updates a single document in Mongo + * + * @usage: $this->mongo_db->update('foo', $data = array()); + */ + public function update($collection = "", $options = array()) + { + if (empty($collection)) + { + show_error("No Mongo collection selected for update", 500); + } + + $bulk = new MongoDB\Driver\BulkWrite(); + $bulk->update($this->wheres, $this->updates, $options); + + $writeConcern = new MongoDB\Driver\WriteConcern(MongoDB\Driver\WriteConcern::MAJORITY, 1000); + + try + { + $write = $this->db->executeBulkWrite($this->database.".".$collection, $bulk, $writeConcern); + $this->_clear(); + return $write; + } + // Check if the write concern could not be fulfilled + catch (MongoDB\Driver\Exception\BulkWriteException $e) + { + $result = $e->getWriteResult(); + + if ($writeConcernError = $result->getWriteConcernError()) + { + if(isset($this->debug) == TRUE && $this->debug == TRUE) + { + show_error("WriteConcern failure : {$writeConcernError->getMessage()}", 500); + } + else + { + show_error("WriteConcern failure", 500); + } + } + } + // Check if any general error occured. + catch (MongoDB\Driver\Exception\Exception $e) + { + if(isset($this->debug) == TRUE && $this->debug == TRUE) + { + show_error("Update of data into MongoDB failed: {$e->getMessage()}", 500); + } + else + { + show_error("Update of data into MongoDB failed", 500); + } + } + } + + /** + * -------------------------------------------------------------------------------- + * Update all + * -------------------------------------------------------------------------------- + * + * Updates a collection of documents + * + * @usage: $this->mongo_db->update_all('foo', $data = array()); + */ + public function update_all($collection = "", $data = array(), $options = array()) + { + if (empty($collection)) + { + show_error("No Mongo collection selected to update", 500); + } + if (is_array($data) && count($data) > 0) + { + $this->updates = array_merge($data, $this->updates); + } + if (count($this->updates) == 0) + { + show_error("Nothing to update in Mongo collection or update is not an array", 500); + } + + $options = array_merge(array('multi' => TRUE), $options); + + $bulk = new MongoDB\Driver\BulkWrite(); + $bulk->update($this->wheres, $this->updates, $options); + + $writeConcern = new MongoDB\Driver\WriteConcern(MongoDB\Driver\WriteConcern::MAJORITY, 1000); + + try + { + $write = $this->db->executeBulkWrite($this->database.".".$collection, $bulk, $writeConcern); + $this->_clear(); + return $write; + } + // Check if the write concern could not be fulfilled + catch (MongoDB\Driver\Exception\BulkWriteException $e) + { + $result = $e->getWriteResult(); + + if ($writeConcernError = $result->getWriteConcernError()) + { + if(isset($this->debug) == TRUE && $this->debug == TRUE) + { + show_error("WriteConcern failure : {$writeConcernError->getMessage()}", 500); + } + else + { + show_error("WriteConcern failure", 500); + } + } + } + // Check if any general error occured. + catch (MongoDB\Driver\Exception\Exception $e) + { + if(isset($this->debug) == TRUE && $this->debug == TRUE) + { + show_error("Update of data into MongoDB failed: {$e->getMessage()}", 500); + } + else + { + show_error("Update of data into MongoDB failed", 500); + } + } + } + + /** + * -------------------------------------------------------------------------------- + * //! Delete + * -------------------------------------------------------------------------------- + * + * delete document from the passed collection based upon certain criteria + * + * @usage : $this->mongo_db->delete('foo'); + */ + public function delete($collection = "") + { + if (empty($collection)) + { + show_error("No Mongo collection selected for update", 500); + } + + $options = array('limit'=>true); + $bulk = new MongoDB\Driver\BulkWrite(); + $bulk->delete($this->wheres, $options); + + $writeConcern = new MongoDB\Driver\WriteConcern(MongoDB\Driver\WriteConcern::MAJORITY, 1000); + + try + { + $write = $this->db->executeBulkWrite($this->database.".".$collection, $bulk, $writeConcern); + $this->_clear(); + return $write; + } + // Check if the write concern could not be fulfilled + catch (MongoDB\Driver\Exception\BulkWriteException $e) + { + $result = $e->getWriteResult(); + + if ($writeConcernError = $result->getWriteConcernError()) + { + if(isset($this->debug) == TRUE && $this->debug == TRUE) + { + show_error("WriteConcern failure : {$writeConcernError->getMessage()}", 500); + } + else + { + show_error("WriteConcern failure", 500); + } + } + } + // Check if any general error occured. + catch (MongoDB\Driver\Exception\Exception $e) + { + if(isset($this->debug) == TRUE && $this->debug == TRUE) + { + show_error("Update of data into MongoDB failed: {$e->getMessage()}", 500); + } + else + { + show_error("Update of data into MongoDB failed", 500); + } + } + } + + /** + * -------------------------------------------------------------------------------- + * Delete all + * -------------------------------------------------------------------------------- + * + * Delete all documents from the passed collection based upon certain criteria + * + * @usage : $this->mongo_db->delete_all('foo', $data = array()); + */ + public function delete_all($collection = "") + { + if (empty($collection)) + { + show_error("No Mongo collection selected for delete", 500); + } + + $options = array('limit'=>false); + $bulk = new MongoDB\Driver\BulkWrite(); + $bulk->delete($this->wheres, $options); + + $writeConcern = new MongoDB\Driver\WriteConcern(MongoDB\Driver\WriteConcern::MAJORITY, 1000); + + try + { + $write = $this->db->executeBulkWrite($this->database.".".$collection, $bulk, $writeConcern); + $this->_clear(); + return $write; + } + // Check if the write concern could not be fulfilled + catch (MongoDB\Driver\Exception\BulkWriteException $e) + { + $result = $e->getWriteResult(); + + if ($writeConcernError = $result->getWriteConcernError()) + { + if(isset($this->debug) == TRUE && $this->debug == TRUE) + { + show_error("WriteConcern failure : {$writeConcernError->getMessage()}", 500); + } + else + { + show_error("WriteConcern failure", 500); + } + } + } + // Check if any general error occured. + catch (MongoDB\Driver\Exception\Exception $e) + { + if(isset($this->debug) == TRUE && $this->debug == TRUE) + { + show_error("Delete of data into MongoDB failed: {$e->getMessage()}", 500); + } + else + { + show_error("Delete of data into MongoDB failed", 500); + } + } + } + + /** + * -------------------------------------------------------------------------------- + * Aggregation Operation + * -------------------------------------------------------------------------------- + * + * Perform aggregation on mongodb collection + * + * @usage : $this->mongo_db->aggregate('foo', $ops = array()); + */ + public function aggregate($collection, $operation) + { + if (empty($collection)) + { + show_error("In order to retreive documents from MongoDB, a collection name must be passed", 500); + } + + if (empty($operation) && !is_array($operation)) + { + show_error("Operation must be an array to perform aggregate.", 500); + } + + $command = array('aggregate'=>$collection, 'pipeline'=>$operation); + return $this->command($command); + } + + /** + * -------------------------------------------------------------------------------- + * // Order by + * -------------------------------------------------------------------------------- + * + * Sort the documents based on the parameters passed. To set values to descending order, + * you must pass values of either -1, FALSE, 'desc', or 'DESC', else they will be + * set to 1 (ASC). + * + * @usage : $this->mongo_db->order_by(array('foo' => 'ASC'))->get('foobar'); + */ + public function order_by($fields = array()) + { + foreach ($fields as $col => $val) + { + if ($val == -1 || $val === FALSE || strtolower($val) == 'desc') + { + $this->sorts[$col] = -1; + } + else + { + $this->sorts[$col] = 1; + } + } + return ($this); + } + + /** + * -------------------------------------------------------------------------------- + * Mongo Date + * -------------------------------------------------------------------------------- + * + * Create new MongoDate object from current time or pass timestamp to create + * mongodate. + * + * @usage : $this->mongo_db->date($timestamp); + */ + public function date($stamp = FALSE) + { + if ( $stamp == FALSE ) + { + return new MongoDB\BSON\UTCDateTime(); + } + else + { + return new MongoDB\BSON\UTCDateTime($stamp); + } + + } + + /** + * -------------------------------------------------------------------------------- + * // Limit results + * -------------------------------------------------------------------------------- + * + * Limit the result set to $x number of documents + * + * @usage : $this->mongo_db->limit($x); + */ + public function limit($x = 99999) + { + if ($x !== NULL && is_numeric($x) && $x >= 1) + { + $this->limit = (int) $x; + } + return ($this); + } + + /** + * -------------------------------------------------------------------------------- + * // Offset + * -------------------------------------------------------------------------------- + * + * Offset the result set to skip $x number of documents + * + * @usage : $this->mongo_db->offset($x); + */ + public function offset($x = 0) + { + if ($x !== NULL && is_numeric($x) && $x >= 1) + { + $this->offset = (int) $x; + } + return ($this); + } + + /** + * Converts document ID and returns document back. + * + * @param stdClass $document [Document] + * @return stdClass + */ + private function convert_document_id($document) + { + if ($this->legacy_support === TRUE && isset($document['_id']) && $document['_id'] instanceof MongoDB\BSON\ObjectId) + { + $new_id = $document['_id']->__toString(); + unset($document['_id']); + $document['_id'] = new \stdClass(); + $document['_id']->{'$id'} = $new_id; + } + return $document; + } + + /** + * -------------------------------------------------------------------------------- + * // Command + * -------------------------------------------------------------------------------- + * + * Runs a MongoDB command + * + * @param string : Collection name, array $query The command query + * @usage : $this->mongo_db->command($collection, array('geoNear'=>'buildings', 'near'=>array(53.228482, -0.547847), 'num' => 10, 'nearSphere'=>true)); + * @access public + * @return object or array + */ + + public function command($command = array()) + { + try{ + $cursor = $this->db->executeCommand($this->database, new MongoDB\Driver\Command($command)); + // Clear + $this->_clear(); + $returns = array(); + + if ($cursor instanceof MongoDB\Driver\Cursor) + { + $it = new \IteratorIterator($cursor); + $it->rewind(); + + while ($doc = (array)$it->current()) + { + if ($this->return_as == 'object') + { + $returns[] = (object) $this->convert_document_id($doc); + } + else + { + $returns[] = (array) $this->convert_document_id($doc); + } + $it->next(); + } + } + + if ($this->return_as == 'object') + { + return (object)$returns; + } + else + { + return $returns; + } + } + catch (MongoDB\Driver\Exception $e) + { + if(isset($this->debug) == TRUE && $this->debug == TRUE) + { + show_error("MongoDB query failed: {$e->getMessage()}", 500); + } + else + { + show_error("MongoDB query failed.", 500); + } + } + } + + + /** + * -------------------------------------------------------------------------------- + * //! Add indexes + * -------------------------------------------------------------------------------- + * + * Ensure an index of the keys in a collection with optional parameters. To set values to descending order, + * you must pass values of either -1, FALSE, 'desc', or 'DESC', else they will be + * set to 1 (ASC). + * + * @usage : $this->mongo_db->add_index($collection, array('first_name' => 'ASC', 'last_name' => -1), array('unique' => TRUE)); + */ + public function add_index($collection = "", $keys = array(), $options = array()) + { + if (empty($collection)) + { + show_error("No Mongo collection specified to add index to", 500); + } + + if (empty($keys) || ! is_array($keys)) + { + show_error("Index could not be created to MongoDB Collection because no keys were specified", 500); + } + + foreach ($keys as $col => $val) + { + if($val == -1 || $val === FALSE || strtolower($val) == 'desc') + { + $keys[$col] = -1; + } + else + { + $keys[$col] = 1; + } + } + $command = array(); + $command['createIndexes'] = $collection; + $command['indexes'] = array($keys); + + return $this->command($command); + } + + /** + * -------------------------------------------------------------------------------- + * Remove index + * -------------------------------------------------------------------------------- + * + * Remove an index of the keys in a collection. To set values to descending order, + * you must pass values of either -1, FALSE, 'desc', or 'DESC', else they will be + * set to 1 (ASC). + * + * @usage : $this->mongo_db->remove_index($collection, 'index_1'); + */ + public function remove_index($collection = "", $name = "") + { + if (empty($collection)) + { + show_error("No Mongo collection specified to remove index from", 500); + } + + if (empty($keys)) + { + show_error("Index could not be removed from MongoDB Collection because no index name were specified", 500); + } + + $command = array(); + $command['dropIndexes'] = $collection; + $command['index'] = $name; + + return $this->command($command); + } + + /** + * -------------------------------------------------------------------------------- + * List indexes + * -------------------------------------------------------------------------------- + * + * Lists all indexes in a collection. + * + * @usage : $this->mongo_db->list_indexes($collection); + */ + public function list_indexes($collection = "") + { + if (empty($collection)) + { + show_error("No Mongo collection specified to list all indexes from", 500); + } + $command = array(); + $command['listIndexes'] = $collection; + + return $this->command($command); + } + + /** + * -------------------------------------------------------------------------------- + * //! Switch database + * -------------------------------------------------------------------------------- + * + * Switch from default database to a different db + * + * $this->mongo_db->switch_db('foobar'); + */ + public function switch_db($database = '') + { + //@todo + } + + /** + * -------------------------------------------------------------------------------- + * //! Drop database + * -------------------------------------------------------------------------------- + * + * Drop a Mongo database + * @usage: $this->mongo_db->drop_db("foobar"); + */ + public function drop_db($database = '') + { + if (empty($database)) + { + show_error('Failed to drop MongoDB database because name is empty', 500); + } + + $command = array(); + $command['dropDatabase'] = 1; + + return $this->command($command); + } + + /** + * -------------------------------------------------------------------------------- + * //! Drop collection + * -------------------------------------------------------------------------------- + * + * Drop a Mongo collection + * @usage: $this->mongo_db->drop_collection('bar'); + */ + public function drop_collection($col = '') + { + if (empty($col)) + { + show_error('Failed to drop MongoDB collection because collection name is empty', 500); + } + + $command = array(); + $command['drop'] = $col; + + return $this->command($command); + } + + /** + * -------------------------------------------------------------------------------- + * _clear + * -------------------------------------------------------------------------------- + * + * Resets the class variables to default settings + */ + private function _clear() + { + $this->selects = array(); + $this->updates = array(); + $this->wheres = array(); + $this->limit = 999999; + $this->offset = 0; + $this->sorts = array(); + } + + /** + * -------------------------------------------------------------------------------- + * Where initializer + * -------------------------------------------------------------------------------- + * + * Prepares parameters for insertion in $wheres array(). + */ + private function _w($param) + { + if ( ! isset($this->wheres[$param])) + { + $this->wheres[ $param ] = array(); + } + } + + /** + * -------------------------------------------------------------------------------- + * Update initializer + * -------------------------------------------------------------------------------- + * + * Prepares parameters for insertion in $updates array(). + */ + private function _u($method) + { + if ( ! isset($this->updates[$method])) + { + $this->updates[ $method ] = array(); + } + } + +} diff --git a/application/libraries/NatPatientLib.php b/application/libraries/NatPatientLib.php new file mode 100644 index 00000000..0478e3e6 --- /dev/null +++ b/application/libraries/NatPatientLib.php @@ -0,0 +1,184 @@ +db = $CI->load->database("default", true); + } + + //remote => status : Y|N Y confirm N, not confirm. + /* + create table m_patient_nat_validation( + M_PatientNatValidationID int not null auto_increment primary key, + M_PatientNatValidationM_PatientID int, + M_PatientNatValidationM_UserID int, + M_PatientNatValidationM_UserUsername varchar(100), + M_PatientNatValidationIsActive char(1) default 'Y', + M_PatientNatValidationCreated datetime default current_timestamp(), + M_PatientNatValidationLastUpdated datetime default current_timestamp() on update current_timestamp(), + key(M_PatientNatValidationM_PatientID), + key(M_PatientNatValidationIsActive), + ); + create table m_patient_nat_log ( + M_PatientNatLogID int not null auto_increment primary key, + M_PatientNatLogDate datetime default current_timestamp(), + M_PatientNatLogStatus enum('New','Retry','Sent'), + M_PatientNatLogLastUpdated datetime default current_timestamp() on update current_timestamp(), + M_PatientNatLogJson text, + key(M_PatientNatLogDate), + key(M_PatientNatLogStatus) + ); + */ + function save_nasional($userName,$patient) { + $resp = $this->get_branch(); + if ($resp["status"] != "OK") { + return $resp; + } + $param = ["M_BranchID" => $resp["branchID"], + "M_BranchCode" => $resp["branchCode"], + "Username" => $userName, + "patient" => $patient ]; + $z_param = gzcompress(json_encode($param)); + $url = $this->NAT_PATIENT_API . "/update_from_local"; + $zresp = $this->post($url, $z_param); + $jresp = gzuncompress($zresp); + $resp = json_decode($jresp, true); + if (!isset($resp["status"])) { + $resp["status"] = "ERR"; + $resp["message"] = $zresp; + } + return $resp; + } + + function confirm($localM_PatientID, $arr_remote, $userID, $userName) + { + $payload = [ + "userID" => $userID, + "userName" => $userName, + "lokalM_PatientID" => $localM_PatientID, + "remote" => $arr_remote, + ]; + $jsonPayload = json_encode($payload); + $sql = "insert into m_patient_nat_log(M_PatientNatLogStatus,M_PatientNatLogJson) + values('New',?)"; + $qry = $this->db->query($sql, [$jsonPayload]); + if (!$qry) { + return [ + "status" => "ERR", + "message" => $this->db->error()["message"], + ]; + } + return ["status" => "OK"]; + } + function check_connection() + { + $start = date("Y-m-d H:i:s"); + $url = $this->NAT_PATIENT_API . "/check_connection"; + $zresp = $this->post($url, json_encode(["dummy" => "load"])); + $jresp = gzuncompress($zresp); + $resp = json_decode($jresp, true); + if (!isset($resp["status"])) { + $resp["status"] = "ERR"; + $resp["message"] = $zresp; + } + $stop = date("Y-m-d H:i:s"); + $resp["start"] = $start; + $resp["stop"] = $stop; + return $resp; + } + function get_branch() + { + $sql = + "select M_BranchID, M_BranchCode from m_branch where M_BranchIsActive = 'Y' and M_BranchIsDefault='Y'"; + $qry = $this->db->query($sql); + if (!$qry) { + return [ + "status" => "ERR", + "message" => + $this->db->error()["message"] . + "|\n" . + $this->db->last_query(), + ]; + } + $rows = $qry->result_array(); + if (count($rows) == 0) { + return ["status" => "ERR", "message" => "No Default Branch"]; + } + return [ + "status" => "OK", + "branchID" => $rows[0]["M_BranchID"], + "branchCode" => $rows[0]["M_BranchCode"], + ]; + } + function search($query) + { + $start = date("Y-m-d H:i:s"); + $url = $this->NAT_PATIENT_API . "/search_bizone"; + $jparam = json_encode(["search" => $query]); + $zresp = $this->post($url, $jparam); + $jresp = gzuncompress($zresp); + $resp = json_decode($jresp, true); + if (!isset($resp["status"])) { + $resp["status"] = "ERR"; + $resp["message"] = $zresp; + } + $stop = date("Y-m-d H:i:s"); + $resp["start"] = $start; + $resp["stop"] = $stop; + return $resp; + } + // param array -> + function search_by_nik($param) + { + $start = date("Y-m-d H:i:s"); + $url = $this->NAT_PATIENT_API . "/search_by_nik"; + $resp = $this->get_branch(); + + if ($resp["status"] != "OK") { + return $resp; + } + $jparam = json_encode($param); + $zresp = $this->post($url, $jparam); + $jresp = gzuncompress($zresp); + $resp = json_decode($jresp, true); + if (!isset($resp["status"])) { + $resp["status"] = "ERR"; + $resp["message"] = $zresp; + } + $stop = date("Y-m-d H:i:s"); + $resp["start"] = $start; + $resp["stop"] = $stop; + return $resp; + } + public function post($url, $data) + { + $ch = curl_init($url); + curl_setopt($ch, CURLOPT_CUSTOMREQUEST, "POST"); + curl_setopt($ch, CURLOPT_POSTFIELDS, $data); + curl_setopt($ch, CURLOPT_RETURNTRANSFER, true); + curl_setopt($ch, CURLOPT_CONNECTTIMEOUT, 10); + curl_setopt($ch, CURLOPT_TIMEOUT, 10); + curl_setopt($ch, CURLOPT_HTTPHEADER, [ + "Content-Type: application/text", + "Content-Length: " . strlen($data), + ]); + $result = curl_exec($ch); + if (curl_error($ch) != "") { + echo json_encode([ + "status" => "ERR", + "message" => "Http Error : " . curl_error($ch), + ]); + curl_close($ch); + exit(); + } + curl_close($ch); + return $result; + } +} diff --git a/application/libraries/Nonlabtemplate.php b/application/libraries/Nonlabtemplate.php new file mode 100644 index 00000000..295a8dc4 --- /dev/null +++ b/application/libraries/Nonlabtemplate.php @@ -0,0 +1,947 @@ +db = $CI->load->database("onedev", true); + $this->db_log = $CI->load->database("one_lab_log", true); + + $this->db->trans_begin(); + + $sql = "SELECT NonlabTemplateID as template_id, + NonlabTemplateName as template_name, + T_SamplingSoT_OrderHeaderID as order_header_id, + T_OrderDetailID as order_detail_id + FROM t_samplingso + JOIN t_orderdetail ON T_SamplingSoT_OrderHeaderID = T_OrderDetailT_OrderHeaderID AND T_SamplingSoT_TestID = T_OrderDetailT_TestID AND T_OrderDetailIsActive = 'Y' + JOIN t_test ON T_SamplingSoT_TestID = T_TestID + JOIN nat_test ON Nat_TestID = T_TestNat_TestID + JOIN nonlab_template_mapping ON NonlabTemplateMappingNat_TestID = Nat_TestID AND + NonlabTemplateMappingIsActive = 'Y' + JOIN nonlab_template ON NonlabTemplateMappingNonlabTemplateID = NonlabTemplateID AND NonlabTemplateIsActive = 'Y' + LEFT JOIN so_resultentry ON So_ResultEntryT_OrderDetailID = T_OrderDetailID AND + So_ResultEntryT_OrderHeaderID = T_OrderDetailT_OrderHeaderID AND + So_ResultEntryIsActive = 'Y' + WHERE + T_SamplingSoID = ? AND + T_SamplingSoIsActive = 'Y' AND + So_ResultEntryID IS NULL + GROUP BY NonlabTemplateID + LIMIT 1"; + $qry = $this->db->query($sql, array($T_SamplingSOID)); + //echo $this->db->last_query(); + if (!$qry) { + $dt_log = ['data' => ['id' => $T_SamplingSOID],'error' => $this->db->error()]; + $prm_log = ['SELECT_NONLAB_TEMPLATE', 'nonlabtemplate/generate']; + $xsql = $this->db->last_query(); + $log_error = $this->insert_log_error($xsql, $prm_log,$dt_log); + $this->db->trans_rollback(); + return array(false, print_r($this->db->error(), true)); + } + + $row_arr = $qry->row_array(); + if ($row_arr) { + //print_r($row_arr); + $template_name = $row_arr['template_name']; + if($row_arr['template_name'] == 'Fisik Umum'){ + $sql = "SELECT FisikTemplateType as xtype + FROM fisik_template + JOIN t_orderheader ON T_OrderHeaderID = {$row_arr['order_header_id']} + JOIN mgm_mcutemplate ON Mgm_McuTemplateMgm_McuID = T_OrderHeaderMgm_McuID + JOIN fisik_template_mapping ON Mgm_McuTemplateFisikTemplateMappingID = FisikTemplateMappingID + JOIN fisik_template_mapping_detail ON FisikTemplateMappingDetailFisikTemplateMappingID = FisikTemplateMappingID AND + FisikTemplateMappingDetailFisikTemplateID = FisikTemplateID AND + FisikTemplateMappingDetailIsActive = 'Y' + WHERE + FisikTemplateIsActive = 'Y' + GROUP BY FisikTemplateType"; + $qry = $this->db->query($sql); + //echo $this->db->last_query(); + if (!$qry) { + $dt_log = ['data' => ['id' => $T_SamplingSOID],'error' => $this->db->error()]; + $prm_log = ['SELECT_FISIK_TEMPLATE', 'nonlabtemplate/generate']; + $xsql = $this->db->last_query(); + $log_error = $this->insert_log_error($xsql, $prm_log,$dt_log); + $this->db->trans_rollback(); + return array(false, print_r($this->db->error(), true)); + } + $arr_types = $qry->result_array(); + $xtypes = []; + foreach ($arr_types as $key => $value) { + $xtypes[] = $value['xtype']; + } + + $template_name = "Fisik Umum"; + if(in_array("K3", $xtypes)){ + $template_name = "Fisik Umum K3"; + } +//echo $template_name; + } + + + $sql = "SELECT COUNT(*) as xcount + FROM so_resultentry + WHERE + So_ResultEntryT_OrderHeaderID = ? AND + So_ResultEntryT_OrderDetailID = ? AND + So_ResultEntryIsActive = 'Y'"; + + $query = $this->db->query($sql, array( + $row_arr['order_header_id'], + $row_arr['order_detail_id'] + )); + if (!$qry) { + $dt_log = ['data' => ['id' => $T_SamplingSOID, 'arr' => $row_arr],'error' => $this->db->error()]; + $prm_log = ['CHECK_EXIST_SO_RE', 'nonlabtemplate/generate']; + $xsql = $this->db->last_query(); + $log_error = $this->insert_log_error($xsql, $prm_log,$dt_log); + $this->db->trans_rollback(); + return array(false, print_r($this->db->error(), true)); + } + + $check_exist = $query->row()->xcount; + + if($check_exist == 0){ + $sql = "INSERT INTO so_resultentry( + So_ResultEntryT_OrderHeaderID, + So_ResultEntryT_OrderDetailID, + So_ResultEntryNonlab_TemplateID, + So_ResultEntryNonlab_TemplateName, + So_ResultEntryCreated + ) + VALUES(?,?,?,?,NOW())"; + $qry = $this->db->query($sql, array( + $row_arr['order_header_id'], + $row_arr['order_detail_id'], + $row_arr['template_id'], + $template_name + )); + //echo $this->db->last_query(); + if (!$qry) { + $dt_log = ['data' => ['id' => $T_SamplingSOID],'error' => $this->db->error()]; + $prm_log = ['INSERT_SO_RESULTENTRY', 'nonlabtemplate/generate']; + $xsql = $this->db->last_query(); + $log_error = $this->insert_log_error($xsql, $prm_log,$dt_log); + $this->db->trans_rollback(); + return array(false, print_r($this->db->error(), true)); + } + $soresultentryid = $this->db->insert_id(); + + if($template_name == 'TBBB'){ + $sql = "SELECT COUNT(*) as exist_tbbb + FROM t_samplingso_additional_fisik_bbtb + WHERE T_SamplingAdditionalFisikBBTBIsActive = 'Y' AND + T_SamplingAdditionalFisikBBTBT_OrderHeaderID = ? + "; + $qry = $this->db->query($sql, array( + $row_arr['order_header_id'] + )); + if (!$qry) { + $dt_log = ['data' => ['id' => $row_arr['order_header_id']],'error' => $this->db->error()]; + $prm_log = ['SELECT_ORDER_HEADER_LANG', 'nonlabtemplate/generate']; + $xsql = $this->db->last_query(); + $log_error = $this->insert_log_error($xsql, $prm_log,$dt_log); + $this->db->trans_rollback(); + return array(false, print_r($this->db->error(), true)); + } + + $check_exist_tbbbb = $qry->row()->exist_tbbb; + if($check_exist_tbbbb == 0){ + $sql = "INSERT INTO t_samplingso_additional_fisik_bbtb ( + T_SamplingAdditionalFisikBBTBT_OrderHeaderID, + T_SamplingAdditionalFisikBBTBValueBB, + T_SamplingAdditionalFisikBBTBValueTB, + T_SamplingAdditionalFisikBBTBValueClassification, + T_SamplingAdditionalFisikBBTBBodyFat, + T_SamplingAdditionalFisikBBTBCreated + ) VALUES(?,0,0,'',0, NOW())"; + $qry = $this->db->query($sql, array( + $row_arr['order_header_id'] + )); + if (!$qry) { + $dt_log = ['data' => ['id' => $row_arr['order_header_id']],'error' => $this->db->error()]; + $prm_log = ['INSERT_ADD_TBBB', 'nonlabtemplate/generate']; + $xsql = $this->db->last_query(); + $log_error = $this->insert_log_error($xsql, $prm_log,$dt_log); + $this->db->trans_rollback(); + return array(false, print_r($this->db->error(), true)); + } + } + } + + if($template_name == 'VISUS'){ + $sql = "SELECT COUNT(*) as exist_visus + FROM t_samplingso_additional_fisik_visus + WHERE + T_SamplingAdditionalFisikVisusT_OrderHeaderID = ? + "; + $qry = $this->db->query($sql, array( + $row_arr['order_header_id'] + )); + // echo $this->db->last_query(); + if (!$qry) { + $dt_log = ['data' => ['id' => $row_arr['order_header_id']],'error' => $this->db->error()]; + $prm_log = ['SELECT_ORDER_HEADER_LANG', 'nonlabtemplate/generate']; + $xsql = $this->db->last_query(); + $log_error = $this->insert_log_error($xsql, $prm_log,$dt_log); + $this->db->trans_rollback(); + return array(false, print_r($this->db->error(), true)); + } + + $check_exist_visus = $qry->row()->exist_visus; + //echo $check_exist_visus ; + if($check_exist_visus == 0){ + $sql = "INSERT INTO t_samplingso_additional_fisik_visus ( + T_SamplingAdditionalFisikVisusT_OrderHeaderID, + T_SamplingAdditionalFisikVisusCreated + ) VALUES(?,NOW())"; + $qry = $this->db->query($sql, array( + $row_arr['order_header_id'] + )); + if (!$qry) { + $dt_log = ['data' => ['id' => $row_arr['order_header_id']],'error' => $this->db->error()]; + $prm_log = ['INSERT_ADD_VISUS', 'nonlabtemplate/generate']; + $xsql = $this->db->last_query(); + $log_error = $this->insert_log_error($xsql, $prm_log,$dt_log); + $this->db->trans_rollback(); + return array(false, print_r($this->db->error(), true)); + } + } + } + + if($template_name == 'BW'){ + $sql = "SELECT COUNT(*) as exist_bw + FROM t_samplingso_additional_fisik_bw + WHERE + T_SamplingAdditionalFisikBWT_OrderHeaderID = ? + "; + $qry = $this->db->query($sql, array( + $row_arr['order_header_id'] + )); + if (!$qry) { + $dt_log = ['data' => ['id' => $row_arr['order_header_id']],'error' => $this->db->error()]; + $prm_log = ['SELECT_ORDER_HEADER_LANG', 'nonlabtemplate/generate']; + $xsql = $this->db->last_query(); + $log_error = $this->insert_log_error($xsql, $prm_log,$dt_log); + $this->db->trans_rollback(); + return array(false, print_r($this->db->error(), true)); + } + + $check_exist_visus = $qry->row()->exist_bw; + if($check_exist_visus == 0){ + $sql = "INSERT INTO t_samplingso_additional_fisik_bw ( + T_SamplingAdditionalFisikBWT_OrderHeaderID, + T_SamplingAdditionalFisikBWCreated + ) VALUES(?,NOW())"; + $qry = $this->db->query($sql, array( + $row_arr['order_header_id'] + )); + if (!$qry) { + $dt_log = ['data' => ['id' => $row_arr['order_header_id']],'error' => $this->db->error()]; + $prm_log = ['INSERT_ADD_BW', 'nonlabtemplate/generate']; + $xsql = $this->db->last_query(); + $log_error = $this->insert_log_error($xsql, $prm_log,$dt_log); + $this->db->trans_rollback(); + return array(false, print_r($this->db->error(), true)); + } + } + } + + $sql = "SELECT * FROM t_orderheaderlang + WHERE + T_OrderHeaderLangT_OrderHeaderID = ? AND T_OrderHeaderLangIsActive = 'Y'"; + $qry = $this->db->query($sql, array( + $row_arr['order_header_id'] + )); + if (!$qry) { + $dt_log = ['data' => ['id' => $T_SamplingSOID],'error' => $this->db->error()]; + $prm_log = ['SELECT_ORDER_HEADER_LANG', 'nonlabtemplate/generate']; + $xsql = $this->db->last_query(); + $log_error = $this->insert_log_error($xsql, $prm_log,$dt_log); + $this->db->trans_rollback(); + return array(false, print_r($this->db->error(), true)); + } + + $order_langs = $qry->result_array(); + //print_r($order_langs); + + foreach ($order_langs as $k_lang => $val_lang) { + $sql = "SELECT * + FROM nonlab_template_detail + JOIN t_orderheader ON T_OrderHeaderID = ? + JOIN m_patient ON T_OrderHeaderM_PatientID = M_PatientID + JOIN m_sex ON M_SexID = M_PatientM_SexID AND M_SexIsActive = 'Y' AND + ( NonlabTemplateDetailGender = 'all' OR NonlabTemplateDetailGender = M_SexNameLang) + WHERE + NonlabTemplateDetailNonlabTemplateID = ? AND NonlabTemplateDetailIsActive = 'Y' AND NonlabTemplateDetaiM_LangID = ? "; + $qry = $this->db->query($sql, array( + $row_arr['order_header_id'], + $row_arr['template_id'], + $val_lang['T_OrderHeaderLangM_LangID'] + )); + //echo $this->db->last_query(); + if (!$qry) { + $dt_log = ['data' => ['id' => $soresultentryid ,'arr' => $row_arr ],'error' => $this->db->error()]; + $prm_log = ['SELECT_NONLAB_TEMPLATE_DETAIL', 'nonlabtemplate/generate']; + $xsql = $this->db->last_query(); + $log_error = $this->insert_log_error($xsql, $prm_log,$dt_log); + $this->db->trans_rollback(); + return array(false, print_r($this->db->error(), true)); + } + + $rows_result = $qry->result_array(); + if($rows_result && count($rows_result) > 0){ + foreach ($rows_result as $key => $value) { + if(intval($val_lang['T_OrderHeaderLangM_LangID']) == 1){ + $sql = "SELECT COUNT(*) as xcount + FROM so_resultentrydetail + WHERE + So_ResultEntryDetailSo_ResultEntryID = ? AND + So_ResultEntryDetailNonlab_TemplateDetailID = ? AND + So_ResultEntryDetailIsActive = 'Y'"; + $query = $this->db->query($sql, array( + $soresultentryid, + $value['NonlabTemplateDetailID'] + )); + if (!$qry) { + $dt_log = ['data' => ['id' => $T_SamplingSOID, 'arr' => $value],'error' => $this->db->error()]; + $prm_log = ['CHECK_EXIST_SO_RE', 'nonlabtemplate/generate']; + $xsql = $this->db->last_query(); + $log_error = $this->insert_log_error($xsql, $prm_log,$dt_log); + $this->db->trans_rollback(); + return array(false, print_r($this->db->error(), true)); + } + + $check_exist_detail = $query->row()->xcount; + + if($check_exist_detail == 0){ + $sql = "INSERT INTO so_resultentrydetail ( + So_ResultEntryDetailSo_ResultEntryID, + So_ResultEntryDetailNonlab_TemplateDetailID, + So_ResultEntryDetailNonlab_TemplateDetailName, + So_ResultEntryDetailCreated + ) + VALUES(?,?,?,NOW())"; + $qry = $this->db->query($sql, array( + $soresultentryid, + $value['NonlabTemplateDetailID'], + $value['NonlabTemplateDetailName'] + )); + if (!$qry) { + $dt_log = ['data' => ['id' => $T_SamplingSOID],'error' => $this->db->error()]; + $prm_log = ['INSERT_SO_RESULTENTRY_DETAIL', 'nonlabtemplate/generate']; + $xsql = $this->db->last_query(); + $log_error = $this->insert_log_error($xsql, $prm_log,$dt_log); + $this->db->trans_rollback(); + return array(false, print_r($this->db->error(), true)); + } + } + //echo $this->db->last_query(); + } + } + } + } + } + + + $this->db->trans_commit(); + + + + $sql = "SELECT * + FROM so_resultentry + WHERE + So_ResultEntryID = ? "; + $qry = $this->db->query($sql, array( + $soresultentryid + )); + + if (!$qry) { + return array(false, print_r($this->db->error(), true)); + } + + $rows_return = $qry->row_array(); + + return $rows_return; + } else { + return false; + } + } + + + function insert_log_error($log_sql, $params,$data='') + { + // Membersihkan SQL dari \r\n dan whitespace berlebih + //$clean_log_sql = trim(str_replace(["\r\n", "\r", "\n"], ' ', $log_sql)); + + $sql = "INSERT INTO error_log_order( + ErrorLogOrderCode, + ErrorLogOrderFnName, + ErrorLogOrderDescription, + ErrorLogOrderData, + ErrorLogOrderCreated + ) + VALUES( + ?,?,?,?,NOW() + )"; + + $query = $this->db_log->query($sql, [$params[0],$params[1],$log_sql,json_encode($data)]); + //echo $this->db_log->last_query(); + if (!$query) { + return false; + } + return true; + } + + function create($tPriceHeaderID) + { + $CI = &get_instance(); + $this->db = $CI->load->database("onedev", true); + + $this->db->trans_begin(); + $sql = "select * from t_priceheader where T_PriceHeaderID = ?"; + $qry = $this->db->query($sql, array($tPriceHeaderID)); + if (!$qry) { + return array(false, print_r($this->db->error(), true)); + } + $rows = $qry->result_array(); + if (count($rows) == 0) { + return array(false, "T PriceHeader ID : $tPriceHeaderID not found"); + } + $sql = "select distinct T_PriceT_PriceHeaderID, T_TestID, T_TestName, 'N' IsFromPanel, Nat_TestID, + T_PriceT_TestID, T_PriceIsCito, + T_PricePriority, T_PriceAmount, T_PriceDisc, T_PriceDiscRp, T_PriceSubTotal, + T_PriceOther, T_PriceTotal, T_TestForceSell, 'N' is_packet, 0 packet_id, + 'PX' px_type, '[]' nat_test, '[]' child_test, 'N' IsFavourite, + Nat_TestNat_TestTypeID, T_TestSasCode, $tPriceHeaderID Ss_PriceMouT_PriceHeaderID + from t_price + join t_test on T_PriceT_TestID = T_TestID + and T_PriceIsActive = 'Y' and T_TestIsActive = 'Y' + and T_TestIsPrice = 'Y' + join nat_test on T_TestNat_TestID = Nat_TestID + and Nat_TestIsActive = 'Y' and Nat_TestNat_TestTypeID <> 5 + where T_PriceT_PriceHeaderID= ? + and length(T_TestSasCode) = 8 "; + $qry = $this->db->query($sql, array($tPriceHeaderID)); + + if (!$qry) { + $this->db->trans_rollback(); + return array(false, "Regional select t_price " . print_r($this->db->error(), true)); + } + $rows = $qry->result_array(); + foreach ($rows as $idx => $r) { + $nat_testType = $r["Nat_TestNat_TestTypeID"]; + switch ($nat_testType) { + case 1: //Single + $rows[$idx]['nat_test'] = '[' . $r['Nat_TestID'] . ']'; + break; + case 3: //Multi + case 4: //Panel + $sasCode = $r["T_TestSasCode"] . '%'; + $sql = "select T_TestNat_TestID + from t_test + where T_TestIsResult = 'Y' + and T_TestSasCode like ? + and T_TestIsActive = 'Y'"; + $qry = $this->db->query($sql, array($sasCode)); + if (!$qry) { + // HANYA DEBUG + // echo $this->db->last_query(); + // print_r($this->db->error()); + $this->db->trans_rollback(); + return array(false, "Regional " . print_r($this->db->error(), true)); + } + $nt_rows = $qry->result_array(); + $t_rows = array($r["Nat_TestID"]); + foreach ($nt_rows as $nr) { + $t_rows[] = $nr["T_TestNat_TestID"]; + } + $rows[$idx]['nat_test'] = "[" . join(",", $t_rows) . "]"; + break; + default: + $rows[$idx]['nat_test'] = '[' . $r['Nat_TestID'] . ']'; + break; + } + unset($rows[$idx]["Nat_TestNat_TestTypeID"]); + unset($rows[$idx]["T_TestSasCode"]); + } + + //Test Profile + // wip profile + $sql = "select distinct $tPriceHeaderID T_PriceT_PriceHeaderID, T_TestID, + T_TestName, 'N' IsFromPanel, Nat_TestID, + T_TestID T_PriceT_TestID, 'N' T_PriceIsCito, + 0 T_PricePriority, 0 T_PriceAmount, 0 T_PriceDisc, 0 T_PriceDiscRp, + 0 T_PriceSubTotal, 0 T_PriceOther, 0 T_PriceTotal, T_TestForceSell, + 'N' is_packet, 0 packet_id, + 'PXR' px_type, '[]' nat_test, '[]' child_test, 'N' IsFavourite, + Nat_TestNat_TestTypeID, T_TestSasCode, + $tPriceHeaderID Ss_PriceMouT_PriceHeaderID + from t_test + join nat_test on T_TestNat_TestID = Nat_TestID + and Nat_TestIsActive = 'Y' and Nat_TestNat_TestTypeID = 5 + where length(T_TestSasCode) = 8 "; + $qry = $this->db->query($sql); + if (!$qry) { + return array(false, "Regional " . print_r($this->db->error(), true)); + } + $p_rows = $qry->result_array(); + + $sql = "select distinct substr(T_TestSasCode,1,8) parentCode, T_PriceT_PriceHeaderID, T_TestID, T_TestName, 'N' IsFromPanel, Nat_TestID, + T_PriceT_TestID, T_PriceIsCito, + T_PricePriority, T_PriceAmount, T_PriceDisc, T_PriceDiscRp, T_PriceSubTotal, + T_PriceOther, T_PriceTotal, T_TestForceSell, 'N' is_packet, 0 packet_id, + 'PX' px_type, concat('[', T_TestNat_TestID , ']') nat_test, '[]' child_test, 'N' IsFavourite, + Nat_TestNat_TestTypeID, T_TestSasCode,T_TestIsResult, T_TestCode + from t_price + join t_test on T_PriceT_TestID = T_TestID + and T_PriceIsActive = 'Y' and T_TestIsActive = 'Y' + and T_TestIsPrice = 'Y' + and T_PriceIsCito = 'N' + and length(T_TestSasCode) = 10 + join nat_test on T_TestNat_TestID = Nat_TestID + and Nat_TestIsActive = 'Y' + where T_PriceT_PriceHeaderID= ? "; + $qry = $this->db->query($sql, array($tPriceHeaderID)); + if (!$qry) { + return array(false, "Regional child test " . print_r($this->db->error(), true)); + } + $xrows = $qry->result_array(); + + $arr_child = array(); + $p_codes = "'0'"; + foreach ($xrows as $r) { + $pCode = $r["parentCode"]; + if (!isset($arr_child[$pCode])) { + $arr_child[$pCode] = array(); + } + $cCode = $r["T_TestSasCode"]; + $p_codes .= ", '$cCode'"; + unset($r["parentCode"]); + $arr_child[$pCode][] = $r; + } + $sql = "select substr(T_TestSasCode,1,8) parentCode, + group_concat(distinct T_TestNat_TestID) nat + from t_test + where ( T_TestIsResult = 'Y' or T_TestIsPrice = 'Y' ) + and T_TestSasCode in ( $p_codes ) + and T_TestIsActive = 'Y' + group by parentCode"; + $qry = $this->db->query($sql); + if (!$qry) { + //DEBUG + // echo $this->db->last_query(); + // print_r($this->db->error()); + return array(false, "Regional " . print_r($this->db->error(), true)); + } + $xrows = $qry->result_array(); + $arr_nat = array(); + foreach ($xrows as $r) { + $pCode = $r["parentCode"]; + //if ( ! isset($arr_nat[$pCode])) { + // $arr_nat[$pCode] = array(); + //} + $arr_nat[$pCode] = $r["nat"]; + } + $flag_error = false; + foreach ($p_rows as $idx => $r) { + $T_TestName = $r["T_TestName"]; + $sasCode = $r["T_TestSasCode"]; + if (isset($arr_child[$sasCode])) { + $the_childs = $arr_child[$sasCode]; + $p_rows[$idx]['child_test'] = json_encode($the_childs, true); + if (isset($arr_nat[$sasCode])) { + $p_rows[$idx]['nat_test'] = "[" . $arr_nat[$sasCode] . "]"; + } + unset($p_rows[$idx]["Nat_TestNat_TestTypeID"]); + unset($p_rows[$idx]["T_TestSasCode"]); + } else { + unset($p_rows[$idx]); + } + } + //Paket Panel / Profile + $sql = "select distinct $tPriceHeaderID T_PriceT_PriceHeaderID, T_PacketID T_TestID, T_PacketName T_TestName, 'N' IsFromPanel, 0 Nat_TestID, + T_PacketID T_PriceT_TestID, 'N' T_PriceIsCito, + 0 T_PricePriority, T_PacketOriginalBruto T_PriceAmount, 0 T_PriceDisc, + (T_PacketOriginalBruto - T_PacketPrice) T_PriceDiscRp, 0 T_PriceSubTotal, + 0 T_PriceOther, T_PacketPrice T_PriceTotal, 'Y' T_TestForceSell, 'Y' is_packet, T_PacketID packet_id, + T_PacketType px_type, '[]' nat_test, '[]' child_test, 'N' IsFavourite, + $tPriceHeaderID Ss_PriceMouT_PriceHeaderID + from + t_packet + where + T_PacketIsActive = 'Y' + and T_PacketT_PriceHeaderID= ?"; + + $qry = $this->db->query($sql, array($tPriceHeaderID)); + if (!$qry) { + // echo $this->db->last_query(); + // print_r($this->db->error()); + return array(false, "Regional " . print_r($this->db->error(), true)); + } + $pn_rows = $qry->result_array(); + foreach ($pn_rows as $idx => $pnr) { + $packetID = $pnr["packet_id"]; + //child test + $sql = "select distinct $tPriceHeaderID T_PriceT_PriceHeaderID, T_TestID, T_TestName, 'N' IsFromPanel, Nat_TestID, + T_TestID T_PriceT_TestID, 'N' T_PriceIsCito, 0 T_PricePriority, + T_PacketDetailPrice T_PriceAmount, + 0 T_PriceDisc, + 0 T_PriceDiscRp, T_PacketDetailPrice T_PriceSubTotal, + 0 T_PriceOther, T_PacketDetailPrice T_PriceTotal, + 'Y' T_TestForceSell, 'N' is_packet, 0 packet_id, + 'PX' px_type, concat('[', T_TestNat_TestID , ']') nat_test, '[]' child_test, 'N' IsFavourite, T_TestSasCode + from t_packetdetail + JOIN t_packet ON T_PacketDetailT_PacketID = T_PacketID + JOIN t_price ON T_PacketDetailT_TestID = T_PriceT_TestID AND T_PriceIsActive = 'Y' AND T_PriceT_PriceHeaderID = T_PacketT_PriceHeaderID + join t_test on T_PacketDetailT_TestID = T_TestID + and T_PacketDetailIsActive = 'Y' and T_TestIsActive = 'Y' + and T_PacketDetailT_PacketID = ? + join nat_test on T_TestNat_TestID = Nat_TestID + and Nat_TestIsActive = 'Y'"; + $qry = $this->db->query($sql, array($packetID)); + if (!$qry) { + return array(false, print_r($this->db->error(), true)); + } + $ct_rows = $qry->result_array(); + $p_nat_test = array(); + foreach ($ct_rows as $ct_idx => $cr) { + $sasCode = $cr["T_TestSasCode"] . '%'; + $sql = "select distinct T_TestNat_TestID + from t_test + where T_TestSasCode like ? + and T_TestIsActive = 'Y'"; + $qry = $this->db->query($sql, array($sasCode)); + if (!$qry) { + return array(false, print_r($this->db->error(), true)); + } + $nt_rows = $qry->result_array(); + $t_rows = array(); + foreach ($nt_rows as $nr) { + $t_rows[] = intval($nr["T_TestNat_TestID"]); + $p_nat_test[] = intval($nr["T_TestNat_TestID"]); + } + $ct_rows[$ct_idx]['nat_test'] = json_encode($t_rows, JSON_NUMERIC_CHECK); + } + if (count($ct_rows) > 0) { + $x_arr = array(); + foreach ($ct_rows as $x_cr) { + $x_arr[] = $x_cr; + } + $pn_rows[$idx]['child_test'] = json_encode($x_arr, true); + $pn_rows[$idx]['nat_test'] = json_encode($p_nat_test, true); + } + unset($pn_rows[$idx]["Nat_TestNat_TestTypeID"]); + unset($pn_rows[$idx]["T_TestSasCode"]); + } + + $rows = array_merge($rows, $p_rows, $pn_rows); + $qry = $this->db->query( + "delete from ss_price_mou where Ss_PriceMouT_PriceHeaderID=?", + array($tPriceHeaderID) + ); + if (!$qry) { + $this->db->trans_rollback(); + return array(false, "" . print_r($this->db->error(), true) . $this->db->last_query()); + } + $this->db->insert_batch("ss_price_mou", $rows); + $err = $this->db->error(); + if ($err["code"] != 0) { + echo "ERR Code : " . $err["code"] . " | " . $err["message"] . " \n"; + $this->db->trans_rollback(); + return array(false, "" . print_r($this->db->error(), true) . $this->db->last_query()); + } + + // $sql_i = "insert into ss_price_mou( + // T_TestID, T_TestName, + // IsFromPanel, Nat_TestID,T_PriceT_TestID, T_PriceIsCito, + // T_PricePriority, T_PriceAmount, T_PriceDisc, + // T_PriceDiscRp, T_PriceSubTotal, T_PriceOther, T_PriceTotal, + // T_TestForceSell, is_packet, packet_id, px_type, + // nat_test, child_test, IsFavourite, Ss_PriceMouT_PriceHeaderID) + // values ( + // ?,?, + // ?,?,?,?, + // ?,?,?, + // ?,?,?,?, + // ?,?,?,?, + // ?,?,?,? + // )"; + // foreach ($rows as $r) { + // $arr = [ + // $r["T_TestID"], + // $r["T_TestName"], + // $r["IsFromPanel"], + // $r["Nat_TestID"], + // $r["T_PriceT_TestID"], + // $r["T_PriceIsCito"], + // $r["T_PricePriority"], + // $r["T_PriceAmount"], + // $r["T_PriceDisc"], + // $r["T_PriceDiscRp"], + // $r["T_PriceSubTotal"], + // $r["T_PriceOther"], + // $r["T_PriceTotal"], + // $r["T_TestForceSell"], + // $r["is_packet"], + // $r["packet_id"], + // $r["px_type"], + // $r["nat_test"], + // $r["child_test"], + // $r["IsFavourite"], + // $r["Ss_PriceMouT_PriceHeaderID"], + // ]; + // $qry = $this->db->query($sql_i, $arr); + // if (!$qry) { + // + // header("Content-Type: text/plain"); + // print_r($r); + // echo $this->db->last_query(); + // return array(false, "Regional " . print_r($this->db->error(), true)); + // } + // } + $this->db->trans_commit(); + return array(true, "OK"); + } + // retrun array status, message + public function bisone_create($mouID) + { + $CI = &get_instance(); + $this->db = $CI->load->database("one", true); + + $sql = "select * from m_mou where M_MouID = ?"; + $qry = $this->db->query($sql, array($mouID)); + if (!$qry) { + return array(false, print_r($this->db->error(), true)); + } + $rows = $qry->result_array(); + if (count($rows) == 0) { + return array(false, "MOU ID : $mouID not found"); + } + $companyID = $rows[0]["M_MouM_CompanyID"]; + + $sql = "select distinct T_PriceM_MouID, T_TestID, T_TestName, 'N' IsFromPanel, Nat_TestID, + T_PriceT_TestID, T_PriceIsCito, T_PriceM_CompanyID, T_PriceM_MouID, + T_PricePriority, T_PriceAmount, T_PriceDisc, T_PriceDiscRp, T_PriceSubTotal, + T_PriceOther, T_PriceTotal, T_TestForceSell, 'N' is_packet, 0 packet_id, + 'PX' px_type, '[]' nat_test, '[]' child_test, 'N' IsFavourite, + Nat_TestNat_TestTypeID, T_TestSasCode, $mouID Ss_PriceMouM_MouID + from t_price + join t_test on T_PriceT_TestID = T_TestID + and T_PriceIsActive = 'Y' and T_TestIsActive = 'Y' + and T_TestIsPrice = 'Y' + join nat_test on T_TestNat_TestID = Nat_TestID + and Nat_TestIsActive = 'Y' and Nat_TestNat_TestTypeID <> 5 + where T_PriceM_MouID = ? + and length(T_TestSasCode) = 8 "; + $qry = $this->db->query($sql, array($mouID)); + + if (!$qry) { + return array(false, "Regional select t_price " . print_r($this->db->error(), true)); + } + $rows = $qry->result_array(); + $flag_error = false; + foreach ($rows as $idx => $r) { + $nat_testType = $r["Nat_TestNat_TestTypeID"]; + switch ($nat_testType) { + case 1: //Single + $rows[$idx]['nat_test'] = '[' . $r['Nat_TestID'] . ']'; + break; + case 3: //Multi + case 4: //Panel + $sasCode = $r["T_TestSasCode"] . '%'; + $sql = "select T_TestNat_TestID + from t_test + where T_TestIsResult = 'Y' + and T_TestSasCode like ? + and T_TestIsActive = 'Y'"; + $qry = $this->db->query($sql, array($sasCode)); + if (!$qry) { + return array(false, "Regional " . print_r($this->db->error(), true)); + } + $nt_rows = $qry->result_array(); + $t_rows = array($r["Nat_TestID"]); + foreach ($nt_rows as $nr) { + $t_rows[] = $nr["T_TestNat_TestID"]; + } + $rows[$idx]['nat_test'] = "[" . join(",", $t_rows) . "]"; + break; + default: + $rows[$idx]['nat_test'] = '[' . $r['Nat_TestID'] . ']'; + break; + } + unset($rows[$idx]["Nat_TestNat_TestTypeID"]); + unset($rows[$idx]["T_TestSasCode"]); + } + //Test Profile + // wip profile + $sql = "select distinct $mouID T_PriceM_MouID, T_TestID, T_TestName, 'N' IsFromPanel, Nat_TestID, + T_TestID T_PriceT_TestID, 'N' T_PriceIsCito, $companyID T_PriceM_CompanyID, $mouID T_PriceM_MouID, + 0 T_PricePriority, 0 T_PriceAmount, 0 T_PriceDisc, 0 T_PriceDiscRp, 0 T_PriceSubTotal, + 0 T_PriceOther, 0 T_PriceTotal, T_TestForceSell, 'N' is_packet, 0 packet_id, + 'PXR' px_type, '[]' nat_test, '[]' child_test, 'N' IsFavourite, + Nat_TestNat_TestTypeID, T_TestSasCode, $mouID Ss_PriceMouM_MouID + from t_test + join nat_test on T_TestNat_TestID = Nat_TestID + and Nat_TestIsActive = 'Y' and Nat_TestNat_TestTypeID = 5 + where length(T_TestSasCode) = 8 "; + $qry = $this->db->query($sql, array($mouID)); + if (!$qry) { + return array(false, "Regional " . print_r($this->db->error(), true)); + } + $p_rows = $qry->result_array(); + + $sql = "select distinct substr(T_TestSasCode,1,8) parentCode, T_PriceM_MouID, T_TestID, T_TestName, 'N' IsFromPanel, Nat_TestID, + T_PriceT_TestID, T_PriceIsCito, T_PriceM_CompanyID, T_PriceM_MouID, + T_PricePriority, T_PriceAmount, T_PriceDisc, T_PriceDiscRp, T_PriceSubTotal, + T_PriceOther, T_PriceTotal, T_TestForceSell, 'N' is_packet, 0 packet_id, + 'PX' px_type, concat('[', T_TestNat_TestID , ']') nat_test, '[]' child_test, 'N' IsFavourite, + Nat_TestNat_TestTypeID, T_TestSasCode,T_TestIsResult, T_TestCode + from t_price + join t_test on T_PriceT_TestID = T_TestID + and T_PriceIsActive = 'Y' and T_TestIsActive = 'Y' + and T_TestIsPrice = 'Y' + and T_PriceIsCito = 'N' + and length(T_TestSasCode) = 10 + join nat_test on T_TestNat_TestID = Nat_TestID + and Nat_TestIsActive = 'Y' + where T_PriceM_MouID = ? "; + $qry = $this->db->query($sql, array($mouID)); + if (!$qry) { + return array(false, "Regional child test " . print_r($this->db->error(), true)); + } + $xrows = $qry->result_array(); + $arr_child = array(); + $p_codes = "'0'"; + foreach ($xrows as $r) { + $pCode = $r["parentCode"]; + if (!isset($arr_child[$pCode])) { + $arr_child[$pCode] = array(); + } + $cCode = $r["T_TestSasCode"]; + $p_codes .= ", '$cCode'"; + unset($r["parentCode"]); + $arr_child[$pCode][] = $r; + } + $sql = "select substr(T_TestSasCode,1,8) parentCode, + group_concat(distinct T_TestNat_TestID) nat + from t_test + where ( T_TestIsResult = 'Y' or T_TestIsPrice = 'Y' ) + and T_TestSasCode in ( $p_codes ) + and T_TestIsActive = 'Y' + group by parentCode"; + $qry = $this->db->query($sql, array($mouID)); + if (!$qry) { + return array(false, "Regional " . print_r($this->db->error(), true)); + } + $xrows = $qry->result_array(); + $arr_nat = array(); + foreach ($xrows as $r) { + $pCode = $r["parentCode"]; + //if ( ! isset($arr_nat[$pCode])) { + // $arr_nat[$pCode] = array(); + //} + $arr_nat[$pCode] = $r["nat"]; + } + $flag_error = false; + foreach ($p_rows as $idx => $r) { + $T_TestName = $r["T_TestName"]; + $sasCode = $r["T_TestSasCode"]; + if (isset($arr_child[$sasCode])) { + $the_childs = $arr_child[$sasCode]; + $p_rows[$idx]['child_test'] = json_encode($the_childs, true); + if (isset($arr_nat[$sasCode])) { + $p_rows[$idx]['nat_test'] = "[" . $arr_nat[$sasCode] . "]"; + } + unset($p_rows[$idx]["Nat_TestNat_TestTypeID"]); + unset($p_rows[$idx]["T_TestSasCode"]); + } else { + unset($p_rows[$idx]); + } + } + //Paket Panel / Profile + $sql = "select distinct $mouID T_PriceM_MouID, T_PacketID T_TestID, T_PacketName T_TestName, 'N' IsFromPanel, 0 Nat_TestID, + T_PacketID T_PriceT_TestID, 'N' T_PriceIsCito, $companyID T_PriceM_CompanyID, $mouID T_PriceM_MouID, + 0 T_PricePriority, T_PacketOriginalBruto T_PriceAmount, 0 T_PriceDisc, + (T_PacketOriginalBruto - T_PacketPrice) T_PriceDiscRp, 0 T_PriceSubTotal, + 0 T_PriceOther, T_PacketPrice T_PriceTotal, 'Y' T_TestForceSell, 'Y' is_packet, T_PacketID packet_id, + T_PacketType px_type, '[]' nat_test, '[]' child_test, 'N' IsFavourite, + $mouID Ss_PriceMouM_MouID + from + t_packet + where + T_PacketIsActive = 'Y' + and T_PacketM_MouID = ?"; + + $qry = $this->db->query($sql, array($mouID)); + if (!$qry) { + return array(false, "Regional " . print_r($this->db->error(), true)); + } + $pn_rows = $qry->result_array(); + foreach ($pn_rows as $idx => $pnr) { + $packetID = $pnr["packet_id"]; + //child test + $sql = "select distinct $mouID T_PriceM_MouID, T_TestID, T_TestName, 'N' IsFromPanel, Nat_TestID, + T_TestID T_PriceT_TestID, 'N' T_PriceIsCito, $companyID T_PriceM_CompanyID, + $mouID T_PriceM_MouID, 0 T_PricePriority, T_PacketDetailPriceAmount T_PriceAmount, + T_PacketDetailPriceDisc T_PriceDisc, T_PacketDetailPriceDiscRp T_PriceDiscRp, T_PacketDetailPriceSubTotal T_PriceSubTotal, + 0 T_PriceOther, T_PacketDetailPrice T_PriceTotal, + 'Y' T_TestForceSell, 'N' is_packet, 0 packet_id, + 'PX' px_type, concat('[', T_TestNat_TestID , ']') nat_test, '[]' child_test, 'N' IsFavourite, T_TestSasCode + from t_packetdetail + join t_test on T_PacketDetailT_TestID = T_TestID + and T_PacketDetailIsActive = 'Y' and T_TestIsActive = 'Y' + and T_PacketDetailT_PacketID = ? + join nat_test on T_TestNat_TestID = Nat_TestID + and Nat_TestIsActive = 'Y'"; + $qry = $this->db->query($sql, array($packetID)); + if (!$qry) { + return array(false, print_r($this->db->error(), true)); + } + $ct_rows = $qry->result_array(); + $p_nat_test = array(); + foreach ($ct_rows as $ct_idx => $cr) { + $sasCode = $cr["T_TestSasCode"] . '%'; + $sql = "select distinct T_TestNat_TestID + from t_test + where T_TestSasCode like ? + and T_TestIsActive = 'Y'"; + $qry = $this->db->query($sql, array($sasCode)); + if (!$qry) { + return array(false, print_r($this->db->error(), true)); + } + $nt_rows = $qry->result_array(); + $t_rows = array(); + foreach ($nt_rows as $nr) { + $t_rows[] = intval($nr["T_TestNat_TestID"]); + $p_nat_test[] = intval($nr["T_TestNat_TestID"]); + } + $ct_rows[$ct_idx]['nat_test'] = json_encode($t_rows, JSON_NUMERIC_CHECK); + } + if (count($ct_rows) > 0) { + $x_arr = array(); + foreach ($ct_rows as $x_cr) { + $x_arr[] = $x_cr; + } + $pn_rows[$idx]['child_test'] = json_encode($x_arr, true); + $pn_rows[$idx]['nat_test'] = json_encode($p_nat_test, true); + } + unset($pn_rows[$idx]["Nat_TestNat_TestTypeID"]); + unset($pn_rows[$idx]["T_TestSasCode"]); + } + + $rows = array_merge($rows, $p_rows, $pn_rows); + $qry = $this->db->query("delete from ss_price_mou where Ss_PriceMouM_MouID=?", array($mouID)); + if (!$qry) { + return array(false, "Regional " . print_r($this->db->error(), true)); + } + $qry = $this->db->insert_batch("ss_price_mou", $rows); + if (!$qry) { + return array(false, "Regional " . print_r($this->db->error(), true)); + } + return array(true, "OK"); + } +} diff --git a/application/libraries/Ocr_alibaba.php b/application/libraries/Ocr_alibaba.php new file mode 100644 index 00000000..106d9de0 --- /dev/null +++ b/application/libraries/Ocr_alibaba.php @@ -0,0 +1,118 @@ + "ERR", "message" => "Error: File not found."]; + } + + // Load image and convert to black and white + $image = imagecreatefromstring(file_get_contents($imagePath)); + // imagefilter($image, IMG_FILTER_GRAYSCALE); + + // Get original dimensions and resize + // $originalWidth = imagesx($image); + // $originalHeight = imagesy($image); + // $newWidth = intval(640); + // $newHeight = intval($originalHeight * ($newWidth / $originalWidth)); + // $resizedImage = imagecreatetruecolor($newWidth, $newHeight); + // imagecopyresampled($resizedImage, $image, 0, 0, 0, 0, $newWidth, $newHeight, $originalWidth, $originalHeight); + + // Convert image to base64 + ob_start(); + imagejpeg($image); + $imageData = ob_get_clean(); + $imgStr = base64_encode($imageData); + $imgStrNew = "data:image/jpeg;base64," . $imgStr; + + // Prepare request payload + $payload = json_encode([ + "model" => $this->modelName, + "messages" => [[ + "role" => "user", + "content" => [ + [ + "type" => "text", + "text" => "Extract all text from the given image. Return result only, in the pattern label:value as it is, without translation." + ], + [ + "type" => "image_url", + "image_url" => [ + "url" => $imgStrNew + ], + ] + ], + ]], + "options" => ["temperature" => $this->temperature], + "stream" => false + ]); + + // Initialize cURL + $ch = curl_init(self::API_URL); + curl_setopt($ch, CURLOPT_RETURNTRANSFER, true); + curl_setopt($ch, CURLOPT_POST, true); + curl_setopt($ch, CURLOPT_HTTPHEADER, [ + "Content-Type: application/json", + "Authorization: Bearer " . self::API_KEY + ]); + curl_setopt($ch, CURLOPT_POSTFIELDS, $payload); + + // Execute request + $response = curl_exec($ch); + if (curl_errno($ch)) { + $error = curl_error($ch); + curl_close($ch); + return ["status" => "ERR", "message" => curl_error($ch)]; + } + curl_close($ch); + + $response = strip_tags($response); + $responseData = json_decode($response, true); + $content = $responseData['choices'][0]['message']['content']; + + if (is_null($responseData) || !isset($content)) { + return ["status" => "ERR", "message" => "raw : $response"]; + } + + $parsedData = []; + $lines = explode("\n", $content); + foreach ($lines as $line) { + $parts = explode(":", $line, 2); + if (count($parts) == 2) { + $key = trim(str_replace("*", "", $parts[0])); + $key = strtolower($key); + $key = str_replace(" ", "_", $key); + $value = trim(str_replace("*", "", $parts[1])); + + if (strpos($key, "/")) { + $a_key = explode("/", $key); + $a_val = explode(",", $value); + if (strpos($value, "/")) { + $a_val = explode("/", $value); + } + foreach ($a_key as $a_idx => $sub_key) { + $sub_val = $a_val[$a_idx]; + $parsedData[trim($sub_key)] = trim($sub_val); + } + } else { + $parsedData[$key] = $value; + } + } + } + $info["prompt_tokens"] = $responseData["usage"]["prompt_tokens"]; + $info["completion_tokens"] = $responseData["usage"]["completion_tokens"]; + $info["total_tokens"] = $responseData["usage"]["total_tokens"]; + $info["estimated_cost"] = $responseData["usage"]["estimated_cost"]; + $info["model"] = $this->modelName; + $info["temperature"] = $this->temperature; + return ["status" => "OK", "data" => $parsedData, "info" => $info]; + } +} diff --git a/application/libraries/Ocr_deepinfra.php b/application/libraries/Ocr_deepinfra.php new file mode 100644 index 00000000..c287956a --- /dev/null +++ b/application/libraries/Ocr_deepinfra.php @@ -0,0 +1,124 @@ + "ERR", "message" => "Error: File not found."]; + } + + // Load image and convert to black and white + $image = imagecreatefromstring(file_get_contents($imagePath)); + // imagefilter($image, IMG_FILTER_GRAYSCALE); + + // Get original dimensions and resize + // $originalWidth = imagesx($image); + // $originalHeight = imagesy($image); + // $newWidth = intval(640); + // $newHeight = intval($originalHeight * ($newWidth / $originalWidth)); + // $resizedImage = imagecreatetruecolor($newWidth, $newHeight); + // imagecopyresampled($resizedImage, $image, 0, 0, 0, 0, $newWidth, $newHeight, $originalWidth, $originalHeight); + + // Convert image to base64 + ob_start(); + // imagejpeg($resizedImage); + imagejpeg($image); + $imageData = ob_get_clean(); + $imgStr = base64_encode($imageData); + $imgStrNew = "data:image/jpeg;base64," . $imgStr; + + // Prepare request payload + $payload = json_encode([ + "model" => $this->modelName, + "messages" => [[ + "role" => "user", + "content" => [ + [ + "type" => "text", + "text" => "Extract all text from the given image. Return result only, in the pattern label:value as it is, without translation." + ], + [ + "type" => "image_url", + "image_url" => [ + "url" => $imgStrNew + ], + ] + ], + ]], + "options" => ["temperature" => $this->temperature], + "stream" => false + ]); + + // Initialize cURL + $ch = curl_init(self::API_URL); + curl_setopt($ch, CURLOPT_RETURNTRANSFER, true); + curl_setopt($ch, CURLOPT_POST, true); + curl_setopt($ch, CURLOPT_HTTPHEADER, [ + "Content-Type: application/json", + "Authorization: Bearer " . self::API_KEY + ]); + curl_setopt($ch, CURLOPT_POSTFIELDS, $payload); + + // Execute request + $response = curl_exec($ch); + if (curl_errno($ch)) { + $error = curl_error($ch); + curl_close($ch); + return ["status" => "ERR", "message" => curl_error($ch)]; + } + curl_close($ch); + + $response = strip_tags($response); + $responseData = json_decode($response, true); + + $content = $responseData['choices'][0]['message']['content']; + + if (is_null($responseData) || !isset($content)) { + return ["status" => "ERR", "message" => "raw : $response"]; + } + + // echo "content:\n"; + // echo $content . "\n"; + // echo "\n"; + + $parsedData = []; + $lines = explode("\n", $content); + foreach ($lines as $line) { + $parts = explode(":", $line, 2); + if (count($parts) == 2) { + $key = trim(str_replace("*", "", $parts[0])); + $key = strtolower($key); + $key = str_replace(" ", "_", $key); + $value = trim(str_replace("*", "", $parts[1])); + + if (strpos($key, "/")) { + $a_key = explode("/", $key); + $a_val = explode(",", $value); + if (strpos($value, "/")) { + $a_val = explode("/", $value); + } + foreach ($a_key as $a_idx => $sub_key) { + $sub_val = $a_val[$a_idx]; + $parsedData[trim($sub_key)] = trim($sub_val); + } + } else { + $parsedData[$key] = $value; + } + } + } + $info["prompt_tokens"] = $responseData["usage"]["prompt_tokens"]; + $info["completion_tokens"] = $responseData["usage"]["completion_tokens"]; + $info["total_tokens"] = $responseData["usage"]["total_tokens"]; + $info["estimated_cost"] = $responseData["usage"]["estimated_cost"]; + $info["model"] = $this->modelName; + $info["temperature"] = $this->temperature; + return ["status" => "OK", "data" => $parsedData, "info" => $info]; + } +} diff --git a/application/libraries/Ocr_llama.php b/application/libraries/Ocr_llama.php new file mode 100644 index 00000000..3ee935e5 --- /dev/null +++ b/application/libraries/Ocr_llama.php @@ -0,0 +1,104 @@ +"ERR", "message"=> "Error: File not found."]; + } + + // Load image and convert to black and white + $image = imagecreatefromstring(file_get_contents($imagePath)); + imagefilter($image, IMG_FILTER_GRAYSCALE); + + // Get original dimensions and resize + // $newWidth = intval(imagesx($image) / 2); + // $newHeight = intval(imagesy($image) / ); + // $resizedImage = imagecreatetruecolor($newWidth, $newHeight); + // imagecopyresampled($resizedImage, $image, 0, 0, 0, 0, $newWidth, $newHeight, imagesx($image), imagesy($image)); + + // Convert image to base64 + ob_start(); + imagejpeg($image); + $imageData = ob_get_clean(); + $imgStr = base64_encode($imageData); + + // Prepare request payload + $payload = json_encode([ + "model" => $this->modelName, + "messages" => [[ + "role" => "user", + "content" => "Extract all text from the given image. Return result only, in the pattern label:value as it is, without translation.", + "images" => [$imgStr] + ]], + "options" => ["temperature" => $this->temperature], + "stream" => false + ]); + + // Initialize cURL + $ch = curl_init($this->ollamaUrl); + curl_setopt($ch, CURLOPT_RETURNTRANSFER, true); + curl_setopt($ch, CURLOPT_POST, true); + curl_setopt($ch, CURLOPT_HTTPHEADER, ["Content-Type: application/json"]); + curl_setopt($ch, CURLOPT_POSTFIELDS, $payload); + + // Execute request + $response = curl_exec($ch); + if (curl_errno($ch)) { + $error = curl_error($ch); + curl_close($ch); + return ["status" => "ERR", "message" => curl_error($ch)]; + } + curl_close($ch); + // Decode response + // Remove
tags if present
+ $response = strip_tags($response);
+
+ $responseData = json_decode($response, true);
+ if (!$responseData || !isset($responseData['message']['content'])) {
+ return ["status"=>"ERR", "message"=> "raw : $response"];
+ }
+
+ // Parse content into JSON object
+ $content = $responseData["message"]["content"];
+ // echo "content:\n";
+ // echo $content . "\n";
+ // echo "\n";
+ $parsedData = [];
+ $lines = explode("\n", $content);
+ foreach ($lines as $line) {
+ $parts = explode(":", $line, 2);
+ if (count($parts) == 2) {
+ $key = trim(str_replace("*","",$parts[0]));
+ $key = strtolower($key);
+ $key = str_replace(" ","_",$key);
+ $value = trim(str_replace("*","",$parts[1]));
+
+ if (strpos($key, "/")) {
+ $a_key = explode("/", $key);
+ $a_val = explode(",", $value);
+ if (strpos($value, "/")) {
+ $a_val = explode("/", $value);
+ }
+ foreach($a_key as $a_idx => $sub_key) {
+ $sub_val = $a_val[$a_idx];
+ $parsedData[trim($sub_key)] = trim($sub_val);
+ }
+ } else {
+ $parsedData[$key] = $value;
+ }
+ }
+ }
+ $info["total_duration"] = $responseData["total_duration"];
+ $info["prompt_eval_duration"] = $responseData["prompt_eval_duration"];
+ $info["eval_duration"] = $responseData["eval_duration"];
+ $info["model"] = $responseData["model"];
+ return ["status"=>"OK", "data" => $parsedData, "info"=> $info];
+ }
+}
diff --git a/application/libraries/Ocr_oroute.php b/application/libraries/Ocr_oroute.php
new file mode 100644
index 00000000..89cef430
--- /dev/null
+++ b/application/libraries/Ocr_oroute.php
@@ -0,0 +1,119 @@
+ "ERR", "message" => "Error: File not found."];
+ }
+
+ // Load image and convert to black and white
+ $image = imagecreatefromstring(file_get_contents($imagePath));
+ // imagefilter($image, IMG_FILTER_GRAYSCALE);
+
+ // Get original dimensions and resize
+ // $originalWidth = imagesx($image);
+ // $originalHeight = imagesy($image);
+ // $newWidth = intval(640);
+ // $newHeight = intval($originalHeight * ($newWidth / $originalWidth));
+ // $resizedImage = imagecreatetruecolor($newWidth, $newHeight);
+ // imagecopyresampled($resizedImage, $image, 0, 0, 0, 0, $newWidth, $newHeight, $originalWidth, $originalHeight);
+
+ // Convert image to base64
+ ob_start();
+ // imagejpeg($resizedImage);
+ imagejpeg($image);
+ $imageData = ob_get_clean();
+ $imgStr = base64_encode($imageData);
+ $imgStrNew = "data:image/jpeg;base64," . $imgStr;
+
+ // Prepare request payload
+ $payload = json_encode([
+ "model" => $this->modelName,
+ "messages" => [[
+ "role" => "user",
+ "content" => [
+ [
+ "type" => "text",
+ "text" => "Extract all text from the given image. Return result only, in the pattern label:value as it is, without translation."
+ ],
+ [
+ "type" => "image_url",
+ "image_url" => [
+ "url" => $imgStrNew
+ ],
+ ]
+ ],
+ ]],
+ "options" => ["temperature" => $this->temperature],
+ "stream" => false
+ ]);
+
+ // Initialize cURL
+ $ch = curl_init(self::API_URL);
+ curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
+ curl_setopt($ch, CURLOPT_POST, true);
+ curl_setopt($ch, CURLOPT_HTTPHEADER, [
+ "Content-Type: application/json",
+ "Authorization: Bearer " . self::API_KEY
+ ]);
+ curl_setopt($ch, CURLOPT_POSTFIELDS, $payload);
+
+ // Execute request
+ $response = curl_exec($ch);
+ if (curl_errno($ch)) {
+ $error = curl_error($ch);
+ curl_close($ch);
+ return ["status" => "ERR", "message" => "Error CURL ke API " . curl_error($ch)];
+ }
+ curl_close($ch);
+
+ $response = strip_tags($response);
+ $responseData = json_decode($response, true);
+ $content = $responseData['choices'][0]['message']['content'];
+
+ if (is_null($responseData) || !isset($content)) {
+ return ["status" => "ERR", "message" => "raw : $response"];
+ }
+
+ $parsedData = [];
+ $lines = explode("\n", $content);
+ foreach ($lines as $line) {
+ $parts = explode(":", $line, 2);
+ if (count($parts) == 2) {
+ $key = trim(str_replace("*", "", $parts[0]));
+ $key = strtolower($key);
+ $key = str_replace(" ", "_", $key);
+ $value = trim(str_replace("*", "", $parts[1]));
+
+ if (strpos($key, "/")) {
+ $a_key = explode("/", $key);
+ $a_val = explode(",", $value);
+ if (strpos($value, "/")) {
+ $a_val = explode("/", $value);
+ }
+ foreach ($a_key as $a_idx => $sub_key) {
+ $sub_val = $a_val[$a_idx];
+ $parsedData[trim($sub_key)] = trim($sub_val);
+ }
+ } else {
+ $parsedData[$key] = $value;
+ }
+ }
+ }
+ $info["prompt_tokens"] = $responseData["usage"]["prompt_tokens"];
+ $info["completion_tokens"] = $responseData["usage"]["completion_tokens"];
+ $info["total_tokens"] = $responseData["usage"]["total_tokens"];
+ $info["estimated_cost"] = $responseData["usage"]["estimated_cost"];
+ $info["model"] = $this->modelName;
+ $info["temperature"] = $this->temperature;
+ return ["status" => "OK", "data" => $parsedData, "info" => $info];
+ }
+}
diff --git a/application/libraries/Report.php b/application/libraries/Report.php
new file mode 100644
index 00000000..77e490ca
--- /dev/null
+++ b/application/libraries/Report.php
@@ -0,0 +1,319 @@
+db = $CI->load->database("onedev", true);
+ $this->db_log = $CI->load->database("one_lab_log", true);
+
+ $this->db->trans_begin();
+
+ $sql = "SELECT NonlabTemplateID as template_id,
+ NonlabTemplateName as template_name,
+ T_SamplingSoT_OrderHeaderID as order_header_id,
+ T_OrderDetailID as order_detail_id
+ FROM t_samplingso
+ JOIN t_orderdetail ON T_SamplingSoT_OrderHeaderID = T_OrderDetailT_OrderHeaderID AND T_SamplingSoT_TestID = T_OrderDetailT_TestID AND T_OrderDetailIsActive = 'Y'
+ JOIN t_test ON T_SamplingSoT_TestID = T_TestID
+ JOIN nat_test ON Nat_TestID = T_TestNat_TestID
+ JOIN nonlab_template_mapping ON NonlabTemplateMappingNat_TestID = Nat_TestID AND
+ NonlabTemplateMappingIsActive = 'Y'
+ JOIN nonlab_template ON NonlabTemplateMappingNonlabTemplateID = NonlabTemplateID AND NonlabTemplateIsActive = 'Y'
+ LEFT JOIN so_resultentry ON So_ResultEntryT_OrderDetailID = T_OrderDetailID AND
+ So_ResultEntryT_OrderHeaderID = T_OrderDetailT_OrderHeaderID AND
+ So_ResultEntryIsActive = 'Y'
+ WHERE
+ T_SamplingSoID = ? AND
+ T_SamplingSoIsActive = 'Y' AND
+ So_ResultEntryID IS NULL
+ GROUP BY NonlabTemplateID
+ LIMIT 1";
+ $qry = $this->db->query($sql, array($T_SamplingSOID));
+ //echo $this->db->last_query();
+ if (!$qry) {
+ $dt_log = ['data' => ['id' => $T_SamplingSOID],'error' => $this->db->error()];
+ $prm_log = ['SELECT_NONLAB_TEMPLATE', 'nonlabtemplate/generate'];
+ $xsql = $this->db->last_query();
+ $log_error = $this->insert_log_error($xsql, $prm_log,$dt_log);
+ $this->db->trans_rollback();
+ return array(false, print_r($this->db->error(), true));
+ }
+
+ $row_arr = $qry->row_array();
+ if ($row_arr) {
+ //print_r($row_arr);
+ $template_name = $row_arr['template_name'];
+ if($row_arr['template_name'] == 'Fisik Umum'){
+ $sql = "SELECT FisikTemplateType as xtype
+ FROM fisik_template
+ JOIN t_orderheader ON T_OrderHeaderID = {$row_arr['order_header_id']}
+ JOIN mgm_mcutemplate ON Mgm_McuTemplateMgm_McuID = T_OrderHeaderMgm_McuID
+ JOIN fisik_template_mapping ON Mgm_McuTemplateFisikTemplateMappingID = FisikTemplateMappingID
+ JOIN fisik_template_mapping_detail ON FisikTemplateMappingDetailFisikTemplateMappingID = FisikTemplateMappingID AND
+ FisikTemplateMappingDetailFisikTemplateID = FisikTemplateID AND
+ FisikTemplateMappingDetailIsActive = 'Y'
+ WHERE
+ FisikTemplateIsActive = 'Y'
+ GROUP BY FisikTemplateType";
+ $qry = $this->db->query($sql);
+ //echo $this->db->last_query();
+ if (!$qry) {
+ $dt_log = ['data' => ['id' => $T_SamplingSOID],'error' => $this->db->error()];
+ $prm_log = ['SELECT_FISIK_TEMPLATE', 'nonlabtemplate/generate'];
+ $xsql = $this->db->last_query();
+ $log_error = $this->insert_log_error($xsql, $prm_log,$dt_log);
+ $this->db->trans_rollback();
+ return array(false, print_r($this->db->error(), true));
+ }
+ $arr_types = $qry->result_array();
+ $xtypes = [];
+ foreach ($arr_types as $key => $value) {
+ $xtypes[] = $value['xtype'];
+ }
+
+ $template_name = "Fisik Umum";
+ if(in_array("K3", $xtypes)){
+ $template_name = "Fisik Umum K3";
+ }
+//echo $template_name;
+ }
+
+ $sql = "INSERT INTO so_resultentry(
+ So_ResultEntryT_OrderHeaderID,
+ So_ResultEntryT_OrderDetailID,
+ So_ResultEntryNonlab_TemplateID,
+ So_ResultEntryNonlab_TemplateName,
+ So_ResultEntryCreated
+ )
+ VALUES(?,?,?,?,NOW())";
+ $qry = $this->db->query($sql, array(
+ $row_arr['order_header_id'],
+ $row_arr['order_detail_id'],
+ $row_arr['template_id'],
+ $template_name
+ ));
+ if (!$qry) {
+ $dt_log = ['data' => ['id' => $T_SamplingSOID],'error' => $this->db->error()];
+ $prm_log = ['INSERT_SO_RESULTENTRY', 'nonlabtemplate/generate'];
+ $xsql = $this->db->last_query();
+ $log_error = $this->insert_log_error($xsql, $prm_log,$dt_log);
+ $this->db->trans_rollback();
+ return array(false, print_r($this->db->error(), true));
+ }
+ $soresultentryid = $this->db->insert_id();
+
+ $sql = "SELECT * FROM t_orderheaderlang
+ WHERE
+ T_OrderHeaderLangT_OrderHeaderID = ? AND T_OrderHeaderLangIsActive = 'Y'";
+ $qry = $this->db->query($sql, array(
+ $row_arr['order_header_id']
+ ));
+ if (!$qry) {
+ $dt_log = ['data' => ['id' => $T_SamplingSOID],'error' => $this->db->error()];
+ $prm_log = ['SELECT_ORDER_HEADER_LANG', 'nonlabtemplate/generate'];
+ $xsql = $this->db->last_query();
+ $log_error = $this->insert_log_error($xsql, $prm_log,$dt_log);
+ $this->db->trans_rollback();
+ return array(false, print_r($this->db->error(), true));
+ }
+
+ $order_langs = $qry->result_array();
+ //print_r($order_langs);
+
+ foreach ($order_langs as $k_lang => $val_lang) {
+ $sql = "SELECT *
+ FROM nonlab_template_detail
+ JOIN t_orderheader ON T_OrderHeaderID = ?
+ JOIN m_patient ON T_OrderHeaderM_PatientID = M_PatientID
+ JOIN m_sex ON M_SexID = M_PatientM_SexID AND M_SexIsActive = 'Y' AND
+ ( NonlabTemplateDetailGender = 'all' OR NonlabTemplateDetailGender = M_SexNameLang)
+ WHERE
+ NonlabTemplateDetailNonlabTemplateID = ? AND NonlabTemplateDetailIsActive = 'Y' AND NonlabTemplateDetaiM_LangID = ? ";
+ $qry = $this->db->query($sql, array(
+ $row_arr['order_header_id'],
+ $row_arr['template_id'],
+ $val_lang['T_OrderHeaderLangM_LangID']
+ ));
+ //echo $this->db->last_query();
+ if (!$qry) {
+ $dt_log = ['data' => ['id' => $T_SamplingSOID],'error' => $this->db->error()];
+ $prm_log = ['SELECT_NONLAB_TEMPLATE_DETAIL', 'nonlabtemplate/generate'];
+ $xsql = $this->db->last_query();
+ $log_error = $this->insert_log_error($xsql, $prm_log,$dt_log);
+ $this->db->trans_rollback();
+ return array(false, print_r($this->db->error(), true));
+ }
+
+ $rows_result = $qry->result_array();
+ if($rows_result && count($rows_result) > 0){
+ foreach ($rows_result as $key => $value) {
+ if(intval($val_lang['T_OrderHeaderLangM_LangID']) == 1){
+ $sql = "INSERT INTO so_resultentrydetail (
+ So_ResultEntryDetailSo_ResultEntryID,
+ So_ResultEntryDetailNonlab_TemplateDetailID,
+ So_ResultEntryDetailNonlab_TemplateDetailName,
+ So_ResultEntryDetailCreated
+ )
+ VALUES(?,?,?,NOW())";
+ $qry = $this->db->query($sql, array(
+ $soresultentryid,
+ $value['NonlabTemplateDetailID'],
+ $value['NonlabTemplateDetailName']
+ ));
+ if (!$qry) {
+ $dt_log = ['data' => ['id' => $T_SamplingSOID],'error' => $this->db->error()];
+ $prm_log = ['INSERT_SO_RESULTENTRY_DETAIL', 'nonlabtemplate/generate'];
+ $xsql = $this->db->last_query();
+ $log_error = $this->insert_log_error($xsql, $prm_log,$dt_log);
+ $this->db->trans_rollback();
+ return array(false, print_r($this->db->error(), true));
+ }
+ //echo $this->db->last_query();
+ }
+ }
+ }
+
+
+ }
+
+
+ $this->db->trans_commit();
+
+
+
+ $sql = "SELECT *
+ FROM so_resultentry
+ WHERE
+ So_ResultEntryID = ? ";
+ $qry = $this->db->query($sql, array(
+ $soresultentryid
+ ));
+
+ if (!$qry) {
+ return array(false, print_r($this->db->error(), true));
+ }
+
+ $rows_return = $qry->row_array();
+
+ return $rows_return;
+ } else {
+ return false;
+ }
+ }
+
+ function get_report_by_code($report_code, $params){
+ $sql = "SELECT *
+ FROM print_transaction
+ WHERE
+ Print_TransactionCode = ? ";
+ $qry = $this->db->query($sql, array(
+ $report_code
+ ));
+
+ if (!$qry) {
+ return array(false, print_r($this->db->error(), true));
+ }
+
+ $rows_return = $qry->row_array();
+
+ return $rows_return;
+ }
+
+ function get_report_url_by_code($report_code, $params = array()){
+ $CI = &get_instance();
+ $this->db = $CI->load->database("onedev", true);
+
+ // Get report data by code
+ $report_data = $this->get_report_by_code($report_code, $params);
+
+ if (!$report_data || empty($report_data)) {
+ return array(false, "Report code not found: " . $report_code);
+ }
+
+ // Get URL template
+ $url_template = $report_data['Print_TransactionUrl'];
+
+ if (empty($url_template)) {
+ return array(false, "URL template is empty for report code: " . $report_code);
+ }
+
+ // Replace placeholders with actual parameter values
+ $final_url = $url_template;
+
+ foreach ($params as $param_key => $param_value) {
+ // Determine if value should be quoted (string) or not (numeric)
+ $replacement_value = is_numeric($param_value) ? $param_value : "'" . $param_value . "'";
+
+ // Replace placeholder in URL
+ $final_url = str_replace($param_key, $replacement_value, $final_url);
+ }
+
+ return array(true, $final_url);
+ }
+ /*
+CREATE TABLE `print_transaction` (
+ `Print_TransactionID` int(11) NOT NULL AUTO_INCREMENT,
+ `Print_TransactionType` char(2) NOT NULL DEFAULT 'P' COMMENT 'P (paper), E (Email)',
+ `Print_TransactionCode` varchar(20) NOT NULL DEFAULT '',
+ `Print_TransactionName` varchar(150) NOT NULL DEFAULT '',
+ `Print_TransactionUrl` varchar(500) NOT NULL DEFAULT '',
+ `Print_TransactionParams` varchar(500) NOT NULL DEFAULT '',
+ `Print_TransactionCreated` datetime NOT NULL DEFAULT '0000-00-00 00:00:00',
+ `Print_TransactionCreatedUserID` int(11) NOT NULL DEFAULT 0,
+ `Print_TransactionLastUpdated` datetime NOT NULL DEFAULT '0000-00-00 00:00:00',
+ `Print_TransactionLastUpdatedUserID` int(11) NOT NULL DEFAULT 0,
+ PRIMARY KEY (`Print_TransactionID`)
+) ENGINE=InnoDB DEFAULT CHARSET=latin1;
+
+INSERT INTO `print_transaction` (`Print_TransactionID`, `Print_TransactionType`, `Print_TransactionCode`, `Print_TransactionName`, `Print_TransactionUrl`, `Print_TransactionParams`, `Print_TransactionCreated`, `Print_TransactionCreatedUserID`, `Print_TransactionLastUpdated`, `Print_TransactionLastUpdatedUserID`) VALUES
+(1, 'P', 'LAB-RESULT-P-01', 'Report hasil test lab untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_test.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 09:26:48', 555, '0000-00-00 00:00:00', 0),
+(2, 'P', 'LAB-RESULT-P-02', 'Report hasil test lab untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_test_email.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '0000-00-00 00:00:00', 555, '0000-00-00 00:00:00', 0),
+(3, 'P', 'LAB-RESULT-P-03', 'Report hasil test lab untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_test_prev.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 10:32:54', 555, '0000-00-00 00:00:00', 0),
+(4, 'P', 'LAB-RESULT-NP-01', 'Report hasil test lab tidak untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_test_not_print.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 10:25:02', 555, '0000-00-00 00:00:00', 0),
+(5, 'E', 'LAB-RESULT-NP-02', 'Report hasil test lab tidak untuk email', '/birt/frameset?__report=report/onelab/lab/rpt_test_email_not_print.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 10:25:51', 555, '0000-00-00 00:00:00', 0),
+(6, 'P', 'LAB-RESULT-NP-03', 'Report hasil test lab tidak untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_test_prev_not_print.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 10:25:51', 555, '0000-00-00 00:00:00', 0),
+(7, 'P', 'LABEN-RESULT-P-01', 'Report hasil test lab untuk diprint versi inggris', '/birt/frameset?__report=report/onelab/lab/rpt_test_eng.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 10:32:09', 555, '0000-00-00 00:00:00', 0),
+(8, 'E', 'LABEN-RESULT-P-02', 'Report hasil test lab untuk email versi inggris', '/birt/frameset?__report=report/onelab/lab/rpt_test_email_eng.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 10:34:57', 555, '0000-00-00 00:00:00', 0),
+(9, 'P', 'LABEN-RESULT-P-03', 'Report hasil test lab untuk diprint versi inggris', '/birt/frameset?__report=report/onelab/lab/rpt_test_eng_prev.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 10:34:57', 555, '0000-00-00 00:00:00', 0),
+(10, 'P', 'LABEN-RESULT-NP-01', 'Report hasil test lab tidak untuk diprint versi inggris', '/birt/frameset?__report=report/onelab/lab/rpt_test_not_print_eng.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 10:34:57', 555, '0000-00-00 00:00:00', 0),
+(11, 'P', 'MIKROEN-RESULT-P-01', 'Report hasil test mikro untuk diprint versi inggris', '/birt/frameset?__report=report/onelab/lab/rpt_test_eng.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 10:34:57', 555, '0000-00-00 00:00:00', 0),
+(12, 'E', 'MIKROEN-RESULT-P-02', 'Report hasil test mikro untuk email versi inggris', '/birt/frameset?__report=report/onelab/lab/rpt_test_email_eng.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 10:34:57', 555, '0000-00-00 00:00:00', 0),
+(13, 'P', 'MIKROEN-RESULT-P-03', 'Report hasil test mikro untuk diprint versi inggris', '/birt/frameset?__report=report/onelab/lab/rpt_test_eng_prev.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 10:34:57', 555, '0000-00-00 00:00:00', 0),
+(14, 'P', 'MIKROEN-RESULT-NP-01', 'Report hasil test mikro tidak untuk diprint versi inggris', '/birt/frameset?__report=report/onelab/lab/rpt_test_not_print_eng.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 10:34:57', 555, '0000-00-00 00:00:00', 0),
+(45, 'P', 'PS-RESULT-P-01', 'Report hasil test preparasi sperma untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_sperma.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(46, 'E', 'PS-RESULT-P-02', 'Report hasil test preparasi sperma untuk email', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_sperma_email.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(47, 'P', 'PS-RESULT-NP-01', 'Report hasil test preparasi sperma tidak untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_sperma_not_print.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(48, 'P', 'DFI-RESULT-P-01', 'Report hasil test dfi untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_dfi.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(49, 'E', 'DFI-RESULT-P-02', 'Report hasil test dfi untuk email', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_dfi_email.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(50, 'P', 'DFI-RESULT-NP-01', 'Report hasil test dfi tidak untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_dfi_not_print.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(51, 'P', 'FNA-RESULT-P-01', 'Report hasil test fna untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_fna.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(52, 'E', 'FNA-RESULT-P-02', 'Report hasil test fna untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_fna_email.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(53, 'P', 'FNA-RESULT-NP-01', 'Report hasil test fna tidak untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_fna_not_print.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(54, 'P', 'PA-RESULT-P-01', 'Report hasil test patologi anatomi untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_patologi_anatomy.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(55, 'E', 'PA-RESULT-P-02', 'Report hasil test patologi anatomi untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_patologi_anatomy_email.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(56, 'P', 'PA-RESULT-NP-01', 'Report hasil test patologi anatomi tidak untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_patologi_anatomy_not_print.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(57, 'P', 'PAP-RESULT-P-01', 'Report hasil test pap smear untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_papsmear.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(58, 'E', 'PAP-RESULT-P-02', 'Report hasil test pap smear untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_papsmear_email.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(59, 'P', 'PAP-RESULT-NP-01', 'Report hasil test pap smear tidak untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_papsmear_not_print.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(60, 'P', 'PAPLCP-RESULT-P-01', 'Report hasil test pap smear (liquid c prep) untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_lcprep.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(61, 'E', 'PAPLCP-RESULT-P-02', 'Report hasil test pap smear (liquid c prep) untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_lcprep_email.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(62, 'P', 'PAPLCP-RESULT-NP-01', 'Report hasil test pap smear (liquid c prep) tidak untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_lcprep_not_print.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(63, 'P', 'PAPLEN-RESULT-P-01', 'Report hasil test pap smear (liquid c prep) untuk diprint versi inggris', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_lcprep_eng.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(64, 'E', 'PAPLEN-RESULT-P-02', 'Report hasil test pap smear (liquid c prep) untuk diprint versi inggris', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_lcprep_email_eng.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(65, 'P', 'PAPLEN-RESULT-NP-01', 'Report hasil test pap smear (liquid c prep) tidak untuk diprint versi inggris', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_lcprep_not_print_eng.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(66, 'P', 'MIKRO-RESULT-P-01', 'Report hasil test mikro untuk diprint terlampir', '/birt/frameset?__report=report/onelab/lab/rpt_test_mikro.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(67, 'E', 'MIKRO-RESULT-P-02', 'Report hasil test mikro untuk email terlampir', '/birt/frameset?__report=report/onelab/lab/rpt_test_mikro_email.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(68, 'P', 'MIKRO-RESULT-NP-01', 'Report hasil test mikro tidak untuk diprint terlampir', '/birt/frameset?__report=report/onelab/lab/rpt_test_mikro_not_print.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(69, 'P', 'MIKROO-RESULT-P-01', 'Report hasil test mikro untuk diprint tidak terlampir', '/birt/frameset?__report=report/onelab/lab/rpt_test.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(70, 'E', 'MIKROO-RESULT-P-02', 'Report hasil test mikro untuk email tidak terlampir', '/birt/frameset?__report=report/onelab/lab/rpt_test_email.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(71, 'P', 'MIKROO-RESULT-NP-01', 'Report hasil test mikro untuk tidak diprint tidak terlampir', '/birt/frameset?__report=report/onelab/lab/rpt_test_not_print.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(72, 'P', 'CT-RESULT-P-01', 'Report hasil test citology untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_cytologi.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(73, 'E', 'CT-RESULT-P-02', 'Report hasil test citology untuk email', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_cytologi_email.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(74, 'P', 'CT-RESULT-NP-01', 'Report hasil test citology untuk tidak diprint', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_cytologi_not_print.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0);
+
+-- 2026-02-06 06:35:26
+ */
+}
diff --git a/application/libraries/Reporturl.php b/application/libraries/Reporturl.php
new file mode 100644
index 00000000..88459e66
--- /dev/null
+++ b/application/libraries/Reporturl.php
@@ -0,0 +1,138 @@
+db = $CI->load->database("onedev", true);
+ }
+
+ function get_report_by_code($report_code, $params){
+ $sql = "SELECT *
+ FROM print_transaction
+ WHERE
+ Print_TransactionCode = ? ";
+ $qry = $this->db->query($sql, array(
+ $report_code
+ ));
+
+ if (!$qry) {
+ return array(false, print_r($this->db->error(), true));
+ }
+
+ $rows_return = $qry->row_array();
+
+ return $rows_return;
+ }
+
+ function get_report_url_by_code($report_code, $params = array(), $show='N'){
+ $CI = &get_instance();
+ $this->db = $CI->load->database("onedev", true);
+
+ // Get report data by code
+ $report_data = $this->get_report_by_code($report_code, $params);
+
+ if (!$report_data || empty($report_data)) {
+ return array(false, "Report code not found: " . $report_code);
+ }
+
+ // Get URL template
+ $url_template = $report_data['Print_TransactionUrl'];
+
+ if (empty($url_template)) {
+ return array(false, "URL template is empty for report code: " . $report_code);
+ }
+
+ // Replace placeholders with actual parameter values
+ $final_url = $url_template;
+
+ foreach ($params as $param_key => $param_value) {
+ // Determine if value should be quoted (string) or not (numeric)
+ $replacement_value = is_numeric($param_value) ? $param_value : "'" . $param_value . "'";
+
+ // Replace placeholder in URL
+ $final_url = str_replace($param_key, $replacement_value, $final_url);
+ }
+
+ if($show == 'N'){
+ return array(true, $final_url);
+ }
+ else{
+ $final_url = 'http'.($_SERVER['HTTPS'] == 'on' ? 's' : '').'://'.$_SERVER['HTTP_HOST'].$final_url;
+
+ $response = file_get_contents($final_url);
+ header("Content-type: application/pdf");
+ header(
+ 'Content-Disposition: inline; filename="' .
+ $output_file_name .
+ '"'
+ );
+ echo ($response);
+ }
+
+ }
+ /*
+CREATE TABLE `print_transaction` (
+ `Print_TransactionID` int(11) NOT NULL AUTO_INCREMENT,
+ `Print_TransactionType` char(2) NOT NULL DEFAULT 'P' COMMENT 'P (paper), E (Email)',
+ `Print_TransactionCode` varchar(20) NOT NULL DEFAULT '',
+ `Print_TransactionName` varchar(150) NOT NULL DEFAULT '',
+ `Print_TransactionUrl` varchar(500) NOT NULL DEFAULT '',
+ `Print_TransactionParams` varchar(500) NOT NULL DEFAULT '',
+ `Print_TransactionCreated` datetime NOT NULL DEFAULT '0000-00-00 00:00:00',
+ `Print_TransactionCreatedUserID` int(11) NOT NULL DEFAULT 0,
+ `Print_TransactionLastUpdated` datetime NOT NULL DEFAULT '0000-00-00 00:00:00',
+ `Print_TransactionLastUpdatedUserID` int(11) NOT NULL DEFAULT 0,
+ PRIMARY KEY (`Print_TransactionID`)
+) ENGINE=InnoDB DEFAULT CHARSET=latin1;
+
+INSERT INTO `print_transaction` (`Print_TransactionID`, `Print_TransactionType`, `Print_TransactionCode`, `Print_TransactionName`, `Print_TransactionUrl`, `Print_TransactionParams`, `Print_TransactionCreated`, `Print_TransactionCreatedUserID`, `Print_TransactionLastUpdated`, `Print_TransactionLastUpdatedUserID`) VALUES
+(1, 'P', 'LAB-RESULT-P-01', 'Report hasil test lab untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_test.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 09:26:48', 555, '0000-00-00 00:00:00', 0),
+(2, 'P', 'LAB-RESULT-P-02', 'Report hasil test lab untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_test_email.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '0000-00-00 00:00:00', 555, '0000-00-00 00:00:00', 0),
+(3, 'P', 'LAB-RESULT-P-03', 'Report hasil test lab untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_test_prev.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 10:32:54', 555, '0000-00-00 00:00:00', 0),
+(4, 'P', 'LAB-RESULT-NP-01', 'Report hasil test lab tidak untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_test_not_print.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 10:25:02', 555, '0000-00-00 00:00:00', 0),
+(5, 'E', 'LAB-RESULT-NP-02', 'Report hasil test lab tidak untuk email', '/birt/frameset?__report=report/onelab/lab/rpt_test_email_not_print.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 10:25:51', 555, '0000-00-00 00:00:00', 0),
+(6, 'P', 'LAB-RESULT-NP-03', 'Report hasil test lab tidak untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_test_prev_not_print.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 10:25:51', 555, '0000-00-00 00:00:00', 0),
+(7, 'P', 'LABEN-RESULT-P-01', 'Report hasil test lab untuk diprint versi inggris', '/birt/frameset?__report=report/onelab/lab/rpt_test_eng.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 10:32:09', 555, '0000-00-00 00:00:00', 0),
+(8, 'E', 'LABEN-RESULT-P-02', 'Report hasil test lab untuk email versi inggris', '/birt/frameset?__report=report/onelab/lab/rpt_test_email_eng.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 10:34:57', 555, '0000-00-00 00:00:00', 0),
+(9, 'P', 'LABEN-RESULT-P-03', 'Report hasil test lab untuk diprint versi inggris', '/birt/frameset?__report=report/onelab/lab/rpt_test_eng_prev.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 10:34:57', 555, '0000-00-00 00:00:00', 0),
+(10, 'P', 'LABEN-RESULT-NP-01', 'Report hasil test lab tidak untuk diprint versi inggris', '/birt/frameset?__report=report/onelab/lab/rpt_test_not_print_eng.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 10:34:57', 555, '0000-00-00 00:00:00', 0),
+(11, 'P', 'MIKROEN-RESULT-P-01', 'Report hasil test mikro untuk diprint versi inggris', '/birt/frameset?__report=report/onelab/lab/rpt_test_eng.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 10:34:57', 555, '0000-00-00 00:00:00', 0),
+(12, 'E', 'MIKROEN-RESULT-P-02', 'Report hasil test mikro untuk email versi inggris', '/birt/frameset?__report=report/onelab/lab/rpt_test_email_eng.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 10:34:57', 555, '0000-00-00 00:00:00', 0),
+(13, 'P', 'MIKROEN-RESULT-P-03', 'Report hasil test mikro untuk diprint versi inggris', '/birt/frameset?__report=report/onelab/lab/rpt_test_eng_prev.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 10:34:57', 555, '0000-00-00 00:00:00', 0),
+(14, 'P', 'MIKROEN-RESULT-NP-01', 'Report hasil test mikro tidak untuk diprint versi inggris', '/birt/frameset?__report=report/onelab/lab/rpt_test_not_print_eng.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 10:34:57', 555, '0000-00-00 00:00:00', 0),
+(45, 'P', 'PS-RESULT-P-01', 'Report hasil test preparasi sperma untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_sperma.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(46, 'E', 'PS-RESULT-P-02', 'Report hasil test preparasi sperma untuk email', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_sperma_email.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(47, 'P', 'PS-RESULT-NP-01', 'Report hasil test preparasi sperma tidak untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_sperma_not_print.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(48, 'P', 'DFI-RESULT-P-01', 'Report hasil test dfi untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_dfi.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(49, 'E', 'DFI-RESULT-P-02', 'Report hasil test dfi untuk email', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_dfi_email.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(50, 'P', 'DFI-RESULT-NP-01', 'Report hasil test dfi tidak untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_dfi_not_print.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(51, 'P', 'FNA-RESULT-P-01', 'Report hasil test fna untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_fna.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(52, 'E', 'FNA-RESULT-P-02', 'Report hasil test fna untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_fna_email.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(53, 'P', 'FNA-RESULT-NP-01', 'Report hasil test fna tidak untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_fna_not_print.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(54, 'P', 'PA-RESULT-P-01', 'Report hasil test patologi anatomi untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_patologi_anatomy.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(55, 'E', 'PA-RESULT-P-02', 'Report hasil test patologi anatomi untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_patologi_anatomy_email.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(56, 'P', 'PA-RESULT-NP-01', 'Report hasil test patologi anatomi tidak untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_patologi_anatomy_not_print.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(57, 'P', 'PAP-RESULT-P-01', 'Report hasil test pap smear untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_papsmear.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(58, 'E', 'PAP-RESULT-P-02', 'Report hasil test pap smear untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_papsmear_email.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(59, 'P', 'PAP-RESULT-NP-01', 'Report hasil test pap smear tidak untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_papsmear_not_print.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(60, 'P', 'PAPLCP-RESULT-P-01', 'Report hasil test pap smear (liquid c prep) untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_lcprep.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(61, 'E', 'PAPLCP-RESULT-P-02', 'Report hasil test pap smear (liquid c prep) untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_lcprep_email.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(62, 'P', 'PAPLCP-RESULT-NP-01', 'Report hasil test pap smear (liquid c prep) tidak untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_lcprep_not_print.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(63, 'P', 'PAPLEN-RESULT-P-01', 'Report hasil test pap smear (liquid c prep) untuk diprint versi inggris', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_lcprep_eng.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(64, 'E', 'PAPLEN-RESULT-P-02', 'Report hasil test pap smear (liquid c prep) untuk diprint versi inggris', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_lcprep_email_eng.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(65, 'P', 'PAPLEN-RESULT-NP-01', 'Report hasil test pap smear (liquid c prep) tidak untuk diprint versi inggris', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_lcprep_not_print_eng.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(66, 'P', 'MIKRO-RESULT-P-01', 'Report hasil test mikro untuk diprint terlampir', '/birt/frameset?__report=report/onelab/lab/rpt_test_mikro.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(67, 'E', 'MIKRO-RESULT-P-02', 'Report hasil test mikro untuk email terlampir', '/birt/frameset?__report=report/onelab/lab/rpt_test_mikro_email.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(68, 'P', 'MIKRO-RESULT-NP-01', 'Report hasil test mikro tidak untuk diprint terlampir', '/birt/frameset?__report=report/onelab/lab/rpt_test_mikro_not_print.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(69, 'P', 'MIKROO-RESULT-P-01', 'Report hasil test mikro untuk diprint tidak terlampir', '/birt/frameset?__report=report/onelab/lab/rpt_test.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(70, 'E', 'MIKROO-RESULT-P-02', 'Report hasil test mikro untuk email tidak terlampir', '/birt/frameset?__report=report/onelab/lab/rpt_test_email.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(71, 'P', 'MIKROO-RESULT-NP-01', 'Report hasil test mikro untuk tidak diprint tidak terlampir', '/birt/frameset?__report=report/onelab/lab/rpt_test_not_print.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(72, 'P', 'CT-RESULT-P-01', 'Report hasil test citology untuk diprint', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_cytologi.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(73, 'E', 'CT-RESULT-P-02', 'Report hasil test citology untuk email', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_cytologi_email.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0),
+(74, 'P', 'CT-RESULT-NP-01', 'Report hasil test citology untuk tidak diprint', '/birt/frameset?__report=report/onelab/lab/rpt_hasil_cytologi_not_print.rptdesign&__format=pdf&username=PUsername&PID=PT_OrderHeaderID&tm=TS', 'PUsername,PT_OrderHeaderID,TS', '2026-02-06 11:24:51', 555, '0000-00-00 00:00:00', 0);
+
+-- 2026-02-06 06:35:26
+ */
+}
diff --git a/application/libraries/Resultcalc-bkp.php b/application/libraries/Resultcalc-bkp.php
new file mode 100644
index 00000000..c7680ee4
--- /dev/null
+++ b/application/libraries/Resultcalc-bkp.php
@@ -0,0 +1,113 @@
+db = $CI->load->database("onedev",true);
+ $sql = "select
+ T_TestCalculationID,T_TestCalculationFormula,
+ T_OrderDetailID, T_OrderDetailT_TestID, T_TestNat_TestID Nat_TestID,
+ T_TestCalculationID,T_OrderDetailResult,
+ fn_global_age_count_day(M_PatientDOB, date(T_OrderHeaderDate)) / 365 AgeInYear,
+ T_TestCalculationNat_SexID
+ from t_orderdetail
+ join t_orderheader on T_OrderDetailT_OrderHeaderID = T_OrderHeaderID
+ and T_OrderHeaderID = ?
+ join m_patient on T_OrderHeaderM_PatientID = M_PatientID
+ join t_test on T_OrderDetailT_TestID = T_TestID
+ and T_OrderDetailIsActive = 'Y' and T_TestIsActive = 'Y'
+ join t_testcalculation on T_TestNat_TestID = T_TestCalculationNat_TestID
+ and T_TestCalculationIsActive = 'Y'
+ and (
+ T_TestCalculationNat_SexID = M_PatientM_SexID
+ or
+ T_TestCalculationNat_SexID = 0
+ )
+ ";
+
+ $sql_det = "select T_TestCalculationDetailCode, T_OrderDetailResult
+ from
+ t_testcalculation_detail td
+ join t_testcalculation on T_TestCalculationID = T_TestCalculationDetailT_TestCalculationID
+ and T_TestCalculationID = ?
+ join t_test t on td.T_TestCalculationDetailNat_TestID = T_TestNat_TestID
+ left join t_orderdetail on T_TestID = T_OrderDetailT_TestID and T_OrderDetailIsActive = 'Y'
+ and T_OrderDetailT_OrderHeaderID = ?
+ where T_OrderDetailID is not null";
+
+
+ $qry = $this->db->query($sql, array($id));
+ $rows = $qry->result_array();
+
+ if ( count($rows) > 0 ) {
+ foreach($rows as $r) {
+ $tc_id = $r["T_TestCalculationID"];
+ $formula = $r["T_TestCalculationFormula"];
+ $qry_det = $this->db->query($sql_det, array($tc_id, $id));
+ $drows = $qry_det->result_array();
+ $have_all = true;
+ $have_one = false;
+ $formula = str_replace("AGE",$r["AgeInYear"], $formula);
+ $flag_recursive = false;
+ if (strpos($formula,"[REC]") > -1 ) {
+ $flag_recursive = true;
+ }
+ if ( ! $flag_recursive ) {
+ if( trim($r["T_OrderDetailResult"]) != "") continue;
+ }
+
+ $formula = str_replace("[REC]","", $formula);
+ foreach($drows as $dr) {
+ $code = $dr["T_TestCalculationDetailCode"];
+ $value = $dr["T_OrderDetailResult"];
+ if($dr["T_OrderDetailResult"] == "" ) {
+ $have_all = false;
+ break;
+ }
+ $have_one = true;
+ $formula = str_replace($code, $value,$formula);
+ }
+ if ($have_all && $have_one) {
+
+ eval("\$f_value = $formula;");
+ //formating
+ //echo "\n$f_value ..";
+ //file_put_contents("/xtmp/formula",$f_value. "\n",FILE_APPEND);
+ if (is_numeric($f_value)) {
+ $f_value = $this->format_value($f_value,$r["Nat_TestID"]);
+ }
+ //file_put_contents("/xtmp/formula",$f_value. "\n",FILE_APPEND);
+ $od_id = $r["T_OrderDetailID"];
+ $sql = "update t_orderdetail set T_OrderDetailResult = ?
+ where T_OrderDetailID = ?";
+ $this->db->query($sql, array($f_value,$od_id));
+ }
+ }
+ }
+ }
+ function format_value($f_value, $nat_test_id){
+ $CI =& get_instance();
+ $this->db = $CI->load->database("onedev",true);
+ $sql = "select * from m_instrumentmethode
+ where M_InstrumentMethodeIsActive = 'Y'
+ and M_InstrumentMethodeNat_TestID = ?
+ limit 0,1";
+ $qry = $this->db->query($sql, array($nat_test_id) );
+ if ($qry) {
+ $rows = $qry->result_array();
+ if (count($rows) > 0 ) {
+ if ($f_value > 0 ) {
+ $fmt = $rows[0]["M_InstrumentMethodeResultFormatAboveSF"];
+ } else {
+ $fmt = $rows[0]["M_InstrumentMethodeResultFormatSF"];
+ }
+ $idx = strpos($fmt,".");
+ $dec = strlen($fmt) - $idx;
+ if ($dec > 0 ) $dec = $dec -1;
+ return number_format($f_value,$dec);
+ }
+ }
+ return number_format($f_value,0,".",",");
+ }
+}
diff --git a/application/libraries/Resultcalc-new.php b/application/libraries/Resultcalc-new.php
new file mode 100644
index 00000000..d21256d0
--- /dev/null
+++ b/application/libraries/Resultcalc-new.php
@@ -0,0 +1,107 @@
+db = $CI->load->database("onedev",true);
+ $sql = "select
+ T_TestCalculationID,T_TestCalculationFormula,
+ T_OrderDetailID, T_OrderDetailT_TestID, T_TestNat_TestID Nat_TestID,
+ T_TestCalculationID,T_OrderDetailResult,
+ fn_global_age_count_day(M_PatientDOB, date(T_OrderHeaderDate)) / 365 AgeInYear,
+ T_TestCalculationNat_SexID
+ from t_orderdetail
+ join t_orderheader on T_OrderDetailT_OrderHeaderID = T_OrderHeaderID
+ and T_OrderHeaderID = ?
+ join m_patient on T_OrderHeaderM_PatientID = M_PatientID
+ join t_test on T_OrderDetailT_TestID = T_TestID
+ and T_OrderDetailIsActive = 'Y' and T_TestIsActive = 'Y'
+ join t_testcalculation on T_TestNat_TestID = T_TestCalculationNat_TestID
+ and T_TestCalculationIsActive = 'Y'
+ and (
+ T_TestCalculationNat_SexID = M_PatientM_SexID
+ or
+ T_TestCalculationNat_SexID = 0
+ )
+ ";
+
+ $sql_det = "select T_TestCalculationDetailCode, T_OrderDetailResult
+ from
+ t_testcalculation_detail td
+ join t_testcalculation on T_TestCalculationID = T_TestCalculationDetailT_TestCalculationID
+ and T_TestCalculationID = ?
+ join t_test t on td.T_TestCalculationDetailNat_TestID = T_TestNat_TestID
+ left join t_orderdetail on T_TestID = T_OrderDetailT_TestID and T_OrderDetailIsActive = 'Y'
+ and T_OrderDetailT_OrderHeaderID = ?
+ where T_OrderDetailID is not null";
+
+
+ $qry = $this->db->query($sql, array($id));
+ $rows = $qry->result_array();
+ if ( count($rows) > 0 ) {
+ foreach($rows as $r) {
+ $tc_id = $r["T_TestCalculationID"];
+ $qry_det = $this->db->query($sql_det, array($tc_id, $id));
+ $drows = $qry_det->result_array();
+ $formula = $r["T_TestCalculationFormula"];
+ $have_all = true;
+ $have_one = false;
+ $formula = str_replace("AGE",$r["AgeInYear"], $formula);
+ $flag_recursive = false;
+ if (strpos($formula,"[REC]") > -1 ) {
+ $flag_recursive = true;
+ }
+ if ( ! $flag_recursive ) {
+ if( $r["T_OrderDetailResult"] != "") continue;
+ }
+ $formula = str_replace("[REC]","", $formula);
+ foreach($drows as $dr) {
+ if($dr["T_OrderDetailResult"] == "" ) {
+ $have_all = false;
+ break;
+ }
+ $have_one = true;
+ $code = $dr["T_TestCalculationDetailCode"];
+ $value = $dr["T_OrderDetailResult"];
+ $formula = str_replace($code, $value,$formula);
+ }
+ if ($have_all && $have_one) {
+
+ eval("\$f_value = $formula;");
+ file_put_contents("/xtmp/formula",$formula . "\n",FILE_APPEND);
+ //formating
+ $f_value = $this->format_value($f_value,$r["Nat_TestID"]);
+ $od_id = $r["T_OrderDetailID"];
+ $sql = "update t_orderdetail set T_OrderDetailResult = ?
+ where T_OrderDetailID = ?";
+ $this->db->query($sql, array($f_value,$od_id));
+ }
+ }
+ }
+ }
+ function format_value($f_value, $nat_test_id){
+ $CI =& get_instance();
+ $this->db = $CI->load->database("onedev",true);
+ $sql = "select * from m_instrumentmethode
+ where M_InstrumentMethodeIsActive = 'Y'
+ and M_InstrumentMethodeNat_TestID = ?
+ limit 0,1";
+ $qry = $this->db->query($sql, array($nat_test_id) );
+ if ($qry) {
+ $rows = $qry->result_array();
+ if (count($rows) > 0 ) {
+ if ($f_value > 0 ) {
+ $fmt = $rows[0]["M_InstrumentMethodeResultFormatAboveSF"];
+ } else {
+ $fmt = $rows[0]["M_InstrumentMethodeResultFormatSF"];
+ }
+ $idx = strpos($fmt,".");
+ $dec = strlen($fmt) - $idx;
+ if ($dec > 0 ) $dec = $dec -1;
+ return number_format($f_value,$dec);
+ }
+ }
+ return number_format($f_value,0,".",",");
+ }
+}
diff --git a/application/libraries/Resultcalc-riau.php b/application/libraries/Resultcalc-riau.php
new file mode 100644
index 00000000..fc7f8bb0
--- /dev/null
+++ b/application/libraries/Resultcalc-riau.php
@@ -0,0 +1,110 @@
+db = $CI->load->database("onedev",true);
+ $sql = "select
+ T_TestCalculationID,T_TestCalculationFormula,
+ T_OrderDetailID, T_OrderDetailT_TestID, T_TestNat_TestID Nat_TestID,
+ T_TestCalculationID,T_OrderDetailResult,
+ fn_global_age_count_day(M_PatientDOB, date(T_OrderHeaderDate)) / 365 AgeInYear,
+ T_TestCalculationNat_SexID
+ from t_orderdetail
+ join t_orderheader on T_OrderDetailT_OrderHeaderID = T_OrderHeaderID
+ and T_OrderHeaderID = ?
+ join m_patient on T_OrderHeaderM_PatientID = M_PatientID
+ join t_test on T_OrderDetailT_TestID = T_TestID
+ and T_OrderDetailIsActive = 'Y' and T_TestIsActive = 'Y'
+ join t_testcalculation on T_TestNat_TestID = T_TestCalculationNat_TestID
+ and T_TestCalculationIsActive = 'Y'
+ and (
+ T_TestCalculationNat_SexID = M_PatientM_SexID
+ or
+ T_TestCalculationNat_SexID = 0
+ )
+ ";
+
+ $sql_det = "select T_TestCalculationDetailCode, T_OrderDetailResult
+ from
+ t_testcalculation_detail td
+ join t_testcalculation on T_TestCalculationID = T_TestCalculationDetailT_TestCalculationID
+ and T_TestCalculationID = ?
+ join t_test t on td.T_TestCalculationDetailNat_TestID = T_TestNat_TestID
+ left join t_orderdetail on T_TestID = T_OrderDetailT_TestID and T_OrderDetailIsActive = 'Y'
+ and T_OrderDetailT_OrderHeaderID = ?
+ where T_OrderDetailID is not null";
+
+
+ $qry = $this->db->query($sql, array($id));
+ $rows = $qry->result_array();
+ if ( count($rows) > 0 ) {
+ foreach($rows as $r) {
+ $tc_id = $r["T_TestCalculationID"];
+ $qry_det = $this->db->query($sql_det, array($tc_id, $id));
+ $drows = $qry_det->result_array();
+ $formula = $r["T_TestCalculationFormula"];
+ $have_all = true;
+ $have_one = false;
+ $formula = str_replace("AGE",$r["AgeInYear"], $formula);
+ $flag_recursive = false;
+ if (strpos($formula,"[REC]") > -1 ) {
+ $flag_recursive = true;
+ }
+ //echo "$formula " . $r["T_OrderDetailResult"] . "\n";
+ if ( ! $flag_recursive ) {
+ if( trim($r["T_OrderDetailResult"]) != "") continue;
+ }
+
+ $formula = str_replace("[REC]","", $formula);
+ foreach($drows as $dr) {
+ $code = $dr["T_TestCalculationDetailCode"];
+ $value = $dr["T_OrderDetailResult"];
+ //echo "$code , $value , $formula \n";
+ if($dr["T_OrderDetailResult"] == "" ) {
+ $have_all = false;
+ break;
+ }
+ $have_one = true;
+ $formula = str_replace($code, $value,$formula);
+ }
+ if ($have_all && $have_one) {
+
+ eval("\$f_value = $formula;");
+ //formating
+ //echo "\n$f_value ..";
+ $f_value = $this->format_value($f_value,$r["Nat_TestID"]);
+ $od_id = $r["T_OrderDetailID"];
+ $sql = "update t_orderdetail set T_OrderDetailResult = ?
+ where T_OrderDetailID = ?";
+ $this->db->query($sql, array($f_value,$od_id));
+ }
+ }
+ }
+ }
+ function format_value($f_value, $nat_test_id){
+ $CI =& get_instance();
+ $this->db = $CI->load->database("onedev",true);
+ $sql = "select * from m_instrumentmethode
+ where M_InstrumentMethodeIsActive = 'Y'
+ and M_InstrumentMethodeNat_TestID = ?
+ limit 0,1";
+ $qry = $this->db->query($sql, array($nat_test_id) );
+ if ($qry) {
+ $rows = $qry->result_array();
+ if (count($rows) > 0 ) {
+ if ($f_value > 0 ) {
+ $fmt = $rows[0]["M_InstrumentMethodeResultFormatAboveSF"];
+ } else {
+ $fmt = $rows[0]["M_InstrumentMethodeResultFormatSF"];
+ }
+ $idx = strpos($fmt,".");
+ $dec = strlen($fmt) - $idx;
+ if ($dec > 0 ) $dec = $dec -1;
+ return number_format($f_value,$dec);
+ }
+ }
+ return number_format($f_value,0,".",",");
+ }
+}
diff --git a/application/libraries/Resultcalc.php b/application/libraries/Resultcalc.php
new file mode 100644
index 00000000..7205eefd
--- /dev/null
+++ b/application/libraries/Resultcalc.php
@@ -0,0 +1,175 @@
+db = $CI->load->database("onedev", true);
+ $sql = "select
+ T_TestCalculationID,T_TestCalculationFormula,
+ T_OrderDetailID, T_OrderDetailT_TestID, T_TestNat_TestID Nat_TestID,
+ T_TestCalculationID,T_OrderDetailResult,
+ fn_global_age_count_day(M_PatientDOB, date(T_OrderHeaderDate)) / 365 AgeInYear,
+ T_TestCalculationNat_SexID,
+ T_OrderDetailT_TestName
+ from t_orderdetail
+ join t_orderheader on T_OrderDetailT_OrderHeaderID = T_OrderHeaderID
+ and T_OrderHeaderID = ?
+ join m_patient on T_OrderHeaderM_PatientID = M_PatientID
+ join t_test on T_OrderDetailT_TestID = T_TestID
+ and T_OrderDetailIsActive = 'Y' and T_TestIsActive = 'Y'
+ join t_testcalculation on T_TestNat_TestID = T_TestCalculationNat_TestID
+ and T_TestCalculationIsActive = 'Y'
+ and (
+ T_TestCalculationNat_SexID = M_PatientM_SexID
+ or
+ T_TestCalculationNat_SexID = 0
+ )
+ ";
+
+ $sql_det = "select T_OrderDetailT_TestName, T_TestCalculationDetailCode, T_OrderDetailResult
+ from
+ t_testcalculation_detail td
+ join t_testcalculation on T_TestCalculationID = T_TestCalculationDetailT_TestCalculationID
+ and T_TestCalculationID = ? and T_TestCalculationDetailIsActive = 'Y'
+ join t_test t on td.T_TestCalculationDetailNat_TestID = T_TestNat_TestID
+ left join t_orderdetail on T_TestID = T_OrderDetailT_TestID and T_OrderDetailIsActive = 'Y'
+ and T_OrderDetailT_OrderHeaderID = ?
+ Order by T_TestCalculationDetailCode,T_OrderDetailResult desc";
+ //where T_OrderDetailID is not null";
+
+
+ $qry = $this->db->query($sql, array($id));
+ $date = date("Y-m-d H:i:s");
+ //file_put_contents("/xtmp/debug-calc.log", "$date : {$this->db->last_query()} \n");
+ $rows = $qry->result_array();
+ if ($debug != "") {
+ print_r($rows);
+ }
+
+ if (count($rows) > 0) {
+ foreach ($rows as $r) {
+ $tc_id = $r["T_TestCalculationID"];
+ $qry_det = $this->db->query($sql_det, array($tc_id, $id));
+ $drows = $qry_det->result_array();
+ $formula = $r["T_TestCalculationFormula"];
+ $have_all = true;
+ $have_one = false;
+ $formula = str_replace("AGE", $r["AgeInYear"], $formula);
+ $flag_recursive = false;
+ if (strpos($formula, "[REC]") > -1) {
+ $flag_recursive = true;
+ }
+ if (!$flag_recursive) {
+ if (trim($r["T_OrderDetailResult"]) != "") continue;
+ }
+
+ $formula = str_replace("[REC]", "", $formula);
+ $org_formula = $formula;
+ $s_code_value = "";
+ $tc_name = $r["T_OrderDetailT_TestName"];
+
+ $arr_code = array();
+
+ $arr_param = [];
+ foreach ($drows as $dr) {
+ $code = $dr["T_TestCalculationDetailCode"];
+ $value = $dr["T_OrderDetailResult"];
+ $s_code_value .= "^$code=$value";
+ $arr_param[] = $code;
+ if (isset($arr_code[$code])) continue;
+ $arr_code[$code] = "exist";
+ if ($dr["T_OrderDetailResult"] == "" || $dr["T_OrderDetailResult"] == "-") {
+ $have_all = false;
+ break;
+ }
+ $arr_code[$code] = $value;
+ $have_one = true;
+ $formula = str_replace($code, $value, $formula);
+ }
+ $have_all = true;
+ if (count($arr_param) == 0) $have_all = false;
+ foreach($arr_param as $p) {
+ if ($debug != "") {
+ echo "code $p : ";
+ }
+ if (!isset($arr_code[$p])) {
+ if ($debug != "") {
+ echo "not exists \n";
+ }
+ $have_all = false;
+ break;
+ } else {
+ if ($arr_code[$p] == "exist") {
+ $have_all = false;
+ }
+ if ($debug != "") {
+ echo "exists : {$arr_code[$p]} \n";
+ }
+ }
+ }
+ if ($debug != "") {
+ echo "$formula " . $r["T_OrderDetailResult"] . "\n";
+ echo "-- have one : " . $have_one ? "Y" : "N";
+ echo "\n";
+ echo "-- have all : " . $have_all ? "Y" : "N";
+ echo "\n";
+ }
+ if ($have_all && $have_one) {
+
+ $date = date("Y-m-d H:i:s");
+ try {
+ // file_put_contents("/xtmp/debug-calc.log", "$date : $tc_name => \$f_value = $formula; \n");
+ // file_put_contents("/xtmp/debug-calc.log", "$date : Formula : $org_formula\n",FILE_APPEND);
+ // file_put_contents("/xtmp/debug-calc.log", print_r($drows,true),FILE_APPEND);
+
+ eval("\$f_value = $formula;");
+ //formating
+ $f_value = $this->format_value($f_value, $r["Nat_TestID"]);
+ if (is_numeric($f_value)) {
+ $f_value = $this->format_value($f_value, $r["Nat_TestID"]);
+ }
+ $od_id = $r["T_OrderDetailID"];
+ $sql = "update t_orderdetail set T_OrderDetailResult = ?
+ where T_OrderDetailID = ?";
+ $this->db->query($sql, array($f_value, $od_id));
+
+ if ($tc_id == 2) {
+ $sql = "insert into t_order_calc(T_OrderCalcT_OrderDetailID,
+ T_OrderCalcFormula,T_OrderCalcResult) values(?,?,?)";
+ $this->db->query($sql, array($od_id, $formula . " | " . $s_code_value, $f_value));
+ }
+ } catch (Exception $e) {
+ //print_r($e);
+ }
+ }
+ }
+ }
+ }
+ function format_value($f_value, $nat_test_id)
+ {
+ $CI = &get_instance();
+ $this->db = $CI->load->database("onedev", true);
+ $sql = "select * from m_instrumentmethode
+ where M_InstrumentMethodeIsActive = 'Y'
+ and M_InstrumentMethodeNat_TestID = ?
+ limit 0,1";
+ $qry = $this->db->query($sql, array($nat_test_id));
+ if ($qry) {
+ $rows = $qry->result_array();
+ if (count($rows) > 0) {
+ if ($f_value > 0) {
+ $fmt = $rows[0]["M_InstrumentMethodeResultFormatAboveSF"];
+ } else {
+ $fmt = $rows[0]["M_InstrumentMethodeResultFormatSF"];
+ }
+ $idx = strpos($fmt, ".");
+ $dec = strlen($fmt) - $idx;
+ if ($dec > 0) $dec = $dec - 1;
+ return number_format($f_value, $dec);
+ }
+ }
+ return number_format($f_value, 0, ".", ",");
+ }
+}
diff --git a/application/libraries/Resultcalcv2.php b/application/libraries/Resultcalcv2.php
new file mode 100644
index 00000000..e36d34c1
--- /dev/null
+++ b/application/libraries/Resultcalcv2.php
@@ -0,0 +1,116 @@
+db = $CI->load->database("onedev",true);
+ $sql = "select
+ T_TestCalculationID,T_TestCalculationFormula,
+ T_OrderDetailID, T_OrderDetailT_TestID, T_TestNat_TestID Nat_TestID,
+ T_TestCalculationID,T_OrderDetailResult,
+ fn_global_age_count_day(M_PatientDOB, date(T_OrderHeaderDate)) / 365 AgeInYear,
+ T_TestCalculationNat_SexID
+ from t_orderdetail
+ join t_orderheader on T_OrderDetailT_OrderHeaderID = T_OrderHeaderID
+ and T_OrderHeaderID = ?
+ join m_patient on T_OrderHeaderM_PatientID = M_PatientID
+ join t_test on T_OrderDetailT_TestID = T_TestID
+ and T_OrderDetailIsActive = 'Y' and T_TestIsActive = 'Y'
+ join t_testcalculation on T_TestNat_TestID = T_TestCalculationNat_TestID
+ and T_TestCalculationIsActive = 'Y'
+ and (
+ T_TestCalculationNat_SexID = M_PatientM_SexID
+ or
+ T_TestCalculationNat_SexID = 0
+ )
+ ";
+
+ $sql_det = "select T_TestCalculationDetailCode, T_OrderDetailResult
+ from
+ t_testcalculation_detail td
+ join t_testcalculation on T_TestCalculationID = T_TestCalculationDetailT_TestCalculationID
+ and T_TestCalculationID = ?
+ join t_test t on td.T_TestCalculationDetailNat_TestID = T_TestNat_TestID
+ left join t_orderdetail on T_TestID = T_OrderDetailT_TestID and T_OrderDetailIsActive = 'Y'
+ and T_OrderDetailT_OrderHeaderID = ?
+ where T_OrderDetailID is not null";
+
+
+ $qry = $this->db->query($sql, array($id));
+ $rows = $qry->result_array();
+ if ( count($rows) > 0 ) {
+ foreach($rows as $r) {
+ $tc_id = $r["T_TestCalculationID"];
+ $qry_det = $this->db->query($sql_det, array($tc_id, $id));
+ $drows = $qry_det->result_array();
+ $formula = $r["T_TestCalculationFormula"];
+ $have_all = true;
+ $have_one = false;
+ $formula = str_replace("AGE",$r["AgeInYear"], $formula);
+ $flag_recursive = false;
+ if (strpos($formula,"[REC]") > -1 ) {
+ $flag_recursive = true;
+ }
+ echo "$formula " . $r["T_OrderDetailResult"] . "\n";
+ if ( ! $flag_recursive ) {
+ if( trim($r["T_OrderDetailResult"]) != "") continue;
+ }
+
+ $formula = str_replace("[REC]","", $formula);
+ foreach($drows as $dr) {
+ $code = $dr["T_TestCalculationDetailCode"];
+ $value = $dr["T_OrderDetailResult"];
+ echo "$code , $value , $formula \n";
+ if($dr["T_OrderDetailResult"] == "" ) {
+ $have_all = false;
+ break;
+ }
+ $have_one = true;
+ $formula = str_replace($code, $value,$formula);
+ }
+ if ($have_all && $have_one) {
+
+ eval("\$f_value = $formula;");
+ //formating
+ echo "\n$f_value ..";
+ $f_value = $this->format_value($f_value,$r["Nat_TestID"]);
+ if (is_numeric($f_value)) {
+ $f_value = $this->format_value($f_value,$r["Nat_TestID"]);
+ }
+ $od_id = $r["T_OrderDetailID"];
+ $sql = "update t_orderdetail set T_OrderDetailResult = ?
+ where T_OrderDetailID = ?";
+ $this->db->query($sql, array($f_value,$od_id));
+ $sql = "insert into t_order_calc(T_OrderCalcT_OrderDetailID,
+ T_OrderCalcFormula,T_OrderCalcResult) values(?,?,?)";
+ $this->db->query($sql, array($od_id,$formula,$f_value));
+ }
+ }
+ }
+ }
+ function format_value($f_value, $nat_test_id){
+ $CI =& get_instance();
+ $this->db = $CI->load->database("onedev",true);
+ $sql = "select * from m_instrumentmethode
+ where M_InstrumentMethodeIsActive = 'Y'
+ and M_InstrumentMethodeNat_TestID = ?
+ limit 0,1";
+ $qry = $this->db->query($sql, array($nat_test_id) );
+ if ($qry) {
+ $rows = $qry->result_array();
+ if (count($rows) > 0 ) {
+ if ($f_value > 0 ) {
+ $fmt = $rows[0]["M_InstrumentMethodeResultFormatAboveSF"];
+ } else {
+ $fmt = $rows[0]["M_InstrumentMethodeResultFormatSF"];
+ }
+ $idx = strpos($fmt,".");
+ $dec = strlen($fmt) - $idx;
+ if ($dec > 0 ) $dec = $dec -1;
+ return number_format($f_value,$dec);
+ }
+ }
+ return number_format($f_value,0,".",",");
+ }
+}
diff --git a/application/libraries/Sas_s3.php b/application/libraries/Sas_s3.php
new file mode 100644
index 00000000..fec64826
--- /dev/null
+++ b/application/libraries/Sas_s3.php
@@ -0,0 +1,49 @@
+bucket = "audio-sample";
+ $this->s3 = new Aws\S3\S3Client([
+ "region" => "us-east-1",
+ "endpoint" => $this->endpoint,
+ "use_path_style_endpoint" => true,
+ "credentials" => [
+ "key" => "DLBFBBB8R22W4B5IE7PC",
+ "secret" => "byCv726DN1TCQvLVHdSLMJg3K0i3Ajhm4rXPAVCu"
+ ]
+ ]);
+ }
+ function create_bucket($bucket)
+ {
+ $result = $this->s3->createBucket(["Bucket" => $bucket]);
+ return $result;
+ }
+ function upload($bucket, $key, $contentType, $body)
+ {
+ $result = $this->s3->putObject(
+ [
+ "Bucket" => $bucket,
+ "Key" => $key,
+ "Body" => $body,
+ "ContentType" => $contentType
+ ]
+ );
+ return $result;
+ }
+ // avail : 10 minutes
+ function show_url($bucket, $key, $avail)
+ {
+ $cmd = $this->s3->getCommand("GetObject", ['Bucket' => $bucket, 'Key' => $key]);
+ $request = $this->s3->createPresignedRequest($cmd, '+20 minutes');
+ $presignedUrl = $request->getUri();
+ return $presignedUrl;
+ }
+}
diff --git a/application/libraries/Satu_sehat.php b/application/libraries/Satu_sehat.php
new file mode 100644
index 00000000..02f762d6
--- /dev/null
+++ b/application/libraries/Satu_sehat.php
@@ -0,0 +1,584 @@
+tz = "+07:00";
+ $this->is_staging = false;
+ $this->base_url = "https://api-satusehat.kemkes.go.id/fhir-r4/v1";
+ $this->base_oauth_url = "https://api-satusehat.kemkes.go.id/oauth2/v1";
+ $this->base_consent_url = "https://api-satusehat.dto.kemkes.go.id/consent/v1";
+ $CI = &get_instance();
+ $this->db = $CI->load->database("default", true);
+
+ $this->dbname = "one_health";
+ if ($this->is_staging) {
+ $this->base_url = "https://api-satusehat-stg.kemkes.go.id/fhir-r4/v1";
+ $this->base_oauth_url = "https://api-satusehat-stg.kemkes.go.id/oauth2/v1";
+ $this->base_consent_url = "https://api-satusehat-stg.dto.kemkes.go.id/consent/v1";
+ $this->dbname = "one_health_dev";
+ }
+ $this->get_organization_id();
+ }
+ function load_clinic()
+ {
+ $this->dbname = "one_health_clinic";
+ }
+ function ss_organization()
+ {
+ $this->get_organization_id();
+ $o_resp = $this->ss_get("/Organization/{$this->organizationID}");
+ $resp = $this->objToArray($o_resp);
+ $id = $resp["id"];
+ $name = $resp["name"];
+ $x_type = $resp["type"][0]["coding"][0];
+ $type = $x_type["display"];
+ $code = $x_type["code"];
+ $system = $x_type["system"];
+ return json_encode([
+ "ID" => $id,
+ "Name" => $name,
+ "Type" => $type,
+ "CodeSystem" => $code . " | " . $system,
+ ]);
+ }
+
+ function search_practicioner_by_nik($nik, $debug = "")
+ {
+ $service = "/Practitioner?identifier=https://fhir.kemkes.go.id/id/nik|" . $nik;
+ $o_resp = $this->ss_get($service, $debug);
+ $resp = $this->objToArray($o_resp);
+ if (count($resp["entry"]) > 0) {
+ $rs = $resp["entry"][0]["resource"];
+ return json_encode([
+ "status" => "OK",
+ "ihsID" => $rs["id"],
+ "name" => $rs["name"][0]["text"]
+ ]);
+ }
+ return json_encode([
+ "status" => "ERR",
+ "message" => "Practitioner not found [$nik]"
+ ]);
+ }
+
+ function search_patient_by_nik($nik, $debug = "")
+ {
+ $service = "/Patient?identifier=https://fhir.kemkes.go.id/id/nik|" . $nik;
+ $resp = $this->ss_get($service);
+ if ($debug != "") {
+ echo "resp : ";
+ print_r($resp);
+ }
+ $a_resp = $this->objToArray($resp);
+ if (isset($a_resp["entry"][0]["resource"]["id"])) {
+ return $a_resp["entry"][0]["resource"]["id"];
+ }
+ return "";
+ }
+
+ function location_by_organization($organizationIhsID, $debug = "")
+ {
+ $service = "/Location?organization=" . $organizationIhsID;
+ $resp = $this->ss_get($service);
+ if ($debug != "") {
+ echo "resp : ";
+ print_r($resp);
+ }
+ $a_resp = $this->objToArray($resp);
+ return $a_resp;
+ }
+
+ function location_create(
+ $code,
+ $name,
+ $description,
+ $address,
+ $city,
+ $kodePos,
+ $administrativeCode,
+ $rt,
+ $rw,
+ $phone,
+ $type,
+ $partOf = "",
+ $email = "",
+ $fax = "",
+ $url = "",
+ $long = "",
+ $lat = ""
+ ) {
+ $this->get_organization_id();
+ $organizationID = $this->organizationID;
+ list($type_code, $type_display) = explode("^", $type);
+ $telecom = [];
+ $telecom[] = ["system" => "phone", "value" => "$phone", "use" => "work"];
+ if ($fax != "") $telecom[] = ["system" => "fax", "value" => "$fax", "use" => "work"];
+ if ($email != "") $telecom[] = ["system" => "email", "value" => "$email"];
+ if ($url != "") $telecom[] = ["system" => "url", "value" => "$url"];
+ $provCode = substr($administrativeCode, 0, 2);
+ $cityCode = substr($administrativeCode, 0, 4);
+ $districtCode = substr($administrativeCode, 0, 7);
+ $villageCode = substr($administrativeCode, 0, 10);
+
+ $data = [
+ "resourceType" => "Location",
+ "identifier" => [
+ [
+ "system" => "http://sys-ids.kemkes.go.id/location/{$organizationID}",
+ "value" => "$code",
+ ],
+ ],
+ "status" => "active",
+ "name" => "$name",
+ "description" => "$description",
+ "mode" => "instance",
+ "telecom" => $telecom,
+ "address" => [
+ "use" => "work",
+ "line" => [
+ $address,
+ ],
+ "city" => "$city",
+ "postalCode" => "$kodePos",
+ "country" => "ID",
+ "extension" => [
+ [
+ "url" =>
+ "https://fhir.kemkes.go.id/r4/StructureDefinition/administrativeCode",
+ "extension" => [
+ ["url" => "province", "valueCode" => $provCode],
+ ["url" => "city", "valueCode" => $cityCode],
+ ["url" => "district", "valueCode" => "$districtCode"],
+ ["url" => "village", "valueCode" => "$villageCode"],
+ ["url" => "rt", "valueCode" => "$rt"],
+ ["url" => "rw", "valueCode" => "$rw"],
+ ],
+ ],
+ ],
+ ],
+ "physicalType" => [
+ "coding" => [
+ [
+ "system" =>
+ "http://terminology.hl7.org/CodeSystem/location-physical-type",
+ "code" => "$type_code",
+ "display" => "$type_display",
+ ],
+ ],
+ ],
+ "position" => [
+ "longitude" => intval($long),
+ "latitude" => intval($lat),
+ "altitude" => 0,
+ ],
+ "managingOrganization" => ["reference" => "Organization/{$organizationID}"],
+ ];
+ if ($partOf != "") {
+ $data["partOf"] = [
+ "reference" => "Location/$partOf"
+ ];
+ }
+ $service = "/Location";
+ $resp = $this->ss_post($service, $data);
+ $oresp = $this->objToArray($resp);
+ if (!isset($oresp["id"])) {
+ header("Content-Type: text/plain");
+ print_r($data);
+ print_r($resp);
+ }
+ return $oresp;
+ }
+
+ function location_nonactive(
+ $ihsID
+ ) {
+ $this->get_organization_id();
+ $data = [
+ [
+ "op" => "replace",
+ "path" => "/status",
+ "value" => "inactive"
+ ]
+ ];
+
+ $service = "/Location/$ihsID";
+ $resp = $this->ss_patch($service, $data);
+ return $this->objToArray($resp);
+ }
+ function get_location($locationID)
+ {
+ }
+
+
+
+
+ function encounter_by_id($encounterID)
+ {
+ $this->get_organization_id();
+ $service = "/Encounter/$";
+ $resp = $this->ss_get($service);
+ return $this->objToArray($resp);
+ }
+ function encounter_by_subject($patientIhsID)
+ {
+ $this->get_organization_id();
+ $service = "/Encounter?subject=$patientIhsID";
+ $resp = $this->ss_get($service);
+ return $this->objToArray($resp);
+ }
+ function encounter(
+ $orderDate,
+ $patientIhsID,
+ $patientName,
+ $doctorIhsID,
+ $doctorName,
+ $locationID,
+ $locationName,
+ $labNumber,
+ $tz = "+07:00",
+ $payload_only = false
+ ) {
+ $service = "/Encounter";
+ $xdate = substr($orderDate, 0, 10) . "T" . substr($orderDate, 11) . $tz;
+ $this->get_organization_id();
+ $param = $this->encounter_param(
+ $patientIhsID,
+ $patientName,
+ $doctorIhsID,
+ $doctorName,
+ $locationID,
+ $locationName,
+ $this->organizationID,
+ $labNumber,
+ $xdate
+ );
+ $payload = json_encode($param);
+ if ($payload_only) {
+ return ["", "", $payload, ""];
+ }
+ $jresp = $this->ss_post($service, $param);
+ $resp = $this->objToArray($jresp);
+ $response = json_encode($resp);
+ if (is_array($resp) && isset($resp["id"])) {
+ $encounterResponseID = $resp["id"];
+ return [$encounterResponseID, "", $payload, $response];
+ } else {
+ return ["", $response, $payload, $response];
+ }
+ }
+ function encounter_param(
+ $patientIhs,
+ $patientName,
+ $dpjpIhs,
+ $dpjpName,
+ $locationIhs,
+ $locationName,
+ $organizationID,
+ $orderHeaderNumber,
+ $dateTime // 2022-06-14T07:00:00+07:00
+ ) {
+ if ($this->is_staging) {
+ $dpjpIhs = "N10000001";
+ $dpjpName = "Dokter Bronsig";
+ }
+ $encounterParam = [
+ "resourceType" => "Encounter",
+ "status" => "arrived",
+ "class" => [
+ "system" => "http://terminology.hl7.org/CodeSystem/v3-ActCode",
+ "code" => "AMB",
+ "display" => "ambulatory"
+ ],
+ "subject" => [
+ "reference" => "Patient/{$patientIhs}",
+ "display" => "$patientName"
+ ],
+ "participant" => [
+ [
+ "type" => [
+ [
+ "coding" => [
+ [
+ "system" => "http://terminology.hl7.org/CodeSystem/v3-ParticipationType",
+ "code" => "ATND",
+ "display" => "attender"
+ ]
+ ]
+ ]
+ ],
+ "individual" => [
+ "reference" => "Practitioner/{$dpjpIhs}",
+ "display" => "$dpjpName"
+ ]
+ ]
+ ],
+ "period" => [
+ "start" => "$dateTime",
+ ],
+ "location" => [
+ [
+ "location" => [
+ "reference" => "Location/$locationIhs",
+ "display" => "$locationName"
+ ]
+ ]
+ ],
+ "statusHistory" => [
+ [
+ "status" => "arrived",
+ "period" => [
+ "start" => $dateTime
+ ]
+ ]
+ ],
+ "serviceProvider" => [
+ "reference" => "Organization/{$organizationID}"
+ ],
+ "identifier" => [
+ [
+ "system" => "http://sys-ids.kemkes.go.id/encounter/{$organizationID}",
+ "value" => "$orderHeaderNumber"
+ ]
+ ]
+ ];
+ return $encounterParam;
+ }
+
+
+
+
+ // helper
+ function get_organization_id()
+ {
+
+ $sql = "SELECT organizationID
+ FROM {$this->dbname}.organization
+ JOIN m_branch ON organizationM_BranchID = M_BranchID AND M_BranchIsDefault = 'Y' AND M_BranchIsActive = 'Y'
+ WHERE organizationIsActive = 'Y'";
+ $qry = $this->db->query($sql);
+ if (!$qry) {
+ return;
+ }
+ $rows = $qry->result_array();
+ if (count($rows) > 0) {
+ $this->organizationID = $rows[0]["organizationID"];
+ }
+ }
+
+ function ss_patch($service, $data)
+ {
+ $token = $this->get_token();
+ $authorization = "Authorization: Bearer " . $token;
+ $xbase_url = $this->base_url;
+ $url = $xbase_url . "$service";
+ $ch = curl_init($url);
+ # Setup request to send json via POST.
+ $payload = json_encode($data);
+
+ curl_setopt($ch, CURLOPT_POSTFIELDS, $payload);
+ curl_setopt($ch, CURLOPT_CUSTOMREQUEST, "PATCH");
+ curl_setopt($ch, CURLOPT_HTTPHEADER, array('Content-Type: application/json-patch+json', $authorization));
+ # Return response instead of printing.
+ curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
+ # Send request.
+ $result = curl_exec($ch);
+ curl_close($ch);
+ # Print response.
+ $data_rst = json_decode($result);
+ return $data_rst;
+ }
+
+ function get_client_key($debug = "")
+ {
+ $sql = "select * from {$this->dbname}.client where clientIsActive = 'Y'";
+ $qry = $this->db->query($sql);
+ if (!$qry) {
+ return [false, "", ""];
+ }
+ $rows = $qry->result_array();
+ if (count($rows) == 0) {
+ if ($debug != "") {
+ print_r([false, "", ""]);
+ }
+ return [false, "", ""];
+ }
+ if ($debug != "") {
+ print_r([true, $rows[0]["clientKey"], $rows[0]["clientSecret"]]);
+ }
+
+ return [true, $rows[0]["clientKey"], $rows[0]["clientSecret"]];
+ }
+
+ function reset_token()
+ {
+ $sql = "delete from {$this->dbname}.token ";
+ $qry = $this->db->query($sql);
+ if (!$qry) {
+ echo "ERR : " . $this->db->error()["message"];
+ echo " " . $this->db->last_query();
+ exit;
+ }
+ }
+
+ function put_token()
+ {
+ $auth_url = $this->base_oauth_url;
+ $url = $auth_url . "/accesstoken?grant_type=client_credentials";
+ list($status, $key, $secret) = $this->get_client_key();
+ $data = [
+ "client_id" => $key,
+ "client_secret" => $secret
+ ];
+ $ch = curl_init($url);
+ $post_data = http_build_query($data);
+ curl_setopt($ch, CURLOPT_POSTFIELDS, $post_data);
+ curl_setopt($ch, CURLOPT_CUSTOMREQUEST, "POST");
+ curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
+ $result = curl_exec($ch);
+ curl_close($ch);
+ if ($result) {
+ $token_rst = json_decode($result);
+ $sql = "select count(*) as xcount, tokenID
+ from {$this->dbname}.token
+ where
+ tokenIsActive = 'y'
+ ";
+ $qry = $this->db->query($sql);
+ if (!$qry) {
+ echo "get count token error";
+ exit;
+ }
+
+ $rst_count = $qry->row_array();
+ // print_r($token_rst);
+ if ($rst_count['xcount'] > 0) {
+ $sql = "update {$this->dbname}.token set tokenValue = ?, tokenExpired = date_add(now(), interval 50 minute)
+ where tokenID = ?";
+ $qry = $this->db->query($sql, [$token_rst->access_token, $rst_count['tokenID']]);
+ if (!$qry) {
+ $this->sys_error_db("refresh token error", $this->db->last_query());
+ exit;
+ }
+ } else {
+ $sql = "update {$this->dbname}.token set tokenIsActive = 'N' where tokenIsActive = 'Y'";
+ $qry = $this->db->query($sql);
+ if (!$qry) {
+ echo "nonactive token error";
+ exit;
+ }
+
+ $sql = "insert into {$this->dbname}.token(tokenValue,tokenExpired) values(?,date_add(now(), interval 50 minute))";
+ $qry = $this->db->query($sql, [$token_rst->access_token]);
+ if (!$qry) {
+ echo "insert token error";
+ exit;
+ }
+ }
+
+ $sql = "select tokenValue
+ from {$this->dbname}.token
+ where
+ tokenIsActive = 'Y' limit 1
+ ";
+ $qry = $this->db->query($sql);
+ if (!$qry) {
+ echo "get token error";
+ exit;
+ }
+
+ return $qry->row()->tokenValue;
+ }
+ }
+
+ function get_token()
+ {
+ $sql = "SELECT COUNT(*) as xcount, tokenValue
+ FROM {$this->dbname}.token
+ WHERE tokenIsActive = 'Y' AND NOW() < tokenExpired AND tokenValue IS NOT NULL ";
+ $qry = $this->db->query($sql);
+ $this->check_error($qry, "select token");
+
+ $data_token = $qry->row_array();
+ //print_r($data_token);
+ if ($data_token['xcount'] > 0) {
+ return $data_token['tokenValue'];
+ } else {
+ return $this->put_token();
+ }
+ }
+
+
+ function ss_post($service, $data)
+ {
+ $token = $this->get_token();
+ $authorization = "Authorization: Bearer " . $token;
+ $xbase_url = $this->base_url;
+ $url = $xbase_url . "$service";
+ $ch = curl_init($url);
+ # Setup request to send json via POST.
+ $payload = json_encode($data);
+
+ curl_setopt($ch, CURLOPT_POSTFIELDS, $payload);
+ curl_setopt($ch, CURLOPT_CUSTOMREQUEST, "POST");
+ curl_setopt($ch, CURLOPT_HTTPHEADER, array('Content-Type: application/json', $authorization));
+ # Return response instead of printing.
+ curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
+ # Send request.
+ $result = curl_exec($ch);
+ curl_close($ch);
+ # Print response.
+ $data_rst = json_decode($result);
+ return $data_rst;
+ }
+ function ss_get($service, $debug = "")
+ {
+ $token = $this->get_token();
+ $authorization = "Authorization: Bearer " . $token;
+ $xbase_url = $this->base_url;
+ $url = $xbase_url . "$service";
+ $ch = curl_init($url);
+
+ curl_setopt($ch, CURLOPT_CUSTOMREQUEST, "GET");
+ curl_setopt($ch, CURLOPT_HTTPHEADER, array('Content-Type: application/json', $authorization));
+ # Return response instead of printing.
+ curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
+ # Send request.
+ $result = curl_exec($ch);
+ curl_close($ch);
+ # Print response.
+ if ($debug != "") {
+ echo "url : $url \n";
+ print_r($result);
+ }
+ $data_rst = json_decode($result);
+ return $data_rst;
+ }
+ protected function objToArray($obj)
+ {
+ if (!is_object($obj) && !is_array($obj)) {
+ return $obj;
+ }
+ foreach ($obj as $key => $value) {
+ $arr[$key] = $this->objToArray($value);
+ }
+ return $arr;
+ }
+
+ function check_error($qry, $stage)
+ {
+ if (!$qry) {
+ echo json_encode([
+ "status" => "ERR",
+ "message" => $this->db->error(),
+ "sql" => $this->db->last_query()
+ ]);
+ exit;
+ }
+ }
+}
diff --git a/application/libraries/Satusehat.php b/application/libraries/Satusehat.php
new file mode 100644
index 00000000..842bdf3d
--- /dev/null
+++ b/application/libraries/Satusehat.php
@@ -0,0 +1,244 @@
+db_onedev = $CI->load->database("default", true);
+
+ }
+
+ function clean_mysqli_connection( $dbc )
+{
+ while( mysqli_more_results($dbc) )
+ {
+ if(mysqli_next_result($dbc))
+ {
+ $result = mysqli_use_result($dbc);
+
+ if( get_class($result) == 'mysqli_stmt' )
+ {
+ mysqli_stmt_free_result($result);
+ }
+ else
+ {
+ unset($result);
+ }
+ }
+ }
+}
+
+/*function get_token(){
+ $sql = "SELECT COUNT(*) as xcount, tokenValue
+ FROM one_health.token
+ WHERE tokenIsActive = 'Y' AND NOW() < tokenExpired AND tokenValue IS NOT NULL
+ ";
+ $qry = $this->db_onedev->query($sql);
+ if (!$qry) {
+ echo "select token error";
+ exit;
+ }
+
+ $data_token = $qry->row_array();
+ //print_r($data_token);
+ if($data_token['xcount'] > 0){
+ return $data_token['tokenValue'];
+ }else{
+ return $this->putx_token();
+ }
+
+
+}*/
+
+function get_new_token(){
+
+
+ $curl = curl_init();
+
+ curl_setopt_array($curl, array(
+ CURLOPT_URL => 'https://api-satusehat-dev.dto.kemkes.go.id/oauth2/v1/accesstoken?grant_type=client_credentials',
+ CURLOPT_RETURNTRANSFER => true,
+ CURLOPT_ENCODING => '',
+ CURLOPT_MAXREDIRS => 10,
+ CURLOPT_TIMEOUT => 0,
+ CURLOPT_FOLLOWLOCATION => true,
+ CURLOPT_HTTP_VERSION => CURL_HTTP_VERSION_1_1,
+ CURLOPT_CUSTOMREQUEST => 'POST',
+ CURLOPT_POSTFIELDS => 'client_id=6PukKqO0RQqu0cKBOC8EKGcXQySfPR4aVkiVmuTgkx5xvva4&client_secret=89ZqsmY3z5W7rVscHTp9gJoAWWiAZG4A2unS3maTw3DxBFxTdaRsSeTUbD8mRN3p',
+ ));
+
+ $response = curl_exec($curl);
+
+ curl_close($curl);
+ echo $response;
+
+}
+
+function put_token(){
+ $auth_url = "https://api-satusehat-dev.dto.kemkes.go.id/oauth2/v1";
+ //API URL
+ $url = $auth_url."/accesstoken?grant_type=client_credentials";
+ //echo $url;
+
+ $data = [
+ "client_id" => "6PukKqO0RQqu0cKBOC8EKGcXQySfPR4aVkiVmuTgkx5xvva4",
+ "client_secret" => "89ZqsmY3z5W7rVscHTp9gJoAWWiAZG4A2unS3maTw3DxBFxTdaRsSeTUbD8mRN3p"
+ ];
+
+
+ $ch = curl_init($url);
+ # Setup request to send json via POST.
+
+ curl_setopt($ch, CURLOPT_POSTFIELDS, http_build_query($data));
+ curl_setopt($ch, CURLOPT_CUSTOMREQUEST, "POST");
+ curl_setopt($ch,CURLOPT_HTTPHEADER,
+ array(
+ 'Content-Type: application/x-www-form-urlencoded'
+ )
+ );
+ # Return response instead of printing.
+ curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
+ # Send request.
+ $result = curl_exec($ch);
+ curl_close($ch);
+ # Print response.
+ print_r($result);
+ //echo $token_rst->access_token;
+ if($result){
+ $token_rst = json_decode($result);
+
+ $sql = "SELECT COUNT(*) as xcount, tokenID
+ FROM one_health.token
+ WHERE
+ tokenIsActive = 'Y'
+ ";
+ $qry = $this->db_onedev->query($sql);
+ if (!$qry) {
+ echo "get count token error";
+ exit;
+ }
+
+ $rst_count = $qry->row_array();
+
+ if($rst_count['xcount'] > 0){
+ $sql = "UPDATE one_health.token SET tokenValue = ?, tokenExpired = DATE_ADD(NOW(), INTERVAL 50 MINUTE)
+ WHERE tokenID = ?";
+ $qry = $this->db_onedev->query($sql, [$token_rst->access_token,$rst_count['tokenID']]);
+ if (!$qry) {
+ $this->sys_error_db("refresh token error", $this->db_onedev->last_query());
+ exit;
+ }
+ }else{
+ $sql = "UPDATE one_health.token SET tokenIsActive = 'N' WHERE tokenIsActive = 'Y'";
+ $qry = $this->db_onedev->query($sql);
+ if (!$qry) {
+ echo "nonactive token error";
+ exit;
+ }
+
+ $sql = "INSERT INTO one_health.token(tokenValue,tokenExpired) VALUES(?,DATE_ADD(NOW(), INTERVAL 50 MINUTE))";
+ $qry = $this->db_onedev->query($sql, [$token_rst->access_token]);
+ if (!$qry) {
+ echo "insert token error";
+ exit;
+ }
+ }
+
+ $sql = "SELECT tokenValue
+ FROM one_health.token
+ WHERE
+ tokenIsActive = 'Y' LIMIT 1
+ ";
+ $qry = $this->db_onedev->query($sql);
+ if (!$qry) {
+ echo "get token error";
+ exit;
+ }
+
+ return $qry->row()->tokenValue;
+ }
+
+
+}
+
+/*function search_practicioner_by_nik($nik){
+ $sql = "SELECT tokenValue
+ FROM one_health.token
+ WHERE
+ tokenIsActive = 'Y' LIMIT 1
+ ";
+ $qry = $this->db_onedev->query($sql);
+ if (!$qry) {
+ echo "get token error";
+ exit;
+ }
+
+ $token = $qry->row()->tokenValue;
+
+ $authorization = "Authorization: Bearer ".$token;
+ //API URL
+ $url = $this->xbase_url."/Practitioner?identifier=https://fhir.kemkes.go.id/id/nik|".$nik;
+ //echo $url;
+
+
+ $ch = curl_init($url);
+ # Setup request to send json via POST.
+ //$payload = json_encode($data);
+
+ //curl_setopt($ch, CURLOPT_POSTFIELDS, $payload);
+ curl_setopt($ch, CURLOPT_CUSTOMREQUEST, "GET");
+ curl_setopt($ch, CURLOPT_HTTPHEADER, array('Content-Type: application/json' , $authorization ));
+ # Return response instead of printing.
+ curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
+ # Send request.
+ $result = curl_exec($ch);
+ curl_close($ch);
+ # Print response.
+ $data_rst = json_decode($result);
+ print_r($result);
+
+ return $data_rst;
+}*/
+
+function gen_uuid() {
+ return sprintf( '%04x%04x-%04x-%04x-%04x-%04x%04x%04x',
+ // 32 bits for "time_low"
+ mt_rand( 0, 0xffff ), mt_rand( 0, 0xffff ),
+
+ // 16 bits for "time_mid"
+ mt_rand( 0, 0xffff ),
+
+ // 16 bits for "time_hi_and_version",
+ // four most significant bits holds version number 4
+ mt_rand( 0, 0x0fff ) | 0x4000,
+
+ // 16 bits, 8 bits for "clk_seq_hi_res",
+ // 8 bits for "clk_seq_low",
+ // two most significant bits holds zero and one for variant DCE1.1
+ mt_rand( 0, 0x3fff ) | 0x8000,
+
+ // 48 bits for "node"
+ mt_rand( 0, 0xffff ), mt_rand( 0, 0xffff ), mt_rand( 0, 0xffff )
+ );
+}
+
+protected function objToArray($obj)
+ {
+ // Not an object or array
+ if (!is_object($obj) && !is_array($obj)) {
+ return $obj;
+ }
+
+ // Parse array
+ foreach ($obj as $key => $value) {
+ $arr[$key] = $this->objToArray($value);
+ }
+
+ // Return parsed array
+ return $arr;
+ }
+}
+
+
diff --git a/application/libraries/Soresultlog.php b/application/libraries/Soresultlog.php
new file mode 100644
index 00000000..e50fdaff
--- /dev/null
+++ b/application/libraries/Soresultlog.php
@@ -0,0 +1,69 @@
+db_onedev = $CI->load->database("default", true);
+ $this->db_smartone = $CI->load->database("default", true);
+ }
+
+ function clean_mysqli_connection($dbc)
+ {
+ while (mysqli_more_results($dbc)) {
+ if (mysqli_next_result($dbc)) {
+ $result = mysqli_use_result($dbc);
+
+ if (get_class($result) == 'mysqli_stmt') {
+ mysqli_stmt_free_result($result);
+ } else {
+ unset($result);
+ }
+ }
+ }
+ }
+
+ public function step_action($act,$re_id,$userid)
+ {
+ //$CI = &get_instance();
+ //$this->db = $CI->load->database("one", true);
+
+ $sql = "INSERT INTO so_reactionlog(
+ So_REActionLogDate,
+ So_REActionLogSo_ResultEntryID,
+ So_REActionLogAction,
+ So_REActionLogUserID
+ )
+ VALUES(
+ NOW(),?,?,?
+ )";
+ $qry = $this->db_onedev->query($sql, array($re_id,$act,$userid));
+ if (!$qry) {
+ return array(false, print_r($this->db_onedev->error(), true));
+ }else
+ return array(true);
+ }
+
+ public function log_result($data_json,$re_id,$userid)
+ {
+ //$CI = &get_instance();
+ //$this->db = $CI->load->database("one", true);
+ //echo $re_id;
+ $sql = "INSERT INTO cpone_log.log_resultentry_so(
+ Log_ResultEntrySoDate,
+ Log_ResultEntrySoReID,
+ Log_ResultEntrySoJSON,
+ Log_ResultEntrySoUserID
+ )
+ VALUES(
+ NOW(),?,?,?
+ )";
+ $qry = $this->db_onedev->query($sql, array($re_id,$data_json,$userid));
+ if (!$qry) {
+ return array(false, print_r($this->db_onedev->error(), true));
+ }else
+ return array(true);
+ }
+}
diff --git a/application/libraries/SsPriceMou.php b/application/libraries/SsPriceMou.php
new file mode 100644
index 00000000..4d29d4ce
--- /dev/null
+++ b/application/libraries/SsPriceMou.php
@@ -0,0 +1,547 @@
+db = $CI->load->database("onedev",true);
+
+ $sql = "select * from m_mou where M_MouID = ?";
+ $qry = $this->db->query($sql, array($mouID));
+ if (! $qry ) {
+ return array(false, print_r($this->db->error(),true));
+ }
+ $rows = $qry->result_array();
+ if (count($rows) == 0 ) {
+ return array(false, "MOU ID : $mouID not found");
+ }
+ $companyID = $rows[0]["M_MouM_CompanyID"];
+
+ $sql = "select distinct T_PriceM_MouID, T_TestID, T_TestName, 'N' IsFromPanel, Nat_TestID,
+ T_PriceT_TestID, T_PriceIsCito, T_PriceM_CompanyID, T_PriceM_MouID,
+ T_PricePriority, T_PriceAmount, T_PriceDisc, T_PriceDiscRp, T_PriceSubTotal,
+ T_PriceOther, T_PriceTotal, T_TestForceSell, 'N' is_packet, 0 packet_id,
+ 'PX' px_type, '[]' nat_test, '[]' child_test, 'N' IsFavourite,
+ Nat_TestNat_TestTypeID, T_TestSasCode, $mouID Ss_PriceMouM_MouID
+ from t_price
+ join t_test on T_PriceT_TestID = T_TestID
+ and T_PriceIsActive = 'Y' and T_TestIsActive = 'Y'
+ and T_TestIsPrice = 'Y'
+ join nat_test on T_TestNat_TestID = Nat_TestID
+ and Nat_TestIsActive = 'Y' and Nat_TestNat_TestTypeID <> 5
+ where T_PriceM_MouID = ?
+ and length(T_TestSasCode) = 8 ";
+ $qry = $this->db->query($sql, array($mouID));
+
+ if (! $qry ) {
+ return array(false, "Regional select t_price " . print_r($this->db->error(),true));
+ }
+ $rows = $qry->result_array();
+ $flag_error = false;
+ foreach($rows as $idx => $r) {
+ $nat_testType = $r["Nat_TestNat_TestTypeID"];
+ switch($nat_testType) {
+ case 1: //Single
+ $rows[$idx]['nat_test'] = '[' . $r['Nat_TestID'] . ']';
+ break;
+ case 3: //Multi
+ case 4: //Panel
+ $sasCode = $r["T_TestSasCode"] . '%';
+ $sql = "select T_TestNat_TestID
+ from t_test
+ where T_TestIsResult = 'Y'
+ and T_TestSasCode like ?
+ and T_TestIsActive = 'Y'";
+ $qry = $this->db->query($sql,array($sasCode));
+ if (!$qry ) {
+ return array(false, "Regional " . print_r($this->db->error(),true));
+ }
+ $nt_rows = $qry->result_array();
+ $t_rows = array($r["Nat_TestID"]);
+ foreach($nt_rows as $nr) {
+ $t_rows[] = $nr["T_TestNat_TestID"];
+ }
+ $rows[$idx]['nat_test'] = "[" . join(",",$t_rows) . "]";
+ break;
+ default :
+ $rows[$idx]['nat_test'] = '[' . $r['Nat_TestID'] . ']';
+ break;
+ }
+ unset($rows[$idx]["Nat_TestNat_TestTypeID"]);
+ unset($rows[$idx]["T_TestSasCode"]);
+ }
+ //Test Profile
+ // wip profile
+ $sql = "select distinct $mouID T_PriceM_MouID, T_TestID, T_TestName, 'N' IsFromPanel, Nat_TestID,
+ T_TestID T_PriceT_TestID, 'N' T_PriceIsCito, $companyID T_PriceM_CompanyID, $mouID T_PriceM_MouID,
+ 0 T_PricePriority, 0 T_PriceAmount, 0 T_PriceDisc, 0 T_PriceDiscRp, 0 T_PriceSubTotal,
+ 0 T_PriceOther, 0 T_PriceTotal, T_TestForceSell, 'N' is_packet, 0 packet_id,
+ 'PXR' px_type, '[]' nat_test, '[]' child_test, 'N' IsFavourite,
+ Nat_TestNat_TestTypeID, T_TestSasCode, $mouID Ss_PriceMouM_MouID
+ from t_test
+ join nat_test on T_TestNat_TestID = Nat_TestID
+ and Nat_TestIsActive = 'Y' and Nat_TestNat_TestTypeID = 5
+ where length(T_TestSasCode) = 8 ";
+ $qry = $this->db->query($sql, array($mouID));
+ if (! $qry ) {
+ return array(false, "Regional " . print_r($this->db->error(),true));
+ }
+ $p_rows = $qry->result_array();
+
+ $sql = "select distinct substr(T_TestSasCode,1,8) parentCode, T_PriceM_MouID, T_TestID, T_TestName, 'N' IsFromPanel, Nat_TestID,
+ T_PriceT_TestID, T_PriceIsCito, T_PriceM_CompanyID, T_PriceM_MouID,
+ T_PricePriority, T_PriceAmount, T_PriceDisc, T_PriceDiscRp, T_PriceSubTotal,
+ T_PriceOther, T_PriceTotal, T_TestForceSell, 'N' is_packet, 0 packet_id,
+ 'PX' px_type, concat('[', T_TestNat_TestID , ']') nat_test, '[]' child_test, 'N' IsFavourite,
+ Nat_TestNat_TestTypeID, T_TestSasCode,T_TestIsResult, T_TestCode
+ from t_price
+ join t_test on T_PriceT_TestID = T_TestID
+ and T_PriceIsActive = 'Y' and T_TestIsActive = 'Y'
+ and T_TestIsPrice = 'Y'
+ and T_PriceIsCito = 'N'
+ and length(T_TestSasCode) = 10
+ join nat_test on T_TestNat_TestID = Nat_TestID
+ and Nat_TestIsActive = 'Y'
+ where T_PriceM_MouID = ? ";
+ $qry = $this->db->query($sql,array($mouID));
+ if (!$qry ) {
+ return array(false, "Regional child test " . print_r($this->db->error(),true));
+ }
+ $xrows = $qry->result_array();
+ $arr_child = array();
+ $p_codes = "'0'";
+ foreach($xrows as $r ) {
+ $pCode = $r["parentCode"];
+ if ( ! isset($arr_child[$pCode])) {
+ $arr_child[$pCode] = array();
+ }
+ $cCode = $r["T_TestSasCode"];
+ $p_codes .= ", '$cCode'";
+ unset($r["parentCode"]);
+ $arr_child[$pCode][] = $r;
+ }
+ $sql = "select substr(T_TestSasCode,1,8) parentCode,
+ group_concat(distinct T_TestNat_TestID) nat
+ from t_test
+ where ( T_TestIsResult = 'Y' or T_TestIsPrice = 'Y' )
+ and T_TestSasCode in ( $p_codes )
+ and T_TestIsActive = 'Y'
+ group by parentCode";
+ $qry = $this->db->query($sql,array($mouID));
+ if (!$qry ) {
+ return array(false, "Regional " . print_r($this->db->error(),true));
+ }
+ $xrows = $qry->result_array();
+ $arr_nat = array();
+ foreach($xrows as $r ) {
+ $pCode = $r["parentCode"];
+ //if ( ! isset($arr_nat[$pCode])) {
+ // $arr_nat[$pCode] = array();
+ //}
+ $arr_nat[$pCode] = $r["nat"];
+ }
+ $flag_error = false;
+ foreach($p_rows as $idx => $r) {
+ $T_TestName= $r["T_TestName"] ;
+ $sasCode = $r["T_TestSasCode"];
+ if ( isset($arr_child[$sasCode]) ) {
+ $the_childs = $arr_child[$sasCode];
+ $p_rows[$idx]['child_test'] = json_encode($the_childs,true);
+ if ( isset($arr_nat[$sasCode] )) {
+ $p_rows[$idx]['nat_test'] = "[" . $arr_nat[$sasCode] . "]";
+ }
+ unset($p_rows[$idx]["Nat_TestNat_TestTypeID"]);
+ unset($p_rows[$idx]["T_TestSasCode"]);
+ } else {
+ unset($p_rows[$idx]);
+ }
+ }
+ //Paket Panel / Profile
+ $sql = "select distinct $mouID T_PriceM_MouID, T_PacketID T_TestID, T_PacketName T_TestName, 'N' IsFromPanel, 0 Nat_TestID,
+ T_PacketID T_PriceT_TestID, 'N' T_PriceIsCito, $companyID T_PriceM_CompanyID, $mouID T_PriceM_MouID,
+ 0 T_PricePriority, T_PacketOriginalBruto T_PriceAmount, 0 T_PriceDisc,
+ (T_PacketOriginalBruto - T_PacketPrice) T_PriceDiscRp, 0 T_PriceSubTotal,
+ 0 T_PriceOther, T_PacketPrice T_PriceTotal, 'Y' T_TestForceSell, 'Y' is_packet, T_PacketID packet_id,
+ T_PacketType px_type, '[]' nat_test, '[]' child_test, 'N' IsFavourite,
+ $mouID Ss_PriceMouM_MouID
+ from
+ t_packet
+ where
+ T_PacketIsActive = 'Y'
+ and T_PacketM_MouID = ?";
+
+ $qry = $this->db->query($sql, array($mouID));
+ if (! $qry ) {
+ return array(false, "Regional " . print_r($this->db->error(),true));
+ }
+ $pn_rows = $qry->result_array();
+ foreach($pn_rows as $idx => $pnr) {
+ $packetID = $pnr["packet_id"];
+ //child test
+ $sql = "select distinct $mouID T_PriceM_MouID, T_TestID, T_TestName, 'N' IsFromPanel, Nat_TestID,
+ T_TestID T_PriceT_TestID, 'N' T_PriceIsCito, $companyID T_PriceM_CompanyID,
+ $mouID T_PriceM_MouID, 0 T_PricePriority, T_PacketDetailPriceAmount T_PriceAmount,
+ T_PacketDetailPriceDisc T_PriceDisc, T_PacketDetailPriceDiscRp T_PriceDiscRp, T_PacketDetailPriceSubTotal T_PriceSubTotal,
+ 0 T_PriceOther, T_PacketDetailPrice T_PriceTotal,
+ 'Y' T_TestForceSell, 'N' is_packet, 0 packet_id,
+ 'PX' px_type, concat('[', T_TestNat_TestID , ']') nat_test, '[]' child_test, 'N' IsFavourite, T_TestSasCode
+ from t_packetdetail
+ join t_test on T_PacketDetailT_TestID = T_TestID
+ and T_PacketDetailIsActive = 'Y' and T_TestIsActive = 'Y'
+ and T_PacketDetailT_PacketID = ?
+ join nat_test on T_TestNat_TestID = Nat_TestID
+ and Nat_TestIsActive = 'Y'";
+ $qry = $this->db->query($sql,array($packetID));
+ if (!$qry ) {
+ return array(false, print_r($this->db->error(),true));
+ }
+ $ct_rows = $qry->result_array();
+ $p_nat_test = array();
+ foreach($ct_rows as $ct_idx => $cr) {
+ $sasCode = $cr["T_TestSasCode"] . '%';
+ $sql = "select distinct T_TestNat_TestID
+ from t_test
+ where T_TestSasCode like ?
+ and T_TestIsActive = 'Y'";
+ $qry = $this->db->query($sql,array($sasCode));
+ if (!$qry ) {
+ return array(false, print_r($this->db->error(),true));
+ }
+ $nt_rows = $qry->result_array();
+ $t_rows = array();
+ foreach($nt_rows as $nr) {
+ $t_rows[] = intval( $nr["T_TestNat_TestID"]);
+ $p_nat_test[]= intval( $nr["T_TestNat_TestID"]);
+ }
+ $ct_rows[$ct_idx]['nat_test'] = json_encode($t_rows,JSON_NUMERIC_CHECK);
+ }
+ if (count($ct_rows) > 0 ) {
+ $x_arr = array();
+ foreach($ct_rows as $x_cr) {
+ $x_arr[] = $x_cr;
+ }
+ $pn_rows[$idx]['child_test'] = json_encode($x_arr,true);
+ $pn_rows[$idx]['nat_test'] = json_encode($p_nat_test,true);
+ }
+ unset($pn_rows[$idx]["Nat_TestNat_TestTypeID"]);
+ unset($pn_rows[$idx]["T_TestSasCode"]);
+ }
+
+ $rows = array_merge($rows,$p_rows, $pn_rows);
+ $qry = $this->db->query("delete from ss_price_mou where Ss_PriceMouM_MouID=?", array($mouID));
+ if ( ! $qry ) {
+ return array(false, "Regional " . print_r($this->db->error(),true));
+ }
+ $qry = $this->db->insert_batch("ss_price_mou", $rows);
+ if ( ! $qry ) {
+ return array(false, "Regional " . print_r($this->db->error(),true));
+ }
+ return array(true, "OK");
+ }
+ public function edit($mouID,$testID,$cito) {
+ $CI =& get_instance();
+ $this->db = $CI->load->database("onedev",true);
+
+ $sql = "select * from t_test where T_TestID = ? ";
+ $qry = $this->db->query($sql, array($testID));
+ if (! $qry ) {
+ return array(false, print_r($this->db->error(),true));
+ }
+ $rows = $qry->result_array();
+ if (count($rows) == 0 ) {
+ return array(false, "No Test $testID found");
+ }
+ $sasCode = $rows[0]["T_TestSasCode"];
+ if ( strlen($sasCode) == 8 ) {
+ $flagProfile = false;
+ } else {
+ $flagProfile = true;
+ }
+
+ $sql = "select * from m_mou where M_MouID = ?";
+ $qry = $this->db->query($sql, array($mouID));
+ if (! $qry ) {
+ return array(false, print_r($this->db->error(),true));
+ }
+ $rows = $qry->result_array();
+ if (count($rows) == 0 ) {
+ return array(false, "No MOU $mouID found");
+ }
+ $mouName = $rows[0]["M_MouName"];
+ $companyID = $rows[0]["M_MouM_CompanyID"];
+
+ $sql = "select distinct T_PriceM_MouID, T_TestID, T_TestName, 'N' IsFromPanel, Nat_TestID,
+ T_PriceT_TestID, T_PriceIsCito, T_PriceM_CompanyID, T_PriceM_MouID,
+ T_PricePriority, T_PriceAmount, T_PriceDisc, T_PriceDiscRp, T_PriceSubTotal,
+ T_PriceOther, T_PriceTotal, T_TestForceSell, 'N' is_packet, 0 packet_id,
+ 'PX' px_type, '[]' nat_test, '[]' child_test, 'N' IsFavourite,
+ Nat_TestNat_TestTypeID, T_TestSasCode, $mouID Ss_PriceMouM_MouID
+ from t_price
+ join t_test on T_PriceT_TestID = T_TestID and T_TestID = ?
+ and T_PriceIsActive = 'Y' and T_TestIsActive = 'Y'
+ and T_TestIsPrice = 'Y' and T_PriceIsCito = ?
+ join nat_test on T_TestNat_TestID = Nat_TestID
+ and Nat_TestIsActive = 'Y' and Nat_TestNat_TestTypeID <> 5
+ where T_PriceM_MouID = ?";
+ $qry = $this->db->query($sql, array($testID, $cito, $mouID));
+ if (! $qry ) {
+ return array(false, print_r($this->db->error(),true));
+ }
+ $rows = $qry->result_array();
+
+ foreach($rows as $idx => $r) {
+ $nat_testType = $r["Nat_TestNat_TestTypeID"];
+ switch($nat_testType) {
+ case 1: //Single
+ $rows[$idx]['nat_test'] = '[' . $r['Nat_TestID'] . ']';
+ break;
+ case 3: //Multi
+ case 4: //Panel
+ $sasCode = $r["T_TestSasCode"] . '%';
+ $sql = "select T_TestNat_TestID
+ from t_test
+ where T_TestIsResult = 'Y'
+ and T_TestSasCode like ?
+ and T_TestIsActive = 'Y'";
+ $qry = $this->db->query($sql,array($sasCode));
+ if (!$qry ) {
+ return array(false, print_r($this->db->error(),true));
+ }
+ $nt_rows = $qry->result_array();
+ $t_rows = array($r["Nat_TestID"]);
+ foreach($nt_rows as $nr) {
+ $t_rows[] = $nr["T_TestNat_TestID"];
+ }
+ $rows[$idx]['nat_test'] = "[" . join(",",$t_rows) . "]";
+ break;
+ default :
+ $rows[$idx]['nat_test'] = '[' . $r['Nat_TestID'] . ']';
+ break;
+ }
+ unset($rows[$idx]["Nat_TestNat_TestTypeID"]);
+ }
+ if ( count($rows) > 0 ) {
+ $r = $rows[0];
+ unset($r["T_TestSasCode"]);
+ $this->db->where("T_PriceM_MouID", $r["T_PriceM_MouID"]);
+ $this->db->where("T_TestID", $r["T_TestID"]);
+ $this->db->where("T_PriceIsCito", $r["T_PriceIsCito"]);
+ $qry = $this->db->update("ss_price_mou",$r);
+ if (! $qry ) {
+ return array(false, print_r($this->db->error(),true));
+ }
+ }
+ $sasCode = substr($sasCode,0,8);
+ foreach($rows as $idx => $r ) {
+ if ( strlen($r["T_TestSasCode"]) > 8 ) {
+ unset($rows[$idx]);
+ } else {
+ unset($rows[$idx]["T_TestSasCode"]);
+ }
+ }
+ if ($cito == 'Y' ) {
+ return array(true,"OK",$rows);
+ }
+ // for non cito
+ if($flagProfile ) {
+ //wip profile
+ $sql = "select distinct $mouID T_PriceM_MouID, T_TestID, T_TestName, 'N' IsFromPanel, Nat_TestID,
+ T_TestID T_PriceT_TestID, 'N' T_PriceIsCito, $companyID T_PriceM_CompanyID, $mouID T_PriceM_MouID,
+ 0 T_PricePriority, 0 T_PriceAmount, 0 T_PriceDisc, 0 T_PriceDiscRp, 0 T_PriceSubTotal,
+ 0 T_PriceOther, 0 T_PriceTotal, T_TestForceSell, 'N' is_packet, 0 packet_id,
+ 'PXR' px_type, '[]' nat_test, '[]' child_test, 'N' IsFavourite,
+ Nat_TestNat_TestTypeID, T_TestSasCode, $mouID Ss_PriceMouM_MouID
+ from t_test
+ join nat_test on T_TestNat_TestID = Nat_TestID and T_TestSasCode = ?
+ and Nat_TestIsActive = 'Y' and Nat_TestNat_TestTypeID = 5
+ where length(T_TestSasCode) = 8 ";
+ $qry = $this->db->query($sql, array($sasCode));
+
+ if (! $qry ) {
+ return array(false, print_r($this->db->error(),true));
+ }
+ $p_rows = $qry->result_array();
+
+ $sasCodeLike = $sasCode . "%";
+ $sql = "select distinct substr(T_TestSasCode,1,8) parentCode, T_PriceM_MouID, T_TestID, T_TestName, 'N' IsFromPanel, Nat_TestID,
+ T_PriceT_TestID, T_PriceIsCito, T_PriceM_CompanyID, T_PriceM_MouID,
+ T_PricePriority, T_PriceAmount, T_PriceDisc, T_PriceDiscRp, T_PriceSubTotal,
+ T_PriceOther, T_PriceTotal, T_TestForceSell, 'N' is_packet, 0 packet_id,
+ 'PX' px_type, concat('[', T_TestNat_TestID , ']') nat_test, '[]' child_test, 'N' IsFavourite,
+ Nat_TestNat_TestTypeID, T_TestSasCode,T_TestIsResult, T_TestCode
+ from t_price
+ join t_test on T_PriceT_TestID = T_TestID
+ and T_PriceIsActive = 'Y' and T_TestIsActive = 'Y'
+ and T_TestIsPrice = 'Y' and T_PriceIsCito = 'N'
+ and T_TestSasCode like ?
+ join nat_test on T_TestNat_TestID = Nat_TestID
+ and Nat_TestIsActive = 'Y'
+ where T_PriceM_MouID = ? ";
+ $qry = $this->db->query($sql,array($sasCodeLike,$mouID));
+ if (!$qry ) {
+ return array(false, "Regional child_test " . print_r($this->db->error(),true));
+ }
+ $xrows = $qry->result_array();
+ $arr_child = array();
+ $p_codes = "'0'";
+ foreach($xrows as $r ) {
+ $pCode = $r["parentCode"];
+ if ( ! isset($arr_child[$pCode])) {
+ $arr_child[$pCode] = array();
+ }
+ $cCode = $r["T_TestSasCode"];
+ $p_codes .= ", '$cCode'";
+ unset($r["parentCode"]);
+ $arr_child[$pCode][] = $r;
+ }
+
+ $sql = "select substr(T_TestSasCode,1,8) parentCode,
+ group_concat(distinct T_TestNat_TestID) nat
+ from t_test
+ where ( T_TestIsResult = 'Y' or T_TestIsPrice = 'Y' )
+ and T_TestSasCode in ( $p_codes )
+ and T_TestIsActive = 'Y'
+ group by parentCode";
+ $qry = $this->db->query($sql,array($mouID));
+ if (!$qry ) {
+ return array(false, "Regional nat_test " . print_r($this->db->error(),true));
+ }
+ $xrows = $qry->result_array();
+ $arr_nat = array();
+ foreach($xrows as $r ) {
+ $pCode = $r["parentCode"];
+ //if ( ! isset($arr_nat[$pCode])) {
+ // $arr_nat[$pCode] = array();
+ //}
+ $arr_nat[$pCode] = $r["nat"];
+ }
+
+ $flag_error = false;
+ foreach($p_rows as $idx => $r) {
+ $T_TestName= $r["T_TestName"] ;
+ $sasCode = $r["T_TestSasCode"];
+ if ( isset($arr_child[$sasCode]) ) {
+ $the_childs = $arr_child[$sasCode];
+ $p_rows[$idx]['child_test'] = json_encode($the_childs,true);
+ if ( isset($arr_nat[$sasCode] )) {
+ $p_rows[$idx]['nat_test'] = "[" . $arr_nat[$sasCode] . "]";
+ }
+ unset($p_rows[$idx]["Nat_TestNat_TestTypeID"]);
+ unset($p_rows[$idx]["T_TestSasCode"]);
+ } else {
+ unset($p_rows[$idx]);
+ }
+ }
+
+ foreach($p_rows as $r) {
+ $this->db->where("T_PriceM_MouID", $r["T_PriceM_MouID"]);
+ $this->db->where("T_TestID", $r["T_TestID"]);
+ $this->db->where("T_PriceIsCito", $r["T_PriceIsCito"]);
+ $qry = $this->db->update("ss_price_mou",$r);
+ if (! $qry ) {
+ return array(false, "Err Update Ss_priceMou " . print_r($this->db->error(),true));
+ }
+ }
+ $rows = array_merge($rows,$p_rows);
+ }
+ //Update Panel yang mengandung Test
+ $sql = "select
+ distinct T_PacketDetailT_PacketID
+ from
+ t_packetdetail
+ where T_PacketDetailIsActive = 'Y'
+ and T_PacketDetailT_TestID = ?";
+ $qry = $this->db->query($sql, array($testID));
+ if (!$qry) {
+ return array(false, print_r($this->db->error(),true));
+ }
+ $xrows = $qry->result_array();
+ $packet_ids = "0";
+ foreach($xrows as $r ) {
+ $packet_ids .= "," . $r["T_PacketDetailT_PacketID"];
+ }
+
+ $sql = "select distinct $mouID T_PriceM_MouID, T_PacketID T_TestID, T_PacketName T_TestName, 'N' IsFromPanel, 0 Nat_TestID,
+ T_PacketID T_PriceT_TestID, 'N' T_PriceIsCito, $companyID T_PriceM_CompanyID, $mouID T_PriceM_MouID,
+ 0 T_PricePriority, T_PacketOriginalBruto T_PriceAmount, 0 T_PriceDisc,
+ (T_PacketOriginalBruto - T_PacketPrice) T_PriceDiscRp, 0 T_PriceSubTotal,
+ 0 T_PriceOther, T_PacketPrice T_PriceTotal, 'Y' T_TestForceSell, 'Y' is_packet, T_PacketID packet_id,
+ T_PacketType px_type, '[]' nat_test, '[]' child_test, 'N' IsFavourite,
+ $mouID Ss_PriceMouM_MouID
+ from
+ t_packet
+ where
+ T_PacketIsActive = 'Y' and T_PacketID in ( $packet_ids )
+ and T_PacketM_MouID = ?";
+
+ $qry = $this->db->query($sql, array($mouID));
+ if (! $qry ) {
+ return array(false, print_r($this->db->error(),true));
+ }
+ $pn_rows = $qry->result_array();
+ foreach($pn_rows as $idx => $pnr) {
+ $packetID = $pnr["packet_id"];
+ //child test
+ $sql = "select $mouID T_PriceM_MouID, T_TestID, T_TestName, 'N' IsFromPanel, Nat_TestID,
+ T_TestID T_PriceT_TestID, 'N' T_PriceIsCito, $companyID T_PriceM_CompanyID,
+ $mouID T_PriceM_MouID, 0 T_PricePriority, T_PacketDetailPriceAmount T_PriceAmount,
+ T_PacketDetailPriceDisc T_PriceDisc, T_PacketDetailPriceDiscRp T_PriceDiscRp, T_PacketDetailPriceSubTotal T_PriceSubTotal,
+ 0 T_PriceOther, T_PacketDetailPrice T_PriceTotal,
+ 'Y' T_TestForceSell, 'N' is_packet, 0 packet_id,
+ 'PX' px_type, '[]' nat_test, '[]' child_test, 'N' IsFavourite, T_TestSasCode
+ from t_packetdetail
+ join t_test on T_PacketDetailT_TestID = T_TestID
+ and T_PacketDetailIsActive = 'Y' and T_TestIsActive = 'Y'
+ and T_PacketDetailT_PacketID = ?
+ join nat_test on T_TestNat_TestID = Nat_TestID
+ and Nat_TestIsActive = 'Y'
+";
+ $qry = $this->db->query($sql,array($packetID));
+ if (!$qry ) {
+ return array(false, print_r($this->db->error(),true));
+ }
+ $ct_rows = $qry->result_array();
+ $p_nat_test = array();
+ foreach($ct_rows as $ct_idx => $cr) {
+ $sasCode = $cr["T_TestSasCode"] . '%';
+ $sql = "select distinct T_TestNat_TestID
+ from t_test
+ where T_TestSasCode like ?
+ and T_TestIsActive = 'Y'";
+ $qry = $this->db->query($sql,array($sasCode));
+ if (!$qry ) {
+ return array(false, print_r($this->db->error(),true));
+ }
+ $nt_rows = $qry->result_array();
+ $t_rows = array();
+ foreach($nt_rows as $nr) {
+ $t_rows[] = intval( $nr["T_TestNat_TestID"]);
+ $p_nat_test[]= intval( $nr["T_TestNat_TestID"]);
+ }
+ $ct_rows[$ct_idx]['nat_test'] = json_encode($t_rows,JSON_NUMERIC_CHECK);
+ }
+ if (count($ct_rows) > 0 ) {
+ $x_arr = array();
+ foreach($ct_rows as $x_cr) {
+ $x_arr[] = $x_cr;
+ }
+ $pn_rows[$idx]['child_test'] = json_encode($x_arr,true);
+ $pn_rows[$idx]['nat_test'] = json_encode($p_nat_test,true);
+ }
+ unset($pn_rows[$idx]["Nat_TestNat_TestTypeID"]);
+ unset($pn_rows[$idx]["T_TestSasCode"]);
+ }
+ foreach($pn_rows as $r ) {
+ $this->db->where("T_PriceM_MouID", $r["T_PriceM_MouID"]);
+ $this->db->where("T_TestID", $r["T_TestID"]);
+ $this->db->where("T_PriceIsCito", $r["T_PriceIsCito"]);
+ $qry = $this->db->update("ss_price_mou",$r);
+ if (! $qry ) {
+ return array(false, print_r($this->db->error(),true));
+ }
+ }
+ $rows = array_merge($rows,$pn_rows);
+ return array(true,"OK",$rows);
+ }
+}
diff --git a/application/libraries/SsPriceMouPx.php b/application/libraries/SsPriceMouPx.php
new file mode 100644
index 00000000..25407c34
--- /dev/null
+++ b/application/libraries/SsPriceMouPx.php
@@ -0,0 +1,52 @@
+db = $CI->load->database("onedev",true);
+
+ $sql = "select * from ss_price_mou where Ss_PriceMouM_MouID = ? and px_type in ('PR','PXR')";
+ $qry = $this->db->query($sql, array($mouID));
+ if ( ! $qry ) {
+ return array(false, "Ss Price Mou " . print_r($this->db->error(),true));
+ }
+ $rows = $qry->result_array();
+ $sql ="delete from ss_price_mou_px where Ss_PriceMouPxSs_PriceMouID in ( select Ss_PriceMouID from ss_price_mou
+ where Ss_PriceMouM_MouID = ? )";
+ $qry = $this->db->query($sql, array($mouID));
+ if ( ! $qry ) {
+ return array(false, "Clear Ss Price Mou Px" . print_r($this->db->error(),true));
+ }
+ $a_data = array();
+ foreach($rows as $r) {
+ $j_ct = $r["child_test"];
+ $ct = json_decode($j_ct,true);
+ foreach($ct as $c) {
+ $a_data[] = array(
+ "Ss_PriceMouPxM_MouID" => $r["Ss_PriceMouM_MouID"],
+ "Ss_PriceMouPxSs_PriceMouID" => $r["Ss_PriceMouID"],
+ "Ss_PriceMouPxT_TestID" => $c["T_TestID"],
+ "Ss_PriceMouPxT_TestName" => $c["T_TestName"],
+ "Ss_PriceMouPxT_PriceIsCito" => $c["T_PriceIsCito"],
+ "Ss_PriceMouPxT_PriceM_CompanyID" => $c["T_PriceM_CompanyID"],
+ "Ss_PriceMouPxT_PricePriority" => $c["T_PricePriority"],
+ "Ss_PriceMouPxT_PriceAmount" => $c["T_PriceAmount"],
+ "Ss_PriceMouPxT_PriceDisc" => $c["T_PriceDisc"],
+ "Ss_PriceMouPxT_PriceDiscRp" => $c["T_PriceDiscRp"],
+ "Ss_PriceMouPxT_PriceSubTotal" => $c["T_PriceSubTotal"],
+ "Ss_PriceMouPxT_PriceOther" => $c["T_PriceOther"],
+ "Ss_PriceMouPxT_PriceTotal" => $c["T_PriceTotal"],
+ "Ss_PriceMouPxT_TestForceSell" => $c["T_TestForSell"],
+ "nat_test" => $c["nat_test"]
+ );
+ }
+ }
+ $qry = $this->db->insert_batch("ss_price_mou_px",$a_data);
+ if ( ! $qry ) {
+ return array(false, "Batch Ss Price Mou Px" . print_r($this->db->error(),true));
+ }
+
+ return array(true, "");
+ }
+}
diff --git a/application/libraries/Txbranchstatus-cabang.php b/application/libraries/Txbranchstatus-cabang.php
new file mode 100644
index 00000000..e6e9f469
--- /dev/null
+++ b/application/libraries/Txbranchstatus-cabang.php
@@ -0,0 +1,249 @@
+db = $CI->load->database("onedev",true);
+ $s_ids = join(",",$ids);
+ $sql = "select T_OrderDetailT_TestID, T_OrderDetailT_OrderHeaderID
+ from
+ t_orderdetail
+ where T_OrderDetailID in ($s_ids) ";
+ $qry = $this->db->query($sql);
+ $incomingRefID = 0;
+ $s_detail_ids = "0";
+ $s_child_ids = "0";
+ if ($qry) {
+ $rows = $qry->result_array();
+ if(count($rows) > 0 ) {
+ $headerID = $rows[0]["T_OrderDetailT_OrderHeaderID"];
+ $s_test = "0";
+ foreach($rows as $r) {
+ $s_test .= "," . $r["T_OrderDetailT_TestID"];
+ }
+ $sql = "select incomingRefDetailID , incomingRefDetailIncomingRefID
+ from incoming_ref_detail
+ where incomingRefDetailNewT_OrderHeaderID = ?
+ and incomingRefDetailT_TestID in ($s_test) ";
+ $qryd = $this->db->query($sql, array($headerID));
+ $flag_found = false;
+ if($qryd) {
+ $rowsd = $qryd->result_array();
+ if ( count($rowsd) > 0 ) {
+ $incomingRefID = $rowsd[0]["incomingRefDetailIncomingRefID"];
+ foreach($rowsd as $r) {
+ $s_detail_ids .= "," . $r["incomingRefDetailID"];
+ }
+ }
+ }
+ //check child
+ if(! $flag_found ) {
+ $sql = "select incomingRefChildID , incomingRefChildIncomingRefID
+ from incoming_ref_child
+ where incomingRefChildNewT_OrderHeaderID = ?
+ and incomingRefChildT_TestID in ($s_test) ";
+ $qryd = $this->db->query($sql, array($headerID));
+ if($qryd) {
+ $rowsd = $qryd->result_array();
+ if ( count($rowsd) > 0 ) {
+ $incomingRefID = $rowsd[0]["incomingRefChildIncomingRefID"];
+ foreach($rowsd as $r) {
+ $s_child_ids .= "," . $r["incomingRefChildID"];
+ }
+ }
+ }
+ }
+ }
+ }
+ if ($s_detail_ids == "0" && $s_child_ids == "0" ) {
+ return false;
+ }
+ $sql = "select M_BranchID, M_BranchIPAddress
+ from m_branch
+ join incoming_ref
+ on M_BranchID = incomingRefM_BranchID
+ where incomingRefID = ?";
+ $qry = $this->db->query($sql, array($incomingRefID));
+ $branchID = 0;
+ if ($qry) {
+ $rows = $qry->result_array();
+ if(count($rows)>0) {
+ $branchID = $rows[0]["M_BranchID"];
+ $branchIPAddress = $rows[0]["M_BranchIPAddress"];
+ }
+ }
+ if ($branchID == 0 ) {
+ return false;
+ }
+
+ $note = "$stage by $username";
+ if ($s_detail_ids!= "0" ) {
+ $sql = "select
+ incomingRefT_RefDeliveryOrderID,
+ incomingRefDetailT_OrderDetailID,
+ incomingRefDetailStatus,
+ T_OrderDetailResult,
+ T_OrderDetailNat_NormalValueID,
+ T_OrderDetailVerification,
+ T_OrderDetailValidation,
+ ? note
+ from incoming_ref_detail
+ join incoming_ref on incomingRefID = incomingRefDetailIncomingRefID
+ and incomingRefDetailID in ($s_detail_ids)
+ left join t_orderdetail on incomingRefDetailNewT_OrderHeaderID = T_OrderDetailT_OrderHeaderID
+ and T_OrderDetailIsActive = 'Y' and incomingRefDetailT_TestID = T_OrderDetailT_TestID";
+ $qry = $this->db->query($sql, array($note));
+ if ($qry) {
+ $rows = $qry->result_array();
+ $param = json_encode($rows);
+ //insert to
+ $sql = "insert into tx_branch_status(TxBranchStatusStage, TxBranchStatusM_BranchID,
+ TxBranchStatusM_BranchIP, TxBranchStatusJson,TxBranchStatusNote )
+ values (?,?,?,?,?)";
+ $qry = $this->db->query($sql, array($stage,$branchID, $branchIPAddress, $param, $note));
+ }
+ }
+ if ($s_child_ids!= "0" ) {
+ $sql = "select
+ incomingRefT_RefDeliveryOrderID,
+ incomingRefChildT_OrderDetailID incomingRefDetailT_OrderDetailID,
+ '' incomingRefDetailStatus,
+ T_OrderDetailResult,
+ T_OrderDetailNat_NormalValueID,
+ T_OrderDetailVerification,
+ T_OrderDetailValidation,
+ ? note
+ from incoming_ref_child
+ join incoming_ref on incomingRefID = incomingRefChildIncomingRefID
+ and incomingRefChildID in ($s_child_ids)
+ left join t_orderdetail on incomingRefChildNewT_OrderHeaderID = T_OrderDetailT_OrderHeaderID
+ and T_OrderDetailIsActive = 'Y' and incomingRefChildT_TestID = T_OrderDetailT_TestID";
+ $qry = $this->db->query($sql, array($note));
+ if ($qry) {
+ $rows = $qry->result_array();
+ $param = json_encode($rows);
+ //insert to
+ $sql = "insert into tx_branch_status(TxBranchStatusStage, TxBranchStatusM_BranchID,
+ TxBranchStatusM_BranchIP, TxBranchStatusJson,TxBranchStatusNote )
+ values (?,?,?,?,?)";
+ $qry = $this->db->query($sql, array($stage,$branchID, $branchIPAddress, $param, $note));
+ }
+ }
+ }
+
+ public function update($stage,$orderDetailID,$username)
+ {
+ $CI =& get_instance();
+ $this->db = $CI->load->database("onedev",true);
+ $sql = "select T_OrderDetailT_TestID, T_OrderDetailT_OrderHeaderID
+ from
+ t_orderdetail
+ where T_OrderDetailID = ? ";
+ $qry = $this->db->query($sql, array($orderDetailID));
+ $incomingRefID = 0;
+ $incomingRefDetailID = 0;
+ $flag_child = false;
+ if ($qry) {
+ $rows = $qry->result_array();
+ $flag_found = false;
+ if(count($rows) > 0 ) {
+ $headerID = $rows[0]["T_OrderDetailT_OrderHeaderID"];
+ $testID = $rows[0]["T_OrderDetailT_TestID"];
+ $sql = "select incomingRefDetailID , incomingRefDetailIncomingRefID
+ from incoming_ref_detail
+ where incomingRefDetailNewT_OrderHeaderID = ?
+ and incomingRefDetailT_TestID = ?";
+ $qryd = $this->db->query($sql, array($headerID,$testID));
+ if($qryd) {
+ $rowsd = $qryd->result_array();
+ if ( count($rowsd) > 0 ) {
+ $incomingRefID = $rowsd[0]["incomingRefDetailIncomingRefID"];
+ $incomingRefDetailID = $rowsd[0]["incomingRefDetailID"];
+ $flag_found = true;
+ }
+ }
+ //check child
+ if(! $flag_found ) {
+ $sql = "select incomingRefChildID , incomingRefChildIncomingRefID
+ from incoming_ref_child
+ where incomingRefChildNewT_OrderHeaderID = ?
+ and incomingRefChildT_TestID = ?";
+ $qryd = $this->db->query($sql, array($headerID,$testID));
+ if($qryd) {
+ $rowsd = $qryd->result_array();
+ if ( count($rowsd) > 0 ) {
+ $incomingRefID = $rowsd[0]["incomingRefChildIncomingRefID"];
+ $incomingRefDetailID = $rowsd[0]["incomingRefChildID"];
+ $flag_found = true;
+ $flag_child = true;
+ }
+ }
+ }
+ }
+ }
+ if ($incomingRefDetailID == 0 || $incomingRefDetailID == "") {
+ return false;
+ }
+ $sql = "select M_BranchID, M_BranchIPAddress
+ from m_branch
+ join incoming_ref
+ on M_BranchID = incomingRefM_BranchID
+ where incomingRefID = ?";
+ $qry = $this->db->query($sql, array($incomingRefID));
+ $branchID = 0;
+ if ($qry) {
+ $rows = $qry->result_array();
+ if(count($rows)>0) {
+ $branchID = $rows[0]["M_BranchID"];
+ $branchIPAddress = $rows[0]["M_BranchIPAddress"];
+ }
+ }
+ if ($branchID == 0 ) {
+ return false;
+ }
+
+ $note = "$stage by $username";
+ $sql = "select
+ incomingRefT_RefDeliveryOrderID,
+ incomingRefDetailT_OrderDetailID,
+ incomingRefDetailStatus,
+ T_OrderDetailResult,
+ T_OrderDetailNat_NormalValueID,
+ T_OrderDetailVerification,
+ T_OrderDetailValidation,
+ ? note
+ from incoming_ref_detail
+ join incoming_ref on incomingRefID = incomingRefDetailIncomingRefID
+ and incomingRefDetailID = ?
+ left join t_orderdetail on incomingRefDetailNewT_OrderHeaderID = T_OrderDetailT_OrderHeaderID
+ and T_OrderDetailIsActive = 'Y' and incomingRefDetailT_TestID = T_OrderDetailT_TestID";
+ if ($flag_child ) {
+ $sql = "select
+ incomingRefT_RefDeliveryOrderID,
+ incomingRefChildT_OrderDetailID incomingRefDetailT_OrderDetailID,
+ '' incomingRefDetailStatus,
+ T_OrderDetailResult,
+ T_OrderDetailNat_NormalValueID,
+ T_OrderDetailVerification,
+ T_OrderDetailValidation,
+ ? note
+ from incoming_ref_child
+ join incoming_ref on incomingRefID = incomingRefChildIncomingRefID
+ and incomingRefChildID = ?
+ left join t_orderdetail on incomingRefChildNewT_OrderHeaderID = T_OrderDetailT_OrderHeaderID
+ and T_OrderDetailIsActive = 'Y' and incomingRefChildT_TestID = T_OrderDetailT_TestID";
+ }
+ $qry = $this->db->query($sql, array($note, $incomingRefDetailID));
+ if ($qry) {
+ $rows = $qry->result_array();
+ $param = json_encode($rows);
+ //insert to
+ $sql = "insert into tx_branch_status(TxBranchStatusStage, TxBranchStatusM_BranchID,
+ TxBranchStatusM_BranchIP, TxBranchStatusJson,TxBranchStatusNote )
+ values (?,?,?,?,?)";
+ $qry = $this->db->query($sql, array($stage,$branchID, $branchIPAddress, $param, $note));
+ }
+ }
+}
diff --git a/application/libraries/Txbranchstatus.php b/application/libraries/Txbranchstatus.php
new file mode 100644
index 00000000..75fb2d56
--- /dev/null
+++ b/application/libraries/Txbranchstatus.php
@@ -0,0 +1,300 @@
+db = $CI->load->database("onedev",true);
+ $s_ids = join(",",$ids);
+ $sql = "select T_OrderDetailT_TestID, T_OrderDetailT_OrderHeaderID
+ from
+ t_orderdetail
+ where T_OrderDetailID in ($s_ids) ";
+ $qry = $this->db->query($sql);
+ $incomingRefID = 0;
+ $s_detail_ids = "0";
+ $s_child_ids = "0";
+ $headerID = 0;
+
+ if ($qry) {
+ $rows = $qry->result_array();
+ if(count($rows) > 0 ) {
+ $headerID = $rows[0]["T_OrderDetailT_OrderHeaderID"];
+ $s_test = "0";
+ foreach($rows as $r) {
+ $s_test .= "," . $r["T_OrderDetailT_TestID"];
+ }
+ $sql = "select incomingRefDetailID , incomingRefDetailIncomingRefID
+ from incoming_ref_detail
+ where incomingRefDetailNewT_OrderHeaderID = ?
+ and incomingRefDetailT_TestID in ($s_test) ";
+ $qryd = $this->db->query($sql, array($headerID));
+ $flag_found = false;
+ if($qryd) {
+ $rowsd = $qryd->result_array();
+ if ( count($rowsd) > 0 ) {
+ $incomingRefID = $rowsd[0]["incomingRefDetailIncomingRefID"];
+ foreach($rowsd as $r) {
+ $s_detail_ids .= "," . $r["incomingRefDetailID"];
+ }
+ }
+ }
+ //check child
+ if(! $flag_found ) {
+ $sql = "select incomingRefChildID , incomingRefChildIncomingRefID
+ from incoming_ref_child
+ where incomingRefChildNewT_OrderHeaderID = ?
+ and incomingRefChildT_TestID in ($s_test) ";
+ $qryd = $this->db->query($sql, array($headerID));
+ if($qryd) {
+ $rowsd = $qryd->result_array();
+ if ( count($rowsd) > 0 ) {
+ $incomingRefID = $rowsd[0]["incomingRefChildIncomingRefID"];
+ foreach($rowsd as $r) {
+ $s_child_ids .= "," . $r["incomingRefChildID"];
+ }
+ }
+ }
+ }
+ }
+ }
+ if ($s_detail_ids == "0" && $s_child_ids == "0" ) {
+ return false;
+ }
+ $sql = "select M_BranchID, M_BranchIPAddress
+ from m_branch
+ join incoming_ref
+ on M_BranchID = incomingRefM_BranchID
+ where incomingRefID = ?";
+ $qry = $this->db->query($sql, array($incomingRefID));
+ $branchID = 0;
+ if ($qry) {
+ $rows = $qry->result_array();
+ if(count($rows)>0) {
+ $branchID = $rows[0]["M_BranchID"];
+ $branchIPAddress = $rows[0]["M_BranchIPAddress"];
+ }
+ }
+ if ($branchID == 0 ) {
+ return false;
+ }
+ $val_note = "";
+ $val_note_int = "";
+ if ($headerID > 0 ) {
+ $sql = "select T_OrderHeaderAddOnValidationNote, T_OrderHeaderAddOnValidationInternal
+ from t_orderheaderaddon
+ where T_orderHeaderAddOnT_OrderHeaderID = ?";
+ $qry = $this->db->query($sql,array($headerID));
+ if ($qry) {
+ $rows = $qry->result_array();
+ if (count($rows) > 0 ) {
+ $val_note = $rows[0]["T_OrderHeaderAddOnValidationNote"];
+ $val_note_int = $rows[0]["T_OrderHeaderAddOnValidationInternal"];
+ if ( $val_note == null ) $val_note = "";
+ if ( $val_note_int == null ) $val_note_int = "";
+ }
+ }
+ }
+ $note = "$stage by $username";
+ if ($s_detail_ids!= "0" ) {
+ $sql = "select
+ incomingRefT_RefDeliveryOrderID,
+ incomingRefDetailID,
+ incomingRefDetailT_OrderDetailID,
+ incomingRefDetailStatus,
+ T_OrderDetailResult,
+ T_OrderDetailNat_NormalValueID,
+ T_OrderDetailVerification,
+ T_OrderDetailValidation,
+ T_OrderDetailNote,
+ ? note,
+ ? validation_note,
+ ? validation_note_internal
+ from incoming_ref_detail
+ join incoming_ref on incomingRefID = incomingRefDetailIncomingRefID
+ and incomingRefDetailID in ($s_detail_ids)
+ left join t_orderdetail on incomingRefDetailNewT_OrderHeaderID = T_OrderDetailT_OrderHeaderID
+ and T_OrderDetailIsActive = 'Y' and incomingRefDetailT_TestID = T_OrderDetailT_TestID";
+ $qry = $this->db->query($sql, array($note,$val_note,$val_note_int));
+ if ($qry) {
+ $rows = $qry->result_array();
+ $param = json_encode($rows);
+ //insert to
+ $sql = "insert into tx_branch_status(TxBranchStatusStage, TxBranchStatusM_BranchID,
+ TxBranchStatusM_BranchIP, TxBranchStatusJson,TxBranchStatusNote )
+ values (?,?,?,?,?)";
+ $qry = $this->db->query($sql, array($stage,$branchID, $branchIPAddress, $param, $note));
+ }
+ }
+ if ($s_child_ids!= "0" ) {
+ $sql = "select
+ incomingRefT_RefDeliveryOrderID,
+ incomingRefChildID,
+ incomingRefChildT_OrderDetailID incomingRefDetailT_OrderDetailID,
+ '' incomingRefDetailStatus,
+ T_OrderDetailResult,
+ T_OrderDetailNat_NormalValueID,
+ T_OrderDetailVerification,
+ T_OrderDetailValidation,
+ T_OrderDetailNote,
+ ? note,
+ ? validation_note,
+ ? validation_note_internal
+ from incoming_ref_child
+ join incoming_ref on incomingRefID = incomingRefChildIncomingRefID
+ and incomingRefChildID in ($s_child_ids)
+ left join t_orderdetail on incomingRefChildNewT_OrderHeaderID = T_OrderDetailT_OrderHeaderID
+ and T_OrderDetailIsActive = 'Y' and incomingRefChildT_TestID = T_OrderDetailT_TestID";
+ $qry = $this->db->query($sql, array($note,$val_note,$val_note_int));
+ if ($qry) {
+ $rows = $qry->result_array();
+ $param = json_encode($rows);
+ //insert to
+ $sql = "insert into tx_branch_status(TxBranchStatusStage, TxBranchStatusM_BranchID,
+ TxBranchStatusM_BranchIP, TxBranchStatusJson,TxBranchStatusNote )
+ values (?,?,?,?,?)";
+ $qry = $this->db->query($sql, array($stage,$branchID, $branchIPAddress, $param, $note));
+ }
+ }
+ }
+
+ public function update($stage,$orderDetailID,$username)
+ {
+ $CI =& get_instance();
+ $this->db = $CI->load->database("onedev",true);
+ $sql = "select T_OrderDetailT_TestID, T_OrderDetailT_OrderHeaderID
+ from
+ t_orderdetail
+ where T_OrderDetailID = ? ";
+ $qry = $this->db->query($sql, array($orderDetailID));
+ $incomingRefID = 0;
+ $incomingRefDetailID = 0;
+ $flag_child = false;
+ if ($qry) {
+ $rows = $qry->result_array();
+ $flag_found = false;
+ if(count($rows) > 0 ) {
+ $headerID = $rows[0]["T_OrderDetailT_OrderHeaderID"];
+ $testID = $rows[0]["T_OrderDetailT_TestID"];
+ $sql = "select incomingRefDetailID , incomingRefDetailIncomingRefID
+ from incoming_ref_detail
+ where incomingRefDetailNewT_OrderHeaderID = ?
+ and incomingRefDetailT_TestID = ?";
+ $qryd = $this->db->query($sql, array($headerID,$testID));
+ if($qryd) {
+ $rowsd = $qryd->result_array();
+ if ( count($rowsd) > 0 ) {
+ $incomingRefID = $rowsd[0]["incomingRefDetailIncomingRefID"];
+ $incomingRefDetailID = $rowsd[0]["incomingRefDetailID"];
+ $flag_found = true;
+ }
+ }
+ //check child
+ if(! $flag_found ) {
+ $sql = "select incomingRefChildID , incomingRefChildIncomingRefID
+ from incoming_ref_child
+ where incomingRefChildNewT_OrderHeaderID = ?
+ and incomingRefChildT_TestID = ?";
+ $qryd = $this->db->query($sql, array($headerID,$testID));
+ if($qryd) {
+ $rowsd = $qryd->result_array();
+ if ( count($rowsd) > 0 ) {
+ $incomingRefID = $rowsd[0]["incomingRefChildIncomingRefID"];
+ $incomingRefDetailID = $rowsd[0]["incomingRefChildID"];
+ $flag_found = true;
+ $flag_child = true;
+ }
+ }
+ }
+ }
+ }
+ if ($incomingRefDetailID == 0 || $incomingRefDetailID == "") {
+ return false;
+ }
+ $sql = "select M_BranchID, M_BranchIPAddress
+ from m_branch
+ join incoming_ref
+ on M_BranchID = incomingRefM_BranchID
+ where incomingRefID = ?";
+ $qry = $this->db->query($sql, array($incomingRefID));
+ $branchID = 0;
+ if ($qry) {
+ $rows = $qry->result_array();
+ if(count($rows)>0) {
+ $branchID = $rows[0]["M_BranchID"];
+ $branchIPAddress = $rows[0]["M_BranchIPAddress"];
+ }
+ }
+ if ($branchID == 0 ) {
+ return false;
+ }
+
+ $val_note = "";
+ $val_note_int = "";
+ if ($headerID > 0 ) {
+ $sql = "select T_OrderHeaderAddOnValidationNote, T_OrderHeaderAddOnValidationInternal
+ from t_orderheaderaddon
+ where T_orderHeaderAddOnT_OrderHeaderID = ?";
+ $qry = $this->db->query($sql,array($headerID));
+ if ($qry) {
+ $rows = $qry->result_array();
+ if (count($rows) > 0 ) {
+ $val_note = $rows[0]["T_OrderHeaderAddOnValidationNote"];
+ $val_note_int = $rows[0]["T_OrderHeaderAddOnValidationInternal"];
+ if ( $val_note == null ) $val_note = "";
+ if ( $val_note_int == null ) $val_note_int = "";
+ }
+ }
+ }
+ $note = "$stage by $username";
+ $sql = "select
+ incomingRefT_RefDeliveryOrderID,
+ incomingRefDetailID,
+ incomingRefDetailT_OrderDetailID,
+ incomingRefDetailStatus,
+ T_OrderDetailResult,
+ T_OrderDetailNat_NormalValueID,
+ T_OrderDetailVerification,
+ T_OrderDetailValidation,
+ T_OrderDetailNote,
+ ? note,
+ ? validation_note,
+ ? validation_note_internal
+ from incoming_ref_detail
+ join incoming_ref on incomingRefID = incomingRefDetailIncomingRefID
+ and incomingRefDetailID = ?
+ left join t_orderdetail on incomingRefDetailNewT_OrderHeaderID = T_OrderDetailT_OrderHeaderID
+ and T_OrderDetailIsActive = 'Y' and incomingRefDetailT_TestID = T_OrderDetailT_TestID";
+ if ($flag_child ) {
+ $sql = "select
+ incomingRefT_RefDeliveryOrderID,
+ incomingRefChildID,
+ incomingRefChildT_OrderDetailID incomingRefDetailT_OrderDetailID,
+ '' incomingRefDetailStatus,
+ T_OrderDetailResult,
+ T_OrderDetailNat_NormalValueID,
+ T_OrderDetailVerification,
+ T_OrderDetailValidation,
+ T_OrderDetailNote,
+ ? note,
+ ? validation_note,
+ ? validation_note_internal
+ from incoming_ref_child
+ join incoming_ref on incomingRefID = incomingRefChildIncomingRefID
+ and incomingRefChildID = ?
+ left join t_orderdetail on incomingRefChildNewT_OrderHeaderID = T_OrderDetailT_OrderHeaderID
+ and T_OrderDetailIsActive = 'Y' and incomingRefChildT_TestID = T_OrderDetailT_TestID";
+ }
+ $qry = $this->db->query($sql, array($note, $val_note, $val_note_int, $incomingRefDetailID));
+ if ($qry) {
+ $rows = $qry->result_array();
+ $param = json_encode($rows);
+ //insert to
+ $sql = "insert into tx_branch_status(TxBranchStatusStage, TxBranchStatusM_BranchID,
+ TxBranchStatusM_BranchIP, TxBranchStatusJson,TxBranchStatusNote )
+ values (?,?,?,?,?)";
+ $qry = $this->db->query($sql, array($stage,$branchID, $branchIPAddress, $param, $note));
+ }
+ }
+}
diff --git a/application/libraries/Txbranchstatus_updated.php b/application/libraries/Txbranchstatus_updated.php
new file mode 100644
index 00000000..79eba71b
--- /dev/null
+++ b/application/libraries/Txbranchstatus_updated.php
@@ -0,0 +1,296 @@
+db = $CI->load->database("onedev",true);
+ $s_ids = join(",",$ids);
+ $sql = "select T_OrderDetailT_TestID, T_OrderDetailT_OrderHeaderID
+ from
+ t_orderdetail
+ where T_OrderDetailID in ($s_ids) ";
+ $qry = $this->db->query($sql);
+ $incomingRefID = 0;
+ $s_detail_ids = "0";
+ $s_child_ids = "0";
+ $headerID = 0;
+
+ if ($qry) {
+ $rows = $qry->result_array();
+ if(count($rows) > 0 ) {
+ $headerID = $rows[0]["T_OrderDetailT_OrderHeaderID"];
+ $s_test = "0";
+ foreach($rows as $r) {
+ $s_test .= "," . $r["T_OrderDetailT_TestID"];
+ }
+ $sql = "select incomingRefDetailID , incomingRefDetailIncomingRefID
+ from incoming_ref_detail
+ where incomingRefDetailNewT_OrderHeaderID = ?
+ and incomingRefDetailT_TestID in ($s_test) ";
+ $qryd = $this->db->query($sql, array($headerID));
+ $flag_found = false;
+ if($qryd) {
+ $rowsd = $qryd->result_array();
+ if ( count($rowsd) > 0 ) {
+ $incomingRefID = $rowsd[0]["incomingRefDetailIncomingRefID"];
+ foreach($rowsd as $r) {
+ $s_detail_ids .= "," . $r["incomingRefDetailID"];
+ }
+ }
+ }
+ //check child
+ if(! $flag_found ) {
+ $sql = "select incomingRefChildID , incomingRefChildIncomingRefID
+ from incoming_ref_child
+ where incomingRefChildNewT_OrderHeaderID = ?
+ and incomingRefChildT_TestID in ($s_test) ";
+ $qryd = $this->db->query($sql, array($headerID));
+ if($qryd) {
+ $rowsd = $qryd->result_array();
+ if ( count($rowsd) > 0 ) {
+ $incomingRefID = $rowsd[0]["incomingRefChildIncomingRefID"];
+ foreach($rowsd as $r) {
+ $s_child_ids .= "," . $r["incomingRefChildID"];
+ }
+ }
+ }
+ }
+ }
+ }
+ if ($s_detail_ids == "0" && $s_child_ids == "0" ) {
+ return false;
+ }
+ $sql = "select M_BranchID, M_BranchIPAddress
+ from m_branch
+ join incoming_ref
+ on M_BranchID = incomingRefM_BranchID
+ where incomingRefID = ?";
+ $qry = $this->db->query($sql, array($incomingRefID));
+ $branchID = 0;
+ if ($qry) {
+ $rows = $qry->result_array();
+ if(count($rows)>0) {
+ $branchID = $rows[0]["M_BranchID"];
+ $branchIPAddress = $rows[0]["M_BranchIPAddress"];
+ }
+ }
+ if ($branchID == 0 ) {
+ return false;
+ }
+ $val_note = "";
+ $val_note_int = "";
+ if ($headerID > 0 ) {
+ $sql = "select T_OrderHeaderAddOnValidationNote, T_OrderHeaderAddOnValidationInternal
+ from t_orderheaderaddon
+ where T_orderHeaderAddOnT_OrderHeaderID = ?";
+ $qry = $this->db->query($sql,array($headerID));
+ if ($qry) {
+ $rows = $qry->result_array();
+ if (count($rows) > 0 ) {
+ $val_note = $rows[0]["T_OrderHeaderAddOnValidationNote"];
+ $val_note_int = $rows[0]["T_OrderHeaderAddOnValidationInternal"];
+ if ( $val_note == null ) $val_note = "";
+ if ( $val_note_int == null ) $val_note_int = "";
+ }
+ }
+ }
+ $note = "$stage by $username";
+ if ($s_detail_ids!= "0" ) {
+ $sql = "select
+ incomingRefT_RefDeliveryOrderID,
+ incomingRefDetailT_OrderDetailID,
+ incomingRefDetailStatus,
+ T_OrderDetailResult,
+ T_OrderDetailNat_NormalValueID,
+ T_OrderDetailVerification,
+ T_OrderDetailValidation,
+ T_OrderDetailNote,
+ ? note,
+ ? validation_note,
+ ? validation_note_internal
+ from incoming_ref_detail
+ join incoming_ref on incomingRefID = incomingRefDetailIncomingRefID
+ and incomingRefDetailID in ($s_detail_ids)
+ left join t_orderdetail on incomingRefDetailNewT_OrderHeaderID = T_OrderDetailT_OrderHeaderID
+ and T_OrderDetailIsActive = 'Y' and incomingRefDetailT_TestID = T_OrderDetailT_TestID";
+ $qry = $this->db->query($sql, array($note,$val_note,$val_note_int));
+ if ($qry) {
+ $rows = $qry->result_array();
+ $param = json_encode($rows);
+ //insert to
+ $sql = "insert into tx_branch_status(TxBranchStatusStage, TxBranchStatusM_BranchID,
+ TxBranchStatusM_BranchIP, TxBranchStatusJson,TxBranchStatusNote )
+ values (?,?,?,?,?)";
+ $qry = $this->db->query($sql, array($stage,$branchID, $branchIPAddress, $param, $note));
+ }
+ }
+ if ($s_child_ids!= "0" ) {
+ $sql = "select
+ incomingRefT_RefDeliveryOrderID,
+ incomingRefChildT_OrderDetailID incomingRefDetailT_OrderDetailID,
+ '' incomingRefDetailStatus,
+ T_OrderDetailResult,
+ T_OrderDetailNat_NormalValueID,
+ T_OrderDetailVerification,
+ T_OrderDetailValidation,
+ T_OrderDetailNote,
+ ? note,
+ ? validation_note,
+ ? validation_note_internal
+ from incoming_ref_child
+ join incoming_ref on incomingRefID = incomingRefChildIncomingRefID
+ and incomingRefChildID in ($s_child_ids)
+ left join t_orderdetail on incomingRefChildNewT_OrderHeaderID = T_OrderDetailT_OrderHeaderID
+ and T_OrderDetailIsActive = 'Y' and incomingRefChildT_TestID = T_OrderDetailT_TestID";
+ $qry = $this->db->query($sql, array($note,$val_note,$val_note_int));
+ if ($qry) {
+ $rows = $qry->result_array();
+ $param = json_encode($rows);
+ //insert to
+ $sql = "insert into tx_branch_status(TxBranchStatusStage, TxBranchStatusM_BranchID,
+ TxBranchStatusM_BranchIP, TxBranchStatusJson,TxBranchStatusNote )
+ values (?,?,?,?,?)";
+ $qry = $this->db->query($sql, array($stage,$branchID, $branchIPAddress, $param, $note));
+ }
+ }
+ }
+
+ public function update($stage,$orderDetailID,$username)
+ {
+ $CI =& get_instance();
+ $this->db = $CI->load->database("onedev",true);
+ $sql = "select T_OrderDetailT_TestID, T_OrderDetailT_OrderHeaderID
+ from
+ t_orderdetail
+ where T_OrderDetailID = ? ";
+ $qry = $this->db->query($sql, array($orderDetailID));
+ $incomingRefID = 0;
+ $incomingRefDetailID = 0;
+ $flag_child = false;
+ if ($qry) {
+ $rows = $qry->result_array();
+ $flag_found = false;
+ if(count($rows) > 0 ) {
+ $headerID = $rows[0]["T_OrderDetailT_OrderHeaderID"];
+ $testID = $rows[0]["T_OrderDetailT_TestID"];
+ $sql = "select incomingRefDetailID , incomingRefDetailIncomingRefID
+ from incoming_ref_detail
+ where incomingRefDetailNewT_OrderHeaderID = ?
+ and incomingRefDetailT_TestID = ?";
+ $qryd = $this->db->query($sql, array($headerID,$testID));
+ if($qryd) {
+ $rowsd = $qryd->result_array();
+ if ( count($rowsd) > 0 ) {
+ $incomingRefID = $rowsd[0]["incomingRefDetailIncomingRefID"];
+ $incomingRefDetailID = $rowsd[0]["incomingRefDetailID"];
+ $flag_found = true;
+ }
+ }
+ //check child
+ if(! $flag_found ) {
+ $sql = "select incomingRefChildID , incomingRefChildIncomingRefID
+ from incoming_ref_child
+ where incomingRefChildNewT_OrderHeaderID = ?
+ and incomingRefChildT_TestID = ?";
+ $qryd = $this->db->query($sql, array($headerID,$testID));
+ if($qryd) {
+ $rowsd = $qryd->result_array();
+ if ( count($rowsd) > 0 ) {
+ $incomingRefID = $rowsd[0]["incomingRefChildIncomingRefID"];
+ $incomingRefDetailID = $rowsd[0]["incomingRefChildID"];
+ $flag_found = true;
+ $flag_child = true;
+ }
+ }
+ }
+ }
+ }
+ if ($incomingRefDetailID == 0 || $incomingRefDetailID == "") {
+ return false;
+ }
+ $sql = "select M_BranchID, M_BranchIPAddress
+ from m_branch
+ join incoming_ref
+ on M_BranchID = incomingRefM_BranchID
+ where incomingRefID = ?";
+ $qry = $this->db->query($sql, array($incomingRefID));
+ $branchID = 0;
+ if ($qry) {
+ $rows = $qry->result_array();
+ if(count($rows)>0) {
+ $branchID = $rows[0]["M_BranchID"];
+ $branchIPAddress = $rows[0]["M_BranchIPAddress"];
+ }
+ }
+ if ($branchID == 0 ) {
+ return false;
+ }
+
+ $val_note = "";
+ $val_note_int = "";
+ if ($headerID > 0 ) {
+ $sql = "select T_OrderHeaderAddOnValidationNote, T_OrderHeaderAddOnValidationInternal
+ from t_orderheaderaddon
+ where T_orderHeaderAddOnT_OrderHeaderID = ?";
+ $qry = $this->db->query($sql,array($headerID));
+ if ($qry) {
+ $rows = $qry->result_array();
+ if (count($rows) > 0 ) {
+ $val_note = $rows[0]["T_OrderHeaderAddOnValidationNote"];
+ $val_note_int = $rows[0]["T_OrderHeaderAddOnValidationInternal"];
+ if ( $val_note == null ) $val_note = "";
+ if ( $val_note_int == null ) $val_note_int = "";
+ }
+ }
+ }
+ $note = "$stage by $username";
+ $sql = "select
+ incomingRefT_RefDeliveryOrderID,
+ incomingRefDetailT_OrderDetailID,
+ incomingRefDetailStatus,
+ T_OrderDetailResult,
+ T_OrderDetailNat_NormalValueID,
+ T_OrderDetailVerification,
+ T_OrderDetailValidation,
+ T_OrderDetailNote,
+ ? note,
+ ? validation_note,
+ ? validation_note_internal
+ from incoming_ref_detail
+ join incoming_ref on incomingRefID = incomingRefDetailIncomingRefID
+ and incomingRefDetailID = ?
+ left join t_orderdetail on incomingRefDetailNewT_OrderHeaderID = T_OrderDetailT_OrderHeaderID
+ and T_OrderDetailIsActive = 'Y' and incomingRefDetailT_TestID = T_OrderDetailT_TestID";
+ if ($flag_child ) {
+ $sql = "select
+ incomingRefT_RefDeliveryOrderID,
+ incomingRefChildT_OrderDetailID incomingRefDetailT_OrderDetailID,
+ '' incomingRefDetailStatus,
+ T_OrderDetailResult,
+ T_OrderDetailNat_NormalValueID,
+ T_OrderDetailVerification,
+ T_OrderDetailValidation,
+ T_OrderDetailNote,
+ ? note,
+ ? validation_note,
+ ? validation_note_internal
+ from incoming_ref_child
+ join incoming_ref on incomingRefID = incomingRefChildIncomingRefID
+ and incomingRefChildID = ?
+ left join t_orderdetail on incomingRefChildNewT_OrderHeaderID = T_OrderDetailT_OrderHeaderID
+ and T_OrderDetailIsActive = 'Y' and incomingRefChildT_TestID = T_OrderDetailT_TestID";
+ }
+ $qry = $this->db->query($sql, array($note, $val_note, $val_note_int, $incomingRefDetailID));
+ if ($qry) {
+ $rows = $qry->result_array();
+ $param = json_encode($rows);
+ //insert to
+ $sql = "insert into tx_branch_status(TxBranchStatusStage, TxBranchStatusM_BranchID,
+ TxBranchStatusM_BranchIP, TxBranchStatusJson,TxBranchStatusNote )
+ values (?,?,?,?,?)";
+ $qry = $this->db->query($sql, array($stage,$branchID, $branchIPAddress, $param, $note));
+ }
+ }
+}
diff --git a/application/libraries/Wa_krmv3.php b/application/libraries/Wa_krmv3.php
new file mode 100644
index 00000000..7aeffea7
--- /dev/null
+++ b/application/libraries/Wa_krmv3.php
@@ -0,0 +1,63 @@
+client = new ClientV3([
+ "deviceId" => $this->device_id,
+ "refreshToken" => $this->refresh_token,
+ "idToken" => $this->id_token
+ ]);
+ }
+ function upload($url)
+ {
+ //create tmp file
+ $fname = tempnam("/tmp", "rpt") . "-rpt.pdf";
+ file_put_contents($fname, file_get_contents($url));
+ $resp = $this->client->upload($fname);
+ unlink($fname);
+ return $resp;
+ }
+ function send_qrcode($phone, $url, $name, $date)
+ {
+ $urlImg = $this->upload($url);
+ $message = [$name, $date];
+ $resp = $this->client->sendMessageTemplateImage($phone, $this->template, "id", $message, $urlImg);
+ return json_decode($resp, true);
+ }
+ function send_otp($phone, $otp)
+ {
+ $resp = $this->client->sendMessageTemplateAuthentication($phone, "pramitamobileotp", "id", $otp);
+ return json_decode($resp, true);
+ }
+ function send_rujukan_external_process($phone, $phone_cabang)
+ {
+
+ $message = [$phone_cabang];
+ $resp = $this->client->sendMessageTemplateText($phone, "rujukan01", "id", $message);
+ return json_decode($resp, true);
+ }
+ function send_eform($phone, $kode_cabang, $nolab, $type = "")
+ {
+
+ $message = [$kode_cabang, $nolab];
+ $resp = $this->client->sendMessageTemplateText($phone, "eform_fisik", "id", $message);
+ return json_decode($resp, true);
+ }
+ function send_msg_button($phone, $url)
+ {
+ $body = ["hello", "world", "there"];
+ $resp = $this->client->sendMessageTemplateButton($phone, "sample-message-button", "id", $body, $url);
+ return json_decode($resp, true);
+ }
+}
diff --git a/application/libraries/Wa_sas.php b/application/libraries/Wa_sas.php
new file mode 100644
index 00000000..56724214
--- /dev/null
+++ b/application/libraries/Wa_sas.php
@@ -0,0 +1,159 @@
+host = "http://sasdev.jala.my.id:3000/send/";
+ //$this->host = "http://139.59.235.205:3000/send/";
+ $this->host = "http://devkedungdoro.aplikasi.web.id:7001/send/";
+ $this->username = "sasdev";
+ $this->password = "sasdev!#102938";
+ }
+ function fix_phone($phone)
+ {
+ //remove - and space
+ $phone = str_replace("-", "", $phone);
+ $phone = str_replace(" ", "", $phone);
+ //remove 1st +
+ if (substr($phone, 0, 1) == "+") {
+ $phone = substr($phone, 1);
+ }
+ if (substr($phone, 0, 1) == "0") {
+ $phone = "62" . substr($phone, 1);
+ }
+ if (substr($phone, 0, 2) != "62") {
+ $phone = "62" . $phone;
+ }
+ return $phone;
+ }
+
+ function send_image_group(
+ $phone,
+ $caption,
+ $url_image,
+ $contentType,
+ $file_name,
+ $extension,
+ $view_once = false,
+ $compress = false
+ ) {
+ $tmpFile = tempnam(sys_get_temp_dir(), 'sasdev') . ".$extension";
+ file_put_contents($tmpFile, file_get_contents($url_image));
+ $data = [
+ "phone" => $phone,
+ "caption" => $caption,
+ "view_once" => $view_once,
+ "compress" => $compress,
+ "image" => curl_file_create($tmpFile, $contentType, $file_name)
+ ];
+ $ch = curl_init($this->host . "image");
+ //curl_setopt($ch, CURLOPT_HEADER, 1);
+ curl_setopt($ch, CURLOPT_USERPWD, $this->username . ":" . $this->password);
+ curl_setopt($ch, CURLOPT_TIMEOUT, 30);
+ curl_setopt($ch, CURLOPT_POST, 1);
+ curl_setopt($ch, CURLOPT_POSTFIELDS, $data);
+ curl_setopt($ch, CURLOPT_RETURNTRANSFER, TRUE);
+ curl_setopt($ch, CURLOPT_HTTPHEADER, array('Content-Type: multipart/form-data'));
+ $return = curl_exec($ch);
+ curl_close($ch);
+ unlink($tmpFile);
+ $j_return = json_decode($return, true);
+ if (json_last_error() != 0) {
+ return ["code" => "ERROR", "message" => "Error Json Decode : $return"];
+ }
+ return $j_return;
+ }
+ function send_message($phone, $message, $is_group = false)
+ {
+ $data = [
+ "phone" => $is_group ? $phone : $this->fix_phone($phone),
+ "message" => $message
+ ];
+ $ch = curl_init($this->host . "message");
+ curl_setopt($ch, CURLOPT_USERPWD, $this->username . ":" . $this->password);
+ curl_setopt($ch, CURLOPT_TIMEOUT, 30);
+ curl_setopt($ch, CURLOPT_POST, 1);
+ curl_setopt($ch, CURLOPT_POSTFIELDS, $data);
+ curl_setopt($ch, CURLOPT_RETURNTRANSFER, TRUE);
+ $return = curl_exec($ch);
+ curl_close($ch);
+ $j_return = json_decode($return, true);
+
+ if (json_last_error() != 0) {
+ return ["code" => "ERROR", "message" => "Error Json Decode : $return"];
+ }
+ return $j_return;
+ }
+ function send_image(
+ $phone,
+ $caption,
+ $url_image,
+ $contentType,
+ $file_name,
+ $extension,
+ $view_once = false,
+ $compress = false
+ ) {
+ $tmpFile = tempnam(sys_get_temp_dir(), 'sasdev') . ".$extension";
+ file_put_contents($tmpFile, file_get_contents($url_image));
+ $data = [
+ "phone" => $this->fix_phone($phone),
+ "caption" => $caption,
+ "view_once" => $view_once,
+ "compress" => $compress,
+ "image" => curl_file_create($tmpFile, $contentType, $file_name)
+ ];
+ $ch = curl_init($this->host . "image");
+ //curl_setopt($ch, CURLOPT_HEADER, 1);
+ curl_setopt($ch, CURLOPT_USERPWD, $this->username . ":" . $this->password);
+ curl_setopt($ch, CURLOPT_TIMEOUT, 30);
+ curl_setopt($ch, CURLOPT_POST, 1);
+ curl_setopt($ch, CURLOPT_POSTFIELDS, $data);
+ curl_setopt($ch, CURLOPT_RETURNTRANSFER, TRUE);
+ curl_setopt($ch, CURLOPT_HTTPHEADER, array('Content-Type: multipart/form-data'));
+ $return = curl_exec($ch);
+ curl_close($ch);
+ unlink($tmpFile);
+ $j_return = json_decode($return, true);
+ if (json_last_error() != 0) {
+ return ["code" => "ERROR", "message" => "Error Json Decode : $return"];
+ }
+ return $j_return;
+ }
+ function send_file(
+ $phone,
+ $caption,
+ $url_file,
+ $contentType,
+ $file_name,
+ $extension,
+ $compress = false
+ ) {
+ $tmpFile = tempnam(sys_get_temp_dir(), 'sasdev') . ".$extension";
+ file_put_contents($tmpFile, file_get_contents($url_file));
+ $data = [
+ "phone" => $this->fix_phone($phone),
+ "caption" => $caption,
+ "compress" => $compress,
+ "file" => curl_file_create($tmpFile, $contentType, $file_name)
+ ];
+ $ch = curl_init($this->host . "file");
+ //curl_setopt($ch, CURLOPT_HEADER, 1);
+ curl_setopt($ch, CURLOPT_USERPWD, $this->username . ":" . $this->password);
+ curl_setopt($ch, CURLOPT_TIMEOUT, 30);
+ curl_setopt($ch, CURLOPT_POST, 1);
+ curl_setopt($ch, CURLOPT_POSTFIELDS, $data);
+ curl_setopt($ch, CURLOPT_RETURNTRANSFER, TRUE);
+ curl_setopt($ch, CURLOPT_HTTPHEADER, array('Content-Type: multipart/form-data'));
+ $return = curl_exec($ch);
+ curl_close($ch);
+ unlink($tmpFile);
+ $j_return = json_decode($return, true);
+ if (json_last_error() != 0) {
+ return ["code" => "ERROR", "message" => "Error Json Decode : $return"];
+ }
+ return $j_return;
+ }
+}
diff --git a/application/libraries/his/Simrs.php b/application/libraries/his/Simrs.php
new file mode 100644
index 00000000..aa54e190
--- /dev/null
+++ b/application/libraries/his/Simrs.php
@@ -0,0 +1,127 @@
+HisEndPoint = "http://34.101.132.130:8080/query";
+ $this->Timeout = 10;
+ $this->token = "";
+ $this->userName = "adiet";
+ $this->password = "qwerty";
+ }
+
+ function get_token() {
+ if (! file_exists("/tmp/his-token.json")) {
+ $this->login($this->userName,$this->password);
+ } else {
+ $jtoken = file_get_contents("/tmp/his-token.json");
+ $token = json_decode($jtoken,true);
+ $expired = $token["expired"];
+ if ($expired - time() > 180 ) {
+ return "{$token["token"]}";
+ } else {
+ $new_token = $this->login("x");
+ return $new_token;
+ }
+ }
+ }
+
+ function login($debug = "") {
+ list($is_ok,$enc_password)= $this->gql(
+ "mutation",
+ "passwordEncrypt",
+ ["password" => "String!"],
+ ["password" => $this->password],
+ "",
+ "",
+ $debug
+ );
+ if(! $is_ok) {
+ if ($debug != "") echo "Error : {$this->password} => $enc_password\n";
+ return false;
+ }
+ list($is_ok,$tokenResponse)= $this->gql(
+ "mutation",
+ "userLogin",
+ ["userName" => "String!", "password" => "String!"],
+ ["userName" => $this->userName, "password" => $enc_password],
+ "userID token expired",
+ "",
+ $debug
+ );
+ if(!$is_ok) return false;
+
+ file_put_contents("/tmp/his-token.json",json_encode($tokenResponse));
+ return $tokenResponse["token"];
+ }
+
+ function gql($type, $name, $param, $variable, $return = "",
+ $token = "",
+ $debug = "")
+ {
+ $prm_gql= "";
+ $prm_body = "";
+ foreach($param as $k => $v) {
+ if ($prm_gql!= "") $prm_gql .= ",";
+ $prm_gql.= '$' . $k . ":" . $v;
+ if ($prm_body != "") $prm_body .= ",";
+ $prm_body .= $k . ":$" . $k;
+ }
+ $body = [];
+ if ($return == "") {
+ $body["query"] = "{$type}($prm_gql){{$name}($prm_body)}";
+ } else {
+ $body["query"] = "{$type}($prm_gql){ {$name}($prm_body){ $return } }";
+ }
+ $body["variables"] = $variable;
+ $gql_body = json_encode($body);
+ if($debug != "") {
+ echo "Debug GQL: $gql_body \n";
+ }
+ $resp =$this->post($gql_body,$token);
+ if($debug != "") {
+ echo "Response GQL: $resp \n";
+ }
+ $j_resp = json_decode($resp,true);
+ if ($j_resp !== false) {
+ if ($j_resp["data"] != null) {
+ $result = $j_resp["data"][$name];
+ if ($debug != "") {
+ print_r($result);
+ }
+ return [true,$result];
+ } else {
+ return [false,json_encode($j_resp["error"])];
+ }
+ }
+ return [false,$resp];
+ }
+
+ function post($data,$token = "")
+ {
+ $ch = curl_init($this->HisEndPoint);
+ curl_setopt($ch, CURLOPT_CUSTOMREQUEST, "POST");
+ curl_setopt($ch, CURLOPT_POSTFIELDS, $data);
+ curl_setopt($ch, CURLOPT_RETURNTRANSFER, true);
+ curl_setopt($ch, CURLOPT_CONNECTTIMEOUT, $this->Timeout / 2);
+ curl_setopt($ch, CURLOPT_TIMEOUT, $this->Timeout);
+ if ($token == "") {
+ curl_setopt($ch, CURLOPT_HTTPHEADER, [
+ "Content-Type: application/json",
+ "Content-Length: " . strlen($data),
+ ]);
+ } else {
+ curl_setopt($ch, CURLOPT_HTTPHEADER, [
+ "Authorization: Bearer $token",
+ "Content-Type: application/json",
+ "Content-Length: " . strlen($data),
+ ]);
+ }
+ $result = curl_exec($ch);
+ if (curl_error($ch) != "") {
+ return "ERROR SIMRS HIS API {$this->HisEndPoint} : " . curl_error($ch) . "\n";
+ }
+ curl_close($ch);
+ return $result;
+ }}
+
diff --git a/application/libraries/index.html b/application/libraries/index.html
new file mode 100755
index 00000000..b702fbc3
--- /dev/null
+++ b/application/libraries/index.html
@@ -0,0 +1,11 @@
+
+
+
+ 403 Forbidden
+
+
+
+Directory access is forbidden.
+
+
+
diff --git a/application/libraries/qrcode/phpqrcode.php b/application/libraries/qrcode/phpqrcode.php
new file mode 100644
index 00000000..ea8c08f9
--- /dev/null
+++ b/application/libraries/qrcode/phpqrcode.php
@@ -0,0 +1,3312 @@
+
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 3 of the License, or any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+
+
+/*
+ * Version: 1.1.4
+ * Build: 2010100721
+ */
+
+
+
+//---- qrconst.php -----------------------------
+
+
+
+
+
+/*
+ * PHP QR Code encoder
+ *
+ * Common constants
+ *
+ * Based on libqrencode C library distributed under LGPL 2.1
+ * Copyright (C) 2006, 2007, 2008, 2009 Kentaro Fukuchi
+ *
+ * PHP QR Code is distributed under LGPL 3
+ * Copyright (C) 2010 Dominik Dzienia
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 3 of the License, or any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+ // Encoding modes
+
+ define('QR_MODE_NUL', -1);
+ define('QR_MODE_NUM', 0);
+ define('QR_MODE_AN', 1);
+ define('QR_MODE_8', 2);
+ define('QR_MODE_KANJI', 3);
+ define('QR_MODE_STRUCTURE', 4);
+
+ // Levels of error correction.
+
+ define('QR_ECLEVEL_L', 0);
+ define('QR_ECLEVEL_M', 1);
+ define('QR_ECLEVEL_Q', 2);
+ define('QR_ECLEVEL_H', 3);
+
+ // Supported output formats
+
+ define('QR_FORMAT_TEXT', 0);
+ define('QR_FORMAT_PNG', 1);
+
+ class qrstr {
+ public static function set(&$srctab, $x, $y, $repl, $replLen = false) {
+ $srctab[$y] = substr_replace($srctab[$y], ($replLen !== false)?substr($repl,0,$replLen):$repl, $x, ($replLen !== false)?$replLen:strlen($repl));
+ }
+ }
+
+
+
+//---- merged_config.php -----------------------------
+
+
+
+
+/*
+ * PHP QR Code encoder
+ *
+ * Config file, tuned-up for merged verion
+ */
+
+ define('QR_CACHEABLE', false); // use cache - more disk reads but less CPU power, masks and format templates are stored there
+ define('QR_CACHE_DIR', false); // used when QR_CACHEABLE === true
+ define('QR_LOG_DIR', false); // default error logs dir
+
+ define('QR_FIND_BEST_MASK', true); // if true, estimates best mask (spec. default, but extremally slow; set to false to significant performance boost but (propably) worst quality code
+ define('QR_FIND_FROM_RANDOM', 2); // if false, checks all masks available, otherwise value tells count of masks need to be checked, mask id are got randomly
+ define('QR_DEFAULT_MASK', 2); // when QR_FIND_BEST_MASK === false
+
+ define('QR_PNG_MAXIMUM_SIZE', 1024); // maximum allowed png image width (in pixels), tune to make sure GD and PHP can handle such big images
+
+
+
+
+//---- qrtools.php -----------------------------
+
+
+
+
+/*
+ * PHP QR Code encoder
+ *
+ * Toolset, handy and debug utilites.
+ *
+ * PHP QR Code is distributed under LGPL 3
+ * Copyright (C) 2010 Dominik Dzienia
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 3 of the License, or any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+ class QRtools {
+
+ //----------------------------------------------------------------------
+ public static function binarize($frame)
+ {
+ $len = count($frame);
+ foreach ($frame as &$frameLine) {
+
+ for($i=0; $i<$len; $i++) {
+ $frameLine[$i] = (ord($frameLine[$i])&1)?'1':'0';
+ }
+ }
+
+ return $frame;
+ }
+
+ //----------------------------------------------------------------------
+ public static function tcpdfBarcodeArray($code, $mode = 'QR,L', $tcPdfVersion = '4.5.037')
+ {
+ $barcode_array = array();
+
+ if (!is_array($mode))
+ $mode = explode(',', $mode);
+
+ $eccLevel = 'L';
+
+ if (count($mode) > 1) {
+ $eccLevel = $mode[1];
+ }
+
+ $qrTab = QRcode::text($code, false, $eccLevel);
+ $size = count($qrTab);
+
+ $barcode_array['num_rows'] = $size;
+ $barcode_array['num_cols'] = $size;
+ $barcode_array['bcode'] = array();
+
+ foreach ($qrTab as $line) {
+ $arrAdd = array();
+ foreach(str_split($line) as $char)
+ $arrAdd[] = ($char=='1')?1:0;
+ $barcode_array['bcode'][] = $arrAdd;
+ }
+
+ return $barcode_array;
+ }
+
+ //----------------------------------------------------------------------
+ public static function clearCache()
+ {
+ self::$frames = array();
+ }
+
+ //----------------------------------------------------------------------
+ public static function buildCache()
+ {
+ QRtools::markTime('before_build_cache');
+
+ $mask = new QRmask();
+ for ($a=1; $a <= QRSPEC_VERSION_MAX; $a++) {
+ $frame = QRspec::newFrame($a);
+ if (QR_IMAGE) {
+ $fileName = QR_CACHE_DIR.'frame_'.$a.'.png';
+ QRimage::png(self::binarize($frame), $fileName, 1, 0);
+ }
+
+ $width = count($frame);
+ $bitMask = array_fill(0, $width, array_fill(0, $width, 0));
+ for ($maskNo=0; $maskNo<8; $maskNo++)
+ $mask->makeMaskNo($maskNo, $width, $frame, $bitMask, true);
+ }
+
+ QRtools::markTime('after_build_cache');
+ }
+
+ //----------------------------------------------------------------------
+ public static function log($outfile, $err)
+ {
+ if (QR_LOG_DIR !== false) {
+ if ($err != '') {
+ if ($outfile !== false) {
+ file_put_contents(QR_LOG_DIR.basename($outfile).'-errors.txt', date('Y-m-d H:i:s').': '.$err, FILE_APPEND);
+ } else {
+ file_put_contents(QR_LOG_DIR.'errors.txt', date('Y-m-d H:i:s').': '.$err, FILE_APPEND);
+ }
+ }
+ }
+ }
+
+ //----------------------------------------------------------------------
+ public static function dumpMask($frame)
+ {
+ $width = count($frame);
+ for($y=0;$y<$width;$y++) {
+ for($x=0;$x<$width;$x++) {
+ echo ord($frame[$y][$x]).',';
+ }
+ }
+ }
+
+ //----------------------------------------------------------------------
+ public static function markTime($markerId)
+ {
+ list($usec, $sec) = explode(" ", microtime());
+ $time = ((float)$usec + (float)$sec);
+
+ if (!isset($GLOBALS['qr_time_bench']))
+ $GLOBALS['qr_time_bench'] = array();
+
+ $GLOBALS['qr_time_bench'][$markerId] = $time;
+ }
+
+ //----------------------------------------------------------------------
+ public static function timeBenchmark()
+ {
+ self::markTime('finish');
+
+ $lastTime = 0;
+ $startTime = 0;
+ $p = 0;
+
+ echo '
+ BENCHMARK till '.$markerId.': '.number_format($thisTime-$lastTime, 6).'s TOTAL: '.number_format($lastTime-$startTime, 6).'s
';
+ }
+
+ }
+
+ //##########################################################################
+
+ QRtools::markTime('start');
+
+
+
+
+//---- qrspec.php -----------------------------
+
+
+
+
+/*
+ * PHP QR Code encoder
+ *
+ * QR Code specifications
+ *
+ * Based on libqrencode C library distributed under LGPL 2.1
+ * Copyright (C) 2006, 2007, 2008, 2009 Kentaro Fukuchi
+ *
+ * PHP QR Code is distributed under LGPL 3
+ * Copyright (C) 2010 Dominik Dzienia
+ *
+ * The following data / specifications are taken from
+ * "Two dimensional symbol -- QR-code -- Basic Specification" (JIS X0510:2004)
+ * or
+ * "Automatic identification and data capture techniques --
+ * QR Code 2005 bar code symbology specification" (ISO/IEC 18004:2006)
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 3 of the License, or any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this library; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
+ */
+
+ define('QRSPEC_VERSION_MAX', 40);
+ define('QRSPEC_WIDTH_MAX', 177);
+
+ define('QRCAP_WIDTH', 0);
+ define('QRCAP_WORDS', 1);
+ define('QRCAP_REMINDER', 2);
+ define('QRCAP_EC', 3);
+
+ class QRspec {
+
+ public static $capacity = array(
+ array( 0, 0, 0, array( 0, 0, 0, 0)),
+ array( 21, 26, 0, array( 7, 10, 13, 17)), // 1
+ array( 25, 44, 7, array( 10, 16, 22, 28)),
+ array( 29, 70, 7, array( 15, 26, 36, 44)),
+ array( 33, 100, 7, array( 20, 36, 52, 64)),
+ array( 37, 134, 7, array( 26, 48, 72, 88)), // 5
+ array( 41, 172, 7, array( 36, 64, 96, 112)),
+ array( 45, 196, 0, array( 40, 72, 108, 130)),
+ array( 49, 242, 0, array( 48, 88, 132, 156)),
+ array( 53, 292, 0, array( 60, 110, 160, 192)),
+ array( 57, 346, 0, array( 72, 130, 192, 224)), //10
+ array( 61, 404, 0, array( 80, 150, 224, 264)),
+ array( 65, 466, 0, array( 96, 176, 260, 308)),
+ array( 69, 532, 0, array( 104, 198, 288, 352)),
+ array( 73, 581, 3, array( 120, 216, 320, 384)),
+ array( 77, 655, 3, array( 132, 240, 360, 432)), //15
+ array( 81, 733, 3, array( 144, 280, 408, 480)),
+ array( 85, 815, 3, array( 168, 308, 448, 532)),
+ array( 89, 901, 3, array( 180, 338, 504, 588)),
+ array( 93, 991, 3, array( 196, 364, 546, 650)),
+ array( 97, 1085, 3, array( 224, 416, 600, 700)), //20
+ array(101, 1156, 4, array( 224, 442, 644, 750)),
+ array(105, 1258, 4, array( 252, 476, 690, 816)),
+ array(109, 1364, 4, array( 270, 504, 750, 900)),
+ array(113, 1474, 4, array( 300, 560, 810, 960)),
+ array(117, 1588, 4, array( 312, 588, 870, 1050)), //25
+ array(121, 1706, 4, array( 336, 644, 952, 1110)),
+ array(125, 1828, 4, array( 360, 700, 1020, 1200)),
+ array(129, 1921, 3, array( 390, 728, 1050, 1260)),
+ array(133, 2051, 3, array( 420, 784, 1140, 1350)),
+ array(137, 2185, 3, array( 450, 812, 1200, 1440)), //30
+ array(141, 2323, 3, array( 480, 868, 1290, 1530)),
+ array(145, 2465, 3, array( 510, 924, 1350, 1620)),
+ array(149, 2611, 3, array( 540, 980, 1440, 1710)),
+ array(153, 2761, 3, array( 570, 1036, 1530, 1800)),
+ array(157, 2876, 0, array( 570, 1064, 1590, 1890)), //35
+ array(161, 3034, 0, array( 600, 1120, 1680, 1980)),
+ array(165, 3196, 0, array( 630, 1204, 1770, 2100)),
+ array(169, 3362, 0, array( 660, 1260, 1860, 2220)),
+ array(173, 3532, 0, array( 720, 1316, 1950, 2310)),
+ array(177, 3706, 0, array( 750, 1372, 2040, 2430)) //40
+ );
+
+ //----------------------------------------------------------------------
+ public static function getDataLength($version, $level)
+ {
+ return self::$capacity[$version][QRCAP_WORDS] - self::$capacity[$version][QRCAP_EC][$level];
+ }
+
+ //----------------------------------------------------------------------
+ public static function getECCLength($version, $level)
+ {
+ return self::$capacity[$version][QRCAP_EC][$level];
+ }
+
+ //----------------------------------------------------------------------
+ public static function getWidth($version)
+ {
+ return self::$capacity[$version][QRCAP_WIDTH];
+ }
+
+ //----------------------------------------------------------------------
+ public static function getRemainder($version)
+ {
+ return self::$capacity[$version][QRCAP_REMINDER];
+ }
+
+ //----------------------------------------------------------------------
+ public static function getMinimumVersion($size, $level)
+ {
+
+ for($i=1; $i<= QRSPEC_VERSION_MAX; $i++) {
+ $words = self::$capacity[$i][QRCAP_WORDS] - self::$capacity[$i][QRCAP_EC][$level];
+ if($words >= $size)
+ return $i;
+ }
+
+ return -1;
+ }
+
+ //######################################################################
+
+ public static $lengthTableBits = array(
+ array(10, 12, 14),
+ array( 9, 11, 13),
+ array( 8, 16, 16),
+ array( 8, 10, 12)
+ );
+
+ //----------------------------------------------------------------------
+ public static function lengthIndicator($mode, $version)
+ {
+ if ($mode == QR_MODE_STRUCTURE)
+ return 0;
+
+ if ($version <= 9) {
+ $l = 0;
+ } else if ($version <= 26) {
+ $l = 1;
+ } else {
+ $l = 2;
+ }
+
+ return self::$lengthTableBits[$mode][$l];
+ }
+
+ //----------------------------------------------------------------------
+ public static function maximumWords($mode, $version)
+ {
+ if($mode == QR_MODE_STRUCTURE)
+ return 3;
+
+ if($version <= 9) {
+ $l = 0;
+ } else if($version <= 26) {
+ $l = 1;
+ } else {
+ $l = 2;
+ }
+
+ $bits = self::$lengthTableBits[$mode][$l];
+ $words = (1 << $bits) - 1;
+
+ if($mode == QR_MODE_KANJI) {
+ $words *= 2; // the number of bytes is required
+ }
+
+ return $words;
+ }
+
+ // Error correction code -----------------------------------------------
+ // Table of the error correction code (Reed-Solomon block)
+ // See Table 12-16 (pp.30-36), JIS X0510:2004.
+
+ public static $eccTable = array(
+ array(array( 0, 0), array( 0, 0), array( 0, 0), array( 0, 0)),
+ array(array( 1, 0), array( 1, 0), array( 1, 0), array( 1, 0)), // 1
+ array(array( 1, 0), array( 1, 0), array( 1, 0), array( 1, 0)),
+ array(array( 1, 0), array( 1, 0), array( 2, 0), array( 2, 0)),
+ array(array( 1, 0), array( 2, 0), array( 2, 0), array( 4, 0)),
+ array(array( 1, 0), array( 2, 0), array( 2, 2), array( 2, 2)), // 5
+ array(array( 2, 0), array( 4, 0), array( 4, 0), array( 4, 0)),
+ array(array( 2, 0), array( 4, 0), array( 2, 4), array( 4, 1)),
+ array(array( 2, 0), array( 2, 2), array( 4, 2), array( 4, 2)),
+ array(array( 2, 0), array( 3, 2), array( 4, 4), array( 4, 4)),
+ array(array( 2, 2), array( 4, 1), array( 6, 2), array( 6, 2)), //10
+ array(array( 4, 0), array( 1, 4), array( 4, 4), array( 3, 8)),
+ array(array( 2, 2), array( 6, 2), array( 4, 6), array( 7, 4)),
+ array(array( 4, 0), array( 8, 1), array( 8, 4), array(12, 4)),
+ array(array( 3, 1), array( 4, 5), array(11, 5), array(11, 5)),
+ array(array( 5, 1), array( 5, 5), array( 5, 7), array(11, 7)), //15
+ array(array( 5, 1), array( 7, 3), array(15, 2), array( 3, 13)),
+ array(array( 1, 5), array(10, 1), array( 1, 15), array( 2, 17)),
+ array(array( 5, 1), array( 9, 4), array(17, 1), array( 2, 19)),
+ array(array( 3, 4), array( 3, 11), array(17, 4), array( 9, 16)),
+ array(array( 3, 5), array( 3, 13), array(15, 5), array(15, 10)), //20
+ array(array( 4, 4), array(17, 0), array(17, 6), array(19, 6)),
+ array(array( 2, 7), array(17, 0), array( 7, 16), array(34, 0)),
+ array(array( 4, 5), array( 4, 14), array(11, 14), array(16, 14)),
+ array(array( 6, 4), array( 6, 14), array(11, 16), array(30, 2)),
+ array(array( 8, 4), array( 8, 13), array( 7, 22), array(22, 13)), //25
+ array(array(10, 2), array(19, 4), array(28, 6), array(33, 4)),
+ array(array( 8, 4), array(22, 3), array( 8, 26), array(12, 28)),
+ array(array( 3, 10), array( 3, 23), array( 4, 31), array(11, 31)),
+ array(array( 7, 7), array(21, 7), array( 1, 37), array(19, 26)),
+ array(array( 5, 10), array(19, 10), array(15, 25), array(23, 25)), //30
+ array(array(13, 3), array( 2, 29), array(42, 1), array(23, 28)),
+ array(array(17, 0), array(10, 23), array(10, 35), array(19, 35)),
+ array(array(17, 1), array(14, 21), array(29, 19), array(11, 46)),
+ array(array(13, 6), array(14, 23), array(44, 7), array(59, 1)),
+ array(array(12, 7), array(12, 26), array(39, 14), array(22, 41)), //35
+ array(array( 6, 14), array( 6, 34), array(46, 10), array( 2, 64)),
+ array(array(17, 4), array(29, 14), array(49, 10), array(24, 46)),
+ array(array( 4, 18), array(13, 32), array(48, 14), array(42, 32)),
+ array(array(20, 4), array(40, 7), array(43, 22), array(10, 67)),
+ array(array(19, 6), array(18, 31), array(34, 34), array(20, 61)),//40
+ );
+
+ //----------------------------------------------------------------------
+ // CACHEABLE!!!
+
+ public static function getEccSpec($version, $level, array &$spec)
+ {
+ if (count($spec) < 5) {
+ $spec = array(0,0,0,0,0);
+ }
+
+ $b1 = self::$eccTable[$version][$level][0];
+ $b2 = self::$eccTable[$version][$level][1];
+ $data = self::getDataLength($version, $level);
+ $ecc = self::getECCLength($version, $level);
+
+ if($b2 == 0) {
+ $spec[0] = $b1;
+ $spec[1] = (int)($data / $b1);
+ $spec[2] = (int)($ecc / $b1);
+ $spec[3] = 0;
+ $spec[4] = 0;
+ } else {
+ $spec[0] = $b1;
+ $spec[1] = (int)($data / ($b1 + $b2));
+ $spec[2] = (int)($ecc / ($b1 + $b2));
+ $spec[3] = $b2;
+ $spec[4] = $spec[1] + 1;
+ }
+ }
+
+ // Alignment pattern ---------------------------------------------------
+
+ // Positions of alignment patterns.
+ // This array includes only the second and the third position of the
+ // alignment patterns. Rest of them can be calculated from the distance
+ // between them.
+
+ // See Table 1 in Appendix E (pp.71) of JIS X0510:2004.
+
+ public static $alignmentPattern = array(
+ array( 0, 0),
+ array( 0, 0), array(18, 0), array(22, 0), array(26, 0), array(30, 0), // 1- 5
+ array(34, 0), array(22, 38), array(24, 42), array(26, 46), array(28, 50), // 6-10
+ array(30, 54), array(32, 58), array(34, 62), array(26, 46), array(26, 48), //11-15
+ array(26, 50), array(30, 54), array(30, 56), array(30, 58), array(34, 62), //16-20
+ array(28, 50), array(26, 50), array(30, 54), array(28, 54), array(32, 58), //21-25
+ array(30, 58), array(34, 62), array(26, 50), array(30, 54), array(26, 52), //26-30
+ array(30, 56), array(34, 60), array(30, 58), array(34, 62), array(30, 54), //31-35
+ array(24, 50), array(28, 54), array(32, 58), array(26, 54), array(30, 58), //35-40
+ );
+
+
+ /** --------------------------------------------------------------------
+ * Put an alignment marker.
+ * @param frame
+ * @param width
+ * @param ox,oy center coordinate of the pattern
+ */
+ public static function putAlignmentMarker(array &$frame, $ox, $oy)
+ {
+ $finder = array(
+ "\xa1\xa1\xa1\xa1\xa1",
+ "\xa1\xa0\xa0\xa0\xa1",
+ "\xa1\xa0\xa1\xa0\xa1",
+ "\xa1\xa0\xa0\xa0\xa1",
+ "\xa1\xa1\xa1\xa1\xa1"
+ );
+
+ $yStart = $oy-2;
+ $xStart = $ox-2;
+
+ for($y=0; $y<5; $y++) {
+ QRstr::set($frame, $xStart, $yStart+$y, $finder[$y]);
+ }
+ }
+
+ //----------------------------------------------------------------------
+ public static function putAlignmentPattern($version, &$frame, $width)
+ {
+ if($version < 2)
+ return;
+
+ $d = self::$alignmentPattern[$version][1] - self::$alignmentPattern[$version][0];
+ if($d < 0) {
+ $w = 2;
+ } else {
+ $w = (int)(($width - self::$alignmentPattern[$version][0]) / $d + 2);
+ }
+
+ if($w * $w - 3 == 1) {
+ $x = self::$alignmentPattern[$version][0];
+ $y = self::$alignmentPattern[$version][0];
+ self::putAlignmentMarker($frame, $x, $y);
+ return;
+ }
+
+ $cx = self::$alignmentPattern[$version][0];
+ for($x=1; $x<$w - 1; $x++) {
+ self::putAlignmentMarker($frame, 6, $cx);
+ self::putAlignmentMarker($frame, $cx, 6);
+ $cx += $d;
+ }
+
+ $cy = self::$alignmentPattern[$version][0];
+ for($y=0; $y<$w-1; $y++) {
+ $cx = self::$alignmentPattern[$version][0];
+ for($x=0; $x<$w-1; $x++) {
+ self::putAlignmentMarker($frame, $cx, $cy);
+ $cx += $d;
+ }
+ $cy += $d;
+ }
+ }
+
+ // Version information pattern -----------------------------------------
+
+ // Version information pattern (BCH coded).
+ // See Table 1 in Appendix D (pp.68) of JIS X0510:2004.
+
+ // size: [QRSPEC_VERSION_MAX - 6]
+
+ public static $versionPattern = array(
+ 0x07c94, 0x085bc, 0x09a99, 0x0a4d3, 0x0bbf6, 0x0c762, 0x0d847, 0x0e60d,
+ 0x0f928, 0x10b78, 0x1145d, 0x12a17, 0x13532, 0x149a6, 0x15683, 0x168c9,
+ 0x177ec, 0x18ec4, 0x191e1, 0x1afab, 0x1b08e, 0x1cc1a, 0x1d33f, 0x1ed75,
+ 0x1f250, 0x209d5, 0x216f0, 0x228ba, 0x2379f, 0x24b0b, 0x2542e, 0x26a64,
+ 0x27541, 0x28c69
+ );
+
+ //----------------------------------------------------------------------
+ public static function getVersionPattern($version)
+ {
+ if($version < 7 || $version > QRSPEC_VERSION_MAX)
+ return 0;
+
+ return self::$versionPattern[$version -7];
+ }
+
+ // Format information --------------------------------------------------
+ // See calcFormatInfo in tests/test_qrspec.c (orginal qrencode c lib)
+
+ public static $formatInfo = array(
+ array(0x77c4, 0x72f3, 0x7daa, 0x789d, 0x662f, 0x6318, 0x6c41, 0x6976),
+ array(0x5412, 0x5125, 0x5e7c, 0x5b4b, 0x45f9, 0x40ce, 0x4f97, 0x4aa0),
+ array(0x355f, 0x3068, 0x3f31, 0x3a06, 0x24b4, 0x2183, 0x2eda, 0x2bed),
+ array(0x1689, 0x13be, 0x1ce7, 0x19d0, 0x0762, 0x0255, 0x0d0c, 0x083b)
+ );
+
+ public static function getFormatInfo($mask, $level)
+ {
+ if($mask < 0 || $mask > 7)
+ return 0;
+
+ if($level < 0 || $level > 3)
+ return 0;
+
+ return self::$formatInfo[$level][$mask];
+ }
+
+ // Frame ---------------------------------------------------------------
+ // Cache of initial frames.
+
+ public static $frames = array();
+
+ /** --------------------------------------------------------------------
+ * Put a finder pattern.
+ * @param frame
+ * @param width
+ * @param ox,oy upper-left coordinate of the pattern
+ */
+ public static function putFinderPattern(&$frame, $ox, $oy)
+ {
+ $finder = array(
+ "\xc1\xc1\xc1\xc1\xc1\xc1\xc1",
+ "\xc1\xc0\xc0\xc0\xc0\xc0\xc1",
+ "\xc1\xc0\xc1\xc1\xc1\xc0\xc1",
+ "\xc1\xc0\xc1\xc1\xc1\xc0\xc1",
+ "\xc1\xc0\xc1\xc1\xc1\xc0\xc1",
+ "\xc1\xc0\xc0\xc0\xc0\xc0\xc1",
+ "\xc1\xc1\xc1\xc1\xc1\xc1\xc1"
+ );
+
+ for($y=0; $y<7; $y++) {
+ QRstr::set($frame, $ox, $oy+$y, $finder[$y]);
+ }
+ }
+
+ //----------------------------------------------------------------------
+ public static function createFrame($version)
+ {
+ $width = self::$capacity[$version][QRCAP_WIDTH];
+ $frameLine = str_repeat ("\0", $width);
+ $frame = array_fill(0, $width, $frameLine);
+
+ // Finder pattern
+ self::putFinderPattern($frame, 0, 0);
+ self::putFinderPattern($frame, $width - 7, 0);
+ self::putFinderPattern($frame, 0, $width - 7);
+
+ // Separator
+ $yOffset = $width - 7;
+
+ for($y=0; $y<7; $y++) {
+ $frame[$y][7] = "\xc0";
+ $frame[$y][$width - 8] = "\xc0";
+ $frame[$yOffset][7] = "\xc0";
+ $yOffset++;
+ }
+
+ $setPattern = str_repeat("\xc0", 8);
+
+ QRstr::set($frame, 0, 7, $setPattern);
+ QRstr::set($frame, $width-8, 7, $setPattern);
+ QRstr::set($frame, 0, $width - 8, $setPattern);
+
+ // Format info
+ $setPattern = str_repeat("\x84", 9);
+ QRstr::set($frame, 0, 8, $setPattern);
+ QRstr::set($frame, $width - 8, 8, $setPattern, 8);
+
+ $yOffset = $width - 8;
+
+ for($y=0; $y<8; $y++,$yOffset++) {
+ $frame[$y][8] = "\x84";
+ $frame[$yOffset][8] = "\x84";
+ }
+
+ // Timing pattern
+
+ for($i=1; $i<$width-15; $i++) {
+ $frame[6][7+$i] = chr(0x90 | ($i & 1));
+ $frame[7+$i][6] = chr(0x90 | ($i & 1));
+ }
+
+ // Alignment pattern
+ self::putAlignmentPattern($version, $frame, $width);
+
+ // Version information
+ if($version >= 7) {
+ $vinf = self::getVersionPattern($version);
+
+ $v = $vinf;
+
+ for($x=0; $x<6; $x++) {
+ for($y=0; $y<3; $y++) {
+ $frame[($width - 11)+$y][$x] = chr(0x88 | ($v & 1));
+ $v = $v >> 1;
+ }
+ }
+
+ $v = $vinf;
+ for($y=0; $y<6; $y++) {
+ for($x=0; $x<3; $x++) {
+ $frame[$y][$x+($width - 11)] = chr(0x88 | ($v & 1));
+ $v = $v >> 1;
+ }
+ }
+ }
+
+ // and a little bit...
+ $frame[$width - 8][8] = "\x81";
+
+ return $frame;
+ }
+
+ //----------------------------------------------------------------------
+ public static function debug($frame, $binary_mode = false)
+ {
+ if ($binary_mode) {
+
+ foreach ($frame as &$frameLine) {
+ $frameLine = join(' ', explode('0', $frameLine));
+ $frameLine = join('██', explode('1', $frameLine));
+ }
+
+ ?>
+
+
';
+ echo join("
", $frame);
+ echo ' '; + + } else { + + foreach ($frame as &$frameLine) { + $frameLine = join(' ', explode("\xc0", $frameLine)); + $frameLine = join('▒', explode("\xc1", $frameLine)); + $frameLine = join(' ', explode("\xa0", $frameLine)); + $frameLine = join('▒', explode("\xa1", $frameLine)); + $frameLine = join('◇', explode("\x84", $frameLine)); //format 0 + $frameLine = join('◆', explode("\x85", $frameLine)); //format 1 + $frameLine = join('☢', explode("\x81", $frameLine)); //special bit + $frameLine = join(' ', explode("\x90", $frameLine)); //clock 0 + $frameLine = join('◷', explode("\x91", $frameLine)); //clock 1 + $frameLine = join(' ', explode("\x88", $frameLine)); //version + $frameLine = join('▒', explode("\x89", $frameLine)); //version + $frameLine = join('♦', explode("\x01", $frameLine)); + $frameLine = join('⋅', explode("\0", $frameLine)); + } + + ?> + + "; + echo join("
", $frame); + echo ""; + + } + } + + //---------------------------------------------------------------------- + public static function serial($frame) + { + return gzcompress(join("\n", $frame), 9); + } + + //---------------------------------------------------------------------- + public static function unserial($code) + { + return explode("\n", gzuncompress($code)); + } + + //---------------------------------------------------------------------- + public static function newFrame($version) + { + if($version < 1 || $version > QRSPEC_VERSION_MAX) + return null; + + if(!isset(self::$frames[$version])) { + + $fileName = QR_CACHE_DIR.'frame_'.$version.'.dat'; + + if (QR_CACHEABLE) { + if (file_exists($fileName)) { + self::$frames[$version] = self::unserial(file_get_contents($fileName)); + } else { + self::$frames[$version] = self::createFrame($version); + file_put_contents($fileName, self::serial(self::$frames[$version])); + } + } else { + self::$frames[$version] = self::createFrame($version); + } + } + + if(is_null(self::$frames[$version])) + return null; + + return self::$frames[$version]; + } + + //---------------------------------------------------------------------- + public static function rsBlockNum($spec) { return $spec[0] + $spec[3]; } + public static function rsBlockNum1($spec) { return $spec[0]; } + public static function rsDataCodes1($spec) { return $spec[1]; } + public static function rsEccCodes1($spec) { return $spec[2]; } + public static function rsBlockNum2($spec) { return $spec[3]; } + public static function rsDataCodes2($spec) { return $spec[4]; } + public static function rsEccCodes2($spec) { return $spec[2]; } + public static function rsDataLength($spec) { return ($spec[0] * $spec[1]) + ($spec[3] * $spec[4]); } + public static function rsEccLength($spec) { return ($spec[0] + $spec[3]) * $spec[2]; } + + } + + + +//---- qrimage.php ----------------------------- + + + + +/* + * PHP QR Code encoder + * + * Image output of code using GD2 + * + * PHP QR Code is distributed under LGPL 3 + * Copyright (C) 2010 Dominik Dzienia
'; + echo join("
", $frame); + echo '
'; + + } else { + + foreach ($frame as &$frameLine) { + $frameLine = join(' ', explode("\xc0", $frameLine)); + $frameLine = join('▒', explode("\xc1", $frameLine)); + $frameLine = join(' ', explode("\xa0", $frameLine)); + $frameLine = join('▒', explode("\xa1", $frameLine)); + $frameLine = join('◇', explode("\x84", $frameLine)); //format 0 + $frameLine = join('◆', explode("\x85", $frameLine)); //format 1 + $frameLine = join('☢', explode("\x81", $frameLine)); //special bit + $frameLine = join(' ', explode("\x90", $frameLine)); //clock 0 + $frameLine = join('◷', explode("\x91", $frameLine)); //clock 1 + $frameLine = join(' ', explode("\x88", $frameLine)); //version + $frameLine = join('▒', explode("\x89", $frameLine)); //version + $frameLine = join('♦', explode("\x01", $frameLine)); + $frameLine = join('⋅', explode("\0", $frameLine)); + } + + ?> + + "; + echo join("
", $frame); + echo ""; + + } + } + + //---------------------------------------------------------------------- + public static function serial($frame) + { + return gzcompress(join("\n", $frame), 9); + } + + //---------------------------------------------------------------------- + public static function unserial($code) + { + return explode("\n", gzuncompress($code)); + } + + //---------------------------------------------------------------------- + public static function newFrame($version) + { + if($version < 1 || $version > QRSPEC_VERSION_MAX) + return null; + + if(!isset(self::$frames[$version])) { + + $fileName = QR_CACHE_DIR.'frame_'.$version.'.dat'; + + if (QR_CACHEABLE) { + if (file_exists($fileName)) { + self::$frames[$version] = self::unserial(file_get_contents($fileName)); + } else { + self::$frames[$version] = self::createFrame($version); + file_put_contents($fileName, self::serial(self::$frames[$version])); + } + } else { + self::$frames[$version] = self::createFrame($version); + } + } + + if(is_null(self::$frames[$version])) + return null; + + return self::$frames[$version]; + } + + //---------------------------------------------------------------------- + public static function rsBlockNum($spec) { return $spec[0] + $spec[3]; } + public static function rsBlockNum1($spec) { return $spec[0]; } + public static function rsDataCodes1($spec) { return $spec[1]; } + public static function rsEccCodes1($spec) { return $spec[2]; } + public static function rsBlockNum2($spec) { return $spec[3]; } + public static function rsDataCodes2($spec) { return $spec[4]; } + public static function rsEccCodes2($spec) { return $spec[2]; } + public static function rsDataLength($spec) { return ($spec[0] * $spec[1]) + ($spec[3] * $spec[4]); } + public static function rsEccLength($spec) { return ($spec[0] + $spec[3]) * $spec[2]; } + + } \ No newline at end of file diff --git a/application/libraries/qrcode/qrsplit.php b/application/libraries/qrcode/qrsplit.php new file mode 100644 index 00000000..8099c416 --- /dev/null +++ b/application/libraries/qrcode/qrsplit.php @@ -0,0 +1,311 @@ + + * + * PHP QR Code is distributed under LGPL 3 + * Copyright (C) 2010 Dominik Dzienia
| BENCHMARK | |
| till '.$markerId.': | '.number_format($thisTime-$lastTime, 6).'s |
|---|---|
| TOTAL: | '.number_format($lastTime-$startTime, 6).'s |
Directory access is forbidden.
+ + + diff --git a/application/models/index.html b/application/models/index.html new file mode 100755 index 00000000..b702fbc3 --- /dev/null +++ b/application/models/index.html @@ -0,0 +1,11 @@ + + + +Directory access is forbidden.
+ + + diff --git a/application/views/errors/cli/error_404.php b/application/views/errors/cli/error_404.php new file mode 100755 index 00000000..6984b61e --- /dev/null +++ b/application/views/errors/cli/error_404.php @@ -0,0 +1,8 @@ + + +An uncaught Exception was encountered + +Type: +Message: +Filename: getFile(), "\n"; ?> +Line Number: getLine(); ?> + + + +Backtrace: +getTrace() as $error): ?> + + File: + Line: + Function: + + + + diff --git a/application/views/errors/cli/error_general.php b/application/views/errors/cli/error_general.php new file mode 100755 index 00000000..6984b61e --- /dev/null +++ b/application/views/errors/cli/error_general.php @@ -0,0 +1,8 @@ + + +A PHP Error was encountered + +Severity: +Message: +Filename: +Line Number: + + + +Backtrace: + + + File: + Line: + Function: + + + + diff --git a/application/views/errors/cli/index.html b/application/views/errors/cli/index.html new file mode 100755 index 00000000..b702fbc3 --- /dev/null +++ b/application/views/errors/cli/index.html @@ -0,0 +1,11 @@ + + + +Directory access is forbidden.
+ + + diff --git a/application/views/errors/html/error_404.php b/application/views/errors/html/error_404.php new file mode 100755 index 00000000..756ea9d6 --- /dev/null +++ b/application/views/errors/html/error_404.php @@ -0,0 +1,64 @@ + + + + +
+
+
+
+
+
\ No newline at end of file
diff --git a/application/views/errors/html/error_db.php b/application/views/errors/html/error_db.php
new file mode 100755
index 00000000..f5a43f63
--- /dev/null
+++ b/application/views/errors/html/error_db.php
@@ -0,0 +1,64 @@
+
+
+
+
+
+
+
+
+
+
\ No newline at end of file
diff --git a/application/views/errors/html/error_exception.php b/application/views/errors/html/error_exception.php
new file mode 100755
index 00000000..87848866
--- /dev/null
+++ b/application/views/errors/html/error_exception.php
@@ -0,0 +1,32 @@
+
+
+
+
+
\ No newline at end of file
diff --git a/application/views/errors/html/error_general.php b/application/views/errors/html/error_general.php
new file mode 100755
index 00000000..fc3b2eba
--- /dev/null
+++ b/application/views/errors/html/error_general.php
@@ -0,0 +1,64 @@
+
+
+
+
+An uncaught Exception was encountered
+ +Type:
+Message:
+Filename: getFile(); ?>
+Line Number: getLine(); ?>
+ + + +Backtrace:
+ getTrace() as $error): ?> + + + +
+ File:
+ Line:
+ Function:
+
+
+
+
+
+
\ No newline at end of file
diff --git a/application/views/errors/html/error_php.php b/application/views/errors/html/error_php.php
new file mode 100755
index 00000000..b146f9c5
--- /dev/null
+++ b/application/views/errors/html/error_php.php
@@ -0,0 +1,33 @@
+
+
+
+
+
\ No newline at end of file
diff --git a/application/views/errors/html/index.html b/application/views/errors/html/index.html
new file mode 100755
index 00000000..b702fbc3
--- /dev/null
+++ b/application/views/errors/html/index.html
@@ -0,0 +1,11 @@
+
+
+
+ A PHP Error was encountered
+ +Severity:
+Message:
+Filename:
+Line Number:
+ + + +Backtrace:
+ + + + +
+ File:
+ Line:
+ Function:
+
Directory access is forbidden.
+ + + diff --git a/application/views/errors/index.html b/application/views/errors/index.html new file mode 100755 index 00000000..b702fbc3 --- /dev/null +++ b/application/views/errors/index.html @@ -0,0 +1,11 @@ + + + +Directory access is forbidden.
+ + + diff --git a/application/views/index.html b/application/views/index.html new file mode 100755 index 00000000..b702fbc3 --- /dev/null +++ b/application/views/index.html @@ -0,0 +1,11 @@ + + + +Directory access is forbidden.
+ + + diff --git a/application/views/welcome_message.php b/application/views/welcome_message.php new file mode 100755 index 00000000..f5115630 --- /dev/null +++ b/application/views/welcome_message.php @@ -0,0 +1,89 @@ + + + + +
+
+
+
+
\ No newline at end of file
Welcome to CodeIgniter!
+ +
+
+
+
+The page you are looking at is being generated dynamically by CodeIgniter.
+ +If you would like to edit this page you'll find it located at:
+application/views/welcome_message.php
+
+ The corresponding controller for this page is found at:
+application/controllers/Welcome.php
+
+ If you are exploring CodeIgniter for the very first time, you should start by reading the User Guide.
+