Re: Enterprise COBOL 6.3 and IBM Programmer Tools

[Savor, Thomas (Alpharetta)]

>So what can you do *today* if you have an immediate requirement for an AMODE 
>64 COBOL program per Tom Savor's comment, a program that must run both in CICS 
>>Transaction Server for z/OS and in non-CICS batch mode? Tom Marchant provides 
>one answer that works today and is fully IBM supported:
>compile both AMODE 31 and AMODE 64 versions of the same COBOL program from the 
>same source code. Invoke the former within CICS TS, and invoke the latter in 
>(non->CICS) batch, assuming the program can otherwise run both inside and 
>outside CICS TS. Before you dismiss this idea out of hand, let's recognize 
>that many software vendors >already do this and have for many years, for 
>example when they compile and distribute "performance tuned" and "compatible" 
>releases of their software products, each using >different compiler parameters 
>(ARCH, TUNE, etc., as applicable). Also, "debug" and "non-debug" versions, and 
>"ABO'ed" and "non-ABO'ed." Importantly, it's not two versions >of source code; 
>it's only two versions post-compilation.

For us, the programs that run in Batch and Online are DB2 i/o programs.  So 
your solution wont work for us as SQL and LP(64) are in-compatible.
 

Thanks,

Tom Savor

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

Re: it was 20 years ago today ....

[Savor, Thomas (Alpharetta)]

You mean the Mayor that killed corruption and the Mafia in Nyc...that idiot ?? 

Thanks,

Tom Savor
-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Barkow, Eileen
Sent: Friday, January 3, 2020 1:56 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: it was 20 years ago today 

  ⚠ EXTERNAL MESSAGE – Think Before You Click



The current and past idiot Rudolph  Guilianni

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Jesse 1 Robinson
Sent: Friday, January 3, 2020 1:24 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: it was 20 years ago today 

OK, bonus homework question: who was mayor of New York City in Jan 1, 2000?

.
.
J.O.Skip Robinson
Southern California Edison Company
Electric Dragon Team Paddler
SHARE MVS Program Co-Manager
323-715-0595 Mobile
626-543-6132 Office ⇐=== NEW
robin...@sce.com

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

Re: Dynamic and static linked COBOL programs

[Savor, Thomas (Alpharetta)]

Look at the code:
If it says:  CALL  'program' using anything  this is a static call.  That 
program is expected to be in CALLers load module.
If it says:  CALL my-program using anything  this is a dynamic call.  That 
program is not in CALLers load module.
Then look for field my-programit has the name of program to be called. 

Thanks,

Tom Savor
-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
McCabe, Ron
Sent: Thursday, January 2, 2020 4:23 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Dynamic and static linked COBOL programs

  ⚠ EXTERNAL MESSAGE – Think Before You Click



Hello List,

Is there a way I can tell if a COBOL program was compiled and linked 
dynamically or statically?  Most of our programmers can't tell and there are 
times when they compile and link and static program as dynamic and it causes 
issues when the program is executed.

Thanks,
Ron McCabe
Manager of Mainframe/Midrange Systems
Mutual of Enumclaw


Confidentiality Notice: This e- mail and all attachments may contain 
CONFIDENTIAL information and are meant solely for the intended recipient. It 
may contain controlled, privileged, or proprietary information that is 
protected under applicable law and shall not be disclosed to any unauthorized 
third party. If you are not the intended recipient, you are hereby notified 
that any unauthorized review, action, disclosure, distribution, or reproduction 
of any information contained in this e- mail and any attachments is strictly 
PROHIBITED. If you received this e- mail in error, please reply to the sender 
immediately stating that this transmission was misdirected, and delete or 
destroy all electronic and paper copies of this e-mail and attachments without 
disclosing the contents. This e- mail does not grant or assign rights of 
ownership in the proprietary subject matter herein, nor shall it be construed 
as a joint venture, partnership, teaming agreement, or any other formal 
business relationship.

--
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: Enterprise COBOL 6.3 and IBM Programmer Tools

[Savor, Thomas (Alpharetta)]

If I read the Manual correctly, only Batch is 64-bit supported.  CICS is not 
64-bit supported.
I have many DB2 programs that run Batch and Online, so I guess they will have 
to be forced to run as 31-bit. 

Thanks,

Tom Savor
-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Charles Mills
Sent: Tuesday, December 24, 2019 2:57 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Enterprise COBOL 6.3 and IBM Programmer Tools

  ⚠ EXTERNAL MESSAGE – Think Before You Click



A wild guess is that a debugger will need significant upgrades to support 
64-bit storage, a key feature of COBOL 6.3 as I understand things.

Charles


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

Re: Backward compat--how far?

[Savor, Thomas (Alpharetta)]

You can use AMODE 31, RMODE ANY for everything QSAM, BPAM...doesnt matter.
Sometimes a few more hoops have to be jumped thru, but it works just fine.

Thanks,

Tom Savor


-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Charles Mills
Sent: Monday, December 16, 2019 5:16 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Backward compat--how far?

  ⚠ EXTERNAL MESSAGE – Think Before You Click



AMODE 31, RMODE 24 is not illegal. It is what I would use if I were to write a 
non-RENT program that did QSAM or BPAM I/O.

If you think about it, it is a subset of the conditions allowed by AMODE 31, 
RMODE ANY.

Charles


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Rupert Reynolds
Sent: Monday, December 16, 2019 1:35 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Backward compat--how far?

'Whinge' similar to 'complain'. Spellings vary :-)

You're right about the AMODE/RMODE, though. I had them reversed. AMODE 31, 
RMODE ANY, although it was AMODE 31, RMODE 24 in one circumstance I'd have to 
think about.

--
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: Findproc CBTTAPE ?

[Savor, Thomas (Alpharetta)]

>Hi. If you have IBM File Manager then the (FM) FM Enhanced Search 
>facility can be used to search the PROCLIB data sets for a string and 
>return a "smart" list of members containing the string. For z/OS 
>releases prior to
>2.2 SDSF is required. Look for the description of the EFind command in 
>the following section of the FM User's Guide and Reference:
>https://www.ibm.com/support/knowledgecenter/en/SSXJAV_14.1.0/com.ibm.fi
>lemanager.doc_14.1/base/enhancedschfac.html
>

Quick and Dirtyand Free:
If I needed to search members in a chain of PROCLIB's...
I would allocate those PROCLIB's to a DD under ISPFmaybe set this up in my 
logon clist.
Then ISRDDN from Option 6select the PROCLIB DD and search away.
ISRDDN also has a nice way of telling you where in the concatenation a member 
was found in first.

Thanks,

Tom Savor

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

Re: Just how secure are mainframes? | Trevor Eddolls

[Savor, Thomas (Alpharetta)]

In securing Mainframe:
 
One thing I've noticed over the years is how a Company will "hide" their 
Mainframe hardware.
The Hardware for me now is in a unmarked Building that looks like a bunker (I'm 
told).  Pretty bad that the location is in my town, however the address is NOT 
circulated.  The first installation that I worked at, it was well known where 
the data center was.  It was no issue to walk into Operations and tour new 
equipment or talk to operators.  Now, forget it.

Thanks,

