private void _Mtd_CargarCombos() { try { CLASES._Cls_Varios_Metodos _Cls_Varios = new T3.CLASES._Cls_Varios_Metodos(true); //_Str_SentenciaSQL = "select distinct cvendedor,rtrim(cname) as cname from VST_VENDEDORESDOCSALCOBRO where ccompany='" + Frm_Padre._Str_Comp + "' and cfacturarela is null"; //Antes/////_Str_SentenciaSQL = "select distinct cvendedor,CVENDEDOR+' - '+rtrim(cname) as cname from VST_VENDEDORESDOCSALCOBRO where ccompany='" + Frm_Padre._Str_Comp + "' and cfacturarela=0"; //_Str_SentenciaSQL = "select cvendedor,CVENDEDOR+' - '+rtrim(cname) as cname from TVENDEDOR where ccompany='" + Frm_Padre._Str_Comp + "' and c_tipo_vend=1 AND c_activo='1' order by cvendedor"; _Str_SentenciaSQL = "SELECT DISTINCT cvendedor,cvendedor+' - '+rtrim(cname) as cname FROM dbo.VST_VENDEDORCHEQALCOBRO WHERE ccompany='" + Frm_Padre._Str_Comp + "' AND ISNULL(cfacturarela,0)=0"; _Str_SentenciaSQL += " UNION "; _Str_SentenciaSQL += "SELECT DISTINCT cvendedor,cvendedor+' - '+rtrim(cname) as cname FROM dbo.VTS_VENDEDORFACTALCOBRO WHERE cgroupcomp='" + Frm_Padre._Str_GroupComp + "' AND ccompany='" + Frm_Padre._Str_Comp + "' AND ISNULL(cfacturarela,0)=0"; _Str_SentenciaSQL += " UNION "; _Str_SentenciaSQL += "SELECT DISTINCT cvendedor,cvendedor+' - '+rtrim(cname) as cname FROM dbo.VST_VENDEDORNCALCOBRO WHERE ccompany='" + Frm_Padre._Str_Comp + "' AND ISNULL(cfacturarela,0)=0"; _Str_SentenciaSQL += " UNION "; _Str_SentenciaSQL += "SELECT DISTINCT cvendedor,cvendedor+' - '+rtrim(cname) as cname FROM dbo.VST_VENDEDORNDALCOBRO WHERE ccompany='" + Frm_Padre._Str_Comp + "' AND ISNULL(cfacturarela,0)=0"; _DS_DataSet = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_SentenciaSQL); _Cls_Varios._Mtd_CargarCombo(_Cmb_Vendedor, _DS_DataSet, "cname", "cvendedor"); _Str_SentenciaSQL = "select distinct cguiadesp from VST_GUIADESPALCOBRO where cgroupcomp='" + Frm_Padre._Str_GroupComp + "' and ccompany='" + Frm_Padre._Str_Comp + "' and cfacturarela is null"; _DS_DataSet = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_SentenciaSQL); _Cls_Varios._Mtd_CargarCombo(_Cmb_Guia, _DS_DataSet, "cguiadesp", "cguiadesp"); _Str_SentenciaSQL = "EXEC PA_DIARUTAALCOBRO '" + Frm_Padre._Str_Comp + "','" + Frm_Padre._Str_GroupComp + "',NULL,NULL,NULL"; _DS_DataSet = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_SentenciaSQL); _Cls_Varios._Mtd_CargarCombo(_Cmb_DiaRuta, _DS_DataSet, "CDIARUTA", "CDIARUTA"); } catch { } }
private void _Bt_Aceptar_Click(object sender, EventArgs e) { CLASES._Cls_Varios_Metodos _Cls_Varios = new T3.CLASES._Cls_Varios_Metodos(true); if (_Cls_Varios._Mtd_VerificarClaveUsuarioFirma(_Txt_Clave.Text, "F_CONTEOINVTARJ_INV")) { if (!_Mtd_SePuedeIniciarConteo()) { this.Close(); return; } Cursor = Cursors.WaitCursor; string _Str_Cadena = ""; _Dg_Grid.Rows.Cast <DataGridViewRow>().Where(x => Convert.ToString(x.Cells["Select"].Value) == "1").ToList().ForEach(Fila => { if (_Mtd_ExistProducto(Convert.ToString(Fila.Cells["cproductom"].Value).Trim(), Convert.ToString(Fila.Cells["cidproductod"].Value).Trim())) { _Mtd_AgregarProducto(Fila.Cells["id_tarjetainv"].Value.ToString().Trim()); } else { _Str_Cadena = "Update TINVFISICOD set cnousada='1' where ccompany='" + Frm_Padre._Str_Comp + "' and id_tarjetainv='" + Convert.ToString(Fila.Cells["id_tarjetainv"].Value).Trim() + "'"; Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Cadena); } } ); _Dg_Grid.Rows.Cast <DataGridViewRow>().Where(x => Convert.ToString(x.Cells["Select"].Value) != "1").ToList().ForEach(Fila => { _Str_Cadena = "Update TINVFISICOD set cnousada='0' where ccompany='" + Frm_Padre._Str_Comp + "' and id_tarjetainv='" + Convert.ToString(Fila.Cells["id_tarjetainv"].Value).Trim() + "'"; Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Cadena); } ); _Str_Cadena = "Update TINVFISICOM set ciniciado='1' where ccompany='" + Frm_Padre._Str_Comp + "'"; Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Cadena); if ((Frm_Padre)this.MdiParent != null) { System.Threading.ThreadPool.QueueUserWorkItem(((Frm_Padre)this.MdiParent)._Frm_Contenedor._async_Default); } if (_Dg_Productos.RowCount > 0) { _Pnl_Productos.Visible = true; } else { Cursor = Cursors.Default; Frm_ConteoInventario _Frm = new Frm_ConteoInventario(); _Frm.MdiParent = this.MdiParent; _Frm.Dock = DockStyle.Fill; _Frm.Show(); this.Close(); } } else { MessageBox.Show(this, "Clave incorrecta!!!", "Verificar", MessageBoxButtons.OK, MessageBoxIcon.Exclamation); _Txt_Clave.Focus(); _Txt_Clave.Select(0, _Txt_Clave.Text.Length); } }
private void _Bt_AbrirConteo_Click(object sender, EventArgs e) { CLASES._Cls_Varios_Metodos myUtilidad = new T3.CLASES._Cls_Varios_Metodos(true); if (myUtilidad._Mtd_ObtenerUsuarioFirma(Frm_Padre._Str_Use) == "1" & myUtilidad._Mtd_UsuarioProceso(Frm_Padre._Str_Use, "F_IMPRESION_TARJETA")) { if (!_Mtd_SePuedeIniciarConteo()) { return; } string _Str_Cadena = "Select cimpreso,ciniciado from TINVFISICOM where ccompany='" + Frm_Padre._Str_Comp + "'"; DataSet _Ds = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_Cadena); if (_Ds.Tables[0].Rows.Count > 0) { if (_Ds.Tables[0].Rows[0][0].ToString().Trim() == "1") { if (_Ds.Tables[0].Rows[0][1].ToString().Trim() == "1") { Frm_ConteoInventario _Frm = new Frm_ConteoInventario(); if (!_Mtd_AbiertoOno(_Frm)) { _Frm.MdiParent = this.MdiParent; _Frm.Dock = DockStyle.Fill; _Frm.Show(); this.Close(); } else { _Frm.Dispose(); } } else { Frm_VerificacionTarjetas _Frm = new Frm_VerificacionTarjetas(); if (!_Mtd_AbiertoOno(_Frm)) { _Frm.MdiParent = this.MdiParent; _Frm.Dock = DockStyle.Fill; _Frm.Show(); this.Close(); } else { _Frm.Dispose(); } } } else { MessageBox.Show("Las tarjetas aún no han sido impresas. No podra realizar operaciones en este módulo", "Información", MessageBoxButtons.OK, MessageBoxIcon.Information); } } else { MessageBox.Show("Las tarjetas aún no han sido creadas. No podra realizar operaciones en este módulo", "Información", MessageBoxButtons.OK, MessageBoxIcon.Information); } } else { MessageBox.Show("Su usuario no posee permiso para entrar en este módulo", "Acceso denegado", MessageBoxButtons.OK, MessageBoxIcon.Stop); } }
private void _Mtd_CargarComboVendedor() { CLASES._Cls_Varios_Metodos _Cls_Varios = new T3.CLASES._Cls_Varios_Metodos(true); //_Str_SentenciaSQL = "select distinct cvendedor,rtrim(cname) as cname from VST_T3_FACTURASALCOBRO where ccompany='" + Frm_Padre._Str_Comp + "' and c_enmanosvende='1'"; //_Str_SentenciaSQL = "select distinct CVENDEDOR,rtrim(CVENDEDOR)+' - '+rtrim(cname) as cname from VST_T3_FACTURASALCOBRO where ccompany='" + Frm_Padre._Str_Comp + "' and c_enmanosvende='1'"; _Str_SentenciaSQL = "EXEC PA_FACTURASALCOBROVENDEDORES '" + Frm_Padre._Str_Comp + "','" + Frm_Padre._Str_GroupComp + "',0,1,0"; //_Str_SentenciaSQL = "select cvendedor,CVENDEDOR+' - '+rtrim(cname) as cname from TVENDEDOR where ccompany='" + Frm_Padre._Str_Comp + "' and c_tipo_vend=1 AND c_activo='1' order by cvendedor"; _DS_DataSet = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_SentenciaSQL); _Cls_Varios._Mtd_CargarCombo(_Cmb_VendedorFMV, _DS_DataSet, "cname", "cvendedor"); //_Str_SentenciaSQL = "select distinct cdiaruta from VST_DIARUTAALCOBRO where ccompany='" + Frm_Padre._Str_Comp + "' and c_enmanosvende='1'"; _Str_SentenciaSQL = "EXEC PA_DIARUTAALCOBRO '" + Frm_Padre._Str_Comp + "','" + Frm_Padre._Str_GroupComp + "',0,1,0"; _DS_DataSet = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_SentenciaSQL); _Cls_Varios._Mtd_CargarCombo(_Cmb_DiaRutaFMV, _DS_DataSet, "cdiaruta", "cdiaruta"); }
private void Frm_CategProvee_Activated(object sender, EventArgs e) { _Mtd_Cargar(); _Er_Error.Dispose(); CONTROLES._Ctrl_Buscar._frm_Formulario = this; CONTROLES._Ctrl_Buscar._Str_Cadena_Consulta_Formato = "Select ccatproveedor as Código,cnombre as Descripción from TCATPROVEEDOR"; CONTROLES._Ctrl_Buscar._Str_Cadena_Consulta = "Select ccatproveedor,cnombre,ctcount,ctretencion,ctcountc,cglobal from TCATPROVEEDOR"; //CONTROLES._Ctrl_Buscar._Str_Cadena_Consulta_Where = "c_id_departamento"; CONTROLES._Ctrl_Buscar._Str_Tabla = "TCATPROVEEDOR"; CONTROLES._Ctrl_Buscar._Str_Where_Vista_Grid = "cdelete='0'"; //------------------------------------------------------- _Ctrl_Controles[0] = _Txt_Cod; _Ctrl_Controles[1] = _Txt_Des; _Ctrl_Controles[2] = _Cbox_Cuenta; _Ctrl_Controles[3] = _Cbox_Contra; _Ctrl_Controles[4] = _Cbox_TipPro; //------------------------------------------------------- _Str_Campos[0] = "ccatproveedor"; _Str_Campos[1] = "cnombre"; _Str_Campos[2] = "ctcount"; _Str_Campos[3] = "ctcountc"; _Str_Campos[4] = "cglobal"; //------------------------------------------------------ _Str_Where[0] = "ccatproveedor"; //------------------------------------------------------- _Str_NoRep[0] = "0"; //------------------------------------------------------- _Str_Deshabi[0] = "0"; //------------------------------------------------------- _Int_CodDes[0] = 0; _Int_CodDes[1] = 1; //------------------------------------------------------- CONTROLES._Ctrl_Buscar._Ctrl_Controles = _Ctrl_Controles; CONTROLES._Ctrl_Buscar._Str_Campos = _Str_Campos; CONTROLES._Ctrl_Buscar._Str_Cadena_Consulta_Where = _Str_Where; CONTROLES._Ctrl_Buscar._Er_Control_Error = _Er_Error; CONTROLES._Ctrl_Buscar._Dg_Datagrid = _Dg_Grid; CONTROLES._Ctrl_Buscar._Tb_Tab = _Tb_Tab; CONTROLES._Ctrl_Buscar._Str_NoseDebeRepetir = _Str_NoRep; CONTROLES._Ctrl_Buscar._Int_Codigo_Descripcion = _Int_CodDes; CONTROLES._Ctrl_Buscar._Bl_Modifi = false; CONTROLES._Ctrl_Buscar._Int_Foco = 5; CONTROLES._Ctrl_Buscar._txt_ExistForm.Text = "Abierto"; CONTROLES._Ctrl_Buscar._Bl_Especial = false; CONTROLES._Ctrl_Buscar._Str_Deshabilitados = _Str_Deshabi; CONTROLES._Ctrl_Buscar._Txt_TpoFind.Text = "N"; CLASES._Cls_Varios_Metodos _Cls_CL = new T3.CLASES._Cls_Varios_Metodos(_Ctrl_Controles); _Cls_CL._Mtd_Foco(); }
private void Frm_Zonadeventas_Activated(object sender, EventArgs e) { _Ctrl_Controles[0] = _Txt_Codigo; _Ctrl_Controles[1] = _Txt_Descripcion; _Ctrl_Controles[2] = _Cmb_Grupo; CONTROLES._Ctrl_Buscar._Txt_TpoFind.Text = "PA"; CONTROLES._Ctrl_Buscar._Ctrl_Controles = _Ctrl_Controles; CONTROLES._Ctrl_Buscar._Er_Control_Error = _Er_Error; CONTROLES._Ctrl_Buscar._Tb_Tab = _Tb_Tab; CONTROLES._Ctrl_Buscar._Bl_Especial = true; CONTROLES._Ctrl_Buscar._Bol_SoloNuevo = false; CONTROLES._Ctrl_Buscar._txt_ExistForm.Text = ""; CONTROLES._Ctrl_Buscar._txt_ExistForm.Text = "Abierto"; CONTROLES._Ctrl_Buscar._frm_Formulario = this; CLASES._Cls_Varios_Metodos _Cls_CL = new T3.CLASES._Cls_Varios_Metodos(_Ctrl_Controles); _Cls_CL._Mtd_Foco(); //____________________________________________ if (!_Txt_Descripcion.Enabled & _Txt_Descripcion.Text.Trim().Length > 0) { ((Frm_Padre)this.MdiParent)._Ctrl_Buscar1._Bt_guardar2.Enabled = false; ((Frm_Padre)this.MdiParent)._Ctrl_Buscar1._Bt_borrar2.Enabled = true; ((Frm_Padre)this.MdiParent)._Ctrl_Buscar1._Bt_editar2.Enabled = true; } else if (!_Txt_Codigo.Enabled & _Txt_Codigo.Text.Trim().Length > 0 & _Txt_Descripcion.Enabled) { ((Frm_Padre)this.MdiParent)._Ctrl_Buscar1._Bt_guardar2.Enabled = true; ((Frm_Padre)this.MdiParent)._Ctrl_Buscar1._Bt_borrar2.Enabled = true; ((Frm_Padre)this.MdiParent)._Ctrl_Buscar1._Bt_editar2.Enabled = false; CONTROLES._Ctrl_Buscar._Bl_Modifi = true; } else if (_Txt_Codigo.Enabled) { ((Frm_Padre)this.MdiParent)._Ctrl_Buscar1._Bt_guardar2.Enabled = true; ((Frm_Padre)this.MdiParent)._Ctrl_Buscar1._Bt_borrar2.Enabled = false; ((Frm_Padre)this.MdiParent)._Ctrl_Buscar1._Bt_editar2.Enabled = false; } //_____________________________________________ }
private void _Bt_Aceptar_Click(object sender, EventArgs e) { CLASES._Cls_Varios_Metodos _Cls_Varios = new T3.CLASES._Cls_Varios_Metodos(true); if (_Cls_Varios._Mtd_VerificarClaveUsuario(_Txt_Clave.Text)) { if (_Bol_Reporte) { _Mtd_Imprimir(); } else { Cursor = Cursors.WaitCursor; foreach (DataGridViewRow _Dtg_Row in _Dtg_FactAmanosVendedor.Rows) { if (_Dtg_Row.Cells[0].Value != null) { if (_Dtg_Row.Cells[0].Value.ToString() == "1") { _Str_SentenciaSQL = "update TFACTURELACOBRO SET c_enmanosvende='0', c_enmanosempre='1',c_imprelacobro='0' WHERE cnumdocu='" + _Dtg_Row.Cells[1].Value.ToString() + "' and ctipodocument='" + _Dtg_Row.Cells[2].Value.ToString() + "' AND CCOMPANY='" + Frm_Padre._Str_Comp + "'"; Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_SentenciaSQL); } } } _Pnl_Clave.Visible = false; _Mtd_ActualizarEnManosCredito("", false); _Mtd_ActualizarEnManosVendedor("", false); tabControl1.SelectedIndex = 0; _Mtd_CargarComboCredito(); _Mtd_CargarComboVendedor(); Cursor = Cursors.Default; } } else { MessageBox.Show(this, "Clave incorrecta!!!", "Verificar", MessageBoxButtons.OK, MessageBoxIcon.Exclamation); _Txt_Clave.Focus(); _Txt_Clave.Select(0, _Txt_Clave.Text.Length); } }
private void Frm_GrupoUsurario_Activated(object sender, EventArgs e) { _Er_Error.Dispose(); CONTROLES._Ctrl_Buscar._frm_Formulario = this; CONTROLES._Ctrl_Buscar._Str_Cadena_Consulta_Formato = "Select cgroup as Código,cname as Descripción from TGROUP"; CONTROLES._Ctrl_Buscar._Str_Cadena_Consulta = "Select cgroup,cname from TGROUP"; //CONTROLES._Ctrl_Buscar._Str_Cadena_Consulta_Where = "c_id_departamento"; CONTROLES._Ctrl_Buscar._Str_Tabla = "TGROUP"; CONTROLES._Ctrl_Buscar._Str_Where_Vista_Grid = "cdelete='0'"; //------------------------------------------------------- _Ctrl_Controles[0] = _Txt_Cod; _Ctrl_Controles[1] = _Txt_Des; //------------------------------------------------------- _Str_Campos[0] = "cgroup"; _Str_Campos[1] = "cname"; //------------------------------------------------------ _Str_Where[0] = "cgroup"; //------------------------------------------------------- _Str_NoRep[0] = "0"; //------------------------------------------------------- _Str_Deshabi[0] = "0"; //------------------------------------------------------- _Int_CodDes[0] = 0; _Int_CodDes[1] = 1; //------------------------------------------------------- CONTROLES._Ctrl_Buscar._Ctrl_Controles = _Ctrl_Controles; CONTROLES._Ctrl_Buscar._Str_Campos = _Str_Campos; CONTROLES._Ctrl_Buscar._Str_Cadena_Consulta_Where = _Str_Where; CONTROLES._Ctrl_Buscar._Er_Control_Error = _Er_Error; CONTROLES._Ctrl_Buscar._Dg_Datagrid = _Dg_Grid; CONTROLES._Ctrl_Buscar._Tb_Tab = _Tb_Tab; CONTROLES._Ctrl_Buscar._Str_NoseDebeRepetir = _Str_NoRep; CONTROLES._Ctrl_Buscar._Int_Codigo_Descripcion = _Int_CodDes; CONTROLES._Ctrl_Buscar._Bl_Modifi = false; CONTROLES._Ctrl_Buscar._Int_Foco = 0; CONTROLES._Ctrl_Buscar._Bl_Especial = false; CONTROLES._Ctrl_Buscar._txt_ExistForm.Text = ""; CONTROLES._Ctrl_Buscar._txt_ExistForm.Text = "Abierto"; CONTROLES._Ctrl_Buscar._Str_Deshabilitados = _Str_Deshabi; CONTROLES._Ctrl_Buscar._Txt_TpoFind.Text = "N"; CLASES._Cls_Varios_Metodos _Cls_CL = new T3.CLASES._Cls_Varios_Metodos(_Ctrl_Controles); _Cls_CL._Mtd_Foco(); //____________________________________________ if (!_Txt_Cod.Enabled & !_Txt_Des.Enabled & _Txt_Cod.Text.Trim().Length > 0 & _Txt_Des.Text.Trim().Length > 0) { if (_Dg_Grid.Rows.Count > 0) { CONTROLES._Ctrl_Buscar._txt_text.Text = ""; CONTROLES._Ctrl_Buscar._txt_text.Text = "cgroup='" + _Txt_Cod.Text + "'"; } ((Frm_Padre)this.MdiParent)._Ctrl_Buscar1._Bt_guardar.Enabled = false; ((Frm_Padre)this.MdiParent)._Ctrl_Buscar1._Bt_borrar.Enabled = true; ((Frm_Padre)this.MdiParent)._Ctrl_Buscar1._Bt_editar.Enabled = true; } else if (!_Txt_Cod.Enabled & _Txt_Des.Enabled) { CONTROLES._Ctrl_Buscar._Bl_Modifi = true; if (_Dg_Grid.Rows.Count > 0) { CONTROLES._Ctrl_Buscar._txt_text.Text = ""; CONTROLES._Ctrl_Buscar._txt_text.Text = "cgroup='" + _Txt_Cod.Text + "'"; } ((Frm_Padre)this.MdiParent)._Ctrl_Buscar1._Bt_guardar.Enabled = true; ((Frm_Padre)this.MdiParent)._Ctrl_Buscar1._Bt_borrar.Enabled = true; ((Frm_Padre)this.MdiParent)._Ctrl_Buscar1._Bt_editar.Enabled = false; } else if (_Txt_Cod.Enabled & _Txt_Des.Enabled) { ((Frm_Padre)this.MdiParent)._Ctrl_Buscar1._Bt_guardar.Enabled = true; ((Frm_Padre)this.MdiParent)._Ctrl_Buscar1._Bt_borrar.Enabled = false; ((Frm_Padre)this.MdiParent)._Ctrl_Buscar1._Bt_editar.Enabled = false; } //_____________________________________________ }
private void _Mtd_Anular() { try { string _Str_Sql = ""; string _Str_TpoDoc = ""; string _Str_cidcomprob = ""; string _Str_cidcomprobret = ""; string _Str_Cadena = "select cidcomprobanul,cdiferenciaprec,cproveedor from TNOTACREDICP where cgroupcomp='" + Frm_Padre._Str_GroupComp + "' and ccompany='" + Frm_Padre._Str_Comp + "' and cidnotacreditocxp='" + _Txt_Cod.Text + "' and cproveedor='" + _Txt_CodProveedor.Text + "'"; DataSet _Ds2 = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_Cadena); if (_Ds2.Tables[0].Rows.Count > 0) { PrintDialog _Print = new PrintDialog(); _Print: if (_Print.ShowDialog() == DialogResult.OK) { _Txt_Clave.Text = ""; _Pnl_Clave.Visible = false; //_________________________________ int _Int_Id_Comprobante = new int(); CLASES._Cls_Varios_Metodos _Cls_Proceso = new T3.CLASES._Cls_Varios_Metodos(true); _Str_Cadena = "Select cidcomprobanul from TNOTACREDICP where cgroupcomp='" + Frm_Padre._Str_GroupComp + "' and ccompany='" + Frm_Padre._Str_Comp + "' and cidnotacreditocxp='" + _Txt_Cod.Text.Trim() + "' and cproveedor='" + _Txt_CodProveedor.Text.Trim() + "'"; DataSet _DsTemp = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_Cadena); if (_DsTemp.Tables[0].Rows[0][0] == System.DBNull.Value | _DsTemp.Tables[0].Rows[0][0].ToString().Trim() == "0") { _Str_Cadena = "Select cidcomprob from TNOTACREDICP where cgroupcomp='" + Frm_Padre._Str_GroupComp + "' and ccompany='" + Frm_Padre._Str_Comp + "' and cidnotacreditocxp='" + _Txt_Cod.Text.Trim() + "' and cproveedor='" + _Txt_CodProveedor.Text.Trim() + "'"; _DsTemp = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_Cadena); _Int_Id_Comprobante = Convert.ToInt32(_Cls_Proceso._Mtd_CrearComprobanteAnulacion(_DsTemp.Tables[0].Rows[0][0].ToString().Trim())); _Mtd_InsertAuxiliarCont(_DsTemp.Tables[0].Rows[0][0].ToString().Trim(), _Int_Id_Comprobante.ToString()); Program._MyClsCnn._mtd_conexion._Mtd_modificar("TNOTACREDICP", "cidcomprobanul='" + _Int_Id_Comprobante.ToString() + "',cdateupd='" + _Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDateServ()) + "',cuserupd='" + Frm_Padre._Str_Use + "'", "cgroupcomp='" + Frm_Padre._Str_GroupComp + "' and ccompany='" + Frm_Padre._Str_Comp + "' and cidnotacreditocxp='" + _Txt_Cod.Text.Trim() + "' and cproveedor='" + _Txt_CodProveedor.Text.Trim() + "'"); } else { _Int_Id_Comprobante = Convert.ToInt32(_DsTemp.Tables[0].Rows[0][0].ToString().Trim()); } Cursor = Cursors.WaitCursor; REPORTESS _Frm = new REPORTESS(new string[] { "vst_reportecomprobante" }, "", "T3.Report.rcomprobante", "Section1", "cabecera", "rif", "nit", "ccompany='" + Frm_Padre._Str_Comp + "' and cidcomprob='" + _Int_Id_Comprobante.ToString() + "'", _Print, true); Cursor = Cursors.Default; if (MessageBox.Show("¿La impresión se ha realizado correctamente?", "Información", MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.Yes) { //---------------------------------------------------------------------------------- Program._MyClsCnn._mtd_conexion._Mtd_modificar("TNOTACREDICP", "canulado='1',cfechaanul='" + _Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDate()) + "',cdateupd='" + _Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDateServ()) + "',cuserupd='" + Frm_Padre._Str_Use + "'", "cgroupcomp='" + Frm_Padre._Str_GroupComp + "' and ccompany='" + Frm_Padre._Str_Comp + "' and cidnotacreditocxp='" + _Txt_Cod.Text.Trim() + "' and cproveedor='" + _Txt_CodProveedor.Text.Trim() + "'"); Program._MyClsCnn._mtd_conexion._Mtd_modificar("TCOMPROBANC", "cstatus='1',clvalidado='1',cvalidate='" + _Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDate()) + "'", "ccompany='" + Frm_Padre._Str_Comp + "' and cidcomprob='" + _Int_Id_Comprobante.ToString() + "'"); _Str_Sql = "SELECT ctipodocnc FROM TCONFIGCXP WHERE ccompany='" + Frm_Padre._Str_Comp + "'"; DataSet _Ds = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_Sql); if (_Ds.Tables[0].Rows.Count > 0) { _Str_TpoDoc = Convert.ToString(_Ds.Tables[0].Rows[0]["ctipodocnc"]); } //_________________________________ //_________________________________ANULO CUENTAS POR PAGAR _Str_Cadena = "UPDATE TFACTPPAGARM SET cactivo=0,canulado=1,cdateupd='" + _Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDateServ()) + "',cuserupd='" + Frm_Padre._Str_Use + "' WHERE cgroupcomp='" + Frm_Padre._Str_GroupComp + "' AND ccompany='" + Frm_Padre._Str_Comp + "' AND cproveedor='" + _Txt_CodProveedor.Text + "' AND ctipodocument='" + _Str_TpoDoc + "' and cnumdocu='" + _Txt_Cod.Text + "'"; Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Cadena); _Str_Cadena = "UPDATE TMOVCXPM SET cactivo=0,canulado=1,cdateupd='" + _Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDateServ()) + "',cuserupd='" + Frm_Padre._Str_Use + "' WHERE cgroupcomp='" + Frm_Padre._Str_GroupComp + "' AND ccompany='" + Frm_Padre._Str_Comp + "' AND cproveedor='" + _Txt_CodProveedor.Text + "' AND ctipodocument='" + _Str_TpoDoc + "' and cnumdocu='" + _Txt_Cod.Text + "'"; Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Cadena); _Str_Sql = "SELECT cidcomprobret FROM TFACTPPAGARM WHERE cgroupcomp='" + Frm_Padre._Str_GroupComp + "' AND ccompany='" + Frm_Padre._Str_Comp + "' AND cproveedor='" + _Txt_CodProveedor.Text + "' AND ctipodocument='" + _Str_TpoDoc + "' and cnumdocu='" + _Txt_Cod.Text + "'"; _Ds = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_Sql); if (_Ds.Tables[0].Rows.Count > 0) { _Str_cidcomprobret = Convert.ToString(_Ds.Tables[0].Rows[0]["cidcomprobret"]); } //ANULO RETENCION DE IVA if (_Str_cidcomprobret != "") { _Str_Cadena = "UPDATE TCOMPROBANRETC SET canulado=1,cdateupd='" + _Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDateServ()) + "',cuserupd='" + Frm_Padre._Str_Use + "' WHERE ccompany='" + Frm_Padre._Str_Comp + "' AND cidcomprobret='" + _Str_cidcomprobret + "'"; Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Cadena); _Str_Sql = "SELECT cidcomprob FROM TCOMPROBANRETC WHERE ccompany='" + Frm_Padre._Str_Comp + "' AND cidcomprobret='" + _Str_cidcomprobret + "'"; _Ds = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_Sql); if (_Ds.Tables[0].Rows.Count > 0) { if (Convert.ToString(_Ds.Tables[0].Rows[0]["cidcomprob"]) != "") { _Str_Cadena = "UPDATE TCOMPROBANC SET cstatus='9' WHERE ccompany='" + Frm_Padre._Str_Comp + "' AND cidcomprob='" + Convert.ToString(_Ds.Tables[0].Rows[0]["cidcomprob"]) + "'"; Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Sql); } } } System.Threading.ThreadPool.QueueUserWorkItem(((Frm_Padre)this.MdiParent)._Frm_Contenedor._async_Default); MessageBox.Show("La operación fué realizada correctamente", "Información", MessageBoxButtons.OK, MessageBoxIcon.Information); _Mtd_ini(); _Tb_Tab.SelectedIndex = 0; if (_Rbt_NoAnul.Checked) { _Mtd_Actualizar_NoAnul(); } else { _Mtd_Actualizar_Anul(); } } else { _Frm.Close(); GC.Collect(); goto _Print; } } else { _Pnl_Clave.Visible = false; _Txt_Clave.Text = ""; } } } catch (Exception _Ex) { MessageBox.Show("No se puede contactar con la impresora", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error); Cursor = Cursors.Default; } }
private void _Mtd_Generar(string _P_Str_cidnotrecepc, string _P_Str_cidrecepcion, string _P_Str_Proveedor, string _P_Str_Factuta) { string _Str_Cadena = "SELECT ISNULL(cidcomprob,0) FROM TNOTARECEPC WHERE cgroupcomp='" + Frm_Padre._Str_GroupComp + "' AND ccompany='" + Frm_Padre._Str_Comp + "' AND cidnotrecepc='" + _P_Str_cidnotrecepc + "'"; DataSet _Ds = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_Cadena); if (_Ds.Tables[0].Rows.Count > 0) { int _Int_ID_Comprobante = new int(); if (_Ds.Tables[0].Rows[0][0].ToString().Trim() == "0") { double _Dbl_MontoInvend = 0; if (_Txt_Invendible.Text.Trim().Length > 0) { _Dbl_MontoInvend = Convert.ToDouble(_Txt_Invendible.Text); } CLASES._Cls_Varios_Metodos _Cls_Procesos = new T3.CLASES._Cls_Varios_Metodos(true); if (_Dbl_MontoInvend == 0) { _Int_ID_Comprobante = _Cls_Procesos._Mtd_Proceso_P_COMPRA(_Txt_NR.Text.Trim(), _P_Str_cidrecepcion, _P_Str_Proveedor, _P_Str_Factuta); } else { _Dbl_MontoInvend = _Mtd_RetornarInvendible(_P_Str_cidrecepcion, _P_Str_Proveedor, _P_Str_Factuta); _Int_ID_Comprobante = _Cls_Procesos._Mtd_Proceso_P_COMPRA_INVEND(_Txt_NR.Text.Trim(), _P_Str_cidrecepcion, _Dbl_MontoInvend, _P_Str_Proveedor, _P_Str_Factuta); } Program._MyClsCnn._mtd_conexion._Mtd_modificar("TNOTARECEPC", "cidcomprob='" + _Int_ID_Comprobante.ToString() + "',cdateupd='" + _Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDateServ()) + "',cuserupd='" + Frm_Padre._Str_Use + "'", "cgroupcomp='" + Frm_Padre._Str_GroupComp + "' AND ccompany='" + Frm_Padre._Str_Comp + "' AND cidnotrecepc='" + _P_Str_cidnotrecepc + "'"); } else { _Int_ID_Comprobante = Convert.ToInt32(_Ds.Tables[0].Rows[0][0].ToString().Trim()); } try { Cursor = Cursors.WaitCursor; PrintDialog _Print = new PrintDialog(); Cursor = Cursors.Default; _PrintComprob: if (_Print.ShowDialog() == DialogResult.OK) { Cursor = Cursors.WaitCursor; REPORTESS _Frm = new REPORTESS(new string[] { "vst_reportecomprobante" }, "", "T3.Report.rcomprobante", "Section1", "cabecera", "rif", "nit", "ccompany='" + Frm_Padre._Str_Comp + "' and cidcomprob='" + _Int_ID_Comprobante + "'", _Print, true); Cursor = Cursors.Default; if (MessageBox.Show("¿El comprobante se imprimió correctamente?", "Requerimiento", MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.Yes) { _Frm.Close(); _Frm.Dispose(); double _Dbl_Reten = _Mtd_PorcRetencion(_P_Str_Proveedor); string _Str_Impuesto = _Txt_Impuesto.Text; if (_Str_Impuesto.Trim().Length == 0) { _Str_Impuesto = "0"; } bool _Bol_Verificar = true; if (_Dbl_Reten > 1 & Convert.ToDouble(_Str_Impuesto) > 0 & _Cls_VariosMetodos._Mtd_CompaniaRetieneImp(Frm_Padre._Str_Comp)) { Cursor = Cursors.WaitCursor; if (CLASES._Cls_Varios_Metodos._Mtd_VerificarConexionExterna()) { if (!_Mtd_ExisteComprobanteRetencion(_Str_Proveedor, _Str_TpoDocGian, _P_Str_Factuta)) { _Cls_VariosMetodos._Mtd_Proceso_GenerarComprobRetencion(_Str_Proveedor, _Str_TpoDocGian, _Txt_Document.Text, _Str_Recepcion); } } else { _Bol_Verificar = false; } Cursor = Cursors.Default; } if (_Bol_Verificar) { _Str_Cadena = "UPDATE TCOMPROBANC SET cstatus='1',clvalidado='1',cvalidate='" + _Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDate()) + "',cdateupd='" + _Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDateServ()) + "',cuserupd='" + Frm_Padre._Str_Use + "' WHERE ccompany='" + Frm_Padre._Str_Comp + "' AND cidcomprob='" + _Int_ID_Comprobante + "'"; Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Cadena); System.Threading.ThreadPool.QueueUserWorkItem(((Frm_Padre)this.MdiParent)._Frm_Contenedor._async_Default); MessageBox.Show("La operación ha sido realizada correctamente", "Información", MessageBoxButtons.OK, MessageBoxIcon.Information); } else { MessageBox.Show("Problemas de conexión para crear la retención. Por favor espere un minuto e intente nuevamente.", "Información", MessageBoxButtons.OK, MessageBoxIcon.Information); } this.Close(); } else { _Frm.Close(); _Frm.Dispose(); goto _PrintComprob; } } else { _Pnl_Clave.Visible = false; _Txt_Clave.Text = ""; } } catch (Exception _Ex) { Cursor = Cursors.Default; MessageBox.Show("Error al intentar imprimir.\n" + _Ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error); } } else { MessageBox.Show("No se encontró la nota de recepción", "Información", MessageBoxButtons.OK, MessageBoxIcon.Information); } }