Restarting SMSVSAM address space

2006-02-03 Thread Natasa Savinc
Hello,
I am setting up environment for RLS. I started SMSVSAM (with
V SMS,SMSVSAM,ACTIVE), but now I have to restart it (had some security
problems), and I don't know how. I issued V SMS,SMSVSAM,ACTIVE again, since
the explanation of the command states that 'it restarts SMSVSAM address
space', so I expected it to shut it down and start again. There was no
response to this command. Then I tried V SMS,SMSVSAM,TERMINATESERVER, got
the message
*IGW572I REQUEST TO TERMINATE SMSVSAM
 ADDRESS SPACE IS ACCEPTED:
 SMSVSAM SERVER TERMINATION SCHEDULED.
Nothing happened after that command, SMSVSAM is still active.

This is the display:
IGW420I DISPLAY SMS,SMSVSAM
DISPLAY SMS,SMSVSAM - SERVER STATUS
  SYSNAME:  SP01 UNAVAILABLE ASID: 0098 STEP: SHC_Ph2_Init

DISPLAY SMS,SMSVSAM - JOB STATUS
  SUBSYSTEMS CONNECTED:0 BATCH:0

DISPLAY SMS,SMSVSAM - LOCK TABLE STATUS (IGWLOCK00)
  CONNECT STATUS:
SYSNAME:  SP01 . RSN:  RbldNotActive

  COMPOSITE STATUS:
ORIGINAL STRUCTURE:    


  STRUCTURE STATUS:
  SYSNAME: SP01  Simplex

Any ideas how should I proceed? I am little reluctant about the idea of
canceling it.

Regards,
Natasa

--
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: Restarting SMSVSAM address space

2006-02-03 Thread John Ticic
-- snip --
Hello,
I am setting up environment for RLS. I started SMSVSAM (with
V SMS,SMSVSAM,ACTIVE), but now I have to restart it (had some security
problems), and I don't know how. I issued V SMS,SMSVSAM,ACTIVE again, since
the explanation of the command states that 'it restarts SMSVSAM address
space', so I expected it to shut it down and start again. There was no
response to this command. Then I tried V SMS,SMSVSAM,TERMINATESERVER, got
the message
*IGW572I REQUEST TO TERMINATE SMSVSAM
 ADDRESS SPACE IS ACCEPTED:
 SMSVSAM SERVER TERMINATION SCHEDULED.
Nothing happened after that command, SMSVSAM is still active.

-- snip --

If TERMINATESERVER didn't work, you may need to issue FORCE,ARM or FORCE
(at your own risk of course).

Are there any outstanding messages?

Are you up-to-date on maintenance? I got hit by some SMSVSAM issues in
termination that have since been fixed by IBM.

John

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


SMS DFHSM Information

2006-02-03 Thread willie bunter
Good Day
   
  I have an opportunity to join our Storage group.  I have several years of 
experience (15) as a Storage Administrator, however, coming from the old manual 
school, I do not have much experience in the SMS / DFHSM area.  I know the 
basic commands but I would like to know more about these two subjects.  I have 
outlined some topics below:
   
SMS:

   How do I initialize and allocate a volume under SMS   
   How do I allocate a storage group   
   Allocate an alias for example: ABC.DEF.** in a storage group   
   Allocate a Guaranteed Space in a particular Storage group example. 
A.BBB.CC   
   How do I compile new changes when made.   
   What are the steps needed to be performed from the time a Storage group is 
set up, volumes are added to that group and alias defined to that storage group.
   
  DFHSM:
   

   Archiving and Recalling dataset set up.  For example how do I set up the 
rules for ML1 migration?  How do I set up ML2 migration   
   How do I do code the rules to recycle of the DFHSM tapes? I remember  we do 
the recycle every Sunday via batch job.   
   Are there any other commands besides “hrecall” “hsend” etc? 
   
  I remember using ISMF (TSO panel).  Can you tell me if this is required to 
administer SMS  DFHSM?
   
  Please forgive me for asking so many questions.  If I have forgotten anything 
else please feel free to offer your suggestions.
   
  Thanks to you all
   
  Desperate Willie.



-
 Yahoo! Mail - Helps protect you from nasty viruses.

--
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: SMS DFHSM Information

2006-02-03 Thread Rob Scott
Willie,

Have you looked at the SMS Manuals - all the things you are after are
described very well there.

You can start with the Introduction to SMS book and then go onto the
Storage Administration Reference manuals for dfp and hsm.

There is even an ISMF User Guide.


If you have no manuals at your site - you can go onto the IBM website
and browse them online.

Rob Scott
Rocket Software
http://www.rs.com/portfolio/mxi/

--
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 Compile time Question

2006-02-03 Thread Chase, John
 -Original Message-
 From: IBM Mainframe Discussion List On Behalf Of Bill Klein
 
 First, I agree with you that a 140,000 line program is NOT a 
 good thing - but it certainly does occur in the real world.
 
 If this is a CICS (or possibly DB2) program, make certain 
 that you are NOT using the  
SIZE(MAX)
 compiler option (as there needs to be room for the coprocessors).

... or do it the old way using separate-step precompilers.

-jc-

--
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: SMS DFHSM Information

2006-02-03 Thread Chase, John
 -Original Message-
 From: IBM Mainframe Discussion List On Behalf Of Rob Scott
 
 [ snip ]
 
 If you have no manuals at your site - you can go onto the IBM website
 and browse them online. 

http://www-03.ibm.com/servers/eserver/zseries/zos/bkserv

-jc-

--
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: JES2 exit 52 jobclass override

2006-02-03 Thread Thomas H Puddicombe


This is a PRIVATE message. If you are not the intended recipient, please
delete without copying and kindly advise us by e-mail of the mistake in
delivery. NOTE: Regardless of content, this e-mail shall not operate to
bind CSC to any order or other contract unless pursuant to explicit written
agreement or government initiative expressly permitting the use of e-mail
for such purpose.






  
  Bill Planer whp  
  
  @MINDSPRING.COM To:  IBM-MAIN@BAMA.UA.EDU
  
  Sent by: IBM cc:  
  
  MainframeSubject: Re: JES2 exit 52 
jobclass override
  Discussion List   
  
  IBM-MAIN 
  

  

  
  02/02/2006 05:33  
  
  PM
  
  Please respond
  
  to IBM Mainframe  
  
  Discussion List   
  

  




snip
  I'm guessing IBM is positioning for eight
byte job class names in the future.
/snip

The future is JES3???  g,d,r
--
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: COBOL compile time Question

2006-02-03 Thread Alan C. Field
Thanks for all the responses.

We tried 0M, we tried 64M, never considered 128M but we'll try. 

As Roland suggested its looking for X'FA0'  4000dec below the line. 

Available region below is about 10.5Mb 

Here are the compiler options:

