Copying a private disk for restoration

The original disk is restored from the backup copy of the private disk from the example in chapter "Copying a private disk for backup" with the COPY-DISK statement and the operand ACTION=*RESTORE.

Log of the FDDRL main task

/START-FDDRL  —————————————————————————————————————————————————————————————  (1)
//MODIFY-FDDRL-PARAMETERS PROCESS-JOBS=*BY-SUBTASK(
                                   STATUS-OUTPUT-PERIOD=1) ————————————————  (2)
//COPY-DISK DISK=PRIV01, OVERWRITE-DISK=*SAME-VSN, ACTION=*RESTORE ————————  (3)
//CREATE-JOBS —————————————————————————————————————————————————————————————  (4)
%(MSG) ?  %  NKVD013 MOUNT DISK 'PRIV01' ON DEVICE '906C'; '(REASON : VSN_NOT_UNIQUE)'; (USE='SPECIAL',SYS-ALLOC='EXCL',INPUT DISK FOR FDDRL COPY). '(ETX = YES; MN; N = NO )'?
%(RPL) . 906D  ————————————————————————————————————————————————————————————  (5)
%(MSG) %  %  NKVD017 MOUNTING OF DISK 'PRIV01' ON DEVICE '906D' FOR TASK  '59SQ' COMPLETED       ————————————————————————————————————————————————————————————  (6)
REQUESTED FDDRL JOBS             FDDRL V21.0A00       2020-08-27 13:14:14
STATEMENT                        REQ-NAME    
  DISK     DEV-TYPE I-DEV >O-DEV O-DISK FORM      DISK-DATE
  DISK-SET TAPE-DEV LOCATION (TAPES)
  -------- -------- -----------------------------------------------------
COPY-DISK           PRIV01       CPD-PRIV01
  PRIV01   D3435    906D  > 906C PRIV01     2020-08-27 13:04:40
 -------------------------------------------------------------------------
//START-JOBS  —————————————————————————————————————————————————————————————  (7)
%  FBD1260 FDDRL SUBTASK '59SR' FOR DISK/DISK-SET 'PRIV01' STARTED  ———————  (8)
 ACTUAL FDDRL JOB STATUS           FDDRL V21.0A00      2020-08-27 13:15:51   (9)
 STATEMENT
   DISK/-SET  TSN FORM JOB-STA     SEL-HPS PROCESS-HPS%
   --------  ---- ---- -------- ---------- ---------------
 COPY-DISK           PRIV01  
   PRIV01    59SR      ACTIVE      1572864    1280320  81%
 SUMMARY: INACTIVE = 0    ACTIVE = 1    TERMINATED = 0    TOTAL = 1
 -------------------------------------------------------------------------
%  FBD1262 FDDRL SUBTASK '59SR' FOR DISK/DISK-SET 'PRIV01' TERMINATED ————— (10)
 -------------------------------------------------------------------------
 FINAL FDDRL JOB PROTOCOL         FDDRL V21.0A00       2020-08-27 13:16:11  (11)
 STATEMENT                        REQ-NAME   REQ-DATE   REQ-TIME
   DISK   DEV-TYPE  IN  >  OUT        DISK-DATE     TSN     HPS   TERM-MSG
   D-SET  F-NAME                                    TSN     HPS   TERM-MSG
          TAPE-DEV (TAPES)
   ------ -------- ----- ------ ------------------- ---- --------- -------
 COPY-DISK           PRIV01       CPD-PRIV01 2020-08-27 13:14:51
   PRIV01 D3435    906D > 906C  2020-08-27 13:04:41 59SR   1572864
 -------------------------------------------------------------------------
//END ————————————————————————————————————————————————————————————————————— (12)
%  FBD1402 UTILITY ROUTINE 'FDDRL' TERMINATED
%(MSG) % % ESM0216 FUNCTION 'DELETE' STARTED FOR SUBSYSTEM 'FDDRL /V21.0'

