Beispiel #1
0
        private void CboTipDoc_SelectedValueChanged(object sender, EventArgs e)
        {
            if (booAgregando == true)
            {
                return;
            }

            if (Convert.ToInt16(CboTipDoc.SelectedValue) == 2)
            {
                TxtNumSer.Text = c_NUMSERFAC;
            }
            if (Convert.ToInt16(CboTipDoc.SelectedValue) == 4)
            {
                TxtNumSer.Text = c_NUMSERBOL;
            }
            if (Convert.ToInt16(CboTipDoc.SelectedValue) == 90)
            {
                TxtNumSer.Text = c_NUMSERTIC;
            }

            CN_est_conecta o_conec = new CN_est_conecta(STU_SISTEMA);

            objTipDoc.mysConec = o_conec.mysConec;
            TxtNumDoc.Text     = objTipDoc.UltimoNumero(STU_SISTEMA.EMPRESAID, Convert.ToInt16(CboTipDoc.SelectedValue), TxtNumSer.Text);
            o_conec            = null;

            if (Convert.ToInt16(CboTipDoc.SelectedValue) == 90)
            {
                N_IDLIBRO = 33;
            }
            else
            {
                N_IDLIBRO = 14;
            }
        }
Beispiel #2
0
        void DataTableCargar()
        {
            CN_est_cajeros objRegistros = new CN_est_cajeros(STU_SISTEMA);

            objRegistros.STU_SISTEMA = STU_SISTEMA;
            objRegistros.Listar(STU_SISTEMA.EMPRESAID);
            dtLista      = objRegistros.dtListar;
            objRegistros = null;

            CN_pla_empleados o_emp = new CN_pla_empleados(STU_SISTEMA);

            o_emp.STU_SISTEMA = STU_SISTEMA;
            o_emp.Listar(STU_SISTEMA.EMPRESAID);
            dtemp = o_emp.dtLista;
            o_emp = null;

            CN_est_conecta o_conec = new CN_est_conecta(STU_SISTEMA);

            objFormVis.mysConec = o_conec.mysConec;                                      // CARGAMOS EL ARRAY CON LOS DATOS PARA LA VISTA DE DgLista
            objFormVis.ObtenerCabeceraLista(85, ref arrCabeceraDg1);

            objForm.mysConec = o_conec.mysConec;                                    // CARGAMOS LOS DATOS DEL FORMULARIO
            dtForm           = objForm.TraerRegistro(85);

            o_emploc.mysConec = o_conec.mysConec;
            dtLocal           = o_emploc.Listar(STU_SISTEMA.EMPRESAID, 0);

            o_usu.mysConec = o_conec.mysConec;
            o_usu.Consulta1(0);
            dtusuario = o_usu.dtLista;
            o_conec   = null;
        }
Beispiel #3
0
        string GeneraCodigoProducto()
        {
            DataTable dtFiltrar = new DataTable();
            string    c_CadenaFiltro;
            string    c_preftipexi;
            string    c_preffam;
            string    c_prefcla;
            string    c_prefsubcla;
            string    c_numero;
            string    c_codpro;

            c_numero = "";

            c_CadenaFiltro = "n_id = " + CboTipExi.SelectedValue.ToString() + "";
            dtFiltrar      = funDatos.DataTableFiltrar(dttipexi, c_CadenaFiltro);
            c_preftipexi   = dtFiltrar.Rows[0]["c_pre"].ToString();

            c_CadenaFiltro = "n_id = " + CboFam.SelectedValue.ToString() + "";
            dtFiltrar      = funDatos.DataTableFiltrar(dtfam, c_CadenaFiltro);
            c_preffam      = dtFiltrar.Rows[0]["c_pre"].ToString();

            c_CadenaFiltro = "n_id = " + CboCla.SelectedValue.ToString() + "";
            dtFiltrar      = funDatos.DataTableFiltrar(dtcla, c_CadenaFiltro);
            c_prefcla      = dtFiltrar.Rows[0]["c_pre"].ToString();

            c_CadenaFiltro = "n_id = " + CboSubCla.SelectedValue.ToString() + "";
            dtFiltrar      = funDatos.DataTableFiltrar(dtsubcla, c_CadenaFiltro);
            c_prefsubcla   = dtFiltrar.Rows[0]["c_pre"].ToString();

            CN_est_conecta o_conec = new CN_est_conecta(STU_SISTEMA);

            objItems          = new CN_alm_inventario();
            objItems.mysConec = o_conec.mysConec;
            dtFiltrar         = objItems.ObtenerCodigo(STU_SISTEMA.EMPRESAID, Convert.ToInt16(CboTipExi.SelectedValue), Convert.ToInt16(CboFam.SelectedValue), Convert.ToInt16(CboCla.SelectedValue), Convert.ToInt16(CboSubCla.SelectedValue));
            objItems          = null;
            o_conec           = null;

            if (dtFiltrar.Rows.Count != 0)
            {
                if (Convert.ToInt16(dtFiltrar.Rows[0]["c_numite"]) != 0)
                {
                    c_numero = "000" + (Convert.ToInt16(dtFiltrar.Rows[0]["c_numite"]) + 1).ToString();
                    c_numero = c_numero.Substring(c_numero.Length - 3, 3);
                }
                else
                {
                    c_codpro = "001";
                }
            }
            else
            {
                c_numero = "001";
            }

            c_codpro = c_preftipexi + c_preffam + c_prefcla + c_prefsubcla + c_numero;


            return(c_codpro);
        }