Tom Savor

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Schuffenhauer, Mark
Sent: Wednesday, May 29, 2019 2:23 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Fwd: Just how secure are mainframes? | Trevor Eddolls

  ⚠ EXTERNAL MESSAGE – Think Before You Click



My sales favorite was knowing key functionality is vaporware, talking up 
everything the software would do some day. Then being horrified when you 
realize the 'decision makers' are eating it up.  None of them ends up in hell 
when the product doesn't work and the functionality delivery date keeps getting 
pushed forward... but, I got to work with a 3745 until 2009.

Security is no good without PEN testing and auditing from the  Security 
Technical Implementation Guide (STIG) documents.  If you haven't crossed your 
eyes and dotted your teas wait, reverse that.  Your odds of solid security 
can be greatly decreased.

No security by obscurity.
EBCDIC is not a method of encryption.
Stop people from using stupid passwords.  Ideally daily ID's have no elevated 
access, any elevated id must be checked out, activated, with a new password on 
each use.  I realize that would be messy, but if you have better password 
security(pass phrases, excluded words (months of the year, or seasons) or MFA 
going, never mind.  This isn't the paragraph you're looking for...

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of Ray 
Overby
Sent: Wednesday, May 29, 2019 10:12 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Fwd: Just how secure are mainframes? | Trevor Eddolls

In response to "Mistakes, lack of time, lack of control, lack of skills.
Not a platform weakness." comment: The mainframe platform, z/OS, and ESM's all 
rely on integrity to function. A single TRAP DOOR code vulnerability pierces 
the veil of integrity and can be used to compromise the mainframe. Is this a 
platform weakness? I think so. The platform relies on all code it runs adhering 
to certain rules. z/OS could be changed to better check and enforce those rules.

Would you say that the elimination of User Key Common storage is an example of 
a z/OS change to address a mainframe platform weakness? I think so.

An interesting observation. Thanks.

On 5/29/2019 5:25 AM, R.S. wrote:
> That's classical FUD.
> Frightening people.
> "if an exploit", "if job reads you RACF db", "unintended consequences".
> What exactly hacking scenario can provide RACF db to the hacker?
> Yes, I saw APF libraries with UACC(ALTER), UID(0) as standard TSO user 
> attribute, even UPDATE to RACF db. But it's problem of people.
> Mistakes, lack of time, lack of control, lack of skills. Not a 
> platform weakness.
>
> It's typical that assurance/lock/gun salesmen tend to talk about 
> risks, threats and dangers. They create a vision.
> My English is poor, but I can observe it for two of debaters here.
> It's visible. I don't like social engineering.
>

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN
DISCLAIMER: This email and any attachments may contain confidential information 
that is intended solely for use by the intended recipient(s). If you are not 
the intended recipient, you are strictly prohibited from disclosing, copying, 
distributing or using any of the information contained in the communication. If 
you received this email in error, please contact the sender by reply email and 
immediately delete the communication.

--
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: Burroughs WFM vs. z/OS JCl and VSE JCL wasRe: REXX as JCL replacement

[Savor, Thomas (Alpharetta)]

Many years ago when Converting a DDA system from Burroughs to IBM, Burroughs 
packed fields had the annoying habit of putting the sign at the beginning of 
the fieldinstead of the end of the field like IBM.
Made for pages and pages of "Move with Offsets" in the Assembler 
programsCobol didn’t care for it at all.

Does Burroughs still do that ??

Thanks,

Tom Savor

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

Re: z/OS V2R5 Will be the Last Release to Include JES3

[Savor, Thomas (Alpharetta)]

Don't want to start a War between the 2 versions, but I'm curious as to why you 
believe JES3 to be superior to JES2 ??  Is this from a Systems perspective ??  
Maybe JES3 does far many things that JES2 doesn't IDK.  But for me, I'm not a 
System guy, I'm a technical guy that has worked with many applications for 
vendors.  Almost all sites I have worked on used JES2 (and I'm very comfortable 
with it).  But 1 site had JES3...when you develop a Credit Card application for 
a large Bank on JES2...it had about 3200+ jobs to run daily.  Putting those 
jobs on JES3 was a total disaster.  At the time, JES3 required all datasets to 
exist or the job would JCL Error.  Even jobs with a couple input files, 
creating an output file...it would require output to be there.  To fix this, it 
required us to split many jobs in half, some even more...the run total got to 
be somewhere around 6500+ jobs in total.  But we had to build dataset create 
jobs that were parm cards to a utility to create the files, because if JES3 
scanned the JCL and couldn't find it...boom JCL ERROR.

So, I was scarred because "I" saw this restriction as pretty stupid...and never 
saw the point.

To me JES2 is and was exactly what I believe it was designed for a tool to 
support and run applications very efficiently, whereas I felt that JES3 was 
getting in the way of normal application jobs.  Seemed like we were constantly 
trying to please JES3 in some way...so I hope and pray this "standard" wont 
make it to JES2.  

Thanks,

Tom Savor


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Seymour J Metz
Sent: Wednesday, February 27, 2019 4:50 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: z/OS V2R5 Will be the Last Release to Include JES3

I would consider JES3 superior to JES2, but such questions rarely have a 
consensus answer.

Is TSO really considered by all to be better than CMS? Is REXX really 
considered by all to be better than Perl? Is P/I really considered by all to be 
superior to C? I couldn't even get consensus on C versus C++, and they are at 
least similar.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List  on behalf of 
Savor, Thomas (Alpharetta) 
Sent: Wednesday, February 27, 2019 11:18 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: z/OS V2R5 Will be the Last Release to Include JES3

>That means a) IBM has until September 2023 to fully bring JES2 up to
>JES3 standard

Is JES3 really considered by all to be better than JES2 ??
I know it was 20 years ago, but JES3 gave me nightmares, whereas JES2 never has.
>From an application point of view.

Thanks,

Tom Savor

--
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: z/OS V2R5 Will be the Last Release to Include JES3

[Savor, Thomas (Alpharetta)]

>That means a) IBM has until September 2023 to fully bring JES2 up to
>JES3 standard

Is JES3 really considered by all to be better than JES2 ??
I know it was 20 years ago, but JES3 gave me nightmares, whereas JES2 never has.
From an application point of view.

Thanks,

Tom Savor

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

Re: Wells Fargo? Well f*&%#d at the moment: Data center up in smoke, bank website, app down . The Register

[Savor, Thomas (Alpharetta)]

>We've been doing DR mirroring for 20 years. It gets tested often. We've moved 
>production twice to another >data center using our procedures. What we've 
>never done is run production in another location >temporarily. 'Temporary' 
>means move it, run it until at least one transaction is committed, then move 
>it >*all* back. That is hugely complex and costly. 

>A lot of management fantasizes about a big A-B switch that we throw one way or 
>the other. So wrong.

About 5-6 years ago, I was working as a vendor (Daily Support) for Credit Card 
Software for Halifax/Bank of Scotland.  I believe the first time I was given a 
"heads up" was when we were supporting 12 Million Cardholders.  The "Heads up" 
was that on Friday evening at 6pm Main site was going to shut down and the 
whole weekend PRODUCTION was going to run on DR site, then 6am Monday Morning, 
Main site is to come back up and continue as if nothing happened !!!  I 
literally peed  in my pants !!!  Probably everyone in Atlanta could hear 
me...NO !!!  Thinking of all the network signons with Visa and 
Mastercard...all the credit card Authorizations...there was absolutely zero 
chance of this working without issues.

