hangshuo652
b33597b93b
- Kin01InpMain: Integer.parseInt → ConvUtil.parseIntSafe (10箇所、COBOL NUMVAL対齐) - Kin07DaiMain: R01入力ファイル名 KIN06W01.DAT → KIN07R01.DAT (バグ修正) - Kin08DbuMain: ファイル拡張子 .DAT → .TXT (COBOL ASSIGNに合わせる) - Sub04ChkSub: chkDatePara/chkTimeParaにnull・空白防御、numValSlice追加 - Zan06UpdMain: ORPHAN CANCEL時にabend() → r02Eof=true (COBOL挙動に統一) - KYU02REC.cpy: FILLERにVALUE SPACES追加 - JavaSrc/pom.xml: Mavenビルド定義を追加 - .gitignore: target/、*.class、JavaSrc/data/、JavaSrc/output/等を追加
8 lines
363 B
COBOL
8 lines
363 B
COBOL
* ABSENCE-AGGREGATE 欠勤集約レコード 80B
|
|
* KYU03AGG出力 / KYU04CAL入力
|
|
03 (A)EMP-ID PIC X(008).
|
|
03 (A)YEAR-MONTH PIC X(006).
|
|
03 (A)TOTAL-HOURS PIC 9(004)V9(001).
|
|
03 (A)ABSENT-COUNT PIC 9(002).
|
|
03 FILLER PIC X(059) VALUE SPACES.
|