public int fncAlta() { string vNumSer = SQLDataAccess.GenTraeNumSerie(cParamXml.NSerPedProv, true, cParamXml.strConec); string vValores = cUtil.fncCargaValoresSQLDefault(vTabla, cParamXml.strConec, "Id", "NumPed,Empresa,Estado,FechaPedido", vNumSer.ToString() + "," + cParamXml.Emp + ",P," + DateTime.Now.ToShortDateString()); string vCampos = cUtil.Piece(vValores, "#", 2); string vValoresDef = cUtil.Piece(vValores, "#", 5); string vSql = "INSERT INTO " + vTabla + vCampos + " " + vValoresDef; int vIdentity = 0; try { vIdentity = SQLDataAccess.GEN_ExecuteScalarIdentity(vSql, cParamXml.strConec); _Id = vIdentity; //_NumPed = 0; _FechaPedido = DateTime.Now; _FechaEntrega = DateTime.Now; _CodProv = ""; _NomProv = ""; _Dirección = ""; _Población = ""; _Provincia = ""; _CP = ""; _FPago = ""; _Divisa = ""; _SuPedido = ""; } catch { } return(vIdentity); }
public int fncAlta() { string vNumSer = SQLDataAccess.GenTraeNumSerie(cParamXml.NSerAlbProv, true, cParamXml.strConec); string vValores = cUtil.fncCargaValoresSQLDefault(vTabla, cParamXml.strConec, "Id", "NumAlb,Empresa,Estado,FechaAlbaran", vNumSer.ToString() + "," + cParamXml.Emp + ",P," + DateTime.Now.ToShortDateString()); string vCampos = cUtil.Piece(vValores, "#", 2); string vValoresDef = cUtil.Piece(vValores, "#", 5); string vSql = "INSERT INTO " + vTabla + vCampos + " " + vValoresDef; int vIdentity = 0; try { vIdentity = SQLDataAccess.GEN_ExecuteScalarIdentity(vSql, cParamXml.strConec); _Id = vIdentity; _FechaAlbaran = DateTime.Now; _CodProv = ""; _NombreProv = ""; _RecepcionadoPor = ""; _NumPed = ""; _SuAlbaran = ""; } catch { } return(vIdentity); }
public int fncAlta() { //int vNumSer = cUtil.fncTraeNumSerIntDbf("claves", "NPEDCLI", true, cParamXml.strOleDBConecDbf); string vNumSerie = SQLDataAccess.GenTraeNumSerie(cParamXml.NSerPrep, true, cParamXml.strConec); int vNumSer = Convert.ToInt32(vNumSerie); string vValores = cUtil.fncCargaValoresSQLDefault(vTabla, cParamXml.strConec, "Id,Estado", "NumPrep,Empresa,FechaPrep", vNumSer.ToString() + "," + cParamXml.Emp + "," + DateTime.Now.ToShortDateString()); string vCampos = cUtil.Piece(vValores, "#", 2); string vValoresDef = cUtil.Piece(vValores, "#", 5); string vSql = "INSERT INTO " + vTabla + vCampos + " " + vValoresDef; int vIdentity = 0; try { vIdentity = SQLDataAccess.GEN_ExecuteScalarIdentity(vSql, cParamXml.strConec); _Id = vIdentity; _Estado = "P"; //_NumPed = 0; _FechaPrep = DateTime.Now; _FechaEntrega = DateTime.Now; _CodCli = ""; _NomCli = ""; _Dirección = ""; _Población = ""; _Provincia = ""; _CP = ""; _FPago = ""; _Divisa = ""; _SuPedido = ""; _DtoPP = 0; _DtoESP = 0; } catch { } return(vIdentity); }
public int fncAlta() { string vNumSerie = SQLDataAccess.GenTraeNumSerie(cParamXml.NSerOrdProd, true, cParamXml.strConec); return(fncAlta(vNumSerie)); }
public bool fncAltaCab(ref int vPrep) { bool vOk = false; try { string vTabla = "GC_CabPrepEntregas"; string vNumSerie = SQLDataAccess.GenTraeNumSerie(cParamXml.NSerPrep, true, cParamXml.strConec); int vNumSer = Convert.ToInt32(vNumSerie); vPrep = vNumSer; string vValoresCab = cUtil.fncCargaValoresSQL(vTabla, cParamXml.strConec, "Id"); int vNumCampos = Convert.ToInt16(cUtil.Piece(vValoresCab, "#", 3)); string vCampos = cUtil.Piece(vValoresCab, "#", 2); vValoresCab = cUtil.Piece(vValoresCab, "#", 1); string vCamposRelp = vCampos.Substring(1, vCampos.Length - 2); string[] vDatos = new string[vNumCampos]; for (int i = 0; i < vNumCampos; i++) { vDatos[i] = ""; } vDatos[1] = _Empresa.ToString(); vDatos[2] = vNumSer.ToString(); vDatos[3] = _Estado; vDatos[4] = _FechaPrep.ToShortDateString(); vDatos[5] = _FechaEntrega.ToShortDateString(); vDatos[6] = _CodCli; vDatos[7] = _NomCli; vDatos[8] = _Dirección; vDatos[9] = _Población; vDatos[10] = _Provincia; vDatos[11] = _CP; vDatos[12] = _FPago; vDatos[13] = _Divisa; vDatos[14] = _SuPedido; vDatos[15] = _DtoPP.ToString().Replace(",", "."); vDatos[16] = _DtoESP.ToString().Replace(",", "."); vDatos[17] = _Ent_Dirección; vDatos[18] = _Ent_Población; vDatos[19] = _Ent_Provincia; vDatos[20] = _Ent_CP; vDatos[21] = _Ent_ID.ToString(); string vValoresNew = cUtil.fncReplaceValoresSQL(vDatos, vValoresCab, vNumCampos); string vSql = "INSERT INTO " + vTabla + vCampos + " " + vValoresNew; int vCor = SQLDataAccess.GEN_ExecuteNonQuery(vSql, cParamXml.strConecProduc_Prueb); if (vCor == 1) { vOk = true; } else { _Error = "Error al dar de Alta"; } } catch (Exception ex) { _Error = ex.Message; vOk = false; } return(vOk); }
//public bool fncBaja(string vID) //{ // bool vOk = false; // string vSql = ""; // string vWhere = " Id = " + _Id; // vSql = cConstantes.SQL_UP_Delete; // vSql = vSql.Replace("[?1]", vWhere); // vSql = vSql.Replace("[?99]", vTabla); // int viOk = SQLDataAccess.GEN_ExecuteNonQuery(vSql, cParamXml.strConecProduc_Prueb); // if (viOk == 1) // { // vOk = true; // aCampoModif = ""; // aValor = ""; // aValorAnt = ""; // } // return vOk; //} //public int fncAlta() //{ // string vValores = cUtil.fncCargaValoresSQLDefault(vTabla, "", "Id", "Empresa,NumPed,LinPed", cParamXml.Emp + "," + _NumPed + ","); // string vCampos = cUtil.Piece(vValores, "#", 2); // string vValoresDef = cUtil.Piece(vValores, "#", 5); // string vSql = "INSERT INTO " + vTabla + vCampos + " " + vValoresDef; // int vIdentity = 0; // try // { // vIdentity = SQLDataAccess.GEN_ExecuteScalarIdentity(vSql, cParamXml.strConecProduc_Prueb); // _Id = vIdentity; // _NumPed = "0"; // _LinPed = 0; // _Producto = ""; // _Descripción = ""; // _Cantidad = 0; // _CantidadEntregada = 0; // _IVA = 0; // _Precio = 0; // _DTO = 0; // } // catch { } // return vIdentity; //} public bool fncAltaLin() { bool vOk = false; try { string vTabla = "GC_AlbProv"; string vValoresCab = cUtil.fncCargaValoresSQL(vTabla, cParamXml.strConec, "Id"); int vNumCampos = Convert.ToInt16(cUtil.Piece(vValoresCab, "#", 3)); string vCampos = cUtil.Piece(vValoresCab, "#", 2); vValoresCab = cUtil.Piece(vValoresCab, "#", 1); string vCamposRelp = vCampos.Substring(1, vCampos.Length - 2); string[] vDatos = new string[vNumCampos]; for (int i = 0; i < vNumCampos; i++) { vDatos[i] = ""; } if (_NumSerie == "") { _NumSerie = SQLDataAccess.GenTraeNumSerie("ProductoLote", true, cParamXml.strConec); } int vLin = _Linea; if (vLin == 0) { vLin = fncNumLinea(_NumAlb.ToString()); } vDatos[1] = _Empresa.ToString(); vDatos[2] = _NumAlb.ToString(); vDatos[3] = vLin.ToString(); vDatos[4] = _FechaEntrega.ToShortDateString(); vDatos[5] = _Producto; vDatos[6] = _Descripción; vDatos[7] = _CodProv; vDatos[8] = _NombreProv; vDatos[9] = _Cantidad.ToString().Replace(",", "."); vDatos[10] = _Lote; vDatos[11] = _RecepcionadoPor; vDatos[12] = _Grabado.ToString().Replace(",", "."); vDatos[16] = _NumSerie; string vValoresNew = cUtil.fncReplaceValoresSQL(vDatos, vValoresCab, vNumCampos); string vSql = "INSERT INTO " + vTabla + vCampos + " " + vValoresNew; int vCor = SQLDataAccess.GEN_ExecuteNonQuery(vSql, cParamXml.strConecProduc_Prueb); if (vCor == 1) { vOk = true; } else { _Error = "Error al dar de Alta"; } } catch (Exception ex) { _Error = ex.Message; vOk = false; } return(vOk); }
private void sbrGrabaMov() { if (cParamXml.ActProv == "False") { return; } tiProces.Enabled = false; lbMen.Text = "Grabando Movimientos de Proveedor"; Application.DoEvents(); DataTable dt = new DataTable(); string vSql = cConstantes.SQL_AlbCompra_Pend; vSql = vSql.Replace("[?vbCr]", cConstantes.vbCtr.ToString()); vSql = vSql.Replace("[?vbLf]", cConstantes.vbLF.ToString()); vSql = vSql.Replace("[?Emp]", cParamXml.Emp.ToString()); vSql = vSql.Replace("[?Grabado]", "= 0 "); dt = SQLDataAccess.Trae(vSql, cUtil.SQLConec(cParamXml.strConecProduc_Prueb)); cAlbaranesCompra.LinAlbCompra oLinAlb = new cAlbaranesCompra.LinAlbCompra(); foreach (DataRow dr in dt.Rows) { string vNumAlb = dr["NumAlb"].ToString(); string vLinAlb = dr["Linea"].ToString(); string vNumPed = dr["NumPed"].ToString(); string vProd = dr["Producto"].ToString(); string vNomProd = dr["Descripción"].ToString(); string vCan = dr["Cantidad"].ToString(); string vLote = dr["Lote"].ToString(); string vRecep = dr["RecepcionadoPor"].ToString(); string vCert = dr["Cert"].ToString(); string vUbi = dr["Ubi"].ToString(); string vSerie = dr["NumSerie"].ToString(); int vId = Convert.ToInt32(dr["Id"].ToString()); if (vCan == "") { vCan = "0"; } decimal vCanEnt = Convert.ToDecimal(vCan); oLinAlb.Id = vId; if (vCert == "") { oLinAlb.fncGrabaCampo("Grabado", "14"); lbMen.Text = ""; Application.DoEvents(); tiProces.Enabled = true; return; } if (vLote == "") { oLinAlb.fncGrabaCampo("Grabado", "15"); lbMen.Text = ""; Application.DoEvents(); tiProces.Enabled = true; return; } //if (vRecep == "") //{ // oLinAlb.fncGrabaCampo("Grabado", "16"); // lbMen.Text = ""; // Application.DoEvents(); // tiProces.Enabled = true; // return; //} //Busco el Producto en anexos string vWhere = " Empresa = " + cParamXml.Emp + " and Producto = N'" + vProd + "'"; string vProdAnex = cUtil.fncTraeCampo("Producto", "GC_ProductoAnexos", vWhere, "", cParamXml.strConecProduc_Prueb, "SQL", true); if (vProdAnex == "***Inex***") { oLinAlb.fncGrabaCampo("Grabado", "12"); } else { //Crear movimientos de producto y materia prima cMovimientos.Articulo oMov = new cMovimientos.Articulo(); cProductoLote oPL = new cProductoLote(); //Movimiento de producto if (oMov.fncAlta(cParamXml.Emp, "Entrada", DateTime.Now, DateTime.Now, cParamXml.AlmacenMat, vProd, vNomProd, vCan, vNumAlb, "", vUbi, vLote)) { oLinAlb.fncGrabaCampo("Grabado", "1"); string vNumSer = vSerie; if (vNumSer == "") { vNumSer = SQLDataAccess.GenTraeNumSerie("ProductoLote", true, cParamXml.strConec); } oPL.fncAlta(cParamXml.Emp, vNumSer, vProd, vLote, vNumAlb, Convert.ToInt32(vLinAlb)); } else { oLinAlb.fncGrabaCampo("Grabado", "11"); } } } lbMen.Text = ""; Application.DoEvents(); tiProces.Enabled = true; }
private void sbrProceso() { if (cParamXml.ActProv == "False") { return; } string vSql = cConstantes.SQL_Insert_Cab_AlbProv; vSql = vSql.Replace("[?vbCr]", cConstantes.vbCtr.ToString()); vSql = vSql.Replace("[?vbLf]", cConstantes.vbLF.ToString()); SQLDataAccess.GEN_ExecuteNonQuery(vSql, cParamXml.strConec); tiProces.Enabled = false; lbMen.Text = "Procesando Albaranes de Proveedor"; Application.DoEvents(); DataTable dt = new DataTable(); string vNumSerie = SQLDataAccess.GenTraeNumSerie(cParamXml.NSerOrdAlbProv, false, cParamXml.strConec); vSql = cConstantes.SQL_Alb_Dbf; vSql = vSql.Replace("[?vbCr]", cConstantes.vbCtr.ToString()); vSql = vSql.Replace("[?vbLf]", cConstantes.vbLF.ToString()); vSql = vSql.Replace("[?NumAlb]", vNumSerie); lbMen.Text = "Procesando Albaranes de Proveedor: Captura de Datos"; lbError.Text = vSql; Application.DoEvents(); try { dt = SQLDataAccess.TraeDBF(vSql, cUtil.DBFConec(cParamXml.strOleDBConecDbf)); cAlbaranesCompra.LinAlbCompra oLinAlb = new cAlbaranesCompra.LinAlbCompra(); lbMen.Text = "Procesando Albaranes de Proveedor: Proceso"; Application.DoEvents(); foreach (DataRow dr in dt.Rows) { string vNumAlb = dr["nnumalb"].ToString(); string vNumPed = dr["nnumped"].ToString(); string vProd = dr["CREF"].ToString(); string vNomProd = dr["cdetalle"].ToString(); string vCan = dr["NCANENT"].ToString(); string vFecha = dr["DFecAlb"].ToString(); string vProv = dr["ccodpro"].ToString(); string vNomProv = cProveedores.fncTraeC("cnompro", vProv); string vLote = dr["cprop2"].ToString(); string vLinea = dr["nlinea"].ToString(); if (vLinea == "") { vLinea = "0"; } if (vCan == "") { vCan = "0"; } decimal vCanEnt = Convert.ToDecimal(vCan); string vNumSer = SQLDataAccess.GenTraeNumSerie("ProductoLote", true, cParamXml.strConec); oLinAlb.Empresa = cParamXml.Emp; oLinAlb.NumAlb = vNumAlb; oLinAlb.Linea = Convert.ToInt16(vLinea); oLinAlb.FechaEntrega = Convert.ToDateTime(vFecha); oLinAlb.Producto = vProd; oLinAlb.Descripción = vNomProd; oLinAlb.CodProv = vProv; oLinAlb.NombreProv = vNomProv; oLinAlb.Cantidad = vCanEnt; oLinAlb.Lote = vLote; oLinAlb.RecepcionadoPor = ""; oLinAlb.NumSerie = vNumSer; oLinAlb.Grabado = 10; lbMen.Text = "Procesando Albaranes de Proveedor: " + vNumAlb; Application.DoEvents(); if (oLinAlb.fncAltaLin()) { SQLDataAccess.GenSetNumSerie(cParamXml.NSerOrdAlbProv, vNumAlb, cParamXml.strConec); } } } catch (Exception ex) { lbError.Text = DateTime.Now.ToLongDateString() + "-- " + ex.Message; } lbMen.Text = ""; Application.DoEvents(); tiProces.Enabled = true; }
private void sbrProcesoPedCli() { if (cParamXml.ActPedCli == "False") { return; } tiProces.Enabled = false; lbMen.Text = "Procesando Pedidos de Cliente"; Application.DoEvents(); DataTable dt = new DataTable(); string vNumSerie = SQLDataAccess.GenTraeNumSerie(cParamXml.NSerPedCli, false, cParamXml.strConec); string vSql = cConstantes.SQL_CabPed_Dbf; vSql = vSql.Replace("[?vbCr]", cConstantes.vbCtr.ToString()); vSql = vSql.Replace("[?vbLf]", cConstantes.vbLF.ToString()); vSql = vSql.Replace("[?NumPed]", vNumSerie); try { dt = SQLDataAccess.TraeDBF(vSql, cUtil.DBFConec(cParamXml.strOleDBConecDbf)); cPedidosVenta.CabVenta oCabPed = new cPedidosVenta.CabVenta(); cPedidosVenta.LinVenta oLinPed = new cPedidosVenta.LinVenta(); string vNumPed = ""; string vErr = ""; foreach (DataRow dr in dt.Rows) { vNumPed = dr["nnumped"].ToString(); if (oCabPed.fncAlta(dr)) { string vSql2 = cConstantes.SQL_LinPed_Dbf; vSql2 = vSql2.Replace("[?vbCr]", cConstantes.vbCtr.ToString()); vSql2 = vSql2.Replace("[?vbLf]", cConstantes.vbLF.ToString()); vSql2 = vSql2.Replace("[?NumPed]", vNumPed); DataTable dt2 = SQLDataAccess.TraeDBF(vSql2, cUtil.DBFConec(cParamXml.strOleDBConecDbf)); foreach (DataRow dr2 in dt2.Rows) { //DataRow dr2 = dt2.Rows[0]; if (!oLinPed.fncAltaLin(dr2)) { vErr = oLinPed.Error; lbError.Text = vErr; Application.DoEvents(); Thread.Sleep(5000); } } } else { vErr = oCabPed.Error; lbError.Text = vErr; Application.DoEvents(); Thread.Sleep(5000); } SQLDataAccess.GenSetNumSerie(cParamXml.NSerPedCli, vNumPed, cParamXml.strConec); } } catch (Exception ex) { lbError.Text = DateTime.Now.ToLongDateString() + "-- " + ex.Message; } lbMen.Text = ""; Application.DoEvents(); tiProces.Enabled = true; }
private void sbrProcesoCli() { if (cParamXml.ActCli == "False") { return; } tiProces.Enabled = false; lbMen.Text = "Procesando Albaranes de Cliente"; Application.DoEvents(); DataTable dt = new DataTable(); string vNumSerie = SQLDataAccess.GenTraeNumSerie(cParamXml.NSerOrdAlbCli, false, cParamXml.strConec); string vSql = cConstantes.SQL_Alb_Cli_Dbf; vSql = vSql.Replace("[?vbCr]", cConstantes.vbCtr.ToString()); vSql = vSql.Replace("[?vbLf]", cConstantes.vbLF.ToString()); vSql = vSql.Replace("[?NumAlb]", vNumSerie); try { dt = SQLDataAccess.TraeDBF(vSql, cUtil.DBFConec(cParamXml.strOleDBConecDbf)); cAlbaranesVenta.LinAlbVenta oLinAlb = new cAlbaranesVenta.LinAlbVenta(); foreach (DataRow dr in dt.Rows) { string vNumAlb = dr["nnumalb"].ToString(); string vNumPed = dr["nnumped"].ToString(); string vProd = dr["CREF"].ToString(); string vNomProd = dr["cdetalle"].ToString(); string vCan = dr["NCANENT"].ToString(); string vFecha = dr["DFecAlb"].ToString(); string vCli = dr["ccodcli"].ToString(); string vNomCli = cClientes.fncTraeC("cnomcli", vCli); string vLote = dr["cprop2"].ToString(); string vLinea = dr["nlinea"].ToString(); if (vLinea == "") { vLinea = "0"; } if (vCan == "") { vCan = "0"; } decimal vCanEnt = Convert.ToDecimal(vCan); oLinAlb.Empresa = cParamXml.Emp; oLinAlb.NumAlb = vNumAlb; oLinAlb.Linea = Convert.ToInt16(vLinea); oLinAlb.FechaEntrega = Convert.ToDateTime(vFecha); oLinAlb.Producto = vProd; oLinAlb.Descripción = vNomProd; oLinAlb.CodCli = vCli; oLinAlb.NombreCli = vNomCli; oLinAlb.Cantidad = vCanEnt; oLinAlb.Lote = vLote; oLinAlb.Grabado = 10; if (oLinAlb.fncAltaLin()) { SQLDataAccess.GenSetNumSerie(cParamXml.NSerOrdAlbCli, vNumAlb, cParamXml.strConec); } } } catch (Exception ex) { lbError.Text = DateTime.Now.ToLongDateString() + "-- " + ex.Message; } lbMen.Text = ""; Application.DoEvents(); tiProces.Enabled = true; }