3 using System.Collections.Generic;
4 using System.ComponentModel;
25 using System.Text.RegularExpressions;
28 using System.Runtime.InteropServices;
46 public object _Sender {
get;
private set; }
51 public string _Valor {
get;
private set; }
53 #endregion Propiedades 73 #endregion Constructores 92 List<IObserver<TxtCodLabelInfo>> _lisObservadores =
new List<IObserver<TxtCodLabelInfo>>();
99 public IDisposable
Subscribe(IObserver<TxtCodLabelInfo> toObservador)
101 if (!_lisObservadores.Contains(toObservador))
103 _lisObservadores.Add(toObservador);
105 return _lisObservadores as IDisposable;
114 if (_lisObservadores.Contains(toObservador))
116 _lisObservadores.Remove(toObservador);
120 #endregion IObservable 155 #region INTERFAZ IConfigUserOption 165 public bool _EsOpcionalConfigUser {
get;
set; } =
false;
170 public bool _UsuarioPermiteConfigUser {
get;
set; } =
false;
175 public string _DescripcionOpcional {
get;
set; }
180 public bool _PermitirConfigUser
182 get {
return _lPermitirConfigUser; }
183 set { _lPermitirConfigUser = value; }
185 private bool _lPermitirConfigUser =
true;
190 public string _DescripcionError
192 get {
return _cDescripcionError; }
193 set { _cDescripcionError = value; }
195 private string _cDescripcionError =
"";
202 public bool _EditMode
204 get {
return _lEditMode; }
220 private bool _lEditMode =
false;
237 if (toValor is
string)
239 this._Codigo = Convert.ToString(toValor);
240 this.__SetBindingPropertyValue(this._Codigo);
244 private const int WM_NCPAINT = 0x85;
249 protected override void WndProc(ref Message m)
253 if (m.Msg == WM_NCPAINT && _EditMode)
255 int lnOffsetY = (this.
Top < 4 || this.Left < 4 ? -2 : 2);
256 this.__DrawBottomLine(
true, 0, lnOffsetY);
260 #endregion INTERFAZ IConfigUserOption 269 private bool plDebug = (
System.Diagnostics.Process.GetCurrentProcess().ProcessName ==
"devenv");
274 private int _nUltimoRegistro = 0;
279 private int _nRegistrosCarga = 0;
284 protected internal bool _Desactivar_Evento_Codigo_Cambiado =
false;
289 private bool _Desactivar_Evento_Codigo_Cambiado_OnCreated =
false;
294 private DataTable _dtVisual =
new DataTable();
299 private bool _lRedimensionInterna =
false;
302 private bool _lAplicarEstilos =
true;
307 private bool _Desactivar_Evento_Validated =
false;
312 [DefaultValue(
false)]
313 public bool _DataAnnotationValidation {
set;
get; }
318 Category(
"Varios_Apariencia"),
320 Description(
"Aplicar estilos visuales al control."),
321 DisplayName(
"Aplicar estilos")
323 public bool _AplicarEstilos
327 return _lAplicarEstilos;
331 _lAplicarEstilos = value;
352 return base.BackColor;
356 base.BackColor = value;
357 ewFlowLayoutPanel1.BackColor = value;
363 private bool _bReadOnly =
false;
370 Description(
"Bloquea/desbloquea todos los controles")
372 public bool _ReadOnly
392 public virtual string _Guid =>
string.Empty;
403 if(_oFormBase == null) _oFormBase = FindForm() as
FormBase;
408 private void _SetReadOnly()
418 if (EW_GLOBAL._EdicionPerfiles)
425 private bool _lConsultar_Usuario_Seleccion_Multiple =
true;
432 Description(
"Obtiene o establece si debe constultar al usuario en caso de códigos repetidos (pe. CODPOS => 25617 Varios municipios")
434 public bool _Consultar_Usuario_Seleccion_Multiple
436 get {
return _lConsultar_Usuario_Seleccion_Multiple; }
439 _lConsultar_Usuario_Seleccion_Multiple = value;
443 private Boolean _bPermitirFiltroAutomatico =
true;
447 [Category(
"Varios"), DefaultValue(
false), Description(
"Obtiene o establece si debe permitir el filtrado de texto parcial al abrir el brownser")]
448 public Boolean _PermitirFiltradoAutomaticoTextoParcial
452 return _bPermitirFiltroAutomatico;
456 _bPermitirFiltroAutomatico = value;
469 Description(
"Obtiene o establece si se debe cargar primer registro de mantenimientos para códigos no informados."),
470 DisplayName(
"Cargar primer registro")
472 public bool _Autoload_Mante_FirstValue
480 private string _cOpcEsp =
"";
487 Description(
"Bloquea el control si el usuario no tiene permiso para la opción especial indicada."),
489 public string _OpcEsp
491 get {
return _cOpcEsp; }
500 public bool _DesactivarRespuestasAutomaticas
502 get {
return _lDesactivarRespuestasAutomaticas; }
503 set { _lDesactivarRespuestasAutomaticas = value; }
505 private bool _lDesactivarRespuestasAutomaticas =
false;
516 public char _CaracterAncho
518 get {
return _cCaracterAncho; }
521 _cCaracterAncho = value;
526 char _cCaracterAncho =
' ';
560 if (this.
ewgrid != null && this.
ewgrid.Rows.Count > 0 &&
this.
ewgrid.Rows[0].Cells.Count > 0 && !String.IsNullOrWhiteSpace(Convert.ToString(
this.ewgrid.Rows[0].Cells[0].Tag))) this._Codigo = Convert.ToString(this.
ewgrid.Rows[0].Cells[0].Tag);
569 Category(
"Varios Ew"),
571 Description(
"Obtiene o establece un mensaje de error en el control."),
574 protected string _ErrorProviderText
576 get {
return _cErrorProvider; }
579 if (this._oErrorProvider != null)
581 _cErrorProvider = value;
582 this._oErrorProvider.BlinkStyle =
System.Windows.Forms.ErrorBlinkStyle.NeverBlink;
587 if (!
string.IsNullOrWhiteSpace(value))
589 lcError = this._oErrorProvider.GetError(
this);
590 lcError += (!
string.IsNullOrWhiteSpace(lcError) ? Environment.NewLine :
string.Empty) + value;
595 Form loForm = this.FindForm();
599 string lcForm = loForm.GetType().BaseType.Name.ToLower().Trim();
600 if (lcForm ==
"formmante")
601 this._oErrorProvider.SetError(
this, lcError);
603 this._oErrorProvider.SetError(this.
ewlabel, lcError);
606 this._oErrorProvider.SetIconAlignment(
this, ErrorIconAlignment.MiddleLeft);
611 private string _cErrorProvider =
"";
617 Category(
"Varios Ew"),
619 Description(
"Obtiene o establece un control de tipo ewErrorProvider."),
624 get {
return _oErrorProvider; }
625 set { _oErrorProvider = value; }
632 private bool _lMostrar_Mensaje =
true;
636 public bool _Mostrar_Mensaje
638 get {
return _lMostrar_Mensaje; }
639 set { _lMostrar_Mensaje = value; }
649 Description(
"Propiedad para indicar si queremos mostrar el botón de información o no")
651 public bool _Mostrar_Info
653 get {
return _lMostrar_Info; }
655 _lMostrar_Info = value;
656 _Definir_Estilo_Visual();
659 private bool _lMostrar_Info =
false;
674 Description(
"Propiedad para indicar el título que se va a mostrar en la información a visualizar al hacer click en el botón de Información")
676 public string _BtInfoTitulo
678 get {
return _cBtInfoTitulo; }
680 _cBtInfoTitulo = value;
682 if (_oTextoInformacionBtInfo == null)
685 btInfo._TextoInformacion = _oTextoInformacionBtInfo;
688 _oTextoInformacionBtInfo.
_Titulo = value;
691 private string _cBtInfoTitulo =
"";
700 Description(
"Propiedad para indicar los párrafos de texto que se van a mostrar en la información a visualizar al hacer click en el botón de Información")
703 public List<string> _BtInfoParrafos
705 get {
return _lstBtInfoParrafos; }
707 _lstBtInfoParrafos = value;
708 if (_oTextoInformacionBtInfo == null)
711 btInfo._TextoInformacion = _oTextoInformacionBtInfo;
717 private List<string> _lstBtInfoParrafos = null;
727 Description(
"Tooltip del botón de información")
729 public string _TooltipInfo
733 return _cTooltipInfo;
737 _cTooltipInfo = value;
738 if (toolTipTxtCodLabel != null)
739 toolTipTxtCodLabel.SetToolTip(this.btInfo._btInfo, value);
740 this.btInfo._btInfo._Tooltip = value;
743 private string _cTooltipInfo =
"";
746 private List<ewbutton> _oBotonesAdicionales =
new List<ewbutton>();
752 public List<ewbutton> _BotonesAdicionales
756 return _oBotonesAdicionales;
760 private Boolean _bMostrarBotonesAdicionales =
false;
767 DefaultValue(typeof(Boolean),
"false"),
768 Description(
"Indica si se tienen que mostrar los botones adicionales")
770 public Boolean _MostrarBotonesAdicionales
774 return _bMostrarBotonesAdicionales;
778 _bMostrarBotonesAdicionales = value;
785 public virtual int _MinDrawSize
791 if (this._Mostrar_Mante) lnMinSize =
btMante.Location.X +
btMante.Width;
802 lnMinSize += ewFlowLayoutPanel1.Location.X;
804 return (lnMinSize > PreferredSize.Width ? lnMinSize : PreferredSize.Width);
813 Description(
"Retorna el botón")
828 Description(
"Retorna el botón")
838 private bool _lTactil =
false;
845 Description(
"Utilizar el control de forma tactil")
849 get {
return _lTactil; }
857 private string _cCodigo =
"";
864 Description(
"Código seleccionado por el usuario")
866 public string _Codigo
870 return !Created ? _cCodigoTmp : _cCodigo;
886 if ((_cCodigo != null && value == null) || (_cCodigo == null && value != null))
889 if (_cCodigo == null && value == null) llModificado =
false;
890 else llModificado = (_cCodigo.Trim() != value.Trim());
902 _cDescripcionCodigo = String.Empty;
904 if (!
string.IsNullOrWhiteSpace(value))
907 LanzarEvento_Codigo_Cambiado_Before_Extended(value, ref lbOk);
908 if (lbOk) LanzarEvento_Codigo_Cambiado_Before(ref lbOk);
913 lbOk = _Existe_Codigo(ref value);
915 LanzarEvento_Codigo_Cambiado_Validated(lbOk);
921 if (!_DataAnnotationValidation)
923 this._ErrorProviderText =
"";
927 if (_Control_Valor_Vacio && _cCodigo != null)
933 #region Restaurar Valor 938 switch (_Tipo_Visual)
950 DataGridViewCell dgCelda = null;
953 if (_Obtener_Celda_Codigo(_cCodigo, ref dgCelda, out lnRowIndex))
955 if (dgCelda.RowIndex == -1 && lnRowIndex != -1)
957 dgCelda =
ewgrid.Rows[lnRowIndex].Cells[dgCelda.ColumnIndex];
961 ewgrid.CurrentCell = dgCelda;
973 #endregion Restaurar Valor 979 _lisObservadores.ForEach(loEle => loEle.OnNext(
new TxtCodLabelInfo(
this, value)));
987 switch (_Tipo_Visual)
992 _Refrescar_Descripcion();
997 if (_cCodigo != null)
1000 _Desactivar_Evento_Codigo_Cambiado =
true;
1002 _Desactivar_Evento_Codigo_Cambiado =
false;
1008 DataGridViewCell dgCelda = null;
1015 if (_cCodigo != null)
1017 this._Desactivar_Evento_Codigo_Cambiado =
true;
1020 if (_cCodigo.Trim() ==
"")
1021 this._Quitar_Seleccion_Grid();
1024 if (_Obtener_Celda_Codigo(_cCodigo, ref dgCelda, out lnRowIndex))
1028 ewgrid.CurrentCell = dgCelda;
1029 ewgrid.CurrentCell =
ewgrid.Rows[lnRowIndex].Cells[dgCelda.ColumnIndex];
1033 ewgrid.CurrentCell = null;
1034 ewgrid.CurrentCell =
ewgrid.Rows[lnRowIndex].Cells[dgCelda.ColumnIndex];
1038 ewgrid.CurrentCell = null;
1040 this._Desactivar_Evento_Codigo_Cambiado =
false;
1055 private void Codigo_Cambiado()
1059 if (!_Desactivar_Evento_Codigo_Cambiado && !_Desactivar_Evento_Codigo_Cambiado_OnCreated)
1061 if (_Codigo_Cambiado != null) _Codigo_Cambiado();
1063 OnConfigUserValueChanged?.Invoke(
this,
new EventArgs());
1070 if (_Codigo_Actualizado != null)
1072 _Codigo_Actualizado();
1076 catch (Exception loEx)
1078 DB.Registrar_Error(loEx);
1090 public virtual String _DescripcionCodigo
1094 if (_Browser_Datatable_Personalizado is DataTable)
1096 _cDescripcionCodigo = _Refrescar_Descripcion_Datatable_Personalizado();
1100 if (String.IsNullOrEmpty(_cDescripcionCodigo) && (_Codigo != null && !String.IsNullOrEmpty(_Codigo.Trim())))
1103 if (
string.IsNullOrWhiteSpace(_Codigo))
1106 DataTable ldtConsulta =
new DataTable();
1107 string lcSql =
"SELECT " + _Concepto +
" " +
1108 "FROM " + DB.SQLDatabase(_Database, _Tabla) +
" " +
1109 "WHERE " + _Clave +
" = " + DB.SQLString(_Codigo);
1111 if (!
string.IsNullOrWhiteSpace(_Browser_Condicion))
1112 lcSql = lcSql +
" AND " + _Browser_Condicion;
1114 DB.SQLExec(lcSql, ref ldtConsulta);
1115 if (ldtConsulta.Rows.Count > 0)
1116 _cDescripcionCodigo = ldtConsulta.Rows[0][_Concepto].ToString();
1122 return _cDescripcionCodigo;
1126 private Dictionary<string, object> _oCodigosDiccionario;
1132 DesignerSerializationVisibility(DesignerSerializationVisibility.Hidden)
1134 public Dictionary<string, object> _CodigosDiccionario
1136 get {
return _oCodigosDiccionario; }
1137 set { _oCodigosDiccionario = value; }
1140 private char _cRelleno =
' ';
1146 Description(
"Carácter de relleno"),
1149 public char _Relleno
1151 get {
return _cRelleno; }
1152 set { _cRelleno = value; }
1155 private string _cClave =
"";
1162 Description(
"Nombre de la clave para obtener el valor")
1164 public string _Clave
1166 get {
return _cClave; }
1167 set { _cClave = value; }
1170 private int _nLen = 0;
1176 Description(
"Longitud a la que se expandirá el punto.Solo indicar si no es un valor dinámico. Por ejemplo si fuera wn_digitos NO asignar valor aquí.")
1180 get {
return _nLen; }
1184 _Definir_Estilo_Visual();
1188 private string _cConcepto =
"nombre";
1194 DefaultValue(typeof(
string),
"nombre"),
1195 Description(
"Campo utilizado para obtener la descripción que se pondrá en el label. Por defecto será 'nombre'.")
1197 public string _Concepto
1199 get {
return _cConcepto; }
1200 set { _cConcepto = value; }
1205 private string _cMultiCampos =
"";
1216 DefaultValue(typeof(
string),
""),
1217 Description(
"Campo utilizado para indicar los distintos campos que se concatenaran para formar el campo final de concepto.")
1219 public string _MultiCampos
1221 get {
return _cMultiCampos; }
1222 set { _cMultiCampos = value; }
1228 private string _cCampoBackColor =
"";
1234 DefaultValue(typeof(
string),
""),
1235 Description(
"Campo utilizado para obtener el color de fondo a mostrar en la celda (Únicamente disponible en tipo cuadrícula)")
1237 public string _CampoBackColor
1239 get {
return _cCampoBackColor; }
1240 set { _cCampoBackColor = value; }
1243 private string _cCampoForeColor =
"";
1249 DefaultValue(typeof(
string),
""),
1250 Description(
"Campo utilizado para obtener el color de la fuente a mostrar en la celda (Únicamente disponible en tipo cuadrícula)")
1252 public string _CampoForeColor
1254 get {
return _cCampoForeColor; }
1255 set { _cCampoForeColor = value; }
1258 private string _cCampoFont =
"";
1264 DefaultValue(typeof(
string),
""),
1265 Description(
"Campo utilizado para obtener la fuente a mostrar en la celda (Únicamente disponible en tipo cuadrícula)")
1267 public string _CampoFont
1269 get {
return _cCampoFont; }
1270 set { _cCampoFont = value; }
1273 private string _cCampoVisible =
"";
1279 DefaultValue(typeof(
string),
""),
1280 Description(
"Campo utilizado para saber si la celda actual estará visible o no (Únicamente disponible en tipo cuadrícula)")
1282 public string _CampoVisible
1284 get {
return _cCampoVisible; }
1285 set { _cCampoVisible = value; }
1289 private string _cImagen =
"";
1295 DefaultValue(typeof(
string),
""),
1296 Description(
"Campo utilizado para obtener la ruta de la imagen asociada")
1298 public string _Imagen
1300 get {
return _cImagen; }
1301 set { _cImagen = value; }
1304 private bool _lImagen_y_Texto =
false;
1310 DefaultValue(
false),
1311 Description(
"Para indicar si queremos ver imagen y texto a la vez")
1313 public bool _Imagen_y_Texto
1315 get {
return _lImagen_y_Texto; }
1316 set { _lImagen_y_Texto = value; }
1319 private bool _lExpandir =
false;
1325 DefaultValue(
false),
1326 Description(
"Determinará si hay que sustituir el . por el carácter definido en la propiedad _Relleno")
1328 public bool _Expandir
1330 get {
return _lExpandir; }
1331 set { _lExpandir = value; }
1340 DefaultValue(typeof(
string),
""),
1341 Description(
"Para indicar un inicio de código. Sólo se tendrá en cuenta en caso de tener la propiedad _Expandir a True")
1343 public string _InicioCodigo
1345 get {
return _cInicioCodigo; }
1346 set { _cInicioCodigo = value; }
1348 private string _cInicioCodigo =
"";
1351 private string _cDatabase =
"";
1357 DefaultValue(typeof(
string),
""),
1358 Description(
"Base de datos a la que pertenece la tabla")
1360 public string _Database
1362 get {
return _cDatabase; }
1363 set { _cDatabase = value; }
1366 private string _cTabla =
"";
1372 DefaultValue(typeof(
string),
""),
1373 Description(
"Nombre de la tabla que se utilizará para obtener la descripción")
1375 public string _Tabla
1377 get {
return _cTabla; }
1378 set { _cTabla = value; }
1381 private string _cNombre =
"";
1387 DefaultValue(typeof(
string),
""),
1388 Description(
"Nombre del campo que se utilizará para poner en la descripción")
1390 public string _Nombre
1392 get {
return _cNombre; }
1393 set { _cNombre = value; }
1396 private string _cMante =
"";
1402 DefaultValue(typeof(
string),
""),
1403 Description(
"Nombre de la pantalla de Eurowin que se utilizará como mantenimiento")
1405 public string _Mante
1407 get {
return _cMante; }
1412 int lnAsesorContable = Convert.ToInt32(EW_GLOBAL._GetVariable(
"wn_AsesorContable"));
1414 if ((value.ToUpper() ==
"CLIENTES" || value.ToUpper() ==
"PROVEEDOR") && (EW_GLOBAL._Solucion < 2 || lnAsesorContable > 0))
1417 _cMante =
"CUENTAS";
1426 if (_btBrowser != null)
1428 _btBrowser.NombreMantenimiento = _cMante.ToUpper();
1434 private string _cSQL_Personalizado =
"";
1440 DefaultValue(typeof(
string),
""),
1441 Description(
"Consulta SQL personalizada. Importante: El estilo visual de el txtCodlabel debde de ser en formato 'Estandard'")
1443 public string _SQL_Personalizado
1445 get {
return _cSQL_Personalizado; }
1448 _cSQL_Personalizado = value;
1453 private string _cBrowser_Clave =
"";
1459 DefaultValue(typeof(
string),
""),
1460 Description(
"Campo clave para la consulta")
1462 public string _Browser_Clave
1464 get {
return _cBrowser_Clave; }
1467 value = value.ToUpper();
1468 _cBrowser_Clave = value;
1473 private string _cBrowser_ClavePrimaria =
"";
1479 DefaultValue(typeof(
string),
""),
1480 Description(
"Campo clave para la consulta, si está rellena prevalece sobre _Browser_Clave para pasar el código de la clave a los mantes")
1482 public string _Browser_ClavePrimaria
1484 get {
return _cBrowser_ClavePrimaria; }
1487 value = value.ToUpper();
1488 _cBrowser_ClavePrimaria = value;
1493 private string _cBrowser_Campo_Predet =
"";
1499 DefaultValue(typeof(
string),
""),
1500 Description(
"Campo predeterminado de la consulta")
1502 public string _Browser_Campo_Predet
1504 get {
return _cBrowser_Campo_Predet; }
1507 _cBrowser_Campo_Predet = value;
1512 private string _cBrowser_Campos =
"";
1518 DefaultValue(typeof(
string),
""),
1519 Description(
"Campos de la consulta SQL que se presentarán en el browser")
1521 public string _Browser_Campos
1523 get {
return _cBrowser_Campos; }
1526 _cBrowser_Campos = value;
1531 private string _cBrowser_Condicion =
"";
1537 DefaultValue(typeof(
string),
""),
1538 Description(
"Condición que se utilizará en la consulta SQL")
1540 public string _Browser_Condicion
1542 get {
return _cBrowser_Condicion; }
1545 bool ValueChanged = (_cBrowser_Condicion != value);
1547 _cBrowser_Condicion = value;
1551 OnBrowserCondicionChanged();
1559 virtual internal void OnBrowserCondicionChanged()
1565 private string _cBrowser_Distinct =
"";
1571 DefaultValue(typeof(
string),
""),
1572 Description(
"Indica si se utilizará el DISTINCT en la consulta SQL")
1575 public string _Browser_Distinct
1577 get {
return _cBrowser_Distinct; }
1580 _cBrowser_Distinct = value;
1587 private string _cBrowser_Database =
"";
1593 DefaultValue(typeof(
string),
""),
1594 Description(
"Nombre de la base de datos a la que pertenece la tabla")
1596 public string _Browser_Database
1598 get {
return _cBrowser_Database; }
1601 _cBrowser_Database = value;
1606 private string _cBrowser_Tabla =
"";
1612 DefaultValue(typeof(
string),
""),
1613 Description(
"Nombre de la tabla a la que se hace referencia en la consulta SQL")
1615 public string _Browser_Tabla
1617 get {
return _cBrowser_Tabla; }
1622 int lnAsesorContable = Convert.ToInt32(EW_GLOBAL._GetVariable(
"wn_AsesorContable"));
1624 if ((value.ToUpper() ==
"CLIENTES" || value.ToUpper() ==
"PROVEEDOR") && (EW_GLOBAL._Solucion < 2 || lnAsesorContable > 0))
1627 _cBrowser_Tabla =
"CUENTAS";
1631 _cBrowser_Tabla = value;
1638 private string _cBrowser_Titulos_Campos =
"";
1644 DefaultValue(typeof(
string),
""),
1645 Description(
"Descripción separada por comas de los títulos de los campos en el browser")
1647 public string _Browser_Titulos_Campos
1649 get {
return _cBrowser_Titulos_Campos; }
1652 _cBrowser_Titulos_Campos = value;
1657 private string _cBrowser_Titulo =
"";
1663 DefaultValue(typeof(
string),
""),
1664 Description(
"Título principal para el browser")
1666 public string _Browser_Titulo
1668 get {
return _cBrowser_Titulo; }
1674 if (_cBrowser_Titulo != value)
1676 _cBrowser_Titulo = value;
1678 _Definir_Estilo_Visual();
1691 DisplayName(
"Extensiones visibles"),
1692 Description(
"Muestra el panel de extensiones en el browser."),
1698 get {
return _eBrowser_Usar_Extensiones; }
1701 _eBrowser_Usar_Extensiones = value;
1708 private bool _lPresentar_Browser_Titulo =
true;
1715 Description(
"Presentar el browser para el Título")
1717 public bool _Presentar_Browser_Titulo
1719 get {
return _lPresentar_Browser_Titulo; }
1722 _lPresentar_Browser_Titulo = value;
1727 private DataTable dtBrowser_Datatable_Personalizado = null;
1733 DefaultValue(typeof(DataTable), null),
1734 Description(
"Datatable personalizado a mostrar como Browser (no accede a BBDD)")
1736 public DataTable _Browser_Datatable_Personalizado
1738 get {
return dtBrowser_Datatable_Personalizado; }
1741 dtBrowser_Datatable_Personalizado = value;
1748 private string _cBrowser_ConsultaPersonalizada =
"";
1754 DefaultValue(typeof(
string),
""),
1755 Description(
"Consulta Sql personalizada a mostrar como Browser")
1757 public string _Browser_ConsultaPersonalizada
1759 get {
return _cBrowser_ConsultaPersonalizada; }
1762 _cBrowser_ConsultaPersonalizada = value;
1768 private string _cMensaje_No_Existe =
"El código introducido no existe.";
1774 DefaultValue(typeof(
string),
"El código introducido no existe."),
1775 Description(
"Descripción del mensaje de error que se mostrará cuando el código introducido no exista")
1777 public string _Mensaje_No_Existe
1779 get {
return _cMensaje_No_Existe; }
1780 set { _cMensaje_No_Existe = value; }
1783 private String _cMensajeNoSePuedeCrear =
"El código no es válido.";
1788 public string _MensajeNoSePuedeCrear
1790 get {
return _cMensajeNoSePuedeCrear; }
1791 set { _cMensajeNoSePuedeCrear = value; }
1794 private int _nGrid_Columnas = 2;
1801 Description(
"Número de columnas que tendrá el grid")
1803 public int _Grid_Columnas
1807 return _nGrid_Columnas;
1813 bool llModificado = (_nGrid_Columnas != value);
1815 _nGrid_Columnas = value;
1820 _Definir_Estilo_Visual();
1835 Description(
"Tipo de barras de desplazamiento."),
1845 _Definir_Estilo_Visual();
1849 private int _nAlto_Filas = 80;
1856 Description(
"Alto de las filas del grid")
1858 public int _Alto_Filas
1860 get {
return _nAlto_Filas; }
1865 bool llModificado = (_nAlto_Filas != value);
1867 _nAlto_Filas = value;
1872 _Definir_Estilo_Visual();
1883 Description(
"Ancho del desplegable de ewComboBox cuando el txtcodlabel adopta forma de Combo")
1885 public int _Ancho_Despleg_Combo
1887 get {
return this.
ewcombobox.DropDownWidth; }
1897 Description(
"Ancho del de ewComboBox cuando el txtcodlabel adopta forma de Combo")
1899 public int _AnchoCombo
1903 return _nAnchoCombo > 0 ? _nAnchoCombo : 0;
1907 _nAnchoCombo = value > 0 ? value : 0;
1911 private int _nAnchoCombo = 0;
1918 Description(
"Alto del desplegable de ewComboBox cuando el txtcodlabel adopta forma de Combo")
1920 public int _Alto_Despleg_Combo
1922 get {
return this.
ewcombobox.DropDownHeight; }
1927 private DataTable _dtDataTable = null;
1937 DesignerSerializationVisibility(DesignerSerializationVisibility.Hidden)
1939 public DataTable _DataTable
1941 get {
return _dtDataTable; }
1942 set { _dtDataTable = value; }
1945 private bool _lMostrar_Mante =
true;
1952 Description(
"Propiedad para indicar si queremos mostrar el botón del matenimiento o no")
1954 public bool _Mostrar_Mante
1956 get {
return _lMostrar_Mante; }
1959 _lMostrar_Mante = value;
1960 _Definir_Estilo_Visual();
1964 private bool _lMostrar_Brownser =
true;
1971 Description(
"Propiedad para indicar si queremos mostrar el botón del brownser o no")
1973 public bool _Mostrar_Browser
1975 get {
return _lMostrar_Brownser; }
1978 _lMostrar_Brownser = value;
1979 _Definir_Estilo_Visual();
1983 private bool _lModo_Diseño =
false;
1989 DefaultValue(
false),
1990 Description(
"Propiedad para indicar si queremos utilizar el control en modo diseño (sin cargar datos)")
1992 public bool _Modo_Diseño
1994 get {
return _lModo_Diseño; }
1995 set { _lModo_Diseño = value; }
1998 private _Tipos_Visuales _cTipo_Visual = _Tipos_Visuales.Estandar;
2008 Description(
"Nos indicará el aspecto visual del objeto")
2010 public _Tipos_Visuales _Tipo_Visual
2014 return _cTipo_Visual;
2018 bool llModificado = (_cTipo_Visual != value);
2020 _cTipo_Visual = value;
2022 if (llModificado && Created)
2026 _Definir_Estilo_Visual();
2037 Description(
"Fuente a utilizar en cualquier texto dentro del txtcodlabel")
2041 get {
return this._oFont; }
2044 if (value is Font && value != null)
2046 this._oFont = value;
2047 this._Definir_Estilo_Visual();
2051 private Font _oFont =
new Font(
"Segoe UI", 9.75f);
2057 public override Font Font
2059 get {
return base.Font; }
2064 _Font = base.Font = value;
2073 Description(
"Definición de los posibles tipos visuales de la clase txtcodlabel")
2100 DefaultValue(
false),
2101 Description(
"Propiedad para poder añadir un registro vacío en el tipo Combo")
2103 public virtual bool _Valor_Vacio
2105 get {
return _lValor_Vacio; }
2106 set { _lValor_Vacio = value; }
2108 private bool _lValor_Vacio =
false;
2117 Description(
"Propiedad con el texto a usar para poder añadir un registro vacío en el tipo Combo")
2119 public virtual string LiteralValorVacio
2121 get {
return _cLiteralValorVacio; }
2122 set { _cLiteralValorVacio = value; }
2124 private string _cLiteralValorVacio =
"";
2132 Description(
"Propiedad con la posicion a usar para poder añadir un registro vacío en el tipo Combo")
2134 public virtual int IndiceValorVacio
2136 get {
return _nIndiceValorVacio; }
2137 set { _nIndiceValorVacio = value; }
2139 private int _nIndiceValorVacio = -1;
2146 DefaultValue(
false),
2147 Description(
"Propiedad para esconcer el label de la descripción del txtcodlabel (PE-79609)")
2149 public bool _Esconder_Label
2151 get {
return _lEsconder_Label; }
2154 _lEsconder_Label = value;
2155 this.
ewlabel.Visible = !_lEsconder_Label;
2158 private bool _lEsconder_Label =
false;
2167 DefaultValue(
false),
2168 Description(
"Cargará todos los registros de una vez y solo una vez")
2170 public bool _CargarTodosRegistros =
false;
2171 private bool _RegistrosCargados =
false;
2179 Description(
"Propiedad que servirá para que sólo se consulten los datos y formen los grids con datos una vez. (PE-79835)")
2181 public bool _PrimeraVez =
true;
2188 DefaultValue(
false),
2189 Description(
"Propiedad que determina si se dispara un evento '_Codigo_Cambiado_Before' cuando _codigo se establece a ''")
2191 public bool _Control_Valor_Vacio
2193 get {
return _lControl_Valor_Vacio; }
2194 set { _lControl_Valor_Vacio = value; }
2196 private bool _lControl_Valor_Vacio =
false;
2203 Description(
"Propiedad que establecera si se debe validar de forma automática el código introducido por el usuario")
2205 public bool _Validar_Codigo =
true;
2208 private Boolean _bCrearManteSiCodigoNoExiste = !Convert.ToBoolean(EW_GLOBAL._GetVariable(
"wl_hera"));
2215 Description(
"Propiedad que establecerá si se debe preguntar si desea crear el mantenimiento")
2217 public Boolean _CrearManteSiCodigoNoExiste
2221 return _bCrearManteSiCodigoNoExiste;
2225 _bCrearManteSiCodigoNoExiste = value;
2229 private string _cTooltipBrowser =
"";
2236 Description(
"Tooltip del botón browser")
2238 protected string _TooltipBrowser
2242 return _cTooltipBrowser;
2249 if (toolTipTxtCodLabel != null) toolTipTxtCodLabel.SetToolTip(this.
btBrowser, _cTooltipBrowser);
2254 private string _cTooltipMante =
"";
2261 Description(
"Tooltip del botón de mantenimiento")
2263 protected string _TooltipMante
2265 get {
return _cTooltipMante; }
2268 _cTooltipMante = value;
2269 if (toolTipTxtCodLabel != null) toolTipTxtCodLabel.SetToolTip(this.
btMante, value);
2279 public void _SetToolTips(
string tcTooltipBrowser =
"",
string tcTooltipMante =
"")
2281 if (!
string.IsNullOrWhiteSpace(tcTooltipBrowser)) _TooltipBrowser = tcTooltipBrowser;
2282 else _TooltipBrowser = _cTooltipBrowser;
2284 if (!
string.IsNullOrWhiteSpace(tcTooltipMante)) _TooltipMante = tcTooltipMante;
2285 else _TooltipMante = _cTooltipMante;
2289 private int _nMultiSelectIndex = -1;
2290 private DataTable _dtMultiSelectTable =
new DataTable();
2295 protected bool _lCodigosDiccionarioBrowser =
false;
2309 public List<string> _ListaTodosCodigos
2311 get {
return this._oCodeList; }
2314 List<string> llTmp = value;
2316 this._oCodeList = llTmp;
2319 private List<string> _oCodeList =
new List<string>();
2325 private DateTime _GridLastLoading;
2330 private int _GridFirstVisibleRow;
2335 private ScrollBars _GridScrollBars;
2340 private bool _lGridScrollVisible =
true;
2346 private bool _lSage50 = Convert.ToBoolean(EW_GLOBAL._GetVariable(
"wl_sage50"));
2354 Description(
"Mostrar menú contextual cuando existe más de un registro con el mismo código")
2356 public bool _MostrarMenuContextual =
true;
2361 public string _Browser_Alias =
"";
2363 private bool _lTrim_Codigo_Seleccionado =
true;
2371 Description(
"Propiedad para indicar si queremos aplicar Trim a los códigos seleccionados en la multiselección en los ewtxtcodlabel de los listados")
2373 public bool _Trim_Codigo_Seleccionado
2375 get {
return _lTrim_Codigo_Seleccionado; }
2378 _lTrim_Codigo_Seleccionado = value;
2385 public Dictionary<string, int> _ColumnasMultiLine
2389 if (_btBrowser != null)
2391 if (_btBrowser._ColumnasMultiLine == null)
2393 _btBrowser._ColumnasMultiLine =
new Dictionary<string, int>();
2396 return _btBrowser._ColumnasMultiLine;
2405 if (_btBrowser != null)
2407 _btBrowser._ColumnasMultiLine = value;
2412 #endregion PROPIEDADES 2421 public delegate
void Delegar_Browser_Before(ref
bool tlOk);
2427 public delegate
void Delegar_Browser_After(
bool tlAceptar);
2433 public delegate
void Delegar_Mante_Before(ref
bool tlOk);
2438 public delegate
void Delegar_Mante_After();
2443 public delegate
void Delegar_Codigo_Cambiado();
2448 public delegate
void Delegar_Codigo_Actualizado();
2453 public delegate
void Delegar_Codigo_Cambiado_Before(ref
bool tlOk);
2458 public delegate
void Delegar_Codigo_Cambiado_Before_Extended(
object sender,
string tcValorCandidato, ref
bool tlOk);
2465 public delegate String Delegar_Refrescar_Descripcion_Personalizada(String tcDescripcion);
2470 public delegate
void Delegar_Click_Celda();
2475 public delegate
void Delegar_Click_Combo_Grid();
2480 public delegate
void Delegar_Click_Combo_Grid_Up();
2485 public delegate
void Delegar_Click_Combo_DropDown(
bool tbCombo_Desplegado);
2492 public delegate
void Delegar_CodigoDiccionario_Establecido();
2498 public delegate Boolean DelegarValidacionCrearCodigo(String tcCodigo);
2579 if (_CodigoDiccionario_Establecido != null) _CodigoDiccionario_Establecido();
2590 if (_Codigo_Cambiado_Before_Extended != null && !_Desactivar_Evento_Codigo_Cambiado_OnCreated)
2592 _Codigo_Cambiado_Before_Extended(
this, tcValorCandidato, ref tlOk);
2602 if (_Codigo_Cambiado_Before != null && !_Desactivar_Evento_Codigo_Cambiado_OnCreated)
2604 _Codigo_Cambiado_Before(ref tlOk);
2608 #region Evento de validacion 2615 public delegate
void Delegar_Codigo_Cambiado_ValidationResult(
object sender,
bool tlOk);
2630 if (_Codigo_Cambiado_Validated != null && !_Desactivar_Evento_Codigo_Cambiado_OnCreated)
2632 _Codigo_Cambiado_Validated(
this, tlResultadoValidacion);
2637 #endregion Evento de validacion 2648 InitializeComponent();
2650 this.
ewcombobox.DropDownStyle =
System.Windows.Forms.ComboBoxStyle.DropDownList;
2652 if (_lSage50 && !DesignMode && EW_GLOBAL._EsEjecutable)
2654 FUNCTIONS._Cambiar_Font(
this,
"Segoe UI");
2658 if (Convert.ToBoolean(EW_GLOBAL._GetVariable(
"wl_designmode",
true)) ==
false)
2660 Cargar_Propiedades();
2668 this.
btMante.
_Click_After +=
new botones.btMante._Click_After_Handler(_RefreshAfterClickMante);
2673 _Autoload_Mante_FirstValue =
false;
2677 private void Cargar_Propiedades()
2679 _Cargar_Propiedades();
2687 ewcombobox.SelectedIndexChanged -=
new EventHandler(ewcombobox_SelectedIndexChanged);
2690 _Definir_Estilo_Visual();
2694 if (!String.IsNullOrEmpty(_cCodigoTmp))
2696 _Desactivar_Evento_Codigo_Cambiado_OnCreated =
true;
2699 _Codigo = _cCodigoTmp;
2702 _Desactivar_Evento_Codigo_Cambiado_OnCreated =
false;
2705 base.OnCreateControl();
2713 private void _RefreshAfterClickMante()
2717 if (this._Tipo_Visual == _Tipos_Visuales.Combo)
2726 else if (this._Tipo_Visual == _Tipos_Visuales.Estandar)
2728 Boolean lbMostrarTmp = _lMostrar_Mensaje;
2731 _lMostrar_Mensaje =
false;
2733 if (!_Existe_Codigo(ref lcCodigo,
true))
2737 _lMostrar_Mensaje = lbMostrarTmp;
2741 #endregion CONSTRUCTOR 2744 #region EVENTOS PRIVADOS 2751 private void ewtxtcodlabel_Load(
object sender, EventArgs e)
2758 _Suscripcion_Eventos();
2764 _Definir_Estilo_Visual();
2766 catch (Exception loEx)
2768 DB.Registrar_Error(loEx);
2786 private void ewtextbox_Enter(
object sender, EventArgs e)
2793 if (
string.IsNullOrWhiteSpace(loObjetoTextBox.Text))
2795 if (loObjetoTextBox.Text.Length <
this._Len) loObjetoTextBox.Text =
new string(
' ', this._Len);
2799 loObjetoTextBox.Select(0, 0);
2800 loObjetoTextBox.Select(0,
ewtextbox.Text.TrimEnd().Length);
2811 private void Evento_Codigo_Elegido(
object sender, EventArgs e)
2814 ToolStripMenuItem loSubContextMenuStrip = (ToolStripMenuItem)sender;
2816 _nMultiSelectIndex = Convert.ToInt32(loSubContextMenuStrip.Name);
2818 Establecer_valor_diccionario(_nMultiSelectIndex);
2821 private void Establecer_valor_diccionario(
int tnIndiceSeleccionado)
2823 string[] lcClaus = _Browser_Clave.Split(
',');
2824 if (lcClaus.Length == 0)
2829 _CodigosDiccionario =
new Dictionary<string, object>();
2831 if (_dtMultiSelectTable.Rows[tnIndiceSeleccionado] != null)
2833 for (
int lnClau = 0; lnClau < lcClaus.Length; lnClau++)
2835 string lcNomCamp = lcClaus[lnClau].Trim().ToUpper();
2836 _CodigosDiccionario.Add(lcClaus[lnClau], _dtMultiSelectTable.DefaultView[tnIndiceSeleccionado][lcNomCamp]);
2841 _nMultiSelectIndex = -1;
2842 _dtMultiSelectTable =
new DataTable();
2845 _Evento_CodigoDiccionario_Establecido();
2904 String lcCodigo =
"";
2905 Boolean lbClickBrowser =
false;
2911 if (!_Desactivar_Evento_Validated && !lbClickBrowser)
2914 if (_ExpandirTexto(ref lcCodigo))
ewtextbox.Text = lcCodigo;
2917 _Codigo = Convert.ToString(
ewtextbox.Text);
2919 else if (lbClickBrowser)
2938 if (this.Llenar_Codigo(_Tabla) && !
string.IsNullOrWhiteSpace(tcTexto) && (!_Expandir) && (!
string.IsNullOrWhiteSpace(_Relleno.ToString())))
2942 tcTexto = tcTexto.Trim().PadLeft(_Len, _Relleno);
2947 int lnAncho = tcTexto.Trim().Length - 1;
2949 if (_Expandir && lnAncho <= _Len)
2952 Regex loRegex =
new Regex(
"\\.");
2953 if (tcTexto.IndexOf(
'.') != tcTexto.LastIndexOf(
'.'))
2955 tcTexto = loRegex.Replace(tcTexto,
"", _Len, tcTexto.IndexOf(
'.') + 1);
2956 lnAncho = tcTexto.Trim().Length - 1;
2960 if ((tcTexto.IndexOf(
'.') <= 0) && (!
string.IsNullOrWhiteSpace(_InicioCodigo)) && (lnAncho >= 0) && ((lnAncho + _InicioCodigo.Length + 1) <= _Len))
2962 tcTexto = String.Format(
"{0}{1}{2}", _InicioCodigo, tcTexto.StartsWith(
".") ?
"" :
".", tcTexto.Trim());
2963 lnAncho = tcTexto.Length - 1;
2968 if (tcTexto.Contains(
"."))
2970 tcTexto = tcTexto.Trim().Replace(
".",
new string(_Relleno, _Len - lnAncho));
2978 private void ewgrid_CellMouseDown(
object sender, EventArgs e)
2980 if (_Click_Combo_Grid != null)
2981 _Click_Combo_Grid();
2984 private void ewgrid_CellMouseUp(
object sender, EventArgs e)
2986 if (_Click_Combo_Grid_Up != null)
2987 _Click_Combo_Grid_Up();
2998 private void ewgrid_SelectionChanged(
object sender, EventArgs e)
3002 if (_Desactivar_Evento_Codigo_Cambiado)
3005 if (
ewgrid.CurrentRow == null)
3008 if (
ewgrid.CurrentCell.Tag == null)
3012 _Codigo =
ewgrid.CurrentCell.Tag.ToString();
3015 if (_Browser_Click_After != null)
3016 _Browser_Click_After(
true);
3018 catch (Exception loEx)
3020 DB.Registrar_Error(loEx);
3030 private void ewgrid_CellClick(
object sender, DataGridViewCellEventArgs e)
3034 if (
ewgrid.CurrentRow == null)
3042 ewgrid.Columns[e.ColumnIndex].SortMode = DataGridViewColumnSortMode.NotSortable;
3047 if (
ewgrid.CurrentCell.Tag != null)
3057 if (_Click_Celda != null)
3060 catch (Exception loEx)
3062 DB.Registrar_Error(loEx);
3071 private void ewgrid_Scroll(
object sender, ScrollEventArgs e)
3073 if (e.Type == ScrollEventType.SmallIncrement || e.Type == ScrollEventType.LargeIncrement)
3075 if (e.NewValue >=
this.ewgrid.Rows.Count - GetDisplayedRowsCount())
3078 TimeSpan ts = DateTime.Now - _GridLastLoading;
3079 if (ts.TotalMilliseconds > 100)
3081 this._GridFirstVisibleRow = e.NewValue;
3082 this._Cargar_Mas_Registros();
3086 this.
ewgrid.FirstDisplayedScrollingRowIndex = e.OldValue;
3098 private void HideScrollBars()
3101 this._GridLastLoading = DateTime.Now;
3103 if (_lGridScrollVisible)
3105 this._GridScrollBars = this.
ewgrid.ScrollBars;
3109 int lnRegistrosAñadir = _nRegistrosCarga;
3110 lnRegistrosAñadir = lnRegistrosAñadir + _nUltimoRegistro;
3111 if (_dtVisual.Rows.Count >= lnRegistrosAñadir)
3114 this.
ewgrid.ScrollBars = ScrollBars.None;
3119 _lGridScrollVisible =
false;
3126 private void ShowScrollBars()
3131 this.
ewgrid.ScrollBars = this._GridScrollBars;
3133 this.
ewgrid.FirstDisplayedScrollingRowIndex = this._GridFirstVisibleRow;
3137 _ewGridScrollBars = this._eewGridScrollBars;
3141 _lGridScrollVisible =
true;
3148 private int GetDisplayedRowsCount()
3150 double loTmp1 = this.
ewgrid.Rows[this.
ewgrid.FirstDisplayedScrollingRowIndex].Height;
3151 double loTmp2 = this.
ewgrid.Height;
3152 double loTmp3 = loTmp2 / loTmp1;
3153 return Convert.ToInt32(Math.Ceiling(loTmp3));
3161 private void ewcombobox_SelectedIndexChanged(
object sender, EventArgs e)
3169 if (!
string.IsNullOrWhiteSpace(
ewcombobox.ValueMember))
3175 ewcombobox.SelectedIndexChanged -=
new EventHandler(ewcombobox_SelectedIndexChanged);
3177 ewcombobox.SelectedIndexChanged +=
new EventHandler(ewcombobox_SelectedIndexChanged);
3181 if (_dtVisual.Columns[_Clave].DataType == typeof(
int))
3188 if (_Browser_Click_After != null)
3189 _Browser_Click_After(
true);
3191 catch (Exception loEx)
3193 DB.Registrar_Error(loEx);
3206 bool lbAbrirTeclaF4;
3211 if (!_ReadOnly && (keyData == Keys.F4 || lbAbrirTeclaF4))
3213 String lcTextoCondicionAtomatica = String.Empty;
3218 _Desactivar_Evento_Validated =
true;
3220 _Desactivar_Evento_Validated =
false;
3222 if(lbAbrirTeclaF4)
return true;
3226 if (_Mostrar_Mante && keyData == Keys.F5)
3231 return base.ProcessCmdKey(ref msg, keyData);
3241 return _ActivarCondicionAutomatica(ref tcTexto, _Len);
3252 string lcCodigo =
string.Empty;
3254 if (_Browser_Datatable_Personalizado is DataTable) _Browser_Datatable_Personalizado.DefaultView.RowFilter =
"";
3256 if (_PermitirFiltradoAutomaticoTextoParcial)
3258 lcCodigo = _Relleno == ((char)32) ?
ewtextbox.Text.TrimStart() :
ewtextbox.Text.Trim();
3259 tcTexto = (!
string.IsNullOrEmpty(lcCodigo) && lcCodigo.Length < tnLen && !lcCodigo.Contains(
".")) ? lcCodigo.Trim() :
string.Empty;
3262 return !
string.IsNullOrEmpty(tcTexto);
3270 private void ewtextbox_KeyUp(
object sender, KeyEventArgs e)
3273 if (Convert.ToBoolean(EW_GLOBAL._GetVariable(
"wl_hera")) && (e.KeyCode == Keys.Back || e.KeyCode == Keys.Delete))
3275 int lnPosCursor = this.
ewtextbox.SelectionStart;
3288 void ewtextbox_PreviewKeyDown(
object sender,
System.Windows.Forms.PreviewKeyDownEventArgs e)
3292 if (e.KeyCode == Keys.V && e.Control)
3303 private void btBrowser_base_Click_Before(ref
bool tlOk)
3305 if (_Tipo_Visual == _Tipos_Visuales.Hibrido)
3307 string lcCodigo = _Browser_Hibrido();
3309 if (!
string.IsNullOrWhiteSpace(lcCodigo))
3318 if (_Browser_Click_Before != null)
3319 _Browser_Click_Before(ref tlOk);
3327 private void btBrowser_base_Click_After(
bool tlAceptar)
3351 _Esconder_Label =
true;
3353 _lCodigosDiccionarioBrowser =
true;
3354 _Evento_CodigoDiccionario_Establecido();
3366 if ((tlAceptar) && (_Browser_Click_After != null))
3367 _Browser_Click_After(tlAceptar);
3370 switch (_Tipo_Visual)
3374 this._setTxtBoxFocus();
3399 if (!
string.IsNullOrWhiteSpace(
ewtextbox.Text))
3412 private void btMante_base_Click_Before(ref
bool tlOk)
3423 if (_Mante_Click_Before != null)
3424 _Mante_Click_Before(ref tlOk);
3432 private void PasarFoco()
3438 switch (_Tipo_Visual)
3440 case _Tipos_Visuales.Estandar:
3441 case _Tipos_Visuales.Hibrido:
3445 case _Tipos_Visuales.Combo:
3449 case _Tipos_Visuales.Grid:
3460 private void btMante_base_Click_After()
3463 if (_Mante_Click_After != null)
3464 _Mante_Click_After();
3466 switch (_Tipo_Visual)
3468 case _Tipos_Visuales.Estandar:
3469 case _Tipos_Visuales.Hibrido:
3470 this._Refrescar_Descripcion();
3483 private void ewtxtcodlabel_Resize(
object sender, EventArgs e)
3485 if (!_lRedimensionInterna)
3486 _Definir_Estilo_Visual();
3494 private string _Browser_Hibrido()
3496 string[] lcTitutlos;
3497 string lcCodigo =
"";
3499 DataTable dtSel =
new DataTable();
3502 string lcSql =
"select " + _Browser_Distinct + _Clave +
"," + _Concepto +
" from " + DB.SQLDatabase(_Browser_Database, _Browser_Tabla);
3504 if (!
string.IsNullOrWhiteSpace(_Browser_Condicion))
3505 lcSql = lcSql +
" where " + _Browser_Condicion;
3507 bool llOk = DB.SQLExec(lcSql, ref dtSel);
3510 if (llOk && dtSel.Rows.Count > 0)
3512 formul.Forms.Seleccionar frmSel =
new formul.Forms.Seleccionar();
3514 frmSel._Imagen_Aceptar =
true;
3515 frmSel._Imagen_Cancelar =
true;
3516 frmSel._DataTable = dtSel;
3517 frmSel._Titulo = _Browser_Titulo;
3518 frmSel.Height = 700;
3521 lcTitutlos = _Browser_Titulos_Campos.Split(
',');
3523 int lnNumTitulos = lcTitutlos.GetLength(0);
3525 foreach (DataColumn loCol
in frmSel._DataTable.Columns)
3527 if (i <= (lnNumTitulos - 1))
3528 loCol.Caption = lcTitutlos[i];
3532 frmSel.ShowDialog();
3533 if (frmSel.DialogResult == DialogResult.OK)
3535 DataRow drSel = frmSel._DataRowSelect;
3536 lcCodigo = drSel[0].ToString();
3549 private void ewcombobox_Click(
object sender, EventArgs e)
3551 if (_Click_Combo_Grid != null)
3552 _Click_Combo_Grid();
3556 private void ewcombobox_SelectedIndexChanged_1(
object sender, EventArgs e)
3562 #endregion EVENTOS PRIVADOS 3565 #region METODOS PRIVADOS 3576 private String _cCodigoTmp =
"";
3584 return (_DataTable != null);
3590 private void _Definir_Estilo_Visual()
3592 bool llOrigenManual = EvaluarOrigenManual();
3596 _lRedimensionInterna =
true;
3619 switch (_Tipo_Visual)
3621 case _Tipos_Visuales.Combo:
3628 ewFlowLayoutPanel1.Visible =
true;
3629 btMante.Visible = !llOrigenManual && _Mostrar_Mante;
3632 ewcombobox.Width = _AnchoCombo > 0 ? _AnchoCombo : this.Width - ((!llOrigenManual && _Mostrar_Mante) ?
ewcombobox.Height + 3 : 0);
3633 ewFlowLayoutPanel1.Left =
ewcombobox.Width + 1;
3643 _CargaBotonesAdicionales();
3645 if(ewFlowLayoutPanelBotonesAdicionales.Controls.Count > 0 )
3647 ewcombobox.Width -= ewFlowLayoutPanelBotonesAdicionales.Width + 5;
3648 ewFlowLayoutPanel1.Left =
ewcombobox.Width + 1;
3650 foreach (Control loControl
in ewFlowLayoutPanelBotonesAdicionales.Controls)
3652 loControl.Height =
btMante.Height;
3658 case _Tipos_Visuales.Grid:
3661 ewgrid.ColumnHeadersHeightSizeMode = DataGridViewColumnHeadersHeightSizeMode.AutoSize;
3662 ewgrid.DefaultCellStyle.WrapMode = DataGridViewTriState.True;
3663 ewgrid.DefaultCellStyle.Font = _oFont;
3665 ewgrid.RowHeadersVisible =
false;
3669 ewgrid.Dock = DockStyle.Fill;
3672 ewgrid.Dock = DockStyle.None;
3673 ewgrid.Width = this.Width;
3674 ewgrid.Height = this.Height;
3675 if (vScrollBar1.Visible)
3676 ewgrid.Width = this.Width - vScrollBar1.Width;
3677 if (hScrollBar1.Visible)
3678 ewgrid.Height = this.Height - hScrollBar1.Height;
3686 ewFlowLayoutPanel1.Visible =
false;
3688 ewgrid.MultiSelect =
false;
3691 ewgrid.ColumnHeadersVisible = !
string.IsNullOrWhiteSpace(_Browser_Titulo) && (_Presentar_Browser_Titulo);
3695 _nRegistrosCarga = _Obtener_Registros_Carga();
3697 ewPanelBotonesAdicionales.Visible =
false;
3707 ewFlowLayoutPanel1.Visible =
true;
3709 btMante.Visible = _Mostrar_Mante;
3710 btInfo.Visible = _Mostrar_Info;
3722 btInfo.Width = btInfo.Height;
3723 ewlabel.Visible = !_lEsconder_Label;
3726 this.Height =
ewtextbox.Height + (_lSage50 ? 2 : 1);
3728 _CargaBotonesAdicionales();
3733 catch (Exception loEx)
3735 DB.Registrar_Error(loEx);
3738 _lRedimensionInterna =
false;
3744 ewcombobox.Width = this.Width - ((!llOrigenManual && _Mostrar_Mante) ?
ewcombobox.Height + 3 : 0);
3745 ewFlowLayoutPanel1.Left =
ewcombobox.Width + 1;
3750 private void _CargaBotonesAdicionales()
3754 ewPanelBotonesAdicionales.Visible = _MostrarBotonesAdicionales;
3756 if (Created && _MostrarBotonesAdicionales && _BotonesAdicionales.Count > 0 && ewFlowLayoutPanelBotonesAdicionales.Controls.Count == 0)
3758 foreach(
ewbutton loButton
in _BotonesAdicionales)
3760 loButton.Name =
String.Format(
"{0}{1}",
String.IsNullOrEmpty(loButton.Name) ?
"BotonAdicional" : loButton.Name, lnCont++);
3761 loButton.TabStop =
false;
3762 ewFlowLayoutPanelBotonesAdicionales.Controls.Add(loButton);
3790 private void _Definir_Browser()
3823 if (_cCaracterAncho !=
' ' && !String.IsNullOrWhiteSpace(_cCaracterAncho.ToString()))
3824 lcCarText = _cCaracterAncho;
3828 string lcText =
string.Empty;
3830 lcText = lcText.PadRight(_Len, lcCarText);
3835 lnWidth = TextRenderer.MeasureText(lcText,
ewtextbox.Font).Width;
3844 private void _Refrescar_Descripcion()
3846 if ((_Tipo_Visual == _Tipos_Visuales.Estandar) || (_Tipo_Visual == _Tipos_Visuales.Hibrido))
3849 ewlabel.Text = _DescripcionCodigo;
3851 if (this._lEsconder_Label) toolTipTxtCodLabel.SetToolTip(
ewtextbox,
ewlabel.Text);
3861 String lcTextoPersonalizado =
string.Empty;
3863 if (!_Refrescar_Descripcion_Datatable_Personalizado(out lcTextoPersonalizado)) lcTextoPersonalizado = _cDescripcionCodigo;
3864 if(_Refrescar_Descripcion_Personalizada is Delegar_Refrescar_Descripcion_Personalizada) lcTextoPersonalizado = _Refrescar_Descripcion_Personalizada?.Invoke(lcTextoPersonalizado);
3866 return lcTextoPersonalizado;
3887 this._Cargar_Propiedades();
3897 private bool _Obtener_Celda_Codigo(
string tcCodigo, ref DataGridViewCell dgCelda, out
int tnRowIndex)
3899 bool llEncontrado =
false;
3903 if (tcCodigo ==
string.Empty)
3906 if (
ewgrid.RowCount == 0)
3910 tcCodigo = tcCodigo.Trim();
3912 foreach (DataGridViewRow dgRow
in ewgrid.Rows)
3914 foreach (DataGridViewCell dgCell
in dgRow.Cells)
3915 if ((dgCell.Tag != null) && (dgCell.Tag.ToString().Trim() == tcCodigo))
3917 llEncontrado =
true;
3919 tnRowIndex = dgCell.RowIndex;
3928 if ((!llEncontrado) && (_dtVisual.Rows.Count > _nUltimoRegistro))
3930 _Cargar_Mas_Registros();
3931 llEncontrado = _Obtener_Celda_Codigo(tcCodigo, ref dgCelda, out tnRowIndex);
3935 return llEncontrado;
3942 private int _Obtener_Registros_Carga()
3944 int lnRegs = 0, lnFilasVisibles = 0;
3946 if (_Tipo_Visual != _Tipos_Visuales.Grid)
3952 if (_CargarTodosRegistros)
3957 lnFilasVisibles = (
ewgrid.Height / _Alto_Filas);
3960 if (lnFilasVisibles < 1) lnFilasVisibles = 1;
3961 lnRegs = (lnFilasVisibles * _Grid_Columnas) * 2;
3999 if (_Browser_Datatable_Personalizado != null)
return true;
4001 _ErrorProviderText =
"";
4003 if (tlValidar || (!tlValidar && _Validar_Codigo))
4007 if (
string.IsNullOrWhiteSpace(tcCodigo))
4012 DataTable ldtConsulta =
new DataTable();
4014 if (
string.IsNullOrWhiteSpace(_Browser_Clave)) _Browser_Clave = _Clave;
4016 string lcSql =
"SELECT " + _Browser_Alias + _Browser_Clave +
", " + _Browser_Alias + _Concepto +
" " +
4017 "FROM " + DB.SQLDatabase(_Browser_Database, _Browser_Tabla) +
" " +
4018 "WHERE " + _Browser_Alias + _Clave +
" = " + DB.SQLString(tcCodigo);
4024 if (!
string.IsNullOrWhiteSpace(_Browser_Condicion))
4025 lcSql = lcSql +
" AND (" + _Browser_Condicion +
" ) ";
4027 llOk = DB.SQLExec(lcSql, ref ldtConsulta);
4029 if (llOk && ldtConsulta.Rows.Count > 0)
4032 _cDescripcionCodigo = ldtConsulta.Rows[0][1].ToString();
4034 if (ldtConsulta.Rows.Count > 1)
4036 if (!_lCodigosDiccionarioBrowser)
4038 if (_lConsultar_Usuario_Seleccion_Multiple
4042 ContextMenuStrip = _Montar_ContextMenuStrip(ldtConsulta);
4045 _dtMultiSelectTable = ldtConsulta.Copy();
4048 Point lptLowerLeft =
new Point(0, Height);
4049 lptLowerLeft = PointToScreen(lptLowerLeft);
4051 ContextMenuStrip.Show(lptLowerLeft);
4055 _dtMultiSelectTable = ldtConsulta.Copy();
4057 Establecer_valor_diccionario(0);
4065 _lCodigosDiccionarioBrowser =
false;
4067 if (!llOk && _lMostrar_Mensaje)
4072 if (_Tipo_Visual ==
_Tipos_Visuales.Estandar) _ErrorProviderText = _Mensaje_No_Existe;
4077 if(_CrearManteSiCodigoNoExiste && !String.IsNullOrEmpty(_cMante.Trim()))
4079 _MensajeNoSePuedeCrear = _Mensaje_No_Existe;
4081 if (_LanzarEventoValidacionCrearCodigo(tcCodigo))
4083 String lcMessage = String.Format(
"{0}{1}¿Desea crearlo?", _Mensaje_No_Existe.EndsWith(
".") ? _Mensaje_No_Existe : _Mensaje_No_Existe +
".", Environment.NewLine);
4085 if (DialogResult.Yes == _MessageBox(lcMessage, MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button2, DialogResult.No))
4087 _CreaManteSiCodigoNoExiste(ref tcCodigo, ref llOk);
4092 if(!String.IsNullOrEmpty(_MensajeNoSePuedeCrear)) FUNCTIONS._MessageBox(_MensajeNoSePuedeCrear, MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button1, DialogResult.OK);
4097 _MessageBox(_Mensaje_No_Existe, MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button1, DialogResult.OK);
4112 private DialogResult _MessageBox(
string tcMessage, MessageBoxButtons toMessageBoxButtons, MessageBoxIcon toMessageBoxIcon, MessageBoxDefaultButton toMessageBoxDefaultButton, DialogResult toDialogResult)
4116 return _FormBase._MessageBox(tcMessage, toMessageBoxButtons, toMessageBoxIcon, toMessageBoxDefaultButton, toDialogResult,
new MessageBoxAutomatico() { _Guid = _Guid, _Pantalla = _FormBase.
_Pantalla });
4120 return FUNCTIONS._MessageBox(tcMessage, toMessageBoxButtons, toMessageBoxIcon, toMessageBoxDefaultButton, toDialogResult);
4124 private bool _LanzarEventoValidacionCrearCodigo(String tcCodigo)
4126 Boolean lbOk =
true;
4128 if (_ValidacionCrearCodigo != null) lbOk = _ValidacionCrearCodigo(tcCodigo);
4133 private void _CreaManteSiCodigoNoExiste(ref String tcCodigo, ref Boolean tlOk)
4135 String lcCodigoTmp = _cCodigo;
4136 List<ewbutton> loAsistentes =
new List<ewbutton>();
4138 if (_MostrarBotonesAdicionales && _BotonesAdicionales.Count > 0)
4140 loAsistentes = (from loButton in _BotonesAdicionales
4142 select loButton).ToList();
4145 _cCodigo = tcCodigo;
4146 _Validar_Codigo =
false;
4148 if (loAsistentes.Count > 0)
4158 _btMante._CrearNuevoCodigo =
true;
4159 _btMante._Codigo = tcCodigo;
4160 _btMante.btMante_Click(_btMante, null);
4165 _cCodigo = lcCodigoTmp;
4168 _lMostrar_Mensaje =
false;
4169 tlOk = _Existe_Codigo(ref tcCodigo,
true);
4171 if (!tlOk) _Refrescar_Descripcion();
4173 _lMostrar_Mensaje =
true;
4174 _Validar_Codigo =
true;
4183 private bool Llenar_Codigo(
string tcTaula)
4188 if (Convert.ToBoolean(EW_GLOBAL._GetVariable(
"wl_hera")))
4190 if (!
string.IsNullOrWhiteSpace(tcTaula))
4192 tcTaula = tcTaula.ToLower();
4193 int lnLongTaula = tcTaula.Length;
4195 string lcCodTaula =
"";
4197 lnPos = tcTaula.IndexOf(
'_');
4200 lnPos = tcTaula.IndexOf(
'!');
4203 lcCodTaula = tcTaula.Substring(lnPos);
4205 lcCodTaula = tcTaula;
4207 if (!
string.IsNullOrWhiteSpace(lcCodTaula))
4209 List<string> Lista_Tablas =
new List<string>();
4210 Lista_Tablas.Add(
"almacen");
4211 Lista_Tablas.Add(
"idioma");
4212 Lista_Tablas.Add(
"familias");
4213 Lista_Tablas.Add(
"subfam");
4214 Lista_Tablas.Add(
"zonas");
4215 Lista_Tablas.Add(
"paises");
4216 Lista_Tablas.Add(
"rutas");
4217 Lista_Tablas.Add(
"activi");
4218 Lista_Tablas.Add(
"zonashera");
4219 Lista_Tablas.Add(
"delegacion");
4220 Lista_Tablas.Add(
"vendedor");
4221 Lista_Tablas.Add(
"clientes");
4223 llOk = !Lista_Tablas.Contains(lcCodTaula);
4227 else if (Convert.ToBoolean(EW_GLOBAL._GetVariable(
"wl_sage50")))
4229 llOk = tcTaula.ToLower() !=
"codpos";
4243 private System.Drawing.Bitmap _RedimensionarImagen(
System.Drawing.Image toImagen,
int tnAlto,
int tnAncho)
4245 int lnAnchoOriginal = toImagen.Width;
4246 int lnAltoOriginal = toImagen.Height;
4248 float lnPorcentajeEscaladoX = (float)tnAncho / (
float)lnAnchoOriginal;
4249 float lnPorcentajeEscaladoY = (float)tnAlto / (
float)lnAltoOriginal;
4251 int lnNuevoAncho = (int)(lnAnchoOriginal * lnPorcentajeEscaladoX);
4252 int lnNuevoAlto = (int)(lnAltoOriginal * lnPorcentajeEscaladoY);
4254 System.Drawing.Bitmap loNuevaImagen =
new System.Drawing.Bitmap(lnNuevoAncho, lnNuevoAlto);
4255 System.Drawing.Graphics loSuperficieGDI =
System.Drawing.Graphics.FromImage((
System.Drawing.Image)loNuevaImagen);
4256 loSuperficieGDI.InterpolationMode =
System.Drawing.Drawing2D.InterpolationMode.HighQualityBicubic;
4257 loSuperficieGDI.DrawImage(toImagen, 0, 0, lnNuevoAncho, lnNuevoAlto);
4258 loSuperficieGDI.Dispose();
4260 return loNuevaImagen;
4267 private void Control_Paralelismo()
4269 if (EW_GLOBAL._lParalelismo_Activo ==
false)
4282 this.
ewcombobox.DropDownStyle =
System.Windows.Forms.ComboBoxStyle.DropDownList;
4287 #endregion METODOS PRIVADOS 4290 #region METODOS PUBLICOS 4299 base.OnVisibleChanged(e);
4301 if (Visible && !Disposing)
4304 if (_cSQL_Personalizado != null && (!
string.IsNullOrWhiteSpace(_cSQL_Personalizado)) && !_Modo_Diseño)
4306 _Reload_propiedades();
4308 if (_Browser_Tabla.Trim().ToUpper() ==
"ARTICULO")
4311 _Browser_ConsultaPersonalizada = _cSQL_Personalizado;
4319 DataTable ldtPersonalizado =
new DataTable();
4322 DB.SQLExec(_cSQL_Personalizado, ref ldtPersonalizado);
4325 _DataTable = ldtPersonalizado;
4326 _Browser_Datatable_Personalizado = ldtPersonalizado;
4341 if (_CargarTodosRegistros && _RegistrosCargados)
4344 bool llConexion = !
string.IsNullOrWhiteSpace(DB.Conexion);
4345 bool llOrigenManual = (_DataTable != null);
4350 _Desactivar_Evento_Codigo_Cambiado =
true;
4354 if (_PrimeraVez || _Modo_Diseño)
4360 _dtVisual = _dtDataTable;
4365 _Resultados_Datatable(ref _dtVisual);
4367 switch (_Tipo_Visual)
4374 if (!RefreshTipoGrid())
4384 _RefrescarBinding();
4386 if (_CargarTodosRegistros)
4387 _RegistrosCargados =
true;
4390 catch (Exception loEx)
4392 DB.Registrar_Error(loEx);
4395 _Desactivar_Evento_Codigo_Cambiado =
false;
4397 _EstablecerPermisos();
4404 private void RefreshDatatable()
4406 if (!
string.IsNullOrEmpty(_Browser_Database) && !
string.IsNullOrEmpty(_Browser_Tabla))
4408 DataTable dtCons =
new DataTable();
4410 string lcSql =
"select " + _Browser_Distinct +
" " + _Browser_Alias + _Clave +
", ";
4412 if (!
string.IsNullOrWhiteSpace(_MultiCampos))
4414 string lcMulticampos = _MultiCampos.Replace(
",",
"+' '+");
4415 lcSql += lcMulticampos +
" as " + _Concepto;
4418 lcSql += _Browser_Alias + _Concepto;
4420 if (!
string.IsNullOrWhiteSpace(_Imagen))
4421 lcSql = lcSql +
", " + _Browser_Alias + _Imagen;
4423 if (!
string.IsNullOrWhiteSpace(_CampoBackColor))
4424 lcSql = lcSql +
", " + _CampoBackColor;
4426 if (!
string.IsNullOrWhiteSpace(_CampoForeColor))
4427 lcSql = lcSql +
", " + _CampoForeColor;
4429 if (!
string.IsNullOrWhiteSpace(_CampoFont))
4430 lcSql = lcSql +
", " + _CampoFont;
4432 lcSql = lcSql +
" from " + DB.SQLDatabase(_Browser_Database, _Browser_Tabla);
4434 if (!
string.IsNullOrWhiteSpace(_CampoVisible))
4436 if (!
string.IsNullOrWhiteSpace(_Browser_Condicion))
4437 _Browser_Condicion +=
" and ";
4439 _Browser_Condicion += _CampoVisible +
" = " + DB.SQLTrue();
4442 if (!
string.IsNullOrWhiteSpace(_Browser_Condicion))
4443 lcSql = lcSql +
" where " + _Browser_Condicion;
4445 if (!
string.IsNullOrWhiteSpace(_Browser_Campo_Predet))
4446 lcSql = lcSql +
" order by " + _Browser_Campo_Predet;
4448 DB.SQLExec(lcSql, ref dtCons);
4455 if (_Clave.Contains(
" as "))
4456 _Clave = _Clave.Substring(_Clave.IndexOf(
" as ") + 4);
4458 else _dtVisual = null;
4464 private bool RefreshTipoGrid()
4466 if (_Grid_Columnas <= 0)
4468 FUNCTIONS._MessageBox(
"Debe establecer la propiedad _Grid_Columnas para el tipo cuadrícula",
"txtcodlabel", MessageBoxButtons.OK, MessageBoxIcon.Information, (
FormBase)
this.FindForm());
4474 if (_dtVisual == null)
4475 _dtVisual =
new DataTable();
4478 for (
int lnCol = 0; lnCol < _Grid_Columnas; lnCol++)
4480 _dtVisual.Columns.Add();
4482 for (
int lnFila = 0; lnFila < (50 * _Grid_Columnas); lnFila++)
4484 _dtVisual.Rows.Add(
new string[_Grid_Columnas]);
4488 if (_dtVisual != null)
4497 for (
int lnCol = 0; lnCol < _Grid_Columnas; lnCol++)
4500 TextAndImageColumn loCol =
new TextAndImageColumn();
4501 lcCol =
"col" + lnCol.ToString().Trim();
4504 ewgrid.Columns.Add(loCol);
4505 ewgrid.Columns[lcCol].AutoSizeMode = DataGridViewAutoSizeColumnMode.Fill;
4506 ewgrid.Columns[lcCol].DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter;
4507 ewgrid.Columns[lcCol].Resizable = DataGridViewTriState.False;
4510 ewgrid.Columns[lnCol].HeaderText =
"";
4512 ewgrid.Columns[lnCol].HeaderText = _Browser_Titulo;
4516 _nUltimoRegistro = 0;
4517 _nRegistrosCarga = _Obtener_Registros_Carga();
4519 if (_nRegistrosCarga != 0)
4521 _Cargar_Mas_Registros();
4522 _PrimeraVez =
false;
4533 private void RefreshTipoCombo()
4535 if (_dtVisual != null && !_Modo_Diseño)
4539 if (IndiceValorVacio < 0 || IndiceValorVacio >= _dtVisual.Rows.Count)
4541 _dtVisual.Rows.Add(
new object[] {
"", LiteralValorVacio });
4542 _dtVisual.DefaultView.Sort = _Concepto;
4547 _dtVisual.DefaultView.Sort = _Concepto;
4548 _dtVisual = _dtVisual.DefaultView.ToTable();
4550 DataRow ldrRowValorVacio = _dtVisual.NewRow();
4551 ldrRowValorVacio[_Clave] =
"";
4552 ldrRowValorVacio[_Concepto] = LiteralValorVacio;
4553 _dtVisual.Rows.InsertAt(ldrRowValorVacio, IndiceValorVacio);
4556 _dtVisual.CaseSensitive =
true;
4558 ewcombobox.ValueMember = _dtVisual.Columns[_Clave].ToString();
4559 if (_dtVisual.Columns.Contains(_Concepto))
4560 ewcombobox.DisplayMember = _dtVisual.Columns[_Concepto].ToString();
4567 if (_dtVisual != null && _dtVisual.Rows.Count > 0)
4570 ewcombobox.SelectedValue = _dtVisual.Rows[0][_Clave];
4574 _PrimeraVez =
false;
4577 private void _EstablecerPermisos()
4579 if (this.ParentForm != null && ((this.ParentForm is
FormMante && !_ReadOnly) || !(this.ParentForm is
FormMante)))
4582 string lcObjecte = this.GetType().Name.Trim().ToLower();
4583 string lcObj2 = this.Name.Trim().ToLower();
4585 if (!(lcObjecte ==
"txtseltipodoc" || lcObj2 ==
"cmbfacturadocserie"))
4587 if (!(lcObjecte ==
"txtplananalitico" && ParentForm.Name ==
"frmZoomCuenta"))
4593 dynamic loForm = ParentForm;
4596 bool llReadOnly = loForm._Controles_En_Formulario_De_Solo_Lectura();
4604 if (!this._ReadOnly)
4606 string[] lcOpcEsp = this._OpcEsp.Split(
',');
4607 foreach (
string lcCodiOpcEsp
in lcOpcEsp)
4609 if (!
string.IsNullOrWhiteSpace(lcCodiOpcEsp))
4629 PropertyInfo[] controlProperties = typeof(
ewtxtcodlabel).GetProperties(BindingFlags.Public | BindingFlags.Instance);
4631 foreach (PropertyInfo oPropInfo
in controlProperties)
4633 if (oPropInfo.CanWrite)
4635 switch (oPropInfo.Name)
4637 case "_Browser_Datatable_Personalizado":
4638 if (this._Browser_Datatable_Personalizado != null)
4639 toFiltroClon._Browser_Datatable_Personalizado = this._Browser_Datatable_Personalizado.Copy();
4643 if (this._DataTable != null)
4644 toFiltroClon._DataTable = this._DataTable.Copy();
4648 this._btBrowser._Clonar(toFiltroClon._btBrowser);
4651 case "ActiveControl":
4652 case "WindowTarget":
4653 case "_AplicarEstilos":
4658 oPropInfo.SetValue(toFiltroClon, oPropInfo.GetValue(
this, null), null);
4671 Binding loBind = this.DataBindings[
"_Codigo"];
4673 this.DataBindings[0].ReadValue();
4693 _Cancelar_Suscripcion_Eventos();
4699 btMante.
_Click_After +=
new botones.btMante._Click_After_Handler(btMante_base_Click_After);
4700 ewcombobox.SelectedIndexChanged +=
new EventHandler(ewcombobox_SelectedIndexChanged);
4701 ewgrid.SelectionChanged +=
new EventHandler(ewgrid_SelectionChanged);
4702 ewgrid.CellMouseDown +=
new DataGridViewCellMouseEventHandler(ewgrid_CellMouseDown);
4703 ewgrid.CellMouseUp +=
new DataGridViewCellMouseEventHandler(ewgrid_CellMouseUp);
4716 btMante.
_Click_After -=
new botones.btMante._Click_After_Handler(btMante_base_Click_After);
4717 ewcombobox.SelectedIndexChanged -=
new EventHandler(ewcombobox_SelectedIndexChanged);
4718 ewgrid.SelectionChanged -=
new EventHandler(ewgrid_SelectionChanged);
4719 ewgrid.CellMouseDown -=
new DataGridViewCellMouseEventHandler(ewgrid_CellMouseDown);
4720 ewgrid.CellMouseUp -=
new DataGridViewCellMouseEventHandler(ewgrid_CellMouseUp);
4728 ewgrid.CurrentCell = null;
4736 private void _Cargar_Mas_Registros()
4739 this.HideScrollBars();
4741 bool llRestaurar =
false;
4744 if (_CargarTodosRegistros)
4745 _nRegistrosCarga = _dtVisual.Rows.Count;
4747 int lnCol = 0, lnRegistrosAñadir = _nRegistrosCarga;
4748 DataGridViewRow dgvrFila = null;
4750 if (_Grid_Columnas <= 0)
4754 if (_Desactivar_Evento_Codigo_Cambiado)
4758 _Desactivar_Evento_Codigo_Cambiado =
true;
4761 lnRegistrosAñadir = lnRegistrosAñadir + _nUltimoRegistro;
4763 if (_dtVisual.Rows.Count < lnRegistrosAñadir)
4764 lnRegistrosAñadir = _dtVisual.Rows.Count;
4767 int lnAchoImagen = (
ewgrid.Width / _Grid_Columnas);
4768 if (this._Imagen_y_Texto)
4770 lnAchoImagen = lnAchoImagen / 2;
4771 if (_nAlto_Filas < lnAchoImagen)
4772 lnAchoImagen = _nAlto_Filas;
4777 for (
int lnFila = _nUltimoRegistro; lnFila < lnRegistrosAñadir; lnFila++)
4779 if ((lnFila == _nUltimoRegistro) || (lnFila % _Grid_Columnas == 0))
4782 if (dgvrFila != null)
4783 ewgrid.Rows.Add(dgvrFila);
4786 dgvrFila =
new DataGridViewRow();
4787 dgvrFila.CreateCells(
ewgrid);
4788 dgvrFila.Height = _Alto_Filas;
4789 dgvrFila.Resizable = DataGridViewTriState.False;
4797 TextAndImageCell loCelda = ((TextAndImageCell)dgvrFila.Cells[lnCol]);
4798 loCelda.Value = _dtVisual.Rows[lnFila][_Concepto].ToString().Trim();
4799 loCelda.Tag = _dtVisual.Rows[lnFila][_Clave];
4802 string lcImagen =
"";
4803 if (!
string.IsNullOrWhiteSpace(_Imagen))
4804 lcImagen = _dtVisual.Rows[lnFila][_Imagen].ToString();
4807 bool llImagenOk =
false;
4808 if (!
string.IsNullOrWhiteSpace(lcImagen))
4811 if (!File.Exists(lcImagen))
4813 lcImagen = EW_GLOBAL._GetVariable(
"wc_iniservidor").ToString() + EW_GLOBAL._GetVariable(
"wc_comunesfotos").ToString() + lcImagen;
4817 if (File.Exists(lcImagen))
4821 Bitmap loImagen = _RedimensionarImagen(Image.FromFile(lcImagen), _nAlto_Filas - 5, lnAchoImagen - 5);
4822 loCelda._Imagen = loImagen;
4823 loCelda._AnchoImagen = lnAchoImagen;
4835 if (!llImagenOk && !
string.IsNullOrWhiteSpace(_CampoBackColor))
4837 String lcColor = Convert.ToString(_dtVisual.Rows[lnFila][_CampoBackColor]).Trim();
4838 if (!
String.IsNullOrEmpty(lcColor))
4842 Int32 lnColor = Convert.ToInt32(_dtVisual.Rows[lnFila][_CampoBackColor]);
4843 loCelda.Style.BackColor =
System.Drawing.ColorTranslator.FromWin32(lnColor);
4845 catch (Exception loEx)
4847 DB.Registrar_Error(loEx);
4854 if (!
string.IsNullOrWhiteSpace(_CampoForeColor))
4856 String lcColor = Convert.ToString(_dtVisual.Rows[lnFila][_CampoBackColor]).Trim();
4857 if (!
String.IsNullOrEmpty(lcColor))
4861 Int32 lnColor = Convert.ToInt32(_dtVisual.Rows[lnFila][_CampoForeColor]);
4862 loCelda.Style.ForeColor =
System.Drawing.ColorTranslator.FromWin32(lnColor);
4864 catch (Exception loEx)
4866 DB.Registrar_Error(loEx);
4873 if (!
string.IsNullOrWhiteSpace(_CampoFont))
4875 string lcValor = _dtVisual.Rows[lnFila][_CampoFont].ToString().Trim();
4876 if (!
string.IsNullOrWhiteSpace(lcValor))
4880 string[] lcFont = lcValor.Split(
',');
4882 float lnFuente = 9.5F;
4884 if (lcFont.Length >= 2)
4885 if (!
float.TryParse(lcFont[1].Replace(
".",
","), out lnFuente))
4888 if (lcFont.Length == 2)
4889 loCelda.Style.Font =
new Font(lcFont[0], lnFuente);
4890 else if (lcFont.Length == 3)
4894 FontStyle loFontStyle = (FontStyle)Enum.Parse(typeof(FontStyle), lcFont[2].Trim());
4896 loCelda.Style.Font =
new Font(lcFont[0], lnFuente, loFontStyle);
4900 loCelda.Style.Font =
new Font(lcFont[0], lnFuente);
4905 catch (Exception loEx)
4907 DB.Registrar_Error(loEx);
4913 if (lnFila + 1 == lnRegistrosAñadir)
4915 ewgrid.Rows.Add(dgvrFila);
4922 _nUltimoRegistro = lnRegistrosAñadir;
4925 if (
ewgrid.Rows.Count > 0 &&
this.
ewgrid.FirstDisplayedScrollingRowIndex > -1 &&
this._GridFirstVisibleRow > -1)
4928 this.ShowScrollBars();
4932 _Desactivar_Evento_Codigo_Cambiado =
false;
4944 string[] lcRGB = tcColor.Split(
',');
4945 if (lcRGB.Length > 1)
4947 loColor =
Color.FromArgb(Convert.ToInt32(lcRGB[0]), Convert.ToInt32(lcRGB[1]), Convert.ToInt32(lcRGB[2]));
4952 if (tcColor.Substring(0, 1) ==
"#")
4954 loColor =
Color.FromArgb(ColorTranslator.FromHtml(tcColor).ToArgb());
4957 loColor =
Color.FromArgb(
Color.FromName(tcColor.Trim()).ToArgb());
4972 if (!this._MostrarMenuContextual)
return new ContextMenuStrip();
4974 if (tdtTablaOrigen == null || tdtTablaOrigen.Columns.Count < 2)
return new ContextMenuStrip();
4976 ContextMenuStrip loContextMenuStrip =
new ContextMenuStrip();
4978 int nlNumCols = tdtTablaOrigen.Columns.Count;
4981 foreach (DataRow drRow
in tdtTablaOrigen.Rows)
4983 ToolStripMenuItem loSubContextMenuStrip =
new ToolStripMenuItem();
4984 loSubContextMenuStrip.Name = lnIndex.ToString();
4985 for (
int lnCol = 0; lnCol < nlNumCols; lnCol++)
4987 loSubContextMenuStrip.Text += drRow[lnCol].ToString().TrimEnd();
4988 loSubContextMenuStrip.Tag += drRow[lnCol].ToString().TrimEnd();
4989 if (lnCol < nlNumCols - 1)
4991 loSubContextMenuStrip.Text +=
" - ";
4992 loSubContextMenuStrip.Tag +=
" - ";
4996 loSubContextMenuStrip.Click +=
new EventHandler(Evento_Codigo_Elegido);
4997 loContextMenuStrip.Items.Add(loSubContextMenuStrip);
5003 return loContextMenuStrip;
5008 #endregion METODOS PUBLICOS 5011 private void ewcombobox_DropDown(
object sender, EventArgs e)
5013 if (_Click_Combo_DropDown != null)
5014 _Click_Combo_DropDown(
true);
5018 private void ewcombobox_DropDownClosed(
object sender, EventArgs e)
5020 if (_Click_Combo_DropDown != null)
5021 _Click_Combo_DropDown(
false);
5024 private void btBrowser__Click_Before(ref
bool tlOk)
5031 #region CLASES DERIVADAS EWTXTCODLABEL 5032 public class txtArticulo : ewtxtcodlabel
5042 public delegate
void Delegar_ProcessCmdKey(ref
bool tlOk, Keys keyData);
5055 _Valor_Vacio =
true;
5062 _Browser_Titulo =
"Listado de artículos";
5065 _btMante._Click_BeforeExtended += _btMante__Click_BeforeExtended;
5074 private void _btMante__Click_BeforeExtended(
object sender, EventArgs e, ref
bool tlOk)
5078 if (!
string.IsNullOrWhiteSpace(_Codigo))
5079 lnTipo = Convert.ToInt16(DB.SQLValor(
"ARTICULO",
"CODIGO", _Codigo,
"TIPO"));
5080 else if (Convert.ToBoolean(EW_GLOBAL._GetVariable(
"wl_ConceptosFacturables")))
5083 _Mante = lnTipo == 2 ?
"CONCEPTOSFACTURABLES" :
"ARTICULO";
5091 base._Cargar_Propiedades();
5096 _Database =
"GESTION";
5097 _Tabla =
"ARTICULO";
5099 _Mante =
"ARTICULO";
5101 _Mensaje_No_Existe =
"El código de artículo no existe";
5104 botones.btBrowArticulo btbrowarticulo =
new botones.btBrowArticulo();
5105 _Browser_Clave = btbrowarticulo._Clave;
5106 _Browser_Database = btbrowarticulo._DataBase;
5107 _Browser_Campo_Predet = btbrowarticulo._Campo_Predet;
5108 _Browser_Campos = btbrowarticulo._Campos;
5109 _Browser_Condicion =
"";
5110 _Browser_Tabla = btbrowarticulo._Tabla;
5111 _Browser_Titulos_Campos = btbrowarticulo._Titulos_Campos;
5112 _Browser_Titulo = btbrowarticulo._Titulo;
5113 _Browser_Alias = btbrowarticulo._Alias;
5134 _TooltipBrowser =
"Consultar artículos";
5135 _TooltipMante =
"Mantenimiento de artículos";
5137 _Trim_Codigo_Seleccionado =
false;
5150 if (tlValidar || (!tlValidar && this._Validar_Codigo))
5155 if (_Browser_Datatable_Personalizado == null) llOk = base._Existe_Codigo(ref tcCodigo, tlValidar);
5159 if (_Browser_Datatable_Personalizado.Select(
"codigo = '" + tcCodigo +
"'").Count() > 0) llOk =
true;
5162 if (!llOk && _Mostrar_Mensaje)
5167 if (this._Tipo_Visual ==
_Tipos_Visuales.Estandar) _ErrorProviderText = _Mensaje_No_Existe;
5172 FUNCTIONS._MessageBox(_Mensaje_No_Existe, MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button1, DialogResult.OK);
5193 if (_Delegar_ProcessCmdKey != null)
5194 _Delegar_ProcessCmdKey(ref llOk, keyData);
5198 llOk = base.ProcessCmdKey(ref msg, keyData);
5221 base._Cargar_Propiedades();
5223 _Valor_Vacio =
true;
5230 _Database =
"COMUNES";
5233 _Mante =
"ARTICULO";
5235 _CampoBackColor =
"BACKCOLOR";
5236 _CampoForeColor =
"FORECOLOR";
5237 _CampoFont =
"FONTTPV";
5239 _Mensaje_No_Existe =
"El código de artículo no existe";
5241 _Browser_Clave =
"CODIGO";
5242 _Browser_Database =
"COMUNES";
5243 _Browser_Campo_Predet =
"NOMBRE";
5244 _Browser_Campos =
"CODIGO,NOMBRE";
5245 _Browser_Condicion =
"";
5246 _Browser_Tabla =
"CLASIF";
5247 _Browser_Titulos_Campos =
"Código,Nombre";
5248 _Browser_Titulo =
"Listado de clasificaciones";
5250 _TooltipBrowser =
"Consultar clasificaciones";
5251 _TooltipMante =
"Mantenimiento de clasificaciones";
5260 void _btMante__Click_Before(ref
bool tlOk)
5268 loBoton._NombreMante =
"CLASIFICACIONES";
5269 loBoton.PerformClick();
5279 #region Propiedades privadas 5280 private bool _lExisteCodigoRaizCuenta =
false;
5281 #endregion Propiedades privadas 5290 _Codigo_Cambiado_Before_Extended += ewtxtcodlabelRaizCuenta__Codigo_Cambiado_Before_Extended;
5292 #endregion Constructor 5294 #region Métodos public override 5295 public override bool _Existe_Codigo(ref
string tcCodigo,
bool tlValidar =
false)
5303 if (_lExisteCodigoRaizCuenta)
5305 tcCodigo = _GetTextBox().Text;
5306 _lExisteCodigoRaizCuenta =
false;
5311 #endregion Métodos public override 5313 #region Métodos privados 5314 private void ewtxtcodlabelRaizCuenta__Codigo_Cambiado_Before_Extended(
object sender,
string tcValorCandidato, ref
bool tlOk)
5322 string lcRaizCuenta = tcValorCandidato.Trim();
5324 if (!
string.IsNullOrWhiteSpace(lcRaizCuenta) && !lcRaizCuenta.Contains(
".") && lcRaizCuenta.Length != Convert.ToInt32(EW_GLOBAL._GetLenCampo(
KeyDiccionarioLenCampos.wn_digitos)))
5326 _lExisteCodigoRaizCuenta =
true;
5328 _Codigo_Cambiado_Before_Extended -= ewtxtcodlabelRaizCuenta__Codigo_Cambiado_Before_Extended;
5330 _Codigo_Cambiado_Before_Extended += ewtxtcodlabelRaizCuenta__Codigo_Cambiado_Before_Extended;
5333 #endregion Métodos privados 5345 public override string _Guid =>
"c1c4c6eb-e2a2-4b62-bbdb-573c92974103";
5347 private bool _bMostrarCif =
false;
5356 #endregion Constructor 5358 #region Métodos protected override 5359 protected override void _Cargar_Propiedades()
5366 _Valor_Vacio =
true;
5373 _Database =
"GESTION";
5377 _Mensaje_No_Existe =
"El código de cuenta no existe";
5380 _btBrowser._GuardarBrowserExtPos_Alternativo =
true;
5382 _EstablecerColumnas();
5384 _Browser_Clave =
"CODIGO";
5385 _Browser_Database =
"GESTION";
5386 _Browser_Campo_Predet =
"NOMBRE";
5387 _Browser_Condicion =
"";
5388 _Browser_Tabla =
"CUENTAS";
5389 _Browser_Titulo =
"Listado de cuentas";
5391 _TooltipBrowser =
"Consultar cuentas";
5392 _TooltipMante =
"Mantenimiento de cuentas";
5399 public bool _MostrarCif
5403 return _bMostrarCif;
5407 _bMostrarCif = value;
5408 _EstablecerColumnas();
5412 private void _EstablecerColumnas()
5414 _Browser_Campos = String.Format(
"CODIGO, NOMBRE {0}", _MostrarCif ?
", CIF" :
"");
5415 _Browser_Titulos_Campos = String.Format(
"Código, Nombre {0}", _MostrarCif ?
", NIF" :
"");
5417 #endregion Métodos protected override 5437 base._Cargar_Propiedades();
5441 _Valor_Vacio =
true;
5448 _Database =
"GESTION";
5452 _Mensaje_No_Existe =
"El código de cuenta contable de banco no existe";
5454 _Browser_Clave =
"CODIGO";
5455 _Browser_Database =
"GESTION";
5456 _Browser_Campo_Predet =
"NOMBRE";
5457 _Browser_Campos =
"CODIGO,NOMBRE";
5458 _Browser_Condicion = lcCondicion;
5459 _Browser_Tabla =
"CUENTAS";
5460 _Browser_Titulos_Campos =
"Código,Nombre";
5461 _Browser_Titulo =
"Listado de cuentas de bancos";
5463 _TooltipBrowser =
"Consultar cuentas de bancos";
5464 _TooltipMante =
"Mantenimiento de cuentas";
5486 base._Cargar_Propiedades();
5488 _Valor_Vacio =
true;
5495 _Database =
"COMUNES";
5499 _Mensaje_No_Existe =
"El código de país no existe";
5501 _Browser_Clave =
"CODIGO";
5502 _Browser_Database =
"COMUNES";
5503 _Browser_Campo_Predet =
"NOMBRE";
5504 _Browser_Campos =
"CODIGO,NOMBRE";
5505 _Browser_Condicion =
"";
5506 _Browser_Tabla =
"PAISES";
5507 _Browser_Titulos_Campos =
"Código,Nombre";
5508 _Browser_Titulo =
"Listado de paises";
5510 _TooltipBrowser =
"Consultar paises";
5511 _TooltipMante =
"Mantenimiento de paises";
5523 public dynamic _txtNumero = null;
5529 public override string _Guid =>
"467e9a6f-faba-425e-96e1-919f9752d621";
5531 private dynamic _oDocumento;
5535 public dynamic _Documento
5537 get {
return _oDocumento; }
5540 _oDocumento = value;
5542 if (_oDocumento == null)
5545 this.DataBindings.Clear();
5547 this.DataBindings.Add(
"_Codigo", _oDocumento._Cabecera,
"_Proveedor");
5553 private bool MostrarCuentasNivel3Proveedor =
false;
5561 DefaultValue(
false),
5562 DisplayName(
"MostrarCuentasNivel3Proveedor"),
5563 Description(
"Muestra las cuentas de proveedores, acreedores y cuentas cuyo nivel3 está marcado ficha de proveedor."),
5567 public bool _MostrarCuentasNivel3Proveedor
5569 get {
return MostrarCuentasNivel3Proveedor; }
5572 if (MostrarCuentasNivel3Proveedor != value)
5574 MostrarCuentasNivel3Proveedor = value;
5587 if (EW_GLOBAL._EsEjecutable)
5594 _Codigo_Cambiado +=
new Delegar_Codigo_Cambiado(txtProveedor__Codigo_Cambiado);
5595 _Codigo_Cambiado_Before +=
new Delegar_Codigo_Cambiado_Before(txtProveedor__Codigo_Cambiado_Before);
5596 _ValidacionCrearCodigo += txtProveedor__ValidacionCrearCodigo;
5605 _MostrarCuentasNivel3Proveedor = mostrarcuentasnivel3proveedor;
5609 private void CambiarACuentas()
5611 if (DesignMode || !EW_GLOBAL._EsEjecutable)
5616 int lnAsesorContable = Convert.ToInt32(EW_GLOBAL._GetVariable(
"wn_AsesorContable",0));
5620 if (EW_GLOBAL._Solucion < 2 || lnAsesorContable > 0 || _MostrarCuentasNivel3Proveedor)
5623 Control parent = this.Parent;
5632 this.Parent = parent;
5633 this.Parent.Controls.Add(
this);
5637 string lcPrefijoCtaProveed = Convert.ToString(EW_GLOBAL._GetVariable(
"wc_proveed")).Substring(0, 3);
5638 string lcPrefijoCtaAcreedor = Convert.ToString(EW_GLOBAL._GetVariable(
"wc_acreed")).Substring(0, 3);
5639 string lcPrefijoCtaRemuPenPag = Convert.ToString(EW_GLOBAL._GetVariable(
"wc_remupenpag")).Substring(0, 3);
5640 string lcCondicion =
"(CODIGO Like '" + lcPrefijoCtaProveed +
"%' or CODIGO Like '" + lcPrefijoCtaAcreedor +
"%' or CODIGO Like '" + lcPrefijoCtaRemuPenPag +
"%'";
5644 foreach (DataRow loPrefijo
in ldtPrefijosProveedores.Rows)
5646 lcCondicion +=
" OR CODIGO LIKE '" + Convert.ToString(loPrefijo[
"codigo"]).TrimEnd() +
"%' ";
5651 foreach (DataRow loPrefijo
in ldtPrefijosCuentas.Rows)
5653 lcCondicion +=
" OR CODIGO LIKE '" + Convert.ToString(loPrefijo[
"codigo"]).TrimEnd() +
"%' ";
5658 this._Browser_Condicion = lcCondicion;
5662 private bool txtProveedor__ValidacionCrearCodigo(String tcCodigo)
5666 _MensajeNoSePuedeCrear =
String.Format(
"El código {0} no es una cuenta de proveedor válida", tcCodigo);
5679 int lnAsesorContable = Convert.ToInt32(EW_GLOBAL._GetVariable(
"wn_AsesorContable",0));
5683 if (EW_GLOBAL._Solucion < 2 || lnAsesorContable > 0)
5686 base._Cargar_Propiedades();
5688 string lcProveed = Convert.ToString(EW_GLOBAL._GetVariable(
"wc_proveed")).Trim();
5690 _Valor_Vacio =
true;
5697 _InicioCodigo = (
string.IsNullOrWhiteSpace(lcProveed) ?
"" : lcProveed.Substring(0, 3));
5699 _Database =
"GESTION";
5703 _Mensaje_No_Existe =
"El código de proveedor no existe";
5706 botones.btBrowProveedor btbrowproveedor =
new botones.btBrowProveedor();
5707 _Browser_Clave = btbrowproveedor._Clave;
5708 _Browser_Database = btbrowproveedor._DataBase;
5709 _Browser_Campo_Predet = btbrowproveedor._Campo_Predet;
5710 _Browser_Campos = btbrowproveedor._Campos;
5711 _Browser_Condicion =
"";
5712 _Browser_Tabla = btbrowproveedor._Tabla;
5713 _Browser_Titulos_Campos = btbrowproveedor._Titulos_Campos;
5714 _Browser_Titulo = btbrowproveedor._Titulo;
5716 _TooltipBrowser =
"Consultar proveedores";
5717 _TooltipMante =
"Mantenimiento de proveedores";
5720 private void txtProveedor__Codigo_Cambiado()
5723 string lcEmpresa = Convert.ToString(EW_GLOBAL._GetVariable(
"wc_empresa"));
5725 if (_oDocumento == null || this._Codigo == null)
5728 if (this._oDocumento._TipoDocumento ==
eTipoDocumento.AlbaranCompra)
5730 if (
string.IsNullOrWhiteSpace(this._Codigo))
5735 if (
string.IsNullOrWhiteSpace(this._oDocumento._Numero) && !
string.IsNullOrWhiteSpace(this._oDocumento._Cabecera._Factura))
5737 if (this._oDocumento._Documento_Vacio())
5740 string lcNumeroAlb = this.Obtener_NumAlbFacturaCompra(lcEmpresa, this._Codigo, this._oDocumento._Cabecera._Factura);
5743 if (
string.IsNullOrWhiteSpace(lcNumeroAlb))
5745 _oDocumento._MessageBox(
"Este número de factura '" + this._oDocumento._Cabecera._Factura.Trim() +
"' no existe para el proveedor '" + this._Codigo +
"'.", MessageBoxButtons.OK, MessageBoxIcon.Stop, MessageBoxDefaultButton.Button1, DialogResult.OK);
5751 Form loForm = this.FindForm();
5754 Control[] laControls = loForm.Controls.Find(
"txtNumFacCompra",
true);
5755 if (laControls.Length > 0)
5762 this._oDocumento._Numero = lcNumeroAlb;
5768 if (
string.IsNullOrWhiteSpace(_oDocumento._Numero))
5770 this._oDocumento._New(lcEmpresa,
"", this._Codigo);
5773 else if (this._oDocumento._Documento_Vacio() && !
string.IsNullOrWhiteSpace(_oDocumento._Numero) && !
string.IsNullOrWhiteSpace(this._Codigo))
5775 string lcNumero = _oDocumento._Numero;
5779 if (lcProveedor == _oDocumento._Cabecera._Proveedor)
5783 if (!
string.IsNullOrWhiteSpace(_oDocumento._Numero) && !
string.IsNullOrWhiteSpace(_oDocumento._Cabecera._Proveedor) && _oDocumento._Documento_Vacio() && _oDocumento._Cabecera._Proveedor != _GetTextBox().Text)
5784 this._oDocumento._Delete();
5786 if (!this._oDocumento._Load(lcEmpresa, lcNumero, lcProveedor))
5788 if (!this._oDocumento._New(lcEmpresa, lcNumero, lcProveedor))
5789 _oDocumento._Numero =
"";
5793 if (
string.IsNullOrWhiteSpace(_oDocumento._Numero) && !
string.IsNullOrWhiteSpace(this._Codigo))
5795 if (!
string.IsNullOrWhiteSpace(_oDocumento._Mensaje_Error))
5796 _oDocumento._MessageBox(_oDocumento._Mensaje_Error, MessageBoxButtons.OK, MessageBoxIcon.Stop, MessageBoxDefaultButton.Button1, DialogResult.OK);
5798 this._oDocumento._Refrescar_Form();
5805 string lcCodigo = this.
_Codigo.ToString().Trim();
5807 if (lcCodigo != _oDocumento._Cabecera._Proveedor)
5809 _oDocumento._Cabecera._Proveedor = lcCodigo;
5812 if (lcCodigo != _oDocumento._Cabecera._Proveedor)
5814 this.
_Codigo = _oDocumento._Cabecera._Proveedor;
5827 private string Obtener_NumAlbFacturaCompra(
string tcEmpresa,
string tcProveedor,
string tcFactura =
"")
5829 string lcNumeroAlb =
"";
5830 DataTable ldtAlbaranesFactura =
new DataTable();
5833 loFacturaCompra._Empresa = tcEmpresa;
5834 loFacturaCompra.
_Numero = tcFactura;
5835 loFacturaCompra._Cabecera._Proveedor = tcProveedor;
5837 if (ldtAlbaranesFactura.Rows.Count > 0)
5838 lcNumeroAlb = Convert.ToString(ldtAlbaranesFactura.Rows[0][
"numero"]);
5843 private void txtProveedor__Codigo_Cambiado_Before(ref
bool tlOk)
5845 if ((_oDocumento != null) && (_Tipo_Visual ==
_Tipos_Visuales.Estandar))
5847 if (this._oDocumento._TipoDocumento !=
eTipoDocumento.AlbaranCompra &&
this._oDocumento._TipoDocumento !=
eTipoDocumento.FacturaCompra &&
string.IsNullOrWhiteSpace(_oDocumento._Numero))
5850 _oDocumento._MessageBox(
"Para poder entrar el código de proveedor debe haber entrado el número de documento.", MessageBoxButtons.OK, MessageBoxIcon.Stop, MessageBoxDefaultButton.Button1, DialogResult.OK);
5855 if (this._oDocumento._TipoDocumento ==
eTipoDocumento.AlbaranCompra)
5857 string lcCodProv =
"", lcEmpresa =
"";
5859 lcEmpresa = Convert.ToString(EW_GLOBAL._GetVariable(
"wc_empresa"));
5861 if (
string.IsNullOrWhiteSpace(lcCodProv))
5867 if (
string.IsNullOrWhiteSpace(this._oDocumento._Numero) && !
string.IsNullOrWhiteSpace(this._oDocumento._Cabecera._Factura))
5869 if (this._oDocumento._Documento_Vacio())
5872 string lcNumeroAlb = this.Obtener_NumAlbFacturaCompra(lcEmpresa, lcCodProv, this._oDocumento._Cabecera._Factura);
5875 if (
string.IsNullOrWhiteSpace(lcNumeroAlb))
5877 _oDocumento._MessageBox(
"Este número de factura '" + this._oDocumento._Cabecera._Factura.Trim() +
"' no existe para el proveedor '" + lcCodProv +
"'.", MessageBoxButtons.OK, MessageBoxIcon.Stop, MessageBoxDefaultButton.Button1, DialogResult.OK);
5879 this._oDocumento._Cabecera._Factura =
"";
5880 this._oDocumento._Refrescar_Form();
5886 Form loForm = this.FindForm();
5889 Control[] laControls = loForm.Controls.Find(
"txtNumFacCompra",
true);
5890 if (laControls.Length > 0)
5897 this._oDocumento._Numero = lcNumeroAlb;
5913 private bool MostrarCuentasNivel3Proveedor =
false;
5921 DefaultValue(
false),
5922 DisplayName(
"MostrarCuentasNivel3Proveedor"),
5923 Description(
"Muestra las cuentas de proveedores, acreedores y cuentas cuyo nivel3 está marcado ficha de proveedor."),
5927 public bool _MostrarCuentasNivel3Proveedor
5929 get {
return MostrarCuentasNivel3Proveedor; }
5932 if (MostrarCuentasNivel3Proveedor != value)
5934 MostrarCuentasNivel3Proveedor = value;
5944 if (DesignMode || !EW_GLOBAL._EsEjecutable)
5947 this._btMante._Click_BeforeExtended += _btMante__Click_BeforeExtended;
5951 int lnAsesorContable = Convert.ToInt32(EW_GLOBAL._GetVariable(
"wn_AsesorContable", 0));
5955 if (EW_GLOBAL._Solucion < 2 || lnAsesorContable > 0 || _MostrarCuentasNivel3Proveedor)
5958 Control parent = this.Parent;
5967 this.Parent = parent;
5968 this.Parent.Controls.Add(
this);
5972 string lcPrefijoCtaProveed = Convert.ToString(EW_GLOBAL._GetVariable(
"wc_proveed")).Substring(0, 3);
5973 string lcPrefijoCtaAcreedor = Convert.ToString(EW_GLOBAL._GetVariable(
"wc_acreed")).Substring(0, 3);
5974 string lcPrefijoCtaRemuPenPag = Convert.ToString(EW_GLOBAL._GetVariable(
"wc_remupenpag")).Substring(0, 3);
5975 string lcCondicion =
"(CODIGO Like '" + lcPrefijoCtaProveed +
"%' or CODIGO Like '" + lcPrefijoCtaAcreedor +
"%' or CODIGO Like '" + lcPrefijoCtaRemuPenPag +
"%'";
5979 foreach (DataRow loPrefijo
in ldtPrefijosProveedores.Rows)
5981 lcCondicion +=
" OR CODIGO LIKE '" + Convert.ToString(loPrefijo[
"codigo"]).TrimEnd() +
"%' ";
5986 foreach (DataRow loPrefijo
in ldtPrefijosCuentas.Rows)
5988 lcCondicion +=
" OR CODIGO LIKE '" + Convert.ToString(loPrefijo[
"codigo"]).TrimEnd() +
"%' ";
5993 this._Browser_Condicion = lcCondicion;
5997 private void _btMante__Click_BeforeExtended(
object sender, EventArgs e, ref
bool tlOk)
5999 string cCodProveed =
"";
6001 if (!
string.IsNullOrWhiteSpace(_Codigo))
6002 cCodProveed = Convert.ToString(DB.SQLValor(
"PROVEED",
"CIF", _Codigo,
"CODIGO"));
6004 if (!
string.IsNullOrEmpty(cCodProveed))
6008 loProveed.
_Codigo = cCodProveed;
6025 int lnAsesorContable = Convert.ToInt32(EW_GLOBAL._GetVariable(
"wn_AsesorContable", 0));
6029 if (EW_GLOBAL._Solucion < 2 || lnAsesorContable > 0)
6032 base._Cargar_Propiedades();
6034 string lcProveed = Convert.ToString(EW_GLOBAL._GetVariable(
"wc_proveed")).Trim();
6036 _Valor_Vacio =
true;
6042 _Database =
"GESTION";
6046 _Mensaje_No_Existe =
"El código de proveedor no existe";
6049 botones.btBrowProveedor btbrowproveedor =
new botones.btBrowProveedor();
6050 _Browser_Distinct =
" DISTINCT ";
6051 _Browser_Clave =
"CIF";
6052 _Browser_ClavePrimaria =
"CODIGO";
6053 _Browser_Database = btbrowproveedor._DataBase;
6054 _Browser_Campo_Predet =
"CIF";
6055 _Browser_Campos =
"DISTINCT CIF, CODIGO, NOMBRE, NOMBRE2";
6056 _Browser_Condicion =
"";
6057 _Browser_Tabla = btbrowproveedor._Tabla;
6058 _Browser_Titulos_Campos =
"CIF, Código, Nombre, Razón Social"; ;
6059 _Browser_Titulo = btbrowproveedor._Titulo;
6061 _TooltipBrowser =
"Consultar proveedores";
6062 _TooltipMante =
"Mantenimiento de proveedores";
6075 public string _cEmpresa
6079 return cEmpresaPrivate;
6083 _Browser_Condicion =
"empresa = " + DB.SQLString(value) +
" and basep = " + DB.SQLFalse();
6084 cEmpresaPrivate = value;
6087 private string cEmpresaPrivate = Convert.ToString(EW_GLOBAL._GetVariable(
"wc_empresa"));
6101 base._Cargar_Propiedades();
6103 string lcEmpresa = cEmpresaPrivate;
6105 _Valor_Vacio =
true;
6112 _Database =
"COMUNES";
6113 _Tabla =
"PLEFACT_C";
6116 _Mensaje_No_Existe =
"El código de la plantilla no existe";
6118 _Browser_Clave =
"CODIGO";
6119 _Browser_Database =
"COMUNES";
6120 _Browser_Campo_Predet =
"NOMBRE";
6121 _Browser_Campos =
"CODIGO,NOMBRE";
6122 _Browser_Condicion =
"empresa = " + DB.SQLString(lcEmpresa) +
" and basep = " + DB.SQLFalse();
6123 _Browser_Tabla =
"PLEFACT_C";
6124 _Browser_Titulos_Campos =
"Código,Nombre";
6125 _Browser_Titulo =
"Listado de plantillas de factura electrónica";
6127 _TooltipBrowser =
"Consultar plantillas de factura electrónica";
6128 _TooltipMante =
"Mantenimiento de plantillas de factura electrónica";
6147 [Description(
"Todo")]
6152 [Description(
"Gastos")]
6157 [Description(
"Ingresos")]
6162 [Description(
"Bienes")]
6169 public TipoConceptosMostrar _TipoConceptosMostrar
6171 get {
return _lTipoConceptosMostrar; }
6174 _lTipoConceptosMostrar = value;
6176 switch (_lTipoConceptosMostrar)
6179 _Browser_Condicion =
"";
6180 _Browser_Titulo =
"Listado de conceptos de gastos e ingresos";
6181 _TooltipBrowser =
"Consultar conceptos de gastos e ingresos";
6185 _Browser_Condicion =
"tipogrupo = " + DB.SQLString(Convert.ToInt16(
TipoGastoIngreso.Gastos));
6186 _Browser_Titulo =
"Listado de conceptos de gastos";
6187 _TooltipBrowser =
"Consultar conceptos de gastos";
6191 _Browser_Condicion =
"tipogrupo = "+DB.SQLString(Convert.ToInt16(
TipoGastoIngreso.Ingresos));
6192 _Browser_Titulo =
"Listado de conceptos de ingresos";
6193 _TooltipBrowser =
"Consultar conceptos de ingresos";
6197 _Browser_Condicion =
"tipogrupo = " + DB.SQLString(Convert.ToInt16(
TipoGastoIngreso.Bienes));
6198 _Browser_Titulo =
"Listado de conceptos de bienes";
6199 _TooltipBrowser =
"Consultar conceptos de bienes";
6204 private TipoConceptosMostrar _lTipoConceptosMostrar = TipoConceptosMostrar.Todo;
6218 base._Cargar_Propiedades();
6220 _Valor_Vacio =
false;
6227 _Database =
"GESTION";
6228 _Tabla =
"CONGASING";
6230 _Mante =
"CONGASING";
6231 _Mensaje_No_Existe =
"El código del concepto no existe";
6233 _Browser_Clave =
"CODIGO";
6234 _Browser_Database =
"GESTION";
6235 _Browser_Campo_Predet =
"NOMBRE";
6236 _Browser_Campos =
"CODIGO,NOMBRE";
6237 _Browser_Condicion =
"";
6238 _Browser_Tabla =
"CONGASING";
6239 _Browser_Titulos_Campos =
"Código,Nombre";
6240 _Browser_Titulo =
"Listado de conceptos de gastos e ingresos";
6242 _TooltipBrowser =
"Consultar conceptos de gastos e ingresos";
6243 _TooltipMante =
"Mantenimiento de conceptos de gastos e ingresos";
6261 [Description(
"Todo")]
6266 [Description(
"Gastos")]
6271 [Description(
"Ingresos")]
6276 [Description(
"Bienes")]
6283 public string _ConceptoEOS
6285 get {
return _cConceptoEOS; }
6288 _cConceptoEOS = value;
6290 _Browser_Condicion =
"";
6292 if (!
string.IsNullOrWhiteSpace(_cConceptoEOS))
6294 _Browser_Condicion +=
"congasing = " + DB.SQLString(_cConceptoEOS);
6297 if (!
string.IsNullOrWhiteSpace(_cCondicionTipoConceptosIRPF))
6299 if (!
string.IsNullOrWhiteSpace(_Browser_Condicion))
6301 _Browser_Condicion +=
" AND ";
6303 _Browser_Condicion += _cCondicionTipoConceptosIRPF;
6308 private string _cConceptoEOS =
"";
6310 private string _cCondicionTipoConceptosIRPF =
string.Empty;
6315 public TipoConceptosIRPFMostrar _TipoConceptosIRPFMostrar
6317 get {
return _lTipoConceptosMostrar; }
6320 _lTipoConceptosMostrar = value;
6322 switch (_lTipoConceptosMostrar)
6325 _cCondicionTipoConceptosIRPF =
"";
6329 _cCondicionTipoConceptosIRPF =
" CONGASING in (SELECT codigo FROM " + DB.SQLDatabase(
"GESTION",
"congasing") +
6330 " where tipogrupo = " + DB.SQLString(Convert.ToInt16(
TipoGastoIngreso.Gastos)) +
")";
6334 _cCondicionTipoConceptosIRPF =
" CONGASING in (SELECT codigo FROM " + DB.SQLDatabase(
"GESTION",
"congasing") +
6335 " where tipogrupo = " + DB.SQLString(Convert.ToInt16(
TipoGastoIngreso.Ingresos)) +
")";
6339 _cCondicionTipoConceptosIRPF =
" CONGASING in (SELECT codigo FROM " + DB.SQLDatabase(
"GESTION",
"congasing") +
6340 " where tipogrupo = " + DB.SQLString(Convert.ToInt16(
TipoGastoIngreso.Bienes)) +
")";
6345 private TipoConceptosIRPFMostrar _lTipoConceptosMostrar = TipoConceptosIRPFMostrar.Todo;
6359 base._Cargar_Propiedades();
6361 _Valor_Vacio =
false;
6368 _Database =
"GESTION";
6371 _Concepto =
"NOMBRE";
6373 _Mensaje_No_Existe =
"El código del concepto de libros IVA/IRPF no existe";
6375 _Browser_Clave =
"CONIRPF";
6376 _Browser_Database =
"GESTION";
6377 _Browser_Campo_Predet =
"NOMBRE";
6378 _Browser_Campos =
"CONIRPF,NOMBRE,CONGASING";
6379 _Browser_Condicion =
"";
6380 _Browser_Tabla =
"CONIRPF";
6381 _Browser_Titulos_Campos =
"Código,Nombre,Concepto EOS";
6382 _Browser_Titulo =
"Listado de conceptos de libros IVA/IRPF";
6384 _TooltipBrowser =
"Consultar conceptos de libros IVA/IRPF";
6385 _TooltipMante =
"Mantenimiento de conceptos de libros IVA/IRPF";
6396 if (!
string.IsNullOrWhiteSpace(tcTexto) && (!_Expandir) && (!
string.IsNullOrWhiteSpace(_Relleno.ToString()) || _Relleno ==
' '))
6398 if (tcTexto.Contains(
".")) tcTexto = tcTexto.Replace(
".",
"");
6400 tcTexto = tcTexto.Trim().PadLeft(_Len, _Relleno);
6426 public new bool _Tactil
6428 get {
return base._Tactil; }
6431 base._Tactil = value;
6436 DataTable ldtTemp =
new DataTable();
6437 string lcSql =
"SELECT COUNT(*) AS total FROM " + DB.SQLDatabase(
"GESTION",
"FAMILIAS") +
" WHERE orden <> 0";
6438 DB.SQLExec(lcSql, ref ldtTemp);
6440 if (ldtTemp != null && ldtTemp.Rows.Count > 0 && Convert.ToInt32(ldtTemp.Rows[0][
"total"]) > 0)
6441 _Browser_Campo_Predet =
"ORDEN";
6443 _Browser_Campo_Predet =
"NOMBRE";
6445 FUNCTIONS._DisposeDatatable(ldtTemp);
6448 _Browser_Campo_Predet =
"NOMBRE";
6457 base._Cargar_Propiedades();
6459 _Valor_Vacio =
true;
6466 _Database =
"GESTION";
6467 _Tabla =
"FAMILIAS";
6469 _Mante =
"FAMILIAS";
6471 _CampoBackColor =
"BACKCOLOR";
6472 _CampoForeColor =
"FORECOLOR";
6473 _CampoFont =
"FONTTPV";
6474 _CampoVisible =
"VERTPV";
6475 _Mensaje_No_Existe =
"El código de la familia no existe";
6477 _Browser_Clave =
"CODIGO";
6478 _Browser_Database =
"GESTION";
6479 _Browser_Campo_Predet =
"NOMBRE";
6480 _Browser_Campos =
"CODIGO,NOMBRE";
6481 _Browser_Condicion =
"";
6482 _Browser_Tabla =
"FAMILIAS";
6483 _Browser_Titulos_Campos =
"Código,Nombre";
6484 _Browser_Titulo =
"Listado de familias";
6486 _TooltipBrowser =
"Consultar familias";
6487 _TooltipMante =
"Mantenimiento de familias";
6503 _Mante_Click_Before +=
new Delegar_Mante_Before(txtDelegaciones__Mante_Click_Before);
6510 void txtDelegaciones__Mante_Click_Before(ref
bool tlOk)
6512 string lcEmpresa = Convert.ToString(EW_GLOBAL._GetVariable(
"wc_empresa"));
6513 _btMante._Codigo = lcEmpresa +
"|" + _Codigo;
6521 base._Cargar_Propiedades();
6523 _Valor_Vacio =
true;
6531 _Tabla =
"DELEGACION";
6533 _Mante =
"DELEGACIONES";
6534 _Mostrar_Mante =
true;
6536 _Mensaje_No_Existe =
"El código de la delegación no existe";
6538 _Browser_Clave =
"CODIGO";
6539 _Browser_Database =
"TPV";
6540 _Browser_Campo_Predet =
"NOMBRE";
6541 _Browser_Campos =
"CODIGO,NOMBRE";
6542 _Browser_Condicion =
"empresa = " + DB.SQLString(EW_GLOBAL._GetVariable(
"wc_empresa"));
6543 _Browser_Tabla =
"DELEGACION";
6544 _Browser_Titulos_Campos =
"Código,Nombre";
6545 _Browser_Titulo =
"Listado de delegaciones";
6547 _TooltipBrowser =
"Consultar delegaciones";
6548 _TooltipMante =
"Mantenimiento de delegaciones";
6571 base._Cargar_Propiedades();
6573 _Valor_Vacio =
false;
6581 _Tabla =
"TERRITORIOS";
6582 _Nombre =
"TERRITORIO";
6583 _Concepto =
"TERRITORIO";
6585 _Mostrar_Mante =
false;
6587 _Mensaje_No_Existe =
"El código de territorio no existe";
6589 _Browser_Clave =
"CODIGO";
6590 _Browser_Database =
"TPV";
6591 _Browser_Campo_Predet =
"TERRITORIO";
6592 _Browser_Campos =
"CODIGO,TERRITORIO";
6593 _Browser_Condicion =
"";
6594 _Browser_Tabla =
"TERRITORIOS";
6595 _Browser_Titulos_Campos =
"Código,Territorio";
6596 _Browser_Titulo =
"Listado de territorios";
6598 _TooltipBrowser =
"Consultar territorios";
6599 _TooltipMante =
"Mantenimiento de territorios";
6621 base._Cargar_Propiedades();
6623 _Valor_Vacio =
true;
6630 _Database =
"COMUNES";
6631 _Tabla =
"G_CONTRI";
6633 _Concepto =
"NOMBRE";
6634 _Mante =
"G_CONTRI";
6635 _Mostrar_Mante =
true;
6637 _Mensaje_No_Existe =
"El código de grupo de contribuyentes no existe";
6639 _Browser_Clave =
"CODIGO";
6640 _Browser_Database =
"COMUNES";
6641 _Browser_Campo_Predet =
"NOMBRE";
6642 _Browser_Campos =
"CODIGO,NOMBRE";
6643 _Browser_Condicion =
"";
6644 _Browser_Tabla =
"G_CONTRI";
6645 _Browser_Titulos_Campos =
"Código,Nombre";
6646 _Browser_Titulo =
"Listado de grupos de contribuyentes";
6648 _TooltipBrowser =
"Consultar grupos de contribuyentes";
6649 _TooltipMante =
"Mantenimiento de grupos de contribuyentes";
6670 base._Cargar_Propiedades();
6672 _Valor_Vacio =
true;
6680 _Tabla =
"IMPRESOR";
6682 _Concepto =
"NOMBRE";
6683 _Mante =
"IMPRESOR";
6684 _Mostrar_Mante =
true;
6686 _Mensaje_No_Existe =
"El código de impresora no existe";
6688 _Browser_Clave =
"CODIGO";
6689 _Browser_Database =
"TPV";
6690 _Browser_Campo_Predet =
"NOMBRE";
6691 _Browser_Campos =
"CODIGO,NOMBRE";
6692 _Browser_Condicion =
"";
6693 _Browser_Tabla =
"IMPRESOR";
6694 _Browser_Titulos_Campos =
"Código,Nombre";
6695 _Browser_Titulo =
"Listado de impresoras";
6697 _TooltipBrowser =
"Consultar impresoras";
6698 _TooltipMante =
"Mantenimiento de impresoras";
6708 private string _cFamilia =
"";
6712 public string _Familia
6714 get {
return _cFamilia; }
6715 set { _cFamilia = value; }
6730 base._Cargar_Propiedades();
6732 _Valor_Vacio =
true;
6739 _Database =
"GESTION";
6744 _CampoBackColor =
"BACKCOLOR";
6745 _CampoForeColor =
"FORECOLOR";
6746 _CampoFont =
"FONTTPV";
6747 _CampoVisible =
"VERTPV";
6748 _Mensaje_No_Existe =
"El código de la subfamilia no existe";
6750 _Browser_Clave =
"CODIGO";
6751 _Browser_Database =
"GESTION";
6752 _Browser_Campo_Predet =
"NOMBRE";
6753 _Browser_Condicion =
"";
6754 _Browser_Tabla =
"SUBFAM";
6755 _Browser_Campos =
"CODIGO,NOMBRE";
6756 _Browser_Titulos_Campos =
"Código,Nombre";
6757 _Browser_Titulo =
"Listado de subfamilias";
6760 if (Convert.ToBoolean(EW_GLOBAL._GetVariable(
"wl_hera")))
6761 _Browser_Distinct =
" DISTINCT ";
6763 _Browser_Distinct =
"";
6766 _TooltipBrowser =
"Consultar subfamilias";
6767 _TooltipMante =
"Mantenimiento de subfamilias";
6789 base._Cargar_Propiedades();
6791 _Valor_Vacio =
true;
6798 _Database =
"GESTION";
6803 _CampoBackColor =
"BACKCOLOR";
6804 _CampoForeColor =
"FORECOLOR";
6805 _CampoFont =
"FONTTPV";
6806 _CampoVisible =
"VERTPV";
6807 _Mensaje_No_Existe =
"El código de la marca no existe";
6809 _Browser_Clave =
"CODIGO";
6810 _Browser_Database =
"GESTION";
6811 _Browser_Campo_Predet =
"NOMBRE";
6812 _Browser_Campos =
"CODIGO,NOMBRE";
6813 _Browser_Condicion =
"";
6814 _Browser_Tabla =
"MARCAS";
6815 _Browser_Titulos_Campos =
"Código,Nombre";
6816 _Browser_Titulo =
"Listado de marcas";
6818 _TooltipBrowser =
"Consultar marcas";
6819 _TooltipMante =
"Mantenimiento de marcas";
6830 private dynamic _oDocumento;
6835 public dynamic _Documento
6837 get {
return _oDocumento; }
6840 _oDocumento = value;
6842 if (_oDocumento == null)
6844 this.DataBindings.Clear();
6845 this.DataBindings.Add(
"_Codigo", _oDocumento._Cabecera,
"_Ruta");
6865 base._Cargar_Propiedades();
6867 _Valor_Vacio =
true;
6874 _Database =
"GESTION";
6878 _Mensaje_No_Existe =
"El código de la ruta no existe";
6880 _Browser_Clave =
"CODIGO";
6881 _Browser_Database =
"GESTION";
6882 _Browser_Campo_Predet =
"NOMBRE";
6883 _Browser_Campos =
"CODIGO,NOMBRE";
6884 _Browser_Condicion =
"";
6885 _Browser_Tabla =
"RUTAS";
6886 _Browser_Titulos_Campos =
"Código,Nombre";
6887 _Browser_Titulo =
"Listado de rutas";
6889 _TooltipBrowser =
"Consultar rutas";
6890 _TooltipMante =
"Mantenimiento de rutas";
6901 private dynamic _oDocumento;
6902 private Boolean _bValidarClaveOperiario =
false;
6907 public dynamic _Documento
6909 get {
return _oDocumento; }
6912 _oDocumento = value;
6914 if (_oDocumento == null)
6917 this.DataBindings.Clear();
6918 this.DataBindings.Add(
"_Codigo", _oDocumento._Cabecera,
"_Operario");
6921 if (Convert.ToBoolean(EW_GLOBAL._GetVariable(
"wl_sage50")))
6924 this.Visible = Convert.ToBoolean(EW_GLOBAL._GetVariable(
"wl_Operari")) ==
true;
6926 this.Visible = Convert.ToBoolean(EW_GLOBAL._GetVariable(
"wl_Opercomp")) ==
true;
6929 _ValidarClaveOperario =
true;
6938 public override string _Guid =>
"d34e0b32-a86a-40bf-954e-d9c2e4213a5f";
6943 public Boolean _ValidarClaveOperario
6947 return _bValidarClaveOperiario;
6953 if (value && _bValidarClaveOperiario != value)
6956 this._Codigo_Cambiado_Before_Extended +=
new Delegar_Codigo_Cambiado_Before_Extended(txtOperario__Codigo_Cambiado_Before_Extended);
6961 this._Codigo_Cambiado_Before_Extended -=
new Delegar_Codigo_Cambiado_Before_Extended(txtOperario__Codigo_Cambiado_Before_Extended);
6964 _bValidarClaveOperiario = value;
6976 if (_bValidarClaveOperiario && !String.IsNullOrEmpty(tcValorCandidato.Trim()))
6978 if (Convert.ToString(EW_GLOBAL._GetVariable(
"wc_OperarioTPV")) != tcValorCandidato)
6980 if ((_oDocumento != null && _oDocumento._Cabecera._Operario != tcValorCandidato) || _oDocumento == null)
6983 if (!String.IsNullOrEmpty(loOperario._Password.Trim()))
6985 formul.Forms.frmSelOper frmSelOperario =
new formul.Forms.frmSelOper(tcValorCandidato);
6986 frmSelOperario._Predeterminar =
false;
6988 if (frmSelOperario.ShowDialog() ==
System.Windows.Forms.DialogResult.OK)
6990 if (String.IsNullOrEmpty(frmSelOperario._Operario.Trim()))
6994 else if (frmSelOperario._Operario.Trim() != tcValorCandidato.Trim())
6997 this._Codigo = frmSelOperario._Operario;
7022 base._Cargar_Propiedades();
7024 _Valor_Vacio =
true;
7031 _Database =
"COMUNES";
7032 _Tabla =
"OPERARIO";
7034 _Mante =
"OPERARIOS";
7035 _Mensaje_No_Existe =
"El código de operario no existe";
7037 _Browser_Clave =
"CODIGO";
7038 _Browser_Database =
"COMUNES";
7039 _Browser_Campo_Predet =
"NOMBRE";
7040 _Browser_Campos =
"CODIGO,NOMBRE";
7041 _Browser_Condicion =
"";
7042 _Browser_Tabla =
"OPERARIO";
7043 _Browser_Titulos_Campos =
"Código,Nombre";
7044 _Browser_Titulo =
"Listado de operarios";
7046 _TooltipBrowser =
"Consultar operarios";
7047 _TooltipMante =
"Mantenimiento de operarios";
7070 base._Cargar_Propiedades();
7072 _Valor_Vacio =
true;
7082 _Mante =
"CAJAS_TPV";
7083 _Mensaje_No_Existe =
"El código de la caja no existe";
7085 _Browser_Clave =
"CODIGO";
7086 _Browser_Database =
"TPV";
7087 _Browser_Campo_Predet =
"NOMBRE";
7088 _Browser_Campos =
"CODIGO,NOMBRE";
7089 _Browser_Condicion =
"";
7090 _Browser_Tabla =
"CAJAS";
7091 _Browser_Titulos_Campos =
"Código,Nombre";
7092 _Browser_Titulo =
"Listado de cajas";
7094 _TooltipBrowser =
"Consultar cajas";
7095 _TooltipMante =
"Mantenimiento de cajas";
7109 protected string _cObraOld =
string.Empty;
7111 private string _cObras = Convert.ToString(EW_GLOBAL._GetVariable(
"wc_desobra")).Trim();
7117 public override string _Guid =>
"f17b1a87-61d1-430b-b57d-dbaf969e23ac";
7127 public dynamic _Documento
7135 _oDocumento = value;
7138 if (_oDocumento == null)
7141 this.DataBindings.Clear();
7142 this.DataBindings.Add(
"_Codigo", _oDocumento._Cabecera,
"_Obra");
7158 if (Convert.ToBoolean(EW_GLOBAL._GetVariable(
"wl_obra")) ==
true || EW_GLOBAL._EdicionPerfiles)
7159 this.Visible =
true;
7161 this.Visible =
false;
7169 base.OnCreateControl();
7171 _SubscripcionEventos();
7180 protected internal void _SubscripcionEventos()
7183 if (!Convert.ToBoolean(EW_GLOBAL._GetVariable(
"wl_nocliobra")))
7190 _Codigo_Cambiado +=
new Delegar_Codigo_Cambiado(txtObra__Codigo_Cambiado);
7193 _Codigo_Cambiado_Before +=
new Delegar_Codigo_Cambiado_Before(txtObra__Codigo_Cambiado_Before);
7200 protected internal void _CancelarSubscripcionEventos()
7203 if (!Convert.ToBoolean(EW_GLOBAL._GetVariable(
"wl_nocliobra")))
7207 _Codigo_Cambiado -=
new Delegar_Codigo_Cambiado(txtObra__Codigo_Cambiado);
7208 _Codigo_Cambiado_Before -=
new Delegar_Codigo_Cambiado_Before(txtObra__Codigo_Cambiado_Before);
7238 if (
string.IsNullOrWhiteSpace(this._Codigo))
7244 _cObraOld = this._Codigo.ToString().Trim();
7261 bool llOpcFlag_NoCeroObra = Convert.ToBoolean(EW_GLOBAL._GetVariable(
"wl_no0obra"));
7262 bool llOpcFlag_Obra_Taller = Convert.ToBoolean(EW_GLOBAL._GetVariable(
"wl_obra_taller"));
7264 base._Cargar_Propiedades();
7267 _Valor_Vacio =
true;
7273 if (llOpcFlag_NoCeroObra || llOpcFlag_Obra_Taller)
7274 this._Relleno =
' ';
7279 _Database =
"COMUNES";
7283 _Mensaje_No_Existe =
"El código de obra no existe";
7285 _Browser_Clave =
"CODIGO";
7286 _Browser_Database =
"COMUNES";
7287 _Browser_Campo_Predet =
"NOMBRE";
7288 _Browser_Campos =
"CODIGO,NOMBRE";
7289 _Browser_Condicion =
"";
7290 _Browser_Tabla =
"OBRA";
7291 _Browser_Titulos_Campos =
"Código,Nombre";
7292 _Browser_Titulo =
"Listado de " + _cObras;
7294 _TooltipBrowser =
"Consultar " + _cObras;
7295 _TooltipMante =
"Mantenimiento de " + _cObras;
7308 private bool _lRefrescando =
false;
7310 private string _cTextoIVA = Convert.ToString(EW_GLOBAL._GetVariable(
"wc_iva"));
7311 private string _cObras = Convert.ToString(EW_GLOBAL._GetVariable(
"wc_desobra")).Trim();
7312 private string _cCliente =
string.Empty;
7317 public string _Cliente
7321 if (_oDocumento == null)
7324 return _oDocumento._Cabecera._Cliente;
7337 bool llNoControlarCliente = Convert.ToBoolean(EW_GLOBAL._GetVariable(
"wl_nocliobra"));
7339 base._Cargar_Propiedades();
7341 _Mensaje_No_Existe =
"El código de obra no existe";
7344 if (llNoControlarCliente)
7345 _Browser_Condicion =
"";
7347 _Browser_Condicion =
string.IsNullOrWhiteSpace(this._Cliente) ?
"" :
"Cliente = " + DB.SQLString(this._Cliente);
7349 this._Codigo_Cambiado_Before_Extended += TxtObraVentas__Codigo_Cambiado_Before_Extended;
7352 private void TxtObraVentas__Codigo_Cambiado_Before_Extended(
object sender,
string tcValorCandidato, ref
bool tlOk)
7364 if (this._lRefrescando)
7367 if (!Convert.ToBoolean(EW_GLOBAL._GetVariable(
"wl_nocliobra")))
7368 tlOk = _ValidarCodigo(tcValorCandidato);
7378 base.btBrowser__Click_Before(ref tlOk);
7380 _Browser_Condicion =
string.IsNullOrWhiteSpace(this._Cliente) ?
"" :
"Cliente = " + DB.SQLString(this._Cliente);
7389 base.btBrowser__Click_After(tlAceptar);
7394 _Browser_Condicion =
"";
7403 if(_oDocumento != null && !_oDocumento._CarregantDocGuardat && !_oDocumento._Documento_Vacio())
7405 string lcTipoIVAOld =
string.Empty;
7406 if (!
string.IsNullOrWhiteSpace(_oDocumento._Cabecera._Obra))
7408 if (_oDocumento._Cabecera._oObra != null && _oDocumento._Cabecera._oObra._Codigo == _oDocumento._Cabecera._Obra)
7409 lcTipoIVAOld = _oDocumento._Cabecera._oObra._TipoIVA;
7412 using (
Obra loObra =
new Obra(_oDocumento._Cabecera._Obra))
7419 string lcTipoIvaNuevo =
string.Empty;
7420 if (!
string.IsNullOrWhiteSpace(_Codigo))
7422 using (
Obra loObra =
new Obra(_Codigo))
7428 if (lcTipoIVAOld != lcTipoIvaNuevo)
7430 _oDocumento._MessageBox(
"El cambio de " + _cObras +
" implica un tipo de " + _cTextoIVA +
" ISP distinto. " + Environment.NewLine + Environment.NewLine +
7431 "Para revisar los tipos de " + _cTextoIVA +
" debe acceder a la comprobación de " + _cTextoIVA +
" desde el botón de opciones.",
7432 MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button1, DialogResult.None);
7442 private bool _ValidarCodigo(
string tcCodigo)
7444 string lcSql, lcClienteObra, lcMensaje;
7447 if (!
string.IsNullOrEmpty(_Cliente) && !
string.IsNullOrEmpty(tcCodigo))
7449 loDt =
new DataTable();
7450 lcSql = $
"SELECT CODIGO, CLIENTE FROM {DB.SQLDatabase("COMUNES
", "OBRA
")} WHERE CODIGO = {DB.SQLString(tcCodigo)}";
7452 if (DB.SQLExec(lcSql, ref loDt) && loDt.Rows.Count > 0)
7454 lcClienteObra = Convert.ToString(loDt.Rows[0][
"CLIENTE"]).Trim();
7456 if (
string.IsNullOrWhiteSpace(lcClienteObra))
7458 lcMensaje = $
"Esta obra no tiene ningún cliente asignado.{Environment.NewLine}¿Desea asignar a esta obra el cliente {_Cliente.Trim()}?";
7459 if (FUNCTIONS._MessageBox(lcMensaje, MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button2, DialogResult.No) == DialogResult.Yes)
7467 else if (lcClienteObra != _Cliente)
7469 lcMensaje = $
"El código de obra introducido no corresponde al cliente {_Cliente}";
7470 FUNCTIONS._MessageBox(lcMensaje, MessageBoxButtons.OK, MessageBoxIcon.Error, MessageBoxDefaultButton.Button1, DialogResult.None);
7485 this._lRefrescando =
true;
7489 this._lRefrescando =
false;
7507 private dynamic _oDocumento;
7512 public dynamic _Documento
7514 get {
return _oDocumento; }
7517 _oDocumento = value;
7519 if (_oDocumento == null)
7521 this.DataBindings.Clear();
7522 this.DataBindings.Add(
"_Codigo", _oDocumento._Cabecera,
"_Vendedor");
7532 public override string _Guid =>
"02e1214f-7339-494e-8920-c367c4218687";
7546 base._Cargar_Propiedades();
7548 _Valor_Vacio =
true;
7555 _Database =
"GESTION";
7556 _Tabla =
"VENDEDOR";
7558 _Mante =
"VENDEDOR";
7560 _Mensaje_No_Existe =
"El código de vendedor no existe";
7563 botones.btBrowVendedor btbrowvendedor =
new botones.btBrowVendedor();
7564 _Browser_Clave = btbrowvendedor._Clave;
7565 _Browser_Database = btbrowvendedor._DataBase;
7566 _Browser_Campo_Predet = btbrowvendedor._Campo_Predet;
7567 _Browser_Campos = btbrowvendedor._Campos;
7568 _Browser_Condicion =
"";
7569 _Browser_Tabla = btbrowvendedor._Tabla;
7570 _Browser_Titulos_Campos = btbrowvendedor._Titulos_Campos;
7571 _Browser_Titulo = btbrowvendedor._Titulo;
7573 _TooltipBrowser =
"Consultar vendedores";
7574 _TooltipMante =
"Mantenimiento de vendedores";
7594 public dynamic _Documento
7596 get {
return _oDocumento; }
7599 _oDocumento = value;
7601 if (_oDocumento == null)
7604 this.DataBindings.Clear();
7605 this.DataBindings.Add(
"_Codigo", _oDocumento._Cabecera,
"_FormaPago");
7615 public override string _Guid =>
"7c856251-eb88-4c60-bd3c-c38fa2f20f77";
7623 _Codigo_Cambiado +=
new Delegar_Codigo_Cambiado(txtFormaPago__Codigo_Cambiado);
7624 _Codigo_Cambiado_Before +=
new Delegar_Codigo_Cambiado_Before(txtFormaPago__Codigo_Cambiado_Before);
7647 base._Cargar_Propiedades();
7649 _Valor_Vacio =
true;
7656 _Database =
"gestion";
7660 _Mensaje_No_Existe =
"El código de la forma de pago no existe";
7662 _Browser_Clave =
"codigo";
7663 _Browser_Database =
"gestion";
7664 _Browser_Campo_Predet =
"nombre";
7665 _Browser_Campos =
"codigo,nombre";
7666 _Browser_Condicion =
"";
7667 _Browser_Tabla =
"fpag";
7668 _Browser_Titulos_Campos =
"Código,Nombre";
7669 _Browser_Titulo =
"Listado de formas de pago";
7671 _TooltipBrowser =
"Consultar formas de pago";
7672 _TooltipMante =
"Mantenimiento de formas de pago";
7686 private string lcFpagoOld =
string.Empty;
7687 private Usuario _oUsuario = null;
7695 base.txtFormaPago__Codigo_Cambiado_Before(ref tlOk);
7698 if (
string.IsNullOrWhiteSpace(this._Codigo)) lcFpagoOld =
"";
7699 else lcFpagoOld = this._Codigo.ToString().Trim();
7703 if (_oUsuario == null)
7706 if (!
string.IsNullOrWhiteSpace(this._Codigo))
7708 if (this._oUsuario.
_Opcesp(
"0039"))
7712 DialogResult lodialog = loForm.
_MessageBox(
"El usuario no tiene permisos para modificar formas de pago en albaranes de venta.",
7713 MessageBoxButtons.OK, MessageBoxIcon.Error, MessageBoxDefaultButton.Button1, DialogResult.None);
7741 base._Cargar_Propiedades();
7743 _Valor_Vacio =
true;
7750 _Database =
"comunes";
7751 _Tabla =
"fraefpag ";
7754 _Mensaje_No_Existe =
"El código en Facturae no existe";
7756 _Browser_Clave =
"codigo";
7757 _Browser_Database =
"comunes";
7758 _Browser_Campo_Predet =
"nombre";
7759 _Browser_Campos =
"codigo,nombre";
7760 _Browser_Condicion =
"";
7761 _Browser_Tabla =
"fraefpag ";
7762 _Browser_Titulos_Campos =
"Código,Nombre";
7763 _Browser_Titulo =
"Listado códigos en Facturae";
7765 _TooltipBrowser =
"Consultar códigos en Facturae";
7775 #region Propiedades privadas 7776 private dynamic _oDocumento;
7777 #endregion Propiedades privadas 7779 #region Propiedades públicas 7780 public dynamic _Documento
7785 get {
return _oDocumento; }
7788 _oDocumento = value;
7790 if (_oDocumento == null)
7793 DataBindings.Clear();
7794 DataBindings.Add(
"_Codigo", _oDocumento._Cabecera,
"_Tarifa");
7799 #endregion Propiedades públicas 7808 #endregion Constructor 7820 public override string _Guid =>
"35a6ea93-4781-4f19-a296-64d8d090cb3a";
7831 #endregion Constructor 7833 #region Métodos protected override 7834 protected override void _Cargar_Propiedades()
7839 base._Cargar_Propiedades();
7841 _Valor_Vacio =
true;
7848 _Database =
"GESTION";
7851 _Mante =
"TARIFAS1";
7852 _Mensaje_No_Existe =
"El código de la tarifa no existe";
7854 _Browser_Clave =
"CODIGO";
7855 _Browser_Database =
"GESTION";
7856 _Browser_Campo_Predet =
"NOMBRE";
7857 _Browser_Campos =
"CODIGO,NOMBRE";
7858 _Browser_Condicion =
"";
7859 _Browser_Tabla =
"TARIFAS";
7860 _Browser_Titulos_Campos =
"Código,Nombre";
7861 _Browser_Titulo =
"Listado de tarifas";
7863 _TooltipBrowser =
"Consultar tarifas";
7864 _TooltipMante =
"Mantenimiento de tarifas";
7866 #endregion Métodos protected override 7874 #region Propiedades públicas 7875 [DesignerSerializationVisibility(DesignerSerializationVisibility.Hidden)]
7879 public List<string> _ListaTarifas
7881 get {
return _lstTarifas; }
7883 _lstTarifas = value;
7884 DataTablePersonalizadoTarifas();
7887 private List<string> _lstTarifas =
new List<string>();
7888 #endregion Propiedades públicas 7896 _Tipo_Visual = _Tipos_Visuales.Combo;
7899 DataTablePersonalizadoTarifas();
7901 #endregion Constructor 7902 private string WhereTarifas()
7907 string lcWhere =
string.Empty;
7909 if (_lstTarifas.Count > 0)
7910 foreach (
string lcTarifa
in _lstTarifas)
7911 lcWhere += (
string.IsNullOrWhiteSpace(lcWhere) ?
" WHERE " :
" OR ") +
"codigo = " + DB.SQLString(lcTarifa) +
" ";
7916 #region Métodos privados 7917 private void DataTablePersonalizadoTarifas()
7922 DataTable ldtTarifas =
new DataTable();
7924 bool llOK = DB.SQLExec(
"select codigo, codigo + REPLICATE(' ', 4 - LEN(codigo)) + nombre as nombre" +
7925 " FROM " + DB.SQLDatabase(
"gestion",
"tarifas") +
7927 " ORDER by codigo", ref ldtTarifas);
7929 _Mostrar_Mante =
false;
7930 _DataTable = ldtTarifas;
7932 _Concepto =
"nombre";
7936 #endregion Métodos privados 7956 base._Cargar_Propiedades();
7958 _Valor_Vacio =
true;
7965 _Database =
"GESTION";
7971 _Mensaje_No_Existe =
"El código de característica no existe";
7973 _Browser_Clave =
"CODIGO";
7974 _Browser_Database =
"GESTION";
7975 _Browser_Campo_Predet =
"NOMBRE";
7976 _Browser_Campos =
"CODIGO,NOMBRE";
7977 _Browser_Condicion =
"";
7978 _Browser_Tabla =
"CARAC";
7979 _Browser_Titulos_Campos =
"Código,Nombre";
7980 _Browser_Titulo =
"Listado de características";
7982 _TooltipBrowser =
"Consultar características";
7983 _TooltipMante =
"Mantenimiento de características";
8006 base._Cargar_Propiedades();
8008 _Valor_Vacio =
true;
8016 _Tabla =
"f_cobros";
8018 _Mante =
"f_cobros";
8019 _Mensaje_No_Existe =
"El código de la forma de cobro no existe";
8021 _Browser_Clave =
"codigo";
8022 _Browser_Database =
"tpv";
8023 _Browser_Campo_Predet =
"nombre";
8024 _Browser_Campos =
"codigo,nombre";
8025 _Browser_Condicion =
"";
8026 _Browser_Tabla =
"f_cobros";
8027 _Browser_Titulos_Campos =
"Código,Nombre";
8028 _Browser_Titulo =
"Listado de formas de cobro";
8030 _TooltipBrowser =
"Consultar formas de cobro";
8031 _TooltipMante =
"Mantenimiento de formas de cobro";
8100 base._Cargar_Propiedades();
8102 _Valor_Vacio =
true;
8109 _Database =
"GESTION";
8110 _Tabla =
"TIPO_RET";
8112 _Mante =
"TIPO_RET";
8113 _Mensaje_No_Existe =
"El código del tipo de retención no existe";
8115 _Browser_Clave =
"CODIGO";
8116 _Browser_Database =
"GESTION";
8117 _Browser_Campo_Predet =
"NOMBRE";
8118 _Browser_Campos =
"CODIGO,NOMBRE";
8119 _Browser_Condicion =
"";
8120 _Browser_Tabla =
"TIPO_RET";
8121 _Browser_Titulos_Campos =
"Código,Nombre";
8122 _Browser_Titulo =
"Listado de tipos de retención";
8124 _TooltipBrowser =
"Consultar tipos de retención";
8125 _TooltipMante =
"Mantenimiento de tipos de retención";
8146 base._Cargar_Propiedades();
8148 _Valor_Vacio =
true;
8156 _Tabla =
"DEFVALES";
8158 _Mante =
"DEFVALES";
8159 _Mensaje_No_Existe =
"El código de definición de vale no existe";
8161 _Browser_Clave =
"CODIGO";
8162 _Browser_Database =
"TPV";
8163 _Browser_Campo_Predet =
"CODIGO";
8164 _Browser_Campos =
"CODIGO,NOMBRE";
8165 _Browser_Condicion =
"";
8166 _Browser_Tabla =
"DEFVALES";
8167 _Browser_Titulos_Campos =
"Código,Nombre";
8168 _Browser_Titulo =
"Listado de definición de vales";
8170 _TooltipBrowser =
"Consultar vales";
8171 _TooltipMante =
"Mantenimiento de vales";
8193 base._Cargar_Propiedades();
8195 _Valor_Vacio =
true;
8202 _Database =
"comunes";
8203 _Tabla =
"cuentaserp";
8206 _Mostrar_Mante =
false;
8207 _Mensaje_No_Existe =
"El código de cuenta contable no existe";
8209 _Browser_Clave =
"codigo";
8210 _Browser_Database =
"comunes";
8211 _Browser_Campo_Predet =
"nombre";
8212 _Browser_Campos =
"codigo,nombre";
8213 _Browser_Condicion =
"";
8214 _Browser_Tabla =
"cuentaserp";
8215 _Browser_Titulos_Campos =
"Código,Nombre";
8216 _Browser_Titulo =
"Listado de cuentas contables";
8218 _TooltipBrowser =
"Consultar cuentas contables";
8219 _TooltipMante =
"Mantenimiento de cuentas contables";
8234 #region CONSTRUCTORES 8241 this._Preparar_DataTable();
8242 this._Mostrar_Mante =
false;
8245 #endregion CONSTRUCTORES 8247 #region METODOS PÚBLICOS 8248 public override void _Refresh()
8256 #endregion METODOS PÚBLICOS 8258 #region METODOS PRIVADOS 8261 private void _Preparar_DataTable()
8263 DataTable dtTipoDoc =
new DataTable();
8265 dtTipoDoc.Columns.Add(
"tipo", typeof(
System.String));
8267 dtTipoDoc.Rows.Add(
new object[] {
"Normal" });
8268 dtTipoDoc.Rows.Add(
new object[] {
"Consolidada" });
8271 this._Clave =
"tipo";
8273 this._DataTable = dtTipoDoc;
8276 #endregion METODOS PRIVADOS 8286 #region CONSTRUCTORES 8293 this._Preparar_DataTable();
8294 this._Mostrar_Mante =
false;
8297 #endregion CONSTRUCTORES 8299 #region METODOS PÚBLICOS 8300 public override void _Refresh()
8308 #endregion METODOS PÚBLICOS 8310 #region METODOS PRIVADOS 8313 private void _Preparar_DataTable()
8315 DataTable dtTipoDoc =
new DataTable();
8317 dtTipoDoc.Columns.Add(
"tipo", typeof(
System.String));
8318 dtTipoDoc.Columns.Add(
"nombre", typeof(
System.String));
8320 dtTipoDoc.Rows.Add(
new object[] {
"1",
"Impresora" });
8321 dtTipoDoc.Rows.Add(
new object[] {
"2",
"Visor" });
8327 _DataTable = dtTipoDoc;
8330 #endregion METODOS PRIVADOS 8340 #region CONSTRUCTORES 8347 this._Preparar_DataTable();
8348 this._Mostrar_Mante =
false;
8351 #endregion CONSTRUCTORES 8353 #region METODOS PÚBLICOS 8354 public override void _Refresh()
8362 #endregion METODOS PÚBLICOS 8364 #region METODOS PRIVADOS 8367 private void _Preparar_DataTable()
8370 DataTable ldtTipoImpresion =
new DataTable();
8371 ldtTipoImpresion.Columns.Add(
"codigo", typeof(
System.String));
8372 ldtTipoImpresion.Columns.Add(
"nombre", typeof(
System.String));
8374 ldtTipoImpresion.Rows.Add(
new object[] {
"0",
"Antes de la entrega en el cajón inteligente" });
8375 ldtTipoImpresion.Rows.Add(
new object[] {
"1",
"Después de la entrega en el cajón inteligente" });
8376 ldtTipoImpresion.Rows.Add(
new object[] {
"2",
"No imprimir" });
8380 _DataTable = ldtTipoImpresion;
8383 #endregion METODOS PRIVADOS 8403 base._Cargar_Propiedades();
8405 _Valor_Vacio =
false;
8410 _Database =
"COMUNES";
8414 _Mensaje_No_Existe =
"El código de la plantilla no existe";
8415 _PrimeraVez =
false;
8417 _Browser_Clave =
"ID";
8418 _Browser_Database =
"COMUNES";
8419 _Browser_Campo_Predet =
"NOMBRE";
8420 _Browser_Campos =
"ID,NOMBRE";
8421 _Browser_Condicion =
"";
8422 _Browser_Tabla =
"REPLAN";
8423 _Browser_Titulos_Campos =
"Código,Nombre";
8424 _Browser_Titulo =
"Listado de plantillas";
8426 _TooltipBrowser =
"Consultar plantillas";
8427 _TooltipMante =
"Mantenimiento de plantillas";
8446 #endregion CLASES DERIVADAS EWTXTCODLABEL 8476 private Image _imageValue;
8477 private Size _imageSize;
8479 private int _nAnchoImagen = 0;
8483 public int _AnchoImagen
8485 get {
return _nAnchoImagen; }
8486 set { _nAnchoImagen = value; }
8492 public Image _Imagen
8495 {
return this._imageValue; }
8499 if ((!
object.ReferenceEquals(this._Imagen, value)))
8501 this._imageValue = value;
8502 this._imageSize = value.Size;
8504 Padding inheritedPadding = this.Style.Padding;
8505 this.Style.Padding =
new Padding(_imageSize.Width, inheritedPadding.Top, inheritedPadding.Right, inheritedPadding.Bottom);
8525 loCelda._imageValue = this._imageValue;
8526 loCelda._imageSize = this._imageSize;
8545 protected override void Paint(Graphics graphics, Rectangle clipBounds, Rectangle cellBounds,
int rowIndex, DataGridViewElementStates cellState,
object value,
object formattedValue,
string errorText, DataGridViewCellStyle cellStyle, DataGridViewAdvancedBorderStyle advancedBorderStyle, DataGridViewPaintParts paintParts)
8547 base.Paint(graphics, clipBounds, cellBounds, rowIndex, cellState, value, formattedValue, errorText, cellStyle, advancedBorderStyle, paintParts);
8549 if ((this._Imagen != null))
8551 bool llCeldaActual = (this.DataGridView.CurrentCell ==
this);
8552 int lnX = cellBounds.Location.X + 1;
8553 int lnY = cellBounds.Location.Y;
8554 int lnAlto = cellBounds.Height - 2;
8555 int lnAncho = this._nAnchoImagen - 2;
8557 if (cellBounds.Width <
this._nAnchoImagen)
8558 lnAncho = cellBounds.Width - 2;
8565 lnAlto = lnAlto - 3;
8566 lnAncho = lnAncho - 3;
8570 System.Drawing.Drawing2D.GraphicsContainer container = graphics.BeginContainer();
8571 graphics.SetClip(cellBounds);
8572 graphics.DrawImage(this._Imagen, lnX, lnY, lnAncho, lnAlto);
8577 Pen loPen =
new Pen(
Color.DodgerBlue, 2);
8578 Rectangle loRectangle = cellBounds;
8579 loRectangle.Height = loRectangle.Height - 1;
8580 loRectangle.Width = loRectangle.Width - 1;
8581 loRectangle.Inflate(-2, -2);
8582 graphics.DrawRectangle(loPen, loRectangle);
8585 graphics.EndContainer(container);
Indica que es un ewbutton de mantenimiento
String _CondicionAutomatica
Texto para el filtro automático
virtual DataTable _DatatablePersonalizado
Datatable personalizado
override void _Cargar_Propiedades()
Redefinición del método Cargar_Propiedades() para establecer los valores de las propiedades adecuados...
bool _ReadOnly
Si es de solo lectura del campo de texto que alojará el número
void LanzarEvento_Codigo_Cambiado_Before(ref bool tlOk)
Disparador de evento de código cambiado con sender y valor candidato
virtual Boolean _ExpandirTexto(ref String tcTexto)
Expandir texto
_Click_After_Handler _Click_After
_Click_After_Handler
override void _Cargar_Propiedades()
Redefinición del método Cargar_Propiedades() para establecer los valores de las propiedades adecuados...
Definición del txtcodlabel para características
string _CampoCondicionAutomatica
Definición del campo clave para la búsqueda de condiciones automáticas en campos multiclave ...
txtTipoEmpresa: Selección del tipo de empresa: Normal o Consolidada
virtual String _Refrescar_Descripcion_Datatable_Personalizado()
Refrescar descripcion personalizada
_Click_Before_Handler _Click_Before
_Click_Before_Handler
override bool EvaluarOrigenManual()
Override para determinar si los datos se obtiene de tabla o son personalizados
_Tipos_Visuales
Definición de los posibles tipos visuales de la clase txtcodlabel
override void _Cargar_Propiedades()
Redefinición del método Cargar_Propiedades() para establecer los valores de las propiedades adecuados...
_Click_After_Handler _Click_After
_Click_After_Handler
Interfaz que deberán cumplir todos los controles visuales en que se pueda establecer un valor de conf...
PE-84040 Control tipo ew de ErrorProvider
DelegarValidacionCrearCodigo _ValidacionCrearCodigo
Definición del delegado para el evento para validar el codigo antes de crearlo
void _SetToolTips(string tcTooltipBrowser="", string tcTooltipMante="")
Establece o refresca los tooltips
static DataTable _CuentasDeudaCortoLargoPlazo()
Devuelve en un DataTable los códigos de cuenta de deuda a corto/largo plazo
bool _AplicarEstilos
Aplicar estilo al control
bool _Autoload
PE-92458 Se utiliza para determinar si el mantenimineto debe presentar el primer registro o bien apar...
Definición del txtcodlabel para grupos de contribuyentes (PE-87841)
static sage.ew.usuario.Usuario _This
Instancia estática del objeto usuario con los datos del usuario actual (wc_usuario) ...
override void _Cargar_Propiedades()
Redefinición del método Cargar_Propiedades() para establecer los valores de las propiedades adecuados...
Clase sage.ew.objetos.ewcombobox
virtual bool _ActivarCondicionAutomatica(ref string tcTexto)
Indica si se tiene que activar el filtrado parcial
ewlabel _GetLabel()
PE-93157 : Retorna el ewlabel
Delegar_ProcessCmdKey _Delegar_ProcessCmdKey
Definición del evento Delegar_ProcessCmdKey
bool _Tactil
Indica si el botón se utilizará en una pantalla para uso táctil.
virtual bool _Existe_Codigo(ref string tcCodigo, bool tlValidar=false)
Verifica si el código pasado por parámetro existe en la bd En caso de múltiples resultados monta y mu...
override void _Cargar_Propiedades()
Redefinición del método Cargar_Propiedades() para establecer los valores de las propiedades adecuados...
ewgrid()
Inicializa una nueva instancia de la clase ewgrid
ewcomboboxEstilosBase _PropiedadesDeEstilos
Objeto estilo
TextAndImageColumn()
Constructor
override void _Cargar_Propiedades()
Redefinición del método Cargar_Propiedades() para establecer los valores de las propiedades adecuados...
override void _Cargar_Propiedades()
Redefinición del método Cargar_Propiedades() para establecer los valores de las propiedades adecuados...
DataTable _Albaranes_Factura(string tcEjercicio="GESTION")
Devuelve un datatable con los albaranes asociados al número de factura
Definición del txtcodlabel para cuentas contables
override void _Cargar_Propiedades()
Redefinición del método Cargar_Propiedades() para establecer los valores de las propiedades adecuados...
txtTerritorios()
Constructor
txtReportTemplate()
Constructor
Browser, basat en sage.ew.objetos.ewbutton
IDisposable Subscribe(IObserver< TxtCodLabelInfo > toObservador)
Método para recibir los observadores
override void _Load()
Load del proveedor
override void _Cargar_Propiedades()
Redefinición del método Cargar_Propiedades() para establecer los valores de las propiedades adecuados...
txtCaracteristica()
Constructor
EventHandler OnConfigUserValueChanged
Evento para determinar cuando cambia el valor y mostrar mensaje si es opcional
TipoConceptosMostrar
Enumerado con los tipos de grupos de conceptos de gastos e ingresos. Para poder configurar que concep...
Clase TextoInformacion para utilizar en el UserControl btInfo
override void _Cargar_Propiedades()
Redefinición del método Cargar_Propiedades() para establecer los valores de las propiedades adecuados...
override void _Refresh()
Para que al navegar por los documentos cuando carga el codigo en el txtObra no haga ninguna validacio...
void UnSubscribe(IObserver< TxtCodLabelInfo > toObservador)
Método para eliminar a los suscriptores
Definición del txtcodlabel para IMPRESORAS DE TPV (PE-84202)
override bool ProcessCmdKey(ref Message msg, Keys keyData)
Para controlar F4 y F5 a nivel de UserControl
virtual void OnCompleted()
Método OnCompleted
delegate void _Click_Before_Handler(ref Boolean tlOk)
_Click_Before_Handler
Clase para poder mostrar imagen y texto en las celdas de un DataGridView
Delegar_Click_Celda _Click_Celda
Definición del delegado para el evento _Click_Celda
ewGridScrollBars
Tipos de barras de desplazamiento personalizadas
string _Titulo
Título de la página
txtGrupoContribuyente()
Constructor
override Boolean _ExpandirTexto(ref String tcTexto)
Expandir texto especial para txtConceptIRPF que puede tener espaciosen blanco por la izquierda...
string _Titulos_Campos
lista de títulos de los campos que nos presentará en el browser
eUsarExtensionesBrowser _UsarExtensiones
Muestra el panel de extensiones
Clase de recurso fuertemente tipado, para buscar cadenas traducidas, etc.
Clase de negocio Proveedor
ewtextboxEstilosBase _PropiedadesDeEstilos
Objeto estilo
static bool _EsTrabajador(string tcCodigo)
Comprueba si es una cuenta de trabajador
override object Clone()
Para clonar la celda con IMAGEN y TEXTO
override void btBrowser__Click_Before(ref bool tlOk)
Funcionalidad especial para ventas
I - Ingresos e IVA Repercutido
virtual int _Ancho_TextBox()
Método que nos calcula el ancho correspondiente al textbox según la longitud del campo contenido ...
override void _Cargar_Propiedades()
Redefinición del método Cargar_Propiedades() para establecer los valores de las propiedades adecuados...
virtual void _Resultados_Datatable(ref DataTable loResultados)
PE92379 - ens permet modificar el datatable de la consulta per afegir registres,...
ewlabelEstilosBase _PropiedadesDeEstilos
Objeto estilo
override void _Cargar_Propiedades()
Redefinición del método Cargar_Propiedades() para establecer los valores de las propiedades adecuados...
override void _Cargar_Propiedades()
Redefinición del método Cargar_Propiedades() para establecer los valores de las propiedades adecuados...
override void _Cargar_Propiedades()
Redefinición del método Cargar_Propiedades() para establecer los valores de las propiedades adecuados...
Delegar_Browser_After _Browser_Click_After
Definición del evento _Browser_Click_After (Además de en el browser también se utilizará al cambiar l...
void _SetValueUserOption(object toValor)
Para establecer un valor en el control visual.
Delegar_Codigo_Cambiado_Before _Codigo_Cambiado_Before
Definición del delegado para el evento _Codigo_Cambiado_Before
Boolean _ShowAsistente(String tcNuevoCodigo="")
Metodo para abrir el asistente
KeyDiccionarioLenCampos
Clave del diccionario LenCampos
Definición del txtcodlabel para tipos de retención
Clase sage.ew.objetos.ewlabel
Clase de negocio para el mantenimiento de obras
virtual void txtObra__Codigo_Cambiado_Before(ref bool tlOk)
Capturar antes del cambio del código de obra
Clase sage.ew.objetos.ewtextbox
override void _Cargar_Propiedades()
Redefinición del método Cargar_Propiedades() para establecer los valores de las propiedades adecuados...
TipoGastoIngreso
Enumerado con los tipos de grupos de conceptos de gastos e ingresos (EOS)
TipoConceptosIRPFMostrar
Enumerado con los tipos de grupos de conceptos de gastos e ingresos. Para poder configurar que concep...
override void _Cargar_Propiedades()
Redefinición del método Cargar_Propiedades() para establecer los valores de las propiedades adecuados...
Clase auxiliar para el intercambio de mensajes de notificación
TxtCodLabelInfo()
Constructor por defecto
bool _AplicarEstilos
Aplicar estilos visuales
string _DataBase
nombre de la base de datos de la tabla
void _SetFirstCellValue()
PE-87225 Posa el codi el valor de la primera cela
Interfaz utilizada en los controles que se añaden en los perfiles
Classe documento Factura de compra
Clase del objeto grid para Sage50
override void WndProc(ref Message m)
Mensajes recibidos
virtual void _Show()
Muestra el formulario asiociado
override void _Cargar_Propiedades()
Redefinición del método Cargar_Propiedades() para establecer los valores de las propiedades adecuados...
DataGridViewCellStyle _oDefaultCellStyle
Guardem una còpia del estil per a poder restaurar-lo
txtCuentaERP()
Constructor
Definición del txtcodlabel para subfamilias
Delegar_Click_Combo_Grid _Click_Combo_Grid
Definición del delegado para el evento _Click_Combo_Grid
virtual void _RefrescarBinding()
Método para refrescar los bindings (PE-78599)
bool _AbrirConTeclaF4
Indica si se abrirá F4 con la tecla +
txtTarifaBase()
Constructor
Definición del txtcodlabel para familias
eTipoDocumentoGeneral
Enumeración pública para definir las diferentes categorias que tenemos de documentos (ventas...
_Tipos_Visuales
_Tipos_Visuales: Definición de los posibles tipos visuales de la clase txtcodlabel ...
virtual bool EvaluarOrigenManual()
Método virtual para permitir determinar el origen manual de los datos
Definición del txtcodlabel para proveedores
static bool _EsDeudaCortoLargoPlazo(string tcCodigo)
Comprueba si es una cuenta de deuda a corto/largo plazo
txtConceptoIRPF()
Constructor
Definición del txtcodlabel para familias
override void Paint(Graphics graphics, Rectangle clipBounds, Rectangle cellBounds, int rowIndex, DataGridViewElementStates cellState, object value, object formattedValue, string errorText, DataGridViewCellStyle cellStyle, DataGridViewAdvancedBorderStyle advancedBorderStyle, DataGridViewPaintParts paintParts)
Redefinición del evento Paint de la celda para mostrar la imagen en la celda
txtConceptoGastoIngreso()
Constructor
Definición del txtcodlabel para Cajas del TPV (PE-75073)
void _Focus()
PE-84262 pone el focue en el textbox
virtual void btBrowser__Click_Before(ref bool tlOk)
override void _Cargar_Propiedades()
Redefinición del método Cargar_Propiedades() para establecer los valores de las propiedades adecuados...
eUsarExtensionesBrowser
Enumerado para gestionar el uso de extensiones de browser a un nivel superior
Boolean _ShowDialog
Indica si debe mostrar la pantalla en modal
Definición del txtcodlabel para tarifas
Clase para uso de funciones genéricas
virtual void _Cargar_Propiedades()
Método que se encarga de inicializar las propiedades específicas para cada tipo de txtCodLabel defini...
Delegar_Codigo_Cambiado_Before_Extended _Codigo_Cambiado_Before_Extended
Definición del delegado para el evento _Codigo_Cambiado_Before
override void _Cargar_Propiedades()
Redefinición del método Cargar_Propiedades() para establecer los valores de las propiedades adecuados...
void _Quitar_Seleccion_Grid()
PE-76883
override void _Cargar_Propiedades()
Redefinición del método Cargar_Propiedades() para establecer los valores de las propiedades adecuados...
bool _ValidarAbrirConTeclaF4()
Valida si se puede simular el F4 a partir de la tecla configurada
virtual void _Reload_propiedades()
Método para volver a ejecutar la configuración del browser
virtual void OnError(Exception error)
Método OnError
override void _Cargar_Propiedades()
Redefinición del método Cargar_Propiedades() para establecer los valores de las propiedades adecuados...
Definición del txtcodlabel para cuentas contables de bancos (PE-85500)
txtImpresoraTpv()
Constructor
delegate void _Click_After_Handler(Boolean tlAceptar)
_Click_After_Handler
string _Tabla
Tabla de la que se presentarán los datos
String _CodigoCreado
Código creado
string _ClavePrimaria
campos que forman la clave primaria del browser separados por comas
Boolean _CondicionAutomaticaActiva
Filtrar automáticamente los registros si al acceder a los F4
Definición del txtcodlabel para plantillas de facturae
txtClasificacion()
Constructor
txtProveed(bool mostrarcuentasnivel3proveedor)
Constructor
override void _Cargar_Propiedades()
Redefinición del método Cargar_Propiedades() para establecer los valores de las propiedades adecuados...
bool _ActivarCondicionAutomatica(ref String tcTexto, int tnLen)
Indica si se tiene que activar el filtrado parcial
Muestra el mantenimiento correspondiente a _Form con el registro correspondiente al _Codigo ...
void LanzarEvento_Codigo_Cambiado_Validated(bool tlResultadoValidacion)
Disparador del evento de resultados de validación
Definición del txtcodlabel para cuentas contables
Definición del txtcodlabel base para obras
txtSubFamilia()
Constructor
virtual void _Refresh()
Método para forzar el refresco de los datos mostrados teniendo en cuenta los nuevos valores de las pr...
txtDelegaciones()
Constructor
virtual void _Set_Custom_Combo_DataSource(ewcombobox toCombo)
Permite definir como aplicar la propiedad _DataTable sobre el combo Para tablas personalizadas la asi...
virtual ContextMenuStrip _Montar_ContextMenuStrip(DataTable tdtTablaOrigen)
Método virtual para crear un ToolStripMenuItem a partir de un datatable La propiedad NAME contendrá e...
override void _Cargar_Propiedades()
Redefinición del método Cargar_Propiedades() para establecer los valores de las propiedades adecuados...
override bool _Existe_Codigo(ref string tcCodigo, bool tlValidar=false)
Si ha entrado una raíz de cuenta tenemos de refrescar el código de cuenta que se ha seleccionado ...
eTipoDocumento
Detalle los tipos de documento posibles de ventas y compras
virtual void txtObra__Codigo_Cambiado()
Capturar cuando se cambia el código de obra
string _Form
Referencia al formulario
string _Codigo
valor del registro seleccionado por parte del usuario (readonly)
_Click_Before_Handler _Click_Before
_Click_Before_Handler
override void OnCreateControl()
Al crearse el control es el momento de subscribirnos a los eventos para gestionar el cambio de obra ...
txtOrdenImpresion : Orden de impresion del Cash
string _NombreManteNet
Nombre del mantenimiento de .Net
Delegar_Mante_Before _Mante_Click_Before
Definición del evento _Mante_Click_Before
string _Cliente
Cliente de la obra
List< string > _TextoParrafos
Lista de párrafos de la página
override void _Cargar_Propiedades()
Redefinición del método Cargar_Propiedades() para establecer los valores de las propiedades adecuados...
string _Alias
Alias de la _Tabla para cuando se añaden condiciones automáticas
virtual void btBrowser__Click_After(bool tlAceptar)
override void _Cargar_Propiedades()
Redefinición del método Cargar_Propiedades() para establecer los valores de las propiedades adecuados...
void _Suscripcion_Eventos()
Método que da de alta la suscripción a eventos. Se invoca al cargar un perfil desde FRMGESTIONPERFIL ...
Delegar_Mante_After _Mante_Click_After
Definición del evento _Mante_Click_After
delegate void _Click_Before_Handler(ref Boolean tlOk)
_Click_Before_Handler
override void _Cargar_Propiedades()
Redefinición del método Cargar_Propiedades() para establecer los valores de las propiedades adecuados...
string _Titulo
Titulo de la ventana
txtTipoImpresora: Selección del tipo de impresora: Impresora o visor
Delegar_Codigo_Cambiado_ValidationResult _Codigo_Cambiado_Validated
Definición del delegado para el evento informar de validación completa
Clase para Botones de mantenimientos
Task 141344 Definición del txtcodlabel para conceptos de libros IRPF
Interfaz para la gestión de eventos en el perfil en los controles que tienen la propiedad _Documento ...
void _Clonar(ewtxtcodlabel toFiltroClon)
Método para clonar el objeto
Delegar_Browser_Before _Browser_Click_Before
Definición del evento _Browser_Click_Before
Definición del txtcodlabel para marcas
static DataTable _PrefijosProveedores()
Devuelve en un DataTable los códigos de nivel3 que tienen ficha de proveedor
override string _Numero
Número del document - Aquí ja controla wn_FactCompra
static System.Drawing.Bitmap maintenance_16
Busca un recurso adaptado de tipo System.Drawing.Bitmap.
virtual void _setTxtBoxFocus()
Establece el foco y selecciona el contenido del input
void LanzarEvento_Codigo_Cambiado_Before_Extended(string tcValorCandidato, ref bool tlOk)
Disparador de evento de código cambiado (before) con sender y valor candidato
override void txtObra__Codigo_Cambiado()
La validación del tipo de iva y presentación del mensaje solo debe realizarse en ventas en los docume...
txtProveedNIF()
Constructor
static Color Name_to_Color(string tcColor)
Función Auxiliar que a partir de un string devuelve un objeto color. Admite 3 modos: ...
bool _Opcesp(string tcCodigo)
Método que nos devuelve "true" en caso que el usuario actual tenga acceso a la opción especial con có...
Tarifa en formato combo donde se presenta el código y el nombre
virtual bool _Refrescar_Descripcion_Datatable_Personalizado(out string tcTextoLabel)
Método para refrescar el label cuando se trabaja con tablas de datos personalizadas Se debe implement...
static string _TxtCodigoRaizCuenta(string tcRaizCuenta, string tcBrowser_Condicion="")
Presentamos el browser ordenado por código de la raíz del código de la cuenta Utilizado en el siguien...
Definición del txtcodlabel para vendedores
ewGridScrollBars _ewGridScrollBars
PE-83909. Tipos de barras de desplazamiento
Definición del txtcodlabel para territorios (PE-84202)
override bool _Save()
Override Save para guardar datos tablas relacionadas
Redefinición de la clase txtObra para ventas (PE-95424)
Delegar_Codigo_Cambiado _Codigo_Cambiado
Definición del delegado para el evento _Codigo_Cambiado
Clase para el control de operarios
void _Cancelar_Suscripcion_Eventos()
Método que cancela la suscripción a eventos. Se invoca al cambiar de perfil en FRMGESTIONPERFIL ...
dynamic _oDocumento
PE-78139
override void _Cargar_Propiedades()
Redefinición del método Cargar_Propiedades() para establecer los valores de las propiedades adecuados...
override bool _Existe_Codigo(ref string tcCodigo, bool tlValidar=false)
Override del método de validación de valores
Definición del txtcodlabel para cuentas ERP (PE-81117)
override void btBrowser__Click_After(bool tlAceptar)
Funcionalidad especial para ventas
Definición del txtcodlabel para plantillas de reports
string _TipoIVA
Propiedad puente para cumplir la interficie IGestionTipoIVA, ya que teníamos creada de antes la propi...
Delegar_Click_Combo_Grid_Up _Click_Combo_Grid_Up
Definición del delegado para el evento _Click_Combo_Grid_Up
override void OnCreateControl()
Al crearse el control lo definimos
ewcombobox _GetComboBox()
Da acceso al control combobox
Dictionary< string, object > _CodigosDiccionario
Diccionario con los valores de todas las claves (PE-84497)
Classe txtNumFacompra representa el control de nº de factura de compra que se permitirá añadir únicam...
Definición del txtcodlabel para operarios
override void OnVisibleChanged(EventArgs e)
OnVisibleChanged: Para refrescar las propiedades que podemos tener guardados en el designer de una pa...
string _Campos
lista de campos separados por comas que nos presentará en el browser
virtual void OnNext(TxtCodLabelInfo toObrseved)
Método Next del objeto observado
object _GetValueUserOption()
Nos devuelve el valor establecido en este momento en el control visual.
Definición del txtcodlabel para Cajas del TPV (PE-74399)
string _Condicion
condición que se podrá especificar en el momento de realizar la consulta SQL
override void _Cargar_Propiedades()
Redefinición del método Cargar_Propiedades() para establecer los valores de las propiedades adecuados...
void _Evento_CodigoDiccionario_Establecido()
PE-84279 Disparador del evento de selección múltiple
Delegar_Refrescar_Descripcion_Personalizada _Refrescar_Descripcion_Personalizada
Definición del delegado para el evento _Codigo_Cambiado
Interfaz para refrescar los controles de los perfiles
Definición del txtcodlabel para rutas
override bool ProcessCmdKey(ref Message msg, Keys keyData)
Para controlar F4 y F5 a nivel de UserControl
override string _Codigo
override de _Codigo para que en el Set podamos convertir el número que nos llega a código de cliente ...
Clase para poder mostrar imagen y texto en una columna de un DataGridView
string _Clave
campos que forman la clave primaria del browser separados por comas
static System.Drawing.Bitmap search_16
Busca un recurso adaptado de tipo System.Drawing.Bitmap.
Clase base para controles de tipo txtcodlabelf
virtual void txtOperario__Codigo_Cambiado_Before_Extended(object sender, string tcValorCandidato, ref bool tlOk)
PE-108799 Validamos el pass del operario si lo tiene
static bool _EsProveedor(string tcCodigo)
Comprueba si se trata de una cuenta de cliente
Delegar_Codigo_Actualizado _Codigo_Actualizado
Definición del delegado para el evento _Codigo_Actualizado El evento código actualizado se lanza al c...
TxtCodLabelInfo(object toSender, string tcValor)
Constructor con parámtros
override string _Codigo
Override del _Codigo para usar autorelleno
Definición del txtcodlabel base que gestiona la raíz de cuenta
Redefinición de la clase txtObra para COMPRAS (PE-95424)
string _Campo_Predet
Campo predeterminado que se utilizará en la presentación de la información
PE-85115 Definición del txtcodlabel para clasificaciónes de articulos
Task 152322 Definición del txtcodlabel para conceptos de gastos e ingresos
Delegar_Click_Combo_DropDown _Click_Combo_DropDown
Definición del delegado para cuando se desplega el combo
void ewtextbox_Validated(object sender, EventArgs e)
Método para poder capturar el evento al cambiar la celda seleccionada en el grid
Delegar_CodigoDiccionario_Establecido _CodigoDiccionario_Establecido
PE-84279 Delegado de la selección múltiple. Este evento nos informa de que se ha finalizado la elecci...
Definición de la clase Usuario
ewtextbox _GetTextBox()
PE-84262 Retorna el ewtextbox
bool ReadOnly
Indica si es ReadOnly