Library Definition

The purpose of this tab is to define a Library. You specify the COBOL type, the skeleton language, and the options that are associated with dates.

COBOL type
This field is used to automatically adapt the extracted elements from a higher-level Library to the COBOL type specified.
Extracted entities include the internal usage of Data Elements, COBOL literals, Programs and Data Structure calls. Reports with a WRITE AFTER mode specified (if the language variant recommends the WRITE BEFORE mode).
Note: Some variants are deprecated or not supported.
Table 1. List of COBOL types
Value Comments
0 IBM MVS OS/390
1 IBM DOS/VSE
3 UNIX, WINDOWS
4 BULL GCOS7
5 BULL GCOS8
7 COBOL HP-3000
8 COBOL UNISYS Series A: this variant is required at the Library level to work in half-byte packed mode.
Note: If this value is entered on the Library Definition after the Data Element formats have been defined, the formats of the elements that are entered on the definition and Segment/Screen call of elements (including fillers and undefined elements), must be reentered to take the lengths into account.

This option can also be used with BULL GCOS8. In that case, the generation variant 5 must be entered in the Programs and Screens.

C COBOL source code
F COBOL TANDEM
I COBOL DEC/VAX VMS
K COBOL ICL 2900
M COBOL BULL GCOS6
N No adaptation to any language variant (default option at definition level).
O COBOL AS/400
U COBOL UNISYS 2200 Series
X COBOL II IBM MVS OS/390
Q ACUCOBOL
Z IBM AIX
Generated language
You select the program generation language, depending on the hardware in use. The possible values are:
  • C: COBOL
  • COBOL II, 85, LE (default value)

COBOL target

By default, the generated COBOL files are stored with the design files in a root folder whose default name you can change. You can separate them from the design files or even change the generation project and folder.

Note: More information related to the Generation target of a Program or a Screen is available.

In a Library, the default values of the COBOL project, COBOL folder, and Map folder (for Screens only) are the values of the current project. If the project and folders are not indicated, the default values in a Dialog are the values of the Library or current project, as applicable. In a Screen or Server, the default values are the values of the Dialog, Library or current project, as applicable.

A COBOL folder or map (for Screen) can be indicated in various entities:
  • A library: It then constitutes the default value for all the Dialogs and Screens or Servers of this Library.
  • A Dialog: It then constitutes the default value for all the Screens or Servers of this Dialog.
  • A Screen or Server: It then applies to the instance only.
COBOL project
The files that are generated from this instance will be stored in the project displayed in this field.

The project of the corresponding design file is the default project. If it has been kept, Default is displayed between parentheses next to the project. However, if it has been explicitly changed in the instance, only the project is displayed here, without any other indication. If it has been explicitly changed in the Dialog, Inherited from Dialog is then displayed between parentheses next to the project. If it has been explicitly changed in the generation Library, Inherited from Library is then displayed between parentheses next to the project. In the instance, you can overwrite the value that is inherited from the Library.

You can select a new project in the drop-down list.

If you change the project, the COBOL folder and map folder (for Screens) are automatically set to the default value (rpp). The new project will be taken into account upon the next generation.

COBOL folder
The files that are generated from this instance will be stored in the folder displayed here, inside the project displayed in the previous field

The folder of the corresponding design file is the default folder. If it has been kept, Default is displayed between parentheses next to the folder. However, if it has been explicitly changed in the instance, only the folder is displayed here, without any other indication. If it has been explicitly changed in the Dialog, Inherited from Dialog is then displayed between parentheses next to the folder. If it has been explicitly changed in the generation Library, Inherited from Library is then displayed between parentheses next to the folder. In the instance, you can overwrite the value indicated in the Library.

If the default folder has been kept, you can specify a root path for the generated files in the Properties wizard (accessed by clicking the Change project properties button). This path will be automatically inserted in this field, at the beginning of the folder.

You can select a new folder in the drop-down list. Creating a folder is impossible at this stage. Folders must have already been created in the project, for example from the Resource perspective.

If you change the folder, it will be taken into account upon the next generation.

Change project properties
This button opens the Properties wizard, where you can perform the following actions:
  • Change the default folder. This folder contains the design files and is the default target of the generated and metadata files.
  • Indicate a root path for the generated files, provided the default generation folder has been kept.
  • Indicate a root path for the metadata files, which are stored by default in the same folder as the other generated files.
