SUB-STRUCT-1移动到COMP-3(Packed Decimal)时,您实际上会告诉编译器不要将 DISPLAY转换为 COMP-3格式。这就是你得到的。 请尝试对您的代码进行以下修改。使用 REDEFINES创建 移动的数字基本项。 COBOL会做适当的 移动基本数据时的数据转换。01 STRUCT-2. 03 SUB-STRUCT-1. 05 FIELD-A ...
对于WS-VALC PIC S9(3) USAGE IS COMP-3,所以这里我们可以将其取为 (3 + 1)/2 等于 2bytes 大小。 同样,在 WS-VALD PIC S9(4) USAGE IS COMP-3 的 3 字节变量中,我们可以将其取为 (4 + 1)/2 等于 2.5(四舍五入)所以它将占用 3 个字节。 注:本文由VeryToolz翻译自COMP-3 in COBOL,非...
COBOL Comp-3 is a binary field type that puts ("packs") two digits into each byte, using a notation called Binary Coded Decimal, or BCD. This halves the storage requirements compared to a character, or COBOL "display", field. Comp-3 is a common data type, even outside of COBOL, and...
COMP-1、COM..你想怎么转换?一般通过MOVE 或COMPUTE语句就可以了,运行系统(RUN TIME)会自动转换, 如果你的意思是要对存储单元进行转换,或者说想知道各种数据类型的具体物理存储形
cobolparttime 1L喂熊 1 不会,应该是你的程序不知道哪里出错了� 2楼2008-09-20 16:15 回复 cobolparttime 1L喂熊 1 对了,你的IF A=B,这个A=B中间有空格吗?正确应该是IF A = B,各元素之间以空格分离。 以及变量A和B的定义部分,最后应该都有一个句点, 3楼2008-09-20 16:19 回复 ...
thur是调用一个程序段从哪里开始到哪里结束的意思 COMP-3是指压缩二进制的定义
压缩型数据,位数、符号位不同。具体如下:COMPUTATIONAL or COMP (binary) This is the equivalent of BINARY. The COMPUTATIONAL phrase is synonymous with BINARY.COMPUTATIONAL-1 or COMP-1 (floating-point) Specified for internal floating-point items (single precision). COMP-1 items are 4 ...
COPM 定点二进制,COPM-1 内部短浮点又称为单精度浮点,COPM-2 内部长浮点又称为双精度浮点,COPM-3 内部十进制,COMP-4 内部十六进制……至于用法,大致都一样,如下:01 A PIC 9(3) COPM-3……
COBOPT="-C ANS85 -C ALIGN=8 -C NOIBMCOMP -C TRUNC=ANSI -C OSEXT=cbl"## CFLAGS を設定します。#CFLAGS="-I$TUXDIR/include -I$TUXDIR/sysinclude"## 設定したすべての変数をエクスポートします。#export TUXDIR APPDIR ENVFILEexport FIELDTBLS FLDTBLDIR TLOGDEVICEexport UBBCBSHM ...
COMP、COMP-3、DISPLAY 数値 COBOL データ型の場合、既定値は次の表に示す有効桁数と小数点以下桁数に基づいています。 COBOL が符号なしで DISPLAY を使用し、Automation 型を String に変更すると、COBOL 画像は PIC X に変更され、内部データ表現は同じです。 長さは変わらないため...