Re: Loyalty

[Edward Finnell]

Yeah, but sometimes I just gets distracted...
 
http://digg.com/video/mia-westminster-dog-show-beagle-distracted
 
 
In a message dated 2/13/2017 9:49:46 A.M. Central Standard Time,  
r.skoru...@bremultibank.com.pl writes:

Note:  there's nothing about money above. Money is important, but 
stabilization  and respect are more important

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

Re: IBM LinuxONE Rockhopper

[Timothy Sipples]

Responding to Mike Beer, I have no doubt that improvement is possible and
important. Goodness knows I'm constantly searching for improvement
opportunities, personally and professionally, and recommend that everybody
do the same. That said, I learned a long time ago that one doesn't get very
far in such requests (or demands) when one's arguments or representations
simply aren't true upon even cursory inspection.

OK, so I'll respond directly to some of the revised points you've raised,
as always bearing in mind that I am expressing my personal views only, even
when I don't provide that reminder.

IBM publishes *both* IBM LinuxONE and Linux on IBM z System customer
references, including videos, press releases, etc. In my view, IBM is
absolutely correct in telling you, and everyone else, when a customer (who
wishes to speak publicly, which is wonderful!) adopted a LinuxONE server
and when a customer adopted a z System server that runs Linux. If Apple
posts stories about their customers adopting iPad minis and other stories
about their customers adopting iPad Pros, that's all to the good. You're
getting more information, not less. You know that Apple has customers
adopting both iPad minis and iPad Pros. You can aggregate that information
however you wish. Likewise, you know that IBM has customers adopting both
LinuxONE servers and z System servers running Linux. (And z System servers
running z/OS, etc., etc.)

If you want to argue that IBM ought to include a direct link to Linux on z
customer success stories from the LinuxONE landing page, and vice versa,
that seems reasonable to me. I'd say it's not imperative, but it'd be
reasonable. However, beyond that, I don't agree. I prefer that IBM (and
Apple) share at least a reasonable level of detail when their customers
permit it. If you still think IBM should provide less server information,
you can ask.

With respect to what a particular IBM employee said on a certain day, I
don't know what the question was. However, with the possible exception of
certain religious leaders within their communities of followers, I cannot
think of anybody who is infallible. As I pointed out, IBM publishes exactly
what certifications a prospective LinuxONE remarketer requires to become a
LinuxONE remarketer. I provided the link, and it isn't hard to find using
your favorite Internet search engine. If somebody said something else, then
please feel free to point that person to the correct, official information.

With respect to availability of products, services, and other offerings in
particular countries, for better or worse IBM must comply with laws and
regulations. That means a few countries are going to be left out even when
IBM (or any other company) would highly prefer a 100% global offering.
That's just how it goes here on Planet Earth. The LinuxONE Community Cloud
is available *practically* everywhere, fortunately. (Within only the first
90 days of launch, developers signed up from 72 different countries.) If
you'd like me to look into why some specific country that hasn't been named
yet (?) is (or might be) excluded, please let me know. Better yet, just go
to the Support page, choose the appropriate contact for the situation, and
ask:

https://developer.ibm.com/linuxone/support/


Timothy Sipples
IT Architect Executive, Industry Solutions, IBM z Systems, AP/GCG/MEA
E-Mail: sipp...@sg.ibm.com

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

Re: SORT - How can I put accumulated value on each output record

[Minoru Massaki]

Kolusu-san,

Thank you very much for providing the SORT JCL.
Your SORT is more elegant and flexible than I made.

What I made SORT control cards based on Woodger-san's suggestion is
following.

