private void VerificarNotificacoes()
        {
            clsConexaoBD  objConexao = new clsConexaoBD();
            StringBuilder strSQL     = new StringBuilder();

            try
            {
                strSQL.Append(" SELECT COUNT(*) FROM TBLEMBRETES WHERE ");
                strSQL.Append(" YEAR(DTLEMBRETE) = " + dtAgenda.Value.Year);
                strSQL.Append(" AND MONTH(DTLEMBRETE) = " + dtAgenda.Value.Month);
                strSQL.Append(" AND DAY(DTLEMBRETE) = " + dtAgenda.Value.Day);

                if (int.Parse(objConexao.ExecutarComandoSqlDataSet(strSQL.ToString()).Tables[0].Rows[0][0].ToString()) > 0)
                {
                    imgNotificacao.Visible = lblLembrete.Visible = true;
                    lblLembrete.Text       = "Você possui " +
                                             objConexao.ExecutarComandoSqlDataSet(strSQL.ToString()).Tables[0].Rows[0][0].ToString()
                                             + " lembrete(s).";
                }
                else
                {
                    imgNotificacao.Visible = lblLembrete.Visible = false;
                }
            }
            catch (Exception objErro)
            {
                MessageBox.Show("Tela de Agendamento/Método VerificarNotificacoes/ERRO: " + objErro.Message, "ERRO",
                                MessageBoxButtons.OK, MessageBoxIcon.Error);
            }
            finally
            {
                objConexao = null;
                strSQL     = null;
            }
        }
Beispiel #2
0
        private void PreencherGrid()
        {
            clsConexaoBD objConexao = new clsConexaoBD();

            try
            {
                dtgPacientes.DataSource = objConexao.ExecutarComandoSqlDataSet("SELECT CDPACIENTE, CODPACIENTEUNIMED, UCASE(NMPACIENTE) AS NMPACIENTE," +
                                                                               " TELPACIENTE2, TELPACIENTE,  IIF( STATUSINATIVO = FALSE, 'ATIVO', 'INATIVO' ) AS STATUS FROM TBPACIENTES " +
                                                                               " WHERE UCASE(NMPACIENTE) LIKE '%" + txtNome.Text.Trim().ToUpper() + "%'" +
                                                                               "ORDER BY NMPACIENTE").Tables[0];
                dtgPacientes.Columns["CDPACIENTE"].Visible           = false;
                dtgPacientes.Columns["NMPACIENTE"].HeaderText        = "Nome do Paciente";
                dtgPacientes.Columns["TELPACIENTE"].HeaderText       = "Celular";
                dtgPacientes.Columns["TELPACIENTE2"].HeaderText      = "Telefone Residencial";
                dtgPacientes.Columns["CODPACIENTEUNIMED"].HeaderText = "Código Paciente";
                dtgPacientes.Columns["STATUS"].HeaderText            = "Status";
                if (dtgPacientes.SelectedRows.Count > 0)
                {
                    dtgPacientes.SelectedRows[0].Selected = false;
                }
            }
            catch (Exception objErro)
            {
                MessageBox.Show(objErro.Message);
            }
            finally
            {
                objConexao = null;
            }
        }
Beispiel #3
0
        private void PreencherComboPacientes()
        {
            clsConexaoBD objConexao = new clsConexaoBD();
            DataTable    tblResultado;
            DataRow      objLinha;

            try
            {
                cboPaciente.DisplayMember = "NMPACIENTE";
                cboPaciente.ValueMember   = "CDPACIENTE";

                tblResultado = objConexao.ExecutarComandoSqlDataSet("SELECT CDPACIENTE, UCASE(NMPACIENTE) AS NMPACIENTE FROM TBPACIENTES WHERE STATUSINATIVO = FALSE ORDER BY NMPACIENTE").Tables[0];
                objLinha     = tblResultado.NewRow();
                tblResultado.Rows.InsertAt(objLinha, 0);

                cboPaciente.DataSource = tblResultado;
            }
            catch (Exception objErro)
            {
                MessageBox.Show(objErro.Message);
            }
            finally
            {
                objConexao   = null;
                tblResultado = null;
                objLinha     = null;
            }
        }
        private void CarregarGrid()
        {
            clsConexaoBD objConexao = new clsConexaoBD();

            try
            {
                dtgProcedimentos.DataSource =
                    objConexao.ExecutarComandoSqlDataSet("SELECT CDPROCEDIMENTO, CDPROCEDIMENTOUNIMED, UCASE(NMPROCEDIMENTO) AS NMPROCEDIMENTO, VLPROCEDIMENTO, CORPROCEDIMENTO FROM TBPROCEDIMENTOS ORDER BY 2").Tables[0];

                dtgProcedimentos.Columns["CDPROCEDIMENTO"].Visible                 = false;
                dtgProcedimentos.Columns["CDPROCEDIMENTOUNIMED"].HeaderText        = "Código Procedimento.";
                dtgProcedimentos.Columns["NMPROCEDIMENTO"].HeaderText              = "Descrição";
                dtgProcedimentos.Columns["VLPROCEDIMENTO"].HeaderText              = "Valor";
                dtgProcedimentos.Columns["VLPROCEDIMENTO"].DefaultCellStyle.Format = "c";
                dtgProcedimentos.Columns["CORPROCEDIMENTO"].Visible                = false;
            }
            catch (Exception objErro)
            {
                MessageBox.Show(objErro.Message);
            }
            finally
            {
                objConexao = null;
            }
        }
        private void PreencherComboFisioterapeutas()
        {
            clsConexaoBD objConexao = new clsConexaoBD();
            DataTable    tblResultado;
            DataRow      objLinha;

            try
            {
                cboFisioterapeutas.DisplayMember = "NMFUNCIONARIO";
                cboFisioterapeutas.ValueMember   = "CDFUNCIONARIO";

                tblResultado = objConexao.ExecutarComandoSqlDataSet("SELECT CDFUNCIONARIO, UCASE(NMFUNCIONARIO) AS NMFUNCIONARIO FROM TBFUNCIONARIOS ORDER BY NMFUNCIONARIO").Tables[0];
                objLinha     = tblResultado.NewRow();
                tblResultado.Rows.InsertAt(objLinha, 0);

                cboFisioterapeutas.DataSource = tblResultado;
            }
            catch (Exception objErro)
            {
                MessageBox.Show("Tela de Agendamento/Método PreencherComboFisioterapeuta/ERRO: " + objErro.Message, "ERRO", MessageBoxButtons.OK, MessageBoxIcon.Error);
            }
            finally
            {
                objConexao   = null;
                tblResultado = null;
                objLinha     = null;
            }
        }
        private void PreencherComboStatus()
        {
            clsConexaoBD objConexao = new clsConexaoBD();
            DataTable    tblResultado;
            DataRow      objLinha;

            try
            {
                cboStatus.DisplayMember = "DESSTATUS";
                cboStatus.ValueMember   = "CDSTATUS";

                tblResultado = objConexao.ExecutarComandoSqlDataSet("SELECT CDSTATUS, UCASE(DESSTATUS) AS DESSTATUS FROM TBSTATUS ORDER BY DESSTATUS").Tables[0];
                objLinha     = tblResultado.NewRow();
                tblResultado.Rows.InsertAt(objLinha, 0);

                cboStatus.DataSource = tblResultado;
            }
            catch (Exception objErro)
            {
                MessageBox.Show("Tela de Agendamento/Método PreencherComboStatus/ERRO: " + objErro.Message, "ERRO", MessageBoxButtons.OK, MessageBoxIcon.Error);
            }
            finally
            {
                objConexao   = null;
                tblResultado = null;
                objLinha     = null;
            }
        }
