//CBLPARJ2 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: [email protected] *
//* *******************************************************************
//*
//* Text - Process a parameter string passed from the JCL
//* Author - SimoTime Enterprises
//* Date - January 24, 1996
//*
//* This is a sample program that shows how a COBOL program can
//* process input from the JCL using SYSIN.
//*
//* This set of programs will run on a mainframe under MVS or on a
//* Personal Computer with Windows and Micro Focus Mainframe Express
//*
//* *******************************************************************
//* Step 1 of 2, Execute the COBOL program without a parameter.
//*
//* The //SYSIN DD DUMMY is required to prevent the COBOL
//* program from ABENDING on the ACCEPT ... from SYSIN.
//*
//PARJ2S01 EXEC PGM=CBLPARC2
//STEPLIB DD DSN=SIMOTIME.DEMO.LOADLIB1,DISP=SHR
//SYSIN DD DUMMY
//*
//* *******************************************************************
//* Step 2 of 2, Execute the COBOL program with a parameter.
//*
//PARJ2S02 EXEC PGM=CBLPARC2
//STEPLIB DD DSN=SIMOTIME.DEMO.LOADLIB1,DISP=SHR
//SYSIN DD *
This is a single parameter from PARJ2S02 and SYSIN-DD-* ...
/*
//*
//
¤ Dauer der Verarbeitung: 0.23 Sekunden
(vorverarbeitet)
¤
|
Haftungshinweis
Die Informationen auf dieser Webseite wurden
nach bestem Wissen sorgfältig zusammengestellt. Es wird jedoch weder Vollständigkeit, noch Richtigkeit,
noch Qualität der bereit gestellten Informationen zugesichert.
Bemerkung:
Die farbliche Syntaxdarstellung ist noch experimentell.
|
