Update of /server/cvs/freexp In directory m25s18:/tmp/cvs-serv15836 Modified Files: Tag: Branch_3_20_Release xp10p.inc Log Message: MW: - Anpassungen an die Mehrwertsteuererhoeung vom 01.01.2007 bzw. an die aktuellen Tarife der T-Com
--- /server/cvs/freexp/xp10p.inc 2005/02/18 11:17:38 1.3.2.9 +++ /server/cvs/freexp/xp10p.inc 2007/01/23 18:45:37 1.3.2.10 @@ -8,7 +8,7 @@ { Die Nutzungsbedingungen fuer diesen Quelltext finden Sie in der } { Datei SLIZENZ.TXT oder auf www.crosspoint.de/oldlicense.html. } { --------------------------------------------------------------- } -{ $Id: xp10p.inc,v 1.3.2.9 2005/02/18 11:17:38 mw Exp $ } +{ $Id: xp10p.inc,v 1.3.2.10 2007/01/23 18:45:37 mw Exp $ } procedure SavePhonezones; var t : text; @@ -288,17 +288,17 @@ for i:=1 to maxwotage do tarif^[1].wochentag[i]:=(i<=5); tarif^[1].zeitbereiche:=3; - bereich(1,1,'00:00','06:59',60,3,60,149,60,2,60,2,60,3,0,0,60,6,60,26,60,24,60,13, - 60,246,60,13,60,31,60,59); - bereich(1,2,'07:00','18:59',60,5,60,149,60,4,60,4,60,5,0,0,60,6,60,26,60,24,60,13, - 60,246,60,13,60,31,60,59); - bereich(1,3,'19:00','23:59',60,3,60,149,60,2,60,2,60,3,0,0,60,12,60,26,60,24,60,13, - 60,246,60,13,60,31,60,59); + bereich(1,1,'00:00','06:59',60,3,60,153,60,2,60,2,60,3,0,0,60,7,60,24,60,22,60,13, + 60,26,60,13,60,40,60,61); + bereich(1,2,'07:00','18:59',60,6,60,153,60,4,60,4,60,6,0,0,60,13,60,24,60,22,60,13, + 60,26,60,13,60,40,60,61); + bereich(1,3,'19:00','06:59',60,3,60,153,60,2,60,2,60,3,0,0,60,7,60,24,60,22,60,13, + 60,26,60,13,60,40,60,61); for i:=1 to maxwotage do tarif^[2].wochentag[i]:=(i in [6,7,8,9,10]); tarif^[2].zeitbereiche:=1; - bereich(2,1,'00:00','23:59',60,3,60,149,60,2,60,2,60,3,0,0,60,6,60,26,60,24,60,13, - 60,246,60,13, 60,31,60,59); + bereich(2,1,'00:00','06:59',60,3,60,153,60,2,60,2,60,3,0,0,60,7,60,24,60,22,60,13, + 60,26,60,13,60,40,60,61); end; if not loadt then SavePhonezones; end; @@ -316,6 +316,10 @@ end; { $Log: xp10p.inc,v $ + Revision 1.3.2.10 2007/01/23 18:45:37 mw + MW: - Anpassungen an die Mehrwertsteuererhoeung vom 01.01.2007 + bzw. an die aktuellen Tarife der T-Com + Revision 1.3.2.9 2005/02/18 11:17:38 mw MW: - Korrektur des Logeintrags ------------------------------------------------------------------------ FreeXP CVS-Mailingliste CVS-List@freexp.de http://www.freexp.de/cgi-bin/mailman/listinfo/cvs-list