Archivado/LuisLeon_FactuGES2
Archived
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
This repository has been archived on 2024-11-28. You can view files and clone it, but cannot push or open issues or pull requests.
5fd0fb032a
LuisLeon_FactuGES2/Source/Modulos/Albaranes de cliente/Reports/uRptAlbaranesCliente_Server.dfm
roberto 2a173f5d30 Version 4.1.6: 
Ultima parte de informes estadisticos de albaranes de cliente
    * Errores #530: Hacer referencia en informes de albarán más ancho para que no coja 2 renglones
    * Errores #531: Que en albaranes no salga ni forma de pago ni nombre de banco
    * Errores #536: Arreglar filtro para que cuando un elemento de la lista cambie de situación no pete
    * Errores #568: El informe de factura de cliente de keibler cuando tiene muchos pagos queda mal (repasarlo)



git-svn-id: https://192.168.0.254/svn/Proyectos.LuisLeon_FactuGES2/trunk@128 b2cfbe5a-eba1-4a0c-8b32-7feea0a119f2
2011-04-11 14:53:34 +00:00

3114 lines
101 KiB
Plaintext
Raw Blame History

object RptAlbaranesCliente: TRptAlbaranesCliente
OldCreateOrder = True
OnCreate = DataModuleCreate
OnDestroy = DataModuleDestroy
Height = 636
Width = 925
object DADSCabecera: TDADataSource
DataSet = tbl_Cabecera.Dataset
DataTable = tbl_Cabecera
Left = 264
Top = 72
end
object DADSDetalles: TDADataSource
DataSet = tbl_Detalles.Dataset
DataTable = tbl_Detalles
Left = 344
Top = 72
end
object frxRichObject1: TfrxRichObject
Left = 280
Top = 360
end
object frxBarCodeObject1: TfrxBarCodeObject
Left = 344
Top = 360
end
object frxOLEObject1: TfrxOLEObject
Left = 280
Top = 408
end
object frxCrossObject1: TfrxCrossObject
Left = 344
Top = 408
end
object frxCheckBoxObject1: TfrxCheckBoxObject
Left = 280
Top = 256
end
object frxGradientObject1: TfrxGradientObject
Left = 344
Top = 256
end
object frxChartObject1: TfrxChartObject
Left = 280
Top = 304
end
object schReport: TDASchema
ConnectionManager = dmServer.ConnectionManager
Datasets = <
item
Params = <
item
Name = 'ID_EMPRESA1'
Value = ''
end
item
Name = 'ANO1'
Value = ''
end
item
Name = 'ID_EMPRESA2'
Value = ''
end
item
Name = 'ANO2'
Value = ''
end>
Statements = <
item
Connection = 'IBX'
ConnectionType = 'Interbase'
Default = True
Name = 'IBX'
SQL =
'select VALOR, DESCRIPCION, periodo1.ANO as Ano1,'#10'periodo1.PENDIE' +
'NTES as PENDIENTES_ANO1, periodo1.ENVIADOS as ENVIADOS_ANO1, per' +
'iodo1.SERVIDOS as SERVIDOS_ANO1,'#10#10'periodo1.INCIDENCIAS as INCIDE' +
'NCIAS_ANO1,'#10'case'#10'when ((periodo1.PENDIENTES + periodo1.ENVIADOS ' +
'+ periodo1.SERVIDOS) = 0) then (100 - (coalesce(periodo1.INCIDEN' +
'CIAS, 0)*100))'#10'else (coalesce(periodo1.INCIDENCIAS, 0)*100)/(per' +
'iodo1.PENDIENTES + periodo1.ENVIADOS + periodo1.SERVIDOS)'#10'end as' +
' Porcentaje_Incidencias_ANO1,'#10#10'periodo1.PASADOS_FECHA_PREVISTA a' +
's PASADOS_FECHA_PREVISTA_ANO1,'#10'case'#10'when ((periodo1.PENDIENTES +' +
' periodo1.ENVIADOS + periodo1.SERVIDOS) = 0) then (100 - (coales' +
'ce(periodo1.PASADOS_FECHA_PREVISTA, 0)*100))'#10'else (coalesce(peri' +
'odo1.PASADOS_FECHA_PREVISTA, 0)*100)/(periodo1.PENDIENTES + peri' +
'odo1.ENVIADOS + periodo1.SERVIDOS)'#10'end as Porcentaje_Pasados_Fec' +
'ha_Prevista_ANO1,'#10#10'periodo1.ORDENES_DEV as ORDENES_DEV_ANO1,'#10'cas' +
'e'#10'when ((periodo1.PENDIENTES + periodo1.ENVIADOS + periodo1.SERV' +
'IDOS) = 0) then (100 - (coalesce(periodo1.ORDENES_DEV, 0)*100))'#10 +
'else (coalesce(periodo1.ORDENES_DEV, 0)*100)/(periodo1.PENDIENTE' +
'S + periodo1.ENVIADOS + periodo1.SERVIDOS)'#10'end as Porcentaje_Ord' +
'enes_Dev_ANO1,'#10#10'periodo2.ANO as Ano2,'#10'periodo2.PENDIENTES as PEN' +
'DIENTES_ANO2, periodo2.ENVIADOS as ENVIADOS_ANO2, periodo2.SERVI' +
'DOS as SERVIDOS_ANO2,'#10#10'periodo2.INCIDENCIAS as INCIDENCIAS_ANO2,' +
#10'case'#10'when ((periodo2.PENDIENTES + periodo2.ENVIADOS + periodo2.' +
'SERVIDOS) = 0) then (100 - (coalesce(periodo2.INCIDENCIAS, 0)*10' +
'0))'#10'else (coalesce(periodo2.INCIDENCIAS, 0)*100)/(periodo2.PENDI' +
'ENTES + periodo2.ENVIADOS + periodo2.SERVIDOS)'#10'end as Porcentaje' +
'_Incidencias_ANO2,'#10#10'periodo2.PASADOS_FECHA_PREVISTA as PASADOS_' +
'FECHA_PREVISTA_ANO2,'#10'case'#10'when ((periodo2.PENDIENTES + periodo2.' +
'ENVIADOS + periodo2.SERVIDOS) = 0) then (100 - (coalesce(periodo' +
'2.PASADOS_FECHA_PREVISTA, 0)*100))'#10'else (coalesce(periodo2.PASAD' +
'OS_FECHA_PREVISTA, 0)*100)/(periodo2.PENDIENTES + periodo2.ENVIA' +
'DOS + periodo2.SERVIDOS)'#10'end as Porcentaje_Pasados_Fecha_Previst' +
'a_ANO2,'#10#10'periodo2.ORDENES_DEV as ORDENES_DEV_ANO2,'#10'case'#10'when ((p' +
'eriodo2.PENDIENTES + periodo2.ENVIADOS + periodo2.SERVIDOS) = 0)' +
' then (100 - (coalesce(periodo2.ORDENES_DEV, 0)*100))'#10'else (coal' +
'esce(periodo2.ORDENES_DEV, 0)*100)/(periodo2.PENDIENTES + period' +
'o2.ENVIADOS + periodo2.SERVIDOS)'#10'end as Porcentaje_Ordenes_Dev_A' +
'NO2,'#10#10'(periodo1.SERVIDOS - periodo2.SERVIDOS) as Diferencia_Serv' +
'idos,'#10'case'#10'when (periodo2.SERVIDOS = 0) then (100 - ((periodo1.S' +
'ERVIDOS - periodo2.SERVIDOS)*100))'#10'else (((periodo1.SERVIDOS - p' +
'eriodo2.SERVIDOS)*100)/periodo2.SERVIDOS)'#10'end as Porcentaje_Aume' +
'nto_Servidos,'#10#10'(periodo1.INCIDENCIAS - periodo2.INCIDENCIAS) as ' +
'Diferencia_Incidencias,'#10'case'#10'when (periodo2.INCIDENCIAS = 0) the' +
'n (100 - ((periodo1.INCIDENCIAS - periodo2.INCIDENCIAS)*100))'#10'el' +
'se (((periodo1.INCIDENCIAS - periodo2.INCIDENCIAS)*100)/periodo2' +
'.INCIDENCIAS)'#10'end as Porcentaje_Aumento_Incidencias,'#10#10'(periodo1.' +
'PASADOS_FECHA_PREVISTA - periodo2.PASADOS_FECHA_PREVISTA) as Dif' +
'erencia_Pasados_Fecha_Prevista,'#10'case'#10'when (periodo2.PASADOS_FECH' +
'A_PREVISTA = 0) then (100 - ((periodo1.PASADOS_FECHA_PREVISTA - ' +
'periodo2.PASADOS_FECHA_PREVISTA)*100))'#10'else (((periodo1.PASADOS_' +
'FECHA_PREVISTA - periodo2.PASADOS_FECHA_PREVISTA)*100)/periodo2.' +
'PASADOS_FECHA_PREVISTA)'#10'end as Porcentaje_Aumento_Pasados_Fecha,' +
#10#10'(periodo1.ORDENES_DEV - periodo2.ORDENES_DEV) as Diferencia_Or' +
'denes_Dev,'#10'case'#10'when (periodo2.ORDENES_DEV = 0) then (100 - ((pe' +
'riodo1.ORDENES_DEV - periodo2.ORDENES_DEV)*100))'#10'else (((periodo' +
'1.ORDENES_DEV - periodo2.ORDENES_DEV)*100)/periodo2.ORDENES_DEV)' +
#10'end as Porcentaje_Aumento_Ordenes_Dev'#10#10'FROM'#10'periodos_aux'#10'left j' +
'oin'#10'(select comp1.ID_EMPRESA, comp1.ANO, MES as NFILA,'#10'SUM(comp1' +
'.SERVIDOS) as SERVIDOS, SUM(comp1.PENDIENTES) AS PENDIENTES,'#10'SUM' +
'(comp1.ENVIADOS) as ENVIADOS, SUM(comp1.INCIDENCIAS) AS INCIDENC' +
'IAS,'#10'SUM(comp1.PASADOS_FECHA_PREVISTA) as PASADOS_FECHA_PREVISTA' +
', SUM(comp1.ORDENES_DEV) AS ORDENES_DEV'#10'from V_INF_ALB_CLIENTE c' +
'omp1'#10'where ID_EMPRESA = :ID_EMPRESA1'#10'and (ANO = :ANO1)'#10'group by ' +
'1,2,3'#10'order by 1 desc,2 asc) periodo1 on (VALOR = periodo1.NFILA' +
')'#10#10'left join'#10'(select comp2.ID_EMPRESA, comp2.ANO, MES as NFILA,'#10 +
'SUM(comp2.SERVIDOS) as SERVIDOS, SUM(comp2.PENDIENTES) AS PENDIE' +
'NTES,'#10'SUM(comp2.ENVIADOS) as ENVIADOS, SUM(comp2.INCIDENCIAS) AS' +
' INCIDENCIAS,'#10'SUM(comp2.PASADOS_FECHA_PREVISTA) as PASADOS_FECHA' +
'_PREVISTA, SUM(comp2.ORDENES_DEV) AS ORDENES_DEV'#10'from V_INF_ALB_' +
'CLIENTE comp2'#10'where ID_EMPRESA = :ID_EMPRESA2'#10'and (ANO = :ANO2)'#10 +
'group by 1,2,3'#10'order by 1 desc,2 asc) periodo2 on (VALOR = perio' +
'do2.NFILA)'#10#10'where periodo= '#39'MENSUAL'#39#10'order by valor asc'#10
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'VALOR'
TableField = 'VALOR'
end
item
DatasetField = 'DESCRIPCION'
TableField = 'DESCRIPCION'
end
item
DatasetField = 'ANO1'
TableField = 'ANO1'
end
item
DatasetField = 'ANO2'
TableField = 'ANO2'
end
item
DatasetField = 'DIFERENCIA_SERVIDOS'
TableField = 'DIFERENCIA_SERVIDOS'
end
item
DatasetField = 'DIFERENCIA_INCIDENCIAS'
TableField = 'DIFERENCIA_INCIDENCIAS'
end
item
DatasetField = 'DIFERENCIA_PASADOS_FECHA_PREVIS'
TableField = 'DIFERENCIA_PASADOS_FECHA_PREVIS'
end
item
DatasetField = 'DIFERENCIA_ORDENES_DEV'
TableField = 'DIFERENCIA_ORDENES_DEV'
end
item
DatasetField = 'PORCENTAJE_PASADOS_FECHA_PREVIS'
TableField = 'PORCENTAJE_PASADOS_FECHA_PREVIS'
end
item
DatasetField = 'PENDIENTES_ANO1'
TableField = 'PENDIENTES_ANO1'
end
item
DatasetField = 'ENVIADOS_ANO1'
TableField = 'ENVIADOS_ANO1'
end
item
DatasetField = 'SERVIDOS_ANO1'
TableField = 'SERVIDOS_ANO1'
end
item
DatasetField = 'INCIDENCIAS_ANO1'
TableField = 'INCIDENCIAS_ANO1'
end
item
DatasetField = 'PORCENTAJE_INCIDENCIAS_ANO1'
TableField = 'PORCENTAJE_INCIDENCIAS_ANO1'
end
item
DatasetField = 'PASADOS_FECHA_PREVISTA_ANO1'
TableField = 'PASADOS_FECHA_PREVISTA_ANO1'
end
item
DatasetField = 'ORDENES_DEV_ANO1'
TableField = 'ORDENES_DEV_ANO1'
end
item
DatasetField = 'PORCENTAJE_ORDENES_DEV_ANO1'
TableField = 'PORCENTAJE_ORDENES_DEV_ANO1'
end
item
DatasetField = 'PENDIENTES_ANO2'
TableField = 'PENDIENTES_ANO2'
end
item
DatasetField = 'ENVIADOS_ANO2'
TableField = 'ENVIADOS_ANO2'
end
item
DatasetField = 'SERVIDOS_ANO2'
TableField = 'SERVIDOS_ANO2'
end
item
DatasetField = 'INCIDENCIAS_ANO2'
TableField = 'INCIDENCIAS_ANO2'
end
item
DatasetField = 'PORCENTAJE_INCIDENCIAS_ANO2'
TableField = 'PORCENTAJE_INCIDENCIAS_ANO2'
end
item
DatasetField = 'PASADOS_FECHA_PREVISTA_ANO2'
TableField = 'PASADOS_FECHA_PREVISTA_ANO2'
end
item
DatasetField = 'PORCENTAJE_PASADOS_FECHA_PREVI1'
TableField = 'PORCENTAJE_PASADOS_FECHA_PREVI1'
end
item
DatasetField = 'ORDENES_DEV_ANO2'
TableField = 'ORDENES_DEV_ANO2'
end
item
DatasetField = 'PORCENTAJE_ORDENES_DEV_ANO2'
TableField = 'PORCENTAJE_ORDENES_DEV_ANO2'
end
item
DatasetField = 'PORCENTAJE_AUMENTO_SERVIDOS'
TableField = 'PORCENTAJE_AUMENTO_SERVIDOS'
end
item
DatasetField = 'PORCENTAJE_AUMENTO_INCIDENCIAS'
TableField = 'PORCENTAJE_AUMENTO_INCIDENCIAS'
end
item
DatasetField = 'PORCENTAJE_AUMENTO_PASADOS_FECH'
TableField = 'PORCENTAJE_AUMENTO_PASADOS_FECH'
end
item
DatasetField = 'PORCENTAJE_AUMENTO_ORDENES_DEV'
TableField = 'PORCENTAJE_AUMENTO_ORDENES_DEV'
end>
end>
Name = 'InformeListadoAlbaranesGrafCompMensual'
Fields = <
item
Name = 'VALOR'
DataType = datSmallInt
end
item
Name = 'DESCRIPCION'
DataType = datString
Size = 20
end
item
Name = 'ANO1'
DataType = datSmallInt
end
item
Name = 'PENDIENTES_ANO1'
DataType = datFloat
end
item
Name = 'ENVIADOS_ANO1'
DataType = datFloat
end
item
Name = 'SERVIDOS_ANO1'
DataType = datFloat
end
item
Name = 'INCIDENCIAS_ANO1'
DataType = datFloat
end
item
Name = 'PORCENTAJE_INCIDENCIAS_ANO1'
DataType = datFloat
end
item
Name = 'PASADOS_FECHA_PREVISTA_ANO1'
DataType = datFloat
end
item
Name = 'PORCENTAJE_PASADOS_FECHA_PREVIS'
DataType = datFloat
end
item
Name = 'ORDENES_DEV_ANO1'
DataType = datFloat
end
item
Name = 'PORCENTAJE_ORDENES_DEV_ANO1'
DataType = datFloat
end
item
Name = 'ANO2'
DataType = datSmallInt
end
item
Name = 'PENDIENTES_ANO2'
DataType = datFloat
end
item
Name = 'ENVIADOS_ANO2'
DataType = datFloat
end
item
Name = 'SERVIDOS_ANO2'
DataType = datFloat
end
item
Name = 'INCIDENCIAS_ANO2'
DataType = datFloat
end
item
Name = 'PORCENTAJE_INCIDENCIAS_ANO2'
DataType = datFloat
end
item
Name = 'PASADOS_FECHA_PREVISTA_ANO2'
DataType = datFloat
end
item
Name = 'PORCENTAJE_PASADOS_FECHA_PREVI1'
DataType = datFloat
end
item
Name = 'ORDENES_DEV_ANO2'
DataType = datFloat
end
item
Name = 'PORCENTAJE_ORDENES_DEV_ANO2'
DataType = datFloat
end
item
Name = 'DIFERENCIA_SERVIDOS'
DataType = datFloat
end
item
Name = 'PORCENTAJE_AUMENTO_SERVIDOS'
DataType = datFloat
end
item
Name = 'DIFERENCIA_INCIDENCIAS'
DataType = datFloat
end
item
Name = 'PORCENTAJE_AUMENTO_INCIDENCIAS'
DataType = datFloat
end
item
Name = 'DIFERENCIA_PASADOS_FECHA_PREVIS'
DataType = datFloat
end
item
Name = 'PORCENTAJE_AUMENTO_PASADOS_FECH'
DataType = datFloat
end
item
Name = 'DIFERENCIA_ORDENES_DEV'
DataType = datFloat
end
item
Name = 'PORCENTAJE_AUMENTO_ORDENES_DEV'
DataType = datFloat
end>
end
item
Params = <
item
Name = 'ID_EMPRESA'
Value = ''
end
item
Name = 'ANO'
Value = ''
end
item
Name = 'NTOP'
Value = ''
end>
Statements = <
item
Connection = 'IBX'
ConnectionType = 'Interbase'
Default = True
Name = 'IBX'
SQL =
'select P.ANO, C.REFERENCIA, C.NOMBRE, VT1.IMPORTE_TOTAL as IMPOR' +
'TE_TOTAL_ANO,'#10'COUNT(P.FECHA_ALBARAN) as NUMALB, SUM(P.IMPORTE_TO' +
'TAL) as IMPORTE_TOTAL,'#10'((SUM(P.IMPORTE_TOTAL)*100)/VT1.Importe_T' +
'OTAL) as PORCENTAJE'#10#10'from V_INF_ALB_CLIENTE P'#10'left join CONTACTO' +
'S C on P.ID_CLIENTE = C.ID'#10'inner join V_INF_ALB_CLI_IMPORTE_TOTA' +
'L_ANO VT1 on ((VT1.id_empresa = P.id_empresa) and (VT1.Ano = EXT' +
'RACT(YEAR FROM P.FECHA_ALBARAN)))'#10#10'where p.ID_EMPRESA = :ID_EMPR' +
'ESA'#10'and P.ANO = :ANO'#10'group by 1,2,3,4'#10'order by 1,6 desc'#10'rows 1 t' +
'o :NTOP'#10
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'ANO'
TableField = 'ANO'
end
item
DatasetField = 'REFERENCIA'
TableField = 'REFERENCIA'
end
item
DatasetField = 'NOMBRE'
TableField = 'NOMBRE'
end
item
DatasetField = 'IMPORTE_TOTAL_ANO'
TableField = 'IMPORTE_TOTAL_ANO'
end
item
DatasetField = 'IMPORTE_TOTAL'
TableField = 'IMPORTE_TOTAL'
end
item
DatasetField = 'PORCENTAJE'
TableField = 'PORCENTAJE'
end
item
DatasetField = 'NUMALB'
TableField = 'NUMALB'
end>
end>
Name = 'InformeListadoClientesMayorAlbaranadoResumen'
Fields = <
item
Name = 'ANO'
DataType = datSmallInt
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
end
item
Name = 'NOMBRE'
DataType = datString
Size = 255
end
item
Name = 'IMPORTE_TOTAL_ANO'
DataType = datCurrency
end
item
Name = 'NUMALB'
DataType = datInteger
end
item
Name = 'IMPORTE_TOTAL'
DataType = datCurrency
end
item
Name = 'PORCENTAJE'
DataType = datCurrency
end>
end
item
Params = <
item
Name = 'ID'
DataType = datInteger
Value = '11'
ParamType = daptInput
end>
Statements = <
item
Connection = 'IBX'
SQL =
'SELECT'#10' V_ALBARANES_CLIENTE.ID,'#10' V_ALBARANES_CLIENTE.ID_EMPRES' +
'A,'#10' V_ALBARANES_CLIENTE.ID_CLIENTE,'#10' V_ALBARANES_CLIENTE.NOMBR' +
'E,'#10' V_CLIENTES.NOMBRE_COMERCIAL,'#10' V_ALBARANES_CLIENTE.FECHA_AL' +
'BARAN,'#10' V_ALBARANES_CLIENTE.REFERENCIA,'#10' V_ALBARANES_CLIENTE.R' +
'EFERENCIA_CLIENTE,'#10' V_ALBARANES_CLIENTE.ID_PEDIDO,'#10' V_ALBARANE' +
'S_CLIENTE.REF_PEDIDO,'#10' V_ALBARANES_CLIENTE.CODIGO_POSTAL,'#10' V_A' +
'LBARANES_CLIENTE.POBLACION,'#10' V_ALBARANES_CLIENTE.PROVINCIA,'#10' V' +
'_ALBARANES_CLIENTE.PERSONA_CONTACTO,'#10' V_ALBARANES_CLIENTE.TELEF' +
'ONO,'#10' V_ALBARANES_CLIENTE.CALLE,'#10' V_ALBARANES_CLIENTE.OBSERVAC' +
'IONES,'#10' V_ALBARANES_CLIENTE.INCIDENCIAS,'#10' V_ALBARANES_CLIENTE.' +
'IMPORTE_TOTAL,'#10' V_ALBARANES_CLIENTE.FECHA_PREVISTA_ENVIO,'#10' EMP' +
'RESAS.NIF_CIF AS NIF_CIF_EMPRESA,'#10' EMPRESAS.NOMBRE AS NOMBRE_EM' +
'PRESA,'#10' EMPRESAS.RAZON_SOCIAL AS RAZON_SOCIAL_EMPRESA,'#10' EMPRES' +
'AS.CALLE AS CALLE_EMPRESA,'#10' EMPRESAS.CODIGO_POSTAL AS CODIGO_PO' +
'STAL_EMPRESA,'#10' EMPRESAS.POBLACION AS POBLACION_EMPRESA,'#10' EMPRE' +
'SAS.PROVINCIA AS PROVINCIA_EMPRESA,'#10' EMPRESAS.TELEFONO_1 AS TEL' +
'EFONO_1_EMPRESA,'#10' EMPRESAS.FAX AS FAX_EMPRESA,'#10' EMPRESAS.MOVIL' +
'_1 AS MOVIL_1_EMPRESA,'#10' EMPRESAS.EMAIL_1 AS EMAIL_1_EMPRESA,'#10' ' +
'EMPRESAS.PAGINA_WEB AS PAGINA_WEB_EMPRESA'#10'FROM'#10' V_ALBARANES_C' +
'LIENTE'#10' LEFT OUTER JOIN V_CLIENTES ON (V_CLIENTES.ID = V_ALBARA' +
'NES_CLIENTE.ID_CLIENTE)'#10' LEFT OUTER JOIN EMPRESAS ON (EMPRESAS.' +
'ID = V_ALBARANES_CLIENTE.ID_EMPRESA)'#10'WHERE V_ALBARANES_CLIENTE.I' +
'D = :ID'#10
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'OBSERVACIONES'
TableField = 'OBSERVACIONES'
end
item
DatasetField = 'NOMBRE'
TableField = 'NOMBRE'
end
item
DatasetField = 'CALLE'
TableField = 'CALLE'
end
item
DatasetField = 'POBLACION'
TableField = 'POBLACION'
end
item
DatasetField = 'REFERENCIA'
TableField = 'REFERENCIA'
end
item
DatasetField = 'ID'
TableField = 'ID'
end
item
DatasetField = 'ID_EMPRESA'
TableField = 'ID_EMPRESA'
end
item
DatasetField = 'CODIGO_POSTAL'
TableField = 'CODIGO_POSTAL'
end
item
DatasetField = 'PROVINCIA'
TableField = 'PROVINCIA'
end
item
DatasetField = 'PERSONA_CONTACTO'
TableField = 'PERSONA_CONTACTO'
end
item
DatasetField = 'ID_CLIENTE'
TableField = 'ID_CLIENTE'
end
item
DatasetField = 'FECHA_ALBARAN'
TableField = 'FECHA_ALBARAN'
end
item
DatasetField = 'ID_PEDIDO'
TableField = 'ID_PEDIDO'
end
item
DatasetField = 'REF_PEDIDO'
TableField = 'REF_PEDIDO'
end
item
DatasetField = 'IMPORTE_TOTAL'
TableField = 'IMPORTE_TOTAL'
end
item
DatasetField = 'REFERENCIA_CLIENTE'
TableField = 'REFERENCIA_CLIENTE'
end
item
DatasetField = 'NOMBRE_COMERCIAL'
TableField = 'NOMBRE_COMERCIAL'
end
item
DatasetField = 'TELEFONO'
TableField = 'TELEFONO'
end
item
DatasetField = 'INCIDENCIAS'
TableField = 'INCIDENCIAS'
end
item
DatasetField = 'FECHA_PREVISTA_ENVIO'
TableField = 'FECHA_PREVISTA_ENVIO'
end
item
DatasetField = 'NIF_CIF_EMPRESA'
TableField = 'NIF_CIF_EMPRESA'
end
item
DatasetField = 'NOMBRE_EMPRESA'
TableField = 'NOMBRE_EMPRESA'
end
item
DatasetField = 'RAZON_SOCIAL_EMPRESA'
TableField = 'RAZON_SOCIAL_EMPRESA'
end
item
DatasetField = 'CALLE_EMPRESA'
TableField = 'CALLE_EMPRESA'
end
item
DatasetField = 'CODIGO_POSTAL_EMPRESA'
TableField = 'CODIGO_POSTAL_EMPRESA'
end
item
DatasetField = 'POBLACION_EMPRESA'
TableField = 'POBLACION_EMPRESA'
end
item
DatasetField = 'PROVINCIA_EMPRESA'
TableField = 'PROVINCIA_EMPRESA'
end
item
DatasetField = 'TELEFONO_1_EMPRESA'
TableField = 'TELEFONO_1_EMPRESA'
end
item
DatasetField = 'FAX_EMPRESA'
TableField = 'FAX_EMPRESA'
end
item
DatasetField = 'MOVIL_1_EMPRESA'
TableField = 'MOVIL_1_EMPRESA'
end
item
DatasetField = 'EMAIL_1_EMPRESA'
TableField = 'EMAIL_1_EMPRESA'
end
item
DatasetField = 'PAGINA_WEB_EMPRESA'
TableField = 'PAGINA_WEB_EMPRESA'
end>
end>
Name = 'Informe_Cabecera'
Fields = <
item
Name = 'ID'
DataType = datInteger
end
item
Name = 'ID_EMPRESA'
DataType = datInteger
end
item
Name = 'ID_CLIENTE'
DataType = datInteger
end
item
Name = 'NOMBRE'
DataType = datString
Size = 255
end
item
Name = 'NOMBRE_COMERCIAL'
DataType = datString
Size = 255
end
item
Name = 'FECHA_ALBARAN'
DataType = datDateTime
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
end
item
Name = 'REFERENCIA_CLIENTE'
DataType = datString
Size = 255
end
item
Name = 'ID_PEDIDO'
DataType = datInteger
end
item
Name = 'REF_PEDIDO'
DataType = datString
Size = 255
end
item
Name = 'CODIGO_POSTAL'
DataType = datString
Size = 10
end
item
Name = 'POBLACION'
DataType = datString
Size = 255
end
item
Name = 'PROVINCIA'
DataType = datString
Size = 255
end
item
Name = 'PERSONA_CONTACTO'
DataType = datString
Size = 255
end
item
Name = 'TELEFONO'
DataType = datString
Size = 25
end
item
Name = 'CALLE'
DataType = datString
Size = 255
end
item
Name = 'OBSERVACIONES'
DataType = datMemo
end
item
Name = 'INCIDENCIAS'
DataType = datMemo
end
item
Name = 'IMPORTE_TOTAL'
DataType = datCurrency
end
item
Name = 'FECHA_PREVISTA_ENVIO'
DataType = datDateTime
end
item
Name = 'NIF_CIF_EMPRESA'
DataType = datString
Size = 15
end
item
Name = 'NOMBRE_EMPRESA'
DataType = datString
Size = 255
end
item
Name = 'RAZON_SOCIAL_EMPRESA'
DataType = datString
Size = 255
end
item
Name = 'CALLE_EMPRESA'
DataType = datString
Size = 255
end
item
Name = 'CODIGO_POSTAL_EMPRESA'
DataType = datString
Size = 10
end
item
Name = 'POBLACION_EMPRESA'
DataType = datString
Size = 255
end
item
Name = 'PROVINCIA_EMPRESA'
DataType = datString
Size = 255
end
item
Name = 'TELEFONO_1_EMPRESA'
DataType = datString
Size = 25
end
item
Name = 'FAX_EMPRESA'
DataType = datString
Size = 25
end
item
Name = 'MOVIL_1_EMPRESA'
DataType = datString
Size = 25
end
item
Name = 'EMAIL_1_EMPRESA'
DataType = datString
Size = 255
end
item
Name = 'PAGINA_WEB_EMPRESA'
DataType = datString
Size = 255
end>
end
item
Params = <
item
Name = 'ID_ALBARAN'
DataType = datInteger
Value = ''
end>
Statements = <
item
Connection = 'IBX'
TargetTable = 'ALBARANES_CLIENTE_DETALLES'
SQL =
'SELECT DET.ID, DET.ID_ALBARAN,'#10' DET.POSICION, DET.TIPO_DET' +
'ALLE,'#10' ARTICULOS.REFERENCIA, F_RTFTOTEXT(DET.CONCEPTO) as ' +
'CONCEPTO, DET.CANTIDAD,'#10' DET.IMPORTE_UNIDAD - (DET.IMPORTE' +
'_UNIDAD * (COALESCE(DET.DESCUENTO,0) / 100)) as IMPORTE_UNIDAD, ' +
'DET.IMPORTE_TOTAL,'#10' ARTICULOS.REFERENCIA_PROV as REFERENCI' +
'A_PROVEEDOR'#10'FROM ALBARANES_CLIENTE_DETALLES DET'#10'LEFT OUTER JOIN ' +
'ARTICULOS ON (DET.ID_ARTICULO = ARTICULOS.ID)'#10#10'WHERE DET.ID_ALBA' +
'RAN = :ID_ALBARAN AND {Where}'#10'ORDER BY DET.ID_ALBARAN, DET.POSIC' +
'ION;'#10
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'ID'
TableField = 'ID'
end
item
DatasetField = 'ID_ALBARAN'
TableField = 'ID_ALBARAN'
end
item
DatasetField = 'POSICION'
TableField = 'POSICION'
end
item
DatasetField = 'TIPO_DETALLE'
TableField = 'TIPO_DETALLE'
end
item
DatasetField = 'CONCEPTO'
TableField = 'CONCEPTO'
end
item
DatasetField = 'CANTIDAD'
TableField = 'CANTIDAD'
end
item
DatasetField = 'IMPORTE_UNIDAD'
TableField = 'IMPORTE_UNIDAD'
end
item
DatasetField = 'IMPORTE_TOTAL'
TableField = 'IMPORTE_TOTAL'
end
item
DatasetField = 'REFERENCIA'
TableField = '<unknown>'
SQLOrigin = 'REFERENCIA'
end
item
DatasetField = 'REFERENCIA_PROVEEDOR'
TableField = '<unknown>'
SQLOrigin = 'REFERENCIA_PROVEEDOR'
end>
end>
Name = 'Informe_Detalles'
Fields = <
item
Name = 'ID'
DataType = datInteger
end
item
Name = 'ID_ALBARAN'
DataType = datInteger
end
item
Name = 'POSICION'
DataType = datInteger
end
item
Name = 'TIPO_DETALLE'
DataType = datString
Size = 25
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
end
item
Name = 'CONCEPTO'
DataType = datString
Size = 32765
end
item
Name = 'CANTIDAD'
DataType = datCurrency
end
item
Name = 'IMPORTE_UNIDAD'
DataType = datFloat
end
item
Name = 'IMPORTE_TOTAL'
DataType = datCurrency
end
item
Name = 'REFERENCIA_PROVEEDOR'
DataType = datString
Size = 255
end>
end
item
Params = <
item
Name = 'ID_EMPRESA1'
Value = ''
end
item
Name = 'ANO1'
Value = ''
end
item
Name = 'ID_EMPRESA2'
Value = ''
end
item
Name = 'ANO2'
Value = ''
end>
Statements = <
item
Connection = 'IBX'
ConnectionType = 'Interbase'
Default = True
SQL =
'select VALOR, DESCRIPCION, periodo1.ANO as Ano1,'#10'periodo1.PENDIE' +
'NTES as PENDIENTES_ANO1, periodo1.ENVIADOS as ENVIADOS_ANO1, per' +
'iodo1.SERVIDOS as SERVIDOS_ANO1,'#10#10'periodo1.INCIDENCIAS as INCIDE' +
'NCIAS_ANO1,'#10'case'#10'when ((periodo1.PENDIENTES + periodo1.ENVIADOS ' +
'+ periodo1.SERVIDOS) = 0) then (100 - (coalesce(periodo1.INCIDEN' +
'CIAS, 0)*100))'#10'else (coalesce(periodo1.INCIDENCIAS, 0)*100)/(per' +
'iodo1.PENDIENTES + periodo1.ENVIADOS + periodo1.SERVIDOS)'#10'end as' +
' Porcentaje_Incidencias_ANO1,'#10#10'periodo1.PASADOS_FECHA_PREVISTA a' +
's PASADOS_FECHA_PREVISTA_ANO1,'#10'case'#10'when ((periodo1.PENDIENTES +' +
' periodo1.ENVIADOS + periodo1.SERVIDOS) = 0) then (100 - (coales' +
'ce(periodo1.PASADOS_FECHA_PREVISTA, 0)*100))'#10'else (coalesce(peri' +
'odo1.PASADOS_FECHA_PREVISTA, 0)*100)/(periodo1.PENDIENTES + peri' +
'odo1.ENVIADOS + periodo1.SERVIDOS)'#10'end as Porcentaje_Pasados_Fec' +
'ha_Prevista_ANO1,'#10#10'periodo1.ORDENES_DEV as ORDENES_DEV_ANO1,'#10'cas' +
'e'#10'when ((periodo1.PENDIENTES + periodo1.ENVIADOS + periodo1.SERV' +
'IDOS) = 0) then (100 - (coalesce(periodo1.ORDENES_DEV, 0)*100))'#10 +
'else (coalesce(periodo1.ORDENES_DEV, 0)*100)/(periodo1.PENDIENTE' +
'S + periodo1.ENVIADOS + periodo1.SERVIDOS)'#10'end as Porcentaje_Ord' +
'enes_Dev_ANO1,'#10#10'periodo2.ANO as Ano2,'#10'periodo2.PENDIENTES as PEN' +
'DIENTES_ANO2, periodo2.ENVIADOS as ENVIADOS_ANO2, periodo2.SERVI' +
'DOS as SERVIDOS_ANO2,'#10#10'periodo2.INCIDENCIAS as INCIDENCIAS_ANO2,' +
#10'case'#10'when ((periodo2.PENDIENTES + periodo2.ENVIADOS + periodo2.' +
'SERVIDOS) = 0) then (100 - (coalesce(periodo2.INCIDENCIAS, 0)*10' +
'0))'#10'else (coalesce(periodo2.INCIDENCIAS, 0)*100)/(periodo2.PENDI' +
'ENTES + periodo2.ENVIADOS + periodo2.SERVIDOS)'#10'end as Porcentaje' +
'_Incidencias_ANO2,'#10#10'periodo2.PASADOS_FECHA_PREVISTA as PASADOS_' +
'FECHA_PREVISTA_ANO2,'#10'case'#10'when ((periodo2.PENDIENTES + periodo2.' +
'ENVIADOS + periodo2.SERVIDOS) = 0) then (100 - (coalesce(periodo' +
'2.PASADOS_FECHA_PREVISTA, 0)*100))'#10'else (coalesce(periodo2.PASAD' +
'OS_FECHA_PREVISTA, 0)*100)/(periodo2.PENDIENTES + periodo2.ENVIA' +
'DOS + periodo2.SERVIDOS)'#10'end as Porcentaje_Pasados_Fecha_Previst' +
'a_ANO2,'#10#10'periodo2.ORDENES_DEV as ORDENES_DEV_ANO2,'#10'case'#10'when ((p' +
'eriodo2.PENDIENTES + periodo2.ENVIADOS + periodo2.SERVIDOS) = 0)' +
' then (100 - (coalesce(periodo2.ORDENES_DEV, 0)*100))'#10'else (coal' +
'esce(periodo2.ORDENES_DEV, 0)*100)/(periodo2.PENDIENTES + period' +
'o2.ENVIADOS + periodo2.SERVIDOS)'#10'end as Porcentaje_Ordenes_Dev_A' +
'NO2,'#10#10'(periodo1.SERVIDOS - periodo2.SERVIDOS) as Diferencia_Serv' +
'idos,'#10'case'#10'when (periodo2.SERVIDOS = 0) then (100 - ((periodo1.S' +
'ERVIDOS - periodo2.SERVIDOS)*100))'#10'else (((periodo1.SERVIDOS - p' +
'eriodo2.SERVIDOS)*100)/periodo2.SERVIDOS)'#10'end as Porcentaje_Aume' +
'nto_Servidos,'#10#10'(periodo1.INCIDENCIAS - periodo2.INCIDENCIAS) as ' +
'Diferencia_Incidencias,'#10'case'#10'when (periodo2.INCIDENCIAS = 0) the' +
'n (100 - ((periodo1.INCIDENCIAS - periodo2.INCIDENCIAS)*100))'#10'el' +
'se (((periodo1.INCIDENCIAS - periodo2.INCIDENCIAS)*100)/periodo2' +
'.INCIDENCIAS)'#10'end as Porcentaje_Aumento_Incidencias,'#10#10'(periodo1.' +
'PASADOS_FECHA_PREVISTA - periodo2.PASADOS_FECHA_PREVISTA) as Dif' +
'erencia_Pasados_Fecha_Prevista,'#10'case'#10'when (periodo2.PASADOS_FECH' +
'A_PREVISTA = 0) then (100 - ((periodo1.PASADOS_FECHA_PREVISTA - ' +
'periodo2.PASADOS_FECHA_PREVISTA)*100))'#10'else (((periodo1.PASADOS_' +
'FECHA_PREVISTA - periodo2.PASADOS_FECHA_PREVISTA)*100)/periodo2.' +
'PASADOS_FECHA_PREVISTA)'#10'end as Porcentaje_Aumento_Pasados_Fecha,' +
#10#10'(periodo1.ORDENES_DEV - periodo2.ORDENES_DEV) as Diferencia_Or' +
'denes_Dev,'#10'case'#10'when (periodo2.ORDENES_DEV = 0) then (100 - ((pe' +
'riodo1.ORDENES_DEV - periodo2.ORDENES_DEV)*100))'#10'else (((periodo' +
'1.ORDENES_DEV - periodo2.ORDENES_DEV)*100)/periodo2.ORDENES_DEV)' +
#10'end as Porcentaje_Aumento_Ordenes_Dev'#10#10#10'FROM'#10'periodos_aux'#10'left ' +
'join'#10'(select comp1.ID_EMPRESA, comp1.ANO, TRIMESTRE as NFILA,'#10'SU' +
'M(comp1.SERVIDOS) as SERVIDOS, SUM(comp1.PENDIENTES) AS PENDIENT' +
'ES,'#10'SUM(comp1.ENVIADOS) as ENVIADOS, SUM(comp1.INCIDENCIAS) AS I' +
'NCIDENCIAS,'#10'SUM(comp1.PASADOS_FECHA_PREVISTA) as PASADOS_FECHA_P' +
'REVISTA, SUM(comp1.ORDENES_DEV) AS ORDENES_DEV'#10'from V_INF_ALB_CL' +
'IENTE comp1'#10'where ID_EMPRESA = :ID_EMPRESA1'#10'and (ANO = :ANO1)'#10'gr' +
'oup by 1,2,3'#10'order by 1 desc,2 asc) periodo1 on (VALOR = periodo' +
'1.NFILA)'#10#10'left join'#10'(select comp2.ID_EMPRESA, comp2.ANO, TRIMEST' +
'RE as NFILA,'#10'SUM(comp2.SERVIDOS) as SERVIDOS, SUM(comp2.PENDIENT' +
'ES) AS PENDIENTES,'#10'SUM(comp2.ENVIADOS) as ENVIADOS, SUM(comp2.IN' +
'CIDENCIAS) AS INCIDENCIAS,'#10'SUM(comp2.PASADOS_FECHA_PREVISTA) as ' +
'PASADOS_FECHA_PREVISTA, SUM(comp2.ORDENES_DEV) AS ORDENES_DEV'#10'fr' +
'om V_INF_ALB_CLIENTE comp2'#10'where ID_EMPRESA = :ID_EMPRESA2'#10'and (' +
'ANO = :ANO2)'#10'group by 1,2,3'#10'order by 1 desc,2 asc) periodo2 on (' +
'VALOR = periodo2.NFILA)'#10#10'where periodo= '#39'TRIMESTRAL'#39#10'order by va' +
'lor asc'#10
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'VALOR'
TableField = 'VALOR'
end
item
DatasetField = 'DESCRIPCION'
TableField = 'DESCRIPCION'
end
item
DatasetField = 'ANO1'
TableField = 'ANO1'
end
item
DatasetField = 'ANO2'
TableField = 'ANO2'
end
item
DatasetField = 'DIFERENCIA_SERVIDOS'
TableField = 'DIFERENCIA_SERVIDOS'
end
item
DatasetField = 'DIFERENCIA_INCIDENCIAS'
TableField = 'DIFERENCIA_INCIDENCIAS'
end
item
DatasetField = 'DIFERENCIA_PASADOS_FECHA_PREVIS'
TableField = 'DIFERENCIA_PASADOS_FECHA_PREVIS'
end
item
DatasetField = 'DIFERENCIA_ORDENES_DEV'
TableField = 'DIFERENCIA_ORDENES_DEV'
end
item
DatasetField = 'PORCENTAJE_PASADOS_FECHA_PREVIS'
TableField = 'PORCENTAJE_PASADOS_FECHA_PREVIS'
end
item
DatasetField = 'PENDIENTES_ANO1'
TableField = 'PENDIENTES_ANO1'
end
item
DatasetField = 'ENVIADOS_ANO1'
TableField = 'ENVIADOS_ANO1'
end
item
DatasetField = 'SERVIDOS_ANO1'
TableField = 'SERVIDOS_ANO1'
end
item
DatasetField = 'INCIDENCIAS_ANO1'
TableField = 'INCIDENCIAS_ANO1'
end
item
DatasetField = 'PORCENTAJE_INCIDENCIAS_ANO1'
TableField = 'PORCENTAJE_INCIDENCIAS_ANO1'
end
item
DatasetField = 'PASADOS_FECHA_PREVISTA_ANO1'
TableField = 'PASADOS_FECHA_PREVISTA_ANO1'
end
item
DatasetField = 'ORDENES_DEV_ANO1'
TableField = 'ORDENES_DEV_ANO1'
end
item
DatasetField = 'PORCENTAJE_ORDENES_DEV_ANO1'
TableField = 'PORCENTAJE_ORDENES_DEV_ANO1'
end
item
DatasetField = 'PENDIENTES_ANO2'
TableField = 'PENDIENTES_ANO2'
end
item
DatasetField = 'ENVIADOS_ANO2'
TableField = 'ENVIADOS_ANO2'
end
item
DatasetField = 'SERVIDOS_ANO2'
TableField = 'SERVIDOS_ANO2'
end
item
DatasetField = 'INCIDENCIAS_ANO2'
TableField = 'INCIDENCIAS_ANO2'
end
item
DatasetField = 'PORCENTAJE_INCIDENCIAS_ANO2'
TableField = 'PORCENTAJE_INCIDENCIAS_ANO2'
end
item
DatasetField = 'PASADOS_FECHA_PREVISTA_ANO2'
TableField = 'PASADOS_FECHA_PREVISTA_ANO2'
end
item
DatasetField = 'PORCENTAJE_PASADOS_FECHA_PREVI1'
TableField = 'PORCENTAJE_PASADOS_FECHA_PREVI1'
end
item
DatasetField = 'ORDENES_DEV_ANO2'
TableField = 'ORDENES_DEV_ANO2'
end
item
DatasetField = 'PORCENTAJE_ORDENES_DEV_ANO2'
TableField = 'PORCENTAJE_ORDENES_DEV_ANO2'
end
item
DatasetField = 'PORCENTAJE_AUMENTO_SERVIDOS'
TableField = 'PORCENTAJE_AUMENTO_SERVIDOS'
end
item
DatasetField = 'PORCENTAJE_AUMENTO_INCIDENCIAS'
TableField = 'PORCENTAJE_AUMENTO_INCIDENCIAS'
end
item
DatasetField = 'PORCENTAJE_AUMENTO_PASADOS_FECH'
TableField = 'PORCENTAJE_AUMENTO_PASADOS_FECH'
end
item
DatasetField = 'PORCENTAJE_AUMENTO_ORDENES_DEV'
TableField = 'PORCENTAJE_AUMENTO_ORDENES_DEV'
end>
end>
Name = 'InformeListadoAlbaranesGrafCompTrimestral'
Fields = <
item
Name = 'VALOR'
DataType = datSmallInt
end
item
Name = 'DESCRIPCION'
DataType = datString
Size = 20
end
item
Name = 'ANO1'
DataType = datSmallInt
end
item
Name = 'PENDIENTES_ANO1'
DataType = datFloat
end
item
Name = 'ENVIADOS_ANO1'
DataType = datFloat
end
item
Name = 'SERVIDOS_ANO1'
DataType = datFloat
end
item
Name = 'INCIDENCIAS_ANO1'
DataType = datFloat
end
item
Name = 'PORCENTAJE_INCIDENCIAS_ANO1'
DataType = datFloat
end
item
Name = 'PASADOS_FECHA_PREVISTA_ANO1'
DataType = datFloat
end
item
Name = 'PORCENTAJE_PASADOS_FECHA_PREVIS'
DataType = datFloat
end
item
Name = 'ORDENES_DEV_ANO1'
DataType = datFloat
end
item
Name = 'PORCENTAJE_ORDENES_DEV_ANO1'
DataType = datFloat
end
item
Name = 'ANO2'
DataType = datSmallInt
end
item
Name = 'PENDIENTES_ANO2'
DataType = datFloat
end
item
Name = 'ENVIADOS_ANO2'
DataType = datFloat
end
item
Name = 'SERVIDOS_ANO2'
DataType = datFloat
end
item
Name = 'INCIDENCIAS_ANO2'
DataType = datFloat
end
item
Name = 'PORCENTAJE_INCIDENCIAS_ANO2'
DataType = datFloat
end
item
Name = 'PASADOS_FECHA_PREVISTA_ANO2'
DataType = datFloat
end
item
Name = 'PORCENTAJE_PASADOS_FECHA_PREVI1'
DataType = datFloat
end
item
Name = 'ORDENES_DEV_ANO2'
DataType = datFloat
end
item
Name = 'PORCENTAJE_ORDENES_DEV_ANO2'
DataType = datFloat
end
item
Name = 'DIFERENCIA_SERVIDOS'
DataType = datFloat
end
item
Name = 'PORCENTAJE_AUMENTO_SERVIDOS'
DataType = datFloat
end
item
Name = 'DIFERENCIA_INCIDENCIAS'
DataType = datFloat
end
item
Name = 'PORCENTAJE_AUMENTO_INCIDENCIAS'
DataType = datFloat
end
item
Name = 'DIFERENCIA_PASADOS_FECHA_PREVIS'
DataType = datFloat
end
item
Name = 'PORCENTAJE_AUMENTO_PASADOS_FECH'
DataType = datFloat
end
item
Name = 'DIFERENCIA_ORDENES_DEV'
DataType = datFloat
end
item
Name = 'PORCENTAJE_AUMENTO_ORDENES_DEV'
DataType = datFloat
end>
end
item
Params = <
item
Name = 'ID_EMPRESA1'
Value = ''
end
item
Name = 'ANO1'
Value = ''
end
item
Name = 'ID_EMPRESA2'
Value = ''
end
item
Name = 'ANO2'
Value = ''
end>
Statements = <
item
Connection = 'IBX'
ConnectionType = 'Interbase'
Default = True
SQL =
'select VALOR, DESCRIPCION, periodo1.ANO as Ano1,'#10'periodo1.PENDIE' +
'NTES as PENDIENTES_ANO1, periodo1.ENVIADOS as ENVIADOS_ANO1, per' +
'iodo1.SERVIDOS as SERVIDOS_ANO1,'#10#10'periodo1.INCIDENCIAS as INCIDE' +
'NCIAS_ANO1,'#10'case'#10'when ((periodo1.PENDIENTES + periodo1.ENVIADOS ' +
'+ periodo1.SERVIDOS) = 0) then (100 - (coalesce(periodo1.INCIDEN' +
'CIAS, 0)*100))'#10'else (coalesce(periodo1.INCIDENCIAS, 0)*100)/(per' +
'iodo1.PENDIENTES + periodo1.ENVIADOS + periodo1.SERVIDOS)'#10'end as' +
' Porcentaje_Incidencias_ANO1,'#10#10'periodo1.PASADOS_FECHA_PREVISTA a' +
's PASADOS_FECHA_PREVISTA_ANO1,'#10'case'#10'when ((periodo1.PENDIENTES +' +
' periodo1.ENVIADOS + periodo1.SERVIDOS) = 0) then (100 - (coales' +
'ce(periodo1.PASADOS_FECHA_PREVISTA, 0)*100))'#10'else (coalesce(peri' +
'odo1.PASADOS_FECHA_PREVISTA, 0)*100)/(periodo1.PENDIENTES + peri' +
'odo1.ENVIADOS + periodo1.SERVIDOS)'#10'end as Porcentaje_Pasados_Fec' +
'ha_Prevista_ANO1,'#10#10'periodo1.ORDENES_DEV as ORDENES_DEV_ANO1,'#10'cas' +
'e'#10'when ((periodo1.PENDIENTES + periodo1.ENVIADOS + periodo1.SERV' +
'IDOS) = 0) then (100 - (coalesce(periodo1.ORDENES_DEV, 0)*100))'#10 +
'else (coalesce(periodo1.ORDENES_DEV, 0)*100)/(periodo1.PENDIENTE' +
'S + periodo1.ENVIADOS + periodo1.SERVIDOS)'#10'end as Porcentaje_Ord' +
'enes_Dev_ANO1,'#10#10'periodo2.ANO as Ano2,'#10'periodo2.PENDIENTES as PEN' +
'DIENTES_ANO2, periodo2.ENVIADOS as ENVIADOS_ANO2, periodo2.SERVI' +
'DOS as SERVIDOS_ANO2,'#10#10'periodo2.INCIDENCIAS as INCIDENCIAS_ANO2,' +
#10'case'#10'when ((periodo2.PENDIENTES + periodo2.ENVIADOS + periodo2.' +
'SERVIDOS) = 0) then (100 - (coalesce(periodo2.INCIDENCIAS, 0)*10' +
'0))'#10'else (coalesce(periodo2.INCIDENCIAS, 0)*100)/(periodo2.PENDI' +
'ENTES + periodo2.ENVIADOS + periodo2.SERVIDOS)'#10'end as Porcentaje' +
'_Incidencias_ANO2,'#10#10'periodo2.PASADOS_FECHA_PREVISTA as PASADOS_' +
'FECHA_PREVISTA_ANO2,'#10'case'#10'when ((periodo2.PENDIENTES + periodo2.' +
'ENVIADOS + periodo2.SERVIDOS) = 0) then (100 - (coalesce(periodo' +
'2.PASADOS_FECHA_PREVISTA, 0)*100))'#10'else (coalesce(periodo2.PASAD' +
'OS_FECHA_PREVISTA, 0)*100)/(periodo2.PENDIENTES + periodo2.ENVIA' +
'DOS + periodo2.SERVIDOS)'#10'end as Porcentaje_Pasados_Fecha_Previst' +
'a_ANO2,'#10#10'periodo2.ORDENES_DEV as ORDENES_DEV_ANO2,'#10'case'#10'when ((p' +
'eriodo2.PENDIENTES + periodo2.ENVIADOS + periodo2.SERVIDOS) = 0)' +
' then (100 - (coalesce(periodo2.ORDENES_DEV, 0)*100))'#10'else (coal' +
'esce(periodo2.ORDENES_DEV, 0)*100)/(periodo2.PENDIENTES + period' +
'o2.ENVIADOS + periodo2.SERVIDOS)'#10'end as Porcentaje_Ordenes_Dev_A' +
'NO2,'#10#10'(periodo1.SERVIDOS - periodo2.SERVIDOS) as Diferencia_Serv' +
'idos,'#10'case'#10'when (periodo2.SERVIDOS = 0) then (100 - ((periodo1.S' +
'ERVIDOS - periodo2.SERVIDOS)*100))'#10'else (((periodo1.SERVIDOS - p' +
'eriodo2.SERVIDOS)*100)/periodo2.SERVIDOS)'#10'end as Porcentaje_Aume' +
'nto_Servidos,'#10#10'(periodo1.INCIDENCIAS - periodo2.INCIDENCIAS) as ' +
'Diferencia_Incidencias,'#10'case'#10'when (periodo2.INCIDENCIAS = 0) the' +
'n (100 - ((periodo1.INCIDENCIAS - periodo2.INCIDENCIAS)*100))'#10'el' +
'se (((periodo1.INCIDENCIAS - periodo2.INCIDENCIAS)*100)/periodo2' +
'.INCIDENCIAS)'#10'end as Porcentaje_Aumento_Incidencias,'#10#10'(periodo1.' +
'PASADOS_FECHA_PREVISTA - periodo2.PASADOS_FECHA_PREVISTA) as Dif' +
'erencia_Pasados_Fecha_Prevista,'#10'case'#10'when (periodo2.PASADOS_FECH' +
'A_PREVISTA = 0) then (100 - ((periodo1.PASADOS_FECHA_PREVISTA - ' +
'periodo2.PASADOS_FECHA_PREVISTA)*100))'#10'else (((periodo1.PASADOS_' +
'FECHA_PREVISTA - periodo2.PASADOS_FECHA_PREVISTA)*100)/periodo2.' +
'PASADOS_FECHA_PREVISTA)'#10'end as Porcentaje_Aumento_Pasados_Fecha,' +
#10#10'(periodo1.ORDENES_DEV - periodo2.ORDENES_DEV) as Diferencia_Or' +
'denes_Dev,'#10'case'#10'when (periodo2.ORDENES_DEV = 0) then (100 - ((pe' +
'riodo1.ORDENES_DEV - periodo2.ORDENES_DEV)*100))'#10'else (((periodo' +
'1.ORDENES_DEV - periodo2.ORDENES_DEV)*100)/periodo2.ORDENES_DEV)' +
#10'end as Porcentaje_Aumento_Ordenes_Dev'#10#10#10'FROM'#10'periodos_aux'#10'left ' +
'join'#10'(select comp1.ID_EMPRESA, comp1.ANO, SEMESTRE as NFILA,'#10'SUM' +
'(comp1.SERVIDOS) as SERVIDOS, SUM(comp1.PENDIENTES) AS PENDIENTE' +
'S,'#10'SUM(comp1.ENVIADOS) as ENVIADOS, SUM(comp1.INCIDENCIAS) AS IN' +
'CIDENCIAS,'#10'SUM(comp1.PASADOS_FECHA_PREVISTA) as PASADOS_FECHA_PR' +
'EVISTA, SUM(comp1.ORDENES_DEV) AS ORDENES_DEV'#10'from V_INF_ALB_CLI' +
'ENTE comp1'#10'where ID_EMPRESA = :ID_EMPRESA1'#10'and (ANO = :ANO1)'#10'gro' +
'up by 1,2,3'#10'order by 1 desc,2 asc) periodo1 on (VALOR = periodo1' +
'.NFILA)'#10#10'left join'#10'(select comp2.ID_EMPRESA, comp2.ANO, SEMESTRE' +
' as NFILA,'#10'SUM(comp2.SERVIDOS) as SERVIDOS, SUM(comp2.PENDIENTES' +
') AS PENDIENTES,'#10'SUM(comp2.ENVIADOS) as ENVIADOS, SUM(comp2.INCI' +
'DENCIAS) AS INCIDENCIAS,'#10'SUM(comp2.PASADOS_FECHA_PREVISTA) as PA' +
'SADOS_FECHA_PREVISTA, SUM(comp2.ORDENES_DEV) AS ORDENES_DEV'#10'from' +
' V_INF_ALB_CLIENTE comp2'#10'where ID_EMPRESA = :ID_EMPRESA2'#10'and (AN' +
'O = :ANO2)'#10'group by 1,2,3'#10'order by 1 desc,2 asc) periodo2 on (VA' +
'LOR = periodo2.NFILA)'#10#10'where periodo= '#39'SEMESTRAL'#39#10'order by valor' +
' asc'#10
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'VALOR'
TableField = 'VALOR'
end
item
DatasetField = 'DESCRIPCION'
TableField = 'DESCRIPCION'
end
item
DatasetField = 'ANO1'
TableField = 'ANO1'
end
item
DatasetField = 'ANO2'
TableField = 'ANO2'
end
item
DatasetField = 'DIFERENCIA_SERVIDOS'
TableField = 'DIFERENCIA_SERVIDOS'
end
item
DatasetField = 'DIFERENCIA_INCIDENCIAS'
TableField = 'DIFERENCIA_INCIDENCIAS'
end
item
DatasetField = 'DIFERENCIA_PASADOS_FECHA_PREVIS'
TableField = 'DIFERENCIA_PASADOS_FECHA_PREVIS'
end
item
DatasetField = 'DIFERENCIA_ORDENES_DEV'
TableField = 'DIFERENCIA_ORDENES_DEV'
end
item
DatasetField = 'PORCENTAJE_PASADOS_FECHA_PREVIS'
TableField = 'PORCENTAJE_PASADOS_FECHA_PREVIS'
end
item
DatasetField = 'PENDIENTES_ANO1'
TableField = 'PENDIENTES_ANO1'
end
item
DatasetField = 'ENVIADOS_ANO1'
TableField = 'ENVIADOS_ANO1'
end
item
DatasetField = 'SERVIDOS_ANO1'
TableField = 'SERVIDOS_ANO1'
end
item
DatasetField = 'INCIDENCIAS_ANO1'
TableField = 'INCIDENCIAS_ANO1'
end
item
DatasetField = 'PORCENTAJE_INCIDENCIAS_ANO1'
TableField = 'PORCENTAJE_INCIDENCIAS_ANO1'
end
item
DatasetField = 'PASADOS_FECHA_PREVISTA_ANO1'
TableField = 'PASADOS_FECHA_PREVISTA_ANO1'
end
item
DatasetField = 'ORDENES_DEV_ANO1'
TableField = 'ORDENES_DEV_ANO1'
end
item
DatasetField = 'PORCENTAJE_ORDENES_DEV_ANO1'
TableField = 'PORCENTAJE_ORDENES_DEV_ANO1'
end
item
DatasetField = 'PENDIENTES_ANO2'
TableField = 'PENDIENTES_ANO2'
end
item
DatasetField = 'ENVIADOS_ANO2'
TableField = 'ENVIADOS_ANO2'
end
item
DatasetField = 'SERVIDOS_ANO2'
TableField = 'SERVIDOS_ANO2'
end
item
DatasetField = 'INCIDENCIAS_ANO2'
TableField = 'INCIDENCIAS_ANO2'
end
item
DatasetField = 'PORCENTAJE_INCIDENCIAS_ANO2'
TableField = 'PORCENTAJE_INCIDENCIAS_ANO2'
end
item
DatasetField = 'PASADOS_FECHA_PREVISTA_ANO2'
TableField = 'PASADOS_FECHA_PREVISTA_ANO2'
end
item
DatasetField = 'PORCENTAJE_PASADOS_FECHA_PREVI1'
TableField = 'PORCENTAJE_PASADOS_FECHA_PREVI1'
end
item
DatasetField = 'ORDENES_DEV_ANO2'
TableField = 'ORDENES_DEV_ANO2'
end
item
DatasetField = 'PORCENTAJE_ORDENES_DEV_ANO2'
TableField = 'PORCENTAJE_ORDENES_DEV_ANO2'
end
item
DatasetField = 'PORCENTAJE_AUMENTO_SERVIDOS'
TableField = 'PORCENTAJE_AUMENTO_SERVIDOS'
end
item
DatasetField = 'PORCENTAJE_AUMENTO_INCIDENCIAS'
TableField = 'PORCENTAJE_AUMENTO_INCIDENCIAS'
end
item
DatasetField = 'PORCENTAJE_AUMENTO_PASADOS_FECH'
TableField = 'PORCENTAJE_AUMENTO_PASADOS_FECH'
end
item
DatasetField = 'PORCENTAJE_AUMENTO_ORDENES_DEV'
TableField = 'PORCENTAJE_AUMENTO_ORDENES_DEV'
end>
end>
Name = 'InformeListadoAlbaranesGrafCompSemestral'
Fields = <
item
Name = 'VALOR'
DataType = datSmallInt
end
item
Name = 'DESCRIPCION'
DataType = datString
Size = 20
end
item
Name = 'ANO1'
DataType = datSmallInt
end
item
Name = 'PENDIENTES_ANO1'
DataType = datFloat
end
item
Name = 'ENVIADOS_ANO1'
DataType = datFloat
end
item
Name = 'SERVIDOS_ANO1'
DataType = datFloat
end
item
Name = 'INCIDENCIAS_ANO1'
DataType = datFloat
end
item
Name = 'PORCENTAJE_INCIDENCIAS_ANO1'
DataType = datFloat
end
item
Name = 'PASADOS_FECHA_PREVISTA_ANO1'
DataType = datFloat
end
item
Name = 'PORCENTAJE_PASADOS_FECHA_PREVIS'
DataType = datFloat
end
item
Name = 'ORDENES_DEV_ANO1'
DataType = datFloat
end
item
Name = 'PORCENTAJE_ORDENES_DEV_ANO1'
DataType = datFloat
end
item
Name = 'ANO2'
DataType = datSmallInt
end
item
Name = 'PENDIENTES_ANO2'
DataType = datFloat
end
item
Name = 'ENVIADOS_ANO2'
DataType = datFloat
end
item
Name = 'SERVIDOS_ANO2'
DataType = datFloat
end
item
Name = 'INCIDENCIAS_ANO2'
DataType = datFloat
end
item
Name = 'PORCENTAJE_INCIDENCIAS_ANO2'
DataType = datFloat
end
item
Name = 'PASADOS_FECHA_PREVISTA_ANO2'
DataType = datFloat
end
item
Name = 'PORCENTAJE_PASADOS_FECHA_PREVI1'
DataType = datFloat
end
item
Name = 'ORDENES_DEV_ANO2'
DataType = datFloat
end
item
Name = 'PORCENTAJE_ORDENES_DEV_ANO2'
DataType = datFloat
end
item
Name = 'DIFERENCIA_SERVIDOS'
DataType = datFloat
end
item
Name = 'PORCENTAJE_AUMENTO_SERVIDOS'
DataType = datFloat
end
item
Name = 'DIFERENCIA_INCIDENCIAS'
DataType = datFloat
end
item
Name = 'PORCENTAJE_AUMENTO_INCIDENCIAS'
DataType = datFloat
end
item
Name = 'DIFERENCIA_PASADOS_FECHA_PREVIS'
DataType = datFloat
end
item
Name = 'PORCENTAJE_AUMENTO_PASADOS_FECH'
DataType = datFloat
end
item
Name = 'DIFERENCIA_ORDENES_DEV'
DataType = datFloat
end
item
Name = 'PORCENTAJE_AUMENTO_ORDENES_DEV'
DataType = datFloat
end>
end
item
Params = <
item
Name = 'ID_EMPRESA'
Value = ''
end
item
Name = 'ANO'
Value = ''
end
item
Name = 'NTOP'
Value = ''
end>
Statements = <
item
Connection = 'IBX'
ConnectionType = 'Interbase'
Default = True
SQL =
'select P.ANO, C.REFERENCIA, C.NOMBRE, VT1.INCIDENCIAS_TOTALES as' +
' INCIDENCIAS_TOTAL_ANO,'#10'COUNT(P.FECHA_ALBARAN) as NUMALB, SUM(P.' +
'INCIDENCIAS) as INCIDENCIAS_TOTAL,'#10'((SUM(P.INCIDENCIAS)*100)/VT1' +
'.INCIDENCIAS_TOTALES) as PORCENTAJE'#10#10'from V_INF_ALB_CLIENTE P'#10'le' +
'ft join CONTACTOS C on P.ID_CLIENTE = C.ID'#10'inner join V_INF_ALB_' +
'CLI_INCIDEN_TOTAL_ANO VT1 on ((VT1.id_empresa = P.id_empresa) an' +
'd (VT1.Ano = EXTRACT(YEAR FROM P.FECHA_ALBARAN)))'#10#10'where (p.ID_E' +
'MPRESA = :ID_EMPRESA)'#10'and (P.ANO = :ANO)'#10'group by 1,2,3,4'#10'having' +
' (SUM(INCIDENCIAS) > 0)'#10'order by 1,6 desc'#10'rows 1 to :NTOP'#10
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'ANO'
TableField = 'ANO'
end
item
DatasetField = 'REFERENCIA'
TableField = 'REFERENCIA'
end
item
DatasetField = 'NOMBRE'
TableField = 'NOMBRE'
end
item
DatasetField = 'PORCENTAJE'
TableField = 'PORCENTAJE'
end
item
DatasetField = 'INCIDENCIAS_TOTAL_ANO'
TableField = 'INCIDENCIAS_TOTAL_ANO'
end
item
DatasetField = 'NUMALB'
TableField = 'NUMALB'
end
item
DatasetField = 'INCIDENCIAS_TOTAL'
TableField = 'INCIDENCIAS_TOTAL'
end>
end>
Name = 'InformeListadoClientesMayorIncidenciasResumen'
Fields = <
item
Name = 'ANO'
DataType = datSmallInt
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
end
item
Name = 'NOMBRE'
DataType = datString
Size = 255
end
item
Name = 'INCIDENCIAS_TOTAL_ANO'
DataType = datInteger
end
item
Name = 'NUMALB'
DataType = datInteger
end
item
Name = 'INCIDENCIAS_TOTAL'
DataType = datFloat
end
item
Name = 'PORCENTAJE'
DataType = datFloat
end>
end
item
Params = <
item
Name = 'ID_EMPRESA'
Value = ''
end
item
Name = 'ANO'
Value = ''
end
item
Name = 'NTOP'
Value = ''
end>
Statements = <
item
Connection = 'IBX'
ConnectionType = 'Interbase'
Default = True
SQL =
' select P.ANO, C.REFERENCIA, C.NOMBRE, VT1.ORDENES_DEV_TOTALES a' +
's ORDENES_TOTAL_ANO,'#10'COUNT(P.FECHA_ALBARAN) as NUMALB, SUM(P.ORD' +
'ENES_DEV) as ORDENES_TOTAL,'#10'((SUM(P.ORDENES_DEV)*100)/VT1.ORDENE' +
'S_DEV_TOTALES) as PORCENTAJE'#10#10'from V_INF_ALB_CLIENTE P'#10'left join' +
' CONTACTOS C on P.ID_CLIENTE = C.ID'#10'inner join V_INF_ALB_CLI_ORD' +
'DEV_TOTAL_ANO VT1 on ((VT1.id_empresa = P.id_empresa) and (VT1.A' +
'no = EXTRACT(YEAR FROM P.FECHA_ALBARAN)))'#10#10'where p.ID_EMPRESA = ' +
':ID_EMPRESA'#10'and P.ANO = :ANO'#10'group by 1,2,3,4'#10'having (SUM(P.ORDE' +
'NES_DEV) > 0)'#10'order by 1,6 desc'#10'rows 1 to :NTOP'#10#10
StatementType = stSQL
ColumnMappings = <
item
DatasetField = 'ANO'
TableField = 'ANO'
end
item
DatasetField = 'REFERENCIA'
TableField = 'REFERENCIA'
end
item
DatasetField = 'NOMBRE'
TableField = 'NOMBRE'
end
item
DatasetField = 'NUMALB'
TableField = 'NUMALB'
end
item
DatasetField = 'PORCENTAJE'
TableField = 'PORCENTAJE'
end
item
DatasetField = 'ORDENES_TOTAL_ANO'
TableField = 'ORDENES_TOTAL_ANO'
end
item
DatasetField = 'ORDENES_TOTAL'
TableField = 'ORDENES_TOTAL'
end>
end>
Name = 'InformeListadoClientesMayorOrdenesDevResumen'
Fields = <
item
Name = 'ANO'
DataType = datSmallInt
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
end
item
Name = 'NOMBRE'
DataType = datString
Size = 255
end
item
Name = 'ORDENES_TOTAL_ANO'
DataType = datInteger
end
item
Name = 'NUMALB'
DataType = datInteger
end
item
Name = 'ORDENES_TOTAL'
DataType = datFloat
end
item
Name = 'PORCENTAJE'
DataType = datFloat
end>
end>
JoinDataTables = <>
UnionDataTables = <>
Commands = <>
RelationShips = <>
UpdateRules = <>
Version = 0
Left = 48
Top = 16
end
object frxReport: TfrxReport
Version = '4.7.71'
DotMatrixReport = False
EngineOptions.DoublePass = True
IniFile = '\Software\Fast Reports'
PreviewOptions.Buttons = [pbPrint, pbLoad, pbSave, pbExport, pbZoom, pbFind, pbOutline, pbPageSetup, pbTools, pbEdit, pbNavigator, pbExportQuick]
PreviewOptions.Zoom = 1.000000000000000000
PrintOptions.Printer = 'Por defecto'
PrintOptions.PrintOnSheet = 0
ReportOptions.CreateDate = 37800.807714351900000000
ReportOptions.LastChange = 40644.654743692130000000
ScriptLanguage = 'PascalScript'
ScriptText.Strings = (
'procedure Chart1OnBeforePrint(Sender: TfrxComponent);'
'begin'
' '
' if (<Ano1> <> 0) then'
' begin '
' TLineSeries(Chart1.Series[0]).Title := '#39'Servidos '#39' + VarToS' +
'tr(<Ano1>);'
' TLineSeries(Chart1.Series[2]).Title := '#39'Incidencias '#39' + Var' +
'ToStr(<Ano1>);'
' TLineSeries(Chart1.Series[4]).Title := '#39'Fuera de fecha '#39' + ' +
'VarToStr(<Ano1>);'
' TLineSeries(Chart1.Series[6]).Title := '#39#211'rdenes dev. '#39' + Va' +
'rToStr(<Ano1>);'
' end;'
' '
' if (<Ano2> > 0) then'
' begin '
' TLineSeries(Chart1.Series[1]).Title := '#39'Servidos '#39' + VarToS' +
'tr(<Ano2>);'
' TLineSeries(Chart1.Series[3]).Title := '#39'Incidencias '#39' + Var' +
'ToStr(<Ano2>);'
' TLineSeries(Chart1.Series[5]).Title := '#39'Fuera de fecha '#39' + ' +
'VarToStr(<Ano2>);'
' TLineSeries(Chart1.Series[7]).Title := '#39#211'rdenes dev. '#39' + Va' +
'rToStr(<Ano2>);'
' end'
' else'
' begin '
' Chart1.Series[1].Active := False;'
' Chart1.Series[3].Active := False;'
' Chart1.Series[5].Active := False;'
' Chart1.Series[7].Active := False; '
' end;'
''
' if (<Serie> <> 0) then'
' begin'
'//Solo Servidos '
' if (<Serie> = 1) then'
' begin'
' Chart1.Series[0].Active := True;'
' Chart1.Series[1].Active := True;'
' Chart1.Series[2].Active := False;'
' Chart1.Series[3].Active := False;'
' Chart1.Series[4].Active := False;'
' Chart1.Series[5].Active := False;'
' Chart1.Series[6].Active := False;'
' Chart1.Series[7].Active := False;'
' end'
'//Solo Incidencias ' +
' '
' else if (<Serie> = 2) then'
' begin'
' Chart1.Series[0].Active := False;'
' Chart1.Series[1].Active := False;'
' Chart1.Series[2].Active := True;'
' Chart1.Series[3].Active := True;'
' Chart1.Series[4].Active := False;'
' Chart1.Series[5].Active := False;'
' Chart1.Series[6].Active := False;'
' Chart1.Series[7].Active := False;'
' end'
'//Solo Fuera de Fecha ' +
' '
' else if (<Serie> = 3) then'
' begin'
' Chart1.Series[0].Active := False;'
' Chart1.Series[1].Active := False;'
' Chart1.Series[2].Active := False;'
' Chart1.Series[3].Active := False;'
' Chart1.Series[4].Active := True;'
' Chart1.Series[5].Active := True;'
' Chart1.Series[6].Active := False;'
' Chart1.Series[7].Active := False;'
' end '
'//Solo Ordenes de devolucion ' +
' ' +
' '
' else if (<Serie> = 4) then'
' begin'
' Chart1.Series[0].Active := False;'
' Chart1.Series[1].Active := False;'
' Chart1.Series[2].Active := False;'
' Chart1.Series[3].Active := False;'
' Chart1.Series[4].Active := False;'
' Chart1.Series[5].Active := False;'
' Chart1.Series[6].Active := True;'
' Chart1.Series[7].Active := True;'
' end; '
' '
' end;'
'end;'
''
'procedure Memo16OnBeforePrint(Sender: TfrxComponent);'
'var'
' Valor:Double; '
'begin'
'{ '
' Valor := SUM(<frxDBInformeListadoFacturasGrafComp."IMPORTE_TOT' +
'AL1">) * 100; '
' if (SUM(<frxDBInformeListadoFacturasGrafComp."IMPORTE_TOTAL">)' +
' = 0) then'
' Valor := 100 - Valor '
' else'
' Valor := 100 - (Valor/SUM(<frxDBInformeListadoFacturasGrafC' +
'omp."IMPORTE_TOTAL">)); '
''
' memo16.lines.add(FormatFloat('#39'#,##0.00 %'#39',Valor));'
'} '
'end;'
''
'begin'
'end. ')
ShowProgress = False
StoreInDFM = False
OnGetValue = frxReportGetValue
OnStartReport = 'frxReportOnStartReport'
Left = 145
Top = 16
end
object frxDBCabecera: TfrxDBDataset
UserName = 'frxDBCabecera'
CloseDataSource = False
DataSource = DADSCabecera
BCDToCurrency = False
Left = 264
Top = 16
end
object frxDBDetalles: TfrxDBDataset
UserName = 'frxDBDetalles'
CloseDataSource = False
DataSource = DADSDetalles
BCDToCurrency = False
Left = 344
Top = 16
end
object IBDatabase1: TIBDatabase
DatabaseName = 'C:\Codigo\Database\FACTUGES.FDB'
Params.Strings = (
'user_name=sysdba'
'password=masterkey'
'lc_ctype=ISO8859_1')
LoginPrompt = False
DefaultTransaction = IBTransaction1
Left = 40
Top = 256
end
object IBTransaction1: TIBTransaction
Left = 40
Top = 312
end
object DataSource1: TDataSource
DataSet = cabecera
Left = 176
Top = 256
end
object DataSource3: TDataSource
DataSet = detalles
Left = 176
Top = 320
end
object detalles: TIBQuery
Database = IBDatabase1
Transaction = IBTransaction1
SQL.Strings = (
'SELECT ALBARANES_CLIENTE_DETALLES.ID, ALBARANES_CLIENTE_DETALLES' +
'.ID_ALBARAN,'
' ALBARANES_CLIENTE_DETALLES.POSICION, ALBARANES_CLIENTE_DE' +
'TALLES.TIPO_DETALLE,'
' F_RTFTOTEXT(ALBARANES_CLIENTE_DETALLES.CONCEPTO) as CONCE' +
'PTO, ALBARANES_CLIENTE_DETALLES.CANTIDAD,'
' ALBARANES_CLIENTE_DETALLES.IMPORTE_UNIDAD, ALBARANES_CLIE' +
'NTE_DETALLES.IMPORTE_TOTAL,'
' ARTICULOS.REFERENCIA'
'FROM ALBARANES_CLIENTE_DETALLES'
' LEFT JOIN ARTICULOS ON (ALBARANES_CLIENTE_DETALLES.ID_ARTIC' +
'ULO = ARTICULOS.ID)'
'WHERE'
' ID_ALBARAN = 11 AND (VISIBLE <> 0) '
'ORDER BY ID_ALBARAN, POSICION')
Left = 112
Top = 320
object detallesID: TIntegerField
FieldName = 'ID'
Origin = '"ALBARANES_CLIENTE_DETALLES"."ID"'
ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
Required = True
end
object detallesID_ALBARAN: TIntegerField
FieldName = 'ID_ALBARAN'
Origin = '"ALBARANES_CLIENTE_DETALLES"."ID_ALBARAN"'
Required = True
end
object detallesPOSICION: TIntegerField
FieldName = 'POSICION'
Origin = '"ALBARANES_CLIENTE_DETALLES"."POSICION"'
end
object detallesTIPO_DETALLE: TIBStringField
FieldName = 'TIPO_DETALLE'
Origin = '"ALBARANES_CLIENTE_DETALLES"."TIPO_DETALLE"'
Size = 10
end
object detallesCONCEPTO: TIBStringField
FieldName = 'CONCEPTO'
Origin = '"ALBARANES_CLIENTE_DETALLES"."CONCEPTO"'
Size = 254
end
object detallesCANTIDAD: TIntegerField
FieldName = 'CANTIDAD'
Origin = '"ALBARANES_CLIENTE_DETALLES"."CANTIDAD"'
end
object detallesIMPORTE_UNIDAD: TIBBCDField
FieldName = 'IMPORTE_UNIDAD'
Origin = '"ALBARANES_CLIENTE_DETALLES"."IMPORTE_UNIDAD"'
Precision = 18
Size = 2
end
object detallesIMPORTE_TOTAL: TIBBCDField
FieldName = 'IMPORTE_TOTAL'
Origin = '"ALBARANES_CLIENTE_DETALLES"."IMPORTE_TOTAL"'
Precision = 18
Size = 2
end
object detallesREFERENCIA: TIBStringField
FieldName = 'REFERENCIA'
Origin = '"ARTICULOS"."REFERENCIA"'
Size = 255
end
end
object cabecera: TIBQuery
Database = IBDatabase1
Transaction = IBTransaction1
SQL.Strings = (
'SELECT'
' V_ALBARANES_CLIENTE.ID, V_ALBARANES_CLIENTE.ID_EMPRESA,'
' V_ALBARANES_CLIENTE.ID_CLIENTE,'
' V_ALBARANES_CLIENTE.FECHA_ALBARAN,'
' V_ALBARANES_CLIENTE.REFERENCIA,'
' V_ALBARANES_CLIENTE.REFERENCIA_CLIENTE,'
' V_ALBARANES_CLIENTE.ID_PEDIDO,'
' V_ALBARANES_CLIENTE.REF_PEDIDO,'
' V_ALBARANES_CLIENTE.OBSERVACIONES,'
' V_ALBARANES_CLIENTE.IMPORTE_TOTAL,'
' V_CLIENTES.NIF_CIF, V_CLIENTES.NOMBRE,'
' V_CLIENTES.PERSONA_CONTACTO, V_CLIENTES.CALLE, V_CLIENTES.POBL' +
'ACION,'
' V_CLIENTES.PROVINCIA, V_CLIENTES.CODIGO_POSTAL'
'FROM'
' V_ALBARANES_CLIENTE'
' LEFT OUTER JOIN V_CLIENTES ON (V_CLIENTES.ID = V_ALBARANES_CLI' +
'ENTE.ID_CLIENTE)'
'WHERE V_ALBARANES_CLIENTE.ID = 11')
Left = 112
Top = 256
object cabeceraID: TIntegerField
FieldName = 'ID'
Origin = '"V_ALBARANES_CLIENTE"."ID"'
end
object cabeceraID_EMPRESA: TIntegerField
FieldName = 'ID_EMPRESA'
Origin = '"V_ALBARANES_CLIENTE"."ID_EMPRESA"'
end
object cabeceraID_CLIENTE: TIntegerField
FieldName = 'ID_CLIENTE'
Origin = '"V_ALBARANES_CLIENTE"."ID_CLIENTE"'
end
object cabeceraFECHA_ALBARAN: TDateField
FieldName = 'FECHA_ALBARAN'
Origin = '"V_ALBARANES_CLIENTE"."FECHA_ALBARAN"'
end
object cabeceraREFERENCIA: TIBStringField
FieldName = 'REFERENCIA'
Origin = '"V_ALBARANES_CLIENTE"."REFERENCIA"'
Size = 255
end
object cabeceraREFERENCIA_CLIENTE: TIBStringField
FieldName = 'REFERENCIA_CLIENTE'
Origin = '"V_ALBARANES_CLIENTE"."REFERENCIA_CLIENTE"'
Size = 255
end
object cabeceraID_PEDIDO: TIntegerField
FieldName = 'ID_PEDIDO'
Origin = '"V_ALBARANES_CLIENTE"."ID_PEDIDO"'
end
object cabeceraREF_PEDIDO: TIBStringField
FieldName = 'REF_PEDIDO'
Origin = '"V_ALBARANES_CLIENTE"."REF_PEDIDO"'
Size = 255
end
object cabeceraOBSERVACIONES: TMemoField
FieldName = 'OBSERVACIONES'
Origin = '"V_ALBARANES_CLIENTE"."OBSERVACIONES"'
ProviderFlags = [pfInUpdate]
BlobType = ftMemo
Size = 8
end
object cabeceraIMPORTE_TOTAL: TIBBCDField
FieldName = 'IMPORTE_TOTAL'
Origin = '"V_ALBARANES_CLIENTE"."IMPORTE_TOTAL"'
Precision = 18
Size = 2
end
object cabeceraNIF_CIF: TIBStringField
FieldName = 'NIF_CIF'
Origin = '"V_CLIENTES"."NIF_CIF"'
Size = 15
end
object cabeceraNOMBRE: TIBStringField
FieldName = 'NOMBRE'
Origin = '"V_CLIENTES"."NOMBRE"'
Size = 255
end
object cabeceraPERSONA_CONTACTO: TIBStringField
FieldName = 'PERSONA_CONTACTO'
Origin = '"V_CLIENTES"."PERSONA_CONTACTO"'
Size = 255
end
object cabeceraCALLE: TIBStringField
FieldName = 'CALLE'
Origin = '"V_CLIENTES"."CALLE"'
Size = 255
end
object cabeceraPOBLACION: TIBStringField
FieldName = 'POBLACION'
Origin = '"V_CLIENTES"."POBLACION"'
Size = 255
end
object cabeceraPROVINCIA: TIBStringField
FieldName = 'PROVINCIA'
Origin = '"V_CLIENTES"."PROVINCIA"'
Size = 255
end
object cabeceraCODIGO_POSTAL: TIBStringField
FieldName = 'CODIGO_POSTAL'
Origin = '"V_CLIENTES"."CODIGO_POSTAL"'
Size = 10
end
end
object tbl_Cabecera: TDAMemDataTable
RemoteUpdatesOptions = []
Fields = <
item
Name = 'ID'
DataType = datInteger
end
item
Name = 'ID_EMPRESA'
DataType = datInteger
end
item
Name = 'ID_CLIENTE'
DataType = datInteger
end
item
Name = 'NOMBRE'
DataType = datString
Size = 255
end
item
Name = 'NOMBRE_COMERCIAL'
DataType = datString
Size = 255
end
item
Name = 'FECHA_ALBARAN'
DataType = datDateTime
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
end
item
Name = 'REFERENCIA_CLIENTE'
DataType = datString
Size = 255
end
item
Name = 'ID_PEDIDO'
DataType = datInteger
end
item
Name = 'REF_PEDIDO'
DataType = datString
Size = 255
end
item
Name = 'CODIGO_POSTAL'
DataType = datString
Size = 10
end
item
Name = 'POBLACION'
DataType = datString
Size = 255
end
item
Name = 'PROVINCIA'
DataType = datString
Size = 255
end
item
Name = 'PERSONA_CONTACTO'
DataType = datString
Size = 255
end
item
Name = 'TELEFONO'
DataType = datString
Size = 25
end
item
Name = 'CALLE'
DataType = datString
Size = 255
end
item
Name = 'OBSERVACIONES'
DataType = datMemo
end
item
Name = 'INCIDENCIAS'
DataType = datMemo
end
item
Name = 'IMPORTE_TOTAL'
DataType = datCurrency
end
item
Name = 'FECHA_PREVISTA_ENVIO'
DataType = datDateTime
end
item
Name = 'NIF_CIF_EMPRESA'
DataType = datString
Size = 15
end
item
Name = 'NOMBRE_EMPRESA'
DataType = datString
Size = 255
end
item
Name = 'RAZON_SOCIAL_EMPRESA'
DataType = datString
Size = 255
end
item
Name = 'CALLE_EMPRESA'
DataType = datString
Size = 255
end
item
Name = 'CODIGO_POSTAL_EMPRESA'
DataType = datString
Size = 10
end
item
Name = 'POBLACION_EMPRESA'
DataType = datString
Size = 255
end
item
Name = 'PROVINCIA_EMPRESA'
DataType = datString
Size = 255
end
item
Name = 'TELEFONO_1_EMPRESA'
DataType = datString
Size = 25
end
item
Name = 'FAX_EMPRESA'
DataType = datString
Size = 25
end
item
Name = 'MOVIL_1_EMPRESA'
DataType = datString
Size = 25
end
item
Name = 'EMAIL_1_EMPRESA'
DataType = datString
Size = 255
end
item
Name = 'PAGINA_WEB_EMPRESA'
DataType = datString
Size = 255
end>
Params = <
item
Name = 'ID'
DataType = datInteger
Value = '11'
ParamType = daptInput
end>
LogChanges = False
StreamingOptions = [soDisableEventsWhileStreaming]
RemoteFetchEnabled = False
LocalSchema = schReport
LocalDataStreamer = DABin2DataStreamer1
LogicalName = 'Informe_Cabecera'
IndexDefs = <>
Left = 264
Top = 128
end
object tbl_Detalles: TDAMemDataTable
RemoteUpdatesOptions = []
Fields = <
item
Name = 'ID'
DataType = datInteger
end
item
Name = 'ID_ALBARAN'
DataType = datInteger
end
item
Name = 'POSICION'
DataType = datInteger
end
item
Name = 'TIPO_DETALLE'
DataType = datString
Size = 25
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
end
item
Name = 'CONCEPTO'
DataType = datString
Size = 32765
end
item
Name = 'CANTIDAD'
DataType = datCurrency
end
item
Name = 'IMPORTE_UNIDAD'
DataType = datFloat
end
item
Name = 'IMPORTE_TOTAL'
DataType = datCurrency
end
item
Name = 'REFERENCIA_PROVEEDOR'
DataType = datString
Size = 255
end>
Params = <
item
Name = 'ID_ALBARAN'
DataType = datInteger
Value = ''
end>
MasterParamsMappings.Strings = (
'ID_ALBARAN=ID')
LogChanges = False
StreamingOptions = [soDisableEventsWhileStreaming]
RemoteFetchEnabled = False
LocalSchema = schReport
LocalDataStreamer = DABin2DataStreamer1
DetailFields = 'ID_ALBARAN'
LogicalName = 'Informe_Detalles'
IndexDefs = <>
Left = 344
Top = 128
end
object frxPDFExport1: TfrxPDFExport
ShowDialog = False
UseFileCache = True
ShowProgress = False
OverwritePrompt = False
PrintOptimized = True
Outline = False
Background = False
HTMLTags = True
Author = 'FactuGES'
Subject = 'FactuGES'
Creator = 'FactuGES'
ProtectionFlags = [ePrint, eModify, eCopy, eAnnot]
HideToolbar = False
HideMenubar = False
HideWindowUI = False
FitWindow = False
CenterWindow = False
PrintScaling = False
Left = 344
Top = 304
end
object DABin2DataStreamer1: TDABin2DataStreamer
Left = 48
Top = 88
end
object frxDBInformeListadoAlbaranesGrafComp: TfrxDBDataset
UserName = 'frxDBInformeListadoAlbaranesGrafComp'
CloseDataSource = False
DataSource = DASInformeListadoAlbaranesGrafComp
BCDToCurrency = False
Left = 520
Top = 32
end
object DASInformeListadoAlbaranesGrafComp: TDADataSource
Left = 520
Top = 80
end
object tbl_InformeListadoAlbaranesGrafCompMensual: TDAMemDataTable
RemoteUpdatesOptions = []
Fields = <
item
Name = 'VALOR'
DataType = datSmallInt
end
item
Name = 'DESCRIPCION'
DataType = datString
Size = 20
end
item
Name = 'ANO1'
DataType = datSmallInt
end
item
Name = 'PENDIENTES_ANO1'
DataType = datFloat
end
item
Name = 'ENVIADOS_ANO1'
DataType = datFloat
end
item
Name = 'SERVIDOS_ANO1'
DataType = datFloat
end
item
Name = 'INCIDENCIAS_ANO1'
DataType = datFloat
end
item
Name = 'PORCENTAJE_INCIDENCIAS_ANO1'
DataType = datFloat
end
item
Name = 'PASADOS_FECHA_PREVISTA_ANO1'
DataType = datFloat
end
item
Name = 'PORCENTAJE_PASADOS_FECHA_PREVIS'
DataType = datFloat
end
item
Name = 'ORDENES_DEV_ANO1'
DataType = datFloat
end
item
Name = 'PORCENTAJE_ORDENES_DEV_ANO1'
DataType = datFloat
end
item
Name = 'ANO2'
DataType = datSmallInt
end
item
Name = 'PENDIENTES_ANO2'
DataType = datFloat
end
item
Name = 'ENVIADOS_ANO2'
DataType = datFloat
end
item
Name = 'SERVIDOS_ANO2'
DataType = datFloat
end
item
Name = 'INCIDENCIAS_ANO2'
DataType = datFloat
end
item
Name = 'PORCENTAJE_INCIDENCIAS_ANO2'
DataType = datFloat
end
item
Name = 'PASADOS_FECHA_PREVISTA_ANO2'
DataType = datFloat
end
item
Name = 'PORCENTAJE_PASADOS_FECHA_PREVI1'
DataType = datFloat
end
item
Name = 'ORDENES_DEV_ANO2'
DataType = datFloat
end
item
Name = 'PORCENTAJE_ORDENES_DEV_ANO2'
DataType = datFloat
end
item
Name = 'DIFERENCIA_SERVIDOS'
DataType = datFloat
end
item
Name = 'PORCENTAJE_AUMENTO_SERVIDOS'
DataType = datFloat
end
item
Name = 'DIFERENCIA_INCIDENCIAS'
DataType = datFloat
end
item
Name = 'PORCENTAJE_AUMENTO_INCIDENCIAS'
DataType = datFloat
end
item
Name = 'DIFERENCIA_PASADOS_FECHA_PREVIS'
DataType = datFloat
end
item
Name = 'PORCENTAJE_AUMENTO_PASADOS_FECH'
DataType = datFloat
end
item
Name = 'DIFERENCIA_ORDENES_DEV'
DataType = datFloat
end
item
Name = 'PORCENTAJE_AUMENTO_ORDENES_DEV'
DataType = datFloat
end>
Params = <
item
Name = 'ID_EMPRESA1'
Value = ''
end
item
Name = 'ANO1'
Value = ''
end
item
Name = 'ID_EMPRESA2'
Value = ''
end
item
Name = 'ANO2'
Value = ''
end>
LogChanges = False
StreamingOptions = [soDisableEventsWhileStreaming]
RemoteFetchEnabled = False
LocalSchema = schReport
LocalDataStreamer = DABin2DataStreamer1
LogicalName = 'InformeListadoAlbaranesGrafCompMensual'
IndexDefs = <>
Left = 520
Top = 136
end
object tbl_InformeListadoAlbaranesGrafCompTrimestral: TDAMemDataTable
RemoteUpdatesOptions = []
Fields = <
item
Name = 'VALOR'
DataType = datSmallInt
end
item
Name = 'DESCRIPCION'
DataType = datString
Size = 20
end
item
Name = 'ANO1'
DataType = datSmallInt
end
item
Name = 'PENDIENTES_ANO1'
DataType = datFloat
end
item
Name = 'ENVIADOS_ANO1'
DataType = datFloat
end
item
Name = 'SERVIDOS_ANO1'
DataType = datFloat
end
item
Name = 'INCIDENCIAS_ANO1'
DataType = datFloat
end
item
Name = 'PORCENTAJE_INCIDENCIAS_ANO1'
DataType = datFloat
end
item
Name = 'PASADOS_FECHA_PREVISTA_ANO1'
DataType = datFloat
end
item
Name = 'PORCENTAJE_PASADOS_FECHA_PREVIS'
DataType = datFloat
end
item
Name = 'ORDENES_DEV_ANO1'
DataType = datFloat
end
item
Name = 'PORCENTAJE_ORDENES_DEV_ANO1'
DataType = datFloat
end
item
Name = 'ANO2'
DataType = datSmallInt
end
item
Name = 'PENDIENTES_ANO2'
DataType = datFloat
end
item
Name = 'ENVIADOS_ANO2'
DataType = datFloat
end
item
Name = 'SERVIDOS_ANO2'
DataType = datFloat
end
item
Name = 'INCIDENCIAS_ANO2'
DataType = datFloat
end
item
Name = 'PORCENTAJE_INCIDENCIAS_ANO2'
DataType = datFloat
end
item
Name = 'PASADOS_FECHA_PREVISTA_ANO2'
DataType = datFloat
end
item
Name = 'PORCENTAJE_PASADOS_FECHA_PREVI1'
DataType = datFloat
end
item
Name = 'ORDENES_DEV_ANO2'
DataType = datFloat
end
item
Name = 'PORCENTAJE_ORDENES_DEV_ANO2'
DataType = datFloat
end
item
Name = 'DIFERENCIA_SERVIDOS'
DataType = datFloat
end
item
Name = 'PORCENTAJE_AUMENTO_SERVIDOS'
DataType = datFloat
end
item
Name = 'DIFERENCIA_INCIDENCIAS'
DataType = datFloat
end
item
Name = 'PORCENTAJE_AUMENTO_INCIDENCIAS'
DataType = datFloat
end
item
Name = 'DIFERENCIA_PASADOS_FECHA_PREVIS'
DataType = datFloat
end
item
Name = 'PORCENTAJE_AUMENTO_PASADOS_FECH'
DataType = datFloat
end
item
Name = 'DIFERENCIA_ORDENES_DEV'
DataType = datFloat
end
item
Name = 'PORCENTAJE_AUMENTO_ORDENES_DEV'
DataType = datFloat
end>
Params = <
item
Name = 'ID_EMPRESA1'
Value = ''
end
item
Name = 'ANO1'
Value = ''
end
item
Name = 'ID_EMPRESA2'
Value = ''
end
item
Name = 'ANO2'
Value = ''
end>
LogChanges = False
StreamingOptions = [soDisableEventsWhileStreaming]
RemoteFetchEnabled = False
LocalSchema = schReport
LocalDataStreamer = DABin2DataStreamer1
LogicalName = 'InformeListadoAlbaranesGrafCompTrimestral'
IndexDefs = <>
Left = 520
Top = 192
end
object tbl_InformeListadoAlbaranesGrafCompSemestral: TDAMemDataTable
RemoteUpdatesOptions = []
Fields = <
item
Name = 'VALOR'
DataType = datSmallInt
end
item
Name = 'DESCRIPCION'
DataType = datString
Size = 20
end
item
Name = 'ANO1'
DataType = datSmallInt
end
item
Name = 'PENDIENTES_ANO1'
DataType = datFloat
end
item
Name = 'ENVIADOS_ANO1'
DataType = datFloat
end
item
Name = 'SERVIDOS_ANO1'
DataType = datFloat
end
item
Name = 'INCIDENCIAS_ANO1'
DataType = datFloat
end
item
Name = 'PORCENTAJE_INCIDENCIAS_ANO1'
DataType = datFloat
end
item
Name = 'PASADOS_FECHA_PREVISTA_ANO1'
DataType = datFloat
end
item
Name = 'PORCENTAJE_PASADOS_FECHA_PREVIS'
DataType = datFloat
end
item
Name = 'ORDENES_DEV_ANO1'
DataType = datFloat
end
item
Name = 'PORCENTAJE_ORDENES_DEV_ANO1'
DataType = datFloat
end
item
Name = 'ANO2'
DataType = datSmallInt
end
item
Name = 'PENDIENTES_ANO2'
DataType = datFloat
end
item
Name = 'ENVIADOS_ANO2'
DataType = datFloat
end
item
Name = 'SERVIDOS_ANO2'
DataType = datFloat
end
item
Name = 'INCIDENCIAS_ANO2'
DataType = datFloat
end
item
Name = 'PORCENTAJE_INCIDENCIAS_ANO2'
DataType = datFloat
end
item
Name = 'PASADOS_FECHA_PREVISTA_ANO2'
DataType = datFloat
end
item
Name = 'PORCENTAJE_PASADOS_FECHA_PREVI1'
DataType = datFloat
end
item
Name = 'ORDENES_DEV_ANO2'
DataType = datFloat
end
item
Name = 'PORCENTAJE_ORDENES_DEV_ANO2'
DataType = datFloat
end
item
Name = 'DIFERENCIA_SERVIDOS'
DataType = datFloat
end
item
Name = 'PORCENTAJE_AUMENTO_SERVIDOS'
DataType = datFloat
end
item
Name = 'DIFERENCIA_INCIDENCIAS'
DataType = datFloat
end
item
Name = 'PORCENTAJE_AUMENTO_INCIDENCIAS'
DataType = datFloat
end
item
Name = 'DIFERENCIA_PASADOS_FECHA_PREVIS'
DataType = datFloat
end
item
Name = 'PORCENTAJE_AUMENTO_PASADOS_FECH'
DataType = datFloat
end
item
Name = 'DIFERENCIA_ORDENES_DEV'
DataType = datFloat
end
item
Name = 'PORCENTAJE_AUMENTO_ORDENES_DEV'
DataType = datFloat
end>
Params = <
item
Name = 'ID_EMPRESA1'
Value = ''
end
item
Name = 'ANO1'
Value = ''
end
item
Name = 'ID_EMPRESA2'
Value = ''
end
item
Name = 'ANO2'
Value = ''
end>
LogChanges = False
StreamingOptions = [soDisableEventsWhileStreaming]
RemoteFetchEnabled = False
LocalSchema = schReport
LocalDataStreamer = DABin2DataStreamer1
LogicalName = 'InformeListadoAlbaranesGrafCompSemestral'
IndexDefs = <>
Left = 520
Top = 248
end
object frxDBInformeListadoClientesMayorAlbaranadoResumen: TfrxDBDataset
UserName = 'frxDBInformeListadoClientesMayorAlbaranadoResumen'
CloseDataSource = False
DataSource = DADSInformeListadoClientesMayorAlbaranadoResumen
BCDToCurrency = False
Left = 776
Top = 32
end
object DADSInformeListadoClientesMayorAlbaranadoResumen: TDADataSource
DataSet = tbl_InformeListadoClientesMayorAlbaranadoResumen.Dataset
DataTable = tbl_InformeListadoClientesMayorAlbaranadoResumen
Left = 776
Top = 88
end
object tbl_InformeListadoClientesMayorAlbaranadoResumen: TDAMemDataTable
RemoteUpdatesOptions = []
Fields = <
item
Name = 'ANO'
DataType = datSmallInt
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
end
item
Name = 'NOMBRE'
DataType = datString
Size = 255
end
item
Name = 'IMPORTE_TOTAL_ANO'
DataType = datCurrency
end
item
Name = 'NUMALB'
DataType = datInteger
end
item
Name = 'IMPORTE_TOTAL'
DataType = datCurrency
end
item
Name = 'PORCENTAJE'
DataType = datCurrency
end>
Params = <
item
Name = 'ID_EMPRESA'
Value = ''
end
item
Name = 'ANO'
Value = ''
end
item
Name = 'NTOP'
Value = ''
end>
MasterMappingMode = mmDataRequest
LogChanges = False
StreamingOptions = [soDisableEventsWhileStreaming]
RemoteFetchEnabled = False
LocalSchema = schReport
LocalDataStreamer = DABin2DataStreamer1
LogicalName = 'InformeListadoClientesMayorAlbaranadoResumen'
IndexDefs = <>
Left = 776
Top = 144
end
object frxDBInformeListadoClientesMayorIncidenciasResumen: TfrxDBDataset
UserName = 'frxDBInformeListadoClientesMayorIncidenciasResumen'
CloseDataSource = False
DataSource = DADSInformeListadoClientesMayorIncidenciasResumen
BCDToCurrency = False
Left = 776
Top = 216
end
object DADSInformeListadoClientesMayorIncidenciasResumen: TDADataSource
DataSet = tbl_InformeListadoClientesMayorIncidenciasResumen.Dataset
DataTable = tbl_InformeListadoClientesMayorIncidenciasResumen
Left = 776
Top = 272
end
object tbl_InformeListadoClientesMayorIncidenciasResumen: TDAMemDataTable
RemoteUpdatesOptions = []
Fields = <
item
Name = 'ANO'
DataType = datSmallInt
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
end
item
Name = 'NOMBRE'
DataType = datString
Size = 255
end
item
Name = 'INCIDENCIAS_TOTAL_ANO'
DataType = datInteger
end
item
Name = 'NUMALB'
DataType = datInteger
end
item
Name = 'INCIDENCIAS_TOTAL'
DataType = datFloat
end
item
Name = 'PORCENTAJE'
DataType = datFloat
end>
Params = <
item
Name = 'ID_EMPRESA'
Value = ''
end
item
Name = 'ANO'
Value = ''
end
item
Name = 'NTOP'
Value = ''
end>
MasterMappingMode = mmDataRequest
LogChanges = False
StreamingOptions = [soDisableEventsWhileStreaming]
RemoteFetchEnabled = False
LocalSchema = schReport
LocalDataStreamer = DABin2DataStreamer1
LogicalName = 'InformeListadoClientesMayorIncidenciasResumen'
IndexDefs = <>
Left = 776
Top = 328
end
object frxDBInformeListadoClientesMayorOrdenesDevResumen: TfrxDBDataset
UserName = 'frxDBInformeListadoClientesMayorOrdenesDevResumen'
CloseDataSource = False
DataSource = DADSInformeListadoClientesMayorOrdenesDevResumen
BCDToCurrency = False
Left = 776
Top = 400
end
object DADSInformeListadoClientesMayorOrdenesDevResumen: TDADataSource
DataSet = tbl_InformeListadoClientesMayorOrdenesDevResumen.Dataset
DataTable = tbl_InformeListadoClientesMayorOrdenesDevResumen
Left = 776
Top = 456
end
object tbl_InformeListadoClientesMayorOrdenesDevResumen: TDAMemDataTable
RemoteUpdatesOptions = []
Fields = <
item
Name = 'ANO'
DataType = datSmallInt
end
item
Name = 'REFERENCIA'
DataType = datString
Size = 255
end
item
Name = 'NOMBRE'
DataType = datString
Size = 255
end
item
Name = 'ORDENES_TOTAL_ANO'
DataType = datInteger
end
item
Name = 'NUMALB'
DataType = datInteger
end
item
Name = 'ORDENES_TOTAL'
DataType = datFloat
end
item
Name = 'PORCENTAJE'
DataType = datFloat
end>
Params = <
item
Name = 'ID_EMPRESA'
Value = ''
end
item
Name = 'ANO'
Value = ''
end
item
Name = 'NTOP'
Value = ''
end>
MasterMappingMode = mmDataRequest
LogChanges = False
StreamingOptions = [soDisableEventsWhileStreaming]
RemoteFetchEnabled = False
LocalSchema = schReport
LocalDataStreamer = DABin2DataStreamer1
LogicalName = 'InformeListadoClientesMayorOrdenesDevResumen'
IndexDefs = <>
Left = 776
Top = 512
end
end
Reference in New Issue View Git Blame Copy Permalink