MainframeSupports
tip uge 11/2000:

Jeg tror en del af jer vil nikke genkendende til denne uges tip og jeg er sikker på, at ret mange vil sige "det var pokkers". Faktisk er der ikke noget nyt i at konkatenere på DD *, muligheden har så vidt vides eksisteret altid, men den er bare ikke ret udbredt.

Lad os straks kaste os ud i et eksempel:

//SYSTSIN DD *
  DSN SYSTEM(DB2)
/*
// DD DISP=SHR,DSN=MY.DB2.PROGRAM
// DD *
  END
/*

Under forudsætning af, at datasettet MY.DB2.PROGRAM er FB 80 og indeholder en enkelt record med eksempelvis "  RUN PROGRAM(MYPROG)", så vil det samlede indhold af SYSTSIN i eksemplet svare til:

//SYSTSIN DD *
  DSN SYSTEM(DB2)
  RUN PROGRAM(MYPROG)
  END
/*

Således kan vi benytte det samme job til at eksekvere forskellige programmer, men på samme DB2-subsystem. Mulighederne i denne sammenblanding af DD * og rigtige datasets er faktisk ret store. Kun din fantasi sætter grænserne. Husk at overholde reglerne for DCB-oplysninger på konkatenerede datasets, og hvis man som jeg ikke rigtig er inde i dem, så brug FB 80 datasets.

Sidste uges tip        Tip oversigten