Re: Stupid JCL trick?

[Don Leahy]

One of my favourite tricks is to use the ISPF editor to Exclude the lines I
don't want, and then issue the SUB NX command.  Only the JCL in the
non-excluded lines will be submitted.

On Fri, Feb 24, 2012 at 10:58, Scott Ford  wrote:

> Hey Gil,
>
> Is the IF/THEN assuming, big word here, that the 1 is a return code, just
> a thought
>
> Sent from my iPad
> Scott Ford
> Senior Systems Engineer
> www.identityforge.com
>
>
>
> On Feb 24, 2012, at 8:37 AM, Paul Gilmartin  wrote:
>
> > On Thu, 23 Feb 2012 07:52:38 -0500, Bill Ashton wrote:
> >
> >> I use this sort of trick often for controlling sections of JCL, For
> >> example, I might have a step or two that deletes and allocates files,
> then
> >> another step that processes data into the new files, and finally a step
> >> that prints report files from the job. Then at the top I would SET
> ALLOC  =
> >> either 1 to run or 0 to not run, SET PROCESS to 1/0, and SET REPORTS to
> 1/0.
> >>
> >> In the JCL I start with a do-nothing BR14, and then surround each
> section
> >> with IF &ALLOC=1 THEN..ENDIF   If &PROCESS=1 THEN.ENDIF and If
> >> &REPORTS=1 THEN.ENDIF
> >>
> > This would appear to be disallowed by:
> >
> >   *  z/OS V1R13.0 MVS JCL Reference
> >   * SA22-7597-15
> >
> > where I read:
> >
> > 17.1.9 Considerations when Using the IF/THEN/ELSE/ENDIF Construct
> >
> > Be aware of the following considerations when using the
> IF/THEN/ELSE/ENDIF statement construct:
> >   ...
> >   # You can specify symbolic parameters on
> > IF/THEN/ELSE/ENDIF statements provided that
> > they resolve to one of the supported
> > relational-expression keywords listed in the
> > preceding topic (that is, RC, ABEND, ...). Any
> > other symbolic parameters, even if accepted by
> > the system, are not intended or supported.
> >
> > Would you submit to a code review any code that depends on
> > behavior which is "not intended or supported" by the vendor?
> >
> > Which leaves a question: what about constructs that are not
> > documented in an earlier topic as supported, but are coded
> > directly, not involving symbolic parameters?
> >
> > -- gil
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
>

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

Re: USS vs USS

[Don Leahy]

Chris

My comment was an attempt at humour.  Since this topic has gone far past the
point where anyone is smiling, I shall refrain from commenting further.

As for the delay in my response; that is inevitable because I am not allowed
to post to IBM-MAIN from work.

On Fri, May 6, 2011 at 05:24, Chris Mason  wrote:

> Don
>
> > Universally understood? If that were true there wouldn't be any debate,
> would there?
>
> The only debate we need have in relation to this post is whether or not you
> are really interested in taking part in the discussion thread or are just
> here to
> make waves.
>
> Your point has already been made and the implicit misunderstanding quashed:
> [1]
>
> http://alabamamaps.ua.edu/cgi-bin/wa?A2=ind1105&L=ibm-
> main&T=0&F=&S=&P=27337
> http://alabamamaps.ua.edu/cgi-bin/wa?A2=ind1105&L=ibm-
> main&T=0&F=&S=&P=31464
>
> Not that I fully understand the way the time offset works completely but it
> is
> evident that this is not a case of not having had a change to "see" -
> however
> you do it - or don't as the case may be! - posts since there is at least 10
> hours between my demolishing response and you're identical supposed
> objection:
>
> Date: Thu, 5 May 2011 05:16:25 -0500 vs. Date: Thu, 5 May 2011 17:29:35 -
> 0400
>
> I appreciate that you initiated this subdiscussion but it's one of the
> beauties
> of a list discussion that anyone may take up the cudgel of debate.
>
> Of course, all this goes equally for Bingo HD -- I could say especially the
> cudgel part - but this is a family list and we should try to curb any
> aggression
> however much provoked - so I won't! -- to whom there is no point my
> responding.
>
> -
>
> [1] Note I now provide archive references rather than text in order to cut
> down on the "noise" presumably equating to "volume" or perhaps "count" -
> but
> I deal with that by doubling up responses where I'm pretty sure the rude -
> and
> artificially deaf - contributor no longer has the decency to read posts
> which
> expose his (could be "her" although I have no evidence - yet - for a "her")
> -
> which some tetchy contributors find bothersome.
>
> -
>
> Chris Mason
>
> On Thu, 5 May 2011 17:29:35 -0400, Don Leahy 
> wrote:
>
> >Universally understood?  If that were true there wouldn't be any debate,
> >would there?
> >
> >On Wed, May 4, 2011 at 14:16, Chris Mason 
> wrote:
> >
> >> Don
> >>
> >> We are not dealing with a language - that would be another campaign
> such as
> >> getting rid of the stupid misuse of "issue" or "issues" for "problem".
> We
> >> are
> >> dealing with explaining technical matters where there is an opportunity
> for
> >> ambiguity if we don't stick to universally understood, accepted and
> >> mandated
> >> expressions.
> >>
> >> Chris Mason
> >>
> >> On Mon, 2 May 2011 17:53:54 -0400, Don Leahy 
> >> wrote:
> >>
> >> >Usage gives meaning.  That's how languages evolve.  Acronyms too,
> >> >apparently.  ;-)
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: USS vs USS

[Don Leahy]

Universally understood?  If that were true there wouldn't be any debate,
would there?

On Wed, May 4, 2011 at 14:16, Chris Mason  wrote:

> Don
>
> We are not dealing with a language - that would be another campaign such as
> getting rid of the stupid misuse of "issue" or "issues" for "problem". We
> are
> dealing with explaining technical matters where there is an opportunity for
> ambiguity if we don't stick to universally understood, accepted and
> mandated
> expressions.
>
> Chris Mason
>
> On Mon, 2 May 2011 17:53:54 -0400, Don Leahy 
> wrote:
>
> >Usage gives meaning.  That's how languages evolve.  Acronyms too,
> >apparently.  ;-)
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: TSO Profile NUM and PACK

[Don Leahy]

Perhaps he is referring to IEBUPDTE?  I don't know of anyone who maintains
code that way, but there might be someone out there who does.

Personally, I have been campaigning against the use of sequence numbers in
Cobol programs for years.

On Tue, May 3, 2011 at 10:03, John McKown wrote:

> Then explain them to this poor fool. I find them to be a useless
> anachronism. And your answers tend to be so short as to be unhelpful.
>
> --
> John McKown
> Maranatha! <><
> Sent from my Vibrant Android phone.
>
> On May 3, 2011 8:03 AM, "Shmuel Metz (Seymour J.)" <
> shmuel+ibm-m...@patriot.net> wrote:
>
> In ,
> on 05/02/2011
>  at 09:23 AM, "McKown, John"  said:
>
> >Are you humor impaired?
>
> Are you a failed comedian?
>
>
> >Or maybe you've just be around the government too long.
> Or maybe I just understand the issues better than you.
>
>
> >And, yes, I know about ISPF's "modification level" use of the
> >sequence columns.
> Suggesting that you don't understand the issues. The use of columns
> 79-90 is only a minor part of why sequence numbers are useful.
>
>
> --
> Shmuel (Seymour J.) Metz, SysProg and JOAT
>
> ISO position; see 
> We don't care. We don't have ...
>
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu w...
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: USS vs USS

[Don Leahy]

Usage gives meaning.  That's how languages evolve.  Acronyms too,
apparently.  ;-)

On Mon, May 2, 2011 at 17:42, Scott Rowe  wrote:

> Ed,
>
> That has to be the most sensible post of this entire idiotic kerfuffle.
>
> I owe you a beer if I ever make it to SCIDS again.
>
> Scott
>
> On Mon, May 2, 2011 at 11:55 AM, Edward Jaffe
> wrote:
>
> > On 5/2/2011 8:44 AM, Ed Gould wrote:
> >
> >> I suggest a SHARE requirement to get IBM to decide once and for all of a
> >> definition for USS.
> >>
> >
> > I would like to know which use is the most offensive to the largest
> number
> > of people. That's the one I will start using most.
> >
> > --
> > Edward E Jaffe
> > Phoenix Software International, Inc
> > 831 Parkview Drive North
> > El Segundo, CA 90245
> > 310-338-0400 x318
> > edja...@phoenixsoftware.com
> > http://www.phoenixsoftware.com/
> >
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> > Search the archives at http://bama.ua.edu/archives/ibm-main.html
> >
>
> CONFIDENTIALITY/EMAIL NOTICE: The material in this transmission contains
> confidential and privileged information intended only for the addressee.
> If you are not the intended recipient, please be advised that you have
> received this material in error and that any forwarding, copying, printing,
> distribution, use or disclosure of the material is strictly prohibited.
> If you have received this material in error, please (i) do not read it,
> (ii) reply to the sender that you received the message in error, and
> (iii) erase or destroy the material. Emails are not secure and can be
> intercepted, amended, lost or destroyed, or contain viruses. You are deemed
> to have accepted these risks if you communicate with us by email. Thank
> you.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: An unnecessary controversy (Was: Ported tools for z/OS on ADCD)

[Don Leahy]

On Mon, May 2, 2011 at 12:22, Chris Mason  wrote:

> John
>
> However, as I have just mentioned to Ed Gould, it's only a "VTAM message
> 10"
> these days because VTAM developers were prepared to allow the IP side of
> Communications Server to use their macros for the purposes of providing a
> table for the TN3270 server to behave like VTAM does when analysing a 3270
> display user's attempts to enter the information necessary to prepare an
> SNA
> session initiation request and to return suitable messages when he or she
> made a mess of it, in general and the initial message 10 apart, of course.
>
> > I use "z/OS UNIX" or "z/OS UNIX System Services" ...
>
> What about the even further compressed "zUNIX" you suggested a while ago?
> Perhaps Ed Gould's initiative with SHARE could have that enshrined as the
> approved and unambiguous abbreviation - although it did cause one of the
> usual suspects to lose a vital part of his anatomy when last suggested!
>
> Chris Mason
>
> On Mon, 2 May 2011 10:56:56 -0500, McKown, John
>  wrote:
>
> >Personally, I don't use USS at all. I use "z/OS UNIX" or "z/OS UNIX System
> Services" for UNIX related posts. For CommServer, I will usually say "the
> VTAM
> message 10 screen", which is what most of the VTAM related USS message
> seem to be related to. It is much more difficult for anybody, even n00bies,
> to
> be confused by that. Oh, I need to type more characters. But I can afford
> the
> pain. And yes, with my arthritis, it hurts to type. That's why some of my
> posts
> have misspellings and other errors. Well, that and I'm lazy.
> >
> >--
> >John McKown
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: Message Pop up

[Don Leahy]

You can set attributes at the character level through the use of ISPF shadow
variables in your panel definition.

On Fri, Apr 29, 2011 at 08:54, Elardus Engelbrecht <
elardus.engelbre...@sita.co.za> wrote:

> Chris Mason wrote:
>
> >... and I don't know whether or not it is possible in ISPF to set
> attributes at
> the character level. What you could do using field attributes is make the
> blinking character a field but then you would need to allow for three
> apparent
> or logical blanks between each word in your message which might be a bit of
> a
> limitation.
>
> It is indeed so that there is a limitation, which caused me careful/painful
> planning of my homegrown ISPF panels... :-[
>
> >[2] Thanks for the reminder to download *all* the V1R12 manuals before the
> end of the month since I still have some "volume" left in my ISP's monthly
> quota.
>
> It is a big roaring lion [1] pleasure! ;-D
>
> Groete / Greetings
> Elardus Engelbrecht
>
> [1] - in the '80 or so, South African Breweries has a Lager (type of beer)
> called 'Lion Lager' - Their advertising slogan was: Beer pleasure - Lion
> pleasure.
>
> Is it already Friday? Hmmm... :-D
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: Recursive PERFORM in COBOL

[Don Leahy]

Recursive performs are certainly not forbidden, but are rare.  I once used
one as the target paragraph of the ON OVERFLOW clause of STRING operation.


 A100-CONTINUE.
. . . a lot of stuff omitted . . .
   PERFORM
  VARYING WORD-IX FROM WORD-IX BY +1
UNTIL WORD-IX > +100
   OR INPUT-WORD (WORD-IX) = SPACES
  MOVE INPUT-WORD (WORD-IX) TO WS-WORD
  STRING WS-WORD
   DELIMITED BY SPACES
 SPACE
   DELIMITED BY SIZE
 INTO OUTPUT-LINE
 WITH POINTER WS-CHAR-OUT-PTR
   ON OVERFLOW
  PERFORM A100-CONTINUE
  END-STRING
   END-PERFORM
   .

On Mon, Apr 25, 2011 at 16:56, Frank Swarbrick <
frank.swarbr...@efirstbank.com> wrote:

> Couple questions
>
> What do you mean that a recursive PERFORM is forbidden?  While I can't
> think of a good use for it, and when I tried it I got into a loop, it
> doesn't cause a compile or run-time error.
> Here's what I tried:
>
> identification division.
> program-id.  recur.
> data division.
> working-storage section.
> 77  x pic 9(4) comp value zero.
>
> procedure division.
>perform para
>goback.
>
> para.
>add 1 to x
>display x
>if x < 3
>display 'before'
>perform para
>display 'after'
>else
>display 'no'
>end-if
>display 'end'
>.
>
>
> 0001
> before
> 0002
> before
> 0003
> no
> end
> after
> end
> after
> end
> after
> end
> ...and on and on and on...
>
> So while it doesn't "work", neither is it apparently disallowed.
>
> In any case, I wonder if it would be useful to open a PMR to see if they
> have any suggestions on how to debug your issue.  It's an interesting issue,
> and in my 15 years of COBOL programming I don't think I've ever had a case
> where I had to debug such a thing.  Lucky perhaps?
>
> Can this issue not be reproduced in a test/dev region?
>
> I'm surprised it's up to a sysprog to figure out this issue.  I don't think
> my sysprogs would touch COBOL with a ten foot pole.  :-)  They'd shoot us if
> we (appl dev) gave this to them to resolve.  And rightly so.
>
> Frank
>
> --
>
> Frank Swarbrick
> Applications Architect - Mainframe Applications Development
> FirstBank Data Corporation - Lakewood, CO  USA
> P: 303-235-1403
>
>
> On 4/25/2011 at 1:49 PM, in message
> ,
> "McKown,
> John"  wrote:
> > It is possible to enter a paragraph in either way: You can PERFORM a
> section,
> > paragraph, or series of paragraphs (A THRU B). It is possible, but
> unlikely
> > to have:
> >
> > A.
> > ...code
> >PERFORM B THRU D.
> >PERFORM C.
> > ...
> >GOBACK.
> > B. code
> > ... more code in B
> > C. code
> > ... more code in C
> > D. code
> > ... more code in D
> > E.
> >
> > Now, assume that some statement in C causes an abend. Was it from the
> first
> > PERFORM, where it just got "dropped into" on the way from B to D? Or was
> it
> > the second PERFORM where it was directly PERFORM'd from paragraph A? I
> will
> > admit that this code sequence is unlikely. But I don't really care. This
> is
> > for my learning and whining pleasure . We don't having anything
> this
> > unusual. What we have is more like one paragraph which reads a file. That
> is
> > all it does. But it is PERFORMed from 6 different paragraphs. Which are
> > themselves PERFORMed from more than one other paragraph each. We get a
> loop
> > (in CICS to be exact) and I cancel the transaction. I am almost always in
> > that "read" paragraph. With no idea where I came from, so doing
> diagnostics
> > is difficult. And putting in "tracing" entries in production CICS code
> when
> > we are "screamed" at about the "inordinate cost to run the z" is just not
> > politically acceptable.
> >
> > --
> > John McKown
> > Systems Engineer IV
> > IT
> >
> > Administrative Services Group
> >
> > HealthMarkets(r)
> >
> > 9151 Boulevard 26 * N. Richland Hills * TX 76010
> > (817) 255-3225 phone *
> > john.mck...@healthmarkets.com * www.HealthMarkets.com
> >
> > Confidentiality Notice: This e-mail message may contain confidential or
> > proprietary information. If you are not the intended recipient, please
> > contact the sender by reply e-mail and destroy all copies of the original
> > message. HealthMarkets(r) is the brand name for products underwritten and
> > issued by the insurance subsidiaries of HealthMarkets, Inc. -The
> Chesapeake
> > Life Insurance Company(r), Mid-West National Life Insurance Company of
> > TennesseeSM and The MEGA Life and Health Insurance Company.SM
> >
> >
> >
> >> -Original Message-
> >> From: IBM Mainframe Discussion List
> >> [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Tobias Schmid
> >> Sent: Monday, April 25, 2011 2:32 PM
> >> To: IBM-MAIN@bama.ua.edu
> >> Subject: Re: Recursive PERFORM in COBOL
> >>
> >> > What triggered this is a desire on my part to __EASILY__
> >> detemine th

Re: "No Connection" error message with ISPF edit

[Don Leahy]

You're welcome.  The WSA is one of ISPF's well hidden gems.

On Thu, Apr 14, 2011 at 16:16, Burrell, C. Todd (CDC/OCOO/ITSO) (CTR) <
z...@cdc.gov> wrote:

> Don:
> Thanks for the info - this corrected her issue.  This was a new one for
> me...
>
> C. Todd Burrell
> PMP, MCSE 2003:Security
> MCTS (640,642,643)
> Security+, Network+
> ITIL V3 Foundations
> CSC Lead z/OS Systems Programmer
> ITSO
> (404) 723-2017 (Cell)
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
> Behalf Of Don Leahy
> Sent: Thursday, April 14, 2011 4:05 PM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: "No Connection" error message with ISPF edit
>
> Have the user go to her Edit Entry Panel (ie option 2 on the ISPF menu) and
> see if the "Edit on Workstation" option is selected.  That setting is
> stored
> in the profile and can be inherited even when you launch Edit from 3.4
>
> On Thu, Apr 14, 2011 at 15:41, Todd Burrell  wrote:
>
> > I have a user who is attempting to edit a dataset from an ISPF 3.4
> listing.
> > She opens the PDS, and then when she puts an 'E' beside the member in
> > question she gets an error message "No Connection" in the upper right of
> > her
> > screen.  Hitting PF1 when this error occurs gives some info about
> > Workstation
> > Connection not being able to establish a connection.
> >
> > My question is - has anyone else run into this error condition, and how
> do
> > I
> > turn this off?  I went into ISPF settings and then into the WORKSTATION
> > menu but I did not see anything specific?
> >
> > The user does have ALTER access within RACF for the file, so this is not
> an
> > access issue.
> >
> > Thanks
> >
> > Todd Burrell
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> > Search the archives at http://bama.ua.edu/archives/ibm-main.html
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: "No Connection" error message with ISPF edit

[Don Leahy]

Have the user go to her Edit Entry Panel (ie option 2 on the ISPF menu) and
see if the "Edit on Workstation" option is selected.  That setting is stored
in the profile and can be inherited even when you launch Edit from 3.4

On Thu, Apr 14, 2011 at 15:41, Todd Burrell  wrote:

> I have a user who is attempting to edit a dataset from an ISPF 3.4 listing.
> She opens the PDS, and then when she puts an 'E' beside the member in
> question she gets an error message "No Connection" in the upper right of
> her
> screen.  Hitting PF1 when this error occurs gives some info about
> Workstation
> Connection not being able to establish a connection.
>
> My question is - has anyone else run into this error condition, and how do
> I
> turn this off?  I went into ISPF settings and then into the WORKSTATION
> menu but I did not see anything specific?
>
> The user does have ALTER access within RACF for the file, so this is not an
> access issue.
>
> Thanks
>
> Todd Burrell
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: Cool Things You Can Do in z/OS

[Don Leahy]

The GUI does suck.  However, WSA provides a lot of other capabilities too.
 Such as the ability to use the ISPF editor to edit files on your
workstation or use a workstation editor to edit a data set on the host. You
can also issue workstation commands from your TSO session.  My favorite is
ISPF's FILEXFER service which makes it easy to write Rexx functions to
transfer files between your workstation and the host.  (It's as fast as FTP
but, IMO, is much easier to set up.)

On Fri, Apr 8, 2011 at 13:46, Gibney, Dave  wrote:

> Except that as GUI's go, it is exceptionally sucky :)
>
> Dave Gibney
> Information Technology Services
> Washington State University
>
>
>

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

Re: creating mainframe bookmanager from pdf documents???

[Don Leahy]

IBM has a free Adobe plugin that provides Bookie-like searches of PDF files,
provided that the proper indexes have been created by the PDF publisher.

http://www-01.ibm.com/support/docview.wss?uid=swg27018852

In my experience, not all IBM manuals have been indexed.

On Mon, Mar 21, 2011 at 13:10, Don Williams  wrote:

> Works great, but it is slow when there are many/large PDFs in the
> directory.
> Is there some way to create a search index?
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
> Behalf
> Of Barry Merrill
> Sent: Friday, March 18, 2011 4:06 PM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: creating mainframe bookmanager from pdf documents???
>
> You can search all pdf documents in a directory;
> open any pdf document and then use CTRL-SHIFT-F
> to open the SEARCH WINDOW that lets you select
> the directory and search all pdf's in that directory.
>
> Barry Merrill
>
>
> Herbert W. Barry Merrill, PhD
> President-Programmer
>  ba...@mxg.com
> Merrill Consultants
> MXG Software
> 10717 Cromwell Drive
> Dallas TX 75229
> 214 351 1966 tel
> 214 350 3694 fax
> www.mxg.com
>
> technical:  supp...@mxg.com
> admin:  ad...@mxg.com
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: ISPF Point and Shoot

[Don Leahy]

You're right, it doesn't need to be.   If in a scrollable area the name would 
be ZPS01001.  But if it's not in a scrollable area then ZPS1 is fine. 

Sent from my iPad

On Mar 20, 2011, at 1:03 PM, michealbutz  wrote:

> No its not didn't think it needed to be
> 
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf 
> Of Don Leahy
> Sent: Sunday, March 20, 2011 12:25 PM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: ISPF Point and Shoot
> 
> Is the PAS field in a scrollable area?
> 
> *
> *
> On Sat, Mar 19, 2011 at 22:44, michealbutz wrote:
> 
>> Tried that doesn't seem to work
>> 
>> -Original Message-
>> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
>> Behalf Of John P
>> Kalinich
>> Sent: Saturday, March 19, 2011 8:30 AM
>> To: IBM-MAIN@bama.ua.edu
>> Subject: Re: ISPF Point and Shoot
>> 
>> Remove the ampersand in the VAR field.
>> 
>> )PNTS
>> FIELD(ZPS1) VAR(VAR1) VAL(1)
>> 
>> Regards,
>> John K
>> 
>> 
>> 
>> From:
>> michealbutz 
>> To:
>> IBM-MAIN@bama.ua.edu
>> Date:
>> 03/18/2011 05:26 PM
>> Subject:
>> ISPF Point and Shoot
>> 
>> 
>> 
>> I can't seem to get Point and shoot right
>> 
>> The attribute field that is defined needs to have PAS(ON)
>> 
>> So for example
>> 
>> @ TYPE(INPUT) PAS(ON) COLOR(WHITE)
>> 
>> The )PNTS section defines the value to be placed in the point and shoot
>> field )BODT
>> Point and shoot field ==> @field
>> 
>> 
>> )PNTS
>> FIELD(ZPS1) VAR(&VAR1) VAL(1)
>> 
>>  So if the user cursor selects the area where field is located a value
>> of 1 will be
>> placed variable var1
>> 
>> Excepts  when I do a say ' var1 = ' var1   var1 value is not 1
>> 
>> --
>> For IBM-MAIN subscribe / signoff / archive access instructions,
>> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
>> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>> 
>> --
>> For IBM-MAIN subscribe / signoff / archive access instructions,
>> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
>> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>> 
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html

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

