Re: 3592 carts

2011-03-31 Thread Mike Wood
Francis,
RMM really doesnt care where a tape is when you use it. The location that
rmm records is not used by the system when determining where to mount the
volume  - only at return to scratch time by rmm to decide whether to make
the request via OAM or simply update the rmm cds.

So, in order to use the cartridges you need the system to know the are no
longer in an SMS managed library. If this was your only SMS managed library,
export disconnect the volcat(s). If you have other SMS managed libraries you
will have to use IDCAMS to delete the volume records and also remove the
library record from the VGENERAL volcat.  This change should allow private
volume to now be used stand-alone.

To ensure rmm has the correct location name, once the above volcat change is
done, you can issue
RMM CV volser LOCATION(SHELF) FORCE
this should update rmm to correct the location to SHELF.
See here:
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/dgt2c880/7.1.5?SHELF=EZ2ZBK0IDT=20090527133850

Mike Wood

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: TSOLIB, BLDL RDJFCB

2011-03-31 Thread Etienne Thijsse
:Sorry - now it looks like using TCBJLB does work... BLDL gives success. I 
must
:have done something wrong before... Thanks!
:What remains now is to find the DDname TCBJLB is pointing to.

DCBTIOT.

Thank you again but I am afraid this is a little too terse for me to 
understand... How do I get from the TCBJLB to DCBTIOT, and from there to 
the TIOT? All my attempts and googling failed thus far.

From what I have found in the documentation and google, I think DCBTIOT is 
at offset 40 from TCBJLB. At that place should be an 2 byte offset, which is 
an offset to the TIOT. But offset from where? From TCBJLB? or from PSATOLD-
TIOENTRY ? Both don't seem to be it...
If you could help me with this, that would be great.

Thanks,
Etienne

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


FTP question

2011-03-31 Thread גדי בן אבי
Hi,

One of our users wants an ftp transfer to fail if the data set already exists.

z/OS is the server.
The client is windows.

Is this possible?

TIA

Gadi


לשימת לבך, בהתאם לנהלי החברה וזכויות החתימה בה, כל הצעה, התחייבות או מצג מטעם 
החברה, מחייבים מסמך נפרד וחתום על ידי מורשי החתימה של החברה, הנושא את לוגו 
החברה או שמה המודפס ובצירוף חותמת החברה. בהעדר מסמך כאמור (לרבות מסמך סרוק) 
המצורף להודעת דואר אלקטרוני זאת, אין לראות באמור בהודעה אלא משום טיוטה לדיון,
ואין להסתמך עליה לביצוע פעולה עסקית או משפטית כלשהי.


Please note that in accordance with Malam's signatory rights, no offer, 
agreement, concession or representation is binding on the company,
unless accompanied by a duly signed separate document (or a scanned version 
thereof), affixed with the company's seal.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: HMC System Console usage (one more time)

2011-03-31 Thread Bruce Hewson
Hi Kevin,

option 3 - use HMC for IPL and NIP...nice to be on one screen.
  MVS messages on perviosly activated sysplex SMCS screen (usually)
  else HMC until SMCS available.


I have removed NIP Consolesno hardware and that gets rid all those PINned 
devices.


and

no money to buy OSA-ICC devices.why bother.


On Mon, 28 Mar 2011 23:01:36 -0500, W. Kevin Kelley 
wkkel...@optonline.net wrote:

I'm being asked one more time by TPTB to determine how the HMC System
Console is actually being used by z/OS customers:

1) How many of you have used to it in an emergency as the console of last
resort?

2) How many of you have used it to recover OSA attached consoles?

3) How many of you have no locally-attached consoles and use the System
Console to IPL and get you through NIP before transitioning to SMCS consoles
(or some other console support requiring Comm Server to be up)?

W. Kevin Kelley  -- IBM POK Lab -- z/OS Core Technical Development





Regards
Bruce Hewson

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: FTP question

2011-03-31 Thread Itschak Mugzach
Sure, using FTP exits.

ITschak

2011/3/31 גדי בן אבי gad...@malam.com

 Hi,

 One of our users wants an ftp transfer to fail if the data set already
 exists.

 z/OS is the server.
 The client is windows.

 Is this possible?

 TIA

 Gadi

 
 לשימת לבך, בהתאם לנהלי החברה וזכויות החתימה בה, כל הצעה, התחייבות או מצג
 מטעם החברה, מחייבים מסמך נפרד וחתום על ידי מורשי החתימה של החברה, הנושא את
 לוגו החברה או שמה המודפס ובצירוף חותמת החברה. בהעדר מסמך כאמור (לרבות מסמך
 סרוק) המצורף להודעת דואר אלקטרוני זאת, אין לראות באמור בהודעה אלא משום טיוטה
 לדיון,
 ואין להסתמך עליה לביצוע פעולה עסקית או משפטית כלשהי.


 Please note that in accordance with Malam's signatory rights, no offer,
 agreement, concession or representation is binding on the company,
 unless accompanied by a duly signed separate document (or a scanned version
 thereof), affixed with the company's seal.

 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html



Re: FTP question

2011-03-31 Thread Matan Cohen
I tought it will fail when not using the '(replace'.

2011/3/31 Itschak Mugzach imugz...@gmail.com

 Sure, using FTP exits.

 ITschak

 2011/3/31 גדי בן אבי gad...@malam.com

  Hi,
 
  One of our users wants an ftp transfer to fail if the data set already
  exists.
 
  z/OS is the server.
  The client is windows.
 
  Is this possible?
 
  TIA
 
  Gadi
 
  
  לשימת לבך, בהתאם לנהלי החברה וזכויות החתימה בה, כל הצעה, התחייבות או מצג
  מטעם החברה, מחייבים מסמך נפרד וחתום על ידי מורשי החתימה של החברה, הנושא
 את
  לוגו החברה או שמה המודפס ובצירוף חותמת החברה. בהעדר מסמך כאמור (לרבות
 מסמך
  סרוק) המצורף להודעת דואר אלקטרוני זאת, אין לראות באמור בהודעה אלא משום
 טיוטה
  לדיון,
  ואין להסתמך עליה לביצוע פעולה עסקית או משפטית כלשהי.
 
 
  Please note that in accordance with Malam's signatory rights, no offer,
  agreement, concession or representation is binding on the company,
  unless accompanied by a duly signed separate document (or a scanned
 version
  thereof), affixed with the company's seal.
 
  --
  For IBM-MAIN subscribe / signoff / archive access instructions,
  send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
  Search the archives at http://bama.ua.edu/archives/ibm-main.html
 




-- 
best regards,
matan cohen
MF System Administrator.


Re: FTP question

2011-03-31 Thread גדי בן אבי
Replace works when z/OS is the client.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Matan Cohen
Sent: Thursday, March 31, 2011 11:20 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: FTP question

I tought it will fail when not using the '(replace'.

2011/3/31 Itschak Mugzach imugz...@gmail.com

 Sure, using FTP exits.

 ITschak

 2011/3/31 גדי בן אבי gad...@malam.com

  Hi,
 
  One of our users wants an ftp transfer to fail if the data set
  already exists.
 
  z/OS is the server.
  The client is windows.
 
  Is this possible?
 
  TIA
 
  Gadi
 
  
  לשימת לבך, בהתאם לנהלי החברה וזכויות החתימה בה, כל הצעה, התחייבות או
  מצג מטעם החברה, מחייבים מסמך נפרד וחתום על ידי מורשי החתימה של
  החברה, הנושא
 את
  לוגו החברה או שמה המודפס ובצירוף חותמת החברה. בהעדר מסמך כאמור
  (לרבות
 מסמך
  סרוק) המצורף להודעת דואר אלקטרוני זאת, אין לראות באמור בהודעה אלא
  משום
 טיוטה
  לדיון,
  ואין להסתמך עליה לביצוע פעולה עסקית או משפטית כלשהי.
 
 
  Please note that in accordance with Malam's signatory rights, no
  offer, agreement, concession or representation is binding on the
  company, unless accompanied by a duly signed separate document (or a
  scanned
 version
  thereof), affixed with the company's seal.
 
  
  -- For IBM-MAIN subscribe / signoff / archive access instructions,
  send email to lists...@bama.ua.edu with the message: GET IBM-MAIN
  INFO Search the archives at
  http://bama.ua.edu/archives/ibm-main.html
 




--
best regards,
matan cohen
MF System Administrator.

