gdc_cmod/app/Controllers/backup/Specimen.php

<?php
namespace App\Controllers;
use CodeIgniter\API\ResponseTrait;

class Specimen extends BaseController {
    use ResponseTrait;

    public function show($access) {
        $db = \Config\Database::connect();

        $sql = "SELECT right(p.PATNUMBER,16)  as [Rm], ISNULL(p.FIRSTNAME,'') + ' ' + ISNULL(p.NAME,'') as [Name],
                case when format(p.BIRTHDATE,'MMdd')=format(spr.COLLECTIONDATE,'MMdd') then DATEDIFF(YEAR,p.BIRTHDATE, spr.COLLECTIONDATE)
                else FLOOR(DATEDIFF(DAY, p.BIRTHDATE, spr.COLLECTIONDATE) / 365.25) end ,
                [Gender] = case
                    when p.SEX = 1 then 'Male'
                    when p.SEX = 2 then 'Female'
                    else ''
                    end, spr.REQDATE, spo.COMMENTTEXT, dmg.DMG_CKTPNO, dmg.DMG_CPLACEOFBIRTH
                from SP_REQUESTS spr 
                    left join PATIENTS p on p.PATID=spr.PATID
                    left join SP_REQUESTS_OCOM spo on spr.SP_ACCESSNUMBER=spo.SP_ACCESSNUMBER
                    left join GDC_CMOD.dbo.TDL_DEMOGRAPHIC dmg on right(dmg.DMG_CPATNUMBER,15)=right(p.PATNUMBER,15)
                where spr.PATID=p.PATID and spr.SP_ACCESSNUMBER='$access'";
        $query = $db->query($sql);
		$results = $query->getRowArray();
        $patientIdentity = [
            'rm'            => $results["Rm"],  
            'age'           => $results[""], // key kosong
            'name'          => $results['Name'] ?? '',
            'reqdate'       => $results['REQDATE'] ?? '',
            'gender'        => $results['Gender'] ?? '',
            'placeofbirth'  => $results['DMG_CPLACEOFBIRTH'] ?? '',
            'ktp'           => $results['DMG_CKTPNO'] ?? '',
            'comment'       => $results['COMMENTTEXT'] ?? '',
        ];

        $samples = [];
        $sql = "SELECT req.SAMPTYPEID, req.SAMPCODE, req.SHORTTEXT, tu.STATUS, st.TUBESTATUS
                from GDC_CMOD.dbo.v_sp_reqtube req
                left join GDC_CMOD.dbo.TUBES tu on req.SP_ACCESSNUMBER=tu.ACCESSNUMBER and req.SAMPCODE=tu.TUBENUMBER
                left join glendb.dbo.SP_TUBES st on st.SP_ACCESSNUMBER=req.SP_ACCESSNUMBER and req.SAMPCODE=st.SAMPLETYPE
                where req.SP_ACCESSNUMBER='$access'";
        $query = $db->query($sql);
		$results = $query->getResultArray();
        foreach ($results as $row) {
            $samples[] = [
                'samptypeid' => $row['SAMPTYPEID'] ?? null,
                'sampcode'   => $row['SAMPCODE'] ?? null,
                'name'       => $row['SHORTTEXT'] ?? '',
                'colstatus'  => $row['STATUS'] ?? '',
                'tubestatus' => $row['TUBESTATUS'] ?? '',
            ];
        }
        
        $data = ['patientIdentity' => $patientIdentity, 'samples' => $samples, 'accessnumber' => $access];

        return $this->response->setJSON($data);
    }
    
    public function collect($accessnumber) {
        $db = \Config\Database::connect();
        $input = $this->request->getJSON(true);
        $samplenumber = $input['samplenumber'];
        $status = $input['status'];
        $userid = $input['userid'];
        $sql = "if not exists (select * from GDC_CMOD.dbo.TUBES where ACCESSNUMBER='$accessnumber' and TUBENUMBER='$samplenumber' and STATUS='$status')
                begin
                    update GDC_CMOD.dbo.TUBES set USERID='$userid',STATUS='$status', COLLECTIONDATE=getdate() where ACCESSNUMBER='$accessnumber' and TUBENUMBER='$samplenumber'
                end";
        $db->query($sql);
        $sql = "INSERT INTO GDC_CMOD.dbo.AUDIT_TUBES(ACCESSNUMBER, TUBENUMBER, USERID, STATUS, LOGDATE) 
            VALUES ('$accessnumber', '$samplenumber', '$userid', '$status', getdate())";
        $db->query($sql);
        return $this->respondCreated([ 'status'  => 'success', 'message' => 'Data updated successfully', 'data' => "$accessnumber-$samplenumber" ], 201);
    }

    public function unreceive($accessnumber) {
        $db = \Config\Database::connect();
        $input = $this->request->getJSON(true);
        $samplenumber = $input['samplenumber'];
        // update firebird
        $sql = "select r.EXTERNALORDERNUMBER, dt.TESTCODE, do.HISCODE from glendb.dbo.TESTS t 
            left join glendb.dbo.DICT_TESTS dt on dt.TESTID=t.TESTID 
            left join glendb.dbo.REQUESTS r on r.REQUESTID=t.REQUESTID 
            left join glendb.dbo.DICT_TEST_SAMPLES dts on dts.TESTID=t.TESTID 
            left join glendb.dbo.DICT_SAMPLES_TYPES ds on ds.SAMPTYPEID=dts.SAMPTYPEID 
            left join GDC_CMOD.dbo.DICT_TESTS_ORDER do on do.TESTCODE=dt.TESTCODE 
            where t.DEPTH=0 
            and r.ACCESSNUMBER='$req' and ds.SAMPCODE='$samplenumber'";
        $rows = $db->query($sql)->getResultArray();
        $his_test = '';
        foreach( $rows as $row ) {
            $hon = $row['EXTERNALORDERNUMBER'];
            $testcode = $row['TESTCODE'];
            $hiscode = $row['HISCODE'];
            $his_test .= "'$hiscode',";
            $lis_test .= "'$testcode',";
        }
        $his_test = rtrim($his_test,',');
        $lis_test = rtrim($lis_test,',');
        $conn = odbc_connect('GLENEAGLES','','');
        $sql = "UPDATE TDL_ORDERDT SET ODD_NRECEIVED=NULL , ODD_DTRECEIVE=NULL WHERE ODR_CNOLAB='$hon' and ODD_CPRODUCTCODE IN ($his_test)";
        $rs = odbc_exec($conn,$sql);
        if (!$rs) {exit("Error in Update FB");}

        $sql = "update SP_TUBES set TUBESTATUS=0 where SP_ACCESSNUMBER='$accessnumber' and SAMPLETYPE='$samplenumber' ";
        $db->query($sql);
        $sql = "update SP_TESTS set SP_TESTSTATUS=NULL where SP_ACCESSNUMBER='$req' and SP_TESTCODE in ($lis_test)";
        $db->query($sql);
        return $this->respondCreated([ 'status'  => 'success', 'message' => 'Data updated successfully', 'data' => "$accessnumber-$samplenumber" ], 201);
    }
}