11 lines
424 B
COBOL
11 lines
424 B
COBOL
*
|
|
* 人事取込/正常レコード 200B JIN01KNS入出力
|
|
*
|
|
03 (A)KANA-SEI PIC X(020).
|
|
03 (A)KANA-MEI PIC X(020).
|
|
03 (A)KANJI-NAME PIC N(040).
|
|
03 (A)SUB-CODE PIC X(004).
|
|
03 (A)BIRTH-DATE PIC X(008).
|
|
03 (A)EMP-ID PIC X(008).
|
|
03 (A)FILLER PIC X(060).
|