diff --git a/assets/docs/control-letter.html b/assets/docs/control-letter.html
index 10425b28..c55c7b9d 100644
--- a/assets/docs/control-letter.html
+++ b/assets/docs/control-letter.html
@@ -37,7 +37,7 @@
- No. :replace
+ No. : {{ .Number }}
|
@@ -52,10 +52,10 @@
- DANI SETIAWAN
+ {{ .Doctor_Name }}
- Sp./Sub. Rehabilitasi Medik
+ Sp./Sub. {{ .DstUnit_Name }}
|
@@ -72,7 +72,7 @@
No.Kartu
- :Replace
+ : {{ .CardNumber }}
|
@@ -80,7 +80,7 @@
Nama Peserta
|
- :Replace
+ : {{ .Name }}
|
@@ -88,7 +88,7 @@
Tgl.Lahir
|
- :Replace
+ : {{ .BirthDate }}
|
@@ -96,7 +96,7 @@
Diagnosa
|
- :Replace
+ : {{ .Diagnose }}
|
@@ -104,7 +104,7 @@
Rencana Kontrol
|
- :Replace
+ : {{ .PlanDate }}
|
@@ -117,13 +117,13 @@
|
- Mengetahui, DPJP :Replace
+ Mengetahui, DPJP : {{ .ResponsibleDoctor_Name }}
|
- Tgl. Entry: 2025-06-07 | Tgl. Cetak: 07-06-2025 16:52 PM
+ Tgl. Cetak : {{ .PrintDate }}
diff --git a/internal/domain/bpjs-entities/vclaim-sep-control-letter/dto.go b/internal/domain/bpjs-entities/vclaim-sep-control-letter/dto.go
index f12b57da..19530c2c 100644
--- a/internal/domain/bpjs-entities/vclaim-sep-control-letter/dto.go
+++ b/internal/domain/bpjs-entities/vclaim-sep-control-letter/dto.go
@@ -6,6 +6,9 @@ import (
type CreateDto struct {
VclaimSep_Number *string `json:"vclaimSep_number"`
+ Number *string `json:"number" gorm:"unique;size:20"`
+ Value *string `json:"value"`
+ FileUrl *string `json:"fileUrl" gorm:"unique;size:1024"`
}
type ReadListDto struct {
@@ -20,7 +23,8 @@ type FilterDto struct {
}
type ReadDetailDto struct {
- Id uint `json:"id"`
+ Id *uint `json:"id"`
+ Number *string `json:"number"`
}
type UpdateDto struct {
@@ -29,7 +33,8 @@ type UpdateDto struct {
}
type DeleteDto struct {
- Id uint `json:"id"`
+ Id uint `json:"id"`
+ Number *string `json:"number"`
}
type MetaDto struct {
@@ -41,12 +46,17 @@ type MetaDto struct {
type ResponseDto struct {
ecore.Main
VclaimSep_Number *string `json:"vclaimSep_number"`
- Counter *uint `json:"counter"`
+ Number *string `json:"number"`
+ Value *string `json:"value"`
+ FileUrl *string `json:"fileUrl"`
}
func (d VclaimSepControlLetter) ToResponse() ResponseDto {
resp := ResponseDto{
VclaimSep_Number: d.VclaimSep_Number,
+ Number: d.Number,
+ Value: d.Value,
+ FileUrl: d.FileUrl,
}
resp.Main = d.Main
return resp
diff --git a/internal/domain/references/encounter/encounter.go b/internal/domain/references/encounter/encounter.go
index 532e1625..1acee75b 100644
--- a/internal/domain/references/encounter/encounter.go
+++ b/internal/domain/references/encounter/encounter.go
@@ -120,6 +120,7 @@ const (
DTCSEP DocTypeCode = "vclaim-sep" // SEP
DTCSIPP DocTypeCode = "vclaim-sipp" // SIPP
DTCGC DocTypeCode = "general-consent"
+ DTCVSCL DocTypeCode = "vclaim-control-letter" // vclaim control letter
ETCPerson EntityTypeCode = "person"
ETCEncounter EntityTypeCode = "encounter"
diff --git a/internal/use-case/bpjs-use-case/vclaim-sep-control-letter/case.go b/internal/use-case/bpjs-use-case/vclaim-sep-control-letter/case.go
new file mode 100644
index 00000000..7c19819f
--- /dev/null
+++ b/internal/use-case/bpjs-use-case/vclaim-sep-control-letter/case.go
@@ -0,0 +1,277 @@
+package vclaimsepcontrolletter
+
+import (
+ "strconv"
+
+ e "simrs-vx/internal/domain/bpjs-entities/vclaim-sep-control-letter"
+
+ 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 = "vclaim-sep-control-letter"
+
+func Create(input e.CreateDto) (*d.Data, error) {
+ data := e.VclaimSepControlLetter{}
+
+ 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 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.VclaimSepControlLetter
+ var dataList []e.VclaimSepControlLetter
+ 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.VclaimSepControlLetter
+ 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
+ }
+
+ 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{Number: input.Number}
+ var data *e.VclaimSepControlLetter
+ 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 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{Number: input.Number}
+ var data *e.VclaimSepControlLetter
+ 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
+
+}
diff --git a/internal/use-case/bpjs-use-case/vclaim-sep-control-letter/helper.go b/internal/use-case/bpjs-use-case/vclaim-sep-control-letter/helper.go
new file mode 100644
index 00000000..891e7c4d
--- /dev/null
+++ b/internal/use-case/bpjs-use-case/vclaim-sep-control-letter/helper.go
@@ -0,0 +1,24 @@
+/*
+DESCRIPTION:
+Any functions that are used internally by the use-case
+*/
+package vclaimsepcontrolletter
+
+import (
+ e "simrs-vx/internal/domain/bpjs-entities/vclaim-sep-control-letter"
+)
+
+func setData[T *e.CreateDto | *e.UpdateDto](input T, data *e.VclaimSepControlLetter) {
+ var inputSrc *e.CreateDto
+ if inputT, ok := any(input).(*e.CreateDto); ok {
+ inputSrc = inputT
+ } else {
+ inputTemp := any(input).(*e.UpdateDto)
+ inputSrc = &inputTemp.CreateDto
+ }
+
+ data.VclaimSep_Number = inputSrc.VclaimSep_Number
+ data.Number = inputSrc.Number
+ data.Value = inputSrc.Value
+ data.FileUrl = inputSrc.FileUrl
+}
diff --git a/internal/use-case/bpjs-use-case/vclaim-sep-control-letter/lib.go b/internal/use-case/bpjs-use-case/vclaim-sep-control-letter/lib.go
new file mode 100644
index 00000000..9f66baff
--- /dev/null
+++ b/internal/use-case/bpjs-use-case/vclaim-sep-control-letter/lib.go
@@ -0,0 +1,148 @@
+package vclaimsepcontrolletter
+
+import (
+ e "simrs-vx/internal/domain/bpjs-entities/vclaim-sep-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.VclaimSepControlLetter, error) {
+ pl.SetLogInfo(event, nil, "started", "DBCreate")
+
+ data := e.VclaimSepControlLetter{}
+
+ var tx *gorm.DB
+ if len(dbx) > 0 {
+ tx = dbx[0]
+ } else {
+ tx = dg.I
+ }
+
+ setData(&input, &data)
+
+ 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.VclaimSepControlLetter, *e.MetaDto, error) {
+ pl.SetLogInfo(event, input, "started", "DBReadList")
+ data := []e.VclaimSepControlLetter{}
+ 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.VclaimSepControlLetter{}).
+ Scopes(gh.Preload(input.Includes)).
+ Scopes(gh.Filter(input.FilterDto)).
+ Count(&count).
+ Scopes(gh.Paginate(input, &pagination)).
+ Scopes(gh.Sort(input.Sort))
+
+ 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.VclaimSepControlLetter, error) {
+ pl.SetLogInfo(event, input, "started", "DBReadDetail")
+ data := e.VclaimSepControlLetter{}
+
+ var tx *gorm.DB
+ if len(dbx) > 0 {
+ tx = dbx[0]
+ } else {
+ tx = dg.I
+ }
+
+ if input.Number != nil {
+ tx = tx.Where("\"Number\" = ?", *input.Number)
+ }
+ if input.Id != nil {
+ tx = tx.Where("\"Id\" = ?", *input.Id)
+ }
+
+ if err := tx.First(&data).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.VclaimSepControlLetter, 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.VclaimSepControlLetter, 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
+}
diff --git a/internal/use-case/bpjs-use-case/vclaim-sep-control-letter/middleware-runner.go b/internal/use-case/bpjs-use-case/vclaim-sep-control-letter/middleware-runner.go
new file mode 100644
index 00000000..c0a0ecae
--- /dev/null
+++ b/internal/use-case/bpjs-use-case/vclaim-sep-control-letter/middleware-runner.go
@@ -0,0 +1,103 @@
+package vclaimsepcontrolletter
+
+import (
+ e "simrs-vx/internal/domain/bpjs-entities/vclaim-sep-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.VclaimSepControlLetter) 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.VclaimSepControlLetter) 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.VclaimSepControlLetter) 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.VclaimSepControlLetter) 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.VclaimSepControlLetter) 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
+}
diff --git a/internal/use-case/bpjs-use-case/vclaim-sep-control-letter/middleware.go b/internal/use-case/bpjs-use-case/vclaim-sep-control-letter/middleware.go
new file mode 100644
index 00000000..57262cc2
--- /dev/null
+++ b/internal/use-case/bpjs-use-case/vclaim-sep-control-letter/middleware.go
@@ -0,0 +1,9 @@
+package vclaimsepcontrolletter
+
+// example of middleware
+// func init() {
+// createPreMw = append(createPreMw,
+// CreateMw{Name: "modif-input", Func: pm.ModifInput},
+// CreateMw{Name: "check-data", Func: pm.CheckData},
+// )
+// }
diff --git a/internal/use-case/bpjs-use-case/vclaim-sep-control-letter/tycovar.go b/internal/use-case/bpjs-use-case/vclaim-sep-control-letter/tycovar.go
new file mode 100644
index 00000000..2e921ae9
--- /dev/null
+++ b/internal/use-case/bpjs-use-case/vclaim-sep-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 vclaimsepcontrolletter
+
+import (
+ "gorm.io/gorm"
+
+ e "simrs-vx/internal/domain/bpjs-entities/vclaim-sep-control-letter"
+)
+
+type createMw struct {
+ Name string
+ Func func(input *e.CreateDto, data *e.VclaimSepControlLetter, tx *gorm.DB) error
+}
+
+type readListMw struct {
+ Name string
+ Func func(input *e.ReadListDto, data *e.VclaimSepControlLetter, tx *gorm.DB) error
+}
+
+type readDetailMw struct {
+ Name string
+ Func func(input *e.ReadDetailDto, data *e.VclaimSepControlLetter, 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
diff --git a/internal/use-case/main-use-case/generate-file/case.go b/internal/use-case/main-use-case/generate-file/case.go
index 1c3ca51b..f0e71203 100644
--- a/internal/use-case/main-use-case/generate-file/case.go
+++ b/internal/use-case/main-use-case/generate-file/case.go
@@ -4,9 +4,15 @@ import (
"encoding/json"
"errors"
+ evs "simrs-vx/internal/domain/bpjs-entities/vclaim-sep"
+ evscl "simrs-vx/internal/domain/bpjs-entities/vclaim-sep-control-letter"
egc "simrs-vx/internal/domain/main-entities/general-consent"
+
+ uvs "simrs-vx/internal/use-case/bpjs-use-case/vclaim-sep"
+ uvscl "simrs-vx/internal/use-case/bpjs-use-case/vclaim-sep-control-letter"
ugc "simrs-vx/internal/use-case/main-use-case/general-consent"
+ pc "simrs-vx/pkg/conv-helper"
pl "simrs-vx/pkg/logger"
pu "simrs-vx/pkg/use-case-helper"
@@ -25,6 +31,8 @@ func Generate(input GenerateDto) (*d.Data, error) {
Source: source,
}
+ var response ResponseDto
+
// Start log
pl.SetLogInfo(&event, input, "started", "create")
@@ -32,7 +40,7 @@ func Generate(input GenerateDto) (*d.Data, error) {
// general-consent
case ere.DTCGC:
// get value from general consent by ref_id
- gc, err := ugc.ReadDetailData(egc.ReadDetailDto{Id: *input.Ref_Id}, &event)
+ gc, err := ugc.ReadDetailData(egc.ReadDetailDto{Id: uint(*pc.StringToUint64(*input.Ref_Id))}, &event)
if err != nil {
return nil, err
}
@@ -75,20 +83,89 @@ func Generate(input GenerateDto) (*d.Data, error) {
return nil, err
}
- response := ResponseDto{
+ response = ResponseDto{
+ FileUrl: urlPub,
+ }
+
+ // control-letter
+ case ere.DTCVSCL:
+ // get value from control letter by ref_id
+ cl, err := uvscl.ReadDetailData(evscl.ReadDetailDto{Number: input.Ref_Id}, &event)
+ if err != nil {
+ if !pu.IsDataNotFoundError(err) {
+ return nil, err
+ }
+ }
+
+ if cl != nil && cl.FileUrl != nil {
+ if err := removeFile(string(input.EntityType_Code), *cl.FileUrl); err != nil {
+ return nil, err
+ }
+ }
+
+ // map template data
+ clData := VclaimControlLetter{}
+ if input.Data != nil {
+ err := json.Unmarshal([]byte(*input.Data), &clData)
+ if err != nil {
+ event.ErrInfo = pl.ErrorInfo{
+ Code: "data-unmarshal-fail",
+ Detail: err.Error(),
+ Raw: err,
+ }
+ return nil, err
+ }
+ } else {
+ return nil, errors.New("there is no data to be used")
+ }
+
+ if cl == nil {
+ createCL := evscl.CreateDto{
+ VclaimSep_Number: &clData.VclaimSep.Number,
+ Number: &clData.Number,
+ Value: input.Data,
+ }
+ if cl, err = uvscl.CreateData(createCL, &event); err != nil {
+ return nil, err
+ }
+
+ }
+ // get encounter id by vclaim sep number
+ vs, err := uvs.ReadDetailData(evs.ReadDetailDto{Number: &clData.VclaimSep.Number}, &event)
+ if err != nil {
+ return nil, err
+ }
+
+ input.FormatType = erc.DFTCPDF
+ input.TemplateName = TDNCL
+ input.Encounter_Id = vs.Encounter_Id
+
+ templateData := clData.generateTemplateData()
+ // generate file
+ urlPub, err := generateFile(input, templateData)
+ if err != nil {
+ return nil, err
+ }
+
+ cl.FileUrl = &urlPub
+ if err := dg.I.Save(&cl).Error; err != nil {
+ return nil, err
+ }
+
+ response = ResponseDto{
FileUrl: urlPub,
}
- return &d.Data{
- Meta: d.II{
- "source": source,
- "structure": "single-data",
- "status": "created",
- },
- Data: response,
- }, nil
default:
return nil, errors.New("invalid type code")
}
+ return &d.Data{
+ Meta: d.II{
+ "source": source,
+ "structure": "single-data",
+ "status": "created",
+ },
+ Data: response,
+ }, nil
}
diff --git a/internal/use-case/main-use-case/generate-file/tycovar.go b/internal/use-case/main-use-case/generate-file/tycovar.go
index fed3e28c..ecfbc6a1 100644
--- a/internal/use-case/main-use-case/generate-file/tycovar.go
+++ b/internal/use-case/main-use-case/generate-file/tycovar.go
@@ -1,8 +1,13 @@
package generatefile
import (
+ "fmt"
+ "time"
+
erc "simrs-vx/internal/domain/references/common"
ere "simrs-vx/internal/domain/references/encounter"
+
+ pu "simrs-vx/pkg/use-case-helper"
)
type GeneralConsentPDF struct {
@@ -14,18 +19,34 @@ type GeneralConsentPDF struct {
Date string `json:"date"`
}
+type ControlLetterPDF struct {
+ Number string
+ Doctor_Name string
+ DstUnit_Name string
+ CardNumber string
+ Name string
+ BirthDate string
+ Diagnose string
+ PlanDate string
+ ResponsibleDoctor_Name string
+ PrintDate string
+}
+
type GenerateDto struct {
EntityType_Code ere.EntityTypeCode `json:"entityType_code" validate:"required"`
- Ref_Id *uint `json:"ref_id" validate:"required"`
+ Ref_Id *string `json:"ref_id" validate:"required"`
Type_Code ere.DocTypeCode `json:"type_code" validate:"required"`
FormatType erc.DocFormatTypeCode `json:"formatType"`
TemplateName TemplateDocsName `json:"-"`
Encounter_Id *uint `json:"-"`
+
+ Data *string `json:"data"`
}
type VclaimControlLetter struct {
Number string `json:"noSuratKontrol"`
- Date string `json:"tglRencanaKontrol"`
+ PlannedControlDate string `json:"tglRencanaKontrol"`
+ IssuedDate string `json:"tglTerbit"`
Doctor_Name string `json:"namaDokter"`
DstUnit_Name string `json:"namaPoliTujuan"`
ResponsibleDoctor_Name string `json:"namaDokterPembuat"`
@@ -60,4 +81,40 @@ type TemplateDocsName string
// TemplateDocsName is the name of the template file in the assets/docs folder
const (
TDNGC TemplateDocsName = "general-consent.html"
+ TDNCL TemplateDocsName = "control-letter.html"
)
+
+func (v VclaimControlLetter) generateTemplateData() ControlLetterPDF {
+
+ return ControlLetterPDF{
+ Number: v.Number,
+ Doctor_Name: v.Doctor_Name,
+ DstUnit_Name: v.DstUnit_Name,
+ CardNumber: v.VclaimSep.VclaimMember.CardNumber,
+ Name: v.generateNameWithGender(),
+ BirthDate: v.generateBirthDate(),
+ Diagnose: v.VclaimSep.Diagnose,
+ PlanDate: v.PlannedControlDate,
+ ResponsibleDoctor_Name: v.ResponsibleDoctor_Name,
+ PrintDate: generatePrintDate(),
+ }
+}
+
+func (v VclaimControlLetter) generateNameWithGender() string {
+ gender := "Perempuan"
+ if v.VclaimSep.VclaimMember.Gender == "L" {
+ gender = "Laki-Laki"
+ }
+
+ return fmt.Sprintf("%s (%s)", v.VclaimSep.VclaimMember.Name, gender)
+}
+
+func (v VclaimControlLetter) generateBirthDate() string {
+ t, _ := time.Parse("2006-01-02", v.VclaimSep.VclaimMember.BirthDate)
+ return pu.FormatIndonesianDate(t)
+}
+
+func generatePrintDate() string {
+ now := time.Now()
+ return now.Format("2006/01/02")
+}