PP 5655-G53 IBM ENTERPRISE COBOL FOR Z/OS  3.3.1 
INVOCATION PARAMETERS:
TEST,LIB,NODYNAM,RENT,TRUNC(BIN),SQL(APOST,APOSTSQL),SIZE(8192K),BUFSIZE(2048)
OPTIONS IN EFFECT:
NOADATA
  ADV
  APOST
  ARITH(COMPAT)
NOAWO
  BUFSIZE(2048)
NOCICS
  CODEPAGE(1140)
NOCOMPILE(S)
NOCURRENCY
  DATA(31)
NODATEPROC
  DBCS
NODECK
NODIAGTRUNC
NODLL
NODUMP
NODYNAM
NOEXIT
NOEXPORTALL
  FASTSRT
  FLAG(I,I)
NOFLAGSTD
  INTDATE(ANSI)
  LANGUAGE(UE)
  LIB
  LINECOUNT(60)
NOLIST
  MAP
NONAME
  NSYMBOL(NATIONAL)
NONUMBER
  NUMPROC(NOPFD)
  OBJECT
  OFFSET
NOOPTIMIZE
  OUTDD(SYSOUT)
  PGMNAME(COMPAT)
  RENT
  RMODE(AUTO)
NOSEQUENCE
  SIZE(8388608)
  SOURCE
  SPACE(1)
  SQL('APOST,APOSTSQL')
  SSRANGE
NOTERM
  TEST(ALL,SYM,NOSEPARATE)
NOTHREAD
  TRUNC(BIN)
NOVBREF
  WORD(NOOO)
  XREF(SHORT)
  YEARWINDOW(1900)

* STATISTICS FOR COBOL PROGRAM xx:
*SOURCE RECORDS = 376159
*DATA DIVISION STATEMENTS = 21589
*PROCEDURE DIVISION STATEMENTS = 90916
RETURN CODE 16

--
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: Omvs/tcpip question

2006-02-03 Thread Mark Zelden
On Thu, 2 Feb 2006 15:29:27 -0600, Doug Henry [EMAIL PROTECTED] wrote:

On Wed, 1 Feb 2006 16:41:50 -0600, Pommier, Rex R.
[EMAIL PROTECTED] wrote:

Only have 1 IKJTSOxx member, last modified July 2005.  It does not have
PING defined to AUTHCMD.



From z/OS Comm Svr: IP Sys Admin Commands

For PING to be authorized to use RAW sockets, add the command name,
PING, to the AUTHCMD NAMES section of the member IKJTSOxx of
SYS1.PARMLIB. TSO user IDs with UNIX System Services superuser
authority are able to execute the command even without this
SYS1.PARMLIB modification. If PING is not authorized to use RAW
sockets, PING will fail with message EZZ3115I Unable to open RAW
socket: EDC5139I Operation not permitted. For other authorization
considerations, refer to MVS-related considerations in the z/OS
Communications Server: IP Configuration Guide.


My notes from the last 1.4 upgrade I did said to add NETSTAT as well,
but that isn't mentioned in the 1.4 migration guide, so I'm not sure
when that was needed.

Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America and Farmers Insurance Group
mailto: [EMAIL PROTECTED]
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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Mount a tape

2006-02-03 Thread Bruce Black


I really think that in this type of question, someone should basically 
ask for clarification, and then everyone should wait until the person 
furthur states his question.  If not, why waste all of the bandwidth 
answering maybe this is what he wanted.
Agreed.  It would have been nice if Jerry had replied to clarify his 
question.  If we (the collective IBM-MAIN we) had asked him nicely to 
do so he might have replied.  But I suspect that the testy replies have 
scared him off.   Jerry, if you are still listening, please let us know 
what you really needed to know.  We aren't all grouchy!


--
Bruce A. Black
Senior Software Developer for FDR
Innovation Data Processing 973-890-7300
personal: [EMAIL PROTECTED]
sales info: [EMAIL PROTECTED]
tech support: [EMAIL PROTECTED]
web: www.innovationdp.fdr.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


Re: COBOL compile time Question

2006-02-03 Thread Mike Bell
This jcl and cblopt works with DB2 V7 and enteprise cobol 3.3 and it works
with either region = 0M or region = 8M
I tried the same options and JCL with DB2 V8 and got an abend - didn't
examine it closely (u3002).
The quickest way out is what was already suggested - change to the stand
alone precompiler

Mike

//COB2COMP EXEC PGM=IGYCRCTL,REGION=0M,
// PARM='TEST(NONE,SYM),NOSEQUENCE'
//STEPLIB  DD  DISP=SHR,DSN=IGY330.SIGYCOMP
// DD  DISP=SHR,DSN=DSN710.SDSNLOAD
//SYSUT1   DD  SPACE=(460,(800,200)),UNIT=SYSDA
//SYSUT2   DD  SPACE=(460,(800,200)),UNIT=SYSDA
//SYSUT3   DD  SPACE=(460,(800,200)),UNIT=SYSDA
//SYSUT4   DD  SPACE=(460,(800,200)),UNIT=SYSDA
//SYSUT5   DD  SPACE=(460,(800,200)),UNIT=SYSDA
//SYSUT6   DD  SPACE=(460,(800,200)),UNIT=SYSDA
//SYSUT7   DD  SPACE=(460,(800,200)),UNIT=SYSDA
//SYSPRINT DD  SYSOUT=*

TEST(NONE,SYM),NOSEQUENCE
PROCESS(CBL) statements:
   CBL SQL('HOST(IBMCOB),QUOTE,APOSTSQL,ATTACH(CAF),VERSION(AUTO)')
   CBL LIB,SOURCE,SIZE(8192K)
   CBL APOST,NOXREF,RENT,DECK,MAP
Options in effect:
NOADATA
  ADV
  APOST
  ARITH(COMPAT)
NOAWO
  BUFSIZE(4096)
NOCICS
  CODEPAGE(1140)
NOCOMPILE(S)
NOCURRENCY
  DATA(31)
NODATEPROC
  DBCS
   DECK
 NODIAGTRUNC
 NODLL
 NODUMP
 NODYNAM
 NOEXIT
 NOEXPORTALL
 NOFASTSRT
   FLAG(I,I)
 NOFLAGSTD
   INTDATE(ANSI)
   LANGUAGE(EN)
   LIB
   LINECOUNT(60)
 NOLIST
   MAP
 NONAME
   NSYMBOL(NATIONAL)
 NONUMBER
   NUMPROC(NOPFD)
   OBJECT
 NOOFFSET
 NOOPTIMIZE
   OUTDD(SYSOUT)
   PGMNAME(COMPAT)
   RENT
   RMODE(AUTO)
 NOSEQUENCE
   SIZE(8388608)
   SOURCE
   SPACE(1)
   SQL('HOST(IBMCOB),QUOTE,APOSTSQL,ATTACH(CAF),VERSION(AUTO)')
 NOSSRANGE
 NOTERM
   TEST(NONE,SYM,NOSEPARATE)
 NOTHREAD
