date:20131001

> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Paul Gilmartin
> Sent: Monday, September 30, 2013 11:50 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Quote on Slashdot.org
> 
> On Mon, 30 Sep 2013 16:51:29 -0400, John Gilmore wrote:
> 
> >Many C dialects do support long jumps as a language extension.
> >
> As a language extension, or via functions?  (Some purists make a
> distinction.  But it can't be done with functions without depending on
> out-of-band knowledge of the stack structure.)
> 
> >They began in PL/I where they were/are called out-of-block GOTOs.
> >
> "began" only if you consider PL/I to antedate ALGOL 60, which I believe
> is contrary to history.  (And ALGOL 60 allows such label objects to be
> passed as actual parameters; I don't know about PL/I.)
> 
> >PL/I's used of contextually recognized instead of reserved words is a
> >high virtue.  It is often caricatured as permitting constructs like
> >
> >declare file file record sequential buffered ;
> >
> And the worst compromise is Rexx, wherein such words are reserved with
> the bonus of added contextual sensitivity:
> 
> ELSE = 'id'  /* OK */
> ''ELSE/* OK */
> ELSE/* IRX0008I Error ...: Unexpected THEN or ELSE  */

I think I disagree here.  Your example seems to show a confusing language 
idiosyncrasy but in practice I have never had any problems with it.  

Rather I would say that the behavior is the least error prone - at least if you 
don't have reserved words in the, e g, COBOL sense.
COBOL is really an example of bad usage of the idea of reserved words, we have 
had several cases of the need to recode programs or area descriptions (COPYs) 
due to a field name suddenly is not allowed because it is a new reserved word.  



Best Regards
Thomas Berg
___
Thomas Berg   Specialist   zOS\RQM\IT Delivery   SWEDBANK AB (Publ)
















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

Re: Quote on Slashdot.org

2013-10-01 Thread Shane Ginnane

On Tue, 1 Oct 2013 13:21:15 +0800, David Crayford wrote:

>I programmed in PL/I
>professionally and IMO Pascal is a far cleaner language with more
>expressive features. Pascals successors, such as Module/2 and Delphi,
>widen the gap even more.

I would never profess to have "programmed" in PL/I - I was taught it by a 
one-time employer. Did the job for a high level language in the 80's - but I 
was an assembler sysprog.
Now Delphi - that was something else again when I was looking to do some 
Windoze coding some years later. Man, that IDE was awesome, even for a 
non-Pascal guy.
Borland exes should have been shot for what they did to that business. There 
was a huge user conference in Anaheim in 1996 when I passed through in 1996. 
And they (Borland) tossed it all away.

Shane ...

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

Re: Quote on Slashdot.org

Personally I am of the opinion that a programming language is for the benefit 
of the programmer, to be least "hindered" in the coding. 
It should help the coding and minimize both syntax pondering and keystrokes. 

A programming language should not have a role of disciplining the programmer.  
That should be done outside of the language, whether it be through a human 
review or using an automatic tool. 

That way the programmer could with the least effort construct a correct 
program.  If the program is not correct the additional effort caused by that is 
not exceeding what would be caused by a "disciplining" language in the same 
case.  

Note that a bad programmer makes bad programs regardless of the language he 
uses. 
 
If I take REXX as an example, although it has its limitations and rough edges, 
it have 4 important advantages IMHO:

1. It lives up the principle of "least astonishment" in syntax. 

2. Its functionality and syntax is oriented towards the end goal of the code 
effort. 

3. It lives up to the KISS principle (Keep It Simple, Stupid). 

4. It minimizes the keystrokes for the programmer. 



Best Regards
Thomas Berg
___
Thomas Berg   Specialist   zOS\RQM\IT Delivery   SWEDBANK AB (Publ)

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

Re: Quote on Slashdot.org


On 1/10/2013 7:13 PM, Shane Ginnane wrote:

On Tue, 1 Oct 2013 13:21:15 +0800, David Crayford wrote:


I programmed in PL/I
professionally and IMO Pascal is a far cleaner language with more
expressive features. Pascals successors, such as Module/2 and Delphi,
widen the gap even more.

I would never profess to have "programmed" in PL/I - I was taught it by a 
one-time employer. Did the job for a high level language in the 80's - but I was an 
assembler sysprog.
Now Delphi - that was something else again when I was looking to do some 
Windoze coding some years later. Man, that IDE was awesome, even for a 
non-Pascal guy.
Borland exes should have been shot for what they did to that business. There 
was a huge user conference in Anaheim in 1996 when I passed through in 1996. 
And they (Borland) tossed it all away.


I actually liked PL/I a lot. I much preferred it to COBOL. I remember 
reading that Fred Brooks regrets that it wasn't the systems programming 
language for OS/360. I suppose because it was a  big, complex language 
for the time it didn't quite make the cut.


I took computer studies at high school and we were taught Turbo Pascal 
and assembler on the BBC micro. The BBC was a great machine and most 
British kids
of my age cut their teeth on them! The Acorn/BBC legacy lives on today 
in ARM. The Sinclair's were just as much fun, typically eccentric 
British designs. I broke the keyboard thrashing the keys playing Daley 
Thompsons decathlon. Apples were out of our price range.


I agree wrt Delphi. It totally nuked VB for simplicity and was 
considerably faster. I've still got a copy somewhere.



Shane ...

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


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

Re: Quote on Slashdot.org

2013-10-01 Thread Shane Ginnane

>If I take REXX as an example, although it has its limitations and rough edges, 
>it have 4 important advantages IMHO:
>
>1. It lives up the principle of "least astonishment" in syntax. 
>2. Its functionality and syntax is oriented towards the end goal of the code 
>effort. 
>3. It lives up to the KISS principle (Keep It Simple, Stupid). 
>4. It minimizes the keystrokes for the programmer. 

Sounds more like Perl than REXX  

Shane ...  ;-)

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

Good news from MFNetDisk

2013-10-01 Thread Shai S

Dear MFNetDisk fan

October 1st, 2013 brings a significant change in MFNetDisk history. On that
day, a group of mainframe veterans (MFNetDisk team) will take
responsibility for MFNetDisk promotion, marketing and sale. I will remain
the sole MFNetDisk software owner, main developer and support person. Our
mutual mission is to make MFNetDisk well known around the mainframe
community and take its place as a breakthrough product yet a valid and
affordable alternative product to existing hardware and software solutions.
The purpose of this move is to allow me to focus on developing, supporting
and enhancing MFNetDisk in existing and new exciting directions. It will
allow you to receive a mature and significantly more stable product with
incredible capabilities, yet with a very affordable cost.

>From now on, please contact the MFNetDisk team via emailmfnetd...@gmail.com for
any issue related to the product. It may include any comments and ideas so
together we can make MFNetDisk even better.  The team will contact you in
the coming weeks in order to learn about your usage, needs and future
options.

Starting now, you can get a free activation key for limited period. Once
you complete the “code request” form, you will be able to download the
software as used to be in the past. The MFNetDisk team will provide you the
activation key.

I want to thank you from the deepest of my heart to the continuous support
over the years. Without you I wasn’t able to make MFNetDisk even close to
what it is today. I’m looking forward to continue working with you.

Yours truly,
Shai Hess

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

Re: Quote on Slashdot.org

On 1/10/2013 7:23 PM, Thomas Berg wrote:

Personally I am of the opinion that a programming language is for the benefit of the
programmer, to be least "hindered" in the coding.
It should help the coding and minimize both syntax pondering and keystrokes.

A programming language should not have a role of disciplining the programmer.
That should be done outside of the language, whether it be through a human
review or using an automatic tool.

That way the programmer could with the least effort construct a correct program. If the
program is not correct the additional effort caused by that is not exceeding what would
be caused by a "disciplining" language in the same case.

Note that a bad programmer makes bad programs regardless of the language he
uses.

If I take REXX as an example, although it has its limitations and rough edges, it have 4 important advantages IMHO:

1. It lives up the principle of "least astonishment" in syntax.

2. Its functionality and syntax is oriented towards the end goal of the code
effort.

3. It lives up to the KISS principle (Keep It Simple, Stupid).

4. It minimizes the keystrokes for the programmer.

Agreed. But there are some issues with REXX.

1. It's bloody slow! I recently ported a language that's just as simple,
more powerful and up to two orders of magnitude faster!

2. The lack of a module system is a DRY obstacle.
3. It's difficult to write external packages in a high-level language
without jumping through a lot of hoops.

