add delete and update internal reference

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

@@ -2,19 +2,20 @@ package internal_reference
 
 import (
 	"errors"
-	ir "simrs-vx/internal/domain/main-entities/internal-reference"
+	eir "simrs-vx/internal/domain/main-entities/internal-reference"
 	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 ir.CreateDto, event *pl.Event, dbx ...*gorm.DB) (*ir.InternalReference, error) {
+func CreateData(input eir.CreateDto, event *pl.Event, dbx ...*gorm.DB) (*eir.InternalReference, error) {
 	pl.SetLogInfo(event, nil, "started", "DBCreate")
 
-	data := ir.InternalReference{}
+	data := eir.InternalReference{}
 	setData(&input, &data)
 
 	var tx *gorm.DB
@@ -32,12 +33,12 @@ func CreateData(input ir.CreateDto, event *pl.Event, dbx ...*gorm.DB) (*ir.Inter
 	return &data, nil
 }
 
-func ReadListData(input ir.ReadListDto, event *pl.Event, dbx ...*gorm.DB) ([]ir.InternalReference, *ir.MetaDto, error) {
+func ReadListData(input eir.ReadListDto, event *pl.Event, dbx ...*gorm.DB) ([]eir.InternalReference, *eir.MetaDto, error) {
 	pl.SetLogInfo(event, input, "started", "DBReadList")
-	data := []ir.InternalReference{}
+	data := []eir.InternalReference{}
 	pagination := gh.Pagination{}
 	count := int64(0)
-	meta := ir.MetaDto{}
+	meta := eir.MetaDto{}
 
 	var tx *gorm.DB
 	if len(dbx) > 0 {
@@ -47,7 +48,7 @@ func ReadListData(input ir.ReadListDto, event *pl.Event, dbx ...*gorm.DB) ([]ir.
 	}
 
 	tx = tx.
-		Model(&ir.InternalReference{}).
+		Model(&eir.InternalReference{}).
 		Scopes(gh.Preload(input.Includes)).
 		Scopes(gh.Filter(input.FilterDto)).
 		Count(&count).
@@ -68,3 +69,78 @@ func ReadListData(input ir.ReadListDto, event *pl.Event, dbx ...*gorm.DB) ([]ir.
 	pl.SetLogInfo(event, nil, "complete")
 	return data, &meta, nil
 }
+
+func ReadDetailData(input eir.ReadDetailDto, event *pl.Event, dbx ...*gorm.DB) (*eir.InternalReference, error) {
+	pl.SetLogInfo(event, input, "started", "DBReadDetail")
+	data := eir.InternalReference{}
+
+	var tx *gorm.DB
+	if len(dbx) > 0 {
+		tx = dbx[0]
+	} else {
+		tx = dg.I
+	}
+
+	preload := "encounter,unit,doctor"
+
+	if err := tx.
+		Scopes(gh.Preload(preload)).
+		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 eir.UpdateDto, data *eir.InternalReference, event *pl.Event, dbx ...*gorm.DB) error {
+	pl.SetLogInfo(event, data, "started", "DBUpdate")
+	data = setDataUpdate(input)
+
+	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 *eir.InternalReference, 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
+}