Re: ISPF Point and Shoot

[Don Leahy]

Is the PAS field in a scrollable area?

*
*
On Sat, Mar 19, 2011 at 22:44, michealbutz wrote:

> Tried that doesn't seem to work
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
> Behalf Of John P
> Kalinich
> Sent: Saturday, March 19, 2011 8:30 AM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: ISPF Point and Shoot
>
> Remove the ampersand in the VAR field.
>
> )PNTS
>  FIELD(ZPS1) VAR(VAR1) VAL(1)
>
> Regards,
> John K
>
>
>
> From:
> michealbutz 
> To:
> IBM-MAIN@bama.ua.edu
> Date:
> 03/18/2011 05:26 PM
> Subject:
> ISPF Point and Shoot
>
>
>
> I can't seem to get Point and shoot right
>
> The attribute field that is defined needs to have PAS(ON)
>
> So for example
>
>  @ TYPE(INPUT) PAS(ON) COLOR(WHITE)
>
> The )PNTS section defines the value to be placed in the point and shoot
> field )BODT
>  Point and shoot field ==> @field
>
>
> )PNTS
>  FIELD(ZPS1) VAR(&VAR1) VAL(1)
>
>   So if the user cursor selects the area where field is located a value
> of 1 will be
> placed variable var1
>
> Excepts  when I do a say ' var1 = ' var1   var1 value is not 1
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: creating mainframe bookmanager from pdf documents???

[Don Leahy]

There is also the SDSF BOOK command.  Simply point your cursor at the
message id that you are interested in and press a PFK to look it up on
Bookie.

The TSO version of LOOKAT works much the same way.

Fault Analyzer has a message lookup facility that is very similar to LOOKAT.


IMO, switching to your Windows desktop to look up an error message is very
inefficient.

On Fri, Mar 18, 2011 at 12:55, Dave Salt  wrote:

> > From: dgrins...@mt.gov
> > It's possible I misunderstood the original question, but why would you
> want to???
>
> I have to agree with the OP as I love using BookManager on the mainframe.
> Let's say I'm in the middle of writing a COBOL program and I need to know
> the syntax for the INSPECT statement. Rather than switching over to my
> desktop and perhaps launching a browser and then finding the right web page
> and then typing in a search statement, I simply type BR .COB INSPECT on the
> command line (where 'BR' means browse, .COB is a label I gave to the COBOL
> syntax manual, and INSPECT is what I want to search for). I can generally be
> looking at the answer in a fraction of the time it takes using the web
> interface.
>
> For people who fix production problems in the middle of the night, every
> second counts. If (for example) a program just ended with SQL error -181,
> nothing could be much faster than typing BR .SQL -181 on a command line.
>
> Dave Salt
>
> SimpList(tm) - try it; you'll get it!
>
> http://www.mackinney.com/products/program-development/simplist.html
>
>
>
>
>
>
> > Date: Fri, 18 Mar 2011 16:16:28 +
> > From: dgrins...@mt.gov
> > Subject: Re: creating mainframe bookmanager from pdf documents???
> > To: IBM-MAIN@bama.ua.edu
> >
> > It's possible I misunderstood the original question, but why would you
> want to???  We use library server and view the documents via a web browser.
>  IMO it's a case of using the best tool for the job and viewing manuals via
> a 3270 interface just doesn't make sense to me.  If 3270 is all you have,
> then I don't have any suggestion for you.
> >
> > --
> >
> > Donald Grinsell
> > State of Montana
> > 406-444-2983
> > dgrins...@mt.gov
> >
> > "The only rational patriotism is loyalty to the nation all the time, and
> loyalty to the government when it deserves it."
> > -- Mark Twain
> >
> > -Original Message-
> > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
> Behalf Of Jan MOEYERSONS
> > Sent: Thursday, 17 March 2011 05:22
> > To: IBM-MAIN@bama.ua.edu
> > Subject: Re: creating mainframe bookmanager from pdf documents???
> >
> > On Wed, 16 Mar 2011 21:34:56 +, Grinsell, Don 
> > wrote:
> >
> > >Chris,
> > >
> > >I don't know if this is of interest, but it is possible to create an
> > >extended
> > bookshelf and load your pdf files to make them accessible via book
> manager.
> > You can also index and search the pdf files if desired.  I've taken that
> approach with several vendors manuals.
> > >
> > And how do you go about displaying PDF on a 3270?
> >
> > Jantje.
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions, send
> email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search
> the archives at http://bama.ua.edu/archives/ibm-main.html
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> > Search the archives at http://bama.ua.edu/archives/ibm-main.html
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: DOWNLOADING PDS FROM MAINFRAME TO PC

[Don Leahy]

The ISPF file transfer panel really should have scrollable fields.  ISPF has
them in several other places so why not there?  I worked around it by
shortening my workstation file name.

I miss SimpList.  In my last shop I got a lot of use out of its file
transfer features.  I especially miss the way it shows you a directory list
of your workstation files so that you can select them for Edit or Browse or
Transfer.


On Tue, Jan 18, 2011 at 11:36, Dave Salt  wrote:

> > Dave Salt  said:
> > I highly recommend using the ISPF Workstation Agent (WSA.EXE). It
> > makes file transfers really easy
> >
>
> > From: shmuel+ibm-m...@patriot.net 
> > The entry fields are way too short. Or do you mean driving
> > ISPF from a script rather than the supplied panels?
>
> The WSA can be driven from the ISPF file transfer panel, but if the fields
> on that panel aren't long enough people can write their own transfer
> scripts. Users who prefer not to write their own scripts or want more
> functionality can use SimpList.
>
> IMO, driving the transfer process from ISPF is easier than using FTP and
> having to enter a userid and password and transfer options (etc).
>
> Dave Salt
>
> SimpList(tm) - try it; you'll get it!
>
> http://www.mackinney.com/products/program-development/simplist.html
>
>
>
>
>
>
>
>
>
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: REXX, the new Cobol ?

[Don Leahy]

Rexx is indeed the new Cobol.  It is stable, reliable and productive when
used within the problem space for which it was designed.  :-)

On Thu, Jan 6, 2011 at 07:18, Shane Ginnane  wrote:

> Following on from my (most recent) jousting with Martin ...
>
> I find myself inexorably drifting away from REXX. Seems to be the dying
> "language".
> Just me ??.
>
> Shane ...
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: CEEROPT

[Don Leahy]

For IMS, you can use the RTT (Resource Translation Table) to change the
default Plan name.

On Mon, Jan 3, 2011 at 16:07, Frank Swarbrick <
frank.swarbr...@efirstbank.com> wrote:

> It's somewhat of a general, not specific, desire.  I want to use an ENVAR
> to hold the name of the DB2 PLAN that my batch jobs are to use.  CEEPRMxx
> would be used to set the default plan.  To override that I could specify a
> different plan in a CEEROPT and compile this in to a user load library and
> then include that load library in my JOBLIB concatenation.  This works, but
> could have the unitended consequence that any time I use that user load
> library I always get that CEEROPT if I don't remember to delete it when I'm
> done.
>
> The way I just put forth would
> 1) create a temporary load library and compile a CEEROPT in to it
> 2) this can be referred to in STEPLIBs for one or more steps
> 3) it automatically gets deleted at the end of the job, so there's no
> possibility of using that CEEROPT when I don't mean to.  (Plus, it has a
> unique DSNAME anyway.)
>
> CEEOPTS works, but it's (to my mind) overly verbose for this simple need.
>  Plus I'd have to specify it for each step that I want to use it in.  Well,
> I suppose this is true for the STEPLIB in any case, but for some reason that
> doesn't bother me as much.  Probably just a personal problem.  PARM might be
> OK except that it can't be used for an IMS batch job.  In any case, it was a
> fun little exercize and I'm glad I did it.
>
> Frank
> --
>
> Frank Swarbrick
> Applications Architect - Mainframe Applications Development
> FirstBank Data Corporation - Lakewood, CO  USA
> P: 303-235-1403
>
>
> On 1/3/2011 at 1:17 PM, in message
> >,
> Mark Zelden 
> wrote:
> > On Mon, 3 Jan 2011 12:31:49 -0700, Frank Swarbrick
> >  wrote:
> >
> >>So here's what I've got working.  Not the most obvious thing in the
> world,
> > but it seems to work.  It forces me to use STEPLIB instead of JOBLIB for
> my
> > LOADLIB concatenation, which I don't prefer, but I can live with it.
> >
> > Why does it force you to use STEPLIB?
> >
> >
> > See my last post - what exactly are you trying to accomplish?  Just
> setting
> > an environment variable at runtime?  If so, have you tried doing that
> > just in the parm or the CEEOPTS DD?
> >
> > Mark
> > --
> > Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS
> > mailto:mzel...@flash.net
> > Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html
> > Systems Programming expert at http://expertanswercenter.techtarget.com/
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> > Search the archives at http://bama.ua.edu/archives/ibm-main.html
>
> >>>
>
> The information contained in this electronic communication and any document
> attached hereto or transmitted herewith is confidential and intended for the
> exclusive use of the individual or entity named above.  If the reader of
> this message is not the intended recipient or the employee or agent
> responsible for delivering it to the intended recipient, you are hereby
> notified that any examination, use, dissemination, distribution or copying
> of this communication or any part thereof is strictly prohibited.  If you
> have received this communication in error, please immediately notify the
> sender by reply e-mail and destroy this communication.  Thank you.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: OT: In regard to password cracking Who is Abbie Sciuto was Re: A New Threat for password hacking

[Don Leahy]

So could Chloe O'Brien.

On Wed, Dec 1, 2010 at 17:37, Robert A. Rosenberg  wrote:

> At 11:32 -0500 on 12/01/2010, August Carideo wrote about Re: OT: In regard
> to password cracking Who is Abbie Sciuto :
>
>
>  Of course, it could be cracked by somebody like Abbie Sciuto (and maybe
>> the NSA or FBI) in just a few minutes .
>>
>
> Tim McGee also could do it. He is the major hacker on the NCIS team and
> often he and Annie collaborate on computer forensic matters. Abbie is
> usually the one to do Brute Force work like the password cracking however.
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: REXX "address" environments

[Don Leahy]

For IMS there is REXXIMS, REXXDLI and IMSSPOC.

On Thu, Nov 18, 2010 at 08:52, McLaren Phil <
phil.mcla...@axawinterthur.co.uk> wrote:

> John,
>
> There is a Rexx/CICS EXCI interface - CA1D. Just set it up here and it
> works well.
> http://www-01.ibm.com/support/docview.wss?rs=1083&uid=swg24009233
>
> DSNREXX comes with DB2 and is well established.
>
> IMS - I think there used to be something there too, but no personal
> experience. Could be wrong
>
> FTP would be good!
>
> Phil
>
>

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

Re: COBOL/CICS Integrated Translator

[Don Leahy]

Not being from a CICS shop, I cannot speak to that, but we ran into similar
glitches when we started using the SQL Coprocessor.  In our case all of the
issues were documented (see this SHARE
presentation
for
example) so we told our programmer to 'man up' and fix their code.  It's
just a compile error, after all.

On Fri, Aug 27, 2010 at 09:35, Greg Shirey  wrote:

> We recently started using the Integrated Translator for our CICS/COBOL
> programs and came across something interesting.  We apparently have some
> programs where some EXEC CICS statements start in Area A - the columns
> between 8 and 11 - and these programs had always successfully
> translated/compiled.  Now, they fail to compile with the integrated
> translator.
>
> Interestingly, they fail on the END-EXEC statement which also starts in
> Area A but not the EXEC CICS statement.
>
> We reported the behavior to IBM and they ran some tests and confirmed what
> we were seeing.
>
> 'With the CICS CoProcessor, I get no message for the EXEC CICS coded in col
> 8-11:
>
> IGYPS0009-E  "END-EXEC" should not begin in area"A".  It was processed as
> if found in area "B".
>
> This causes RC=8 for the compilation.
>
> However, using the separate translator, you get:
>
> DFH7278I  W  000nn   EXEC COMMAND SHOULD NOT BEGIN IN AREA A. IT WAS
> PROCESSED AS IF FOUND IN AREA B.
>
> Since this is a warning, the Precompiler ends with RC=4.
>
> The EXEC CICS statement is processed and the original becomes a comment, so
> it does not cause a compiler error.
> This is not documented in either the Enterprise COBOL Programming Guide or
> Migration Guide and we are reviewing
> that.'
>
> I believe they are telling me that they are going to update the
> documentation so that this behavior is documented, but I'm thinking that
> this violates that old Principle of Least Astonishment rule.  Either both
> the EXEC and the END-EXEC statements should be disallowed in Area A, or the
> END-EXEC should be treated like a comment so the compile is successful as
> before.
>
> Does that sound unreasonable?
>
> Thanks
> Greg Shirey
> Ben E. Keith Company
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: SuperCE

[Don Leahy]

I just call them "Rexx programs" and leave it at that.

On Tue, Aug 3, 2010 at 13:42, Steve Comstock wrote:

