Beispiel #1
0
        private void _Bt_Print_Click(object sender, EventArgs e)
        {
            this.Cursor = Cursors.WaitCursor;
            string _Str_WhereOC = "", _Str_Where = "";

            foreach (DataGridViewRow _DgRow in _Dg_Consulta.Rows)
            {
                if (Convert.ToBoolean(_DgRow.Cells[0].Value))
                {
                    _Str_WhereOC = _Str_WhereOC + " cnumoc=" + _DgRow.Cells[1].Value.ToString() + " or";
                }
            }
            if (_Str_WhereOC.Length > 0)
            {
                _Str_WhereOC = _Str_WhereOC.Substring(0, _Str_WhereOC.Length - 2);
                _Str_Where   = "ccompany='" + Frm_Padre._Str_Comp + "' and (" + _Str_WhereOC + ")";
                REPORTESS _Frm = new REPORTESS(new string[] { "VST_OC" }, "", "T3.Report.rOC", "Section1", "cabecera", "rif", "nit", _Str_Where);
                _Frm.MdiParent = this.MdiParent;
                _Frm.Show();
            }
            else
            {
                MessageBox.Show("No ha seleccionado ordenes de compra.", "Información", MessageBoxButtons.OK, MessageBoxIcon.Warning);
            }
            this.Cursor = Cursors.Default;
        }
        private void _Bt_Consulta_Click(object sender, EventArgs e)
        {
            this.Cursor = Cursors.WaitCursor;
            string _Str_Sql = "";
            string _Str_Rango = "Del " + _Dt_Desde.Value.ToShortDateString() + " al " + _Dt_Hasta.Value.ToShortDateString();
            string _Str_WhereProv = "", _Str_Where = "";

            if (_LstChk_Prov.CheckedItems.Count > 0)
            {
                foreach (object _Obj in _LstChk_Prov.CheckedItems)
                {
                    _Str_WhereProv = _Str_WhereProv + " cproveedor='" + ((Clases._Cls_ArrayList)_Obj).Value + "' or";
                }
                _Str_WhereProv = _Str_WhereProv.Substring(0, _Str_WhereProv.Length - 2);
                _Str_Where     = "ccompany='" + Frm_Padre._Str_Comp + "' and cgroupcomp='" + Frm_Padre._Str_GroupComp + "' AND convert(datetime,convert(varchar(255),cfechanotrecep,103)) BETWEEN '" + _Cls_Formato._Mtd_fecha(_Dt_Desde.Value) + "' AND '" + _Cls_Formato._Mtd_fecha(_Dt_Hasta.Value) + "' AND  (" + _Str_WhereProv + ")";
                _Str_Sql       = "SELECT * FROM VST_COMPRAPRODUCTOS WHERE " + _Str_Where;
                if (Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_Sql).Tables[0].Rows.Count > 0)
                {
                    if (_Chk_Productos.Checked)
                    {
                        if (_Rb_Simp.Checked)
                        {
                            REPORTESS _Frm = new REPORTESS(new string[] { "VST_COMPRAPRODUCTOS" }, "", "T3.Report.rListCprProductos", "Section2", _Str_Rango, "rif", "nit", _Str_Where);
                            _Frm.MdiParent = this.MdiParent;
                            _Frm.Show();
                        }
                        else if (_Rb_Cimp.Checked)
                        {
                            REPORTESS _Frm = new REPORTESS(new string[] { "VST_COMPRAPRODUCTOS" }, "", "T3.Report.rListCprProductosCimp", "Section2", _Str_Rango, "rif", "nit", _Str_Where);
                            _Frm.MdiParent = this.MdiParent;
                            _Frm.Show();
                        }
                    }
                    else
                    {
                        if (_Rb_Simp.Checked)
                        {
                            REPORTESS _Frm = new REPORTESS(new string[] { "VST_NOTARECEPC" }, "", "T3.Report.rListCprProvDet", "Section2", _Str_Rango, "rif", "nit", _Str_Where);
                            _Frm.MdiParent = this.MdiParent;
                            _Frm.Show();
                        }
                        else if (_Rb_Cimp.Checked)
                        {
                            REPORTESS _Frm = new REPORTESS(new string[] { "VST_NOTARECEPC" }, "", "T3.Report.rListCprProvDetCimp", "Section2", _Str_Rango, "rif", "nit", _Str_Where);
                            _Frm.MdiParent = this.MdiParent;
                            _Frm.Show();
                        }
                    }
                }
                else
                {
                    MessageBox.Show("No existen datos para hasta búsqueda.", "Información", MessageBoxButtons.OK, MessageBoxIcon.Information);
                }
            }
            this.Cursor = Cursors.Default;
        }
