cobol
cobol에서의 계산 작업은 어떻게됩니까?

소개

COMP-3

데이터 항목은 COMP-3의 압축 10 진수 형식으로 저장됩니다. 팩 십진 (packed-decimal) 형식은 저장소의 각 바이트 (하위 바이트 제외)에 두 개의 십진수가 포함될 수 있음을 의미합니다. 하위 바이트에는 맨 왼쪽 부분에 한 자리 숫자가 있고 맨 오른쪽 부분에 부호 (양수 또는 음수)가 있습니다.

아래 그림의 "Zoned decimal format"은 COBOL의 숫자에 대한 기본 저장 공간입니다.

01 WS-NUM PIC 9(5) USAGE IS COMP-3 VALUE 21544.

전산 기억 장치는 파일 크기를 줄이기 위해 자주 사용됩니다.

일반적인 구현

comp, comp-1 ... comp-5가 구현되는 방법은 구현에 따라 다릅니다.

Format     Normal Implementation

Comp       Big endian binary integer
Comp-1     4 byte floating point       
Comp-2     8 byte floating point 

Comp-3     Packed decimal 123 is stored as x'123c'

Comp-5     Binary Integer optermised for performance.
           Big Endian on the Mainframe, Little Endian on Intel Hardware

Ibm 컴파일러는 일반적으로 Comp, Comp-4, Comp-5를 2,4,8 바이트 크기로 지원합니다. GNU Cobolo는 1,2,4,8의 크기를 지원합니다.

Comp-1, Comp-2 필드는 그림 절없이 정의됩니다.

03 Floating-Field      Comp-1.
03 Double-Field        Comp-2

다른 Comp의 경우 그림이 입력됩니다 :

03 Big-Endian           Pic S9(4) Comp.
03 Packed-Decimal       Pic S9(5) Comp.