I am beginner in zos,ispf and jcl.
I learned how to dump specified disk to dateset.
and send one dateset to ftp.
//HICHJCL1 JOB (),
// CLASS=A,
// MSGCLASS=D,
// MSGLEVEL=(1,1),
// NOTIFY=&SYSUID,
// TIME=2440
//****************************************************************
//*THIS IS AN EXAMPLE OF A JOB THAT WILL:
//* DUMP FULL VOLUME FROM DASD TO DATASET
//****************************************************************
//DUMPSTEP EXEC PGM=ADRDSSU,REGION=0M
//SYSPRINT DD SYSOUT=*
//DASD1 DD UNIT=3390,VOL=SER=ZASYS1,DISP=SHR
//DASDO DD UNIT=3390,DISP=(NEW,CATLG,DELETE),
// VOL=SER=3390M2,DSN=HICHNIST.ZASYS1.BACK,
// SPACE=(CYL,(4200,1000),RLSE)
//SYSIN DD *
DUMP FULL -
INDD(DASD1) -
OUTDD(DASDO) -
ALLEXCP -
ADMINISTRATOR -
OPTIMIZE(4)
/*
//FTPSTEP EXEC PGM=FTP,REGION=5M,COND=(0,NE,DUMPSTEP),
// PARM='192.168.14.2 (EXIT TIMEOUT 20'
//SYSPRINT DD SYSOUT=*
//INPUT DD *
user
12345
PUT 'HICHNIST.ZASYS1.BACK'
CLOSE
QUIT
/*
//
I want to write a jcl that
1- find all online disks and their device number and volser.
2- dump each disk to dataset which name is contain volser and device number (ex. zares1.n0a81.dump)
3- send each file to ftp.
But i don't know how to use variables and loop and other thing for above need.
And I don't know how to send a dataset to ftp with blank password in jcl.(like most anonymous ftp servers)
best thank for any help
and
best regards and wishes for all
and
best thanks and regards and wishes and ... for complete code with its comments
