Skip to Content

HCHECKA – Reports for FDRPAS users

This section describes HCHECKA.

Print FDRPAS License Information

 //STEP01   EXEC PGM=FDRPAS,REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSIN    DD *
  LICENSE  TYPE=SWAP
/*

Sample Output

CONTROLLER SSID STORGRP  UNIT VOLSER   % ALLOC  # CYLS  SIZE(GB)    TOTAL(GB)  # 3390-3
---------- ---- -------- ---- ------   -------  ------  --------  -----------  --------
 IBM L6001                                40                        2,361.970       832
 IBM LR221                                 7                        3,045.996      1073
 EMC ABYKN                                10                        3,926.772      1383
 EMC ABYKL                                23                        4,649.704      1638
 HTC 56422                                24                        1,636.597       576
 HTC 65950                                13                          271.841        95
CPU SERIAL SYSTEM NAME                 % ALLOC                      TOTAL(GB)  # 3390-3
---------- -----------                 -------                    -----------  --------
09E2062818 CPUA                           19                       15,892.882      5599

Create an Extract File

Create an extract file with volume data information. These are some of the fields used by the reports in this set:

  • UCBSTATS - UCB status indicators
  • VLALOSTA - Volume allocation status
  • VLCTLSER - Controller serial number
  • VLDEVTYP - Device type
  • VLMFRCOD - Manufactures’ code
  • VLSSID - SSID
  • VLSYSID - System identification from SMF
  • VLUNIT - Unit address
  • VLVOLSER - DASD volume serial number
 //STEP02   EXEC PGM=FDREPORT,REGION=0M
//SYSPRINT DD SYSOUT=*
//ABRMAP   DD SYSOUT=*
//DIAGPCH  DD SYSOUT=*
//SYSIN    DD *
  DEFAULT  SUMDEVICE=UNIQUE,
           ENABLE=(ONLINE,FOURBYTEXTENT,EAVDISK),
           DISABLE=(INFOMSG,SUMVALUES)
  XSELECT  VLUNIT>=0
  REPORT   FIELDS=(VLVOLSER,VLUNIT)
  PRINT    DATATYPE=VOLDATA,RPTYPE=DATA,ENABLE=OFFLINE

All Addresses Summarized by ONLINE/OFFLINE Volumes

  TITLE    LINE='ALL ADDRESSES SUMMARIZED BY ONLINE/OFFLINE VOLUMES +
                 ON <VLSYSID>'
  XSELECT  VLUNIT>=0
  REPORT   FIELDS=(VLUNIT,VLVOLSER,VLDEVTYP,UCBSTATS,VLMFRCOD,VLCTLSER,
                   VLSSID)
  SORT     FIELDS=(UCBSTATS,VLUNIT),SEQUENCE=(A),BREAK=(SEJ,NO)
  SUMMARY  FIELDS=VLUNIT
  PRINT    DATATYPE=EXTRACT 

Sample Output

 ALL ADDRESSES SUMMARIZED BY ONLINE/OFFLINE VOLUMES ON CPUA

UADR VOLSER DEVTYPE UCBSTAT MFR CNTSR SSID
---- ------ ------- ------- --- ----- ----
18AF VM18A7 3390-9  OFFLINE HTC 65950 9002
1904 XX1904 3390-A  OFFLINE HTC 56422 9102
…
2528 SH2528 3390-A  OFFLINE IBM LR221 8106
2529 SH2529 3390-A  OFFLINE IBM LR221 8106
…
3011 SY3011 3390-54 OFFLINE EMC ABYKN 3001
3014 SY3016 3390-27 OFFLINE EMC ABYKN 3001
…
    SUB - UCBSTATS-OFFLINE    VLUNIT-----------702

UADR VOLSER DEVTYPE UCBSTAT MFR CNTSR SSID
---- ------ ------- ------- --- ----- ----
040A SMS40A 3390-27 ONLINE  IBM LR221 8101
040B SMS40B 3390-27 ONLINE  IBM LR221 8101
…
0830 RVA830 3390-27 ONLINE  HTC 65950 9003
0831 RVA831 3390-27 ONLINE  HTC 65950 9003
…
4670 UPBK17 3390-A  ONLINE  EMC ABYKL 0301
4671 UPBK18 3390-A  ONLINE  EMC ABYKL 0301
…
    SUB - UCBSTATS-ONLINE     VLUNIT-----------851
   FINAL TOTALS --            VLUNIT----------1553

Volumes Flagged as SYSRES 

  TITLE    LINE='VOLUMES FLAGGED AS SYSRES ON <VLSYSID>'
  XSELECT  VLALOSTA=SYSRES
  REPORT   FIELDS=(VLVOLSER,VLUNIT,VLDEVTYP,UCBSTATS,VLALOSTA,VLSYSID)
  SORT     FIELDS=(VLVOLSER),SEQUENCE=(A)
  PRINT    DATATYPE=EXTRACT 

Sample Output

 VOLUMES FLAGGED AS SYSRES ON CPUA

                                    SYS
VOLSER UADR DEVTYPE UCBSTAT ALOSTA   ID
------ ---- ------- ------- ------ ----
IPLZ1D 8075 3390-27 ONLINE  SYSRES CPUA

List Page and Swap Data Sets

  TITLE    LINE='PAGE AND SWAP DATASETS (REPORT RUN ON <VLSYSID>)'
  XSELECT  CLUSATTR=FORMAT
  XSELECT  CLUSATTR=PAGESPACE
  XSELECT  CLUSATTR=SWAPSPACE
  REPORT   FIELDS=(VOL,DSN,CLUSATTR)
  SORT     FIELDS=(VOL),SEQUENCE=(A)
  PRINT 

Sample Output

 PAGE AND SWAP DATASETS (REPORT RUN ON CPUA)

VOLSER DATA SET NAME                                CLUSTER ATTRIBUTES
------ -------------                                ------------------
IPLZ1C PAGE.VIPLZ1C.PLPA.DATA                       EXT FOR TIM PAG
IPLZ1C PAGE.VIPLZ1C.COMMON.DATA                     EXT FOR TIM PAG
IPLZ1D PAGE.VIPLZ1D.PLPA.DATA                       EXT FOR TIM PAG
IPLZ1D PAGE.VIPLZ1D.COMMON.DATA                     EXT FOR TIM PAG
IPLZ21 PAGE.VIPLZ21.PLPA.DATA                       EXT FOR TIM PAG
IPLZ21 PAGE.VIPLZ21.COMMON.DATA                     EXT FOR TIM PAG
IPLZ22 PAGE.VIPLZ22.PLPA.DATA                       EXT FOR TIM PAG
IPLZ22 PAGE.VIPLZ22.COMMON.DATA                     EXT FOR TIM PAG
PAGAAA PAGE.VPAGAAA.SHORTAGE.DATA                   EXT FOR TIM PAG
PAGBBB PAGE.VPAGBBB.SHORTAGE.DATA                   EXT FOR TIM PAG
PAGCCC PAGE.VPAGCCC.SHORTAGE.DATA                   EXT FOR TIM PAG
PAGEA0 PAGE.VPAGEA0.CPUA.LOCAL00.DATA               EXT FOR TIM PAG
PAGEB0 PAGE.VPAGEB0.CPUB.LOCAL01.DATA               EXT FOR TIM PAG
PAGEB1 PAGE.VPAGEB1.CPUB.LOCAL02.DATA               EXT FOR TIM PAG
PAGEB2 PAGE.VPAGEB2.CPUB.LOCAL03.DATA               EXT FOR TIM PAG
PAGEB3 PAGE.VPAGEB3.CPUB.LOCAL04.DATA               EXT FOR TIM PAG
…
PAGE01 PAGE.VPAGE01.CPUC.PLPA.DATA                  EXT FOR TIM PAG
PAGE01 PAGE.VPAGE01.CPUC.COMMON.DATA                EXT FOR TIM PAG
PAGE01 PAGE.VPAGE00.CPUH.PLPA.DATA                  EXT FOR TIM PAG
PAGE01 PAGE.VPAGE00.CPUH.COMMON.DATA                EXT FOR TIM PAG
SYTS48 PAGE.VSYTS48.CPUE.LOCAL01.DATA               EXT FOR TIM PAG

List All VVDS Data Sets, Check for Logical Errors

Check for VVDS errors on original online volumes. Punch IDCAMS control statements to remove invalid entries. IDCAMS control statements are punched to the DIAGPCH DD statement. 

  TITLE    LINE=’LIST ALL VVDS DATASETS, CHECK FOR LOGICAL ERRORS’
  XSELECT  VVRSTATS.NE.NONE
  XSELECT  XDSN=SYS1.VVDS**,VVRSTATS.NE.NONE
  REPORT   FIELDS=(VOL,VVRSTATS,DSN)
  PRINT    ENABLE=(DIAGNOSEVVDS,ICFERRPRT,PUNCHDIAGNOS),SORT=COMBINE

Sample Output

 LIST ALL VVDS DATASETS, CHECK FOR LOGICAL ERRORS

                                                    NVR/VVR
VOLSER DATA SET NAME                                ERROR STATUS
------ -------------                                --------------
IDPWK1 CDM0.WZ0439.BACKUP                           NVVR
SYSLB6 SYSP.V5R6IBM.GUI                             NVVR
IDPLB6 SYSP.XA.TABLES                               NVVR

Sample SYSPRINT Output

         MODELDSCB ENABLED -- REQUIRED IF DIAGNOSEVVDS IS SPECIFIED
FDR421   ICF LOCATE ERROR -- RTNCODE---8/IGGOCLEG--42 - VOL=SMS098 -- DSN=TSTSMS.ABRV0141.KSDS1.DATA
         ORPHANED VVR ON VOLUME SAFEC8 AT RBA 00006000 WITHIN VVDS SYS1.VVDS.VSAFEC8
000000   0F600033 E9200000 00000AE5 E5D94BD5    D6C3C1E3 000AE5E5 D94BD5D6 C3C1E300   *....Z......VVR.NOCAT..VVR.NOCAT.*
000020   09E5E5D9 4BD5D6C3 C1E30AE5 E5D94BD5    D6C3C1E3 00005521 C0B00000 00E20000   *.VVR.NOCAT.VVR.NOCAT.........S..*
000040   00100000 02800001 5000000A 80000000    0FF60000 FFFFFFFF FFFFFFFF 00000000   *.................6..............*
000060   08000000 00000000 00010000 00000000    00000000 00000000 00000000 0F000002   *................................*
000080   8000BCD2 AC82C02D 3A000E98 60810060    00000009 002D0000 00030000 00000000   *...K............................*
0000A0   00007000 00007E90 00000000 00000000    00000000 02000000 00000004 00000000   *................................*
0000C0   00000000 00000001 00000000 00000000    00000000 00000000 00000014 000A8000   *................................*
0000E0   00000000 00000000 00000000 0E36255A    00000000 00000001 00000000 00000000   *................................*
000100   00000000 00000000 00000000 00000000    00000000 00000000 00000000 00000000   *................................*
      LINES 000120-000F00 SAME AS ABOVE
000F20   0000003E 23800100 00000000 01500000    0A800000 00380000 03000200 000F0000   *................................*
000F40   00000000 00000000 00000014 0001016C    000A016D 000A0010 00000000 000A7FFF   *................................*
         CATALOG VVR -- REQUIRES READ AUTHORITY TO RACF FACILITY PROFILE:   STGADMIN.IGG.DLVVRNVR.NOCAT
         REMOVE ORPHANED VVR WITH:
            //STEPXX EXEC PGM=IDCAMS
            //SYSPRINT DD SYSOUT=*
            //DD1      DD UNIT=SYSALLDA,DISP=SHR,VOL=SER=SAFEC8
            //SYSIN    DD *
             DELETE VVR.NOCAT   -
               FILE(DD1) VVR
            // 

Sample DIAGPCH Output

 //STEPXX EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//DD1      DD UNIT=SYSALLDA,DISP=SHR,VOL=SER=SAFEC8
//SYSIN    DD *
 DELETE VVR.NOCAT   -
   FILE(DD1) VVR
//

Check Source Volumes for Structural Errors

FDRPAS SIMSWAP has these uses:

  • Validates all of the operands.
  • Validates the source volume(s) for structural errors in the VTOC and VVDS.
  • Determines the systems with access to the source volume. 

For more information, see Section 310.02

//SIMSWAP  EXEC PGM=FDRPAS,REGION=0M
//SYSPRINT DD SYSOUT=*
//SYSIN    DD *
  SIMSWAP  TYPE=FULL,MAXTASKS=3,CHECKSOURCE=YES
  MOUNT    VOL=IDPBK1,SWAPUNIT=0490                      ***CHANGE
…
/*

Sample Output

 CPK320I  COMPAKTOR OPTIONS IN EFFECT -- CHECKSOURCE-------------IDPBK1
CPK529I  INDEXED VTOC EXISTS ON VOLUME=IDPBK1
VOLUME SUMMARY --- DEVICE TYPE .................................  3390-3
                   NO. OF TRACKS ............................... 50085
                   NO. OF CYLINDERS ............................  3339
                   NO. OF ALLOCATED TRACKS ..................... 20229
                   PERCENTAGE OF VOLUME IN USE .................    40
CPK600I  COMPAKTOR SUCCESSFULLY COMPLETED CHECKSOURCE RUN ------ VOLUME=IDPBK1
FDR233  CPU WITH (SERIAL# 05E2062818) IS ATTACHED TO VOL=IDPBK1              - IBM 2107941 TO IBM 2107941
FDR233  CPU WITH (SERIAL# 09E2062818) IS ATTACHED TO VOL=IDPBK1              - IBM 2107941 TO IBM 2107941
FDR233  CPU WITH (SERIAL# 08E2062818) IS ATTACHED TO VOL=IDPBK1              - IBM 2107941 TO IBM 2107941
FDR233  CPU WITH (SERIAL# 02E2062818) IS ATTACHED TO VOL=IDPBK1              - IBM 2107941 TO IBM 2107941
FDR233  CPU WITH (SERIAL# 01E2062818) IS ATTACHED TO VOL=IDPBK1              - IBM 2107941 TO IBM 2107941
FDRW66  SWAP OF VOL=IDPBK1 TO UNIT=0490 NEEDS TO BE STARTED ON   5 SYSTEMS
FDR233  FOLLOWING LPARS NEED MONITOR
FDR233  CPU WITH (SERIAL# 05E2062818)
FDR233  CPU WITH (SERIAL# 09E2062818)
FDR233  CPU WITH (SERIAL# 08E2062818)
FDR233  CPU WITH (SERIAL# 02E2062818)
FDR233  CPU WITH (SERIAL# 01E2062818)


 

Tip: For faster searching, add an asterisk to the end of your partial query. Example: cert*

BMC AMI Storage FDR 6.1