Exemplo n.º 1
0
        public string InsertGuiaRemitente_Venta(E_GuiaRemision Obj_GuiaRemision, E_GuiaTransporte Obj_GuiaTransporte, DataTable dtVenta_Diferida, string EmpresaSede, string Documento, int UsuarioID, bool Condicion)
        {
            CD_GuiaRemision objCD_GuiaRemision = new CD_GuiaRemision(AppSettings.GetConnectionString);

            //Creamos una tabla para la generación de guia de remision
            DataTable dtGuiaRemision;

            dtGuiaRemision = new DataTable();
            dtGuiaRemision.Columns.Add("ProductoID", typeof(string));
            dtGuiaRemision.Columns.Add("Cantidad_Entregada", typeof(decimal));
            dtGuiaRemision.Columns.Add("CantidadEnviada", typeof(decimal));
            dtGuiaRemision.Columns.Add("Stock", typeof(decimal));
            dtGuiaRemision.Columns.Add("StockDisponible", typeof(decimal));
            dtGuiaRemision.Columns.Add("AlmacenID", typeof(string));
            dtGuiaRemision.Columns.Add("Cantidad_Diferida", typeof(decimal));

            //Filtrar  las lineas para la guia de remision
            foreach (DataRow Drow in dtVenta_Diferida.Rows)
            {
                if (Convert.ToDecimal(Drow["Despachar"]) != 0)
                {
                    DataRow row;
                    row = dtGuiaRemision.NewRow();
                    row["ProductoID"]         = Drow["Codigo"].ToString();
                    row["Cantidad_Entregada"] = Drow["Cantidad_Entregada"].ToString();
                    row["CantidadEnviada"]    = Drow["Despachar"].ToString();
                    row["Stock"]             = Drow["Despachar"].ToString();
                    row["StockDisponible"]   = Drow["Despachar"].ToString();
                    row["AlmacenID"]         = Drow["AlmacenID"].ToString();
                    row["Cantidad_Diferida"] = Convert.ToDecimal(Drow["Cantidad_Entregada"].ToString()) + Convert.ToDecimal(Drow["Despachar"].ToString());
                    dtGuiaRemision.Rows.Add(row);
                }
            }
            return(objCD_GuiaRemision.InsertGuiaRemitente_Venta(Obj_GuiaRemision, Obj_GuiaTransporte, dtGuiaRemision, EmpresaSede, Documento, UsuarioID, Condicion));
        }
Exemplo n.º 2
0
        public DataSet CrearGuiaTransporte(E_GuiaTransporte CabeceraGuiaTransporte, DataTable DtDetalleGuiaRemisionVenta, string EmpresaSede)
        {
            CD_GuiaTransportista objCD_GuiaTransportista = new CD_GuiaTransportista(AppSettings.GetConnectionString);
            DataSet Ds = new DataSet();

            Ds = objCD_GuiaTransportista.CrearGuiaTransporte(CabeceraGuiaTransporte, DtDetalleGuiaRemisionVenta, EmpresaSede);
            return(Ds);
        }
Exemplo n.º 3
0
        public string InsertGuiaTransportista(E_GuiaTransporte ObjGuiaTransportista, string EmpresaSede)
        {
            CD_GuiaTransportista objCD_GuiaTransportista = new CD_GuiaTransportista(AppSettings.GetConnectionString);
            string NumGuiaTransportista;

            NumGuiaTransportista = objCD_GuiaTransportista.InsertGuiaTransportista(ObjGuiaTransportista, EmpresaSede);
            return(NumGuiaTransportista);
        }
Exemplo n.º 4
0
        private DataSet CrearGuiaTransporte()
        {
            E_GuiaTransporte ObjGuiaTransporte = new E_GuiaTransporte();

            ObjGuiaTransporte.EmpresaID            = CamionEmpresaID;
            ObjGuiaTransporte.DomicilioPartida     = DomicilioPartida;
            ObjGuiaTransporte.NroDomicilioPartida  = NroDomicilioPartida;
            ObjGuiaTransporte.IntDomicilioPartida  = IntDomicilioPartida;
            ObjGuiaTransporte.ZonaDomicilioPartida = ZonaDomicilioPartida;
            ObjGuiaTransporte.DisDomicilioPartida  = DisDomicilioPartida;
            ObjGuiaTransporte.ProvDomicilioPartida = ProvDomicilioPartida;
            ObjGuiaTransporte.DepDomicilioPartida  = DepDomicilioPartida;
            ObjGuiaTransporte.DomicilioLlegada     = DomicilioLlegada;
            if (txtNumero.Text != "")
            {
                ObjGuiaTransporte.NroDomicilioLlegada = Convert.ToInt32(txtNumero.Text);
            }
            if (txtInterior.Text != "")
            {
                ObjGuiaTransporte.IntDomicilioLlegada = Convert.ToInt32(txtInterior.Text);
            }
            ObjGuiaTransporte.ZonaDomicilioLlegada    = ZonaDomicilioLlegada;
            ObjGuiaTransporte.DisDomicilioLlegada     = DisDomicilioLlegada;
            ObjGuiaTransporte.ProvDomicilioLlegada    = ProvDomicilioLlegada;
            ObjGuiaTransporte.DepDomicilioLlegada     = DepDomicilioLlegada;
            ObjGuiaTransporte.Remitente               = Remitente;
            ObjGuiaTransporte.RUCRemitente            = RUCRemitente;
            ObjGuiaTransporte.DireccionRemitente      = DomicilioPartida;
            ObjGuiaTransporte.ObservacionRemitente    = ObservacionRemitente;
            ObjGuiaTransporte.Destinatario            = Destinatario;
            ObjGuiaTransporte.RUCDestinatario         = RUCDestinatario;
            ObjGuiaTransporte.DireccionDestinatario   = DireccionDestinatario;
            ObjGuiaTransporte.ObservacionDestinatario = ObservacionDestinatario;
            ObjGuiaTransporte.Marca                  = CboVehiculo.SelectedText;
            ObjGuiaTransporte.Placa                  = TxtPlaca.Text;
            ObjGuiaTransporte.Carrosa                = TxtCarrosa.Text;
            ObjGuiaTransporte.NombreChofer           = NomTransportista;
            ObjGuiaTransporte.DNIChofer              = TxtDNITransportista.Text;
            ObjGuiaTransporte.FechaSalida            = Convert.ToDateTime(DeFechaSalida.Value);
            ObjGuiaTransporte.ConfiguracionVehicular = TxtConfVehicular.Text;
            if (TxtNroConstInscripcion.Text != "")
            {
                ObjGuiaTransporte.NroConstInscripcion = Convert.ToInt32(TxtNroConstInscripcion.Text);
            }
            ObjGuiaTransporte.NroLicTransportista = TxtNroLicTransaportista.Text;
            ObjGuiaTransporte.TipoGuia            = "V";
            ObjGuiaTransporte.UsuarioID           = AppSettings.UserID;

            //insertar guia transporte y obtener el codigo de registro insertado
            DataSet DsTransporte = new DataSet();

            DsTransporte = ObjCL_GuiaTransportista.CrearGuiaTransporte(ObjGuiaTransporte, DtDetalleGuiaRemisionVenta, AppSettings.EmpresaID + AppSettings.SedeID);
            return(DsTransporte);
        }