Beispiel #4
0
        void DataTableCargar()
        {
            CN_est_clientes o_cliente = new CN_est_clientes(STU_SISTEMA);

            o_cliente.STU_SISTEMA = STU_SISTEMA;
            o_cliente.Listar();                   // CARGAMOS TODOS LOS CLIENTES
            dtClientes = o_cliente.dtListar;
            o_cliente  = null;

            CN_est_cajeros o_cajero = new CN_est_cajeros(STU_SISTEMA);

            o_cajero.STU_SISTEMA = STU_SISTEMA;
            o_cajero.Listar(STU_SISTEMA.EMPRESAID);
            dtCajero = o_cajero.dtListar;
            o_cajero = null;

            CN_est_localsetup o_locset = new CN_est_localsetup(STU_SISTEMA);

            o_locset.STU_SISTEMA = STU_SISTEMA;
            dtLocSet             = o_locset.Listar(STU_SISTEMA.EMPRESAID);
            o_locset             = null;

            CN_est_conecta o_conec = new CN_est_conecta(STU_SISTEMA);

            o_emploc.mysConec = o_conec.mysConec;
            dtLocal           = o_emploc.Listar(STU_SISTEMA.EMPRESAID, 0);

            objMoneda.mysConec = o_conec.mysConec;
            dtMoneda           = objMoneda.Listar();                    // CARGAMOS TODAS MONEDAS

            o_tipcli.mysConec = o_conec.mysConec;
            o_tipcli.Listar();
            dttipcli = o_tipcli.dtListar;

            objTipDoc.mysConec = o_conec.mysConec;
            dtTipDocumento     = objTipDoc.Listar_puntoventa();   // CARGAMOS TIPOS DE DOCUMENTO PARA VENTAS

            objMoneda.mysConec = o_conec.mysConec;
            dtMoneda           = objMoneda.Listar();                    // CARGAMOS TODAS MONEDAS

            ObjTC.mysConec = o_conec.mysConec;
            dtTC           = ObjTC.Listartcano(151, STU_SISTEMA.ANOTRABAJO.ToString());

            o_docimp.mysConec = o_conec.mysConec;
            dtdocimp          = o_docimp.Listar(STU_SISTEMA.EMPRESAID);

            o_pcitem.mysConec = o_conec.mysConec;
            o_pcitem.Listar(STU_SISTEMA.EMPRESAID, 2);
            dtpcite = o_pcitem.dtLista;

            o_imp.mysConec = o_conec.mysConec;
            o_imp.Listar(STU_SISTEMA.EMPRESAID);
            dtimp = o_imp.dtLista;

            o_doccuecon.mysConec = o_conec.mysConec;
            o_doccuecon.Listar(STU_SISTEMA.EMPRESAID);
            dtdoccuecon = o_doccuecon.dtLista;
            o_conec     = null;
        }
Beispiel #5
0
        void CargarDatos2()
        {
            DataTable dtRes = new DataTable();

            dtRes = funGen.DataTableFiltrar(dtClientes, "n_id = " + LbIdCliente.Text + "");

            if (dtRes.Rows.Count != 0)
            {
                TxtNumPla.Text             = dtRes.Rows[0]["c_numpla"].ToString();
                TxtApeNom.Text             = dtRes.Rows[0]["c_nom"].ToString();
                CboTipCliCli.SelectedValue = Convert.ToInt16(dtRes.Rows[0]["n_idtipcli"]);
                LbIdCliente.Text           = dtRes.Rows[0]["n_id"].ToString();
                CboTipDoc.SelectedValue    = Convert.ToInt16(dtRes.Rows[0]["n_tipdocfac"]);
                if (Convert.ToInt16(CboTipDoc.SelectedValue) == 90)
                {
                    N_IDLIBRO = 33;
                }
                else
                {
                    N_IDLIBRO = 14;
                }

                if (Convert.ToInt16(CboTipDoc.SelectedValue) == 2)
                {
                    TxtNumSer.Text = c_NUMSERFAC;
                }
                if (Convert.ToInt16(CboTipDoc.SelectedValue) == 4)
                {
                    TxtNumSer.Text = c_NUMSERBOL;
                }
                if (Convert.ToInt16(CboTipDoc.SelectedValue) == 90)
                {
                    TxtNumSer.Text = c_NUMSERTIC;
                }

                CN_est_cargos o_cargo = new CN_est_cargos(STU_SISTEMA);
                o_cargo.STU_SISTEMA = STU_SISTEMA;
                o_cargo.Consulta1(Convert.ToInt16(LbIdCliente.Text));
                dtRes   = o_cargo.dtListar;
                o_cargo = null;

                if (dtRes.Rows.Count != 0)
                {
                    b_agregando = true;
                    funFlex.FlexMostrarDatos(FgReg, arrCabecera1, dtRes, 2, true);
                    HallarTotales();
                    b_agregando = false;
                }
            }

            CN_est_conecta o_conec = new CN_est_conecta(STU_SISTEMA);

            objTipDoc.mysConec = o_conec.mysConec;
            TxtNumDoc.Text     = objTipDoc.UltimoNumero(STU_SISTEMA.EMPRESAID, Convert.ToInt16(CboTipDoc.SelectedValue), TxtNumSer.Text);
            o_conec            = null;
            //TxtAbono.Focus();
        }
