1

既存のデータセットのデータセット情報を読み取り、それらのパラメーターを新しい割り当てに適用することにより、PDS、シーケンシャルなど、任意の形式で新しいデータセットを割り当てることができる Rexx コードを作成したいと考えています。

たとえば、3.2 でデータ セット名を入力して Enter キーを押すと、次の情報が表示されます。

Data Set Name . . . . : HLQ.ETE.CNTL                                

General Data                          Current Allocation               
 Management class . . : MC000101       Allocated blocks  . : 6         
 Storage class  . . . : SC002020       Allocated extents . : 1         
  Volume serial . . . : VOL007         Maximum dir. blocks : 11        
  Device type . . . . : 3390                                           
 Data class . . . . . : None                                       
  Organization  . . . : PO            Current Utilization              
  Record format . . . : FB             Used blocks . . . . : 5         
  Record length . . . : 80             Used extents  . . . : 1         
  Block size  . . . . : 27920          Used dir. blocks  . : 6         
  1st extent blocks . : 6              Number of members . : 35        
  Secondary blocks  . : 2                                              
  Data set name type  : PDS           Dates                            
                                       Creation date . . . : 2014/04/02
                                       Referenced date . . : 2014/07/01
                                       Expiration date . . : ***None***

したがって、私の Rexx では、次の 2 つのことを行いたいと考えています。

  1. 上記のような既存のデータ セット割り当てパラメーターを読み取る

  2. 読み込みパラメータを使用して新しいデータ セットを割り当てます

この Rexx を JCL バッチ ジョブの一部として実行します。

私は何日も調査しましたが、これを行う方法がわかりません。

4

3 に答える 3

3

ISPFの下で実行している場合は、SPF コマンドDSINFOを使用すると、変数が自動的にセットアップされるため、簡単に使用できます。

TSO で実行している場合、ListDsiの Kenny の回答は正しいです。

ISPF DSINFO の場合は、次のようにします (変数は dsname を保持します)。

Address ispexec 'DSINFO DATASET('dsname')'

say 'dsn=' dsname
say 'volume=' ZDSVOL
say 'recfm=' ZDSRF

.....
于 2014-07-02T22:21:34.560 に答える
2

TSO 関数 LISTDSI を確認する必要があります。それはあなたが必要とするすべてを与えるでしょう。 http://pic.dhe.ibm.com/infocenter/zos/v1r11/index.jsp?topic=/com.ibm.zos.r11.ikjb800/listdsi.htm

于 2014-07-02T15:56:37.197 に答える