5655-G53 IBM Enterprise COBOL for z/OS  3.3.0
   TRUNC(STD)
 NOVBREF
 NOWORD
 NOXREF
   YEARWINDOW(1900)

--
Mike

--
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: Access to Mainframes via Putty?

2006-02-03 Thread Shmuel Metz (Seymour J.)
In [EMAIL PROTECTED], on 02/02/2006
   at 03:36 PM, Patrick O'Keefe [EMAIL PROTECTED] said:

Ok. So Chris maybe shouldn't have said requires.  Yes, there is
full-screen automation.  Every screen-scraper is doing full-screen
automation. Even NetView has full-screen automation.  But automating
line-by-line data is sure a lot easier, and certainly more
typical.

I don't have statistics on what is used how often, but what I do know
is that most of IBM's 3270 simulation software offers scripting
support. Not elegant, admittedly, but usable.
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see http://patriot.net/~shmuel/resume/brief.html 
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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Access to Mainframes via Putty?

2006-02-03 Thread Shmuel Metz (Seymour J.)
In [EMAIL PROTECTED], on 02/03/2006
   at 02:44 AM, Chris Mason [EMAIL PROTECTED] said:

Even so I vaguely remember integrated communications
adapters which supported SDLC circuits.

My recollection is that those were supported only in VSE.
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see http://patriot.net/~shmuel/resume/brief.html 
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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Access to Mainframes via Putty?

2006-02-03 Thread Shmuel Metz (Seymour J.)
In [EMAIL PROTECTED], on 02/03/2006
   at 03:40 AM, Chris Mason [EMAIL PROTECTED] said:

At the time I tried to implement
automation for the purposes of teaching it, basically the 80s, the
idea of implementing automation by programmed analysis of 3270 data
streams in order to extract key character strings constituted a
degree of difficulty which reasonable people equated with impossible.

When reasonable people see something being done, they stop calling it
impossible. That is especially true when they see it being done at
multiple shops.

Today, the situation may not be a lot different even if some tools
are available to help with what I understand is called screen
scraping. 

The tools have been available for years; around two decades.
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see http://patriot.net/~shmuel/resume/brief.html 
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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: IBMLINK vs techsupport.services.ibm.com

2006-02-03 Thread Shmuel Metz (Seymour J.)
In [EMAIL PROTECTED], on 02/02/2006
   at 07:12 AM, Jerry Ragland [EMAIL PROTECTED] said:

When I submit this JCL and I found in the logs

Logs? What about the console?


*IEF233A M 0590,RIMS01,,COPYINST,COPYSTEP,IBM.HCI64.F2

Did you put the cartridge in the drive when you got this message? Did
you hit start, or whatever the FLEX equivalent is? If so, what
happened?

*17 IEF455D MOUNT RIMS01 ON 0590 FOR MOUNT 590 OR REPLY 'NO'
I tried reply 17 with 590 but it is not accepting.

Of course not. Did you read the message before replying to it? The
only acceptable reply listed in the message text is NO.
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see http://patriot.net/~shmuel/resume/brief.html 
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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Mount a tape

2006-02-03 Thread Shmuel Metz (Seymour J.)
In [EMAIL PROTECTED], on 02/02/2006
   at 03:06 PM, Anne  Lynn Wheeler [EMAIL PROTECTED] said:

the 1401 was used for unit record-tape frontend for 709;

709? You didn't trade it in on a 7090?
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see http://patriot.net/~shmuel/resume/brief.html 
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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: SMP/E SE37 Retry and ++ZAP

2006-02-03 Thread Shmuel Metz (Seymour J.)
In [EMAIL PROTECTED], on 02/02/2006
   at 08:13 AM, Edward E. Jaffe [EMAIL PROTECTED] said:

Not for PDSE.

Why would AMASPZAP processing be any different for PDSE?
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see http://patriot.net/~shmuel/resume/brief.html 
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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Mount a tape

2006-02-03 Thread Kok, Howi
I agree too.  That was why I threw out some questions to try to clarify
his situation.  Jerry did reply and clarify eventually, except that he
used two other threads ('Mount a tape in flexes', 'IBMLINK vs
techsupport.service.ibm.com') instead of this one.

Howi Kok

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Bruce Black
Sent: Friday, February 03, 2006 8:40 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Mount a tape


 I really think that in this type of question, someone should basically

 ask for clarification, and then everyone should wait until the person 
 furthur states his question.  If not, why waste all of the bandwidth 
 answering maybe this is what he wanted.
Agreed.  It would have been nice if Jerry had replied to clarify his 
question.  If we (the collective IBM-MAIN we) had asked him nicely to 
do so he might have replied.  But I suspect that the testy replies have 
scared him off.   Jerry, if you are still listening, please let us know 
what you really needed to know.  We aren't all grouchy!

-- 
Bruce A. Black
Senior Software Developer for FDR
Innovation Data Processing 973-890-7300
personal: [EMAIL PROTECTED]
sales info: [EMAIL PROTECTED]
tech support: [EMAIL PROTECTED]
web: www.innovationdp.fdr.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

**
This email and any files transmitted with it are confidential and
intended solely for the use of the individual or entity to whom they
are addressed. If you have received this email in error please notify
the system manager.

This footnote also confirms that this email message has been swept by
MIMEsweeper for the presence of computer viruses.

www.clearswift.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


Re: TN3270 Question

2006-02-03 Thread Shmuel Metz (Seymour J.)
In [EMAIL PROTECTED], on 02/03/2006
   at 05:05 AM, Chris Mason [EMAIL PROTECTED] said:

I'm not clear what is supposed to be wrong here.

And yet you describe something that you consider wrong.

Thus it is indeed wrong that RFC 2355 requires
this passthrough mode of behaviour rather than saying that the
TN3270E logic merely has to give the impression that it has this
capability. 

I would have said hamhanded rather than wrong, but yes.

I get the impression we are actually in complete agreement here -
for once :-)

Yes, I believe that we are in violent agreement that the RFC should be
changed to allow more reasonable behavior.
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see http://patriot.net/~shmuel/resume/brief.html 
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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Omvs/tcpip question

2006-02-03 Thread Shmuel Metz (Seymour J.)
In [EMAIL PROTECTED],
on 02/02/2006
   at 01:30 PM, Pommier, Rex R. [EMAIL PROTECTED] said:

You know, my first thought was to simply delete your ranting

Feel free.

because it seems there are a few people on this board
who seem to think their sole purpose is to blast others rather than
to try to help. 

And there are some people too pigheaded to accept help when it is
offered.

but I am looking for help,

