public Date getDateOfProgramEnrolmentAscending(
Integer patientId, Integer programId, Date startDate, Date endDate) {
Date sDate = new Date();
sDate.setTime(0);
Date eDate = Calendar.getInstance().getTime();
if (startDate != null) {
sDate = startDate;
}
if (endDate != null) {
eDate = endDate;
}
SQLQuery dateOfProgramEnrolment =
sessionFactory
.getCurrentSession()
.createSQLQuery(
"select date_enrolled from patient_program where patient_id = :patientId and program_id = :programId and voided = 0 and date_enrolled >= :startDate and date_enrolled <= :endDate order by date_enrolled asc");
dateOfProgramEnrolment.setInteger("patientId", patientId);
dateOfProgramEnrolment.setInteger("programId", programId);
dateOfProgramEnrolment.setDate("startDate", sDate);
dateOfProgramEnrolment.setDate("endDate", eDate);
List<Date> dateOfEnrolment = (List<Date>) dateOfProgramEnrolment.list();
// TODO: figure out what is the most logical date to return when multiples are found
if (dateOfEnrolment != null && dateOfEnrolment.size() > 0) {
return dateOfEnrolment.get(0);
}
return null;
}
public Date getDateOfWorkflowStateChange(
Integer patientId, Integer conceptId, Date startDate, Date endDate) {
Date sDate = new Date();
sDate.setTime(0);
Date eDate = Calendar.getInstance().getTime();
if (startDate != null) {
sDate = startDate;
}
if (endDate != null) {
eDate = endDate;
}
SQLQuery dateOfWorkFlowStateQuery =
sessionFactory
.getCurrentSession()
.createSQLQuery(
"select start_date from patient_state ps, patient_program pp, program_workflow_state pws where pp.patient_program_id = ps.patient_program_id and pws.program_workflow_state_id = ps.state and ps.voided = 0 and pws.concept_id = :conceptId and pp.patient_id = :patientId and ps.start_date >= :startDate and ps.start_date <= :endDate");
dateOfWorkFlowStateQuery.setInteger("patientId", patientId);
dateOfWorkFlowStateQuery.setInteger("conceptId", conceptId);
dateOfWorkFlowStateQuery.setDate("startDate", sDate);
dateOfWorkFlowStateQuery.setDate("endDate", eDate);
List<Date> dateOfWorkflow = (List<Date>) dateOfWorkFlowStateQuery.list();
// TODO: figure out what is the most logical date to return when multiples are found
if (dateOfWorkflow != null && dateOfWorkflow.size() > 0) {
return dateOfWorkflow.get(0);
}
return null;
}
public Integer getObsAnswerBetweenDates(
Integer patientId,
List<Integer> questions,
Integer answerId,
Date beforeDate,
Date afterDate,
Date targetDate) {
SQLQuery obsBeforeDate =
sessionFactory
.getCurrentSession()
.createSQLQuery(
"select obs_id from obs where person_id = :patientId and value_coded = :conceptId and concept_id in (:questions) and voided = 0 and obs_dateTime > :beforeDate and obs_dateTime < :afterDate ORDER BY abs(:targetDate - obs_dateTime)");
obsBeforeDate.setInteger("patientId", patientId);
obsBeforeDate.setInteger("conceptId", answerId);
obsBeforeDate.setDate("beforeDate", beforeDate);
obsBeforeDate.setDate("afterDate", afterDate);
obsBeforeDate.setDate("targetDate", targetDate);
obsBeforeDate.setParameterList("questions", questions);
List<Integer> obs = obsBeforeDate.list();
if (obs != null && obs.size() > 0) {
return obs.get(0);
}
return null;
}
public Integer getObsValueBetweenDates(
Integer patientId,
Integer conceptId,
Integer groupId,
Date beforeDate,
Date afterDate,
Date targetDate) {
SQLQuery obsBeforeDate =
sessionFactory
.getCurrentSession()
.createSQLQuery(
"select o.obs_id from obs o, obs og where o.person_id = :patientId and o.concept_id = :conceptId and o.voided = 0 and o.obs_dateTime > :beforeDate and o.obs_dateTime < :afterDate and o.obs_group_id = og.obs_id and og.voided = 0 and og.concept_id = :groupId ORDER BY abs(:targetDate - obs_dateTime)");
obsBeforeDate.setInteger("patientId", patientId);
obsBeforeDate.setInteger("conceptId", conceptId);
obsBeforeDate.setDate("beforeDate", beforeDate);
obsBeforeDate.setInteger("groupId", groupId);
obsBeforeDate.setDate("afterDate", afterDate);
obsBeforeDate.setDate("targetDate", targetDate);
List<Integer> obs = obsBeforeDate.list();
if (obs != null && obs.size() > 0) {
return obs.get(0);
}
return null;
}
public Date getDateOfWorkflowStateChange(
Integer patientId, List<Integer> conceptIds, Date startDate, Date endDate) {
Date sDate = new Date();
sDate.setTime(0);
Date eDate = Calendar.getInstance().getTime();
if (startDate != null) {
sDate = startDate;
}
if (endDate != null) {
eDate = endDate;
}
StringBuilder sql =
new StringBuilder(
"select start_date from patient_state ps, patient_program pp, program_workflow_state pws where pp.patient_program_id = ps.patient_program_id and pws.program_workflow_state_id = ps.state and ps.voided = 0 and pp.patient_id = :patientId and pws.concept_id in(");
int i = 1;
for (Integer conceptId : conceptIds) {
if (i > 1) {
sql.append(",");
}
sql.append(" :conceptId");
sql.append(i);
i++;
}
sql.append(") and ps.start_date >= :startDate and ps.start_date <= :endDate");
SQLQuery dateOfWorkFlowStateQuery =
sessionFactory.getCurrentSession().createSQLQuery(sql.toString());
dateOfWorkFlowStateQuery.setInteger("patientId", patientId);
i = 1;
for (Integer conceptId : conceptIds) {
String variableName = "conceptId" + i;
i++;
dateOfWorkFlowStateQuery.setInteger(variableName, conceptId);
}
dateOfWorkFlowStateQuery.setDate("startDate", sDate);
dateOfWorkFlowStateQuery.setDate("endDate", eDate);
List<Date> dateOfWorkflow = (List<Date>) dateOfWorkFlowStateQuery.list();
// TODO: figure out what is the most logical date to return when multiples are found
if (dateOfWorkflow != null && dateOfWorkflow.size() > 0) {
return dateOfWorkflow.get(0);
}
return null;
}
public Integer getEncounterBetweenDates(
Integer patientId,
List<Integer> encounterTypes,
Date beforeDate,
Date afterDate,
Date targetDate) {
SQLQuery obsBeforeDate =
sessionFactory
.getCurrentSession()
.createSQLQuery(
"select encounter_id from encounter where patient_id = :patientId and encounter_type in (:encounterTypes) and voided = 0 and encounter_datetime > :beforeDate and encounter_datetime < :afterDate ORDER BY abs(:targetDate - encounter_datetime)");
obsBeforeDate.setInteger("patientId", patientId);
obsBeforeDate.setDate("beforeDate", beforeDate);
obsBeforeDate.setDate("afterDate", afterDate);
obsBeforeDate.setDate("targetDate", targetDate);
obsBeforeDate.setParameterList("encounterTypes", encounterTypes);
List<Integer> obs = obsBeforeDate.list();
if (obs != null && obs.size() > 0) {
return obs.get(0);
}
return null;
}
public void applyParameters(SQLQuery query) throws SQLException {
for (Map.Entry<QueryParameter, Object> e : parameters.entrySet()) {
QueryParameter p = e.getKey();
Object value = e.getValue();
String name = p.getSqlName();
if (value != null && p.getArray()) {
switch (p.getType()) {
case DATE:
query.setParameterList(name, (Object[]) value, new DateType());
break;
case NUMBER:
query.setParameterList(name, (Object[]) value, new BigDecimalType());
break;
case STRING:
query.setParameterList(name, (Object[]) value, new StringType());
break;
case CLOB:
case BLOB:
throw new ClientErrorException(
Status.CLIENT_ERROR_BAD_REQUEST,
String.format("LOBs are not supported as parameters: %s", name));
}
} else {
switch (p.getType()) {
case DATE:
query.setDate(name, (Date) value);
break;
case NUMBER:
query.setBigDecimal(name, (BigDecimal) value);
break;
case STRING:
query.setString(name, (String) value);
break;
case CLOB:
case BLOB:
throw new ClientErrorException(
Status.CLIENT_ERROR_BAD_REQUEST,
String.format("LOBs are not supported as parameters: %s", name));
}
}
}
}
public Integer getObsValueAfterDate(Integer patientId, Integer conceptId, Date compareDate) {
SQLQuery obsBeforeDate =
sessionFactory
.getCurrentSession()
.createSQLQuery(
"select obs_id from obs where person_id = :patientId and concept_id = :conceptId and voided = 0 and obs_dateTime > :compareDate order by obs_dateTime");
obsBeforeDate.setInteger("patientId", patientId);
obsBeforeDate.setInteger("conceptId", conceptId);
obsBeforeDate.setDate("compareDate", compareDate);
List<Integer> obs = obsBeforeDate.list();
if (obs != null && obs.size() > 0) {
return obs.get(0);
}
return null;
}
public Integer getObsValueBeforeDate(
Integer patientId, Integer conceptId, Integer groupId, Date compareDate) {
SQLQuery obsBeforeDate =
sessionFactory
.getCurrentSession()
.createSQLQuery(
"select o.obs_id from obs o, obs og where o.person_id = :patientId and o.concept_id = :conceptId and o.voided = 0 and o.obs_dateTime < :compareDate and o.obs_group_id = og.obs_id and og.voided = 0 and og.concept_id = :groupId order by o.obs_dateTime");
obsBeforeDate.setInteger("patientId", patientId);
obsBeforeDate.setInteger("conceptId", conceptId);
obsBeforeDate.setInteger("groupId", groupId);
obsBeforeDate.setDate("compareDate", compareDate);
List<Integer> obs = obsBeforeDate.list();
if (obs != null && obs.size() > 0) {
return obs.get(0);
}
return null;
}
