讀取參數文件並將文件名複製到DSN

我想知道如何從參數文件複製到DSN名稱;讀取參數文件並將文件名複製到DSN

//S001  EXEC PGM=GL026D00, 
//    PARM='GGGL150505' 
//IPARM DD DSN=FCGL.BPYP667.CNTL(GGGLJ), 
//    DISP=SHR    
//GGGLJ010 DD DSN=FCGL.BPYP667.CNTL(%%Filename), 
//    DISP=SHR    
//SYSPRINT DD SYSOUT=T 
//SYSDBOUT DD SYSOUT=T 
//SYSABOUT DD SYSOUT=T

的IPARM將使用只有一條記錄的數據集，這將是下列名稱之一：

GGGLJ010 

GGGLJ01I 

GGGLJ01H

我想GGGLJ010或GGGLJ01I或GGGLJ01H

來源

2015-05-14 thabrlo phungo

嘗試添加你嘗試的和你得到的錯誤。 – Shudy

它將包含三個中的任何一個 –

您可以通過http://www-01.ibm.com/support/knowledgecenter/#!/SS6SG3_3.4.0/com.ibm.entcobol去掉過時的DD語句SYSABOUT和SYSDBOUT .doc_3.4/igym1ch4.htm – cschneid

更換一次%%filename一個JOB被提交併準備執行（它已經完成了CONVERTER/INTERPRETER階段，如果你對此感興趣，請看這裏：http://www-01.ibm.com/support/knowledgecenter/SSLTBW_2.1.0/com.ibm.zos.v2r1.iata600/iat2n2_Converter_Interpreter_Service.htm），那麼JCL就被設置爲石頭而不能被cha nged。

一種方法來做你想要的是動態分配從你的程序。

另一個更簡單的方法是分割你的JOB，並添加一些額外的作爲第一個JOB，並提交第二個作爲持有（TYPRUN=HOLD或但你的調度/生產控制的人希望它完成），哪些是然後釋放，此時它將通過轉換器/解釋器。

在第一個新的單獨的JOB創建文件（可以是RECFM F和LRECL 80的順序文件）或具有80字節固定長度記錄的PDS/PDSE的成員。

在第二個JOB中，使用// INCLUDE JCL語句將該文件與所需的格式化DSN一起放入該JCL流中。

我知道我希望做什麼，但請與您的調度員/生產控制人員交談，以瞭解他們希望如何完成。否則，無論如何，他們總會有機會反彈你的解決方案，然後你又回到了原地 - 無論如何，他們都會這麼做。因此，切斷中間人（你可能會浪費在這個嘗試上），你會看起來專業於這些人，這將有助於:-)

有幾種工具可以用來創建你的DD語句新文件SORT可能是最簡單的。

來源

2015-05-14 13:16:17

讀取參數文件並將文件名複製到DSN

回答

相關問題