JCL I am running is as follows
//LOADDEMO PROC BDCHLQ='TCAI.DCOM150',
// BDTHLQ='TCAI.DCOM150'
//*
//*------------------------------------------------------------------**
//* EXECUTE PROGRAM DBSQLPR TO DISPLAY DATA AREA PHYSICAL AND LOGICAL
//* I/O FROM THE DYNAMIC SYSTEM TABLES DATABASE
//*------------------------------------------------------------------**
//*
//STEP1 EXEC PGM=DBSQLPR,REGION=4M,
// PARM='PRTWIDTH=1500,INPUTWIDTH=70'
//STEPLIB DD DISP=SHR,
// DSN=&BDCHLQ..CUSLIB
// DD DISP=SHR,
// DSN=&BDTHLQ..CABDLOAD
//SYSUDUMP DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//STDERR DD SYSOUT=*
//STDOUT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//*
//*
// PEND
//*
//*==================================================================**
//*
//PROC1 EXEC LOADDEMO
//*
//*------------------------------------------------------------------**
//*------------------------------------------------------------------**
//STEP1.OPTIONS DD *
AUTHID=SYSADM
MSG=NN
SQLMODE=DATACOM
NOPAGEHDR
WORKSPACE=128
PRTWIDTH=1500
ROWLIMIT=999999