Repositioning automatically called control sections

The INSERT statement can also be used to move automatically called control sections from the root segment to the desired segment. This is helpful when control sections from the automatic call library are used in only one segment. By moving such control sections, the root segment will contain only those control sections used by more than one segment.

When a program is written in a higher level language, special control sections are called from the automatic call library. Assume that the sample program is written in COBOL and that two control sections (ILBOVTR0 and ILBOSCH0) are called automatically from SYS1.COBLIB. Ordinarily, these control sections are placed in the root segment. However, INSERT statements are used in the following example to place these control sections in segments other than the root segment.

//LKED        EXEC  PGM=IEWBLINK,PARM='OVLY'
//MODLIB      DD    DSNAME=USER.OBJLIB,DISP=OLD
//SYSLIB      DD    DSNAME=SYS1.COBLIB,DISP=SHR
              .
              .
              .
//SYSLIN      DD    *
  ENTRY BEGIN
  INCLUDE MODLIB(CSA,CSB)
  OVERLAY ONE
  INCLUDE MODLIB(CSC)

  OVERLAY TWO
  INCLUDE MODLIB(CSD,CSE)
  INSERT ILBOVTR0
  OVERLAY TWO
  INCLUDE MODLIB(CSF)
  INSERT ILBOSCH0
  OVERLAY ONE
  INCLUDE MODLIB(CSG)

As a result, segments 3 and 4 contain ILBOVTR0 and ILBOSCH0 respectively.

This example also combines two ways of specifying the control sections for a segment.