Beispiel #6
0
        void DataTableCargar()
        {
            CN_est_servicios objRegistros = new CN_est_servicios(STU_SISTEMA);

            objRegistros.STU_SISTEMA = STU_SISTEMA;
            objRegistros.Listar(STU_SISTEMA.EMPRESAID);
            dtLista      = objRegistros.dtListar;
            objRegistros = null;

            CN_pla_empleados o_emp = new CN_pla_empleados(STU_SISTEMA);

            o_emp.STU_SISTEMA = STU_SISTEMA;
            o_emp.Listar(STU_SISTEMA.EMPRESAID);
            dtemp = o_emp.dtLista;
            o_emp = null;

            CN_est_cajeros o_caj = new CN_est_cajeros(STU_SISTEMA);

            o_caj.STU_SISTEMA = STU_SISTEMA;
            o_caj.Listar(STU_SISTEMA.EMPRESAID);
            dtCajero = o_caj.dtListar;
            o_caj    = null;

            CN_est_conecta o_conec = new CN_est_conecta(STU_SISTEMA);

            objFormVis.mysConec = o_conec.mysConec;                                      // CARGAMOS EL ARRAY CON LOS DATOS PARA LA VISTA DE DgLista
            objFormVis.ObtenerCabeceraLista(86, ref arrCabeceraDg1);

            objForm.mysConec = o_conec.mysConec;                                    // CARGAMOS LOS DATOS DEL FORMULARIO
            dtForm           = objForm.TraerRegistro(86);

            o_emploc.mysConec = o_conec.mysConec;
            dtLocal           = o_emploc.Listar(STU_SISTEMA.EMPRESAID, 0);

            objUniMed.mysConec = o_conec.mysConec;
            dtunimed           = objUniMed.Listar();

            objFam.mysConec = o_conec.mysConec;
            dtfam           = objFam.Listar(STU_SISTEMA.EMPRESAID, STU_SISTEMA.SYS_UNIBD);
            dtfam           = funDatos.DataTableFiltrar(dtfam, "(n_idtipexi = 23)");

            objCla.mysConec = o_conec.mysConec;
            dtcla           = objCla.Listar(STU_SISTEMA.EMPRESAID, STU_SISTEMA.SYS_UNIBD);

            objSubCla.mysConec = o_conec.mysConec;
            dtsubcla           = objSubCla.Listar(STU_SISTEMA.EMPRESAID, STU_SISTEMA.SYS_UNIBD);

            objTipExi.mysConec = o_conec.mysConec;
            dttipexi           = objTipExi.Listar();

            objMoneda.mysConec = o_conec.mysConec;
            dtMoneda           = objMoneda.Listar();
            o_conec            = null;
        }
Beispiel #7
0
        void DataTableCargar()
        {
            CN_est_liquidacion objRegistros = new CN_est_liquidacion(STU_SISTEMA);

            objRegistros.STU_SISTEMA = STU_SISTEMA;
            objRegistros.Listar(STU_SISTEMA.EMPRESAID, STU_SISTEMA.ANOTRABAJO, STU_SISTEMA.MESTRABAJO);
            dtLista      = objRegistros.dtListar;
            objRegistros = null;

            CN_est_clientes o_cliente = new CN_est_clientes(STU_SISTEMA);

            o_cliente.STU_SISTEMA = STU_SISTEMA;
            o_cliente.Listar3(STU_SISTEMA.EMPRESAID);
            dtcliente = o_cliente.dtListar;
            o_cliente = null;

            CN_est_cajeros o_cajero = new CN_est_cajeros(STU_SISTEMA);

            o_cajero.STU_SISTEMA = STU_SISTEMA;
            o_cajero.Listar(STU_SISTEMA.EMPRESAID);
            dtCajero = o_cajero.dtListar;
            o_cajero = null;

            CN_est_servicios o_ser = new CN_est_servicios(STU_SISTEMA);

            o_ser.STU_SISTEMA = STU_SISTEMA;
            dtSer             = o_ser.Listar(STU_SISTEMA.EMPRESAID);
            dtSer             = null;

            CN_est_conecta o_conec = new CN_est_conecta(STU_SISTEMA);

            objFormVis.mysConec = o_conec.mysConec;                                      // CARGAMOS EL ARRAY CON LOS DATOS PARA LA VISTA DE DgLista
            objFormVis.ObtenerCabeceraLista(91, ref arrCabeceraDg1);

            objForm.mysConec = o_conec.mysConec;                                    // CARGAMOS LOS DATOS DEL FORMULARIO
            dtForm           = objForm.TraerRegistro(91);

            o_emploc.mysConec = o_conec.mysConec;
            dtLocal           = o_emploc.Listar(STU_SISTEMA.EMPRESAID, 0);

            o_tipdoc.mysConec = o_conec.mysConec;
            dtDoc             = o_tipdoc.Listar();
            dtDoc             = funDatos.DataTableFiltrar(dtDoc, "n_id IN(2, 4, 13, 83)");

            ObjTC.mysConec = o_conec.mysConec;
            dtTC           = ObjTC.Listartcano(151, STU_SISTEMA.ANOTRABAJO.ToString());

            objMeses.mysConec = o_conec.mysConec;
            dtMeses           = objMeses.Listar();
            o_conec           = null;
        }
Beispiel #8
0
        void CargarDatos()
        {
            CN_est_conecta      o_con    = new CN_est_conecta(STU_SISTEMA);
            CN_sys_empresalocal o_emploc = new CN_sys_empresalocal();

            o_emploc.mysConec = o_con.mysConec;
            dtLocal           = o_emploc.Listar(STU_SISTEMA.EMPRESAID, 0);
            o_emploc          = null;

            CN_est_cajeros o_cajero = new CN_est_cajeros(STU_SISTEMA);

            o_cajero.STU_SISTEMA = STU_SISTEMA;
            o_cajero.Listar(STU_SISTEMA.EMPRESAID);
            dtCajero = o_cajero.dtListar;
            o_cajero = null;
        }
