Peli insulsa i absurda on les hagi, tracta d'uns que fent algo amb el seu ADN tenen el poder de sobreescalfar-se i regenerar-se i si no es controlen exploten. També les lleis de la física s'ignoren al llarg de l'ample de la pel·licula. Els girs de guió són senzills perquè la gent no es perdi.

Però bé és Ironman i endavant les atxes. Es deixa veure si no es presta gaire atenció, els efectes estan molt bé.

Seguint amb la sèrie de la clsDades aquesta és la funció que s'encarrega d'obtenir de la BBDD una pàgina de registres, ordenats d'una forma determinada i filtrats si cal.

Fa servir la SP QUERY per fer-ho, en realitat la SP és la que fa tota la feina, la clsDades només té la invocació a aquesta SP. Així que ha de fer servir la variable ParamsQUERY per informar-ne els paràmetres, a més a més hi ha uns paràmetres fixes que són:

• SortColumn: Columna per la que s'ordena (haurà de coincidir amb alguna de les que té la SP). En el literal de la columna també està informat el sentit, ascendent o descendent.
• PageSize: Mida de la pàgina, en número de registres, 5, 10, 20...
• PageNum: Número de la pàgina que es vol, la 1, 2, 3...

A més a més d'aquests paràmetres d'entrada la SP té un valor important de sortida que cal recollir, el número total de registres un cop filtrat (sense paginar). Es podria fer amb un COUNT però seria fer el filtre dues vegades, dins de la SP ja es calcula i llavors només es fa un cop. Aquest valor és important per calcular el número total de pàgines donat un filtre a una taula. En la funció és el paràmetre NumTotRegs, que està declarat de sortida. Com sempre el codi:

public DataTable QUERY(Dictionary<string, string> Params, out int NumTotRegs)
{
    SqlDataReader Reader = null;
    DataTable Result = new DataTable();
    SqlCommand SqlComm = new SqlCommand();
    SqlParameter SqlParam;
    bool LocalConn;
    SqlConnection Conn = null;
    if (SQLConn == null)
    {
	LocalConn = true;
	Conn = new SqlConnection(CadConnBBDD);
	Conn.Open();
    }
    else
    {
	LocalConn = false;
	Conn = SQLConn;
    }
    SqlComm.Connection = Conn;
    SqlComm.CommandTimeout = 120;
    if (SQLTrans != null) SqlComm.Transaction = SQLTrans;

    foreach (clsCamp Camp in ParamsQUERY)
    {
	SqlParam = CreaParametre(Camp, false);
	if (Params.Keys.Contains(Camp.NomCamp))
	{
	    if (string.IsNullOrEmpty(Params[Camp.NomCamp])) SqlParam.Value = DBNull.Value;
	    else SqlParam.Value = Params[Camp.NomCamp];
	}
	else SqlParam.Value = DBNull.Value;
	SqlComm.Parameters.Add(SqlParam);
    }

    SqlComm.CommandType = CommandType.StoredProcedure;

    SqlParameter pSortColumn = new SqlParameter("pSortColumn", SqlDbType.NVarChar, 50);
    pSortColumn.Direction = ParameterDirection.Input;
    pSortColumn.Value = Params["SortColumn"];
    SqlComm.Parameters.Add(pSortColumn);

    SqlParameter pPageSize = new SqlParameter("pPageSize", SqlDbType.Int);
    pPageSize.Direction = ParameterDirection.Input;
    pPageSize.Value = Params["PageSize"];
    SqlComm.Parameters.Add(pPageSize);

    SqlParameter pPageNum = new SqlParameter("pPageNum", SqlDbType.Int);
    pPageNum.Direction = ParameterDirection.Input;
    pPageNum.Value = Params["PageNum"];
    SqlComm.Parameters.Add(pPageNum);

    SqlComm.CommandText = spQUERY;

    Reader = SqlComm.ExecuteReader();

    Result.Load(Reader);

    Reader.Close();

    if (Result.Rows.Count > 0)
    {
	NumTotRegs = int.Parse(Result.Rows[0]["NumRegs"].ToString());
    }
    else
    {
	NumTotRegs = 0;
    }

    if (LocalConn)
    {
	Conn.Close();
	Conn.Dispose();
	Conn = null;
    }
    return Result;           
}

Puede que ni yo mismo esté necesariamente de acuerdo con todo lo que he afirmado en el pasado.