Beispiel #7
0
        private void CarregarGridProcedimentos()
        {
            clsConexaoBD  objConexao = new clsConexaoBD();
            DataTable     tblResultado;
            StringBuilder strSQL = new StringBuilder();

            string[] strCor;
            try
            {
                strSQL.Append("SELECT ");
                strSQL.Append("A.CDPROCEDIMENTO,  ");
                strSQL.Append("UCASE(B.CDPROCEDIMENTOUNIMED & ' - ' & B.NMPROCEDIMENTO) AS NMPROCEDIMENTO,  ");
                strSQL.Append("A.QTDPROCEDIMENTO,  ");
                strSQL.Append("B.CORPROCEDIMENTO  ");
                strSQL.Append("FROM  ");
                strSQL.Append("TBPROCEDIMENTOSAGENDAMENTO A INNER JOIN TBPROCEDIMENTOS B ON  A.CDPROCEDIMENTO = B.CDPROCEDIMENTO ");
                strSQL.Append("WHERE ");
                strSQL.Append("A.CDAGENDAMENTO =  " + objAgendamento.cdAgendamento);

                tblResultado = objConexao.ExecutarComandoSqlDataSet(strSQL.ToString()).Tables[0];

                foreach (DataRow objLinha in tblResultado.Rows)
                {
                    dtgProcedimentos.Rows.Add(objLinha[0].ToString(), objLinha[1].ToString(), objLinha[2].ToString());

                    if (objLinha[3].ToString() != "")
                    {
                        strCor = objLinha[3].ToString().Split('/');
                        dtgProcedimentos.Rows[dtgProcedimentos.Rows.Count - 1].DefaultCellStyle.BackColor =
                            Color.FromArgb(int.Parse(strCor[0]), int.Parse(strCor[1]), int.Parse(strCor[2]), int.Parse(strCor[3]));
                    }
                }
            }
            catch (Exception objErro)
            {
                MessageBox.Show("Tela de Incluir Agendamento/ Método CarregarGridProcedimento/ERRO: " + objErro.Message, "ERRO",
                                MessageBoxButtons.OK, MessageBoxIcon.Error);
            }
            finally
            {
                objConexao   = null;
                tblResultado = null;
                strSQL       = null;
            }
        }
Beispiel #8
0
        private void frmNotas_Load(object sender, EventArgs e)
        {
            clsConexaoBD objConexao = new clsConexaoBD();

            try
            {
                txtNotas.Text = objConexao.ExecutarComandoSqlDataSet("SELECT DESCLEMBRETE FROM TBLEMBRETES WHERE DTLEMBRETE IS NULL").Tables[0].Rows[0][0].ToString();
                this.ShowIcon = true;
                this.Icon     = Resource.notepad1;
            }
            catch (Exception objErro)
            {
                MessageBox.Show("Tela Anotações/Método OnLoad/ERRO: " + objErro.Message, "ERRO", MessageBoxButtons.OK, MessageBoxIcon.Error);
            }
            finally
            {
                objConexao = null;
            }
        }
        private void frmNotas_Load(object sender, EventArgs e)
        {
            clsConexaoBD objConexao = new clsConexaoBD();

            try
            {
                txtNotas.Text = objConexao.ExecutarComandoSqlDataSet("SELECT DESCLEMBRETE FROM TBLEMBRETES WHERE DTLEMBRETE IS NULL").Tables[0].Rows[0][0].ToString();
                this.ShowIcon = true;
                this.Icon = Resource.notepad1;
            }
            catch (Exception objErro)
            {
                MessageBox.Show("Tela Anotações/Método OnLoad/ERRO: " + objErro.Message , "ERRO", MessageBoxButtons.OK, MessageBoxIcon.Error);
            }
            finally
            {
                objConexao = null;
            }
        }
        private void btnConfirmar_Click(object sender, EventArgs e)
        {
            clsConexaoBD objConexao = new clsConexaoBD();

            try
            {
                if(objConexao.ExecutarComandoSqlDataSet("SELECT COUNT(*) FROM TBLEMBRETES WHERE DTLEMBRETE IS NULL").Tables[0].Rows.Count <= 0 )
                    objConexao.ExecutarComandoSql("INSERT INTO TBLEMBRETES(DESCLEMBRETE) VALUES('" + txtNotas.Text + "')");
                else
                    objConexao.ExecutarComandoSql("UPDATE TBLEMBRETES SET  DESCLEMBRETE = '" + txtNotas.Text + "' WHERE DTLEMBRETE IS NULL");
            }
            catch (Exception objErro)
            {
                MessageBox.Show("Tela de Anotações/Método Salvar/ERRO: " + objErro.Message, "ERRO", MessageBoxButtons.OK, MessageBoxIcon.Error);
            }
            finally
            {
                objConexao = null;
            }
        }
