X 8.1.8 INSERT Statement
X The INSERT statement is a library statement that adds COBOL statements to
X the source program included by a BASIS statement.
X ___ Format _____________________________________________________________
X | |
X | >>__ _________________ __INSERT__sequence-number-field______________>< |
X | |_sequence-number_| |
X Can optionally appear in columns 1 through 6, followed by a space.
X The content of this field is ignored.
X Can appear anywhere within columns 1 through 72, followed by a space
X and the sequence-number-field. There must be no other text in the
X A number which must be equal to a sequence-number in the BASIS source
X program. This sequence-number is the 6-digit number the programmer
X assigns in columns 1 through 6 of the COBOL coding form.
X The numbers referenced in the sequence-number-fields of any INSERT or
X DELETE statements must always be specified in ascending numeric order.
X The sequence-number-field must be a single number (for example,
X 000130). At least one new source program statement must follow the
X INSERT statement for insertion after the statement number specified by
X the sequence-number-field.
X New source program statements following the INSERT statement can include
X DBCS or EUC data items.
X Note: If INSERT or DELETE statements are used to modify the COBOL source
X program provided by a BASIS statement, the sequence field of the COBOL
X source program must contain numeric sequence-numbers in ascending order.
X The source file remains unchanged. Any INSERT or DELETE statements
X referring to these sequence-numbers must occur in ascending order.
© Copyright IBM Corp. 1991, 1998
IBM Library Server Copyright 1989, 2005 IBM Corporation. All rights reserved.
Return to library:
IBM Hardware |
IBM System z Redbooks
How to order publications
Download IBM Library Reader |
Download IBM Softcopy Reader |
Download Adobe® Acrobat® Reader®
Download IBM Softcopy Librarian
Adobe, the Adobe logo, Acrobat, the Acrobat logo, and Acrobat Reader are registered trademarks
of Adobe Systems incorporated.