Arreglo de informes de recibos de cliente y facturas de cliente
git-svn-id: https://192.168.0.254/svn/Proyectos.Acana_FactuGES2/trunk@216 f4e31baf-9722-1c47-927c-6f952f962d4b
This commit is contained in:
parent
c09389e457
commit
04f4a459f5
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
@ -311,22 +311,21 @@ object RptRecibosCliente: TRptRecibosCliente
|
|||||||
'TE,'#10' V_RECIBOS_CLIENTE.OTROS_GASTOS,'#10' V_RECIBOS_CLIENTE.IM' +
|
'TE,'#10' V_RECIBOS_CLIENTE.OTROS_GASTOS,'#10' V_RECIBOS_CLIENTE.IM' +
|
||||||
'PORTE_TOTAL,'#10' V_RECIBOS_CLIENTE.FECHA_FACTURA,'#10' V_RECIBOS_' +
|
'PORTE_TOTAL,'#10' V_RECIBOS_CLIENTE.FECHA_FACTURA,'#10' V_RECIBOS_' +
|
||||||
'CLIENTE.FORMA_PAGO_FACTURA,'#10' V_RECIBOS_CLIENTE.IMPORTE_FACTUR' +
|
'CLIENTE.FORMA_PAGO_FACTURA,'#10' V_RECIBOS_CLIENTE.IMPORTE_FACTUR' +
|
||||||
'A,'#10' V_RECIBOS_CLIENTE.NOMBRE_CLIENTE,'#10' V_RECIBOS_CLIENTE.N' +
|
'A,'#10' V_RECIBOS_CLIENTE.NOMBRE,'#10' V_RECIBOS_CLIENTE.NIF_CIF,'#10 +
|
||||||
'IF_CIF_CLIENTE,'#10' V_RECIBOS_CLIENTE.CALLE_CLIENTE,'#10' V_RECIB' +
|
' V_RECIBOS_CLIENTE.CALLE,'#10' V_RECIBOS_CLIENTE.PROVINCIA,'#10' ' +
|
||||||
'OS_CLIENTE.PROVINCIA_CLIENTE,'#10' V_RECIBOS_CLIENTE.CODIGO_POSTA' +
|
' V_RECIBOS_CLIENTE.CODIGO_POSTAL,'#10' V_RECIBOS_CLIENTE.POBLACI' +
|
||||||
'L_CLIENTE,'#10' V_RECIBOS_CLIENTE.POBLACION_CLIENTE,'#10' V_RECIBO' +
|
'ON,'#10' V_RECIBOS_CLIENTE.ENTIDAD_CLIENTE,'#10' V_RECIBOS_CLIENTE' +
|
||||||
'S_CLIENTE.ENTIDAD_CLIENTE,'#10' V_RECIBOS_CLIENTE.SUCURSAL_CLIENT' +
|
'.SUCURSAL_CLIENTE,'#10' V_RECIBOS_CLIENTE.DC_CLIENTE,'#10' V_RECIB' +
|
||||||
'E,'#10' V_RECIBOS_CLIENTE.DC_CLIENTE,'#10' V_RECIBOS_CLIENTE.CUENT' +
|
'OS_CLIENTE.CUENTA_CLIENTE,'#10' V_RECIBOS_CLIENTE.ID_TIENDA,'#10' ' +
|
||||||
'A_CLIENTE,'#10' V_RECIBOS_CLIENTE.ID_TIENDA,'#10' V_RECIBOS_CLIENT' +
|
'V_RECIBOS_CLIENTE.TIENDA,'#10' EMPRESAS.NIF_CIF as NIF_CIF_EMPRES' +
|
||||||
'E.TIENDA,'#10' EMPRESAS.NIF_CIF as NIF_CIF_EMPRESA, EMPRESAS.RAZO' +
|
'A, EMPRESAS.RAZON_SOCIAL,'#10' EMPRESAS.CALLE as CALLE_EMPRESA, E' +
|
||||||
'N_SOCIAL,'#10' EMPRESAS.CALLE as CALLE_EMPRESA, EMPRESAS.POBLACIO' +
|
'MPRESAS.POBLACION as POBLACION_EMPRESA,'#10' EMPRESAS.PROVINCIA a' +
|
||||||
'N as POBLACION_EMPRESA,'#10' EMPRESAS.PROVINCIA as PROVINCIA_EMPR' +
|
's PROVINCIA_EMPRESA, EMPRESAS.CODIGO_POSTAL as CODIGO_POSTAL_EMP' +
|
||||||
'ESA, EMPRESAS.CODIGO_POSTAL as CODIGO_POSTAL_EMPRESA,'#10' EMPRES' +
|
'RESA,'#10' EMPRESAS.TELEFONO_1, EMPRESAS.FAX, EMPRESAS.MOVIL_1, E' +
|
||||||
'AS.TELEFONO_1, EMPRESAS.FAX, EMPRESAS.MOVIL_1, EMPRESAS.EMAIL_1,' +
|
'MPRESAS.EMAIL_1,'#10' EMPRESAS.PAGINA_WEB, EMPRESAS.REGISTRO_MERC' +
|
||||||
#10' EMPRESAS.PAGINA_WEB, EMPRESAS.REGISTRO_MERCANTIL, EMPRESAS.' +
|
'ANTIL, EMPRESAS.LOGOTIPO'#10#10'FROM'#10' V_RECIBOS_CLIENTE'#10' LEFT OUTER ' +
|
||||||
'LOGOTIPO'#10#10'FROM'#10' V_RECIBOS_CLIENTE'#10' LEFT OUTER JOIN EMPRESAS ON' +
|
'JOIN EMPRESAS ON (EMPRESAS.ID = V_RECIBOS_CLIENTE.ID_EMPRESA)'#10'WH' +
|
||||||
' (EMPRESAS.ID = V_RECIBOS_CLIENTE.ID_EMPRESA)'#10'WHERE'#10' V_RECIBOS_' +
|
'ERE'#10' V_RECIBOS_CLIENTE.ID = :ID'#10
|
||||||
'CLIENTE.ID = :ID'#10
|
|
||||||
StatementType = stSQL
|
StatementType = stSQL
|
||||||
ColumnMappings = <
|
ColumnMappings = <
|
||||||
item
|
item
|
||||||
@ -419,36 +418,6 @@ object RptRecibosCliente: TRptRecibosCliente
|
|||||||
TableField = '<unknown>'
|
TableField = '<unknown>'
|
||||||
SQLOrigin = 'IMPORTE_FACTURA'
|
SQLOrigin = 'IMPORTE_FACTURA'
|
||||||
end
|
end
|
||||||
item
|
|
||||||
DatasetField = 'NOMBRE_CLIENTE'
|
|
||||||
TableField = '<unknown>'
|
|
||||||
SQLOrigin = 'NOMBRE_CLIENTE'
|
|
||||||
end
|
|
||||||
item
|
|
||||||
DatasetField = 'NIF_CIF_CLIENTE'
|
|
||||||
TableField = '<unknown>'
|
|
||||||
SQLOrigin = 'NIF_CIF_CLIENTE'
|
|
||||||
end
|
|
||||||
item
|
|
||||||
DatasetField = 'CALLE_CLIENTE'
|
|
||||||
TableField = '<unknown>'
|
|
||||||
SQLOrigin = 'CALLE_CLIENTE'
|
|
||||||
end
|
|
||||||
item
|
|
||||||
DatasetField = 'PROVINCIA_CLIENTE'
|
|
||||||
TableField = '<unknown>'
|
|
||||||
SQLOrigin = 'PROVINCIA_CLIENTE'
|
|
||||||
end
|
|
||||||
item
|
|
||||||
DatasetField = 'CODIGO_POSTAL_CLIENTE'
|
|
||||||
TableField = '<unknown>'
|
|
||||||
SQLOrigin = 'CODIGO_POSTAL_CLIENTE'
|
|
||||||
end
|
|
||||||
item
|
|
||||||
DatasetField = 'POBLACION_CLIENTE'
|
|
||||||
TableField = '<unknown>'
|
|
||||||
SQLOrigin = 'POBLACION_CLIENTE'
|
|
||||||
end
|
|
||||||
item
|
item
|
||||||
DatasetField = 'ENTIDAD_CLIENTE'
|
DatasetField = 'ENTIDAD_CLIENTE'
|
||||||
TableField = '<unknown>'
|
TableField = '<unknown>'
|
||||||
@ -543,6 +512,36 @@ object RptRecibosCliente: TRptRecibosCliente
|
|||||||
DatasetField = 'LOGOTIPO'
|
DatasetField = 'LOGOTIPO'
|
||||||
TableField = '<unknown>'
|
TableField = '<unknown>'
|
||||||
SQLOrigin = 'LOGOTIPO'
|
SQLOrigin = 'LOGOTIPO'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'NOMBRE'
|
||||||
|
TableField = '<unknown>'
|
||||||
|
SQLOrigin = 'NOMBRE'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'NIF_CIF'
|
||||||
|
TableField = '<unknown>'
|
||||||
|
SQLOrigin = 'NIF_CIF'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'CALLE'
|
||||||
|
TableField = '<unknown>'
|
||||||
|
SQLOrigin = 'CALLE'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'PROVINCIA'
|
||||||
|
TableField = '<unknown>'
|
||||||
|
SQLOrigin = 'PROVINCIA'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'CODIGO_POSTAL'
|
||||||
|
TableField = '<unknown>'
|
||||||
|
SQLOrigin = 'CODIGO_POSTAL'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'POBLACION'
|
||||||
|
TableField = '<unknown>'
|
||||||
|
SQLOrigin = 'POBLACION'
|
||||||
end>
|
end>
|
||||||
end>
|
end>
|
||||||
Name = 'Informe_Cabecera'
|
Name = 'Informe_Cabecera'
|
||||||
@ -631,32 +630,32 @@ object RptRecibosCliente: TRptRecibosCliente
|
|||||||
DataType = datCurrency
|
DataType = datCurrency
|
||||||
end
|
end
|
||||||
item
|
item
|
||||||
Name = 'NOMBRE_CLIENTE'
|
Name = 'NOMBRE'
|
||||||
DataType = datString
|
DataType = datString
|
||||||
Size = 255
|
Size = 255
|
||||||
end
|
end
|
||||||
item
|
item
|
||||||
Name = 'NIF_CIF_CLIENTE'
|
Name = 'NIF_CIF'
|
||||||
DataType = datString
|
DataType = datString
|
||||||
Size = 15
|
Size = 15
|
||||||
end
|
end
|
||||||
item
|
item
|
||||||
Name = 'CALLE_CLIENTE'
|
Name = 'CALLE'
|
||||||
DataType = datString
|
DataType = datString
|
||||||
Size = 255
|
Size = 255
|
||||||
end
|
end
|
||||||
item
|
item
|
||||||
Name = 'PROVINCIA_CLIENTE'
|
Name = 'PROVINCIA'
|
||||||
DataType = datString
|
DataType = datString
|
||||||
Size = 255
|
Size = 255
|
||||||
end
|
end
|
||||||
item
|
item
|
||||||
Name = 'CODIGO_POSTAL_CLIENTE'
|
Name = 'CODIGO_POSTAL'
|
||||||
DataType = datString
|
DataType = datString
|
||||||
Size = 10
|
Size = 10
|
||||||
end
|
end
|
||||||
item
|
item
|
||||||
Name = 'POBLACION_CLIENTE'
|
Name = 'POBLACION'
|
||||||
DataType = datString
|
DataType = datString
|
||||||
Size = 255
|
Size = 255
|
||||||
end
|
end
|
||||||
@ -781,7 +780,7 @@ object RptRecibosCliente: TRptRecibosCliente
|
|||||||
ReportOptions.CreateDate = 37871.995398692100000000
|
ReportOptions.CreateDate = 37871.995398692100000000
|
||||||
ReportOptions.Description.Strings = (
|
ReportOptions.Description.Strings = (
|
||||||
'Demonstrates how to create simple list report.')
|
'Demonstrates how to create simple list report.')
|
||||||
ReportOptions.LastChange = 39504.692557326390000000
|
ReportOptions.LastChange = 39563.534544155100000000
|
||||||
ReportOptions.VersionBuild = '1'
|
ReportOptions.VersionBuild = '1'
|
||||||
ReportOptions.VersionMajor = '12'
|
ReportOptions.VersionMajor = '12'
|
||||||
ReportOptions.VersionMinor = '13'
|
ReportOptions.VersionMinor = '13'
|
||||||
@ -839,13 +838,46 @@ object RptRecibosCliente: TRptRecibosCliente
|
|||||||
'begin'
|
'begin'
|
||||||
' if (<frxDBCabecera."ID_FACTURA"> < 1) then'
|
' if (<frxDBCabecera."ID_FACTURA"> < 1) then'
|
||||||
' begin'
|
' begin'
|
||||||
' Memo40.Lines.Clear; '
|
' Memo40.visible := False;'
|
||||||
|
' Memo25.visible := False; '
|
||||||
'// Memo40.Lines.Add('#39'Calle: '#39'); ' +
|
' eFormaPagoFactura.visible := False;'
|
||||||
' '
|
' Memo26.visible := False; '
|
||||||
' end'
|
' end'
|
||||||
'end;'
|
'end;'
|
||||||
''
|
''
|
||||||
|
'procedure Memo35OnBeforePrint(Sender: TfrxComponent);'
|
||||||
|
'begin'
|
||||||
|
' if (<frxDBCabecera."ID_FACTURA"> < 1) then'
|
||||||
|
' begin'
|
||||||
|
' Memo35.visible := False;'
|
||||||
|
' Memo44.visible := False; '
|
||||||
|
' eFechaFactura.visible := False;'
|
||||||
|
' Memo47.visible := False; '
|
||||||
|
' end'
|
||||||
|
'end;'
|
||||||
|
''
|
||||||
|
'procedure Memo42OnBeforePrint(Sender: TfrxComponent);'
|
||||||
|
'begin'
|
||||||
|
' if (<frxDBCabecera."ID_FACTURA"> < 1) then'
|
||||||
|
' begin'
|
||||||
|
|
||||||
|
' Memo42.visible := False; ' +
|
||||||
|
' '
|
||||||
|
' Memo45.visible := False;'
|
||||||
|
' Memo38.visible := False;'
|
||||||
|
' Memo39.visible := False;'
|
||||||
|
' Memo43.visible := False;'
|
||||||
|
''
|
||||||
|
|
||||||
|
' Memo27.visible := False; ' +
|
||||||
|
' '
|
||||||
|
' Memo28.visible := False;'
|
||||||
|
' Memo48.visible := False;'
|
||||||
|
' Memo49.visible := False;'
|
||||||
|
' Memo52.visible := False; '
|
||||||
|
' end;'
|
||||||
|
'end;'
|
||||||
|
''
|
||||||
'begin'
|
'begin'
|
||||||
''
|
''
|
||||||
'end.')
|
'end.')
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user