El sistema esta en una red WAM
7 sucursales...
en algunas ocaciones cuando todos los usuarios estan usando el sistema..
7 en cada modulo.. aproximadamente.
genera el problema de repetir sentencias.. en algunas ocaciones... a eso hay que sumarle
que la consulta demora 5 segundos en ser ejecutada... no usan las normas de IT adecuadas..
un ejemplo de codigo es este..
Código SQL
[-] Zquery1.Close;
Zquery1.SQL.Clear;
Zquery1.SQL.Add('INSERT INTO cuentabasica (Fecha,Tipo,No_Cuenta,Beneficiario,Debito,Credito,Descripción,Banco,ndoc)values('+#13+
char(39)+FCA+char(39)+','+char(39)+'DEP'+CHAR(39)+','+CHAR(39)+Edit11.Text+CHAR(39)+','+CHAR(39)+Edi t1.Text+CHAR(39)+','+#13+
char(39)+vlor5+char(39)+','+char(39)+'0.00'+CHAR(39)+','+CHAR(39)+Edit4.Text+CHAR(39)+','+char(39)+E dit2.Text+char(39)+','+#13+
char(39)+StringGRid1.Cells[1,1].ToLower+char(39)+')');
Zquery1.ExecSQL;
Zquery1.Close;
// esta a veces la repite hasta 40 veces
for ij := 1 to stringGrid2.RowCount -2 do
begin
ZQuery1.Close;
ZQuery1.SQL.Clear;
ZQuery1.SQL.Add('insert into cuentasbasic(doc,Fecha,Cta_usuario,Nombre,Debito,Credito,Descripción) values('+#13+
':Cheque_No,:Fecha,:id_Cuenta,:Nombre,eb,:Hab,escripción)');
ZQuery1.ParamByName('Cheque_No').AsString:=stringGrid2.Cells[0, ij];
ZQuery1.ParamByName('Fecha').AsString:=stringGrid2.Cells[1, ij];
ZQuery1.ParamByName('id_Cuenta').AsString:=stringGrid2.Cells[2, ij];
ZQuery1.ParamByName('Nombre').AsString:=stringGrid2.Cells[3, ij];
ZQuery1.ParamByName('Deb').AsString:=stringGrid2.Cells[4, ij];
ZQuery1.ParamByName('Hab').AsString:=stringGrid2.Cells[5, ij];
ZQuery1.ParamByName('Descripción').AsString:=stringGrid2.Cells[6, ij];
// ejecutarla
ZQuery1.ExecSQL;
end;
// esta sentencia la repite hasta 120 veces.. siendo que el rowcount es de 10
esto solo es en ocaciones....
cuando el sistema es saturado de información...