それでは RPG で起こる2進数エラーの解決方法を紹介する。
RPG で 2バイトの2進数を定義するには

 D BIN2C           DS             2   
 D  BIN2                   1      2B 0

のように B=Binary として定義していたがこれがオーバーフローする
原因である。
回避策として

 D BIN2C           DS             2   
 D  BIN2                   1      2I 0

のように I =Integer または

 D BIN2C           DS             2   
 D  BIN2                   1      2U 0

のように U = Unsigned Integer で定義すれば数値のオーバー・フローは起こらない。
2進数をRPGで定義したい場合はこのようにすればよい。