Exemplo n.º 5
0
        public string InsertGuiaTransportista(E_GuiaTransporte ObjGuiaTransportista, string EmpresaSede)
        {
            string      NumGuiaTransportista;
            SqlDatabase SqlClient = new SqlDatabase(connectionString);

            DbConnection tCnn;

            tCnn = SqlClient.CreateConnection();
            tCnn.Open();

            DbTransaction tran = tCnn.BeginTransaction();

            try
            {
                // Inserta la Guia de Transportista y devuelve el codigo de Guia de Transportista
                DbCommand SqlCommand = SqlClient.GetStoredProcCommand("Almacen.Usp_InsertGuiaTransportista");

                SqlClient.AddInParameter(SqlCommand, "@EmpresaID", SqlDbType.Char, ObjGuiaTransportista.EmpresaID);
                SqlClient.AddInParameter(SqlCommand, "@NumGuiaRemision", SqlDbType.Char, ObjGuiaTransportista.NumGuiaRemision);
                SqlClient.AddInParameter(SqlCommand, "@DomicilioPartida", SqlDbType.VarChar, ObjGuiaTransportista.DomicilioPartida);
                SqlClient.AddInParameter(SqlCommand, "@NroDomicilioPartida", SqlDbType.Int, ObjGuiaTransportista.NroDomicilioPartida);
                SqlClient.AddInParameter(SqlCommand, "@IntDomicilioPartida", SqlDbType.Int, ObjGuiaTransportista.IntDomicilioPartida);
                SqlClient.AddInParameter(SqlCommand, "@ZonaDomicilioPartida", SqlDbType.VarChar, ObjGuiaTransportista.ZonaDomicilioPartida);
                SqlClient.AddInParameter(SqlCommand, "@DisDomicilioPartida", SqlDbType.VarChar, ObjGuiaTransportista.DisDomicilioPartida);
                SqlClient.AddInParameter(SqlCommand, "@ProvDomicilioPartida", SqlDbType.VarChar, ObjGuiaTransportista.ProvDomicilioPartida);
                SqlClient.AddInParameter(SqlCommand, "@DepDomicilioPartida", SqlDbType.VarChar, ObjGuiaTransportista.DepDomicilioPartida);
                SqlClient.AddInParameter(SqlCommand, "@DomicilioLlegada", SqlDbType.VarChar, ObjGuiaTransportista.DomicilioLlegada);
                SqlClient.AddInParameter(SqlCommand, "@NroDomicilioLlegada", SqlDbType.Int, ObjGuiaTransportista.NroDomicilioLlegada);
                SqlClient.AddInParameter(SqlCommand, "@IntDomicilioLlegada", SqlDbType.Int, ObjGuiaTransportista.IntDomicilioLlegada);
                SqlClient.AddInParameter(SqlCommand, "@ZonaDomicilioLlegada", SqlDbType.VarChar, ObjGuiaTransportista.ZonaDomicilioLlegada);
                SqlClient.AddInParameter(SqlCommand, "@DisDomicilioLlegada", SqlDbType.VarChar, ObjGuiaTransportista.DisDomicilioLlegada);
                SqlClient.AddInParameter(SqlCommand, "@ProvDomicilioLlegada", SqlDbType.VarChar, ObjGuiaTransportista.ProvDomicilioLlegada);
                SqlClient.AddInParameter(SqlCommand, "@DepDomicilioLlegada", SqlDbType.VarChar, ObjGuiaTransportista.DepDomicilioLlegada);
                SqlClient.AddInParameter(SqlCommand, "@Remitente", SqlDbType.VarChar, ObjGuiaTransportista.Remitente);
                SqlClient.AddInParameter(SqlCommand, "@RUCRemitente", SqlDbType.Char, ObjGuiaTransportista.RUCRemitente);
                SqlClient.AddInParameter(SqlCommand, "@DireccionRemitente", SqlDbType.VarChar, ObjGuiaTransportista.DireccionRemitente);
                SqlClient.AddInParameter(SqlCommand, "@ObservacionRemitente", SqlDbType.VarChar, ObjGuiaTransportista.ObservacionRemitente);
                SqlClient.AddInParameter(SqlCommand, "@Destinatario", SqlDbType.VarChar, ObjGuiaTransportista.Destinatario);
                SqlClient.AddInParameter(SqlCommand, "@RUCDestinatario", SqlDbType.Char, ObjGuiaTransportista.RUCDestinatario);
                SqlClient.AddInParameter(SqlCommand, "@DireccionDestinatario", SqlDbType.VarChar, ObjGuiaTransportista.DireccionDestinatario);
                SqlClient.AddInParameter(SqlCommand, "@ObservacionDestinatario", SqlDbType.VarChar, ObjGuiaTransportista.ObservacionDestinatario);
                SqlClient.AddInParameter(SqlCommand, "@Marca", SqlDbType.VarChar, ObjGuiaTransportista.Marca);
                SqlClient.AddInParameter(SqlCommand, "@Placa", SqlDbType.VarChar, ObjGuiaTransportista.Placa);
                SqlClient.AddInParameter(SqlCommand, "@Carrosa", SqlDbType.VarChar, ObjGuiaTransportista.Carrosa);
                SqlClient.AddInParameter(SqlCommand, "@NombreChofer", SqlDbType.VarChar, ObjGuiaTransportista.NombreChofer);
                SqlClient.AddInParameter(SqlCommand, "@DNIChofer", SqlDbType.Char, ObjGuiaTransportista.DNIChofer);
                SqlClient.AddInParameter(SqlCommand, "@FechaSalida", SqlDbType.DateTime, ObjGuiaTransportista.FechaSalida);
                SqlClient.AddInParameter(SqlCommand, "@ConfiguracionVehicular", SqlDbType.VarChar, ObjGuiaTransportista.ConfiguracionVehicular);
                SqlClient.AddInParameter(SqlCommand, "@NroConstInscripcion", SqlDbType.Int, ObjGuiaTransportista.NroConstInscripcion);
                SqlClient.AddInParameter(SqlCommand, "@NroLicTransportista", SqlDbType.VarChar, ObjGuiaTransportista.NroLicTransportista);
                SqlClient.AddInParameter(SqlCommand, "@UsuarioID", SqlDbType.Int, ObjGuiaTransportista.UsuarioID);
                SqlClient.AddInParameter(SqlCommand, "@TipoGuia", SqlDbType.Char, ObjGuiaTransportista.TipoGuia);

                SqlClient.AddInParameter(SqlCommand, "@EmpresaSede", SqlDbType.Char, EmpresaSede);

                NumGuiaTransportista = Convert.ToString(SqlClient.ExecuteScalar(SqlCommand, tran));

                tran.Commit();
                tCnn.Close();
                tCnn.Dispose();
                SqlCommand.Dispose();
                return(NumGuiaTransportista);
            }
            catch (Exception ex)
            {
                tran.Rollback();
                throw new Exception(ex.Message);
            }
        }
