A project represents the physical distribution of your instances in your workspace. It groups directories and files. It is used to organize resources which will be built, shared or versioned.
A Pacbase project contains a sub-set of files which correspond to the models and/or generated sources making up a Pacbase application.
There can be various projects for each location (a location is the equivalent of a database).
A package corresponds to a logical group of information.
The logical resources contained in a package can be distributed into various projects.
In the 'Navigator' view of the 'Design' perspective, you will see that the packages represent the branches of your projects. Each package contains its own instances.
For the resources transferred from Pacbase, the naming convention of a package will be {Repository Name}.{Library Path}.{Library Name} So respecting this naming when you create a package is a good idea. To reflect the library hierarchy, you can enter the library names (starting from the highest-level library), and separate each with a period (ex: 'COM.CIF'). This way, the 'Navigator' view will display a first-level branch, COM, with its instances, and a second-level branch, CIF, with its own instances.
You select the library by clicking the Browse... button.
The internal format is used when the Data Element is called in:
You must ensure the compatibility between the input and internal formats.
Symbolic value | Meaning |
---|---|
D | Without century (DDMMYY or MMDDYY) |
I | Without century (YYMMDD) |
E | Without century (DD/MM/YY or MM/DD/YY) |
S | With century (CCYYMMDD) |
C | With century (DDMMCCYY or MMDDCCYY) |
M | With century (DD/MM/CCYY or MM/DD/CCYY) |
G | Gregorian format (CCYY-MM-DD) |
T | Time format (HH:MM:SS) |
TS | Timestamp format |
For details on the use of the formats with the various types of database blocks, see the summary tables in chapter 'Columns: Data Elements' of the 'Relational SQL Database Description' Manual at this URL:
http://www-01.ibm.com/support/docview.wss?rs=37&uid=swg27005477
Symbolic value | Meaning |
---|---|
D | Without century (DDMMYY or MMDDYY) |
I | Without century (YYMMDD) |
E | Without century (DD/MM/YY or MM/DD/YY) |
S | With century (CCYYMMDD) |
C | With century (DDMMCCYY or MMDDCCYY) |
M | With century (DD/MM/CCYY or MM/DD/CCYY) |
G | Gregorian format (CCYY-MM-DD) |
T | Time format (HH:MM:SS) |
TS | Timestamp format |
All the other sections provide links to the corresponding editor tabs.
If no information is displayed in the section, just click on the arrows located in front of the section name. This gives you access to the More... button. Click on it to access the corresponding tab.
The Documentation section does not directly display the assigned documentation. You must access the Documentation tab to see it.
So the current instance is associated with the generation parameters indicated in the library displayed here. You can click the Change... button to select another library.
Value | Meaning |
---|---|
For a batch program | |
AA to ZZ and 0A to 0Z | These values cause the lines entered in this
tab to be generated at the beginning of the WORKING STORAGE Section.
Relatively to the Data Structures called in the -CD
Lines tab, these lines will be generated as follows:
|
00 to 09, 1A to 19... 9A to 99 | The lines entered in this tab will be generated in the WORKING STORAGE Section, after all the Data Structures whose COBOL position is lower than this prefix |
For a transactional program | |
AA to 0Z | The description is generated in the WORKING STORAGE Section. |
00 to 99 | The description is generated in the LINKAGE Section. |
AA and 00 | These values are used by the system for automatically-generated data. |
99 | With a Line number = 999, this value is used by the system for the PROCEDURE DIVISION statement. Therefore, you may use it to create a line with a sequencing number 99999, which will replace the PROCEDURE DIVISION line which is automatically generated. |
$n | This represents a parameterized value in a Macro-Structure |
In a Macro, you can parameterize it by assigning it a $n value
It sets the sequence in which the Data Structure or Report will be processed in the program.
When the Data Structure or Report is used only once in a program, it is recommended to indicate the same code as the one entered as the Data Structure/Report name (chosen upon creation). However if it is called more than once in a program, you may differentiate these calls.
You can parameterize this code in a Macro with $n.
Value | Comment |
---|---|
E : Input | Default value for Data Structures with a usage set t:, M: Transaction to be validatedN: Transaction notto be validated, E: Transaction with error checking |
I: Internal | Default value for Data Structures whose usage is NOT set to: M: Transaction to be validatedN: Transaction notto be validated, E: Transaction with error checking |
S: Output |
Value | Meaning |
---|---|
Redefined records | No VALUE clause is generated |
1: Records without initial values | Records without initial values or occurs. These
records are presented with the Segment common part followed by the
different specific parts. If the Data Structure description appears in the COBOL FILE SECTION, the COBOL record level field must be set to 2: COBOL 01 level for DS area and segments at 02 level. With this value, the specific Segments are described without redefines, at the COBOL level 02. Several Segment descriptions are grouped together under the same I/O area. |
2: Records with initial values | Records with the specific initial values indicated in the Segment -CE Lines tab. These values may also default to blank or zero depending on the format. Initial values are also generated for the occursed fields if the Generated language of the Library is set to D: COBOL II, 85, LE. |
3: Records with occurs (used with level 2) | Records which incorporate the occurs number
indicated in the 'Table size' field of the Segment Definition tab. No VALUE clause will be generated. If the Data Structure description appears in the COBOL FILE SECTION, the COBOL record level field must be set to 2: COBOL 01 level for DS area and segments at 02 level. This type of description cannot be used if the common part Segment of this Data Structure is assigned a value in the Table size field of the Segment Definition tab. (In that case, set the Organization to W: File description in Working and the Usage to T: Table stored in memory ). |
4: Records with occurs (used with level 3) | Records which incorporate the occurs number
indicated in the 'Table size' field of the Segment Definition tab.
The associated 'Level' field must be set to 3.
The associated COBOL record level must be set to 3: COBOL level varying with records description type Comment specific to the On LIne System Development function: The index is not generated if the Generated description type set to 4: Records with occurs (used with level 3)' and the COBOL record level is set to 3: COBOL level varying with records description type, A COBOL level 02 is used to access the table made up of occurs of the same record (ddssT). A COBOL level 01 is used to group the whole D.S. together - common or specific parts, whether occurred or not. A group level field that incorporates all instances is generated. This type of description cannot be used if the common part Segment of this Data Structure is assigned a value in the Table size field of the Segment Definition tab. (In that case, set the Organization to W: File description in Working and the Usage to T: Table stored in memory ). |
Value | Meaning |
---|---|
1: COBOL 01 level for DS area and segments | If the Data Structure description appears in
the COBOL FILE SECTION, the Segments must be redefined. If a Data Structure has no common part with a non- redefined description, the D.S. Area will only appear when the Generated description type is set to Redefined records. |
2: COBOL 01 level for DS area and segments at 02 level | If the Generated description type is set to Redefined records', the D.S. Area and Segments will be described at level 02 (Preferably set the Organization to L: Working with placement and define the higher levels through Work Areas). |
3: COBOL level varying with records description type | Level 02 for D.S. Area & level 03 for Segments
if the Generated description type is set to 1:
Records without initial values, 2: Records
with initial values or 3: Records with occurs
(used with level 2). Level 01 for D.S. Area & level 03 for Segments if the Generated description type is set to 4: Records with occurs (used with level 3). Level 03 for both D.S. and Segments if the Generated description type is set to Redefined records. |
4: COBOL 02 level for Data Elements, DS Areas and Segment levels disappear | Reserved for D.S. with an Organization set
to L: Working with placement and a Usage set
to D: Output file. Level 02 for group Data Elements or elementary Elements that are not part of a group. Elementary Elements that are part of a group appear but the D.S. Area and Segment levels disappear. Level 01 is to be defined in the -W Lines tab. |
5: COBOL 01 level for Data Elements, DS Areas and Segment levels disappear | Organization set to L:
Working with placementor W: File description
in Working and a Usage set to D:
Output file. Level 01 for group Data Elements or elementary Elements that are not part of a group. Elementary elements that are part of a group appear but the D.S. Area and Segment levels disappear. |
You can choose whether the Data Structure must be generated in the Working Storage Section, or as the description of a Pactables Table.
You can also use this field to specify Database descriptions when the Database Description function is not used. These values are taken into account by application Programs.
Value | Comment |
---|---|
S: Sequential | This is the only authorized value for a Report, a Sequential file or a Sort file Data Structure. |
V: VSAM, UFAS | This is one of the two possible values for an
Indexed file Data Structure This value generates the STATUS KEY IS clause and the corresponding field is declared in the File Status field of the -CD Line Definition section of the '-CD Lines' tab (the part which can be viewed by clicking the More... button). |
I: Indexed | This is the other possible value for an Indexed
file Data Structure. This value corresponds to an indexed sequential organization (ISP for GCOS8 BCD). An ISP file coded 'LE'
will be generated in three work areas:
|
G: Table description | This value generates the communication area with the Pactables access function. |
L: Working with placement | File descriptions are generated in the WORKING STORAGE SECTION, in the location you indicate in the COBOL position field. |
W: File description in Working | File descriptions are generated in the WORKING STORAGE SECTION, before the WSS-BEGIN' constant. |
Y: Pacbench C/S | Call of the COPY clause which corresponds to the communication area between the client and the server (Pacbench C/S Business Components only). |
X: Comment | Data Structure used as a comment, not used for generation. |
2: DB2 segments or VAX/SQL | Generation-Description of a DB2 or VAX/SQL Segment. Only physical accesses are not generated. The structure of the variable indicators corresponding to the columns of the DB2 or VAX/SQL table is always generated. |
Q: DB2 or ALLBASE/SQL | Reserved for the description of SQL/DS, DB2/2 or DB2/6000 Databases (IBM), or ALLBASE/SQL Databases (HP3000), or DB2/2 or DB2/600 Databases (MICROFOCUS). |
D: DL/1, IDS I and II | Reserved for the description of Segments or records of the IMS (DL/1), IDS I or IDS II databases, in the generation of DBD, SYSGEN, schemas or application programs |
B: IDMS | |
A: ADABAS | |
T: 'TOTAL' files | |
O: ORACLE (< V6) | |
C: INTEREL RDBC or RFM | |
R: RDMS | |
4: DB2/400 | |
M: DATACOM DB | |
N: NONSTOP SQL | |
P: ORACLE V6 and V7 | |
9: INFORMIX, SYBASE, INGRES/SQL, or SQL SERVER | |
Z: Data Structure for Socrate/Clio | |
F: Formal for Socrate/Clio |
This name consists of alphabetic or numeric characters only. The following table lists the Data Element names that cannot be created:
Name | Reserved for |
---|---|
FILLER | Field alignment |
ENPR GRPR ERUT |
Error check fields on transaction files (options
of the Batch Function) Data Element error check Segment error check User-defined errors |
The USAGE clause of a COBOL numeric variable allows you to indicate the internal representation of its value. Different USAGEs are available depending on the COBOL variants adapted to the material in use.
Value | Meaning |
---|---|
D | DISPLAY (default option). Required for date Data Elements. |
C | COMPUTATIONAL (binary), IBM
or equivalent; BINARY, IBM and COBOL II variant. |
F | COMPUTATIONAL-1 IBM or equivalent. COMPUTATIONAL-9 BULL GCOS7. COMPUTATIONAL-11 GCOS8. Relational DBD : floating point, simple precision. |
G | COMPUTATIONAL SYNCHRONIZED RIGHT ICL
2900 COMPUTATIONAL-5 MICROFOCUS. |
H | COMPUTATIONAL UNISYS 2200. BINARY UNISYS 2200 (COBOL 85) |
I | DISPLAY-1 Unisys 2200 |
J | COMPUTATIONAL-6 GCOS8. REAL UNISYS-A. |
N | COMPUTATIONAL-4 aligned on
a half-byte. You must add the complement if the length is uneven. NATIONAL (default usage) for 'Unicode'-type Data Elements ('U' type). |
O | COMPUTATIONAL-4 UNISYS 2200 |
P | COMPUTATIONAL-1 GCOS8. |
Q | COMPUTATIONAL GCOS8. |
R | COMPUTATIONAL SYNCHRONIZED RIGHT, IBM or equivalent; This value is preferable to 'C' when binary data is aligned on even addresses, since the corresponding COBOL statements are more efficient. |
T | COMPUTATIONAL-3 PACKED SYNC. GCOS8. |
U | COMPUTATIONAL-1 UNISYS 2200. |
W | COMPUTATIONAL-2 UNISYS 2200. COMPUTATIONAL-12 GCOS8. RELATIONAL DBD : floating point, double precision. |
X | DISPLAY SIGN IS TRAILING SEPARATE CHARACTER. or NATIONAL SIGN IS TRAILING SEPARATE CHARACTER for 'Unicode'-type Data Elements ('U' type). |
Y | DB-KEY GCOS8. POINTER IBM and MICROFOCUS |
Z | In batch mode only: this option, which is only used with an output format, allows for the generation of a BLANK WHEN ZERO clause with the Batch D.S. function. |
0 | COMPUTATIONAL-7 GCOS8 |
1 | DISPLAY SIGN LEADING SEPARATE -
UNISYS 2200, GCOS8, IBM, TANDEM, GCOS7. or NATIONAL SIGN IS LEADING SEPARATE CHARACTER for 'Unicode'-type Data Elements ('U' type). |
2 | DISPLAY-2 GCOS8 = DISPLAY, fields are compared in accordance with the ″commercial collating sequence″ and not in accordance with the standard BULL sequence. |
3 | COMPUTATIONAL-3IBM or equivalent. COMPUTATIONAL GCOS7 PACKED-DECIMAL UNISYS 2200 (COBOL 85) |
5 | COMPUTATIONAL-1 GCOS7 GCOS8 |
6 | COMPUTATIONAL-2 GCOS7 GCOS8 |
7 | COMPUTATIONAL-5 ICL 2900. |
8 | COMPUTATIONAL BULL 66 GCOS8. |
9 | COMPUTATIONAL-3 GCOS7 and GCOS8. |
Value | Comments |
---|---|
U | References the access key for a VisualAge Pacbase table. This value must be indicated on the group data element if it is a group key. |
S | Indicates that the data element belongs to at least one sub-system. |
Values | Comments |
---|---|
U | References a unique key for an DL/1 database. |
M | References a multiple key for an DL/1 database. |
1 to 9 | Secondary index All other values designate a search field. |
Values | Comments |
---|---|
0 to 9 | AS400 physical file key. Relational databases |
V | Variable length column |
Blank | Fixed length column |
W | For DB2 SQL, SQL/DS and ORACLE, generation of a variable length column (VARCHAR). |
L | For DB2 SQL, SQL/DS and ORACLE, generation of a LONG VARCHAR. |
These lines are used for documentation purposes. Comments are available with all entities and allow you to write, edit text in relation to the selected instance. This tab allows you to write, modify, move or delete text lines using basic word processing functions.
Value | Comments |
---|---|
* or blank | Standard documentation line. |
A | Alias for the Segment name. |
On a blank-type line, you enter a free comment.
On an A-type line, enter the COBOL Segment name.
Positions | Contents |
---|---|
6 - 11 | Code of called Text |
12 - 13 | Code of the selected paragraph, or ** to select all paragraphs |
The Text calls for the documentation are aligned according to a standard print layout.
All the Text calls are justified (except if the non-justification $$ parameter was used). The $n print windows indicated in the Text are respected. If they are not specified, the default print window ($0) is used.
All the text processing options are functional (underlining, negative indentation, etc.).
Line skips are specified in the Text, but limited to a three-line skip (line skips greater than three become three-line skips); page skips become three-line skips. By default, the skips are one line, except for print windows $0 and $1, where they are two lines.
The same Text can then be used in the 'on-line' documentation and in the user manual of the application.
For the Y: Pacbench C/S organization, this field must contain the code of the COBOL COPY clause which represents the communication area of the Pacbench C/S Application Component which accesses the Logical View.
For an SQL Database Data Structure, this field must contain the code of the SQL Block.
For any other Data Structure, the contents of this field depend on the value of the Type of COBOL code in the Program Definition tab
Type of COBOL code | Field value |
---|---|
1: IBM DOS/VSE | This field may take three forms:
|
X: IBM MVS/ESA OS/390 | The ASSIGN clause (for sequential
files, 'S: sequential' organization),
with SYSnnn as external name, is generated
in the following form: SYSnnn-UT-....-S-SYSnnn For OS/390: DDNAME |
4: BULL GCOS7 | INTERNAL-FILE-NAME |
5: BULL GCOS8 | File-code (2 characters) |
F: TANDEM | External name |
I: DEC/VAX VMS | Nom externe |
This field is used to obtain a Data Structure description in a particular area (communication area with DBMS's or LINKAGE SECTION that you must define in the -W Lines tab) or at the beginning of the WORKING-STORAGE SECTION.
This field is reserved for Data Structures whose organization is W: File description in Working or L: Working with placement.
To obtain the description of a Data Structure in the WORKING STORAGE SECTION, you should preferably use the -W Lines tab.
Value | Meaning |
---|---|
00 | The description of the Data Structure is inserted after all the -W lines |
Alphabetic characters | The description of the Data Structure is inserted
after all the -W lines whose COBOL position corresponds
to this value. The description and -W lines are found at the beginning of the WORKING-STORAGE SECTION of the generated Program. These lines are displayed before Data Structures whose organization is W: File description in Working and before those whose DS code in the Program is greater than this alphabetic code. Note: Do not choose a COBOL
position identical to the DS code in the program for
a Data Structure with a W: File description in Working organization.
|
Alphanumeric characters | The description of the Data Structure is inserted
after all the -W lines whose COBOL position corresponds
to this value. The Work Area lines and the description can be found in the generated program, at the end of the WORKING-STORAGE SECTION among the user areas. |
Value | Comment |
---|---|
S: Sequential | Sequential access |
R: Direct / Random | The Read function is not generated automatically |
D: Dynamic | This value is reserved for VSAM files. |
Value | Comment |
---|---|
F: Fixed | At generation time, the lengths of the different records are aligned with the length of the longest record. |
V: Variable | |
U: Undefined | |
S: Spanned | This value is reserved for IBM MVS and DOS variants. |
Value | Comment |
---|---|
I: Input | Can be selected with the following usages: C: Consultation, T: Table stored in memory, X: Table partially stored in memory, M: Transaction to be validated, N: Transaction not to be validated and P: Principal. |
O: Output | Can be selected with the following usages: D: Output file, S: Selected, R: Result, E: Transaction with error checking, I: Direct printing'and J: Indirect printing. |
E: Output plus OPEN EXTEND clause | Can be selected with the following Types of Code to generate: 4: BULL GCOS7, 5: BULL GCOS8, 0: IBM MVS/ESA OS/390, U: UNYSIS 2200 Series, F: TANDEM, I: DEC/VAX VMS, K: ICL 2900 |
R: Input / Output | Direct access Data Structures only |
T: Sort | In input or output, depending on the usage |
O is the default value.
1 to 9 levels, according to the number of Elements to be used for control break processing. These Elements are identified as the Sort key composition field for this Data Structure.
When there is a control break processing on one or more Data Structures, two indicators keep track of the status of the records being processed
O is the default value.
1 to 9 levels. Enter the number of Elements (Elementary or Group) on which file matching is to be synchronized for this Data Structure. This number identifies the number of the key fields (identified in the Sort key composition field) that are involved in the synchronization.
For an automatic synchronization, the following conditions must be met:Value | Comment |
---|---|
C: Consultation | Any input file |
D: Output file | Any output file |
P: Principal | Input file, likely to be updated by a transaction file (whose usage is M: Transaction to be validated or N: Transaction not to be validated) |
R: Result | Updated principal file in sequential access mode. (When the Data Structure contains an OCCURS DEPENDING ON clause, the output/resultData Structure must be declared as an D: Output file). |
S: Selected | Output file extracted from another file. It differs from the D: Output file usage since the generated description in the output area is not detailed. For Data Elements with an OCCURS DEPENDING ON clause, the usage must be D: Output file. |
T: Table stored in memory | A file to be fully stored in memory. The table is generated according to the number of occurs indicated on each Segment Definition. The maximum number of selected Segments per Data Structure is 50. |
X: Table partially stored in memory | A file to be partially stored in memory. Fillers included in the Segment composition are not stored. Elementary Data Elements other than fillers are limited to 10 (in addition to the Record type Element) for the '00' Segment and to 29 for each specific non-00 Segment. |
M: Transaction to be validated | Input file to be validated which can update
other file(s). The generated functions range from 30 to 76. Note: Only
one M: Transaction to be validated or N:
Transaction not to be validatedData Structure is allowed
per Program.
|
N: Transaction not to be validated | Input file which can update other files. The
generated functions are: 30, 33, 39, 70 to 76. Note: Only one M:
Transaction to be validated or N: Transaction
not to be validatedData Structure is allowed per Program.
|
E: Transaction with error checking | Output transaction file containing a field identifying
records with errors. The system will generate the field(s) to track the erroneous Elements, erroneous Segments and user-defined errors using the reserved Data Elements ENPR, GRPR and ERUT. . Selected or not, the descriptions of these Elements are generated (using the Data Elements DE-ERR and ER-PRR). |
I: Direct printing | Direct printing (or by SYSOUT in IBM MVS). Upon generation, the lines whose 'Structure Identifier' is 00 in the Report will be ignored. |
J: Indirect printing | Indirect printing to be processed by a spool
Program. The fields required to identify the lines, line skips... are indicated in the 'Structure Identifier' 00 in the Report. |
Y: Internal codification table |
They are identified by the value entered in the Sort key field on the Segment -CE Lines tab.
The order for sorting these key Data Elements may be entered here using the values assigned on the -CE Lines tab in the desired order from major to minor - left to right.
If no explicit entry is made here, Elements coded with value 1 to 9 will be taken as the default.
It must contain a numeric value, which corresponds to the block size, i.e. the size of the physical record. Spaces and zeroes are equivalent.
If the Data Structure has a Usage set to P: Principal, you must enter the Code in program' of the result output Data Structure (2 characters).
If the Data Structure has a Usage set to R: Result or D: Output file, you must enter the Code in program of the principal input Data Structure (2 characters).
Value | Type of COBOL code |
---|---|
R: Reader | 1: IBM DOS/VSE |
P: Punch | 1: IBM DOS/VSE |
S: EBCDIC set code | 5: BULL GCOS8 and U: UNYSIS 2200 Series |
C: ASCII set code | 5: BULL GCOS8 |
O: OPTIONAL option not to be generated | 4: BULL GCOS7 and 5: BULL GCOS8 |
A: ALLOWING ALL file optioning option & REGARDLESS sequential reading | I: DEC VAX VMS |
If you fill it in, it is recommended to specify a character string, on 10 characters maximum, in the following format:
You enter here the code (6 characters) of the Data Element whose values identify the different record types of a Data Structure.
This Data Element must belong to the common part Segment (00 Segment).
This name can also be specified in the 'Structure code' field of the Segment Definition tab.
You must specify the replacement values of the parameters in the form of character strings. Each occurrence of the parameter in the Macro is then replaced by the value entered for this particular Program.
The number of characters used for each parameter value must correspond to the appropriate field length for the element being parameterized. For example, if $1 is being used as a Function code, the value must be two characters long.
The values of the field correspond to the association between the Data Element and the presentation characteristics for these labels (left-justified...).
Value | Comment |
---|---|
Default value | Defaults to the value specified in the Dialog. |
F: Data Element only | |
L: Data Element with long label, left-justified | The Data Element is preceded by the Data Element label, left-justified, on 36 positions. |
M: Data Element with long label, right-justified | The Data Element is preceded by the Data Element label, right-justified, on 36 positions. |
N: Data Element with long label, left-justified, trimmed right | The Data Element is preceded by the Data Element label, left-justified with suppression of blanks on the right. |
R: Data Element with long relational label, left-justified | The Data Element is preceded by the relational label, left-justified on 18 positions. |
S: Data Element with short label, left-justified | The Data Element is preceded by the short label, left-justified, on 18 positions. |
T: Data Element with short label, right-justified | The Data Element is preceded by the short label, right-justified, on 18 positions. |
U: Data Element with short label, left-justified, trimmed right | The Data Element is preceded by the short label, left-justified, with suppression of blanks on the right. |
1: Data Element topped by a single line column label | |
2: Data Element topped by a 2–line column label | |
3: Data Element topped by a 3–line column label |
Line overflow is automatically controlled.
If both the line and column numbers equal zero, the element is automatically positioned on the next tabulation point available.
Any line length overflow and field overlapping are automatically detected. However, the presence of a space in front of each field is not verified.
If both the line and column numbers equal zero, the element is automatically positioned on the next tabulation point available.
Segment belonging to the screen-top.
Segment belonging to the repetitive section.
Segment belonging to the screen-bottom.
the logical access is generated automatically, according to the use of the Segment.
Logical accesses to be written in Structured Code.
Segment accesses not described.
Header | Header |
---|---|
Blank: no control break. | |
C: display break | This provides an indication of the logical end-of-file
for control break processing in the repetitive section . Control
break processing will take place under either of these conditions:
|
E: display break (SQL) | Display control break, causes the generation of an equal condition in the 'WHERE' clause of the SQL 'DECLARE CURSOR' statement (and not >=, which is generated otherwise). Allows optimization of the use of 'CURSORs' in the repetitive category. |
Options | Description |
---|---|
N | Not used. No access statement will be generated for this Segment in the validation and update processing. |
L | Read. A simple read command is generated for the Segment. |
E | Existence validation to execute. A read command with the setting of an error code is generated (if it is not found). |
M | Updated Segment (modification only). |
X | Updated Segment (creation and modification only). |
T | Updated Segment (creation, modification and deletion). In the last three cases, the existence validations and the update statements corresponding to the chosen options are generated. If the Segment is related to a previous Segment, regardless of the indicated use, only the update commands for modification and creation are generated. For Segments accesses conditioned by a previous Segment access, update commands for deletions will not be generated. |
U | User-defined logical accesses. |
Entered on the '00' line, the '*SSA' value inhibits the generation of the qualified SSA corresponding to the Segment in the PCB. The Access key source field must be entered with the code of the Data Element used as the display key. The K-.... field is generated with the access key indicated in the Primary access key field (Data element). The key will be filled in automatically in functions F25, F40, and F60.
The SSA of the processed Segment is filled in from the '-CS' lines whose key code has not been found in the hierarchical path
This specification is not available with the HLPI option (the key is directly coded in the 'WHERE' parameter).
In this pane, you select a Data element or you enter the name of a new Data Element (not defined in the Dictionary) that will be used as the primary access key to the Segment. It is used to generate the 'RECORD KEY' clause. The Data Element specified here is considered as a Group Data Element except for SQL organizations where it is considered as an Elementary Data Element.
If a group Data Element is used, and different values are given to the individual members of that group, the codes of those elementary Data Elements are named here. Key Data Elements are not updated in a 'SQL UPDATE' order.
For a Table ('G' organization), selection of a sub-system is executed by indicating the value 'NUSSY' in this field. The system generates the associated key (G-ddss-NUSSY).
In DL/1, the Data Element can belong to all SSA's that permit access to the Segment in the PCB indicated in the external name (code of the PCB).
For SQL Database Segments, a key element must be entered on each line where the value of the Use in display field is not 'N'.
In generated accesses, the Segments are selected when the keys are equal for update or a direct read; for a sequential read in the repetitive category, the Segments are selected when their keys are equal or greater.
A Segment can not contain more than 10 key Data Elements.
Key Data Elements are not updated in a 'SQL UPDATE' order.
If you indicate the BREAKDATE=YES option, the Data Elements defined with a date format will be generated as elementary fields which correspond to the year, month and day and a separator (if it is included in the date format).
Example of a date defined with an M-type format (MM/DD/YYYY):
10 ffnn-date. 11 ffnn-date-MMX. 12 ffnn-date-MM PICTURE 99. 11 ffnn-date-S1 PICTURE X. 11 ffnn-date-DDX. 12 ffnn-date-DD PICTURE 99. 11 ffnn-date-S2 PICTURE X. 11 ffnn-date-YYX. 12 ffnn-date-YY PICTURE 9(4).
A date will be broken down only if the generated COBOL level of the date field is lower than or equal to 47.
The Data Elements called in SQL Segments cannot be broken down, except if these SQL Segments are DB2 Segments and if the DESCR=ALL option has been entered on the generation options (-GO Lines section of the -G Lines tab) of the DB2 Block.
ffnn-date-BRK REDEFINES ffnn-date.
Values | Meaning |
---|---|
ATTRE | UNISYS 2200: Definition of the default attributes at the Screen level. |
ATTRIB | UNISYS 2200: The display of the attributes dynamically
specified (Reverse video and Blink)
is kept. This option applies to F7020. CICS: The dynamic modification of the presentation attributes is taken into account. This option applies to F7020. |
CSSA | Memorizes all the SSA's during a generated
access to a Database. This option is valid for all the Screens of
a Dialog. When this option is specified, all the Screens in the Dialog must be recompiled because the length of the COMMUNICATION AREA is increased. |
CVISION | GCOS6: This option allows to download the standard validations (presence validation, numeric validation, formatting of the initialization character) onto the CVISION screen manager, thus improving performances. |
DCPROC | Generates the DECLARE CURSOR of
DB2, NONSTOP SQL and DATACOM tables in the PROCEDURE DIVISION, FOC function. If this option is not specified, the DECLARE CURSOR is generated in the WORKING STORAGE SECTION. |
DFHAID | IBM CICS: its content initializes the PFKEYS Table. |
DYNAM | Pactables table DYNAM-called. |
DYNPRT | Specifies the recognition of the variable field
protection in the DE-AT table (position 5) and the
automatic processing of the protection in F7020. Enter an F in position 5 of the DE-AT table for the given Data Element. The Data Element then becomes protected and is received by the program (nature F). This option is not available with the IBM 36, UNISYS A series variant (SDF format). |
F10 | Processes any category (top, bottom, repetitive), provided that it contains at least one variable field or access to a Segment. |
FOR | Formatting of the generated COBOL: left-justified DATA
DIVISION, no justification for the PROCEDURE DIVISION but
one COBOL command per line. This option may be entered on the Library Definition tab. In this case, the Dialog is generated in formatted COBOL even if the FOR option is not explicitly entered in this field. With this option, up
to 150 lines are possible in a COBOL paragraph (between two periods).
Warning: This option still exists but is no
longer maintained
|
HEXVAL | UNISYS A: Generates fields with an HEXADECIMAL value in PIC XX. |
HLPI | Generates the file access with the HLPI interface. |
HLPVAL | The values to be checked (indicated in the -D Lines of a Data Element) are sent to the error messages file even though this check has been removed from the Screen in which the Data Element is called. |
HPRT | Calls the documentation associated with the
protected fields (P or F type).
This includes the documentation associated with the Data Element as
well as the associated Texts and comments in the Screen's -GC
Lines section In the Help program, the screen flow will be: first the help on the variable Data Elements, then the help on the protected Data Elements (in the order of the -CE Lines tab). |
IMSME | Generates the 'Multi-Screens' variant for IMS. |
INDEXS | DL/1: Generates the Segment Accesses via secondary
indexes. This option is not compatible with the NOP58 option if the target Segment code is different from the source Segment code and if the source Segment is not generated in the PSB field. |
LOGMES | With the CICS multi-terminal and Microfocus
variants, this option generates a logical message which manages both
the screen display and the sending of messages to the communications
monitor selected with the MONIT option (if
it is not a default value in the variant). AS400 and IMS: This option is used only for the Web. |
LPAGE or LPA | Manages the LOGICAL PAGING in
implicit mode (with PA1 Function Key) or in explicit mode (with a
Logical Paging Operator on the Screen -CE Lines tab). The LPAGE option is available with a monitor, a sub-monitor, or with MONITOFF. With the MONITOFF option, paging can only be performed on the same Screen. With a (sub-)monitor, paging is possible
on several Screens by entering the Screen codes on the Dialog -W
Lines tab.
Note: If sub-monitors are used, all the Screens
that make up a paging group must be in the same sub-monitor.
The LPAGE and SWAP options are not compatible. If they are both indicated, only the LPAGE option is recognized. |
MONIT | UNISYS A Series: generation with a monitor. IBM CICS: generation with a monitor. |
MONITOFF or MOFF | IMS: One transaction code per Dialog Screen
and no monitor generation. MONITOFF and NOTRAC are incompatible. If both are entered, only the MONITOFF option is recognized. |
NOATTR | IMS: Generates the protected fields in the MOD without their attributes (ATTR=YES). This option is valid with all the Screens of a Dialog. |
NOLOCK | AS400: Reads the Segments without update and
with the addition of the WITH NO LOCK clause in the
read function when the file is open in OPEN I-O. This option does not work if several Segments of a same file are accessed, some with update, some without, since READ WITH NO LOCK removes the preceding lock. |
NOOPEN | MICROFOCUS and DEC: Optimizes the opening of the HE file (Help file backup), the LE, OU, EM files (error messages) and the CONNECT to ORACLE. |
NOOPENB | HP3000, TurboImage: Stops the opening of the TurboImage database. The OPEN is not generated in the program. |
NOPSB | Segment generation limitation: In each Screen, only the Segments in use and their hierarchical parents are generated. In the monitor and sub-monitors, the PSB field is no longer generated and is not sent to the Screens. |
NOSAV | With DEC/VAX, GCOS7, MICROFOCUS, ICL, IBM 36 and 38, and BOS/TP: Avoids generating the description of, and the physical access to the HE HELP file. |
NOSDERR | UNISYS 2200: Recognizes the ERMSG Data Element in the message, which therefore is not sent by the SEND ERROR clause. |
NOTRAC | IMS: The transaction code is not generated in the MID of the first Screen of the Dialog. |
OCF | The OCF variable is set to value '1' upon the first program run (Current default value). |
OFF | The Dialog's programs and maps are generated with option MDT-OFF (default value for Gcos7 FORMS). |
ON | Default value (except for Gcos7 FORMS). The Dialog's programs and maps are generated with the MDT-ON option. |
PACSQL | Takes into account the data entered in the Segment -GG Lines for the SQL statements. |
PSBINIT | CICS-DL1 Screen with monitor option: Allows to perform the connection to the PSB and its termination (SCHEDULE PSB and TERMINATE) on the sub-monitor and not on each Screen. |
REFER or REF | Generates the list of all the Data Elements
used in a Dialog. This list is found in the WORKING-STORAGE
SECTION and has a documentary value. It includes the:
|
REPET or RPT | Validation, transfer and positioning of the
attributes for the variable fields which are repeated horizontally
and/or vertically. When a repeated field is used in a Segment access, you must indicate the number of repeated uses in the Segment call of the Screen. |
SQLALL or SQA | SQL: All the table columns are listed in the
Segment access commands:(SELECT ALL COLDELCOn, ... INTO :FFNN-DELCOn) |
SQLCA or SQC | SQL: The INCLUDE SQLCA is generated in the WORKING-STORAGE if one or more DB2 or Non-Stop SQL Segment is called in the Screen: (-CE Lines tab, Organization = S, Q or N). |
SQLIND or SQI | Presence indicators are generated for the Data Element before it is updated or displayed. |
SQLREF or SQR | The indicators are generated for the new V-FFnn-DELCO structure, allowing the automatic management of the cross-references. |
SSMON | This option allows the coding of one PSB for each sub-monitor instead of one PSB for all the Screens in the Dialog. (Refer to the -GG Lines section of the -G Lines tab). |
SWAP | IMS: Option to be used with a (sub-)monitor. This option allows to indicate, in the MFS map, the code of the Screen to branch to via a Function Key. In each map, a 10-character FUNC field is generated and includes the PFKEY value and the external name of the next Screen to branch to. For End-Of-Conversation, the external name of the Screen must be left blank. When using deferred branching, or setting OPER with the PFKEY, the external name is that of the generated map. The FUNC field is processed in the (sub-)monitor. The SWAP option improves performance as it avoids loading the program which processes the branching. Note: If the MONITOFF or LPAGE option
is selected, the SWAP option is not taken into
account.
|
TMF | TANDEM: With this option, the transactional mode is recognized by the generation of BEGIN-TRANSACTION and END-TRANSACTION in the requesters and of BEGIN-WORK and COMMIT-WORK orders in the PacWeb Communications Monitor. |
TS | CICS: The Communication Area is managed outside the LINKAGE SECTION. This area is described in WORKING and saved in TEMPORARY STORAGE by default. In addition, if MDTOFF and call of the HELP function, the Screen is saved in only one area. |
TZVAR | BULL: With this option, the reception and display areas are used in case of error. |
ZNUM | The transfer of the numeric fields to the message (F8145) is conditioned by the fact that no error was encountered (SCR-ER = 0). |