Beispiel #3
0
        private void _Bt_Imprimir_Click(object sender, EventArgs e)
        {
            Cursor = Cursors.WaitCursor;
            REPORTESS _Frm = new REPORTESS("T3.Report.rMovimiento", ((DataTable)_Dg_Grid2.DataSource), "Section2", "cabecera", "rif", "nit");

            Cursor         = Cursors.Default;
            _Frm.MdiParent = this.MdiParent;
            _Frm.Dock      = DockStyle.Fill;
            _Frm.Show();
        }
Beispiel #4
0
 public Cls_reorden(System.Windows.Forms.Form _P_Frm_Padre)
 {
     try
     {
         _P_Frm_Padre.Cursor = System.Windows.Forms.Cursors.WaitCursor;
         REPORTESS _Frm = new REPORTESS(new string[] { "vst_puntodereorden" }, "", "T3.Report.rReorden", "Section1", "cabecera", "rif", "nit", "cpuntoreorden >=cexisrealu1 AND cpuntoreorden>0");
         _Frm.MdiParent = _P_Frm_Padre;
         _Frm.Show();
         _P_Frm_Padre.Cursor = System.Windows.Forms.Cursors.Default;
     }
     catch { }
 }
Beispiel #5
0
        private void _Mtd_ImprimirSG(string _Str_Codigo)
        {
            PrintDialog _Print = new PrintDialog();

            if (_Print.ShowDialog() == DialogResult.OK)
            {
                REPORTESS _Frm_Reporte = new REPORTESS(new string[] { "VST_TTRASPASOCARTERADETALLE" }, "", "T3.Report.rTrasladoCartera", "Section2", "cabecera", "rif", "nit", "ccompany='" + Frm_Padre._Str_Comp + "' and cidtrasladocarte='" + _Str_Codigo + "'", _Print, true);
                _Frm_Reporte.Show();
                if (MessageBox.Show("¿Se imprimió correctamente el traslado de carteras?", "Confirme", MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.Yes)
                {
                    _Str_SentenciaSQL = "update TTRASLADOCARTEM set cimpreso='1' where ccompany='" + Frm_Padre._Str_Comp + "' and cidtrasladocarte='" + _Str_Codigo + "'";
                    Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_SentenciaSQL);
                    _Mtd_GridTraspasos();
                }
            }
        }
Beispiel #6
0
        private void _Mtd_ImprimirSG(string _Str_Codigo)
        {
            PrintDialog _Print = new PrintDialog();

            if (_Print.ShowDialog() == DialogResult.OK)
            {
                _DS_DataSet = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset("SELECT * FROM VST_TRASPASODOCUMENTODETAILREAL WHERE ccompany='" + Frm_Padre._Str_Comp + "' and cidtrasladodocu='" + _Str_Codigo + "'");
                REPORTESS _Frm_Reporte = new REPORTESS("T3.Report.rTraspasoDocumentos", _DS_DataSet.Tables[0], _Print, true, "Section2", "cabecera", "rif", "nit");
                //REPORTESS _Frm_Reporte = new REPORTESS(new string[] { "VST_TTRASPASOCARTERADETALLE" }, "", "T3.Report.rTrasladoCartera", "Section2", "cabecera", "rif", "nit", "ccompany='" + Frm_Padre._Str_Comp + "' and cidtrasladocarte='" + _Str_Codigo + "'", _Print, true);
                _Frm_Reporte.Show();
                if (MessageBox.Show("¿Se imprimió correctamente el traslado del documento?", "Confirme", MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.Yes)
                {
                    _Str_SentenciaSQL = "update TTRASLADODOCU set cimpreso='1' where ccompany='" + Frm_Padre._Str_Comp + "' and cidtrasladodocu='" + _Str_Codigo + "'";
                    Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_SentenciaSQL);
                    _Mtd_GridTraspasos();
                }
            }
        }