Well, came in Monday morning after receiving no calls over the week-end 
everything was fine.  We ran the Batch Monday night...and that would be 
pulling in transactions from over the week-end from DR site.  
NO ISSUES !!!   Everything was fine.

Whoever did this, from a Systems perspectiveI tip my hat.  I've never seen 
someone do this with Production, but it worked fine...so what do I know.  Never 
seen anyone else do this in my 42 years of Mainframing either.

Unfortunately, Halifax/Bank of Scotland is no longer with us.  They were 
absorbed by Lloyds Banking Group. 


Thanks,
Tom Savor

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

Re: [EXTERNAL] Re: how many OSes run on IBMz

[Savor, Thomas (Alpharetta)]

Here in the USBS = Bull S**t

Thanks,

Tom Savor


The polite translation is Bovine Scatology. Literally the stuff that comes out 
of the south end of a north-bound bull.

In a message dated 1/26/2019 8:39:10 AM Central Standard Time, 
r.skoru...@bremultibank.com.pl writes:
Enlight me, what is BS?

--
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: Are there compiler options to move Working Storage in Cobol above the line?

[Savor, Thomas (Alpharetta)]

DATA(31) - allocates working storage above-the-line
DATA(24) - allocates working storage below-the-line

ALL31 being OFF - is probably what is needed in a mixed  environment.
ALL31 being ON - would say that you have no below-the-line programs for COBOL 
to deal with.


Thanks,

Tom Savor
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Lizette Koehler
Sent: Thursday, January 24, 2019 9:42 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Are there compiler options to move Working Storage in Cobol above 
the line?

So when I look at the compiler options, they have DATA(31)

ALL31 in LE is OFF

Only things I can think of for now.

Lizette

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

Re: Are there compiler options to move Working Storage in Cobol above the line?

[Savor, Thomas (Alpharetta)]

Use DATA(31)

Thanks,

Tom Savor
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Doug
Sent: Thursday, January 24, 2019 8:32 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Are there compiler options to move Working Storage in Cobol above 
the line?

What version of COBOL?

.

On Jan 24, 2019, at 20:06, Lizette Koehler  wrote:

A friend of mine is having a bit of problem with a Cobol program.  WS is about 
7M in size below the line.  This creates the perfect environment for S878-10 
abends.

Is there a compiler option that would move WS above the line?  Or is there a 
different solution.  If there is an option, what level of Cobol did it show up 
in?


No, I do not know what they are doing.  But I am told they cannot change the 
code.

Thanks



Lizette Koehler
statistics: A precise and logical method for stating a half-truth inaccurately

--
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: Pds Copy for Load Lib Members

[Savor, Thomas (Alpharetta)]

From what I see on PDSE, field PDS2TTRT is always low values.  So, if that 
holds true, PDSE wont be an issue.
Program will just need to determine if library is PDS or PDSEI can do that.
Now for a PDS, I need to figure out how to populate it. 

Thanks,

Tom Savor

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Paul Gilmartin
Sent: Monday, January 07, 2019 6:04 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Pds Copy for Load Lib Members

On Mon, 7 Jan 2019 22:55:32 +, Savor, Thomas (Alpharetta) wrote:

>I'm trying to write a copy program for Source code or Load Data from one Pds 
>to Another.
>
Doesn't IBM already supply one?

>The Source Code part seems to be working...no issues.
>The Load library code however, I cant seem to figure out how PDS2TTRT  is 
>populated.
> 
What will you do as more objects move to PDSE?  IBM owns the spec; doesn't 
readily disclose it; probably retains the right to change it (upward 
compatible) with no notice.

-- gil

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

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

Re: Pds Copy for Load Lib Members

[Savor, Thomas (Alpharetta)]

I understand IBM supplies IEBCOPY.
I haven’t tried slaying the PDSE dragon yetjust regular PDS for now.
I was hoping it wasn’t classified info.  
It seems that CBT PDS calculates this but, it's doing some EXCP's...I don’t 
understand what its trying to do. 

I've learned a lot from writing my own...this is a learning experience.

Thanks,

Tom Savor


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Paul Gilmartin
Sent: Monday, January 07, 2019 6:04 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Pds Copy for Load Lib Members

On Mon, 7 Jan 2019 22:55:32 +, Savor, Thomas (Alpharetta) wrote:

>I'm trying to write a copy program for Source code or Load Data from one Pds 
>to Another.
>
Doesn't IBM already supply one?

>The Source Code part seems to be working...no issues.
>The Load library code however, I cant seem to figure out how PDS2TTRT  is 
>populated.
> 
What will you do as more objects move to PDSE?  IBM owns the spec; doesn't 
readily disclose it; probably retains the right to change it (upward 
compatible) with no notice.

-- gil

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

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

Pds Copy for Load Lib Members

[Savor, Thomas (Alpharetta)]

I'm trying to write a copy program for Source code or Load Data from one Pds to 
Another.
The Source Code part seems to be working...no issues.
The Load library code however, I cant seem to figure out how PDS2TTRT  is 
populated.