Seguint amb la sèrie de la clsDades aquesta és la funció que s'encarrega de contar quants registres hi ha a la BBDD que compleixin un cert criteri.

Fa servir la SP COUNT per fer-ho. Fa servir els mateixos paràmetres que el GET (que són els mateixos que el QUERY), es a dir es poden aplicar els mateixos criteris de cerca que quan es fa un GET però enlloc d'obtenir registres retorna només el número de registres. Això és útil quan hi ha una barra de progres i es vol saber el número total de registres, o quan s'ha de calcular el número de pàgines...

Fa servir ParamsQUERY per informar els seus paràmetres. La funció només admet un Dictionary per informar els seus paràmetres, no cal que siguin tots, només el que volem filtrar. Com sempre el codi:

public int COUNT(Dictionary<string, string> Params)
{
    SqlCommand SqlComm = new SqlCommand();
    SqlParameter SqlParam;
    bool LocalConn;
    SqlConnection Conn = null;
    int Result = 0;
    if (SQLConn == null)
    {
	LocalConn = true;
	Conn = new SqlConnection(CadConnBBDD);
	Conn.Open();
    }
    else
    {
	LocalConn = false;
	Conn = SQLConn;
    }
    SqlComm.Connection = Conn;
    if (SQLTrans != null) SqlComm.Transaction = SQLTrans;

    foreach (clsCamp Camp in ParamsQUERY)
    {
	SqlParam = CreaParametre(Camp, false);
	if (Params.Keys.Contains<string>(Camp.NomCamp))
	{
	    if (string.IsNullOrEmpty(Params[Camp.NomCamp])) SqlParam.Value = DBNull.Value;
	    else SqlParam.Value = Params[Camp.NomCamp];
	}
	else SqlParam.Value = DBNull.Value;
	SqlComm.Parameters.Add(SqlParam);
    }

    SqlComm.CommandType = CommandType.StoredProcedure;
    SqlComm.CommandText = spCOUNT;

    Result = int.Parse(SqlComm.ExecuteScalar().ToString());

    if (LocalConn)
    {
	Conn.Close();
	Conn.Dispose();
	Conn = null;
    }
    return Result; 
}

El Jhonny Depp sempre li cauen bé els personatges estrafolaris, i aquí fa el paper d'indi penjat que parla amb esperits... Com anell al dit. De fet sembla més que el protagonista sigui ell i no el "lone rider" (llanero solitario).

La peli és un xic llarga, però bé, com m'agraden els paisatges no tinc problema, posen paisatges western molt bonics.

L'acció tracta de la construcció del ferrocarril, uns dolents molt dolents que volen treure un munt de plata de territori indi, i la cavalleria que està pel mig. El "llanero solitario" intenta fer justícia per la mort del seu germà, que era un "ranger de texas" al que els dolents de la plata maten.

Hi ha varies escenes que m'han recordat molt a Indiana Jones, sobre tot una que van dos vagons per vies diferents i lluiten entre ells (com les vagonetes a la mina del temple maleït).

Per passar l'estona, veure paisatges i algo de western (als que tinc certa debilitat).

Seguint amb la sèrie de la clsDades aquesta és la funció que s'encarrega d'esborrar un registre a la BBDD.

Fa servir la SP DEL per fer-ho. Així que ha de fer servir la variable ParamsDEL per informar-ne els paràmetres. Normalment aquests paràmetres són la primary key (PK), de tal manera que només s'esborra un registre. Existeix en 2 sabors diferents, un que rep un DataRow i un altra que rep un objecte Dictionary (on les Keys són els noms dels camps i els Values el valor).

Igual que la funció INS, aquesta també invalida la cache.

Com sempre el codi, primer el que rep el Dictionary:

public void DEL(Dictionary<string, string> Params)
{
    SqlCommand SqlComm = new SqlCommand();
    SqlParameter SqlParam;
    bool LocalConn;
    SqlConnection Conn = null;
    if (SQLConn == null)
    {
	LocalConn = true;
	Conn = new SqlConnection(CadConnBBDD);
	Conn.Open();
    }
    else
    {
	LocalConn = false;
	Conn = SQLConn;
    }

    SqlComm.Connection = Conn;
    if (SQLTrans != null) SqlComm.Transaction = SQLTrans;
    SqlComm.CommandType = CommandType.StoredProcedure;
    SqlComm.CommandText = spDEL;

    foreach (clsCamp Camp in ParamsDEL)
    {
	SqlParam = CreaParametre(Camp, false);
	if (Params.Keys.Contains<string>(Camp.NomCamp))
	{
	    if (string.IsNullOrEmpty(Params[Camp.NomCamp])) SqlParam.Value = DBNull.Value;
	    else SqlParam.Value = Params[Camp.NomCamp];
	}
	else SqlParam.Value = DBNull.Value;
	SqlComm.Parameters.Add(SqlParam);
    }

    SqlComm.ExecuteNonQuery();
    if (TeCache && AutoNetejaCache)
    {
	ClearCache();
    }
    if (LocalConn)
    {
	Conn.Close();
	Conn.Dispose();
	Conn = null;
    }
}