לשימת לבך, בהתאם לנהלי החברה וזכויות החתימה בה, כל הצעה, התחייבות או מצג מטעם 
החברה, מחייבים מסמך נפרד וחתום על ידי מורשי החתימה של החברה, הנושא את לוגו 
החברה או שמה המודפס ובצירוף חותמת החברה. בהעדר מסמך כאמור (לרבות מסמך סרוק) 
המצורף להודעת דואר אלקטרוני זאת, אין לראות באמור בהודעה אלא משום טיוטה לדיון,
ואין להסתמך עליה לביצוע פעולה עסקית או משפטית כלשהי.


Please note that in accordance with Malam's signatory rights, no offer, 
agreement, concession or representation is binding on the company,
unless accompanied by a duly signed separate document (or a scanned version 
thereof), affixed with the company's seal.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: FTP question

2011-03-31 Thread Binyamin Dissen
On Thu, 31 Mar 2011 10:56:39 +0300 ??? ?? ??? gad...@malam.com wrote:

:One of our users wants an ftp transfer to fail if the data set already exists.

:z/OS is the server.
:The client is windows.

:Is this possible?

Try a GET first, and if no data obtained ...

An MVS server will require REPLACE if the dataset exists

--
Binyamin Dissen bdis...@dissensoftware.com
http://www.dissensoftware.com

Director, Dissen Software, Bar  Grill - Israel


Should you use the mailblocks package and expect a response from me,
you should preauthorize the dissensoftware.com domain.

I very rarely bother responding to challenge/response systems,
especially those from irresponsible companies.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: TSOLIB, BLDL RDJFCB

2011-03-31 Thread Binyamin Dissen
On Thu, 31 Mar 2011 03:45:58 -0500 Etienne Thijsse e.thij...@chello.nl
wrote:

::Sorry - now it looks like using TCBJLB does work... BLDL gives success. I 
:must
::have done something wrong before... Thanks!
::What remains now is to find the DDname TCBJLB is pointing to.

:DCBTIOT.

:Thank you again but I am afraid this is a little too terse for me to 
:understand... How do I get from the TCBJLB to DCBTIOT, and from there to 
:the TIOT? All my attempts and googling failed thus far.

:From what I have found in the documentation and google, I think DCBTIOT is 
:at offset 40 from TCBJLB. At that place should be an 2 byte offset, which is 
:an offset to the TIOT. But offset from where? From TCBJLB? or from PSATOLD-
:TIOENTRY ? Both don't seem to be it...
:If you could help me with this, that would be great.

TCBJLB points to a DCB.

TCBTIOA points to the TIOT

DCBTIOT is the offset in the TIOT for the opened DCB.

--
Binyamin Dissen bdis...@dissensoftware.com
http://www.dissensoftware.com

Director, Dissen Software, Bar  Grill - Israel


Should you use the mailblocks package and expect a response from me,
you should preauthorize the dissensoftware.com domain.

I very rarely bother responding to challenge/response systems,
especially those from irresponsible companies.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: EZBTIINI dynamically loaded ?

2011-03-31 Thread Walter Marguccio
thanks very much for taking the time to answer my question.

Chris,

thanks very much for taking the time to answer my question.

The Share presentation 6865, (Boston, 2010) from A.Christensen
provide the explanation which I expected to find in the Communication
Server bookshelf at z/OS 1.11 level. Or in the z/OS 1.11 migration guide,
since loading EZBTIINI into ECSA using dynamic LPA functions
is new since z/OS 1.11, and wasn't there at z/OS 1.9 level.

I used Google, but wasn't smart enough to look at page 2, where the link
to Christensen's presentation was. I apologise for this.

I pay always attention at what the HealthChecker tells me, especially
when I IPL a new z/OS level. In this case, I wanted to know whether
the alarm caused by msg CSVH1001E for Dynamic LPA changes was justified or not.

Now I know it was not, because this is the way TCP/IP at 1.11 level works.


Walter Marguccio
z/OS Systems Programmer
BELENUS LOB Informatic GmbH
Munich - Germany

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: TSOLIB, BLDL RDJFCB

2011-03-31 Thread Etienne Thijsse

TCBJLB points to a DCB.

TCBTIOA points to the TIOT

DCBTIOT is the offset in the TIOT for the opened DCB.


I can't find anything on TCBTIOA, I think you mean TCBTIO ?

And, I know DCBTIOT is an offset, but From Where? The start of the TIOT ? 
That gives me nothing. From TCBTIO-TIOENTRY ? That also doesn't work...
So, from where is this offset counted?

Thanks,

Etienne

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: TSOLIB, BLDL RDJFCB

2011-03-31 Thread Binyamin Dissen
On Thu, 31 Mar 2011 05:38:33 -0500 Etienne Thijsse e.thij...@chello.nl
wrote:

:TCBJLB points to a DCB.

:TCBTIOA points to the TIOT

:DCBTIOT is the offset in the TIOT for the opened DCB.

:I can't find anything on TCBTIOA, I think you mean TCBTIO ?

Yep.

:And, I know DCBTIOT is an offset, but From Where? The start of the TIOT ? 

Yes.

:That gives me nothing. From TCBTIO-TIOENTRY ? That also doesn't work...
:So, from where is this offset counted?

What do you see? The DDNAME is not at the start.

Show your code.

--
Binyamin Dissen bdis...@dissensoftware.com
http://www.dissensoftware.com

Director, Dissen Software, Bar  Grill - Israel


Should you use the mailblocks package and expect a response from me,
you should preauthorize the dissensoftware.com domain.

I very rarely bother responding to challenge/response systems,
especially those from irresponsible companies.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: zHPF and mixed channels

2011-03-31 Thread R.S.

Martin,
Thank you for the explanation.

I am aware of the requirements, like microcode for FICON cards, z/OS, 
and license and microcode for DASD box. BTW: I'm talking about VMAX with 
5875.135
From your words I understand that zHPF mode is chosen at I/O level - 
some I/O's from the same host can be non-HPF, or even at the same time 
the other host (non-HPF capable) can talk to the DASD CU as well.

Am I right?

Regards
--
Radoslaw Skorupka
Lodz, Poland



W dniu 2011-03-30 14:18, Martin Feeney pisze:

In order for zHPF to work, there are a series of conditions that must ALL be 
true.  The conditions include support on the host side (channel support as well 
as z/OS) and support on the CU (at the Extended Link Services level as well as 
the device [Read Features Code] level).  If *any* one of these conditions is 
not true, zHPF will not be used.  These conditions have to be true for ALL 
paths in the path group to a given device.

Thus:

Q1: The following scenario: two host connected to single CU, via switch.
Same channel adapter in CU. One host is zHPF capable, the other is not
(FICON Express 1). Will zHPF work between CU and first host?

  Yes.  The switch doesn't play into the equation.  If the first host 
(channel and z/OS) and the CU both support zHPF, the device is enabled for zHPF.

Q2: Another scenario: zHPF-capable host connected via switch to two
different DASD boxes. First DASD is zHPF-capable, the second is not.
Both DASDs are connected to the same CHPIDs.
Will zHPF be used for communication between host and first CU?

  Yes.  Again because the host and CU are both zHPF capable, zHPF can 
be used.  The two boxes are viewed independently or zHPF purposes.

Note: There only certain types of I/O operations are zHPF capable.  The feature 
will only be used if a zHPF capable driver (e.g. Media Manager) is being used.  
Thus, even with zHPF enabled, you may not see a lot of zHPF I/O.


Hope this helps.


-Original Message-
From: R.S. [mailto:r.skoru...@bremultibank.com.pl]
Sent: Tuesday, March 29, 2011 3:34 AM
Subject: zHPF and mixed channels

Quotation from some IBM TechDoc:

zHPF is supported on FICON Express2 (FEx2) and FICON Express4 (FEx4)
channels.  It is not supported on FICON Express channels.
I/Os executed on path groups with a mix of FICON Express and FICON
Express2 or FICON Express4 channels in the same path group will not be
eligible to convert to zHPF. For zHPF, all the channels in the same
channel path group have to be FEx2 or FEx4. 

The above is clear in scenario with one host and one CU.
What about many-to-many scenarios?

Q1: The following scenario: two host connected to single CU, via switch.
Same channel adapter in CU. One host is zHPF capable, the other is not
(FICON Express 1). Will zHPF work between CU and first host?



Q2: Another scenario: zHPF-capable host connected via switch to two
different DASD boxes. First DASD is zHPF-capable, the second is not.
Both DASDs are connected to the same CHPIDs.
Will zHPF be used for communication between host and first CU?

Any clue?

Regards




