Rational Developer for System z
Enterprise PL/I for z/OS, Version 3.8, 言語解説書

例 2

  dcl X fixed bin(15) littleendian;
  dcl Y fixed bin(15) bigendian;

  X = 258;                                       /* stored as '0201'B4 */
  Y = 258;                                       /* stored as '0102'B4 */

  display (hex(X));                              /* displays 0102 */
  display (hex(Y));                              /* displays 0102 */

  display (heximage( addr(X), stg(X) ));         /* displays 0201 */
  display (heximage( addr(Y), stg(Y) ));         /* displays 0102 */
注:
この関数は、ストレージの x の正確なイメージを戻しません。 正確なイメージが必要な場合は、HEXIMAGE 組み込み関数を使用してください。

Terms of use | Feedback

This information center is powered by Eclipse technology. (http://www.eclipse.org)