Archivado/Noviseda_FactuGES2
Archived
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Se repasa lógica de articulo reemplazado y listo para probar antes de nueva subida a produccion

Browse Source 
git-svn-id: https://192.168.0.254/svn/Proyectos.Noviseda_FactuGES2/trunk@110 f33bb606-9f5c-448d-9c99-757f00063c96
This commit is contained in:
roberto 2010-04-07 13:59:49 +00:00
parent f2a42b5a4b
commit d864637c00
23 changed files with 578 additions and 409 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
Build/Build.fbl6
View File

Binary file not shown.

72
Database/scripts/factuges.sql
View File

@ -1299,7 +1299,7 @@ SELECT ALBARANES_CLIENTE.ID,
FROM ALBARANES_CLIENTE FROM ALBARANES_CLIENTE
; ;
/* View: V_ALB_CLI_DETALLES */ /* View: V_ALB_CLI_DETALLES, esta es para saber lo que resta por mandar (albaranar) de un pedido de cliente */
CREATE VIEW V_ALB_CLI_DETALLES( CREATE VIEW V_ALB_CLI_DETALLES(
ID_ALBARAN, ID_ALBARAN,
ID_PEDIDO, ID_PEDIDO,
@ -1312,9 +1312,7 @@ SELECT ALBARANES_CLIENTE_DETALLES.ID_ALBARAN,
ALBARANES_CLIENTE_DETALLES.ID_PEDIDO, ALBARANES_CLIENTE_DETALLES.ID_PEDIDO,
V_ALB_CLI_SITUACION.SITUACION, V_ALB_CLI_SITUACION.SITUACION,
ALBARANES_CLIENTE.ID_ALMACEN, ALBARANES_CLIENTE.ID_ALMACEN,
CASE WHEN ALBARANES_CLIENTE_DETALLES.ID_ARTICULO_REEMPLAZADO IS NULL then COALESCE(ALBARANES_CLIENTE_DETALLES.ID_ARTICULO, 0) COALESCE(ALBARANES_CLIENTE_DETALLES.ID_ARTICULO, 0) as ID_ARTICULO,
ELSE ALBARANES_CLIENTE_DETALLES.ID_ARTICULO_REEMPLAZADO
END AS ID_ARTICULO,
SUM(COALESCE(ALBARANES_CLIENTE_DETALLES.CANTIDAD, 0)) SUM(COALESCE(ALBARANES_CLIENTE_DETALLES.CANTIDAD, 0))
FROM ALBARANES_CLIENTE_DETALLES FROM ALBARANES_CLIENTE_DETALLES
@ -1338,7 +1336,46 @@ group BY ALBARANES_CLIENTE_DETALLES.ID_ALBARAN,
ID_ARTICULO ID_ARTICULO
; ;
/*Esta vista es para la parte de inventario para poder saber si se han mandado articulos diferentes a los que se pidieron*/
CREATE VIEW V_ALB_CLI_DETALLES_ENVIO(
ID_ALBARAN,
ID_PEDIDO,
SITUACION,
ID_ALMACEN,
ID_ARTICULO,
CANTIDAD)
AS
SELECT ALBARANES_CLIENTE_DETALLES.ID_ALBARAN,
ALBARANES_CLIENTE_DETALLES.ID_PEDIDO,
V_ALB_CLI_SITUACION.SITUACION,
ALBARANES_CLIENTE.ID_ALMACEN,
CASE WHEN ALBARANES_CLIENTE_DETALLES.ID_ARTICULO_REEMPLAZADO IS NULL then COALESCE(ALBARANES_CLIENTE_DETALLES.ID_ARTICULO, 0)
ELSE ALBARANES_CLIENTE_DETALLES.ID_ARTICULO_REEMPLAZADO
END AS ID_ARTICULO,
SUM(COALESCE(ALBARANES_CLIENTE_DETALLES.CANTIDAD, 0))
FROM ALBARANES_CLIENTE_DETALLES
INNER JOIN ALBARANES_CLIENTE
ON (ALBARANES_CLIENTE_DETALLES.ID_ALBARAN = ALBARANES_CLIENTE.ID)
INNER JOIN V_ALB_CLI_SITUACION
ON (ALBARANES_CLIENTE_DETALLES.ID_ALBARAN = V_ALB_CLI_SITUACION.ID)
/*Mantenemos los articulos inventariables y aquellos que no existan en nuestro catálogo con el fin de no falsear la situación de los pedidos
LEFT JOIN ARTICULOS
ON (ALBARANES_CLIENTE_DETALLES.ID_ARTICULO = ARTICULOS.ID)
WHERE (ALBARANES_CLIENTE_DETALLES.ID_ARTICULO is not null)
AND (ARTICULOS.INVENTARIABLE = 1)
*/
group BY ALBARANES_CLIENTE_DETALLES.ID_ALBARAN,
ALBARANES_CLIENTE_DETALLES.ID_PEDIDO,
V_ALB_CLI_SITUACION.SITUACION,
ALBARANES_CLIENTE.ID_ALMACEN,
ID_ARTICULO
;
/* View: V_ALB_PROV_DETALLES */ /* View: V_ALB_PROV_DETALLES */
CREATE VIEW V_ALB_PROV_DETALLES( CREATE VIEW V_ALB_PROV_DETALLES(
@ -2372,20 +2409,20 @@ CREATE VIEW V_HIS_MOV_ALB_CLI(
AS AS
SELECT SELECT
ALBARANES_CLIENTE.FECHA_ALBARAN, ALBARANES_CLIENTE.FECHA_ALBARAN,
V_ALB_CLI_DETALLES.ID_ALMACEN, V_ALB_CLI_DETALLES_ENVIO.ID_ALMACEN,
V_ALB_CLI_DETALLES.ID_ARTICULO, V_ALB_CLI_DETALLES_ENVIO.ID_ARTICULO,
CASE WHEN V_ALB_CLI_DETALLES.CANTIDAD < 0 THEN 'E' CASE WHEN V_ALB_CLI_DETALLES_ENVIO.CANTIDAD < 0 THEN 'E'
ELSE 'S' END, ELSE 'S' END,
(-1)*V_ALB_CLI_DETALLES.CANTIDAD, (-1)*V_ALB_CLI_DETALLES_ENVIO.CANTIDAD,
CASE WHEN ALBARANES_CLIENTE.IMPORTE_TOTAL < 0 THEN 'Orden de devolución de cliente ' || ALBARANES_CLIENTE.REFERENCIA CASE WHEN ALBARANES_CLIENTE.IMPORTE_TOTAL < 0 THEN 'Orden de devolución de cliente ' || ALBARANES_CLIENTE.REFERENCIA
ELSE 'Albarán de cliente ' || ALBARANES_CLIENTE.REFERENCIA END ELSE 'Albarán de cliente ' || ALBARANES_CLIENTE.REFERENCIA END
FROM V_ALB_CLI_DETALLES FROM V_ALB_CLI_DETALLES_ENVIO
LEFT JOIN ALBARANES_CLIENTE LEFT JOIN ALBARANES_CLIENTE
ON (V_ALB_CLI_DETALLES.ID_ALBARAN = ALBARANES_CLIENTE.ID) ON (V_ALB_CLI_DETALLES_ENVIO.ID_ALBARAN = ALBARANES_CLIENTE.ID)
WHERE (V_ALB_CLI_DETALLES.ID_ALMACEN IS NOT NULL) WHERE (V_ALB_CLI_DETALLES_ENVIO.ID_ALMACEN IS NOT NULL)
AND (V_ALB_CLI_DETALLES.SITUACION in ('ENVIADO', 'SERVIDO')) AND (V_ALB_CLI_DETALLES_ENVIO.SITUACION in ('ENVIADO', 'SERVIDO'))
; ;
@ -2822,7 +2859,7 @@ CREATE VIEW V_INV_RESERVAS_AUX(
CANTIDAD) CANTIDAD)
AS AS
SELECT ID_ALMACEN, ID_ARTICULO, SUM(CANTIDAD) SELECT ID_ALMACEN, ID_ARTICULO, SUM(CANTIDAD)
FROM V_ALB_CLI_DETALLES FROM V_ALB_CLI_DETALLES_ENVIO
WHERE (ID_ALMACEN IS NOT NULL) WHERE (ID_ALMACEN IS NOT NULL)
AND (SITUACION = 'PENDIENTE') AND (SITUACION = 'PENDIENTE')
GROUP BY ID_ALMACEN, ID_ARTICULO GROUP BY ID_ALMACEN, ID_ARTICULO
@ -2856,7 +2893,7 @@ CREATE VIEW V_INV_SALIDAS_ALB(
CANTIDAD) CANTIDAD)
AS AS
SELECT ID_ALMACEN, ID_ARTICULO, SUM(CANTIDAD) SELECT ID_ALMACEN, ID_ARTICULO, SUM(CANTIDAD)
FROM V_ALB_CLI_DETALLES FROM V_ALB_CLI_DETALLES_ENVIO
WHERE (ID_ALMACEN IS NOT NULL) WHERE (ID_ALMACEN IS NOT NULL)
AND (SITUACION in ('ENVIADO', 'SERVIDO')) AND (SITUACION in ('ENVIADO', 'SERVIDO'))
GROUP BY ID_ALMACEN, ID_ARTICULO GROUP BY ID_ALMACEN, ID_ARTICULO
@ -2878,7 +2915,12 @@ CREATE VIEW V_INV_SALIDAS_ALB_COLOR(
COLOR11, COLOR11,
COLOR12) COLOR12)
AS AS
SELECT ALBARANES_CLIENTE.ID_ALMACEN, ALBARANES_CLIENTE_DETALLES.ID_ARTICULO, SELECT ALBARANES_CLIENTE.ID_ALMACEN,
CASE WHEN ALBARANES_CLIENTE_DETALLES.ID_ARTICULO_REEMPLAZADO IS NULL then COALESCE(ALBARANES_CLIENTE_DETALLES.ID_ARTICULO, 0)
ELSE ALBARANES_CLIENTE_DETALLES.ID_ARTICULO_REEMPLAZADO
END AS ID_ARTICULO,
SUM(COLOR1) as COLOR1, SUM(COLOR1) as COLOR1,
SUM(COLOR2) as COLOR2, SUM(COLOR2) as COLOR2,
SUM(COLOR3) as COLOR3, SUM(COLOR3) as COLOR3,

4
Database/scripts/factuges_sysdata.sql
View File

@ -80,7 +80,9 @@ COMMIT WORK;
INSERT INTO EMPRESAS (ID, NIF_CIF, NOMBRE, RAZON_SOCIAL, CALLE, POBLACION, PROVINCIA, CODIGO_POSTAL, TELEFONO_1, TELEFONO_2, MOVIL_1, MOVIL_2, FAX, EMAIL_1, EMAIL_2, PAGINA_WEB, FECHA_ALTA, FECHA_MODIFICACION, USUARIO, REGISTRO_MERCANTIL, PARAM_TIEMPO, PARAM_MARGEN, ID_TIPO_IVA, ID_FORMA_PAGO) VALUES (1, 'B-81150278', 'NOVISEDA S.L.', 'NOVISEDA S.L.', 'C/ San Alejandro, 10', 'Madrid', 'Madrid', '28005', '91 364 22 06', NULL, NULL, NULL, '91 365 53 54', 'noviseda@fedecon.es', NULL, NULL, NULL, NULL, 'Administrador', 'Reg. Merc. de Madrid, Tomo 9.450, Libro 0, Folio 1, Sección 8ª, Hoja M-151873. Inscripción 1ª CIF: B-81150278', NULL, NULL, NULL, NULL); INSERT INTO EMPRESAS (ID, NIF_CIF, NOMBRE, RAZON_SOCIAL, CALLE, POBLACION, PROVINCIA, CODIGO_POSTAL, TELEFONO_1, TELEFONO_2, MOVIL_1, MOVIL_2, FAX, EMAIL_1, EMAIL_2, PAGINA_WEB, FECHA_ALTA, FECHA_MODIFICACION, USUARIO, REGISTRO_MERCANTIL, PARAM_TIEMPO, PARAM_MARGEN, ID_TIPO_IVA, ID_FORMA_PAGO) VALUES (1, 'B-81150278', 'NOVISEDA S.L.', 'NOVISEDA S.L.', 'C/ San Alejandro, 10', 'Madrid', 'Madrid', '28005', '91 364 22 06', NULL, NULL, NULL, '91 365 53 54', 'noviseda@fedecon.es', NULL, NULL, NULL, NULL, 'Administrador', 'Reg. Merc. de Madrid, Tomo 9.450, Libro 0, Folio 1, Sección 8ª, Hoja M-151873. Inscripción 1ª CIF: B-81150278', NULL, NULL, NULL, NULL);
INSERT INTO EMPRESAS (ID, NIF_CIF, NOMBRE, RAZON_SOCIAL, CALLE, POBLACION, PROVINCIA, CODIGO_POSTAL, TELEFONO_1, TELEFONO_2, MOVIL_1, MOVIL_2, FAX, EMAIL_1, EMAIL_2, PAGINA_WEB, FECHA_ALTA, FECHA_MODIFICACION, USUARIO, REGISTRO_MERCANTIL, PARAM_TIEMPO, PARAM_MARGEN, ID_TIPO_IVA, ID_FORMA_PAGO) VALUES (2, 'B-81159278', 'PRUEBAS - NOVISEDA S.L.', 'PRUEBAS - NOVISEDA S.L.', 'C/ San Alejandro, 10', 'Madrid', 'Madrid', '28005', '91 364 22 06', NULL, '', NULL, '91 365 53 54', 'noviseda@fedecon.es', NULL, NULL, NULL, NULL, 'Administrador', 'Reg. Merc. de Madrid, Tomo 9.450, Libro 0, Folio 1, Sección 8ª, Hoja M-151873. Inscripción 1ª CIF: B-81150278', NULL, NULL, NULL, NULL); INSERT INTO EMPRESAS (ID, NIF_CIF, NOMBRE, RAZON_SOCIAL, CALLE, POBLACION, PROVINCIA, CODIGO_POSTAL, TELEFONO_1, TELEFONO_2, MOVIL_1, MOVIL_2, FAX, EMAIL_1, EMAIL_2, PAGINA_WEB, FECHA_ALTA, FECHA_MODIFICACION, USUARIO, REGISTRO_MERCANTIL, PARAM_TIEMPO, PARAM_MARGEN, ID_TIPO_IVA, ID_FORMA_PAGO) VALUES (2, 'B-81159278', 'PRUEBAS - NOVISEDA S.L.', 'PRUEBAS - NOVISEDA S.L.', 'C/ San Alejandro, 10', 'Madrid', 'Madrid', '28005', '91 364 22 06', NULL, '', NULL, '91 365 53 54', 'noviseda@fedecon.es', NULL, NULL, NULL, NULL, 'Administrador', 'Reg. Merc. de Madrid, Tomo 9.450, Libro 0, Folio 1, Sección 8ª, Hoja M-151873. Inscripción 1ª CIF: B-81150278', NULL, NULL, NULL, NULL);
SET GENERATOR GEN_EMPRESAS_ID TO 3; SET GENERATOR GEN_EMPRESAS_ID TO 3;
COMMIT WORK; COMMIT WORK;
INSERT INTO ALMACENES (ID, ID_EMPRESA, TIPO_ALMACEN, NOMBRE, CALLE, PROVINCIA, POBLACION, CODIGO_POSTAL, TELEFONO, MOVIL, FAX, PERSONA_CONTACTO, FECHA_ALTA, FECHA_MODIFICACION, USUARIO) VALUES (2, 1, 'ALMACEN', 'ALMACEN', NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, 'Administrador');
SET GENERATOR GEN_ALMACENES_ID TO 3;
COMMIT WORK;

BIN
Source/Base/Base.res
View File

Binary file not shown.

2
Source/Cliente/FactuGES.dpr
View File

@ -1,7 +1,7 @@
program FactuGES; program FactuGES;
uses uses
ExceptionLog, // ExceptionLog,
Forms, Forms,
Windows, Windows,
SysUtils, SysUtils,

19
Source/Modulos/Albaranes de cliente/Controller/uDetallesAlbaranClienteController.pas
View File

@ -14,6 +14,7 @@ type
procedure DesglosarPorteDetalles(ImportePorte: Currency; ADetalles: IDAStronglyTypedDataTable); procedure DesglosarPorteDetalles(ImportePorte: Currency; ADetalles: IDAStronglyTypedDataTable);
function DarTotalPorteTotal(ADetalles: IDAStronglyTypedDataTable): Double; function DarTotalPorteTotal(ADetalles: IDAStronglyTypedDataTable): Double;
procedure ModificarCantidadColores(ADetalles: IDAStronglyTypedDataTable); procedure ModificarCantidadColores(ADetalles: IDAStronglyTypedDataTable);
procedure QuitarArticuloReemplazado(ADetalles: IDAStronglyTypedDataTable);
end; end;
TDetallesAlbaranClienteController = class(TControllerDetallesArticulos, IDetallesAlbaranClienteController) TDetallesAlbaranClienteController = class(TControllerDetallesArticulos, IDetallesAlbaranClienteController)
@ -36,6 +37,7 @@ type
procedure ActualizarDetalles(ADetalles: IDAStronglyTypedDataTable; ACliente: IBizCliente); overload; procedure ActualizarDetalles(ADetalles: IDAStronglyTypedDataTable; ACliente: IBizCliente); overload;
procedure ModificarCantidadColores(ADetalles: IDAStronglyTypedDataTable); procedure ModificarCantidadColores(ADetalles: IDAStronglyTypedDataTable);
procedure QuitarArticuloReemplazado(ADetalles: IDAStronglyTypedDataTable);
constructor Create; override; constructor Create; override;
destructor Destroy; override; destructor Destroy; override;
end; end;
@ -171,6 +173,23 @@ begin
end; end;
end; end;
procedure TDetallesAlbaranClienteController.QuitarArticuloReemplazado(ADetalles: IDAStronglyTypedDataTable);
var
EnEdicion: Boolean;
begin
EnEdicion := ADetalles.DataTable.Editing;
if not EnEdicion then
ADetalles.Edit;
(ADetalles as IBizDetallesAlbaranCliente).ID_ARTICULO_REEMPLAZADOIsNull := True;
(ADetalles as IBizDetallesAlbaranCliente).REFERENCIA_ART_REEMPLAZADOIsNull := True;
ADetalles.Post;
if EnEdicion then
ADetalles.Edit;
end;
procedure TDetallesAlbaranClienteController.RellenarOtros(ADetalles: IDAStronglyTypedDataTable; AArticulos: IBizArticulo); procedure TDetallesAlbaranClienteController.RellenarOtros(ADetalles: IDAStronglyTypedDataTable; AArticulos: IBizArticulo);
begin begin
//Solo para albaranes que es donde se distingue entre colores para tema de stock //Solo para albaranes que es donde se distingue entre colores para tema de stock

75
Source/Modulos/Albaranes de cliente/Views/uViewDetallesAlbaranCliente.dfm
View File

@ -23,9 +23,9 @@ inherited frViewDetallesAlbaranCliente: TfrViewDetallesAlbaranCliente
end end
inherited FontSize: TEdit inherited FontSize: TEdit
Top = 22 Top = 22
Width = 170 Width = 202
ExplicitTop = 22 ExplicitTop = 22
ExplicitWidth = 170 ExplicitWidth = 202
end end
inherited ToolButton13: TToolButton [7] inherited ToolButton13: TToolButton [7]
Left = 0 Left = 0
@ -111,9 +111,69 @@ inherited frViewDetallesAlbaranCliente: TfrViewDetallesAlbaranCliente
Properties.Buttons = < Properties.Buttons = <
item item
Default = True Default = True
Kind = bkEllipsis Glyph.Data = {
36030000424D3603000000000000360000002800000010000000100000000100
1800000000000003000011170000111700000000000000000000FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFF009000009000006000006000006000006000FFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00900031C94C0E
A6160EA6160EA616006000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFF00900036CE5531C94C2BC3440EA616006000FFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0090003BD35D36
CE5534CC510EA616006000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFF00900042DA693DD56139D1590EA616006000FFFFFFFFFF
FFFFFFFFFFFFFFFFFFFF00900000600000600000600000600000600047DF7142
DA693DD5610EA61600600000600000600000600000600000600000900060F898
0EA6160EA6160EA6160EA6164CE47947DF7142DA690EA6160EA6160EA6160EA6
160EA6160EA61600600000900060F89860F89860F8985BF39156EE8951E9814C
E47947DF7142DA693DD56139D15934CC512EC6480EA61600600000900060F898
60F89860F89860F8985BF39156EE8951E9814CE47947DF7142DA693DD56139D1
5934CC510EA61600600000900060F89860F89860F89860F89860F8985BF39156
EE8951E9814CE47947DF7142DA693DD56139D15934CC51006000009000009000
00900000900000900000900060F8985BF39156EE890EA6160060000090000090
00009000009000009000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00900060F89860
F8985BF3910EA616006000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFF00900060F89860F89860F8980EA616006000FFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00900060F89860
F89860F8980EA616006000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFF00900060F89860F89860F8980EA616006000FFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00900000900000
9000009000009000009000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
Hint = 'A'#241'adir art'#237'culo de reemplazo'
Kind = bkGlyph
end
item
Glyph.Data = {
36030000424D3603000000000000360000002800000010000000100000000100
18000000000000030000EA0A0000EA0A00000000000000000000FFFFFFDCDCF1
4C4FBCEAEAF6FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFD4D4EE131CB3000BAE595CC2FFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFBBBBE3E2E2F3FFFFFF6976E0071BC6
000EB4010BADAAABDEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF3F3FA6A6A
C30202997575C7FFFFFF3D52E32342F00012BC000EB5151CB2E6E6F5FFFFFFFF
FFFFFFFFFFFFFFFFC2C2E62424A60000982929A8E9E9F6FFFFFFB1B5E82E4CF3
1C35DB0011BB000EB53D42BDF8F8FCFFFFFFF6F6FB7272C504049A0000982424
A7E4E4F4FFFFFFFFFFFFFFFFFF7F86DD4D67F70D22C90012BC000EB56165C8C8
C8EA2A2DB000029D0000981E1EA3DEDEF1FFFFFFFFFFFFFFFFFFFFFFFFFCFCFD
8086DC4C60E60016C20012BC000EB5030DAE0009AA0006A4191BA6D8D8EFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEFE8E93DC162ACB0015C20012BC00
0FB6000CB0141AADD2D2EDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFCFD0EE0B1FC70018C90015C30012BD000FB69697D7FFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFDFDFF31B31D1001ED5001BCF0018C900
15C30012BD131DB7D4D4EEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEBEBF7
2940D80025E20022DC0120D72742E32B3BCC071FCD0013BE1D28B9DFDFF2FFFF
FFFFFFFFFFFFFFFFFFFFF5F5FB394FDB002BEF0028E9092EE63A57F2868DE0F7
F7FC6A74D90D25D10013BE1E29B9D5D5EFFFFFFFFFFFFFFFFFFF737DDC002FF7
002EF5183FF44662F8848BDEFEFEFEFFFFFFFFFFFFA1A6E3283CD10518C2131E
B8C5C5E9FFFFFFFFFFFFDFDFF31A3AE42A4FFC4A66FA858CE0FEFEFEFFFFFFFF
FFFFFFFFFFFFFFFFE6E6F56C74D81729C60A16B7ACADE0FFFFFFFFFFFFE9E9F7
8B94E48991E1FEFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFBCBE
E85059C9B8B9E4FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF}
Hint = 'Quitar art'#237'culo de reemplazo'
Kind = bkGlyph
end> end>
Properties.OnButtonClick = cxGridViewREFERENCIA_ART_REEMPLAZADOPropertiesButtonClick Properties.OnButtonClick = cxGridViewREFERENCIA_ART_REEMPLAZADOPropertiesButtonClick
Styles.Content = cxStyle_DESCUENTO
end end
inherited cxGridViewCANTIDAD: TcxGridDBColumn inherited cxGridViewCANTIDAD: TcxGridDBColumn
Properties.ReadOnly = True Properties.ReadOnly = True
@ -130,7 +190,6 @@ inherited frViewDetallesAlbaranCliente: TfrViewDetallesAlbaranCliente
Kind = bkEllipsis Kind = bkEllipsis
end> end>
Properties.ReadOnly = True Properties.ReadOnly = True
Properties.OnButtonClick = cxGridViewCANTIDAD2PropertiesButtonClick
HeaderAlignmentHorz = taRightJustify HeaderAlignmentHorz = taRightJustify
end end
inherited cxGridViewUNIDAD_MEDIDA: TcxGridDBColumn inherited cxGridViewUNIDAD_MEDIDA: TcxGridDBColumn
@ -193,6 +252,14 @@ inherited frViewDetallesAlbaranCliente: TfrViewDetallesAlbaranCliente
Visible = False Visible = False
end end
end end
inherited cxStyleRepository: TcxStyleRepository
inherited cxStyle_DESCUENTO: TcxStyle
AssignedValues = [svFont, svTextColor]
Font.Color = clRed
Font.Style = [fsBold]
TextColor = clRed
end
end
inherited GridGeneralPopupMenu: TPopupMenu inherited GridGeneralPopupMenu: TPopupMenu
object Aadirartculos1: TMenuItem [4] object Aadirartculos1: TMenuItem [4]
Action = actAnadirArticulos Action = actAnadirArticulos

38
Source/Modulos/Albaranes de cliente/Views/uViewDetallesAlbaranCliente.pas
View File

@ -11,10 +11,10 @@ uses
cxGrid, cxImageComboBox, cxTextEdit, cxMaskEdit, cxCheckBox, cxCurrencyEdit, cxGrid, cxImageComboBox, cxTextEdit, cxMaskEdit, cxCheckBox, cxCurrencyEdit,
Grids, DBGrids, StdCtrls, ExtCtrls, cxRichEdit, ExtActns, StdActns, Grids, DBGrids, StdCtrls, ExtCtrls, cxRichEdit, ExtActns, StdActns,
JvExStdCtrls, JvCombobox, JvColorCombo, TB2Item, SpTBXItem, TB2Dock, TB2Toolbar, JvExStdCtrls, JvCombobox, JvColorCombo, TB2Item, SpTBXItem, TB2Dock, TB2Toolbar,
uControllerDetallesArticulos, uBizAlbaranesCliente, cxDropDownEdit, uControllerDetallesArticulos, uBizAlbaranesCliente, uBizDetallesAlbaranCliente,
cxCalendar, cxDBEdit, dxLayoutControl, cxContainer, cxLookupEdit, cxDropDownEdit, cxCalendar, cxDBEdit, dxLayoutControl, cxContainer, cxLookupEdit,
cxDBLookupEdit, cxDBLookupComboBox, uDAInterfaces, cxButtonEdit, cxDBLookupEdit, cxDBLookupComboBox, uDAInterfaces, cxButtonEdit,
uViewDetallesArticulos, Menus, cxGridCustomPopupMenu, cxGridPopupMenu, uViewDetallesArticulos, Menus, cxGridCustomPopupMenu, cxGridPopupMenu,
uViewDetallesArticulosParaVenta, cxEditRepositoryItems, cxLookAndFeels, uViewDetallesArticulosParaVenta, cxEditRepositoryItems, cxLookAndFeels,
cxLookAndFeelPainters; cxLookAndFeelPainters;
@ -33,7 +33,6 @@ type
cxGridViewCANTIDAD2: TcxGridDBColumn; cxGridViewCANTIDAD2: TcxGridDBColumn;
cxGridViewIR_ARTICULO_REEMPLAZADO: TcxGridDBColumn; cxGridViewIR_ARTICULO_REEMPLAZADO: TcxGridDBColumn;
cxGridViewREFERENCIA_ART_REEMPLAZADO: TcxGridDBColumn; cxGridViewREFERENCIA_ART_REEMPLAZADO: TcxGridDBColumn;
procedure cxGridViewCANTIDAD2PropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
procedure cxGridViewREFERENCIA_ART_REEMPLAZADOPropertiesButtonClick(Sender: TObject; AButtonIndex: Integer); procedure cxGridViewREFERENCIA_ART_REEMPLAZADOPropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
procedure OnValidateReferencia_ART_REEMPLAZADO(Sender: TObject; var DisplayValue: Variant; var ErrorText: TCaption; var Error: Boolean); procedure OnValidateReferencia_ART_REEMPLAZADO(Sender: TObject; var DisplayValue: Variant; var ErrorText: TCaption; var Error: Boolean);
procedure CustomViewCreate(Sender: TObject); procedure CustomViewCreate(Sender: TObject);
@ -86,18 +85,13 @@ begin
inherited; inherited;
end; end;
procedure TfrViewDetallesAlbaranCliente.cxGridViewCANTIDAD2PropertiesButtonClick( procedure TfrViewDetallesAlbaranCliente.cxGridViewREFERENCIA_ART_REEMPLAZADOPropertiesButtonClick(Sender: TObject; AButtonIndex: Integer);
Sender: TObject; AButtonIndex: Integer);
begin begin
inherited; inherited;
(Controller as IDetallesAlbaranClienteController).ModificarCantidadColores(Detalles); case AButtonIndex of
end; 0:(Controller as IControllerDetallesArticulos).AnadirArticulos(Detalles, False, tClienteReemplazo);
1:(Controller as IDetallesAlbaranClienteController).QuitarArticuloReemplazado(Detalles);
procedure TfrViewDetallesAlbaranCliente.cxGridViewREFERENCIA_ART_REEMPLAZADOPropertiesButtonClick( end;
Sender: TObject; AButtonIndex: Integer);
begin
inherited;
//
end; end;
function TfrViewDetallesAlbaranCliente.GetAlbaran: IBizAlbaranCliente; function TfrViewDetallesAlbaranCliente.GetAlbaran: IBizAlbaranCliente;
@ -115,14 +109,16 @@ begin
Exit; Exit;
lsReferencia := VarToStr(DisplayValue); lsReferencia := VarToStr(DisplayValue);
if (length(trim(lsReferencia)) = 0) then if (length(trim(lsReferencia)) <> 0) then
Exit;
if not AnadirArticulo(lsReferencia, tClienteReemplazo) then
begin begin
ErrorText := 'La referencia introducida no exite en el catálogo'; if not AnadirArticulo(lsReferencia, tClienteReemplazo) then
Error := True; begin
end; ErrorText := 'La referencia introducida no exite en el catálogo';
Error := True;
end;
end
else
(Controller as IDetallesAlbaranClienteController).QuitarArticuloReemplazado(Detalles);
end; end;
procedure TfrViewDetallesAlbaranCliente.RellenarArticulosInterno; procedure TfrViewDetallesAlbaranCliente.RellenarArticulosInterno;

2
Source/Modulos/Almacenes/Plugin/uPluginAlmacenes.dfm
View File

@ -48,7 +48,9 @@ object PluginAlmacenes: TPluginAlmacenes
Tag = 100 Tag = 100
Category = 'Log'#237'stica' Category = 'Log'#237'stica'
Caption = 'Almacenes' Caption = 'Almacenes'
Enabled = False
ImageIndex = 0 ImageIndex = 0
Visible = False
OnExecute = actAlmacenesExecute OnExecute = actAlmacenesExecute
end end
end end

15
Source/Modulos/Articulos/Controller/uControllerDetallesArticulos.pas
View File

@ -8,14 +8,14 @@ uses Classes, Variants, uDACDSDataTable, uDADataTable, uControllerDetallesBase,
const const
CAMPO_REFERENCIA = 'REFERENCIA'; //Campo ficticio CAMPO_REFERENCIA = 'REFERENCIA'; //Campo ficticio
CAMPO_REFERENCIA_PROVEEDOR = 'REFERENCIA_PROVEEDOR'; //Campo ficticio CAMPO_REFERENCIA_PROVEEDOR = 'REFERENCIA_PROVEEDOR'; //Campo ficticio
CAMPO_REFERENCIA_ART_REEMPLAZADO = 'REFERENCIA_ART_REEMPLAZADO'; //Campo ficticio CAMPO_REFERENCIA_ART_REEMPLAZADO = 'REFERENCIA_ART_REEMPLAZADO'; //Campo ficticio
type type
TEnumReferencia = (tCliente, tProveedor, tClienteReemplazo); TEnumReferencia = (tCliente, tProveedor, tClienteReemplazo);
IControllerDetallesArticulos = interface(IControllerDetallesBase) IControllerDetallesArticulos = interface(IControllerDetallesBase)
['{6E156796-DB1F-4727-BBFB-FBAEF2E5C098}'] ['{6E156796-DB1F-4727-BBFB-FBAEF2E5C098}']
procedure AnadirArticulos(ADetalles: IDAStronglyTypedDataTable; const ANuevaFila :Boolean = True); procedure AnadirArticulos(ADetalles: IDAStronglyTypedDataTable; const ANuevaFila :Boolean = True; const TipoReferencia: TEnumReferencia=tCliente);
function AnadirArticulo(ADetalles: IDAStronglyTypedDataTable; Referencia: String; TipoReferencia: TEnumReferencia; AClienteID: Integer = -1; const ACantidad: Float = 1): Boolean; overload; function AnadirArticulo(ADetalles: IDAStronglyTypedDataTable; Referencia: String; TipoReferencia: TEnumReferencia; AClienteID: Integer = -1; const ACantidad: Float = 1): Boolean; overload;
function AnadirArticulo(ADetalles: IDAStronglyTypedDataTable; IDArticulo: Integer; AClienteID: Integer = -1; const ACantidad: Float = 1): Boolean; overload; function AnadirArticulo(ADetalles: IDAStronglyTypedDataTable; IDArticulo: Integer; AClienteID: Integer = -1; const ACantidad: Float = 1): Boolean; overload;
procedure ActualizarDetalles(ADetalles: IDAStronglyTypedDataTable; AArticulos: IBizArticulo); procedure ActualizarDetalles(ADetalles: IDAStronglyTypedDataTable; AArticulos: IBizArticulo);
@ -43,7 +43,7 @@ type
public public
function AnadirArticulo(ADetalles: IDAStronglyTypedDataTable; Referencia: String; TipoReferencia: TEnumReferencia; AClienteID: Integer = -1; const ACantidad: Float = 1): Boolean; overload; function AnadirArticulo(ADetalles: IDAStronglyTypedDataTable; Referencia: String; TipoReferencia: TEnumReferencia; AClienteID: Integer = -1; const ACantidad: Float = 1): Boolean; overload;
function AnadirArticulo(ADetalles: IDAStronglyTypedDataTable; IDArticulo: Integer; AClienteID: Integer = -1; const ACantidad: Float = 1): Boolean; overload; function AnadirArticulo(ADetalles: IDAStronglyTypedDataTable; IDArticulo: Integer; AClienteID: Integer = -1; const ACantidad: Float = 1): Boolean; overload;
procedure AnadirArticulos(ADetalles: IDAStronglyTypedDataTable; const ANuevaFila :Boolean = True); virtual; procedure AnadirArticulos(ADetalles: IDAStronglyTypedDataTable; const ANuevaFila :Boolean = True; const TipoReferencia: TEnumReferencia=tCliente); virtual;
procedure ActualizarDetalles(ADetalles: IDAStronglyTypedDataTable; AArticulos: IBizArticulo); procedure ActualizarDetalles(ADetalles: IDAStronglyTypedDataTable; AArticulos: IBizArticulo);
procedure CambiarSignoDetalles(ADetalles: IDAStronglyTypedDataTable; const AAll: Boolean = True); procedure CambiarSignoDetalles(ADetalles: IDAStronglyTypedDataTable; const AAll: Boolean = True);
procedure AnadirConceptoInicial(ADetalles: IDAStronglyTypedDataTable; AConcepto: String); procedure AnadirConceptoInicial(ADetalles: IDAStronglyTypedDataTable; AConcepto: String);
@ -168,7 +168,7 @@ begin
end; end;
end; end;
procedure TControllerDetallesArticulos.AnadirArticulos(ADetalles: IDAStronglyTypedDataTable; const ANuevaFila: Boolean); procedure TControllerDetallesArticulos.AnadirArticulos(ADetalles: IDAStronglyTypedDataTable; const ANuevaFila :Boolean = True; const TipoReferencia: TEnumReferencia=tCliente);
var var
AArticulos: IBizArticulo; AArticulos: IBizArticulo;
begin begin
@ -185,7 +185,12 @@ begin
else else
begin begin
AArticulos := FArticulosController.ElegirArticulos(AArticulos, 'Elija el artículo que desea añadir', False); AArticulos := FArticulosController.ElegirArticulos(AArticulos, 'Elija el artículo que desea añadir', False);
RellenarDetalle(ADetalles, AArticulos);
//Se ha introducido en la funcion el parametro tipoReferencia para que desde el detalle se pueda cambiar seleccionando un articulo la referencia de reemplazo
case TipoReferencia of
tCliente: RellenarDetalle(ADetalles, AArticulos);
tClienteReemplazo: RellenarDetalleReemplazo(ADetalles, AArticulos);
end;
end; end;
finally finally
AArticulos := Nil; AArticulos := Nil;

28
Source/Modulos/Contactos/Views/uEditorElegirClientes.dfm
View File

@ -23,17 +23,17 @@ inherited fEditorElegirClientes: TfEditorElegirClientes
ExplicitWidth = 683 ExplicitWidth = 683
ExplicitHeight = 49 ExplicitHeight = 49
inherited tbxMain: TSpTBXToolbar inherited tbxMain: TSpTBXToolbar
ExplicitWidth = 284 ExplicitWidth = 126
inherited TBXItem36: TSpTBXItem inherited TBXItem36: TSpTBXItem
Action = actAnchoAuto2 Action = actAnchoAuto2
end end
end end
inherited tbxFiltro: TSpTBXToolbar inherited tbxFiltro: TSpTBXToolbar
Left = 284 Left = 126
Top = 23 Top = 23
DockPos = 96 DockPos = 96
DockRow = 1 DockRow = 1
ExplicitLeft = 284 ExplicitLeft = 126
ExplicitTop = 23 ExplicitTop = 23
inherited TBXItem34: TSpTBXItem inherited TBXItem34: TSpTBXItem
Action = actQuitarFiltro2 Action = actQuitarFiltro2
@ -199,30 +199,36 @@ inherited fEditorElegirClientes: TfEditorElegirClientes
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 689
Width = 689
end end
inherited edtFechaIniFiltro: TcxDateEdit inherited edtFechaIniFiltro: TcxDateEdit
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitWidth = 460
Width = 460
end end
inherited edtFechaFinFiltro: TcxDateEdit inherited edtFechaFinFiltro: TcxDateEdit
Left = 385 Left = 397
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 385 ExplicitLeft = 397
ExplicitWidth = 123 ExplicitWidth = 123
Width = 123 Width = 123
end end
inherited eLista: TcxComboBox inherited eLista: TcxComboBox
Left = 520 Left = 515
Style.LookAndFeel.SkinName = '' Style.LookAndFeel.SkinName = ''
StyleDisabled.LookAndFeel.SkinName = '' StyleDisabled.LookAndFeel.SkinName = ''
StyleFocused.LookAndFeel.SkinName = '' StyleFocused.LookAndFeel.SkinName = ''
StyleHot.LookAndFeel.SkinName = '' StyleHot.LookAndFeel.SkinName = ''
ExplicitLeft = 520 ExplicitLeft = 515
ExplicitWidth = 215
Width = 215
end end
end end
inherited TBXAlignmentPanel1: TSpTBXDockablePanel inherited TBXAlignmentPanel1: TSpTBXDockablePanel
@ -296,6 +302,14 @@ inherited fEditorElegirClientes: TfEditorElegirClientes
inherited actConfPagina: TAction inherited actConfPagina: TAction
Visible = False Visible = False
end end
inherited actPrevisualizar: TAction
Enabled = False
Visible = False
end
inherited actImprimir: TAction
Enabled = False
Visible = False
end
inherited actDeshacer: TEditUndo inherited actDeshacer: TEditUndo
Visible = False Visible = False
end end

22
Source/Modulos/Inventario/Model/Inventario_model.rc
View File

@ -0,0 +1,22 @@
1 VERSIONINFO
FILEVERSION 1,0,0,0
PRODUCTVERSION 1,0,0,0
FILEFLAGSMASK 0x3FL
FILEFLAGS 0x00L
FILEOS 0x40004L
FILETYPE 0x1L
FILESUBTYPE 0x0L
BEGIN
BLOCK "StringFileInfo"
BEGIN
BLOCK "0C0A04E4"
BEGIN
VALUE "FileVersion", "1.0.0.0\0"
VALUE "ProductVersion", "1.0.0.0\0"
END
END
BLOCK "VarFileInfo"
BEGIN
VALUE "Translation", 0x0C0A, 1252
END
END

BIN
Source/Modulos/Inventario/Model/Inventario_model.res
View File

Binary file not shown.

10
Source/Modulos/Inventario/Model/schInventarioClient_Intf.pas
View File

@ -4,7 +4,7 @@ unit schInventarioClient_Intf;
interface interface
uses uses
Classes, DB, SysUtils, uROClasses, uDAInterfaces, uDADataTable, FmtBCD, uROXMLIntf; Classes, DB, schBase_Intf, SysUtils, uROClasses, uDAInterfaces, uDADataTable, FmtBCD, uROXMLIntf;
const const
{ Data table rules ids { Data table rules ids
@ -314,7 +314,7 @@ type
end; end;
{ TInventarioDataTableRules } { TInventarioDataTableRules }
TInventarioDataTableRules = class(TDADataTableRules, IInventario) TInventarioDataTableRules = class(TIntfObjectDADataTableRules, IInventario)
private private
protected protected
{ Property getters and setters } { Property getters and setters }
@ -553,7 +553,7 @@ type
end; end;
{ TMovimientos_Detalle_ColorDataTableRules } { TMovimientos_Detalle_ColorDataTableRules }
TMovimientos_Detalle_ColorDataTableRules = class(TDADataTableRules, IMovimientos_Detalle_Color) TMovimientos_Detalle_ColorDataTableRules = class(TIntfObjectDADataTableRules, IMovimientos_Detalle_Color)
private private
protected protected
{ Property getters and setters } { Property getters and setters }
@ -762,7 +762,7 @@ type
end; end;
{ TDetalleReservasDataTableRules } { TDetalleReservasDataTableRules }
TDetalleReservasDataTableRules = class(TDADataTableRules, IDetalleReservas) TDetalleReservasDataTableRules = class(TIntfObjectDADataTableRules, IDetalleReservas)
private private
protected protected
{ Property getters and setters } { Property getters and setters }
@ -971,7 +971,7 @@ type
end; end;
{ TInventario_ColorDataTableRules } { TInventario_ColorDataTableRules }
TInventario_ColorDataTableRules = class(TDADataTableRules, IInventario_Color) TInventario_ColorDataTableRules = class(TIntfObjectDADataTableRules, IInventario_Color)
private private
protected protected
{ Property getters and setters } { Property getters and setters }

2
Source/Modulos/Pedidos de cliente/Controller/PedidosCliente_controller.drc
View File

@ -13,4 +13,4 @@ BEGIN
END END
/* C:\Codigo noviseda\Source\Modulos\Pedidos de cliente\Controller\PedidosCliente_controller.res */ /* C:\Codigo noviseda\Source\Modulos\Pedidos de cliente\Controller\PedidosCliente_controller.res */
/* C:\Codigo noviseda\Source\Modulos\Pedidos de cliente\Controller\PedidosCliente_controller.drf */ /* C:\DOCUME~1\Usuario\CONFIG~1\Temp\dtf1E6.tmp */

2
Source/Modulos/Pedidos de cliente/Data/PedidosCliente_data.drc
View File

@ -14,4 +14,4 @@ END
/* C:\Codigo noviseda\Source\Modulos\Pedidos de cliente\Data\uDataModulePedidosCliente.dfm */ /* C:\Codigo noviseda\Source\Modulos\Pedidos de cliente\Data\uDataModulePedidosCliente.dfm */
/* C:\Codigo noviseda\Source\Modulos\Pedidos de cliente\Data\PedidosCliente_data.res */ /* C:\Codigo noviseda\Source\Modulos\Pedidos de cliente\Data\PedidosCliente_data.res */
/* C:\DOCUME~1\Usuario\CONFIG~1\Temp\dtfA0.tmp */ /* C:\DOCUME~1\Usuario\CONFIG~1\Temp\dtf1E4.tmp */

2
Source/Modulos/Pedidos de cliente/Model/PedidosCliente_model.drc
View File

@ -13,4 +13,4 @@ BEGIN
END END
/* C:\Codigo noviseda\Source\Modulos\Pedidos de cliente\Model\PedidosCliente_model.res */ /* C:\Codigo noviseda\Source\Modulos\Pedidos de cliente\Model\PedidosCliente_model.res */
/* C:\DOCUME~1\Usuario\CONFIG~1\Temp\dtf9E.tmp */ /* C:\DOCUME~1\Usuario\CONFIG~1\Temp\dtf1E2.tmp */

2
Source/Modulos/Pedidos de cliente/Plugin/PedidosCliente_plugin.drc
View File

@ -14,4 +14,4 @@ END
/* C:\Codigo noviseda\Source\Modulos\Pedidos de cliente\Plugin\uPluginPedidosCliente.dfm */ /* C:\Codigo noviseda\Source\Modulos\Pedidos de cliente\Plugin\uPluginPedidosCliente.dfm */
/* C:\Codigo noviseda\Source\Modulos\Pedidos de cliente\Plugin\PedidosCliente_plugin.res */ /* C:\Codigo noviseda\Source\Modulos\Pedidos de cliente\Plugin\PedidosCliente_plugin.res */
/* C:\DOCUME~1\Usuario\CONFIG~1\Temp\dtf112.tmp */ /* C:\DOCUME~1\Usuario\CONFIG~1\Temp\dtf256.tmp */

2
Source/Modulos/Pedidos de cliente/Views/PedidosCliente_view.drc
View File

@ -25,4 +25,4 @@ END
/* C:\Codigo noviseda\Source\Modulos\Pedidos de cliente\Views\uEditorElegirArticulosPedidoCliente.dfm */ /* C:\Codigo noviseda\Source\Modulos\Pedidos de cliente\Views\uEditorElegirArticulosPedidoCliente.dfm */
/* C:\Codigo noviseda\Source\Modulos\Pedidos de cliente\Views\uEditorPedidosClienteReport.dfm */ /* C:\Codigo noviseda\Source\Modulos\Pedidos de cliente\Views\uEditorPedidosClienteReport.dfm */
/* C:\Codigo noviseda\Source\Modulos\Pedidos de cliente\Views\PedidosCliente_view.res */ /* C:\Codigo noviseda\Source\Modulos\Pedidos de cliente\Views\PedidosCliente_view.res */
/* C:\Codigo noviseda\Source\Modulos\Pedidos de cliente\Views\PedidosCliente_view.drf */ /* C:\DOCUME~1\Usuario\CONFIG~1\Temp\dtf254.tmp */

BIN
Source/Servidor/FactuGES_Server.RES
View File

Binary file not shown.

2
Source/Servidor/FactuGES_Server.dpr
View File

@ -3,7 +3,7 @@ program FactuGES_Server;
{#ROGEN:..\Servicios\FactuGES.rodl} // RemObjects: Careful, do not remove! {#ROGEN:..\Servicios\FactuGES.rodl} // RemObjects: Careful, do not remove!
uses uses
ExceptionLog, // ExceptionLog,
uROComInit, uROComInit,
uROComboService, uROComboService,
Forms, Forms,

686
Source/Servidor/FactuGES_Server.dproj
View File

@ -1,347 +1,347 @@
<?xml version="1.0" encoding="utf-8"?> <?xml version="1.0" encoding="utf-8"?>
<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> <Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
<PropertyGroup> <PropertyGroup>
<ProjectGuid>{ebdcd25d-40d7-4146-91ec-a0ea4aa1dcd1}</ProjectGuid> <ProjectGuid>{ebdcd25d-40d7-4146-91ec-a0ea4aa1dcd1}</ProjectGuid>
<MainSource>FactuGES_Server.dpr</MainSource> <MainSource>FactuGES_Server.dpr</MainSource>
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration> <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform> <Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
<DCC_DCCCompiler>DCC32</DCC_DCCCompiler> <DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
<DCC_DependencyCheckOutputName>..\..\Output\Debug\Servidor\FactuGES_Server.exe</DCC_DependencyCheckOutputName> <DCC_DependencyCheckOutputName>..\..\Output\Debug\Servidor\FactuGES_Server.exe</DCC_DependencyCheckOutputName>
<DCC_UsePackage>vcl;rtl;vclx;vclactnband;dbrtl;vcldb;vcldbx;bdertl;dsnap;dsnapcon;teeUI;teedb;tee;adortl;vclib;ibxpress;dbxcds;dbexpress;DbxCommonDriver;IndyCore;IndySystem;IndyProtocols;VclSmp;vclie;webdsnap;xmlrtl;inet;inetdbbde;inetdbxpress;RemObjects_BPDX_D11;RemObjects_RODX_D11;RemObjects_Indy_D11;RemObjects_Synapse_D11;RemObjects_WebBroker_D11;DataAbstract_Core_D11;DataAbstract_DBXDriver_D11;DataAbstract_IDE_D11;DataAbstract_Scripting_D11;DataAbstract_SDACDriver_D11;sdac105;dac105;DataAbstract_SQLiteDriver_D11;cxEditorsD10;cxLibraryD10;dxThemeD10;cxDataD10;cxExtEditorsD10;cxGridD10;cxPageControlD10;cxSchedulerD10;cxTreeListD10;cxVerticalGridD10;dxBarD10;dxComnD10;dxBarDBNavD10;dxBarExtDBItemsD10;dxBarExtItemsD10;dxDockingD10;dxLayoutControlD10;dxNavBarD10;dxPSCoreD10;dxsbD10;dxPScxCommonD10;dxPSLnksD10;vclshlctrls;dxPScxExtCommonD10;dxPScxGridLnkD10;dxPScxPCProdD10;dxPScxScheduler2LnkD10;dxPScxTLLnkD10;dxPSdxLCLnkD10;dxPsPrVwAdvD10;pckMD5;pckUCDataConnector;pckUserControl_RT;PluginSDK_D10R;PNG_D10;PngComponentsD10;tb2k_d11;SpTBXLib_d11;JclVcl;Jcl;JvXPCtrlsD11R;JvCoreD11R;JvSystemD11R;JvStdCtrlsD11R;JvAppFrmD11R;JvBandsD11R;JvDBD11R;JvDlgsD11R;JvBDED11R;JvCmpD11R;JvCryptD11R;JvCtrlsD11R;JvCustomD11R;JvDockingD11R;JvDotNetCtrlsD11R;JvEDID11R;JvGlobusD11R;JvHMID11R;JvInterpreterD11R;JvJansD11R;JvManagedThreadsD11R;JvMMD11R;JvNetD11R;JvPageCompsD11R;JvPluginD11R;JvPrintPreviewD11R;JvRuntimeDesignD11R;JvTimeFrameworkD11R;JvUIBD11R;JvValidatorsD11R;JvWizardD11R;pckUCADOConn;pckUCBDEConn;pckUCIBXConn;pckUCMidasConn;cxExportD10;GUISDK_D11R;ccpackD11;JSDialog100;fsTee11;fs11;frx11;frxADO11;frxBDE11;frxDB11;frxDBX11;frxe11;frxIBX11;frxTee11;fsADO11;fsBDE11;fsDB11;fsIBX11;websnap;soaprtl;IntrawebDB_90_100;Intraweb_90_100</DCC_UsePackage> <DCC_UsePackage>vcl;rtl;vclx;vclactnband;dbrtl;vcldb;vcldbx;bdertl;dsnap;dsnapcon;teeUI;teedb;tee;adortl;vclib;ibxpress;dbxcds;dbexpress;DbxCommonDriver;IndyCore;IndySystem;IndyProtocols;VclSmp;vclie;webdsnap;xmlrtl;inet;inetdbbde;inetdbxpress;RemObjects_BPDX_D11;RemObjects_RODX_D11;RemObjects_Indy_D11;RemObjects_Synapse_D11;RemObjects_WebBroker_D11;DataAbstract_Core_D11;DataAbstract_DBXDriver_D11;DataAbstract_IDE_D11;DataAbstract_Scripting_D11;DataAbstract_SDACDriver_D11;sdac105;dac105;DataAbstract_SQLiteDriver_D11;cxEditorsD10;cxLibraryD10;dxThemeD10;cxDataD10;cxExtEditorsD10;cxGridD10;cxPageControlD10;cxSchedulerD10;cxTreeListD10;cxVerticalGridD10;dxBarD10;dxComnD10;dxBarDBNavD10;dxBarExtDBItemsD10;dxBarExtItemsD10;dxDockingD10;dxLayoutControlD10;dxNavBarD10;dxPSCoreD10;dxsbD10;dxPScxCommonD10;dxPSLnksD10;vclshlctrls;dxPScxExtCommonD10;dxPScxGridLnkD10;dxPScxPCProdD10;dxPScxScheduler2LnkD10;dxPScxTLLnkD10;dxPSdxLCLnkD10;dxPsPrVwAdvD10;pckMD5;pckUCDataConnector;pckUserControl_RT;PluginSDK_D10R;PNG_D10;PngComponentsD10;tb2k_d11;SpTBXLib_d11;JclVcl;Jcl;JvXPCtrlsD11R;JvCoreD11R;JvSystemD11R;JvStdCtrlsD11R;JvAppFrmD11R;JvBandsD11R;JvDBD11R;JvDlgsD11R;JvBDED11R;JvCmpD11R;JvCryptD11R;JvCtrlsD11R;JvCustomD11R;JvDockingD11R;JvDotNetCtrlsD11R;JvEDID11R;JvGlobusD11R;JvHMID11R;JvInterpreterD11R;JvJansD11R;JvManagedThreadsD11R;JvMMD11R;JvNetD11R;JvPageCompsD11R;JvPluginD11R;JvPrintPreviewD11R;JvRuntimeDesignD11R;JvTimeFrameworkD11R;JvUIBD11R;JvValidatorsD11R;JvWizardD11R;pckUCADOConn;pckUCBDEConn;pckUCIBXConn;pckUCMidasConn;cxExportD10;GUISDK_D11R;ccpackD11;JSDialog100;fsTee11;fs11;frx11;frxADO11;frxBDE11;frxDB11;frxDBX11;frxe11;frxIBX11;frxTee11;fsADO11;fsBDE11;fsDB11;fsIBX11;websnap;soaprtl;IntrawebDB_90_100;Intraweb_90_100</DCC_UsePackage>
</PropertyGroup> </PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' "> <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
<Version>7.0</Version> <Version>7.0</Version>
<DCC_DebugInformation>False</DCC_DebugInformation> <DCC_DebugInformation>False</DCC_DebugInformation>
<DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols> <DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
<DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo> <DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
<DCC_MapFile>3</DCC_MapFile> <DCC_MapFile>3</DCC_MapFile>
<DCC_ExeOutput>..\..\Output\Release\Servidor</DCC_ExeOutput> <DCC_ExeOutput>..\..\Output\Release\Servidor</DCC_ExeOutput>
<DCC_Define>RELEASE</DCC_Define> <DCC_Define>RELEASE</DCC_Define>
</PropertyGroup> </PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' "> <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
<Version>7.0</Version> <Version>7.0</Version>
<DCC_MapFile>3</DCC_MapFile> <DCC_MapFile>3</DCC_MapFile>
<DCC_ExeOutput>..\..\Output\Debug\Servidor</DCC_ExeOutput> <DCC_ExeOutput>..\..\Output\Debug\Servidor</DCC_ExeOutput>
<DCC_Define>DEBUG;EUREKALOG;EUREKALOG_VER6</DCC_Define> <DCC_Define>DEBUG;EUREKALOG;EUREKALOG_VER6</DCC_Define>
<DCC_GenerateStackFrames>True</DCC_GenerateStackFrames> <DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
<DCC_DebugInfoInExe>True</DCC_DebugInfoInExe> <DCC_DebugInfoInExe>True</DCC_DebugInfoInExe>
<DCC_DebugVN>True</DCC_DebugVN> <DCC_DebugVN>True</DCC_DebugVN>
<DCC_UnitSearchPath>$(BDS)\Lib\Debug\Indy10;$(BDS)\lib\Debug</DCC_UnitSearchPath> <DCC_UnitSearchPath>$(BDS)\Lib\Debug\Indy10;$(BDS)\lib\Debug</DCC_UnitSearchPath>
<DCC_ResourcePath>$(BDS)\Lib\Debug\Indy10;$(BDS)\lib\Debug</DCC_ResourcePath> <DCC_ResourcePath>$(BDS)\Lib\Debug\Indy10;$(BDS)\lib\Debug</DCC_ResourcePath>
<DCC_ObjPath>$(BDS)\Lib\Debug\Indy10;$(BDS)\lib\Debug</DCC_ObjPath> <DCC_ObjPath>$(BDS)\Lib\Debug\Indy10;$(BDS)\lib\Debug</DCC_ObjPath>
<DCC_IncludePath>$(BDS)\Lib\Debug\Indy10;$(BDS)\lib\Debug</DCC_IncludePath> <DCC_IncludePath>$(BDS)\Lib\Debug\Indy10;$(BDS)\lib\Debug</DCC_IncludePath>
</PropertyGroup> </PropertyGroup>
<ProjectExtensions> <ProjectExtensions>
<Borland.Personality>Delphi.Personality</Borland.Personality> <Borland.Personality>Delphi.Personality</Borland.Personality>
<Borland.ProjectType /> <Borland.ProjectType/>
<BorlandProject> <BorlandProject>
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters><Parameters Name="RunParams">/standalone</Parameters></Parameters><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">2</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">Rodax Software S.L.</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.2.0</VersionInfoKeys><VersionInfoKeys Name="InternalName">FactuGES Servidor</VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">FactuGES Servidor</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.2.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys><VersionInfoKeys Name="CompileDate">jueves, 18 de febrero de 2010 12:17</VersionInfoKeys></VersionInfoKeys><Excluded_Packages></Excluded_Packages><Source><Source Name="MainSource">FactuGES_Server.dpr</Source></Source></Delphi.Personality></BorlandProject></BorlandProject> <BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters><Parameters Name="RunParams">/standalone</Parameters></Parameters><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">2</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">Rodax Software S.L.</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.2.0</VersionInfoKeys><VersionInfoKeys Name="InternalName">FactuGES Servidor</VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">FactuGES Servidor</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.2.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys><VersionInfoKeys Name="CompileDate">jueves, 18 de febrero de 2010 12:17</VersionInfoKeys></VersionInfoKeys><Excluded_Packages></Excluded_Packages><Source><Source Name="MainSource">FactuGES_Server.dpr</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
</ProjectExtensions> </ProjectExtensions>
<Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" /> <Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets"/>
<ItemGroup> <ItemGroup>
<DelphiCompile Include="FactuGES_Server.dpr"> <DelphiCompile Include="FactuGES_Server.dpr">
<MainSource>MainSource</MainSource> <MainSource>MainSource</MainSource>
</DelphiCompile> </DelphiCompile>
<DCCReference Include="..\ApplicationBase\Empresas\Model\schEmpresasClient_Intf.pas" /> <DCCReference Include="..\ApplicationBase\Empresas\Model\schEmpresasClient_Intf.pas"/>
<DCCReference Include="..\ApplicationBase\Empresas\Model\schEmpresasServer_Intf.pas" /> <DCCReference Include="..\ApplicationBase\Empresas\Model\schEmpresasServer_Intf.pas"/>
<DCCReference Include="..\ApplicationBase\Empresas\Model\uBizEmpresasServer.pas" /> <DCCReference Include="..\ApplicationBase\Empresas\Model\uBizEmpresasServer.pas"/>
<DCCReference Include="..\ApplicationBase\Empresas\Servidor\srvEmpresas_Impl.pas"> <DCCReference Include="..\ApplicationBase\Empresas\Servidor\srvEmpresas_Impl.pas">
<Form>srvEmpresas</Form> <DesignClass>TDARemoteService</DesignClass>
<DesignClass>TDARemoteService</DesignClass> <Form>srvEmpresas</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\ApplicationBase\ProvinciasPoblaciones\Servidor\srvProvinciasPoblaciones_Impl.pas"> <DCCReference Include="..\ApplicationBase\ProvinciasPoblaciones\Servidor\srvProvinciasPoblaciones_Impl.pas">
<Form>srvProvinciasPoblaciones_Impl</Form> <DesignClass>TDataModule</DesignClass>
<DesignClass>TDataModule</DesignClass> <Form>srvProvinciasPoblaciones_Impl</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\ApplicationBase\Usuarios\Model\schUsuariosClient_Intf.pas" /> <DCCReference Include="..\ApplicationBase\Usuarios\Model\schUsuariosClient_Intf.pas"/>
<DCCReference Include="..\ApplicationBase\Usuarios\Model\schUsuariosServer_Intf.pas" /> <DCCReference Include="..\ApplicationBase\Usuarios\Model\schUsuariosServer_Intf.pas"/>
<DCCReference Include="..\ApplicationBase\Usuarios\Servidor\srvUsuarios_Impl.pas"> <DCCReference Include="..\ApplicationBase\Usuarios\Servidor\srvUsuarios_Impl.pas">
<Form>srvUsuarios</Form> <DesignClass>TDataAbstractService</DesignClass>
<DesignClass>TDataAbstractService</DesignClass> <Form>srvUsuarios</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Base\schBase_Intf.pas" /> <DCCReference Include="..\Base\schBase_Intf.pas"/>
<DCCReference Include="..\Base\Utiles\uSistemaFunc.pas" /> <DCCReference Include="..\Base\Utiles\uSistemaFunc.pas"/>
<DCCReference Include="..\Base\Utiles\uStringsUtils.pas" /> <DCCReference Include="..\Base\Utiles\uStringsUtils.pas"/>
<DCCReference Include="..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteClient_Intf.pas" /> <DCCReference Include="..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteClient_Intf.pas"/>
<DCCReference Include="..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteServer_Intf.pas" /> <DCCReference Include="..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteServer_Intf.pas"/>
<DCCReference Include="..\Modulos\Albaranes de cliente\Model\uBizAlbaranClienteServer.pas" /> <DCCReference Include="..\Modulos\Albaranes de cliente\Model\uBizAlbaranClienteServer.pas"/>
<DCCReference Include="..\Modulos\Albaranes de cliente\Reports\uRptAlbaranesCliente_Server.pas"> <DCCReference Include="..\Modulos\Albaranes de cliente\Reports\uRptAlbaranesCliente_Server.pas">
<Form>RptAlbaranesCliente</Form> <DesignClass>TDataModule</DesignClass>
<DesignClass>TDataModule</DesignClass> <Form>RptAlbaranesCliente</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Albaranes de cliente\Reports\uRptWordAlbaranCliente.pas"> <DCCReference Include="..\Modulos\Albaranes de cliente\Reports\uRptWordAlbaranCliente.pas">
<Form>RptWordAlbaranCliente</Form> <DesignClass>TDataModule</DesignClass>
<DesignClass>TDataModule</DesignClass> <Form>RptWordAlbaranCliente</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Albaranes de cliente\Servidor\srvAlbaranesCliente_Impl.pas"> <DCCReference Include="..\Modulos\Albaranes de cliente\Servidor\srvAlbaranesCliente_Impl.pas">
<Form>srvAlbaranesCliente</Form> <DesignClass>TDataAbstractService</DesignClass>
<DesignClass>TDataAbstractService</DesignClass> <Form>srvAlbaranesCliente</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorClient_Intf.pas" /> <DCCReference Include="..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorClient_Intf.pas"/>
<DCCReference Include="..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorServer_Intf.pas" /> <DCCReference Include="..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorServer_Intf.pas"/>
<DCCReference Include="..\Modulos\Albaranes de proveedor\Model\uBizAlbaranProveedorServer.PAS" /> <DCCReference Include="..\Modulos\Albaranes de proveedor\Model\uBizAlbaranProveedorServer.PAS"/>
<DCCReference Include="..\Modulos\Albaranes de proveedor\Reports\uRptAlbaranesProveedor_Server.pas"> <DCCReference Include="..\Modulos\Albaranes de proveedor\Reports\uRptAlbaranesProveedor_Server.pas">
<Form>RptAlbaranesProveedor</Form> <DesignClass>TDataModule</DesignClass>
<DesignClass>TDataModule</DesignClass> <Form>RptAlbaranesProveedor</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Albaranes de proveedor\Reports\uRptWordAlbaranProveedor.pas"> <DCCReference Include="..\Modulos\Albaranes de proveedor\Reports\uRptWordAlbaranProveedor.pas">
<Form>RptWordAlbaranProveedor</Form> <DesignClass>TDataModule</DesignClass>
<DesignClass>TDataModule</DesignClass> <Form>RptWordAlbaranProveedor</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Albaranes de proveedor\Servidor\srvAlbaranesProveedor_Impl.pas"> <DCCReference Include="..\Modulos\Albaranes de proveedor\Servidor\srvAlbaranesProveedor_Impl.pas">
<Form>srvAlbaranesProveedor</Form> <DesignClass>TDataAbstractService</DesignClass>
<DesignClass>TDataAbstractService</DesignClass> <Form>srvAlbaranesProveedor</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Almacenes\Model\schAlmacenesClient_Intf.pas" /> <DCCReference Include="..\Modulos\Almacenes\Model\schAlmacenesClient_Intf.pas"/>
<DCCReference Include="..\Modulos\Almacenes\Model\schAlmacenesServer_Intf.pas" /> <DCCReference Include="..\Modulos\Almacenes\Model\schAlmacenesServer_Intf.pas"/>
<DCCReference Include="..\Modulos\Almacenes\Servidor\srvAlmacenes_Impl.pas"> <DCCReference Include="..\Modulos\Almacenes\Servidor\srvAlmacenes_Impl.pas">
<Form>srvAlmacenes</Form> <DesignClass>TDARemoteService</DesignClass>
<DesignClass>TDARemoteService</DesignClass> <Form>srvAlmacenes</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Articulos\Model\schArticulosClient_Intf.pas" /> <DCCReference Include="..\Modulos\Articulos\Model\schArticulosClient_Intf.pas"/>
<DCCReference Include="..\Modulos\Articulos\Model\schArticulosServer_Intf.pas" /> <DCCReference Include="..\Modulos\Articulos\Model\schArticulosServer_Intf.pas"/>
<DCCReference Include="..\Modulos\Articulos\Model\uBizArticulosServer.pas" /> <DCCReference Include="..\Modulos\Articulos\Model\uBizArticulosServer.pas"/>
<DCCReference Include="..\Modulos\Articulos\Servidor\srvArticulos_Impl.pas"> <DCCReference Include="..\Modulos\Articulos\Servidor\srvArticulos_Impl.pas">
<Form>srvArticulos</Form> <DesignClass>TDARemoteService</DesignClass>
<DesignClass>TDARemoteService</DesignClass> <Form>srvArticulos</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Contactos\Model\schContactosClient_Intf.pas" /> <DCCReference Include="..\Modulos\Contactos\Model\schContactosClient_Intf.pas"/>
<DCCReference Include="..\Modulos\Contactos\Model\schContactosServer_Intf.pas" /> <DCCReference Include="..\Modulos\Contactos\Model\schContactosServer_Intf.pas"/>
<DCCReference Include="..\Modulos\Contactos\Model\uBizClientesServer.pas" /> <DCCReference Include="..\Modulos\Contactos\Model\uBizClientesServer.pas"/>
<DCCReference Include="..\Modulos\Contactos\Model\uBizContactosServer.pas" /> <DCCReference Include="..\Modulos\Contactos\Model\uBizContactosServer.pas"/>
<DCCReference Include="..\Modulos\Contactos\Model\uBizEmpleadosServer.pas" /> <DCCReference Include="..\Modulos\Contactos\Model\uBizEmpleadosServer.pas"/>
<DCCReference Include="..\Modulos\Contactos\Model\uBizProveedoresServer.pas" /> <DCCReference Include="..\Modulos\Contactos\Model\uBizProveedoresServer.pas"/>
<DCCReference Include="..\Modulos\Contactos\Model\uBizVendedoresServer.pas" /> <DCCReference Include="..\Modulos\Contactos\Model\uBizVendedoresServer.pas"/>
<DCCReference Include="..\Modulos\Contactos\Reports\uRptEtiquetasContacto_Server.pas"> <DCCReference Include="..\Modulos\Contactos\Reports\uRptEtiquetasContacto_Server.pas">
<Form>RptEtiquetasContacto</Form> <DesignClass>TDataModule</DesignClass>
<DesignClass>TDataModule</DesignClass> <Form>RptEtiquetasContacto</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Contactos\Reports\uRptFichasEmpleado_Server.pas"> <DCCReference Include="..\Modulos\Contactos\Reports\uRptFichasEmpleado_Server.pas">
<Form>RptFichasEmpleado</Form> <DesignClass>TDataModule</DesignClass>
<DesignClass>TDataModule</DesignClass> <Form>RptFichasEmpleado</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Contactos\Servidor\srvContactos_Impl.pas"> <DCCReference Include="..\Modulos\Contactos\Servidor\srvContactos_Impl.pas">
<Form>srvContactos</Form> <DesignClass>TDARemoteService</DesignClass>
<DesignClass>TDARemoteService</DesignClass> <Form>srvContactos</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Fabricantes\Model\schFabricantesClient_Intf.pas" /> <DCCReference Include="..\Modulos\Fabricantes\Model\schFabricantesClient_Intf.pas"/>
<DCCReference Include="..\Modulos\Fabricantes\Model\schFabricantesServer_Intf.pas" /> <DCCReference Include="..\Modulos\Fabricantes\Model\schFabricantesServer_Intf.pas"/>
<DCCReference Include="..\Modulos\Fabricantes\Servidor\srvFabricantes_Impl.pas"> <DCCReference Include="..\Modulos\Fabricantes\Servidor\srvFabricantes_Impl.pas">
<Form>srvFabricantes</Form> <DesignClass>TDataAbstractService</DesignClass>
<DesignClass>TDataAbstractService</DesignClass> <Form>srvFabricantes</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Facturas de cliente\Model\schFacturasClienteClient_Intf.pas" /> <DCCReference Include="..\Modulos\Facturas de cliente\Model\schFacturasClienteClient_Intf.pas"/>
<DCCReference Include="..\Modulos\Facturas de cliente\Model\schFacturasClienteServer_Intf.pas" /> <DCCReference Include="..\Modulos\Facturas de cliente\Model\schFacturasClienteServer_Intf.pas"/>
<DCCReference Include="..\Modulos\Facturas de cliente\Model\uBizFacturasClienteServer.pas" /> <DCCReference Include="..\Modulos\Facturas de cliente\Model\uBizFacturasClienteServer.pas"/>
<DCCReference Include="..\Modulos\Facturas de cliente\Reports\uRptFacturasCliente_Server.pas"> <DCCReference Include="..\Modulos\Facturas de cliente\Reports\uRptFacturasCliente_Server.pas">
<Form>RptFacturasCliente</Form> <DesignClass>TDataModule</DesignClass>
<DesignClass>TDataModule</DesignClass> <Form>RptFacturasCliente</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Facturas de cliente\Reports\uRptWordFacturaCliente.pas"> <DCCReference Include="..\Modulos\Facturas de cliente\Reports\uRptWordFacturaCliente.pas">
<Form>RptWordFacturaCliente</Form> <DesignClass>TDataModule</DesignClass>
<DesignClass>TDataModule</DesignClass> <Form>RptWordFacturaCliente</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Facturas de cliente\Servidor\srvFacturasCliente_Impl.pas"> <DCCReference Include="..\Modulos\Facturas de cliente\Servidor\srvFacturasCliente_Impl.pas">
<Form>srvFacturasCliente</Form> <DesignClass>TDataAbstractService</DesignClass>
<DesignClass>TDataAbstractService</DesignClass> <Form>srvFacturasCliente</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Facturas de proveedor\Model\schFacturasProveedorClient_Intf.pas" /> <DCCReference Include="..\Modulos\Facturas de proveedor\Model\schFacturasProveedorClient_Intf.pas"/>
<DCCReference Include="..\Modulos\Facturas de proveedor\Model\schFacturasProveedorServer_Intf.pas" /> <DCCReference Include="..\Modulos\Facturas de proveedor\Model\schFacturasProveedorServer_Intf.pas"/>
<DCCReference Include="..\Modulos\Facturas de proveedor\Model\uBizFacturasProveedorServer.pas" /> <DCCReference Include="..\Modulos\Facturas de proveedor\Model\uBizFacturasProveedorServer.pas"/>
<DCCReference Include="..\Modulos\Facturas de proveedor\Reports\uRptFacturasProveedor_Server.pas"> <DCCReference Include="..\Modulos\Facturas de proveedor\Reports\uRptFacturasProveedor_Server.pas">
<Form>RptFacturasProveedor</Form> <DesignClass>TDataModule</DesignClass>
<DesignClass>TDataModule</DesignClass> <Form>RptFacturasProveedor</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Facturas de proveedor\Servidor\srvFacturasProveedor_Impl.pas"> <DCCReference Include="..\Modulos\Facturas de proveedor\Servidor\srvFacturasProveedor_Impl.pas">
<Form>srvFacturasProveedor</Form> <DesignClass>TDataAbstractService</DesignClass>
<DesignClass>TDataAbstractService</DesignClass> <Form>srvFacturasProveedor</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Familias\Model\schFamiliasClient_Intf.pas" /> <DCCReference Include="..\Modulos\Familias\Model\schFamiliasClient_Intf.pas"/>
<DCCReference Include="..\Modulos\Familias\Model\schFamiliasServer_Intf.pas" /> <DCCReference Include="..\Modulos\Familias\Model\schFamiliasServer_Intf.pas"/>
<DCCReference Include="..\Modulos\Familias\Servidor\srvFamilias_Impl.pas"> <DCCReference Include="..\Modulos\Familias\Servidor\srvFamilias_Impl.pas">
<Form>srvFamilias</Form> <DesignClass>TDataAbstractService</DesignClass>
<DesignClass>TDataAbstractService</DesignClass> <Form>srvFamilias</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Formas de pago\Model\schFormasPagoClient_Intf.pas" /> <DCCReference Include="..\Modulos\Formas de pago\Model\schFormasPagoClient_Intf.pas"/>
<DCCReference Include="..\Modulos\Formas de pago\Model\schFormasPagoServer_Intf.pas" /> <DCCReference Include="..\Modulos\Formas de pago\Model\schFormasPagoServer_Intf.pas"/>
<DCCReference Include="..\Modulos\Formas de pago\Servidor\srvFormasPago_Impl.pas"> <DCCReference Include="..\Modulos\Formas de pago\Servidor\srvFormasPago_Impl.pas">
<Form>srvFormasPago</Form> <DesignClass>TDataAbstractService</DesignClass>
<DesignClass>TDataAbstractService</DesignClass> <Form>srvFormasPago</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Gestion de documentos\Servidor\srvGestorDocumentos_Impl.pas"> <DCCReference Include="..\Modulos\Gestion de documentos\Servidor\srvGestorDocumentos_Impl.pas">
<Form>srvGestorDocumentos</Form> <DesignClass>TDataAbstractService</DesignClass>
<DesignClass>TDataAbstractService</DesignClass> <Form>srvGestorDocumentos</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Gestor de informes\Servidor\srvGestorInformes_Impl.pas"> <DCCReference Include="..\Modulos\Gestor de informes\Servidor\srvGestorInformes_Impl.pas">
<Form>srvGestorInformes</Form> <DesignClass>TDataAbstractService</DesignClass>
<DesignClass>TDataAbstractService</DesignClass> <Form>srvGestorInformes</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Historico de movimientos\Model\schHistoricoMovimientosClient_Intf.pas" /> <DCCReference Include="..\Modulos\Historico de movimientos\Model\schHistoricoMovimientosClient_Intf.pas"/>
<DCCReference Include="..\Modulos\Historico de movimientos\Model\schHistoricoMovimientosServer_Intf.pas" /> <DCCReference Include="..\Modulos\Historico de movimientos\Model\schHistoricoMovimientosServer_Intf.pas"/>
<DCCReference Include="..\Modulos\Historico de movimientos\Servidor\srvHistoricoMovimientos_Impl.pas"> <DCCReference Include="..\Modulos\Historico de movimientos\Servidor\srvHistoricoMovimientos_Impl.pas">
<Form>srvHistoricoMovimientos</Form> <DesignClass>TDataAbstractService</DesignClass>
<DesignClass>TDataAbstractService</DesignClass> <Form>srvHistoricoMovimientos</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Inventario\Model\schInventarioClient_Intf.pas" /> <DCCReference Include="..\Modulos\Inventario\Model\schInventarioClient_Intf.pas"/>
<DCCReference Include="..\Modulos\Inventario\Model\schInventarioServer_Intf.pas" /> <DCCReference Include="..\Modulos\Inventario\Model\schInventarioServer_Intf.pas"/>
<DCCReference Include="..\Modulos\Inventario\Servidor\srvInventario_Impl.pas"> <DCCReference Include="..\Modulos\Inventario\Servidor\srvInventario_Impl.pas">
<Form>srvInventario</Form> <DesignClass>TDataAbstractService</DesignClass>
<DesignClass>TDataAbstractService</DesignClass> <Form>srvInventario</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Obras\Model\schObrasClient_Intf.pas" /> <DCCReference Include="..\Modulos\Obras\Model\schObrasClient_Intf.pas"/>
<DCCReference Include="..\Modulos\Obras\Model\schObrasServer_Intf.pas" /> <DCCReference Include="..\Modulos\Obras\Model\schObrasServer_Intf.pas"/>
<DCCReference Include="..\Modulos\Obras\Model\uBizObrasServer.pas" /> <DCCReference Include="..\Modulos\Obras\Model\uBizObrasServer.pas"/>
<DCCReference Include="..\Modulos\Obras\Servidor\srvObras_Impl.pas"> <DCCReference Include="..\Modulos\Obras\Servidor\srvObras_Impl.pas">
<Form>srvObras</Form> <DesignClass>TDataAbstractService</DesignClass>
<DesignClass>TDataAbstractService</DesignClass> <Form>srvObras</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorClient_Intf.pas" /> <DCCReference Include="..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorClient_Intf.pas"/>
<DCCReference Include="..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorServer_Intf.pas" /> <DCCReference Include="..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorServer_Intf.pas"/>
<DCCReference Include="..\Modulos\Pedidos a proveedor\Model\uBizPedidosProveedorServer.pas" /> <DCCReference Include="..\Modulos\Pedidos a proveedor\Model\uBizPedidosProveedorServer.pas"/>
<DCCReference Include="..\Modulos\Pedidos a proveedor\Reports\uRptPedidosProveedor_Server.pas"> <DCCReference Include="..\Modulos\Pedidos a proveedor\Reports\uRptPedidosProveedor_Server.pas">
<Form>RptPedidosProveedor</Form> <DesignClass>TDataModule</DesignClass>
<DesignClass>TDataModule</DesignClass> <Form>RptPedidosProveedor</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Pedidos a proveedor\Reports\uRptWordPedidoProveedor.pas"> <DCCReference Include="..\Modulos\Pedidos a proveedor\Reports\uRptWordPedidoProveedor.pas">
<Form>RptWordPedidoProveedor</Form> <DesignClass>TDataModule</DesignClass>
<DesignClass>TDataModule</DesignClass> <Form>RptWordPedidoProveedor</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Pedidos a proveedor\Servidor\srvPedidosProveedor_Impl.pas"> <DCCReference Include="..\Modulos\Pedidos a proveedor\Servidor\srvPedidosProveedor_Impl.pas">
<Form>srvPedidosProveedor</Form> <DesignClass>TDataAbstractService</DesignClass>
<DesignClass>TDataAbstractService</DesignClass> <Form>srvPedidosProveedor</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Pedidos de cliente\Model\schPedidosClienteClient_Intf.pas" /> <DCCReference Include="..\Modulos\Pedidos de cliente\Model\schPedidosClienteClient_Intf.pas"/>
<DCCReference Include="..\Modulos\Pedidos de cliente\Model\schPedidosClienteServer_Intf.pas" /> <DCCReference Include="..\Modulos\Pedidos de cliente\Model\schPedidosClienteServer_Intf.pas"/>
<DCCReference Include="..\Modulos\Pedidos de cliente\Model\uBizPedidosClienteServer.pas" /> <DCCReference Include="..\Modulos\Pedidos de cliente\Model\uBizPedidosClienteServer.pas"/>
<DCCReference Include="..\Modulos\Pedidos de cliente\Reports\uRptPedidosCliente_Server.pas"> <DCCReference Include="..\Modulos\Pedidos de cliente\Reports\uRptPedidosCliente_Server.pas">
<Form>RptPedidosCliente</Form> <Form>RptPedidosCliente</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Pedidos de cliente\Servidor\srvPedidosCliente_Impl.pas"> <DCCReference Include="..\Modulos\Pedidos de cliente\Servidor\srvPedidosCliente_Impl.pas">
<Form>srvPedidosCliente</Form> <DesignClass>TDataAbstractService</DesignClass>
<DesignClass>TDataAbstractService</DesignClass> <Form>srvPedidosCliente</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteClient_Intf.pas" /> <DCCReference Include="..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteClient_Intf.pas"/>
<DCCReference Include="..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteServer_Intf.pas" /> <DCCReference Include="..\Modulos\Presupuestos de cliente\Model\schPresupuestosClienteServer_Intf.pas"/>
<DCCReference Include="..\Modulos\Presupuestos de cliente\Model\uBizPresupuestosClienteServer.pas" /> <DCCReference Include="..\Modulos\Presupuestos de cliente\Model\uBizPresupuestosClienteServer.pas"/>
<DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptPresupuestosCliente_Server.pas"> <DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptPresupuestosCliente_Server.pas">
<Form>RptPresupuestosCliente</Form> <DesignClass>TDataModule</DesignClass>
<DesignClass>TDataModule</DesignClass> <Form>RptPresupuestosCliente</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptWordCertificadoTrabajo_Server.pas"> <DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptWordCertificadoTrabajo_Server.pas">
<Form>RptWordCertificadoTrabajo</Form> <DesignClass>TDataModule</DesignClass>
<DesignClass>TDataModule</DesignClass> <Form>RptWordCertificadoTrabajo</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptWordPresupuestoCliente.pas"> <DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptWordPresupuestoCliente.pas">
<Form>RptWordPresupuestoCliente</Form> <DesignClass>TDataModule</DesignClass>
<DesignClass>TDataModule</DesignClass> <Form>RptWordPresupuestoCliente</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Presupuestos de cliente\Servidor\srvPresupuestosCliente_Impl.pas"> <DCCReference Include="..\Modulos\Presupuestos de cliente\Servidor\srvPresupuestosCliente_Impl.pas">
<Form>srvPresupuestosCliente</Form> <DesignClass>TDataAbstractService</DesignClass>
<DesignClass>TDataAbstractService</DesignClass> <Form>srvPresupuestosCliente</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Recibos de cliente\Model\schRecibosClienteClient_Intf.pas" /> <DCCReference Include="..\Modulos\Recibos de cliente\Model\schRecibosClienteClient_Intf.pas"/>
<DCCReference Include="..\Modulos\Recibos de cliente\Model\schRecibosClienteServer_Intf.pas" /> <DCCReference Include="..\Modulos\Recibos de cliente\Model\schRecibosClienteServer_Intf.pas"/>
<DCCReference Include="..\Modulos\Recibos de cliente\Reports\uRptRecibosCliente_Server.pas"> <DCCReference Include="..\Modulos\Recibos de cliente\Reports\uRptRecibosCliente_Server.pas">
<Form>RptRecibosCliente</Form> <DesignClass>TDataModule</DesignClass>
<DesignClass>TDataModule</DesignClass> <Form>RptRecibosCliente</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Recibos de cliente\Servidor\srvRecibosCliente_Impl.pas"> <DCCReference Include="..\Modulos\Recibos de cliente\Servidor\srvRecibosCliente_Impl.pas">
<Form>srvRecibosCliente</Form> <DesignClass>TDataAbstractService</DesignClass>
<DesignClass>TDataAbstractService</DesignClass> <Form>srvRecibosCliente</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Recibos de proveedor\Model\schRecibosProveedorClient_Intf.pas" /> <DCCReference Include="..\Modulos\Recibos de proveedor\Model\schRecibosProveedorClient_Intf.pas"/>
<DCCReference Include="..\Modulos\Recibos de proveedor\Model\schRecibosProveedorServer_Intf.pas" /> <DCCReference Include="..\Modulos\Recibos de proveedor\Model\schRecibosProveedorServer_Intf.pas"/>
<DCCReference Include="..\Modulos\Recibos de proveedor\Reports\uRptRecibosProveedor_Server.pas"> <DCCReference Include="..\Modulos\Recibos de proveedor\Reports\uRptRecibosProveedor_Server.pas">
<Form>RptRecibosProveedor</Form> <DesignClass>TDataModule</DesignClass>
<DesignClass>TDataModule</DesignClass> <Form>RptRecibosProveedor</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Recibos de proveedor\Servidor\srvRecibosProveedor_Impl.pas"> <DCCReference Include="..\Modulos\Recibos de proveedor\Servidor\srvRecibosProveedor_Impl.pas">
<Form>srvRecibosProveedor</Form> <DesignClass>TDataAbstractService</DesignClass>
<DesignClass>TDataAbstractService</DesignClass> <Form>srvRecibosProveedor</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Referencias\Model\schReferenciasClient_Intf.pas" /> <DCCReference Include="..\Modulos\Referencias\Model\schReferenciasClient_Intf.pas"/>
<DCCReference Include="..\Modulos\Referencias\Model\schReferenciasServer_Intf.pas" /> <DCCReference Include="..\Modulos\Referencias\Model\schReferenciasServer_Intf.pas"/>
<DCCReference Include="..\Modulos\Referencias\Servidor\srvReferencias_Impl.pas"> <DCCReference Include="..\Modulos\Referencias\Servidor\srvReferencias_Impl.pas">
<Form>srvReferencias</Form> <DesignClass>TDataAbstractService</DesignClass>
<DesignClass>TDataAbstractService</DesignClass> <Form>srvReferencias</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Remesas de cliente\Model\schRemesasClienteClient_Intf.pas" /> <DCCReference Include="..\Modulos\Remesas de cliente\Model\schRemesasClienteClient_Intf.pas"/>
<DCCReference Include="..\Modulos\Remesas de cliente\Model\schRemesasClienteServer_Intf.pas" /> <DCCReference Include="..\Modulos\Remesas de cliente\Model\schRemesasClienteServer_Intf.pas"/>
<DCCReference Include="..\Modulos\Remesas de cliente\Model\uBizRemesasClienteServer.pas" /> <DCCReference Include="..\Modulos\Remesas de cliente\Model\uBizRemesasClienteServer.pas"/>
<DCCReference Include="..\Modulos\Remesas de cliente\Reports\uRptRemesasCliente_Server.pas"> <DCCReference Include="..\Modulos\Remesas de cliente\Reports\uRptRemesasCliente_Server.pas">
<Form>RptRemesasCliente</Form> <DesignClass>TDataModule</DesignClass>
<DesignClass>TDataModule</DesignClass> <Form>RptRemesasCliente</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Remesas de cliente\Servidor\srvRemesasCliente_Impl.pas"> <DCCReference Include="..\Modulos\Remesas de cliente\Servidor\srvRemesasCliente_Impl.pas">
<Form>srvRemesasCliente</Form> <DesignClass>TDataAbstractService</DesignClass>
<DesignClass>TDataAbstractService</DesignClass> <Form>srvRemesasCliente</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Remesas de proveedor\Model\schRemesasProveedorClient_Intf.pas" /> <DCCReference Include="..\Modulos\Remesas de proveedor\Model\schRemesasProveedorClient_Intf.pas"/>
<DCCReference Include="..\Modulos\Remesas de proveedor\Model\schRemesasProveedorServer_Intf.pas" /> <DCCReference Include="..\Modulos\Remesas de proveedor\Model\schRemesasProveedorServer_Intf.pas"/>
<DCCReference Include="..\Modulos\Remesas de proveedor\Model\uBizRemesasProveedorServer.pas" /> <DCCReference Include="..\Modulos\Remesas de proveedor\Model\uBizRemesasProveedorServer.pas"/>
<DCCReference Include="..\Modulos\Remesas de proveedor\Servidor\srvRemesasProveedor_Impl.pas"> <DCCReference Include="..\Modulos\Remesas de proveedor\Servidor\srvRemesasProveedor_Impl.pas">
<Form>srvRemesasProveedor</Form> <DesignClass>TDataAbstractService</DesignClass>
<DesignClass>TDataAbstractService</DesignClass> <Form>srvRemesasProveedor</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Tipos de IVA\Model\schTiposIVAClient_Intf.pas" /> <DCCReference Include="..\Modulos\Tipos de IVA\Model\schTiposIVAClient_Intf.pas"/>
<DCCReference Include="..\Modulos\Tipos de IVA\Model\schTiposIVAServer_Intf.pas" /> <DCCReference Include="..\Modulos\Tipos de IVA\Model\schTiposIVAServer_Intf.pas"/>
<DCCReference Include="..\Modulos\Tipos de IVA\Servidor\srvTiposIVA_Impl.pas"> <DCCReference Include="..\Modulos\Tipos de IVA\Servidor\srvTiposIVA_Impl.pas">
<Form>srvTiposIVA</Form> <DesignClass>TDataAbstractService</DesignClass>
<DesignClass>TDataAbstractService</DesignClass> <Form>srvTiposIVA</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Modulos\Unidades de medida\Model\schUnidadesMedidaClient_Intf.pas" /> <DCCReference Include="..\Modulos\Unidades de medida\Model\schUnidadesMedidaClient_Intf.pas"/>
<DCCReference Include="..\Modulos\Unidades de medida\Model\schUnidadesMedidaServer_Intf.pas" /> <DCCReference Include="..\Modulos\Unidades de medida\Model\schUnidadesMedidaServer_Intf.pas"/>
<DCCReference Include="..\Modulos\Unidades de medida\Servidor\srvUnidadesMedida_Impl.pas"> <DCCReference Include="..\Modulos\Unidades de medida\Servidor\srvUnidadesMedida_Impl.pas">
<Form>srvUnidadesMedida</Form> <DesignClass>TDataAbstractService</DesignClass>
<DesignClass>TDataAbstractService</DesignClass> <Form>srvUnidadesMedida</Form>
</DCCReference> </DCCReference>
<DCCReference Include="..\Servicios\FactuGES_Intf.pas" /> <DCCReference Include="..\Servicios\FactuGES_Intf.pas"/>
<DCCReference Include="..\Servicios\FactuGES_Invk.pas" /> <DCCReference Include="..\Servicios\FactuGES_Invk.pas"/>
<DCCReference Include="Configuracion\srvConfiguracion_Impl.pas"> <DCCReference Include="Configuracion\srvConfiguracion_Impl.pas">
<Form>srvConfiguracion</Form> <DesignClass>TDataAbstractService</DesignClass>
<DesignClass>TDataAbstractService</DesignClass> <Form>srvConfiguracion</Form>
</DCCReference> </DCCReference>
<DCCReference Include="Configuracion\uConexionBD.pas"> <DCCReference Include="Configuracion\uConexionBD.pas">
<Form>frConexionBD</Form> <DesignClass>TFrame</DesignClass>
<DesignClass>TFrame</DesignClass> <Form>frConexionBD</Form>
</DCCReference> </DCCReference>
<DCCReference Include="Configuracion\uConfGeneral.pas"> <DCCReference Include="Configuracion\uConfGeneral.pas">
<Form>frConfGeneral</Form> <DesignClass>TFrame</DesignClass>
<DesignClass>TFrame</DesignClass> <Form>frConfGeneral</Form>
</DCCReference> </DCCReference>
<DCCReference Include="Configuracion\uConfiguracion.pas"> <DCCReference Include="Configuracion\uConfiguracion.pas">
<Form>fConfiguracion</Form> <DesignClass>TForm</DesignClass>
<DesignClass>TForm</DesignClass> <Form>fConfiguracion</Form>
</DCCReference> </DCCReference>
<DCCReference Include="Configuracion\uFrameConfiguracion.pas"> <DCCReference Include="Configuracion\uFrameConfiguracion.pas">
<Form>FrameConfiguracion</Form> <DesignClass>TFrame</DesignClass>
<DesignClass>TFrame</DesignClass> <Form>FrameConfiguracion</Form>
</DCCReference> </DCCReference>
<DCCReference Include="srvLogin_Impl.pas"> <DCCReference Include="srvLogin_Impl.pas">
<Form>srvLogin</Form> <DesignClass>TDARemoteService</DesignClass>
<DesignClass>TDARemoteService</DesignClass> <Form>srvLogin</Form>
</DCCReference> </DCCReference>
<DCCReference Include="uAcercaDe.pas"> <DCCReference Include="uAcercaDe.pas">
<Form>fAcercaDe</Form> <Form>fAcercaDe</Form>
</DCCReference> </DCCReference>
<DCCReference Include="uDataModuleServer.pas"> <DCCReference Include="uDataModuleServer.pas">
<Form>dmServer</Form> <DesignClass>TDataModule</DesignClass>
<DesignClass>TDataModule</DesignClass> <Form>dmServer</Form>
</DCCReference> </DCCReference>
<DCCReference Include="uServerMainForm.pas"> <DCCReference Include="uServerMainForm.pas">
<Form>fServerForm</Form> <Form>fServerForm</Form>
</DCCReference> </DCCReference>
<DCCReference Include="Utiles\AHWord97.pas" /> <DCCReference Include="Utiles\AHWord97.pas"/>
<DCCReference Include="Utiles\MidasSpeedFix.pas" /> <DCCReference Include="Utiles\MidasSpeedFix.pas"/>
<DCCReference Include="Utiles\RegExpr.pas" /> <DCCReference Include="Utiles\RegExpr.pas"/>
<DCCReference Include="Utiles\uBusinessUtils.pas" /> <DCCReference Include="Utiles\uBusinessUtils.pas"/>
<DCCReference Include="Utiles\uDatabaseUtils.pas" /> <DCCReference Include="Utiles\uDatabaseUtils.pas"/>
<DCCReference Include="Utiles\uReferenciasUtils.pas" /> <DCCReference Include="Utiles\uReferenciasUtils.pas"/>
<DCCReference Include="Utiles\uRestriccionesUsuarioUtils.pas" /> <DCCReference Include="Utiles\uRestriccionesUsuarioUtils.pas"/>
<DCCReference Include="Utiles\uSchemaUtilsServer.pas" /> <DCCReference Include="Utiles\uSchemaUtilsServer.pas"/>
<DCCReference Include="Utiles\uServerAppUtils.pas" /> <DCCReference Include="Utiles\uServerAppUtils.pas"/>
<DCCReference Include="Utiles\uSesionesUtils.pas" /> <DCCReference Include="Utiles\uSesionesUtils.pas"/>
</ItemGroup> </ItemGroup>
</Project> </Project>
<!-- EurekaLog First Line <!-- EurekaLog First Line
[Exception Log] [Exception Log]

2
Source/Servidor/FactuGES_Server.rc
View File

@ -17,7 +17,7 @@ BEGIN
VALUE "InternalName", "FactuGES Servidor\0" VALUE "InternalName", "FactuGES Servidor\0"
VALUE "ProductName", "FactuGES Servidor\0" VALUE "ProductName", "FactuGES Servidor\0"
VALUE "ProductVersion", "1.0.2.0\0" VALUE "ProductVersion", "1.0.2.0\0"
VALUE "CompileDate", "viernes, 19 de marzo de 2010 17:59\0" VALUE "CompileDate", "miércoles, 07 de abril de 2010 13:31\0"
END END
END END
BLOCK "VarFileInfo" BLOCK "VarFileInfo"