From f05a21155adcbd4dd4ce8f2f532f1ee9a1bb474a Mon Sep 17 00:00:00 2001 From: david Date: Wed, 12 Mar 2008 18:11:46 +0000 Subject: [PATCH] =?UTF-8?q?Pedidos=20a=20proveedor:=20=20-=20repaso=20gene?= =?UTF-8?q?ral=20=20-=20c=C3=B3digo=20de=20fabricante=20en=20los=20detalle?= =?UTF-8?q?s=20=20-=20unidad=20de=20medida=20en=20los=20detalles=20=20-=20?= =?UTF-8?q?informe=20FastReport=20y=20Word.?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@342 0c75b7a4-871f-7646-8a2f-f78d34cc349f --- Database/scripts/factuges.sql | 1 + Source/Informes/InfPedidoProveedor.fr3 | 49 + .../Data/uDataModulePedidosProveedor.dfm | 38 +- .../Model/PedidosProveedor_model.dproj | 74 +- .../Model/PedidosProveedor_model.rc | 22 + .../Model/PedidosProveedor_model.res | Bin 32 -> 384 bytes .../Model/schPedidosProveedorClient_Intf.pas | 83 +- .../Model/schPedidosProveedorServer_Intf.pas | 75 +- .../Reports/uRptPedidosProveedor_Server.dfm | 1169 +++++++++-------- .../Reports/uRptPedidosProveedor_Server.pas | 81 +- .../Reports/uRptWordPedidoProveedor.dfm | 543 ++++++++ .../Reports/uRptWordPedidoProveedor.pas | 323 +++++ .../Servidor/srvPedidosProveedor_Impl.dfm | 97 +- .../Servidor/srvPedidosProveedor_Impl.pas | 16 +- .../Views/uEditorPedidoProveedor.dfm | 154 ++- .../Views/uEditorPedidoProveedor.pas | 6 - .../Views/uEditorPedidosProveedor.pas | 10 - .../Views/uViewDetallesPedidoProveedor.dfm | 136 +- .../Views/uViewPedidoProveedor.dfm | 5 +- .../Views/uViewPedidoProveedor.pas | 2 +- .../Views/uViewPedidosProveedor.dfm | 25 + 21 files changed, 2106 insertions(+), 803 deletions(-) create mode 100644 Source/Informes/InfPedidoProveedor.fr3 create mode 100644 Source/Modulos/Pedidos a proveedor/Reports/uRptWordPedidoProveedor.dfm create mode 100644 Source/Modulos/Pedidos a proveedor/Reports/uRptWordPedidoProveedor.pas diff --git a/Database/scripts/factuges.sql b/Database/scripts/factuges.sql index 37a93d84..47e51f9a 100644 --- a/Database/scripts/factuges.sql +++ b/Database/scripts/factuges.sql @@ -900,6 +900,7 @@ CREATE TABLE PEDIDOS_PROVEEDOR_DETALLES ( ID_ARTICULO TIPO_ID, CONCEPTO TIPO_CONCEPTO, CANTIDAD INTEGER, + UNIDAD_MEDIDA VARCHAR(255), IMPORTE_UNIDAD TIPO_IMPORTE, DESCUENTO TIPO_PORCENTAJE, IMPORTE_PORTE TIPO_IMPORTE, diff --git a/Source/Informes/InfPedidoProveedor.fr3 b/Source/Informes/InfPedidoProveedor.fr3 new file mode 100644 index 00000000..8e9b77e6 --- /dev/null +++ b/Source/Informes/InfPedidoProveedor.fr3 @@ -0,0 +1,49 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + diff --git a/Source/Modulos/Pedidos a proveedor/Data/uDataModulePedidosProveedor.dfm b/Source/Modulos/Pedidos a proveedor/Data/uDataModulePedidosProveedor.dfm index 3c2b2cee..3e599797 100644 --- a/Source/Modulos/Pedidos a proveedor/Data/uDataModulePedidosProveedor.dfm +++ b/Source/Modulos/Pedidos a proveedor/Data/uDataModulePedidosProveedor.dfm @@ -338,6 +338,7 @@ inherited DataModulePedidosProveedor: TDataModulePedidosProveedor item Name = 'ID_PEDIDO' DataType = datInteger + DictionaryEntry = 'PedidosProveedor_Detalles_ID_PEDIDO' end item Name = 'POSICION' @@ -348,11 +349,13 @@ inherited DataModulePedidosProveedor: TDataModulePedidosProveedor Name = 'TIPO_DETALLE' DataType = datString Size = 10 + DictionaryEntry = 'PedidosProveedor_Detalles_TIPO_DETALLE' end item Name = 'CONCEPTO' DataType = datString Size = 2000 + DictionaryEntry = 'PedidosProveedor_Detalles_CONCEPTO' end item Name = 'CANTIDAD' @@ -360,39 +363,72 @@ inherited DataModulePedidosProveedor: TDataModulePedidosProveedor Alignment = taRightJustify DictionaryEntry = 'CANTIDAD' end + item + Name = 'UNIDAD_MEDIDA' + DataType = datString + Size = 255 + DisplayLabel = 'Unidad de medida' + DictionaryEntry = 'PedidosProveedor_Detalles_UNIDAD_MEDIDA' + end item Name = 'IMPORTE_UNIDAD' DataType = datCurrency + DisplayLabel = 'Importe unidad' + Alignment = taRightJustify + DictionaryEntry = 'PedidosProveedor_Detalles_IMPORTE_UNIDAD' end item Name = 'IMPORTE_TOTAL' DataType = datCurrency + DisplayLabel = 'Importe total' + Alignment = taRightJustify + DictionaryEntry = 'PedidosProveedor_Detalles_IMPORTE_TOTAL' end item Name = 'VISIBLE' - DataType = datSmallInt + DataType = datInteger + DictionaryEntry = 'PedidosProveedor_Detalles_VISIBLE' end item Name = 'ID_ARTICULO' DataType = datInteger + DictionaryEntry = 'PedidosProveedor_Detalles_ID_ARTICULO' end item Name = 'DESCUENTO' DataType = datFloat + DisplayLabel = 'Descuento' + DisplayFormat = ',0.00 %;-,0.00 %' + Alignment = taRightJustify + DictionaryEntry = 'PedidosProveedor_Detalles_DESCUENTO' end item Name = 'IMPORTE_PORTE' DataType = datCurrency + DisplayLabel = 'Importe porte' + Alignment = taRightJustify + DictionaryEntry = 'PedidosProveedor_Detalles_IMPORTE_PORTE' end item Name = 'REFERENCIA' DataType = datString Size = 255 + DisplayLabel = 'Referencia' + DictionaryEntry = 'PedidosProveedor_Detalles_REFERENCIA' end item Name = 'REFERENCIA_PROVEEDOR' DataType = datString Size = 255 + DisplayLabel = 'Ref. proveedor' + DictionaryEntry = 'PedidosProveedor_Detalles_REFERENCIA_PROVEEDOR' + end + item + Name = 'REFERENCIA_FABRICANTE' + DataType = datString + Size = 255 + DisplayLabel = 'Ref. fabricante' + DictionaryEntry = 'PedidosProveedor_Detalles_REFERENCIA_FABRICANTE' end> Params = <> MasterMappingMode = mmWhere diff --git a/Source/Modulos/Pedidos a proveedor/Model/PedidosProveedor_model.dproj b/Source/Modulos/Pedidos a proveedor/Model/PedidosProveedor_model.dproj index 2b1ae610..c4db82a0 100644 --- a/Source/Modulos/Pedidos a proveedor/Model/PedidosProveedor_model.dproj +++ b/Source/Modulos/Pedidos a proveedor/Model/PedidosProveedor_model.dproj @@ -41,81 +41,18 @@ Delphi.Personality Package - - False - True - False - - - True - False - False - - - True - False - 1 - 0 - 0 - 0 - False - False - False - False - False - 3082 - 1252 - - - - - 1.0.0.0 - - - - - - 1.0.0.0 - - - - - - - - - - - - - - - - - - - - - - - - - +FalseTrueFalseTrueFalseFalseTrueFalse1000FalseFalseFalseFalseFalse308212521.0.0.01.0.0.0 RemObjects Pascal Script - RemObjects SDK 3.0 Integration EurekaLog 5.1.9 - - - PedidosProveedor_model.dpk - - + PedidosProveedor_model.dpk MainSource - - + + @@ -125,10 +62,9 @@ -