//ACCUM   EXEC PGM=ICEMAN
//SYSOUT   DD  SYSOUT=*
//SORTIN   DD  *
#001 1  10.5
#002 5   3.3
#003   121 120.4
#004 4   1.1
#004 4   1.1
#005  7000   5,000.0
/*
//SORTOUT  DD  SYSOUT=*
//SYSINDD  *
  INREC   OVERLAY=(72:SEQNUM,8,ZD)
  SORTFIELDS=COPY
  OUTFIL  REMOVECC,NODETAIL,
SECTIONS=(72,8,
TRAILER3=(1,20,5X,
  SUBTOTAL=(6,5,ZD,EDIT=(I,III,IIT)),4X,
  SUBTOTAL=(12,9,UFF,EDIT=(III,IIT.T)),
  80:X))
  END
/*

The SORTOUT is following:

#001 1  10.5 1 10.5
#002 5   3.3 6 13.8
#003   121 120.4   127134.2
#004 4   1.1   131135.3
#004 4   1.1   135136.4
#005  7000   5,000.0 7,135  5,136.4


Again, Woodger-san, Koehler-san, and Kolusu-san,
I really appreciate your help.

Thank you!!

Minoru Massaki - (M*M)



2017-02-14 0:43 GMT+09:00 Sri h Kolusu :

> Minoru Massaki,
>
> I assumed the following
>
> 1. Your Input has LRECL=80 and RECFM=FB
> 2. The key in position 1 thru 4 is unique and you wanted a running total
> for every record.
> 3. The first summary field start at 10 for a length of 6
> 4. The second summary field  starts at position 21 for a length of 10
> 5. The summary fields are at position 35 for a length of 8 and position 45
> for a length of 12.
>
> You can use the following JCL
>
> //STEP0100 EXEC PGM=SORT
> //SYSOUT   DD SYSOUT=*
> //SORTIN   DD *
> +1+2+3+4+5+
> #001  1   10.5
> #002  53.3
> #003121  120.4
> //SORTOUT  DD SYSOUT=*
> //SYSINDD *
>   OPTION COPY
>   OUTFIL REMOVECC,NODETAIL,
>   SECTIONS=(1,4,
>   TRAILER3=(1,30,
> 35:SUBTOTAL=(10,06,UFF,M10,LENGTH=8),
> 45:SUBTOTAL=(21,10,UFF,EDIT=(.T
> //*
>
> If for some reason your key(position 1 thru 4 is NOT unique) and yet you
> want to have a running total for every record then you can use the
> following JCL
>
> //STEP0100 EXEC PGM=SORT
> //SYSOUT   DD SYSOUT=*
> //SORTIN   DD *
> +1+2+3+4+5+6---
> #ABC  1   10.5
> #ABC  53.3
> #ABC121  120.4
> //SORTOUT  DD SYSOUT=*
> //SYSINDD *
>   OPTION COPY
>   OUTREC OVERLAY=(81:SEQNUM,8,ZD)
>
>   OUTFIL REMOVECC,NODETAIL,BUILD=(80X),
>   SECTIONS=(81,8,
>   TRAILER3=(1,30,
> 35:SUBTOTAL=(10,06,UFF,M10,LENGTH=8),
> 45:SUBTOTAL=(21,10,UFF,EDIT=(.T
> //*
>
>
> Further if you have any questions please let me know
>
> Thanks,
> Kolusu
> DFSORT Development
> IBM Corporation
>
>
>
> From:   Minoru Massaki 
> To: IBM-MAIN@LISTSERV.UA.EDU
> Date:   02/12/2017 06:31 AM
> Subject:SORT - How can I put accumulated value on each output
> record
> Sent by:IBM Mainframe Discussion List 
>
>
>
> I want to have SORTOUT data as following:
>
> Input Data
>
> #001  1   10.5
> #002  5 3.3
> #003   121  120.4
> . . . . . . .
>
> Output Data Set
> #001  1   10.5 1   10.5
> #002  5 3.3 613.8
> #003   121  120.4 127   134.2
> . . . . . . .
>
>
> Output forth column is accumulated value with previous records values on
> 2nd column.
> Output 5th column is also accumulated value with previous records values
> on
> 3rd column.
>
> Can I make this kind of output by SORT?
>
> I really appreciate that someone would provide sample of SORT control
> statement to resolve my requirement.
>
> Minoru Massaki - (M*M)
>
> --
>
> 全先 実  -  Minoru Massaki  (M*M)
> E-mail: mmass...@gmail.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
>



-- 

全先 実  -  Minoru Massaki  (M*M)
E-mail: mmass...@gmail.com

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

Re: OMVS Mass Reassign of File Owner

[Mike Baldwin]

Hi John,

Glad that worked for you.

I thought I'd add that there is a product.  It's called Superuser for z/OS,
and is mostly an ISPF application, although you can choose to run the generated 
commands in batch.
From the "Reports" menu, you would choose the "Free Search" option.
On the "Search Files" entry panel, you enter a Start Directory
(that directory and all of its subdirectories are searched),
an owner (UID) and/or group (GID),
and/or any optional attributes such as filename mask.
The "Query Result" panel displays the found directories and filenames.
You can choose "Global Change", and specify a new user (UID) and/or group (GID)
(permissions can also be changed).
The generated commands are presented, and you can choose to run them
either in batch, or 'online'.

Regards,
Mike Baldwin
Cartagena Software Limited
www.cartagena.com
http://www.cartagena.com/files/Superuser_Flyer.pdf

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

Re: COBOL/LE question

[Paul Gilmartin]

On Mon, 13 Feb 2017 17:50:22 -0600, Dale R. Smith wrote:
>
>http://www.computerworld.com/article/3163192/data-center/just-because-it-fails-doesnt-mean-its-a-failure.html
> 
I had one of those, many years ago.  We were trying to convert our programmers
from HLASM to an ISV cross-assembler.  One of our programmers resisted.  He
had a program that assembled with RC=0 on HLASM; RC=4 on the cross-assembler.
I reviewed the code and spotted an unresolvable expression that HLASM overlooked
and the cross-assembler reported properly.  Went to SR on HLASM.  Got APAR.
Now both get RC=4.  The programmer, fastidious about RC<>0, grudgingly changed
his code.

Software, this time.

-- gil

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

Re: COBOL/LE question

[Dale R. Smith]

On Mon, 13 Feb 2017 20:57:56 +, Pommier, Rex  
wrote:

>All,
>
>Just to circle back and close the issue, I was "barking up the wrong tree" 
>with the IGZ0268W message.  Turns out the driver program that was calling the 
>OS/VS COBOL program had a logic error in it that was calling the wrong program 
>with the wrong parameters.  I don't know why/how it was working on the 1.13 
>system, but a long time ago, the COBOL program that was initiating the abend 
>was replaced by another OS/VS COBOL program.  Unfortunately the developer who 
>wrote the new COBOL program missed one of the calls in the driving ASM 
>program.  Somehow it has chugged along all these years (obviously the COBOL 
>program being called at this one point didn't do anything important) until the 
>OS upgrade.  IBM must have closed a hole in LE maintenance between 1.13 and 
>2.2 and so this logic error that was sliding past now bit us.  Modifying the 
>ASM source to remove the broken call fixed the problem.  Since there are other 
>OS/VS COBOL programs being called by this same ASM driver that are working 
>fine, it wasn't the warning message after all.
>
>Thanks again for all your suggestions and help.
>
>Rex

http://www.computerworld.com/article/3163192/data-center/just-because-it-fails-doesnt-mean-its-a-failure.html

-- 
Dale R. Smith

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

Re: RDT questions

[Tom Conley]

On 2/12/2017 9:57 PM, Ambrose Jr wrote:

Hi Team,

I have some questions and doubts on RDT , can I rise here? or do we have
any separate group?

Regards,
Ambrose.Jr



Junior,

Fire away, I'll do my best.

Regards,
Tom Conley

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

Re: COBOL/LE question

[Pommier, Rex]

All,

Just to circle back and close the issue, I was "barking up the wrong tree" with 
the IGZ0268W message.  Turns out the driver program that was calling the OS/VS 
COBOL program had a logic error in it that was calling the wrong program with 
the wrong parameters.  I don't know why/how it was working on the 1.13 system, 
but a long time ago, the COBOL program that was initiating the abend was 
replaced by another OS/VS COBOL program.  Unfortunately the developer who wrote 
the new COBOL program missed one of the calls in the driving ASM program.  
Somehow it has chugged along all these years (obviously the COBOL program being 
called at this one point didn't do anything important) until the OS upgrade.  
IBM must have closed a hole in LE maintenance between 1.13 and 2.2 and so this 
logic error that was sliding past now bit us.  Modifying the ASM source to 
remove the broken call fixed the problem.  Since there are other OS/VS COBOL 
programs being called by this same ASM driver that are working fine, it wasn't 
the warning message after all.

Thanks again for all your suggestions and help.

Rex

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Pommier, Rex
Sent: Wednesday, February 01, 2017 4:55 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: COBOL/LE question

We're starting down that path.  Management doesn't want to have to recompile 
things but I'm thinking we may need to do so just to see if that's the problem.

Rex

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Steve Beaver
Sent: Wednesday, February 01, 2017 4:54 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: COBOL/LE question

I have a simple question do you happen to have a the source modules that if you 
attempted to reassemble them and recompile them to see if that's the problem

Sent from my iPhone
Steve Beaver 


> On Feb 1, 2017, at 16:41, Pommier, Rex  wrote:
> 
> Hello all,
> 
> We are in the process of migrating from z/OS 1.13 to 2.2.  We just ran into 
> an issue with our COBOL and LE environment.  We are running COBOL 4.2.  
> Within the maintenance for COBOL and the upgrade in LE from 1.13 to 2.2, IBM 
> introduced the warning message "IGZ0268W An invocation was made of OS/VS 
> COBOL program XXX." along with providing a usermod that can be installed 
> to suppress the message.  Normally that is OK but we have an ancient load 
> module written partially in OS/VS COBOL and partially in assembler that has a 
> home-grown ESTAE routine attached to it.  This program has consistently 
> failed spectacularly while testing it under 2.2.  Here's the sequence of 
> events.
> 
> 13.04.12 JOB01549  +TRBCYCLE: ESTAE ISSUED/LE COND HDLR REGISTERED
>  4 normal messages issued at start of run
> 13.04.12 JOB01549  +TRBCYCLE: BEGIN PROCESSING
> 
> 13.04.12 JOB01549  +TRBCYCLE: LIMIT=  900.00 SECONDS EACH 001 
> 
> 13.04.13 JOB01549  +TRBCYCLE: 20 ABENDS ALLOWED   
> 
> 13.06.37 JOB01549  +TRBCHDLR: U4038 ABEND TRAPPED FOR POLICY 1512345623 (LE)  
>  first abend message
> 
> $HASP375 DCD110   ESTIMATED  LINES EXCEEDED (a bunch of these)
> CEE3798I ATTEMPTING TO TAKE A DUMP FOR ABEND U4087 TO DATA SET:
> 
> IEA822I COMPLETE TRANSACTION DUMP WRITTEN TO RRP.D032.T1306504.DCD110   
> +CEE3797I LANGUAGE ENVIRONMENT HAS DYNAMICALLY CREATED A DUMP.  
> +CEE0374C CONDITION=IGZ0268W TOKEN=0001010C 49C9C7E9 0001  406  
>  WHILE RUNNING PROGRAM IGZCMSG  WHICH STARTS AT 1687F3B0   
>  AT THE TIME OF INTERRUPT  
>  PSW 0008 804340DA 
>  GPR 0-3 0043D9A8 0043D668 0043D668 00433038   
>  GPR 4-7 0043D38C 0043D698 00433038 0043D658   
>  GPR 8-B 0042CED0 0042AB40 0045D050 9687F3B0   
>  GPR C-F 0042AC30 0043D490 804340DA 966F4958   
> +CEE0374C CONDITION=IGZ0016W TOKEN=00010010 49C9C7E9 0002  407  
>  WHILE RUNNING PROGRAM UNKNOWN 
>  AT THE TIME OF INTERRUPT  
> Hello all,
> 
> We are in the process of migrating from z/OS 1.13 to 2.2.  We just ran into 
> an issue with our COBOL and LE environment.  We are running COBOL 4.2.  
> Within the maintenance for COBOL and the upgrade in LE from 1.13 to 2.2, IBM 
> introduced the warning message "IGZ0268W An invocation was made of OS/VS 
> COBOL program XXX." along with providing a usermod that can be installed 
> to suppress the message.  Normally that is OK but we have an ancient load 
> module written partially in OS/VS COBOL and partially in assembler that has a 
> home-grown ESTAE routine attached to it.  This program has consistently 
> failed spe

Re: Loyalty

[John McKown]

On Mon, Feb 13, 2017 at 1:58 PM, Greg Shirey  wrote:

> With apologies to Firesign Theater, but that's an insane question to ask,
> man, how can we know what you read?
>

​Hum, OK. I can see how you can parse it that way. I guess to be more
exact, I should have said: "I remember reading ... . Did anyone reading
this message write that & post it on this forum? If not, I must have read
it elsewhere, because I know that I didn't think it up myself."



>
> Greg Shirey
> Ben E. Keith Company
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of John McKown
> Sent: Monday, February 13, 2017 9:53 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Loyalty
>
> ​Was it here, or somewhere else, that I read something like "Long term
> planning is a waste of time. The society and technology is simply changing
> too fast for the historical '5 year plan'."​
>
> Maranatha! <><
> John McKown
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



-- 
Our calculus classes are an integral part of your education.

Maranatha! <><
John McKown

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

Re: Loyalty

[Greg Shirey]

With apologies to Firesign Theater, but that's an insane question to ask, man, 
how can we know what you read? 

Greg Shirey
Ben E. Keith Company 

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of John McKown
Sent: Monday, February 13, 2017 9:53 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Loyalty

​Was it here, or somewhere else, that I read something like "Long term planning 
is a waste of time. The society and technology is simply changing too fast for 
the historical '5 year plan'."​

Maranatha! <><
John McKown



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

Re: z/OS under Linux ?

[John McKown]

On Mon, Feb 13, 2017 at 1:05 PM, Carmen Vitullo  wrote:

> Agree 1000% :) - been thru a couple disastrous MF to Emulated MF platforms
> that tout the can preform as well or better than any Z enterprise system at
> 1/3 the cost.
> these other solutions providers are still stuck with 1980's technology,
> and cannot totally emulate what CICS 4.2 let alone CICS/TS can do within
> its own regions, TCLASS !!!
> no storage protection or storage isolation, if your transactions are now
> getting ASRA abends, better fix it quick, it could compromise the entire OS.
>
>
​I'm not really told much of anything here. But I get the idea that our
upper management's thoughts about the above are "That's no concern of ours.
That is the concern of our external vendor." They really seem to think that
I.T. is no different than the grounds keeping company, the electric
company, or the sewers. Too bad this generation of managers don't remember
about the time when the sewer literally backed up into our (old) basement
computer room because: (1) the computer room was below the local sewer
level and (2) the city turned of the "pump failed" alarm because of too
many "false alarms" costing them money to check out.​ I still have the
mini-plunger that the I.T. people go for keeping the "stuff" away from the
cabling.


-- 
Our calculus classes are an integral part of your education.

Maranatha! <><
John McKown

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

Re: z/OS under Linux ?

[Carmen Vitullo]

Agree 1000% :) - been thru a couple disastrous MF to Emulated MF platforms that 
tout the can preform as well or better than any Z enterprise system at 1/3 the 
cost. 
these other solutions providers are still stuck with 1980's technology, and 
cannot totally emulate what CICS 4.2 let alone CICS/TS can do within its own 
regions, TCLASS !!! 
no storage protection or storage isolation, if your transactions are now 
getting ASRA abends, better fix it quick, it could compromise the entire OS. 

- Original Message -

From: "Allan Staller"  
To: IBM-MAIN@LISTSERV.UA.EDU 
Sent: Monday, February 13, 2017 12:51:28 PM 
Subject: Re: z/OS under Linux ? 

I have heard too many oops! Stories for my comfort around people like this 
(just ask John McK). 

Make *DAMN SURE* you get iron-clad performance and SLA guarantees before 
letting them do any *REAL* work. 
e.g. *all programs will run at least as fast as the last 6 z/OS executions. 
Online response time will be xx or better, etc. 


POC is OK. Let them do what they want. There are no commitments yet. 

*BEFORE* signing the contract, get the SLA's/Guarantees in writing. 

HTH, 

-Original Message- 
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Joe Ellis 
Sent: Monday, February 13, 2017 12:26 PM 
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: z/OS under Linux ? 

anyone tried or have experience with this ? 

 

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


::DISCLAIMER:: 

 

The contents of this e-mail and any attachment(s) are confidential and intended 
for the named recipient(s) only. 
E-mail transmission is not guaranteed to be secure or error-free as information 
could be intercepted, corrupted, 
lost, destroyed, arrive late or incomplete, or may contain viruses in 
transmission. The e mail and its contents 
(with or without referred errors) shall therefore not attach any liability on 
the originator or HCL or its affiliates. 
Views or opinions, if any, presented in this email are solely those of the 
author and may not necessarily reflect the 
views or opinions of HCL or its affiliates. Any form of reproduction, 
dissemination, copying, disclosure, modification, 
distribution and / or publication of this message without the prior written 
consent of authorized representative of 
HCL is strictly prohibited. If you have received this email in error please 
delete it and notify the sender immediately. 
Before opening any email and/or attachments, please check them for viruses and 
other defects. 


 


-- 
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: z/OS under Linux ?

[Allan Staller]

Intel/AMD folks consistently over-estimate the capabilities of their platforms.
As I stated in my previous reply, Get ironclad SLA and performance guarantees. 
i.e. they *PAY YOU* of guarantees are not met.

Other questions. Who(m) takes over development? Maintenance(?) application 
conversion management(?) data transformation(?) data management(?) (i.e. who 
pays for this?)

Lots of stuff to nail down before signing on the dotted line.

> wrote: 
> anyone tried or have experience with this ?
> 
> 

You had me worried there for a minute.  I was afraid someone was claiming you 
could actually run z/OS as a virtual machine on Linux.  Application re-hosting 
is a whole different matter, even if they are wanting to do it on Intel/AMD 
hardware.



::DISCLAIMER::


The contents of this e-mail and any attachment(s) are confidential and intended 
for the named recipient(s) only.
E-mail transmission is not guaranteed to be secure or error-free as information 
could be intercepted, corrupted,
lost, destroyed, arrive late or incomplete, or may contain viruses in 
transmission. The e mail and its contents
(with or without referred errors) shall therefore not attach any liability on 
the originator or HCL or its affiliates.
Views or opinions, if any, presented in this email are solely those of the 
author and may not necessarily reflect the
views or opinions of HCL or its affiliates. Any form of reproduction, 
dissemination, copying, disclosure, modification,
distribution and / or publication of this message without the prior written 
consent of authorized representative of
HCL is strictly prohibited. If you have received this email in error please 
delete it and notify the sender immediately.
Before opening any email and/or attachments, please check them for viruses and 
other defects.



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

Re: z/OS under Linux ?

[Allan Staller]

I have heard too many oops!  Stories for my comfort around people like this 
(just ask John McK).

Make *DAMN SURE* you get iron-clad performance and SLA guarantees before 
letting them do any *REAL* work.
e.g. *all programs will run at least as fast as the last 6 z/OS executions. 
Online response time will be xx or better, etc.


POC is OK. Let them do what they want. There are no commitments yet.

*BEFORE* signing the contract, get the SLA's/Guarantees in writing. 

HTH,

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Joe Ellis
Sent: Monday, February 13, 2017 12:26 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: z/OS under Linux ?

anyone tried or have experience with this ?

 

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


::DISCLAIMER::


The contents of this e-mail and any attachment(s) are confidential and intended 
for the named recipient(s) only.
E-mail transmission is not guaranteed to be secure or error-free as information 
could be intercepted, corrupted,
lost, destroyed, arrive late or incomplete, or may contain viruses in 
transmission. The e mail and its contents
(with or without referred errors) shall therefore not attach any liability on 
the originator or HCL or its affiliates.
Views or opinions, if any, presented in this email are solely those of the 
author and may not necessarily reflect the
views or opinions of HCL or its affiliates. Any form of reproduction, 
dissemination, copying, disclosure, modification,
distribution and / or publication of this message without the prior written 
consent of authorized representative of
HCL is strictly prohibited. If you have received this email in error please 
delete it and notify the sender immediately.
Before opening any email and/or attachments, please check them for viruses and 
other defects.




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

Re: z/OS under Linux ?

[Mark Post]

>>> On 2/13/2017 at 01:26 PM, Joe Ellis  wrote: 
> anyone tried or have experience with this ?
> 
> 

You had me worried there for a minute.  I was afraid someone was claiming you 
could actually run z/OS as a virtual machine on Linux.  Application re-hosting 
is a whole different matter, even if they are wanting to do it on Intel/AMD 
hardware.


Mark Post

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

Re: SYSLOG/OPERLOG Keyword Search

[Mark Post]

>>> On 2/10/2017 at 03:18 PM, "Donald J."  wrote: 
> Splunk looks very interesting.
> Too bad they don't support z/Linux.

I contacted someone I know at Splunk.  They gave me a couple of links to look 
at:
"One of our partners, they wrote a forwarder for z/OS: 
http://www.syncsort.com/en/Products/Mainframe/Ironstream";
and
"We definitely have a linux s390 build not sure if we tell people about it, 
though"
and
https://conf.splunk.com/session/2014/conf2014_PatrickOgdinDonMarcotte_SplunkSyncsort_WhatsNew.pdf

You might want to contact them directly.  It could be that they will in fact 
support the platform.


Mark Post

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

Re: COBOL and POSIX pipes (was: A design question)

[John McKown]

On Mon, Feb 13, 2017 at 12:28 PM, Paul Gilmartin <
000433f07816-dmarc-requ...@listserv.ua.edu> wrote:

> On Mon, 13 Feb 2017 11:58:57 -0600, John McKown wrote:
> >
> >...having already used
> >a UNIX subroutine, I guess I figured it was easier to use another UNIX
> >subroutine rather that setting up an FD along with an OPEN / READ loop /
> >CLOSE.​
> >
> >... I think that the HLASM is basically
> >being used as a "QSAM for RACF" type interface.​
> >
> If the replies returned by RACF are of uniform length or the assembler
> program can pad them, BPX1RED is easiest.  I'm accustomed to
> dealing with utility output where records are variable length,
> contain no control characters, and are NL-terminated.  For that,
> I might as well ALLOC and use the real QSAM.
>

​Another point in your favor would be that the resultant code would be more
understandable to a regular COBOL programmer. The only "oddity" would be
the setup, in its calls to BPX1PIP and BPXWDYN.​



>
> -- gil
>
>

-- 
Our calculus classes are an integral part of your education.

Maranatha! <><
John McKown

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

Re: COBOL and POSIX pipes (was: A design question)

[Paul Gilmartin]

On Mon, 13 Feb 2017 11:58:57 -0600, John McKown wrote:
>
>...having already used
>a UNIX subroutine, I guess I figured it was easier to use another UNIX
>subroutine rather that setting up an FD along with an OPEN / READ loop /
>CLOSE.​
>
>... I think that the HLASM is basically
>being used as a "QSAM for RACF" type interface.​
> 
If the replies returned by RACF are of uniform length or the assembler
program can pad them, BPX1RED is easiest.  I'm accustomed to
dealing with utility output where records are variable length,
contain no control characters, and are NL-terminated.  For that,
I might as well ALLOC and use the real QSAM.

-- gil

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

z/OS under Linux ?

[Joe Ellis]

anyone tried or have experience with this ?



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

Re: COBOL and POSIX pipes (was: A design question)

[John McKown]

On Mon, Feb 13, 2017 at 11:51 AM, Paul Gilmartin <
000433f07816-dmarc-requ...@listserv.ua.edu> wrote:

> On Mon, 13 Feb 2017 11:32:36 -0600, John McKown wrote:
> >
> >
> ​
>
> >
> I was thinking of BPX1PIP and BPXWDYN( "alloc path('/dev/fd/[pipe
> output]') ..." ).
> No generated pathname.
>

​Ah. I hadn't thought of that. An interesting idea, but having already used
a UNIX subroutine, I guess I figured it was easier to use another UNIX
subroutine rather that setting up an FD along with an OPEN / READ loop /
CLOSE.​



>
> >> Does BPX1ATM dup() descriptors as spawn() does?  If so the parent must
> >> close() its copy of the input descriptor or it never sees EOF.  Happens
> to
> >> me all the time.
> >
> >​BPX1ATM is "attach_and_exec_mvs", which basically seems, to me, to be a
> >wrapper around the ATTACHX function. So the HLASM program is a subtask of
> >the COBOL program. ​
> >
> I take that as "doesn't dup()."
>

​Right, I should have said that explicitly. Why would it? What use would a
dup() serve?​ Both tasks (aka "threads") are running in the same UNIX
process and so (should?) have access to all of that process' file
descriptors.



>
> >​There is a BPX1SEL (
> >https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.
> 0/com.ibm.zos.v2r1.bpxb100/sel.htm?view=kc
> >) which I guess could be used. But, at least to me, using the BPX1ATM is
> >conceptually easier. ...
> >
> You need something like select() if you want to monitor multiple
> input streams, such as stdout and stderr from a child process.
>

​Yes, but that is not the case here. I think that the HLASM is basically
being used as a "QSAM for RACF" type interface.​


>
> -- gil
>
>
-- 
Our calculus classes are an integral part of your education.

Maranatha! <><
John McKown

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

Re: COBOL and POSIX pipes (was: A design question)

[Paul Gilmartin]

On Mon, 13 Feb 2017 11:32:36 -0600, John McKown wrote:
>
>... The COBOL
>> >program would use BPX1RED to read from the read_file_descriptor. The HLASM
>> >
>> Is this better than using BPXWDYN('ALLOC ...') the descriptor and using
>> conventional COBOL I/O)?
>
>​Better? Not really. Just different. And doesn't require a MKFIFO with
>"random" name.​
> 
I was thinking of BPX1PIP and BPXWDYN( "alloc path('/dev/fd/[pipe output]') 
..." ).
No generated pathname.

>> Does BPX1ATM dup() descriptors as spawn() does?  If so the parent must
>> close() its copy of the input descriptor or it never sees EOF.  Happens to
>> me all the time.
>
>​BPX1ATM is "attach_and_exec_mvs", which basically seems, to me, to be a
>wrapper around the ATTACHX function. So the HLASM program is a subtask of
>the COBOL program. ​
> 
I take that as "doesn't dup()."

>​There is a BPX1SEL (
>https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.bpxb100/sel.htm?view=kc
>) which I guess could be used. But, at least to me, using the BPX1ATM is
>conceptually easier. ...
> 
You need something like select() if you want to monitor multiple
input streams, such as stdout and stderr from a child process.

-- gil

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

Re: COBOL and POSIX pipes (was: A design question)

[John McKown]

On Mon, Feb 13, 2017 at 10:58 AM, Paul Gilmartin <
000433f07816-dmarc-requ...@listserv.ua.edu> wrote:

> On Mon, 13 Feb 2017 09:44:51 -0600, John McKown wrote:
> >
> >> 3.  Is it possible to have the Assembler routine place the extracted
> data into a unix
> >>  pipe or a C type=memory file and then i can retrieve it ?
> >
> >​You can call the UNIX BPX* routines from COBOL, so you can use something
> >like BPX1PIP to create an unnamed pipe. The COBOL program could then ​pass
> >the "write_file_descriptor" to the HLASM program as a parm. The COBOL
> >program would use BPX1RED to read from the read_file_descriptor. The HLASM
> >
> Is this better than using BPXWDYN('ALLOC ...') the descriptor and using
> conventional COBOL I/O)?
>

​Better? Not really. Just different. And doesn't require a MKFIFO with
"random" name.​



>
> >would use BPX1WRT to write to the passed in descriptor. But critically
> >important is that the HLASM program must be ATTACHX'd (BPX1ATM service can
> >do this) and not LINK'd to (as a normal COBOL CALL would do). Otherwise
> >
> Does BPX1ATM dup() descriptors as spawn() does?  If so the parent must
> close() its copy of the input descriptor or it never sees EOF.  Happens to
> me all the time.
>

​BPX1ATM is "attach_and_exec_mvs", which basically seems, to me, to be a
wrapper around the ATTACHX function. So the HLASM program is a subtask of
the COBOL program. ​



>
> >you'll most likely get a lock out with either the TCB either waiting in
> the
> >COBOL code for the HLASM to write some thing, or in the HLASM code waiting
> >(buffer full) for the COBOL to read something. I just wanted to throw this
> >last in for completeness. You might also need some way to communicate to
> >the COBOL routine that the HLASM routine has written an "EOF" and has
> ended.
> >
> close() the input end of the pipe should suffice.  COBOL should see EOF.
>

​Ah. I hadn't thought of that. Thanks for the info.


>
>
> On Mon, 13 Feb 2017 16:45:33 +0100, Peter Hunkeler wrote:
> >
> >Any you'd need to run the Cobol and the assembler routine in parallel,
> not as main routine calling a subroutine. UNIX pipes need both ends to be
> acitve for them to work.
> >
> I've sometimes cheated on this, mostly with stderr, assuming that
> any error messages will fit in a 131KB buffer.  Hard to handle both
> stdout and stderr otherwise in a Rexx parent.  Is there a select()
> SYSCALL?
>

​There is a BPX1SEL (
https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.bpxb100/sel.htm?view=kc
) which I guess could be used. But, at least to me, using the BPX1ATM is
conceptually easier. Mainly because the HLASM routine would not need to
"return" to the COBOL routine except at the very end. Otherwise, Scott
could just do a normal CALL to "get the next record" and have the HLASM
routine be able to "read next" the RACF information, which would mean
saving "positioning" information over the CALL. I also got the impression
that the HLASM and COBOL are pretty much already written at using a
"socket" type interface is mainly to eliminate the use of an intermediate
"disk file buffer". It would also enhance security some because the data
would never make it to a disk device, just memory.

I was also thinking of the COBOL program passing a record buffer address to
the HLASM program, then coordinating access to the buffer using a semaphone
(may require two?) (on == ready to read; off == ready to write), but that
looked a bit more difficult to me.


>
> -- gil
>
>


-- 
Our calculus classes are an integral part of your education.

Maranatha! <><
John McKown

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

Re: EXTERNAL: Re: Job Loyalty

[Jerry Whitteridge]

One of my Co-Workers has the right philosophy.  He says " I check the Bank 
Account on Thursday mornings, and If the amount is larger than when I went to 
bed Wed night, another weeks' worth of work is forthcoming!"  (we are paid 
weekly)

I find very little wrong with his thoughts (note as folks have been listing 
their tenures - I just passed my 27th Anniversary at Safeway. I found I change 
jobs when I get bored, and I've rarely been bored here )

Jerry Whitteridge
Manager Mainframe Systems & Storage
Albertsons - Safeway Inc.
623 869 5523
Corporate Tieline - 85523

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



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Allan Staller
Sent: Monday, February 13, 2017 6:15 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: EXTERNAL: Re: Job Loyalty

Well Said!


This is "Capitalism", making money is king. Every large corporation tries to 
sell this "Job Loyalty" to workers, however, rest assured this is a one sided 
affair. They want you to be loyal.

Then again, think about it. When you start your employment at any company, the 
first thing you agree to is "At will employment", your employment with any 
company is a voluntary one subject to termination by you or company at WILL, 
with or without cause and with or without noticeetc.

Based on that doctrine, "Loyalty" has already left the building.

My relation with all the employers I worked with is simple. It is a business, I 
perform what is expected from me, they pay me. There is no love, hate, loyalty 
involved.

I'd rather be loyal to family, friends.



::DISCLAIMER::


The contents of this e-mail and any attachment(s) are confidential and intended 
for the named recipient(s) only.
E-mail transmission is not guaranteed to be secure or error-free as information 
could be intercepted, corrupted, lost, destroyed, arrive late or incomplete, or 
may contain viruses in transmission. The e mail and its contents (with or 
without referred errors) shall therefore not attach any liability on the 
originator or HCL or its affiliates.
Views or opinions, if any, presented in this email are solely those of the 
author and may not necessarily reflect the views or opinions of HCL or its 
affiliates. Any form of reproduction, dissemination, copying, disclosure, 
modification, distribution and / or publication of this message without the 
prior written consent of authorized representative of HCL is strictly 
prohibited. If you have received this email in error please delete it and 
notify the sender immediately.
Before opening any email and/or attachments, please check them for viruses and 
other defects.




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

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


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

COBOL and POSIX pipes (was: A design question)

[Paul Gilmartin]

On Mon, 13 Feb 2017 09:44:51 -0600, John McKown wrote:
>
>> 3.  Is it possible to have the Assembler routine place the extracted data 
>> into a unix
>>  pipe or a C type=memory file and then i can retrieve it ?
>
>​You can call the UNIX BPX* routines from COBOL, so you can use something
>like BPX1PIP to create an unnamed pipe. The COBOL program could then ​pass
>the "write_file_descriptor" to the HLASM program as a parm. The COBOL
>program would use BPX1RED to read from the read_file_descriptor. The HLASM
>
Is this better than using BPXWDYN('ALLOC ...') the descriptor and using
conventional COBOL I/O)?

>would use BPX1WRT to write to the passed in descriptor. But critically
>important is that the HLASM program must be ATTACHX'd (BPX1ATM service can
>do this) and not LINK'd to (as a normal COBOL CALL would do). Otherwise
>
Does BPX1ATM dup() descriptors as spawn() does?  If so the parent must
close() its copy of the input descriptor or it never sees EOF.  Happens to
me all the time.

>you'll most likely get a lock out with either the TCB either waiting in the
>COBOL code for the HLASM to write some thing, or in the HLASM code waiting
>(buffer full) for the COBOL to read something. I just wanted to throw this
>last in for completeness. You might also need some way to communicate to
>the COBOL routine that the HLASM routine has written an "EOF" and has ended.
> 
close() the input end of the pipe should suffice.  COBOL should see EOF.


On Mon, 13 Feb 2017 16:45:33 +0100, Peter Hunkeler wrote:
>
>Any you'd need to run the Cobol and the assembler routine in parallel, not as 
>main routine calling a subroutine. UNIX pipes need both ends to be acitve for 
>them to work.
> 
I've sometimes cheated on this, mostly with stderr, assuming that
any error messages will fit in a 131KB buffer.  Hard to handle both
stdout and stderr otherwise in a Rexx parent.  Is there a select()
SYSCALL?

-- gil

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

Re: Loyalty

[John McKown]

On Mon, Feb 13, 2017 at 9:49 AM, R.S. 
wrote:

> W dniu 2017-02-13 o 16:26, Steve Smith pisze:
>
>> "It's just business."  - Sal Tessio
>>
>
> Yes, it is business. However the long term business should be made with
> good people, with long term vision and real motivation.
> There is only one way to get this: respect people. Hear them, be honest.
> Inform about plans.
>

​Was it here, or somewhere else, that I read something like "Long term
planning is a waste of time. The society and technology is simply changing
too fast for the historical '5 year plan'."​



>
> Note: there's nothing about money above. Money is important, but
> stabilization and respect are more important.
> Last, but not least: it's quite easy to lose people loyalty, enthusiasm,
> and motivation. And it cannot be bought back. You must deserve it, but this
> is long-term and not easy process.
>
> --
> Radoslaw Skorupka
> Lodz, Poland
>


-- 
Our calculus classes are an integral part of your education.

Maranatha! <><
John McKown

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

Re: A design question

[John McKown]

On Mon, Feb 13, 2017 at 9:01 AM, scott Ford  wrote:

> All:
>
> I have the following:
>
> 1.  Cobol STC
> 2.  It calls an Assembler subroutine with does a RACF extract of the
> database for all
>  userids and then writes to an output file.
> 3.  Is it possible to have the Assembler routine place the extracted data
> into a unix
>  pipe or a C type=memory file and then i can retrieve it ?
>
> Or is that to Mickey Mouse ..??
>

​You can call the UNIX BPX* routines from COBOL, so you can use something
like BPX1PIP to create an unnamed pipe. The COBOL program could then ​pass
the "write_file_descriptor" to the HLASM program as a parm. The COBOL
program would use BPX1RED to read from the read_file_descriptor. The HLASM
would use BPX1WRT to write to the passed in descriptor. But critically
important is that the HLASM program must be ATTACHX'd (BPX1ATM service can
do this) and not LINK'd to (as a normal COBOL CALL would do). Otherwise
you'll most likely get a lock out with either the TCB either waiting in the
COBOL code for the HLASM to write some thing, or in the HLASM code waiting
(buffer full) for the COBOL to read something. I just wanted to throw this
last in for completeness. You might also need some way to communicate to
the COBOL routine that the HLASM routine has written an "EOF" and has ended.



>
> Scott
> IDMWORKS
>

-- 
Our calculus classes are an integral part of your education.

Maranatha! <><
John McKown

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

Re: Loyalty

[R.S.]

W dniu 2017-02-13 o 16:26, Steve Smith pisze:

"It's just business."  - Sal Tessio


Yes, it is business. However the long term business should be made with 
good people, with long term vision and real motivation.
There is only one way to get this: respect people. Hear them, be honest. 
Inform about plans.


Note: there's nothing about money above. Money is important, but 
stabilization and respect are more important.
Last, but not least: it's quite easy to lose people loyalty, enthusiasm, 
and motivation. And it cannot be bought back. You must deserve it, but 
this is long-term and not easy process.


--
Radoslaw Skorupka
Lodz, Poland






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

mBank S.A. z siedzibą w Warszawie, ul. Senatorska 18, 00-950 Warszawa, 
www.mBank.pl, e-mail: kont...@mbank.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ń 01.01.2016 r. kapitał zakładowy mBanku S.A. (w całości 
wpłacony) wynosi 168.955.696 złotych.


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

Re: A design question

[John McKown]

​O​
n Mon, Feb 13, 2017 at 9:44 AM, John McKown 
wrote:

> On Mon, Feb 13, 2017 at 9:01 AM, scott Ford  wrote:
>
>> All:
>>
>> I have the following:
>>
>> 1.  Cobol STC
>> 2.  It calls an Assembler subroutine with does a RACF extract of the
>> database for all
>>  userids and then writes to an output file.
>> 3.  Is it possible to have the Assembler routine place the extracted data
>> into a unix
>>  pipe or a C type=memory file and then i can retrieve it ?
>>
>> Or is that to Mickey Mouse ..??
>>
>
> ​You can call the UNIX BPX* routines from COBOL, so you can use something
> like BPX1PIP to create an unnamed pipe. The COBOL program could then ​pass
> the "write_file_descriptor" to the HLASM program as a parm. The COBOL
> program would use BPX1RED to read from the read_file_descriptor. The HLASM
> would use BPX1WRT to write to the passed in descriptor. But critically
> important is that the HLASM program must be ATTACHX'd (BPX1ATM service can
> do this) and not LINK'd to (as a normal COBOL CALL would do). Otherwise
> you'll most likely get a lock out with either the TCB either waiting in the
> COBOL code for the HLASM to write some thing, or in the HLASM code waiting
> (buffer full) for the COBOL to read something. I just wanted to throw this
> last in for completeness. You might also need some way to communicate to
> the COBOL routine that the HLASM routine has written an "EOF" and has ended.
>

​Damn Monday, I forgot the URL links:

PIPE:
https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.bpxb100/pip.htm?view=kc
ATTACH:
https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.bpxb100/atm.htm?view=kc
Read:
https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.bpxb100/red.htm?view=kc
Write:
https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.bpxb100/wrt.htm?view=kc
​



>
>
>
>>
>> Scott
>> IDMWORKS
>>
>
> --
> Our calculus classes are an integral part of your education.
>
> Maranatha! <><
> John McKown
>



-- 
Our calculus classes are an integral part of your education.

Maranatha! <><
John McKown

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

AW: Re: A design question

[Peter Hunkeler]

>Hmmm... Sequencing.  You need to create the pipe before COBOL
can open it.




Any you'd need to run the Cobol and the assembler routine in parallel, not as 
main routine calling a subroutine. UNIX pipes need both ends to be acitve for 
them to work.


--
Peter Hunkeler



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

Re: SORT - How can I put accumulated value on each output record

[Sri h Kolusu]

Minoru Massaki,

I assumed the following

1. Your Input has LRECL=80 and RECFM=FB 
2. The key in position 1 thru 4 is unique and you wanted a running total 
for every record.
3. The first summary field start at 10 for a length of 6 
4. The second summary field  starts at position 21 for a length of 10
5. The summary fields are at position 35 for a length of 8 and position 45 
for a length of 12.

You can use the following JCL

//STEP0100 EXEC PGM=SORT 
//SYSOUT   DD SYSOUT=* 
//SORTIN   DD * 
+1+2+3+4+5+
#001  1   10.5 
#002  53.3 
#003121  120.4 
//SORTOUT  DD SYSOUT=* 
//SYSINDD * 
  OPTION COPY 
  OUTFIL REMOVECC,NODETAIL, 
  SECTIONS=(1,4, 
  TRAILER3=(1,30, 
35:SUBTOTAL=(10,06,UFF,M10,LENGTH=8), 
45:SUBTOTAL=(21,10,UFF,EDIT=(.T 
//*

If for some reason your key(position 1 thru 4 is NOT unique) and yet you 
want to have a running total for every record then you can use the 
following JCL

//STEP0100 EXEC PGM=SORT 
//SYSOUT   DD SYSOUT=* 
//SORTIN   DD * 
+1+2+3+4+5+6---
#ABC  1   10.5 
#ABC  53.3 
#ABC121  120.4 
//SORTOUT  DD SYSOUT=* 
//SYSINDD * 
  OPTION COPY 
  OUTREC OVERLAY=(81:SEQNUM,8,ZD) 
 
  OUTFIL REMOVECC,NODETAIL,BUILD=(80X), 
  SECTIONS=(81,8, 
  TRAILER3=(1,30, 
35:SUBTOTAL=(10,06,UFF,M10,LENGTH=8), 
45:SUBTOTAL=(21,10,UFF,EDIT=(.T 
//* 


Further if you have any questions please let me know

Thanks,
Kolusu
DFSORT Development
IBM Corporation



From:   Minoru Massaki 
To: IBM-MAIN@LISTSERV.UA.EDU
Date:   02/12/2017 06:31 AM
Subject:SORT - How can I put accumulated value on each output 
record
Sent by:IBM Mainframe Discussion List 



I want to have SORTOUT data as following:

Input Data

#001  1   10.5
#002  5 3.3
#003   121  120.4
. . . . . . .

Output Data Set
#001  1   10.5 1   10.5
#002  5 3.3 613.8
#003   121  120.4 127   134.2
. . . . . . .


Output forth column is accumulated value with previous records values on
2nd column.
Output 5th column is also accumulated value with previous records values 
on
3rd column.

Can I make this kind of output by SORT?

I really appreciate that someone would provide sample of SORT control
statement to resolve my requirement.

Minoru Massaki - (M*M)

-- 

全先 実  -  Minoru Massaki  (M*M)
E-mail: mmass...@gmail.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: Loyalty

[Steve Smith]

"It's just business."  - Sal Tessio

sas

On Mon, Feb 13, 2017 at 10:19 AM, Carmen Vitullo 
wrote:

> No company loyalty since my Boeing Helicopter days, in 2001 I was offered
> a job in Arkansas working for an company that basically creates all the
> spam - targeted ad's you see on the internet, and they were also an
> outsourcer.
> I was for warned about this company they have a tendency to lay off every
> year or so just to make the numbers look good, in 2009 when I was the only
> local person that supported the Zos systems and the sysplex's while on
> vacation after a long weekend of working to get another client added to the
> PLEX, I get this call from the Boss in Downers Grove with HR on the call,
> seems my position was eliminated, typical for this company to take the
> folks that have worked there the longest and have the most experience to be
> outsourced themselves to a foreign country, my team leader about a year
> earlier told me no job is #1 and family is #2 his reasoning; if you don't
> have #1 then #2 is left with nothing, I now work for a company that
> respects me and my family time and I do all I can to help make this company
> successful.
>
>
> - Original Message -
>
> From: "scott Ford" 
> To: IBM-MAIN@LISTSERV.UA.EDU
> Sent: Monday, February 13, 2017 9:06:16 AM
> Subject: Re: Loyalty
>
> Well i have a short story about loyalty. I was working for a huge American
> company in NYC. I had gone to Europe to help out on a Data Comm. project.
> During my 2 weeks in Europe I hear the company is laying off people for the
> HQ office in NYC. I call my manager and ask him, was I one of them ? He
> said ' of course not' ...I get back and I was ...The good side of the story
> is that the European HQ put a bid in for me and we ( me and my wife) moved
> to Europe. It was temporary. I was a placeholder for another people of that
> countries nationality. I was then let go for a reason that was not valid.
> Politics ...I never forgot what happened, but I learned ...
>
>
>
> On Sun, Feb 12, 2017 at 5:12 PM, Jack J. Woehr  wrote:
>
> > Edward Gould wrote:
> >
> >> I have never trusted an employer since that time. I think all people
> >> should not trust their employers either.
> >>
> >
> > Define "trust". Certainly the feudal bond and /noblesse oblige/ are gone.
> > In return, we have more freedom to change employment at will and no
> employer
> > holds a résumé of 2-yr. short stays against us. The system is always
> > slanted against the working stiff; complaints survive from ancient
> > Mesopotamia
> > on that score!
> >
> > --
> > Jack J. Woehr # Science is more than a body of knowledge. It's a way of
> > www.well.com/~jax # thinking, a way of skeptically interrogating the
> > universe
> > www.softwoehr.com # with a fine understanding of human fallibility. -
> > Carl Sagan
> >
> >
> >
> > --
> > 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
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



-- 
sas

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

Re: Loyalty

[Carmen Vitullo]

No company loyalty since my Boeing Helicopter days, in 2001 I was offered a job 
in Arkansas working for an company that basically creates all the spam - 
targeted ad's you see on the internet, and they were also an outsourcer. 
I was for warned about this company they have a tendency to lay off every year 
or so just to make the numbers look good, in 2009 when I was the only local 
person that supported the Zos systems and the sysplex's while on vacation after 
a long weekend of working to get another client added to the PLEX, I get this 
call from the Boss in Downers Grove with HR on the call, seems my position was 
eliminated, typical for this company to take the folks that have worked there 
the longest and have the most experience to be outsourced themselves to a 
foreign country, my team leader about a year earlier told me no job is #1 and 
family is #2 his reasoning; if you don't have #1 then #2 is left with nothing, 
I now work for a company that respects me and my family time and I do all I can 
to help make this company successful. 


- Original Message -

From: "scott Ford"  
To: IBM-MAIN@LISTSERV.UA.EDU 
Sent: Monday, February 13, 2017 9:06:16 AM 
Subject: Re: Loyalty 

Well i have a short story about loyalty. I was working for a huge American 
company in NYC. I had gone to Europe to help out on a Data Comm. project. 
During my 2 weeks in Europe I hear the company is laying off people for the 
HQ office in NYC. I call my manager and ask him, was I one of them ? He 
said ' of course not' ...I get back and I was ...The good side of the story 
is that the European HQ put a bid in for me and we ( me and my wife) moved 
to Europe. It was temporary. I was a placeholder for another people of that 
countries nationality. I was then let go for a reason that was not valid. 
Politics ...I never forgot what happened, but I learned ... 



On Sun, Feb 12, 2017 at 5:12 PM, Jack J. Woehr  wrote: 

> Edward Gould wrote: 
> 
>> I have never trusted an employer since that time. I think all people 
>> should not trust their employers either. 
>> 
> 
> Define "trust". Certainly the feudal bond and /noblesse oblige/ are gone. 
> In return, we have more freedom to change employment at will and no employer 
> holds a résumé of 2-yr. short stays against us. The system is always 
> slanted against the working stiff; complaints survive from ancient 
> Mesopotamia 
> on that score! 
> 
> -- 
> Jack J. Woehr # Science is more than a body of knowledge. It's a way of 
> www.well.com/~jax # thinking, a way of skeptically interrogating the 
> universe 
> www.softwoehr.com # with a fine understanding of human fallibility. - 
> Carl Sagan 
> 
> 
> 
> -- 
> 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 


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

Re: CEEBINT

[Lizette Koehler]

What version(s) of Cobol?

What problem are you trying to solve?  Perhaps more information could generate 
better answers?

Lizette


> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Steff Gladstone
> Sent: Monday, February 13, 2017 7:42 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: CEEBINT
> 
> We are considering using the user exit CEEBINT. Is there anyone out there with
> experience using the exit who could point us to the appropriate documentation
> detailing how to use it as well as any other suggestions as to its use?
> 
> Thanks,
> Steff Gladstone
> 

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

Re: A design question

[Paul Gilmartin]

On Mon, 13 Feb 2017 10:01:50 -0500, scott Ford wrote:
>
>I have the following:
>
>1.  Cobol STC
>2.  It calls an Assembler subroutine with does a RACF extract of the
>database for all
> userids and then writes to an output file.
>3.  Is it possible to have the Assembler routine place the extracted data
>into a unix
> pipe or a C type=memory file and then i can retrieve it ?
>
Have you sarted with?:
z/OS 2.2.0
z/OS UNIX System Services
z/OS UNIX System Services Programming: Assembler Callable Services Reference
Callable services descriptions
pipe (BPX1PIP, BPX4PIP) - Create an unnamed pipe

Hmmm... Sequencing.  You need to create the pipe before COBOL
can open it.

-- gil

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

Re: COBDSACB control block

[Lizette Koehler]

What problem are you trying to solve?  Perhaps with more detail, solutions can 
be provided.

What version(s) of Cobol do you need this for?


Lizette


> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Steff Gladstone
> Sent: Monday, February 13, 2017 7:45 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: COBDSACB control block
> 
> Does anybody know where we can find precise and complete information regarding
> the contents of the COBDSACB control block of COBOL?
> 
> Thank you,
> Steff Gladstone
> 

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

Re: Loyalty

[scott Ford]

Well i have a short story about loyalty. I was working for a huge American
company in NYC. I had gone to Europe to help out on a Data Comm. project.
During my 2 weeks in Europe I hear the company is laying off people for the
HQ office in NYC. I call my manager and ask him, was I one of them ? He
said ' of course not' ...I get back and I was ...The good side of the story
is that the European HQ put a bid in for me and we ( me and my wife) moved
to Europe. It was temporary. I was a placeholder for another people of that
countries nationality. I was then let go for a reason that was not valid.
Politics ...I never forgot what happened, but I learned ...



On Sun, Feb 12, 2017 at 5:12 PM, Jack J. Woehr  wrote:

> Edward Gould wrote:
>
>> I have never trusted an employer since that time. I think all people
>> should not trust their employers either.
>>
>
> Define "trust". Certainly the feudal bond and /noblesse oblige/ are gone.
> In return, we have more freedom to change employment at will and no employer
> holds a résumé of 2-yr. short stays against us. The system is always
> slanted against the working stiff; complaints survive from ancient
> Mesopotamia
> on that score!
>
> --
> Jack J. Woehr # Science is more than a body of knowledge. It's a way of
> www.well.com/~jax # thinking, a way of skeptically interrogating the
> universe
> www.softwoehr.com # with a fine understanding of human fallibility. -
> Carl Sagan
>
>
>
> --
> 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

A design question

[scott Ford]

All:

I have the following:

1.  Cobol STC
2.  It calls an Assembler subroutine with does a RACF extract of the
database for all
 userids and then writes to an output file.
3.  Is it possible to have the Assembler routine place the extracted data
into a unix
 pipe or a C type=memory file and then i can retrieve it ?

Or is that to Mickey Mouse ..??

Scott
IDMWORKS

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

Re: Job Loyalty

[scott Ford]

Sometimes very hard with manglers who dont 'get' us real honest to God
techies very frustrating ...at times..



On Mon, Feb 13, 2017 at 8:15 AM, Allan Staller 
wrote:

> Well Said!
>
> 
> This is "Capitalism", making money is king. Every large corporation tries
> to sell this "Job Loyalty" to workers, however, rest assured this is a one
> sided affair. They want you to be loyal.
>
> Then again, think about it. When you start your employment at any company,
> the first thing you agree to is "At will employment", your employment with
> any company is a voluntary one subject to termination by you or company at
> WILL, with or without cause and with or without noticeetc.
>
> Based on that doctrine, "Loyalty" has already left the building.
>
> My relation with all the employers I worked with is simple. It is a
> business, I perform what is expected from me, they pay me. There is no
> love, hate, loyalty involved.
>
> I'd rather be loyal to family, friends.
> 
>
>
> ::DISCLAIMER::
> 
> 
> 
>
> The contents of this e-mail and any attachment(s) are confidential and
> intended for the named recipient(s) only.
> E-mail transmission is not guaranteed to be secure or error-free as
> information could be intercepted, corrupted,
> lost, destroyed, arrive late or incomplete, or may contain viruses in
> transmission. The e mail and its contents
> (with or without referred errors) shall therefore not attach any liability
> on the originator or HCL or its affiliates.
> Views or opinions, if any, presented in this email are solely those of the
> author and may not necessarily reflect the
> views or opinions of HCL or its affiliates. Any form of reproduction,
> dissemination, copying, disclosure, modification,
> distribution and / or publication of this message without the prior
> written consent of authorized representative of
> HCL is strictly prohibited. If you have received this email in error
> please delete it and notify the sender immediately.
> Before opening any email and/or attachments, please check them for viruses
> and other defects.
>
> 
> 
> 
>
>
> --
> 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: COBDSACB control block

[Farley, Peter x23353]

I'm not sure if COBDSACB is one of the ones it handles, but take a look at 
COBANALZ assembler source member in CBT file 321.  There are a number of 
(mostly undocumented) COBOL control blocks from various eras of IBM COBOL that 
are analyzed as part of the COBANALZ process.

HTH

Peter

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Steff Gladstone
Sent: Monday, February 13, 2017 9:45 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: COBDSACB control block

Does anybody know where we can find precise and complete information regarding 
the contents of the COBDSACB control block of COBOL?

Thank you,
Steff Gladstone
--


This message and any attachments are intended only for the use of the addressee 
and may contain information that is privileged and confidential. If the reader 
of the message is not the intended recipient or an authorized representative of 
the intended recipient, you are hereby notified that any dissemination of this 
communication is strictly prohibited. If you have received this communication 
in error, please notify us immediately by e-mail and delete the message and any 
attachments from your system.


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

COBDSACB control block

[Steff Gladstone]

Does anybody know where we can find precise and complete information
regarding the contents of the COBDSACB control block of COBOL?

Thank you,
Steff Gladstone

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

CEEBINT

[Steff Gladstone]

We are considering using the user exit CEEBINT. Is there anyone out there
with experience using the exit who could point us to the appropriate
documentation detailing how to use it as well as any other suggestions as
to its use?

Thanks,
Steff Gladstone

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

Re: Job Loyalty

[Allan Staller]

Well Said!


This is "Capitalism", making money is king. Every large corporation tries to 
sell this "Job Loyalty" to workers, however, rest assured this is a one sided 
affair. They want you to be loyal.

Then again, think about it. When you start your employment at any company, the 
first thing you agree to is "At will employment", your employment with any 
company is a voluntary one subject to termination by you or company at WILL, 
with or without cause and with or without noticeetc.

Based on that doctrine, "Loyalty" has already left the building.

My relation with all the employers I worked with is simple. It is a business, I 
perform what is expected from me, they pay me. There is no love, hate, loyalty 
involved.

I'd rather be loyal to family, friends.



::DISCLAIMER::


The contents of this e-mail and any attachment(s) are confidential and intended 
for the named recipient(s) only.
E-mail transmission is not guaranteed to be secure or error-free as information 
could be intercepted, corrupted,
lost, destroyed, arrive late or incomplete, or may contain viruses in 
transmission. The e mail and its contents
(with or without referred errors) shall therefore not attach any liability on 
the originator or HCL or its affiliates.
Views or opinions, if any, presented in this email are solely those of the 
author and may not necessarily reflect the
views or opinions of HCL or its affiliates. Any form of reproduction, 
dissemination, copying, disclosure, modification,
distribution and / or publication of this message without the prior written 
consent of authorized representative of
HCL is strictly prohibited. If you have received this email in error please 
delete it and notify the sender immediately.
Before opening any email and/or attachments, please check them for viruses and 
other defects.




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

Re: Where's my dump?

[Peter Hunkeler]

Have you tried
//CEEOPTS DD *  TERMTHDACT(UAIMM,,96)/*

The system will use the *last* dump dd statement out of //SYSABEND, //SYSUDUMP 
and //SYSMDUMP found in the step to decide how to format (or not) and where to 
write the dump. With the above option, you should get s system dump but not a 
CEEDUMP.

Note that the system might suppress a dump to //SYSMDUMP if DAE thinks this is 
a dulicate. You should have a corresponding message in the jobs log it this is 
the case.


--
Peter Hunkeler

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

Re: Where's my dump?

[Hardee, Chuck]

Greg,

Occasionally I have to test something using a COBOL program.
This is what I have in my JCL to obtain a SYSMDUMP and I seem to get one every 
time I need one.

//ABNLIGNR DD DUMMY   DO NOT TAKE ABEND-AID DUMP  
//CAOESTOP DD DUMMY/* BYPASS CA-SYMDUMP */
//SYSABEND DD DUMMY   
//SYSUDUMP DD DUMMY   
//CEEDUMP  DD DUMMY   
//CEEOPTS  DD *   
TRAP(OFF,NOSPIE)  
RPTSTG(ON)
RPTOPTS(ON)   
//SYSMDUMP DD DISP=SHR,DSN=S01CH.ASSEMTST.SYSMDUMP

