includes/classes/banktransfer_validation.php | 21 ++++++++++++---------
1 file changed, 12 insertions(+), 9 deletions(-)
diff --git a/includes/classes/banktransfer_validation.php b/includes/classes/banktransfer_validation.php
index d235143..d15f99b 100644
|
a
|
b
|
var $PRZ; //Enth
|
| 302 | 302 | $Method16 = 0; |
| 303 | 303 | } |
| 304 | 304 | if ($Help == 1) { |
| 305 | | if ($Checksum == substr($AccountNo,Checkpoint - 2,1)) { |
| | 305 | if ($Checksum == substr($AccountNo,$Checkpoint - 2,1)) { |
| 306 | 306 | $Method16 = 0; |
| 307 | 307 | } |
| 308 | 308 | } |
| … |
… |
var $PRZ; //Enth
|
| 1005 | 1005 | $Gewicht = HexDec(substr($Significance,5,1)); |
| 1006 | 1006 | |
| 1007 | 1007 | $PZ = -1; |
| | 1008 | $Help2 = $Rest + ($PZ * $Gewicht); |
| 1008 | 1009 | while ($Help2 % 11 <>10) { //franky_n |
| 1009 | 1010 | $PZ++; |
| 1010 | 1011 | $Help2 = $Rest + ($PZ * $Gewicht); |
| … |
… |
var $PRZ; //Enth
|
| 1061 | 1062 | |
| 1062 | 1063 | $Gewicht = HexDec(substr($Significance,5, 1)); |
| 1063 | 1064 | $PZ = -1; |
| | 1065 | $Help2 = $Rest + ($PZ * $Gewicht); |
| 1064 | 1066 | while ($Help2 % 11 <> 10 or $PZ > 9) { //franky_n |
| 1065 | 1067 | $PZ++; |
| 1066 | 1068 | $Help2 = $Rest + ($PZ * $Gewicht); |
| … |
… |
var $PRZ; //Enth
|
| 1204 | 1206 | case ($help01 == 91): |
| 1205 | 1207 | case ($help01 == 99): |
| 1206 | 1208 | // Variante 3: Methode 09 (Keine Berechnung). |
| 1207 | | $PResult = $this->Mark09($AccountNo);; |
| | 1209 | $PResult = $this->Mark09($AccountNo); |
| 1208 | 1210 | break; |
| 1209 | | case ($help01 >= 01 && $help <= 31): |
| | 1211 | case ($help01 >= 01 && $help01 <= 31): |
| 1210 | 1212 | // Variante 4: Dritte und vierte Stelle zwischen 01 und 12 |
| 1211 | 1213 | // -UND- siebte bis neunte Stelle kleiner 500. |
| 1212 | 1214 | $help03 = substr($AccountNo,2,2); |
| … |
… |
var $PRZ; //Enth
|
| 1218 | 1220 | } |
| 1219 | 1221 | } |
| 1220 | 1222 | // Ausnahme: Diese Kontonummer ist als richtig zu bewerten. |
| 1221 | | if ($AccountNo == 0185125434) { |
| | 1223 | if ((string)$AccountNo == '0185125434') { |
| 1222 | 1224 | $PResult = 0; |
| 1223 | 1225 | } |
| 1224 | 1226 | break; |
| … |
… |
var $PRZ; //Enth
|
| 1818 | 1820 | } |
| 1819 | 1821 | } |
| 1820 | 1822 | if ($D2 == 0) { |
| 1821 | | $P = $TAB1[$A5]; |
| | 1823 | $P = $Tab1[$A5]; |
| 1822 | 1824 | } else { |
| 1823 | | $P = $TAB2[$A5]; |
| | 1825 | $P = $Tab2[$A5]; |
| 1824 | 1826 | } |
| 1825 | 1827 | if ($P == $AccountNoTemp[10]) { |
| 1826 | 1828 | $Result = 0; |
| … |
… |
var $PRZ; //Enth
|
| 1918 | 1920 | } |
| 1919 | 1921 | } |
| 1920 | 1922 | } |
| 1921 | | return $Help;; |
| | 1923 | return $Help; |
| 1922 | 1924 | } /* End of Mark91 */ |
| 1923 | 1925 | |
| 1924 | 1926 | private function Mark92($AccountNo) { |
| … |
… |
var $PRZ; //Enth
|
| 2279 | 2281 | // Variante 1 - Zwei führende Nullen |
| 2280 | 2282 | if ((substr($AccountNo,0,2) == "00")And (substr($AccountNo,2,1) != "0")){ |
| 2281 | 2283 | $Significance = '1231231'; |
| | 2284 | $Step3 = 0; |
| 2282 | 2285 | for ($Run = 0;$Run < strlen($Significance);$Run++) { |
| 2283 | 2286 | $Step1 = (substr($AccountNo,$Run + 2,1) * substr($Significance,$Run,1)); |
| 2284 | 2287 | $Step2 = $Step1 + substr($Significance,$Run,1); |
| … |
… |
var $PRZ; //Enth
|
| 2300 | 2303 | // Variante 2 - Drei führende Nullen |
| 2301 | 2304 | } elseif ((substr($AccountNo,0,3) == "000")And (substr($AccountNo,3,1) != "0")){ |
| 2302 | 2305 | $Significance = '654321'; |
| | 2306 | $Step1 = 0; |
| 2303 | 2307 | for ($Run = 0;$Run < strlen($Significance);$Run++) { |
| 2304 | 2308 | $Step1 += (substr($AccountNo,$Run + 3,1) * substr($Significance,$Run,1)); |
| 2305 | 2309 | } |
| … |
… |
var $PRZ; //Enth
|
| 2854 | 2858 | |
| 2855 | 2859 | |
| 2856 | 2860 | class IbanAccountCheck extends AccountCheck { |
| | 2861 | private $ibanstructure = Array(); |
| 2857 | 2862 | |
| 2858 | 2863 | /* |
| 2859 | 2864 | ----------------------------------------------------------------------------------------- |
| … |
… |
class IbanAccountCheck extends AccountCheck {
|
| 3866 | 3871 | |
| 3867 | 3872 | } /* End Class IbanAccountCheck */ |
| 3868 | 3873 | |
| 3869 | | |
| 3870 | | ?> |
| 3871 | | No newline at end of file |