Segunda fase de listado de proceso completa de pedidos de cliente, se arregla fichero de compilación para que no falle si limpias todo el codigo
git-svn-id: https://192.168.0.254/svn/Proyectos.LuisLeon_FactuGES2/trunk@194 b2cfbe5a-eba1-4a0c-8b32-7feea0a119f2
This commit is contained in:
parent
b3387d2781
commit
8cdeebab60
BIN
Build/Build.fbl6
BIN
Build/Build.fbl6
Binary file not shown.
@ -1,6 +1,6 @@
|
|||||||
<project ServerProjectName="">
|
<project ServerProjectName="">
|
||||||
<watches/>
|
<watches/>
|
||||||
<collapsedNodes>{0F75D8EA-B6C2-4ECA-9E1E-45E235135301},{10527A84-0FB7-4007-9B23-9E5826133948},{154CD4CE-0F61-40F6-8CE6-CF525D3CFDCA},{331AC851-CE2F-4986-9381-A257AB26B1AD},{3F8BEF26-5F4F-4B97-B1BC-118F36CBDD68},{4968AB21-B759-4F4A-9214-8792F67DA1E2},{4B038673-47F7-4436-BD07-D557FA62337E},{6C425F09-E04B-49EC-89E2-8C93D60E9055},{7251A871-CE6C-41D1-A404-735619825EAE},{856B4CEA-BF27-4696-8FFC-4507B6E29943},{A181C54F-9BE8-4404-9AB9-FEE8A9C3443D},{AD23CE23-8728-48FA-84FD-264E27BA8F46},{B70F0EA3-7874-42B0-BFB8-430D43AC2D61},{C662116C-EB3F-4161-A768-49D13B08EFE5},{CE990EA4-7660-4997-8CBF-6C6AA978753A},{E8E8671F-894B-4049-B4A6-905B57207637},{F2541E28-3C45-4A17-BEC5-185CBF9D2A90}</collapsedNodes>
|
<collapsedNodes>{0F75D8EA-B6C2-4ECA-9E1E-45E235135301},{10527A84-0FB7-4007-9B23-9E5826133948},{154CD4CE-0F61-40F6-8CE6-CF525D3CFDCA},{282C2736-74F5-49C2-95D0-C1C4D359AEB2},{331AC851-CE2F-4986-9381-A257AB26B1AD},{3F8BEF26-5F4F-4B97-B1BC-118F36CBDD68},{4968AB21-B759-4F4A-9214-8792F67DA1E2},{4B038673-47F7-4436-BD07-D557FA62337E},{68D393D0-7234-4D5A-9D3A-A3FDC1593E55},{6C425F09-E04B-49EC-89E2-8C93D60E9055},{7251A871-CE6C-41D1-A404-735619825EAE},{816E4470-A0A2-4675-A270-7721426D4FD2},{856B4CEA-BF27-4696-8FFC-4507B6E29943},{A181C54F-9BE8-4404-9AB9-FEE8A9C3443D},{AD23CE23-8728-48FA-84FD-264E27BA8F46},{B70F0EA3-7874-42B0-BFB8-430D43AC2D61},{C662116C-EB3F-4161-A768-49D13B08EFE5},{CE990EA4-7660-4997-8CBF-6C6AA978753A},{E8E8671F-894B-4049-B4A6-905B57207637},{F2541E28-3C45-4A17-BEC5-185CBF9D2A90}</collapsedNodes>
|
||||||
<breakpoints></breakpoints>
|
<breakpoints></breakpoints>
|
||||||
<actions/>
|
<actions/>
|
||||||
<propertysets/>
|
<propertysets/>
|
||||||
@ -14,8 +14,8 @@
|
|||||||
<Notes>
|
<Notes>
|
||||||
<![CDATA[]]>
|
<![CDATA[]]>
|
||||||
</Notes>
|
</Notes>
|
||||||
<LastBuildRun>00:02:23</LastBuildRun>
|
<LastBuildRun>00:00:01</LastBuildRun>
|
||||||
<LastBuildStart>28/08/2013 15:46:41</LastBuildStart>
|
<LastBuildStart>30/08/2013 13:07:24</LastBuildStart>
|
||||||
<LastBuildState>False</LastBuildState>
|
<LastBuildState>True</LastBuildState>
|
||||||
</properties>
|
</properties>
|
||||||
</project>
|
</project>
|
||||||
|
|||||||
BIN
Build/Build.fbz6
BIN
Build/Build.fbz6
Binary file not shown.
@ -2449,9 +2449,10 @@ CREATE VIEW V_FACTURAS_PROVEEDOR(
|
|||||||
ID_TIPO_IVA,
|
ID_TIPO_IVA,
|
||||||
IMPORTE_NETO,
|
IMPORTE_NETO,
|
||||||
IMPORTE_PORTE,
|
IMPORTE_PORTE,
|
||||||
DATOS_BANCARIOS,
|
DATOS_BANCARIOS,
|
||||||
NUM_COPIAS,
|
NUM_COPIAS,
|
||||||
NUM_CORREOS)
|
NUM_CORREOS,
|
||||||
|
ID_ALBARAN)
|
||||||
AS
|
AS
|
||||||
SELECT FACTURAS_PROVEEDOR.ID,
|
SELECT FACTURAS_PROVEEDOR.ID,
|
||||||
FACTURAS_PROVEEDOR.ID_EMPRESA,
|
FACTURAS_PROVEEDOR.ID_EMPRESA,
|
||||||
@ -2487,7 +2488,9 @@ SELECT FACTURAS_PROVEEDOR.ID,
|
|||||||
FACTURAS_PROVEEDOR.IMPORTE_PORTE,
|
FACTURAS_PROVEEDOR.IMPORTE_PORTE,
|
||||||
FACTURAS_PROVEEDOR.DATOS_BANCARIOS,
|
FACTURAS_PROVEEDOR.DATOS_BANCARIOS,
|
||||||
IMPRESIONES.NUM_COPIAS,
|
IMPRESIONES.NUM_COPIAS,
|
||||||
REGISTRO_CORREOS.NUM_CORREOS
|
REGISTRO_CORREOS.NUM_CORREOS,
|
||||||
|
Null as ID_ALBARAN /*CAMPO FICTICIO QUE SE AÑADE PARA PODER COMPARTIR Clase de negocio IBizFacturaProveedor, el modulo de facturas proveedor y el modulo procesopresupuestocliente*/
|
||||||
|
|
||||||
FROM V_FAC_PRO_SITUACION
|
FROM V_FAC_PRO_SITUACION
|
||||||
LEFT JOIN FACTURAS_PROVEEDOR
|
LEFT JOIN FACTURAS_PROVEEDOR
|
||||||
ON (FACTURAS_PROVEEDOR.ID = V_FAC_PRO_SITUACION.ID_FACTURA)
|
ON (FACTURAS_PROVEEDOR.ID = V_FAC_PRO_SITUACION.ID_FACTURA)
|
||||||
@ -2499,6 +2502,102 @@ SELECT FACTURAS_PROVEEDOR.ID,
|
|||||||
ON ((REGISTRO_CORREOS.ID_TABLA = FACTURAS_PROVEEDOR.ID) AND (REGISTRO_CORREOS.TABLA = 'FACTURASPROVEEDOR'))
|
ON ((REGISTRO_CORREOS.ID_TABLA = FACTURAS_PROVEEDOR.ID) AND (REGISTRO_CORREOS.TABLA = 'FACTURASPROVEEDOR'))
|
||||||
;
|
;
|
||||||
|
|
||||||
|
CREATE VIEW V_ALBARANES_PROV_FACTURADOS(
|
||||||
|
ID_ALBARAN,
|
||||||
|
ID_FACTURA)
|
||||||
|
AS
|
||||||
|
select ID, ID_FACTURA
|
||||||
|
from albaranes_proveedor
|
||||||
|
where id_FACTURA is not null
|
||||||
|
;
|
||||||
|
|
||||||
|
CREATE VIEW V_FACTURAS_PROV_DE_ALBARANES(
|
||||||
|
ID,
|
||||||
|
ID_EMPRESA,
|
||||||
|
REFERENCIA,
|
||||||
|
TIPO,
|
||||||
|
REFERENCIA_PROVEEDOR,
|
||||||
|
FECHA_FACTURA,
|
||||||
|
FECHA_VENCIMIENTO,
|
||||||
|
SITUACION,
|
||||||
|
BASE_IMPONIBLE,
|
||||||
|
DESCUENTO,
|
||||||
|
IMPORTE_DESCUENTO,
|
||||||
|
IVA,
|
||||||
|
IMPORTE_IVA,
|
||||||
|
RE,
|
||||||
|
IMPORTE_RE,
|
||||||
|
IMPORTE_TOTAL,
|
||||||
|
OBSERVACIONES,
|
||||||
|
ID_PROVEEDOR,
|
||||||
|
NIF_CIF,
|
||||||
|
NOMBRE,
|
||||||
|
CALLE,
|
||||||
|
POBLACION,
|
||||||
|
PROVINCIA,
|
||||||
|
CODIGO_POSTAL,
|
||||||
|
FECHA_ALTA,
|
||||||
|
FECHA_MODIFICACION,
|
||||||
|
USUARIO,
|
||||||
|
ID_FORMA_PAGO,
|
||||||
|
RECARGO_EQUIVALENCIA,
|
||||||
|
ID_TIPO_IVA,
|
||||||
|
IMPORTE_NETO,
|
||||||
|
IMPORTE_PORTE,
|
||||||
|
DATOS_BANCARIOS,
|
||||||
|
NUM_COPIAS,
|
||||||
|
NUM_CORREOS,
|
||||||
|
ID_ALBARAN)
|
||||||
|
AS
|
||||||
|
SELECT FACTURAS_PROVEEDOR.ID,
|
||||||
|
FACTURAS_PROVEEDOR.ID_EMPRESA,
|
||||||
|
FACTURAS_PROVEEDOR.REFERENCIA,
|
||||||
|
CASE WHEN (FACTURAS_PROVEEDOR.IMPORTE_TOTAL < 0) THEN 'A' ELSE 'F' END AS TIPO,
|
||||||
|
FACTURAS_PROVEEDOR.REFERENCIA_PROVEEDOR,
|
||||||
|
FACTURAS_PROVEEDOR.FECHA_FACTURA,
|
||||||
|
FACTURAS_PROVEEDOR.FECHA_VENCIMIENTO,
|
||||||
|
TRIM(V_FAC_PRO_SITUACION.SITUACION),
|
||||||
|
FACTURAS_PROVEEDOR.BASE_IMPONIBLE,
|
||||||
|
FACTURAS_PROVEEDOR.DESCUENTO,
|
||||||
|
FACTURAS_PROVEEDOR.IMPORTE_DESCUENTO,
|
||||||
|
FACTURAS_PROVEEDOR.IVA,
|
||||||
|
FACTURAS_PROVEEDOR.IMPORTE_IVA,
|
||||||
|
FACTURAS_PROVEEDOR.RE,
|
||||||
|
FACTURAS_PROVEEDOR.IMPORTE_RE,
|
||||||
|
FACTURAS_PROVEEDOR.IMPORTE_TOTAL,
|
||||||
|
FACTURAS_PROVEEDOR.OBSERVACIONES,
|
||||||
|
FACTURAS_PROVEEDOR.ID_PROVEEDOR,
|
||||||
|
FACTURAS_PROVEEDOR.NIF_CIF,
|
||||||
|
FACTURAS_PROVEEDOR.NOMBRE,
|
||||||
|
FACTURAS_PROVEEDOR.CALLE,
|
||||||
|
FACTURAS_PROVEEDOR.POBLACION,
|
||||||
|
FACTURAS_PROVEEDOR.PROVINCIA,
|
||||||
|
FACTURAS_PROVEEDOR.CODIGO_POSTAL,
|
||||||
|
FACTURAS_PROVEEDOR.FECHA_ALTA,
|
||||||
|
FACTURAS_PROVEEDOR.FECHA_MODIFICACION,
|
||||||
|
FACTURAS_PROVEEDOR.USUARIO,
|
||||||
|
FACTURAS_PROVEEDOR.ID_FORMA_PAGO,
|
||||||
|
FACTURAS_PROVEEDOR.RECARGO_EQUIVALENCIA,
|
||||||
|
FACTURAS_PROVEEDOR.ID_TIPO_IVA,
|
||||||
|
FACTURAS_PROVEEDOR.IMPORTE_NETO,
|
||||||
|
FACTURAS_PROVEEDOR.IMPORTE_PORTE,
|
||||||
|
FACTURAS_PROVEEDOR.DATOS_BANCARIOS,
|
||||||
|
IMPRESIONES.NUM_COPIAS,
|
||||||
|
REGISTRO_CORREOS.NUM_CORREOS,
|
||||||
|
V_ALBARANES_PROV_FACTURADOS.ID_ALBARAN
|
||||||
|
FROM V_FAC_PRO_SITUACION
|
||||||
|
LEFT JOIN FACTURAS_PROVEEDOR
|
||||||
|
ON (FACTURAS_PROVEEDOR.ID = V_FAC_PRO_SITUACION.ID_FACTURA)
|
||||||
|
LEFT JOIN PROVEEDORES_DATOS
|
||||||
|
ON (PROVEEDORES_DATOS.ID_PROVEEDOR = FACTURAS_PROVEEDOR.ID_PROVEEDOR)
|
||||||
|
LEFT JOIN IMPRESIONES
|
||||||
|
ON ((IMPRESIONES.ID_TABLA = FACTURAS_PROVEEDOR.ID) AND (IMPRESIONES.TABLA = 'FACTURASPROVEEDOR'))
|
||||||
|
LEFT JOIN REGISTRO_CORREOS
|
||||||
|
ON ((REGISTRO_CORREOS.ID_TABLA = FACTURAS_PROVEEDOR.ID) AND (REGISTRO_CORREOS.TABLA = 'FACTURASPROVEEDOR'))
|
||||||
|
LEFT JOIN V_ALBARANES_PROV_FACTURADOS
|
||||||
|
ON (V_ALBARANES_PROV_FACTURADOS.ID_FACTURA = FACTURAS_PROVEEDOR.ID)
|
||||||
|
WHERE V_ALBARANES_PROV_FACTURADOS.ID_ALBARAN IS NOT NULL
|
||||||
|
;
|
||||||
|
|
||||||
/* View: V_HIS_MOV_ALB_CLI */
|
/* View: V_HIS_MOV_ALB_CLI */
|
||||||
CREATE VIEW V_HIS_MOV_ALB_CLI(
|
CREATE VIEW V_HIS_MOV_ALB_CLI(
|
||||||
|
|||||||
@ -2,6 +2,8 @@ unit uPlugins_Intf;
|
|||||||
|
|
||||||
interface
|
interface
|
||||||
|
|
||||||
|
uses FactuGES_Intf;
|
||||||
|
|
||||||
const
|
const
|
||||||
MODULENAME_PRESUPUESTOS_CLIENTE = 'PresupuestosCliente_plugin.bpl';
|
MODULENAME_PRESUPUESTOS_CLIENTE = 'PresupuestosCliente_plugin.bpl';
|
||||||
MODULENAME_PEDIDOS_CLIENTE = 'PedidosCliente_plugin.bpl';
|
MODULENAME_PEDIDOS_CLIENTE = 'PedidosCliente_plugin.bpl';
|
||||||
@ -14,6 +16,7 @@ const
|
|||||||
MODULENAME_FACTURAS_PROVEEDOR = 'FacturasProveedor_plugin.bpl';
|
MODULENAME_FACTURAS_PROVEEDOR = 'FacturasProveedor_plugin.bpl';
|
||||||
MODULENAME_RECIBOS_PROVEEDOR = 'RecibosProveedor_plugin.bpl';
|
MODULENAME_RECIBOS_PROVEEDOR = 'RecibosProveedor_plugin.bpl';
|
||||||
|
|
||||||
|
MODULENAME_PROCESO_PRESUPUESTOS_CLIENTE = 'ProcesoPresupuestosCliente_plugin.bpl';
|
||||||
|
|
||||||
type
|
type
|
||||||
IMCPresupuestosCliente = interface(IInterface)
|
IMCPresupuestosCliente = interface(IInterface)
|
||||||
@ -72,6 +75,11 @@ type
|
|||||||
const ANombreProveedor : String = '');
|
const ANombreProveedor : String = '');
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
IMCProcesoPresupuestosCliente = interface(IInterface)
|
||||||
|
['{2D83B0AF-4E5C-46A5-A371-5EFE363E4340}']
|
||||||
|
procedure VerPresupuestos(const ListaIDPresupuestosCliente : TIntegerArray);
|
||||||
|
end;
|
||||||
|
|
||||||
implementation
|
implementation
|
||||||
|
|
||||||
end.
|
end.
|
||||||
|
|||||||
@ -45,6 +45,8 @@
|
|||||||
<Borland.ProjectType>Package</Borland.ProjectType>
|
<Borland.ProjectType>Package</Borland.ProjectType>
|
||||||
<BorlandProject>
|
<BorlandProject>
|
||||||
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">Libreria base de FactuGES</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</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"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
|
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="PackageDescription">Libreria base de FactuGES</Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</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"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
|
||||||
|
|
||||||
|
|
||||||
<Excluded_Packages Name="$(BDS)\bin\dcloffice2k100.bpl">Microsoft Office 2000 Sample Automation Server Wrapper Components</Excluded_Packages>
|
<Excluded_Packages Name="$(BDS)\bin\dcloffice2k100.bpl">Microsoft Office 2000 Sample Automation Server Wrapper Components</Excluded_Packages>
|
||||||
<Excluded_Packages Name="$(BDS)\bin\dclofficexp100.bpl">Microsoft Office XP Sample Automation Server Wrapper Components</Excluded_Packages>
|
<Excluded_Packages Name="$(BDS)\bin\dclofficexp100.bpl">Microsoft Office XP Sample Automation Server Wrapper Components</Excluded_Packages>
|
||||||
</Excluded_Packages><Source><Source Name="MainSource">Base.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
|
</Excluded_Packages><Source><Source Name="MainSource">Base.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
|
||||||
@ -58,63 +60,63 @@
|
|||||||
<Form>DataModuleImpresiones</Form>
|
<Form>DataModuleImpresiones</Form>
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
</DCCReference>
|
</DCCReference>
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\adortl.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\cxDataD11.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\cxEditorsD11.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\cxExportD11.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\cxExtEditorsD11.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\cxGridD11.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\cxIntl6D11.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\cxIntlPrintSys3D11.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\cxLibraryD11.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\cxPageControlD11.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\DataAbstract_Core_D11.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\dbrtl.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\dclIndyCore.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\designide.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\dsnap.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\dxCoreD11.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\dxGDIPlusD11.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\dxPSCoreD11.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\dxThemeD11.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\GUISDK_D11R.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\IndyCore.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\IndyProtocols.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\IndySystem.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\Jcl.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\JclVcl.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\JSDialog100.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\JvCmpD11R.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\JvCoreD11R.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\JvCtrlsD11R.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\JvDlgsD11R.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\JvMMD11R.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\JvNetD11R.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\JvPageCompsD11R.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\JvStdCtrlsD11R.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\JvSystemD11R.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\pckMD5.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\pckUCDataConnector.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\pckUserControl_RT.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\PngComponentsD10.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\PNG_D10.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\RemObjects_Core_D11.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\RemObjects_Indy_D11.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\rtl.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\TB2k_D10.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\tbx_d10.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\vcl.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\vclactnband.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\vcldb.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\vcljpg.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\VclSmp.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\vclx.dcp" />
|
||||||
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Controller\xmlrtl.dcp" />
|
||||||
<DCCReference Include="..\Modulos\Registro de correos\Data\uDataModuleRegistroCorreos.pas">
|
<DCCReference Include="..\Modulos\Registro de correos\Data\uDataModuleRegistroCorreos.pas">
|
||||||
<Form>DataModuleRegistroCorreos</Form>
|
<Form>DataModuleRegistroCorreos</Form>
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
</DCCReference>
|
</DCCReference>
|
||||||
<DCCReference Include="..\Servicios\FactuGES_Intf.pas" />
|
<DCCReference Include="..\Servicios\FactuGES_Intf.pas" />
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\adortl.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxDataD11.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxEditorsD11.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxExportD11.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxExtEditorsD11.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxGridD11.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxIntl6D11.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxIntlPrintSys3D11.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxLibraryD11.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxPageControlD11.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\DataAbstract_Core_D11.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\dbrtl.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\dclIndyCore.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\designide.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\dsnap.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxCoreD11.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxGDIPlusD11.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxPSCoreD11.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxThemeD11.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\GUISDK_D11R.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\IndyCore.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\IndyProtocols.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\IndySystem.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\Jcl.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\JclVcl.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\JSDialog100.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvCmpD11R.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvCoreD11R.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvCtrlsD11R.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvDlgsD11R.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvMMD11R.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvNetD11R.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvPageCompsD11R.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvStdCtrlsD11R.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvSystemD11R.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\pckMD5.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\pckUCDataConnector.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\pckUserControl_RT.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\PngComponentsD10.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\PNG_D10.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\RemObjects_Core_D11.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\RemObjects_Indy_D11.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\rtl.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\TB2k_D10.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\tbx_d10.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\vcl.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\vclactnband.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\vcldb.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\vcljpg.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\VclSmp.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\vclx.dcp" />
|
|
||||||
<DCCReference Include="C:\Documents and Settings\Usuario\xmlrtl.dcp" />
|
|
||||||
<DCCReference Include="Conexion\uConfigurarConexion.pas">
|
<DCCReference Include="Conexion\uConfigurarConexion.pas">
|
||||||
<Form>fConfigurarConexion</Form>
|
<Form>fConfigurarConexion</Form>
|
||||||
<DesignClass>TForm</DesignClass>
|
<DesignClass>TForm</DesignClass>
|
||||||
|
|||||||
@ -61,6 +61,8 @@ begin
|
|||||||
LoadModule('InfVentasArticulo_plugin.bpl');
|
LoadModule('InfVentasArticulo_plugin.bpl');
|
||||||
LoadModule('InfMargenArticulo_plugin.bpl');
|
LoadModule('InfMargenArticulo_plugin.bpl');
|
||||||
|
|
||||||
|
LoadModule('ProcesoPresupuestosCliente_plugin.bpl');
|
||||||
|
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
|||||||
@ -21,6 +21,7 @@ type
|
|||||||
|
|
||||||
function Buscar(const ID: Integer): IBizFacturaProveedor;
|
function Buscar(const ID: Integer): IBizFacturaProveedor;
|
||||||
function BuscarTodos: IBizFacturaProveedor; overload;
|
function BuscarTodos: IBizFacturaProveedor; overload;
|
||||||
|
function BuscarTodosDeAlbaran: IBizFacturaProveedor;
|
||||||
function BuscarTodos(const ID_Proveedor : Integer): IBizFacturaProveedor; overload;
|
function BuscarTodos(const ID_Proveedor : Integer): IBizFacturaProveedor; overload;
|
||||||
procedure Ver(AFactura : IBizFacturaProveedor);
|
procedure Ver(AFactura : IBizFacturaProveedor);
|
||||||
procedure VerTodos(AFacturas: IBizFacturaProveedor;
|
procedure VerTodos(AFacturas: IBizFacturaProveedor;
|
||||||
@ -108,6 +109,7 @@ type
|
|||||||
function Buscar(const ID: Integer): IBizFacturaProveedor;
|
function Buscar(const ID: Integer): IBizFacturaProveedor;
|
||||||
function BuscarTodos: IBizFacturaProveedor; overload;
|
function BuscarTodos: IBizFacturaProveedor; overload;
|
||||||
function BuscarTodos(const ID_Proveedor : Integer): IBizFacturaProveedor; overload;
|
function BuscarTodos(const ID_Proveedor : Integer): IBizFacturaProveedor; overload;
|
||||||
|
function BuscarTodosDeAlbaran: IBizFacturaProveedor;
|
||||||
// function BuscarTodasPendientesComision(IdAgente: Integer; IdComision: Integer; IdFacturasAsociadas: String): IBizFacturaProveedor;
|
// function BuscarTodasPendientesComision(IdAgente: Integer; IdComision: Integer; IdFacturasAsociadas: String): IBizFacturaProveedor;
|
||||||
function Nuevo (withInsert: Boolean = True): IBizFacturaProveedor;
|
function Nuevo (withInsert: Boolean = True): IBizFacturaProveedor;
|
||||||
procedure Ver(AFactura : IBizFacturaProveedor);
|
procedure Ver(AFactura : IBizFacturaProveedor);
|
||||||
@ -344,6 +346,11 @@ begin
|
|||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
function TFacturasProveedorController.BuscarTodosDeAlbaran: IBizFacturaProveedor;
|
||||||
|
begin
|
||||||
|
Result := FDataModule.GetItemsDeAlbaran;
|
||||||
|
end;
|
||||||
|
|
||||||
{REPASARRRRR
|
{REPASARRRRR
|
||||||
function TFacturasProveedorController.BuscarTodasPendientesComision(IdAgente:Integer; IdComision: Integer; IdFacturasAsociadas: String): IBizFacturaProveedor;
|
function TFacturasProveedorController.BuscarTodasPendientesComision(IdAgente:Integer; IdComision: Integer; IdFacturasAsociadas: String): IBizFacturaProveedor;
|
||||||
begin
|
begin
|
||||||
|
|||||||
@ -247,6 +247,11 @@ inherited DataModuleFacturasProveedor: TDataModuleFacturasProveedor
|
|||||||
item
|
item
|
||||||
Name = 'NUM_CORREOS'
|
Name = 'NUM_CORREOS'
|
||||||
DataType = datSmallInt
|
DataType = datSmallInt
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'ID_ALBARAN'
|
||||||
|
DataType = datString
|
||||||
|
Size = 1
|
||||||
end>
|
end>
|
||||||
Params = <>
|
Params = <>
|
||||||
StreamingOptions = [soDisableEventsWhileStreaming]
|
StreamingOptions = [soDisableEventsWhileStreaming]
|
||||||
@ -468,4 +473,247 @@ inherited DataModuleFacturasProveedor: TDataModuleFacturasProveedor
|
|||||||
Left = 208
|
Left = 208
|
||||||
Top = 160
|
Top = 160
|
||||||
end
|
end
|
||||||
|
object tbl_FacturasProveedorDeAlbaran: TDAMemDataTable
|
||||||
|
RemoteUpdatesOptions = []
|
||||||
|
Fields = <
|
||||||
|
item
|
||||||
|
Name = 'ID'
|
||||||
|
DataType = datAutoInc
|
||||||
|
GeneratorName = 'GEN_FACTURAS_PROVEEDOR_ID'
|
||||||
|
Required = True
|
||||||
|
ServerAutoRefresh = True
|
||||||
|
DictionaryEntry = 'FacturasProveedor_ID'
|
||||||
|
InPrimaryKey = True
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'ID_EMPRESA'
|
||||||
|
DataType = datInteger
|
||||||
|
DictionaryEntry = 'FacturasProveedor_ID_EMPRESA'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'REFERENCIA'
|
||||||
|
DataType = datString
|
||||||
|
Size = 20
|
||||||
|
DisplayLabel = 'Referencia'
|
||||||
|
DictionaryEntry = 'FacturasProveedor_REFERENCIA'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'TIPO'
|
||||||
|
DataType = datString
|
||||||
|
Size = 1
|
||||||
|
DisplayLabel = 'Tipo'
|
||||||
|
DictionaryEntry = 'FacturasProveedor_TIPO'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'REFERENCIA_PROVEEDOR'
|
||||||
|
DataType = datString
|
||||||
|
Size = 255
|
||||||
|
DictionaryEntry = 'FacturasProveedor_REFERENCIA_PROVEEDOR'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'FECHA_FACTURA'
|
||||||
|
DataType = datDateTime
|
||||||
|
DisplayLabel = 'Fecha de las factura'
|
||||||
|
DictionaryEntry = 'FacturasProveedor_FECHA_FACTURA'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'FECHA_VENCIMIENTO'
|
||||||
|
DataType = datDateTime
|
||||||
|
DisplayLabel = 'Fecha vto.'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'SITUACION'
|
||||||
|
DataType = datString
|
||||||
|
Size = 255
|
||||||
|
DisplayLabel = 'Situaci'#243'n'
|
||||||
|
DictionaryEntry = 'FacturasProveedor_SITUACION'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'BASE_IMPONIBLE'
|
||||||
|
DataType = datCurrency
|
||||||
|
DisplayLabel = 'Base imponible'
|
||||||
|
Alignment = taRightJustify
|
||||||
|
DictionaryEntry = 'FacturasProveedor_BASE_IMPONIBLE'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'DESCUENTO'
|
||||||
|
DataType = datFloat
|
||||||
|
DisplayLabel = 'Dto.'
|
||||||
|
Alignment = taRightJustify
|
||||||
|
DictionaryEntry = 'FacturasProveedor_DESCUENTO'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'IMPORTE_DESCUENTO'
|
||||||
|
DataType = datCurrency
|
||||||
|
DisplayLabel = 'Importe dto.'
|
||||||
|
Alignment = taRightJustify
|
||||||
|
DictionaryEntry = 'FacturasProveedor_IMPORTE_DESCUENTO'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'IVA'
|
||||||
|
DataType = datFloat
|
||||||
|
Alignment = taRightJustify
|
||||||
|
DictionaryEntry = 'FacturasProveedor_IVA'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'IMPORTE_IVA'
|
||||||
|
DataType = datCurrency
|
||||||
|
DisplayLabel = 'Importe IVA'
|
||||||
|
Alignment = taRightJustify
|
||||||
|
DictionaryEntry = 'FacturasProveedor_IMPORTE_IVA'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'RE'
|
||||||
|
DataType = datFloat
|
||||||
|
Alignment = taRightJustify
|
||||||
|
DictionaryEntry = 'FacturasProveedor_RE'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'IMPORTE_RE'
|
||||||
|
DataType = datCurrency
|
||||||
|
DisplayLabel = 'Importe RE'
|
||||||
|
Alignment = taRightJustify
|
||||||
|
DictionaryEntry = 'FacturasProveedor_IMPORTE_RE'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'IMPORTE_TOTAL'
|
||||||
|
DataType = datCurrency
|
||||||
|
DisplayLabel = 'Importe total'
|
||||||
|
Alignment = taRightJustify
|
||||||
|
DictionaryEntry = 'FacturasProveedor_IMPORTE_TOTAL'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'OBSERVACIONES'
|
||||||
|
DataType = datMemo
|
||||||
|
DisplayLabel = 'Observaciones'
|
||||||
|
DictionaryEntry = 'FacturasProveedor_OBSERVACIONES'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'ID_PROVEEDOR'
|
||||||
|
DataType = datInteger
|
||||||
|
DisplayLabel = 'FacturasProveedor_ID_PROVEEDOR'
|
||||||
|
DictionaryEntry = 'FacturasProveedor_ID_PROVEEDOR'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'NIF_CIF'
|
||||||
|
DataType = datString
|
||||||
|
Size = 15
|
||||||
|
DisplayLabel = 'NIF/CIF'
|
||||||
|
DictionaryEntry = 'FacturasProveedor_NIF_CIF'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'NOMBRE'
|
||||||
|
DataType = datString
|
||||||
|
Size = 100
|
||||||
|
DisplayLabel = 'Cliente'
|
||||||
|
DictionaryEntry = 'FacturasProveedor_NOMBRE'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'CALLE'
|
||||||
|
DataType = datString
|
||||||
|
Size = 150
|
||||||
|
DisplayLabel = 'Direcci'#243'n'
|
||||||
|
DictionaryEntry = 'FacturasProveedor_CALLE'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'POBLACION'
|
||||||
|
DataType = datString
|
||||||
|
Size = 150
|
||||||
|
DisplayLabel = 'Poblaci'#243'n'
|
||||||
|
DictionaryEntry = 'FacturasProveedor_POBLACION'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'PROVINCIA'
|
||||||
|
DataType = datString
|
||||||
|
Size = 30
|
||||||
|
DisplayLabel = 'Provincia'
|
||||||
|
DictionaryEntry = 'FacturasProveedor_PROVINCIA'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'CODIGO_POSTAL'
|
||||||
|
DataType = datString
|
||||||
|
Size = 10
|
||||||
|
DisplayLabel = 'C'#243'd. postal'
|
||||||
|
DictionaryEntry = 'FacturasProveedor_CODIGO_POSTAL'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'FECHA_ALTA'
|
||||||
|
DataType = datDateTime
|
||||||
|
DictionaryEntry = 'FacturasProveedor_FECHA_ALTA'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'FECHA_MODIFICACION'
|
||||||
|
DataType = datDateTime
|
||||||
|
DictionaryEntry = 'FacturasProveedor_FECHA_MODIFICACION'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'USUARIO'
|
||||||
|
DataType = datString
|
||||||
|
Size = 100
|
||||||
|
DictionaryEntry = 'FacturasProveedor_USUARIO'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'ID_FORMA_PAGO'
|
||||||
|
DataType = datInteger
|
||||||
|
DisplayLabel = 'FacturasProveedor_ID_FORMA_PAGO'
|
||||||
|
DictionaryEntry = 'FacturasProveedor_ID_FORMA_PAGO'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'RECARGO_EQUIVALENCIA'
|
||||||
|
DataType = datSmallInt
|
||||||
|
DisplayLabel = #191'Con R.E.?'
|
||||||
|
DictionaryEntry = 'FacturasProveedor_RECARGO_EQUIVALENCIA'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'ID_TIPO_IVA'
|
||||||
|
DataType = datInteger
|
||||||
|
DictionaryEntry = 'FacturasProveedor_ID_TIPO_IVA'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'IMPORTE_NETO'
|
||||||
|
DataType = datCurrency
|
||||||
|
DisplayLabel = 'Importe neto'
|
||||||
|
Alignment = taRightJustify
|
||||||
|
DictionaryEntry = 'FacturasProveedor_IMPORTE_NETO'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'IMPORTE_PORTE'
|
||||||
|
DataType = datCurrency
|
||||||
|
DisplayLabel = 'Importe del porte'
|
||||||
|
Alignment = taRightJustify
|
||||||
|
DictionaryEntry = 'FacturasProveedor_IMPORTE_PORTE'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'DATOS_BANCARIOS'
|
||||||
|
DataType = datString
|
||||||
|
Size = 255
|
||||||
|
DisplayLabel = 'Datos bancarios'
|
||||||
|
DictionaryEntry = 'FacturasProveedor_DATOS_BANCARIOS'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'NUM_COPIAS'
|
||||||
|
DataType = datSmallInt
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'NUM_CORREOS'
|
||||||
|
DataType = datSmallInt
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'ID_ALBARAN'
|
||||||
|
DataType = datInteger
|
||||||
|
end>
|
||||||
|
Params = <>
|
||||||
|
StreamingOptions = [soDisableEventsWhileStreaming]
|
||||||
|
RemoteDataAdapter = rda_FacturasProveedor
|
||||||
|
LogicalName = 'FacturasProveedorDeAlbaran'
|
||||||
|
IndexDefs = <>
|
||||||
|
Left = 72
|
||||||
|
Top = 256
|
||||||
|
end
|
||||||
|
object ds_FacturasProveedorDeAlbaran: TDADataSource
|
||||||
|
DataSet = tbl_FacturasProveedorDeAlbaran.Dataset
|
||||||
|
DataTable = tbl_FacturasProveedorDeAlbaran
|
||||||
|
Left = 72
|
||||||
|
Top = 200
|
||||||
|
end
|
||||||
end
|
end
|
||||||
|
|||||||
@ -25,6 +25,8 @@ type
|
|||||||
ds_FacturasProveedor_Pedidos: TDADataSource;
|
ds_FacturasProveedor_Pedidos: TDADataSource;
|
||||||
tbl_ListaAnosFacturas: TDAMemDataTable;
|
tbl_ListaAnosFacturas: TDAMemDataTable;
|
||||||
ds_ListaAnosFacturas: TDADataSource;
|
ds_ListaAnosFacturas: TDADataSource;
|
||||||
|
tbl_FacturasProveedorDeAlbaran: TDAMemDataTable;
|
||||||
|
ds_FacturasProveedorDeAlbaran: TDADataSource;
|
||||||
procedure DAClientDataModuleCreate(Sender: TObject);
|
procedure DAClientDataModuleCreate(Sender: TObject);
|
||||||
private
|
private
|
||||||
function _GetDetalles : IBizDetallesFacturaProveedor;
|
function _GetDetalles : IBizDetallesFacturaProveedor;
|
||||||
@ -32,6 +34,7 @@ type
|
|||||||
|
|
||||||
public
|
public
|
||||||
function GetItems : IBizFacturaProveedor;
|
function GetItems : IBizFacturaProveedor;
|
||||||
|
function GetItemsDeAlbaran : IBizFacturaProveedor;
|
||||||
function GetItem(const ID : Integer) : IBizFacturaProveedor;
|
function GetItem(const ID : Integer) : IBizFacturaProveedor;
|
||||||
function NewItem : IBizFacturaProveedor;
|
function NewItem : IBizFacturaProveedor;
|
||||||
|
|
||||||
@ -197,4 +200,28 @@ begin
|
|||||||
end;
|
end;
|
||||||
|
|
||||||
|
|
||||||
|
function TDataModuleFacturasProveedor.GetItemsDeAlbaran: IBizFacturaProveedor;
|
||||||
|
var
|
||||||
|
AFactura : TDAMemDataTable;
|
||||||
|
begin
|
||||||
|
ShowHourglassCursor;
|
||||||
|
try
|
||||||
|
AFactura := CloneDataTable(tbl_FacturasProveedorDeAlbaran);
|
||||||
|
AFactura.BusinessRulesID := BIZ_CLIENT_FACTURA_PROVEEDOR;
|
||||||
|
|
||||||
|
// EL CAMPO REFERENCIA TIENE QUE SER AUTOREFRESH!!!!!
|
||||||
|
AFactura.FieldByName(fld_FacturasProveedorREFERENCIA).ServerAutoRefresh := TRUE;
|
||||||
|
|
||||||
|
with TBizFacturaProveedor(AFactura.BusinessEventsObj) do
|
||||||
|
begin
|
||||||
|
Detalles := _GetDetalles;
|
||||||
|
// Pedidos := _GetPedidos;
|
||||||
|
end;
|
||||||
|
|
||||||
|
Result := (AFactura as IBizFacturaProveedor);
|
||||||
|
finally
|
||||||
|
HideHourglassCursor;
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
|
||||||
end.
|
end.
|
||||||
|
|||||||
@ -112,6 +112,24 @@
|
|||||||
<Target Name="FacturasProveedor_controller:Make">
|
<Target Name="FacturasProveedor_controller:Make">
|
||||||
<MSBuild Projects="Controller\FacturasProveedor_controller.dproj" Targets="Make" />
|
<MSBuild Projects="Controller\FacturasProveedor_controller.dproj" Targets="Make" />
|
||||||
</Target>
|
</Target>
|
||||||
|
<Target Name="AlbProv_FacProv_relation">
|
||||||
|
<MSBuild Projects="..\Relaciones\Albaranes de proveedor - Facturas de proveedor\AlbProv_FacProv_relation.dproj" Targets="" />
|
||||||
|
</Target>
|
||||||
|
<Target Name="AlbProv_FacProv_relation:Clean">
|
||||||
|
<MSBuild Projects="..\Relaciones\Albaranes de proveedor - Facturas de proveedor\AlbProv_FacProv_relation.dproj" Targets="Clean" />
|
||||||
|
</Target>
|
||||||
|
<Target Name="AlbProv_FacProv_relation:Make">
|
||||||
|
<MSBuild Projects="..\Relaciones\Albaranes de proveedor - Facturas de proveedor\AlbProv_FacProv_relation.dproj" Targets="Make" />
|
||||||
|
</Target>
|
||||||
|
<Target Name="PedProv_FacProv_relation">
|
||||||
|
<MSBuild Projects="..\Relaciones\Pedidos de proveedor - Facturas de proveedor\PedProv_FacProv_relation.dproj" Targets="" />
|
||||||
|
</Target>
|
||||||
|
<Target Name="PedProv_FacProv_relation:Clean">
|
||||||
|
<MSBuild Projects="..\Relaciones\Pedidos de proveedor - Facturas de proveedor\PedProv_FacProv_relation.dproj" Targets="Clean" />
|
||||||
|
</Target>
|
||||||
|
<Target Name="PedProv_FacProv_relation:Make">
|
||||||
|
<MSBuild Projects="..\Relaciones\Pedidos de proveedor - Facturas de proveedor\PedProv_FacProv_relation.dproj" Targets="Make" />
|
||||||
|
</Target>
|
||||||
<Target Name="FacturasProveedor_view">
|
<Target Name="FacturasProveedor_view">
|
||||||
<MSBuild Projects="Views\FacturasProveedor_view.dproj" Targets="" />
|
<MSBuild Projects="Views\FacturasProveedor_view.dproj" Targets="" />
|
||||||
</Target>
|
</Target>
|
||||||
@ -148,15 +166,6 @@
|
|||||||
<Target Name="FactuGES_Server:Make">
|
<Target Name="FactuGES_Server:Make">
|
||||||
<MSBuild Projects="..\..\Servidor\FactuGES_Server.dproj" Targets="Make" />
|
<MSBuild Projects="..\..\Servidor\FactuGES_Server.dproj" Targets="Make" />
|
||||||
</Target>
|
</Target>
|
||||||
<Target Name="AlbProv_FacProv_relation">
|
|
||||||
<MSBuild Projects="..\Relaciones\Albaranes de proveedor - Facturas de proveedor\AlbProv_FacProv_relation.dproj" Targets="" />
|
|
||||||
</Target>
|
|
||||||
<Target Name="AlbProv_FacProv_relation:Clean">
|
|
||||||
<MSBuild Projects="..\Relaciones\Albaranes de proveedor - Facturas de proveedor\AlbProv_FacProv_relation.dproj" Targets="Clean" />
|
|
||||||
</Target>
|
|
||||||
<Target Name="AlbProv_FacProv_relation:Make">
|
|
||||||
<MSBuild Projects="..\Relaciones\Albaranes de proveedor - Facturas de proveedor\AlbProv_FacProv_relation.dproj" Targets="Make" />
|
|
||||||
</Target>
|
|
||||||
<Target Name="AlbaranesProveedor_view">
|
<Target Name="AlbaranesProveedor_view">
|
||||||
<MSBuild Projects="..\Albaranes de proveedor\Views\AlbaranesProveedor_view.dproj" Targets="" />
|
<MSBuild Projects="..\Albaranes de proveedor\Views\AlbaranesProveedor_view.dproj" Targets="" />
|
||||||
</Target>
|
</Target>
|
||||||
@ -229,15 +238,6 @@
|
|||||||
<Target Name="FacturasCliente_view:Make">
|
<Target Name="FacturasCliente_view:Make">
|
||||||
<MSBuild Projects="..\Facturas de cliente\Views\FacturasCliente_view.dproj" Targets="Make" />
|
<MSBuild Projects="..\Facturas de cliente\Views\FacturasCliente_view.dproj" Targets="Make" />
|
||||||
</Target>
|
</Target>
|
||||||
<Target Name="PedProv_FacProv_relation">
|
|
||||||
<MSBuild Projects="..\Relaciones\Pedidos de proveedor - Facturas de proveedor\PedProv_FacProv_relation.dproj" Targets="" />
|
|
||||||
</Target>
|
|
||||||
<Target Name="PedProv_FacProv_relation:Clean">
|
|
||||||
<MSBuild Projects="..\Relaciones\Pedidos de proveedor - Facturas de proveedor\PedProv_FacProv_relation.dproj" Targets="Clean" />
|
|
||||||
</Target>
|
|
||||||
<Target Name="PedProv_FacProv_relation:Make">
|
|
||||||
<MSBuild Projects="..\Relaciones\Pedidos de proveedor - Facturas de proveedor\PedProv_FacProv_relation.dproj" Targets="Make" />
|
|
||||||
</Target>
|
|
||||||
<Target Name="PreCli_FacCli_relation">
|
<Target Name="PreCli_FacCli_relation">
|
||||||
<MSBuild Projects="..\Relaciones\Presupuestos de cliente - Facturas de cliente\PreCli_FacCli_relation.dproj" Targets="" />
|
<MSBuild Projects="..\Relaciones\Presupuestos de cliente - Facturas de cliente\PreCli_FacCli_relation.dproj" Targets="" />
|
||||||
</Target>
|
</Target>
|
||||||
@ -302,13 +302,13 @@
|
|||||||
<MSBuild Projects="..\Recibos de proveedor\Controller\RecibosProveedor_controller.dproj" Targets="Make" />
|
<MSBuild Projects="..\Recibos de proveedor\Controller\RecibosProveedor_controller.dproj" Targets="Make" />
|
||||||
</Target>
|
</Target>
|
||||||
<Target Name="Build">
|
<Target Name="Build">
|
||||||
<CallTarget Targets="Base;GUIBase;ApplicationBase;Contactos_view;Articulos_view;FacturasProveedor_model;FacturasProveedor_data;FacturasProveedor_controller;FacturasProveedor_view;FacturasProveedor_plugin;FactuGES;FactuGES_Server;AlbProv_FacProv_relation;AlbaranesProveedor_view;PedProv_AlbProv_relation;PedidosProveedor_view;PedidosProveedor_controller;AlbaranesProveedor_controller;Articulos_controller;AlbCli_FacCli_relation;FacturasCliente_view;PedProv_FacProv_relation;PreCli_FacCli_relation;PedidosProveedor_data;Contactos_controller;GestorInformes_view;RecibosProveedor_model;RecibosProveedor_data;RecibosProveedor_controller" />
|
<CallTarget Targets="Base;GUIBase;ApplicationBase;Contactos_view;Articulos_view;FacturasProveedor_model;FacturasProveedor_data;FacturasProveedor_controller;AlbProv_FacProv_relation;PedProv_FacProv_relation;FacturasProveedor_view;FacturasProveedor_plugin;FactuGES;FactuGES_Server;AlbaranesProveedor_view;PedProv_AlbProv_relation;PedidosProveedor_view;PedidosProveedor_controller;AlbaranesProveedor_controller;Articulos_controller;AlbCli_FacCli_relation;FacturasCliente_view;PreCli_FacCli_relation;PedidosProveedor_data;Contactos_controller;GestorInformes_view;RecibosProveedor_model;RecibosProveedor_data;RecibosProveedor_controller" />
|
||||||
</Target>
|
</Target>
|
||||||
<Target Name="Clean">
|
<Target Name="Clean">
|
||||||
<CallTarget Targets="Base:Clean;GUIBase:Clean;ApplicationBase:Clean;Contactos_view:Clean;Articulos_view:Clean;FacturasProveedor_model:Clean;FacturasProveedor_data:Clean;FacturasProveedor_controller:Clean;FacturasProveedor_view:Clean;FacturasProveedor_plugin:Clean;FactuGES:Clean;FactuGES_Server:Clean;AlbProv_FacProv_relation:Clean;AlbaranesProveedor_view:Clean;PedProv_AlbProv_relation:Clean;PedidosProveedor_view:Clean;PedidosProveedor_controller:Clean;AlbaranesProveedor_controller:Clean;Articulos_controller:Clean;AlbCli_FacCli_relation:Clean;FacturasCliente_view:Clean;PedProv_FacProv_relation:Clean;PreCli_FacCli_relation:Clean;PedidosProveedor_data:Clean;Contactos_controller:Clean;GestorInformes_view:Clean;RecibosProveedor_model:Clean;RecibosProveedor_data:Clean;RecibosProveedor_controller:Clean" />
|
<CallTarget Targets="Base:Clean;GUIBase:Clean;ApplicationBase:Clean;Contactos_view:Clean;Articulos_view:Clean;FacturasProveedor_model:Clean;FacturasProveedor_data:Clean;FacturasProveedor_controller:Clean;AlbProv_FacProv_relation:Clean;PedProv_FacProv_relation:Clean;FacturasProveedor_view:Clean;FacturasProveedor_plugin:Clean;FactuGES:Clean;FactuGES_Server:Clean;AlbaranesProveedor_view:Clean;PedProv_AlbProv_relation:Clean;PedidosProveedor_view:Clean;PedidosProveedor_controller:Clean;AlbaranesProveedor_controller:Clean;Articulos_controller:Clean;AlbCli_FacCli_relation:Clean;FacturasCliente_view:Clean;PreCli_FacCli_relation:Clean;PedidosProveedor_data:Clean;Contactos_controller:Clean;GestorInformes_view:Clean;RecibosProveedor_model:Clean;RecibosProveedor_data:Clean;RecibosProveedor_controller:Clean" />
|
||||||
</Target>
|
</Target>
|
||||||
<Target Name="Make">
|
<Target Name="Make">
|
||||||
<CallTarget Targets="Base:Make;GUIBase:Make;ApplicationBase:Make;Contactos_view:Make;Articulos_view:Make;FacturasProveedor_model:Make;FacturasProveedor_data:Make;FacturasProveedor_controller:Make;FacturasProveedor_view:Make;FacturasProveedor_plugin:Make;FactuGES:Make;FactuGES_Server:Make;AlbProv_FacProv_relation:Make;AlbaranesProveedor_view:Make;PedProv_AlbProv_relation:Make;PedidosProveedor_view:Make;PedidosProveedor_controller:Make;AlbaranesProveedor_controller:Make;Articulos_controller:Make;AlbCli_FacCli_relation:Make;FacturasCliente_view:Make;PedProv_FacProv_relation:Make;PreCli_FacCli_relation:Make;PedidosProveedor_data:Make;Contactos_controller:Make;GestorInformes_view:Make;RecibosProveedor_model:Make;RecibosProveedor_data:Make;RecibosProveedor_controller:Make" />
|
<CallTarget Targets="Base:Make;GUIBase:Make;ApplicationBase:Make;Contactos_view:Make;Articulos_view:Make;FacturasProveedor_model:Make;FacturasProveedor_data:Make;FacturasProveedor_controller:Make;AlbProv_FacProv_relation:Make;PedProv_FacProv_relation:Make;FacturasProveedor_view:Make;FacturasProveedor_plugin:Make;FactuGES:Make;FactuGES_Server:Make;AlbaranesProveedor_view:Make;PedProv_AlbProv_relation:Make;PedidosProveedor_view:Make;PedidosProveedor_controller:Make;AlbaranesProveedor_controller:Make;Articulos_controller:Make;AlbCli_FacCli_relation:Make;FacturasCliente_view:Make;PreCli_FacCli_relation:Make;PedidosProveedor_data:Make;Contactos_controller:Make;GestorInformes_view:Make;RecibosProveedor_model:Make;RecibosProveedor_data:Make;RecibosProveedor_controller:Make" />
|
||||||
</Target>
|
</Target>
|
||||||
<Import Condition="Exists('$(MSBuildBinPath)\Borland.Group.Targets')" Project="$(MSBuildBinPath)\Borland.Group.Targets" />
|
<Import Condition="Exists('$(MSBuildBinPath)\Borland.Group.Targets')" Project="$(MSBuildBinPath)\Borland.Group.Targets" />
|
||||||
</Project>
|
</Project>
|
||||||
@ -11,6 +11,7 @@ type
|
|||||||
['{FD0F5B2F-5556-4031-86F0-EFF96805FD66}']
|
['{FD0F5B2F-5556-4031-86F0-EFF96805FD66}']
|
||||||
function GetAnosItems : TStringList;
|
function GetAnosItems : TStringList;
|
||||||
function GetItems: IBizFacturaProveedor;
|
function GetItems: IBizFacturaProveedor;
|
||||||
|
function GetItemsDeAlbaran : IBizFacturaProveedor;
|
||||||
function GetItem(const ID : Integer) : IBizFacturaProveedor;
|
function GetItem(const ID : Integer) : IBizFacturaProveedor;
|
||||||
function NewItem : IBizFacturaProveedor;
|
function NewItem : IBizFacturaProveedor;
|
||||||
end;
|
end;
|
||||||
|
|||||||
File diff suppressed because it is too large
Load Diff
File diff suppressed because it is too large
Load Diff
@ -187,6 +187,10 @@ object srvFacturasProveedor: TsrvFacturasProveedor
|
|||||||
item
|
item
|
||||||
DatasetField = 'NUM_CORREOS'
|
DatasetField = 'NUM_CORREOS'
|
||||||
TableField = 'NUM_CORREOS'
|
TableField = 'NUM_CORREOS'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'ID_ALBARAN'
|
||||||
|
TableField = 'ID_ALBARAN'
|
||||||
end>
|
end>
|
||||||
end>
|
end>
|
||||||
Name = 'FacturasProveedor'
|
Name = 'FacturasProveedor'
|
||||||
@ -378,6 +382,11 @@ object srvFacturasProveedor: TsrvFacturasProveedor
|
|||||||
item
|
item
|
||||||
Name = 'NUM_CORREOS'
|
Name = 'NUM_CORREOS'
|
||||||
DataType = datSmallInt
|
DataType = datSmallInt
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'ID_ALBARAN'
|
||||||
|
DataType = datString
|
||||||
|
Size = 1
|
||||||
end>
|
end>
|
||||||
end
|
end
|
||||||
item
|
item
|
||||||
@ -656,6 +665,354 @@ object srvFacturasProveedor: TsrvFacturasProveedor
|
|||||||
Size = 255
|
Size = 255
|
||||||
DictionaryEntry = 'FacturasProveedor_Pedidos_PROVEEDOR'
|
DictionaryEntry = 'FacturasProveedor_Pedidos_PROVEEDOR'
|
||||||
end>
|
end>
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Params = <>
|
||||||
|
Statements = <
|
||||||
|
item
|
||||||
|
Connection = 'IBX'
|
||||||
|
TargetTable = 'V_FACTURAS_PROV_DE_ALBARANES'
|
||||||
|
StatementType = stAutoSQL
|
||||||
|
ColumnMappings = <
|
||||||
|
item
|
||||||
|
DatasetField = 'ID'
|
||||||
|
TableField = 'ID'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'ID_EMPRESA'
|
||||||
|
TableField = 'ID_EMPRESA'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'REFERENCIA'
|
||||||
|
TableField = 'REFERENCIA'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'TIPO'
|
||||||
|
TableField = 'TIPO'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'REFERENCIA_PROVEEDOR'
|
||||||
|
TableField = 'REFERENCIA_PROVEEDOR'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'FECHA_FACTURA'
|
||||||
|
TableField = 'FECHA_FACTURA'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'SITUACION'
|
||||||
|
TableField = 'SITUACION'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'BASE_IMPONIBLE'
|
||||||
|
TableField = 'BASE_IMPONIBLE'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'DESCUENTO'
|
||||||
|
TableField = 'DESCUENTO'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'IMPORTE_DESCUENTO'
|
||||||
|
TableField = 'IMPORTE_DESCUENTO'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'IVA'
|
||||||
|
TableField = 'IVA'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'IMPORTE_IVA'
|
||||||
|
TableField = 'IMPORTE_IVA'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'RE'
|
||||||
|
TableField = 'RE'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'IMPORTE_RE'
|
||||||
|
TableField = 'IMPORTE_RE'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'IMPORTE_TOTAL'
|
||||||
|
TableField = 'IMPORTE_TOTAL'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'OBSERVACIONES'
|
||||||
|
TableField = 'OBSERVACIONES'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'ID_PROVEEDOR'
|
||||||
|
TableField = 'ID_PROVEEDOR'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'NIF_CIF'
|
||||||
|
TableField = 'NIF_CIF'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'NOMBRE'
|
||||||
|
TableField = 'NOMBRE'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'CALLE'
|
||||||
|
TableField = 'CALLE'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'POBLACION'
|
||||||
|
TableField = 'POBLACION'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'PROVINCIA'
|
||||||
|
TableField = 'PROVINCIA'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'CODIGO_POSTAL'
|
||||||
|
TableField = 'CODIGO_POSTAL'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'FECHA_ALTA'
|
||||||
|
TableField = 'FECHA_ALTA'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'FECHA_MODIFICACION'
|
||||||
|
TableField = 'FECHA_MODIFICACION'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'USUARIO'
|
||||||
|
TableField = 'USUARIO'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'ID_FORMA_PAGO'
|
||||||
|
TableField = 'ID_FORMA_PAGO'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'RECARGO_EQUIVALENCIA'
|
||||||
|
TableField = 'RECARGO_EQUIVALENCIA'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'ID_TIPO_IVA'
|
||||||
|
TableField = 'ID_TIPO_IVA'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'IMPORTE_NETO'
|
||||||
|
TableField = 'IMPORTE_NETO'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'IMPORTE_PORTE'
|
||||||
|
TableField = 'IMPORTE_PORTE'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'DATOS_BANCARIOS'
|
||||||
|
TableField = 'DATOS_BANCARIOS'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'FECHA_VENCIMIENTO'
|
||||||
|
TableField = 'FECHA_VENCIMIENTO'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'NUM_COPIAS'
|
||||||
|
TableField = 'NUM_COPIAS'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'NUM_CORREOS'
|
||||||
|
TableField = 'NUM_CORREOS'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'ID_ALBARAN'
|
||||||
|
TableField = 'ID_ALBARAN'
|
||||||
|
end>
|
||||||
|
end>
|
||||||
|
Name = 'FacturasProveedorDeAlbaran'
|
||||||
|
Fields = <
|
||||||
|
item
|
||||||
|
Name = 'ID'
|
||||||
|
DataType = datAutoInc
|
||||||
|
GeneratorName = 'GEN_FACTURAS_PROVEEDOR_ID'
|
||||||
|
ServerAutoRefresh = True
|
||||||
|
DictionaryEntry = 'FacturasProveedor_ID'
|
||||||
|
InPrimaryKey = True
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'ID_EMPRESA'
|
||||||
|
DataType = datInteger
|
||||||
|
DictionaryEntry = 'FacturasProveedor_ID_EMPRESA'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'REFERENCIA'
|
||||||
|
DataType = datString
|
||||||
|
Size = 20
|
||||||
|
DictionaryEntry = 'FacturasProveedor_REFERENCIA'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'TIPO'
|
||||||
|
DataType = datString
|
||||||
|
Size = 1
|
||||||
|
DictionaryEntry = 'FacturasProveedor_TIPO'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'REFERENCIA_PROVEEDOR'
|
||||||
|
DataType = datString
|
||||||
|
Size = 255
|
||||||
|
DictionaryEntry = 'FacturasProveedor_REFERENCIA_PROVEEDOR'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'FECHA_FACTURA'
|
||||||
|
DataType = datDateTime
|
||||||
|
DictionaryEntry = 'FacturasProveedor_FECHA_FACTURA'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'FECHA_VENCIMIENTO'
|
||||||
|
DataType = datDateTime
|
||||||
|
DisplayLabel = 'Fecha vto.'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'SITUACION'
|
||||||
|
DataType = datString
|
||||||
|
Size = 255
|
||||||
|
DictionaryEntry = 'FacturasProveedor_SITUACION'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'BASE_IMPONIBLE'
|
||||||
|
DataType = datCurrency
|
||||||
|
DictionaryEntry = 'FacturasProveedor_BASE_IMPONIBLE'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'DESCUENTO'
|
||||||
|
DataType = datFloat
|
||||||
|
DictionaryEntry = 'FacturasProveedor_DESCUENTO'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'IMPORTE_DESCUENTO'
|
||||||
|
DataType = datCurrency
|
||||||
|
DictionaryEntry = 'FacturasProveedor_IMPORTE_DESCUENTO'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'IVA'
|
||||||
|
DataType = datFloat
|
||||||
|
DictionaryEntry = 'FacturasProveedor_IVA'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'IMPORTE_IVA'
|
||||||
|
DataType = datCurrency
|
||||||
|
DictionaryEntry = 'FacturasProveedor_IMPORTE_IVA'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'RE'
|
||||||
|
DataType = datFloat
|
||||||
|
DictionaryEntry = 'FacturasProveedor_RE'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'IMPORTE_RE'
|
||||||
|
DataType = datCurrency
|
||||||
|
DictionaryEntry = 'FacturasProveedor_IMPORTE_RE'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'IMPORTE_TOTAL'
|
||||||
|
DataType = datCurrency
|
||||||
|
DictionaryEntry = 'FacturasProveedor_IMPORTE_TOTAL'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'OBSERVACIONES'
|
||||||
|
DataType = datMemo
|
||||||
|
DictionaryEntry = 'FacturasProveedor_OBSERVACIONES'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'ID_PROVEEDOR'
|
||||||
|
DataType = datInteger
|
||||||
|
DictionaryEntry = 'FacturasProveedor_ID_PROVEEDOR'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'NIF_CIF'
|
||||||
|
DataType = datString
|
||||||
|
Size = 15
|
||||||
|
DictionaryEntry = 'FacturasProveedor_NIF_CIF'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'NOMBRE'
|
||||||
|
DataType = datString
|
||||||
|
Size = 100
|
||||||
|
DictionaryEntry = 'FacturasProveedor_NOMBRE'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'CALLE'
|
||||||
|
DataType = datString
|
||||||
|
Size = 150
|
||||||
|
DictionaryEntry = 'FacturasProveedor_CALLE'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'POBLACION'
|
||||||
|
DataType = datString
|
||||||
|
Size = 150
|
||||||
|
DictionaryEntry = 'FacturasProveedor_POBLACION'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'PROVINCIA'
|
||||||
|
DataType = datString
|
||||||
|
Size = 30
|
||||||
|
DictionaryEntry = 'FacturasProveedor_PROVINCIA'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'CODIGO_POSTAL'
|
||||||
|
DataType = datString
|
||||||
|
Size = 10
|
||||||
|
DictionaryEntry = 'FacturasProveedor_CODIGO_POSTAL'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'FECHA_ALTA'
|
||||||
|
DataType = datDateTime
|
||||||
|
DictionaryEntry = 'FacturasProveedor_FECHA_ALTA'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'FECHA_MODIFICACION'
|
||||||
|
DataType = datDateTime
|
||||||
|
DictionaryEntry = 'FacturasProveedor_FECHA_MODIFICACION'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'USUARIO'
|
||||||
|
DataType = datString
|
||||||
|
Size = 100
|
||||||
|
DictionaryEntry = 'FacturasProveedor_USUARIO'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'ID_FORMA_PAGO'
|
||||||
|
DataType = datInteger
|
||||||
|
DictionaryEntry = 'FacturasProveedor_ID_FORMA_PAGO'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'RECARGO_EQUIVALENCIA'
|
||||||
|
DataType = datSmallInt
|
||||||
|
DictionaryEntry = 'FacturasProveedor_RECARGO_EQUIVALENCIA'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'ID_TIPO_IVA'
|
||||||
|
DataType = datInteger
|
||||||
|
DictionaryEntry = 'FacturasProveedor_ID_TIPO_IVA'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'IMPORTE_NETO'
|
||||||
|
DataType = datCurrency
|
||||||
|
DictionaryEntry = 'FacturasProveedor_IMPORTE_NETO'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'IMPORTE_PORTE'
|
||||||
|
DataType = datCurrency
|
||||||
|
DictionaryEntry = 'FacturasProveedor_IMPORTE_PORTE'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'DATOS_BANCARIOS'
|
||||||
|
DataType = datString
|
||||||
|
Size = 255
|
||||||
|
DictionaryEntry = 'FacturasProveedor_DATOS_BANCARIOS'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'NUM_COPIAS'
|
||||||
|
DataType = datSmallInt
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'NUM_CORREOS'
|
||||||
|
DataType = datSmallInt
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'ID_ALBARAN'
|
||||||
|
DataType = datInteger
|
||||||
|
end>
|
||||||
end>
|
end>
|
||||||
JoinDataTables = <>
|
JoinDataTables = <>
|
||||||
UnionDataTables = <>
|
UnionDataTables = <>
|
||||||
@ -1269,7 +1626,7 @@ object srvFacturasProveedor: TsrvFacturasProveedor
|
|||||||
RelationShips = <
|
RelationShips = <
|
||||||
item
|
item
|
||||||
Name = 'FK_FacturasProveedor_Pedidos'
|
Name = 'FK_FacturasProveedor_Pedidos'
|
||||||
MasterDatasetName = 'FacturasProveedor'
|
MasterDatasetName = 'FacturasProveedorDeAlbaran'
|
||||||
MasterFields = 'ID'
|
MasterFields = 'ID'
|
||||||
DetailDatasetName = 'FacturasProveedor_Pedidos'
|
DetailDatasetName = 'FacturasProveedor_Pedidos'
|
||||||
DetailFields = 'ID_FACTURA'
|
DetailFields = 'ID_FACTURA'
|
||||||
@ -1277,7 +1634,7 @@ object srvFacturasProveedor: TsrvFacturasProveedor
|
|||||||
end
|
end
|
||||||
item
|
item
|
||||||
Name = 'FK_FacturasProveedor_Detalles'
|
Name = 'FK_FacturasProveedor_Detalles'
|
||||||
MasterDatasetName = 'FacturasProveedor'
|
MasterDatasetName = 'FacturasProveedorDeAlbaran'
|
||||||
MasterFields = 'ID'
|
MasterFields = 'ID'
|
||||||
DetailDatasetName = 'FacturasProveedor_Detalles'
|
DetailDatasetName = 'FacturasProveedor_Detalles'
|
||||||
DetailFields = 'ID_FACTURA'
|
DetailFields = 'ID_FACTURA'
|
||||||
|
|||||||
@ -14,4 +14,4 @@ END
|
|||||||
|
|
||||||
/* C:\Codigo\Source\Modulos\Informe margen por articulo\Data\uDataModuleInfMargenArticulo.dfm */
|
/* C:\Codigo\Source\Modulos\Informe margen por articulo\Data\uDataModuleInfMargenArticulo.dfm */
|
||||||
/* C:\Codigo\Source\Modulos\Informe margen por articulo\Data\InfMargenArticulo_data.res */
|
/* C:\Codigo\Source\Modulos\Informe margen por articulo\Data\InfMargenArticulo_data.res */
|
||||||
/* c:\temp\dtf65E.tmp */
|
/* c:\temp\dtfAF1.tmp */
|
||||||
|
|||||||
@ -13,4 +13,4 @@ BEGIN
|
|||||||
END
|
END
|
||||||
|
|
||||||
/* C:\Codigo\Source\Modulos\Informe margen por articulo\Model\InfMargenArticulo_model.res */
|
/* C:\Codigo\Source\Modulos\Informe margen por articulo\Model\InfMargenArticulo_model.res */
|
||||||
/* c:\temp\dtf65C.tmp */
|
/* c:\temp\dtfAEF.tmp */
|
||||||
|
|||||||
@ -16,4 +16,4 @@ END
|
|||||||
/* C:\Codigo\Source\Modulos\Informe margen por articulo\Views\uViewInfMargenArticulo.dfm */
|
/* C:\Codigo\Source\Modulos\Informe margen por articulo\Views\uViewInfMargenArticulo.dfm */
|
||||||
/* C:\Codigo\Source\Modulos\Informe margen por articulo\Views\uEditorInfMargenArticulo.dfm */
|
/* C:\Codigo\Source\Modulos\Informe margen por articulo\Views\uEditorInfMargenArticulo.dfm */
|
||||||
/* C:\Codigo\Source\Modulos\Informe margen por articulo\Views\InfMargenArticulo_view.res */
|
/* C:\Codigo\Source\Modulos\Informe margen por articulo\Views\InfMargenArticulo_view.res */
|
||||||
/* c:\temp\dtf662.tmp */
|
/* c:\temp\dtfAF5.tmp */
|
||||||
|
|||||||
@ -14,4 +14,4 @@ END
|
|||||||
|
|
||||||
/* C:\Codigo\Source\Modulos\Informe ventas por articulo\Data\uDataModuleInfVentasArticulo.dfm */
|
/* C:\Codigo\Source\Modulos\Informe ventas por articulo\Data\uDataModuleInfVentasArticulo.dfm */
|
||||||
/* C:\Codigo\Source\Modulos\Informe ventas por articulo\Data\InfVentasArticulo_data.res */
|
/* C:\Codigo\Source\Modulos\Informe ventas por articulo\Data\InfVentasArticulo_data.res */
|
||||||
/* c:\temp\dtf654.tmp */
|
/* c:\temp\dtfAE7.tmp */
|
||||||
|
|||||||
@ -13,4 +13,4 @@ BEGIN
|
|||||||
END
|
END
|
||||||
|
|
||||||
/* C:\Codigo\Source\Modulos\Informe ventas por articulo\Model\InfVentasArticulo_model.res */
|
/* C:\Codigo\Source\Modulos\Informe ventas por articulo\Model\InfVentasArticulo_model.res */
|
||||||
/* c:\temp\dtf652.tmp */
|
/* c:\temp\dtfAE5.tmp */
|
||||||
|
|||||||
@ -19,4 +19,4 @@ END
|
|||||||
/* C:\Codigo\Source\Modulos\Informe ventas por articulo\Views\uViewInfVentasAlbArticulo.dfm */
|
/* C:\Codigo\Source\Modulos\Informe ventas por articulo\Views\uViewInfVentasAlbArticulo.dfm */
|
||||||
/* C:\Codigo\Source\Modulos\Informe ventas por articulo\Views\uEditorInfVentasAlbArticulo.dfm */
|
/* C:\Codigo\Source\Modulos\Informe ventas por articulo\Views\uEditorInfVentasAlbArticulo.dfm */
|
||||||
/* C:\Codigo\Source\Modulos\Informe ventas por articulo\Views\InfVentasArticulo_view.res */
|
/* C:\Codigo\Source\Modulos\Informe ventas por articulo\Views\InfVentasArticulo_view.res */
|
||||||
/* c:\temp\dtf658.tmp */
|
/* c:\temp\dtfAEB.tmp */
|
||||||
|
|||||||
@ -13,4 +13,4 @@ BEGIN
|
|||||||
END
|
END
|
||||||
|
|
||||||
/* C:\Codigo\Source\Modulos\Informes base\Controller\InformesBase_controller.res */
|
/* C:\Codigo\Source\Modulos\Informes base\Controller\InformesBase_controller.res */
|
||||||
/* c:\temp\dtf648.tmp */
|
/* c:\temp\dtfADB.tmp */
|
||||||
|
|||||||
@ -14,4 +14,4 @@ END
|
|||||||
|
|
||||||
/* C:\Codigo\Source\Modulos\Informes base\Data\uDataModuleInformes.dfm */
|
/* C:\Codigo\Source\Modulos\Informes base\Data\uDataModuleInformes.dfm */
|
||||||
/* C:\Codigo\Source\Modulos\Informes base\Data\Informes_data.res */
|
/* C:\Codigo\Source\Modulos\Informes base\Data\Informes_data.res */
|
||||||
/* c:\temp\dtf642.tmp */
|
/* c:\temp\dtfAD5.tmp */
|
||||||
|
|||||||
@ -13,4 +13,4 @@ BEGIN
|
|||||||
END
|
END
|
||||||
|
|
||||||
/* C:\Codigo\Source\Modulos\Informes base\Model\Informes_model.res */
|
/* C:\Codigo\Source\Modulos\Informes base\Model\Informes_model.res */
|
||||||
/* c:\temp\dtf640.tmp */
|
/* c:\temp\dtfAD3.tmp */
|
||||||
|
|||||||
@ -15,4 +15,4 @@ END
|
|||||||
/* C:\Codigo\Source\Modulos\Informes base\Views\uViewInformes.dfm */
|
/* C:\Codigo\Source\Modulos\Informes base\Views\uViewInformes.dfm */
|
||||||
/* C:\Codigo\Source\Modulos\Informes base\Views\uEditorInformes.dfm */
|
/* C:\Codigo\Source\Modulos\Informes base\Views\uEditorInformes.dfm */
|
||||||
/* C:\Codigo\Source\Modulos\Informes base\Views\Informes_view.res */
|
/* C:\Codigo\Source\Modulos\Informes base\Views\Informes_view.res */
|
||||||
/* c:\temp\dtf64C.tmp */
|
/* c:\temp\dtfADF.tmp */
|
||||||
|
|||||||
@ -4,7 +4,7 @@ interface
|
|||||||
|
|
||||||
|
|
||||||
uses
|
uses
|
||||||
Classes, SysUtils, uDADataTable,
|
Classes, SysUtils, uDADataTable, uDAMemDataTable, FactuGES_Intf,
|
||||||
uControllerBase, uIDataModulePedidosProveedor, uProveedoresController,
|
uControllerBase, uIDataModulePedidosProveedor, uProveedoresController,
|
||||||
uDetallesPedidoProveedorController, uBizPedidosProveedor;
|
uDetallesPedidoProveedorController, uBizPedidosProveedor;
|
||||||
|
|
||||||
@ -21,6 +21,7 @@ type
|
|||||||
|
|
||||||
function Buscar(const ID: Integer): IBizPedidoProveedor;
|
function Buscar(const ID: Integer): IBizPedidoProveedor;
|
||||||
function BuscarTodos: IBizPedidoProveedor; overload;
|
function BuscarTodos: IBizPedidoProveedor; overload;
|
||||||
|
function BuscarPedidosProvRelacionados(const ListaIDPedidosCliente : TIntegerArray): TDAMemDataTable;
|
||||||
function BuscarTodos(const AID_Proveedor: Integer): IBizPedidoProveedor; overload;
|
function BuscarTodos(const AID_Proveedor: Integer): IBizPedidoProveedor; overload;
|
||||||
function BuscarPendientesRecepcion: IBizPedidoProveedor;
|
function BuscarPendientesRecepcion: IBizPedidoProveedor;
|
||||||
function BuscarSinFacturar : IBizPedidoProveedor;
|
function BuscarSinFacturar : IBizPedidoProveedor;
|
||||||
@ -111,6 +112,7 @@ type
|
|||||||
procedure Anadir(APedido : IBizPedidoProveedor);
|
procedure Anadir(APedido : IBizPedidoProveedor);
|
||||||
function Buscar(const ID: Integer): IBizPedidoProveedor;
|
function Buscar(const ID: Integer): IBizPedidoProveedor;
|
||||||
function BuscarTodos: IBizPedidoProveedor; overload;
|
function BuscarTodos: IBizPedidoProveedor; overload;
|
||||||
|
function BuscarPedidosProvRelacionados(const ListaIDPedidosCliente : TIntegerArray): TDAMemDataTable;
|
||||||
function BuscarTodos(const AID_Proveedor: Integer): IBizPedidoProveedor; overload;
|
function BuscarTodos(const AID_Proveedor: Integer): IBizPedidoProveedor; overload;
|
||||||
function BuscarPendientesRecepcion: IBizPedidoProveedor;
|
function BuscarPendientesRecepcion: IBizPedidoProveedor;
|
||||||
function BuscarSinFacturar : IBizPedidoProveedor;
|
function BuscarSinFacturar : IBizPedidoProveedor;
|
||||||
@ -217,6 +219,15 @@ begin
|
|||||||
FiltrarEmpresa(Result);
|
FiltrarEmpresa(Result);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
function TPedidosProveedorController.BuscarPedidosProvRelacionados(const ListaIDPedidosCliente: TIntegerArray): TDAMemDataTable;
|
||||||
|
var
|
||||||
|
i: Integer;
|
||||||
|
Condicion: TDAWhereExpression;
|
||||||
|
|
||||||
|
begin
|
||||||
|
Result := FDataModule.GetItemsBase;
|
||||||
|
end;
|
||||||
|
|
||||||
function TPedidosProveedorController.BuscarPendientesRecepcion: IBizPedidoProveedor;
|
function TPedidosProveedorController.BuscarPendientesRecepcion: IBizPedidoProveedor;
|
||||||
var
|
var
|
||||||
Condicion: TDAWhereExpression;
|
Condicion: TDAWhereExpression;
|
||||||
|
|||||||
@ -37,6 +37,7 @@ type
|
|||||||
|
|
||||||
public
|
public
|
||||||
function GetItems : IBizPedidoProveedor; virtual;
|
function GetItems : IBizPedidoProveedor; virtual;
|
||||||
|
function GetItemsBase : TDAMemDataTable; virtual;
|
||||||
function GetItem(const ID : Integer) : IBizPedidoProveedor;
|
function GetItem(const ID : Integer) : IBizPedidoProveedor;
|
||||||
function NewItem : IBizPedidoProveedor;
|
function NewItem : IBizPedidoProveedor;
|
||||||
function GetArticulosPendientes(const IDPedido: Integer): IBizDetallesPedidoProveedorPend;
|
function GetArticulosPendientes(const IDPedido: Integer): IBizDetallesPedidoProveedorPend;
|
||||||
@ -202,6 +203,11 @@ begin
|
|||||||
end;
|
end;
|
||||||
|
|
||||||
function TDataModulePedidosProveedor.GetItems: IBizPedidoProveedor;
|
function TDataModulePedidosProveedor.GetItems: IBizPedidoProveedor;
|
||||||
|
begin
|
||||||
|
Result := (GetItemsBase as IBizPedidoProveedor);
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TDataModulePedidosProveedor.GetItemsBase: TDAMemDataTable;
|
||||||
var
|
var
|
||||||
APedido : TDAMemDataTable;
|
APedido : TDAMemDataTable;
|
||||||
begin
|
begin
|
||||||
@ -216,7 +222,7 @@ begin
|
|||||||
with TBizPedidoProveedor(APedido.BusinessEventsObj) do
|
with TBizPedidoProveedor(APedido.BusinessEventsObj) do
|
||||||
Detalles := _GetDetalles;
|
Detalles := _GetDetalles;
|
||||||
|
|
||||||
Result := (APedido as IBizPedidoProveedor);
|
Result := APedido;
|
||||||
finally
|
finally
|
||||||
HideHourglassCursor;
|
HideHourglassCursor;
|
||||||
end;
|
end;
|
||||||
|
|||||||
@ -3,13 +3,14 @@ unit uIDataModulePedidosProveedor;
|
|||||||
interface
|
interface
|
||||||
|
|
||||||
uses
|
uses
|
||||||
Classes, uBizPedidosProveedor, uBizDetallesPedidoProveedor;
|
Classes, uBizPedidosProveedor, uBizDetallesPedidoProveedor, uDAMemDataTable;
|
||||||
|
|
||||||
type
|
type
|
||||||
IDataModulePedidosProveedor = interface
|
IDataModulePedidosProveedor = interface
|
||||||
['{280AA760-26CC-4962-AB08-6C473199DF86}']
|
['{280AA760-26CC-4962-AB08-6C473199DF86}']
|
||||||
function GetAnosItems : TStringList;
|
function GetAnosItems : TStringList;
|
||||||
function GetItems: IBizPedidoProveedor;
|
function GetItems: IBizPedidoProveedor;
|
||||||
|
function GetItemsBase : TDAMemDataTable;
|
||||||
function GetItem(const ID : Integer) : IBizPedidoProveedor;
|
function GetItem(const ID : Integer) : IBizPedidoProveedor;
|
||||||
function NewItem : IBizPedidoProveedor;
|
function NewItem : IBizPedidoProveedor;
|
||||||
function GetArticulosPendientes(const IDPedido: Integer): IBizDetallesPedidoProveedorPend;
|
function GetArticulosPendientes(const IDPedido: Integer): IBizDetallesPedidoProveedorPend;
|
||||||
|
|||||||
@ -117,15 +117,6 @@
|
|||||||
<Target Name="PedidosProveedor_model:Make">
|
<Target Name="PedidosProveedor_model:Make">
|
||||||
<MSBuild Projects="Model\PedidosProveedor_model.dproj" Targets="Make" />
|
<MSBuild Projects="Model\PedidosProveedor_model.dproj" Targets="Make" />
|
||||||
</Target>
|
</Target>
|
||||||
<Target Name="PedidosProveedor_data">
|
|
||||||
<MSBuild Projects="Data\PedidosProveedor_data.dproj" Targets="" />
|
|
||||||
</Target>
|
|
||||||
<Target Name="PedidosProveedor_data:Clean">
|
|
||||||
<MSBuild Projects="Data\PedidosProveedor_data.dproj" Targets="Clean" />
|
|
||||||
</Target>
|
|
||||||
<Target Name="PedidosProveedor_data:Make">
|
|
||||||
<MSBuild Projects="Data\PedidosProveedor_data.dproj" Targets="Make" />
|
|
||||||
</Target>
|
|
||||||
<Target Name="PedidosProveedor_controller">
|
<Target Name="PedidosProveedor_controller">
|
||||||
<MSBuild Projects="Controller\PedidosProveedor_controller.dproj" Targets="" />
|
<MSBuild Projects="Controller\PedidosProveedor_controller.dproj" Targets="" />
|
||||||
</Target>
|
</Target>
|
||||||
@ -135,6 +126,15 @@
|
|||||||
<Target Name="PedidosProveedor_controller:Make">
|
<Target Name="PedidosProveedor_controller:Make">
|
||||||
<MSBuild Projects="Controller\PedidosProveedor_controller.dproj" Targets="Make" />
|
<MSBuild Projects="Controller\PedidosProveedor_controller.dproj" Targets="Make" />
|
||||||
</Target>
|
</Target>
|
||||||
|
<Target Name="PedidosProveedor_data">
|
||||||
|
<MSBuild Projects="Data\PedidosProveedor_data.dproj" Targets="" />
|
||||||
|
</Target>
|
||||||
|
<Target Name="PedidosProveedor_data:Clean">
|
||||||
|
<MSBuild Projects="Data\PedidosProveedor_data.dproj" Targets="Clean" />
|
||||||
|
</Target>
|
||||||
|
<Target Name="PedidosProveedor_data:Make">
|
||||||
|
<MSBuild Projects="Data\PedidosProveedor_data.dproj" Targets="Make" />
|
||||||
|
</Target>
|
||||||
<Target Name="AlbaranesProveedor_controller">
|
<Target Name="AlbaranesProveedor_controller">
|
||||||
<MSBuild Projects="..\Albaranes de proveedor\Controller\AlbaranesProveedor_controller.dproj" Targets="" />
|
<MSBuild Projects="..\Albaranes de proveedor\Controller\AlbaranesProveedor_controller.dproj" Targets="" />
|
||||||
</Target>
|
</Target>
|
||||||
@ -262,13 +262,13 @@
|
|||||||
<MSBuild Projects="..\Albaranes de proveedor\Views\AlbaranesProveedor_view.dproj" Targets="Make" />
|
<MSBuild Projects="..\Albaranes de proveedor\Views\AlbaranesProveedor_view.dproj" Targets="Make" />
|
||||||
</Target>
|
</Target>
|
||||||
<Target Name="Build">
|
<Target Name="Build">
|
||||||
<CallTarget Targets="Base;GUIBase;ApplicationBase;Contactos_controller;Contactos_view;Articulos_data;Articulos_controller;Articulos_view;PedidosProveedor_model;PedidosProveedor_data;PedidosProveedor_controller;AlbaranesProveedor_controller;Inventario_controller;PedProv_AlbProv_relation;FacturasProveedor_controller;PedProv_FacProv_relation;PedidosProveedor_view;PedidosProveedor_plugin;AlbaranesProveedor_data;AlbaranesCliente_data;FactuGES;FactuGES_Server;Inventario_data;Inventario_view;AlbaranesProveedor_view" />
|
<CallTarget Targets="Base;GUIBase;ApplicationBase;Contactos_controller;Contactos_view;Articulos_data;Articulos_controller;Articulos_view;PedidosProveedor_model;PedidosProveedor_controller;PedidosProveedor_data;AlbaranesProveedor_controller;Inventario_controller;PedProv_AlbProv_relation;FacturasProveedor_controller;PedProv_FacProv_relation;PedidosProveedor_view;PedidosProveedor_plugin;AlbaranesProveedor_data;AlbaranesCliente_data;FactuGES;FactuGES_Server;Inventario_data;Inventario_view;AlbaranesProveedor_view" />
|
||||||
</Target>
|
</Target>
|
||||||
<Target Name="Clean">
|
<Target Name="Clean">
|
||||||
<CallTarget Targets="Base:Clean;GUIBase:Clean;ApplicationBase:Clean;Contactos_controller:Clean;Contactos_view:Clean;Articulos_data:Clean;Articulos_controller:Clean;Articulos_view:Clean;PedidosProveedor_model:Clean;PedidosProveedor_data:Clean;PedidosProveedor_controller:Clean;AlbaranesProveedor_controller:Clean;Inventario_controller:Clean;PedProv_AlbProv_relation:Clean;FacturasProveedor_controller:Clean;PedProv_FacProv_relation:Clean;PedidosProveedor_view:Clean;PedidosProveedor_plugin:Clean;AlbaranesProveedor_data:Clean;AlbaranesCliente_data:Clean;FactuGES:Clean;FactuGES_Server:Clean;Inventario_data:Clean;Inventario_view:Clean;AlbaranesProveedor_view:Clean" />
|
<CallTarget Targets="Base:Clean;GUIBase:Clean;ApplicationBase:Clean;Contactos_controller:Clean;Contactos_view:Clean;Articulos_data:Clean;Articulos_controller:Clean;Articulos_view:Clean;PedidosProveedor_model:Clean;PedidosProveedor_controller:Clean;PedidosProveedor_data:Clean;AlbaranesProveedor_controller:Clean;Inventario_controller:Clean;PedProv_AlbProv_relation:Clean;FacturasProveedor_controller:Clean;PedProv_FacProv_relation:Clean;PedidosProveedor_view:Clean;PedidosProveedor_plugin:Clean;AlbaranesProveedor_data:Clean;AlbaranesCliente_data:Clean;FactuGES:Clean;FactuGES_Server:Clean;Inventario_data:Clean;Inventario_view:Clean;AlbaranesProveedor_view:Clean" />
|
||||||
</Target>
|
</Target>
|
||||||
<Target Name="Make">
|
<Target Name="Make">
|
||||||
<CallTarget Targets="Base:Make;GUIBase:Make;ApplicationBase:Make;Contactos_controller:Make;Contactos_view:Make;Articulos_data:Make;Articulos_controller:Make;Articulos_view:Make;PedidosProveedor_model:Make;PedidosProveedor_data:Make;PedidosProveedor_controller:Make;AlbaranesProveedor_controller:Make;Inventario_controller:Make;PedProv_AlbProv_relation:Make;FacturasProveedor_controller:Make;PedProv_FacProv_relation:Make;PedidosProveedor_view:Make;PedidosProveedor_plugin:Make;AlbaranesProveedor_data:Make;AlbaranesCliente_data:Make;FactuGES:Make;FactuGES_Server:Make;Inventario_data:Make;Inventario_view:Make;AlbaranesProveedor_view:Make" />
|
<CallTarget Targets="Base:Make;GUIBase:Make;ApplicationBase:Make;Contactos_controller:Make;Contactos_view:Make;Articulos_data:Make;Articulos_controller:Make;Articulos_view:Make;PedidosProveedor_model:Make;PedidosProveedor_controller:Make;PedidosProveedor_data:Make;AlbaranesProveedor_controller:Make;Inventario_controller:Make;PedProv_AlbProv_relation:Make;FacturasProveedor_controller:Make;PedProv_FacProv_relation:Make;PedidosProveedor_view:Make;PedidosProveedor_plugin:Make;AlbaranesProveedor_data:Make;AlbaranesCliente_data:Make;FactuGES:Make;FactuGES_Server:Make;Inventario_data:Make;Inventario_view:Make;AlbaranesProveedor_view:Make" />
|
||||||
</Target>
|
</Target>
|
||||||
<Import Condition="Exists('$(MSBuildBinPath)\Borland.Group.Targets')" Project="$(MSBuildBinPath)\Borland.Group.Targets" />
|
<Import Condition="Exists('$(MSBuildBinPath)\Borland.Group.Targets')" Project="$(MSBuildBinPath)\Borland.Group.Targets" />
|
||||||
</Project>
|
</Project>
|
||||||
@ -4,7 +4,7 @@ interface
|
|||||||
|
|
||||||
uses
|
uses
|
||||||
uModuleController, uInterfaces, uHostManager, Menus, Classes, ActnList,
|
uModuleController, uInterfaces, uHostManager, Menus, Classes, ActnList,
|
||||||
ImgList, Controls, PngImageList, uPlugins_Intf;
|
ImgList, Controls, PngImageList, uPlugins_Intf, uDAMemDataTable, FactuGES_Intf;
|
||||||
|
|
||||||
type
|
type
|
||||||
TPluginPedidosProveedor = class(TModuleController, IMCPedidosProveedor)
|
TPluginPedidosProveedor = class(TModuleController, IMCPedidosProveedor)
|
||||||
@ -20,8 +20,8 @@ type
|
|||||||
public
|
public
|
||||||
constructor Create(AOwner: TComponent); override;
|
constructor Create(AOwner: TComponent); override;
|
||||||
destructor Destroy; override;
|
destructor Destroy; override;
|
||||||
procedure VerPedidos(const ID_Proveedor: Integer;
|
procedure VerPedidos(const ID_Proveedor: Integer; const ANombreProveedor : String = '');
|
||||||
const ANombreProveedor : String = '');
|
function DarPedidosRelacionados(const ListaIDPedidosCliente : TIntegerArray): TDAMemDataTable;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
implementation
|
implementation
|
||||||
@ -29,8 +29,8 @@ implementation
|
|||||||
{$R *.dfm}
|
{$R *.dfm}
|
||||||
|
|
||||||
uses
|
uses
|
||||||
Forms, Dialogs, SysUtils, cxControls,
|
Forms, Dialogs, SysUtils, cxControls, uBizPedidosProveedor,
|
||||||
uPedidosProveedorController, uBizPedidosProveedor, uPedidosProveedorViewRegister;
|
uPedidosProveedorController, uPedidosProveedorViewRegister;
|
||||||
|
|
||||||
function GetModule : TModuleController;
|
function GetModule : TModuleController;
|
||||||
begin
|
begin
|
||||||
@ -58,6 +58,20 @@ begin
|
|||||||
uPedidosProveedorViewRegister.RegisterViews;
|
uPedidosProveedorViewRegister.RegisterViews;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
function TPluginPedidosProveedor.DarPedidosRelacionados(const ListaIDPedidosCliente : TIntegerArray): TDAMemDataTable;
|
||||||
|
var
|
||||||
|
APedidosController : IPedidosProveedorController;
|
||||||
|
ATabla: TDAMemDataTable;
|
||||||
|
begin
|
||||||
|
APedidosController := TPedidosProveedorController.Create;
|
||||||
|
try
|
||||||
|
ATabla := APedidosController.BuscarPedidosProvRelacionados(ListaIDPedidosCliente);
|
||||||
|
Result := ATabla; // (ID_Proveedor);
|
||||||
|
finally
|
||||||
|
// APedidosController := NIL;
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
|
||||||
destructor TPluginPedidosProveedor.Destroy;
|
destructor TPluginPedidosProveedor.Destroy;
|
||||||
begin
|
begin
|
||||||
uPedidosProveedorViewRegister.UnregisterViews;
|
uPedidosProveedorViewRegister.UnregisterViews;
|
||||||
|
|||||||
Binary file not shown.
@ -69,7 +69,6 @@
|
|||||||
<DCCReference Include="View\uIEditorDireccionEntregaPedidoCliente.pas" />
|
<DCCReference Include="View\uIEditorDireccionEntregaPedidoCliente.pas" />
|
||||||
<DCCReference Include="View\uIEditorElegirArticulosPedidosCliente.pas" />
|
<DCCReference Include="View\uIEditorElegirArticulosPedidosCliente.pas" />
|
||||||
<DCCReference Include="View\uIEditorElegirPedidosCliente.pas" />
|
<DCCReference Include="View\uIEditorElegirPedidosCliente.pas" />
|
||||||
<DCCReference Include="View\uIEditorListadoProcesoPedidoCliente.pas" />
|
|
||||||
<DCCReference Include="View\uIEditorPedidoCliente.pas" />
|
<DCCReference Include="View\uIEditorPedidoCliente.pas" />
|
||||||
<DCCReference Include="View\uIEditorPedidosCliente.pas" />
|
<DCCReference Include="View\uIEditorPedidosCliente.pas" />
|
||||||
<DCCReference Include="View\uIEditorPedidosClientePreview.pas" />
|
<DCCReference Include="View\uIEditorPedidosClientePreview.pas" />
|
||||||
|
|||||||
@ -12,5 +12,5 @@ STRINGTABLE
|
|||||||
BEGIN
|
BEGIN
|
||||||
END
|
END
|
||||||
|
|
||||||
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Controller\PedidosCliente_controller.RES */
|
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Controller\PedidosCliente_controller.res */
|
||||||
/* c:\temp\dtf6D6.tmp */
|
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Controller\PedidosCliente_controller.drf */
|
||||||
|
|||||||
@ -1,29 +0,0 @@
|
|||||||
unit uIEditorListadoProcesoPedidoCliente;
|
|
||||||
|
|
||||||
interface
|
|
||||||
|
|
||||||
uses
|
|
||||||
uEditorDBItem, uBizPedidosCliente, uBizPedidosProveedor;
|
|
||||||
//uPedidosClienteController;
|
|
||||||
|
|
||||||
type
|
|
||||||
IEditorListadoProcesoPedidoCliente = interface(IEditorDBItem)
|
|
||||||
['{E294B4E2-DB66-4D6F-958D-66C5583BA1F2}']
|
|
||||||
// function GetController : IPedidosClienteController;
|
|
||||||
// procedure SetController (const Value : IPedidosClienteController);
|
|
||||||
// property Controller : IPedidosClienteController read GetController
|
|
||||||
// write SetController;
|
|
||||||
|
|
||||||
function GetPedidosCliente: IBizPedidoCliente;
|
|
||||||
procedure SetPedidosCliente(const Value: IBizPedidoCliente);
|
|
||||||
property PedidosCliente: IBizPedidoCliente read GetPedidosCliente write SetPedidosCliente;
|
|
||||||
|
|
||||||
function GetPedidosProveedor: IBizPedidoProveedor;
|
|
||||||
procedure SetPedidosProveedor(const Value: IBizPedidoProveedor);
|
|
||||||
property PedidosProveedor: IBizPedidoProveedor read GetPedidosProveedor write SetPedidosProveedor;
|
|
||||||
|
|
||||||
end;
|
|
||||||
|
|
||||||
implementation
|
|
||||||
|
|
||||||
end.
|
|
||||||
@ -34,7 +34,7 @@ type
|
|||||||
const AHeaderText: String = '');
|
const AHeaderText: String = '');
|
||||||
procedure VerDireccionEntrega(APedido : IBizPedidoCliente);
|
procedure VerDireccionEntrega(APedido : IBizPedidoCliente);
|
||||||
|
|
||||||
procedure VerListadoProcesoPedidoCliente(const ASituacion: String);
|
procedure VerProcesoCompleto(APedidos: IBizPedidoCliente; AllItems: Boolean = True);
|
||||||
|
|
||||||
function Nuevo : IBizPedidoCliente;
|
function Nuevo : IBizPedidoCliente;
|
||||||
procedure Anadir(APedido : IBizPedidoCliente);
|
procedure Anadir(APedido : IBizPedidoCliente);
|
||||||
@ -123,6 +123,7 @@ type
|
|||||||
function BuscarTodos(const AID_Cliente: Integer): IBizPedidoCliente; overload;
|
function BuscarTodos(const AID_Cliente: Integer): IBizPedidoCliente; overload;
|
||||||
function BuscarPendientes : IBizPedidoCliente;
|
function BuscarPendientes : IBizPedidoCliente;
|
||||||
function BuscarSituacion(Const ASituacion: String) : IBizPedidoCliente;
|
function BuscarSituacion(Const ASituacion: String) : IBizPedidoCliente;
|
||||||
|
|
||||||
function BuscarPendientesPedir(const ID : Integer): IBizPedidoClienteArticulosPendientesPedirAProv;
|
function BuscarPendientesPedir(const ID : Integer): IBizPedidoClienteArticulosPendientesPedirAProv;
|
||||||
function BuscarPendientesPedirNoArticulos(const ID : Integer): IBizPedidoClienteArticulosPendientesPedirAProv;
|
function BuscarPendientesPedirNoArticulos(const ID : Integer): IBizPedidoClienteArticulosPendientesPedirAProv;
|
||||||
|
|
||||||
@ -136,7 +137,7 @@ type
|
|||||||
procedure VerDireccionEntrega(APedido : IBizPedidoCliente);
|
procedure VerDireccionEntrega(APedido : IBizPedidoCliente);
|
||||||
function Duplicar(APedido: IBizPedidoCliente): IBizPedidoCliente;
|
function Duplicar(APedido: IBizPedidoCliente): IBizPedidoCliente;
|
||||||
|
|
||||||
procedure VerListadoProcesoPedidoCliente(const ASituacion: String);
|
procedure VerProcesoCompleto(APedidos: IBizPedidoCliente; AllItems: Boolean = True);
|
||||||
|
|
||||||
procedure Preview(APedido : IBizPedidoCliente; AllItems: Boolean = False;
|
procedure Preview(APedido : IBizPedidoCliente; AllItems: Boolean = False;
|
||||||
const VerPrecios: Boolean = True; const VerRefProveedor: Boolean = True);
|
const VerPrecios: Boolean = True; const VerRefProveedor: Boolean = True);
|
||||||
@ -179,7 +180,7 @@ uses
|
|||||||
uDateUtils, uIEditorPedidoCliente, uIEditorElegirPedidosCliente,
|
uDateUtils, uIEditorPedidoCliente, uIEditorElegirPedidosCliente,
|
||||||
Dialogs, uIEditorDireccionEntregaPedidoCliente, uIDialogListaPedidosClienteEnvioEMail,
|
Dialogs, uIEditorDireccionEntregaPedidoCliente, uIDialogListaPedidosClienteEnvioEMail,
|
||||||
Variants, uSistemaFunc, uEMailUtils, uDialogElegirEMail, uIntegerListUtils, uStringsUtils,
|
Variants, uSistemaFunc, uEMailUtils, uDialogElegirEMail, uIntegerListUtils, uStringsUtils,
|
||||||
uIEditorListadoProcesoPedidoCliente;
|
uModuleController, uPlugins_Intf, FactuGES_Intf;
|
||||||
|
|
||||||
{ TPedidosClienteController }
|
{ TPedidosClienteController }
|
||||||
|
|
||||||
@ -621,30 +622,39 @@ begin
|
|||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure TPedidosClienteController.VerListadoProcesoPedidoCliente(const ASituacion: String);
|
procedure TPedidosClienteController.VerProcesoCompleto(APedidos: IBizPedidoCliente; AllItems: Boolean = True);
|
||||||
var
|
var
|
||||||
APedidosCliente: IBizPedidoCliente;
|
AModule : TModuleController;
|
||||||
APedidosProveedor: IBizPedidoProveedor;
|
APlugin : IMCProcesoPresupuestosCliente;
|
||||||
AEditor : IEditorListadoProcesoPedidoCliente;
|
ListaIDPedidosCliente: TIntegerArray;
|
||||||
begin
|
begin
|
||||||
AEditor := NIL;
|
if not Assigned(APedidos) then
|
||||||
|
raise Exception.Create ('Pedidos no asignado (VerProcesoCompleto)');
|
||||||
|
|
||||||
APedidosCliente := BuscarSituacion(ASituacion);
|
if not APedidos.DataTable.Active then
|
||||||
|
APedidos.DataTable.Active := True;
|
||||||
|
|
||||||
CreateEditor('EditorListadoProcesoPedidoCLiente', IEditorListadoProcesoPedidoCLiente, AEditor);
|
ListaIDPedidosCliente := TIntegerArray.Create;
|
||||||
if Assigned(AEditor) then
|
if not AllItems then
|
||||||
|
ListaIDPedidosCliente.Add(APedidos.ID)
|
||||||
|
else
|
||||||
|
begin
|
||||||
|
APedidos.First;
|
||||||
|
while not APedidos.EOF do
|
||||||
|
begin
|
||||||
|
ListaIDPedidosCliente.Add(APedidos.ID);
|
||||||
|
APedidos.Next;
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
|
||||||
|
AModule := AppFactuGES.GetModule(MODULENAME_PROCESO_PRESUPUESTOS_CLIENTE);
|
||||||
|
if Assigned(AModule) then
|
||||||
try
|
try
|
||||||
// AEditor.Controller := Self; //OJO ORDEN MUY IMPORTANTE
|
if Supports(AModule, IMCProcesoPresupuestosCliente, APlugin) then
|
||||||
AEditor.PedidosCliente := APedidosCliente;
|
APlugin.VerPresupuestos(ListaIDPedidosCliente);
|
||||||
AEditor.PedidosProveedor := APedidosProveedor;
|
|
||||||
// AEditor.IdAlmacenObra := IdAlmacenObra;
|
|
||||||
// AEditor.DetalleReservas := BuscarDetalleReservas;
|
|
||||||
// AEditor.Articulo := AArticulo;
|
|
||||||
// AEditor.MultiSelect := True;
|
|
||||||
AEditor.ShowModal;
|
|
||||||
finally
|
finally
|
||||||
AEditor.Release;
|
APlugin := NIL;
|
||||||
AEditor := NIL;
|
FreeAndNil(ListaIDPedidosCliente);
|
||||||
end;
|
end;
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
|||||||
@ -14,4 +14,4 @@ END
|
|||||||
|
|
||||||
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Data\uDataModulePedidosCliente.dfm */
|
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Data\uDataModulePedidosCliente.dfm */
|
||||||
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Data\PedidosCliente_data.RES */
|
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Data\PedidosCliente_data.RES */
|
||||||
/* c:\temp\dtf686.tmp */
|
/* c:\temp\dtfB19.tmp */
|
||||||
|
|||||||
@ -558,4 +558,40 @@ inherited DataModulePedidosCliente: TDataModulePedidosCliente
|
|||||||
Left = 256
|
Left = 256
|
||||||
Top = 272
|
Top = 272
|
||||||
end
|
end
|
||||||
|
object tbl_PedidosProveedor: TDAMemDataTable
|
||||||
|
RemoteUpdatesOptions = []
|
||||||
|
Fields = <
|
||||||
|
item
|
||||||
|
Name = 'ID'
|
||||||
|
DataType = datInteger
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'REFERENCIA'
|
||||||
|
DataType = datString
|
||||||
|
Size = 255
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'NOMBRE'
|
||||||
|
DataType = datString
|
||||||
|
Size = 255
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'SITUACION'
|
||||||
|
DataType = datString
|
||||||
|
Size = 9
|
||||||
|
end>
|
||||||
|
Params = <>
|
||||||
|
StreamingOptions = [soDisableEventsWhileStreaming]
|
||||||
|
RemoteDataAdapter = rda_PedidosCliente
|
||||||
|
LogicalName = 'PedidosProveedor'
|
||||||
|
IndexDefs = <>
|
||||||
|
Left = 520
|
||||||
|
Top = 320
|
||||||
|
end
|
||||||
|
object ds_PedidosProveedor: TDADataSource
|
||||||
|
DataSet = tbl_PedidosProveedor.Dataset
|
||||||
|
DataTable = tbl_PedidosProveedor
|
||||||
|
Left = 520
|
||||||
|
Top = 272
|
||||||
|
end
|
||||||
end
|
end
|
||||||
|
|||||||
@ -31,6 +31,8 @@ type
|
|||||||
ds_PedidosCliente_Detalles: TDADataSource;
|
ds_PedidosCliente_Detalles: TDADataSource;
|
||||||
tbl_PedidoCliente_ArticulosPendientesPedirAProvNoArticulos: TDAMemDataTable;
|
tbl_PedidoCliente_ArticulosPendientesPedirAProvNoArticulos: TDAMemDataTable;
|
||||||
ds_PedidoCliente_ArticulosPendientesPedirAProvNoArticulos: TDADataSource;
|
ds_PedidoCliente_ArticulosPendientesPedirAProvNoArticulos: TDADataSource;
|
||||||
|
tbl_PedidosProveedor: TDAMemDataTable;
|
||||||
|
ds_PedidosProveedor: TDADataSource;
|
||||||
procedure DAClientDataModuleCreate(Sender: TObject);
|
procedure DAClientDataModuleCreate(Sender: TObject);
|
||||||
|
|
||||||
private
|
private
|
||||||
|
|||||||
@ -13,4 +13,4 @@ BEGIN
|
|||||||
END
|
END
|
||||||
|
|
||||||
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Model\PedidosCliente_model.RES */
|
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Model\PedidosCliente_model.RES */
|
||||||
/* c:\temp\dtf684.tmp */
|
/* c:\temp\dtfB17.tmp */
|
||||||
|
|||||||
@ -9,15 +9,17 @@ const
|
|||||||
{ Data table rules ids
|
{ Data table rules ids
|
||||||
Feel free to change them to something more human readable
|
Feel free to change them to something more human readable
|
||||||
but make sure they are unique in the context of your application }
|
but make sure they are unique in the context of your application }
|
||||||
RID_ListaAnosPedidos = '{39AEA87B-B095-43F4-AE81-2407C4D498F0}';
|
RID_ListaAnosPedidos = '{52367490-087A-469F-B93B-4AFF89D7D4FE}';
|
||||||
RID_PedidosCliente = '{2C37EE57-27DA-49CE-BBFC-93C2D1771DB4}';
|
RID_PedidosProveedor = '{ED584C2A-011D-4C96-96D4-4C1CA33A11BD}';
|
||||||
RID_PedidosCliente_Detalles = '{389CA843-A89F-4A47-95F3-6D2FB17E6DF9}';
|
RID_PedidosCliente = '{CD51EA1E-706D-47A9-9750-B21DC98C84BC}';
|
||||||
RID_PedidosCliente_Articulos_Pendientes = '{29EB047A-4B49-42D4-A8E9-C42EE3E471FB}';
|
RID_PedidosCliente_Detalles = '{0E41F534-D8F7-4323-9ECA-3D2FE77C83B1}';
|
||||||
RID_PedidoCliente_ArticulosPendientesPedirAProv = '{1E6FC371-3B83-48DB-BB55-FEC98F3915D1}';
|
RID_PedidosCliente_Articulos_Pendientes = '{4B037FD2-288E-47FB-853E-7E9F75BE9705}';
|
||||||
RID_PedidoCliente_ArticulosPendientesPedirAProvNoArticulos = '{D624CEBB-93E5-4C10-9A10-CC433745B1F7}';
|
RID_PedidoCliente_ArticulosPendientesPedirAProv = '{C541B99A-F566-48B3-8C27-4AF629628F68}';
|
||||||
|
RID_PedidoCliente_ArticulosPendientesPedirAProvNoArticulos = '{832C1605-743A-4685-B3CF-17C5D2CD1902}';
|
||||||
|
|
||||||
{ Data table names }
|
{ Data table names }
|
||||||
nme_ListaAnosPedidos = 'ListaAnosPedidos';
|
nme_ListaAnosPedidos = 'ListaAnosPedidos';
|
||||||
|
nme_PedidosProveedor = 'PedidosProveedor';
|
||||||
nme_PedidosCliente = 'PedidosCliente';
|
nme_PedidosCliente = 'PedidosCliente';
|
||||||
nme_PedidosCliente_Detalles = 'PedidosCliente_Detalles';
|
nme_PedidosCliente_Detalles = 'PedidosCliente_Detalles';
|
||||||
nme_PedidosCliente_Articulos_Pendientes = 'PedidosCliente_Articulos_Pendientes';
|
nme_PedidosCliente_Articulos_Pendientes = 'PedidosCliente_Articulos_Pendientes';
|
||||||
@ -30,6 +32,18 @@ const
|
|||||||
{ ListaAnosPedidos field indexes }
|
{ ListaAnosPedidos field indexes }
|
||||||
idx_ListaAnosPedidosANO = 0;
|
idx_ListaAnosPedidosANO = 0;
|
||||||
|
|
||||||
|
{ PedidosProveedor fields }
|
||||||
|
fld_PedidosProveedorID = 'ID';
|
||||||
|
fld_PedidosProveedorREFERENCIA = 'REFERENCIA';
|
||||||
|
fld_PedidosProveedorNOMBRE = 'NOMBRE';
|
||||||
|
fld_PedidosProveedorSITUACION = 'SITUACION';
|
||||||
|
|
||||||
|
{ PedidosProveedor field indexes }
|
||||||
|
idx_PedidosProveedorID = 0;
|
||||||
|
idx_PedidosProveedorREFERENCIA = 1;
|
||||||
|
idx_PedidosProveedorNOMBRE = 2;
|
||||||
|
idx_PedidosProveedorSITUACION = 3;
|
||||||
|
|
||||||
{ PedidosCliente fields }
|
{ PedidosCliente fields }
|
||||||
fld_PedidosClienteID = 'ID';
|
fld_PedidosClienteID = 'ID';
|
||||||
fld_PedidosClienteID_EMPRESA = 'ID_EMPRESA';
|
fld_PedidosClienteID_EMPRESA = 'ID_EMPRESA';
|
||||||
@ -197,7 +211,7 @@ const
|
|||||||
type
|
type
|
||||||
{ IListaAnosPedidos }
|
{ IListaAnosPedidos }
|
||||||
IListaAnosPedidos = interface(IDAStronglyTypedDataTable)
|
IListaAnosPedidos = interface(IDAStronglyTypedDataTable)
|
||||||
['{013A26BB-689A-4EDF-85F8-2F1499B427B4}']
|
['{C9EAE65F-5971-4B08-ABC0-274B4FD22461}']
|
||||||
{ Property getters and setters }
|
{ Property getters and setters }
|
||||||
function GetANOValue: String;
|
function GetANOValue: String;
|
||||||
procedure SetANOValue(const aValue: String);
|
procedure SetANOValue(const aValue: String);
|
||||||
@ -230,9 +244,80 @@ type
|
|||||||
|
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
{ IPedidosProveedor }
|
||||||
|
IPedidosProveedor = interface(IDAStronglyTypedDataTable)
|
||||||
|
['{772F1791-6705-4292-A9CF-9CAFDA0FCB3B}']
|
||||||
|
{ Property getters and setters }
|
||||||
|
function GetIDValue: Integer;
|
||||||
|
procedure SetIDValue(const aValue: Integer);
|
||||||
|
function GetIDIsNull: Boolean;
|
||||||
|
procedure SetIDIsNull(const aValue: Boolean);
|
||||||
|
function GetREFERENCIAValue: String;
|
||||||
|
procedure SetREFERENCIAValue(const aValue: String);
|
||||||
|
function GetREFERENCIAIsNull: Boolean;
|
||||||
|
procedure SetREFERENCIAIsNull(const aValue: Boolean);
|
||||||
|
function GetNOMBREValue: String;
|
||||||
|
procedure SetNOMBREValue(const aValue: String);
|
||||||
|
function GetNOMBREIsNull: Boolean;
|
||||||
|
procedure SetNOMBREIsNull(const aValue: Boolean);
|
||||||
|
function GetSITUACIONValue: String;
|
||||||
|
procedure SetSITUACIONValue(const aValue: String);
|
||||||
|
function GetSITUACIONIsNull: Boolean;
|
||||||
|
procedure SetSITUACIONIsNull(const aValue: Boolean);
|
||||||
|
|
||||||
|
|
||||||
|
{ Properties }
|
||||||
|
property ID: Integer read GetIDValue write SetIDValue;
|
||||||
|
property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
|
||||||
|
property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
|
||||||
|
property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
|
||||||
|
property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
|
||||||
|
property NOMBREIsNull: Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
|
||||||
|
property SITUACION: String read GetSITUACIONValue write SetSITUACIONValue;
|
||||||
|
property SITUACIONIsNull: Boolean read GetSITUACIONIsNull write SetSITUACIONIsNull;
|
||||||
|
end;
|
||||||
|
|
||||||
|
{ TPedidosProveedorDataTableRules }
|
||||||
|
TPedidosProveedorDataTableRules = class(TIntfObjectDADataTableRules, IPedidosProveedor)
|
||||||
|
private
|
||||||
|
protected
|
||||||
|
{ Property getters and setters }
|
||||||
|
function GetIDValue: Integer; virtual;
|
||||||
|
procedure SetIDValue(const aValue: Integer); virtual;
|
||||||
|
function GetIDIsNull: Boolean; virtual;
|
||||||
|
procedure SetIDIsNull(const aValue: Boolean); virtual;
|
||||||
|
function GetREFERENCIAValue: String; virtual;
|
||||||
|
procedure SetREFERENCIAValue(const aValue: String); virtual;
|
||||||
|
function GetREFERENCIAIsNull: Boolean; virtual;
|
||||||
|
procedure SetREFERENCIAIsNull(const aValue: Boolean); virtual;
|
||||||
|
function GetNOMBREValue: String; virtual;
|
||||||
|
procedure SetNOMBREValue(const aValue: String); virtual;
|
||||||
|
function GetNOMBREIsNull: Boolean; virtual;
|
||||||
|
procedure SetNOMBREIsNull(const aValue: Boolean); virtual;
|
||||||
|
function GetSITUACIONValue: String; virtual;
|
||||||
|
procedure SetSITUACIONValue(const aValue: String); virtual;
|
||||||
|
function GetSITUACIONIsNull: Boolean; virtual;
|
||||||
|
procedure SetSITUACIONIsNull(const aValue: Boolean); virtual;
|
||||||
|
|
||||||
|
{ Properties }
|
||||||
|
property ID: Integer read GetIDValue write SetIDValue;
|
||||||
|
property IDIsNull: Boolean read GetIDIsNull write SetIDIsNull;
|
||||||
|
property REFERENCIA: String read GetREFERENCIAValue write SetREFERENCIAValue;
|
||||||
|
property REFERENCIAIsNull: Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
|
||||||
|
property NOMBRE: String read GetNOMBREValue write SetNOMBREValue;
|
||||||
|
property NOMBREIsNull: Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
|
||||||
|
property SITUACION: String read GetSITUACIONValue write SetSITUACIONValue;
|
||||||
|
property SITUACIONIsNull: Boolean read GetSITUACIONIsNull write SetSITUACIONIsNull;
|
||||||
|
|
||||||
|
public
|
||||||
|
constructor Create(aDataTable: TDADataTable); override;
|
||||||
|
destructor Destroy; override;
|
||||||
|
|
||||||
|
end;
|
||||||
|
|
||||||
{ IPedidosCliente }
|
{ IPedidosCliente }
|
||||||
IPedidosCliente = interface(IDAStronglyTypedDataTable)
|
IPedidosCliente = interface(IDAStronglyTypedDataTable)
|
||||||
['{D51AD7F0-21DB-4794-9721-69888B3E52F6}']
|
['{319F8BCF-0CA3-4185-896C-DD22DF9847FD}']
|
||||||
{ Property getters and setters }
|
{ Property getters and setters }
|
||||||
function GetIDValue: Integer;
|
function GetIDValue: Integer;
|
||||||
procedure SetIDValue(const aValue: Integer);
|
procedure SetIDValue(const aValue: Integer);
|
||||||
@ -663,7 +748,7 @@ type
|
|||||||
|
|
||||||
{ IPedidosCliente_Detalles }
|
{ IPedidosCliente_Detalles }
|
||||||
IPedidosCliente_Detalles = interface(IDAStronglyTypedDataTable)
|
IPedidosCliente_Detalles = interface(IDAStronglyTypedDataTable)
|
||||||
['{574ABC3C-F487-4F6C-8D8B-E2C94B8EAA2C}']
|
['{69F92C81-F6E3-4D2C-B8CB-B90ADEC9A021}']
|
||||||
{ Property getters and setters }
|
{ Property getters and setters }
|
||||||
function GetIDValue: Integer;
|
function GetIDValue: Integer;
|
||||||
procedure SetIDValue(const aValue: Integer);
|
procedure SetIDValue(const aValue: Integer);
|
||||||
@ -854,7 +939,7 @@ type
|
|||||||
|
|
||||||
{ IPedidosCliente_Articulos_Pendientes }
|
{ IPedidosCliente_Articulos_Pendientes }
|
||||||
IPedidosCliente_Articulos_Pendientes = interface(IDAStronglyTypedDataTable)
|
IPedidosCliente_Articulos_Pendientes = interface(IDAStronglyTypedDataTable)
|
||||||
['{F94E52AB-7983-45C1-9522-8F8558864380}']
|
['{5EEFF610-2808-4B2C-8C67-842BF7362503}']
|
||||||
{ Property getters and setters }
|
{ Property getters and setters }
|
||||||
function GetID_ARTICULOValue: Integer;
|
function GetID_ARTICULOValue: Integer;
|
||||||
procedure SetID_ARTICULOValue(const aValue: Integer);
|
procedure SetID_ARTICULOValue(const aValue: Integer);
|
||||||
@ -925,7 +1010,7 @@ type
|
|||||||
|
|
||||||
{ IPedidoCliente_ArticulosPendientesPedirAProv }
|
{ IPedidoCliente_ArticulosPendientesPedirAProv }
|
||||||
IPedidoCliente_ArticulosPendientesPedirAProv = interface(IDAStronglyTypedDataTable)
|
IPedidoCliente_ArticulosPendientesPedirAProv = interface(IDAStronglyTypedDataTable)
|
||||||
['{8D82D999-A50C-4EB0-8E4F-1CDF6439C646}']
|
['{7204B7EC-2122-4B60-8D15-24E8F26FD247}']
|
||||||
{ Property getters and setters }
|
{ Property getters and setters }
|
||||||
function GetID_PEDIDOValue: Integer;
|
function GetID_PEDIDOValue: Integer;
|
||||||
procedure SetID_PEDIDOValue(const aValue: Integer);
|
procedure SetID_PEDIDOValue(const aValue: Integer);
|
||||||
@ -1068,7 +1153,7 @@ type
|
|||||||
|
|
||||||
{ IPedidoCliente_ArticulosPendientesPedirAProvNoArticulos }
|
{ IPedidoCliente_ArticulosPendientesPedirAProvNoArticulos }
|
||||||
IPedidoCliente_ArticulosPendientesPedirAProvNoArticulos = interface(IDAStronglyTypedDataTable)
|
IPedidoCliente_ArticulosPendientesPedirAProvNoArticulos = interface(IDAStronglyTypedDataTable)
|
||||||
['{B3551FC7-D507-4452-8454-B2815339D817}']
|
['{C4465D1A-71FC-4F76-BC11-59F1FBCA620D}']
|
||||||
{ Property getters and setters }
|
{ Property getters and setters }
|
||||||
function GetID_PEDIDOValue: Integer;
|
function GetID_PEDIDOValue: Integer;
|
||||||
procedure SetID_PEDIDOValue(const aValue: Integer);
|
procedure SetID_PEDIDOValue(const aValue: Integer);
|
||||||
@ -1246,6 +1331,102 @@ begin
|
|||||||
end;
|
end;
|
||||||
|
|
||||||
|
|
||||||
|
{ TPedidosProveedorDataTableRules }
|
||||||
|
constructor TPedidosProveedorDataTableRules.Create(aDataTable: TDADataTable);
|
||||||
|
begin
|
||||||
|
inherited;
|
||||||
|
end;
|
||||||
|
|
||||||
|
destructor TPedidosProveedorDataTableRules.Destroy;
|
||||||
|
begin
|
||||||
|
inherited;
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TPedidosProveedorDataTableRules.GetIDValue: Integer;
|
||||||
|
begin
|
||||||
|
result := DataTable.Fields[idx_PedidosProveedorID].AsInteger;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TPedidosProveedorDataTableRules.SetIDValue(const aValue: Integer);
|
||||||
|
begin
|
||||||
|
DataTable.Fields[idx_PedidosProveedorID].AsInteger := aValue;
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TPedidosProveedorDataTableRules.GetIDIsNull: boolean;
|
||||||
|
begin
|
||||||
|
result := DataTable.Fields[idx_PedidosProveedorID].IsNull;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TPedidosProveedorDataTableRules.SetIDIsNull(const aValue: Boolean);
|
||||||
|
begin
|
||||||
|
if aValue then
|
||||||
|
DataTable.Fields[idx_PedidosProveedorID].AsVariant := Null;
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TPedidosProveedorDataTableRules.GetREFERENCIAValue: String;
|
||||||
|
begin
|
||||||
|
result := DataTable.Fields[idx_PedidosProveedorREFERENCIA].AsString;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TPedidosProveedorDataTableRules.SetREFERENCIAValue(const aValue: String);
|
||||||
|
begin
|
||||||
|
DataTable.Fields[idx_PedidosProveedorREFERENCIA].AsString := aValue;
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TPedidosProveedorDataTableRules.GetREFERENCIAIsNull: boolean;
|
||||||
|
begin
|
||||||
|
result := DataTable.Fields[idx_PedidosProveedorREFERENCIA].IsNull;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TPedidosProveedorDataTableRules.SetREFERENCIAIsNull(const aValue: Boolean);
|
||||||
|
begin
|
||||||
|
if aValue then
|
||||||
|
DataTable.Fields[idx_PedidosProveedorREFERENCIA].AsVariant := Null;
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TPedidosProveedorDataTableRules.GetNOMBREValue: String;
|
||||||
|
begin
|
||||||
|
result := DataTable.Fields[idx_PedidosProveedorNOMBRE].AsString;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TPedidosProveedorDataTableRules.SetNOMBREValue(const aValue: String);
|
||||||
|
begin
|
||||||
|
DataTable.Fields[idx_PedidosProveedorNOMBRE].AsString := aValue;
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TPedidosProveedorDataTableRules.GetNOMBREIsNull: boolean;
|
||||||
|
begin
|
||||||
|
result := DataTable.Fields[idx_PedidosProveedorNOMBRE].IsNull;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TPedidosProveedorDataTableRules.SetNOMBREIsNull(const aValue: Boolean);
|
||||||
|
begin
|
||||||
|
if aValue then
|
||||||
|
DataTable.Fields[idx_PedidosProveedorNOMBRE].AsVariant := Null;
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TPedidosProveedorDataTableRules.GetSITUACIONValue: String;
|
||||||
|
begin
|
||||||
|
result := DataTable.Fields[idx_PedidosProveedorSITUACION].AsString;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TPedidosProveedorDataTableRules.SetSITUACIONValue(const aValue: String);
|
||||||
|
begin
|
||||||
|
DataTable.Fields[idx_PedidosProveedorSITUACION].AsString := aValue;
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TPedidosProveedorDataTableRules.GetSITUACIONIsNull: boolean;
|
||||||
|
begin
|
||||||
|
result := DataTable.Fields[idx_PedidosProveedorSITUACION].IsNull;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TPedidosProveedorDataTableRules.SetSITUACIONIsNull(const aValue: Boolean);
|
||||||
|
begin
|
||||||
|
if aValue then
|
||||||
|
DataTable.Fields[idx_PedidosProveedorSITUACION].AsVariant := Null;
|
||||||
|
end;
|
||||||
|
|
||||||
|
|
||||||
{ TPedidosClienteDataTableRules }
|
{ TPedidosClienteDataTableRules }
|
||||||
constructor TPedidosClienteDataTableRules.Create(aDataTable: TDADataTable);
|
constructor TPedidosClienteDataTableRules.Create(aDataTable: TDADataTable);
|
||||||
var
|
var
|
||||||
@ -2832,6 +3013,7 @@ end;
|
|||||||
|
|
||||||
initialization
|
initialization
|
||||||
RegisterDataTableRules(RID_ListaAnosPedidos, TListaAnosPedidosDataTableRules);
|
RegisterDataTableRules(RID_ListaAnosPedidos, TListaAnosPedidosDataTableRules);
|
||||||
|
RegisterDataTableRules(RID_PedidosProveedor, TPedidosProveedorDataTableRules);
|
||||||
RegisterDataTableRules(RID_PedidosCliente, TPedidosClienteDataTableRules);
|
RegisterDataTableRules(RID_PedidosCliente, TPedidosClienteDataTableRules);
|
||||||
RegisterDataTableRules(RID_PedidosCliente_Detalles, TPedidosCliente_DetallesDataTableRules);
|
RegisterDataTableRules(RID_PedidosCliente_Detalles, TPedidosCliente_DetallesDataTableRules);
|
||||||
RegisterDataTableRules(RID_PedidosCliente_Articulos_Pendientes, TPedidosCliente_Articulos_PendientesDataTableRules);
|
RegisterDataTableRules(RID_PedidosCliente_Articulos_Pendientes, TPedidosCliente_Articulos_PendientesDataTableRules);
|
||||||
|
|||||||
@ -9,17 +9,18 @@ const
|
|||||||
{ Delta rules ids
|
{ Delta rules ids
|
||||||
Feel free to change them to something more human readable
|
Feel free to change them to something more human readable
|
||||||
but make sure they are unique in the context of your application }
|
but make sure they are unique in the context of your application }
|
||||||
RID_ListaAnosPedidosDelta = '{AFC97261-540F-44C4-9AD7-057298F1B086}';
|
RID_ListaAnosPedidosDelta = '{F7087B26-16C3-4E50-AD14-5EF21B59DB5C}';
|
||||||
RID_PedidosClienteDelta = '{E50F050B-03E8-4C84-91AA-9B8205480C0D}';
|
RID_PedidosProveedorDelta = '{7D954D17-215A-4D4C-A7FE-6BA75062958F}';
|
||||||
RID_PedidosCliente_DetallesDelta = '{506DEE40-B318-405D-BF82-CCE6502097E8}';
|
RID_PedidosClienteDelta = '{9B8545B7-930D-4DF6-B52A-C07AC8BD6EA7}';
|
||||||
RID_PedidosCliente_Articulos_PendientesDelta = '{FB70B126-428D-454B-AA03-814B3F03B317}';
|
RID_PedidosCliente_DetallesDelta = '{99199B9F-C476-4E54-8385-4D894E1E857F}';
|
||||||
RID_PedidoCliente_ArticulosPendientesPedirAProvDelta = '{14A7355B-4DDA-4A3F-AFF0-A0C79E98EE09}';
|
RID_PedidosCliente_Articulos_PendientesDelta = '{21228D66-8988-46CB-AFD0-E265C9D1F4DB}';
|
||||||
RID_PedidoCliente_ArticulosPendientesPedirAProvNoArticulosDelta = '{1D7515BA-4719-4377-BF5D-F3027714E5E8}';
|
RID_PedidoCliente_ArticulosPendientesPedirAProvDelta = '{6A988443-1420-48A3-8E88-444796A56BE1}';
|
||||||
|
RID_PedidoCliente_ArticulosPendientesPedirAProvNoArticulosDelta = '{53B6BA3C-0BC4-40E5-9CB1-04539F4EB028}';
|
||||||
|
|
||||||
type
|
type
|
||||||
{ IListaAnosPedidosDelta }
|
{ IListaAnosPedidosDelta }
|
||||||
IListaAnosPedidosDelta = interface(IListaAnosPedidos)
|
IListaAnosPedidosDelta = interface(IListaAnosPedidos)
|
||||||
['{AFC97261-540F-44C4-9AD7-057298F1B086}']
|
['{F7087B26-16C3-4E50-AD14-5EF21B59DB5C}']
|
||||||
{ Property getters and setters }
|
{ Property getters and setters }
|
||||||
function GetOldANOValue : String;
|
function GetOldANOValue : String;
|
||||||
|
|
||||||
@ -51,9 +52,79 @@ type
|
|||||||
|
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
{ IPedidosProveedorDelta }
|
||||||
|
IPedidosProveedorDelta = interface(IPedidosProveedor)
|
||||||
|
['{7D954D17-215A-4D4C-A7FE-6BA75062958F}']
|
||||||
|
{ Property getters and setters }
|
||||||
|
function GetOldIDValue : Integer;
|
||||||
|
function GetOldREFERENCIAValue : String;
|
||||||
|
function GetOldNOMBREValue : String;
|
||||||
|
function GetOldSITUACIONValue : String;
|
||||||
|
|
||||||
|
{ Properties }
|
||||||
|
property OldID : Integer read GetOldIDValue;
|
||||||
|
property OldREFERENCIA : String read GetOldREFERENCIAValue;
|
||||||
|
property OldNOMBRE : String read GetOldNOMBREValue;
|
||||||
|
property OldSITUACION : String read GetOldSITUACIONValue;
|
||||||
|
end;
|
||||||
|
|
||||||
|
{ TPedidosProveedorBusinessProcessorRules }
|
||||||
|
TPedidosProveedorBusinessProcessorRules = class(TDABusinessProcessorRules, IPedidosProveedor, IPedidosProveedorDelta)
|
||||||
|
private
|
||||||
|
protected
|
||||||
|
{ Property getters and setters }
|
||||||
|
function GetIDValue: Integer; virtual;
|
||||||
|
function GetIDIsNull: Boolean; virtual;
|
||||||
|
function GetOldIDValue: Integer; virtual;
|
||||||
|
function GetOldIDIsNull: Boolean; virtual;
|
||||||
|
procedure SetIDValue(const aValue: Integer); virtual;
|
||||||
|
procedure SetIDIsNull(const aValue: Boolean); virtual;
|
||||||
|
function GetREFERENCIAValue: String; virtual;
|
||||||
|
function GetREFERENCIAIsNull: Boolean; virtual;
|
||||||
|
function GetOldREFERENCIAValue: String; virtual;
|
||||||
|
function GetOldREFERENCIAIsNull: Boolean; virtual;
|
||||||
|
procedure SetREFERENCIAValue(const aValue: String); virtual;
|
||||||
|
procedure SetREFERENCIAIsNull(const aValue: Boolean); virtual;
|
||||||
|
function GetNOMBREValue: String; virtual;
|
||||||
|
function GetNOMBREIsNull: Boolean; virtual;
|
||||||
|
function GetOldNOMBREValue: String; virtual;
|
||||||
|
function GetOldNOMBREIsNull: Boolean; virtual;
|
||||||
|
procedure SetNOMBREValue(const aValue: String); virtual;
|
||||||
|
procedure SetNOMBREIsNull(const aValue: Boolean); virtual;
|
||||||
|
function GetSITUACIONValue: String; virtual;
|
||||||
|
function GetSITUACIONIsNull: Boolean; virtual;
|
||||||
|
function GetOldSITUACIONValue: String; virtual;
|
||||||
|
function GetOldSITUACIONIsNull: Boolean; virtual;
|
||||||
|
procedure SetSITUACIONValue(const aValue: String); virtual;
|
||||||
|
procedure SetSITUACIONIsNull(const aValue: Boolean); virtual;
|
||||||
|
|
||||||
|
{ Properties }
|
||||||
|
property ID : Integer read GetIDValue write SetIDValue;
|
||||||
|
property IDIsNull : Boolean read GetIDIsNull write SetIDIsNull;
|
||||||
|
property OldID : Integer read GetOldIDValue;
|
||||||
|
property OldIDIsNull : Boolean read GetOldIDIsNull;
|
||||||
|
property REFERENCIA : String read GetREFERENCIAValue write SetREFERENCIAValue;
|
||||||
|
property REFERENCIAIsNull : Boolean read GetREFERENCIAIsNull write SetREFERENCIAIsNull;
|
||||||
|
property OldREFERENCIA : String read GetOldREFERENCIAValue;
|
||||||
|
property OldREFERENCIAIsNull : Boolean read GetOldREFERENCIAIsNull;
|
||||||
|
property NOMBRE : String read GetNOMBREValue write SetNOMBREValue;
|
||||||
|
property NOMBREIsNull : Boolean read GetNOMBREIsNull write SetNOMBREIsNull;
|
||||||
|
property OldNOMBRE : String read GetOldNOMBREValue;
|
||||||
|
property OldNOMBREIsNull : Boolean read GetOldNOMBREIsNull;
|
||||||
|
property SITUACION : String read GetSITUACIONValue write SetSITUACIONValue;
|
||||||
|
property SITUACIONIsNull : Boolean read GetSITUACIONIsNull write SetSITUACIONIsNull;
|
||||||
|
property OldSITUACION : String read GetOldSITUACIONValue;
|
||||||
|
property OldSITUACIONIsNull : Boolean read GetOldSITUACIONIsNull;
|
||||||
|
|
||||||
|
public
|
||||||
|
constructor Create(aBusinessProcessor: TDABusinessProcessor); override;
|
||||||
|
destructor Destroy; override;
|
||||||
|
|
||||||
|
end;
|
||||||
|
|
||||||
{ IPedidosClienteDelta }
|
{ IPedidosClienteDelta }
|
||||||
IPedidosClienteDelta = interface(IPedidosCliente)
|
IPedidosClienteDelta = interface(IPedidosCliente)
|
||||||
['{E50F050B-03E8-4C84-91AA-9B8205480C0D}']
|
['{9B8545B7-930D-4DF6-B52A-C07AC8BD6EA7}']
|
||||||
{ Property getters and setters }
|
{ Property getters and setters }
|
||||||
function GetOldIDValue : Integer;
|
function GetOldIDValue : Integer;
|
||||||
function GetOldID_EMPRESAValue : Integer;
|
function GetOldID_EMPRESAValue : Integer;
|
||||||
@ -485,7 +556,7 @@ type
|
|||||||
|
|
||||||
{ IPedidosCliente_DetallesDelta }
|
{ IPedidosCliente_DetallesDelta }
|
||||||
IPedidosCliente_DetallesDelta = interface(IPedidosCliente_Detalles)
|
IPedidosCliente_DetallesDelta = interface(IPedidosCliente_Detalles)
|
||||||
['{506DEE40-B318-405D-BF82-CCE6502097E8}']
|
['{99199B9F-C476-4E54-8385-4D894E1E857F}']
|
||||||
{ Property getters and setters }
|
{ Property getters and setters }
|
||||||
function GetOldIDValue : Integer;
|
function GetOldIDValue : Integer;
|
||||||
function GetOldID_PEDIDOValue : Integer;
|
function GetOldID_PEDIDOValue : Integer;
|
||||||
@ -675,7 +746,7 @@ type
|
|||||||
|
|
||||||
{ IPedidosCliente_Articulos_PendientesDelta }
|
{ IPedidosCliente_Articulos_PendientesDelta }
|
||||||
IPedidosCliente_Articulos_PendientesDelta = interface(IPedidosCliente_Articulos_Pendientes)
|
IPedidosCliente_Articulos_PendientesDelta = interface(IPedidosCliente_Articulos_Pendientes)
|
||||||
['{FB70B126-428D-454B-AA03-814B3F03B317}']
|
['{21228D66-8988-46CB-AFD0-E265C9D1F4DB}']
|
||||||
{ Property getters and setters }
|
{ Property getters and setters }
|
||||||
function GetOldID_ARTICULOValue : Integer;
|
function GetOldID_ARTICULOValue : Integer;
|
||||||
function GetOldCANTIDAD_PEDValue : Currency;
|
function GetOldCANTIDAD_PEDValue : Currency;
|
||||||
@ -745,7 +816,7 @@ type
|
|||||||
|
|
||||||
{ IPedidoCliente_ArticulosPendientesPedirAProvDelta }
|
{ IPedidoCliente_ArticulosPendientesPedirAProvDelta }
|
||||||
IPedidoCliente_ArticulosPendientesPedirAProvDelta = interface(IPedidoCliente_ArticulosPendientesPedirAProv)
|
IPedidoCliente_ArticulosPendientesPedirAProvDelta = interface(IPedidoCliente_ArticulosPendientesPedirAProv)
|
||||||
['{14A7355B-4DDA-4A3F-AFF0-A0C79E98EE09}']
|
['{6A988443-1420-48A3-8E88-444796A56BE1}']
|
||||||
{ Property getters and setters }
|
{ Property getters and setters }
|
||||||
function GetOldID_PEDIDOValue : Integer;
|
function GetOldID_PEDIDOValue : Integer;
|
||||||
function GetOldID_ARTICULOValue : Integer;
|
function GetOldID_ARTICULOValue : Integer;
|
||||||
@ -887,7 +958,7 @@ type
|
|||||||
|
|
||||||
{ IPedidoCliente_ArticulosPendientesPedirAProvNoArticulosDelta }
|
{ IPedidoCliente_ArticulosPendientesPedirAProvNoArticulosDelta }
|
||||||
IPedidoCliente_ArticulosPendientesPedirAProvNoArticulosDelta = interface(IPedidoCliente_ArticulosPendientesPedirAProvNoArticulos)
|
IPedidoCliente_ArticulosPendientesPedirAProvNoArticulosDelta = interface(IPedidoCliente_ArticulosPendientesPedirAProvNoArticulos)
|
||||||
['{1D7515BA-4719-4377-BF5D-F3027714E5E8}']
|
['{53B6BA3C-0BC4-40E5-9CB1-04539F4EB028}']
|
||||||
{ Property getters and setters }
|
{ Property getters and setters }
|
||||||
function GetOldID_PEDIDOValue : Integer;
|
function GetOldID_PEDIDOValue : Integer;
|
||||||
function GetOldID_ARTICULOValue : Integer;
|
function GetOldID_ARTICULOValue : Integer;
|
||||||
@ -1075,6 +1146,142 @@ begin
|
|||||||
end;
|
end;
|
||||||
|
|
||||||
|
|
||||||
|
{ TPedidosProveedorBusinessProcessorRules }
|
||||||
|
constructor TPedidosProveedorBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);
|
||||||
|
begin
|
||||||
|
inherited;
|
||||||
|
end;
|
||||||
|
|
||||||
|
destructor TPedidosProveedorBusinessProcessorRules.Destroy;
|
||||||
|
begin
|
||||||
|
inherited;
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TPedidosProveedorBusinessProcessorRules.GetIDValue: Integer;
|
||||||
|
begin
|
||||||
|
result := BusinessProcessor.CurrentChange.NewValueByName[fld_PedidosProveedorID];
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TPedidosProveedorBusinessProcessorRules.GetIDIsNull: Boolean;
|
||||||
|
begin
|
||||||
|
result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_PedidosProveedorID]);
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TPedidosProveedorBusinessProcessorRules.GetOldIDValue: Integer;
|
||||||
|
begin
|
||||||
|
result := BusinessProcessor.CurrentChange.OldValueByName[fld_PedidosProveedorID];
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TPedidosProveedorBusinessProcessorRules.GetOldIDIsNull: Boolean;
|
||||||
|
begin
|
||||||
|
result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_PedidosProveedorID]);
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TPedidosProveedorBusinessProcessorRules.SetIDValue(const aValue: Integer);
|
||||||
|
begin
|
||||||
|
BusinessProcessor.CurrentChange.NewValueByName[fld_PedidosProveedorID] := aValue;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TPedidosProveedorBusinessProcessorRules.SetIDIsNull(const aValue: Boolean);
|
||||||
|
begin
|
||||||
|
if aValue then
|
||||||
|
BusinessProcessor.CurrentChange.NewValueByName[fld_PedidosProveedorID] := Null;
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TPedidosProveedorBusinessProcessorRules.GetREFERENCIAValue: String;
|
||||||
|
begin
|
||||||
|
result := BusinessProcessor.CurrentChange.NewValueByName[fld_PedidosProveedorREFERENCIA];
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TPedidosProveedorBusinessProcessorRules.GetREFERENCIAIsNull: Boolean;
|
||||||
|
begin
|
||||||
|
result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_PedidosProveedorREFERENCIA]);
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TPedidosProveedorBusinessProcessorRules.GetOldREFERENCIAValue: String;
|
||||||
|
begin
|
||||||
|
result := BusinessProcessor.CurrentChange.OldValueByName[fld_PedidosProveedorREFERENCIA];
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TPedidosProveedorBusinessProcessorRules.GetOldREFERENCIAIsNull: Boolean;
|
||||||
|
begin
|
||||||
|
result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_PedidosProveedorREFERENCIA]);
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TPedidosProveedorBusinessProcessorRules.SetREFERENCIAValue(const aValue: String);
|
||||||
|
begin
|
||||||
|
BusinessProcessor.CurrentChange.NewValueByName[fld_PedidosProveedorREFERENCIA] := aValue;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TPedidosProveedorBusinessProcessorRules.SetREFERENCIAIsNull(const aValue: Boolean);
|
||||||
|
begin
|
||||||
|
if aValue then
|
||||||
|
BusinessProcessor.CurrentChange.NewValueByName[fld_PedidosProveedorREFERENCIA] := Null;
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TPedidosProveedorBusinessProcessorRules.GetNOMBREValue: String;
|
||||||
|
begin
|
||||||
|
result := BusinessProcessor.CurrentChange.NewValueByName[fld_PedidosProveedorNOMBRE];
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TPedidosProveedorBusinessProcessorRules.GetNOMBREIsNull: Boolean;
|
||||||
|
begin
|
||||||
|
result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_PedidosProveedorNOMBRE]);
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TPedidosProveedorBusinessProcessorRules.GetOldNOMBREValue: String;
|
||||||
|
begin
|
||||||
|
result := BusinessProcessor.CurrentChange.OldValueByName[fld_PedidosProveedorNOMBRE];
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TPedidosProveedorBusinessProcessorRules.GetOldNOMBREIsNull: Boolean;
|
||||||
|
begin
|
||||||
|
result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_PedidosProveedorNOMBRE]);
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TPedidosProveedorBusinessProcessorRules.SetNOMBREValue(const aValue: String);
|
||||||
|
begin
|
||||||
|
BusinessProcessor.CurrentChange.NewValueByName[fld_PedidosProveedorNOMBRE] := aValue;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TPedidosProveedorBusinessProcessorRules.SetNOMBREIsNull(const aValue: Boolean);
|
||||||
|
begin
|
||||||
|
if aValue then
|
||||||
|
BusinessProcessor.CurrentChange.NewValueByName[fld_PedidosProveedorNOMBRE] := Null;
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TPedidosProveedorBusinessProcessorRules.GetSITUACIONValue: String;
|
||||||
|
begin
|
||||||
|
result := BusinessProcessor.CurrentChange.NewValueByName[fld_PedidosProveedorSITUACION];
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TPedidosProveedorBusinessProcessorRules.GetSITUACIONIsNull: Boolean;
|
||||||
|
begin
|
||||||
|
result := VarIsNull(BusinessProcessor.CurrentChange.NewValueByName[fld_PedidosProveedorSITUACION]);
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TPedidosProveedorBusinessProcessorRules.GetOldSITUACIONValue: String;
|
||||||
|
begin
|
||||||
|
result := BusinessProcessor.CurrentChange.OldValueByName[fld_PedidosProveedorSITUACION];
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TPedidosProveedorBusinessProcessorRules.GetOldSITUACIONIsNull: Boolean;
|
||||||
|
begin
|
||||||
|
result := VarIsNull(BusinessProcessor.CurrentChange.OldValueByName[fld_PedidosProveedorSITUACION]);
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TPedidosProveedorBusinessProcessorRules.SetSITUACIONValue(const aValue: String);
|
||||||
|
begin
|
||||||
|
BusinessProcessor.CurrentChange.NewValueByName[fld_PedidosProveedorSITUACION] := aValue;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TPedidosProveedorBusinessProcessorRules.SetSITUACIONIsNull(const aValue: Boolean);
|
||||||
|
begin
|
||||||
|
if aValue then
|
||||||
|
BusinessProcessor.CurrentChange.NewValueByName[fld_PedidosProveedorSITUACION] := Null;
|
||||||
|
end;
|
||||||
|
|
||||||
|
|
||||||
{ TPedidosClienteBusinessProcessorRules }
|
{ TPedidosClienteBusinessProcessorRules }
|
||||||
constructor TPedidosClienteBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);
|
constructor TPedidosClienteBusinessProcessorRules.Create(aBusinessProcessor: TDABusinessProcessor);
|
||||||
var
|
var
|
||||||
@ -3383,6 +3590,7 @@ end;
|
|||||||
|
|
||||||
initialization
|
initialization
|
||||||
RegisterBusinessProcessorRules(RID_ListaAnosPedidosDelta, TListaAnosPedidosBusinessProcessorRules);
|
RegisterBusinessProcessorRules(RID_ListaAnosPedidosDelta, TListaAnosPedidosBusinessProcessorRules);
|
||||||
|
RegisterBusinessProcessorRules(RID_PedidosProveedorDelta, TPedidosProveedorBusinessProcessorRules);
|
||||||
RegisterBusinessProcessorRules(RID_PedidosClienteDelta, TPedidosClienteBusinessProcessorRules);
|
RegisterBusinessProcessorRules(RID_PedidosClienteDelta, TPedidosClienteBusinessProcessorRules);
|
||||||
RegisterBusinessProcessorRules(RID_PedidosCliente_DetallesDelta, TPedidosCliente_DetallesBusinessProcessorRules);
|
RegisterBusinessProcessorRules(RID_PedidosCliente_DetallesDelta, TPedidosCliente_DetallesBusinessProcessorRules);
|
||||||
RegisterBusinessProcessorRules(RID_PedidosCliente_Articulos_PendientesDelta, TPedidosCliente_Articulos_PendientesBusinessProcessorRules);
|
RegisterBusinessProcessorRules(RID_PedidosCliente_Articulos_PendientesDelta, TPedidosCliente_Articulos_PendientesBusinessProcessorRules);
|
||||||
|
|||||||
@ -26,6 +26,13 @@
|
|||||||
<Projects Include="..\Inventario\Controller\Inventario_controller.dproj" />
|
<Projects Include="..\Inventario\Controller\Inventario_controller.dproj" />
|
||||||
<Projects Include="..\Inventario\Data\Inventario_data.dproj" />
|
<Projects Include="..\Inventario\Data\Inventario_data.dproj" />
|
||||||
<Projects Include="..\Inventario\Views\Inventario_view.dproj" />
|
<Projects Include="..\Inventario\Views\Inventario_view.dproj" />
|
||||||
|
<Projects Include="..\Pedidos a proveedor\Controller\PedidosProveedor_controller.dproj" />
|
||||||
|
<Projects Include="..\Pedidos a proveedor\Data\PedidosProveedor_data.dproj" />
|
||||||
|
<Projects Include="..\Pedidos a proveedor\Model\PedidosProveedor_model.dproj" />
|
||||||
|
<Projects Include="..\Pedidos a proveedor\Plugin\PedidosProveedor_plugin.dproj" />
|
||||||
|
<Projects Include="..\ProcesoPresupuestoCliente\Controller\ProcesoPresupuestosCliente_controller.dproj" />
|
||||||
|
<Projects Include="..\ProcesoPresupuestoCliente\Plugin\ProcesoPresupuestosCliente_plugin.dproj" />
|
||||||
|
<Projects Include="..\ProcesoPresupuestoCliente\Views\ProcesoPresupuestosCliente_view.dproj" />
|
||||||
<Projects Include="..\Relaciones\Pedidos de cliente - Albaranes de cliente\PedCli_AlbCli_relation.dproj" />
|
<Projects Include="..\Relaciones\Pedidos de cliente - Albaranes de cliente\PedCli_AlbCli_relation.dproj" />
|
||||||
<Projects Include="..\Relaciones\Pedidos de cliente - Pedidos a proveedor\PedCli_PedProv_relation.dproj" />
|
<Projects Include="..\Relaciones\Pedidos de cliente - Pedidos a proveedor\PedCli_PedProv_relation.dproj" />
|
||||||
<Projects Include="..\Relaciones\Pedidos de proveedor - Albaranes de proveedor\PedProv_AlbProv_relation.dproj" />
|
<Projects Include="..\Relaciones\Pedidos de proveedor - Albaranes de proveedor\PedProv_AlbProv_relation.dproj" />
|
||||||
@ -311,14 +318,77 @@
|
|||||||
<Target Name="FacturasCliente_view:Make">
|
<Target Name="FacturasCliente_view:Make">
|
||||||
<MSBuild Projects="..\Facturas de cliente\Views\FacturasCliente_view.dproj" Targets="Make" />
|
<MSBuild Projects="..\Facturas de cliente\Views\FacturasCliente_view.dproj" Targets="Make" />
|
||||||
</Target>
|
</Target>
|
||||||
|
<Target Name="PedidosProveedor_model">
|
||||||
|
<MSBuild Projects="..\Pedidos a proveedor\Model\PedidosProveedor_model.dproj" Targets="" />
|
||||||
|
</Target>
|
||||||
|
<Target Name="PedidosProveedor_model:Clean">
|
||||||
|
<MSBuild Projects="..\Pedidos a proveedor\Model\PedidosProveedor_model.dproj" Targets="Clean" />
|
||||||
|
</Target>
|
||||||
|
<Target Name="PedidosProveedor_model:Make">
|
||||||
|
<MSBuild Projects="..\Pedidos a proveedor\Model\PedidosProveedor_model.dproj" Targets="Make" />
|
||||||
|
</Target>
|
||||||
|
<Target Name="PedidosProveedor_data">
|
||||||
|
<MSBuild Projects="..\Pedidos a proveedor\Data\PedidosProveedor_data.dproj" Targets="" />
|
||||||
|
</Target>
|
||||||
|
<Target Name="PedidosProveedor_data:Clean">
|
||||||
|
<MSBuild Projects="..\Pedidos a proveedor\Data\PedidosProveedor_data.dproj" Targets="Clean" />
|
||||||
|
</Target>
|
||||||
|
<Target Name="PedidosProveedor_data:Make">
|
||||||
|
<MSBuild Projects="..\Pedidos a proveedor\Data\PedidosProveedor_data.dproj" Targets="Make" />
|
||||||
|
</Target>
|
||||||
|
<Target Name="PedidosProveedor_controller">
|
||||||
|
<MSBuild Projects="..\Pedidos a proveedor\Controller\PedidosProveedor_controller.dproj" Targets="" />
|
||||||
|
</Target>
|
||||||
|
<Target Name="PedidosProveedor_controller:Clean">
|
||||||
|
<MSBuild Projects="..\Pedidos a proveedor\Controller\PedidosProveedor_controller.dproj" Targets="Clean" />
|
||||||
|
</Target>
|
||||||
|
<Target Name="PedidosProveedor_controller:Make">
|
||||||
|
<MSBuild Projects="..\Pedidos a proveedor\Controller\PedidosProveedor_controller.dproj" Targets="Make" />
|
||||||
|
</Target>
|
||||||
|
<Target Name="PedidosProveedor_plugin">
|
||||||
|
<MSBuild Projects="..\Pedidos a proveedor\Plugin\PedidosProveedor_plugin.dproj" Targets="" />
|
||||||
|
</Target>
|
||||||
|
<Target Name="PedidosProveedor_plugin:Clean">
|
||||||
|
<MSBuild Projects="..\Pedidos a proveedor\Plugin\PedidosProveedor_plugin.dproj" Targets="Clean" />
|
||||||
|
</Target>
|
||||||
|
<Target Name="PedidosProveedor_plugin:Make">
|
||||||
|
<MSBuild Projects="..\Pedidos a proveedor\Plugin\PedidosProveedor_plugin.dproj" Targets="Make" />
|
||||||
|
</Target>
|
||||||
|
<Target Name="ProcesoPresupuestosCliente_controller">
|
||||||
|
<MSBuild Projects="..\ProcesoPresupuestoCliente\Controller\ProcesoPresupuestosCliente_controller.dproj" Targets="" />
|
||||||
|
</Target>
|
||||||
|
<Target Name="ProcesoPresupuestosCliente_controller:Clean">
|
||||||
|
<MSBuild Projects="..\ProcesoPresupuestoCliente\Controller\ProcesoPresupuestosCliente_controller.dproj" Targets="Clean" />
|
||||||
|
</Target>
|
||||||
|
<Target Name="ProcesoPresupuestosCliente_controller:Make">
|
||||||
|
<MSBuild Projects="..\ProcesoPresupuestoCliente\Controller\ProcesoPresupuestosCliente_controller.dproj" Targets="Make" />
|
||||||
|
</Target>
|
||||||
|
<Target Name="ProcesoPresupuestosCliente_view">
|
||||||
|
<MSBuild Projects="..\ProcesoPresupuestoCliente\Views\ProcesoPresupuestosCliente_view.dproj" Targets="" />
|
||||||
|
</Target>
|
||||||
|
<Target Name="ProcesoPresupuestosCliente_view:Clean">
|
||||||
|
<MSBuild Projects="..\ProcesoPresupuestoCliente\Views\ProcesoPresupuestosCliente_view.dproj" Targets="Clean" />
|
||||||
|
</Target>
|
||||||
|
<Target Name="ProcesoPresupuestosCliente_view:Make">
|
||||||
|
<MSBuild Projects="..\ProcesoPresupuestoCliente\Views\ProcesoPresupuestosCliente_view.dproj" Targets="Make" />
|
||||||
|
</Target>
|
||||||
|
<Target Name="ProcesoPresupuestosCliente_plugin">
|
||||||
|
<MSBuild Projects="..\ProcesoPresupuestoCliente\Plugin\ProcesoPresupuestosCliente_plugin.dproj" Targets="" />
|
||||||
|
</Target>
|
||||||
|
<Target Name="ProcesoPresupuestosCliente_plugin:Clean">
|
||||||
|
<MSBuild Projects="..\ProcesoPresupuestoCliente\Plugin\ProcesoPresupuestosCliente_plugin.dproj" Targets="Clean" />
|
||||||
|
</Target>
|
||||||
|
<Target Name="ProcesoPresupuestosCliente_plugin:Make">
|
||||||
|
<MSBuild Projects="..\ProcesoPresupuestoCliente\Plugin\ProcesoPresupuestosCliente_plugin.dproj" Targets="Make" />
|
||||||
|
</Target>
|
||||||
<Target Name="Build">
|
<Target Name="Build">
|
||||||
<CallTarget Targets="Base;GUIBase;ApplicationBase;Contactos_model;Contactos_data;Contactos_controller;Contactos_view;Articulos_model;Articulos_data;Articulos_controller;Articulos_view;PedidosCliente_model;PedidosCliente_data;PedidosCliente_controller;AlbaranesProveedor_controller;Inventario_controller;PedProv_AlbProv_relation;PedCli_AlbCli_relation;PedCli_PedProv_relation;FacturasProveedor_controller;PedidosCliente_view;PedidosCliente_plugin;AlbaranesProveedor_data;AlbaranesCliente_data;FactuGES;FactuGES_Server;Inventario_data;Inventario_view;AlbaranesProveedor_view;FacturasCliente_view" />
|
<CallTarget Targets="Base;GUIBase;ApplicationBase;Contactos_model;Contactos_data;Contactos_controller;Contactos_view;Articulos_model;Articulos_data;Articulos_controller;Articulos_view;PedidosCliente_model;PedidosCliente_data;PedidosCliente_controller;AlbaranesProveedor_controller;Inventario_controller;PedProv_AlbProv_relation;PedCli_AlbCli_relation;PedCli_PedProv_relation;FacturasProveedor_controller;PedidosCliente_view;PedidosCliente_plugin;AlbaranesProveedor_data;AlbaranesCliente_data;FactuGES;FactuGES_Server;Inventario_data;Inventario_view;AlbaranesProveedor_view;FacturasCliente_view;PedidosProveedor_model;PedidosProveedor_data;PedidosProveedor_controller;PedidosProveedor_plugin;ProcesoPresupuestosCliente_controller;ProcesoPresupuestosCliente_view;ProcesoPresupuestosCliente_plugin" />
|
||||||
</Target>
|
</Target>
|
||||||
<Target Name="Clean">
|
<Target Name="Clean">
|
||||||
<CallTarget Targets="Base:Clean;GUIBase:Clean;ApplicationBase:Clean;Contactos_model:Clean;Contactos_data:Clean;Contactos_controller:Clean;Contactos_view:Clean;Articulos_model:Clean;Articulos_data:Clean;Articulos_controller:Clean;Articulos_view:Clean;PedidosCliente_model:Clean;PedidosCliente_data:Clean;PedidosCliente_controller:Clean;AlbaranesProveedor_controller:Clean;Inventario_controller:Clean;PedProv_AlbProv_relation:Clean;PedCli_AlbCli_relation:Clean;PedCli_PedProv_relation:Clean;FacturasProveedor_controller:Clean;PedidosCliente_view:Clean;PedidosCliente_plugin:Clean;AlbaranesProveedor_data:Clean;AlbaranesCliente_data:Clean;FactuGES:Clean;FactuGES_Server:Clean;Inventario_data:Clean;Inventario_view:Clean;AlbaranesProveedor_view:Clean;FacturasCliente_view:Clean" />
|
<CallTarget Targets="Base:Clean;GUIBase:Clean;ApplicationBase:Clean;Contactos_model:Clean;Contactos_data:Clean;Contactos_controller:Clean;Contactos_view:Clean;Articulos_model:Clean;Articulos_data:Clean;Articulos_controller:Clean;Articulos_view:Clean;PedidosCliente_model:Clean;PedidosCliente_data:Clean;PedidosCliente_controller:Clean;AlbaranesProveedor_controller:Clean;Inventario_controller:Clean;PedProv_AlbProv_relation:Clean;PedCli_AlbCli_relation:Clean;PedCli_PedProv_relation:Clean;FacturasProveedor_controller:Clean;PedidosCliente_view:Clean;PedidosCliente_plugin:Clean;AlbaranesProveedor_data:Clean;AlbaranesCliente_data:Clean;FactuGES:Clean;FactuGES_Server:Clean;Inventario_data:Clean;Inventario_view:Clean;AlbaranesProveedor_view:Clean;FacturasCliente_view:Clean;PedidosProveedor_model:Clean;PedidosProveedor_data:Clean;PedidosProveedor_controller:Clean;PedidosProveedor_plugin:Clean;ProcesoPresupuestosCliente_controller:Clean;ProcesoPresupuestosCliente_view:Clean;ProcesoPresupuestosCliente_plugin:Clean" />
|
||||||
</Target>
|
</Target>
|
||||||
<Target Name="Make">
|
<Target Name="Make">
|
||||||
<CallTarget Targets="Base:Make;GUIBase:Make;ApplicationBase:Make;Contactos_model:Make;Contactos_data:Make;Contactos_controller:Make;Contactos_view:Make;Articulos_model:Make;Articulos_data:Make;Articulos_controller:Make;Articulos_view:Make;PedidosCliente_model:Make;PedidosCliente_data:Make;PedidosCliente_controller:Make;AlbaranesProveedor_controller:Make;Inventario_controller:Make;PedProv_AlbProv_relation:Make;PedCli_AlbCli_relation:Make;PedCli_PedProv_relation:Make;FacturasProveedor_controller:Make;PedidosCliente_view:Make;PedidosCliente_plugin:Make;AlbaranesProveedor_data:Make;AlbaranesCliente_data:Make;FactuGES:Make;FactuGES_Server:Make;Inventario_data:Make;Inventario_view:Make;AlbaranesProveedor_view:Make;FacturasCliente_view:Make" />
|
<CallTarget Targets="Base:Make;GUIBase:Make;ApplicationBase:Make;Contactos_model:Make;Contactos_data:Make;Contactos_controller:Make;Contactos_view:Make;Articulos_model:Make;Articulos_data:Make;Articulos_controller:Make;Articulos_view:Make;PedidosCliente_model:Make;PedidosCliente_data:Make;PedidosCliente_controller:Make;AlbaranesProveedor_controller:Make;Inventario_controller:Make;PedProv_AlbProv_relation:Make;PedCli_AlbCli_relation:Make;PedCli_PedProv_relation:Make;FacturasProveedor_controller:Make;PedidosCliente_view:Make;PedidosCliente_plugin:Make;AlbaranesProveedor_data:Make;AlbaranesCliente_data:Make;FactuGES:Make;FactuGES_Server:Make;Inventario_data:Make;Inventario_view:Make;AlbaranesProveedor_view:Make;FacturasCliente_view:Make;PedidosProveedor_model:Make;PedidosProveedor_data:Make;PedidosProveedor_controller:Make;PedidosProveedor_plugin:Make;ProcesoPresupuestosCliente_controller:Make;ProcesoPresupuestosCliente_view:Make;ProcesoPresupuestosCliente_plugin:Make" />
|
||||||
</Target>
|
</Target>
|
||||||
<Import Condition="Exists('$(MSBuildBinPath)\Borland.Group.Targets')" Project="$(MSBuildBinPath)\Borland.Group.Targets" />
|
<Import Condition="Exists('$(MSBuildBinPath)\Borland.Group.Targets')" Project="$(MSBuildBinPath)\Borland.Group.Targets" />
|
||||||
</Project>
|
</Project>
|
||||||
@ -14,4 +14,4 @@ END
|
|||||||
|
|
||||||
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Plugin\uPluginPedidosCliente.dfm */
|
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Plugin\uPluginPedidosCliente.dfm */
|
||||||
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Plugin\PedidosCliente_plugin.RES */
|
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Plugin\PedidosCliente_plugin.RES */
|
||||||
/* c:\temp\dtf6F0.tmp */
|
/* c:\temp\dtfB83.tmp */
|
||||||
|
|||||||
@ -39,6 +39,58 @@ object srvPedidosCliente: TsrvPedidosCliente
|
|||||||
Size = 254
|
Size = 254
|
||||||
end>
|
end>
|
||||||
end
|
end
|
||||||
|
item
|
||||||
|
Params = <>
|
||||||
|
Statements = <
|
||||||
|
item
|
||||||
|
Connection = 'IBX'
|
||||||
|
ConnectionType = 'Interbase'
|
||||||
|
Default = True
|
||||||
|
Name = 'IBX'
|
||||||
|
SQL =
|
||||||
|
'select'#10'ID, REFERENCIA, NOMBRE, SITUACION'#10'from V_PEDIDOS_PROVEEDO' +
|
||||||
|
'R'#10
|
||||||
|
StatementType = stSQL
|
||||||
|
ColumnMappings = <
|
||||||
|
item
|
||||||
|
DatasetField = 'ID'
|
||||||
|
TableField = 'ID'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'REFERENCIA'
|
||||||
|
TableField = 'REFERENCIA'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'NOMBRE'
|
||||||
|
TableField = 'NOMBRE'
|
||||||
|
end
|
||||||
|
item
|
||||||
|
DatasetField = 'SITUACION'
|
||||||
|
TableField = 'SITUACION'
|
||||||
|
end>
|
||||||
|
end>
|
||||||
|
Name = 'PedidosProveedor'
|
||||||
|
Fields = <
|
||||||
|
item
|
||||||
|
Name = 'ID'
|
||||||
|
DataType = datInteger
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'REFERENCIA'
|
||||||
|
DataType = datString
|
||||||
|
Size = 255
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'NOMBRE'
|
||||||
|
DataType = datString
|
||||||
|
Size = 255
|
||||||
|
end
|
||||||
|
item
|
||||||
|
Name = 'SITUACION'
|
||||||
|
DataType = datString
|
||||||
|
Size = 9
|
||||||
|
end>
|
||||||
|
end
|
||||||
item
|
item
|
||||||
Params = <>
|
Params = <>
|
||||||
Statements = <
|
Statements = <
|
||||||
|
|||||||
@ -101,9 +101,6 @@ contains
|
|||||||
uEditorDireccionEntregaPedidoCliente in 'uEditorDireccionEntregaPedidoCliente.pas' {frEditorDireccionEntregaPedidoCliente: TForm},
|
uEditorDireccionEntregaPedidoCliente in 'uEditorDireccionEntregaPedidoCliente.pas' {frEditorDireccionEntregaPedidoCliente: TForm},
|
||||||
uEditorElegirArticulosPedidoCliente in 'uEditorElegirArticulosPedidoCliente.pas' {frEditorElegirArticulosPedidoCliente: TForm},
|
uEditorElegirArticulosPedidoCliente in 'uEditorElegirArticulosPedidoCliente.pas' {frEditorElegirArticulosPedidoCliente: TForm},
|
||||||
uEditorPedidosClienteReport in 'uEditorPedidosClienteReport.pas' {frEditorPedidosClienteReport: T},
|
uEditorPedidosClienteReport in 'uEditorPedidosClienteReport.pas' {frEditorPedidosClienteReport: T},
|
||||||
uDialogListaPedidosClienteEnvioEMail in 'uDialogListaPedidosClienteEnvioEMail.pas' {frDialogListaPedidosClienteEnvioEMail: T},
|
uDialogListaPedidosClienteEnvioEMail in 'uDialogListaPedidosClienteEnvioEMail.pas' {frDialogListaPedidosClienteEnvioEMail: T};
|
||||||
uDialogOpcionesProcesoPedidoCliente in 'uDialogOpcionesProcesoPedidoCliente.pas' {fDialogOpcionesProcesoPedidoCliente: TfEditorPedidosProveedor},
|
|
||||||
uEditorListadoProcesoPedidoCliente in 'uEditorListadoProcesoPedidoCliente.pas' {fEditorListadoProcesoPedidoCliente: TfEditorPedidosProveedor},
|
|
||||||
uViewListadoProcesoPedidoCliente in 'uViewListadoProcesoPedidoCliente.pas' {frViewListadoProcesoPedidoCliente: TFrame};
|
|
||||||
|
|
||||||
end.
|
end.
|
||||||
|
|||||||
@ -119,8 +119,8 @@
|
|||||||
<DesignClass>TfEditorPedidosProveedor</DesignClass>
|
<DesignClass>TfEditorPedidosProveedor</DesignClass>
|
||||||
</DCCReference>
|
</DCCReference>
|
||||||
<DCCReference Include="uDialogOpcionesProcesoPedidoCliente.pas">
|
<DCCReference Include="uDialogOpcionesProcesoPedidoCliente.pas">
|
||||||
<Form>fDialogOpcionesProcesoPedidoCliente</Form>
|
|
||||||
<DesignClass>TfEditorPedidosProveedor</DesignClass>
|
<DesignClass>TfEditorPedidosProveedor</DesignClass>
|
||||||
|
<Form>fDialogOpcionesProcesoPedidoCliente</Form>
|
||||||
</DCCReference>
|
</DCCReference>
|
||||||
<DCCReference Include="uEditorDireccionEntregaPedidoCliente.pas">
|
<DCCReference Include="uEditorDireccionEntregaPedidoCliente.pas">
|
||||||
<Form>frEditorDireccionEntregaPedidoCliente</Form>
|
<Form>frEditorDireccionEntregaPedidoCliente</Form>
|
||||||
@ -130,10 +130,6 @@
|
|||||||
<Form>frEditorElegirArticulosPedidoCliente</Form>
|
<Form>frEditorElegirArticulosPedidoCliente</Form>
|
||||||
<DesignClass>TForm</DesignClass>
|
<DesignClass>TForm</DesignClass>
|
||||||
</DCCReference>
|
</DCCReference>
|
||||||
<DCCReference Include="uEditorListadoProcesoPedidoCliente.pas">
|
|
||||||
<Form>fEditorListadoProcesoPedidoCliente</Form>
|
|
||||||
<DesignClass>TfEditorPedidosProveedor</DesignClass>
|
|
||||||
</DCCReference>
|
|
||||||
<DCCReference Include="uEditorPedidoCliente.pas">
|
<DCCReference Include="uEditorPedidoCliente.pas">
|
||||||
<Form>frEditorPedidoCliente</Form>
|
<Form>frEditorPedidoCliente</Form>
|
||||||
<DesignClass>TFrame</DesignClass>
|
<DesignClass>TFrame</DesignClass>
|
||||||
@ -163,10 +159,6 @@
|
|||||||
<Form>frViewElegirArticulosPedidosCliente</Form>
|
<Form>frViewElegirArticulosPedidosCliente</Form>
|
||||||
<DesignClass>TFrame</DesignClass>
|
<DesignClass>TFrame</DesignClass>
|
||||||
</DCCReference>
|
</DCCReference>
|
||||||
<DCCReference Include="uViewListadoProcesoPedidoCliente.pas">
|
|
||||||
<Form>frViewListadoProcesoPedidoCliente</Form>
|
|
||||||
<DesignClass>TFrame</DesignClass>
|
|
||||||
</DCCReference>
|
|
||||||
<DCCReference Include="uViewPedidoCliente.pas">
|
<DCCReference Include="uViewPedidoCliente.pas">
|
||||||
<Form>frViewPedidoCliente</Form>
|
<Form>frViewPedidoCliente</Form>
|
||||||
<DesignClass>TFrame</DesignClass>
|
<DesignClass>TFrame</DesignClass>
|
||||||
|
|||||||
@ -14,7 +14,6 @@ END
|
|||||||
|
|
||||||
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Views\uViewPedidosCliente.dfm */
|
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Views\uViewPedidosCliente.dfm */
|
||||||
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Views\uDialogOpcionesImpresionPedidosCliente.dfm */
|
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Views\uDialogOpcionesImpresionPedidosCliente.dfm */
|
||||||
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Views\uDialogOpcionesProcesoPedidoCliente.dfm */
|
|
||||||
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Views\uEditorPedidosCliente.dfm */
|
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Views\uEditorPedidosCliente.dfm */
|
||||||
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Views\uViewDireccionEntregaPedidoCli.dfm */
|
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Views\uViewDireccionEntregaPedidoCli.dfm */
|
||||||
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Views\uViewDatosYSeleccionClientePedido.dfm */
|
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Views\uViewDatosYSeleccionClientePedido.dfm */
|
||||||
@ -26,7 +25,5 @@ END
|
|||||||
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Views\uViewElegirArticulosPedidosCliente.dfm */
|
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Views\uViewElegirArticulosPedidosCliente.dfm */
|
||||||
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Views\uEditorElegirArticulosPedidoCliente.dfm */
|
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Views\uEditorElegirArticulosPedidoCliente.dfm */
|
||||||
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Views\uEditorDireccionEntregaPedidoCliente.dfm */
|
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Views\uEditorDireccionEntregaPedidoCliente.dfm */
|
||||||
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Views\uViewListadoProcesoPedidoCliente.dfm */
|
|
||||||
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Views\uEditorListadoProcesoPedidoCliente.dfm */
|
|
||||||
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Views\PedidosCliente_view.RES */
|
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Views\PedidosCliente_view.RES */
|
||||||
/* c:\temp\dtf6EE.tmp */
|
/* c:\temp\dtfB81.tmp */
|
||||||
|
|||||||
@ -1,79 +0,0 @@
|
|||||||
inherited fDialogOpcionesProcesoPedidoCliente: TfDialogOpcionesProcesoPedidoCliente
|
|
||||||
Caption = 'Opciones para listar proceso completo de pedido de cliente'
|
|
||||||
ClientHeight = 197
|
|
||||||
ClientWidth = 393
|
|
||||||
ExplicitWidth = 399
|
|
||||||
ExplicitHeight = 229
|
|
||||||
PixelsPerInch = 96
|
|
||||||
TextHeight = 13
|
|
||||||
inherited Bevel2: TBevel
|
|
||||||
Width = 393
|
|
||||||
ExplicitWidth = 393
|
|
||||||
end
|
|
||||||
inherited Bevel3: TBevel
|
|
||||||
Top = 153
|
|
||||||
Width = 393
|
|
||||||
ExplicitTop = 195
|
|
||||||
ExplicitWidth = 393
|
|
||||||
end
|
|
||||||
inherited pnlBotones: TPanel
|
|
||||||
Top = 155
|
|
||||||
Width = 393
|
|
||||||
ExplicitTop = 155
|
|
||||||
ExplicitWidth = 393
|
|
||||||
inherited btnAceptar: TButton
|
|
||||||
Left = 229
|
|
||||||
ExplicitLeft = 229
|
|
||||||
end
|
|
||||||
inherited btnCancelar: TButton
|
|
||||||
Left = 308
|
|
||||||
ExplicitLeft = 308
|
|
||||||
end
|
|
||||||
end
|
|
||||||
inherited pnlHeader: TPanel
|
|
||||||
Width = 393
|
|
||||||
ExplicitWidth = 393
|
|
||||||
inherited lblInstruccion: TLabel
|
|
||||||
Width = 343
|
|
||||||
Margins.Bottom = 10
|
|
||||||
Caption = 'Indique las siguiente opciones para el listado:'
|
|
||||||
ExplicitWidth = 256
|
|
||||||
end
|
|
||||||
inherited Label2: TLabel
|
|
||||||
Top = 31
|
|
||||||
Width = 318
|
|
||||||
Height = 25
|
|
||||||
Visible = False
|
|
||||||
ExplicitTop = 31
|
|
||||||
end
|
|
||||||
end
|
|
||||||
inherited pnlCuerpo: TPanel
|
|
||||||
Width = 393
|
|
||||||
Height = 87
|
|
||||||
ExplicitWidth = 393
|
|
||||||
ExplicitHeight = 87
|
|
||||||
object Label1: TLabel
|
|
||||||
Left = 25
|
|
||||||
Top = 6
|
|
||||||
Width = 47
|
|
||||||
Height = 13
|
|
||||||
Caption = 'Situaci'#243'n:'
|
|
||||||
end
|
|
||||||
object cbSituacion: TcxComboBox
|
|
||||||
Left = 78
|
|
||||||
Top = 6
|
|
||||||
TabOrder = 0
|
|
||||||
Text = 'cbSituacion'
|
|
||||||
Width = 203
|
|
||||||
end
|
|
||||||
end
|
|
||||||
inherited ActionList1: TActionList
|
|
||||||
Top = 16
|
|
||||||
inherited actAceptar: TAction
|
|
||||||
OnExecute = actAceptarExecute
|
|
||||||
end
|
|
||||||
inherited actCancelar: TAction
|
|
||||||
OnExecute = actCancelarExecute
|
|
||||||
end
|
|
||||||
end
|
|
||||||
end
|
|
||||||
@ -1,58 +0,0 @@
|
|||||||
unit uDialogOpcionesProcesoPedidoCliente;
|
|
||||||
|
|
||||||
interface
|
|
||||||
|
|
||||||
uses
|
|
||||||
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
|
|
||||||
Dialogs, uDialogBase, ActnList, StdCtrls, ExtCtrls, cxGraphics, cxControls,
|
|
||||||
cxContainer, cxEdit, cxTextEdit, cxMaskEdit, cxDropDownEdit;
|
|
||||||
|
|
||||||
type
|
|
||||||
TfDialogOpcionesProcesoPedidoCliente = class(TfDialogBase)
|
|
||||||
cbSituacion: TcxComboBox;
|
|
||||||
Label1: TLabel;
|
|
||||||
procedure actAceptarExecute(Sender: TObject);
|
|
||||||
procedure actCancelarExecute(Sender: TObject);
|
|
||||||
private
|
|
||||||
{ Private declarations }
|
|
||||||
public
|
|
||||||
{ Public declarations }
|
|
||||||
end;
|
|
||||||
|
|
||||||
function ElegirOpcionesProcesoPedidoCliente(var ASituacion: String): Boolean;
|
|
||||||
|
|
||||||
implementation
|
|
||||||
|
|
||||||
{$R *.dfm}
|
|
||||||
|
|
||||||
function ElegirOpcionesProcesoPedidoCliente(var ASituacion : String): Boolean;
|
|
||||||
var
|
|
||||||
AEditor : TfDialogOpcionesProcesoPedidoCliente;
|
|
||||||
begin
|
|
||||||
AEditor := TfDialogOpcionesProcesoPedidoCliente.Create(NIL);
|
|
||||||
try
|
|
||||||
AEditor.cbSituacion.EditValue := ASituacion;
|
|
||||||
|
|
||||||
Result := (AEditor.ShowModal = mrOk);
|
|
||||||
if Result then
|
|
||||||
begin
|
|
||||||
ASituacion := AEditor.cbSituacion.EditValue;
|
|
||||||
end;
|
|
||||||
finally
|
|
||||||
AEditor.Release;
|
|
||||||
end;
|
|
||||||
end;
|
|
||||||
|
|
||||||
procedure TfDialogOpcionesProcesoPedidoCliente.actAceptarExecute(Sender: TObject);
|
|
||||||
begin
|
|
||||||
inherited;
|
|
||||||
ModalResult := mrOk
|
|
||||||
end;
|
|
||||||
|
|
||||||
procedure TfDialogOpcionesProcesoPedidoCliente.actCancelarExecute(Sender: TObject);
|
|
||||||
begin
|
|
||||||
inherited;
|
|
||||||
ModalResult := mrCancel;
|
|
||||||
end;
|
|
||||||
|
|
||||||
end.
|
|
||||||
@ -89,7 +89,7 @@ uses
|
|||||||
// uGenerarFacturasProvPedUtils,
|
// uGenerarFacturasProvPedUtils,
|
||||||
// uInventarioController, uBizInventario,
|
// uInventarioController, uBizInventario,
|
||||||
uDialogUtils, uGridStatusUtils, uDBSelectionListUtils, cxControls,
|
uDialogUtils, uGridStatusUtils, uDBSelectionListUtils, cxControls,
|
||||||
uDialogOpcionesImpresionPedidosCliente, uDialogOpcionesProcesoPedidoCliente,
|
uDialogOpcionesImpresionPedidosCliente,
|
||||||
uGestorInformesController,
|
uGestorInformesController,
|
||||||
// uAlbaranesProveedorController, uBizAlbaranesProveedor,
|
// uAlbaranesProveedorController, uBizAlbaranesProveedor,
|
||||||
uGenerarAlbaranesCliUtils, uGenerarPedidosProvUtils;
|
uGenerarAlbaranesCliUtils, uGenerarPedidosProvUtils;
|
||||||
@ -260,12 +260,29 @@ end;
|
|||||||
|
|
||||||
procedure TfEditorPedidosCliente.actVerProcesoCompletoExecute(Sender: TObject);
|
procedure TfEditorPedidosCliente.actVerProcesoCompletoExecute(Sender: TObject);
|
||||||
var
|
var
|
||||||
ASituacion: String;
|
APedidos: IBizPedidoCliente;
|
||||||
|
AllItems: Boolean;
|
||||||
begin
|
begin
|
||||||
inherited;
|
APedidos := Nil;
|
||||||
ASituacion := 'PENDIENTE';
|
AllItems := False;
|
||||||
if ElegirOpcionesProcesoPedidoCliente(ASituacion) then
|
|
||||||
FController.VerListadoProcesoPedidoCliente(ASituacion);
|
if MultiSelect and Assigned(ViewGrid) then
|
||||||
|
AllItems := (ViewGrid.NumSeleccionados > 1);
|
||||||
|
|
||||||
|
//Si esta agrupado solo podré imprimir la lista de elementos visibles
|
||||||
|
// if not ViewGrid.esSeleccionCeldaDatos then
|
||||||
|
// inherited
|
||||||
|
// else
|
||||||
|
if AllItems then
|
||||||
|
begin
|
||||||
|
SeleccionarFilasDesdeGrid(ViewGrid._FocusedView, (Pedidos as ISeleccionable).SelectedRecords);
|
||||||
|
APedidos := (Controller as IPedidosClienteController).ExtraerSeleccionados(Pedidos) as IBizPedidoCliente;
|
||||||
|
end
|
||||||
|
else
|
||||||
|
APedidos := Pedidos;
|
||||||
|
|
||||||
|
if Assigned(APedidos) then
|
||||||
|
FController.VerProcesoCompleto(APedidos, AllItems);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
constructor TfEditorPedidosCliente.Create(AOwner: TComponent);
|
constructor TfEditorPedidosCliente.Create(AOwner: TComponent);
|
||||||
|
|||||||
@ -15,8 +15,7 @@ uses
|
|||||||
uDialogListaPedidosClienteEnvioEMail,
|
uDialogListaPedidosClienteEnvioEMail,
|
||||||
// uEditorElegirPedidosCliente,
|
// uEditorElegirPedidosCliente,
|
||||||
uEditorElegirArticulosPedidoCliente,
|
uEditorElegirArticulosPedidoCliente,
|
||||||
uEditorDireccionEntregaPedidoCliente,
|
uEditorDireccionEntregaPedidoCliente;
|
||||||
uEditorListadoProcesoPedidoCLiente;
|
|
||||||
// uEditorSituacionPedidoCliente;
|
// uEditorSituacionPedidoCliente;
|
||||||
|
|
||||||
procedure RegisterViews;
|
procedure RegisterViews;
|
||||||
@ -29,7 +28,6 @@ begin
|
|||||||
EditorRegistry.RegisterClass(TfEditorPedidosClientePreview, 'EditorPedidosClientePreview');
|
EditorRegistry.RegisterClass(TfEditorPedidosClientePreview, 'EditorPedidosClientePreview');
|
||||||
// EditorRegistry.RegisterClass(TfEditorSituacionPedidoCliente, 'EditorSituacionPedidoCliente');
|
// EditorRegistry.RegisterClass(TfEditorSituacionPedidoCliente, 'EditorSituacionPedidoCliente');
|
||||||
EditorRegistry.RegisterClass(TfDialogListaPedidosClienteEnvioEMail, 'DialogListaPedidosClienteEnvioEMail');
|
EditorRegistry.RegisterClass(TfDialogListaPedidosClienteEnvioEMail, 'DialogListaPedidosClienteEnvioEMail');
|
||||||
EditorRegistry.RegisterClass(TfEditorListadoProcesoPedidoCliente, 'EditorListadoProcesoPedidoCliente');
|
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure UnregisterViews;
|
procedure UnregisterViews;
|
||||||
@ -42,7 +40,6 @@ begin
|
|||||||
EditorRegistry.UnRegisterClass(TfEditorPedidosClientePreview);
|
EditorRegistry.UnRegisterClass(TfEditorPedidosClientePreview);
|
||||||
EditorRegistry.UnRegisterClass(TfDialogListaPedidosClienteEnvioEMail);
|
EditorRegistry.UnRegisterClass(TfDialogListaPedidosClienteEnvioEMail);
|
||||||
// EditorRegistry.UnRegisterClass(TfEditorSituacionPedidoCliente);
|
// EditorRegistry.UnRegisterClass(TfEditorSituacionPedidoCliente);
|
||||||
EditorRegistry.UnRegisterClass(TfEditorListadoProcesoPedidoCliente);
|
|
||||||
end;
|
end;
|
||||||
|
|
||||||
end.
|
end.
|
||||||
|
|||||||
@ -1,62 +0,0 @@
|
|||||||
inherited frViewListadoProcesoPedidoCliente: TfrViewListadoProcesoPedidoCliente
|
|
||||||
OnShow = CustomViewShow
|
|
||||||
inherited cxGrid: TcxGrid
|
|
||||||
inherited cxGridView: TcxGridDBTableView
|
|
||||||
DataController.KeyFieldNames = 'ID'
|
|
||||||
object cxGridViewREFERENCIA: TcxGridDBColumn
|
|
||||||
DataBinding.FieldName = 'REFERENCIA'
|
|
||||||
end
|
|
||||||
object cxGridViewNOMBRE: TcxGridDBColumn
|
|
||||||
DataBinding.FieldName = 'NOMBRE'
|
|
||||||
end
|
|
||||||
object cxGridViewREFERENCIA_CLIENTE: TcxGridDBColumn
|
|
||||||
DataBinding.FieldName = 'REFERENCIA_CLIENTE'
|
|
||||||
end
|
|
||||||
object cxGridViewSITUACION: TcxGridDBColumn
|
|
||||||
DataBinding.FieldName = 'SITUACION'
|
|
||||||
end
|
|
||||||
end
|
|
||||||
end
|
|
||||||
inherited frViewFiltroBase1: TfrViewFiltroBase
|
|
||||||
inherited TBXDockablePanel1: TTBXDockablePanel
|
|
||||||
inherited dxLayoutControl1: TdxLayoutControl
|
|
||||||
inherited txtFiltroTodo: TcxTextEdit
|
|
||||||
Style.LookAndFeel.SkinName = ''
|
|
||||||
StyleDisabled.LookAndFeel.SkinName = ''
|
|
||||||
StyleFocused.LookAndFeel.SkinName = ''
|
|
||||||
StyleHot.LookAndFeel.SkinName = ''
|
|
||||||
end
|
|
||||||
inherited edtFechaIniFiltro: TcxDateEdit
|
|
||||||
Style.LookAndFeel.SkinName = ''
|
|
||||||
StyleDisabled.LookAndFeel.SkinName = ''
|
|
||||||
StyleFocused.LookAndFeel.SkinName = ''
|
|
||||||
StyleHot.LookAndFeel.SkinName = ''
|
|
||||||
ExplicitWidth = 272
|
|
||||||
Width = 272
|
|
||||||
end
|
|
||||||
inherited edtFechaFinFiltro: TcxDateEdit
|
|
||||||
Style.LookAndFeel.SkinName = ''
|
|
||||||
StyleDisabled.LookAndFeel.SkinName = ''
|
|
||||||
StyleFocused.LookAndFeel.SkinName = ''
|
|
||||||
StyleHot.LookAndFeel.SkinName = ''
|
|
||||||
ExplicitWidth = 221
|
|
||||||
Width = 221
|
|
||||||
end
|
|
||||||
inherited eLista: TcxComboBox
|
|
||||||
Style.LookAndFeel.SkinName = ''
|
|
||||||
StyleDisabled.LookAndFeel.SkinName = ''
|
|
||||||
StyleFocused.LookAndFeel.SkinName = ''
|
|
||||||
StyleHot.LookAndFeel.SkinName = ''
|
|
||||||
ExplicitWidth = 215
|
|
||||||
Width = 215
|
|
||||||
end
|
|
||||||
end
|
|
||||||
end
|
|
||||||
end
|
|
||||||
inherited dxComponentPrinter: TdxComponentPrinter
|
|
||||||
inherited dxComponentPrinterLink: TdxGridReportLink
|
|
||||||
ReportDocument.CreationDate = 41514.488531400460000000
|
|
||||||
BuiltInReportLink = True
|
|
||||||
end
|
|
||||||
end
|
|
||||||
end
|
|
||||||
@ -1,97 +0,0 @@
|
|||||||
unit uViewListadoProcesoPedidoCliente;
|
|
||||||
|
|
||||||
interface
|
|
||||||
|
|
||||||
uses
|
|
||||||
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
|
|
||||||
Dialogs, uViewGrid, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData,
|
|
||||||
cxDataStorage, cxEdit, DB, cxDBData, dxPSGlbl, dxPSUtl, dxPSEngn, dxPrnPg,
|
|
||||||
dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider, dxPSFillPatterns,
|
|
||||||
dxPSEdgePatterns, cxGridCustomPopupMenu, cxGridPopupMenu, ImgList,
|
|
||||||
PngImageList, ActnList, dxPSCore, dxPScxCommon, dxPScxGrid6Lnk, uDAInterfaces,
|
|
||||||
uDADataTable, TB2Item, TBX, TB2Toolbar, TBXDkPanels, TB2Dock, uCustomView,
|
|
||||||
uViewBase, uViewFiltroBase, cxGridLevel, cxGridCustomTableView,
|
|
||||||
cxGridTableView, cxGridDBTableView, cxClasses, cxControls, cxGridCustomView,
|
|
||||||
cxGrid, uBizPedidosCliente, uBizPedidosProveedor;
|
|
||||||
|
|
||||||
type
|
|
||||||
IViewListadoProcesoPedidoCliente = interface(IViewGrid)
|
|
||||||
['{51AE72F0-E6F7-49E6-A376-EBFB5B118E62}']
|
|
||||||
function GetPedidosCliente: IBizPedidoCliente;
|
|
||||||
procedure SetPedidosCliente(const Value: IBizPedidoCliente);
|
|
||||||
property PedidosCliente: IBizPedidoCliente read GetPedidosCliente write SetPedidosCliente;
|
|
||||||
|
|
||||||
function GetPedidosProveedor: IBizPedidoProveedor;
|
|
||||||
procedure SetPedidosProveedor(const Value: IBizPedidoProveedor);
|
|
||||||
property PedidosProveedor: IBizPedidoProveedor read GetPedidosProveedor write SetPedidosProveedor;
|
|
||||||
end;
|
|
||||||
|
|
||||||
TfrViewListadoProcesoPedidoCliente = class(TfrViewGrid, IViewListadoProcesoPedidoCliente)
|
|
||||||
cxGridViewREFERENCIA: TcxGridDBColumn;
|
|
||||||
cxGridViewNOMBRE: TcxGridDBColumn;
|
|
||||||
cxGridViewREFERENCIA_CLIENTE: TcxGridDBColumn;
|
|
||||||
cxGridViewSITUACION: TcxGridDBColumn;
|
|
||||||
procedure CustomViewShow(Sender: TObject);
|
|
||||||
protected
|
|
||||||
FPedidosCliente: IBizPedidoCliente;
|
|
||||||
FPedidosProveedor: IBizPedidoProveedor;
|
|
||||||
|
|
||||||
function GetPedidosCliente: IBizPedidoCliente;
|
|
||||||
procedure SetPedidosCliente(const Value: IBizPedidoCliente);
|
|
||||||
|
|
||||||
function GetPedidosProveedor: IBizPedidoProveedor;
|
|
||||||
procedure SetPedidosProveedor(const Value: IBizPedidoProveedor);
|
|
||||||
|
|
||||||
public
|
|
||||||
property PedidosCliente: IBizPedidoCliente read GetPedidosCliente write SetPedidosCliente;
|
|
||||||
property PedidosProveedor: IBizPedidoProveedor read GetPedidosProveedor write SetPedidosProveedor;
|
|
||||||
destructor Destroy; override;
|
|
||||||
end;
|
|
||||||
|
|
||||||
implementation
|
|
||||||
{$R *.dfm}
|
|
||||||
|
|
||||||
{ TfrViewListadoProcesoPedidoCliente }
|
|
||||||
|
|
||||||
procedure TfrViewListadoProcesoPedidoCliente.CustomViewShow(Sender: TObject);
|
|
||||||
begin
|
|
||||||
inherited;
|
|
||||||
if Assigned(FPedidosCliente) then
|
|
||||||
FPedidosCliente.Active := True;
|
|
||||||
end;
|
|
||||||
|
|
||||||
destructor TfrViewListadoProcesoPedidoCliente.Destroy;
|
|
||||||
begin
|
|
||||||
FPedidosCliente:= Nil;
|
|
||||||
inherited;
|
|
||||||
end;
|
|
||||||
|
|
||||||
function TfrViewListadoProcesoPedidoCliente.GetPedidosCliente: IBizPedidoCliente;
|
|
||||||
begin
|
|
||||||
Result := FPedidosCliente;
|
|
||||||
end;
|
|
||||||
|
|
||||||
function TfrViewListadoProcesoPedidoCliente.GetPedidosProveedor: IBizPedidoProveedor;
|
|
||||||
begin
|
|
||||||
Result := FPedidosProveedor;
|
|
||||||
end;
|
|
||||||
|
|
||||||
procedure TfrViewListadoProcesoPedidoCliente.SetPedidosCliente(const Value: IBizPedidoCliente);
|
|
||||||
begin
|
|
||||||
FPedidosCliente := Value;
|
|
||||||
if Assigned(FPedidosCliente) then
|
|
||||||
dsDataSource.DataTable := FPedidosCliente.DataTable
|
|
||||||
else
|
|
||||||
dsDataSource.DataTable := Nil;
|
|
||||||
end;
|
|
||||||
|
|
||||||
procedure TfrViewListadoProcesoPedidoCliente.SetPedidosProveedor(const Value: IBizPedidoProveedor);
|
|
||||||
begin
|
|
||||||
FPedidosProveedor := Value;
|
|
||||||
// if Assigned(FPedidosProveedor) then
|
|
||||||
// dsDataSource.DataTable := FPedidosProveedor.DataTable
|
|
||||||
// else
|
|
||||||
// dsDataSource.DataTable := Nil;
|
|
||||||
end;
|
|
||||||
|
|
||||||
end.
|
|
||||||
Binary file not shown.
@ -0,0 +1,553 @@
|
|||||||
|
<?xml version="1.0" encoding="utf-8"?>
|
||||||
|
<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
|
||||||
|
<PropertyGroup>
|
||||||
|
<ProjectGuid>{7ed85635-c723-4c0b-bf1d-f719e0ea33ad}</ProjectGuid>
|
||||||
|
<MainSource>ProcesoPresupuestosCliente_controller.dpk</MainSource>
|
||||||
|
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
|
||||||
|
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
|
||||||
|
<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
|
||||||
|
<DCC_DependencyCheckOutputName>..\..\..\..\Output\Debug\Cliente\ProcesoPresupuestosCliente_controller.bpl</DCC_DependencyCheckOutputName>
|
||||||
|
</PropertyGroup>
|
||||||
|
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
|
||||||
|
<Version>7.0</Version>
|
||||||
|
<DCC_DebugInformation>False</DCC_DebugInformation>
|
||||||
|
<DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
|
||||||
|
<DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
|
||||||
|
<DCC_MapFile>3</DCC_MapFile>
|
||||||
|
<DCC_DcuOutput>.\</DCC_DcuOutput>
|
||||||
|
<DCC_ObjOutput>.\</DCC_ObjOutput>
|
||||||
|
<DCC_HppOutput>.\</DCC_HppOutput>
|
||||||
|
<DCC_BplOutput>..\..\..\..\Output\Debug\Cliente</DCC_BplOutput>
|
||||||
|
<DCC_DcpOutput>..\..\Lib</DCC_DcpOutput>
|
||||||
|
<DCC_UnitSearchPath>..\..\..\Lib;..\..\Lib</DCC_UnitSearchPath>
|
||||||
|
<DCC_ResourcePath>..\..\..\Lib;..\..\Lib</DCC_ResourcePath>
|
||||||
|
<DCC_ObjPath>..\..\..\Lib;..\..\Lib</DCC_ObjPath>
|
||||||
|
<DCC_IncludePath>..\..\..\Lib;..\..\Lib</DCC_IncludePath>
|
||||||
|
<DCC_Define>RELEASE</DCC_Define>
|
||||||
|
</PropertyGroup>
|
||||||
|
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
|
||||||
|
<Version>7.0</Version>
|
||||||
|
<DCC_MapFile>3</DCC_MapFile>
|
||||||
|
<DCC_DcuOutput>.\</DCC_DcuOutput>
|
||||||
|
<DCC_ObjOutput>.\</DCC_ObjOutput>
|
||||||
|
<DCC_HppOutput>.\</DCC_HppOutput>
|
||||||
|
<DCC_BplOutput>..\..\..\..\Output\Debug\Cliente</DCC_BplOutput>
|
||||||
|
<DCC_DcpOutput>..\..\Lib</DCC_DcpOutput>
|
||||||
|
<DCC_UnitSearchPath>..\..\..\Lib;..\..\Lib</DCC_UnitSearchPath>
|
||||||
|
<DCC_ResourcePath>..\..\..\Lib;..\..\Lib</DCC_ResourcePath>
|
||||||
|
<DCC_ObjPath>..\..\..\Lib;..\..\Lib</DCC_ObjPath>
|
||||||
|
<DCC_IncludePath>..\..\..\Lib;..\..\Lib</DCC_IncludePath>
|
||||||
|
</PropertyGroup>
|
||||||
|
<ProjectExtensions>
|
||||||
|
<Borland.Personality>Delphi.Personality</Borland.Personality>
|
||||||
|
<Borland.ProjectType>Package</Borland.ProjectType>
|
||||||
|
<BorlandProject>
|
||||||
|
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</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"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">ProcesoPresupuestosCliente_controller.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
|
||||||
|
</ProjectExtensions>
|
||||||
|
<Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
|
||||||
|
<ItemGroup>
|
||||||
|
<DelphiCompile Include="ProcesoPresupuestosCliente_controller.dpk">
|
||||||
|
<MainSource>MainSource</MainSource>
|
||||||
|
</DelphiCompile>
|
||||||
|
<DCCReference Include="..\..\Lib\AlbaranesProveedor_controller.dcp" />
|
||||||
|
<DCCReference Include="..\..\Lib\AlbaranesProveedor_model.dcp" />
|
||||||
|
<DCCReference Include="..\..\Lib\Base.dcp" />
|
||||||
|
<DCCReference Include="..\..\Lib\designide.dcp" />
|
||||||
|
<DCCReference Include="..\..\Lib\FacturasProveedor_controller.dcp" />
|
||||||
|
<DCCReference Include="..\..\Lib\FacturasProveedor_model.dcp" />
|
||||||
|
<DCCReference Include="..\..\Lib\GUISDK_D11R.dcp" />
|
||||||
|
<DCCReference Include="..\..\Lib\PedidosCliente_controller.dcp" />
|
||||||
|
<DCCReference Include="..\..\Lib\PedidosCliente_model.dcp" />
|
||||||
|
<DCCReference Include="..\..\Lib\PedidosProveedor_controller.dcp" />
|
||||||
|
<DCCReference Include="..\..\Lib\PedidosProveedor_model.dcp" />
|
||||||
|
<DCCReference Include="..\..\Lib\vcl.dcp" />
|
||||||
|
<DCCReference Include="..\..\Lib\vclactnband.dcp" />
|
||||||
|
<DCCReference Include="..\..\Lib\vclx.dcp" />
|
||||||
|
<DCCReference Include="..\..\Lib\xmlrtl.dcp" />
|
||||||
|
<DCCReference Include="uProcesoPresupuestosClienteController.pas" />
|
||||||
|
<DCCReference Include="View\uIEditorProcesoPresupuestosCliente.pas" />
|
||||||
|
</ItemGroup>
|
||||||
|
</Project>
|
||||||
|
<!-- EurekaLog First Line
|
||||||
|
[Exception Log]
|
||||||
|
EurekaLog Version=6011
|
||||||
|
Activate=0
|
||||||
|
Activate Handle=1
|
||||||
|
Save Log File=1
|
||||||
|
Foreground Tab=0
|
||||||
|
Freeze Activate=0
|
||||||
|
Freeze Timeout=60
|
||||||
|
SMTP From=eurekalog@email.com
|
||||||
|
SMTP Host=
|
||||||
|
SMTP Port=25
|
||||||
|
SMTP UserID=
|
||||||
|
SMTP Password=
|
||||||
|
Append to Log=0
|
||||||
|
TerminateBtn Operation=2
|
||||||
|
Errors Number=32
|
||||||
|
Errors Terminate=3
|
||||||
|
Email Address=
|
||||||
|
Email Object=
|
||||||
|
Email Send Options=0
|
||||||
|
Output Path=
|
||||||
|
Encrypt Password=
|
||||||
|
AutoCloseDialogSecs=0
|
||||||
|
WebSendMode=0
|
||||||
|
SupportULR=
|
||||||
|
HTMLLayout Count=15
|
||||||
|
HTMLLine0="%3Chtml%3E"
|
||||||
|
HTMLLine1=" %3Chead%3E"
|
||||||
|
HTMLLine2=" %3C/head%3E"
|
||||||
|
HTMLLine3=" %3Cbody TopMargin=10 LeftMargin=10%3E"
|
||||||
|
HTMLLine4=" %3Ctable width="100%%" border="0"%3E"
|
||||||
|
HTMLLine5=" %3Ctr%3E"
|
||||||
|
HTMLLine6=" %3Ctd nowrap%3E"
|
||||||
|
HTMLLine7=" %3Cfont face="Lucida Console, Courier" size="2"%3E"
|
||||||
|
HTMLLine8=" %3C%%HTML_TAG%%%3E"
|
||||||
|
HTMLLine9=" %3C/font%3E"
|
||||||
|
HTMLLine10=" %3C/td%3E"
|
||||||
|
HTMLLine11=" %3C/tr%3E"
|
||||||
|
HTMLLine12=" %3C/table%3E"
|
||||||
|
HTMLLine13=" %3C/body%3E"
|
||||||
|
HTMLLine14="%3C/html%3E"
|
||||||
|
AutoCrashOperation=2
|
||||||
|
AutoCrashNumber=10
|
||||||
|
AutoCrashMinutes=1
|
||||||
|
WebURL=
|
||||||
|
WebUserID=
|
||||||
|
WebPassword=
|
||||||
|
WebPort=0
|
||||||
|
AttachedFiles=
|
||||||
|
ProxyURL=
|
||||||
|
ProxyUser=
|
||||||
|
ProxyPassword=
|
||||||
|
ProxyPort=8080
|
||||||
|
TrakerUser=
|
||||||
|
TrakerPassword=
|
||||||
|
TrakerAssignTo=
|
||||||
|
TrakerProject=
|
||||||
|
TrakerCategory=
|
||||||
|
TrakerTrialID=
|
||||||
|
ZipPassword=
|
||||||
|
PreBuildEvent=
|
||||||
|
PostSuccessfulBuildEvent=
|
||||||
|
PostFailureBuildEvent=
|
||||||
|
ExceptionDialogType=2
|
||||||
|
Count=0
|
||||||
|
EMail Message Line Count=0
|
||||||
|
loNoDuplicateErrors=0
|
||||||
|
loAppendReproduceText=0
|
||||||
|
loDeleteLogAtVersionChange=0
|
||||||
|
loAddComputerNameInLogFileName=0
|
||||||
|
loSaveModulesAndProcessesSections=1
|
||||||
|
loSaveAssemblerAndCPUSections=1
|
||||||
|
soAppStartDate=1
|
||||||
|
soAppName=1
|
||||||
|
soAppVersionNumber=1
|
||||||
|
soAppParameters=1
|
||||||
|
soAppCompilationDate=1
|
||||||
|
soAppUpTime=1
|
||||||
|
soExcDate=1
|
||||||
|
soExcAddress=1
|
||||||
|
soExcModuleName=1
|
||||||
|
soExcModuleVersion=1
|
||||||
|
soExcType=1
|
||||||
|
soExcMessage=1
|
||||||
|
soExcID=1
|
||||||
|
soExcCount=1
|
||||||
|
soExcStatus=1
|
||||||
|
soExcNote=1
|
||||||
|
soUserID=1
|
||||||
|
soUserName=1
|
||||||
|
soUserEmail=1
|
||||||
|
soUserPrivileges=1
|
||||||
|
soUserCompany=1
|
||||||
|
soActCtlsFormClass=1
|
||||||
|
soActCtlsFormText=1
|
||||||
|
soActCtlsControlClass=1
|
||||||
|
soActCtlsControlText=1
|
||||||
|
soCmpName=1
|
||||||
|
soCmpTotalMemory=1
|
||||||
|
soCmpFreeMemory=1
|
||||||
|
soCmpTotalDisk=1
|
||||||
|
soCmpFreeDisk=1
|
||||||
|
soCmpSysUpTime=1
|
||||||
|
soCmpProcessor=1
|
||||||
|
soCmpDisplayMode=1
|
||||||
|
soCmpDisplayDPI=1
|
||||||
|
soCmpVideoCard=1
|
||||||
|
soCmpPrinter=1
|
||||||
|
soOSType=1
|
||||||
|
soOSBuildN=1
|
||||||
|
soOSUpdate=1
|
||||||
|
soOSLanguage=1
|
||||||
|
soOSCharset=1
|
||||||
|
soNetIP=1
|
||||||
|
soNetSubmask=1
|
||||||
|
soNetGateway=1
|
||||||
|
soNetDNS1=1
|
||||||
|
soNetDNS2=1
|
||||||
|
soNetDHCP=1
|
||||||
|
soCustomData=1
|
||||||
|
sndShowSendDialog=1
|
||||||
|
sndShowSuccessFailureMsg=0
|
||||||
|
sndSendEntireLog=0
|
||||||
|
sndSendXMLLogCopy=0
|
||||||
|
sndSendScreenshot=1
|
||||||
|
sndUseOnlyActiveWindow=0
|
||||||
|
sndSendLastHTMLPage=1
|
||||||
|
sndSendInSeparatedThread=0
|
||||||
|
sndAddDateInFileName=0
|
||||||
|
sndAddComputerNameInFileName=0
|
||||||
|
edoSendErrorReportChecked=1
|
||||||
|
edoAttachScreenshotChecked=1
|
||||||
|
edoShowCopyToClipOption=1
|
||||||
|
edoShowDetailsButton=1
|
||||||
|
edoShowInDetailedMode=0
|
||||||
|
edoShowInTopMostMode=0
|
||||||
|
edoUseEurekaLogLookAndFeel=0
|
||||||
|
edoShowSendErrorReportOption=1
|
||||||
|
edoShowAttachScreenshotOption=1
|
||||||
|
edoShowCustomButton=0
|
||||||
|
csoShowDLLs=1
|
||||||
|
csoShowBPLs=1
|
||||||
|
csoShowBorlandThreads=1
|
||||||
|
csoShowWindowsThreads=1
|
||||||
|
csoDoNotStoreProcNames=0
|
||||||
|
boPauseBorlandThreads=0
|
||||||
|
boDoNotPauseMainThread=0
|
||||||
|
boPauseWindowsThreads=0
|
||||||
|
boUseMainModuleOptions=1
|
||||||
|
boCopyLogInCaseOfError=1
|
||||||
|
boSaveCompressedCopyInCaseOfError=0
|
||||||
|
boHandleSafeCallExceptions=1
|
||||||
|
boCallRTLExceptionEvent=0
|
||||||
|
boCatchHandledExceptions=0
|
||||||
|
loCatchLeaks=0
|
||||||
|
loGroupsSonLeaks=1
|
||||||
|
loHideBorlandLeaks=1
|
||||||
|
loFreeAllLeaks=1
|
||||||
|
loCatchLeaksExceptions=1
|
||||||
|
cfoReduceFileSize=1
|
||||||
|
cfoCheckFileCorruption=0
|
||||||
|
Count mtInformationMsgCaption=1
|
||||||
|
mtInformationMsgCaption0="Information."
|
||||||
|
Count mtQuestionMsgCaption=1
|
||||||
|
mtQuestionMsgCaption0="Question."
|
||||||
|
Count mtErrorMsgCaption=1
|
||||||
|
mtErrorMsgCaption0="Error."
|
||||||
|
Count mtDialog_Caption=1
|
||||||
|
mtDialog_Caption0="Error occurred"
|
||||||
|
Count mtDialog_ErrorMsgCaption=2
|
||||||
|
mtDialog_ErrorMsgCaption0="An error has occurred during program execution."
|
||||||
|
mtDialog_ErrorMsgCaption1="Please read the following information for further details."
|
||||||
|
Count mtDialog_GeneralCaption=1
|
||||||
|
mtDialog_GeneralCaption0="General"
|
||||||
|
Count mtDialog_GeneralHeader=1
|
||||||
|
mtDialog_GeneralHeader0="General Information"
|
||||||
|
Count mtDialog_CallStackCaption=1
|
||||||
|
mtDialog_CallStackCaption0="Call Stack"
|
||||||
|
Count mtDialog_CallStackHeader=1
|
||||||
|
mtDialog_CallStackHeader0="Call Stack Information"
|
||||||
|
Count mtDialog_ModulesCaption=1
|
||||||
|
mtDialog_ModulesCaption0="Modules"
|
||||||
|
Count mtDialog_ModulesHeader=1
|
||||||
|
mtDialog_ModulesHeader0="Modules Information"
|
||||||
|
Count mtDialog_ProcessesCaption=1
|
||||||
|
mtDialog_ProcessesCaption0="Processes"
|
||||||
|
Count mtDialog_ProcessesHeader=1
|
||||||
|
mtDialog_ProcessesHeader0="Processes Information"
|
||||||
|
Count mtDialog_AsmCaption=1
|
||||||
|
mtDialog_AsmCaption0="Assembler"
|
||||||
|
Count mtDialog_AsmHeader=1
|
||||||
|
mtDialog_AsmHeader0="Assembler Information"
|
||||||
|
Count mtDialog_CPUCaption=1
|
||||||
|
mtDialog_CPUCaption0="CPU"
|
||||||
|
Count mtDialog_CPUHeader=1
|
||||||
|
mtDialog_CPUHeader0="CPU Information"
|
||||||
|
Count mtDialog_OKButtonCaption=1
|
||||||
|
mtDialog_OKButtonCaption0="%26OK"
|
||||||
|
Count mtDialog_TerminateButtonCaption=1
|
||||||
|
mtDialog_TerminateButtonCaption0="%26Terminate"
|
||||||
|
Count mtDialog_RestartButtonCaption=1
|
||||||
|
mtDialog_RestartButtonCaption0="%26Restart"
|
||||||
|
Count mtDialog_DetailsButtonCaption=1
|
||||||
|
mtDialog_DetailsButtonCaption0="%26Details"
|
||||||
|
Count mtDialog_CustomButtonCaption=1
|
||||||
|
mtDialog_CustomButtonCaption0="%26Help"
|
||||||
|
Count mtDialog_SendMessage=1
|
||||||
|
mtDialog_SendMessage0="%26Send this error via Internet"
|
||||||
|
Count mtDialog_ScreenshotMessage=1
|
||||||
|
mtDialog_ScreenshotMessage0="%26Attach a Screenshot image"
|
||||||
|
Count mtDialog_CopyMessage=1
|
||||||
|
mtDialog_CopyMessage0="%26Copy to Clipboard"
|
||||||
|
Count mtDialog_SupportMessage=1
|
||||||
|
mtDialog_SupportMessage0="Go to the Support Page"
|
||||||
|
Count mtMSDialog_ErrorMsgCaption=1
|
||||||
|
mtMSDialog_ErrorMsgCaption0="The application has encountered a problem. We are sorry for the inconvenience."
|
||||||
|
Count mtMSDialog_RestartCaption=1
|
||||||
|
mtMSDialog_RestartCaption0="Restart application."
|
||||||
|
Count mtMSDialog_TerminateCaption=1
|
||||||
|
mtMSDialog_TerminateCaption0="Terminate application."
|
||||||
|
Count mtMSDialog_PleaseCaption=1
|
||||||
|
mtMSDialog_PleaseCaption0="Please tell us about this problem."
|
||||||
|
Count mtMSDialog_DescriptionCaption=1
|
||||||
|
mtMSDialog_DescriptionCaption0="We have created an error report that you can send to us. We will treat this report as confidential and anonymous."
|
||||||
|
Count mtMSDialog_SeeDetailsCaption=1
|
||||||
|
mtMSDialog_SeeDetailsCaption0="To see what data the error report contains,"
|
||||||
|
Count mtMSDialog_SeeClickCaption=1
|
||||||
|
mtMSDialog_SeeClickCaption0="click here."
|
||||||
|
Count mtMSDialog_HowToReproduceCaption=1
|
||||||
|
mtMSDialog_HowToReproduceCaption0="What were you doing when the problem happended (optional)?"
|
||||||
|
Count mtMSDialog_EmailCaption=1
|
||||||
|
mtMSDialog_EmailCaption0="Email address (optional):"
|
||||||
|
Count mtMSDialog_SendButtonCaption=1
|
||||||
|
mtMSDialog_SendButtonCaption0="%26Send Error Report"
|
||||||
|
Count mtMSDialog_NoSendButtonCaption=1
|
||||||
|
mtMSDialog_NoSendButtonCaption0="%26Don't Send"
|
||||||
|
Count mtLog_AppHeader=1
|
||||||
|
mtLog_AppHeader0="Application"
|
||||||
|
Count mtLog_AppStartDate=1
|
||||||
|
mtLog_AppStartDate0="Start Date"
|
||||||
|
Count mtLog_AppName=1
|
||||||
|
mtLog_AppName0="Name/Description"
|
||||||
|
Count mtLog_AppVersionNumber=1
|
||||||
|
mtLog_AppVersionNumber0="Version Number"
|
||||||
|
Count mtLog_AppParameters=1
|
||||||
|
mtLog_AppParameters0="Parameters"
|
||||||
|
Count mtLog_AppCompilationDate=1
|
||||||
|
mtLog_AppCompilationDate0="Compilation Date"
|
||||||
|
Count mtLog_AppUpTime=1
|
||||||
|
mtLog_AppUpTime0="Up Time"
|
||||||
|
Count mtLog_ExcHeader=1
|
||||||
|
mtLog_ExcHeader0="Exception"
|
||||||
|
Count mtLog_ExcDate=1
|
||||||
|
mtLog_ExcDate0="Date"
|
||||||
|
Count mtLog_ExcAddress=1
|
||||||
|
mtLog_ExcAddress0="Address"
|
||||||
|
Count mtLog_ExcModuleName=1
|
||||||
|
mtLog_ExcModuleName0="Module Name"
|
||||||
|
Count mtLog_ExcModuleVersion=1
|
||||||
|
mtLog_ExcModuleVersion0="Module Version"
|
||||||
|
Count mtLog_ExcType=1
|
||||||
|
mtLog_ExcType0="Type"
|
||||||
|
Count mtLog_ExcMessage=1
|
||||||
|
mtLog_ExcMessage0="Message"
|
||||||
|
Count mtLog_ExcID=1
|
||||||
|
mtLog_ExcID0="ID"
|
||||||
|
Count mtLog_ExcCount=1
|
||||||
|
mtLog_ExcCount0="Count"
|
||||||
|
Count mtLog_ExcStatus=1
|
||||||
|
mtLog_ExcStatus0="Status"
|
||||||
|
Count mtLog_ExcNote=1
|
||||||
|
mtLog_ExcNote0="Note"
|
||||||
|
Count mtLog_UserHeader=1
|
||||||
|
mtLog_UserHeader0="User"
|
||||||
|
Count mtLog_UserID=1
|
||||||
|
mtLog_UserID0="ID"
|
||||||
|
Count mtLog_UserName=1
|
||||||
|
mtLog_UserName0="Name"
|
||||||
|
Count mtLog_UserEmail=1
|
||||||
|
mtLog_UserEmail0="Email"
|
||||||
|
Count mtLog_UserCompany=1
|
||||||
|
mtLog_UserCompany0="Company"
|
||||||
|
Count mtLog_UserPrivileges=1
|
||||||
|
mtLog_UserPrivileges0="Privileges"
|
||||||
|
Count mtLog_ActCtrlsHeader=1
|
||||||
|
mtLog_ActCtrlsHeader0="Active Controls"
|
||||||
|
Count mtLog_ActCtrlsFormClass=1
|
||||||
|
mtLog_ActCtrlsFormClass0="Form Class"
|
||||||
|
Count mtLog_ActCtrlsFormText=1
|
||||||
|
mtLog_ActCtrlsFormText0="Form Text"
|
||||||
|
Count mtLog_ActCtrlsControlClass=1
|
||||||
|
mtLog_ActCtrlsControlClass0="Control Class"
|
||||||
|
Count mtLog_ActCtrlsControlText=1
|
||||||
|
mtLog_ActCtrlsControlText0="Control Text"
|
||||||
|
Count mtLog_CmpHeader=1
|
||||||
|
mtLog_CmpHeader0="Computer"
|
||||||
|
Count mtLog_CmpName=1
|
||||||
|
mtLog_CmpName0="Name"
|
||||||
|
Count mtLog_CmpTotalMemory=1
|
||||||
|
mtLog_CmpTotalMemory0="Total Memory"
|
||||||
|
Count mtLog_CmpFreeMemory=1
|
||||||
|
mtLog_CmpFreeMemory0="Free Memory"
|
||||||
|
Count mtLog_CmpTotalDisk=1
|
||||||
|
mtLog_CmpTotalDisk0="Total Disk"
|
||||||
|
Count mtLog_CmpFreeDisk=1
|
||||||
|
mtLog_CmpFreeDisk0="Free Disk"
|
||||||
|
Count mtLog_CmpSystemUpTime=1
|
||||||
|
mtLog_CmpSystemUpTime0="System Up Time"
|
||||||
|
Count mtLog_CmpProcessor=1
|
||||||
|
mtLog_CmpProcessor0="Processor"
|
||||||
|
Count mtLog_CmpDisplayMode=1
|
||||||
|
mtLog_CmpDisplayMode0="Display Mode"
|
||||||
|
Count mtLog_CmpDisplayDPI=1
|
||||||
|
mtLog_CmpDisplayDPI0="Display DPI"
|
||||||
|
Count mtLog_CmpVideoCard=1
|
||||||
|
mtLog_CmpVideoCard0="Video Card"
|
||||||
|
Count mtLog_CmpPrinter=1
|
||||||
|
mtLog_CmpPrinter0="Printer"
|
||||||
|
Count mtLog_OSHeader=1
|
||||||
|
mtLog_OSHeader0="Operating System"
|
||||||
|
Count mtLog_OSType=1
|
||||||
|
mtLog_OSType0="Type"
|
||||||
|
Count mtLog_OSBuildN=1
|
||||||
|
mtLog_OSBuildN0="Build #"
|
||||||
|
Count mtLog_OSUpdate=1
|
||||||
|
mtLog_OSUpdate0="Update"
|
||||||
|
Count mtLog_OSLanguage=1
|
||||||
|
mtLog_OSLanguage0="Language"
|
||||||
|
Count mtLog_OSCharset=1
|
||||||
|
mtLog_OSCharset0="Charset"
|
||||||
|
Count mtLog_NetHeader=1
|
||||||
|
mtLog_NetHeader0="Network"
|
||||||
|
Count mtLog_NetIP=1
|
||||||
|
mtLog_NetIP0="IP Address"
|
||||||
|
Count mtLog_NetSubmask=1
|
||||||
|
mtLog_NetSubmask0="Submask"
|
||||||
|
Count mtLog_NetGateway=1
|
||||||
|
mtLog_NetGateway0="Gateway"
|
||||||
|
Count mtLog_NetDNS1=1
|
||||||
|
mtLog_NetDNS10="DNS 1"
|
||||||
|
Count mtLog_NetDNS2=1
|
||||||
|
mtLog_NetDNS20="DNS 2"
|
||||||
|
Count mtLog_NetDHCP=1
|
||||||
|
mtLog_NetDHCP0="DHCP"
|
||||||
|
Count mtLog_CustInfoHeader=1
|
||||||
|
mtLog_CustInfoHeader0="Custom Information"
|
||||||
|
Count mtCallStack_Address=1
|
||||||
|
mtCallStack_Address0="Address"
|
||||||
|
Count mtCallStack_Name=1
|
||||||
|
mtCallStack_Name0="Module"
|
||||||
|
Count mtCallStack_Unit=1
|
||||||
|
mtCallStack_Unit0="Unit"
|
||||||
|
Count mtCallStack_Class=1
|
||||||
|
mtCallStack_Class0="Class"
|
||||||
|
Count mtCallStack_Procedure=1
|
||||||
|
mtCallStack_Procedure0="Procedure/Method"
|
||||||
|
Count mtCallStack_Line=1
|
||||||
|
mtCallStack_Line0="Line"
|
||||||
|
Count mtCallStack_MainThread=1
|
||||||
|
mtCallStack_MainThread0="Main"
|
||||||
|
Count mtCallStack_ExceptionThread=1
|
||||||
|
mtCallStack_ExceptionThread0="Exception Thread"
|
||||||
|
Count mtCallStack_RunningThread=1
|
||||||
|
mtCallStack_RunningThread0="Running Thread"
|
||||||
|
Count mtCallStack_CallingThread=1
|
||||||
|
mtCallStack_CallingThread0="Calling Thread"
|
||||||
|
Count mtCallStack_ThreadID=1
|
||||||
|
mtCallStack_ThreadID0="ID"
|
||||||
|
Count mtCallStack_ThreadPriority=1
|
||||||
|
mtCallStack_ThreadPriority0="Priority"
|
||||||
|
Count mtCallStack_ThreadClass=1
|
||||||
|
mtCallStack_ThreadClass0="Class"
|
||||||
|
Count mtCallStack_LeakCaption=1
|
||||||
|
mtCallStack_LeakCaption0="Memory Leak"
|
||||||
|
Count mtCallStack_LeakData=1
|
||||||
|
mtCallStack_LeakData0="Data"
|
||||||
|
Count mtCallStack_LeakType=1
|
||||||
|
mtCallStack_LeakType0="Type"
|
||||||
|
Count mtCallStack_LeakSize=1
|
||||||
|
mtCallStack_LeakSize0="Total size"
|
||||||
|
Count mtCallStack_LeakCount=1
|
||||||
|
mtCallStack_LeakCount0="Count"
|
||||||
|
Count mtSendDialog_Caption=1
|
||||||
|
mtSendDialog_Caption0="Send."
|
||||||
|
Count mtSendDialog_Message=1
|
||||||
|
mtSendDialog_Message0="Message"
|
||||||
|
Count mtSendDialog_Resolving=1
|
||||||
|
mtSendDialog_Resolving0="Resolving DNS..."
|
||||||
|
Count mtSendDialog_Login=1
|
||||||
|
mtSendDialog_Login0="Login..."
|
||||||
|
Count mtSendDialog_Connecting=1
|
||||||
|
mtSendDialog_Connecting0="Connecting with server..."
|
||||||
|
Count mtSendDialog_Connected=1
|
||||||
|
mtSendDialog_Connected0="Connected with server."
|
||||||
|
Count mtSendDialog_Sending=1
|
||||||
|
mtSendDialog_Sending0="Sending message..."
|
||||||
|
Count mtSendDialog_Sent=1
|
||||||
|
mtSendDialog_Sent0="Message sent."
|
||||||
|
Count mtSendDialog_SelectProject=1
|
||||||
|
mtSendDialog_SelectProject0="Select project..."
|
||||||
|
Count mtSendDialog_Searching=1
|
||||||
|
mtSendDialog_Searching0="Searching..."
|
||||||
|
Count mtSendDialog_Modifying=1
|
||||||
|
mtSendDialog_Modifying0="Modifying..."
|
||||||
|
Count mtSendDialog_Disconnecting=1
|
||||||
|
mtSendDialog_Disconnecting0="Disconnecting..."
|
||||||
|
Count mtSendDialog_Disconnected=1
|
||||||
|
mtSendDialog_Disconnected0="Disconnected."
|
||||||
|
Count mtReproduceDialog_Caption=1
|
||||||
|
mtReproduceDialog_Caption0="Request"
|
||||||
|
Count mtReproduceDialog_Request=1
|
||||||
|
mtReproduceDialog_Request0="Please describe the steps to reproduce the error:"
|
||||||
|
Count mtReproduceDialog_OKButtonCaption=1
|
||||||
|
mtReproduceDialog_OKButtonCaption0="%26OK"
|
||||||
|
Count mtModules_Handle=1
|
||||||
|
mtModules_Handle0="Handle"
|
||||||
|
Count mtModules_Name=1
|
||||||
|
mtModules_Name0="Name"
|
||||||
|
Count mtModules_Description=1
|
||||||
|
mtModules_Description0="Description"
|
||||||
|
Count mtModules_Version=1
|
||||||
|
mtModules_Version0="Version"
|
||||||
|
Count mtModules_Size=1
|
||||||
|
mtModules_Size0="Size"
|
||||||
|
Count mtModules_LastModified=1
|
||||||
|
mtModules_LastModified0="Modified"
|
||||||
|
Count mtModules_Path=1
|
||||||
|
mtModules_Path0="Path"
|
||||||
|
Count mtProcesses_ID=1
|
||||||
|
mtProcesses_ID0="ID"
|
||||||
|
Count mtProcesses_Name=1
|
||||||
|
mtProcesses_Name0="Name"
|
||||||
|
Count mtProcesses_Description=1
|
||||||
|
mtProcesses_Description0="Description"
|
||||||
|
Count mtProcesses_Version=1
|
||||||
|
mtProcesses_Version0="Version"
|
||||||
|
Count mtProcesses_Memory=1
|
||||||
|
mtProcesses_Memory0="Memory"
|
||||||
|
Count mtProcesses_Priority=1
|
||||||
|
mtProcesses_Priority0="Priority"
|
||||||
|
Count mtProcesses_Threads=1
|
||||||
|
mtProcesses_Threads0="Threads"
|
||||||
|
Count mtProcesses_Path=1
|
||||||
|
mtProcesses_Path0="Path"
|
||||||
|
Count mtCPU_Registers=1
|
||||||
|
mtCPU_Registers0="Registers"
|
||||||
|
Count mtCPU_Stack=1
|
||||||
|
mtCPU_Stack0="Stack"
|
||||||
|
Count mtCPU_MemoryDump=1
|
||||||
|
mtCPU_MemoryDump0="Memory Dump"
|
||||||
|
Count mtSend_SuccessMsg=1
|
||||||
|
mtSend_SuccessMsg0="The message was sent successfully."
|
||||||
|
Count mtSend_FailureMsg=1
|
||||||
|
mtSend_FailureMsg0="Sorry, sending the message didn't work."
|
||||||
|
Count mtSend_BugClosedMsg=2
|
||||||
|
mtSend_BugClosedMsg0="These BUG is just closed."
|
||||||
|
mtSend_BugClosedMsg1="Contact the program support to obtain an update."
|
||||||
|
Count mtSend_UnknownErrorMsg=1
|
||||||
|
mtSend_UnknownErrorMsg0="Unknown error."
|
||||||
|
Count mtSend_InvalidLoginMsg=1
|
||||||
|
mtSend_InvalidLoginMsg0="Invalid login request."
|
||||||
|
Count mtSend_InvalidSearchMsg=1
|
||||||
|
mtSend_InvalidSearchMsg0="Invalid search request."
|
||||||
|
Count mtSend_InvalidSelectionMsg=1
|
||||||
|
mtSend_InvalidSelectionMsg0="Invalid selection request."
|
||||||
|
Count mtSend_InvalidInsertMsg=1
|
||||||
|
mtSend_InvalidInsertMsg0="Invalid insert request."
|
||||||
|
Count mtSend_InvalidModifyMsg=1
|
||||||
|
mtSend_InvalidModifyMsg0="Invalid modify request."
|
||||||
|
Count mtFileCrackedMsg=2
|
||||||
|
mtFileCrackedMsg0="This file is cracked."
|
||||||
|
mtFileCrackedMsg1="The application will be closed."
|
||||||
|
Count mtException_LeakMultiFree=1
|
||||||
|
mtException_LeakMultiFree0="Multi Free memory leak."
|
||||||
|
Count mtException_LeakMemoryOverrun=1
|
||||||
|
mtException_LeakMemoryOverrun0="Memory Overrun leak."
|
||||||
|
Count mtException_AntiFreeze=1
|
||||||
|
mtException_AntiFreeze0="The application seems to be frozen."
|
||||||
|
Count mtInvalidEmailMsg=1
|
||||||
|
mtInvalidEmailMsg0="Invalid email."
|
||||||
|
TextsCollection=English
|
||||||
|
EurekaLog Last Line -->
|
||||||
@ -0,0 +1,16 @@
|
|||||||
|
/* VER185
|
||||||
|
Generated by the CodeGear Delphi Pascal Compiler
|
||||||
|
because -GD or --drc was supplied to the compiler.
|
||||||
|
|
||||||
|
This file contains compiler-generated resources that
|
||||||
|
were bound to the executable.
|
||||||
|
If this file is empty, then no compiler-generated
|
||||||
|
resources were bound to the produced executable.
|
||||||
|
*/
|
||||||
|
|
||||||
|
STRINGTABLE
|
||||||
|
BEGIN
|
||||||
|
END
|
||||||
|
|
||||||
|
/* C:\Codigo\Source\Modulos\ProcesoPresupuestoCliente\Controller\ProcesoPresupuestosCliente_controller.res */
|
||||||
|
/* C:\Codigo\Source\Modulos\ProcesoPresupuestoCliente\Controller\ProcesoPresupuestosCliente_controller.drf */
|
||||||
@ -0,0 +1,38 @@
|
|||||||
|
unit uIEditorProcesoPresupuestosCliente;
|
||||||
|
|
||||||
|
interface
|
||||||
|
|
||||||
|
uses
|
||||||
|
uEditorDBItem, uBizPedidosCliente, uBizPedidosProveedor, uBizAlbaranesProveedor,
|
||||||
|
uBizFacturasProveedor;
|
||||||
|
//uPedidosClienteController;
|
||||||
|
|
||||||
|
type
|
||||||
|
IEditorProcesoPresupuestosCliente = interface(IEditorDBItem)
|
||||||
|
['{B927F0A3-EE94-4E9C-A777-4282A78F65D2}']
|
||||||
|
// function GetController : IPedidosClienteController;
|
||||||
|
// procedure SetController (const Value : IPedidosClienteController);
|
||||||
|
// property Controller : IPedidosClienteController read GetController
|
||||||
|
// write SetController;
|
||||||
|
|
||||||
|
function GetPedidosCliente: IBizPedidoCliente;
|
||||||
|
procedure SetPedidosCliente(const Value: IBizPedidoCliente);
|
||||||
|
property PedidosCliente: IBizPedidoCliente read GetPedidosCliente write SetPedidosCliente;
|
||||||
|
|
||||||
|
function GetPedidosProveedor: IBizPedidoProveedor;
|
||||||
|
procedure SetPedidosProveedor(const Value: IBizPedidoProveedor);
|
||||||
|
property PedidosProveedor: IBizPedidoProveedor read GetPedidosProveedor write SetPedidosProveedor;
|
||||||
|
|
||||||
|
function GetAlbaranesProveedor: IBizAlbaranProveedor;
|
||||||
|
procedure SetAlbaranesProveedor(const Value: IBizAlbaranProveedor);
|
||||||
|
property AlbaranesProveedor: IBizAlbaranProveedor read GetAlbaranesProveedor write SetAlbaranesProveedor;
|
||||||
|
|
||||||
|
function GetFacturasProveedor: IBizFacturaProveedor;
|
||||||
|
procedure SetFacturasProveedor(const Value: IBizFacturaProveedor);
|
||||||
|
property FacturasProveedor: IBizFacturaProveedor read GetFacturasProveedor write SetFacturasProveedor;
|
||||||
|
|
||||||
|
end;
|
||||||
|
|
||||||
|
implementation
|
||||||
|
|
||||||
|
end.
|
||||||
@ -0,0 +1,243 @@
|
|||||||
|
unit uProcesoPresupuestosClienteController;
|
||||||
|
|
||||||
|
interface
|
||||||
|
|
||||||
|
|
||||||
|
uses
|
||||||
|
Classes, SysUtils, uDADataTable, FactuGES_Intf,
|
||||||
|
uControllerBase, uIDataModulePedidosCliente,
|
||||||
|
uBizPedidosCliente, uPedidosClienteController,
|
||||||
|
uBizPedidosProveedor, uPedidosProveedorController,
|
||||||
|
uBizAlbaranesProveedor, uAlbaranesProveedorController,
|
||||||
|
uBizFacturasProveedor, uFacturasProveedorController;
|
||||||
|
|
||||||
|
type
|
||||||
|
IProcesoPresupuestosClienteController = interface(IControllerBase)
|
||||||
|
['{CBF0D9CF-2CFB-4205-9891-4BAA4EFE0D7C}']
|
||||||
|
procedure VerProceso(const ListaIDPresupuestosCliente: TIntegerArray);
|
||||||
|
end;
|
||||||
|
|
||||||
|
TProcesoPresupuestosClienteController = class(TControllerBase, IProcesoPresupuestosClienteController)
|
||||||
|
private
|
||||||
|
FPedidosClienteController : IPedidosClienteController;
|
||||||
|
FPedidosProveedorController : IPedidosProveedorController;
|
||||||
|
FAlbaranesProveedorController : IAlbaranesProveedorController;
|
||||||
|
FFacturasProveedorController : IFacturasProveedorController;
|
||||||
|
|
||||||
|
public
|
||||||
|
constructor Create; override;
|
||||||
|
destructor Destroy; override;
|
||||||
|
|
||||||
|
function BuscarPedidosCliente(const ListaIDPresupuestosCliente: TIntegerArray): IBizPedidoCliente;
|
||||||
|
function BuscarPedidosProveedor(const ListaIDPresupuestosCliente: TIntegerArray): IBizPedidoProveedor;
|
||||||
|
function BuscarAlbaranesProveedor(APedidosProveedor: IBizPedidoProveedor): IBizAlbaranProveedor;
|
||||||
|
function BuscarFacturasProveedor(AAlbaranesProveedor: IBizAlbaranProveedor): IBizFacturaProveedor;
|
||||||
|
|
||||||
|
procedure VerProceso(const ListaIDPresupuestosCliente: TIntegerArray);
|
||||||
|
end;
|
||||||
|
|
||||||
|
implementation
|
||||||
|
|
||||||
|
uses
|
||||||
|
uROTypes, Controls, cxControls, DB, uEditorRegistryUtils, uEditorPreview, DateUtils,
|
||||||
|
uFactuGES_App, uDataTableUtils, uDataModuleUsuarios, Forms,
|
||||||
|
schPedidosClienteClient_Intf, uDAInterfaces,
|
||||||
|
uDateUtils, Dialogs, Variants, uSistemaFunc, uIntegerListUtils, uStringsUtils,
|
||||||
|
uIEditorProcesoPresupuestosCliente, uModuleController;
|
||||||
|
|
||||||
|
{ TProcesoPresupuestosClienteController }
|
||||||
|
constructor TProcesoPresupuestosClienteController.Create;
|
||||||
|
begin
|
||||||
|
inherited;
|
||||||
|
FPedidosClienteController := TPedidosClienteController.Create;
|
||||||
|
FPedidosProveedorController := TPedidosProveedorController.Create;
|
||||||
|
FAlbaranesProveedorController := TAlbaranesProveedorController.Create;
|
||||||
|
FFacturasProveedorController := TFacturasProveedorController.Create;
|
||||||
|
end;
|
||||||
|
|
||||||
|
destructor TProcesoPresupuestosClienteController.Destroy;
|
||||||
|
begin
|
||||||
|
FPedidosClienteController := Nil;
|
||||||
|
FPedidosProveedorController := Nil;
|
||||||
|
FAlbaranesProveedorController := Nil;
|
||||||
|
FFacturasProveedorController := Nil;
|
||||||
|
inherited;
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TProcesoPresupuestosClienteController.BuscarAlbaranesProveedor(APedidosProveedor: IBizPedidoProveedor): IBizAlbaranProveedor;
|
||||||
|
var
|
||||||
|
Condicion: TDAWhereExpression;
|
||||||
|
AArray : Array of TDAWhereExpression;
|
||||||
|
i: Integer;
|
||||||
|
|
||||||
|
begin
|
||||||
|
Result := FAlbaranesProveedorController.BuscarTodos;
|
||||||
|
//Quitamos el filtro por empresa ya que no es necesario y complicaría where que hacemos a continuación, además de que puede darse el caso de haber dado de alta un pedido de proveedor con otra empresa?
|
||||||
|
Result.DataTable.DynamicWhere.Clear;
|
||||||
|
|
||||||
|
if Assigned(Result) then
|
||||||
|
begin
|
||||||
|
//Vamos generando todos los where necesarios para cada uno de los ID de Pedido de proveedor que buscamos
|
||||||
|
// Filtrar los Presupuestos pendientes de recepcion
|
||||||
|
with Result.DataTable.DynamicWhere do
|
||||||
|
begin
|
||||||
|
APedidosProveedor.Open;
|
||||||
|
SetLength(AArray, APedidosProveedor.RecordCount);
|
||||||
|
APedidosProveedor.First;
|
||||||
|
i:=0;
|
||||||
|
while not ApedidosProveedor.EOF do
|
||||||
|
begin
|
||||||
|
AArray[i] := NewConstant(APedidosProveedor.ID, datInteger);
|
||||||
|
Inc(i);
|
||||||
|
APedidosProveedor.Next;
|
||||||
|
end;
|
||||||
|
|
||||||
|
// (ID_PEDIDO in lista IDs)
|
||||||
|
Condicion := NewBinaryExpression(NewField('', 'ID_PEDIDO'), NewList(AArray), dboIn);
|
||||||
|
if IsEmpty then
|
||||||
|
Expression := Condicion
|
||||||
|
else
|
||||||
|
Expression := NewBinaryExpression(Expression, Condicion, dboAnd);
|
||||||
|
|
||||||
|
APedidosProveedor.Close;
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TProcesoPresupuestosClienteController.BuscarFacturasProveedor(AAlbaranesProveedor: IBizAlbaranProveedor): IBizFacturaProveedor;
|
||||||
|
var
|
||||||
|
Condicion: TDAWhereExpression;
|
||||||
|
AArray : Array of TDAWhereExpression;
|
||||||
|
i: Integer;
|
||||||
|
|
||||||
|
begin
|
||||||
|
Result := FFacturasProveedorController.BuscarTodosDeAlbaran;
|
||||||
|
|
||||||
|
if Assigned(Result) then
|
||||||
|
begin
|
||||||
|
// Filtrar los Presupuestos pendientes de recepcion
|
||||||
|
with Result.DataTable.DynamicWhere do
|
||||||
|
begin
|
||||||
|
//Vamos generando todos los where necesarios para cada uno de los ID de Pedido de proveedor que buscamos
|
||||||
|
AAlbaranesProveedor.Open;
|
||||||
|
SetLength(AArray, AAlbaranesProveedor.RecordCount);
|
||||||
|
AAlbaranesProveedor.First;
|
||||||
|
i:=0;
|
||||||
|
while not AAlbaranesProveedor.EOF do
|
||||||
|
begin
|
||||||
|
if not AAlbaranesProveedor.ID_FACTURAIsNull then
|
||||||
|
begin
|
||||||
|
AArray[i] := NewConstant(AAlbaranesProveedor.ID, datInteger);
|
||||||
|
Inc(i);
|
||||||
|
end;
|
||||||
|
AAlbaranesProveedor.Next;
|
||||||
|
end;
|
||||||
|
|
||||||
|
// (ID in lista de IDs)
|
||||||
|
Condicion := NewBinaryExpression(NewField('', 'ID_ALBARAN'), NewList(AArray), dboIn);
|
||||||
|
if IsEmpty then
|
||||||
|
Expression := Condicion
|
||||||
|
else
|
||||||
|
Expression := NewBinaryExpression(Expression, Condicion, dboOr);
|
||||||
|
|
||||||
|
AAlbaranesProveedor.Close;
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TProcesoPresupuestosClienteController.BuscarPedidosCliente(const ListaIDPresupuestosCliente: TIntegerArray): IBizPedidoCliente;
|
||||||
|
var
|
||||||
|
Condicion: TDAWhereExpression;
|
||||||
|
AArray : Array of TDAWhereExpression;
|
||||||
|
i: Integer;
|
||||||
|
|
||||||
|
begin
|
||||||
|
Result := FPedidosClienteController.BuscarTodos;
|
||||||
|
//Quitamos el filtro por empresa ya que no es necesario y complicaría where que hacemos a continuación
|
||||||
|
Result.DataTable.DynamicWhere.Clear;
|
||||||
|
|
||||||
|
if Assigned(Result) then
|
||||||
|
begin
|
||||||
|
// Filtrar los pedidos de cliente que esten en la lista
|
||||||
|
with Result.DataTable.DynamicWhere do
|
||||||
|
begin
|
||||||
|
SetLength(AArray, ListaIDPresupuestosCliente.Count);
|
||||||
|
//Vamos generando la lista de ID de pedidos de cliente que vamos a inlcuir en la clausula IN
|
||||||
|
for i := 0 to ListaIDPresupuestosCliente.Count - 1 do
|
||||||
|
AArray[i] := NewConstant(ListaIDPresupuestosCliente.Items[i], datInteger);
|
||||||
|
|
||||||
|
// (ID IN lista de IDs)
|
||||||
|
Condicion := NewBinaryExpression(NewField('', fld_PedidosClienteID), NewList(AArray), dboIn);
|
||||||
|
if IsEmpty then
|
||||||
|
Expression := Condicion
|
||||||
|
else
|
||||||
|
Expression := NewBinaryExpression(Expression, Condicion, dboAnd);
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TProcesoPresupuestosClienteController.BuscarPedidosProveedor(const ListaIDPresupuestosCliente: TIntegerArray): IBizPedidoProveedor;
|
||||||
|
var
|
||||||
|
Condicion: TDAWhereExpression;
|
||||||
|
AArray : Array of TDAWhereExpression;
|
||||||
|
i: Integer;
|
||||||
|
|
||||||
|
begin
|
||||||
|
Result := FPedidosProveedorController.BuscarTodos;
|
||||||
|
//Quitamos el filtro por empresa ya que no es necesario y complicaría where que hacemos a continuación, además de que puede darse el caso de haber dado de alta un pedido de proveedor con otra empresa?
|
||||||
|
Result.DataTable.DynamicWhere.Clear;
|
||||||
|
|
||||||
|
if Assigned(Result) then
|
||||||
|
begin
|
||||||
|
// Filtrar los Pedidos de proveedor relacionados con los pedidos de cliente pasados por parametro
|
||||||
|
with Result.DataTable.DynamicWhere do
|
||||||
|
begin
|
||||||
|
SetLength(AArray, ListaIDPresupuestosCliente.Count);
|
||||||
|
//Vamos generando la lista de ID de pedidos de cliente que vamos a inlcuir en la clausula IN
|
||||||
|
for i := 0 to ListaIDPresupuestosCliente.Count - 1 do
|
||||||
|
AArray[i] := NewConstant(ListaIDPresupuestosCliente.Items[i], datInteger);
|
||||||
|
|
||||||
|
// (ID_PEDIDO_CLIENTE IN lista de IDs)
|
||||||
|
Condicion := NewBinaryExpression(NewField('', 'ID_PEDIDO_CLIENTE'), NewList(AArray), dboIn);
|
||||||
|
if IsEmpty then
|
||||||
|
Expression := Condicion
|
||||||
|
else
|
||||||
|
Expression := NewBinaryExpression(Expression, Condicion, dboAnd);
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
procedure TProcesoPresupuestosClienteController.VerProceso(const ListaIDPresupuestosCliente: TIntegerArray);
|
||||||
|
var
|
||||||
|
AEditor : IEditorProcesoPresupuestosCliente;
|
||||||
|
APedidosCliente: IBizPedidoCliente;
|
||||||
|
APedidosProveedor: IBizPedidoProveedor;
|
||||||
|
AAlbaranesProveedor: IBizAlbaranProveedor;
|
||||||
|
AFacturasProveedor: IBizFacturaProveedor;
|
||||||
|
|
||||||
|
begin
|
||||||
|
AEditor := NIL;
|
||||||
|
|
||||||
|
APedidosCliente := BuscarPedidosCliente(ListaIDPresupuestosCliente);
|
||||||
|
APedidosProveedor := BuscarPedidosProveedor(ListaIDPresupuestosCliente);
|
||||||
|
AAlbaranesProveedor := BuscarAlbaranesProveedor(APedidosProveedor);
|
||||||
|
AFacturasProveedor := BuscarFacturasProveedor(AAlbaranesProveedor);
|
||||||
|
|
||||||
|
CreateEditor('EditorProcesoPresupuestosCLiente', IEditorProcesoPresupuestosCliente, AEditor);
|
||||||
|
if Assigned(AEditor) then
|
||||||
|
try
|
||||||
|
// AEditor.Controller := Self; //OJO ORDEN MUY IMPORTANTE
|
||||||
|
AEditor.PedidosCliente := APedidosCliente;
|
||||||
|
AEditor.PedidosProveedor := APedidosProveedor;
|
||||||
|
AEditor.AlbaranesProveedor := AAlbaranesProveedor;
|
||||||
|
AEditor.FacturasProveedor := AFacturasProveedor;
|
||||||
|
AEditor.ShowModal;
|
||||||
|
finally
|
||||||
|
AEditor.Release;
|
||||||
|
AEditor := NIL;
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
|
||||||
|
end.
|
||||||
Binary file not shown.
@ -0,0 +1,549 @@
|
|||||||
|
<?xml version="1.0" encoding="utf-8"?>
|
||||||
|
<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
|
||||||
|
<PropertyGroup>
|
||||||
|
<ProjectGuid>{e7d762a1-3a15-46b2-bd5b-3821d13b8347}</ProjectGuid>
|
||||||
|
<MainSource>ProcesoPresupuestosCliente_plugin.dpk</MainSource>
|
||||||
|
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
|
||||||
|
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
|
||||||
|
<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
|
||||||
|
<DCC_DependencyCheckOutputName>..\..\..\..\Output\Debug\Cliente\ProcesoPresupuestosCliente_plugin.bpl</DCC_DependencyCheckOutputName>
|
||||||
|
</PropertyGroup>
|
||||||
|
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
|
||||||
|
<Version>7.0</Version>
|
||||||
|
<DCC_DebugInformation>False</DCC_DebugInformation>
|
||||||
|
<DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
|
||||||
|
<DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
|
||||||
|
<DCC_MapFile>3</DCC_MapFile>
|
||||||
|
<DCC_DcuOutput>.\</DCC_DcuOutput>
|
||||||
|
<DCC_ObjOutput>.\</DCC_ObjOutput>
|
||||||
|
<DCC_HppOutput>.\</DCC_HppOutput>
|
||||||
|
<DCC_BplOutput>..\..\..\..\Output\Debug\Cliente</DCC_BplOutput>
|
||||||
|
<DCC_DcpOutput>..\..\Lib</DCC_DcpOutput>
|
||||||
|
<DCC_UnitSearchPath>..\..\..\Lib;..\..\Lib</DCC_UnitSearchPath>
|
||||||
|
<DCC_ResourcePath>..\..\..\Lib;..\..\Lib</DCC_ResourcePath>
|
||||||
|
<DCC_ObjPath>..\..\..\Lib;..\..\Lib</DCC_ObjPath>
|
||||||
|
<DCC_IncludePath>..\..\..\Lib;..\..\Lib</DCC_IncludePath>
|
||||||
|
<DCC_Define>RELEASE</DCC_Define>
|
||||||
|
</PropertyGroup>
|
||||||
|
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
|
||||||
|
<Version>7.0</Version>
|
||||||
|
<DCC_MapFile>3</DCC_MapFile>
|
||||||
|
<DCC_DcuOutput>.\</DCC_DcuOutput>
|
||||||
|
<DCC_ObjOutput>.\</DCC_ObjOutput>
|
||||||
|
<DCC_HppOutput>.\</DCC_HppOutput>
|
||||||
|
<DCC_BplOutput>..\..\..\..\Output\Debug\Cliente</DCC_BplOutput>
|
||||||
|
<DCC_DcpOutput>..\..\Lib</DCC_DcpOutput>
|
||||||
|
<DCC_UnitSearchPath>..\..\..\Lib;..\..\Lib</DCC_UnitSearchPath>
|
||||||
|
<DCC_ResourcePath>..\..\..\Lib;..\..\Lib</DCC_ResourcePath>
|
||||||
|
<DCC_ObjPath>..\..\..\Lib;..\..\Lib</DCC_ObjPath>
|
||||||
|
<DCC_IncludePath>..\..\..\Lib;..\..\Lib</DCC_IncludePath>
|
||||||
|
</PropertyGroup>
|
||||||
|
<ProjectExtensions>
|
||||||
|
<Borland.Personality>Delphi.Personality</Borland.Personality>
|
||||||
|
<Borland.ProjectType>Package</Borland.ProjectType>
|
||||||
|
<BorlandProject>
|
||||||
|
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</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"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
|
||||||
|
|
||||||
|
|
||||||
|
<Excluded_Packages Name="C:\Archivos de programa\RemObjects Software\Pascal Script\Dcu\D10\PascalScript_RO_D10.bpl">RemObjects Pascal Script - RemObjects SDK 3.0 Integration</Excluded_Packages>
|
||||||
|
<Excluded_Packages Name="C:\Archivos de programa\EurekaLog 5\Delphi10\ExceptionExpert10.bpl">EurekaLog 5.1.9</Excluded_Packages>
|
||||||
|
</Excluded_Packages><Source><Source Name="MainSource">ProcesoPresupuestosCliente_plugin.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
|
||||||
|
</ProjectExtensions>
|
||||||
|
<Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
|
||||||
|
<ItemGroup>
|
||||||
|
<DelphiCompile Include="ProcesoPresupuestosCliente_plugin.dpk">
|
||||||
|
<MainSource>MainSource</MainSource>
|
||||||
|
</DelphiCompile>
|
||||||
|
<DCCReference Include="..\..\Lib\ApplicationBase.dcp" />
|
||||||
|
<DCCReference Include="..\..\Lib\Base.dcp" />
|
||||||
|
<DCCReference Include="..\..\Lib\GUIBase.dcp" />
|
||||||
|
<DCCReference Include="..\..\Lib\ProcesoPresupuestosCliente_controller.dcp" />
|
||||||
|
<DCCReference Include="..\..\Lib\ProcesoPresupuestosCliente_view.dcp" />
|
||||||
|
<DCCReference Include="uPluginProcesoPresupuestosCliente.pas">
|
||||||
|
<Form>PluginProcesoPresupuestosCliente</Form>
|
||||||
|
</DCCReference>
|
||||||
|
</ItemGroup>
|
||||||
|
</Project>
|
||||||
|
<!-- EurekaLog First Line
|
||||||
|
[Exception Log]
|
||||||
|
EurekaLog Version=6011
|
||||||
|
Activate=0
|
||||||
|
Activate Handle=1
|
||||||
|
Save Log File=1
|
||||||
|
Foreground Tab=0
|
||||||
|
Freeze Activate=0
|
||||||
|
Freeze Timeout=60
|
||||||
|
SMTP From=eurekalog@email.com
|
||||||
|
SMTP Host=
|
||||||
|
SMTP Port=25
|
||||||
|
SMTP UserID=
|
||||||
|
SMTP Password=
|
||||||
|
Append to Log=0
|
||||||
|
TerminateBtn Operation=2
|
||||||
|
Errors Number=32
|
||||||
|
Errors Terminate=3
|
||||||
|
Email Address=
|
||||||
|
Email Object=
|
||||||
|
Email Send Options=0
|
||||||
|
Output Path=
|
||||||
|
Encrypt Password=
|
||||||
|
AutoCloseDialogSecs=0
|
||||||
|
WebSendMode=0
|
||||||
|
SupportULR=
|
||||||
|
HTMLLayout Count=15
|
||||||
|
HTMLLine0="%3Chtml%3E"
|
||||||
|
HTMLLine1=" %3Chead%3E"
|
||||||
|
HTMLLine2=" %3C/head%3E"
|
||||||
|
HTMLLine3=" %3Cbody TopMargin=10 LeftMargin=10%3E"
|
||||||
|
HTMLLine4=" %3Ctable width="100%%" border="0"%3E"
|
||||||
|
HTMLLine5=" %3Ctr%3E"
|
||||||
|
HTMLLine6=" %3Ctd nowrap%3E"
|
||||||
|
HTMLLine7=" %3Cfont face="Lucida Console, Courier" size="2"%3E"
|
||||||
|
HTMLLine8=" %3C%%HTML_TAG%%%3E"
|
||||||
|
HTMLLine9=" %3C/font%3E"
|
||||||
|
HTMLLine10=" %3C/td%3E"
|
||||||
|
HTMLLine11=" %3C/tr%3E"
|
||||||
|
HTMLLine12=" %3C/table%3E"
|
||||||
|
HTMLLine13=" %3C/body%3E"
|
||||||
|
HTMLLine14="%3C/html%3E"
|
||||||
|
AutoCrashOperation=2
|
||||||
|
AutoCrashNumber=10
|
||||||
|
AutoCrashMinutes=1
|
||||||
|
WebURL=
|
||||||
|
WebUserID=
|
||||||
|
WebPassword=
|
||||||
|
WebPort=0
|
||||||
|
AttachedFiles=
|
||||||
|
ProxyURL=
|
||||||
|
ProxyUser=
|
||||||
|
ProxyPassword=
|
||||||
|
ProxyPort=8080
|
||||||
|
TrakerUser=
|
||||||
|
TrakerPassword=
|
||||||
|
TrakerAssignTo=
|
||||||
|
TrakerProject=
|
||||||
|
TrakerCategory=
|
||||||
|
TrakerTrialID=
|
||||||
|
ZipPassword=
|
||||||
|
PreBuildEvent=
|
||||||
|
PostSuccessfulBuildEvent=
|
||||||
|
PostFailureBuildEvent=
|
||||||
|
ExceptionDialogType=2
|
||||||
|
Count=0
|
||||||
|
EMail Message Line Count=0
|
||||||
|
loNoDuplicateErrors=0
|
||||||
|
loAppendReproduceText=0
|
||||||
|
loDeleteLogAtVersionChange=0
|
||||||
|
loAddComputerNameInLogFileName=0
|
||||||
|
loSaveModulesAndProcessesSections=1
|
||||||
|
loSaveAssemblerAndCPUSections=1
|
||||||
|
soAppStartDate=1
|
||||||
|
soAppName=1
|
||||||
|
soAppVersionNumber=1
|
||||||
|
soAppParameters=1
|
||||||
|
soAppCompilationDate=1
|
||||||
|
soAppUpTime=1
|
||||||
|
soExcDate=1
|
||||||
|
soExcAddress=1
|
||||||
|
soExcModuleName=1
|
||||||
|
soExcModuleVersion=1
|
||||||
|
soExcType=1
|
||||||
|
soExcMessage=1
|
||||||
|
soExcID=1
|
||||||
|
soExcCount=1
|
||||||
|
soExcStatus=1
|
||||||
|
soExcNote=1
|
||||||
|
soUserID=1
|
||||||
|
soUserName=1
|
||||||
|
soUserEmail=1
|
||||||
|
soUserPrivileges=1
|
||||||
|
soUserCompany=1
|
||||||
|
soActCtlsFormClass=1
|
||||||
|
soActCtlsFormText=1
|
||||||
|
soActCtlsControlClass=1
|
||||||
|
soActCtlsControlText=1
|
||||||
|
soCmpName=1
|
||||||
|
soCmpTotalMemory=1
|
||||||
|
soCmpFreeMemory=1
|
||||||
|
soCmpTotalDisk=1
|
||||||
|
soCmpFreeDisk=1
|
||||||
|
soCmpSysUpTime=1
|
||||||
|
soCmpProcessor=1
|
||||||
|
soCmpDisplayMode=1
|
||||||
|
soCmpDisplayDPI=1
|
||||||
|
soCmpVideoCard=1
|
||||||
|
soCmpPrinter=1
|
||||||
|
soOSType=1
|
||||||
|
soOSBuildN=1
|
||||||
|
soOSUpdate=1
|
||||||
|
soOSLanguage=1
|
||||||
|
soOSCharset=1
|
||||||
|
soNetIP=1
|
||||||
|
soNetSubmask=1
|
||||||
|
soNetGateway=1
|
||||||
|
soNetDNS1=1
|
||||||
|
soNetDNS2=1
|
||||||
|
soNetDHCP=1
|
||||||
|
soCustomData=1
|
||||||
|
sndShowSendDialog=1
|
||||||
|
sndShowSuccessFailureMsg=0
|
||||||
|
sndSendEntireLog=0
|
||||||
|
sndSendXMLLogCopy=0
|
||||||
|
sndSendScreenshot=1
|
||||||
|
sndUseOnlyActiveWindow=0
|
||||||
|
sndSendLastHTMLPage=1
|
||||||
|
sndSendInSeparatedThread=0
|
||||||
|
sndAddDateInFileName=0
|
||||||
|
sndAddComputerNameInFileName=0
|
||||||
|
edoSendErrorReportChecked=1
|
||||||
|
edoAttachScreenshotChecked=1
|
||||||
|
edoShowCopyToClipOption=1
|
||||||
|
edoShowDetailsButton=1
|
||||||
|
edoShowInDetailedMode=0
|
||||||
|
edoShowInTopMostMode=0
|
||||||
|
edoUseEurekaLogLookAndFeel=0
|
||||||
|
edoShowSendErrorReportOption=1
|
||||||
|
edoShowAttachScreenshotOption=1
|
||||||
|
edoShowCustomButton=0
|
||||||
|
csoShowDLLs=1
|
||||||
|
csoShowBPLs=1
|
||||||
|
csoShowBorlandThreads=1
|
||||||
|
csoShowWindowsThreads=1
|
||||||
|
csoDoNotStoreProcNames=0
|
||||||
|
boPauseBorlandThreads=0
|
||||||
|
boDoNotPauseMainThread=0
|
||||||
|
boPauseWindowsThreads=0
|
||||||
|
boUseMainModuleOptions=1
|
||||||
|
boCopyLogInCaseOfError=1
|
||||||
|
boSaveCompressedCopyInCaseOfError=0
|
||||||
|
boHandleSafeCallExceptions=1
|
||||||
|
boCallRTLExceptionEvent=0
|
||||||
|
boCatchHandledExceptions=0
|
||||||
|
loCatchLeaks=0
|
||||||
|
loGroupsSonLeaks=1
|
||||||
|
loHideBorlandLeaks=1
|
||||||
|
loFreeAllLeaks=1
|
||||||
|
loCatchLeaksExceptions=1
|
||||||
|
cfoReduceFileSize=1
|
||||||
|
cfoCheckFileCorruption=0
|
||||||
|
Count mtInformationMsgCaption=1
|
||||||
|
mtInformationMsgCaption0="Information."
|
||||||
|
Count mtQuestionMsgCaption=1
|
||||||
|
mtQuestionMsgCaption0="Question."
|
||||||
|
Count mtErrorMsgCaption=1
|
||||||
|
mtErrorMsgCaption0="Error."
|
||||||
|
Count mtDialog_Caption=1
|
||||||
|
mtDialog_Caption0="Error occurred"
|
||||||
|
Count mtDialog_ErrorMsgCaption=2
|
||||||
|
mtDialog_ErrorMsgCaption0="An error has occurred during program execution."
|
||||||
|
mtDialog_ErrorMsgCaption1="Please read the following information for further details."
|
||||||
|
Count mtDialog_GeneralCaption=1
|
||||||
|
mtDialog_GeneralCaption0="General"
|
||||||
|
Count mtDialog_GeneralHeader=1
|
||||||
|
mtDialog_GeneralHeader0="General Information"
|
||||||
|
Count mtDialog_CallStackCaption=1
|
||||||
|
mtDialog_CallStackCaption0="Call Stack"
|
||||||
|
Count mtDialog_CallStackHeader=1
|
||||||
|
mtDialog_CallStackHeader0="Call Stack Information"
|
||||||
|
Count mtDialog_ModulesCaption=1
|
||||||
|
mtDialog_ModulesCaption0="Modules"
|
||||||
|
Count mtDialog_ModulesHeader=1
|
||||||
|
mtDialog_ModulesHeader0="Modules Information"
|
||||||
|
Count mtDialog_ProcessesCaption=1
|
||||||
|
mtDialog_ProcessesCaption0="Processes"
|
||||||
|
Count mtDialog_ProcessesHeader=1
|
||||||
|
mtDialog_ProcessesHeader0="Processes Information"
|
||||||
|
Count mtDialog_AsmCaption=1
|
||||||
|
mtDialog_AsmCaption0="Assembler"
|
||||||
|
Count mtDialog_AsmHeader=1
|
||||||
|
mtDialog_AsmHeader0="Assembler Information"
|
||||||
|
Count mtDialog_CPUCaption=1
|
||||||
|
mtDialog_CPUCaption0="CPU"
|
||||||
|
Count mtDialog_CPUHeader=1
|
||||||
|
mtDialog_CPUHeader0="CPU Information"
|
||||||
|
Count mtDialog_OKButtonCaption=1
|
||||||
|
mtDialog_OKButtonCaption0="%26OK"
|
||||||
|
Count mtDialog_TerminateButtonCaption=1
|
||||||
|
mtDialog_TerminateButtonCaption0="%26Terminate"
|
||||||
|
Count mtDialog_RestartButtonCaption=1
|
||||||
|
mtDialog_RestartButtonCaption0="%26Restart"
|
||||||
|
Count mtDialog_DetailsButtonCaption=1
|
||||||
|
mtDialog_DetailsButtonCaption0="%26Details"
|
||||||
|
Count mtDialog_CustomButtonCaption=1
|
||||||
|
mtDialog_CustomButtonCaption0="%26Help"
|
||||||
|
Count mtDialog_SendMessage=1
|
||||||
|
mtDialog_SendMessage0="%26Send this error via Internet"
|
||||||
|
Count mtDialog_ScreenshotMessage=1
|
||||||
|
mtDialog_ScreenshotMessage0="%26Attach a Screenshot image"
|
||||||
|
Count mtDialog_CopyMessage=1
|
||||||
|
mtDialog_CopyMessage0="%26Copy to Clipboard"
|
||||||
|
Count mtDialog_SupportMessage=1
|
||||||
|
mtDialog_SupportMessage0="Go to the Support Page"
|
||||||
|
Count mtMSDialog_ErrorMsgCaption=1
|
||||||
|
mtMSDialog_ErrorMsgCaption0="The application has encountered a problem. We are sorry for the inconvenience."
|
||||||
|
Count mtMSDialog_RestartCaption=1
|
||||||
|
mtMSDialog_RestartCaption0="Restart application."
|
||||||
|
Count mtMSDialog_TerminateCaption=1
|
||||||
|
mtMSDialog_TerminateCaption0="Terminate application."
|
||||||
|
Count mtMSDialog_PleaseCaption=1
|
||||||
|
mtMSDialog_PleaseCaption0="Please tell us about this problem."
|
||||||
|
Count mtMSDialog_DescriptionCaption=1
|
||||||
|
mtMSDialog_DescriptionCaption0="We have created an error report that you can send to us. We will treat this report as confidential and anonymous."
|
||||||
|
Count mtMSDialog_SeeDetailsCaption=1
|
||||||
|
mtMSDialog_SeeDetailsCaption0="To see what data the error report contains,"
|
||||||
|
Count mtMSDialog_SeeClickCaption=1
|
||||||
|
mtMSDialog_SeeClickCaption0="click here."
|
||||||
|
Count mtMSDialog_HowToReproduceCaption=1
|
||||||
|
mtMSDialog_HowToReproduceCaption0="What were you doing when the problem happended (optional)?"
|
||||||
|
Count mtMSDialog_EmailCaption=1
|
||||||
|
mtMSDialog_EmailCaption0="Email address (optional):"
|
||||||
|
Count mtMSDialog_SendButtonCaption=1
|
||||||
|
mtMSDialog_SendButtonCaption0="%26Send Error Report"
|
||||||
|
Count mtMSDialog_NoSendButtonCaption=1
|
||||||
|
mtMSDialog_NoSendButtonCaption0="%26Don't Send"
|
||||||
|
Count mtLog_AppHeader=1
|
||||||
|
mtLog_AppHeader0="Application"
|
||||||
|
Count mtLog_AppStartDate=1
|
||||||
|
mtLog_AppStartDate0="Start Date"
|
||||||
|
Count mtLog_AppName=1
|
||||||
|
mtLog_AppName0="Name/Description"
|
||||||
|
Count mtLog_AppVersionNumber=1
|
||||||
|
mtLog_AppVersionNumber0="Version Number"
|
||||||
|
Count mtLog_AppParameters=1
|
||||||
|
mtLog_AppParameters0="Parameters"
|
||||||
|
Count mtLog_AppCompilationDate=1
|
||||||
|
mtLog_AppCompilationDate0="Compilation Date"
|
||||||
|
Count mtLog_AppUpTime=1
|
||||||
|
mtLog_AppUpTime0="Up Time"
|
||||||
|
Count mtLog_ExcHeader=1
|
||||||
|
mtLog_ExcHeader0="Exception"
|
||||||
|
Count mtLog_ExcDate=1
|
||||||
|
mtLog_ExcDate0="Date"
|
||||||
|
Count mtLog_ExcAddress=1
|
||||||
|
mtLog_ExcAddress0="Address"
|
||||||
|
Count mtLog_ExcModuleName=1
|
||||||
|
mtLog_ExcModuleName0="Module Name"
|
||||||
|
Count mtLog_ExcModuleVersion=1
|
||||||
|
mtLog_ExcModuleVersion0="Module Version"
|
||||||
|
Count mtLog_ExcType=1
|
||||||
|
mtLog_ExcType0="Type"
|
||||||
|
Count mtLog_ExcMessage=1
|
||||||
|
mtLog_ExcMessage0="Message"
|
||||||
|
Count mtLog_ExcID=1
|
||||||
|
mtLog_ExcID0="ID"
|
||||||
|
Count mtLog_ExcCount=1
|
||||||
|
mtLog_ExcCount0="Count"
|
||||||
|
Count mtLog_ExcStatus=1
|
||||||
|
mtLog_ExcStatus0="Status"
|
||||||
|
Count mtLog_ExcNote=1
|
||||||
|
mtLog_ExcNote0="Note"
|
||||||
|
Count mtLog_UserHeader=1
|
||||||
|
mtLog_UserHeader0="User"
|
||||||
|
Count mtLog_UserID=1
|
||||||
|
mtLog_UserID0="ID"
|
||||||
|
Count mtLog_UserName=1
|
||||||
|
mtLog_UserName0="Name"
|
||||||
|
Count mtLog_UserEmail=1
|
||||||
|
mtLog_UserEmail0="Email"
|
||||||
|
Count mtLog_UserCompany=1
|
||||||
|
mtLog_UserCompany0="Company"
|
||||||
|
Count mtLog_UserPrivileges=1
|
||||||
|
mtLog_UserPrivileges0="Privileges"
|
||||||
|
Count mtLog_ActCtrlsHeader=1
|
||||||
|
mtLog_ActCtrlsHeader0="Active Controls"
|
||||||
|
Count mtLog_ActCtrlsFormClass=1
|
||||||
|
mtLog_ActCtrlsFormClass0="Form Class"
|
||||||
|
Count mtLog_ActCtrlsFormText=1
|
||||||
|
mtLog_ActCtrlsFormText0="Form Text"
|
||||||
|
Count mtLog_ActCtrlsControlClass=1
|
||||||
|
mtLog_ActCtrlsControlClass0="Control Class"
|
||||||
|
Count mtLog_ActCtrlsControlText=1
|
||||||
|
mtLog_ActCtrlsControlText0="Control Text"
|
||||||
|
Count mtLog_CmpHeader=1
|
||||||
|
mtLog_CmpHeader0="Computer"
|
||||||
|
Count mtLog_CmpName=1
|
||||||
|
mtLog_CmpName0="Name"
|
||||||
|
Count mtLog_CmpTotalMemory=1
|
||||||
|
mtLog_CmpTotalMemory0="Total Memory"
|
||||||
|
Count mtLog_CmpFreeMemory=1
|
||||||
|
mtLog_CmpFreeMemory0="Free Memory"
|
||||||
|
Count mtLog_CmpTotalDisk=1
|
||||||
|
mtLog_CmpTotalDisk0="Total Disk"
|
||||||
|
Count mtLog_CmpFreeDisk=1
|
||||||
|
mtLog_CmpFreeDisk0="Free Disk"
|
||||||
|
Count mtLog_CmpSystemUpTime=1
|
||||||
|
mtLog_CmpSystemUpTime0="System Up Time"
|
||||||
|
Count mtLog_CmpProcessor=1
|
||||||
|
mtLog_CmpProcessor0="Processor"
|
||||||
|
Count mtLog_CmpDisplayMode=1
|
||||||
|
mtLog_CmpDisplayMode0="Display Mode"
|
||||||
|
Count mtLog_CmpDisplayDPI=1
|
||||||
|
mtLog_CmpDisplayDPI0="Display DPI"
|
||||||
|
Count mtLog_CmpVideoCard=1
|
||||||
|
mtLog_CmpVideoCard0="Video Card"
|
||||||
|
Count mtLog_CmpPrinter=1
|
||||||
|
mtLog_CmpPrinter0="Printer"
|
||||||
|
Count mtLog_OSHeader=1
|
||||||
|
mtLog_OSHeader0="Operating System"
|
||||||
|
Count mtLog_OSType=1
|
||||||
|
mtLog_OSType0="Type"
|
||||||
|
Count mtLog_OSBuildN=1
|
||||||
|
mtLog_OSBuildN0="Build #"
|
||||||
|
Count mtLog_OSUpdate=1
|
||||||
|
mtLog_OSUpdate0="Update"
|
||||||
|
Count mtLog_OSLanguage=1
|
||||||
|
mtLog_OSLanguage0="Language"
|
||||||
|
Count mtLog_OSCharset=1
|
||||||
|
mtLog_OSCharset0="Charset"
|
||||||
|
Count mtLog_NetHeader=1
|
||||||
|
mtLog_NetHeader0="Network"
|
||||||
|
Count mtLog_NetIP=1
|
||||||
|
mtLog_NetIP0="IP Address"
|
||||||
|
Count mtLog_NetSubmask=1
|
||||||
|
mtLog_NetSubmask0="Submask"
|
||||||
|
Count mtLog_NetGateway=1
|
||||||
|
mtLog_NetGateway0="Gateway"
|
||||||
|
Count mtLog_NetDNS1=1
|
||||||
|
mtLog_NetDNS10="DNS 1"
|
||||||
|
Count mtLog_NetDNS2=1
|
||||||
|
mtLog_NetDNS20="DNS 2"
|
||||||
|
Count mtLog_NetDHCP=1
|
||||||
|
mtLog_NetDHCP0="DHCP"
|
||||||
|
Count mtLog_CustInfoHeader=1
|
||||||
|
mtLog_CustInfoHeader0="Custom Information"
|
||||||
|
Count mtCallStack_Address=1
|
||||||
|
mtCallStack_Address0="Address"
|
||||||
|
Count mtCallStack_Name=1
|
||||||
|
mtCallStack_Name0="Module"
|
||||||
|
Count mtCallStack_Unit=1
|
||||||
|
mtCallStack_Unit0="Unit"
|
||||||
|
Count mtCallStack_Class=1
|
||||||
|
mtCallStack_Class0="Class"
|
||||||
|
Count mtCallStack_Procedure=1
|
||||||
|
mtCallStack_Procedure0="Procedure/Method"
|
||||||
|
Count mtCallStack_Line=1
|
||||||
|
mtCallStack_Line0="Line"
|
||||||
|
Count mtCallStack_MainThread=1
|
||||||
|
mtCallStack_MainThread0="Main"
|
||||||
|
Count mtCallStack_ExceptionThread=1
|
||||||
|
mtCallStack_ExceptionThread0="Exception Thread"
|
||||||
|
Count mtCallStack_RunningThread=1
|
||||||
|
mtCallStack_RunningThread0="Running Thread"
|
||||||
|
Count mtCallStack_CallingThread=1
|
||||||
|
mtCallStack_CallingThread0="Calling Thread"
|
||||||
|
Count mtCallStack_ThreadID=1
|
||||||
|
mtCallStack_ThreadID0="ID"
|
||||||
|
Count mtCallStack_ThreadPriority=1
|
||||||
|
mtCallStack_ThreadPriority0="Priority"
|
||||||
|
Count mtCallStack_ThreadClass=1
|
||||||
|
mtCallStack_ThreadClass0="Class"
|
||||||
|
Count mtCallStack_LeakCaption=1
|
||||||
|
mtCallStack_LeakCaption0="Memory Leak"
|
||||||
|
Count mtCallStack_LeakData=1
|
||||||
|
mtCallStack_LeakData0="Data"
|
||||||
|
Count mtCallStack_LeakType=1
|
||||||
|
mtCallStack_LeakType0="Type"
|
||||||
|
Count mtCallStack_LeakSize=1
|
||||||
|
mtCallStack_LeakSize0="Total size"
|
||||||
|
Count mtCallStack_LeakCount=1
|
||||||
|
mtCallStack_LeakCount0="Count"
|
||||||
|
Count mtSendDialog_Caption=1
|
||||||
|
mtSendDialog_Caption0="Send."
|
||||||
|
Count mtSendDialog_Message=1
|
||||||
|
mtSendDialog_Message0="Message"
|
||||||
|
Count mtSendDialog_Resolving=1
|
||||||
|
mtSendDialog_Resolving0="Resolving DNS..."
|
||||||
|
Count mtSendDialog_Login=1
|
||||||
|
mtSendDialog_Login0="Login..."
|
||||||
|
Count mtSendDialog_Connecting=1
|
||||||
|
mtSendDialog_Connecting0="Connecting with server..."
|
||||||
|
Count mtSendDialog_Connected=1
|
||||||
|
mtSendDialog_Connected0="Connected with server."
|
||||||
|
Count mtSendDialog_Sending=1
|
||||||
|
mtSendDialog_Sending0="Sending message..."
|
||||||
|
Count mtSendDialog_Sent=1
|
||||||
|
mtSendDialog_Sent0="Message sent."
|
||||||
|
Count mtSendDialog_SelectProject=1
|
||||||
|
mtSendDialog_SelectProject0="Select project..."
|
||||||
|
Count mtSendDialog_Searching=1
|
||||||
|
mtSendDialog_Searching0="Searching..."
|
||||||
|
Count mtSendDialog_Modifying=1
|
||||||
|
mtSendDialog_Modifying0="Modifying..."
|
||||||
|
Count mtSendDialog_Disconnecting=1
|
||||||
|
mtSendDialog_Disconnecting0="Disconnecting..."
|
||||||
|
Count mtSendDialog_Disconnected=1
|
||||||
|
mtSendDialog_Disconnected0="Disconnected."
|
||||||
|
Count mtReproduceDialog_Caption=1
|
||||||
|
mtReproduceDialog_Caption0="Request"
|
||||||
|
Count mtReproduceDialog_Request=1
|
||||||
|
mtReproduceDialog_Request0="Please describe the steps to reproduce the error:"
|
||||||
|
Count mtReproduceDialog_OKButtonCaption=1
|
||||||
|
mtReproduceDialog_OKButtonCaption0="%26OK"
|
||||||
|
Count mtModules_Handle=1
|
||||||
|
mtModules_Handle0="Handle"
|
||||||
|
Count mtModules_Name=1
|
||||||
|
mtModules_Name0="Name"
|
||||||
|
Count mtModules_Description=1
|
||||||
|
mtModules_Description0="Description"
|
||||||
|
Count mtModules_Version=1
|
||||||
|
mtModules_Version0="Version"
|
||||||
|
Count mtModules_Size=1
|
||||||
|
mtModules_Size0="Size"
|
||||||
|
Count mtModules_LastModified=1
|
||||||
|
mtModules_LastModified0="Modified"
|
||||||
|
Count mtModules_Path=1
|
||||||
|
mtModules_Path0="Path"
|
||||||
|
Count mtProcesses_ID=1
|
||||||
|
mtProcesses_ID0="ID"
|
||||||
|
Count mtProcesses_Name=1
|
||||||
|
mtProcesses_Name0="Name"
|
||||||
|
Count mtProcesses_Description=1
|
||||||
|
mtProcesses_Description0="Description"
|
||||||
|
Count mtProcesses_Version=1
|
||||||
|
mtProcesses_Version0="Version"
|
||||||
|
Count mtProcesses_Memory=1
|
||||||
|
mtProcesses_Memory0="Memory"
|
||||||
|
Count mtProcesses_Priority=1
|
||||||
|
mtProcesses_Priority0="Priority"
|
||||||
|
Count mtProcesses_Threads=1
|
||||||
|
mtProcesses_Threads0="Threads"
|
||||||
|
Count mtProcesses_Path=1
|
||||||
|
mtProcesses_Path0="Path"
|
||||||
|
Count mtCPU_Registers=1
|
||||||
|
mtCPU_Registers0="Registers"
|
||||||
|
Count mtCPU_Stack=1
|
||||||
|
mtCPU_Stack0="Stack"
|
||||||
|
Count mtCPU_MemoryDump=1
|
||||||
|
mtCPU_MemoryDump0="Memory Dump"
|
||||||
|
Count mtSend_SuccessMsg=1
|
||||||
|
mtSend_SuccessMsg0="The message was sent successfully."
|
||||||
|
Count mtSend_FailureMsg=1
|
||||||
|
mtSend_FailureMsg0="Sorry, sending the message didn't work."
|
||||||
|
Count mtSend_BugClosedMsg=2
|
||||||
|
mtSend_BugClosedMsg0="These BUG is just closed."
|
||||||
|
mtSend_BugClosedMsg1="Contact the program support to obtain an update."
|
||||||
|
Count mtSend_UnknownErrorMsg=1
|
||||||
|
mtSend_UnknownErrorMsg0="Unknown error."
|
||||||
|
Count mtSend_InvalidLoginMsg=1
|
||||||
|
mtSend_InvalidLoginMsg0="Invalid login request."
|
||||||
|
Count mtSend_InvalidSearchMsg=1
|
||||||
|
mtSend_InvalidSearchMsg0="Invalid search request."
|
||||||
|
Count mtSend_InvalidSelectionMsg=1
|
||||||
|
mtSend_InvalidSelectionMsg0="Invalid selection request."
|
||||||
|
Count mtSend_InvalidInsertMsg=1
|
||||||
|
mtSend_InvalidInsertMsg0="Invalid insert request."
|
||||||
|
Count mtSend_InvalidModifyMsg=1
|
||||||
|
mtSend_InvalidModifyMsg0="Invalid modify request."
|
||||||
|
Count mtFileCrackedMsg=2
|
||||||
|
mtFileCrackedMsg0="This file is cracked."
|
||||||
|
mtFileCrackedMsg1="The application will be closed."
|
||||||
|
Count mtException_LeakMultiFree=1
|
||||||
|
mtException_LeakMultiFree0="Multi Free memory leak."
|
||||||
|
Count mtException_LeakMemoryOverrun=1
|
||||||
|
mtException_LeakMemoryOverrun0="Memory Overrun leak."
|
||||||
|
Count mtException_AntiFreeze=1
|
||||||
|
mtException_AntiFreeze0="The application seems to be frozen."
|
||||||
|
Count mtInvalidEmailMsg=1
|
||||||
|
mtInvalidEmailMsg0="Invalid email."
|
||||||
|
TextsCollection=English
|
||||||
|
EurekaLog Last Line -->
|
||||||
@ -0,0 +1,17 @@
|
|||||||
|
/* VER185
|
||||||
|
Generated by the CodeGear Delphi Pascal Compiler
|
||||||
|
because -GD or --drc was supplied to the compiler.
|
||||||
|
|
||||||
|
This file contains compiler-generated resources that
|
||||||
|
were bound to the executable.
|
||||||
|
If this file is empty, then no compiler-generated
|
||||||
|
resources were bound to the produced executable.
|
||||||
|
*/
|
||||||
|
|
||||||
|
STRINGTABLE
|
||||||
|
BEGIN
|
||||||
|
END
|
||||||
|
|
||||||
|
/* C:\Codigo\Source\Modulos\ProcesoPresupuestoCliente\Plugin\uPluginProcesoPresupuestosCliente.dfm */
|
||||||
|
/* C:\Codigo\Source\Modulos\ProcesoPresupuestoCliente\Plugin\ProcesoPresupuestosCliente_plugin.res */
|
||||||
|
/* C:\Codigo\Source\Modulos\ProcesoPresupuestoCliente\Plugin\ProcesoPresupuestosCliente_plugin.drf */
|
||||||
@ -0,0 +1,128 @@
|
|||||||
|
object PluginProcesoPresupuestosCliente: TPluginProcesoPresupuestosCliente
|
||||||
|
OldCreateOrder = True
|
||||||
|
Description = 'Ventas'
|
||||||
|
ModuleMenu = MainMenu
|
||||||
|
ModuleName = 'Pedidos de cliente'
|
||||||
|
SmallImages = SmallImages
|
||||||
|
LargeImages = LargeImages
|
||||||
|
Author = 'Rodax Software'
|
||||||
|
Version = '1.0.0'
|
||||||
|
Height = 252
|
||||||
|
Width = 401
|
||||||
|
object LargeImages: TPngImageList
|
||||||
|
Height = 24
|
||||||
|
Width = 24
|
||||||
|
PngImages = <
|
||||||
|
item
|
||||||
|
PngImage.Data = {
|
||||||
|
89504E470D0A1A0A0000000D4948445200000018000000180806000000E0773D
|
||||||
|
F80000000970485973000017120000171201679FD2520000026C4944415478DA
|
||||||
|
63FCFFFF3FC3A28DC7FF335009C4F95B3222F319611600254836ECEFDF7F40FC
|
||||||
|
1F4C8380856F36C3C53DB3705BB0D7D21EC500E7E307711A8EACD674CF2E8679
|
||||||
|
ABF730CC5FB211BF05A4B8FC808D2383328B34C3B6D3CB19225F7E6358B87E1F
|
||||||
|
610BB0F9005D0C046C0FEE63386CEFC470F3FC21303FECD91786259B0E50E683
|
||||||
|
FFFF80610DC47F80AE07B17FFF0386FF9F7F60DFFCF9F79761C596C3A4FB8018
|
||||||
|
00F285EF83770C6B771C23CE0298B749015E77DF306CD87D82380BF0A51C6C00
|
||||||
|
A44771E55A864DFB4E126F01AEA082590E9387A9955BBE8661EB8153B4F381E4
|
||||||
|
92550CBB0E9FA1AE0F6EAA108EABC75FEDC8F3C1B4584686847408FBE74F0686
|
||||||
|
5F3F2018C4FEF903824F1C47B320DAC71C9C3B09F98058C3F9251818AEDC45B2
|
||||||
|
20C2D30C9C3BF1F90064388B207EDFFD798F301C250E42DD4C188E39B910B400
|
||||||
|
E67A10F8F80EE2E21F5097FFFACEC070FA0C2468EC0D0F311C3C8FE483001723
|
||||||
|
86D32E6E785D078A5890664200643808A058E0EB60002F5720E5FC3F70D90316
|
||||||
|
0396F94FA343C11620FB001C247F81F83703C36F501C007D70ED3A420EC5022F
|
||||||
|
5B3D9C8683E81771E11816FCFA05341888FF40E995ABD919D4357E32B0B160B1
|
||||||
|
C0CD5A1BA7E1A012F44D62248605A038005B00F201106FDACACE202D0FB1808D
|
||||||
|
9581E1F865240B1CCD35C086FDFB0B29967FFF4514C7FFFE432C3ADD2D8F62C1
|
||||||
|
9B1708C341166DDFCDCE202A0DB1E0F21D3B86F6750719E116D899A8814B447C
|
||||||
|
806DAF0FDC0250F0BC7B89301C44EF39C0CEC02FFE93E1FE1388E128C9B477F2
|
||||||
|
7C82A9235D7236D882A993D971AA79F7DB1C6E38DC0262417738C73AA00181F8
|
||||||
|
D4201B0E0200C20B50400F1E42A70000000049454E44AE426082}
|
||||||
|
Name = 'PngImage2'
|
||||||
|
Background = clWindow
|
||||||
|
end>
|
||||||
|
Left = 232
|
||||||
|
Top = 16
|
||||||
|
Bitmap = {}
|
||||||
|
end
|
||||||
|
object ModuleActionList: TActionList
|
||||||
|
Images = LargeImages
|
||||||
|
Left = 40
|
||||||
|
Top = 72
|
||||||
|
end
|
||||||
|
object MainMenu: TMainMenu
|
||||||
|
Images = LargeImages
|
||||||
|
Left = 40
|
||||||
|
Top = 16
|
||||||
|
object Ventas1: TMenuItem
|
||||||
|
Caption = 'Ventas'
|
||||||
|
end
|
||||||
|
end
|
||||||
|
object SmallImages: TPngImageList
|
||||||
|
PngImages = <
|
||||||
|
item
|
||||||
|
PngImage.Data = {
|
||||||
|
89504E470D0A1A0A0000000D49484452000000100000001008060000001FF3FF
|
||||||
|
610000000970485973000017120000171201679FD252000001864944415478DA
|
||||||
|
63FCFFFF3FC384055BFF3390010A12BC1919610600394469FAF3F71FC3EF3F7F
|
||||||
|
192CBCB3192EEE99856AC05E4B2B14C5CEC78F81696471AB030719662EDFC530
|
||||||
|
7FC9464C03F0815FBFFF826D06D10BD7EDC36E00BA0BB001DDAD3B19966D3A84
|
||||||
|
DB0098B341E01F50EECF9F7F709BCFB93B33686EDCCEB06ADB11FC06C05C627B
|
||||||
|
E830C3613B5BB8CD97BDDD1954D66E6158BFEB387E0360367FBA7990E1C5C218
|
||||||
|
7C3E72C130C0F1D85186FD56D66059719B070CAA2D350CECEC59183A7FFE9CC6
|
||||||
|
303BB68501C30090B3617E7EDAACCCA0D3FD0CAC180EBE7F6760F8F19D61FA0E
|
||||||
|
4306966DA9080372623D190EDAD8A0D80272018A0120CD1FDE81E9E9279D510D
|
||||||
|
488F7463F805B4F9CF6F50A8FF61B8EAEB816A004CF37B20FEF19361FACD6054
|
||||||
|
0312439DE19A415EB815E88D30E0432F42F3870F1017BC4A45352036C011AE19
|
||||||
|
140320D7FC9E6A0031E041354233D80540037E95A31A10E163CBB062CB61D438
|
||||||
|
BA9A0A8E85E9CBE5B1C6218A01A084810EB478DF3058B39EC099081CE4195C00
|
||||||
|
45135E518E0B4E380000000049454E44AE426082}
|
||||||
|
Name = 'PngImage0'
|
||||||
|
Background = clWindow
|
||||||
|
end>
|
||||||
|
PngOptions = [pngBlendOnDisabled, pngGrayscaleOnDisabled]
|
||||||
|
Left = 308
|
||||||
|
Top = 16
|
||||||
|
Bitmap = {}
|
||||||
|
end
|
||||||
|
object ExtraImages: TPngImageList
|
||||||
|
Height = 28
|
||||||
|
Width = 28
|
||||||
|
PngImages = <
|
||||||
|
item
|
||||||
|
PngImage.Data = {
|
||||||
|
89504E470D0A1A0A0000000D494844520000001C0000001C0806000000720DDF
|
||||||
|
940000000970485973000017120000171201679FD252000003184944415478DA
|
||||||
|
BDD6DB4FD3501800F06F82F6C107E28391B8183418F14570720B48C655AEC328
|
||||||
|
8A08A2F1CD3FC3F860F8030CC6784110C1B1B13137184C186C5CD62108084443
|
||||||
|
A2214613131FBC3C88BBB43DF6B4A3ACA36B3B48F8B6939EB6A7E777BE73D6B5
|
||||||
|
1A8410EC6568303830BECAA9B8CE15861F84B0CF7EB86FA4CE0D92FB2248DA97
|
||||||
|
24D9F1F5DA6C4D5CD0EA5E410DE567763C6A86ED83610749D30CD00C03858DB7
|
||||||
|
60C9618C0F5AC696D1958A4C7017146E6B504EFAE242B1ED0B263CF0D8380A9D
|
||||||
|
966E7560A281C18CBA0B40B956C1B96085D61F01E8308F2983FD6FDEA3AB9559
|
||||||
|
7133943A5EEA9B8189C2F3B0B64C0AC79ABF6F4097755C1934BB965063D559D5
|
||||||
|
99E175A269C46DF1DA5114231CEBB17B9441936B115DABD24966A23670A60D5F
|
||||||
|
FE8071704A0538C282D53C183D4589C6A5F5DF60724E2B837DC30BA8A9E61C07
|
||||||
|
CAFD2AE5025F7BCA3A0416974F19343ADF21F646DD3598DEEF00DBA85F197CE5
|
||||||
|
9C47CDB5390228B7969B038A6EB379CD71931D1CEE5965B077680EB5D4E5EE3A
|
||||||
|
436DAF0D46BC732AC041163424063EBCA951D56E33BEFED5439BD5ABE1C09EC1
|
||||||
|
B7E886214FF59462ECF69DEDE782418050802FB81E0CF0C54FC6802F1DB3A8B5
|
||||||
|
3E5F55863BC1525201563F4783F659D4529FC7FD55C981184B3EA47E1AA95F5B
|
||||||
|
180E017CF19A64D7301FBC4545B253BA769294CC2E80B3D9E0330A44320BFD03
|
||||||
|
989BE7A7B2583709DE45BD186CAAC985E962BD6286B88344026338446097CD87
|
||||||
|
1AAB73802C2D5104A53214A690664B18208CD790CDF0C3C7AD7322B07360065D
|
||||||
|
AEC886F9CA32D9D1C69B521CA1100BB1858A6CFBCC04649C0EC281E438E0C532
|
||||||
|
5DE491438B5E1768867F7DA0D8FD89BBA992602C86B3B4D8083891CE82FB8143
|
||||||
|
45E073EB343294E86431BC3F79EFE836500A0BB3C53E4480368DCF10A3E44A14
|
||||||
|
D8619942B5C559B2184D2198B9AF1581F1305C1F1E25E0B09607573EF118BE86
|
||||||
|
039FF54FA21A7D962C86B7FEB663022887E1ED98878094234158FFB68509E053
|
||||||
|
B31755156572CF32B938E0367060FB0342D52DF1339C2FC204F089C983DABB1F
|
||||||
|
2976A027FC7090495385E188C504702FE33F1F65CAE7611BEC0A000000004945
|
||||||
|
4E44AE426082}
|
||||||
|
Name = 'PngImage0'
|
||||||
|
Background = clWindow
|
||||||
|
end>
|
||||||
|
Left = 232
|
||||||
|
Top = 80
|
||||||
|
Bitmap = {}
|
||||||
|
end
|
||||||
|
end
|
||||||
@ -0,0 +1,71 @@
|
|||||||
|
unit uPluginProcesoPresupuestosCliente;
|
||||||
|
|
||||||
|
interface
|
||||||
|
|
||||||
|
uses
|
||||||
|
uModuleController, uInterfaces, uHostManager, Menus, Classes, ActnList,
|
||||||
|
ImgList, Controls, PngImageList, uPlugins_Intf, FactuGES_Intf;
|
||||||
|
|
||||||
|
type
|
||||||
|
TPluginProcesoPresupuestosCliente = class(TModuleController, IMCProcesoPresupuestosCliente)
|
||||||
|
ExtraImages: TPngImageList;
|
||||||
|
LargeImages: TPngImageList;
|
||||||
|
MainMenu: TMainMenu;
|
||||||
|
ModuleActionList: TActionList;
|
||||||
|
SmallImages: TPngImageList;
|
||||||
|
Ventas1: TMenuItem;
|
||||||
|
public
|
||||||
|
constructor Create(AOwner: TComponent); override;
|
||||||
|
destructor Destroy; override;
|
||||||
|
procedure VerPresupuestos(const ListaIDPresupuestosCliente : TIntegerArray);
|
||||||
|
end;
|
||||||
|
|
||||||
|
implementation
|
||||||
|
|
||||||
|
{$R *.dfm}
|
||||||
|
|
||||||
|
uses
|
||||||
|
Forms, Dialogs, SysUtils, cxControls,
|
||||||
|
uProcesoPresupuestosClienteController, uProcesoPresupuestosClienteViewRegister;
|
||||||
|
|
||||||
|
function GetModule : TModuleController;
|
||||||
|
begin
|
||||||
|
Result := TPluginProcesoPresupuestosCliente.Create(NIL);
|
||||||
|
end;
|
||||||
|
|
||||||
|
exports
|
||||||
|
GetModule name GET_MODULE_FUNC;
|
||||||
|
|
||||||
|
constructor TPluginProcesoPresupuestosCliente.Create(AOwner: TComponent);
|
||||||
|
begin
|
||||||
|
inherited;
|
||||||
|
ModuleName := MODULENAME_PROCESO_PRESUPUESTOS_CLIENTE;
|
||||||
|
uProcesoPresupuestosClienteViewRegister.RegisterViews;
|
||||||
|
end;
|
||||||
|
|
||||||
|
destructor TPluginProcesoPresupuestosCliente.Destroy;
|
||||||
|
begin
|
||||||
|
uProcesoPresupuestosClienteViewRegister.UnregisterViews;
|
||||||
|
inherited;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TPluginProcesoPresupuestosCliente.VerPresupuestos(const ListaIDPresupuestosCliente: TIntegerArray);
|
||||||
|
var
|
||||||
|
AProcesoPresupuestosClienteController : IProcesoPresupuestosClienteController;
|
||||||
|
begin
|
||||||
|
AProcesoPresupuestosClienteController := TProcesoPresupuestosClienteController.Create;
|
||||||
|
try
|
||||||
|
ShowHourglassCursor;
|
||||||
|
AProcesoPresupuestosClienteController.VerProceso(ListaIDPresupuestosCliente);
|
||||||
|
finally
|
||||||
|
AProcesoPresupuestosClienteController := NIL;
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
|
||||||
|
initialization
|
||||||
|
RegisterModuleClass(TPluginProcesoPresupuestosCliente);
|
||||||
|
|
||||||
|
finalization
|
||||||
|
UnRegisterModuleClass(TPluginProcesoPresupuestosCliente);
|
||||||
|
|
||||||
|
end.
|
||||||
@ -0,0 +1,39 @@
|
|||||||
|
package ProcesoPresupuestosCliente_view;
|
||||||
|
|
||||||
|
{$R *.res}
|
||||||
|
{$ALIGN 8}
|
||||||
|
{$ASSERTIONS ON}
|
||||||
|
{$BOOLEVAL OFF}
|
||||||
|
{$DEBUGINFO ON}
|
||||||
|
{$EXTENDEDSYNTAX ON}
|
||||||
|
{$IMPORTEDDATA ON}
|
||||||
|
{$IOCHECKS ON}
|
||||||
|
{$LOCALSYMBOLS ON}
|
||||||
|
{$LONGSTRINGS ON}
|
||||||
|
{$OPENSTRINGS ON}
|
||||||
|
{$OPTIMIZATION ON}
|
||||||
|
{$OVERFLOWCHECKS OFF}
|
||||||
|
{$RANGECHECKS OFF}
|
||||||
|
{$REFERENCEINFO ON}
|
||||||
|
{$SAFEDIVIDE OFF}
|
||||||
|
{$STACKFRAMES OFF}
|
||||||
|
{$TYPEDADDRESS OFF}
|
||||||
|
{$VARSTRINGCHECKS ON}
|
||||||
|
{$WRITEABLECONST OFF}
|
||||||
|
{$MINENUMSIZE 1}
|
||||||
|
{$IMAGEBASE $400000}
|
||||||
|
{$IMPLICITBUILD OFF}
|
||||||
|
|
||||||
|
requires
|
||||||
|
ApplicationBase,
|
||||||
|
PedidosProveedor_model,
|
||||||
|
PedidosCliente_model,
|
||||||
|
ProcesoPresupuestosCliente_controller,
|
||||||
|
AlbaranesProveedor_model;
|
||||||
|
|
||||||
|
contains
|
||||||
|
uProcesoPresupuestosClienteViewRegister in 'uProcesoPresupuestosClienteViewRegister.pas',
|
||||||
|
uEditorProcesoPresupuestosCliente in 'uEditorProcesoPresupuestosCliente.pas' {fEditorProcesoPresupuestosCliente: TfEditorPedidosProveedor},
|
||||||
|
uViewProcesoPresupuestosCliente in 'uViewProcesoPresupuestosCliente.pas' {frViewProcesoPresupuestosCliente: TFrame};
|
||||||
|
|
||||||
|
end.
|
||||||
@ -0,0 +1,550 @@
|
|||||||
|
<?xml version="1.0" encoding="utf-8"?>
|
||||||
|
<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
|
||||||
|
<PropertyGroup>
|
||||||
|
<ProjectGuid>{9e558626-cf49-4cff-a178-e12c186758ac}</ProjectGuid>
|
||||||
|
<MainSource>ProcesoPresupuestosCliente_view.dpk</MainSource>
|
||||||
|
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
|
||||||
|
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
|
||||||
|
<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
|
||||||
|
<DCC_DependencyCheckOutputName>..\..\..\..\Output\Debug\Cliente\ProcesoPresupuestosCliente_view.bpl</DCC_DependencyCheckOutputName>
|
||||||
|
</PropertyGroup>
|
||||||
|
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
|
||||||
|
<Version>7.0</Version>
|
||||||
|
<DCC_DebugInformation>False</DCC_DebugInformation>
|
||||||
|
<DCC_LocalDebugSymbols>False</DCC_LocalDebugSymbols>
|
||||||
|
<DCC_SymbolReferenceInfo>0</DCC_SymbolReferenceInfo>
|
||||||
|
<DCC_MapFile>3</DCC_MapFile>
|
||||||
|
<DCC_DcuOutput>.\</DCC_DcuOutput>
|
||||||
|
<DCC_ObjOutput>.\</DCC_ObjOutput>
|
||||||
|
<DCC_HppOutput>.\</DCC_HppOutput>
|
||||||
|
<DCC_BplOutput>..\..\..\..\Output\Debug\Cliente</DCC_BplOutput>
|
||||||
|
<DCC_DcpOutput>..\..\Lib</DCC_DcpOutput>
|
||||||
|
<DCC_UnitSearchPath>..\..\..\Lib;..\..\Lib</DCC_UnitSearchPath>
|
||||||
|
<DCC_ResourcePath>..\..\..\Lib;..\..\Lib</DCC_ResourcePath>
|
||||||
|
<DCC_ObjPath>..\..\..\Lib;..\..\Lib</DCC_ObjPath>
|
||||||
|
<DCC_IncludePath>..\..\..\Lib;..\..\Lib</DCC_IncludePath>
|
||||||
|
<DCC_Define>RELEASE</DCC_Define>
|
||||||
|
</PropertyGroup>
|
||||||
|
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
|
||||||
|
<Version>7.0</Version>
|
||||||
|
<DCC_MapFile>3</DCC_MapFile>
|
||||||
|
<DCC_DcuOutput>.\</DCC_DcuOutput>
|
||||||
|
<DCC_ObjOutput>.\</DCC_ObjOutput>
|
||||||
|
<DCC_HppOutput>.\</DCC_HppOutput>
|
||||||
|
<DCC_BplOutput>..\..\..\..\Output\Debug\Cliente</DCC_BplOutput>
|
||||||
|
<DCC_DcpOutput>..\..\Lib</DCC_DcpOutput>
|
||||||
|
<DCC_UnitSearchPath>..\..\..\Lib;..\..\Lib</DCC_UnitSearchPath>
|
||||||
|
<DCC_ResourcePath>..\..\..\Lib;..\..\Lib</DCC_ResourcePath>
|
||||||
|
<DCC_ObjPath>..\..\..\Lib;..\..\Lib</DCC_ObjPath>
|
||||||
|
<DCC_IncludePath>..\..\..\Lib;..\..\Lib</DCC_IncludePath>
|
||||||
|
</PropertyGroup>
|
||||||
|
<ProjectExtensions>
|
||||||
|
<Borland.Personality>Delphi.Personality</Borland.Personality>
|
||||||
|
<Borland.ProjectType>Package</Borland.ProjectType>
|
||||||
|
<BorlandProject>
|
||||||
|
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</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"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">ProcesoPresupuestosCliente_view.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
|
||||||
|
</ProjectExtensions>
|
||||||
|
<Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
|
||||||
|
<ItemGroup>
|
||||||
|
<DelphiCompile Include="ProcesoPresupuestosCliente_view.dpk">
|
||||||
|
<MainSource>MainSource</MainSource>
|
||||||
|
</DelphiCompile>
|
||||||
|
<DCCReference Include="..\..\Lib\AlbaranesProveedor_model.dcp" />
|
||||||
|
<DCCReference Include="..\..\Lib\ApplicationBase.dcp" />
|
||||||
|
<DCCReference Include="..\..\Lib\PedidosCliente_model.dcp" />
|
||||||
|
<DCCReference Include="..\..\Lib\PedidosProveedor_model.dcp" />
|
||||||
|
<DCCReference Include="..\..\Lib\ProcesoPresupuestosCliente_controller.dcp" />
|
||||||
|
<DCCReference Include="uEditorProcesoPresupuestosCliente.pas">
|
||||||
|
<Form>fEditorProcesoPresupuestosCliente</Form>
|
||||||
|
<DesignClass>TfEditorPedidosProveedor</DesignClass>
|
||||||
|
</DCCReference>
|
||||||
|
<DCCReference Include="uProcesoPresupuestosClienteViewRegister.pas" />
|
||||||
|
<DCCReference Include="uViewProcesoPresupuestosCliente.pas">
|
||||||
|
<Form>frViewProcesoPresupuestosCliente</Form>
|
||||||
|
<DesignClass>TFrame</DesignClass>
|
||||||
|
</DCCReference>
|
||||||
|
</ItemGroup>
|
||||||
|
</Project>
|
||||||
|
<!-- EurekaLog First Line
|
||||||
|
[Exception Log]
|
||||||
|
EurekaLog Version=6011
|
||||||
|
Activate=0
|
||||||
|
Activate Handle=1
|
||||||
|
Save Log File=1
|
||||||
|
Foreground Tab=0
|
||||||
|
Freeze Activate=0
|
||||||
|
Freeze Timeout=60
|
||||||
|
SMTP From=eurekalog@email.com
|
||||||
|
SMTP Host=
|
||||||
|
SMTP Port=25
|
||||||
|
SMTP UserID=
|
||||||
|
SMTP Password=
|
||||||
|
Append to Log=0
|
||||||
|
TerminateBtn Operation=2
|
||||||
|
Errors Number=32
|
||||||
|
Errors Terminate=3
|
||||||
|
Email Address=
|
||||||
|
Email Object=
|
||||||
|
Email Send Options=0
|
||||||
|
Output Path=
|
||||||
|
Encrypt Password=
|
||||||
|
AutoCloseDialogSecs=0
|
||||||
|
WebSendMode=0
|
||||||
|
SupportULR=
|
||||||
|
HTMLLayout Count=15
|
||||||
|
HTMLLine0="%3Chtml%3E"
|
||||||
|
HTMLLine1=" %3Chead%3E"
|
||||||
|
HTMLLine2=" %3C/head%3E"
|
||||||
|
HTMLLine3=" %3Cbody TopMargin=10 LeftMargin=10%3E"
|
||||||
|
HTMLLine4=" %3Ctable width="100%%" border="0"%3E"
|
||||||
|
HTMLLine5=" %3Ctr%3E"
|
||||||
|
HTMLLine6=" %3Ctd nowrap%3E"
|
||||||
|
HTMLLine7=" %3Cfont face="Lucida Console, Courier" size="2"%3E"
|
||||||
|
HTMLLine8=" %3C%%HTML_TAG%%%3E"
|
||||||
|
HTMLLine9=" %3C/font%3E"
|
||||||
|
HTMLLine10=" %3C/td%3E"
|
||||||
|
HTMLLine11=" %3C/tr%3E"
|
||||||
|
HTMLLine12=" %3C/table%3E"
|
||||||
|
HTMLLine13=" %3C/body%3E"
|
||||||
|
HTMLLine14="%3C/html%3E"
|
||||||
|
AutoCrashOperation=2
|
||||||
|
AutoCrashNumber=10
|
||||||
|
AutoCrashMinutes=1
|
||||||
|
WebURL=
|
||||||
|
WebUserID=
|
||||||
|
WebPassword=
|
||||||
|
WebPort=0
|
||||||
|
AttachedFiles=
|
||||||
|
ProxyURL=
|
||||||
|
ProxyUser=
|
||||||
|
ProxyPassword=
|
||||||
|
ProxyPort=8080
|
||||||
|
TrakerUser=
|
||||||
|
TrakerPassword=
|
||||||
|
TrakerAssignTo=
|
||||||
|
TrakerProject=
|
||||||
|
TrakerCategory=
|
||||||
|
TrakerTrialID=
|
||||||
|
ZipPassword=
|
||||||
|
PreBuildEvent=
|
||||||
|
PostSuccessfulBuildEvent=
|
||||||
|
PostFailureBuildEvent=
|
||||||
|
ExceptionDialogType=2
|
||||||
|
Count=0
|
||||||
|
EMail Message Line Count=0
|
||||||
|
loNoDuplicateErrors=0
|
||||||
|
loAppendReproduceText=0
|
||||||
|
loDeleteLogAtVersionChange=0
|
||||||
|
loAddComputerNameInLogFileName=0
|
||||||
|
loSaveModulesAndProcessesSections=1
|
||||||
|
loSaveAssemblerAndCPUSections=1
|
||||||
|
soAppStartDate=1
|
||||||
|
soAppName=1
|
||||||
|
soAppVersionNumber=1
|
||||||
|
soAppParameters=1
|
||||||
|
soAppCompilationDate=1
|
||||||
|
soAppUpTime=1
|
||||||
|
soExcDate=1
|
||||||
|
soExcAddress=1
|
||||||
|
soExcModuleName=1
|
||||||
|
soExcModuleVersion=1
|
||||||
|
soExcType=1
|
||||||
|
soExcMessage=1
|
||||||
|
soExcID=1
|
||||||
|
soExcCount=1
|
||||||
|
soExcStatus=1
|
||||||
|
soExcNote=1
|
||||||
|
soUserID=1
|
||||||
|
soUserName=1
|
||||||
|
soUserEmail=1
|
||||||
|
soUserPrivileges=1
|
||||||
|
soUserCompany=1
|
||||||
|
soActCtlsFormClass=1
|
||||||
|
soActCtlsFormText=1
|
||||||
|
soActCtlsControlClass=1
|
||||||
|
soActCtlsControlText=1
|
||||||
|
soCmpName=1
|
||||||
|
soCmpTotalMemory=1
|
||||||
|
soCmpFreeMemory=1
|
||||||
|
soCmpTotalDisk=1
|
||||||
|
soCmpFreeDisk=1
|
||||||
|
soCmpSysUpTime=1
|
||||||
|
soCmpProcessor=1
|
||||||
|
soCmpDisplayMode=1
|
||||||
|
soCmpDisplayDPI=1
|
||||||
|
soCmpVideoCard=1
|
||||||
|
soCmpPrinter=1
|
||||||
|
soOSType=1
|
||||||
|
soOSBuildN=1
|
||||||
|
soOSUpdate=1
|
||||||
|
soOSLanguage=1
|
||||||
|
soOSCharset=1
|
||||||
|
soNetIP=1
|
||||||
|
soNetSubmask=1
|
||||||
|
soNetGateway=1
|
||||||
|
soNetDNS1=1
|
||||||
|
soNetDNS2=1
|
||||||
|
soNetDHCP=1
|
||||||
|
soCustomData=1
|
||||||
|
sndShowSendDialog=1
|
||||||
|
sndShowSuccessFailureMsg=0
|
||||||
|
sndSendEntireLog=0
|
||||||
|
sndSendXMLLogCopy=0
|
||||||
|
sndSendScreenshot=1
|
||||||
|
sndUseOnlyActiveWindow=0
|
||||||
|
sndSendLastHTMLPage=1
|
||||||
|
sndSendInSeparatedThread=0
|
||||||
|
sndAddDateInFileName=0
|
||||||
|
sndAddComputerNameInFileName=0
|
||||||
|
edoSendErrorReportChecked=1
|
||||||
|
edoAttachScreenshotChecked=1
|
||||||
|
edoShowCopyToClipOption=1
|
||||||
|
edoShowDetailsButton=1
|
||||||
|
edoShowInDetailedMode=0
|
||||||
|
edoShowInTopMostMode=0
|
||||||
|
edoUseEurekaLogLookAndFeel=0
|
||||||
|
edoShowSendErrorReportOption=1
|
||||||
|
edoShowAttachScreenshotOption=1
|
||||||
|
edoShowCustomButton=0
|
||||||
|
csoShowDLLs=1
|
||||||
|
csoShowBPLs=1
|
||||||
|
csoShowBorlandThreads=1
|
||||||
|
csoShowWindowsThreads=1
|
||||||
|
csoDoNotStoreProcNames=0
|
||||||
|
boPauseBorlandThreads=0
|
||||||
|
boDoNotPauseMainThread=0
|
||||||
|
boPauseWindowsThreads=0
|
||||||
|
boUseMainModuleOptions=1
|
||||||
|
boCopyLogInCaseOfError=1
|
||||||
|
boSaveCompressedCopyInCaseOfError=0
|
||||||
|
boHandleSafeCallExceptions=1
|
||||||
|
boCallRTLExceptionEvent=0
|
||||||
|
boCatchHandledExceptions=0
|
||||||
|
loCatchLeaks=0
|
||||||
|
loGroupsSonLeaks=1
|
||||||
|
loHideBorlandLeaks=1
|
||||||
|
loFreeAllLeaks=1
|
||||||
|
loCatchLeaksExceptions=1
|
||||||
|
cfoReduceFileSize=1
|
||||||
|
cfoCheckFileCorruption=0
|
||||||
|
Count mtInformationMsgCaption=1
|
||||||
|
mtInformationMsgCaption0="Information."
|
||||||
|
Count mtQuestionMsgCaption=1
|
||||||
|
mtQuestionMsgCaption0="Question."
|
||||||
|
Count mtErrorMsgCaption=1
|
||||||
|
mtErrorMsgCaption0="Error."
|
||||||
|
Count mtDialog_Caption=1
|
||||||
|
mtDialog_Caption0="Error occurred"
|
||||||
|
Count mtDialog_ErrorMsgCaption=2
|
||||||
|
mtDialog_ErrorMsgCaption0="An error has occurred during program execution."
|
||||||
|
mtDialog_ErrorMsgCaption1="Please read the following information for further details."
|
||||||
|
Count mtDialog_GeneralCaption=1
|
||||||
|
mtDialog_GeneralCaption0="General"
|
||||||
|
Count mtDialog_GeneralHeader=1
|
||||||
|
mtDialog_GeneralHeader0="General Information"
|
||||||
|
Count mtDialog_CallStackCaption=1
|
||||||
|
mtDialog_CallStackCaption0="Call Stack"
|
||||||
|
Count mtDialog_CallStackHeader=1
|
||||||
|
mtDialog_CallStackHeader0="Call Stack Information"
|
||||||
|
Count mtDialog_ModulesCaption=1
|
||||||
|
mtDialog_ModulesCaption0="Modules"
|
||||||
|
Count mtDialog_ModulesHeader=1
|
||||||
|
mtDialog_ModulesHeader0="Modules Information"
|
||||||
|
Count mtDialog_ProcessesCaption=1
|
||||||
|
mtDialog_ProcessesCaption0="Processes"
|
||||||
|
Count mtDialog_ProcessesHeader=1
|
||||||
|
mtDialog_ProcessesHeader0="Processes Information"
|
||||||
|
Count mtDialog_AsmCaption=1
|
||||||
|
mtDialog_AsmCaption0="Assembler"
|
||||||
|
Count mtDialog_AsmHeader=1
|
||||||
|
mtDialog_AsmHeader0="Assembler Information"
|
||||||
|
Count mtDialog_CPUCaption=1
|
||||||
|
mtDialog_CPUCaption0="CPU"
|
||||||
|
Count mtDialog_CPUHeader=1
|
||||||
|
mtDialog_CPUHeader0="CPU Information"
|
||||||
|
Count mtDialog_OKButtonCaption=1
|
||||||
|
mtDialog_OKButtonCaption0="%26OK"
|
||||||
|
Count mtDialog_TerminateButtonCaption=1
|
||||||
|
mtDialog_TerminateButtonCaption0="%26Terminate"
|
||||||
|
Count mtDialog_RestartButtonCaption=1
|
||||||
|
mtDialog_RestartButtonCaption0="%26Restart"
|
||||||
|
Count mtDialog_DetailsButtonCaption=1
|
||||||
|
mtDialog_DetailsButtonCaption0="%26Details"
|
||||||
|
Count mtDialog_CustomButtonCaption=1
|
||||||
|
mtDialog_CustomButtonCaption0="%26Help"
|
||||||
|
Count mtDialog_SendMessage=1
|
||||||
|
mtDialog_SendMessage0="%26Send this error via Internet"
|
||||||
|
Count mtDialog_ScreenshotMessage=1
|
||||||
|
mtDialog_ScreenshotMessage0="%26Attach a Screenshot image"
|
||||||
|
Count mtDialog_CopyMessage=1
|
||||||
|
mtDialog_CopyMessage0="%26Copy to Clipboard"
|
||||||
|
Count mtDialog_SupportMessage=1
|
||||||
|
mtDialog_SupportMessage0="Go to the Support Page"
|
||||||
|
Count mtMSDialog_ErrorMsgCaption=1
|
||||||
|
mtMSDialog_ErrorMsgCaption0="The application has encountered a problem. We are sorry for the inconvenience."
|
||||||
|
Count mtMSDialog_RestartCaption=1
|
||||||
|
mtMSDialog_RestartCaption0="Restart application."
|
||||||
|
Count mtMSDialog_TerminateCaption=1
|
||||||
|
mtMSDialog_TerminateCaption0="Terminate application."
|
||||||
|
Count mtMSDialog_PleaseCaption=1
|
||||||
|
mtMSDialog_PleaseCaption0="Please tell us about this problem."
|
||||||
|
Count mtMSDialog_DescriptionCaption=1
|
||||||
|
mtMSDialog_DescriptionCaption0="We have created an error report that you can send to us. We will treat this report as confidential and anonymous."
|
||||||
|
Count mtMSDialog_SeeDetailsCaption=1
|
||||||
|
mtMSDialog_SeeDetailsCaption0="To see what data the error report contains,"
|
||||||
|
Count mtMSDialog_SeeClickCaption=1
|
||||||
|
mtMSDialog_SeeClickCaption0="click here."
|
||||||
|
Count mtMSDialog_HowToReproduceCaption=1
|
||||||
|
mtMSDialog_HowToReproduceCaption0="What were you doing when the problem happended (optional)?"
|
||||||
|
Count mtMSDialog_EmailCaption=1
|
||||||
|
mtMSDialog_EmailCaption0="Email address (optional):"
|
||||||
|
Count mtMSDialog_SendButtonCaption=1
|
||||||
|
mtMSDialog_SendButtonCaption0="%26Send Error Report"
|
||||||
|
Count mtMSDialog_NoSendButtonCaption=1
|
||||||
|
mtMSDialog_NoSendButtonCaption0="%26Don't Send"
|
||||||
|
Count mtLog_AppHeader=1
|
||||||
|
mtLog_AppHeader0="Application"
|
||||||
|
Count mtLog_AppStartDate=1
|
||||||
|
mtLog_AppStartDate0="Start Date"
|
||||||
|
Count mtLog_AppName=1
|
||||||
|
mtLog_AppName0="Name/Description"
|
||||||
|
Count mtLog_AppVersionNumber=1
|
||||||
|
mtLog_AppVersionNumber0="Version Number"
|
||||||
|
Count mtLog_AppParameters=1
|
||||||
|
mtLog_AppParameters0="Parameters"
|
||||||
|
Count mtLog_AppCompilationDate=1
|
||||||
|
mtLog_AppCompilationDate0="Compilation Date"
|
||||||
|
Count mtLog_AppUpTime=1
|
||||||
|
mtLog_AppUpTime0="Up Time"
|
||||||
|
Count mtLog_ExcHeader=1
|
||||||
|
mtLog_ExcHeader0="Exception"
|
||||||
|
Count mtLog_ExcDate=1
|
||||||
|
mtLog_ExcDate0="Date"
|
||||||
|
Count mtLog_ExcAddress=1
|
||||||
|
mtLog_ExcAddress0="Address"
|
||||||
|
Count mtLog_ExcModuleName=1
|
||||||
|
mtLog_ExcModuleName0="Module Name"
|
||||||
|
Count mtLog_ExcModuleVersion=1
|
||||||
|
mtLog_ExcModuleVersion0="Module Version"
|
||||||
|
Count mtLog_ExcType=1
|
||||||
|
mtLog_ExcType0="Type"
|
||||||
|
Count mtLog_ExcMessage=1
|
||||||
|
mtLog_ExcMessage0="Message"
|
||||||
|
Count mtLog_ExcID=1
|
||||||
|
mtLog_ExcID0="ID"
|
||||||
|
Count mtLog_ExcCount=1
|
||||||
|
mtLog_ExcCount0="Count"
|
||||||
|
Count mtLog_ExcStatus=1
|
||||||
|
mtLog_ExcStatus0="Status"
|
||||||
|
Count mtLog_ExcNote=1
|
||||||
|
mtLog_ExcNote0="Note"
|
||||||
|
Count mtLog_UserHeader=1
|
||||||
|
mtLog_UserHeader0="User"
|
||||||
|
Count mtLog_UserID=1
|
||||||
|
mtLog_UserID0="ID"
|
||||||
|
Count mtLog_UserName=1
|
||||||
|
mtLog_UserName0="Name"
|
||||||
|
Count mtLog_UserEmail=1
|
||||||
|
mtLog_UserEmail0="Email"
|
||||||
|
Count mtLog_UserCompany=1
|
||||||
|
mtLog_UserCompany0="Company"
|
||||||
|
Count mtLog_UserPrivileges=1
|
||||||
|
mtLog_UserPrivileges0="Privileges"
|
||||||
|
Count mtLog_ActCtrlsHeader=1
|
||||||
|
mtLog_ActCtrlsHeader0="Active Controls"
|
||||||
|
Count mtLog_ActCtrlsFormClass=1
|
||||||
|
mtLog_ActCtrlsFormClass0="Form Class"
|
||||||
|
Count mtLog_ActCtrlsFormText=1
|
||||||
|
mtLog_ActCtrlsFormText0="Form Text"
|
||||||
|
Count mtLog_ActCtrlsControlClass=1
|
||||||
|
mtLog_ActCtrlsControlClass0="Control Class"
|
||||||
|
Count mtLog_ActCtrlsControlText=1
|
||||||
|
mtLog_ActCtrlsControlText0="Control Text"
|
||||||
|
Count mtLog_CmpHeader=1
|
||||||
|
mtLog_CmpHeader0="Computer"
|
||||||
|
Count mtLog_CmpName=1
|
||||||
|
mtLog_CmpName0="Name"
|
||||||
|
Count mtLog_CmpTotalMemory=1
|
||||||
|
mtLog_CmpTotalMemory0="Total Memory"
|
||||||
|
Count mtLog_CmpFreeMemory=1
|
||||||
|
mtLog_CmpFreeMemory0="Free Memory"
|
||||||
|
Count mtLog_CmpTotalDisk=1
|
||||||
|
mtLog_CmpTotalDisk0="Total Disk"
|
||||||
|
Count mtLog_CmpFreeDisk=1
|
||||||
|
mtLog_CmpFreeDisk0="Free Disk"
|
||||||
|
Count mtLog_CmpSystemUpTime=1
|
||||||
|
mtLog_CmpSystemUpTime0="System Up Time"
|
||||||
|
Count mtLog_CmpProcessor=1
|
||||||
|
mtLog_CmpProcessor0="Processor"
|
||||||
|
Count mtLog_CmpDisplayMode=1
|
||||||
|
mtLog_CmpDisplayMode0="Display Mode"
|
||||||
|
Count mtLog_CmpDisplayDPI=1
|
||||||
|
mtLog_CmpDisplayDPI0="Display DPI"
|
||||||
|
Count mtLog_CmpVideoCard=1
|
||||||
|
mtLog_CmpVideoCard0="Video Card"
|
||||||
|
Count mtLog_CmpPrinter=1
|
||||||
|
mtLog_CmpPrinter0="Printer"
|
||||||
|
Count mtLog_OSHeader=1
|
||||||
|
mtLog_OSHeader0="Operating System"
|
||||||
|
Count mtLog_OSType=1
|
||||||
|
mtLog_OSType0="Type"
|
||||||
|
Count mtLog_OSBuildN=1
|
||||||
|
mtLog_OSBuildN0="Build #"
|
||||||
|
Count mtLog_OSUpdate=1
|
||||||
|
mtLog_OSUpdate0="Update"
|
||||||
|
Count mtLog_OSLanguage=1
|
||||||
|
mtLog_OSLanguage0="Language"
|
||||||
|
Count mtLog_OSCharset=1
|
||||||
|
mtLog_OSCharset0="Charset"
|
||||||
|
Count mtLog_NetHeader=1
|
||||||
|
mtLog_NetHeader0="Network"
|
||||||
|
Count mtLog_NetIP=1
|
||||||
|
mtLog_NetIP0="IP Address"
|
||||||
|
Count mtLog_NetSubmask=1
|
||||||
|
mtLog_NetSubmask0="Submask"
|
||||||
|
Count mtLog_NetGateway=1
|
||||||
|
mtLog_NetGateway0="Gateway"
|
||||||
|
Count mtLog_NetDNS1=1
|
||||||
|
mtLog_NetDNS10="DNS 1"
|
||||||
|
Count mtLog_NetDNS2=1
|
||||||
|
mtLog_NetDNS20="DNS 2"
|
||||||
|
Count mtLog_NetDHCP=1
|
||||||
|
mtLog_NetDHCP0="DHCP"
|
||||||
|
Count mtLog_CustInfoHeader=1
|
||||||
|
mtLog_CustInfoHeader0="Custom Information"
|
||||||
|
Count mtCallStack_Address=1
|
||||||
|
mtCallStack_Address0="Address"
|
||||||
|
Count mtCallStack_Name=1
|
||||||
|
mtCallStack_Name0="Module"
|
||||||
|
Count mtCallStack_Unit=1
|
||||||
|
mtCallStack_Unit0="Unit"
|
||||||
|
Count mtCallStack_Class=1
|
||||||
|
mtCallStack_Class0="Class"
|
||||||
|
Count mtCallStack_Procedure=1
|
||||||
|
mtCallStack_Procedure0="Procedure/Method"
|
||||||
|
Count mtCallStack_Line=1
|
||||||
|
mtCallStack_Line0="Line"
|
||||||
|
Count mtCallStack_MainThread=1
|
||||||
|
mtCallStack_MainThread0="Main"
|
||||||
|
Count mtCallStack_ExceptionThread=1
|
||||||
|
mtCallStack_ExceptionThread0="Exception Thread"
|
||||||
|
Count mtCallStack_RunningThread=1
|
||||||
|
mtCallStack_RunningThread0="Running Thread"
|
||||||
|
Count mtCallStack_CallingThread=1
|
||||||
|
mtCallStack_CallingThread0="Calling Thread"
|
||||||
|
Count mtCallStack_ThreadID=1
|
||||||
|
mtCallStack_ThreadID0="ID"
|
||||||
|
Count mtCallStack_ThreadPriority=1
|
||||||
|
mtCallStack_ThreadPriority0="Priority"
|
||||||
|
Count mtCallStack_ThreadClass=1
|
||||||
|
mtCallStack_ThreadClass0="Class"
|
||||||
|
Count mtCallStack_LeakCaption=1
|
||||||
|
mtCallStack_LeakCaption0="Memory Leak"
|
||||||
|
Count mtCallStack_LeakData=1
|
||||||
|
mtCallStack_LeakData0="Data"
|
||||||
|
Count mtCallStack_LeakType=1
|
||||||
|
mtCallStack_LeakType0="Type"
|
||||||
|
Count mtCallStack_LeakSize=1
|
||||||
|
mtCallStack_LeakSize0="Total size"
|
||||||
|
Count mtCallStack_LeakCount=1
|
||||||
|
mtCallStack_LeakCount0="Count"
|
||||||
|
Count mtSendDialog_Caption=1
|
||||||
|
mtSendDialog_Caption0="Send."
|
||||||
|
Count mtSendDialog_Message=1
|
||||||
|
mtSendDialog_Message0="Message"
|
||||||
|
Count mtSendDialog_Resolving=1
|
||||||
|
mtSendDialog_Resolving0="Resolving DNS..."
|
||||||
|
Count mtSendDialog_Login=1
|
||||||
|
mtSendDialog_Login0="Login..."
|
||||||
|
Count mtSendDialog_Connecting=1
|
||||||
|
mtSendDialog_Connecting0="Connecting with server..."
|
||||||
|
Count mtSendDialog_Connected=1
|
||||||
|
mtSendDialog_Connected0="Connected with server."
|
||||||
|
Count mtSendDialog_Sending=1
|
||||||
|
mtSendDialog_Sending0="Sending message..."
|
||||||
|
Count mtSendDialog_Sent=1
|
||||||
|
mtSendDialog_Sent0="Message sent."
|
||||||
|
Count mtSendDialog_SelectProject=1
|
||||||
|
mtSendDialog_SelectProject0="Select project..."
|
||||||
|
Count mtSendDialog_Searching=1
|
||||||
|
mtSendDialog_Searching0="Searching..."
|
||||||
|
Count mtSendDialog_Modifying=1
|
||||||
|
mtSendDialog_Modifying0="Modifying..."
|
||||||
|
Count mtSendDialog_Disconnecting=1
|
||||||
|
mtSendDialog_Disconnecting0="Disconnecting..."
|
||||||
|
Count mtSendDialog_Disconnected=1
|
||||||
|
mtSendDialog_Disconnected0="Disconnected."
|
||||||
|
Count mtReproduceDialog_Caption=1
|
||||||
|
mtReproduceDialog_Caption0="Request"
|
||||||
|
Count mtReproduceDialog_Request=1
|
||||||
|
mtReproduceDialog_Request0="Please describe the steps to reproduce the error:"
|
||||||
|
Count mtReproduceDialog_OKButtonCaption=1
|
||||||
|
mtReproduceDialog_OKButtonCaption0="%26OK"
|
||||||
|
Count mtModules_Handle=1
|
||||||
|
mtModules_Handle0="Handle"
|
||||||
|
Count mtModules_Name=1
|
||||||
|
mtModules_Name0="Name"
|
||||||
|
Count mtModules_Description=1
|
||||||
|
mtModules_Description0="Description"
|
||||||
|
Count mtModules_Version=1
|
||||||
|
mtModules_Version0="Version"
|
||||||
|
Count mtModules_Size=1
|
||||||
|
mtModules_Size0="Size"
|
||||||
|
Count mtModules_LastModified=1
|
||||||
|
mtModules_LastModified0="Modified"
|
||||||
|
Count mtModules_Path=1
|
||||||
|
mtModules_Path0="Path"
|
||||||
|
Count mtProcesses_ID=1
|
||||||
|
mtProcesses_ID0="ID"
|
||||||
|
Count mtProcesses_Name=1
|
||||||
|
mtProcesses_Name0="Name"
|
||||||
|
Count mtProcesses_Description=1
|
||||||
|
mtProcesses_Description0="Description"
|
||||||
|
Count mtProcesses_Version=1
|
||||||
|
mtProcesses_Version0="Version"
|
||||||
|
Count mtProcesses_Memory=1
|
||||||
|
mtProcesses_Memory0="Memory"
|
||||||
|
Count mtProcesses_Priority=1
|
||||||
|
mtProcesses_Priority0="Priority"
|
||||||
|
Count mtProcesses_Threads=1
|
||||||
|
mtProcesses_Threads0="Threads"
|
||||||
|
Count mtProcesses_Path=1
|
||||||
|
mtProcesses_Path0="Path"
|
||||||
|
Count mtCPU_Registers=1
|
||||||
|
mtCPU_Registers0="Registers"
|
||||||
|
Count mtCPU_Stack=1
|
||||||
|
mtCPU_Stack0="Stack"
|
||||||
|
Count mtCPU_MemoryDump=1
|
||||||
|
mtCPU_MemoryDump0="Memory Dump"
|
||||||
|
Count mtSend_SuccessMsg=1
|
||||||
|
mtSend_SuccessMsg0="The message was sent successfully."
|
||||||
|
Count mtSend_FailureMsg=1
|
||||||
|
mtSend_FailureMsg0="Sorry, sending the message didn't work."
|
||||||
|
Count mtSend_BugClosedMsg=2
|
||||||
|
mtSend_BugClosedMsg0="These BUG is just closed."
|
||||||
|
mtSend_BugClosedMsg1="Contact the program support to obtain an update."
|
||||||
|
Count mtSend_UnknownErrorMsg=1
|
||||||
|
mtSend_UnknownErrorMsg0="Unknown error."
|
||||||
|
Count mtSend_InvalidLoginMsg=1
|
||||||
|
mtSend_InvalidLoginMsg0="Invalid login request."
|
||||||
|
Count mtSend_InvalidSearchMsg=1
|
||||||
|
mtSend_InvalidSearchMsg0="Invalid search request."
|
||||||
|
Count mtSend_InvalidSelectionMsg=1
|
||||||
|
mtSend_InvalidSelectionMsg0="Invalid selection request."
|
||||||
|
Count mtSend_InvalidInsertMsg=1
|
||||||
|
mtSend_InvalidInsertMsg0="Invalid insert request."
|
||||||
|
Count mtSend_InvalidModifyMsg=1
|
||||||
|
mtSend_InvalidModifyMsg0="Invalid modify request."
|
||||||
|
Count mtFileCrackedMsg=2
|
||||||
|
mtFileCrackedMsg0="This file is cracked."
|
||||||
|
mtFileCrackedMsg1="The application will be closed."
|
||||||
|
Count mtException_LeakMultiFree=1
|
||||||
|
mtException_LeakMultiFree0="Multi Free memory leak."
|
||||||
|
Count mtException_LeakMemoryOverrun=1
|
||||||
|
mtException_LeakMemoryOverrun0="Memory Overrun leak."
|
||||||
|
Count mtException_AntiFreeze=1
|
||||||
|
mtException_AntiFreeze0="The application seems to be frozen."
|
||||||
|
Count mtInvalidEmailMsg=1
|
||||||
|
mtInvalidEmailMsg0="Invalid email."
|
||||||
|
TextsCollection=English
|
||||||
|
EurekaLog Last Line -->
|
||||||
@ -0,0 +1,18 @@
|
|||||||
|
/* VER185
|
||||||
|
Generated by the CodeGear Delphi Pascal Compiler
|
||||||
|
because -GD or --drc was supplied to the compiler.
|
||||||
|
|
||||||
|
This file contains compiler-generated resources that
|
||||||
|
were bound to the executable.
|
||||||
|
If this file is empty, then no compiler-generated
|
||||||
|
resources were bound to the produced executable.
|
||||||
|
*/
|
||||||
|
|
||||||
|
STRINGTABLE
|
||||||
|
BEGIN
|
||||||
|
END
|
||||||
|
|
||||||
|
/* C:\Codigo\Source\Modulos\ProcesoPresupuestoCliente\Views\uViewProcesoPresupuestosCliente.dfm */
|
||||||
|
/* C:\Codigo\Source\Modulos\ProcesoPresupuestoCliente\Views\uEditorProcesoPresupuestosCliente.dfm */
|
||||||
|
/* C:\Codigo\Source\Modulos\ProcesoPresupuestoCliente\Views\ProcesoPresupuestosCliente_view.res */
|
||||||
|
/* C:\Codigo\Source\Modulos\ProcesoPresupuestoCliente\Views\ProcesoPresupuestosCliente_view.drf */
|
||||||
@ -0,0 +1,155 @@
|
|||||||
|
inherited fEditorProcesoPresupuestosCliente: TfEditorProcesoPresupuestosCliente
|
||||||
|
Caption = 'fEditorProcesoPresupuestosCliente'
|
||||||
|
PixelsPerInch = 96
|
||||||
|
TextHeight = 13
|
||||||
|
inherited JvNavPanelHeader: TJvNavPanelHeader
|
||||||
|
Caption = 'Listado de proceso completo de presupuesto de cliente'
|
||||||
|
end
|
||||||
|
inherited TBXDock: TTBXDock
|
||||||
|
inherited tbxMain: TTBXToolbar
|
||||||
|
ExplicitWidth = 358
|
||||||
|
end
|
||||||
|
end
|
||||||
|
inline frViewProcesoPresupuestosCliente1: TfrViewProcesoPresupuestosCliente [3]
|
||||||
|
Left = 0
|
||||||
|
Top = 102
|
||||||
|
Width = 894
|
||||||
|
Height = 383
|
||||||
|
Align = alClient
|
||||||
|
Font.Charset = DEFAULT_CHARSET
|
||||||
|
Font.Color = clWindowText
|
||||||
|
Font.Height = -11
|
||||||
|
Font.Name = 'Tahoma'
|
||||||
|
Font.Style = []
|
||||||
|
ParentFont = False
|
||||||
|
TabOrder = 3
|
||||||
|
ReadOnly = False
|
||||||
|
ExplicitTop = 102
|
||||||
|
ExplicitWidth = 894
|
||||||
|
ExplicitHeight = 383
|
||||||
|
inherited cxGrid: TcxGrid
|
||||||
|
Width = 894
|
||||||
|
Height = 255
|
||||||
|
ExplicitWidth = 894
|
||||||
|
ExplicitHeight = 255
|
||||||
|
end
|
||||||
|
inherited frViewFiltroBase1: TfrViewFiltroBase
|
||||||
|
Width = 894
|
||||||
|
ExplicitWidth = 894
|
||||||
|
inherited TBXDockablePanel1: TTBXDockablePanel
|
||||||
|
ExplicitWidth = 894
|
||||||
|
inherited dxLayoutControl1: TdxLayoutControl
|
||||||
|
Width = 894
|
||||||
|
ExplicitWidth = 894
|
||||||
|
inherited txtFiltroTodo: TcxTextEdit
|
||||||
|
Style.LookAndFeel.SkinName = ''
|
||||||
|
StyleDisabled.LookAndFeel.SkinName = ''
|
||||||
|
StyleFocused.LookAndFeel.SkinName = ''
|
||||||
|
StyleHot.LookAndFeel.SkinName = ''
|
||||||
|
end
|
||||||
|
inherited edtFechaIniFiltro: TcxDateEdit
|
||||||
|
Style.LookAndFeel.SkinName = ''
|
||||||
|
StyleDisabled.LookAndFeel.SkinName = ''
|
||||||
|
StyleFocused.LookAndFeel.SkinName = ''
|
||||||
|
StyleHot.LookAndFeel.SkinName = ''
|
||||||
|
end
|
||||||
|
inherited edtFechaFinFiltro: TcxDateEdit
|
||||||
|
Left = 391
|
||||||
|
Style.LookAndFeel.SkinName = ''
|
||||||
|
StyleDisabled.LookAndFeel.SkinName = ''
|
||||||
|
StyleFocused.LookAndFeel.SkinName = ''
|
||||||
|
StyleHot.LookAndFeel.SkinName = ''
|
||||||
|
ExplicitLeft = 391
|
||||||
|
end
|
||||||
|
inherited eLista: TcxComboBox
|
||||||
|
Left = 659
|
||||||
|
Style.LookAndFeel.SkinName = ''
|
||||||
|
StyleDisabled.LookAndFeel.SkinName = ''
|
||||||
|
StyleFocused.LookAndFeel.SkinName = ''
|
||||||
|
StyleHot.LookAndFeel.SkinName = ''
|
||||||
|
ExplicitLeft = 659
|
||||||
|
end
|
||||||
|
end
|
||||||
|
inherited TBXAlignmentPanel1: TTBXAlignmentPanel
|
||||||
|
Width = 894
|
||||||
|
ExplicitWidth = 894
|
||||||
|
inherited tbxBotones: TTBXToolbar
|
||||||
|
Width = 884
|
||||||
|
ExplicitWidth = 884
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end
|
||||||
|
inherited pnlAgrupaciones: TTBXDockablePanel
|
||||||
|
Top = 357
|
||||||
|
ExplicitTop = 357
|
||||||
|
ExplicitWidth = 894
|
||||||
|
inherited TBXAlignmentPanel1: TTBXAlignmentPanel
|
||||||
|
Width = 894
|
||||||
|
ExplicitWidth = 894
|
||||||
|
inherited TBXToolbar1: TTBXToolbar
|
||||||
|
Width = 884
|
||||||
|
ExplicitWidth = 884
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end
|
||||||
|
inherited dxComponentPrinter: TdxComponentPrinter
|
||||||
|
inherited dxComponentPrinterLink: TdxGridReportLink
|
||||||
|
ReportDocument.CreationDate = 41516.564243344910000000
|
||||||
|
BuiltInReportLink = True
|
||||||
|
end
|
||||||
|
end
|
||||||
|
inherited cxViewGridPopupMenu: TcxGridPopupMenu
|
||||||
|
PopupMenus = <
|
||||||
|
item
|
||||||
|
GridView = frViewProcesoPresupuestosCliente1.cxGridView
|
||||||
|
HitTypes = [gvhtCell]
|
||||||
|
Index = 0
|
||||||
|
end>
|
||||||
|
end
|
||||||
|
end
|
||||||
|
inherited EditorActionList: TActionList [4]
|
||||||
|
inherited actNuevo: TAction
|
||||||
|
Enabled = False
|
||||||
|
Visible = False
|
||||||
|
end
|
||||||
|
inherited actModificar: TAction
|
||||||
|
Enabled = False
|
||||||
|
Visible = False
|
||||||
|
end
|
||||||
|
inherited actGuardarCerrar: TAction
|
||||||
|
Visible = False
|
||||||
|
end
|
||||||
|
inherited actGuardar: TAction
|
||||||
|
Visible = False
|
||||||
|
end
|
||||||
|
inherited actEliminar: TAction
|
||||||
|
Enabled = False
|
||||||
|
Visible = False
|
||||||
|
end
|
||||||
|
inherited actPrevisualizar: TAction
|
||||||
|
Visible = True
|
||||||
|
end
|
||||||
|
inherited actImprimir: TAction
|
||||||
|
Visible = True
|
||||||
|
end
|
||||||
|
inherited actDuplicar: TAction
|
||||||
|
Enabled = False
|
||||||
|
Visible = False
|
||||||
|
end
|
||||||
|
end
|
||||||
|
inherited SmallImages: TPngImageList [5]
|
||||||
|
end
|
||||||
|
inherited LargeImages: TPngImageList [6]
|
||||||
|
end
|
||||||
|
inherited JvFormStorage: TJvFormStorage [7]
|
||||||
|
end
|
||||||
|
inherited dsDataTable: TDADataSource [8]
|
||||||
|
Left = 40
|
||||||
|
Top = 120
|
||||||
|
end
|
||||||
|
inherited JvAppRegistryStorage: TJvAppRegistryStorage [9]
|
||||||
|
end
|
||||||
|
inherited StatusBarImages: TPngImageList [10]
|
||||||
|
end
|
||||||
|
end
|
||||||
@ -0,0 +1,154 @@
|
|||||||
|
unit uEditorProcesoPresupuestosCliente;
|
||||||
|
|
||||||
|
interface
|
||||||
|
|
||||||
|
uses
|
||||||
|
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
|
||||||
|
Dialogs, uEditorGridBase, Menus, JvAppStorage, JvAppRegistryStorage, DB,
|
||||||
|
uDAInterfaces, uDADataTable, JvComponentBase, JvFormPlacement, ImgList,
|
||||||
|
PngImageList, StdActns, ActnList, ComCtrls, JvExComCtrls, JvStatusBar, TBX,
|
||||||
|
TB2ExtItems, TBXExtItems, TB2Item, TB2Dock, TB2Toolbar, pngimage, ExtCtrls,
|
||||||
|
JvExControls, JvNavigationPane, uIEditorProcesoPresupuestosCLiente,
|
||||||
|
uCustomView, uViewBase, uViewGridBase, uViewGrid,
|
||||||
|
uViewProcesoPresupuestosCliente, uBizPedidosCliente, uBizPedidosProveedor,
|
||||||
|
uBizAlbaranesProveedor, uBizFacturasProveedor;
|
||||||
|
|
||||||
|
type
|
||||||
|
TfEditorProcesoPresupuestosCliente = class(TfEditorGridBase, IEditorProcesoPresupuestosCliente)
|
||||||
|
frViewProcesoPresupuestosCliente1: TfrViewProcesoPresupuestosCliente;
|
||||||
|
procedure FormShow(Sender: TObject);
|
||||||
|
protected
|
||||||
|
FPedidosCliente: IBizPedidoCliente;
|
||||||
|
FPedidosProveedor: IBizPedidoProveedor;
|
||||||
|
FAlbaranesProveedor: IBizAlbaranProveedor;
|
||||||
|
FFacturasProveedor: IBizFacturaProveedor;
|
||||||
|
|
||||||
|
function GetPedidosCliente: IBizPedidoCliente;
|
||||||
|
procedure SetPedidosCliente(const Value: IBizPedidoCliente);
|
||||||
|
function GetPedidosProveedor: IBizPedidoProveedor;
|
||||||
|
procedure SetPedidosProveedor(const Value: IBizPedidoProveedor);
|
||||||
|
function GetAlbaranesProveedor: IBizAlbaranProveedor;
|
||||||
|
procedure SetAlbaranesProveedor(const Value: IBizAlbaranProveedor);
|
||||||
|
function GetFacturasProveedor: IBizFacturaProveedor;
|
||||||
|
procedure SetFacturasProveedor(const Value: IBizFacturaProveedor);
|
||||||
|
|
||||||
|
public
|
||||||
|
property PedidosCliente: IBizPedidoCliente read GetPedidosCliente write SetPedidosCliente;
|
||||||
|
property PedidosProveedor: IBizPedidoProveedor read GetPedidosProveedor write SetPedidosProveedor;
|
||||||
|
property AlbaranesProveedor: IBizAlbaranProveedor read GetAlbaranesProveedor write SetAlbaranesProveedor;
|
||||||
|
property FacturasProveedor: IBizFacturaProveedor read GetFacturasProveedor write SetFacturasProveedor;
|
||||||
|
|
||||||
|
constructor Create(AOwner: TComponent); override;
|
||||||
|
destructor Destroy; override;
|
||||||
|
end;
|
||||||
|
|
||||||
|
|
||||||
|
implementation
|
||||||
|
|
||||||
|
{$R *.dfm}
|
||||||
|
|
||||||
|
{ TfEditorListadoProcesoPedidoCliente }
|
||||||
|
|
||||||
|
constructor TfEditorProcesoPresupuestosCliente.Create(AOwner: TComponent);
|
||||||
|
begin
|
||||||
|
inherited;
|
||||||
|
ViewGrid := frViewProcesoPresupuestosCliente1;
|
||||||
|
end;
|
||||||
|
|
||||||
|
destructor TfEditorProcesoPresupuestosCliente.Destroy;
|
||||||
|
begin
|
||||||
|
FPedidosCliente := Nil;
|
||||||
|
FPedidosProveedor := Nil;
|
||||||
|
FAlbaranesProveedor := Nil;
|
||||||
|
FFacturasProveedor := Nil;
|
||||||
|
inherited;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TfEditorProcesoPresupuestosCliente.FormShow(Sender: TObject);
|
||||||
|
begin
|
||||||
|
inherited;
|
||||||
|
|
||||||
|
if not Assigned(ViewGrid) then
|
||||||
|
raise Exception.Create('No hay ninguna vista asignada');
|
||||||
|
|
||||||
|
if not Assigned(PedidosCliente) then
|
||||||
|
raise Exception.Create('No hay ningun pedido de cliente asignado');
|
||||||
|
PedidosCliente.DataTable.Active := True;
|
||||||
|
|
||||||
|
if not Assigned(PedidosProveedor) then
|
||||||
|
raise Exception.Create('No hay ningun pedido de proveedor asignado');
|
||||||
|
PedidosProveedor.DataTable.Active := True;
|
||||||
|
|
||||||
|
if not Assigned(AlbaranesProveedor) then
|
||||||
|
raise Exception.Create('No hay ningun albarán de proveedor asignado');
|
||||||
|
AlbaranesProveedor.DataTable.Active := True;
|
||||||
|
|
||||||
|
if not Assigned(FacturasProveedor) then
|
||||||
|
raise Exception.Create('No hay ninguna factura de proveedor asignado');
|
||||||
|
FacturasProveedor.DataTable.Active := True;
|
||||||
|
|
||||||
|
ViewGrid.GotoFirst;
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TfEditorProcesoPresupuestosCliente.GetAlbaranesProveedor: IBizAlbaranProveedor;
|
||||||
|
begin
|
||||||
|
Result := FAlbaranesProveedor;
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TfEditorProcesoPresupuestosCliente.GetFacturasProveedor: IBizFacturaProveedor;
|
||||||
|
begin
|
||||||
|
Result := FFacturasProveedor;
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TfEditorProcesoPresupuestosCliente.GetPedidosCliente: IBizPedidoCliente;
|
||||||
|
begin
|
||||||
|
Result := FPedidosCliente;
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TfEditorProcesoPresupuestosCliente.GetPedidosProveedor: IBizPedidoProveedor;
|
||||||
|
begin
|
||||||
|
Result := FPedidosProveedor;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TfEditorProcesoPresupuestosCliente.SetAlbaranesProveedor(const Value: IBizAlbaranProveedor);
|
||||||
|
begin
|
||||||
|
FAlbaranesProveedor := Value;
|
||||||
|
if Assigned(FAlbaranesProveedor) then
|
||||||
|
begin
|
||||||
|
if Assigned(ViewGrid) then
|
||||||
|
(ViewGrid as IViewListadoProcesoPedidoCliente).AlbaranesProveedor := AlbaranesProveedor;
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TfEditorProcesoPresupuestosCliente.SetFacturasProveedor(const Value: IBizFacturaProveedor);
|
||||||
|
begin
|
||||||
|
FFacturasProveedor := Value;
|
||||||
|
if Assigned(FFacturasProveedor) then
|
||||||
|
begin
|
||||||
|
if Assigned(ViewGrid) then
|
||||||
|
(ViewGrid as IViewListadoProcesoPedidoCliente).FacturasProveedor := FacturasProveedor;
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TfEditorProcesoPresupuestosCliente.SetPedidosCliente(const Value: IBizPedidoCliente);
|
||||||
|
begin
|
||||||
|
FPedidosCliente := Value;
|
||||||
|
if Assigned(FPedidosCliente) then
|
||||||
|
begin
|
||||||
|
dsDataTable.DataTable := FPedidosCliente.DataTable;
|
||||||
|
if Assigned(ViewGrid) then
|
||||||
|
(ViewGrid as IViewListadoProcesoPedidoCliente).PedidosCliente := PedidosCliente;
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TfEditorProcesoPresupuestosCliente.SetPedidosProveedor(const Value: IBizPedidoProveedor);
|
||||||
|
begin
|
||||||
|
FPedidosProveedor := Value;
|
||||||
|
if Assigned(FPedidosProveedor) then
|
||||||
|
begin
|
||||||
|
if Assigned(ViewGrid) then
|
||||||
|
(ViewGrid as IViewListadoProcesoPedidoCliente).PedidosProveedor := PedidosProveedor;
|
||||||
|
end;
|
||||||
|
end;
|
||||||
|
|
||||||
|
end.
|
||||||
@ -0,0 +1,25 @@
|
|||||||
|
unit uProcesoPresupuestosClienteViewRegister;
|
||||||
|
|
||||||
|
interface
|
||||||
|
|
||||||
|
procedure RegisterViews;
|
||||||
|
procedure UnregisterViews;
|
||||||
|
|
||||||
|
implementation
|
||||||
|
|
||||||
|
uses
|
||||||
|
uEditorRegistryUtils,
|
||||||
|
uEditorProcesoPresupuestosCLiente;
|
||||||
|
|
||||||
|
procedure RegisterViews;
|
||||||
|
begin
|
||||||
|
EditorRegistry.RegisterClass(TfEditorProcesoPresupuestosCliente, 'EditorProcesoPresupuestosCliente');
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure UnregisterViews;
|
||||||
|
begin
|
||||||
|
EditorRegistry.UnRegisterClass(TfEditorProcesoPresupuestosCliente);
|
||||||
|
end;
|
||||||
|
|
||||||
|
end.
|
||||||
|
|
||||||
@ -0,0 +1,210 @@
|
|||||||
|
inherited frViewProcesoPresupuestosCliente: TfrViewProcesoPresupuestosCliente
|
||||||
|
OnShow = CustomViewShow
|
||||||
|
inherited cxGrid: TcxGrid
|
||||||
|
inherited cxGridView: TcxGridDBTableView
|
||||||
|
DataController.KeyFieldNames = 'ID'
|
||||||
|
OptionsCustomize.ColumnsQuickCustomization = False
|
||||||
|
OptionsView.Footer = False
|
||||||
|
inherited cxGridViewICONO: TcxGridDBColumn
|
||||||
|
Visible = False
|
||||||
|
VisibleForCustomization = False
|
||||||
|
end
|
||||||
|
object cxGridViewREFERENCIA: TcxGridDBColumn
|
||||||
|
Caption = 'Ref. Ped. Cliente'
|
||||||
|
DataBinding.FieldName = 'REFERENCIA'
|
||||||
|
end
|
||||||
|
object cxGridViewREFERENCIA_CLIENTE: TcxGridDBColumn
|
||||||
|
Caption = 'Ref. del Cliente'
|
||||||
|
DataBinding.FieldName = 'REFERENCIA_CLIENTE'
|
||||||
|
end
|
||||||
|
object cxGridViewNOMBRE: TcxGridDBColumn
|
||||||
|
Caption = 'Cliente'
|
||||||
|
DataBinding.FieldName = 'NOMBRE'
|
||||||
|
end
|
||||||
|
object cxGridViewSITUACION: TcxGridDBColumn
|
||||||
|
Caption = 'Situaci'#243'n'
|
||||||
|
DataBinding.FieldName = 'SITUACION'
|
||||||
|
end
|
||||||
|
object cxGridViewFECHA_PEDIDO: TcxGridDBColumn
|
||||||
|
Caption = 'Fecha'
|
||||||
|
DataBinding.FieldName = 'FECHA_PEDIDO'
|
||||||
|
end
|
||||||
|
end
|
||||||
|
object cxGridViewPedidosProveedor: TcxGridDBTableView [1]
|
||||||
|
NavigatorButtons.ConfirmDelete = False
|
||||||
|
DataController.DataSource = dsPedidosProveedor
|
||||||
|
DataController.DetailKeyFieldNames = 'ID_PEDIDO_CLIENTE'
|
||||||
|
DataController.KeyFieldNames = 'ID'
|
||||||
|
DataController.MasterKeyFieldNames = 'ID'
|
||||||
|
DataController.Options = [dcoAnsiSort, dcoCaseInsensitive, dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoSortByDisplayText]
|
||||||
|
DataController.Summary.DefaultGroupSummaryItems = <>
|
||||||
|
DataController.Summary.FooterSummaryItems = <>
|
||||||
|
DataController.Summary.SummaryGroups = <>
|
||||||
|
OptionsBehavior.CellHints = True
|
||||||
|
OptionsCustomize.ColumnFiltering = False
|
||||||
|
OptionsData.Deleting = False
|
||||||
|
OptionsData.DeletingConfirmation = False
|
||||||
|
OptionsData.Editing = False
|
||||||
|
OptionsData.Inserting = False
|
||||||
|
OptionsSelection.CellSelect = False
|
||||||
|
OptionsSelection.UnselectFocusedRecordOnExit = False
|
||||||
|
OptionsView.CellEndEllipsis = True
|
||||||
|
OptionsView.NoDataToDisplayInfoText = '<No hay datos a visualizar>'
|
||||||
|
OptionsView.CellAutoHeight = True
|
||||||
|
OptionsView.ColumnAutoWidth = True
|
||||||
|
OptionsView.GridLineColor = cl3DLight
|
||||||
|
OptionsView.GridLines = glHorizontal
|
||||||
|
OptionsView.GroupByBox = False
|
||||||
|
OptionsView.GroupRowStyle = grsOffice11
|
||||||
|
OptionsView.HeaderEndEllipsis = True
|
||||||
|
object cxGridViewPedidosProveedorREFERENCIA: TcxGridDBColumn
|
||||||
|
Caption = 'Ref. Ped. Proveedor'
|
||||||
|
DataBinding.FieldName = 'REFERENCIA'
|
||||||
|
end
|
||||||
|
object cxGridViewPedidosProveedorNOMBRE: TcxGridDBColumn
|
||||||
|
Caption = 'Proveedor'
|
||||||
|
DataBinding.FieldName = 'NOMBRE'
|
||||||
|
end
|
||||||
|
object cxGridViewPedidosProveedorSITUACION: TcxGridDBColumn
|
||||||
|
DataBinding.FieldName = 'SITUACION'
|
||||||
|
end
|
||||||
|
object cxGridViewPedidosProveedorFECHA_PEDIDO: TcxGridDBColumn
|
||||||
|
Caption = 'Fecha'
|
||||||
|
DataBinding.FieldName = 'FECHA_PEDIDO'
|
||||||
|
end
|
||||||
|
end
|
||||||
|
object cxGridViewAlbaranesProveedor: TcxGridDBTableView [2]
|
||||||
|
NavigatorButtons.ConfirmDelete = False
|
||||||
|
DataController.DataSource = dsAlbaranesProveedor
|
||||||
|
DataController.DetailKeyFieldNames = 'ID_PEDIDO'
|
||||||
|
DataController.KeyFieldNames = 'ID'
|
||||||
|
DataController.MasterKeyFieldNames = 'ID'
|
||||||
|
DataController.Options = [dcoAnsiSort, dcoCaseInsensitive, dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoSortByDisplayText]
|
||||||
|
DataController.Summary.DefaultGroupSummaryItems = <>
|
||||||
|
DataController.Summary.FooterSummaryItems = <>
|
||||||
|
DataController.Summary.SummaryGroups = <>
|
||||||
|
OptionsBehavior.CellHints = True
|
||||||
|
OptionsCustomize.ColumnFiltering = False
|
||||||
|
OptionsData.Deleting = False
|
||||||
|
OptionsData.DeletingConfirmation = False
|
||||||
|
OptionsData.Editing = False
|
||||||
|
OptionsData.Inserting = False
|
||||||
|
OptionsSelection.CellSelect = False
|
||||||
|
OptionsSelection.UnselectFocusedRecordOnExit = False
|
||||||
|
OptionsView.CellEndEllipsis = True
|
||||||
|
OptionsView.NoDataToDisplayInfoText = '<No hay datos a visualizar>'
|
||||||
|
OptionsView.CellAutoHeight = True
|
||||||
|
OptionsView.ColumnAutoWidth = True
|
||||||
|
OptionsView.GridLineColor = cl3DLight
|
||||||
|
OptionsView.GridLines = glHorizontal
|
||||||
|
OptionsView.GroupByBox = False
|
||||||
|
OptionsView.GroupRowStyle = grsOffice11
|
||||||
|
OptionsView.HeaderEndEllipsis = True
|
||||||
|
object cxGridViewAlbaranesProveedorREFERENCIA: TcxGridDBColumn
|
||||||
|
DataBinding.FieldName = 'REFERENCIA'
|
||||||
|
end
|
||||||
|
object cxGridViewAlbaranesProveedorSITUACION: TcxGridDBColumn
|
||||||
|
DataBinding.FieldName = 'SITUACION'
|
||||||
|
end
|
||||||
|
object cxGridViewAlbaranesProveedorFECHA_ALBARAN: TcxGridDBColumn
|
||||||
|
DataBinding.FieldName = 'FECHA_ALBARAN'
|
||||||
|
end
|
||||||
|
end
|
||||||
|
object cxGridViewFacturasProveedor: TcxGridDBTableView [3]
|
||||||
|
NavigatorButtons.ConfirmDelete = False
|
||||||
|
DataController.DataSource = dsFacturasProveedor
|
||||||
|
DataController.DetailKeyFieldNames = 'ID_ALBARAN'
|
||||||
|
DataController.KeyFieldNames = 'ID'
|
||||||
|
DataController.MasterKeyFieldNames = 'ID'
|
||||||
|
DataController.Options = [dcoAnsiSort, dcoCaseInsensitive, dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoSortByDisplayText]
|
||||||
|
DataController.Summary.DefaultGroupSummaryItems = <>
|
||||||
|
DataController.Summary.FooterSummaryItems = <>
|
||||||
|
DataController.Summary.SummaryGroups = <>
|
||||||
|
OptionsBehavior.CellHints = True
|
||||||
|
OptionsCustomize.ColumnFiltering = False
|
||||||
|
OptionsData.Deleting = False
|
||||||
|
OptionsData.DeletingConfirmation = False
|
||||||
|
OptionsData.Editing = False
|
||||||
|
OptionsData.Inserting = False
|
||||||
|
OptionsSelection.CellSelect = False
|
||||||
|
OptionsSelection.UnselectFocusedRecordOnExit = False
|
||||||
|
OptionsView.CellEndEllipsis = True
|
||||||
|
OptionsView.NoDataToDisplayInfoText = '<No hay datos a visualizar>'
|
||||||
|
OptionsView.CellAutoHeight = True
|
||||||
|
OptionsView.ColumnAutoWidth = True
|
||||||
|
OptionsView.GridLineColor = cl3DLight
|
||||||
|
OptionsView.GridLines = glHorizontal
|
||||||
|
OptionsView.GroupByBox = False
|
||||||
|
OptionsView.GroupRowStyle = grsOffice11
|
||||||
|
OptionsView.HeaderEndEllipsis = True
|
||||||
|
object cxGridViewFacturasProveedorREFERENCIA: TcxGridDBColumn
|
||||||
|
DataBinding.FieldName = 'REFERENCIA'
|
||||||
|
end
|
||||||
|
end
|
||||||
|
inherited cxGridLevel: TcxGridLevel
|
||||||
|
object cxGridLevelPedidosProveedor: TcxGridLevel
|
||||||
|
GridView = cxGridViewPedidosProveedor
|
||||||
|
object cxGridLevelAlbaranesProveedor: TcxGridLevel
|
||||||
|
GridView = cxGridViewAlbaranesProveedor
|
||||||
|
object cxGridLevelFacturasProveedor: TcxGridLevel
|
||||||
|
GridView = cxGridViewFacturasProveedor
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end
|
||||||
|
inherited frViewFiltroBase1: TfrViewFiltroBase
|
||||||
|
inherited TBXDockablePanel1: TTBXDockablePanel
|
||||||
|
inherited dxLayoutControl1: TdxLayoutControl
|
||||||
|
inherited txtFiltroTodo: TcxTextEdit
|
||||||
|
Style.LookAndFeel.SkinName = ''
|
||||||
|
StyleDisabled.LookAndFeel.SkinName = ''
|
||||||
|
StyleFocused.LookAndFeel.SkinName = ''
|
||||||
|
StyleHot.LookAndFeel.SkinName = ''
|
||||||
|
end
|
||||||
|
inherited edtFechaIniFiltro: TcxDateEdit
|
||||||
|
Style.LookAndFeel.SkinName = ''
|
||||||
|
StyleDisabled.LookAndFeel.SkinName = ''
|
||||||
|
StyleFocused.LookAndFeel.SkinName = ''
|
||||||
|
StyleHot.LookAndFeel.SkinName = ''
|
||||||
|
ExplicitWidth = 272
|
||||||
|
Width = 272
|
||||||
|
end
|
||||||
|
inherited edtFechaFinFiltro: TcxDateEdit
|
||||||
|
Style.LookAndFeel.SkinName = ''
|
||||||
|
StyleDisabled.LookAndFeel.SkinName = ''
|
||||||
|
StyleFocused.LookAndFeel.SkinName = ''
|
||||||
|
StyleHot.LookAndFeel.SkinName = ''
|
||||||
|
ExplicitWidth = 221
|
||||||
|
Width = 221
|
||||||
|
end
|
||||||
|
inherited eLista: TcxComboBox
|
||||||
|
Style.LookAndFeel.SkinName = ''
|
||||||
|
StyleDisabled.LookAndFeel.SkinName = ''
|
||||||
|
StyleFocused.LookAndFeel.SkinName = ''
|
||||||
|
StyleHot.LookAndFeel.SkinName = ''
|
||||||
|
ExplicitWidth = 215
|
||||||
|
Width = 215
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end
|
||||||
|
end
|
||||||
|
inherited dxComponentPrinter: TdxComponentPrinter
|
||||||
|
inherited dxComponentPrinterLink: TdxGridReportLink
|
||||||
|
ReportDocument.CreationDate = 41514.488531400460000000
|
||||||
|
BuiltInReportLink = True
|
||||||
|
end
|
||||||
|
end
|
||||||
|
object dsPedidosProveedor: TDADataSource
|
||||||
|
Left = 8
|
||||||
|
Top = 64
|
||||||
|
end
|
||||||
|
object dsAlbaranesProveedor: TDADataSource
|
||||||
|
Left = 8
|
||||||
|
Top = 112
|
||||||
|
end
|
||||||
|
object dsFacturasProveedor: TDADataSource
|
||||||
|
Left = 8
|
||||||
|
Top = 152
|
||||||
|
end
|
||||||
|
end
|
||||||
@ -0,0 +1,167 @@
|
|||||||
|
unit uViewProcesoPresupuestosCliente;
|
||||||
|
|
||||||
|
interface
|
||||||
|
|
||||||
|
uses
|
||||||
|
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
|
||||||
|
Dialogs, uViewGrid, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData,
|
||||||
|
cxDataStorage, cxEdit, DB, cxDBData, dxPSGlbl, dxPSUtl, dxPSEngn, dxPrnPg,
|
||||||
|
dxBkgnd, dxWrap, dxPrnDev, dxPSCompsProvider, dxPSFillPatterns,
|
||||||
|
dxPSEdgePatterns, cxGridCustomPopupMenu, cxGridPopupMenu, ImgList,
|
||||||
|
PngImageList, ActnList, dxPSCore, dxPScxCommon, dxPScxGrid6Lnk, uDAInterfaces,
|
||||||
|
uDADataTable, TB2Item, TBX, TB2Toolbar, TBXDkPanels, TB2Dock, uCustomView,
|
||||||
|
uViewBase, uViewFiltroBase, cxGridLevel, cxGridCustomTableView,
|
||||||
|
cxGridTableView, cxGridDBTableView, cxClasses, cxControls, cxGridCustomView,
|
||||||
|
cxGrid, uBizPedidosCliente, uBizPedidosProveedor, uBizAlbaranesProveedor,
|
||||||
|
uBizFacturasProveedor, Grids, DBGrids;
|
||||||
|
|
||||||
|
type
|
||||||
|
IViewListadoProcesoPedidoCliente = interface(IViewGrid)
|
||||||
|
['{51AE72F0-E6F7-49E6-A376-EBFB5B118E62}']
|
||||||
|
function GetPedidosCliente: IBizPedidoCliente;
|
||||||
|
procedure SetPedidosCliente(const Value: IBizPedidoCliente);
|
||||||
|
property PedidosCliente: IBizPedidoCliente read GetPedidosCliente write SetPedidosCliente;
|
||||||
|
|
||||||
|
function GetPedidosProveedor: IBizPedidoProveedor;
|
||||||
|
procedure SetPedidosProveedor(const Value: IBizPedidoProveedor);
|
||||||
|
property PedidosProveedor: IBizPedidoProveedor read GetPedidosProveedor write SetPedidosProveedor;
|
||||||
|
|
||||||
|
function GetAlbaranesProveedor: IBizAlbaranProveedor;
|
||||||
|
procedure SetAlbaranesProveedor(const Value: IBizAlbaranProveedor);
|
||||||
|
property AlbaranesProveedor: IBizAlbaranProveedor read GetAlbaranesProveedor write SetAlbaranesProveedor;
|
||||||
|
|
||||||
|
function GetFacturasProveedor: IBizFacturaProveedor;
|
||||||
|
procedure SetFacturasProveedor(const Value: IBizFacturaProveedor);
|
||||||
|
property FacturasProveedor: IBizFacturaProveedor read GetFacturasProveedor write SetFacturasProveedor;
|
||||||
|
|
||||||
|
end;
|
||||||
|
|
||||||
|
TfrViewProcesoPresupuestosCliente = class(TfrViewGrid, IViewListadoProcesoPedidoCliente)
|
||||||
|
cxGridViewREFERENCIA: TcxGridDBColumn;
|
||||||
|
cxGridViewNOMBRE: TcxGridDBColumn;
|
||||||
|
cxGridViewREFERENCIA_CLIENTE: TcxGridDBColumn;
|
||||||
|
cxGridViewSITUACION: TcxGridDBColumn;
|
||||||
|
dsPedidosProveedor: TDADataSource;
|
||||||
|
cxGridViewPedidosProveedor: TcxGridDBTableView;
|
||||||
|
cxGridViewPedidosProveedorREFERENCIA: TcxGridDBColumn;
|
||||||
|
cxGridLevelPedidosProveedor: TcxGridLevel;
|
||||||
|
cxGridViewPedidosProveedorNOMBRE: TcxGridDBColumn;
|
||||||
|
cxGridViewFECHA_PEDIDO: TcxGridDBColumn;
|
||||||
|
cxGridViewPedidosProveedorFECHA_PEDIDO: TcxGridDBColumn;
|
||||||
|
cxGridViewPedidosProveedorSITUACION: TcxGridDBColumn;
|
||||||
|
dsAlbaranesProveedor: TDADataSource;
|
||||||
|
cxGridLevelAlbaranesProveedor: TcxGridLevel;
|
||||||
|
cxGridViewAlbaranesProveedor: TcxGridDBTableView;
|
||||||
|
cxGridViewAlbaranesProveedorREFERENCIA: TcxGridDBColumn;
|
||||||
|
cxGridViewAlbaranesProveedorSITUACION: TcxGridDBColumn;
|
||||||
|
cxGridViewAlbaranesProveedorFECHA_ALBARAN: TcxGridDBColumn;
|
||||||
|
dsFacturasProveedor: TDADataSource;
|
||||||
|
cxGridLevelFacturasProveedor: TcxGridLevel;
|
||||||
|
cxGridViewFacturasProveedor: TcxGridDBTableView;
|
||||||
|
cxGridViewFacturasProveedorREFERENCIA: TcxGridDBColumn;
|
||||||
|
procedure CustomViewShow(Sender: TObject);
|
||||||
|
protected
|
||||||
|
FPedidosCliente: IBizPedidoCliente;
|
||||||
|
FPedidosProveedor: IBizPedidoProveedor;
|
||||||
|
FAlbaranesProveedor: IBizAlbaranProveedor;
|
||||||
|
FFacturasProveedor: IBizFacturaProveedor;
|
||||||
|
|
||||||
|
function GetPedidosCliente: IBizPedidoCliente;
|
||||||
|
procedure SetPedidosCliente(const Value: IBizPedidoCliente);
|
||||||
|
|
||||||
|
function GetPedidosProveedor: IBizPedidoProveedor;
|
||||||
|
procedure SetPedidosProveedor(const Value: IBizPedidoProveedor);
|
||||||
|
|
||||||
|
function GetAlbaranesProveedor: IBizAlbaranProveedor;
|
||||||
|
procedure SetAlbaranesProveedor(const Value: IBizAlbaranProveedor);
|
||||||
|
|
||||||
|
function GetFacturasProveedor: IBizFacturaProveedor;
|
||||||
|
procedure SetFacturasProveedor(const Value: IBizFacturaProveedor);
|
||||||
|
|
||||||
|
public
|
||||||
|
property PedidosCliente: IBizPedidoCliente read GetPedidosCliente write SetPedidosCliente;
|
||||||
|
property PedidosProveedor: IBizPedidoProveedor read GetPedidosProveedor write SetPedidosProveedor;
|
||||||
|
property AlbaranesProveedor: IBizAlbaranProveedor read GetAlbaranesProveedor write SetAlbaranesProveedor;
|
||||||
|
property FacturasProveedor: IBizFacturaProveedor read GetFacturasProveedor write SetFacturasProveedor;
|
||||||
|
|
||||||
|
destructor Destroy; override;
|
||||||
|
end;
|
||||||
|
|
||||||
|
implementation
|
||||||
|
{$R *.dfm}
|
||||||
|
|
||||||
|
{ TfrViewListadoProcesoPedidoCliente }
|
||||||
|
|
||||||
|
procedure TfrViewProcesoPresupuestosCliente.CustomViewShow(Sender: TObject);
|
||||||
|
begin
|
||||||
|
inherited;
|
||||||
|
if Assigned(FPedidosCliente) then
|
||||||
|
FPedidosCliente.Active := True;
|
||||||
|
end;
|
||||||
|
|
||||||
|
destructor TfrViewProcesoPresupuestosCliente.Destroy;
|
||||||
|
begin
|
||||||
|
FPedidosCliente:= Nil;
|
||||||
|
FPedidosProveedor:= Nil;
|
||||||
|
FAlbaranesProveedor:= Nil;
|
||||||
|
FFacturasProveedor:= Nil;
|
||||||
|
inherited;
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TfrViewProcesoPresupuestosCliente.GetAlbaranesProveedor: IBizAlbaranProveedor;
|
||||||
|
begin
|
||||||
|
REsult := FAlbaranesProveedor;
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TfrViewProcesoPresupuestosCliente.GetFacturasProveedor: IBizFacturaProveedor;
|
||||||
|
begin
|
||||||
|
Result := FFacturasProveedor;
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TfrViewProcesoPresupuestosCliente.GetPedidosCliente: IBizPedidoCliente;
|
||||||
|
begin
|
||||||
|
Result := FPedidosCliente;
|
||||||
|
end;
|
||||||
|
|
||||||
|
function TfrViewProcesoPresupuestosCliente.GetPedidosProveedor: IBizPedidoProveedor;
|
||||||
|
begin
|
||||||
|
Result := FPedidosProveedor;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TfrViewProcesoPresupuestosCliente.SetAlbaranesProveedor(const Value: IBizAlbaranProveedor);
|
||||||
|
begin
|
||||||
|
FAlbaranesProveedor := Value;
|
||||||
|
if Assigned(FAlbaranesProveedor) then
|
||||||
|
dsAlbaranesProveedor.DataTable := FAlbaranesProveedor.DataTable
|
||||||
|
else
|
||||||
|
dsAlbaranesProveedor.DataTable := Nil;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TfrViewProcesoPresupuestosCliente.SetFacturasProveedor(const Value: IBizFacturaProveedor);
|
||||||
|
begin
|
||||||
|
FFacturasProveedor := Value;
|
||||||
|
if Assigned(FFacturasProveedor) then
|
||||||
|
dsFacturasProveedor.DataTable := FFacturasProveedor.DataTable
|
||||||
|
else
|
||||||
|
dsFacturasProveedor.DataTable := Nil;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TfrViewProcesoPresupuestosCliente.SetPedidosCliente(const Value: IBizPedidoCliente);
|
||||||
|
begin
|
||||||
|
FPedidosCliente := Value;
|
||||||
|
if Assigned(FPedidosCliente) then
|
||||||
|
dsDataSource.DataTable := FPedidosCliente.DataTable
|
||||||
|
else
|
||||||
|
dsDataSource.DataTable := Nil;
|
||||||
|
end;
|
||||||
|
|
||||||
|
procedure TfrViewProcesoPresupuestosCliente.SetPedidosProveedor(const Value: IBizPedidoProveedor);
|
||||||
|
begin
|
||||||
|
FPedidosProveedor := Value;
|
||||||
|
if Assigned(FPedidosProveedor) then
|
||||||
|
dsPedidosProveedor.DataTable := FPedidosProveedor.DataTable
|
||||||
|
else
|
||||||
|
dsPedidosProveedor.DataTable := Nil;
|
||||||
|
end;
|
||||||
|
|
||||||
|
end.
|
||||||
@ -14,4 +14,4 @@ END
|
|||||||
|
|
||||||
/* C:\Codigo\Source\Modulos\Tienda web\Data\uDataModuleTiendaWeb.dfm */
|
/* C:\Codigo\Source\Modulos\Tienda web\Data\uDataModuleTiendaWeb.dfm */
|
||||||
/* C:\Codigo\Source\Modulos\Tienda web\Data\TiendaWeb_data.res */
|
/* C:\Codigo\Source\Modulos\Tienda web\Data\TiendaWeb_data.res */
|
||||||
/* c:\temp\dtf69C.tmp */
|
/* c:\temp\dtfB2F.tmp */
|
||||||
|
|||||||
Binary file not shown.
@ -141,8 +141,6 @@ uses
|
|||||||
uBizOscProductServer in '..\Modulos\Tienda web\Model\uBizOscProductServer.pas',
|
uBizOscProductServer in '..\Modulos\Tienda web\Model\uBizOscProductServer.pas',
|
||||||
uTiendaWebUtils in 'Utiles\uTiendaWebUtils.pas',
|
uTiendaWebUtils in 'Utiles\uTiendaWebUtils.pas',
|
||||||
uConexionOSC in 'Configuracion\uConexionOSC.pas' {frConexionOSC: TFrame},
|
uConexionOSC in 'Configuracion\uConexionOSC.pas' {frConexionOSC: TFrame},
|
||||||
schFacturasProveedorClient_Intf in '..\Modulos\Facturas de proveedor\Model\schFacturasProveedorClient_Intf.pas',
|
|
||||||
schFacturasProveedorServer_Intf in '..\Modulos\Facturas de proveedor\Model\schFacturasProveedorServer_Intf.pas',
|
|
||||||
schAlbaranesClienteClient_Intf in '..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteClient_Intf.pas',
|
schAlbaranesClienteClient_Intf in '..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteClient_Intf.pas',
|
||||||
schAlbaranesClienteServer_Intf in '..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteServer_Intf.pas',
|
schAlbaranesClienteServer_Intf in '..\Modulos\Albaranes de cliente\Model\schAlbaranesClienteServer_Intf.pas',
|
||||||
schTiendaWebClient_Intf in '..\Modulos\Tienda web\Model\schTiendaWebClient_Intf.pas',
|
schTiendaWebClient_Intf in '..\Modulos\Tienda web\Model\schTiendaWebClient_Intf.pas',
|
||||||
@ -160,10 +158,12 @@ uses
|
|||||||
schInfVentasArticuloServer_Intf in '..\Modulos\Informe ventas por articulo\Model\schInfVentasArticuloServer_Intf.pas',
|
schInfVentasArticuloServer_Intf in '..\Modulos\Informe ventas por articulo\Model\schInfVentasArticuloServer_Intf.pas',
|
||||||
schAlbaranesProveedorClient_Intf in '..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorClient_Intf.pas',
|
schAlbaranesProveedorClient_Intf in '..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorClient_Intf.pas',
|
||||||
schAlbaranesProveedorServer_Intf in '..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorServer_Intf.pas',
|
schAlbaranesProveedorServer_Intf in '..\Modulos\Albaranes de proveedor\Model\schAlbaranesProveedorServer_Intf.pas',
|
||||||
|
schPedidosProveedorClient_Intf in '..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorClient_Intf.pas',
|
||||||
|
schPedidosProveedorServer_Intf in '..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorServer_Intf.pas',
|
||||||
schPedidosClienteClient_Intf in '..\Modulos\Pedidos de cliente\Model\schPedidosClienteClient_Intf.pas',
|
schPedidosClienteClient_Intf in '..\Modulos\Pedidos de cliente\Model\schPedidosClienteClient_Intf.pas',
|
||||||
schPedidosClienteServer_Intf in '..\Modulos\Pedidos de cliente\Model\schPedidosClienteServer_Intf.pas',
|
schPedidosClienteServer_Intf in '..\Modulos\Pedidos de cliente\Model\schPedidosClienteServer_Intf.pas',
|
||||||
schPedidosProveedorClient_Intf in '..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorClient_Intf.pas',
|
schFacturasProveedorClient_Intf in '..\Modulos\Facturas de proveedor\Model\schFacturasProveedorClient_Intf.pas',
|
||||||
schPedidosProveedorServer_Intf in '..\Modulos\Pedidos a proveedor\Model\schPedidosProveedorServer_Intf.pas';
|
schFacturasProveedorServer_Intf in '..\Modulos\Facturas de proveedor\Model\schFacturasProveedorServer_Intf.pas';
|
||||||
|
|
||||||
{$R *.res}
|
{$R *.res}
|
||||||
{$R ..\Servicios\RODLFile.res}
|
{$R ..\Servicios\RODLFile.res}
|
||||||
|
|||||||
@ -1,407 +1,407 @@
|
|||||||
<?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_d10;tbx_d10;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;cxIntlPrintSys3D10;cxExportD10;cxIntl5D10;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_d10;tbx_d10;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;cxIntlPrintSys3D10;cxExportD10;cxIntl5D10;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;</DCC_Define>
|
<DCC_Define>DEBUG;</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>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</DCC_UnitSearchPath>
|
<DCC_UnitSearchPath>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</DCC_UnitSearchPath>
|
||||||
<DCC_ResourcePath>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</DCC_ResourcePath>
|
<DCC_ResourcePath>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</DCC_ResourcePath>
|
||||||
<DCC_ObjPath>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</DCC_ObjPath>
|
<DCC_ObjPath>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</DCC_ObjPath>
|
||||||
<DCC_IncludePath>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</DCC_IncludePath>
|
<DCC_IncludePath>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</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">4</VersionInfo><VersionInfo Name="MinorVer">3</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"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">4.3.2.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">4.3.2.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys><VersionInfoKeys Name="CompileDate">viernes, 19 de julio de 2013 13:48</VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
|
<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">4</VersionInfo><VersionInfo Name="MinorVer">3</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"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">4.3.2.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">4.3.2.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys><VersionInfoKeys Name="CompileDate">viernes, 19 de julio de 2013 13:48</VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
|
||||||
<Excluded_Packages Name="C:\Documents and Settings\All Users\Documentos\RAD Studio\5.0\Bpl\dxPSCoreD11.bpl">ExpressPrinting System by Developer Express Inc.</Excluded_Packages>
|
<Excluded_Packages Name="C:\Documents and Settings\All Users\Documentos\RAD Studio\5.0\Bpl\dxPSCoreD11.bpl">ExpressPrinting System by Developer Express Inc.</Excluded_Packages>
|
||||||
</Excluded_Packages><Source><Source Name="MainSource">FactuGES_Server.dpr</Source></Source></Delphi.Personality><ModelSupport>False</ModelSupport></BorlandProject></BorlandProject>
|
</Excluded_Packages><Source><Source Name="MainSource">FactuGES_Server.dpr</Source></Source></Delphi.Personality><ModelSupport>False</ModelSupport></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>
|
<Form>srvEmpresas</Form>
|
||||||
<DesignClass>TDARemoteService</DesignClass>
|
<DesignClass>TDARemoteService</DesignClass>
|
||||||
</DCCReference>
|
</DCCReference>
|
||||||
<DCCReference Include="..\ApplicationBase\ProvinciasPoblaciones\Servidor\srvProvinciasPoblaciones_Impl.pas">
|
<DCCReference Include="..\ApplicationBase\ProvinciasPoblaciones\Servidor\srvProvinciasPoblaciones_Impl.pas">
|
||||||
<Form>srvProvinciasPoblaciones_Impl</Form>
|
<Form>srvProvinciasPoblaciones_Impl</Form>
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
</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>
|
<Form>srvUsuarios</Form>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
</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>
|
<Form>RptAlbaranesCliente</Form>
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
</DCCReference>
|
</DCCReference>
|
||||||
<DCCReference Include="..\Modulos\Albaranes de cliente\Reports\uRptWordAlbaranCliente.pas">
|
<DCCReference Include="..\Modulos\Albaranes de cliente\Reports\uRptWordAlbaranCliente.pas">
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
<Form>RptWordAlbaranCliente</Form>
|
<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>
|
<Form>srvAlbaranesCliente</Form>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
</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>
|
<Form>RptAlbaranesProveedor</Form>
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
</DCCReference>
|
</DCCReference>
|
||||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\Reports\uRptWordAlbaranProveedor.pas">
|
<DCCReference Include="..\Modulos\Albaranes de proveedor\Reports\uRptWordAlbaranProveedor.pas">
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
<Form>RptWordAlbaranProveedor</Form>
|
<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>
|
<Form>srvAlbaranesProveedor</Form>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
</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>
|
<Form>srvAlmacenes</Form>
|
||||||
<DesignClass>TDARemoteService</DesignClass>
|
<DesignClass>TDARemoteService</DesignClass>
|
||||||
</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>
|
<Form>srvArticulos</Form>
|
||||||
<DesignClass>TDARemoteService</DesignClass>
|
<DesignClass>TDARemoteService</DesignClass>
|
||||||
</DCCReference>
|
</DCCReference>
|
||||||
<DCCReference Include="..\Modulos\Comisiones\Model\schComisionesClient_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Comisiones\Model\schComisionesClient_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Comisiones\Model\schComisionesServer_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Comisiones\Model\schComisionesServer_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Comisiones\Model\uBizComisionesServer.pas"/>
|
<DCCReference Include="..\Modulos\Comisiones\Model\uBizComisionesServer.pas" />
|
||||||
<DCCReference Include="..\Modulos\Comisiones\Reports\uRptComisiones_Server.pas">
|
<DCCReference Include="..\Modulos\Comisiones\Reports\uRptComisiones_Server.pas">
|
||||||
<Form>RptComisiones</Form>
|
<Form>RptComisiones</Form>
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
</DCCReference>
|
</DCCReference>
|
||||||
<DCCReference Include="..\Modulos\Comisiones\Servidor\srvComisiones_Impl.pas">
|
<DCCReference Include="..\Modulos\Comisiones\Servidor\srvComisiones_Impl.pas">
|
||||||
<Form>srvComisiones</Form>
|
<Form>srvComisiones</Form>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
</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\uBizAgentesServer.pas"/>
|
<DCCReference Include="..\Modulos\Contactos\Model\uBizAgentesServer.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\Reports\uRptEtiquetasContacto_Server.pas">
|
<DCCReference Include="..\Modulos\Contactos\Reports\uRptEtiquetasContacto_Server.pas">
|
||||||
<Form>RptEtiquetasContacto</Form>
|
<Form>RptEtiquetasContacto</Form>
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
</DCCReference>
|
</DCCReference>
|
||||||
<DCCReference Include="..\Modulos\Contactos\Reports\uRptFichasEmpleado_Server.pas">
|
<DCCReference Include="..\Modulos\Contactos\Reports\uRptFichasEmpleado_Server.pas">
|
||||||
<Form>RptFichasEmpleado</Form>
|
<Form>RptFichasEmpleado</Form>
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
</DCCReference>
|
</DCCReference>
|
||||||
<DCCReference Include="..\Modulos\Contactos\Servidor\srvContactos_Impl.pas">
|
<DCCReference Include="..\Modulos\Contactos\Servidor\srvContactos_Impl.pas">
|
||||||
<Form>srvContactos</Form>
|
<Form>srvContactos</Form>
|
||||||
<DesignClass>TDARemoteService</DesignClass>
|
<DesignClass>TDARemoteService</DesignClass>
|
||||||
</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>
|
<Form>srvFabricantes</Form>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
</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>
|
<Form>RptFacturasCliente</Form>
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
</DCCReference>
|
</DCCReference>
|
||||||
<DCCReference Include="..\Modulos\Facturas de cliente\Reports\uRptWordFacturaCliente.pas">
|
<DCCReference Include="..\Modulos\Facturas de cliente\Reports\uRptWordFacturaCliente.pas">
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
<Form>RptWordFacturaCliente</Form>
|
<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>
|
<Form>srvFacturasCliente</Form>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
</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>
|
<Form>RptFacturasProveedor</Form>
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
</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>
|
<Form>srvFacturasProveedor</Form>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
</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>
|
<Form>srvFamilias</Form>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
</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>
|
<Form>srvFormasPago</Form>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
</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>
|
<Form>srvGestorDocumentos</Form>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
</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>
|
<Form>srvGestorInformes</Form>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
</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>
|
<Form>srvHistoricoMovimientos</Form>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
</DCCReference>
|
</DCCReference>
|
||||||
<DCCReference Include="..\Modulos\Impresiones\Model\schImpresionesClient_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Impresiones\Model\schImpresionesClient_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Impresiones\Model\schImpresionesServer_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Impresiones\Model\schImpresionesServer_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Impresiones\Servidor\srvImpresiones_Impl.pas">
|
<DCCReference Include="..\Modulos\Impresiones\Servidor\srvImpresiones_Impl.pas">
|
||||||
<Form>srvImpresiones</Form>
|
<Form>srvImpresiones</Form>
|
||||||
<DesignClass>TDARemoteService</DesignClass>
|
<DesignClass>TDARemoteService</DesignClass>
|
||||||
</DCCReference>
|
</DCCReference>
|
||||||
<DCCReference Include="..\Modulos\Informe margen por articulo\Servidor\srvInfMargenArticulo_Impl.pas">
|
<DCCReference Include="..\Modulos\Informe margen por articulo\Servidor\srvInfMargenArticulo_Impl.pas">
|
||||||
<Form>srvInfMargenArticulo</Form>
|
<Form>srvInfMargenArticulo</Form>
|
||||||
<DesignClass>TDARemoteService</DesignClass>
|
<DesignClass>TDARemoteService</DesignClass>
|
||||||
</DCCReference>
|
</DCCReference>
|
||||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\Model\schInfVentasArticuloClient_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Informe ventas por articulo\Model\schInfVentasArticuloClient_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\Model\schInfVentasArticuloServer_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Informe ventas por articulo\Model\schInfVentasArticuloServer_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\Servidor\srvInfVentasArticulo_Impl.pas">
|
<DCCReference Include="..\Modulos\Informe ventas por articulo\Servidor\srvInfVentasArticulo_Impl.pas">
|
||||||
<Form>srvInfVentasArticulo</Form>
|
<Form>srvInfVentasArticulo</Form>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
</DCCReference>
|
</DCCReference>
|
||||||
<DCCReference Include="..\Modulos\Informes base\Model\schInformesClient_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Informes base\Model\schInformesClient_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Informes base\Model\schInformesServer_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Informes base\Model\schInformesServer_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Informes base\Servidor\srvInformes_Impl.pas">
|
<DCCReference Include="..\Modulos\Informes base\Servidor\srvInformes_Impl.pas">
|
||||||
<Form>srvInformes</Form>
|
<Form>srvInformes</Form>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
</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>
|
<Form>srvInventario</Form>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
</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>
|
<Form>srvObras</Form>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
</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>
|
<Form>RptPedidosProveedor</Form>
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
</DCCReference>
|
</DCCReference>
|
||||||
<DCCReference Include="..\Modulos\Pedidos a proveedor\Reports\uRptWordPedidoProveedor.pas">
|
<DCCReference Include="..\Modulos\Pedidos a proveedor\Reports\uRptWordPedidoProveedor.pas">
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
<Form>RptWordPedidoProveedor</Form>
|
<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>
|
<Form>srvPedidosProveedor</Form>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
</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>
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
</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>
|
<Form>srvPedidosCliente</Form>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
</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>
|
<Form>RptPresupuestosCliente</Form>
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
</DCCReference>
|
</DCCReference>
|
||||||
<DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptWordCertificadoTrabajo_Server.pas">
|
<DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptWordCertificadoTrabajo_Server.pas">
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
<Form>RptWordCertificadoTrabajo</Form>
|
<Form>RptWordCertificadoTrabajo</Form>
|
||||||
</DCCReference>
|
</DCCReference>
|
||||||
<DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptWordPresupuestoCliente.pas">
|
<DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptWordPresupuestoCliente.pas">
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
<Form>RptWordPresupuestoCliente</Form>
|
<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>
|
<Form>srvPresupuestosCliente</Form>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
</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>
|
<Form>RptRecibosCliente</Form>
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
</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>
|
<Form>srvRecibosCliente</Form>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
</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>
|
<Form>RptRecibosProveedor</Form>
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
</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>
|
<Form>srvRecibosProveedor</Form>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
</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>
|
<Form>srvReferencias</Form>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
</DCCReference>
|
</DCCReference>
|
||||||
<DCCReference Include="..\Modulos\Registro de correos\Servidor\srvRegistroCorreos_Impl.pas">
|
<DCCReference Include="..\Modulos\Registro de correos\Servidor\srvRegistroCorreos_Impl.pas">
|
||||||
<Form>srvRegistroCorreos</Form>
|
<Form>srvRegistroCorreos</Form>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
</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>
|
<Form>RptRemesasCliente</Form>
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
</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>
|
<Form>srvRemesasCliente</Form>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
</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\Reports\uRptRemesasProveedor_Server.pas">
|
<DCCReference Include="..\Modulos\Remesas de proveedor\Reports\uRptRemesasProveedor_Server.pas">
|
||||||
<Form>RptRemesasProveedor</Form>
|
<Form>RptRemesasProveedor</Form>
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
</DCCReference>
|
</DCCReference>
|
||||||
<DCCReference Include="..\Modulos\Remesas de proveedor\Servidor\srvRemesasProveedor_Impl.pas">
|
<DCCReference Include="..\Modulos\Remesas de proveedor\Servidor\srvRemesasProveedor_Impl.pas">
|
||||||
<Form>srvRemesasProveedor</Form>
|
<Form>srvRemesasProveedor</Form>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
</DCCReference>
|
</DCCReference>
|
||||||
<DCCReference Include="..\Modulos\Tienda web\Model\schTiendaWebClient_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Tienda web\Model\schTiendaWebClient_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Tienda web\Model\schTiendaWebServer_Intf.pas"/>
|
<DCCReference Include="..\Modulos\Tienda web\Model\schTiendaWebServer_Intf.pas" />
|
||||||
<DCCReference Include="..\Modulos\Tienda web\Model\uBizOscAddressBookServer.pas"/>
|
<DCCReference Include="..\Modulos\Tienda web\Model\uBizOscAddressBookServer.pas" />
|
||||||
<DCCReference Include="..\Modulos\Tienda web\Model\uBizOscCustomerServer.pas"/>
|
<DCCReference Include="..\Modulos\Tienda web\Model\uBizOscCustomerServer.pas" />
|
||||||
<DCCReference Include="..\Modulos\Tienda web\Model\uBizOscManufacturerServer.pas"/>
|
<DCCReference Include="..\Modulos\Tienda web\Model\uBizOscManufacturerServer.pas" />
|
||||||
<DCCReference Include="..\Modulos\Tienda web\Model\uBizOscOrderServer.pas"/>
|
<DCCReference Include="..\Modulos\Tienda web\Model\uBizOscOrderServer.pas" />
|
||||||
<DCCReference Include="..\Modulos\Tienda web\Model\uBizOscProductServer.pas"/>
|
<DCCReference Include="..\Modulos\Tienda web\Model\uBizOscProductServer.pas" />
|
||||||
<DCCReference Include="..\Modulos\Tienda web\Model\uBizTiendaWebServer.pas"/>
|
<DCCReference Include="..\Modulos\Tienda web\Model\uBizTiendaWebServer.pas" />
|
||||||
<DCCReference Include="..\Modulos\Tienda web\Servidor\srvTiendaWeb_Impl.pas">
|
<DCCReference Include="..\Modulos\Tienda web\Servidor\srvTiendaWeb_Impl.pas">
|
||||||
<Form>srvTiendaWeb</Form>
|
<Form>srvTiendaWeb</Form>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
</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>
|
<Form>srvTiposIVA</Form>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
</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>
|
<Form>srvUnidadesMedida</Form>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
</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>
|
<Form>srvConfiguracion</Form>
|
||||||
<DesignClass>TDataAbstractService</DesignClass>
|
<DesignClass>TDataAbstractService</DesignClass>
|
||||||
</DCCReference>
|
</DCCReference>
|
||||||
<DCCReference Include="Configuracion\uConexionBD.pas">
|
<DCCReference Include="Configuracion\uConexionBD.pas">
|
||||||
<Form>frConexionBD</Form>
|
<Form>frConexionBD</Form>
|
||||||
<DesignClass>TFrame</DesignClass>
|
<DesignClass>TFrame</DesignClass>
|
||||||
</DCCReference>
|
</DCCReference>
|
||||||
<DCCReference Include="Configuracion\uConexionOSC.pas">
|
<DCCReference Include="Configuracion\uConexionOSC.pas">
|
||||||
<Form>frConexionOSC</Form>
|
<Form>frConexionOSC</Form>
|
||||||
<DesignClass>TFrame</DesignClass>
|
<DesignClass>TFrame</DesignClass>
|
||||||
</DCCReference>
|
</DCCReference>
|
||||||
<DCCReference Include="Configuracion\uConfGeneral.pas">
|
<DCCReference Include="Configuracion\uConfGeneral.pas">
|
||||||
<Form>frConfGeneral</Form>
|
<Form>frConfGeneral</Form>
|
||||||
<DesignClass>TFrame</DesignClass>
|
<DesignClass>TFrame</DesignClass>
|
||||||
</DCCReference>
|
</DCCReference>
|
||||||
<DCCReference Include="Configuracion\uConfiguracion.pas">
|
<DCCReference Include="Configuracion\uConfiguracion.pas">
|
||||||
<Form>fConfiguracion</Form>
|
<Form>fConfiguracion</Form>
|
||||||
<DesignClass>TForm</DesignClass>
|
<DesignClass>TForm</DesignClass>
|
||||||
</DCCReference>
|
</DCCReference>
|
||||||
<DCCReference Include="Configuracion\uFrameConfiguracion.pas">
|
<DCCReference Include="Configuracion\uFrameConfiguracion.pas">
|
||||||
<Form>FrameConfiguracion</Form>
|
<Form>FrameConfiguracion</Form>
|
||||||
<DesignClass>TFrame</DesignClass>
|
<DesignClass>TFrame</DesignClass>
|
||||||
</DCCReference>
|
</DCCReference>
|
||||||
<DCCReference Include="srvLogin_Impl.pas">
|
<DCCReference Include="srvLogin_Impl.pas">
|
||||||
<Form>srvLogin</Form>
|
<Form>srvLogin</Form>
|
||||||
<DesignClass>TDARemoteService</DesignClass>
|
<DesignClass>TDARemoteService</DesignClass>
|
||||||
</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>
|
<Form>dmServer</Form>
|
||||||
<DesignClass>TDataModule</DesignClass>
|
<DesignClass>TDataModule</DesignClass>
|
||||||
</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\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" />
|
||||||
<DCCReference Include="Utiles\uTiendaWebUtils.pas"/>
|
<DCCReference Include="Utiles\uTiendaWebUtils.pas" />
|
||||||
</ItemGroup>
|
</ItemGroup>
|
||||||
</Project>
|
</Project>
|
||||||
<!-- EurekaLog First Line
|
<!-- EurekaLog First Line
|
||||||
[Exception Log]
|
[Exception Log]
|
||||||
|
|||||||
@ -14,7 +14,7 @@ BEGIN
|
|||||||
BEGIN
|
BEGIN
|
||||||
VALUE "FileVersion", "4.3.2.0\0"
|
VALUE "FileVersion", "4.3.2.0\0"
|
||||||
VALUE "ProductVersion", "4.3.2.0\0"
|
VALUE "ProductVersion", "4.3.2.0\0"
|
||||||
VALUE "CompileDate", "miércoles, 28 de agosto de 2013 15:52\0"
|
VALUE "CompileDate", "viernes, 30 de agosto de 2013 13:10\0"
|
||||||
END
|
END
|
||||||
END
|
END
|
||||||
BLOCK "VarFileInfo"
|
BLOCK "VarFileInfo"
|
||||||
|
|||||||
Reference in New Issue
Block a user