> Mike Schwab wrote:
>
>> On the mainframe, it is run like clists, in your clist libraries.  Can
>> also be compiled and run from a load module library.
>>
>
> Brak. Wrong.
>
> The point was you don't have "a REXX". You have "an exec", a script
> written in REXX. Or even "a REXX exec" would work: "I have a REXX
> exec that ..."
>
>
>
>
>
>
>> http://www-01.ibm.com/software/awdtools/rexx/library/ibmpubs.html
>>
>> Switching between languages is similar to invoking ISPF panels.
>>
>> On Tue, Aug 3, 2010 at 7:06 AM, john gilmore 
>> wrote:
>>
>>> As quoted by Paul Gilmartin, Wayne Bickerdike wrote:
>>>
>>> | The REXX I referred to was written by David McRitchie.
>>>
>>> What is a REXX?   Is it like a COBOL?  A C?  Are there many different
>>> REXXs?  If so, is Mike Cowlishaw complaisant or disapproving?
>>>
>>>
>>
>
> --
>
> Kind regards,
>
> -Steve Comstock
> The Trainer's Friend, Inc.
>
> 303-393-8716
> http://www.trainersfriend.com
>
> * To get a good Return on your Investment, first make an investment!
>  + Training your people is an excellent investment
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: RACF - Any way to find out before hand what the user's access is to a file

[Don Leahy]

Some shops allow the use of an API to the security system in order to
allow applications to determine if a user has access to a resource or
not.  This can be used to control application behaviour by limiting
the data displayed or the actions available.

To cite a trivial example, an application that normally opens a data
set for update may instead open it for read-only if it can determine
that the user does not have update access.  This can reduce the number
of security violations caused by an inadvertent attempt to update
data.

On Sat, May 1, 2010 at 09:01, Ted MacNEIL  wrote:
>>> wants away to check security.
>
> Coming from a Banking background, I believe a user should not have the 
> ability to check beforehand.
> That's a security exposure, because the user may find something that they 
> normally wouldn't.
>
> Also, don't blame it on out-sourcing.
> I've seen incompetent in-house security staff, as well.
> -
> Too busy driving to stop for gas!
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: Turning on ACF2 SECURITY Privilege through an exit . . .

[Don Leahy]

Can they run the application under ISPF dialog test?

Do the application's PF keys use an ISPF command table?

On Fri, Apr 23, 2010 at 16:25, Bathmaker, Jon
 wrote:
> Hi Tom,
>
> We redefine all 24 PF keys so the SPLIT key disappears and we do CONTROL
> MAIN in the CLIST to prevent PA interruptions from giving them control.
>
> There's nowhere to enter normal commands so that can't be done.
> Everything is PF key driven. They can do low level ACF2 admin and that's
> it.
>
> If you can think of a way to beat this, I'd really like to know about
> it. Thanks.
>
> Best Regards,
> Jon  Bathmaker
>
> IBM Certified zSeries Technical Specialist,
> Senior Systems Programmer
> RDO Americas - Workspace Security
> D: 212-325-4714
> M: 519-500-7927
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
> Behalf Of Tom Marchant
> Sent: Friday, April 23, 2010 3:35 PM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: Turning on ACF2 SECURITY Privilege through an exit . . .
>
> On Fri, 23 Apr 2010 11:20:04 -0400, Bathmaker, Jon wrote:
>>
>>We want the users to have the SECURITY privilege while they are using
>>an ISPF application and ONLY while they are using this app.
>
> How do you prevent the user from using split screen to invoke another
> application while your app is active?
>
> --
> Tom Marchant
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send
> email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search
> the archives at http://bama.ua.edu/archives/ibm-main.html
>
> ===
> Please access the attached hyperlink for an important electronic 
> communications disclaimer:
> http://www.credit-suisse.com/legal/en/disclaimer_email_ib.html
> ===
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: Heads Up: APAR I O11698 - N ew SAF FAC ILITY cla s s definiti on require d for any SMP/E use‏

[Don Leahy]

The version that I've heard is:

A zygote is a gamete's way of producing more gametes. This may be the
purpose of the universe. - Robert Heinlein ...

2010/4/15 McKown, John 
>
> > -Original Message-
> > From: IBM Mainframe Discussion List
> > [mailto:ibm-m...@bama.ua.edu] On Behalf Of john gilmore
> > Sent: Thursday, April 15, 2010 2:10 PM
> > To: IBM-MAIN@bama.ua.edu
> > Subject: Re: Heads Up: APAR I O11698 - N ew SAF FAC ILITY
> > clas s definiti on require d for any SMP/E use‏
> >
> > Don Williams writes:
> >
> >
> > | Chicken Little does not know which came first, the
> > | chicken or the egg.
> >
> >
> >
> > From the egg's perspective, which is clearly the right one
> > here, a chicken is only an egg's device for reproducing
> > itself, making more eggs.
> >
> > John Gilmore Ashland, MA 01721-1817 USA
>
> As I recall, there was someone who said: "An adult is a zygote's way of 
> making more zygotes." But I can't find a reference.
>
> --
> John McKown
> Systems Engineer IV
> IT
>
> Administrative Services Group
>
> HealthMarkets®
>
> 9151 Boulevard 26 • N. Richland Hills • TX 76010
> (817) 255-3225 phone • (817)-961-6183 cell
> john.mck...@healthmarkets.com • www.HealthMarkets.com
>
> Confidentiality Notice: This e-mail message may contain confidential or 
> proprietary information. If you are not the intended recipient, please 
> contact the sender by reply e-mail and destroy all copies of the original 
> message. HealthMarkets® is the brand name for products underwritten and 
> issued by the insurance subsidiaries of HealthMarkets, Inc. –The Chesapeake 
> Life Insurance Company®, Mid-West National Life Insurance Company of 
> TennesseeSM and The MEGA Life and Health Insurance Company.SM
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html

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

Re: Moving away from CA-PDSMAN

[Don Leahy]

It's not free (though it is cheap), but I would suggest looking at
Mackinney's Simplist product.  It has the ability to store lists of users'
favorite data sets (and other types of objects such as DB2 tables, Unix
directories and TSO commands).

I've been using it for about 5 years now, and I am a big fan.  See
http://www.mackinney.com/products/program-development/simplist.html

On Tue, Mar 16, 2010 at 10:07, Duane Weaver  wrote:

> We are trying to move away from CA-PDSMAN.   One feature that our few
> remaining users like, is the Easyedit feature of a list files that the user
> commonly edits.
>
>
>
> Has anyone else moved away from PDSMAN and how did you handle that feature?
>
>
>
> Is there REXX exec out there that will save a list of commonly edited files
> (some files are likely under different high level indexes) and store that
> list over different TSO sessions?
>
>
>
> Thanks,
>
> Duane
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: SV: Debug Tool problem

[Don Leahy]

To avoid these issues we chose to use BTS for all of our online debugging.
We have only a small number of MPRs available in our test environment and a
dozen programmers running debugging sessions at the same time would
monopolize all of them.

On Mon, Feb 15, 2010 at 15:09, Thomas Berg  wrote:

> But this is not how You should or normally ever do manage an IMS online
> system.  Even if it's only for testing.  Picture a dozen programmers
> debugging online programs this way.  And add the usual misses they
> sometimes
> do...
>
> This should be handled by the tool. It have already hooks into IMS it
> seems,
> so why not take it all way, it's IBM's own software everywhere here!
>
>
>
> Regards,
> Thomas Berg
> _
> Thomas Berg   Specialist   A M   SWEDBANK
>
>
>
> > -Ursprungligt meddelande-
> > Från: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] För
> > Brian Peterson
> > Skickat: den 15 februari 2010 20:47
> > Till: IBM-MAIN@bama.ua.edu
> > Ämne: Re: SV: Debug Tool problem
> >
> > Your IMS systems programmer should handle this for you, per the IBM
> > (vague)
> > documentation.  Doing so is a required setup step.  If your IMS systems
> > programmer refuses to do so, that's a different (management) problem.
> >
> > Brian
> >
> > On Mon, 15 Feb 2010 20:38:35 +0100, Thomas Berg wrote:
> >
> > >I'm afraid You are right.
> > >But this is silly.  I would never get the authority to submit my own
> > >msg region.
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> > Search the archives at http://bama.ua.edu/archives/ibm-main.html
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: FTP problems

[Don Leahy]

Ironically, in our shop it was the *Windows* guys who demanded that we use
file transfer rather than some sort of messaging protocol to communicate
between the mainframe and their platform.

On Sat, Feb 13, 2010 at 04:45, Timothy Sipples
wrote:

> Hal Merritt writes:
> >As far as I can see so far, the target of such a transfer
> >is almost always some tool or process that does not support
> >any of the DBMS solutions. But even if they did, the costs
> >of crafting and deploying a DBMS infrastructure is often
> >complex and prohibitively expensive.
>
> Microsoft Windows (in the abstract) supports ODBC quite well. It's part of
> that platform's "DNA." So does DB2 and (without much difficulty) IMS and
> VSAM. But DBMS-style access is not the only option anyway. And the
> costs/complexity compared to what? Compared to a major security breach
> that compromises millions of customer records (for example)? (File transfer
> obviates security context.) Compared to nursing file transfers "forever"?
> Compared to making all customers wait for online service until the batch
> file transfer completes its cycle (hopefully)? Compared to managing data
> synchronization and reconciliation issues?
>
> No, most commonly file transfer is a part of application integration simply
> because nobody knew (or had, if we go back far enough) any better at the
> time. And Windows application developers often appreciate having some
> other, more Windows-friendly option. (They often don't like file transfer
> either, because they've got to deal with operational complexities on their
> end and "arcane" data format conversions which are surfaced, among other
> problems.) I've asked groups of Windows applications developers what their
> #1 preferred application interface is, and I've never heard "file transfer"
> as the answer.
>
> No, I'm going to keep an open mind on this situation pending more
> information from the original poster.,
>
> - - - - -
> Timothy Sipples
> IBM Consulting Enterprise Software Architect
> E-Mail: timothy.sipp...@us.ibm.com
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: Compuware FileAid to IBM FileManager Conversion

[Don Leahy]

 It's a sad reality that many application programmers have
little interest in technology.  For them, programming is merely a unpleasant
job that they have to endure until they are promoted higher up the ladder to
become analysts or managers.  My advice to any sysprog who wants to promote
a new tool or technique is to ignore those people.  Instead, find the
programmers who actually enjoy programming and engage them.  They're easy to
find; they're the ones who do most of the work.


On Fri, Feb 12, 2010 at 07:55, McKown, John
wrote:

>
>
> That is a good point. However, it can be abused. We hated the CA products.
> We trialled Macro4's, which I thought were excellant. The programmers voted
> to go back to Compuware (which are also very good). Their reason was that we
> had used Compuware in the past and so they already knew it. Good reason.
> However, they are __now__ saying that they can't be responsible for using
> Strobe because they don't know how to use it. They didn't get any training.
> Hum, they refused training because they already knew it and now they refuse
> to use it because they got no training. Yeah, they want Tech Services to do
> all the Strobing, look at the reports and then summarize what the
> programmers need to do to address the CPU usage "problem".
>
> --
> John McKown
> Systems Engineer IV
> IT
>
>

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

Re: Compuware FileAid to IBM FileManager Conversion

[Don Leahy]

We replaced Abendaid with Fault Analyzer. The programmers complained (I was
one of the complainers) but the cost savings were substantial (so they tell
me).

 FA works for IMS and CICS dumps as well.

On Wed, Feb 10, 2010 at 10:21, Schumacher, Otto wrote:

> Do I understand correctly Fault analyzer software can eliminate the need
> for Dumpmaster(Macro4) and/or the Abendaid products(Compuware)? Is this also
> true for CICS and IMS online dumps?
>
> Regards
> Otto schumacher
>
> HP Enterprise Services
> Infrastructure Specialist
> Ahold Account
> CICS & Capacity Technical Support
> P.O. Box 6462
> 2000 Wade Hampton Blvd.
> LC1-302
> Greenville,  South Carolina, 29606
> Cell: 864 449 1755
> Tel: 864 987-1417
> Fax: 864 987-4500
> E-mail: otto.schumac...@hp.com
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
> Behalf Of John P Kalinich
> Sent: Wednesday, February 10, 2010 10:06 AM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: Compuware FileAid to IBM FileManager Conversion
>
> Peter Farley of the IBM Mainframe Discussion List 
> wrote on 02/10/2010 08:26:27 AM:
>
> > I am told by my sysprogs that Fault Analyzer requires the ADATA output
> > file of the compiler to be allocated in the production JCL in order to
> > analyze production abends the first time they occur.  This is a
> > non-starter for us, thousands of JCL's would have to change.  YMMV.
>
> You can specify the compiler listing PDS names in the Fault Analyzer
> PARMLIB member IDICNFxx, so you do not have to change any JCL.  If the
> compiler listing is not available, FA will perform a real-time analysis of
> the abend, but it will not use any source code information.
>
> After the fact, FA can perform an interactive re-analysis of the abend
> using the information written to the FA History file.  Before re-analysis,
> FA will prompt you for a compiler listing file.  This gives you the option
> to compile after abend and let FA use that source code information.
>
> Regards,
> John K
>
> > > -Original Message-
> > > From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
> > > Behalf Of Vince Getgood
> > > Sent: Wednesday, February 10, 2010 5:10 AM
> > > To: IBM-MAIN@bama.ua.edu
> > > Subject: Re: Compuware FileAid to IBM FileManager Conversion
> > >
> > > I'd also be interested in any comments, as we're looking to do exactly
> > the
> > > same thing.
> > >
> > > We're also considering replacing: -
> > >
> > > Abend/AID & Abend/AID CICS with Fault analyser
> > > Xpediter TSO & Xpediter CICS with Debug tool
> > > Strobe & iStrobe with Application performance analyser
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: Compuware FileAid to IBM FileManager Conversion

[Don Leahy]

For Cobol programs, FA requires the use of the XREF option.

This created a problem for us when we migrated because most of our programs
were compiled without XREF (to save space).  We ended up writing a special
utility program to extract the Cobol source from the listing and then
recompile it with XREF turned on.  The new compile listing (which was
discarded after the process) was then used to generate a side file using a
FA utility program.  The side file was stored in a PDS that we maintain in
parallel with the compile listings.

We knew that this process would not be 100% reliable (because of compiler
versions and PTFs, as you pointed out), but it has proved to be "good
enough" for our purposes.  "Good enough" meaning that FA was able to
interpret Working Storage correctly, which is really all you need to solve
run-of-the-mill application abends.

On Wed, Feb 10, 2010 at 10:18, Farley, Peter x23353 <
peter.far...@broadridge.com> wrote:

> I stand corrected.  Thanks for the info.
>
> Does FA require the ADATA info as I was told, or can it operate only off
> the compiler listing without ADATA?  Needing to produce and archive
> ADATA going forward with FA would be a problem because pre-existing
> compiles would not have that data captured.  Recompiling to produce
> ADATA would not always work either, because compiler versions and/or
> PTF's may have been updated between the original production compile date
> and the date of the abend.  That could (but might not) invalidate the
> analysis or point to the wrong place in the source.
>
> Peter
>
> > -Original Message-
> > From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
> > Behalf Of John P Kalinich
> > Sent: Wednesday, February 10, 2010 10:06 AM
> > To: IBM-MAIN@bama.ua.edu
> > Subject: Re: Compuware FileAid to IBM FileManager Conversion
> >
> > Peter Farley of the IBM Mainframe Discussion List
> 
> > wrote on 02/10/2010 08:26:27 AM:
> >
> > > I am told by my sysprogs that Fault Analyzer requires the ADATA
> output
> > > file of the compiler to be allocated in the production JCL in order
> to
> > > analyze production abends the first time they occur.  This is a
> > > non-starter for us, thousands of JCL's would have to change.  YMMV.
> >
> > You can specify the compiler listing PDS names in the Fault Analyzer
> > PARMLIB member IDICNFxx, so you do not have to change any JCL.  If the
> > compiler listing is not available, FA will perform a real-time
> analysis of
> > the abend, but it will not use any source code information.
> >
> > After the fact, FA can perform an interactive re-analysis of the abend
> > using the information written to the FA History file.  Before
> re-analysis,
> > FA will prompt you for a compiler listing file.  This gives you the
> option
> > to compile after abend and let FA use that source code information.
>
>
> 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...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: Compuware FileAid to IBM FileManager Conversion

[Don Leahy]

Re Fault Analyzer, ADATA output is not required in the production JCL.   If
you want FA to perform real-time analysis, there is a PARMLIB member that
you can use to specify where the ADATA (or other "side file" output) can be
found.

We don't bother with real-time analysis.  When investigating a dump, we use
Fault Analyzer's ISPF interface to perform Interactive Reanalysis.
Interactive Reanalysis allows you to manually specify the compile listing or
side file DSN that you wish to use.  You can easily automate the process so
the programmer doesn't even have to know where the side file is coming from.


On Wed, Feb 10, 2010 at 09:26, Farley, Peter x23353 <
peter.far...@broadridge.com> wrote:

> I am told by my sysprogs that Fault Analyzer requires the ADATA output
> file of the compiler to be allocated in the production JCL in order to
> analyze production abends the first time they occur.  This is a
> non-starter for us, thousands of JCL's would have to change.  YMMV.
>
> I recommend you investigate Macro4 products, InSync to replace FileAid
> and DumpMaster to replace Abend/AID.
>
> DumpMaster captures dump info from a production abend without any extra
> JCL required, and production dump analysis only requires copying the
> matching compiler listing into their VSAM listing database.  No ADATA
> required.  Highly recommended.
>
> We use Intertest for interactive debugging instead of Xpediter, but I'm
> not sure what the differences are in that case.  It's been too long
> since I worked in an Xpediter shop.
>
> Cole Software (the z/XDC assembler debugger folk) has a new product
> z/XPF for performance analysis.  It would be worth your time to take a
> look, given the high quality of Cole Software products and support.
>
> HTH
>
> Peter
>
> > -Original Message-
> > From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
> > Behalf Of Vince Getgood
> > Sent: Wednesday, February 10, 2010 5:10 AM
> > To: IBM-MAIN@bama.ua.edu
> > Subject: Re: Compuware FileAid to IBM FileManager Conversion
> >
> > I'd also be interested in any comments, as we're looking to do exactly
> the
> > same thing.
> >
> > We're also considering replacing: -
> >
> > Abend/AID & Abend/AID CICS with Fault analyser
> > Xpediter TSO & Xpediter CICS with Debug tool
> > Strobe & iStrobe with Application performance analyser
> >
> > Any other comments or experiences with these conversions also welcome!
>
>
> 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...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: 3270 Custom Screen Size - Attachmate Extra 9.1

[Don Leahy]