Here is an example:
- DSN=ISPF..LINKLIB,VOL=SER=DVL010  MEM=PDS$DMP1  -
>dir pds$dmp1
 PDS143I PDS$DMP1 DIRECTORY ENTRY, LENGTH=36
    D7C4E25B C4D4D7F1  01D9082C 01DA0400  *PDS$DMP1.R..*
  0010   02E2001C  C01CC000 8812  *.S..{.{...h.*
  0020  0101  **

 PDS262I LOC NAME VALUE DESCRIPTION
 PDS262I ---  - ---
 PDS262I 00  PDS2NAME PDS$DMP1  MEMBER NAME
 PDS262I 08  PDS2TTRP 01D908TTR OF FIRST BLOCK OF DATA
 PDS262I 0B  PDS2INDC 2C1 TTRS FOLLOW; 12 HALFWORDS OF DATA
 PDS262I 0C  PDS2TTRT 01DA04,00 TTR OF FIRST TEXT BLOCK
 PDS262I 10  PDS2TTRN 00,00 (NOT USED FOR THIS MEMBER)
 PDS262I 14  PDS2ATR1 02NOT REENTRANT; NOT REUS; NOT OVERLAY; NOT TEST
 PDS262INOT ONLY LOAD; NOT SCATTER; EXEC; NOT 1 TEXT
 PDS262I 15  PDS2ATR2 E2NOT DC; TEXT ORG=0; EP=0; HAS RLDS

The data was written to PDS using WRITE Macro, the Directory using STOW Add.
PDS2TTRT "seems" to be an offset as to where load member starts.  But there 
doesn't seem to be a clear way to calculate this.
I have looked at PDS from CBT, but I don't understand what's going on.
Sometimes for the same member, the "offset" changes.
Is there a simple way to figure out what this value should be ??

Thanks,

Tom Savor

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

Re: Where did IBM hide TASID?

[Savor, Thomas (Alpharetta)]

Is there Source code anywhere available for TASID ??
Personally, I'm just curious. 

Thanks,

Tom Savor

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

Re: OT: Rap music (was Re: opinion: multi-platform program design)

[Savor, Thomas (Alpharetta)]

Weird, here is the English translation I have:
You
You have
You have me
You have me to say
You have me to say
And I did not obey

Will you until death does sever
Be upright to her forever

Never

Will you 'til death be her rider
Her lover too, to stay inside her

Never

Thanks,

Tom Savor


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Ron hawkins
Sent: Saturday, June 09, 2018 3:16 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: OT: Rap music (was Re: opinion: multi-platform program design)

You have asked me and I have said nothing.

From Du Hast - Rammstein.

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
David Crayford
Sent: Friday, June 8, 2018 11:13 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [IBM-MAIN] OT: Rap music (was Re: opinion: multi-platform program 
design)

On 9/06/2018 7:03 AM, Ron hawkins wrote:
> You have asked me and I have said nothing.

Are they lyrics from a Barnsey song?

>
> -Original Message-
> From: IBM Mainframe Discussion List  On 
> Behalf Of Savor, Thomas (Alpharetta)
> Sent: Thursday, June 7, 2018 9:50 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: [IBM-MAIN] OT: Rap music (was Re: opinion: multi-platform 
> program design)
>
> Rammstein
>
> Thanks,
>
> Tom Savor
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] 
> On Behalf Of David Crayford
> Sent: Friday, June 08, 2018 12:12 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: OT: Rap music (was Re: opinion: multi-platform program
> design)
>
> On 8/06/2018 3:15 AM, Peter Hunkeler wrote:
>> It's amost Friday, right. At least here in Zurich
>>> Rap music is performed by those that can not sing so others can not think.
>> rap music? Isn't this a contradiction in terms ;-)
>
> What do you listen to, Beethoven? Ramstein? :)
>
>
>> Apologies to all the rappers out there, and the ones who like that 
>> contradiction, ahem.. music. No offense intended.
>>
>>
>> --
>> Peter Hunkeler
>>
>>
>>
>> -
>> - 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
>
> --
> 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


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

Re: OT: Rap music (was Re: opinion: multi-platform program design)

[Savor, Thomas (Alpharetta)]

Rammstein

Thanks,

Tom Savor


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of David Crayford
Sent: Friday, June 08, 2018 12:12 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: OT: Rap music (was Re: opinion: multi-platform program design)

On 8/06/2018 3:15 AM, Peter Hunkeler wrote:
> It's amost Friday, right. At least here in Zurich
>> Rap music is performed by those that can not sing so others can not think.
>
> rap music? Isn't this a contradiction in terms ;-)


What do you listen to, Beethoven? Ramstein? :)


>
> Apologies to all the rappers out there, and the ones who like that 
> contradiction, ahem.. music. No offense intended.
>
>
> --
> Peter Hunkeler
>
>
>
> --
> 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: Product license key program

[Savor, Thomas (Alpharetta)]

Brian,

Never thought about Using CPUID and/or machine type as part of a software key.

Generally speaking we try to stay away from tying application to any kind of 
machine.
Our application is typical Cobol/Asm, Batch/CICS and VSAM/DB2 system.
Cobol 5 was first change in years that required major changes to our 
application.
Usually a change to the Operating System has no effect on application executing 
properly.

But having said that, since I didn’t know really what makes up a key and how 
they work, this is an interesting change in direction and thinking.
Thanks for the ideas.

And thanks for the offer of helpI will almost certainly need it.   

Thanks,

Tom Savor

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

Re: Product license key program

[Savor, Thomas (Alpharetta)]

That's the problem. If you give customer Source code, they can get around the 
key.
The only thing I could think of, was to only deliver object to certain Batch 
and Online modules that never change.  Sort of Black Box those modules.

On the contract thingwell in our case at the time, it was a software sell 
and a bunch of mods we did for this Turkish Bank.  They owed us around 1 
million dollars...then they decided not to pay at all...all support for them 
ended.  The problem was that it was a State Owned Bankso we had to eat it.
It was a hard lesson to learn.

But even the keys, it was fascinating to see these keys.  I've tried to 
understand how in the World these workedi've seen a zap before to extended 
a product from now to next yearnow the zap looked like a couple of LA's 
applied to a module...and the product extended to next year.  But you don’t 
find ANY dates in this program, so how this is done has always been "Magic". 

Thanks,

Tom Savor


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Grinsell, Don
Sent: Monday, March 05, 2018 4:23 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Product license key program

Tom,

I guess it all depends on your contract terms.  If the software requires a key 
to run, then you should be able to get paid for delivering an updated key.  If 
you are delivering source code, well any competent programmer could probably 
circumvent your key logic and be prepared to face the consequences if you 
choose to audit them.  On the other hand, if the license key is for support, 
then they have rights to use the software as delivered, but upgrades or help 
would require an active subscription easily verified on your end.  

Regards,

Don

--
 
Donald Grinsell, Systems Programmer
Enterprise Technology Services Bureau
SITSD/Montana Department of Administration
406.444.2983 (D)


"It was as true as taxes is.  And nothing's truer than them."
~ Charles Dickens (1812-70)

> -Original Message-
> From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On 
> Behalf Of Savor, Thomas (Alpharetta)
> Sent: Monday, March 05, 2018 2:01 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Product license key program
> 
> 
> Back to the keys question, I've tried to figure out how to even have 
> keys in the application system.
> Places that I've worked at, there have been times when getting paid 
> for our software or services has been difficult to collect, so what about 
> keys ??
> Well, that becomes a challenge when we have always delivered the code 
> to the customer...not really sure how to do that.
> 
> Thanks,
> 
> Tom Savor
> 
> --
> 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: Product license key program

[Savor, Thomas (Alpharetta)]

Your right...my bad.  Spelling is my crutch !!!

Thanks,

Tom Savor

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of J R
Sent: Monday, March 05, 2018 4:21 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Product license key program

I apologize up front for my pedantry.  However, in the context of this argument 
... er ... discussion, it seems apropos:
You typed 'incite' I think you meant 'insight'.
You typed 'site' I think you meant 'cite'  (twice).

Peace!

On Mar 5, 2018, at 16:02, Savor, Thomas (Alpharetta) 
<thomas.sa...@fiserv.com<mailto:thomas.sa...@fiserv.com>> wrote:

I would love to get your incite on something

--
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: Product license key program

[Savor, Thomas (Alpharetta)]

" OK, this discussion has reached the level of diminishing returns."

Man, I guess sothis "was" a very interesting discussion about software keys 
that has dissolved quickly.
Guys, I'm not a systems programmer, never have beenbut I'm kind of the 
Applications systems programmer if that exists.
Anyway, I thought Brian asked very thoughtful questions and asked for an 
opinion about which way to go...not a bunch of crap.   
I don’t know Brian at all, but if I could follow his questions, then they were 
probably pretty well explained.