--
Treść tej wiadomości może zawierać informacje prawnie chronione Banku 
przeznaczone wyłącznie do użytku służbowego adresata. Odbiorcą może być jedynie 
jej adresat z wyłączeniem dostępu osób trzecich. Jeżeli nie jesteś adresatem 
niniejszej wiadomości lub pracownikiem upoważnionym do jej przekazania 
adresatowi, informujemy, że jej rozpowszechnianie, kopiowanie, rozprowadzanie 
lub inne działanie o podobnym charakterze jest prawnie zabronione i może być 
karalne. Jeżeli otrzymałeś tę wiadomość omyłkowo, prosimy niezwłocznie 
zawiadomić nadawcę wysyłając odpowiedź oraz trwale usunąć tę wiadomość 
włączając w to wszelkie jej kopie wydrukowane lub zapisane na dysku.

This e-mail may contain legally privileged information of the Bank and is intended solely for business use of the addressee. This e-mail may only be received by the addressee and may not be disclosed to any third parties. If you are not the intended addressee of this e-mail or the employee authorised to forward it to the addressee, be advised that any dissemination, copying, distribution or any other similar activity is legally prohibited and may be punishable. If you received this e-mail by mistake please advise the sender immediately by using the reply facility in your e-mail software and delete permanently this e-mail including any copies of it either printed or saved to hard drive. 


BRE Bank SA
ul. Senatorska 18
00-950 Warszawa
www.brebank.pl

Sąd Rejonowy dla m. st. Warszawy 
XII Wydział Gospodarczy Krajowego Rejestru Sądowego, 
nr rejestru przedsiębiorców KRS 025237

NIP: 526-021-50-88
Według stanu na dzień 16.07.2010 r. kapitał zakładowy BRE Banku SA (w całości wpłacony) wynosi 168.248.328 złotych. 


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send 

Re: NPIV question

2011-03-31 Thread Crabtree, Anne D
So, as long as they aren't connected prior to configuration for NPIV, it 
really won't matter who enables it first.  Right?

Anne D. Crabtree
System Programmer
WV Office of Technology Data Center
1900 Kanawha Blvd East
Charleston, WV  25305
(304)558-5914 ext 58292
(304)558-1441 fax

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Mark Post
Sent: Wednesday, March 30, 2011 2:25 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: NPIV question

 On 3/30/2011 at 02:13 PM, Crabtree, Anne D anne.d.crabt...@wv.gov 
 wrote: 
 My question is: Should the cable be
 connected to the z10 and the switch prior to either the switch and z10
 being configured for NPIV? ? and if not, why does it matter if I enable
 it first?

Having the cable there first isn't necessary.  The reason you want to do it on 
the switch first is that if the HBA (your FICON card) tries to talk NPIV to 
the switch and the switch says I don't think so, it won't work until after 
the switch is reconfigured and your FICON card varied completely offline and 
back on.


Mark Post

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: EZBTIINI dynamically loaded ?

2011-03-31 Thread Peter Relson
I don't know anything about EZBTIINI, but the reference to dynamic is 
dynamic LPA.
I.e., this module is not made part of LPA via such mechanisms as LPALST, 
MLPA, or FLPA but is added by the dynamic LPA facility (CSVDYLPA macro or 
SETPROG LPA,ADD command or LPA ADD statement in PROGxx) I suppose among 
the realm of possibly (but very unlikely) is that it was placed in common 
storage by the application and control blocks dummied up to make it look 
like it was added by dynamic LPA.

Having said that, one reason why this sort of thing occurs is when an LPA 
part moves from having been in a PDS to being in a PDSE (one hopes that 
when that happens it's not an accident, but that there's some functional 
reason why it needed to be a program object in a PDSE). 

Peter Relson
z/OS Core Technology Design

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: FTP question

2011-03-31 Thread Bernard Coeytaux
We use the followings steps

Del targetfilename.$TMP$

Put sourcefilename targetfiname.$TMP$

If the put is RC 0 then the dataset is complete

Ren targetfilename.$TMP$ realtargetname

The rename is atomic, and will fails if the real target dataset exist on evry 
platform

 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: FTP question

2011-03-31 Thread Chase, John
 -Original Message-
 From: IBM Mainframe Discussion List On Behalf Of ??? ?? ???
 
 Hi,
 
 One of our users wants an ftp transfer to fail if the data set already
exists.
 
 z/OS is the server.
 The client is windows.
 
 Is this possible?

Omitting the (REPLACE keyword from the PUT command doesn't work??

   -jc-

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: TSOLIB, BLDL RDJFCB

2011-03-31 Thread Etienne Thijsse
On Thu, 31 Mar 2011 13:02:09 +0200, Binyamin Dissen 
bdis...@dissensoftware.com wrote:

On Thu, 31 Mar 2011 05:38:33 -0500 Etienne Thijsse e.thij...@chello.nl
wrote:

:TCBJLB points to a DCB.

:TCBTIOA points to the TIOT

:DCBTIOT is the offset in the TIOT for the opened DCB.

:I can't find anything on TCBTIOA, I think you mean TCBTIO ?

Yep.

:And, I know DCBTIOT is an offset, but From Where? The start of the TIOT ?

Yes.

:That gives me nothing. From TCBTIO-TIOENTRY ? That also doesn't 
work...
:So, from where is this offset counted?

What do you see? The DDNAME is not at the start.

Show your code.


Finally, I am there! Thanks to your answer, I took another look at how I added 
the offset to the start of the TIOT and I spotted a mistake, an  that 
shouldn't be there. So I was adding to the address of the variable that 
contained the TIOT, not the TIOT itself (its a C program).
Having removed it, now I do get the right TIOT, with indeed the DDname in it 
that I need.

Thanks for your help,

Etienne

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: TSOLIB, BLDL RDJFCB

2011-03-31 Thread Gerhard Postpischil

On 3/31/2011 6:38 AM, Etienne Thijsse wrote:

And, I know DCBTIOT is an offset, but From Where? The start of the TIOT ?
That gives me nothing. From TCBTIO-TIOENTRY ? That also doesn't work...
So, from where is this offset counted?


TCB is a 16-bit unsigned offset from the address in TCBTIO. If 
the DD name is blank, you need to scan through the TIOT entries 
(ignore voided entries) until the last non-blank entry prior to 
your offset. The JFCB address (minus 16 bytes) is obtained from 
the TIOT entry in TIOEJFCB after that's fed into an SWAREG macro 
(also possible without the macro, but even messier).


Gerhard Postpischil
Bradford, VT

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: zHPF and mixed channels

2011-03-31 Thread Martin Feeney
Is given chpid or CU port able to work in HPF and non-HPF mode simultaneously?

Yes, a given CHPID and/or CU port can process Command Mode (legacy FICON) I/O 
as well as Transport Mode (zHPF) I/O concurrently.  In fact, if Media Manager 
encounters an error in a zHPF I/O, it retries in Command Mode.

Martin

-Original Message-
From: R.S. [mailto:r.skoru...@bremultibank.com.pl] 
Sent: Wednesday, March 30, 2011 4:42 AM
Subject: Re: zHPF and mixed channels

John,
Thank you for the explanation.
In fact my both questions can be rephrased to the following:
Is given chpid or CU port able to work in HPF and non-HPF mode 
simultaneously?

Your expectations (and mine too) are that yes.


Regards
-- 
Radoslaw Skorupka
Lodz, Poland


W dniu 2011-03-30 06:36, John Ticic pisze:
 Radoslaw,

 my understanding is that zHPF is negotiated between z/OS and the DSS
 CU if all the channels in the path group are FEx2 or FEx4. So, if this is
 the case, then I/O between that z/OS LPAR and that CU can use zHPF.

 So, my take on Q1 is that the host that has FEx2/FEx4 will be able to
 use zHPF and the other host will not be able to.

 In Q2, the Host can negotiate a zHPF connection to one DASD and not
 to the other.

 These are only my expectations and I would be interested in your
 findings - especially if they are different.

 SMF 73 (RMF Channel stats) will give you some nice information on how
 many I/Os are using transport mode.
 SMF 74.5 (Rank statistics) will give you detailed zHPF information per
 device (starting with z/OS 1.12) (probably Vendor DSS specific).

 John

 Quotation from some IBM TechDoc:

 zHPF is supported on FICON Express2 (FEx2) and FICON Express4
 (FEx4)
 channels.  It is not supported on FICON Express channels.
 I/Os executed on path groups with a mix of FICON Express and FICON
 Express2 or FICON Express4 channels in the same path group will not
 be
 eligible to convert to zHPF. For zHPF, all the channels in the same
 channel path group have to be FEx2 or FEx4. 

 The above is clear in scenario with one host and one CU.
 What about many-to-many scenarios?

 Q1: The following scenario: two host connected to single CU, via
 switch.
 Same channel adapter in CU. One host is zHPF capable, the other is
 not
 (FICON Express 1). Will zHPF work between CU and first host?

 Q2: Another scenario: zHPF-capable host connected via switch to two
 different DASD boxes. First DASD is zHPF-capable, the second is not.
 Both DASDs are connected to the same CHPIDs.
 Will zHPF be used for communication between host and first CU?

 Any clue?

 Regards
 --
 Radoslaw Skorupka
 Lodz, Poland


--
Tre tej wiadomoci moe zawiera informacje prawnie chronione Banku 
przeznaczone wycznie do uytku subowego adresata. Odbiorc moe by jedynie 
jej adresat z wyczeniem dostpu osób trzecich. Jeeli nie jeste adresatem 
niniejszej wiadomoci lub pracownikiem upowanionym do jej przekazania 
adresatowi, informujemy, e jej rozpowszechnianie, kopiowanie, rozprowadzanie 
lub inne dziaanie o podobnym charakterze jest prawnie zabronione i moe by 
karalne. Jeeli otrzymae t wiadomo omykowo, prosimy niezwocznie 
zawiadomi nadawc wysyajc odpowied oraz trwale usun t wiadomo 
wczajc w to wszelkie jej kopie wydrukowane lub zapisane na dysku.

This e-mail may contain legally privileged information of the Bank and is 
intended solely for business use of the addressee. This e-mail may only be 
received by the addressee and may not be disclosed to any third parties. If you 
are not the intended addressee of this e-mail or the employee authorised to 
forward it to the addressee, be advised that any dissemination, copying, 
distribution or any other similar activity is legally prohibited and may be 
punishable. If you received this e-mail by mistake please advise the sender 
immediately by using the reply facility in your e-mail software and delete 
permanently this e-mail including any copies of it either printed or saved to 
hard drive. 

BRE Bank SA
ul. Senatorska 18
00-950 Warszawa
www.brebank.pl

Sd Rejonowy dla m. st. Warszawy 
XII Wydzia Gospodarczy Krajowego Rejestru Sdowego, 
nr rejestru przedsibiorców KRS 025237
NIP: 526-021-50-88
Wedug stanu na dzie 16.07.2010 r. kapita zakadowy BRE Banku SA (w caoci 
wpacony) wynosi 168.248.328 zotych. 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: TSOLIB, BLDL RDJFCB

2011-03-31 Thread McKown, John
Just to throw in one possible wrench. I don't know anything about your 
environment and the environment that your routine will be invoked in. However, 
one problem that is not addressed is what if your program is invoked via a LINK 
macro with the DCB= parameter pointing to a user opened DCB? I don't think your 
current code will work in this scenario. Backchaining to determine this may be 
quite interesting since there is no real indication passed to your routine 
that it occurred. Or, even worse, suppose your routine is brought into storage 
via a LOAD macro with the DCB= parameter, but your routine is later actually 
called via a BALR/BASR?

I'm curious why you need to do all this work. Why won't a simple C fetch 
function work for you? It will load from the standard search order. I really 
don't see what all this chaining gets you. Of course, I'm not really a 
developer. I'm a sysprog who knows some programming (fairly good breadth, but 
not very deep).

