[SOLVED] Sending SYSPRINT to a sequential file on MVS

Can anyone tell me how to send SYSPRINT to a file so I can see what the code is echoing? The file gets created but the sysprint does not get written to the file, it continues to come to the screen! What am I doing missing? Doing wrong?
DYNAM FREE FILE SYSPRINT
DYNAM ALLOC FILE SYSPRINT DA 'P625926.SYSPRT.COMRPX3' NEW -
SPACE 1,1 TRACKS LRECL 80 BLKSIZE 8000 RECFM FB

Thanks in advance.

This message has been edited. Last edited by: Kerry,

WebFOCUS & ReportCaster 8.1.05, 7.7.03 - AIX/LINUX, FOCUS 7.6.13 MVS, Output PDF, XLS-XLSX, DOCX and HTML

Posts: 146 | Location: Atlanta, GA | Registered: May 31, 2007

Rhonda

Platinum Member

posted

Hide Post

Isn't this the correct way to direct sysprint to a file?

DYNAM FREE FILE SYSPRINT
DYNAM ALLOC FILE SYSPRINT DA 'P625926.SYSPRT.COMRPX3' NEW -
SPACE 1,1 TRACKS LRECL 80 BLKSIZE 8000 RECFM FB
-RUN
-SET &ECHO=ALL;

TABLE FILE ......
BLAH, BLAH,
END
-RUN
-EXIT

WebFOCUS & ReportCaster 8.1.05, 7.7.03 - AIX/LINUX, FOCUS 7.6.13 MVS, Output PDF, XLS-XLSX, DOCX and HTML

Posts: 146 | Location: Atlanta, GA | Registered: May 31, 2007

Ignored post by Rhonda posted

Show Post

GamP

Virtuoso

posted

Hide Post

I'm not 100% sure of how MF Webfocus works with respect to this post, but if it is the same as on other platforms, then there is no sysprint. The sysprint thing was actually a feature of focus, not of webfocus. As far as I know, there is no way of sending the output of what used to be sysprint to a file when you're in webfocus.

GamP

- Using AS 8.2.01 on Windows 10 - IE11.
	in Focus since 1988

Posts: 1961 | Location: Netherlands | Registered: September 25, 2007

Ignored post by GamP posted

Show Post

Rhonda

Platinum Member

posted

Hide Post

You are correct, there is no sysprint with WebFOCUS - There should be a sysprint with regular MF FOCUS. You can see the source in the browser page.

WebFOCUS & ReportCaster 8.1.05, 7.7.03 - AIX/LINUX, FOCUS 7.6.13 MVS, Output PDF, XLS-XLSX, DOCX and HTML

Posts: 146 | Location: Atlanta, GA | Registered: May 31, 2007

Ignored post by Rhonda posted

Show Post

David Briars

Master

posted

Hide Post

It sounds like you are running online FOCUS for z/OS.

If that is the case, try using Session Monitor.

For example, this code:

  
DYNAM ALLOC DD CAR     DS TLA.FOCUS.CAR SHR REUSE
DYNAM FREE  DD FOCSAVE
DYNAM ALLOC DD FOCSAVE DS TLA.SESSMON    SHR REUSE
-*
SET SM = ON
-RUN
-SET &ECHO='ON';
-*
TABLEF FILE CAR
"DATE/TIME: &MDYY/&TOD"
PRINT *
END
-RUN
-*
/TOP
/SAVE
SET SM = OFF
DYNAM FREE DD FOCSAVE

Gives:

  
 BROWSE    TLA.SESSMON                               Line 00000000 Col
 Command ===>                                                  Scroll ==
********************************* Top of Data **************************
 TABLEF FILE CAR
 "DATE/TIME: 04022009/21.22.12"
 PRINT *
 END
0(FOC757) WARNING. YOU REQUESTED PRINT * OR COUNT * FOR A MULTIPATH FILE
  PAUSE.. PLEASE ISSUE CARRIAGE RETURN WHEN READY
...REPORT KILLED
1
0 NUMBER OF RECORDS IN TABLE=       18  LINES=     18
0
 /TOP
 /SAVE
 SET SM = OFF
 DYNAM FREE DD FOCSAVE

Pilot: WebFOCUS 8.2.06 Test: WebFOCUS 8.1.05M Prod: WebFOCUS 8.1.05M Server: Windows Server 2016/Tomcat Standalone Workstation: Windows 10/IE11+Edge Database: Oracle 12c, Netezza, & MS SQL Server 2019 Output: AHTML/XLSX/HTML/PDF/JSCHART Tools: WFDS, Repository Content, BI Portal Designer & ReportCaster