diff --git a/Source/Servicios/FactuGES.RODL b/Source/Servicios/FactuGES.RODL
index 84485c71..8cf68cd4 100644
--- a/Source/Servicios/FactuGES.RODL
+++ b/Source/Servicios/FactuGES.RODL
@@ -9,14 +9,6 @@
 <Interfaces>
 <Interface Name="Default" UID="{28CCDC07-A3A4-4917-89B4-64423DC70C9D}">
 <Operations>
-<Operation Name="GenerateFichaEmpleadoReport" UID="{CCD0007A-F1FF-46C2-8BB8-09981EAE4FB7}">
-<Parameters>
-<Parameter Name="Result" DataType="Binary" Flag="Result">
-</Parameter>
-<Parameter Name="EmpleadoID" DataType="String" Flag="In" >
-</Parameter>
-</Parameters>
-</Operation>
 <Operation Name="GenerateEtiquetasReport" UID="{910E5F58-7F8E-4D4C-A6A8-2FAD54689219}">
 <Parameters>
 <Parameter Name="Result" DataType="Binary" Flag="Result">
@@ -134,6 +126,16 @@
 <Interfaces>
 <Interface Name="Default" UID="{29388459-1A0B-46BE-AF9E-66A9E7AABB0B}">
 <Operations>
+<Operation Name="darIDTiendaVendedorUsuario" UID="{7B485EF3-28A4-46EB-8BA5-CCA2C5F33CAF}">
+<Parameters>
+<Parameter Name="ID_USUARIO" DataType="Integer" Flag="In" >
+</Parameter>
+<Parameter Name="AIdTienda" DataType="Integer" Flag="InOut" >
+</Parameter>
+<Parameter Name="ATienda" DataType="String" Flag="InOut" >
+</Parameter>
+</Parameters>
+</Operation>
 </Operations>
 </Interface>
 </Interfaces>
@@ -440,6 +442,22 @@
 </Interface>
 </Interfaces>
 </Service>
+<Service Name="srvComisiones" UID="{F84C84A1-B7C6-4690-BEA0-B5C4B744A064}" Ancestor="DataAbstractService">
+<Interfaces>
+<Interface Name="Default" UID="{B600E9A1-28EC-484E-A74D-B5BB96FDF20A}">
+<Operations>
+<Operation Name="GenerateReport" UID="{A8F1DE0E-6FC5-4D62-B6D7-E6A6B9968C8C}">
+<Parameters>
+<Parameter Name="Result" DataType="Binary" Flag="Result">
+</Parameter>
+<Parameter Name="ComisionID" DataType="String" Flag="In" >
+</Parameter>
+</Parameters>
+</Operation>
+</Operations>
+</Interface>
+</Interfaces>
+</Service>
 </Services>
 <EventSinks>
 </EventSinks>
diff --git a/Source/Servicios/FactuGES_Intf.pas b/Source/Servicios/FactuGES_Intf.pas
index c146a343..f719f4cf 100644
--- a/Source/Servicios/FactuGES_Intf.pas
+++ b/Source/Servicios/FactuGES_Intf.pas
@@ -49,6 +49,7 @@ const
   IsrvReferencias_IID : TGUID = '{B957528D-3BE1-412D-A35E-801C97CCD252}';
   IsrvContabilidad_IID : TGUID = '{04CDF2E1-EFC2-4247-AA4F-09BE782C73FA}';
   IsrvUnidadesMedida_IID : TGUID = '{C1B36FAB-7514-40D2-A20C-04A86C9E71AB}';