Beispiel #9
0
        void DataTableCargar()
        {
            CN_est_localsetup objRegistros = new CN_est_localsetup(STU_SISTEMA);

            objRegistros.STU_SISTEMA = STU_SISTEMA;
            objRegistros.Listar(STU_SISTEMA.EMPRESAID);
            dtLista      = objRegistros.dtListar;
            objRegistros = null;

            CN_est_conecta o_conec = new CN_est_conecta(STU_SISTEMA);

            objFormVis.mysConec = o_conec.mysConec;                                      // CARGAMOS EL ARRAY CON LOS DATOS PARA LA VISTA DE DgLista
            objFormVis.ObtenerCabeceraLista(87, ref arrCabeceraDg1);

            objForm.mysConec = o_conec.mysConec;                                        // CARGAMOS LOS DATOS DEL FORMULARIO
            dtForm           = objForm.TraerRegistro(87);

            o_emploc.mysConec = o_conec.mysConec;
            dtLocal           = o_emploc.Listar(STU_SISTEMA.EMPRESAID, 0);

            o_tipdoc.mysConec = o_conec.mysConec;
            dtDoc             = o_tipdoc.Listar();
            dtDoc             = funDatos.DataTableFiltrar(dtDoc, "n_id IN(2, 4, 13)");

            CN_est_servicios o_ser = new CN_est_servicios(STU_SISTEMA);

            o_ser.STU_SISTEMA = STU_SISTEMA;
            dtSer             = o_ser.Listar(STU_SISTEMA.EMPRESAID);
            o_ser             = null;

            CN_est_servicios o_serpla = new CN_est_servicios(STU_SISTEMA);

            o_serpla.STU_SISTEMA = STU_SISTEMA;
            dtSerPla             = o_serpla.Listar(STU_SISTEMA.EMPRESAID);
            o_serpla             = null;

            CN_pla_empleados o_emp = new CN_pla_empleados(STU_SISTEMA);

            o_emp.STU_SISTEMA = STU_SISTEMA;
            o_emp.Listar(STU_SISTEMA.EMPRESAID);
            dtemp = o_emp.dtLista;
            o_emp = null;
        }
Beispiel #10
0
        private void CmdBusUsu_Click(object sender, EventArgs e)
        {
            DataTable       dtRes   = new DataTable();
            CN_est_conecta  o_conec = new CN_est_conecta(STU_SISTEMA);
            CN_sys_usuarios o_usu   = new CN_sys_usuarios();

            o_usu.mysConec = o_conec.mysConec;
            o_usu.BuscarUsuario(0);
            dtRes   = o_usu.dtLista;
            o_conec = null;
            o_usu   = null;
            if (dtRes != null)
            {
                if (dtRes.Rows.Count != 0)
                {
                    LblIdIsuario.Text = dtRes.Rows[0]["n_id"].ToString();
                    TxtUsuario.Text   = dtRes.Rows[0]["c_usuario"].ToString();
                }
            }
        }
Beispiel #11
0
        void Nuevo()
        {
            n_QueHace = 1;
            Tab1.TabPages[0].Enabled = false;
            booAgregando             = true;
            Blanquea();
            Bloquea();
            ActivarTool();
            LblTitulo2.Text         = "Agregando Nuevo Registro";
            Tab1.SelectedIndex      = 1;
            FgPlacas.AllowEditing   = true;
            CboPla.SelectedValue    = Convert.ToInt32(C_IDLOCAL);
            CboCajero.SelectedValue = Convert.ToInt32(C_IDCAJERO);
            TxtNumSer.Text          = "0001";

            CN_est_conecta o_conec = new CN_est_conecta(STU_SISTEMA);

            o_tipdoc          = new CN_sun_tipdoccom();
            o_tipdoc.mysConec = o_conec.mysConec;
            TxtNumDoc.Text    = o_tipdoc.UltimoNumero(STU_SISTEMA.EMPRESAID, 91, TxtNumSer.Text);
            booAgregando      = false;
            o_conec           = null;
            o_tipdoc          = null;
        }
