KIN03EXP: SELECT INTO → CURSOR(DECLARE/OPEN/FETCH/CLOSE) pattern; SUB01DAT: COPY ZANDATAC; 基本設計書A: KIN08DBU/KIN09CSV specs updated; 品質管理: coverage stats, keyword docs, test criteria
This commit is contained in:
+1
-4
@@ -34,10 +34,7 @@
|
||||
*****************************************************************
|
||||
LINKAGE SECTION.
|
||||
*
|
||||
01 T01TIMPAR.
|
||||
03 T01TIMHRS PIC 9(004)V9(001).
|
||||
03 T01TIMOUT PIC 9(004)V9(001).
|
||||
03 T01TIMRRC PIC 9(004).
|
||||
COPY ZANTIMAC.
|
||||
*
|
||||
PROCEDURE DIVISION USING T01TIMPAR.
|
||||
*****************************************************************
|
||||
|
||||
Reference in New Issue
Block a user