+  IsrvComisiones_IID : TGUID = '{B600E9A1-28EC-484E-A74D-B5BB96FDF20A}';
 
   { Event ID's }
 
@@ -80,6 +81,7 @@ type
   IsrvReferencias = interface;
   IsrvContabilidad = interface;
   IsrvUnidadesMedida = interface;
+  IsrvComisiones = interface;
 
   TRdxEmpresasArray = class;
 
@@ -160,7 +162,6 @@ type
   { IsrvContactos }
   IsrvContactos = interface(IDataAbstractService)
     ['{28CCDC07-A3A4-4917-89B4-64423DC70C9D}']
-    function GenerateFichaEmpleadoReport(const EmpleadoID: String): Binary;
     function GenerateEtiquetasReport(const ContactosID: String): Binary;
   end;
 
@@ -174,7 +175,6 @@ type
   protected
     function __GetInterfaceName:string; override;
 
-    function GenerateFichaEmpleadoReport(const EmpleadoID: String): Binary;
     function GenerateEtiquetasReport(const ContactosID: String): Binary;
   end;
 
@@ -325,6 +325,7 @@ type
   { IsrvUsuarios }
   IsrvUsuarios = interface(IDataAbstractService)
     ['{29388459-1A0B-46BE-AF9E-66A9E7AABB0B}']
+    procedure darIDTiendaVendedorUsuario(const ID_USUARIO: Integer; var AIdTienda: Integer; var ATienda: String);
   end;
 
   { CosrvUsuarios }
@@ -337,6 +338,7 @@ type
   protected
     function __GetInterfaceName:string; override;
 
+    procedure darIDTiendaVendedorUsuario(const ID_USUARIO: Integer; var AIdTienda: Integer; var ATienda: String);
   end;
 
   { IsrvAlmacenes }
@@ -650,6 +652,25 @@ type
 
   end;
 
+  { IsrvComisiones }
+  IsrvComisiones = interface(IDataAbstractService)
+    ['{B600E9A1-28EC-484E-A74D-B5BB96FDF20A}']
+    function GenerateReport(const ComisionID: String): Binary;
+  end;
+
+  { CosrvComisiones }
+  CosrvComisiones = class
+    class function Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): IsrvComisiones;
+  end;
+
+  { TsrvComisiones_Proxy }
+  TsrvComisiones_Proxy = class(TDataAbstractService_Proxy, IsrvComisiones)
+  protected
+    function __GetInterfaceName:string; override;
+
+    function GenerateReport(const ComisionID: String): Binary;
+  end;
+
 implementation
 
 uses
@@ -939,23 +960,6 @@ begin
   result := 'srvContactos';
 end;
 
-function TsrvContactos_Proxy.GenerateFichaEmpleadoReport(const EmpleadoID: String): Binary;
-begin
-  try
-    result := nil;
-    __Message.InitializeRequestMessage(__TransportChannel, 'FactuGES', __InterfaceName, 'GenerateFichaEmpleadoReport');
-    __Message.Write('EmpleadoID', TypeInfo(String), EmpleadoID, []);
-    __Message.Finalize;
-
-    __TransportChannel.Dispatch(__Message);
-
-    __Message.Read('Result', TypeInfo(Binary), result, []);
-  finally
-    __Message.UnsetAttributes(__TransportChannel);
-    __Message.FreeStream;
-  end
-end;
-
 function TsrvContactos_Proxy.GenerateEtiquetasReport(const ContactosID: String): Binary;
 begin
   try
@@ -1143,11 +1147,32 @@ begin
   result := TsrvUsuarios_Proxy.Create(aMessage, aTransportChannel);
 end;
 
+{ TsrvUsuarios_Proxy }
+
 function TsrvUsuarios_Proxy.__GetInterfaceName:string;
 begin
   result := 'srvUsuarios';
 end;
 