Obviously not. I offered you help; I won't make that mistake again.
It's not my dog.
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see http://patriot.net/~shmuel/resume/brief.html 
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 [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Mount a tape

2006-02-03 Thread Anne Lynn Wheeler
Louis Krupp wrote:
 Don't forget the write ring.  Leave it off when you intended to write to
 the tape, and you had to unload and reload the tape all over again.
 Leave it on when you didn't mean to, and the tape might get purged by
 mistake.

i had some stuff from the late 60s and early 70s replicated on three
different tapes (over the years copying from 800bpi to 1600bpi to
6250bpi tape) ... but all in the same datacenter library in the mid-80s.
it included some stuff on periodically monitoring system activity and
using the information for dynamic adaptive feedback control. i had
created dynamic adaptive feedback scheduler in the 60s as an
undergraduate that included fairshare as a default policy ... that was
shipped in cp67. much of the code was dropped in the morph from cp67 to
vm370. however, i was given a chance to re-introduce it with the
resource manager (shipped spring 1976).

for a little more drift, the resource manager was selected to be the
guinea pig for priced kernel software. with the unbundling announcement
on 6/23/69, application software started being charged for ... but
kernel software was still shipped free (under the justification that it
was needed to run the hardware ... aka bundled). by the mid-70s, various
factors (like 370 clones) were contributing to pressure to pricing
kernel software. i got to spend six months or so on and off with
business and pricing people on policies for pricing kernel software.
misc. past bundling/unbundling posts
http://www.garlic.com/~lynn/subtopic.html#unbundle

anyway, by the mid-80s, some people from corporate came looking for
early examples of periodic monitoring of system performance activity ...
having to do with some litigation or patent issue. i went to retrieve
the code and found that all three tapes had been written over.
apparently there was some problem in the datacenter with operators
randomly selecting tapes to be mounted as scratch (i.e. the ring was
inserted for a request to mount a scratch tape for writing).

recent post reproducing part of the resource manager blue announcement
letter (actually beige at this time, but still commonly referred to as
blue ... i don't actually still have a paper copy but was presented an
engraved plaque of the announcement letter that has survived).
http://www.garlic.com/~lynn/2006.html#19 DCSS as SWAP disk for z/Linux

--
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: Access to Mainframes via Putty?

2006-02-03 Thread Jay Maynard
On Fri, Feb 03, 2006 at 09:11:12AM -0500, Shmuel Metz (Seymour J.) wrote:
 In [EMAIL PROTECTED], on 02/03/2006
at 02:44 AM, Chris Mason [EMAIL PROTECTED] said:
 Even so I vaguely remember integrated communications
 adapters which supported SDLC circuits.
 My recollection is that those were supported only in VSE.

ISTR a chapter in the P/390 redbook o how to use the AWSICA emulation with
OS/390 VTAM.
-- 
Jay Maynard, K5ZChttp://www.conmicro.cx
http://jmaynard.livejournal.com  http://www.tronguy.net
http://www.hercules-390.org   (Yes, that's me!)
Buy Hercules stuff at http://www.cafepress.com/hercules-390

--
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: Access to Mainframes via Putty?

2006-02-03 Thread Chris Mason
Paul,

I'm coming back to this post because I've realised that your desire to have
all the TELNET services available on *one port* - see below - was mentioned
in the post you referenced but your snip ignored it.

I had a nagging doubt over just exactly how this worked so I've done the
research and now I'm happy - and, indeed, if the original new function
APAR is anything to go by it was precisely this multiple TELNET server issue
that was the reason for creating this new function.

The references are as follows:
APAR: PQ37421: SUPPORT TO ALLOW MULTIPLE DISSIMILAR SERVERS TO USE THE SAME
TCPPORT
http://www-1.ibm.com/support/docview.wss?uid=isg1PQ37421
Presentation: IBM Communications Server for OS/390 TCP/IP 2000 Update
Technical Presentation Guide
http://www.redbooks.ibm.com/redbooks/pdfs/sg246162.pdf
Pages 2.14 to 2.17

Of course, it may be the same port but you'll be required to use a different
IP address, very likely a VIPA. But, again, a VIPA can be invoked with a
friendly name.

There's also the possibility - as John McKown indicated - to set up your
solicitor function using the facilities of your TELNET client but I
appreciate that this probably offers a very simple way also to specify
different port numbers so we're back to where we started.

Chris Mason

- Original Message - 
From: Paul Gilmartin [EMAIL PROTECTED]
Newsgroups: bit.listserv.ibm-main
To: IBM-MAIN@BAMA.UA.EDU
Sent: Wednesday, 01 February, 2006 3:03 PM
Subject: Re: Access to Mainframes via Putty?

snip
 However, the objective is to be able to connect to any of TSO, CICS,
 or UNIX line-by-line, all from the same port.
end snip

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


IPCS: accessing data in a dataspace

2006-02-03 Thread Todd Burch
Reading through IPCS customization, it is not clear to me how to go about
accessing data in the dataspace through a verbexit.

I would typically use the Storage Access Service (Chap 10.2.18) to acess
data  in a dump, but it says right up front to use the Storage Access
function of the Symbol Service (Chap. 10.2.20).

In the Symbol Service, I have to supply an ESR, which in turn describes the
ASID of the owning dataspace and the DSPNAME itself.  OK so far.

What is not clear to me is where to supply the address within the dataspace,
or the length of the data I want returned.  Do I have to create a symbol
(using the Equate Symbol Service) for each address/length I want to
(programmatically) look at in the dataspace?  Seems like a pain.

On the other hand, I considered using the Storage Map Service (Chap
10.2.19), as this indicates dataspace access is supported.  But, similarly
to the Symbol Service, I have not figured out how/where to specify the
address  length of storage I am insterested in.

Any help is appreciated.

Thanks, Todd

--
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 compile time Question

2006-02-03 Thread Tom Schmidt
On Fri, 3 Feb 2006 07:59:37 -0600, Alan C. Field wrote:

We tried 0M, we tried 64M, never considered 128M but we'll try.

As Roland suggested its looking for X'FA0'  4000dec below the line.

Available region below is about 10.5Mb


What does the IEF374I message look like for the compile step?  (It is the
step end CPU and storage high water mark message in the system messages
file.)

Does your site have a (very) limiting IEFUSI exit that is preventing you
from getting virtual storage above the line?

--
Tom Schmidt
Madison, WI

--
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: Determine Origin of TSO/RACF Command?

2006-02-03 Thread Chase, John
 -Original Message-
 From: IBM Mainframe Discussion List On Behalf Of Walt Farrell
 
 On 2/1/2006 4:39 PM, Chase, John wrote:
  Is there a reliable way, from within (specifically) the RACF 
  IRREVX01 command exit, to determine whether a particular command of 
  interest was entered by a TSO user at a terminal or submitted from a 
  program via the terminal services facility IKJEFTSR?  The submitter 
  program in this case would be a program running in a TSO user's session.
  
  The intended effect of this is to reject certain CONNECT commands to 
  certain firecall groups except via the specific submitter program.
 
 That sounds very tricky.  The CONNECT command would be 
 running in the an authorized subtask tree within TSO, and the 
 original submitter program would be running in another part 
 of the subtask tree, with no obvious connection between them 
 that I know of.  You could probably walk up the TCB tree 
 until you hit IKJEFT02's parent, then walk down some sibling 
 TCB chain until you reach the end, and then check the PRB and 
 CDE to see if you hit your submitter program.
 
 However, even if you find that data, there's no information 
 that I know of that would allow you determine that it is the 
 copy of the program you expected, rather than some other 
 program with the same name, from some other library.  
 Possibly checking for a clean program control environment 
 would help, but that's not a documented programming interface.
 
 I might suggest a different approach, with an APF-authorized 
 submitter program that invokes R_admin to do the CONNECT 
 command.  This lets the submitter specify the user ID under 
 which to run the command, and your exit could simply check 
 the ID the command is running under.,

Thanks for the suggestions.  I've since learned that the objection raised
by our auditors is that some CONNECTs to these firecall groups did not
specify the REVOKE keyword with today's date (i.e., a RACF admin issued
the CONNECT) as required by our internal controls.  Thus it seems that
simply adding an appropriate REVOKE via the IRREVX01 exit would resolve the
auditors' objection.

