FTP using Proxy

2013-05-10 Thread Salva Carrasco
Hi guys,

I'm trying to use the standard z/os Comm Server ftp client to download a file 
from the internet traversing a CERN http proxy (Microsoft ISA). I've tested a 
lot of combinations:

proxy
quote site dest.host
user
pass

proxy 8080
u...@dest.host pass

etc... Any works, clues?

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


AUTO: Kevin Minerley/Poughkeepsie/IBM is not available (returning 05/13/2013)

2013-05-10 Thread Kevin Minerley
I am out of the office until 05/13/2013.

Flexing out and attending my brother-in-law's math master's defense.  If an
emergency, call 845-901-2328.


Note: This is an automated response to your message  Re: Return codes
sent on 05/10/2013 0:09:38.

This is the only notification you will receive while this person is away.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


Re: Return codes

2013-05-10 Thread STEVEN DAHARI
Greetings from Steven,
If anyone care to contribute, I am interested in known C design defects.
 
I am most appreciative,
Steven

 

 Date: Thu, 9 May 2013 21:09:38 -0700
 From: retired-mainfra...@q.com
 Subject: Re: Return codes
 To: IBM-MAIN@LISTSERV.UA.EDU
 
 When evaluating the conditional expression in an if or while statement, 0
 (or the equivalent floating point and pointer values) is false and any
 non-zero value is true.
 
 :: -Original Message-
 :: From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
 :: Behalf Of John Gilmore
 :: Sent: Wednesday, May 08, 2013 8:05 PM
 :: To: IBM-MAIN@LISTSERV.UA.EDU
 :: Subject: Re: Return codes
 ::
 :: This practice reflects another C design defect. In the absence of an
 :: explicit boolean data type, C uses the dubious but ineluctable
 :: convention that a coded-arithmetic value of 1 represents truth and one
 :: of zero represents falsity. Values that are not 1, truth, are then by
 :: extension treated as representations of falsity.
 
 --
 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: Return codes

2013-05-10 Thread Blaicher, Christopher Y.
No level was assumed.  It was just an example written on the spur of the moment 
without much thought or review.  As long as the code is being critiqued, what's 
with the BALR?  BAS, BASR or BASSM are much more appropriate for today's 
environment.

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


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Shmuel Metz (Seymour J.)
Sent: Thursday, May 09, 2013 7:48 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Return codes

In
a6cf87cbc0b60a459cb79af044a096db2227dc9...@mailccr.us.syncsort.com,
on 05/08/2013
   at 08:34 PM, Blaicher, Christopher Y. cblaic...@syncsort.com
said:

Item of note, unless you are working with all your own code, you have
to validate the value in R15 before just using it to branch into a
branch table with tests that the value is within limits and  the lower
2 bits are not on.  Such as:

What architecture level are you assuming?

 BALR  r14,r15Call your routine
 LRR14,R15DON'T DISTROY R15
 CHI   R15,16 CHECK HIGH LIMIT
 JHBADRETURN  TOO BIG?  DIE WITH MESSAGE
 N R14,=XL4'0003'  ANY STRAY BITS?
 JNZ   BADRETURN  YES, DIE WITH MESSAGE
 B *+4(R15)   BRANCH ACCORDING TO RC

 BALR  r14,r15Call your routine
 CHI   R15,16 CHECK HIGH LIMIT
 JHBADRETURN  TOO BIG?  DIE WITH MESSAGE
 TMLL  R15,XL2'3' ANY STRAY BITS?
 JNZ   BADRETURN  YES, DIE WITH MESSAGE
 B *+4(R15)   BRANCH ACCORDING TO RC




--
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 Atid/2http://patriot.net/~shmuel
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



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


ICETOOL question

2013-05-10 Thread K
Hi dear all,

I would like to produce a statistic report using ICETOOL. This report should 
shown the percentage of records in the file according to their values e.g.

Input:

AAA
BBB
AAA
CCC
AAA
BBB

Output Percentages:

AAA 50,0
BBB 33,0
CCC 16,7

Is there any ICETOOL operator (like OCCUR) to find out the above percentage? Do 
I have to use various INCLUDE COND and then read the DFSMSG to extract 
percentages (from ICE054I 0 RECORDS - IN: xxx, OUT: yyy) ?

Thanks in advance

Kzafirop at gmail dot com

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


Re: ICETOOL question

2013-05-10 Thread Elardus Engelbrecht
Kzafirop wrote:

I would like to produce a statistic report using ICETOOL. This report should 
shown the percentage of records in the file according to their values e.g.

Is there any ICETOOL operator (like OCCUR) to find out the above percentage? 
Do I have to use various INCLUDE COND and then read the DFSMSG to extract 
percentages (from ICE054I 0 RECORDS - IN: xxx, OUT: yyy) ?

I don't know if you can convert totals of items to percentage of full total, 
but you can use OCCUR like this and then work out the % yourself.

OCCUR   FROM(TEMP) LIST(PRINT) -   
PAGE - 
TITLE('COUNT OF RACF COMMANDS') - 
DATE(4MD/) -   
TIME(24:) -
BLANK -
ON(63,8,CH) HEADER('ISSUER') - 
ON(VALCNT)  HEADER('COUNT')

I don't have now access to the DFSORT books, but I'm very sure someone from 
DFSORT support can help you.

HTH!

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: Renaming an LPAR dynamically

2013-05-10 Thread Barry Merrill
FWIW when you rename an LPAR, the LPAR NUMBER can change since
the LPAR numbers are now assigned alphabetically to LPAR names.

Barry Merrill


Herbert W. Barry Merrill, PhD
President-Programmer
MXG Softtware
Merrill Consultants
10717 Cromwell Drive
Dallas, TX 75229
ba...@mxg.com

http://www.mxg.com - FAQ has Most Answers 
ad...@mxg.com  - invoices/PO/Payment
supp...@mxg.com- technical
tel: 214 351 1966  - expect slow reply, use email 
fax: 214 350 3694  - prefer email, still works



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Skip Robinson
Sent: Friday, May 10, 2013 9:48 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Renaming an LPAR dynamically