Beispiel #11
0
        private void InserirProcedimentos()
        {
            clsConexaoBD  objConexao = new clsConexaoBD();
            StringBuilder strSql     = new StringBuilder();

            try
            {
                if (objAgendamento.cdAgendamento == "")
                {
                    strSql.Append("SELECT MAX(CDAGENDAMENTO) FROM TBAGENDAMENTO");
                    objAgendamento.cdAgendamento = objConexao.ExecutarComandoSqlDataSet(strSql.ToString()).Tables[0].Rows[0][0].ToString();
                }

                strSql.Clear();
                strSql.Append("DELETE FROM TBPROCEDIMENTOSAGENDAMENTO WHERE CDAGENDAMENTO = " + objAgendamento.cdAgendamento);
                objConexao.ExecutarComandoSql(strSql.ToString());

                foreach (DataGridViewRow objLinha in dtgProcedimentos.Rows)
                {
                    strSql.Clear();

                    strSql.Append("INSERT INTO TBPROCEDIMENTOSAGENDAMENTO(CDAGENDAMENTO, CDPROCEDIMENTO, QTDPROCEDIMENTO) VALUES(");
                    strSql.Append(objAgendamento.cdAgendamento + ", ");
                    strSql.Append(objLinha.Cells["CodigoProcedimento"].Value.ToString() + ", ");
                    strSql.Append(objLinha.Cells["QuantidadeProcedimento"].Value.ToString());
                    strSql.Append(")");

                    objConexao.ExecutarComandoSql(strSql.ToString());
                }
            }
            catch (Exception objErro)
            {
                MessageBox.Show("Tela de Incluir Agendamento/ Método InserirProcedimentos/ERRO: " + objErro.Message, "ERRO",
                                MessageBoxButtons.OK, MessageBoxIcon.Error);
            }
            finally
            {
                objConexao = null;
                strSql     = null;
            }
        }
        private void PreencherGridLembretes()
        {
            StringBuilder strSQL     = new StringBuilder();
            clsConexaoBD  objConexao = new clsConexaoBD();

            if (dtpData.Visible)
            {
                dtLembrete = dtpData.Value;
            }

            strSQL.Append(" SELECT  CDLEMBRETE, DESCLEMBRETE, STNOTIFICACAO, STDESCARTAR FROM  TBLEMBRETES WHERE ");
            strSQL.Append(" YEAR(DTLEMBRETE) = " + dtLembrete.Year);
            strSQL.Append(" AND MONTH(DTLEMBRETE) = " + dtLembrete.Month);
            strSQL.Append(" AND DAY(DTLEMBRETE) = " + dtLembrete.Day);

            dtgLembrete.DefaultCellStyle.WrapMode = DataGridViewTriState.True;
            dtgLembrete.DataSource = objConexao.ExecutarComandoSqlDataSet(strSQL.ToString()).Tables[0];
            dtgLembrete.Columns["CDLEMBRETE"].Visible      = false;
            dtgLembrete.Columns["DESCLEMBRETE"].HeaderText = "Lembrete";
            dtgLembrete.Columns["STNOTIFICACAO"].Visible   = false;
            dtgLembrete.Columns["STDESCARTAR"].Visible     = false;
        }
        private void VerificarNotificacoes()
        {
            clsConexaoBD   objConexao = new clsConexaoBD();
            StringBuilder  strSQL     = new StringBuilder();
            DataTable      tblResultado;
            frmNotificacao objForm;

            try
            {
                strSQL.Append(" SELECT DESCLEMBRETE, CDLEMBRETE FROM TBLEMBRETES WHERE ");
                strSQL.Append(" YEAR(DTLEMBRETE) = " + DateTime.Now.Year);
                strSQL.Append(" AND MONTH(DTLEMBRETE) = " + DateTime.Now.Month);
                strSQL.Append(" AND DAY(DTLEMBRETE) = " + DateTime.Now.Day);
                strSQL.Append(" AND STNOTIFICACAO = TRUE AND STDESCARTAR = FALSE");

                tblResultado = objConexao.ExecutarComandoSqlDataSet(strSQL.ToString()).Tables[0];

                if (tblResultado.Rows.Count > 0)
                {
                    foreach (DataRow rowLinha in tblResultado.Rows)
                    {
                        objForm = new frmNotificacao(rowLinha[0].ToString(), rowLinha[1].ToString());
                        objForm.ShowDialog();
                        objForm = null;
                    }
                }
            }
            catch (Exception objErro)
            {
                throw objErro;
            }
            finally
            {
                objConexao   = null;
                tblResultado = null;
                strSQL       = null;
            }
        }
Beispiel #14
0
        private void PreencherComboProcedimentos()
        {
            clsConexaoBD objConexao = new clsConexaoBD();
            DataTable    tblResultado;
            DataRow      objLinha;

            try
            {
                cboProcedimentos.DisplayMember = "NMPROCEDIMENTO";
                cboProcedimentos.ValueMember   = "CDPROCEDIMENTO";

                tblResultado = objConexao.ExecutarComandoSqlDataSet("SELECT CDPROCEDIMENTO, UCASE(CDPROCEDIMENTOUNIMED & ' - ' & NMPROCEDIMENTO) AS NMPROCEDIMENTO, CORPROCEDIMENTO FROM TBPROCEDIMENTOS ORDER BY NMPROCEDIMENTO").Tables[0];
                objLinha     = tblResultado.NewRow();
                tblResultado.Rows.InsertAt(objLinha, 0);

                cboProcedimentos.DataSource = tblResultado;

                foreach (DataRow rowTable in tblResultado.Rows)
                {
                    if (rowTable["CORPROCEDIMENTO"].ToString() != "")
                    {
                        lstCorProcedimento.Add(new CorProcedimento(rowTable["CDPROCEDIMENTO"].ToString(), rowTable["CORPROCEDIMENTO"].ToString()));
                    }
                }
            }
            catch (Exception objErro)
            {
                MessageBox.Show("Tela de Incluir Agendamento/ Método PreencherComboProcedimentos/ERRO: " + objErro.Message, "ERRO",
                                MessageBoxButtons.OK, MessageBoxIcon.Error);
            }
            finally
            {
                objConexao   = null;
                tblResultado = null;
                objLinha     = null;
            }
        }
        private void btnConsultar_Click(object sender, EventArgs e)
        {
            StringBuilder strSQL     = new StringBuilder();
            clsConexaoBD  objConexao = new clsConexaoBD();

            try
            {
                strSQL.Append(" SELECT  CDLEMBRETE, DTLEMBRETE, DESCLEMBRETE, STNOTIFICACAO, STDESCARTAR FROM  TBLEMBRETES WHERE 1= 1 ");

                if (txtData.Text.Replace("/", "").Replace("/", "").Trim() != "")
                {
                    strSQL.Append(" AND YEAR(DTLEMBRETE) = " + txtData.Text.Split('/')[2]);
                    strSQL.Append(" AND MONTH(DTLEMBRETE) = " + txtData.Text.Split('/')[1]);
                    strSQL.Append(" AND DAY(DTLEMBRETE) = " + txtData.Text.Split('/')[0]);
                }

                strSQL.Append(" ORDER BY 2");

                dtgLembrete.DefaultCellStyle.WrapMode = DataGridViewTriState.True;
                dtgLembrete.DataSource = objConexao.ExecutarComandoSqlDataSet(strSQL.ToString()).Tables[0];
                dtgLembrete.Columns["CDLEMBRETE"].Visible      = false;
                dtgLembrete.Columns["DESCLEMBRETE"].HeaderText = "Lembrete";
                dtgLembrete.Columns["DTLEMBRETE"].HeaderText   = "Data do Lembrete";
                dtgLembrete.Columns["DTLEMBRETE"].Width        = 40;
                dtgLembrete.Columns["STNOTIFICACAO"].Visible   = false;
                dtgLembrete.Columns["STDESCARTAR"].Visible     = false;
            }
            catch (Exception objErro)
            {
                MessageBox.Show("Tela de ConsultaLembretes/Método Consultar/ERRO: " + objErro.Message, "ERRO", MessageBoxButtons.OK, MessageBoxIcon.Error);
            }
            finally
            {
                strSQL     = null;
                objConexao = null;
            }
        }