The last time this topic came up, no one could come up with a solution for
Extra.

I no longer use Extra, I switched to Tom Brennan's Vista tn3270 product.

On Fri, Feb 5, 2010 at 16:39, George.William wrote:

> We recently 'upgraded' our 3270 emulator to Attachmate Extra X-treme
> 9.0.
>
> Is anyone aware of a means to customize the screen size outside of the
> standard Mods 2,3,4 & 5?
>
> I'm unable to find any doco on being able to do such so was curious of
> someone knew an undocumented means?
>
>
>
> Thanks
>
> Bill
>
> __
> CONFIDENTIALITY NOTICE: This email from the State of California is for the
> sole use of the intended recipient and may contain confidential and
> privileged information. Any unauthorized review or use, including disclosure
> or distribution, is prohibited. If you are not the intended recipient,
> please contact the sender and destroy all copies of this email.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: Strange JCL error

[Don Leahy]

I was able to set up a situation that generated a similar, but not
identical, error message when I issued the SUB command:

 ISPF system data set allocation error - press Enter to continue.
 Temporary control card data set cannot be allocated.
 DAIR RC = 12 dec, DARC = 970C hex.
 ***

That was with my TSO profile set to NOWTPMSG.  If I reset it to WTPMSG the
cause of the problem is obvious:

ICH408I USER(BSB945  ) GROUP(DX95) NAME(LEAHY, DON  )
   DXXX.BSB945.SPFTEMP0.CNTL CL(DATASET ) VOL(STRD17)
   DEFINE - RESOURCE NOT PROTECTED
 ISPF system data set allocation error - press Enter to continue.
 Temporary control card data set cannot be allocated.
 DAIR RC = 12 dec, DARC = 970C hex.
 ***

