如何以编程方式判断z/OS中数据集所在卷是否处于在线状态？

在z/OS环境下，无需解析操作员命令输出，可直接通过系统服务API获取结构化的卷状态信息，以下是具体实现方案：

C语言实现 #

z/OS的C运行时库提供了__get_volume_info()函数，可直接查询卷的详细状态，包括在线标识。

示例代码 #

#include <stdio.h>
#include <string.h>
#include <zos.h>

int main(int argc, char *argv[]) {
    if (argc != 2) {
        printf("Usage: %s <volume_serial>\n", argv[0]);
        return 1;
    }

    char volser[7] = {0};
    strncpy(volser, argv[1], 6); // 卷序列号最多6个字符

    struct volume_info vol_info;
    int rc = __get_volume_info(volser, &vol_info, sizeof(vol_info));

    if (rc != 0) {
        printf("Query failed, return code: %d\n", rc);
        return rc;
    }

    if (vol_info.vi_status & VOLUME_ONLINE) {
        printf("Volume %s is ONLINE\n", volser);
    } else {
        printf("Volume %s is OFFLINE or unavailable\n", volser);
    }

    return 0;
}

说明 #

• 编译时需链接z/OS系统库，可添加编译选项-Wc,langlvl(extc99)确保兼容性。
• <zos.h>中定义的VOLUME_ONLINE宏用于判断卷的在线状态，直接通过位运算即可获取结果。

汇编语言实现 #

使用z/OS原生的BLSCVOL宏，专门用于查询卷状态，返回结果包含明确的在线标志位。

示例代码 #

TITLE 'CHECK VOLUME ONLINE STATUS'
         PRINT NOGEN
         USING *,R12
         SAVE  (14,12)
         LR    R12,R15

* 设置目标卷序列号
         LA    R1,VOLSER
         MVC   0(6,R1),='CUSR01' ; 替换为实际卷序列号

* 调用BLSCVOL宏查询状态
         BLSCVOL VOL=R1,
               MF=(E,BLSCWK)

* 检查在线标志位
         TM    BLSCFLGS,BLSCONLN
         BZ    VOL_OFFLINE
         WTO   'VOLUME CUSR01 IS ONLINE',ROUTCDE=(11)
         B     EXIT_PROC

VOL_OFFLINE WTO   'VOLUME CUSR01 IS OFFLINE',ROUTCDE=(11)
EXIT_PROC LR    R15,R0
         RETURN (14,12),RC=(R15)

* 宏工作区定义
BLSCWK   BLSCVOL MF=L
VOLSER   DS    CL6
         END

说明 #

• BLSCVOL执行后，BLSCFLGS字段中的BLSCONLN位（第1位）会被置1，代表卷处于在线状态。
• 宏工作区BLSCWK用于存储宏执行的临时数据和返回结果，必须提前定义。

替代方案：动态分配验证 #

若无法调用专用API，可尝试动态分配目标卷上的临时数据集：

• 分配成功则说明卷在线；
• 若返回RC=8且原因码RSN=0424，则表示卷离线。
  此方法需注意用户权限，适合受限环境下的状态判断。

内容的提问来源于stack exchange，提问作者mike