Beispiel #16
0
        private void btnConfirmar_Click(object sender, EventArgs e)
        {
            clsConexaoBD objConexao = new clsConexaoBD();

            try
            {
                if (objConexao.ExecutarComandoSqlDataSet("SELECT COUNT(*) FROM TBLEMBRETES WHERE DTLEMBRETE IS NULL").Tables[0].Rows.Count <= 0)
                {
                    objConexao.ExecutarComandoSql("INSERT INTO TBLEMBRETES(DESCLEMBRETE) VALUES('" + txtNotas.Text + "')");
                }
                else
                {
                    objConexao.ExecutarComandoSql("UPDATE TBLEMBRETES SET  DESCLEMBRETE = '" + txtNotas.Text + "' WHERE DTLEMBRETE IS NULL");
                }
            }
            catch (Exception objErro)
            {
                MessageBox.Show("Tela de Anotações/Método Salvar/ERRO: " + objErro.Message, "ERRO", MessageBoxButtons.OK, MessageBoxIcon.Error);
            }
            finally
            {
                objConexao = null;
            }
        }
        private void PreencherComboPacientes()
        {
            clsConexaoBD objConexao = new clsConexaoBD();
            DataTable tblResultado;
            DataRow objLinha;
            try
            {

                cboPaciente.DisplayMember = "NMPACIENTE";
                cboPaciente.ValueMember = "CDPACIENTE";

                tblResultado = objConexao.ExecutarComandoSqlDataSet("SELECT CDPACIENTE, UCASE(NMPACIENTE) AS NMPACIENTE FROM TBPACIENTES WHERE STATUSINATIVO = FALSE ORDER BY NMPACIENTE").Tables[0];
                objLinha = tblResultado.NewRow();
                tblResultado.Rows.InsertAt(objLinha, 0);

                cboPaciente.DataSource = tblResultado;
            }
            catch (Exception objErro)
            {
                MessageBox.Show(objErro.Message);
            }
            finally
            {
                objConexao = null;
                tblResultado = null;
                objLinha = null;
            }
        }
        private void PreencherComboFisioterapeutas()
        {
            clsConexaoBD objConexao = new clsConexaoBD();
            DataTable tblResultado;
            DataRow objLinha;
            try
            {

                cboFisioterapeutas.DisplayMember = "NMFUNCIONARIO";
                cboFisioterapeutas.ValueMember = "CDFUNCIONARIO";

                tblResultado = objConexao.ExecutarComandoSqlDataSet("SELECT CDFUNCIONARIO, UCASE(NMFUNCIONARIO) AS NMFUNCIONARIO FROM TBFUNCIONARIOS ORDER BY NMFUNCIONARIO").Tables[0];
                objLinha = tblResultado.NewRow();
                tblResultado.Rows.InsertAt(objLinha, 0);

                cboFisioterapeutas.DataSource = tblResultado;
            }
            catch (Exception objErro)
            {
                MessageBox.Show(objErro.Message);
            }
            finally
            {
                objConexao = null;
                tblResultado = null;
                objLinha = null;
            }
        }
        private void PreencherComboProcedimentos()
        {
            clsConexaoBD objConexao = new clsConexaoBD();
            DataTable tblResultado;
            DataRow objLinha;
            try
            {

                cboProcedimentos.DisplayMember = "NMPROCEDIMENTO";
                cboProcedimentos.ValueMember = "CDPROCEDIMENTO";

                tblResultado = objConexao.ExecutarComandoSqlDataSet("SELECT CDPROCEDIMENTO, UCASE(CDPROCEDIMENTOUNIMED & ' - ' & NMPROCEDIMENTO) AS NMPROCEDIMENTO, CORPROCEDIMENTO FROM TBPROCEDIMENTOS ORDER BY NMPROCEDIMENTO").Tables[0];
                objLinha = tblResultado.NewRow();
                tblResultado.Rows.InsertAt(objLinha, 0);

                cboProcedimentos.DataSource = tblResultado;

                foreach (DataRow rowTable in tblResultado.Rows)
                    if (rowTable["CORPROCEDIMENTO"].ToString() != "")
                        lstCorProcedimento.Add(new CorProcedimento(rowTable["CDPROCEDIMENTO"].ToString(), rowTable["CORPROCEDIMENTO"].ToString()));

            }
            catch (Exception objErro)
            {
                MessageBox.Show("Tela de Incluir Agendamento/ Método PreencherComboProcedimentos/ERRO: " + objErro.Message, "ERRO",
                    MessageBoxButtons.OK, MessageBoxIcon.Error);
            }
            finally
            {
                objConexao = null;
                tblResultado = null;
                objLinha = null;
            }
        }
        private void InserirProcedimentos()
        {
            clsConexaoBD objConexao = new clsConexaoBD();
            StringBuilder strSql = new StringBuilder();

            try
            {
                if (objAgendamento.cdAgendamento == "")
                {
                    strSql.Append("SELECT MAX(CDAGENDAMENTO) FROM TBAGENDAMENTO");
                    objAgendamento.cdAgendamento = objConexao.ExecutarComandoSqlDataSet(strSql.ToString()).Tables[0].Rows[0][0].ToString();
                }

                strSql.Clear();
                strSql.Append("DELETE FROM TBPROCEDIMENTOSAGENDAMENTO WHERE CDAGENDAMENTO = " + objAgendamento.cdAgendamento);
                objConexao.ExecutarComandoSql(strSql.ToString());

                foreach (DataGridViewRow objLinha in dtgProcedimentos.Rows)
                {
                    strSql.Clear();

                    strSql.Append("INSERT INTO TBPROCEDIMENTOSAGENDAMENTO(CDAGENDAMENTO, CDPROCEDIMENTO, QTDPROCEDIMENTO) VALUES(");
                    strSql.Append(objAgendamento.cdAgendamento + ", ");
                    strSql.Append(objLinha.Cells["CodigoProcedimento"].Value.ToString() + ", ");
                    strSql.Append(objLinha.Cells["QuantidadeProcedimento"].Value.ToString());
                    strSql.Append(")");

                    objConexao.ExecutarComandoSql(strSql.ToString());
                }
            }
            catch (Exception objErro)
            {
                MessageBox.Show("Tela de Incluir Agendamento/ Método InserirProcedimentos/ERRO: " + objErro.Message, "ERRO",
                    MessageBoxButtons.OK, MessageBoxIcon.Error);
            }
            finally
            {
                objConexao = null;
                strSql = null;
            }
        }
        private void CarregarGridProcedimentos()
        {
            clsConexaoBD objConexao = new clsConexaoBD();
            DataTable tblResultado;
            StringBuilder strSQL = new StringBuilder();
            string[] strCor;
            try
            {

                strSQL.Append("SELECT ");
                strSQL.Append("A.CDPROCEDIMENTO,  ");
                strSQL.Append("UCASE(B.CDPROCEDIMENTOUNIMED & ' - ' & B.NMPROCEDIMENTO) AS NMPROCEDIMENTO,  ");
                strSQL.Append("A.QTDPROCEDIMENTO,  ");
                strSQL.Append("B.CORPROCEDIMENTO  ");
                strSQL.Append("FROM  ");
                strSQL.Append("TBPROCEDIMENTOSAGENDAMENTO A INNER JOIN TBPROCEDIMENTOS B ON  A.CDPROCEDIMENTO = B.CDPROCEDIMENTO ");
                strSQL.Append("WHERE ");
                strSQL.Append("A.CDAGENDAMENTO =  " + objAgendamento.cdAgendamento);

                tblResultado = objConexao.ExecutarComandoSqlDataSet(strSQL.ToString()).Tables[0];

                foreach (DataRow objLinha in tblResultado.Rows)
                {
                    dtgProcedimentos.Rows.Add(objLinha[0].ToString(), objLinha[1].ToString(), objLinha[2].ToString());

                    if (objLinha[3].ToString() != "")
                    {
                        strCor = objLinha[3].ToString().Split('/');
                        dtgProcedimentos.Rows[dtgProcedimentos.Rows.Count - 1].DefaultCellStyle.BackColor =
                            Color.FromArgb(int.Parse(strCor[0]), int.Parse(strCor[1]), int.Parse(strCor[2]), int.Parse(strCor[3]));
                    }
                }
            }
            catch (Exception objErro)
            {
                MessageBox.Show("Tela de Incluir Agendamento/ Método CarregarGridProcedimento/ERRO: " + objErro.Message, "ERRO",
                    MessageBoxButtons.OK, MessageBoxIcon.Error);
            }
            finally
            {
                objConexao = null;
                tblResultado = null;
                strSQL = null;
            }
        }
