| Quellcodebibliothek Statistik Leitseite products/Sources/formale Sprachen/JCL/jcl4/ Datei vom 4.1.2008 mit Größe 1 kB |
|
Quelle pdscrtj3.jcl Sprache: JCL |
|||||||||
|
//PDSCRTJ3 JOB SIMOTIME,ACCOUNT,CLASS=1,MSGCLASS=0,NOTIFY=CSIP1
//* ******************************************************************* //* This program is provided by: * //* SimoTime Enterprises, LLC * //* (C) Copyright 1987-2005 All Rights Reserved * //* Web Site URL: http://www.simotime.com * //* e-mail: helpdesk@simotime.com * //* ******************************************************************* //* //* Subject: Define a PDS using the IEFBR14 with a DD Statement //* Author: SimoTime Enterprises //* Date: January 1,1998 //* //* The JCLLIB tells the mainframe where to look for PROCs. //* //* The JCL member executes the PROC called PDSCRTP3 and passes a //* fully qualified data set name (DSN) via the symbolic name //* called DSNAME and referenced in the PROC as &DSNAME. //* //********************************************************************* //* //PROCLIB JCLLIB ORDER=MFI01.SIMOPROD.JCLPROC1 //* //* ******************************************************************* //* Step 1 of 3 Create a PDS using SET and EXEC //* // SET DSNAME=MFI01.SIMOPROD.TEMP01 //STEPJ01 EXEC PDSCRTP3 //* //* ******************************************************************* //* Step 2 of 3 Create a PDS using EXEC and DSNAME substitution //* //STEPJ02 EXEC PDSCRTP3,DSNAME=MFI01.SIMOPROD.TEMP02 //* //* ******************************************************************* //* Step 3 of 3 Create a PDS using EXEC and DSNAME substitution //* //STEPJ03 EXEC PDSCRTP3,DSNAME=MFI01.SIMOPROD.TEMP03 //* ¤ Dauer der Verarbeitung: 0.1 Sekunden (vorverarbeitet) ¤*© Formatika GbR, Deutschland |
|
2026-03-28