Validate International Securities Identification Number: Difference between revisions

Content added Content deleted
(Added COBOL)
Line 1,193:
<lang PureBasic>EnableExplicit
 
Procedure.ib Check_ISIN(*c.Character)
Define count.i=0, Idx.i=1, v.i=0, i.i
Dim s.i(24)
Retrieved from "https://rosettacode.org/wiki/Validate_International_Securities_Identification_Number"