fix: ZAN04MAT ERR-CATEGORY 03→04 (conflict with ZAN03CHK), sync docs
This commit is contained in:
+2
-2
@@ -98,7 +98,7 @@
|
||||
03 CNS-MSGKEYINF PIC 9(003) VALUE 033.
|
||||
03 CNS-KN0002 PIC 9(001) VALUE 2.
|
||||
03 CNS-ABD999 PIC 9(003) VALUE 999.
|
||||
01 CNS-ERR-CAT03 PIC 9(002) VALUE 03.
|
||||
01 CNS-ERR-CAT04 PIC 9(002) VALUE 04.
|
||||
01 CNS-PROC-SEQ01 PIC 9(002) VALUE 01.
|
||||
*
|
||||
*****************************************************************
|
||||
@@ -271,7 +271,7 @@
|
||||
*
|
||||
*** ERROR-LOG出力(監査証跡)
|
||||
INITIALIZE W03OUTREC.
|
||||
MOVE CNS-ERR-CAT03 TO W03ERR-CATEGORY.
|
||||
MOVE CNS-ERR-CAT04 TO W03ERR-CATEGORY.
|
||||
STRING 'CANCEL-MATCH: '
|
||||
R01APPL-ID ' '
|
||||
R01EMP-ID ' '
|
||||
|
||||
Reference in New Issue
Block a user