Files
PatientMgr-CSharp/SaPatMgrCore/Core/Mgr/SpmDepartmentMgr_Procedure.cs
T

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;
}
//-------------------------------------------------------------------
}
//=======================================================================
}