Then there's SeymourI don’t know you either, but as an observation, you 
remind me of my brother.  He will argue with me about the sky being blue.
Some people "must" argue or correct you about everything...it's like it's their 
job or something.
I would love to get your incite on something without the constant seemingly 
condescending corrections to everything.
You may not mean to be condescending, but you come across that way to me.
If I worked at your shop, I wouldn’t ask you for help even if I knew you knew 
the answer, I wouldn’t want to hear the constant argument 
about what I'm doing.

Seymour, you are probably a genius...But at the end of the day, these constant 
corrections or arguments - Does it really matter ??
I site a couple years ago the constant bitching about UNIX or UCC.  People 
learn something and its called something at a site, as long as everyone 
understands what they are talking about...again, does it matter ?? If you 
alienate people, then they aren’t going to listen to you.  
There was a time when all your answer/emails went to the Trash can...and your 
drifting towards that again.  
Most of the time, when you site a sentence or even a wordI have no clue 
what you are talking about.  

Back to the keys question, I've tried to figure out how to even have keys in 
the application system.  
Places that I've worked at, there have been times when getting paid for our 
software or services has been difficult to collect, so what about keys ??
Well, that becomes a challenge when we have always delivered the code to the 
customer...not really sure how to do that.

Thanks,

Tom Savor

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

Re: SMS dataset oddity with COM-Plete

[Savor, Thomas (Alpharetta)]

Hardware Compression ??

Thanks,

Tom Savor

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Brian Westerman
Sent: Monday, February 19, 2018 2:02 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SMS dataset oddity with COM-Plete

Changing SWA and keeping the UCB below the line had not effect, the problem 
still exists.

Brian

--
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: Possible Debug issue

[Savor, Thomas (Alpharetta)]

I tried 2000M...didnt get the errors.  I will pass it on to the tester.

Here is what 2000M gave me:
IEF032I STEP/EP2999  /STOP  2017345.1758   
CPU: 0 HR  00 MIN  00.15 SECSRB: 0 HR  00 MIN  00.02 SEC   
VIRT:   412K  SYS:   336K  EXT:28256K  SYS:11532K  
ATB- REAL:   208K  SLOTS: 0K   
 VIRT- ALLOC:  21M SHRD:   0M  



Thanks,

Tom Savor
Software Developer, Sr
FRMS-SCM
Fiserv
Office:  678-375-1307
Mobile: 404-660-6898
Fax:  678-375-3280
www.fiserv.com



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Lizette Koehler
Sent: Wednesday, December 13, 2017 10:20 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Possible Debug issue

Depending on you IEFUSI or other functions used to control region size, you may 
not be getting what you think 0M gives you.

If you try the suggestion of 2000M for region and rerun the job, what do you 
get?

If you have an ACTRT exit in your shop - it may provide the virtual storage map 
at step end. There you should the Requested/Below/above/ and so forth of 
storage allocation for the step.

Lizette


> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] 
> On Behalf Of Savor, Thomas (Alpharetta)
> Sent: Tuesday, December 12, 2017 11:16 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Possible Debug issue
> 
> On this particular test that got all the storage error 
> messages..region was set to 0M
> 
> Thanks,
> 
> Tom Savor
> Software Developer, Sr
> FRMS-SCM
> Fiserv
> Office:  678-375-1307
> Mobile: 404-660-6898
> Fax:  678-375-3280
> www.fiserv.com
> 
> 
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] 
> On Behalf Of Peter Hunkeler
> Sent: Wednesday, December 13, 2017 1:14 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: AW: Re: Possible Debug issue
> 
> >Debug Tool and Fault Analyzer seem to take a huge amount of memory 
> >when
> working with COBOL 5.  Try setting REGION=2000M.
> 
> 
> What release of z/OS managed to move the whole common area above the bar?
> Seriously, 2000M will probably never be available in the private 
> region. But if you want to see how much you need to be able to debug, 
> within the maximum available, specify REGION=0M.
> 
> 
> --
> Peter Hunkeler
> 
> 
> 
> 
> 
> --
> Peter Hunkeler

--
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: Possible Debug issue

[Savor, Thomas (Alpharetta)]

This is what REGION=0M gave me:
IEF032I STEP/EP2999  /STOP  2017345.1334   
CPU: 0 HR  01 MIN  18.18 SECSRB: 0 HR  00 MIN  00.0
VIRT: 10492K  SYS:   512K  EXT:  1735996K  SYS:11932K  
ATB- REAL:   120K  SLOTS: 0
 VIRT- ALLOC:  20M SHRD:   0M  

Thanks,

Tom Savor
Software Developer, Sr
FRMS-SCM
Fiserv
Office:  678-375-1307
Mobile: 404-660-6898
Fax:  678-375-3280
www.fiserv.com



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Barry Merrill
Sent: Wednesday, December 13, 2017 1:42 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Possible Debug issue

The IEF032I Joblog Message

IEF032I STEP/SAS9/STOP  2017344.2055
CPU: 0 HR  00 MIN  00.67 SECSRB: 0 HR  00 MIN  00.02 SEC
VIRT:   912K  SYS:   292K  EXT:46616K  SYS:11788K
ATB- REAL:  1044K  SLOTS: 0K
 VIRT- ALLOC:  11M SHRD:   0M

has the REGION SIZE allocated in the sum of the EXT + SYS  = 46616K+11788K= 
58404K = 57 MegaBytes

Barry


Merrilly yours,

 Herbert W. Barry Merrill, PhD
 President-Programmer
 Merrill Consultants
 MXG Software
 10717 Cromwell Drive  technical questions: supp...@mxg.com
 Dallas, TX 75229
 http://www.mxg.comadmin questions: ad...@mxg.com
 tel: 214 351 1966
 fax: 214 350 3694




-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Lizette Koehler
Sent: Wednesday, December 13, 2017 9:20 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Possible Debug issue

Depending on you IEFUSI or other functions used to control region size, you may 
not be getting what you think 0M gives you.

If you try the suggestion of 2000M for region and rerun the job, what do you 
get?

If you have an ACTRT exit in your shop - it may provide the virtual storage map 
at step end. There you should the Requested/Below/above/ and so forth of 
storage allocation for the step.

Lizette


> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] 
> On Behalf Of Savor, Thomas (Alpharetta)
> Sent: Tuesday, December 12, 2017 11:16 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Possible Debug issue
> 
> On this particular test that got all the storage error 
> messages..region was set to 0M
> 
> Thanks,
> 
> Tom Savor
> Software Developer, Sr
> FRMS-SCM
> Fiserv
> Office:  678-375-1307
> Mobile: 404-660-6898
> Fax:  678-375-3280
> www.fiserv.com
> 
> 
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] 
> On Behalf Of Peter Hunkeler
> Sent: Wednesday, December 13, 2017 1:14 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: AW: Re: Possible Debug issue
> 
> >Debug Tool and Fault Analyzer seem to take a huge amount of memory 
> >when
> working with COBOL 5.  Try setting REGION=2000M.
> 
> 
> What release of z/OS managed to move the whole common area above the bar?
> Seriously, 2000M will probably never be available in the private 
> region. But if you want to see how much you need to be able to debug, 
> within the maximum available, specify REGION=0M.
> 
> 
> --
> Peter Hunkeler
> 
> 
> 
> 
> 
> --
> Peter Hunkeler

