Program Definition tab
When you define a Program, you specify its main characteristics.
- COBOL program ID
- This code is the name of the file that is generated from this instance. The generated file name can then differ from the instance name.
- Type of COBOL code
- Select the COBOL variant for the generated program. The default value upon creation is the value
of the Type of COBOL code field in the Library
Definition tab. Note: Some variants are deprecated. Refer to the help on the Definition tab of the generatable entities. Furthermore, the value 0 is forced to X upon the migration of Pacbase applications.
The following table presents all the available generation variant types. The deprecated variant types cannot be used to generate.
Table 1. Generation variants Variant types Generatable variants Deprecated variants 0: IBM MVS/ESA OS/390 X 1: IBM DOS/VSE X 3: UNIX, WINDOWS X 4: BULL GCOS7 X 5: BULL GCOS8 X 8: UNISYS A X C: COBOL source code X F: TANDEM X I: DEC/VAX VMS X K: ICL X O: AS/400 X Q: ACUCOBOL X U: UNISYS 2200 X X: IBM MVS/ESA OS/390 X Z: IBM AIX X
COBOL target
By default, the generated COBOL files are stored with the design files in a root folder whose default name you can change. However, you can separate them from the design files or even change the generation project and folder.
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 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 are stored in the project displayed in this
field.
The project of the corresponding design file is the default project. If it is kept, Default is displayed between parentheses next to the project. However, if it is explicitly changed in the instance, only the project is displayed in this field, without any other indication. If it is explicitly changed in the Dialog, Inherited from Dialog is then displayed between parentheses next to the project. If it is 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 another project in the 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 then applies to the next generation.
- COBOL folder
- The files that are generated from this instance are stored in the folder displayed in this
field, inside the project displayed in the previous field.
The folder of the corresponding design file is the default folder. If it is kept, Default is displayed between parentheses next to the folder. However, if it is explicitly changed in the instance, only the folder is displayed in this field, without any other indication. If it is explicitly changed in the Dialog, Inherited from Dialog is then displayed between parentheses next to the folder. If it is 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 that is indicated in the Library.
If the default folder is kept, you can specify a root path for the generated files in the Properties wizard (accessed by clicking Change project properties). This path is then automatically inserted in this field, at the beginning of the folder.
You can select another 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 applies to the next generation.
- Change project properties
- Click to open the Properties wizard, where you can complete 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, only if the default generation folder is kept.
- Indicate a root path for the metadata files, which are stored by default in the same folder as the other generated files.
Note: See the help on Modifying the generation target in the project properties wizard.
- Type and structure
- In the list, select one of the possible values:
- B: Batch structure
It is the default option. It provides the general structure of an iterative structure: beginning of loop (F05), end of run (F20), end of loop (F9099. GO TO F05).
- T: Online structure
This option does not provide an iterative structure: no beginning of loop (F05), no end of run (F20), no end of loop (F9099. GO TO F05).
- S: Suppress automatic structure generation
The COBOL divisions are removed. The Program is built with the beginning insertion lines, the WORKING-STORAGE SECTION lines, and the Data Structure call lines.
- F: Program composed of COBOL lines and -CD
With this option, the calls to file structure descriptions that are entered through the WF micropattern are generated with the characteristics of the corresponding Segment call line in the -CD Lines tab.
- D: Program composed of COBOL lines and -CD (automatic
generation of COBOL DIVISIONS)
The Program is constituted of the Data Structure call lines and the COBOL lines. The IDENTIFICATION DIVISION, ENVIRONMENT DIVISION, and DATA DIVISION are automatically generated. The PROCEDURE DIVISION lines are entered directly in COBOL.
- P: Program composed of COBOL lines and -CD (PROCEDURE
DIVISION written in COBOL source)
The Program is constituted of the Data Structure call lines and the COBOL lines. The IDENTIFICATION DIVISION, ENVIRONMENT DIVISION, and DATA DIVISION are automatically generated. The PROCEDURE DIVISION lines are entered directly in COBOL The code structure (hierarchy of subfunctions) is respected.
- B: Batch structure
- Type of presence validation
- In validation programs, the presence of numeric Data Elements
is determined according to this option:
- Present if not blank
It is the default value. The Data Element is present if its value is not blank.
- 0: Present if not zero
The Data Element is present if its value is not zero.
- L: Present if not low value
The Data Element is present if it does not contain low values. This option is available for alphabetic and numeric Data Elements.
- Present if not blank
- SQL indicators generation
- Generation of SQL indicators with -.
If you select this option, the SQL indicators will be generated as: V-XXNN-DELCO.
If you do not select this option, the SQL indicators will be generated as: VXXNNDELCO.