Beispiel #22
0
        private DataSet Consulta()
        {
            StringBuilder strSQL    = new StringBuilder();
            clsConexaoBD  objConexo = new clsConexaoBD();
            DtsRelatorio  dtsAux    = new DtsRelatorio();

            try
            {
                strSQL.Append(" SELECT ");
                strSQL.Append(" FORMAT(A.DTAGENDAMENTO, 'dd/MM/yyyy HH:mm') AS DATA_AGENDAMENTO, ");
                strSQL.Append(" FORMAT(A.DTAUTORIZACAOGUIA, 'dd/MM/yyyy') AS DATA_AUTORIZACAO_GUIA, ");
                strSQL.Append(" FORMAT(A.DTVENCIMENTOGUIA, 'dd/MM/yyyy') AS DATA_VENCIMENTO_GUIA, ");
                strSQL.Append(" P.CODPACIENTEUNIMED AS    CARTEIRINHA, ");
                strSQL.Append(" UCASE(P.NMPACIENTE) AS NOME_PACIENTE, ");
                strSQL.Append(" UCASE(F.NMFUNCIONARIO) AS NOME_FISIOTERAPEUTA, ");
                strSQL.Append(" UCASE(CDPROCEDIMENTOUNIMED) AS CODIGO_PROCEDIMENTO, ");
                strSQL.Append(" UCASE(NMPROCEDIMENTO) AS NOME_PROCEDIMENTO, ");
                strSQL.Append(" PR.VLPROCEDIMENTO AS VLPROCEDIMENTO  ");
                strSQL.Append(" FROM  ");
                strSQL.Append(" (((((TBAGENDAMENTO A LEFT JOIN TBFUNCIONARIOS F  ON A.CDFUNCIONARIO = F.CDFUNCIONARIO)  ");
                strSQL.Append(" INNER JOIN TBPACIENTES P ON A.CDPACIENTE = P.CDPACIENTE) ");
                strSQL.Append(" LEFT JOIN TBPROCEDIMENTOSAGENDAMENTO PA ON A.CDAGENDAMENTO = PA.CDAGENDAMENTO) ");
                strSQL.Append(" LEFT JOIN TBPROCEDIMENTOS PR ON PR.CDPROCEDIMENTO = PA.CDPROCEDIMENTO)) ");
                strSQL.Append(" WHERE 1=1 ");

                if (txtDtInicio.Text.Replace("/", "").Replace("/", "").Trim() != "")
                {
                    strSQL.Append(" AND YEAR(A.DTAGENDAMENTO) >= " + DateTime.Parse(txtDtInicio.Text).Year);
                    strSQL.Append(" AND MONTH(A.DTAGENDAMENTO) >=  " + DateTime.Parse(txtDtInicio.Text).Month);
                    strSQL.Append(" AND DAY(A.DTAGENDAMENTO) >=  " + DateTime.Parse(txtDtInicio.Text).Day);
                }

                if (txtDtFim.Text.Replace("/", "").Replace("/", "").Trim() != "")
                {
                    strSQL.Append(" AND YEAR(A.DTAGENDAMENTO) <= " + DateTime.Parse(txtDtFim.Text).Year);
                    strSQL.Append(" AND MONTH(A.DTAGENDAMENTO) <=  " + DateTime.Parse(txtDtFim.Text).Month);
                    strSQL.Append(" AND DAY(A.DTAGENDAMENTO) <=  " + DateTime.Parse(txtDtFim.Text).Day);
                }

                if (txtInicioVencGuia.Text.Replace("/", "").Replace("/", "").Trim() != "")
                {
                    strSQL.Append(" AND YEAR(A.dtVencimentoGuia) >= " + DateTime.Parse(txtInicioVencGuia.Text).Year);
                    strSQL.Append(" AND MONTH(A.dtVencimentoGuia) >=  " + DateTime.Parse(txtInicioVencGuia.Text).Month);
                    strSQL.Append(" AND DAY(A.dtVencimentoGuia) >=  " + DateTime.Parse(txtInicioVencGuia.Text).Day);
                }

                if (txtFimVencGuia.Text.Replace("/", "").Replace("/", "").Trim() != "")
                {
                    strSQL.Append(" AND YEAR(A.dtVencimentoGuia) <= " + DateTime.Parse(txtFimVencGuia.Text).Year);
                    strSQL.Append(" AND MONTH(A.dtVencimentoGuia) <=  " + DateTime.Parse(txtFimVencGuia.Text).Month);
                    strSQL.Append(" AND DAY(A.dtVencimentoGuia) <=  " + DateTime.Parse(txtFimVencGuia.Text).Day);
                }


                if (cboFisioterapeutas.SelectedValue.ToString() != "")
                {
                    strSQL.Append(" AND F.CDFUNCIONARIO =  " + cboFisioterapeutas.SelectedValue.ToString());
                }

                if (cboStatus.SelectedValue.ToString() != "")
                {
                    strSQL.Append(" AND A.CDSTATUS =  " + cboStatus.SelectedValue.ToString());
                }


                if (cboPaciente.SelectedValue.ToString() != "")
                {
                    strSQL.Append(" AND P.CDPACIENTE =  " + cboPaciente.SelectedValue.ToString());
                }

                strSQL.Append(" ORDER BY 1,5,7");

                return(objConexo.ExecutarComandoSqlDataSet(strSQL.ToString()));
            }
            catch (Exception objErro)
            {
                throw objErro;
            }
            finally
            {
                strSQL    = null;
                dtsAux    = null;
                objConexo = null;
            }
        }
        private void VerificarNotificacoes()
        {
            clsConexaoBD objConexao = new clsConexaoBD();
            StringBuilder strSQL = new StringBuilder();

            try
            {
                strSQL.Append(" SELECT COUNT(*) FROM TBLEMBRETES WHERE ");
                strSQL.Append(" YEAR(DTLEMBRETE) = " + dtAgenda.Value.Year);
                strSQL.Append(" AND MONTH(DTLEMBRETE) = " + dtAgenda.Value.Month);
                strSQL.Append(" AND DAY(DTLEMBRETE) = " + dtAgenda.Value.Day);

                if (int.Parse(objConexao.ExecutarComandoSqlDataSet(strSQL.ToString()).Tables[0].Rows[0][0].ToString()) > 0)
                {
                    imgNotificacao.Visible = lblLembrete.Visible = true;
                    lblLembrete.Text = "Você possui " +
                        objConexao.ExecutarComandoSqlDataSet(strSQL.ToString()).Tables[0].Rows[0][0].ToString()
                        + " lembrete(s).";
                }
                else
                    imgNotificacao.Visible = lblLembrete.Visible = false;

            }
            catch (Exception objErro)
            {
                MessageBox.Show("Tela de Agendamento/Método VerificarNotificacoes/ERRO: " + objErro.Message, "ERRO",
                    MessageBoxButtons.OK, MessageBoxIcon.Error);
            }
            finally
            {
                objConexao = null;
                strSQL = null;
            }
        }
        private void CarregaGrid()
        {
            clsConexaoBD objConexao = new clsConexaoBD();
            DataSet objResultado;
            StringBuilder strSQL = new StringBuilder();

            try
            {

                strSQL.Append("SELECT ");
                strSQL.Append("FORMAT(A.DTAGENDAMENTO, 'HH:mm') AS HORARIO, ");
                strSQL.Append("A.CDAGENDAMENTO,  ");
                strSQL.Append("A.DTAGENDAMENTO, ");
                strSQL.Append("P.CDPACIENTE, ");
                strSQL.Append("P.NMPACIENTE, ");
                strSQL.Append("P.TELPACIENTE, ");
                strSQL.Append("P.TELPACIENTE2, ");
                strSQL.Append("F.CDFUNCIONARIO, ");
                strSQL.Append("F.NMFUNCIONARIO, ");
                strSQL.Append("S.CDSTATUS, ");
                strSQL.Append("S.DESSTATUS, ");
                strSQL.Append("A.DTAUTORIZACAOGUIA,  ");
                strSQL.Append("A.DTVENCIMENTOGUIA, ");
                strSQL.Append("( ");
                strSQL.Append("SELECT FIRST(CORPROCEDIMENTO) FROM TBPROCEDIMENTOSAGENDAMENTO PA INNER JOIN TBPROCEDIMENTOS PRO ON PRO.CDPROCEDIMENTO = PA.CDPROCEDIMENTO  ");
                strSQL.Append("WHERE PA.CDAGENDAMENTO = A.CDAGENDAMENTO AND  CORPROCEDIMENTO <> '' GROUP BY PA.CDAGENDAMENTO   ");
                strSQL.Append(") AS COR ");
                strSQL.Append("FROM  ");
                strSQL.Append("(((TBAGENDAMENTO A INNER JOIN TBPACIENTES P ON A.CDPACIENTE = P.CDPACIENTE) ");
                strSQL.Append("LEFT JOIN TBFUNCIONARIOS F ON A.CDFUNCIONARIO = F.CDFUNCIONARIO)  ");
                strSQL.Append("INNER JOIN TBSTATUS S ON S.CDSTATUS = A.CDSTATUS)");
                strSQL.Append("WHERE  ");
                strSQL.Append("FORMAT(DTAGENDAMENTO, 'dd/MM/yyyy') = #" + dtAgenda.Value.ToString("yyyy/MM/dd") + "#  ");

                if (txtPaciente.Text.Trim() != "")
                    strSQL.Append(" AND P.NMPACIENTE LIKE '%" + txtPaciente.Text + "%' ");

                if (cboFisioterapeutas.Text != "")
                    strSQL.Append(" AND F.CDFUNCIONARIO = " + cboFisioterapeutas.SelectedValue.ToString());

                if (cboStatus.Text != "")
                    strSQL.Append(" AND S.CDSTATUS = " + cboStatus.SelectedValue.ToString());

                if (txtHorario.Text.Replace(":", "").Trim() != "")
                    strSQL.Append(" AND  FORMAT(DTAGENDAMENTO, 'HH:mm') >=  #" + DateTime.Parse(txtHorario.Text).AddMinutes(-30).ToString("HH:mm") + "# ");

                strSQL.Append(" ORDER BY  ");
                strSQL.Append("A.DTAGENDAMENTO, ");
                strSQL.Append("P.NMPACIENTE ");

                objResultado =
                    objConexao.ExecutarComandoSqlDataSet(strSQL.ToString());

                dtgAgenda.DataSource = PreencherListaAgendamento(objResultado.Tables[0]);

                //FormtarGrid();
            }
            catch (Exception objErro)
            {
                MessageBox.Show("Tela de Agenda/Método CarregarGid/ERRO:" + objErro.Message, "ERRO", MessageBoxButtons.OK, MessageBoxIcon.Error);
            }
            finally
            {
                objConexao = null;
                objResultado = null;
                strSQL = null;
            }
        }
        private void CarregarGrid()
        {
            clsConexaoBD objConexao = new clsConexaoBD();

            try
            {
                dtgProcedimentos.DataSource =
                    objConexao.ExecutarComandoSqlDataSet("SELECT CDPROCEDIMENTO, CDPROCEDIMENTOUNIMED, UCASE(NMPROCEDIMENTO) AS NMPROCEDIMENTO, VLPROCEDIMENTO, CORPROCEDIMENTO FROM TBPROCEDIMENTOS ORDER BY 2").Tables[0];

                dtgProcedimentos.Columns["CDPROCEDIMENTO"].Visible = false;
                dtgProcedimentos.Columns["CDPROCEDIMENTOUNIMED"].HeaderText = "Código Procedimento.";
                dtgProcedimentos.Columns["NMPROCEDIMENTO"].HeaderText = "Descrição";
                dtgProcedimentos.Columns["VLPROCEDIMENTO"].HeaderText = "Valor";
                dtgProcedimentos.Columns["VLPROCEDIMENTO"].DefaultCellStyle.Format = "c";
                dtgProcedimentos.Columns["CORPROCEDIMENTO"].Visible = false;

            }
            catch (Exception objErro)
            {
                MessageBox.Show(objErro.Message);
            }
            finally
            {
                objConexao = null;
            }
        }
        private void PreencherComboStatus()
        {
            clsConexaoBD objConexao = new clsConexaoBD();
            DataTable tblResultado;
            DataRow objLinha;
            try
            {

                cboStatus.DisplayMember = "DESSTATUS";
                cboStatus.ValueMember = "CDSTATUS";

                tblResultado = objConexao.ExecutarComandoSqlDataSet("SELECT CDSTATUS, UCASE(DESSTATUS) AS DESSTATUS FROM TBSTATUS ORDER BY DESSTATUS").Tables[0];
                objLinha = tblResultado.NewRow();
                tblResultado.Rows.InsertAt(objLinha, 0);

                cboStatus.DataSource = tblResultado;
            }
            catch (Exception objErro)
            {
                MessageBox.Show(objErro.Message);
            }
            finally
            {
                objConexao = null;
                tblResultado = null;
                objLinha = null;
            }
        }
        private DataSet Consulta()
        {
            StringBuilder strSQL = new StringBuilder();
            clsConexaoBD objConexo = new clsConexaoBD();
            DtsRelatorio dtsAux = new DtsRelatorio();

            try
            {
                strSQL.Append(" SELECT ");
                strSQL.Append(" FORMAT(A.DTAGENDAMENTO, 'dd/MM/yyyy HH:mm') AS DATA_AGENDAMENTO, ");
                strSQL.Append(" FORMAT(A.DTAUTORIZACAOGUIA, 'dd/MM/yyyy') AS DATA_AUTORIZACAO_GUIA, ");
                strSQL.Append(" FORMAT(A.DTVENCIMENTOGUIA, 'dd/MM/yyyy') AS DATA_VENCIMENTO_GUIA, ");
                strSQL.Append(" P.CODPACIENTEUNIMED AS    CARTEIRINHA, ");
                strSQL.Append(" UCASE(P.NMPACIENTE) AS NOME_PACIENTE, ");
                strSQL.Append(" UCASE(F.NMFUNCIONARIO) AS NOME_FISIOTERAPEUTA, ");
                strSQL.Append(" UCASE(CDPROCEDIMENTOUNIMED) AS CODIGO_PROCEDIMENTO, ");
                strSQL.Append(" UCASE(NMPROCEDIMENTO) AS NOME_PROCEDIMENTO, ");
                strSQL.Append(" PR.VLPROCEDIMENTO AS VLPROCEDIMENTO  ");
                strSQL.Append(" FROM  ");
                strSQL.Append(" (((((TBAGENDAMENTO A LEFT JOIN TBFUNCIONARIOS F  ON A.CDFUNCIONARIO = F.CDFUNCIONARIO)  ");
                strSQL.Append(" INNER JOIN TBPACIENTES P ON A.CDPACIENTE = P.CDPACIENTE) ");
                strSQL.Append(" LEFT JOIN TBPROCEDIMENTOSAGENDAMENTO PA ON A.CDAGENDAMENTO = PA.CDAGENDAMENTO) ");
                strSQL.Append(" LEFT JOIN TBPROCEDIMENTOS PR ON PR.CDPROCEDIMENTO = PA.CDPROCEDIMENTO)) ");
                strSQL.Append(" WHERE 1=1 ");

                if (txtDtInicio.Text.Replace("/", "").Replace("/", "").Trim() != "")
                {
                    strSQL.Append(" AND YEAR(A.DTAGENDAMENTO) >= " + DateTime.Parse(txtDtInicio.Text).Year);
                    strSQL.Append(" AND MONTH(A.DTAGENDAMENTO) >=  " + DateTime.Parse(txtDtInicio.Text).Month);
                    strSQL.Append(" AND DAY(A.DTAGENDAMENTO) >=  " + DateTime.Parse(txtDtInicio.Text).Day);
                }

                if (txtDtFim.Text.Replace("/", "").Replace("/", "").Trim() != "")
                {
                    strSQL.Append(" AND YEAR(A.DTAGENDAMENTO) <= " + DateTime.Parse(txtDtFim.Text).Year);
                    strSQL.Append(" AND MONTH(A.DTAGENDAMENTO) <=  " + DateTime.Parse(txtDtFim.Text).Month);
                    strSQL.Append(" AND DAY(A.DTAGENDAMENTO) <=  " + DateTime.Parse(txtDtFim.Text).Day);
                }

                if (txtInicioVencGuia.Text.Replace("/", "").Replace("/", "").Trim() != "")
                {
                    strSQL.Append(" AND YEAR(A.dtVencimentoGuia) >= " + DateTime.Parse(txtInicioVencGuia.Text).Year);
                    strSQL.Append(" AND MONTH(A.dtVencimentoGuia) >=  " + DateTime.Parse(txtInicioVencGuia.Text).Month);
                    strSQL.Append(" AND DAY(A.dtVencimentoGuia) >=  " + DateTime.Parse(txtInicioVencGuia.Text).Day);
                }

                if (txtFimVencGuia.Text.Replace("/", "").Replace("/", "").Trim() != "")
                {
                    strSQL.Append(" AND YEAR(A.dtVencimentoGuia) <= " + DateTime.Parse(txtFimVencGuia.Text).Year);
                    strSQL.Append(" AND MONTH(A.dtVencimentoGuia) <=  " + DateTime.Parse(txtFimVencGuia.Text).Month);
                    strSQL.Append(" AND DAY(A.dtVencimentoGuia) <=  " + DateTime.Parse(txtFimVencGuia.Text).Day);
                }

                if (cboFisioterapeutas.SelectedValue.ToString() != "")
                    strSQL.Append(" AND F.CDFUNCIONARIO =  " + cboFisioterapeutas.SelectedValue.ToString());

                if (cboStatus.SelectedValue.ToString() != "")
                    strSQL.Append(" AND A.CDSTATUS =  " + cboStatus.SelectedValue.ToString());

                if (cboPaciente.SelectedValue.ToString() != "")
                    strSQL.Append(" AND P.CDPACIENTE =  " + cboPaciente.SelectedValue.ToString());

                strSQL.Append(" ORDER BY 1,5,7");

                return objConexo.ExecutarComandoSqlDataSet(strSQL.ToString());
            }
            catch (Exception objErro)
            {
                throw objErro;
            }
            finally
            {
                strSQL = null;
                dtsAux = null;
                objConexo = null;
            }
        }
        private void PreencherGrid()
        {
            clsConexaoBD objConexao = new clsConexaoBD();

            try
            {
                dtgPacientes.DataSource = objConexao.ExecutarComandoSqlDataSet("SELECT CDPACIENTE, CODPACIENTEUNIMED, UCASE(NMPACIENTE) AS NMPACIENTE," +
                                " TELPACIENTE2, TELPACIENTE,  IIF( STATUSINATIVO = FALSE, 'ATIVO', 'INATIVO' ) AS STATUS FROM TBPACIENTES " +
                                " WHERE UCASE(NMPACIENTE) LIKE '%" + txtNome.Text.Trim().ToUpper()+"%'" +
                                "ORDER BY NMPACIENTE").Tables[0];
                dtgPacientes.Columns["CDPACIENTE"].Visible = false;
                dtgPacientes.Columns["NMPACIENTE"].HeaderText = "Nome do Paciente";
                dtgPacientes.Columns["TELPACIENTE"].HeaderText = "Celular";
                dtgPacientes.Columns["TELPACIENTE2"].HeaderText = "Telefone Residencial";
                dtgPacientes.Columns["CODPACIENTEUNIMED"].HeaderText = "Código Paciente";
                dtgPacientes.Columns["STATUS"].HeaderText = "Status";
                if (dtgPacientes.SelectedRows.Count > 0)
                    dtgPacientes.SelectedRows[0].Selected = false;

            }
            catch (Exception objErro)
            {
                MessageBox.Show(objErro.Message);
            }
            finally
            {
                objConexao = null;
            }
        }
        private void VerificarNotificacoes()
        {
            clsConexaoBD objConexao = new clsConexaoBD();
            StringBuilder strSQL = new StringBuilder();
            DataTable tblResultado;
            frmNotificacao objForm;

            try
            {
                strSQL.Append(" SELECT DESCLEMBRETE, CDLEMBRETE FROM TBLEMBRETES WHERE ");
                strSQL.Append(" YEAR(DTLEMBRETE) = " + DateTime.Now.Year);
                strSQL.Append(" AND MONTH(DTLEMBRETE) = " + DateTime.Now.Month);
                strSQL.Append(" AND DAY(DTLEMBRETE) = " + DateTime.Now.Day);
                strSQL.Append(" AND STNOTIFICACAO = TRUE AND STDESCARTAR = FALSE" );

                tblResultado = objConexao.ExecutarComandoSqlDataSet(strSQL.ToString()).Tables[0];

                if (tblResultado.Rows.Count > 0)
                {
                    foreach (DataRow rowLinha in tblResultado.Rows)
                    {
                        objForm = new frmNotificacao(rowLinha[0].ToString(), rowLinha[1].ToString());
                        objForm.ShowDialog();
                        objForm = null;
                    }
                }

            }
            catch (Exception objErro)
            {
                throw objErro;
            }
            finally
            {
                objConexao = null;
                tblResultado = null;
                strSQL = null;
            }
        }
        private void CarregaGrid()
        {
            clsConexaoBD  objConexao = new clsConexaoBD();
            DataSet       objResultado;
            StringBuilder strSQL = new StringBuilder();

            try
            {
                strSQL.Append("SELECT ");
                strSQL.Append("FORMAT(A.DTAGENDAMENTO, 'HH:mm') AS HORARIO, ");
                strSQL.Append("A.CDAGENDAMENTO,  ");
                strSQL.Append("A.DTAGENDAMENTO, ");
                strSQL.Append("P.CDPACIENTE, ");
                strSQL.Append("P.NMPACIENTE, ");
                strSQL.Append("P.TELPACIENTE, ");
                strSQL.Append("P.TELPACIENTE2, ");
                strSQL.Append("F.CDFUNCIONARIO, ");
                strSQL.Append("F.NMFUNCIONARIO, ");
                strSQL.Append("S.CDSTATUS, ");
                strSQL.Append("S.DESSTATUS, ");
                strSQL.Append("A.DTAUTORIZACAOGUIA,  ");
                strSQL.Append("A.DTVENCIMENTOGUIA, ");
                strSQL.Append("( ");
                strSQL.Append("SELECT FIRST(CORPROCEDIMENTO) FROM TBPROCEDIMENTOSAGENDAMENTO PA INNER JOIN TBPROCEDIMENTOS PRO ON PRO.CDPROCEDIMENTO = PA.CDPROCEDIMENTO  ");
                strSQL.Append("WHERE PA.CDAGENDAMENTO = A.CDAGENDAMENTO AND  CORPROCEDIMENTO <> '' GROUP BY PA.CDAGENDAMENTO   ");
                strSQL.Append(") AS COR ");
                strSQL.Append("FROM  ");
                strSQL.Append("(((TBAGENDAMENTO A INNER JOIN TBPACIENTES P ON A.CDPACIENTE = P.CDPACIENTE) ");
                strSQL.Append("LEFT JOIN TBFUNCIONARIOS F ON A.CDFUNCIONARIO = F.CDFUNCIONARIO)  ");
                strSQL.Append("INNER JOIN TBSTATUS S ON S.CDSTATUS = A.CDSTATUS)");
                strSQL.Append("WHERE  ");
                strSQL.Append("FORMAT(DTAGENDAMENTO, 'dd/MM/yyyy') = #" + dtAgenda.Value.ToString("yyyy/MM/dd") + "#  ");

                if (txtPaciente.Text.Trim() != "")
                {
                    strSQL.Append(" AND P.NMPACIENTE LIKE '%" + txtPaciente.Text + "%' ");
                }

                if (cboFisioterapeutas.Text != "")
                {
                    strSQL.Append(" AND F.CDFUNCIONARIO = " + cboFisioterapeutas.SelectedValue.ToString());
                }

                if (cboStatus.Text != "")
                {
                    strSQL.Append(" AND S.CDSTATUS = " + cboStatus.SelectedValue.ToString());
                }

                if (txtHorario.Text.Replace(":", "").Trim() != "")
                {
                    strSQL.Append(" AND  FORMAT(DTAGENDAMENTO, 'HH:mm') >=  #" + DateTime.Parse(txtHorario.Text).AddMinutes(-30).ToString("HH:mm") + "# ");
                }

                strSQL.Append(" ORDER BY  ");
                strSQL.Append("A.DTAGENDAMENTO, ");
                strSQL.Append("P.NMPACIENTE ");

                objResultado =
                    objConexao.ExecutarComandoSqlDataSet(strSQL.ToString());

                dtgAgenda.DataSource = PreencherListaAgendamento(objResultado.Tables[0]);

                //FormtarGrid();
            }
            catch (Exception objErro)
            {
                MessageBox.Show("Tela de Agenda/Método CarregarGid/ERRO:" + objErro.Message, "ERRO", MessageBoxButtons.OK, MessageBoxIcon.Error);
            }
            finally
            {
                objConexao   = null;
                objResultado = null;
                strSQL       = null;
            }
        }