Exemplo n.º 1
0
        internal void Criar(Perfil v_oPerfil)
        {
            try
            {
                sbSQL.Length = 0;
                sbSQL.Append("INSERT INTO TBPRO016(");

                sbSQL.Append("DSAPLDPERF,");
                sbSQL.Append("NMPERF");

                sbSQL.Append(") VALUES (");

                sbSQL.Append(":DSAPLDPERF,");
                sbSQL.Append(":NMPERF");
                sbSQL.Append(")");

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

                UtDbNet.AdicionarParametro(oCmd, TratarSQLParametroBanco("DSAPLDPERF").ToString(), v_oPerfil.Apelido);
                UtDbNet.AdicionarParametro(oCmd, TratarSQLParametroBanco("NMPERF").ToString(), v_oPerfil.Nome);

                oCmd.ExecuteNonQuery();

                v_oPerfil.Codigo = ObterNovoCodigo(oCmd, "SEQTBPRO016");
                oCmd.Dispose();
            }
            catch (Exception ex)
            {
                throw new Dor.Util.OperacaoInvalidaBD(ex);
            }
        }
Exemplo n.º 2
0
        internal void Salvar(Perfil v_oPerfil)
        {
            try
            {
                sbSQL.Length = 0;
                sbSQL.Append(" UPDATE TBPRO016 SET DSAPLDPERF =:DSAPLDPERF, NMPERF =:NMPERF");
                sbSQL.Append(" WHERE IDPRO016 =:IDPRO016");

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

                UtDbNet.AdicionarParametro(oCmd, TratarSQLParametroBanco("DSAPLDPERF").ToString(), v_oPerfil.Apelido);
                UtDbNet.AdicionarParametro(oCmd, TratarSQLParametroBanco("NMPERF").ToString(), v_oPerfil.Nome);
                UtDbNet.AdicionarParametro(oCmd, TratarSQLParametroBanco("IDPRO016").ToString(), v_oPerfil.Codigo);

                oCmd.ExecuteNonQuery();
                oCmd.Dispose();
            }
            catch (Exception ex)
            {
                throw new Dor.Util.OperacaoInvalidaBD(ex);
            }
        }
Exemplo n.º 3
0
        internal void Obter(Perfil v_oPerfil, long v_iCodigo)
        {
            try
            {
                sbSQL.Length = 0;
                sbSQL.Append(" SELECT DSAPLDPERF, IDPRO016, NMPERF");
                sbSQL.Append(" FROM TBPRO016");
                sbSQL.Append(" WHERE IDPRO016 =:IDPRO016");

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

                oReader = oCmd.ExecuteReader();
                if (oReader.Read())
                {
                    v_oPerfil.Apelido = UtDbNet.CampoLiteral(oReader["DSAPLDPERF"]);
                    v_oPerfil.Codigo = UtDbNet.CampoLongo(oReader["IDPRO016"]);
                    v_oPerfil.Nome = UtDbNet.CampoLiteral(oReader["NMPERF"]);
                }

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

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