I've poked around and not found a concise explanation. We have an LPAR whose 
name needs to change. Everything else in the IODF is fine, just a name problem. 
Current hardware and software. 
I changed the name in HCD. When I tried to ACTIVATE the new IODF, it choked on 
the name mismatch. I gather that I can first rename to '*', then rename for 
real in two successive IODFs. If I do that, do I preserve all original chpid 
and device connections? I don't want to start over from scratch when only the 
name is wrong. 

.
.
JO.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

--
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: Renaming an LPAR dynamically

2013-05-10 Thread Bill Johnson
Some software, the Control products from BMC come to mind have the LPAR name 
embedded in some of the datasets and will not work if you change the LPAR name 
dynamically.





 From: Skip Robinson jo.skip.robin...@sce.com
To: IBM-MAIN@LISTSERV.UA.EDU 
Sent: Friday, May 10, 2013 10:48 AM
Subject: Renaming an LPAR dynamically
 

I've poked around and not found a concise explanation. We have an LPAR 
whose name needs to change. Everything else in the IODF is fine, just a 
name problem. Current hardware and software. 
I changed the name in HCD. When I tried to ACTIVATE the new IODF, it 
choked on the name mismatch. I gather that I can first rename to '*', then 
rename for real in two successive IODFs. If I do that, do I preserve all 
original chpid and device connections? I don't want to start over from 
scratch when only the name is wrong. 

.
.
JO.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

--
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


Only 2 1/2 weeks left! Registration closes at 23:59, May 31 for the 2013 VM Workshop in Indianapolis.

2013-05-10 Thread Mike Walter
Cross-posted to the IBMVM, Linux-390, and IBM-MAIN discussion lists.

The registration deadline is set hard and fast as the end of day May 31, 2013 
due to Indiana University - Purdue University Indianapolis (IUPUI) deadlines.  
Don't delay (besides, the Hand-on Labs will reach their maximum capacity of 30 
each rather quickly).

So you're the one who's been sitting on the fence while trying to decide 
whether to come down on the side of attending the 2013 VM Workshop in 
Indianapolis this year (Thurs June 20-Sat June 22).  Perhaps you wanted to be 
sure that the sessions are valuable to you?  You may now view each speaker's  
full session description by visiting the current session agenda and schedule 
at: http://www.vmworkshop.org/2013/agenda

Of course you already know:

* the 2013 VM Workshop registration fee is only $100, and

* BRAND NEW double occupancy dorm rooms can be reserved as a 3-night 
package for $150 (with additional nights at $50 each), and

* reduced rate Parking passes are available for $20 (a $10 discount), 
and

* a lavish Thursday evening reception and dinner is included, and

* a $65 IUPUI debit card for meals in the Campus Center is included, and

* the famous VM Workshop Ugly Hawaiian Shirt Contest us included 
(BYOUHS), and

* famous and infamous speakers delivering up-to-date technical sessions 
on z/VM and Linux on System z topics
all centrally located on the IUPUI campus in downtown Indianapolis, Indiana.

All 37 session slots are now 100% full.  There have been rumors of a few late 
sessions, so some of those below might be replaced by newer sessions of more 
general appeal, and/or... session times adjusted.

You may view each speaker's  full session descriptions by visiting the current 
session agenda and schedule at: http://www.vmworkshop.org/2013/agenda

To learn more about the 2013 VM Workshop, visit:  http://www.vmworkshop.org/2013
You can review all public information at that URL, but to register you'll first 
need to request a VM Workshop ID (used only to minimize spambot attacks on the 
web site).  Once you have been manually granted an ID by an admin, you may 
register for, and pay for (via Paypal) your purchases.

Note: There are only 15 IBM-provided Hands-on-lab laptops at each of the 
non-concurrent 'z/VM Install  Config',  and 'Linux on System z Install  
Config' labs.  Once you have received a workshop ID, you may reserve a seat at 
one and/or the other labs (maximum attendee reservations for each lab = 30).

Best regards,

Mike Walter
On behalf of the 2013 VM Workshop Volunteer Committee



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


Re: Renaming an LPAR dynamically

2013-05-10 Thread Staller, Allan
Last I heard, the LPAR must be deactivated/renamed/ activated

HTH,

I've poked around and not found a concise explanation. We have an LPAR whose 
name needs to change. Everything else in the IODF is fine, just a name problem. 
Current hardware and software. 
I changed the name in HCD. When I tried to ACTIVATE the new IODF, it choked on 
the name mismatch. I gather that I can first rename to '*', then rename for 
real in two successive IODFs. If I do that, do I preserve all original chpid 
and device connections? I don't want to start over from scratch when only the 
name is wrong. 
/snip
.

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


Re: Renaming an LPAR dynamically

2013-05-10 Thread Alan Field
Skip,

I recall trying this once. When I converted the name to * it lost all the 
chpid/device info. 

I decided that the function was pretty useless (as far as renaming an 
lpar) is concerned. 

Alan Field
Technical Engineer Principal
BCBS Minnesota

Phone: 651.662.3546  Mobile:  651.428.8826





From:   Skip Robinson jo.skip.robin...@sce.com
To: IBM-MAIN@LISTSERV.UA.EDU, 
Date:   05/10/2013 09:48
Subject:Renaming an LPAR dynamically
Sent by:IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU



I've poked around and not found a concise explanation. We have an LPAR 
whose name needs to change. Everything else in the IODF is fine, just a 
name problem. Current hardware and software. 
I changed the name in HCD. When I tried to ACTIVATE the new IODF, it 
choked on the name mismatch. I gather that I can first rename to '*', then 

rename for real in two successive IODFs. If I do that, do I preserve all 
original chpid and device connections? I don't want to start over from 
scratch when only the name is wrong. 

.
.
JO.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

--
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


Datasets not hsm migrating

