flexray.org - PERL Programming

NIP Control Number Verifier

flexray — Tue, 24 Oct 2006 09:35:19 +0200

#!/usr/bin/perl # # Skrypcik sprawdza plik wejsciowy w formacie .csv pola oddzielane znakiem ; na poprawnosc # numeru NIP, na podstawie ostatniej cyfry kontrolnej # # $inputfile - plik wejsciowy # $outputfile - plik z blednymi NIPami # @wagi - stale wagowe kolejnych cyfr # ########### Maciej Stopa # # This is free software; you may redistribute it and/or modify # it under the terms of the GNU General Public License as # published by the Free Software Foundation; either version 2, # or (at your option) any later version. # # This is distributed in the hope that it will be useful, but


read more



SAP 02 XML Message Generator
flexray — Sun, 22 Oct 2006 16:26:35 +0200


#!/usr/bin/perl

#

#  Skrypcik tworzy xml'e do SAP'a 02, plik wejsciowy w formacie .csv pola oddzielane znakiem ;

#  $inputfile  - plik wejsciowy

#  $outputfile - naglowek nazwy pliku wyjsciowego, potem dodajemy date oraz numerek czesci

#  $docnum     - numer DOCNUM w SAP02 bez ostatniej cyfry, ktora nadaje kolejno dla plikow

#                ktore tworzymy, w zaleznosci od ilosci rekordow

#  $numrec     - ilosc rekordow jakie ujmiemy w pojedynczym pliku SAP02

#  %payment    - wartosci oplaty za rozne rodzaje kart

#

############     Maciej Stopa

#

#  This is free software; you may redistribute it and/or modify

read more


GPL License
flexray — Sun, 22 Oct 2006 15:28:56 +0200
# This is free software; you may redistribute it and/or modify

# it under the terms of the GNU General Public License as

# published by the Free Software Foundation; either version 2,

# or (at your option) any later version.

#

# This 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.