I després la versió DataRow:

public void DEL(DataRow DR)
{
    SqlCommand SqlComm = new SqlCommand();
    SqlParameter SqlParam;
    bool LocalConn;
    SqlConnection Conn = null;
    if (SQLConn == null)
    {
	LocalConn = true;
	Conn = new SqlConnection(CadConnBBDD);
	Conn.Open();
    }
    else
    {
	LocalConn = false;
	Conn = SQLConn;
    }

    SqlComm.Connection = Conn;
    if (SQLTrans != null) SqlComm.Transaction = SQLTrans;
    SqlComm.CommandType = CommandType.StoredProcedure;
    SqlComm.CommandText = spDEL;

    foreach (clsCamp Camp in ParamsDEL)
    {
	SqlParam = CreaParametre(Camp, false);
	if (DR.Table.Columns.Contains(Camp.NomCamp))
	{
	    if (DR.IsNull(Camp.NomCamp)) SqlParam.Value = DBNull.Value;
	    else SqlParam.Value = DR[Camp.NomCamp];
	}
	else SqlParam.Value = DBNull.Value;
	SqlComm.Parameters.Add(SqlParam);
    }

    SqlComm.ExecuteNonQuery();
    if (TeCache && AutoNetejaCache)
    {
	ClearCache();
    }
    if (LocalConn)
    {
	Conn.Close();
	Conn.Dispose();
	Conn = null;
    }
}

Pel·licula de diumenge a la tarda on el Jason Statham fa de lladre superprofessional al que els seus cutre-compinches el traicionen. Un cop mig recuperat (un superprofessional amb mitja recuperació té prou, la resta de mortals anem a la fisio durant anys...) decideix venjar-se. Durant el següent cop dels cutre-compinches es venja amb ajuda de la Jennifer Lopez, i com és superprofessional no hi ha res entre ells (ell ja està "casat") però com l'ha ajudat li dóna part del botí (com faria tothom). Distreu, és previsible, no es fa llarga, mola veure a dolents machacats, perfecte per matar una tarda.

Seguint amb la sèrie de la clsDades aquesta és la funció que s'encarrega d'actualitzar un registre a la BBDD.

Fa servir la SP UPD per fer-ho. Així que ha de fer servir la variable ParamsUPD per informar-ne els paràmetres. Existeix en 2 sabors diferents, un que rep un DataRow i un altra que rep un objecte Dictionary (on les Keys són els noms dels camps i els Values el valor).

Igual que la funció INS, aquesta també invalida la cache.

Com sempre el codi, primer el que rep el Dictionary:

public void UPD(Dictionary<string, string> Params)
{
    SqlCommand SqlComm = new SqlCommand();
    SqlParameter SqlParam;

    bool LocalConn;
    SqlConnection Conn = null;
    if (SQLConn == null)
    {
	LocalConn = true;
	Conn = new SqlConnection(CadConnBBDD);
	Conn.Open();
    }
    else
    {
	LocalConn = false;
	Conn = SQLConn;
    }
    SqlComm.Connection = Conn;
    if (SQLTrans != null) SqlComm.Transaction = SQLTrans;
    SqlComm.CommandType = CommandType.StoredProcedure;
    SqlComm.CommandText = spUPD;

    foreach (clsCamp Camp in ParamsUPD)
    {
	SqlParam = CreaParametre(Camp, false);
	if (Params.Keys.Contains<string>(Camp.NomCamp))
	{
	    if (string.IsNullOrEmpty(Params[Camp.NomCamp]))
	    {
		if (Camp.Nulable) SqlParam.Value = DBNull.Value;
		else
		{
		    Exception Ex = new Exception("El camp " + Camp.NomCamp + " no admet valors nulls");
		    throw Ex;
		}
	    }
	    else SqlParam.Value = Params[Camp.NomCamp];
	}
	else
	{
	    if (Camp.Nulable) SqlParam.Value = DBNull.Value;
	    else
	    {
		if (!Camp.Identitat)
		{
		    Exception Ex = new Exception("El camp " + Camp.NomCamp + " no admet valors nulls");
		    throw Ex;
		}
	    }
	}
	SqlParam.ParameterName = Prefix + Camp.NomCamp;
	SqlParam.Value = Params[Camp.NomCamp];
	SqlComm.Parameters.Add(SqlParam);
    }

    SqlComm.ExecuteNonQuery();

    if (TeCache && AutoNetejaCache)
    {
	ClearCache();
    }

    if (LocalConn)
    {
	Conn.Close();
	Conn.Dispose();
	Conn = null;
    }
}