Best Regards
Thomas Berg
___
Thomas Berg Specialist zOS\RQM\IT Delivery SWEDBANK AB (Publ)

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

Re: Quote on Slashdot.org

David Crayford wrote


I programmed in PL/I professionally and IMO Pascal is a far cleaner
language with more expressive features


and this is a sentiment that I marvel at.   I view Pascal as a toy, a
pedagogic language animated by very dubious principles.

What I think of Pascal and our disagreement are not themselves
important; but such differences strongly suggest that discussions of
the relative merits of different statement-level procedural languages
is an all but futile undertaking unless the context in which they are
to take place is specified in advance and in great, irksome detail.

Even then I suspect that differences of taste will make even modest
consensus impossible to achieve.

We are left with Justice Holmes's apothegm:

If you like diamonds and I like rubies we have just three options:
battle, compromise, or a jeweler who has both.

John Gilmore, Ashland, MA 01721 - USA

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

Re: Need Help with an ARR

2013-10-01 Thread Peter Relson

>Wouldn't SETRP DUMP=YES,DUMPOPX= be the preferred method 
>than SDUMPX? 

DUMPOPX, providing a SNAP(X) parameter area, has less functionality and 
flexibility than does SDUMP(X).
(On the positive side, it requires no authorization, but if you were 
estabilshing an ARR, you at least at some point had authorization.)

Peter Relson
z/OS Core Technology Design

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

Re: Quote on Slashdot.org


On 1/10/2013 7:51 PM, John Gilmore wrote:

David Crayford wrote


I programmed in PL/I professionally and IMO Pascal is a far cleaner
language with more expressive features


and this is a sentiment that I marvel at.   I view Pascal as a toy, a
pedagogic language animated by very dubious principles.


There are many versions of Pascal. Some better than others. The better 
ones are pretty damn good.

Object Pascal and Delphi are the case in point.


What I think of Pascal and our disagreement are not themselves
important; but such differences strongly suggest that discussions of
the relative merits of different statement-level procedural languages
is an all but futile undertaking unless the context in which they are
to take place is specified in advance and in great, irksome detail.

Even then I suspect that differences of taste will make even modest
consensus impossible to achieve.

We are left with Justice Holmes's apothegm:

If you like diamonds and I like rubies we have just three options:
battle, compromise, or a jeweler who has both.

John Gilmore, Ashland, MA 01721 - USA

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


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

Re: Quote on Slashdot.org


On 1/10/2013 7:41 PM, Shane Ginnane wrote:

If I take REXX as an example, although it has its limitations and rough edges, 
it have 4 important advantages IMHO:

1. It lives up the principle of "least astonishment" in syntax.
2. Its functionality and syntax is oriented towards the end goal of the code 
effort.
3. It lives up to the KISS principle (Keep It Simple, Stupid).
4. It minimizes the keystrokes for the programmer.

Sounds more like Perl than REXX  


Taking the p**s again Shane! ;-)

FWIW, Perl 6 seems to have smoothed out a lot of the rough edges.


Shane ...  ;-)

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


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

Re: Quote on Slashdot.org

> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Shane Ginnane
> Sent: Tuesday, October 01, 2013 1:42 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Quote on Slashdot.org
> 
> >If I take REXX as an example, although it has its limitations and rough
> edges, it have 4 important advantages IMHO:
> >
> >1. It lives up the principle of "least astonishment" in syntax.
> >2. Its functionality and syntax is oriented towards the end goal of the
> code effort.
> >3. It lives up to the KISS principle (Keep It Simple, Stupid).
> >4. It minimizes the keystrokes for the programmer.
> 
> Sounds more like Perl than REXX  
> 
> Shane ...  ;-)

H... From the little I have seen of Perl, it's like a gun pointed to your 
foot... :) 

I think I rather prefer Python. 



Best Regards
Thomas Berg
___
Thomas Berg   Specialist   zOS\RQM\IT Delivery   SWEDBANK AB (Publ)




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

Re: Quote on Slashdot.org

2013-10-01 Thread John McKown

On Tue, Oct 1, 2013 at 7:09 AM, Thomas Berg  wrote:

> > -Original Message-
> > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> > Behalf Of Shane Ginnane
> > Sent: Tuesday, October 01, 2013 1:42 PM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: Quote on Slashdot.org
> >
> >
> > Shane ...  ;-)
>
> H... From the little I have seen of Perl, it's like a gun pointed to
> your foot... :)
>

More like a Howitzer pointed at your foot. But, like a Howitzer, it can do
"wonderful things" if used by someone who knows how to (uh, not really me,
but I do like Perl)


>
> I think I rather prefer Python.
>
>
>
I'm not getting wrapped up in that discussion! 


>
> Best Regards
> Thomas Berg
> ___
> Thomas Berg   Specialist   zOS\RQM\IT Delivery   SWEDBANK AB (Publ)
>
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



-- 
I have _not_ lost my mind! It is backed up on a flash drive somewhere.

Maranatha! <><
John McKown

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

Re: Quote on Slashdot.org

> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of David Crayford
> Sent: Tuesday, October 01, 2013 1:48 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Quote on Slashdot.org
> 
> On 1/10/2013 7:23 PM, Thomas Berg wrote:
> > Personally I am of the opinion that a programming language is for the
> benefit of the programmer, to be least "hindered" in the coding.
> > It should help the coding and minimize both syntax pondering and
> keystrokes.
> >
> > A programming language should not have a role of disciplining the
> programmer.  That should be done outside of the language, whether it be
> through a human review or using an automatic tool.
> >
> > That way the programmer could with the least effort construct a
> correct program.  If the program is not correct the additional effort
> caused by that is not exceeding what would be caused by a "disciplining"
> language in the same case.
> >
> > Note that a bad programmer makes bad programs regardless of the
> language he uses.
> >
> > If I take REXX as an example, although it has its limitations and
> rough edges, it have 4 important advantages IMHO:
> >
> > 1. It lives up the principle of "least astonishment" in syntax.
> >
> > 2. Its functionality and syntax is oriented towards the end goal of
> the code effort.
> >
> > 3. It lives up to the KISS principle (Keep It Simple, Stupid).
> >
> > 4. It minimizes the keystrokes for the programmer.
> >
> 
> Agreed. But there are some issues with REXX.
> 
> 1. It's bloody slow! I recently ported a language that's just as simple,
> more powerful and up to two orders of magnitude faster!
> 2. The lack of a module system is a DRY obstacle.
> 3. It's difficult to write external packages in a high-level language
> without jumping through a lot of hoops.

True, but:

0. I used it as an example of syntax and principles.

1. As I often compile it and if necessary optimize at a high level/use an 
external tool I seldom have problems with that. (To where did you port what ?  
Curious if z/OS...)  

