diff --git a/Source/Modulos/Articulos/Views/uViewArticulo.dfm b/Source/Modulos/Articulos/Views/uViewArticulo.dfm
index 1d70075..b126ab7 100644
--- a/Source/Modulos/Articulos/Views/uViewArticulo.dfm
+++ b/Source/Modulos/Articulos/Views/uViewArticulo.dfm
@@ -21,7 +21,7 @@ inherited frViewArticulo: TfrViewArticulo
       304)
     object PngSpeedButton2: TPngSpeedButton
       Left = 389
-      Top = 304
+      Top = 331
       Width = 23
       Height = 22
       Action = actAnadir
@@ -48,7 +48,7 @@ inherited frViewArticulo: TfrViewArticulo
     end
     object PngSpeedButton1: TPngSpeedButton
       Left = 389
-      Top = 332
+      Top = 359
       Width = 23
       Height = 22
       Action = actEliminar
@@ -133,7 +133,7 @@ inherited frViewArticulo: TfrViewArticulo
     end
     object eImagen: TcxImage
       Left = 28
-      Top = 304
+      Top = 331
       Properties.GraphicClassName = 'TJPEGImage'
       Properties.ImmediatePost = True
       Properties.PopupMenuLayout.MenuItems = []
@@ -153,7 +153,7 @@ inherited frViewArticulo: TfrViewArticulo
       StyleHot.LookAndFeel.Kind = lfStandard
       StyleHot.LookAndFeel.NativeStyle = True
       StyleHot.LookAndFeel.SkinName = ''
-      TabOrder = 8
+      TabOrder = 9
       Height = 98
       Width = 355
     end
@@ -242,7 +242,7 @@ inherited frViewArticulo: TfrViewArticulo
     end
     object cbFabricante: TcxDBComboBox
       Left = 122
-      Top = 220
+      Top = 247
       DataBinding.DataSource = dsViewArticulo
       Properties.DropDownRows = 16
       Properties.ImmediatePost = True
@@ -264,12 +264,12 @@ inherited frViewArticulo: TfrViewArticulo
       StyleHot.LookAndFeel.Kind = lfStandard
       StyleHot.LookAndFeel.NativeStyle = True
       StyleHot.LookAndFeel.SkinName = ''
-      TabOrder = 6
+      TabOrder = 7
       Width = 290
     end
     object eReferenciaFabr: TcxDBTextEdit
       Left = 122
-      Top = 247
+      Top = 274
       Anchors = [akLeft, akTop, akRight]
       DataBinding.DataSource = dsViewArticulo
       Style.BorderColor = clWindowFrame
@@ -289,9 +289,37 @@ inherited frViewArticulo: TfrViewArticulo
       StyleHot.LookAndFeel.Kind = lfStandard
       StyleHot.LookAndFeel.NativeStyle = True
       StyleHot.LookAndFeel.SkinName = ''
-      TabOrder = 7
+      TabOrder = 8
       Width = 171
     end
+    object eTiendaWeb: TcxDBCheckBox
+      Left = 122
+      Top = 190
+      Caption = 'Listar este art'#237'culos en la tienda web:'
+      DataBinding.DataField = 'TIENDA_WEB'
+      DataBinding.DataSource = dsViewArticulo
+      Properties.ImmediatePost = True
+      Properties.NullStyle = nssUnchecked
+      Properties.ValueChecked = 1
+      Properties.ValueUnchecked = 0
+      Style.BorderColor = clWindowFrame
+      Style.BorderStyle = ebs3D
+      Style.HotTrack = False
+      Style.LookAndFeel.Kind = lfStandard
+      Style.LookAndFeel.NativeStyle = True
+      Style.LookAndFeel.SkinName = ''
+      StyleDisabled.LookAndFeel.Kind = lfStandard
+      StyleDisabled.LookAndFeel.NativeStyle = True
+      StyleDisabled.LookAndFeel.SkinName = ''
+      StyleFocused.LookAndFeel.Kind = lfStandard
+      StyleFocused.LookAndFeel.NativeStyle = True
+      StyleFocused.LookAndFeel.SkinName = ''
+      StyleHot.LookAndFeel.Kind = lfStandard
+      StyleHot.LookAndFeel.NativeStyle = True
+      StyleHot.LookAndFeel.SkinName = ''
+      TabOrder = 6
+      Width = 697
+    end
     object dxLayoutControlArticuloGroup_Root: TdxLayoutGroup
       ShowCaption = False
       Hidden = True
@@ -365,6 +393,13 @@ inherited frViewArticulo: TfrViewArticulo
                 Control = eNoComisionable
                 ControlOptions.ShowBorder = False
               end
+              object dxLayoutControlArticuloItem12: TdxLayoutItem
+                AutoAligns = [aaVertical]
+                AlignHorz = ahClient
+                Caption = ' '
+                Control = eTiendaWeb
+                ControlOptions.ShowBorder = False
+              end
             end
           end
         end
diff --git a/Source/Modulos/Articulos/Views/uViewArticulo.pas b/Source/Modulos/Articulos/Views/uViewArticulo.pas
index 68f35cc..924952b 100644
--- a/Source/Modulos/Articulos/Views/uViewArticulo.pas
+++ b/Source/Modulos/Articulos/Views/uViewArticulo.pas
@@ -63,6 +63,8 @@ type
     eReferenciaFabr: TcxDBTextEdit;
     dxLayoutControlArticuloGroup10: TdxLayoutGroup;
     dxLayoutControlArticuloGroup14: TdxLayoutGroup;
+    dxLayoutControlArticuloItem12: TdxLayoutItem;
+    eTiendaWeb: TcxDBCheckBox;
     procedure actEliminarExecute(Sender: TObject);
     procedure actAnadirExecute(Sender: TObject);
     procedure cbFamiliaPropertiesInitPopup(Sender: TObject);