/// <summary>
/// validate the user input
/// </summary>
/// <param name="BaseMstr"></param>
/// <param name="lStatusCode"></param>
/// <param name="strStatusComment"></param>
/// <returns></returns>
public override CStatus ValidateUserInput(out CParameterList plistStatus)
{
plistStatus = new CParameterList();
CStatus status = new CStatus();
//label
if (txtItemGroupLabel.Text.Length < 1)
{
status.Status = false;
status.StatusCode = k_STATUS_CODE.Failed;
plistStatus.AddInputParameter("ERROR_IG_LABEL", Resources.ErrorMessages.ERROR_IG_LABEL);
}
//active - nothing to check
//if we are inserting make sure the row
//does not already esist.
if (EditMode == k_EDIT_MODE.INSERT ||
EditMode == k_EDIT_MODE.UPDATE && txtItemGroupLabel.Text != OriginalLabel)
{
if (CGridView.CellValueExists(GView, 1, txtItemGroupLabel.Text))
{
status.Status = false;
status.StatusCode = k_STATUS_CODE.Failed;
plistStatus.AddInputParameter("ERROR_DATA_EXISTS", Resources.ErrorMessages.ERROR_DATA_EXISTS);
}
}
return(status);
}
/// <summary>
/// Used to save a checklist as a new checklist with a new ID
/// </summary>
/// <param name="lChecklistID"></param>
/// <param name="strNewLabel"></param>
/// <param name="lNewChecklistID"></param>
/// <returns></returns>
public CStatus SaveAs(long lChecklistID,
string strNewLabel,
out long lNewChecklistID)
{
//initialize parameters
lNewChecklistID = 0;
//create a status object and check for valid dbconnection
CStatus status = DBConnValid();
if (!status.Status)
{
return(status);
}
//load the paramaters list
CParameterList pList = new CParameterList(SessionID,
ClientIP,
UserID);
//add the rest of the parameters
pList.AddInputParameter("pi_nChecklistID", lChecklistID);
pList.AddInputParameter("pi_vNewLabel", strNewLabel);
pList.AddInputParameter("po_nNewChecklistID", lNewChecklistID);
//execute the SP
status = DBConn.ExecuteOracleSP("PCK_CHECKLIST.SaveAs", pList);
if (status.Status)
{
//get the TS_ID returned from the SP call
lNewChecklistID = pList.GetParamLongValue("po_nNewChecklistID");
}
return(status);
}
/// <summary>
/// Used to get a dataset of outcome states for a particular
/// checklist/item combination
/// </summary>
/// <param name="lChecklistID"></param>
/// <param name="lItemID"></param>
/// <param name="ds"></param>
/// <returns></returns>
public CStatus GetOutcomeStateDS(
long lChecklistID,
long lItemID,
out DataSet ds)
{
//initialize parameters
ds = null;
//create a status object and check for valid dbconnection
CStatus status = DBConnValid();
if (!status.Status)
{
return(status);
}
//load the paramaters list
CParameterList pList = new CParameterList(
SessionID,
ClientIP,
UserID);
pList.AddInputParameter("pi_nChecklistID", lChecklistID);
pList.AddInputParameter("pi_nItemID", lItemID);
//get the dataset
CDataSet cds = new CDataSet();
return(cds.GetOracleDataSet(
DBConn,
"PCK_CHECKLIST_ITEM.GetOutcomeStateRS",
pList,
out ds));
}
/// <summary>
/// Used to get a dataset of checklists matching search criteria
/// </summary>
/// <param name="strChecklistName"></param>
/// <param name="lServiceID"></param>
/// <param name="bActiveChecklistsOnly"></param>
/// <param name="ds"></param>
/// <returns></returns>
public CStatus GetCheckListSearchDS(string strChecklistName,
long lServiceID,
bool bActiveChecklistsOnly,
out DataSet ds)
{
//initialize parameters
ds = null;
//create a status object and check for valid dbconnection
CStatus status = DBConnValid();
if (!status.Status)
{
return(status);
}
//load the paramaters list
CParameterList pList = new CParameterList(SessionID, ClientIP, UserID);
pList.AddInputParameter("pi_vChecklistName", strChecklistName);
pList.AddInputParameter("pi_nServiceID", lServiceID);
pList.AddInputParameter("pi_nActiveChecklistsOnly", (bActiveChecklistsOnly) ? 1 : 0);
//get the dataset
CDataSet cds = new CDataSet();
return(cds.GetOracleDataSet(DBConn,
"PCK_CHECKLIST.GetChecklistSearchRS",
pList,
out ds));
}
/// <summary>
/// Used to insert and item component state
/// </summary>
/// <param name="icsState"></param>
/// <param name="lICStateID"></param>
/// <param name="lStatusCode"></param>
/// <param name="strStatus"></param>
/// <returns></returns>
public CStatus InsertICState(CICStateDataItem icsState, out long lICStateID)
{
//initialize parameters
lICStateID = 0;
//create a status object and check for valid dbconnection
CStatus status = DBConnValid();
if (!status.Status)
{
return(status);
}
//load the paramaters list
CParameterList pList = new CParameterList(SessionID, ClientIP, UserID);
// procedure specific parameters
pList.AddInputParameter("pi_nItemID", icsState.ItemID);
pList.AddInputParameter("pi_nItemComponentID", icsState.ItemComponentID);
pList.AddInputParameter("pi_nStateID", icsState.StateID);
pList.AddOutputParameter("po_nICStateID", lICStateID);
//execute the SP
status = DBConn.ExecuteOracleSP("PCK_ITEM_COMPONENT.InsertICState", pList);
if (status.Status)
{
//get the TS_ID returned from the SP call
lICStateID = pList.GetParamLongValue("po_nICStateID");
}
return(status);
}
/// <summary>
/// Used to update an item component range
/// </summary>
/// <param name="icrRange"></param>
/// <param name="lStatusCode"></param>
/// <param name="strStatus"></param>
/// <returns></returns>
public CStatus UpdateICRange(CICRangeDataItem icrRange)
{
//create a status object and check for valid dbconnection
CStatus status = DBConnValid();
if (!status.Status)
{
return(status);
}
//load the paramaters list
CParameterList pList = new CParameterList(SessionID, ClientIP, UserID);
// procedure specific parameters
pList.AddInputParameter("pi_nItemID", icrRange.ItemID);
pList.AddInputParameter("pi_nItemComponentID", icrRange.ItemComponentID);
pList.AddInputParameter("pi_vUnits", icrRange.Units);
pList.AddInputParameter("pi_nLegalMin", icrRange.LegalMin);
pList.AddInputParameter("pi_nCriticalLow", icrRange.CriticalLow);
pList.AddInputParameter("pi_nLow", icrRange.Low);
pList.AddInputParameter("pi_nHigh", icrRange.High);
pList.AddInputParameter("pi_nCriticalHigh", icrRange.CriticalHigh);
pList.AddInputParameter("pi_nLegalMax", icrRange.LegalMax);
pList.AddInputParameter("pi_nICRangeID", icrRange.ICRangeID);
//execute the SP
return(DBConn.ExecuteOracleSP("PCK_ITEM_COMPONENT.UpdateICRange", pList));
}
/// <summary>
/// US:1883 delete item collection
/// </summary>
/// <param name="lCollectionItemID"></param>
/// <param name="strItemIDs"></param>
/// <returns></returns>
public CStatus DeleteItemCollection(long lCollectionItemID, string strItemIDs)
{
//create a status object and check for valid dbconnection
CStatus status = DBConnValid();
if (!status.Status)
{
return(status);
}
//load the paramaters list
CParameterList pList = new CParameterList(SessionID, ClientIP, UserID);
// procedure specific parameters
pList.AddInputParameter("pi_nCollectionItemID", lCollectionItemID);
pList.AddInputParameter("pi_vItemIDs", strItemIDs);
//execute the SP
status = DBConn.ExecuteOracleSP("PCK_ITEM_COLLECTION.DeleteItemCollection", pList);
if (!status.Status)
{
return(status);
}
return(new CStatus());
}
/// <summary>
/// Used to get a dataset of item components that pertain
/// to an item
/// </summary>
/// <param name="lItemID"></param>
/// <param name="ds"></param>
/// <param name="lStatusCode"></param>
/// <param name="strStatus"></param>
/// <returns></returns>
public CStatus GetItemComponentDS(
long lItemID,
k_ACTIVE_ID lActiveFilter,
out DataSet ds)
{
//initialize parameters
ds = null;
//create a status object and check for valid dbconnection
CStatus status = DBConnValid();
if (!status.Status)
{
return(status);
}
//load the paramaters list
CParameterList pList = new CParameterList(SessionID, ClientIP, UserID);
// procedure specific parameters
pList.AddInputParameter("pi_nItemID", lItemID);
pList.AddInputParameter("pi_nActiveFilter", (long)lActiveFilter);
//get the dataset
CDataSet cds = new CDataSet();
return(cds.GetOracleDataSet(
DBConn,
"PCK_ITEM_COMPONENT.GetItemComponentRS",
pList,
out ds));
}
/// <summary>
/// US:1883 get the patients most recent collection item
/// </summary>
/// <param name="lCollectionItemID"></param>
/// <param name="strPatientID"></param>
/// <param name="ds"></param>
/// <returns></returns>
public CStatus GetItemColMostRecentPatICDS(long lCollectionItemID, string strPatientID, out DataSet ds)
{
//initialize parameters
ds = null;
//create a status object and check for valid dbconnection
CStatus status = DBConnValid();
if (!status.Status)
{
return(status);
}
//load the paramaters list
CParameterList pList = new CParameterList(SessionID, ClientIP, UserID);
pList.AddInputParameter("pi_nCollectionItemID", lCollectionItemID);
pList.AddInputParameter("pi_vPatientID", strPatientID);
//get the dataset
CDataSet cds = new CDataSet();
status = cds.GetOracleDataSet(
DBConn,
"PCK_ITEM_COLLECTION.GetItemColPatICRS",
pList,
out ds);
if (!status.Status)
{
return(status);
}
return(new CStatus());
}
/// <summary>
/// US:1883 update a collection item
/// </summary>
/// <param name="di"></param>
/// <returns></returns>
public CStatus UpdateItemCollection(CItemCollectionDataItem di)
{
//create a status object and check for valid dbconnection
CStatus status = DBConnValid();
if (!status.Status)
{
return(status);
}
//load the paramaters list
CParameterList pList = new CParameterList(SessionID, ClientIP, UserID);
// procedure specific parameters
pList.AddInputParameter("pi_nCollectionItemID", di.CollectionItemID);
pList.AddInputParameter("pi_nItemID", di.ItemID);
pList.AddInputParameter("pi_nSortOrder", di.SortOrder);
//execute the SP
status = DBConn.ExecuteOracleSP("PCK_ITEM_COLLECTION.UpdateItemCollection", pList);
if (!status.Status)
{
return(status);
}
return(new CStatus());
}
/// <summary>
/// updates a patient item component
/// </summary>
/// <param name="diPatItemComp"></param>
/// <returns></returns>
public CStatus UpdatePatientItemComponent(CPatientItemComponentDataItem diPatItemComp)
{
//status information returned from the call
CStatus status = new CStatus();
//create a status object and check for valid dbconnection
status = DBConnValid();
if (!status.Status)
{
return(status);
}
//load the paramaters list
CParameterList pList = new CParameterList(base.SessionID,
base.ClientIP,
base.UserID);
pList.AddInputParameter("pi_nPatItemID", diPatItemComp.PatItemID);
pList.AddInputParameter("pi_nItemID", diPatItemComp.ItemID);
pList.AddInputParameter("pi_nComponentID", diPatItemComp.ComponentID);
pList.AddInputParameter("pi_vComponentValue", diPatItemComp.ComponentValue);
//execute the SP
return(DBConn.ExecuteOracleSP("PCK_PAT_ITEM.UpdatePatItemComponent", pList));
}
/// <summary>
/// insert a pat item comment
/// </summary>
/// <param name="lPatItemID"></param>
/// <param name="lItemID"></param>
/// <param name="strCommentText"></param>
/// <returns></returns>
public CStatus InsertPatientItemComment(long lPatItemID,
long lItemID,
string strCommentText)
{
//status information returned from the call
CStatus status = new CStatus();
//create a status object and check for valid dbconnection
status = DBConnValid();
if (!status.Status)
{
return(status);
}
//load the paramaters list
CParameterList pList = new CParameterList(base.SessionID,
base.ClientIP,
base.UserID);
//add the rest of the parameters
pList.AddInputParameter("pi_nPatItemID", lPatItemID);
pList.AddInputParameter("pi_nItemID", lItemID);
pList.AddInputParameter("pi_vCommentText", strCommentText);
//execute the SP
status = base.DBConn.ExecuteOracleSP("PCK_PAT_ITEM.InsertPatItemComment",
pList);
return(status);
}
/// <summary>
/// insert a patient item component
/// </summary>
/// <param name="di"></param>
/// <param name="lPatItemComponentID"></param>
/// <param name="lStatusCode"></param>
/// <param name="strStatus"></param>
/// <returns></returns>
private CStatus InsertPatientItemComponent(CPatientItemComponentDataItem di)
{
//status information returned from the call
CStatus status = DBConnValid();
if (!status.Status)
{
return(status);
}
//load the paramaters list
CParameterList pList = new CParameterList(base.SessionID,
base.ClientIP,
base.UserID);
//add the rest of the parameters
pList.AddInputParameter("pi_vPatientID", di.PatientID);
pList.AddInputParameter("pi_nItemID", di.ItemID);
pList.AddInputParameter("pi_nPatItemID", di.PatItemID);
pList.AddInputParameter("pi_nComponentID", di.ComponentID);
pList.AddInputParameter("pi_vComponentValue", di.ComponentValue);
//execute the SP
return(base.DBConn.ExecuteOracleSP("PCK_PAT_ITEM.InsertPatItemComponent", pList));
}
/// <summary>
/// US:912
/// method
/// inserts a comment for a patient item
/// </summary>
/// <param name="lPatCLID"></param>
/// <param name="lChecklistID"></param>
/// <param name="lItemID"></param>
/// <param name="strCommentText"></param>
/// <returns></returns>
public CStatus InsertPatientItemComment(long lPatCLID,
long lChecklistID,
long lItemID,
string strCommentText)
{
//create a status object and check for valid dbconnection
CStatus status = DBConnValid();
if (!status.Status)
{
return(status);
}
//load the paramaters list
CParameterList pList = new CParameterList(SessionID, ClientIP, UserID);
//add the rest of the parameters
pList.AddInputParameter("pi_nPatCLID", lPatCLID);
pList.AddInputParameter("pi_nChecklistID", lChecklistID);
pList.AddInputParameter("pi_nItemID", lItemID);
pList.AddInputParameter("pi_vCommentText", strCommentText);
//execute the SP
return(DBConn.ExecuteOracleSP("PCK_PAT_CHECKLIST_ITEM.InsertPatCLIComment", pList));
}
/// <summary>
/// override
/// checks if the dialog values are valid
/// </summary>
/// <param name="plistStatus"></param>
/// <returns></returns>
public override CStatus ValidateUserInput(out CParameterList plistStatus)
{
CStatus status = new CStatus();
plistStatus = new CParameterList();
if (string.IsNullOrEmpty(txtService.Text))
{
plistStatus.AddInputParameter("ERROR_VE_SERVICELABEL", Resources.ErrorMessages.ERROR_VE_SERVICELABEL);
status.Status = false;
status.StatusCode = k_STATUS_CODE.Failed;
}
if (EditMode == k_EDIT_MODE.INSERT ||
EditMode == k_EDIT_MODE.UPDATE && txtService.Text != OriginalLabel)
{
if (CGridView.CellValueExists(GView, 1, txtService.Text))
{
plistStatus.AddInputParameter("ERROR_DATA_EXISTS", Resources.ErrorMessages.ERROR_DATA_EXISTS);
status.Status = false;
status.StatusCode = k_STATUS_CODE.Failed;
}
}
return(status);
}
/// <summary>
/// method
/// updates the matching item in the database with the values of the item passed in
/// </summary>
/// <param name="di"></param>
/// <returns></returns>
public CStatus UpdatePatChecklistItem(CPatChecklistItemDataItem di)
{
//create a status object and check for valid dbconnection
CStatus status = DBConnValid();
if (!status.Status)
{
return(status);
}
//load the paramaters list
CParameterList pList = new CParameterList(SessionID, ClientIP, UserID);
//add the rest of the parameters
pList.AddInputParameter("pi_vPatientID", di.PatientID);
pList.AddInputParameter("pi_nChecklistID", di.ChecklistID);
pList.AddInputParameter("pi_nItemID", di.ItemID);
pList.AddInputParameter("pi_nOSID", di.OSID);
pList.AddInputParameter("pi_nDSID", di.DSID);
pList.AddInputParameter("pi_nTSID", di.TSID);
pList.AddInputParameter("pi_nPatCLID", di.PatCLID);
pList.AddInputParameter("pi_nIsOverridden", (long)di.IsOverridden);
pList.AddInputParameter("pi_nIsEnabled", (long)di.IsEnabled);
pList.AddInputParameter("pi_dtOverrideDate", di.OverrideDate);
//execute the SP
return(DBConn.ExecuteOracleSP("PCK_PAT_CHECKLIST_ITEM.UpdatePatChecklistItem", pList));
}
/// <summary>
/// Used to save the items selected decision states
/// </summary>
/// <param name="lChecklistID"></param>
/// <param name="lItemID"></param>
/// <param name="strDSIDs"></param>
/// <param name="lDSIDCount"></param>
/// <returns></returns>
public CStatus SaveDecisionStates(
long lChecklistID,
long lItemID,
string strDSIDs,
long lDSIDCount)
{
//create a status object and check for valid dbconnection
CStatus status = DBConnValid();
if (!status.Status)
{
return(status);
}
//load the paramaters list
CParameterList pList = new CParameterList(
SessionID,
ClientIP,
UserID);
//add the rest of the parameters
pList.AddInputParameter("pi_nChecklistID", lChecklistID);
pList.AddInputParameter("pi_nItemID", lItemID);
pList.AddInputParameter("pi_vDSIDs", strDSIDs);
pList.AddInputParameter("pi_nDSCount", lDSIDCount);
//execute the SP
return(DBConn.ExecuteOracleSP("PCK_CHECKLIST_ITEM.SaveDecisionStates", pList));
}
public CStatus UpdateChecklistItemLogic(
long lChecklistID,
long lItemID,
string strLogic)
{
//create a status object and check for valid dbconnection
CStatus status = DBConnValid();
if (!status.Status)
{
return(status);
}
//load the paramaters list
CParameterList pList = new CParameterList(
SessionID,
ClientIP,
UserID);
//add the rest of the parameters
pList.AddInputParameter("pi_nChecklistID", lChecklistID);
pList.AddInputParameter("pi_nItemID", lItemID);
pList.AddInputParameter("pi_vLogic", strLogic);
//execute the SP
return(DBConn.ExecuteOracleSP("PCK_CHECKLIST_ITEM.UpdateChecklistItemLogic", pList));
}
/// <summary>
/// method
/// inserts a service record into the database
/// </summary>
/// <param name="di"></param>
/// <param name="lServiceID"></param>
/// <returns></returns>
public CStatus InsertService(CServiceDataItem di, out long lServiceID)
{
//initialize parameters
lServiceID = 0;
//create a status object and check for valid dbconnection
CStatus status = DBConnValid();
if (!status.Status)
{
return(status);
}
//load the paramaters list
CParameterList pList = new CParameterList(SessionID, ClientIP, UserID);
//add the rest of the parameters
pList.AddInputParameter("pi_vServiceLabel", di.ServiceLabel);
pList.AddInputParameter("pi_nIsActive", (long)((di.IsActive) ? k_TRUE_FALSE_ID.True : k_TRUE_FALSE_ID.False));
pList.AddOutputParameter("po_nServiceID", di.ServiceID);
//execute the SP
status = DBConn.ExecuteOracleSP("PCK_VARIABLE.InsertService", pList);
if (status.Status)
{
lServiceID = pList.GetParamLongValue("po_nServiceID");
}
return(status);
}
/// <summary>
/// Used to insert a temporal state
/// </summary>
/// <param name="tsdi"></param>
/// <param name="lTSID"></param>
/// <param name="lStatusCode"></param>
/// <param name="strStatus"></param>
/// <returns></returns>
public CStatus InsertTemporalState(CTemporalStateDataItem tsdi, out long lTSID)
{
//initialize parameters
lTSID = 0;
//create a status object and check for valid dbconnection
CStatus status = DBConnValid();
if (!status.Status)
{
return(status);
}
//load the paramaters list
CParameterList pList = new CParameterList(SessionID,
ClientIP,
UserID);
//add the rest of the parameters
pList.AddInputParameter("pi_vTSLabel", tsdi.TSLabel);
pList.AddInputParameter("pi_nTSDefinitionID", tsdi.TSDefinitionID);
pList.AddInputParameter("pi_nIsActive", (long)((tsdi.IsActive) ? k_TRUE_FALSE_ID.True: k_TRUE_FALSE_ID.False));
pList.AddOutputParameter("po_nTSID", lTSID);
//execute the SP
status = DBConn.ExecuteOracleSP("PCK_VARIABLE.InsertTemporalState", pList);
if (status.Status)
{
//get the TS_ID returned from the SP call
lTSID = pList.GetParamLongValue("po_nTSID");
}
return(status);
}
/// <summary>
/// method
/// US:878
/// Used to update a pat checkList
/// </summary>
/// <param name="pci"></param>
/// <returns></returns>
public CStatus UpdatePatChecklist(CPatChecklistDataItem pci)
{
//create a status object and check for valid dbconnection
CStatus status = new CStatus();
status = DBConnValid();
if (!status.Status)
{
return(status);
}
//load the paramaters list
CParameterList pList = new CParameterList(SessionID,
ClientIP,
UserID);
//add the rest of the parameters
pList.AddInputParameter("pi_nPatCLID", pci.PatCLID);
pList.AddInputParameter("pi_dtAssignmentDate", pci.AssignmentDate);
pList.AddInputParameter("pi_dtProcedureDate", pci.ProcedureDate);
pList.AddInputParameter("pi_nChecklistStateID", (long)pci.ChecklistStateID);
pList.AddInputParameter("pi_nStateID", (long)pci.StateID);
//execute the SP
return(DBConn.ExecuteOracleSP("PCK_PAT_CHECKLIST.UpdatePatChecklist",
pList));
}
/// <summary>
/// method
/// US:877
/// get patient checklist by CLID
/// </summary>
/// <param name="lChecklistID"></param>
/// <param name="lChecklistStateID"></param>
/// <param name="strSelectedPatients"></param>
/// <param name="ds"></param>
/// <returns></returns>
public CStatus GetPatCLByCLIDCLSTATEDS(long lChecklistID,
long lChecklistStateID,
string strSelectedPatients,
out DataSet ds)
{
//initialize parameters
ds = null;
//create a status object and check for valid dbconnection
CStatus status = DBConnValid();
if (!status.Status)
{
return(status);
}
//load the paramaters list
CParameterList pList = new CParameterList(SessionID,
ClientIP,
UserID);
pList.AddInputParameter("pi_nChecklistID", lChecklistID);
pList.AddInputParameter("pi_nChecklistStateID", lChecklistStateID);
pList.AddInputParameter("pi_vSelectedPatients", strSelectedPatients);
//get the dataset
CDataSet cds = new CDataSet();
return(cds.GetOracleDataSet(DBConn,
"PCK_PAT_CHECKLIST.GetPatCLByCLIDCLSTATERS",
pList,
out ds));
}
/// <summary>
/// get a list of patient checklist that are out of date
/// </summary>
/// <param name="strPatientID"></param>
/// <param name="ds"></param>
/// <returns></returns>
public CStatus GetOutOfDatePatCLDS(string strPatientID,
long lChecklistID,
out DataSet ds)
{
//initialize parameters
ds = null;
//create a status object and check for valid dbconnection
CStatus status = DBConnValid();
if (!status.Status)
{
return(status);
}
//load the paramaters list
CParameterList pList = new CParameterList(SessionID,
ClientIP,
UserID);
pList.AddInputParameter("pi_vPatientID", strPatientID);
pList.AddInputParameter("pi_nChecklistID", lChecklistID);
CDataSet cds = new CDataSet();
return(cds.GetOracleDataSet(DBConn,
"PCK_PAT_CHECKLIST.GetOutOfDatePatCLRS",
pList,
out ds));
}
/// <summary>
/// override
/// US:838
/// validates the user's search filters
/// </summary>
/// <param name="plistStatus"></param>
/// <returns></returns>
public override CStatus ValidateUserInput(out CParameterList plistStatus)
{
plistStatus = new CParameterList();
CStatus status = new CStatus();
//if date in either from or to make sure to is greater that from
if (chkFilterByEvent.Checked)
{
if (txtFromDate.Text != String.Empty ||
txtToDate.Text != String.Empty)
{
if (txtFromDate.Text == String.Empty ||
txtToDate.Text == String.Empty)
{
plistStatus.AddInputParameter("ERROR_DATE_RANGE", Resources.ErrorMessages.ERROR_DATE_RANGE);
status.Status = false;
status.StatusCode = k_STATUS_CODE.Failed;
}
else
{
DateTime dtFrom = CDataUtils.GetDate(txtFromDate.Text);
DateTime dtTo = CDataUtils.GetDate(txtToDate.Text);
k_COMPARE nCompare = CDataUtils.CompareDates(dtFrom, dtTo);
if (!((nCompare == k_COMPARE.EQUALTO) || (nCompare == k_COMPARE.LESSTHAN)))
{
plistStatus.AddInputParameter("ERROR_DATE_RANGE", Resources.ErrorMessages.ERROR_DATE_RANGE);
status.Status = false;
status.StatusCode = k_STATUS_CODE.Failed;
}
}
}
}
//if lssn make sure 5 chars and last 4 are numbers
if (chkLSSN.Checked)
{
if (txtLSSN.Text != String.Empty)
{
if (txtLSSN.Text.Length < 5)
{
plistStatus.AddInputParameter("ERROR_LSSN", Resources.ErrorMessages.ERROR_LSSN);
status.Status = false;
status.StatusCode = k_STATUS_CODE.Failed;
}
}
}
if (!status.Status)
{
ShowStatusInfo(status.StatusCode, plistStatus);
}
return(status);
}
/// <summary>
///US:852 saves a lab test to the database
/// </summary>
/// <param name="lXferSystemID"></param>
/// <param name="nLabTestID"></param>
/// <param name="strName"></param>
/// <param name="strHIREF"></param>
/// <param name="strLOREF"></param>
/// <param name="strREFRANGE"></param>
/// <param name="strUnits"></param>
/// <param name="strDescription"></param>
/// <returns></returns>
public CStatus SaveLabTest(long lXferSystemID,
string strLabTestID,
string strName,
string strHIREF,
string strLOREF,
string strREFRANGE,
string strUnits,
string strDescription,
string strLOINC)
{
CStatus status = new CStatus();
//load the paramaters list
CParameterList pList = new CParameterList(base.SessionID,
base.ClientIP,
base.UserID);
pList.AddInputParameter("pi_nXferSystemID", lXferSystemID);
pList.AddInputParameter("pi_vLabTestID", strLabTestID);
pList.AddInputParameter("pi_vName", strName);
pList.AddInputParameter("pi_vHIREF", strHIREF);
pList.AddInputParameter("pi_vLOREF", strLOREF);
pList.AddInputParameter("pi_vREFRANGE", strREFRANGE);
pList.AddInputParameter("pi_vUnits", strUnits);
pList.AddInputParameter("pi_vDescription", strDescription);
pList.AddInputParameter("pi_vLOINC", strLOINC);
return(DBConn.ExecuteOracleSP("PCK_LAB.SaveLabTest",
pList));
}
/// <summary>
/// method
/// updates an item with the values of the item specified
/// </summary>
/// <param name="iItem"></param>
/// <returns></returns>
public CStatus UpdateItem(CItemDataItem iItem)
{
//create a status object and check for valid dbconnection
CStatus status = DBConnValid();
if (!status.Status)
{
return(status);
}
//load the paramaters list
CParameterList pList = new CParameterList(SessionID, ClientIP, UserID);
// procedure specific parameters
pList.AddInputParameter("pi_nItemID", iItem.ItemID);
pList.AddInputParameter("pi_nItemTypeID", iItem.ItemTypeID);
pList.AddInputParameter("pi_nItemGroupID", iItem.ItemGroupID);
pList.AddInputParameter("pi_vItemLabel", iItem.ItemLabel);
pList.AddInputParameter("pi_vItemDescription", iItem.ItemDescription);
pList.AddInputParameter("pi_nLookbackTime", iItem.LookbackTime);
pList.AddInputParameter("pi_nActiveID", (long)iItem.ActiveID);
pList.AddInputParameter("pi_vMapID", iItem.MapID);
//execute the SP
status = DBConn.ExecuteOracleSP("PCK_ITEM.UpdateItem", pList);
if (!status.Status)
{
return(status);
}
return(new CStatus());
}
/// <summary>
/// Used to get a dataset of temporal states.
/// </summary>
/// <param name="lActiveFilter"></param>
/// <param name="ds"></param>
/// <param name="lStatusCode"></param>
/// <param name="strStatus"></param>
/// <returns></returns>
public CStatus GetTemporalStateDS(long lActiveFilter, out DataSet ds)
{
//initialize parameters
ds = null;
//create a status object and check for valid dbconnection
CStatus status = DBConnValid();
if (!status.Status)
{
return(status);
}
//load the paramaters list
CParameterList pList = new CParameterList(SessionID,
ClientIP,
UserID);
pList.AddInputParameter("pi_nActiveFilter", lActiveFilter);
//get the dataset
CDataSet cds = new CDataSet();
return(cds.GetOracleDataSet(DBConn,
"PCK_VARIABLE.GetTemporalStateRS",
pList,
out ds));
}
/// <summary>
/// method
/// retrieves a single service from the database
/// </summary>
/// <param name="lServiceID"></param>
/// <param name="di"></param>
/// <returns></returns>
public CStatus GetServiceDI(long lServiceID, out CServiceDataItem di)
{
//initialize parameters
di = null;
//create a status object and check for valid dbconnection
CStatus status = DBConnValid();
if (!status.Status)
{
return(status);
}
//load the paramaters list
CParameterList pList = new CParameterList(SessionID, ClientIP, UserID);
pList.AddInputParameter("pi_nServiceID", lServiceID);
//get the dataset
CDataSet cds = new CDataSet();
DataSet ds = null;
status = cds.GetOracleDataSet(DBConn,
"PCK_VARIABLE.GetServiceDI",
pList,
out ds);
if (!status.Status)
{
return(status);
}
di = new CServiceDataItem(ds);
return(status);
}
/// <summary>
/// returns a dataset of patient item components
/// filtered by patient checklist id (PAT_CL_ID)
public CStatus GetPatItemsByPatCLIDDS(long lPatCLID, out DataSet ds)
{
//initialize parameters
ds = null;
//create a status object and check for valid dbconnection
CStatus status = DBConnValid();
if (!status.Status)
{
return(status);
}
//load the paramaters list
CParameterList pList = new CParameterList(SessionID, ClientIP, UserID);
pList.AddInputParameter("pi_nPatCLID", lPatCLID);
//get the dataset
CDataSet cds = new CDataSet();
return(cds.GetOracleDataSet(
base.DBConn,
"PCK_PATIENT.GetPatItemsByPatCLIDRS",
pList,
out ds));
}
/// <summary>
/// get a site dataset by egion
/// </summary>
/// <param name="ds"></param>
/// <returns></returns>
public CStatus GetSiteDS(long lRegionID,
out DataSet ds)
{
//initialize parameters
ds = null;
CStatus status = new CStatus();
//transfer from MDWS if needed
// if (MDWSTransfer)
// {
// CMDWSOps ops = new CMDWSOps(this);
// status = ops.GetMDWSSites();
// if (!status.Status)
// {
// return status;
// }
// }
//load the paramaters list
CParameterList pList = new CParameterList(base.SessionID,
base.ClientIP,
base.UserID);
pList.AddInputParameter("pi_nRegionID", lRegionID);
//get the dataset
CDataSet cds = new CDataSet();
status = cds.GetOracleDataSet(base.DBConn,
"PCK_SITE.GetSiteRS",
pList,
out ds);
return(status);
}