+procedure TsrvUsuarios_Proxy.darIDTiendaVendedorUsuario(const ID_USUARIO: Integer; var AIdTienda: Integer; var ATienda: String);
+begin
+  try
+    __Message.InitializeRequestMessage(__TransportChannel, 'FactuGES', __InterfaceName, 'darIDTiendaVendedorUsuario');
+    __Message.Write('ID_USUARIO', TypeInfo(Integer), ID_USUARIO, []);
+    __Message.Write('AIdTienda', TypeInfo(Integer), AIdTienda, []);
+    __Message.Write('ATienda', TypeInfo(String), ATienda, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('AIdTienda', TypeInfo(Integer), AIdTienda, []);
+    __Message.Read('ATienda', TypeInfo(String), ATienda, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
 { CosrvAlmacenes }
 
 class function CosrvAlmacenes.Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): IsrvAlmacenes;
@@ -1679,6 +1704,37 @@ begin
   result := 'srvUnidadesMedida';
 end;
 
+{ CosrvComisiones }
+
+class function CosrvComisiones.Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): IsrvComisiones;
+begin
+  result := TsrvComisiones_Proxy.Create(aMessage, aTransportChannel);
+end;
+
+{ TsrvComisiones_Proxy }
+
+function TsrvComisiones_Proxy.__GetInterfaceName:string;
+begin
+  result := 'srvComisiones';
+end;
+
+function TsrvComisiones_Proxy.GenerateReport(const ComisionID: String): Binary;
+begin
+  try
+    result := nil;
+    __Message.InitializeRequestMessage(__TransportChannel, 'FactuGES', __InterfaceName, 'GenerateReport');
+    __Message.Write('ComisionID', TypeInfo(String), ComisionID, []);
+    __Message.Finalize;
+
+    __TransportChannel.Dispatch(__Message);
+
+    __Message.Read('Result', TypeInfo(Binary), result, []);
+  finally
+    __Message.UnsetAttributes(__TransportChannel);
+    __Message.FreeStream;
+  end
+end;
+
 initialization
   RegisterROClass(TRdxLoginInfo);
   RegisterROClass(TRdxEmpresasArray);
@@ -1708,6 +1764,7 @@ initialization
   RegisterProxyClass(IsrvReferencias_IID, TsrvReferencias_Proxy);
   RegisterProxyClass(IsrvContabilidad_IID, TsrvContabilidad_Proxy);
   RegisterProxyClass(IsrvUnidadesMedida_IID, TsrvUnidadesMedida_Proxy);
+  RegisterProxyClass(IsrvComisiones_IID, TsrvComisiones_Proxy);
 
 
 finalization
@@ -1739,5 +1796,6 @@ finalization
   UnregisterProxyClass(IsrvReferencias_IID);
   UnregisterProxyClass(IsrvContabilidad_IID);
   UnregisterProxyClass(IsrvUnidadesMedida_IID);
+  UnregisterProxyClass(IsrvComisiones_IID);
 
 end.
diff --git a/Source/Servicios/FactuGES_Invk.pas b/Source/Servicios/FactuGES_Invk.pas
index 413973eb..fbf9e82b 100644
--- a/Source/Servicios/FactuGES_Invk.pas
+++ b/Source/Servicios/FactuGES_Invk.pas
@@ -24,7 +24,6 @@ type
   private
   protected
   published
