Merge pull request #122 from dikstub-rssa/feat/control-letter-121

Feat/control letter 121

cmd/main-migration/migrations/20251102091932.sql

@@ -0,0 +1,2 @@
+-- Rename a column from "McuUrgencyLevel_Code" to "UrgencyLevel_Code"
+ALTER TABLE "public"."McuOrder" RENAME COLUMN "McuUrgencyLevel_Code" TO "UrgencyLevel_Code";

cmd/main-migration/migrations/20251103081637.sql

@@ -0,0 +1,17 @@
+-- Create "ControlLetter" table
+CREATE TABLE "public"."ControlLetter" (
+  "Id" bigserial NOT NULL,
+  "CreatedAt" timestamptz NULL,
+  "UpdatedAt" timestamptz NULL,
+  "DeletedAt" timestamptz NULL,
+  "Encounter_Id" bigint NULL,
+  "Unit_Id" bigint NULL,
+  "Specialist_Id" bigint NULL,
+  "Subspecialist_Id" bigint NULL,
+  "Date" timestamptz NULL,
+  PRIMARY KEY ("Id"),
+  CONSTRAINT "fk_ControlLetter_Encounter" FOREIGN KEY ("Encounter_Id") REFERENCES "public"."Encounter" ("Id") ON UPDATE NO ACTION ON DELETE NO ACTION,
+  CONSTRAINT "fk_ControlLetter_Specialist" FOREIGN KEY ("Specialist_Id") REFERENCES "public"."Specialist" ("Id") ON UPDATE NO ACTION ON DELETE NO ACTION,
+  CONSTRAINT "fk_ControlLetter_Subspecialist" FOREIGN KEY ("Subspecialist_Id") REFERENCES "public"."Subspecialist" ("Id") ON UPDATE NO ACTION ON DELETE NO ACTION,
+  CONSTRAINT "fk_ControlLetter_Unit" FOREIGN KEY ("Unit_Id") REFERENCES "public"."Unit" ("Id") ON UPDATE NO ACTION ON DELETE NO ACTION
+);

cmd/main-migration/migrations/atlas.sum

@@ -1,4 +1,4 @@
-h1:ewCVlZr73Pj7qD/A+J5/yF94CncwZCb6s8VSHl0Hawo=
+h1:zJVjtCkiWEF41JV7lzbRtI5mPZGz5bC8FaVruh3fmkY=
 20250904105930.sql h1:MEM6blCgke9DzWQSTnLzasbPIrcHssNNrJqZpSkEo6k=
 20250904141448.sql h1:J8cmYNk4ZrG9fhfbi2Z1IWz7YkfvhFqTzrLFo58BPY0=
 20250908062237.sql h1:Pu23yEW/aKkwozHoOuROvHS/GK4ngARJGdO7FB7HZuI=
@@ -62,4 +62,6 @@ h1:ewCVlZr73Pj7qD/A+J5/yF94CncwZCb6s8VSHl0Hawo=
 20251025013609.sql h1:evPJaTD8WxYRMOJZHkSr7ONLx9PYxT+ankzQt9c/sJ0=
 20251027075128.sql h1:/iFQBM1sytjqpyQSOx61q33gnorMgxTiFVSuL6bQqsM=
 20251027091406.sql h1:eCZGtUkxAzEAqpC9UsGpP8Df9mS0DEOqSl885LgqpvM=
-20251102002037.sql h1:FTJ9KdTOhso+wNbDoEtvj3D8XkgT6blu79JucGQoprg=
+20251102002037.sql h1:lFJbuoZ2LMQnUNGdcwHVY3Xlfslgzu9t2WByT8yfOZI=
+20251102091932.sql h1:rmdhb5m+P+fU8jROBZNyeYgZKuQvucsuljXv4ZVzvks=
+20251103081637.sql h1:jqpMnygFceOJn0rI30GYWI2CKbOu6RzVqw2/Pji2Ka8=

internal/domain/main-entities/control-letter/dto.go