2013-05-10 Thread Michael Bieganski
Hi,
I have a number of datasets whose management class reflects Primary Days of
2 and yet after 2 weeks of non-reference, they still are on dasd.  Cmd/Auto
Migrate is set to BOTH, Auto-Backup set to No.
I can hmigrate it in ispf 3.4 ok to ml2, but wondering why auto-migration
is not kicking in.
Is there a setting that regulates that a dataset will not auto-migrate if
in fact no backup exists?
(but apparently has no qualms about manually hmig'ing it?)

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


Re: ICETOOL question

2013-05-10 Thread Sri h Kolusu
K,

The following DFSORT JCL will give you the desired results. The trick here 
is to use the same input file twice with Joinkeys. Looking at the your 
expected results, I also rounded the decimal.

//STEP0100 EXEC PGM=SORT 
//SYSOUT   DD SYSOUT=* 
//IN1  DD * 
AAA 
BBB 
AAA 
CCC 
AAA 
BBB 
//IN2  DD * 
AAA 
BBB 
AAA 
CCC 
AAA 
BBB 
//SORTOUT  DD SYSOUT=* 
//SYSINDD* 
  JOINKEYS F1=IN1,FIELDS=(4,1,A),SORTED,NOSEQCK 
  JOINKEYS F2=IN2,FIELDS=(1,1,A) 
  REFORMAT FIELDS=(F1:1,4,F2:2,8) 
 
  SORT FIELDS=(1,3,CH,A) 
 
  OUTREC IFTHEN=(WHEN=GROUP,KEYBEGIN=(1,3),PUSH=(14:SEQ=8)), 
  IFTHEN=(WHEN=INIT, 
  OVERLAY=(25:(14,8,ZD,MUL,+1),DIV,5,8,ZD,EDIT=(IIT,TT))), 
  IFTHEN=(WHEN=(30,1,ZD,GT,5),OVERLAY=(29:29,1,ZD,ADD,+1,EDIT=(T)))
 
  OUTFIL REMOVECC,NODETAIL,BUILD=(80X), 
  SECTIONS=(1,3,TRAILER3=(1,4,25,5)) 
//* 
//JNF1CNTL DD * 
  INREC FIELDS=(1,3,X) 
//*
//JNF2CNTL DD * 
  INREC FIELDS=(X,7C'0',C'1') 
  SUM FIELDS=(2,8,ZD) 
//* 

The output from this job is 

AAA  50,0
BBB  33,3
CCC  16,7

Hope this helps...
Kolusu
DFSORT Development
IBM Corporation
IBM Mainframe Discussion List IBM-MAIN@listserv.ua.edu wrote on 
05/10/2013 06:53:40 AM:

 From: K kzafi...@gmail.com
 To: IBM-MAIN@listserv.ua.edu, 
 Date: 05/10/2013 07:01 AM
 Subject: ICETOOL question
 Sent by: IBM Mainframe Discussion List IBM-MAIN@listserv.ua.edu
 
 Hi dear all,
 
 I would like to produce a statistic report using ICETOOL. This 
 report should shown the percentage of records in the file according 
 to their values e.g.
 
 Input:
 
 AAA
 BBB
 AAA
 CCC
 AAA
 BBB
 
 Output Percentages:
 
 AAA 50,0
 BBB 33,0
 CCC 16,7
 
 Is there any ICETOOL operator (like OCCUR) to find out the above 
 percentage? Do I have to use various INCLUDE COND and then read the 
 DFSMSG to extract percentages (from ICE054I 0 RECORDS - IN: xxx, OUT: 
yyy) ?
 
 Thanks in advance
 
 Kzafirop at gmail dot com
 
 --
 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: Datasets not hsm migrating

2013-05-10 Thread Staller, Allan
1) Check the AUTOMIGRATE setting on the STORAGE GROUP

2) Check the high/low thresholds on the storage group. If the volume does not 
exceed  the high threshold, migration will not occur.
If migration does occur, the datasets will be migrated in chronological order 
(oldest to newest) and it may not get that far if there are still older 
datasets to be migrated.

3) Check the settings for automig start times


BTW, datasets can be migrated regardless of backup status. By default the will 
not be automatically deleted unless there is a backup.
There is a patch avail to allow deletion of datasets w/o requiring a backup.

HTH, 
 