2. I'm not quite sure what you mean. Trying to guess an answer: I use (when 
compiled) /*%INCLUDEs when practical and statically include REXX functions when 
performance is needed. 

3. Well, I suppose so, haven't tried that other than a COBOL panel exit to call 
a rexx (which of course is a bit different case).   BTW, have you an example of 
that ?  



Best Regards
Thomas Berg
___
Thomas Berg   Specialist   zOS\RQM\IT Delivery   SWEDBANK AB (Publ)

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

Re: Quote on Slashdot.org


On 1/10/2013 8:23 PM, Thomas Berg wrote:

True, but:

0. I used it as an example of syntax and principles.

1. As I often compile it and if necessary optimize at a high level/use an 
external tool I seldom have problems with that. (To where did you port what ?  
Curious if z/OS...)


Yes. I ported Lua to z/OS and it's lightening fast. It also supports 
multiple paradigms - procedural, OO, prototype, functional etc.


I wrote a RESTFul web server that runs DB2 queries returning JSON 
payloads in 50 lines of code.


require "mercury"

luasql = require( "luasql.odbc" )
json = require( "cjson" )

module( "proteus", package.seeall, mercury.application )

-- create the DB2 connection
local env = luasql.odbc()
local con = assert( env:connect() )

local proteus = {}

-- generic query to list arbitrary objects
function proteus.list_query( query )
print(query)
local cur = assert( con:execute( query ) )
local rows = {}
local row = cur:fetch( {}, "a" )
while row do
table.insert( rows, row )
row = cur:fetch( {}, "a" )
end
return rows
end

-- lists proteus objects with filtering
function proteus.list_objects( params )
local query = "select * from " .. params.env .. ".object"
if params.level then
level = params.level:upper()
query = query .. " where level = '" .. level .. "'"
end
if params.objtype ~= "*" then
objtype = params.objtype:upper()
query = query .. " and object_type = '" .. objtype .. "'"
end
return json.encode( proteus.list_query( query ) )
end

-- dispatchers
get( "/proteus/objects/:env/",
function() return proteus.list_objects( params ) end )

get( "/proteus/objects/:env/:level",
function() return proteus.list_objects( params ) end )

get( "/proteus/objects/:env/:level/:objtype",
function()
p.dump(response)
p.dump(params)
return proteus.list_objects( params )
end )


2. I'm not quite sure what you mean. Trying to guess an answer: I use (when 
compiled) /*%INCLUDEs when practical and statically include REXX functions when 
performance is needed.


Copybooks are one thing, modules are another. Modules allow you to 
create instances of objects. BTW, I've got bench-tests that show 
compiled REXX can be slower

http://users.tpg.com.au/crayford/rexx-lua-c-io-benchmark.htm.


3. Well, I suppose so, haven't tried that other than a COBOL panel exit to call 
a rexx (which of course is a bit different case).   BTW, have you an example of 
that ?


I wrote a regex package for REXX that simply delegates to the C++ TR1 
regex package. It was difficult to do because I had to write assembler 
stubs to call CEEPIPI http://users.tpg.com.au/crayford/rexxre.txt.
If anybody is interested in REXX regex let me know. It's alpha status 
but more than usable. In contrast, the entire Lua I/O library is a 
couple of hundred lines of code wrapping C library calls.

To implement VSAM support was 20 lines.

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

Language development cycle (Perl)

2013-10-01 Thread Shane Ginnane

On Tue, 1 Oct 2013 19:52:12 +0800, David Crayford wrote:

>Taking the p**s again Shane! ;-)

Sorry ? - what do you mean, "again".

>FWIW, Perl 6 seems to have smoothed out a lot of the rough edges.

Never having bothered with Perl, I attended a Linux conference in Canberra in 
2005. Went to a Perl developers spiel out of interest. After the cognoscenti 
had finished point-scoring, I asked if I should concentrate on learning the 
(then) under development Perl 6, or start with 5.8
Given 6 would need a little while longer to be released it was decided 5.8 
would be a good starter.

Good advice as it happened - see http://en.wikipedia.org/wiki/Perl_6 if 
interested.

Shane ...

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

Re: Language development cycle (Perl)


On 1/10/2013 8:46 PM, Shane Ginnane wrote:

On Tue, 1 Oct 2013 19:52:12 +0800, David Crayford wrote:


Taking the p**s again Shane! ;-)

Sorry ? - what do you mean, "again".


FWIW, Perl 6 seems to have smoothed out a lot of the rough edges.

Never having bothered with Perl, I attended a Linux conference in Canberra in 
2005. Went to a Perl developers spiel out of interest. After the cognoscenti 
had finished point-scoring, I asked if I should concentrate on learning the 
(then) under development Perl 6, or start with 5.8
Given 6 would need a little while longer to be released it was decided 5.8 
would be a good starter.

Good advice as it happened - see http://en.wikipedia.org/wiki/Perl_6 if 
interested.


Just for fun http://www.youtube.com/watch?v=LR8fQiskYII


Shane ...

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


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

Re: Quote on Slashdot.org

2013-10-01 Thread Clark Morris

On 30 Sep 2013 13:26:38 -0700, in bit.listserv.ibm-main you wrote:

>On Mon, 30 Sep 2013 15:55:14 -0400, John Gilmore wrote:
>>
>>[Pascal] is much concerned to interdict practices, e.g., GOTOs or
>>unconditional branches, that it deems 'unstructured' or 'anarchic'.
>> 
>Pascal has GOTO.  Dismayingly, statement labels are numeric,
>perhaps a legacy of FORTRAN (and ALGOL 60).  In my opinion, the
>greatest value of GOTO is the longjump; the ability to exit a
>nest of not only compounds, but also blocks and function calls.
>I pine for this facility in Rexx, POSIX shell, and C.

IBM COBOL has EXIT PROGRAM and GOBACK both of which can be used with
nested programs.  The 2002 COBOL standard has EXIT PERFORM CYCLE and
EXIT PERFORM for PERFORM loops, EXIT PARAGRAPH and EXIT SECTION.

Clark Morris
>
>One could synthesize the longjump by a call to a function
>declared nested in an outer function and containing only
>a GOTO.  Alas, nested function declarations are out of style,
>in C, Modula2, ...; possibly because of the induced requirement
>that a reference to a function have two pointers; one to the
>entry point, the other to the stack frame of the statically
>enclosing scope.
>
>ALGOL 60 has its warts:
>
>o Dangling ELSE (An Unexpected Journey and a strong argument
>  for strong closure).
>
>o The requirement that an integer actual parameter contain both
>  a numeric attribute and a label attribute.
>
>o The implied comment after END coding pitfall.
>
>o ... (Name your favorite.)
>
>Pascal has its warts:
>
>o The requirement to predeclare GOTO labels; a consequence
>  of single-pass compilation.
>
>o Byzantine operator precedence, most probably a consequence
>  of letting the 60-bit architecture of the CDC 6600 limit the
>  number of nonterminal symbols in its grammar.
>
>o That the standard type identifiers are not reserved words.  I'm
>  worried by this far less than others.  If the programmer chooses
>  to redeclare "integer" that's his bad programming convention,
>  not to be interdicted by a nanny language.
>
>o ... (Name your favorite.)
>
>-- gil
>
>--
>For IBM-MAIN subscribe / signoff / archive access instructions,
>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

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

Re: Quote on Slashdot.org

2013-10-01 Thread Paul Gilmartin

On Tue, 1 Oct 2013 11:52:16 -0300, Clark Morris wrote:
>
>>greatest value of GOTO is the longjump; the ability to exit a
>>nest of not only compounds, but also blocks and function calls.
>>I pine for this facility in Rexx, POSIX shell, and C.
> 
>IBM COBOL has EXIT PROGRAM and GOBACK both of which can be used with
>nested programs.  The 2002 COBOL standard has EXIT PERFORM CYCLE and
>EXIT PERFORM for PERFORM loops, EXIT PARAGRAPH and EXIT SECTION.
> 
Can each of these name the CYCLE, PERFORM, PARAGRAPH, or SECTION
to be EXITed in case of nesting?  (C and POSIX shell have "continue",
"break", and "return", but these apply only to the innermost loop or call.)

Do these work alike from a separate translation unit?

-- gil

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

More mainframe software price rises

2013-10-01 Thread Roger Bowler

Today IBM announces price rises for Cobol, IMS, DB2, MQ, and WebSphere in EMEA, 
effective January 1, 2014:

http://www-01.ibm.com/common/ssi/ShowDoc.wss?docURL=/common/ssi/rep_ca/7/877/ENUSZA13-1127/index.html
http://www-01.ibm.com/common/ssi/ShowDoc.wss?docURL=/common/ssi/rep_ca/8/877/ENUSZA13-1128/index.html

- RB

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

Re: New Z "announcement"

2013-10-01 Thread zMan

The very cynical would say it's about "We have computers and software to
sell you, some of which can arguably be made to sound like it's Big
Data-related".

The slightly less cynical would say "It's about IBM's Big Data on z
offerings".

The realistic (where that differs from the cynical--let's not go *there*)
would say "It's the same old, same old".


On Mon, Sep 30, 2013 at 4:29 PM, Ed Gould  wrote:

> I got this email in and was wondering if anyone had an insight what it
> might be about...
>
> Every day, we create 2.5 quintillion bytes of data—so much that 90% of the
> data in the world today has been created in the last two years alone. This
> data comes from everywhere: sensors are used to gather climate information,
> medical information, digital pictures, to purchase transaction records, and
> to process cell phone transactions, just to name a few. All this data must
> be provided in a cloud environment, on mobile devices—really anytime,
> anywhere.
> Listen to Ray Jones, IBM Vice President System z Software Sales, discuss
> how IBM's new announcements create the perfect environment for managing
> this explosion of data. Hear how customers have used System z solutions and
> the value they realized with the use of System z.
>
>
> ANyone?
>
> Ed
> --**--**--
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



-- 
zMan -- "I've got a mainframe and I'm not afraid to use it"

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

TN3270 emulator application scripting

2013-10-01 Thread Frank Swarbrick

Not really sure what to title this, so...
We currently have a Windows application that uses our terminal emulator's 
EHLLAPI functionality.  If you have the application running and you hit a 
particular function key (I think!) while your terminal session is on an account 
number it will trigger the application to read a database and pull up 
signatures (within the Windows application) for each signer on the account.

Our CTO is wondering what alternatives we might have to eliminate both the 
Windows application and the use of EHLLAPI.  Are there perhaps features of any 
TN3270 emulators that would allow you to perform something similar but all 
within the emulator itself, rather than having an external application use 
EHLLAPI to communicate with the emulator?

Or something else?

We already have a web interface that has the same basic feature, but this is 
intended for those that still access CICS directly via TN3270 sessions.

Thanks!

Frank Swarbrick
FirstBank
Lakewood, CO USA

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

Re: TN3270 emulator application scripting

2013-10-01 Thread Phil Smith

Frank Swarbrick wrote:
>Not really sure what to title this, so...
>We currently have a Windows application that uses our terminal emulator's 
>EHLLAPI functionality.  If you have the application running and you hit a 
>particular function key (I think!) while your terminal session is on an 
>account number it will trigger the application to read a database and pull up 
>signatures (within the Windows application) for each signer on the account.

>Our CTO is wondering what alternatives we might have to eliminate both the 
>Windows application and the use of EHLLAPI.  Are there perhaps features of any 
>TN3270 emulators that would allow you to perform something similar but all 
>within the emulator itself, rather than having an external application use 
>EHLLAPI to communicate with the emulator?

>Or something else?

>We already have a web interface that has the same basic feature, but this is 
>intended for those that still access CICS directly via TN3270 sessions.

Pretty well every emulator I've seen supports scripting. What emulator are you 
using now?

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

Re: TN3270 emulator application scripting

2013-10-01 Thread Gord Tomlin


On 2013-10-01 11:37, Frank Swarbrick wrote:

We currently have a Windows application that uses our terminal emulator's 
EHLLAPI functionality.


For starters, what TN3270 emulator are you using?

--

Regards, Gord Tomlin
Action Software International
(a division of Mazda Computer Corporation)
Tel: (905) 470-7113, Fax: (905) 470-6507

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

Re: Quote on Slashdot.org

The PL/I leave statement is very different from the C continue and that ilk.

Consider

outer: . . . ;
  . . .
  nested: . . .  ;
. . .
innermost: . . .  ;
   . . .
   . . . leave ;  /* .leaves current group, here innnermost */
 if . . . then leave outer ;  /* leaves outer */
 else leave nested ;  /* leaves nested */