Beispiel #12
0
        void AsignarEntidad()
        {
            DataTable dtresul    = new DataTable();
            int       n_row      = 2;
            string    c_dato     = "";
            string    C_RECIBO   = "";
            int       N_SERVICIO = 0;
            int       N_UNIMED   = 0;
            string    C_SERVICIO = "";
            string    C_PERIODO  = "";

            for (n_row = 0; n_row <= FgReg.Rows.Count - 1; n_row++)
            {
                c_dato = FgReg.GetData(n_row, 7).ToString();

                if (c_dato == "True")
                {
                    C_RECIBO   = FgReg.GetData(n_row, 2).ToString();
                    N_SERVICIO = Convert.ToInt16(FgReg.GetData(n_row, 10).ToString());
                    N_UNIMED   = Convert.ToInt16(FgReg.GetData(n_row, 11).ToString());
                    //C_PERIODO = "DEL " + Convert.ToDateTime(FgReg.GetData(n_row, 4)).ToString("dd/MM/yy") + " AL " + Convert.ToDateTime(FgReg.GetData(n_row, 4)).AddDays(30).ToString("dd/MM/yy");

                    c_dato     = FgReg.GetData(n_row, 4).ToString();
                    C_SERVICIO = c_dato;
                }
            }

            l_DocumentoDet.Clear();
            l_DetDoc.Clear();
            l_DetOCT.Clear();

            e_Documento.n_id          = 0;
            e_Documento.n_idemp       = STU_SISTEMA.EMPRESAID;
            e_Documento.n_anotra      = STU_SISTEMA.ANOTRABAJO;
            e_Documento.n_idmes       = STU_SISTEMA.MESTRABAJO;
            e_Documento.n_idlib       = N_IDLIBRO;
            e_Documento.c_numreg      = "";
            e_Documento.n_idtippro    = 23;
            e_Documento.n_idcli       = Convert.ToInt16(LbIdCliente.Text);
            e_Documento.n_idpunvencli = 0;
            e_Documento.n_idtipdoc    = Convert.ToInt16(CboTipDoc.SelectedValue);
            e_Documento.c_numser      = TxtNumSer.Text;
            e_Documento.c_numdoc      = TxtNumDoc.Text;
            if (e_Documento.n_idmes == 0)
            {
                e_Documento.d_fchreg = Convert.ToDateTime("01/01/" + e_Documento.n_anotra.ToString("0000"));
            }
            else
            {
                e_Documento.d_fchreg = Convert.ToDateTime("01/" + TxtFecha.Text.Substring(3, 2) + "/" + TxtFecha.Text.Substring(6, 4));
            }
            e_Documento.d_fchdoc    = Convert.ToDateTime(TxtFecha.Text);
            e_Documento.d_fchven    = Convert.ToDateTime(TxtFecha.Text);
            e_Documento.n_idconpag  = 1;
            e_Documento.n_idmon     = Convert.ToInt16(CboMoneda.SelectedValue);
            e_Documento.n_impbru    = (Convert.ToDouble(TxtImpPag.Text) / ((douIGVTasa / 100) + 1));
            e_Documento.n_impbru2   = 0;
            e_Documento.n_impbru3   = 0;
            e_Documento.n_impinaf   = 0;
            e_Documento.n_impigv    = (Convert.ToDouble(TxtImpPag.Text) - (Convert.ToDouble(TxtImpPag.Text) / ((douIGVTasa / 100) + 1)));
            e_Documento.n_impisc    = 0;
            e_Documento.n_impotr    = 0;
            e_Documento.n_imptotven = Convert.ToDouble(TxtImpPag.Text);
            e_Documento.n_tc        = Convert.ToDouble(LblTc.Text);
            e_Documento.n_impsal    = Convert.ToDouble(TxtImpPag.Text);
            e_Documento.n_idven     = 0;
            e_Documento.n_tasaigv   = douIGVTasa;
            e_Documento.c_glosa     = "COBRANZA DEL CARGO Nº " + C_RECIBO;
            e_Documento.n_impsubtot = (Convert.ToDouble(TxtImpPag.Text) / ((douIGVTasa / 100) + 1));
            e_Documento.n_pordsc    = 0;
            e_Documento.n_idtipope  = 1;

            e_Documento.n_idtipdocref = 0;
            e_Documento.n_iddocref    = 0;

            e_Documento.c_serdocref = "";
            e_Documento.c_numdocref = "";

            string c_mon = "";

            if (Convert.ToDouble(CboMoneda.SelectedValue) == 115)
            {
                c_mon = "SOLES.";
            }
            if (Convert.ToDouble(CboMoneda.SelectedValue) == 151)
            {
                c_mon = "DOLARES AMERICANOS.";
            }
            e_Documento.c_numlet = funLet.Convertir(TxtImpPag.Text, true, c_mon);

            e_Documento.n_oriitem = 1;             // INDICAMOS QUE LA VENTA NO TIENE GUIA DE REMISION
            e_Documento.n_anulado = 0;
            e_Documento.c_motnc   = "";

            e_Documento.n_idforpag = 1;            // INDICAMOS QUE LA FORMA DE PAGO ES EN EFECTIVO
            e_Documento.n_idtarcre = 0;            // NO HAY TARJETA DE CREDITO

            // PREPARAMOS EL DETALLE DE LA VENTA
            BE_VTA_VENTASDET BE_Detalle = new BE_VTA_VENTASDET();

            BE_Detalle.n_idvta  = e_Documento.n_id;
            BE_Detalle.n_canpro = 1;

            BE_Detalle.n_iditem = N_SERVICIO;

            //N_UNIMED = Convert.ToInt32(funGen.DataTableBuscar(dtservicio, "n_id", "n_idunimed", N_SERVICIO.ToString(), "N"));
            BE_Detalle.n_idunimed     = N_UNIMED;
            BE_Detalle.n_preunibru    = (Convert.ToDouble(TxtImpPag.Text) / ((douIGVTasa / 100) + 1));
            BE_Detalle.n_preuninet    = (Convert.ToDouble(TxtImpPag.Text) / ((douIGVTasa / 100) + 1));
            BE_Detalle.n_imptot       = (Convert.ToDouble(TxtImpPag.Text) / ((douIGVTasa / 100) + 1));
            BE_Detalle.c_desusu       = C_SERVICIO;
            BE_Detalle.n_idtipven     = 0;
            BE_Detalle.n_pordsc       = 0;
            BE_Detalle.n_porigv       = douIGVTasa;
            BE_Detalle.n_preuninetigv = Convert.ToDouble(TxtImpPag.Text);
            BE_Detalle.n_imptotigv    = Convert.ToDouble(TxtImpPag.Text);
            BE_Detalle.n_idtipafeigv  = 1;
            BE_Detalle.c_datadi       = "";
            l_DocumentoDet.Add(BE_Detalle);

            l_DetOCT.Clear();
            BE_VTA_VENTASOCT entOC = new BE_VTA_VENTASOCT();

            ////  1001 - Total valor de venta - operaciones gravadas
            entOC.n_idvta   = 0;
            entOC.n_idcon   = 1;
            entOC.n_importe = (Convert.ToDouble(TxtImpPag.Text) / ((douIGVTasa / 100) + 1));
            l_DetOCT.Add(entOC);

            l_DetDat.Clear();
            BE_VTA_VENTASDAT entDat = new BE_VTA_VENTASDAT();

            entDat.n_idvta     = 0;
            entDat.n_idcaj     = Convert.ToInt16(CboCajero.SelectedValue);
            entDat.c_cajnom    = STU_SISTEMA.USUARIOALIAS; //CboCajero.Text;
            entDat.n_idloc     = Convert.ToInt16(N_LOCAL);
            entDat.c_locdes    = C_LOCAL;
            entDat.h_horemi    = DateTime.Now.ToString("HH:mm:ss");
            entDat.c_numpla    = TxtNumPla.Text;
            entDat.c_horini    = "";
            entDat.c_horfin    = "";
            entDat.c_tiempousu = "";

            l_DetDat.Add(entDat);

            double    n_valor     = 0;
            string    c_numasi    = "";
            int       n_idcueite  = 0;
            int       n_idcuedoc  = 0;
            int       n_idcueigv  = 0;
            string    c_abrtipdoc = "";
            DataTable dtResult    = new DataTable();

            CN_est_conecta o_conec  = new CN_est_conecta(STU_SISTEMA);
            CN_con_diario  o_diario = new CN_con_diario();

            o_diario.mysConec = o_conec.mysConec;
            c_numasi          = o_diario.ObtenerUltimoAsiento(STU_SISTEMA.ANOTRABAJO, STU_SISTEMA.MESTRABAJO, 14, STU_SISTEMA.EMPRESAID);
            o_conec           = null;


            // OBTENEMOS EL ID DE LA CUENTA CONTABLE DEL DOCUMENTO DE VENTA
            dtResult = funGen.DataTableFiltrar(dtdoccuecon, "n_idtipdoc = " + Convert.ToInt16(CboTipDoc.SelectedValue) + " AND n_idmon = " + Convert.ToInt16(CboMoneda.SelectedValue) + "");
            if (dtResult.Rows.Count == 0)
            {
                MessageBox.Show("¡ El tipo de documento seleccionado no tiene cuenta contable asignada, asignele una cuenta contable en el menu contabilidad !", "", MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button1);
                return;
            }
            n_idcuedoc = Convert.ToInt16(dtResult.Rows[0]["n_idcueven"]);

            // OBTENEMOS EL ID DE LA CUENTA CONTABLE DEL IMPUESTO DE LA VENTA
            dtResult = funGen.DataTableFiltrar(dtdocimp, "n_idtipdoc = " + Convert.ToInt16(CboTipDoc.SelectedValue) + "");
            if (dtResult.Rows.Count == 0)
            {
                MessageBox.Show("¡ El tipo de documento seleccionado no tiene un impuesto asignado, asignele una cuenta contable en el menu contabilidad !", "", MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button1);
                return;
            }
            n_idcueigv = Convert.ToInt16(dtResult.Rows[0]["n_idcueven"]);

            // OBTENEMOS EL ID DE LA CUENTA CONTABLE DEL SERVICIO
            dtResult = funGen.DataTableFiltrar(dtpcite, "n_iditem = " + N_SERVICIO + "");
            if (dtResult.Rows.Count == 0)
            {
                MessageBox.Show("¡ El item seleccionado no tiene cuenta contable asignada, asignele una cuenta contable en el menu contabilidad !", "", MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button1);
                return;
            }
            n_idcueite = Convert.ToInt16(dtResult.Rows[0]["n_idpcven"]);

            // OBTENEMOS LA ABREVIATURA DEL TIPO DE DOUCMENTO
            dtResult    = funGen.DataTableFiltrar(dtTipDocumento, "n_id = " + Convert.ToInt16(CboTipDoc.SelectedValue) + "");
            c_abrtipdoc = dtResult.Rows[0]["c_abr"].ToString();


            // ******************************************
            // CREAMOS LOS ASIENTOS CONTABLES DE LA VENTA
            l_Diario.Clear();

            // *****************
            // AGREGAMOS EL DEBE
            BE_CON_DIARIO ediario = new BE_CON_DIARIO();

            ediario.n_id     = 0;
            ediario.n_idemp  = STU_SISTEMA.EMPRESAID;
            ediario.n_ano    = STU_SISTEMA.ANOTRABAJO;
            ediario.n_mes    = STU_SISTEMA.MESTRABAJO;
            ediario.n_lib    = 14;
            ediario.c_numasi = c_numasi;
            ediario.n_idcue  = n_idcuedoc;
            ediario.n_tc     = Convert.ToDouble(LblTc.Text);

            if (Convert.ToInt16(CboMoneda.SelectedValue) == 115)
            {
                ediario.n_impdebsol = Convert.ToDouble(TxtImpPag.Text);
                ediario.n_imphabsol = 0;

                ediario.n_impdebdol = Convert.ToDouble(TxtImpPag.Text) / Convert.ToDouble(LblTc.Text);
                ediario.n_imphabdol = 0;
            }
            else
            {
                ediario.n_impdebsol = Convert.ToDouble(TxtImpPag.Text) * Convert.ToDouble(LblTc.Text);
                ediario.n_imphabsol = 0;

                ediario.n_impdebdol = Convert.ToDouble(TxtImpPag.Text);
                ediario.n_imphabdol = 0;
            }

            ediario.d_fchasi       = Convert.ToDateTime(TxtFecha.Text);
            ediario.d_orifchdoc    = Convert.ToDateTime(TxtFecha.Text);
            ediario.n_oriid        = 0;
            ediario.n_oriidtipdoc  = Convert.ToInt16(CboTipDoc.SelectedValue);
            ediario.n_oriidtipmon  = Convert.ToInt16(CboMoneda.SelectedValue);
            ediario.c_orinumdoc    = TxtNumSer.Text + "-" + TxtNumDoc.Text;
            ediario.c_origlo       = "";
            ediario.c_oridestipmon = CboMoneda.Text;
            ediario.c_oridestipdoc = c_abrtipdoc;
            ediario.c_orinomcli    = TxtApeNom.Text;
            ediario.c_orinumruc    = "";

            l_Diario.Add(ediario);

            // *****************************
            // ESCRIBIMOS EL IGV DE LA VENTA
            if ((Convert.ToDouble(CboTipDoc.SelectedValue) == 2) || (Convert.ToDouble(CboTipDoc.SelectedValue) == 4))
            {
                BE_CON_DIARIO ediario2 = new BE_CON_DIARIO();
                n_valor = 0;
                n_valor = (Convert.ToDouble(TxtImpPag.Text) - (Convert.ToDouble(TxtImpPag.Text) / 1.18));

                ediario2.n_id     = 0;
                ediario2.n_idemp  = STU_SISTEMA.EMPRESAID;
                ediario2.n_ano    = STU_SISTEMA.ANOTRABAJO;
                ediario2.n_mes    = STU_SISTEMA.MESTRABAJO;
                ediario2.n_lib    = 14;
                ediario2.c_numasi = c_numasi;
                ediario2.n_idcue  = n_idcueigv;
                ediario2.n_tc     = Convert.ToDouble(LblTc.Text);

                if (Convert.ToInt16(CboMoneda.SelectedValue) == 115)
                {
                    ediario2.n_impdebsol = 0;
                    ediario2.n_imphabsol = n_valor;

                    ediario2.n_impdebdol = 0;
                    ediario2.n_imphabdol = n_valor / Convert.ToDouble(LblTc.Text);
                }
                else
                {
                    ediario2.n_impdebsol = 0;
                    ediario2.n_imphabsol = n_valor * Convert.ToDouble(LblTc.Text);

                    ediario2.n_impdebdol = 0;
                    ediario2.n_imphabdol = n_valor;
                }

                ediario2.d_fchasi      = Convert.ToDateTime(TxtFecha.Text);
                ediario2.d_orifchdoc   = Convert.ToDateTime(TxtFecha.Text);
                ediario2.n_oriid       = 0;
                ediario2.n_oriidtipdoc = Convert.ToInt16(CboTipDoc.SelectedValue);
                ediario2.n_oriidtipmon = Convert.ToInt16(CboMoneda.SelectedValue);
                ediario2.c_orinumdoc   = TxtNumSer.Text + "-" + TxtNumDoc.Text;
                ediario2.c_origlo      = "";
                ediario.c_oridestipmon = CboMoneda.Text;
                ediario.c_oridestipdoc = c_abrtipdoc;
                ediario.c_orinomcli    = TxtApeNom.Text;
                ediario.c_orinumruc    = "";

                l_Diario.Add(ediario2);
            }

            // *******************************
            // ESCRIBIMOS EL HABER DEL ASIENTO
            BE_CON_DIARIO ediario3 = new BE_CON_DIARIO();

            if ((Convert.ToDouble(CboTipDoc.SelectedValue) == 2) || (Convert.ToDouble(CboTipDoc.SelectedValue) == 4))
            {
                n_valor = (Convert.ToDouble(TxtImpPag.Text) / 1.18);
            }
            else
            {
                n_valor = Convert.ToDouble(TxtImpPag.Text);
            }

            ediario3.n_id     = 0;
            ediario3.n_idemp  = STU_SISTEMA.EMPRESAID;
            ediario3.n_ano    = STU_SISTEMA.ANOTRABAJO;
            ediario3.n_mes    = STU_SISTEMA.MESTRABAJO;
            ediario3.n_lib    = 14;
            ediario3.c_numasi = c_numasi;
            ediario3.n_idcue  = n_idcueite;
            ediario3.n_tc     = Convert.ToDouble(LblTc.Text);

            if (Convert.ToInt16(CboMoneda.SelectedValue) == 115)
            {
                ediario3.n_impdebsol = 0;
                ediario3.n_imphabsol = n_valor;

                ediario3.n_impdebdol = 0;
                ediario3.n_imphabdol = n_valor / Convert.ToDouble(LblTc.Text);
            }
            else
            {
                ediario3.n_impdebsol = 0;
                ediario3.n_imphabsol = n_valor * Convert.ToDouble(LblTc.Text);

                ediario3.n_impdebdol = 0;
                ediario3.n_imphabdol = n_valor;
            }

            ediario3.d_fchasi      = Convert.ToDateTime(TxtFecha.Text);
            ediario3.d_orifchdoc   = Convert.ToDateTime(TxtFecha.Text);
            ediario3.n_oriid       = 0;
            ediario3.n_oriidtipdoc = Convert.ToInt16(CboTipDoc.SelectedValue);
            ediario3.n_oriidtipmon = Convert.ToInt16(CboMoneda.SelectedValue);
            ediario3.c_orinumdoc   = TxtNumSer.Text + "-" + TxtNumDoc.Text;
            ediario3.c_origlo      = "";
            ediario.c_oridestipmon = CboMoneda.Text;
            ediario.c_oridestipdoc = c_abrtipdoc;
            ediario.c_orinomcli    = TxtApeNom.Text;
            ediario.c_orinumruc    = "";

            l_Diario.Add(ediario3);
        }