Exemplo n.º 6
0
        public DataSet CrearGuiaTransporte(E_GuiaTransporte CabeceraGuiaTransporte, DataTable DtDetalleGuiaRemisionVenta, string EmpresaSede)
        {
            string  NumGuiaTransportista;
            DataSet Ds = new DataSet();

            #region crear tabla cabecera
            DataTable DtCabecera = new DataTable("DtCabecera");
            DtCabecera.Columns.Add("NumGuiaTransportista", typeof(string));
            DtCabecera.Columns.Add("EmpresaID", typeof(string));
            DtCabecera.Columns.Add("NumGuiaRemision", typeof(string));
            DtCabecera.Columns.Add("DomicilioPartida", typeof(string));
            DtCabecera.Columns.Add("NroDomicilioPartida", typeof(Int32));
            DtCabecera.Columns.Add("IntDomicilioPartida", typeof(Int32));
            DtCabecera.Columns.Add("ZonaDomicilioPartida", typeof(string));
            DtCabecera.Columns.Add("DisDomicilioPartida", typeof(string));
            DtCabecera.Columns.Add("ProvDomicilioPartida", typeof(string));
            DtCabecera.Columns.Add("DepDomicilioPartida", typeof(string));
            DtCabecera.Columns.Add("DomicilioLlegada", typeof(string));
            DtCabecera.Columns.Add("NroDomicilioLlegada", typeof(Int32));
            DtCabecera.Columns.Add("IntDomicilioLlegada", typeof(Int32));
            DtCabecera.Columns.Add("ZonaDomicilioLlegada", typeof(string));
            DtCabecera.Columns.Add("DisDomicilioLlegada", typeof(string));
            DtCabecera.Columns.Add("ProvDomicilioLlegada", typeof(string));
            DtCabecera.Columns.Add("DepDomicilioLlegada", typeof(string));
            DtCabecera.Columns.Add("Remitente", typeof(string));
            DtCabecera.Columns.Add("RUCRemitente", typeof(string));
            DtCabecera.Columns.Add("DireccionRemitente", typeof(string));
            DtCabecera.Columns.Add("ObservacionRemitente", typeof(string));
            DtCabecera.Columns.Add("Destinatario", typeof(string));
            DtCabecera.Columns.Add("RUCDestinatario", typeof(string));
            DtCabecera.Columns.Add("DireccionDestinatario", typeof(string));
            DtCabecera.Columns.Add("ObservacionDestinatario", typeof(string));
            DtCabecera.Columns.Add("Marca", typeof(string));
            DtCabecera.Columns.Add("Placa", typeof(string));
            DtCabecera.Columns.Add("Carrosa", typeof(string));
            DtCabecera.Columns.Add("NombreChofer", typeof(string));
            DtCabecera.Columns.Add("DNIChofer", typeof(string));
            DtCabecera.Columns.Add("FechaSalida", typeof(DateTime));
            DtCabecera.Columns.Add("ConfiguracionVehicular", typeof(string));
            DtCabecera.Columns.Add("NroConstInscripcion", typeof(Int32));
            DtCabecera.Columns.Add("NroLicTransportista", typeof(string));
            DtCabecera.Columns.Add("UsuarioID", typeof(Int32));
            DtCabecera.Columns.Add("EstadoID", typeof(Int32));
            #endregion
            #region crear tabla detalle
            DataTable DtDetalleGuiaTransportista = new DataTable("DetalleGuiaRemisionVenta");
            DtDetalleGuiaTransportista.Columns.Add("NumGuiaTransportista", typeof(string));
            DtDetalleGuiaTransportista.Columns.Add("ProductoID", typeof(string));
            DtDetalleGuiaTransportista.Columns.Add("CantidadEnviada", typeof(decimal));
            DtDetalleGuiaTransportista.Columns.Add("NomProducto", typeof(string));
            DtDetalleGuiaTransportista.Columns.Add("UnidadMedidaID", typeof(string));
            DtDetalleGuiaTransportista.Columns.Add("PesoNeto", typeof(decimal));
            #endregion

            SqlDatabase  SqlClient  = new SqlDatabase(connectionString);
            SqlDatabase  SqlClientD = new SqlDatabase(connectionString);
            DbConnection tCnn;
            tCnn = SqlClient.CreateConnection();
            tCnn.Open();

            DbTransaction tran = tCnn.BeginTransaction();

            try
            {
                //acumular de 10
                DataTable NewDtDetalleGuiaRemisionVenta = DtDetalleGuiaRemisionVenta.Clone();
                foreach (DataRow Dr in DtDetalleGuiaRemisionVenta.Rows)
                {
                    NewDtDetalleGuiaRemisionVenta.ImportRow(Dr);
                    if (NewDtDetalleGuiaRemisionVenta.Rows.Count == 10)//maximo de lineas que puede contener una guia
                    {
                        //insertar la guia
                        DbCommand SqlCommand = SqlClient.GetStoredProcCommand("Almacen.Usp_InsertGuiaTransportista");
                        #region Cabecera guia
                        SqlClient.AddInParameter(SqlCommand, "@EmpresaID", SqlDbType.Char, CabeceraGuiaTransporte.EmpresaID);
                        SqlClient.AddInParameter(SqlCommand, "@NumGuiaRemision", SqlDbType.Char, CabeceraGuiaTransporte.NumGuiaRemision);
                        SqlClient.AddInParameter(SqlCommand, "@DomicilioPartida", SqlDbType.VarChar, CabeceraGuiaTransporte.DomicilioPartida);
                        SqlClient.AddInParameter(SqlCommand, "@NroDomicilioPartida", SqlDbType.Int, CabeceraGuiaTransporte.NroDomicilioPartida);
                        SqlClient.AddInParameter(SqlCommand, "@IntDomicilioPartida", SqlDbType.Int, CabeceraGuiaTransporte.IntDomicilioPartida);
                        SqlClient.AddInParameter(SqlCommand, "@ZonaDomicilioPartida", SqlDbType.VarChar, CabeceraGuiaTransporte.ZonaDomicilioPartida);
                        SqlClient.AddInParameter(SqlCommand, "@DisDomicilioPartida", SqlDbType.VarChar, CabeceraGuiaTransporte.DisDomicilioPartida);
                        SqlClient.AddInParameter(SqlCommand, "@ProvDomicilioPartida", SqlDbType.VarChar, CabeceraGuiaTransporte.ProvDomicilioPartida);
                        SqlClient.AddInParameter(SqlCommand, "@DepDomicilioPartida", SqlDbType.VarChar, CabeceraGuiaTransporte.DepDomicilioPartida);
                        SqlClient.AddInParameter(SqlCommand, "@DomicilioLlegada", SqlDbType.VarChar, CabeceraGuiaTransporte.DomicilioLlegada);
                        SqlClient.AddInParameter(SqlCommand, "@NroDomicilioLlegada", SqlDbType.Int, CabeceraGuiaTransporte.NroDomicilioLlegada);
                        SqlClient.AddInParameter(SqlCommand, "@IntDomicilioLlegada", SqlDbType.Int, CabeceraGuiaTransporte.IntDomicilioLlegada);
                        SqlClient.AddInParameter(SqlCommand, "@ZonaDomicilioLlegada", SqlDbType.VarChar, CabeceraGuiaTransporte.ZonaDomicilioLlegada);
                        SqlClient.AddInParameter(SqlCommand, "@DisDomicilioLlegada", SqlDbType.VarChar, CabeceraGuiaTransporte.DisDomicilioLlegada);
                        SqlClient.AddInParameter(SqlCommand, "@ProvDomicilioLlegada", SqlDbType.VarChar, CabeceraGuiaTransporte.ProvDomicilioLlegada);
                        SqlClient.AddInParameter(SqlCommand, "@DepDomicilioLlegada", SqlDbType.VarChar, CabeceraGuiaTransporte.DepDomicilioLlegada);
                        SqlClient.AddInParameter(SqlCommand, "@Remitente", SqlDbType.VarChar, CabeceraGuiaTransporte.Remitente);
                        SqlClient.AddInParameter(SqlCommand, "@RUCRemitente", SqlDbType.Char, CabeceraGuiaTransporte.RUCRemitente);
                        SqlClient.AddInParameter(SqlCommand, "@DireccionRemitente", SqlDbType.VarChar, CabeceraGuiaTransporte.DireccionRemitente);
                        SqlClient.AddInParameter(SqlCommand, "@ObservacionRemitente", SqlDbType.VarChar, CabeceraGuiaTransporte.ObservacionRemitente);
                        SqlClient.AddInParameter(SqlCommand, "@Destinatario", SqlDbType.VarChar, CabeceraGuiaTransporte.Destinatario);
                        SqlClient.AddInParameter(SqlCommand, "@RUCDestinatario", SqlDbType.Char, CabeceraGuiaTransporte.RUCDestinatario);
                        SqlClient.AddInParameter(SqlCommand, "@DireccionDestinatario", SqlDbType.VarChar, CabeceraGuiaTransporte.DireccionDestinatario);
                        SqlClient.AddInParameter(SqlCommand, "@ObservacionDestinatario", SqlDbType.VarChar, CabeceraGuiaTransporte.ObservacionDestinatario);
                        SqlClient.AddInParameter(SqlCommand, "@Marca", SqlDbType.VarChar, CabeceraGuiaTransporte.Marca);
                        SqlClient.AddInParameter(SqlCommand, "@Placa", SqlDbType.VarChar, CabeceraGuiaTransporte.Placa);
                        SqlClient.AddInParameter(SqlCommand, "@Carrosa", SqlDbType.VarChar, CabeceraGuiaTransporte.Carrosa);
                        SqlClient.AddInParameter(SqlCommand, "@NombreChofer", SqlDbType.VarChar, CabeceraGuiaTransporte.NombreChofer);
                        SqlClient.AddInParameter(SqlCommand, "@DNIChofer", SqlDbType.Char, CabeceraGuiaTransporte.DNIChofer);
                        SqlClient.AddInParameter(SqlCommand, "@FechaSalida", SqlDbType.DateTime, CabeceraGuiaTransporte.FechaSalida);
                        SqlClient.AddInParameter(SqlCommand, "@ConfiguracionVehicular", SqlDbType.VarChar, CabeceraGuiaTransporte.ConfiguracionVehicular);
                        SqlClient.AddInParameter(SqlCommand, "@NroConstInscripcion", SqlDbType.Int, CabeceraGuiaTransporte.NroConstInscripcion);
                        SqlClient.AddInParameter(SqlCommand, "@NroLicTransportista", SqlDbType.VarChar, CabeceraGuiaTransporte.NroLicTransportista);
                        SqlClient.AddInParameter(SqlCommand, "@TipoGuia", SqlDbType.Char, CabeceraGuiaTransporte.TipoGuia);
                        SqlClient.AddInParameter(SqlCommand, "@UsuarioID", SqlDbType.Int, CabeceraGuiaTransporte.UsuarioID);

                        SqlClient.AddInParameter(SqlCommand, "@EmpresaSede", SqlDbType.Char, EmpresaSede);
                        #endregion
                        NumGuiaTransportista = Convert.ToString(SqlClient.ExecuteScalar(SqlCommand, tran));

                        #region Agregar Cabecera
                        DataRow DRC = DtCabecera.NewRow();
                        DRC["NumGuiaTransportista"]    = NumGuiaTransportista;
                        DRC["EmpresaID"]               = CabeceraGuiaTransporte.EmpresaID;
                        DRC["NumGuiaRemision"]         = CabeceraGuiaTransporte.NumGuiaRemision;
                        DRC["DomicilioPartida"]        = CabeceraGuiaTransporte.DomicilioPartida;
                        DRC["NroDomicilioPartida"]     = CabeceraGuiaTransporte.NroDomicilioPartida;
                        DRC["IntDomicilioPartida"]     = CabeceraGuiaTransporte.IntDomicilioPartida;
                        DRC["ZonaDomicilioPartida"]    = CabeceraGuiaTransporte.ZonaDomicilioPartida;
                        DRC["DisDomicilioPartida"]     = CabeceraGuiaTransporte.DisDomicilioPartida;
                        DRC["ProvDomicilioPartida"]    = CabeceraGuiaTransporte.ProvDomicilioPartida;
                        DRC["DepDomicilioPartida"]     = CabeceraGuiaTransporte.DepDomicilioPartida;
                        DRC["DomicilioLlegada"]        = CabeceraGuiaTransporte.DomicilioLlegada;
                        DRC["NroDomicilioLlegada"]     = CabeceraGuiaTransporte.NroDomicilioLlegada;
                        DRC["IntDomicilioLlegada"]     = CabeceraGuiaTransporte.IntDomicilioLlegada;
                        DRC["ZonaDomicilioLlegada"]    = CabeceraGuiaTransporte.ZonaDomicilioLlegada;
                        DRC["DisDomicilioLlegada"]     = CabeceraGuiaTransporte.DisDomicilioLlegada;
                        DRC["ProvDomicilioLlegada"]    = CabeceraGuiaTransporte.ProvDomicilioLlegada;
                        DRC["DepDomicilioLlegada"]     = CabeceraGuiaTransporte.DepDomicilioLlegada;
                        DRC["Remitente"]               = CabeceraGuiaTransporte.Remitente;
                        DRC["RUCRemitente"]            = CabeceraGuiaTransporte.RUCRemitente;
                        DRC["DireccionRemitente"]      = CabeceraGuiaTransporte.DireccionRemitente;
                        DRC["ObservacionRemitente"]    = CabeceraGuiaTransporte.ObservacionRemitente;
                        DRC["Destinatario"]            = CabeceraGuiaTransporte.Destinatario;
                        DRC["RUCDestinatario"]         = CabeceraGuiaTransporte.RUCDestinatario;
                        DRC["DireccionDestinatario"]   = CabeceraGuiaTransporte.DireccionDestinatario;
                        DRC["ObservacionDestinatario"] = CabeceraGuiaTransporte.ObservacionDestinatario;
                        DRC["Marca"]                  = CabeceraGuiaTransporte.Marca;
                        DRC["Placa"]                  = CabeceraGuiaTransporte.Placa;
                        DRC["Carrosa"]                = CabeceraGuiaTransporte.Carrosa;
                        DRC["NombreChofer"]           = CabeceraGuiaTransporte.NombreChofer;
                        DRC["DNIChofer"]              = CabeceraGuiaTransporte.DNIChofer;
                        DRC["FechaSalida"]            = CabeceraGuiaTransporte.FechaSalida;
                        DRC["ConfiguracionVehicular"] = CabeceraGuiaTransporte.ConfiguracionVehicular;
                        DRC["NroConstInscripcion"]    = CabeceraGuiaTransporte.NroConstInscripcion;
                        DRC["NroLicTransportista"]    = CabeceraGuiaTransporte.NroLicTransportista;
                        DRC["UsuarioID"]              = CabeceraGuiaTransporte.UsuarioID;
                        DRC["EstadoID"]               = 0;
                        DtCabecera.Rows.Add(DRC);
                        #endregion

                        string xml, xmlDetalle;
                        xml        = new BaseFunctions().GetXML(NewDtDetalleGuiaRemisionVenta).Replace("NewDataSet", "DocumentElement");
                        xmlDetalle = xml.Replace("Table", "DetalleGuiaTransportista");

                        DbCommand SqlCommand2 = SqlClientD.GetStoredProcCommand("Almacen.Usp_Insert_XMLDetalleGuiaTransportistaVenta2");
                        SqlClientD.AddInParameter(SqlCommand2, "@XML", SqlDbType.Xml, xmlDetalle);
                        SqlClientD.AddInParameter(SqlCommand2, "@NumGuiaTransportista", SqlDbType.Char, NumGuiaTransportista);
                        SqlClientD.ExecuteNonQuery(SqlCommand2, tran);

                        #region agregar detalles
                        foreach (DataRow DR in NewDtDetalleGuiaRemisionVenta.Rows)
                        {
                            DataRow DRD = DtDetalleGuiaTransportista.NewRow();
                            DRD["NumGuiaTransportista"] = NumGuiaTransportista;
                            DRD["ProductoID"]           = DR["ProductoID"];
                            DRD["CantidadEnviada"]      = DR["CantidadEnviada"];
                            DRD["NomProducto"]          = DR["NomProducto"];
                            DRD["UnidadMedidaID"]       = DR["UnidadMedidaID"];
                            DRD["PesoNeto"]             = DR["PesoNeto"];
                            DtDetalleGuiaTransportista.Rows.Add(DRD);
                        }
                        #endregion

                        SqlCommand2.Dispose();
                        SqlCommand.Dispose();

                        NewDtDetalleGuiaRemisionVenta.Rows.Clear();
                    }
                }

                if (NewDtDetalleGuiaRemisionVenta.Rows.Count < 10 & NewDtDetalleGuiaRemisionVenta.Rows.Count > 0)//en caso de que la guia sea menor que 10
                {
                    //insertar la guia
                    DbCommand SqlCommand = SqlClient.GetStoredProcCommand("Almacen.Usp_InsertGuiaTransportista");
                    #region Cabecera guia
                    SqlClient.AddInParameter(SqlCommand, "@EmpresaID", SqlDbType.Char, CabeceraGuiaTransporte.EmpresaID);
                    SqlClient.AddInParameter(SqlCommand, "@NumGuiaRemision", SqlDbType.Char, CabeceraGuiaTransporte.NumGuiaRemision);
                    SqlClient.AddInParameter(SqlCommand, "@DomicilioPartida", SqlDbType.VarChar, CabeceraGuiaTransporte.DomicilioPartida);
                    SqlClient.AddInParameter(SqlCommand, "@NroDomicilioPartida", SqlDbType.Int, CabeceraGuiaTransporte.NroDomicilioPartida);
                    SqlClient.AddInParameter(SqlCommand, "@IntDomicilioPartida", SqlDbType.Int, CabeceraGuiaTransporte.IntDomicilioPartida);
                    SqlClient.AddInParameter(SqlCommand, "@ZonaDomicilioPartida", SqlDbType.VarChar, CabeceraGuiaTransporte.ZonaDomicilioPartida);
                    SqlClient.AddInParameter(SqlCommand, "@DisDomicilioPartida", SqlDbType.VarChar, CabeceraGuiaTransporte.DisDomicilioPartida);
                    SqlClient.AddInParameter(SqlCommand, "@ProvDomicilioPartida", SqlDbType.VarChar, CabeceraGuiaTransporte.ProvDomicilioPartida);
                    SqlClient.AddInParameter(SqlCommand, "@DepDomicilioPartida", SqlDbType.VarChar, CabeceraGuiaTransporte.DepDomicilioPartida);
                    SqlClient.AddInParameter(SqlCommand, "@DomicilioLlegada", SqlDbType.VarChar, CabeceraGuiaTransporte.DomicilioLlegada);
                    SqlClient.AddInParameter(SqlCommand, "@NroDomicilioLlegada", SqlDbType.Int, CabeceraGuiaTransporte.NroDomicilioLlegada);
                    SqlClient.AddInParameter(SqlCommand, "@IntDomicilioLlegada", SqlDbType.Int, CabeceraGuiaTransporte.IntDomicilioLlegada);
                    SqlClient.AddInParameter(SqlCommand, "@ZonaDomicilioLlegada", SqlDbType.VarChar, CabeceraGuiaTransporte.ZonaDomicilioLlegada);
                    SqlClient.AddInParameter(SqlCommand, "@DisDomicilioLlegada", SqlDbType.VarChar, CabeceraGuiaTransporte.DisDomicilioLlegada);
                    SqlClient.AddInParameter(SqlCommand, "@ProvDomicilioLlegada", SqlDbType.VarChar, CabeceraGuiaTransporte.ProvDomicilioLlegada);
                    SqlClient.AddInParameter(SqlCommand, "@DepDomicilioLlegada", SqlDbType.VarChar, CabeceraGuiaTransporte.DepDomicilioLlegada);
                    SqlClient.AddInParameter(SqlCommand, "@Remitente", SqlDbType.VarChar, CabeceraGuiaTransporte.Remitente);
                    SqlClient.AddInParameter(SqlCommand, "@RUCRemitente", SqlDbType.Char, CabeceraGuiaTransporte.RUCRemitente);
                    SqlClient.AddInParameter(SqlCommand, "@DireccionRemitente", SqlDbType.VarChar, CabeceraGuiaTransporte.DireccionRemitente);
                    SqlClient.AddInParameter(SqlCommand, "@ObservacionRemitente", SqlDbType.VarChar, CabeceraGuiaTransporte.ObservacionRemitente);
                    SqlClient.AddInParameter(SqlCommand, "@Destinatario", SqlDbType.VarChar, CabeceraGuiaTransporte.Destinatario);
                    SqlClient.AddInParameter(SqlCommand, "@RUCDestinatario", SqlDbType.Char, CabeceraGuiaTransporte.RUCDestinatario);
                    SqlClient.AddInParameter(SqlCommand, "@DireccionDestinatario", SqlDbType.VarChar, CabeceraGuiaTransporte.DireccionDestinatario);
                    SqlClient.AddInParameter(SqlCommand, "@ObservacionDestinatario", SqlDbType.VarChar, CabeceraGuiaTransporte.ObservacionDestinatario);
                    SqlClient.AddInParameter(SqlCommand, "@Marca", SqlDbType.VarChar, CabeceraGuiaTransporte.Marca);
                    SqlClient.AddInParameter(SqlCommand, "@Placa", SqlDbType.VarChar, CabeceraGuiaTransporte.Placa);
                    SqlClient.AddInParameter(SqlCommand, "@Carrosa", SqlDbType.VarChar, CabeceraGuiaTransporte.Carrosa);
                    SqlClient.AddInParameter(SqlCommand, "@NombreChofer", SqlDbType.VarChar, CabeceraGuiaTransporte.NombreChofer);
                    SqlClient.AddInParameter(SqlCommand, "@DNIChofer", SqlDbType.Char, CabeceraGuiaTransporte.DNIChofer);
                    SqlClient.AddInParameter(SqlCommand, "@FechaSalida", SqlDbType.DateTime, CabeceraGuiaTransporte.FechaSalida);
                    SqlClient.AddInParameter(SqlCommand, "@ConfiguracionVehicular", SqlDbType.VarChar, CabeceraGuiaTransporte.ConfiguracionVehicular);
                    SqlClient.AddInParameter(SqlCommand, "@NroConstInscripcion", SqlDbType.Int, CabeceraGuiaTransporte.NroConstInscripcion);
                    SqlClient.AddInParameter(SqlCommand, "@NroLicTransportista", SqlDbType.VarChar, CabeceraGuiaTransporte.NroLicTransportista);
                    SqlClient.AddInParameter(SqlCommand, "@TipoGuia", SqlDbType.Char, CabeceraGuiaTransporte.TipoGuia);
                    SqlClient.AddInParameter(SqlCommand, "@UsuarioID", SqlDbType.Int, CabeceraGuiaTransporte.UsuarioID);

                    SqlClient.AddInParameter(SqlCommand, "@EmpresaSede", SqlDbType.Char, EmpresaSede);
                    #endregion
                    NumGuiaTransportista = Convert.ToString(SqlClient.ExecuteScalar(SqlCommand, tran));

                    #region Agregar Cabecera
                    DataRow DRC = DtCabecera.NewRow();
                    DRC["NumGuiaTransportista"]    = NumGuiaTransportista;
                    DRC["EmpresaID"]               = CabeceraGuiaTransporte.EmpresaID;
                    DRC["NumGuiaRemision"]         = CabeceraGuiaTransporte.NumGuiaRemision;
                    DRC["DomicilioPartida"]        = CabeceraGuiaTransporte.DomicilioPartida;
                    DRC["NroDomicilioPartida"]     = CabeceraGuiaTransporte.NroDomicilioPartida;
                    DRC["IntDomicilioPartida"]     = CabeceraGuiaTransporte.IntDomicilioPartida;
                    DRC["ZonaDomicilioPartida"]    = CabeceraGuiaTransporte.ZonaDomicilioPartida;
                    DRC["DisDomicilioPartida"]     = CabeceraGuiaTransporte.DisDomicilioPartida;
                    DRC["ProvDomicilioPartida"]    = CabeceraGuiaTransporte.ProvDomicilioPartida;
                    DRC["DepDomicilioPartida"]     = CabeceraGuiaTransporte.DepDomicilioPartida;
                    DRC["DomicilioLlegada"]        = CabeceraGuiaTransporte.DomicilioLlegada;
                    DRC["NroDomicilioLlegada"]     = CabeceraGuiaTransporte.NroDomicilioLlegada;
                    DRC["IntDomicilioLlegada"]     = CabeceraGuiaTransporte.IntDomicilioLlegada;
                    DRC["ZonaDomicilioLlegada"]    = CabeceraGuiaTransporte.ZonaDomicilioLlegada;
                    DRC["DisDomicilioLlegada"]     = CabeceraGuiaTransporte.DisDomicilioLlegada;
                    DRC["ProvDomicilioLlegada"]    = CabeceraGuiaTransporte.ProvDomicilioLlegada;
                    DRC["DepDomicilioLlegada"]     = CabeceraGuiaTransporte.DepDomicilioLlegada;
                    DRC["Remitente"]               = CabeceraGuiaTransporte.Remitente;
                    DRC["RUCRemitente"]            = CabeceraGuiaTransporte.RUCRemitente;
                    DRC["DireccionRemitente"]      = CabeceraGuiaTransporte.DireccionRemitente;
                    DRC["ObservacionRemitente"]    = CabeceraGuiaTransporte.ObservacionRemitente;
                    DRC["Destinatario"]            = CabeceraGuiaTransporte.Destinatario;
                    DRC["RUCDestinatario"]         = CabeceraGuiaTransporte.RUCDestinatario;
                    DRC["DireccionDestinatario"]   = CabeceraGuiaTransporte.DireccionDestinatario;
                    DRC["ObservacionDestinatario"] = CabeceraGuiaTransporte.ObservacionDestinatario;
                    DRC["Marca"]                  = CabeceraGuiaTransporte.Marca;
                    DRC["Placa"]                  = CabeceraGuiaTransporte.Placa;
                    DRC["Carrosa"]                = CabeceraGuiaTransporte.Carrosa;
                    DRC["NombreChofer"]           = CabeceraGuiaTransporte.NombreChofer;
                    DRC["DNIChofer"]              = CabeceraGuiaTransporte.DNIChofer;
                    DRC["FechaSalida"]            = CabeceraGuiaTransporte.FechaSalida;
                    DRC["ConfiguracionVehicular"] = CabeceraGuiaTransporte.ConfiguracionVehicular;
                    DRC["NroConstInscripcion"]    = CabeceraGuiaTransporte.NroConstInscripcion;
                    DRC["NroLicTransportista"]    = CabeceraGuiaTransporte.NroLicTransportista;
                    DRC["UsuarioID"]              = CabeceraGuiaTransporte.UsuarioID;
                    DRC["EstadoID"]               = 0;
                    DtCabecera.Rows.Add(DRC);
                    #endregion

                    string xml, xmlDetalle;
                    xml        = new BaseFunctions().GetXML(NewDtDetalleGuiaRemisionVenta).Replace("NewDataSet", "DocumentElement");
                    xmlDetalle = xml.Replace("Table", "DetalleGuiaTransportista");

                    DbCommand SqlCommand2 = SqlClientD.GetStoredProcCommand("Almacen.Usp_Insert_XMLDetalleGuiaTransportistaVenta2");
                    SqlClientD.AddInParameter(SqlCommand2, "@XML", SqlDbType.Xml, xmlDetalle);
                    SqlClientD.AddInParameter(SqlCommand2, "@NumGuiaTransportista", SqlDbType.Char, NumGuiaTransportista);
                    SqlClientD.ExecuteNonQuery(SqlCommand2, tran);

                    #region agregar detalles

                    foreach (DataRow DR in NewDtDetalleGuiaRemisionVenta.Rows)
                    {
                        DataRow DRD = DtDetalleGuiaTransportista.NewRow();
                        DRD["NumGuiaTransportista"] = NumGuiaTransportista;
                        DRD["ProductoID"]           = DR["ProductoID"];
                        DRD["CantidadEnviada"]      = DR["CantidadEnviada"];
                        DRD["NomProducto"]          = DR["NomProducto"];
                        DRD["UnidadMedidaID"]       = DR["UnidadMedidaID"];
                        DRD["PesoNeto"]             = DR["PesoNeto"];
                        DtDetalleGuiaTransportista.Rows.Add(DRD);
                    }
                    #endregion

                    SqlCommand2.Dispose();
                    SqlCommand.Dispose();

                    NewDtDetalleGuiaRemisionVenta.Rows.Clear();
                }

                tran.Commit();
                tCnn.Close();
                tCnn.Dispose();

                Ds.Tables.Add(DtCabecera);
                Ds.Tables.Add(DtDetalleGuiaTransportista);

                return(Ds);
            }
            catch (Exception ex)
            {
                tran.Rollback();
                tCnn.Close();
                tCnn.Dispose();
                throw new Exception(ex.Message);
            }
        }
