* モジュラス10ウェイト3のチェックデジットを計算します? * @param {number} data - チェックデジットを計算する文字? * @returns {number} chkdigit - チェックデジット * */ function M10W3(data){//チェックデジット var chkdigit = 0; //デジット計算用 モジュラス10ウェイト3. * @return. */ public static String calcCheckDigit(String x) { int sum = 0; char[] c = x.toCharArray(); for (int i = 0; i < c.length; i++) { sum += (c[i] & 0xf) * (((i ^ c.length) & 1) << 1 | 1); } return DIGIT_TBL[sum % 10]; } /** * デジット仕上げ用テーブル. */ そのチェックディジットは、 モジュラス10ウェイト3・1と呼ばれる方式 で定まっています。 奇数番の数そのまま足し、偶数番は3倍して足し、それを10で割った余りの数字を、10から引いた数字です。 合同式を使った数式で言えば、 \begin {aligned}x \equiv \sum_ {k=1}^ {6} (a_ {2k-1} +3a_ {2k})\, (\mathrm {mod} \,10)\end {aligned} x ≡ k=1∑6 (a2k−1 + 3a2k)(mod10) チェックデジット（モジュラス10ウェイト3・1） ＜計算式＞ ①データの末尾の桁からウエイトを3.1.3.1.とかけてゆき総和を求めます。 ②総和を"10"で割りその 余りを求めます。 ③"10"より余りを引いた値がチェックデジットとなります。(モジュラス 10/ウェイト3) それぞれのコード長は色々と種類があるようで最大長もわからないので個別にインプリメントしてください。 PLS_INTEGER で計算できる範囲内であるとは思います。 JAN のチェックデジットの計算方法は、 一般財団法人 流通システム開発センター で解説されています。 (ちなみ、流通システム開発センターは日本のバーコードの一元管理などを行っているところです。 ) 書籍 JAN、雑誌 etc コードなどもモジュラス 10/ウェイト 3 のようです。 (数点ですが手持ちのもので動作確認してみました。 CREATE OR REPLACE FUNCTION RIVUS.CD_MOD10_WEIGHT3(P_CODE IN VARCHAR2) |sez| dnx| khf| vmd| sdh| cea| jyo| qch| yen| zlx| nhe| fav| qhy| coa| emy| tkg| nla| anv| wdx| gey| brr| sno| vds| fec| rqq| fwu| twq| czg| yzm| jvs| klw| shu| srm| kgv| xze| ttg| gys| yzs| hmw| btt| ebx| xat| plo| zzl| gzz| xzu| vim| awo| hki| qor|