--
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: Possible Debug issue

[Savor, Thomas (Alpharetta)]

On this particular test that got all the storage error messages..region was 
set to 0M

Thanks,

Tom Savor
Software Developer, Sr
FRMS-SCM
Fiserv
Office:  678-375-1307
Mobile: 404-660-6898
Fax:  678-375-3280
www.fiserv.com


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Peter Hunkeler
Sent: Wednesday, December 13, 2017 1:14 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: AW: Re: Possible Debug issue

>Debug Tool and Fault Analyzer seem to take a huge amount of memory when 
>working with COBOL 5.  Try setting REGION=2000M. 


What release of z/OS managed to move the whole common area above the bar?
Seriously, 2000M will probably never be available in the private region. But if 
you want to see how much you need to be able to debug, within the maximum 
available, specify REGION=0M. 


--
Peter Hunkeler





--
Peter Hunkeler 

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

Possible Debug issue

[Savor, Thomas (Alpharetta)]

Anybody ever get this when running a COBOL 5 program under Debug ??

13.34.47 JOB70977  +IEW2974T C008 REGION TOO SMALL TO ESTABLISH BINDER 
ENVIRONMENT.
 13.34.47 JOB70977  +IEW2974T C008 REGION TOO SMALL TO ESTABLISH BINDER 
ENVIRONMENT.
 13.34.47 JOB70977  +IEW2974T C008 REGION TOO SMALL TO ESTABLISH BINDER 
ENVIRONMENT.
 13.34.48 JOB70977  +IEW2971T C406 INSUFFICIENT ABOVE THE LINE STORAGE WAS 
AVAILABLE TO CONTINUE
 13.34.48 JOB70977  + BINDER PROCESSING.
 13.34.48 JOB70977  IEW4000I FETCH FOR MODULE CEEMENU3 FROM DDNAME -LNKLST- 
FAILED BECAUSE INSUFFICIENT STORAGE WAS AVAILABL
13.34.48 JOB70977  CSV031I LIBRARY ACCESS FAILED FOR MODULE CEEMENU3, RETURN 
CODE 24, REASON CODE 26080021, DDNAME *LNKLST*
13.34.48 JOB70977  IEW4000I FETCH FOR MODULE CBCDEBUG FROM DDNAME -LNKLST- 
FAILED BECAUSE INSUFFICIENT STORAGE WAS AVAILABL
13.34.48 JOB70977  CSV031I LIBRARY ACCESS FAILED FOR MODULE CBCDEBUG, RETURN 
CODE 24, REASON CODE 26080021, DDNAME *LNKLST*
13.34.48 JOB70977  IEW4000I FETCH FOR MODULE CBCDEBUG FROM DDNAME -LNKLST- 
FAILED BECAUSE INSUFFICIENT STORAGE WAS AVAILABL
13.34.48 JOB70977  CSV031I LIBRARY ACCESS FAILED FOR MODULE CBCDEBUG, RETURN 
CODE 24, REASON CODE 26080021, DDNAME *LNKLST*
13.34.48 JOB70977  IEW4000I FETCH FOR MODULE CBCDEBUG FROM DDNAME -LNKLST- 
FAILED BECAUSE INSUFFICIENT STORAGE WAS AVAILABL

Without Debug, no issues.
Never heard or seen these messages before.


Thanks,

Tom Savor
Software Developer, Sr
FRMS-SCM
Fiserv
Office:  678-375-1307
Mobile: 404-660-6898
Fax:  678-375-3280
www.fiserv.com



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

Re: Cobol File Question

[Savor, Thomas (Alpharetta)]

In your call to the second program...that has the FD, he owns the file.  If he 
is always opening the file on every call and "should" close file on 
exitthen I would be looking into where you can get out of 2nd program 
without executing Close.  Something like an error.

Thanks,

Tom Savor
Software Developer, Sr
FRMS-SCM
Fiserv
Office:  678-375-1307
Mobile: 404-660-6898
Fax:  678-375-3280
www.fiserv.com


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of scott Ford
Sent: Friday, December 01, 2017 5:51 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Cobol File Question

John,

Yes exactly.., until I can convince an overly cautious manager we should thread 
or multi-task.

Thanks , John..I needed a sanity check

On Dec 1, 2017, 4:55 PM -0500, John McKown , 
wrote:
> On Fri, Dec 1, 2017 at 3:42 PM, scott Ford  wrote:
>
> > All:
> >
> > Sorry for the Cobol question but i have a question..
> > I have s single thread STC calling a second Cobol program that 
> > second program opens files ( sysprint - defined as sequential ) and 
> > writes output. I need to close these files on termination of the STC.
> > We have built an API ...my thought is to pass a variable indicating 
> > to close the files and set a return-code and return back and have 
> > the STC check it..
> >
>
> ​OK. Your COBOL program #1 is doing a COBOL dynamic CALL of this 
> second program. The second program is doing an COBOL OPEN verb on an 
> FD whose SELECT is for DD SYSPRINT,? Am I correct so far? The second 
> program is not doing a COBOL CLOSE on the FD. When the second COBOL 
> program does a GOBACK, it returns to the first program. When the first 
> program terminates, the STC terminates. In this case, where some 
> program does an OPEN but there is no corresponding CLOSE, z/OS itself 
> will do a CLOSE on all still OPEN DDs when the __TCB__ under which 
> some program did the OPEN terminates. This is because OPEN chains DEBs 
> for all OPEN DDs on the TCB under which the OPEN was done. So if there 
> are any DEBs left on this chain, task termination does a CLOSE on them. This 
> is not good practice, but it generally works.
> VSAM data sets get an "abnormal close" set in the catalog for the DSN 
> which causes an "automatic VERIFY" when the VSAM cluster is next OPEN'd.
>
> Or am I totally off base as to what you are asking?
>
>
>
> >
> > Am i thinking right ?
> >
> > --
> >
> > *IDMWORKS *
> >
> > Scott Ford
> >
> > z/OS Dev.
> >
>
>
> --
> I have a theory that it's impossible to prove anything, but I can't 
> prove it.
>
> Maranatha! <><
> John McKown
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

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


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

Re: Here's a horrifying thought for all you management types....

[Savor, Thomas (Alpharetta)]

As an "Assembler" guy.that's great news !

Thanks,

Tom Savor


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Beverly Caldwell
Sent: Thursday, October 05, 2017 11:47 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Here's a horrifying thought for all you management types

From an IBM red book, the one which describes Walmart’s adventures with CICS in 
a cloud.

From the section which describes the activities of the CICS and z/OS systems 
programmers:


“The traditional role of systems programmers over time became focused on system 
administration functions. But, to extend the capabilities of CICS, the 
old-school, multi-role technician must reemerge and embrace the latest 
technologies”


Well some of us never actually went away.


But wait, there’s more. It gets worse. Further on in the same article there’s 
talk of:

“Selecting HLASM and COBOL as service development languages.”

Programming, Jim? *Assembler* language programming? I don’t think we need any 
of *that* here.


What I would like to know is where were all the managers while all this 
programming was going on. Does Walmart have the most enlightened managers in 
the mainframe world or did they just not have a clue what was going on.
I suspect the latter, it’s unlikely Walmart’s managers are any different from 
anyone else’s.


