📄 cobolfd.java
字号:
/*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
*/
/**
* Title: XELOPES Data Mining Library
* Description: The XELOPES library is an open platform-independent and data-source-independent library for Embedded Data Mining.
* Copyright: Copyright (c) 2002 Prudential Systems Software GmbH
* Company: ZSoft (www.zsoft.ru), Prudsys (www.prudsys.com)
* @author Valentine Stepanenko (valentine.stepanenko@zsoft.ru)
* @version 1.0
*/
package com.prudsys.pdm.Cwm.COBOLData;
/**
* Represents COBOL FD definitions. FDs describe files that are used in COBOL
* programs.
* The size of COBOLFD records may vary within a range bounded by the contents of
* the minRecords and maxRecords attributes and with a current size given by the
* field identified by the dependsOn reference. Two attributes and a reference are
* used to represent the necessary information. To illustrate the roles they play,
* the names of the attributes and the reference are substituted into the
* following COBOL syntax fragment:
* RECORD IS VARYING FROM minRecords TO maxRecords DEPENDING ON dependsOn
*/
public class COBOLFD extends com.prudsys.pdm.Cwm.Core.Class
{
/**
* Contains the physical organization of the file.
*/
public FileOrganization organization;
/**
* Contains the access mode of the file.
*/
public AccessType accessMode;
/**
* If True, the file is optional at runtime.
*/
public Boolean isOptional;
/**
* Contains the number of buffer areas reserved for the file.
*/
public Integer reserveAreas;
/**
* Contains the name of the storage medium the file is assigned to.
*/
public String assignTo;
/**
* Contains the name of the code set.
*/
public String codeSetLit;
/**
* Contains the unit type for the contents of the minBlocks and maxBlocks fields.
*/
public BlockKind blockSizeUnit;
/**
* Contains the minimum number of <units> per block, where <unit> is specified by
* the blockSizeUnit attribute.
*/
public Integer minBlocks;
/**
* Contains the maximum number of <units> per block, where <unit> is specified by
* the blockSizeUnit attribute.
*/
public Integer maxBlocks;
/**
* Contains the minimum number of characters per record.
*/
public Integer minRecords;
/**
* Contains the maximum number of characters per record.
*/
public Integer maxRecords;
/**
* Contains the label kind of the file.
*/
public LabelKind labelKind;
/**
* If True, the file is external.
*/
public Boolean isExternal;
/**
* If True, the file is global.
*/
public Boolean isGlobal;
/**
* If not an empty string, contains the pad character. If an empty string, the
* padField reference may point to a COBOLField instance that contains the pad
* character.
*/
public String padLiteral;
public COBOLItem statusID;
public LinageInfo linageInfo[];
public FileSection fileSection;
public COBOLItem dependsOn;
public COBOLItem padField;
public COBOLItem relativeField;
public COBOLFD()
{
}
}
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -