Se pone parche para que el usuario Carlos no vea todas las empresas, se arregla contactos getNextId para que no duplique registros visualmente, y se quitan las referencias, de articulos y contactos en general, además de repasar los informes de la empresa 2
git-svn-id: https://192.168.0.254/svn/Proyectos.LuisLeon_FactuGES2/trunk@80 b2cfbe5a-eba1-4a0c-8b32-7feea0a119f2
This commit is contained in:
parent
3c83be10a3
commit
8e46f632df
BIN
Build/Build.fbl6
BIN
Build/Build.fbl6
Binary file not shown.
@ -52,11 +52,7 @@ INSERT INTO REFERENCIAS (ID, CODIGO, VALOR, ID_EMPRESA, DESCRIPCION) VALUES (23,
|
||||
INSERT INTO REFERENCIAS (ID, CODIGO, VALOR, ID_EMPRESA, DESCRIPCION) VALUES (24, 'REF_REMESAS_PROVEEDOR', 'NRP/0001', 2, 'Ref. remesas de proveedor');
|
||||
INSERT INTO REFERENCIAS (ID, CODIGO, VALOR, ID_EMPRESA, DESCRIPCION) VALUES (25, 'REF_ABONOS_CLIENTE', 'NFAC/0001', 2, 'Ref. abonos de cliente');
|
||||
INSERT INTO REFERENCIAS (ID, CODIGO, VALOR, ID_EMPRESA, DESCRIPCION) VALUES (26, 'REF_ABONOS_PROVEEDOR', 'NFAP/0001', 2, 'Ref. abonos de proveedor');
|
||||
INSERT INTO REFERENCIAS (ID, CODIGO, VALOR, ID_EMPRESA, DESCRIPCION) VALUES (27, 'REF_CLIENTES', '0000000001', NULL, 'Ref. clientes');
|
||||
INSERT INTO REFERENCIAS (ID, CODIGO, VALOR, ID_EMPRESA, DESCRIPCION) VALUES (28, 'REF_PROVEEDORES', '0000000001', NULL, 'Ref. proveedores');
|
||||
INSERT INTO REFERENCIAS (ID, CODIGO, VALOR, ID_EMPRESA, DESCRIPCION) VALUES (29, 'REF_AGENTES', '00001', NULL, 'Ref. agentes');
|
||||
INSERT INTO REFERENCIAS (ID, CODIGO, VALOR, ID_EMPRESA, DESCRIPCION) VALUES (30, 'REF_ARTICULOS', '1', NULL, 'Ref. artículos');
|
||||
SET GENERATOR GEN_REFERENCIAS_ID TO 31;
|
||||
SET GENERATOR GEN_REFERENCIAS_ID TO 27;
|
||||
COMMIT WORK;
|
||||
|
||||
INSERT INTO TIPOS_IVA (ID, REFERENCIA, DESCRIPCION, IVA, RE) VALUES (2, 'IVA16', 'IVA16', 16, 4);
|
||||
|
||||
@ -583,6 +583,7 @@ inherited frViewEmpresa: TfrViewEmpresa
|
||||
end
|
||||
object dxLayoutControl1Group13: TdxLayoutGroup
|
||||
Caption = 'Datos cat'#225'logo art'#237'culos'
|
||||
Visible = False
|
||||
LayoutDirection = ldHorizontal
|
||||
object dxLayoutControl1Item18: TdxLayoutItem
|
||||
Caption = 'Margen de venta:'
|
||||
|
||||
@ -375,6 +375,13 @@ var
|
||||
AEmpresas: IBizEmpresa;
|
||||
AEmpresasController: IEmpresasController;
|
||||
begin
|
||||
//PARCHE
|
||||
if (AppFactuGES.UsuarioActivo.ID = 2) then
|
||||
begin
|
||||
CambiarEmpresa(1);
|
||||
exit;
|
||||
end;
|
||||
|
||||
JsDialog := TJSDialog.Create(nil);
|
||||
try
|
||||
JsDialog.Content.Add('Selección de empresa');
|
||||
|
||||
@ -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">1</VersionInfo><VersionInfo Name="MinorVer">8</VersionInfo><VersionInfo Name="Release">3</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName">Rodax Software S.L.</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.8.3.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">1.8.3.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">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">Rodax Software S.L.</VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">4.0.0.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.0.0.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>
|
||||
|
||||
@ -1,7 +1,7 @@
|
||||
MAINICON ICON "C:\Codigo\Resources\Iconos\Factuges.ico"
|
||||
1 VERSIONINFO
|
||||
FILEVERSION 1,8,3,0
|
||||
PRODUCTVERSION 1,8,3,0
|
||||
FILEVERSION 4,0,0,0
|
||||
PRODUCTVERSION 4,0,0,0
|
||||
FILEFLAGSMASK 0x3FL
|
||||
FILEFLAGS 0x00L
|
||||
FILEOS 0x40004L
|
||||
@ -13,10 +13,10 @@ BEGIN
|
||||
BLOCK "0C0A04E4"
|
||||
BEGIN
|
||||
VALUE "CompanyName", "Rodax Software S.L.\0"
|
||||
VALUE "FileVersion", "1.8.3.0\0"
|
||||
VALUE "FileVersion", "4.0.0.0\0"
|
||||
VALUE "InternalName", "FactuGES\0"
|
||||
VALUE "ProductName", "FactuGES\0"
|
||||
VALUE "ProductVersion", "1.8.3.0\0"
|
||||
VALUE "ProductVersion", "4.0.0.0\0"
|
||||
END
|
||||
END
|
||||
BLOCK "VarFileInfo"
|
||||
|
||||
Binary file not shown.
@ -28,7 +28,8 @@ begin
|
||||
for ItemIndex := 0 to (AMenuItem.Count - 1) do
|
||||
begin
|
||||
if ((not AMenuItem[ItemIndex].IsLine) // que no sea una línea separadora
|
||||
and (AMenuItem[ItemIndex].Count = 0)) // y que no sea el padre de un submenú
|
||||
and (AMenuItem[ItemIndex].Count = 0) // y que no sea el padre de un submenú
|
||||
and AMenuItem[ItemIndex].Visible) // y que sea una operación visible
|
||||
then
|
||||
with TTBXLink.Create(Application) do
|
||||
begin
|
||||
|
||||
@ -52,7 +52,7 @@ begin
|
||||
LoadModule('Inventario_plugin.bpl');
|
||||
LoadModule('HistoricoMovimientos_plugin.bpl');
|
||||
|
||||
LoadModule('GestorInformes_plugin.bpl');
|
||||
// LoadModule('GestorInformes_plugin.bpl');
|
||||
LoadModule('Comisiones_plugin.bpl');
|
||||
|
||||
LoadModule('TiendaWeb_plugin.bpl');
|
||||
|
||||
@ -118,8 +118,10 @@ begin
|
||||
// Guardar la lista de secciones (Ventas, Compras, etc...)
|
||||
for ASeccionCount := 0 to MainMenuController.MainMenu.Items.Count - 1 do
|
||||
begin
|
||||
if not EsUnModulo(MainMenuController.MainMenu.Items[ASeccionCount]) then
|
||||
if not EsUnModulo(MainMenuController.MainMenu.Items[ASeccionCount])
|
||||
or not MainMenuController.MainMenu.Items[ASeccionCount].Visible then
|
||||
Continue;
|
||||
|
||||
AListaSecciones.AddObject(StringReplace(MainMenuController.MainMenu.Items[ASeccionCount].Caption, '&', '', []),
|
||||
MainMenuController.MainMenu.Items[ASeccionCount])
|
||||
end;
|
||||
@ -129,6 +131,46 @@ begin
|
||||
try
|
||||
AEmpresas.DataTable.Active := True;
|
||||
|
||||
|
||||
//PARCHE
|
||||
if (AppFactuGES.UsuarioActivo.ID = 2) then
|
||||
begin
|
||||
// Buscar la página si existe
|
||||
AIndex := EncontrarPagina(FNavigationPane, AEmpresas.NOMBRE);
|
||||
if AIndex > -1 then
|
||||
ASeccionPadre := EncontrarSeccionPadre(FNavigationPane.NavPages[AIndex])
|
||||
else begin
|
||||
// Crear la página de la empresa
|
||||
AIndex := CrearPagina(FNavigationPane, AEmpresas.NOMBRE, nil, -1);
|
||||
|
||||
ASeccionPadre := CrearSeccion(FNavigationPane.NavPages[AIndex]);
|
||||
ASeccionPadre.Align := alClient;
|
||||
ASeccionPadre.AutoScroll := True;
|
||||
end;
|
||||
FNavigationPane.NavPages[AIndex].Tag := AEmpresas.ID;
|
||||
|
||||
|
||||
// Crear secciones
|
||||
for ASeccionCount := 0 to AListaSecciones.Count - 1 do
|
||||
begin
|
||||
ASeccion := CrearSeccion(ASeccionPadre);
|
||||
with ASeccion do
|
||||
begin
|
||||
Top := 100 * AEmpresasCount;
|
||||
Align := alTop;
|
||||
AutoScroll := False;
|
||||
end;
|
||||
|
||||
ADivisor := CrearDivisor(ASeccion, AListaSecciones[ASeccionCount]);
|
||||
|
||||
PopulateNavPagePane(ASeccion, TMenuItem(AListaSecciones.Objects[ASeccionCount]),
|
||||
FLargeImages, dmBase.StyleManager);
|
||||
ASeccion.Height := ASeccion.Height + ADivisor.Height;
|
||||
end;
|
||||
end
|
||||
else
|
||||
//FIN PARCHE
|
||||
|
||||
{$IFDEF MULTIEMPRESA}
|
||||
while not AEmpresas.DataTable.EOF do
|
||||
begin
|
||||
|
||||
@ -318,6 +318,7 @@ object fPantallaPrincipal: TfPantallaPrincipal
|
||||
Category = 'Empresa'
|
||||
Caption = 'A'#241'adir empresa'
|
||||
OnExecute = actAnadirEmpresaExecute
|
||||
OnUpdate = actAnadirEmpresaUpdate
|
||||
end
|
||||
end
|
||||
object ModulesSmallImageList: TPngImageList
|
||||
@ -671,6 +672,7 @@ object fPantallaPrincipal: TfPantallaPrincipal
|
||||
object Informes1: TMenuItem
|
||||
Tag = 6000
|
||||
Action = actMenuInformes
|
||||
Visible = False
|
||||
end
|
||||
end
|
||||
object JvXPMenuItemPainter1: TJvXPMenuItemPainter
|
||||
|
||||
@ -121,6 +121,7 @@ type
|
||||
procedure Listadeempresas1_OLDClick(Sender: TObject);
|
||||
procedure actInformacionEmpresaExecute(Sender: TObject);
|
||||
procedure actAnadirEmpresaExecute(Sender: TObject);
|
||||
procedure actAnadirEmpresaUpdate(Sender: TObject);
|
||||
private
|
||||
FContenido : TCustomEditor;
|
||||
procedure ShowEmbedded(AEditor : ICustomEditor);
|
||||
@ -541,6 +542,12 @@ begin
|
||||
ShowMessage('Empresa dada de alta, cierre la aplicación y vuelva a abrirla, para poder acceder a ella');
|
||||
end;
|
||||
|
||||
procedure TfPantallaPrincipal.actAnadirEmpresaUpdate(Sender: TObject);
|
||||
begin
|
||||
//PARCHE
|
||||
(Sender as TAction).Enabled := (AppFactuGES.UsuarioActivo.ID <> 2)
|
||||
end;
|
||||
|
||||
procedure TfPantallaPrincipal.actCambiarPassExecute(Sender: TObject);
|
||||
begin
|
||||
AppFactuGES.UsuariosController._ShowChangePassword;
|
||||
|
||||
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
50
Source/Informes/2/InfComisiones.fr3
Normal file
50
Source/Informes/2/InfComisiones.fr3
Normal file
@ -0,0 +1,50 @@
|
||||
<?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.OutlineWidth="180" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37871,9953986921" ReportOptions.Description.Text="" ReportOptions.LastChange="40445,4376351389" ReportOptions.VersionBuild="1" ReportOptions.VersionMajor="12" ReportOptions.VersionMinor="13" ReportOptions.VersionRelease="1" ScriptLanguage="PascalScript" ScriptText.Text="procedure DatosEmpresaOnBeforePrint(Sender: TfrxComponent); var Cadena: String; begin DatosEmpresa.Lines.Clear; DatosEmpresa.Lines.Add(<frxDBCabecera."RAZON_SOCIAL">); DatosEmpresa.Lines.Add(<frxDBCabecera."CALLE_EMPRESA">); Cadena := ''; if (<frxDBCabecera."TELEFONO_1"> <> '') then Cadena := 'TLF: ' + <frxDBCabecera."TELEFONO_1">; if (<frxDBCabecera."FAX"> <> '') then Cadena := Cadena + ' FAX: ' + <frxDBCabecera."FAX">; DatosEmpresa.Lines.Add(Cadena); Cadena := ''; if (<frxDBCabecera."CODIGO_POSTAL_EMPRESA"> <> '') then Cadena := <frxDBCabecera."CODIGO_POSTAL_EMPRESA">; if (<frxDBCabecera."POBLACION_EMPRESA"> <> '') then Cadena := Cadena + ' ' + <frxDBCabecera."POBLACION_EMPRESA">; if (<frxDBCabecera."PROVINCIA_EMPRESA"> <> '') then Cadena := Cadena + ' - ' + <frxDBCabecera."PROVINCIA_EMPRESA">; DatosEmpresa.Lines.Add(Cadena); end; procedure Memo26OnBeforePrint(Sender: TfrxComponent); begin if (<FechaIni> <> '') then Memo31.Visible := True else Memo31.Visible := False; end; BEGIN END." ShowProgress="False" StoreInDFM="False" PropData="044C65667403910003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D2266727844424361626563657261220000095661726961626C657301010C0F000000204E616D653D22204665636861732200010C10000000204E616D653D224665636861496E692200010C10000000204E616D653D22466563686146696E220000055374796C6501010C85000000204E616D653D22436F6E636570746F206E6F726D616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22302200010C87000000204E616D653D22436F6E636570746F20737562746F74616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22312200010C97000000204E616D653D22436162656365726120646520636F6C756D6E612220436F6C6F723D2231353739303332302220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D223122204672616D652E5479703D2231352200010C85000000204E616D653D22436F6E636570746F20746974756C6F2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D2231220000">
|
||||
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
|
||||
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
|
||||
<TfrxPageHeader Name="Band2" Height="115,08652142" Left="0" Top="16" Width="1046,92981">
|
||||
<TfrxPictureView Name="Picture1" Left="7,77953" Top="20,22047" Width="160,03598" Height="80,03154" OnBeforePrint="Picture1OnBeforePrint" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" HightQuality="False"/>
|
||||
<TfrxMemoView Name="DatosEmpresa" Left="171,92919" Top="20,35436" Width="221,41744" Height="80,69295" OnBeforePrint="DatosEmpresaOnBeforePrint" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
|
||||
<TfrxShapeView Name="Shape2" Left="401,07112" Top="56,69295" Width="638,74057" Height="49,35436" ShowHint="False" Color="16777215" Frame.Color="8421504" Shape="skRoundRectangle"/>
|
||||
<TfrxMemoView Name="Memo15" Left="399,93723" Top="11,33859" Width="639,43352" Height="41,57483" ShowHint="False" Font.Charset="1" Font.Color="12632256" Font.Height="-32" Font.Name="Tahoma" Font.Style="1" Frame.Color="14211288" HAlign="haRight" ParentFont="False" Text="LIQUIDACIONES DE COMISIONES"/>
|
||||
<TfrxMemoView Name="Memo7" Left="419,30736" Top="83,14966" Width="612,50433" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Página nº: [<Page#>] / [<TotalPages#>]"/>
|
||||
<TfrxMemoView Name="Memo31" Left="419,52783" Top="60,47248" Width="612,28386" Height="18,89765" OnBeforePrint="Memo26OnBeforePrint" ShowHint="False" HAlign="haRight" Text="Desde [FechaIni] hasta [FechaFin]"/>
|
||||
</TfrxPageHeader>
|
||||
<TfrxMasterData Name="MasterData1" Height="22,67718" Left="0" Top="287" Width="1046,92981" ColumnWidth="0" ColumnGap="0" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" RowCount="0" Stretched="True">
|
||||
<TfrxMemoView Name="Memo2" Left="4" Top="2" Width="64,47248" Height="18,89765" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBCabecera."FECHA"]"/>
|
||||
<TfrxMemoView Name="Memo9" Left="77,9765" Top="2" Width="63,47248" Height="18,89765" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBCabecera."REFERENCIA"]"/>
|
||||
<TfrxMemoView Name="Memo10" Left="235,80334" Top="1,88976378000001" Width="521,95292677" Height="18,89765" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBCabecera."CLIENTE"]"/>
|
||||
<TfrxMemoView Name="Memo13" Left="149,1812" Top="2" Width="81,37013" Height="18,89765" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBCabecera."SITUACION"]"/>
|
||||
<TfrxMemoView Name="Memo29" Left="767,24459" Top="1,88976378000001" Width="101,63791" Height="19,11812" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[frxDBCabecera."IMPORTE_COMISIONABLE"]"/>
|
||||
<TfrxMemoView Name="Memo19" Left="914,64626" Top="1,88976378000001" Width="120,53556" Height="19,11812" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[frxDBCabecera."IMPORTE_COMISION"]"/>
|
||||
<TfrxLineView Name="Line8" Left="72,5906" Top="0" Width="0" Height="23,81102362" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
|
||||
<TfrxLineView Name="Line5" Left="145,51181102" Top="0" Width="0" Height="23,81102362" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
|
||||
<TfrxLineView Name="Line10" Left="233,95275591" Top="0" Width="0" Height="23,81102362" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
|
||||
<TfrxLineView Name="Line4" Left="763,46456693" Top="0" Width="0" Height="23,81102362" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
|
||||
<TfrxLineView Name="Line3" Left="874,96062992" Top="0" Width="0" Height="23,81102362" ShowHint="False" Frame.Typ="1"/>
|
||||
<TfrxLineView Name="Line7" Left="1040,50393701" Top="0" Width="0" Height="23,81102362" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
|
||||
<TfrxLineView Name="Line1" Left="0,37795276" Top="0" Width="0" Height="23,81102362" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
|
||||
</TfrxMasterData>
|
||||
<TfrxGroupHeader Name="GroupHeader1" Height="75,5906" Left="0" Top="191" Width="1046,92981" Condition="frxDBCabecera."ID_COMISION_LIQUIDADA"" OutlineText="frxDBCabecera."ID_COMISION_LIQUIDADA"">
|
||||
<TfrxMemoView Name="Memo18" Left="875,07143" Top="52,91342" Width="165,92130622" Height="22,67716291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Imp. comisión "/>
|
||||
<TfrxMemoView Name="Memo27" Left="0" Top="0" Width="1040,8825" Height="52,91340291" 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=""/>
|
||||
<TfrxMemoView Name="Memo14" Left="60,25201" Top="30,23624" Width="412,18924" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="1" ParentFont="False" Text="[frxDBCabecera."AGENTE"]"/>
|
||||
<TfrxMemoView Name="Memo6" Left="174,99227" Top="3,77952999999999" Width="253,44898" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="1" ParentFont="False" Text="[frxDBCabecera."REFERENCIA_COMISION"]"/>
|
||||
<TfrxMemoView Name="Memo16" Left="525,35467" Top="3,77952999999999" Width="948,8825" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBCabecera."FECHA_COMISION"]"/>
|
||||
<TfrxMemoView Name="Memo17" Left="555,59091" Top="30,23624" Width="476,44125" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="1" ParentFont="False" Text="[frxDBCabecera."DESCRIPCION"]"/>
|
||||
<TfrxMemoView Name="Memo20" Left="11,33859" Top="3,77952999999999" Width="160,75603" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Nº liquidación de comisiones:"/>
|
||||
<TfrxMemoView Name="Memo21" Left="480,00031" Top="3,77952999999999" Width="42,45671" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Fecha:"/>
|
||||
<TfrxMemoView Name="Memo22" Left="480,00031" Top="30,23624" Width="72,69295" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Descripción:"/>
|
||||
<TfrxMemoView Name="Memo25" Left="11,33859" Top="30,23624" Width="46,01577" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Agente:"/>
|
||||
<TfrxMemoView Name="Memo23" Left="0" Top="52,91342" Width="73,32282" Height="22,67716291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Fec. factura"/>
|
||||
<TfrxMemoView Name="Memo1" Left="72,5906" Top="52,91342" Width="73,32282" Height="22,67716291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Ref. factura"/>
|
||||
<TfrxMemoView Name="Memo3" Left="145,63791" Top="52,91342" Width="88,44094" Height="22,67716291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Situación"/>
|
||||
<TfrxMemoView Name="Memo4" Left="234,03958" Top="52,91342" Width="532,91355913" Height="22,67716291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Cliente"/>
|
||||
<TfrxMemoView Name="Memo24" Left="763,46464016" Top="52,91342" Width="113,38583898" Height="22,67716291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Imp. comisionable"/>
|
||||
</TfrxGroupHeader>
|
||||
<TfrxGroupFooter Name="GroupFooter1" Height="41,57483" Left="0" Top="330" Width="1046,92981">
|
||||
<TfrxMemoView Name="Memo28" Left="0" Top="0" Width="1040,8825" 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=""/>
|
||||
<TfrxMemoView Name="Memo30" Left="733,22882" Top="3,77953000000002" Width="301,953" Height="19,11812" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Total comisión: [frxDBCabecera."IMPORTE_TOTAL"]"/>
|
||||
</TfrxGroupFooter>
|
||||
</TfrxReportPage>
|
||||
</TfrxReport>
|
||||
56
Source/Informes/2/InfComisionesDesglosado.fr3
Normal file
56
Source/Informes/2/InfComisionesDesglosado.fr3
Normal file
@ -0,0 +1,56 @@
|
||||
<?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.OutlineWidth="180" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="37871,9953986921" ReportOptions.Description.Text="" ReportOptions.LastChange="40445,4377365394" ReportOptions.VersionBuild="1" ReportOptions.VersionMajor="12" ReportOptions.VersionMinor="13" ReportOptions.VersionRelease="1" ScriptLanguage="PascalScript" ScriptText.Text="procedure DatosEmpresaOnBeforePrint(Sender: TfrxComponent); var Cadena: String; begin DatosEmpresa.Lines.Clear; DatosEmpresa.Lines.Add(<frxDBCabecera."RAZON_SOCIAL">); DatosEmpresa.Lines.Add(<frxDBCabecera."CALLE_EMPRESA">); Cadena := ''; if (<frxDBCabecera."TELEFONO_1"> <> '') then Cadena := 'TLF: ' + <frxDBCabecera."TELEFONO_1">; if (<frxDBCabecera."FAX"> <> '') then Cadena := Cadena + ' FAX: ' + <frxDBCabecera."FAX">; DatosEmpresa.Lines.Add(Cadena); Cadena := ''; if (<frxDBCabecera."CODIGO_POSTAL_EMPRESA"> <> '') then Cadena := <frxDBCabecera."CODIGO_POSTAL_EMPRESA">; if (<frxDBCabecera."POBLACION_EMPRESA"> <> '') then Cadena := Cadena + ' ' + <frxDBCabecera."POBLACION_EMPRESA">; if (<frxDBCabecera."PROVINCIA_EMPRESA"> <> '') then Cadena := Cadena + ' - ' + <frxDBCabecera."PROVINCIA_EMPRESA">; DatosEmpresa.Lines.Add(Cadena); end; procedure Memo26OnBeforePrint(Sender: TfrxComponent); begin if (<FechaIni> <> '') then Memo31.Visible := True else Memo31.Visible := False; end; BEGIN END." ShowProgress="False" StoreInDFM="False" PropData="044C65667403910003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D2266727844424361626563657261220000095661726961626C657301010C0F000000204E616D653D22204665636861732200010C10000000204E616D653D224665636861496E692200010C10000000204E616D653D22466563686146696E220000055374796C6501010C85000000204E616D653D22436F6E636570746F206E6F726D616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22302200010C87000000204E616D653D22436F6E636570746F20737562746F74616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22312200010C97000000204E616D653D22436162656365726120646520636F6C756D6E612220436F6C6F723D2231353739303332302220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D223122204672616D652E5479703D2231352200010C85000000204E616D653D22436F6E636570746F20746974756C6F2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D2231220000">
|
||||
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
|
||||
<TfrxReportPage Name="Page1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" ColumnWidth="0" ColumnPositions.Text="" HGuides.Text="" VGuides.Text="">
|
||||
<TfrxPageHeader Name="Band2" Height="115,08652142" Left="0" Top="16" Width="1046,92981">
|
||||
<TfrxPictureView Name="Picture1" Left="7,77953" Top="20,22047" Width="160,03598" Height="80,03154" OnBeforePrint="Picture1OnBeforePrint" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" HightQuality="False"/>
|
||||
<TfrxMemoView Name="DatosEmpresa" Left="171,92919" Top="20,35436" Width="221,41744" Height="80,69295" OnBeforePrint="DatosEmpresaOnBeforePrint" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
|
||||
<TfrxShapeView Name="Shape2" Left="401,07112" Top="56,69295" Width="638,74057" Height="49,35436" ShowHint="False" Color="16777215" Frame.Color="8421504" Shape="skRoundRectangle"/>
|
||||
<TfrxMemoView Name="Memo15" Left="399,93723" Top="11,33859" Width="639,43352" Height="41,57483" ShowHint="False" Font.Charset="1" Font.Color="12632256" Font.Height="-32" Font.Name="Tahoma" Font.Style="1" Frame.Color="14211288" HAlign="haRight" ParentFont="False" Text="LIQUIDACIONES DE COMISIONES"/>
|
||||
<TfrxMemoView Name="Memo7" Left="419,30736" Top="83,14966" Width="612,50433" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" HAlign="haRight" ParentFont="False" Text="Página nº: [<Page#>] / [<TotalPages#>]"/>
|
||||
<TfrxMemoView Name="Memo31" Left="419,52783" Top="60,47248" Width="612,28386" Height="18,89765" OnBeforePrint="Memo26OnBeforePrint" ShowHint="False" HAlign="haRight" Text="Desde [FechaIni] hasta [FechaFin]"/>
|
||||
</TfrxPageHeader>
|
||||
<TfrxMasterData Name="MasterData1" Height="22,67718" Left="0" Top="287" Width="1046,92981" ColumnWidth="0" ColumnGap="0" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" RowCount="0" Stretched="True">
|
||||
<TfrxMemoView Name="Memo2" Left="4" Top="2" Width="64,47248" Height="18,89765" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBCabecera."FECHA"]"/>
|
||||
<TfrxMemoView Name="Memo9" Left="77,9765" Top="2" Width="63,47248" Height="18,89765" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBCabecera."REFERENCIA"]"/>
|
||||
<TfrxMemoView Name="Memo10" Left="235,80334" Top="1,88976378000001" Width="257,38582677" Height="18,89765" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBCabecera."CLIENTE"]"/>
|
||||
<TfrxMemoView Name="Memo11" Left="502,67716535" Top="1,88976378000001" Width="257,3859" Height="18,89765" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBCabecera."PROVEEDOR"]"/>
|
||||
<TfrxMemoView Name="Memo12" Left="877,85051331" Top="1,88976378000001" Width="60,69295" Height="18,89765" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 %" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" HideZeros="True" ParentFont="False" Text="[frxDBCabecera."COMISION"]"/>
|
||||
<TfrxMemoView Name="Memo13" Left="149,1812" Top="2" Width="81,37013" Height="18,89765" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBCabecera."SITUACION"]"/>
|
||||
<TfrxMemoView Name="Memo29" Left="767,24459" Top="1,88976378000001" Width="101,63791" Height="19,11812" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[frxDBCabecera."IMPORTE_COMISIONABLE"]"/>
|
||||
<TfrxMemoView Name="Memo19" Left="948,66203" Top="1,88976378000001" Width="86,51979" Height="19,11812" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[frxDBCabecera."IMPORTE_COMISION"]"/>
|
||||
<TfrxLineView Name="Line8" Left="72,5906" Top="0" Width="0" Height="23,81102362" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
|
||||
<TfrxLineView Name="Line5" Left="145,51181102" Top="0" Width="0" Height="23,81102362" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
|
||||
<TfrxLineView Name="Line10" Left="233,95275591" Top="0" Width="0" Height="23,81102362" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
|
||||
<TfrxLineView Name="Line9" Left="498,8976378" Top="0" Width="0" Height="23,81102362" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
|
||||
<TfrxLineView Name="Line4" Left="763,46456693" Top="0" Width="0" Height="23,81102362" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
|
||||
<TfrxLineView Name="Line3" Left="874,96062992" Top="0" Width="0" Height="23,81102362" ShowHint="False" Frame.Typ="1"/>
|
||||
<TfrxLineView Name="Line6" Left="946,77165354" Top="0" Width="0" Height="23,81102362" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
|
||||
<TfrxLineView Name="Line7" Left="1040,50393701" Top="0" Width="0" Height="23,81102362" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
|
||||
<TfrxLineView Name="Line1" Left="0,37795276" Top="0" Width="0" Height="23,81102362" ShowHint="False" Frame.Color="8421504" Frame.Typ="1"/>
|
||||
</TfrxMasterData>
|
||||
<TfrxGroupHeader Name="GroupHeader1" Height="75,5906" Left="0" Top="191" Width="1046,92981" Condition="frxDBCabecera."ID_COMISION_LIQUIDADA"" OutlineText="frxDBCabecera."ID_COMISION_LIQUIDADA"">
|
||||
<TfrxMemoView Name="Memo18" Left="946,8825" Top="52,91342" Width="94,11023622" Height="22,67716291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Imp. comisión "/>
|
||||
<TfrxMemoView Name="Memo27" Left="0" Top="0" Width="1040,8825" Height="52,91340291" 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=""/>
|
||||
<TfrxMemoView Name="Memo14" Left="60,25201" Top="30,23624" Width="412,18924" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="1" ParentFont="False" Text="[frxDBCabecera."AGENTE"]"/>
|
||||
<TfrxMemoView Name="Memo6" Left="174,99227" Top="3,77952999999999" Width="253,44898" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="1" ParentFont="False" Text="[frxDBCabecera."REFERENCIA_COMISION"]"/>
|
||||
<TfrxMemoView Name="Memo16" Left="525,35467" Top="3,77952999999999" Width="948,8825" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="1" Frame.Color="8421504" ParentFont="False" Text="[frxDBCabecera."FECHA_COMISION"]"/>
|
||||
<TfrxMemoView Name="Memo17" Left="555,59091" Top="30,23624" Width="476,44125" Height="18,89765" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="1" ParentFont="False" Text="[frxDBCabecera."DESCRIPCION"]"/>
|
||||
<TfrxMemoView Name="Memo20" Left="11,33859" Top="3,77952999999999" Width="160,75603" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Nº liquidación de comisiones:"/>
|
||||
<TfrxMemoView Name="Memo21" Left="480,00031" Top="3,77952999999999" Width="42,45671" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Fecha:"/>
|
||||
<TfrxMemoView Name="Memo22" Left="480,00031" Top="30,23624" Width="72,69295" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Descripción:"/>
|
||||
<TfrxMemoView Name="Memo25" Left="11,33859" Top="30,23624" Width="46,01577" Height="18,89765" ShowHint="False" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Agente:"/>
|
||||
<TfrxMemoView Name="Memo23" Left="0" Top="52,91342" Width="73,32282" Height="22,67716291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Fec. factura"/>
|
||||
<TfrxMemoView Name="Memo1" Left="72,5906" Top="52,91342" Width="73,32282" Height="22,67716291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Ref. factura"/>
|
||||
<TfrxMemoView Name="Memo3" Left="145,63791" Top="52,91342" Width="88,44094" Height="22,67716291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Situación"/>
|
||||
<TfrxMemoView Name="Memo4" Left="234,03958" Top="52,91342" Width="264,56692913" Height="22,67716291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Cliente"/>
|
||||
<TfrxMemoView Name="Memo8" Left="498,51968504" Top="52,91342" Width="264,56700236" Height="22,67716291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Proveedor"/>
|
||||
<TfrxMemoView Name="Memo24" Left="763,46464016" Top="52,91342" Width="113,38583898" Height="22,67716291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Imp. comisionable"/>
|
||||
<TfrxMemoView Name="Memo5" Left="875,39425" Top="52,91342" Width="71,81097236" Height="22,67716291" ShowHint="False" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="15" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Porcentaje"/>
|
||||
</TfrxGroupHeader>
|
||||
<TfrxGroupFooter Name="GroupFooter1" Height="41,57483" Left="0" Top="330" Width="1046,92981">
|
||||
<TfrxMemoView Name="Memo28" Left="0" Top="0" Width="1040,8825" 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=""/>
|
||||
<TfrxMemoView Name="Memo30" Left="733,22882" Top="3,77953000000002" Width="301,953" Height="19,11812" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Total comisión: [frxDBCabecera."IMPORTE_TOTAL"]"/>
|
||||
</TfrxGroupFooter>
|
||||
</TfrxReportPage>
|
||||
</TfrxReport>
|
||||
22
Source/Informes/2/InfEtiquetasAlbaranCliente.fr3
Normal file
22
Source/Informes/2/InfEtiquetasAlbaranCliente.fr3
Normal file
@ -0,0 +1,22 @@
|
||||
<?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="40408,5706997569" ScriptLanguage="PascalScript" ScriptText.Text=" procedure NombreEmpresaOnBeforePrint(Sender: TfrxComponent); begin // NombreEmpresa.Lines.Clear; // NombreEmpresa.Lines.Add(<frxDBCabecera."NOMBRE_EMPRESA">); end; procedure TelefonosEmpresaOnBeforePrint(Sender: TfrxComponent); var Cadena: String; begin { TelefonosEmpresa.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">; TelefonosEmpresa.Lines.Add(Cadena); } end; procedure DireccionEmpresaOnBeforePrint(Sender: TfrxComponent); var Cadena: String; begin { DireccionEmpresa.Lines.Clear; if (<frxDBCabecera."CALLE_EMPRESA"> <> '') then DireccionEmpresa.Lines.Add(<frxDBCabecera."CALLE_EMPRESA">); if (<frxDBCabecera."CODIGO_POSTAL_EMPRESA"> <> '') then Cadena := <frxDBCabecera."CODIGO_POSTAL_EMPRESA">; if (<frxDBCabecera."POBLACION_EMPRESA"> <> '') then Cadena := Cadena + ', ' + <frxDBCabecera."POBLACION_EMPRESA">; DireccionEmpresa.Lines.Add(Cadena); if (<frxDBCabecera."PROVINCIA_EMPRESA"> <> '') then DireccionEmpresa.Lines.Add(<frxDBCabecera."PROVINCIA_EMPRESA">); } end; procedure Memo11OnBeforePrint(Sender: TfrxComponent); begin Memo11.Visible := (<withRefCliente> <> 0); end; begin end." ShowProgress="False" StoreInDFM="False" PropData="044C65667403910003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C657301010C12000000204E616D653D22205661726961626C65732200010C16000000204E616D653D2277697468526566436C69656E7465220000055374796C6501010C7B000000204E616D653D225374796C65312220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22312220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D32372220466F6E742E4E616D653D22417269616C2220466F6E742E5374796C653D2230220000">
|
||||
<TfrxDataPage Name="Data" Height="1000" Left="0" Top="0" Width="1000"/>
|
||||
<TfrxReportPage Name="Page1" Font.Charset="1" Font.Color="0" Font.Height="-64" Font.Name="Arial" Font.Style="0" 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="515,3389" Left="0" Top="16" Width="718,1107" ColumnWidth="0" ColumnGap="0" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" RowCount="0" Stretched="True">
|
||||
<TfrxMemoView Name="Memo14" Left="208,87415" Top="328,81911" Width="490,7483" Height="29,33859" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#0 " DisplayFormat.Kind="fkNumeric" Font.Charset="0" Font.Color="-16777208" Font.Height="-16" Font.Name="Tahoma" Font.Style="0" GapY="3" HideZeros="True" LineSpacing="4" ParentFont="False" Text="[frxDBDetalles."REFERENCIA_PROVEEDOR"]"/>
|
||||
<TfrxMemoView Name="Memo5" Left="113,16543" Top="226,7718" Width="87,14966" Height="26,45906" OnBeforePrint="Memo5OnBeforePrint" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-16" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="Nº albarán:"/>
|
||||
<TfrxMemoView Name="Memo11" Left="208,31509" Top="264,5671" Width="494,55133" Height="56,69293291" OnBeforePrint="Memo11OnBeforePrint" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-21" Font.Name="Tahoma" Font.Style="1" ParentFont="False" Text="[frxDBCabecera."REFERENCIA_CLIENTE"]"/>
|
||||
<TfrxMemoView Name="Memo3" Left="208,25190748" Top="226,7718" Width="78,80303" Height="26,45906" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-16" Font.Name="Tahoma" Font.Style="1" ParentFont="False" Text="[frxDBCabecera."REFERENCIA"]"/>
|
||||
<TfrxMemoView Name="Memo16" Left="291,02381" Top="226,7718" Width="178,29932" Height="30,23859" OnBeforePrint="Memo9OnBeforePrint" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-16" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="Fecha prevista de envio:"/>
|
||||
<TfrxMemoView Name="Memo17" Left="473,10266" Top="226,7718" Width="158,17316" Height="30,23859" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-16" Font.Name="Tahoma" Font.Style="1" HideZeros="True" ParentFont="False" Text="[frxDBCabecera."FECHA_PREVISTA_ENVIO"]"/>
|
||||
<TfrxMemoView Name="NombreEmpresa" Left="170,07885" Top="37,7953" Width="380,06308" Height="30,67718" OnBeforePrint="NombreEmpresaOnBeforePrint" ShowHint="False" Font.Charset="1" Font.Color="8421504" Font.Height="-19" Font.Name="Tahoma" Font.Style="1" ParentFont="False" Text=""/>
|
||||
<TfrxMemoView Name="TelefonosEmpresa" Left="170,07885" Top="141,60637" Width="380,06308" Height="49,57483" OnBeforePrint="TelefonosEmpresaOnBeforePrint" ShowHint="False" Font.Charset="1" Font.Color="8421504" Font.Height="-19" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
|
||||
<TfrxMemoView Name="DireccionEmpresa" Left="170,07885" Top="68,03154" Width="380,06308" Height="72,25201" OnBeforePrint="DireccionEmpresaOnBeforePrint" ShowHint="False" Font.Charset="1" Font.Color="8421504" Font.Height="-19" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
|
||||
<TfrxMemoView Name="Memo1" Left="113,3859" Top="264,5671" Width="87,14966" Height="26,45906" OnBeforePrint="Memo5OnBeforePrint" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-16" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="Ref. cliente:"/>
|
||||
<TfrxMemoView Name="Memo2" Left="113,3859" Top="328,81911" Width="94,70872" Height="26,45906" OnBeforePrint="Memo5OnBeforePrint" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-16" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="Ref. artículo:"/>
|
||||
<TfrxMemoView Name="Memo4" Left="113,3859" Top="362,83488" Width="75,81107" Height="26,45906" OnBeforePrint="Memo5OnBeforePrint" ShowHint="False" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-16" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="Artículo:"/>
|
||||
<TfrxMemoView Name="Memo6" Left="207,87415" Top="362,83488" Width="494,52783" Height="63,35436" ShowHint="False" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#0 " DisplayFormat.Kind="fkNumeric" Font.Charset="0" Font.Color="-16777208" Font.Height="-16" Font.Name="Tahoma" Font.Style="0" GapY="3" HideZeros="True" LineSpacing="4" ParentFont="False" Text="[frxDBDetalles."CONCEPTO"] "/>
|
||||
<TfrxLineView Name="Line3" Left="2,23624" Top="472,44125" Width="716,75634" Height="0" ShowHint="False" Frame.Style="fsDot" Frame.Typ="4"/>
|
||||
</TfrxMasterData>
|
||||
</TfrxReportPage>
|
||||
</TfrxReport>
|
||||
File diff suppressed because one or more lines are too long
72
Source/Informes/2/InfFacturaProveedor.fr3
Normal file
72
Source/Informes/2/InfFacturaProveedor.fr3
Normal file
File diff suppressed because one or more lines are too long
45
Source/Informes/2/InfPedidoCliente.fr3
Normal file
45
Source/Informes/2/InfPedidoCliente.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
55
Source/Informes/2/InfRemesaCliente.fr3
Normal file
55
Source/Informes/2/InfRemesaCliente.fr3
Normal file
@ -0,0 +1,55 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<TfrxReport Version="3.23.7" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.OutlineWidth="180" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" ReportOptions.CreateDate="37871,9953986921" ReportOptions.Description.Text="" ReportOptions.LastChange="39611,7728282292" ReportOptions.VersionBuild="1" ReportOptions.VersionMajor="12" ReportOptions.VersionMinor="13" ReportOptions.VersionRelease="1" ScriptLanguage="PascalScript" ScriptText.Text="procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent); begin // Engine.CurY := Engine.CurY + Engine.FreeSpace - ReportSummary1.Height; end; procedure DatosEmpresaOnBeforePrint(Sender: TfrxComponent); var Cadena: String; begin DatosEmpresa.Lines.Clear; DatosEmpresa.Lines.Add(<frxDBCabecera."RAZON_SOCIAL">); DatosEmpresa.Lines.Add(<frxDBCabecera."CALLE_EMPRESA">); Cadena := ''; if (<frxDBCabecera."TELEFONO_1"> <> '') then Cadena := 'TLF: ' + <frxDBCabecera."TELEFONO_1">; if (<frxDBCabecera."FAX"> <> '') then Cadena := Cadena + ' FAX: ' + <frxDBCabecera."FAX">; DatosEmpresa.Lines.Add(Cadena); Cadena := ''; if (<frxDBCabecera."CODIGO_POSTAL_EMPRESA"> <> '') then Cadena := <frxDBCabecera."CODIGO_POSTAL_EMPRESA">; if (<frxDBCabecera."POBLACION_EMPRESA"> <> '') then Cadena := Cadena + ' ' + <frxDBCabecera."POBLACION_EMPRESA">; if (<frxDBCabecera."PROVINCIA_EMPRESA"> <> '') then Cadena := Cadena + ' - ' + <frxDBCabecera."PROVINCIA_EMPRESA">; DatosEmpresa.Lines.Add(Cadena); end; procedure Band2OnBeforePrint(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 PageFooter1OnBeforePrint(Sender: TfrxComponent); begin if Engine.FinalPass and (<TotalPaginas> = <Pagina>)then begin eTotal.Visible := True; vTotal.Visible := True; Cuadro.Visible := True; end else begin eTotal.Visible := False; vTotal.Visible := False; Cuadro.Visible := False; end; end; begin end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C3400000020446174615365743D226672784442446574616C6C65732220446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E6173220000055374796C6501010C85000000204E616D653D22436F6E636570746F206E6F726D616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22302200010C87000000204E616D653D22436F6E636570746F20737562746F74616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22312200010C97000000204E616D653D22436162656365726120646520636F6C756D6E612220436F6C6F723D2231353739303332302220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D223122204672616D652E5479703D2231352200010C85000000204E616D653D22436F6E636570746F20746974756C6F2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D2231220000">
|
||||
<TfrxReportPage Name="Page1" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" Columns="1" ColumnWidth="210" ColumnPositions.Text="0" PrintOnPreviousPage="True" HGuides.Text="" VGuides.Text="">
|
||||
<TfrxPageHeader Name="Band2" Height="258,70866142" Left="0" Top="18,89765" Width="718,1107" OnBeforePrint="Band2OnBeforePrint">
|
||||
<TfrxMemoView Name="Memo23" Left="3,77953" Top="228,5671" Width="92,22047" Height="26,45669291" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="12" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Ref. recibo"/>
|
||||
<TfrxMemoView Name="Memo24" Left="564,69326" Top="228,5671" Width="153,41744" Height="26,45669291" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="12" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe "/>
|
||||
<TfrxPictureView Name="Picture1" Left="7,77953" Top="20,22047" Width="160,03598" Height="80,03154" OnBeforePrint="Picture1OnBeforePrint" DataField="LOGOTIPO" DataSet="frxDBCabecera" DataSetName="frxDBCabecera"/>
|
||||
<TfrxMemoView Name="DatosEmpresa" Left="166,92919" Top="17,35436" Width="221,41744" Height="80,69295" OnBeforePrint="DatosEmpresaOnBeforePrint" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
|
||||
<TfrxShapeView Name="Shape1" Left="7,55906" Top="113,3859" Width="257,00804" Height="94,48825" Color="16777215" Frame.Color="8421504" Shape="skRoundRectangle"/>
|
||||
<TfrxShapeView Name="Shape2" Left="325,48052" Top="113,3859" Width="393,07112" Height="94,48825" Color="16777215" Frame.Color="8421504" Shape="skRoundRectangle"/>
|
||||
<TfrxMemoView Name="Memo16" Left="15,11812" Top="116,94496" Width="65,13389" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Nº remesa:"/>
|
||||
<TfrxMemoView Name="Memo17" Left="15,11812" Top="162,29932" Width="45,35436" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Fecha:"/>
|
||||
<TfrxMemoView Name="Memo18" Left="15,11812" Top="184,9765" Width="60,47248" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Página nº:"/>
|
||||
<TfrxMemoView Name="Memo3" Left="211,8859" Top="229,5671" Width="241,0671" Height="26,45669291" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="12" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Cliente"/>
|
||||
<TfrxMemoView Name="Memo4" Left="453,953" Top="228,5671" Width="110,74026" Height="26,45669291" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="12" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="NIF / CIF"/>
|
||||
<TfrxMemoView Name="Memo5" Left="80,03154" Top="116,94496" Width="176,9765" Height="18,89765" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera."REFERENCIA"]"/>
|
||||
<TfrxMemoView Name="Memo6" Left="60,25201" Top="162,29932" Width="196,75603" Height="18,89765" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera."FECHA_REMESA"]"/>
|
||||
<TfrxMemoView Name="Memo7" Left="75,37013" Top="184,9765" Width="181,63791" Height="18,89765" Text="[<Pagina>] / [<TotalPaginas>]"/>
|
||||
<TfrxMemoView Name="Memo15" Left="396,1577" Top="18,89765" Width="314,39394" Height="64,25201" Font.Charset="1" Font.Color="12632256" Font.Height="-48" Font.Name="Tahoma" Font.Style="1" Frame.Color="14211288" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="REMESA"/>
|
||||
<TfrxMemoView Name="Memo8" Left="95,82158333" Top="228,66141732" Width="115,89765" Height="26,45669291" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="12" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Vencimiento"/>
|
||||
<TfrxMemoView Name="Memo22" Left="15,11812" Top="139,84261" Width="68,91342" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Descripción:"/>
|
||||
<TfrxMemoView Name="Memo25" Left="87,5906" Top="139,84261" Width="169,41744" Height="18,89765" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera."DESCRIPCION"]"/>
|
||||
<TfrxMemoView Name="Memo19" Left="336,37817" Top="139,84261" Width="42,45671" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Titular:"/>
|
||||
<TfrxMemoView Name="Memo26" Left="382,39394" Top="139,84261" Width="331,93723" Height="18,89765" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera."TITULAR"]"/>
|
||||
<TfrxMemoView Name="Memo27" Left="336,37817" Top="117,16543" Width="176,9765" Height="18,89765" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Datos de la cuenta"/>
|
||||
<TfrxMemoView Name="Memo28" Left="336,37817" Top="162,51979" Width="75,5906" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Cód. entidad:"/>
|
||||
<TfrxMemoView Name="Memo29" Left="415,52783" Top="162,51979" Width="53,13389" Height="18,89765" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera."ENTIDAD"]"/>
|
||||
<TfrxMemoView Name="Memo30" Left="472,44125" Top="162,51979" Width="83,14966" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Cód. sucursal:"/>
|
||||
<TfrxMemoView Name="Memo31" Left="559,14997" Top="162,51979" Width="147,62214" Height="18,89765" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera."SUCURSAL"]"/>
|
||||
<TfrxMemoView Name="Memo32" Left="336,37817" Top="185,19697" Width="26,45671" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="DC:"/>
|
||||
<TfrxMemoView Name="Memo33" Left="366,39394" Top="185,19697" Width="34,23624" Height="18,89765" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera."DC"]"/>
|
||||
<TfrxMemoView Name="Memo34" Left="472,44125" Top="185,19697" Width="83,14966" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Cód. cuenta:"/>
|
||||
<TfrxMemoView Name="Memo37" Left="559,14997" Top="185,19697" Width="147,62214" Height="18,89765" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera."CUENTA"]"/>
|
||||
<TfrxLineView Name="Line2" Left="4" Top="229,54" Width="0" Height="774,803149606299" Frame.Color="8421504" Frame.Typ="1"/>
|
||||
<TfrxLineView Name="Line5" Left="95,92146" Top="229,54" Width="0" Height="774,803149606299" Frame.Color="8421504" Frame.Typ="1"/>
|
||||
<TfrxLineView Name="Line4" Left="453,9094" Top="229,54" Width="0" Height="774,803149606299" Frame.Color="8421504" Frame.Typ="1"/>
|
||||
<TfrxLineView Name="Line3" Left="564,28346457" Top="229,54" Width="0" Height="774,803149606299" Frame.Color="8421504" Frame.Typ="1"/>
|
||||
<TfrxLineView Name="Line1" Left="718" Top="229,54" Width="0" Height="774,803149606299" Frame.Color="8421504" Frame.Typ="1"/>
|
||||
<TfrxLineView Name="Line9" Left="211,62461333" Top="229,54" Width="0" Height="774,803149606299" Frame.Color="8421504" Frame.Typ="1"/>
|
||||
</TfrxPageHeader>
|
||||
<TfrxMasterData Name="BandaDetalles" Height="19,11812" Left="0" Top="340,1577" Width="718,1107" AllowSplit="True" Columns="1" ColumnWidth="200" ColumnGap="20" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" RowCount="0" Stretched="True">
|
||||
<TfrxMemoView Name="MemPrecio" Left="460,40153087" Top="2" Width="101,56298724" Height="15,11811024" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 € " DisplayFormat.Kind="fkNumeric" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" GapX="3" GapY="3" HideZeros="True" LineSpacing="4" ParentFont="False" Text="[frxDBDetalles."NIF_CIF_CLIENTE"]"/>
|
||||
<TfrxMemoView Name="MemImpTotal" Left="566,36216811" Top="2" Width="147,16535189" Height="15,11811024" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 € " DisplayFormat.Kind="fkNumeric" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" GapX="3" GapY="3" HAlign="haRight" LineSpacing="4" ParentFont="False" Text="[frxDBDetalles."IMPORTE_TOTAL"]"/>
|
||||
<TfrxMemoView Name="MemCantidad" Left="218,46837457" Top="2" Width="229,44892874" Height="15,11811024" StretchMode="smMaxHeight" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#0 " DisplayFormat.Kind="fkNumeric" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" GapX="3" GapY="3" HideZeros="True" LineSpacing="4" ParentFont="False" Text="[frxDBDetalles."NOMBRE_CLIENTE"]"/>
|
||||
<TfrxMemoView Name="Memo21" Left="99,22449" Top="2" Width="110,89765" Height="15,11812" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBDetalles."FECHA_VENCIMIENTO"]"/>
|
||||
<TfrxMemoView Name="Memo2" Left="6,18491" Top="2" Width="84" Height="15,11812" DataSet="frxDBDetalles" DataSetName="frxDBDetalles" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBDetalles."REFERENCIA"]"/>
|
||||
</TfrxMasterData>
|
||||
<TfrxPageFooter Name="PageFooter1" Height="42,70866142" Left="0" Top="419,52783" Width="718,1107" OnBeforePrint="PageFooter1OnBeforePrint">
|
||||
<TfrxShapeView Name="Cuadro" Left="3,77953" Top="0" Width="714,708661417323" Height="28,88188" Color="16777215" Frame.Color="8421504"/>
|
||||
<TfrxMemoView Name="vtotal" Left="566,9295" Top="3,77953000000002" Width="147,87415" Height="22,89765" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[frxDBCabecera."IMPORTE_TOTAL"]"/>
|
||||
<TfrxMemoView Name="etotal" Left="430,86642" Top="6,67718000000002" Width="132" Height="16" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Total remesa:"/>
|
||||
<TfrxLineView Name="Linea" Left="3,77953" Top="0" Width="714,330708661417" Height="0" Frame.Typ="4"/>
|
||||
</TfrxPageFooter>
|
||||
</TfrxReportPage>
|
||||
</TfrxReport>
|
||||
64
Source/Informes/2/InfRemesaProveedor.fr3
Normal file
64
Source/Informes/2/InfRemesaProveedor.fr3
Normal file
@ -0,0 +1,64 @@
|
||||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<TfrxReport Version="3.23.7" DotMatrixReport="False" EngineOptions.DoublePass="True" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.OutlineWidth="180" PreviewOptions.Zoom="1" PrintOptions.Printer="Default" ReportOptions.CreateDate="37871,9953986921" ReportOptions.Description.Text="" ReportOptions.LastChange="39611,7817196528" ReportOptions.VersionBuild="1" ReportOptions.VersionMajor="12" ReportOptions.VersionMinor="13" ReportOptions.VersionRelease="1" ScriptLanguage="PascalScript" ScriptText.Text=" procedure DatosEmpresaOnBeforePrint(Sender: TfrxComponent); var Cadena: String; begin DatosEmpresa.Lines.Clear; DatosEmpresa.Lines.Add(<frxDBCabecera."RAZON_SOCIAL">); DatosEmpresa.Lines.Add(<frxDBCabecera."CALLE_EMPRESA">); Cadena := ''; if (<frxDBCabecera."TELEFONO_1"> <> '') then Cadena := 'TLF: ' + <frxDBCabecera."TELEFONO_1">; if (<frxDBCabecera."FAX"> <> '') then Cadena := Cadena + ' FAX: ' + <frxDBCabecera."FAX">; DatosEmpresa.Lines.Add(Cadena); Cadena := ''; if (<frxDBCabecera."CODIGO_POSTAL_EMPRESA"> <> '') then Cadena := <frxDBCabecera."CODIGO_POSTAL_EMPRESA">; if (<frxDBCabecera."POBLACION_EMPRESA"> <> '') then Cadena := Cadena + ' ' + <frxDBCabecera."POBLACION_EMPRESA">; if (<frxDBCabecera."PROVINCIA_EMPRESA"> <> '') then Cadena := Cadena + ' - ' + <frxDBCabecera."PROVINCIA_EMPRESA">; DatosEmpresa.Lines.Add(Cadena); end; procedure Band2OnBeforePrint(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 PageFooter1OnBeforePrint(Sender: TfrxComponent); begin if Engine.FinalPass and (<TotalPaginas> = <Pagina>) then begin Cuadro.Visible := True; eTotal.Visible := True; vTotal.Visible := True; end else begin Cuadro.Visible := False; eTotal.Visible := False; vTotal.Visible := False; end; end; begin end." ShowProgress="False" StoreInDFM="False" OnStartReport="frxReportOnStartReport" PropData="044C65667403A90003546F70021008446174617365747301010C3400000020446174615365743D22667278444243616265636572612220446174615365744E616D653D22667278444243616265636572612200010C1C00000020446174615365744E616D653D226672784442446574616C6C6573220000095661726961626C657301010C13000000204E616D653D2220506167696E6163696F6E2200010C0E000000204E616D653D22506167696E612200010C14000000204E616D653D22546F74616C506167696E6173220000055374796C6501010C85000000204E616D653D22436F6E636570746F206E6F726D616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22302200010C87000000204E616D653D22436F6E636570746F20737562746F74616C2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D22312200010C97000000204E616D653D22436162656365726120646520636F6C756D6E612220436F6C6F723D2231353739303332302220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31322220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D223122204672616D652E5479703D2231352200010C85000000204E616D653D22436F6E636570746F20746974756C6F2220436F6C6F723D223533363837303931312220466F6E742E436861727365743D22302220466F6E742E436F6C6F723D222D31363737373230382220466F6E742E4865696768743D222D31332220466F6E742E4E616D653D225461686F6D612220466F6E742E5374796C653D2231220000">
|
||||
<TfrxReportPage Name="Page1" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Orientation="poLandscape" PaperWidth="297" PaperHeight="210" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" Columns="1" ColumnWidth="210" ColumnPositions.Text="0" PrintOnPreviousPage="True" HGuides.Text="" VGuides.Text="">
|
||||
<TfrxPageHeader Name="Band2" Height="258,70866142" Left="0" Top="18,89765" Width="1046,92981" OnBeforePrint="Band2OnBeforePrint">
|
||||
<TfrxMemoView Name="Memo23" Left="3,77953" Top="228,5671" Width="80,88188" Height="26,45669291" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="12" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Ref. recibo"/>
|
||||
<TfrxMemoView Name="Memo24" Left="887,95856667" Top="228,5671" Width="158,97124333" Height="26,45669291" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="12" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Importe "/>
|
||||
<TfrxPictureView Name="Picture1" Left="7,77953" Top="20,22047" Width="160,03598" Height="80,03154" OnBeforePrint="Picture1OnBeforePrint" DataField="LOGOTIPO" DataSet="frxDBCabecera" DataSetName="frxDBCabecera"/>
|
||||
<TfrxMemoView Name="DatosEmpresa" Left="166,92919" Top="17,35436" Width="221,41744" Height="80,69295" OnBeforePrint="DatosEmpresaOnBeforePrint" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text=""/>
|
||||
<TfrxShapeView Name="Shape1" Left="7,55906" Top="113,3859" Width="257,00804" Height="94,48825" Color="16777215" Frame.Color="8421504" Shape="skRoundRectangle"/>
|
||||
<TfrxShapeView Name="Shape2" Left="639,181510000002" Top="113,3859" Width="393,07112" Height="94,48825" Color="16777215" Frame.Color="8421504" Shape="skRoundRectangle"/>
|
||||
<TfrxMemoView Name="Memo16" Left="15,11812" Top="116,94496" Width="65,13389" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Nº remesa:"/>
|
||||
<TfrxMemoView Name="Memo17" Left="15,11812" Top="162,29932" Width="45,35436" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Fecha:"/>
|
||||
<TfrxMemoView Name="Memo18" Left="15,11812" Top="184,9765" Width="60,47248" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Página nº:"/>
|
||||
<TfrxMemoView Name="Memo3" Left="303,59462" Top="228,5671" Width="225,94898" Height="26,45669291" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="12" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Proveedor"/>
|
||||
<TfrxMemoView Name="Memo4" Left="530,21026667" Top="228,5671" Width="133,41744" Height="26,45669291" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="12" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="NIF / CIF"/>
|
||||
<TfrxMemoView Name="Memo5" Left="80,03154" Top="116,94496" Width="176,9765" Height="18,89765" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera."REFERENCIA"]"/>
|
||||
<TfrxMemoView Name="Memo6" Left="60,25201" Top="162,29932" Width="196,75603" Height="18,89765" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera."FECHA_REMESA"]"/>
|
||||
<TfrxMemoView Name="Memo7" Left="75,37013" Top="184,9765" Width="181,63791" Height="18,89765" Text="[<Pagina>] / [<TotalPaginas>]"/>
|
||||
<TfrxLineView Name="Line1" Left="1046,81911" Top="229,54" Width="0" Height="459,212598425197" Frame.Color="8421504" Frame.Typ="1"/>
|
||||
<TfrxMemoView Name="Memo15" Left="464,18924" Top="18,89765" Width="567,62245" Height="64,25201" Font.Charset="1" Font.Color="12632256" Font.Height="-48" Font.Name="Tahoma" Font.Style="1" Frame.Color="14211288" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="REMESA"/>
|
||||
<TfrxLineView Name="Line2" Left="4" Top="229,54" Width="0" Height="459,212598425197" Frame.Color="8421504" Frame.Typ="1"/>
|
||||
<TfrxLineView Name="Line5" Left="84,58287" Top="228,20666667" Width="0" Height="459,212598425197" Frame.Color="8421504" Frame.Typ="1"/>
|
||||
<TfrxLineView Name="Line4" Left="530,16666667" Top="229,54" Width="0" Height="459,212598425197" Frame.Color="8421504" Frame.Typ="1"/>
|
||||
<TfrxMemoView Name="Memo8" Left="195,86889333" Top="228,66141732" Width="107,33859" Height="26,45669291" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="12" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Vencimiento"/>
|
||||
<TfrxLineView Name="Line9" Left="304" Top="228,43568333" Width="0" Height="459,212598425197" Frame.Color="8421504" Frame.Typ="1"/>
|
||||
<TfrxMemoView Name="Memo22" Left="15,11812" Top="139,84261" Width="68,91342" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Descripción:"/>
|
||||
<TfrxMemoView Name="Memo25" Left="87,5906" Top="139,84261" Width="169,41744" Height="18,89765" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera."DESCRIPCION"]"/>
|
||||
<TfrxMemoView Name="Memo19" Left="650,079160000002" Top="139,84261" Width="42,45671" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Titular:"/>
|
||||
<TfrxMemoView Name="Memo26" Left="696,094930000002" Top="139,84261" Width="331,93723" Height="18,89765" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera."TITULAR"]"/>
|
||||
<TfrxMemoView Name="Memo27" Left="650,079160000002" Top="117,16543" Width="176,9765" Height="18,89765" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Datos de la cuenta"/>
|
||||
<TfrxMemoView Name="Memo28" Left="650,079160000002" Top="162,51979" Width="75,5906" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Cód. entidad:"/>
|
||||
<TfrxMemoView Name="Memo29" Left="729,228820000002" Top="162,51979" Width="53,13389" Height="18,89765" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera."ENTIDAD"]"/>
|
||||
<TfrxMemoView Name="Memo30" Left="786,142240000002" Top="162,51979" Width="83,14966" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Cód. sucursal:"/>
|
||||
<TfrxMemoView Name="Memo31" Left="872,850960000002" Top="162,51979" Width="147,62214" Height="18,89765" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera."SUCURSAL"]"/>
|
||||
<TfrxMemoView Name="Memo32" Left="650,079160000002" Top="185,19697" Width="26,45671" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="DC:"/>
|
||||
<TfrxMemoView Name="Memo33" Left="680,094930000002" Top="185,19697" Width="34,23624" Height="18,89765" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera."DC"]"/>
|
||||
<TfrxMemoView Name="Memo34" Left="786,142240000002" Top="185,19697" Width="83,14966" Height="18,89765" Font.Charset="1" Font.Color="0" Font.Height="-12" Font.Name="Arial" Font.Style="0" ParentFont="False" Text="Cód. cuenta:"/>
|
||||
<TfrxMemoView Name="Memo37" Left="872,850960000002" Top="185,19697" Width="147,62214" Height="18,89765" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" Text="[frxDBCabecera."CUENTA"]"/>
|
||||
<TfrxMemoView Name="Memo11" Left="663,41775" Top="228,10513333" Width="224,12616" Height="27,2125984251969" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="12" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Número de cuenta"/>
|
||||
<TfrxLineView Name="Line7" Left="888,18955" Top="228,7718" Width="0" Height="459,212598425197" Frame.Color="8421504" Frame.Typ="1"/>
|
||||
<TfrxMemoView Name="Memo36" Left="86,26252333" Top="228,66141732" Width="111,11812" Height="26,45669291" Color="16777215" Font.Charset="0" Font.Color="-16777208" Font.Height="-12" Font.Name="Tahoma" Font.Style="1" Frame.Color="8421504" Frame.Typ="12" HAlign="haCenter" ParentFont="False" VAlign="vaCenter" Text="Ref. factura prov."/>
|
||||
<TfrxLineView Name="Line8" Left="195,78478667" Top="229,10235" Width="0" Height="459,212598425197" Frame.Color="8421504" Frame.Typ="1"/>
|
||||
<TfrxLineView Name="Line3" Left="664,55124457" Top="228,87333333" Width="0" Height="459,212598425197" Frame.Color="8421504" Frame.Typ="1"/>
|
||||
</TfrxPageHeader>
|
||||
<TfrxMasterData Name="BandaDetalles" Height="19,11812" Left="0" Top="340,1577" Width="1046,92981" AllowSplit="True" Columns="1" ColumnWidth="200" ColumnGap="20" DataSetName="frxDBDetalles" RowCount="0" Stretched="True">
|
||||
<TfrxMemoView Name="MemPrecio" Left="548,6640542" Top="2,66666666999998" Width="109,12204724" Height="15,11811024" StretchMode="smMaxHeight" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 € " DisplayFormat.Kind="fkNumeric" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" GapX="3" GapY="3" HideZeros="True" LineSpacing="4" ParentFont="False" Text="[frxDBDetalles."NIF_CIF_PROVEEDOR"]"/>
|
||||
<TfrxMemoView Name="MemImpTotal" Left="895,18127811" Top="2" Width="147,16535189" Height="15,11811024" StretchMode="smMaxHeight" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 € " DisplayFormat.Kind="fkNumeric" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" GapX="3" GapY="3" HAlign="haRight" LineSpacing="4" ParentFont="False" Text="[frxDBDetalles."IMPORTE_TOTAL"]"/>
|
||||
<TfrxMemoView Name="MemCantidad" Left="310,5104279" Top="2" Width="214,33080874" Height="15,11811024" StretchMode="smMaxHeight" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#0 " DisplayFormat.Kind="fkNumeric" Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" GapX="3" GapY="3" HideZeros="True" LineSpacing="4" ParentFont="False" Text="[frxDBDetalles."NOMBRE_PROVEEDOR"]"/>
|
||||
<TfrxMemoView Name="Memo21" Left="213,94372333" Top="2" Width="84,44094" Height="15,11812" DataSetName="frxDBDetalles" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBDetalles."FECHA_VENCIMIENTO"]"/>
|
||||
<TfrxMemoView Name="Memo2" Left="9,96444" Top="2" Width="61,32282" Height="15,11812" DataSetName="frxDBDetalles" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBDetalles."REFERENCIA"]"/>
|
||||
<TfrxMemoView Name="Memo12" Left="696,10018667" Top="2,44619667000001" Width="29,75191724" Height="15,11811024" StretchMode="smMaxHeight" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" GapX="3" GapY="3" HideZeros="True" LineSpacing="4" ParentFont="False" Text="[frxDBDetalles."ENTIDAD_PROVEEDOR"]"/>
|
||||
<TfrxMemoView Name="Memo14" Left="731,89548667" Top="2,66666666999998" Width="29,75191724" Height="15,11811024" StretchMode="smMaxHeight" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 € " Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" GapX="3" GapY="3" HideZeros="True" LineSpacing="4" ParentFont="False" Text="[frxDBDetalles."SUCURSAL_PROVEEDOR"]"/>
|
||||
<TfrxMemoView Name="Memo20" Left="766,79839333" Top="2,66666665999998" Width="18,41332724" Height="15,11811024" StretchMode="smMaxHeight" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 € " Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" GapX="3" GapY="3" HideZeros="True" LineSpacing="4" ParentFont="False" Text="[frxDBDetalles."DC_PROVEEDOR"]"/>
|
||||
<TfrxMemoView Name="Memo35" Left="789,92177" Top="2,66666666999998" Width="82,66533724" Height="15,11811024" StretchMode="smMaxHeight" DataSetName="frxDBDetalles" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 € " Font.Charset="0" Font.Color="-16777208" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" GapX="3" GapY="3" HideZeros="True" LineSpacing="4" ParentFont="False" Text="[frxDBDetalles."CUENTA_PROVEEDOR"]"/>
|
||||
<TfrxMemoView Name="Memo39" Left="88,92919" Top="2" Width="106,67718" Height="15,11812" DataSetName="frxDBDetalles" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" ParentFont="False" Text="[frxDBDetalles."REFERENCIA_FACTURA_PROV"]"/>
|
||||
</TfrxMasterData>
|
||||
<TfrxPageFooter Name="PageFooter1" Height="30,23624" Left="0" Top="419,52783" Width="1046,92981" OnBeforePrint="PageFooter1OnBeforePrint">
|
||||
<TfrxShapeView Name="Cuadro" Left="3,77953" Top="0" Width="1042,81911" Height="28,88188" Color="16777215" Frame.Color="8421504"/>
|
||||
<TfrxMemoView Name="vTotal" Left="923,93723" Top="1,10235" Width="117,63791" Height="22,89765" DataSet="frxDBCabecera" DataSetName="frxDBCabecera" DisplayFormat.DecimalSeparator="," DisplayFormat.FormatStr="#,0.00 €" DisplayFormat.Kind="fkNumeric" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="[frxDBCabecera."IMPORTE_TOTAL"]"/>
|
||||
<TfrxMemoView Name="eTotal" Left="784,09462" Top="7,77953000000002" Width="132" Height="16" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Tahoma" Font.Style="1" HAlign="haRight" ParentFont="False" VAlign="vaCenter" Text="Total remesa:"/>
|
||||
<TfrxLineView Name="Line6" Left="3,77953" Top="0" Width="1043,14960629921" Height="0" Frame.Typ="4"/>
|
||||
</TfrxPageFooter>
|
||||
</TfrxReportPage>
|
||||
</TfrxReport>
|
||||
@ -55,7 +55,7 @@ procedure TBizArticulosServer.BeforeProcessDelta(
|
||||
Sender: TDABusinessProcessor; const aDelta: IDADelta);
|
||||
begin
|
||||
FReferenciaAutomatica := False;
|
||||
|
||||
{
|
||||
case Sender.CurrentChange.ChangeType of
|
||||
ctInsert, ctUpdate: begin
|
||||
//Si la referencia no ha sido asignada le asignamos una nosotros
|
||||
@ -66,6 +66,7 @@ begin
|
||||
end;
|
||||
end;
|
||||
end;
|
||||
}
|
||||
end;
|
||||
|
||||
function TBizArticulosServer.DarReferencia: String;
|
||||
|
||||
@ -60,10 +60,9 @@ inherited frViewArticulo: TfrViewArticulo
|
||||
Anchors = [akLeft, akTop, akRight]
|
||||
DataBinding.DataField = 'REFERENCIA'
|
||||
DataBinding.DataSource = dsViewArticulo
|
||||
Enabled = False
|
||||
Style.BorderColor = clWindowFrame
|
||||
Style.BorderStyle = ebs3D
|
||||
Style.Color = clWindow
|
||||
Style.Color = 14745599
|
||||
Style.HotTrack = False
|
||||
Style.LookAndFeel.Kind = lfStandard
|
||||
Style.LookAndFeel.NativeStyle = True
|
||||
|
||||
@ -556,7 +556,6 @@ end;
|
||||
procedure TBizContacto.OnNewRecord(Sender: TDADataTable);
|
||||
begin
|
||||
inherited;
|
||||
ID := GetRecNo; // -1, -2, -3...
|
||||
IniciarValoresContactoNuevo;
|
||||
end;
|
||||
|
||||
|
||||
@ -87,6 +87,7 @@ procedure TBizContactosServer.BeforeProcessDelta(Sender: TDABusinessProcessor;
|
||||
begin
|
||||
inherited;
|
||||
FReferenciaAutomatica := False;
|
||||
{
|
||||
case Sender.CurrentChange.ChangeType of
|
||||
ctInsert, ctUpdate: begin
|
||||
// Si la referencia no ha sido asignada le asignamos una nosotros
|
||||
@ -97,6 +98,7 @@ begin
|
||||
end;
|
||||
end;
|
||||
end;
|
||||
}
|
||||
end;
|
||||
|
||||
procedure TBizContactosServer.Delete_Categoria_Contacto(
|
||||
|
||||
@ -1849,7 +1849,7 @@ object RptFacturasCliente: TRptFacturasCliente
|
||||
PrintOptions.Printer = 'Default'
|
||||
PrintOptions.PrintOnSheet = 0
|
||||
ReportOptions.CreateDate = 37871.995398692100000000
|
||||
ReportOptions.LastChange = 40408.653188761570000000
|
||||
ReportOptions.LastChange = 40408.653188761600000000
|
||||
ReportOptions.VersionBuild = '1'
|
||||
ReportOptions.VersionMajor = '12'
|
||||
ReportOptions.VersionMinor = '13'
|
||||
|
||||
@ -685,14 +685,14 @@ begin
|
||||
raise Exception.Create (('Error Servidor: _GenerarFactura, no encuentra informe ' + rptFacturaCliente));
|
||||
|
||||
frxReport.LoadFromFile(AInforme, True);
|
||||
{
|
||||
if VerSello then
|
||||
frxReport.Variables.Variables['VerSello'] := 1
|
||||
else
|
||||
frxReport.Variables.Variables['VerSello'] := 0;
|
||||
|
||||
// if VerSello then
|
||||
// frxReport.Variables.Variables['ShowLogotipo'] := VerSello;
|
||||
// else
|
||||
// frxReport.Variables.Variables['ShowLogotipo'] := 0;
|
||||
//La primera impresion siempre es sin la etiqueta copia
|
||||
frxReport.Variables.Variables['VerCopia'] := 0;
|
||||
}
|
||||
// frxReport.Variables.Variables['VerCopia'] := 0;
|
||||
|
||||
frxReport.PrepareReport(False);
|
||||
{
|
||||
if VerCopia then
|
||||
|
||||
@ -13,4 +13,4 @@ BEGIN
|
||||
END
|
||||
|
||||
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Controller\PedidosCliente_controller.RES */
|
||||
/* c:\temp\dtf8A.tmp */
|
||||
/* c:\temp\dtf3E7.tmp */
|
||||
|
||||
@ -14,4 +14,4 @@ END
|
||||
|
||||
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Data\uDataModulePedidosCliente.dfm */
|
||||
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Data\PedidosCliente_data.RES */
|
||||
/* c:\temp\dtf88.tmp */
|
||||
/* c:\temp\dtf3E5.tmp */
|
||||
|
||||
@ -13,4 +13,4 @@ BEGIN
|
||||
END
|
||||
|
||||
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Model\PedidosCliente_model.RES */
|
||||
/* c:\temp\dtf86.tmp */
|
||||
/* c:\temp\dtf3E3.tmp */
|
||||
|
||||
@ -14,4 +14,4 @@ END
|
||||
|
||||
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Plugin\uPluginPedidosCliente.dfm */
|
||||
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Plugin\PedidosCliente_plugin.RES */
|
||||
/* c:\temp\dtfF2.tmp */
|
||||
/* c:\temp\dtf44B.tmp */
|
||||
|
||||
@ -26,4 +26,4 @@ END
|
||||
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Views\uEditorElegirArticulosPedidoCliente.dfm */
|
||||
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Views\uEditorDireccionEntregaPedidoCliente.dfm */
|
||||
/* C:\Codigo\Source\Modulos\Pedidos de cliente\Views\PedidosCliente_view.RES */
|
||||
/* c:\temp\dtfF0.tmp */
|
||||
/* c:\temp\dtf449.tmp */
|
||||
|
||||
@ -12,6 +12,6 @@ STRINGTABLE
|
||||
BEGIN
|
||||
END
|
||||
|
||||
/* C:\Codigo\Source\Modulos\Tienda web\Data\uDataModuleTiendaWeb.DFM */
|
||||
/* C:\Codigo\Source\Modulos\Tienda web\Data\uDataModuleTiendaWeb.dfm */
|
||||
/* C:\Codigo\Source\Modulos\Tienda web\Data\TiendaWeb_data.res */
|
||||
/* C:\Codigo\Source\Modulos\Tienda web\Data\TiendaWeb_data.drf */
|
||||
/* c:\temp\dtf3FD.tmp */
|
||||
|
||||
@ -9,16 +9,16 @@ const
|
||||
{ Data table rules ids
|
||||
Feel free to change them to something more human readable
|
||||
but make sure they are unique in the context of your application }
|
||||
RID_osc_Customers = '{A5013516-51B7-490F-A166-BA86DCCB7900}';
|
||||
RID_GetLastID = '{CA549BDC-0D35-46D9-B336-B88EAC4CF794}';
|
||||
RID_osc_AddressBook = '{A4D63486-CEFB-4F1D-9EAE-69151070707A}';
|
||||
RID_TiendaWeb = '{1E92A367-C80B-4F16-8603-8F386C3B7BAF}';
|
||||
RID_osc_Manufacturers = '{820CA527-F7B9-4D46-B466-99966E121CAD}';
|
||||
RID_osc_Languages = '{E8D690F7-B946-4AD6-B785-2CB44C9BC3E4}';
|
||||
RID_osc_Products = '{0ED0587B-155F-4723-A231-D69F4C6812D5}';
|
||||
RID_osc_Orders = '{00A80DB4-E5FA-4C7F-A7D3-8FF0F3648DAA}';
|
||||
RID_osc_Orders_products = '{38312591-C2B9-498F-B5E5-900542AFAF4A}';
|
||||
RID_osc_Orders_status_history = '{3563463D-B3DB-4A3C-A5B8-50EAEF76D51C}';
|
||||
RID_osc_Customers = '{7B414787-7FB3-4C7E-B5F4-D6DC724C7986}';
|
||||
RID_GetLastID = '{EC74F663-AF44-449F-A865-D6FC7DAA2984}';
|
||||
RID_osc_AddressBook = '{92F1B476-62B9-48D5-B7FA-08FC8A878695}';
|
||||
RID_TiendaWeb = '{EAB775DA-7B9A-4650-A698-63F246F755B3}';
|
||||
RID_osc_Manufacturers = '{1D5AC5D5-FA39-47F6-B015-830C5D143002}';
|
||||
RID_osc_Languages = '{74B3F68E-6D93-4EC3-A8E0-9EB54A9ABF17}';
|
||||
RID_osc_Products = '{06950934-0858-4CDE-A2D6-D4D6CDA7C711}';
|
||||
RID_osc_Orders = '{9AD7AD6E-41AF-44D6-97C7-56D7B7C874F6}';
|
||||
RID_osc_Orders_products = '{F2D861B5-937C-443B-8C4D-77DDFEED0FBF}';
|
||||
RID_osc_Orders_status_history = '{938F6829-DC4D-4551-918A-85D8833B18BC}';
|
||||
|
||||
{ Data table names }
|
||||
nme_osc_Customers = 'osc_Customers';
|
||||
@ -263,7 +263,7 @@ const
|
||||
type
|
||||
{ Iosc_Customers }
|
||||
Iosc_Customers = interface(IDAStronglyTypedDataTable)
|
||||
['{63ADAA75-4BC5-490A-945C-F4340FEB2373}']
|
||||
['{D7E9BFB6-3910-4AAF-A23E-EEABE59CF6DD}']
|
||||
{ Property getters and setters }
|
||||
function Getcustomers_idValue: Integer;
|
||||
procedure Setcustomers_idValue(const aValue: Integer);
|
||||
@ -418,7 +418,7 @@ type
|
||||
|
||||
{ IGetLastID }
|
||||
IGetLastID = interface(IDAStronglyTypedDataTable)
|
||||
['{F770082E-4DE9-4B18-A7C1-C2E35430D952}']
|
||||
['{2D8C65A9-8193-46BD-BFBC-D635D547978C}']
|
||||
{ Property getters and setters }
|
||||
function Getlast_idValue: Integer;
|
||||
procedure Setlast_idValue(const aValue: Integer);
|
||||
@ -453,7 +453,7 @@ type
|
||||
|
||||
{ Iosc_AddressBook }
|
||||
Iosc_AddressBook = interface(IDAStronglyTypedDataTable)
|
||||
['{DAAF0DB8-C5C6-4982-87FB-B722733B69F2}']
|
||||
['{904D18A9-9DE6-44BD-87CC-04AEB4722ACC}']
|
||||
{ Property getters and setters }
|
||||
function Getaddress_book_idValue: Integer;
|
||||
procedure Setaddress_book_idValue(const aValue: Integer);
|
||||
@ -656,7 +656,7 @@ type
|
||||
|
||||
{ ITiendaWeb }
|
||||
ITiendaWeb = interface(IDAStronglyTypedDataTable)
|
||||
['{021BB79F-EE5C-401C-A11A-273E731E005D}']
|
||||
['{49EC332D-5318-4E39-BD54-95C1D08BB4F7}']
|
||||
{ Property getters and setters }
|
||||
function GetIDValue: Integer;
|
||||
procedure SetIDValue(const aValue: Integer);
|
||||
@ -787,7 +787,7 @@ type
|
||||
|
||||
{ Iosc_Manufacturers }
|
||||
Iosc_Manufacturers = interface(IDAStronglyTypedDataTable)
|
||||
['{D7B85180-3E14-4B33-9251-F6F119E859BA}']
|
||||
['{56A9B8F8-7538-47E2-8C4D-AD569CE3C226}']
|
||||
{ Property getters and setters }
|
||||
function Getmanufacturers_idValue: Integer;
|
||||
procedure Setmanufacturers_idValue(const aValue: Integer);
|
||||
@ -885,7 +885,7 @@ type
|
||||
}
|
||||
{ Iosc_Languages }
|
||||
Iosc_Languages = interface(IDAStronglyTypedDataTable)
|
||||
['{130286B4-1ED6-4005-B95B-9DEA687C3D34}']
|
||||
['{7C625C62-43EF-4340-A8E6-EC6B4EAA299B}']
|
||||
{ Property getters and setters }
|
||||
function Getlanguages_idValue: Integer;
|
||||
procedure Setlanguages_idValue(const aValue: Integer);
|
||||
@ -980,7 +980,7 @@ type
|
||||
|
||||
{ Iosc_Products }
|
||||
Iosc_Products = interface(IDAStronglyTypedDataTable)
|
||||
['{5B6328C4-C79C-4DC5-AC5C-E0276D67F585}']
|
||||
['{C99FB025-828E-4D74-9270-D9A2C954B6D6}']
|
||||
{ Property getters and setters }
|
||||
function Getproducts_idValue: Integer;
|
||||
procedure Setproducts_idValue(const aValue: Integer);
|
||||
@ -1111,7 +1111,7 @@ type
|
||||
|
||||
{ Iosc_Orders }
|
||||
Iosc_Orders = interface(IDAStronglyTypedDataTable)
|
||||
['{58ABD9FF-8C0D-4F96-9FF9-DC20061D72F9}']
|
||||
['{F120AB1C-A35E-4D24-B5E9-41A325E7081B}']
|
||||
{ Property getters and setters }
|
||||
function Getorders_idValue: Integer;
|
||||
procedure Setorders_idValue(const aValue: Integer);
|
||||
@ -1374,7 +1374,7 @@ type
|
||||
|
||||
{ Iosc_Orders_products }
|
||||
Iosc_Orders_products = interface(IDAStronglyTypedDataTable)
|
||||
['{FBC00CDC-A530-4A23-A7E9-9505B9D77CE2}']
|
||||
['{CC27855E-2D28-4432-BA5F-D3C10BA8464D}']
|
||||
{ Property getters and setters }
|
||||
function Getorders_products_idValue: Integer;
|
||||
procedure Setorders_products_idValue(const aValue: Integer);
|
||||
@ -1517,7 +1517,7 @@ type
|
||||
|
||||
{ Iosc_Orders_status_history }
|
||||
Iosc_Orders_status_history = interface(IDAStronglyTypedDataTable)
|
||||
['{57012918-00A1-4389-9EEE-36916520F737}']
|
||||
['{0EB347F2-296B-4A89-9611-FCE05DD7516F}']
|
||||
{ Property getters and setters }
|
||||
function Getorders_status_history_idValue: Integer;
|
||||
procedure Setorders_status_history_idValue(const aValue: Integer);
|
||||
|
||||
@ -9,21 +9,21 @@ const
|
||||
{ Delta rules ids
|
||||
Feel free to change them to something more human readable
|
||||
but make sure they are unique in the context of your application }
|
||||
RID_osc_CustomersDelta = '{C1412566-F9D7-4EAC-92B5-46C11F1FD693}';
|
||||
RID_GetLastIDDelta = '{59E14A54-D224-4088-8DA3-227AEEC2A9D0}';
|
||||
RID_osc_AddressBookDelta = '{0C32C009-F4AE-4EB3-952A-CD06A3FB45B8}';
|
||||
RID_TiendaWebDelta = '{3B0F4F81-AC65-4E5C-B4A5-D10207B5211F}';
|
||||
RID_osc_ManufacturersDelta = '{296EFE03-394F-4B6A-9F5E-5D49F125B9C5}';
|
||||
RID_osc_LanguagesDelta = '{9F575EF3-1DDC-4E46-B628-72D5A2669321}';
|
||||
RID_osc_ProductsDelta = '{184FE447-2217-4F22-BB69-1DD6E743CE0A}';
|
||||
RID_osc_OrdersDelta = '{6C5AF919-342A-4E96-AA97-99B06F4BBFBB}';
|
||||
RID_osc_Orders_productsDelta = '{4E6BBA89-53D6-4B91-8D4B-BC9E4B169CDD}';
|
||||
RID_osc_Orders_status_historyDelta = '{44219788-0AD2-4D35-AE03-653AF9E78717}';
|
||||
RID_osc_CustomersDelta = '{231389E5-387B-485F-92BA-6A9D5A04B8C5}';
|
||||
RID_GetLastIDDelta = '{297778AF-EA70-49C4-87B8-3A1872EB6864}';
|
||||
RID_osc_AddressBookDelta = '{CA6AD7D9-BC5B-4928-8DF8-F2C4A41B1869}';
|
||||
RID_TiendaWebDelta = '{F5C7B2A1-0B48-4C7D-B895-076D5824FFD5}';
|
||||
RID_osc_ManufacturersDelta = '{6FF380D1-E143-4870-947A-581AAF9E9CF6}';
|
||||
RID_osc_LanguagesDelta = '{CA42020F-6544-4029-BC84-51234090EB8F}';
|
||||
RID_osc_ProductsDelta = '{6F4677C4-BDEF-43E8-BEE8-425AA74C13F5}';
|
||||
RID_osc_OrdersDelta = '{E80B38F6-D0AA-4B8C-8110-427D492DDC37}';
|
||||
RID_osc_Orders_productsDelta = '{2FCFD487-854D-420B-9586-E8F12C08F95D}';
|
||||
RID_osc_Orders_status_historyDelta = '{8632B188-5EA5-4866-BFE4-90CB15C3A42B}';
|
||||
|
||||
type
|
||||
{ Iosc_CustomersDelta }
|
||||
Iosc_CustomersDelta = interface(Iosc_Customers)
|
||||
['{C1412566-F9D7-4EAC-92B5-46C11F1FD693}']
|
||||
['{231389E5-387B-485F-92BA-6A9D5A04B8C5}']
|
||||
{ Property getters and setters }
|
||||
function GetOldcustomers_idValue : Integer;
|
||||
function GetOldcustomers_firstnameValue : String;
|
||||
@ -177,7 +177,7 @@ type
|
||||
|
||||
{ IGetLastIDDelta }
|
||||
IGetLastIDDelta = interface(IGetLastID)
|
||||
['{59E14A54-D224-4088-8DA3-227AEEC2A9D0}']
|
||||
['{297778AF-EA70-49C4-87B8-3A1872EB6864}']
|
||||
{ Property getters and setters }
|
||||
function GetOldlast_idValue : Integer;
|
||||
|
||||
@ -211,7 +211,7 @@ type
|
||||
|
||||
{ Iosc_AddressBookDelta }
|
||||
Iosc_AddressBookDelta = interface(Iosc_AddressBook)
|
||||
['{0C32C009-F4AE-4EB3-952A-CD06A3FB45B8}']
|
||||
['{CA6AD7D9-BC5B-4928-8DF8-F2C4A41B1869}']
|
||||
{ Property getters and setters }
|
||||
function GetOldaddress_book_idValue : Integer;
|
||||
function GetOldcustomers_idValue : Integer;
|
||||
@ -413,7 +413,7 @@ type
|
||||
|
||||
{ ITiendaWebDelta }
|
||||
ITiendaWebDelta = interface(ITiendaWeb)
|
||||
['{3B0F4F81-AC65-4E5C-B4A5-D10207B5211F}']
|
||||
['{F5C7B2A1-0B48-4C7D-B895-076D5824FFD5}']
|
||||
{ Property getters and setters }
|
||||
function GetOldIDValue : Integer;
|
||||
function GetOldID_EMPRESAValue : Integer;
|
||||
@ -543,7 +543,7 @@ type
|
||||
|
||||
{ Iosc_ManufacturersDelta }
|
||||
Iosc_ManufacturersDelta = interface(Iosc_Manufacturers)
|
||||
['{296EFE03-394F-4B6A-9F5E-5D49F125B9C5}']
|
||||
['{6FF380D1-E143-4870-947A-581AAF9E9CF6}']
|
||||
{ Property getters and setters }
|
||||
function GetOldmanufacturers_idValue : Integer;
|
||||
function GetOldmanufacturers_nameValue : String;
|
||||
@ -637,7 +637,7 @@ type
|
||||
|
||||
{ Iosc_LanguagesDelta }
|
||||
Iosc_LanguagesDelta = interface(Iosc_Languages)
|
||||
['{9F575EF3-1DDC-4E46-B628-72D5A2669321}']
|
||||
['{CA42020F-6544-4029-BC84-51234090EB8F}']
|
||||
{ Property getters and setters }
|
||||
function GetOldlanguages_idValue : Integer;
|
||||
function GetOldnameValue : String;
|
||||
@ -731,7 +731,7 @@ type
|
||||
|
||||
{ Iosc_ProductsDelta }
|
||||
Iosc_ProductsDelta = interface(Iosc_Products)
|
||||
['{184FE447-2217-4F22-BB69-1DD6E743CE0A}']
|
||||
['{6F4677C4-BDEF-43E8-BEE8-425AA74C13F5}']
|
||||
{ Property getters and setters }
|
||||
function GetOldproducts_idValue : Integer;
|
||||
function GetOldproducts_nameValue : String;
|
||||
@ -862,7 +862,7 @@ type
|
||||
|
||||
{ Iosc_OrdersDelta }
|
||||
Iosc_OrdersDelta = interface(Iosc_Orders)
|
||||
['{6C5AF919-342A-4E96-AA97-99B06F4BBFBB}']
|
||||
['{E80B38F6-D0AA-4B8C-8110-427D492DDC37}']
|
||||
{ Property getters and setters }
|
||||
function GetOldorders_idValue : Integer;
|
||||
function GetOldrdx_orders_id_localValue : Integer;
|
||||
@ -1125,7 +1125,7 @@ type
|
||||
|
||||
{ Iosc_Orders_productsDelta }
|
||||
Iosc_Orders_productsDelta = interface(Iosc_Orders_products)
|
||||
['{4E6BBA89-53D6-4B91-8D4B-BC9E4B169CDD}']
|
||||
['{2FCFD487-854D-420B-9586-E8F12C08F95D}']
|
||||
{ Property getters and setters }
|
||||
function GetOldorders_products_idValue : Integer;
|
||||
function GetOldorders_idValue : Integer;
|
||||
@ -1267,7 +1267,7 @@ type
|
||||
|
||||
{ Iosc_Orders_status_historyDelta }
|
||||
Iosc_Orders_status_historyDelta = interface(Iosc_Orders_status_history)
|
||||
['{44219788-0AD2-4D35-AE03-653AF9E78717}']
|
||||
['{8632B188-5EA5-4866-BFE4-90CB15C3A42B}']
|
||||
{ Property getters and setters }
|
||||
function GetOldorders_status_history_idValue : Integer;
|
||||
function GetOldorders_idValue : Integer;
|
||||
|
||||
@ -1207,7 +1207,7 @@ object srvTiendaWeb: TsrvTiendaWeb
|
||||
Params = <
|
||||
item
|
||||
Name = 'ID'
|
||||
DataType = datInteger
|
||||
DataType = datAutoInc
|
||||
Value = ''
|
||||
ParamType = daptInput
|
||||
end
|
||||
@ -1397,7 +1397,7 @@ object srvTiendaWeb: TsrvTiendaWeb
|
||||
end
|
||||
item
|
||||
Name = 'customers_default_address_id'
|
||||
DataType = datInteger
|
||||
DataType = datAutoInc
|
||||
Value = ''
|
||||
ParamType = daptInput
|
||||
end
|
||||
@ -1551,7 +1551,7 @@ object srvTiendaWeb: TsrvTiendaWeb
|
||||
Params = <
|
||||
item
|
||||
Name = 'customers_info_id'
|
||||
DataType = datInteger
|
||||
DataType = datAutoInc
|
||||
Value = ''
|
||||
ParamType = daptInput
|
||||
end
|
||||
@ -1628,7 +1628,7 @@ object srvTiendaWeb: TsrvTiendaWeb
|
||||
Params = <
|
||||
item
|
||||
Name = 'customers_id'
|
||||
DataType = datInteger
|
||||
DataType = datAutoInc
|
||||
Value = ''
|
||||
ParamType = daptInput
|
||||
end
|
||||
@ -2304,7 +2304,7 @@ object srvTiendaWeb: TsrvTiendaWeb
|
||||
Params = <
|
||||
item
|
||||
Name = 'products_id'
|
||||
DataType = datInteger
|
||||
DataType = datAutoInc
|
||||
Value = ''
|
||||
ParamType = daptInput
|
||||
end
|
||||
|
||||
Binary file not shown.
@ -160,10 +160,10 @@ uses
|
||||
uBizOscProductServer in '..\Modulos\Tienda web\Model\uBizOscProductServer.pas',
|
||||
uTiendaWebUtils in 'Utiles\uTiendaWebUtils.pas',
|
||||
uConexionOSC in 'Configuracion\uConexionOSC.pas' {frConexionOSC: TFrame},
|
||||
schTiendaWebClient_Intf in '..\Modulos\Tienda web\Model\schTiendaWebClient_Intf.pas',
|
||||
schTiendaWebServer_Intf in '..\Modulos\Tienda web\Model\schTiendaWebServer_Intf.pas',
|
||||
schFacturasProveedorClient_Intf in '..\Modulos\Facturas de proveedor\Model\schFacturasProveedorClient_Intf.pas',
|
||||
schFacturasProveedorServer_Intf in '..\Modulos\Facturas de proveedor\Model\schFacturasProveedorServer_Intf.pas';
|
||||
schFacturasProveedorServer_Intf in '..\Modulos\Facturas de proveedor\Model\schFacturasProveedorServer_Intf.pas',
|
||||
schTiendaWebClient_Intf in '..\Modulos\Tienda web\Model\schTiendaWebClient_Intf.pas',
|
||||
schTiendaWebServer_Intf in '..\Modulos\Tienda web\Model\schTiendaWebServer_Intf.pas';
|
||||
|
||||
{$R *.res}
|
||||
{$R ..\Servicios\RODLFile.res}
|
||||
|
||||
@ -35,7 +35,7 @@
|
||||
<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">1</VersionInfo><VersionInfo Name="MinorVer">8</VersionInfo><VersionInfo Name="Release">3</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.8.3.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.8.3.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys><VersionInfoKeys Name="CompileDate">jueves, 24 de junio de 2010 13:44</VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
|
||||
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters><Parameters Name="RunParams">/standalone</Parameters></Parameters><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">4</VersionInfo><VersionInfo Name="MinorVer">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">4.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">4.0.0.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys><VersionInfoKeys Name="CompileDate">jueves, 23 de septiembre de 2010 16:45</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></BorlandProject></BorlandProject>
|
||||
</ProjectExtensions>
|
||||
|
||||
@ -1,7 +1,7 @@
|
||||
MAINICON ICON "C:\Codigo\Resources\Iconos\Servidor.ico"
|
||||
1 VERSIONINFO
|
||||
FILEVERSION 1,8,3,0
|
||||
PRODUCTVERSION 1,8,3,0
|
||||
FILEVERSION 4,0,0,0
|
||||
PRODUCTVERSION 4,0,0,0
|
||||
FILEFLAGSMASK 0x3FL
|
||||
FILEFLAGS 0x00L
|
||||
FILEOS 0x40004L
|
||||
@ -12,9 +12,9 @@ BEGIN
|
||||
BEGIN
|
||||
BLOCK "0C0A04E4"
|
||||
BEGIN
|
||||
VALUE "FileVersion", "1.8.3.0\0"
|
||||
VALUE "ProductVersion", "1.8.3.0\0"
|
||||
VALUE "CompileDate", "jueves, 23 de septiembre de 2010 12:05\0"
|
||||
VALUE "FileVersion", "4.0.0.0\0"
|
||||
VALUE "ProductVersion", "4.0.0.0\0"
|
||||
VALUE "CompileDate", "viernes, 24 de septiembre de 2010 11:21\0"
|
||||
END
|
||||
END
|
||||
BLOCK "VarFileInfo"
|
||||
|
||||
Reference in New Issue
Block a user