In fact, many times I want to see the results of the program I am testing and I 
define a field like this:

05  make-a-dump.
10  dump-maker   pic 9(05) usage display.

Then I code:
Move spaces to make-a-dump.
Add 1 to dump-maker.

I don't know if this will help, but it works for me.

Chuck

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

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

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

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Greg Boyd
Sent: Monday, February 13, 2017 6:55 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Where's my dump?

I added a CEEOPTS DD * to the job.  And I tried several variations of TRAP ON 
and OFF with SPIE and NOSPIE, and both DUMP and UADUMP, but still not getting 
the S0C4 dump.

I also specified some invalid parms in the CEEOPTS input to make sure the DD 
statement was being processed, and I got CEE3792I and CEE3616I, saying the 
parms were invalid.  

I tried added a SYSMDUMP as well, but I presume the dump should be written to 
CEEDUMP?  
Binyamin:  CEEDUMP, SYSUDUMP, SYSABEND and SYSMDUMP DD all specify SYSOUT=*.  I 
see 'IEF237I JES2 ALLOCATED TO'
for all four, but no output for any of them.

Do I need to specify any compile parms that will enable the dump to be created? 
 or Binder parms that will include the appropriate modules to generate the dump.

I'm sure this is something simple, I just don't do enough COBOL coding.
Greg
Mainframe Crypto
www.mainframecrypto.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: Where's my dump?

