Re: Remove tape volume from a chain

2015-04-02 Thread Gibney, David Allen,Jr
I run DFHSM RECYCLE frequently. Which clears this problem. On the other hand, 
my tapes are virtual, so I no longer do any stacking of tapes.

 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
 On Behalf Of John McKown
 Sent: Thursday, April 02, 2015 12:13 PM
 To: IBM-MAIN@LISTSERV.UA.EDU
 Subject: Re: Remove tape volume from a chain
 
 I think that you can tell HSM to RECYCLE the volume. Something like:
 
 //STEP010  EXEC  PGM=IKJEFT01,
 // REGION=4096K,
 // DYNAMNBR=40
 //SYSEXEC DD DISP=SHR,DSN=TSH009.REXX.EXEC //SYSTSPRT DD  SYSOUT=*
 //SYSTSIN DD *  HSEND DELVOL volser MIGRATION(MARKFULL)  HSEND
 RECYCLE -  ALL  -
  PERCENTVALID(100) -
  EXECUTE -
  SELECT(INCLUDE(RANGE(volser)))
 /*
 
 With CA-1 at our shop, this will remove the volume from EDM status and
 expire it to CA-1
 
 On Thu, Apr 2, 2015 at 1:55 PM, Mark Pace pacemainl...@gmail.com
 wrote:
  I have some migration tapes that form some chains.  The problem ends
  up being that the first tape in the chain will become empty of valid
  data as the data expires.  But I can't scratch tape since it is in a
  chain.  I don't want to have to wait until all the data on every tape
  expires to reclaim these tapes.  Is there anything I can do to remove
  a tape from the chain?  HSM  DFRMM.
 
  --
  The postings on this site are my own and don’t necessarily represent
  Mainline’s positions or opinions
 
  Mark D Pace
  Senior Systems Engineer
  Mainline Information Systems
 
  --
  For IBM-MAIN subscribe / signoff / archive access instructions, send
  email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
 
 
 
 --
 If you sent twitter messages while exploring, are you on a textpedition?
 
 He's about as useful as a wax frying pan.
 
 10 to the 12th power microphones = 1 Megaphone
 
 Maranatha! 
 John McKown
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions, send email to
 lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Remove tape volume from a chain

2015-04-02 Thread Gibney, David Allen,Jr
Make sure your TMC can handle 99,999 or more tapes. And switch to:

SETSYS PARTIALTAPE(BACKUP(MARKFULL) MIGRATION(MARKFULL))   
/* 
/* 
SETSYS TAPEUTILIZATION(UNIT(3490) PERCENTFULL(100))
/* 
SETSYS TAPESPANSIZE()  /* Only span datasets  500m

As for your specific need, HSEND RECYCLE VOLUME(xx) EXECUTE and possibly 
use FORCE on the second try.

 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
 On Behalf Of Mark Pace
 Sent: Thursday, April 02, 2015 12:47 PM
 To: IBM-MAIN@LISTSERV.UA.EDU
 Subject: Re: Remove tape volume from a chain
 
 I run it nightly, but that doesn't seem to help this problem.  Maybe I provide
 the wrong parameters.  And my tapes are virtual also. That is the real reason
 for wanting to scratch these tapes, to free up the back-end storage for the
 tapes.  If they were real tapes I wouldn't care.
 
 On Thu, Apr 2, 2015 at 3:35 PM, Gibney, David Allen,Jr gib...@wsu.edu
 wrote:
 
  There is a command, I think a version of LIST that will tell you the
  contents of this particular migration dataset.
 
   -Original Message-
   From: IBM Mainframe Discussion List
   [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Mark Pace
   Sent: Thursday, April 02, 2015 12:23 PM
   To: IBM-MAIN@LISTSERV.UA.EDU
   Subject: Re: Remove tape volume from a chain
  
   The spanning dataset is HSM.HMIGTAPE.DATASET.  All the files are
   kept within the one dataset name.
  
   For tapes that are not spanned, then RECYCLE and DELETE PURGE works
 well.
   It's these tapes that are stacked 3  4 deep that have me confused.
  
   On Thu, Apr 2, 2015 at 3:14 PM, Staller, Allan
   allan.stal...@kbmg.com
   wrote:
  
IF migtape, recall the spanning dataset and perform a recycle.
Dataset can be found with HSEND LIST TTOC (volser).
   
If backtape,, ensure you have a valid real copy of the dataset.
HBDEL 'dataset name'  ALL
HBACKDS 'dataset name'
   
   
HTH,
   
snip
I have some migration tapes that form some chains.  The problem
ends up being that the first tape in the chain will become empty
of valid data as the data expires.  But I can't scratch tape since
it is in a chain.  I don't want to have to wait until all the data
on every tape expires to reclaim these tapes.  Is there anything I
can do to remove a tape from the chain?  HSM  DFRMM.
/snip
   
--
 For IBM-MAIN subscribe / signoff / archive access
instructions, send email to lists...@listserv.ua.edu with the
message: INFO IBM-MAIN
   
  
  
  
   --
   The postings on this site are my own and don’t necessarily represent
   Mainline’s positions or opinions
  
   Mark D Pace
   Senior Systems Engineer
   Mainline Information Systems
  
   
   -- For IBM-MAIN subscribe / signoff / archive access instructions,
   send
  email to
   lists...@listserv.ua.edu with the message: INFO IBM-MAIN
 
  --
  For IBM-MAIN subscribe / signoff / archive access instructions, send
  email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
 
 
 
 
 --
 The postings on this site are my own and don’t necessarily represent
 Mainline’s positions or opinions
 
 Mark D Pace
 Senior Systems Engineer
 Mainline Information Systems
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions, send email to
 lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Remove tape volume from a chain

2015-04-02 Thread Mark Pace
The spanning dataset is HSM.HMIGTAPE.DATASET.  All the files are kept
within the one dataset name.

For tapes that are not spanned, then RECYCLE and DELETE PURGE works well.
It's these tapes that are stacked 3  4 deep that have me confused.

On Thu, Apr 2, 2015 at 3:14 PM, Staller, Allan allan.stal...@kbmg.com
wrote:

 IF migtape, recall the spanning dataset and perform a recycle. Dataset
 can be found with HSEND LIST TTOC (volser).

 If backtape,, ensure you have a valid real copy of the dataset.
 HBDEL 'dataset name'  ALL
 HBACKDS 'dataset name'


 HTH,

 snip
 I have some migration tapes that form some chains.  The problem ends up
 being that the first tape in the chain will become empty of valid data as
 the data expires.  But I can't scratch tape since it is in a chain.  I
 don't want to have to wait until all the data on every tape expires to
 reclaim these tapes.  Is there anything I can do to remove a tape from the
 chain?  HSM  DFRMM.
 /snip

 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN




-- 
The postings on this site are my own and don’t necessarily represent
Mainline’s positions or opinions

Mark D Pace
Senior Systems Engineer
Mainline Information Systems

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: dynamic allocation for tape using TSO in batch

2015-04-02 Thread Tony Harminc
On 2 April 2015 at 14:55, Paul Gilmartin
000433f07816-dmarc-requ...@listserv.ua.edu wrote:
 What century is this?

 The default should be more granular:
 o Allowed for virtual tapes.
 o Disallowed for roller skate tapes.
 o Somewhere in between for robotic mounted tapes.

There are (or were) mountable disks, too. They behave[d] just like tapes.

 Anyway, the user shouldn't be left stuck on the clock wondering why the
 computer went dead, the mount message should be echoed to the user's
 terminal (yes, even if the user is logged on to OMVS, and then to the right
 session if there are several) so the user would know.

The terminal user *does* get a message, with an amusingly documented
programmer response:

IEC108I OPERATOR ACTION HAS BEEN REQUESTED FOR YOUR DATA SET

Explanation

Operator intervention is necessary before processing can continue on
your data set.


System action

The system waits for the operator to respond.


Programmer response

A long wait may ensue before the operator responds.




It's not the message the operator sees, but the user should be in
little doubt about what's going on. Of course allowing ATTN to cancel
the mount would've been nice. (IEC108D is also written in a couple of
other cases, though they may all de facto be gone.)

Tony H.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Remove tape volume from a chain

2015-04-02 Thread Mark Pace
I run it nightly, but that doesn't seem to help this problem.  Maybe I
provide the wrong parameters.  And my tapes are virtual also. That is the
real reason for wanting to scratch these tapes, to free up the back-end
storage for the tapes.  If they were real tapes I wouldn't care.

On Thu, Apr 2, 2015 at 3:35 PM, Gibney, David Allen,Jr gib...@wsu.edu
wrote:

 There is a command, I think a version of LIST that will tell you the
 contents of this particular migration dataset.

  -Original Message-
  From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
  On Behalf Of Mark Pace
  Sent: Thursday, April 02, 2015 12:23 PM
  To: IBM-MAIN@LISTSERV.UA.EDU
  Subject: Re: Remove tape volume from a chain
 
  The spanning dataset is HSM.HMIGTAPE.DATASET.  All the files are kept
  within the one dataset name.
 
  For tapes that are not spanned, then RECYCLE and DELETE PURGE works well.
  It's these tapes that are stacked 3  4 deep that have me confused.
 
  On Thu, Apr 2, 2015 at 3:14 PM, Staller, Allan allan.stal...@kbmg.com
  wrote:
 
   IF migtape, recall the spanning dataset and perform a recycle.
   Dataset can be found with HSEND LIST TTOC (volser).
  
   If backtape,, ensure you have a valid real copy of the dataset.
   HBDEL 'dataset name'  ALL
   HBACKDS 'dataset name'
  
  
   HTH,
  
   snip
   I have some migration tapes that form some chains.  The problem ends
   up being that the first tape in the chain will become empty of valid
   data as the data expires.  But I can't scratch tape since it is in a
   chain.  I don't want to have to wait until all the data on every tape
   expires to reclaim these tapes.  Is there anything I can do to remove
   a tape from the chain?  HSM  DFRMM.
   /snip
  
   --
   For IBM-MAIN subscribe / signoff / archive access instructions, send
   email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
  
 
 
 
  --
  The postings on this site are my own and don’t necessarily represent
  Mainline’s positions or opinions
 
  Mark D Pace
  Senior Systems Engineer
  Mainline Information Systems
 
  --
  For IBM-MAIN subscribe / signoff / archive access instructions, send
 email to
  lists...@listserv.ua.edu with the message: INFO IBM-MAIN

 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN




-- 
The postings on this site are my own and don’t necessarily represent
Mainline’s positions or opinions

Mark D Pace
Senior Systems Engineer
Mainline Information Systems

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Remove tape volume from a chain

2015-04-02 Thread Staller, Allan
HSEND LIST TTOC SELECT(FULL) will provide a list of all DFHSM managed tapes and 
their predecessor/successor volume .

To eliminate tape volx from a chain: volx, volx+1, volx+2

HSEND LIST TTOC(volx)
HSEND LIST TTOC(volx+1)

Verify the last dataset listed on volx is the first dataset on volx+1
Recall that dataset to primary dasd.

HSEND RECYCLE EXECUTE VOLUME(volx) 

At the end of the recycle dfhsm will indicateARC0260I MIGRATION VOLUME volx 
ENTRY DELETED .
You can now perform DELETE PURGE if desired.




The above must be done for each chained volume. I suggest starting at the end 
of the chain. That way each recycle will be one volume.


Re-migrate the dataset previously recalled if desired.

HTH,

snip
The spanning dataset is HSM.HMIGTAPE.DATASET.  All the files are kept within 
the one dataset name.

For tapes that are not spanned, then RECYCLE and DELETE PURGE works well.
It's these tapes that are stacked 3  4 deep that have me confused.
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Remove tape volume from a chain

2015-04-02 Thread Gibney, David Allen,Jr
There is a command, I think a version of LIST that will tell you the contents 
of this particular migration dataset.

 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
 On Behalf Of Mark Pace
 Sent: Thursday, April 02, 2015 12:23 PM
 To: IBM-MAIN@LISTSERV.UA.EDU
 Subject: Re: Remove tape volume from a chain
 
 The spanning dataset is HSM.HMIGTAPE.DATASET.  All the files are kept
 within the one dataset name.
 
 For tapes that are not spanned, then RECYCLE and DELETE PURGE works well.
 It's these tapes that are stacked 3  4 deep that have me confused.
 
 On Thu, Apr 2, 2015 at 3:14 PM, Staller, Allan allan.stal...@kbmg.com
 wrote:
 
  IF migtape, recall the spanning dataset and perform a recycle.
  Dataset can be found with HSEND LIST TTOC (volser).
 
  If backtape,, ensure you have a valid real copy of the dataset.
  HBDEL 'dataset name'  ALL
  HBACKDS 'dataset name'
 
 
  HTH,
 
  snip
  I have some migration tapes that form some chains.  The problem ends
  up being that the first tape in the chain will become empty of valid
  data as the data expires.  But I can't scratch tape since it is in a
  chain.  I don't want to have to wait until all the data on every tape
  expires to reclaim these tapes.  Is there anything I can do to remove
  a tape from the chain?  HSM  DFRMM.
  /snip
 
  --
  For IBM-MAIN subscribe / signoff / archive access instructions, send
  email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
 
 
 
 
 --
 The postings on this site are my own and don’t necessarily represent
 Mainline’s positions or opinions
 
 Mark D Pace
 Senior Systems Engineer
 Mainline Information Systems
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions, send email to
 lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: dynamic allocation for tape using TSO in batch

2015-04-02 Thread Paul Gilmartin
On Thu, 2 Apr 2015 15:39:18 -0400, Tony Harminc  wrote:

The terminal user *does* get a message, with an amusingly documented
programmer response:

IEC108I OPERATOR ACTION HAS BEEN REQUESTED FOR YOUR DATA SET
...
Programmer response
A long wait may ensue before the operator responds.

Does the terminal user get that message even if logged on to z/OS UNIX,
with *no* TSO session active?  New environments induce new requirements.

It's not the message the operator sees, ...

If the associated operator message was written as WTOR, it would be
nice if the Reply number appeared in the text of IEC108I.

 Of course allowing ATTN to cancel the mount would've been nice.

Yes.  Although the asynchronous cancel might cause the operator some
cognitive dissonance.

And if the mount is DEFERred, the IEC108I may occur at an unexpected time.

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


FILEDATA --Who gets the SR?

2015-04-02 Thread Paul Gilmartin
I submitted an RCF before I explored this behavior so deeply!
Now, I believe there's matter for an SR:

DD FILEDATA=BINARY in JCL overrides RECORD in the file tag
RECORD in the file tag prevails over DD FILEDATA=TEXT in JCL.

Not consistent; it's certainly not according to the Fine Manuals.
I hope it's not WAD, but you know what they say.

Should the SR go to UNIX System Services or to DfSMS?

Thanks,
gil

(JCL available on request.)

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: FILEDATA --Who gets the SR?

2015-04-02 Thread Roger Bolan
I say just take your best guess and go for it.  Problems often don't fall
cleanly into one area or another and require separate groups to discuss the
issue with each other.

On Thu, Apr 2, 2015 at 4:39 PM, Paul Gilmartin 
000433f07816-dmarc-requ...@listserv.ua.edu wrote:

 I submitted an RCF before I explored this behavior so deeply!
 Now, I believe there's matter for an SR:

 DD FILEDATA=BINARY in JCL overrides RECORD in the file tag
 RECORD in the file tag prevails over DD FILEDATA=TEXT in JCL.

 Not consistent; it's certainly not according to the Fine Manuals.
 I hope it's not WAD, but you know what they say.

 Should the SR go to UNIX System Services or to DfSMS?

 Thanks,
 gil

 (JCL available on request.)

 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Forbes: Nice Mainframe, How Do I Turn It On?

2015-04-02 Thread Shmuel Metz (Seymour J.)
In
3910647452015251.wa.elardus.engelbrechtsita.co...@listserv.ua.edu,
on 04/02/2015
   at 10:29 AM, Elardus Engelbrecht elardus.engelbre...@sita.co.za
said:

Generally the young boys/girls are too lazy or bored to work on a
farm,

That may be how it looks to the owner. To an outsider, the obvious
question is whether the owner is paying enough. One cliché lost in the
backwaters of History is The workman is worthy of his hire. IOW,
don't expect people to work for peanut if they can do better
elsewhere.
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see http://patriot.net/~shmuel/resume/brief.html 
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: migrating compiler versions

2015-04-02 Thread Shmuel Metz (Seymour J.)
In
of62f99d18.9a579d81-on85257e1a.002f4d06-80257e1a.00316...@prudential.com,
on 04/01/2015
   at 09:59 AM, Ken MacKenzie ken.macken...@pramerica.ie said:

In the first release of COBOL 5, there was no AMODE(24) support. 
That has  now been changed but it has led to several S0C4's as 
some of the compiler modules have not been fixed.

Compiler or library? I can understand needing generated code below the
line, but why would you need he compiler below the line?
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see http://patriot.net/~shmuel/resume/brief.html 
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Environment scope (was: OT: Digital? Cloud? ... )

2015-04-02 Thread Shmuel Metz (Seymour J.)
In 6862960757492308.wa.paulgboulderaim@listserv.ua.edu, on
03/31/2015
   at 11:27 PM, Paul Gilmartin
000433f07816-dmarc-requ...@listserv.ua.edu said:

Not only GLOBALV, but LINKs, ACCESSes, options set by CP SET and 
CMS SET commands, spooling options (although CMS Pipelines 
somewhat relaxes those constraints), ... others?

Those aren't analogous to the *ix environment. The only one that I
know of is REXX variables passed to a REXX-aware command, either
automatically or via GLOBALV.
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see http://patriot.net/~shmuel/resume/brief.html 
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: dynamic allocation for tape using TSO in batch

2015-04-02 Thread Shmuel Metz (Seymour J.)
In 2700199934746409.wa.paulgboulderaim@listserv.ua.edu, on
04/01/2015
   at 02:08 PM, Paul Gilmartin
000433f07816-dmarc-requ...@listserv.ua.edu said:

Why should the rules, or detection of the
condition, be different for DYNALLOC?

Because it's dynamic. For static allocation the Initiator can sort
things out before running the job.

Now, it's possible that you have a business case to justify a
requirement, but it had better be god, because doing it is going to be
a lot of work.
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see http://patriot.net/~shmuel/resume/brief.html 
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: IP Sockets Application Programming Question

2015-04-02 Thread Mike Wawiorko
If you have z/OS NetView have a look at the TESTPORT command.

Mike Wawiorko
 Please consider the environment before printing this e-mail

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Hansen, Dave L - Eagan, MN
Sent: 01 April 2015 21:45
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: IP Sockets Application Programming Question

Dear Group,

   I get calls about CICS sockets and TN3270 sockets.  When all I needed to do 
was find out if an IP Address was up I just did a PING.  Back when PING went 
through the network end-to-end.

   I have been reading the z/OS V1R12.0 Comm Svr: IP Sockets Application 
Programming Interface Guide and Reference.  We now have z/OS V2R1.  My REXX 
EXEC can do a: src = socket(VERSION); == Figure 170. VERSION command example.

   To use the socket commands provided by the REXX socket function, a socket 
set must be active.  To allocate a socket set, use the INITIALIZE socket 
command.  The INITIALIZE command creates a socket set and can support multiple 
socket calls.

  In the book are a bunch of REXX socket sample programs == Table 21. REXX 
socket sample programs.  In the book it says: The LISTEN command applies only 
to stream sockets.  I would like to verify if I can hit my CICS Web Services 
socket.  My TCPIPSERVICE shows OPEN for PORT 1492.

Q).  Are CICS Web Services port 1492 and TN3270 port 23 Stream sockets?


   Currently all is working.  I would like my REXX EXEC to be non-disruptive 
(and not cause a denial of service).  The REXX socket sample programs use 
INITIALIZE.  It says it will preallocate a socket set.  A socket set is a 
number of pre allocated sockets available to a single REXX application.

Q).   Does my REXX EXEC need to have a socket to determine if one CICS socket 
is working?  The VERSION worked without specifying a socket number.  If anyone 
has done this before, are REXX socket functions the best way to PING a TCP/IP 
PORT?



 Thank you,  Dave


--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN

This e-mail and any attachments are confidential and intended solely for the 
addressee and may also be privileged or exempt from disclosure under applicable 
law. If you are not the addressee, or have received this e-mail in error, 
please notify the sender immediately, delete it from your system and do not 
copy, disclose or otherwise act upon any part of this e-mail or its attachments.

Internet communications are not guaranteed to be secure or virus-free. The 
Barclays Group does not accept responsibility for any loss arising from 
unauthorised access to, or interference with, any Internet communications by 
any third party, or from the transmission of any viruses. Replies to this 
e-mail may be monitored by the Barclays Group for operational or business 
reasons.

Any opinion or other information in this e-mail or its attachments that does 
not relate to the business of the Barclays Group is personal to the sender and 
is not given or endorsed by the Barclays Group.

Barclays Bank PLC. Registered in England and Wales (registered no. 1026167). 
Registered Office: 1 Churchill Place, London, E14 5HP, United Kingdom. 

Barclays Bank PLC is authorised by the Prudential Regulation Authority and 
regulated by the Financial Conduct Authority and the Prudential Regulation 
Authority (Financial Services Register No. 122702).

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: dynamic allocation for tape using TSO in batch

2015-04-02 Thread Ed Gould

On Apr 2, 2015, at 1:55 PM, Paul Gilmartin wrote:



What century is this?


21st


The default should be more granular:
o Allowed for virtual tapes.
o Disallowed for roller skate tapes.
o Somewhere in between for robotic mounted tapes.


There is no easy way for the system to know what is real and what is  
virtual.




But perhaps the emulation is too faithful; the OS may be unable
(by design) to distinguish a virtual tape from physical.  But there
are still esoteric device names.


Doesn't work that was since day 1.



Anyway, the user shouldn't be left stuck on the clock wondering  
why the

computer went dead, the mount message should be echoed to the user's
terminal (yes, even if the user is logged on to OMVS, and then to  
the right

session if there are several) so the user would know.


No TSO user typically has mount authority. We gave it out to a  
limited number of sysprogs when we had an MSS (3850). There was a way  
to get around it IIRC but its been years and I have forgotten. Even  
so an occasional sysprog would accidentally mount a round tape. The  
rule was that if you needed a tape you were to hand the reel to the  
operator yourself and submit a Job.


Ed



-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Remove tape volume from a chain

2015-04-02 Thread Mark Pace
I have some migration tapes that form some chains.  The problem ends up
being that the first tape in the chain will become empty of valid data as
the data expires.  But I can't scratch tape since it is in a chain.  I
don't want to have to wait until all the data on every tape expires to
reclaim these tapes.  Is there anything I can do to remove a tape from the
chain?  HSM  DFRMM.

-- 
The postings on this site are my own and don’t necessarily represent
Mainline’s positions or opinions

Mark D Pace
Senior Systems Engineer
Mainline Information Systems

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: dynamic allocation for tape using TSO in batch

2015-04-02 Thread Paul Gilmartin
On Thu, 2 Apr 2015 18:12:39 +, J O Skip Robinson wrote:

The historical basis for this requirement is not hard to guess. Imagine a time 
when tapes were handled by people scrambling around on roller skates. A TSO 
user could finger-check a data set name and send a tape jockey hurtling across 
a cavernous room to grab a volume not even wanted; meanwhile the user is stuck 
on the clock wondering why the computer went dead, hollering at the help desk 
about terrible response time. I would have disallowed tape mounts then. 
They're still disallowed now by default.

Just understand that if your personal userid acquires mount authority, you 
might become the user described above. 
 
What century is this?

The default should be more granular:
o Allowed for virtual tapes.
o Disallowed for roller skate tapes.
o Somewhere in between for robotic mounted tapes.

But perhaps the emulation is too faithful; the OS may be unable
(by design) to distinguish a virtual tape from physical.  But there
are still esoteric device names.

Anyway, the user shouldn't be left stuck on the clock wondering why the
computer went dead, the mount message should be echoed to the user's
terminal (yes, even if the user is logged on to OMVS, and then to the right
session if there are several) so the user would know.

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Remove tape volume from a chain

2015-04-02 Thread John McKown
I think that you can tell HSM to RECYCLE the volume. Something like:

//STEP010  EXEC  PGM=IKJEFT01,
// REGION=4096K,
// DYNAMNBR=40
//SYSEXEC DD DISP=SHR,DSN=TSH009.REXX.EXEC
//SYSTSPRT DD  SYSOUT=*
//SYSTSIN DD *
 HSEND DELVOL volser MIGRATION(MARKFULL)
 HSEND RECYCLE -
 ALL  -
 PERCENTVALID(100) -
 EXECUTE -
 SELECT(INCLUDE(RANGE(volser)))
/*

With CA-1 at our shop, this will remove the volume from EDM status and
expire it to CA-1

On Thu, Apr 2, 2015 at 1:55 PM, Mark Pace pacemainl...@gmail.com wrote:
 I have some migration tapes that form some chains.  The problem ends up
 being that the first tape in the chain will become empty of valid data as
 the data expires.  But I can't scratch tape since it is in a chain.  I
 don't want to have to wait until all the data on every tape expires to
 reclaim these tapes.  Is there anything I can do to remove a tape from the
 chain?  HSM  DFRMM.

 --
 The postings on this site are my own and don’t necessarily represent
 Mainline’s positions or opinions

 Mark D Pace
 Senior Systems Engineer
 Mainline Information Systems

 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



-- 
If you sent twitter messages while exploring, are you on a textpedition?

He's about as useful as a wax frying pan.

10 to the 12th power microphones = 1 Megaphone

Maranatha! 
John McKown

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Remove tape volume from a chain

2015-04-02 Thread Staller, Allan
IF migtape, recall the spanning dataset and perform a recycle. Dataset can be 
found with HSEND LIST TTOC (volser).

If backtape,, ensure you have a valid real copy of the dataset.
HBDEL 'dataset name'  ALL
HBACKDS 'dataset name'


HTH,

snip
I have some migration tapes that form some chains.  The problem ends up being 
that the first tape in the chain will become empty of valid data as the data 
expires.  But I can't scratch tape since it is in a chain.  I don't want to 
have to wait until all the data on every tape expires to reclaim these tapes.  
Is there anything I can do to remove a tape from the chain?  HSM  DFRMM.
/snip

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Sort Jcl - hi-jacking

2015-04-02 Thread Tony Harminc
On 2 April 2015 at 13:16, John Eells ee...@us.ibm.com wrote:
 Of course, other collisions are possible for which no prefixes are assigned.
 FMIDs come to mind.  For FMIDs, we always use H or E for base functions and
 J or F for dependent functions but we have no way to help prevent
 cross-vendor FMID naming conflicts.

The SMP/E z/OS Packaging Rules book has this to say about that:

The SYSMOD ID of a function is called the function modification
identifier (FMID). The FMID is a 7 character identifier that needs to
be unique to distinguish one product from another. One way to help
ensure this uniqueness is to follow the naming convention tcccrrr, as
described below:

t - is an alphabetic character used to indicate type of function.
Avoid the IBM valuse [sic] of A,B,C,D,E,F,H and J.
ccc - is the product version code. You can help guarentee [sic]
uniqueness by using the the [sic] component code.
rrr - is the release value. This value should be alphanumeric and it
should be unique within a product version.

And the component code is exactly what can be registered with IBM.

I've had my issues with IBM's lack of clarity and of following their
own rules (and not just grandfathered ones) wrt names. For example,
names in the /usr/lpp UNIX file hierarchy might be expected to follow
the registered prefix rules, but instead there is a different set of
registered (maybe) names in that space.

As far as I understand, registering a prefix is intended to avoid clashes in:

load module names
messages
FMIDs and related SMP/E elements (hence elem...@us.ibm.com)
ENQ major names
names in the RACF FACILITY class

and probably others.

But obviously no one can enforce this outside IBM, and it seems not much inside.

It would also be nice if IBM would offer registrants the option to
have their registered names published. Most of them -- IBM and ISV --
are pretty well known in any case, but having a formal list would be
handy for when you encounter a module or message in a dump or on the
console.

On a lighter (virtual Friday) note, IBM developers have never been shy
in their attempts to get carefully chosen names into their products'
binaries. Some of the better known are the load modules IGDZILLA
(SMS), GIMISEX (SMP/E), and an entire dodgy range of names under the
CUN (Unicode services) prefix. To say nothing of the large
Dilbert-themed set of macros and control blocks in JES2.

Tony H.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Forbes: Nice Mainframe, How Do I Turn It On?

2015-04-02 Thread Elardus Engelbrecht
Paul Gilmartin wrote:

Not so clueless.  Taken in the context of the article it was clearly 
hyperbole, an attributive metaphor.  The problem discussed, how to find 
skilled personnel to maintain the mainframes and their software is real, 
perhaps aggravated by ageism.

Indeed. But the article is subtle advertisement of topaz and the company behind 
it. I did not learn something new, but some may be inspired by this article.

I would not be surprised if some young %$$hole asks me this: Where do I click 
to IPL my z? (If not standing before HMC of course. :-D )


About age and finding skills: 

A similar thing is happening on farms. Only hardworking old/ageing guys/gals 
are still working on farms. Generally the young boys/girls are too lazy or 
bored to work on a farm, they want to get rich quickly without hard work. Who 
of them want to look/care/handling animals, inspecting/repairing camps fences, 
drive around looking for weeds/non-indigenous trees to chop out or spray, 
driving a tractor up and down, up and down a field, etc., day after day?

Who of these youngies want to go at 02:00 in night to help a cow during birth 
of a calve or chase away a predator at a chicken place? Or fixing burst pipes 
or driving to town 50 kilometres away, etc?

(... or fending of a 4 metre python while showering in a farmhouse? That 
happend to a woman about a week ago. She survived while her small children and 
dogs were also in the house.)


But one thing about that article I'm agreeing with: 

The new breed of developers will not always be able to readily or accurately 
understand poorly documented COBOL and PL/l application logic ... 

Who of you have not tried to update an application and by the very last 
dead-line, then only you understand the logic and flow of it...?

... and found some bug(s) impossible to fix without rewriting the whole %^*# 
thing...

Groete / Greetings
Elardus Engelbrecht

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Sort Jcl

2015-04-02 Thread Ron Thomas
Hello. Could some one please let me know why the below sytntax is not working ?

//SYSINDD *
  SORT FIELDS=COPY
  OUTREC FINDREP=(INOUT=(C''96 M/B WHITE SALE',
  C' 96 M/B  WHITE SALE '))
/*
Msg received in sort is WER268A  OUTREC STATEMENT  : SYNTAX ERROR

Thanks
Ron T

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Secure FTP

2015-04-02 Thread Elardus Engelbrecht
Richards, Robert B. wrote:

I am, however, experiencing Server timeouts: 
EZA2589E Connection to server interrupted or timed out. Waiting for reply   

What did you do BEFORE that message? This is important. Please post it.


EZA1721W Server not responding, closing connection.

Difficult to see where the problem is. Either there is a problem with 
connection from the client, or some delays (usually caused by firewall?) or the 
server is too busy?

 
EZA1636I *** I can't open a data-transfer connection:   
EZA1735I Std Return Code = 16000, Error Code = 9
Any advice on this? Whose server, IBM's or mine? 

Can you connect from start of connect up to after entering the password?

Are you the only one having this problem?

Perhaps you can look at these options in FTP.DATA at client and/or server side:

INACTTIME, CCONNTIME, DATACTTIME, DATAKEEPALIVE, DCONNTIME, FTPKEEPALIVE, 
MYOPENTIME, etc.

Otherwise you should try packet trace or similar traces.

Groete / Greetings
Elardus Engelbrecht

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Forbes: Nice Mainframe, How Do I Turn It On?

2015-04-02 Thread Steve Thompson

On 04/02/2015 11:29 AM, Elardus Engelbrecht wrote:
SNIPPAGE


Who of you have not tried to update an application and by the very last 
dead-line, then only you understand the logic and flow of it...?

... and found some bug(s) impossible to fix without rewriting the whole %^*# 
thing...

Groete / Greetings
Elardus Engelbrecht



Too many times. And management always wants it fixed, not 
re-written because that will mean having to test every logic path...


???

Regards,
Steve Thompson

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Sort Jcl

2015-04-02 Thread Ron Thomas
Ok. I have put the same earlier also , getting the same message .

SYSIN :
  SORT FIELDS=COPY
  OUTREC FINDREP=(INOUT=(C''96 M/B WHITE SALE',
  *
  C' 96 M/B  WHITE SALE '))
  *
WER268A  OUTREC STATEMENT  : SYNTAX ERROR
WER275A  NO KEYWORDS FOUND ON CONTROL STATEMENT

Thanks
Ron T

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Sort Jcl

2015-04-02 Thread Ron Thomas
I need to replace the data '96 M/B WHITE SALE  by 96 M/B WHITE SALE .  Thanks!

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Secure FTP

2015-04-02 Thread Richards, Robert B.
EZYFT25I Using //'XX.TCPIP.STANDARD.TCPXLBIN' for FTP translation tables 
for  
 the control connection.
  
EZYFT31I Using //'XX.TCPIP.STANDARD.TCPXLBIN' for FTP translation tables 
for  
 the data connection.   
  
EZA1450I IBM FTP CS V1R12   
  
EZA1772I FTP: EXIT has been set.
  
EZYFT18I Using catalog '/usr/lib/nls/msg/C/ftpdmsg.cat' for FTP messages.   
  
EZA1554I Connecting to: dispby-117.boulder.ibm.com 170.225.15.117 port: 21. 
  
220-IBM's internal systems must only be used for conducting IBM's   
  
220-business or for purposes authorized by IBM management.  
  
220-
  
220-Use is subject to audit at any time by IBM management.  
  
220-
  
220 dhebpcb01 secure FTP server ready.  
  
EZA1701I  AUTH TLS   
  
234 SSLv23/TLSv1
  
EZA2895I Authentication negotiation succeeded   
  
EZA1701I  PBSZ 0 
  
200 PBSZ=0  
  
EZA1701I  PROT P 
  
200 PROT command successful 
  
EZA2906I Data connection protection is private  
  
EZA1459I NAME (deliverycb-bld.dhe.ibm.com:Userid):  
 

  
 blahblah  
   
EZA1701I  USER blahblah  
  
331 Password required for blahblah. 
  
EZA1789I PASSWORD:  
  

  
   
   
EZA1701I  PASS   
  
230 Virtual user blahblah logged in.
  
EZA1460I Command:   
  

  
 CCC   
   

  
 BINARY
   
EZA1701I  CCC
  
200 command channel cleared.
  
EZA2905I Control connection protection is clear 
  
EZA1460I Command:   
  

  
 GET 12345678910/PROD/GIMPAF.XML 
 /xx/xx/xx/x/GIMPAF.XML  
  (REPLACE 
   
EZA1701I  TYPE I 
  
200 Type set to I.  
  
EZA1460I Command:   
  
EZA1701I  PORT   nn,n,nn,n,nn,nnn

EZA2589E Connection to server interrupted or timed out. Waiting for reply   
  
EZA1721W Server not responding, closing connection. 
  
EZA1636I *** I can't open a data-transfer connection:   
  
EZA1735I Std Return Code = 16000, Error Code = 9
  

  
 QUIT   


Bob
 
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Elardus Engelbrecht
Sent: Thursday, April 02, 2015 11:39 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Secure FTP

Richards, Robert B. wrote:

I am, 

Re: Sort Jcl

2015-04-02 Thread Ron Thomas
Thank  a lot Kolusu! It is working now.  Thanks!

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Forbes: Nice Mainframe, How Do I Turn It On?

2015-04-02 Thread Tom Marchant
On Thu, 2 Apr 2015 13:35:07 +, Mark Regan wrote:

http://www.forbes.com/sites/adrianbridgwater/2015/04/02/nice-mainframe-how-the-hell-do-i-turn-it-on/

IBM confirms that the Z13 mainframe start button is in fact on the back, just 
on the left.

Clueless.

-- 
Tom Marchant

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Forbes: Nice Mainframe, How Do I Turn It On?

2015-04-02 Thread Pommier, Rex
I know the comment about the start button was supposed to be funny, but isn't 
that a picture of the front of the machine accompanying the article?  And isn't 
the power switch pretty much in the center of the machine?

Rex

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Tom Marchant
Sent: Thursday, April 02, 2015 9:49 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Forbes: Nice Mainframe, How Do I Turn It On?

On Thu, 2 Apr 2015 13:35:07 +, Mark Regan wrote:

http://www.forbes.com/sites/adrianbridgwater/2015/04/02/nice-mainframe-how-the-hell-do-i-turn-it-on/

IBM confirms that the Z13 mainframe start button is in fact on the back, just 
on the left.

Clueless.

-- 
Tom Marchant

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


The information contained in this message is confidential, protected from 
disclosure and may be legally privileged.  If the reader of this message is not 
the intended recipient or an employee or agent responsible for delivering this 
message to the intended recipient, you are hereby notified that any disclosure, 
distribution, copying, or any action taken or action omitted in reliance on it, 
is strictly prohibited and may be unlawful.  If you have received this 
communication in error, please notify us immediately by replying to this 
message and destroy the material in its entirety, whether in electronic or hard 
copy format.  Thank you.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Forbes: Nice Mainframe, How Do I Turn It On?

2015-04-02 Thread Pommier, Rex
True, it's an EPO type switch on the front of the machine, but I'll guarantee 
that if that switch is down, no HMC or SE attached to it will bring the machine 
up!  grin

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Ken Porowski
Sent: Thursday, April 02, 2015 10:26 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Forbes: Nice Mainframe, How Do I Turn It On?

Is there even a real Power On switch?
I know there's an EPO switch and probably some circuit breakers in the back but 
I thought the power on/off was done from the SE or HMC?



CIT | Ken Porowski | VP Mainframe Engineering | Information Technology | +1 973 
740 5459 (tel) | ken.porow...@cit.com




This email message and any accompanying materials may contain proprietary, 
privileged and confidential information of CIT Group Inc. or its subsidiaries 
or affiliates (collectively, “CIT”), and are intended solely for the 
recipient(s) named above.  If you are not the intended recipient of this 
communication, any use, disclosure, printing, copying or distribution, or 
reliance on the contents, of this communication is strictly prohibited.  CIT 
disclaims any liability for the review, retransmission, dissemination or other 
use of, or the taking of any action in reliance upon, this communication by 
persons other than the intended recipient(s).  If you have received this 
communication in error, please reply to the sender advising of the error in 
transmission, and immediately delete and destroy the communication and any 
accompanying materials.  To the extent permitted by applicable law, CIT and 
others may inspect, review, monitor, analyze, copy, record and retain any 
communications sent from or received at this email address.


-Original Message-
Pommier, Rex


I know the comment about the start button was supposed to be funny, but isn't 
that a picture of the front of the machine accompanying the article?  And isn't 
the power switch pretty much in the center of the machine?

Rex

-Original Message-
Tom Marchant

On Thu, 2 Apr 2015 13:35:07 +, Mark Regan wrote:

http://www.forbes.com/sites/adrianbridgwater/2015/04/02/nice-mainframe-
how-the-hell-do-i-turn-it-on/

IBM confirms that the Z13 mainframe start button is in fact on the back, just 
on the left.

Clueless.

--
Tom Marchant


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

The information contained in this message is confidential, protected from 
disclosure and may be legally privileged.  If the reader of this message is not 
the intended recipient or an employee or agent responsible for delivering this 
message to the intended recipient, you are hereby notified that any disclosure, 
distribution, copying, or any action taken or action omitted in reliance on it, 
is strictly prohibited and may be unlawful.  If you have received this 
communication in error, please notify us immediately by replying to this 
message and destroy the material in its entirety, whether in electronic or hard 
copy format.  Thank you.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Sort Jcl

2015-04-02 Thread Sri h Kolusu
Ron,

It takes less than 2 seconds to figure out that you have mismatched single 
quotes at text beginning with C''96 and if you looked at the sysout I am 
sure you will see an asterisk or dollar symbol pointing to the error under 
the text I mentioned. 

Thanks,
Kolusu

IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU wrote on 
04/02/2015 08:31:13 AM:

 From: Ron Thomas ron5...@gmail.com
 To: IBM-MAIN@LISTSERV.UA.EDU
 Date: 04/02/2015 08:31 AM
 Subject: Sort Jcl
 Sent by: IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU
 
 Hello. Could some one please let me know why the below sytntax is 
 not working ?
 
 //SYSINDD *
   SORT FIELDS=COPY
   OUTREC FINDREP=(INOUT=(C''96 M/B WHITE SALE',
   C' 96 M/B  WHITE SALE '))
 /*
 Msg received in sort is WER268A  OUTREC STATEMENT  : SYNTAX ERROR
 
 Thanks
 Ron T
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Forbes: Nice Mainframe, How Do I Turn It On?

2015-04-02 Thread Jerry Whitteridge
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
Behalf Of Elardus Engelbrecht
Sent: Thursday, April 02, 2015 8:48 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Forbes: Nice Mainframe, How Do I Turn It On?
---Snip

I'm still amazed that children are not allowed near those rooms and those EPO, 
I wondeer why, oh, why? ;-D

Groete / Greetings
 Elardus Engelbrecht

I don't worry about the children - it’s the Management types that scare me



Jerry Whitteridge
Lead Systems Engineer
Safeway Inc.
925 738 9443
Corporate Tieline - 89443

If you feel in control
you just aren't going fast enough.



--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Email Firewall made the following annotations.
--

Warning: 
All e-mail sent to this address will be received by the corporate e-mail 
system, and is subject to archival and review by someone other than the 
recipient.  This e-mail may contain proprietary information and is intended 
only for the use of the intended recipient(s).  If the reader of this message 
is not the intended recipient(s), you are notified that you have received this 
message in error and that any review, dissemination, distribution or copying of 
this message is strictly prohibited.  If you have received this message in 
error, please notify the sender immediately.   
 
==

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Sort Jcl

2015-04-02 Thread Elardus Engelbrecht
Ron Thomas wrote:

  OUTREC FINDREP=(INOUT=(C''96 M/B WHITE SALE',
  C' 96 M/B  WHITE SALE '))

One single quote too many. Just count them from left to right and right to 
left. Or use hilite in ISPF.

Msg received in sort is WER268A  OUTREC STATEMENT  : SYNTAX ERROR

Sri h Kolusu sorted you out, but what is issuing WER268A?

Groete / Greetings
Elardus Engelbrecht

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Sort Jcl

2015-04-02 Thread Blaicher, Christopher Y.
You've never heard of a little product called Syncsort MFX?

All our messages begin with WER.

Chris Blaicher
Technical Architect
Software Development
Syncsort Incorporated
50 Tice Boulevard, Woodcliff Lake, NJ 07677
P: 201-930-8234  |  M: 512-627-3803
E: cblaic...@syncsort.com

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Elardus Engelbrecht
Sent: Thursday, April 02, 2015 11:53 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Sort Jcl

Ron Thomas wrote:

  OUTREC FINDREP=(INOUT=(C''96 M/B WHITE SALE',
  C' 96 M/B  WHITE SALE '))

One single quote too many. Just count them from left to right and right to 
left. Or use hilite in ISPF.

Msg received in sort is WER268A  OUTREC STATEMENT  : SYNTAX ERROR

Sri h Kolusu sorted you out, but what is issuing WER268A?

Groete / Greetings
Elardus Engelbrecht

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN





ATTENTION: -

The information contained in this message (including any files transmitted with 
this message) may contain proprietary, trade secret or other confidential 
and/or legally privileged information. Any pricing information contained in 
this message or in any files transmitted with this message is always 
confidential and cannot be shared with any third parties without prior written 
approval from Syncsort. This message is intended to be read only by the 
individual or entity to whom it is addressed or by their designee. If the 
reader of this message is not the intended recipient, you are on notice that 
any use, disclosure, copying or distribution of this message, in any form, is 
strictly prohibited. If you have received this message in error, please 
immediately notify the sender and/or Syncsort and destroy all copies of this 
message in your possession, custody or control.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Forbes: Nice Mainframe, How Do I Turn It On?

2015-04-02 Thread Ken Porowski
Is there even a real Power On switch?
I know there's an EPO switch and probably some circuit breakers in the back but 
I thought the power on/off was done from the SE or HMC?



CIT | Ken Porowski | VP Mainframe Engineering | Information Technology | +1 973 
740 5459 (tel) | ken.porow...@cit.com




This email message and any accompanying materials may contain proprietary, 
privileged and confidential information of CIT Group Inc. or its subsidiaries 
or affiliates (collectively, “CIT”), and are intended solely for the 
recipient(s) named above.  If you are not the intended recipient of this 
communication, any use, disclosure, printing, copying or distribution, or 
reliance on the contents, of this communication is strictly prohibited.  CIT 
disclaims any liability for the review, retransmission, dissemination or other 
use of, or the taking of any action in reliance upon, this communication by 
persons other than the intended recipient(s).  If you have received this 
communication in error, please reply to the sender advising of the error in 
transmission, and immediately delete and destroy the communication and any 
accompanying materials.  To the extent permitted by applicable law, CIT and 
others may inspect, review, monitor, analyze, copy, record and retain any 
communications sent from or received at this email address.


-Original Message-
Pommier, Rex


I know the comment about the start button was supposed to be funny, but isn't 
that a picture of the front of the machine accompanying the article?  And isn't 
the power switch pretty much in the center of the machine?

Rex

-Original Message-
Tom Marchant

On Thu, 2 Apr 2015 13:35:07 +, Mark Regan wrote:

http://www.forbes.com/sites/adrianbridgwater/2015/04/02/nice-mainframe-
how-the-hell-do-i-turn-it-on/

IBM confirms that the Z13 mainframe start button is in fact on the back, just 
on the left.

Clueless.

--
Tom Marchant


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Forbes: Nice Mainframe, How Do I Turn It On?

2015-04-02 Thread Elardus Engelbrecht
Pommier, Rex wrote:

True, it's an EPO type switch on the front of the machine, but I'll guarantee 
that if that switch is down, no HMC or SE attached to it will bring the 
machine up!  grin

I'm always nervous if a visitor is too near (nearer than 2 meters) to that EPO 
even with that clear plastic thing over it... ;-)

IBM-MAIN is full of stories of those red buttons (covered or not) which were 
pressed/pushed/pulled/broken instead of being left alone...

I'm still amazed that children are not allowed near those rooms and those EPO, 
I wondeer why, oh, why? ;-D

Groete / Greetings
Elardus Engelbrecht

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Sort Jcl

2015-04-02 Thread Ron Thomas
Ok what i put is as , the single quotes on the left is 2 and on the right is 
also 2  so getting balanced. still not working 

OUTREC FINDREP=(INOUT=(C''96 M/B WHITE SALE'',
   C'96 M/B  WHITE SALE'))

Thanks
Ron T

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Forbes: Nice Mainframe, How Do I Turn It On?

2015-04-02 Thread Paul Gilmartin
On Thu, 2 Apr 2015 09:49:08 -0500, Tom Marchant wrote:

On Thu, 2 Apr 2015 13:35:07 +, Mark Regan wrote:

http://www.forbes.com/sites/adrianbridgwater/2015/04/02/nice-mainframe-how-the-hell-do-i-turn-it-on/

IBM confirms that the Z13 mainframe start button is in fact on the back, just 
on the left.

Clueless.
 
Not so clueless.  Taken in the context of the article it was clearly hyperbole,
an attributive metaphor.  The problem discussed, how to find skilled
personnel to maintain the mainframes and their software is real, perhaps
aggravated by ageism.

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Sort Jcl

2015-04-02 Thread Hardee, Chuck
  VV   V  VV   I think you're out of 
sync???
  OUTREC FINDREP=(INOUT=(C''96 M/B WHITE SALE',
  C' 96 M/B  WHITE SALE '))

Charles (Chuck) Hardee
Senior Systems Engineer/Database Administration
EAS Information Technology

Thermo Fisher Scientific
300 Industry Drive | Pittsburgh, PA 15275
Phone +1 (724) 517-2633 | Mobile +1 (412) 877-2809 | FAX: +1 (412) 490-9230
chuck.har...@thermofisher.com | www.thermofisher.com

WORLDWIDE CONFIDENTIALITY NOTE: Dissemination, distribution or copying of this 
e-mail or the information herein by anyone other than the intended recipient, 
or an employee or agent of a system responsible for delivering the message to 
the intended recipient, is prohibited. If you are not the intended recipient, 
please inform the sender and delete all copies.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Ron Thomas
Sent: Thursday, April 02, 2015 11:31 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Sort Jcl

Hello. Could some one please let me know why the below sytntax is not working ?

//SYSINDD *
  SORT FIELDS=COPY
  OUTREC FINDREP=(INOUT=(C''96 M/B WHITE SALE',
  C' 96 M/B  WHITE SALE '))
/*
Msg received in sort is WER268A  OUTREC STATEMENT  : SYNTAX ERROR

Thanks
Ron T

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Sort Jcl

2015-04-02 Thread Sri h Kolusu
Ron,

Count the number of single quotes on the input string you want to replace 
in your FINDREP Control cards. You should have an EVEN number of single 
quotes. 

Thanks,
Kolusu

IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU wrote on 
04/02/2015 08:42:13 AM:

 From: Ron Thomas ron5...@gmail.com
 To: IBM-MAIN@LISTSERV.UA.EDU
 Date: 04/02/2015 08:42 AM
 Subject: Re: Sort Jcl
 Sent by: IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU
 
 Ok. I have put the same earlier also , getting the same message .
 
 SYSIN :
   SORT FIELDS=COPY
   OUTREC FINDREP=(INOUT=(C''96 M/B WHITE SALE',
   *
   C' 96 M/B  WHITE SALE '))
   *
 WER268A  OUTREC STATEMENT  : SYNTAX ERROR
 WER275A  NO KEYWORDS FOUND ON CONTROL STATEMENT
 
 Thanks
 Ron T
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Sort Jcl

2015-04-02 Thread Sri h Kolusu
Ron,

You need to enclose the single quote in a set of single quotes.  Ok 
instead of wasting any time on this trivial issue, here are exact control 
cards you want.

//SYSINDD * 
  OPTION COPY 
  OUTREC FINDREP=(INOUT=(C'''96 M/B WHITE SALE', 
  C' 96 M/B  WHITE SALE ')) 
//* 


Thanks,
Kolusu

IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU wrote on 
04/02/2015 08:50:30 AM:

 From: Ron Thomas ron5...@gmail.com
 To: IBM-MAIN@LISTSERV.UA.EDU
 Date: 04/02/2015 08:51 AM
 Subject: Re: Sort Jcl
 Sent by: IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU
 
 I need to replace the data '96 M/B WHITE SALE  by 96 M/B WHITE 
 SALE .  Thanks!
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Sort Jcl - hi-jacking

2015-04-02 Thread Richard Pinion
Here's a nice little topic for discussion.  What do
the three letter message prefixes stand for?

IBM sort ICE
Syncsort WER
CICS DFH
IMS  DFS
IBM ???  IGD (anybody ever notice IGDZILLA in SYS1.LPALIB?)
.
.
.
.



--- cblaic...@syncsort.com wrote:

From: Blaicher, Christopher Y. cblaic...@syncsort.com
To:   IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Sort Jcl
Date: Thu, 2 Apr 2015 15:55:07 +

You've never heard of a little product called Syncsort MFX?

All our messages begin with WER.

Chris Blaicher
Technical Architect
Software Development
Syncsort Incorporated
50 Tice Boulevard, Woodcliff Lake, NJ 07677
P: 201-930-8234  |  M: 512-627-3803
E: cblaic...@syncsort.com

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Elardus Engelbrecht
Sent: Thursday, April 02, 2015 11:53 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Sort Jcl

Ron Thomas wrote:

  OUTREC FINDREP=(INOUT=(C''96 M/B WHITE SALE',
  C' 96 M/B  WHITE SALE '))

One single quote too many. Just count them from left to right and right to 
left. Or use hilite in ISPF.

Msg received in sort is WER268A  OUTREC STATEMENT  : SYNTAX ERROR

Sri h Kolusu sorted you out, but what is issuing WER268A?

Groete / Greetings
Elardus Engelbrecht

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN





ATTENTION: -

The information contained in this message (including any files transmitted with 
this message) may contain proprietary, trade secret or other confidential 
and/or legally privileged information. Any pricing information contained in 
this message or in any files transmitted with this message is always 
confidential and cannot be shared with any third parties without prior written 
approval from Syncsort. This message is intended to be read only by the 
individual or entity to whom it is addressed or by their designee. If the 
reader of this message is not the intended recipient, you are on notice that 
any use, disclosure, copying or distribution of this message, in any form, is 
strictly prohibited. If you have received this message in error, please 
immediately notify the sender and/or Syncsort and destroy all copies of this 
message in your possession, custody or control.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN




_
Netscape.  Just the Net You Need.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Forbes: Nice Mainframe, How Do I Turn It On?

2015-04-02 Thread Paul Gilmartin
On Thu, 2 Apr 2015 08:59:44 -0500, Shane Ginnane wrote:

Mark you gotta stop including the Thanks in (as part of) your posted links. 
You did it last month too   :o)

And he quite reasonably separated it with a blank which LISTSERV
transmogrified to NBSP (in UTF-8) when it generated the URL.


http://www.forbes.com/sites/adrianbridgwater/2015/04/02/nice-mainframe-how-the-hell-do-i-turn-it-on/

Go figger.  Too much DWIM.

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Forbes: Nice Mainframe, How Do I Turn It On?

2015-04-02 Thread Shane Ginnane
Mark you gotta stop including the Thanks in (as part of) your posted links. 
You did it last month too   :o)

Shane ...

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Forbes: Nice Mainframe, How Do I Turn It On?

2015-04-02 Thread Mark Regan
http://www.forbes.com/sites/adrianbridgwater/2015/04/02/nice-mainframe-how-the-hell-do-i-turn-it-on/
 Thanks,


Mark Regan
USNR-Ret. [1969-1991, CTO1]
K8MTR



--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Secure FTP

2015-04-02 Thread Richards, Robert B.
Follow-up...

I chose Kurt's recommendation to use the CLIENT data.

I am, however, experiencing Server timeouts:

EZA2589E Connection to server interrupted or timed out. Waiting for reply  
EZA1721W Server not responding, closing connection.
EZA1636I *** I can't open a data-transfer connection:  
EZA1735I Std Return Code = 16000, Error Code = 9   

Any advice on this? Whose server, IBM's or mine?

Bob

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Kurt Quackenbush
Sent: Monday, March 16, 2015 9:12 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Secure FTP

 What is the best way to customize my batch SMP/E JCL to execute Secure 
 FTP every time I submit a RECEIVEFROMNETWORK?

Not sure this is the best way to use FTPS, but I suggest you create an 
appropriate ftp.data file, and tell FTP to use that file with the -f option 
specified in the CLIENT data.  This seems to work for many, and you can check 
it out in the Preparing for secure internet delivery 
chapter in the SMP/E Users' Guide:
http://www-01.ibm.com/support/knowledgecenter/SSLTBW_2.1.0/com.ibm.zos.v2r1.gim3000/dsetups.htm

Also note that if FTPS causes you trouble, usually because of a proxy or 
firewall, consider using HTTPS instead.  This is also described in that chapter.

Kurt Quackenbush -- IBM, SMP/E Development

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Secure FTP

2015-04-02 Thread Norbert Friemel
Try passive mode ftp: add FWFRIENDLY TRUE and/or EPSV4 TRUE to ftp.data

http://publibfp.dhe.ibm.com/cgi-bin/bookmgr/BOOKS/f1a1b3b1/2.3.11.7

Norbert Friemel

On Thu, 2 Apr 2015 11:50:29 -0400, Richards, Robert B. wrote:

 EZYFT25I Using //'XX.TCPIP.STANDARD.TCPXLBIN' for FTP translation tables 
 for
  the control connection.
 EZYFT31I Using //'XX.TCPIP.STANDARD.TCPXLBIN' for FTP translation tables 
 for
  the data connection.
 EZA1450I IBM FTP CS V1R12
 EZA1772I FTP: EXIT has been set.
 EZYFT18I Using catalog '/usr/lib/nls/msg/C/ftpdmsg.cat' for FTP messages.
 EZA1554I Connecting to: dispby-117.boulder.ibm.com 170.225.15.117 port: 21.
 220-IBM's internal systems must only be used for conducting IBM's
 220-business or for purposes authorized by IBM management.
 220-
 220-Use is subject to audit at any time by IBM management.
 220-
 220 dhebpcb01 secure FTP server ready.
 EZA1701I  AUTH TLS
 234 SSLv23/TLSv1
 EZA2895I Authentication negotiation succeeded
 EZA1701I  PBSZ 0
 200 PBSZ=0
 EZA1701I  PROT P
 200 PROT command successful
 EZA2906I Data connection protection is private
 EZA1459I NAME (deliverycb-bld.dhe.ibm.com:Userid):
 
  blahblah
 EZA1701I  USER blahblah
 331 Password required for blahblah.
 EZA1789I PASSWORD:
 
  
 EZA1701I  PASS
 230 Virtual user blahblah logged in.
 EZA1460I Command:
 
  CCC
 
  BINARY
 EZA1701I  CCC
 200 command channel cleared.
 EZA2905I Control connection protection is clear
 EZA1460I Command:
 
  GET 12345678910/PROD/GIMPAF.XML
 /xx/xx/xx/x/GIMPAF.XML
   (REPLACE
 EZA1701I  TYPE I
 200 Type set to I.
 EZA1460I Command:
 EZA1701I  PORT nn,n,nn,n,nn,nnn
 EZA2589E Connection to server interrupted or timed out. Waiting for reply
 EZA1721W Server not responding, closing connection.
 EZA1636I *** I can't open a data-transfer connection:
 EZA1735I Std Return Code = 16000, Error Code = 9
 
  QUIT
 
 
 Bob

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Sort Jcl - hi-jacking

2015-04-02 Thread Elardus Engelbrecht
Richard Pinion wrote:

Here's a nice little topic for discussion.  What do the three letter message 
prefixes stand for?

IBM sort ICE
Syncsort WER
CICS DFH
IMS  DFS
IBM ???  IGD (anybody ever notice IGDZILLA in SYS1.LPALIB?)

Shame on you, you forgot my favourite toy - ICH   ;-D

I don't know, but I am tired of %$$holes asking me whether our company is the 
owner of IBM Connect Direct... 

SITA001I IBM Sterling Connect:Direct for z/OS initialization

Groete / Greetings
Elardus Engelbrecht

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Sort Jcl - hi-jacking

2015-04-02 Thread John McKown
On Thu, Apr 2, 2015 at 11:16 AM, Elardus Engelbrecht
elardus.engelbre...@sita.co.za wrote:
 Richard Pinion wrote:

Here's a nice little topic for discussion.  What do the three letter message 
prefixes stand for?

IBM sort ICE
Syncsort WER
CICS DFH
IMS  DFS
IBM ???  IGD (anybody ever notice IGDZILLA in SYS1.LPALIB?)

 Shame on you, you forgot my favourite toy - ICH   ;-D

OK, I can pre-start the Friday silliness by imagining what they
_might_ stand for:

ICH == It Can Hurt/Help!
DFH == Data Fails Handily/Habitually
DFS == Damn Foolish System
IST == It Supports Terminals (gee, that almost makes sense)
IGD == Invigorates Good Data


 I don't know, but I am tired of %$$holes asking me whether our company is the 
 owner of IBM Connect Direct...

 SITA001I IBM Sterling Connect:Direct for z/OS initialization

 Groete / Greetings
 Elardus Engelbrecht



-- 
If you sent twitter messages while exploring, are you on a textpedition?

He's about as useful as a wax frying pan.

10 to the 12th power microphones = 1 Megaphone

Maranatha! 
John McKown

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: IP Sockets Application Programming Question

2015-04-02 Thread Hansen, Dave L - Eagan, MN
Thank you Mike and Mark,

   I did use the REXX code I was sent off list.  I just enter PINGP 'localhost 
80'.  I changed the logic to use 127.0.0.1 as a fixed IP address.  Now all we 
need to supply is the port number.


  Thank you,  Dave



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Mike Wawiorko
Sent: Thursday, April 02, 2015 5:31 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: IP Sockets Application Programming Question

If you have z/OS NetView have a look at the TESTPORT command.

Mike Wawiorko
P Please consider the environment before printing this e-mail

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Hansen, Dave L - Eagan, MN
Sent: 01 April 2015 21:45
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: IP Sockets Application Programming Question

Dear Group,

   I get calls about CICS sockets and TN3270 sockets.  When all I needed to do 
was find out if an IP Address was up I just did a PING.  Back when PING went 
through the network end-to-end.

   I have been reading the z/OS V1R12.0 Comm Svr: IP Sockets Application 
Programming Interface Guide and Reference.  We now have z/OS V2R1.  My REXX 
EXEC can do a: src = socket(VERSION); == Figure 170. VERSION command example.

   To use the socket commands provided by the REXX socket function, a socket 
set must be active.  To allocate a socket set, use the INITIALIZE socket 
command.  The INITIALIZE command creates a socket set and can support multiple 
socket calls.

  In the book are a bunch of REXX socket sample programs == Table 21. REXX 
socket sample programs.  In the book it says: The LISTEN command applies only 
to stream sockets.  I would like to verify if I can hit my CICS Web Services 
socket.  My TCPIPSERVICE shows OPEN for PORT 1492.

Q).  Are CICS Web Services port 1492 and TN3270 port 23 Stream sockets?


   Currently all is working.  I would like my REXX EXEC to be non-disruptive 
(and not cause a denial of service).  The REXX socket sample programs use 
INITIALIZE.  It says it will preallocate a socket set.  A socket set is a 
number of pre allocated sockets available to a single REXX application.

Q).   Does my REXX EXEC need to have a socket to determine if one CICS socket 
is working?  The VERSION worked without specifying a socket number.  If anyone 
has done this before, are REXX socket functions the best way to PING a TCP/IP 
PORT?



 Thank you,  Dave


--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN

This e-mail and any attachments are confidential and intended solely for the 
addressee and may also be privileged or exempt from disclosure under applicable 
law. If you are not the addressee, or have received this e-mail in error, 
please notify the sender immediately, delete it from your system and do not 
copy, disclose or otherwise act upon any part of this e-mail or its attachments.

Internet communications are not guaranteed to be secure or virus-free. The 
Barclays Group does not accept responsibility for any loss arising from 
unauthorised access to, or interference with, any Internet communications by 
any third party, or from the transmission of any viruses. Replies to this 
e-mail may be monitored by the Barclays Group for operational or business 
reasons.

Any opinion or other information in this e-mail or its attachments that does 
not relate to the business of the Barclays Group is personal to the sender and 
is not given or endorsed by the Barclays Group.

Barclays Bank PLC. Registered in England and Wales (registered no. 1026167). 
Registered Office: 1 Churchill Place, London, E14 5HP, United Kingdom. 

Barclays Bank PLC is authorised by the Prudential Regulation Authority and 
regulated by the Financial Conduct Authority and the Prudential Regulation 
Authority (Financial Services Register No. 122702).

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Sort Jcl - hi-jacking

2015-04-02 Thread John Eells
We reserve names in the A-I range for IBM products. Things starting with 
J-Z can be assigned to others by request to elem...@us.ibm.com.


The reason to assign prefixes at all is to avoid the problems we once 
had with more than one IBM product using the same names for different 
things.  For example, I seem to recall that z/OS and IMS might both have 
WTO macros.  By extension, other software vendors can ask for prefixes 
so their part names don't collide with those supplied by others who 
play nice.


As some products have very old part names that were chosen ahead of this 
standard, they are grandfathered and not required to rename their 
parts.  For example, we have no plans to ever rename TSO/E's SEND 
command even though it starts with an S or to rename the 
aforementioned WTO macro.  But as the list of those things is (or should 
be) static, and people know or can discover them with reasonable ease, 
what we have is some level of protection against the introduction of new 
parts that will have naming conflicts with each other.


I have never asked, and several people have been on the other end of 
that e-mail address over the years and might have done it differently, 
but prefixes are quite possibly chosen on a next-one-available basis 
most of the time.  Historically, some packagers both inside and outside 
IBM have asked for (and gotten) prefixes they wanted, but I think most 
just ask for a prefix and use whatever they get, so they don't 
actually stand for anything in particular.  Once in a while, someone 
decides they don't like the prefix assigned and asks for another. 
(However, I rather doubt that we've ever tried to assign BAD, or IRK 
to anyone, or ever would!)


Of course, other collisions are possible for which no prefixes are 
assigned.  FMIDs come to mind.  For FMIDs, we always use H or E for base 
functions and J or F for dependent functions but we have no way to help 
prevent cross-vendor FMID naming conflicts.


john.archie.mck...@gmail.com (John McKown) wrote:

Hearsay from a past email which I remember from an IBM'er is that IBM
reserved a number of prefixes which start with a particular alphabetic
for themselves and another set guaranteed for users (would never be
used by IBM). He also said that the 3 character prefix was assigned by
somebody within IBM at their own whim. I.e. they are just picked at
random and don't really mean anything.


--
John Eells
z/OS Technical Marketing
IBM Poughkeepsie
ee...@us.ibm.com

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Sort Jcl - hi-jacking

2015-04-02 Thread John McKown
On Thu, Apr 2, 2015 at 11:04 AM, Richard Pinion rpin...@netscape.com wrote:
 Here's a nice little topic for discussion.  What do
 the three letter message prefixes stand for?

 IBM sort ICE
 Syncsort WER
 CICS DFH
 IMS  DFS
 IBM ???  IGD (anybody ever notice IGDZILLA in SYS1.LPALIB?)
 .

Hearsay from a past email which I remember from an IBM'er is that IBM
reserved a number of prefixes which start with a particular alphabetic
for themselves and another set guaranteed for users (would never be
used by IBM). He also said that the 3 character prefix was assigned by
somebody within IBM at their own whim. I.e. they are just picked at
random and don't really mean anything.

-- 
If you sent twitter messages while exploring, are you on a textpedition?

He's about as useful as a wax frying pan.

10 to the 12th power microphones = 1 Megaphone

Maranatha! 
John McKown

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Forbes: Nice Mainframe, How Do I Turn It On?

2015-04-02 Thread Pommier, Rex
...and cleaning people.  Bumping switches with mop handles etc.

Rex

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Jerry Whitteridge
Sent: Thursday, April 02, 2015 10:52 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Forbes: Nice Mainframe, How Do I Turn It On?

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On 
Behalf Of Elardus Engelbrecht
Sent: Thursday, April 02, 2015 8:48 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Forbes: Nice Mainframe, How Do I Turn It On?
---Snip

I'm still amazed that children are not allowed near those rooms and those EPO, 
I wondeer why, oh, why? ;-D

Groete / Greetings
 Elardus Engelbrecht

I don't worry about the children - it’s the Management types that scare me



Jerry Whitteridge
Lead Systems Engineer
Safeway Inc.
925 738 9443
Corporate Tieline - 89443

If you feel in control
you just aren't going fast enough.



--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Email Firewall made the following annotations.
--

Warning: 
All e-mail sent to this address will be received by the corporate e-mail 
system, and is subject to archival and review by someone other than the 
recipient.  This e-mail may contain proprietary information and is intended 
only for the use of the intended recipient(s).  If the reader of this message 
is not the intended recipient(s), you are notified that you have received this 
message in error and that any review, dissemination, distribution or copying of 
this message is strictly prohibited.  If you have received this message in 
error, please notify the sender immediately.   
 
==

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

The information contained in this message is confidential, protected from 
disclosure and may be legally privileged.  If the reader of this message is not 
the intended recipient or an employee or agent responsible for delivering this 
message to the intended recipient, you are hereby notified that any disclosure, 
distribution, copying, or any action taken or action omitted in reliance on it, 
is strictly prohibited and may be unlawful.  If you have received this 
communication in error, please notify us immediately by replying to this 
message and destroy the material in its entirety, whether in electronic or hard 
copy format.  Thank you.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: dynamic allocation for tape using TSO in batch

2015-04-02 Thread J O Skip Robinson
I don't see this as dynamic vs. static. It's about TSO vs. non-TSO. The 
authority to mount a tape has always been associated with each individual 
userid. It's an attribute of the userid in UADS. It's a profile in the TSOAUTH 
class to which the userid must have READ access. 'Foreground' or 'background', 
mount must be authorized by userid.

The historical basis for this requirement is not hard to guess. Imagine a time 
when tapes were handled by people scrambling around on roller skates. A TSO 
user could finger-check a data set name and send a tape jockey hurtling across 
a cavernous room to grab a volume not even wanted; meanwhile the user is stuck 
on the clock wondering why the computer went dead, hollering at the help desk 
about terrible response time. I would have disallowed tape mounts then. They're 
still disallowed now by default.

Just understand that if your personal userid acquires mount authority, you 
might become the user described above. 

.
.
.
J.O.Skip Robinson
Southern California Edison Company
Electric Dragon Team Paddler 
SHARE MVS Program Co-Manager
626-302-7535 Office
323-715-0595 Mobile
jo.skip.robin...@sce.com

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Shmuel Metz (Seymour J.)
Sent: Wednesday, April 01, 2015 11:58 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: dynamic allocation for tape using TSO in batch

In 2700199934746409.wa.paulgboulderaim@listserv.ua.edu, on
04/01/2015
   at 02:08 PM, Paul Gilmartin
000433f07816-dmarc-requ...@listserv.ua.edu said:

Why should the rules, or detection of the condition, be different for 
DYNALLOC?

Because it's dynamic. For static allocation the Initiator can sort things out 
before running the job.

Now, it's possible that you have a business case to justify a requirement, but 
it had better be god, because doing it is going to be a lot of work.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN