Memorex LOCK - VERSION 2-24 Informações Técnicas descarregar pdf (Página 357)

100

101

Copying and Merging Datasets (TSIDDTD)

User Reference

Use Pursuant to Company Instructions

8-19

The following example makes a duplicate copy of a multi-file tape

containing three datasets. All of the datasets are controlled, so no control

statements are necessary. TSIDDTD is executed three times, once for

each dataset.

In this example, use TLBL option 64 (Inhibit LUB allocation), option

code 8 (Hold assignment), and option code 3 (No rewind) on the first two

TLBL statements. Use option code 64 (Inhibit LUB allocation) and

option code 2 (Unload) on the last TLBL statement.

// JOB TSIDDTD COPY MULTI-FILE TAPE

// TLBL INPUT,'input.prime.dsn',,,,,,75

// TLBL OUTPUT,'output.prime.dsn',,,,,,75

// EXEC TSIDDTD

// TLBL INPUT,'input.sub.dsn.1',,,,,,75

// TLBL OUTPUT,'output.sub.dsn.1',,,,,,75

// EXEC TSIDDTD

// TLBL INPUT,'input.sub.dsn.2',,,,,,66

// TLBL OUTPUT,'output.sub.dsn.2',,,,,,66

// EXEC TSIDDTD

The following example copies a Start Track 1 disk dataset to an output

dataset using alternate DTF names, selecting only those records with the

constant TAC in position 1 through position 3 or any data except

low-values in position 4 through position 6. The record format, record

size, and block size information are required for Start Track 1 datasets.

// JOB TSIDDTD CREATE NEWFIL

// DLBL OLDFIL,'input.data.set'

// EXTENT SYS005,POOL01,1,0,1,300

// TLBL NEWFIL,'output.data.set'

// EXEC TSIDDTD

INNAME=OLDFIL,OUTNAME=NEWFIL

RECFM=F,BLKSIZE=4000,LRECL=80

SEL=1,3,EQ,C,TAC

SEL=4,3,NE,X,000000

1 2 ... 352 353 354 355 356 357 358 359 360 361 362 ... 567 568

Comentários a estes Manuais

Sem comentários

Memorex LOCK - VERSION 2-24 Informações Técnicas Página 357

Comentários a estes Manuais