Beispiel #13
0
        private void CmdAce_Click(object sender, EventArgs e)
        {
            if (funFunciones.NulosC(TxtNumSer.Text) == "")
            {
                MessageBox.Show("¡ No ha especificado el numero de serie del documento !", "", MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button1);
                TxtNumSer.Focus();
                return;
            }
            if (funFunciones.NulosC(TxtNumDoc.Text) == "")
            {
                MessageBox.Show("¡ No ha especificado el numero de documento !", "", MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button1);
                TxtNumDoc.Focus();
                return;
            }
            if (FgReg.Rows.Count == 2)
            {
                MessageBox.Show("¡ No hay cargos a cobrar !", "", MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button1);
                FgReg.Focus();
                return;
            }
            if (Convert.ToInt16(CboTipDoc.SelectedValue) == 0)
            {
                MessageBox.Show("¡ No ha especificado el tipo de documento que se emitira, debe definir el documento en el maestro de clientes !", "", MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button1);
                CboTipDoc.Focus();
                return;
            }
            if (Convert.ToDouble(TxtImpPag.Text) == 0)
            {
                MessageBox.Show("¡ El abonado no tiene cargos pendientes !", "", MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button1);
                TxtImpPag.Focus();
                return;
            }

            CN_vta_ventas o_ventas = new CN_vta_ventas();
            string        c_dato   = "";

            AsignarEntidad();

            CN_est_conecta o_conec = new CN_est_conecta(STU_SISTEMA);

            o_ventas.mysConec      = o_conec.mysConec;
            o_ventas.LstDetalle    = l_DocumentoDet;
            o_ventas.LstDocumentos = l_DetDoc;
            o_ventas.LstDetalleOCT = l_DetOCT;
            o_ventas.LstDatos      = l_DetDat;
            o_ventas.l_diario      = l_Diario;
            o_ventas.STU_SISTEMA   = STU_SISTEMA;

            int n_row     = 0;
            int n_idcargo = 0;

            for (n_row = 0; n_row <= FgReg.Rows.Count - 1; n_row++)
            {
                c_dato = FgReg.GetData(n_row, 7).ToString();

                if (c_dato == "True")
                {
                    n_idcargo = Convert.ToInt32(FgReg.GetData(n_row, 9));
                }
            }
            if (o_ventas.Insertar2(e_Documento, n_idcargo) == true)
            {
                CN_est_movimientos objRegistro = new CN_est_movimientos(STU_SISTEMA);
                objRegistro.STU_SISTEMA = STU_SISTEMA;
                objRegistro.ImprimirComprobantePago(STU_SISTEMA.EMPRESAID, Convert.ToInt32(o_ventas.n_IdGenerado), "", 0, N_VISTAPREVIA, 1);
                objRegistro = null;
            }
            else
            {
                MessageBox.Show("¡ ¨Ha ocurrido un un problema, no se pudo guardar el registro ! Error Nº : " + o_ventas.IntErrorNumber.ToString() + " = " + o_ventas.StrErrorMensaje, "", MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button1);
            }
            CmdCan_Click(sender, e);
            o_conec = null;
        }