Exemplo n.º 7
0
        private void CrearGuias()
        {
            #region Crear guiaremision
            E_GuiaRemision ObjGuiaRemision = new E_GuiaRemision();

            ObjGuiaRemision.EmpresaID                    = EmpresaIDUser;
            ObjGuiaRemision.NroJabas                     = Convert.ToInt16(TxtNroJabas.Value);
            ObjGuiaRemision.DesAnimal                    = TxtProducto.Value.ToString();
            ObjGuiaRemision.NroGalpon                    = 0;
            ObjGuiaRemision.DomicilioPartida             = DomicilioPartida;
            ObjGuiaRemision.NroDomicilioPartida          = NroDomicilioPartida;
            ObjGuiaRemision.InteriorDomicilioPartida     = IntDomicilioPartida;
            ObjGuiaRemision.ZonaDomicilioPartida         = ZonaDomicilioPartida;
            ObjGuiaRemision.DistritoDomicilioPartida     = DisDomicilioPartida;
            ObjGuiaRemision.ProvinciaDomicilioPartida    = ProvDomicilioPartida;
            ObjGuiaRemision.DepartamentoDomicilioPartida = DepDomicilioPartida;
            ObjGuiaRemision.DomicilioLlegada             = CboSedeDestino.Columns["NomSede"].Value.ToString();

            if (CboSedeDestino.Columns["Numero"].Value == DBNull.Value)
            {
                ObjGuiaRemision.NroDomicilioLlegada = 0;
            }
            else
            {
                ObjGuiaRemision.NroDomicilioLlegada = Convert.ToInt16(CboSedeDestino.Columns["Numero"].Value);
            }

            if (CboSedeDestino.Columns["Interior"].Value == DBNull.Value)
            {
                ObjGuiaRemision.IntDomicilioLlegada = 0;
            }
            else
            {
                ObjGuiaRemision.IntDomicilioLlegada = Convert.ToInt16(CboSedeDestino.Columns["Interior"].Value);
            }

            ObjGuiaRemision.ZonaDomicilioLlegada    = CboSedeDestino.Columns["Zona"].Value.ToString();
            ObjGuiaRemision.DisDomicilioLlegada     = CboSedeDestino.Columns["Distrito"].Value.ToString();
            ObjGuiaRemision.ProvDomicilioLlegada    = CboSedeDestino.Columns["Provincia"].Value.ToString();
            ObjGuiaRemision.DepDomicilioLlegada     = CboSedeDestino.Columns["Departamento"].Value.ToString();
            ObjGuiaRemision.Destinatario            = AppSettings.NomEmpresa;
            ObjGuiaRemision.RUCDestinatario         = AppSettings.RUCEmpresa;
            ObjGuiaRemision.DireccionDestinatario   = CboSedeDestino.Columns["NomSede"].Value.ToString();
            ObjGuiaRemision.ObservacionDestinatario = null;
            ObjGuiaRemision.Marca                  = TxtMarca.Value.ToString();
            ObjGuiaRemision.Placa                  = TxtPlaca.Value.ToString();
            ObjGuiaRemision.Carrosa                = TxtCarrosa.Text;
            ObjGuiaRemision.NombreChofer           = NomTransportista;
            ObjGuiaRemision.DNIChofer              = TxtDNITransportista.Value.ToString();
            ObjGuiaRemision.FechaSalida            = Convert.ToDateTime(DeFechaSalida.Value.ToString());
            ObjGuiaRemision.ConfiguracionVehicular = TxtConfVehicular.Value.ToString();
            if (TxtNroConstInscripcion.Text == "")
            {
                ObjGuiaRemision.NroConstInscripcion = 0;
            }
            else
            {
                ObjGuiaRemision.NroConstInscripcion = Convert.ToInt32(TxtNroConstInscripcion.Value);
            }
            ObjGuiaRemision.NroLicTransportista = TxtNroLicTransaportista.Value.ToString();
            ObjGuiaRemision.NroFactura          = "";
            ObjGuiaRemision.Pesador             = Pesador;
            ObjGuiaRemision.Galponero           = Galponero;
            ObjGuiaRemision.UsuarioID           = AppSettings.UserID;
            #endregion

            #region Crear GuiaTransportista
            //se crea guia de transportista si solo si el camion no pertenece a la empresa de destino
            E_GuiaTransporte ObjGuiaTransporte = new E_GuiaTransporte();
            if ((EmpresaIDUser != CamionEmpresaID) && CamionEmpresaID != "EX")
            {
                ObjGuiaTransporte.EmpresaID            = CamionEmpresaID;
                ObjGuiaTransporte.NumGuiaRemision      = NumGuiaRemision;
                ObjGuiaTransporte.DomicilioPartida     = DomicilioPartida;
                ObjGuiaTransporte.NroDomicilioPartida  = NroDomicilioPartida;
                ObjGuiaTransporte.IntDomicilioPartida  = IntDomicilioPartida;
                ObjGuiaTransporte.ZonaDomicilioPartida = ZonaDomicilioPartida;
                ObjGuiaTransporte.DisDomicilioPartida  = DisDomicilioPartida;
                ObjGuiaTransporte.ProvDomicilioPartida = ProvDomicilioPartida;
                ObjGuiaTransporte.DepDomicilioPartida  = DepDomicilioPartida;
                ObjGuiaTransporte.DomicilioLlegada     = CboSedeDestino.Columns["NomSede"].Value.ToString();

                if (CboSedeDestino.Columns["Numero"].Value == DBNull.Value)
                {
                    ObjGuiaTransporte.NroDomicilioLlegada = 0;
                }
                else
                {
                    ObjGuiaTransporte.NroDomicilioLlegada = Convert.ToInt16(CboSedeDestino.Columns["Numero"].Value);
                }

                if (CboSedeDestino.Columns["Interior"].Value == DBNull.Value)
                {
                    ObjGuiaTransporte.IntDomicilioLlegada = 0;
                }
                else
                {
                    ObjGuiaTransporte.IntDomicilioLlegada = Convert.ToInt16(CboSedeDestino.Columns["Interior"].Value);
                }

                ObjGuiaTransporte.ZonaDomicilioLlegada    = CboSedeDestino.Columns["Zona"].Value.ToString();
                ObjGuiaTransporte.DisDomicilioLlegada     = CboSedeDestino.Columns["Distrito"].Value.ToString();
                ObjGuiaTransporte.ProvDomicilioLlegada    = CboSedeDestino.Columns["Provincia"].Value.ToString();
                ObjGuiaTransporte.DepDomicilioLlegada     = CboSedeDestino.Columns["Departamento"].Value.ToString();
                ObjGuiaTransporte.Remitente               = AppSettings.NomEmpresa;
                ObjGuiaTransporte.RUCRemitente            = AppSettings.RUCEmpresa;
                ObjGuiaTransporte.DireccionRemitente      = DomicilioPartida;
                ObjGuiaTransporte.ObservacionRemitente    = null;
                ObjGuiaTransporte.Destinatario            = AppSettings.NomEmpresa;
                ObjGuiaTransporte.RUCDestinatario         = AppSettings.RUCEmpresa;
                ObjGuiaTransporte.DireccionDestinatario   = CboSedeDestino.Columns["NomSede"].Value.ToString();
                ObjGuiaTransporte.ObservacionDestinatario = null;
                ObjGuiaTransporte.Marca                  = CboVehiculo.SelectedText;
                ObjGuiaTransporte.Placa                  = TxtPlaca.Value.ToString();
                ObjGuiaTransporte.Carrosa                = TxtCarrosa.Text;
                ObjGuiaTransporte.NombreChofer           = NomTransportista;
                ObjGuiaTransporte.DNIChofer              = TxtDNITransportista.Value.ToString();
                ObjGuiaTransporte.FechaSalida            = Convert.ToDateTime(DeFechaSalida.Value);
                ObjGuiaTransporte.ConfiguracionVehicular = TxtConfVehicular.Value.ToString();
                if (TxtNroConstInscripcion.Value.ToString() == "")
                {
                    ObjGuiaTransporte.NroConstInscripcion = 0;
                }
                else
                {
                    ObjGuiaTransporte.NroConstInscripcion = Convert.ToInt32(TxtNroConstInscripcion.Value);
                }

                ObjGuiaTransporte.NroLicTransportista = TxtNroLicTransaportista.Value.ToString();
                ObjGuiaTransporte.UsuarioID           = AppSettings.UserID;
            }
            #endregion

            #region Acumular los totales de las guias
            NetoTotal     += Neto;
            TaraTotal     += Tara;
            BrutoTotal    += Bruto;
            NroJabasTotal += NroJabas;
            Cantidad      += Cantidad;
            #endregion

            //obtener peso total
            PesoTotal += Convert.ToDecimal(TxtBruto.Text);

            DataSet Ds = new DataSet();
            Ds = new CL_GuiaRemision().CrearGuias(DtPesoBruto, DtTara, Convert.ToDecimal(TxtBruto.Text), ObjGuiaRemision, AppSettings.SedeID, CamionEmpresaID,
                                                  TxtCodigo.Text, TxtRequerimiento.Text, Convert.ToDecimal(TxtNeto.Text), Convert.ToDecimal(TxtTara.Text),
                                                  Convert.ToDecimal(TxtCantidad.Text), Convert.ToDecimal(TxtRecibido.Text), Convert.ToDecimal(TxtSolicitado.Text),
                                                  Convert.ToDecimal(TxtTransito.Text), Convert.ToDecimal(TxtNroJabas.Text), CboSedeDestino.Columns["NomSede"].Value.ToString(),
                                                  AlmacenIDLocal, ObjGuiaTransporte, CboSedeDestino.SelectedValue.ToString(), AppSettings.UserID);

            #region mostrar en grilla
            //extraer los registros de la tabla
            if (Ds.Tables["DtGuias"].Rows.Count > 0)
            {
                foreach (DataRow Row in Ds.Tables["DtGuias"].Rows)
                {
                    DtGuias.ImportRow(Row);
                }
            }


            TbDespachoPollo.SelectedIndex = 2;
            TdgGuias.SetDataBinding(DtGuias, "", true);
            #endregion
        }