end innermost ;
. . .
  end nested ;
  if . . . then leave ;  /* leaves current group, here outer */
  . . .
end outer ;

which permit any nesting, even some unattractive ones, to be exited
from cleanly.

Paul Gilmartin will object to these [and other] uses of labels, but
they are in fact innocuous.

John Gilmore, Ashland, MA 01721 - USA

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

Sources for learing about state of the art Mainframe Virtual and physical tape?

2013-10-01 Thread Peter Smith

Newbie open systems backup admin. here being thrown into mainframe storage.
We have some very old VTS systems and I'm looking for credible education /
journals on "state of the art" in mainframe tape (VTS) storage.

Anyone have any reccomendations of online or print journals, trade
magazines, blogs?

Thanks,
Peter

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

Re: Quote on Slashdot.org

2013-10-01 Thread Paul Gilmartin

On Tue, 1 Oct 2013 11:50:51 -0400, John Gilmore wrote:

>The PL/I leave statement is very different from the C continue and that ilk.
> 
But perhaps slightly less different from the C "break".

>Paul Gilmartin will object to these [and other] uses of labels, but
>they are in fact innocuous.
> 
But what if I don't?  I certainly prefer LEAVE to GOTO (less spaghetti-
prone, but it might be clearer if the label were at the end of the block
rather then the beginning).  And I'd hate to see LEAVE .

Does PL/I have a scheme to check matching of DO with END by
requiring that if both are labelled the labels match?  Rexx has
something like this, but the syntax is cumbersome and the
enforcement is sporadic.  (I am unsympathetic to the argument
that careful indention is a suitable alternative.)

It's unforgivable that JCL doesn't enforce matching of labels on
IF, ELSE, and ENDIF; even worse that the specification requires
(suggests?) that they be distinct if non-blank, but the
implementation doesn't enforce that.

I hate JCL!

-- gil

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

SDK for z/OS

2013-10-01 Thread Kurt Eastwood

Hello,

I am planning an upgrade from zos 1.12 to 1.13 and it appears that 5655-N99IBM 
64-bit SDK for z/OS V5 is no longer supported. It appears I need to upgrade SDK 
to V6 or V7.

The doc for SDK V6 and V7 state that some current processes may need changes 
going to V5 to V6 and/or V7.

I inherited this system and do not know if we have any applications on the 
mainframe that use SDK, not even sure how they would use SDK.

Can anyone tell me how to determine if SDK has or is being used on my mainframe?

Any help would be appreciated.

Thanks,
Kurt

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

Re: TN3270 emulator application scripting

2013-10-01 Thread Frank Swarbrick

We currently have E-Term for IBM from DCSi.  I personally don't like it and 
really am open to any emulator.  A few of use (myself included) have Attachmate 
Reflection for IBM.  It seems to have several options, one being a .NET API.  
Without really knowing about it it seems like that might do the trick.  I guess 
I'm wondering in general what type of "interfaces" people have written and what 
emulator and API was used?

>
> From: Gord Tomlin 
>To: IBM-MAIN@LISTSERV.UA.EDU 
>Sent: Tuesday, October 1, 2013 9:50 AM
>Subject: Re: TN3270 emulator application scripting
> 
>
>On 2013-10-01 11:37, Frank Swarbrick wrote:
>> We currently have a Windows application that uses our terminal emulator's 
>> EHLLAPI functionality.
>
>For starters, what TN3270 emulator are you using?
>
>--
>
>Regards, Gord Tomlin
>Action Software International
>(a division of Mazda Computer Corporation)
>Tel: (905) 470-7113, Fax: (905) 470-6507
>
>--
>For IBM-MAIN subscribe / signoff / archive access instructions,
>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
>
>

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

DSLIST in BATCH

2013-10-01 Thread Rouse, Willie

Hello All,

Is there a simple way to run ISPF DSLIST as a batch TSO job?

Respectfully,
Willie C. Rouse
Senior Mainframe Consultant
Prince George's County, Maryland
Office of Information Technology
9201 Basil Court/ Room B8
Largo, MD 20774
Voice: 301-883-7189
Fax: 301-883-3790



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

Re: Java SDK for z/OS

2013-10-01 Thread Mike Schwab

http://www-01.ibm.com/common/ssi/cgi-bin/ssialias?subtype=ca&infotype=an&appname=iSource&supplier=897&letternum=ENUS912-249
Withdraw announcement includes links to Java SDK for z/OS 1.6 and 1.7,
and various manuals.

On Tue, Oct 1, 2013 at 11:20 AM, Kurt Eastwood  wrote:
> Hello,
>
> I am planning an upgrade from zos 1.12 to 1.13 and it appears that 
> 5655-N99IBM 64-bit SDK for z/OS V5 is no longer supported. It appears I need 
> to upgrade SDK to V6 or V7.
>
> The doc for SDK V6 and V7 state that some current processes may need changes 
> going to V5 to V6 and/or V7.
>
> I inherited this system and do not know if we have any applications on the 
> mainframe that use SDK, not even sure how they would use SDK.
>
> Can anyone tell me how to determine if SDK has or is being used on my 
> mainframe?
>
> Any help would be appreciated.
>
> Thanks,
> Kurt
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

Re: Quote on Slashdot.org

PL/I does check that do and end labels match, but it also permits
"multiple closure", as in

gubbins: do . . . ;

  nubbins: do . . . ;

end gubbins ;  /* ends both nubbins and gubbins */

which it notes in a warning message.

The unlabeled analogue of this construction is, however, treated as an error.

Break and continue differ from leave in that their scope is always the
current unit, and this limitation much reduces their usefulness.

Dijkstra's original notions were that GOTOs were often misused and
that they were sometimes much overused, not that they should never be
used.   (The caption "GOTOs considered harmful"  that appeared over
his letter was added by a CACM editor.)

-- 
John Gilmore, Ashland, MA 01721 - USA

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

Re: DSLIST in BATCH

2013-10-01 Thread efinnell15

Run ISPF in batch? 