--
John McKown 
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

9151 Boulevard 26 * N. Richland Hills * TX 76010
(817) 255-3225 phone * 
john.mck...@healthmarkets.com * www.HealthMarkets.com

Confidentiality Notice: This e-mail message may contain confidential or 
proprietary information. If you are not the intended recipient, please contact 
the sender by reply e-mail and destroy all copies of the original message. 
HealthMarkets(r) is the brand name for products underwritten and issued by the 
insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance 
Company(r), Mid-West National Life Insurance Company of TennesseeSM and The 
MEGA Life and Health Insurance Company.SM

 

 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Etienne Thijsse
 Sent: Thursday, March 31, 2011 7:03 AM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: TSOLIB, BLDL  RDJFCB
 
 On Thu, 31 Mar 2011 13:02:09 +0200, Binyamin Dissen 
 bdis...@dissensoftware.com wrote:
 
 On Thu, 31 Mar 2011 05:38:33 -0500 Etienne Thijsse 
 e.thij...@chello.nl
 wrote:
 
 :TCBJLB points to a DCB.
 
 :TCBTIOA points to the TIOT
 
 :DCBTIOT is the offset in the TIOT for the opened DCB.
 
 :I can't find anything on TCBTIOA, I think you mean TCBTIO ?
 
 Yep.
 
 :And, I know DCBTIOT is an offset, but From Where? The 
 start of the TIOT ?
 
 Yes.
 
 :That gives me nothing. From TCBTIO-TIOENTRY ? That also doesn't 
 work...
 :So, from where is this offset counted?
 
 What do you see? The DDNAME is not at the start.
 
 Show your code.
 
 
 Finally, I am there! Thanks to your answer, I took another 
 look at how I added 
 the offset to the start of the TIOT and I spotted a mistake, 
 an  that 
 shouldn't be there. So I was adding to the address of the 
 variable that 
 contained the TIOT, not the TIOT itself (its a C program).
 Having removed it, now I do get the right TIOT, with indeed 
 the DDname in it 
 that I need.
 
 Thanks for your help,
 
 Etienne
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html
 
 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: FTP question

2011-03-31 Thread McKown, John
 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Bernard Coeytaux
 Sent: Thursday, March 31, 2011 6:57 AM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: FTP question
 
 We use the followings steps
 
 Del targetfilename.$TMP$
 
 Put sourcefilename targetfiname.$TMP$
 
 If the put is RC 0 then the dataset is complete
 
 Ren targetfilename.$TMP$ realtargetname
 
 The rename is atomic, and will fails if the real target 
 dataset exist on evry 
 platform

