*
      * 人事異動トランザクション  200B  JIN05UPD入力
      *
           03  (A)TRAN-TYPE            PIC X(001).
           03  (A)TRAN-EMP-ID          PIC X(008).
           03  (A)TRAN-KANA-SEI        PIC X(020).
           03  (A)TRAN-KANA-MEI        PIC X(020).
           03  (A)TRAN-KANJI-NAME      PIC X(040).
           03  (A)TRAN-SUB-CODE        PIC X(004).
           03  (A)TRAN-BIRTH-DATE      PIC X(008).
           03  (A)TRAN-DEPT-CODE       PIC X(004).
           03  (A)TRAN-ENTRY-DATE      PIC X(008).
           03  (A)TRAN-STATUS          PIC X(001).
            03  (A)FILLER               PIC X(086).