Thanks again,

-jc-

--
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 compile time Question

2006-02-03 Thread Jim McAlpine
Have you tried with NOSSR as someone has already suggested.  I have
experience of trying to compile similar sized programs and the SSR option
often causes problems.

Jim McAlpine


On 2/3/06, Alan C. Field [EMAIL PROTECTED] wrote:

 Thanks for all the responses.



--
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: Access to Mainframes via Putty?

2006-02-03 Thread Chris Mason
Jay,

Shmuel is right - he often is - well, half-right, but I'm not deducting any
points for not mentioning VM. In other words the ICA is supported only under
VM and VSE VTAM .

From your post I used AWSICA as a Google search word and confirmed the
above in one or two hits. I vaguely remembered this also at the time I
mentioned the ICA but, since the original poster didn't specify MVS-z/OS, I
didn't bother to mention anything.

One of the hits was http://www.hammocktree.org/tech/P390QRef.PDF entitled
IBM PC Server System/390 Quick Product Guide where we find the following:

OS/390 (MVS): OS/390 does not support the ICA so AWSICA cannot be used and
BSC line support is not provided. SDLC support for OS/390 is provided by the
WAC (Wide Area Connector) and MultiPort Model 2 adapters by using the
WAN3172 device manager, emulating a VTAM XCA node (3172 SDLC Gateway). The
WAC can be configured for either RS232, V.35, or X.21 interfaces. (RS232
typically runs up to 19.2Kbps, V.35 is used for 56Kbps and higher, with X.21
being used for very high speed, such as T1 connections.) Each WAC has one
line interface and one additional interface can be added (interface types
can be mixed). There is a maximum of 2 WAC adapters per system since the PB0
only has two ISA slots. The MultiPort model 2 provides up to 8 RS-232 ports
per adapter, with a maximum of two adapters. Only ISA bus versions of the
WAC and MultiPort model
2 are supported. CHECK: IS WAN3172 plus Portmaster 2 supported on OS/390?

It may be something like this you recalled. Clearly there's some sort of
smoke and mirrors here where VTAM thinks it's dealing with a LAN -
although the interface is the Link Services Architecture (LSA) interface -
while the adapter is driving SDLC.

But this sub-issue got off the ground because we were talking about the 3767
and there's a snag - not that anyone really should care since we are all
well away from the original topic. The snag is that, in addition to using LU
type 1 protocols, the 3767 also uses PU type 1 protocols. PUTYPE=1 is not an
option with the XCA major node PU statement.

Chris Mason

- Original Message - 
From: Jay Maynard [EMAIL PROTECTED]
Newsgroups: bit.listserv.ibm-main
To: IBM-MAIN@BAMA.UA.EDU
Sent: Friday, 03 February, 2006 4:42 PM
Subject: Re: Access to Mainframes via Putty?


 On Fri, Feb 03, 2006 at 09:11:12AM -0500, Shmuel Metz (Seymour J.) wrote:
  In [EMAIL PROTECTED], on 02/03/2006
 at 02:44 AM, Chris Mason [EMAIL PROTECTED] said:
  Even so I vaguely remember integrated communications
  adapters which supported SDLC circuits.
  My recollection is that those were supported only in VSE.

 ISTR a chapter in the P/390 redbook o how to use the AWSICA emulation with
 OS/390 VTAM.
 -- 
 Jay Maynard, K5ZChttp://www.conmicro.cx
 http://jmaynard.livejournal.com  http://www.tronguy.net
 http://www.hercules-390.org   (Yes, that's me!)
 Buy Hercules stuff at http://www.cafepress.com/hercules-390

--
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: Mount a tape

2006-02-03 Thread Bruce Black


Jerry did reply and clarify eventually, except that he
used two other threads ('Mount a tape in flexes', 'IBMLINK vs
techsupport.service.ibm.com') instead of this one.
Ah so.  I didn't notice those were from him (especially the second 
one).  Even the first subject made me wonder whats a flex?) until I 
read the text (sorry, Jerry)


--
Bruce A. Black
Senior Software Developer for FDR
Innovation Data Processing 973-890-7300
personal: [EMAIL PROTECTED]
sales info: [EMAIL PROTECTED]
tech support: [EMAIL PROTECTED]
web: www.innovationdp.fdr.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


(fwd) RE: What is ILBOSPI0 ?

2006-02-03 Thread Clark Morris
On 1 Feb 2006 05:32:58 -0800, in bit.listserv.ibm-main
[EMAIL PROTECTED] (Kittendorf, Craig) wrote:

The only COBOL compiler we have is: PP 5655-G53 IBM Enterprise COBOL for
z/OS  3.4.0.

Be aware that if the last time the program(s) in question were
compiled the OS/VS compiler was used, the programs may not compile or
work differently if they do compile.  The OS/VS compiler is the 1974
standard while the current one is the 1985 standard with the 1989
extensions and maybe some features from the 2002 standard.  

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED]
Behalf Of Bill Klein
Sent: Wednesday, February 01, 2006 3:57 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: What is ILBOSPI0 ?

The information that I have from a usually reliable source is that if

A) the program is not compiled with OS/VS COBOL
 OR
B) if compiled with OS/VS COBOL but without  STATE, COUNT, SYMDMP

then such a call is a NO-OP and can safely be removed.

If you still have an OS/VS COBOL compiled program *and* use the FLOW=
run-time option (still supported with LE - but ONLY for OS/VS COBOL
programs), then your existing CALL statement *might* actually be doing
something.


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


PDSE MSG - EC036I 002-A4,IGC0005E

2006-02-03 Thread Jorge Arueira Campos
Hi

I have a PDSE and when try to edit receive the msg  IEC036I 002-A4,IGC0005E.
I need recover. Anybody can help me ???

Thanks for all

Jorge Arueira Campos

Support Team Z/os

CAIXA ECONOMICA FEDERAL- OSASCO - SP - BRAZIL
55-11-3685-6991

