Version 4.1.6:
Ultima parte de informes estadisticos de albaranes de cliente
* Errores #530: Hacer referencia en informes de albarán más ancho para que no coja 2 renglones
* Errores #531: Que en albaranes no salga ni forma de pago ni nombre de banco
* Errores #536: Arreglar filtro para que cuando un elemento de la lista cambie de situación no pete
* Errores #568: El informe de factura de cliente de keibler cuando tiene muchos pagos queda mal (repasarlo)
git-svn-id: https://192.168.0.254/svn/Proyectos.LuisLeon_FactuGES2/trunk@128 b2cfbe5a-eba1-4a0c-8b32-7feea0a119f2
This commit is contained in:
parent
235fe7e2f3
commit
2a173f5d30
@ -4210,6 +4210,41 @@ from FACTURAS_CLIENTE
|
||||
group by 1,2
|
||||
;
|
||||
|
||||
CREATE VIEW V_INF_ALB_CLI_IMPORTE_TOTAL_ANO(
|
||||
ID_EMPRESA,
|
||||
ANO,
|
||||
IMPORTE_TOTAL)
|
||||
AS
|
||||
select ID_EMPRESA, EXTRACT(YEAR FROM FECHA_ALBARAN) as ANO, SUM(IMPORTE_TOTAL) as IMPORTE_TOTAL
|
||||
from ALBARANES_CLIENTE
|
||||
where tipo = 'A'
|
||||
group by 1,2
|
||||
;
|
||||
|
||||
CREATE VIEW V_INF_ALB_CLI_INCIDEN_TOTAL_ANO(
|
||||
ID_EMPRESA,
|
||||
ANO,
|
||||
INCIDENCIAS_TOTALES)
|
||||
AS
|
||||
select ID_EMPRESA, EXTRACT(YEAR FROM FECHA_ALBARAN) as ANO, COUNT(ID) as INCIDENCIAS_TOTALES
|
||||
from ALBARANES_CLIENTE
|
||||
where tipo = 'A'
|
||||
and ALBARANES_CLIENTE.INCIDENCIAS <> ''
|
||||
group by 1,2
|
||||
;
|
||||
|
||||
CREATE VIEW V_INF_ALB_CLI_ORDDEV_TOTAL_ANO(
|
||||
ID_EMPRESA,
|
||||
ANO,
|
||||
ORDENES_DEV_TOTALES)
|
||||
AS
|
||||
select ID_EMPRESA, EXTRACT(YEAR FROM FECHA_ALBARAN) as ANO, COUNT(ID) as ORDENES_DEV_TOTALES
|
||||
from ALBARANES_CLIENTE
|
||||
where tipo = 'D'
|
||||
|
||||
group by 1,2
|
||||
;
|
||||
|
||||
CREATE VIEW V_INF_FAC_PROVEEDOR_TOTAL_ANO(
|
||||
ID_EMPRESA,
|
||||
ANO,
|
||||
@ -4357,6 +4392,88 @@ left join clientes_datos cd on (cd.ID_CLIENTE = F.ID_CLIENTE)
|
||||
inner join V_INF_FAC_CLIENTE_TOTAL_ANO v on ((v.id_empresa = f.id_empresa) and (v.Ano = EXTRACT(YEAR FROM f.FECHA_FACTURA)))
|
||||
where (FD.TIPO_DETALLE = 'Concepto')
|
||||
;
|
||||
|
||||
|
||||
|
||||
CREATE VIEW V_INF_ALB_CLIENTE_AUX(
|
||||
ID_ALBARAN,
|
||||
SERVIDOS,
|
||||
PENDIENTES,
|
||||
ENVIADOS,
|
||||
INCIDENCIAS,
|
||||
PASADOS_FECHA_PREVISTA,
|
||||
ORDENES_DEV)
|
||||
AS
|
||||
select ID, SUM(SERVIDOS), SUM(PENDIENTES), SUM(ENVIADOS), SUM(INCIDENCIAS), SUM(PASADOS_FECHA_PREVISTA), SUM(ORDENES_DEV)
|
||||
FROM(
|
||||
select ID, 1 as SERVIDOS, 0 as PENDIENTES, 0 as ENVIADOS, 0 as INCIDENCIAS, 0 as PASADOS_FECHA_PREVISTA, 0 as ORDENES_DEV
|
||||
from V_ALB_CLI_SITUACION
|
||||
where TRIM(V_ALB_CLI_SITUACION.situacion) = 'SERVIDO'
|
||||
|
||||
union
|
||||
|
||||
select ID, 0 as SERVIDOS, 1 as PENDIENTES, 0 as ENVIADOS, 0 as INCIDENCIAS, 0 as PASADOS_FECHA_PREVISTA, 0 as ORDENES_DEV
|
||||
from V_ALB_CLI_SITUACION
|
||||
where TRIM(V_ALB_CLI_SITUACION.situacion) = 'PENDIENTE'
|
||||
|
||||
union
|
||||
|
||||
select ID, 0 as SERVIDOS, 0 as PENDIENTES, 1 as ENVIADOS, 0 as INCIDENCIAS, 0 as PASADOS_FECHA_PREVISTA, 0 as ORDENES_DEV
|
||||
from V_ALB_CLI_SITUACION
|
||||
where TRIM(V_ALB_CLI_SITUACION.situacion) = 'ENVIADO'
|
||||
|
||||
union
|
||||
|
||||
select ID, 0 as SERVIDOS, 0 as PENDIENTES, 0 as ENVIADOS, 1 as INCIDENCIAS, 0 as PASADOS_FECHA_PREVISTA, 0 as ORDENES_DEV
|
||||
from ALBARANES_CLIENTE
|
||||
where ALBARANES_CLIENTE.INCIDENCIAS <> ''
|
||||
|
||||
union
|
||||
|
||||
select ID, 0 as SERVIDOS, 0 as PENDIENTES, 0 as ENVIADOS, 0 as INCIDENCIAS, 1 as PASADOS_FECHA_PREVISTA, 0 as ORDENES_DEV
|
||||
from ALBARANES_CLIENTE
|
||||
where ALBARANES_CLIENTE.fecha_prevista_envio > ALBARANES_CLIENTE.fecha_envio
|
||||
|
||||
union
|
||||
|
||||
select ID, 0 as SERVIDOS, 0 as PENDIENTES, 0 as ENVIADOS, 0 as INCIDENCIAS, 0 as PASADOS_FECHA_PREVISTA, 1 as ORDENES_DEV
|
||||
from ALBARANES_CLIENTE
|
||||
where ALBARANES_CLIENTE.TIPO = 'D'
|
||||
)
|
||||
group by 1
|
||||
;
|
||||
|
||||
CREATE VIEW V_INF_ALB_CLIENTE(
|
||||
ID_EMPRESA,
|
||||
ANO,
|
||||
SEMESTRE,
|
||||
TRIMESTRE,
|
||||
MES,
|
||||
FECHA_ALBARAN,
|
||||
ID_CLIENTE,
|
||||
SERVIDOS,
|
||||
PENDIENTES,
|
||||
ENVIADOS,
|
||||
INCIDENCIAS,
|
||||
PASADOS_FECHA_PREVISTA,
|
||||
ORDENES_DEV,
|
||||
IMPORTE_TOTAL)
|
||||
AS
|
||||
select A.ID_EMPRESA,
|
||||
EXTRACT(YEAR FROM A.FECHA_ALBARAN) as ANO,
|
||||
CAST((DIV(EXTRACT(MONTH FROM A.FECHA_ALBARAN),7)+1) AS SMALLINT) as SEMESTRE,
|
||||
CAST((DIV(EXTRACT(MONTH FROM A.FECHA_ALBARAN)+2,3)) AS SMALLINT) as TRIMESTRE,
|
||||
EXTRACT(MONTH FROM A.FECHA_ALBARAN) as MES,
|
||||
A.FECHA_ALBARAN, A.ID_CLIENTE,
|
||||
cast(V.SERVIDOS as float), cast(V.PENDIENTES as float), cast(V.ENVIADOS as float),
|
||||
cast(V.INCIDENCIAS as float), cast(V.PASADOS_FECHA_PREVISTA as float), cast(V.ORDENES_DEV as float),
|
||||
A.IMPORTE_TOTAL
|
||||
|
||||
from V_INF_ALB_CLIENTE_AUX V
|
||||
left join ALBARANES_CLIENTE A on (V.ID_ALBARAN = A.ID)
|
||||
;
|
||||
|
||||
|
||||
/******************************************************************************/
|
||||
/**** Primary Keys ****/
|
||||
/******************************************************************************/
|
||||
|
||||
Binary file not shown.
@ -47,6 +47,10 @@
|
||||
<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\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>
|
||||
@ -60,63 +64,63 @@
|
||||
<Form>DataModuleImpresiones</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\adortl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\cxDataD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\cxEditorsD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\cxExportD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\cxExtEditorsD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\cxGridD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\cxIntl6D11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\cxIntlPrintSys3D11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\cxLibraryD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\cxPageControlD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\DataAbstract_Core_D11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\dbrtl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\dclIndyCore.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\designide.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\dsnap.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\dxCoreD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\dxGDIPlusD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\dxPSCoreD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\dxThemeD11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\GUISDK_D11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\IndyCore.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\IndyProtocols.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\IndySystem.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\Jcl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\JclVcl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\JSDialog100.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\JvCmpD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\JvCoreD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\JvCtrlsD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\JvDlgsD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\JvMMD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\JvNetD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\JvPageCompsD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\JvStdCtrlsD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\JvSystemD11R.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\pckMD5.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\pckUCDataConnector.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\pckUserControl_RT.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\PngComponentsD10.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\PNG_D10.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\RemObjects_Core_D11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\RemObjects_Indy_D11.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\rtl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\TB2k_D10.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\tbx_d10.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\vcl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\vclactnband.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\vcldb.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\vcljpg.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\VclSmp.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\vclx.dcp" />
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\xmlrtl.dcp" />
|
||||
<DCCReference Include="..\Modulos\Registro de correos\Data\uDataModuleRegistroCorreos.pas">
|
||||
<Form>DataModuleRegistroCorreos</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<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">
|
||||
<Form>fConfigurarConexion</Form>
|
||||
<DesignClass>TForm</DesignClass>
|
||||
|
||||
@ -53,7 +53,7 @@
|
||||
<Borland.Personality>Delphi.Personality</Borland.Personality>
|
||||
<Borland.ProjectType>VCLApplication</Borland.ProjectType>
|
||||
<BorlandProject>
|
||||
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Language><Language Name="RootDir">C:\Archivos de programa\Borland\Delphi7\Bin\</Language></Language><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">4</VersionInfo><VersionInfo Name="MinorVer">1</VersionInfo><VersionInfo Name="Release">5</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">Rodax Software S.L.</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">4.1.5.0</VersionInfoKeys><VersionInfoKeys Name="InternalName">FactuGES</VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">FactuGES</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">4.1.5.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Excluded_Packages></Excluded_Packages><Source><Source Name="MainSource">FactuGES.dpr</Source></Source></Delphi.Personality><ModelSupport>False</ModelSupport></BorlandProject></BorlandProject>
|
||||
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Language><Language Name="RootDir">C:\Archivos de programa\Borland\Delphi7\Bin\</Language></Language><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">4</VersionInfo><VersionInfo Name="MinorVer">1</VersionInfo><VersionInfo Name="Release">6</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">Rodax Software S.L.</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">4.1.6.0</VersionInfoKeys><VersionInfoKeys Name="InternalName">FactuGES</VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName">FactuGES</VersionInfoKeys><VersionInfoKeys Name="ProductVersion">4.1.6.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Excluded_Packages></Excluded_Packages><Source><Source Name="MainSource">FactuGES.dpr</Source></Source></Delphi.Personality><ModelSupport>False</ModelSupport></BorlandProject></BorlandProject>
|
||||
</ProjectExtensions>
|
||||
<Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
|
||||
<ItemGroup>
|
||||
|
||||
Binary file not shown.
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
152
Source/Informes/1/InformeListadoAlbaranesClienteGrafComp.fr3
Normal file
152
Source/Informes/1/InformeListadoAlbaranesClienteGrafComp.fr3
Normal file
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
@ -1,11 +1,11 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="39065,8724234954" ReportOptions.Description.Text="" ReportOptions.LastChange="40409,7188189931" ScriptLanguage="PascalScript" ScriptText.Text=" procedure DatosEmpresaOnBeforePrint(Sender: TfrxComponent); var Cadena: String; begin DatosEmpresa.Lines.Clear; if (<frxDBCabecera."TELEFONO_1_EMPRESA"> <> '') then Cadena := 'TLF: ' + <frxDBCabecera."TELEFONO_1_EMPRESA">; if (<frxDBCabecera."FAX_EMPRESA"> <> '') then Cadena := Cadena + ' FAX: ' + <frxDBCabecera."FAX_EMPRESA">; DatosEmpresa.Lines.Add(Cadena); end; procedure NombreEmpresaOnBeforePrint(Sender: TfrxComponent); begin NombreEmpresa.Lines.Clear; NombreEmpresa.Lines.Add(<frxDBCabecera."NOMBRE_EMPRESA">); end; procedure DireccionEnvioOnBeforePrint(Sender: TfrxComponent); var ACadena : String; begin ACadena := ''; DireccionEnvio.Lines.Clear; if (<frxDBCabecera."NOMBRE_ALMACEN"> <> '') then DireccionEnvio.Lines.Add(<frxDBCabecera."NOMBRE_ALMACEN">); if (<frxDBCabecera."PERSONA_CONTACTO"> <> '') then DireccionEnvio.Lines.Add(<frxDBCabecera."PERSONA_CONTACTO">); DireccionEnvio.Lines.Add(<frxDBCabecera."CALLE">); if (<frxDBCabecera."CODIGO_POSTAL"> <> '') then ACadena := <frxDBCabecera."CODIGO_POSTAL"> + ' '; if (<frxDBCabecera."POBLACION"> <> '') then ACadena := ACadena + <frxDBCabecera."POBLACION">; if (ACadena <> '') then DireccionEnvio.Lines.Add(ACadena); if (<frxDBCabecera."PROVINCIA"> <> '') then DireccionEnvio.Lines.Add(<frxDBCabecera."PROVINCIA">); if (<frxDBCabecera."TELEFONO"> <> '') then DireccionEnvio.Lines.Add(<frxDBCabecera."TELEFONO">); end; procedure PageHeader1OnBeforePrint(Sender: TfrxComponent); begin if not Engine.FinalPass then Set('TotalPaginas', (<TotalPaginas> + 1)); if Engine.FinalPass then Set('Pagina', (<Pagina> + 1)); end; procedure frxReportOnStartReport(Sender: TfrxComponent); begin Set('Pagina', 0); Set('TotalPaginas', 0); end; procedure eImporteUnidadOnBeforePrint(Sender: TfrxComponent); begin if <ImprimirPrecio> then begin eImporteUnidad.Visible := True; lImporteUnidad.Visible := True; eImporteTotal.Visible := True; lImporteTotal.Visible := True; ImporteUnidad.Visible := True; ImporteTotal.Visible := True; end else begin eImporteUnidad.Visible := False; lImporteUnidad.Visible := False; eImporteTotal.Visible := False; lImporteTotal.Visible := False; ImporteUnidad.Visible := False; ImporteTotal.Visible := False; eConcepto.Width := eConcepto.Width + ImporteTotal.Width + ImporteUnidad.Width + 10; Concepto.Width := Concepto.Width + ImporteTotal.Width + ImporteUnidad.Width; end end; begin end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403890003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C14000000204E616D653D22546F74616C506167696E61732200010C0E000000204E616D653D22506167696E612200010C16000000204E616D653D22496D7072696D697250726563696F2200010C1C000000204E616D653D22496D7072696D697252656650726F766565646F722200010C14000000204E616D653D2253686F776C6F676F7469706F220000055374796C650100">
|
||||
<TfrxReport Version="4.7.71" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Zoom="1" PrintOptions.Printer="Por defecto" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="39065,8724234954" ReportOptions.Description.Text="" ReportOptions.LastChange="40644,6926088889" ScriptLanguage="PascalScript" ScriptText.Text=" procedure DatosEmpresaOnBeforePrint(Sender: TfrxComponent); var Cadena: String; begin DatosEmpresa.Lines.Clear; if (<frxDBCabecera."TELEFONO_1_EMPRESA"> <> '') then Cadena := 'TLF: ' + <frxDBCabecera."TELEFONO_1_EMPRESA">; if (<frxDBCabecera."FAX_EMPRESA"> <> '') then Cadena := Cadena + ' FAX: ' + <frxDBCabecera."FAX_EMPRESA">; DatosEmpresa.Lines.Add(Cadena); end; procedure NombreEmpresaOnBeforePrint(Sender: TfrxComponent); begin NombreEmpresa.Lines.Clear; NombreEmpresa.Lines.Add(<frxDBCabecera."NOMBRE_EMPRESA">); end; procedure DireccionEnvioOnBeforePrint(Sender: TfrxComponent); var ACadena : String; begin ACadena := ''; DireccionEnvio.Lines.Clear; if (<frxDBCabecera."NOMBRE_ALMACEN"> <> '') then DireccionEnvio.Lines.Add(<frxDBCabecera."NOMBRE_ALMACEN">); if (<frxDBCabecera."PERSONA_CONTACTO"> <> '') then DireccionEnvio.Lines.Add(<frxDBCabecera."PERSONA_CONTACTO">); DireccionEnvio.Lines.Add(<frxDBCabecera."CALLE">); if (<frxDBCabecera."CODIGO_POSTAL"> <> '') then ACadena := <frxDBCabecera."CODIGO_POSTAL"> + ' '; if (<frxDBCabecera."POBLACION"> <> '') then ACadena := ACadena + <frxDBCabecera."POBLACION">; if (ACadena <> '') then DireccionEnvio.Lines.Add(ACadena); if (<frxDBCabecera."PROVINCIA"> <> '') then DireccionEnvio.Lines.Add(<frxDBCabecera."PROVINCIA">); if (<frxDBCabecera."TELEFONO"> <> '') then DireccionEnvio.Lines.Add(<frxDBCabecera."TELEFONO">); end; procedure PageHeader1OnBeforePrint(Sender: TfrxComponent); begin if not Engine.FinalPass then Set('TotalPaginas', (<TotalPaginas> + 1)); if Engine.FinalPass then Set('Pagina', (<Pagina> + 1)); end; procedure frxReportOnStartReport(Sender: TfrxComponent); begin Set('Pagina', 0); Set('TotalPaginas', 0); end; procedure eImporteUnidadOnBeforePrint(Sender: TfrxComponent); begin if <ImprimirPrecio> then begin eImporteUnidad.Visible := True; lImporteUnidad.Visible := True; eImporteTotal.Visible := True; lImporteTotal.Visible := True; ImporteUnidad.Visible := True; ImporteTotal.Visible := True; end else begin eImporteUnidad.Visible := False; lImporteUnidad.Visible := False; eImporteTotal.Visible := False; lImporteTotal.Visible := False; ImporteUnidad.Visible := False; ImporteTotal.Visible := False; eConcepto.Width := eConcepto.Width + ImporteTotal.Width + ImporteUnidad.Width + 10; Concepto.Width := Concepto.Width + ImporteTotal.Width + ImporteUnidad.Width; end end; begin end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403910003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C14000000204E616D653D22546F74616C506167696E61732200010C0E000000204E616D653D22506167696E612200010C16000000204E616D653D22496D7072696D697250726563696F2200010C1C000000204E616D653D22496D7072696D697252656650726F766565646F722200010C14000000204E616D653D2253686F776C6F676F7469706F220000055374796C650100">
|
||||
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
|
||||
<TfrxReportPage Name="Page1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
|
||||
<TfrxMasterData Name="MasterData1" Height="24" Left="0" Top="308" Width="718,1107" ColumnWidth="0" ColumnGap="0" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" RowCount="0" Stretched="True">
|
||||
<TfrxRichView Name="Concepto" ShiftMode="smWhenOverlapped" Left="137,5" Top="1,5" Width="362,5436" Height="18" ShowHint="False" StretchMode="smMaxHeight" DataField="CONCEPTO" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" GapX="2" GapY="3" Wysiwyg="False" PropData="0852696368456469740A6C0000007B5C727466315C616E73695C616E7369637067313235325C64656666305C6465666C616E67333038327B5C666F6E7474626C7B5C66305C666E696C205461686F6D613B7D7D0D0A5C766965776B696E64345C7563315C706172645C66305C667331365C7061720D0A7D0D0A00"/>
|
||||
<TfrxMemoView Name="MemoCampo2" Left="78" Top="1,5" Width="56,03148874" Height="18" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#0 " DisplayFormat.Kind="fkNumeric" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" GapY="3" HAlign="haRight" HideZeros="True" LineSpacing="4" ParentFont="False" Style="Concepto normal" Text="[frxDBDetalles."CANTIDAD"]"/>
|
||||
<TfrxMemoView Name="Memo14" Left="1" Top="1,5" Width="75" Height="18" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#0 " DisplayFormat.Kind="fkNumeric" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" GapY="3" HAlign="haRight" HideZeros="True" LineSpacing="4" ParentFont="False" Style="Concepto normal" Text="[frxDBDetalles."REFERENCIA_PROVEEDOR"] "/>
|
||||
<TfrxRichView Name="Concepto" ShiftMode="smWhenOverlapped" Left="181,5" Top="1,5" Width="318,5436" Height="18" ShowHint="False" StretchMode="smMaxHeight" DataField="CONCEPTO" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" GapX="2" GapY="3" Wysiwyg="False" PropData="0852696368456469740A6C0000007B5C727466315C616E73695C616E7369637067313235325C64656666305C6465666C616E67333038327B5C666F6E7474626C7B5C66305C666E696C205461686F6D613B7D7D0D0A5C766965776B696E64345C7563315C706172645C66305C667331365C7061720D0A7D0D0A00"/>
|
||||
<TfrxMemoView Name="MemoCampo2" Left="121" Top="1,5" Width="56,03148874" Height="18" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#0 " DisplayFormat.Kind="fkNumeric" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" GapY="3" HAlign="haRight" HideZeros="True" LineSpacing="4" ParentFont="False" Style="Concepto normal" Text="[frxDBDetalles."CANTIDAD"]"/>
|
||||
<TfrxMemoView Name="Memo14" Left="1" Top="1,5" Width="117" Height="18" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#0 " DisplayFormat.Kind="fkNumeric" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" GapY="3" HAlign="haRight" HideZeros="True" LineSpacing="4" ParentFont="False" Style="Concepto normal" Text="[frxDBDetalles."REFERENCIA_PROVEEDOR"] "/>
|
||||
<TfrxMemoView Name="ImporteUnidad" Left="504" Top="2" Width="96,03148874" Height="18" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" GapY="3" HAlign="haRight" HideZeros="True" LineSpacing="4" ParentFont="False" Style="Concepto normal" Text="[frxDBDetalles."IMPORTE_UNIDAD"]"/>
|
||||
<TfrxMemoView Name="ImporteTotal" Left="606" Top="2" Width="109,03148874" Height="18" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="%2.2m" DisplayFormat.Kind="fkNumeric" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" GapY="3" HAlign="haRight" HideZeros="True" LineSpacing="4" ParentFont="False" Style="Concepto normal" Text="[frxDBDetalles."IMPORTE_TOTAL"]"/>
|
||||
</TfrxMasterData>
|
||||
@ -13,9 +13,9 @@
|
||||
<TfrxLineView Name="Line4" Align="baCenter" Left="-0,94465" Top="0" Width="720" Height="0" ShowHint="False" Frame.Typ="4"/>
|
||||
</TfrxPageFooter>
|
||||
<TfrxPageHeader Name="PageHeader1" Height="232,44096685" Left="0" Top="16" Width="718,1107" OnBeforePrint="PageHeader1OnBeforePrint">
|
||||
<TfrxMemoView Name="eConcepto" Left="134,72047" Top="206,94094" Width="367,7" Height="26,45669291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Concepto"/>
|
||||
<TfrxMemoView Name="Memo8" Left="76" Top="206,94094" Width="59,25726667" Height="26,45669291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Cantidad"/>
|
||||
<TfrxMemoView Name="Memo13" Left="0" Top="206,94094" Width="76,2" Height="26,45669291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Referencia"/>
|
||||
<TfrxMemoView Name="eConcepto" Align="baLeft" Left="179,25726667" Top="206,94094" Width="322,7" Height="26,45669291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Concepto"/>
|
||||
<TfrxMemoView Name="Memo8" Align="baLeft" Left="120" Top="206,94094" Width="59,25726667" Height="26,45669291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Cantidad"/>
|
||||
<TfrxMemoView Name="Memo13" Left="0" Top="206,94094" Width="120" Height="26,45669291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Referencia"/>
|
||||
<TfrxShapeView Name="Shape2" Left="357,60637" Top="72,22047" Width="360,69295" Height="122,95671" ShowHint="False" Color="16777215" Frame.Color="8421504"/>
|
||||
<TfrxMemoView Name="NombreEmpresa" Left="0" Top="4,22047" Width="414,07885" Height="26,89765" OnBeforePrint="NombreEmpresaOnBeforePrint" ShowHint="False" Font.Charset="1" Font.Color="8421504" Font.Height="-19" Font.Name="Tahoma" Font.Style="1" ParentFont="False" Text=""/>
|
||||
<TfrxMemoView Name="Memo7" Left="362,61441" Top="79,81107" Width="68,69295" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" ParentFont="False" Text="Página nº:"/>
|
||||
@ -30,8 +30,8 @@
|
||||
<TfrxMemoView Name="DireccionEnvio" Left="4" Top="100,22047" Width="347,46475" Height="87,40483" OnBeforePrint="DireccionEnvioOnBeforePrint" ShowHint="False" StretchMode="smActualHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
|
||||
<TfrxLineView Name="Line1" Left="718,5" Top="206,36222913" Width="0" Height="768,8947" ShowHint="False" Frame.Typ="1"/>
|
||||
<TfrxLineView Name="Line2" Left="0" Top="206,36222913" Width="0" Height="768,8947" ShowHint="False" Frame.Typ="1"/>
|
||||
<TfrxLineView Name="Line3" Left="76,2" Top="206,36222913" Width="0" Height="768,8947" ShowHint="False" Frame.Typ="1"/>
|
||||
<TfrxLineView Name="Line5" Left="135,5" Top="206,36222913" Width="0" Height="768,8947" ShowHint="False" Frame.Typ="1"/>
|
||||
<TfrxLineView Name="Line3" Align="baLeft" Left="120" Top="206,36222913" Width="0" Height="768,8947" ShowHint="False" Frame.Typ="1"/>
|
||||
<TfrxLineView Name="Line5" Align="baLeft" Left="179,25726667" Top="206,36222913" Width="0" Height="768,8947" ShowHint="False" Frame.Typ="1"/>
|
||||
<TfrxMemoView Name="Memo2" Left="365,92115" Top="18,89765" Width="347,93723" Height="38,89765" ShowHint="False" Font.Charset="1" Font.Color="8421504" Font.Height="-29" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" Text="PEDIDO A PROVEEDOR"/>
|
||||
<TfrxMemoView Name="Memo1" Left="521,57514" Top="102,04731" Width="46,01577" Height="18,67718" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" ParentFont="False" Text="Fecha:"/>
|
||||
<TfrxMemoView Name="Memo6" Left="570,70903" Top="102,04731" Width="143,05504" Height="18,67718" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" HideZeros="True" ParentFont="False" Text="[frxDBCabecera."FECHA_PEDIDO"]"/>
|
||||
|
||||
153
Source/Informes/2/InformeListadoAlbaranesClienteGrafComp.fr3
Normal file
153
Source/Informes/2/InformeListadoAlbaranesClienteGrafComp.fr3
Normal file
File diff suppressed because one or more lines are too long
File diff suppressed because it is too large
Load Diff
@ -60,6 +60,20 @@ type
|
||||
tbl_Detalles: TDAMemDataTable;
|
||||
frxPDFExport1: TfrxPDFExport;
|
||||
DABin2DataStreamer1: TDABin2DataStreamer;
|
||||
frxDBInformeListadoAlbaranesGrafComp: TfrxDBDataset;
|
||||
DASInformeListadoAlbaranesGrafComp: TDADataSource;
|
||||
tbl_InformeListadoAlbaranesGrafCompMensual: TDAMemDataTable;
|
||||
tbl_InformeListadoAlbaranesGrafCompTrimestral: TDAMemDataTable;
|
||||
tbl_InformeListadoAlbaranesGrafCompSemestral: TDAMemDataTable;
|
||||
frxDBInformeListadoClientesMayorAlbaranadoResumen: TfrxDBDataset;
|
||||
DADSInformeListadoClientesMayorAlbaranadoResumen: TDADataSource;
|
||||
tbl_InformeListadoClientesMayorAlbaranadoResumen: TDAMemDataTable;
|
||||
frxDBInformeListadoClientesMayorIncidenciasResumen: TfrxDBDataset;
|
||||
DADSInformeListadoClientesMayorIncidenciasResumen: TDADataSource;
|
||||
tbl_InformeListadoClientesMayorIncidenciasResumen: TDAMemDataTable;
|
||||
frxDBInformeListadoClientesMayorOrdenesDevResumen: TfrxDBDataset;
|
||||
DADSInformeListadoClientesMayorOrdenesDevResumen: TDADataSource;
|
||||
tbl_InformeListadoClientesMayorOrdenesDevResumen: TDAMemDataTable;
|
||||
schReport: TDASchema;
|
||||
procedure DataModuleCreate(Sender: TObject);
|
||||
procedure DataModuleDestroy(Sender: TObject);
|
||||
@ -72,16 +86,27 @@ type
|
||||
FVerRefProveedor : Boolean;
|
||||
FVerObservaciones : Boolean;
|
||||
FVerIncidencias : Boolean;
|
||||
FIdEmpresa: Integer;
|
||||
FAno1: Variant;
|
||||
FAno2: Variant;
|
||||
FIntervalo: Variant;
|
||||
FListaIDClientes: TIntegerArray;
|
||||
FTopN: Integer;
|
||||
|
||||
//Genera cada uno de los albaranes a imprimir
|
||||
procedure _GenerarAlbaran(const AID: Integer);
|
||||
|
||||
procedure PrepararTablaInformeGrafComp(ATabla: TDAMemDataTable);
|
||||
procedure PrepararTablaResumenInformeGrafComp(ATabla: IDADataset);
|
||||
|
||||
public
|
||||
function GenerarEtiquetas(const AID : Integer; withRefCliente: Boolean): Binary;
|
||||
function GenerarAlbaran(const AListaID : TIntegerArray; const VerPrecios: Boolean; const VerRefProveedor: Boolean; const VerObservaciones: Boolean;
|
||||
const VerIncidencias: Boolean): Binary;
|
||||
function GenerarAlbaranEnPDF(const ListaID : TIntegerArray; const VerPrecios: Boolean; const VerRefProveedor: Boolean; const VerObservaciones: Boolean;
|
||||
const VerIncidencias: Boolean): Binary;
|
||||
|
||||
function GenerarInformeAlbaranesGrafComp(const IdEmpresa: Integer; const Intervalo: Variant; const Ano1: Variant; const Ano2: Variant; const ListaIDClientes: TIntegerArray; const TopN: Integer; const Serie: Variant): Binary;
|
||||
end;
|
||||
|
||||
implementation
|
||||
@ -89,11 +114,12 @@ implementation
|
||||
{$R *.dfm}
|
||||
|
||||
uses
|
||||
uSistemaFunc, uDataModuleServer, schAlbaranesClienteClient_Intf;
|
||||
uSistemaFunc, uDataModuleServer, schAlbaranesClienteClient_Intf, srvGestorInformes_Impl;
|
||||
|
||||
const
|
||||
rptInforme = 'InfAlbaranCliente.fr3';
|
||||
rptInfEtiquetas = 'InfEtiquetasAlbaranCliente.fr3';
|
||||
rptInformeListadoAlbaranesClienteGrafComp = 'InformeListadoAlbaranesClienteGrafComp.fr3';
|
||||
|
||||
{ Dataset names for schReport }
|
||||
ds_InformeCabecera = 'Informe_Cabecera';
|
||||
@ -243,4 +269,86 @@ begin
|
||||
end;
|
||||
end;
|
||||
|
||||
function TRptAlbaranesCliente.GenerarInformeAlbaranesGrafComp(
|
||||
const IdEmpresa: Integer; const Intervalo, Ano1, Ano2: Variant;
|
||||
const ListaIDClientes: TIntegerArray; const TopN: Integer; const Serie: Variant): Binary;
|
||||
var
|
||||
AStream: TMemoryStream;
|
||||
AInforme: Variant;
|
||||
|
||||
begin
|
||||
FConnection.BeginTransaction; //<--- Creo que no va a hacer falta. "PUES SI ES NECESARIO"
|
||||
|
||||
AStream := TMemoryStream.Create;
|
||||
try
|
||||
//Inicializamos parametros
|
||||
FIdEmpresa := IdEmpresa;
|
||||
FAno1 := Ano1;
|
||||
FAno2 := Ano2;
|
||||
FIntervalo := Intervalo;
|
||||
FTopN := TopN;
|
||||
|
||||
if Assigned(FListaIDClientes) then
|
||||
FListaIDClientes.Free;
|
||||
FListaIDClientes := ListaIDClientes;
|
||||
|
||||
//Preparamos la tabla correspondiente y la abrimos para el informe
|
||||
if (FIntervalo = CTE_MENSUAL) then
|
||||
PrepararTablaInformeGrafComp(tbl_InformeListadoAlbaranesGrafCompMensual)
|
||||
else if (FIntervalo = CTE_TRIMESTRAL) then
|
||||
PrepararTablaInformeGrafComp(tbl_InformeListadoAlbaranesGrafCompTrimestral)
|
||||
else
|
||||
PrepararTablaInformeGrafComp(tbl_InformeListadoAlbaranesGrafCompSemestral);
|
||||
|
||||
//Se preparan las tablas del listado resumen del informe
|
||||
PrepararTablaResumenInformeGrafComp(tbl_InformeListadoClientesMayorAlbaranadoResumen);
|
||||
PrepararTablaResumenInformeGrafComp(tbl_InformeListadoClientesMayorIncidenciasResumen);
|
||||
PrepararTablaResumenInformeGrafComp(tbl_InformeListadoClientesMayorOrdenesDevResumen);
|
||||
|
||||
Result := Binary.Create;
|
||||
|
||||
AInforme := DarRutaFichero(DarRutaInformes, rptInformeListadoAlbaranesClienteGrafComp, IntTostr(FIdEmpresa));
|
||||
if VarIsNull(AInforme) then
|
||||
raise Exception.Create (('Error Servidor: GenerarInformeAlbaranesGrafComp, no encuentra informe ' + rptInformeListadoAlbaranesClienteGrafComp));
|
||||
|
||||
frxReport.LoadFromFile(AInforme, True);
|
||||
// IniciarParametrosInforme;
|
||||
|
||||
frxReport.Variables.Variables['Ano1']:= Ano1;
|
||||
frxReport.Variables.Variables['Ano2']:= Ano2;
|
||||
frxReport.Variables.Variables['Serie']:= Serie;
|
||||
frxReport.PrepareReport(False);
|
||||
frxReport.PreviewPages.SaveToStream(Result);
|
||||
|
||||
finally
|
||||
AStream.Free;
|
||||
FConnection.RollbackTransaction; //<--- Creo que no va a hacer falta. "PUES SI ES NECESARIO"
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TRptAlbaranesCliente.PrepararTablaInformeGrafComp(
|
||||
ATabla: TDAMemDataTable);
|
||||
begin
|
||||
if ATabla.Active then
|
||||
ATabla.Active := False;
|
||||
|
||||
DASInformeListadoAlbaranesGrafComp.DataTable := ATabla;
|
||||
ATabla.ParamByName('ID_EMPRESA1').AsInteger := FIdEmpresa;
|
||||
ATabla.ParamByName('ID_EMPRESA2').AsInteger := FIdEmpresa;
|
||||
ATabla.ParamByName('ANO1').AsVariant := FAno1;
|
||||
ATabla.ParamByName('ANO2').AsVariant := FAno2;
|
||||
ATabla.Active := True;
|
||||
end;
|
||||
|
||||
procedure TRptAlbaranesCliente.PrepararTablaResumenInformeGrafComp(ATabla: IDADataset);
|
||||
begin
|
||||
if ATabla.Active then
|
||||
ATabla.Active := False;
|
||||
|
||||
ATabla.ParamByName('ID_EMPRESA').AsInteger := FIdEmpresa;
|
||||
ATabla.ParamByName('ANO').AsVariant := FAno1;
|
||||
ATabla.ParamByName('NTOP').AsInteger := FTopN;
|
||||
ATabla.Active := True;
|
||||
end;
|
||||
|
||||
end.
|
||||
|
||||
@ -39,6 +39,9 @@ type
|
||||
function GenerarInformeEnPDF(const ListaID: TIntegerArray; const VerPrecios: Boolean; const VerRefProveedor: Boolean; const VerObservaciones: Boolean;
|
||||
const VerIncidencias: Boolean): Binary;
|
||||
|
||||
public
|
||||
function DarListaAnos: StringArray;
|
||||
|
||||
end;
|
||||
|
||||
implementation
|
||||
@ -75,6 +78,24 @@ begin
|
||||
bpAlbaranesCliente.BusinessRulesID := BIZ_SERVER_ALBARAN_CLIENTE;
|
||||
end;
|
||||
|
||||
function TsrvAlbaranesCliente.DarListaAnos: StringArray;
|
||||
var
|
||||
dsAnos : IDADataset;
|
||||
begin
|
||||
Result := StringArray.Create();
|
||||
try
|
||||
dsAnos := schAlbaranesCliente.NewDataset(Connection, 'ListaAnosAlbaranes', '', True);
|
||||
while not dsAnos.EOF do
|
||||
begin
|
||||
Result.Add(dsAnos.Fields[0].AsString);
|
||||
dsAnos.Next;
|
||||
end;
|
||||
finally
|
||||
dsAnos.Close;
|
||||
dsAnos := NIL;
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TsrvAlbaranesCliente.DataAbstractServiceBeforeAcquireConnection(
|
||||
aSender: TObject; var aConnectionName: string);
|
||||
begin
|
||||
|
||||
@ -78,7 +78,6 @@ inherited fEditorFacturasCliente: TfEditorFacturasCliente
|
||||
end
|
||||
inherited TBXTMain2: TTBXToolbar
|
||||
Left = 427
|
||||
Visible = True
|
||||
ExplicitLeft = 427
|
||||
ExplicitWidth = 66
|
||||
object TBXItem41: TTBXItem
|
||||
|
||||
@ -78,7 +78,6 @@ inherited fEditorFacturasProveedor: TfEditorFacturasProveedor
|
||||
end
|
||||
inherited TBXTMain2: TTBXToolbar
|
||||
Left = 427
|
||||
Visible = True
|
||||
ExplicitLeft = 427
|
||||
object TBXItem41: TTBXItem
|
||||
Action = actDomiciliacion
|
||||
|
||||
@ -46,6 +46,7 @@ contains
|
||||
uIEditorInformePedidosReport in 'View\uIEditorInformePedidosReport.pas',
|
||||
uIEditorInformeFacturasProveedorReportGrafComp in 'View\uIEditorInformeFacturasProveedorReportGrafComp.pas',
|
||||
uIEditorInformeFacturasClienteReportGrafComp in 'View\uIEditorInformeFacturasClienteReportGrafComp.pas',
|
||||
uIEditorInformeBeneficiosReportGrafComp in 'View\uIEditorInformeBeneficiosReportGrafComp.pas';
|
||||
uIEditorInformeBeneficiosReportGrafComp in 'View\uIEditorInformeBeneficiosReportGrafComp.pas',
|
||||
uIEditorInformeAlbaranesClienteReportGrafComp in 'View\uIEditorInformeAlbaranesClienteReportGrafComp.pas';
|
||||
|
||||
end.
|
||||
|
||||
@ -42,6 +42,7 @@
|
||||
<DCCReference Include="View\ApplicationBase.dcp" />
|
||||
<DCCReference Include="View\Base.dcp" />
|
||||
<DCCReference Include="View\GestorInformes_data.dcp" />
|
||||
<DCCReference Include="View\uIEditorInformeAlbaranesClienteReportGrafComp.pas" />
|
||||
<DCCReference Include="View\uIEditorInformeBase.pas" />
|
||||
<DCCReference Include="View\uIEditorInformeBeneficiosReportGrafComp.pas" />
|
||||
<DCCReference Include="View\uIEditorInformeFacturasClientePendientesReport.pas" />
|
||||
|
||||
Binary file not shown.
@ -0,0 +1,32 @@
|
||||
unit uIEditorInformeAlbaranesClienteReportGrafComp;
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
FactuGES_Intf, uIEditorInformeBase;
|
||||
|
||||
type
|
||||
IEditorInformeAlbaranesClienteReportGrafComp = interface(IEditorInformeBase)
|
||||
['{6311102A-E2D1-4BAD-B9BC-DC5351991569}']
|
||||
|
||||
function GetIntervalo: Variant;
|
||||
function GetAno1: Variant;
|
||||
function GetAno2: Variant;
|
||||
function GetNTop: Variant;
|
||||
function GetSerie: Variant;
|
||||
|
||||
function GetListaIDClientes: TIntegerArray;
|
||||
|
||||
property Intervalo: Variant read GetIntervalo;
|
||||
property Ano1: Variant read GetAno1;
|
||||
property Ano2: Variant read GetAno2;
|
||||
property NTop: Variant read GetNTop;
|
||||
|
||||
property ListaIDClientes: TIntegerArray read GetListaIDClientes;
|
||||
property Serie: Variant read GetSerie;
|
||||
end;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
end.
|
||||
@ -19,6 +19,10 @@ type
|
||||
//MODULO PRESUPUESTOS DE CLIENTE
|
||||
procedure VerInformeListadoPresupuestos;
|
||||
|
||||
//MODULO ALBARANES DE CLIENTE
|
||||
function DarListaAnosAlbaranesCli: TStringList;
|
||||
procedure VerInformeAlbaranesCliGrafComp;
|
||||
|
||||
//MODULO FACTURAS DE CLIENTE
|
||||
procedure VerInformeIVAClientes;
|
||||
procedure VerInformeListadoFacturasCli;
|
||||
@ -75,6 +79,10 @@ type
|
||||
//MODULO PRESUPUESTOS DE CLIENTE
|
||||
procedure VerInformeListadoPresupuestos;
|
||||
|
||||
//MODULO ALBARANES DE CLIENTE
|
||||
function DarListaAnosAlbaranesCli: TStringList;
|
||||
procedure VerInformeAlbaranesCliGrafComp;
|
||||
|
||||
//MODULO FACTURAS DE CLIENTE
|
||||
procedure VerInformeIVAClientes;
|
||||
procedure VerInformeListadoFacturasCli;
|
||||
@ -119,7 +127,7 @@ uses
|
||||
uIEditorInformeRecibosProvPendientesReport,
|
||||
uIEditorInformePedidosReport, uIEditorInformeFacturasClienteReportGrafComp,
|
||||
uIEditorInformeFacturasProveedorReportGrafComp,
|
||||
uIEditorInformeBeneficiosReportGrafComp;
|
||||
uIEditorInformeBeneficiosReportGrafComp, uIEditorInformeAlbaranesClienteReportGrafComp;
|
||||
|
||||
|
||||
{procedure CopiarArticulosPedido(AOrigen: IBizDetallesPedidoCliente;
|
||||
@ -279,6 +287,11 @@ begin
|
||||
Result := Supports(EditorRegistry.CreateEditor(AName), IID, Intf);
|
||||
end;
|
||||
|
||||
function TGestorInformesController.DarListaAnosAlbaranesCli: TStringList;
|
||||
begin
|
||||
Result := FDataModule.DarListaAnosAlbaranesCli;
|
||||
end;
|
||||
|
||||
function TGestorInformesController.DarListaAnosFacturasCli: TStringList;
|
||||
begin
|
||||
Result := FDataModule.DarListaAnosFacturasCli;
|
||||
@ -305,6 +318,30 @@ begin
|
||||
Result := FDataModule;
|
||||
end;
|
||||
|
||||
procedure TGestorInformesController.VerInformeAlbaranesCliGrafComp;
|
||||
var
|
||||
AStream: Binary;
|
||||
AEditor : IEditorInformeAlbaranesClienteReportGrafComp;
|
||||
begin
|
||||
AEditor := NIL;
|
||||
CreateEditor('EditorInformeAlbaranesClienteReportGrafComp', IEditorInformeAlbaranesClienteReportGrafComp, AEditor);
|
||||
if Assigned(AEditor) then
|
||||
try
|
||||
AEditor.Controller := Self;
|
||||
AEditor.Title := 'Informe comparativo de albaranes de clientes';
|
||||
|
||||
AStream := FDataModule.GenerarInformeAlbaranesCliGrafComp(AppFactuGES.EmpresaActiva.ID,
|
||||
AEditor.Intervalo, AEditor.Ano1, AEditor.Ano2, AEditor.ListaIDClientes, AEditor.NTop, AEditor.Serie);
|
||||
|
||||
AEditor.LoadFromStream(AStream);
|
||||
AEditor.Preview;
|
||||
finally
|
||||
AEditor.Release;
|
||||
AEditor := Nil;
|
||||
FreeAndNil(AStream);
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TGestorInformesController.VerInformeBeneficiosCliGrafComp;
|
||||
var
|
||||
AStream: Binary;
|
||||
|
||||
@ -26,6 +26,10 @@ type
|
||||
//MODULO PRESUPUESTOS DE CLIENTE
|
||||
function GenerarInformeListadoPresupuestos(const IdEmpresa: Integer; const FechaInicio: Variant; const FechaFin: Variant; const ListaIDClientes: TIntegerArray; const Desglosado: Boolean; const ImporteMinimo: Currency): Binary;
|
||||
|
||||
//MODULO ALBARANES DE CLIENTE
|
||||
function DarListaAnosAlbaranesCli: TStringList;
|
||||
function GenerarInformeAlbaranesCliGrafComp(const IdEmpresa: Integer; const Intervalo: Variant; const Ano1: Variant; const Ano2: Variant; const ListaIDClientes: TIntegerArray; Const NTop: Variant; const Serie: Variant): Binary;
|
||||
|
||||
//MODULO FACTURAS DE CLIENTE
|
||||
function GenerarInformeIVAClientes(const IdEmpresa: Integer; const FechaInicio: Variant; const FechaFin: Variant; const ListaIDClientes: TIntegerArray; const Desglosado: Boolean; const ImporteMinimo: Currency): Binary;
|
||||
function GenerarInformeListadoFacturasCli(const IdEmpresa: Integer; const FechaInicio: Variant; const FechaFin: Variant; const FechaVenInicio: Variant; const FechaVenFin: Variant; const ListaIDClientes: TIntegerArray; const Desglosado: Boolean; const ImporteMinimo: Currency): Binary;
|
||||
@ -71,6 +75,22 @@ begin
|
||||
RORemoteService.Message := dmConexion.Message;
|
||||
end;
|
||||
|
||||
function TDataModuleGestorInformes.DarListaAnosAlbaranesCli: TStringList;
|
||||
var
|
||||
i: Integer;
|
||||
AResultado : StringArray;
|
||||
begin
|
||||
Result := Nil;
|
||||
try
|
||||
AResultado := (RORemoteService as IsrvGestorInformes).DarListaAnosAlbaranesCli;
|
||||
Result := TStringList.Create;
|
||||
for i:= 0 to AResultado.Count - 1 do
|
||||
Result.Add(AResultado.Items[i]);
|
||||
finally
|
||||
FreeANDNIL(AResultado)
|
||||
end;
|
||||
end;
|
||||
|
||||
function TDataModuleGestorInformes.DarListaAnosFacturasCli: TStringList;
|
||||
var
|
||||
i: Integer;
|
||||
@ -119,6 +139,16 @@ begin
|
||||
end;
|
||||
end;
|
||||
|
||||
function TDataModuleGestorInformes.GenerarInformeAlbaranesCliGrafComp(
|
||||
const IdEmpresa: Integer; const Intervalo, Ano1, Ano2: Variant;
|
||||
const ListaIDClientes: TIntegerArray; const NTop: Variant; const Serie: Variant): Binary;
|
||||
begin
|
||||
try
|
||||
Result := (RORemoteService as IsrvGestorInformes).GenerarInformeAlbaranesCliGrafComp(IdEmpresa, Intervalo, Ano1, Ano2, ListaIdClientes, NTop, Serie);
|
||||
finally
|
||||
end;
|
||||
end;
|
||||
|
||||
function TDataModuleGestorInformes.GenerarInformeBeneficiosGrafComp(
|
||||
const IdEmpresa: Integer; const Intervalo, Ano1, Ano2,
|
||||
Serie: Variant): Binary;
|
||||
|
||||
@ -15,6 +15,10 @@ type
|
||||
//MODULO PRESUPUESTOS DE CLIENTE
|
||||
function GenerarInformeListadoPresupuestos(const IdEmpresa: Integer; const FechaInicio: Variant; const FechaFin: Variant; const ListaIDClientes: TIntegerArray; const Desglosado: Boolean; const ImporteMinimo: Currency): Binary;
|
||||
|
||||
//MODULO ALBARANES DE CLIENTE
|
||||
function DarListaAnosAlbaranesCli: TStringList;
|
||||
function GenerarInformeAlbaranesCliGrafComp(const IdEmpresa: Integer; const Intervalo: Variant; const Ano1: Variant; const Ano2: Variant; const ListaIDClientes: TIntegerArray; Const NTop: Variant; const Serie: Variant): Binary;
|
||||
|
||||
//MODULO FACTURAS DE CLIENTE
|
||||
function GenerarInformeIVAClientes(const IdEmpresa: Integer; const FechaInicio: Variant; const FechaFin: Variant; const ListaIDClientes: TIntegerArray; const Desglosado: Boolean; const ImporteMinimo: Currency): Binary;
|
||||
function GenerarInformeListadoFacturasCli(const IdEmpresa: Integer; const FechaInicio: Variant; const FechaFin: Variant; const FechaVenInicio: Variant; const FechaVenFin: Variant; const ListaIDClientes: TIntegerArray; const Desglosado: Boolean; const ImporteMinimo: Currency): Binary;
|
||||
|
||||
@ -125,7 +125,7 @@ object PluginGestorInformes: TPluginGestorInformes
|
||||
end
|
||||
object actInformeFacturasClienteGrafComp: TAction
|
||||
Category = 'Facturas de cliente'
|
||||
Caption = 'Informe comparativo de facturaci'#243'n de clientes'
|
||||
Caption = 'Informe comparativo de facturas de clientes'
|
||||
ImageIndex = 0
|
||||
OnExecute = actInformeFacturasClienteGrafCompExecute
|
||||
end
|
||||
@ -141,6 +141,12 @@ object PluginGestorInformes: TPluginGestorInformes
|
||||
ImageIndex = 0
|
||||
OnExecute = actInformeBeneficiosGrafCompExecute
|
||||
end
|
||||
object actInformeAlbaranesClienteGrafComp: TAction
|
||||
Category = 'Albaranes de cliente'
|
||||
Caption = 'Informe comparativo de albaranes de clientes'
|
||||
ImageIndex = 0
|
||||
OnExecute = actInformeAlbaranesClienteGrafCompExecute
|
||||
end
|
||||
end
|
||||
object MainMenu: TMainMenu
|
||||
Images = LargeImages
|
||||
@ -204,6 +210,10 @@ object PluginGestorInformes: TPluginGestorInformes
|
||||
Tag = 140
|
||||
Caption = '-'
|
||||
end
|
||||
object actInformeAlbaranesClienteGrafComp1: TMenuItem
|
||||
Tag = 150
|
||||
Action = actInformeAlbaranesClienteGrafComp
|
||||
end
|
||||
object Informecomparativodefacturacindeclientes1: TMenuItem
|
||||
Tag = 160
|
||||
Action = actInformeFacturasClienteGrafComp
|
||||
|
||||
@ -48,6 +48,8 @@ type
|
||||
Informecomparativodefacturacindeproveedores1: TMenuItem;
|
||||
actInformeBeneficiosGrafComp: TAction;
|
||||
Informecomparativodebeneficios1: TMenuItem;
|
||||
actInformeAlbaranesClienteGrafComp: TAction;
|
||||
actInformeAlbaranesClienteGrafComp1: TMenuItem;
|
||||
procedure actInformeFacturasClienteExecute(Sender: TObject);
|
||||
procedure actInformeFacturasClientePendientesExecute(Sender: TObject);
|
||||
procedure actInformeFacturasClienteIVAExecute(Sender: TObject);
|
||||
@ -61,6 +63,7 @@ type
|
||||
procedure actInformeFacturasClienteGrafCompExecute(Sender: TObject);
|
||||
procedure actInformeFacturasProveedorGrafCompExecute(Sender: TObject);
|
||||
procedure actInformeBeneficiosGrafCompExecute(Sender: TObject);
|
||||
procedure actInformeAlbaranesClienteGrafCompExecute(Sender: TObject);
|
||||
private
|
||||
FController : IGestorInformesController;
|
||||
public
|
||||
@ -84,6 +87,12 @@ end;
|
||||
exports
|
||||
GetModule name GET_MODULE_FUNC;
|
||||
|
||||
procedure TPluginGestorInformes.actInformeAlbaranesClienteGrafCompExecute(
|
||||
Sender: TObject);
|
||||
begin
|
||||
FController.VerInformeAlbaranesCliGrafComp;
|
||||
end;
|
||||
|
||||
procedure TPluginGestorInformes.actInformeBeneficiosGrafCompExecute(
|
||||
Sender: TObject);
|
||||
begin
|
||||
|
||||
@ -41,6 +41,10 @@ type
|
||||
//MODULO PRESUPUESTOS CLIENTE
|
||||
function GenerarInformeListadoPresupuestos(const IdEmpresa: Integer; const FechaInicio: Variant; const FechaFin: Variant; const ListaIDClientes: TIntegerArray; const Desglosado: Boolean; const ImporteMinimo: Currency): Binary;
|
||||
|
||||
//MODULO ALBARANES CLIENTE
|
||||
function GenerarInformeAlbaranesCliGrafComp(const IdEmpresa: Integer; const Intervalo: Variant; const Ano1: Variant; const Ano2: Variant; const ListaIDClientes: TIntegerArray; const TopN: Integer; const Serie: Variant): Binary;
|
||||
function DarListaAnosAlbaranesCli: StringArray;
|
||||
|
||||
//MODULO FACTURAS CLIENTE
|
||||
function GenerarInformeIVAClientes(const IdEmpresa: Integer; const FechaInicio: Variant; const FechaFin: Variant; const ListaIDClientes: TIntegerArray; const Desglosado: Boolean; const ImporteMinimo: Currency): Binary;
|
||||
function GenerarInformeListadoFacturasCli(const IdEmpresa: Integer; const FechaInicio: Variant; const FechaFin: Variant; const FechaVenInicio: Variant; const FechaVenFin: Variant; const ListaIDClientes: TIntegerArray; const Desglosado: Boolean; const ImporteMinimo: Currency): Binary;
|
||||
@ -48,7 +52,7 @@ type
|
||||
|
||||
function GenerarInformeFacturasCliGrafComp(const IdEmpresa: Integer; const Intervalo: Variant; const Ano1: Variant; const Ano2: Variant; const ListaIDClientes: TIntegerArray; const TopN: Integer): Binary;
|
||||
function DarListaAnosFacturasCli: StringArray;
|
||||
function GenerarInformeBeneficiosGrafComp(const IdEmpresa: Integer; const Intervalo: Variant; const Ano1: Variant; const Ano2: Variant; const Serie: Variant): Binary;
|
||||
function GenerarInformeBeneficiosGrafComp(const IdEmpresa: Integer; const Intervalo: Variant; const Ano1: Variant; const Ano2: Variant; const Serie: Variant): Binary;
|
||||
|
||||
//MODULO RECIBOS CLIENTE
|
||||
function GenerarInformeListadoRecibosCliente(const IdEmpresa: Integer; const FechaInicio: Variant; const FechaFin: Variant; const FechaVenInicio: Variant; const FechaVenFin: Variant; const ListaIDClientes: TIntegerArray; const Desglosado: Boolean; const ImporteMinimo: Currency): Binary;
|
||||
@ -77,13 +81,26 @@ uses
|
||||
{Generated:} FactuGES_Invk, uDataModuleServer, uDatabaseUtils, Dialogs,
|
||||
uRptPresupuestosCliente_Server, uRptFacturasCliente_Server, uRptRecibosCliente_Server,
|
||||
uRptPedidosProveedor_Server, uRptFacturasProveedor_Server, uRptRecibosProveedor_Server,
|
||||
srvFacturasProveedor_Impl, srvFacturasCliente_Impl;
|
||||
srvFacturasProveedor_Impl, srvFacturasCliente_Impl, srvAlbaranesCliente_Impl, uRptAlbaranesCliente_Server;
|
||||
|
||||
procedure Create_srvGestorInformes(out anInstance: IUnknown);
|
||||
begin
|
||||
anInstance := TsrvGestorInformes.Create(nil);
|
||||
end;
|
||||
|
||||
function TsrvGestorInformes.DarListaAnosAlbaranesCli: StringArray;
|
||||
var
|
||||
AServer : TsrvAlbaranesCliente;
|
||||
begin
|
||||
Result := Nil;
|
||||
AServer := TsrvAlbaranesCliente.Create(nil);
|
||||
try
|
||||
Result := AServer.DarListaAnos;
|
||||
finally
|
||||
FreeAndNIL(AServer);
|
||||
end;
|
||||
end;
|
||||
|
||||
function TsrvGestorInformes.DarListaAnosFacturasCli: StringArray;
|
||||
var
|
||||
AServer : TsrvFacturasCliente;
|
||||
@ -118,6 +135,20 @@ begin
|
||||
Result.Add(CTE_SEMESTRAL);
|
||||
end;
|
||||
|
||||
function TsrvGestorInformes.GenerarInformeAlbaranesCliGrafComp(
|
||||
const IdEmpresa: Integer; const Intervalo, Ano1, Ano2: Variant;
|
||||
const ListaIDClientes: TIntegerArray; const TopN: Integer; const Serie: Variant): Binary;
|
||||
var
|
||||
AReportGenerator : TRptAlbaranesCliente;
|
||||
begin
|
||||
AReportGenerator := TRptAlbaranesCliente.Create(nil);
|
||||
try
|
||||
Result := AReportGenerator.GenerarInformeAlbaranesGrafComp(IdEmpresa, Intervalo, Ano1, Ano2, ListaIDClientes, TopN, Serie);
|
||||
finally
|
||||
FreeAndNIL(AReportGenerator);
|
||||
end;
|
||||
end;
|
||||
|
||||
function TsrvGestorInformes.GenerarInformeBeneficiosGrafComp(
|
||||
const IdEmpresa: Integer; const Intervalo, Ano1, Ano2,
|
||||
Serie: Variant): Binary;
|
||||
|
||||
@ -92,6 +92,7 @@ contains
|
||||
uViewIntervaloComparativo in 'uViewIntervaloComparativo.pas' {frViewIntervaloComparativo: TFrame},
|
||||
uEditorInformeFacturasClienteReportGrafComp in 'uEditorInformeFacturasClienteReportGrafComp.pas' {fEditorInformeFacturasClienteReportGrafComp: TForm},
|
||||
uEditorInformeFacturasProveedorReportGrafComp in 'uEditorInformeFacturasProveedorReportGrafComp.pas' {fEditorInformeFacturasProveedorReportGrafComp: TForm},
|
||||
uEditorInformeBeneficiosReportGrafComp in 'uEditorInformeBeneficiosReportGrafComp.pas' {fEditorInformeBeneficiosReportGrafComp: TForm};
|
||||
uEditorInformeBeneficiosReportGrafComp in 'uEditorInformeBeneficiosReportGrafComp.pas' {fEditorInformeBeneficiosReportGrafComp: TForm},
|
||||
uEditorInformeAlbaranesClienteReportGrafComp in 'uEditorInformeAlbaranesClienteReportGrafComp.pas' {fEditorInformeAlbaranesClienteReportGrafComp: TForm};
|
||||
|
||||
end.
|
||||
|
||||
@ -75,12 +75,16 @@
|
||||
<DCCReference Include="rtl.dcp" />
|
||||
<DCCReference Include="tb2k_d10.dcp" />
|
||||
<DCCReference Include="tbx_d10.dcp" />
|
||||
<DCCReference Include="uEditorInformeAlbaranesClienteReportGrafComp.pas">
|
||||
<Form>fEditorInformeBeneficiosReportGrafComp</Form>
|
||||
<DesignClass>TForm</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="uEditorInformeBase.pas">
|
||||
<Form>fEditorInformeBase</Form>
|
||||
<DesignClass>TForm</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="uEditorInformeBeneficiosReportGrafComp.pas">
|
||||
<Form>fEditorInformeFacturasProveedorReportGrafComp</Form>
|
||||
<Form>fEditorInformeBeneficiosReportGrafComp</Form>
|
||||
<DesignClass>TForm</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="uEditorInformeFacturasClientePendientesReport.pas">
|
||||
|
||||
Binary file not shown.
@ -0,0 +1,210 @@
|
||||
inherited fEditorInformeAlbaranesClienteReportGrafComp: TfEditorInformeAlbaranesClienteReportGrafComp
|
||||
Caption = 'fEditorInformeAlbaranesClienteReportGrafComp'
|
||||
ClientHeight = 655
|
||||
ClientWidth = 895
|
||||
ExplicitWidth = 903
|
||||
ExplicitHeight = 689
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
inherited JvNavPanelHeader: TJvNavPanelHeader
|
||||
Width = 895
|
||||
ExplicitWidth = 895
|
||||
inherited Image1: TImage
|
||||
Left = 868
|
||||
ExplicitLeft = 868
|
||||
end
|
||||
end
|
||||
inherited TBXDock: TTBXDock
|
||||
Width = 895
|
||||
ExplicitWidth = 895
|
||||
inherited tbxMenu: TTBXToolbar
|
||||
ExplicitWidth = 895
|
||||
end
|
||||
inherited TBXToolbar1: TTBXToolbar
|
||||
ExplicitWidth = 591
|
||||
object TBXItem58: TTBXItem [0]
|
||||
Action = actRefrescar
|
||||
DisplayMode = nbdmImageAndText
|
||||
Images = SmallImages
|
||||
end
|
||||
end
|
||||
end
|
||||
inherited StatusBar: TJvStatusBar
|
||||
Top = 636
|
||||
Width = 895
|
||||
ExplicitTop = 636
|
||||
ExplicitWidth = 895
|
||||
end
|
||||
inherited TBXMultiDockIzquierdo: TTBXMultiDock
|
||||
Height = 534
|
||||
ExplicitHeight = 534
|
||||
end
|
||||
inherited TBXMultiDockDerecho: TTBXMultiDock
|
||||
Left = 703
|
||||
Width = 192
|
||||
Height = 534
|
||||
ExplicitLeft = 703
|
||||
ExplicitWidth = 192
|
||||
ExplicitHeight = 534
|
||||
inherited pnlParametros: TTBXDockablePanel
|
||||
DockedWidth = 188
|
||||
ExplicitWidth = 192
|
||||
ExplicitHeight = 518
|
||||
inherited TBXDockablePanel1: TTBXDockablePanel
|
||||
Top = 368
|
||||
ExplicitTop = 368
|
||||
ExplicitWidth = 188
|
||||
inherited TBXButton1: TTBXButton
|
||||
AlignWithMargins = True
|
||||
Left = 3
|
||||
Top = 3
|
||||
Width = 182
|
||||
Height = 37
|
||||
Margins.Left = 8
|
||||
Margins.Top = 8
|
||||
Margins.Right = 8
|
||||
Margins.Bottom = 8
|
||||
Align = alTop
|
||||
ExplicitLeft = 3
|
||||
ExplicitTop = 3
|
||||
ExplicitWidth = 182
|
||||
ExplicitHeight = 37
|
||||
end
|
||||
end
|
||||
inline frViewIntervaloComparativo1: TfrViewIntervaloComparativo
|
||||
Left = 0
|
||||
Top = 0
|
||||
Width = 188
|
||||
Height = 313
|
||||
Align = alTop
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
TabOrder = 1
|
||||
ReadOnly = False
|
||||
ExplicitWidth = 188
|
||||
ExplicitHeight = 313
|
||||
inherited TBXAlignmentPanel2: TTBXAlignmentPanel
|
||||
Width = 182
|
||||
ExplicitWidth = 182
|
||||
inherited Label3: TLabel
|
||||
Width = 172
|
||||
end
|
||||
inherited cbIntervalo: TcxComboBox
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 166
|
||||
Width = 166
|
||||
end
|
||||
end
|
||||
inherited TBXLabel2: TTBXLabel
|
||||
Width = 188
|
||||
ExplicitWidth = 188
|
||||
end
|
||||
inherited TBXAlignmentPanel3: TTBXAlignmentPanel
|
||||
Width = 182
|
||||
ExplicitWidth = 182
|
||||
inherited lis: TLabel
|
||||
Width = 172
|
||||
end
|
||||
inherited cbAno1: TcxComboBox
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 166
|
||||
Width = 166
|
||||
end
|
||||
end
|
||||
inherited TBXAlignmentPanel1: TTBXAlignmentPanel
|
||||
Width = 182
|
||||
ExplicitWidth = 182
|
||||
inherited Label1: TLabel
|
||||
Width = 172
|
||||
end
|
||||
inherited cbAno2: TcxComboBox
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 166
|
||||
Width = 166
|
||||
end
|
||||
end
|
||||
inherited TBXAlignmentPanel4: TTBXAlignmentPanel
|
||||
Top = 224
|
||||
Width = 182
|
||||
ExplicitWidth = 182
|
||||
inherited Label2: TLabel
|
||||
Width = 172
|
||||
end
|
||||
end
|
||||
inherited TBXAlignmentPanel5: TTBXAlignmentPanel
|
||||
Top = 176
|
||||
Width = 182
|
||||
ExplicitTop = 161
|
||||
ExplicitWidth = 182
|
||||
inherited Label4: TLabel
|
||||
Width = 172
|
||||
ExplicitLeft = -3
|
||||
ExplicitTop = 0
|
||||
ExplicitWidth = 172
|
||||
end
|
||||
inherited cbSerie: TcxComboBox
|
||||
Properties.Items.Strings = (
|
||||
'Todos'
|
||||
'Servidos'
|
||||
'Incidencias'
|
||||
'Fuera de fecha'
|
||||
#211'rdenes dev.')
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 166
|
||||
Width = 166
|
||||
end
|
||||
end
|
||||
end
|
||||
inline frViewFiltroClientes1: TfrViewFiltroClientes
|
||||
Left = 0
|
||||
Top = 313
|
||||
Width = 188
|
||||
Height = 195
|
||||
Align = alTop
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
TabOrder = 2
|
||||
Visible = False
|
||||
ReadOnly = False
|
||||
ExplicitTop = 220
|
||||
ExplicitWidth = 188
|
||||
inherited TBXLabel2: TTBXLabel
|
||||
Width = 188
|
||||
ExplicitWidth = 188
|
||||
end
|
||||
inherited bElegirCliente: TBitBtn
|
||||
Width = 119
|
||||
ExplicitWidth = 119
|
||||
end
|
||||
inherited edtCliente: TcxTextEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 152
|
||||
Width = 152
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
@ -0,0 +1,186 @@
|
||||
unit uEditorInformeAlbaranesClienteReportGrafComp;
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
|
||||
Dialogs, uEditorPreview, frxExportText, frxExportRTF, frxExportMail,
|
||||
frxExportXLS, frxExportImage, frxExportPDF, frxClass, frxDCtrl, frxGradient,
|
||||
frxChBox, frxCross, frxRich, frxOLE, frxBarcode, JvAppStorage,
|
||||
JvAppRegistryStorage, JvComponentBase, JvFormPlacement, ImgList, PngImageList,
|
||||
StdActns, ActnList, ComCtrls, JvExComCtrls, JvStatusBar, TB2ExtItems,
|
||||
TBXExtItems, TBX, TB2Item, TB2Dock, TB2Toolbar, pngimage, ExtCtrls,
|
||||
JvExControls, JvNavigationPane, uCustomView,
|
||||
uViewBase, uViewPeriodoFechas, uControllerBase,
|
||||
dxLayoutControl, cxControls, uViewFiltroImportes,
|
||||
FactuGES_Intf, TBXDkPanels, uEditorInformeBase,
|
||||
uIEditorInformeBase, uViewParametrosInforme, uIEditorInformeAlbaranesClienteReportGrafComp,
|
||||
uViewIntervaloComparativo, uViewFiltroClientes;
|
||||
|
||||
type
|
||||
TfEditorInformeAlbaranesClienteReportGrafComp = class(TfEditorInformeBase, IEditorInformeAlbaranesClienteReportGrafComp)
|
||||
TBXItem58: TTBXItem;
|
||||
frViewIntervaloComparativo1: TfrViewIntervaloComparativo;
|
||||
frViewFiltroClientes1: TfrViewFiltroClientes;
|
||||
procedure actRefrescarExecute(Sender: TObject);
|
||||
procedure FormShow(Sender: TObject);
|
||||
|
||||
private
|
||||
FListaIDClientes: TIntegerArray;
|
||||
function GetIntervalo: Variant;
|
||||
function GetAno1: Variant;
|
||||
function GetAno2: Variant;
|
||||
function GetSerie: variant;
|
||||
function GetListaIDClientes: TIntegerArray;
|
||||
function GetNTop: Variant;
|
||||
|
||||
procedure RefrescarInforme;
|
||||
|
||||
protected
|
||||
procedure SetController (const Value : IControllerBase); override;
|
||||
|
||||
public
|
||||
property Intervalo: Variant read GetIntervalo;
|
||||
property Ano1: Variant read GetAno1;
|
||||
property Ano2: Variant read GetAno2;
|
||||
property ListaIDClientes: TIntegerArray read GetListaIDClientes;
|
||||
property NTop: Variant read GetNTop;
|
||||
property Serie: Variant read GetSerie;
|
||||
|
||||
constructor Create(AOwner: TComponent); override;
|
||||
destructor Destroy; override;
|
||||
end;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
{$R *.dfm}
|
||||
|
||||
uses uROTypes, DateUtils, uGestorInformesController, uFactuGES_App;
|
||||
|
||||
{ TfEditorGestorInformesReport }
|
||||
|
||||
procedure TfEditorInformeAlbaranesClienteReportGrafComp.actRefrescarExecute(Sender: TObject);
|
||||
begin
|
||||
inherited;
|
||||
RefrescarInforme;
|
||||
end;
|
||||
|
||||
constructor TfEditorInformeAlbaranesClienteReportGrafComp.Create(AOwner: TComponent);
|
||||
begin
|
||||
inherited;
|
||||
FListaIDClientes := TIntegerArray.Create;
|
||||
end;
|
||||
|
||||
destructor TfEditorInformeAlbaranesClienteReportGrafComp.Destroy;
|
||||
begin
|
||||
FListaIDClientes.Free;
|
||||
inherited;
|
||||
end;
|
||||
|
||||
procedure TfEditorInformeAlbaranesClienteReportGrafComp.FormShow(Sender: TObject);
|
||||
begin
|
||||
inherited;
|
||||
actTodaPagina.Execute;
|
||||
end;
|
||||
|
||||
function TfEditorInformeAlbaranesClienteReportGrafComp.GetIntervalo: Variant;
|
||||
begin
|
||||
Result := frViewIntervaloComparativo1.cbIntervalo.EditValue;
|
||||
end;
|
||||
|
||||
function TfEditorInformeAlbaranesClienteReportGrafComp.GetAno1: Variant;
|
||||
begin
|
||||
Result := frViewIntervaloComparativo1.cbAno1.EditValue;
|
||||
end;
|
||||
|
||||
function TfEditorInformeAlbaranesClienteReportGrafComp.GetAno2: Variant;
|
||||
begin
|
||||
Result := frViewIntervaloComparativo1.cbAno2.EditValue;
|
||||
end;
|
||||
|
||||
function TfEditorInformeAlbaranesClienteReportGrafComp.GetListaIDClientes: TIntegerArray;
|
||||
begin
|
||||
FListaIDClientes.Clear;
|
||||
if Assigned(frViewFiltroClientes1.Cliente) then
|
||||
FListaIDClientes.Add(frViewFiltroClientes1.Cliente.ID);
|
||||
|
||||
Result := FListaIDClientes;
|
||||
end;
|
||||
|
||||
function TfEditorInformeAlbaranesClienteReportGrafComp.GetNTop: Variant;
|
||||
begin
|
||||
Result := frViewIntervaloComparativo1.stopN.Value;
|
||||
end;
|
||||
|
||||
function TfEditorInformeAlbaranesClienteReportGrafComp.GetSerie: variant;
|
||||
begin
|
||||
Result := frViewIntervaloComparativo1.Serie;
|
||||
end;
|
||||
|
||||
procedure TfEditorInformeAlbaranesClienteReportGrafComp.RefrescarInforme;
|
||||
var
|
||||
AStream: Binary;
|
||||
begin
|
||||
ShowHourglassCursor;
|
||||
try
|
||||
|
||||
AStream := (Controller as IGestorInformesController).DataModule.GenerarInformeAlbaranesCliGrafComp(
|
||||
AppFactuGES.EmpresaActiva.ID,
|
||||
Intervalo,
|
||||
Ano1,
|
||||
Ano2,
|
||||
ListaIDClientes,
|
||||
NTop,
|
||||
Serie);
|
||||
|
||||
LoadFromStream(AStream);
|
||||
Report.ShowPreparedReport;
|
||||
finally
|
||||
FreeAndNil(AStream);
|
||||
HideHourglassCursor;
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TfEditorInformeAlbaranesClienteReportGrafComp.SetController(
|
||||
const Value: IControllerBase);
|
||||
var
|
||||
AListaAnos: TStringList;
|
||||
AListaIntervalos: TStringList;
|
||||
i: Integer;
|
||||
|
||||
begin
|
||||
inherited;
|
||||
|
||||
AListaIntervalos := (Controller as IGestorInformesController).DarListaIntervalos;
|
||||
AListaAnos := (Controller as IGestorInformesController).DarListaAnosAlbaranesCli;
|
||||
|
||||
if Assigned(AListaIntervalos) then
|
||||
begin
|
||||
frViewIntervaloComparativo1.cbIntervalo.Properties.Items.BeginUpdate;
|
||||
frViewIntervaloComparativo1.cbIntervalo.Properties.Items.Clear;
|
||||
for i := 0 to AListaIntervalos.Count - 1 do
|
||||
frViewIntervaloComparativo1.cbIntervalo.Properties.Items.Append(AListaIntervalos.Strings[i]);
|
||||
frViewIntervaloComparativo1.cbIntervalo.Properties.Items.EndUpdate;
|
||||
end;
|
||||
|
||||
if Assigned(AListaAnos) then
|
||||
begin
|
||||
frViewIntervaloComparativo1.cbAno1.Properties.Items.BeginUpdate;
|
||||
frViewIntervaloComparativo1.cbAno2.Properties.Items.BeginUpdate;
|
||||
frViewIntervaloComparativo1.cbAno1.Properties.Items.Clear;
|
||||
frViewIntervaloComparativo1.cbAno2.Properties.Items.Clear;
|
||||
for i := 0 to AListaAnos.Count - 2 do
|
||||
begin
|
||||
frViewIntervaloComparativo1.cbAno1.Properties.Items.Append(AListaAnos.Strings[i]);
|
||||
frViewIntervaloComparativo1.cbAno2.Properties.Items.Append(AListaAnos.Strings[i]);
|
||||
end;
|
||||
frViewIntervaloComparativo1.cbAno1.Properties.Items.EndUpdate;
|
||||
frViewIntervaloComparativo1.cbAno2.Properties.Items.EndUpdate;
|
||||
end;
|
||||
|
||||
frViewIntervaloComparativo1.cbIntervalo.ItemIndex := 0;
|
||||
frViewIntervaloComparativo1.cbAno1.ItemIndex := 0;
|
||||
end;
|
||||
|
||||
end.
|
||||
@ -155,7 +155,6 @@ inherited fEditorInformeBeneficiosReportGrafComp: TfEditorInformeBeneficiosRepor
|
||||
end
|
||||
inherited TBXAlignmentPanel5: TTBXAlignmentPanel
|
||||
Width = 182
|
||||
ExplicitTop = 225
|
||||
ExplicitWidth = 182
|
||||
inherited Label4: TLabel
|
||||
Width = 172
|
||||
|
||||
@ -168,7 +168,7 @@ begin
|
||||
frViewIntervaloComparativo1.cbAno2.Properties.Items.BeginUpdate;
|
||||
frViewIntervaloComparativo1.cbAno1.Properties.Items.Clear;
|
||||
frViewIntervaloComparativo1.cbAno2.Properties.Items.Clear;
|
||||
for i := 0 to AListaAnos.Count - 1 do
|
||||
for i := 0 to AListaAnos.Count - 2 do
|
||||
begin
|
||||
frViewIntervaloComparativo1.cbAno1.Properties.Items.Append(AListaAnos.Strings[i]);
|
||||
frViewIntervaloComparativo1.cbAno2.Properties.Items.Append(AListaAnos.Strings[i]);
|
||||
|
||||
@ -143,6 +143,21 @@ inherited fEditorInformeFacturasClienteReportGrafComp: TfEditorInformeFacturasCl
|
||||
Width = 172
|
||||
end
|
||||
end
|
||||
inherited TBXAlignmentPanel5: TTBXAlignmentPanel
|
||||
Width = 182
|
||||
ExplicitWidth = 182
|
||||
inherited Label4: TLabel
|
||||
Width = 172
|
||||
end
|
||||
inherited cbSerie: TcxComboBox
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 166
|
||||
Width = 166
|
||||
end
|
||||
end
|
||||
end
|
||||
inline frViewFiltroClientes1: TfrViewFiltroClientes
|
||||
Left = 0
|
||||
@ -159,7 +174,7 @@ inherited fEditorInformeFacturasClienteReportGrafComp: TfEditorInformeFacturasCl
|
||||
TabOrder = 2
|
||||
Visible = False
|
||||
ReadOnly = False
|
||||
ExplicitTop = 182
|
||||
ExplicitTop = 220
|
||||
ExplicitWidth = 188
|
||||
inherited TBXLabel2: TTBXLabel
|
||||
Width = 188
|
||||
|
||||
@ -162,7 +162,7 @@ begin
|
||||
frViewIntervaloComparativo1.cbAno2.Properties.Items.BeginUpdate;
|
||||
frViewIntervaloComparativo1.cbAno1.Properties.Items.Clear;
|
||||
frViewIntervaloComparativo1.cbAno2.Properties.Items.Clear;
|
||||
for i := 0 to AListaAnos.Count - 1 do
|
||||
for i := 0 to AListaAnos.Count - 2 do
|
||||
begin
|
||||
frViewIntervaloComparativo1.cbAno1.Properties.Items.Append(AListaAnos.Strings[i]);
|
||||
frViewIntervaloComparativo1.cbAno2.Properties.Items.Append(AListaAnos.Strings[i]);
|
||||
|
||||
@ -143,6 +143,21 @@ inherited fEditorInformeFacturasProveedorReportGrafComp: TfEditorInformeFacturas
|
||||
Width = 172
|
||||
end
|
||||
end
|
||||
inherited TBXAlignmentPanel5: TTBXAlignmentPanel
|
||||
Width = 182
|
||||
ExplicitWidth = 182
|
||||
inherited Label4: TLabel
|
||||
Width = 172
|
||||
end
|
||||
inherited cbSerie: TcxComboBox
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 166
|
||||
Width = 166
|
||||
end
|
||||
end
|
||||
end
|
||||
inline frViewFiltroProveedores1: TfrViewFiltroProveedores
|
||||
Left = 0
|
||||
@ -159,7 +174,7 @@ inherited fEditorInformeFacturasProveedorReportGrafComp: TfEditorInformeFacturas
|
||||
TabOrder = 2
|
||||
Visible = False
|
||||
ReadOnly = False
|
||||
ExplicitTop = 182
|
||||
ExplicitTop = 220
|
||||
ExplicitWidth = 188
|
||||
inherited TBXLabel2: TTBXLabel
|
||||
Width = 188
|
||||
|
||||
@ -163,7 +163,7 @@ begin
|
||||
frViewIntervaloComparativo1.cbAno2.Properties.Items.BeginUpdate;
|
||||
frViewIntervaloComparativo1.cbAno1.Properties.Items.Clear;
|
||||
frViewIntervaloComparativo1.cbAno2.Properties.Items.Clear;
|
||||
for i := 0 to AListaAnos.Count - 1 do
|
||||
for i := 0 to AListaAnos.Count - 2 do
|
||||
begin
|
||||
frViewIntervaloComparativo1.cbAno1.Properties.Items.Append(AListaAnos.Strings[i]);
|
||||
frViewIntervaloComparativo1.cbAno2.Properties.Items.Append(AListaAnos.Strings[i]);
|
||||
|
||||
@ -16,7 +16,7 @@ uses
|
||||
uEditorInformeIVAProveedoresReport, uEditorInformeFacturasProveedorReport, uEditorInformeFacturasProveedorPendientesReport,
|
||||
uEditorInformeRecibosProveedorReport, uEditorInformeRecibosProvPendientesReport,
|
||||
|
||||
uEditorInformeFacturasProveedorReportGrafComp, uEditorInformeFacturasClienteReportGrafComp, uEditorInformeBeneficiosReportGrafComp;
|
||||
uEditorInformeAlbaranesClienteReportGrafComp, uEditorInformeFacturasProveedorReportGrafComp, uEditorInformeFacturasClienteReportGrafComp, uEditorInformeBeneficiosReportGrafComp;
|
||||
|
||||
procedure RegisterViews;
|
||||
begin
|
||||
@ -34,6 +34,7 @@ begin
|
||||
EditorRegistry.RegisterClass(TfEditorInformeRecibosProveedorReport, 'EditorInformeRecibosProveedorReport');
|
||||
EditorRegistry.RegisterClass(TfEditorInformeRecibosProvPendientesReport, 'EditorInformeRecibosProvPendientesReport');
|
||||
|
||||
EditorRegistry.RegisterClass(TfEditorInformeAlbaranesClienteReportGrafComp, 'EditorInformeAlbaranesClienteReportGrafComp');
|
||||
EditorRegistry.RegisterClass(TfEditorInformeFacturasProveedorReportGrafComp, 'EditorInformeFacturasProveedorReportGrafComp');
|
||||
EditorRegistry.RegisterClass(TfEditorInformeFacturasClienteReportGrafComp, 'EditorInformeFacturasClienteReportGrafComp');
|
||||
EditorRegistry.RegisterClass(TfEditorInformeBeneficiosReportGrafComp, 'EditorInformeBeneficiosReportGrafComp');
|
||||
@ -42,7 +43,7 @@ end;
|
||||
procedure UnregisterViews;
|
||||
begin
|
||||
EditorRegistry.UnRegisterClass(TfEditorInformePresupuestosReport);
|
||||
EditorRegistry.UnRegisterClass(TfEditorInformePedidosReport);
|
||||
EditorRegistry.UnRegisterClass(TfEditorInformePedidosReport);
|
||||
EditorRegistry.UnRegisterClass(TfEditorInformeIVAClientesReport);
|
||||
EditorRegistry.UnRegisterClass(TfEditorInformeFacturasClienteReport);
|
||||
EditorRegistry.UnRegisterClass(TfEditorInformeFacturasClientePendientesReport);
|
||||
@ -54,10 +55,11 @@ begin
|
||||
EditorRegistry.UnRegisterClass(TfEditorInformeFacturasProveedorPendientesReport);
|
||||
EditorRegistry.UnRegisterClass(TfEditorInformeRecibosProveedorReport);
|
||||
EditorRegistry.UnRegisterClass(TfEditorInformeRecibosProvPendientesReport);
|
||||
EditorRegistry.UnRegisterClass(TfEditorInformeBeneficiosReportGrafComp);
|
||||
EditorRegistry.UnRegisterClass(TfEditorInformeBeneficiosReportGrafComp);
|
||||
|
||||
EditorRegistry.UnRegisterClass(TfEditorInformeFacturasProveedorReportGrafComp);
|
||||
EditorRegistry.UnRegisterClass(TfEditorInformeFacturasClienteReportGrafComp);
|
||||
EditorRegistry.UnRegisterClass(TfEditorInformeFacturasClienteReportGrafComp);
|
||||
EditorRegistry.UnRegisterClass(TfEditorInformeAlbaranesClienteReportGrafComp);
|
||||
end;
|
||||
|
||||
end.
|
||||
|
||||
@ -60,7 +60,6 @@ inherited fEditorRecibosCliente: TfEditorRecibosCliente
|
||||
end
|
||||
inherited TBXTMain2: TTBXToolbar
|
||||
Left = 427
|
||||
Visible = True
|
||||
ExplicitLeft = 427
|
||||
ExplicitWidth = 66
|
||||
object TBXItem38: TTBXItem
|
||||
|
||||
@ -480,6 +480,12 @@
|
||||
</Parameter>
|
||||
</Parameters>
|
||||
</Operation>
|
||||
<Operation Name="DarListaAnos" UID="{2402E7D4-36C7-4137-84F8-E25C3AC2808B}">
|
||||
<Parameters>
|
||||
<Parameter Name="Result" DataType="StringArray" Flag="Result">
|
||||
</Parameter>
|
||||
</Parameters>
|
||||
</Operation>
|
||||
</Operations>
|
||||
</Interface>
|
||||
</Interfaces>
|
||||
@ -948,6 +954,12 @@
|
||||
</Parameter>
|
||||
</Parameters>
|
||||
</Operation>
|
||||
<Operation Name="DarListaAnosAlbaranesCli" UID="{7256D6EA-D4CF-4548-AE0D-A8ECDBA44EF3}">
|
||||
<Parameters>
|
||||
<Parameter Name="Result" DataType="StringArray" Flag="Result">
|
||||
</Parameter>
|
||||
</Parameters>
|
||||
</Operation>
|
||||
<Operation Name="DarListaIntervalos" UID="{AB9C51F0-CD95-4A81-A1AE-EAED4FBC6704}">
|
||||
<Parameters>
|
||||
<Parameter Name="Result" DataType="StringArray" Flag="Result">
|
||||
@ -990,6 +1002,26 @@
|
||||
</Parameter>
|
||||
</Parameters>
|
||||
</Operation>
|
||||
<Operation Name="GenerarInformeAlbaranesCliGrafComp" UID="{AE22464B-C914-4833-AEAE-1E588D375173}">
|
||||
<Parameters>
|
||||
<Parameter Name="Result" DataType="Binary" Flag="Result">
|
||||
</Parameter>
|
||||
<Parameter Name="IdEmpresa" DataType="Integer" Flag="In" >
|
||||
</Parameter>
|
||||
<Parameter Name="Intervalo" DataType="Variant" Flag="In" >
|
||||
</Parameter>
|
||||
<Parameter Name="Ano1" DataType="Variant" Flag="In" >
|
||||
</Parameter>
|
||||
<Parameter Name="Ano2" DataType="Variant" Flag="In" >
|
||||
</Parameter>
|
||||
<Parameter Name="ListaIDClientes" DataType="TIntegerArray" Flag="In" >
|
||||
</Parameter>
|
||||
<Parameter Name="TopN" DataType="Integer" Flag="In" >
|
||||
</Parameter>
|
||||
<Parameter Name="Serie" DataType="Variant" Flag="In" >
|
||||
</Parameter>
|
||||
</Parameters>
|
||||
</Operation>
|
||||
<Operation Name="GenerarInformeBeneficiosGrafComp" UID="{A94F57D9-1252-49A2-8487-467FA346CB9B}">
|
||||
<Parameters>
|
||||
<Parameter Name="Result" DataType="Binary" Flag="Result">
|
||||
|
||||
@ -624,6 +624,7 @@ type
|
||||
function GenerarInformeEnWord(const ID: Integer): Binary;
|
||||
function GenerarInformeEnPDF(const ListaID: TIntegerArray; const VerPrecios: Boolean; const VerRefProveedor: Boolean; const VerObservaciones: Boolean;
|
||||
const VerIncidencias: Boolean): Binary;
|
||||
function DarListaAnos: StringArray;
|
||||
end;
|
||||
|
||||
{ CosrvAlbaranesCliente }
|
||||
@ -642,6 +643,7 @@ type
|
||||
function GenerarInformeEnWord(const ID: Integer): Binary;
|
||||
function GenerarInformeEnPDF(const ListaID: TIntegerArray; const VerPrecios: Boolean; const VerRefProveedor: Boolean; const VerObservaciones: Boolean;
|
||||
const VerIncidencias: Boolean): Binary;
|
||||
function DarListaAnos: StringArray;
|
||||
end;
|
||||
|
||||
{ IsrvAlbaranesProveedor }
|
||||
@ -821,11 +823,14 @@ type
|
||||
const Desglosado: Boolean; const ImporteMinimo: Currency): Binary;
|
||||
function DarListaAnosFacturasProv: StringArray;
|
||||
function DarListaAnosFacturasCli: StringArray;
|
||||
function DarListaAnosAlbaranesCli: StringArray;
|
||||
function DarListaIntervalos: StringArray;
|
||||
function GenerarInformeFacturasProvGrafComp(const IdEmpresa: Integer; const Intervalo: Variant; const Ano1: Variant; const Ano2: Variant; const ListaIDProveedores: TIntegerArray;
|
||||
const TopN: Integer): Binary;
|
||||
function GenerarInformeFacturasCliGrafComp(const IdEmpresa: Integer; const Intervalo: Variant; const Ano1: Variant; const Ano2: Variant; const ListaIDClientes: TIntegerArray;
|
||||
const TopN: Integer): Binary;
|
||||
function GenerarInformeAlbaranesCliGrafComp(const IdEmpresa: Integer; const Intervalo: Variant; const Ano1: Variant; const Ano2: Variant; const ListaIDClientes: TIntegerArray;
|
||||
const TopN: Integer; const Serie: Variant): Binary;
|
||||
function GenerarInformeBeneficiosGrafComp(const IdEmpresa: Integer; const Intervalo: Variant; const Ano1: Variant; const Ano2: Variant; const Serie: Variant): Binary;
|
||||
end;
|
||||
|
||||
@ -865,11 +870,14 @@ type
|
||||
const Desglosado: Boolean; const ImporteMinimo: Currency): Binary;
|
||||
function DarListaAnosFacturasProv: StringArray;
|
||||
function DarListaAnosFacturasCli: StringArray;
|
||||
function DarListaAnosAlbaranesCli: StringArray;
|
||||
function DarListaIntervalos: StringArray;
|
||||
function GenerarInformeFacturasProvGrafComp(const IdEmpresa: Integer; const Intervalo: Variant; const Ano1: Variant; const Ano2: Variant; const ListaIDProveedores: TIntegerArray;
|
||||
const TopN: Integer): Binary;
|
||||
function GenerarInformeFacturasCliGrafComp(const IdEmpresa: Integer; const Intervalo: Variant; const Ano1: Variant; const Ano2: Variant; const ListaIDClientes: TIntegerArray;
|
||||
const TopN: Integer): Binary;
|
||||
function GenerarInformeAlbaranesCliGrafComp(const IdEmpresa: Integer; const Intervalo: Variant; const Ano1: Variant; const Ano2: Variant; const ListaIDClientes: TIntegerArray;
|
||||
const TopN: Integer; const Serie: Variant): Binary;
|
||||
function GenerarInformeBeneficiosGrafComp(const IdEmpresa: Integer; const Intervalo: Variant; const Ano1: Variant; const Ano2: Variant; const Serie: Variant): Binary;
|
||||
end;
|
||||
|
||||
@ -2302,6 +2310,22 @@ begin
|
||||
end
|
||||
end;
|
||||
|
||||
function TsrvAlbaranesCliente_Proxy.DarListaAnos: StringArray;
|
||||
begin
|
||||
try
|
||||
result := nil;
|
||||
__Message.InitializeRequestMessage(__TransportChannel, 'FactuGES', __InterfaceName, 'DarListaAnos');
|
||||
__Message.Finalize;
|
||||
|
||||
__TransportChannel.Dispatch(__Message);
|
||||
|
||||
__Message.Read('Result', TypeInfo(DataAbstract4_Intf.StringArray), result, []);
|
||||
finally
|
||||
__Message.UnsetAttributes(__TransportChannel);
|
||||
__Message.FreeStream;
|
||||
end
|
||||
end;
|
||||
|
||||
{ CosrvAlbaranesProveedor }
|
||||
|
||||
class function CosrvAlbaranesProveedor.Create(const aMessage: IROMessage; aTransportChannel: IROTransportChannel): IsrvAlbaranesProveedor;
|
||||
@ -2967,6 +2991,22 @@ begin
|
||||
end
|
||||
end;
|
||||
|
||||
function TsrvGestorInformes_Proxy.DarListaAnosAlbaranesCli: StringArray;
|
||||
begin
|
||||
try
|
||||
result := nil;
|
||||
__Message.InitializeRequestMessage(__TransportChannel, 'FactuGES', __InterfaceName, 'DarListaAnosAlbaranesCli');
|
||||
__Message.Finalize;
|
||||
|
||||
__TransportChannel.Dispatch(__Message);
|
||||
|
||||
__Message.Read('Result', TypeInfo(DataAbstract4_Intf.StringArray), result, []);
|
||||
finally
|
||||
__Message.UnsetAttributes(__TransportChannel);
|
||||
__Message.FreeStream;
|
||||
end
|
||||
end;
|
||||
|
||||
function TsrvGestorInformes_Proxy.DarListaIntervalos: StringArray;
|
||||
begin
|
||||
try
|
||||
@ -3029,6 +3069,30 @@ begin
|
||||
end
|
||||
end;
|
||||
|
||||
function TsrvGestorInformes_Proxy.GenerarInformeAlbaranesCliGrafComp(const IdEmpresa: Integer; const Intervalo: Variant; const Ano1: Variant; const Ano2: Variant; const ListaIDClientes: TIntegerArray;
|
||||
const TopN: Integer; const Serie: Variant): Binary;
|
||||
begin
|
||||
try
|
||||
result := nil;
|
||||
__Message.InitializeRequestMessage(__TransportChannel, 'FactuGES', __InterfaceName, 'GenerarInformeAlbaranesCliGrafComp');
|
||||
__Message.Write('IdEmpresa', TypeInfo(Integer), IdEmpresa, []);
|
||||
__Message.Write('Intervalo', TypeInfo(Variant), Intervalo, []);
|
||||
__Message.Write('Ano1', TypeInfo(Variant), Ano1, []);
|
||||
__Message.Write('Ano2', TypeInfo(Variant), Ano2, []);
|
||||
__Message.Write('ListaIDClientes', TypeInfo(FactuGES_Intf.TIntegerArray), ListaIDClientes, []);
|
||||
__Message.Write('TopN', TypeInfo(Integer), TopN, []);
|
||||
__Message.Write('Serie', TypeInfo(Variant), Serie, []);
|
||||
__Message.Finalize;
|
||||
|
||||
__TransportChannel.Dispatch(__Message);
|
||||
|
||||
__Message.Read('Result', TypeInfo(Binary), result, []);
|
||||
finally
|
||||
__Message.UnsetAttributes(__TransportChannel);
|
||||
__Message.FreeStream;
|
||||
end
|
||||
end;
|
||||
|
||||
function TsrvGestorInformes_Proxy.GenerarInformeBeneficiosGrafComp(const IdEmpresa: Integer; const Intervalo: Variant; const Ano1: Variant; const Ano2: Variant; const Serie: Variant): Binary;
|
||||
begin
|
||||
try
|
||||
|
||||
@ -220,6 +220,7 @@ type
|
||||
procedure Invoke_GenerarInformeEtiquetas(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
|
||||
procedure Invoke_GenerarInformeEnWord(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
|
||||
procedure Invoke_GenerarInformeEnPDF(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
|
||||
procedure Invoke_DarListaAnos(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
|
||||
end;
|
||||
|
||||
TsrvAlbaranesProveedor_Invoker = class(TDataAbstractService_Invoker)
|
||||
@ -311,9 +312,11 @@ type
|
||||
procedure Invoke_GenerarInformeListadoPedidos(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
|
||||
procedure Invoke_DarListaAnosFacturasProv(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
|
||||
procedure Invoke_DarListaAnosFacturasCli(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
|
||||
procedure Invoke_DarListaAnosAlbaranesCli(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
|
||||
procedure Invoke_DarListaIntervalos(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
|
||||
procedure Invoke_GenerarInformeFacturasProvGrafComp(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
|
||||
procedure Invoke_GenerarInformeFacturasCliGrafComp(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
|
||||
procedure Invoke_GenerarInformeAlbaranesCliGrafComp(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
|
||||
procedure Invoke_GenerarInformeBeneficiosGrafComp(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
|
||||
end;
|
||||
|
||||
@ -1531,6 +1534,31 @@ begin
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TsrvAlbaranesCliente_Invoker.Invoke_DarListaAnos(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
|
||||
{ function DarListaAnos: StringArray; }
|
||||
var
|
||||
lResult: DataAbstract4_Intf.StringArray;
|
||||
__lObjectDisposer: TROObjectDisposer;
|
||||
begin
|
||||
lResult := nil;
|
||||
try
|
||||
lResult := (__Instance as IsrvAlbaranesCliente).DarListaAnos;
|
||||
|
||||
__Message.InitializeResponseMessage(__Transport, 'FactuGES', 'srvAlbaranesCliente', 'DarListaAnosResponse');
|
||||
__Message.Write('Result', TypeInfo(DataAbstract4_Intf.StringArray), lResult, []);
|
||||
__Message.Finalize;
|
||||
__Message.UnsetAttributes(__Transport);
|
||||
|
||||
finally
|
||||
__lObjectDisposer := TROObjectDisposer.Create(__Instance);
|
||||
try
|
||||
__lObjectDisposer.Add(lResult);
|
||||
finally
|
||||
__lObjectDisposer.Free();
|
||||
end;
|
||||
end;
|
||||
end;
|
||||
|
||||
{ TsrvAlbaranesProveedor_Invoker }
|
||||
|
||||
constructor TsrvAlbaranesProveedor_Invoker.Create;
|
||||
@ -2538,6 +2566,31 @@ begin
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TsrvGestorInformes_Invoker.Invoke_DarListaAnosAlbaranesCli(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
|
||||
{ function DarListaAnosAlbaranesCli: StringArray; }
|
||||
var
|
||||
lResult: DataAbstract4_Intf.StringArray;
|
||||
__lObjectDisposer: TROObjectDisposer;
|
||||
begin
|
||||
lResult := nil;
|
||||
try
|
||||
lResult := (__Instance as IsrvGestorInformes).DarListaAnosAlbaranesCli;
|
||||
|
||||
__Message.InitializeResponseMessage(__Transport, 'FactuGES', 'srvGestorInformes', 'DarListaAnosAlbaranesCliResponse');
|
||||
__Message.Write('Result', TypeInfo(DataAbstract4_Intf.StringArray), lResult, []);
|
||||
__Message.Finalize;
|
||||
__Message.UnsetAttributes(__Transport);
|
||||
|
||||
finally
|
||||
__lObjectDisposer := TROObjectDisposer.Create(__Instance);
|
||||
try
|
||||
__lObjectDisposer.Add(lResult);
|
||||
finally
|
||||
__lObjectDisposer.Free();
|
||||
end;
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TsrvGestorInformes_Invoker.Invoke_DarListaIntervalos(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
|
||||
{ function DarListaIntervalos: StringArray; }
|
||||
var
|
||||
@ -2645,6 +2698,49 @@ begin
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TsrvGestorInformes_Invoker.Invoke_GenerarInformeAlbaranesCliGrafComp(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
|
||||
{ function GenerarInformeAlbaranesCliGrafComp(const IdEmpresa: Integer; const Intervalo: Variant; const Ano1: Variant; const Ano2: Variant; const ListaIDClientes: TIntegerArray;
|
||||
const TopN: Integer; const Serie: Variant): Binary; }
|
||||
var
|
||||
IdEmpresa: Integer;
|
||||
Intervalo: Variant;
|
||||
Ano1: Variant;
|
||||
Ano2: Variant;
|
||||
ListaIDClientes: FactuGES_Intf.TIntegerArray;
|
||||
TopN: Integer;
|
||||
Serie: Variant;
|
||||
lResult: Binary;
|
||||
__lObjectDisposer: TROObjectDisposer;
|
||||
begin
|
||||
ListaIDClientes := nil;
|
||||
lResult := nil;
|
||||
try
|
||||
__Message.Read('IdEmpresa', TypeInfo(Integer), IdEmpresa, []);
|
||||
__Message.Read('Intervalo', TypeInfo(Variant), Intervalo, []);
|
||||
__Message.Read('Ano1', TypeInfo(Variant), Ano1, []);
|
||||
__Message.Read('Ano2', TypeInfo(Variant), Ano2, []);
|
||||
__Message.Read('ListaIDClientes', TypeInfo(FactuGES_Intf.TIntegerArray), ListaIDClientes, []);
|
||||
__Message.Read('TopN', TypeInfo(Integer), TopN, []);
|
||||
__Message.Read('Serie', TypeInfo(Variant), Serie, []);
|
||||
|
||||
lResult := (__Instance as IsrvGestorInformes).GenerarInformeAlbaranesCliGrafComp(IdEmpresa, Intervalo, Ano1, Ano2, ListaIDClientes, TopN, Serie);
|
||||
|
||||
__Message.InitializeResponseMessage(__Transport, 'FactuGES', 'srvGestorInformes', 'GenerarInformeAlbaranesCliGrafCompResponse');
|
||||
__Message.Write('Result', TypeInfo(Binary), lResult, []);
|
||||
__Message.Finalize;
|
||||
__Message.UnsetAttributes(__Transport);
|
||||
|
||||
finally
|
||||
__lObjectDisposer := TROObjectDisposer.Create(__Instance);
|
||||
try
|
||||
__lObjectDisposer.Add(ListaIDClientes);
|
||||
__lObjectDisposer.Add(lResult);
|
||||
finally
|
||||
__lObjectDisposer.Free();
|
||||
end;
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TsrvGestorInformes_Invoker.Invoke_GenerarInformeBeneficiosGrafComp(const __Instance:IInterface; const __Message:IROMessage; const __Transport:IROTransport; out __oResponseOptions:TROResponseOptions);
|
||||
{ function GenerarInformeBeneficiosGrafComp(const IdEmpresa: Integer; const Intervalo: Variant; const Ano1: Variant; const Ano2: Variant; const Serie: Variant): Binary; }
|
||||
var
|
||||
|
||||
Binary file not shown.
Binary file not shown.
@ -1,405 +1,406 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
|
||||
<PropertyGroup>
|
||||
<ProjectGuid>{ebdcd25d-40d7-4146-91ec-a0ea4aa1dcd1}</ProjectGuid>
|
||||
<MainSource>FactuGES_Server.dpr</MainSource>
|
||||
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
|
||||
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
|
||||
<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
|
||||
<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>
|
||||
</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_ExeOutput>..\..\Output\Release\Servidor</DCC_ExeOutput>
|
||||
<DCC_Define>RELEASE</DCC_Define>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
|
||||
<Version>7.0</Version>
|
||||
<DCC_MapFile>3</DCC_MapFile>
|
||||
<DCC_ExeOutput>..\..\Output\Debug\Servidor</DCC_ExeOutput>
|
||||
<DCC_Define>DEBUG;</DCC_Define>
|
||||
<DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
|
||||
<DCC_DebugInfoInExe>True</DCC_DebugInfoInExe>
|
||||
<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_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_IncludePath>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</DCC_IncludePath>
|
||||
</PropertyGroup>
|
||||
<ProjectExtensions>
|
||||
<Borland.Personality>Delphi.Personality</Borland.Personality>
|
||||
<Borland.ProjectType/>
|
||||
<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">1</VersionInfo><VersionInfo Name="Release">5</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.1.5.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.1.5.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys><VersionInfoKeys Name="CompileDate">martes, 08 de marzo de 2011 18:50</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><Source><Source Name="MainSource">FactuGES_Server.dpr</Source></Source></Delphi.Personality><ModelSupport>False</ModelSupport></BorlandProject></BorlandProject>
|
||||
</ProjectExtensions>
|
||||
<Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets"/>
|
||||
<ItemGroup>
|
||||
<DelphiCompile Include="FactuGES_Server.dpr">
|
||||
<MainSource>MainSource</MainSource>
|
||||
</DelphiCompile>
|
||||
<DCCReference Include="..\ApplicationBase\Empresas\Model\schEmpresasClient_Intf.pas"/>
|
||||
<DCCReference Include="..\ApplicationBase\Empresas\Model\schEmpresasServer_Intf.pas"/>
|
||||
<DCCReference Include="..\ApplicationBase\Empresas\Model\uBizEmpresasServer.pas"/>
|
||||
<DCCReference Include="..\ApplicationBase\Empresas\Servidor\srvEmpresas_Impl.pas">
|
||||
<Form>srvEmpresas</Form>
|
||||
<DesignClass>TDARemoteService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\ApplicationBase\ProvinciasPoblaciones\Servidor\srvProvinciasPoblaciones_Impl.pas">
|
||||
<Form>srvProvinciasPoblaciones_Impl</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\ApplicationBase\Usuarios\Model\schUsuariosClient_Intf.pas"/>
|
||||
<DCCReference Include="..\ApplicationBase\Usuarios\Model\schUsuariosServer_Intf.pas"/>
|
||||
<DCCReference Include="..\ApplicationBase\Usuarios\Servidor\srvUsuarios_Impl.pas">
|
||||
<Form>srvUsuarios</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Base\schBase_Intf.pas"/>
|
||||
<DCCReference Include="..\Base\Utiles\uSistemaFunc.pas"/>
|
||||
<DCCReference Include="..\Base\Utiles\uStringsUtils.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\uBizAlbaranClienteServer.pas"/>
|
||||
<DCCReference Include="..\Modulos\Albaranes de cliente\Reports\uRptAlbaranesCliente_Server.pas">
|
||||
<Form>RptAlbaranesCliente</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Albaranes de cliente\Reports\uRptWordAlbaranCliente.pas">
|
||||
<Form>RptWordAlbaranCliente</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Albaranes de cliente\Servidor\srvAlbaranesCliente_Impl.pas">
|
||||
<Form>srvAlbaranesCliente</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<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\uBizAlbaranProveedorServer.PAS"/>
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\Reports\uRptAlbaranesProveedor_Server.pas">
|
||||
<Form>RptAlbaranesProveedor</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\Reports\uRptWordAlbaranProveedor.pas">
|
||||
<Form>RptWordAlbaranProveedor</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\Servidor\srvAlbaranesProveedor_Impl.pas">
|
||||
<Form>srvAlbaranesProveedor</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Almacenes\Model\schAlmacenesClient_Intf.pas"/>
|
||||
<DCCReference Include="..\Modulos\Almacenes\Model\schAlmacenesServer_Intf.pas"/>
|
||||
<DCCReference Include="..\Modulos\Almacenes\Servidor\srvAlmacenes_Impl.pas">
|
||||
<Form>srvAlmacenes</Form>
|
||||
<DesignClass>TDARemoteService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Articulos\Model\schArticulosClient_Intf.pas"/>
|
||||
<DCCReference Include="..\Modulos\Articulos\Model\schArticulosServer_Intf.pas"/>
|
||||
<DCCReference Include="..\Modulos\Articulos\Model\uBizArticulosServer.pas"/>
|
||||
<DCCReference Include="..\Modulos\Articulos\Servidor\srvArticulos_Impl.pas">
|
||||
<Form>srvArticulos</Form>
|
||||
<DesignClass>TDARemoteService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Comisiones\Model\schComisionesClient_Intf.pas"/>
|
||||
<DCCReference Include="..\Modulos\Comisiones\Model\schComisionesServer_Intf.pas"/>
|
||||
<DCCReference Include="..\Modulos\Comisiones\Model\uBizComisionesServer.pas"/>
|
||||
<DCCReference Include="..\Modulos\Comisiones\Reports\uRptComisiones_Server.pas">
|
||||
<Form>RptComisiones</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Comisiones\Servidor\srvComisiones_Impl.pas">
|
||||
<Form>srvComisiones</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Contactos\Model\schContactosClient_Intf.pas"/>
|
||||
<DCCReference Include="..\Modulos\Contactos\Model\schContactosServer_Intf.pas"/>
|
||||
<DCCReference Include="..\Modulos\Contactos\Model\uBizAgentesServer.pas"/>
|
||||
<DCCReference Include="..\Modulos\Contactos\Model\uBizClientesServer.pas"/>
|
||||
<DCCReference Include="..\Modulos\Contactos\Model\uBizContactosServer.pas"/>
|
||||
<DCCReference Include="..\Modulos\Contactos\Model\uBizEmpleadosServer.pas"/>
|
||||
<DCCReference Include="..\Modulos\Contactos\Model\uBizProveedoresServer.pas"/>
|
||||
<DCCReference Include="..\Modulos\Contactos\Reports\uRptEtiquetasContacto_Server.pas">
|
||||
<Form>RptEtiquetasContacto</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Contactos\Reports\uRptFichasEmpleado_Server.pas">
|
||||
<Form>RptFichasEmpleado</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Contactos\Servidor\srvContactos_Impl.pas">
|
||||
<Form>srvContactos</Form>
|
||||
<DesignClass>TDARemoteService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Fabricantes\Model\schFabricantesClient_Intf.pas"/>
|
||||
<DCCReference Include="..\Modulos\Fabricantes\Model\schFabricantesServer_Intf.pas"/>
|
||||
<DCCReference Include="..\Modulos\Fabricantes\Servidor\srvFabricantes_Impl.pas">
|
||||
<Form>srvFabricantes</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<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\uBizFacturasClienteServer.pas"/>
|
||||
<DCCReference Include="..\Modulos\Facturas de cliente\Reports\uRptFacturasCliente_Server.pas">
|
||||
<Form>RptFacturasCliente</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Facturas de cliente\Reports\uRptWordFacturaCliente.pas">
|
||||
<Form>RptWordFacturaCliente</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Facturas de cliente\Servidor\srvFacturasCliente_Impl.pas">
|
||||
<Form>srvFacturasCliente</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<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\uBizFacturasProveedorServer.pas"/>
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\Reports\uRptFacturasProveedor_Server.pas">
|
||||
<Form>RptFacturasProveedor</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\Servidor\srvFacturasProveedor_Impl.pas">
|
||||
<Form>srvFacturasProveedor</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Familias\Model\schFamiliasClient_Intf.pas"/>
|
||||
<DCCReference Include="..\Modulos\Familias\Model\schFamiliasServer_Intf.pas"/>
|
||||
<DCCReference Include="..\Modulos\Familias\Servidor\srvFamilias_Impl.pas">
|
||||
<Form>srvFamilias</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<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\Servidor\srvFormasPago_Impl.pas">
|
||||
<Form>srvFormasPago</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Gestion de documentos\Servidor\srvGestorDocumentos_Impl.pas">
|
||||
<Form>srvGestorDocumentos</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Gestor de informes\Servidor\srvGestorInformes_Impl.pas">
|
||||
<Form>srvGestorInformes</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<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\Servidor\srvHistoricoMovimientos_Impl.pas">
|
||||
<Form>srvHistoricoMovimientos</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Impresiones\Model\schImpresionesClient_Intf.pas"/>
|
||||
<DCCReference Include="..\Modulos\Impresiones\Model\schImpresionesServer_Intf.pas"/>
|
||||
<DCCReference Include="..\Modulos\Impresiones\Servidor\srvImpresiones_Impl.pas">
|
||||
<Form>srvImpresiones</Form>
|
||||
<DesignClass>TDARemoteService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Informe margen por articulo\Servidor\srvInfMargenArticulo_Impl.pas">
|
||||
<Form>srvInfMargenArticulo</Form>
|
||||
<DesignClass>TDARemoteService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\Servidor\srvInfVentasArticulo_Impl.pas">
|
||||
<Form>srvInfVentasArticulo</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Informes base\Model\schInformesClient_Intf.pas"/>
|
||||
<DCCReference Include="..\Modulos\Informes base\Model\schInformesServer_Intf.pas"/>
|
||||
<DCCReference Include="..\Modulos\Informes base\Servidor\srvInformes_Impl.pas">
|
||||
<Form>srvInformes</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Inventario\Model\schInventarioClient_Intf.pas"/>
|
||||
<DCCReference Include="..\Modulos\Inventario\Model\schInventarioServer_Intf.pas"/>
|
||||
<DCCReference Include="..\Modulos\Inventario\Servidor\srvInventario_Impl.pas">
|
||||
<Form>srvInventario</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Obras\Model\schObrasClient_Intf.pas"/>
|
||||
<DCCReference Include="..\Modulos\Obras\Model\schObrasServer_Intf.pas"/>
|
||||
<DCCReference Include="..\Modulos\Obras\Model\uBizObrasServer.pas"/>
|
||||
<DCCReference Include="..\Modulos\Obras\Servidor\srvObras_Impl.pas">
|
||||
<Form>srvObras</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<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\uBizPedidosProveedorServer.pas"/>
|
||||
<DCCReference Include="..\Modulos\Pedidos a proveedor\Reports\uRptPedidosProveedor_Server.pas">
|
||||
<Form>RptPedidosProveedor</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Pedidos a proveedor\Reports\uRptWordPedidoProveedor.pas">
|
||||
<Form>RptWordPedidoProveedor</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Pedidos a proveedor\Servidor\srvPedidosProveedor_Impl.pas">
|
||||
<Form>srvPedidosProveedor</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<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\uBizPedidosClienteServer.pas"/>
|
||||
<DCCReference Include="..\Modulos\Pedidos de cliente\Reports\uRptPedidosCliente_Server.pas">
|
||||
<Form>RptPedidosCliente</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Pedidos de cliente\Servidor\srvPedidosCliente_Impl.pas">
|
||||
<Form>srvPedidosCliente</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<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\uBizPresupuestosClienteServer.pas"/>
|
||||
<DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptPresupuestosCliente_Server.pas">
|
||||
<Form>RptPresupuestosCliente</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptWordCertificadoTrabajo_Server.pas">
|
||||
<Form>RptWordCertificadoTrabajo</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptWordPresupuestoCliente.pas">
|
||||
<Form>RptWordPresupuestoCliente</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Presupuestos de cliente\Servidor\srvPresupuestosCliente_Impl.pas">
|
||||
<Form>srvPresupuestosCliente</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<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\Reports\uRptRecibosCliente_Server.pas">
|
||||
<Form>RptRecibosCliente</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\Servidor\srvRecibosCliente_Impl.pas">
|
||||
<Form>srvRecibosCliente</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<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\Reports\uRptRecibosProveedor_Server.pas">
|
||||
<Form>RptRecibosProveedor</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Recibos de proveedor\Servidor\srvRecibosProveedor_Impl.pas">
|
||||
<Form>srvRecibosProveedor</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Referencias\Model\schReferenciasClient_Intf.pas"/>
|
||||
<DCCReference Include="..\Modulos\Referencias\Model\schReferenciasServer_Intf.pas"/>
|
||||
<DCCReference Include="..\Modulos\Referencias\Servidor\srvReferencias_Impl.pas">
|
||||
<Form>srvReferencias</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Registro de correos\Servidor\srvRegistroCorreos_Impl.pas">
|
||||
<Form>srvRegistroCorreos</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<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\uBizRemesasClienteServer.pas"/>
|
||||
<DCCReference Include="..\Modulos\Remesas de cliente\Reports\uRptRemesasCliente_Server.pas">
|
||||
<Form>RptRemesasCliente</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Remesas de cliente\Servidor\srvRemesasCliente_Impl.pas">
|
||||
<Form>srvRemesasCliente</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<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\uBizRemesasProveedorServer.pas"/>
|
||||
<DCCReference Include="..\Modulos\Remesas de proveedor\Reports\uRptRemesasProveedor_Server.pas">
|
||||
<Form>RptRemesasProveedor</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Remesas de proveedor\Servidor\srvRemesasProveedor_Impl.pas">
|
||||
<Form>srvRemesasProveedor</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Tienda web\Model\schTiendaWebClient_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\uBizOscCustomerServer.pas"/>
|
||||
<DCCReference Include="..\Modulos\Tienda web\Model\uBizOscManufacturerServer.pas"/>
|
||||
<DCCReference Include="..\Modulos\Tienda web\Model\uBizOscOrderServer.pas"/>
|
||||
<DCCReference Include="..\Modulos\Tienda web\Model\uBizOscProductServer.pas"/>
|
||||
<DCCReference Include="..\Modulos\Tienda web\Model\uBizTiendaWebServer.pas"/>
|
||||
<DCCReference Include="..\Modulos\Tienda web\Servidor\srvTiendaWeb_Impl.pas">
|
||||
<Form>srvTiendaWeb</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<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\Servidor\srvTiposIVA_Impl.pas">
|
||||
<Form>srvTiposIVA</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<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\Servidor\srvUnidadesMedida_Impl.pas">
|
||||
<Form>srvUnidadesMedida</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Servicios\FactuGES_Intf.pas"/>
|
||||
<DCCReference Include="..\Servicios\FactuGES_Invk.pas"/>
|
||||
<DCCReference Include="Configuracion\srvConfiguracion_Impl.pas">
|
||||
<Form>srvConfiguracion</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="Configuracion\uConexionBD.pas">
|
||||
<Form>frConexionBD</Form>
|
||||
<DesignClass>TFrame</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="Configuracion\uConexionOSC.pas">
|
||||
<Form>frConexionOSC</Form>
|
||||
<DesignClass>TFrame</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="Configuracion\uConfGeneral.pas">
|
||||
<Form>frConfGeneral</Form>
|
||||
<DesignClass>TFrame</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="Configuracion\uConfiguracion.pas">
|
||||
<Form>fConfiguracion</Form>
|
||||
<DesignClass>TForm</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="Configuracion\uFrameConfiguracion.pas">
|
||||
<Form>FrameConfiguracion</Form>
|
||||
<DesignClass>TFrame</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="srvLogin_Impl.pas">
|
||||
<Form>srvLogin</Form>
|
||||
<DesignClass>TDARemoteService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="uAcercaDe.pas">
|
||||
<Form>fAcercaDe</Form>
|
||||
</DCCReference>
|
||||
<DCCReference Include="uDataModuleServer.pas">
|
||||
<Form>dmServer</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="uServerMainForm.pas">
|
||||
<Form>fServerForm</Form>
|
||||
</DCCReference>
|
||||
<DCCReference Include="Utiles\AHWord97.pas"/>
|
||||
<DCCReference Include="Utiles\MidasSpeedFix.pas"/>
|
||||
<DCCReference Include="Utiles\uBusinessUtils.pas"/>
|
||||
<DCCReference Include="Utiles\uDatabaseUtils.pas"/>
|
||||
<DCCReference Include="Utiles\uReferenciasUtils.pas"/>
|
||||
<DCCReference Include="Utiles\uRestriccionesUsuarioUtils.pas"/>
|
||||
<DCCReference Include="Utiles\uSchemaUtilsServer.pas"/>
|
||||
<DCCReference Include="Utiles\uServerAppUtils.pas"/>
|
||||
<DCCReference Include="Utiles\uSesionesUtils.pas"/>
|
||||
<DCCReference Include="Utiles\uTiendaWebUtils.pas"/>
|
||||
</ItemGroup>
|
||||
<PropertyGroup>
|
||||
<ProjectGuid>{ebdcd25d-40d7-4146-91ec-a0ea4aa1dcd1}</ProjectGuid>
|
||||
<MainSource>FactuGES_Server.dpr</MainSource>
|
||||
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
|
||||
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
|
||||
<DCC_DCCCompiler>DCC32</DCC_DCCCompiler>
|
||||
<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>
|
||||
</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_ExeOutput>..\..\Output\Release\Servidor</DCC_ExeOutput>
|
||||
<DCC_Define>RELEASE</DCC_Define>
|
||||
</PropertyGroup>
|
||||
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
|
||||
<Version>7.0</Version>
|
||||
<DCC_MapFile>3</DCC_MapFile>
|
||||
<DCC_ExeOutput>..\..\Output\Debug\Servidor</DCC_ExeOutput>
|
||||
<DCC_Define>DEBUG;</DCC_Define>
|
||||
<DCC_GenerateStackFrames>True</DCC_GenerateStackFrames>
|
||||
<DCC_DebugInfoInExe>True</DCC_DebugInfoInExe>
|
||||
<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_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_IncludePath>C:\jcl\lib\d11\debug;C:\JCL\lib\d11\debug;$(BDS)\lib\Debug;$(BDS)\Lib\Debug\Indy10</DCC_IncludePath>
|
||||
</PropertyGroup>
|
||||
<ProjectExtensions>
|
||||
<Borland.Personality>Delphi.Personality</Borland.Personality>
|
||||
<Borland.ProjectType />
|
||||
<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">1</VersionInfo><VersionInfo Name="Release">6</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.1.6.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.1.6.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys><VersionInfoKeys Name="CompileDate">jueves, 31 de marzo de 2011 19:23</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><Source><Source Name="MainSource">FactuGES_Server.dpr</Source></Source></Delphi.Personality><ModelSupport>False</ModelSupport></BorlandProject></BorlandProject>
|
||||
</ProjectExtensions>
|
||||
<Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
|
||||
<ItemGroup>
|
||||
<DelphiCompile Include="FactuGES_Server.dpr">
|
||||
<MainSource>MainSource</MainSource>
|
||||
</DelphiCompile>
|
||||
<DCCReference Include="..\ApplicationBase\Empresas\Model\schEmpresasClient_Intf.pas" />
|
||||
<DCCReference Include="..\ApplicationBase\Empresas\Model\schEmpresasServer_Intf.pas" />
|
||||
<DCCReference Include="..\ApplicationBase\Empresas\Model\uBizEmpresasServer.pas" />
|
||||
<DCCReference Include="..\ApplicationBase\Empresas\Servidor\srvEmpresas_Impl.pas">
|
||||
<Form>srvEmpresas</Form>
|
||||
<DesignClass>TDARemoteService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\ApplicationBase\ProvinciasPoblaciones\Servidor\srvProvinciasPoblaciones_Impl.pas">
|
||||
<Form>srvProvinciasPoblaciones_Impl</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\ApplicationBase\Usuarios\Model\schUsuariosClient_Intf.pas" />
|
||||
<DCCReference Include="..\ApplicationBase\Usuarios\Model\schUsuariosServer_Intf.pas" />
|
||||
<DCCReference Include="..\ApplicationBase\Usuarios\Servidor\srvUsuarios_Impl.pas">
|
||||
<Form>srvUsuarios</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Base\schBase_Intf.pas" />
|
||||
<DCCReference Include="..\Base\Utiles\uSistemaFunc.pas" />
|
||||
<DCCReference Include="..\Base\Utiles\uStringsUtils.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\uBizAlbaranClienteServer.pas" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de cliente\Reports\uRptAlbaranesCliente_Server.pas">
|
||||
<Form>RptAlbaranesCliente</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Albaranes de cliente\Reports\uRptWordAlbaranCliente.pas">
|
||||
<Form>RptWordAlbaranCliente</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Albaranes de cliente\Servidor\srvAlbaranesCliente_Impl.pas">
|
||||
<Form>srvAlbaranesCliente</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<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\uBizAlbaranProveedorServer.PAS" />
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\Reports\uRptAlbaranesProveedor_Server.pas">
|
||||
<Form>RptAlbaranesProveedor</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\Reports\uRptWordAlbaranProveedor.pas">
|
||||
<Form>RptWordAlbaranProveedor</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Albaranes de proveedor\Servidor\srvAlbaranesProveedor_Impl.pas">
|
||||
<Form>srvAlbaranesProveedor</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Almacenes\Model\schAlmacenesClient_Intf.pas" />
|
||||
<DCCReference Include="..\Modulos\Almacenes\Model\schAlmacenesServer_Intf.pas" />
|
||||
<DCCReference Include="..\Modulos\Almacenes\Servidor\srvAlmacenes_Impl.pas">
|
||||
<Form>srvAlmacenes</Form>
|
||||
<DesignClass>TDARemoteService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Articulos\Model\schArticulosClient_Intf.pas" />
|
||||
<DCCReference Include="..\Modulos\Articulos\Model\schArticulosServer_Intf.pas" />
|
||||
<DCCReference Include="..\Modulos\Articulos\Model\uBizArticulosServer.pas" />
|
||||
<DCCReference Include="..\Modulos\Articulos\Servidor\srvArticulos_Impl.pas">
|
||||
<Form>srvArticulos</Form>
|
||||
<DesignClass>TDARemoteService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Comisiones\Model\schComisionesClient_Intf.pas" />
|
||||
<DCCReference Include="..\Modulos\Comisiones\Model\schComisionesServer_Intf.pas" />
|
||||
<DCCReference Include="..\Modulos\Comisiones\Model\uBizComisionesServer.pas" />
|
||||
<DCCReference Include="..\Modulos\Comisiones\Reports\uRptComisiones_Server.pas">
|
||||
<Form>RptComisiones</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Comisiones\Servidor\srvComisiones_Impl.pas">
|
||||
<Form>srvComisiones</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Contactos\Model\schContactosClient_Intf.pas" />
|
||||
<DCCReference Include="..\Modulos\Contactos\Model\schContactosServer_Intf.pas" />
|
||||
<DCCReference Include="..\Modulos\Contactos\Model\uBizAgentesServer.pas" />
|
||||
<DCCReference Include="..\Modulos\Contactos\Model\uBizClientesServer.pas" />
|
||||
<DCCReference Include="..\Modulos\Contactos\Model\uBizContactosServer.pas" />
|
||||
<DCCReference Include="..\Modulos\Contactos\Model\uBizEmpleadosServer.pas" />
|
||||
<DCCReference Include="..\Modulos\Contactos\Model\uBizProveedoresServer.pas" />
|
||||
<DCCReference Include="..\Modulos\Contactos\Reports\uRptEtiquetasContacto_Server.pas">
|
||||
<Form>RptEtiquetasContacto</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Contactos\Reports\uRptFichasEmpleado_Server.pas">
|
||||
<Form>RptFichasEmpleado</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Contactos\Servidor\srvContactos_Impl.pas">
|
||||
<Form>srvContactos</Form>
|
||||
<DesignClass>TDARemoteService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Fabricantes\Model\schFabricantesClient_Intf.pas" />
|
||||
<DCCReference Include="..\Modulos\Fabricantes\Model\schFabricantesServer_Intf.pas" />
|
||||
<DCCReference Include="..\Modulos\Fabricantes\Servidor\srvFabricantes_Impl.pas">
|
||||
<Form>srvFabricantes</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<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\uBizFacturasClienteServer.pas" />
|
||||
<DCCReference Include="..\Modulos\Facturas de cliente\Reports\uRptFacturasCliente_Server.pas">
|
||||
<Form>RptFacturasCliente</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Facturas de cliente\Reports\uRptWordFacturaCliente.pas">
|
||||
<Form>RptWordFacturaCliente</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Facturas de cliente\Servidor\srvFacturasCliente_Impl.pas">
|
||||
<Form>srvFacturasCliente</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<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\uBizFacturasProveedorServer.pas" />
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\Reports\uRptFacturasProveedor_Server.pas">
|
||||
<Form>RptFacturasProveedor</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Facturas de proveedor\Servidor\srvFacturasProveedor_Impl.pas">
|
||||
<Form>srvFacturasProveedor</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Familias\Model\schFamiliasClient_Intf.pas" />
|
||||
<DCCReference Include="..\Modulos\Familias\Model\schFamiliasServer_Intf.pas" />
|
||||
<DCCReference Include="..\Modulos\Familias\Servidor\srvFamilias_Impl.pas">
|
||||
<Form>srvFamilias</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<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\Servidor\srvFormasPago_Impl.pas">
|
||||
<Form>srvFormasPago</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Gestion de documentos\Servidor\srvGestorDocumentos_Impl.pas">
|
||||
<Form>srvGestorDocumentos</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Gestor de informes\Servidor\srvGestorInformes_Impl.pas">
|
||||
<Form>srvGestorInformes</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<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\Servidor\srvHistoricoMovimientos_Impl.pas">
|
||||
<Form>srvHistoricoMovimientos</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Impresiones\Model\schImpresionesClient_Intf.pas" />
|
||||
<DCCReference Include="..\Modulos\Impresiones\Model\schImpresionesServer_Intf.pas" />
|
||||
<DCCReference Include="..\Modulos\Impresiones\Servidor\srvImpresiones_Impl.pas">
|
||||
<Form>srvImpresiones</Form>
|
||||
<DesignClass>TDARemoteService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Informe margen por articulo\Servidor\srvInfMargenArticulo_Impl.pas">
|
||||
<Form>srvInfMargenArticulo</Form>
|
||||
<DesignClass>TDARemoteService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Informe ventas por articulo\Servidor\srvInfVentasArticulo_Impl.pas">
|
||||
<Form>srvInfVentasArticulo</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Informes base\Model\schInformesClient_Intf.pas" />
|
||||
<DCCReference Include="..\Modulos\Informes base\Model\schInformesServer_Intf.pas" />
|
||||
<DCCReference Include="..\Modulos\Informes base\Servidor\srvInformes_Impl.pas">
|
||||
<Form>srvInformes</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Inventario\Model\schInventarioClient_Intf.pas" />
|
||||
<DCCReference Include="..\Modulos\Inventario\Model\schInventarioServer_Intf.pas" />
|
||||
<DCCReference Include="..\Modulos\Inventario\Servidor\srvInventario_Impl.pas">
|
||||
<Form>srvInventario</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Obras\Model\schObrasClient_Intf.pas" />
|
||||
<DCCReference Include="..\Modulos\Obras\Model\schObrasServer_Intf.pas" />
|
||||
<DCCReference Include="..\Modulos\Obras\Model\uBizObrasServer.pas" />
|
||||
<DCCReference Include="..\Modulos\Obras\Servidor\srvObras_Impl.pas">
|
||||
<Form>srvObras</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<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\uBizPedidosProveedorServer.pas" />
|
||||
<DCCReference Include="..\Modulos\Pedidos a proveedor\Reports\uRptPedidosProveedor_Server.pas">
|
||||
<Form>RptPedidosProveedor</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Pedidos a proveedor\Reports\uRptWordPedidoProveedor.pas">
|
||||
<Form>RptWordPedidoProveedor</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Pedidos a proveedor\Servidor\srvPedidosProveedor_Impl.pas">
|
||||
<Form>srvPedidosProveedor</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<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\uBizPedidosClienteServer.pas" />
|
||||
<DCCReference Include="..\Modulos\Pedidos de cliente\Reports\uRptPedidosCliente_Server.pas">
|
||||
<Form>RptPedidosCliente</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Pedidos de cliente\Servidor\srvPedidosCliente_Impl.pas">
|
||||
<Form>srvPedidosCliente</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<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\uBizPresupuestosClienteServer.pas" />
|
||||
<DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptPresupuestosCliente_Server.pas">
|
||||
<Form>RptPresupuestosCliente</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptWordCertificadoTrabajo_Server.pas">
|
||||
<Form>RptWordCertificadoTrabajo</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Presupuestos de cliente\Reports\uRptWordPresupuestoCliente.pas">
|
||||
<Form>RptWordPresupuestoCliente</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Presupuestos de cliente\Servidor\srvPresupuestosCliente_Impl.pas">
|
||||
<Form>srvPresupuestosCliente</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<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\Reports\uRptRecibosCliente_Server.pas">
|
||||
<Form>RptRecibosCliente</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Recibos de cliente\Servidor\srvRecibosCliente_Impl.pas">
|
||||
<Form>srvRecibosCliente</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<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\Reports\uRptRecibosProveedor_Server.pas">
|
||||
<Form>RptRecibosProveedor</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Recibos de proveedor\Servidor\srvRecibosProveedor_Impl.pas">
|
||||
<Form>srvRecibosProveedor</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Referencias\Model\schReferenciasClient_Intf.pas" />
|
||||
<DCCReference Include="..\Modulos\Referencias\Model\schReferenciasServer_Intf.pas" />
|
||||
<DCCReference Include="..\Modulos\Referencias\Servidor\srvReferencias_Impl.pas">
|
||||
<Form>srvReferencias</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Registro de correos\Servidor\srvRegistroCorreos_Impl.pas">
|
||||
<Form>srvRegistroCorreos</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<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\uBizRemesasClienteServer.pas" />
|
||||
<DCCReference Include="..\Modulos\Remesas de cliente\Reports\uRptRemesasCliente_Server.pas">
|
||||
<Form>RptRemesasCliente</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Remesas de cliente\Servidor\srvRemesasCliente_Impl.pas">
|
||||
<Form>srvRemesasCliente</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<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\uBizRemesasProveedorServer.pas" />
|
||||
<DCCReference Include="..\Modulos\Remesas de proveedor\Reports\uRptRemesasProveedor_Server.pas">
|
||||
<Form>RptRemesasProveedor</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Remesas de proveedor\Servidor\srvRemesasProveedor_Impl.pas">
|
||||
<Form>srvRemesasProveedor</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Modulos\Tienda web\Model\schTiendaWebClient_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\uBizOscCustomerServer.pas" />
|
||||
<DCCReference Include="..\Modulos\Tienda web\Model\uBizOscManufacturerServer.pas" />
|
||||
<DCCReference Include="..\Modulos\Tienda web\Model\uBizOscOrderServer.pas" />
|
||||
<DCCReference Include="..\Modulos\Tienda web\Model\uBizOscProductServer.pas" />
|
||||
<DCCReference Include="..\Modulos\Tienda web\Model\uBizTiendaWebServer.pas" />
|
||||
<DCCReference Include="..\Modulos\Tienda web\Servidor\srvTiendaWeb_Impl.pas">
|
||||
<Form>srvTiendaWeb</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<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\Servidor\srvTiposIVA_Impl.pas">
|
||||
<Form>srvTiposIVA</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<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\Servidor\srvUnidadesMedida_Impl.pas">
|
||||
<Form>srvUnidadesMedida</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="..\Servicios\FactuGES_Intf.pas" />
|
||||
<DCCReference Include="..\Servicios\FactuGES_Invk.pas" />
|
||||
<DCCReference Include="Configuracion\srvConfiguracion_Impl.pas">
|
||||
<Form>srvConfiguracion</Form>
|
||||
<DesignClass>TDataAbstractService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="Configuracion\uConexionBD.pas">
|
||||
<Form>frConexionBD</Form>
|
||||
<DesignClass>TFrame</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="Configuracion\uConexionOSC.pas">
|
||||
<Form>frConexionOSC</Form>
|
||||
<DesignClass>TFrame</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="Configuracion\uConfGeneral.pas">
|
||||
<Form>frConfGeneral</Form>
|
||||
<DesignClass>TFrame</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="Configuracion\uConfiguracion.pas">
|
||||
<Form>fConfiguracion</Form>
|
||||
<DesignClass>TForm</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="Configuracion\uFrameConfiguracion.pas">
|
||||
<Form>FrameConfiguracion</Form>
|
||||
<DesignClass>TFrame</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="srvLogin_Impl.pas">
|
||||
<Form>srvLogin</Form>
|
||||
<DesignClass>TDARemoteService</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="uAcercaDe.pas">
|
||||
<Form>fAcercaDe</Form>
|
||||
</DCCReference>
|
||||
<DCCReference Include="uDataModuleServer.pas">
|
||||
<Form>dmServer</Form>
|
||||
<DesignClass>TDataModule</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="uServerMainForm.pas">
|
||||
<Form>fServerForm</Form>
|
||||
</DCCReference>
|
||||
<DCCReference Include="Utiles\AHWord97.pas" />
|
||||
<DCCReference Include="Utiles\MidasSpeedFix.pas" />
|
||||
<DCCReference Include="Utiles\uBusinessUtils.pas" />
|
||||
<DCCReference Include="Utiles\uDatabaseUtils.pas" />
|
||||
<DCCReference Include="Utiles\uReferenciasUtils.pas" />
|
||||
<DCCReference Include="Utiles\uRestriccionesUsuarioUtils.pas" />
|
||||
<DCCReference Include="Utiles\uSchemaUtilsServer.pas" />
|
||||
<DCCReference Include="Utiles\uServerAppUtils.pas" />
|
||||
<DCCReference Include="Utiles\uSesionesUtils.pas" />
|
||||
<DCCReference Include="Utiles\uTiendaWebUtils.pas" />
|
||||
</ItemGroup>
|
||||
</Project>
|
||||
<!-- EurekaLog First Line
|
||||
[Exception Log]
|
||||
|
||||
Reference in New Issue
Block a user