Primera subida de módulo nuevo de facturas proforma

git-svn-id: https://192.168.0.254/svn/Proyectos.LuisLeon_FactuGES2/trunk@197 b2cfbe5a-eba1-4a0c-8b32-7feea0a119f2
This commit is contained in:
roberto 2013-12-02 18:23:44 +00:00
parent 4dbb372f0c
commit 5babc1f3e7
203 changed files with 34123 additions and 1039 deletions

Binary file not shown.

View File

@ -127,6 +127,9 @@ SET GENERATOR GEN_CLIENTES_DTOS_ART_ID TO 1;
CREATE GENERATOR GEN_CLIENTES_GRUPOS_ID;
SET GENERATOR GEN_CLIENTES_GRUPOS_ID TO 1;
CREATE GENERATOR GEN_CLIENTES_TIPOS_ID;
SET GENERATOR GEN_CLIENTES_TIPOS_ID TO 1;
CREATE GENERATOR GEN_COMISIONES_LIQUID_ID;
SET GENERATOR GEN_COMISIONES_LIQUID_ID TO 1;
@ -157,9 +160,6 @@ SET GENERATOR GEN_EMPRESAS_DATOS_BANCO_ID TO 1;
CREATE GENERATOR GEN_EMPRESAS_ID;
SET GENERATOR GEN_EMPRESAS_ID TO 1;
CREATE GENERATOR GEN_EMPRESAS_USUARIOS_ID;
SET GENERATOR GEN_EMPRESAS_USUARIOS_ID TO 1;
CREATE GENERATOR GEN_FABRICANTES_ID;
SET GENERATOR GEN_FABRICANTES_ID TO 1;
@ -509,7 +509,8 @@ CREATE TABLE CLIENTES_DATOS (
VENCIMIENTO_FACTURAS_1 SMALLINT,
VENCIMIENTO_FACTURAS_2 SMALLINT,
VENCIMIENTO_FACTURAS_3 SMALLINT,
FELICITACION TIPO_BOOLEANO
FELICITACION TIPO_BOOLEANO,
TIPO_CLIENTE VARCHAR(255) COLLATE ES_ES
);
CREATE TABLE CLIENTES_DTOS_PROVEEDORES (
@ -531,6 +532,11 @@ CREATE TABLE CLIENTES_GRUPOS (
DESCRIPCION VARCHAR(255)
);
CREATE TABLE CLIENTES_TIPOS (
ID TIPO_ID NOT NULL,
DESCRIPCION VARCHAR(255)
);
CREATE TABLE COMISIONES_LIQUIDADAS (
ID TIPO_ID NOT NULL,
ID_EMPRESA TIPO_ID,
@ -701,12 +707,6 @@ CREATE TABLE EMPRESAS_DATOS_BANCO (
SWIFT VARCHAR(255) COLLATE ES_ES
);
CREATE TABLE EMPRESAS_USUARIOS (
ID TIPO_ID NOT NULL,
ID_EMPRESA TIPO_ID NOT NULL,
ID_USUARIO TIPO_ID NOT NULL
);
CREATE TABLE FABRICANTES (
ID TIPO_ID NOT NULL,
DESCRIPCION VARCHAR(255)
@ -1308,6 +1308,44 @@ CREATE TABLE AGENTES_OBJETIVOS_FAC (
/**** Views ****/
/******************************************************************************/
CREATE VIEW V_EMPRESAS(
ID,
NIF_CIF,
NOMBRE,
RAZON_SOCIAL,
CALLE,
POBLACION,
PROVINCIA,
CODIGO_POSTAL,
TELEFONO_1,
TELEFONO_2,
MOVIL_1,
MOVIL_2,
FAX,
EMAIL_1,
EMAIL_2,
PAGINA_WEB,
NOTAS,
FECHA_ALTA,
FECHA_MODIFICACION,
USUARIO,
LOGOTIPO,
REGISTRO_MERCANTIL,
PARAM_TIEMPO,
PARAM_MARGEN,
ID_TIPO_IVA,
ID_FORMA_PAGO,
ID_ALMACEN,
ID_PERFIL)
AS
select E.ID, E.NIF_CIF, E.NOMBRE, E.RAZON_SOCIAL, E.CALLE, E.POBLACION,
E.PROVINCIA, E.CODIGO_POSTAL, E.TELEFONO_1, E.TELEFONO_2, E.MOVIL_1, E.MOVIL_2,
E.FAX, E.EMAIL_1, E.EMAIL_2, E.PAGINA_WEB, E.NOTAS, E.FECHA_ALTA, E.FECHA_MODIFICACION,
E.USUARIO, E.LOGOTIPO, E.REGISTRO_MERCANTIL, E.PARAM_TIEMPO, E.PARAM_MARGEN, E.ID_TIPO_IVA,
E.ID_FORMA_PAGO, E.ID_ALMACEN, EP.id_perfil
from empresas E
left join empresas_PERFILES EP on (EP.ID_EMPRESA = E.ID)
;
/* View: V_ALB_CLI_SITUACION */
CREATE VIEW V_ALB_CLI_SITUACION(
@ -1915,7 +1953,6 @@ FROM CONTACTOS
/* View: V_CLIENTES */
/* View: V_CLIENTES */
CREATE VIEW V_CLIENTES(
ID,
@ -1939,7 +1976,7 @@ CREATE VIEW V_CLIENTES(
FECHA_ALTA,
FECHA_MODIFICACION,
USUARIO,
ID_EMPRESA,
ID_EMPRESA,
REFERENCIA,
ID_AGENTE,
GRUPO_CLIENTE,
@ -1950,7 +1987,7 @@ CREATE VIEW V_CLIENTES(
BLOQUEADO,
AGENTE,
RAPEL,
EMAIL_ADMINISTRACION,
EMAIL_ADMINISTRACION,
REGIMEN_IVA,
MOTIVO_BLOQUEO,
RECARGO_EQUIVALENCIA,
@ -1959,7 +1996,8 @@ CREATE VIEW V_CLIENTES(
TIENDA_WEB,
CODIGO_ASIGNADO,
DESCUENTO,
FELICITACION)
FELICITACION,
TIPO_CLIENTE)
AS
SELECT
V_CONTACTOS.ID,
@ -2003,7 +2041,8 @@ SELECT
CLIENTES_DATOS.TIENDA_WEB,
CLIENTES_DATOS.CODIGO_ASIGNADO,
CLIENTES_DATOS.DESCUENTO,
CLIENTES_DATOS.FELICITACION
CLIENTES_DATOS.FELICITACION,
CLIENTES_DATOS.TIPO_CLIENTE
FROM
V_CONTACTOS
LEFT OUTER JOIN CLIENTES_DATOS ON (V_CONTACTOS.ID = CLIENTES_DATOS.ID_CLIENTE)
@ -5027,6 +5066,7 @@ ALTER TABLE CLIENTES_DATOS ADD CONSTRAINT PK_CLIENTES_DATOS PRIMARY KEY (ID_CLIE
ALTER TABLE CLIENTES_DTOS_PROVEEDORES ADD CONSTRAINT PK_CLIENTES_DTOS_PROV PRIMARY KEY (ID);
ALTER TABLE CLIENTES_DTOS_ARTICULOS ADD CONSTRAINT PK_CLIENTES_DTOS_ART PRIMARY KEY (ID);
ALTER TABLE CLIENTES_GRUPOS ADD CONSTRAINT PK_CLIENTES_GRUPOS PRIMARY KEY (ID);
ALTER TABLE CLIENTES_TIPOS ADD CONSTRAINT PK_CLIENTES_TIPOS PRIMARY KEY (ID);
ALTER TABLE COMISIONES_LIQUIDADAS ADD CONSTRAINT PK_COMISIONES_LIQUIDADAS PRIMARY KEY (ID);
ALTER TABLE CONFIGURACION ADD CONSTRAINT PK_CONFIGURACION PRIMARY KEY (ID);
ALTER TABLE CONTACTOS ADD CONSTRAINT PK_CONTACTOS PRIMARY KEY (ID);
@ -5040,7 +5080,6 @@ ALTER TABLE EMPLEADOS_GRUPOS ADD CONSTRAINT PK_EMPLEADOS_GRUPOS PRIMARY KEY (ID)
ALTER TABLE EMPRESAS ADD CONSTRAINT PK_EMPRESAS PRIMARY KEY (ID);
ALTER TABLE EMPRESAS_CONTACTOS ADD CONSTRAINT PK_EMPRESAS_CONTACTOS PRIMARY KEY (ID);
ALTER TABLE EMPRESAS_DATOS_BANCO ADD CONSTRAINT PK_EMPRESAS_DATOS_BANCO PRIMARY KEY (ID);
ALTER TABLE EMPRESAS_USUARIOS ADD CONSTRAINT PK_EMPRESAS_USUARIOS PRIMARY KEY (ID);
ALTER TABLE FABRICANTES ADD PRIMARY KEY (ID);
ALTER TABLE FACTURAS_CLIENTE ADD CONSTRAINT PK_FACTURAS_CLIENTE PRIMARY KEY (ID);
ALTER TABLE FACTURAS_CLIENTE_DETALLES ADD CONSTRAINT PK_FACTURAS_CLIENTE_DETALLES PRIMARY KEY (ID);
@ -5170,7 +5209,6 @@ CREATE INDEX IDX_CONTACTOS_DATOS_BANCO ON CONTACTOS_DATOS_BANCO (ID_CONTACTO);
CREATE INDEX IDX_CONTACTOS_PER_ID_CONTACTO ON CONTACTOS_DATOS_PERSONAL (ID_CONTACTO);
CREATE INDEX IDX_CONTACTOS_DIR_ID_CONTACTO ON CONTACTOS_DIRECCIONES (ID_CONTACTO);
CREATE INDEX IDX_EMPRESAS_CONTACTOS ON EMPRESAS_CONTACTOS (ID_EMPRESA, ID_CONTACTO);
CREATE INDEX IDX_EMPRESAS_USUARIOS ON EMPRESAS_USUARIOS (ID_EMPRESA, ID_USUARIO);
CREATE INDEX IDX_FACTURAS_CLIENTE ON FACTURAS_CLIENTE (ID_FORMA_PAGO);
CREATE INDEX IDX_FACTURAS_CLIENTE1 ON FACTURAS_CLIENTE (ID_TIPO_IVA);
CREATE INDEX IDX_FACTURAS_CLIENTE2 ON FACTURAS_CLIENTE (ID_COMISION_LIQUIDADA);

View File

@ -2,6 +2,10 @@ SET SQL DIALECT 3;
SET NAMES UTF8;
INSERT INTO PERFILES (ID, DESCRIPCION) VALUES (1, 'usuario');
INSERT INTO PERFILES (ID, DESCRIPCION) VALUES (2, 'administrador');
COMMIT WORK;
INSERT INTO PERIODOS_AUX (ID, PERIODO, VALOR, DESCRIPCION) VALUES (1, 'MENSUAL', 1, 'Ene');
INSERT INTO PERIODOS_AUX (ID, PERIODO, VALOR, DESCRIPCION) VALUES (2, 'MENSUAL', 2, 'Feb');
INSERT INTO PERIODOS_AUX (ID, PERIODO, VALOR, DESCRIPCION) VALUES (3, 'MENSUAL', 3, 'Mar');

View File

@ -11,7 +11,8 @@ type
IEmpresasController = interface(IControllerBase)
['{2F0AB21C-4F19-446E-87C4-B9C1038850FC}']
function Buscar(const ID: Integer): IBizEmpresa;
function BuscarTodos: IBizEmpresa;
function BuscarTodos: IBizEmpresa; overload;
function BuscarTodos(const ID_PERFIL: Integer): IBizEmpresa; overload;
procedure Ver(AEmpresa : IBizEmpresa);
procedure VerTodos(AEmpresas: IBizEmpresa);
function Nuevo : IBizEmpresa;
@ -49,7 +50,8 @@ type
procedure Anadir(AEmpresa : IBizEmpresa); virtual;
function Buscar(const ID: Integer): IBizEmpresa; virtual;
function BuscarTodos: IBizEmpresa; virtual;
function BuscarTodos: IBizEmpresa; overload; virtual;
function BuscarTodos(const ID_PERFIL: Integer): IBizEmpresa; overload;
function Nuevo : IBizEmpresa; virtual;
procedure Ver(AEmpresa : IBizEmpresa); virtual;
procedure VerTodos(AEmpresas: IBizEmpresa); virtual;
@ -68,8 +70,8 @@ type
implementation
uses
uEditorRegistryUtils, cxControls, DB, uFactuGES_App, uStringsUtils,
uDataModuleEmpresas, uIEditorEmpresa, uBizEmpresasDatosBancarios;
uDAInterfaces, uEditorRegistryUtils, cxControls, DB, uFactuGES_App, uStringsUtils,
uDataModuleEmpresas, uIEditorEmpresa, uBizEmpresasDatosBancarios, schEmpresasClient_Intf;
{ TEmpresasController }
@ -133,6 +135,30 @@ begin
Result := FDataModule.GetItem(ID)
end;
function TEmpresasController.BuscarTodos(const ID_PERFIL: Integer): IBizEmpresa;
var
Condicion: TDAWhereExpression;
begin
ShowHourglassCursor;
try
Result := BuscarTodos;
with Result.DataTable.DynamicWhere do
begin
// ID_PERFIL
Condicion := NewBinaryExpression(NewField('', fld_EmpresasID_PERFIL), NewConstant(ID_PERFIL, datInteger), dboEqual);
if IsEmpty then
Expression := Condicion
else
Expression := NewBinaryExpression(Expression, Condicion, dboAnd);
end;
Result.open;
finally
HideHourglassCursor;
end;
end;
function TEmpresasController.BuscarTodos: IBizEmpresa;
begin
Result := FDataModule.GetItems;

View File

@ -207,6 +207,10 @@ inherited DataModuleEmpresas: TDataModuleEmpresas
DataType = datSmallInt
DisplayLabel = 'Empresas_ID_ALMACEN'
DictionaryEntry = 'Empresas_ID_ALMACEN'
end
item
Name = 'ID_PERFIL'
DataType = datInteger
end>
Params = <>
StreamingOptions = [soDisableEventsWhileStreaming]

View File

@ -9,8 +9,8 @@ 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_Empresas = '{88621D33-852A-4B38-8FFB-0894C98719CA}';
RID_EmpresasDatosBanco = '{E2ABA941-53D7-41CD-9755-CCBD66A72247}';
RID_Empresas = '{293CB9A8-A5CC-4A9C-80D0-74E9DC888BD8}';
RID_EmpresasDatosBanco = '{DA3363E9-7834-447F-8266-B7410A41CEDB}';
{ Data table names }
nme_Empresas = 'Empresas';
@ -44,6 +44,7 @@ const
fld_EmpresasID_TIPO_IVA = 'ID_TIPO_IVA';
fld_EmpresasID_FORMA_PAGO = 'ID_FORMA_PAGO';
fld_EmpresasID_ALMACEN = 'ID_ALMACEN';
fld_EmpresasID_PERFIL = 'ID_PERFIL';
{ Empresas field indexes }
idx_EmpresasID = 0;
@ -73,6 +74,7 @@ const
idx_EmpresasID_TIPO_IVA = 24;
idx_EmpresasID_FORMA_PAGO = 25;
idx_EmpresasID_ALMACEN = 26;
idx_EmpresasID_PERFIL = 27;
{ EmpresasDatosBanco fields }
fld_EmpresasDatosBancoID = 'ID';
@ -103,7 +105,7 @@ const
type
{ IEmpresas }
IEmpresas = interface(IDAStronglyTypedDataTable)
['{50BEAD2C-AEF9-4858-AF21-E427E1B39CC6}']
['{A0B6BA3C-6931-4E7C-94B1-4E916B0F6E1D}']
{ Property getters and setters }
function GetIDValue: Integer;
procedure SetIDValue(const aValue: Integer);
@ -211,6 +213,10 @@ type
procedure SetID_ALMACENValue(const aValue: SmallInt);
function GetID_ALMACENIsNull: Boolean;
procedure SetID_ALMACENIsNull(const aValue: Boolean);
function GetID_PERFILValue: Integer;
procedure SetID_PERFILValue(const aValue: Integer);
function GetID_PERFILIsNull: Boolean;
procedure SetID_PERFILIsNull(const aValue: Boolean);
{ Properties }
@ -268,6 +274,8 @@ type
property ID_FORMA_PAGOIsNull: Boolean read GetID_FORMA_PAGOIsNull write SetID_FORMA_PAGOIsNull;
property ID_ALMACEN: SmallInt read GetID_ALMACENValue write SetID_ALMACENValue;
property ID_ALMACENIsNull: Boolean read GetID_ALMACENIsNull write SetID_ALMACENIsNull;
property ID_PERFIL: Integer read GetID_PERFILValue write SetID_PERFILValue;
property ID_PERFILIsNull: Boolean read GetID_PERFILIsNull write SetID_PERFILIsNull;
end;
{ TEmpresasDataTableRules }
@ -385,6 +393,10 @@ type
procedure SetID_ALMACENValue(const aValue: SmallInt); virtual;
function GetID_ALMACENIsNull: Boolean; virtual;
procedure SetID_ALMACENIsNull(const aValue: Boolean); virtual;
function GetID_PERFILValue: Integer; virtual;
procedure SetID_PERFILValue(const aValue: Integer); virtual;
function GetID_PERFILIsNull: Boolean; virtual;
procedure SetID_PERFILIsNull(const aValue: Boolean); virtual;
{ Properties }
property ID: Integer read GetIDValue write SetIDValue;
@ -441,6 +453,8 @@ type
property ID_FORMA_PAGOIsNull: Boolean read GetID_FORMA_PAGOIsNull write SetID_FORMA_PAGOIsNull;
property ID_ALMACEN: SmallInt read GetID_ALMACENValue write SetID_ALMACENValue;
property ID_ALMACENIsNull: Boolean read GetID_ALMACENIsNull write SetID_ALMACENIsNull;
property ID_PERFIL: Integer read GetID_PERFILValue write SetID_PERFILValue;
property ID_PERFILIsNull: Boolean read GetID_PERFILIsNull write SetID_PERFILIsNull;
public
constructor Create(aDataTable: TDADataTable); override;
@ -450,7 +464,7 @@ type
{ IEmpresasDatosBanco }
IEmpresasDatosBanco = interface(IDAStronglyTypedDataTable)
['{092FC338-3912-4550-982D-89A97A0ACFDD}']
['{AB33F3C2-E3BB-41C1-AC47-543080C0A67B}']
{ Property getters and setters }
function GetIDValue: Integer;
procedure SetIDValue(const aValue: Integer);
@ -1202,6 +1216,27 @@ begin
DataTable.Fields[idx_EmpresasID_ALMACEN].AsVariant := Null;
end;
function TEmpresasDataTableRules.GetID_PERFILValue: Integer;
begin
result := DataTable.Fields[idx_EmpresasID_PERFIL].AsInteger;
end;
procedure TEmpresasDataTableRules.SetID_PERFILValue(const aValue: Integer);
begin
DataTable.Fields[idx_EmpresasID_PERFIL].AsInteger := aValue;
end;
function TEmpresasDataTableRules.GetID_PERFILIsNull: boolean;
begin
result := DataTable.Fields[idx_EmpresasID_PERFIL].IsNull;
end;
procedure TEmpresasDataTableRules.SetID_PERFILIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_EmpresasID_PERFIL].AsVariant := Null;
end;
{ TEmpresasDatosBancoDataTableRules }
constructor TEmpresasDatosBancoDataTableRules.Create(aDataTable: TDADataTable);

View File

@ -9,13 +9,13 @@ 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_EmpresasDelta = '{43119B6A-7006-4045-B378-1516B8CA32E1}';
RID_EmpresasDatosBancoDelta = '{A79108BB-E362-4338-9188-6D5683DCE289}';
RID_EmpresasDelta = '{78465C96-13EC-4CAE-806F-50EFEE766C85}';
RID_EmpresasDatosBancoDelta = '{E4194A47-772D-40BC-8DF0-9D4C7AFDEC77}';
type
{ IEmpresasDelta }
IEmpresasDelta = interface(IEmpresas)
['{43119B6A-7006-4045-B378-1516B8CA32E1}']
['{78465C96-13EC-4CAE-806F-50EFEE766C85}']
{ Property getters and setters }
function GetOldIDValue : Integer;
function GetOldNIF_CIFValue : String;
@ -44,6 +44,7 @@ type
function GetOldID_TIPO_IVAValue : SmallInt;
function GetOldID_FORMA_PAGOValue : SmallInt;
function GetOldID_ALMACENValue : SmallInt;
function GetOldID_PERFILValue : Integer;
{ Properties }
property OldID : Integer read GetOldIDValue;
@ -73,6 +74,7 @@ type
property OldID_TIPO_IVA : SmallInt read GetOldID_TIPO_IVAValue;
property OldID_FORMA_PAGO : SmallInt read GetOldID_FORMA_PAGOValue;
property OldID_ALMACEN : SmallInt read GetOldID_ALMACENValue;
property OldID_PERFIL : Integer read GetOldID_PERFILValue;
end;
{ TEmpresasBusinessProcessorRules }
@ -244,6 +246,12 @@ type
function GetOldID_ALMACENIsNull: Boolean; virtual;
procedure SetID_ALMACENValue(const aValue: SmallInt); virtual;
procedure SetID_ALMACENIsNull(const aValue: Boolean); virtual;
function GetID_PERFILValue: Integer; virtual;
function GetID_PERFILIsNull: Boolean; virtual;
function GetOldID_PERFILValue: Integer; virtual;
function GetOldID_PERFILIsNull: Boolean; virtual;
procedure SetID_PERFILValue(const aValue: Integer); virtual;
procedure SetID_PERFILIsNull(const aValue: Boolean); virtual;
{ Properties }
property ID : Integer read GetIDValue write SetIDValue;
@ -354,6 +362,10 @@ type
property ID_ALMACENIsNull : Boolean read GetID_ALMACENIsNull write SetID_ALMACENIsNull;
property OldID_ALMACEN : SmallInt read GetOldID_ALMACENValue;
property OldID_ALMACENIsNull : Boolean read GetOldID_ALMACENIsNull;
property ID_PERFIL : Integer read GetID_PERFILValue write SetID_PERFILValue;
property ID_PERFILIsNull : Boolean read GetID_PERFILIsNull write SetID_PERFILIsNull;
property OldID_PERFIL : Integer read GetOldID_PERFILValue;
property OldID_PERFILIsNull : Boolean read GetOldID_PERFILIsNull;
public
constructor Create(aBusinessProcessor: TDABusinessProcessor); override;
@ -363,7 +375,7 @@ type
{ IEmpresasDatosBancoDelta }
IEmpresasDatosBancoDelta = interface(IEmpresasDatosBanco)
['{A79108BB-E362-4338-9188-6D5683DCE289}']
['{E4194A47-772D-40BC-8DF0-9D4C7AFDEC77}']
{ Property getters and setters }
function GetOldIDValue : Integer;
function GetOldID_EMPRESAValue : Integer;
@ -1387,6 +1399,37 @@ begin
BusinessProcessor.CurrentChange.NewValueByName[fld_EmpresasID_ALMACEN] := Null;
end;
function TEmpresasBusinessProcessorRules.GetID_PERFILValue: Integer;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_EmpresasID_PERFIL];
end;
function TEmpresasBusinessProcessorRules.GetID_PERFILIsNull: Boolean;
begin
result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_EmpresasID_PERFIL]);
end;
function TEmpresasBusinessProcessorRules.GetOldID_PERFILValue: Integer;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_EmpresasID_PERFIL];
end;
function TEmpresasBusinessProcessorRules.GetOldID_PERFILIsNull: Boolean;
begin
result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_EmpresasID_PERFIL]);
end;
procedure TEmpresasBusinessProcessorRules.SetID_PERFILValue(const aValue: Integer);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_EmpresasID_PERFIL] := aValue;
end;
procedure TEmpresasBusinessProcessorRules.SetID_PERFILIsNull(const aValue: Boolean);
begin
if aValue then
BusinessProcessor.CurrentChange.NewValueByName[fld_EmpresasID_PERFIL] := Null;
end;
{ TEmpresasDatosBancoBusinessProcessorRules }
constructor TEmpresasDatosBancoBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);

View File

@ -21,7 +21,7 @@ object srvEmpresas: TsrvEmpresas
item
Connection = 'IBX'
Default = True
TargetTable = 'EMPRESAS'
TargetTable = 'V_EMPRESAS'
Name = 'IBX'
StatementType = stAutoSQL
ColumnMappings = <
@ -132,6 +132,10 @@ object srvEmpresas: TsrvEmpresas
item
DatasetField = 'ID_ALMACEN'
TableField = 'ID_ALMACEN'
end
item
DatasetField = 'ID_PERFIL'
TableField = 'ID_PERFIL'
end>
end>
Name = 'Empresas'
@ -291,6 +295,10 @@ object srvEmpresas: TsrvEmpresas
Name = 'ID_ALMACEN'
DataType = datSmallInt
DictionaryEntry = 'Empresas_ID_ALMACEN'
end
item
Name = 'ID_PERFIL'
DataType = datInteger
end>
end
item
@ -463,6 +471,380 @@ object srvEmpresas: TsrvEmpresas
ColumnMappings = <>
end>
Name = 'AnadirReferenciasEmpresa'
end
item
Params = <
item
Name = 'ID'
DataType = datAutoInc
GeneratorName = 'GEN_EMPRESAS_ID'
Value = ''
end
item
Name = 'NIF_CIF'
DataType = datString
Size = 15
Value = ''
end
item
Name = 'NOMBRE'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'RAZON_SOCIAL'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'CALLE'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'POBLACION'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'PROVINCIA'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'CODIGO_POSTAL'
DataType = datString
Size = 10
Value = ''
end
item
Name = 'TELEFONO_1'
DataType = datString
Size = 25
Value = ''
end
item
Name = 'TELEFONO_2'
DataType = datString
Size = 25
Value = ''
end
item
Name = 'MOVIL_1'
DataType = datString
Size = 25
Value = ''
end
item
Name = 'MOVIL_2'
DataType = datString
Size = 25
Value = ''
end
item
Name = 'FAX'
DataType = datString
Size = 25
Value = ''
end
item
Name = 'EMAIL_1'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'EMAIL_2'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'PAGINA_WEB'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'NOTAS'
DataType = datMemo
Value = ''
end
item
Name = 'FECHA_ALTA'
DataType = datDateTime
Value = ''
end
item
Name = 'FECHA_MODIFICACION'
DataType = datDateTime
Value = ''
end
item
Name = 'USUARIO'
DataType = datString
Size = 30
Value = ''
end
item
Name = 'LOGOTIPO'
DataType = datBlob
Value = ''
end
item
Name = 'REGISTRO_MERCANTIL'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'PARAM_TIEMPO'
DataType = datCurrency
Value = ''
end
item
Name = 'PARAM_MARGEN'
DataType = datFloat
Value = ''
end
item
Name = 'ID_TIPO_IVA'
DataType = datSmallInt
Value = ''
end
item
Name = 'ID_FORMA_PAGO'
DataType = datSmallInt
Value = ''
end
item
Name = 'ID_ALMACEN'
DataType = datSmallInt
Value = ''
end>
Statements = <
item
Connection = 'IBX'
Default = True
TargetTable = 'EMPRESAS'
SQL =
'INSERT'#10' INTO EMPRESAS'#10' (ID, NIF_CIF, NOMBRE, RAZON_SOCIAL, C' +
'ALLE, POBLACION, PROVINCIA,'#10' CODIGO_POSTAL, TELEFONO_1, TELE' +
'FONO_2, MOVIL_1, MOVIL_2, '#10' FAX, EMAIL_1, EMAIL_2, PAGINA_WE' +
'B, NOTAS, FECHA_ALTA, '#10' FECHA_MODIFICACION, USUARIO, LOGOTIP' +
'O, REGISTRO_MERCANTIL, '#10' PARAM_TIEMPO, PARAM_MARGEN, ID_TIPO' +
'_IVA, ID_FORMA_PAGO, '#10' ID_ALMACEN)'#10' VALUES'#10' (:ID, :NIF_C' +
'IF, :NOMBRE, :RAZON_SOCIAL, :CALLE, :POBLACION,'#10' :PROVINCIA,' +
' :CODIGO_POSTAL, :TELEFONO_1, :TELEFONO_2, '#10' :MOVIL_1, :MOVI' +
'L_2, :FAX, :EMAIL_1, :EMAIL_2, :PAGINA_WEB, '#10' :NOTAS, :FECHA' +
'_ALTA, :FECHA_MODIFICACION, :USUARIO, '#10' :LOGOTIPO, :REGISTRO' +
'_MERCANTIL, :PARAM_TIEMPO, :PARAM_MARGEN, '#10' :ID_TIPO_IVA, :I' +
'D_FORMA_PAGO, :ID_ALMACEN)'#10
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Insert_Empresas'
end
item
Params = <
item
Name = 'OLD_ID'
DataType = datAutoInc
Value = ''
end>
Statements = <
item
Connection = 'IBX'
Default = True
TargetTable = 'EMPRESAS'
SQL = 'DELETE '#10' FROM'#10' EMPRESAS'#10' WHERE'#10' (ID = :OLD_ID)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Delete_Empresas'
end
item
Params = <
item
Name = 'NIF_CIF'
DataType = datString
Size = 15
Value = ''
end
item
Name = 'NOMBRE'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'RAZON_SOCIAL'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'CALLE'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'POBLACION'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'PROVINCIA'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'CODIGO_POSTAL'
DataType = datString
Size = 10
Value = ''
end
item
Name = 'TELEFONO_1'
DataType = datString
Size = 25
Value = ''
end
item
Name = 'TELEFONO_2'
DataType = datString
Size = 25
Value = ''
end
item
Name = 'MOVIL_1'
DataType = datString
Size = 25
Value = ''
end
item
Name = 'MOVIL_2'
DataType = datString
Size = 25
Value = ''
end
item
Name = 'FAX'
DataType = datString
Size = 25
Value = ''
end
item
Name = 'EMAIL_1'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'EMAIL_2'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'PAGINA_WEB'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'NOTAS'
DataType = datMemo
Value = ''
end
item
Name = 'FECHA_ALTA'
DataType = datDateTime
Value = ''
end
item
Name = 'FECHA_MODIFICACION'
DataType = datDateTime
Value = ''
end
item
Name = 'USUARIO'
DataType = datString
Size = 30
Value = ''
end
item
Name = 'LOGOTIPO'
DataType = datBlob
Value = ''
end
item
Name = 'REGISTRO_MERCANTIL'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'PARAM_TIEMPO'
DataType = datCurrency
Value = ''
end
item
Name = 'PARAM_MARGEN'
DataType = datFloat
Value = ''
end
item
Name = 'ID_TIPO_IVA'
DataType = datSmallInt
Value = ''
end
item
Name = 'ID_FORMA_PAGO'
DataType = datSmallInt
Value = ''
end
item
Name = 'ID_ALMACEN'
DataType = datSmallInt
Value = ''
end
item
Name = 'OLD_ID'
DataType = datAutoInc
Value = ''
end>
Statements = <
item
Connection = 'IBX'
Default = True
TargetTable = 'EMPRESAS'
SQL =
'UPDATE EMPRESAS'#10' SET '#10' NIF_CIF = :NIF_CIF, '#10' NOMBRE = :NO' +
'MBRE, '#10' RAZON_SOCIAL = :RAZON_SOCIAL, '#10' CALLE = :CALLE, '#10' ' +
' POBLACION = :POBLACION, '#10' PROVINCIA = :PROVINCIA, '#10' COD' +
'IGO_POSTAL = :CODIGO_POSTAL, '#10' TELEFONO_1 = :TELEFONO_1, '#10' ' +
' TELEFONO_2 = :TELEFONO_2, '#10' MOVIL_1 = :MOVIL_1, '#10' MOVIL_2' +
' = :MOVIL_2, '#10' FAX = :FAX, '#10' EMAIL_1 = :EMAIL_1, '#10' EMAI' +
'L_2 = :EMAIL_2, '#10' PAGINA_WEB = :PAGINA_WEB, '#10' NOTAS = :NOT' +
'AS, '#10' FECHA_ALTA = :FECHA_ALTA, '#10' FECHA_MODIFICACION = :FE' +
'CHA_MODIFICACION, '#10' USUARIO = :USUARIO, '#10' LOGOTIPO = :LOGO' +
'TIPO, '#10' REGISTRO_MERCANTIL = :REGISTRO_MERCANTIL, '#10' PARAM_' +
'TIEMPO = :PARAM_TIEMPO, '#10' PARAM_MARGEN = :PARAM_MARGEN, '#10' ' +
'ID_TIPO_IVA = :ID_TIPO_IVA, '#10' ID_FORMA_PAGO = :ID_FORMA_PAGO,' +
' '#10' ID_ALMACEN = :ID_ALMACEN'#10' WHERE'#10' (ID = :OLD_ID)'
StatementType = stSQL
ColumnMappings = <>
end>
Name = 'Update_Empresas'
end>
RelationShips = <
item
@ -751,8 +1133,11 @@ object srvEmpresas: TsrvEmpresas
end
object bpEmpresas: TDABusinessProcessor
Schema = schEmpresas
InsertCommandName = 'Insert_Empresas'
DeleteCommandName = 'Delete_Empresas'
UpdateCommandName = 'Update_Empresas'
ReferencedDataset = 'Empresas'
ProcessorOptions = [poAutoGenerateInsert, poAutoGenerateUpdate, poAutoGenerateDelete, poAutoGenerateRefreshDataset, poPrepareCommands]
ProcessorOptions = [poAutoGenerateRefreshDataset]
UpdateMode = updWhereKeyOnly
Left = 264
Top = 24

View File

@ -1074,28 +1074,4 @@ object fEditorLogin: TfEditorLogin
Left = 344
Top = 64
end
object JvAppRegistryStorage1: TJvAppRegistryStorage
StorageOptions.BooleanStringTrueValues = 'TRUE, YES, Y'
StorageOptions.BooleanStringFalseValues = 'FALSE, NO, N'
StorageOptions.BooleanAsString = False
Root = 'Software\%APPL_NAME%'
SubStorages = <>
Left = 14
Top = 168
end
object JvFormStorage1: TJvFormStorage
AppStorage = JvAppRegistryStorage1
AppStoragePath = '\'
Options = []
StoredProps.Strings = (
'edtUser.Text'
'edtPassword.Text')
StoredValues = <
item
Name = 'Ruta'
Value = ''
end>
Left = 48
Top = 168
end
end

View File

@ -23,8 +23,6 @@ type
JvGradient1: TJvGradient;
Button1: TButton;
Timer1: TTimer;
JvAppRegistryStorage1: TJvAppRegistryStorage;
JvFormStorage1: TJvFormStorage;
Image1: TImage;
procedure bAceptarClick(Sender: TObject);
procedure ToolButton4Click(Sender: TObject);
@ -113,7 +111,7 @@ end;
procedure TfEditorLogin.FormShow(Sender: TObject);
begin
Self.Caption := AppFactuGES.AppFullName;
JvFormStorage1.RestoreFormPlacement;
// JvFormStorage1.RestoreFormPlacement; Que se meta usuario y contraseña siempre
// Hacer login automática si hay usuario/password y no hay más de una base
// de datos como opción para conectarse.

View File

@ -386,7 +386,7 @@ begin
//Añadimos las diferentes empresas que existan
AEmpresasController := TEmpresasController.Create;
AEmpresas := AEmpresasController.BuscarTodos;
AEmpresas := AEmpresasController.BuscarTodos(AppFactuGES.UsuarioActivo.ID_PERFIL);
AEmpresas.DataTable.Active := True;
AEmpresas.Datatable.First;

View File

@ -56,62 +56,62 @@
<DelphiCompile Include="Base.dpk">
<MainSource>MainSource</MainSource>
</DelphiCompile>
<DCCReference Include="..\Modulos\Contactos\Views\adortl.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\cxDataD11.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\cxEditorsD11.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\cxExportD11.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\cxExtEditorsD11.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\cxGridD11.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\cxIntl6D11.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\cxIntlPrintSys3D11.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\cxLibraryD11.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\cxPageControlD11.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\DataAbstract_Core_D11.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\dbrtl.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\dclIndyCore.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\designide.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\dsnap.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\dxCoreD11.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\dxGDIPlusD11.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\dxPSCoreD11.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\dxThemeD11.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\GUISDK_D11R.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\IndyCore.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\IndyProtocols.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\IndySystem.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\Jcl.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\JclVcl.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\JSDialog100.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\JvCmpD11R.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\JvCoreD11R.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\JvCtrlsD11R.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\JvDlgsD11R.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\JvMMD11R.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\JvNetD11R.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\JvPageCompsD11R.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\JvStdCtrlsD11R.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\JvSystemD11R.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\pckMD5.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\pckUCDataConnector.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\pckUserControl_RT.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\PngComponentsD10.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\PNG_D10.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\RemObjects_Core_D11.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\RemObjects_Indy_D11.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\rtl.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\TB2k_D10.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\tbx_d10.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\vcl.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\vclactnband.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\vcldb.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\vcljpg.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\VclSmp.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\vclx.dcp" />
<DCCReference Include="..\Modulos\Contactos\Views\xmlrtl.dcp" />
<DCCReference Include="..\Modulos\Impresiones\Data\uDataModuleImpresiones.pas">
<Form>DataModuleImpresiones</Form>
<DesignClass>TDataModule</DesignClass>
</DCCReference>
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\adortl.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\cxDataD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\cxEditorsD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\cxExportD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\cxExtEditorsD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\cxGridD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\cxIntl6D11.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\cxIntlPrintSys3D11.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\cxLibraryD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\cxPageControlD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\DataAbstract_Core_D11.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\dbrtl.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\dclIndyCore.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\designide.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\dsnap.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\dxCoreD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\dxGDIPlusD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\dxPSCoreD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\dxThemeD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\GUISDK_D11R.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\IndyCore.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\IndyProtocols.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\IndySystem.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\Jcl.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\JclVcl.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\JSDialog100.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\JvCmpD11R.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\JvCoreD11R.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\JvCtrlsD11R.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\JvDlgsD11R.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\JvMMD11R.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\JvNetD11R.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\JvPageCompsD11R.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\JvStdCtrlsD11R.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\JvSystemD11R.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\pckMD5.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\pckUCDataConnector.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\pckUserControl_RT.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\PngComponentsD10.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\PNG_D10.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\RemObjects_Core_D11.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\RemObjects_Indy_D11.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\rtl.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\TB2k_D10.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\tbx_d10.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\vcl.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\vclactnband.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\vcldb.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\vcljpg.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\VclSmp.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\vclx.dcp" />
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\xmlrtl.dcp" />
<DCCReference Include="..\Modulos\Registro de correos\Data\uDataModuleRegistroCorreos.pas">
<Form>DataModuleRegistroCorreos</Form>
<DesignClass>TDataModule</DesignClass>

View File

@ -78,7 +78,7 @@ begin
if Assigned(AListaEmpresasItem) then
begin
AEmpresas := AppFactuGES.EmpresasController.BuscarTodos;
AEmpresas := AppFactuGES.EmpresasController.BuscarTodos(AppFactuGES.UsuarioActivo.ID_PERFIL);
try
AEmpresas.DataTable.Active := True;
while not AEmpresas.DataTable.EOF do

View File

@ -127,7 +127,7 @@ begin
end;
// Crear páginas con empresas y rellenarlas
AEmpresas := AppFactuGES.EmpresasController.BuscarTodos;
AEmpresas := AppFactuGES.EmpresasController.BuscarTodos(AppFactuGES.UsuarioActivo.ID_PERFIL);
try
AEmpresas.DataTable.Active := True;

View File

@ -193,10 +193,17 @@ procedure TfPantallaPrincipal.FormShow(Sender: TObject);
begin
InicializarUI;
//Solo verá Luis los informes
if (AppFactuGES.UsuarioActivo.ID <> 1)
and (AppFactuGES.UsuarioActivo.ID <> 3) then
actMenuInformes.Visible := False;
//Solo verá los informes el perfil SuperAdministrador(11) y Administrador(9), están en la tabla usuarios
if (AppFactuGES.UsuarioActivo.ID_PERFIL <> 11) then
begin
Perfiles1.Visible := False;
actAnadirEmpresa.Visible := False;
if (AppFactuGES.UsuarioActivo.ID_PERFIL <> 9) then
begin
Administracin1.Visible := False;
actMenuInformes.Visible := False;
end;
end;
end;
procedure TfPantallaPrincipal.RefrescarUI;
@ -337,7 +344,7 @@ begin
NavPaneController.InitNavPane;
try
AListaEmpresas := AppFactuGES.EmpresasController.BuscarTodos;
AListaEmpresas := AppFactuGES.EmpresasController.BuscarTodos(AppFactuGES.UsuarioActivo.ID_PERFIL);
if Assigned(AListaEmpresas) then
begin
AListaEmpresas.Active := True;

View File

@ -59,30 +59,30 @@
<DelphiCompile Include="GUIBase.dpk">
<MainSource>MainSource</MainSource>
</DelphiCompile>
<DCCReference Include="..\Modulos\Pedidos de cliente\Views\Base.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\Views\cxLibraryD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\Views\cxTreeListD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\Views\dbrtl.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\Views\dxBarD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\Views\dxBarExtItemsD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\Views\dxComnD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\Views\dxGDIPlusD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\Views\dxLayoutControlD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\Views\dxPSCoreD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\Views\dxPScxCommonD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\Views\dxPScxGrid6LnkD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\Views\dxPsPrVwAdvD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\Views\dxThemeD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\Views\frx11.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\Views\frxe11.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\Views\fs11.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\Views\JvAppFrmD11R.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\Views\JvCtrlsD11R.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\Views\rtl.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\Views\vcl.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\Views\vcldb.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\Views\vcljpg.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\Views\vclx.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\Base.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\cxLibraryD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\cxTreeListD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\dbrtl.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\dxBarD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\dxBarExtItemsD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\dxComnD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\dxGDIPlusD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\dxLayoutControlD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\dxPSCoreD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\dxPScxCommonD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\dxPScxGrid6LnkD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\dxPsPrVwAdvD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\dxThemeD11.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\frx11.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\frxe11.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\fs11.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\JvAppFrmD11R.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\JvCtrlsD11R.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\rtl.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\vcl.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\vcldb.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\vcljpg.dcp" />
<DCCReference Include="..\Modulos\Pedidos de cliente\vclx.dcp" />
<DCCReference Include="uDialogBase.pas">
<Form>fDialogBase</Form>
</DCCReference>

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

View File

@ -0,0 +1,51 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.OutlineWidth="180" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37871,9953986921" ReportOptions.Description.Text="" ReportOptions.LastChange="41572,7821660069" ReportOptions.VersionBuild="1" ReportOptions.VersionMajor="12" ReportOptions.VersionMinor="13" ReportOptions.VersionRelease="1" ScriptLanguage="PascalScript" ScriptText.Text="procedure DatosEmpresaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10; Cadena: String;&#13;&#10;begin&#13;&#10; DatosEmpresa.Lines.Clear;&#13;&#10; DatosEmpresa.Lines.Add(&#60;frxDBCabecera.&#34;RAZON_SOCIAL&#34;&#62;);&#13;&#10; DatosEmpresa.Lines.Add(&#60;frxDBCabecera.&#34;CALLE_EMPRESA&#34;&#62;);&#13;&#10;&#13;&#10; Cadena := '';&#13;&#10; if (&#60;frxDBCabecera.&#34;TELEFONO_1&#34;&#62; &#60;&#62; '') then&#13;&#10; Cadena := 'TLF: ' + &#60;frxDBCabecera.&#34;TELEFONO_1&#34;&#62;;&#13;&#10; if (&#60;frxDBCabecera.&#34;FAX&#34;&#62; &#60;&#62; '') then&#13;&#10; Cadena := Cadena + ' FAX: ' + &#60;frxDBCabecera.&#34;FAX&#34;&#62;;&#13;&#10; DatosEmpresa.Lines.Add(Cadena);&#13;&#10;&#13;&#10; Cadena := '';&#13;&#10; if (&#60;frxDBCabecera.&#34;CODIGO_POSTAL_EMPRESA&#34;&#62; &#60;&#62; '') then&#13;&#10; Cadena := &#60;frxDBCabecera.&#34;CODIGO_POSTAL_EMPRESA&#34;&#62;;&#13;&#10; if (&#60;frxDBCabecera.&#34;POBLACION_EMPRESA&#34;&#62; &#60;&#62; '') then&#13;&#10; Cadena := Cadena + ' ' + &#60;frxDBCabecera.&#34;POBLACION_EMPRESA&#34;&#62;;&#13;&#10; if (&#60;frxDBCabecera.&#34;PROVINCIA_EMPRESA&#34;&#62; &#60;&#62; '') then&#13;&#10; Cadena := Cadena + ' - ' + &#60;frxDBCabecera.&#34;PROVINCIA_EMPRESA&#34;&#62;;&#13;&#10; DatosEmpresa.Lines.Add(Cadena);&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo26OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if (&#60;FechaIni&#62; &#60;&#62; '') then&#13;&#10; Memo31.Visible := True&#13;&#10; else&#13;&#10; Memo31.Visible := False;&#13;&#10;end;&#13;&#10;&#13;&#10;BEGIN&#13;&#10;&#13;&#10;END." ShowProgress="False" StoreInDFM="False" PropData="044C65667403910003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D2266727844424361626563657261220000095661726961626C657301010C0F000000204E616D653D22204665636861732200010C10000000204E616D653D224665636861496E692200010C10000000204E616D653D22466563686146696E220000055374796C6501010C85000000204E616D653D22436F6E636570746F206E6F726D616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22302200010C87000000204E616D653D22436F6E636570746F20737562746F74616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22312200010C97000000204E616D653D22436162656365726120646520636F6C756D6E612220436F6C6F723D2231353739303332302220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D223122204672616D652E5479703D2231352200010C85000000204E616D653D22436F6E636570746F20746974756C6F2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D2231220000">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxPageHeader Name="Band2" Height="115,08652142" Left="0" Top="16" Width="1046,92981">
<TfrxShapeView Name="Shape2" Left="401,07112" Top="56,69295" Width="638,74057" Height="49,35436" ShowHint="False" Color="16777215" Frame.Color="8421504" Shape="skRoundRectangle"/>
<TfrxMemoView Name="Memo15" Left="399,93723" Top="11,33859" Width="639,43352" Height="41,57483" ShowHint="False" Font.Charset="1" Font.Color="12632256" Font.Height="-32" Font.Name="Tahoma" Font.Style="1" Frame.Color="14211288" HAlign="haRight" ParentFont="False" Text="LIQUIDACIONES DE COMISIONES"/>
<TfrxMemoView Name="Memo7" Left="419,30736" Top="83,14966" Width="612,50433" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Página nº: [&#60;Page#&#62;] / [&#60;TotalPages#&#62;]"/>
<TfrxMemoView Name="Memo31" Left="419,52783" Top="60,47248" Width="612,28386" Height="18,89765" OnBeforePrint="Memo26OnBeforePrint" ShowHint="False" HAlign="haRight" Text="Desde [FechaIni] hasta [FechaFin]"/>
<TfrxPictureView Name="Picture2" Left="10" Top="21" Width="226" Height="85" OnBeforePrint="Picture1OnBeforePrint" ShowHint="False" HightQuality="False"/>
<TfrxMemoView Name="DatosEmpresa" Left="183,92919" Top="20,35436" Width="209,41744" Height="80,69295" OnBeforePrint="DatosEmpresaOnBeforePrint" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
</TfrxPageHeader>
<TfrxMasterData Name="MasterData1" Height="22,67718" Left="0" Top="287" Width="1046,92981" ColumnWidth="0" ColumnGap="0" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" RowCount="0" Stretched="True">
<TfrxMemoView Name="Memo2" Left="4" Top="2" Width="64,47248" Height="18,89765" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBCabecera.&#34;FECHA&#34;]"/>
<TfrxMemoView Name="Memo9" Left="77,9765" Top="2" Width="63,47248" Height="18,89765" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBCabecera.&#34;REFERENCIA&#34;]"/>
<TfrxMemoView Name="Memo10" Left="235,80334" Top="1,88976378000001" Width="521,95292677" Height="18,89765" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBCabecera.&#34;CLIENTE&#34;]"/>
<TfrxMemoView Name="Memo13" Left="149,1812" Top="2" Width="81,37013" Height="18,89765" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBCabecera.&#34;SITUACION&#34;]"/>
<TfrxMemoView Name="Memo29" Left="767,24459" Top="1,88976378" Width="101,63791" Height="19,11812" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[frxDBCabecera.&#34;IMPORTE_COMISIONABLE&#34;]"/>
<TfrxMemoView Name="Memo19" Left="914,64626" Top="1,88976378000001" Width="120,53556" Height="19,11812" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[frxDBCabecera.&#34;IMPORTE_COMISION&#34;]"/>
<TfrxLineView Name="Line8" Left="72,5906" Top="0" Width="0" Height="23,81102362" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
<TfrxLineView Name="Line5" Left="145,51181102" Top="0" Width="0" Height="23,81102362" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
<TfrxLineView Name="Line10" Left="233,95275591" Top="0" Width="0" Height="23,81102362" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
<TfrxLineView Name="Line4" Left="763,46456693" Top="0" Width="0" Height="23,81102362" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
<TfrxLineView Name="Line3" Left="874,96062992" Top="0" Width="0" Height="23,81102362" ShowHint="False" Frame.Typ="1"/>
<TfrxLineView Name="Line7" Left="1040,50393701" Top="0" Width="0" Height="23,81102362" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
<TfrxLineView Name="Line1" Left="0,37795276" Top="0" Width="0" Height="23,81102362" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
</TfrxMasterData>
<TfrxGroupHeader Name="GroupHeader1" Height="75,5906" Left="0" Top="191" Width="1046,92981" Condition="frxDBCabecera.&#34;ID_COMISION_LIQUIDADA&#34;" OutlineText="frxDBCabecera.&#34;ID_COMISION_LIQUIDADA&#34;">
<TfrxMemoView Name="Memo18" Left="875,07143" Top="52,91342" Width="165,92130622" Height="22,67716291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Imp. comisión "/>
<TfrxMemoView Name="Memo27" Left="0" Top="0" Width="1040,8825" Height="52,91340291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text=""/>
<TfrxMemoView Name="Memo14" Left="60,25201" Top="30,23624" Width="412,18924" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="1" ParentFont="False" Text="[frxDBCabecera.&#34;AGENTE&#34;]"/>
<TfrxMemoView Name="Memo6" Left="174,99227" Top="3,77952999999999" Width="253,44898" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="1" ParentFont="False" Text="[frxDBCabecera.&#34;REFERENCIA_COMISION&#34;]"/>
<TfrxMemoView Name="Memo16" Left="525,35467" Top="3,77952999999999" Width="948,8825" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBCabecera.&#34;FECHA_COMISION&#34;]"/>
<TfrxMemoView Name="Memo17" Left="555,59091" Top="30,23624" Width="476,44125" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="1" ParentFont="False" Text="[frxDBCabecera.&#34;DESCRIPCION&#34;]"/>
<TfrxMemoView Name="Memo20" Left="11,33859" Top="3,77952999999999" Width="160,75603" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Nº liquidación de comisiones:"/>
<TfrxMemoView Name="Memo21" Left="480,00031" Top="3,77952999999999" Width="42,45671" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Fecha:"/>
<TfrxMemoView Name="Memo22" Left="480,00031" Top="30,23624" Width="72,69295" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Descripción:"/>
<TfrxMemoView Name="Memo25" Left="11,33859" Top="30,23624" Width="46,01577" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Agente:"/>
<TfrxMemoView Name="Memo23" Left="0" Top="52,91342" Width="73,32282" Height="22,67716291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Fec. factura"/>
<TfrxMemoView Name="Memo1" Left="72,5906" Top="52,91342" Width="73,32282" Height="22,67716291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Ref. factura"/>
<TfrxMemoView Name="Memo3" Left="145,63791" Top="52,91342" Width="88,44094" Height="22,67716291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Situación"/>
<TfrxMemoView Name="Memo4" Left="234,03958" Top="52,91342" Width="532,91355913" Height="22,67716291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Cliente"/>
<TfrxMemoView Name="Memo24" Left="763,46464016" Top="52,91342" Width="113,38583898" Height="22,67716291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Imp. comisionable"/>
</TfrxGroupHeader>
<TfrxGroupFooter Name="GroupFooter1" Height="41,57483" Left="0" Top="330" Width="1046,92981">
<TfrxMemoView Name="Memo28" Left="0" Top="0" Width="1040,8825" Height="26,45669291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text=""/>
<TfrxMemoView Name="Memo30" Left="877,22882" Top="3,77953" Width="157,953" Height="19,11812" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaBottom" Text="Total comisión: [frxDBCabecera.&#34;IMPORTE_TOTAL&#34;]"/>
<TfrxMemoView Name="Memo5" Left="659" Top="3,77953" Width="215" Height="19" ShowHint="False" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaBottom" Text="Total comisionable:[SUM(&#60;frxDBCabecera.&#34;IMPORTE_COMISIONABLE&#34;&#62;,MasterData1)]"/>
</TfrxGroupFooter>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,57 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.OutlineWidth="180" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37871,9953986921" ReportOptions.Description.Text="" ReportOptions.LastChange="41572,7822699884" ReportOptions.VersionBuild="1" ReportOptions.VersionMajor="12" ReportOptions.VersionMinor="13" ReportOptions.VersionRelease="1" ScriptLanguage="PascalScript" ScriptText.Text="procedure DatosEmpresaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10; Cadena: String;&#13;&#10;begin&#13;&#10; DatosEmpresa.Lines.Clear;&#13;&#10; DatosEmpresa.Lines.Add(&#60;frxDBCabecera.&#34;RAZON_SOCIAL&#34;&#62;);&#13;&#10; DatosEmpresa.Lines.Add(&#60;frxDBCabecera.&#34;CALLE_EMPRESA&#34;&#62;);&#13;&#10;&#13;&#10; Cadena := '';&#13;&#10; if (&#60;frxDBCabecera.&#34;TELEFONO_1&#34;&#62; &#60;&#62; '') then&#13;&#10; Cadena := 'TLF: ' + &#60;frxDBCabecera.&#34;TELEFONO_1&#34;&#62;;&#13;&#10; if (&#60;frxDBCabecera.&#34;FAX&#34;&#62; &#60;&#62; '') then&#13;&#10; Cadena := Cadena + ' FAX: ' + &#60;frxDBCabecera.&#34;FAX&#34;&#62;;&#13;&#10; DatosEmpresa.Lines.Add(Cadena);&#13;&#10;&#13;&#10; Cadena := '';&#13;&#10; if (&#60;frxDBCabecera.&#34;CODIGO_POSTAL_EMPRESA&#34;&#62; &#60;&#62; '') then&#13;&#10; Cadena := &#60;frxDBCabecera.&#34;CODIGO_POSTAL_EMPRESA&#34;&#62;;&#13;&#10; if (&#60;frxDBCabecera.&#34;POBLACION_EMPRESA&#34;&#62; &#60;&#62; '') then&#13;&#10; Cadena := Cadena + ' ' + &#60;frxDBCabecera.&#34;POBLACION_EMPRESA&#34;&#62;;&#13;&#10; if (&#60;frxDBCabecera.&#34;PROVINCIA_EMPRESA&#34;&#62; &#60;&#62; '') then&#13;&#10; Cadena := Cadena + ' - ' + &#60;frxDBCabecera.&#34;PROVINCIA_EMPRESA&#34;&#62;;&#13;&#10; DatosEmpresa.Lines.Add(Cadena);&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo26OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if (&#60;FechaIni&#62; &#60;&#62; '') then&#13;&#10; Memo31.Visible := True&#13;&#10; else&#13;&#10; Memo31.Visible := False;&#13;&#10;end;&#13;&#10;&#13;&#10;BEGIN&#13;&#10;&#13;&#10;END." ShowProgress="False" StoreInDFM="False" PropData="044C65667403910003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D2266727844424361626563657261220000095661726961626C657301010C0F000000204E616D653D22204665636861732200010C10000000204E616D653D224665636861496E692200010C10000000204E616D653D22466563686146696E220000055374796C6501010C85000000204E616D653D22436F6E636570746F206E6F726D616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22302200010C87000000204E616D653D22436F6E636570746F20737562746F74616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22312200010C97000000204E616D653D22436162656365726120646520636F6C756D6E612220436F6C6F723D2231353739303332302220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D223122204672616D652E5479703D2231352200010C85000000204E616D653D22436F6E636570746F20746974756C6F2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D2231220000">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxPageHeader Name="Band2" Height="115,08652142" Left="0" Top="16" Width="1046,92981">
<TfrxPictureView Name="Picture1" Left="7,77953" Top="20,22047" Width="160,03598" Height="80,03154" OnBeforePrint="Picture1OnBeforePrint" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" HightQuality="False"/>
<TfrxMemoView Name="DatosEmpresa" Left="171,92919" Top="20,35436" Width="221,41744" Height="80,69295" OnBeforePrint="DatosEmpresaOnBeforePrint" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
<TfrxShapeView Name="Shape2" Left="401,07112" Top="56,69295" Width="638,74057" Height="49,35436" ShowHint="False" Color="16777215" Frame.Color="8421504" Shape="skRoundRectangle"/>
<TfrxMemoView Name="Memo15" Left="399,93723" Top="11,33859" Width="639,43352" Height="41,57483" ShowHint="False" Font.Charset="1" Font.Color="12632256" Font.Height="-32" Font.Name="Tahoma" Font.Style="1" Frame.Color="14211288" HAlign="haRight" ParentFont="False" Text="LIQUIDACIONES DE COMISIONES"/>
<TfrxMemoView Name="Memo7" Left="419,30736" Top="83,14966" Width="612,50433" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Página nº: [&#60;Page#&#62;] / [&#60;TotalPages#&#62;]"/>
<TfrxMemoView Name="Memo31" Left="419,52783" Top="60,47248" Width="612,28386" Height="18,89765" OnBeforePrint="Memo26OnBeforePrint" ShowHint="False" HAlign="haRight" Text="Desde [FechaIni] hasta [FechaFin]"/>
</TfrxPageHeader>
<TfrxMasterData Name="MasterData1" Height="22,67718" Left="0" Top="287" Width="1046,92981" ColumnWidth="0" ColumnGap="0" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" RowCount="0" Stretched="True">
<TfrxMemoView Name="Memo2" Left="4" Top="2" Width="64,47248" Height="18,89765" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBCabecera.&#34;FECHA&#34;]"/>
<TfrxMemoView Name="Memo9" Left="77,9765" Top="2" Width="63,47248" Height="18,89765" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBCabecera.&#34;REFERENCIA&#34;]"/>
<TfrxMemoView Name="Memo10" Left="235,80334" Top="1,88976378000001" Width="257,38582677" Height="18,89765" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBCabecera.&#34;CLIENTE&#34;]"/>
<TfrxMemoView Name="Memo11" Left="502,67716535" Top="1,88976378000001" Width="257,3859" Height="18,89765" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBCabecera.&#34;PROVEEDOR&#34;]"/>
<TfrxMemoView Name="Memo12" Left="877,85051331" Top="1,88976378000001" Width="60,69295" Height="18,89765" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 %" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" HideZeros="True" ParentFont="False" Text="[frxDBCabecera.&#34;COMISION&#34;]"/>
<TfrxMemoView Name="Memo13" Left="149,1812" Top="2" Width="81,37013" Height="18,89765" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBCabecera.&#34;SITUACION&#34;]"/>
<TfrxMemoView Name="Memo29" Left="767,24459" Top="1,88976378" Width="101,63791" Height="19,11812" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[frxDBCabecera.&#34;IMPORTE_COMISIONABLE&#34;]"/>
<TfrxMemoView Name="Memo19" Left="948,66203" Top="1,88976378000001" Width="86,51979" Height="19,11812" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[frxDBCabecera.&#34;IMPORTE_COMISION&#34;]"/>
<TfrxLineView Name="Line8" Left="72,5906" Top="0" Width="0" Height="23,81102362" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
<TfrxLineView Name="Line5" Left="145,51181102" Top="0" Width="0" Height="23,81102362" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
<TfrxLineView Name="Line10" Left="233,95275591" Top="0" Width="0" Height="23,81102362" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
<TfrxLineView Name="Line9" Left="498,8976378" Top="0" Width="0" Height="23,81102362" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
<TfrxLineView Name="Line4" Left="763,46456693" Top="0" Width="0" Height="23,81102362" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
<TfrxLineView Name="Line3" Left="874,96062992" Top="0" Width="0" Height="23,81102362" ShowHint="False" Frame.Typ="1"/>
<TfrxLineView Name="Line6" Left="946,77165354" Top="0" Width="0" Height="23,81102362" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
<TfrxLineView Name="Line7" Left="1040,50393701" Top="0" Width="0" Height="23,81102362" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
<TfrxLineView Name="Line1" Left="0,37795276" Top="0" Width="0" Height="23,81102362" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
</TfrxMasterData>
<TfrxGroupHeader Name="GroupHeader1" Height="75,5906" Left="0" Top="191" Width="1046,92981" Condition="frxDBCabecera.&#34;ID_COMISION_LIQUIDADA&#34;" OutlineText="frxDBCabecera.&#34;ID_COMISION_LIQUIDADA&#34;">
<TfrxMemoView Name="Memo18" Left="946,8825" Top="52,91342" Width="94,11023622" Height="22,67716291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Imp. comisión "/>
<TfrxMemoView Name="Memo27" Left="0" Top="0" Width="1040,8825" Height="52,91340291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text=""/>
<TfrxMemoView Name="Memo14" Left="60,25201" Top="30,23624" Width="412,18924" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="1" ParentFont="False" Text="[frxDBCabecera.&#34;AGENTE&#34;]"/>
<TfrxMemoView Name="Memo6" Left="174,99227" Top="3,77952999999999" Width="253,44898" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="1" ParentFont="False" Text="[frxDBCabecera.&#34;REFERENCIA_COMISION&#34;]"/>
<TfrxMemoView Name="Memo16" Left="525,35467" Top="3,77952999999999" Width="948,8825" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBCabecera.&#34;FECHA_COMISION&#34;]"/>
<TfrxMemoView Name="Memo17" Left="555,59091" Top="30,23624" Width="476,44125" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="1" ParentFont="False" Text="[frxDBCabecera.&#34;DESCRIPCION&#34;]"/>
<TfrxMemoView Name="Memo20" Left="11,33859" Top="3,77952999999999" Width="160,75603" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Nº liquidación de comisiones:"/>
<TfrxMemoView Name="Memo21" Left="480,00031" Top="3,77952999999999" Width="42,45671" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Fecha:"/>
<TfrxMemoView Name="Memo22" Left="480,00031" Top="30,23624" Width="72,69295" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Descripción:"/>
<TfrxMemoView Name="Memo25" Left="11,33859" Top="30,23624" Width="46,01577" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Agente:"/>
<TfrxMemoView Name="Memo23" Left="0" Top="52,91342" Width="73,32282" Height="22,67716291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Fec. factura"/>
<TfrxMemoView Name="Memo1" Left="72,5906" Top="52,91342" Width="73,32282" Height="22,67716291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Ref. factura"/>
<TfrxMemoView Name="Memo3" Left="145,63791" Top="52,91342" Width="88,44094" Height="22,67716291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Situación"/>
<TfrxMemoView Name="Memo4" Left="234,03958" Top="52,91342" Width="264,56692913" Height="22,67716291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Cliente"/>
<TfrxMemoView Name="Memo8" Left="498,51968504" Top="52,91342" Width="264,56700236" Height="22,67716291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Proveedor"/>
<TfrxMemoView Name="Memo24" Left="763,46464016" Top="52,91342" Width="113,38583898" Height="22,67716291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Imp. comisionable"/>
<TfrxMemoView Name="Memo5" Left="875,39425" Top="52,91342" Width="71,81097236" Height="22,67716291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Porcentaje"/>
</TfrxGroupHeader>
<TfrxGroupFooter Name="GroupFooter1" Height="41,57483" Left="0" Top="330" Width="1046,92981">
<TfrxMemoView Name="Memo28" Left="0" Top="0" Width="1040,8825" Height="26,45669291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text=""/>
<TfrxMemoView Name="Memo30" Left="865,22882" Top="3,77953" Width="169,953" Height="19" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaBottom" Text="Total comisión: [frxDBCabecera.&#34;IMPORTE_TOTAL&#34;]"/>
<TfrxMemoView Name="Memo26" Left="689" Top="3,77953" Width="184" Height="19" ShowHint="False" DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaBottom" Text="Total comisionable: [SUM(&#60;frxDBCabecera.&#34;IMPORTE_COMISIONABLE&#34;&#62;,MasterData1)]"/>
</TfrxGroupFooter>
</TfrxReportPage>
</TfrxReport>

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

View File

@ -0,0 +1,56 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.OutlineWidth="180" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37871,9953986921" ReportOptions.Description.Text="" ReportOptions.LastChange="41473,4487332176" ReportOptions.VersionBuild="1" ReportOptions.VersionMajor="12" ReportOptions.VersionMinor="13" ReportOptions.VersionRelease="1" ScriptLanguage="PascalScript" ScriptText.Text="procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;// Engine.CurY := Engine.CurY + Engine.FreeSpace - ReportSummary1.Height;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure DatosEmpresaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10; Cadena: String;&#13;&#10;begin&#13;&#10; DatosEmpresa.Lines.Clear;&#13;&#10; DatosEmpresa.Lines.Add(&#60;frxDBCabecera.&#34;RAZON_SOCIAL&#34;&#62;);&#13;&#10; DatosEmpresa.Lines.Add(&#60;frxDBCabecera.&#34;CALLE_EMPRESA&#34;&#62;);&#13;&#10;&#13;&#10; Cadena := '';&#13;&#10; if (&#60;frxDBCabecera.&#34;TELEFONO_1&#34;&#62; &#60;&#62; '') then&#13;&#10; Cadena := 'TLF: ' + &#60;frxDBCabecera.&#34;TELEFONO_1&#34;&#62;;&#13;&#10; if (&#60;frxDBCabecera.&#34;FAX&#34;&#62; &#60;&#62; '') then&#13;&#10; Cadena := Cadena + ' FAX: ' + &#60;frxDBCabecera.&#34;FAX&#34;&#62;;&#13;&#10; DatosEmpresa.Lines.Add(Cadena);&#13;&#10;&#13;&#10; Cadena := '';&#13;&#10; if (&#60;frxDBCabecera.&#34;CODIGO_POSTAL_EMPRESA&#34;&#62; &#60;&#62; '') then&#13;&#10; Cadena := &#60;frxDBCabecera.&#34;CODIGO_POSTAL_EMPRESA&#34;&#62;;&#13;&#10; if (&#60;frxDBCabecera.&#34;POBLACION_EMPRESA&#34;&#62; &#60;&#62; '') then&#13;&#10; Cadena := Cadena + ' ' + &#60;frxDBCabecera.&#34;POBLACION_EMPRESA&#34;&#62;;&#13;&#10; if (&#60;frxDBCabecera.&#34;PROVINCIA_EMPRESA&#34;&#62; &#60;&#62; '') then&#13;&#10; Cadena := Cadena + ' - ' + &#60;frxDBCabecera.&#34;PROVINCIA_EMPRESA&#34;&#62;;&#13;&#10; DatosEmpresa.Lines.Add(Cadena);&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Band2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if not Engine.FinalPass then&#13;&#10; Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10; if Engine.FinalPass then&#13;&#10; Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; Set('Pagina', 0);&#13;&#10; Set('TotalPaginas', 0);&#13;&#10;end;&#13;&#10;&#13;&#10;procedure PageFooter1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if Engine.FinalPass and (&#60;TotalPaginas&#62; = &#60;Pagina&#62;)then&#13;&#10; begin&#13;&#10; eTotal.Visible := True;&#13;&#10; vTotal.Visible := True;&#13;&#10; Cuadro.Visible := True;&#13;&#10; end&#13;&#10; else&#13;&#10; begin&#13;&#10; eTotal.Visible := False;&#13;&#10; vTotal.Visible := False;&#13;&#10; Cuadro.Visible := False;&#13;&#10; end;&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E6173220000055374796C6501010C85000000204E616D653D22436F6E636570746F206E6F726D616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22302200010C87000000204E616D653D22436F6E636570746F20737562746F74616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22312200010C97000000204E616D653D22436162656365726120646520636F6C756D6E612220436F6C6F723D2231353739303332302220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D223122204672616D652E5479703D2231352200010C85000000204E616D653D22436F6E636570746F20746974756C6F2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D2231220000">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10,00125" RightMargin="10,00125" TopMargin="10,00125" BottomMargin="10,00125" Columns="1" ColumnWidth="209,999791666667" ColumnPositions.Text="0" LargeDesignHeight="True" HGuides.Text="" VGuides.Text="">
<TfrxPageHeader Name="Band2" Height="258,70866142" Left="0" Top="16" Width="718,101251175" OnBeforePrint="Band2OnBeforePrint">
<TfrxMemoView Name="Memo23" Left="3,77953" Top="228,5671" Width="92,22047" Height="26,45669291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="12" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Ref. recibo"/>
<TfrxMemoView Name="Memo24" Left="564,69326" Top="228,5671" Width="153,41744" Height="26,45669291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="12" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe "/>
<TfrxPictureView Name="Picture1" Left="7,77953" Top="20,22047" Width="160,03598" Height="80,03154" OnBeforePrint="Picture1OnBeforePrint" ShowHint="False" DataField="LOGOTIPO" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" HightQuality="False"/>
<TfrxMemoView Name="DatosEmpresa" Left="166,92919" Top="17,35436" Width="221,41744" Height="80,69295" OnBeforePrint="DatosEmpresaOnBeforePrint" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
<TfrxShapeView Name="Shape1" Left="7,55906" Top="113,3859" Width="257,00804" Height="94,48825" ShowHint="False" Color="16777215" Frame.Color="8421504" Shape="skRoundRectangle"/>
<TfrxShapeView Name="Shape2" Left="325,48052" Top="113,3859" Width="393,07112" Height="94,48825" ShowHint="False" Color="16777215" Frame.Color="8421504" Shape="skRoundRectangle"/>
<TfrxMemoView Name="Memo16" Left="15,11812" Top="116,94496" Width="65,13389" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Nº remesa:"/>
<TfrxMemoView Name="Memo17" Left="15,11812" Top="162,29932" Width="45,35436" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Fecha:"/>
<TfrxMemoView Name="Memo18" Left="15,11812" Top="184,9765" Width="60,47248" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Página nº:"/>
<TfrxMemoView Name="Memo3" Left="211,8859" Top="228,5671" Width="241,0671" Height="26,45669291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="12" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Cliente"/>
<TfrxMemoView Name="Memo4" Left="453,953" Top="228,5671" Width="110,74026" Height="26,45669291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="12" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="NIF / CIF"/>
<TfrxMemoView Name="Memo5" Left="80,03154" Top="116,94496" Width="176,9765" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera.&#34;REFERENCIA&#34;]"/>
<TfrxMemoView Name="Memo6" Left="60,25201" Top="162,29932" Width="196,75603" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera.&#34;FECHA_REMESA&#34;]"/>
<TfrxMemoView Name="Memo7" Left="75,37013" Top="184,9765" Width="181,63791" Height="18,89765" ShowHint="False" Text="[&#60;Pagina&#62;] / [&#60;TotalPaginas&#62;]"/>
<TfrxMemoView Name="Memo15" Left="396,1577" Top="18,89765" Width="314,39394" Height="64,25201" ShowHint="False" Font.Charset="1" Font.Color="12632256" Font.Height="-48" Font.Name="Tahoma" Font.Style="1" Frame.Color="14211288" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="REMESA"/>
<TfrxMemoView Name="Memo8" Left="95,82158333" Top="228,5671" Width="115,89765" Height="26,45669291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="12" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Vencimiento"/>
<TfrxMemoView Name="Memo22" Left="15,11812" Top="139,84261" Width="68,91342" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Descripción:"/>
<TfrxMemoView Name="Memo25" Left="87,5906" Top="139,84261" Width="169,41744" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera.&#34;DESCRIPCION&#34;]"/>
<TfrxMemoView Name="Memo19" Left="336,37817" Top="139,84261" Width="42,45671" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Titular:"/>
<TfrxMemoView Name="Memo26" Left="382,39394" Top="139,84261" Width="331,93723" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera.&#34;TITULAR&#34;]"/>
<TfrxMemoView Name="Memo27" Left="336,37817" Top="117,16543" Width="176,9765" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Datos de la cuenta"/>
<TfrxMemoView Name="Memo28" Left="336,37817" Top="162,51979" Width="75,5906" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Cód. entidad:"/>
<TfrxMemoView Name="Memo29" Left="415,52783" Top="162,51979" Width="53,13389" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera.&#34;ENTIDAD&#34;]"/>
<TfrxMemoView Name="Memo30" Left="472,44125" Top="162,51979" Width="83,14966" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Cód. sucursal:"/>
<TfrxMemoView Name="Memo31" Left="559,14997" Top="162,51979" Width="147,62214" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera.&#34;SUCURSAL&#34;]"/>
<TfrxMemoView Name="Memo32" Left="336,37817" Top="185,19697" Width="26,45671" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="DC:"/>
<TfrxMemoView Name="Memo33" Left="366,39394" Top="185,19697" Width="34,23624" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera.&#34;DC&#34;]"/>
<TfrxMemoView Name="Memo34" Left="472,44125" Top="185,19697" Width="83,14966" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Cód. cuenta:"/>
<TfrxMemoView Name="Memo37" Left="559,14997" Top="185,19697" Width="147,62214" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera.&#34;CUENTA&#34;]"/>
<TfrxLineView Name="Line2" Left="4" Top="229,54" Width="0" Height="774,803149606299" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
<TfrxLineView Name="Line5" Left="95,92146" Top="229,54" Width="0" Height="774,803149606299" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
<TfrxLineView Name="Line4" Left="453,9094" Top="229,54" Width="0" Height="774,803149606299" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
<TfrxLineView Name="Line3" Left="564,28346457" Top="229,54" Width="0" Height="774,803149606299" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
<TfrxLineView Name="Line1" Left="718" Top="229,54" Width="0" Height="774,803149606299" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
<TfrxLineView Name="Line9" Left="211,62461333" Top="229,54" Width="0" Height="774,803149606299" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
</TfrxPageHeader>
<TfrxMasterData Name="BandaDetalles" Height="19,11812" Left="0" Top="335" Width="718,101251175" AllowSplit="True" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" RowCount="0" Stretched="True">
<TfrxMemoView Name="MemPrecio" Left="460,40153087" Top="2" Width="101,56298724" Height="15,11811024" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" GapX="3" GapY="3" HideZeros="True" LineSpacing="4" ParentFont="False" Text="[frxDBDetalles.&#34;NIF_CIF_CLIENTE&#34;]"/>
<TfrxMemoView Name="MemImpTotal" Left="566,36216811" Top="2" Width="147,16535189" Height="15,11811024" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 € " DisplayFormat.Kind="fkNumeric" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" GapX="3" GapY="3" HAlign="haRight" LineSpacing="4" ParentFont="False" Text="[frxDBDetalles.&#34;IMPORTE_TOTAL&#34;]"/>
<TfrxMemoView Name="MemCantidad" Left="218,46837457" Top="2" Width="229,44892874" Height="15,11811024" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" GapX="3" GapY="3" HideZeros="True" LineSpacing="4" ParentFont="False" Text="[frxDBDetalles.&#34;NOMBRE_CLIENTE&#34;]"/>
<TfrxMemoView Name="Memo21" Left="99,22449" Top="2" Width="110,89765" Height="15,11812" ShowHint="False" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBDetalles.&#34;FECHA_VENCIMIENTO&#34;]"/>
<TfrxMemoView Name="Memo2" Left="6,18491" Top="2" Width="84" Height="15,11812" ShowHint="False" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBDetalles.&#34;REFERENCIA&#34;]"/>
</TfrxMasterData>
<TfrxPageFooter Name="PageFooter1" Height="42,70866142" Left="0" Top="414" Width="718,101251175" OnBeforePrint="PageFooter1OnBeforePrint">
<TfrxShapeView Name="Cuadro" Left="3,77953" Top="0" Width="714,708661417323" Height="28,88188" ShowHint="False" Color="16777215" Frame.Color="8421504"/>
<TfrxMemoView Name="vtotal" Left="566,9295" Top="3,77953" Width="147,87415" Height="22,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[frxDBCabecera.&#34;IMPORTE_TOTAL&#34;]"/>
<TfrxMemoView Name="etotal" Left="430,86642" Top="6,67718" Width="132" Height="16" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Total remesa:"/>
<TfrxLineView Name="Linea" Left="3,77953" Top="0" Width="714,330708661417" Height="0" ShowHint="False" Frame.Typ="4"/>
</TfrxPageFooter>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,65 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.OutlineWidth="180" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37871,9953986921" ReportOptions.Description.Text="" ReportOptions.LastChange="40672,5958106019" ReportOptions.VersionBuild="1" ReportOptions.VersionMajor="12" ReportOptions.VersionMinor="13" ReportOptions.VersionRelease="1" ScriptLanguage="PascalScript" ScriptText.Text="&#13;&#10;&#13;&#10;procedure DatosEmpresaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10; Cadena: String;&#13;&#10;begin&#13;&#10; DatosEmpresa.Lines.Clear;&#13;&#10; DatosEmpresa.Lines.Add(&#60;frxDBCabecera.&#34;RAZON_SOCIAL&#34;&#62;);&#13;&#10; DatosEmpresa.Lines.Add(&#60;frxDBCabecera.&#34;CALLE_EMPRESA&#34;&#62;);&#13;&#10;&#13;&#10; Cadena := '';&#13;&#10; if (&#60;frxDBCabecera.&#34;TELEFONO_1&#34;&#62; &#60;&#62; '') then&#13;&#10; Cadena := 'TLF: ' + &#60;frxDBCabecera.&#34;TELEFONO_1&#34;&#62;;&#13;&#10; if (&#60;frxDBCabecera.&#34;FAX&#34;&#62; &#60;&#62; '') then&#13;&#10; Cadena := Cadena + ' FAX: ' + &#60;frxDBCabecera.&#34;FAX&#34;&#62;;&#13;&#10; DatosEmpresa.Lines.Add(Cadena);&#13;&#10;&#13;&#10; Cadena := '';&#13;&#10; if (&#60;frxDBCabecera.&#34;CODIGO_POSTAL_EMPRESA&#34;&#62; &#60;&#62; '') then&#13;&#10; Cadena := &#60;frxDBCabecera.&#34;CODIGO_POSTAL_EMPRESA&#34;&#62;;&#13;&#10; if (&#60;frxDBCabecera.&#34;POBLACION_EMPRESA&#34;&#62; &#60;&#62; '') then&#13;&#10; Cadena := Cadena + ' ' + &#60;frxDBCabecera.&#34;POBLACION_EMPRESA&#34;&#62;;&#13;&#10; if (&#60;frxDBCabecera.&#34;PROVINCIA_EMPRESA&#34;&#62; &#60;&#62; '') then&#13;&#10; Cadena := Cadena + ' - ' + &#60;frxDBCabecera.&#34;PROVINCIA_EMPRESA&#34;&#62;;&#13;&#10; DatosEmpresa.Lines.Add(Cadena);&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Band2OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if not Engine.FinalPass then&#13;&#10; Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10; if Engine.FinalPass then&#13;&#10; Set('Pagina', (&#60;Pagina&#62; + 1));&#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; Set('Pagina', 0);&#13;&#10; Set('TotalPaginas', 0);&#13;&#10;end;&#13;&#10;&#13;&#10;procedure PageFooter1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if Engine.FinalPass&#13;&#10; and (&#60;TotalPaginas&#62; = &#60;Pagina&#62;) then&#13;&#10; begin&#13;&#10; Cuadro.Visible := True;&#13;&#10; eTotal.Visible := True;&#13;&#10; vTotal.Visible := True;&#13;&#10; end&#13;&#10; else&#13;&#10; begin&#13;&#10; Cuadro.Visible := False;&#13;&#10; eTotal.Visible := False;&#13;&#10; vTotal.Visible := False;&#13;&#10; end;&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E6173220000055374796C6501010C85000000204E616D653D22436F6E636570746F206E6F726D616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22302200010C87000000204E616D653D22436F6E636570746F20737562746F74616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22312200010C97000000204E616D653D22436162656365726120646520636F6C756D6E612220436F6C6F723D2231353739303332302220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D223122204672616D652E5479703D2231352200010C85000000204E616D653D22436F6E636570746F20746974756C6F2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D2231220000">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" Columns="1" ColumnWidth="210" ColumnPositions.Text="0" PrintOnPreviousPage="True" HGuides.Text="" VGuides.Text="">
<TfrxPageHeader Name="Band2" Height="258,70866142" Left="0" Top="16" Width="1046,92981" OnBeforePrint="Band2OnBeforePrint">
<TfrxMemoView Name="Memo23" Left="3,77953" Top="228,5671" Width="80,88188" Height="26,45669291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="12" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Ref. recibo"/>
<TfrxMemoView Name="Memo24" Left="887,95856667" Top="228,5671" Width="158,97124333" Height="26,45669291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="12" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe "/>
<TfrxPictureView Name="Picture1" Left="7,77953" Top="20,22047" Width="160,03598" Height="80,03154" OnBeforePrint="Picture1OnBeforePrint" ShowHint="False" DataField="LOGOTIPO" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" HightQuality="False"/>
<TfrxMemoView Name="DatosEmpresa" Left="166,92919" Top="17,35436" Width="221,41744" Height="80,69295" OnBeforePrint="DatosEmpresaOnBeforePrint" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
<TfrxShapeView Name="Shape1" Left="7,55906" Top="113,3859" Width="257,00804" Height="94,48825" ShowHint="False" Color="16777215" Frame.Color="8421504" Shape="skRoundRectangle"/>
<TfrxShapeView Name="Shape2" Left="639,181510000002" Top="113,3859" Width="393,07112" Height="94,48825" ShowHint="False" Color="16777215" Frame.Color="8421504" Shape="skRoundRectangle"/>
<TfrxMemoView Name="Memo16" Left="15,11812" Top="116,94496" Width="65,13389" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Nº remesa:"/>
<TfrxMemoView Name="Memo17" Left="15,11812" Top="162,29932" Width="45,35436" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Fecha:"/>
<TfrxMemoView Name="Memo18" Left="15,11812" Top="184,9765" Width="60,47248" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Página nº:"/>
<TfrxMemoView Name="Memo3" Left="303,59462" Top="228,5671" Width="225,94898" Height="26,45669291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="12" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Proveedor"/>
<TfrxMemoView Name="Memo4" Left="530,21026667" Top="228,5671" Width="133,41744" Height="26,45669291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="12" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="NIF / CIF"/>
<TfrxMemoView Name="Memo5" Left="80,03154" Top="116,94496" Width="176,9765" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera.&#34;REFERENCIA&#34;]"/>
<TfrxMemoView Name="Memo6" Left="60,25201" Top="162,29932" Width="196,75603" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera.&#34;FECHA_REMESA&#34;]"/>
<TfrxMemoView Name="Memo7" Left="75,37013" Top="184,9765" Width="181,63791" Height="18,89765" ShowHint="False" Text="[&#60;Pagina&#62;] / [&#60;TotalPaginas&#62;]"/>
<TfrxLineView Name="Line1" Left="1046,81911" Top="229,54" Width="0" Height="459,212598425197" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
<TfrxMemoView Name="Memo15" Left="464,18924" Top="18,89765" Width="567,62245" Height="64,25201" ShowHint="False" Font.Charset="1" Font.Color="12632256" Font.Height="-48" Font.Name="Tahoma" Font.Style="1" Frame.Color="14211288" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="REMESA"/>
<TfrxLineView Name="Line2" Left="4" Top="229,54" Width="0" Height="459,212598425197" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
<TfrxLineView Name="Line5" Left="84,58287" Top="228,20666667" Width="0" Height="459,212598425197" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
<TfrxLineView Name="Line4" Left="530,16666667" Top="229,54" Width="0" Height="459,212598425197" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
<TfrxMemoView Name="Memo8" Left="195,86889333" Top="228,66141732" Width="107,33859" Height="26,45669291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="12" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Vencimiento"/>
<TfrxLineView Name="Line9" Left="304" Top="228,43568333" Width="0" Height="459,212598425197" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
<TfrxMemoView Name="Memo22" Left="15,11812" Top="139,84261" Width="68,91342" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Descripción:"/>
<TfrxMemoView Name="Memo25" Left="87,5906" Top="139,84261" Width="169,41744" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera.&#34;DESCRIPCION&#34;]"/>
<TfrxMemoView Name="Memo19" Left="650,079160000002" Top="139,84261" Width="42,45671" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Titular:"/>
<TfrxMemoView Name="Memo26" Left="696,094930000002" Top="139,84261" Width="331,93723" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera.&#34;TITULAR&#34;]"/>
<TfrxMemoView Name="Memo27" Left="650,079160000002" Top="117,16543" Width="176,9765" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Datos de la cuenta"/>
<TfrxMemoView Name="Memo28" Left="650,079160000002" Top="162,51979" Width="75,5906" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Cód. entidad:"/>
<TfrxMemoView Name="Memo29" Left="729,228820000002" Top="162,51979" Width="53,13389" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera.&#34;ENTIDAD&#34;]"/>
<TfrxMemoView Name="Memo30" Left="786,142240000002" Top="162,51979" Width="83,14966" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Cód. sucursal:"/>
<TfrxMemoView Name="Memo31" Left="872,850960000002" Top="162,51979" Width="147,62214" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera.&#34;SUCURSAL&#34;]"/>
<TfrxMemoView Name="Memo32" Left="650,079160000002" Top="185,19697" Width="26,45671" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="DC:"/>
<TfrxMemoView Name="Memo33" Left="680,094930000002" Top="185,19697" Width="34,23624" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera.&#34;DC&#34;]"/>
<TfrxMemoView Name="Memo34" Left="786,142240000002" Top="185,19697" Width="83,14966" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Cód. cuenta:"/>
<TfrxMemoView Name="Memo37" Left="872,850960000002" Top="185,19697" Width="147,62214" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera.&#34;CUENTA&#34;]"/>
<TfrxMemoView Name="Memo11" Left="663,41775" Top="228,10513333" Width="224,12616" Height="27,2125984251969" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="12" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Número de cuenta"/>
<TfrxLineView Name="Line7" Left="888,18955" Top="228,7718" Width="0" Height="459,212598425197" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
<TfrxMemoView Name="Memo36" Left="86,26252333" Top="228,66141732" Width="111,11812" Height="26,45669291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="12" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Ref. factura prov."/>
<TfrxLineView Name="Line8" Left="195,78478667" Top="229,10235" Width="0" Height="459,212598425197" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
<TfrxLineView Name="Line3" Left="664,55124457" Top="228,87333333" Width="0" Height="459,212598425197" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
</TfrxPageHeader>
<TfrxMasterData Name="BandaDetalles" Height="19,11812" Left="0" Top="335" Width="1046,92981" AllowSplit="True" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" RowCount="0" Stretched="True">
<TfrxMemoView Name="MemPrecio" Left="548,6640542" Top="2,66666667" Width="109,12204724" Height="15,11811024" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" GapX="3" GapY="3" HideZeros="True" LineSpacing="4" ParentFont="False" Text="[frxDBDetalles.&#34;NIF_CIF_PROVEEDOR&#34;]"/>
<TfrxMemoView Name="MemImpTotal" Left="895,18127811" Top="2" Width="147,16535189" Height="15,11811024" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 € " DisplayFormat.Kind="fkNumeric" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" GapX="3" GapY="3" HAlign="haRight" LineSpacing="4" ParentFont="False" Text="[frxDBDetalles.&#34;IMPORTE_TOTAL&#34;]"/>
<TfrxMemoView Name="MemCantidad" Left="310,5104279" Top="2" Width="214,33080874" Height="15,11811024" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#0 " DisplayFormat.Kind="fkNumeric" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" GapX="3" GapY="3" HideZeros="True" LineSpacing="4" ParentFont="False" Text="[frxDBDetalles.&#34;NOMBRE_PROVEEDOR&#34;]"/>
<TfrxMemoView Name="Memo21" Left="213,94372333" Top="2" Width="84,44094" Height="15,11812" ShowHint="False" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBDetalles.&#34;FECHA_VENCIMIENTO&#34;]"/>
<TfrxMemoView Name="Memo2" Left="9,96444" Top="2" Width="61,32282" Height="15,11812" ShowHint="False" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBDetalles.&#34;REFERENCIA&#34;]"/>
<TfrxMemoView Name="Memo12" Left="696,10018667" Top="2,44619667000001" Width="29,75191724" Height="15,11811024" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" GapX="3" GapY="3" HideZeros="True" LineSpacing="4" ParentFont="False" Text="[frxDBDetalles.&#34;ENTIDAD_PROVEEDOR&#34;]"/>
<TfrxMemoView Name="Memo14" Left="731,89548667" Top="2,66666666999998" Width="29,75191724" Height="15,11811024" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 € " Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" GapX="3" GapY="3" HideZeros="True" LineSpacing="4" ParentFont="False" Text="[frxDBDetalles.&#34;SUCURSAL_PROVEEDOR&#34;]"/>
<TfrxMemoView Name="Memo20" Left="766,79839333" Top="2,66666665999998" Width="18,41332724" Height="15,11811024" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 € " Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" GapX="3" GapY="3" HideZeros="True" LineSpacing="4" ParentFont="False" Text="[frxDBDetalles.&#34;DC_PROVEEDOR&#34;]"/>
<TfrxMemoView Name="Memo35" Left="789,92177" Top="2,66666666999998" Width="82,66533724" Height="15,11811024" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 € " Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" GapX="3" GapY="3" HideZeros="True" LineSpacing="4" ParentFont="False" Text="[frxDBDetalles.&#34;CUENTA_PROVEEDOR&#34;]"/>
<TfrxMemoView Name="Memo39" Left="88,92919" Top="2" Width="106,67718" Height="15,11812" ShowHint="False" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBDetalles.&#34;REFERENCIA_FACTURA_PROV&#34;]"/>
</TfrxMasterData>
<TfrxPageFooter Name="PageFooter1" Height="30,23624" Left="0" Top="414" Width="1046,92981" OnBeforePrint="PageFooter1OnBeforePrint">
<TfrxShapeView Name="Cuadro" Left="3,77953" Top="0" Width="1042,81911" Height="28,88188" ShowHint="False" Color="16777215" Frame.Color="8421504"/>
<TfrxMemoView Name="vTotal" Left="923,93723" Top="1,10235" Width="117,63791" Height="22,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[frxDBCabecera.&#34;IMPORTE_TOTAL&#34;]"/>
<TfrxMemoView Name="eTotal" Left="784,09462" Top="7,77953000000002" Width="132" Height="16" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Total remesa:"/>
<TfrxLineView Name="Line6" Left="3,77953" Top="0" Width="1043,14960629921" Height="0" ShowHint="False" Frame.Typ="4"/>
</TfrxPageFooter>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,61 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37800,8077143519" ReportOptions.Description.Text="" ReportOptions.LastChange="40585,5037237847" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if Engine.FinalPass then&#13;&#10; begin&#13;&#10; if (&#60;Page#&#62; = &#60;TotalPages#&#62;) then&#13;&#10; begin &#13;&#10; mContinua.Visible := False;&#13;&#10; end &#13;&#10; else&#13;&#10; begin &#13;&#10; mContinua.Visible := True;&#13;&#10; end &#13;&#10; end; &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403990003546F70021008446174617365747301010C5000000020446174615365743D226672784442496E666F726D654C69737461646F46616374757261732220446174615365744E616D653D226672784442496E666F726D654C69737461646F46616374757261732200010C5E00000020446174615365743D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E2220446174615365744E616D653D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
<TfrxPictureView Name="Logotipo" Left="0" Top="37,10235" Width="80" Height="88" ShowHint="False" HightQuality="False"/>
<TfrxMemoView Name="DatosEmpresa" Left="80" Top="37,10235" Width="232" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
<TfrxLineView Name="Line1" Align="baLeft" Left="0" Top="129,10235" Width="312" Height="0" ShowHint="False" Frame.Color="32768" Frame.Typ="4" Frame.Width="4"/>
<TfrxShapeView Name="Shape5" Left="513" Top="4" Width="495" Height="129" ShowHint="False" Color="13434828" Shape="skRoundRectangle"/>
<TfrxMemoView Name="NombreCliente" Left="521,85807" Top="13" Width="478" Height="19" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE IVA DE FACTURAS DE CLIENTE"/>
<TfrxMemoView Name="Memo3" Left="521,85807" Top="34,89765" Width="478" Height="91" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Fecha del listado: [&#60;Date&#62;] - Página [Page#] de [TotalPages#]&#13;&#10;[TextoParametros]"/>
</TfrxPageHeader>
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="552" Width="1009,13451" PrintOnLastPage="False">
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
</TfrxPageFooter>
<TfrxGroupHeader Name="" Height="40" Left="0" Restrictions="2" Top="212" Width="1009,13451" Condition="frxDBInformeListadoFacturas.&#34;MES&#34;" ReprintOnNewPage="True">
<TfrxMemoView Name="Memo27" Left="0" Top="25" Width="88,77953" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Nº factura"/>
<TfrxMemoView Name="Memo28" Left="88,77953" Top="25" Width="463,7480315" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Cliente"/>
<TfrxMemoView Name="Memo49" Left="552,5275615" Top="25" Width="81,33859" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="NIF/CIF"/>
<TfrxMemoView Name="Memo50" Left="726,5433315" Top="25" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Base imponible"/>
<TfrxMemoView Name="Memo51" Left="821,5433315" Top="25" Width="95,24409449" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe IVA"/>
<TfrxMemoView Name="Memo52" Left="916,78742599" Top="25" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo8" Left="633,8661515" Top="25" Width="92,67718" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha"/>
<TfrxMemoView Name="Memo7" Left="0" Top="3,77953" Width="485,37013" Height="13" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;TITULO&#34;]"/>
</TfrxGroupHeader>
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="272" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="frxDBInformeListadoFacturas" DataSetName="frxDBInformeListadoFacturas" RowCount="0" Stretched="True">
<TfrxMemoView Name="Memo18" Left="0" Top="0" Width="88,78" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;REFERENCIA&#34;]"/>
<TfrxMemoView Name="Memo4" Left="88,78" Top="0" Width="463,75" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;NOMBRE&#34;]"/>
<TfrxMemoView Name="Memo20" Left="552,53" Top="0" Width="81,34" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;NIF_CIF&#34;]"/>
<TfrxMemoView Name="Memo21" Left="633,87" Top="0" Width="92,68" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;FECHA_FACTURA&#34;]"/>
<TfrxMemoView Name="Memo29" Left="726,55" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;BASE_IMPONIBLE&#34;]"/>
<TfrxMemoView Name="Memo30" Left="821,55" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;IMPORTE_IVA&#34;]"/>
<TfrxMemoView Name="Memo31" Left="916,55" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;IMPORTE_TOTAL&#34;]"/>
</TfrxMasterData>
<TfrxGroupFooter Name="" Height="16" Left="0" Top="309" Width="1009,13451">
<TfrxMemoView Name="Memo6" Left="916" Top="0,37774772" Width="95" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturas.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo14" Left="821" Top="0,37774772" Width="95" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturas.&#34;IMPORTE_IVA&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo15" Left="726" Top="0,37774772" Width="95" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturas.&#34;BASE_IMPONIBLE&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo53" Left="0" Top="0,37774772" Width="726" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoFacturas.&#34;TITULO&#34;]:"/>
</TfrxGroupFooter>
<TfrxHeader Name="Header1" Height="75" Left="0" Top="345" Width="1009,13451">
<TfrxMemoView Name="Memo13" Left="0" Top="60" Width="383,62987" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Resumen por meses de facturas de cliente"/>
<TfrxMemoView Name="Memo16" Left="383,62987" Top="60" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Base imponible"/>
<TfrxMemoView Name="Memo17" Left="478,62987" Top="60" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe IVA"/>
<TfrxMemoView Name="Memo22" Left="573,62987" Top="60" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo23" Left="0" Top="23" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="Resumen por meses de las facturas de cliente"/>
</TfrxHeader>
<TfrxMasterData Name="DatosMAestros2" Height="17" Left="0" Top="440" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSet="frxDBInformeListadoFacturasResumen" DataSetName="frxDBInformeListadoFacturasResumen" RowCount="0">
<TfrxMemoView Name="Memo9" Left="0" Top="0" Width="383,63" Height="17,00787402" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen.&#34;TITULO&#34;]"/>
<TfrxMemoView Name="Memo10" Left="383,63" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen.&#34;BASE_IMPONIBLE&#34;]"/>
<TfrxMemoView Name="Memo11" Left="478,63" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen.&#34;IMPORTE_IVA&#34;]"/>
<TfrxMemoView Name="Memo12" Left="573,63" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen.&#34;IMPORTE_TOTAL&#34;]"/>
</TfrxMasterData>
<TfrxReportSummary Name="ReportSummary1" Height="15" Left="0" Top="517" Width="1009,13451">
<TfrxMemoView Name="Memo24" Align="baLeft" Left="0" Top="0" Width="383,62987" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Total: "/>
<TfrxMemoView Name="Memo25" Align="baLeft" Left="383,62987" Top="0" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturasResumen.&#34;BASE_IMPONIBLE&#34;&#62;,DatosMaestros2)]"/>
<TfrxMemoView Name="Memo26" Align="baLeft" Left="478,62987" Top="0" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturasResumen.&#34;IMPORTE_IVA&#34;&#62;,DatosMaestros2)]"/>
<TfrxMemoView Name="Memo32" Align="baLeft" Left="573,62987" Top="0" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturasResumen.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros2)]"/>
</TfrxReportSummary>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,65 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37800,8077143519" ReportOptions.Description.Text="" ReportOptions.LastChange="40585,5038973264" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if Engine.FinalPass then&#13;&#10; begin&#13;&#10; if (&#60;Page#&#62; = &#60;TotalPages#&#62;) then&#13;&#10; begin &#13;&#10; mContinua.Visible := False;&#13;&#10; end &#13;&#10; else&#13;&#10; begin &#13;&#10; mContinua.Visible := True;&#13;&#10; end &#13;&#10; end; &#13;&#10;end;&#13;&#10; &#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403990003546F70021008446174617365747301010C5000000020446174615365743D226672784442496E666F726D654C69737461646F46616374757261732220446174615365744E616D653D226672784442496E666F726D654C69737461646F46616374757261732200010C5E00000020446174615365743D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E2220446174615365744E616D653D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
<TfrxPictureView Name="Logotipo" Left="0" Top="37,10235" Width="80" Height="88" ShowHint="False" HightQuality="False"/>
<TfrxMemoView Name="DatosEmpresa" Left="80" Top="37,10235" Width="232" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
<TfrxLineView Name="Line1" Align="baLeft" Left="0" Top="129,10235" Width="312" Height="0" ShowHint="False" Frame.Color="32768" Frame.Typ="4" Frame.Width="4"/>
<TfrxShapeView Name="Shape5" Left="512" Top="3" Width="495" Height="129" ShowHint="False" Color="13434828" Shape="skRoundRectangle"/>
<TfrxMemoView Name="NombreCliente" Left="520,85807" Top="12" Width="478" Height="19" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE IVA DE FACTURAS DE CLIENTE"/>
<TfrxMemoView Name="Memo3" Left="520,85807" Top="33,89765" Width="478" Height="91" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Fecha del listado: [&#60;Date&#62;] - Página [Page#] de [TotalPages#]&#13;&#10;[TextoParametros]"/>
</TfrxPageHeader>
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="635" Width="1009,13451" PrintOnLastPage="False">
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
</TfrxPageFooter>
<TfrxGroupHeader Name="" Height="40" Left="0" Restrictions="2" Top="255" Width="1009,13451" Condition="frxDBInformeListadoFacturas.&#34;NOMBRE&#34;" ReprintOnNewPage="True">
<TfrxMemoView Name="Memo27" Left="0" Top="25" Width="88,77953" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Nº factura"/>
<TfrxMemoView Name="Memo28" Left="88,77953" Top="25" Width="463,7480315" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Cliente"/>
<TfrxMemoView Name="Memo49" Left="552,5275615" Top="25" Width="81,33859" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="NIF/CIF"/>
<TfrxMemoView Name="Memo50" Left="726,5433315" Top="25" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Base imponible"/>
<TfrxMemoView Name="Memo51" Left="821,5433315" Top="25" Width="95,24409449" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe IVA"/>
<TfrxMemoView Name="Memo52" Left="916,78742599" Top="25" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo8" Left="633,8661515" Top="25" Width="92,67718" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha"/>
<TfrxMemoView Name="Memo7" Left="0" Top="2,77953" Width="485,37013" Height="20" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;NOMBRE&#34;]"/>
</TfrxGroupHeader>
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="315" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="frxDBInformeListadoFacturas" DataSetName="frxDBInformeListadoFacturas" RowCount="0" Stretched="True">
<TfrxMemoView Name="Memo18" Left="0" Top="0" Width="88,78" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;REFERENCIA&#34;]"/>
<TfrxMemoView Name="Memo4" Left="88,78" Top="0" Width="463,75" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;NOMBRE&#34;]"/>
<TfrxMemoView Name="Memo20" Left="552,53" Top="0" Width="81,34" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;NIF_CIF&#34;]"/>
<TfrxMemoView Name="Memo21" Left="633,87" Top="0" Width="92,68" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;FECHA_FACTURA&#34;]"/>
<TfrxMemoView Name="Memo29" Left="726,55" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;BASE_IMPONIBLE&#34;]"/>
<TfrxMemoView Name="Memo30" Left="821,55" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;IMPORTE_IVA&#34;]"/>
<TfrxMemoView Name="Memo31" Left="916,55" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;IMPORTE_TOTAL&#34;]"/>
</TfrxMasterData>
<TfrxGroupFooter Name="" Height="16" Left="0" Top="352" Width="1009,13451">
<TfrxMemoView Name="Memo6" Left="916" Top="0,37774772" Width="95" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturas.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo14" Left="821" Top="0,37774772" Width="95" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturas.&#34;IMPORTE_IVA&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo15" Left="726" Top="0,37774772" Width="95" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturas.&#34;BASE_IMPONIBLE&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo53" Left="0" Top="0,37774772" Width="726" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoFacturas.&#34;TITULO&#34;]:"/>
</TfrxGroupFooter>
<TfrxHeader Name="Header1" Height="75" Left="0" Top="428" Width="1009,13451">
<TfrxMemoView Name="Memo13" Left="0" Top="60" Width="383,62987" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Resumen por meses de facturas de cliente"/>
<TfrxMemoView Name="Memo16" Left="383,62987" Top="60" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Base imponible"/>
<TfrxMemoView Name="Memo17" Left="478,62987" Top="60" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe IVA"/>
<TfrxMemoView Name="Memo22" Left="573,62987" Top="60" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo23" Left="0" Top="23" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="Resumen por meses de las facturas de cliente"/>
</TfrxHeader>
<TfrxMasterData Name="DatosMAestros2" Height="17" Left="0" Top="523" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSet="frxDBInformeListadoFacturasResumen" DataSetName="frxDBInformeListadoFacturasResumen" RowCount="0">
<TfrxMemoView Name="Memo9" Left="0" Top="0" Width="383,63" Height="17,00787402" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen.&#34;TITULO&#34;]"/>
<TfrxMemoView Name="Memo10" Left="383,63" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen.&#34;BASE_IMPONIBLE&#34;]"/>
<TfrxMemoView Name="Memo11" Left="478,63" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen.&#34;IMPORTE_IVA&#34;]"/>
<TfrxMemoView Name="Memo12" Left="573,63" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen.&#34;IMPORTE_TOTAL&#34;]"/>
</TfrxMasterData>
<TfrxReportSummary Name="ReportSummary1" Height="15" Left="0" Top="600" Width="1009,13451">
<TfrxMemoView Name="Memo24" Align="baLeft" Left="0" Top="0" Width="383,62987" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Total: "/>
<TfrxMemoView Name="Memo25" Align="baLeft" Left="383,62987" Top="0" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturasResumen.&#34;BASE_IMPONIBLE&#34;&#62;,DatosMaestros2)]"/>
<TfrxMemoView Name="Memo26" Align="baLeft" Left="478,62987" Top="0" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturasResumen.&#34;IMPORTE_IVA&#34;&#62;,DatosMaestros2)]"/>
<TfrxMemoView Name="Memo32" Align="baLeft" Left="573,62987" Top="0" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturasResumen.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros2)]"/>
</TfrxReportSummary>
<TfrxGroupHeader Name="GroupHeader1" Height="23" Left="0" Top="212" Width="1009,13451" Condition="frxDBInformeListadoFacturas.&#34;MES&#34;">
<TfrxMemoView Name="Memo1" Left="0" Top="1" Width="485,37013" Height="20" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;TITULO&#34;]"/>
</TfrxGroupHeader>
<TfrxGroupFooter Name="GroupFooter1" Height="20" Left="0" Top="388" Width="1009,13451"/>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,62 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37800,8077143519" ReportOptions.Description.Text="" ReportOptions.LastChange="40585,5040753935" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if Engine.FinalPass then&#13;&#10; begin&#13;&#10; if (&#60;Page#&#62; = &#60;TotalPages#&#62;) then&#13;&#10; begin &#13;&#10; mContinua.Visible := False;&#13;&#10; end &#13;&#10; else&#13;&#10; begin &#13;&#10; mContinua.Visible := True;&#13;&#10; end &#13;&#10; end; &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403990003546F70021008446174617365747301010C5000000020446174615365743D226672784442496E666F726D654C69737461646F46616374757261732220446174615365744E616D653D226672784442496E666F726D654C69737461646F46616374757261732200010C5E00000020446174615365743D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E2220446174615365744E616D653D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C35000000204E616D653D22546578746F506172616D6574726F73222056616C75653D22262336303B4665636861496E6963696F262336323B220000055374796C650100">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
<TfrxPictureView Name="Logotipo" Left="0" Top="37,10235" Width="80" Height="88" ShowHint="False" HightQuality="False"/>
<TfrxMemoView Name="DatosEmpresa" Left="80" Top="37,10235" Width="232" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
<TfrxLineView Name="Line1" Align="baLeft" Left="0" Top="129,10235" Width="312" Height="0" ShowHint="False" Frame.Color="32768" Frame.Typ="4" Frame.Width="4"/>
<TfrxShapeView Name="Shape5" Left="542" Top="9" Width="465" Height="122" ShowHint="False" Color="13434828" Frame.Width="0,1" Shape="skRoundRectangle"/>
<TfrxMemoView Name="NombreCliente" Left="545,85807" Top="14" Width="452" Height="16,88188" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE IVA FACTURAS DE PROVEEDOR"/>
<TfrxMemoView Name="Memo3" Left="545,85807" Top="34" Width="452" Height="91" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Fecha del listado: [&#60;Date&#62;] - Página [Page#] de [TotalPages#]&#13;&#10;[TextoParametros]"/>
</TfrxPageHeader>
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="558" Width="1009,13451" PrintOnLastPage="False">
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
</TfrxPageFooter>
<TfrxGroupHeader Name="" Height="40" Left="0" Restrictions="2" Top="212" Width="1009,13451" Condition="frxDBInformeListadoFacturas.&#34;MES&#34;" ReprintOnNewPage="True">
<TfrxMemoView Name="Memo27" Left="0" Top="25" Width="88,77953" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Nº factura"/>
<TfrxMemoView Name="Memo28" Left="87" Top="25" Width="463,7480315" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Proveedor"/>
<TfrxMemoView Name="Memo49" Left="550,677165354331" Top="25" Width="81,33859" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="NIF/CIF"/>
<TfrxMemoView Name="Memo50" Left="724" Top="25" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Base imponible"/>
<TfrxMemoView Name="Memo51" Left="818,57483" Top="25" Width="95,24409449" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe IVA"/>
<TfrxMemoView Name="Memo52" Left="914,267716535433" Top="25" Width="94,1102362204724" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo8" Left="632" Top="25" Width="92,67718" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha"/>
<TfrxMemoView Name="Memo7" Left="0" Top="3,77953" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;TITULO&#34;]"/>
</TfrxGroupHeader>
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="272" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="frxDBInformeListadoFacturas" DataSetName="frxDBInformeListadoFacturas" RowCount="0">
<TfrxMemoView Name="Memo18" Left="0" Top="0" Width="86,95698" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="13" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;REFERENCIA&#34;]"/>
<TfrxMemoView Name="Memo4" Left="87" Top="0" Width="463,75" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;NOMBRE&#34;]"/>
<TfrxMemoView Name="Memo20" Left="550,81138" Top="0" Width="81,25984252" Height="17,007874015748" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;NIF_CIF&#34;]"/>
<TfrxMemoView Name="Memo21" Left="631,93700787" Top="0" Width="92,5984252" Height="17,007874015748" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;FECHA_FACTURA&#34;]"/>
<TfrxMemoView Name="Memo29" Left="724,53543307" Top="0" Width="94,48818898" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="13" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;BASE_IMPONIBLE&#34;]"/>
<TfrxMemoView Name="Memo30" Left="818,64566929" Top="0" Width="95,24409449" Height="17,007874015748" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;IMPORTE_IVA&#34;]"/>
<TfrxMemoView Name="Memo31" Left="913,86501" Top="0" Width="94,64276" Height="17,007874015748" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;IMPORTE_TOTAL&#34;]"/>
</TfrxMasterData>
<TfrxGroupFooter Name="" Height="20,78740402" Left="0" Top="309" Width="1009,13451">
<TfrxMemoView Name="Memo6" Left="914,11812" Top="0,37774772" Width="94,488188976378" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturas.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo14" Left="816,22936" Top="0,37774772" Width="97,8897637795276" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturas.&#34;IMPORTE_IVA&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo15" Left="724,54" Top="0,37774772" Width="94,48818898" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturas.&#34;BASE_IMPONIBLE&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo53" Left="0" Top="0,37774772" Width="723,57139" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoFacturas.&#34;TITULO&#34;]:"/>
</TfrxGroupFooter>
<TfrxMemoView Name="Memo2" Align="baRight" Left="938,13451" Top="651" Width="71" Height="13" OnBeforePrint="Memo2OnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text=""/>
<TfrxMasterData Name="DatosMaestros2" Height="17,007874015748" Left="0" Top="446" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSet="frxDBInformeListadoFacturasResumen" DataSetName="frxDBInformeListadoFacturasResumen" RowCount="0">
<TfrxMemoView Name="Memo9" Left="0" Top="0" Width="381,32282" Height="17,00787402" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen.&#34;TITULO&#34;]"/>
<TfrxMemoView Name="Memo10" Left="381,65368" Top="0" Width="94,48818898" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="13" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen.&#34;BASE_IMPONIBLE&#34;]"/>
<TfrxMemoView Name="Memo11" Left="476,3624" Top="0" Width="95,24409449" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen.&#34;IMPORTE_IVA&#34;]"/>
<TfrxMemoView Name="Memo12" Left="571,63018" Top="0" Width="94,64276" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen.&#34;IMPORTE_TOTAL&#34;]"/>
</TfrxMasterData>
<TfrxReportSummary Name="ReportSummary1" Height="15,1181102362205" Left="0" Top="523" Width="1009,13451">
<TfrxMemoView Name="Memo24" Left="0" Top="0" Width="383,62987" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Total: "/>
<TfrxMemoView Name="Memo25" Left="381,73253" Top="0" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturasResumen.&#34;BASE_IMPONIBLE&#34;&#62;,DatosMaestros2)]"/>
<TfrxMemoView Name="Memo26" Left="476,30736" Top="0" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturasResumen.&#34;IMPORTE_IVA&#34;&#62;,DatosMaestros2)]"/>
<TfrxMemoView Name="Memo32" Left="571,08689" Top="0" Width="94,48818898" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturasResumen.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros2)]"/>
</TfrxReportSummary>
<TfrxHeader Name="Header1" Height="75,59055118" Left="0" Top="350" Width="1009,13451">
<TfrxMemoView Name="Memo1" Left="0" Top="26,45671" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="Resumen por meses de las facturas de proveedor"/>
<TfrxMemoView Name="Memo13" Align="baBottom" Left="0" Top="60,59055118" Width="383,62987" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Resumen por meses de facturas de proveedor"/>
<TfrxMemoView Name="Memo16" Align="baBottom" Left="381,73253" Top="60,59055118" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Base imponible"/>
<TfrxMemoView Name="Memo17" Align="baBottom" Left="476,30736" Top="60,59055118" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe IVA"/>
<TfrxMemoView Name="Memo22" Align="baBottom" Left="571,08689" Top="60,59055118" Width="94,48818898" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
</TfrxHeader>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,66 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37800,8077143519" ReportOptions.Description.Text="" ReportOptions.LastChange="40585,5325244213" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if Engine.FinalPass then&#13;&#10; begin&#13;&#10; if (&#60;Page#&#62; = &#60;TotalPages#&#62;) then&#13;&#10; begin &#13;&#10; mContinua.Visible := False;&#13;&#10; end &#13;&#10; else&#13;&#10; begin &#13;&#10; mContinua.Visible := True;&#13;&#10; end &#13;&#10; end; &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403990003546F70021008446174617365747301010C5000000020446174615365743D226672784442496E666F726D654C69737461646F46616374757261732220446174615365744E616D653D226672784442496E666F726D654C69737461646F46616374757261732200010C5E00000020446174615365743D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E2220446174615365744E616D653D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C35000000204E616D653D22546578746F506172616D6574726F73222056616C75653D22262336303B4665636861496E6963696F262336323B220000055374796C650100">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
<TfrxPictureView Name="Logotipo" Left="0" Top="37,10235" Width="80" Height="88" ShowHint="False" HightQuality="False"/>
<TfrxMemoView Name="DatosEmpresa" Left="80" Top="37,10235" Width="232" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
<TfrxLineView Name="Line1" Align="baLeft" Left="0" Top="129,10235" Width="312" Height="0" ShowHint="False" Frame.Color="32768" Frame.Typ="4" Frame.Width="4"/>
<TfrxShapeView Name="Shape5" Left="541" Top="8" Width="465" Height="122" ShowHint="False" Color="13434828" Frame.Width="0,1" Shape="skRoundRectangle"/>
<TfrxMemoView Name="NombreCliente" Left="544,85807" Top="13" Width="452" Height="16,88188" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE IVA FACTURAS DE PROVEEDOR"/>
<TfrxMemoView Name="Memo3" Left="544,85807" Top="33" Width="452" Height="91" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Fecha del listado: [&#60;Date&#62;] - Página [Page#] de [TotalPages#]&#13;&#10;[TextoParametros]"/>
</TfrxPageHeader>
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="644" Width="1009,13451" PrintOnLastPage="False">
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
<TfrxMemoView Name="Memo2" Align="baRight" Left="938,13451" Top="23,59802" Width="71" Height="13" OnBeforePrint="Memo2OnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text=""/>
</TfrxPageFooter>
<TfrxGroupHeader Name="" Height="40" Left="0" Restrictions="2" Top="255" Width="1009,13451" Condition="frxDBInformeListadoFacturas.&#34;NOMBRE&#34;" ReprintOnNewPage="True">
<TfrxMemoView Name="Memo27" Left="0" Top="25" Width="88,77953" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Nº factura"/>
<TfrxMemoView Name="Memo28" Left="87" Top="25" Width="463,7480315" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Proveedor"/>
<TfrxMemoView Name="Memo49" Left="550,67716535" Top="25" Width="81,33859" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="NIF/CIF"/>
<TfrxMemoView Name="Memo50" Left="724" Top="25" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Base imponible"/>
<TfrxMemoView Name="Memo51" Left="818,57483" Top="25" Width="95,24409449" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe IVA"/>
<TfrxMemoView Name="Memo52" Left="914,26771654" Top="25" Width="94,11023622" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo8" Left="632" Top="25" Width="92,67718" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha"/>
<TfrxMemoView Name="Memo7" Left="0" Top="3,77953" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;NOMBRE&#34;]"/>
</TfrxGroupHeader>
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="315" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="frxDBInformeListadoFacturas" DataSetName="frxDBInformeListadoFacturas" RowCount="0">
<TfrxMemoView Name="Memo18" Left="0" Top="0" Width="86,95698" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="13" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;REFERENCIA&#34;]"/>
<TfrxMemoView Name="Memo4" Left="87" Top="0" Width="462,75" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="13" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;NOMBRE&#34;]"/>
<TfrxMemoView Name="Memo20" Left="550,68" Top="0" Width="81,25984252" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;NIF_CIF&#34;]"/>
<TfrxMemoView Name="Memo21" Left="632" Top="0" Width="92,5984252" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;FECHA_FACTURA&#34;]"/>
<TfrxMemoView Name="Memo29" Left="724" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="12" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;BASE_IMPONIBLE&#34;]"/>
<TfrxMemoView Name="Memo30" Left="818,57" Top="0" Width="95,24409449" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;IMPORTE_IVA&#34;]"/>
<TfrxMemoView Name="Memo31" Left="914,27" Top="0" Width="94,11" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;IMPORTE_TOTAL&#34;]"/>
</TfrxMasterData>
<TfrxGroupFooter Name="" Height="20,78740402" Left="0" Top="352" Width="1009,13451">
<TfrxMemoView Name="Memo6" Left="914,11812" Top="0,37774772" Width="94,488188976378" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturas.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo14" Left="816,22936" Top="0,37774772" Width="97,8897637795276" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturas.&#34;IMPORTE_IVA&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo15" Left="724,35436" Top="0,37774772" Width="94,488188976378" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturas.&#34;BASE_IMPONIBLE&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo53" Left="0" Top="0,37774772" Width="724,57139" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoFacturas.&#34;TITULO&#34;]:"/>
</TfrxGroupFooter>
<TfrxMasterData Name="DatosMaestros2" Height="17,007874015748" Left="0" Top="532" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSet="frxDBInformeListadoFacturasResumen" DataSetName="frxDBInformeListadoFacturasResumen" RowCount="0">
<TfrxMemoView Name="Memo9" Left="0" Top="0" Width="382,32282" Height="17,00787402" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen.&#34;TITULO&#34;]"/>
<TfrxMemoView Name="Memo10" Left="381,65368" Top="0" Width="94,48818898" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="12" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen.&#34;BASE_IMPONIBLE&#34;]"/>
<TfrxMemoView Name="Memo11" Left="476,3624" Top="0" Width="95,24409449" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen.&#34;IMPORTE_IVA&#34;]"/>
<TfrxMemoView Name="Memo12" Left="571,63018" Top="0" Width="94,64276" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen.&#34;IMPORTE_TOTAL&#34;]"/>
</TfrxMasterData>
<TfrxReportSummary Name="ReportSummary1" Height="15,1181102362205" Left="0" Top="609" Width="1009,13451">
<TfrxMemoView Name="Memo24" Left="0" Top="0" Width="383,62987" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Total: "/>
<TfrxMemoView Name="Memo25" Left="381,73253" Top="0" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturasResumen.&#34;BASE_IMPONIBLE&#34;&#62;,DatosMaestros2)]"/>
<TfrxMemoView Name="Memo26" Left="476,30736" Top="0" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturasResumen.&#34;IMPORTE_IVA&#34;&#62;,DatosMaestros2)]"/>
<TfrxMemoView Name="Memo32" Left="571,08689" Top="0" Width="94,48818898" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturasResumen.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros2)]"/>
</TfrxReportSummary>
<TfrxHeader Name="Header1" Height="75,59055118" Left="0" Top="436" Width="1009,13451">
<TfrxMemoView Name="Memo1" Left="0" Top="26,45671" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="Resumen por meses de las facturas de proveedor"/>
<TfrxMemoView Name="Memo13" Align="baBottom" Left="0" Top="60,59055118" Width="383,62987" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Resumen por meses de facturas de proveedor"/>
<TfrxMemoView Name="Memo16" Align="baBottom" Left="381,73253" Top="60,59055118" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Base imponible"/>
<TfrxMemoView Name="Memo17" Align="baBottom" Left="476,30736" Top="60,59055118" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe IVA"/>
<TfrxMemoView Name="Memo22" Align="baBottom" Left="571,08689" Top="60,59055118" Width="94,48818898" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
</TfrxHeader>
<TfrxGroupHeader Name="GroupHeader1" Height="22,67718" Left="0" Top="212" Width="1009,13451" Condition="frxDBInformeListadoFacturas.&#34;MES&#34;">
<TfrxMemoView Name="Memo5" Left="0" Top="3,55906" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;TITULO&#34;]"/>
</TfrxGroupHeader>
<TfrxGroupFooter Name="GroupFooter1" Height="22,67718" Left="0" Top="393" Width="1009,13451"/>
</TfrxReportPage>
</TfrxReport>

File diff suppressed because one or more lines are too long

File diff suppressed because one or more lines are too long

View File

@ -0,0 +1,63 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37800,8077143519" ReportOptions.Description.Text="" ReportOptions.LastChange="40585,5326245833" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if Engine.FinalPass then&#13;&#10; begin&#13;&#10; if (&#60;Page#&#62; = &#60;TotalPages#&#62;) then&#13;&#10; begin &#13;&#10; mContinua.Visible := False;&#13;&#10; end &#13;&#10; else&#13;&#10; begin &#13;&#10; mContinua.Visible := True;&#13;&#10; end &#13;&#10; end; &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403990003546F70021008446174617365747301010C5000000020446174615365743D226672784442496E666F726D654C69737461646F46616374757261732220446174615365744E616D653D226672784442496E666F726D654C69737461646F46616374757261732200010C5E00000020446174615365743D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E2220446174615365744E616D653D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
<TfrxShapeView Name="Shape5" Left="512,14193" Top="3,10235" Width="495" Height="129" ShowHint="False" Color="13434828" Shape="skRoundRectangle"/>
<TfrxPictureView Name="Logotipo" Left="0" Top="37,10235" Width="80" Height="88" ShowHint="False" HightQuality="False"/>
<TfrxMemoView Name="DatosEmpresa" Left="80" Top="37,10235" Width="232" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
<TfrxMemoView Name="NombreCliente" Left="521" Top="12,10235" Width="478" Height="19" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE FACTURAS DE CLIENTE"/>
<TfrxLineView Name="Line1" Align="baLeft" Left="0" Top="129,10235" Width="312" Height="0" ShowHint="False" Frame.Color="32768" Frame.Typ="4" Frame.Width="4"/>
<TfrxMemoView Name="Memo3" Left="521" Top="34" Width="478" Height="91" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Fecha del listado: [&#60;Date&#62;] - Página [Page#] de [TotalPages#]&#13;&#10;[TextoParametros]"/>
</TfrxPageHeader>
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="590" Width="1009,13451" PrintOnLastPage="False">
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
</TfrxPageFooter>
<TfrxGroupHeader Name="" Height="40" Left="0" Restrictions="2" Top="212" Width="1009,13451" Condition="frxDBInformeListadoFacturas.&#34;MES&#34;" ReprintOnNewPage="True">
<TfrxMemoView Name="Memo27" Left="0" Top="25" Width="88,77953" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Nº factura"/>
<TfrxMemoView Name="Memo28" Left="259,01577" Top="25" Width="384,96846" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Cliente"/>
<TfrxMemoView Name="Memo49" Left="643,98423" Top="25" Width="81,33859" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Situación"/>
<TfrxMemoView Name="Memo50" Left="725,32282" Top="25" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Base imponible"/>
<TfrxMemoView Name="Memo51" Left="820,32282" Top="25" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe IVA"/>
<TfrxMemoView Name="Memo52" Left="915,32282" Top="25" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo8" Left="88,77953" Top="25" Width="85,11812" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha"/>
<TfrxMemoView Name="Memo7" Left="0" Top="2,77953" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;TITULO&#34;]"/>
<TfrxMemoView Name="Memo1" Left="173,89765" Top="25" Width="85,11812" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha vto."/>
</TfrxGroupHeader>
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="272" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="frxDBInformeListadoFacturas" DataSetName="frxDBInformeListadoFacturas" RowCount="0" Stretched="True">
<TfrxMemoView Name="Memo4" Align="baLeft" Left="259,02" Top="0" Width="384,97" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;NOMBRE&#34;]"/>
<TfrxMemoView Name="Memo20" Align="baLeft" Left="643,99" Top="0" Width="81,34" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;SITUACION&#34;]"/>
<TfrxMemoView Name="Memo21" Align="baLeft" Left="88,78" Top="0" Width="85,12" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;FECHA_FACTURA&#34;]"/>
<TfrxMemoView Name="Memo18" Align="baLeft" Left="0" Top="0" Width="88,78" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;REFERENCIA&#34;]"/>
<TfrxMemoView Name="Memo29" Align="baLeft" Left="725,33" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;BASE_IMPONIBLE&#34;]"/>
<TfrxMemoView Name="Memo30" Align="baLeft" Left="820,33" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;IMPORTE_IVA&#34;]"/>
<TfrxMemoView Name="Memo31" Align="baLeft" Left="915,33" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;IMPORTE_TOTAL&#34;]"/>
<TfrxMemoView Name="Memo5" Align="baLeft" Left="173,9" Top="0" Width="85,12" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;FECHA_VENCIMIENTO&#34;]"/>
</TfrxMasterData>
<TfrxGroupFooter Name="" Height="17" Left="0" Top="309" Width="1009,13451">
<TfrxMemoView Name="Memo53" Left="0" Top="0" Width="725" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoFacturas.&#34;TITULO&#34;]:"/>
<TfrxMemoView Name="Memo6" Left="915" Top="0" Width="95" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturas.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo14" Left="820" Top="0" Width="95" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturas.&#34;IMPORTE_IVA&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo15" Left="725" Top="0" Width="95" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturas.&#34;BASE_IMPONIBLE&#34;&#62;,DatosMaestros1)]"/>
</TfrxGroupFooter>
<TfrxHeader Name="Header1" Height="75" Left="0" Top="346" Width="1009,13451">
<TfrxMemoView Name="Memo13" Left="0" Top="60" Width="383,62987" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Resumen por meses de facturas de cliente"/>
<TfrxMemoView Name="Memo16" Left="383,62987" Top="60" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Base imponible"/>
<TfrxMemoView Name="Memo17" Left="478,62987" Top="60" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe IVA"/>
<TfrxMemoView Name="Memo22" Left="573,62987" Top="60" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo23" Left="0" Top="25" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="Resumen por meses de las facturas de cliente"/>
</TfrxHeader>
<TfrxMasterData Name="DAtosMaestros2" Height="17" Left="0" Top="441" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSet="frxDBInformeListadoFacturasResumen" DataSetName="frxDBInformeListadoFacturasResumen" RowCount="0">
<TfrxMemoView Name="Memo9" Left="0" Top="0" Width="383,63" Height="17,00787402" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen.&#34;TITULO&#34;]"/>
<TfrxMemoView Name="Memo10" Left="383,63" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen.&#34;BASE_IMPONIBLE&#34;]"/>
<TfrxMemoView Name="Memo11" Left="478,63" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen.&#34;IMPORTE_IVA&#34;]"/>
<TfrxMemoView Name="Memo12" Left="573,63" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen.&#34;IMPORTE_TOTAL&#34;]"/>
</TfrxMasterData>
<TfrxReportSummary Name="ReportSummary1" Height="52" Left="0" Top="518" Width="1009,13451">
<TfrxMemoView Name="Memo24" Align="baLeft" Left="0" Top="0" Width="383,62987" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Total: "/>
<TfrxMemoView Name="Memo25" Align="baLeft" Left="383,62987" Top="0" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturasResumen.&#34;BASE_IMPONIBLE&#34;&#62;,DatosMaestros2)]"/>
<TfrxMemoView Name="Memo26" Align="baLeft" Left="478,62987" Top="0" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturasResumen.&#34;IMPORTE_IVA&#34;&#62;,DatosMaestros2)]"/>
<TfrxMemoView Name="Memo32" Align="baLeft" Left="573,62987" Top="0" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturasResumen.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros2)]"/>
</TfrxReportSummary>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,68 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37800,8077143519" ReportOptions.Description.Text="" ReportOptions.LastChange="40585,5328214815" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if Engine.FinalPass then&#13;&#10; begin&#13;&#10; if (&#60;Page#&#62; = &#60;TotalPages#&#62;) then&#13;&#10; begin &#13;&#10; mContinua.Visible := False;&#13;&#10; end &#13;&#10; else&#13;&#10; begin &#13;&#10; mContinua.Visible := True;&#13;&#10; end &#13;&#10; end; &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403990003546F70021008446174617365747301010C5000000020446174615365743D226672784442496E666F726D654C69737461646F46616374757261732220446174615365744E616D653D226672784442496E666F726D654C69737461646F46616374757261732200010C5E00000020446174615365743D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E2220446174615365744E616D653D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
<TfrxPictureView Name="Logotipo" Left="0" Top="37,10235" Width="80" Height="88" ShowHint="False" HightQuality="False"/>
<TfrxMemoView Name="DatosEmpresa" Left="80" Top="37,10235" Width="232" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
<TfrxLineView Name="Line1" Align="baLeft" Left="0" Top="129,10235" Width="312" Height="0" ShowHint="False" Frame.Color="32768" Frame.Typ="4" Frame.Width="4"/>
<TfrxShapeView Name="Shape5" Left="513" Top="5" Width="495" Height="129" ShowHint="False" Color="13434828" Shape="skRoundRectangle"/>
<TfrxMemoView Name="NombreCliente" Left="521,85807" Top="14" Width="478" Height="19" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE FACTURAS DE CLIENTE"/>
<TfrxMemoView Name="Memo3" Left="521,85807" Top="35,89765" Width="478" Height="91" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Fecha del listado: [&#60;Date&#62;] - Página [Page#] de [TotalPages#]&#13;&#10;[TextoParametros]"/>
</TfrxPageHeader>
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="670" Width="1009,13451" PrintOnLastPage="False">
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
<TfrxMemoView Name="Memo2" Align="baRight" Left="938,13451" Top="21" Width="71" Height="13" OnBeforePrint="Memo2OnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text=""/>
</TfrxPageFooter>
<TfrxGroupHeader Name="" Height="40" Left="0" Restrictions="2" Top="252" Width="1009,13451" Condition="frxDBInformeListadoFacturas.&#34;NOMBRE&#34;" ReprintOnNewPage="True">
<TfrxMemoView Name="Memo27" Left="0" Top="25" Width="88,77953" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Nº factura"/>
<TfrxMemoView Name="Memo28" Left="259,01577" Top="25" Width="384,96846" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Cliente"/>
<TfrxMemoView Name="Memo49" Left="643,98423" Top="25" Width="81,33859" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Situación"/>
<TfrxMemoView Name="Memo50" Left="725,32282" Top="25" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Base imponible"/>
<TfrxMemoView Name="Memo51" Left="820,32282" Top="25" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe IVA"/>
<TfrxMemoView Name="Memo52" Left="915,32282" Top="25" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo8" Left="88,77953" Top="25" Width="85,11812" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha"/>
<TfrxMemoView Name="Memo7" Left="0" Top="2,77953" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;NOMBRE&#34;]"/>
<TfrxMemoView Name="Memo1" Left="173,89765" Top="25" Width="85,11812" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha vto."/>
</TfrxGroupHeader>
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="312" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="frxDBInformeListadoFacturas" DataSetName="frxDBInformeListadoFacturas" RowCount="0" Stretched="True">
<TfrxMemoView Name="Memo4" Align="baLeft" Left="259,02" Top="0" Width="384,97" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;NOMBRE&#34;]"/>
<TfrxMemoView Name="Memo20" Align="baLeft" Left="643,99" Top="0" Width="81,34" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;SITUACION&#34;]"/>
<TfrxMemoView Name="Memo21" Align="baLeft" Left="88,78" Top="0" Width="85,12" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;FECHA_FACTURA&#34;]"/>
<TfrxMemoView Name="Memo18" Align="baLeft" Left="0" Top="0" Width="88,78" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;REFERENCIA&#34;]"/>
<TfrxMemoView Name="Memo29" Align="baLeft" Left="725,33" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;BASE_IMPONIBLE&#34;]"/>
<TfrxMemoView Name="Memo30" Align="baLeft" Left="820,33" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;IMPORTE_IVA&#34;]"/>
<TfrxMemoView Name="Memo31" Align="baLeft" Left="915,33" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;IMPORTE_TOTAL&#34;]"/>
<TfrxMemoView Name="Memo5" Align="baLeft" Left="173,9" Top="0" Width="85,12" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;FECHA_VENCIMIENTO&#34;]"/>
</TfrxMasterData>
<TfrxGroupFooter Name="" Height="17" Left="0" Top="349" Width="1009,13451">
<TfrxMemoView Name="Memo53" Align="baLeft" Left="0" Top="0" Width="725" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoFacturas.&#34;TITULO&#34;]:"/>
<TfrxMemoView Name="Memo6" Left="915" Top="0" Width="95" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturas.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo14" Left="820" Top="0" Width="95" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturas.&#34;IMPORTE_IVA&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo15" Left="725" Top="0" Width="95" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturas.&#34;BASE_IMPONIBLE&#34;&#62;,DatosMaestros1)]"/>
</TfrxGroupFooter>
<TfrxHeader Name="Header1" Height="75" Left="0" Top="426" Width="1009,13451">
<TfrxMemoView Name="Memo13" Left="0" Top="60" Width="383,62987" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Resumen por meses de facturas de cliente"/>
<TfrxMemoView Name="Memo16" Left="383,62987" Top="60" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Base imponible"/>
<TfrxMemoView Name="Memo17" Left="478,62987" Top="60" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe IVA"/>
<TfrxMemoView Name="Memo22" Left="573,62987" Top="60" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo23" Left="0" Top="25" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="Resumen por meses de las facturas de cliente"/>
</TfrxHeader>
<TfrxMasterData Name="DAtosMaestros2" Height="17" Left="0" Top="521" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSet="frxDBInformeListadoFacturasResumen" DataSetName="frxDBInformeListadoFacturasResumen" RowCount="0">
<TfrxMemoView Name="Memo9" Left="0" Top="0" Width="383,63" Height="17,00787402" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen.&#34;TITULO&#34;]"/>
<TfrxMemoView Name="Memo10" Left="383,63" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen.&#34;BASE_IMPONIBLE&#34;]"/>
<TfrxMemoView Name="Memo11" Left="478,63" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen.&#34;IMPORTE_IVA&#34;]"/>
<TfrxMemoView Name="Memo12" Left="573,63" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen.&#34;IMPORTE_TOTAL&#34;]"/>
</TfrxMasterData>
<TfrxReportSummary Name="ReportSummary1" Height="52" Left="0" Top="598" Width="1009,13451">
<TfrxMemoView Name="Memo24" Align="baLeft" Left="0" Top="0" Width="383,62987" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Total: "/>
<TfrxMemoView Name="Memo25" Align="baLeft" Left="383,62987" Top="0" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturasResumen.&#34;BASE_IMPONIBLE&#34;&#62;,DatosMaestros2)]"/>
<TfrxMemoView Name="Memo26" Align="baLeft" Left="478,62987" Top="0" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturasResumen.&#34;IMPORTE_IVA&#34;&#62;,DatosMaestros2)]"/>
<TfrxMemoView Name="Memo32" Align="baLeft" Left="573,62987" Top="0" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturasResumen.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros2)]"/>
</TfrxReportSummary>
<TfrxGroupHeader Name="GroupHeader1" Height="20" Left="0" Top="212" Width="1009,13451" Condition="frxDBInformeListadoFacturas.&#34;MES&#34;">
<TfrxMemoView Name="Memo33" Left="0" Top="2" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;TITULO&#34;]"/>
</TfrxGroupHeader>
<TfrxGroupFooter Name="GroupFooter1" Height="20" Left="0" Top="386" Width="1009,13451"/>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,84 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37800,8077143519" ReportOptions.Description.Text="" ReportOptions.LastChange="41572,7858621759" ScriptLanguage="PascalScript" ScriptText.Text="procedure Chart1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if (&#60;Ano1&#62; &#60;&#62; 0) then&#13;&#10; begin &#13;&#10; TLineSeries(Chart1.Series[0]).Title := 'Total facturado ' + VarToStr(&#60;Ano1&#62;);&#13;&#10; end;&#13;&#10; &#13;&#10; if (&#60;Ano2&#62; &#62; 0) then&#13;&#10; begin &#13;&#10; TLineSeries(Chart1.Series[1]).Title := 'Total facturado ' + VarToStr(&#60;Ano2&#62;);&#13;&#10; end&#13;&#10; else&#13;&#10; begin &#13;&#10; Chart1.Series[1].Active := False;&#13;&#10; end; &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo16OnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10; Valor:Double; &#13;&#10;begin&#13;&#10; Valor := SUM(&#60;frxDBInformeListadoFacturasGrafComp.&#34;IMPORTE_TOTAL1&#34;&#62;) * 100; &#13;&#10; if (SUM(&#60;frxDBInformeListadoFacturasGrafComp.&#34;IMPORTE_TOTAL&#34;&#62;) = 0) then&#13;&#10; Valor := 100 - Valor &#13;&#10; else&#13;&#10; Valor := 100 - (Valor/SUM(&#60;frxDBInformeListadoFacturasGrafComp.&#34;IMPORTE_TOTAL&#34;&#62;)); &#13;&#10;&#13;&#10; memo16.lines.add(FormatFloat('#,##0.00 %',Valor));&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo18OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if (&#60;Ano2&#62; &#62; 0) then&#13;&#10; begin&#13;&#10; Memo46.visible := True;&#13;&#10; Memo47.visible := True; &#13;&#10; Memo48.visible := True;&#13;&#10; Memo49.visible := True; &#13;&#10; Memo42.visible := True;&#13;&#10; Memo51.visible := True; &#13;&#10; end&#13;&#10; else&#13;&#10; begin&#13;&#10; Memo46.visible := False;&#13;&#10; Memo47.visible := False; &#13;&#10; Memo48.visible := False;&#13;&#10; Memo49.visible := False; &#13;&#10; Memo42.visible := False;&#13;&#10; Memo51.visible := False; &#13;&#10; end;&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;end. " ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403910003546F70021008446174617365747301010C7C00000020446174615365743D226672784442496E666F726D654C69737461646F4167656E7465734D61796F724661637475726163696F6E526573756D656E2220446174615365744E616D653D226672784442496E666F726D654C69737461646F4167656E7465734D61796F724661637475726163696F6E526573756D656E2200010C7A00000020446174615365743D226672784442496E666F726D654C69737461646F436C69656E7465734D61796F724465736375656E746F526573756D656E2220446174615365744E616D653D226672784442496E666F726D654C69737461646F436C69656E7465734D61796F724465736375656E746F526573756D656E2200010C7E00000020446174615365743D226672784442496E666F726D654C69737461646F436C69656E7465734D61796F724661637475726163696F6E526573756D656E2220446174615365744E616D653D226672784442496E666F726D654C69737461646F436C69656E7465734D61796F724661637475726163696F6E526573756D656E2200010C6000000020446174615365743D226672784442496E666F726D654C69737461646F466163747572617347726166436F6D702220446174615365744E616D653D226672784442496E666F726D654C69737461646F466163747572617347726166436F6D70220000095661726961626C657301010C12000000204E616D653D22205661726961626C65732200010C0D000000204E616D653D2253657269652200010C0C000000204E616D653D22416E6F312200010C0C000000204E616D653D22416E6F32220000055374796C650100">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10,00125" RightMargin="10,00125" TopMargin="10,00125" BottomMargin="10,00125" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxMasterData Name="MasterData1" Height="15" Left="0" Top="294" Width="718,101251175" ColumnWidth="0" ColumnGap="0" DataSet="frxDBInformeListadoFacturasGrafComp" DataSetName="frxDBInformeListadoFacturasGrafComp" RowCount="0">
<TfrxMemoView Name="Memo17" Left="113,93" Top="0" Width="131,66" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text="[frxDBInformeListadoFacturasGrafComp.&#34;IMPORTE_TOTAL&#34;]"/>
<TfrxMemoView Name="Memo1" Left="2" Top="0" Width="93,55" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HideZeros="True" ParentFont="False" Text="[frxDBInformeListadoFacturasGrafComp.&#34;DESCRIPCION&#34;]"/>
<TfrxMemoView Name="Memo2" Left="264,93" Top="0" Width="131,66" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text="[frxDBInformeListadoFacturasGrafComp.&#34;IMPORTE_TOTAL1&#34;]"/>
<TfrxMemoView Name="Memo3" Left="452" Top="0" Width="131,66" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text="[frxDBInformeListadoFacturasGrafComp.&#34;DIFERENCIA&#34;]"/>
<TfrxMemoView Name="Memo4" Left="605" Top="0" Width="111,66" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2n" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text="[frxDBInformeListadoFacturasGrafComp.&#34;PORCENTAJE&#34;] %"/>
</TfrxMasterData>
<TfrxMasterData Name="MasterData2" Height="301" Left="0" Top="364" Width="718,101251175" ColumnWidth="0" ColumnGap="0" DataSet="frxDBInformeListadoFacturasGrafComp" DataSetName="frxDBInformeListadoFacturasGrafComp" RowCount="0">
<TfrxChartView Name="Chart1" Left="4" Top="7" Width="709" Height="293" OnBeforePrint="Chart1OnBeforePrint" ShowHint="False" PropData="0543686172740A7E0200005450463006544368617274054368617274044C656674020003546F7002000557696474680390010648656967687403FA00144261636B57616C6C2E50656E2E56697369626C6508104C6567656E642E416C69676E6D656E7407086C61426F74746F6D114C6567656E642E426576656C5769647468020A0D4672616D652E56697369626C6508165669657733444F7074696F6E732E526F746174696F6E02000A426576656C4F75746572070662764E6F6E6505436F6C6F720707636C5768697465000A544261725365726965730753657269657331194D61726B732E43616C6C6F75742E42727573682E436F6C6F720707636C426C61636B0D4D61726B732E56697369626C6508055469746C65060A546F74616C20416E6F310F426172576964746850657263656E74023C124772616469656E742E446972656374696F6E070B6764546F70426F74746F6D0C5856616C7565732E4E616D650601580D5856616C7565732E4F72646572070B6C6F417363656E64696E670C5956616C7565732E4E616D6506034261720D5956616C7565732E4F7264657207066C6F4E6F6E6500000A544261725365726965730753657269657332194D61726B732E43616C6C6F75742E42727573682E436F6C6F720707636C426C61636B0D4D61726B732E56697369626C6508055469746C65060A546F74616C20416E6F320F426172576964746850657263656E74023C124772616469656E742E446972656374696F6E070B6764546F70426F74746F6D0C5856616C7565732E4E616D650601580D5856616C7565732E4F72646572070B6C6F417363656E64696E670C5956616C7565732E4E616D6506034261720D5956616C7565732E4F7264657207066C6F4E6F6E650000000E4368617274456C65766174696F6E0359010A5365726965734461746101010CB30100002044617461547970653D2264744442446174612220446174615365743D226672784442496E666F726D654C69737461646F466163747572617347726166436F6D702220446174615365744E616D653D226672784442496E666F726D654C69737461646F466163747572617347726166436F6D702220536F72744F726465723D22736F4E6F6E652220546F704E3D2230222058547970653D227874546578742220536F75726365313D226672784442496E666F726D654C69737461646F466163747572617347726166436F6D702E262333343B4445534352495043494F4E262333343B2220536F75726365323D226672784442496E666F726D654C69737461646F466163747572617347726166436F6D702E262333343B496D706F7274655F746F74616C262333343B222058536F757263653D226672784442496E666F726D654C69737461646F466163747572617347726166436F6D702E262333343B4445534352495043494F4E262333343B222059536F757263653D226672784442496E666F726D654C69737461646F466163747572617347726166436F6D702E262333343B496D706F7274655F746F74616C262333343B2200010C2D0100002044617461547970653D2264744442446174612220446174615365743D226672784442496E666F726D654C69737461646F466163747572617347726166436F6D702220446174615365744E616D653D226672784442496E666F726D654C69737461646F466163747572617347726166436F6D702220536F72744F726465723D22736F4E6F6E652220546F704E3D2230222058547970653D227874546578742220536F75726365323D226672784442496E666F726D654C69737461646F466163747572617347726166436F6D702E262333343B496D706F7274655F746F74616C31262333343B222059536F757263653D226672784442496E666F726D654C69737461646F466163747572617347726166436F6D702E262333343B496D706F7274655F746F74616C31262333343B220000"/>
</TfrxMasterData>
<TfrxPageHeader Name="Band1" Height="158,10235" Left="0" Top="16" Width="718,101251175" OnBeforePrint="Band1OnBeforePrint">
<TfrxShapeView Name="Shape5" Left="320,90569" Top="2,10235" Width="397" Height="134" ShowHint="False" Color="13095676" Shape="skRoundRectangle"/>
<TfrxMemoView Name="NombreCliente" Left="330,98423" Top="8,10235" Width="379,01577" Height="22" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO ESTADÍSTICO DE FACTURAS DE CLIENTE"/>
<TfrxMemoView Name="Memo7" Left="331" Top="33,10235" Width="378" Height="97" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Fecha del listado: [&#60;Date&#62;] - Página [Page#] de [TotalPages#]"/>
<TfrxLineView Name="Line1" Align="baLeft" Left="0" Top="129,10235" Width="312" Height="0" ShowHint="False" Frame.Color="5470709" Frame.Typ="4" Frame.Width="4"/>
<TfrxPictureView Name="Picture1" Left="3" Top="43" Width="160,03598" Height="80,03154" OnBeforePrint="Picture1OnBeforePrint" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" HightQuality="False"/>
</TfrxPageHeader>
<TfrxHeader Name="Header1" Height="40" Left="0" Top="234" Width="718,101251175">
<TfrxMemoView Name="Memo5" Left="2" Top="25" Width="93,55115913" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haCenter" ParentFont="False" Text="Intervalo"/>
<TfrxMemoView Name="Memo30" Left="113,92919" Top="25" Width="131,66138559" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haCenter" ParentFont="False" Text="Facturación (B.I)"/>
<TfrxMemoView Name="Memo9" Left="113" Top="4" Width="131,03927" Height="18,9" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" HAlign="haCenter" HideZeros="True" ParentFont="False" Text="Valores del año [&#60;Ano1&#62;]"/>
<TfrxMemoView Name="Memo10" Left="264,92919" Top="25" Width="131,66138559" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haCenter" ParentFont="False" Text="Facturación (B.I.)"/>
<TfrxMemoView Name="Memo11" Left="264" Top="4" Width="131,03927" Height="18,9" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" HAlign="haCenter" HideZeros="True" ParentFont="False" Text="Valores del año [&#60;Ano2&#62;]"/>
<TfrxMemoView Name="Memo12" Left="407" Top="4" Width="310,03927" Height="18,9" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" HideZeros="True" ParentFont="False" Text="Comparativa del año [&#60;Ano1&#62;] respecto al año [&#60;Ano2&#62;]"/>
<TfrxMemoView Name="Memo13" Left="452" Top="25" Width="131,66138559" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haCenter" ParentFont="False" Text="Diferencia"/>
<TfrxMemoView Name="Memo14" Left="605" Top="25" Width="111,66138559" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haCenter" ParentFont="False" Text="Porcentaje"/>
</TfrxHeader>
<TfrxFooter Name="Footer1" Height="15" Left="0" Top="329" Width="718,101251175">
<TfrxMemoView Name="Memo6" Left="113,93" Top="0" Width="131,66" Height="15" ShowHint="False" Color="13095676" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text="[SUM(&#60;frxDBInformeListadoFacturasGrafComp.&#34;IMPORTE_TOTAL&#34;&#62;)]"/>
<TfrxMemoView Name="Memo8" Left="264,93" Top="0" Width="131,66" Height="15" ShowHint="False" Color="13095676" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text="[SUM(&#60;frxDBInformeListadoFacturasGrafComp.&#34;IMPORTE_TOTAL1&#34;&#62;)]"/>
<TfrxMemoView Name="Memo15" Left="452" Top="0" Width="131,66" Height="15" ShowHint="False" Color="13095676" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text="[SUM(&#60;frxDBInformeListadoFacturasGrafComp.&#34;IMPORTE_TOTAL&#34;&#62;) - SUM(&#60;frxDBInformeListadoFacturasGrafComp.&#34;IMPORTE_TOTAL1&#34;&#62;)]"/>
<TfrxMemoView Name="Memo16" Left="605" Top="0" Width="111,66" Height="15" OnBeforePrint="Memo16OnBeforePrint" ShowHint="False" Color="13095676" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2n" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text=""/>
</TfrxFooter>
<TfrxMasterData Name="MasterData3" Height="15" Left="0" Top="750" Width="718,101251175" ColumnWidth="0" ColumnGap="0" DataSet="frxDBInformeListadoClientesMayorFacturacionResumen" DataSetName="frxDBInformeListadoClientesMayorFacturacionResumen" RowCount="0">
<TfrxMemoView Name="Memo23" Left="2" Top="0" Width="300" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoClientesMayorFacturacionResumen.&#34;NOMBRE&#34;]"/>
<TfrxMemoView Name="Memo24" Align="baLeft" Left="302" Top="0" Width="68" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoClientesMayorFacturacionResumen.&#34;NUMFAC&#34;] "/>
<TfrxMemoView Name="Memo25" Align="baLeft" Left="370" Top="0" Width="128" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoClientesMayorFacturacionResumen.&#34;IMPORTE_TOTAL_ANO1&#34;] "/>
<TfrxMemoView Name="Memo26" Align="baLeft" Left="628" Top="0" Width="90" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoClientesMayorFacturacionResumen.&#34;PORCENTAJE&#34;] % "/>
<TfrxMemoView Name="Memo47" Align="baLeft" Left="498" Top="0" Width="130" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoClientesMayorFacturacionResumen.&#34;IMPORTE_TOTAL_ANO2&#34;] "/>
</TfrxMasterData>
<TfrxMasterData Name="MasterData4" Height="15" Left="0" Top="850" Width="718,101251175" ColumnWidth="0" ColumnGap="0" DataSet="frxDBInformeListadoClientesMayorDescuentoResumen" DataSetName="frxDBInformeListadoClientesMayorDescuentoResumen" RowCount="0">
<TfrxMemoView Name="Memo34" Left="2" Top="0" Width="286" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoClientesMayorDescuentoResumen.&#34;NOMBRE&#34;]"/>
<TfrxMemoView Name="Memo35" Align="baLeft" Left="288" Top="0" Width="90" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text=" [frxDBInformeListadoClientesMayorDescuentoResumen.&#34;IMPORTE_DESCUENTO&#34;] "/>
<TfrxMemoView Name="Memo36" Align="baLeft" Left="468" Top="0" Width="90" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoClientesMayorDescuentoResumen.&#34;IMPORTE_TOTAL&#34;] "/>
<TfrxMemoView Name="Memo37" Align="baLeft" Left="558" Top="0" Width="90" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoClientesMayorDescuentoResumen.&#34;IMPORTE_COBRADO&#34;]"/>
<TfrxMemoView Name="Memo38" Align="baLeft" Left="648" Top="0" Width="70" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text=" [frxDBInformeListadoClientesMayorDescuentoResumen.&#34;PORCENTAJE&#34;] % "/>
<TfrxMemoView Name="Memo49" Align="baLeft" Left="378" Top="0" Width="90" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoClientesMayorDescuentoResumen.&#34;IMPORTE_DESCUENTO2&#34;] "/>
</TfrxMasterData>
<TfrxHeader Name="Header2" Height="45" Left="0" Top="685" Width="718,101251175">
<TfrxMemoView Name="Memo18" Left="2" Top="30" Width="300" Height="15" OnBeforePrint="Memo18OnBeforePrint" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" ParentFont="False" Text="Nombre"/>
<TfrxMemoView Name="Memo19" Align="baLeft" Left="302" Top="30" Width="68" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haRight" ParentFont="False" Text="Nº facturas"/>
<TfrxMemoView Name="Memo20" Left="3" Top="9" Width="259,03927" Height="18,9" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="5" HideZeros="True" ParentFont="False" Text="Clientes con mayor capital facturado"/>
<TfrxMemoView Name="Memo21" Align="baLeft" Left="370" Top="30" Width="128" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haRight" ParentFont="False" Text="Imp. total (B.I.) [&#60;Ano1&#62;]"/>
<TfrxMemoView Name="Memo22" Align="baLeft" Left="628" Top="30" Width="90" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haRight" ParentFont="False" Text="Porcentaje (%)"/>
<TfrxMemoView Name="Memo46" Align="baLeft" Left="498" Top="30" Width="130" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haRight" ParentFont="False" Text="Imp. total (B.I.) [&#60;Ano2&#62;]"/>
</TfrxHeader>
<TfrxHeader Name="Header3" Height="45" Left="0" Top="785" Width="718,101251175">
<TfrxMemoView Name="Memo27" Left="2" Top="30" Width="286" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" ParentFont="False" Text="Nombre"/>
<TfrxMemoView Name="Memo28" Align="baLeft" Left="288" Top="30" Width="90" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haRight" ParentFont="False" Text="Imp. Dto. [&#60;Ano1&#62;]"/>
<TfrxMemoView Name="Memo29" Left="3" Top="9" Width="285,03927" Height="18,9" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="5" HideZeros="True" ParentFont="False" Text="Clientes con mayor descuento aplicado"/>
<TfrxMemoView Name="Memo31" Align="baLeft" Left="468" Top="30" Width="90" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haRight" ParentFont="False" Text="Imp total (Neto)"/>
<TfrxMemoView Name="Memo32" Align="baLeft" Left="648" Top="30" Width="70" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haRight" ParentFont="False" Text="Medio (%)"/>
<TfrxMemoView Name="Memo33" Align="baLeft" Left="558" Top="30" Width="90" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haRight" ParentFont="False" Text="Imp. cobrado (B.I)"/>
<TfrxMemoView Name="Memo48" Align="baLeft" Left="378" Top="30" Width="90" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haRight" ParentFont="False" Text="Imp. dto. [&#60;Ano2&#62;]"/>
</TfrxHeader>
<TfrxMasterData Name="MasterData5" Height="15" Left="0" Top="945" Width="718,101251175" ColumnWidth="0" ColumnGap="0" DataSet="frxDBInformeListadoAgentesMayorFacturacionResumen" DataSetName="frxDBInformeListadoAgentesMayorFacturacionResumen" RowCount="0">
<TfrxMemoView Name="Memo40" Left="2" Top="1" Width="351" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoAgentesMayorFacturacionResumen.&#34;NOMBRE&#34;]"/>
<TfrxMemoView Name="Memo44" Align="baLeft" Left="353" Top="1" Width="130" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoAgentesMayorFacturacionResumen.&#34;IMPORTE_TOTAL_ANO1&#34;] "/>
<TfrxMemoView Name="Memo45" Align="baLeft" Left="613" Top="1" Width="105" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoAgentesMayorFacturacionResumen.&#34;PORCENTAJE&#34;] % "/>
<TfrxMemoView Name="Memo51" Align="baLeft" Left="483" Top="1" Width="130" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoAgentesMayorFacturacionResumen.&#34;IMPORTE_TOTAL_ANO2&#34;] "/>
</TfrxMasterData>
<TfrxHeader Name="Header4" Height="40" Left="0" Top="885" Width="718,101251175">
<TfrxMemoView Name="Memo39" Left="2" Top="26" Width="351" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" ParentFont="False" Text="Nombre"/>
<TfrxMemoView Name="Memo41" Left="3" Top="4" Width="285,03927" Height="18,9" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="5" HideZeros="True" ParentFont="False" Text="Agentes con mayor capital facturado"/>
<TfrxMemoView Name="Memo42" Align="baLeft" Left="483" Top="26" Width="130" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haRight" ParentFont="False" Text="Imp. total (B.I.)[&#60;Ano2&#62;]"/>
<TfrxMemoView Name="Memo43" Align="baLeft" Left="613" Top="26" Width="105" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haRight" ParentFont="False" Text="Porcentaje (%)"/>
<TfrxMemoView Name="Memo50" Align="baLeft" Left="353" Top="26" Width="130" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haRight" ParentFont="False" Text="Imp. total (B.I.)[&#60;Ano1&#62;]"/>
</TfrxHeader>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,39 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37800,8077143519" ReportOptions.Description.Text="" ReportOptions.LastChange="40585,5330131134" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if Engine.FinalPass then&#13;&#10; begin&#13;&#10; if (&#60;Page#&#62; = &#60;TotalPages#&#62;) then&#13;&#10; begin &#13;&#10; mContinua.Visible := False;&#13;&#10; end &#13;&#10; else&#13;&#10; begin &#13;&#10; mContinua.Visible := True;&#13;&#10; end &#13;&#10; end; &#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403990003546F70021008446174617365747301010C6400000020446174615365743D226672784442496E666F726D654C69737461646F466163747572617350656E6469656E7465732220446174615365744E616D653D226672784442496E666F726D654C69737461646F466163747572617350656E6469656E746573220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxPageHeader Name="Band1" Height="140" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
<TfrxPictureView Name="Logotipo" Left="0" Top="3,10235" Width="80" Height="88" ShowHint="False" HightQuality="False"/>
<TfrxMemoView Name="DatosEmpresa" Left="80" Top="3,10235" Width="232" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
<TfrxLineView Name="Line1" Align="baLeft" Left="0" Top="95,10235" Width="312" Height="0" ShowHint="False" Frame.Color="32768" Frame.Typ="4" Frame.Width="4"/>
<TfrxShapeView Name="Shape5" Left="513" Top="3" Width="495" Height="129" ShowHint="False" Color="13434828" Shape="skRoundRectangle"/>
<TfrxMemoView Name="NombreCliente" Left="521,85807" Top="12" Width="478" Height="19" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE FACTURAS DE CLIENTE PENDIENTES"/>
<TfrxMemoView Name="Memo3" Left="521,85807" Top="33,89765" Width="478" Height="91" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Fecha del listado: [&#60;Date&#62;] - Página [Page#] de [TotalPages#]&#13;&#10;[TextoParametros]"/>
</TfrxPageHeader>
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="394" Width="1009,13451" PrintOnLastPage="False">
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
</TfrxPageFooter>
<TfrxGroupHeader Name="" Height="40" Left="0" Restrictions="2" Top="216" Width="1009,13451" Condition="frxDBInformeListadoFacturasPendientes.&#34;MES&#34;" ReprintOnNewPage="True">
<TfrxMemoView Name="Memo52" Left="718,11023622" Top="25" Width="154,89765" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo27" Left="0" Top="25" Width="135,69639" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Nº factura"/>
<TfrxMemoView Name="Memo28" Left="304,5906" Top="25" Width="413,37004213" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Cliente"/>
<TfrxMemoView Name="Memo49" Left="873" Top="25" Width="135,50393701" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Situación"/>
<TfrxMemoView Name="Memo8" Left="135" Top="25" Width="85,0393700787402" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha"/>
<TfrxMemoView Name="Memo7" Left="0" Top="2,77953" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturasPendientes.&#34;TITULO&#34;]"/>
<TfrxMemoView Name="Memo1" Left="219,7718" Top="24,9448818897638" Width="85,03937008" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha vto."/>
</TfrxGroupHeader>
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="276" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="frxDBInformeListadoFacturasPendientes" DataSetName="frxDBInformeListadoFacturasPendientes" RowCount="0" Stretched="True">
<TfrxMemoView Name="Memo31" Left="718,11023622" Top="0" Width="155,76377953" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasPendientes.&#34;IMPORTE_TOTAL&#34;] "/>
<TfrxMemoView Name="Memo4" Left="304,71" Top="0" Width="413,37004213" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturasPendientes.&#34;NOMBRE&#34;]"/>
<TfrxMemoView Name="Memo20" Left="873,70903" Top="0" Width="135,5" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturasPendientes.&#34;SITUACION&#34;]"/>
<TfrxMemoView Name="Memo21" Left="134,92913386" Top="0" Width="85,04901" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturasPendientes.&#34;FECHA_FACTURA&#34;]"/>
<TfrxMemoView Name="Memo18" Left="0" Top="0" Width="134,92913386" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturasPendientes.&#34;REFERENCIA&#34;]"/>
<TfrxMemoView Name="Memo5" Left="220,21274" Top="0" Width="85,02" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoFacturasPendientes.&#34;FECHA_VENCIMIENTO&#34;]"/>
</TfrxMasterData>
<TfrxGroupFooter Name="" Height="20,78740402" Left="0" Top="313" Width="1009,13451">
<TfrxMemoView Name="Memo6" Left="717,73228346" Top="0,37774772" Width="155,14173228" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturasPendientes.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros1)] "/>
<TfrxMemoView Name="Memo14" Left="872,87401574" Top="0,37774772" Width="135,5" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text=""/>
<TfrxMemoView Name="Memo53" Left="0" Top="0,37774772" Width="717,73228346" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoFacturasPendientes.&#34;TITULO&#34;]:"/>
</TfrxGroupFooter>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,43 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37800,8077143519" ReportOptions.Description.Text="" ReportOptions.LastChange="40585,5332376389" ScriptLanguage="PascalScript" ScriptText.Text="&#13;&#10;procedure mContinuaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if Engine.FinalPass then&#13;&#10; begin&#13;&#10; if (&#60;Page#&#62; = &#60;TotalPages#&#62;) then&#13;&#10; begin &#13;&#10; mContinua.Visible := False;&#13;&#10; end &#13;&#10; else&#13;&#10; begin &#13;&#10; mContinua.Visible := True;&#13;&#10; end &#13;&#10; end; &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403990003546F70021008446174617365747301010C6400000020446174615365743D226672784442496E666F726D654C69737461646F466163747572617350656E6469656E7465732220446174615365744E616D653D226672784442496E666F726D654C69737461646F466163747572617350656E6469656E746573220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxPageHeader Name="Band1" Height="140" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
<TfrxPictureView Name="Logotipo" Left="0" Top="3,10235" Width="80" Height="88" ShowHint="False" HightQuality="False"/>
<TfrxMemoView Name="DatosEmpresa" Left="80" Top="3,10235" Width="232" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
<TfrxLineView Name="Line1" Align="baLeft" Left="0" Top="95,10235" Width="312" Height="0" ShowHint="False" Frame.Color="32768" Frame.Typ="4" Frame.Width="4"/>
<TfrxShapeView Name="Shape5" Left="512" Top="6" Width="495" Height="129" ShowHint="False" Color="13434828" Shape="skRoundRectangle"/>
<TfrxMemoView Name="NombreCliente" Left="520,85807" Top="15" Width="478" Height="19" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE FACTURAS DE CLIENTE PENDIENTES"/>
<TfrxMemoView Name="Memo3" Left="520,85807" Top="36,89765" Width="478" Height="91" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Fecha del listado: [&#60;Date&#62;] - Página [Page#] de [TotalPages#]&#13;&#10;[TextoParametros]"/>
</TfrxPageHeader>
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="474" Width="1009,13451" PrintOnLastPage="False">
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
</TfrxPageFooter>
<TfrxGroupHeader Name="" Height="40" Left="0" Restrictions="2" Top="256" Width="1009,13451" Condition="frxDBInformeListadoFacturasPendientes.&#34;NOMBRE&#34;" ReprintOnNewPage="True">
<TfrxMemoView Name="Memo52" Left="718,11023622" Top="25" Width="154,89765" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo27" Left="0" Top="25" Width="135,69639" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Nº factura"/>
<TfrxMemoView Name="Memo28" Left="304,5906" Top="25" Width="413,37004213" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Cliente"/>
<TfrxMemoView Name="Memo49" Left="873" Top="25" Width="135,50393701" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Situación"/>
<TfrxMemoView Name="Memo8" Left="135" Top="25" Width="85,0393700787402" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha"/>
<TfrxMemoView Name="Memo7" Left="0" Top="1,77953" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturasPendientes.&#34;NOMBRE&#34;]"/>
<TfrxMemoView Name="Memo1" Left="219,7718" Top="24,9448818897638" Width="85,03937008" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha vto."/>
</TfrxGroupHeader>
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="316" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="frxDBInformeListadoFacturasPendientes" DataSetName="frxDBInformeListadoFacturasPendientes" RowCount="0" Stretched="True">
<TfrxMemoView Name="Memo31" Left="718,11023622" Top="0" Width="155,76377953" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasPendientes.&#34;IMPORTE_TOTAL&#34;] "/>
<TfrxMemoView Name="Memo4" Left="304,71" Top="0" Width="413,37004213" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturasPendientes.&#34;NOMBRE&#34;]"/>
<TfrxMemoView Name="Memo20" Left="873,70903" Top="0" Width="135,5" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturasPendientes.&#34;SITUACION&#34;]"/>
<TfrxMemoView Name="Memo21" Left="134,92913386" Top="0" Width="85,04901" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturasPendientes.&#34;FECHA_FACTURA&#34;]"/>
<TfrxMemoView Name="Memo18" Left="0" Top="0" Width="134,92913386" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturasPendientes.&#34;REFERENCIA&#34;]"/>
<TfrxMemoView Name="Memo5" Left="220,21274" Top="0" Width="85,02" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoFacturasPendientes.&#34;FECHA_VENCIMIENTO&#34;]"/>
</TfrxMasterData>
<TfrxGroupFooter Name="" Height="20,78740402" Left="0" Top="353" Width="1009,13451">
<TfrxMemoView Name="Memo6" Left="717,73228346" Top="0,37774772" Width="155,14173228" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturasPendientes.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros1)] "/>
<TfrxMemoView Name="Memo14" Left="872,87401574" Top="0,37774772" Width="135,5" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text=""/>
<TfrxMemoView Name="Memo53" Left="0" Top="0,37774772" Width="717,73228346" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoFacturasPendientes.&#34;TITULO&#34;]:"/>
</TfrxGroupFooter>
<TfrxGroupHeader Name="GroupHeader1" Height="20" Left="0" Top="216" Width="1009,13451" Condition="frxDBInformeListadoFacturasPendientes.&#34;MES&#34;">
<TfrxMemoView Name="Memo9" Left="0" Top="1" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturasPendientes.&#34;TITULO&#34;]"/>
</TfrxGroupHeader>
<TfrxGroupFooter Name="GroupFooter1" Height="20" Left="0" Top="394" Width="1009,13451"/>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,63 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37800,8077143519" ReportOptions.Description.Text="" ReportOptions.LastChange="40585,533636088" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if Engine.FinalPass then&#13;&#10; begin&#13;&#10; if (&#60;Page#&#62; = &#60;TotalPages#&#62;) then&#13;&#10; begin &#13;&#10; mContinua.Visible := False;&#13;&#10; end &#13;&#10; else&#13;&#10; begin &#13;&#10; mContinua.Visible := True;&#13;&#10; end &#13;&#10; end;&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403990003546F70021008446174617365747301010C5000000020446174615365743D226672784442496E666F726D654C69737461646F46616374757261732220446174615365744E616D653D226672784442496E666F726D654C69737461646F46616374757261732200010C5E00000020446174615365743D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E2220446174615365744E616D653D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C35000000204E616D653D22546578746F506172616D6574726F73222056616C75653D22262336303B4665636861496E6963696F262336323B220000055374796C650100">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
<TfrxPictureView Name="Logotipo" Left="0" Top="37,10235" Width="80" Height="88" ShowHint="False" HightQuality="False"/>
<TfrxMemoView Name="DatosEmpresa" Left="80" Top="37,10235" Width="232" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
<TfrxLineView Name="Line1" Align="baLeft" Left="0" Top="129,10235" Width="312" Height="0" ShowHint="False" Frame.Color="32768" Frame.Typ="4" Frame.Width="4"/>
<TfrxShapeView Name="Shape5" Left="541" Top="8" Width="465" Height="122" ShowHint="False" Color="13434828" Frame.Width="0,1" Shape="skRoundRectangle"/>
<TfrxMemoView Name="NombreCliente" Left="544,85807" Top="13" Width="452" Height="16,88188" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE FACTURAS DE PROVEEDOR"/>
<TfrxMemoView Name="Memo3" Left="544,85807" Top="33" Width="452" Height="91" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Fecha del listado: [&#60;Date&#62;] - Página [Page#] de [TotalPages#]&#13;&#10;[TextoParametros]"/>
</TfrxPageHeader>
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="596" Width="1009,13451" PrintOnLastPage="False">
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
</TfrxPageFooter>
<TfrxGroupHeader Name="" Height="40" Left="0" Restrictions="2" Top="212" Width="1009,13451" Condition="frxDBInformeListadoFacturas.&#34;MES&#34;" ReprintOnNewPage="True">
<TfrxMemoView Name="Memo27" Left="0" Top="25" Width="88,77953" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Nº factura"/>
<TfrxMemoView Name="Memo28" Left="256,92919" Top="25" Width="387,4094" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text=" Proveedor"/>
<TfrxMemoView Name="Memo49" Left="644" Top="25" Width="81,33859" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Situación"/>
<TfrxMemoView Name="Memo50" Left="724" Top="25" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Base imponible"/>
<TfrxMemoView Name="Memo51" Left="818,57483" Top="25" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe IVA"/>
<TfrxMemoView Name="Memo52" Left="913,35436" Top="25" Width="94,48818898" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo8" Left="88" Top="25" Width="85,03937008" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha"/>
<TfrxMemoView Name="Memo7" Left="0" Top="2,77953" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;TITULO&#34;]"/>
<TfrxMemoView Name="Memo1" Left="172,85838" Top="25" Width="85,03937008" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha vto."/>
</TfrxGroupHeader>
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="272" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="frxDBInformeListadoFacturas" DataSetName="frxDBInformeListadoFacturas" RowCount="0">
<TfrxMemoView Name="Memo4" Left="257,59060732" Top="0" Width="386,8188415" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="14" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;NOMBRE&#34;]"/>
<TfrxMemoView Name="Memo20" Left="644,40944882" Top="0" Width="79,748031496063" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;SITUACION&#34;]"/>
<TfrxMemoView Name="Memo21" Left="88,06299213" Top="0" Width="85,0393652" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;FECHA_FACTURA&#34;]"/>
<TfrxMemoView Name="Memo18" Left="0" Top="0" Width="88,0629921259843" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;REFERENCIA&#34;]"/>
<TfrxMemoView Name="Memo29" Left="724,15748031" Top="0" Width="94,48818898" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;BASE_IMPONIBLE&#34;]"/>
<TfrxMemoView Name="Memo30" Left="818,26771654" Top="0" Width="95,24409449" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;IMPORTE_IVA&#34;]"/>
<TfrxMemoView Name="Memo31" Left="912,75590551" Top="0" Width="94,64276" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="14" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;IMPORTE_TOTAL&#34;]"/>
<TfrxMemoView Name="Memo5" Left="172,85838" Top="0" Width="85,0393652" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;FECHA_VENCIMIENTO&#34;]"/>
</TfrxMasterData>
<TfrxGroupFooter Name="" Height="20,78740402" Left="0" Top="309" Width="1009,13451">
<TfrxMemoView Name="Memo53" Left="0" Top="0,37774772" Width="723,77952756" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoFacturas.&#34;TITULO&#34;]:"/>
<TfrxMemoView Name="Memo6" Left="913,51181102" Top="0,37774772" Width="94,48818898" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturas.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo14" Left="817,13385827" Top="0,37774772" Width="96,3779527559055" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturas.&#34;IMPORTE_IVA&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo15" Left="724,15748031" Top="0,37774772" Width="94,1102362204724" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturas.&#34;BASE_IMPONIBLE&#34;&#62;,DatosMaestros1)]"/>
</TfrxGroupFooter>
<TfrxMasterData Name="DatosMaestros2" Height="17,00787402" Left="0" Top="446" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSet="frxDBInformeListadoFacturasResumen" DataSetName="frxDBInformeListadoFacturasResumen" RowCount="0">
<TfrxMemoView Name="Memo9" Left="0" Top="0" Width="381,63" Height="17,00787402" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen.&#34;TITULO&#34;]"/>
<TfrxMemoView Name="Memo10" Left="381,65368" Top="0" Width="94,48818898" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen.&#34;BASE_IMPONIBLE&#34;]"/>
<TfrxMemoView Name="Memo11" Left="476,3624" Top="0" Width="95,24409449" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen.&#34;IMPORTE_IVA&#34;]"/>
<TfrxMemoView Name="Memo12" Left="571,09" Top="0" Width="94,49" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen.&#34;IMPORTE_TOTAL&#34;]"/>
</TfrxMasterData>
<TfrxHeader Name="Header1" Height="75,59055118" Left="0" Top="350" Width="1009,13451">
<TfrxMemoView Name="Memo13" Align="baBottom" Left="0" Top="60,59055118" Width="381,62987" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Resumen por meses de facturas de proveedor"/>
<TfrxMemoView Name="Memo16" Align="baBottom" Left="381,73253" Top="60,59055118" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Base imponible"/>
<TfrxMemoView Name="Memo17" Align="baBottom" Left="476,30736" Top="60,59055118" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe IVA"/>
<TfrxMemoView Name="Memo22" Align="baBottom" Left="571,08689" Top="60,59055118" Width="94,48818898" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo23" Left="0" Top="30,23624" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="Resumen por meses de las facturas de proveedor"/>
</TfrxHeader>
<TfrxReportSummary Name="ReportSummary1" Height="52,91342" Left="0" Top="523" Width="1009,13451">
<TfrxMemoView Name="Memo24" Left="0" Top="0,11812" Width="383,62987" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Total: "/>
<TfrxMemoView Name="Memo25" Left="381,73253" Top="0,11812" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturasResumen.&#34;BASE_IMPONIBLE&#34;&#62;,DatosMaestros2)]"/>
<TfrxMemoView Name="Memo26" Left="476,30736" Top="0,11812" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturasResumen.&#34;IMPORTE_IVA&#34;&#62;,DatosMaestros2)]"/>
<TfrxMemoView Name="Memo32" Left="571,08689" Top="0,11812" Width="94,48818898" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturasResumen.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros2)]"/>
</TfrxReportSummary>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,68 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37800,8077143519" ReportOptions.Description.Text="" ReportOptions.LastChange="40585,5337899537" ScriptLanguage="PascalScript" ScriptText.Text="procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; Set('Pagina', 0);&#13;&#10; Set('TotalPaginas', 0); &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Band1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if not Engine.FinalPass then&#13;&#10; Set('TotalPaginas', (&#60;TotalPaginas&#62; + 1));&#13;&#10;&#13;&#10; if Engine.FinalPass then&#13;&#10; Set('Pagina', (&#60;Pagina&#62; + 1)); &#13;&#10;end;&#13;&#10;&#13;&#10;procedure mContinuaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if Engine.FinalPass then&#13;&#10; begin&#13;&#10; //A la vez que salta este salta la asignacion de pagina por lo que no coincide nunca si no suponemos +1 &#13;&#10; if ((&#60;Pagina&#62; + 1) = &#60;TotalPaginas&#62;) then&#13;&#10; begin &#13;&#10; mContinua.Visible := True;&#13;&#10; end &#13;&#10; else&#13;&#10; begin &#13;&#10; mContinua.Visible := False;&#13;&#10; end &#13;&#10; end; &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403990003546F70021008446174617365747301010C5000000020446174615365743D226672784442496E666F726D654C69737461646F46616374757261732220446174615365744E616D653D226672784442496E666F726D654C69737461646F46616374757261732200010C5E00000020446174615365743D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E2220446174615365744E616D653D226672784442496E666F726D654C69737461646F4661637475726173526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C35000000204E616D653D22546578746F506172616D6574726F73222056616C75653D22262336303B4665636861496E6963696F262336323B220000055374796C650100">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
<TfrxPictureView Name="Logotipo" Left="0" Top="37,10235" Width="80" Height="88" ShowHint="False" HightQuality="False"/>
<TfrxMemoView Name="DatosEmpresa" Left="80" Top="37,10235" Width="232" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
<TfrxLineView Name="Line1" Align="baLeft" Left="0" Top="129,10235" Width="312" Height="0" ShowHint="False" Frame.Color="32768" Frame.Typ="4" Frame.Width="4"/>
<TfrxShapeView Name="Shape5" Left="543" Top="9" Width="465" Height="122" ShowHint="False" Color="13434828" Frame.Width="0,1" Shape="skRoundRectangle"/>
<TfrxMemoView Name="NombreCliente" Left="546,85807" Top="14" Width="452" Height="16,88188" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE FACTURAS DE PROVEEDOR"/>
<TfrxMemoView Name="Memo3" Left="546,85807" Top="34" Width="452" Height="91" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Fecha del listado: [&#60;Date&#62;] - Página [Page#] de [TotalPages#]&#13;&#10;[TextoParametros]"/>
</TfrxPageHeader>
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="682" Width="1009,13451" PrintOnLastPage="False">
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
</TfrxPageFooter>
<TfrxGroupHeader Name="" Height="40" Left="0" Restrictions="2" Top="255" Width="1009,13451" Condition="frxDBInformeListadoFacturas.&#34;NOMBRE&#34;" ReprintOnNewPage="True">
<TfrxMemoView Name="Memo27" Left="0" Top="25" Width="88,77953" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Nº factura"/>
<TfrxMemoView Name="Memo28" Left="256,92919" Top="25" Width="387,4094" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text=" Proveedor"/>
<TfrxMemoView Name="Memo49" Left="644" Top="25" Width="81,33859" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Situación"/>
<TfrxMemoView Name="Memo50" Left="724" Top="25" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Base imponible"/>
<TfrxMemoView Name="Memo51" Left="818,57483" Top="25" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe IVA"/>
<TfrxMemoView Name="Memo52" Left="913,35436" Top="25" Width="94,48818898" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo8" Left="88" Top="25" Width="85,03937008" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha"/>
<TfrxMemoView Name="Memo7" Left="0" Top="2,77953" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;NOMBRE&#34;]"/>
<TfrxMemoView Name="Memo1" Left="172,85838" Top="25" Width="85,03937008" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha vto."/>
</TfrxGroupHeader>
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="315" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="frxDBInformeListadoFacturas" DataSetName="frxDBInformeListadoFacturas" RowCount="0">
<TfrxMemoView Name="Memo4" Left="257,59060732" Top="0" Width="386,8188415" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="14" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;NOMBRE&#34;]"/>
<TfrxMemoView Name="Memo20" Left="644,40944882" Top="0" Width="79,748031496063" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;SITUACION&#34;]"/>
<TfrxMemoView Name="Memo21" Left="88,06299213" Top="0" Width="85,0393652" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;FECHA_FACTURA&#34;]"/>
<TfrxMemoView Name="Memo18" Left="0" Top="0" Width="88,0629921259843" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;REFERENCIA&#34;]"/>
<TfrxMemoView Name="Memo29" Left="724,15748031" Top="0" Width="94,48818898" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;BASE_IMPONIBLE&#34;]"/>
<TfrxMemoView Name="Memo30" Left="818,26771654" Top="0" Width="95,24409449" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;IMPORTE_IVA&#34;]"/>
<TfrxMemoView Name="Memo31" Left="913,35" Top="0" Width="94,49" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="14" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;IMPORTE_TOTAL&#34;]"/>
<TfrxMemoView Name="Memo5" Left="172,85838" Top="0" Width="85,0393652" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoFacturas.&#34;FECHA_VENCIMIENTO&#34;]"/>
</TfrxMasterData>
<TfrxGroupFooter Name="" Height="20,78740402" Left="0" Top="352" Width="1009,13451">
<TfrxMemoView Name="Memo53" Left="0" Top="0,37774772" Width="723,77952756" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoFacturas.&#34;TITULO&#34;]:"/>
<TfrxMemoView Name="Memo6" Left="913,35" Top="0,37774772" Width="94,48818898" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturas.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo14" Left="817,13385827" Top="0,37774772" Width="96,3779527559055" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturas.&#34;IMPORTE_IVA&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo15" Left="724,15748031" Top="0,37774772" Width="94,1102362204724" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturas.&#34;BASE_IMPONIBLE&#34;&#62;,DatosMaestros1)]"/>
</TfrxGroupFooter>
<TfrxMasterData Name="DatosMaestros2" Height="17,00787402" Left="0" Top="532" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSet="frxDBInformeListadoFacturasResumen" DataSetName="frxDBInformeListadoFacturasResumen" RowCount="0">
<TfrxMemoView Name="Memo9" Left="0" Top="0" Width="381,63" Height="17,00787402" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen.&#34;TITULO&#34;]"/>
<TfrxMemoView Name="Memo10" Left="381,65368" Top="0" Width="94,48818898" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="12" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen.&#34;BASE_IMPONIBLE&#34;]"/>
<TfrxMemoView Name="Memo11" Left="476,3624" Top="0" Width="95,24409449" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="13" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen.&#34;IMPORTE_IVA&#34;]"/>
<TfrxMemoView Name="Memo12" Left="571,09" Top="0" Width="94,49" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasResumen.&#34;IMPORTE_TOTAL&#34;]"/>
</TfrxMasterData>
<TfrxHeader Name="Header1" Height="75,59055118" Left="0" Top="436" Width="1009,13451">
<TfrxMemoView Name="Memo13" Align="baBottom" Left="0" Top="60,59055118" Width="381,62987" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Resumen por meses de facturas de proveedor"/>
<TfrxMemoView Name="Memo16" Align="baBottom" Left="381,73253" Top="60,59055118" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Base imponible"/>
<TfrxMemoView Name="Memo17" Align="baBottom" Left="476,30736" Top="60,59055118" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe IVA"/>
<TfrxMemoView Name="Memo22" Align="baBottom" Left="571,08689" Top="60,59055118" Width="94,48818898" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo23" Left="0" Top="30,23624" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="Resumen por meses de las facturas de proveedor"/>
</TfrxHeader>
<TfrxReportSummary Name="ReportSummary1" Height="52,91342" Left="0" Top="609" Width="1009,13451">
<TfrxMemoView Name="Memo2" Align="baRight" Left="938,13451" Top="16,03896" Width="71" Height="13" OnBeforePrint="Memo2OnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text=""/>
<TfrxMemoView Name="Memo24" Left="0" Top="0,11812" Width="383,62987" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Total: "/>
<TfrxMemoView Name="Memo25" Left="381,73253" Top="0,11812" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturasResumen.&#34;BASE_IMPONIBLE&#34;&#62;,DatosMaestros2)]"/>
<TfrxMemoView Name="Memo26" Left="476,30736" Top="0,11812" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturasResumen.&#34;IMPORTE_IVA&#34;&#62;,DatosMaestros2)]"/>
<TfrxMemoView Name="Memo32" Left="571,08689" Top="0,11812" Width="94,49" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturasResumen.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros2)]"/>
</TfrxReportSummary>
<TfrxGroupHeader Name="GroupHeader1" Height="22,67718" Left="0" Top="212" Width="1009,13451" Condition="frxDBInformeListadoFacturas.&#34;MES&#34;">
<TfrxMemoView Name="Memo33" Left="0" Top="3,77953" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturas.&#34;TITULO&#34;]"/>
</TfrxGroupHeader>
<TfrxGroupFooter Name="GroupFooter1" Height="22,67718" Left="0" Top="393" Width="1009,13451"/>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,71 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37800,8077143519" ReportOptions.Description.Text="" ReportOptions.LastChange="41572,78611625" ScriptLanguage="PascalScript" ScriptText.Text="procedure Chart1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if (&#60;Ano1&#62; &#60;&#62; 0) then&#13;&#10; begin &#13;&#10; TLineSeries(Chart1.Series[0]).Title := 'Total facturado ' + VarToStr(&#60;Ano1&#62;);&#13;&#10; end;&#13;&#10; &#13;&#10; if (&#60;Ano2&#62; &#62; 0) then&#13;&#10; begin &#13;&#10; TLineSeries(Chart1.Series[1]).Title := 'Total facturado ' + VarToStr(&#60;Ano2&#62;);&#13;&#10; end&#13;&#10; else&#13;&#10; begin &#13;&#10; Chart1.Series[1].Active := False;&#13;&#10; end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo16OnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10; Valor:Double; &#13;&#10;begin&#13;&#10; &#13;&#10; Valor := SUM(&#60;frxDBInformeListadoFacturasGrafComp.&#34;IMPORTE_TOTAL1&#34;&#62;) * 100; &#13;&#10; if (SUM(&#60;frxDBInformeListadoFacturasGrafComp.&#34;IMPORTE_TOTAL&#34;&#62;) = 0) then&#13;&#10; Valor := 100 - Valor &#13;&#10; else&#13;&#10; Valor := 100 - (Valor/SUM(&#60;frxDBInformeListadoFacturasGrafComp.&#34;IMPORTE_TOTAL&#34;&#62;)); &#13;&#10;&#13;&#10; memo16.lines.add(FormatFloat('#,##0.00 %',Valor));&#13;&#10; &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo18OnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if (&#60;Ano2&#62; &#62; 0) then&#13;&#10; begin&#13;&#10; Memo39.visible := True;&#13;&#10; Memo40.visible := True;&#13;&#10; Memo41.visible := True;&#13;&#10; Memo42.visible := True; &#13;&#10; end&#13;&#10; else&#13;&#10; begin&#13;&#10; Memo39.visible := False;&#13;&#10; Memo40.visible := False;&#13;&#10; Memo41.visible := False;&#13;&#10; Memo42.visible := False; &#13;&#10; end; &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;end. " ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403910003546F70021008446174617365747301010C6000000020446174615365743D226672784442496E666F726D654C69737461646F466163747572617347726166436F6D702220446174615365744E616D653D226672784442496E666F726D654C69737461646F466163747572617347726166436F6D702200010C4200000020446174615365744E616D653D226672784442496E666F726D654C69737461646F50726F766565646F7265734D61796F724465736375656E746F526573756D656E2200010C4400000020446174615365744E616D653D226672784442496E666F726D654C69737461646F50726F766565646F7265734D61796F724661637475726163696F6E526573756D656E220000095661726961626C657301010C12000000204E616D653D22205661726961626C65732200010C0D000000204E616D653D2253657269652200010C0C000000204E616D653D22416E6F312200010C0C000000204E616D653D22416E6F32220000055374796C650100">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10,00125" RightMargin="10,00125" TopMargin="10,00125" BottomMargin="10,00125" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxMasterData Name="MasterData1" Height="15" Left="0" Top="294" Width="718,101251175" ColumnWidth="0" ColumnGap="0" DataSet="frxDBInformeListadoFacturasGrafComp" DataSetName="frxDBInformeListadoFacturasGrafComp" RowCount="0">
<TfrxMemoView Name="Memo17" Left="113,93" Top="0" Width="131,66" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text="[frxDBInformeListadoFacturasGrafComp.&#34;IMPORTE_TOTAL&#34;]"/>
<TfrxMemoView Name="Memo1" Left="2" Top="0" Width="93,55" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HideZeros="True" ParentFont="False" Text="[frxDBInformeListadoFacturasGrafComp.&#34;DESCRIPCION&#34;]"/>
<TfrxMemoView Name="Memo2" Left="264,93" Top="0" Width="131,66" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text="[frxDBInformeListadoFacturasGrafComp.&#34;IMPORTE_TOTAL1&#34;]"/>
<TfrxMemoView Name="Memo3" Left="452" Top="0" Width="131,66" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text="[frxDBInformeListadoFacturasGrafComp.&#34;DIFERENCIA&#34;]"/>
<TfrxMemoView Name="Memo4" Left="605" Top="0" Width="111,66" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2n" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text="[frxDBInformeListadoFacturasGrafComp.&#34;PORCENTAJE&#34;] %"/>
</TfrxMasterData>
<TfrxMasterData Name="MasterData2" Height="301" Left="0" Top="364" Width="718,101251175" ColumnWidth="0" ColumnGap="0" DataSet="frxDBInformeListadoFacturasGrafComp" DataSetName="frxDBInformeListadoFacturasGrafComp" RowCount="0">
<TfrxChartView Name="Chart1" Left="4" Top="7" Width="709" Height="293" OnBeforePrint="Chart1OnBeforePrint" ShowHint="False" PropData="0543686172740A7E0200005450463006544368617274054368617274044C656674020003546F7002000557696474680390010648656967687403FA00144261636B57616C6C2E50656E2E56697369626C6508104C6567656E642E416C69676E6D656E7407086C61426F74746F6D114C6567656E642E426576656C5769647468020A0D4672616D652E56697369626C6508165669657733444F7074696F6E732E526F746174696F6E02000A426576656C4F75746572070662764E6F6E6505436F6C6F720707636C5768697465000A544261725365726965730753657269657331194D61726B732E43616C6C6F75742E42727573682E436F6C6F720707636C426C61636B0D4D61726B732E56697369626C6508055469746C65060A546F74616C20416E6F310F426172576964746850657263656E74023C124772616469656E742E446972656374696F6E070B6764546F70426F74746F6D0C5856616C7565732E4E616D650601580D5856616C7565732E4F72646572070B6C6F417363656E64696E670C5956616C7565732E4E616D6506034261720D5956616C7565732E4F7264657207066C6F4E6F6E6500000A544261725365726965730753657269657332194D61726B732E43616C6C6F75742E42727573682E436F6C6F720707636C426C61636B0D4D61726B732E56697369626C6508055469746C65060A546F74616C20416E6F320F426172576964746850657263656E74023C124772616469656E742E446972656374696F6E070B6764546F70426F74746F6D0C5856616C7565732E4E616D650601580D5856616C7565732E4F72646572070B6C6F417363656E64696E670C5956616C7565732E4E616D6506034261720D5956616C7565732E4F7264657207066C6F4E6F6E650000000E4368617274456C65766174696F6E0359010A5365726965734461746101010CB30100002044617461547970653D2264744442446174612220446174615365743D226672784442496E666F726D654C69737461646F466163747572617347726166436F6D702220446174615365744E616D653D226672784442496E666F726D654C69737461646F466163747572617347726166436F6D702220536F72744F726465723D22736F4E6F6E652220546F704E3D2230222058547970653D227874546578742220536F75726365313D226672784442496E666F726D654C69737461646F466163747572617347726166436F6D702E262333343B4445534352495043494F4E262333343B2220536F75726365323D226672784442496E666F726D654C69737461646F466163747572617347726166436F6D702E262333343B496D706F7274655F746F74616C262333343B222058536F757263653D226672784442496E666F726D654C69737461646F466163747572617347726166436F6D702E262333343B4445534352495043494F4E262333343B222059536F757263653D226672784442496E666F726D654C69737461646F466163747572617347726166436F6D702E262333343B496D706F7274655F746F74616C262333343B2200010C2D0100002044617461547970653D2264744442446174612220446174615365743D226672784442496E666F726D654C69737461646F466163747572617347726166436F6D702220446174615365744E616D653D226672784442496E666F726D654C69737461646F466163747572617347726166436F6D702220536F72744F726465723D22736F4E6F6E652220546F704E3D2230222058547970653D227874546578742220536F75726365323D226672784442496E666F726D654C69737461646F466163747572617347726166436F6D702E262333343B496D706F7274655F746F74616C31262333343B222059536F757263653D226672784442496E666F726D654C69737461646F466163747572617347726166436F6D702E262333343B496D706F7274655F746F74616C31262333343B220000"/>
</TfrxMasterData>
<TfrxPageHeader Name="Band1" Height="158,10235" Left="0" Top="16" Width="718,101251175" OnBeforePrint="Band1OnBeforePrint">
<TfrxShapeView Name="Shape5" Left="320,90569" Top="2,10235" Width="397" Height="134" ShowHint="False" Color="13095676" Shape="skRoundRectangle"/>
<TfrxMemoView Name="NombreCliente" Left="330,98423" Top="8,10235" Width="379,01577" Height="22" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO ESTADÍSTICO DE FACTURAS DE PROVEEDOR"/>
<TfrxMemoView Name="Memo7" Left="331" Top="33,10235" Width="378" Height="97" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Fecha del listado: [&#60;Date&#62;] - Página [Page#] de [TotalPages#]"/>
<TfrxLineView Name="Line1" Align="baLeft" Left="0" Top="129,10235" Width="312" Height="0" ShowHint="False" Frame.Color="5470709" Frame.Typ="4" Frame.Width="4"/>
<TfrxPictureView Name="Picture1" Left="3" Top="43" Width="160,03598" Height="80,03154" OnBeforePrint="Picture1OnBeforePrint" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" HightQuality="False"/>
</TfrxPageHeader>
<TfrxHeader Name="Header1" Height="40" Left="0" Top="234" Width="718,101251175">
<TfrxMemoView Name="Memo5" Left="2" Top="25" Width="93,55115913" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haCenter" ParentFont="False" Text="Intervalo"/>
<TfrxMemoView Name="Memo30" Left="113,92919" Top="25" Width="131,66138559" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haCenter" ParentFont="False" Text="Facturación (B.I)"/>
<TfrxMemoView Name="Memo9" Left="113" Top="4" Width="131,03927" Height="18,9" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" HAlign="haCenter" HideZeros="True" ParentFont="False" Text="Valores del año [&#60;Ano1&#62;]"/>
<TfrxMemoView Name="Memo10" Left="264,92919" Top="25" Width="131,66138559" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haCenter" ParentFont="False" Text="Facturación (B.I)"/>
<TfrxMemoView Name="Memo11" Left="264" Top="4" Width="131,03927" Height="18,9" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" HAlign="haCenter" HideZeros="True" ParentFont="False" Text="Valores del año [&#60;Ano2&#62;]"/>
<TfrxMemoView Name="Memo12" Left="408" Top="4" Width="309,03927" Height="18,9" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" HideZeros="True" ParentFont="False" Text="Comparativa del año [&#60;Ano1&#62;] respecto al año [&#60;Ano2&#62;]"/>
<TfrxMemoView Name="Memo13" Left="452" Top="25" Width="131,66138559" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haCenter" ParentFont="False" Text="Diferencia"/>
<TfrxMemoView Name="Memo14" Left="605" Top="25" Width="111,66138559" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haCenter" ParentFont="False" Text="Porcentaje"/>
</TfrxHeader>
<TfrxFooter Name="Footer1" Height="15" Left="0" Top="329" Width="718,101251175">
<TfrxMemoView Name="Memo6" Left="113,93" Top="0" Width="131,66" Height="15" ShowHint="False" Color="13095676" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text="[SUM(&#60;frxDBInformeListadoFacturasGrafComp.&#34;IMPORTE_TOTAL&#34;&#62;)]"/>
<TfrxMemoView Name="Memo8" Left="264,93" Top="0" Width="131,66" Height="15" ShowHint="False" Color="13095676" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text="[SUM(&#60;frxDBInformeListadoFacturasGrafComp.&#34;IMPORTE_TOTAL1&#34;&#62;)]"/>
<TfrxMemoView Name="Memo15" Left="452" Top="0" Width="131,66" Height="15" ShowHint="False" Color="13095676" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text="[SUM(&#60;frxDBInformeListadoFacturasGrafComp.&#34;IMPORTE_TOTAL&#34;&#62;) - SUM(&#60;frxDBInformeListadoFacturasGrafComp.&#34;IMPORTE_TOTAL1&#34;&#62;)]"/>
<TfrxMemoView Name="Memo16" Left="605" Top="0" Width="111,66" Height="15" OnBeforePrint="Memo16OnBeforePrint" ShowHint="False" Color="13095676" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2n" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text=""/>
</TfrxFooter>
<TfrxMasterData Name="MasterData3" Height="15" Left="0" Top="750" Width="718,101251175" ColumnWidth="0" ColumnGap="0" DataSetName="frxDBInformeListadoProveedoresMayorFacturacionResumen" RowCount="0">
<TfrxMemoView Name="Memo23" Left="2" Top="0" Width="300" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoProveedoresMayorFacturacionResumen.&#34;NOMBRE&#34;]"/>
<TfrxMemoView Name="Memo24" Align="baLeft" Left="302" Top="0" Width="80" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoProveedoresMayorFacturacionResumen.&#34;NUMFAC&#34;] "/>
<TfrxMemoView Name="Memo25" Align="baLeft" Left="382" Top="0" Width="125" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoProveedoresMayorFacturacionResumen.&#34;IMPORTE_TOTAL_ANO1&#34;] "/>
<TfrxMemoView Name="Memo26" Align="baLeft" Left="632" Top="0" Width="86" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoProveedoresMayorFacturacionResumen.&#34;PORCENTAJE&#34;] % "/>
<TfrxMemoView Name="Memo40" Align="baLeft" Left="507" Top="0" Width="125" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoProveedoresMayorFacturacionResumen.&#34;IMPORTE_TOTAL_ANO2&#34;] "/>
</TfrxMasterData>
<TfrxMasterData Name="MasterData4" Height="15" Left="0" Top="850" Width="718,101251175" ColumnWidth="0" ColumnGap="0" DataSetName="frxDBInformeListadoProveedoresMayorDescuentoResumen" RowCount="0">
<TfrxMemoView Name="Memo34" Left="2" Top="0" Width="276" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoProveedoresMayorDescuentoResumen.&#34;NOMBRE&#34;]"/>
<TfrxMemoView Name="Memo35" Align="baLeft" Left="278" Top="0" Width="90" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text=" [frxDBInformeListadoProveedoresMayorDescuentoResumen.&#34;IMPORTE_DESCUENTO&#34;] "/>
<TfrxMemoView Name="Memo36" Align="baLeft" Left="458" Top="0" Width="90" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoProveedoresMayorDescuentoResumen.&#34;IMPORTE_TOTAL&#34;] "/>
<TfrxMemoView Name="Memo37" Align="baLeft" Left="548" Top="0" Width="105" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text=" [frxDBInformeListadoProveedoresMayorDescuentoResumen.&#34;IMPORTE_COBRADO&#34;]"/>
<TfrxMemoView Name="Memo38" Align="baLeft" Left="653" Top="0" Width="65" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text=" [frxDBInformeListadoProveedoresMayorDescuentoResumen.&#34;PORCENTAJE&#34;] % "/>
<TfrxMemoView Name="Memo42" Align="baLeft" Left="368" Top="0" Width="90" Height="15" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text=" [frxDBInformeListadoProveedoresMayorDescuentoResumen.&#34;IMPORTE_DESCUENTO2&#34;] "/>
</TfrxMasterData>
<TfrxHeader Name="Header2" Height="45" Left="0" Top="685" Width="718,101251175">
<TfrxMemoView Name="Memo18" Left="2" Top="30" Width="300" Height="15" OnBeforePrint="Memo18OnBeforePrint" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" ParentFont="False" Text="Nombre"/>
<TfrxMemoView Name="Memo19" Align="baLeft" Left="302" Top="30" Width="80" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haRight" ParentFont="False" Text="Nº facturas"/>
<TfrxMemoView Name="Memo20" Left="3" Top="9" Width="259,03927" Height="18,9" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="5" HideZeros="True" ParentFont="False" Text="Proveedores con mayor capital facturado"/>
<TfrxMemoView Name="Memo21" Align="baLeft" Left="382" Top="30" Width="125" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haRight" ParentFont="False" Text="Imp. total (B.I) [&#60;Ano1&#62;]"/>
<TfrxMemoView Name="Memo22" Align="baLeft" Left="632" Top="30" Width="86" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haRight" ParentFont="False" Text="Porcentaje (%)"/>
<TfrxMemoView Name="Memo39" Align="baLeft" Left="507" Top="30" Width="125" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haRight" ParentFont="False" Text="Imp. total (B.I) [&#60;Ano2&#62;]"/>
</TfrxHeader>
<TfrxHeader Name="Header3" Height="45" Left="0" Top="785" Width="718,101251175">
<TfrxMemoView Name="Memo27" Left="2" Top="30" Width="276" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" ParentFont="False" Text="Nombre"/>
<TfrxMemoView Name="Memo28" Align="baLeft" Left="278" Top="30" Width="90" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haRight" ParentFont="False" Text="Imp. Dto. [&#60;Ano1&#62;]"/>
<TfrxMemoView Name="Memo29" Left="3" Top="9" Width="285,03927" Height="18,9" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="5" HideZeros="True" ParentFont="False" Text="Proveedores con mayor descuento aplicado"/>
<TfrxMemoView Name="Memo31" Align="baLeft" Left="458" Top="30" Width="90" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haRight" ParentFont="False" Text="Imp. total (Neto)"/>
<TfrxMemoView Name="Memo32" Align="baLeft" Left="653" Top="30" Width="65" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haRight" ParentFont="False" Text="Medio (%)"/>
<TfrxMemoView Name="Memo33" Align="baLeft" Left="548" Top="30" Width="105" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haRight" ParentFont="False" Text="Imp. cobrado (B.I.)"/>
<TfrxMemoView Name="Memo41" Align="baLeft" Left="368" Top="30" Width="90" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="13056" Font.Height="-9" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" GapX="5" GapY="2" HAlign="haRight" ParentFont="False" Text="Imp. Dto. [&#60;Ano2&#62;]"/>
</TfrxHeader>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,55 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37800,8077143519" ReportOptions.Description.Text="" ReportOptions.LastChange="40585,5340501157" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if Engine.FinalPass then&#13;&#10; begin&#13;&#10; if (&#60;Page#&#62; = &#60;TotalPages#&#62;) then&#13;&#10; begin &#13;&#10; mContinua.Visible := False;&#13;&#10; end &#13;&#10; else&#13;&#10; begin &#13;&#10; mContinua.Visible := True;&#13;&#10; end &#13;&#10; end; &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo11OnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10; ACadena : String; &#13;&#10;begin&#13;&#10; ACadena := &#60;frxDBInformeListadoFacturasPendResumen.&#34;DATOS_BANCARIOS&#34;&#62;; &#13;&#10; if Pos('Nº de cuenta: ', ACadena) &#62; 0 then&#13;&#10; begin&#13;&#10; Delete(ACadena, 1, 14);&#13;&#10; Memo11.Lines.Text := ' ' + ACadena; &#13;&#10; end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo10OnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10; ACadena : String; &#13;&#10;begin&#13;&#10; ACadena := &#60;frxDBInformeListadoFacturasPendientes.&#34;DATOS_BANCARIOS&#34;&#62;; &#13;&#10; if Pos('Nº de cuenta: ', ACadena) &#62; 0 then&#13;&#10; begin&#13;&#10; Delete(ACadena, 1, 14);&#13;&#10; Memo10.Lines.Text := ' ' + ACadena; &#13;&#10; end;&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403990003546F70021008446174617365747301010C6400000020446174615365743D226672784442496E666F726D654C69737461646F466163747572617350656E6469656E7465732220446174615365744E616D653D226672784442496E666F726D654C69737461646F466163747572617350656E6469656E7465732200010C6600000020446174615365743D226672784442496E666F726D654C69737461646F466163747572617350656E64526573756D656E2220446174615365744E616D653D226672784442496E666F726D654C69737461646F466163747572617350656E64526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxPageHeader Name="Band1" Height="151,10235" Left="0" Top="16" Width="1009,13451">
<TfrxShapeView Name="Shape5" Left="544,14193" Top="14,10235" Width="465" Height="122" ShowHint="False" Color="13434828" Frame.Width="0,1" Shape="skRoundRectangle"/>
<TfrxPictureView Name="Logotipo" Left="0" Top="37,10235" Width="80" Height="88" ShowHint="False" HightQuality="False"/>
<TfrxMemoView Name="DatosEmpresa" Left="80" Top="37,10235" Width="232" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
<TfrxMemoView Name="NombreCliente" Left="548" Top="19,10235" Width="452" Height="16,88188" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE FACTURAS DE PROVEEDOR PENDIENTES"/>
<TfrxMemoView Name="Memo3" Left="548" Top="39,10235" Width="452" Height="91" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Fecha del listado: [&#60;Date&#62;] - Página [Page#] de [TotalPages#]&#13;&#10;[TextoParametros]"/>
<TfrxLineView Name="Line1" Align="baLeft" Left="0" Top="129,10235" Width="312" Height="0" ShowHint="False" Frame.Color="32768" Frame.Typ="4" Frame.Width="4"/>
</TfrxPageHeader>
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="543" Width="1009,13451" PrintOnLastPage="False">
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
</TfrxPageFooter>
<TfrxGroupHeader Name="" Height="40" Left="0" Restrictions="2" Top="227" Width="1009,13451" Condition="frxDBInformeListadoFacturasPendientes.&#34;MES&#34;" ReprintOnNewPage="True">
<TfrxMemoView Name="Memo52" Left="838,36220961" Top="25" Width="100" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo27" Left="0" Top="25" Width="97,88976378" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Nº factura"/>
<TfrxMemoView Name="Memo28" Left="247,61417323" Top="25" Width="250" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" ParentFont="False" VAlign="vaCenter" Text="Proveedor"/>
<TfrxMemoView Name="Memo49" Left="939" Top="25" Width="70" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Situación"/>
<TfrxMemoView Name="Memo8" Left="97,88976378" Top="25" Width="75" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha"/>
<TfrxMemoView Name="Memo7" Left="-0,44094" Top="2,77953" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturasPendientes.&#34;TITULO&#34;]"/>
<TfrxMemoView Name="Memo1" Left="172,95275591" Top="25" Width="75" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha vto."/>
<TfrxMemoView Name="Memo9" Left="497,5201" Top="25" Width="340,5" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" ParentFont="False" VAlign="vaCenter" Text="Domiciliación"/>
</TfrxGroupHeader>
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="287" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="frxDBInformeListadoFacturasPendientes" DataSetName="frxDBInformeListadoFacturasPendientes" RowCount="0" Stretched="True">
<TfrxMemoView Name="Memo31" Left="838,36" Top="0" Width="100" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="13" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasPendientes.&#34;IMPORTE_TOTAL&#34;] "/>
<TfrxMemoView Name="Memo4" Left="247,61" Top="0" Width="250" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="13" ParentFont="False" Text="[frxDBInformeListadoFacturasPendientes.&#34;NOMBRE&#34;]"/>
<TfrxMemoView Name="Memo20" Left="939" Top="0" Width="70" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoFacturasPendientes.&#34;SITUACION&#34;]"/>
<TfrxMemoView Name="Memo21" Left="97,88976378" Top="0" Width="75" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="13" ParentFont="False" Text="[frxDBInformeListadoFacturasPendientes.&#34;FECHA_FACTURA&#34;]"/>
<TfrxMemoView Name="Memo18" Left="0" Top="0" Width="98,13385827" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoFacturasPendientes.&#34;REFERENCIA&#34;]"/>
<TfrxMemoView Name="Memo5" Left="172,95" Top="0" Width="75" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="13" HideZeros="True" ParentFont="False" Text="[frxDBInformeListadoFacturasPendientes.&#34;FECHA_VENCIMIENTO&#34;]"/>
<TfrxMemoView Name="Memo10" Left="497,52" Top="0" Width="340,37777213" Height="17,00787402" OnBeforePrint="Memo10OnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="13" ParentFont="False" Text="[frxDBInformeListadoFacturasPendientes.&#34;DATOS_BANCARIOS&#34;]"/>
</TfrxMasterData>
<TfrxGroupFooter Name="" Height="20,78740402" Left="0" Top="324" Width="1009,13451">
<TfrxMemoView Name="Memo6" Left="838,91371" Top="0,37774772" Width="100" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturasPendientes.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros1)] "/>
<TfrxMemoView Name="Memo14" Left="939" Top="0,37774772" Width="70" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text=""/>
<TfrxMemoView Name="Memo53" Left="0" Top="0,37774772" Width="838,55912346" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoFacturasPendientes.&#34;TITULO&#34;]:"/>
</TfrxGroupFooter>
<TfrxMemoView Name="Memo2" Align="baRight" Left="938,13451" Top="651" Width="71" Height="13" OnBeforePrint="Memo2OnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text=""/>
<TfrxMasterData Name="DatosMaestros2" Height="17,00787402" Left="0" Top="430" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSet="frxDBInformeListadoFacturasPendResumen" DataSetName="frxDBInformeListadoFacturasPendResumen" RowCount="0" Stretched="True">
<TfrxMemoView Name="Memo11" Left="0" Top="0" Width="495" Height="17,00787402" OnBeforePrint="Memo11OnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoFacturasPendResumen.&#34;DATOS_BANCARIOS&#34;]"/>
<TfrxMemoView Name="Memo12" Left="495" Top="0" Width="108" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasPendResumen.&#34;IMPORTE_TOTAL&#34;] "/>
</TfrxMasterData>
<TfrxGroupHeader Name="GroupHeader1" Height="45,35436" Left="0" Top="365" Width="1009,13451" Condition="frxDBInformeListadoFacturasPendResumen.&#34;MES&#34;">
<TfrxMemoView Name="Memo13" Left="-0,44094" Top="9" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="RESUMEN POR DOMICILIACIÓN [frxDBInformeListadoFacturasPendResumen.&#34;TITULO&#34;]"/>
<TfrxMemoView Name="Memo16" Left="0" Top="30,35436" Width="495" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Domiciliación"/>
<TfrxMemoView Name="Memo15" Left="495" Top="30,35436" Width="108" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
</TfrxGroupHeader>
<TfrxGroupFooter Name="GroupFooter1" Height="15,8740157480315" Left="0" Top="467" Width="1009,13451">
<TfrxMemoView Name="Memo22" Left="0" Top="0" Width="495" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoFacturasPendResumen.&#34;TITULO&#34;]:"/>
<TfrxMemoView Name="Memo17" Left="495" Top="0" Width="108" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturasPendResumen.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros2)] "/>
</TfrxGroupFooter>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,59 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37800,8077143519" ReportOptions.Description.Text="" ReportOptions.LastChange="40585,5354942824" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if Engine.FinalPass then&#13;&#10; begin&#13;&#10; if (&#60;Page#&#62; = &#60;TotalPages#&#62;) then&#13;&#10; begin &#13;&#10; mContinua.Visible := False;&#13;&#10; end &#13;&#10; else&#13;&#10; begin &#13;&#10; mContinua.Visible := True;&#13;&#10; end &#13;&#10; end; &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo10OnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10; ACadena : String; &#13;&#10;begin&#13;&#10; ACadena := &#60;frxDBInformeListadoFacturasPendientes.&#34;DATOS_BANCARIOS&#34;&#62;; &#13;&#10; if Pos('Nº de cuenta: ', ACadena) &#62; 0 then&#13;&#10; begin&#13;&#10; Delete(ACadena, 1, 14);&#13;&#10; Memo10.Lines.Text := ' ' + ACadena; &#13;&#10; end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo11OnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10; ACadena : String; &#13;&#10;begin&#13;&#10; ACadena := &#60;frxDBInformeListadoFacturasPendResumen.&#34;DATOS_BANCARIOS&#34;&#62;; &#13;&#10; if Pos('Nº de cuenta: ', ACadena) &#62; 0 then&#13;&#10; begin&#13;&#10; Delete(ACadena, 1, 14);&#13;&#10; Memo11.Lines.Text := ' ' + ACadena; &#13;&#10; end;&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403990003546F70021008446174617365747301010C6400000020446174615365743D226672784442496E666F726D654C69737461646F466163747572617350656E6469656E7465732220446174615365744E616D653D226672784442496E666F726D654C69737461646F466163747572617350656E6469656E7465732200010C6600000020446174615365743D226672784442496E666F726D654C69737461646F466163747572617350656E64526573756D656E2220446174615365744E616D653D226672784442496E666F726D654C69737461646F466163747572617350656E64526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxPageHeader Name="Band1" Height="151,1" Left="0" Top="16" Width="1009,13451">
<TfrxShapeView Name="Shape5" Left="541,14193" Top="14,1" Width="465" Height="122" ShowHint="False" Color="13434828" Shape="skRoundRectangle"/>
<TfrxPictureView Name="Logotipo" Left="0" Top="37,10235" Width="80" Height="88" ShowHint="False" HightQuality="False"/>
<TfrxMemoView Name="DatosEmpresa" Left="80" Top="37,10235" Width="232" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
<TfrxLineView Name="Line1" Align="baLeft" Left="0" Top="129,10235" Width="312" Height="0" ShowHint="False" Frame.Color="32768" Frame.Typ="4" Frame.Width="4"/>
<TfrxMemoView Name="NombreCliente" Left="553" Top="19,1" Width="446" Height="16,88188" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE FACTURAS DE PROVEEDOR PENDIENTES"/>
<TfrxMemoView Name="Memo3" Left="544" Top="39,1" Width="455" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Fecha del listado: [&#60;Date&#62;] - Página [Page#] de [TotalPages#]&#13;&#10;[TextoParametros]"/>
</TfrxPageHeader>
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="629" Width="1009,13451" PrintOnLastPage="False">
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
<TfrxMemoView Name="Memo2" Align="baRight" Left="938,13451" Top="4,70037" Width="71" Height="13" OnBeforePrint="Memo2OnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text=""/>
</TfrxPageFooter>
<TfrxGroupHeader Name="" Height="40" Left="0" Restrictions="2" Top="270" Width="1009,13451" Condition="frxDBInformeListadoFacturasPendientes.&#34;NOMBRE&#34;" ReprintOnNewPage="True">
<TfrxMemoView Name="Memo52" Left="838,8" Top="25" Width="100" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo27" Left="0" Top="25" Width="97,88976378" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Nº factura"/>
<TfrxMemoView Name="Memo28" Left="247,61417323" Top="25" Width="250" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Proveedor"/>
<TfrxMemoView Name="Memo49" Left="938,26778" Top="25" Width="70" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Situación"/>
<TfrxMemoView Name="Memo8" Left="97,88976378" Top="25" Width="75" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha"/>
<TfrxMemoView Name="Memo7" Left="0" Top="2,77953" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturasPendientes.&#34;NOMBRE&#34;]"/>
<TfrxMemoView Name="Memo1" Left="172,95275591" Top="25" Width="75" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha vto."/>
<TfrxMemoView Name="Memo9" Left="497,5201" Top="25" Width="340,5" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" ParentFont="False" VAlign="vaCenter" Text="Domiciliación"/>
</TfrxGroupHeader>
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="330" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="frxDBInformeListadoFacturasPendientes" DataSetName="frxDBInformeListadoFacturasPendientes" RowCount="0" Stretched="True">
<TfrxMemoView Name="Memo31" Left="838,80314961" Top="0" Width="100" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="13" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasPendientes.&#34;IMPORTE_TOTAL&#34;] "/>
<TfrxMemoView Name="Memo4" Left="247,61" Top="0" Width="250" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoFacturasPendientes.&#34;NOMBRE&#34;]"/>
<TfrxMemoView Name="Memo20" Left="938,27" Top="0" Width="70" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoFacturasPendientes.&#34;SITUACION&#34;]"/>
<TfrxMemoView Name="Memo21" Left="97,88976378" Top="0" Width="75" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoFacturasPendientes.&#34;FECHA_FACTURA&#34;]"/>
<TfrxMemoView Name="Memo18" Left="0" Top="0" Width="97,89" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoFacturasPendientes.&#34;REFERENCIA&#34;]"/>
<TfrxMemoView Name="Memo5" Left="172,95275591" Top="0" Width="75" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="13" HideZeros="True" ParentFont="False" Text="[frxDBInformeListadoFacturasPendientes.&#34;FECHA_VENCIMIENTO&#34;]"/>
<TfrxMemoView Name="Memo10" Left="497,5201" Top="0" Width="340,5" Height="17,00787402" OnBeforePrint="Memo10OnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="13" ParentFont="False" Text="[frxDBInformeListadoFacturasPendientes.&#34;DATOS_BANCARIOS&#34;]"/>
</TfrxMasterData>
<TfrxGroupFooter Name="" Height="20,78740402" Left="0" Top="367" Width="1009,13451">
<TfrxMemoView Name="Memo6" Left="838,8" Top="0,37774772" Width="100" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturasPendientes.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros1)] "/>
<TfrxMemoView Name="Memo14" Left="938,27" Top="0,37774772" Width="70" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text=""/>
<TfrxMemoView Name="Memo53" Left="0" Top="0,37774772" Width="838,55912346" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoFacturasPendientes.&#34;TITULO&#34;]:"/>
</TfrxGroupFooter>
<TfrxMasterData Name="DatosMaestros2" Height="17,00787402" Left="0" Top="516" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSet="frxDBInformeListadoFacturasPendResumen" DataSetName="frxDBInformeListadoFacturasPendResumen" RowCount="0" Stretched="True">
<TfrxMemoView Name="Memo11" Left="0" Top="0" Width="495" Height="17,00787402" OnBeforePrint="Memo11OnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="13" ParentFont="False" Text="[frxDBInformeListadoFacturasPendResumen.&#34;DATOS_BANCARIOS&#34;]"/>
<TfrxMemoView Name="Memo12" Left="494,22851" Top="0" Width="107,76377953" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoFacturasPendResumen.&#34;IMPORTE_TOTAL&#34;] "/>
</TfrxMasterData>
<TfrxGroupHeader Name="GroupHeader1" Height="45,35436" Left="0" Top="451" Width="1009,13451" Condition="frxDBInformeListadoFacturasPendResumen.&#34;TITULO&#34;">
<TfrxMemoView Name="Memo13" Left="0" Top="9" Width="746,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="RESUMEN POR DOMICILIACIÓN [frxDBInformeListadoFacturasPendResumen.&#34;TITULO&#34;]"/>
<TfrxMemoView Name="Memo16" Left="0" Top="30,45671" Width="495" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Domiciliación"/>
<TfrxMemoView Name="Memo15" Left="494,22851" Top="30,45671" Width="108,33859" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
</TfrxGroupHeader>
<TfrxGroupFooter Name="GroupFooter1" Height="15,87401575" Left="0" Top="553" Width="1009,13451">
<TfrxMemoView Name="Memo22" Left="0" Top="0" Width="495" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoFacturasPendResumen.&#34;TITULO&#34;]:"/>
<TfrxMemoView Name="Memo17" Left="494,22851" Top="0" Width="108,24408228" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoFacturasPendResumen.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros2)] "/>
</TfrxGroupFooter>
<TfrxGroupHeader Name="GroupHeader2" Height="22,67718" Left="0" Top="227" Width="1009,13451" Condition="frxDBInformeListadoFacturasPendientes.&#34;MES&#34;">
<TfrxMemoView Name="Memo23" Left="0" Top="3,77953" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoFacturasPendientes.&#34;TITULO&#34;]"/>
</TfrxGroupHeader>
<TfrxGroupFooter Name="GroupFooter2" Height="22,67718" Left="0" Top="408" Width="1009,13451"/>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,53 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37800,8077143519" ReportOptions.Description.Text="" ReportOptions.LastChange="40585,5356705556" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if Engine.FinalPass then&#13;&#10; begin&#13;&#10; if (&#60;Page#&#62; = &#60;TotalPages#&#62;) then&#13;&#10; begin &#13;&#10; mContinua.Visible := False;&#13;&#10; end &#13;&#10; else&#13;&#10; begin &#13;&#10; mContinua.Visible := True;&#13;&#10; end &#13;&#10; end; &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403990003546F70021008446174617365747301010C2900000020446174615365744E616D653D226672784442496E666F726D654C69737461646F50656469646F732200010C3000000020446174615365744E616D653D226672784442496E666F726D654C69737461646F50656469646F73526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
<TfrxPictureView Name="Logotipo" Left="0" Top="37,10235" Width="80" Height="88" ShowHint="False" HightQuality="False"/>
<TfrxMemoView Name="DatosEmpresa" Left="80" Top="37,10235" Width="232" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
<TfrxLineView Name="Line1" Align="baLeft" Left="0" Top="129,10235" Width="312" Height="0" ShowHint="False" Frame.Color="32768" Frame.Typ="4" Frame.Width="4"/>
<TfrxShapeView Name="Shape5" Left="541" Top="6" Width="465" Height="122" ShowHint="False" Color="13434828" Frame.Width="0,1" Shape="skRoundRectangle"/>
<TfrxMemoView Name="NombreCliente" Left="544,85807" Top="11" Width="452" Height="16,88188" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE PEDIDOS A PROVEEDOR"/>
<TfrxMemoView Name="Memo3" Left="544,85807" Top="31" Width="452" Height="91" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Fecha del listado: [&#60;Date&#62;] - Página [Page#] de [TotalPages#]&#13;&#10;[TextoParametros]"/>
</TfrxPageHeader>
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="552" Width="1009,13451" PrintOnLastPage="False">
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
</TfrxPageFooter>
<TfrxGroupHeader Name="" Height="40" Left="0" Restrictions="2" Top="212" Width="1009,13451" Condition="frxDBInformeListadoPedidos.&#34;MES&#34;" ReprintOnNewPage="True">
<TfrxMemoView Name="Memo27" Left="0" Top="25" Width="88,77953" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Nº pedido"/>
<TfrxMemoView Name="Memo28" Left="181,45671" Top="25" Width="464,33859" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Proveedor"/>
<TfrxMemoView Name="Memo49" Left="645,7953" Top="25" Width="81,33859" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Situación"/>
<TfrxMemoView Name="Memo50" Left="727,13389" Top="25" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Emisión"/>
<TfrxMemoView Name="Memo51" Left="822,13389" Top="25" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Recepción"/>
<TfrxMemoView Name="Memo52" Left="917,13389" Top="25" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo8" Left="88,77953" Top="25" Width="92,67718" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha"/>
<TfrxMemoView Name="Memo7" Left="0" Top="2,77953" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoPedidos.&#34;TITULO&#34;]"/>
</TfrxGroupHeader>
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="272" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSetName="frxDBInformeListadoPedidos" RowCount="0" Stretched="True">
<TfrxMemoView Name="Memo4" Left="181,46" Top="0" Width="464,34" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoPedidos.&#34;NOMBRE&#34;]"/>
<TfrxMemoView Name="Memo20" Left="645,8" Top="0" Width="81,34" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoPedidos.&#34;SITUACION&#34;]"/>
<TfrxMemoView Name="Memo21" Left="88,78" Top="0" Width="92,68" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoPedidos.&#34;FECHA_PEDIDO&#34;]"/>
<TfrxMemoView Name="Memo18" Left="0" Top="0" Width="88,78" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoPedidos.&#34;REFERENCIA&#34;]"/>
<TfrxMemoView Name="Memo29" Left="727,14" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text="[frxDBInformeListadoPedidos.&#34;FECHA_CONFIRMACION&#34;]"/>
<TfrxMemoView Name="Memo30" Left="822,14" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="dd.mm.yyyy" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text="[frxDBInformeListadoPedidos.&#34;FECHA_ENTREGA&#34;]"/>
<TfrxMemoView Name="Memo31" Left="917,14" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoPedidos.&#34;IMPORTE_TOTAL&#34;]"/>
</TfrxMasterData>
<TfrxGroupFooter Name="" Height="16" Left="0" Top="309" Width="1009,13451">
<TfrxMemoView Name="Memo53" Left="0" Top="0,37774772" Width="917" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoPedidos.&#34;TITULO&#34;]:"/>
<TfrxMemoView Name="Memo6" Left="917" Top="0,37774772" Width="95" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoPedidos.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros1)]"/>
</TfrxGroupFooter>
<TfrxHeader Name="Header1" Height="75" Left="0" Top="345" Width="1009,13451">
<TfrxMemoView Name="Memo13" Left="0" Top="60" Width="383,62987" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Resumen por meses de los pedidos de proveedor"/>
<TfrxMemoView Name="Memo22" Left="383,62987" Top="60" Width="120" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo23" Left="0" Top="28" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="Resumen por meses de los pedidos de proveedor"/>
</TfrxHeader>
<TfrxReportSummary Name="ReportSummary1" Height="15" Left="0" Top="517" Width="1009,13451">
<TfrxMemoView Name="Memo24" Left="0" Top="0" Width="383,62987" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Total: "/>
<TfrxMemoView Name="Memo32" Left="383,62987" Top="0" Width="120" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoPedidosResumen.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros2)]"/>
</TfrxReportSummary>
<TfrxMasterData Name="DatosMaestros2" Height="17" Left="0" Top="440" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSetName="frxDBInformeListadoPedidosResumen" RowCount="0">
<TfrxMemoView Name="Memo9" Left="0" Top="0" Width="383,63" Height="17,00787402" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoPedidosResumen.&#34;TITULO&#34;]"/>
<TfrxMemoView Name="Memo12" Left="383,63" Top="0" Width="120" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoPedidosResumen.&#34;IMPORTE_TOTAL&#34;]"/>
</TfrxMasterData>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,57 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37800,8077143519" ReportOptions.Description.Text="" ReportOptions.LastChange="40585,5358741435" ScriptLanguage="PascalScript" ScriptText.Text="&#13;&#10;procedure mContinuaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if Engine.FinalPass then&#13;&#10; begin&#13;&#10; if (&#60;Page#&#62; = &#60;TotalPages#&#62;) then&#13;&#10; begin &#13;&#10; mContinua.Visible := False;&#13;&#10; end &#13;&#10; else&#13;&#10; begin &#13;&#10; mContinua.Visible := True;&#13;&#10; end &#13;&#10; end; &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403990003546F70021008446174617365747301010C2900000020446174615365744E616D653D226672784442496E666F726D654C69737461646F50656469646F732200010C3000000020446174615365744E616D653D226672784442496E666F726D654C69737461646F50656469646F73526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
<TfrxPictureView Name="Logotipo" Left="0" Top="37,10235" Width="80" Height="88" ShowHint="False" HightQuality="False"/>
<TfrxMemoView Name="DatosEmpresa" Left="80" Top="37,10235" Width="232" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
<TfrxLineView Name="Line1" Align="baLeft" Left="0" Top="129,10235" Width="312" Height="0" ShowHint="False" Frame.Color="32768" Frame.Typ="4" Frame.Width="4"/>
<TfrxShapeView Name="Shape5" Left="542" Top="10" Width="465" Height="122" ShowHint="False" Color="13434828" Frame.Width="0,1" Shape="skRoundRectangle"/>
<TfrxMemoView Name="NombreCliente" Left="545,85807" Top="15" Width="452" Height="16,88188" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE PEDIDOS A PROVEEDOR"/>
<TfrxMemoView Name="Memo3" Left="545,85807" Top="35" Width="452" Height="91" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Fecha del listado: [&#60;Date&#62;] - Página [Page#] de [TotalPages#]&#13;&#10;[TextoParametros]"/>
</TfrxPageHeader>
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="632" Width="1009,13451" PrintOnLastPage="False">
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
</TfrxPageFooter>
<TfrxGroupHeader Name="" Height="40" Left="0" Restrictions="2" Top="252" Width="1009,13451" Condition="frxDBInformeListadoPedidos.&#34;NOMBRE&#34;" ReprintOnNewPage="True">
<TfrxMemoView Name="Memo27" Left="0" Top="25" Width="88,77953" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Nº pedido"/>
<TfrxMemoView Name="Memo28" Left="181,45671" Top="25" Width="464,33859" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Proveedor"/>
<TfrxMemoView Name="Memo49" Left="645,7953" Top="25" Width="81,33859" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Situación"/>
<TfrxMemoView Name="Memo50" Left="727,13389" Top="25" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Emisión"/>
<TfrxMemoView Name="Memo51" Left="822,13389" Top="25" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Recepción"/>
<TfrxMemoView Name="Memo52" Left="917,13389" Top="25" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo8" Left="88,77953" Top="25" Width="92,67718" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha"/>
<TfrxMemoView Name="Memo7" Left="0" Top="2,77953" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoPedidos.&#34;NOMBRE&#34;]"/>
</TfrxGroupHeader>
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="312" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSetName="frxDBInformeListadoPedidos" RowCount="0" Stretched="True">
<TfrxMemoView Name="Memo4" Left="181,46" Top="0" Width="464,34" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoPedidos.&#34;NOMBRE&#34;]"/>
<TfrxMemoView Name="Memo20" Left="645,8" Top="0" Width="81,34" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoPedidos.&#34;SITUACION&#34;]"/>
<TfrxMemoView Name="Memo21" Left="88,78" Top="0" Width="92,68" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoPedidos.&#34;FECHA_PEDIDO&#34;]"/>
<TfrxMemoView Name="Memo18" Left="0" Top="0" Width="88,78" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoPedidos.&#34;REFERENCIA&#34;]"/>
<TfrxMemoView Name="Memo29" Left="727,14" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text="[frxDBInformeListadoPedidos.&#34;FECHA_CONFIRMACION&#34;]"/>
<TfrxMemoView Name="Memo30" Left="822,14" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="dd.mm.yyyy" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text="[frxDBInformeListadoPedidos.&#34;FECHA_ENTREGA&#34;]"/>
<TfrxMemoView Name="Memo31" Left="917,14" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoPedidos.&#34;IMPORTE_TOTAL&#34;]"/>
</TfrxMasterData>
<TfrxGroupFooter Name="" Height="16" Left="0" Top="349" Width="1009,13451">
<TfrxMemoView Name="Memo53" Left="0" Top="0,37774772" Width="917" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoPedidos.&#34;TITULO&#34;]:"/>
<TfrxMemoView Name="Memo6" Left="917" Top="0,37774772" Width="95" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoPedidos.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros1)]"/>
</TfrxGroupFooter>
<TfrxHeader Name="Header1" Height="75" Left="0" Top="425" Width="1009,13451">
<TfrxMemoView Name="Memo13" Left="0" Top="60" Width="383,62987" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Resumen por meses de los pedidos de proveedor"/>
<TfrxMemoView Name="Memo22" Left="383,62987" Top="60" Width="120" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo23" Left="0" Top="28" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="Resumen por meses de los pedidos de proveedor"/>
</TfrxHeader>
<TfrxReportSummary Name="ReportSummary1" Height="15" Left="0" Top="597" Width="1009,13451">
<TfrxMemoView Name="Memo24" Left="0" Top="0" Width="383,62987" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Total: "/>
<TfrxMemoView Name="Memo32" Left="383,62987" Top="0" Width="120" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoPedidosResumen.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros2)]"/>
</TfrxReportSummary>
<TfrxMasterData Name="DatosMaestros2" Height="17" Left="0" Top="520" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSetName="frxDBInformeListadoPedidosResumen" RowCount="0">
<TfrxMemoView Name="Memo9" Left="0" Top="0" Width="383,63" Height="17,00787402" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoPedidosResumen.&#34;TITULO&#34;]"/>
<TfrxMemoView Name="Memo12" Left="383,63" Top="0" Width="120" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoPedidosResumen.&#34;IMPORTE_TOTAL&#34;]"/>
</TfrxMasterData>
<TfrxGroupHeader Name="GroupHeader1" Height="20" Left="0" Top="212" Width="1009,13451" Condition="frxDBInformeListadoPedidos.&#34;MES&#34;">
<TfrxMemoView Name="Memo1" Left="0" Top="2" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoPedidos.&#34;TITULO&#34;]"/>
</TfrxGroupHeader>
<TfrxGroupFooter Name="GroupFooter1" Height="20" Left="0" Top="385" Width="1009,13451"/>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,53 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37800,8077143519" ReportOptions.Description.Text="" ReportOptions.LastChange="40585,5360496991" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if Engine.FinalPass then&#13;&#10; begin&#13;&#10; if (&#60;Page#&#62; = &#60;TotalPages#&#62;) then&#13;&#10; begin &#13;&#10; mContinua.Visible := False;&#13;&#10; end &#13;&#10; else&#13;&#10; begin &#13;&#10; mContinua.Visible := True;&#13;&#10; end &#13;&#10; end; &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403990003546F70021008446174617365747301010C2E00000020446174615365744E616D653D226672784442496E666F726D654C69737461646F507265737570756573746F732200010C3500000020446174615365744E616D653D226672784442496E666F726D654C69737461646F507265737570756573746F73526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C11000000204E616D653D2220506572696F646F732200010C31000000204E616D653D224665636861496E6963696F222056616C75653D22262336303B4665636861496E6963696F262336323B2200010C10000000204E616D653D22466563686146696E220000055374796C650100">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
<TfrxShapeView Name="Shape5" Left="510,14193" Top="2,10235" Width="495" Height="125" ShowHint="False" Color="13434828" Shape="skRoundRectangle"/>
<TfrxPictureView Name="Logotipo" Left="0" Top="37,10235" Width="80" Height="88" ShowHint="False" HightQuality="False"/>
<TfrxMemoView Name="DatosEmpresa" Left="80" Top="37,10235" Width="232" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
<TfrxMemoView Name="NombreCliente" Left="517" Top="9,10235" Width="480" Height="20" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE PRESUPUESTOS DE CLIENTE"/>
<TfrxLineView Name="Line1" Align="baLeft" Left="0" Top="129,10235" Width="312" Height="0" ShowHint="False" Frame.Color="32768" Frame.Typ="4" Frame.Width="4"/>
<TfrxMemoView Name="Memo3" Left="516" Top="31" Width="481" Height="91" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Fecha del listado: [&#60;Date&#62;] - Página [Page#] de [TotalPages#]&#13;&#10;[TextoParametros]"/>
</TfrxPageHeader>
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="552" Width="1009,13451" PrintOnLastPage="False">
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
</TfrxPageFooter>
<TfrxGroupHeader Name="" Height="40" Left="0" Restrictions="2" Top="212" Width="1009,13451" Condition="frxDBInformeListadoPresupuestos.&#34;MES&#34;" ReprintOnNewPage="True">
<TfrxMemoView Name="Memo27" Left="0" Top="25" Width="88,77953" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Nº presupuesto"/>
<TfrxMemoView Name="Memo28" Left="181,45671" Top="25" Width="464,33859" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Cliente"/>
<TfrxMemoView Name="Memo49" Left="645,7953" Top="25" Width="81,33859" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Situación"/>
<TfrxMemoView Name="Memo50" Left="727,13389" Top="25" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Fecha decisión"/>
<TfrxMemoView Name="Memo51" Left="822,13389" Top="25" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Nº factura"/>
<TfrxMemoView Name="Memo52" Left="917,13389" Top="25" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo8" Left="88,77953" Top="25" Width="92,67718" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha"/>
<TfrxMemoView Name="Memo7" Left="0" Top="2,77953" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoPresupuestos.&#34;TITULO&#34;]"/>
</TfrxGroupHeader>
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="272" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSetName="frxDBInformeListadoPresupuestos" RowCount="0" Stretched="True">
<TfrxMemoView Name="Memo4" Left="181,46" Top="0" Width="464,34" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoPresupuestos.&#34;NOMBRE&#34;]"/>
<TfrxMemoView Name="Memo20" Left="645,8" Top="0" Width="81,34" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoPresupuestos.&#34;SITUACION&#34;]"/>
<TfrxMemoView Name="Memo21" Left="88,78" Top="0" Width="92,68" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoPresupuestos.&#34;FECHA_PRESUPUESTO&#34;]"/>
<TfrxMemoView Name="Memo18" Left="0" Top="0" Width="88,78" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoPresupuestos.&#34;REFERENCIA&#34;]"/>
<TfrxMemoView Name="Memo29" Left="727,14" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text="[frxDBInformeListadoPresupuestos.&#34;FECHA_DECISION&#34;]"/>
<TfrxMemoView Name="Memo30" Left="822,14" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoPresupuestos.&#34;FACTURA&#34;]"/>
<TfrxMemoView Name="Memo31" Left="917,14" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoPresupuestos.&#34;IMPORTE_TOTAL&#34;]"/>
</TfrxMasterData>
<TfrxGroupFooter Name="" Height="16" Left="0" Top="309" Width="1009,13451">
<TfrxMemoView Name="Memo53" Left="0" Top="0,37774772" Width="917" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoPresupuestos.&#34;TITULO&#34;]:"/>
<TfrxMemoView Name="Memo6" Left="917" Top="0,37774772" Width="95" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoPresupuestos.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros1)]"/>
</TfrxGroupFooter>
<TfrxHeader Name="Header1" Height="75" Left="0" Top="345" Width="1009,13451">
<TfrxMemoView Name="Memo13" Left="0" Top="60" Width="383,62987" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Resumen por meses de los presupuestos de cliente"/>
<TfrxMemoView Name="Memo22" Left="383,62987" Top="60" Width="120" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo23" Left="0" Top="29" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="Resumen por meses de los presupuestos de cliente"/>
</TfrxHeader>
<TfrxReportSummary Name="ReportSummary1" Height="15" Left="0" Top="517" Width="1009,13451">
<TfrxMemoView Name="Memo24" Align="baLeft" Left="0" Top="0" Width="383,62987" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Total: "/>
<TfrxMemoView Name="Memo32" Align="baLeft" Left="383,62987" Top="0" Width="120" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoPresupuestosResumen.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros2)]"/>
</TfrxReportSummary>
<TfrxMasterData Name="DatosMaestros2" Height="17" Left="0" Top="440" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSetName="frxDBInformeListadoPresupuestosResumen" RowCount="0" Stretched="True">
<TfrxMemoView Name="Memo9" Left="0" Top="0" Width="383,63" Height="17,00787402" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoPresupuestosResumen.&#34;TITULO&#34;]"/>
<TfrxMemoView Name="Memo12" Left="383,63" Top="0" Width="120" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoPresupuestosResumen.&#34;IMPORTE_TOTAL&#34;]"/>
</TfrxMasterData>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,57 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37800,8077143519" ReportOptions.Description.Text="" ReportOptions.LastChange="40585,536502581" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if Engine.FinalPass then&#13;&#10; begin&#13;&#10; if (&#60;Page#&#62; = &#60;TotalPages#&#62;) then&#13;&#10; begin &#13;&#10; mContinua.Visible := False;&#13;&#10; end &#13;&#10; else&#13;&#10; begin &#13;&#10; mContinua.Visible := True;&#13;&#10; end &#13;&#10; end; &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403990003546F70021008446174617365747301010C2E00000020446174615365744E616D653D226672784442496E666F726D654C69737461646F507265737570756573746F732200010C3500000020446174615365744E616D653D226672784442496E666F726D654C69737461646F507265737570756573746F73526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E61732200010C11000000204E616D653D2220506572696F646F732200010C31000000204E616D653D224665636861496E6963696F222056616C75653D22262336303B4665636861496E6963696F262336323B2200010C10000000204E616D653D22466563686146696E220000055374796C650100">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
<TfrxPictureView Name="Logotipo" Left="0" Top="37,10235" Width="80" Height="88" ShowHint="False" HightQuality="False"/>
<TfrxMemoView Name="DatosEmpresa" Left="80" Top="37,10235" Width="232" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
<TfrxLineView Name="Line1" Align="baLeft" Left="0" Top="129,10235" Width="312" Height="0" ShowHint="False" Frame.Color="32768" Frame.Typ="4" Frame.Width="4"/>
<TfrxShapeView Name="Shape5" Left="513" Top="5" Width="495" Height="125" ShowHint="False" Color="13434828" Shape="skRoundRectangle"/>
<TfrxMemoView Name="NombreCliente" Left="519,85807" Top="12" Width="480" Height="20" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE PRESUPUESTOS DE CLIENTE"/>
<TfrxMemoView Name="Memo3" Left="518,85807" Top="33,89765" Width="481" Height="91" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Fecha del listado: [&#60;Date&#62;] - Página [Page#] de [TotalPages#]&#13;&#10;[TextoParametros]"/>
</TfrxPageHeader>
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="637" Width="1009,13451" PrintOnLastPage="False">
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
</TfrxPageFooter>
<TfrxGroupHeader Name="" Height="40" Left="0" Restrictions="2" Top="257" Width="1009,13451" Condition="frxDBInformeListadoPresupuestos.&#34;NOMBRE&#34;" ReprintOnNewPage="True">
<TfrxMemoView Name="Memo27" Left="0" Top="25" Width="88,77953" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Nº presupuesto"/>
<TfrxMemoView Name="Memo28" Left="181,45671" Top="25" Width="464,33859" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Cliente"/>
<TfrxMemoView Name="Memo49" Left="645,7953" Top="25" Width="81,33859" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Situación"/>
<TfrxMemoView Name="Memo50" Left="727,13389" Top="25" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Fecha decisión"/>
<TfrxMemoView Name="Memo51" Left="822,13389" Top="25" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Nº factura"/>
<TfrxMemoView Name="Memo52" Left="917,13389" Top="25" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo8" Left="88,77953" Top="25" Width="92,67718" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha"/>
<TfrxMemoView Name="Memo7" Left="0" Top="2,77953" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoPresupuestos.&#34;NOMBRE&#34;]"/>
</TfrxGroupHeader>
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="317" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSetName="frxDBInformeListadoPresupuestos" RowCount="0" Stretched="True">
<TfrxMemoView Name="Memo4" Left="181,46" Top="0" Width="464,34" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoPresupuestos.&#34;NOMBRE&#34;]"/>
<TfrxMemoView Name="Memo20" Left="645,8" Top="0" Width="81,34" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoPresupuestos.&#34;SITUACION&#34;]"/>
<TfrxMemoView Name="Memo21" Left="88,78" Top="0" Width="92,68" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoPresupuestos.&#34;FECHA_PRESUPUESTO&#34;]"/>
<TfrxMemoView Name="Memo18" Left="0" Top="0" Width="88,78" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoPresupuestos.&#34;REFERENCIA&#34;]"/>
<TfrxMemoView Name="Memo29" Left="727,14" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text="[frxDBInformeListadoPresupuestos.&#34;FECHA_DECISION&#34;]"/>
<TfrxMemoView Name="Memo30" Left="822,14" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoPresupuestos.&#34;FACTURA&#34;]"/>
<TfrxMemoView Name="Memo31" Left="917,14" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoPresupuestos.&#34;IMPORTE_TOTAL&#34;]"/>
</TfrxMasterData>
<TfrxGroupFooter Name="" Height="16" Left="0" Top="354" Width="1009,13451">
<TfrxMemoView Name="Memo53" Left="0" Top="0,37774772" Width="917" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoPresupuestos.&#34;TITULO&#34;]:"/>
<TfrxMemoView Name="Memo6" Left="917" Top="0,37774772" Width="95" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoPresupuestos.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros1)]"/>
</TfrxGroupFooter>
<TfrxHeader Name="Header1" Height="75" Left="0" Top="430" Width="1009,13451">
<TfrxMemoView Name="Memo13" Left="0" Top="60" Width="383,62987" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Resumen por meses de los presupuestos de cliente"/>
<TfrxMemoView Name="Memo22" Left="383,62987" Top="60" Width="120" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo23" Left="0" Top="29" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="Resumen por meses de los presupuestos de cliente"/>
</TfrxHeader>
<TfrxReportSummary Name="ReportSummary1" Height="15" Left="0" Top="602" Width="1009,13451">
<TfrxMemoView Name="Memo24" Align="baLeft" Left="0" Top="0" Width="383,62987" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Total: "/>
<TfrxMemoView Name="Memo32" Align="baLeft" Left="383,62987" Top="0" Width="120" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoPresupuestosResumen.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros2)]"/>
</TfrxReportSummary>
<TfrxMasterData Name="DatosMaestros2" Height="17" Left="0" Top="525" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSetName="frxDBInformeListadoPresupuestosResumen" RowCount="0" Stretched="True">
<TfrxMemoView Name="Memo9" Left="0" Top="0" Width="383,63" Height="17,00787402" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoPresupuestosResumen.&#34;TITULO&#34;]"/>
<TfrxMemoView Name="Memo12" Left="383,63" Top="0" Width="120" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoPresupuestosResumen.&#34;IMPORTE_TOTAL&#34;]"/>
</TfrxMasterData>
<TfrxGroupHeader Name="GroupHeader1" Height="25" Left="0" Top="212" Width="1009,13451" Condition="frxDBInformeListadoPresupuestos.&#34;MES&#34;">
<TfrxMemoView Name="Memo1" Left="0" Top="5" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoPresupuestos.&#34;TITULO&#34;]"/>
</TfrxGroupHeader>
<TfrxGroupFooter Name="GroupFooter1" Height="20" Left="0" Top="390" Width="1009,13451"/>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,55 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37800,8077143519" ReportOptions.Description.Text="" ReportOptions.LastChange="40585,538138125" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if Engine.FinalPass then&#13;&#10; begin&#13;&#10; if (&#60;Page#&#62; = &#60;TotalPages#&#62;) then&#13;&#10; begin &#13;&#10; mContinua.Visible := False;&#13;&#10; end &#13;&#10; else&#13;&#10; begin &#13;&#10; mContinua.Visible := True;&#13;&#10; end &#13;&#10; end; &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403990003546F70021008446174617365747301010C3300000020446174615365744E616D653D226672784442496E666F726D654C69737461646F52656369626F7350656E6469656E7465732200010C3400000020446174615365744E616D653D226672784442496E666F726D654C69737461646F52656369626F7350656E64526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C15000000204E616D653D224E6577205661726961626C6531220000055374796C650100">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
<TfrxShapeView Name="Shape5" Left="512,90569" Top="2,10235" Width="495" Height="134" ShowHint="False" Color="13434828" Shape="skRoundRectangle"/>
<TfrxPictureView Name="Logotipo" Left="0" Top="37,10235" Width="80" Height="88" ShowHint="False" HightQuality="False"/>
<TfrxMemoView Name="DatosEmpresa" Left="80" Top="37,10235" Width="232" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
<TfrxMemoView Name="NombreCliente" Left="517,98423" Top="8,10235" Width="482,01577" Height="22" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE RECIBOS DE CLIENTE PENDIENTES"/>
<TfrxMemoView Name="Memo3" Left="518" Top="33,10235" Width="481" Height="97" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Fecha del listado: [&#60;Date&#62;] - Página [Page#] de [TotalPages#]&#13;&#10;[TextoParametros]"/>
<TfrxLineView Name="Line1" Align="baLeft" Left="0" Top="129,10235" Width="312" Height="0" ShowHint="False" Frame.Color="32768" Frame.Typ="4" Frame.Width="4"/>
</TfrxPageHeader>
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="523" Width="1009,13451" PrintOnLastPage="False">
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953000000002" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
</TfrxPageFooter>
<TfrxGroupHeader Name="" Height="40" Left="0" Restrictions="2" Top="212" Width="1009,13451" Condition="frxDBInformeListadoRecibosPendientes.&#34;MES&#34;" ReprintOnNewPage="True">
<TfrxMemoView Name="Memo27" Align="baLeft" Left="0" Top="25" Width="88,77953" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Nº factura"/>
<TfrxMemoView Name="Memo28" Align="baLeft" Left="248,77953" Top="25" Width="250" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Cliente"/>
<TfrxMemoView Name="Memo49" Align="baRight" Left="919,13451" Top="25" Width="90" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Situación"/>
<TfrxMemoView Name="Memo50" Align="baLeft" Left="168,77953" Top="25" Width="80" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha vto."/>
<TfrxMemoView Name="Memo52" Align="baRight" Left="799,13451" Top="25" Width="120" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo8" Align="baLeft" Left="88,77953" Top="25" Width="80" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha emisión"/>
<TfrxMemoView Name="Memo7" Left="7,55906" Top="2,77952999999999" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoRecibosPendientes.&#34;TITULO&#34;]"/>
<TfrxMemoView Name="Memo4" Left="498,77953" Top="25" Width="300" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Domiciliación"/>
</TfrxGroupHeader>
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="272" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSetName="frxDBInformeListadoRecibosPendientes" RowCount="0" Stretched="True">
<TfrxMemoView Name="Memo29" Left="168,78" Top="0" Width="80" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibosPendientes.&#34;FECHA_VENCIMIENTO&#34;]"/>
<TfrxMemoView Name="Memo1" Left="248,78" Top="0" Width="250" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibosPendientes.&#34;NOMBRE_CLIENTE&#34;]"/>
<TfrxMemoView Name="Memo20" Left="918,78" Top="0" Width="90" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibosPendientes.&#34;SITUACION&#34;]"/>
<TfrxMemoView Name="Memo21" Left="88,78" Top="0" Width="80" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibosPendientes.&#34;FECHA_EMISION&#34;]"/>
<TfrxMemoView Name="Memo18" Left="0" Top="0" Width="88,78" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibosPendientes.&#34;REFERENCIA&#34;]"/>
<TfrxMemoView Name="Memo31" Left="798,78" Top="0" Width="120" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoRecibosPendientes.&#34;IMPORTE_TOTAL&#34;] "/>
<TfrxMemoView Name="Memo5" Left="498,78" Top="0" Width="300" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibosPendientes.&#34;DATOS_BANCARIOS&#34;]"/>
</TfrxMasterData>
<TfrxGroupFooter Name="" Height="16" Left="0" Top="309" Width="1009,13451">
<TfrxMemoView Name="Memo6" Left="799" Top="0,377747720000002" Width="120" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoRecibosPendientes.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo53" Left="0" Top="0,377747720000002" Width="799" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoRecibosPendientes.&#34;TITULO&#34;]:"/>
<TfrxMemoView Name="Memo9" Left="919" Top="0" Width="90" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text=""/>
</TfrxGroupFooter>
<TfrxMemoView Name="Memo2" Align="baRight" Left="938,13451" Top="651" Width="71" Height="13" OnBeforePrint="Memo2OnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text=""/>
<TfrxGroupHeader Name="GroupHeader1" Height="45" Left="0" Top="345" Width="1009,13451" Condition="frxDBInformeListadoRecibosPendResumen.&#34;MES&#34;">
<TfrxMemoView Name="Memo13" Left="1" Top="6" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="RESUMEN POR DOMICILIACIÓN [frxDBInformeListadoRecibosPendResumen.&#34;TITULO&#34;]"/>
<TfrxMemoView Name="Memo16" Align="baLeft" Left="0" Top="30" Width="495" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Domiciliación"/>
<TfrxMemoView Name="Memo15" Align="baLeft" Left="495" Top="30" Width="108" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
</TfrxGroupHeader>
<TfrxMasterData Name="DatosMaestros2" Height="17" Left="0" Top="410" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSetName="frxDBInformeListadoRecibosPendResumen" RowCount="0" Stretched="True">
<TfrxMemoView Name="Memo11" Left="0" Top="0" Width="495" Height="17,00787402" OnBeforePrint="Memo11OnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoRecibosPendResumen.&#34;DATOS_BANCARIOS&#34;]"/>
<TfrxMemoView Name="Memo12" Left="495" Top="0" Width="108" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoRecibosPendResumen.&#34;IMPORTE_TOTAL&#34;] "/>
</TfrxMasterData>
<TfrxGroupFooter Name="GroupFooter1" Height="16" Left="0" Top="447" Width="1009,13451">
<TfrxMemoView Name="Memo22" Left="0" Top="0" Width="495" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoRecibosPendResumen.&#34;TITULO&#34;]:"/>
<TfrxMemoView Name="Memo17" Left="495" Top="0" Width="108" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoRecibosPendResumen.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros2)] "/>
</TfrxGroupFooter>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,59 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37800,8077143519" ReportOptions.Description.Text="" ReportOptions.LastChange="40585,5382274306" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if Engine.FinalPass then&#13;&#10; begin&#13;&#10; if (&#60;Page#&#62; = &#60;TotalPages#&#62;) then&#13;&#10; begin &#13;&#10; mContinua.Visible := False;&#13;&#10; end &#13;&#10; else&#13;&#10; begin &#13;&#10; mContinua.Visible := True;&#13;&#10; end &#13;&#10; end; &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403990003546F70021008446174617365747301010C3300000020446174615365744E616D653D226672784442496E666F726D654C69737461646F52656369626F7350656E6469656E7465732200010C3400000020446174615365744E616D653D226672784442496E666F726D654C69737461646F52656369626F7350656E64526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
<TfrxShapeView Name="Shape5" Left="512,90569" Top="1,10235" Width="495" Height="135" ShowHint="False" Color="13434828" Shape="skRoundRectangle"/>
<TfrxPictureView Name="Logotipo" Left="0" Top="37,10235" Width="80" Height="88" ShowHint="False" HightQuality="False"/>
<TfrxMemoView Name="DatosEmpresa" Left="80" Top="37,10235" Width="232" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
<TfrxMemoView Name="NombreCliente" Left="517,98423" Top="4,10235" Width="482,01577" Height="23" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE RECIBOS DE CLIENTE PENDIENTES"/>
<TfrxMemoView Name="Memo3" Left="518" Top="29,10235" Width="481" Height="101" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Fecha del listado: [&#60;Date&#62;] - Página [Page#] de [TotalPages#]&#13;&#10;[TextoParametros]"/>
<TfrxLineView Name="Line1" Align="baLeft" Left="0" Top="129,10235" Width="312" Height="0" ShowHint="False" Frame.Color="32768" Frame.Typ="4" Frame.Width="4"/>
</TfrxPageHeader>
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="603" Width="1009,13451" PrintOnLastPage="False">
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953000000002" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
</TfrxPageFooter>
<TfrxGroupHeader Name="" Height="40" Left="0" Restrictions="2" Top="252" Width="1009,13451" Condition="frxDBInformeListadoRecibosPendientes.&#34;NOMBRE_CLIENTE&#34;" ReprintOnNewPage="True">
<TfrxMemoView Name="Memo27" Align="baLeft" Left="0" Top="25" Width="88,77953" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Nº factura"/>
<TfrxMemoView Name="Memo28" Align="baLeft" Left="248,77953" Top="25" Width="250" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Cliente"/>
<TfrxMemoView Name="Memo49" Align="baRight" Left="919,13451" Top="25" Width="90" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Situación"/>
<TfrxMemoView Name="Memo50" Align="baLeft" Left="168,77953" Top="25" Width="80" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha vto."/>
<TfrxMemoView Name="Memo52" Align="baRight" Left="799,13451" Top="25" Width="120" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo8" Align="baLeft" Left="88,77953" Top="25" Width="80" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha emisión"/>
<TfrxMemoView Name="Memo7" Left="7,55906" Top="2,77952999999999" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoRecibosPendientes.&#34;NOMBRE_CLIENTE&#34;]"/>
<TfrxMemoView Name="Memo4" Left="498,77953" Top="25" Width="300" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Domiciliación"/>
</TfrxGroupHeader>
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="312" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSetName="frxDBInformeListadoRecibosPendientes" RowCount="0" Stretched="True">
<TfrxMemoView Name="Memo29" Left="168,78" Top="0" Width="80" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibosPendientes.&#34;FECHA_VENCIMIENTO&#34;]"/>
<TfrxMemoView Name="Memo1" Left="248,78" Top="0" Width="250" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibosPendientes.&#34;NOMBRE_CLIENTE&#34;]"/>
<TfrxMemoView Name="Memo20" Left="918,78" Top="0" Width="90" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibosPendientes.&#34;SITUACION&#34;]"/>
<TfrxMemoView Name="Memo21" Left="88,78" Top="0" Width="80" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibosPendientes.&#34;FECHA_EMISION&#34;]"/>
<TfrxMemoView Name="Memo18" Left="0" Top="0" Width="88,78" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibosPendientes.&#34;REFERENCIA&#34;]"/>
<TfrxMemoView Name="Memo31" Left="798,78" Top="0" Width="120" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoRecibosPendientes.&#34;IMPORTE_TOTAL&#34;] "/>
<TfrxMemoView Name="Memo5" Left="498,78" Top="0" Width="300" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibosPendientes.&#34;DATOS_BANCARIOS&#34;]"/>
</TfrxMasterData>
<TfrxGroupFooter Name="" Height="16" Left="0" Top="349" Width="1009,13451">
<TfrxMemoView Name="Memo6" Left="799" Top="0" Width="120" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoRecibosPendientes.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo53" Left="0" Top="0" Width="799" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoRecibosPendientes.&#34;TITULO&#34;]:"/>
<TfrxMemoView Name="Memo9" Left="919" Top="0" Width="90" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text=""/>
</TfrxGroupFooter>
<TfrxMemoView Name="Memo2" Align="baRight" Left="938,13451" Top="651" Width="71" Height="13" OnBeforePrint="Memo2OnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text=""/>
<TfrxGroupHeader Name="GroupHeader1" Height="45" Left="0" Top="425" Width="1009,13451" Condition="frxDBInformeListadoRecibosPendResumen.&#34;MES&#34;">
<TfrxMemoView Name="Memo13" Left="1" Top="6" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="RESUMEN POR DOMICILIACIÓN [frxDBInformeListadoRecibosPendResumen.&#34;TITULO&#34;]"/>
<TfrxMemoView Name="Memo16" Align="baLeft" Left="0" Top="30" Width="495" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Domiciliación"/>
<TfrxMemoView Name="Memo15" Align="baLeft" Left="495" Top="30" Width="108" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
</TfrxGroupHeader>
<TfrxMasterData Name="DatosMaestros2" Height="17" Left="0" Top="490" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSetName="frxDBInformeListadoRecibosPendResumen" RowCount="0" Stretched="True">
<TfrxMemoView Name="Memo11" Left="0" Top="0" Width="495" Height="17,00787402" OnBeforePrint="Memo11OnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoRecibosPendResumen.&#34;DATOS_BANCARIOS&#34;]"/>
<TfrxMemoView Name="Memo12" Left="495" Top="0" Width="108" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoRecibosPendResumen.&#34;IMPORTE_TOTAL&#34;] "/>
</TfrxMasterData>
<TfrxGroupFooter Name="GroupFooter1" Height="16" Left="0" Top="527" Width="1009,13451">
<TfrxMemoView Name="Memo22" Left="0" Top="0" Width="495" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoRecibosPendResumen.&#34;TITULO&#34;]:"/>
<TfrxMemoView Name="Memo17" Left="495" Top="0" Width="108" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoRecibosPendResumen.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros2)] "/>
</TfrxGroupFooter>
<TfrxGroupHeader Name="GroupHeader2" Height="20" Left="0" Top="212" Width="1009,13451" Condition="frxDBInformeListadoRecibosPendientes.&#34;MES&#34;">
<TfrxMemoView Name="Memo10" Left="1" Top="0" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoRecibosPendientes.&#34;TITULO&#34;]"/>
</TfrxGroupHeader>
<TfrxGroupFooter Name="GroupFooter2" Height="20" Left="0" Top="385" Width="1009,13451"/>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,52 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37800,8077143519" ReportOptions.Description.Text="" ReportOptions.LastChange="40585,5366475463" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if Engine.FinalPass then&#13;&#10; begin&#13;&#10; if (&#60;Page#&#62; = &#60;TotalPages#&#62;) then&#13;&#10; begin &#13;&#10; mContinua.Visible := False;&#13;&#10; end &#13;&#10; else&#13;&#10; begin &#13;&#10; mContinua.Visible := True;&#13;&#10; end &#13;&#10; end; &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403990003546F70021008446174617365747301010C2900000020446174615365744E616D653D226672784442496E666F726D654C69737461646F52656369626F732200010C3000000020446174615365744E616D653D226672784442496E666F726D654C69737461646F52656369626F73526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
<TfrxShapeView Name="Shape5" Left="512,14193" Top="2,10235" Width="495" Height="132" ShowHint="False" Color="13434828" Shape="skRoundRectangle"/>
<TfrxPictureView Name="Logotipo" Left="0" Top="37,10235" Width="80" Height="88" ShowHint="False" HightQuality="False"/>
<TfrxMemoView Name="DatosEmpresa" Left="80" Top="37,10235" Width="232" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
<TfrxMemoView Name="NombreCliente" Left="515" Top="10,10235" Width="482" Height="26" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE RECIBOS DE CLIENTE"/>
<TfrxMemoView Name="Memo3" Left="515" Top="39,10235" Width="481" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Fecha del listado: [&#60;Date&#62;] - Página [Page#] de [TotalPages#]&#13;&#10;[TextoParametros]"/>
<TfrxLineView Name="Line1" Align="baLeft" Left="0" Top="129,10235" Width="312" Height="0" ShowHint="False" Frame.Color="32768" Frame.Typ="4" Frame.Width="4"/>
</TfrxPageHeader>
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="557" Width="1009,13451" PrintOnLastPage="False">
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953000000002" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
</TfrxPageFooter>
<TfrxGroupHeader Name="" Height="40" Left="0" Restrictions="2" Top="212" Width="1009,13451" Condition="frxDBInformeListadoRecibos.&#34;MES&#34;" ReprintOnNewPage="True">
<TfrxMemoView Name="Memo27" Left="0" Top="25" Width="88,77953" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Nº factura"/>
<TfrxMemoView Name="Memo28" Left="276,45671" Top="25" Width="464,33859" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Cliente"/>
<TfrxMemoView Name="Memo49" Left="740,7953" Top="25" Width="134,25201" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Situación"/>
<TfrxMemoView Name="Memo50" Left="181,45671" Top="25" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha vto."/>
<TfrxMemoView Name="Memo52" Left="875,04731" Top="25" Width="136,06299213" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo8" Left="88,77953" Top="25" Width="92,67718" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha emisión"/>
<TfrxMemoView Name="Memo7" Left="7,55906" Top="2,77952999999999" Width="485,37013" Height="15,1181102362205" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoRecibos.&#34;TITULO&#34;]"/>
</TfrxGroupHeader>
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="272" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSetName="frxDBInformeListadoRecibos" RowCount="0" Stretched="True">
<TfrxMemoView Name="Memo29" Left="181,46" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibos.&#34;FECHA_VENCIMIENTO&#34;]"/>
<TfrxMemoView Name="Memo1" Left="276,46" Top="0" Width="464,34" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibos.&#34;NOMBRE_CLIENTE&#34;]"/>
<TfrxMemoView Name="Memo20" Left="740,8" Top="0" Width="134,25" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoRecibos.&#34;SITUACION&#34;]"/>
<TfrxMemoView Name="Memo21" Left="88,78" Top="0" Width="92,68" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibos.&#34;FECHA_EMISION&#34;]"/>
<TfrxMemoView Name="Memo18" Left="0" Top="0" Width="88,78" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibos.&#34;REFERENCIA&#34;]"/>
<TfrxMemoView Name="Memo31" Left="875,05" Top="0" Width="136,06" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoRecibos.&#34;IMPORTE_TOTAL&#34;]"/>
</TfrxMasterData>
<TfrxGroupFooter Name="" Height="16" Left="0" Top="309" Width="1009,13451">
<TfrxMemoView Name="Memo6" Left="875" Top="0,377747720000002" Width="136,06" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoRecibos.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo53" Left="0" Top="0,377747720000002" Width="875" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoRecibos.&#34;TITULO&#34;]:"/>
</TfrxGroupFooter>
<TfrxMemoView Name="Memo2" Align="baRight" Left="938,13451" Top="651" Width="71" Height="13" OnBeforePrint="Memo2OnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text=""/>
<TfrxHeader Name="Header1" Height="75" Left="0" Top="345" Width="1009,13451">
<TfrxMemoView Name="Memo13" Left="0" Top="60" Width="383,62987" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Resumen por meses de los recibos de cliente"/>
<TfrxMemoView Name="Memo22" Left="383,62987" Top="60" Width="94,48818898" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo23" Left="7,55906" Top="29" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="Resumen por meses de los recibos de cliente"/>
</TfrxHeader>
<TfrxReportSummary Name="ReportSummary1" Height="20" Left="0" Top="517" Width="1009,13451">
<TfrxMemoView Name="Memo24" Left="0" Top="0" Width="383,62987" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Total: "/>
<TfrxMemoView Name="Memo32" Left="383,62987" Top="0" Width="94,48818898" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoRecibosResumen.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros2)]"/>
</TfrxReportSummary>
<TfrxMasterData Name="DatosMaestros2" Height="17" Left="0" Top="440" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSetName="frxDBInformeListadoRecibosResumen" RowCount="0" Stretched="True">
<TfrxMemoView Name="Memo9" Left="0" Top="0" Width="383,63" Height="17,00787402" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoRecibosResumen.&#34;TITULO&#34;]"/>
<TfrxMemoView Name="Memo12" Left="383,63" Top="0" Width="94,64276" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoRecibosResumen.&#34;IMPORTE_TOTAL&#34;]"/>
</TfrxMasterData>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,56 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37800,8077143519" ReportOptions.Description.Text="" ReportOptions.LastChange="40585,5367983102" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if Engine.FinalPass then&#13;&#10; begin&#13;&#10; if (&#60;Page#&#62; = &#60;TotalPages#&#62;) then&#13;&#10; begin &#13;&#10; mContinua.Visible := False;&#13;&#10; end &#13;&#10; else&#13;&#10; begin &#13;&#10; mContinua.Visible := True;&#13;&#10; end &#13;&#10; end; &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403990003546F70021008446174617365747301010C2900000020446174615365744E616D653D226672784442496E666F726D654C69737461646F52656369626F732200010C3000000020446174615365744E616D653D226672784442496E666F726D654C69737461646F52656369626F73526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
<TfrxShapeView Name="Shape5" Left="513,14193" Top="3,10235" Width="495" Height="134" ShowHint="False" Color="13434828" Shape="skRoundRectangle"/>
<TfrxPictureView Name="Logotipo" Left="0" Top="37,10235" Width="80" Height="88" ShowHint="False" HightQuality="False"/>
<TfrxMemoView Name="DatosEmpresa" Left="80" Top="37,10235" Width="232" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
<TfrxMemoView Name="NombreCliente" Left="521" Top="9,10235" Width="482" Height="24" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE RECIBOS DE CLIENTE"/>
<TfrxMemoView Name="Memo3" Left="522" Top="36,10235" Width="481" Height="96" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Fecha del listado: [&#60;Date&#62;] - Página [Page#] de [TotalPages#]&#13;&#10;[TextoParametros]"/>
<TfrxLineView Name="Line1" Align="baLeft" Left="0" Top="129,10235" Width="312" Height="0" ShowHint="False" Frame.Color="32768" Frame.Typ="4" Frame.Width="4"/>
</TfrxPageHeader>
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="637" Width="1009,13451" PrintOnLastPage="False">
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953000000002" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
<TfrxMemoView Name="Memo2" Align="baRight" Left="938,13451" Top="14" Width="71" Height="13" OnBeforePrint="Memo2OnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text=""/>
</TfrxPageFooter>
<TfrxGroupHeader Name="" Height="40" Left="0" Restrictions="2" Top="252" Width="1009,13451" Condition="frxDBInformeListadoRecibos.&#34;NOMBRE_CLIENTE&#34;" ReprintOnNewPage="True">
<TfrxMemoView Name="Memo27" Left="0" Top="25" Width="88,77953" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Nº factura"/>
<TfrxMemoView Name="Memo28" Left="276,45671" Top="25" Width="464,33859" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Cliente"/>
<TfrxMemoView Name="Memo49" Left="740,7953" Top="25" Width="134,25201" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Situación"/>
<TfrxMemoView Name="Memo50" Left="181,45671" Top="25" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha vto."/>
<TfrxMemoView Name="Memo52" Left="875,04731" Top="25" Width="136,06299213" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo8" Left="88,77953" Top="25" Width="92,67718" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha emisión"/>
<TfrxMemoView Name="Memo7" Left="7,55906" Top="2,77952999999999" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoRecibos.&#34;NOMBRE_CLIENTE&#34;]"/>
</TfrxGroupHeader>
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="312" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSetName="frxDBInformeListadoRecibos" RowCount="0" Stretched="True">
<TfrxMemoView Name="Memo29" Left="181,46" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibos.&#34;FECHA_VENCIMIENTO&#34;]"/>
<TfrxMemoView Name="Memo1" Left="276,46" Top="0" Width="464,34" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibos.&#34;NOMBRE_CLIENTE&#34;]"/>
<TfrxMemoView Name="Memo20" Left="740,8" Top="0" Width="134,25" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoRecibos.&#34;SITUACION&#34;]"/>
<TfrxMemoView Name="Memo21" Left="88,78" Top="0" Width="92,68" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibos.&#34;FECHA_EMISION&#34;]"/>
<TfrxMemoView Name="Memo18" Left="0" Top="0" Width="88,78" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibos.&#34;REFERENCIA&#34;]"/>
<TfrxMemoView Name="Memo31" Left="875,05" Top="0" Width="136,06" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoRecibos.&#34;IMPORTE_TOTAL&#34;]"/>
</TfrxMasterData>
<TfrxGroupFooter Name="" Height="16" Left="0" Top="349" Width="1009,13451">
<TfrxMemoView Name="Memo6" Left="875" Top="0,377747720000002" Width="136,06" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoRecibos.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo53" Left="0" Top="0,377747720000002" Width="875" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoRecibos.&#34;TITULO&#34;]:"/>
</TfrxGroupFooter>
<TfrxHeader Name="Header1" Height="75" Left="0" Top="425" Width="1009,13451">
<TfrxMemoView Name="Memo13" Left="0" Top="60" Width="383,62987" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Resumen por meses de los recibos de cliente"/>
<TfrxMemoView Name="Memo22" Left="383,62987" Top="60" Width="94,48818898" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo23" Left="7,55906" Top="29" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="Resumen por meses de los recibos de cliente"/>
</TfrxHeader>
<TfrxReportSummary Name="ReportSummary1" Height="20" Left="0" Top="597" Width="1009,13451">
<TfrxMemoView Name="Memo24" Left="0" Top="0" Width="383,62987" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Total: "/>
<TfrxMemoView Name="Memo32" Left="383,62987" Top="0" Width="94,48818898" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoRecibosResumen.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros2)]"/>
</TfrxReportSummary>
<TfrxMasterData Name="DatosMaestros2" Height="17" Left="0" Top="520" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSetName="frxDBInformeListadoRecibosResumen" RowCount="0" Stretched="True">
<TfrxMemoView Name="Memo9" Left="0" Top="0" Width="383,63" Height="17,00787402" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoRecibosResumen.&#34;TITULO&#34;]"/>
<TfrxMemoView Name="Memo12" Left="383,63" Top="0" Width="94,64276" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoRecibosResumen.&#34;IMPORTE_TOTAL&#34;]"/>
</TfrxMasterData>
<TfrxGroupHeader Name="GroupHeader1" Height="20" Left="0" Top="212" Width="1009,13451" Condition="frxDBInformeListadoRecibos.&#34;MES&#34;">
<TfrxMemoView Name="Memo4" Left="0" Top="0" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoRecibos.&#34;TITULO&#34;]"/>
</TfrxGroupHeader>
<TfrxGroupFooter Name="GroupFooter1" Height="20" Left="0" Top="385" Width="1009,13451"/>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,55 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37800,8077143519" ReportOptions.Description.Text="" ReportOptions.LastChange="40585,5387398843" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if Engine.FinalPass then&#13;&#10; begin&#13;&#10; if (&#60;Page#&#62; = &#60;TotalPages#&#62;) then&#13;&#10; begin &#13;&#10; mContinua.Visible := False;&#13;&#10; end &#13;&#10; else&#13;&#10; begin &#13;&#10; mContinua.Visible := True;&#13;&#10; end &#13;&#10; end; &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo5OnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10; ACadena : String; &#13;&#10;begin&#13;&#10; ACadena := &#60;frxDBInformeListadoRecibosPendientes.&#34;DATOS_BANCARIOS&#34;&#62;; &#13;&#10; if Pos('Nº de cuenta: ', ACadena) &#62; 0 then&#13;&#10; begin&#13;&#10; Delete(ACadena, 1, 14);&#13;&#10; Memo5.Lines.Text := ' ' + ACadena; &#13;&#10; end; &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo11OnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10; ACadena : String; &#13;&#10;begin&#13;&#10; ACadena := &#60;frxDBInformeListadoRecibosPendResumen.&#34;DATOS_BANCARIOS&#34;&#62;; &#13;&#10; if Pos('Nº de cuenta: ', ACadena) &#62; 0 then&#13;&#10; begin&#13;&#10; Delete(ACadena, 1, 14);&#13;&#10; Memo11.Lines.Text := ' ' + ACadena; &#13;&#10; end;&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403990003546F70021008446174617365747301010C3300000020446174615365744E616D653D226672784442496E666F726D654C69737461646F52656369626F7350656E6469656E7465732200010C3400000020446174615365744E616D653D226672784442496E666F726D654C69737461646F52656369626F7350656E64526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
<TfrxPictureView Name="Logotipo" Left="0" Top="37,10235" Width="80" Height="88" ShowHint="False" HightQuality="False"/>
<TfrxMemoView Name="DatosEmpresa" Left="80" Top="37,10235" Width="232" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
<TfrxLineView Name="Line1" Align="baLeft" Left="0" Top="129,10235" Width="312" Height="0" ShowHint="False" Frame.Color="32768" Frame.Typ="4" Frame.Width="4"/>
<TfrxShapeView Name="Shape5" Left="542" Top="9" Width="465" Height="122" ShowHint="False" Color="13434828" Frame.Width="0,1" Shape="skRoundRectangle"/>
<TfrxMemoView Name="NombreCliente" Left="545,85807" Top="14" Width="452" Height="16,88188" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE RECIBOS A PROVEEDOR PENDIENTES"/>
<TfrxMemoView Name="Memo3" Left="545,85807" Top="34" Width="452" Height="91" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Fecha del listado: [&#60;Date&#62;] - Página [Page#] de [TotalPages#]&#13;&#10;[TextoParametros]"/>
</TfrxPageHeader>
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="527" Width="1009,13451" PrintOnLastPage="False">
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953000000002" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
</TfrxPageFooter>
<TfrxGroupHeader Name="" Height="40" Left="0" Restrictions="2" Top="212" Width="1009,13451" Condition="frxDBInformeListadoRecibosPendientes.&#34;MES&#34;" ReprintOnNewPage="True">
<TfrxMemoView Name="Memo27" Left="0" Top="25" Width="88,77953" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Nº factura"/>
<TfrxMemoView Name="Memo28" Left="248,77953" Top="25" Width="250" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Proveedor"/>
<TfrxMemoView Name="Memo49" Align="baLeft" Left="918,77953" Top="25" Width="90" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Situación"/>
<TfrxMemoView Name="Memo50" Left="168,77953" Top="25" Width="80" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha vto."/>
<TfrxMemoView Name="Memo52" Align="baLeft" Left="798,77953" Top="25" Width="120" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo8" Left="88,77953" Top="25" Width="80" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha emisión"/>
<TfrxMemoView Name="Memo7" Left="0" Top="2,77953" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoRecibosPendientes.&#34;TITULO&#34;]"/>
<TfrxMemoView Name="Memo4" Left="498,77953" Top="25" Width="300" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Domiciliación"/>
</TfrxGroupHeader>
<TfrxMasterData Name="DatosMaestros1" Height="17" Left="0" Top="272" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSetName="frxDBInformeListadoRecibosPendientes" RowCount="0" Stretched="True">
<TfrxMemoView Name="Memo29" Left="168,78" Top="0" Width="80" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibosPendientes.&#34;FECHA_VENCIMIENTO&#34;]"/>
<TfrxMemoView Name="Memo1" Left="248,78" Top="0" Width="250" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibosPendientes.&#34;NOMBRE_PROVEEDOR&#34;]"/>
<TfrxMemoView Name="Memo20" Left="918,78" Top="0" Width="90" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibosPendientes.&#34;SITUACION&#34;]"/>
<TfrxMemoView Name="Memo21" Left="88,78" Top="0" Width="80" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibosPendientes.&#34;FECHA_EMISION&#34;]"/>
<TfrxMemoView Name="Memo18" Left="0" Top="0" Width="88,78" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoRecibosPendientes.&#34;REFERENCIA&#34;]"/>
<TfrxMemoView Name="Memo31" Left="798,78" Top="0" Width="120" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoRecibosPendientes.&#34;IMPORTE_TOTAL&#34;] "/>
<TfrxMemoView Name="Memo5" Left="498,78" Top="0" Width="300" Height="17,00787402" OnBeforePrint="Memo5OnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibosPendientes.&#34;DATOS_BANCARIOS&#34;]"/>
</TfrxMasterData>
<TfrxGroupFooter Name="" Height="16" Left="0" Top="309" Width="1009,13451">
<TfrxMemoView Name="Memo6" Left="799" Top="0" Width="120" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoRecibosPendientes.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo53" Left="0" Top="0" Width="799" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoRecibosPendientes.&#34;TITULO&#34;]:"/>
<TfrxMemoView Name="Memo9" Left="919" Top="0" Width="90" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text=""/>
</TfrxGroupFooter>
<TfrxMemoView Name="Memo2" Align="baRight" Left="938,13451" Top="651" Width="71" Height="13" OnBeforePrint="Memo2OnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" Font.Charset="1" Font.Color="0" Font.Height="-9" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text=""/>
<TfrxGroupHeader Name="GroupHeader1" Height="45" Left="0" Top="345" Width="1009,13451" Condition="frxDBInformeListadoRecibosPendResumen.&#34;MES&#34;">
<TfrxMemoView Name="Memo13" Left="0" Top="8" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="RESUMEN POR DOMICILIACIÓN [frxDBInformeListadoRecibosPendResumen.&#34;TITULO&#34;]"/>
<TfrxMemoView Name="Memo16" Left="0" Top="30" Width="495" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Domiciliación"/>
<TfrxMemoView Name="Memo15" Left="495" Top="30" Width="108" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
</TfrxGroupHeader>
<TfrxMasterData Name="DatosMaestros2" Height="17" Left="0" Top="410" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSetName="frxDBInformeListadoRecibosPendResumen" RowCount="0">
<TfrxMemoView Name="Memo11" Left="0" Top="0" Width="495" Height="17,00787402" OnBeforePrint="Memo11OnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoRecibosPendResumen.&#34;DATOS_BANCARIOS&#34;]"/>
<TfrxMemoView Name="Memo12" Left="495" Top="0" Width="108" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoRecibosPendResumen.&#34;IMPORTE_TOTAL&#34;] "/>
</TfrxMasterData>
<TfrxGroupFooter Name="GroupFooter1" Height="20" Left="0" Top="447" Width="1009,13451">
<TfrxMemoView Name="Memo22" Left="0" Top="0" Width="495" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoRecibosPendResumen.&#34;TITULO&#34;]:"/>
<TfrxMemoView Name="Memo17" Left="495" Top="0" Width="108" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoRecibosPendResumen.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros2)] "/>
</TfrxGroupFooter>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,58 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37800,8077143519" ReportOptions.Description.Text="" ReportOptions.LastChange="40585,5389643981" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if Engine.FinalPass then&#13;&#10; begin&#13;&#10; if (&#60;Page#&#62; = &#60;TotalPages#&#62;) then&#13;&#10; begin &#13;&#10; mContinua.Visible := False;&#13;&#10; end &#13;&#10; else&#13;&#10; begin &#13;&#10; mContinua.Visible := True;&#13;&#10; end &#13;&#10; end; &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo5OnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10; ACadena : String; &#13;&#10;begin&#13;&#10; ACadena := &#60;frxDBInformeListadoRecibosPendientes.&#34;DATOS_BANCARIOS&#34;&#62;; &#13;&#10; if Pos('Nº de cuenta: ', ACadena) &#62; 0 then&#13;&#10; begin&#13;&#10; Delete(ACadena, 1, 14);&#13;&#10; Memo5.Lines.Text := ' ' + ACadena; &#13;&#10; end; &#13;&#10;end;&#13;&#10;&#13;&#10;procedure Memo11OnBeforePrint(Sender: TfrxComponent);&#13;&#10;var&#13;&#10; ACadena : String; &#13;&#10;begin&#13;&#10; ACadena := &#60;frxDBInformeListadoRecibosPendResumen.&#34;DATOS_BANCARIOS&#34;&#62;; &#13;&#10; if Pos('Nº de cuenta: ', ACadena) &#62; 0 then&#13;&#10; begin&#13;&#10; Delete(ACadena, 1, 14);&#13;&#10; Memo11.Lines.Text := ' ' + ACadena; &#13;&#10; end;&#13;&#10;end;&#13;&#10; &#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403990003546F70021008446174617365747301010C3300000020446174615365744E616D653D226672784442496E666F726D654C69737461646F52656369626F7350656E6469656E7465732200010C3400000020446174615365744E616D653D226672784442496E666F726D654C69737461646F52656369626F7350656E64526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451">
<TfrxPictureView Name="Logotipo" Left="0" Top="37,10235" Width="80" Height="88" ShowHint="False" HightQuality="False"/>
<TfrxMemoView Name="DatosEmpresa" Left="80" Top="37,10235" Width="232" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
<TfrxLineView Name="Line1" Align="baLeft" Left="0" Top="129,10235" Width="312" Height="0" ShowHint="False" Frame.Color="32768" Frame.Typ="4" Frame.Width="4"/>
<TfrxShapeView Name="Shape5" Left="542" Top="11" Width="465" Height="122" ShowHint="False" Color="13434828" Frame.Width="0,1" Shape="skRoundRectangle"/>
<TfrxMemoView Name="NombreCliente" Left="545,85807" Top="16" Width="452" Height="16,88188" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE RECIBOS A PROVEEDOR PENDIENTES"/>
<TfrxMemoView Name="Memo3" Left="545,85807" Top="36" Width="452" Height="91" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Fecha del listado: [&#60;Date&#62;] - Página [Page#] de [TotalPages#]&#13;&#10;[TextoParametros]"/>
</TfrxPageHeader>
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="607" Width="1009,13451" PrintOnLastPage="False">
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953000000002" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
</TfrxPageFooter>
<TfrxGroupHeader Name="" Height="40" Left="0" Restrictions="2" Top="252" Width="1009,13451" Condition="frxDBInformeListadoRecibosPendientes.&#34;NOMBRE_PROVEEDOR&#34;" ReprintOnNewPage="True">
<TfrxMemoView Name="Memo27" Left="0" Top="25" Width="88,77953" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Nº factura"/>
<TfrxMemoView Name="Memo28" Left="248,77953" Top="25" Width="250" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Proveedor"/>
<TfrxMemoView Name="Memo49" Align="baLeft" Left="918,77953" Top="25" Width="90" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Situación"/>
<TfrxMemoView Name="Memo50" Left="168,77953" Top="25" Width="80" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha vto."/>
<TfrxMemoView Name="Memo52" Align="baLeft" Left="798,77953" Top="25" Width="120" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo8" Left="88,77953" Top="25" Width="80" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha emisión"/>
<TfrxMemoView Name="Memo7" Left="0" Top="2,77953" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoRecibosPendientes.&#34;NOMBRE_PROVEEDOR&#34;]"/>
<TfrxMemoView Name="Memo4" Left="498,77953" Top="25" Width="300" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Domiciliación"/>
</TfrxGroupHeader>
<TfrxMasterData Name="DatosMaestros1" Height="17" Left="0" Top="312" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSetName="frxDBInformeListadoRecibosPendientes" RowCount="0" Stretched="True">
<TfrxMemoView Name="Memo29" Left="168,78" Top="0" Width="80" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibosPendientes.&#34;FECHA_VENCIMIENTO&#34;]"/>
<TfrxMemoView Name="Memo1" Left="248,78" Top="0" Width="250" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibosPendientes.&#34;NOMBRE_PROVEEDOR&#34;]"/>
<TfrxMemoView Name="Memo20" Left="918,78" Top="0" Width="90" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibosPendientes.&#34;SITUACION&#34;]"/>
<TfrxMemoView Name="Memo21" Left="88,78" Top="0" Width="80" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibosPendientes.&#34;FECHA_EMISION&#34;]"/>
<TfrxMemoView Name="Memo18" Left="0" Top="0" Width="88,78" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoRecibosPendientes.&#34;REFERENCIA&#34;]"/>
<TfrxMemoView Name="Memo31" Left="798,78" Top="0" Width="120" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoRecibosPendientes.&#34;IMPORTE_TOTAL&#34;] "/>
<TfrxMemoView Name="Memo5" Left="498,78" Top="0" Width="300" Height="17,00787402" OnBeforePrint="Memo5OnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibosPendientes.&#34;DATOS_BANCARIOS&#34;]"/>
</TfrxMasterData>
<TfrxGroupFooter Name="" Height="16" Left="0" Top="349" Width="1009,13451">
<TfrxMemoView Name="Memo6" Left="799" Top="0" Width="120" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoRecibosPendientes.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo53" Left="0" Top="0" Width="799" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoRecibosPendientes.&#34;TITULO&#34;]:"/>
<TfrxMemoView Name="Memo9" Left="919" Top="0" Width="90" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text=""/>
</TfrxGroupFooter>
<TfrxGroupHeader Name="GroupHeader1" Height="45" Left="0" Top="425" Width="1009,13451" Condition="frxDBInformeListadoRecibosPendResumen.&#34;MES&#34;">
<TfrxMemoView Name="Memo13" Left="0" Top="8" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="RESUMEN POR DOMICILIACIÓN [frxDBInformeListadoRecibosPendResumen.&#34;TITULO&#34;]"/>
<TfrxMemoView Name="Memo16" Left="0" Top="30" Width="495" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Domiciliación"/>
<TfrxMemoView Name="Memo15" Left="495" Top="30" Width="108" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
</TfrxGroupHeader>
<TfrxMasterData Name="DatosMaestros2" Height="17" Left="0" Top="490" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSetName="frxDBInformeListadoRecibosPendResumen" RowCount="0">
<TfrxMemoView Name="Memo11" Left="0" Top="0" Width="495" Height="17,00787402" OnBeforePrint="Memo11OnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoRecibosPendResumen.&#34;DATOS_BANCARIOS&#34;]"/>
<TfrxMemoView Name="Memo12" Left="495" Top="0" Width="108" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoRecibosPendResumen.&#34;IMPORTE_TOTAL&#34;] "/>
</TfrxMasterData>
<TfrxGroupFooter Name="GroupFooter1" Height="20" Left="0" Top="527" Width="1009,13451">
<TfrxMemoView Name="Memo22" Left="0" Top="0" Width="495" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoRecibosPendResumen.&#34;TITULO&#34;]:"/>
<TfrxMemoView Name="Memo17" Left="495" Top="0" Width="108" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoRecibosPendResumen.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros2)] "/>
</TfrxGroupFooter>
<TfrxGroupHeader Name="GroupHeader2" Height="20" Left="0" Top="212" Width="1009,13451" Condition="frxDBInformeListadoRecibosPendientes.&#34;MES&#34;">
<TfrxMemoView Name="Memo10" Left="0" Top="1" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoRecibosPendientes.&#34;TITULO&#34;]"/>
</TfrxGroupHeader>
<TfrxGroupFooter Name="GroupFooter2" Height="20" Left="0" Top="385" Width="1009,13451"/>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,51 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37800,8077143519" ReportOptions.Description.Text="" ReportOptions.LastChange="40585,5384268056" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if Engine.FinalPass then&#13;&#10; begin&#13;&#10; if (&#60;Page#&#62; = &#60;TotalPages#&#62;) then&#13;&#10; begin &#13;&#10; mContinua.Visible := False;&#13;&#10; end &#13;&#10; else&#13;&#10; begin &#13;&#10; mContinua.Visible := True;&#13;&#10; end &#13;&#10; end;&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403990003546F70021008446174617365747301010C2900000020446174615365744E616D653D226672784442496E666F726D654C69737461646F52656369626F732200010C3000000020446174615365744E616D653D226672784442496E666F726D654C69737461646F52656369626F73526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
<TfrxPictureView Name="Logotipo" Left="0" Top="37,10235" Width="80" Height="88" ShowHint="False" HightQuality="False"/>
<TfrxMemoView Name="DatosEmpresa" Left="80" Top="37,10235" Width="232" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
<TfrxLineView Name="Line1" Align="baLeft" Left="0" Top="129,10235" Width="312" Height="0" ShowHint="False" Frame.Color="32768" Frame.Typ="4" Frame.Width="4"/>
<TfrxShapeView Name="Shape5" Left="543" Top="11" Width="465" Height="122" ShowHint="False" Color="13434828" Frame.Width="0,1" Shape="skRoundRectangle"/>
<TfrxMemoView Name="NombreCliente" Left="546,85807" Top="16" Width="452" Height="16,88188" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE RECIBOS A PROVEEDOR"/>
<TfrxMemoView Name="Memo3" Left="546,85807" Top="36" Width="452" Height="91" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Fecha del listado: [&#60;Date&#62;] - Página [Page#] de [TotalPages#]&#13;&#10;[TextoParametros]"/>
</TfrxPageHeader>
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="552" Width="1009,13451" PrintOnLastPage="False">
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953000000002" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
</TfrxPageFooter>
<TfrxGroupHeader Name="" Height="40" Left="0" Restrictions="2" Top="212" Width="1009,13451" Condition="frxDBInformeListadoRecibos.&#34;MES&#34;" ReprintOnNewPage="True">
<TfrxMemoView Name="Memo27" Left="0" Top="25" Width="88,77953" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Nº factura"/>
<TfrxMemoView Name="Memo28" Left="276,45671" Top="25" Width="464,33859" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Proveedor"/>
<TfrxMemoView Name="Memo49" Left="740,7953" Top="25" Width="134,25201" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Situación"/>
<TfrxMemoView Name="Memo50" Left="181,45671" Top="25" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha vto."/>
<TfrxMemoView Name="Memo52" Left="875,04731" Top="25" Width="136,06299213" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo8" Left="88,77953" Top="25" Width="92,67718" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha emisión"/>
<TfrxMemoView Name="Memo7" Left="0" Top="2,77953" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoRecibos.&#34;TITULO&#34;]"/>
</TfrxGroupHeader>
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="272" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSetName="frxDBInformeListadoRecibos" RowCount="0" Stretched="True">
<TfrxMemoView Name="Memo29" Left="181,46" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibos.&#34;FECHA_VENCIMIENTO&#34;]"/>
<TfrxMemoView Name="Memo1" Left="276,46" Top="0" Width="464,34" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibos.&#34;NOMBRE_PROVEEDOR&#34;]"/>
<TfrxMemoView Name="Memo20" Left="740,8" Top="0" Width="134,25" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoRecibos.&#34;SITUACION&#34;]"/>
<TfrxMemoView Name="Memo21" Left="88,78" Top="0" Width="92,68" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibos.&#34;FECHA_EMISION&#34;]"/>
<TfrxMemoView Name="Memo18" Left="0" Top="0" Width="88,78" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoRecibos.&#34;REFERENCIA&#34;]"/>
<TfrxMemoView Name="Memo31" Left="875,05" Top="0" Width="136,06" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoRecibos.&#34;IMPORTE_TOTAL&#34;]"/>
</TfrxMasterData>
<TfrxGroupFooter Name="" Height="16" Left="0" Top="309" Width="1009,13451">
<TfrxMemoView Name="Memo6" Left="875" Top="0,377747720000002" Width="136,06" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoRecibos.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo53" Left="0" Top="0,377747720000002" Width="875" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoRecibos.&#34;TITULO&#34;]:"/>
</TfrxGroupFooter>
<TfrxHeader Name="Header1" Height="75" Left="0" Top="345" Width="1009,13451">
<TfrxMemoView Name="Memo13" Left="0" Top="60" Width="383,62987" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Resumen por meses de los recibos de proveedor"/>
<TfrxMemoView Name="Memo22" Left="383,62987" Top="60" Width="94,48818898" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo23" Left="0" Top="32" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="Resumen por meses de los recibos de proveedor"/>
</TfrxHeader>
<TfrxReportSummary Name="ReportSummary1" Height="15" Left="0" Top="517" Width="1009,13451">
<TfrxMemoView Name="Memo24" Align="baLeft" Left="0" Top="0" Width="383,62987" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Total: "/>
<TfrxMemoView Name="Memo32" Align="baLeft" Left="383,62987" Top="0" Width="94,48818898" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoRecibosResumen.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros2)]"/>
</TfrxReportSummary>
<TfrxMasterData Name="DatosMaestros2" Height="17" Left="0" Top="440" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSetName="frxDBInformeListadoRecibosResumen" RowCount="0">
<TfrxMemoView Name="Memo9" Left="0" Top="0" Width="383,63" Height="17,00787402" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoRecibosResumen.&#34;TITULO&#34;]"/>
<TfrxMemoView Name="Memo12" Left="383,63" Top="0" Width="94,64276" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoRecibosResumen.&#34;IMPORTE_TOTAL&#34;]"/>
</TfrxMasterData>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,55 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37800,8077143519" ReportOptions.Description.Text="" ReportOptions.LastChange="40585,5385762963" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if Engine.FinalPass then&#13;&#10; begin&#13;&#10; if (&#60;Page#&#62; = &#60;TotalPages#&#62;) then&#13;&#10; begin &#13;&#10; mContinua.Visible := False;&#13;&#10; end &#13;&#10; else&#13;&#10; begin &#13;&#10; mContinua.Visible := True;&#13;&#10; end &#13;&#10; end;&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403990003546F70021008446174617365747301010C2900000020446174615365744E616D653D226672784442496E666F726D654C69737461646F52656369626F732200010C3000000020446174615365744E616D653D226672784442496E666F726D654C69737461646F52656369626F73526573756D656E220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxPageHeader Name="Band1" Height="136,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
<TfrxPictureView Name="Logotipo" Left="0" Top="37,10235" Width="80" Height="88" ShowHint="False" HightQuality="False"/>
<TfrxMemoView Name="DatosEmpresa" Left="80" Top="37,10235" Width="232" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
<TfrxLineView Name="Line1" Align="baLeft" Left="0" Top="129,10235" Width="312" Height="0" ShowHint="False" Frame.Color="32768" Frame.Typ="4" Frame.Width="4"/>
<TfrxShapeView Name="Shape5" Left="543" Top="11" Width="465" Height="122" ShowHint="False" Color="13434828" Frame.Width="0,1" Shape="skRoundRectangle"/>
<TfrxMemoView Name="NombreCliente" Left="546,85807" Top="16" Width="452" Height="16,88188" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE RECIBOS A PROVEEDOR"/>
<TfrxMemoView Name="Memo3" Left="546,85807" Top="36" Width="452" Height="91" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Fecha del listado: [&#60;Date&#62;] - Página [Page#] de [TotalPages#]&#13;&#10;[TextoParametros]"/>
</TfrxPageHeader>
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="632" Width="1009,13451" PrintOnLastPage="False">
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
</TfrxPageFooter>
<TfrxGroupHeader Name="" Height="40" Left="0" Restrictions="2" Top="252" Width="1009,13451" Condition="frxDBInformeListadoRecibos.&#34;NOMBRE_PROVEEDOR&#34;" ReprintOnNewPage="True">
<TfrxMemoView Name="Memo27" Left="0" Top="25" Width="88,77953" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Nº factura"/>
<TfrxMemoView Name="Memo28" Left="276,45671" Top="25" Width="464,33859" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Proveedor"/>
<TfrxMemoView Name="Memo49" Left="740,7953" Top="25" Width="134,25201" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Situación"/>
<TfrxMemoView Name="Memo50" Left="181,45671" Top="25" Width="95" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha vto."/>
<TfrxMemoView Name="Memo52" Left="875,04731" Top="25" Width="136,06299213" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo8" Left="88,77953" Top="25" Width="92,67718" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Fecha emisión"/>
<TfrxMemoView Name="Memo7" Left="0" Top="2,77953" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoRecibos.&#34;NOMBRE_PROVEEDOR&#34;]"/>
</TfrxGroupHeader>
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="312" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSetName="frxDBInformeListadoRecibos" RowCount="0" Stretched="True">
<TfrxMemoView Name="Memo29" Left="181,46" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibos.&#34;FECHA_VENCIMIENTO&#34;]"/>
<TfrxMemoView Name="Memo1" Left="276,46" Top="0" Width="464,34" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibos.&#34;NOMBRE_PROVEEDOR&#34;]"/>
<TfrxMemoView Name="Memo20" Left="740,8" Top="0" Width="134,25" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoRecibos.&#34;SITUACION&#34;]"/>
<TfrxMemoView Name="Memo21" Left="88,78" Top="0" Width="92,68" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text=" [frxDBInformeListadoRecibos.&#34;FECHA_EMISION&#34;]"/>
<TfrxMemoView Name="Memo18" Left="0" Top="0" Width="88,78" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoRecibos.&#34;REFERENCIA&#34;]"/>
<TfrxMemoView Name="Memo31" Left="875,05" Top="0" Width="136,06" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoRecibos.&#34;IMPORTE_TOTAL&#34;]"/>
</TfrxMasterData>
<TfrxGroupFooter Name="" Height="16" Left="0" Top="349" Width="1009,13451">
<TfrxMemoView Name="Memo6" Left="875" Top="0,377747720000002" Width="136,06" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoRecibos.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo53" Left="0" Top="0,377747720000002" Width="875" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="TOTALES [frxDBInformeListadoRecibos.&#34;TITULO&#34;]:"/>
</TfrxGroupFooter>
<TfrxHeader Name="Header1" Height="75" Left="0" Top="425" Width="1009,13451">
<TfrxMemoView Name="Memo13" Left="0" Top="60" Width="383,62987" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Resumen por meses de los recibos de proveedor"/>
<TfrxMemoView Name="Memo22" Left="383,62987" Top="60" Width="94,48818898" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe total"/>
<TfrxMemoView Name="Memo23" Left="0" Top="32" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="Resumen por meses de los recibos de proveedor"/>
</TfrxHeader>
<TfrxReportSummary Name="ReportSummary1" Height="15" Left="0" Top="597" Width="1009,13451">
<TfrxMemoView Name="Memo24" Align="baLeft" Left="0" Top="0" Width="383,62987" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Total: "/>
<TfrxMemoView Name="Memo32" Align="baLeft" Left="383,62987" Top="0" Width="94,48818898" Height="15" ShowHint="False" Color="13434828" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeListadoRecibosResumen.&#34;IMPORTE_TOTAL&#34;&#62;,DatosMaestros2)]"/>
</TfrxReportSummary>
<TfrxMasterData Name="DatosMaestros2" Height="17" Left="0" Top="520" Width="1009,13451" ColumnWidth="0" ColumnGap="0" DataSetName="frxDBInformeListadoRecibosResumen" RowCount="0">
<TfrxMemoView Name="Memo9" Left="0" Top="0" Width="383,63" Height="17,00787402" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeListadoRecibosResumen.&#34;TITULO&#34;]"/>
<TfrxMemoView Name="Memo12" Left="383,63" Top="0" Width="94,64276" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeListadoRecibosResumen.&#34;IMPORTE_TOTAL&#34;]"/>
</TfrxMasterData>
<TfrxGroupHeader Name="GroupHeader1" Height="20" Left="0" Top="212" Width="1009,13451" Condition="frxDBInformeListadoRecibos.&#34;MES&#34;">
<TfrxMemoView Name="Memo4" Left="0" Top="2" Width="485,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeListadoRecibos.&#34;TITULO&#34;]"/>
</TfrxGroupHeader>
<TfrxGroupFooter Name="GroupFooter1" Height="20" Left="0" Top="385" Width="1009,13451"/>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,57 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37800,8077143519" ReportOptions.Description.Text="" ReportOptions.LastChange="41572,786678125" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if Engine.FinalPass then&#13;&#10; begin&#13;&#10; if (&#60;Page#&#62; = &#60;TotalPages#&#62;) then&#13;&#10; begin &#13;&#10; mContinua.Visible := False;&#13;&#10; end &#13;&#10; else&#13;&#10; begin &#13;&#10; mContinua.Visible := True;&#13;&#10; end &#13;&#10; end; &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403910003546F70021008446174617365747301010C4400000020446174615365743D226672784442496E666F726D654F626A657469766F732220446174615365744E616D653D226672784442496E666F726D654F626A657469766F73220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxPageHeader Name="Band1" Height="104,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
<TfrxMemoView Name="DatosEmpresa" Left="171" Top="5,10235" Width="141" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
<TfrxLineView Name="Line1" Align="baLeft" Left="0" Top="97,10235" Width="312" Height="0" ShowHint="False" Frame.Color="5470709" Frame.Typ="4" Frame.Width="4"/>
<TfrxShapeView Name="Shape5" Left="513" Top="5" Width="495" Height="93" ShowHint="False" Color="13095676" Shape="skRoundRectangle"/>
<TfrxMemoView Name="NombreCliente" Left="521,85807" Top="14" Width="478" Height="19" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE OBJETIVOS DE AGENTES (ALBARANES)"/>
<TfrxMemoView Name="Memo3" Left="521,85807" Top="35,89765" Width="478" Height="55" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Fecha del listado: [&#60;Date&#62;] - Página [Page#] de [TotalPages#]&#13;&#10;[TextoParametros]"/>
<TfrxPictureView Name="Picture1" Left="3" Top="10,89765" Width="160,03598" Height="80,03154" OnBeforePrint="Picture1OnBeforePrint" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" HightQuality="False"/>
</TfrxPageHeader>
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="354" Width="1009,13451" PrintOnLastPage="False">
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
</TfrxPageFooter>
<TfrxGroupHeader Name="" Height="40" Left="0" Restrictions="2" Top="180" Width="1009,13451" Condition="frxDBInformeObjetivos.&#34;AGENTE&#34;" ReprintOnNewPage="True">
<TfrxMemoView Name="Memo27" Left="0" Top="25" Width="103" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Intervalo"/>
<TfrxMemoView Name="Memo28" Align="baLeft" Left="218" Top="25" Width="80" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Unidades obj."/>
<TfrxMemoView Name="Memo49" Align="baLeft" Left="398" Top="25" Width="100" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Uni. conseguidas"/>
<TfrxMemoView Name="Memo50" Align="baLeft" Left="693" Top="25" Width="105" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Diferencia imp."/>
<TfrxMemoView Name="Memo51" Align="baLeft" Left="798" Top="25" Width="105" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Imp. medio uni."/>
<TfrxMemoView Name="Memo52" Align="baLeft" Left="903" Top="25" Width="105" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Imp. medio cli."/>
<TfrxMemoView Name="Memo8" Align="baLeft" Left="103" Top="25" Width="50" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Altas cli."/>
<TfrxMemoView Name="Memo7" Left="0" Top="2,77953" Width="552,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeObjetivos.&#34;AGENTE&#34;]"/>
<TfrxMemoView Name="Memo1" Align="baLeft" Left="153" Top="25" Width="65" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Cli. activos"/>
<TfrxMemoView Name="Memo9" Align="baLeft" Left="298" Top="25" Width="100" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe obj."/>
<TfrxMemoView Name="Memo10" Align="baLeft" Left="498" Top="25" Width="100" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Imp. conseguido"/>
<TfrxMemoView Name="Memo11" Align="baLeft" Left="598" Top="25" Width="95" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Diferencial uni."/>
</TfrxGroupHeader>
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="240" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="frxDBInformeObjetivos" DataSetName="frxDBInformeObjetivos" RowCount="0" Stretched="True">
<TfrxMemoView Name="Memo4" Align="baLeft" Left="218" Top="0" Width="80" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" Color="-16777194" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haCenter" HideZeros="True" ParentFont="False" Text="[frxDBInformeObjetivos.&#34;CANTIDAD_OBJETIVO&#34;]"/>
<TfrxMemoView Name="Memo20" Align="baLeft" Left="298" Top="0" Width="100" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" Color="-16777194" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text="[frxDBInformeObjetivos.&#34;IMPORTE_OBJETIVO&#34;]"/>
<TfrxMemoView Name="Memo21" Align="baLeft" Left="103" Top="0" Width="50" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haCenter" HideZeros="True" ParentFont="False" Text="[frxDBInformeObjetivos.&#34;ALTAS_CLIENTE&#34;]"/>
<TfrxMemoView Name="Memo18" Align="baLeft" Left="0" Top="0" Width="103" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeObjetivos.&#34;DESCRIPCION&#34;]"/>
<TfrxMemoView Name="Memo29" Align="baLeft" Left="398" Top="0" Width="100" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haCenter" ParentFont="False" Text="[frxDBInformeObjetivos.&#34;CANTIDAD_CONSEGUIDA&#34;] / [frxDBInformeObjetivos.&#34;CANTIDAD_DEVUELTA&#34;] = [frxDBInformeObjetivos.&#34;CANTIDAD_TOTAL_CONSEGUIDA&#34;]"/>
<TfrxMemoView Name="Memo30" Align="baLeft" Left="498" Top="0" Width="100" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text="[frxDBInformeObjetivos.&#34;IMPORTE_TOTAL_CONSEGUIDO&#34;]"/>
<TfrxMemoView Name="Memo31" Left="598" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" Color="-16777194" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haCenter" HideZeros="True" ParentFont="False" Text="[frxDBInformeObjetivos.&#34;CANTIDAD_RESULTADO&#34;]"/>
<TfrxMemoView Name="Memo5" Align="baLeft" Left="153" Top="0" Width="65" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haCenter" HideZeros="True" ParentFont="False" Text="[frxDBInformeObjetivos.&#34;CLIENTES_TOTALES&#34;]"/>
<TfrxMemoView Name="Memo12" Left="693" Top="0" Width="105" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" Color="-16777194" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text="[frxDBInformeObjetivos.&#34;IMPORTE_RESULTADO&#34;]"/>
<TfrxMemoView Name="Memo13" Align="baLeft" Left="798" Top="0" Width="105" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeObjetivos.&#34;IMPORTE_MEDIO_UNIDAD&#34;]"/>
<TfrxMemoView Name="Memo16" Align="baLeft" Left="903" Top="0" Width="105" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeObjetivos.&#34;IMPORTE_MEDIO_CLIENTE&#34;]"/>
</TfrxMasterData>
<TfrxGroupFooter Name="" Height="17" Left="0" Top="277" Width="1009,13451">
<TfrxMemoView Name="Memo53" Align="baLeft" Left="0" Top="0" Width="103" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text=""/>
<TfrxMemoView Name="Memo6" Align="baLeft" Left="903" Top="0" Width="105" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13095676" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text=""/>
<TfrxMemoView Name="Memo14" Align="baLeft" Left="798" Top="0" Width="105" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13095676" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text=""/>
<TfrxMemoView Name="Memo15" Align="baLeft" Left="693" Top="0" Width="105" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13095676" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeObjetivos.&#34;IMPORTE_RESULTADO&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo2" Align="baLeft" Left="103" Top="0" Width="50" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13095676" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haCenter" HideZeros="True" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeObjetivos.&#34;ALTAS_CLIENTE&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo17" Align="baLeft" Left="153" Top="0" Width="65" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13095676" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text=""/>
<TfrxMemoView Name="Memo19" Align="baLeft" Left="218" Top="0" Width="80" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13095676" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haCenter" HideZeros="True" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeObjetivos.&#34;CANTIDAD_OBJETIVO&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo22" Align="baLeft" Left="398" Top="0" Width="100" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13095676" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeObjetivos.&#34;CANTIDAD_CONSEGUIDA&#34;&#62;,DatosMaestros1)] / [SUM(&#60;frxDBInformeObjetivos.&#34;CANTIDAD_DEVUELTA&#34;&#62;,DatosMaestros1)] = [SUM(&#60;frxDBInformeObjetivos.&#34;CANTIDAD_TOTAL_CONSEGUIDA&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo23" Align="baLeft" Left="298" Top="0" Width="100" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13095676" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeObjetivos.&#34;IMPORTE_OBJETIVO&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo24" Align="baLeft" Left="498" Top="0" Width="100" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13095676" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeObjetivos.&#34;IMPORTE_TOTAL_CONSEGUIDO&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo25" Align="baLeft" Left="598" Top="0" Width="95" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13095676" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haCenter" HideZeros="True" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeObjetivos.&#34;CANTIDAD_RESULTADO&#34;&#62;,DatosMaestros1)]"/>
</TfrxGroupFooter>
</TfrxReportPage>
</TfrxReport>

View File

@ -0,0 +1,57 @@
<?xml version="1.0" encoding="utf-8"?>
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37800,8077143519" ReportOptions.Description.Text="" ReportOptions.LastChange="41572,7868235185" ScriptLanguage="PascalScript" ScriptText.Text="procedure mContinuaOnBeforePrint(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10; if Engine.FinalPass then&#13;&#10; begin&#13;&#10; if (&#60;Page#&#62; = &#60;TotalPages#&#62;) then&#13;&#10; begin &#13;&#10; mContinua.Visible := False;&#13;&#10; end &#13;&#10; else&#13;&#10; begin &#13;&#10; mContinua.Visible := True;&#13;&#10; end &#13;&#10; end; &#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403910003546F70021008446174617365747301010C4400000020446174615365743D226672784442496E666F726D654F626A657469766F732220446174615365744E616D653D226672784442496E666F726D654F626A657469766F73220000095661726961626C657301010C13000000204E616D653D2220506172616D6574726F732200010C17000000204E616D653D22546578746F506172616D6574726F73220000055374796C650100">
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="15" RightMargin="15" TopMargin="15" BottomMargin="20" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
<TfrxPageHeader Name="Band1" Height="104,10235" Left="0" Top="16" Width="1009,13451" OnBeforePrint="Band1OnBeforePrint">
<TfrxMemoView Name="DatosEmpresa" Left="171" Top="5,10235" Width="141" Height="88" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
<TfrxLineView Name="Line1" Align="baLeft" Left="0" Top="97,10235" Width="312" Height="0" ShowHint="False" Frame.Color="5470709" Frame.Typ="4" Frame.Width="4"/>
<TfrxShapeView Name="Shape5" Left="513" Top="5" Width="495" Height="93" ShowHint="False" Color="13095676" Shape="skRoundRectangle"/>
<TfrxMemoView Name="NombreCliente" Left="521,85807" Top="14" Width="478" Height="19" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="LISTADO DE OBJETIVOS DE AGENTES (FACTURAS)"/>
<TfrxMemoView Name="Memo3" Left="521,85807" Top="35,89765" Width="478" Height="55" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Fecha del listado: [&#60;Date&#62;] - Página [Page#] de [TotalPages#]&#13;&#10;[TextoParametros]"/>
<TfrxPictureView Name="Picture1" Left="3" Top="10,89765" Width="160,03598" Height="80,03154" OnBeforePrint="Picture1OnBeforePrint" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" HightQuality="False"/>
</TfrxPageHeader>
<TfrxPageFooter Name="" Height="23,77953" Left="0" Top="354" Width="1009,13451" PrintOnLastPage="False">
<TfrxMemoView Name="mContinua" Left="925,98485" Top="4,77953" Width="81,08714" Height="16,77953" OnBeforePrint="mContinuaOnBeforePrint" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Continúa ..."/>
</TfrxPageFooter>
<TfrxGroupHeader Name="" Height="40" Left="0" Restrictions="2" Top="180" Width="1009,13451" Condition="frxDBInformeObjetivos.&#34;AGENTE&#34;" ReprintOnNewPage="True">
<TfrxMemoView Name="Memo27" Left="0" Top="25" Width="103" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Intervalo"/>
<TfrxMemoView Name="Memo28" Align="baLeft" Left="218" Top="25" Width="80" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Unidades obj."/>
<TfrxMemoView Name="Memo49" Align="baLeft" Left="398" Top="25" Width="100" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Uni. conseguidas"/>
<TfrxMemoView Name="Memo50" Align="baLeft" Left="693" Top="25" Width="105" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Diferencia imp."/>
<TfrxMemoView Name="Memo51" Align="baLeft" Left="798" Top="25" Width="105" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Imp. medio uni."/>
<TfrxMemoView Name="Memo52" Align="baLeft" Left="903" Top="25" Width="105" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Imp. medio cli."/>
<TfrxMemoView Name="Memo8" Align="baLeft" Left="103" Top="25" Width="50" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Altas cli."/>
<TfrxMemoView Name="Memo7" Left="0" Top="2,77953" Width="552,37013" Height="15,11811024" ShowHint="False" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBInformeObjetivos.&#34;AGENTE&#34;]"/>
<TfrxMemoView Name="Memo1" Align="baLeft" Left="153" Top="25" Width="65" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" ParentFont="False" VAlign="vaCenter" Text="Cli. activos"/>
<TfrxMemoView Name="Memo9" Align="baLeft" Left="298" Top="25" Width="100" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe obj."/>
<TfrxMemoView Name="Memo10" Align="baLeft" Left="498" Top="25" Width="100" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Imp. conseguido"/>
<TfrxMemoView Name="Memo11" Align="baLeft" Left="598" Top="25" Width="95" Height="15" ShowHint="False" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Diferencial uni."/>
</TfrxGroupHeader>
<TfrxMasterData Name="DatosMaestros1" Height="17,00787402" Left="0" Top="240" Width="1009,13451" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="frxDBInformeObjetivos" DataSetName="frxDBInformeObjetivos" RowCount="0" Stretched="True">
<TfrxMemoView Name="Memo4" Align="baLeft" Left="218" Top="0" Width="80" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" Color="-16777194" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haCenter" HideZeros="True" ParentFont="False" Text="[frxDBInformeObjetivos.&#34;CANTIDAD_OBJETIVO&#34;]"/>
<TfrxMemoView Name="Memo20" Align="baLeft" Left="298" Top="0" Width="100" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" Color="-16777194" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text="[frxDBInformeObjetivos.&#34;IMPORTE_OBJETIVO&#34;]"/>
<TfrxMemoView Name="Memo21" Align="baLeft" Left="103" Top="0" Width="50" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haCenter" HideZeros="True" ParentFont="False" Text="[frxDBInformeObjetivos.&#34;ALTAS_CLIENTE&#34;]"/>
<TfrxMemoView Name="Memo18" Align="baLeft" Left="0" Top="0" Width="103" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" ParentFont="False" Text="[frxDBInformeObjetivos.&#34;DESCRIPCION&#34;]"/>
<TfrxMemoView Name="Memo29" Align="baLeft" Left="398" Top="0" Width="100" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haCenter" ParentFont="False" Text="[frxDBInformeObjetivos.&#34;CANTIDAD_CONSEGUIDA&#34;] / [frxDBInformeObjetivos.&#34;CANTIDAD_DEVUELTA&#34;] = [frxDBInformeObjetivos.&#34;CANTIDAD_TOTAL_CONSEGUIDA&#34;]"/>
<TfrxMemoView Name="Memo30" Align="baLeft" Left="498" Top="0" Width="100" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text="[frxDBInformeObjetivos.&#34;IMPORTE_TOTAL_CONSEGUIDO&#34;]"/>
<TfrxMemoView Name="Memo31" Left="598" Top="0" Width="95" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" Color="-16777194" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haCenter" HideZeros="True" ParentFont="False" Text="[frxDBInformeObjetivos.&#34;CANTIDAD_RESULTADO&#34;]"/>
<TfrxMemoView Name="Memo5" Align="baLeft" Left="153" Top="0" Width="65" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haCenter" HideZeros="True" ParentFont="False" Text="[frxDBInformeObjetivos.&#34;CLIENTES_TOTALES&#34;]"/>
<TfrxMemoView Name="Memo12" Left="693" Top="0" Width="105" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" Color="-16777194" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" Text="[frxDBInformeObjetivos.&#34;IMPORTE_RESULTADO&#34;]"/>
<TfrxMemoView Name="Memo13" Align="baLeft" Left="798" Top="0" Width="105" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeObjetivos.&#34;IMPORTE_MEDIO_UNIDAD&#34;]"/>
<TfrxMemoView Name="Memo16" Align="baLeft" Left="903" Top="0" Width="105" Height="17,00787402" ShowHint="False" StretchMode="smMaxHeight" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="16384" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" Frame.Typ="15" HAlign="haRight" ParentFont="False" Text="[frxDBInformeObjetivos.&#34;IMPORTE_MEDIO_CLIENTE&#34;]"/>
</TfrxMasterData>
<TfrxGroupFooter Name="" Height="17" Left="0" Top="277" Width="1009,13451">
<TfrxMemoView Name="Memo53" Align="baLeft" Left="0" Top="0" Width="103" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13095676" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="13" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text=""/>
<TfrxMemoView Name="Memo6" Align="baLeft" Left="903" Top="0" Width="105" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13095676" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text=""/>
<TfrxMemoView Name="Memo14" Align="baLeft" Left="798" Top="0" Width="105" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13095676" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text=""/>
<TfrxMemoView Name="Memo15" Align="baLeft" Left="693" Top="0" Width="105" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13095676" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeObjetivos.&#34;IMPORTE_RESULTADO&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo2" Align="baLeft" Left="103" Top="0" Width="50" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13095676" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haCenter" HideZeros="True" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeObjetivos.&#34;ALTAS_CLIENTE&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo17" Align="baLeft" Left="153" Top="0" Width="65" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13095676" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text=""/>
<TfrxMemoView Name="Memo19" Align="baLeft" Left="218" Top="0" Width="80" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13095676" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haCenter" HideZeros="True" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeObjetivos.&#34;CANTIDAD_OBJETIVO&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo22" Align="baLeft" Left="398" Top="0" Width="100" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13095676" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeObjetivos.&#34;CANTIDAD_CONSEGUIDA&#34;&#62;,DatosMaestros1)] / [SUM(&#60;frxDBInformeObjetivos.&#34;CANTIDAD_DEVUELTA&#34;&#62;,DatosMaestros1)] = [SUM(&#60;frxDBInformeObjetivos.&#34;CANTIDAD_TOTAL_CONSEGUIDA&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo23" Align="baLeft" Left="298" Top="0" Width="100" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13095676" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeObjetivos.&#34;IMPORTE_OBJETIVO&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo24" Align="baLeft" Left="498" Top="0" Width="100" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13095676" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haRight" HideZeros="True" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeObjetivos.&#34;IMPORTE_TOTAL_CONSEGUIDO&#34;&#62;,DatosMaestros1)]"/>
<TfrxMemoView Name="Memo25" Align="baLeft" Left="598" Top="0" Width="95" Height="16" ShowHint="False" StretchMode="smMaxHeight" Color="13095676" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%g" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Typ="15" HAlign="haCenter" HideZeros="True" ParentFont="False" VAlign="vaCenter" Text="[SUM(&#60;frxDBInformeObjetivos.&#34;CANTIDAD_RESULTADO&#34;&#62;,DatosMaestros1)]"/>
</TfrxGroupFooter>
</TfrxReportPage>
</TfrxReport>

View File

@ -198,8 +198,8 @@ begin
AEditor.ListaID := AListaID;
AEditor.VerPrecios := VerImprimirPrecios;
AEditor.VerRefProveedor := VerImprimirRefProveedor;
AEditor.VerPrecios := VerImprimirObservaciones;
AEditor.VerRefProveedor := VerImprimirIncidencias;
AEditor.VerObservaciones := VerImprimirObservaciones;
AEditor.VerIncidencias := VerImprimirIncidencias;
AEditor.Title := 'Albarán - ' + AppFactuGES.EmpresaActiva.NOMBRE;
AEditor.LoadFromStream(AStream);
AEditor.Preview;
@ -240,8 +240,8 @@ begin
AEditor.ListaID := AListaID;
AEditor.VerPrecios := VerImprimirPrecios;
AEditor.VerRefProveedor := VerImprimirRefProveedor;
AEditor.VerPrecios := VerImprimirObservaciones;
AEditor.VerRefProveedor := VerImprimirIncidencias;
AEditor.VerObservaciones := VerImprimirObservaciones;
AEditor.VerIncidencias := VerImprimirIncidencias;
AEditor.Title := 'Albarán - ' + AppFactuGES.EmpresaActiva.NOMBRE;
AEditor.LoadFromStream(AStream);
AEditor.TablaImpresion := nme_AlbaranesCliente;

View File

@ -14,6 +14,8 @@
<Projects Include="..\Articulos\Views\Articulos_view.dproj" />
<Projects Include="..\Contactos\Views\Contactos_view.dproj" />
<Projects Include="..\Facturas de proveedor\Controller\FacturasProveedor_controller.dproj" />
<Projects Include="..\Facturas de proveedor\Model\FacturasProveedor_model.dproj" />
<Projects Include="..\Facturas de proveedor\Views\FacturasProveedor_view.dproj" />
<Projects Include="..\Inventario\Controller\Inventario_controller.dproj" />
<Projects Include="..\Relaciones\Albaranes de proveedor - Facturas de proveedor\AlbProv_FacProv_relation.dproj" />
<Projects Include="..\Relaciones\Pedidos de proveedor - Albaranes de proveedor\PedProv_AlbProv_relation.dproj" />
@ -191,14 +193,32 @@
<Target Name="AlbaranesCliente_view:Make">
<MSBuild Projects="..\Albaranes de cliente\Views\AlbaranesCliente_view.dproj" Targets="Make" />
</Target>
<Target Name="FacturasProveedor_model">
<MSBuild Projects="..\Facturas de proveedor\Model\FacturasProveedor_model.dproj" Targets="" />
</Target>
<Target Name="FacturasProveedor_model:Clean">
<MSBuild Projects="..\Facturas de proveedor\Model\FacturasProveedor_model.dproj" Targets="Clean" />
</Target>
<Target Name="FacturasProveedor_model:Make">
<MSBuild Projects="..\Facturas de proveedor\Model\FacturasProveedor_model.dproj" Targets="Make" />
</Target>
<Target Name="FacturasProveedor_view">
<MSBuild Projects="..\Facturas de proveedor\Views\FacturasProveedor_view.dproj" Targets="" />
</Target>
<Target Name="FacturasProveedor_view:Clean">
<MSBuild Projects="..\Facturas de proveedor\Views\FacturasProveedor_view.dproj" Targets="Clean" />
</Target>
<Target Name="FacturasProveedor_view:Make">
<MSBuild Projects="..\Facturas de proveedor\Views\FacturasProveedor_view.dproj" Targets="Make" />
</Target>
<Target Name="Build">
<CallTarget Targets="Base;GUIBase;ApplicationBase;Contactos_view;Articulos_controller;Articulos_view;AlbaranesProveedor_model;AlbaranesProveedor_data;AlbaranesProveedor_controller;AlbProv_FacProv_relation;FacturasProveedor_controller;PedProv_AlbProv_relation;Inventario_controller;AlbaranesProveedor_view;AlbaranesProveedor_plugin;FactuGES;FactuGES_Server;AlbaranesCliente_view" />
<CallTarget Targets="Base;GUIBase;ApplicationBase;Contactos_view;Articulos_controller;Articulos_view;AlbaranesProveedor_model;AlbaranesProveedor_data;AlbaranesProveedor_controller;AlbProv_FacProv_relation;FacturasProveedor_controller;PedProv_AlbProv_relation;Inventario_controller;AlbaranesProveedor_view;AlbaranesProveedor_plugin;FactuGES;FactuGES_Server;AlbaranesCliente_view;FacturasProveedor_model;FacturasProveedor_view" />
</Target>
<Target Name="Clean">
<CallTarget Targets="Base:Clean;GUIBase:Clean;ApplicationBase:Clean;Contactos_view:Clean;Articulos_controller:Clean;Articulos_view:Clean;AlbaranesProveedor_model:Clean;AlbaranesProveedor_data:Clean;AlbaranesProveedor_controller:Clean;AlbProv_FacProv_relation:Clean;FacturasProveedor_controller:Clean;PedProv_AlbProv_relation:Clean;Inventario_controller:Clean;AlbaranesProveedor_view:Clean;AlbaranesProveedor_plugin:Clean;FactuGES:Clean;FactuGES_Server:Clean;AlbaranesCliente_view:Clean" />
<CallTarget Targets="Base:Clean;GUIBase:Clean;ApplicationBase:Clean;Contactos_view:Clean;Articulos_controller:Clean;Articulos_view:Clean;AlbaranesProveedor_model:Clean;AlbaranesProveedor_data:Clean;AlbaranesProveedor_controller:Clean;AlbProv_FacProv_relation:Clean;FacturasProveedor_controller:Clean;PedProv_AlbProv_relation:Clean;Inventario_controller:Clean;AlbaranesProveedor_view:Clean;AlbaranesProveedor_plugin:Clean;FactuGES:Clean;FactuGES_Server:Clean;AlbaranesCliente_view:Clean;FacturasProveedor_model:Clean;FacturasProveedor_view:Clean" />
</Target>
<Target Name="Make">
<CallTarget Targets="Base:Make;GUIBase:Make;ApplicationBase:Make;Contactos_view:Make;Articulos_controller:Make;Articulos_view:Make;AlbaranesProveedor_model:Make;AlbaranesProveedor_data:Make;AlbaranesProveedor_controller:Make;AlbProv_FacProv_relation:Make;FacturasProveedor_controller:Make;PedProv_AlbProv_relation:Make;Inventario_controller:Make;AlbaranesProveedor_view:Make;AlbaranesProveedor_plugin:Make;FactuGES:Make;FactuGES_Server:Make;AlbaranesCliente_view:Make" />
<CallTarget Targets="Base:Make;GUIBase:Make;ApplicationBase:Make;Contactos_view:Make;Articulos_controller:Make;Articulos_view:Make;AlbaranesProveedor_model:Make;AlbaranesProveedor_data:Make;AlbaranesProveedor_controller:Make;AlbProv_FacProv_relation:Make;FacturasProveedor_controller:Make;PedProv_AlbProv_relation:Make;Inventario_controller:Make;AlbaranesProveedor_view:Make;AlbaranesProveedor_plugin:Make;FactuGES:Make;FactuGES_Server:Make;AlbaranesCliente_view:Make;FacturasProveedor_model:Make;FacturasProveedor_view:Make" />
</Target>
<Import Condition="Exists('$(MSBuildBinPath)\Borland.Group.Targets')" Project="$(MSBuildBinPath)\Borland.Group.Targets" />
</Project>

View File

@ -15,6 +15,14 @@ type
function GetVerRefProveedor: Boolean;
procedure SetVerRefProveedor(const Value: Boolean);
property VerRefProveedor : Boolean read GetVerRefProveedor write SetVerRefProveedor;
function GetVerIncidencias: Boolean;
procedure SetVerIncidencias(const Value: Boolean);
property VerIncidencias : Boolean read GetVerIncidencias write SetVerIncidencias;
function GetVerObservaciones: Boolean;
procedure SetObservaciones(const Value: Boolean);
property VerObservaciones : Boolean read GetVerObservaciones write SetObservaciones;
end;

View File

@ -61,9 +61,11 @@ type
function EsEliminable(AAlbaran: IBizAlbaranProveedor): Boolean;
procedure Preview(AAlbaran : IBizAlbaranProveedor; AllItems: Boolean = false;
const VerPrecios: Boolean = True; const VerRefProveedor: Boolean = True);
const VerPrecios: Boolean = True; const VerRefProveedor: Boolean = True;
const VerImprimirObservaciones: Boolean = False; const VerImprimirIncidencias: Boolean = False);
function Print(AAlbaran : IBizAlbaranProveedor; AllItems: Boolean = false;
const VerPrecios: Boolean = True; const VerRefProveedor: Boolean = True): Boolean;
const VerPrecios: Boolean = True; const VerRefProveedor: Boolean = True;
const VerImprimirObservaciones: Boolean = False; const VerImprimirIncidencias: Boolean = False): Boolean;
procedure GenerarEmailAlbaran(AAlbaran : IBizAlbaranProveedor;
const VerPrecios: Boolean = True; const VerRefProveedor: Boolean = True);
@ -157,9 +159,11 @@ type
function EsEliminable(AAlbaran: IBizAlbaranProveedor): Boolean;
procedure Preview(AAlbaran : IBizAlbaranProveedor; AllItems: Boolean = false;
const VerPrecios: Boolean = True; const VerRefProveedor: Boolean = True);
const VerPrecios: Boolean = True; const VerRefProveedor: Boolean = True;
const VerImprimirObservaciones: Boolean = False; const VerImprimirIncidencias: Boolean = False);
function Print(AAlbaran : IBizAlbaranProveedor; AllItems: Boolean = false;
const VerPrecios: Boolean = True; const VerRefProveedor: Boolean = True): Boolean;
const VerPrecios: Boolean = True; const VerRefProveedor: Boolean = True;
const VerImprimirObservaciones: Boolean = False; const VerImprimirIncidencias: Boolean = False): Boolean;
procedure GenerarEmailAlbaran(AAlbaran : IBizAlbaranProveedor;
const VerPrecios: Boolean = True; const VerRefProveedor: Boolean = True);
@ -495,7 +499,7 @@ var
begin
ShowHourglassCursor;
try
Result := BuscarAlbaranesNormales;
Result := BuscarTodos;
with Result.DataTable.DynamicWhere do
begin
@ -1019,8 +1023,7 @@ begin
end;
function TAlbaranesProveedorController.EnviarEmailAlbaranes(
AAlbaranes: IBizAlbaranProveedor; const VerPrecios: Boolean;
const VerRefProveedor: Boolean): Boolean;
AAlbaranes: IBizAlbaranProveedor; const VerPrecios: Boolean; const VerRefProveedor: Boolean): Boolean;
var
ADialog : IDialogListaAlbaranesProveedorEnvioEMail;
ARespuesta : Integer;
@ -1256,7 +1259,8 @@ begin
end;
procedure TAlbaranesProveedorController.Preview(AAlbaran: IBizAlbaranProveedor; AllItems: Boolean = false;
const VerPrecios: Boolean = True; const VerRefProveedor: Boolean = True);
const VerPrecios: Boolean = True; const VerRefProveedor: Boolean = True;
const VerImprimirObservaciones: Boolean = False; const VerImprimirIncidencias: Boolean = False);
var
AReportController : IAlbaranesProveedorReportController;
ID_Albaranes: TIntegerList;
@ -1282,7 +1286,7 @@ begin
else
ID_Albaranes.Add(AAlbaran.ID);
AReportController.Preview(ID_Albaranes, VerPrecios, VerRefProveedor);
AReportController.Preview(ID_Albaranes, VerPrecios, VerRefProveedor, VerImprimirObservaciones, VerImprimirIncidencias);
finally
AReportController := NIL;
FreeANDNIL(ID_Albaranes)
@ -1290,7 +1294,8 @@ begin
end;
function TAlbaranesProveedorController.Print(AAlbaran: IBizAlbaranProveedor; AllItems: Boolean = false;
const VerPrecios: Boolean = True; const VerRefProveedor: Boolean = True): Boolean;
const VerPrecios: Boolean = True; const VerRefProveedor: Boolean = True;
const VerImprimirObservaciones: Boolean = False; const VerImprimirIncidencias: Boolean = False): Boolean;
var
AReportController : IAlbaranesProveedorReportController;
ID_Albaranes: TIntegerList;
@ -1316,7 +1321,7 @@ begin
else
ID_Albaranes.Add(AAlbaran.ID);
Result := AReportController.Print(ID_Albaranes, VerPrecios, VerRefProveedor);
Result := AReportController.Print(ID_Albaranes, VerPrecios, VerRefProveedor, VerImprimirObservaciones, VerImprimirIncidencias);
finally
AReportController := NIL;
FreeANDNIL(ID_Albaranes)

View File

@ -11,9 +11,11 @@ type
IAlbaranesProveedorReportController = interface(IControllerBase)
['{11F9D087-C6BE-4401-AB13-4342025D62BB}']
procedure Preview(const AListaID : TIntegerList;
const VerPrecios: Boolean = True; const VerRefProveedor: Boolean = True);
const VerPrecios: Boolean = True; const VerRefProveedor: Boolean = True;
const VerImprimirObservaciones: Boolean = False; const VerImprimirIncidencias: Boolean = False);
function Print(const AListaID : TIntegerList;
const VerPrecios: Boolean = True; const VerRefProveedor: Boolean = True): Boolean;
const VerPrecios: Boolean = True; const VerRefProveedor: Boolean = True;
const VerImprimirObservaciones: Boolean = False; const VerImprimirIncidencias: Boolean = False): Boolean;
function ExportToWord(const AID: Integer; const AFileName : String = '';
const VerPrecios: Boolean = True; const VerRefProveedor: Boolean = True): Boolean;
function ExportToPDF(const AID: Integer; const AFileName : String = '';
@ -29,9 +31,11 @@ type
destructor Destroy; override;
procedure Preview(const AListaID : TIntegerList;
const VerPrecios: Boolean = True; const VerRefProveedor: Boolean = True);
const VerPrecios: Boolean = True; const VerRefProveedor: Boolean = True;
const VerImprimirObservaciones: Boolean = False; const VerImprimirIncidencias: Boolean = False);
function Print(const AListaID : TIntegerList;
const VerPrecios: Boolean = True; const VerRefProveedor: Boolean = True): Boolean;
const VerPrecios: Boolean = True; const VerRefProveedor: Boolean = True;
const VerImprimirObservaciones: Boolean = False; const VerImprimirIncidencias: Boolean = False): Boolean;
function ExportToWord(const AID: Integer; const AFileName : String = '';
const VerPrecios: Boolean = True; const VerRefProveedor: Boolean = True): Boolean;
function ExportToPDF(const AID: Integer; const AFileName : String = '';
@ -117,7 +121,8 @@ begin
end;
procedure TAlbaranesProveedorReportController.Preview(const AListaID: TIntegerList;
const VerPrecios: Boolean = True; const VerRefProveedor: Boolean = True);
const VerPrecios: Boolean = True; const VerRefProveedor: Boolean = True;
const VerImprimirObservaciones: Boolean = False; const VerImprimirIncidencias: Boolean = False);
var
AStream: Binary;
AEditor : IEditorAlbaranesProveedorPreview;
@ -126,7 +131,7 @@ begin
ShowHourglassCursor;
try
AStream := FDataModule.GetReport(AListaID, VerPrecios, VerRefProveedor);
AStream := FDataModule.GetReport(AListaID, VerPrecios, VerRefProveedor, VerImprimirObservaciones, VerImprimirIncidencias);
try
CreateEditor('EditorAlbaranesProveedorPreview', IEditorAlbaranesProveedorPreview, AEditor);
if Assigned(AEditor) then
@ -136,6 +141,8 @@ begin
AEditor.ListaID := AListaID;
AEditor.VerPrecios := VerPrecios;
AEditor.VerRefProveedor := VerRefProveedor;
AEditor.VerObservaciones := VerImprimirObservaciones;
AEditor.VerIncidencias := VerImprimirIncidencias;
AEditor.Title := 'Albarán de proveedor - ' + AppFactuGES.EmpresaActiva.NOMBRE;
AEditor.LoadFromStream(AStream);
AEditor.Preview;
@ -153,7 +160,8 @@ begin
end;
function TAlbaranesProveedorReportController.Print(const AListaID: TIntegerList;
const VerPrecios: Boolean = True; const VerRefProveedor: Boolean = True): Boolean;
const VerPrecios: Boolean = True; const VerRefProveedor: Boolean = True;
const VerImprimirObservaciones: Boolean = False; const VerImprimirIncidencias: Boolean = False): Boolean;
var
AStream: Binary;
AEditor : IEditorAlbaranesProveedorPreview;
@ -163,7 +171,7 @@ begin
ShowHourglassCursor;
try
AStream := FDataModule.GetReport(AListaID, VerPrecios, VerRefProveedor);
AStream := FDataModule.GetReport(AListaID, VerPrecios, VerRefProveedor, VerImprimirObservaciones, VerImprimirIncidencias);
try
CreateEditor('EditorAlbaranesProveedorPreview', IEditorAlbaranesProveedorPreview, AEditor);
if Assigned(AEditor) then
@ -173,6 +181,8 @@ begin
AEditor.ListaID := AListaID;
AEditor.VerPrecios := VerPrecios;
AEditor.VerRefProveedor := VerRefProveedor;
AEditor.VerObservaciones := VerImprimirObservaciones;
AEditor.VerIncidencias := VerImprimirIncidencias;
AEditor.Title := 'Albarán de proveedor - ' + AppFactuGES.EmpresaActiva.NOMBRE;
AEditor.LoadFromStream(AStream);
AEditor.TablaImpresion := nme_AlbaranesProveedor;

View File

@ -37,11 +37,11 @@ type
// Report
function GetReport(const ListaID: TIntegerList; const ImprimirPrecio: Boolean = True;
const ImprimirRefProveedor: Boolean = True): Binary;
const ImprimirRefProveedor: Boolean = True; const VerObservaciones: Boolean = False; const VerIncidencias: Boolean = False): Binary;
function GetRptWordAlbaran(const AID: Integer; const ImprimirPrecio: Boolean = True;
const ImprimirRefProveedor: Boolean = True): Binary;
function GetRptPDFAlbaran(const AID: Integer; const ImprimirPrecio: Boolean = True;
const ImprimirRefProveedor: Boolean = True): Binary;
const ImprimirRefProveedor: Boolean = True; const VerObservaciones: Boolean = False; const VerIncidencias: Boolean = False): Binary;
function GetAnosItems : TStringList;
end;
@ -68,23 +68,23 @@ begin
end;
function TDataModuleAlbaranesProveedor.GetReport(const ListaID: TIntegerList;
const ImprimirPrecio: Boolean = True;
const ImprimirRefProveedor: Boolean = True): Binary;
const ImprimirPrecio: Boolean = True; const ImprimirRefProveedor: Boolean = True;
const VerObservaciones: Boolean = False; const VerIncidencias: Boolean = False): Binary;
var
AParam : TIntegerArray;
begin
AParam := ListaID.ToIntegerArray;
try
Result := (RORemoteService as IsrvAlbaranesProveedor).GenerarInforme(AParam,
ImprimirPrecio, ImprimirRefProveedor);
ImprimirPrecio, ImprimirRefProveedor, VerObservaciones, VerIncidencias);
finally
FreeANDNil(AParam);
end;
end;
function TDataModuleAlbaranesProveedor.GetRptPDFAlbaran(const AID: Integer;
const ImprimirPrecio: Boolean = True;
const ImprimirRefProveedor: Boolean = True): Binary;
const ImprimirPrecio: Boolean = True; const ImprimirRefProveedor: Boolean = True;
const VerObservaciones: Boolean = False; const VerIncidencias: Boolean = False): Binary;
var
AParam : TIntegerArray;
begin
@ -92,7 +92,7 @@ begin
try
AParam.Add(AID);
Result := (RORemoteService as IsrvAlbaranesProveedor).GenerarInformeEnPDF(AParam,
ImprimirPrecio, ImprimirRefProveedor);
ImprimirPrecio, ImprimirRefProveedor, VerObservaciones, VerIncidencias);
finally
FreeANDNil(AParam);
end;

View File

@ -9,11 +9,11 @@ type
IDataModuleAlbaranesProveedorReport = interface
['{FC37B698-7FBF-4658-BBD0-CBD4F6891CDF}']
function GetReport(const ListaID: TIntegerList; const ImprimirPrecio: Boolean = True;
const ImprimirRefProveedor: Boolean = True): Binary;
const ImprimirRefProveedor: Boolean = True; const VerObservaciones: Boolean = False; const VerIncidencias: Boolean = False): Binary;
function GetRptWordAlbaran(const AID: Integer; const ImprimirPrecio: Boolean = True;
const ImprimirRefProveedor: Boolean = True): Binary;
function GetRptPDFAlbaran(const AID: Integer; const ImprimirPrecio: Boolean = True;
const ImprimirRefProveedor: Boolean = True): Binary;
const ImprimirRefProveedor: Boolean = True; const VerObservaciones: Boolean = False; const VerIncidencias: Boolean = False): Binary;
end;
implementation

View File

@ -51,15 +51,18 @@ type
FConnection: IDAConnection;
FImprimirPrecio : Boolean;
FImprimirRefProveedor : Boolean;
FVerObservaciones : Boolean;
FVerIncidencias : Boolean;
//Genera cada uno de los albaranes a imprimir
procedure _GenerarAlbaran(const AID: Integer);
public
function GenerarAlbaran(const AListaID : TIntegerArray;
const ImprimirPrecio: Boolean = True;
const ImprimirRefProveedor: Boolean = True): Binary;
const ImprimirPrecio: Boolean; const ImprimirRefProveedor: Boolean;
const VerObservaciones: Boolean; const VerIncidencias: Boolean): Binary;
function GenerarAlbaranEnPDF(const ListaID : TIntegerArray;
const ImprimirPrecio: Boolean = True;
const ImprimirRefProveedor: Boolean = True): Binary;
const ImprimirPrecio: Boolean; const ImprimirRefProveedor: Boolean;
const VerObservaciones: Boolean; const VerIncidencias: Boolean): Binary;
end;
implementation
@ -106,17 +109,24 @@ begin
Value := FImprimirPrecio;
if VarName = 'ImprimirRefProveedor' then
Value := FImprimirRefProveedor;
if VarName = 'VerObservaciones' then
Value := FVerObservaciones;
if VarName = 'VerIncidencias' then
Value := FVerIncidencias;
end;
function TRptAlbaranesProveedor.GenerarAlbaran(const AListaID : TIntegerArray;
const ImprimirPrecio: Boolean = True;
const ImprimirRefProveedor: Boolean = True): Binary;
const ImprimirPrecio: Boolean; const ImprimirRefProveedor: Boolean;
const VerObservaciones: Boolean; const VerIncidencias: Boolean): Binary;
var
i: Integer;
begin
Result := Binary.Create;
FImprimirPrecio := ImprimirPrecio;
FImprimirRefProveedor := ImprimirRefProveedor;
FVerObservaciones := VerObservaciones;
FVerIncidencias := VerIncidencias;
try
//Vamos generando todos y cada uno de los albaranes recibidos
for i := 0 to AListaID.Count - 1 do
@ -127,14 +137,17 @@ begin
end;
function TRptAlbaranesProveedor.GenerarAlbaranEnPDF(const ListaID: TIntegerArray;
const ImprimirPrecio: Boolean = True;
const ImprimirRefProveedor: Boolean = True): Binary;
const ImprimirPrecio: Boolean; const ImprimirRefProveedor: Boolean;
const VerObservaciones: Boolean; const VerIncidencias: Boolean): Binary;
var
i: Integer;
begin
Result := Binary.Create;
FImprimirPrecio := ImprimirPrecio;
FImprimirRefProveedor := ImprimirRefProveedor;
FVerObservaciones := VerObservaciones;
FVerIncidencias := VerIncidencias;
try
//Vamos generando todos y cada uno de los presupuestos recibidos
for i := 0 to ListaID.Count - 1 do

View File

@ -33,9 +33,11 @@ type
var aConnectionName: string);
protected
function GenerarInforme(const ListaID: TIntegerArray;
const ImprimirPrecio: Boolean; const ImprimirRefProveedor: Boolean): Binary;
const ImprimirPrecio: Boolean; const ImprimirRefProveedor: Boolean;
const VerObservaciones: Boolean; const VerIncidencias: Boolean): Binary;
function GenerarInformeEnPDF(const ListaID: TIntegerArray;
const ImprimirPrecio: Boolean; const ImprimirRefProveedor: Boolean): Binary;
const ImprimirPrecio: Boolean; const ImprimirRefProveedor: Boolean;
const VerObservaciones: Boolean; const VerIncidencias: Boolean): Binary;
end;
@ -83,28 +85,29 @@ begin
end;
function TsrvAlbaranesProveedor.GenerarInforme(const ListaID: TIntegerArray;
const ImprimirPrecio: Boolean; const ImprimirRefProveedor: Boolean): Binary;
const ImprimirPrecio: Boolean; const ImprimirRefProveedor: Boolean;
const VerObservaciones: Boolean; const VerIncidencias: Boolean): Binary;
var
AReportGenerator : TRptAlbaranesProveedor;
begin
AReportGenerator := TRptAlbaranesProveedor.Create(nil);
try
Result := AReportGenerator.GenerarAlbaran(ListaID,
ImprimirPrecio, ImprimirRefProveedor);
Result := AReportGenerator.GenerarAlbaran(ListaID, ImprimirPrecio, ImprimirRefProveedor, VerObservaciones, VerIncidencias);
finally
FreeAndNIL(AReportGenerator);
end;
end;
function TsrvAlbaranesProveedor.GenerarInformeEnPDF(const ListaID: TIntegerArray;
const ImprimirPrecio: Boolean; const ImprimirRefProveedor: Boolean): Binary;
const ImprimirPrecio: Boolean; const ImprimirRefProveedor: Boolean;
const VerObservaciones: Boolean; const VerIncidencias: Boolean): Binary;
var
AReportGenerator : TRptAlbaranesProveedor;
begin
AReportGenerator := TRptAlbaranesProveedor.Create(nil);
try
Result := AReportGenerator.GenerarAlbaranEnPDF(ListaID,
ImprimirPrecio, ImprimirRefProveedor);
ImprimirPrecio, ImprimirRefProveedor, VerObservaciones, VerIncidencias);
finally
FreeAndNIL(AReportGenerator);
end;

View File

@ -1,9 +1,9 @@
inherited fDialogOpcionesImpresionAlbaranesProveedor: TfDialogOpcionesImpresionAlbaranesProveedor
Caption = 'Opciones para albar'#225'n a proveedor'
ClientHeight = 186
ClientHeight = 247
ClientWidth = 393
ExplicitWidth = 399
ExplicitHeight = 218
ExplicitHeight = 279
PixelsPerInch = 96
TextHeight = 13
inherited Bevel2: TBevel
@ -11,15 +11,15 @@ inherited fDialogOpcionesImpresionAlbaranesProveedor: TfDialogOpcionesImpresionA
ExplicitWidth = 393
end
inherited Bevel3: TBevel
Top = 142
Top = 203
Width = 393
ExplicitTop = 195
ExplicitWidth = 393
end
inherited pnlBotones: TPanel
Top = 144
Top = 205
Width = 393
ExplicitTop = 197
ExplicitTop = 144
ExplicitWidth = 393
inherited btnAceptar: TButton
Left = 229
@ -49,9 +49,9 @@ inherited fDialogOpcionesImpresionAlbaranesProveedor: TfDialogOpcionesImpresionA
end
inherited pnlCuerpo: TPanel
Width = 393
Height = 76
Height = 137
ExplicitWidth = 393
ExplicitHeight = 129
ExplicitHeight = 76
object cbVerPrecios: TCheckBox
AlignWithMargins = True
Left = 50
@ -66,7 +66,7 @@ inherited fDialogOpcionesImpresionAlbaranesProveedor: TfDialogOpcionesImpresionA
object cbVerRefProveedor: TCheckBox
AlignWithMargins = True
Left = 50
Top = 52
Top = 98
Width = 441
Height = 17
Caption = 'Mostrar las referencias de proveedor de los conceptos'
@ -75,6 +75,28 @@ inherited fDialogOpcionesImpresionAlbaranesProveedor: TfDialogOpcionesImpresionA
TabOrder = 1
Visible = False
end
object cbVerIncidencias: TCheckBox
AlignWithMargins = True
Left = 50
Top = 52
Width = 441
Height = 17
Caption = 'Mostrar las incidencias del albar'#225'n'
Checked = True
State = cbChecked
TabOrder = 2
end
object cbVerObservaciones: TCheckBox
AlignWithMargins = True
Left = 50
Top = 75
Width = 441
Height = 17
Caption = 'Mostrar las observaciones del albar'#225'n'
Checked = True
State = cbChecked
TabOrder = 3
end
end
inherited ActionList1: TActionList
Top = 16

View File

@ -10,6 +10,8 @@ type
TfDialogOpcionesImpresionAlbaranesProveedor = class(TfDialogBase)
cbVerPrecios: TCheckBox;
cbVerRefProveedor: TCheckBox;
cbVerIncidencias: TCheckBox;
cbVerObservaciones: TCheckBox;
procedure actAceptarExecute(Sender: TObject);
procedure actCancelarExecute(Sender: TObject);
private
@ -18,13 +20,13 @@ type
{ Public declarations }
end;
function ElegirOpcionesImpresionAlbaranProveedor(var AVerPrecios : Boolean; var AVerRefProveedor : Boolean): Boolean;
function ElegirOpcionesImpresionAlbaranProveedor(var AVerPrecios : Boolean; var AVerRefProveedor : Boolean; var AVerObservaciones : Boolean; var AVerIncidencias : Boolean): Boolean;
implementation
{$R *.dfm}
function ElegirOpcionesImpresionAlbaranProveedor(var AVerPrecios : Boolean; var AVerRefProveedor : Boolean): Boolean;
function ElegirOpcionesImpresionAlbaranProveedor(var AVerPrecios : Boolean; var AVerRefProveedor : Boolean; var AVerObservaciones : Boolean; var AVerIncidencias : Boolean): Boolean;
var
AEditor : TfDialogOpcionesImpresionAlbaranesProveedor;
begin
@ -32,12 +34,17 @@ begin
try
AEditor.cbVerPrecios.Checked := AVerPrecios;
AEditor.cbVerRefProveedor.Checked := AVerRefProveedor;
AEditor.cbVerObservaciones.Checked := AVerObservaciones;
AEditor.cbVerIncidencias.Checked := AVerIncidencias;
Result := (AEditor.ShowModal = mrOk);
if Result then
begin
AVerPrecios := AEditor.cbVerPrecios.Checked;
AVerRefProveedor := AEditor.cbVerRefProveedor.Checked;
AVerObservaciones := AEditor.cbVerObservaciones.Checked;
AVerIncidencias := AEditor.cbVerIncidencias.Checked;
end;
finally
AEditor.Release;

View File

@ -166,6 +166,10 @@ inherited fEditorAlbaranProveedor: TfEditorAlbaranProveedor
object pagContenido: TTabSheet
Caption = 'Contenido'
ImageIndex = 1
ExplicitLeft = 0
ExplicitTop = 0
ExplicitWidth = 0
ExplicitHeight = 0
inline frViewDetallesAlbaranProveedor1: TfrViewDetallesAlbaranProveedor
Left = 0
Top = 0
@ -218,7 +222,13 @@ inherited fEditorAlbaranProveedor: TfEditorAlbaranProveedor
ExplicitTop = 0
ExplicitWidth = 170
end
inherited ToolButton13: TToolButton [7]
inherited UpDown1: TUpDown
Left = 714
Top = 0
ExplicitLeft = 714
ExplicitTop = 0
end
inherited ToolButton13: TToolButton
Left = 0
Top = 0
Wrap = True
@ -226,55 +236,47 @@ inherited fEditorAlbaranProveedor: TfEditorAlbaranProveedor
ExplicitTop = 0
ExplicitHeight = 27
end
inherited UpDown1: TUpDown [8]
inherited ToolButton6: TToolButton [9]
Left = 0
Top = 27
ExplicitLeft = 0
ExplicitTop = 27
end
inherited ToolButton6: TToolButton [9]
Left = 17
Top = 27
ExplicitLeft = 17
ExplicitTop = 27
end
inherited ToolButton7: TToolButton [10]
Left = 83
Left = 66
Top = 27
Wrap = False
ExplicitLeft = 83
ExplicitLeft = 66
ExplicitTop = 27
end
inherited ToolButton8: TToolButton [11]
Left = 150
Left = 133
Top = 27
ExplicitLeft = 150
ExplicitLeft = 133
ExplicitTop = 27
end
inherited ToolButton12: TToolButton [12]
Left = 233
Left = 216
Top = 27
Wrap = False
ExplicitLeft = 233
ExplicitLeft = 216
ExplicitTop = 27
ExplicitHeight = 22
end
inherited ToolButton9: TToolButton [13]
Left = 241
Left = 224
Top = 27
ExplicitLeft = 241
ExplicitLeft = 224
ExplicitTop = 27
end
inherited ToolButton10: TToolButton [14]
Left = 386
Left = 369
Top = 27
ExplicitLeft = 386
ExplicitLeft = 369
ExplicitTop = 27
end
inherited ToolButton11: TToolButton [15]
Left = 511
Left = 494
Top = 27
ExplicitLeft = 511
ExplicitLeft = 494
ExplicitTop = 27
end
end
@ -309,6 +311,10 @@ inherited fEditorAlbaranProveedor: TfEditorAlbaranProveedor
object pagInicidencias: TTabSheet
Caption = 'Incidencias'
ImageIndex = 2
ExplicitLeft = 0
ExplicitTop = 0
ExplicitWidth = 0
ExplicitHeight = 0
inline frViewIncidenciasCli: TfrViewIncidencias
Left = 0
Top = 0

View File

@ -243,15 +243,19 @@ var
AllItems: Boolean;
FImprimirPrecios : Boolean;
FImprimirRefProveedor : Boolean;
FVerObservaciones : Boolean;
FVerIncidencias: Boolean;
begin
inherited;
AllItems := False;
FImprimirPrecios := False;
FImprimirRefProveedor := True;
FVerObservaciones := True;
FVerIncidencias := False;
if ElegirOpcionesImpresionAlbaranProveedor(FImprimirPrecios, FImprimirRefProveedor) then
FController.Preview(FAlbaran, AllItems, FImprimirPrecios, FImprimirRefProveedor);
if ElegirOpcionesImpresionAlbaranProveedor(FImprimirPrecios, FImprimirRefProveedor, FVerObservaciones, FVerIncidencias) then
FController.Preview(FAlbaran, AllItems, FImprimirPrecios, FImprimirRefProveedor, FVerObservaciones, FVerIncidencias);
end;
procedure TfEditorAlbaranProveedor.OnClienteFinalChanged(Sender: TObject);
@ -318,15 +322,19 @@ var
AllItems: Boolean;
FImprimirPrecios : Boolean;
FImprimirRefProveedor : Boolean;
FVerObservaciones : Boolean;
FVerIncidencias: Boolean;
begin
inherited;
AllItems := False;
FImprimirPrecios := False;
FImprimirRefProveedor := True;
FVerObservaciones := True;
FVerIncidencias := False;
if ElegirOpcionesImpresionAlbaranProveedor(FImprimirPrecios, FImprimirRefProveedor) then
FController.Preview(FAlbaran, AllItems, FImprimirPrecios, FImprimirRefProveedor);
if ElegirOpcionesImpresionAlbaranProveedor(FImprimirPrecios, FImprimirRefProveedor, FVerObservaciones, FVerIncidencias) then
FController.Preview(FAlbaran, AllItems, FImprimirPrecios, FImprimirRefProveedor, FVerObservaciones, FVerIncidencias);
end;
procedure TfEditorAlbaranProveedor.RecalcularPortePorUnidad;

View File

@ -99,14 +99,18 @@ var
AAlbaranes : IBizAlbaranProveedor;
FImprimirPrecios : Boolean;
FImprimirRefProveedor : Boolean;
FVerObservaciones : Boolean;
FVerIncidencias : Boolean;
begin
inherited;
FImprimirPrecios := False;
FImprimirRefProveedor := True;
FVerObservaciones := True;
FVerIncidencias := False;
if ViewGrid.NumSeleccionados = 1 then begin
if ElegirOpcionesImpresionAlbaranProveedor(FImprimirPrecios, FImprimirRefProveedor) then
if ElegirOpcionesImpresionAlbaranProveedor(FImprimirPrecios, FImprimirRefProveedor, FVerObservaciones, FVerIncidencias) then
FController.GenerarEmailAlbaran(FAlbaranes, FImprimirPrecios, FImprimirRefProveedor)
end
else begin
@ -116,7 +120,7 @@ begin
AAlbaranes := (Controller as IAlbaranesProveedorController).ExtraerSeleccionados(Albaranes) as IBizAlbaranProveedor;
if Assigned(AAlbaranes) then begin
if ElegirOpcionesImpresionAlbaranProveedor(FImprimirPrecios, FImprimirRefProveedor) then
if ElegirOpcionesImpresionAlbaranProveedor(FImprimirPrecios, FImprimirRefProveedor, FVerObservaciones, FVerIncidencias) then
if FController.EnviarEmailAlbaranes(AAlbaranes, FImprimirPrecios, FImprimirRefProveedor) then
RefrescarInterno;
end;
@ -284,12 +288,16 @@ var
AllItems: Boolean;
FImprimirPrecios : Boolean;
FImprimirRefProveedor : Boolean;
FImprimirObservaciones: Boolean;
FImprimirIncidencias: Boolean;
begin
AAlbaranes := Nil;
AllItems := False;
FImprimirPrecios := False;
FImprimirRefProveedor := True;
FImprimirObservaciones := True;
FImprimirIncidencias := False;
if MultiSelect and Assigned(ViewGrid) then
AllItems := (ViewGrid.NumSeleccionados > 1);
@ -317,8 +325,8 @@ begin
if Assigned(AAlbaranes) then
begin
if ElegirOpcionesImpresionAlbaranProveedor(FImprimirPrecios, FImprimirRefProveedor) then
if FController.Print(AAlbaranes, AllItems, FImprimirPrecios, FImprimirRefProveedor) then
if ElegirOpcionesImpresionAlbaranProveedor(FImprimirPrecios, FImprimirRefProveedor, FImprimirObservaciones, FImprimirIncidencias) then
if FController.Print(AAlbaranes, AllItems, FImprimirPrecios, FImprimirRefProveedor, FImprimirObservaciones, FImprimirIncidencias) then
RefrescarInterno;
end;
end;
@ -384,13 +392,16 @@ var
AllItems: Boolean;
FImprimirPrecios : Boolean;
FImprimirRefProveedor : Boolean;
FImprimirObservaciones: Boolean;
FImprimirIncidencias: Boolean;
begin
AAlbaranes := Nil;
AllItems := False;
FImprimirPrecios := False;
FImprimirRefProveedor := True;
FImprimirObservaciones := True;
FImprimirIncidencias := False;
if MultiSelect and Assigned(ViewGrid) then
AllItems := (ViewGrid.NumSeleccionados > 1);
@ -419,8 +430,8 @@ begin
if Assigned(AAlbaranes) then
begin
if ElegirOpcionesImpresionAlbaranProveedor(FImprimirPrecios, FImprimirRefProveedor) then
FController.Preview(AAlbaranes, AllItems, FImprimirPrecios, FImprimirRefProveedor);
if ElegirOpcionesImpresionAlbaranProveedor(FImprimirPrecios, FImprimirRefProveedor, FImprimirObservaciones, FImprimirIncidencias) then
FController.Preview(AAlbaranes, AllItems, FImprimirPrecios, FImprimirRefProveedor, FImprimirObservaciones, FImprimirIncidencias);
end;
end;
end;

View File

@ -4,7 +4,6 @@ inherited fEditorAlbaranesProveedorPreview: TfEditorAlbaranesProveedorPreview
TextHeight = 13
inherited TBXDock: TTBXDock
inherited TBXToolbar1: TTBXToolbar
ExplicitWidth = 540
object TBXItem58: TTBXItem [1]
Action = actExportarRTF
Images = SmallImages

View File

@ -19,14 +19,25 @@ type
private
FVerPrecios : Boolean;
FVerRefProveedor : Boolean;
FVerObservaciones : Boolean;
FVerIncidencias : Boolean;
function GetVerPrecios: Boolean;
function GetVerRefProveedor: Boolean;
function GetVerIncidencias: Boolean;
function GetVerObservaciones: Boolean;
procedure SetVerPrecios(const Value: Boolean);
procedure SetVerRefProveedor(const Value: Boolean);
procedure SetObservaciones(const Value: Boolean);
procedure SetVerIncidencias(const Value: Boolean);
{ Private declarations }
public
property VerPrecios : Boolean read GetVerPrecios write SetVerPrecios;
property VerRefProveedor : Boolean read GetVerRefProveedor write SetVerRefProveedor;
property VerObservaciones : Boolean read GetVerObservaciones write SetObservaciones;
property VerIncidencias : Boolean read GetVerIncidencias write SetVerIncidencias;
end;
@ -53,6 +64,16 @@ begin
end;
function TfEditorAlbaranesProveedorPreview.GetVerIncidencias: Boolean;
begin
Result := FVerIncidencias;
end;
function TfEditorAlbaranesProveedorPreview.GetVerObservaciones: Boolean;
begin
Result := FVerObservaciones;
end;
function TfEditorAlbaranesProveedorPreview.GetVerPrecios: Boolean;
begin
Result := FVerPrecios;
@ -63,6 +84,18 @@ begin
Result := FVerRefProveedor;
end;
procedure TfEditorAlbaranesProveedorPreview.SetObservaciones(
const Value: Boolean);
begin
FVerObservaciones := Value;
end;
procedure TfEditorAlbaranesProveedorPreview.SetVerIncidencias(
const Value: Boolean);
begin
FVerIncidencias := Value;
end;
procedure TfEditorAlbaranesProveedorPreview.SetVerPrecios(const Value: Boolean);
begin
FVerPrecios := Value;

View File

@ -2,57 +2,8 @@ inherited fEditorElegirAlbaranesProveedor: TfEditorElegirAlbaranesProveedor
Caption = 'Seleccionar albar'#225'n de proveedor'
ClientWidth = 790
ExplicitWidth = 798
ExplicitHeight = 538
PixelsPerInch = 96
TextHeight = 13
object pnlHeader: TPanel
Left = 0
Top = 0
Width = 656
Height = 64
Align = alTop
BevelOuter = bvNone
Color = clWhite
Padding.Left = 25
Padding.Top = 8
Padding.Right = 25
Padding.Bottom = 8
ParentBackground = False
TabOrder = 5
object lblTitle: TLabel
AlignWithMargins = True
Left = 25
Top = 8
Width = 606
Height = 13
Margins.Left = 0
Margins.Top = 0
Margins.Right = 0
Margins.Bottom = 8
Align = alTop
Caption = 'Seleccione el albar'#225'n de proveedor'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = [fsBold]
ParentFont = False
ExplicitWidth = 135
end
object lblComments: TLabel
AlignWithMargins = True
Left = 50
Top = 29
Width = 581
Height = 27
Margins.Left = 25
Margins.Top = 0
Margins.Right = 0
Align = alClient
ExplicitWidth = 3
ExplicitHeight = 13
end
end
inherited JvNavPanelHeader: TJvNavPanelHeader
Width = 790
Visible = False
@ -63,14 +14,14 @@ inherited fEditorElegirAlbaranesProveedor: TfEditorElegirAlbaranesProveedor
end
end
inherited TBXDock: TTBXDock
Top = 87
Top = 91
Width = 790
ExplicitTop = 87
ExplicitTop = 91
ExplicitWidth = 790
inherited tbxMain: TTBXToolbar
Left = 427
ExplicitLeft = 427
ExplicitWidth = 126
ExplicitWidth = 228
inherited TBXItem2: TTBXItem
Visible = False
end
@ -128,6 +79,54 @@ inherited fEditorElegirAlbaranesProveedor: TfEditorElegirAlbaranesProveedor
Width = 790
ExplicitWidth = 790
end
object pnlHeader: TPanel [3]
Left = 0
Top = 27
Width = 790
Height = 64
Align = alTop
BevelOuter = bvNone
Color = clWhite
Padding.Left = 25
Padding.Top = 8
Padding.Right = 25
Padding.Bottom = 8
ParentBackground = False
TabOrder = 4
object lblTitle: TLabel
AlignWithMargins = True
Left = 25
Top = 8
Width = 740
Height = 13
Margins.Left = 0
Margins.Top = 0
Margins.Right = 0
Margins.Bottom = 8
Align = alTop
Caption = 'Seleccione el albar'#225'n de proveedor'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = [fsBold]
ParentFont = False
ExplicitWidth = 198
end
object lblComments: TLabel
AlignWithMargins = True
Left = 50
Top = 29
Width = 715
Height = 24
Margins.Left = 25
Margins.Top = 0
Margins.Right = 0
Align = alClient
ExplicitWidth = 3
ExplicitHeight = 13
end
end
inline frViewBarraSeleccion1: TfrViewBarraSeleccion [4]
Left = 0
Top = 449

View File

@ -37,10 +37,6 @@ inherited frViewAlbaranesProveedor: TfrViewAlbaranesProveedor
end>
DataController.OnCompare = cxGridViewDataControllerCompare
OptionsView.GroupFooters = gfAlwaysVisible
inherited cxGridViewICONO: TcxGridDBColumn
Visible = False
VisibleForCustomization = False
end
object cxGridViewNUM_COPIAS: TcxGridDBColumn
DataBinding.FieldName = 'NUM_COPIAS'
MinWidth = 30
@ -213,24 +209,22 @@ inherited frViewAlbaranesProveedor: TfrViewAlbaranesProveedor
Width = 188
end
inherited edtFechaFinFiltro: TcxDateEdit
Left = 210
Left = 229
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 210
ExplicitLeft = 229
ExplicitWidth = 294
Width = 294
end
inherited eLista: TcxComboBox
Left = 447
Left = 487
Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 447
ExplicitWidth = 215
Width = 215
ExplicitLeft = 487
end
end
inherited TBXAlignmentPanel1: TTBXAlignmentPanel
@ -535,6 +529,31 @@ inherited frViewAlbaranesProveedor: TfrViewAlbaranesProveedor
AE426082}
Name = 'PngImage3'
Background = clWindow
end
item
PngImage.Data = {
89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
610000001974455874536F6674776172650041646F626520496D616765526561
647971C9653C000002034944415478DA63FCFFFF3FC394C53BFE33900172623D
1819610600394469FAF3F71FC3EF3F7F19ACFDF319CEED98866A806DD17E14C5
87FB1CC134B2F8AE761B86B9ABF632CC5BBA09D3007CE0D7EFBF609B4178C986
83D80D40770136B0AED69461E59623B80D80391B04FE01E5FEFCF907B7D9B7FE
04C3AA4A6386B53B8EE13700E692BD9D760CCEE587E03607359F66585A6AC0B0
69CF49FC06C06CFE7CFB30C3CBC5B1F87CE48261C0C15E0706FBE20360D999EC
710C5CD2D60C3C37FF333C0DCF66D0B7B1038B7F7D709FE14E4B3CC385339718
300C00391BE6E7676D6A0C5C6FCD19642EEF60782BABC1F035CF9581E3D53B86
A78DEB186E73A9327C927A88302023CA8DC1B1F4208AFB402E502EB9C0702FC5
9A81E3F22D86DF02620CAF9EBF6360B6546538EBD7C3C0BC230D6140729833D8
5658A887B49E011BA0D5FE98E1C1A54686CF213D0C1FDE7D61F8CCC8C2603A2D
8861E58F4406E6EDA90803E2821C50A22CB2F33CD800F9D28B0C379AA2197EAF
3BC8F0919191E1D3BB9F0C2C527C0C4FF36730301F29461810E587F03BDCA019
460CA2FFBC18DEEDDCC870F7CD6706E33667861F4F5E331CE9BFC0F0894B8A81
C1E83BC280502F6B86D5DB8EA28481D3B55486FFFBFE313CB8FE8CE1715C25C3
1F73482C307CFEC4C0BC643A03E39B3308034009031D68F3BE61B07DB28781E9
E36F86DF060298F2BFBE4700003F4A71F77ECF59220000000049454E44AE4260
82}
Name = 'PngImage4'
Background = clWindow
end>
Bitmap = {}
end

View File

@ -87,6 +87,8 @@ contains
uAgentesController in 'uAgentesController.pas',
uIEditorAgente in 'View\uIEditorAgente.pas',
uIEditorAgentes in 'View\uIEditorAgentes.pas',
uIEditorElegirAgentes in 'View\uIEditorElegirAgentes.pas';
uIEditorElegirAgentes in 'View\uIEditorElegirAgentes.pas',
uTiposClienteController in 'uTiposClienteController.pas',
uIEditorTiposCliente in 'View\uIEditorTiposCliente.pas';
end.

View File

@ -43,6 +43,18 @@
<Borland.ProjectType>Package</Borland.ProjectType>
<BorlandProject>
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
<Excluded_Packages Name="D:\MISDOC~1\BORLAN~1\Bpl\JclDebugExpert100.bpl">JCL Debug IDE extension</Excluded_Packages>
<Excluded_Packages Name="D:\MISDOC~1\BORLAN~1\Bpl\JclProjectAnalysisExpert100.bpl">JCL Project Analyzer</Excluded_Packages>
<Excluded_Packages Name="D:\MISDOC~1\BORLAN~1\Bpl\JclFavoriteFoldersExpert100.bpl">JCL Open and Save IDE dialogs with favorite folders</Excluded_Packages>
@ -66,6 +78,7 @@
<DCCReference Include="uGruposProveedorController.pas" />
<DCCReference Include="uPersonalContactoController.pas" />
<DCCReference Include="uProveedoresController.pas" />
<DCCReference Include="uTiposClienteController.pas" />
<DCCReference Include="View\adortl.dcp" />
<DCCReference Include="View\ApplicationBase.dcp" />
<DCCReference Include="View\Base.dcp" />
@ -109,6 +122,7 @@
<DCCReference Include="View\uIEditorPersonalContacto.pas" />
<DCCReference Include="View\uIEditorProveedor.pas" />
<DCCReference Include="View\uIEditorProveedores.pas" />
<DCCReference Include="View\uIEditorTiposCliente.pas" />
<DCCReference Include="View\vcl.dcp" />
<DCCReference Include="View\vclactnband.dcp" />
<DCCReference Include="View\vcldb.dcp" />

View File

@ -0,0 +1,26 @@
unit uIEditorTiposCliente;
interface
uses
uEditorDBBase, uBizTiposCliente, uTiposClienteController, uGUIBase;
type
IEditorTiposCliente = interface(ICustomEditor)
['{144F2713-B4CC-47EA-B3F0-40E1674F93EF}']
function ShowModal : Integer;
procedure Show;
function GetTiposCliente: IBizTipoCliente;
procedure SetTiposCliente(const Value: IBizTipoCliente);
property TiposCliente: IBizTipoCliente read GetTiposCliente write SetTiposCliente;
function GetController : ITiposClienteController;
procedure SetController (const Value : ITiposClienteController);
property Controller : ITiposClienteController read GetController write SetController;
end;
implementation
end.

View File

@ -0,0 +1,219 @@
unit uTiposClienteController;
interface
uses
Classes, SysUtils, uDADataTable, uControllerBase, uEditorDBItem,
uIDataModuleClientes, uBizTiposCliente;
type
ITiposClienteController = interface(IControllerBase)
['{2A0278F1-6C90-4040-84A7-BB91C5700239}']
function BuscarTodos: IBizTipoCliente;
procedure VerTodos(ATiposCliente: IBizTipoCliente);
procedure Anadir(ATipoCliente : IBizTipoCliente);
function Eliminar(ATipoCliente : IBizTipoCliente): Boolean;
function Guardar(ATipoCliente : IBizTipoCliente): Boolean;
procedure DescartarCambios(ATipoCliente : IBizTipoCliente);
function Localizar(ATiposCliente: IBizTipoCliente; ADescripcion:String): Boolean;
function DarListaTiposCliente: TStringList;
end;
TTiposClienteController = class(TControllerBase, ITiposClienteController)
protected
FDataModule : IDataModuleClientes;
procedure RecibirAviso(ASujeto: ISujeto; ADataTable: IDAStronglyTypedDataTable); override;
function CreateEditor(const AName : String; const IID: TGUID; out Intf): Boolean;
function ValidarTipoCliente(ATipoCliente: IBizTipoCliente): Boolean;
procedure AsignarDataModule; virtual;
public
constructor Create; override;
destructor Destroy; override;
function Eliminar(ATipoCliente : IBizTipoCliente): Boolean;
function Guardar(ATipoCliente : IBizTipoCliente): Boolean;
procedure DescartarCambios(ATipoCliente : IBizTipoCliente); virtual;
procedure Anadir(ATipoCliente : IBizTipoCliente);
function BuscarTodos: IBizTipoCliente;
procedure VerTodos(ATiposCliente: IBizTipoCliente);
function Localizar(ATiposCliente: IBizTipoCliente; ADescripcion:String): Boolean;
function DarListaTiposCliente: TStringList;
end;
implementation
uses
cxControls, DB, uEditorRegistryUtils,
uIEditorTiposCliente, uDataModuleClientes,
uDAInterfaces, uDataTableUtils,
uDateUtils, uROTypes, DateUtils, Controls, Windows, schContactosClient_Intf;
{ TTiposClienteController }
procedure TTiposClienteController.Anadir(ATipoCliente: IBizTipoCliente);
begin
ATipoCliente.Insert;
end;
procedure TTiposClienteController.AsignarDataModule;
begin
FDataModule := TDataModuleClientes.Create(Nil);
end;
function TTiposClienteController.BuscarTodos: IBizTipoCliente;
begin
Result := FDataModule.GetTiposCliente;
end;
constructor TTiposClienteController.Create;
begin
inherited;
AsignarDataModule;
end;
function TTiposClienteController.CreateEditor(const AName: String; const IID: TGUID; out Intf): Boolean;
begin
Result := Supports(EditorRegistry.CreateEditor(AName), IID, Intf);
end;
function TTiposClienteController.DarListaTiposCliente: TStringList;
var
ATiposCliente: IBizTipoCliente;
begin
ATiposCliente := BuscarTodos;
ATiposCliente.DataTable.Active := True;
Result := TStringList.Create;
try
with Result do
begin
ATiposCliente.DataTable.First;
while not ATiposCliente.DataTable.EOF do
begin
Add(ATiposCliente.DESCRIPCION);
ATiposCliente.DataTable.Next;
end;
end;
finally
ATiposCliente := NIL;
end;
end;
procedure TTiposClienteController.DescartarCambios(ATipoCliente: IBizTipoCliente);
begin
if not Assigned(ATipoCliente) then
raise Exception.Create ('GrupoCliente no asignado');
ShowHourglassCursor;
try
if (ATipoCliente.State in dsEditModes) then
ATipoCliente.Cancel;
ATipoCliente.DataTable.CancelUpdates;
finally
HideHourglassCursor;
end;
end;
destructor TTiposClienteController.Destroy;
begin
FDataModule := Nil;
inherited;
end;
function TTiposClienteController.ValidarTipoCliente(ATipoCliente: IBizTipoCliente): Boolean;
begin
if not Assigned(ATipoCliente) then
raise Exception.Create ('TipoCliente no asignada');
if (ATipoCliente.DataTable.State in dsEditModes) then
ATipoCliente.DataTable.Post;
if Length(ATipoCliente.DESCRIPCION) = 0 then
raise Exception.Create('Debe indicar al menos la descripción de este tipo.');
Result := True;
end;
procedure TTiposClienteController.VerTodos(ATiposCliente: IBizTipoCliente);
var
AEditor : IEditorTiposCliente;
begin
AEditor := NIL;
CreateEditor('EditorTiposCliente', IEditorTiposCliente, AEditor);
if Assigned(AEditor) then
try
AEditor.Controller := Self; //OJO ORDEN MUY IMPORTANTE
AEditor.TiposCliente := ATiposCliente;
AEditor.ShowModal;
finally
AEditor.Release;
AEditor := NIL;
end;
end;
function TTiposClienteController.Eliminar(ATipoCliente: IBizTipoCliente): Boolean;
begin
if not Assigned(ATipoCliente) then
raise Exception.Create ('TipoCliente no asignada');
ShowHourglassCursor;
try
if (ATipoCliente.State in dsEditModes) then
ATipoCliente.Cancel;
ATipoCliente.Delete;
ATipoCliente.DataTable.ApplyUpdates;
HideHourglassCursor;
Result := True;
finally
HideHourglassCursor;
end;
end;
procedure TTiposClienteController.RecibirAviso(ASujeto: ISujeto; ADataTable: IDAStronglyTypedDataTable);
begin
inherited;
//
end;
function TTiposClienteController.Guardar(ATipoCliente: IBizTipoCliente): Boolean;
begin
Result := False;
if ValidarTipoCliente(ATipoCliente) then
begin
ShowHourglassCursor;
try
if (ATipoCliente.DataTable.State in dsEditModes) then
ATipoCliente.DataTable.Post;
ATipoCliente.DataTable.ApplyUpdates;
Result := True;
finally
HideHourglassCursor;
end;
end;
end;
function TTiposClienteController.Localizar(ATiposCliente: IBizTipoCliente; ADescripcion: String): Boolean;
begin
Result := True;
ShowHourglassCursor;
try
with ATiposCliente.DataTable do
begin
DisableControls;
First;
if not Locate(fld_TiposClienteDESCRIPCION, ADescripcion, []) then
Result := False;
EnableControls;
end;
finally
HideHourglassCursor;
end;
end;
end.

View File

@ -23,6 +23,9 @@ inherited DataModuleClientes: TDataModuleClientes
DataSet = tbl_PersonalContacto.Dataset
Left = 440
end
inherited ds_ListaAnosObjetivosAlb: TDADataSource
DataSet = tbl_ListaAnosObjetivosAlb.Dataset
end
object tbl_Clientes: TDAMemDataTable
RemoteUpdatesOptions = []
Fields = <
@ -278,6 +281,11 @@ inherited DataModuleClientes: TDataModuleClientes
DataType = datSmallInt
DisplayLabel = #191'Felicitaci'#243'n?'
DictionaryEntry = 'Clientes_FELICITACION'
end
item
Name = 'TIPO_CLIENTE'
DataType = datString
Size = 255
end>
Params = <>
StreamingOptions = [soDisableEventsWhileStreaming]
@ -463,4 +471,36 @@ inherited DataModuleClientes: TDataModuleClientes
Left = 448
Top = 336
end
object tbl_TiposCliente: TDAMemDataTable
RemoteUpdatesOptions = []
Fields = <
item
Name = 'ID'
DataType = datAutoInc
GeneratorName = 'GEN_CLIENTES_TIPOS_ID'
Required = True
DictionaryEntry = 'TiposCliente_ID'
InPrimaryKey = True
end
item
Name = 'DESCRIPCION'
DataType = datString
Size = 255
DisplayLabel = 'TiposCliente_DESCRIPCION'
DictionaryEntry = 'TiposCliente_DESCRIPCION'
end>
Params = <>
StreamingOptions = [soDisableEventsWhileStreaming]
RemoteDataAdapter = rda_Contactos
LogicalName = 'TiposCliente'
IndexDefs = <>
Left = 560
Top = 80
end
object ds_TiposCliente: TDADataSource
DataSet = tbl_TiposCliente.Dataset
DataTable = tbl_TiposCliente
Left = 560
Top = 32
end
end

View File

@ -8,7 +8,7 @@ uses
uDACDSDataTable, uDABINAdapter, uRORemoteService,
uROClient, uROBinMessage, uROWinInetHttpChannel,
uBizClientesDescuentos, uBizClientesDescuentosArt,
uBizGruposCliente, uBizContactos, uDataModuleContactos,
uBizGruposCliente, uBizTiposCliente, uBizContactos, uDataModuleContactos,
uIDataModuleClientes, uDADesigntimeCall, uDARemoteDataAdapter,
uDADataStreamer, uRODynamicRequest, uDAInterfaces, uDAMemDataTable,
uDABin2DataStreamer, uControllerBase, uBizContactosDatosBancarios,
@ -24,6 +24,8 @@ type
ds_GruposCliente: TDADataSource;
tbl_ClientesDescuentosArticulos: TDAMemDataTable;
ds_ClientesDescuentosArticulos: TDADataSource;
tbl_TiposCliente: TDAMemDataTable;
ds_TiposCliente: TDADataSource;
protected
function _GetDescuentos: IBizClienteDescuentos;
function _GetDescuentosArticulos: IBizClienteDescuentosArticulos;
@ -34,6 +36,7 @@ type
function GetItemsTiendaWeb : IBizCliente;
function GetItemsFelicitacion : IBizCliente;
function GetGruposCliente : IBizGrupoCliente;
function GetTiposCliente : IBizTipoCliente;
end;
implementation
@ -151,6 +154,20 @@ begin
end;
end;
function TDataModuleClientes.GetTiposCliente: IBizTipoCliente;
var
ATipoCliente : TDAMemDataTable;
begin
ShowHourglassCursor;
try
ATipoCliente := CloneDataTable(tbl_TiposCliente);
ATipoCliente.BusinessRulesID := BIZ_CLIENT_TIPOSCLIENTE;
Result := (ATipoCliente as IBizTipoCliente);
finally
HideHourglassCursor;
end;
end;
function TDataModuleClientes.NewItem: IBizCliente;
begin
Result := GetItem(ID_NULO)

View File

@ -59,6 +59,7 @@ contains
uBizAgentesComisiones in 'uBizAgentesComisiones.pas',
uBizClientesDescuentos in 'uBizClientesDescuentos.pas',
uBizAgentesObjetivosFacturas in 'uBizAgentesObjetivosFacturas.pas',
uBizAgentesObjetivosAlbaranes in 'uBizAgentesObjetivosAlbaranes.pas';
uBizAgentesObjetivosAlbaranes in 'uBizAgentesObjetivosAlbaranes.pas',
uBizTiposCliente in 'uBizTiposCliente.pas';
end.

View File

@ -80,6 +80,7 @@
<DCCReference Include="uBizGruposCliente.pas" />
<DCCReference Include="uBizGruposEmpleado.pas" />
<DCCReference Include="uBizGruposProveedor.pas" />
<DCCReference Include="uBizTiposCliente.pas" />
<DCCReference Include="vcl.dcp" />
<DCCReference Include="vcldb.dcp" />
</ItemGroup>

View File

@ -3,7 +3,8 @@ unit uIDataModuleClientes;
interface
uses
uBizContactos, uIDataModuleContactos, uBizGruposCliente, uBizContactosDatosBancarios;
uBizContactos, uIDataModuleContactos, uBizGruposCliente,
uBizTiposCliente, uBizContactosDatosBancarios;
type
IDataModuleClientes = interface(IDataModuleContactos)
@ -17,6 +18,7 @@ type
function GetItemsTiendaWeb : IBizCliente;
function GetItemsFelicitacion : IBizCliente;
function GetGruposCliente : IBizGrupoCliente;
function GetTiposCliente : IBizTipoCliente;
end;

View File

@ -9,27 +9,28 @@ 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_Contactos = '{291D5023-2485-4738-BA4B-8CFD1087564D}';
RID_GruposCliente = '{3202886D-ABFE-4D93-8B7C-DCC767B8E13E}';
RID_DatosBancarios = '{48378F5C-39D8-4F3E-AF60-30E3B15C1BD6}';
RID_Clientes = '{6BB9F834-2CD8-4CE1-AEF2-2F632139E4E6}';
RID_Proveedores = '{64948969-32BB-4EE9-B51E-798A988B6BB9}';
RID_Empleados = '{EC0F7AAD-8090-489F-A5C7-004A80A7682A}';
RID_DireccionesContacto = '{497F22D7-6679-4BF4-B909-4F0DD68F1B0D}';
RID_ClientesDescuentos = '{DD4D5290-DC73-45F2-AA7D-FB799D9AE6AE}';
RID_GruposProveedor = '{3C14F4A5-17DB-44DC-8E26-0AD2F3231245}';
RID_GruposEmpleado = '{D7511C4F-EE3D-4C78-B5EF-A3935874DD92}';
RID_Contactos_Refresh = '{76C8D865-64CD-4DD5-8A80-F82AA6683E27}';
RID_ContratosEmpleados = '{6DB2FA18-7E29-43FF-8D71-67A5481B8E84}';
RID_DescripcionesProveedores = '{D3734658-7727-47E1-9C43-AB4D4BD58EF4}';
RID_PersonalContacto = '{B3F92D0E-5DCC-4723-BDC0-E2045C0B4F74}';
RID_Agentes_Comisiones = '{716B55E8-F461-4131-A90A-3E5291CF1319}';
RID_ListaAnosObjetivosAlb = '{492D6536-8A33-44D0-86B9-A4512BD54E62}';
RID_Agentes = '{271490F9-AFF6-4904-9F85-097B4CB0AAA2}';
RID_ClientesDescuentosArticulos = '{20759DA3-0B2D-4A5D-852F-6DB6725E7D19}';
RID_Agentes_Objetivos_albaranes = '{DFE878FE-9DF3-46C4-BFF1-90CF546A31EF}';
RID_Agentes_Objetivos_facturas = '{73C0859D-9EFA-45A8-AA4C-F8F6572C985B}';
RID_ListaAnosObjetivosFac = '{5A1B02F6-EA0E-4B3D-8067-DAAA0FE5178D}';
RID_Contactos = '{FC98FC9D-2174-484A-84DB-29A5FF522A49}';
RID_GruposCliente = '{FAE5A018-A73D-4F40-BC2B-D43431C80929}';
RID_DatosBancarios = '{204762D1-0752-48E4-8D13-73A6E478ABC2}';
RID_Clientes = '{9BE4C879-165C-4D3F-9BBA-526B77860B3F}';
RID_Proveedores = '{7B7762CE-6B42-4B50-A194-78BE5FFB71E5}';
RID_Empleados = '{0B610962-07D1-4C7D-BC7B-65AC8824DDC4}';
RID_DireccionesContacto = '{68C042FD-68F6-440A-B10F-0314491B1100}';
RID_ClientesDescuentos = '{845D6324-B528-4907-923D-7A1E0517F59A}';
RID_GruposProveedor = '{B5573F10-E1CB-400B-8595-F5E7E6812CAE}';
RID_GruposEmpleado = '{6EF2382C-65F9-4429-8EFE-7BBE4F35FEED}';
RID_Contactos_Refresh = '{5A18AE89-0712-468F-A606-94C4B8BBF4DE}';
RID_ContratosEmpleados = '{D4DDC2BA-74CF-4EBC-AEF9-476BDE3FDFE7}';
RID_DescripcionesProveedores = '{8F5E1C48-6D57-4DBB-9621-EEEF38163532}';
RID_PersonalContacto = '{8CBD048B-EEF4-46F3-A027-B66E39125D87}';
RID_Agentes_Comisiones = '{3FEA025A-89BF-4B2F-84DB-29BECC676846}';
RID_ListaAnosObjetivosAlb = '{67328F62-088C-4B54-A4EA-256CEAEE2D1A}';
RID_Agentes = '{8F775E20-FF8D-4966-94D4-CAA4B3EDE612}';
RID_ClientesDescuentosArticulos = '{5A7F7F18-FFC7-4BBD-9632-0EF2C3A855C9}';
RID_Agentes_Objetivos_albaranes = '{6C51A34C-790F-477E-8F90-341B0FE11746}';
RID_Agentes_Objetivos_facturas = '{F8E77A40-78F2-44F5-BA10-4DA0BF8FE0CE}';
RID_ListaAnosObjetivosFac = '{4A823B2D-CD57-404E-A7DD-587779C21C84}';
RID_TiposCliente = '{E6135AF1-7B14-4726-979D-7DDC74BFB4D2}';
{ Data table names }
nme_Contactos = 'Contactos';
@ -53,6 +54,7 @@ const
nme_Agentes_Objetivos_albaranes = 'Agentes_Objetivos_albaranes';
nme_Agentes_Objetivos_facturas = 'Agentes_Objetivos_facturas';
nme_ListaAnosObjetivosFac = 'ListaAnosObjetivosFac';
nme_TiposCliente = 'TiposCliente';
{ Contactos fields }
fld_ContactosID = 'ID';
@ -177,6 +179,7 @@ const
fld_ClientesCODIGO_ASIGNADO = 'CODIGO_ASIGNADO';
fld_ClientesDESCUENTO = 'DESCUENTO';
fld_ClientesFELICITACION = 'FELICITACION';
fld_ClientesTIPO_CLIENTE = 'TIPO_CLIENTE';
{ Clientes field indexes }
idx_ClientesID = 0;
@ -221,6 +224,7 @@ const
idx_ClientesCODIGO_ASIGNADO = 39;
idx_ClientesDESCUENTO = 40;
idx_ClientesFELICITACION = 41;
idx_ClientesTIPO_CLIENTE = 42;
{ Proveedores fields }
fld_ProveedoresID = 'ID';
@ -664,10 +668,18 @@ const
{ ListaAnosObjetivosFac field indexes }
idx_ListaAnosObjetivosFacANO = 0;
{ TiposCliente fields }
fld_TiposClienteID = 'ID';
fld_TiposClienteDESCRIPCION = 'DESCRIPCION';
{ TiposCliente field indexes }
idx_TiposClienteID = 0;
idx_TiposClienteDESCRIPCION = 1;
type
{ IContactos }
IContactos = interface(IDAStronglyTypedDataTable)
['{1CBC2D1C-3449-4C91-B2C6-6AF07E1EABCB}']
['{DFDDB687-2921-467A-BB23-198E5B922F84}']
{ Property getters and setters }
function GetIDValue: Integer;
procedure SetIDValue(const aValue: Integer);
@ -966,7 +978,7 @@ type
{ IGruposCliente }
IGruposCliente = interface(IDAStronglyTypedDataTable)
['{B9DBD6F1-AE60-44F7-8E0B-A6093CD02F7E}']
['{1AE838BB-826E-4CA2-AAA1-D6049D08A77B}']
{ Property getters and setters }
function GetIDValue: Integer;
procedure SetIDValue(const aValue: Integer);
@ -1013,7 +1025,7 @@ type
{ IDatosBancarios }
IDatosBancarios = interface(IDAStronglyTypedDataTable)
['{B6A49401-06FA-450A-B833-31DB18866E07}']
['{AEB463FE-AD2E-442F-BAAB-D8AD664AC39D}']
{ Property getters and setters }
function GetIDValue: Integer;
procedure SetIDValue(const aValue: Integer);
@ -1144,7 +1156,7 @@ type
{ IClientes }
IClientes = interface(IDAStronglyTypedDataTable)
['{1B30B5ED-D974-4FF4-ACEF-83E365A1D686}']
['{4F9EC316-7AC6-4C71-968A-5BAA61CAFCA4}']
{ Property getters and setters }
function GetIDValue: Integer;
procedure SetIDValue(const aValue: Integer);
@ -1313,6 +1325,10 @@ type
procedure SetFELICITACIONValue(const aValue: SmallInt);
function GetFELICITACIONIsNull: Boolean;
procedure SetFELICITACIONIsNull(const aValue: Boolean);
function GetTIPO_CLIENTEValue: String;
procedure SetTIPO_CLIENTEValue(const aValue: String);
function GetTIPO_CLIENTEIsNull: Boolean;
procedure SetTIPO_CLIENTEIsNull(const aValue: Boolean);
{ Properties }
@ -1400,6 +1416,8 @@ type
property DESCUENTOIsNull: Boolean read GetDESCUENTOIsNull write SetDESCUENTOIsNull;
property FELICITACION: SmallInt read GetFELICITACIONValue write SetFELICITACIONValue;
property FELICITACIONIsNull: Boolean read GetFELICITACIONIsNull write SetFELICITACIONIsNull;
property TIPO_CLIENTE: String read GetTIPO_CLIENTEValue write SetTIPO_CLIENTEValue;
property TIPO_CLIENTEIsNull: Boolean read GetTIPO_CLIENTEIsNull write SetTIPO_CLIENTEIsNull;
end;
{ TClientesDataTableRules }
@ -1576,6 +1594,10 @@ type
procedure SetFELICITACIONValue(const aValue: SmallInt); virtual;
function GetFELICITACIONIsNull: Boolean; virtual;
procedure SetFELICITACIONIsNull(const aValue: Boolean); virtual;
function GetTIPO_CLIENTEValue: String; virtual;
procedure SetTIPO_CLIENTEValue(const aValue: String); virtual;
function GetTIPO_CLIENTEIsNull: Boolean; virtual;
procedure SetTIPO_CLIENTEIsNull(const aValue: Boolean); virtual;
{ Properties }
property ID: Integer read GetIDValue write SetIDValue;
@ -1662,6 +1684,8 @@ type
property DESCUENTOIsNull: Boolean read GetDESCUENTOIsNull write SetDESCUENTOIsNull;
property FELICITACION: SmallInt read GetFELICITACIONValue write SetFELICITACIONValue;
property FELICITACIONIsNull: Boolean read GetFELICITACIONIsNull write SetFELICITACIONIsNull;
property TIPO_CLIENTE: String read GetTIPO_CLIENTEValue write SetTIPO_CLIENTEValue;
property TIPO_CLIENTEIsNull: Boolean read GetTIPO_CLIENTEIsNull write SetTIPO_CLIENTEIsNull;
public
constructor Create(aDataTable: TDADataTable); override;
@ -1671,7 +1695,7 @@ type
{ IProveedores }
IProveedores = interface(IDAStronglyTypedDataTable)
['{36A8200A-5E50-497C-A0F2-BAFAD4B5A2C9}']
['{62DCC209-287A-4380-8D4B-83913824D08F}']
{ Property getters and setters }
function GetIDValue: Integer;
procedure SetIDValue(const aValue: Integer);
@ -2162,7 +2186,7 @@ type
{ IEmpleados }
IEmpleados = interface(IDAStronglyTypedDataTable)
['{DE26478A-6B56-40DD-9CFF-176D1B41AFE0}']
['{A5050F92-4FC8-4B4F-BCFF-7BBA2CB4EDEE}']
{ Property getters and setters }
function GetIDValue: Integer;
procedure SetIDValue(const aValue: Integer);
@ -2593,7 +2617,7 @@ type
{ IDireccionesContacto }
IDireccionesContacto = interface(IDAStronglyTypedDataTable)
['{2A82A155-3A4B-44BF-9A1B-C197A50F39B1}']
['{907598A0-83B2-4A54-A19D-82FF0656D8F8}']
{ Property getters and setters }
function GetIDValue: Integer;
procedure SetIDValue(const aValue: Integer);
@ -2808,7 +2832,7 @@ type
{ IClientesDescuentos }
IClientesDescuentos = interface(IDAStronglyTypedDataTable)
['{DCD380B7-39A2-446F-9ACF-53057F43F28C}']
['{C7856FE7-0714-4949-B67D-882FFB8DC44E}']
{ Property getters and setters }
function GetIDValue: Integer;
procedure SetIDValue(const aValue: Integer);
@ -2891,7 +2915,7 @@ type
{ IGruposProveedor }
IGruposProveedor = interface(IDAStronglyTypedDataTable)
['{EC66CD85-3FE0-4DE0-A543-8FA1DBCF33E0}']
['{3B8825BB-FF71-47C9-A232-E0931855228A}']
{ Property getters and setters }
function GetIDValue: Integer;
procedure SetIDValue(const aValue: Integer);
@ -2938,7 +2962,7 @@ type
{ IGruposEmpleado }
IGruposEmpleado = interface(IDAStronglyTypedDataTable)
['{37D061A4-7D65-41B8-9DAF-33B393EE50E5}']
['{F6D330DB-5908-4E6C-9063-62CDA0A13EF7}']
{ Property getters and setters }
function GetIDValue: Integer;
procedure SetIDValue(const aValue: Integer);
@ -2985,7 +3009,7 @@ type
{ IContactos_Refresh }
IContactos_Refresh = interface(IDAStronglyTypedDataTable)
['{47A29D73-F2AF-4DA5-BA66-FC09A1FA7DA6}']
['{DA718CA5-E280-45E1-A143-299A9CCCE433}']
{ Property getters and setters }
function GetIDValue: Integer;
procedure SetIDValue(const aValue: Integer);
@ -3260,7 +3284,7 @@ type
{ IContratosEmpleados }
IContratosEmpleados = interface(IDAStronglyTypedDataTable)
['{01E65909-DD8B-44B1-AB39-73F2047DC2FF}']
['{137AAE38-80D8-469E-AD22-9627330E7B2F}']
{ Property getters and setters }
function GetCONTRATOValue: String;
procedure SetCONTRATOValue(const aValue: String);
@ -3295,7 +3319,7 @@ type
{ IDescripcionesProveedores }
IDescripcionesProveedores = interface(IDAStronglyTypedDataTable)
['{EF6069F3-8A7F-49A7-9AA6-FCB4FD7BC6F2}']
['{8172171A-10E0-409A-8E0B-D5D9365ABB23}']
{ Property getters and setters }
function GetDESCRIPCION_PROVEEDORValue: String;
procedure SetDESCRIPCION_PROVEEDORValue(const aValue: String);
@ -3330,7 +3354,7 @@ type
{ IPersonalContacto }
IPersonalContacto = interface(IDAStronglyTypedDataTable)
['{24490A3B-6DEC-4546-8433-2B73B85E5B93}']
['{02E89BFD-3160-4164-BF61-221FF595CB3A}']
{ Property getters and setters }
function GetIDValue: Integer;
procedure SetIDValue(const aValue: Integer);
@ -3473,7 +3497,7 @@ type
{ IAgentes_Comisiones }
IAgentes_Comisiones = interface(IDAStronglyTypedDataTable)
['{191150F9-E106-4E8A-8124-32860D4F8894}']
['{B2B154B4-F8DA-46FB-A06F-5000849254F6}']
{ Property getters and setters }
function GetIDValue: Integer;
procedure SetIDValue(const aValue: Integer);
@ -3556,7 +3580,7 @@ type
{ IListaAnosObjetivosAlb }
IListaAnosObjetivosAlb = interface(IDAStronglyTypedDataTable)
['{B8BF52B7-476E-410A-9720-8B30EB132FCD}']
['{53124C57-F091-4204-AD95-FB2195C92120}']
{ Property getters and setters }
function GetANOValue: SmallInt;
procedure SetANOValue(const aValue: SmallInt);
@ -3591,7 +3615,7 @@ type
{ IAgentes }
IAgentes = interface(IDAStronglyTypedDataTable)
['{FD432FBB-8219-433D-924F-22901565FFF3}']
['{535CB005-A65B-46CB-9265-8D882CF9BC29}']
{ Property getters and setters }
function GetIDValue: Integer;
procedure SetIDValue(const aValue: Integer);
@ -3926,7 +3950,7 @@ type
{ IClientesDescuentosArticulos }
IClientesDescuentosArticulos = interface(IDAStronglyTypedDataTable)
['{007089E4-2A88-4E59-9F39-DBA5E0DD0C57}']
['{BF0D2DCF-FE11-4DB2-8860-5234FD2EA0B4}']
{ Property getters and setters }
function GetIDValue: Integer;
procedure SetIDValue(const aValue: Integer);
@ -4057,7 +4081,7 @@ type
{ IAgentes_Objetivos_albaranes }
IAgentes_Objetivos_albaranes = interface(IDAStronglyTypedDataTable)
['{93BAC2FE-520D-454C-95D2-15A72D48968A}']
['{A4F09DDA-8A26-4DA2-925F-EE02B2E6D290}']
{ Property getters and setters }
function GetIDValue: Integer;
procedure SetIDValue(const aValue: Integer);
@ -4164,7 +4188,7 @@ type
{ IAgentes_Objetivos_facturas }
IAgentes_Objetivos_facturas = interface(IDAStronglyTypedDataTable)
['{B28387E5-80DE-4340-9114-CC7AE7ECF05A}']
['{F0B134F6-AE87-4835-B443-997AD16988DB}']
{ Property getters and setters }
function GetIDValue: Integer;
procedure SetIDValue(const aValue: Integer);
@ -4271,7 +4295,7 @@ type
{ IListaAnosObjetivosFac }
IListaAnosObjetivosFac = interface(IDAStronglyTypedDataTable)
['{8E1FC0F1-1AFF-47F6-8FCB-619723CC5DA6}']
['{E2EB26D2-2409-4320-AF04-A0A4834E1D84}']
{ Property getters and setters }
function GetANOValue: SmallInt;
procedure SetANOValue(const aValue: SmallInt);
@ -4304,6 +4328,53 @@ type
end;
{ ITiposCliente }
ITiposCliente = interface(IDAStronglyTypedDataTable)
['{C44A4DE6-41B4-436D-9CA7-7165BD25595A}']
{ Property getters and setters }
function GetIDValue: Integer;
procedure SetIDValue(const aValue: Integer);
function GetIDIsNull: Boolean;
procedure SetIDIsNull(const aValue: Boolean);
function GetDESCRIPCIONValue: String;
procedure SetDESCRIPCIONValue(const aValue: String);
function GetDESCRIPCIONIsNull: Boolean;
procedure SetDESCRIPCIONIsNull(const aValue: Boolean);
{ Properties }
property ID: Integer read GetIDValue write SetIDValue;
property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;
end;
{ TTiposClienteDataTableRules }
TTiposClienteDataTableRules = class(TIntfObjectDADataTableRules, ITiposCliente)
private
protected
{ Property getters and setters }
function GetIDValue: Integer; virtual;
procedure SetIDValue(const aValue: Integer); virtual;
function GetIDIsNull: Boolean; virtual;
procedure SetIDIsNull(const aValue: Boolean); virtual;
function GetDESCRIPCIONValue: String; virtual;
procedure SetDESCRIPCIONValue(const aValue: String); virtual;
function GetDESCRIPCIONIsNull: Boolean; virtual;
procedure SetDESCRIPCIONIsNull(const aValue: Boolean); virtual;
{ Properties }
property ID: Integer read GetIDValue write SetIDValue;
property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
property DESCRIPCION: String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
property DESCRIPCIONIsNull: Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;
public
constructor Create(aDataTable: TDADataTable); override;
destructor Destroy; override;
end;
implementation
uses Variants, uROBinaryHelpers;
@ -5965,6 +6036,27 @@ begin
DataTable.Fields[idx_ClientesFELICITACION].AsVariant := Null;
end;
function TClientesDataTableRules.GetTIPO_CLIENTEValue: String;
begin
result := DataTable.Fields[idx_ClientesTIPO_CLIENTE].AsString;
end;
procedure TClientesDataTableRules.SetTIPO_CLIENTEValue(const aValue: String);
begin
DataTable.Fields[idx_ClientesTIPO_CLIENTE].AsString := aValue;
end;
function TClientesDataTableRules.GetTIPO_CLIENTEIsNull: boolean;
begin
result := DataTable.Fields[idx_ClientesTIPO_CLIENTE].IsNull;
end;
procedure TClientesDataTableRules.SetTIPO_CLIENTEIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_ClientesTIPO_CLIENTE].AsVariant := Null;
end;
{ TProveedoresDataTableRules }
constructor TProveedoresDataTableRules.Create(aDataTable: TDADataTable);
@ -10152,6 +10244,60 @@ begin
end;
{ TTiposClienteDataTableRules }
constructor TTiposClienteDataTableRules.Create(aDataTable: TDADataTable);
begin
inherited;
end;
destructor TTiposClienteDataTableRules.Destroy;
begin
inherited;
end;
function TTiposClienteDataTableRules.GetIDValue: Integer;
begin
result := DataTable.Fields[idx_TiposClienteID].AsInteger;
end;
procedure TTiposClienteDataTableRules.SetIDValue(const aValue: Integer);
begin
DataTable.Fields[idx_TiposClienteID].AsInteger := aValue;
end;
function TTiposClienteDataTableRules.GetIDIsNull: boolean;
begin
result := DataTable.Fields[idx_TiposClienteID].IsNull;
end;
procedure TTiposClienteDataTableRules.SetIDIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_TiposClienteID].AsVariant := Null;
end;
function TTiposClienteDataTableRules.GetDESCRIPCIONValue: String;
begin
result := DataTable.Fields[idx_TiposClienteDESCRIPCION].AsString;
end;
procedure TTiposClienteDataTableRules.SetDESCRIPCIONValue(const aValue: String);
begin
DataTable.Fields[idx_TiposClienteDESCRIPCION].AsString := aValue;
end;
function TTiposClienteDataTableRules.GetDESCRIPCIONIsNull: boolean;
begin
result := DataTable.Fields[idx_TiposClienteDESCRIPCION].IsNull;
end;
procedure TTiposClienteDataTableRules.SetDESCRIPCIONIsNull(const aValue: Boolean);
begin
if aValue then
DataTable.Fields[idx_TiposClienteDESCRIPCION].AsVariant := Null;
end;
initialization
RegisterDataTableRules(RID_Contactos, TContactosDataTableRules);
RegisterDataTableRules(RID_GruposCliente, TGruposClienteDataTableRules);
@ -10174,5 +10320,6 @@ initialization
RegisterDataTableRules(RID_Agentes_Objetivos_albaranes, TAgentes_Objetivos_albaranesDataTableRules);
RegisterDataTableRules(RID_Agentes_Objetivos_facturas, TAgentes_Objetivos_facturasDataTableRules);
RegisterDataTableRules(RID_ListaAnosObjetivosFac, TListaAnosObjetivosFacDataTableRules);
RegisterDataTableRules(RID_TiposCliente, TTiposClienteDataTableRules);
end.

View File

@ -9,32 +9,33 @@ 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_ContactosDelta = '{924489BD-4BF1-490A-80E1-292384CDE36B}';
RID_GruposClienteDelta = '{00B6FC09-D8A1-4AF6-B6DF-2BCEF361091C}';
RID_DatosBancariosDelta = '{359B215D-847C-407A-9553-F0E7AE268DAE}';
RID_ClientesDelta = '{71CCE505-5A15-4B1E-A807-8DA7DFE6C36C}';
RID_ProveedoresDelta = '{F3854348-13E9-465B-9E6E-67EC43F26D2E}';
RID_EmpleadosDelta = '{8A94BFD2-C61E-46A8-9620-CF7E1C97D7B5}';
RID_DireccionesContactoDelta = '{C480F508-E137-4093-8BF2-DF49EF2AB3DE}';
RID_ClientesDescuentosDelta = '{B4C0F049-8B81-4EFB-9E8E-592A72FE25A6}';
RID_GruposProveedorDelta = '{129AA285-FCCC-42C8-B31E-288EDB9500DA}';
RID_GruposEmpleadoDelta = '{F6F9AD04-610E-4F13-AC1F-7ACDB1761FE8}';
RID_Contactos_RefreshDelta = '{755CB99F-48D6-47A3-B95B-0580F7586656}';
RID_ContratosEmpleadosDelta = '{7E590734-DDA2-4025-ACC6-0F16255B130A}';
RID_DescripcionesProveedoresDelta = '{57434ABA-AADE-4CD2-930E-6309C476941F}';
RID_PersonalContactoDelta = '{8B6FE0F0-8635-483F-8FCC-0D386BF286DD}';
RID_Agentes_ComisionesDelta = '{A136E396-E02A-4776-BB9D-6C2AF7228D09}';
RID_ListaAnosObjetivosAlbDelta = '{FC0A5B37-290A-4872-93FD-EDA0FCCEC000}';
RID_AgentesDelta = '{A42667F1-F22B-4E4C-A840-C80695B7291C}';
RID_ClientesDescuentosArticulosDelta = '{49185AEC-BA8D-4CDE-9F02-1C02A34FEF09}';
RID_Agentes_Objetivos_albaranesDelta = '{1CF088C7-E0C8-4090-85A1-14A3838B781F}';
RID_Agentes_Objetivos_facturasDelta = '{B10C7599-1FB6-4CA6-AADF-0FFB60329EC9}';
RID_ListaAnosObjetivosFacDelta = '{01C5B570-6CCD-4680-B6C9-CFC0DB37A4DE}';
RID_ContactosDelta = '{0D14A3EF-8221-4271-BB6E-C28975FF9384}';
RID_GruposClienteDelta = '{A90F7994-1ABF-4A46-8CD2-1397FA5FA695}';
RID_DatosBancariosDelta = '{9137AF65-F02A-46E3-8E69-439A2138AEDA}';
RID_ClientesDelta = '{AE74F38D-EC62-478C-9009-91DFA765C1BA}';
RID_ProveedoresDelta = '{007E9A07-B1B7-449A-88D5-E230A1268906}';
RID_EmpleadosDelta = '{E44640BF-985F-493D-9681-A58B1E9C5048}';
RID_DireccionesContactoDelta = '{CD29AE32-0F09-43B0-BD60-0BABB4F28F91}';
RID_ClientesDescuentosDelta = '{95022EA1-5BE2-4708-BA5B-77536F57D331}';
RID_GruposProveedorDelta = '{0ABA7E39-36B3-44E2-B3E1-8BFF6D38B7CA}';
RID_GruposEmpleadoDelta = '{6BD3D176-0D39-439D-8782-8F79DC7C2C90}';
RID_Contactos_RefreshDelta = '{2FA063C0-9DCA-4BF6-A9A7-FD4D319ECF88}';
RID_ContratosEmpleadosDelta = '{D0F4C06F-1363-49E5-8094-158E6E33781A}';
RID_DescripcionesProveedoresDelta = '{30864B1C-279D-4203-95F3-38A1D42044E0}';
RID_PersonalContactoDelta = '{E60BCF43-0FAA-4EF1-BD68-0BC8328AE3A9}';
RID_Agentes_ComisionesDelta = '{A4522C74-DA90-4B25-9757-FC901C4297C0}';
RID_ListaAnosObjetivosAlbDelta = '{2D43A4A9-A60F-4847-90D8-506A9E438E8F}';
RID_AgentesDelta = '{B0FC98F6-07E3-4186-ACF7-4525A8B771C7}';
RID_ClientesDescuentosArticulosDelta = '{FC2F2307-6B92-4C15-BDC7-5A140CBF00F0}';
RID_Agentes_Objetivos_albaranesDelta = '{BF428235-7C8E-4ABB-B20A-4CAD58BD98EC}';
RID_Agentes_Objetivos_facturasDelta = '{BC496438-46AC-4530-83E8-558F3ACDFB57}';
RID_ListaAnosObjetivosFacDelta = '{292DE1F7-DE87-44ED-AB50-050BC49C8CB1}';
RID_TiposClienteDelta = '{FA885475-ECC3-45C8-BF6B-DBE4E19F6C00}';
type
{ IContactosDelta }
IContactosDelta = interface(IContactos)
['{924489BD-4BF1-490A-80E1-292384CDE36B}']
['{0D14A3EF-8221-4271-BB6E-C28975FF9384}']
{ Property getters and setters }
function GetOldIDValue : Integer;
function GetOldID_CATEGORIAValue : Integer;
@ -333,7 +334,7 @@ type
{ IGruposClienteDelta }
IGruposClienteDelta = interface(IGruposCliente)
['{00B6FC09-D8A1-4AF6-B6DF-2BCEF361091C}']
['{A90F7994-1ABF-4A46-8CD2-1397FA5FA695}']
{ Property getters and setters }
function GetOldIDValue : Integer;
function GetOldDESCRIPCIONValue : String;
@ -379,7 +380,7 @@ type
{ IDatosBancariosDelta }
IDatosBancariosDelta = interface(IDatosBancarios)
['{359B215D-847C-407A-9553-F0E7AE268DAE}']
['{9137AF65-F02A-46E3-8E69-439A2138AEDA}']
{ Property getters and setters }
function GetOldIDValue : Integer;
function GetOldID_CONTACTOValue : Integer;
@ -509,7 +510,7 @@ type
{ IClientesDelta }
IClientesDelta = interface(IClientes)
['{71CCE505-5A15-4B1E-A807-8DA7DFE6C36C}']
['{AE74F38D-EC62-478C-9009-91DFA765C1BA}']
{ Property getters and setters }
function GetOldIDValue : Integer;
function GetOldID_CATEGORIAValue : Integer;
@ -553,6 +554,7 @@ type
function GetOldCODIGO_ASIGNADOValue : String;
function GetOldDESCUENTOValue : Float;
function GetOldFELICITACIONValue : SmallInt;
function GetOldTIPO_CLIENTEValue : String;
{ Properties }
property OldID : Integer read GetOldIDValue;
@ -597,6 +599,7 @@ type
property OldCODIGO_ASIGNADO : String read GetOldCODIGO_ASIGNADOValue;
property OldDESCUENTO : Float read GetOldDESCUENTOValue;
property OldFELICITACION : SmallInt read GetOldFELICITACIONValue;
property OldTIPO_CLIENTE : String read GetOldTIPO_CLIENTEValue;
end;
{ TClientesBusinessProcessorRules }
@ -857,6 +860,12 @@ type
function GetOldFELICITACIONIsNull: Boolean; virtual;
procedure SetFELICITACIONValue(const aValue: SmallInt); virtual;
procedure SetFELICITACIONIsNull(const aValue: Boolean); virtual;
function GetTIPO_CLIENTEValue: String; virtual;
function GetTIPO_CLIENTEIsNull: Boolean; virtual;
function GetOldTIPO_CLIENTEValue: String; virtual;
function GetOldTIPO_CLIENTEIsNull: Boolean; virtual;
procedure SetTIPO_CLIENTEValue(const aValue: String); virtual;
procedure SetTIPO_CLIENTEIsNull(const aValue: Boolean); virtual;
{ Properties }
property ID : Integer read GetIDValue write SetIDValue;
@ -1027,6 +1036,10 @@ type
property FELICITACIONIsNull : Boolean read GetFELICITACIONIsNull write SetFELICITACIONIsNull;
property OldFELICITACION : SmallInt read GetOldFELICITACIONValue;
property OldFELICITACIONIsNull : Boolean read GetOldFELICITACIONIsNull;
property TIPO_CLIENTE : String read GetTIPO_CLIENTEValue write SetTIPO_CLIENTEValue;
property TIPO_CLIENTEIsNull : Boolean read GetTIPO_CLIENTEIsNull write SetTIPO_CLIENTEIsNull;
property OldTIPO_CLIENTE : String read GetOldTIPO_CLIENTEValue;
property OldTIPO_CLIENTEIsNull : Boolean read GetOldTIPO_CLIENTEIsNull;
public
constructor Create(aBusinessProcessor: TDABusinessProcessor); override;
@ -1036,7 +1049,7 @@ type
{ IProveedoresDelta }
IProveedoresDelta = interface(IProveedores)
['{F3854348-13E9-465B-9E6E-67EC43F26D2E}']
['{007E9A07-B1B7-449A-88D5-E230A1268906}']
{ Property getters and setters }
function GetOldIDValue : Integer;
function GetOldID_CATEGORIAValue : Integer;
@ -1527,7 +1540,7 @@ type
{ IEmpleadosDelta }
IEmpleadosDelta = interface(IEmpleados)
['{8A94BFD2-C61E-46A8-9620-CF7E1C97D7B5}']
['{E44640BF-985F-493D-9681-A58B1E9C5048}']
{ Property getters and setters }
function GetOldIDValue : Integer;
function GetOldID_CATEGORIAValue : Integer;
@ -1962,7 +1975,7 @@ type
{ IDireccionesContactoDelta }
IDireccionesContactoDelta = interface(IDireccionesContacto)
['{C480F508-E137-4093-8BF2-DF49EF2AB3DE}']
['{CD29AE32-0F09-43B0-BD60-0BABB4F28F91}']
{ Property getters and setters }
function GetOldIDValue : Integer;
function GetOldID_CONTACTOValue : Integer;
@ -2177,7 +2190,7 @@ type
{ IClientesDescuentosDelta }
IClientesDescuentosDelta = interface(IClientesDescuentos)
['{B4C0F049-8B81-4EFB-9E8E-592A72FE25A6}']
['{95022EA1-5BE2-4708-BA5B-77536F57D331}']
{ Property getters and setters }
function GetOldIDValue : Integer;
function GetOldID_CLIENTEValue : Integer;
@ -2259,7 +2272,7 @@ type
{ IGruposProveedorDelta }
IGruposProveedorDelta = interface(IGruposProveedor)
['{129AA285-FCCC-42C8-B31E-288EDB9500DA}']
['{0ABA7E39-36B3-44E2-B3E1-8BFF6D38B7CA}']
{ Property getters and setters }
function GetOldIDValue : Integer;
function GetOldDESCRIPCIONValue : String;
@ -2305,7 +2318,7 @@ type
{ IGruposEmpleadoDelta }
IGruposEmpleadoDelta = interface(IGruposEmpleado)
['{F6F9AD04-610E-4F13-AC1F-7ACDB1761FE8}']
['{6BD3D176-0D39-439D-8782-8F79DC7C2C90}']
{ Property getters and setters }
function GetOldIDValue : Integer;
function GetOldDESCRIPCIONValue : String;
@ -2351,7 +2364,7 @@ type
{ IContactos_RefreshDelta }
IContactos_RefreshDelta = interface(IContactos_Refresh)
['{755CB99F-48D6-47A3-B95B-0580F7586656}']
['{2FA063C0-9DCA-4BF6-A9A7-FD4D319ECF88}']
{ Property getters and setters }
function GetOldIDValue : Integer;
function GetOldNIF_CIFValue : String;
@ -2626,7 +2639,7 @@ type
{ IContratosEmpleadosDelta }
IContratosEmpleadosDelta = interface(IContratosEmpleados)
['{7E590734-DDA2-4025-ACC6-0F16255B130A}']
['{D0F4C06F-1363-49E5-8094-158E6E33781A}']
{ Property getters and setters }
function GetOldCONTRATOValue : String;
@ -2660,7 +2673,7 @@ type
{ IDescripcionesProveedoresDelta }
IDescripcionesProveedoresDelta = interface(IDescripcionesProveedores)
['{57434ABA-AADE-4CD2-930E-6309C476941F}']
['{30864B1C-279D-4203-95F3-38A1D42044E0}']
{ Property getters and setters }
function GetOldDESCRIPCION_PROVEEDORValue : String;
@ -2694,7 +2707,7 @@ type
{ IPersonalContactoDelta }
IPersonalContactoDelta = interface(IPersonalContacto)
['{8B6FE0F0-8635-483F-8FCC-0D386BF286DD}']
['{E60BCF43-0FAA-4EF1-BD68-0BC8328AE3A9}']
{ Property getters and setters }
function GetOldIDValue : Integer;
function GetOldID_CONTACTOValue : Integer;
@ -2836,7 +2849,7 @@ type
{ IAgentes_ComisionesDelta }
IAgentes_ComisionesDelta = interface(IAgentes_Comisiones)
['{A136E396-E02A-4776-BB9D-6C2AF7228D09}']
['{A4522C74-DA90-4B25-9757-FC901C4297C0}']
{ Property getters and setters }
function GetOldIDValue : Integer;
function GetOldID_AGENTEValue : Integer;
@ -2918,7 +2931,7 @@ type
{ IListaAnosObjetivosAlbDelta }
IListaAnosObjetivosAlbDelta = interface(IListaAnosObjetivosAlb)
['{FC0A5B37-290A-4872-93FD-EDA0FCCEC000}']
['{2D43A4A9-A60F-4847-90D8-506A9E438E8F}']
{ Property getters and setters }
function GetOldANOValue : SmallInt;
@ -2952,7 +2965,7 @@ type
{ IAgentesDelta }
IAgentesDelta = interface(IAgentes)
['{A42667F1-F22B-4E4C-A840-C80695B7291C}']
['{B0FC98F6-07E3-4186-ACF7-4525A8B771C7}']
{ Property getters and setters }
function GetOldIDValue : Integer;
function GetOldID_CATEGORIAValue : Integer;
@ -3287,7 +3300,7 @@ type
{ IClientesDescuentosArticulosDelta }
IClientesDescuentosArticulosDelta = interface(IClientesDescuentosArticulos)
['{49185AEC-BA8D-4CDE-9F02-1C02A34FEF09}']
['{FC2F2307-6B92-4C15-BDC7-5A140CBF00F0}']
{ Property getters and setters }
function GetOldIDValue : Integer;
function GetOldID_CLIENTEValue : Integer;
@ -3417,7 +3430,7 @@ type
{ IAgentes_Objetivos_albaranesDelta }
IAgentes_Objetivos_albaranesDelta = interface(IAgentes_Objetivos_albaranes)
['{1CF088C7-E0C8-4090-85A1-14A3838B781F}']
['{BF428235-7C8E-4ABB-B20A-4CAD58BD98EC}']
{ Property getters and setters }
function GetOldIDValue : Integer;
function GetOldID_AGENTEValue : Integer;
@ -3523,7 +3536,7 @@ type
{ IAgentes_Objetivos_facturasDelta }
IAgentes_Objetivos_facturasDelta = interface(IAgentes_Objetivos_facturas)
['{B10C7599-1FB6-4CA6-AADF-0FFB60329EC9}']
['{BC496438-46AC-4530-83E8-558F3ACDFB57}']
{ Property getters and setters }
function GetOldIDValue : Integer;
function GetOldID_AGENTEValue : Integer;
@ -3629,7 +3642,7 @@ type
{ IListaAnosObjetivosFacDelta }
IListaAnosObjetivosFacDelta = interface(IListaAnosObjetivosFac)
['{01C5B570-6CCD-4680-B6C9-CFC0DB37A4DE}']
['{292DE1F7-DE87-44ED-AB50-050BC49C8CB1}']
{ Property getters and setters }
function GetOldANOValue : SmallInt;
@ -3661,6 +3674,52 @@ type
end;
{ ITiposClienteDelta }
ITiposClienteDelta = interface(ITiposCliente)
['{FA885475-ECC3-45C8-BF6B-DBE4E19F6C00}']
{ Property getters and setters }
function GetOldIDValue : Integer;
function GetOldDESCRIPCIONValue : String;
{ Properties }
property OldID : Integer read GetOldIDValue;
property OldDESCRIPCION : String read GetOldDESCRIPCIONValue;
end;
{ TTiposClienteBusinessProcessorRules }
TTiposClienteBusinessProcessorRules = class(TDABusinessProcessorRules, ITiposCliente, ITiposClienteDelta)
private
protected
{ Property getters and setters }
function GetIDValue: Integer; virtual;
function GetIDIsNull: Boolean; virtual;
function GetOldIDValue: Integer; virtual;
function GetOldIDIsNull: Boolean; virtual;
procedure SetIDValue(const aValue: Integer); virtual;
procedure SetIDIsNull(const aValue: Boolean); virtual;
function GetDESCRIPCIONValue: String; virtual;
function GetDESCRIPCIONIsNull: Boolean; virtual;
function GetOldDESCRIPCIONValue: String; virtual;
function GetOldDESCRIPCIONIsNull: Boolean; virtual;
procedure SetDESCRIPCIONValue(const aValue: String); virtual;
procedure SetDESCRIPCIONIsNull(const aValue: Boolean); virtual;
{ Properties }
property ID : Integer read GetIDValue write SetIDValue;
property IDIsNull : Boolean read GetIDIsNull write SetIDIsNull;
property OldID : Integer read GetOldIDValue;
property OldIDIsNull : Boolean read GetOldIDIsNull;
property DESCRIPCION : String read GetDESCRIPCIONValue write SetDESCRIPCIONValue;
property DESCRIPCIONIsNull : Boolean read GetDESCRIPCIONIsNull write SetDESCRIPCIONIsNull;
property OldDESCRIPCION : String read GetOldDESCRIPCIONValue;
property OldDESCRIPCIONIsNull : Boolean read GetOldDESCRIPCIONIsNull;
public
constructor Create(aBusinessProcessor: TDABusinessProcessor); override;
destructor Destroy; override;
end;
implementation
uses
@ -6085,6 +6144,37 @@ begin
BusinessProcessor.CurrentChange.NewValueByName[fld_ClientesFELICITACION] := Null;
end;
function TClientesBusinessProcessorRules.GetTIPO_CLIENTEValue: String;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_ClientesTIPO_CLIENTE];
end;
function TClientesBusinessProcessorRules.GetTIPO_CLIENTEIsNull: Boolean;
begin
result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_ClientesTIPO_CLIENTE]);
end;
function TClientesBusinessProcessorRules.GetOldTIPO_CLIENTEValue: String;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_ClientesTIPO_CLIENTE];
end;
function TClientesBusinessProcessorRules.GetOldTIPO_CLIENTEIsNull: Boolean;
begin
result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_ClientesTIPO_CLIENTE]);
end;
procedure TClientesBusinessProcessorRules.SetTIPO_CLIENTEValue(const aValue: String);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_ClientesTIPO_CLIENTE] := aValue;
end;
procedure TClientesBusinessProcessorRules.SetTIPO_CLIENTEIsNull(const aValue: Boolean);
begin
if aValue then
BusinessProcessor.CurrentChange.NewValueByName[fld_ClientesTIPO_CLIENTE] := Null;
end;
{ TProveedoresBusinessProcessorRules }
constructor TProveedoresBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);
@ -12151,6 +12241,80 @@ begin
end;
{ TTiposClienteBusinessProcessorRules }
constructor TTiposClienteBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);
begin
inherited;
end;
destructor TTiposClienteBusinessProcessorRules.Destroy;
begin
inherited;
end;
function TTiposClienteBusinessProcessorRules.GetIDValue: Integer;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_TiposClienteID];
end;
function TTiposClienteBusinessProcessorRules.GetIDIsNull: Boolean;
begin
result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_TiposClienteID]);
end;
function TTiposClienteBusinessProcessorRules.GetOldIDValue: Integer;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_TiposClienteID];
end;
function TTiposClienteBusinessProcessorRules.GetOldIDIsNull: Boolean;
begin
result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_TiposClienteID]);
end;
procedure TTiposClienteBusinessProcessorRules.SetIDValue(const aValue: Integer);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_TiposClienteID] := aValue;
end;
procedure TTiposClienteBusinessProcessorRules.SetIDIsNull(const aValue: Boolean);
begin
if aValue then
BusinessProcessor.CurrentChange.NewValueByName[fld_TiposClienteID] := Null;
end;
function TTiposClienteBusinessProcessorRules.GetDESCRIPCIONValue: String;
begin
result := BusinessProcessor.CurrentChange.NewValueByName[fld_TiposClienteDESCRIPCION];
end;
function TTiposClienteBusinessProcessorRules.GetDESCRIPCIONIsNull: Boolean;
begin
result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_TiposClienteDESCRIPCION]);
end;
function TTiposClienteBusinessProcessorRules.GetOldDESCRIPCIONValue: String;
begin
result := BusinessProcessor.CurrentChange.OldValueByName[fld_TiposClienteDESCRIPCION];
end;
function TTiposClienteBusinessProcessorRules.GetOldDESCRIPCIONIsNull: Boolean;
begin
result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_TiposClienteDESCRIPCION]);
end;
procedure TTiposClienteBusinessProcessorRules.SetDESCRIPCIONValue(const aValue: String);
begin
BusinessProcessor.CurrentChange.NewValueByName[fld_TiposClienteDESCRIPCION] := aValue;
end;
procedure TTiposClienteBusinessProcessorRules.SetDESCRIPCIONIsNull(const aValue: Boolean);
begin
if aValue then
BusinessProcessor.CurrentChange.NewValueByName[fld_TiposClienteDESCRIPCION] := Null;
end;
initialization
RegisterBusinessProcessorRules(RID_ContactosDelta, TContactosBusinessProcessorRules);
RegisterBusinessProcessorRules(RID_GruposClienteDelta, TGruposClienteBusinessProcessorRules);
@ -12173,5 +12337,6 @@ initialization
RegisterBusinessProcessorRules(RID_Agentes_Objetivos_albaranesDelta, TAgentes_Objetivos_albaranesBusinessProcessorRules);
RegisterBusinessProcessorRules(RID_Agentes_Objetivos_facturasDelta, TAgentes_Objetivos_facturasBusinessProcessorRules);
RegisterBusinessProcessorRules(RID_ListaAnosObjetivosFacDelta, TListaAnosObjetivosFacBusinessProcessorRules);
RegisterBusinessProcessorRules(RID_TiposClienteDelta, TTiposClienteBusinessProcessorRules);
end.

View File

@ -56,6 +56,9 @@ type
function GetGRUPO_CLIENTEValue: String;
procedure SetGRUPO_CLIENTEValue(const aValue: String);
function GetTIPO_CLIENTEValue: String;
procedure SetTIPO_CLIENTEValue(const aValue: String);
function GetNOMBRE_COMERCIALValue: String;
procedure SetNOMBRE_COMERCIALValue(const aValue: String);
@ -107,6 +110,7 @@ type
procedure SetEMAIL_ADMINISTRACIONValue(const aValue: String);
property GRUPO_CLIENTE: String read GetGRUPO_CLIENTEValue write SetGRUPO_CLIENTEValue;
property TIPO_CLIENTE: String read GetTIPO_CLIENTEValue write SetTIPO_CLIENTEValue;
property NOMBRE_COMERCIAL: String read GetNOMBRE_COMERCIALValue write SetNOMBRE_COMERCIALValue;
property VENCIMIENTO_FACTURAS_1: Smallint read GetVENCIMIENTO_FACTURAS_1Value write SetVENCIMIENTO_FACTURAS_1Value;
property VENCIMIENTO_FACTURAS_2: Smallint read GetVENCIMIENTO_FACTURAS_2Value write SetVENCIMIENTO_FACTURAS_2Value;
@ -307,6 +311,9 @@ type
function GetGRUPO_CLIENTEValue: String;
procedure SetGRUPO_CLIENTEValue(const aValue: String);
function GetTIPO_CLIENTEValue: String;
procedure SetTIPO_CLIENTEValue(const aValue: String);
function GetNOMBRE_COMERCIALValue: String;
procedure SetNOMBRE_COMERCIALValue(const aValue: String);
@ -362,6 +369,7 @@ type
property Descuentos: IBizClienteDescuentos read GetDescuentos write SetDescuentos;
property DescuentosArt: IBizClienteDescuentosArticulos read GetDescuentosArt write SetDescuentosArt;
property GRUPO_CLIENTE: String read GetGRUPO_CLIENTEValue write SetGRUPO_CLIENTEValue;
property TIPO_CLIENTE: String read GetTIPO_CLIENTEValue write SetTIPO_CLIENTEValue;
property NOMBRE_COMERCIAL: String read GetNOMBRE_COMERCIALValue write SetNOMBRE_COMERCIALValue;
property VENCIMIENTO_FACTURAS_1: Smallint read GetVENCIMIENTO_FACTURAS_1Value write SetVENCIMIENTO_FACTURAS_1Value;
property VENCIMIENTO_FACTURAS_2: Smallint read GetVENCIMIENTO_FACTURAS_2Value write SetVENCIMIENTO_FACTURAS_2Value;
@ -769,6 +777,11 @@ begin
result := DataTable.Fields[idx_ClientesTIENDA_WEB].AsInteger;
end;
function TBizCliente.GetTIPO_CLIENTEValue: String;
begin
result := DataTable.Fields[idx_ClientesTIPO_CLIENTE].AsString;
end;
function TBizCliente.GetVENCIMIENTO_FACTURAS_1Value: SmallInt;
begin
result := DataTable.Fields[idx_ClientesVENCIMIENTO_FACTURAS_1].AsSmallInt;
@ -799,6 +812,11 @@ begin
DataTable.Fields[idx_ClientesTIENDA_WEB].AsInteger := aValue;
end;
procedure TBizCliente.SetTIPO_CLIENTEValue(const aValue: String);
begin
DataTable.Fields[idx_ClientesTIPO_CLIENTE].AsString := aValue;
end;
procedure TBizCliente.SetVENCIMIENTO_FACTURAS_1Value(const aValue: SmallInt);
begin
DataTable.Fields[idx_ClientesVENCIMIENTO_FACTURAS_1].AsSmallInt := aValue;

View File

@ -0,0 +1,37 @@
unit uBizTiposCliente;
interface
uses
uDAInterfaces, uDADataTable, schContactosClient_Intf;
const
BIZ_CLIENT_TIPOSCLIENTE = 'Client.TipoCliente';
type
IBizTipoCliente = interface(ITiposCliente)
['{E9966A2D-CFBC-49D0-8C3B-ADCE1604C942}']
end;
TBizTipoCliente = class(TTiposClienteDataTableRules, IBizTipoCliente)
protected
procedure AfterOpen(Sender: TDADataTable); override;
end;
implementation
{ TBizGrupoCliente }
procedure TBizTipoCliente.AfterOpen(Sender: TDADataTable);
begin
inherited;
DataTable.Sort([fld_TiposClienteDESCRIPCION], [sdAscending]);
end;
initialization
RegisterDataTableRules(BIZ_CLIENT_TIPOSCLIENTE, TBizTipoCliente);
finalization
end.

View File

@ -261,6 +261,11 @@ object PluginContactos: TPluginContactos
OnExecute = actAgentesExecute
OnUpdate = actAgentesUpdate
end
object actTiposCliente: TAction
Caption = 'Tipos de Cliente'
ImageIndex = 5
OnExecute = actTiposClienteExecute
end
end
object MainMenu: TMainMenu
Images = SmallImages
@ -291,6 +296,9 @@ object PluginContactos: TPluginContactos
Tag = 102
Action = actGruposCliente
end
object actTiposCliente1: TMenuItem
Action = actTiposCliente
end
end
object Compras1: TMenuItem
Caption = '&Compras'

View File

@ -35,6 +35,8 @@ type
Empresa1: TMenuItem;
actAgentes: TAction;
Agentes1: TMenuItem;
actTiposCliente: TAction;
actTiposCliente1: TMenuItem;
procedure actClientesExecute(Sender: TObject);
procedure actProveedoresExecute(Sender: TObject);
procedure actEmpleadosExecute(Sender: TObject);
@ -44,6 +46,7 @@ type
procedure actEmpleadosUpdate(Sender: TObject);
procedure actAgentesExecute(Sender: TObject);
procedure actAgentesUpdate(Sender: TObject);
procedure actTiposClienteExecute(Sender: TObject);
public
constructor Create(AOwner: TComponent); override;
destructor Destroy; override;
@ -56,9 +59,9 @@ implementation
uses
Forms, Dialogs, uGUIBase, uCustomEditor, SysUtils, uContactosController,
uClientesController, uProveedoresController, uEmpleadosController, uAgentesController,
uGruposClienteController, uBizGruposCliente, uGruposProveedorController,
uBizGruposProveedor, uGruposEmpleadoController, uBizGruposEmpleado,
uContactosViewRegister, uBizContactos, uFactuGES_App;
uGruposClienteController, uTiposClienteController, uBizGruposCliente, uBizTiposCliente,
uGruposProveedorController, uBizGruposProveedor, uGruposEmpleadoController,
uBizGruposEmpleado, uContactosViewRegister, uBizContactos, uFactuGES_App;
function GetModule : TModuleController;
begin
@ -141,6 +144,16 @@ begin
AProveedoresController.VerTodos(AProveedores);
end;
procedure TPluginContactos.actTiposClienteExecute(Sender: TObject);
var
ATipoClienteController : ITiposClienteController;
ATiposCliente : IBizTipoCliente;
begin
ATipoClienteController := TTiposClienteController.Create;
ATiposCliente := (ATipoClienteController.BuscarTodos as IBizTipoCliente);
ATipoClienteController.VerTodos(ATiposCliente);
end;
procedure TPluginContactos.actEmpleadosExecute(Sender: TObject);
var
AEmpleadosController : IEmpleadosController;

View File

@ -559,6 +559,10 @@ object srvContactos: TsrvContactos
item
DatasetField = 'EMAIL_ADMINISTRACION'
TableField = 'EMAIL_ADMINISTRACION'
end
item
DatasetField = 'TIPO_CLIENTE'
TableField = 'TIPO_CLIENTE'
end>
end>
Name = 'Clientes'
@ -790,6 +794,11 @@ object srvContactos: TsrvContactos
Name = 'FELICITACION'
DataType = datSmallInt
DictionaryEntry = 'Clientes_FELICITACION'
end
item
Name = 'TIPO_CLIENTE'
DataType = datString
Size = 255
end>
end
item
@ -2866,6 +2875,39 @@ object srvContactos: TsrvContactos
Name = 'ANO'
DataType = datSmallInt
end>
end
item
Params = <>
Statements = <
item
Connection = 'IBX'
TargetTable = 'CLIENTES_TIPOS'
StatementType = stAutoSQL
ColumnMappings = <
item
DatasetField = 'ID'
TableField = 'ID'
end
item
DatasetField = 'DESCRIPCION'
TableField = 'DESCRIPCION'
end>
end>
Name = 'TiposCliente'
Fields = <
item
Name = 'ID'
DataType = datAutoInc
GeneratorName = 'GEN_CLIENTES_TIPOS_ID'
DictionaryEntry = 'TiposCliente_ID'
InPrimaryKey = True
end
item
Name = 'DESCRIPCION'
DataType = datString
Size = 255
DictionaryEntry = 'TiposCliente_DESCRIPCION'
end>
end>
JoinDataTables = <>
UnionDataTables = <>
@ -3610,6 +3652,12 @@ object srvContactos: TsrvContactos
Name = 'FELICITACION'
DataType = datSmallInt
Value = ''
end
item
Name = 'TIPO_CLIENTE'
DataType = datString
Size = 255
Value = ''
end>
Statements = <
item
@ -3621,13 +3669,13 @@ object srvContactos: TsrvContactos
'UEO, REGIMEN_IVA, ID_TIPO_IVA, ID_FORMA_PAGO,'#10' TIENDA_WEB, C' +
'ODIGO_ASIGNADO, DESCUENTO, RAPEL, ID_AGENTE, EMAIL_ADMINISTRACIO' +
'N,'#10' VENCIMIENTO_FACTURAS_1, VENCIMIENTO_FACTURAS_2, VENCIMIE' +
'NTO_FACTURAS_3,'#10' FELICITACION)'#10' VALUES'#10' (:ID_CLIENTE, :G' +
'RUPO_CLIENTE, :RECARGO_EQUIVALENCIA, :NOMBRE_COMERCIAL,'#10' :BL' +
'OQUEADO, :MOTIVO_BLOQUEO, :REGIMEN_IVA, :ID_TIPO_IVA, :ID_FORMA_' +
'PAGO,'#10' :TIENDA_WEB, :CODIGO_ASIGNADO, :DESCUENTO, :RAPEL, :I' +
'D_AGENTE, :EMAIL_ADMINISTRACION,'#10' :VENCIMIENTO_FACTURAS_1, :' +
'VENCIMIENTO_FACTURAS_2, :VENCIMIENTO_FACTURAS_3,'#10' :FELICITAC' +
'ION)'#10' '#10#10
'NTO_FACTURAS_3,'#10' FELICITACION, TIPO_CLIENTE)'#10' VALUES'#10' (:' +
'ID_CLIENTE, :GRUPO_CLIENTE, :RECARGO_EQUIVALENCIA, :NOMBRE_COMER' +
'CIAL,'#10' :BLOQUEADO, :MOTIVO_BLOQUEO, :REGIMEN_IVA, :ID_TIPO_I' +
'VA, :ID_FORMA_PAGO,'#10' :TIENDA_WEB, :CODIGO_ASIGNADO, :DESCUEN' +
'TO, :RAPEL, :ID_AGENTE, :EMAIL_ADMINISTRACION,'#10' :VENCIMIENTO' +
'_FACTURAS_1, :VENCIMIENTO_FACTURAS_2, :VENCIMIENTO_FACTURAS_3,'#10' ' +
' :FELICITACION, :TIPO_CLIENTE)'#10' '#10#10
StatementType = stSQL
ColumnMappings = <>
end>
@ -3756,6 +3804,12 @@ object srvContactos: TsrvContactos
DataType = datSmallInt
Value = ''
end
item
Name = 'TIPO_CLIENTE'
DataType = datString
Size = 255
Value = ''
end
item
Name = 'OLD_ID_CLIENTE'
Value = ''
@ -3776,8 +3830,8 @@ object srvContactos: TsrvContactos
'MINISTRACION = :EMAIL_ADMINISTRACION,'#10' VENCIMIENTO_FACTURAS_1' +
' = :VENCIMIENTO_FACTURAS_1,'#10' VENCIMIENTO_FACTURAS_2 = :VENCIM' +
'IENTO_FACTURAS_2,'#10' VENCIMIENTO_FACTURAS_3 = :VENCIMIENTO_FACT' +
'URAS_3,'#10' FELICITACION = :FELICITACION'#10' WHERE'#10' (ID_CLIENTE' +
' = :OLD_ID_CLIENTE)'#10
'URAS_3,'#10' FELICITACION = :FELICITACION,'#10' TIPO_CLIENTE = :TI' +
'PO_CLIENTE'#10' WHERE'#10' (ID_CLIENTE = :OLD_ID_CLIENTE)'#10
StatementType = stSQL
ColumnMappings = <>
end>
@ -6284,6 +6338,18 @@ object srvContactos: TsrvContactos
item
Name = 'Agentes_Objetivos_facturas_IMPORTE_OBJETIVO'
DataType = datCurrency
end
item
Name = 'TiposCliente_ID'
DataType = datAutoInc
GeneratorName = 'GEN_CLIENTES_TIPOS_ID'
Required = True
DisplayLabel = 'ID'
end
item
Name = 'TiposCliente_DESCRIPCION'
DataType = datString
Size = 255
end>
Left = 126
Top = 14

View File

@ -133,6 +133,7 @@ contains
uViewClienteDescuentosArticulos in 'uViewClienteDescuentosArticulos.pas' {frViewClienteDescuentosArticulos: TFrame},
uEditorElegirAgentes in 'uEditorElegirAgentes.pas' {fEditorElegirAgentes: TCustomEditor},
uViewAgenteObjetivosAlbaranes in 'uViewAgenteObjetivosAlbaranes.pas' {frViewAgenteObjetivosAlbaranes: TFrame},
uViewAgenteObjetivosFacturas in 'uViewAgenteObjetivosFacturas.pas' {frViewAgenteObjetivosFacturas: TFrame};
uViewAgenteObjetivosFacturas in 'uViewAgenteObjetivosFacturas.pas' {frViewAgenteObjetivosFacturas: TFrame},
uEditorTiposCliente in 'uEditorTiposCliente.pas' {fEditorTiposCliente: TCustomEditor};
end.

View File

@ -49,65 +49,58 @@
<DelphiCompile Include="Contactos_view.dpk">
<MainSource>MainSource</MainSource>
</DelphiCompile>
<DCCReference Include="..\adortl.dcp" />
<DCCReference Include="..\ApplicationBase.dcp" />
<DCCReference Include="..\Articulos_controller.dcp" />
<DCCReference Include="..\Base.dcp" />
<DCCReference Include="..\bdertl.dcp" />
<DCCReference Include="..\ccpackD11.dcp" />
<DCCReference Include="..\cfpack_d11.dcp" />
<DCCReference Include="..\Contactos_controller.dcp" />
<DCCReference Include="..\Contactos_model.dcp" />
<DCCReference Include="..\cxDataD11.dcp" />
<DCCReference Include="..\cxEditorsD11.dcp" />
<DCCReference Include="..\cxExportD11.dcp" />
<DCCReference Include="..\cxExtEditorsD11.dcp" />
<DCCReference Include="..\cxGridD11.dcp" />
<DCCReference Include="..\cxLibraryD11.dcp" />
<DCCReference Include="..\cxPageControlD11.dcp" />
<DCCReference Include="..\DataAbstract_Core_D11.dcp" />
<DCCReference Include="..\dbrtl.dcp" />
<DCCReference Include="..\dclcxLibraryD11.dcp" />
<DCCReference Include="..\designide.dcp" />
<DCCReference Include="..\dsnap.dcp" />
<DCCReference Include="..\dxComnD11.dcp" />
<DCCReference Include="..\dxCoreD11.dcp" />
<DCCReference Include="..\dxGDIPlusD11.dcp" />
<DCCReference Include="..\dxLayoutControlD11.dcp" />
<DCCReference Include="..\dxPSCoreD11.dcp" />
<DCCReference Include="..\dxPScxCommonD11.dcp" />
<DCCReference Include="..\dxPScxGrid6LnkD11.dcp" />
<DCCReference Include="..\dxPSLnksD11.dcp" />
<DCCReference Include="..\dxThemeD11.dcp" />
<DCCReference Include="..\FormasPago_controller.dcp" />
<DCCReference Include="..\FormasPago_model.dcp" />
<DCCReference Include="..\GUIBase.dcp" />
<DCCReference Include="..\GUISDK_D11R.dcp" />
<DCCReference Include="..\Jcl.dcp" />
<DCCReference Include="..\JclVcl.dcp" />
<DCCReference Include="..\JSDialog100.dcp" />
<DCCReference Include="..\JvAppFrmD11R.dcp" />
<DCCReference Include="..\JvCoreD11R.dcp" />
<DCCReference Include="..\JvCtrlsD11R.dcp" />
<DCCReference Include="..\JvGlobusD11R.dcp" />
<DCCReference Include="..\JvPageCompsD11R.dcp" />
<DCCReference Include="..\JvStdCtrlsD11R.dcp" />
<DCCReference Include="..\JvSystemD11R.dcp" />
<DCCReference Include="..\PngComponentsD10.dcp" />
<DCCReference Include="..\PNG_D10.dcp" />
<DCCReference Include="..\RemObjects_Core_D11.dcp" />
<DCCReference Include="..\rtl.dcp" />
<DCCReference Include="..\tb2k_d10.dcp" />
<DCCReference Include="..\tbx_d10.dcp" />
<DCCReference Include="..\TiposIVA_controller.dcp" />
<DCCReference Include="..\TiposIVA_model.dcp" />
<DCCReference Include="..\vcl.dcp" />
<DCCReference Include="..\vclactnband.dcp" />
<DCCReference Include="..\vcldb.dcp" />
<DCCReference Include="..\vcljpg.dcp" />
<DCCReference Include="..\vclshlctrls.dcp" />
<DCCReference Include="..\vclx.dcp" />
<DCCReference Include="..\xmlrtl.dcp" />
<DCCReference Include="adortl.dcp" />
<DCCReference Include="ApplicationBase.dcp" />
<DCCReference Include="Articulos_controller.dcp" />
<DCCReference Include="Base.dcp" />
<DCCReference Include="bdertl.dcp" />
<DCCReference Include="ccpackD11.dcp" />
<DCCReference Include="cfpack_d11.dcp" />
<DCCReference Include="Contactos_controller.dcp" />
<DCCReference Include="Contactos_model.dcp" />
<DCCReference Include="cxDataD11.dcp" />
<DCCReference Include="cxEditorsD11.dcp" />
<DCCReference Include="cxExportD11.dcp" />
<DCCReference Include="cxExtEditorsD11.dcp" />
<DCCReference Include="cxGridD11.dcp" />
<DCCReference Include="cxLibraryD11.dcp" />
<DCCReference Include="cxPageControlD11.dcp" />
<DCCReference Include="DataAbstract_Core_D11.dcp" />
<DCCReference Include="dbrtl.dcp" />
<DCCReference Include="dclcxLibraryD11.dcp" />
<DCCReference Include="designide.dcp" />
<DCCReference Include="dsnap.dcp" />
<DCCReference Include="dxComnD11.dcp" />
<DCCReference Include="dxCoreD11.dcp" />
<DCCReference Include="dxGDIPlusD11.dcp" />
<DCCReference Include="dxLayoutControlD11.dcp" />
<DCCReference Include="dxPSCoreD11.dcp" />
<DCCReference Include="dxPScxCommonD11.dcp" />
<DCCReference Include="dxPScxGrid6LnkD11.dcp" />
<DCCReference Include="dxPSLnksD11.dcp" />
<DCCReference Include="dxThemeD11.dcp" />
<DCCReference Include="FormasPago_controller.dcp" />
<DCCReference Include="FormasPago_model.dcp" />
<DCCReference Include="GUIBase.dcp" />
<DCCReference Include="GUISDK_D11R.dcp" />
<DCCReference Include="Jcl.dcp" />
<DCCReference Include="JclVcl.dcp" />
<DCCReference Include="JSDialog100.dcp" />
<DCCReference Include="JvAppFrmD11R.dcp" />
<DCCReference Include="JvCoreD11R.dcp" />
<DCCReference Include="JvCtrlsD11R.dcp" />
<DCCReference Include="JvGlobusD11R.dcp" />
<DCCReference Include="JvPageCompsD11R.dcp" />
<DCCReference Include="JvStdCtrlsD11R.dcp" />
<DCCReference Include="JvSystemD11R.dcp" />
<DCCReference Include="PngComponentsD10.dcp" />
<DCCReference Include="PNG_D10.dcp" />
<DCCReference Include="RemObjects_Core_D11.dcp" />
<DCCReference Include="rtl.dcp" />
<DCCReference Include="tb2k_d10.dcp" />
<DCCReference Include="tbx_d10.dcp" />
<DCCReference Include="TiposIVA_controller.dcp" />
<DCCReference Include="TiposIVA_model.dcp" />
<DCCReference Include="uContactosViewRegister.pas" />
<DCCReference Include="uEditorAgente.pas">
<Form>fEditorAgente</Form>
@ -200,6 +193,10 @@
<Form>fEditorProveedores</Form>
<DesignClass>TCustomEditor</DesignClass>
</DCCReference>
<DCCReference Include="uEditorTiposCliente.pas">
<Form>fEditorEmpleado</Form>
<DesignClass>TCustomEditor</DesignClass>
</DCCReference>
<DCCReference Include="uViewAgente.pas">
<Form>frViewAgente</Form>
<DesignClass>TFrame</DesignClass>
@ -296,6 +293,13 @@
<Form>frViewProveedores</Form>
<DesignClass>TCustomView</DesignClass>
</DCCReference>
<DCCReference Include="vcl.dcp" />
<DCCReference Include="vclactnband.dcp" />
<DCCReference Include="vcldb.dcp" />
<DCCReference Include="vcljpg.dcp" />
<DCCReference Include="vclshlctrls.dcp" />
<DCCReference Include="vclx.dcp" />
<DCCReference Include="xmlrtl.dcp" />
</ItemGroup>
</Project>
<!-- EurekaLog First Line

Some files were not shown because too many files have changed in this diff Show More