Do you have WTPMSG turned on?  (It's a long shot, most people do).

On Wed, Feb 3, 2010 at 16:57, Steve Comstock wrote:

>
> Well that gives me:
>
> ISPF system data set allocation error - press Enter to continue.
> Temporary control card data set cannot be allocated.
> Error trying to open ''.
> ***
>
> On a hunch I then logged off and logged back on.
>
> Same problem.
>
>
> --
>
> Kind regards,
>
> -Steve Comstock
> The Trainer's Friend, Inc.
>
> 303-393-8716
> http://www.trainersfriend.com
>
>  z/OS Application development made easier
>* Our classes include
>   + How things work
>   + Programming examples with realistic applications
>   + Starter / skeleton code
>   + Complete working programs
>   + Useful utilities and subroutines
>   + Tips and techniques
>
> Ask me about our new, reduced rates for purchasing our course materials
> for use by your own trainers or Subject Matter Experts (SMEs).
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: Strange JCL error

[Don Leahy]

Have you looked at the JES2 LOG from your previous TSO session?

I have seen this sort of error caused by a RACF issue.  (The user had
changed his TSO prefix to an invalid value).

On Wed, Feb 3, 2010 at 17:34, Steve Comstock wrote:

> Dave Salt wrote:
>
>> Try entering BUILTIN SUB and see what happens.
>>  Dave Salt
>>
>> SimpList(tm) - try it; you'll get it!
>> http://www.mackinney.com/products/program-development/simplist.html
>>
>>
>>
>>
>>
>>  Date: Wed, 3 Feb 2010 13:58:00 -0700
>>> From: st...@trainersfriend.com
>>> Subject: Strange JCL error
>>> To: IBM-MAIN@bama.ua.edu
>>>
>>> Have a job I've been submitting many times, runs as
>>> expected. Minutes ago I submitted the same job and
>>> it fails with JCL ERROR and under SDSF I see:
>>>
>>> STMT NO. MESSAGE
>>>1 IEFC607I JOB HAS NO STEPS
>>>
>>> Now, submitting various other jobs that have worked
>>> in the past, they all fail this way.
>>>
>>> Looking at the jobs using the SL line command in SDSF,
>>> they all have only 10 lines (which are a JOB statement
>>> and some comments, it turns out, so, yes, in the first
>>> 10 lines there are no EXEC statements).
>>>
>>> Logged off and back on, same result.
>>>
>>> This smells somewhat familiar, but I can't put my finger
>>> on it. Anyone have any suggestions what's going on and
>>> how to solve it?
>>>
>>> (BTW, using the TSO SUB command works fine; it's just
>>> using the ISPF SUB command from Edit or View that fails.
>>> Also note, from a member list, entering the line commands
>>> SUB or J work fine too.)
>>>
>>
> Same result.
>
>
>
>
> --
>
> Kind regards,
>
> -Steve Comstock
> The Trainer's Friend, Inc.
>
> 303-393-8716
> http://www.trainersfriend.com
>
>  z/OS Application development made easier
>* Our classes include
>   + How things work
>   + Programming examples with realistic applications
>   + Starter / skeleton code
>   + Complete working programs
>   + Useful utilities and subroutines
>   + Tips and techniques
>
> Ask me about our new, reduced rates for purchasing our course materials
> for use by your own trainers or Subject Matter Experts (SMEs).
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: ASA character viewer

[Don Leahy]

I like to use Lionel Dyck's TXT2PDF for this purpose.  It has some
very impressive capabilities.

>> :>Do you know of a freeware Windows viewer that can display reports with
>> :>embedded asa carriage control characters and be able to display it
>> :>correctly? The viewer should be able to interpret the ASA characters.
>>
>

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

Re: IEC143I 213-30

[Don Leahy]

Does IEBCOPY use the same enqueue strategy as the Binder?

On Wed, Dec 2, 2009 at 14:29, Joel C. Ewing  wrote:
> I believe the Binder uses ISPF-style enqueues to allow OPEN for output
> with SHR access without any problems.  When needing updates with SHR and
> utilities that do not support ISPF-style enqueues, our approach has been
> to change the job step to invoke a front-end program that gets the
> required "SPFEDIT" enqueue, invokes the utility, and when the utility
> returns control drop the enqueue.  That way the job may wait, but only
> for the time when someone else actually has the dataset enqueued for
> "open for output".
>   JC Ewing
>
> On 12/02/2009 09:42 AM, Don Leahy wrote:
>> Good point.  Our process is "working by coincidence".
>>
>> Time to took for a better approach.  Thanks.
>>
>> On Wed, Dec 2, 2009 at 05:23, Big Iron  wrote:
>>
>>> I think that using a later copy step "works" because the time window
>>> involved is shorter and so collisions, two programs having the same PDS
>>> open for output with DISP=SHR, would be less likely but could still occur.
>>> I
>>> have seen that abend happen for link-edit steps.
>>>
>>> Using DISP=OLD will solve this problem since the job would no longer
>>> be updating a dataset allocated with DISP=SHR. Note that the elapsed
>>> time for the jobs will increase because the allocation will be held from
>>> the start of the job until the end of the step that allocates the dataset
>>> with DISP=OLD.
>>>
>>> Bill
>>>
>>> On Tue, 1 Dec 2009 12:04:48 -0700, Frank Swarbrick
>>>  wrote:
>>>
>>>> A later step in the same job?  Does this solve the issue because the copy
>>> uses different serialization than the actual creating of the DBRM member?
>>>>
>>>> I'll give it a shot.  Thanks,
>>>> Frank
>>>> --
>>>>
>>>> Frank Swarbrick
>>>> Applications Architect - Mainframe Applications Development
>>>> FirstBank Data Corporation - Lakewood, CO  USA
>>>> P: 303-235-1403
>>>>
>>>>
>>>> On 12/1/2009 at 11:58 AM, in message
>>>> <6133ad1f0912011058g272d6fc0m912af04571979...@mail.gmail.com>, Don Leahy
>>>>  wrote:
>>>>> This is a perennial problem.
>>>>>
>>>>> Our local solution was to allocate DBRMLIB to a temporary data set.
>>>>>
>>>>> //DBRMLIB  DD  DSN=&DBRMLB(&MR),DISP=(,PASS),
>>>>> //             UNIT=SYSDA,SPACE=(TRK,(15,5,5)),
>>>>> //             DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160)
>>>>>
>>>>> A later step copies the DBRM to a permanent library.
>>>>>
>>>>> On Tue, Dec 1, 2009 at 13:25, Frank Swarbrick
>>>>>  wrote:
>>>>>> For our conversion from VSE to z/OS we have a "mass compile" process
>>> that
>>>>> runs many compiles at the same time.  This has been fine up until when
>>> we
>>>>> added "DB2 compiles" in to the mix.  Now we are getting things like the
>>>>> following for every second or third compile:
>>>>>> 11.02.22 JOB05118  IEC143I
>>>>>
>>> 213-30,IFG0194D,EXAM02,COB,DBRMLIB,9220,DB2001,SYS3.DSN910.DBRMLIB.DATA(EXAM
>>>>> 02)
>>>>>>
>>>>>> "30
>>>>>> An attempt was made to open a partitioned data set (PDS) for
>>>>> OUTPUT,DISP=SHR. The PDS is already open in this condition, and a DCB is
>>>>> already open for output to the data set. The data set might be on the
>>> same
>>>>> system or on another system that is sharing the volume. Access was not
>>>>> serialized before the attempt to open the data set."
>>>>>>
>>>>>> I am guessing that "job 2" is trying to add a member to
>>>>> SYS3.DSN910.DBRMLIB.DATA at the same time that "job 1" is trying to do
>>> the
>>>>> same thing (though a different member).
>>>>>>
>>>>>> Obviously one solution is to single thread the compiles.  But I'd
>>> rather not
>>>>> if I don't have to.  Any other solutions?  If I changed to DISP=OLD
>>> would
>>>>> this eliminate the issue by making job 2 wait until job 1 is done with
>>> the
>>>>> PDS?
>>>>>>
>>>>>> Why does the link-edit step seem to not have a similar issue?  Is it
>>> just
>>>>> that the link-edit step completes so quickly that only one job has the
>>> PDS
>>>>> open at one time?  Or does the link-edit (binder; whatever) have some
>>> special
>>>>> stuff that allows it do deal with this situation?
>>>>>>
>>>>>> Thanks,
>>>>>> Frank
>>>>>> --
>>>>>>
>>>>>> Frank Swarbrick
>>>>>> Applications Architect - Mainframe Applications Development
>>>>>> FirstBank Data Corporation - Lakewood, CO  USA
>>>>>> P: 303-235-1403
>>
> --
> Joel C. Ewing, Fort Smith, AR        jremoveccapsew...@acm.org
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: IEC143I 213-30

[Don Leahy]

Good point.  Our process is "working by coincidence".

Time to took for a better approach.  Thanks.

On Wed, Dec 2, 2009 at 05:23, Big Iron  wrote:

> I think that using a later copy step "works" because the time window
> involved is shorter and so collisions, two programs having the same PDS
> open for output with DISP=SHR, would be less likely but could still occur.
> I
> have seen that abend happen for link-edit steps.
>
> Using DISP=OLD will solve this problem since the job would no longer
> be updating a dataset allocated with DISP=SHR. Note that the elapsed
> time for the jobs will increase because the allocation will be held from
> the start of the job until the end of the step that allocates the dataset
> with DISP=OLD.
>
> Bill
>
> On Tue, 1 Dec 2009 12:04:48 -0700, Frank Swarbrick
>  wrote:
>
> >A later step in the same job?  Does this solve the issue because the copy
> uses different serialization than the actual creating of the DBRM member?
> >
> >I'll give it a shot.  Thanks,
> >Frank
> >--
> >
> >Frank Swarbrick
> >Applications Architect - Mainframe Applications Development
> >FirstBank Data Corporation - Lakewood, CO  USA
> >P: 303-235-1403
> >
> >
> >On 12/1/2009 at 11:58 AM, in message
> ><6133ad1f0912011058g272d6fc0m912af04571979...@mail.gmail.com>, Don Leahy
> > wrote:
> >> This is a perennial problem.
> >>
> >> Our local solution was to allocate DBRMLIB to a temporary data set.
> >>
> >> //DBRMLIB  DD  DSN=&DBRMLB(&MR),DISP=(,PASS),
> >> // UNIT=SYSDA,SPACE=(TRK,(15,5,5)),
> >> // DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160)
> >>
> >> A later step copies the DBRM to a permanent library.
> >>
> >> On Tue, Dec 1, 2009 at 13:25, Frank Swarbrick
> >>  wrote:
> >>> For our conversion from VSE to z/OS we have a "mass compile" process
> that
> >> runs many compiles at the same time.  This has been fine up until when
> we
> >> added "DB2 compiles" in to the mix.  Now we are getting things like the
> >> following for every second or third compile:
> >>> 11.02.22 JOB05118  IEC143I
> >>
> 213-30,IFG0194D,EXAM02,COB,DBRMLIB,9220,DB2001,SYS3.DSN910.DBRMLIB.DATA(EXAM
> >> 02)
> >>>
> >>> "30
> >>> An attempt was made to open a partitioned data set (PDS) for
> >> OUTPUT,DISP=SHR. The PDS is already open in this condition, and a DCB is
> >> already open for output to the data set. The data set might be on the
> same
> >> system or on another system that is sharing the volume. Access was not
> >> serialized before the attempt to open the data set."
> >>>
> >>> I am guessing that "job 2" is trying to add a member to
> >> SYS3.DSN910.DBRMLIB.DATA at the same time that "job 1" is trying to do
> the
> >> same thing (though a different member).
> >>>
> >>> Obviously one solution is to single thread the compiles.  But I'd
> rather not
> >> if I don't have to.  Any other solutions?  If I changed to DISP=OLD
> would
> >> this eliminate the issue by making job 2 wait until job 1 is done with
> the
> >> PDS?
> >>>
> >>> Why does the link-edit step seem to not have a similar issue?  Is it
> just
> >> that the link-edit step completes so quickly that only one job has the
> PDS
> >> open at one time?  Or does the link-edit (binder; whatever) have some
> special
> >> stuff that allows it do deal with this situation?
> >>>
> >>> Thanks,
> >>>
> >>> Frank
> >>>
> >>>
> >>> --
> >>>
> >>> Frank Swarbrick
> >>> Applications Architect - Mainframe Applications Development
> >>> FirstBank Data Corporation - Lakewood, CO  USA
> >>> P: 303-235-1403
> >>>
> >>>
> >>>>>>
> >>>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: IEC143I 213-30

[Don Leahy]

I am not sure why it works, we did not do any extensive testing but I
do know that we haven't had any problems for a long time.  We use
ICEGENER to do the copying.

Caveat: we rarely have more than 2 compiles running at the same time
(small shop), so your mileage may vary.

On Tue, Dec 1, 2009 at 14:04, Frank Swarbrick
 wrote:
> A later step in the same job?  Does this solve the issue because the copy 
> uses different serialization than the actual creating of the DBRM member?
>
> I'll give it a shot.  Thanks,
> Frank
> --
>
> Frank Swarbrick
> Applications Architect - Mainframe Applications Development
> FirstBank Data Corporation - Lakewood, CO  USA
> P: 303-235-1403
>
>
> On 12/1/2009 at 11:58 AM, in message
> <6133ad1f0912011058g272d6fc0m912af04571979...@mail.gmail.com>, Don Leahy
>  wrote:
>> This is a perennial problem.
>>
>> Our local solution was to allocate DBRMLIB to a temporary data set.
>>
>> //DBRMLIB  DD  DSN=&DBRMLB(&MR),DISP=(,PASS),
>> //             UNIT=SYSDA,SPACE=(TRK,(15,5,5)),
>> //             DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160)
>>
>> A later step copies the DBRM to a permanent library.
>>
>> On Tue, Dec 1, 2009 at 13:25, Frank Swarbrick
>>  wrote:
>>> For our conversion from VSE to z/OS we have a "mass compile" process that
>> runs many compiles at the same time.  This has been fine up until when we
>> added "DB2 compiles" in to the mix.  Now we are getting things like the
>> following for every second or third compile:
>>> 11.02.22 JOB05118  IEC143I
>> 213-30,IFG0194D,EXAM02,COB,DBRMLIB,9220,DB2001,SYS3.DSN910.DBRMLIB.DATA(EXAM
>> 02)
>>>
>>> "30
>>> An attempt was made to open a partitioned data set (PDS) for
>> OUTPUT,DISP=SHR. The PDS is already open in this condition, and a DCB is
>> already open for output to the data set. The data set might be on the same
>> system or on another system that is sharing the volume. Access was not
>> serialized before the attempt to open the data set."
>>>
>>> I am guessing that "job 2" is trying to add a member to
>> SYS3.DSN910.DBRMLIB.DATA at the same time that "job 1" is trying to do the
>> same thing (though a different member).
>>>
>>> Obviously one solution is to single thread the compiles.  But I'd rather not
>> if I don't have to.  Any other solutions?  If I changed to DISP=OLD would
>> this eliminate the issue by making job 2 wait until job 1 is done with the
>> PDS?
>>>
>>> Why does the link-edit step seem to not have a similar issue?  Is it just
>> that the link-edit step completes so quickly that only one job has the PDS
>> open at one time?  Or does the link-edit (binder; whatever) have some special
>> stuff that allows it do deal with this situation?
>>>
>>> Thanks,
>>>
>>> Frank
>>>
>>>
>>> --
>>>
>>> Frank Swarbrick
>>> Applications Architect - Mainframe Applications Development
>>> FirstBank Data Corporation - Lakewood, CO  USA
>>> P: 303-235-1403
>>>
>>>
>>>>>>
>>>
>>> The information contained in this electronic communication and any document
>> attached hereto or transmitted herewith is confidential and intended for the
>> exclusive use of the individual or entity named above.  If the reader of this
>> message is not the intended recipient or the employee or agent responsible
>> for delivering it to the intended recipient, you are hereby notified that any
>> examination, use, dissemination, distribution or copying of this
>> communication or any part thereof is strictly prohibited.  If you have
>> received this communication in error, please immediately notify the sender by
>> reply e-mail and destroy this communication.  Thank you.
>>>
>>> --
>>> For IBM-MAIN subscribe / signoff / archive access instructions,
>>> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
>>> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>>>
>>
>> --
>> For IBM-MAIN subscribe / signoff / archive access instructions,
>> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
>> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>
>>>>
>
> The information contained in this electronic communication and any document 
> attached hereto 

Re: IEC143I 213-30

[Don Leahy]

This is a perennial problem.

Our local solution was to allocate DBRMLIB to a temporary data set.

//DBRMLIB  DD  DSN=&DBRMLB(&MR),DISP=(,PASS),
// UNIT=SYSDA,SPACE=(TRK,(15,5,5)),
// DCB=(RECFM=FB,LRECL=80,BLKSIZE=6160)

A later step copies the DBRM to a permanent library.

On Tue, Dec 1, 2009 at 13:25, Frank Swarbrick
 wrote:
> For our conversion from VSE to z/OS we have a "mass compile" process that 
> runs many compiles at the same time.  This has been fine up until when we 
> added "DB2 compiles" in to the mix.  Now we are getting things like the 
> following for every second or third compile:
> 11.02.22 JOB05118  IEC143I 
> 213-30,IFG0194D,EXAM02,COB,DBRMLIB,9220,DB2001,SYS3.DSN910.DBRMLIB.DATA(EXAM02)
>
> "30
> An attempt was made to open a partitioned data set (PDS) for OUTPUT,DISP=SHR. 
> The PDS is already open in this condition, and a DCB is already open for 
> output to the data set. The data set might be on the same system or on 
> another system that is sharing the volume. Access was not serialized before 
> the attempt to open the data set."
>
> I am guessing that "job 2" is trying to add a member to 
> SYS3.DSN910.DBRMLIB.DATA at the same time that "job 1" is trying to do the 
> same thing (though a different member).
>
> Obviously one solution is to single thread the compiles.  But I'd rather not 
> if I don't have to.  Any other solutions?  If I changed to DISP=OLD would 
> this eliminate the issue by making job 2 wait until job 1 is done with the 
> PDS?
>
> Why does the link-edit step seem to not have a similar issue?  Is it just 
> that the link-edit step completes so quickly that only one job has the PDS 
> open at one time?  Or does the link-edit (binder; whatever) have some special 
> stuff that allows it do deal with this situation?
>
> Thanks,
>
> Frank
>
>
> --
>
> Frank Swarbrick
> Applications Architect - Mainframe Applications Development
> FirstBank Data Corporation - Lakewood, CO  USA
> P: 303-235-1403
>
>

>
> The information contained in this electronic communication and any document 
> attached hereto or transmitted herewith is confidential and intended for the 
> exclusive use of the individual or entity named above.  If the reader of this 
> message is not the intended recipient or the employee or agent responsible 
> for delivering it to the intended recipient, you are hereby notified that any 
> examination, use, dissemination, distribution or copying of this 
> communication or any part thereof is strictly prohibited.  If you have 
> received this communication in error, please immediately notify the sender by 
> reply e-mail and destroy this communication.  Thank you.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: Check out Computer glitch to cause flight delays across U.S. - Mar ketWatch

[Don Leahy]

On Thu, Nov 19, 2009 at 3:41 PM, Ken Porowski  wrote:
>
> Tongue in cheek reply.
>
> Because we take a perverse pleasure in seeing squatty box failures when
> the reliability (FSVO reliability) of a Mainframe is called for?
>
> Or to keep it on topic.
>
> We wish to learn from others mistakes.  Unfortunately that would require
> fairly accurate info so the various theories abound..
>
>
> -Original Message-
> Schwarz, Barry A
>
> And finally, why are we spending so much time on obviously incomplete
> and inaccurate articles?
>

It's unfortunate that there isn't a technical journal devoted to the
topic of systems failures on all platforms.  It would be fascinating
to learn about the many ways that systems can fail.

Instead, each failure is kept as a closely guarded secret, and as a
profession, we learn nothing.

A wise systems architect once told me, in another context:  "Don't
tell me how it works, tell me how it *fails*"

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

Re: IBM driving mainframe systems programmers into the ground

[Don Leahy]

On Thu, Nov 12, 2009 at 7:29 PM, Ed Gould  wrote:

> Ron: I guess I agree to a point but not with the last sentence.. Mackinney is 
> both good and bad. The good is they are cheap *BUT*  at what cost?

Maybe it depends on the product.  We use Mackinney's SimpList and the
support has been excellent.  Turnaround time is usually less than 24
hrs.

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

Re: A modest PARM proposal

[Don Leahy]

FWIW, Enterprise Cobol V4 has finally rectified this with the OPTFILE
parameter and the SYSOPTF dd statement.

(I've never used it...we're still using V3.4).

On Wed, Oct 28, 2009 at 11:44 AM, Nuttall, Peter (P.)
 wrote:
 > I'm also relatively ignorant in this field, but it was a PITA when
I was looking after the  compilers  ISTR that the PL1 compiler
allowed you to code 'DD:PARMDD' in the Par m field, but the COBOL
compiler did not ... For COBOL we had to get as many of the options
set to the correct site default as possible so that the parm field was
not exceeded ... I always wondered why the two compilers differed in
this way ?
>
> Cheers,
> Peter

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

Re: Does Ent. COBOL 4.1 generate 64-bit binary arithmetic instructions?

[Don Leahy]

Small correction:  Cobol calls it "reference modification".  A
substring by another name...

On Fri, Oct 9, 2009 at 9:15 AM, john gilmore  wrote:
> At last!

>
> These things said, it must also be conceded that the important new features 
> that IBM has added to Enterprise COBOL, e.g., pointers and address 
> modification (the curious COBOL terminology for substring operations), have 
> been very little used.  (Pointer usage, which would greatly simplify many 
> COBOL CICS APs, is still, for example, exiguous in  them.)
>

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

Re: mainframe e-mail with attachments

[Don Leahy]

Because of the potential pitfalls, we only send notifications ("Your
report is ready for pick up." or "The interface file from xxx was
processed last night ") to the users rather than the actual report.

On Wed, Oct 7, 2009 at 11:03 AM, Pommier, Rex R.
 wrote:
> Hi Hal,
>
> Funny you should bring the pitfalls up.  I mentioned several of them
> yesterday when the subject was brought up to me, asking how they would
> handle them.  The response I got back was the "deer in the headlights"
> look and a "I dunno" response.
>
> Rex
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
> Behalf Of Hal Merritt
> Sent: Wednesday, October 07, 2009 9:09 AM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: mainframe e-mail with attachments
>
> We have been using XMITIP for years and have been very satisfied. We
> send a lot out every day.
>
> Something to consider, however, is that we found that email delivery of
> critical reports to customers to be unacceptable. Our side worked
> perfectly, but we found full mailboxes, people out of the office,
> reports too large, accidental deletion, broken PC's, etc, etc, etc. That
> is, we had no control over the far end and yet we still got beat up when
> the reports were delayed/lost.
>
> And that was before the requirement to encrypt sensitive data.
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
> Behalf Of Pommier, Rex R.
> Sent: Tuesday, October 06, 2009 4:35 PM
> To: IBM-MAIN@bama.ua.edu
> Subject: mainframe e-mail with attachments
>
> Hi all,
>
> Sorry in advance for the probability that this has been discussed in the
> past but I did some searching of the archives and didn't hit much.
>
>
> What I'm looking for is an e-mail package running on z/OS that will
> allow me to attach files to e-mails for sending out.  I found many hits
> on XMITIP but really nothing else.  What all is out there that will
> allow me to do this?  At this point it is a research project to present
> to mgmt.
>
> In addition to XMITIP I found SMTP-Send.  Any other products that
> anybody is using?  Pros/cons would be welcome.  Private responses back
> if you don't want to talk about products on the list would be welcome as
> well.
>
> Thanks in advance.
>
> Rex
>
> rex.pomm...@cnasurety.com
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
> NOTICE: This electronic mail message and any files transmitted with it
> are intended
> exclusively for the individual or entity to which it is addressed. The
> message,
> together with any attachment, may contain confidential and/or privileged
> information.
> Any unauthorized review, use, printing, saving, copying, disclosure or
> distribution
> is strictly prohibited. If you have received this message in error,
> please
> immediately advise the sender by reply email and delete all copies.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: Reading DD card information

[Don Leahy]

Another way to pass parms to a program invoked via DFSRRC00 is to use
the APARM parameter.  The APARM contents can be retrieved via an INQY
ENVIRON call in the application program.  (The parm is limited to 32
bytes in length).

On Thu, Sep 17, 2009 at 11:42 AM, Frank Swarbrick
 wrote:
> For a regular batch program, yes.  Unfortunately most of our programs are 
> IMS, and as far as I know you cannot pass PARM data down to the application 
> program.
>
> For those who don't know IMS, this is how an IMS batch program is executed:
>
> //STEP01    EXEC PGM=DFSRRC00,
> //             PARM=(DLI,DDADMP,DDMPPSB)
>
> DFSRRC00 is the IMS driver program, which calls DL/I application program 
> called DDADMP using a DL/I PSB called DDMPPSB.
>
> Obviously I could use a separate dataset to contain the plan et all, but then 
> I can't use symbolic parms.
>
> Frank
>
> On 9/17/2009 at 9:36 AM, in message
> <6133ad1f0909170836q22bed236w6d4ece6d36a82...@mail.gmail.com>, Don Leahy
>  wrote:
>> FWIW, I usually specify the plan via a PARM.  Would this not suit your
>> purpose?
>>
>> On Thu, Sep 17, 2009 at 11:27 AM, Frank Swarbrick
>>  wrote:
>>> How on earth did you guess what I wanted to use this for?  This is exactly
>> it.  I want a way to set a DB2 plan using symbolics and have the program be
>> able to read it.
>>>
>>> So do you have some code that you use to extract the DSN from the DB2PLAN
>> DD?
>>>
>>> Someone suggested the DYNALLOC macro, and I've been fiddling with that but
>> not yet got it figured out.  (Not being an assembler programmer...)
>>> Haven't tried the other method yet.
>>>
>>> Thanks!
>>> Frank
>>>
>>> On 9/17/2009 at 9:11 AM, in message
>>> , Victor Gil
>>>  wrote:
>>>> Frank,
>>>>
>>>> The ONLY way I've found to pass a short string [up to 8 bytes] via
>>>> a "temporary" DD is:
>>>>
>>>> //    SET PLAN=PLANNAME
>>>> //DB2PLAN  DD   DISP=(,PASS),SPACE=(0,0),DSN=&&&PLAN
>>>>
>>>> the above DSN will be formatted by JES as
>>>>
>>>> //DB2PLAN DD DSN=SYSx.Txx.RAxxx..PLANNAME.Hxx
>>>>
>>>> from where you CAN get the desired PLANNAME.
>>>>
>>>> For longer strings consider multiple temporary DDs.
>>>>
>>>> HTH,
>>>> -Victor-
>>>>
>>>> On Wed, 16 Sep 2009 09:04:24 -0600, Frank Swarbrick
>>>>  wrote:
>>>>
>>>>>I believe I have seen something like the following:
>>>>>//FJSTEST  JOB NOTIFY=&SYSUID
>>>>>//STEP01   EXEC PGM=MYPGM
>>>>>//DUMMME   DD DUMMY,DSN='THIS.IS.A.TEST'
>>>>>
>>>>>What does MYPGM need to do in order to retrieve the DSN value of the DD
>>>> named DUMMME?
>>>>>
>>>>>A general pointer in the right direction would be nice.
>>>>>Specific examples would be great!  :-)
>>>>>
>>>>>Thanks,
>>>>>Frank
>>>>>
>>>>>
>>>>>>>>
>>>>>
>>>>>The information contained in this electronic communication and any
>>>> document attached hereto or transmitted herewith is confidential and
>>>> intended for the exclusive use of the individual or entity named above.  If
>>>> the
>>>> reader of this message is not the intended recipient or the employee or
>>>> agent
>>>> responsible for delivering it to the intended recipient, you are hereby
>>>> notified
>>>> that any examination, use, dissemination, distribution or copying of this
>>>> communication or any part thereof is strictly prohibited.  If you have
>>>> received
>>>> this communication in error, please immediately notify the sender by reply 
>>>> e-
>>>> mail and destroy this communication.  Thank you.
>>>>>
>>>>>--
>>>>>
>>>>>Frank Swarbrick
>>>>>Applications Architect - Mainframe Applications Development
>>>>>FirstBank Data Corporation - Lakewood, CO  USA
>>>>>P: 303-235-1403
>>>>>
>>>>>--
>>>>>For IBM-MAIN subscribe / signoff / archive access instructions,
>>>>>send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
>>>

Re: Reading DD card information

[Don Leahy]

There is more than one way to skin this cat, but the traditional way
to pass the DB2 plan name to DLI batch programs is to use the DDLITV02
dd statement.  (The last two parameters are the Plan and Program names
and don't have to be the same).

//*-PLAN---PROGRAM--
//DDITV02  DD *
  DSN2,SYS1,DSNMIN10,,A,-,,XIFBB43,CIFBB43
/*

And the EXEC statement resembles:

//IFB43EXEC PGM=DFSRRC00,REGION=4000K,
// PARM='DLI,DSNMTV01,CIFBB43,10,,,0,,N,0,T,,Y'

DSNMTV01 is the DLI interface program.  It launches the program
specified in the DDITV02 dd using the Plan that is also specified
there.

On Thu, Sep 17, 2009 at 11:42 AM, Frank Swarbrick
 wrote:
> For a regular batch program, yes.  Unfortunately most of our programs are 
> IMS, and as far as I know you cannot pass PARM data down to the application 
> program.
>
> For those who don't know IMS, this is how an IMS batch program is executed:
>
> //STEP01    EXEC PGM=DFSRRC00,
> //             PARM=(DLI,DDADMP,DDMPPSB)
>
> DFSRRC00 is the IMS driver program, which calls DL/I application program 
> called DDADMP using a DL/I PSB called DDMPPSB.
>
> Obviously I could use a separate dataset to contain the plan et all, but then 
> I can't use symbolic parms.
>
> Frank
>
> On 9/17/2009 at 9:36 AM, in message
> <6133ad1f0909170836q22bed236w6d4ece6d36a82...@mail.gmail.com>, Don Leahy
>  wrote:
>> FWIW, I usually specify the plan via a PARM.  Would this not suit your
>> purpose?
>>
>> On Thu, Sep 17, 2009 at 11:27 AM, Frank Swarbrick
>>  wrote:
>>> How on earth did you guess what I wanted to use this for?  This is exactly
>> it.  I want a way to set a DB2 plan using symbolics and have the program be
>> able to read it.
>>>
>>> So do you have some code that you use to extract the DSN from the DB2PLAN
>> DD?
>>>
>>> Someone suggested the DYNALLOC macro, and I've been fiddling with that but
>> not yet got it figured out.  (Not being an assembler programmer...)
>>> Haven't tried the other method yet.
>>>
>>> Thanks!
>>> Frank
>>>
>>> On 9/17/2009 at 9:11 AM, in message
>>> , Victor Gil
>>>  wrote:
>>>> Frank,
>>>>
>>>> The ONLY way I've found to pass a short string [up to 8 bytes] via
>>>> a "temporary" DD is:
>>>>
>>>> //    SET PLAN=PLANNAME
>>>> //DB2PLAN  DD   DISP=(,PASS),SPACE=(0,0),DSN=&&&PLAN
>>>>
>>>> the above DSN will be formatted by JES as
>>>>
>>>> //DB2PLAN DD DSN=SYSx.Txx.RAxxx..PLANNAME.Hxx
>>>>
>>>> from where you CAN get the desired PLANNAME.
>>>>
>>>> For longer strings consider multiple temporary DDs.
>>>>
>>>> HTH,
>>>> -Victor-
>>>>
>>>> On Wed, 16 Sep 2009 09:04:24 -0600, Frank Swarbrick
>>>>  wrote:
>>>>
>>>>>I believe I have seen something like the following:
>>>>>//FJSTEST  JOB NOTIFY=&SYSUID
>>>>>//STEP01   EXEC PGM=MYPGM
>>>>>//DUMMME   DD DUMMY,DSN='THIS.IS.A.TEST'
>>>>>
>>>>>What does MYPGM need to do in order to retrieve the DSN value of the DD
>>>> named DUMMME?
>>>>>
>>>>>A general pointer in the right direction would be nice.
>>>>>Specific examples would be great!  :-)
>>>>>
>>>>>Thanks,
>>>>>Frank
>>>>>
>>>>>
>>>>>>>>
>>>>>
>>>>>The information contained in this electronic communication and any
>>>> document attached hereto or transmitted herewith is confidential and
>>>> intended for the exclusive use of the individual or entity named above.  If
>>>> the
>>>> reader of this message is not the intended recipient or the employee or
>>>> agent
>>>> responsible for delivering it to the intended recipient, you are hereby
>>>> notified
>>>> that any examination, use, dissemination, distribution or copying of this
>>>> communication or any part thereof is strictly prohibited.  If you have
>>>> received
>>>> this communication in error, please immediately notify the sender by reply 
>>>> e-
>>>> mail and destroy this communication.  Thank you.
>>>>>
>>>>>--
>>>>>
>>>>>Frank Swarbrick
>>>>>Applications Architect - Mainframe 

Re: Reading DD card information

[Don Leahy]

FWIW, I usually specify the plan via a PARM.  Would this not suit your purpose?

On Thu, Sep 17, 2009 at 11:27 AM, Frank Swarbrick
 wrote:
> How on earth did you guess what I wanted to use this for?  This is exactly 
> it.  I want a way to set a DB2 plan using symbolics and have the program be 
> able to read it.
>
> So do you have some code that you use to extract the DSN from the DB2PLAN DD?
>
> Someone suggested the DYNALLOC macro, and I've been fiddling with that but 
> not yet got it figured out.  (Not being an assembler programmer...)
> Haven't tried the other method yet.
>
> Thanks!
> Frank
>
> On 9/17/2009 at 9:11 AM, in message
> , Victor Gil
>  wrote:
>> Frank,
>>
>> The ONLY way I've found to pass a short string [up to 8 bytes] via
>> a "temporary" DD is:
>>
>> //    SET PLAN=PLANNAME
>> //DB2PLAN  DD   DISP=(,PASS),SPACE=(0,0),DSN=&&&PLAN
>>
>> the above DSN will be formatted by JES as
>>
>> //DB2PLAN DD DSN=SYSx.Txx.RAxxx..PLANNAME.Hxx
>>
>> from where you CAN get the desired PLANNAME.
>>
>> For longer strings consider multiple temporary DDs.
>>
>> HTH,
>> -Victor-
>>
>> On Wed, 16 Sep 2009 09:04:24 -0600, Frank Swarbrick
>>  wrote:
>>
>>>I believe I have seen something like the following:
>>>//FJSTEST  JOB NOTIFY=&SYSUID
>>>//STEP01   EXEC PGM=MYPGM
>>>//DUMMME   DD DUMMY,DSN='THIS.IS.A.TEST'
>>>
>>>What does MYPGM need to do in order to retrieve the DSN value of the DD
>> named DUMMME?
>>>
>>>A general pointer in the right direction would be nice.
>>>Specific examples would be great!  :-)
>>>
>>>Thanks,
>>>Frank
>>>
>>>
>>
>>>
>>>The information contained in this electronic communication and any
>> document attached hereto or transmitted herewith is confidential and
>> intended for the exclusive use of the individual or entity named above.  If
>> the
>> reader of this message is not the intended recipient or the employee or
>> agent
>> responsible for delivering it to the intended recipient, you are hereby
>> notified
>> that any examination, use, dissemination, distribution or copying of this
>> communication or any part thereof is strictly prohibited.  If you have
>> received
>> this communication in error, please immediately notify the sender by reply e-
>> mail and destroy this communication.  Thank you.
>>>
>>>--
>>>
>>>Frank Swarbrick
>>>Applications Architect - Mainframe Applications Development
>>>FirstBank Data Corporation - Lakewood, CO  USA
>>>P: 303-235-1403
>>>
>>>--
>>>For IBM-MAIN subscribe / signoff / archive access instructions,
>>>send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
>>>Search the archives at http://bama.ua.edu/archives/ibm-main.html
>>
>> --
>> For IBM-MAIN subscribe / signoff / archive access instructions,
>> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
>> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>
>
>

>
> The information contained in this electronic communication and any document 
> attached hereto or transmitted herewith is confidential and intended for the 
> exclusive use of the individual or entity named above.  If the reader of this 
> message is not the intended recipient or the employee or agent responsible 
> for delivering it to the intended recipient, you are hereby notified that any 
> examination, use, dissemination, distribution or copying of this 
> communication or any part thereof is strictly prohibited.  If you have 
> received this communication in error, please immediately notify the sender by 
> reply e-mail and destroy this communication.  Thank you.
>
> --
>
> Frank Swarbrick
> Applications Architect - Mainframe Applications Development
> FirstBank Data Corporation - Lakewood, CO  USA
> P: 303-235-1403
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: Java Batch und JCL (DSN Disposition)

[Don Leahy]

Sure, but that works only in those cases where the failure doesn't matter.

On Wed, Sep 16, 2009 at 10:29 AM, Howard Brazee  wrote:
> On 16 Sep 2009 07:22:35 -0700, don.le...@leacom.ca (Don Leahy) wrote:
>
>>Rollback is an option, but what do you do after that?   Fail silently?
>
> Use the Return Code that has been established for the condition.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: Java Batch und JCL (DSN Disposition)

[Don Leahy]

Rollback is an option, but what do you do after that?   Fail silently?

On Wed, Sep 16, 2009 at 9:42 AM, Howard Brazee  wrote:
> On 15 Sep 2009 19:16:58 -0700, don.le...@leacom.ca (Don Leahy) wrote:
>
>
>>On Tue, Sep 15, 2009 at 6:35 PM, Paul Gilmartin  wrote:
>>> On Tue, 15 Sep 2009 17:34:23 -0400, Don Leahy wrote:
>>>
>>>>Nearly all of the Cobol programs that I have worked with in the past
>>>>20 years have had some sort of connection to a DBMS or message queuing
>>>>system.  Abends are needed in order to roll back uncommitted updates
>>>>when a condition arises that prevents the application from continuing.
>>>> In other words, abends are used to preserve data base integrity.
>>>>
>>> Wouldn't it be sufficient, then, simply to exit with whatever
>>> return code, without issuing a COMMIT?
>
>>Normal termination always causes a COMMIT.
>
>
> Then do a rollback.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: Java Batch und JCL (DSN Disposition)

[Don Leahy]

Normal termination always causes a COMMIT.

On Tue, Sep 15, 2009 at 6:35 PM, Paul Gilmartin  wrote:
> On Tue, 15 Sep 2009 17:34:23 -0400, Don Leahy wrote:
>
>>Nearly all of the Cobol programs that I have worked with in the past
>>20 years have had some sort of connection to a DBMS or message queuing
>>system.  Abends are needed in order to roll back uncommitted updates
>>when a condition arises that prevents the application from continuing.
>> In other words, abends are used to preserve data base integrity.
>>
> Wouldn't it be sufficient, then, simply to exit with whatever
> return code, without issuing a COMMIT?
>
> -- gil
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: Java Batch und JCL (DSN Disposition)

[Don Leahy]

Nearly all of the Cobol programs that I have worked with in the past
20 years have had some sort of connection to a DBMS or message queuing
system.  Abends are needed in order to roll back uncommitted updates
when a condition arises that prevents the application from continuing.
 In other words, abends are used to preserve data base integrity.

On Tue, Sep 15, 2009 at 2:45 PM, Rob Schramm  wrote:
> Maybe an occasional abend might be worth doing.  But it smacks of poor
> design when "oops.. I didn't really test this.. so I'll just abend"
> methodology takes over.  With all the I think the term is xtreme
> programming where testing is built into the program from the bottom up,
> that abending to handle a data issue seems overkill.  Granted if all the
> data is exception... but then I go back to not really testing it.
>
>
> On 15 Sep 2009 07:55:25 -0700, rob.schr...@siriuscom.com (Rob Schramm)
> wrote:
>
>>I always thought that abending a cobol program was a lame duck method.
>>Bringing that practice into JAVA seems equally lame duck.  Handle the
> dang
>>issue or put the offending records off into an exception file and get on
>>about processing.  Set a code... send an e-mail.
>
> "Always" seems to be a bit extreme.   I believe this technique needs
> to be used a lot more, but do we always want to get on with
> processing?
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: ISPF Counter

[Don Leahy]

On Fri, Aug 21, 2009 at 8:36 AM, Paul Gilmartin wrote:

> That's *so* twentieth century!
>
> Since the advocates often argue that mainframes are more economical
> than small systems, why is this feature readily available on desktops,
> but not on mainframes where it should be cheaper?
>
> There's one ISPF function (I forget which) that lately shows a
> progress bar.

The progress bar is an illusion.  The screen is locked while it is
running.  Progress bars are actually easy to code;  the key is the
CONTROL DISPLAY LOCK service

>
> It's a continual source of irritation that I can't put SCSV in
> auto-refresh and go edit a file in the other split.
>
> It's a continual source of irritation that I can't split between
> OMVS and Edit, for example.
>
> Why does DDLIST show the message, "Searching data sets not on screen"
> rather than scrolling so they appear?
>
> Why does Find in a large file pause each time after a fixed number of
> lines and prompt for continuing rather than displaying a progress
> counter and letting the user interrupt?

Huh? Except for SDSF, FIND doesn't pause after a fixed number of
lines; it keeps going until a hit or until EOF.
.
>
> I believe that nowadays much of the duplex interaction would be possible
> with modern 3270s.  VTAM is much the culprit for prohibiting it.
>
> Why is horizontal scrolling so much more difficult than vertical scrolling
> in ISPF?
>
> Did I say it's all *so* twentieth century?
>
> -- gil
>

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

Re: IBM halves mainframe Linux engine prices

[Don Leahy]

Pedantic?  Here on IBM-MAIN?  Perish the thought!  :-)


> BlacBerrys, PALMs, etc. also have operating systems, if you want to get 
> pedantic.
> -
> Too busy driving to stop for gas!

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

Re: Convert signed COMP-3 variable into unsigned integer

[Don Leahy]

All you really need is:

MOVE WS-VAR1  TO WS-VAR4

COBOL takes care of unpacking the data, dropping the sign. and
truncating the decimal places.

On Mon, Aug 10, 2009 at 8:40 AM, Gangar, Parin
(MLITS) wrote:
> Hi,
>
> I want to convert S9(13)V99 COMP-3 to simply 9(13).
>
> I declared following in Working Storage section -
>
> 01  WS-VAR1             PIC S9(13)V99  COMP-3.
>
> 01  WS-VAR2             PIC S9(13)V99.
>
> 01  WS-VAR3  redefines  WS-VAR2.
>      05   WS-VAR3-redef           PIC 9(13)V99.
>
> 01  WS-VAR4               PIC 9(13).
>
> I am now doing following in Procedure division -
>
> MOVE WS-VAR1    to      WS-VAR2.
>
> COMPUTE WS-VAR3-REDEF  ROUNDED = WS-VAR3-REDEF.
>
> MOVE  WS-VAR3-REDEF     to WS-VAR4.
>
> Please let me know if the above would work? I don't need the SIGN.
>
> Thanks,
> Parin
>
>
> --
> This message w/attachments (message) may be privileged, confidential or 
> proprietary, and if you are not an intended recipient, please notify the 
> sender, do not use or share it and delete it. Unless specifically indicated, 
> this message is not an offer to sell or a solicitation of any investment 
> products or other financial product or service, an official confirmation of 
> any transaction, or an official statement of Merrill Lynch. Subject to 
> applicable law, Merrill Lynch may monitor, review and retain e-communications 
> (EC) traveling through its networks/systems. The laws of the country of each 
> sender/recipient may impact the handling of EC, and EC may be archived, 
> supervised and produced in countries other than the country in which you are 
> located. This message cannot be guaranteed to be secure or error-free. 
> References to "Merrill Lynch" are references to any company in the Merrill 
> Lynch & Co., Inc. group of companies, which are wholly-owned by Bank of 
> America Corporation. Se!
 curities and Insurance Products: * Are Not FDIC Insured * Are Not Bank 
Guaranteed * May Lose Value * Are Not a Bank Deposit * Are Not a Condition to 
Any Banking Service or Activity * Are Not Insured by Any Federal Government 
Agency. Attachments that are part of this E-communication may have additional 
important disclosures and disclaimers, which you should read. This message is 
subject to terms available at the following link: 
http://www.ml.com/e-communications_terms/. By messaging with Merrill Lynch you 
consent to the foregoing.
> --
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: to share or not to share

[Don Leahy]

IMO, an application programmer trying to solve a production problem
qualifies under the 'need to know' principle when it comes to
production data.  Read only, of course.  :-)

On Thu, Aug 6, 2009 at 12:10 PM, Frank
Swarbrick wrote:
 On 8/5/2009 at 7:46 PM, in message <4a7a3608.4050...@ync.net>, Rick 
 Fochtman
>  wrote:
>> --
>>
In these days of HIPPA, Sarbanes-Oxley (in the US), PIPEDA (in Canada)
and various other privacy acts, do you want applications people able
to read production data?  On the other hand how do you re-create
production problems in test when the obfuscation may also eliminate
the problem?


>>>
>>>There's the rub.  I know there are many vendors out there who will be glad to
>> help you "scrub" production data for use in testing, but they all sound like
>> a royal pain in the *!&@# if you ask me.  Until I am absolutely told I cannot
>> use (copies of) production data in test I will continue to do so.  Once I am
>> told that I will say "sure, tell me how I can do my job without it and I'll
>> consider it".
>>>
>>>Very sore spot with me.
>>>
>>>Frank
>>>
>>>
>> 
>> You might consider this: "age" your data.
>>
>> We allowed testing with production data that was at least 3 weeks old.
>> In our business, after 2 days, the data was useless, even to a malicious
>> attacker, so we let it age three weeks, then allowed app. staff to use
>> it for test purposes.
>
> Interesting, but doesn't much help solve a production problem that happened 
> at 2am today.
>
> Plus the account numbers, personal identifiers (Tax ID et al), etc. most 
> likely won't have changed in three weeks...
>
> Frank
>
> --
>
> Frank Swarbrick
> Applications Architect - Mainframe Applications Development
> FirstBank Data Corporation
> Lakewood, CO  USA
> P: 303-235-1403
> F: 303-235-2075
>
>
>
>
> The information contained in this electronic communication and any document 
> attached hereto or transmitted herewith is confidential and intended for the 
> exclusive use of the individual or entity named above.  If the reader of this 
> message is not the intended recipient or the employee or agent responsible 
> for delivering it to the intended recipient, you are hereby notified that any 
> examination, use, dissemination, distribution or copying of this 
> communication or any part thereof is strictly prohibited.  If you have 
> received this communication in error, please immediately notify the sender by 
> reply e-mail and destroy this communication.  Thank you.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: DB2 : How to extract DDL

[Don Leahy]

There is a freeware tool called DB2LOOK for z/OS.

You can obtain it from www.idug.org

IBM's File Manager/DB2 has DDL generation capability, but it's not free.

On Wed, Aug 5, 2009 at 11:11 AM, CUNY Yann wrote:
> Ok ... it's possible with a "HDDL batch" command.
> In the generated JCL, the database name is specified.
>
> Any IBM idea ?
>
> Cordialement,
>
> Yann Cuny
> Groupe GENERALI
> Industrialisation et Gestion des Environnements
> * 01 58 34 12 64
> *yc...@externe.generali.fr
> -Message d'origine-
> De : IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] De la part 
> de CUNY Yann
> Envoyé : mercredi 5 août 2009 15:52
> À : IBM-MAIN@bama.ua.edu
> Objet : DB2 : How to extract DDL
>
> Is there a possibility to extract DDL from a DB2 Database ?
>
> We got DB2 V8 ... and BMC Software.
>
> I know that it is possible with BMC Change Manager or Catalog Manager.
>
> But I have to use JCL, and it seems impossible to specify the database name 
> in the BMC JCL.
>
>
>
> Any Idea ?
>
>
>
> Regards.
>
>
>
> Cordialement,
>
>
>
> Yann Cuny
>
> Groupe GENERALI
>
> Industrialisation et Gestion des Environnements
>
> * 01 58 34 12 64
>
> * yc...@externe.generali.fr
>
> P Pensez « environnement », n'imprimez ce mail que si cela est nécessaire...
>
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: USS misuse (was Re: Mainframe hacking)

[Don Leahy]

If acronyms were patentable, IBM could sue itself for infringement.  :-)

On Mon, Jul 27, 2009 at 9:10 AM, Mark Zelden wrote:
> Why can't uss all get along?  :-)
>
> --
> Mark Zelden
> Sr. Software and Systems Architect - z/OS Team Lead
> Zurich North America / Farmers Insurance Group - ZFUS G-ITO
> mailto:mark.zel...@zurichna.com
> z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
> Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: Of link lists and application programs

[Don Leahy]

I can understand putting production level application load libraries
into LLA, but not development libraries.

In our shop, which is a very small one, refreshing the development
libraries every 15 minutes would be way too infrequent.  In DB2
applications it would also cause abends unless you were very careful
to co-ordinate your package binds with the LLA refresh.  (In most
shops the package bind is executed in the same job as the
compile+link).

On Mon, Jul 27, 2009 at 8:43 AM, Staller, Allan wrote:
> 
> A little while ago I had posed a question about having "applications"
> libraries in the system LNKLST.  Some were for it, some were against it.
> One of the prominent reasons for being against it was the need to do an
> LLA refresh after implementing any changes to an application library.  I
> agreed that this was a disadvantage and looked around to see if I could
> get around it.
>
> What I found was that you can have libraries *excluded* (removed) from
> the LLA.  This is done by use of the REMOVE directive in the CSVLLAxx
> member.  I took my proposal to our systems programmers and here is what
> they implemented (in our development system only, so far):
> 
>
> A former employer of mine had user loadlibs in LLA (and I believe
> lnklst). They were carried in a separate PROGxx member.
> Every (in our case) 15 min, an F LLA,UPDATE=xx was issued by automation.
> Not sure what they did when the applications loadlibs needed to be
> compressed.
>
> HTH,
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: TechTarget Mainframe Survey

[Don Leahy]

I said 'no' and got the same response.

On Thu, Jul 23, 2009 at 12:49 PM, Bill
Washburn wrote:
> It appears to be a survey from CA since at the end it asks if you want CA
> to send you the survey results.
>
> I said 'yes', and supplied my email address. After which it promptly told
> me I wasn't the demographic they were looking for and thank you for
> playing...
> hmmm
>
>
>
>
>             Ian
>                          >                                                          To
>             Sent by: IBM              ibm-m...@bama.ua.edu
>             Mainframe                                                  cc
>             Discussion List
>                          .edu>
>                                                                   Subject
>                                       TechTarget Mainframe Survey
>             07/23/2009 11:36
>             AM
>
>
>             Please respond to
>               IBM Mainframe
>              Discussion List
>                                .edu>
>
>
>
>
>
>
> Techtarget is running a survey on Mainframe usage etc.
> The first 2 or 3 pages is boring stuff but it is worth it to get to the
> real
> mainframe questions.
>
> Link = http://go.techtarget.com/r/8764676/1317583
>
> I'm posting it here to make sure they get the right audience for the
> survey.
>
> 
> The Mainframe Computer - a high-performance computer used for
> large-scale computing purposes that require greater availability and
> security than a smaller-scale machines - is a paradigm in today's
> data center.  Whether you love or hate it, your mainframe controls
> your server world.
>
> In this survey, TechTarget wants to know how you split distribution
> of your network between mainframe, windows and cloud, as well the
> impact the mainframe has on your distributed applications.
>
> Click here to take this 10 minute survey, supply your direct feedback
> and enter to win one of two iPod giveaways:
> http://go.techtarget.com/r/8764676/1317583
>
> Please note that this survey follows the TechTarget Survey Terms and
> Conditions found here. In other words, here's some fun lawyer speak
> if you're interested:
> http://go.techtarget.com/r/8764677/1317583
> 
> --
> Ian
> http://www.cicsworld.com
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: no longer notified

[Don Leahy]

Sometimes NOINTERCOM is set by processes that transfer files using
IND$FILE.  This prevents the file transfer from being disrupted by a
TSO message.

On Wed, Jul 8, 2009 at 1:03 PM, Frank
Swarbrick wrote:
> That did it!  Thank you very much!!!
>
> Of course I have no idea what proc I ran that included the NONINTERCOM, 
> but...  Actually, we were doing training last week on ASG products, and that 
> is when my issue occured, so I'm guessing it's one of those.  Probably 
> something turned it off and then abended before turning it back on.
>
> Thanks again!
>
> Frank
>
>
> On 7/8/2009 at 9:15 AM, in message
> , "McKown,
> John"  wrote:
>>>  -Original Message-
>>> From: IBM Mainframe Discussion List
>>> [mailto:ibm-m...@bama.ua.edu] On Behalf Of Frank Swarbrick
>>> Sent: Wednesday, July 08, 2009 10:11 AM
>>> To: IBM-MAIN@bama.ua.edu
>>> Subject: no longer notified
>>>
>>> In our development LPAR I am having a problem where my job
>>> "Notify" no longer seems to work.  That is, when I submit a
>>> job with NOTIFY=&SYSUID on the JOB card.  When the job ends I
>>> no longer receive a message like:
>>> 09.07.37 JOB02829 $HASP165 FJSBR14  ENDED AT ZOS  MAXCC=0 CN(INTERNAL)
>>>
>>> No one else appears to be having this issue, and in fact on
>>> our production LPAR I also do not have this issue.  Our ISPF
>>> profiles are not shared between PROD and DEV (argh!) so I'm
>>> thinking I must have changed something somewhere to cause
>>> this.  Systems has not been able to determine what the issues
>>> is, and they have better things to do anyway.  Any thoughts
>>> on what the cause might be?
>>>
>>> Oh, I forgot to note, once I log off and log back on I
>>> receive all of the notify messages that are queued up for me!
>>>
>>> Frank
>>
>> Go to ISPF option 6 and enter the command:
>>
>> PROFILE INTERCOM
>>
>> it sounds like sometime you or maybe some REXX or CLIST did a "PROFILE
>> NOINTERCOM" command. This tells TSO to not display this type of message, but
>> to store it in the BRODCAST dataset. When you logon, you then get all these
>> messages because the TSO LOGON process does the equivalent of a LISTBC
>> command.
>>
>> Gad, I'm showing my age.
>>
>> --
>> John McKown
>> Systems Engineer IV
>> IT
>>
>> Administrative Services Group
>>
>> HealthMarkets(r)
>>
>> 9151 Boulevard 26 * N. Richland Hills * TX 76010
>> (817) 255-3225 phone * (817)-961-6183 cell
>> john.mck...@healthmarkets.com * www.HealthMarkets.com
>>
>> Confidentiality Notice: This e-mail message may contain confidential or
>> proprietary information. If you are not the intended recipient, please
>> contact the sender by reply e-mail and destroy all copies of the original
>> message. HealthMarkets(r) is the brand name for products underwritten and
>> issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake
>> Life Insurance Company(r), Mid-West National Life Insurance Company of
>> TennesseeSM and The MEGA Life and Health Insurance Company.SM
>>
>>
>>
>> --
>> For IBM-MAIN subscribe / signoff / archive access instructions,
>> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
>> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

>
> The information contained in this electronic communication and any document 
> attached hereto or transmitted herewith is confidential and intended for the 
> exclusive use of the individual or entity named above.  If the reader of this 
> message is not the intended recipient or the employee or agent responsible 
> for delivering it to the intended recipient, you are hereby notified that any 
> examination, use, dissemination, distribution or copying of this 
> communication or any part thereof is strictly prohibited.  If you have 
> received this communication in error, please immediately notify the sender by 
> reply e-mail and destroy this communication.  Thank you.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: S222 abends and Reason Codes

[Don Leahy]

On Sun, Jul 5, 2009 at 1:33 AM, Ed Gould wrote:
SNIP
>
> The programmer was asked to leave but I got very annoyed as he got a 
> consultants job at a large insurance company here in Chicago and a very nice 
> pay raise.
>
> There is no justice in the world.
>
I don't know about that.  You got the guy fired, didn't you?  You're
lucky you didn't suffer the same fate; VPs don't like having to
intervene in petty (to them) technical disputes.   :-)

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

Re: Application Compiles

[Don Leahy]

Answers that apply in our shop:

On Fri, Jun 5, 2009 at 10:29 AM, Kreiter,
Chuck wrote:
> Who is responsible for updating the PROCs when new loadlibs are added?

An application programmer who is informally appointed as the
co-ordinator.  Sound knowledge of ISPF dialog programming and good
communications with Systems are essential.

> Who changes the invocation utilities to incorporate new or overridden
> options or other variables?

See above.  Our application environment is very stable, so changes are
fairly rare.

> Who decides the architectural requirements for the application and codes
> the overrides for those?

This is done in partnership between Systems and applications.  Neither
dictates requirements to the other.

>
> It's pretty clear that the app/dev teams own the application programs
> and systems owns the underlying functional tools (TSO/ISPF, ROSCOE,
> COBOL compiler libraries, etc).
>
> Thanks for all of the other responses.
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
> Behalf Of esst...@juno.com
> Sent: Friday, June 05, 2009 8:43 AM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: Application Compiles
>
> Chuck Kreiter wrote
> Our IT department is having a debate about ownership of the compile
> process, PROC's and invocation utilities (REXX, CLIST, RPF's).  I'd like
> to hear from some other sysprog types on who owns this process in your
> shop?
>
>
> Can you define what is meant by "ownership" ?
>
>
> 
> Click to find the latest solutions to enhance your small business.
> http://thirdpartyoffers.juno.com/TGL2141/fc/BLSrjpTI97vX3hnQJxjHdRZajPuY
> U7kmaGHwnwIsSS1LH44w6StSb6ELTJe/
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send
> email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search
> the archives at http://bama.ua.edu/archives/ibm-main.html
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: Application Compiles

[Don Leahy]

I work as a programmer in a small shop and we're pretty much on our
own when it comes to compile processes.  Over the years we've built
our own ISPF application to monitor source code and generate standard
compile JCL.  Since we have to "eat our own dog food" we have put a
lot of effort into making the processes programmer-friendly and
productive.

However, to achieve that we've sacrificed the rigor provided by
products like Endevor.  The in house tool kit does not guarantee
source code integrity from start to finish.  The programmer can easily
shoot himself in the foot by ignoring established procedures and
managing his code outside of the tool kit.

I have worked at an Endevor shop, and the programmers, almost to a man
(or woman), hated the process because it was not well suited to the
unit test code/compile/test loop.  Many used their own compile JCL for
their unit testing, not wanting to wrestle with Endevor until they
were obliged to.  While I was there I wrote a simple ISPF application
to generate compile JCL, and it was by far the most popular tool that
I created.

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

Re: ISPF Question

[Don Leahy]

I think that everyone would want to reserve "ED" and "BR" and other
obvious ones such as WHEREIS, WHOGOT etc.

On Tue, Apr 28, 2009 at 3:15 PM, Ted MacNEIL  wrote:
>>This brings up a question I've been meaning to ask for a while; does anyone 
>>know if there's a way to 'reserve' command table abbreviations?
>
> No there is not.
> Like most standards, you need to reach an agreement.
>
> Years ago, we had the same issue with SMF User records (numbers greater than 
> 127).
> Somebody finally decided to create a mini-consortium to agree that certain 
> products would always use the same numbers, so they were reserved.
> But, that took a long time.
>
> So did IBM's assignment of product prefixes to ISV's, such as K for Candle 
> (now part of Tivoli).
>
> So, I'd say you need a new consortium.
>
> -
> Too busy driving to stop for gas!
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: Data Masking

[Don Leahy]

As we found out a couple of years ago, masking can bite you.

We were testing a new release of a recently developed system using
data where the client's name was scrambled to a bunch of random
characters.  The testing went smoothly, and the new release went into
production.

It was not until we were running in production that we realized that
one of the screens was transposing the client's first name and surname
on the data base.  The error had gone unnoticed by the programmer and
the testing / QA teams simply because the scrambled names lacked the
visual cues that made the problem obvious once real names were used.

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

Re: protecting ISPF dataset allocations

[Don Leahy]

The only time I ever saw READY prompt restricted was in a logon proc
designed for end users (ie *not* programmers).  Those users were
allowed to use a couple of ISPF-based tools, but nothing else.

IMO, the application programmer should be given enough latitude to
shoot *himself* in the foot, but should not be able to shoot anyone
else's foot.  That is the systems programmer's job. :-)

On Wed, Mar 18, 2009 at 2:59 PM, Dave Salt  wrote:
>> From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On
>> Behalf Of Jousma, David
>> We already do not allow them to get to the READY prompt
>
> If a data set is allocated to a users ISPF session and it runs out of space 
> (e.g. the ISPF PROFILE), the usual remedy is to reallocate a bigger data set, 
> copy the old one into it, exit to the TSO READY prompt, delete the original 
> data set and rename the new (bigger) one back to the old name. If users can't 
> get to the READY prompt and therefore can't do this for themselves, it means 
> a lot of time will be wasted, both for the users and for whoever it is they 
> have to call to do the deleting and renaming for them.
>
> I've worked at places that have very tight security restrictions (such as 
> banks and governments) but I've never seen anyone block users from getting to 
> the READY prompt. To me this seems overly restrictive and perhaps might cause 
> more problems than it solves.
>
> Dave Salt
>
> SimpList(tm) - try it; you'll get it!
> http://www.mackinney.com/products/SIM/simplist.htm
> _
> Chat with the whole group, and bring everyone together.
> http://go.microsoft.com/?linkid=9650735
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: Cobol: Maximum number of FD Statements

[Don Leahy]

According to the Language Reference manual (Appendix 1.2) you can have
65,535 "SELECT filename..." statements.

On Fri, Feb 27, 2009 at 2:00 PM,   wrote:
> Hello everybody,
>
> Our installation is running z/OS 1.8, IBM Enterprise COBOL for z/OS 3.4.1. If 
> I'm missing something here, let me know.
>
> I've looked in our Cobol language reference and the programming guide and of 
> course, searched the web. If the answer's there, I've not found it.
>
> How many FD/SD statements can a Cobol program have? According to my System 
> 390 JCL manual, a job step can have 3273 DD statements. So, I expect a Cobol 
> program could not have more than that.
>
> Perhaps there is no defined maximum other than the maximum Cobol program 
> size, whatever that is. Can anybody tell me?
>
>
>        Regards,
>                Eric Verwijs
> Programmer Analyst | Programmeur-analyste
> CPP/ OAS/ IA Production Support Team | Équipe de soutien à la production RPC 
> / SV / IA
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: Interesting APAR OA27291 an undocumented change to GETMAIN Behavior in z/OS 1.10

[Don Leahy]

Assumptions about the state of uninitialized storage can bite the best
of us.  Last year we ran into a problem with the Cobol code generated
by the SQL Coprocessor using Enterprise Cobol 3.3 under DB2 V8.

In the SQL---PLIST it was generating the following FILLER area:

02 SQL---STMT-NUMPIC S9(9) COMP-5.
02 FILLER  PIC X(20).

Apparently the FILLER area is used by DB2 to store some bit switches
and its logic assumes that initially the FILLER contains x'00'.
*Usually* this is true, but we ran into some very weird application
abends in an IMS MPR.  .

It turned out that we were a bit behind in our Cobol maintenance.
After the maintenance was applied the generated code changed to:

02 SQL---STMT-NUMPIC S9(9) COMP-5.
02 FILLER  PIC X(20) VALUE IS
   X''

In my experience this is the first time that a programmer's protest
that "It's not my fault!" turned out to be true.  :-)

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

Re: 3270 screen size with Attachmate Extra!

[Don Leahy]

Extra Enterperise 7.11.  Same storey:  no apparent option to change to
a non-standard screen size.

On Mon, Dec 22, 2008 at 11:15 AM, Ian S. Worthington
 wrote:
> Neither in mine (Enterprise 2000).  Though it does sound familiar.  Perhaps it
> pertains to an earlier version?
>
> i
>
> -- Original Message --
> Received: Mon, 22 Dec 2008 10:28:42 AM COT
> From: "George.William" 
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: 3270 screen size with Attachmate Extra!
>
>> Thanks Steve
>>
>> However, when I click OPTIONS there is not an option for TERMINAL.
>> Maybe your description is for a later version of Attachmate Extra! than I
> have (6.71).
>>
>> Bill
>>
>>
>> -Original Message-
>> From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu]on
>> Behalf Of Thompson, Steve
>> Sent: Monday, December 22, 2008 6:21 AM
>> To: IBM-MAIN@bama.ua.edu
>> Subject: Re: 3270 screen size with Attachmate Extra!
>>
>> Yes, you can set up for custom sizes.
>>
>> Bring up a session and disconnect it (that is, from the "host") using
>> the tool bar (the icon that looks like a switch).
>>
>> Now click on the OPTIONS at the top of the screen (probably above the
>> tool bar).
>>
>> Select TERMINAL and then 3270.
>>
>> Now where it says 3270 model, scroll it down and select custom.
>>
>> Now the Rows and Columns boxes should be modifiable. Set 'em to what you
>> like.
>>
>> Save this profile and then hit the connection button (in the tool bar).
>>
>> Lastly, make sure that the VTAM defs are in place for this to work (I've
>> been gone from this area too long, can't tell you what you have to
>> specify or where).
>>
>> Regards,
>> Steve Thompson
>>
>> -- Opinions expressed by this poster are not necessarily those of
>> poster's employer, and should not be taken as such. --
>>
>> --
>> For IBM-MAIN subscribe / signoff / archive access instructions,
>> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
>> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>>
>>
> __
>>
>> CONFIDENTIALITY NOTICE: This email from the State of California is for the
> sole use of the intended recipient and may contain confidential and privileged
> information.  Any unauthorized review or use, including disclosure or
> distribution, is prohibited.  If you are not the intended recipient, please
> contact the sender and destroy all copies of this email.
>>
>> --
>> For IBM-MAIN subscribe / signoff / archive access instructions,
>> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
>> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: 3270 screen size with Attachmate Extra!

[Don Leahy]

Sorry, I have no answer for you.  When I ran into the same situation I
gave up on Extra! and covertly* installed Vista 3270.

* It's a legitimate copy that I paid for out of my own pocket, but it
is not part of the corporate standard desktop 'image' so it won't be
supported by the local PC geeks.  Not that it needs any support.

On Fri, Dec 19, 2008 at 6:51 PM, Bill George  wrote:
> Does anyone know if it is possible with Attachmate's Extra! (I have version
> 6.71) to modify the screen size to something other than the standard models
> (2,3,4,5)?  I was able to do this with PComm and Vista and change to 60X162
> but now I am stuck with Extra!.
>
> Thanks for any (Hopeful) insights.
>
> Bill

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

Re: ISPF and long lines (was: CLIST/REXX Philosophy)

[Don Leahy]

If I had a nickel for every time I've seen a blank look after asking
"Did you try the HELP key?", I could have retired years ago.


On Thu, Dec 18, 2008 at 8:52 AM, Shmuel Metz (Seymour J.)
 wrote:
> In
> <1346911285-1229553284-cardhu_decombobulator_blackberry.rim.net-16888641...@bxe348.bisx.prod.on.blackberry>,
> on 12/17/2008
>   at 10:34 PM, Ted MacNEIL  said:
>
>>I've also found that even when you do communicate to the user community,
>>few actually read/exploit it.
>
> It were ever thus :-(
>
> --
> Shmuel (Seymour J.) Metz, SysProg and JOAT
> ISO position; see 
> We don't care. We don't have to care, we're Congress.
> (S877: The Shut up and Eat Your spam act of 2003)
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

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

Re: ISPF and long lines (was: CLIST/REXX Philosophy)

[Don Leahy]

There is the new(ish) EXPAND command that works with scrollable panel
fields.  It presents a popup window.

However, that doesn't help when you are Editing data.

 Wed, Dec 17, 2008 at 12:52 PM, Paul Gilmartin  wrote:

> Why, why doesn't ISPF edit, as an option, provide the facility to
> display long lines as single fields occupying multiple screen lines,
> as XEDIT does.  This makes insertion into a long line vastly
> easier.  Users preferring to shift right and left could leave
> the option disabled (as is likewise possible in XEDIT).
>
> -- gil
>

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

Re: z/OS 1.10 and Data Areas

[Don Leahy]

On Wed, Dec 3, 2008 at 10:17 AM, Thompson, Steve
<[EMAIL PROTECTED]> wrote:

>
> They can get scratched and become unreadable. Just had it happen. We had
> an INSTALL DVD get a scratch on it, and it became a coaster. Mind you,
> it was in a protection sleeve inside a thick cardboard media envelope.
>
> Granted, you can make the same arguments for a USB drive (well, what if
> they dropped it?). But it is, in my opinion, harder to screw up a 4GB
> thumb drive than it is to screw up a DVD.
>
> Regards,
> Steve Thompson


I can vouch for that.  My thumb drive has been through the laundry
-twice- and still works.

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

Re: z/OS 1.10 and Data Areas

[Don Leahy]

Would it help if we stop calling it "BookMangler" ? :-)

Seriously, I am a big fan of the Book Manager format and would be lost
without it.  I find the TSO interface particularly useful, especially
when looking up messages and codes.

Please remember that not all shops allow their programmers to have
Internet access.

On Mon, Dec 1, 2008 at 8:51 PM, Peter Relson <[EMAIL PROTECTED]> wrote:

>
> I would still appreciate your comments regarding "PDF-only" even if it
> applies only to potential subsequent releases.
>
> Peter Relson
> z/OS Core Technology Design

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

Re: searching all members of a pds using wildcards

[Don Leahy]

SimpList also has a facility to launch an edit macro across a PDS.

I am a customer, not a vendor, so I am allowed to say that.  :-)

On Wed, Nov 19, 2008 at 7:19 AM, John P Kalinich <[EMAIL PROTECTED]> wrote:
> Jim McAlpine of the IBM Mainframe Discussion List 
> wrote on 11/19/2008 03:07:57 AM:
>
>> On Tue, Nov 18, 2008 at 3:42 PM, Jim McAlpine
> <[EMAIL PROTECTED]>wrote:
>>
>> > Is there any way to achieve the above ie to search for 'abc*xyx' where
> *
>> > can be any length in all members of a pds.
>> >
>>
>> I do have an edit macro that allows me to search for a string including
>> wildcards.  Is there an easy way to apply this to ALL members of a pds.
>
> Lionel D. has an EDITALL macro on the CBT tape.  And I think Mark Z. has
> one on his web site.
>
> Regards,.
> John K
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>
>

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

Re: searching all members of a pds using wildcards

[Don Leahy]

Have you tried SRCHFOR?

//SEARCH  EXEC PGM=ISRSUPC,
//PARM=(SRCHCMP,
//'ANYC')
//NEWDD  DD DSN=DG53.LIBROPRD.EXPRTPDS,
//  DISP=SHR
//OUTDD  DD SYSOUT=(*)
//SYSIN  DD *
SRCHFOR  'ABC',P
SRCHFORC 'XYX',S
/*

This will return records where it finds a Prefix = ABC and a Suffix =
XYX.  This may not be exactly what you want.

On Tue, Nov 18, 2008 at 10:42 AM, Jim McAlpine <[EMAIL PROTECTED]> wrote:
> Is there any way to achieve the above ie to search for 'abc*xyx' where * can
> be any length in all members of a pds.
>
> Jim McAlpine
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>
>

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

Re: Partition dataset manager

[Don Leahy]

There is also a product called SimpList,
www.mackinney.com/products/SIM/simplist.htm but it is more of a
general purpose productivity tool than a PDS manager per se.  (If you
are new to mainframes, as your signature line implies, then SimpList
would be a big help to you.)

On Mon, Nov 17, 2008 at 11:15 AM, Ram Balaji <[EMAIL PROTECTED]> wrote:
> Hi all,
>
> Can anyone provide me pdsm(partiotion dataset manager) document or link.
>
>
> Regards,
> Ram Balaji.S.
> (Dying Hard to explore MainFrames)
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>
>
>
>
>
>
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>
>

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

Re: Former Marines

[Don Leahy]

Dead thread walking!

Darren killed this thread on Nov 11.

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

Re: Compile panels (was: procs and concatenations)

[Don Leahy]

On Wed, Nov 12, 2008 at 6:56 PM, Dave Salt <[EMAIL PROTECTED]> wrote:

>
> I haven't used the ISPF compile panels for a long time. When I'm in a member 
> list I enter '1' next to any members I want to compile, or I enter '1 
> pattern' on the command line to select all members that match a pattern (e.g. 
> '1 PGM*'). This calls a user defined function that submits a job to compile 
> the selected members.
>
> Dave Salt
> SimpList(tm) - try it; you'll get it!
> http://www.mackinney.com/products/SIM/simplist.htm

Neither have I.  In our shop the major obstacle is that the ISPF
compile panels don't handle DB2 programs.  Nor would I expect them to
because not every shop uses DB2.  DB2 has its own "Program
Preparation" function, but no one here uses it, preferring instead to
rely on our in-house panels that understand our local naming
standards.

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

Re: procs and concatenations

[Don Leahy]

On Wed, Nov 12, 2008 at 6:30 PM, Frank Swarbrick <[EMAIL PROTECTED]> wrote:

> Does anyone out there actually use the ISPF supplied compile screen?
> Before I got involved with the z/OS stuff a co-worker had already
> written a REXX panel for our compiles for us to use, so I haven't much
> looked at the ISPF supplied ones.
>

Not any more.  We have in-house panels that prompt the user for the
program name, a "project name" and "location", and it figures out the
rest using definitions stored in an ISPF table.  JCL is built using
ISPF skeletons.   Very simple and has served us well for many years.

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

Re: Deleting a segment in IMS-DB

[Don Leahy]

I would also recommend the MVSHELP forum.   http://mvshelp.net/vbforums/

On Wed, Nov 12, 2008 at 9:01 AM, Chris Mason <[EMAIL PROTECTED]> wrote:
> Ram
>
> This looks like the sort of question that should be posed in the IMS-L list.
>
> You can join the list by using the "Join or Leave IMS-L" prompt on the
> following page:
>
> http://imslistserv.bmc.com/scripts/wa-BMC.exe?A0=IMS-L
>
> Chris Mason
>
> On Wed, 12 Nov 2008 08:49:23 -0500, Ram Balaji <[EMAIL PROTECTED]>
> wrote:
>
>>Hi all,
>>
>>I need to delete a parent segment and its child segments also?in IMS-DB.
>>How to do it with COBOL program. Iam new to IMS This?is?urgent
> requiremet for me
>>How to start?of with this...?
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>
>

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

Re: zLinux Request for Information Update

[Don Leahy]

Um, you do know that we have the same holiday here in Canada, right Ted?

Honouring Veterans, no matter what country they are from, does not
constitute "propaganda".

(I am a proud son of a Canadian vet).

On Mon, Nov 10, 2008 at 12:03 PM, Ted MacNEIL <[EMAIL PROTECTED]> wrote:
> You could at least have the decency to change the subject line, so we know 
> that we are being inundated with more US propaganda!
> --Original Message--
> From: Ed Finnell
> Sender: IBM Mainframe Discussion List
> To: IBM Mainframe Discussion List
> ReplyTo: IBM Mainframe Discussion List
> Sent: Nov 10, 2008 11:02
> Subject: Re: zLinux Request for Information Update
>
>
> In a message dated 11/10/2008 7:03:14 A.M. Central Standard Time,
> [EMAIL PROTECTED] writes:
>
> latest. Here is the US we do take a day to honor our Veterans. If you'd  ask
> a
> Veteran, they would say all the praise needs to go to the families,  Mothers,
> Fathers, etc of Veterans. It is much harder on them supporting  things at
> home
> and not knowing.  Am sure this is true all over the  world.
>

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

Re: COBOL abbreviated IF & message IGYPS2048-S

[Don Leahy]

So, for once, the programmer was correct.  It *was* a compiler problem.  :-)

On Mon, Oct 13, 2008 at 4:51 PM, Greg Shirey <[EMAIL PROTECTED]> wrote:
>
> Sorry, hit "SEND" too soon last time.  Just wanted to put this
> information in the archive thread for future reference.
>
> APAR PK69010 (closed 8/5/08) states, in part:
>
> A complex IF statement containing abbreviated combined conditions with
> parenthesis around the distributed subjects is incorrectly flagged with
> message IGYPS2048-S.
>
> LOCAL FIX:
>  1)  Split the DATA3 = ('W' OR 'G') to this:
>  (DATA3  = 'W' OR DATA3 = 'G')
>
> Enterprise COBOL V4R1 enhanced syntax checking of parenthesized
> abbreviated combined conditions and accidentally also prohibited
> parenthesis around the distributed object which should remain legal.
>
>
>
> Greg Shirey
> Ben E. Keith Co.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>
>

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

Re: Emulators

[Don Leahy]

I'll second that.  I work in an Extra! shop, but I still use Vista,
paid for out of my own pocket.  You don't have to dig very deep...it
costs less than a case of 24 beers.

On Fri, Oct 10, 2008 at 5:29 PM, Rick Fochtman <[EMAIL PROTECTED]> wrote:
> And when you've decided to buy it, it's dirt cheap. Note that I say WHEN,
> not IF. :-)
>
> Blaicher, Chris wrote:
>
>> Tom Brennan's VISTA 3270 is very good.  It isn't free, but you can test
>> it for free and then you can decide to buy it.
>>
>> 
>>
>> Christopher Y. Blaicher
>> Senior Software Developer
>> Austin Development Lab
>>
>> phone: 512.340.6154
>> moble: 512.627.3803
>> fax: 512.340.6647
>>
>> 10431 Morado Circle Austin, TX 78759
>> BMC Software
>>
>> -Original Message-
>> From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
>> Behalf Of Linda Mooney
>> Sent: Friday, October 10, 2008 2:23 PM
>> To: IBM-MAIN@BAMA.UA.EDU
>> Subject: Re: Emulators
>>
>> That's okay, not to worry.  I was looking for a free 3270 emulator, just
>> hadn't posted yet. You anticipate my query.   :-)  Might be best to keep
>> those Friday glasses...
>>
>> So, have you used this one?  Did it work for you?  I'm looking for mod4
>> screen support, maybe better - would love mod4 depth at 133 cols wide
>> with 3279 type color.
>>
>> Thanks,
>>
>> Linda Mooney
>> -- Original message -- From: Ian
>> <[EMAIL PROTECTED]>
>>
>>>
>>> My bad!
>>> yes I had my Friday glasses on :-)
>>> On Fri, Oct 10, 2008 at 2:05 PM, Patrick O'Keefe wrote:
>>>

 On Fri, 10 Oct 2008 13:13:01 -0500, Ian wrote:

>
> x3270 http://x3270.bgp.nu/ It runs on all platforms and is opensource
> and free. ...

 If I understand the original poster, he wants a mainframe emulator, not
 a 3270 emulator. You're giving him the wrong end of the connection.
 Pat O'Keefe


>>
>> --

 For IBM-MAIN subscribe / signoff / archive access instructions, send
 email to [EMAIL PROTECTED] with the message: GET IBM-MAIN

>>
>> INFO

 Search the archives at http://bama.ua.edu/archives/ibm-main.html


>>>
>>> --
>>> Ian http://www.cicsworld.com
>>> --
>>>
>>
>>
>>>
>>> For IBM-MAIN subscribe / signoff / archive access instructions, send
>>> email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
>>>
>>
>>
>>>
>>> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>>>
>>
>> --
>> For IBM-MAIN subscribe / signoff / archive access instructions,
>> send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
>> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>>
>> --
>> For IBM-MAIN subscribe / signoff / archive access instructions,
>> send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
>> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>>
>>
>>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>
>

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

Re: PDS Lock

[Don Leahy]

Oops..Sorry.  This reply was to the OPI snipped too much

On Wed, Oct 8, 2008 at 5:17 PM, Don Leahy <[EMAIL PROTECTED]> wrote:
> The short answer, for an application programmer, is No.
>
> In the mainframe world, security is taken very seriously and is not
> left in the hands of the programmer creating the data set.  (I am
> assuming that you *are* a newcomer, else you would be familiar with at
> least one of RACF, ACF2 and Top Secret the three security packages
> that dominate the mainframe world.  If that assumption is incorrect, I
> apologize).
>
> If your PDS contains sensitive data, you have to make it known to your
> security admin who will set up the rules needed to protect it.  Be
> prepared to justify your request.
>

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

Re: PDS Lock

[Don Leahy]

The short answer, for an application programmer, is No.

In the mainframe world, security is taken very seriously and is not
left in the hands of the programmer creating the data set.  (I am
assuming that you *are* a newcomer, else you would be familiar with at
least one of RACF, ACF2 and Top Secret the three security packages
that dominate the mainframe world.  If that assumption is incorrect, I
apologize).

If your PDS contains sensitive data, you have to make it known to your
security admin who will set up the rules needed to protect it.  Be
prepared to justify your request.

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

Re: REXX error

[Don Leahy]

If you use the ISPF Editor's "HILITE REXX" command most of your syntax
problems will be highlighted.   I find it to be a great help,
especially when matching up quotes, double quotes, commas etc.

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

Re: PDS Lock

[Don Leahy]

Another possibility is to write a program to encrypt the PDS so that
no one else can make sense out of it.

Of course, anyone who looks at the PDS may think it is corrupted, and
delete it out from under you.  :-)

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

Re: LE question about COBOL compatibility

[Don Leahy]

It's unbelievable that we are still talking about OS/VS Cobol when Y2K
provided such a golden opportunity (ie, commitment of time and
resources) to get rid of it.

IMHO, the only reasonable excuse for keeping OS/VS Cobol around is not
having the source code to recompile.



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

Re: Curiousity question

[Don Leahy]

I think that IBM has indeed started to muscle in on QuickRef.

We just installed a new version of IBM's Fault Analyzer, and it has a
pretty good message lookup facility built into it.  AFAIK, it only
works from within Fault Analyzer, so QuickRef doesn't have anything to
worry about.  Yet.

On Tue, Sep 30, 2008 at 3:09 PM, Howard Brazee <[EMAIL PROTECTED]> wrote:
> On 30 Sep 2008 07:16:10 -0700, [EMAIL PROTECTED] (Grine, Janet
> [GCG-PFS]) wrote:
>
>>I have always thought of QuickRef as an automatic "sure let's get it"
>>kind of product.  Has anyone heard of other similar products?  What kind
>>of experience can we expect in the area of cost increases for this
>>product over the long term?
>
> What I never figured out is how a product like this could have more
> than a small window of usefulness, before the main product's company
> (IBM) incorporates its advantages.
>
> Sometimes the window is bigger than we expect - it took time before
> IBM decided it wanted to keep the sort business.
>
> Sometimes the window is naturally small - by the time Microsoft got
> disk compression, that model had run its course.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>
>

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

Re: Curiousity question

[Don Leahy]

BTW,  SimpList is not an alternative to QuickRef (though it does have
a Book Manager interface), it serves a different purpose.  If it was
up to me (and it never is), I'd like to have both products.

On Tue, Sep 30, 2008 at 2:47 PM, Grine, Janet [GCG-PFS]
<[EMAIL PROTECTED]> wrote:
> Thanks everyone for the input.  I have used QuickRef for so many years
> that I forget to even check to see if there are any alternatives.
> Competition is always healthy, so it is good to know we still have
> choices, especially with the advances in technology.
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
> Behalf Of Don Leahy
> Sent: Tuesday, September 30, 2008 2:31 PM
> To: IBM-MAIN@BAMA.UA.EDU
> Subject: Re: Curiousity question
>
> SimpList definitely falls into the "no brainer" category.
>
> It's cheap ($5,000 US no matter how many users or how big your system
> is) and really boosts the productivity of ISPF users.  At our shop,
> virtually every one uses it every day.
>
> You can find out more from the vendor at www.mackinney.com or from the
> developer's web site: www.soft-center.com
>
> A few years back I wrote a product review for NASPA's Technical Support
> magazine.  I cannot find the original link, but there is a copy on the
> soft-center web site:
> www.soft-center.com/NaspaSimpListReview.pdf
>
> There is another NASPA review written by another author, but I cannot
> find that link either.  You can find a copy at
> www.soft-center.com/NaspaSimpListReview2.pdf
>
>
> On Tue, Sep 30, 2008 at 10:15 AM, Grine, Janet [GCG-PFS]
> <[EMAIL PROTECTED]> wrote:
>> I have always thought of QuickRef as an automatic "sure let's get it"
>> kind of product.  Has anyone heard of other similar products?  What
>> kind of experience can we expect in the area of cost increases for
>> this product over the long term?
>>
>> Thanks in advance for any input.
>>
>> Jill Grine
>>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send
> email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search
> the archives at http://bama.ua.edu/archives/ibm-main.html
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>
>

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

Re: Curiousity question

[Don Leahy]

SimpList definitely falls into the "no brainer" category.

It's cheap ($5,000 US no matter how many users or how big your system
is) and really boosts the productivity of ISPF users.  At our shop,
virtually every one uses it every day.

You can find out more from the vendor at www.mackinney.com or from the
developer's web site: www.soft-center.com

A few years back I wrote a product review for NASPA's Technical
Support magazine.  I cannot find the original link, but there is a
copy on the soft-center web site:
www.soft-center.com/NaspaSimpListReview.pdf

There is another NASPA review written by another author, but I cannot
find that link either.  You can find a copy at
www.soft-center.com/NaspaSimpListReview2.pdf


On Tue, Sep 30, 2008 at 10:15 AM, Grine, Janet [GCG-PFS]
<[EMAIL PROTECTED]> wrote:
> I have always thought of QuickRef as an automatic "sure let's get it"
> kind of product.  Has anyone heard of other similar products?  What kind
> of experience can we expect in the area of cost increases for this
> product over the long term?
>
> Thanks in advance for any input.
>
> Jill Grine
>

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

Re: COBOL program

[Don Leahy]

At the shop where I am working, we store our CoBOL compile listings in
(very large) PDSes.

>On Fri, Sep 26, 2008 at 4:42 PM, Howard Brazee <[EMAIL PROTECTED]> wrote:

>
> I'd be interested in knowing shops that found more uses for them.
>
> --

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

Re: Another ICETOOL challenge

[Don Leahy]

On Thu, Sep 18, 2008 at 8:04 PM, Ted MacNEIL <[EMAIL PROTECTED]> wrote:
>>I don't know how big your file is, or how automated a process you need, but 
>>if you open and save the file with ISPF Edit
>
> I've always thought that ISPF EDIT could only handle up to 255!
>

I think that restriction was lifted around 1990...possibly earlier.

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

Re: Why don't I see my CSA storage in the dump?

[Don Leahy]

On Mon, Aug 25, 2008 at 10:03 AM, Shane <[EMAIL PROTECTED]> wrote:

> Nope - you'd need to be Tolkien to decipher that lot if you were coming
> in cold.
> IBM have a *lot* to answer for when they went OCO. For people that never
> had access to the fiche, or the PLMs - or the (internals) education
> classes - large parts of this might as well be runes.
>
> Doesn't inspire confidence in the quality of software that may be
> forthcoming in future.
> And we (customers) are supposed to unquestioningly agree to allow any
> and all auth'd code from vendors. m ...
>
I know that OCO has long been a sore point with you Systems guys, but
this post made me realize what you are up against.  I get nightmares
when I try to imagine what it would be like to be cut off from my
Applications' source code and have to maintain the application using
nothing but the 'documentation' to guide me.   Yikes!!   A recipe for
disaster, even if the documentation is good.

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

Re: db2 precompiler error

[Don Leahy]

On Wed, Aug 27, 2008 at 8:56 AM, Mohammad Khan <[EMAIL PROTECTED]> wrote:
> Not true, this clause is not specific to a cursor and can be used in a 
> singleton
> SELECT though any value of n other than 1 does not make sense. A cursor will
> unnecessarily cause three calls to DB2 (open, fetch and close) where one will
> do. Problem in the given code is the missing number, it should be "FETCH
> FIRST 1 ROW ONLY".
> HTH
> Mohammad
>

I stand corrected

But, the syntax diagram in the manual (DB2 V8) indicates that the '1'
in FETCH FIRST 1 ROW ONLY is optional in the case of a singleton
SELECT.  So, I am still puzzled as to why the original poster's
statement failed.

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

Re: db2 precompiler error

[Don Leahy]

FETCH FIRST n ROWS only applies to a cursor.

Your statement is a singleton SELECT, so, by definition, can only
support 1 returned row anyway.  If your SELECT statement attempts to
retrieve more than 1 row, you will get a -811 SQLCODE at run time.

Convert your statement to a Cursor and you should be fine.

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

Re: California's COBOL payroll system

[Don Leahy]

On Sun, Aug 10, 2008 at 4:54 PM, Warren Brown <[EMAIL PROTECTED]> wrote:
> My wife teaches fifth grade and tells me that her kids can't tell time on an 
> analog clock.  They grew up in a digital world! Most analog devices are more 
> accurate than their digital counter parts. Take the clock, there is an 
> infinite number of places between the 12 and the 1.

I remember when I first taught my son how to use a wrench.  I had to
explain to him the difference between "clockwise" and
"counter-clockwise".  It was not obvious to him because of digital
clocks.

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

Re: Politics - California state computers can't handle pay cut, controller says - sacbee.com

[Don Leahy]

On Wed, Aug 6, 2008 at 8:35 AM, Chase, John <[EMAIL PROTECTED]> wrote:
>> -Original Message-
>> From: IBM Mainframe Discussion List On Behalf Of Don Leahy
>>
>> [ snip ]
>>
>> Here is a (paraphrased) excerpt from a document at a site that I know:
>>
>> "The old system is written in several different programming
>> languages and runs on incompatible platforms and operating systems".
>>
>> This statement was slightly puzzling to those familiar with the "old"
>> (early 1990s) system, which was 100% COBOL under IMS and DB2.  :-)
>
> But according to professional BS-ers, COBOL, IMS and DB2 are three
> "different programming languages".
>
>-jc-
>
Yeah, and the old system uses JCL so you can add that to the list of
"programming languages" too.  :-)

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