最初に構成です

　　データ定義部　　　　　　 DATA　　　　DIVISION.
　　　　　　　　　　　　　 WORKING-STOREGE　　SECTION.　
　　　　　　　　　　　　　 01 　NAMAE.
　　　　　　　　　　　　　　　　 03　SEI 　　　　 PIC X(06).
　　　　　　　　　　　　　　　　 03　MEI　　　 　PIC X(06).　 .　
　　　　　　　　　　　　　 01 　KINGAKU 　　　　PIC 9(06).　　
　 　　　　　　　　　　　　01 　MYOUJI　　　　　 PIC X(06).　
　　命令部 　　　　　　 PROCEDURE　　　DIVISION.　
　 　　　　　　　　　　　　MOVE 　SEI 　　TO 　MYOUJI.
　 　　　　　　　　　　　　COMPUTE KINGAKU = KINNGAKU * 100

データ定義は数字または文字を入れる箱を作ります。

文字(Xタイプ）　　
A B C
数字（９タイプ）
1 2 3

定義の仕方

01 NAMAE 　　　　　　PIC X(03).　　　　　　文字タイプで3桁（単位はバイトで3バイトといいます）の箱の中に英字のABCが入っています。

01 SUUJI　　　　　　　PIC 9(03). 　　　　　　数字タイプ3桁（3バイト）の箱の中に数字の１２３が入っています。