internal void Criar(Sumario_Procedimento v_oSumario_Procedimento)
        {
            try
              {
              sbSQL.Length = 0;
              sbSQL.Append("INSERT INTO TBINT063(");

              sbSQL.Append("IDINT058,");
              sbSQL.Append("DSPRC,");
              sbSQL.Append("DTPRC");

              sbSQL.Append(") VALUES (");

              sbSQL.Append(":IDINT058,");
              sbSQL.Append(":DSPRC,");
              sbSQL.Append(":DTPRC");
              sbSQL.Append(")");

              sbSQL = TratarSQLParametroBanco(sbSQL.ToString());
              oCmd = ObterCommand(sbSQL.ToString());

              UtDbNet.AdicionarParametro(oCmd, TratarSQLParametroBanco("IDINT058").ToString(), Convert.ToInt32(UtSessao.Sessao["Id058"]));
              UtDbNet.AdicionarParametro(oCmd, TratarSQLParametroBanco("DSPRC").ToString(), v_oSumario_Procedimento.nome);
              UtDbNet.AdicionarParametro(oCmd, TratarSQLParametroBanco("DTPRC").ToString(), v_oSumario_Procedimento.dtprc);

              oCmd.ExecuteNonQuery();

              v_oSumario_Procedimento.Codigo = ObterNovoCodigo(oCmd, "SEQTBINT063");
              oCmd.Dispose();
              }
              catch (Exception en)
              {
              throw new Dor.Util.OperacaoInvalidaBD(en);
              }
        }
        internal void Salvar(Sumario_Procedimento v_oSumario_Procedimento)
        {
            try
              {
              sbSQL.Length = 0;
              sbSQL.Append(" UPDATE TBINT063 SET IDINT058 =:IDINT058, DSPRC =:DSPRC, DTPRC =:DTPRC");
              sbSQL.Append(" WHERE IDINT063 =:IDINT063");

              sbSQL = TratarSQLParametroBanco(sbSQL.ToString());
              oCmd = ObterCommand(sbSQL.ToString());

              UtDbNet.AdicionarParametro(oCmd, TratarSQLParametroBanco("IDINT058").ToString(), Convert.ToInt32(UtSessao.Sessao["Id058"]));
              UtDbNet.AdicionarParametro(oCmd, TratarSQLParametroBanco("DSPRC").ToString(), v_oSumario_Procedimento.nome);
              UtDbNet.AdicionarParametro(oCmd, TratarSQLParametroBanco("DTPRC").ToString(), v_oSumario_Procedimento.dtprc);
              UtDbNet.AdicionarParametro(oCmd, TratarSQLParametroBanco("IDINT063").ToString(), v_oSumario_Procedimento.Codigo);

              oCmd.ExecuteNonQuery();
              oCmd.Dispose();
              }
              catch (Exception en)
              {
              throw new Dor.Util.OperacaoInvalidaBD(en);
              }
        }
        internal void Obter(Sumario_Procedimento v_oSumario_Procedimento, long v_iCodigo)
        {
            try
              {
              sbSQL.Length = 0;
              sbSQL.Append(" SELECT IDINT063, IDINT058, DSPRC, DTPRC");
              sbSQL.Append(" FROM TBINT063");
              sbSQL.Append(" WHERE IDINT063 =:IDINT063");

              sbSQL = TratarSQLParametroBanco(sbSQL.ToString());
              oCmd = ObterCommand(sbSQL.ToString());
              UtDbNet.AdicionarParametro(oCmd, TratarSQLParametroBanco("IDINT063").ToString(),  v_iCodigo);

              oReader = oCmd.ExecuteReader();
              if (oReader.Read())
              {
              v_oSumario_Procedimento.Codigo = UtDbNet.CampoLongo(oReader["IDINT063"]);
              v_oSumario_Procedimento.idint058 = UtDbNet.CampoLongo(oReader["IDINT058"]);
              v_oSumario_Procedimento.nome = UtDbNet.CampoLiteral(oReader["DSPRC"]);
              v_oSumario_Procedimento.dtprc = UtDbNet.CampoData(oReader["DTPRC"]);
              }

              oReader.Close();
              oCmd.Dispose();

              }
                  catch (Exception en)
              {
                  throw new Dor.Util.OperacaoInvalidaBD(en);
              }
        }