@@ -0,0 +1,105 @@
+package controlletter
+
+import (
+	// std
+	"time"
+
+	// internal - lib
+	pa "simrs-vx/internal/lib/auth"
+
+	// internal - domain - base-entities
+	ecore "simrs-vx/internal/domain/base-entities/core"
+
+	// internal - domain - main-entities
+
+	ee "simrs-vx/internal/domain/main-entities/encounter"
+	es "simrs-vx/internal/domain/main-entities/specialist"
+	ess "simrs-vx/internal/domain/main-entities/subspecialist"
+	eu "simrs-vx/internal/domain/main-entities/unit"
+)
+
+type CreateDto struct {
+	Encounter_Id     *uint      `json:"encounter_id"`
+	Unit_Id          *uint      `json:"unit_id"`
+	Specialist_Id    *uint      `json:"specialist_id"`
+	Subspecialist_Id *uint      `json:"subspecialist_id"`
+	Date             *time.Time `json:"date"`
+}
+
+type ReadListDto struct {
+	FilterDto
+	Includes   string `json:"includes"`
+	Pagination ecore.Pagination
+}
+
+type FilterDto struct {
+	Encounter_Id     *uint      `json:"encounter-id"`
+	Unit_Id          *uint      `json:"unit-id"`
+	Specialist_Id    *uint      `json:"specialist-id"`
+	Subspecialist_Id *uint      `json:"subspecialist-id"`
+	Date             *time.Time `json:"date"`
+}
+
+type ReadDetailDto struct {
+	Id       uint16 `json:"id"`
+	Includes string `json:"includes"`
+}
+
+type UpdateDto struct {
+	Id uint `json:"id"`
+	CreateDto
+}
+
+type DeleteDto struct {
+	Id uint `json:"id"`
+}
+
+type ReplyDto struct {
+	Id       uint    `json:"id"`
+	Solution *string `json:"solution"`
+
+	pa.AuthInfo
+}
+
+type MetaDto struct {
+	PageNumber int `json:"page_number"`
+	PageSize   int `json:"page_size"`
+	Count      int `json:"count"`
+}
+
+type ResponseDto struct {
+	ecore.Main
+	Encounter_Id     *uint              `json:"encounter_id"`
+	Encounter        *ee.Encounter      `json:"encounter,omitempty"`
+	Unit_Id          *uint              `json:"unit_id"`
+	Unit             *eu.Unit           `json:"unit,omitempty"`
+	Specialist_Id    *uint              `json:"specialist_id"`
+	Specialist       *es.Specialist     `json:"specialist,omitempty"`
+	Subspecialist_Id *uint              `json:"subspecialist_id"`
+	Subspecialist    *ess.Subspecialist `json:"subspecialist,omitempty"`
+	Date             *time.Time         `json:"date"`
+}
+
+func (d ControlLetter) ToResponse() ResponseDto {
+	resp := ResponseDto{
+		Encounter_Id:     d.Encounter_Id,
+		Encounter:        d.Encounter,
+		Unit_Id:          d.Unit_Id,
+		Unit:             d.Unit,
+		Specialist_Id:    d.Specialist_Id,
+		Specialist:       d.Specialist,
+		Subspecialist_Id: d.Subspecialist_Id,
+		Subspecialist:    d.Subspecialist,
+		Date:             d.Date,
+	}
+	resp.Main = d.Main
+	return resp
+}
+
+func ToResponseList(data []ControlLetter) []ResponseDto {
+	resp := make([]ResponseDto, len(data))
+	for i, u := range data {
+		resp[i] = u.ToResponse()
+	}
+	return resp
+}

internal/domain/main-entities/control-letter/entity.go

@@ -0,0 +1,24 @@
+package controlletter
+
+import (
+	"time"
+
+	ecore "simrs-vx/internal/domain/base-entities/core"
+	ee "simrs-vx/internal/domain/main-entities/encounter"
+	es "simrs-vx/internal/domain/main-entities/specialist"
+	ess "simrs-vx/internal/domain/main-entities/subspecialist"
+	eu "simrs-vx/internal/domain/main-entities/unit"
+)
+
+type ControlLetter struct {
+	ecore.Main                          // adjust this according to the needs
+	Encounter_Id     *uint              `json:"encounter_id"`
+	Encounter        *ee.Encounter      `json:"encounter" gorm:"foreignKey:Encounter_Id;references:Id"`
+	Unit_Id          *uint              `json:"unit_id"`
+	Unit             *eu.Unit           `json:"unit" gorm:"foreignKey:Unit_Id;references:Id"`
+	Specialist_Id    *uint              `json:"specialist_id"`
+	Specialist       *es.Specialist     `json:"specialist" gorm:"foreignKey:Specialist_Id;references:Id"`
+	Subspecialist_Id *uint              `json:"subspecialist_id"`
+	Subspecialist    *ess.Subspecialist `json:"subspecialist" gorm:"foreignKey:Subspecialist_Id;references:Id"`
+	Date             *time.Time         `json:"date"`
+}

internal/domain/main-entities/mcu-order-item/dto.go

@@ -23,8 +23,8 @@ type ReadListDto struct {
 }
 
 type FilterDto struct {
-	McuOrder_Id *uint              `json:"mcuOrder-id"`
+	McuOrder_Id *uint              `json:"mcu-order-id"`
-	McuSrc_Id   *uint              `json:"mcuSrc-id"`
+	McuSrc_Id   *uint              `json:"mcu-src-id"`
 	Result      *string            `json:"result"`
 	Status_Code erc.DataStatusCode `json:"status-code"`
 }

internal/domain/main-entities/mcu-order/dto.go

@@ -20,14 +20,14 @@ import (
 )
 
 type CreateDto struct {
-	Encounter_Id         *uint                    `json:"encounter_id"`
+	Encounter_Id      *uint                    `json:"encounter_id"`
-	Status_Code          erc.DataStatusCode       `json:"status_code" gorm:"not null;size:10"`
+	Status_Code       erc.DataStatusCode       `json:"status_code" gorm:"not null;size:10"`
-	Doctor_Id            *uint                    `json:"doctor_id"`
+	Doctor_Id         *uint                    `json:"doctor_id"`
-	SpecimenPickTime     *time.Time               `json:"specimenPickTime"`
+	SpecimenPickTime  *time.Time               `json:"specimenPickTime"`
-	ExaminationDate      *time.Time               `json:"examinationDate"`
+	ExaminationDate   *time.Time               `json:"examinationDate"`
-	Number               uint8                    `json:"number"`
+	Number            uint8                    `json:"number"`
-	Temperature          float64                  `json:"temperature"`
+	Temperature       float64                  `json:"temperature"`
-	McuUrgencyLevel_Code ercl.McuUrgencyLevelCode `json:"mcuUrgencyLevel_code"`
+	UrgencyLevel_Code ercl.McuUrgencyLevelCode `json:"urgencyLevel_code"`
 
 	pa.AuthInfo
 }