(1)	The FDDRL program is started.
(2)	The FDDRL parameters are set: processing by subtask output of status log after 1 minute in each case.
(3)	The PRIV01 disk is copied (restored). As the original disk still exists, it has the same name as the input disk.
(4)	The FDDRL job is generated.
(5)	The operator assigns the input disk.
(6)	The FDDRL job is displayed by means of the output “REQUESTED FDDRL JOBS”.
(7)	The job is started.
(8)	The FDDRL main task reports that an FDDRL subtask has been started.
(9)	After 1 minute the status log is output. 95% of the disk areas to be restored have been processed up to this point.
(10)	The FDDRL main task reports that an FDDRL subtask has been terminated.
(11)	The final log of the FDDRL jobs is output. The PRIV01 disk on device 906D is copied to device 906C.
(12)	The FDDRL program is terminated.

Report file $TSOS.S.FBD.59SQ.2020-08-27.131451.CPD-PRIV01

REQUEST REPORT FILE :B10S:$TSOS.S.FBD.59SQ.2020-08-27.131451.CPD-PRIV01
 ++++++ REQUEST COMPLETED OK ++++++
  -------------------------------------------------------------------------
  FINAL FDDRL JOB PROTOCOL         FDDRL V21.0A00       2020-08-27 13:16:11
  STATEMENT                        REQ-NAME   REQ-DATE   REQ-TIME
    DISK   DEV-TYPE  IN  >  OUT        DISK-DATE     TSN     HPS   TERM-MSG
    D-SET  F-NAME                                    TSN     HPS   TERM-MSG
           TAPE-DEV (TAPES)
    ------ -------- ----- ------ ------------------- ---- --------- -------
  COPY-DISK           PRIV01       CPD-PRIV01 2020-08-27 13:14:51
    PRIV01 D3435    906D > 906C  2020-08-27 13:04:41 59SR   1572864
  -------------------------------------------------------------------------
  FDDRL PARAMETERS                  FDDRL V21.0A00      2020-08-27 13:16:11
  PROCESS-JOBS     = *BY-SUBTASK (...)
    TASK-LIM          = 4
    RUN-PRIO          = *STD
    STA-OUTPUT-PERIOD = 1 MINUTE
    SEC-WAIT-TIME     = 1 MINUTE
    JOB-NAME          = *STD
  RETENT-PERIOD    = 0 DAYS
  LOCATION         = *STD
  TAPE-FORM        = *UNDEF
  REPORT-FILE      = *STD
  MONITORING       = *NO
  KEEP-REQUESTS    = 40 DAYS
=============================================================================
SYSOUT PROTOCOL OF SUBTASK 59SR :B10S:$TSOS.S.FBD.59SR.2020-08-27.59SQ.PRIV01
 NAME      TSN  TID     UNP / Q# SPOOLIN         LOGON
 $PRIV01  59SR 002C00D8   00/000 2020-08-27.1314 2020-08-27.1314
 %  FBD1205 FDDRL FUNCTION 'COPY(*R)' FOR DISK/DISK-SET 'PRIV01' STARTED ——— (13) 
 %  FBD1403 1572864 HPS OF DISK 'PRIV01' HAVE BEEN PROCESSED
 %  FBD1206 FDDRL FUNCTION 'COPY(*R)' TERMINATED ——————————————————————————— (14) 
 (MSG) %  %  EXC0420 /LOGOFF PROCESSED. CPU TIME USED: 0.1618 SEC, USER ID: 
TSOS , TASK ID: 002C00D8 ——————————————————————————————————————————————————— (15) 
 %  EXC0419 /LOGOFF AT 1316 ON 2020-08-27 FOR TSN '59SR'
 %  EXC0421 CPU TIME USED: 0.1618 

(13)	Start message of the FDDRL processing.
(14)	End message of the FDDRL processing.
(15)	The FDDRL subtask is terminated.