--
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: PDSE MSG - EC036I 002-A4,IGC0005E

2006-02-03 Thread Bruce Black


I have a PDSE and when try to edit receive the msg  IEC036I 002-A4,IGC0005E.
I need recover. Anybody can help me ???
A4Unable to complete the READ against the PDSE directory due to 
an 
  error return code from an SMS service used to obtain 
directory   
  
information. 
It sounds like your PDSE is corrupted.  The only reference to the A4 
code that I can find on IBMLINK is OW49234, a fairly old APAR (2001) 
which fixed a problem that could result in a corrupted PDSE.  One of the 
symptoms after the corruption was the IEC026I 002-A4. 

I hope you have a recent backup that you can restore.  You could try 
opening a problem with IBM, perhaps they can help recover the file


--
Bruce A. Black
Senior Software Developer for FDR
Innovation Data Processing 973-890-7300
personal: [EMAIL PROTECTED]
sales info: [EMAIL PROTECTED]
tech support: [EMAIL PROTECTED]
web: www.innovationdp.fdr.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


Re: PDSE MSG - EC036I 002-A4,IGC0005E

2006-02-03 Thread August Carideo
Obviously the error message is not much help
 A4Unable to complete the READ against the PDSE directory due to an
   error return code from an SMS service used to obtain directory
   information.




   
  Bruce Black   
   
  [EMAIL PROTECTED]To:   IBM-MAIN@BAMA.UA.EDU  

  TION.COMcc:  
   
  Sent by: IBM Subject:  Re: PDSE MSG - EC036I 
002-A4,IGC0005E 
  Mainframe 
   
  Discussion List   
   
  [EMAIL PROTECTED]

  .EDU 
   

   

   
  02/03/2006 01:55  
   
  PM
   
  Please respond to 
   
  IBM Mainframe 
   
  Discussion List   
   

   

   





 I have a PDSE and when try to edit receive the msg  IEC036I
002-A4,IGC0005E.
 I need recover. Anybody can help me ???
 A4Unable to complete the READ against the PDSE directory due to
an
   error return code from an SMS service used to obtain
directory

information.
It sounds like your PDSE is corrupted.  The only reference to the A4
code that I can find on IBMLINK is OW49234, a fairly old APAR (2001)
which fixed a problem that could result in a corrupted PDSE.  One of the
symptoms after the corruption was the IEC026I 002-A4.

I hope you have a recent backup that you can restore.  You could try
opening a problem with IBM, perhaps they can help recover the file

--
Bruce A. Black
Senior Software Developer for FDR
Innovation Data Processing 973-890-7300
personal: [EMAIL PROTECTED]
sales info: [EMAIL PROTECTED]
tech support: [EMAIL PROTECTED]
web: www.innovationdp.fdr.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


Re: (fwd) RE: What is ILBOSPI0 ?

2006-02-03 Thread Norman Hollander
I do have access to OS/VS Cobol (circa 1984-1985) , Cobol II and Enterprise
Cobol Compilers.  If it helps, I'm happy to compile the source for you.
Just let me know
what options you want and where to send the output.

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Clark Morris
Sent: Friday, February 03, 2006 SYSN 9:54 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: (fwd) RE: What is ILBOSPI0 ?

On 1 Feb 2006 05:32:58 -0800, in bit.listserv.ibm-main
[EMAIL PROTECTED] (Kittendorf, Craig) wrote:

The only COBOL compiler we have is: PP 5655-G53 IBM Enterprise COBOL for
z/OS  3.4.0.

Be aware that if the last time the program(s) in question were
compiled the OS/VS compiler was used, the programs may not compile or
work differently if they do compile.  The OS/VS compiler is the 1974
standard while the current one is the 1985 standard with the 1989
extensions and maybe some features from the 2002 standard.  

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED]
Behalf Of Bill Klein
Sent: Wednesday, February 01, 2006 3:57 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: What is ILBOSPI0 ?

The information that I have from a usually reliable source is that if

A) the program is not compiled with OS/VS COBOL
 OR
B) if compiled with OS/VS COBOL but without  STATE, COUNT, SYMDMP

then such a call is a NO-OP and can safely be removed.

If you still have an OS/VS COBOL compiled program *and* use the FLOW=
run-time option (still supported with LE - but ONLY for OS/VS COBOL
programs), then your existing CALL statement *might* actually be doing
something.


--
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: (fwd) RE: What is ILBOSPI0 ?

2006-02-03 Thread Kittendorf, Craig
Thank you.  We are aware of the differences.

Craig

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Clark Morris
Sent: Friday, February 03, 2006 12:54 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: (fwd) RE: What is ILBOSPI0 ?

On 1 Feb 2006 05:32:58 -0800, in bit.listserv.ibm-main
[EMAIL PROTECTED] (Kittendorf, Craig) wrote:

The only COBOL compiler we have is: PP 5655-G53 IBM Enterprise COBOL
for
z/OS  3.4.0.

Be aware that if the last time the program(s) in question were
compiled the OS/VS compiler was used, the programs may not compile or
work differently if they do compile.  The OS/VS compiler is the 1974
standard while the current one is the 1985 standard with the 1989
extensions and maybe some features from the 2002 standard.  

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED]
Behalf Of Bill Klein
Sent: Wednesday, February 01, 2006 3:57 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: What is ILBOSPI0 ?

The information that I have from a usually reliable source is that if

A) the program is not compiled with OS/VS COBOL
 OR
B) if compiled with OS/VS COBOL but without  STATE, COUNT, SYMDMP

then such a call is a NO-OP and can safely be removed.

If you still have an OS/VS COBOL compiled program *and* use the FLOW=
run-time option (still supported with LE - but ONLY for OS/VS COBOL
programs), then your existing CALL statement *might* actually be doing
something.


--
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: (fwd) RE: What is ILBOSPI0 ?

2006-02-03 Thread Kittendorf, Craig
Thanks for the offer but we wouldn't be allowed to for privacy/security
reasons.  But if we need to and can, I let you know.

Thanks, 
  Craig

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Norman Hollander
Sent: Friday, February 03, 2006 2:16 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: (fwd) RE: What is ILBOSPI0 ?

I do have access to OS/VS Cobol (circa 1984-1985) , Cobol II and
Enterprise
Cobol Compilers.  If it helps, I'm happy to compile the source for you.
Just let me know
what options you want and where to send the output.

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf
Of Clark Morris
Sent: Friday, February 03, 2006 SYSN 9:54 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: (fwd) RE: What is ILBOSPI0 ?

On 1 Feb 2006 05:32:58 -0800, in bit.listserv.ibm-main
[EMAIL PROTECTED] (Kittendorf, Craig) wrote:

The only COBOL compiler we have is: PP 5655-G53 IBM Enterprise COBOL
for
z/OS  3.4.0.