In a message dated 10/01/13 11:29:31 Central Daylight Time, wro...@co.pg.md.us 
writes:
ISPF DSLIST as a batch TSO job?

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

Re: New Z "announcement"

zMan's post, with its tendentious use of a curiously graded set of
explicated adjectives, reflects his views, to which he is amply
entitled.

Why, however, did he feel a need to share them with us?

I did not find in them any new information or even a new point of
view.  What the Italians call dietrologia---from dietro, Italian for
'behind', and logia, from logos, Greek  for 'word'--- the study of
what is 'really' behind manifest content, which all but the naif of
course dismiss out of hand, is tedious when it is not sprightly.

John Gilmore, Ashland, MA 01721 - USA

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

Re: DSLIST in BATCH

2013-10-01 Thread Mark Zelden

On Tue, 1 Oct 2013 16:29:15 +, Rouse, Willie  wrote:

>Hello All,
>
>Is there a simple way to run ISPF DSLIST as a batch TSO job?
>

You can use this JCL as a template:

(from http://www-01.ibm.com/support/docview.wss?uid=swg21023990)

//USERAA   JOB (ISPF),'ISPF USER',MSGCLASS=X,
// CLASS=A,NOTIFY=&SYSUID
//*
//ISPFSTP  EXEC PGM=IKJEFT01,DYNAMNBR=30,REGION=32M
//ISPPROF  DD RECFM=FB,LRECL=80,SPACE=(TRK,(2,2,2))
//ISPLLIB  DD DSN=USERA.LOADLIB,DISP=SHR
//ISPMLIB  DD DSN=ISP.SISPMENU,DISP=SHR
//ISPPLIB  DD DSN=ISP.SISPPENU,DISP=SHR
//ISPSLIB  DD DSN=ISP.SISPSENU,DISP=SHR
// DD DSN=ISP.SISPSLIB,DISP=SHR
//ISPTLIB  DD RECFM=FB,LRECL=80,SPACE=(TRK,(1,0,1))
// DD DSN=ISP.SISPTENU,DISP=SHR
//ISPCTL1  DD SPACE=(CYL,1),RECFM=FB,LRECL=80
//ISPLOG   DD SYSOUT=*,RECFM=FB,LRECL=133
//SYSEXEC  DD DSN=ISP.SISPEXEC,DISP=SHR
//SYSPROC  DD DSN=ISP.SISPCLIB,DISP=SHR
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSTSIN  DD *
  ISPSTART CMD(ISPFCMD)

Concatenate a PDS to SYSPROC and create a member with a CLIST
similar to this one below and replace the CMD with the member
name you create.  I call mine DSLISTSV.

  Example -   ISPSTART CMD(DSLISTSV  L(hlq1.lvl2))

The list will be saved in userid.SAVE.DATASETS unless you 
change "G" from the sample CLIST below. 

PROC 0 L(&SYSUID)  G(SAVE)  
 /* */  
 /* Quick ISPF save of data set names. This is much quicker */  
 /* than using OPT 3.4, because it does not do an obtain*/  
 /* for each data set in the list because of STATS(NO). */  
 /* The dsn created will be USERID.SAVE.DATASETS*/  
 /* */  
 ISPEXEC CONTROL ERRORS RETURN  
 ISPEXEC LMDINIT LISTID(LISTID)  LEVEL(&L)  
 ISPEXEC LMDLIST LISTID(&LISTID) OPTION(SAVE) STATS(NO) GROUP(&G)   
 WRITE COMPLETE!! RETURN CODE WAS &LASTCC   
 ISPEXEC LMDFREE LISTID(&LISTID)

Regards,

Mark
--
Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS  
mailto:m...@mzelden.com 
ITIL v3 Foundation Certified 
Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html 
Systems Programming expert at http://search390.techtarget.com/ateExperts/
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: DSLIST in BATCH

2013-10-01 Thread Rouse, Willie

Mark,

Thanks for the info!!

Respectfully,
Willie C. Rouse
Senior Mainframe Consultant
Prince George's County, Maryland
Office of Information Technology
9201 Basil Court/ Room B8
Largo, MD 20774
Voice: 301-883-7189
Fax: 301-883-3790

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Mark Zelden
Sent: Tuesday, October 01, 2013 1:23 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: DSLIST in BATCH

On Tue, 1 Oct 2013 16:29:15 +, Rouse, Willie  wrote:

>Hello All,
>
>Is there a simple way to run ISPF DSLIST as a batch TSO job?
>

You can use this JCL as a template:

(from http://www-01.ibm.com/support/docview.wss?uid=swg21023990)

//USERAA   JOB (ISPF),'ISPF USER',MSGCLASS=X,
// CLASS=A,NOTIFY=&SYSUID
//*
//ISPFSTP  EXEC PGM=IKJEFT01,DYNAMNBR=30,REGION=32M
//ISPPROF  DD RECFM=FB,LRECL=80,SPACE=(TRK,(2,2,2))
//ISPLLIB  DD DSN=USERA.LOADLIB,DISP=SHR //ISPMLIB  DD 
DSN=ISP.SISPMENU,DISP=SHR //ISPPLIB  DD DSN=ISP.SISPPENU,DISP=SHR //ISPSLIB  DD 
DSN=ISP.SISPSENU,DISP=SHR
// DD DSN=ISP.SISPSLIB,DISP=SHR
//ISPTLIB  DD RECFM=FB,LRECL=80,SPACE=(TRK,(1,0,1))
// DD DSN=ISP.SISPTENU,DISP=SHR
//ISPCTL1  DD SPACE=(CYL,1),RECFM=FB,LRECL=80
//ISPLOG   DD SYSOUT=*,RECFM=FB,LRECL=133
//SYSEXEC  DD DSN=ISP.SISPEXEC,DISP=SHR
//SYSPROC  DD DSN=ISP.SISPCLIB,DISP=SHR
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSTSIN  DD *
  ISPSTART CMD(ISPFCMD)

Concatenate a PDS to SYSPROC and create a member with a CLIST similar to this 
one below and replace the CMD with the member name you create.  I call mine 
DSLISTSV.

  Example -   ISPSTART CMD(DSLISTSV  L(hlq1.lvl2))

The list will be saved in userid.SAVE.DATASETS unless you change "G" from the 
sample CLIST below. 

PROC 0 L(&SYSUID)  G(SAVE)  
 /* */  
 /* Quick ISPF save of data set names. This is much quicker */  
 /* than using OPT 3.4, because it does not do an obtain*/  
 /* for each data set in the list because of STATS(NO). */  
 /* The dsn created will be USERID.SAVE.DATASETS*/  
 /* */  
 ISPEXEC CONTROL ERRORS RETURN  
 ISPEXEC LMDINIT LISTID(LISTID)  LEVEL(&L)  
 ISPEXEC LMDLIST LISTID(&LISTID) OPTION(SAVE) STATS(NO) GROUP(&G)   
 WRITE COMPLETE!! RETURN CODE WAS &LASTCC   
 ISPEXEC LMDFREE LISTID(&LISTID)

Regards,

Mark
--
Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS  
mailto:m...@mzelden.com 
ITIL v3 Foundation Certified 
Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html 
Systems Programming expert at http://search390.techtarget.com/ateExperts/
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

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

Re: DSLIST in BATCH

2013-10-01 Thread Mark Zelden

I like my own template better (plus read the comments at the top):

//useridI JOB (ACCT),CLASS=A,...   
// 
//*
//*  To get a return code on completion, the variable ZISPFRC must 
//*  be updated and VPUT to the SHARED pool with the desired RC.   
//*  Otherwise ISPF will end with RC=0.
//*
//*  To pass a variable to an EDIT MACRO in a batch CLIST/EXEC, it 
//*  must be done via VPUT and VGET. To pass a special return code 
//*  from an EDIT MACRO back to an invoking CLIST/EXEC, it must also   
//*  be done via VPUT and VGET.
//*
// 
//ALOCPROF EXEC PGM=IEFBR14
//PROFILE  DD UNIT=SYSALLDA,DISP=(NEW,CATLG,DELETE),   
//SPACE=(CYL,(1,1,5)),DCB=(LRECL=80,   
//BLKSIZE=0,DSORG=PO,RECFM=FB),
//DSN=userid.ISPF.TEMPPROF 
//*---*
//*Invoke ISPF*
//*---*
//BATCHPDF EXEC PGM=IKJEFT01,DYNAMNBR=128  
//ISPPLIB  DD DISP=SHR,DSN=ISP.SISPPENU
//*DD DISP=SHR,DSN=userid.CNTL 
//ISPSLIB  DD DISP=SHR,DSN=ISP.SISPSLIB
// DD DISP=SHR,DSN=ISP.SISPSENU
//ISPMLIB  DD DISP=SHR,DSN=ISP.SISPMENU
//*DD DISP=SHR,DSN=userid.CNTL 
//ISPPROF  DD DSN=userid.ISPF.TEMPPROF,DISP=(OLD,DELETE)   
//ISPTABL  DD DSN=userid.ISPF.TEMPPROF,DISP=OLD
//ISPTLIB  DD DSN=userid.ISPF.TEMPPROF,DISP=OLD
//*DD DISP=SHR,DSN=userid.CNTL 
// DD DISP=SHR,DSN=ISP.SISPTENU
//ISPLOG   DD SYSOUT=*,
//DCB=(LRECL=120,BLKSIZE=2400,DSORG=PS,RECFM=FB)   
//ISPLIST  DD SYSOUT=*,
//DCB=(LRECL=121,BLKSIZE=1210,RECFM=FBA)   
//* - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
//SYSEXEC  DD DISP=SHR,DSN=ISP.SISPEXEC
//SYSPROC  DD DISP=SHR,DSN=ISP.SISPCLIB
// DD DISP=SHR,DSN=userid.CNTL 
//SYSTSPRT DD SYSOUT=* 
//SYSTSIN  DD *
 PROFILE PREFIX(userid)
 ISPSTART CMD(%blah parm) NEWAPPL(ISR) 

On Tue, 1 Oct 2013 12:23:07 -0500, Mark Zelden  wrote:

>On Tue, 1 Oct 2013 16:29:15 +, Rouse, Willie  wrote:
>
>>Hello All,
>>
>>Is there a simple way to run ISPF DSLIST as a batch TSO job?
>>
>
>You can use this JCL as a template:
>
>(from http://www-01.ibm.com/support/docview.wss?uid=swg21023990)
>
>

>snip>

>
>
>
>Concatenate a PDS to SYSPROC and create a member with a CLIST
>similar to this one below and replace the CMD with the member
>name you create.  I call mine DSLISTSV.
>
>  Example -   ISPSTART CMD(DSLISTSV  L(hlq1.lvl2))
>
>
>The list will be saved in userid.SAVE.DATASETS unless you 
>change "G" from the sample CLIST below. 
>
>
>PROC 0 L(&SYSUID)  G(SAVE)  
> /* */  
> /* Quick ISPF save of data set names. This is much quicker */  
> /* than using OPT 3.4, because it does not do an obtain*/  
> /* for each data set in the list because of STATS(NO). */  
> /* The dsn created will be USERID.SAVE.DATASETS*/  
> /* */  
> ISPEXEC CONTROL ERRORS RETURN  
> ISPEXEC LMDINIT LISTID(LISTID)  LEVEL(&L)  
> ISPEXEC LMDLIST LISTID(&LISTID) OPTION(SAVE) STATS(NO) GROUP(&G)   
> WRITE COMPLETE!! RETURN CODE WAS &LASTCC   
> ISPEXEC LMDFREE LISTID(&LISTID)
>
>
>
>Regards,
>
>Mark
>--
>Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS  
>mailto:m...@mzelden.com 
>ITIL v3 Foundation Certified

NSLOOKUP on MVS vs OMVS

2013-10-01 Thread David G. Schlecht

Forgive me if this is obvious to everyone but me, but I’m seeing a difference 
in the way name resolution (resolver) works on MVS and OMVS. In OMVS, a command 
line ping or dig or nslookup all correctly resolve a domain name. However, 
issuing the PING or NSLOOKUP command in TSO or PING in batch return unknown 
host errors.

I’ve tried adding the hostname to the /etc/hosts file but it changes nothing.

Any idea why they’re different? Any idea on what I’m doing wrong?

-David


David G. Schlecht | Information Technology Professional
State of Nevada | Department of Administration | Enterprise IT Services
T:(775)684-4328 | F: (775) 684‐4324 | E:dschle...@admin.nv.gov



This communication, including any attachments, may contain confidential 
information and is intended only for the individual or entity to which it is 
addressed. Any review, dissemination or copying of this communication by anyone 
other than the intended recipient is strictly prohibited. If you are not the 
intended recipient, please contact the sender by reply e-mail and delete all 
copies of the original message.

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

Re: NSLOOKUP on MVS vs OMVS

2013-10-01 Thread Jon Perryman

z/UNIX and z/OS have a different search order in locating the TCPIP.DATA that 
is used. In your case, you are maintaining 2 different files. Look at the IP 
Configuration Guide and search for TCPIP.DATA (I think). You should find a 
section that describes the search order.

Jon Perryman.



>
> From: David G. Schlecht 
>
>
>Forgive me if this is obvious to everyone but me, but I’m seeing a difference 
>in the way name resolution (resolver) works on MVS and OMVS. In OMVS, a 
>command line ping or dig or nslookup all correctly resolve a domain name. 
>However, issuing the PING or NSLOOKUP command in TSO or PING in batch return 
>unknown host errors.
>
>I’ve tried adding the hostname to the /etc/hosts file but it changes nothing.
>
>Any idea why they’re different? Any idea on what I’m doing wrong?
>

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

Re: NSLOOKUP on MVS vs OMVS

2013-10-01 Thread Pommier, Rex

David,

Check the TCP/IP configuration guide for search orders.  In the 1.11 level of 
the manual it is in section 1.2.9.2, called "resolver configuration files".  
OMVS uses a different search order for the resolver than MVS does.  My guess is 
that is where you have to go in order to check what config(s) you're using in 
the different environments.

Rex


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of David G. Schlecht
Sent: Tuesday, October 01, 2013 12:51 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: NSLOOKUP on MVS vs OMVS

Forgive me if this is obvious to everyone but me, but I’m seeing a difference 
in the way name resolution (resolver) works on MVS and OMVS. In OMVS, a command 
line ping or dig or nslookup all correctly resolve a domain name. However, 
issuing the PING or NSLOOKUP command in TSO or PING in batch return unknown 
host errors.

I’ve tried adding the hostname to the /etc/hosts file but it changes nothing.

Any idea why they’re different? Any idea on what I’m doing wrong?

-David


David G. Schlecht | Information Technology Professional
State of Nevada | Department of Administration | Enterprise IT Services
T:(775)684-4328 | F: (775) 684‐4324 | E:dschle...@admin.nv.gov



This communication, including any attachments, may contain confidential 
information and is intended only for the individual or entity to which it is 
addressed. Any review, dissemination or copying of this communication by anyone 
other than the intended recipient is strictly prohibited. If you are not the 
intended recipient, please contact the sender by reply e-mail and delete all 
copies of the original message.

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

The information contained in this message is confidential, protected from 
disclosure and may be legally privileged.  If the reader of this message is not 
the intended recipient or an employee or agent responsible for delivering this 
message to the intended recipient, you are hereby notified that any disclosure, 
distribution, copying, or any action taken or action omitted in reliance on it, 
is strictly prohibited and may be unlawful.  If you have received this 
communication in error, please notify us immediately by replying to this 
message and destroy the material in its entirety, whether in electronic or hard 
copy format.  Thank you.

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

Re: NSLOOKUP on MVS vs OMVS

2013-10-01 Thread Pommier, Rex

And no, it's not obvious to everybody but you.  A few days ago I was looking 
for something similar and I came across a nice side-by-side chart showing the 
differences but wasn't able to find it again today.  :-(

Rex

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of David G. Schlecht
Sent: Tuesday, October 01, 2013 12:51 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: NSLOOKUP on MVS vs OMVS

Forgive me if this is obvious to everyone but me, but I’m seeing a difference 
in the way name resolution (resolver) works on MVS and OMVS. In OMVS, a command 
line ping or dig or nslookup all correctly resolve a domain name. However, 
issuing the PING or NSLOOKUP command in TSO or PING in batch return unknown 
host errors.

I’ve tried adding the hostname to the /etc/hosts file but it changes nothing.

Any idea why they’re different? Any idea on what I’m doing wrong?

-David


David G. Schlecht | Information Technology Professional
State of Nevada | Department of Administration | Enterprise IT Services
T:(775)684-4328 | F: (775) 684‐4324 | E:dschle...@admin.nv.gov



This communication, including any attachments, may contain confidential 
information and is intended only for the individual or entity to which it is 
addressed. Any review, dissemination or copying of this communication by anyone 
other than the intended recipient is strictly prohibited. If you are not the 
intended recipient, please contact the sender by reply e-mail and delete all 
copies of the original message.

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

The information contained in this message is confidential, protected from 
disclosure and may be legally privileged.  If the reader of this message is not 
the intended recipient or an employee or agent responsible for delivering this 
message to the intended recipient, you are hereby notified that any disclosure, 
distribution, copying, or any action taken or action omitted in reliance on it, 
is strictly prohibited and may be unlawful.  If you have received this 
communication in error, please notify us immediately by replying to this 
message and destroy the material in its entirety, whether in electronic or hard 
copy format.  Thank you.

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

Re: New Z "announcement"

2013-10-01 Thread zMan

Tsk. Sorry 'bout that, must have confused you. I submit that a real answer
to his question was hiding in plain sight: it's IBM's Big Data on z
initiative.


On Tue, Oct 1, 2013 at 1:22 PM, John Gilmore  wrote:

> zMan's post, with its tendentious use of a curiously graded set of
> explicated adjectives, reflects his views, to which he is amply
> entitled.
>
> Why, however, did he feel a need to share them with us?
>
> I did not find in them any new information or even a new point of
> view.  What the Italians call dietrologia---from dietro, Italian for
> 'behind', and logia, from logos, Greek  for 'word'--- the study of
> what is 'really' behind manifest content, which all but the naif of
> course dismiss out of hand, is tedious when it is not sprightly.
>
> John Gilmore, Ashland, MA 01721 - USA
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



-- 
zMan -- "I've got a mainframe and I'm not afraid to use it"

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

Re: SDK for z/OS

2013-10-01 Thread Staller, Allan

I can't tell you how to determine (directly) if the Java5 SDK is in use.
It is, however, quite easy to just copy the HFS/ZFS files and provide the 
appropriate mount points in the 1.13 OMVS file system.

The one suggestion I have is to set your External Security Manager to audit all 
access to the Java 5 SDK and post process the ESM audit records.

HTH,


I am planning an upgrade from zos 1.12 to 1.13 and it appears that 5655-N99IBM 
64-bit SDK for z/OS V5 is no longer supported. It appears I need to upgrade SDK 
to V6 or V7.

The doc for SDK V6 and V7 state that some current processes may need changes 
going to V5 to V6 and/or V7.

I inherited this system and do not know if we have any applications on the 
mainframe that use SDK, not even sure how they would use SDK.

Can anyone tell me how to determine if SDK has or is being used on my mainframe?


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

Re: NSLOOKUP on MVS vs OMVS

2013-10-01 Thread Staller, Allan

RSEOLVER is your friend. Ditch all of the "local" files and use RESOLVER... 
Check the IP Config Guide for RESOLVER setup

HTH,


Forgive me if this is obvious to everyone but me, but I'm seeing a difference 
in the way name resolution (resolver) works on MVS and OMVS. In OMVS, a command 
line ping or dig or nslookup all correctly resolve a domain name. However, 
issuing the PING or NSLOOKUP command in TSO or PING in batch return unknown 
host errors.

I've tried adding the hostname to the /etc/hosts file but it changes nothing.

Any idea why they're different? Any idea on what I'm doing wrong?

-

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

Re: Sources for learing about state of the art Mainframe Virtual and physical tape?

The easiest would be to go to vendor sites to see what they support.

Current offerings I know about are from 

IBM TS7720
EMC DLm Tape solutions
Hitachi
Fujitsu
Luminex

Then there is also software tapeless solutions 
CA VTAPE



Or you can search the internet for Virtual Tapes and Mainframe  or
Tapeless Mainframes

Also, if your company is a member of Share.org then you can search the
archives for presentations on tapeless solutions for the mainframe

Lizette

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of Peter Smith
Sent: Tuesday, October 01, 2013 8:52 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Sources for learing about state of the art Mainframe Virtual and
physical tape?

Newbie open systems backup admin. here being thrown into mainframe storage.
We have some very old VTS systems and I'm looking for credible education /
journals on "state of the art" in mainframe tape (VTS) storage.

Anyone have any reccomendations of online or print journals, trade
magazines, blogs?

Thanks,
Peter

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

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

Re: Sources for learing about state of the art Mainframe Virtual and physical tape?

One other solution I forgot is to expand the storage array and eliminate
tape by keeping everything on DASD.

Not sure what your shop is looking to do, but these are some options.

Lizette


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of Lizette Koehler
Sent: Tuesday, October 01, 2013 12:16 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Sources for learing about state of the art Mainframe Virtual
and physical tape?

The easiest would be to go to vendor sites to see what they support.

Current offerings I know about are from 

IBM TS7720
EMC DLm Tape solutions
Hitachi
Fujitsu
Luminex

Then there is also software tapeless solutions CA VTAPE



Or you can search the internet for Virtual Tapes and Mainframe  or
Tapeless Mainframes

Also, if your company is a member of Share.org then you can search the
archives for presentations on tapeless solutions for the mainframe

Lizette

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of Peter Smith
Sent: Tuesday, October 01, 2013 8:52 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Sources for learing about state of the art Mainframe Virtual and
physical tape?

Newbie open systems backup admin. here being thrown into mainframe storage.
We have some very old VTS systems and I'm looking for credible education /
journals on "state of the art" in mainframe tape (VTS) storage.

Anyone have any reccomendations of online or print journals, trade
magazines, blogs?

Thanks,
Peter

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

Re: NSLOOKUP on MVS vs OMVS

2013-10-01 Thread David G. Schlecht

Thanks for all the feedback. I'm having no luck. I've compared the TCPDATA 
member and the OMVS resolv.conf and see no meaningful difference between them. 
Still the MVS resolver is completely inoperative.

I'm inclined to open an SR with IBM and see if they can see what's different.

Thanks, again, for your help. 


David G. Schlecht | Information Technology Professional
State of Nevada | Department of Administration | Enterprise IT Services
T:(775)684-4328 | F: (775) 684‐4324 | E:dschle...@admin.nv.gov

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Jon Perryman
Sent: Tuesday, October 01, 2013 11:26 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: NSLOOKUP on MVS vs OMVS

z/UNIX and z/OS have a different search order in locating the TCPIP.DATA that 
is used. In your case, you are maintaining 2 different files. Look at the IP 
Configuration Guide and search for TCPIP.DATA (I think). You should find a 
section that describes the search order.

Jon Perryman.



>
> From: David G. Schlecht 
>
>
>Forgive me if this is obvious to everyone but me, but I’m seeing a difference 
>in the way name resolution (resolver) works on MVS and OMVS. In OMVS, a 
>command line ping or dig or nslookup all correctly resolve a domain name. 
>However, issuing the PING or NSLOOKUP command in TSO or PING in batch return 
>unknown host errors.
>
>I’ve tried adding the hostname to the /etc/hosts file but it changes nothing.
>
>Any idea why they’re different? Any idea on what I’m doing wrong?
>

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

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

Re: Quote on Slashdot.org

2013-10-01 Thread Anne & Lynn Wheeler

jwgli...@gmail.com (John Gilmore) writes:
> What I think of Pascal and our disagreement are not themselves
> important; but such differences strongly suggest that discussions of
> the relative merits of different statement-level procedural languages
> is an all but futile undertaking unless the context in which they are
> to take place is specified in advance and in great, irksome detail.

the IBM mainframe pascal was originally done by the IBM Los Gatos VLSI
tools group. They had been doing a lot of language work with Metaware's
TWS ... TWS reference
http://www.garlic.com/~lynn/2004d.html#71 What terminology reflects the "first" 
computer language ?
other past posts
http://www.garlic.com/~lynn/2004q.html#35 [Lit.] Buffer overruns
http://www.garlic.com/~lynn/2005e.html#1 [Lit.] Buffer overruns
http://www.garlic.com/~lynn/2006e.html#6 About TLB in lower-level caches
http://www.garlic.com/~lynn/2006e.html#12 About TLB in lower-level caches
http://www.garlic.com/~lynn/2007j.html#14 Newbie question on table design
http://www.garlic.com/~lynn/2007m.html#58 Is Parallel Programming Just Too Hard?
http://www.garlic.com/~lynn/2008j.html#77 CLIs and GUIs
http://www.garlic.com/~lynn/2009l.html#36 Old-school programming techniques you 
probably don't miss
http://www.garlic.com/~lynn/2009o.html#11 Microprocessors with Definable 
MIcrocode
http://www.garlic.com/~lynn/2010n.html#54 PL/I vs. Pascal

It was used for a lot of VLSI tools before being released as product to
customers. It was then also used implementing the ibm mainframe tcp/ip
support ... I've periodically commented that it had none of the buffer
overrun and other exploits that have been epidemic in C-language based
implementations. some past posts about C-language vulnerabilities and
exploits
http://www.garlic.com/~lynn/subintegrity.html#overflow

there was other throughput issues with the mainframe tcp/ip (got
44kbytes/sec using 3090 processor) ... but I did the changes for
rfc1044 support and in some tuning tests at cray research got
sustained channel speed between 4341 and cray ... using only modest
amount of 4341 processor (possibly 500 times improvement in bytes
moved per instruction executed). misc. past post mentioning 1044
support
http://www.garlic.com/~lynn/subnetwork.html#1044

for the fun of it I did a rewrite in pascal of a major portion of the
VM370 kernel (done in assembler) ... and demonstrated it running
(faster) in virtual address space interacting with a smaller vm370
kernel. part of the issue was that mainframe PLI came with really
heavyweight library environment ... while Pascal could run in
effectively as an independent "embedded" environment. Note that this
wasn't directly a fault of PLI language ... since MIT Project MAC used
PLI language to implement the Multics operating system.
http://www.multicians.org/multics.html

the mainframe product pascal was ported to the rs/6000 ...  and
typically same pascal programs that ran on mainframe ran also on
rs/6000.

after IBM went into the red in the early 90s, IBM was cutting back all
over the place ... it transitioned to using a lot more off-the-shelf
industry VLSI design tools ... transition included transfering a lot of
internal tools to outside vendors. As part of one transfer, I got tasked
to port one 50,000+ statement vs/pascal VLSI layout program to other
vendor platforms. This was somewhat tramatic since 1) pascals on these
platforms appeared like they had never been used for much more than
univ. student instruction and 2) in one major case, the pascal support
had been outsourced to an organization 12 time zones away (I could drop
in the computer vendor hdqtrs location ... but still had to wait for
minimum 1 day turn around).

-- 
virtualization experience starting Jan1968, online at home since Mar1970

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

Re: Quote on Slashdot.org

2013-10-01 Thread Bernd Oppolzer


I worked with PASCAL/VS in the late 80s and early 90s and
used it a lot to do technical computations for the Stuttgart local transport
company. I built interfaces to SQL/DS (DB2 for VM in todays speak),
DMS/PANEL and GDDM - all things that were not available from IBM
in those days - and GKS (graphic kernel system), which is a device
independent library to produce graphical output for plotters as well as
for graphical displays.

This was one of the best compilers I ever worked with. I never had the
feeling to miss anything in the compiler or in the language definition.

Today I am trying to add some - more - extensions to the old Stanford 
Pascal
compiler of 1982 (running on VM/370 R6 on Hercules) with the final 
target to

make this compiler as useful as PASCAL/VS was (and maybe porting
it to more recent OSes). But this will be a long effort, because I don't 
have

much spare time.

Kind regards

Bernd



Am 01.10.2013 21:31, schrieb Anne & Lynn Wheeler:

jwgli...@gmail.com (John Gilmore) writes:

What I think of Pascal and our disagreement are not themselves
important; but such differences strongly suggest that discussions of
the relative merits of different statement-level procedural languages
is an all but futile undertaking unless the context in which they are
to take place is specified in advance and in great, irksome detail.

the IBM mainframe pascal was originally done by the IBM Los Gatos VLSI
tools group. They had been doing a lot of language work with Metaware's
TWS ... TWS reference
http://www.garlic.com/~lynn/2004d.html#71 What terminology reflects the "first" 
computer language ?
other past posts
http://www.garlic.com/~lynn/2004q.html#35 [Lit.] Buffer overruns
http://www.garlic.com/~lynn/2005e.html#1 [Lit.] Buffer overruns
http://www.garlic.com/~lynn/2006e.html#6 About TLB in lower-level caches
http://www.garlic.com/~lynn/2006e.html#12 About TLB in lower-level caches
http://www.garlic.com/~lynn/2007j.html#14 Newbie question on table design
http://www.garlic.com/~lynn/2007m.html#58 Is Parallel Programming Just Too Hard?
http://www.garlic.com/~lynn/2008j.html#77 CLIs and GUIs
http://www.garlic.com/~lynn/2009l.html#36 Old-school programming techniques you 
probably don't miss
http://www.garlic.com/~lynn/2009o.html#11 Microprocessors with Definable 
MIcrocode
http://www.garlic.com/~lynn/2010n.html#54 PL/I vs. Pascal

It was used for a lot of VLSI tools before being released as product to
customers. It was then also used implementing the ibm mainframe tcp/ip
support ... I've periodically commented that it had none of the buffer
overrun and other exploits that have been epidemic in C-language based
implementations. some past posts about C-language vulnerabilities and
exploits
http://www.garlic.com/~lynn/subintegrity.html#overflow

there was other throughput issues with the mainframe tcp/ip (got
44kbytes/sec using 3090 processor) ... but I did the changes for
rfc1044 support and in some tuning tests at cray research got
sustained channel speed between 4341 and cray ... using only modest
amount of 4341 processor (possibly 500 times improvement in bytes
moved per instruction executed). misc. past post mentioning 1044
support
http://www.garlic.com/~lynn/subnetwork.html#1044

for the fun of it I did a rewrite in pascal of a major portion of the
VM370 kernel (done in assembler) ... and demonstrated it running
(faster) in virtual address space interacting with a smaller vm370
kernel. part of the issue was that mainframe PLI came with really
heavyweight library environment ... while Pascal could run in
effectively as an independent "embedded" environment. Note that this
wasn't directly a fault of PLI language ... since MIT Project MAC used
PLI language to implement the Multics operating system.
http://www.multicians.org/multics.html

the mainframe product pascal was ported to the rs/6000 ...  and
typically same pascal programs that ran on mainframe ran also on
rs/6000.

after IBM went into the red in the early 90s, IBM was cutting back all
over the place ... it transitioned to using a lot more off-the-shelf
industry VLSI design tools ... transition included transfering a lot of
internal tools to outside vendors. As part of one transfer, I got tasked
to port one 50,000+ statement vs/pascal VLSI layout program to other
vendor platforms. This was somewhat tramatic since 1) pascals on these
platforms appeared like they had never been used for much more than
univ. student instruction and 2) in one major case, the pascal support
had been outsourced to an organization 12 time zones away (I could drop
in the computer vendor hdqtrs location ... but still had to wait for
minimum 1 day turn around).



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

