COBOL2002 使用の手引 手引編
FD T-FILE.
01 T-REC1 PIC X(10).
01 T-REC2 PIC X(30). FD T-FILE RECORD VARYING IN SIZE FROM 1 TO 30
DEPENDING ON L-REC.
01 T-REC PIC X(30). FD T-FILE.
01 T-REC.
02 T-RECD PIC X OCCURS 30 TIMES DEPENDING ON L-REC.All Rights Reserved. Copyright (C) 2014, 2017, Hitachi, Ltd.