git-svn-id: https://192.168.0.254/svn/Proyectos.LuisLeon_FactuGES/trunk@114 c93665c3-c93d-084d-9b98-7d5f4a9c3376

Source/Modulos/Articulos/Data/uDataModuleArticulos.dfm

@@ -593,6 +593,18 @@ object DataModuleArticulos: TDataModuleArticulos
         Calculated = False
         Lookup = False
         LookupCache = False
+      end
+      item
+        Name = 'ELIMINADO'
+        DataType = datInteger
+        BlobType = dabtUnknown
+        DisplayWidth = 0
+        DisplayLabel = 'Eliminado'
+        Alignment = taLeftJustify
+        InPrimaryKey = False
+        Calculated = False
+        Lookup = False
+        LookupCache = False
       end>
     Params = <
       item

Source/Modulos/Articulos/Model/schArticulosClient_Intf.pas

@@ -9,9 +9,9 @@ const
   { Data table rules ids
        Feel free to change them to something more human readable
        but make sure they are unique in the context of your application }
-  RID_Articulos = '{CD3F7AC8-2E99-468B-A2B4-DDCB9DF05381}';
+  RID_Articulos = '{FE5A8941-5AAF-4531-80AF-EC65F31221AC}';
-  RID_Articulos_Refresh = '{992EF741-76AC-4B91-A1A5-BDEC941728C0}';
+  RID_Articulos_Refresh = '{2819FEBE-E004-4298-9C11-130B7606942C}';
-  RID_ArticulosParaCliente = '{4666CBEF-C5F0-4DA1-9E9D-0BE39BE9D21E}';
+  RID_ArticulosParaCliente = '{01F0B629-43BE-4AA7-94DC-25BED34D3DE7}';
 
   { Data table names }
   nme_Articulos = 'Articulos';
@@ -135,7 +135,7 @@ const
 type
   { IArticulos }
   IArticulos = interface(IDAStronglyTypedDataTable)
-  ['{CA8B6ED7-3DFA-47B8-B5D0-31D191D38B20}']
+  ['{BB269104-D1E2-417A-80A3-6AF9044FA416}']
     { Property getters and setters }
     function GetIDValue: Integer;
     procedure SetIDValue(const aValue: Integer);
@@ -272,7 +272,7 @@ type
 
   { IArticulos_Refresh }
   IArticulos_Refresh = interface(IDAStronglyTypedDataTable)
-  ['{3F6FFE15-16A8-4FC3-869E-0465A8C2B083}']
+  ['{61A7E2D4-DB41-4BC6-81C3-7EAAB50A7B1B}']
     { Property getters and setters }
     function GetIDValue: Integer;
     procedure SetIDValue(const aValue: Integer);
@@ -373,7 +373,7 @@ type
 
   { IArticulosParaCliente }
   IArticulosParaCliente = interface(IDAStronglyTypedDataTable)
-  ['{E86734CD-8850-47A1-9A1F-DF10538B5379}']
+  ['{D479AEB8-64DF-401B-BE84-9052F5A05EE7}']
     { Property getters and setters }
     function GetIDValue: Integer;
     procedure SetIDValue(const aValue: Integer);

Source/Modulos/Articulos/Model/schArticulosServer_Intf.pas

@@ -9,14 +9,14 @@ const
   { Delta rules ids 
        Feel free to change them to something more human readable
        but make sure they are unique in the context of your application }
-  RID_ArticulosDelta = '{43530E4A-4CC7-4251-9AA8-0061B8C9C052}';
+  RID_ArticulosDelta = '{3C86B4D6-46CB-46C0-A38D-92B71233360F}';
-  RID_Articulos_RefreshDelta = '{115B6297-C598-4900-92EA-D308C93328E8}';
+  RID_Articulos_RefreshDelta = '{1226EC42-63CA-45D5-9854-A19043873F47}';
-  RID_ArticulosParaClienteDelta = '{5CC30710-52CC-49FF-AC98-37F07D612A35}';
+  RID_ArticulosParaClienteDelta = '{A6BC0C26-3A03-4434-82D3-07521A7956C4}';
 
 type
   { IArticulosDelta }
   IArticulosDelta = interface(IArticulos)
-  ['{43530E4A-4CC7-4251-9AA8-0061B8C9C052}']
+  ['{3C86B4D6-46CB-46C0-A38D-92B71233360F}']
     { Property getters and setters }
     function GetOldIDValue : Integer;
     function GetOldID_EMPRESAValue : Integer;
@@ -171,7 +171,7 @@ type
 
   { IArticulos_RefreshDelta }
   IArticulos_RefreshDelta = interface(IArticulos_Refresh)
-  ['{115B6297-C598-4900-92EA-D308C93328E8}']
+  ['{1226EC42-63CA-45D5-9854-A19043873F47}']
     { Property getters and setters }
     function GetOldIDValue : Integer;
     function GetOldID_EMPRESAValue : Integer;
@@ -284,7 +284,7 @@ type
 
   { IArticulosParaClienteDelta }
   IArticulosParaClienteDelta = interface(IArticulosParaCliente)
-  ['{5CC30710-52CC-49FF-AC98-37F07D612A35}']
+  ['{A6BC0C26-3A03-4434-82D3-07521A7956C4}']
     { Property getters and setters }
     function GetOldIDValue : Integer;
     function GetOldID_EMPRESAValue : Integer;

Source/Modulos/Articulos/Servidor/srvArticulos_Impl.dfm

@@ -477,7 +477,7 @@ object srvArticulos: TsrvArticulos
             DataType = datInteger
             BlobType = dabtUnknown
             DisplayWidth = 0
-            DisplayLabel = '[New Field]'
+            DisplayLabel = 'Eliminado'
             Alignment = taLeftJustify
             InPrimaryKey = False
             Calculated = False
@@ -1340,6 +1340,13 @@ object srvArticulos: TsrvArticulos
             Value = ''
             ParamType = daptInput
           end
+          item
+            Name = 'ELIMINADO'
+            DataType = datInteger
+            BlobType = dabtUnknown
+            Value = ''
+            ParamType = daptInput
+          end
           item
             Name = 'OLD_ID'
             DataType = datInteger
@@ -1360,8 +1367,8 @@ object srvArticulos: TsrvArticulos
               '    PRECIO_COSTE = :PRECIO_COSTE, '#10'    PRECIO_PORTE = :PRECIO_PO' +
               'RTE, '#10'    DESCUENTO = :DESCUENTO, '#10'    ID_PROVEEDOR = :ID_PROVEE' +
               'DOR, '#10'    PRECIO_NETO = :PRECIO_NETO,'#10'    INVENTARIABLE = :INVEN' +
-              'TARIABLE,'#10'    REFERENCIA_PROV = :REFERENCIA_PROV'#10'  WHERE'#10'    (ID' +
+              'TARIABLE,'#10'    REFERENCIA_PROV = :REFERENCIA_PROV,'#10'    ELIMINADO ' +
-              ' = :OLD_ID)'
+              '= :ELIMINADO'#10'  WHERE'#10'    (ID = :OLD_ID)'
             StatementType = stSQL
             ColumnMappings = <>
           end>