Be aware that if the last time the program(s) in question were
compiled the OS/VS compiler was used, the programs may not compile or
work differently if they do compile.  The OS/VS compiler is the 1974
standard while the current one is the 1985 standard with the 1989
extensions and maybe some features from the 2002 standard.  

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED]
Behalf Of Bill Klein
Sent: Wednesday, February 01, 2006 3:57 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: What is ILBOSPI0 ?

The information that I have from a usually reliable source is that if

A) the program is not compiled with OS/VS COBOL
 OR
B) if compiled with OS/VS COBOL but without  STATE, COUNT, SYMDMP

then such a call is a NO-OP and can safely be removed.

If you still have an OS/VS COBOL compiled program *and* use the FLOW=
run-time option (still supported with LE - but ONLY for OS/VS COBOL
programs), then your existing CALL statement *might* actually be doing
something.


--
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: (fwd) RE: What is ILBOSPI0 ?

2006-02-03 Thread McKown, John
 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:[EMAIL PROTECTED] On Behalf Of Kittendorf, Craig
 Sent: Friday, February 03, 2006 2:17 PM
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: Re: (fwd) RE: What is ILBOSPI0 ?
 
 
 Thanks for the offer but we wouldn't be allowed to for 
 privacy/security
 reasons.  But if we need to and can, I let you know.
 
 Thanks, 
   Craig

Uh, huh. We know that it is really so that others won't giggle over the
code! GRIN

--
John McKown
Senior Systems Programmer
UICI Insurance Center
Information Technology

This message (including any attachments) contains confidential
information intended for a specific individual and purpose, and its
content is protected by law.  If you are not the intended recipient, you
should delete this message and are hereby notified that any disclosure,
copying, or distribution of this transmission, or taking any action
based on it, is strictly prohibited.
 

--
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: SMP/E SE37 Retry and ++ZAP

2006-02-03 Thread Craddock, Chris
 
Ed said:
 
 Not for PDSE.

Shmuel said;

 Why would AMASPZAP processing be any different for PDSE?

It used to be (until I opened a PMR on it 3 or 4 years ago) that you
could not zap program objects. AMASPZAP just curled up its toes and
barfed if you presented it with a program object. It is probably still
the case that you can't zap program object contents in classes other
than B_TEXTxx, but at least you can apply zaps to code. 

CC

--
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: SMP/E SE37 Retry and ++ZAP

2006-02-03 Thread Ray Mullins
PDSEs are (were?) funny about having multiple DCB's opened against them, and
being opened UPDAT, OUTIN or INOUT.  I remember that in an earlier life, we
had to disable update in place if the target was a PDSE.

Later,
Ray

-- 
M. Ray Mullins 
Roseville, CA, USA 
http://www.catherdersoftware.com/
http://www.mrmullins.big-bear-city.ca.us/ 
http://www.the-bus-stops-here.org/ 

German is essentially a form of assembly language consisting entirely of far
calls heavily accented with throaty guttural sounds. 

--ilvi 



 

 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:[EMAIL PROTECTED] On Behalf Of Craddock, Chris
 Sent: Friday 03 February 2006 12:23
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: Re: SMP/E SE37 Retry and ++ZAP
 
  
 Ed said:
  
  Not for PDSE.
 
 Shmuel said;
 
  Why would AMASPZAP processing be any different for PDSE?
 
 It used to be (until I opened a PMR on it 3 or 4 years ago) 
 that you could not zap program objects. AMASPZAP just curled 
 up its toes and barfed if you presented it with a program 
 object. It is probably still the case that you can't zap 
 program object contents in classes other than B_TEXTxx, but 
 at least you can apply zaps to code. 
 
 CC
 

--
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: SMP/E SE37 Retry and ++ZAP

2006-02-03 Thread Paul Gilmartin
In a recent note, Craddock, Chris said:

 Date: Fri, 3 Feb 2006 14:22:56 -0600
 
  Why would AMASPZAP processing be any different for PDSE?
 
Can PDSE members be updated in place?

 It used to be (until I opened a PMR on it 3 or 4 years ago) that you
 could not zap program objects. AMASPZAP just curled up its toes and
 barfed if you presented it with a program object. It is probably still
 the case that you can't zap program object contents in classes other
 than B_TEXTxx, but at least you can apply zaps to code.
 
If I were to believe the manual, I'd think you can even zap program
objects in HFS.  But it doesn't always work.  The program:

//ZAPEXEC   PGM=AMASPZAP
//SYSPRINT   DD SYSOUT=A
//SYSLIB DD PATHOPTS=ORDONLY,
//  PATH='/bin'
//SYSIN  DD *
 DUMPcompress
 DUMPuncompress

produces:

* TOP OF DATA 
**
 IGWSPZAP  INSPECTS, MODIFIES, AND DUMPS CSECTS OR SPECIFIC DATA RECORDS ON 
DIRECT ACCESS STORAGE.
  DUMPcompress

 **RECORD LENGTH: 007C CLASS: B_TEXT   MEMBER NAME: compress
   CSECT NAME:  CEESTART
   4700   4702   90ECD00C   053047F0  30180014   CE030310   
002C   C3C5C5E2
 [ snip! ]

 AMA113I COMPLETED DUMP REQUIREMENTS
So far so good.  However:
  DUMPuncompress
 AMA140T UNABLE TO COMPLETE OPERATION DUE TO BINDER ERROR, FUNCTION = INCLUDE, 
RC=8, RSN=83000514
 AMA113I COMPLETED DUMP REQUIREMENTS
 BOTTOM OF DATA 


... Looks as if another PMR is needed.

-- gil
-- 
StorageTek
INFORMATION made POWERFUL

--
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: TN3270 Question

2006-02-03 Thread Patrick O'Keefe
On Fri, 3 Feb 2006 09:54:40 -0500, Shmuel Metz (Seymour J.) shmuel+ibm-
[EMAIL PROTECTED] wrote:

...
Yes, I believe that we are in violent agreement that the RFC should be
changed to allow more reasonable behavior.
...

Well, the status of RFC2355 is Draft Standard (having obsoleted
proposed Standard RFC1647) so it's not finalized.  I believe you are
allowed to give comments on RFCs. :-)

Actually, I vaguely remember there was a proposed revision to 2355 but I
haven't been able to find it lately.   (Not an obsoleting RFC, just a
revion to the current one.)  I could be wrong.

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


Re: SMP/E SE37 Retry and ++ZAP

2006-02-03 Thread Edward E. Jaffe

Shmuel Metz (Seymour J.) wrote:

In [EMAIL PROTECTED], on 02/02/2006
   at 08:13 AM, Edward E. Jaffe [EMAIL PROTECTED] said:

  

Not for PDSE.



Why would AMASPZAP processing be any different for PDSE?
  


Because the IEWBIND interface doesn't provide support to allow ZAP in place.

--
-
| Edward E. Jaffe||
| Mgr, Research  Development| [EMAIL PROTECTED]|
| Phoenix Software International | Tel: (310) 338-0400 x318   |
| 5200 W Century Blvd, Suite 800 | Fax: (310) 338-0801|
| Los Angeles, CA 90045  | http://www.phoenixsoftware.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


