mainframe

0熱度

1回答

我的序列文件（FB，LRECL = 274）是有記錄等，佈局： HEADER 1 1 A VALUE '1' DATA 2 263 A VALUE '2' TRAILER-1-REC-TYPE 1 1 A VALUE '3' TRAILER-1-COUNT 2 11 A TRAILER-2 1 1 A VALUE '9' HEADER1.... HEADER2....

1熱度

1回答

讀取參數文件並將文件名複製到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

0熱度

1回答

將comp-2轉換爲cobol中的字母數字

我有一個帶有幾個COMP-2變量的副本，需要以字母數字形式用於DISPLAY目的。我嘗試過移動，重新定義，移動到數字，然後到字母數字，似乎沒有任何工作。

2熱度

1回答

使用C＃FTP文件到大型機，包括數據集 - 翻譯FTP腳本的FtpWebRequest代碼

我使用命令行（視窗）將文件發送到IBM主機和工作正常，它是這樣的： Open abc.wyx.state.aa.bb User Pass lcd c:\Transfer> Put examplefile 'ABCD.AA.C58FC.ABC1FD.ZP3ABC' close bye 我需要將其轉換爲C＃。我一直在嘗試使用FtpWebRequest，但沒有運氣。我無法弄清楚如何包含我

1熱度

3回答

尋找可以從TSO主機命令行執行的'HOLD'CLIST/REXX邏輯

在IBM大型機上，我可以在命令行上輸入'hold'，按回車鍵，然後有一個新的TSO屏幕出現而不會丟失我的原始屏幕。要回到我之前的屏幕，我按F3。有誰知道我在哪裏可以找到CLIST/REXX代碼來做到這一點？

3熱度

2回答

如何從SYSOUT中刪除DFSORT消息

DFSORT有幾條消息，它由COBOL程序在內部使用，該程序有幾種排序操作。我想刪除這些DFSORT消息並僅保留來自COBOL程序的消息。

2熱度

2回答

行爲STRING動詞

我讀一個COBOL程序文件，我努力理解在下面的例子中STRING命令作品 STRING WK-NO-EMP-SGE ',' WK-DT-DEB-PER-FEU-TEM ',' WK-DT-FIN-PER-FEU-TEM DELIMITED BY SIZE INTO UUU

1熱度

1回答

如何調用歸檔的數據集，如果它是當前代的GDG

我嘗試'HRECALL GTEMP.BATCH.FILE（0）'來調用最新的GDG代，並返回並返回無效的dsn名稱錯誤消息。但是，使用類似的命令'HRECALL GTEMP.BATCH.FLATFILE'，按預期調用平面文件。我做錯了什麼？

1熱度

1回答

DB2主機：SQLCODE = -911，SQLSTATE = 40001

我們已經看到從DB2主機此以下情況除外：不會的QueryTimeout不SqlTransactionRollbackException工作。我們確實設置了CallableStatement.querytimeout，但在這種情況下它確實不起作用。有什麼建議麼？謝謝。 DB2 SQL Error: SQLCODE=-911, SQLSTATE=40001, SQLERRMC=00C9008E;000

1熱度

1回答

使用ICETOOL的DISPLAY格式化breaklines

我正在使用DFSORT的ICETOOL DISPLAY運算符來生成帳戶列表。我在分支機構上使用「BREAK」以通過排序代碼分隔帳戶，然後爲帳戶餘額進行結算。一切正常，但我在使用BTOTAL彙總餘額後得到一個額外的輸入（帳戶）。我在下面添加了我的代碼和結果，以便您更好地理解我的問題。代碼 //SUR0007 JOB (5678),'ACCOUNTS' //RUNIT EXEC PGM