//D0403 JOB CLASS=A,MSGCLASS=A,MSGLEVEL=(1,1),NOTIFY=&SYSUID
//************************************************************
//STEP1 EXEC PGM=IEBCOPY
//SYSPRINT DD SYSOUT=*
//OUT1 DD DSN=USERID.PDS04,DISP=OLD
//IN1 DD DSN=USERID.PDS01,DISP=OLD
//IN2 DD DSN=USERID.PDS02,DISP=OLD
//IN3 DD DSN=USERID.PDS03,DISP=OLD
//SYSIN DD *
COPY OUTDD=OUT1
INDD=IN1
SELECT MEMBER=((M11,M41,R),(M13,M43,R))
INDD=IN3 EXCLUDE MEMBER=(M31,M32)
COPY OUTDD=OUT1,
INDD=((IN2,R))
/*
//
各位大神,本人刚刚开始学习COBOL.
以上是COBO两种JCL练习题中关于IEBCOPY中member的源代码,
在操作开始之前,
PDS01中的MEMEBER是M11,M12,M13,
PDS02中的MEMEBER是M21,M22,M23,
PDS03中的MEMEBER是M31,M32,M33。
PDS04中没有MEMBER,空的。
请问最后的代码INDD=((IN2, R))中的代码表示什么意思呢?
最后移动完成之后,PDS04中的MEMBER又是哪些呢?
多谢大家!~