Re: Work long hours (Was Re: Pissing contest(s))

2013-10-01 Thread Shmuel Metz (Seymour J.)

In
,
on 09/28/2013
   at 10:40 PM, Mike Schwab  said:

>I know in the Banking Industry, you have to take one whole week of
>vacation sometime during the year.

What happens if they won't approve leave for the weeks that you want
to take?
 
-- 
 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...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Quote on Slashdot.org

2013-10-01 Thread efinnell15

What's the difference in Stanford and UCSD versions?



In a message dated 10/01/13 15:05:31 Central Daylight Time, 
bernd.oppol...@t-online.de writes:
Today I am trying to add some - more - extensions to the old Stanford 
Pascal 
compiler of 1982 (running on VM/370 R6 on Hercules) with the final 
target to 

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

Re: Sources for learing about state of the art Mainframe Virtual and physical tape?

Also this share presentation by Russell Witt could be helpful
http://www.share.org/p/do/sd/topic=50&sid=1042

The title of the presentation is Tape Virtualization Options

You can also use that in an internet search to find a lot more articles on 
virtual tape and mainframes.

Lizette

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

Re: Sources for learing about state of the art Mainframe Virtual and physical tape?

2013-10-01 Thread Carlos Bodra


It is user and password protect!!!

Carlos Bodra
IBM Certified Specialist System z   
Sao Paulo - Brazil

Em 01/10/2013 18:06, Lizette Koehler escreveu:

Also this share presentation by Russell Witt could be helpful
http://www.share.org/p/do/sd/topic=50&sid=1042

The title of the presentation is Tape Virtualization Options

You can also use that in an internet search to find a lot more articles on 
virtual tape and mainframes.

Lizette

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




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

Re: Sources for learing about state of the art Mainframe Virtual and physical tape?