Compose

PURPOSE:  COMPOSE is an equated command that will recompile a Data Base Library (DBL) object commenting out INCLUDE statements while inserting the text of the segment.  This utility is useful for debugging as it lets you step through each line, field, and routine of the Code Segment (CS) using PM DEBUG.

SYNTAX

*COMPOSE object-type old-name TO new-name [USING dbl2 [,dbl3] ] [HUSH]

object_type

Object types allowed are:  CM, DI, GS, ID, PM and CS

old_name

Current name of object.

TO new_name

Name of new object type.  This name cannot be the same as the old one.

[USING dbl2]

Location of code segments being called.

[,dbl2]]

Up to 3 DBL's can be included.

[HUSH]

Suppresses the displaying of warning messages.

EXAMPLE

*compose PM test1 TO test2

NOTES:  The INCLUDE statement is kept as a comment (prefixed with the word "Begin").  This identifies where the Code Segments (CS) are being called in the Data Base Library (DBL) object.  The CS statements are placed in the object text followed by the comment:  "END segment_name"

COMPOSE handles up to 36 arguments (0 through 9 and A through Z).  COMPOSE can recognize ARG (for indicating arguments) in upper or lower case letters.  COMPOSE increments lines by 1.