internal void Criar(Sumario_Receituario v_oSumario_Receituario)
{
try
{
sbSQL.Length = 0;
sbSQL.Append("INSERT INTO TBINT070(");
sbSQL.Append("IDINT058,");
sbSQL.Append("COD_PRD,");
sbSQL.Append("DESCRICAO_PRODUTO,");
sbSQL.Append("DESCRICAO_DOSE,");
sbSQL.Append("DESCRICAO_VIA,");
sbSQL.Append("DESCRICAO_FREQUENCIA,");
sbSQL.Append("DESCRICAO_DURACAO,");
sbSQL.Append("ULTIMA_DOSE");
sbSQL.Append(") VALUES (");
sbSQL.Append(":IDINT058,");
sbSQL.Append(":COD_PRD,");
sbSQL.Append(":DESCRICAO_PRODUTO,");
sbSQL.Append(":DESCRICAO_DOSE,");
sbSQL.Append(":DESCRICAO_VIA,");
sbSQL.Append(":DESCRICAO_FREQUENCIA,");
sbSQL.Append(":DESCRICAO_DURACAO,");
sbSQL.Append(":ULTIMA_DOSE");
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("COD_PRD").ToString(), v_oSumario_Receituario.cod_prd);
UtDbNet.AdicionarParametro(oCmd, TratarSQLParametroBanco("DESCRICAO_PRODUTO").ToString(), v_oSumario_Receituario.desc_produto);
UtDbNet.AdicionarParametro(oCmd, TratarSQLParametroBanco("DESCRICAO_DOSE").ToString(), v_oSumario_Receituario.desc_dose);
UtDbNet.AdicionarParametro(oCmd, TratarSQLParametroBanco("DESCRICAO_VIA").ToString(), v_oSumario_Receituario.desc_via);
UtDbNet.AdicionarParametro(oCmd, TratarSQLParametroBanco("DESCRICAO_FREQUENCIA").ToString(), v_oSumario_Receituario.desc_frequencia);
UtDbNet.AdicionarParametro(oCmd, TratarSQLParametroBanco("DESCRICAO_DURACAO").ToString(), v_oSumario_Receituario.desc_duracao);
UtDbNet.AdicionarParametro(oCmd, TratarSQLParametroBanco("ULTIMA_DOSE").ToString(), v_oSumario_Receituario.ult_dose);
oCmd.ExecuteNonQuery();
v_oSumario_Receituario.Codigo = ObterNovoCodigo(oCmd, "SEQTBINT070");
oCmd.Dispose();
}
catch (Exception en)
{
throw new Dor.Util.OperacaoInvalidaBD(en);
}
}
internal void Salvar(Sumario_Receituario v_oSumario_Receituario)
{
try
{
sbSQL.Length = 0;
sbSQL.Append(" UPDATE TBINT070 SET IDINT058 =:IDINT058, COD_PRD =:COD_PRD, DESCRICAO_PRODUTO =:DESCRICAO_PRODUTO, DESCRICAO_DOSE =:DESCRICAO_DOSE, DESCRICAO_VIA =:DESCRICAO_VIA, DESCRICAO_FREQUENCIA =:DESCRICAO_FREQUENCIA, DESCRICAO_DURACAO =:DESCRICAO_DURACAO, ULTIMA_DOSE =:ULTIMA_DOSE");
sbSQL.Append(" WHERE IDINT070 =:IDINT070");
sbSQL = TratarSQLParametroBanco(sbSQL.ToString());
oCmd = ObterCommand(sbSQL.ToString());
UtDbNet.AdicionarParametro(oCmd, TratarSQLParametroBanco("IDINT058").ToString(), Convert.ToInt32(UtSessao.Sessao["Id058"]));
UtDbNet.AdicionarParametro(oCmd, TratarSQLParametroBanco("COD_PRD").ToString(), v_oSumario_Receituario.cod_prd);
UtDbNet.AdicionarParametro(oCmd, TratarSQLParametroBanco("DESCRICAO_PRODUTO").ToString(), v_oSumario_Receituario.desc_produto);
UtDbNet.AdicionarParametro(oCmd, TratarSQLParametroBanco("DESCRICAO_DOSE").ToString(), v_oSumario_Receituario.desc_dose);
UtDbNet.AdicionarParametro(oCmd, TratarSQLParametroBanco("DESCRICAO_VIA").ToString(), v_oSumario_Receituario.desc_via);
UtDbNet.AdicionarParametro(oCmd, TratarSQLParametroBanco("DESCRICAO_FREQUENCIA").ToString(), v_oSumario_Receituario.desc_frequencia);
UtDbNet.AdicionarParametro(oCmd, TratarSQLParametroBanco("DESCRICAO_DURACAO").ToString(), v_oSumario_Receituario.desc_duracao);
UtDbNet.AdicionarParametro(oCmd, TratarSQLParametroBanco("ULTIMA_DOSE").ToString(), v_oSumario_Receituario.ult_dose);
UtDbNet.AdicionarParametro(oCmd, TratarSQLParametroBanco("IDINT070").ToString(), v_oSumario_Receituario.Codigo);
oCmd.ExecuteNonQuery();
oCmd.Dispose();
}
catch (Exception en)
{
throw new Dor.Util.OperacaoInvalidaBD(en);
}
}
internal void Obter(Sumario_Receituario v_oSumario_Receituario, long v_iCodigo)
{
try
{
sbSQL.Length = 0;
sbSQL.Append(" SELECT IDINT070, IDINT058, COD_PRD, DESCRICAO_PRODUTO, DESCRICAO_DOSE, DESCRICAO_VIA, DESCRICAO_FREQUENCIA, DESCRICAO_DURACAO, ULTIMA_DOSE");
sbSQL.Append(" FROM TBINT070");
sbSQL.Append(" WHERE IDINT070 =:IDINT070");
sbSQL = TratarSQLParametroBanco(sbSQL.ToString());
oCmd = ObterCommand(sbSQL.ToString());
UtDbNet.AdicionarParametro(oCmd, TratarSQLParametroBanco("IDINT070").ToString(), v_iCodigo);
oReader = oCmd.ExecuteReader();
if (oReader.Read())
{
v_oSumario_Receituario.Codigo = UtDbNet.CampoLongo(oReader["IDINT070"]);
v_oSumario_Receituario.Id058 = UtDbNet.CampoLongo(oReader["IDINT058"]);
v_oSumario_Receituario.cod_prd = UtDbNet.CampoLiteral(oReader["COD_PRD"]);
v_oSumario_Receituario.desc_produto = UtDbNet.CampoLiteral(oReader["DESCRICAO_PRODUTO"]);
v_oSumario_Receituario.desc_dose = UtDbNet.CampoLiteral(oReader["DESCRICAO_DOSE"]);
v_oSumario_Receituario.desc_via = UtDbNet.CampoLiteral(oReader["DESCRICAO_VIA"]);
v_oSumario_Receituario.desc_frequencia = UtDbNet.CampoLiteral(oReader["DESCRICAO_FREQUENCIA"]);
v_oSumario_Receituario.desc_duracao = UtDbNet.CampoLiteral(oReader["DESCRICAO_DURACAO"]);
v_oSumario_Receituario.ult_dose = UtDbNet.CampoData(oReader["ULTIMA_DOSE"]);
}
oReader.Close();
oCmd.Dispose();
}
catch (Exception en)
{
throw new Dor.Util.OperacaoInvalidaBD(en);
}
}