This works and I think it is the only way to do the noreplace in a generic, 
general, manner. Unfortunately it does not avoid the file upload entirely and 
so still takes as long as replacing. Another possible problem is that the z/OS 
step will exit with a non-zero RC if the file exists when using the '(EXIT' 
parameter, because the ren fails. Of course, the del could also fail and, 
with (EXIT, that would terminate your ftp step prematurely. 

z/OS really needs a better ftp client. I wish we had one that is scriptable 
much like IDCAMS is scriptable. No, don't ask me to write it. If I did, it 
would likely be in REXX. And I'd likely get in trouble from my management for 
wasting MSUs. We are sensitive to MSU usage. My boss monitors it because it 
directly impacts his software budget. And, from what I can tell, upper 
management has a visceral desire to eliminate IT spending altogether. Of 
course, at their level, they want to eliminate all spending other than their 
salaries. Yes, I'm very cynical.

--
John McKown 
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

9151 Boulevard 26 * N. Richland Hills * TX 76010
(817) 255-3225 phone * 
john.mck...@healthmarkets.com * www.HealthMarkets.com

Confidentiality Notice: This e-mail message may contain confidential or 
proprietary information. If you are not the intended recipient, please contact 
the sender by reply e-mail and destroy all copies of the original message. 
HealthMarkets(r) is the brand name for products underwritten and issued by the 
insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance 
Company(r), Mid-West National Life Insurance Company of TennesseeSM and The 
MEGA Life and Health Insurance Company.SM

 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: FTP question

2011-03-31 Thread Roberto Halais
There exists REXX for PC (Reginald, OOREXX, etc) in the windows environment.
I would
code a REXX script which would issue an FTP and DIR then check for the files
existence.
If not exist then FTP put. That is if the Windows initiates FTP.

If z/OS initiates FTP the do reverse with REXX script.


On Thu, Mar 31, 2011 at 8:34 AM, McKown, John john.mck...@healthmarkets.com
 wrote:

  -Original Message-
  From: IBM Mainframe Discussion List
  [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Bernard Coeytaux
  Sent: Thursday, March 31, 2011 6:57 AM
  To: IBM-MAIN@bama.ua.edu
  Subject: Re: FTP question
 
  We use the followings steps
 
  Del targetfilename.$TMP$
 
  Put sourcefilename targetfiname.$TMP$
 
  If the put is RC 0 then the dataset is complete
 
  Ren targetfilename.$TMP$ realtargetname
 
  The rename is atomic, and will fails if the real target
  dataset exist on evry
  platform

 This works and I think it is the only way to do the noreplace in a
 generic, general, manner. Unfortunately it does not avoid the file upload
 entirely and so still takes as long as replacing. Another possible problem
 is that the z/OS step will exit with a non-zero RC if the file exists when
 using the '(EXIT' parameter, because the ren fails. Of course, the del
 could also fail and, with (EXIT, that would terminate your ftp step
 prematurely.

 z/OS really needs a better ftp client. I wish we had one that is scriptable
 much like IDCAMS is scriptable. No, don't ask me to write it. If I did, it
 would likely be in REXX. And I'd likely get in trouble from my management
 for wasting MSUs. We are sensitive to MSU usage. My boss monitors it because
 it directly impacts his software budget. And, from what I can tell, upper
 management has a visceral desire to eliminate IT spending altogether. Of
 course, at their level, they want to eliminate all spending other than their
 salaries. Yes, I'm very cynical.

 --
 John McKown
 Systems Engineer IV
 IT

 Administrative Services Group

 HealthMarkets(r)

 9151 Boulevard 26 * N. Richland Hills * TX 76010
 (817) 255-3225 phone *
 john.mck...@healthmarkets.com * www.HealthMarkets.com

 Confidentiality Notice: This e-mail message may contain confidential or
 proprietary information. If you are not the intended recipient, please
 contact the sender by reply e-mail and destroy all copies of the original
 message. HealthMarkets(r) is the brand name for products underwritten and
 issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake
 Life Insurance Company(r), Mid-West National Life Insurance Company of
 TennesseeSM and The MEGA Life and Health Insurance Company.SM



 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html




-- 
Those who can make you believe religious absurdities, can make you commit
atrocities.  Voltaire

The philosopher has never killed any priests, whereas the priest has
killed a great many philosophers.  Denis Diderot

Men will never be free until the last king is strangled with the entrails
of the last priest. Denis Diderot

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: TSOLIB, BLDL RDJFCB

2011-03-31 Thread Etienne Thijsse

TCB is a 16-bit unsigned offset from the address in TCBTIO. If
the DD name is blank, you need to scan through the TIOT entries
(ignore voided entries) until the last non-blank entry prior to
your offset. The JFCB address (minus 16 bytes) is obtained from
the TIOT entry in TIOEJFCB after that's fed into an SWAREG macro
(also possible without the macro, but even messier).

Gerhard Postpischil
Bradford, VT

Ah, that is another piece of useful information, I didn't know the DDname could 
be blank.
Thank you,

Etienne

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: HMC System Console usage (one more time)

2011-03-31 Thread Jimmy Pace
1. yes
2. never
3. yes, but are secondary devices, OSC-ICC devices are NIP

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: HMC System Console usage (one more time)

2011-03-31 Thread Arthur Gutowski
Forgot about that one... our SADump build is coded with SYSC only.

Art

On Wed, 30 Mar 2011 09:08:11 -0500, Field, Alan C. 
alan.c.fi...@supervalu.com wrote:

1 - Not necessarily for emergencies. Use it for SAD, which could be
considered an emergency :)
...
Alan

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of W. Kevin Kelley
Sent: Monday, March 28, 2011 23:02
To: IBM-MAIN@bama.ua.edu
Subject: HMC System Console usage (one more time)

I'm being asked one more time by TPTB to determine how the HMC System
Console is actually being used by z/OS customers:

1) How many of you have used to it in an emergency as the console of
last resort?
...

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: HMC System Console usage (one more time)

2011-03-31 Thread Steve Conway
Kevin Kelley Asked:

1) How many of you have used to it in an emergency as the console of last 
resort?
 
-- Yes

2) How many of you have used it to recover OSA attached consoles?
 
-- Yes

3) How many of you have no locally-attached consoles and use the System 
Console to IPL and get you through NIP before transitioning to SMCS 
consoles (or some other console support requiring Comm Server to be up)?

-- Nope.
 

Cheers,,,Steve

Steven F. Conway, CISSP
LA Systems
z/OS Systems Support
Phone: 703.295.1926
steve_con...@ao.uscourts.gov

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: HMC System Console usage (one more time)

2011-03-31 Thread Mark Zelden
On 3/28/2011 9:01 PM, W. Kevin Kelley wrote:

 1) How many of you have used to it in an emergency as the console of last
 resort?

 2) How many of you have used it to recover OSA attached consoles?

 3) How many of you have no locally-attached consoles and use the System
 Console to IPL and get you through NIP before transitioning to SMCS consoles
 (or some other console support requiring Comm Server to be up)?

1) Never, but used for SADUMP.Never until recently... bringing up
two new data centers for the first time and HMC console was used
for initial IPLs while all the OSA-ICC definitions / cabling was being
worked out.

2) Don't think we've ever needed to do that.

3) N/A.  We use OSA-ICC and used 2074s prior to using ICC.

Regards,

Mark
--
Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS   
mailto:m...@mzelden.com
Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html 
Systems Programming expert at http://expertanswercenter.techtarget.com/

*** Please note the new URL for Mark's MVS Utilities ***

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: zIIPs and zAAPs

2011-03-31 Thread Shmuel Metz (Seymour J.)
In 4d92c406.5030...@phoenixsoftware.com, on 03/29/2011
   at 10:47 PM, Edward Jaffe edja...@phoenixsoftware.com said:

In light of these restrictions, I suppose one could argue that more
difficult  programming means less stable programs. Otherwise, there
is little difference in  'security' or 'integrity' between the two
modes.

Errors in key 8 problem state code are a lot less likely to cause
outages, even if it is AC(1).
 
-- 
 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...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: TSOLIB, BLDL RDJFCB

2011-03-31 Thread Shmuel Metz (Seymour J.)
In listserv%201103300935022609.0...@bama.ua.edu, on 03/30/2011
   at 09:35 AM, Etienne Thijsse e.thij...@chello.nl said:

I need my C program to start another program that is in the same load
library.  To discover the name of this load library, I use BLDL to
get a concatenation  number in STEPLIB or JOBLIB, and RDJFCB with
DDname STEPLIB or JOBLIB  to get the name from these lists.

Don't forget tasklib[1]. That can be an issue for batch, not just for
foreground TSO.

This works fine in batch. Now I would like to do the same under TSO.
I  thought I could use the TSO command TSOLIB to set STEPLIB, but
no, BLDL  returns error 4, so apparently STEPLIB was not set
correctly.

TSOLIB does not reallocate STEPLIB; it simply tells the TMP what
libraries top use for a tasklib.

[1] Facility, not ddname
 
-- 
 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...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: TSOLIB, BLDL RDJFCB

2011-03-31 Thread Etienne Thijsse
On Thu, 31 Mar 2011 07:28:54 -0500, McKown, John 
john.mck...@healthmarkets.com wrote:

Just to throw in one possible wrench. I don't know anything about your 
environment and the environment that your routine will be invoked in. 
However, one problem that is not addressed is what if your program is 
invoked via a LINK macro with the DCB= parameter pointing to a user opened
DCB? I don't think your current code will work in this scenario. Backchaining 
to determine this may be quite interesting since there is no real indication
passed to your routine that it occurred. Or, even worse, suppose your 
routine is brought into storage via a LOAD macro with the DCB= parameter, 
but your routine is later actually called via a BALR/BASR?

Thanks for pointing this out. We plan to support only a few ways of invoking 
it: under USS on the commandline, in batch mode with an explicit STEPLIB or 
JOBLIB specification, and under TSO on the commandline where the use of 
TSOLIB will be required. (Once I know more about started tasks I may add 
that to the list too, but at the moment I don't know enough about that.)
So, using the LINK macro in some user program to start the program is 
something that we will noty be supporting. I can't think of a reason why 
someone would want to do this anyway... it is kind of a deamon process that 
waits for requests, and once one comes in, starts another program in the 
same loadlib to handle the request.


I'm curious why you need to do all this work. Why won't a simple C fetch 
function work for you? It will load from the standard search order. I really 
don't see what all this chaining gets you. Of course, I'm not really a 
developer. I'm a sysprog who knows some programming (fairly good breadth, 
but not very deep).


Since the program needs to start this other program that is in the same 
loadlib, it needs to know its own loadlib. The program must get its own address 
space, so I don't think fetch qualifies. Also, this second program needs to 
know its loadlib too, it will use the prefix of the loadlib to find other 
datasets 
belonging to the installation of our software. It is not started with JCL, so 
DD 
specifications can't be used for this; it must allocate the DDnames itself.
And, actually, this is not that much work, its just that I have to learn all 
these 
details, once tou know them it is simple.

Thanks,
Etienne

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: TSOLIB, BLDL RDJFCB

2011-03-31 Thread Etienne Thijsse
On Wed, 30 Mar 2011 22:13:28 -0400, Shmuel Metz (Seymour J.) 
shmuel+ibm-m...@patriot.net wrote:


Don't forget tasklib[1]. That can be an issue for batch, not just for
foreground TSO.