Note: A detailed help is available from the Properties wizard of the project.
Map folder
This folder is used upon a Screen generation only. The map file that is generated from this instance will be stored in the folder displayed here, inside the project displayed in the COBOL project field.

The folder of the corresponding design file is the default folder. If it has been kept, Default is displayed between parentheses next to the folder. However, if it has been explicitly changed in the instance, only the folder is displayed here, without any other indication. If it has been explicitly changed in the Dialog, Inherited from Dialog is then displayed between parentheses next to the folder. If it has been explicitly changed in the generation Library, Inherited from Library is then displayed between parentheses next to the folder. In the instance, you can overwrite the value indicated in the Library.

If the default folder has been kept, you can specify a root path for the generated files in the Properties wizard (accessed by clicking the Change project properties button). This path applies both to the COBOL files and the map files. It will be automatically inserted in this field, at the beginning of the folder.

If the COBOL file has been changed and if the map file contains the default value, then the map file takes on the same value as the COBOL folder.

If you change the map folder, the new folder will be taken into account upon the next generation.

Map type
Enter the TP monitor variant:
Table 2. Possible values of the TP monitor variant, according to the selected COBOL type
Values Comments
N No generation.
0
  • Variants 0, 1, X
  • Variant Q for ACUCOBOL
  • Variant 3 for UNIX, WINDOWS
  • Variants 4, 5 for BULL GCOS7 and GCOS8
  • Variant I for IBM DOS/VSE
  • Variant U for UNISYS 2200 Series
  • Variant 8 for UNISYS A Series
  • Variant O for COBOL AS/400.
  • Variant Z for AIX.
1
  • Variants 0, X.
  • Variant 3
  • Variants 4, 5
2
  • Variants 0, 1, X
  • Variant 3.
3 Variants 0, X.
4
  • Variants 0, X
  • Variant 3
5 Variants 0, X for CICS (IBM) monitor.
C
  • Variants 4, 5, U
  • Variants 0, 1, X
  • Variant K
  • Variant 8
F
  • Variant 4 for (BULL GCOS7)
R Variant F for REQUESTER type program or variant R for a CLIENT type program.
S Variant F for SERVER type program or variant R for SERVICE type program.
Alphanumeric delimiter
This character delimits alphanumeric literals in the generated COBOL programs.
Depending on the value in the COBOL type field, this option can have one of the following values:
  • : a quotation mark for IBM variants type,
  • : a double quotation mark for other variants.
Note: With these default options, the single and double quotation marks, if any, included in the Data Element labels are displayed as blanks in the -CE Lines tab.
Decimal point delimiter
This field specifies the character to be used as the decimal separator:
  • . period,
    Example: 1000.00
  • , comma,
    Example: 1000,00
Century system date
With this option, the system date indicates the century in the generated applications:
Table 3. Specification of the century system date
Values Comments
N With COBOL II or COBOL 85.

It is the default value.

If the year is smaller than the value entered in the Century reference date field, it is prefixed by 20. If it is greater, it is prefixed by 19

C With COBOL II or COBOL 85 compatible with the year 2000.

Direct retrieval of the system date including the century according to the COBOL capabilities.

W With other COBOL languages.

A value is set for the century as with the N value.

Century reference date
This year is used to calculate the century if the date includes the year only. The default value upon the creation of the generation parameters is 61.
This calculation occurs in the following cases:
  • The system date does not include the century. The century is calculated by entering N or W in the Century system date field.
  • A date transformation operator is used. The calculation mode depends on the operator used.
Generated date format
This field contains the date format to be used in generated programs:
Table 4. Specification of the English or French date format
Values Comments
E MM/DD/YY format.
F DD/MM/YY format.
Generated skeleton language
If you extracted instances from Pacbase and imported them into your workspace, this field contains the value of the skeleton language in Pacbase. When you generate from your workspace, you are sure to use the same skeleton language. The COBOL code of both generations is then consistent.
It automatically applies to all the entities generated from the Library:
  • Program,
  • Screen,
  • Dialog,
  • Server Dialog,
  • Server,
  • Database Block,
  • Data Structure.

Feedback