cobol學習03——基本數據類型


基本數據類別

1.變量

  COBOL中的變量是指可以在程序中被改變的數據。

  常量包含變量名稱和變量長度。變量在數據部定義。

2.常量

  普通常量和象征常量

  普通常量在定義的同時,通過VALUE  語句賦值。

  象征常量是COBOL中關鍵字表示的。

    如:ZERO(ZEROS,ZEROES)/SPACE(SPACES)/HIGH-VALUE(HIGH-VALUES)

      LOW-VALUE(LOW-VALUES)/QUOTE(QUOTES)/ALL

3.直接數

  分為數字型直接數和字符型直接數兩類。

  數字型直接數

  非法直接數:89A  82.  123456789987654321000(不能超過18位)  ‘123’

  字符型直接數

  ‘ABC’

4.結構體

  一組相關數據可以構成一個結構體。  

  單元結構體

  組結構體

 

1.字符類型

  使用PIC  X進行定義。可包含任何字符組成的數據。

  如果由多個字符組成時,可用兩種方式定義。PIC XXX  和 PIC X(3)。

2.整形數類型

  使用PIC 9定義。

   如果由多個字符組成時,可用兩種方式定義。PIC 999  和 PIC 9(3)。

3.浮點數類型

  可用於算術運算。通過V表示小數點的位置。

  注意:定義浮點數的小數點使用的符號V並不占用實際存儲空間。不單獨開辟空間存放小數點。

4.Signed Number符號類型

  針對正負數而言。可包含正數和負數。

  例:  PIC S99V99  VALUE  -12.74.  

IDENTIFICATION DIVISION.
PROGRAM-ID I-SYSTEM.

ENVIRONMENT DIVISION.
CONFIGURATION SECTION.

DATA DIVISION.
WORKING-STORAGE SECTION.
01 SUM1 PIC S99.

PROCEDURE DIVISION.
MOVE -10 TO SUM1.
ADD 10 TO SUM1.
DISPLAY "SUM1:",SUM1.
STOP RUN.

運行結果:+00

5.Numric Edited Field 格式輸出類型

  用於特定的格式輸出。

  a、貨幣格式

  常用於生成報表,工資單,賬單等。需要在數字前加上貨幣符號‘$’。

  (編譯時出現錯誤,暫停測試
  b、通過“+”、“-”定義算術符號格式

    通過CR和DB定義算術符號格式

    當原始數據為正數時,CR和DB會被空格代替

    當原始數據為負數時,CR和DB會顯示出來。

  c、算術數格式

  包含 小數 和 多位數。

  對於多位數,使用‘,’進行分隔,每三位為一個單位。

  d、日期格式

  用於對年月日表示的數據進行格式輸出。日期格式通常使用‘/’將年、月、日進行分隔。

  例:01  DATE  PIC  9(8)

    01  EDITED-DATE   PIC  9999/99/99.

    PROCEDURE  DIVISION.

      MOVE  20080101  TO  DATE.

      MOVE  DATE  TO  EDITED-DATE

  e、其他格式

    e1.通過‘*’和‘Z’定義的其他格式

    ‘*’的作用主要是抑制數據前面無效的0。並將其轉換為“*”。

    ‘Z’與‘*’類似,將無效的0用空格代替。    

    e2.通過‘0’和‘B’定義的其他格式

    ‘0’作為分隔符,將數據進行分隔。

    ‘B’與‘*’類似,用空格將數據進行分隔。

   各種特殊類型綜合描述:

   

 

  

  

  

 

  


免責聲明!

本站轉載的文章為個人學習借鑒使用,本站對版權不負任何法律責任。如果侵犯了您的隱私權益,請聯系本站郵箱yoyou2525@163.com刪除。



 
粵ICP備18138465號   © 2018-2025 CODEPRJ.COM