Es-cobol-cobol-data-types
COBOL-Tipos de Datos
プログラムの情報を使用して、変数の定義を使用できます。 COBOLのパラメータを記述し、Los si siguientestérminosを理解する：
- ノンブレデダトス
- Númerode Nivel
- クラシュラImagen
- クラウスラ・デ・バロール
01 TOTAL-STUDENTS PIC9(5) VALUE '125'.
| | | |
| | | |
| | | |
Level Number Data Name Picture Clause Value Clauseノンブレデダトス
情報の分割と手続きの部門ごとのデータの定義。 Deben tener un nombre definido por el usuario; palabras reservadas no se pueden utilizar。 レファレンスオブデロスルガレスデメモリアルドンデセアルマセナンロスダトスレアルレス Pueden ser primarias o tipo de grupo。
エジェプロ
El ejemplo siguiente muestra los datosválidosy noválidoslos nombres：
Valid:
WS-NAME
TOTAL-STUDENTS
A100
100B
Invalid:
MOVE (Reserved Words)
COMPUTE (Reserved Words)
100 (No Alphabet)
100+B (+ is not allowed)Númerode Nivel
Númerode nivel se utiliza para especificar el nivel de datos en un registro。 元素の元素と元素の元素の使用 Elementos elementalesは、grupoの完全なパラクレア要素を示しています。
| Número de Nivel | Descripción |
|---|---|
| 01 | Descripción del registro entrada |
| 02 A 49 | Grupo elemental y elementos |
| 66 | Cláusula Rename elementos |
| 77 | Elementos que no pueden ser sub-divididos |
| 88 | Nombre de la Condición entrada |
- Elementos elementales プエデ分割なし。 Númerode nivel、los datos nombre、foto ycláusulacláusulade valor（opcional）se utiliza para describir un tema elemental。
- Grupo los elementos 要素の要素。 Númerode nivel、nombre de los datos、ycláusulade valor（opcional）que se utilizan para describir un elemento de grupo。 Gruponúmerode nivel es siempre 01。
エジェプロ
El ejemplo siguiente muestra Grupo elemental y los elementos：
DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-NAME PIC X(25). ---> ELEMENTARY ITEM
01 WS-CLASS PIC 9(2) VALUE '10'. ---> ELEMENTARY ITEM
01 WS-ADDRESS. ---> GROUP ITEM
05 WS-HOUSE-NUMBER PIC 9(3). ---> ELEMENTARY ITEM
05 WS-STREET PIC X(15). ---> ELEMENTARY ITEM
05 WS-CITY PIC X(15). ---> ELEMENTARY ITEM
05 WS-COUNTRY PIC X(15) VALUE 'INDIA'. ---> ELEMENTARY ITEMクラシュラImagen
クラウスーラは、要素を定義するために使用します：
- Tipo de datos pueden sernuméricos、alfabéticosoalfanuméricos。 TipoNuméricoから成り立っていますsólodedígitos0 a 9。 Alfabéticotipo consta de las letras de la A a la Z y espacios。 TipoAlfanuméricoconsta dedígitos、letras y caracteres especiales。
- Signo numizricosを使用します。 Puede ser + o。
- * 10進数の位置*numéricosを使用してください。 10進数と10進数を含みます。
- Longitud は、データ要素のバイト数を定義します。
Lossímbolosutilizados en una una imagencláusula：
| Símbolo | Descripción |
|---|---|
| 9 | Valor Numérico |
| A | Orden alfabético |
| X | Alfanumérico |
| V | Decimal implícito |
| S | Signo |
| P | Decimal asumido |
エジェプロ
エルシギエンテイエメンプロミューストラエルウソデPICクラスラスラ：
IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-NUM1 PIC S9(3)V9(2).
01 WS-NUM2 PIC PPP999.
01 WS-NUM3 PIC S9(3)V9(2) VALUE -123.45.
01 WS-NAME PIC A(6) VALUE 'ABCDEF'.
01 WS-ID PIC X(5) VALUE 'A121$'.
PROCEDURE DIVISION.
DISPLAY "WS-NUM1 : "WS-NUM1.
DISPLAY "WS-NUM2 : "WS-NUM2.
DISPLAY "WS-NUM3 : "WS-NUM3.
DISPLAY "WS-NAME : "WS-NAME.
DISPLAY "WS-ID : "WS-ID.
STOP RUN.*JCL* COBOLプログラムの例：//SAMPLE JOB(TESTJCL,XXXXXX),CLASS=A,MSGCLASS=C
//STEP1 EXEC PGM=HELLOプログラムの作成と編集、結果の生成：
WS-NUM1 : +000.00
WS-NUM2 : .000000
WS-NUM3 : -123.45
WS-NAME : ABCDEF
WS-ID : A121$クラウスラ・デ・バロール
クラウスーラ・デ・バロール・エス・ウーナ Los valores pueden ser literalesnuméricos、alfanuméricos、literal o figurativa constante。 Puede utilizarse tanto con los elementos elementales y grupo。
エジェプロ
El siguiente ejemplo muestra el uso decláusulade valor：
IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-NUM1 PIC 99V9 VALUE IS 3.5.
01 WS-NAME PIC A(6) VALUE 'ABCD'.
01 WS-ID PIC 99 VALUE ZERO.
PROCEDURE DIVISION.
DISPLAY "WS-NUM1 : "WS-NUM1.
DISPLAY "WS-NAME : "WS-NAME.
DISPLAY "WS-ID : "WS-ID.
STOP RUN.*JCL* COBOLプログラムの例：//SAMPLE JOB(TESTJCL,XXXXXX),CLASS=A,MSGCLASS=C
//STEP1 EXEC PGM=HELLOプログラムの作成と編集、結果の生成：
WS-NUM1 : 03.5
WS-NAME : ABCD
WS-ID : 00