Beispiel #14
0
        private void CmdCargar_Click(object sender, EventArgs e)
        {
            string          c_dato    = "";
            string          c_numser  = "0001";
            int             n_row     = 0;
            int             n_numdoc  = 0;
            int             n_corr    = 0;
            double          n_imptot  = 0;
            double          n_impigv  = 0;
            double          n_impbru  = 0;
            DataTable       dtCli     = new DataTable();
            CN_est_clientes o_Cliente = new CN_est_clientes(STU_SISTEMA);

            o_Cliente.STU_SISTEMA = STU_SISTEMA;
            o_Cliente.Consulta1(STU_SISTEMA.EMPRESAID, Convert.ToInt16(CboPla.SelectedValue));
            dtCli = o_Cliente.dtListar;

            CN_est_conecta o_conec = new CN_est_conecta(STU_SISTEMA);

            o_tipdoc.mysConec = o_conec.mysConec;
            string c_numdoc = o_tipdoc.UltimoNumero(STU_SISTEMA.EMPRESAID, 83, "0001");

            n_numdoc = Convert.ToInt32(c_numdoc);
            o_conec  = null;

            FgPlacas.Rows.Count = 2;
            //n_numdoc = 1;
            n_corr         = 1;
            LblNumRec.Text = (dtCli.Rows.Count - 1).ToString();

            if (dtCli.Rows.Count != 0)
            {
                for (n_row = 0; n_row <= dtCli.Rows.Count - 1; n_row++)
                {
                    FgPlacas.Rows.Count = FgPlacas.Rows.Count + 1;

                    c_dato = dtCli.Rows[n_row]["c_numdocide"].ToString();
                    FgPlacas.SetData(FgPlacas.Rows.Count - 1, 1, c_dato);

                    c_dato = dtCli.Rows[n_row]["c_nom"].ToString();
                    FgPlacas.SetData(FgPlacas.Rows.Count - 1, 2, c_dato);

                    c_dato = funDatos.DataTableBuscar(dtDoc, "n_id", "c_abr", "83", "N").ToString();
                    FgPlacas.SetData(FgPlacas.Rows.Count - 1, 3, c_dato);

                    c_dato = c_numser + "-" + n_numdoc.ToString("0000000000");
                    FgPlacas.SetData(FgPlacas.Rows.Count - 1, 4, c_dato);

                    n_impbru = 0; n_impigv = 0;
                    n_imptot = Convert.ToDouble(funFunciones.NulosN(dtCli.Rows[n_row]["n_importe"]));
                    if (n_imptot != 0)
                    {
                        n_impbru = (n_imptot / 1.18);
                        n_impigv = (n_imptot - n_impbru);
                    }
                    FgPlacas.SetData(FgPlacas.Rows.Count - 1, 5, n_impbru.ToString("0.00"));

                    FgPlacas.SetData(FgPlacas.Rows.Count - 1, 6, n_impigv.ToString("0.00"));

                    FgPlacas.SetData(FgPlacas.Rows.Count - 1, 7, n_imptot.ToString("0.00"));

                    c_dato = Convert.ToInt16(dtCli.Rows[n_row]["n_id"]).ToString();
                    FgPlacas.SetData(FgPlacas.Rows.Count - 1, 8, c_dato);

                    c_dato = Convert.ToInt16(dtCli.Rows[n_row]["n_tipdocfac"]).ToString();
                    FgPlacas.SetData(FgPlacas.Rows.Count - 1, 9, c_dato);

                    c_dato = Convert.ToInt16(dtCli.Rows[n_row]["n_idser"]).ToString();
                    FgPlacas.SetData(FgPlacas.Rows.Count - 1, 10, c_dato);

                    c_dato = n_corr.ToString();
                    FgPlacas.SetData(FgPlacas.Rows.Count - 1, 11, c_dato);

                    c_dato = dtCli.Rows[n_row]["c_docabr"].ToString();
                    FgPlacas.SetData(FgPlacas.Rows.Count - 1, 12, c_dato);

                    n_numdoc = n_numdoc + 1;
                    n_corr   = n_corr + 1;
                }
            }

            n_imptot = funFlex.FlexSumarCol(FgPlacas, 5, 2, FgPlacas.Rows.Count - 1);
            n_impigv = funFlex.FlexSumarCol(FgPlacas, 6, 2, FgPlacas.Rows.Count - 1);
            n_impbru = funFlex.FlexSumarCol(FgPlacas, 7, 2, FgPlacas.Rows.Count - 1);

            TxtImpBru.Text = n_imptot.ToString("0.00");
            txtImpIgv.Text = n_impigv.ToString("0.00");
            TxtImpTot.Text = n_impbru.ToString("0.00");
            o_Cliente      = null;
        }