debian/0000755000000000000000000000000011742013134007162 5ustar debian/compat0000755000000000000000000000000211506074362010373 0ustar 7 debian/changelog0000755000000000000000000000166611742013126011051 0ustar facturlinex2 (2.2.0-1) unstable; urgency=low * Uploaded to Debian (Closes: #652840) -- Nicolas Lopez de Lerma Aymerich Fri, 13 Apr 2012 23:21:47 +0200 facturlinex2 (2.2.0-0) unstable; urgency=low * Update to new version rev 464 -- Nicolas Lopez de Lerma Aymerich Mon, 19 Mar 2012 14:29:47 +0200 facturlinex2 (2.0.1-1) unstable; urgency=low * Update to new version rev 440 * Uploaded to Debian (Closes: #642080) -- Nicolas Lopez de Lerma Aymerich Mon, 17 Nov 2011 18:29:47 +0200 facturlinex2 (2.0.0-2) unstable; urgency=low * Fixed description of the package * Uploaded to Debian (Closes: #609809) -- Nicolas Lopez de Lerma Aymerich Thu, 31 Mar 2011 10:29:47 +0200 facturlinex2 (2.0.0-1) unstable; urgency=low * Initial package -- Nicolas Lopez de Lerma Aymerich Tue, 28 Dec 2010 11:34:00 +0100 debian/control0000755000000000000000000000137711742012154010601 0ustar Source: facturlinex2 Section: x11 Priority: optional DM-Upload-Allowed: yes Maintainer: Nicolas Lopez de Lerma Aymerich Standards-Version: 3.9.1 Build-Depends: debhelper (>= 7),lazarus-src,fpc,fp-utils,lcl Homepage: http://sourceforge.net/projects/facturlinex/ Package: facturlinex2 Architecture: i386 Depends: ${shlibs:Depends}, ${misc:Depends}, libmysqlclient16, mysql-client, mysql-server Suggests: glabels Description: ERP/CRM for small and medium businesses Billing application, storage and sale POS, multi-shop, multiuser, streamlines the process when making sales, invoices, orders or request statistics. . This application allows you to control the movement of all stock, box and POS billing and sales, from 1 to 99999 branches. debian/source/0000755000000000000000000000000011506074362010472 5ustar debian/source/format0000755000000000000000000000001411506074362011703 0ustar 3.0 (quilt) debian/dirs0000755000000000000000000000026111506074362010060 0ustar usr/bin usr/share/applications usr/share/facturlinex2 usr/share/facturlinex2/Icons usr/share/facturlinex2/Report usr/share/facturlinex2/locale usr/share/gnome/apps/Applications debian/rules0000755000000000000000000000541411742012251010245 0ustar #!/usr/bin/make -f # Uncomment this to turn on verbose mode. #export DH_VERBOSE=1 ifeq (,$(findstring nostrip,$(DEB_BUILD_OPTIONS))) INSTALL_PROGRAM += -s endif build: build-stamp build-stamp: dh_testdir touch build-stamp clean: dh_testdir dh_testroot rm -f build-stamp install-stamp rm -f Fuentes/Bin/* dh_clean install: build dh_testdir dh_testroot dh_prep /usr/bin/fpc -MDelphi -Sgi -O1 -gl -vewnhi -l -Fu/usr/lib/lazarus/default/lcl/units/i386-linux/ -Fu/usr/lib/lazarus/default/lcl/units/i386-linux/gtk2/ -Fu./Fuentes/powerpdf/ -FU./Fuentes/Bin/ -FE./Fuentes/Bin/ -dLAZ_POWERPDF -dLCL -dLCLgtk2 ./Fuentes/powerpdf/PowerPdf.pas /usr/bin/fpc -s -MObjFPC -Si -Os1 -gl -XX -vewnhi -l -Fu./Fuentes/ -Fu/usr/lib/lazarus/default/components/tachart/ -Fu./Fuentes/zeos/ -Fu./Fuentes/zeos/component/ -Fu./Fuentes/zeos/core/ -Fu./Fuentes/zeos/dbc/ -Fu./Fuentes/zeos/parsesql -Fu./Fuentes/zeos/plain/ -Fu/usr/lib/lazarus/default/components/lazreport/source/addons/pdfexport/ -Fu/usr/lib/lazarus/default/components/lazreport/source/ -Fu/usr/lib/lazarus/default/components/printers/lib/i386-linux/gtk2/ -Fu/usr/lib/lazarus/default/components/synedit/units/i386-linux/ -Fu./Fuentes/powerpdf/ -Fu/usr/lib/lazarus/default/ideintf/units/i386-linux/ -Fu/usr/lib/lazarus/default/lcl/units/i386-linux/ -Fu/usr/lib/lazarus/default/lcl/units/i386-linux/gtk2/ -Fu./Fuentes/dcpcrypt/ -Fu/usr/lib/lazarus/default/packager/units/i386-linux/ -Fu./Fuentes/ -Fu. -FU./Fuentes/Bin/ -FE./Fuentes/Bin/ -oFacturLinEx -dLCL -dLCLgtk2 ./Fuentes/FacturLinEx.lpr /usr/bin/ld -b elf32-i386 -m elf_i386 --dynamic-linker=/lib/ld-linux.so.2 -L. -o ./Fuentes/Bin/FacturLinEx ./Fuentes/Bin/link.res dh_installdirs dh_install Fuentes/Bin/FacturLinEx /usr/bin/ dh_link /usr/bin/FacturLinEx /usr/bin/facturlinex2 dh_install facturlinex2.sql /usr/share/facturlinex2/ dh_install Report/* /usr/share/facturlinex2/Report/ dh_install locale/* /usr/share/facturlinex2/locale/ dh_install Icons/* /usr/share/facturlinex2/Icons/ dh_install FacturLinEx2.desktop /usr/share/facturlinex2/ dh_install FacturLinEx2.desktop /usr/share/applications/ dh_install copyright /usr/share/facturlinex2/ dh_link /usr/lib/libmysqlclient.so.16.0.0 /usr/lib/libmysqlclient.so touch install-stamp binary-indep: build install # There are no architecture-independent files to be uploaded # generated by this package. If there were any they would be # made here. # Build architecture-dependent files here. binary-arch: build install dh_testdir dh_testroot dh_installchangelogs dh_installdocs dh_installman facturlinex2.1 dh_installman FacturLinEx.1 dh_link dh_strip dh_compress dh_fixperms dh_installdeb dh_shlibdeps dh_gencontrol dh_md5sums dh_builddeb binary: binary-indep binary-arch .PHONY: build clean binary-indep binary-arch binary install debian/patches/0000755000000000000000000000000011742012640010612 5ustar debian/patches/debian-changes-2.2.0-00000644000000000000000000001726511742012640014172 0ustar Description: Upstream changes introduced in version 2.2.0-0 This patch has been created by dpkg-source during the package build. Here's the last changelog entry, hopefully it gives details on why those changes were made: . facturlinex2 (2.2.0-0) unstable; urgency=low . * Uploaded to Debian (Closes: #652840) . The person named in the Author field signed this changelog entry. Author: Nicolas Lopez de Lerma Aymerich Bug-Debian: http://bugs.debian.org/652840 --- The information above should follow the Patch Tagging Guidelines, please checkout http://dep.debian.net/deps/dep3/ to learn about the format. Here are templates for supplementary fields that you might want to add: Origin: , Bug: Bug-Debian: http://bugs.debian.org/ Bug-Ubuntu: https://launchpad.net/bugs/ Forwarded: Reviewed-By: Last-Update: --- /dev/null +++ facturlinex2-2.2.0/Fuentes/fn_cadenas.pas @@ -0,0 +1,133 @@ +{ + Gestion LinEx FacturLinEx + + This program is free software; you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation; either version 3 of the License, or + (at your option) any later version. + + This program is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. + + You should have received a copy of the GNU General Public License + along with this program; if not, write to the Free Software + Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA +} + +unit fn_cadenas; + +{$mode objfpc} + +interface + +uses + Classes, SysUtils; + + function limpiar_cadena(sCadena: ansistring; cCaracter: Char): ansistring; + function convertir_a_hex(sCadena: ansistring): ansistring; + function Val2Hex(ilPassedValue : LongInt) : String; + function Char2Hex(cPassedChar : Char) : String; + + +implementation + +// ----------------- ELIMINAR DE UNA CADENA UN CARACTER DETERMINADO ------------ +// Sintaxis: +// limpiar_cadena(sCadena, cCaracter); +// Devuelve la cadena inicial sin el carácter indicado +// Ejemplo: +// cadena:=limpiar_cadena(cadena, 'A'); +// Elimina todas las letras A de cadena +// ----------------------------------------------------------------------------- +function limpiar_cadena(sCadena: ansistring; cCaracter: Char): ansistring; +var + cont: integer; +begin + cont := 1; + while cont <= length(sCadena) do begin + if sCadena[cont]=cCaracter then delete(sCadena,cont,1); + cont := cont + 1; + end; + Result := sCadena; +end; + +// --------------- CONVERTIR UNA CADENA A SU VALOR HEXADECIMAL ----------------- +// Sintaxis: +// convertir_a_hex(sCadena); +// Devuelve la cadena convertida a hexadecimal +// Ejemplo: +// cadenahex:=convertir_a_hex(cadena); +// ----------------------------------------------------------------------------- +function convertir_a_hex(sCadena: ansistring): ansistring; +var + sRetStr : String; + cont : integer; + car : char; +begin + if length(sCadena) > 0 then begin + sRetStr:='0x'; + for cont := 1 to length(sCadena) do begin + car := sCadena[cont]; + sRetStr := sRetStr + Char2Hex(car); + end; + end; + convertir_a_hex:=sRetStr; +end; + +//=============== Char2Hex -> Char a Hexadecimal ================ + Function Char2Hex(cPassedChar : Char) : String; + var + sRetStr : String; + begin + sRetStr := ''; + sRetStr := Val2Hex(Ord(cPassedChar)); + While length(sRetStr) < 2 do + sRetStr := '0' + sRetStr; + Char2hex := sRetStr; + + end; + +//=============== Val2Hex -> LongInt a Hexadecimal ================ + Function Val2Hex(ilPassedValue : LongInt) : String; + var + sRetStr : String; + sTempStr : String; + iRest : Integer; + ilFigure : LongInt; + begin + sRetStr := ''; + sTempStr := ''; + iRest := 0; + ilFigure := 0; + ilFigure := ilPassedValue; + Repeat + iRest := ilFigure MOD 16; + Case iRest of + 0 : sTempStr := '0'; + 1 : sTempStr := '1'; + 2 : sTempStr := '2'; + 3 : sTempStr := '3'; + 4 : sTempStr := '4'; + 5 : sTempStr := '5'; + 6 : sTempStr := '6'; + 7 : sTempStr := '7'; + 8 : sTempStr := '8'; + 9 : sTempStr := '9'; + 10 : sTempStr := 'A'; + 11 : sTempStr := 'B'; + 12 : sTempStr := 'C'; + 13 : sTempStr := 'D'; + 14 : sTempStr := 'E'; + 15 : sTempStr := 'F'; + End; + sRetStr := sTempStr + sRetStr; + ilFigure := ilFigure - iRest; + ilFigure := ilFigure DIV 16; + Until ilFigure = 0; + Val2Hex := sRetStr; + end; + +end. + --- facturlinex2-2.2.0.orig/Fuentes/about.pas +++ facturlinex2-2.2.0/Fuentes/about.pas @@ -84,7 +84,7 @@ end; procedure TAboutbox.FormCreate(Sender: TObject); begin // Asignamos el valor de la versión del programa para mostrar en pantalla - LabelVersion.Caption := 'Desarrollo 2.1 - Rev.464-20120303'; + LabelVersion.Caption := 'Estable 2.2 - Rev.464-20120319'; // A por estos datos y otros como Nombre del producto, versión, etc // se podría acudir a un fichero --- /dev/null +++ facturlinex2-2.2.0/Fuentes/fn_mysql.pas @@ -0,0 +1,68 @@ +{ + Gestion LinEx FacturLinEx + + This program is free software; you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation; either version 3 of the License, or + (at your option) any later version. + + This program is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. + + You should have received a copy of the GNU General Public License + along with this program; if not, write to the Free Software + Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA +} + +unit fn_mysql; + +{$mode objfpc} + +interface + +uses + Classes, SysUtils, ZConnection; + + function mysql_conectar(dbConector: TZConnection; sServidor, sBaseDatos, sUsuario, sClave, sProtocolo: String; iPuerto: Integer): Boolean; + procedure mysql_desconectar(dbConector: TZConnection); + + +implementation + +// ------------------- CONEXION CON EL SERVIDOR MySQL -------------------------- +// Sintaxis: +// mysql_conectar(dbConector, sServidor, sBaseDatos, sUsuario, sClave, sProtocol, iPuerto); +// Ejemplo: +// mysql_conectar(dbConector, 'localhost', 'facturlinex2', 'usuario','clave','mysql-5',3306); +// ----------------------------------------------------------------------------- +function mysql_conectar(dbConector: TZConnection; sServidor, sBaseDatos, sUsuario, sClave, sProtocolo: String; iPuerto: Integer): Boolean; +begin + dbConector.HostName:=sServidor; + dbConector.Database:=sBaseDatos; + dbConector.User:=sUsuario; + dbConector.Password:=sClave; + dbConector.Protocol:=sProtocolo; + dbConector.Port:=iPuerto; + + try + dbConector.Connected:=True + except + result:=False; + end; +end; + +// ---------------- CONEXION CON EL SERVIDOR MySQL --------------------- +// Sintaxis: +// mysql_desconectar(dbConector); +// Ejemplo: +// mysql_desconectar(dbConector); +// ----------------------------------------------------------------------------- +procedure mysql_desconectar(dbConector: TZConnection); +begin + dbConector.Connected:= False; +end; + +end. + debian/patches/series0000644000000000000000000000002711731157776012050 0ustar debian-changes-2.2.0-0 debian/copyright0000644000000000000000000001015111643014120011107 0ustar This package was debianized by Nicolas Lopez de Lerma Aymerich on Thu, 27 Jan 2011 14:02:14 +0100. Upstream Author(s): Nicolas Lopez de Lerma Aymerich nicolas@esdebian.org Copyright: THIS PROGRAM IS DISTRIBUTED UNDER THE TERMS OF GPL V3. Copyright (C) 2003, 2011 Nicolas Lopez de Lerma Aymerich nicolas@esdebian.org DEVELOPED BY: Nicolas Lopez de Lerma Aymerich (nicolas@esdebian.org) Antonio Dominguez (adslinex@esdebian.org) Jose Belenguer (xterm@esdebian.org) Xaime Alvarez (xaime@esdebian.org) Javier Perez (f-javier@esdebian.org) Elmo Calatayud (ec.calatayud@gmail.com) On Debian systems, the complete text of the GNU General Public License can be found in the file ‘/usr/share/common-licenses/GPL-3’. Sources include also code files with individual licenses: Directory zeos Copyright (c) 1999-2006 Zeos Development Group License Agreement: This library is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. The source code of the ZEOS Libraries and packages are distributed under the Library GNU General Public License (see the file COPYING / COPYING.ZEOS) with the following modification: As a special exception, the copyright holders of this library give you permission to link this library with independent modules to produce an executable, regardless of the license terms of these independent modules, and to copy and distribute the resulting executable under terms of your choice, provided that you also meet, for each linked independent module, the terms and conditions of the license of that module. An independent module is a module which is not derived from or based on this library. If you modify this library, you may extend this exception to your version of the library, but you are not obligated to do so. If you do not wish to do so, delete this exception statement from your version. The project web site is located on: http://zeos.firmos.at (FORUM) http://zeosbugs.firmos.at (BUGTRACKER) svn://zeos.firmos.at/zeos/trunk (SVN Repository) http://www.sourceforge.net/projects/zeoslib http://www.zeoslib.sourceforge.net Zeos Development Group. Directory powerpdf Copyright (c) 1999-2001 Takezou. This library is free software; you can redistribute it and/or modify it under the terms of the GNU Library General Public License as published by the Free Software Foundation; either version 2 of the License, or any later version. This library is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Library general Public License for more details. You should have received a copy of the GNU Library General Public License along with this library. Directory dcpcrypt DCPcrypt v2.0 written by David Barton (crypto@cityinthesky.co.uk) A binary compatible implementation of Cast256 Copyright (c) 1999-2002 David Barton Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated documentation files (the "Software"), to deal in the Software without restriction, including without limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of the Software, and to permit persons to whom the Software is furnished to do so, subject to the following conditions: The above copyright notice and this permission notice shall be included in all copies or substantial portions of the Software. THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.