Beispiel #7
0
        private void _Mtd_Imprimir()
        {
            try
            {
                DataTable  _Dta_Tabla = new DataTable("Relacion");
                DataColumn _Dta_Columna;
                DataRow    _Dta_Fila;
                _Dta_Columna            = new DataColumn();
                _Dta_Columna.DataType   = System.Type.GetType("System.String");
                _Dta_Columna.ColumnName = "cnumdocu";
                _Dta_Columna.ReadOnly   = true;
                _Dta_Tabla.Columns.Add(_Dta_Columna);
                _Dta_Columna            = new DataColumn();
                _Dta_Columna.DataType   = System.Type.GetType("System.String");
                _Dta_Columna.ColumnName = "ctipodocument";
                _Dta_Columna.ReadOnly   = true;
                _Dta_Tabla.Columns.Add(_Dta_Columna);
                _Dta_Columna            = new DataColumn();
                _Dta_Columna.DataType   = System.Type.GetType("System.String");
                _Dta_Columna.ColumnName = "ccliente";
                _Dta_Tabla.Columns.Add(_Dta_Columna);
                _Dta_Columna            = new DataColumn();
                _Dta_Columna.DataType   = System.Type.GetType("System.String");
                _Dta_Columna.ColumnName = "c_nomb_comer";
                _Dta_Tabla.Columns.Add(_Dta_Columna);
                _Dta_Columna            = new DataColumn();
                _Dta_Columna.DataType   = System.Type.GetType("System.String");
                _Dta_Columna.ColumnName = "c_fechaentrega";
                _Dta_Tabla.Columns.Add(_Dta_Columna);
                _Dta_Columna            = new DataColumn();
                _Dta_Columna.DataType   = System.Type.GetType("System.Double");
                _Dta_Columna.ColumnName = "c_montotot_si_bs";
                _Dta_Tabla.Columns.Add(_Dta_Columna);
                _Dta_Columna            = new DataColumn();
                _Dta_Columna.DataType   = System.Type.GetType("System.Double");
                _Dta_Columna.ColumnName = "c_impuesto_bs";
                _Dta_Tabla.Columns.Add(_Dta_Columna);
                _Dta_Columna            = new DataColumn();
                _Dta_Columna.DataType   = System.Type.GetType("System.Double");
                _Dta_Columna.ColumnName = "ctotal";
                _Dta_Tabla.Columns.Add(_Dta_Columna);
                _Dta_Columna            = new DataColumn();
                _Dta_Columna.DataType   = System.Type.GetType("System.String");
                _Dta_Columna.ColumnName = "cdiaruta";
                _Dta_Tabla.Columns.Add(_Dta_Columna);
                _Dta_Columna            = new DataColumn();
                _Dta_Columna.DataType   = System.Type.GetType("System.String");
                _Dta_Columna.ColumnName = "cvendedor";
                _Dta_Tabla.Columns.Add(_Dta_Columna);
                foreach (DataGridViewRow _Dtg_Row in _Dtg_ManosAreaCredito.Rows)
                {
                    if (_Dtg_Row.Cells[0].Value != null)
                    {
                        if (_Dtg_Row.Cells[0].Value.ToString() == "1")
                        {
                            _Dta_Fila             = _Dta_Tabla.NewRow();
                            _Dta_Fila["cnumdocu"] = _Dtg_Row.Cells[1].Value.ToString();
                            string _StrTipoDoc = "";
                            if (_Dtg_Row.Cells[2].Value.ToString().TrimEnd() == _Mtd_TipoDoc("FACT"))
                            {
                                _StrTipoDoc = "FACTURA";
                            }
                            if (_Dtg_Row.Cells[2].Value.ToString().TrimEnd() == _Mtd_TipoDoc("N/D"))
                            {
                                _StrTipoDoc = "NOTA DEBITO";
                            }
                            if (_Dtg_Row.Cells[2].Value.ToString().TrimEnd() == _Mtd_TipoDoc("N/C"))
                            {
                                _StrTipoDoc = "NOTA CRÉDITO";
                            }
                            if (_Dtg_Row.Cells[2].Value.ToString().TrimEnd() == _Mtd_TipoDoc("CHQDEV"))
                            {
                                _StrTipoDoc = "CHEQUE DEVUELTO";
                            }
                            _Dta_Fila["ctipodocument"]  = _StrTipoDoc;
                            _Dta_Fila["ccliente"]       = _Dtg_Row.Cells[10].Value.ToString();
                            _Dta_Fila["c_nomb_comer"]   = _Dtg_Row.Cells[11].Value.ToString();
                            _Dta_Fila["c_fechaentrega"] = _Dtg_Row.Cells[5].Value.ToString();
                            if (_StrTipoDoc == "NOTA CRÉDITO")
                            {
                                _Dta_Fila["c_montotot_si_bs"] = Convert.ToString(Convert.ToDouble(_Dtg_Row.Cells[6].Value.ToString()) * (-1));
                                _Dta_Fila["c_impuesto_bs"]    = Convert.ToString(Convert.ToDouble(_Dtg_Row.Cells[7].Value.ToString()) * (-1));
                                _Dta_Fila["ctotal"]           = Convert.ToString(Convert.ToDouble(_Dtg_Row.Cells[8].Value.ToString()) * (-1));
                            }
                            else
                            {
                                _Dta_Fila["c_montotot_si_bs"] = _Dtg_Row.Cells[6].Value.ToString();
                                _Dta_Fila["c_impuesto_bs"]    = _Dtg_Row.Cells[7].Value.ToString();
                                _Dta_Fila["ctotal"]           = _Dtg_Row.Cells[8].Value.ToString();
                            }

                            _Dta_Fila["cdiaruta"]  = _Dtg_Row.Cells[9].Value.ToString();
                            _Dta_Fila["cvendedor"] = _Dtg_Row.Cells[4].Value.ToString();
                            _Dta_Tabla.Rows.Add(_Dta_Fila);
                        }
                    }
                }
                if (_Dta_Tabla.Rows.Count > 0)
                {
Imprimir:
                    PrintDialog _Print = new PrintDialog();
                    if (_Print.ShowDialog() == DialogResult.OK)
                    {
                        REPORTESS _Frm_Reporte = new REPORTESS("T3.Report.rRelacionFacturas", _Dta_Tabla, _Print, true, "Section2", "", "", "");
                        _Frm_Reporte.Show();
                        if (MessageBox.Show("¿Se imprimió correctamente la relación de documentos?", "Confirme", MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.Yes)
                        {
                            Cursor = Cursors.WaitCursor;
                            foreach (DataGridViewRow _Dtg_Row in _Dtg_ManosAreaCredito.Rows)
                            {
                                if (_Dtg_Row.Cells[0].Value != null)
                                {
                                    if (_Dtg_Row.Cells[0].Value.ToString() == "1")
                                    {
                                        _Str_SentenciaSQL = "update TFACTURELACOBRO SET c_enmanosvende='1', c_enmanosempre='0',c_imprelacobro='1' 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);
                                    }
                                }
                            }
                            _Mtd_ActualizarEnManosCredito("", false);
                            _Mtd_ActualizarEnManosVendedor("", false);
                            tabControl1.SelectedIndex = 1;
                            _Mtd_CargarComboCredito();
                            _Mtd_CargarComboVendedor();
                            _Pnl_Clave.Visible = false;
                            Cursor             = Cursors.Default;
                        }
                        else
                        {
                            goto Imprimir;
                        }
                    }
                }
                else
                {
                    MessageBox.Show("Debe seleccionar al menos una factura para continuar");
                }
            }
            catch (Exception _Ex)
            { MessageBox.Show(_Ex.Message); Cursor = Cursors.Default; }
        }
Beispiel #8
0
        private void _Mtd_Anular()
        {
            try
            {
                string  _Str_cncanu         = "";
                string  _Str_cidcomprob     = "";
                bool    _Bol_cexedentecobro = false;
                string  _Str_Sql            = "select cidcomprobanul,ccliente,cexedentecobro from TNOTACREDICC where cgroupcomp='" + Frm_Padre._Str_GroupComp + "' and ccompany='" + Frm_Padre._Str_Comp + "' and cidnotcredicc='" + _Txt_Cod.Text + "'";
                DataSet _Ds2 = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_Sql);
                if (_Ds2.Tables[0].Rows.Count > 0)
                {
                    if (_Ds2.Tables[0].Rows[0]["cexedentecobro"].ToString().Trim() == "1")
                    {
                        _Bol_cexedentecobro = true;
                    }
                    if (_Str_MyProceso == "F1")
                    {
                        _Str_Sql = "UPDATE TNOTACREDICC SET cmotivoanulacion='" + _Cmb_Motivo.SelectedValue.ToString() + "',cfechaanul='" + _My_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDate()) + "' WHERE cgroupcomp='" + Frm_Padre._Str_GroupComp + "' and ccompany='" + Frm_Padre._Str_Comp + "' and cidnotcredicc='" + _Txt_Cod.Text.Trim() + "' and ccliente='" + _Txt_CodCliente.Text.Trim() + "'";
                        Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Sql);
                        _Str_cncanu = _MyUtilidad._Mtd_Correlativo("SELECT MAX(cncanu) FROM TNCANUL WHERE ccompany='" + Frm_Padre._Str_Comp + "'");
                        if (!Program._MyClsCnn._mtd_conexion._Mtd_ExistenRegistros("SELECT * FROM TNCANUL WHERE ccompany='" + Frm_Padre._Str_Comp + "' AND cidnotcredit='" + _Txt_Cod.Text.Trim() + "'"))
                        {
                            _Str_Sql = "INSERT INTO TNCANUL (ccompany,cidnotcredit,cncanu,cdescripcion,cfechaanul,cactivo,cestatusfirma,cdateadd,cuseradd,cdelete) VALUES('" +
                                       Frm_Padre._Str_Comp + "','" + _Txt_Cod.Text + "','" + _Str_cncanu + "','" + _Txt_Descripcion.Text.ToUpper() + "','" + _My_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDate()) + "',0,1,'" + _My_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDateServ()) + "','" + Frm_Padre._Str_Use + "',0)";
                            Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Sql);
                        }
                        MessageBox.Show("Se cargo la NC como anulada.", "Información", MessageBoxButtons.OK, MessageBoxIcon.Information);
                        if (_Rbt_NoAnul.Checked)
                        {
                            _Mtd_Actualizar_NoAnul();
                        }
                        else
                        {
                            _Mtd_Actualizar_Anul();
                        }
                        _Mtd_Ini();
                        _Bt_Anular.Enabled    = false;
                        _Tb_Tab.SelectedIndex = 0;
                    }
                    else if (_Str_MyProceso == "F2")
                    {
                        PrintDialog _Print = new PrintDialog();
_PrintG:
                        if (_Print.ShowDialog() == DialogResult.OK)
                        {
                            string  _Str_Id_Comprobante = "";
                            string  _Str_Cadena         = "SELECT cidcomprobanul FROM TNOTACREDICC WHERE cgroupcomp='" + Frm_Padre._Str_GroupComp + "' and ccompany='" + Frm_Padre._Str_Comp + "' and cidnotcredicc='" + _Txt_Cod.Text.Trim() + "' and ccliente='" + _Txt_CodCliente.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")
                            {
                                if (_Bol_cexedentecobro)
                                {
                                    _Str_Id_Comprobante = _MyUtilidad._Mtd_Proceso_P_CXC_NC_A(_Txt_Cod.Text.Trim(), "P_CXC_NCEXCD_A");
                                }
                                else
                                {
                                    if (CLASES._Cls_Varios_Metodos._Mtd_EsClienteIC(_Txt_CodCliente.Text.Trim()))
                                    {
                                        _Str_Id_Comprobante = _MyUtilidad._Mtd_Proceso_P_CXC_NC_A(_Txt_Cod.Text.Trim(), "P_CXC_NC_A_IC");
                                    }
                                    else
                                    {
                                        _Str_Id_Comprobante = _MyUtilidad._Mtd_Proceso_P_CXC_NC_A(_Txt_Cod.Text.Trim(), "P_CXC_NC_A");
                                    }
                                }
                                _Str_Sql = "UPDATE TNOTACREDICC SET cidcomprobanul='" + _Str_Id_Comprobante + "' WHERE cgroupcomp='" + Frm_Padre._Str_GroupComp + "' and ccompany='" + Frm_Padre._Str_Comp + "' and cidnotcredicc='" + _Txt_Cod.Text.Trim() + "' and ccliente='" + _Txt_CodCliente.Text.Trim() + "'";
                                Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Sql);
                            }
                            else
                            {
                                _Str_Id_Comprobante = _DsTemp.Tables[0].Rows[0][0].ToString().Trim();
                            }
                            REPORTESS _Frm = new REPORTESS(new string[] { "vst_reportecomprobante" }, "", "T3.Report.rcomprobante", "Section1", "cabecera", "rif", "nit", "ccompany='" + Frm_Padre._Str_Comp + "' and cidcomprob='" + _Str_Id_Comprobante + "'", _Print, true);
                            _Frm.MdiParent = this.MdiParent;
                            _Frm.Show();
                            if (MessageBox.Show("¿La impresión se ha realizado correctamente?", "Información", MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.Yes)
                            {
                                _Str_Sql = "UPDATE TNOTACREDICC SET canulado='1' WHERE cgroupcomp='" + Frm_Padre._Str_GroupComp + "' and ccompany='" + Frm_Padre._Str_Comp + "' and cidnotcredicc='" + _Txt_Cod.Text.Trim() + "' and ccliente='" + _Txt_CodCliente.Text.Trim() + "'";
                                Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Sql);
                                _Str_Sql = "UPDATE TNCANUL SET cactivo=1,cestatusfirma=2 WHERE ccompany='" + Frm_Padre._Str_Comp + "' and cidnotcredit='" + _Txt_Cod.Text.Trim() + "'";
                                Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Sql);
                                MessageBox.Show("Se anuló correctamente la N.C.", "Información", MessageBoxButtons.OK, MessageBoxIcon.Information);
                                if (_Rbt_NoAnul.Checked)
                                {
                                    _Mtd_Actualizar_NoAnul();
                                }
                                else
                                {
                                    _Mtd_Actualizar_Anul();
                                }
                                _Mtd_Ini();
                                _Bt_Anular.Enabled    = false;
                                _Tb_Tab.SelectedIndex = 0;
                            }
                            else
                            {
                                _Frm.Close();
                                GC.Collect();
                                goto _PrintG;
                            }
                        }
                    }
                }
            }
            catch (Exception _Ex) { MessageBox.Show(_Ex.Message); Cursor = Cursors.Default; }
        }
