diff --git a/Source/Informes/InfAlbaranCliente.fr3 b/Source/Informes/InfAlbaranCliente.fr3 index 0b81150a..6f362421 100644 --- a/Source/Informes/InfAlbaranCliente.fr3 +++ b/Source/Informes/InfAlbaranCliente.fr3 @@ -1,12 +1,10 @@ - + - - - - + + @@ -32,10 +30,10 @@ - + - + diff --git a/Source/Informes/InfPresupuestoCliente.fr3 b/Source/Informes/InfPresupuestoCliente.fr3 index 4d5a7023..1c666909 100644 --- a/Source/Informes/InfPresupuestoCliente.fr3 +++ b/Source/Informes/InfPresupuestoCliente.fr3 @@ -1,5 +1,5 @@ - + @@ -24,9 +24,6 @@ - - - @@ -40,6 +37,7 @@ + @@ -50,10 +48,8 @@ - - - - + + diff --git a/Source/Modulos/Albaranes de cliente/Reports/uRptAlbaranesCliente_Server.dfm b/Source/Modulos/Albaranes de cliente/Reports/uRptAlbaranesCliente_Server.dfm index eb45e097..65bcf342 100644 --- a/Source/Modulos/Albaranes de cliente/Reports/uRptAlbaranesCliente_Server.dfm +++ b/Source/Modulos/Albaranes de cliente/Reports/uRptAlbaranesCliente_Server.dfm @@ -68,11 +68,16 @@ object RptAlbaranesCliente: TRptAlbaranesCliente 'REFERENCIA_CLIENTE,'#10' V_ALBARANES_CLIENTE.ID_PEDIDO,'#10' V_ALBARAN' + 'ES_CLIENTE.REF_PEDIDO,'#10' V_ALBARANES_CLIENTE.OBSERVACIONES,'#10' V_' + 'ALBARANES_CLIENTE.IMPORTE_TOTAL,'#10' CONTACTOS.NIF_CIF, CONTACTOS.' + - 'NOMBRE,'#10' V_ALBARANES_CLIENTE.PERSONA_CONTACTO, V_ALBARANES_CLIE' + - 'NTE.CALLE, V_ALBARANES_CLIENTE.POBLACION,'#10' V_ALBARANES_CLIENTE.' + - 'PROVINCIA, V_ALBARANES_CLIENTE.CODIGO_POSTAL'#10'FROM'#10' V_ALBARANES_' + - 'CLIENTE'#10' INNER JOIN CONTACTOS ON (CONTACTOS.ID = V_ALBARANES_C' + - 'LIENTE.ID_CLIENTE)'#10'WHERE V_ALBARANES_CLIENTE.ID = :ID'#10 + 'NOMBRE,'#10' V_ALBARANES_CLIENTE.PERSONA_CONTACTO,'#10' COALESCE(CONTA' + + 'CTOS_DIRECCIONES.CALLE, CONTACTOS.CALLE) AS CALLE,'#10' COALESCE(CO' + + 'NTACTOS_DIRECCIONES.POBLACION, CONTACTOS.POBLACION) AS POBLACION' + + ','#10' COALESCE(CONTACTOS_DIRECCIONES.PROVINCIA, CONTACTOS.PROVINCI' + + 'A) AS PROVINCIA,'#10' COALESCE(CONTACTOS_DIRECCIONES.CODIGO_POSTAL,' + + ' CONTACTOS.CODIGO_POSTAL) AS CODIGO_POSTAL'#10'FROM'#10' V_ALBARANES_CL' + + 'IENTE'#10' INNER JOIN CONTACTOS ON (CONTACTOS.ID = V_ALBARANES_CLIE' + + 'NTE.ID_CLIENTE)'#10' LEFT OUTER JOIN CONTACTOS_DIRECCIONES ON (CONT' + + 'ACTOS_DIRECCIONES.ID = V_ALBARANES_CLIENTE.ID_DIRECCION)'#10'WHERE V' + + '_ALBARANES_CLIENTE.ID = :ID'#10#10 StatementType = stSQL ColumnMappings = < item diff --git a/Source/Modulos/Albaranes de cliente/Reports/uRptWordAlbaranCliente.dfm b/Source/Modulos/Albaranes de cliente/Reports/uRptWordAlbaranCliente.dfm index ace117e1..86d4845b 100644 --- a/Source/Modulos/Albaranes de cliente/Reports/uRptWordAlbaranCliente.dfm +++ b/Source/Modulos/Albaranes de cliente/Reports/uRptWordAlbaranCliente.dfm @@ -10,7 +10,7 @@ object RptWordAlbaranCliente: TRptWordAlbaranCliente Params = < item Name = 'ID' - Value = '2' + Value = '14' ParamType = daptInput end> Statements = < @@ -23,11 +23,16 @@ object RptWordAlbaranCliente: TRptWordAlbaranCliente 'REFERENCIA_CLIENTE,'#10' V_ALBARANES_CLIENTE.ID_PEDIDO,'#10' V_ALBARAN' + 'ES_CLIENTE.REF_PEDIDO,'#10' V_ALBARANES_CLIENTE.OBSERVACIONES,'#10' V_' + 'ALBARANES_CLIENTE.IMPORTE_TOTAL,'#10' CONTACTOS.NIF_CIF, CONTACTOS.' + - 'NOMBRE,'#10' V_ALBARANES_CLIENTE.PERSONA_CONTACTO, V_ALBARANES_CLIE' + - 'NTE.CALLE, V_ALBARANES_CLIENTE.POBLACION,'#10' V_ALBARANES_CLIENTE.' + - 'PROVINCIA, V_ALBARANES_CLIENTE.CODIGO_POSTAL'#10'FROM'#10' V_ALBARANES_' + - 'CLIENTE'#10' INNER JOIN CONTACTOS ON (CONTACTOS.ID = V_ALBARANES_CL' + - 'IENTE.ID_CLIENTE)'#10'WHERE V_ALBARANES_CLIENTE.ID = :ID'#10#10 + 'NOMBRE,'#10' V_ALBARANES_CLIENTE.PERSONA_CONTACTO,'#10' COALESCE(CONTA' + + 'CTOS_DIRECCIONES.CALLE, CONTACTOS.CALLE) AS CALLE,'#10' COALESCE(CO' + + 'NTACTOS_DIRECCIONES.POBLACION, CONTACTOS.POBLACION) AS POBLACION' + + ','#10' COALESCE(CONTACTOS_DIRECCIONES.PROVINCIA, CONTACTOS.PROVINCI' + + 'A) AS PROVINCIA,'#10' COALESCE(CONTACTOS_DIRECCIONES.CODIGO_POSTAL,' + + ' CONTACTOS.CODIGO_POSTAL) AS CODIGO_POSTAL'#10'FROM'#10' V_ALBARANES_CL' + + 'IENTE'#10' INNER JOIN CONTACTOS ON (CONTACTOS.ID = V_ALBARANES_CLIE' + + 'NTE.ID_CLIENTE)'#10' LEFT OUTER JOIN CONTACTOS_DIRECCIONES ON (CONT' + + 'ACTOS_DIRECCIONES.ID = V_ALBARANES_CLIENTE.ID_DIRECCION)'#10'WHERE V' + + '_ALBARANES_CLIENTE.ID = :ID'#10#10 StatementType = stSQL ColumnMappings = < item @@ -70,6 +75,18 @@ object RptWordAlbaranCliente: TRptWordAlbaranCliente DatasetField = 'PERSONA_CONTACTO' TableField = 'PERSONA_CONTACTO' 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 = 'CALLE' TableField = 'CALLE' @@ -85,18 +102,6 @@ object RptWordAlbaranCliente: TRptWordAlbaranCliente item DatasetField = 'CODIGO_POSTAL' TableField = 'CODIGO_POSTAL' - 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> end> Name = 'Informe_Cabecera' diff --git a/Source/Modulos/Presupuestos de cliente/PresupuestosCliente_Group.groupproj b/Source/Modulos/Presupuestos de cliente/PresupuestosCliente_Group.groupproj index 04f81aa0..42be1da3 100644 --- a/Source/Modulos/Presupuestos de cliente/PresupuestosCliente_Group.groupproj +++ b/Source/Modulos/Presupuestos de cliente/PresupuestosCliente_Group.groupproj @@ -189,24 +189,6 @@ - - - - - - - - - - - - - - - - - - @@ -261,14 +243,32 @@ + + + + + + + + + + + + + + + + + + - + - + - + \ No newline at end of file diff --git a/Source/Modulos/Presupuestos de cliente/Reports/uRptPresupuestosCliente_Server.dfm b/Source/Modulos/Presupuestos de cliente/Reports/uRptPresupuestosCliente_Server.dfm index 1d17a228..82a72e86 100644 --- a/Source/Modulos/Presupuestos de cliente/Reports/uRptPresupuestosCliente_Server.dfm +++ b/Source/Modulos/Presupuestos de cliente/Reports/uRptPresupuestosCliente_Server.dfm @@ -61,14 +61,17 @@ object RptPresupuestosCliente: TRptPresupuestosCliente 'STOS_CLIENTE.ID_CLIENTE,'#10' V_PRESUPUESTOS_CLIENTE.REFERENCIA_C' + 'LIENTE,'#10' V_PRESUPUESTOS_CLIENTE.CLIENTE_FINAL,'#10' CONTACTOS.' + 'NIF_CIF, CONTACTOS.NOMBRE,'#10' V_PRESUPUESTOS_CLIENTE.IMPORTE_IV' + - 'A, V_PRESUPUESTOS_CLIENTE.IMPORTE_TOTAL,'#10' CONTACTOS_DIRECCION' + - 'ES.CALLE, CONTACTOS_DIRECCIONES.POBLACION,'#10' CONTACTOS_DIRECCI' + - 'ONES.PROVINCIA, CONTACTOS_DIRECCIONES.CODIGO_POSTAL,'#10' V_PRESU' + - 'PUESTOS_CLIENTE.PERSONA_CONTACTO'#10'FROM'#10' V_PRESUPUESTOS_CLIENTE' + - #10' INNER JOIN CONTACTOS ON (CONTACTOS.ID = V_PRESUPUESTOS_CLIE' + - 'NTE.ID_CLIENTE)'#10' INNER JOIN CONTACTOS_DIRECCIONES ON (CONTACT' + - 'OS_DIRECCIONES.ID = V_PRESUPUESTOS_CLIENTE.ID_DIRECCION)'#10'WHERE'#10' ' + - ' V_PRESUPUESTOS_CLIENTE.ID = :ID'#10 + 'A, V_PRESUPUESTOS_CLIENTE.IMPORTE_TOTAL,'#10' COALESCE(CONTACTOS_' + + 'DIRECCIONES.CALLE, CONTACTOS.CALLE) AS CALLE,'#10' COALESCE(CONTA' + + 'CTOS_DIRECCIONES.POBLACION, CONTACTOS.POBLACION) AS POBLACION,'#10' ' + + ' COALESCE(CONTACTOS_DIRECCIONES.PROVINCIA, CONTACTOS.PROVINCIA' + + ') AS PROVINCIA,'#10' COALESCE(CONTACTOS_DIRECCIONES.CODIGO_POSTAL' + + ', CONTACTOS.CODIGO_POSTAL) AS CODIGO_POSTAL,'#10' V_PRESUPUESTOS_' + + 'CLIENTE.PERSONA_CONTACTO'#10'FROM'#10' V_PRESUPUESTOS_CLIENTE'#10' INN' + + 'ER JOIN CONTACTOS ON (CONTACTOS.ID = V_PRESUPUESTOS_CLIENTE.ID_C' + + 'LIENTE)'#10' LEFT OUTER JOIN CONTACTOS_DIRECCIONES ON (CONTACTOS_' + + 'DIRECCIONES.ID = V_PRESUPUESTOS_CLIENTE.ID_DIRECCION)'#10'WHERE'#10' ' + + 'V_PRESUPUESTOS_CLIENTE.ID = :ID'#10 StatementType = stSQL ColumnMappings = < item diff --git a/Source/Modulos/Presupuestos de cliente/Reports/uRptWordCertificadoTrabajo_Server.dfm b/Source/Modulos/Presupuestos de cliente/Reports/uRptWordCertificadoTrabajo_Server.dfm index 0318deb8..722dec99 100644 --- a/Source/Modulos/Presupuestos de cliente/Reports/uRptWordCertificadoTrabajo_Server.dfm +++ b/Source/Modulos/Presupuestos de cliente/Reports/uRptWordCertificadoTrabajo_Server.dfm @@ -27,14 +27,19 @@ object RptWordCertificadoTrabajo: TRptWordCertificadoTrabajo ' V_PRESUPUESTOS_CLIENTE.IMPORTE_DESCUENTO,'#10' V_PRESUPUESTOS_CL' + 'IENTE.BASE_IMPONIBLE, V_PRESUPUESTOS_CLIENTE.IVA,'#10' V_PRESUPUE' + 'STOS_CLIENTE.ID_CLIENTE,'#10' V_PRESUPUESTOS_CLIENTE.REFERENCIA_C' + - 'LIENTE,'#10' V_PRESUPUESTOS_CLIENTE.CLIENTE_FINAL,'#10' V_CLIENTES' + - '.NIF_CIF, V_CLIENTES.NOMBRE,'#10' V_PRESUPUESTOS_CLIENTE.IMPORTE_' + - 'IVA, V_PRESUPUESTOS_CLIENTE.IMPORTE_TOTAL,'#10' V_CLIENTES.PERSON' + - 'A_CONTACTO, V_CLIENTES.CALLE, V_CLIENTES.POBLACION,'#10' V_CLIENT' + - 'ES.PROVINCIA, V_CLIENTES.CODIGO_POSTAL'#10'FROM'#10' V_PRESUPUESTOS_C' + - 'LIENTE INNER JOIN V_CLIENTES ON'#10' (V_PRESUPUESTOS_CLIENTE.' + - 'ID_CLIENTE = V_CLIENTES.ID)'#10' WHERE V_PRESUPUESTOS_CLIENTE.ID = ' + - ':ID'#10 + 'LIENTE,'#10' V_PRESUPUESTOS_CLIENTE.CLIENTE_FINAL,'#10' CONTACTOS.' + + 'NIF_CIF, CONTACTOS.NOMBRE,'#10' V_PRESUPUESTOS_CLIENTE.IMPORTE_IV' + + 'A, V_PRESUPUESTOS_CLIENTE.IMPORTE_TOTAL,'#10' COALESCE(CONTACTOS_' + + 'DIRECCIONES.CALLE, CONTACTOS.CALLE) AS CALLE,'#10' COALESCE(CONTA' + + 'CTOS_DIRECCIONES.POBLACION, CONTACTOS.POBLACION) AS POBLACION,'#10' ' + + ' COALESCE(CONTACTOS_DIRECCIONES.PROVINCIA, CONTACTOS.PROVINCIA' + + ') AS PROVINCIA,'#10' COALESCE(CONTACTOS_DIRECCIONES.CODIGO_POSTAL' + + ', CONTACTOS.CODIGO_POSTAL) AS CODIGO_POSTAL,'#10' V_PRESUPUESTOS_' + + 'CLIENTE.PERSONA_CONTACTO'#10'FROM'#10' V_PRESUPUESTOS_CLIENTE'#10' INN' + + 'ER JOIN CONTACTOS ON (CONTACTOS.ID = V_PRESUPUESTOS_CLIENTE.ID_C' + + 'LIENTE)'#10' LEFT OUTER JOIN CONTACTOS_DIRECCIONES ON (CONTACTOS_' + + 'DIRECCIONES.ID = V_PRESUPUESTOS_CLIENTE.ID_DIRECCION)'#10'WHERE'#10' ' + + 'V_PRESUPUESTOS_CLIENTE.ID = :ID'#10 StatementType = stSQL ColumnMappings = < item @@ -227,11 +232,6 @@ object RptWordCertificadoTrabajo: TRptWordCertificadoTrabajo Name = 'IMPORTE_TOTAL' DataType = datCurrency end - item - Name = 'PERSONA_CONTACTO' - DataType = datString - Size = 255 - end item Name = 'CALLE' DataType = datString @@ -251,6 +251,11 @@ object RptWordCertificadoTrabajo: TRptWordCertificadoTrabajo Name = 'CODIGO_POSTAL' DataType = datString Size = 10 + end + item + Name = 'PERSONA_CONTACTO' + DataType = datString + Size = 255 end> ReadOnly = True end diff --git a/Source/Modulos/Presupuestos de cliente/Reports/uRptWordPresupuestoCliente.dfm b/Source/Modulos/Presupuestos de cliente/Reports/uRptWordPresupuestoCliente.dfm index 98a0144c..4e776024 100644 --- a/Source/Modulos/Presupuestos de cliente/Reports/uRptWordPresupuestoCliente.dfm +++ b/Source/Modulos/Presupuestos de cliente/Reports/uRptWordPresupuestoCliente.dfm @@ -29,14 +29,17 @@ object RptWordPresupuestoCliente: TRptWordPresupuestoCliente 'STOS_CLIENTE.ID_CLIENTE,'#10' V_PRESUPUESTOS_CLIENTE.REFERENCIA_C' + 'LIENTE,'#10' V_PRESUPUESTOS_CLIENTE.CLIENTE_FINAL,'#10' CONTACTOS.' + 'NIF_CIF, CONTACTOS.NOMBRE,'#10' V_PRESUPUESTOS_CLIENTE.IMPORTE_IV' + - 'A, V_PRESUPUESTOS_CLIENTE.IMPORTE_TOTAL,'#10' CONTACTOS_DIRECCION' + - 'ES.CALLE, CONTACTOS_DIRECCIONES.POBLACION,'#10' CONTACTOS_DIRECCI' + - 'ONES.PROVINCIA, CONTACTOS_DIRECCIONES.CODIGO_POSTAL,'#10' V_PRESU' + - 'PUESTOS_CLIENTE.PERSONA_CONTACTO'#10'FROM'#10' V_PRESUPUESTOS_CLIENTE' + - #10' INNER JOIN CONTACTOS ON (CONTACTOS.ID = V_PRESUPUESTOS_CLIE' + - 'NTE.ID_CLIENTE)'#10' INNER JOIN CONTACTOS_DIRECCIONES ON (CONTACT' + - 'OS_DIRECCIONES.ID = V_PRESUPUESTOS_CLIENTE.ID_DIRECCION)'#10'WHERE'#10' ' + - ' V_PRESUPUESTOS_CLIENTE.ID = :ID'#10 + 'A, V_PRESUPUESTOS_CLIENTE.IMPORTE_TOTAL,'#10' COALESCE(CONTACTOS_' + + 'DIRECCIONES.CALLE, CONTACTOS.CALLE) AS CALLE,'#10' COALESCE(CONTA' + + 'CTOS_DIRECCIONES.POBLACION, CONTACTOS.POBLACION) AS POBLACION,'#10' ' + + ' COALESCE(CONTACTOS_DIRECCIONES.PROVINCIA, CONTACTOS.PROVINCIA' + + ') AS PROVINCIA,'#10' COALESCE(CONTACTOS_DIRECCIONES.CODIGO_POSTAL' + + ', CONTACTOS.CODIGO_POSTAL) AS CODIGO_POSTAL,'#10' V_PRESUPUESTOS_' + + 'CLIENTE.PERSONA_CONTACTO'#10'FROM'#10' V_PRESUPUESTOS_CLIENTE'#10' INN' + + 'ER JOIN CONTACTOS ON (CONTACTOS.ID = V_PRESUPUESTOS_CLIENTE.ID_C' + + 'LIENTE)'#10' LEFT OUTER JOIN CONTACTOS_DIRECCIONES ON (CONTACTOS_' + + 'DIRECCIONES.ID = V_PRESUPUESTOS_CLIENTE.ID_DIRECCION)'#10'WHERE'#10' ' + + 'V_PRESUPUESTOS_CLIENTE.ID = :ID'#10 StatementType = stSQL ColumnMappings = < item