I després la versió que rep un DataRow:

public void UPD(DataRow DR)
{
    SqlCommand SqlComm = new SqlCommand();
    SqlParameter SqlParam;

    bool LocalConn;
    SqlConnection Conn = null;
    if (SQLConn == null)
    {
	LocalConn = true;
	Conn = new SqlConnection(CadConnBBDD);
	Conn.Open();
    }
    else
    {
	LocalConn = false;
	Conn = SQLConn;
    }
    SqlComm.Connection = Conn;
    if (SQLTrans != null) SqlComm.Transaction = SQLTrans;
    SqlComm.CommandType = CommandType.StoredProcedure;
    SqlComm.CommandText = spUPD;

    foreach (clsCamp Camp in ParamsUPD)
    {
	SqlParam = CreaParametre(Camp, false);
	SqlParam.Value = DR[Camp.NomCamp];
	SqlComm.Parameters.Add(SqlParam);
    }


    SqlComm.ExecuteNonQuery();
    if (TeCache && AutoNetejaCache)
    {
	ClearCache();
    }
    

    if (LocalConn)
    {
	Conn.Close();
	Conn.Dispose();
	Conn = null;
    }
}

Aquest és el cinqué llibre de la serie dels reis maleïts. [Spoilers] Comença fent un resum de com acaba l'anterior rei, que a pesar de ser un bon rei va tenir mala sort, tant el clima (collites), fets (una horda de "pastorcillos"), i que va beure aigua en mal estat i la va palmar. Un cop liquidat l'anterior rei d'una forma algo ràpida (encara que és el protagonista del llibre anterior) es centra en el tonto que el succeeix i qui en realitat governa és Carlos de Valois. També hi ha tota una trama anglesa, que va prenent protagonisme i en la que es centra tota l'acció a partir la meitat del llibre. Tracta de la filla de Felip "el Hermoso" (el del primer llibre), que surt al primer llibre denunciant a les seves cunyades, i torna a aparèixer ara. Narra com aconsegueix aliats per destruir al seu marit Eduard II (gay total al llibre) i com finalment torna a Anglaterra, el deposa i corona al seu fill Eduard III. També narra com liquiden al rei empalant-lo amb un ferro roent. De fet és la mateixa història que a la serie "Un mundo sin fin", encara que allí pinten les coses diferents.

També apareix el Guccio i els Tolomei que tenen guardat el fill legitim del Turbulento i que el Guccio encara creu que és seu i que la Maria de Cressay no l'estima.

El llibre m'ha agradat molt, i tots els personatges estan molt ben tractats i no només això si no que són "de veritat".

Seguint amb la sèrie de la clsDades aquesta és la funció que s'encarrega d'insertar un registre a la BBDD.

Fa servir la SP INS per fer-ho. Així que ha de fer servir la variable ParamsINS per informar-ne els paràmetres. Existeix en 2 sabors diferents, un que rep un DataRow i un altra que rep un objecte Dictionary (on les Keys són els noms dels camps i els Values el valor). Ambdues quan hi ha una identitat en la taula on inserten recuperen el valor que s'ha generat.

Ja posats que hi ha informació sobre si un camp admet nulls o no, es fa aquesta verificació. El que no es mira és el tipus de dades del valor que passa per actualitzar.

Resaltar que aquesta funció invalida la cache de dades, aleshores si la clase fa servir la cache i està activada la auto-neteja aleshores buida la cache. Pot ser que no interessi netejar la cache cada cop, per exemple si hi ha molts inserts seguits, aleshores cal posar el "Autonetejar" a fals.

El codi de la versió DataRow:

