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); } }