Previous Topic: Comment and Continuation Rules

Next Topic: Copybook Support

Example

//SYSIN  DD   *
* COMPARE MASTER FILE FOR PRODUCTION COMMENT
  COMPARE,
    OLDFILE(OLDMSTR),            THIS IS THE OLD MASTER FILE DDNAME
    NEWFILE(NEWMSTR),            THIS IS THE NEW MASTER FILE DDNAME
    IF(10,2,EQ,                  Select record if CT…
		C'CT')                   is found at position 10