public void INS(DataRow DR)
{
    SqlCommand SqlComm = new SqlCommand();
    SqlParameter SqlParam;
    Int64 ID = 0;

    bool LocalConn;
    SqlConnection Conn = null;
    if (SQLConn == null)
    {
	LocalConn = true;
	Conn = new SqlConnection(CadConnBBDD);
	Conn.Open();
    }
    else
    {
	LocalConn = false;
	Conn = SQLConn;
    }

    SqlComm.Connection = Conn;
    if (SQLTrans != null) SqlComm.Transaction = SQLTrans;
    SqlComm.CommandType = CommandType.StoredProcedure;
    SqlComm.CommandText = spINS;
    
    foreach (clsCamp Camp in ParamsINS)
    {
	SqlParam = CreaParametre(Camp, true);
	if (DR.Table.Columns.Contains(Camp.NomCamp))
	{
	    if (!DR.IsNull(Camp.NomCamp))
	    {
		if (Camp.Nulable) SqlParam.Value = DBNull.Value;
		else
		{
		    if (!Camp.Identitat)
		    {
			Exception Ex = new Exception("El camp " + Camp.NomCamp + " no admet valors nulls");
			throw Ex;
		    }
		}
	    }
	    else SqlParam.Value = DR[Camp.NomCamp];
	}
	else
	{   //Potser la taula té menys columnes que camps hi ha a la BBDD
	    if (Camp.Nulable) SqlParam.Value = DBNull.Value;
	    else
	    {
		if (!Camp.Identitat)
		{
		    Exception Ex = new Exception("El camp " + Camp.NomCamp + " no admet valors nulls");
		    throw Ex;
		}
	    }
	}
	SqlComm.Parameters.Add(SqlParam);
    }

    SqlComm.ExecuteNonQuery();

    if (TeCache && AutoNetejaCache)
    {
	ClearCache();
    }

    if (LocalConn)
    {
	Conn.Close();
	Conn.Dispose();
	Conn = null;
    }
    if (TeIdentitat)
    {
	//Cal vigilar que la columna identitat no sigui ReadOnly
	//DR.Table.Columns[Identitat].ReadOnly = false;
	ID = Int64.Parse(SqlComm.Parameters[Prefix + Identitat].Value.ToString());
	DR[Identitat] = ID;
    }
    DR.AcceptChanges();
}

La versió que fa servir el Dictionary retorna el ID generat en cas que hagi identitat.

public Int64 INS(Dictionary<string, string> Params)
{
    SqlCommand SqlComm = new SqlCommand();
    SqlParameter SqlParam;
    Int64 ID = 0;

    bool LocalConn;
    SqlConnection Conn = null;
    if (SQLConn == null)
    {
	LocalConn = true;
	Conn = new SqlConnection(CadConnBBDD);
	Conn.Open();
    }
    else
    {
	LocalConn = false;
	Conn = SQLConn;
    }
    
    SqlComm.Connection = Conn;
    if (SQLTrans != null) SqlComm.Transaction = SQLTrans;
    SqlComm.CommandType = CommandType.StoredProcedure;
    SqlComm.CommandText = spINS;

    foreach (clsCamp Camp in ParamsINS)
    {
	SqlParam = CreaParametre(Camp, true);
	if (Params.Keys.Contains<string>(Camp.NomCamp))
	{
	    if (string.IsNullOrEmpty(Params[Camp.NomCamp]))
	    {
		if (Camp.Nulable) SqlParam.Value = DBNull.Value;
		else
		{
		    Exception Ex = new Exception("El camp " + Camp.NomCamp + " no admet valors nulls");
		    throw Ex;
		}
	    }
	    else SqlParam.Value = Params[Camp.NomCamp];
	}
	else
	{
	    if (Camp.Nulable) SqlParam.Value = DBNull.Value;
	    else
	    {
		if (!Camp.Identitat)
		{
		    Exception Ex = new Exception("El camp " + Camp.NomCamp + " no admet valors nulls");
		    throw Ex;
		}
	    }
	}
	SqlComm.Parameters.Add(SqlParam);
    }

    SqlComm.ExecuteNonQuery();

    if (TeCache && AutoNetejaCache)
    {
	ClearCache();
    }

    if (LocalConn)
    {
	Conn.Close();
	Conn.Dispose();
	Conn = null;
    }
    if (TeIdentitat) ID = Int64.Parse(SqlComm.Parameters[Prefix + Identitat].Value.ToString());
    else ID = 0;
    return ID;
}