Data Definition Language (DDL) Reference Manual

DDL Compiler Commands
Data Definition Language (DDL) Reference Manual—529431-004
9-52
DO_PTAL_ON
If you use the DICTR command when you already have a dictionary open, the DDL
compiler closes the current dictionary before opening the specified dictionary.
The DDL compiler ignores the NOSAVE command when a dictionary is opened with
DICTR.
DO_PTAL_ON
The DO_PTAL_ON[OFF] command generates code that cannot [can] be compiled by
older pTAL or TAL compilers that do not recognize FIELDALIGN clauses.
Default: DO_PTAL_ON
DO_PTAL_ON
includes a FIELDALIGN clause for each structure in pTAL or TAL output.
Compilers that do not recognize the FIELDALIGN clause cannot compile the
resulting code.
DO_PTAL_OFF
also includes a FIELDALIGN clause for each structure in pTAL or TAL output, but
encloses each FIELDALIGN clause within IF PTAL compiler directives. Compilers
that do not recognize the FIELDALIGN clause can compile the resulting code.
{ DO_PTAL_ON | DO_PTAL_OFF }
Example 9-22. DO_PTAL_ON and DO_PTAL_OFF Commands (page 1 of 2)
DDL Input
DEF FIRST
02 FLD1 PIC X.
02 SUB.
03 FLD2 PIC X.
END.
DDL Output with DO_PTAL_ON
! SCHEMA PRODUCED DATE - TIME : 3/10/1995 15:26:30
?SECTION FIRST
?PAGE
! Definition FIRST created on 3/10/1995 at 15:26
STRUCT FIRST^DEF (*) FIELDALIGN (SHARED2);
BEGIN
STRING FLD1;
STRUCT SUB;
BEGIN
STRING FLD2;
END;
END;