Tcl Library Source Code

Check-in [3c45e337d4]
Login
Core Home Blog Docs Downloads Tickets Timeline Branches Tags Wiki
Bounty program for improvements to Tcl and certain Tcl packages.

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Ticket [9318a6687f]: Applied patch by Max Jarek to update the code to the IBAN Registry version 47. Bumped package version to 1.4.
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: 3c45e337d402ba665150be67e191ae17a9426980
User & Date: andreask 2014-01-21 17:39:25
References
2014-01-21
17:40 • Closed ticket [9318a6687f]: valtype::iban update plus 6 other changes artifact: 1b1fce756e user: aku
Context
2014-01-21
19:19
Fixed manpage names clashes within Tcllib. No problem within embedded/ docs, due to the directory structure. When installed however all are in the same directory and some clashed. check-in: 6c93670d5e user: andreask tags: trunk
17:56
Fixes to various testsuites and code, in preparation for 1.16 release. Release Candidate Branch opened now. check-in: 9fd75df6e5 user: aku tags: tcllib-1-16-rc
17:39
Ticket [9318a6687f]: Applied patch by Max Jarek to update the code to the IBAN Registry version 47. Bumped package version to 1.4. check-in: 3c45e337d4 user: andreask tags: trunk
17:28
Ticket [861f53ff24]. Added proper initialization to CreateNonce when falling back to md5 (no dev/urandom). Bumped version to 1.3.3. check-in: 8175173735 user: andreask tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to modules/valtype/ChangeLog. 








1
2
3
4
5
6
7







2013-10-28  Andreas Kupries  <[email protected]>

	* iban.tcl: Ticket [a3dd326ec8]: Applied patch by Max
	* iban.test: Jarek to update the code to the IBAN Registry
	* iban.man: version 46. Bumped package version to 1.3.
	* pkgIndex.tcl:


>
>
>
>
>
>
>








1
2
3
4
5
6
7
8
9
10
11
12
13
14

2014-01-21  Andreas Kupries  <[email protected]>

	* iban.tcl: Ticket [9318a6687f]: Applied patch by Max
	* iban.test: Jarek to update the code to the IBAN Registry
	* iban.man: version 47. Bumped package version to 1.4.
	* pkgIndex.tcl:

2013-10-28  Andreas Kupries  <[email protected]>

	* iban.tcl: Ticket [a3dd326ec8]: Applied patch by Max
	* iban.test: Jarek to update the code to the IBAN Registry
	* iban.man: version 46. Bumped package version to 1.3.
	* pkgIndex.tcl:

Changes to modules/valtype/iban.man. 

1
2
3
4
5
6
7
8
9
10
11
12
13
14

[comment {-*- tcl -*- --- doctools ---}]
[vset PACKAGE iban]
[vset VERSION 1.3]
[vset A an]
[vset NAME IBAN]
[vset NAMEX {International Bank Account Number}]
[vset CODE IBAN]
[vset OK  ....]
[vset BAD ....]
[vset KEYWORDS k_iban]
[vset REQUIRE null]
[vset METHODS null]
[vset CODES null]
[include include/vtype.inc]


|












1
2
3
4
5
6
7
8
9
10
11
12
13
14

[comment {-*- tcl -*- --- doctools ---}]
[vset PACKAGE iban]
[vset VERSION 1.4]
[vset A an]
[vset NAME IBAN]
[vset NAMEX {International Bank Account Number}]
[vset CODE IBAN]
[vset OK  ....]
[vset BAD ....]
[vset KEYWORDS k_iban]
[vset REQUIRE null]
[vset METHODS null]
[vset CODES null]
[include include/vtype.inc]

Changes to modules/valtype/iban.tcl. 

29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
..
84
85
86
87
88
89
90
91

    # Type Methods

    typevariable cclen -array {
	AL 28 AD 24 AT 20 BH 22 BE 16 BA 20 BG 22 BR 29 CR 21 HR 21 CY 28 CZ 24 DK 18 FO 18 GL 18 DO 28 EE 20 FI 18
	FR 27 GF 27 GP 27 MQ 27 RE 27 PF 27 TF 27 YT 27 NC 27 PM 27 WF 27 GE 22 DE 22 GI 23 GR 27 HU 28
	IS 26 IE 22 IL 23 IT 27 KZ 20 KW 30 LV 21 LB 28 LI 21 LT 20 LU 20 MK 19 MT 31 MR 27 MU 30 MC 27
	ME 22 NL 18 NO 15 PL 28 PS 29 PT 25 RO 24 SM 27 SA 24 RS 22 SK 24 SI 19 ES 24 SE 24 CH 21 TN 24 TR 26
	AE 23 GB 22 AZ 28 MD 24 PK 24 VG 24 GT 28 QA 29
    }

    typevariable charmap {
	A 10 B 11 C 12 D 13 E 14 F 15 G 16 H 17 I 18 J 19 K 20 L 21 M 22
	N 23 O 24 P 25 Q 26 R 27 S 28 T 29 U 30 V 31 W 32 X 33 Y 34 Z 35
    }