All I have been able to find thus far is that TASKLIB is a parameter of the 
ATTACH macro, nothing on how to 'get it'. I think JCL's always have a STEPLIB 
and/or JOBLIB specification, or am I mistaken?

TSOLIB does not reallocate STEPLIB; it simply tells the TMP what
libraries top use for a tasklib.

I have TSOLIB now covered by using TCBJLB, DCBTIOT etc. So, if TSOLIB is 
modifying TASKLIB, then TCBJLB is actually this TASKLIB ?
If so, then that is now covered for batch too, right?

Thanks,

Etienne

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: HMC System Console usage (one more time)

2011-03-31 Thread Shaffer, Terri E
I will say we mirror what Barbara has stated, but that our IOC (operations) has 
a product called IO/Concepts that we funnel console traffic thru, otherwise IOC 
and Sysprogs use the HMC excessively for IPLs, not just in emergencies.

Thanks

Ms. Terri E. Shaffer 
terri.e.shaf...@jpmchase.com
Engineer
J.P.Morgan Chase  Co.
GTI DCT ECS Core Services zSoftware Group / Emerging Technologies 
Office: # 614-213-3467
Cell: # 412-519-2592 

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Barbara Nitz
Sent: Tuesday, March 29, 2011 12:11 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: HMC System Console usage (one more time)

I'll stay out of 2, but 1 and certainly 3 definitely apply to us. Since our
office building is now quite a ways away from the actual hardware, us
sysprogs routinely use the HMC both for IPL and to issue some commands.
Also, we routinely swap lpars from one box to the other, meaning that 'the
consoles' need to have their appropriate 3270 pcomm session (different IP
address AFAIK) started. Until they're up, HMC is the only means of
communication from here. 

The test sysplex doesn't have a console anymore. Well, there are some
consoles defined for that, but those sessions are never open. So the only
way to IPL is the HMC. One of them happens to be right here in our office.

Regards, Barbara

1) How many of you have used to it in an emergency as the console of last
resort?

2) How many of you have used it to recover OSA attached consoles?

3) How many of you have no locally-attached consoles and use the System
Console to IPL and get you through NIP before transitioning to SMCS consoles
(or some other console support requiring Comm Server to be up)?

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
This communication is for informational purposes only. It is not
intended as an offer or solicitation for the purchase or sale of
any financial instrument or as an official confirmation of any
transaction. All market prices, data and other information are not
warranted as to completeness or accuracy and are subject to change
without notice. Any comments or statements made herein do not
necessarily reflect those of JPMorgan Chase  Co., its subsidiaries
and affiliates.

This transmission may contain information that is privileged,
confidential, legally privileged, and/or exempt from disclosure
under applicable law. If you are not the intended recipient, you
are hereby notified that any disclosure, copying, distribution, or
use of the information contained herein (including any reliance
thereon) is STRICTLY PROHIBITED. Although this transmission and any
attachments are believed to be free of any virus or other defect
that might affect any computer system into which it is received and
opened, it is the responsibility of the recipient to ensure that it
is virus free and no responsibility is accepted by JPMorgan Chase 
Co., its subsidiaries and affiliates, as applicable, for any loss
or damage arising in any way from its use. If you received this
transmission in error, please immediately contact the sender and
destroy the material in its entirety, whether in electronic or hard
copy format. Thank you.

Please refer to http://www.jpmorgan.com/pages/disclosures for
disclosures relating to European legal entities.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: FTP question

2011-03-31 Thread Frank Swarbrick
Since no one has mentioned this, it probably won't work on z/OS, but on
the Windows based FTP server we use (Gene6), if the user has access to
PUT a file but does not have access to DELETE a file, a PUT fails if the
file already exists.  This is because if the file already exists the FTP
server needs to delete it.  So if the user does not have delete access
the put fails.

I don't have any way to test this on z/OS, but someone might want to
try it.

Frank
-- 

Frank Swarbrick
Applications Architect - Mainframe Applications Development
FirstBank Data Corporation - Lakewood, CO  USA
P: 303-235-1403


On 3/31/2011 at 1:56 AM, in message
c11ded818b17214792b97fba28712bed04fa69c...@jer-email1.jer.ad.malam.com,
???
?? ??? gad...@malam.com wrote:
 Hi,
 
 One of our users wants an ftp transfer to fail if the data set
already 
 exists.
 
 z/OS is the server.
 The client is windows.
 
 Is this possible?
 
 TIA
 
 Gadi
 
 
 לשימת לבך, בהתאם לנהלי החברה וזכויות החתימה בה, כל הצעה, התחייבות או מצג

 מטעם החברה, מחייבים מסמך נפרד וחתום על ידי מורשי החתימה של החברה, הנושא
את 
 לוגו החברה או שמה המודפס ובצירוף חותמת החברה. בהעדר מסמך כאמור (לרבות
מסמך 
 סרוק) המצורף להודעת דואר אלקטרוני זאת, אין לראות באמור בהודעה אלא משום
טיוטה 
 לדיון,
 ואין להסתמך עליה לביצוע פעולה עסקית או משפטית כלשהי.
 
 
 Please note that in accordance with Malam's signatory rights, no
offer, 
 agreement, concession or representation is binding on the company,
 unless accompanied by a duly signed separate document (or a scanned
version 
 thereof), affixed with the company's seal.
 

--
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN
INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html

 

The information contained in this electronic communication and any
document attached hereto or transmitted herewith is confidential and
intended for the exclusive use of the individual or entity named above. 
If the reader of this message is not the intended recipient or the
employee or agent responsible for delivering it to the intended
recipient, you are hereby notified that any examination, use,
dissemination, distribution or copying of this communication or any part
thereof is strictly prohibited.  If you have received this communication
in error, please immediately notify the sender by reply e-mail and
destroy this communication.  Thank you.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: FTP question

2011-03-31 Thread McKown, John
 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Frank Swarbrick
 Sent: Thursday, March 31, 2011 10:25 AM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: FTP question
 
 Since no one has mentioned this, it probably won't work on 
 z/OS, but on
 the Windows based FTP server we use (Gene6), if the user has access to
 PUT a file but does not have access to DELETE a file, a PUT 
 fails if the
 file already exists.  This is because if the file already 
 exists the FTP
 server needs to delete it.  So if the user does not have delete access
 the put fails.
 
 I don't have any way to test this on z/OS, but someone might want to
 try it.
 
 Frank
 -- 
 
 Frank Swarbrick

DELETE would require ALTER access for the dataset. However, PUT would only 
require UPDATE. So it would be possible for a user to PUT to an existing z/OS 
dataset, but not to PUT if the dataset did not exist. But the OP wants the 
opposite. They want the PUT to fail if it already exists but succeed if it does 
not. I wonder if SUNIQUE or RUNIQUE would give them what they want. What that 
does is create a unique dataset name if the specified dataset already exists, 
so it is not replaced. But I think that is still not what is wanted. What 
appears to be wanted is to not bother doing the PUT at all if the dataset 
already exists. ftp does not really have this capability. In this case, I do a 
two step ftp.

