Sorry - reposting for better reading of the REXX
netstat all (port 1235
TSOV REXX
/* REXX */
/* */
/* AUTHOR: MARK ZELDEN */
/* */
/****************************************************/
/* There is really no advantage to using TSOV over */
/* TSOE since a temporary data set is used, but */
/* to complete the TSO* set of EXECs - here it is. */
/****************************************************/
/* TRACE ?I */
arg TSOCMD
address ISPEXEC "CONTROL ERRORS RETURN"
address TSO
ddnm = 'DD'||random(1,99999) /* choose random ddname */
junk = msg(off)
"ALLOC FILE("||ddnm||") UNIT(VIO) NEW TRACKS SPACE(9,9) DELETE",
" REUSE LRECL(172) RECFM(F B) BLKSIZE(8944)"
junk = msg(on)
/* */
/* issue tso commnd and trap output */
/* */
junk=outtrap(LINE.)
TSOCMD
junk=outtrap('off')
/* */
"EXECIO" line.0 "DISKW" ddnm "(STEM LINE. FINIS"
address ISPEXEC "LMINIT DATAID(TEMP) DDNAME("||ddnm||")"
address ISPEXEC "VIEW DATAID("||temp")"
address ISPEXEC "LMFREE DATAID("||temp")"
junk = msg(off)
"FREE FI("||ddnm||")"
> -----Original Message-----
> From: IBM Mainframe Discussion List [mailto:[email protected]] On
> Behalf Of Lizette Koehler
> Sent: Monday, December 05, 2016 11:31 AM
> To: [email protected]
> Subject: Re: DB2 DDF startup problem
>
> You can use the following commands in TSO (option 6 is good) to see what is
> going on
>
>
> netstat all (port 1235
>
>
> And if you use the following REXX, you can place the output from NETSTAT
> (thanks
> Mark) into a dataset and VIEW it.
>
>
> /* REXX */
> /* */
> /* AUTHOR: MARK ZELDEN */
> /* */
> /****************************************************/
> /* There is really no advantage to using TSOV over */
> /* TSOE since a temporary data set is used, but */
> /* to complete the TSO* set of EXECs - here it is. */
> /****************************************************/
> /* TRACE ?I */
> arg TSOCMD
> address ISPEXEC "CONTROL ERRORS RETURN"
> address TSO
> ddnm = 'DD'||random(1,99999) /* choose random ddname */
> junk = msg(off)
> "ALLOC FILE("||ddnm||") UNIT(VIO) NEW TRACKS SPACE(9,9) DELETE", " REUSE
> LRECL(172) RECFM(F B) BLKSIZE(8944)"
> junk = msg(on)
> /* */
> /* issue tso commnd and trap output */
> /* */
> junk=outtrap(LINE.)
> TSOCMD
> junk=outtrap('off')
> /* */
> "EXECIO" line.0 "DISKW" ddnm "(STEM LINE. FINIS"
> address ISPEXEC "LMINIT DATAID(TEMP) DDNAME("||ddnm||")"
> address ISPEXEC "VIEW DATAID("||temp")"
> address ISPEXEC "LMFREE DATAID("||temp")"
> junk = msg(off)
> "FREE FI("||ddnm||")"
>
>
>
> So you add the REXX to a library you use in your TSO Session. Then you can do
>
> TSOV NETSTAT ALL (PORT 1234
>
>
> Now a nice little dataset shows up and you can search for your ports.
>
>
> Lizette
>
> > -----Original Message-----
> > From: IBM Mainframe Discussion List [mailto:[email protected]]
> > On Behalf Of ??? ?? ???
> > Sent: Monday, December 05, 2016 5:21 AM
> > To: [email protected]
> > Subject: DB2 DDF startup problem
> >
> > Hi,
> > When I start DB2 DDF, I get this message:
> > DSNL515I -DSN1 DSNLILNR TCP/IP BIND FAILED FOR PORT
> > 446 WITH RETURN CODE=111 AND REASON CODE=744C7246
> >
> > Does anyone know what the meaning of the return and reason codes are,
> > or where I can find them.
> >
> > Thanks
> >
> > Gadi
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions, send email to
> [email protected] with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
