merge migration

internal/use-case/main-use-case/encounter/case.go

@@ -25,6 +25,7 @@ import (
 	eem "simrs-vx/internal/domain/main-entities/employee"
 	e "simrs-vx/internal/domain/main-entities/encounter"
 	ei "simrs-vx/internal/domain/main-entities/inpatient"
+	er "simrs-vx/internal/domain/main-entities/rehab"
 	erdh "simrs-vx/internal/domain/main-entities/responsible-doctor-hist"
 	es "simrs-vx/internal/domain/main-entities/soapi"
 
@@ -36,7 +37,7 @@ import (
 	ue "simrs-vx/internal/use-case/main-use-case/emergency"
 	uem "simrs-vx/internal/use-case/main-use-case/employee"
 	ui "simrs-vx/internal/use-case/main-use-case/inpatient"
-	urdh "simrs-vx/internal/use-case/main-use-case/responsible-doctor-hist"
+	ur "simrs-vx/internal/use-case/main-use-case/rehab"
 	us "simrs-vx/internal/use-case/main-use-case/soapi"
 )
 
@@ -46,6 +47,7 @@ var now = time.Now()
 
 func Create(input e.CreateDto) (*d.Data, error) {
 	data := e.Encounter{}
+	createSoapi := []es.CreateDto{}
 
 	event := pl.Event{
 		Feature: "Create",
@@ -55,6 +57,39 @@ func Create(input e.CreateDto) (*d.Data, error) {
 	// Start log
 	pl.SetLogInfo(&event, input, "started", "create")
 
+	// validate SubClass
+	var subCode interface{}
+	subCode, err := verifyClassCode(input)
+	if err != nil {
+		return nil, err
+	}
+
+	// verify whether the allocated visit count has not exceeded the limit
+	if input.Class_Code == ere.ECAmbulatory && subCode.(ere.AmbulatoryClassCode) == ere.ACCRehab &&
+		*input.VisitMode_Code == ere.VMCSeries {
+
+		dataEncounter, valid, err := verifyAllocatedVisitCount(input, &event)
+		if err != nil {
+			return nil, err
+		}
+
+		if !valid {
+			event.Status = "failed"
+			event.ErrInfo = pl.ErrorInfo{
+				Code:   "visit-limit-exceeded",
+				Detail: "Encounter has exceeded the allowed number of visits",
+				Raw:    errors.New("visit count exceeds allowed limit"),
+			}
+			return nil, pl.SetLogError(&event, input)
+		}
+
+		// get data soapi
+		createSoapi, err = getSoapiEncounterAdm(dataEncounter, &event)
+		if err != nil {
+			return nil, err
+		}
+	}
+
 	// check if patient is new in the hospital
 	dataPatient, err := ReadList(e.ReadListDto{
 		FilterDto: e.FilterDto{Patient_Id: input.Patient_Id},
@@ -62,7 +97,6 @@ func Create(input e.CreateDto) (*d.Data, error) {
 	if err != nil {
 		return nil, err
 	}
-
 	if list, ok := dataPatient.Data.([]e.ResponseDto); ok {
 		if len(list) < 1 {
 			input.NewStatus = true
@@ -83,6 +117,7 @@ func Create(input e.CreateDto) (*d.Data, error) {
 			input.Adm_Employee_Id = &emp.Id
 		}
 
+		// create encounter
 		if resData, err := CreateData(input, &event, tx); err != nil {
 			return err
 		} else {
@@ -91,52 +126,57 @@ func Create(input e.CreateDto) (*d.Data, error) {
 
 		switch input.Class_Code {
 		case ere.ECAmbulatory:
-			subCode, err := ua.CheckClassCode(input.SubClass_Code)
-			if err != nil {
-				return err
-			}
+			subCodeAmbulatory := subCode.(ere.AmbulatoryClassCode)
 			ambCreate := ea.CreateDto{
-				Encounter_Id: &data.Id,
-				Class_Code:   subCode,
+				Encounter_Id:   &data.Id,
+				Class_Code:     subCodeAmbulatory,
+				VisitMode_Code: *input.VisitMode_Code,
 			}
 			_, err = ua.CreateData(ambCreate, &event, tx)
 			if err != nil {
 				return err
 			}
 
-			if subCode == ere.ACCChemo {
+			if subCodeAmbulatory == ere.ACCChemo {
 				chemoCreate := ec.CreateDto{
 					Encounter_Id: &data.Id,
 					Status_Code:  erc.DVCNew,
 					SrcUnit_Id:   input.Unit_Id,
 				}
-
 				_, err = uc.CreateData(chemoCreate, &event, tx)
 				if err != nil {
 					return err
 				}
 			}
-		case ere.ECEmergency:
-			subCode, err := ue.CheckClassCode(input.SubClass_Code)
-			if err != nil {
-				return err
+
+			if subCodeAmbulatory == ere.ACCRehab && *input.VisitMode_Code == ere.VMCAdm {
+				// create data rehab
+				if _, err = ur.CreateData(er.CreateDto{
+					Encounter_Id:        &data.Id,
+					Doctor_Id:           input.Appointment_Doctor_Id,
+					AllocatedVisitCount: input.AllocatedVisitCount}, &event, tx); err != nil {
+					return err
+				}
+			} else if subCodeAmbulatory == ere.ACCRehab && *input.VisitMode_Code == ere.VMCSeries {
+				// Insert Soapi
+				if err = us.CreateBulkData(createSoapi, data.Id, &event, tx); err != nil {
+					return err
+				}
 			}
+
+		case ere.ECEmergency:
 			emerCreate := ee.CreateDto{
 				Encounter_Id: &data.Id,
-				Class_Code:   subCode,
+				Class_Code:   subCode.(ere.EmergencyClassCode),
 			}
 			_, err = ue.CreateData(emerCreate, &event, tx)
 			if err != nil {
 				return err
 			}
 		case ere.ECInpatient:
-			subCode, err := ui.CheckClassCode(input.SubClass_Code)
-			if err != nil {
-				return err
-			}
 			inpCreate := ei.CreateDto{
 				Encounter_Id: &data.Id,
-				Class_Code:   subCode,
+				Class_Code:   subCode.(ere.InpatientClassCode),
 				Infra_Id:     input.Infra_Id,
 			}
 			_, err = ui.CreateData(inpCreate, &event, tx)
@@ -148,11 +188,10 @@ func Create(input e.CreateDto) (*d.Data, error) {
 		}
 
 		// insert adm_employee_hist
-		if _, err := uaeh.Create(eaeh.CreateDto{
+		if _, err := uaeh.CreateData(eaeh.CreateDto{
 			Encounter_Id: &data.Main.Id,
 			Employee_Id:  data.Adm_Employee_Id,
-			StartedAt:    &now,
-		}); err != nil {
+			StartedAt:    &now}, &event, tx); err != nil {
 			return err
 		}
 
@@ -402,7 +441,7 @@ func Delete(input e.DeleteDto) (*d.Data, error) {
 }
 
 func CheckOut(input e.DischargeDto) (*d.Data, error) {
-	rdDto := e.ReadDetailDto{Id: uint16(input.Id)}
+	rdDto := e.ReadDetailDto{Id: uint16(input.Id), Includes: "Ambulatory"}
 	var data *e.Encounter
 	var err error
 
@@ -430,8 +469,17 @@ func CheckOut(input e.DischargeDto) (*d.Data, error) {
 			return pl.SetLogError(&event, input)
 		}
 
-		if err := checkSoapiByDocExists(data.Id, &event, tx); err != nil {
-			return err
+		if data.Ambulatory != nil && (data.Ambulatory.Class_Code == ere.ACCReg || data.Ambulatory.Class_Code == ere.ACCRehab) {
+			// validate if soapi exist
+			err = getSoapiByTypeCode(input.Id, *data.Ambulatory, &event, "check-out")
+			if err != nil {
+				return err
+			}
+		} else {
+			// chemo TBC
+			if err := checkSoapiByDocExists(data.Id, &event, tx); err != nil {
+				return err
+			}
 		}
 
 		if err := updateDischargeData(input, data, &event, tx); err != nil {
@@ -556,7 +604,7 @@ func UpdateStatusCode(input e.UpdateStatusDto) (*d.Data, error) {
 }
 
 func CheckIn(input e.CheckinDto) (*d.Data, error) {
-	rdDto := e.ReadDetailDto{Id: uint16(input.Id)}
+	rdDto := e.ReadDetailDto{Id: uint16(input.Id), Includes: "Rehab,Ambulatory"}
 	var data *e.Encounter
 	var err error
 
@@ -578,24 +626,6 @@ func CheckIn(input e.CheckinDto) (*d.Data, error) {
 		input.StartedAt = &now
 	}
 
-	// validate if soapi exist
-	dataSoapi, err := us.ReadList(es.ReadListDto{FilterDto: es.FilterDto{Encounter_Id: &input.Id}})
-	if err != nil {
-		return nil, err
-	}
-
-	if list, ok := dataSoapi.Data.([]es.ResponseDto); ok {
-		if len(list) > 0 {
-			event.Status = "failed"
-			event.ErrInfo = pl.ErrorInfo{
-				Code:   "data-state-mismatch",
-				Detail: "soapi already exist",
-				Raw:    errors.New("soapi already exist"),
-			}
-			return nil, pl.SetLogError(&event, input)
-		}
-	}
-
 	err = dg.I.Transaction(func(tx *gorm.DB) error {
 		pl.SetLogInfo(&event, rdDto, "started", "DBReadDetail")
 		if data, err = ReadDetailData(rdDto, &event, tx); err != nil {
@@ -612,36 +642,34 @@ func CheckIn(input e.CheckinDto) (*d.Data, error) {
 			return pl.SetLogError(&event, input)
 		}
 
-		// Insert responsible_doctor_hist if responsible_doctor_id has changed && update latest history
-		if data.Responsible_Doctor_Id == nil || *input.Responsible_Doctor_Id != *data.Responsible_Doctor_Id {
-			// update finishedAt in latest responsible_doctor_hist
-			if err = updateLatestResponsibleDoctorHist(input, &event, tx); err != nil {
+		// validate if soapi exist
+		if data.Ambulatory != nil && (data.Ambulatory.Class_Code == ere.ACCReg || data.Ambulatory.Class_Code == ere.ACCRehab) {
+			err = getSoapiByTypeCode(input.Id, *data.Ambulatory, &event, "check-in")
+			if err != nil {
 				return err
 			}
+		}
 
-			//insert responsible_doctor_hist
-			if _, err = urdh.Create(erdh.CreateDto{
-				Encounter_Id: &input.Id,
+		// Insert responsible_doctor_hist if responsible_doctor_id has changed && update latest history
+		if data.Responsible_Doctor_Id == nil || *input.Responsible_Doctor_Id != *data.Responsible_Doctor_Id {
+			// upsert responsibleDoctorHist
+			if err = upsertResponsibleDoctorHist(erdh.CreateDto{
+				Encounter_Id: &data.Id,
 				Doctor_Id:    input.Responsible_Doctor_Id,
 				StartedAt:    input.StartedAt,
-			}); err != nil {
+			}, &event, tx); err != nil {
 				return err
 			}
 		}
 
 		// Insert adm_employee_hist if adm_employee_id has changed && update latest history
 		if input.Adm_Employee_Id != nil && *input.Adm_Employee_Id != *data.Adm_Employee_Id {
-			// update finishedAt in latest adm_employee_hist
-			if err = updateLatestAdmEmployeeHist(input, &event, tx); err != nil {
-				return err
-			}
-
-			// insert responsible_doctor_hist
-			if _, err = uaeh.Create(eaeh.CreateDto{
-				Encounter_Id: &input.Id,
+			// upsert admEmployeeHist
+			if err = upsertAdmEmployeeHist(eaeh.CreateDto{
+				Encounter_Id: &data.Id,
 				Employee_Id:  input.Adm_Employee_Id,
 				StartedAt:    input.StartedAt,
-			}); err != nil {
+			}, &event, tx); err != nil {
 				return err
 			}
 		}
@@ -651,6 +679,15 @@ func CheckIn(input e.CheckinDto) (*d.Data, error) {
 			return err
 		}
 
+		if data.Ambulatory.Class_Code == ere.ACCRehab {
+			if err := updateRehabDoctor(er.UpdateDto{CreateDto: er.CreateDto{
+				Encounter_Id: &data.Id,
+				Doctor_Id:    input.Responsible_Doctor_Id,
+			}}, &event, tx); err != nil {
+				return err
+			}
+		}
+
 		pl.SetLogInfo(&event, nil, "complete")
 
 		return nil
@@ -687,3 +724,26 @@ func validateForeignKey(input e.CheckinDto) error {
 
 	return nil
 }
+
+func verifyClassCode(input e.CreateDto) (subCode interface{}, err error) {
+	switch input.Class_Code {
+	case ere.ECAmbulatory:
+		subCode, err = ua.CheckClassCode(input.SubClass_Code)
+		if err != nil {
+			return nil, err
+		}
+	case ere.ECEmergency:
+		subCode, err = ue.CheckClassCode(input.SubClass_Code)
+		if err != nil {
+			return nil, err
+		}
+	case ere.ECInpatient:
+		subCode, err = ui.CheckClassCode(input.SubClass_Code)
+		if err != nil {
+			return nil, err
+		}
+	default:
+		return nil, errors.New("invalid encounter class code")
+	}
+	return
+}

internal/use-case/main-use-case/encounter/helper.go

@@ -7,17 +7,25 @@ package encounter
 import (
 	"errors"
 	"fmt"
-	uir "simrs-vx/internal/use-case/main-use-case/internal-reference"
 	"strings"
 	"time"
 
+	dg "github.com/karincake/apem/db-gorm-pg"
 	"gorm.io/gorm"
 
 	pl "simrs-vx/pkg/logger"
 	pu "simrs-vx/pkg/use-case-helper"
 
+	ercl "simrs-vx/internal/domain/references/clinical"
+	erc "simrs-vx/internal/domain/references/common"
+	ere "simrs-vx/internal/domain/references/encounter"
+	erg "simrs-vx/internal/domain/references/organization"
+
+	eaeh "simrs-vx/internal/domain/main-entities/adm-employee-hist"
+	ea "simrs-vx/internal/domain/main-entities/ambulatory"
 	edo "simrs-vx/internal/domain/main-entities/device-order"
 	ed "simrs-vx/internal/domain/main-entities/doctor"
+	e "simrs-vx/internal/domain/main-entities/encounter"
 	emo "simrs-vx/internal/domain/main-entities/material-order"
 	emco "simrs-vx/internal/domain/main-entities/mcu-order"
 	em "simrs-vx/internal/domain/main-entities/medication"
@@ -26,20 +34,21 @@ import (
 	emmi "simrs-vx/internal/domain/main-entities/medicine-mix-item"
 	ep "simrs-vx/internal/domain/main-entities/prescription"
 	epi "simrs-vx/internal/domain/main-entities/prescription-item"
+	er "simrs-vx/internal/domain/main-entities/rehab"
+	erdh "simrs-vx/internal/domain/main-entities/responsible-doctor-hist"
 	eu "simrs-vx/internal/domain/main-entities/unit"
 
 	// udo "simrs-vx/internal/use-case/main-use-case/device-order"
 	es "simrs-vx/internal/domain/main-entities/soapi"
+	uaeh "simrs-vx/internal/use-case/main-use-case/adm-employee-hist"
+	uir "simrs-vx/internal/use-case/main-use-case/internal-reference"
 	um "simrs-vx/internal/use-case/main-use-case/medication"
 	umei "simrs-vx/internal/use-case/main-use-case/medication-item"
 	umi "simrs-vx/internal/use-case/main-use-case/medicine-mix"
 	ummi "simrs-vx/internal/use-case/main-use-case/medicine-mix-item"
 	up "simrs-vx/internal/use-case/main-use-case/prescription"
 	upi "simrs-vx/internal/use-case/main-use-case/prescription-item"
-
-	e "simrs-vx/internal/domain/main-entities/encounter"
-	erc "simrs-vx/internal/domain/references/common"
-	erg "simrs-vx/internal/domain/references/organization"
+	urdh "simrs-vx/internal/use-case/main-use-case/responsible-doctor-hist"
 )
 
 func setData[T *e.CreateDto | *e.UpdateDto](input T, data *e.Encounter) {
@@ -432,3 +441,371 @@ func getDoctors(doctorIds []uint, event *pl.Event, tx *gorm.DB) ([]ed.Doctor, er
 	}
 	return doctors, nil
 }
+
+func upsertResponsibleDoctorHist(input erdh.CreateDto, event *pl.Event, dbx ...*gorm.DB) error {
+	pl.SetLogInfo(event, nil, "started", "DBCreate")
+
+	var tx *gorm.DB
+	if len(dbx) > 0 {
+		tx = dbx[0]
+	} else {
+		tx = dg.I
+	}
+
+	var latest erdh.ResponsibleDoctorHist
+	err := tx.
+		Where("\"Encounter_Id\" = ?", input.Encounter_Id).
+		Order("\"CreatedAt\" DESC").
+		Limit(1).
+		First(&latest).Error
+
+	switch {
+	case errors.Is(err, gorm.ErrRecordNotFound):
+		// Insert
+		if _, err = urdh.CreateData(input, event, tx); err != nil {
+			return err
+		}
+	case err != nil:
+		event.Status = "failed"
+		event.ErrInfo = pl.ErrorInfo{
+			Code:   "read-fail",
+			Detail: "Failed to read responsible doctor history",
+			Raw:    err,
+		}
+		return pl.SetLogError(event, input)
+	default:
+		// Update
+		if err := tx.Model(&latest).Updates(map[string]interface{}{
+			"Doctor_Id": input.Doctor_Id,
+			"StartedAt": input.StartedAt,
+			"UpdatedAt": time.Now(),
+		}).Error; err != nil {
+			event.Status = "failed"
+			event.ErrInfo = pl.ErrorInfo{
+				Code:   "update-fail",
+				Detail: "Failed to update responsible doctor history",
+				Raw:    err,
+			}
+			return pl.SetLogError(event, input)
+		}
+	}
+	pl.SetLogInfo(event, input, "complete")
+	return nil
+}
+
+func upsertAdmEmployeeHist(input eaeh.CreateDto, event *pl.Event, dbx ...*gorm.DB) error {
+	pl.SetLogInfo(event, nil, "started", "DBCreate")
+
+	var tx *gorm.DB
+	if len(dbx) > 0 {
+		tx = dbx[0]
+	} else {
+		tx = dg.I
+	}
+
+	var latest eaeh.AdmEmployeeHist
+	err := tx.
+		Where("\"Encounter_Id\" = ?", input.Encounter_Id).
+		Order("\"CreatedAt\" DESC").
+		Limit(1).
+		First(&latest).Error
+
+	switch {
+	case errors.Is(err, gorm.ErrRecordNotFound):
+		// Insert
+		if _, err = uaeh.CreateData(input, event, tx); err != nil {
+			return err
+		}
+	case err != nil:
+		event.Status = "failed"
+		event.ErrInfo = pl.ErrorInfo{
+			Code:   "read-fail",
+			Detail: "Failed to read responsible doctor history",
+			Raw:    err,
+		}
+		return pl.SetLogError(event, input)
+
+	default:
+		// Update
+		if err := tx.Model(&latest).Updates(map[string]interface{}{
+			"Employee_Id": input.Employee_Id,
+			"StartedAt":   input.StartedAt,
+			"UpdatedAt":   time.Now(),
+		}).Error; err != nil {
+			event.Status = "failed"
+			event.ErrInfo = pl.ErrorInfo{
+				Code:   "update-fail",
+				Detail: "Failed to update responsible doctor history",
+				Raw:    err,
+			}
+			return pl.SetLogError(event, input)
+		}
+	}
+	pl.SetLogInfo(event, input, "complete")
+
+	return nil
+}
+
+func updateLatestResponsibleDoctorHist(input e.CheckinDto, event *pl.Event, dbx ...*gorm.DB) error {
+	pl.SetLogInfo(event, "started", "DBUpdate")
+
+	var tx *gorm.DB
+	if len(dbx) > 0 {
+		tx = dbx[0]
+	} else {
+		tx = dg.I
+	}
+
+	subQuery := tx.
+		Select("\"Id\"").
+		Model(&erdh.ResponsibleDoctorHist{}).
+		Where("\"Encounter_Id\" = ?", input.Id).
+		Order("\"CreatedAt\" DESC").
+		Limit(1)
+
+	result := tx.
+		Model(&erdh.ResponsibleDoctorHist{}).
+		Where("\"Id\" = (?)", subQuery).
+		Update("\"FinishedAt\"", input.StartedAt)
+
+	if result.Error != nil {
+		event.Status = "failed"
+		event.ErrInfo = pl.ErrorInfo{
+			Code:   "data-update-fail",
+			Detail: "Database update failed",
+			Raw:    result.Error,
+		}
+		return pl.SetLogError(event, input)
+	}
+
+	if result.RowsAffected == 0 {
+		pl.SetLogInfo(event, input, "no previous data found to update")
+		return nil
+	}
+
+	pl.SetLogInfo(event, nil, "complete")
+	return nil
+}
+
+func updateLatestAdmEmployeeHist(input e.CheckinDto, event *pl.Event, dbx ...*gorm.DB) error {
+	pl.SetLogInfo(event, "started", "DBUpdate")
+
+	var tx *gorm.DB
+	if len(dbx) > 0 {
+		tx = dbx[0]
+	} else {
+		tx = dg.I
+	}
+
+	subQuery := tx.
+		Select("\"Id\"").
+		Model(&eaeh.AdmEmployeeHist{}).
+		Where("\"Encounter_Id\" = ?", input.Id).
+		Order("\"CreatedAt\" DESC").
+		Limit(1)
+
+	result := tx.
+		Model(&eaeh.AdmEmployeeHist{}).
+		Where("\"Id\" = (?)", subQuery).
+		Update("\"FinishedAt\"", input.StartedAt)
+
+	if result.Error != nil {
+		event.Status = "failed"
+		event.ErrInfo = pl.ErrorInfo{
+			Code:   "data-update-fail",
+			Detail: "Database update failed",
+			Raw:    result.Error,
+		}
+		return pl.SetLogError(event, input)
+	}
+
+	if result.RowsAffected == 0 {
+		pl.SetLogInfo(event, input, "no previous data found to update")
+		return nil
+	}
+
+	pl.SetLogInfo(event, nil, "complete")
+	return nil
+}
+
+func getSoapiEncounterAdm(enc e.Encounter, event *pl.Event) (dataSoapi []es.CreateDto, err error) {
+	var data []es.Soapi
+
+	pl.SetLogInfo(event, enc, "started", "DBReadList")
+
+	if enc.Responsible_Doctor == nil {
+		event.Status = "failed"
+		event.ErrInfo = pl.ErrorInfo{
+			Code:   "no responsible-doctor found",
+			Detail: "Encounter does not have responsible-doctor",
+		}
+	}
+
+	err = dg.I.
+		Model(&es.Soapi{}).
+		Joins("JOIN \"Employee\" ON \"Employee\".\"Id\" = \"Soapi\".\"Employee_Id\"").
+		Where("\"Encounter_Id\" = ?", enc.Id).
+		Where("\"Employee\".\"Position_Code\" = ?", erg.EPCDoc).
+		Where("\"Soapi\".\"TypeCode\" IN ?", []ercl.SoapiTypeCode{ercl.STCEEarlyMedic, ercl.STCFunc}).
+		Where("\"Soapi\".\"Employee_Id\" = ?", *enc.Responsible_Doctor.Employee_Id).
+		Find(&data).Error
+
+	if err != nil {
+		event.Status = "failed"
+		event.ErrInfo = pl.ErrorInfo{
+			Raw: err,
+		}
+
+		if errors.Is(err, gorm.ErrRecordNotFound) {
+			event.ErrInfo.Code = "data-not-found"
+			event.ErrInfo.Detail = "Data not found"
+			return nil, pl.SetLogError(event, enc)
+		}
+
+		event.ErrInfo.Code = "read-fail"
+		event.ErrInfo.Detail = "Database read failed"
+		return nil, pl.SetLogError(event, enc)
+	}
+
+	pl.SetLogInfo(event, nil, "complete")
+
+	for _, s := range data {
+		// set data soapi for copy
+		dataSoapi = append(dataSoapi, es.CreateDto{
+			Employee_Id: s.Employee_Id,
+			Time:        s.Time,
+			TypeCode:    s.TypeCode,
+			Value:       s.Value,
+		})
+	}
+
+	if len(dataSoapi) < 2 {
+		event.Status = "failed"
+		event.ErrInfo = pl.ErrorInfo{
+			Code:   "missing-soapi",
+			Detail: fmt.Sprintf("Missing required Soapi types"),
+		}
+		return nil, pl.SetLogError(event, enc)
+	}
+	return
+}
+
+func getSoapiByTypeCode(encounterId uint, dataAmbulatory ea.Ambulatory, event *pl.Event, mode string) (err error) {
+	pl.SetLogInfo(event, encounterId, "started", "DBReadList")
+
+	var (
+		dataSoapi []es.Soapi
+	)
+
+	// Set Query for get data Soapi
+	tx := dg.I.
+		Model(&es.Soapi{}).
+		Joins("JOIN \"Employee\" ON \"Employee\".\"Id\" = \"Soapi\".\"Employee_Id\"").
+		Where("\"Encounter_Id\" = ?", encounterId).
+		Where("\"Employee\".\"Position_Code\" = ?", erg.EPCDoc)
+
+	// Set Case
+	switch {
+	case dataAmbulatory.Class_Code == ere.ACCReg:
+		tx = tx.Where("\"Soapi\".\"TypeCode\" = ?", ercl.STCEEarlyMedic)
+	case dataAmbulatory.Class_Code == ere.ACCRehab && dataAmbulatory.VisitMode_Code == ere.VMCAdm:
+		tx = tx.Where("\"Soapi\".\"TypeCode\" IN ?", []ercl.SoapiTypeCode{ercl.STCEEarlyMedic, ercl.STCFunc, ercl.STCEarlyRehab})
+	case dataAmbulatory.Class_Code == ere.ACCRehab && dataAmbulatory.VisitMode_Code == ere.VMCSeries:
+		tx = tx.Where("\"Soapi\".\"TypeCode\" = ?", ercl.STCEarlyRehab)
+	}
+
+	if err = tx.Find(&dataSoapi).Error; err != nil {
+		return setDBError(event, err, encounterId)
+	}
+
+	pl.SetLogInfo(event, nil, "complete")
+	return validateExistedSoapi(dataSoapi, &dataAmbulatory, event, mode)
+}
+
+func validateExistedSoapi(dataSoapi []es.Soapi, dataAmbulatory *ea.Ambulatory, event *pl.Event, mode string) error {
+	typeExist := make(map[ercl.SoapiTypeCode]bool)
+	for _, s := range dataSoapi {
+		typeExist[s.TypeCode] = true
+	}
+
+	required := []ercl.SoapiTypeCode{}
+
+	switch {
+	case dataAmbulatory.Class_Code == ere.ACCReg:
+		required = []ercl.SoapiTypeCode{ercl.STCEEarlyMedic}
+	case dataAmbulatory.Class_Code == ere.ACCRehab && dataAmbulatory.VisitMode_Code == ere.VMCAdm:
+		required = []ercl.SoapiTypeCode{ercl.STCEEarlyMedic, ercl.STCFunc, ercl.STCEarlyRehab}
+	case dataAmbulatory.Class_Code == ere.ACCRehab && dataAmbulatory.VisitMode_Code == ere.VMCSeries:
+		required = []ercl.SoapiTypeCode{ercl.STCEarlyRehab}
+	}
+
+	var missing, existing []string
+	for _, code := range required {
+		if typeExist[code] {
+			existing = append(existing, string(code))
+		} else {
+			missing = append(missing, string(code))
+		}
+	}
+
+	switch mode {
+	case "check-in":
+		if len(existing) > 0 {
+			return setSoapiError(event, fmt.Sprintf("Soapi type(s) %s exist, can't check-in", strings.Join(existing, ", ")))
+		}
+	case "check-out":
+		if len(missing) > 0 {
+			return setSoapiError(event, fmt.Sprintf("Soapi type(s) %s not found, can't check-out", strings.Join(missing, ", ")))
+		}
+	}
+
+	return nil
+}
+
+func setSoapiError(event *pl.Event, detail string) error {
+	event.Status = "failed"
+	event.ErrInfo = pl.ErrorInfo{
+		Code:   "invalid-soapi-state",
+		Detail: detail,
+	}
+	return pl.SetLogError(event, detail)
+}
+
+func setDBError(event *pl.Event, err error, ctx any) error {
+	event.Status = "failed"
+	event.ErrInfo = pl.ErrorInfo{
+		Raw:    err,
+		Code:   "read-fail",
+		Detail: "Database read failed",
+	}
+	return pl.SetLogError(event, ctx)
+}
+
+func updateRehabDoctor(input er.UpdateDto, event *pl.Event, dbx ...*gorm.DB) error {
+	pl.SetLogInfo(event, "started", "DBUpdate")
+
+	var tx *gorm.DB
+	if len(dbx) > 0 {
+		tx = dbx[0]
+	} else {
+		tx = dg.I
+	}
+
+	result := tx.
+		Model(&er.Rehab{}).
+		Where("\"Encounter_Id\" = (?)", input.Encounter_Id).
+		Update("\"Doctor_Id\"", input.Doctor_Id)
+
+	if result.Error != nil {
+		event.Status = "failed"
+		event.ErrInfo = pl.ErrorInfo{
+			Code:   "data-update-fail",
+			Detail: "Database update failed",
+			Raw:    result.Error,
+		}
+		return pl.SetLogError(event, input)
+	}
+
+	pl.SetLogInfo(event, nil, "complete")
+	return nil
+}

internal/use-case/main-use-case/encounter/lib.go

@@ -3,6 +3,8 @@ package encounter
 import (
 	// std
 	"errors"
+	ere "simrs-vx/internal/domain/references/encounter"
+
 	// external
 	dg "github.com/karincake/apem/db-gorm-pg"
 	gh "github.com/karincake/getuk"
@@ -13,10 +15,7 @@ import (
 	pl "simrs-vx/pkg/logger"
 	pu "simrs-vx/pkg/use-case-helper"
 
-	// internal
-	eaeh "simrs-vx/internal/domain/main-entities/adm-employee-hist"
 	e "simrs-vx/internal/domain/main-entities/encounter"
-	erdh "simrs-vx/internal/domain/main-entities/responsible-doctor-hist"
 )
 
 func CreateData(input e.CreateDto, event *pl.Event, dbx ...*gorm.DB) (*e.Encounter, error) {
@@ -59,8 +58,8 @@ func ReadListData(input e.ReadListDto, event *pl.Event, dbx ...*gorm.DB) ([]e.En
 	}
 	tx = tx.Model(&e.Encounter{})
 
-	if input.AuthInfo.Doctor_Id != nil {
-		tx.Where("\"Responsible_Doctor_Id\" = ?", *input.AuthInfo.Doctor_Id)
+	if input.AuthInfo.Doctor_Code != nil {
+		tx.Where("\"Responsible_Doctor_Id\" = ?", *input.AuthInfo.Doctor_Code) // TODO: fix this
 	}
 
 	tx.Scopes(gh.Preload(input.Includes)).
@@ -252,84 +251,48 @@ func updateCheckInData(input e.CheckinDto, data *e.Encounter, event *pl.Event, d
 	return nil
 }
 
-func updateLatestResponsibleDoctorHist(input e.CheckinDto, event *pl.Event, dbx ...*gorm.DB) error {
-	pl.SetLogInfo(event, "started", "DBUpdate")
+func verifyAllocatedVisitCount(i e.CreateDto, event *pl.Event) (e.Encounter, bool, error) {
+	pl.SetLogInfo(event, nil, "started", "DBGetRecentEncounterAdm")
 
-	var tx *gorm.DB
-	if len(dbx) > 0 {
-		tx = dbx[0]
-	} else {
-		tx = dg.I
-	}
+	var (
+		tx                   = dg.I
+		recentEncounterAdm   e.Encounter
+		countEncounterSeries int64
+	)
 
-	subQuery := tx.
-		Select("\"Id\"").
-		Model(&erdh.ResponsibleDoctorHist{}).
-		Where("\"Encounter_Id\" = ?", input.Id).
+	err := tx.
+		Scopes(gh.Preload("Rehab,Responsible_Doctor")).
+		Joins("JOIN \"Ambulatory\" ON \"Ambulatory\".\"Encounter_Id\" = \"Encounter\".\"Id\"").
+		Where("\"Patient_Id\" = ?", i.Patient_Id).
+		Where("\"Ambulatory\".\"Class_Code\" = ? AND \"Ambulatory\".\"VisitMode_Code\" = ?", ere.ACCRehab, ere.VMCAdm).
 		Order("\"CreatedAt\" DESC").
-		Limit(1)
-
-	result := tx.
-		Model(&erdh.ResponsibleDoctorHist{}).
-		Where("\"Id\" = (?)", subQuery).
-		Update("\"FinishedAt\"", input.StartedAt)
-
-	if result.Error != nil {
+		First(&recentEncounterAdm).Error
+	if err != nil {
 		event.Status = "failed"
 		event.ErrInfo = pl.ErrorInfo{
-			Code:   "data-update-fail",
-			Detail: "Database update failed",
-			Raw:    result.Error,
+			Code:   "read-recentEncounter-fail",
+			Detail: "Database read failed",
+			Raw:    err,
 		}
-		return pl.SetLogError(event, input)
+		return e.Encounter{}, false, pl.SetLogError(event, i)
 	}
 
-	if result.RowsAffected == 0 {
-		pl.SetLogInfo(event, input, "no previous data found to update")
-		return nil
-	}
-
-	pl.SetLogInfo(event, nil, "complete")
-	return nil
-}
-
-func updateLatestAdmEmployeeHist(input e.CheckinDto, event *pl.Event, dbx ...*gorm.DB) error {
-	pl.SetLogInfo(event, "started", "DBUpdate")
-
-	var tx *gorm.DB
-	if len(dbx) > 0 {
-		tx = dbx[0]
-	} else {
-		tx = dg.I
-	}
-
-	subQuery := tx.
-		Select("\"Id\"").
-		Model(&eaeh.AdmEmployeeHist{}).
-		Where("\"Encounter_Id\" = ?", input.Id).
-		Order("\"CreatedAt\" DESC").
-		Limit(1)
-
-	result := tx.
-		Model(&eaeh.AdmEmployeeHist{}).
-		Where("\"Id\" = (?)", subQuery).
-		Update("\"FinishedAt\"", input.StartedAt)
-
-	if result.Error != nil {
+	err = tx.
+		Model(&e.Encounter{}).
+		Joins("JOIN \"Ambulatory\" ON \"Ambulatory\".\"Encounter_Id\" = \"Encounter\".\"Id\"").
+		Where("\"Patient_Id\" = ?", i.Patient_Id).
+		Where("\"Ambulatory\".\"Class_Code\" = ? AND \"Ambulatory\".\"VisitMode_Code\" = ?", ere.ACCRehab, ere.VMCSeries).
+		Where("\"Encounter\".\"CreatedAt\" > ?", recentEncounterAdm.CreatedAt).
+		Count(&countEncounterSeries).Error
+	if err != nil {
 		event.Status = "failed"
 		event.ErrInfo = pl.ErrorInfo{
-			Code:   "data-update-fail",
-			Detail: "Database update failed",
-			Raw:    result.Error,
+			Code:   "read-countEncounter-fail",
+			Detail: "Database read failed",
+			Raw:    err,
 		}
-		return pl.SetLogError(event, input)
+		return e.Encounter{}, false, pl.SetLogError(event, i)
 	}
 
-	if result.RowsAffected == 0 {
-		pl.SetLogInfo(event, input, "no previous data found to update")
-		return nil
-	}
-
-	pl.SetLogInfo(event, nil, "complete")
-	return nil
+	return recentEncounterAdm, countEncounterSeries < int64(*recentEncounterAdm.Rehab.AllocatedVisitCount), nil
 }