Beispiel #9
0
        private void _Mtd_Imprimir()
        {
            int _Int_Cont = 0;

            if (_Cls_Varios._Mtd_VerificarClaveUsuario(_Txt_Clave.Text))
            {
                _Str_SentenciaSQL = "SELECT MAX(cidtrasladodocu) FROM TTRASLADODOCU WHERE CCOMPANY='" + Frm_Padre._Str_Comp + "'";
                _DS_DataSet       = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_SentenciaSQL);
                string _Str_IdTraslado = "1";
                if (_DS_DataSet.Tables[0].Rows[0][0].ToString() != "")
                {
                    _Str_IdTraslado = Convert.ToString(Convert.ToInt32(_DS_DataSet.Tables[0].Rows[0][0].ToString()) + 1);
                }
                foreach (DataGridViewRow _Dtg_Row in _Dtg_CarteraVenA.Rows)
                {
                    if (_Dtg_Row.Cells[1].Value.ToString() == "1")
                    {
                        _Int_Cont++;
                        string _Str_NumDocu      = "";
                        string _Str_TipoDocument = "";
                        string _Str_Cliente      = "";
                        _Str_NumDocu      = _Dtg_Row.Cells[3].Value.ToString();
                        _Str_TipoDocument = _Dtg_Row.Cells[6].Value.ToString();
                        string[] _Str_Cliente_ = _Dtg_Row.Cells[5].Value.ToString().Split('-');
                        _Str_Cliente = _Str_Cliente_[0].TrimEnd();
                        string _Str_Codigo = _Mtd_Traspasar(_Cmb_VendedorA.SelectedValue.ToString(), _Cmb_VendedorB.SelectedValue.ToString(), _Str_NumDocu, _Str_TipoDocument, _Str_Cliente);
                        if (_Str_Codigo != "")
                        {
                            _Str_SentenciaSQL = "insert into TTRASLADODOCU(ccompany,cidtrasladodocu,ctipodocument,cnumdocu,cfecha,cvendedor_a,cvendedor_d,cimpreso,cprocesado) values ('" + Frm_Padre._Str_Comp + "','" + _Str_IdTraslado + "','" + _Str_TipoDocument + "','" + _Str_NumDocu + "',getdate(),'" + _Cmb_VendedorA.SelectedValue.ToString() + "','" + _Cmb_VendedorB.SelectedValue.ToString() + "',0,1)";
                            Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_SentenciaSQL);
                        }
                    }
                    else
                    {
                    }
                }
                if (_Int_Cont == 0)
                {
                    MessageBox.Show(this, "Seleccione uno o mas documentos para el traslado", "Información", MessageBoxButtons.OK, MessageBoxIcon.Information);
                }
                else
                {
                    _Mtd_Cartera_(_Dtg_CarteraVenA, _Cmb_VendedorA.SelectedValue.ToString(), true);
                    _Mtd_Cartera_(_Dtg_CarteraVenB, _Cmb_VendedorB.SelectedValue.ToString(), false);
                    _Mtd_GridTraspasos();
Imprimir:
                    PrintDialog _Print = new PrintDialog();
                    if (_Print.ShowDialog() == DialogResult.OK)
                    {
                        REPORTESS _Frm_Reporte = new REPORTESS(new string[] { "VST_TRASPASODOCUMENTODETAIL" }, "", "T3.Report.rTraspasoDocumentos", "Section2", "cabecera", "rif", "nit", "ccompany='" + Frm_Padre._Str_Comp + "' and cidtrasladodocu='" + _Str_IdTraslado + "'", _Print, true);
                        _Frm_Reporte.Show();
                        if (MessageBox.Show("¿Se imprimió correctamente el traslado del documento?", "Confirme", MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.Yes)
                        {
                            Cursor = Cursors.WaitCursor;
                            if (_Cls_Varios._Mtd_VerificarClaveUsuario(_Txt_Clave.Text))
                            {
                                if (_Cmb_VendedorA.Items.Count > 0 && _Cmb_VendedorB.Items.Count > 0)
                                {
                                    if (_Cmb_VendedorA.SelectedIndex > 0 && _Cmb_VendedorB.SelectedIndex > 0)
                                    {
                                        if (_Cmb_VendedorA.SelectedValue.ToString().TrimEnd() == _Cmb_VendedorB.SelectedValue.ToString().TrimEnd())
                                        {
                                            MessageBox.Show("Debe seleccionar un vendedor distinto para realizar el traspaso del documento", "Información", MessageBoxButtons.OK, MessageBoxIcon.Asterisk);
                                        }
                                        else
                                        {
                                            _Str_SentenciaSQL = "update TTRASLADODOCU set cimpreso='1' where ccompany='" + Frm_Padre._Str_Comp + "' and cidtrasladodocu='" + _Str_IdTraslado + "'";
                                            Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_SentenciaSQL);
                                            _Mtd_GridTraspasos();
                                        }
                                    }
                                    else
                                    {
                                        MessageBox.Show("Debe seleccionar un vendedor en cada listado para realizar el traspaso del documento", "Información", MessageBoxButtons.OK, MessageBoxIcon.Asterisk);
                                    }
                                }
                                else
                                {
                                    MessageBox.Show("Debe seleccionar un vendedor en cada listado para realizar el traspaso del documento", "Información", MessageBoxButtons.OK, MessageBoxIcon.Asterisk);
                                }
                                _Pnl_Clave.Visible = false;
                            }
                            else
                            {
                                MessageBox.Show(this, "Clave incorrecta!!!", "Verificar", MessageBoxButtons.OK, MessageBoxIcon.Exclamation); _Txt_Clave.Focus(); _Txt_Clave.Select(0, _Txt_Clave.Text.Length);
                            }
                            Cursor = Cursors.Default;
                        }
                        else
                        {
                            goto Imprimir;
                        }
                    }
                }
            }
            else
            {
                MessageBox.Show(this, "Clave incorrecta!!!", "Verificar", MessageBoxButtons.OK, MessageBoxIcon.Exclamation); _Txt_Clave.Focus(); _Txt_Clave.Select(0, _Txt_Clave.Text.Length);
            }
        }