-    procedure Invoke_GenerateFichaEmpleadoReport(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
     procedure Invoke_GenerateEtiquetasReport(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
   end;
 
@@ -84,6 +83,7 @@ type
   private
   protected
   published
+    procedure Invoke_darIDTiendaVendedorUsuario(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
   end;
 
   TsrvAlmacenes_Invoker = class(TDataAbstractService_Invoker)
@@ -200,6 +200,13 @@ type
   published
   end;
 
+  TsrvComisiones_Invoker = class(TDataAbstractService_Invoker)
+  private
+  protected
+  published
+    procedure Invoke_GenerateReport(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+  end;
+
 implementation
 
 uses
@@ -207,34 +214,6 @@ uses
 
 { TsrvContactos_Invoker }
 
-procedure TsrvContactos_Invoker.Invoke_GenerateFichaEmpleadoReport(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
-{ function GenerateFichaEmpleadoReport(const EmpleadoID: String): Binary; }
-var
-  EmpleadoID: String;
-  lResult: Binary;
-  __lObjectDisposer: TROObjectDisposer;
-begin
-  lResult := nil;
-  try
-    __Message.Read('EmpleadoID', TypeInfo(String), EmpleadoID, []);
-
-    lResult := (__Instance as IsrvContactos).GenerateFichaEmpleadoReport(EmpleadoID);
-
-    __Message.InitializeResponseMessage(__Transport, 'FactuGES', 'srvContactos', 'GenerateFichaEmpleadoReportResponse');
-    __Message.Write('Result', TypeInfo(Binary), lResult, []);
-    __Message.Finalize;
-    __Message.UnsetAttributes(__Transport);
-
-  finally
-    __lObjectDisposer := TROObjectDisposer.Create(__Instance);
-    try
-      __lObjectDisposer.Add(lResult);
-    finally
-      __lObjectDisposer.Free();
-    end;
-  end;
-end;
-
 procedure TsrvContactos_Invoker.Invoke_GenerateEtiquetasReport(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
 { function GenerateEtiquetasReport(const ContactosID: String): Binary; }
 var
@@ -351,6 +330,32 @@ begin
   end;
 end;
 
+{ TsrvUsuarios_Invoker }
+
+procedure TsrvUsuarios_Invoker.Invoke_darIDTiendaVendedorUsuario(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ procedure darIDTiendaVendedorUsuario(const ID_USUARIO: Integer; var AIdTienda: Integer; var ATienda: String); }
+var
+  ID_USUARIO: Integer;
+  AIdTienda: Integer;
+  ATienda: String;
+begin
+  try
+    __Message.Read('ID_USUARIO', TypeInfo(Integer), ID_USUARIO, []);
+    __Message.Read('AIdTienda', TypeInfo(Integer), AIdTienda, []);
+    __Message.Read('ATienda', TypeInfo(String), ATienda, []);
+
+    (__Instance as IsrvUsuarios).darIDTiendaVendedorUsuario(ID_USUARIO, AIdTienda, ATienda);
+
+    __Message.InitializeResponseMessage(__Transport, 'FactuGES', 'srvUsuarios', 'darIDTiendaVendedorUsuarioResponse');
+    __Message.Write('AIdTienda', TypeInfo(Integer), AIdTienda, []);
+    __Message.Write('ATienda', TypeInfo(String), ATienda, []);
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+
+  finally
+  end;
+end;
+
 { TsrvRecibosCliente_Invoker }
 
 procedure TsrvRecibosCliente_Invoker.Invoke_GenerateReport(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
@@ -853,5 +858,35 @@ begin
   end;
 end;
 
+{ TsrvComisiones_Invoker }
+
+procedure TsrvComisiones_Invoker.Invoke_GenerateReport(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
+{ function GenerateReport(const ComisionID: String): Binary; }
+var
+  ComisionID: String;
+  lResult: Binary;
+  __lObjectDisposer: TROObjectDisposer;
+begin
+  lResult := nil;
+  try
+    __Message.Read('ComisionID', TypeInfo(String), ComisionID, []);
+
+    lResult := (__Instance as IsrvComisiones).GenerateReport(ComisionID);
+
+    __Message.InitializeResponseMessage(__Transport, 'FactuGES', 'srvComisiones', 'GenerateReportResponse');
+    __Message.Write('Result', TypeInfo(Binary), lResult, []);
+    __Message.Finalize;
+    __Message.UnsetAttributes(__Transport);
+
+  finally
+    __lObjectDisposer := TROObjectDisposer.Create(__Instance);
+    try
+      __lObjectDisposer.Add(lResult);
+    finally
+      __lObjectDisposer.Free();
+    end;
+  end;
+end;
+
 initialization
 end.
diff --git a/Source/Servicios/RODLFILE.res b/Source/Servicios/RODLFILE.res
index bbf8d508..e14dcc08 100644
Binary files a/Source/Servicios/RODLFILE.res and b/Source/Servicios/RODLFILE.res differ