187 lines
7.3 KiB
C#
187 lines
7.3 KiB
C#
|
|
using System;
|
|
using System.Collections.Generic;
|
|
using System.Text;
|
|
using Sarand.Core.App;
|
|
using Sarand.Core.Base;
|
|
using Sarand.Core.Bus;
|
|
using Sarand.Core.Dbas.Base;
|
|
using Sarand.PatientMgr.Core.App;
|
|
using Sarand.PatientMgr.Core.Bus;
|
|
|
|
namespace Sarand.PatientMgr.Core.Mgr
|
|
{
|
|
//=======================================================================
|
|
partial class SpmDepartmentMgr
|
|
{
|
|
//*******************************************************************
|
|
// P r o c e d u r e
|
|
//*******************************************************************
|
|
// Utilities.
|
|
|
|
//-------------------------------------------------------------------
|
|
// Create procedure.
|
|
public abstract SpmProcedure CreateProcedure(SysId procedureId, SysId departmentId);
|
|
|
|
//-------------------------------------------------------------------
|
|
// Procedure exists.
|
|
public bool ProcedureExistsById(SysId procedureId)
|
|
{
|
|
ClearErrorState();
|
|
if (!SysId.IsValid(procedureId)) return false;
|
|
SpmProcedure.Params prmProcedure = new SpmProcedure.Params();
|
|
prmProcedure.IncludedIds.Add(procedureId);
|
|
prmProcedure.StatusCat = SpmProcedure.StatusCat.Any;
|
|
return GetProcedureCount(prmProcedure) == 1;
|
|
}
|
|
|
|
//-------------------------------------------------------------------
|
|
// Get procedure.
|
|
public abstract SpmProcedure GetProcedure(SpmProcedure.Params prm);
|
|
|
|
public SpmProcedure GetProcedureById(SysId procedureId)
|
|
{
|
|
ClearErrorState();
|
|
if (!SysId.IsValid(procedureId)) return null;
|
|
SpmProcedure.Params prmProcedure = new SpmProcedure.Params();
|
|
prmProcedure.IncludedIds.Add(procedureId);
|
|
prmProcedure.StatusCat = SpmProcedure.StatusCat.Any;
|
|
return GetProcedure(prmProcedure);
|
|
}
|
|
public SpmProcedure GetProcedureByCode(String operationCode)
|
|
{
|
|
ClearErrorState();
|
|
if (!StringUtil.IsEmpty(operationCode)) return null;
|
|
SpmProcedure.Params prmProcedure = new SpmProcedure.Params();
|
|
prmProcedure.OperationCode = operationCode;
|
|
prmProcedure.StatusCat = SpmProcedure.StatusCat.Any;
|
|
return GetProcedure(prmProcedure);
|
|
}
|
|
public SpmProcedure GetProcedureByOperationId(SysId operationId)
|
|
{
|
|
ClearErrorState();
|
|
if (!SysId.IsValid(operationId)) return null;
|
|
SpmProcedure.Params prmProcedure = new SpmProcedure.Params();
|
|
prmProcedure.IncludedIds.Add(operationId);
|
|
prmProcedure.OperationId = operationId;
|
|
prmProcedure.StatusCat = SpmProcedure.StatusCat.Any;
|
|
return GetProcedure(prmProcedure);
|
|
}
|
|
|
|
//-------------------------------------------------------------------
|
|
// Validate procedure data.
|
|
public bool IsValidProcedure(SpmProcedure procedure)
|
|
{
|
|
ClearErrorState();
|
|
if (procedure == null) return SetErrorState(ErrorMessage.ItemNotSpecified);
|
|
return IsValidProcedureData(procedure.GetData(), new SpmProcedure.ErrField());
|
|
}
|
|
public virtual bool IsValidProcedureData(SpmProcedure.Data data, SpmProcedure.ErrField errField)
|
|
{
|
|
ClearErrorState();
|
|
// Procedure properties.
|
|
if (errField.DepartmentId != SacsHierarchyItem.ValidValue.Ignore && !SysId.IsValid(data.DepartmentId))
|
|
{
|
|
errField.DepartmentId = SacsHierarchyItem.ValidValue.Invalid;
|
|
return SetErrorState("invalid department Id");
|
|
}
|
|
if (errField.OperationCode != SacsHierarchyItem.ValidValue.Ignore && !IsValidValue(data.OperationCode, "OperationCode", (long)SpmDbDfn.GetColTextLen(SpmDbDfn.ColumnIdx.SwmProcedure_OpnCode), true))
|
|
{
|
|
errField.OperationCode = SacsHierarchyItem.ValidValue.Invalid;
|
|
return false;
|
|
}
|
|
if (errField.Description != SacsHierarchyItem.ValidValue.Ignore && !IsValidValue(data.Description, "Description", (long)SpmDbDfn.GetColTextLen(SpmDbDfn.ColumnIdx.SwmProcedure_Description), true))
|
|
{
|
|
errField.Description = SacsHierarchyItem.ValidValue.Invalid;
|
|
return false;
|
|
}
|
|
if (errField.SpecialityCode != SacsHierarchyItem.ValidValue.Ignore && !IsValidValue(data.SpecialityCode, "SpecialityCode", (long)SpmDbDfn.GetColTextLen(SpmDbDfn.ColumnIdx.SwmProcedure_SpecialityCode), true))
|
|
{
|
|
errField.SpecialityCode = SacsHierarchyItem.ValidValue.Invalid;
|
|
return false;
|
|
}
|
|
if (errField.ComplexityCode != SacsHierarchyItem.ValidValue.Ignore && !IsValidValue(data.ComplexityCode, "ComplexityCode", (long)SpmDbDfn.GetColTextLen(SpmDbDfn.ColumnIdx.SwmProcedure_ComplexityCode), true))
|
|
{
|
|
errField.ComplexityCode = SacsHierarchyItem.ValidValue.Invalid;
|
|
return false;
|
|
}
|
|
|
|
|
|
// Common properties.
|
|
if (!IsValidValue(data.Notes, "notes", (long)SpmDbDfn.GetColTextLen(SpmDbDfn.ColumnIdx.SwmProcedure_Notes)))
|
|
{
|
|
errField.Notes = SacsHierarchyItem.ValidValue.Invalid;
|
|
return false;
|
|
}
|
|
if (errField.Status != SacsHierarchyItem.ValidValue.Ignore)
|
|
{
|
|
if (!IsValidValue(SacsSystem.GetStatusCode(data.Status), "status", (long)SpmDbDfn.GetColTextLen(SpmDbDfn.ColumnIdx.SwmProcedure_Status), true, true))
|
|
{
|
|
errField.Status = SacsHierarchyItem.ValidValue.Invalid;
|
|
return false;
|
|
}
|
|
if (!SpmProcedure.ProcedureStatuses.Contains(data.Status))
|
|
{
|
|
errField.Status = SacsHierarchyItem.ValidValue.Invalid;
|
|
return SetErrorState(ErrorMessage.InvalidStatus);
|
|
}
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
//-------------------------------------------------------------------
|
|
// Procedure database interface.
|
|
public abstract bool InsertProcedure(SpmProcedure procedure, DbUpdateInfo dbUpdateInfo);
|
|
public abstract bool UpdateProcedure(SpmProcedure procedure, DbUpdateInfo dbUpdateInfo);
|
|
public virtual bool ProcedureCanBeDeleted(SpmProcedure procedure)
|
|
{
|
|
ClearErrorState();
|
|
return true;
|
|
}
|
|
public abstract bool DeleteProcedure(SpmProcedure procedure, DbUpdateInfo dbUpdateInfo);
|
|
|
|
//-------------------------------------------------------------------
|
|
// Procedure list.
|
|
public abstract ColumnDfn GetProcedureColumnDfn(SpmProcedure.Column columnId, String caption = "", int width = 0);
|
|
public abstract List<String> GetProcedureQueryFilter(SpmProcedure.Params prm);
|
|
public abstract long GetProcedureCount(SpmProcedure.Params prm);
|
|
public abstract List<SpmProcedure> GetProcedureList(SpmProcedure.Params prm);
|
|
public abstract DbResultSet ExecuteProcedureQuery(List<ColumnDfn> columns, SpmProcedure.Params prm);
|
|
|
|
//-------------------------------------------------------------------
|
|
// D a t a V a l u e s
|
|
//-------------------------------------------------------------------
|
|
public DataValue GetProcedureDataValue(ColumnDfn column, NamedValue.Map values)
|
|
{
|
|
DataValue value = new DataValue();
|
|
switch ((SpmProcedure.Column)column.Id)
|
|
{
|
|
// Notes.
|
|
case SpmProcedure.Column.Notes:
|
|
value = new DataValue(SacsHierarchyItem.FormatForDisplay(values.GetValue(column.DataName).ToString(), 200));
|
|
break;
|
|
|
|
// Status.
|
|
case SpmProcedure.Column.Status_Desc:
|
|
case SpmProcedure.Column.Status_Ind:
|
|
{
|
|
String statusCode = values.GetValue(column.DataName).ToString();
|
|
SaStatus status = SacsSystem.GetStatusForCode(statusCode);
|
|
if (column.Id == (int)SpmProcedure.Column.Status_Desc)
|
|
value = new DataValue(SacsSystem.GetStatusDescForCode(statusCode));
|
|
else if (column.Id == (int)SpmProcedure.Column.Status_Ind)
|
|
value = new DataValue(SpmProcedure.GetStatusTriState(status));
|
|
}
|
|
break;
|
|
|
|
//-----------------------------------------------------------
|
|
}
|
|
return value;
|
|
}
|
|
|
|
//-------------------------------------------------------------------
|
|
}
|
|
//=======================================================================
|
|
}
|