Beispiel #10
0
        private void _Mtd_Imprimir()
        {
            if (_Cls_Varios._Mtd_VerificarClaveUsuario(_Txt_Clave.Text))
            {
                string _Str_Codigo = _Mtd_Traspasar(_Cmb_VendedorA.SelectedValue.ToString(), _Cmb_VendedorB.SelectedValue.ToString());
                _Mtd_Cartera_(_Dtg_CarteraVenA, _Cmb_VendedorA.SelectedValue.ToString());
                _Mtd_Cartera_(_Dtg_CarteraVenB, _Cmb_VendedorB.SelectedValue.ToString());
                _Mtd_GridTraspasos();
Imprimir:
                PrintDialog _Print = new PrintDialog();
                if (_Print.ShowDialog() == DialogResult.OK)
                {
                    REPORTESS _Frm_Reporte = new REPORTESS(new string[] { "VST_TTRASPASOCARTERADETALLE" }, "", "T3.Report.rTrasladoCartera", "Section2", "cabecera", "rif", "nit", "ccompany='" + Frm_Padre._Str_Comp + "' and cidtrasladocarte='" + _Str_Codigo + "'", _Print, true);
                    _Frm_Reporte.Show();
                    if (MessageBox.Show("¿Se imprimió correctamente el traslado de carteras?", "Confirme", MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.Yes)
                    {
                        Cursor = Cursors.WaitCursor;
                        if (_Cls_Varios._Mtd_VerificarClaveUsuario(_Txt_Clave.Text))
                        {
                            if (_Cmb_VendedorA.Items.Count > 0 && _Cmb_VendedorB.Items.Count > 0)
                            {
                                if (_Cmb_VendedorA.SelectedIndex > 0 && _Cmb_VendedorB.SelectedIndex > 0)
                                {
                                    if (_Cmb_VendedorA.SelectedValue.ToString().TrimEnd() == _Cmb_VendedorB.SelectedValue.ToString().TrimEnd())
                                    {
                                        MessageBox.Show("Debe seleccionar un vendedor distinto para realizar el traspaso de la cartera", "Información", MessageBoxButtons.OK, MessageBoxIcon.Asterisk);
                                    }
                                    else
                                    {
                                        _Str_SentenciaSQL = "update TTRASLADOCARTEM set cimpreso='1' where ccompany='" + Frm_Padre._Str_Comp + "' and cidtrasladocarte='" + _Str_Codigo + "'";
                                        Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_SentenciaSQL);
                                        _Mtd_GridTraspasos();
                                    }
                                }
                                else
                                {
                                    MessageBox.Show("Debe seleccionar un vendedor en cada listado para realizar el traspaso de la cartera", "Información", MessageBoxButtons.OK, MessageBoxIcon.Asterisk);
                                }
                            }
                            else
                            {
                                MessageBox.Show("Debe seleccionar un vendedor en cada listado para realizar el traspaso de la cartera", "Información", MessageBoxButtons.OK, MessageBoxIcon.Asterisk);
                            }
                            _Pnl_Clave.Visible = false;
                        }
                        else
                        {
                            MessageBox.Show(this, "Clave incorrecta!!!", "Verificar", MessageBoxButtons.OK, MessageBoxIcon.Exclamation); _Txt_Clave.Focus(); _Txt_Clave.Select(0, _Txt_Clave.Text.Length);
                        }
                        Cursor = Cursors.Default;
                    }
                    else
                    {
                        goto Imprimir;
                    }
                }
            }
            else
            {
                MessageBox.Show(this, "Clave incorrecta!!!", "Verificar", MessageBoxButtons.OK, MessageBoxIcon.Exclamation); _Txt_Clave.Focus(); _Txt_Clave.Select(0, _Txt_Clave.Text.Length);
            }
        }
