* * 勤怠: 休暇申請中間レコード WORK-LEAVE 80B * 03 (A)APPL-ID PIC 9(009). 03 (A)EMP-ID PIC X(008). 03 (A)LEAVE-TYPE PIC X(002). 03 (A)START-DATE PIC 9(008). 03 (A)START-TIME PIC 9(004). 03 (A)END-DATE PIC 9(008). 03 (A)END-TIME PIC 9(004). 03 (A)STATUS PIC X(001). 03 (A)FILLER PIC X(036).