PKUNZIP命令

时间:2019-04-23 03:45:03

标签: mainframe jcl mvs

是否可以在mvs上解压缩包含多个文件的档案。

当前,我们可以使用PKUNZIP解压缩文件 与此命令。

//UNZIP EXEC PKUNZIP
//SYSIN DD *
-ARCHIVE(TEST.FILE.ZIP)
-UNZIPPED_DSN(**,TEST.TEMP.DATA)
-TEXT
-OVERWITE
/*

此步骤仅从zip写入最后一个文件,而我们要从zip中获取所有文件。 还有其他命令可以覆盖吗?

1 个答案:

答案 0 :(得分:0)

我没有使用PKUNZIP,但是this person here似乎可以使用。向下滚动到底部,有几个代码段。在底部,他们使用多个SQL> CREATE OR REPLACE TRIGGER customer_count_check 2 BEFORE INSERT OR UPDATE ON customer2 3 FOR EACH ROW 4 DECLARE 5 count_customer NUMBER; 6 max_customer NUMBER := 10; 7 BEGIN 8 SELECT COUNT(*) INTO count_customer FROM customer2; --WHERE cusid = :new.cusid; 9 IF count_customer >= max_customer THEN 10 RAISE_APPLICATION_ERROR (-20000,'Customer Table capacity exceeded'); 11 END IF; 12 END; 13 / 命令,每个要解压缩的文件一个。

UNZIPPED_DSN