DAT2330 MVS JCL Midterm Version #1 Name: _________________________________________ MVS JCL Coding This test paper has two sides. Read both of them. This test is closed book. The only aid permitted to you is the crib sheet you prepared and handed to me the day before the test. If you handed it in to me on time, you will receive it back before the start of the test. You will be provided with a blank sheet of paper on which you may draw a Flow Diagram for your JCL, if you so choose. The Flow Diagram will not be marked. For this hand-written test only, you may write your JCL in lower-case without penalty. Use JCL comments to document any guesses you are forced to make. State whether an incorrect guess would cause a JCL error or a run-time error. (If the error is a run-time error, also state exactly which program will detect the run- time error.) ____________________________________________________________ Using the coding sheets provided, code all the JCL for the following job. Identify the job with your full name and the account code MIDTRM. Request two less than highest priority within the JES-3 job queue. Request the JES-3 allocation messages; but, arrange that only our JCL prints (no PROC listing is needed). Send the job JCL and JES-3 message listings (about 200 lines) to a laser printer. First, use the IBM utility IDCAMS to copy 500 records of instream test data to a dataset named MYTEST on tape number 727472. Delete this tape after its last use. Hold IDCAMS status messages for viewing via TSO. Next, use the cataloged procedure named CLGCOB to compile, link-edit and test an instream COBOL program. The test step is named COBG, the link step is named COBL, and the compile step is named COBC. The running test program will read the test data tape created in the previous step, using DDname COPYDATA. The test program will produce print output on DDname PRINTOUT. Three lines of output will appear for every test tape input record. Send this output to a standard printer. Time: 45 minutes Global Weight: 10% DAT2330 MVS JCL Midterm -2- Winter 2003 The test program will update a cataloged disk dataset of about 2000 records named DSKDAT using DDname UPDATEDK. The test program will write 3000 records to a new payment tape file named PAYMENT on tape number 274723. This tape must be created in ANSI format, for shipping off-site. The COBOL code for this ANSI tape dataset is below: SELECT TST-FILE ASSIGN TO TESTDATA. FD TST-FILE RECORD CONTAINS 40 CHARACTERS BLOCK CONTAINS 0 RECORDS ORGANIZATION IS SEQUENTIAL. Catalog this ANSI tape after its last use. In this shop, all tapes are in group TGRP; disks are in group DGRP. JES-3 job scheduler classes for our shop are as follows: CLASS F - 1 tape, maximum 500 print lines, no use of laser printer CLASS G - 1 tape, maximum 5000 print lines, no use of laser printer CLASS H - 1 tape, maximum 1000 print lines, may use laser printer CLASS I - 2 tapes, maximum 5000 print lines, may use laser printer CLASS J - 2 tapes, maximum 10000 print lines, may use laser printer CLASS K - 3 tapes, no print line maximum, may use laser printer JES-3 printer spooling classes for our shop are as follows: CLASS O - laser printer only, maximum 500 print lines CLASS P - laser printer only, maximum 5000 print lines CLASS Q - standard printer, maximum 1000 print lines CLASS R - standard printer, maximum 5000 print lines CLASS S - standard printer, no print line maximum CLASS T - hold for viewing from TSO terminal Time: 45 minutes Global Weight: 10%