mastering bridging

internal/integration/procedure_integration.go

@@ -0,0 +1,236 @@
+package integration
+
+import (
+	"encoding/json"
+	"errors"
+	"net/http"
+	"satusehat-rssa/internal/constant"
+	"satusehat-rssa/internal/model"
+	"satusehat-rssa/pkg/httputil"
+	"strings"
+)
+
+type ProcedureInterface interface {
+	CreateProcedure(req model.ProcedureRequest) (map[string]interface{}, error)
+	GetProcedure(id string) (map[string]interface{}, error)
+	UpdateProcedure(req model.ProcedureRequest) (map[string]interface{}, error)
+	GetProcedureByPatient(id string) (map[string]interface{}, error)
+	HandleCheckProcedure(id string) ([]string, bool, error)
+}
+
+type ProcedureRepository struct {
+	akses *model.Akses
+}
+
+// GetProcedureByPatient implements ProcedureInterface.
+func (p *ProcedureRepository) GetProcedureByPatient(id string) (map[string]interface{}, error) {
+	var data map[string]interface{}
+	url := p.akses.BaseUrl + "/Procedure?subject=" + id
+	method := "GET"
+
+	client := &http.Client{}
+	oauth := model.OauthRequest{
+		ClientId:     p.akses.ClientId,
+		ClientSecret: p.akses.ClientSecret,
+	}
+	OauthInterface := NewOauthRequestRepo(p.akses)
+	token, err := OauthInterface.GenerateToken(oauth)
+	if err != nil {
+		return nil, err
+	}
+	if token == nil {
+		return nil, errors.New(constant.ErrGenerateToken)
+	}
+	request, err := http.NewRequest(method, url, nil)
+	if err != nil {
+		return nil, err
+	}
+	request.Header.Set("Authorization", "Bearer "+token.AccessToken)
+	request.Header.Set("Content-Type", constant.ContentTypeFHIRJSON)
+	res, err := client.Do(request)
+	if err != nil {
+		return nil, err
+	}
+	defer res.Body.Close()
+
+	err = json.NewDecoder(res.Body).Decode(&data)
+	if err != nil {
+		return nil, err
+	}
+
+	return data, nil
+}
+
+// HandleCheckProcedure implements ProcedureInterface.
+func (p *ProcedureRepository) HandleCheckProcedure(id string) ([]string, bool, error) {
+	procedure, err := p.GetProcedureByPatient(id)
+	if err != nil {
+		return nil, false, err
+	}
+	var ids []string
+	if entries, ok := procedure["entry"].([]interface{}); ok && len(entries) != 0 {
+		if entries, ok := (procedure)["entry"].([]interface{}); ok && len(entries) > 0 {
+			if entryMap, ok := entries[0].(map[string]interface{}); ok {
+				if resource, ok := entryMap["resource"].(map[string]interface{}); ok {
+					if id, ok := resource["id"].(string); ok {
+						//fmt.Println("resource.id:", id)
+						ids = append(ids, id)
+						return ids, true, nil
+					}
+				}
+			}
+		}
+		return nil, true, nil
+	}
+
+	return nil, false, nil
+}
+
+// CreateProcedure implements ProcedureInterface.
+func (p *ProcedureRepository) CreateProcedure(req model.ProcedureRequest) (map[string]interface{}, error) {
+	req.ResourceType = constant.ProcedureResourceType
+
+	patient, err := p.setupPatient(&req)
+	if err != nil {
+		return nil, err
+	}
+
+	err = p.setupEncounter(&req, patient)
+	if err != nil {
+		return nil, err
+	}
+
+	//Setup Performer
+	err = p.setupPractitioner(&req)
+	if err != nil {
+		return nil, err
+	}
+
+	oauth := model.OauthRequest{
+		ClientId:     p.akses.ClientId,
+		ClientSecret: p.akses.ClientSecret,
+	}
+
+	token, err := NewOauthRequestRepo(p.akses).GenerateToken(oauth)
+	if err != nil {
+		return nil, err
+	}
+	if token == nil {
+		return nil, errors.New(constant.ErrGenerateToken)
+	}
+
+	url := p.akses.BaseUrl + "/Procedure"
+
+	return httputil.DoRequest(httputil.RequestOption{
+		Method:      "POST",
+		URL:         url,
+		Body:        req,
+		BearerToken: token.AccessToken,
+	})
+}
+
+// GetProcedure implements ProcedureInterface.
+func (p *ProcedureRepository) GetProcedure(id string) (map[string]interface{}, error) {
+	panic("unimplemented")
+}
+
+// UpdateProcedure implements ProcedureInterface.
+func (p *ProcedureRepository) UpdateProcedure(req model.ProcedureRequest) (map[string]interface{}, error) {
+	patient, err := p.setupPatient(&req)
+	if err != nil {
+		return nil, err
+	}
+
+	err = p.setupEncounter(&req, patient)
+	if err != nil {
+		return nil, err
+	}
+
+	//Setup Performer
+	err = p.setupPractitioner(&req)
+	if err != nil {
+		return nil, err
+	}
+
+	oauth := model.OauthRequest{
+		ClientId:     p.akses.ClientId,
+		ClientSecret: p.akses.ClientSecret,
+	}
+
+	token, err := NewOauthRequestRepo(p.akses).GenerateToken(oauth)
+	if err != nil {
+		return nil, err
+	}
+	if token == nil {
+		return nil, errors.New(constant.ErrGenerateToken)
+	}
+
+	url := p.akses.BaseUrl + "/Procedure/" + req.ID
+
+	return httputil.DoRequest(httputil.RequestOption{
+		Method:      "PUT",
+		URL:         url,
+		BearerToken: token.AccessToken,
+		Body:        req,
+	})
+}
+
+func (p *ProcedureRepository) setupPatient(req *model.ProcedureRequest) (string, error) {
+	if req.Subject.Reference == "" {
+		return "", nil
+	}
+	patientInterface := NewPatientRepo(p.akses)
+	patient, err := patientInterface.HandleCheckPatient(req.Subject.Reference)
+	if err != nil {
+		return "", err
+	}
+	if patient != "" {
+		req.Subject.Reference = "Patient/" + patient
+	}
+	return patient, nil
+}
+
+// setupEncounter extracts encounter setup logic from CreateDiagnosisReport.
+func (p *ProcedureRepository) setupEncounter(req *model.ProcedureRequest, patient string) error {
+	if patient == "" {
+		return nil
+	}
+	encounterInterface := NewEncounterRepo(p.akses)
+	encounterId, encounterExist, err := encounterInterface.HandleCheckEncounter(patient)
+	if err != nil {
+		return err
+	}
+	if encounterExist {
+		req.Encounter.Reference = "Encounter/" + encounterId
+	} else {
+		//Buat dulu encounter
+	}
+	return nil
+}
+
+func (p *ProcedureRepository) setupPractitioner(req *model.ProcedureRequest) error {
+	if len(req.Performer) == 0 {
+		return nil
+	}
+
+	for _, performer := range req.Performer {
+		if strings.Contains(performer.Actor.Reference, "Practitioner/") {
+			temp := strings.Split(performer.Actor.Reference, "/")
+			practicionerInterface := NewPracticionerRepo(p.akses)
+			ref, _, err := practicionerInterface.HandleCheckPartitioner(temp[1])
+			if err != nil {
+				return err
+			}
+			if ref != "" {
+				performer.Actor.Reference = "Practitioner/" + ref
+			}
+		}
+	}
+	return nil
+}
+
+func NewProcedureRepo(akses *model.Akses) ProcedureInterface {
+	return &ProcedureRepository{
+		akses: akses,
+	}
+}