snip
I have a number of datasets whose management class reflects Primary Days of
2 and yet after 2 weeks of non-reference, they still are on dasd.  Cmd/Auto 
Migrate is set to BOTH, Auto-Backup set to No.
I can hmigrate it in ispf 3.4 ok to ml2, but wondering why auto-migration is 
not kicking in.
Is there a setting that regulates that a dataset will not auto-migrate if in 
fact no backup exists?
(but apparently has no qualms about manually hmig'ing it?)
/snip

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


Re: Datasets not hsm migrating

2013-05-10 Thread Craig . Pace
Is automigration running?

 
 
 
 
 
Thanks,
 
Craig
 
 
 



From:   Michael Bieganski mbiegans...@gmail.com
To: IBM-MAIN@LISTSERV.UA.EDU, 
Date:   05/10/2013 10:59
Subject:Datasets not hsm migrating
Sent by:IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU



Hi,
I have a number of datasets whose management class reflects Primary Days 
of
2 and yet after 2 weeks of non-reference, they still are on dasd. Cmd/Auto
Migrate is set to BOTH, Auto-Backup set to No.
I can hmigrate it in ispf 3.4 ok to ml2, but wondering why auto-migration
is not kicking in.
Is there a setting that regulates that a dataset will not auto-migrate if
in fact no backup exists?
(but apparently has no qualms about manually hmig'ing it?)

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


**
This communication contains information which is confidential and
may also be privileged. It is for the exclusive use of the intended
recipient(s). If you are not the intended recipient(s), please note
that any distribution, copying or use of this communication or the
information in it is strictly prohibited. If you have received this
communication in error, please notify the sender immediately and
then destroy any copies of it.
**

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


Re: Renaming an LPAR dynamically

2013-05-10 Thread R.S.

W dniu 2013-05-10 16:48, Skip Robinson pisze:

I've poked around and not found a concise explanation. We have an LPAR
whose name needs to change. Everything else in the IODF is fine, just a
name problem. Current hardware and software.
I changed the name in HCD. When I tried to ACTIVATE the new IODF, it
choked on the name mismatch. I gather that I can first rename to '*', then
rename for real in two successive IODFs. If I do that, do I preserve all
original chpid and device connections? I don't want to start over from
scratch when only the name is wrong.


I think that it is impossible.

BTW: WHY?
Why do you need to change LPAR name?

The only thing I can imagine (except naming convention, and aesthethics) 
*was* requirement for zNALC (and previously for z/OS.e) which required 
lparname to begin with some string (ZNAL and ZOSE).



--
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, 00-950 Warszawa, ul. Senatorska 18, tel. +48 (22) 829 00 00, fax 
+48 (22) 829 00 33, www.brebank.pl, e-mail: i...@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 01.01.2013 r. kapita zakadowy BRE Banku SA (w caoci wpacony) wynosi 168.555.904 zotych.



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


ServiceLink hosed?

2013-05-10 Thread Thomas Conley
Every time I click on something it ServiceLink, it keeps blowing me back 
to the signon page.  Anybody else having issues?


Regards,
Tom Conley

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


Following up on Rexx and Metal C

2013-05-10 Thread Charles Mills
I posted some questions here in late March about linking Rexx and Metal C. I
got some good input, and I promised to keep this list informed of what
worked out.

Well, the project is on indefinite hold, so I won't have any solid feedback
for the foreseeable future.

You may recall the problem I was trying to solve was how can I write a
common function for both a C++ program and a compiled Rexx program? I want
to write it in a higher level language, and call it repeatedly from the Rexx
program without going through LE initialization every time.

FWIW, here is what I decided to do (before the project got quashed). I
decided to write the function in C conformant with the rules for Metal C. I
was then going to compile it in standard C and link it with the C++ code,
and compile it with Metal C to link with the Rexx code. (Yes, I am aware of
various linkage issues -- and their solutions.) If I wanted to for debug
purposes I could stick printf()'s and the like into the code under standard
C and either delete them or bracket them with #ifdef's before compiling
under Metal C. 

(Anyone who wants to offer thoughts is welcome to do so but please note I am
not really looking for suggestions at this time as the project is on
indefinite hold.)

Charles 

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


Help with IBM Session Mgr Script

2013-05-10 Thread Hansen, Dave L - Eagan, MN
Fellow Scripters,

   We are running z/OS V1R13 and IBM Session Manager (ISM) 3.100B.  Currently 
there is an OPEN APAR PM86725 regarding using the wrong logmode for mod 5 
terminals.  The users are complaining it takes too long to logon so I have been 
looking at our TSO LOGON script and I have a few questions.  I do not see 
anything in our scripts checking if t_model is set to 5.  But I am seeing a 
difference between SNA and NON-SNA.  Years ago there was real 3270 CUT, DFT 
etc.  I guess I look at the session manager like my old NCR/COMTEN NCP.  The 
remote network was SNA and the host was not.  SRM resided in an NCR Comten 
Communications Processor (CP) where it performs switching functions that allow 
BSC and SNA 3270 devices to communicate selectively with any of up to 31 
different host access methods.  Currently terminals bind to the session manager 
from TN3270 which can be SNA or not.  Once at the session manager main screen 
you can select your logmode to the application which can be SNA or not.  I 
mainly use D4A32793 which is SNA.  I can also use D4B32793 which is not SNA.  
The application works fine with the terminal and I don't see a difference 
between the logmodes when binding to the application.  Here is what we have in 
our TSO LOGON script:

   First part of current script - Enter our userid:
  Domax 10 appltime 10
  Do until found
 Waitappl
 If noresp
Let t_message = 'Timed out - User prompt'
Endsess
Return
  End
  Outscan 'ENTER'
  End

   The next section is supposedly required for NON-SNA for a write to restore 
the keyboard:
 If s_sna = 'N'
Waitappl
 End
  Input sba 2 1 text t_user
 Key enter

I don't see any examples in the book regarding S for ACTIVE SNA sessions or 
N for ACTIVE NON-SNA sessions.  A WAITAPPL is getting output from the APPL.

Q).  Do I need this Waitappl for NON-SNA sessions?



The First part (above) entered the TSO userid.  The second part (not shown) is 
just like the First part except it enters the password and does an outscan for 
'TSO/E LOGON'.  The next section has code for both SNA and NON-SNA.  I assume 
the pause is for the operator to see the screen.  The users are complaining 
about slow response time so I was going to remove it.

   Do until found
  If s_sna = 'S'
 Waitappl DISPLAY
 Pause 2
  Else
 Waitappl
  End
  If noresp
 Endsess
 Return
  End
  ..(other code) 
   End

So for ACTIVE NON-SNA sessions I once again do a waitappl.  But what's 
different is for ACTIVE SNA sessions.  For these I see a waitappl DISPLAY and a 
pause.  The waitappl is the last waitappl so it will default to DISPLAY.

Q).  Why do I need a waitappl for both the ACTIVE SNA and ACTIVE NON-SNA 
sessions when in the First part (above) we only do a waitappl for ACTIVE 
NON-SNA sessions?



  Have a great weekend,  Dave




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


ML1 to ML2

2013-05-10 Thread Mark Pace
A few months ago we removed out 3494 tape library.
So I defined a bunch of 3390-54 DASD and moved all the ML2 data to ML1
DASD.  We recenly installed a virtual tape system and now I want to move
all of that ML1 back to ML2 tape.

I've gone back through our old ARCCMDxx and updated the new one to enable
ML2 tape again.
Went through SMS and re-added everything tape relates.

So now I want to move the data from ML1 to ML2 and tried this command.
hsend freevol mvol(big000) targetlevel(ml2(tape))
But all the datasets are moved from BIG000 to another DASD volumes, not
tape.

