ENABLE Reference Manual

SCREEN COBOL SKELETON
1. You can replace literals in the text. For example, you can
modify the skeleton so that the application will display
messages in a language other than English. If the modified
literal is longer than the original, you might need to
modify the affected SCREEN COBOL data items.
2. You can remove the T9155- prefix from the variables in the
skeleton provided no name conflict will result. Removing
this prefix does improve readability of the SCREEN COBOL
source code; it is present in the skeleton solely to avoid
conflict with the PROGRAM-ID name and field names from the
DDL record description.
3. You can associate user flags with a portion of code. In a
command line, you can use the tests EQUAL, LESS THAN, and
GREATER THAN to test the value of a user flag. Depending on
the result of the test, ENABLE either uses, or does not use
the associated code. You could, for example, modify the
SCREEN SECTION of the skeleton to include the UPSHIFT
attribute for alphanumeric fields. If you associate this
portion of the code with a user flag, you can turn UPSHIFT
off and on with the SET FLAG command. For example, suppose
that you include the following in your ENABLE commands used
to generate an application:
SET BOX FLAG 10 1
If the skeleton contains the following:
% 1 2 94 110 2 <
UPSHIFT INPUT-OUTPUT
% 1 0 94
the code UPSHIFT INPUT-OUTPUT will be included in the
specified block of code for the generated application. Note
that the SET FLAG command identifies flag number 10. This
flag number corresponds to the 110 in the first command line.
(In the skeleton, user-flag numbers are from 100 to 199.)
The line of code is included because the SET FLAG command
sets this flag to 1 and the command line indicates that the
code should be included if user flag 10 is less than (<) 2.
ENABLE includes the code between the two command lines.
4. Commands in the application skeleton determine the generation
of the SCREEN SECTION. By modifying the application
skeleton, the screen attributes generated into programs can
be controlled. For example, you could set all key fields to
BLINK, change the symbols (* and + by default) that identify
primary and alternate keys, or define new characters to be
used as fill characters.
D-2