[Greg Boyd]

I added a CEEOPTS DD * to the job.  And I tried several variations of TRAP ON 
and OFF with SPIE and NOSPIE, and both DUMP and UADUMP, but still not getting 
the S0C4 dump.

I also specified some invalid parms in the CEEOPTS input to make sure the DD 
statement was being processed, and I got CEE3792I and CEE3616I, saying the 
parms were invalid.  

I tried added a SYSMDUMP as well, but I presume the dump should be written to 
CEEDUMP?  
Binyamin:  CEEDUMP, SYSUDUMP, SYSABEND and SYSMDUMP DD all specify SYSOUT=*.  I 
see 'IEF237I JES2 ALLOCATED TO'
for all four, but no output for any of them.

Do I need to specify any compile parms that will enable the dump to be created? 
 or Binder parms that will include the appropriate modules to generate the dump.

I'm sure this is something simple, I just don't do enough COBOL coding.
Greg
Mainframe Crypto
www.mainframecrypto.com

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

Re: COUPLExx syntax question

[Vernooij, Kees (ITOPT1) - KLM]

Peter,

I agree that I wished I can rely on the fact that when a (enforced, 
syntactical) limit is not documented, means there is no limit. 
Apparently I can expect this from IBM.

Not in every time this is clear and one might wonder how the absence should be 
interpreted. 
For this I like the MICF documentation that always states the range of the 
value of a variable, even when: 
"RANGE OF VALUE:  PAGAPF ranges from a minimum of 0 to a maximum that is 
limited only by practical bounds."

