Tecistel/Tecsitel_FactuGES2
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Ticket #117 -> Al exportar un pedido a proveedor a Word, no se interpreta el texto RTF

Browse Source 
git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@601 0c75b7a4-871f-7646-8a2f-f78d34cc349f
This commit is contained in:
David Arranz 2008-09-19 12:00:12 +00:00
parent 21220f4485
commit eb023fc716
1 changed files with 29 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

43
Source/Modulos/Pedidos a proveedor/Reports/uRptWordPedidoProveedor.dfm
View File

@ -1,8 +1,8 @@
object RptWordPedidoProveedor: TRptWordPedidoProveedor object RptWordPedidoProveedor: TRptWordPedidoProveedor
OldCreateOrder = False OldCreateOrder = False
OnCreate = DataModuleCreate OnCreate = DataModuleCreate
Height = 366 Height = 223
Width = 514 Width = 337
object schReport: TDASchema object schReport: TDASchema
ConnectionManager = dmServer.ConnectionManager ConnectionManager = dmServer.ConnectionManager
DataDictionary = DataDictionary DataDictionary = DataDictionary
@ -192,18 +192,19 @@ object RptWordPedidoProveedor: TRptWordPedidoProveedor
Default = True Default = True
SQL = SQL =
'SELECT DET.ID, DET.ID_PEDIDO,'#10' DET.POSICION, DET.TIPO_DETA' + 'SELECT DET.ID, DET.ID_PEDIDO,'#10' DET.POSICION, DET.TIPO_DETA' +
'LLE,'#10' ARTICULOS.REFERENCIA, DET.CONCEPTO, DET.CANTIDAD,'#10' ' + 'LLE,'#10' ARTICULOS.REFERENCIA, F_RTFTOTEXT(DET.CONCEPTO) as C' +
' DET.UNIDAD_MEDIDA, DET.IMPORTE_UNIDAD - (DET.IMPORTE_UNIDAD' + 'ONCEPTO, DET.CONCEPTO as CONCEPTO_RTF,'#10' DET.CANTIDAD,'#10' ' +
' * (DET.DESCUENTO / 100)) as IMPORTE_UNIDAD, DET.IMPORTE_TOTAL,'#10 + ' DET.UNIDAD_MEDIDA, DET.IMPORTE_UNIDAD - (DET.IMPORTE_UNIDAD *' +
' ARTICULOS_PROVEEDORES.REFERENCIA_PROV as REFERENCIA_PROVE' + ' (DET.DESCUENTO / 100)) as IMPORTE_UNIDAD, DET.IMPORTE_TOTAL,'#10' ' +
'EDOR,'#10' ARTICULOS.REFERENCIA_FABR as REFERENCIA_FABRICANTE'#10 + ' ARTICULOS_PROVEEDORES.REFERENCIA_PROV as REFERENCIA_PROVEED' +
'FROM PEDIDOS_PROVEEDOR_DETALLES DET'#10'LEFT OUTER JOIN ARTICULOS ON' + 'OR,'#10' ARTICULOS.REFERENCIA_FABR as REFERENCIA_FABRICANTE'#10'FR' +
' (DET.ID_ARTICULO = ARTICULOS.ID)'#10'LEFT JOIN PEDIDOS_PROVEEDOR ON' + 'OM PEDIDOS_PROVEEDOR_DETALLES DET'#10'LEFT OUTER JOIN ARTICULOS ON (' +
' (PEDIDOS_PROVEEDOR.ID = DET.ID_PEDIDO)'#10'LEFT JOIN ARTICULOS_PROV' + 'DET.ID_ARTICULO = ARTICULOS.ID)'#10'LEFT JOIN PEDIDOS_PROVEEDOR ON (' +
'EEDORES ON ((ARTICULOS_PROVEEDORES.ID_ARTICULO = ARTICULOS.ID) A' + 'PEDIDOS_PROVEEDOR.ID = DET.ID_PEDIDO)'#10'LEFT JOIN ARTICULOS_PROVEE' +
'ND (ARTICULOS_PROVEEDORES.ID_PROVEEDOR = PEDIDOS_PROVEEDOR.ID_PR' + 'DORES ON ((ARTICULOS_PROVEEDORES.ID_ARTICULO = ARTICULOS.ID) AND' +
'OVEEDOR))'#10#10'WHERE DET.ID_PEDIDO = :ID_PEDIDO AND DET.VISIBLE = 1 ' + ' (ARTICULOS_PROVEEDORES.ID_PROVEEDOR = PEDIDOS_PROVEEDOR.ID_PROV' +
'AND {Where}'#10'ORDER BY DET.ID_PEDIDO, DET.POSICION;'#10#10 'EEDOR))'#10#10'WHERE DET.ID_PEDIDO = :ID_PEDIDO AND DET.VISIBLE = 1 AN' +
'D {Where}'#10'ORDER BY DET.ID_PEDIDO, DET.POSICION;'#10#10
StatementType = stSQL StatementType = stSQL
ColumnMappings = < ColumnMappings = <
item item
@ -253,6 +254,10 @@ object RptWordPedidoProveedor: TRptWordPedidoProveedor
item item
DatasetField = 'REFERENCIA_FABRICANTE' DatasetField = 'REFERENCIA_FABRICANTE'
TableField = 'REFERENCIA_FABRICANTE' TableField = 'REFERENCIA_FABRICANTE'
end
item
DatasetField = 'CONCEPTO_RTF'
TableField = 'CONCEPTO_RTF'
end> end>
end> end>
Name = 'Informe_Detalles' Name = 'Informe_Detalles'
@ -282,6 +287,11 @@ object RptWordPedidoProveedor: TRptWordPedidoProveedor
item item
Name = 'CONCEPTO' Name = 'CONCEPTO'
DataType = datString DataType = datString
Size = 32765
end
item
Name = 'CONCEPTO_RTF'
DataType = datString
Size = 2000 Size = 2000
end end
item item
@ -454,6 +464,11 @@ object RptWordPedidoProveedor: TRptWordPedidoProveedor
item item
Name = 'CONCEPTO' Name = 'CONCEPTO'
DataType = datString DataType = datString
Size = 32765
end
item
Name = 'CONCEPTO_RTF'
DataType = datString
Size = 2000 Size = 2000
end end
item item