ICKDSF

1 membros
ICKINIT
INSPECT/INIT — Diagnóstico de Volume DASD 🚨 DESTRUTIVO

INSPECT verifica integridade do volume DASD sem alterar dados (seguro). INIT formata o volume (DESTRUTIVO — apaga tudo). O cartão INIT está comentado por segurança.

ATENÇÃO: Esta operação é IRREVERSÍVEL. Certifique-se de ter backup antes de executar em produção.

Código JCL

ICKINIT.jcl
//ICKINIT  JOB (ACCT),'ICKDSF INSPECT',CLASS=A,MSGCLASS=X,
//         MSGLEVEL=(1,1),NOTIFY=&SYSUID
//*------------------------------------------------------------*
//* ICKINIT - ICKDSF: INSPECT (SEGURO) E INIT (DESTRUTIVO)   *
//* INSPECT: Verifica volume sem alterar dados                *
//* INIT: *** APAGA TODOS OS DADOS DO VOLUME ***              *
//*------------------------------------------------------------*
//INSPVOL  EXEC PGM=ICKDSF,REGION=4096K
//SYSPRINT DD SYSOUT=*
//DASDVOL  DD UNIT=3390,VOL=SER=AKOMV1,DISP=OLD
//SYSIN    DD *
  INSPECT UNITADDRESS(0A00)                      -
          NOVERIFY                                -
          SCAN

//*  *** DESCOMENTE APENAS SE SOUBER O QUE ESTA FAZENDO ***
//*  INIT  UNITADDRESS(0A00)                              -
//*        NOVERIFY                                       -
//*        VOLID(AKOMV1)                                  -
//*        VTOC(0,1,14)                                   -
//*        PURGE
/*