Exemplo n.º 8
0
        public DataSet CrearGuias(DataTable DtPesoBruto, DataTable DtTara, decimal Bruto, E_GuiaRemision ObjGuiaRemision, string SedeID, string CamionEmpresaID,
                                  string Codigo, string Requerimiento, decimal Neto, decimal Tara, decimal Cantidad, decimal Recibido, decimal Solicitado, decimal Transito,
                                  decimal NroJabas, string NomSede, string AlmacenIDLocal, E_GuiaTransporte ObjGuiaTransporte, string SedeDestino, int UserID)
        {
            CD_GuiaRemision objCD_GuiaRemision = new CD_GuiaRemision(AppSettings.GetConnectionString);
            DataSet         Ds = new DataSet();

            Ds = objCD_GuiaRemision.CrearGuias(DtPesoBruto, DtTara, Bruto, ObjGuiaRemision, SedeID, CamionEmpresaID, Codigo, Requerimiento, Neto, Tara,
                                               Cantidad, Recibido, Solicitado, Transito, NroJabas, NomSede, AlmacenIDLocal, ObjGuiaTransporte, SedeDestino, UserID);
            return(Ds);
        }
Exemplo n.º 9
0
        private string CrearGuiaTransporte()
        {
            E_GuiaTransporte ObjGuiaTransporte = new E_GuiaTransporte();

            ObjGuiaTransporte.EmpresaID            = CamionEmpresaID;
            ObjGuiaTransporte.NumGuiaRemision      = NumGuiaRemision;
            ObjGuiaTransporte.DomicilioPartida     = DomicilioPartida;
            ObjGuiaTransporte.NroDomicilioPartida  = NroDomicilioPartida;
            ObjGuiaTransporte.IntDomicilioPartida  = IntDomicilioPartida;
            ObjGuiaTransporte.ZonaDomicilioPartida = ZonaDomicilioPartida;
            ObjGuiaTransporte.DisDomicilioPartida  = DisDomicilioPartida;
            ObjGuiaTransporte.ProvDomicilioPartida = ProvDomicilioPartida;
            ObjGuiaTransporte.DepDomicilioPartida  = DepDomicilioPartida;
            ObjGuiaTransporte.DomicilioLlegada     = CboSedeDestino.Columns["NomSede"].Value.ToString();

            if (CboSedeDestino.Columns["Numero"].Value == DBNull.Value)
            {
                ObjGuiaTransporte.NroDomicilioLlegada = 0;
            }
            else
            {
                ObjGuiaTransporte.NroDomicilioLlegada = Convert.ToInt16(CboSedeDestino.Columns["Numero"].Value);
            }

            if (CboSedeDestino.Columns["Interior"].Value == DBNull.Value)
            {
                ObjGuiaTransporte.IntDomicilioLlegada = 0;
            }
            else
            {
                ObjGuiaTransporte.IntDomicilioLlegada = Convert.ToInt16(CboSedeDestino.Columns["Interior"].Value);
            }

            ObjGuiaTransporte.ZonaDomicilioLlegada    = CboSedeDestino.Columns["Zona"].Value.ToString();
            ObjGuiaTransporte.DisDomicilioLlegada     = CboSedeDestino.Columns["Distrito"].Value.ToString();
            ObjGuiaTransporte.ProvDomicilioLlegada    = CboSedeDestino.Columns["Provincia"].Value.ToString();
            ObjGuiaTransporte.DepDomicilioLlegada     = CboSedeDestino.Columns["Departamento"].Value.ToString();
            ObjGuiaTransporte.Remitente               = AppSettings.NomEmpresa;
            ObjGuiaTransporte.RUCRemitente            = AppSettings.RUCEmpresa;
            ObjGuiaTransporte.DireccionRemitente      = DomicilioPartida;
            ObjGuiaTransporte.ObservacionRemitente    = null;
            ObjGuiaTransporte.Destinatario            = AppSettings.NomEmpresa;
            ObjGuiaTransporte.RUCDestinatario         = AppSettings.RUCEmpresa;
            ObjGuiaTransporte.DireccionDestinatario   = CboSedeDestino.Columns["NomSede"].Value.ToString();
            ObjGuiaTransporte.ObservacionDestinatario = null;
            ObjGuiaTransporte.Marca                  = CboVehiculo.SelectedText;
            ObjGuiaTransporte.Placa                  = TxtPlaca.Text;
            ObjGuiaTransporte.Carrosa                = TxtCarrosa.Text;
            ObjGuiaTransporte.NombreChofer           = NomTransportista;
            ObjGuiaTransporte.DNIChofer              = TxtDNITransportista.Text;
            ObjGuiaTransporte.FechaSalida            = Convert.ToDateTime(DeFechaSalida.Value);
            ObjGuiaTransporte.ConfiguracionVehicular = TxtConfVehicular.Text;
            if (TxtNroConstInscripcion.Text == "")
            {
                ObjGuiaTransporte.NroConstInscripcion = 0;
            }
            else
            {
                ObjGuiaTransporte.NroConstInscripcion = Convert.ToInt32(TxtNroConstInscripcion.Text);
            }

            ObjGuiaTransporte.NroLicTransportista = TxtNroLicTransaportista.Text;
            ObjGuiaTransporte.TipoGuia            = "I";
            ObjGuiaTransporte.UsuarioID           = AppSettings.UserID;

            //insertar guia transporte y obtener el codigo de registro insertado
            NumGuiaTransportista = new CL_GuiaTransportista().InsertGuiaTransportista(ObjGuiaTransporte, CamionEmpresaID + AppSettings.SedeID);
            return(NumGuiaTransportista);
        }