@@ -39,14 +39,15 @@ type ReadListDto struct {
 }
 
 type FilterDto struct {
-	Encounter_Id         *uint                    `json:"encounter-id"`
+	Encounter_Id      *uint                    `json:"encounter-id"`
-	Status_Code          erc.DataStatusCode       `json:"status-code" gorm:"not null;size:10"`
+	Status_Code       erc.DataStatusCode       `json:"status-code" gorm:"not null;size:10"`
-	Doctor_Id            *uint                    `json:"doctor-id"`
+	Doctor_Id         *uint                    `json:"doctor-id"`
-	SpecimenPickTime     *time.Time               `json:"specimenPickTime"`
+	SpecimenPickTime  *time.Time               `json:"specimenPickTime"`
-	ExaminationDate      *time.Time               `json:"examinationDate"`
+	ExaminationDate   *time.Time               `json:"examinationDate"`
-	Number               uint8                    `json:"number"`
+	Number            uint8                    `json:"number"`
-	Temperature          float64                  `json:"temperature"`
+	Temperature       float64                  `json:"temperature"`
-	McuUrgencyLevel_Code ercl.McuUrgencyLevelCode `json:"mcuUrgencyLevel-code"`
+	UrgencyLevel_Code ercl.McuUrgencyLevelCode `json:"urgency-level-code"`
+	Scope_Code        ercl.McuUrgencyLevelCode `json:"scope-code"`
 }
 type ReadDetailDto struct {
 	Id       uint   `json:"id"`
@@ -74,30 +75,30 @@ type MetaDto struct {
 }
 type ResponseDto struct {
 	ecore.Main
-	Encounter_Id         *uint                    `json:"encounter_id"`
+	Encounter_Id      *uint                    `json:"encounter_id"`
-	Encounter            *ee.Encounter            `json:"encounter,omitempty"`
+	Encounter         *ee.Encounter            `json:"encounter,omitempty"`
-	Status_Code          erc.DataStatusCode       `json:"status_code" gorm:"not null;size:10"`
+	Status_Code       erc.DataStatusCode       `json:"status_code" gorm:"not null;size:10"`
-	Doctor_Id            *uint                    `json:"doctor_id"`
+	Doctor_Id         *uint                    `json:"doctor_id"`
-	Doctor               *ed.Doctor               `json:"doctor,omitempty"`
+	Doctor            *ed.Doctor               `json:"doctor,omitempty"`
-	SpecimenPickTime     *time.Time               `json:"specimenPickTime"`
+	SpecimenPickTime  *time.Time               `json:"specimenPickTime"`
-	ExaminationDate      *time.Time               `json:"examinationDate"`
+	ExaminationDate   *time.Time               `json:"examinationDate"`
-	Number               uint8                    `json:"number"`
+	Number            uint8                    `json:"number"`
-	Temperature          float64                  `json:"temperature"`
+	Temperature       float64                  `json:"temperature"`
-	McuUrgencyLevel_Code ercl.McuUrgencyLevelCode `json:"mcuUrgencyLevel_code""`
+	UrgencyLevel_Code ercl.McuUrgencyLevelCode `json:"urgencyLevel_code""`
 }
 
 func (d McuOrder) ToResponse() ResponseDto {
 	resp := ResponseDto{
-		Encounter_Id:         d.Encounter_Id,
+		Encounter_Id:      d.Encounter_Id,
-		Encounter:            d.Encounter,
+		Encounter:         d.Encounter,
-		Status_Code:          d.Status_Code,
+		Status_Code:       d.Status_Code,
-		Doctor_Id:            d.Doctor_Id,
+		Doctor_Id:         d.Doctor_Id,
-		Doctor:               d.Doctor,
+		Doctor:            d.Doctor,
-		SpecimenPickTime:     d.SpecimenPickTime,
+		SpecimenPickTime:  d.SpecimenPickTime,
-		ExaminationDate:      d.ExaminationDate,
+		ExaminationDate:   d.ExaminationDate,
-		Number:               d.Number,
+		Number:            d.Number,
-		Temperature:          d.Temperature,
+		Temperature:       d.Temperature,
-		McuUrgencyLevel_Code: d.McuUrgencyLevel_Code,
+		UrgencyLevel_Code: d.UrgencyLevel_Code,
 	}
 	resp.Main = d.Main
 	return resp

internal/domain/main-entities/mcu-order/entity.go

@@ -12,18 +12,18 @@ import (
 )
 
 type McuOrder struct {
-	ecore.Main                                    // adjust this according to the needs
+	ecore.Main                                 // adjust this according to the needs
-	Encounter_Id         *uint                    `json:"encounter_id"`
+	Encounter_Id      *uint                    `json:"encounter_id"`
-	Encounter            *ee.Encounter            `json:"encounter,omitempty" gorm:"foreignKey:Encounter_Id;references:Id"`
+	Encounter         *ee.Encounter            `json:"encounter,omitempty" gorm:"foreignKey:Encounter_Id;references:Id"`
-	Status_Code          erc.DataStatusCode       `json:"status_code" gorm:"not null;size:10"`
+	Status_Code       erc.DataStatusCode       `json:"status_code" gorm:"not null;size:10"`
-	Doctor_Id            *uint                    `json:"doctor_id"`
+	Doctor_Id         *uint                    `json:"doctor_id"`
-	Doctor               *ed.Doctor               `json:"doctor,omitempty" gorm:"foreignKey:Doctor_Id;references:Id"`
+	Doctor            *ed.Doctor               `json:"doctor,omitempty" gorm:"foreignKey:Doctor_Id;references:Id"`
-	SpecimenPickTime     *time.Time               `json:"specimenPickTime"`
+	SpecimenPickTime  *time.Time               `json:"specimenPickTime"`
-	ExaminationDate      *time.Time               `json:"examinationDate"`
+	ExaminationDate   *time.Time               `json:"examinationDate"`
-	Number               uint8                    `json:"number"`
+	Number            uint8                    `json:"number"`
-	Temperature          float64                  `json:"temperature"`
+	Temperature       float64                  `json:"temperature"`
-	McuUrgencyLevel_Code ercl.McuUrgencyLevelCode `json:"mcuUrgencyLevel_code" gorm:"not null;size:15"`
+	UrgencyLevel_Code ercl.McuUrgencyLevelCode `json:"urgencyLevel_code" gorm:"not null;size:15"`
-	Scope_Code           *ere.CheckupScopeCode    `json:"scope_code" gorm:"index;size:10"`
+	Scope_Code        *ere.CheckupScopeCode    `json:"scope_code" gorm:"index;size:10"`
 }
 
 func (d McuOrder) IsCompleted() bool {

internal/interface/main-handler/consultation/handler.go

@@ -1,4 +1,4 @@
-package device
+package consultation
 
 import (
 	"net/http"

internal/interface/main-handler/control-letter/handler.go

@@ -0,0 +1,71 @@
+package controlletter
+
+import (
+	"net/http"
+
+	rw "github.com/karincake/risoles"
+	sf "github.com/karincake/semprit"
+
+	// ua "github.com/karincake/tumpeng/auth/svc"
+
+	e "simrs-vx/internal/domain/main-entities/control-letter"
+	u "simrs-vx/internal/use-case/main-use-case/control-letter"
+)
+
+type myBase struct{}
+
+var O myBase
+
+func (obj myBase) Create(w http.ResponseWriter, r *http.Request) {
+	dto := e.CreateDto{}
+	if res := rw.ValidateStructByIOR(w, r.Body, &dto); !res {
+		return
+	}
+	res, err := u.Create(dto)
+	rw.DataResponse(w, res, err)
+}
+
+func (obj myBase) GetList(w http.ResponseWriter, r *http.Request) {
+	dto := e.ReadListDto{}
+	sf.UrlQueryParam(&dto, *r.URL)
+	res, err := u.ReadList(dto)
+	rw.DataResponse(w, res, err)
+}
+
+func (obj myBase) GetDetail(w http.ResponseWriter, r *http.Request) {
+	id := rw.ValidateInt(w, "id", r.PathValue("id"))
+	if id <= 0 {
+		return
+	}
+	dto := e.ReadDetailDto{}
+	dto.Id = uint16(id)
+	res, err := u.ReadDetail(dto)
+	rw.DataResponse(w, res, err)
+}
+
+func (obj myBase) Update(w http.ResponseWriter, r *http.Request) {
+	id := rw.ValidateInt(w, "id", r.PathValue("id"))
+	if id <= 0 {
+		return
+	}
+
+	dto := e.UpdateDto{}
+	if res := rw.ValidateStructByIOR(w, r.Body, &dto); !res {
+		return
+	}
+	dto.Id = uint(id)
+	res, err := u.Update(dto)
+	rw.DataResponse(w, res, err)
+}
+
+func (obj myBase) Delete(w http.ResponseWriter, r *http.Request) {
+	id := rw.ValidateInt(w, "id", r.PathValue("id"))
+	if id <= 0 {
+		return
+	}
+
+	dto := e.DeleteDto{}
+	dto.Id = uint(id)
+	res, err := u.Delete(dto)
+	rw.DataResponse(w, res, err)
+}

internal/interface/main-handler/main-handler.go

@@ -10,6 +10,7 @@ import (
 	auth "simrs-vx/internal/interface/main-handler/authentication"
 	chemo "simrs-vx/internal/interface/main-handler/chemo"
 	consultation "simrs-vx/internal/interface/main-handler/consultation"
+	controlletter "simrs-vx/internal/interface/main-handler/control-letter"
 	counter "simrs-vx/internal/interface/main-handler/counter"
 	deviceorder "simrs-vx/internal/interface/main-handler/device-order"
 	deviceorderitem "simrs-vx/internal/interface/main-handler/device-order-item"
@@ -251,6 +252,7 @@ func SetRoutes() http.Handler {
 		"PATCH /{id}/reject": chemo.O.Reject,
 	})
 
+	hc.RegCrud(r, "/v1/control-letter", controlletter.O)
 	hc.RegCrud(r, "/v1/internal-reference", internalreference.O)
 	hc.RegCrud(r, "/v1/ambulance-transport-req", ambulancetransportrequest.O)
 	hc.RegCrud(r, "/v1/responsible-doctor-hist", responsibledoctorhist.O)

internal/interface/migration/main-entities.go

@@ -8,6 +8,7 @@ import (
 	appointment "simrs-vx/internal/domain/main-entities/appointment"
 	chemo "simrs-vx/internal/domain/main-entities/chemo"
 	consultation "simrs-vx/internal/domain/main-entities/consultation"
+	controlletter "simrs-vx/internal/domain/main-entities/control-letter"
 	counter "simrs-vx/internal/domain/main-entities/counter"
 	deathcause "simrs-vx/internal/domain/main-entities/death-cause"
 	device "simrs-vx/internal/domain/main-entities/device"
@@ -193,5 +194,6 @@ func getMainEntities() []any {
 		&responsibledoctorhist.ResponsibleDoctorHist{},
 		&admemployeehist.AdmEmployeeHist{},
 		&vclaimmember.VclaimMember{},
+		&controlletter.ControlLetter{},
 	}
 }

internal/use-case/main-use-case/control-letter/case.go

@@ -0,0 +1,299 @@
+package controlletter
+
+import (
+	"errors"
+	"strconv"
+
+	e "simrs-vx/internal/domain/main-entities/control-letter"
+	ue "simrs-vx/internal/use-case/main-use-case/encounter"
+
+	dg "github.com/karincake/apem/db-gorm-pg"
+	d "github.com/karincake/dodol"
+
+	pl "simrs-vx/pkg/logger"
+	pu "simrs-vx/pkg/use-case-helper"
+
+	"gorm.io/gorm"
+)
+
+const source = "control-letter"
+
+func Create(input e.CreateDto) (*d.Data, error) {
+	data := e.ControlLetter{}
+
+	event := pl.Event{
+		Feature: "Create",
+		Source:  source,
+	}
+
+	// Start log
+	pl.SetLogInfo(&event, input, "started", "create")
+
+	err := dg.I.Transaction(func(tx *gorm.DB) error {
+		mwRunner := newMiddlewareRunner(&event, tx)
+		mwRunner.setMwType(pu.MWTPre)
+		// Run pre-middleware
+		if err := mwRunner.RunCreateMiddleware(createPreMw, &input, &data); err != nil {
+			return err
+		}
+
+		if pu.IsDateBeforeNow(input.Date) {
+			return errors.New("date is in the past")
+		}
+
+		// check if encounter is done
+		if ue.IsDone(*input.Encounter_Id, &event, tx) {
+			return errors.New("encounter is already done")
+		}
+
+		if resData, err := CreateData(input, &event, tx); err != nil {
+			return err
+		} else {
+			data = *resData
+		}
+
+		mwRunner.setMwType(pu.MWTPost)
+		// Run post-middleware
+		if err := mwRunner.RunCreateMiddleware(createPostMw, &input, &data); err != nil {
+			return err
+		}
+
+		pl.SetLogInfo(&event, nil, "complete")
+
+		return nil
+	})
+
+	if err != nil {
+		return nil, err
+	}
+
+	return &d.Data{
+		Meta: d.II{
+			"source":    source,
+			"structure": "single-data",
+			"status":    "created",
+		},
+		Data: data.ToResponse(),
+	}, nil
+}
+
+func ReadList(input e.ReadListDto) (*d.Data, error) {
+	var data *e.ControlLetter
+	var dataList []e.ControlLetter
+	var metaList *e.MetaDto
+	var err error
+
+	event := pl.Event{
+		Feature: "ReadList",
+		Source:  source,
+	}
+
+	// Start log
+	pl.SetLogInfo(&event, input, "started", "readList")
+
+	err = dg.I.Transaction(func(tx *gorm.DB) error {
+		mwRunner := newMiddlewareRunner(&event, tx)
+		mwRunner.setMwType(pu.MWTPre)
+		// Run pre-middleware
+		if err := mwRunner.RunReadListMiddleware(readListPreMw, &input, data); err != nil {
+			return err
+		}
+
+		if dataList, metaList, err = ReadListData(input, &event, tx); err != nil {
+			return err
+		}
+
+		mwRunner.setMwType(pu.MWTPost)
+		// Run post-middleware
+		if err := mwRunner.RunReadListMiddleware(readListPostMw, &input, data); err != nil {
+			return err
+		}
+
+		return nil
+	})
+
+	if err != nil {
+		return nil, err
+	}
+
+	return &d.Data{
+		Meta: d.IS{
+			"source":              source,
+			"structure":           "list-data",
+			"status":              "fetched",
+			"page_number":         strconv.Itoa(metaList.PageNumber),
+			"page_size":           strconv.Itoa(metaList.PageSize),
+			"record_totalCount":   strconv.Itoa(metaList.Count),
+			"record_currentCount": strconv.Itoa(len(dataList)),
+		},
+		Data: e.ToResponseList(dataList),
+	}, nil
+}
+
+func ReadDetail(input e.ReadDetailDto) (*d.Data, error) {
+	var data *e.ControlLetter
+	var err error
+
+	event := pl.Event{
+		Feature: "ReadDetail",
+		Source:  source,
+	}
+
+	// Start log
+	pl.SetLogInfo(&event, input, "started", "readDetail")
+
+	err = dg.I.Transaction(func(tx *gorm.DB) error {
+		mwRunner := newMiddlewareRunner(&event, tx)
+		mwRunner.setMwType(pu.MWTPre)
+		// Run pre-middleware
+		if err := mwRunner.RunReadDetailMiddleware(readDetailPreMw, &input, data); err != nil {
+			return err
+		}
+
+		input.Includes = "encounter,unit,specialist,subspecialist"
+
+		if data, err = ReadDetailData(input, &event, tx); err != nil {
+			return err
+		}
+
+		mwRunner.setMwType(pu.MWTPost)
+		// Run post-middleware
+		if err := mwRunner.RunReadDetailMiddleware(readDetailPostMw, &input, data); err != nil {
+			return err
+		}
+
+		return nil
+	})
+
+	if err != nil {
+		return nil, err
+	}
+
+	return &d.Data{
+		Meta: d.IS{
+			"source":    source,
+			"structure": "single-data",
+			"status":    "fetched",
+		},
+		Data: data.ToResponse(),
+	}, nil
+}
+
+func Update(input e.UpdateDto) (*d.Data, error) {
+	rdDto := e.ReadDetailDto{Id: uint16(input.Id)}
+	var data *e.ControlLetter
+	var err error
+
+	event := pl.Event{
+		Feature: "Update",
+		Source:  source,
+	}
+
+	// Start log
+	pl.SetLogInfo(&event, input, "started", "update")
+
+	err = dg.I.Transaction(func(tx *gorm.DB) error {
+		pl.SetLogInfo(&event, rdDto, "started", "DBReadDetail")
+		if data, err = ReadDetailData(rdDto, &event, tx); err != nil {
+			return err
+		}
+
+		mwRunner := newMiddlewareRunner(&event, tx)
+		mwRunner.setMwType(pu.MWTPre)
+		// Run pre-middleware
+		if err := mwRunner.RunUpdateMiddleware(readDetailPreMw, &rdDto, data); err != nil {
+			return err
+		}
+
+		if pu.IsDateBeforeNow(input.Date) {
+			return errors.New("date is in the past")
+		}
+
+		// check if encounter is done
+		if ue.IsDone(*input.Encounter_Id, &event, tx) {
+			return errors.New("encounter is already done")
+		}
+
+		if err := UpdateData(input, data, &event, tx); err != nil {
+			return err
+		}
+
+		pl.SetLogInfo(&event, nil, "complete")
+
+		mwRunner.setMwType(pu.MWTPost)
+		// Run post-middleware
+		if err := mwRunner.RunUpdateMiddleware(readDetailPostMw, &rdDto, data); err != nil {
+			return err
+		}
+
+		return nil
+	})
+
+	if err != nil {
+		return nil, err
+	}
+
+	return &d.Data{
+		Meta: d.IS{
+			"source":    source,
+			"structure": "single-data",
+			"status":    "updated",
+		},
+		Data: data.ToResponse(),
+	}, nil
+
+}
+
+func Delete(input e.DeleteDto) (*d.Data, error) {
+	rdDto := e.ReadDetailDto{Id: uint16(input.Id)}
+	var data *e.ControlLetter
+	var err error
+
+	event := pl.Event{
+		Feature: "Delete",
+		Source:  source,
+	}
+
+	// Start log
+	pl.SetLogInfo(&event, input, "started", "delete")
+
+	err = dg.I.Transaction(func(tx *gorm.DB) error {
+		pl.SetLogInfo(&event, rdDto, "started", "DBReadDetail")
+		if data, err = ReadDetailData(rdDto, &event, tx); err != nil {
+			return err
+		}
+
+		mwRunner := newMiddlewareRunner(&event, tx)
+		mwRunner.setMwType(pu.MWTPre)
+		// Run pre-middleware
+		if err := mwRunner.RunDeleteMiddleware(readDetailPreMw, &rdDto, data); err != nil {
+			return err
+		}
+
+		if err := DeleteData(data, &event, tx); err != nil {
+			return err
+		}
+
+		mwRunner.setMwType(pu.MWTPost)
+		// Run post-middleware
+		if err := mwRunner.RunDeleteMiddleware(readDetailPostMw, &rdDto, data); err != nil {
+			return err
+		}
+
+		return nil
+	})
+
+	if err != nil {
+		return nil, err
+	}
+
+	return &d.Data{
+		Meta: d.IS{
+			"source":    source,
+			"structure": "single-data",
+			"status":    "deleted",
+		},
+		Data: data.ToResponse(),
+	}, nil
+
+}

internal/use-case/main-use-case/control-letter/helper.go

@@ -0,0 +1,25 @@
+/*
+DESCRIPTION:
+Any functions that are used internally by the use-case
+*/
+package controlletter
+
+import (
+	e "simrs-vx/internal/domain/main-entities/control-letter"
+)
+
+func setData[T *e.CreateDto | *e.UpdateDto](input T, data *e.ControlLetter) {
+	var inputSrc *e.CreateDto
+	if inputT, ok := any(input).(*e.CreateDto); ok {
+		inputSrc = inputT
+	} else {
+		inputTemp := any(input).(*e.UpdateDto)
+		inputSrc = &inputTemp.CreateDto
+	}
+
+	data.Encounter_Id = inputSrc.Encounter_Id
+	data.Unit_Id = inputSrc.Unit_Id
+	data.Specialist_Id = inputSrc.Specialist_Id
+	data.Subspecialist_Id = inputSrc.Subspecialist_Id
+	data.Date = inputSrc.Date
+}

internal/use-case/main-use-case/control-letter/lib.go

@@ -0,0 +1,144 @@
+package controlletter
+
+import (
+	e "simrs-vx/internal/domain/main-entities/control-letter"
+
+	plh "simrs-vx/pkg/lib-helper"
+	pl "simrs-vx/pkg/logger"
+	pu "simrs-vx/pkg/use-case-helper"
+
+	dg "github.com/karincake/apem/db-gorm-pg"
+	gh "github.com/karincake/getuk"
+	"gorm.io/gorm"
+)
+
+func CreateData(input e.CreateDto, event *pl.Event, dbx ...*gorm.DB) (*e.ControlLetter, error) {
+	pl.SetLogInfo(event, nil, "started", "DBCreate")
+
+	data := e.ControlLetter{}
+	setData(&input, &data)
+
+	var tx *gorm.DB
+	if len(dbx) > 0 {
+		tx = dbx[0]
+	} else {
+		tx = dg.I
+	}
+
+	if err := tx.Create(&data).Error; err != nil {
+		return nil, plh.HandleCreateError(input, event, err)
+	}
+
+	pl.SetLogInfo(event, nil, "complete")
+	return &data, nil
+}
+
+func ReadListData(input e.ReadListDto, event *pl.Event, dbx ...*gorm.DB) ([]e.ControlLetter, *e.MetaDto, error) {
+	pl.SetLogInfo(event, input, "started", "DBReadList")
+	data := []e.ControlLetter{}
+	pagination := gh.Pagination{}
+	count := int64(0)
+	meta := e.MetaDto{}
+
+	var tx *gorm.DB
+	if len(dbx) > 0 {
+		tx = dbx[0]
+	} else {
+		tx = dg.I
+	}
+
+	tx = tx.
+		Model(&e.ControlLetter{}).
+		Scopes(gh.Preload(input.Includes)).
+		Scopes(gh.Filter(input.FilterDto)).
+		Count(&count).
+		Scopes(gh.Paginate(input, &pagination)).
+		Order("\"CreatedAt\" DESC")
+
+	if err := tx.Find(&data).Error; err != nil {
+		if err == gorm.ErrRecordNotFound {
+			return nil, &meta, nil
+		}
+		return nil, nil, plh.HandleListError(input, event, err)
+	}
+
+	meta.Count = int(count)
+	meta.PageNumber = pagination.PageNumber
+	meta.PageSize = pagination.PageSize
+
+	pl.SetLogInfo(event, nil, "complete")
+	return data, &meta, nil
+}
+
+func ReadDetailData(input e.ReadDetailDto, event *pl.Event, dbx ...*gorm.DB) (*e.ControlLetter, error) {
+	pl.SetLogInfo(event, input, "started", "DBReadDetail")
+	data := e.ControlLetter{}
+
+	var tx *gorm.DB
+	if len(dbx) > 0 {
+		tx = dbx[0]
+	} else {
+		tx = dg.I
+	}
+
+	if input.Includes != "" {
+		tx = tx.Scopes(gh.Preload(input.Includes))
+	}
+
+	if err := tx.First(&data, input.Id).Error; err != nil {
+		if processedErr := pu.HandleReadError(err, event, source, input.Id, data); processedErr != nil {
+			return nil, processedErr
+		}
+	}
+
+	pl.SetLogInfo(event, nil, "complete")
+	return &data, nil
+}
+
+func UpdateData(input e.UpdateDto, data *e.ControlLetter, event *pl.Event, dbx ...*gorm.DB) error {
+	pl.SetLogInfo(event, data, "started", "DBUpdate")
+	setData(&input, data)
+
+	var tx *gorm.DB
+	if len(dbx) > 0 {
+		tx = dbx[0]
+	} else {
+		tx = dg.I
+	}
+
+	if err := tx.Save(&data).Error; err != nil {
+		event.Status = "failed"
+		event.ErrInfo = pl.ErrorInfo{
+			Code:   "data-update-fail",
+			Detail: "Database update failed",
+			Raw:    err,
+		}
+		return pl.SetLogError(event, input)
+	}
+
+	pl.SetLogInfo(event, nil, "complete")
+	return nil
+}
+
+func DeleteData(data *e.ControlLetter, event *pl.Event, dbx ...*gorm.DB) error {
+	pl.SetLogInfo(event, data, "started", "DBDelete")
+	var tx *gorm.DB
+	if len(dbx) > 0 {
+		tx = dbx[0]
+	} else {
+		tx = dg.I
+	}
+
+	if err := tx.Delete(&data).Error; err != nil {
+		event.Status = "failed"
+		event.ErrInfo = pl.ErrorInfo{
+			Code:   "data-delete-fail",
+			Detail: "Database delete failed",
+			Raw:    err,
+		}
+		return pl.SetLogError(event, data)
+	}
+
+	pl.SetLogInfo(event, nil, "complete")
+	return nil
+}

internal/use-case/main-use-case/control-letter/middleware-runner.go

@@ -0,0 +1,103 @@
+package controlletter
+
+import (
+	e "simrs-vx/internal/domain/main-entities/control-letter"
+	pl "simrs-vx/pkg/logger"
+	pu "simrs-vx/pkg/use-case-helper"
+
+	"gorm.io/gorm"
+)
+
+type middlewareRunner struct {
+	Event  *pl.Event
+	Tx     *gorm.DB
+	MwType pu.MWType
+}
+
+// NewMiddlewareExecutor creates a new middleware executor
+func newMiddlewareRunner(event *pl.Event, tx *gorm.DB) *middlewareRunner {
+	return &middlewareRunner{
+		Event: event,
+		Tx:    tx,
+	}
+}
+
+// ExecuteCreateMiddleware executes create middleware
+func (me *middlewareRunner) RunCreateMiddleware(middlewares []createMw, input *e.CreateDto, data *e.ControlLetter) error {
+	for _, middleware := range middlewares {
+		logData := pu.GetLogData(input, data)
+
+		pl.SetLogInfo(me.Event, logData, "started", middleware.Name)
+
+		if err := middleware.Func(input, data, me.Tx); err != nil {
+			return pu.HandleMiddlewareError(me.Event, string(me.MwType), middleware.Name, logData, err)
+		}
+
+		pl.SetLogInfo(me.Event, nil, "complete")
+	}
+	return nil
+}
+
+func (me *middlewareRunner) RunReadListMiddleware(middlewares []readListMw, input *e.ReadListDto, data *e.ControlLetter) error {
+	for _, middleware := range middlewares {
+		logData := pu.GetLogData(input, data)
+
+		pl.SetLogInfo(me.Event, logData, "started", middleware.Name)
+
+		if err := middleware.Func(input, data, me.Tx); err != nil {
+			return pu.HandleMiddlewareError(me.Event, string(me.MwType), middleware.Name, logData, err)
+		}
+
+		pl.SetLogInfo(me.Event, nil, "complete")
+	}
+	return nil
+}
+
+func (me *middlewareRunner) RunReadDetailMiddleware(middlewares []readDetailMw, input *e.ReadDetailDto, data *e.ControlLetter) error {
+	for _, middleware := range middlewares {
+		logData := pu.GetLogData(input, data)
+
+		pl.SetLogInfo(me.Event, logData, "started", middleware.Name)
+
+		if err := middleware.Func(input, data, me.Tx); err != nil {
+			return pu.HandleMiddlewareError(me.Event, string(me.MwType), middleware.Name, logData, err)
+		}
+
+		pl.SetLogInfo(me.Event, nil, "complete")
+	}
+	return nil
+}
+
+func (me *middlewareRunner) RunUpdateMiddleware(middlewares []readDetailMw, input *e.ReadDetailDto, data *e.ControlLetter) error {
+	for _, middleware := range middlewares {
+		logData := pu.GetLogData(input, data)
+
+		pl.SetLogInfo(me.Event, logData, "started", middleware.Name)
+
+		if err := middleware.Func(input, data, me.Tx); err != nil {
+			return pu.HandleMiddlewareError(me.Event, string(me.MwType), middleware.Name, logData, err)
+		}
+
+		pl.SetLogInfo(me.Event, nil, "complete")
+	}
+	return nil
+}
+
+func (me *middlewareRunner) RunDeleteMiddleware(middlewares []readDetailMw, input *e.ReadDetailDto, data *e.ControlLetter) error {
+	for _, middleware := range middlewares {
+		logData := pu.GetLogData(input, data)
+
+		pl.SetLogInfo(me.Event, logData, "started", middleware.Name)
+
+		if err := middleware.Func(input, data, me.Tx); err != nil {
+			return pu.HandleMiddlewareError(me.Event, string(me.MwType), middleware.Name, logData, err)
+		}
+
+		pl.SetLogInfo(me.Event, nil, "complete")
+	}
+	return nil
+}
+
+func (me *middlewareRunner) setMwType(mwType pu.MWType) {
+	me.MwType = mwType
+}

internal/use-case/main-use-case/control-letter/middleware.go

@@ -0,0 +1,9 @@
+package controlletter
+
+// example of middleware
+// func init() {
+// 	createPreMw = append(createPreMw,
+// 		CreateMw{Name: "modif-input", Func: pm.ModifInput},
+// 		CreateMw{Name: "check-data", Func: pm.CheckData},
+// 	)
+// }

internal/use-case/main-use-case/control-letter/tycovar.go

@@ -0,0 +1,44 @@
+/*
+DESCRIPTION:
+A sample, part of the package that contains type, constants, and/or variables.
+
+In this sample it also provides type and variable regarding the needs of the
+middleware to separate from main use-case which has the basic CRUD
+functionality. The purpose of this is to make the code more maintainable.
+*/
+package controlletter
+
+import (
+	"gorm.io/gorm"
+
+	e "simrs-vx/internal/domain/main-entities/control-letter"
+)
+
+type createMw struct {
+	Name string
+	Func func(input *e.CreateDto, data *e.ControlLetter, tx *gorm.DB) error
+}
+
+type readListMw struct {
+	Name string
+	Func func(input *e.ReadListDto, data *e.ControlLetter, tx *gorm.DB) error
+}
+
+type readDetailMw struct {
+	Name string
+	Func func(input *e.ReadDetailDto, data *e.ControlLetter, tx *gorm.DB) error
+}
+
+type UpdateMw = readDetailMw
+type DeleteMw = readDetailMw
+
+var createPreMw []createMw      // preprocess middleware
+var createPostMw []createMw     // postprocess middleware
+var readListPreMw []readListMw  // ..
+var readListPostMw []readListMw // ..
+var readDetailPreMw []readDetailMw
+var readDetailPostMw []readDetailMw
+var updatePreMw []readDetailMw
+var updatePostMw []readDetailMw
+var deletePreMw []readDetailMw
+var deletePostMw []readDetailMw

internal/use-case/main-use-case/mcu-order-item/lib.go

@@ -24,10 +24,10 @@ func CreateData(input e.CreateDto, event *pl.Event, dbx ...*gorm.DB) (*e.McuOrde
 
 	deletedData := e.McuOrderItem{}
 	tx.Unscoped().
-		Where("\"McuOrder_Id\" = ? AND \"McuSrc_Id\" = ?", input.McuOrder_Id, input.McuSrc_Id).
+		Where("\"McuOrder_Id\" = ? AND \"McuSrc_Id\" = ?", *input.McuOrder_Id, input.McuSrc_Id).
 		First(&deletedData)
 	if deletedData.Id != 0 {
-		if err := tx.Model(e.McuOrderItem{}).Where("Id = ?", deletedData.Id).Update("DeletedAt", nil).Error; err != nil {
+		if err := tx.Unscoped().Model(e.McuOrderItem{}).Where("\"Id\" = ?", deletedData.Id).Update("\"DeletedAt\"", nil).Error; err != nil {
 			return nil, plh.HandleCreateError(input, event, err)
 		}
 		return &deletedData, nil

internal/use-case/main-use-case/mcu-order/helper.go

@@ -26,6 +26,6 @@ func setData[T *e.CreateDto | *e.UpdateDto](input T, data *e.McuOrder) {
 	data.ExaminationDate = inputSrc.ExaminationDate
 	data.Number = inputSrc.Number
 	data.Temperature = inputSrc.Temperature
-	data.McuUrgencyLevel_Code = inputSrc.McuUrgencyLevel_Code
+	data.UrgencyLevel_Code = inputSrc.UrgencyLevel_Code
 	data.Doctor_Id = inputSrc.Doctor_Id
 }

pkg/use-case-helper/use-case-helper.go

@@ -143,3 +143,10 @@ func GetTimeNow() *time.Time {
 	tmp := time.Now()
 	return &tmp
 }
+
+func IsDateBeforeNow(t *time.Time) bool {
+	if t == nil {
+		return false
+	}
+	return t.Before(time.Now())
+}