so then I tried a single dataset
hsend migrate dsname(MARPACE.Z114.IOCP) ml2
ARC1001I MARPACE.Z114.IOCP MIGRATE FAILED, RC=0034, REAS=
ARC1234I LEVEL 2 NOT DEFINED FOR MIGRATION
ARC1007I COMMAND REQUEST 3387 SENT TO DFSMSHSM

Level 2 not defined?  From my ARCCMDxx
 SETSYS
   TAPEMIGRATION(ML2TAPE(TAPE(TAPELIB)) RECONNECT(ALL))
/* TAPEMIGRATION(DIRECT(TAPE(TAPELIB)) RECONNECT(ALL)) */

I tried both of these parameters, but neither worked.  I know this has to
be something super easy and that's why I'm over looking it.

-- 
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: ML1 to ML2

2013-05-10 Thread Staller, Allan
F DFHSM,Q SETSYS will verify.

SETSYS
   TAPEMIGRATION(ML2TAPE(TAPE(TAPELIB)) RECONNECT(ALL))

s/b

SETSYS   +   (note plus sign = Continuation character)
   TAPEMIGRATION(ML2TAPE(TAPE(TAPELIB)) RECONNECT(ALL))




Al Staller | Z Systems Programmer | KBM Group | (Tel) 972 664-3565 | 
allan.stal...@kbmg.com


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Mark Pace
Sent: Friday, May 10, 2013 2:13 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: ML1 to ML2

A few months ago we removed out 3494 tape library.
So I defined a bunch of 3390-54 DASD and moved all the ML2 data to ML1 DASD.  
We recenly installed a virtual tape system and now I want to move all of that 
ML1 back to ML2 tape.

I've gone back through our old ARCCMDxx and updated the new one to enable
ML2 tape again.
Went through SMS and re-added everything tape relates.

So now I want to move the data from ML1 to ML2 and tried this command.
hsend freevol mvol(big000) targetlevel(ml2(tape)) But all the datasets are 
moved from BIG000 to another DASD volumes, not tape.

so then I tried a single dataset
hsend migrate dsname(MARPACE.Z114.IOCP) ml2 ARC1001I MARPACE.Z114.IOCP MIGRATE 
FAILED, RC=0034, REAS= ARC1234I LEVEL 2 NOT DEFINED FOR MIGRATION ARC1007I 
COMMAND REQUEST 3387 SENT TO DFSMSHSM

Level 2 not defined?  From my ARCCMDxx
 SETSYS
   TAPEMIGRATION(ML2TAPE(TAPE(TAPELIB)) RECONNECT(ALL))
/* TAPEMIGRATION(DIRECT(TAPE(TAPELIB)) RECONNECT(ALL)) */

I tried both of these parameters, but neither worked.  I know this has to be 
something super easy and that's why I'm over looking it.

--
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: ServiceLink hosed?

2013-05-10 Thread Bob Rutledge

Thomas Conley wrote:
Every time I click on something it ServiceLink, it keeps blowing me back 
to the signon page.  Anybody else having issues?


Tom,

I don't do ServiceLink but other authentications, e.g. Sign in with your IBM 
ID, are returning We're sorry, there has been a problem while signing in. 
Please try again later.  Sooner or later they'll figure out this single-sign-on 
thing.


Bob

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


Re: ServiceLink hosed?

2013-05-10 Thread Staller, Allan
At the risk of repeating myself,

The new utilities are (ServiceLink, SR, Single Signon,...) are neither as 
Reliable, or Available as their predecessors.
They do not perform as well as their predecessors, either.

snip

Thomas Conley wrote:
 Every time I click on something it ServiceLink, it keeps blowing me 
 back to the signon page.  Anybody else having issues?

Tom,

I don't do ServiceLink but other authentications, e.g. Sign in with your IBM 
ID, are returning We're sorry, there has been a problem while signing in. 
Please try again later.  Sooner or later they'll figure out this 
single-sign-on thing.
/snip

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


Re: ServiceLink hosed?

2013-05-10 Thread Thomas Conley

On 5/10/2013 3:34 PM, Bob Rutledge wrote:

Thomas Conley wrote:

Every time I click on something it ServiceLink, it keeps blowing me
back to the signon page.  Anybody else having issues?


Tom,

I don't do ServiceLink but other authentications, e.g. Sign in with
your IBM ID, are returning We're sorry, there has been a problem while
signing in. Please try again later.  Sooner or later they'll figure out
this single-sign-on thing.

Bob



Bob,

That's exactly the error I'm getting.  24/7 my a$$.

Tom

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


Re: ML1 to ML2

2013-05-10 Thread Mark Pace
TAPEMIGRATION=NONE(ROUTETOTAPE(ANY)), MIGDENSITY=*, MIGUNIT=3590-1,
(CONT.) ML2 RECYCLE PERCENTAGE=080%, TAPEMAXRECALLTASKS=01, ML2
(CONT.) PARTIALS NOT ASSOCIATED GOAL=000, RECONNECT(ALL)

I had cut off part of the command  there is a minus sign way out at the
end.  The comment is currently incorrect.  But according that that query
command it appears that tape migration is off.

  SETSYS  /* NO ML2 MIGRATION  */ -
TAPEMIGRATION(ML2TAPE(TAPE(TAPELIB)) RECONNECT(ALL))
 /* TAPEMIGRATION(DIRECT(TAPE(TAPELIB)) RECONNECT(ALL)) */


On Fri, May 10, 2013 at 3:32 PM, Staller, Allan allan.stal...@kbmg.comwrote:

 F DFHSM,Q SETSYS will verify.

 SETSYS
TAPEMIGRATION(ML2TAPE(TAPE(TAPELIB)) RECONNECT(ALL))

 s/b

 SETSYS   +   (note plus sign = Continuation character)
