私は私の大学で z/OS (ADCD バージョン) で rexx スクリプトを書いています。diskw を使用して、非常に長い文字列を pds メンバーに書き込みたいと考えています。悲しいことに、rexx は自動的に行を分割しないため、文字列の約半分だけがメンバーに書き込まれます。私の文字列は、連結して実行していて、ログに書きたいコマンドです。
/*REXX*/
"ALLOCATE DATASET('"FILEPATH"') FILE(FILE) SHR REUSE"
command = "adduser" username
command = command || " TSO(ACCTNUM(ACCT) PROC(DBSPROC)",
"MAXSIZE(6072) SIZE(5000) MSGCLASS(H) UNIT(SYSALLDA))"
LOG.1 = command
LOG.2 = "Other Stuff"
"EXECIO" 2 "DISKW FILE (STEM LOG."
"EXECIO 0 DISKW FILE (FINIS"
"FREE FILE(FILE)"
作成されたログには、特定のキャラクターへのコマンドのみが含まれ、残りのコマンドはメンバーに書き込まれません。このような：
adduser john TSO(ACCTNUM(ACCT) PROC(DBSPROC) MAXSIZE(6072) SIZE(5
rexx に行を分割させ、コマンド全体を書き込む方法を知っていますか?