................................................................................
        $type validate $value
    }
}

# # ## ### ##### ######## ############# ######################
## Ready

package provide valtype::iban 1.3







|







 







|

29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
..
84
85
86
87
88
89
90
91

    # Type Methods

    typevariable cclen -array {
	AL 28 AD 24 AT 20 BH 22 BE 16 BA 20 BG 22 BR 29 CR 21 HR 21 CY 28 CZ 24 DK 18 FO 18 GL 18 DO 28 EE 20 FI 18
	FR 27 GF 27 GP 27 MQ 27 RE 27 PF 27 TF 27 YT 27 NC 27 PM 27 WF 27 GE 22 DE 22 GI 23 GR 27 HU 28
	IS 26 IE 22 IL 23 IT 27 KZ 20 KW 30 LV 21 LB 28 LI 21 LT 20 LU 20 MK 19 MT 31 MR 27 MU 30 MC 27
	ME 22 NL 18 NO 15 PL 28 PS 29 PT 25 RO 24 SM 27 SA 24 RS 22 SK 24 SI 19 ES 24 SE 24 CH 21 TN 24 TR 26
	AE 23 GB 22 AZ 28 MD 24 PK 24 VG 24 GT 28 QA 29 JO 30
    }

    typevariable charmap {
	A 10 B 11 C 12 D 13 E 14 F 15 G 16 H 17 I 18 J 19 K 20 L 21 M 22
	N 23 O 24 P 25 Q 26 R 27 S 28 T 29 U 30 V 31 W 32 X 33 Y 34 Z 35
    }

................................................................................
        $type validate $value
    }
}

# # ## ### ##### ######## ############# ######################
## Ready

package provide valtype::iban 1.4

Changes to modules/valtype/iban.test. 

65
66
67
68
69
70
71

72
73
74
75
76
77
78

    GT82TRAJ01020000001210029690
    HR1210010051863000160
    HU42117730161111101800000000
    IE29AIBK93115212345678
    IL620108000000099999999
    IS140159260076545510730339
    IT60X0542811101000000123456

    KW81CBKU0000000000001234560101
    KZ86125KZT5004100100
    LB62099900000001001901229114
    LI21088100002324013AA
    LT121000011101001000
    LU280019400644750000
    LV80BANK0000435195001







>








65
66
67
68
69
70
71
72
73
74
75
76
77
78
79

    GT82TRAJ01020000001210029690
    HR1210010051863000160
    HU42117730161111101800000000
    IE29AIBK93115212345678
    IL620108000000099999999
    IS140159260076545510730339
    IT60X0542811101000000123456
    JO94CBJO0010000000000131000302
    KW81CBKU0000000000001234560101
    KZ86125KZT5004100100
    LB62099900000001001901229114
    LI21088100002324013AA
    LT121000011101001000
    LU280019400644750000
    LV80BANK0000435195001

Changes to modules/valtype/pkgIndex.tcl. 

6
7
8
9
10
11
12
13

package ifneeded valtype::gs1::ean13             1 [list source [file join $dir ean13.tcl]]
package ifneeded valtype::imei                   1 [list source [file join $dir imei.tcl]]
package ifneeded valtype::isbn                   1 [list source [file join $dir isbn.tcl]]
package ifneeded valtype::luhn                   1 [list source [file join $dir luhn.tcl]]
package ifneeded valtype::luhn5                  1 [list source [file join $dir luhn5.tcl]]
package ifneeded valtype::usnpi                  1 [list source [file join $dir usnpi.tcl]]
package ifneeded valtype::verhoeff               1 [list source [file join $dir verhoeff.tcl]]
package ifneeded valtype::iban                 1.3 [list source [file join $dir iban.tcl]]







|

6
7
8
9
10
11
12
13

package ifneeded valtype::gs1::ean13             1 [list source [file join $dir ean13.tcl]]
package ifneeded valtype::imei                   1 [list source [file join $dir imei.tcl]]
package ifneeded valtype::isbn                   1 [list source [file join $dir isbn.tcl]]
package ifneeded valtype::luhn                   1 [list source [file join $dir luhn.tcl]]
package ifneeded valtype::luhn5                  1 [list source [file join $dir luhn5.tcl]]
package ifneeded valtype::usnpi                  1 [list source [file join $dir usnpi.tcl]]
package ifneeded valtype::verhoeff               1 [list source [file join $dir verhoeff.tcl]]
package ifneeded valtype::iban                 1.4 [list source [file join $dir iban.tcl]]

This page was generated in about 0.023s by Fossil 2.10 [eb804dc674] 2019-09-19 14:14:14