有人了解MVS和JCL吗?
是否可以向我解释一下MVS是什么?以及JCL用于什么?
关于MVS名称的解释:
MVS名称是在20世纪70年代末期加入到OS/VS2操作系统中的。它代表着多虚拟存储器,强调了使用虚拟存储器概念在一台计算机上运行多任务的能力。最终,OS/VS2被放弃了。
MVS名称一直沿用至MVS/370、MVS/XA(eXtended Architecture,31位)和MVS/ESA(Enterprise Systems Architecture,数据空间)时期,一直持续到20世纪90年代中期,当操作系统更名为OS/390后,又在21世纪初支持64位技术并更名为z/OS,这个名称今天仍在使用。然而,在IBM文档中,核心操作系统组件仍然被称为MVS。
有许多优秀的互联网参考资料可以展开IBM System/360及其后继操作系统的历史。
对于JCL作业控制语言
用于
它是一种非常通用的语言,可以控制主机上的所有操作。
例如:使用icetool和idcams检查数据集是否为空,使用icetool计算行数。
000100 //CHKEMPTY JOB 12345,
000110 // 'CHECK EMPTY',
000120 // CLASS=A,
000130 // NOTIFY=&SYSUID
000200 //*
000210 // SET USER=YOURUSERNAME
000220 //* SELECT THE CC RETURN FOR ACTION
000300 //*****************************************************
000400 //*1 CHKEMP ICETOOL 2 COUNT ICETOOL 3 CHKEMP IDCAMS
000600 //*****************************************************
000610 //STEPSET EXEC PGM=IDCAMS
000620 //SYSPRINT DD SYSOUT=*
000630 //SYSOUT DD SYSOUT=*
000640 //SYSIN DD *
000650 SET MAXCC=2 <----SELECT OPTION YOU WANT TO TEST
000660 /*
000670 //*
000680 //*********************************************************************
000690 //* CHECK EMPTY WITH MAXCC=12 ICETOOL
000691 //*********************************************************************
000692 //*
000700 //STEP0001 EXEC PGM=ICETOOL,COND=(1,NE,STEPSET)
000900 //IN DD DSN=&USER..EMPTYDS,DISP=SHR <--- EMPTY DS FOR TEST
001010 //TOOLMSG DD SYSOUT=*
001100 //DFSMSG DD SYSOUT=*
001110 //TOOLIN DD DATA
001200 COUNT FROM(IN) EMPTY
001300 /*
001301 //*
001302 //*********************************************************************
001303 //* COUNT LINES WITH ICETOOL
001304 //*********************************************************************
001305 //*
001306 //STEP0002 EXEC PGM=ICETOOL,COND=(2,NE,STEPSET)
001307 //TOOLMSG DD SYSOUT=* <--- CONTAINS RECORD DATA
001308 //DFSMSG DD SYSOUT=*
001309 //IN DD DSN=&USER..COBOL(CBLPGM),DISP=SHR
001310 //TOOLIN DD DATA
001311 COUNT FROM(IN)
001312 /*
001313 //*
001314 //****************************************************
001315 //* CHECK EMPTY FILES USING IDCAMS MAXCC=4 EMPTY
001316 //****************************************************
001317 //*
001318 //STEP0003 EXEC PGM=IDCAMS,COND=(3,NE,STEPSET)
001319 //IN DD DSN=&USER..EMPTYDS,DISP=SHR <---- EMPTY DS FOR TEST
001320 //SYSPRINT DD SYSOUT=*
001330 //SYSIN DD DATA
001340 PRINT INFILE(IN) COUNT(1)
001350 /*
JCL - 它是一种作业控制语言,用于控制要运行的程序。
MVS - 多重虚拟存储系统。