TAPEMIGRATION(ML2TAPE(TAPE(TAPELIB)) RECONNECT(ALL))




 Al Staller | Z Systems Programmer | KBM Group | (Tel) 972 664-3565 |
 allan.stal...@kbmg.com


 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
 Behalf Of Mark Pace
 Sent: Friday, May 10, 2013 2:13 PM
 To: IBM-MAIN@LISTSERV.UA.EDU
 Subject: ML1 to ML2

 A few months ago we removed out 3494 tape library.
 So I defined a bunch of 3390-54 DASD and moved all the ML2 data to ML1
 DASD.  We recenly installed a virtual tape system and now I want to move
 all of that ML1 back to ML2 tape.

 I've gone back through our old ARCCMDxx and updated the new one to enable
 ML2 tape again.
 Went through SMS and re-added everything tape relates.

 So now I want to move the data from ML1 to ML2 and tried this command.
 hsend freevol mvol(big000) targetlevel(ml2(tape)) But all the datasets are
 moved from BIG000 to another DASD volumes, not tape.

 so then I tried a single dataset
 hsend migrate dsname(MARPACE.Z114.IOCP) ml2 ARC1001I MARPACE.Z114.IOCP
 MIGRATE FAILED, RC=0034, REAS= ARC1234I LEVEL 2 NOT DEFINED FOR
 MIGRATION ARC1007I COMMAND REQUEST 3387 SENT TO DFSMSHSM

 Level 2 not defined?  From my ARCCMDxx
  SETSYS
TAPEMIGRATION(ML2TAPE(TAPE(TAPELIB)) RECONNECT(ALL))
 /* TAPEMIGRATION(DIRECT(TAPE(TAPELIB)) RECONNECT(ALL)) */

 I tried both of these parameters, but neither worked.  I know this has to
 be something super easy and that's why I'm over looking it.

 --
 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: ML1 to ML2

2013-05-10 Thread Mark Pace
Hmm - I changed

 SETSYS -
   TAPEMIGRATION(ML2TAPE(TAPE(TAPELIB)) RECONNECT(ALL))

 SETSYS -
   TAPEMIGRATION(ML2TAPE RECONNECT(ALL))

And now it works.




On Fri, May 10, 2013 at 3:42 PM, Mark Pace pacemainl...@gmail.com wrote:

 TAPEMIGRATION=NONE(ROUTETOTAPE(ANY)), MIGDENSITY=*, MIGUNIT=3590-1,
 (CONT.) ML2 RECYCLE PERCENTAGE=080%, TAPEMAXRECALLTASKS=01, ML2
 (CONT.) PARTIALS NOT ASSOCIATED GOAL=000, RECONNECT(ALL)

 I had cut off part of the command  there is a minus sign way out at the
 end.  The comment is currently incorrect.  But according that that query
 command it appears that tape migration is off.

   SETSYS  /* NO ML2 MIGRATION  */ -

 TAPEMIGRATION(ML2TAPE(TAPE(TAPELIB)) RECONNECT(ALL))
  /* TAPEMIGRATION(DIRECT(TAPE(TAPELIB)) RECONNECT(ALL)) */



 On Fri, May 10, 2013 at 3:32 PM, Staller, Allan allan.stal...@kbmg.comwrote:

 F DFHSM,Q SETSYS will verify.

 SETSYS
TAPEMIGRATION(ML2TAPE(TAPE(TAPELIB)) RECONNECT(ALL))

 s/b

 SETSYS   +   (note plus sign = Continuation character)
TAPEMIGRATION(ML2TAPE(TAPE(TAPELIB)) RECONNECT(ALL))




 Al Staller | Z Systems Programmer | KBM Group | (Tel) 972 664-3565 |
 allan.stal...@kbmg.com


 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
 Behalf Of Mark Pace
 Sent: Friday, May 10, 2013 2:13 PM
 To: IBM-MAIN@LISTSERV.UA.EDU
 Subject: ML1 to ML2

 A few months ago we removed out 3494 tape library.
 So I defined a bunch of 3390-54 DASD and moved all the ML2 data to ML1
 DASD.  We recenly installed a virtual tape system and now I want to move
 all of that ML1 back to ML2 tape.

 I've gone back through our old ARCCMDxx and updated the new one to enable
 ML2 tape again.
 Went through SMS and re-added everything tape relates.

 So now I want to move the data from ML1 to ML2 and tried this command.
 hsend freevol mvol(big000) targetlevel(ml2(tape)) But all the datasets
 are moved from BIG000 to another DASD volumes, not tape.

 so then I tried a single dataset
 hsend migrate dsname(MARPACE.Z114.IOCP) ml2 ARC1001I MARPACE.Z114.IOCP
 MIGRATE FAILED, RC=0034, REAS= ARC1234I LEVEL 2 NOT DEFINED FOR
 MIGRATION ARC1007I COMMAND REQUEST 3387 SENT TO DFSMSHSM

 Level 2 not defined?  From my ARCCMDxx
  SETSYS
TAPEMIGRATION(ML2TAPE(TAPE(TAPELIB)) RECONNECT(ALL))
 /* TAPEMIGRATION(DIRECT(TAPE(TAPELIB)) RECONNECT(ALL)) */

 I tried both of these parameters, but neither worked.  I know this has to
 be something super easy and that's why I'm over looking it.

 --
 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






-- 
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


C question -- not sure where to ask it

2013-05-10 Thread Scott Ford
All:
 
I am writing a routing and want to use type=memory files in C and this is what 
i tried...
 
 
  char buffer[80];
  char buffout[80];
  char lineout[121];
  int rctr;
  int wctr;
  fobj = fopen(file.data,w,type=memory);
  if(fobj != NULL)
  printf(FOBJ  File Open at: %s\n,time_of_day_now);
  rdr = fopen(DD:TEST1,r,blksize=80,recfm=f);
  if(rdr != NULL)
  printf(TEST1 File Open at: %s\n,time_of_day_now);
    while(fgets(buffer,80,rdr) != NULL)
  {
 rctr++;
 printf(rec %i %s\n,rctr,buffer);
 wctr++;
 memset(buffout,'',sizeof(buffout));
 strcpy(buffout,\n);
 fwrite(buffout,1,80,fobj);
 wctr++;
  }
 fclose(rdr);
 fclose(fobj);
 printf(TEST1 File closed at: %s\n,time_of_day_now);
 printf(FOBJ  File closed at: %s\n,time_of_day_now);
 printf(TEST1 records read:    %i\n,rctr);
 printf(TEST1 records written: %i\n,wctr);
 rctr = 0;
 fobj = fopen(file.data,r,type=memory);
 memset(buffer,' ',sizeof(buffer));
 while(fread(buffer,80,1,fobj) == 1)
 {
    rctr++;
    printf(rec %i %s\n,rctr,buffer);
   if (feof(fobj))
 {
  break;
 }
 }
 fclose(fobj);
} 

