public DataSet GetAllDCALC_CONDENACAOByPESID_DATABASE(string pPesId)
{
DataSet lTabelaSet = new DataSet();
DataBaseOra objDB = new DataBaseOra();
objDB.sql = @" SELECT MIN(A.COND_DATAINICIO) AS COND_DATAINICIO FROM DCALC_CONDENACAO A WHERE A.PES_ID = " + pPesId + " ";
objDB.cmd = new OleDbCommand(objDB.sql, objDB.conn);
lTabelaSet = objDB.ExecutaDataSet(objDB.cmd);
return lTabelaSet;
}
public DataSet GetAllDCALC_INTERRUPCAOByPES_IDDATABASE(string pPesId)
{
DataSet lTabelaSet = new DataSet();
DataBaseOra objDB = new DataBaseOra();
objDB.sql = @" SELECT MAX(B.INTR_DATAFIM)AS INTR_DATAFIM FROM
DCALC_CONDENACAO A, DCALC_INTERRUPCAO B
WHERE A.COND_ID = B.COD_CONDENACAO
AND B.INTR_REGSTATUS = 'A' AND A.PES_ID = " + pPesId + " ";
objDB.cmd = new OleDbCommand(objDB.sql, objDB.conn);
lTabelaSet = objDB.ExecutaDataSet(objDB.cmd);
return lTabelaSet;
}
public DataSet GetAllDCALC_INTERRUPCAOByPES_ID(string pPesId)
{
DataSet lTabelaSet = new DataSet();
DataBaseOra objDB = new DataBaseOra();
objDB.sql = @" SELECT A.PES_ID,INTR_ID,
B.INTR_OBSERVACAO,
B.COD_CONDENACAO,
TO_CHAR(B.INTR_DATAINICIO, 'DD/MM/YYYY')INTR_DATAINICIO,
TO_CHAR(B.INTR_DATAFIM, 'DD/MM/YYYY')INTR_DATAFIM,
B.INTR_REGDATE,
B.INTR_REGUSER,
B.INTR_REGSTATUS
FROM DCALC_CONDENACAO A, DCALC_INTERRUPCAO B
WHERE A.COND_ID = B.COD_CONDENACAO AND B.INTR_REGSTATUS = 'A' AND A.PES_ID = " + pPesId + " ";
objDB.cmd = new OleDbCommand(objDB.sql, objDB.conn);
lTabelaSet = objDB.ExecutaDataSet(objDB.cmd);
return lTabelaSet;
}
public DataSet GetAllDCALC_REMISSAOByPES_ID(string pPesId)
{
DataSet lTabelaSet = new DataSet();
DataBaseOra objDB = new DataBaseOra();
objDB.sql = @" SELECT A.PES_ID,B.* FROM
DCALC_CONDENACAO A, DCALC_REMICAO B
WHERE A.COND_ID = B.COD_CONDENACAO AND A.PES_ID = " + pPesId + " ";
objDB.cmd = new OleDbCommand(objDB.sql, objDB.conn);
lTabelaSet = objDB.ExecutaDataSet(objDB.cmd);
return lTabelaSet;
}
public DataSet InformacoesApenado(string pInfoPen)
{
DataSet lTabelaSet = new DataSet();
DataBaseOra objDB = new DataBaseOra();
objDB.sql = @" SELECT A.PES_ID,A.*,B.PES_NOME,C.TPLIVR_DESCRICAO,D.TPPROG_DESCRICAO,
CASE WHEN A.COND_TIPOREGIME = 1 THEN 'ABERTO'
WHEN A.COND_TIPOREGIME = 2 THEN 'SEMI-ABERTO'
WHEN A.COND_TIPOREGIME = 3 THEN 'FECHADO'
END TIPO_REGIME FROM
DCALC_CONDENACAO A, PESSOA B, DCALC_TIPOLIVRAMENTO C,DCALC_TIPOPROGRESSAO D
WHERE A.PES_ID = B.PES_ID AND A.TPLIVR_ID = C.TPLIVR_ID AND A.TPPROG_ID = D.TPPROG_ID
AND A.COND_REGSTATUS = 'A' and A.COND_SISCOP = " + pInfoPen + " ";
objDB.cmd = new OleDbCommand(objDB.sql, objDB.conn);
lTabelaSet = objDB.ExecutaDataSet(objDB.cmd);
return lTabelaSet;
}