Re: IPCS: accessing data in a dataspace

2006-02-03 Thread Todd Burch
It's amazing what you manage to see in a listing when you know what you are
looking for.   Thanks Bob.  I'm fully operational at this point.

Todd


Bob Helps:


 The BLSRESSY (symbol service) and BLSRSASY structures both use three
 elements to talk about the dump data of interest:

 1.  A BLSRDATS structure (field name suffix AS) that you've characterized
 accurately.  It tells IPCS what address space (broader term than you
 generally hear being used to discuss z/OS) is of interest.  A large
variety
 of address spaces are supported in various contexts, including ASID(a)
 DSPNAME(d).  Part of IPCS considers every address space to have full
64-bit
 addresses.  Some front-end functions notice that you really cannot talk
 about addresses beyond 1040 in a HEADER record and that most data spaces
 are still limited to 31-bit addresses.

 2.  An address that comes in two flavors, depending on whether you asked
 for an ABITS(64) structure or accepted a default ABITS(31) structure.  The
 former is a 64-bit address, and the latter is a 31-bit address in a 32-bit
 field.  In all cases the field name suffix is LAD for logical address.
 The logical address is the value that you expect to find in other blocks
 that point to whatever is being discussed.  In the case of blocks like
 TCBs, UCBs, RBs, ASVTs, JSCBs, and at least a few others, it is not the
 address of the first byte occupied by the thing being discussed.

 3.  A BLSRDATC structure (field name suffix D in BLSRESSY and F in
 BLSRSASY) that supplies an attribute bundle including offset, length, and
 one-dimensional array characteristics.  The offset plus the logical
address
 yields the address of the first byte occupied by whatever is being
 discussed in the address space in the dumped system.  When you request a
 dump access function, the first phsical byte of interst lands in the first
 byte of the buffer that you provide.  That may require an interesting
USING
 operation to get proper addressability to what lands in the buffer.

 There are also some other fields that help explain why BLSRESSY (symbol
 table) and BLSRSASY (storage map) records are different.

 I hope that this helps.

 Bob Wright - MVS Service Aids

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


Fw: COBOL compile time Question

2006-02-03 Thread Bill Klein
I would try the doing ALL of the following (at the same time)

 - do the SQL preprocessor in a separate step (if the program actually HAS
EXEC SQL statements in it - otherwise use NOSQL)

 - Change to SIZE(MAX)

 - Change to NOSSRANGE

If - with those 3 changes - the compile still fails, I would contact IBM
support 

If those 3 changes allow you to compile, then I would see what combination
of them you could restore.

Alan C. Field [EMAIL PROTECTED] wrote in message
news:[EMAIL PROTECTED]
m...
 Thanks for all the responses.
 
 We tried 0M, we tried 64M, never considered 128M but we'll try. 
 
 As Roland suggested its looking for X'FA0'  4000dec below the line. 
 
 Available region below is about 10.5Mb 
 
 Here are the compiler options:
 
 PP 5655-G53 IBM ENTERPRISE COBOL FOR Z/OS  3.3.1 
 INVOCATION PARAMETERS:

TEST,LIB,NODYNAM,RENT,TRUNC(BIN),SQL(APOST,APOSTSQL),SIZE(8192K),BUFSIZE(2
048)
 OPTIONS IN EFFECT:
 NOADATA
   ADV
   APOST
   ARITH(COMPAT)
 NOAWO
   BUFSIZE(2048)
 NOCICS
   CODEPAGE(1140)
 NOCOMPILE(S)
 NOCURRENCY
   DATA(31)
 NODATEPROC
   DBCS
 NODECK
 NODIAGTRUNC
 NODLL
 NODUMP
 NODYNAM
 NOEXIT
 NOEXPORTALL
   FASTSRT
   FLAG(I,I)
 NOFLAGSTD
   INTDATE(ANSI)
   LANGUAGE(UE)
   LIB
   LINECOUNT(60)
 NOLIST
   MAP
 NONAME
   NSYMBOL(NATIONAL)
 NONUMBER
   NUMPROC(NOPFD)
   OBJECT
   OFFSET
 NOOPTIMIZE
   OUTDD(SYSOUT)
   PGMNAME(COMPAT)
   RENT
   RMODE(AUTO)
 NOSEQUENCE
   SIZE(8388608)
   SOURCE
   SPACE(1)
   SQL('APOST,APOSTSQL')
   SSRANGE
 NOTERM
   TEST(ALL,SYM,NOSEPARATE)
 NOTHREAD
   TRUNC(BIN)
 NOVBREF
   WORD(NOOO)
   XREF(SHORT)
   YEARWINDOW(1900)
 
 * STATISTICS FOR COBOL PROGRAM xx:
 *SOURCE RECORDS = 376159
 *DATA DIVISION STATEMENTS = 21589
 *PROCEDURE DIVISION STATEMENTS = 90916
 RETURN CODE 16

--
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 compile time Question

2006-02-03 Thread Bill Klein
I just thought of something else (see below)
 
 Alan C. Field [EMAIL PROTECTED] wrote in message 
 news:OF798E9B96.C165DDCC-ON8625710A.004C9571-8625710A.004CDEF
 [EMAIL PROTECTED]...
  Thanks for all the responses.
snip 
  * STATISTICS FOR COBOL PROGRAM xx:
  *SOURCE RECORDS = 376159
  *DATA DIVISION STATEMENTS = 21589
  *PROCEDURE DIVISION STATEMENTS = 90916
  RETURN CODE 16
 

If you are getting a RETURN CODE 16 message, then you SHOULD be seeing a

  U-level

IGY message somewhere.  Although these often (usually?) don't help much (and
basically tell you to contact IBM), can you find it in your output anywhere?
If so, does it give you any clue as to what problem it was trying to report?

Again, it is QUITE common to see this with SSRANGE and *very* large
programs, so I sure would recommend changing that before anything else.

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


What is ILBOSPI0 ?

2006-02-03 Thread Norman Hollander
Well I compiled one of my complex Cobol programs.  Actually it's just a
benchmark for different versions of Cobol.  It was OS/VS Cobol  5740-CB1
R2.4 from July 1, 1982.
Funny, the compiler thought it was 1906.  But then we knew it wasn't Y2K
compliant.
ILBOSPI0 (zero at the end) was in the load module. It came from the
SYS1.VSCOBLIB.
I specified PARM='STATE,COUNT,FLOW,SYMDMP'.

Hope this helps...

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


IBM Paper on Performance Impacts of Using Shared ICF CPs

2006-02-03 Thread Ed Gould
http://ibm.p.delivery.net/m/p/ibm/mto/reg.cgi? 
pcode=ZOSPE1JAN06Itcode=106AA09Emid=1094633140


Unfortunately you must register:(

Ed

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