The fread is yielding no output just spaces ...so i must be misunderstanding 
something
Can someone be so kind as to shed some light on this for me ..

thanks

Scott J Ford
Software Engineer
http://www.identityforge.com/

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


Re: ML1 to ML2

2013-05-10 Thread Mark Pace
Yes - those are defined.  They worked previously.  The only difference I
can determine is that the old 3494 was an automated tape library, and the
new VTS is a manual tape library.

No I have to qualify that it worked.

This command worked.
hsend migrate dsname(MARPACE.Z114.IOCP) ml2


This command did not work. Once again it just moved datasets on that ML1
volume to another DASD volume, not to tape.
hsend freevol mvol(big000) targetlevel(ml2(tape))




On Fri, May 10, 2013 at 4:01 PM, Staller, Allan allan.stal...@kbmg.comwrote:

 The parameter TAPE(TAPELIB) is used to provide an esoteric name.
 Was TAPELIB a valid esoteric?

 This name must also be in the USERUNITTABLE. Otherwise, IIRC, only IBM
 generics can be used (e.g. 3590-1)

 e.g. SETSYS USERUNITTABLE(ECART,FAST,9940B,VIRT)

 HTH,

 snip
 Hmm - I changed

  SETSYS -
TAPEMIGRATION(ML2TAPE(TAPE(TAPELIB)) RECONNECT(ALL))

  SETSYS -
TAPEMIGRATION(ML2TAPE RECONNECT(ALL))

 And now it works.
 /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: ML1 to ML2

2013-05-10 Thread Mark Pace
Okay - after a little more research on the ADDVOL command I think I am now
up against an SMS problem.  I thought I had put all the Management Class
back to the way they were before, but I'm thinking I still have something
wrong.


On Fri, May 10, 2013 at 4:05 PM, Mark Pace pacemainl...@gmail.com wrote:

 Yes - those are defined.  They worked previously.  The only difference I
 can determine is that the old 3494 was an automated tape library, and the
 new VTS is a manual tape library.

 No I have to qualify that it worked.

 This command worked.
 hsend migrate dsname(MARPACE.Z114.IOCP) ml2


 This command did not work. Once again it just moved datasets on that ML1
 volume to another DASD volume, not to tape.
 hsend freevol mvol(big000) targetlevel(ml2(tape))




 On Fri, May 10, 2013 at 4:01 PM, Staller, Allan allan.stal...@kbmg.comwrote:

 The parameter TAPE(TAPELIB) is used to provide an esoteric name.
 Was TAPELIB a valid esoteric?

 This name must also be in the USERUNITTABLE. Otherwise, IIRC, only IBM
 generics can be used (e.g. 3590-1)

 e.g. SETSYS USERUNITTABLE(ECART,FAST,9940B,VIRT)

 HTH,

 snip
 Hmm - I changed

  SETSYS -
TAPEMIGRATION(ML2TAPE(TAPE(TAPELIB)) RECONNECT(ALL))

  SETSYS -
TAPEMIGRATION(ML2TAPE RECONNECT(ALL))

 And now it works.
 /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






-- 
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: ML1 to ML2

2013-05-10 Thread Staller, Allan
I'm out of ideas here.

snip

Yes - those are defined.  They worked previously.  The only difference I can 
determine is that the old 3494 was an automated tape library, and the new VTS 
is a manual tape library.

No I have to qualify that it worked.

This command worked.
hsend migrate dsname(MARPACE.Z114.IOCP) ml2


This command did not work. Once again it just moved datasets on that ML1 volume 
to another DASD volume, not to tape.
hsend freevol mvol(big000) targetlevel(ml2(tape))

/snip
 The parameter TAPE(TAPELIB) is used to provide an esoteric name.
 Was TAPELIB a valid esoteric?

 This name must also be in the USERUNITTABLE. Otherwise, IIRC, only IBM 
 generics can be used (e.g. 3590-1)

 e.g. SETSYS USERUNITTABLE(ECART,FAST,9940B,VIRT)

 HTH,

 snip
 Hmm - I changed

  SETSYS -
TAPEMIGRATION(ML2TAPE(TAPE(TAPELIB)) RECONNECT(ALL))

  SETSYS -
TAPEMIGRATION(ML2TAPE RECONNECT(ALL))

 And now it works.
 /snip

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


Re: ML1 to ML2

2013-05-10 Thread Mark Pace
What I want to have happen
All migrations go directly to tape, no longer go to ML1 DASD.  But I still
have a lot of migrated data on ML1 I need to get to ML2.  For that I
suppose I can wait for it to roll off to ML2.

I changed the TAPEMIGRATION( DIRECT)  thinking that anything that migrated
from this point forward would go to ML2 and not ML1.  But, nope, issued an
HMIG command against a dataset and it went to ML1.

Guess I'll start fresh on Monday.  :(




