Q
通過JCL
1
A
回答
4
SYSUID很簡單,你只需將其添加到您的EXEC聲明PARM參數。
//ASTEP EXEC PGM=A#PGM,PARM='&SYSUID'
JOBID不可用作參數。你將不得不寫COBOL代碼通過z/OS的control blocks鏈(見該鏈接數據區的書籍),如果你需要它。這可以完成,但我不推薦它。
如果您確實想要獲取作業編號,請編寫代碼以轉至位於相對存儲器位置0的PSA控制塊。從那裏您將獲得一個指向當前TCB的指針,該指針位於PSATOLD字段中在PSA,從TCB你得到TCBJSCBB領域這是一個指向JSCB,從TCBJSCBB fielf在JSCB你得到一個指針SSIB含有SSIBJBID場是作業號。所有這些控制塊,PSA,TCB,JSCB,和SSIB都記錄(z/OS的1.13)在上面的鏈接。我重申,我不建議這樣做。
2
我同意@cschneid,你不想做所有的指針鏈只是爲了得到工作號碼。但是,當然,我們在創建「橫幅頁面打印」程序時確實這樣做了。我們根據我們的代碼http://gsf-soft.com/Freeware/COB2JOB.shtml。
1
如果您對使用鏈接段中的SET ADDRESS OF項,使用POINTER和COMP-5項重新定義以及從彙編器DSECT創建01級結構體感到滿意,那麼請儘量做到這一點。作爲一個輕量級的COBOL子程序,它並不比彙編程序更昂貴(但彙編程序更好)。如果您對REXX STORAGE功能感到滿意,則可以查看Dave Alcock的IPLINFO程序。但是,如果我提到的COBOL語言結構對您而言不爲人知,那麼編寫一個彙編程序子程序,或者讓某人編寫它。
相關問題
- 1. 通過JCL添加一些電子郵件信息
- 2. 如何通過JCL將參數傳遞給REXX程序
- 3. 獲取記錄nr。通過使用JCL中的dfsort
- 4. 通過SLF4j在Glassfish中進行JCL日誌記錄
- 5. 通JCL符號串流數據集
- 6. 如何使用JCL
- 7. 創建使用JCL
- 8. SQLSTATE 7003,而在JCL
- 9. 使用JCL和CLR
- 10. JCL嚴重消息
- 11. 如何通過Java Web應用程序在IBM zOS上提交JCL?
- 12. Erlang如何通過JCL在分離的erl上看到應用程序輸出?
- 13. 如何通過JCL/Shell腳本(unix框)檢查CICS區域的狀態
- 14. JCL錯誤 - 「$ HASP165 IBMUSERW ENDED AT SVSCJES2 -JCL ERROR CN(INTERNAL)」
- 15. JCL這有什麼問題?
- 16. JCL作業中的錯誤
- 17. 什麼是MVS和JCL?
- 18. JCL中的「ENTER JOBNAME CHARACTER」ISPF
- 19. 大型機:JCL DISP參數
- 20. 從java中調用JCL
- 21. JCL返回代碼FLUSH
- 22. JCL相當於CEMT NEWCOPY
- 23. C++ Builder XE和JEDI JCL
- 24. 結合Log4Delphi和JCL調試
- 25. 彈簧+的logback(SLF4J)日誌記錄無JCL-過SLF4J
- 26. 從JCL批次調用CICS程序
- 27. 無法獲得JCL SORT的Outfil工作
- 28. JCL SYNCSORT:OMIT和INCLUDE不可互換?
- 29. 提供程序com.bea.xml.stream.MXParserFactory與JCL找不到
- 30. JCL一個COBOL表讀/插入程序