Beispiel #11
0
        private void _Mtd_Imprimir()
        {
            try
            {
                string  _Str_Cadena = "select cimpresa from TNOTAENTREGM where cgroupcomp='" + Frm_Padre._Str_GroupComp + "' and ccompany='" + Frm_Padre._Str_Comp + "' and cidnotentrega='" + _Txt_NE.Text + "' and cproveedor='" + _Str_Proveedor + "'";
                DataSet _Ds2        = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_Cadena);
                if (_Ds2.Tables[0].Rows.Count > 0)
                {
                    if (_Ds2.Tables[0].Rows[0][0].ToString() == "0")
                    {
                        PrintDialog _Print = new PrintDialog();
                        if (_Print.ShowDialog() == DialogResult.OK)
                        {
                            _Txt_Clave.Text    = "";
                            _Pnl_Clave.Visible = false;
                            Cursor             = Cursors.WaitCursor;
                            REPORTESS _Frm = new REPORTESS(new string[] { "VST_REPORTENOTAENTREGA" }, "", "T3.Report.rNotaEntrega", "Section1", "cabecera", "rif", "nit", "ccompany='" + Frm_Padre._Str_Comp + "' and cgroupcomp='" + Frm_Padre._Str_GroupComp + "' and cidnotentrega='" + _Txt_NE.Text + "' and cproveedor='" + _Str_Proveedor + "'", _Print, true);
                            _Frm.MdiParent = this.MdiParent;
                            _Frm.Show();
                            Cursor = Cursors.Default;
                            if (MessageBox.Show("¿La impresión se ha realizado correctamente?", "Información", MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.Yes)
                            {
A:
                                string _Str_Numero = InputBox.Show("Introduzca el número de control").Text;
                                if (_Str_Numero.Trim().Length > 0)
                                {
                                    _Str_Cadena = "Select * from TNOTAENTREGM where cgroupcomp='" + Frm_Padre._Str_GroupComp + "' and ccompany='" + Frm_Padre._Str_Comp + "' and cnumcontrolne='" + _Str_Numero + "'";
                                    if (Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_Cadena).Tables[0].Rows.Count > 0)
                                    {
                                        if (MessageBox.Show("El número de control del documento ya fue registrado. ¿Desea intentarlo nuevamente?", "Información", MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.Yes)
                                        {
                                            goto A;
                                        }
                                    }
                                    else
                                    {
                                        Program._MyClsCnn._mtd_conexion._Mtd_modificar("TNOTAENTREGM", "cimpresa='1',cnumcontrolne='" + _Str_Numero + "'", "cgroupcomp='" + Frm_Padre._Str_GroupComp + "' and ccompany='" + Frm_Padre._Str_Comp + "' and cidnotentrega='" + _Txt_NE.Text + "' and cproveedor='" + _Str_Proveedor + "'");
                                        _Str_Cadena = "Select ciddevcomp from TNOTAENTREGM where cgroupcomp='" + Frm_Padre._Str_GroupComp + "' and ccompany='" + Frm_Padre._Str_Comp + "' and cidnotentrega='" + _Txt_NE.Text.Trim() + "'";
                                        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() != "0")
                                            {
                                                _Str_Cadena = "Select ctipodevol from TDEVCOMPRAM where cgroupcomp='" + Frm_Padre._Str_GroupComp + "' and ccompany='" + Frm_Padre._Str_Comp + "' and ciddevcomp='" + _Ds.Tables[0].Rows[0][0].ToString().Trim() + "' and cproveedor='" + _Str_Proveedor + "'";
                                                _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().ToUpper() == "B")
                                                    {
                                                        _Mtd_Generar_AjusteSalida();
                                                    }
                                                }
                                            }
                                        }
                                    }
                                }
                                System.Threading.ThreadPool.QueueUserWorkItem(((Frm_Padre)this.MdiParent)._Frm_Contenedor._async_Default);
                            }
                        }
                        else
                        {
                            _Pnl_Clave.Visible = false;
                            _Txt_Clave.Text    = "";
                        }
                    }
                    else
                    {
                        _Pnl_Clave.Visible = false;
                        _Txt_Clave.Text    = "";
                        MessageBox.Show("La NE ya fue impresa", "Información", MessageBoxButtons.OK, MessageBoxIcon.Information);
                        REPORTESS _Frm = new REPORTESS(new string[] { "VST_REPORTENOTAENTREGA" }, "", "T3.Report.rNotaEntrega", "Section1", "cabecera", "rif", "nit", "ccompany='" + Frm_Padre._Str_Comp + "' and cgroupcomp='" + Frm_Padre._Str_GroupComp + "' and cidnotentrega='" + _Txt_NE.Text + "' and cproveedor='" + _Str_Proveedor + "'");
                        _Frm.MdiParent = this.MdiParent;
                        _Frm.crystalReportViewer1.ShowPrintButton = false;
                        _Frm.Show();
                    }
                }
            }
            catch (Exception _Ex) { MessageBox.Show(_Ex.Message); Cursor = Cursors.Default; }
        }