A very interesting red book with lots of detailed information although I kept 
seeing the word 'service'. Not a word one would normally associate with Walmart.

--
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: thought on data integration: Using MS Excel & MQSeries to get data from z/OS.

[Savor, Thomas (Alpharetta)]

I'll state the obvious..
Can this "massage it in Excel" be determined to program it to just update it on 
z/OS ??
Seems like that would eliminate a bunch of CPU cycles transferring back and 
forth and storage to just formally figure out what the "massaging" is.

Thanks,

Tom Savor
Software Developer, Sr
FRMS-SCM
Fiserv


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of John McKown
Sent: Tuesday, August 22, 2017 8:39 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: thought on data integration: Using MS Excel & MQSeries to get data 
from z/OS.

I have a programmer here who is talking about the subject. What is happening 
now is that the Actuarial department is "pestering" him with requests to 
extract data from a VSAM cluster (we don't have DB2 on z/OS), format it into a 
CSV, so that they can download it and import it into Excel. They then massage 
it in Excel, save it as a CSV, upload it to z/OS, and finally ask the 
programmer to load the changed data back into the VSAM cluster. I can imagine 
the shuddering going on, but this is _their_ data and not production data.

Perhaps needless to say, the programmer is getting tired of this.
Also, he is very busy with our revitalization of the z/OS system. He is 
familiar with MS VBA. So what he wants to do is to have a VBA program which can 
use the Windows MQSeries dll to communicate with a CICS transaction. This 
transaction would read or write the data on z/OS from the data in the Excel 
spreadsheet. Personally, I don't _do_ Windows, so I don't know how difficult 
this would be. But if anyone out there knows of any examples which might help 
him code up VBA in Excel with MQSeries, I would appreciate a pointer.

Actually, what I tried to push was giving the actuaries a way to generate an 
Easytrieve or COBOL program to do what they want, then submit a job via ftp to 
do the actual reading or writing of the VSAM data. We can do this in batch 
because we have SYSB, which allows a batch job to update a VSAM cluster via 
CICS.

--
If you look around the poker table & don't see an obvious sucker, it's you.

Maranatha! <><
John McKown

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


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

Re: STOP If Yo Heard This Before ... IBM Continues to shed Staff

[Savor, Thomas (Alpharetta)]

Maybe IBM will get David Brent to handle the redundancies in the UK.


Thanks,

Tom Savor

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of esst...@juno.com
Sent: Friday, March 31, 2017 4:30 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: STOP If Yo Heard This Before ... IBM Continues to shed Staff

https://www.theregister.co.uk/2017/03/31/ibm_bloodbath_continues/

--
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: COBOL/LE question

[Savor, Thomas (Alpharetta)]

IGZ0268W means that OS/VS COBOL is trying to interface with COBOL 5.  Which is 
a no-no.

Thanks,

Tom Savor
Software Developer, Sr
FRMS-SCM
Fiserv

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

Re: PDSe Question

[Savor, Thomas (Alpharetta)]

Interesting tidbit of info on this code in the manual that Greg pointed me to:



This code works perfectly as written:

...

  CHECK DECB1

  LHWORK1,DCBBLKSI   Block size at time of READ

  L WORK2,DECB1+16   Status area address

  SHWORK1,14(WORK2)  WORK1 has block length

  ...



Of course being curious it looks to me that DECB+16 points to IOB Address

Then looking at the IOB DSECT (IEZIOB), 14 from the beginning = returned block 
length.

14 from the beginning is accurate...from  my dump.



However when trying to map this with IEZIOB, it seems to have wrong 
displacement.

  ORG   IOBPREFX@L3A

  SPACE 1

 ***@L3A

** @L3A

**NORMAL SCHEDULING PRE-PREFIX @L3A

***** 8 BYTES  @L3A

** @L3A

***@L3A

  SPACE 1

 IOBVIDAN DSF VIRTUAL IDAW FOR QSAM, BSAM, BPAM NORMAL  @L3A

*  SCHEDULING, BUFFER START ADDR   @L3A

IOBVIDA2 DS0FVIRTUAL IDAW WHEN NOT BEGINNING OF BUFFER,@L5C

*  USED FOR UNIT RECORD DEVICES ONLY   @L5C

IOBLENRD DSF LENGTH OF BLOCK READ, LBI @L5A



Instead of ORGing back to the beginning, it should ORG to IOBPREFX+8 to make 
the displacement correct.

IOBLENRD should displace to 000C, but DSECT has it at 0004.





Thanks,



Tom Savor

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

Re: PDSe Question

[Savor, Thomas (Alpharetta)]

>How to determine the length of the block for a BSAM/BPAM RECFM=FB dataset is 
>fully described in the z/OS DFSMS Using >Data Sets book, Processing Sequential 
>Data Sets, Determining the Length of a Block.
>Greg

>https://www.ibm.com/support/knowledgecenter/SSLTBW_2.1.0/com.ibm.zos.v2r1.idad400/len99.htm?lang=en

That's exactly what I was looking far.  Never knew that the DECB had much 
useful, but it looks that it has everything I need.
Thanks for this.

Thanks,

Tom Savor

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

Re: PDSe Question

[Savor, Thomas (Alpharetta)]

>Might want to look at some of PDS-CBT File 182 PDSE commands. The source is  
>provided for IEFPDSE and others...  

I did look at IEFPDSE, but I doesn't read the all directory and member records.
I looked at 182 PDSMAIN program, cant say that I understand exactly whats 
happening.
I've never used EXCP instructions before.hopefully that's not necessary.

Thanks,

Tom Savor

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

Re: PDSe Question

[Savor, Thomas (Alpharetta)]

> And if your member, by happenstance, exactly fills the whole last block, what 
> happens?  Or have you just been lucky to date?

Calculate DCBLRECL from OPEN (saved) = 80 divided into DCBLRECL after READ = 
27920.  Simple calculation gives me 349 records to process.

>I would expect that each member is followed by an end-of-file, causing an 
>EODAD exit to be entered.  I'd be surprised if PDSE doesn't behave that way.

You do receive an EODAD on the next read, but in my example of 500 lines in a 
program
first Read = full block (349 records), second Read = short block (actually 151 
records, but program thinks its 349), next read gets EODAD.

>Use QSAM with LRECL=80.

I'm using BPAM, LRECL=80, DSORG=PO.
I'm processing all members of a PDS or PDSe.  Could be 5 members or 5000 
members, either way program should handle it.
 

Thanks,

Tom Savor

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

Re: PDSe Question

[Savor, Thomas (Alpharetta)]

>>I've run into another PDSe problem.
>>When I was reading through a PDS file of Source Code, I would define 
>>DCB as RECFM=U, After the OPEN, DCBLRECL = Record Length. DCBBLKSI = 
>>File Block Size After issuing a READ, DCBLRECL would be the Actual Block Size.
>>My PDS :  LRECL=80, BLKSIZE=27920 Number of records per block = 349 So 
>>if a program has 500 lines of code:
>>First read DCBLRECL would = 27920, Number of lines would = 349 Next 
>>read DCBLRECL would = 12080, Number of lines would = 151 Maybe it was 
>>an accident, but this has worked for me forever.
>>
>>Now same program using same DCB definition, determines than it's a PDSe 
>>before the OPEN.
>>If it's a PDSe, program changes RECFM to be FBwhich returned a full block 
>>of records.
>>How do I tell when the difference between a full block and a short block on a 
>>PDSe ??
>>Hope I explained this right.
>>
>I don't think block boundaries mean much to a PDSE which keeps everything in 
>4KiB pages.
>You can override with any DCBBLKSI from 80 to 27920 and a READ will fetch 
>enough records to fill that block.

>Customarily, RECFM=U indicates a Program Object.  Perhaps PDSE enforces this.

>What are you trying to do?

Well I read though the directory, Execute a FIND on Member Name, then Execute a 
READ on the Source Code.
This Source Code is our Cobol or Assembler programs or copybooks, that I will 
pull certain tagged code from one library to another.  PDS works fine, but PDSe 
isn’t telling me when I get a short block.  Program thinks its getting a full 
block read no matter whether program has 50 records or 500 records.  I cant 
tell when there aren’t enough records to fill whole block.

Like I said, maybe I got lucky or it was an accident.but I used RECFM=U 
definition for our Source Code library and looking DCBLRECL after executing 
each READ macro gave me actual block sizefull or short.  That allowed me to 
calculate when a member was finished.  

Thanks,

Tom Savor

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

PDSe Question

[Savor, Thomas (Alpharetta)]

I've run into another PDSe problem.
When I was reading through a PDS file of Source Code, I would define DCB as 
RECFM=U,
After the OPEN, DCBLRECL = Record Length. DCBBLKSI = File Block Size
After issuing a READ, DCBLRECL would be the Actual Block Size.
My PDS :  LRECL=80, BLKSIZE=27920 Number of records per block = 349
So if a program has 500 lines of code:
First read DCBLRECL would = 27920, Number of lines would = 349
Next read DCBLRECL would = 12080, Number of lines would = 151
Maybe it was an accident, but this has worked for me forever.

Now same program using same DCB definition, determines than it's a PDSe before 
the OPEN.
If it's a PDSe, program changes RECFM to be FBwhich returned a full block 
of records.
How do I tell when the difference between a full block and a short block on a 
PDSe ??
Hope I explained this right.


Thanks,

Tom Savor




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

Re: Outsourcing Stories Good or Bad!

[Savor, Thomas (Alpharetta)]

Vignesh,

Until you have had your job (your way of life) ripped away from you, you cant 
get upset when folks get testy.
Management loves to tell their bosses that we are going to Outsource 
ITsaving boat loads of money, but of course they will get a huge bonus once 
its Outsourced.  Then they will disappear once there is a debris field of 
problems.  Who's going to get them out of the ditch.well those same folks 
that you either laid-off, forced to retire or if you are lucky, still work 
there.

We know that Outsourced folks aren't as good as local staffproblem is 
Management doesn't see it that way.
They see a Cobol programmer is a Cobol programmernot a Cobol programmer 
with 40 years experience and 20-30 years on an application verses a Cobol 
programmer right out of school.  Those 40 years of experience has shown me how 
to code a program or how to fix a problem.unfortunately many times it's 
because we know what will NOT work.  So, once we find a way or method of doing 
things, we stick with itit's called experience.

One of the reasons these guys and gals know s much about Z/oS Operating 
System is because they didn't start at Z/oS, many started back in the DOS/VS 
days.  My opinion, Systems folks "had" to know a lot more about the Operating 
System then they do today.  They didn't have all the fancy cool tools that say 
Candle or CA or BMC put out today.  Many times, they had to roll up their 
sleeves and make Programming changes to the Operating System or to an 
Application in a ditch.  

>From an application side, there was no such thing as a job scheduler.  
>Scheduling jobs was a part of the Lead Operators job.  Along with knowing what 
>jobs can run togetherenough memory or what disk packs were mounted.  When 
>was the last time you mounted disk packs each night ??  I used to do it all 
>the timenow, no one does it.

I personally don't like Outsourcing at all.  The joke is that, this can be done 
and no one will notice or there wont be "much" of a cost.  How much cost is the 
Business willing to take ??  How much control are you willing to give up ??  Is 
it good business to have business in one Country, IT in another ??  Could be 
HUGE Customer Privacy or Business interests when IT is in a different Country.  
As a vendor, how do I know that my code will be safe in another Country ??

Sorry guys, off my box nowback to work.

Thanks,

Tom Savor
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Sankaranarayanan, Vignesh
Sent: Thursday, February 25, 2016 3:52 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Outsourcing Stories Good or Bad!

>No one's forcing you to Ed. But I'm guessing you're helping around here 
>because you love what you do, not because you >want to help "your people" 
>alone.
>One can't learn a lot from equals, and one certainly can't learn a lot from 
>those who are (for the lack of a more sensitive >phrase) below them.
>Sure, if this community doesn't want to help, that means workload mounts for 
>IBM in the form of a trillion more service >requests lol.
>But those who are here to learn will find a way.

- Vignesh
Mainframe Infrastructure

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

Re: COBOL v5

[Savor, Thomas (Alpharetta)]

I'm not sure about the ISAM part.  I HATED ISAM.  If you enjoy watching your 
jobs grind away seemingly foreverthen you liked ISAM.  I've always loved 
VSAMmaybe because I hated ISAM so much.

Ever have ISAM job that did an Update in Place (not file in/ file out)ugghh 
 !

Thanks,
Tom


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of R.S.
Sent: Thursday, January 28, 2016 5:28 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: COBOL v5

W dniu 2016-01-28 o 19:44, Charles Mills pisze:
> I cannot speak for IBM, but IMHO they may have felt that way at one 
> time, but EC 5.2 is clearly an investment on IBM's part and a 
> commitment to the future of COBOL.
>
> You can't make an omelet without breaking eggs. "Add new features" and 
> "make it go into an old-fashioned load module" are potentially 
> inconsistent requirements.
>
Well, IMHO there are two kinds of mainframe customers:

a) Legacy
We don't want PDSE, We don't want binder. We don't want SMS. We still want VSAM 
passwords. We don't want VSAM. ISAM was good. We don't want FICON. We want 
ESCON ...for BUS connectivity. We want 3274...

b) modern
We want COBOLE AMODE64. We want HFS/ZFS >4GB. We want DSORG=PO to be 
multi-volume. We want JCL modifications. Etc.

The problem is satisfying b) means troubles for a) group.


--
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 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
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.2016 r. kapita zakadowy mBanku S.A. (w caoci 
wpacony) wynosi 168.955.696 zotych.


--
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: Compile error

[Savor, Thomas (Alpharetta)]

>"The name DB2, or IBM Database 2, was first given to the Database Management 
>System or DBMS in 1983 when IBM >released DB2 on its MVS mainframe platform." 
>-- Wikipedia, citing an IBM manual as authority.

All these years, I've have only known of DB2.  The name seems to have stuck.
  
Was there ever a DB1 ??
Will there ever be a DB3 ??

Thanks,
Tom

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