Kees.

> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Peter Relson
> Sent: 03 February, 2017 19:13
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: COUPLExx syntax question
> 
> >I think it would be useful to document this absence of practical
> limitations.
> 
> What you are really talking about is not the absence of a practical
> limitation but the absence of any enforced or expected limit. There is
> (always) a practical limit. That limit is whatever would cause "too
> much"
> resource to be used. That's not to say that that practical limit is
> necessarily anywhere near the typical in-practice usage.
> 
> I do not agree with your thought. When there is an enforced limit, I
> expect it to be documented. It is not feasible to document the lack of
> enforced limit for everything. Perhaps you can explain why it would be
> more important to document the fact that there is no enforced limit for
> this one thing than for the other tens of thousands of no-enforced limit
> things.
> 
> You should expect, in the absence of a statement that there is no
> enforced
> limit, that indeed there is no enforced limit. All enforced limits
> should
> be documented; it could well be that the doc falls short there, and we
> would appreciate learning of such shortcomings. There is always a
> practical limit.  The hope is that the practical limit exceeds the
> in-practice usage.
> 
> Peter Relson
> z/OS Core Technology Design
> 
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

For information, services and offers, please visit our web site: 
http://www.klm.com. This e-mail and any attachment may contain confidential and 
privileged material intended for the addressee only. If you are not the 
addressee, you are notified that no part of the e-mail or any attachment may be 
disclosed, copied or distributed, and that any other action related to this 
e-mail or attachment is strictly prohibited, and may be unlawful. If you have 
received this e-mail by error, please notify the sender immediately by return 
e-mail, and delete this message. 

Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its 
employees shall not be liable for the incorrect or incomplete transmission of 
this e-mail or any attachments, nor responsible for any delay in receipt. 
Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch 
Airlines) is registered in Amstelveen, The Netherlands, with registered number 
33014286



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

Re: IBM LinuxONE Rockhopper

[Mike Beer]

Timothy,
thank you for your detailed answer.
As a former IBMer I still love mainframes. I started working on a 
370/158 some years ago..
Having been in marketing for quite some time (e.g. S/390)  I know how 
difficult it is to do global marketing.
I think everyone here in this group wants the IBM mainframe be / stay 
successful.

People here in this group are asking valid questions, I think.

However look at it from the outside:
- some of the references you mentioned talk about Linux on z, which is 
fine - but NOT about LinuxONE
  (why not have a linuxone page where you can find all relevant 
information - including references?

   http://www-03.ibm.com/systems/linuxone/ could be a good starting point)
- for the LinuxONE community page: when you try to register (i.e. fill 
in the form completely) you may get told that the program is not 
available in your country: 
https://linuxone20.cloud.marist.edu/cloud/#/register
- when an IBMer tells a prospective business partner that ALL z 
certifications are necessary to become LinuxONE partner
- when you have sales leads for LinuxONE, but no one is interested, 
because people are measured on Watson and Bluemix


There seems to be some room for improvement...

Mike

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