//TEST EXEC PGM=FTP,PARM='(EXIT'
//OUTPUT DD SYSOUT=*
//INPUT DD *
IP
USERID
PASSWORD
LS REMOTE.FILE
/*
//PUT EXEC PGM=FTP,PARM='(EXIT',COND=(0,EQ,TEST)
//OUTPUT DD SYSOUT=*
//INPUT DD *
IP
USERID
PASSWORD
PUT LOCAL.FILE REMOTE.FILE
/*
//

--
John McKown 
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

9151 Boulevard 26 * N. Richland Hills * TX 76010
(817) 255-3225 phone * 
john.mck...@healthmarkets.com * www.HealthMarkets.com

Confidentiality Notice: This e-mail message may contain confidential or 
proprietary information. If you are not the intended recipient, please contact 
the sender by reply e-mail and destroy all copies of the original message. 
HealthMarkets(r) is the brand name for products underwritten and issued by the 
insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance 
Company(r), Mid-West National Life Insurance Company of TennesseeSM and The 
MEGA Life and Health Insurance Company.SM

 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: FTP question

2011-03-31 Thread Kirk Wolf
This is certainly possible if you use our free Co:Z SFTP server on z/OS.
This would also have the benefit of being secure and sftp uses a single ssh
port (22) which is more firewall/nat router friendly than FTP.

The windows client could use PuTTY's psftp command, like this:

C:\ psftp user@zos
psftp ls /+noreplace
psftp ls /+recfm=fb,lrecl=121,space=cyl.3.1
psftp put local.txt //HLQ.DATASET
psftp quit

The put would fail if the dataset already exists.
See the PuTTY psftp documentation for using psftp with a batch script.

Kirk Wolf
Dovetailed Technologies
http://dovetail.com


2011/3/31 גדי בן אבי gad...@malam.com

 Hi,

 One of our users wants an ftp transfer to fail if the data set already
 exists.

 z/OS is the server.
 The client is windows.

 Is this possible?

 TIA

 Gadi

 
 לשימת לבך, בהתאם לנהלי החברה וזכויות החתימה בה, כל הצעה, התחייבות או מצג
 מטעם החברה, מחייבים מסמך נפרד וחתום על ידי מורשי החתימה של החברה, הנושא את
 לוגו החברה או שמה המודפס ובצירוף חותמת החברה. בהעדר מסמך כאמור (לרבות מסמך
 סרוק) המצורף להודעת דואר אלקטרוני זאת, אין לראות באמור בהודעה אלא משום טיוטה
 לדיון,
 ואין להסתמך עליה לביצוע פעולה עסקית או משפטית כלשהי.


 Please note that in accordance with Malam's signatory rights, no offer,
 agreement, concession or representation is binding on the company,
 unless accompanied by a duly signed separate document (or a scanned version
 thereof), affixed with the company's seal.

 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html



[no subject]

2011-03-31 Thread Whitehair, John
Has anyone had experience changing Changeman PDSs to PDSEs?

John R. Whitehair
MVS Systems Programmer
Forethought Financial Services
812-933-6730 (office)
john.whiteh...@forethought.com



--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: 3592 carts

2011-03-31 Thread Robert A. Rosenberg

At 03:36 -0500 on 03/31/2011, Mike Wood wrote about Re: 3592 carts:


To ensure rmm has the correct location name, once the above volcat change is
done, you can issue
RMM CV volser LOCATION(SHELF) FORCE
this should update rmm to correct the location to SHELF.


To created the needed commands, I have found that using an Assembler 
Macro that issues PUNCH commands to output the command is useful. You 
just have the macro loop a volser counter to create the command text. 
So long as there is a compact volser range this is enough to create 
the individual commands needed.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: FTP question

2011-03-31 Thread Ron Hawkins
If you are using SAS for Windows, UNIX or whatever platform you can use
FILENAME ddname FTP statement to check if a dataset exists, and to write
directly to datasets on the mainframe without using the typical FTP line
commands.

 

I've used edited copies of working code. The second example could be
something as simple as:

 

Data _null_;

Infile jclgen;

File  jclftp;

Input   @;

Put   _infile_;

Return;

Run;

 

Sample code follows:

 

***;

*** Get a listing of all the PAIO logs datasets and store in a  ***;

*** SAS file,
***;

***;

 

filename  dir ftp '' ls user='userid' debug

  host='111.222.333.444' PASS='password'

cd='HLQ..IODRIVER.TESTID..'

 ;

 

data paio_logfiles;

   infiledir length=ll stopover;

   input  llq $varying8. ll

 @;

   ifllq=:'LOG';

   dsname =HLQ..IODRIVER.||TESTID..||llq;

   output;

run;

 

 

***;

*** Allocate the dataset that will contain the modified ***;

*** JCL to be executed on the mainframe.  ***;

***   ***;

*** NB the ENCODING=EBCDIC037 is required so that EBCDIC  ***;

*** characters are written to the file***;

***;

 

FILENAME JCLFTP  CLEAR;

 

FILENAME jclftp FTP 'HLQ.iodriver.prof..jclgen'
HOST='111.222.333.444' USER='userid'

 PASS=password LRECL=80 RCMD='SITE RDW' recfm=f
ENCODING=EBCDIC037;

 

***;

*** Post process JCLGEN.JCL   ***;

*** ===   ***;

***;

 

data jcl;

   infilejclgen length=l stopover;

   file   jclftp;

   input  @;

   ifl10   then   do;

  put_infile_;

  return;

   end;

   input  @3 jcl $8.

 @;

   ifjcl=:'VSP' then do;

  input  @6 num2.

   @;

   end;

   ifjcl=:NJOBS08 then do;

  put @1 //NJOBS04  DD DUMMY;

  return;

   end;

   if0=num=3then do;

  put_infile_;

  put@1 /*XEQ  N1;

  return;

   end;

   else if 4=num=7  then do;

  put_infile_;

  put@1 /*XEQ  N2;

  return;

   end;

   put _infile_;

   return;

run;

 

 

 

 -Original Message-

 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
Behalf Of

 Roberto Halais

 Sent: Thursday, March 31, 2011 5:49 AM

 To: IBM-MAIN@bama.ua.edu

 Subject: Re: [IBM-MAIN] FTP question

 

 There exists REXX for PC (Reginald, OOREXX, etc) in the windows
environment.

 I would

 code a REXX script which would issue an FTP and DIR then check for the
files

 existence.

 If not exist then FTP put. That is if the Windows initiates FTP.

 

 If z/OS initiates FTP the do reverse with REXX script.

 

 

 On Thu, Mar 31, 2011 at 8:34 AM, McKown, John
john.mck...@healthmarkets.com

  wrote:

 

   -Original Message-

   From: IBM Mainframe Discussion List

   [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Bernard Coeytaux

   Sent: Thursday, March 31, 2011 6:57 AM

   To: IBM-MAIN@bama.ua.edu

   Subject: Re: FTP question

  

   We use the followings steps

  

   Del targetfilename.$TMP$

  

   Put sourcefilename targetfiname.$TMP$

  

   If the put is RC 0 then the dataset is complete

  

   Ren targetfilename.$TMP$ realtargetname

  

   The rename is atomic, and will fails if the real target

   dataset exist on evry

   platform

 

  This works and I think it is the only way to do the noreplace in a

  generic, general, manner. Unfortunately it does not avoid the file
upload

  entirely and so still takes as long as replacing. Another possible
problem

  is that the z/OS step will exit with a non-zero RC if the file exists
when

  using the '(EXIT' parameter, because the ren fails. Of course, the
del

  could also fail and, with (EXIT, that would terminate your ftp step

  prematurely.

 

  z/OS really needs a better ftp client. I wish we had one that is
scriptable

  much like IDCAMS is scriptable. No, don't ask me to write it. If I did,
it

  would likely be in REXX. And I'd likely get in trouble from my
management

  for wasting MSUs. We are sensitive to MSU usage. My boss monitors it
because

  it directly impacts his software budget. And, from what I can 

SMF EXITS in effect - which are they?

2011-03-31 Thread Anthony Fletcher
Does anyone know a way to determine exactly which exits SMF is taking? D 
SMF,O shows which exits are supposed to be being taken, but we have a 
disagreement as to what happens when there is a SYS list, and a SUBSYS 
TSO list that is different. My reading of the manual is that whatever is in SYS 
is in effect unless changed by a SUBSYS override. The alternative view is that 
as soon as you specify SUBSYS TSO you override all the SYS settings and 
only what is listed takes effect - plus the internal defaults.
The answer to this can't be determined from D SMF,O as it only lists the input, 
not the resulting set up.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Changing Changeman PDSs to PDSEs (Was: No Subject)

2011-03-31 Thread Chris Mason
Subject added

On Thu, 31 Mar 2011 17:00:48 -0400, Whitehair, John 
john.whiteh...@forethought.com wrote:

Has anyone had experience changing Changeman PDSs to PDSEs?

John R. Whitehair
MVS Systems Programmer
Forethought Financial Services
812-933-6730 (office)
john.whiteh...@forethought.com

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: 3592 carts

2011-03-31 Thread Scott Rowe
The RMM SEARCHVOL command would be even easier.

On Thu, Mar 31, 2011 at 3:48 PM, Robert A. Rosenberg hal9...@panix.comwrote:

 At 03:36 -0500 on 03/31/2011, Mike Wood wrote about Re: 3592 carts:


  To ensure rmm has the correct location name, once the above volcat change
 is
 done, you can issue
 RMM CV volser LOCATION(SHELF) FORCE
 this should update rmm to correct the location to SHELF.


 To created the needed commands, I have found that using an Assembler Macro
 that issues PUNCH commands to output the command is useful. You just have
 the macro loop a volser counter to create the command text. So long as there
 is a compact volser range this is enough to create the individual commands
 needed.


 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html


CONFIDENTIALITY/EMAIL NOTICE: The material in this transmission contains
confidential and privileged information intended only for the addressee.
If you are not the intended recipient, please be advised that you have
received this material in error and that any forwarding, copying, printing,
distribution, use or disclosure of the material is strictly prohibited.
If you have received this material in error, please (i) do not read it,
(ii) reply to the sender that you received the message in error, and
(iii) erase or destroy the material. Emails are not secure and can be
intercepted, amended, lost or destroyed, or contain viruses. You are deemed
to have accepted these risks if you communicate with us by email. Thank you.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: SMF EXITS in effect - which are they?

2011-03-31 Thread Mark Jacobs
Have you tried an instruction fetch slip trap on one of the SYS or SUBSYS named 
exits? Depending on which one hits you'll have your answer. You can get the 
address(s) of your exits by adding the DIAG option to the D SMF,O command.

Mark Jacobs



-Original Message-
From: IBM Mainframe Discussion List on behalf of Anthony Fletcher
Sent: Thu 3/31/2011 6:22 PM
To: IBM-MAIN@bama.ua.edu
Subject: SMF EXITS in effect - which are they?
 
Does anyone know a way to determine exactly which exits SMF is taking? D 
SMF,O shows which exits are supposed to be being taken, but we have a 
disagreement as to what happens when there is a SYS list, and a SUBSYS 
TSO list that is different. My reading of the manual is that whatever is in SYS 
is in effect unless changed by a SUBSYS override. The alternative view is that 
as soon as you specify SUBSYS TSO you override all the SYS settings and 
only what is listed takes effect - plus the internal defaults.
The answer to this can't be determined from D SMF,O as it only lists the input, 
not the resulting set up.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: SMF EXITS in effect - which are they?

2011-03-31 Thread Anthony Thompson
D PROG,EXIT 

Ant. 

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Anthony Fletcher
Sent: Friday, 1 April 2011 7:52 AM
To: IBM-MAIN@bama.ua.edu
Subject: SMF EXITS in effect - which are they?

Does anyone know a way to determine exactly which exits SMF is taking? D 
SMF,O shows which exits are supposed to be being taken, but we have a 
disagreement as to what happens when there is a SYS list, and a SUBSYS 
TSO list that is different. My reading of the manual is that whatever is in SYS 
is in effect unless changed by a SUBSYS override. The alternative view is that 
as soon as you specify SUBSYS TSO you override all the SYS settings and 
only what is listed takes effect - plus the internal defaults.
The answer to this can't be determined from D SMF,O as it only lists the input, 
not the resulting set up.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: FTP question

2011-03-31 Thread Dale R. Smith
On Thu, 31 Mar 2011 10:56:39 +0300, #1490;#1491;#1497; amp;#1489;#1503; 
#1488;#1489;#1497; gad...@malam.com 
wrote:

Hi,

One of our users wants an ftp transfer to fail if the data set already 
exists.

z/OS is the server.
The client is windows.

Is this possible?

TIA

Gadi


Try:
SUNIQUE ON
before the PUT command.

-- 
Dale R. Smith

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


How/Why Is This Looping?

2011-03-31 Thread Paul Gilmartin
A recent thread here mentioned atomic rename of Classic data sets.
I don't think there is such a thing, but I tried to synthesize it
with:

//ATOMICJOB  505303JOB,'Paul Gilmartin',
// MSGLEVEL=(1,1),REGION=0M
//*
//* Doc: Atomic rename.
//*
//USERCOUTPUT JESDS=ALL,DEFAULT=YES,
//  CLASS=R,PAGEDEF=V0648Z,CHARS=GT12
//*
//*.+|+|+|+|+|+|+|+|
//RENAME   EXEC  PGM=IKJEFT01
//SYSTSPRT  DD   SYSOUT=(,)
//SYSTSIN   DD   *
allocate dd(atomic) new delete dsn(TEMP.DUP1)
delete TEMP.DUP1
rename TEMP.DUP2  TEMP.DUP1
free dd(atomic)
//*
//ENQ  EXEC  PGM=IEFBR14,COND=(0,LE)
//X DD   DISP=MOD,DSN=SYSUID..TEMP.DUP1
//
+|+|+|+|+|+|+|+|
 :w ! submit $MVS_HOST

To my astonishment, it looped.  I canceled it after it generated
500 lines of JESYSMSGS, ending in:

 SDSF OUTPUT DISPLAY ATOMIC   JOB03617  DSID 4 LINE 506 COLUMNS 02- 81
 COMMAND INPUT ===SCROLL === CSR
IEF285I   user.TEMP.DUP1   KEPT
IEF285I   VOL SER NOS= TSO020.
IEF237I 41C4 ALLOCATED TO SYS00167
IEF285I   user.TEMP.DUP1   KEPT
IEF285I   VOL SER NOS= TSO020.
IEF237I 41C4 ALLOCATED TO SYS00168
IEF285I   user.TEMP.DUP1   KEPT
IEF285I   VOL SER NOS= TSO020.
IEF237I 41C4 ALLOCATED TO SYS00169
IEF472I ATOMIC RENAME - COMPLETION CODE - SYSTEM=222 USER= REASON=
IEF285I   user.ATOMIC.JOB03617.D103.?  SYSOUT
IEF285I   user.ATOMIC.JOB03617.D101.?  SYSIN
IEF285I   user.TEMP.DUP1   KEPT
IEF285I   VOL SER NOS= TSO020.
IEF373I STEP/RENAME  /START 2011090.2229
IEF032I STEP/RENAME  /STOP  2011090.2235
CPU: 0 HR  00 MIN  02.20 SECSRB: 0 HR  00 MIN  00.07 SEC
VIRT:   268K  SYS:   332K  EXT:  348K  SYS:11308K
IEF375I  JOB/ATOMIC  /START 2011090.2229
IEF033I  JOB/ATOMIC  /STOP  2011090.2235
CPU: 0 HR  00 MIN  02.20 SECSRB: 0 HR  00 MIN  00.07 SEC
 BOTTOM OF DATA 

Data sets TEMP.DUP1 and TEMP.DUP2 both preexisted, catalogued as?

 Command - Enter / to select action  Message   Volume
 ---
  user.TEMP.DUP1 TSO020
  user.TEMP.DUP2 TSO005
 * End of Data Set list 

???

Just curious.

Thanks,
gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: FTP question

2011-03-31 Thread Paul Gilmartin
On Thu, 31 Mar 2011 07:34:27 -0500, McKown, John wrote:

 -Original Message-
 [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Bernard Coeytaux
 Sent: Thursday, March 31, 2011 6:57 AM

 We use the followings steps

 Del targetfilename.$TMP$
 Put sourcefilename targetfiname.$TMP$

 If the put is RC 0 then the dataset is complete

 Ren targetfilename.$TMP$ realtargetname

 The rename is atomic, and will fails if the real target
 dataset exist on evry
 platform

This works and I think it is the only way to do the noreplace in a generic, 
general, manner. Unfortunately it does not avoid the file upload entirely and 
so still takes as long as replacing. Another possible problem is that the z/OS 
step will exit with a non-zero RC if the file exists when using the '(EXIT' 
parameter, because the ren fails. Of course, the del could also fail and, 
with (EXIT, that would terminate your ftp step prematurely.

First, given how plainly the OP stated:

...
z/OS is the server.
The client is windows.
...

It's dismaying how many followups presumed a z/OS client, or
imputed facilities present only in IBM clients to clients or
servers from other vendors.  Somehow the phrase radically naif
comes to mind.

By experiment with a z/OS 1.12 server, for classic data sets RENAME
fails if the target DSN preexists:

503 $ ftp user@3mvs
Connected to mvs
220-FTPD1 IBM FTP CS V1R12 at ..., 17:10:35 on 2011-03-31.

ftp rename temp.dup2 temp.dup1
350 RNFR accepted. Please supply new name for RNTO.
550 Rename fails: user.TEMP.DUP1 already exists.

Atomic when the target is not replaced is a notional nullity --
to me, it means that when the target is replaced there is no
interval during which any other process/task/address space can
observe its nonexistence.

I suppose that if an ENQ EXC is obtained and held while the
original target is uncatalogued, scratched, and renamed-to
the criterion for an atomic and preemptive rename is satisfied.
TSO, at least, has the contrary habit of FREEing the ENQ at
the point of the DELETE and before the RENAME can be done.

(A startling result of an experiment in another thread.)

When the target is a UNIX file:

ftp cd /u/user
250 HFS directory /u/user is the current working directory
ftp rename temp.dup2 temp.dup1
350 RNFR accepted. Please supply new name for RNTO.
250 /u/user/temp.dup2 renamed to /u/user/temp.dup1

the file is calmly renamed, replacing the original target.  I
presume, without any definitive proof, that the operation is
atomic in accordance with UNIX custom.

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html