On Fri, May 10, 2013 at 4:35 PM, Staller, Allan allan.stal...@kbmg.comwrote:

 I'm out of ideas here.

 snip

 Yes - those are defined.  They worked previously.  The only difference I
 can determine is that the old 3494 was an automated tape library, and the
 new VTS is a manual tape library.

 No I have to qualify that it worked.

 This command worked.
 hsend migrate dsname(MARPACE.Z114.IOCP) ml2


 This command did not work. Once again it just moved datasets on that ML1
 volume to another DASD volume, not to tape.
 hsend freevol mvol(big000) targetlevel(ml2(tape))

 /snip
  The parameter TAPE(TAPELIB) is used to provide an esoteric name.
  Was TAPELIB a valid esoteric?
 
  This name must also be in the USERUNITTABLE. Otherwise, IIRC, only IBM
  generics can be used (e.g. 3590-1)
 
  e.g. SETSYS USERUNITTABLE(ECART,FAST,9940B,VIRT)
 
  HTH,
 
  snip
  Hmm - I changed
 
   SETSYS -
 TAPEMIGRATION(ML2TAPE(TAPE(TAPELIB)) RECONNECT(ALL))
 
   SETSYS -
 TAPEMIGRATION(ML2TAPE RECONNECT(ALL))
 
  And now it works.
  /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: Renaming an LPAR dynamically

2013-05-10 Thread Skip Robinson
In the absence of encouraging advice, I went ahead and PORed the CEC, 
which implemented the correct LPAR name. It's a new machine with no 
production images yet, so no loss. I was hoping to learn something for a 
future case where POR would be highly unwelcome. Oh well. 

.
.
JO.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



From:   Alan Field alan_c_fi...@bluecrossmn.com
To: IBM-MAIN@LISTSERV.UA.EDU, 
Date:   05/10/2013 08:39 AM
Subject:Re: Renaming an LPAR dynamically
Sent by:IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU



Skip,

I recall trying this once. When I converted the name to * it lost all the 
chpid/device info. 

I decided that the function was pretty useless (as far as renaming an 
lpar) is concerned. 

Alan Field
Technical Engineer Principal
BCBS Minnesota

Phone: 651.662.3546  Mobile:  651.428.8826





From:   Skip Robinson jo.skip.robin...@sce.com
To: IBM-MAIN@LISTSERV.UA.EDU, 
Date:   05/10/2013 09:48
Subject:Renaming an LPAR dynamically
Sent by:IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU



I've poked around and not found a concise explanation. We have an LPAR 
whose name needs to change. Everything else in the IODF is fine, just a 
name problem. Current hardware and software. 
I changed the name in HCD. When I tried to ACTIVATE the new IODF, it 
choked on the name mismatch. I gather that I can first rename to '*', then 


rename for real in two successive IODFs. If I do that, do I preserve all 
original chpid and device connections? I don't want to start over from 
scratch when only the name is wrong. 

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


Volume Count - ZFS

2013-05-10 Thread mf db
Hello,

I am just trying to create a ZFS with a Volume Count of 4 but I dont see
these Option while creating using ISHELL. I am i missing something ?

Could someone shed light on the above.

/Peter

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


Re: Volume Count - ZFS

2013-05-10 Thread Lizette Koehler
Batch might work better

//STEP1  EXEC  PGM=IDCAMS  
//SYSPRINT  DD  SYSOUT=*   
//SYSIN   DD  *
DEFINE CLUSTER(NAME(MY.NEW.ZFS) VOLUMES(*) - 
   LINEAR CYLINDERS(20   30 ) SHAREOPTIONS(2) )
//FORMAT EXEC  PGM=IOEAGFMT,REGION=0M, 
//   PARM=('-aggregate MY.NEW.ZFS -compat')  
//STEPLIB   DD  DISP=SHR,DSN=SYS1.SIOELMOD 
//SYSPRINT  DD  SYSOUT=*   
//STDOUTDD  SYSOUT=*   
//STDERRDD  SYSOUT=*   
//SYSUDUMP  DD  SYSOUT=*   
//CEEDUMP   DD  SYSOUT=*


Lizette

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of mf db
Sent: Friday, May 10, 2013 7:05 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Volume Count - ZFS

Hello,

I am just trying to create a ZFS with a Volume Count of 4 but I dont see
these Option while creating using ISHELL. I am i missing something ?

Could someone shed light on the above.

/Peter

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


Interesting slashdot thread about why companies don't upgrade

2013-05-10 Thread Phil Smith
Some of it applies to z, too: 
http://ask.slashdot.org/story/13/05/08/002258/ask-slashdot-why-wont-companies-upgrade-old-software

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


Re: C question -- not sure where to ask it

2013-05-10 Thread Bill Godfrey
On Fri, 10 May 2013 13:04:12 -0700, Scott Ford wrote:

All:

I am writing a routing and want to use type=memory files in C and this is what 
i tried...


These 3 lines:

memset(buffout,'',sizeof(buffout));
strcpy(buffout,\n);
fwrite(buffout,1,80,fobj);

will write \n followed by 79 '\0'.

Is that what you intended?

Bill

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


Re: Interesting slashdot thread about why companies don't upgrade

2013-05-10 Thread Mike Schwab
Yep.  We have some hardware devices that require DOS or Win 3.1.  No
drivers for a later version available.

On Fri, May 10, 2013 at 9:37 PM, Phil Smith p...@voltage.com wrote:
 Some of it applies to z, too: 
 http://ask.slashdot.org/story/13/05/08/002258/ask-slashdot-why-wont-companies-upgrade-old-software

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



-- 
Mike A Schwab, Springfield IL USA
Where do Forest Rangers go to get away from it all?

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


Re: C question -- not sure where to ask it

2013-05-10 Thread Scott Ford
Bill,

Your right ...a big Ty

Scott ford
www.identityforge.com
from my IPAD

'Infinite wisdom through infinite means'


On May 10, 2013, at 10:38 PM, Bill Godfrey yak36...@yahoo.com wrote:

 On Fri, 10 May 2013 13:04:12 -0700, Scott Ford wrote:
 
 All:
 
 I am writing a routing and want to use type=memory files in C and this is 
 what i tried...
 
 
 These 3 lines:
 
memset(buffout,'',sizeof(buffout));
strcpy(buffout,\n);
fwrite(buffout,1,80,fobj);
 
 will write \n followed by 79 '\0'.
 
 Is that what you intended?
 
 Bill
 
 --
 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