The examples that follow show how to execute the Tachyon Update Utility using both the command line interface and the JCL interface. In the JCL examples, the following entries are assumed to exist in a DSNMAPxx.ini configuration file:
DSNMAP DSN(MY.PDS) PATH(C:\mypds\&m.txt) RECFM(FB) LRECL(80) BLKSIZE(3120) FILEDATA(TEXT) DSNMAP DSN(NEW.PDS) PATH(C:\newpds\&M.EBC) RECFM(FB) LRECL(80) BLKSIZE(3120) FILEDATA(RECORD)
Given that a file named C:\myfiles\addstmts.txt is an ASCII text file containing the following control statements:
./ ADD NAME=MEMBER1 line 1 line 2 ./ ADD NAME=MEMBER2 ./ NUMBER NEW1=100,INCR=10 line 1 line 2the following examples apply:
tuu -new -sysut2 "C:\mypds\&m.txt" C:\myfiles\addstmts.txt
//ADD JOB //STEP1 EXEC PGM=IEBUPDTE,PARM=NEW //SYSIN DD PATH='C:\myfiles\addstmts.txt' //SYSUT2 DD DSN=MY.PDS,DISP=OLD //SYSPRINT DD DUMMY
Given that files C:\mypds\member1.txt and C:\mypds\member2.txt are ASCII text files, the following examples will create files C:\newpds\MEMBER1.EBC and C:\newpds\MEMBER2.EBC with 80 byte fixed length EBCDIC records:
./ REPRO NAME=MEMBER1 ./ REPRO NAME=MEMBER2,LIST=ALLthe activity report will be written to the file named iebupdte.lst in the current working directory:
tuu -sysut1 "C:\mypds\&m.txt" -sysut2 "C:\newpds\&M.EBC" -r2 C:\myfiles\repro.txt -sysprint iebupdte.lst
//ADD JOB //STEP1 EXEC PGM=IEBUPDTE //SYSIN DD * ./ REPRO NAME=MEMBER1 ./ REPRO NAME=MEMBER2,LIST=ALL /* //SYSUT1 DD DSN=MY.PDS,DISP=OLD //SYSUT2 DD DSN=NEW.PDS,DISP=OLD //SYSPRINT DD SYSOUT=*
Given that a file named C:\newpds\MEMBER1.EBC contains fixed length
80 byte EBCDIC records and
a file named C:\myfiles\update.txt contains the following
control statement:
./ CHANGE NAME=MEMBER1,UPDATE=INPLACE
followed by update statements, the following examples will update
C:\newpds\MEMBER1.EBC :
tuu -parm MOD -sysut1 "C:\newpds\&M.EBC" -r1 C:\myfiles\update.txt
//ADD JOB //STEP1 EXEC PGM=IEBUPDTE,PARM=MOD //SYSIN DD PATH='C:\myfiles\update.txt' //SYSUT1 DD DSN=NEW.PDS,DISP=OLD //SYSPRINT DD SYSOUT=*