Re: Why AUTHPGM?

2006-09-19 Thread Binyamin Dissen
On Mon, 18 Sep 2006 17:51:14 -0600 Paul Gilmartin [EMAIL PROTECTED]
wrote:

:I am coming to suspect that the reason RETRY fails when I
:invoke SMP/E from an EXEC under IKJEFT01 is that GIMSMP
:is absent from AUTHPGM NAMES in SYS1.PARMLIB(IKJTSOnn).
:I've put in a request to add it.

:But, now I'm curious.  Is there any good rationale that
:any program with AC=1 in an authorized library shouldn't
:run with APF authorization when CALLed from TSO.  Is the
:security provided by the isolated environment incomplete?
:What happens when a program with AC=0 is (inadvertently)
:entered in AUTHPGM names and CALLed?

The issue is that AC=1 programs expect to be called as job-step programs and
may not completely clean up after themselves (expecting the initiator to do
it).

It is a slight exposure, handled by specifying those programs that are known
to be well behaved.

:Could a systems programmer so inclined simply use
:AUTHPGM NAMES( * )?

--
Binyamin Dissen [EMAIL PROTECTED]
http://www.dissensoftware.com

Director, Dissen Software, Bar  Grill - Israel


Should you use the mailblocks package and expect a response from me,
you should preauthorize the dissensoftware.com domain.

I very rarely bother responding to challenge/response systems,
especially those from irresponsible companies.

--
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: Restrict Operator offline command

2006-09-19 Thread R.S.

Ted MacNEIL wrote:

anyone got any ideas on how to ensure it


does not happen again.

Public flogging?
Execution?
Hire new operators?


Well, I'd suggest something more humanitarian.
...no, not poison injection g
I would ask:
WHY the h.ll they do VARY ... OFFLINE ?
probably because it is needed (is it ???)
Probably it is a part of repetitive procedure, not ad hoc action.
Probably the addresses are not changed frequently.

SO, let them start IEFBR14 procedure with proper COMMAND statement.

// V -,OFFLINE
//STEP1 EXEC PGM=IEFBR14

the above is much less error prone.


Of course it is not a solution for random requests, but let's be 
honest: who is the requestor, why the requestor don't do it himself ?


My $0.02
--
Radoslaw Skorupka
Lodz, Poland

--
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: CA-Spool Banner Page

2006-09-19 Thread Cartwright, Dave
I've done a little more research on this and can now formulate a more
technical version of the question;
Can anyone supply me a sample CA-Spool exit ESFU009 that modifies the
LPR control file?

TIA
Dave


-Original Message-

*
This email is intended solely for the use of the individual to whom
it is addressed and may contain confidential and/or privileged 
material.  Any views or opinions presented are solely those of the 
author and do not necessarily represent those of AGCO.
If you are not the intended recipient, be advised that you have
received this email in error and that any use, dissemination, 
forwarding, printing or copying of this email is strictly prohibited.
 
Neither AGCO nor the sender accepts any responsibility for viruses and it is 
your
responsibility to scan and virus check the e-mail and its attachment(s) (if 
any).
*
From: Dave Cartwright [mailto:[EMAIL PROTECTED] 
Sent: 18 September 2006 11:09
To: IBM-MAIN@BAMA.UA.EDU
Cc: Cartwright, Dave
Subject: CA-Spool Banner Page

When CA-Spool sends a print to one of our Xerox IP printers it creates a

Banner Page that has the Userid of the CA-Spool task as its main header.

This has never worried us before, but now we are getting rinky-dink new 
Xerox printers that will respond to a RFID tag to output only that
User's 
print. Does anyone know how to get CA-Spool to create a Banner Page with

the Userid of the output, not of its own task?

--
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: Static versus dynamic linking

2006-09-19 Thread Clark Morris
On 18 Sep 2006 17:47:23 -0700, in bit.listserv.ibm-main you wrote:

Dynamic linking is by far the better way to go as a general rule of
thumb.  That is, when in doubt make it dynamic.

As always, there are a couple of gotchas.  One big one that nipped me
was retention of data.  It's been a while I seem to recall that static
subprograms retain information from call to call.  This makes it a
convenient place to store status information like the number of times
the routine had been called, report heading detail, etc.  That all goes
away when the module is dynamically linked.

Assuming that the subroutine is written in COBOL, unless the caller
deletes the subroutine (in COBOL issues a CANCEL for each call) or the
subroutine is coded PROGRAM IS INITIAL to cause being entered in
original state, data is retained between calls.  This is true for both
dynamic and static calls.


Keep the module as static only in situations where data retention
between calls is needed and you don't want to rewrite the calling
programs to retain the subprogram's status info.  In everything else,
dynamic is the better choice.  In things like CICS, it's practically a
necessity.

I have never seen an instance of system performance degradation that
could be tied directly to changing over to dynamic calls, especially
with WLM helping to smooth things over.  Of course, all shops are
different.  However unlikely, you could run into a situation where
changing a module to dynamic could bring your system to its knees.
Proceed cautiously by changing well known, low impact subprograms at
first until you get a good feel for it, then move on to the more risky
modules (like date and currency conversion routines) later on.

And like I said before, if you find an instance where static is the
better choice, keep it static.

Good luck.  Let us know how you make out.

--
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: VSAM replication to Oracle?

2006-09-19 Thread Timothy Sipples
Thanks for the possibilities. Likely I should have also added the
phrases cheap and only takes minutes to install with no programmer
involvment, plug and play, simple enough for an MCSE to understand
nasty, there John

Not too nasty, actually.  Those are typical requirements (cheap, near zero
time, etc.)  Not always possible, but almost always desired.

I would say that the main appeal of the event publishing technique is the
quick/no programming/plug-and-play characteristics.  Cheap should be pretty
quickly determinable, at least in price terms.  (Total cost is another
question and, as said so many times, can diverge wildly from price.)  There
will be more CPU instructions -- somehow you have to get the data from VSAM
into Oracle -- so I think that's unavoidable until IBM releases the zRCP (z
Reverse Charging Processor) which spits out one gold coin for each
1,000,000 instructions.  (Yes, IBM engineers are working on that. :-))
Seriously, if you're sensible about setting event trigger rules then it's
fine. (And CPU instructions aren't free on any platform. Folks just can't
measure them very well without SMF. :-))

So (architect hat on) I'd look at that technique as one of the options to
consider.

I can think of yet another way: transparency.  That is, for the VSAM files
that have content that must be replicated to Oracle, you migrate those
specific files to DB2 (using VSAM Transparency for example) then use any of
the replication solutions (IBM's II Q Rep as an example, and there are
others, even at IBM) to Oracle.  That path is probably worth exploring if
you're a DB2 shop (or want to be) and you have plans to store data in DB2
anyway.  Transparency means your applications aren't changed -- there's
that cheap/quick/no programmer part again.  The applications still think
they're talking VSAM.  A slight variation (semi-transparency) is that you
go ahead and EXEC SQL code the most I/O intense sections (for performance
reasons) and leave everything else alone -- a 90/10 type of approach.

If you only have to kick out a limited amount of data and could make
minimal code changes to get the job done, that's another way.  Oracle
Access Manager for CICS provides an EXEC SQL interface to allow CICS
programs to write directly to Oracle Database, to pick an example.  (OAM4C
is an Oracle product. Might be another Oracle z/OS network piece required
to access an offboard Oracle server, and maybe also Oracle's Pro*
precompiler, but that's the idea.) Not as simple/quick/no programmer for
the z/OS programmer, however.  And it's not very clean in the sense that
you'll have to be in the perpetual coding business when (usually when) the
business users decide they need something else kicked out for analysis next
month.

Yet another way, if the users want to run reporting tools directly against
VSAM data, is to get an ODBC/JDBC interface to VSAM.  All the popular
reporting tools can access data via ODBC or JDBC, even including simple
tools like Microsoft Access and Microsoft Excel.  (Others: Crystal Reports,
Cognos, Business Objects, IBI, etc., etc.)  In the IBM catalog WebSphere
IICF (Information Integrator Classic Federation) can do that, to pick an
example.  Another approach in the quick/no programming/plug-and-play zone,
I would think.  The workload impact will depend on the number of reports,
frequency of reports, ad hoc nature of the reports, etc.  That could get
very interesting very quickly if those reporting numbers are large.

Lots and lots of ways, each with pros/cons which will be situationally
dependent.

John, I think you're in Texas, so if you want to bounce ideas off a z
architect type then I'd suggest Ken Wilson in Austin.  Holler if you don't
know him and need contact info, although the 800-IBM-4-YOU number should
work with name and city.

- - - - -
Timothy Sipples
IBM Consulting Enterprise Software Architect
Specializing in Software Architectures Related to System z
Based in Tokyo, Serving IBM Japan and IBM Asia-Pacific
E-Mail: [EMAIL PROTECTED]
--
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: Unicode and DB2 and Enterprise COBOL

2006-09-19 Thread Jim McAlpine

OK,  I'm looking at the Enterprise COBOL V3R4 Customization Guide chapter
4.4 which has an example of the unicode requirements for both DB2 and COBOL
which contains the following statements -

CONVERSION 1140,1200; /* Latin-1 to UTF-16, *RECLM*   */
CONVERSION 1200,1140; /* UTF-16 to Latin-1, *RECLM*

CONVERSION 1140,1200,ER; /* Latin-1 to UTF-16, ER
CONVERSION 1200,1140,ER; /* UTF-16 to Latin-1, ER

and the following document -

http://publib.boulder.ibm.com/infocenter/dzichelp/v2r2/index.jsp?topic=/com.ibm.db2.doc.inst/bjnnmstr458.htm

confirms that COBOL uses the RECLM technique and DB2 uses the ER technique.
So far so good, except that if you try and run the sample above, there are
errors because the second 2 statements are duplicates of the first 2 ie you
can only have one conversion from 1140 to 1200 (obviously). Can anyone
explain how you are supposed to cater for both the DB2 and COBOL
requirements.  Is ER just a subset of RECLM. What do you code if you require
both.

Jim McAlpine






On 9/18/06, Brian Peterson [EMAIL PROTECTED] wrote:


According to IBMLink, the member CUNSISM6 was shipped in z/OS 1.4 by PTF
UA20691 for APAR OA12403.

Brian

On Mon, 18 Sep 2006 16:36:38 +0100, Jim McAlpine [EMAIL PROTECTED]
wrote:

Brian,  I didn't look to check at the time, but that member does not
exist
on my z/OS 1.4 system.  Can someone with a 1.4 system  please confirm or
otherwise that SYS1.SAMPLIB(CUNSISM6) exists on your system.

Jim McAlpine


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



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


EBCDIC to ASCII OPTCD=Q? (JCL)

2006-09-19 Thread Howard Brazee
The following is being copied from COMP.LANG.COBOL, with permission.

 

Gah.  Thanks much, Mr Klein; I am trying to do this entirely by 

utilities/JCL and I hope to avoid a dedicated COBOL program... if my
hopes 

are in vain then I'll start down this path.

 

 

All righty... I've been asked about having a job on an IBM mainframe 

(z/OS) produce ASCII output.

 

(To those who think to inquire 'Why don't you produce EBCDIC output and 

then have ftp translate it during transfer to the target?' my response
is 

'I have made this suggestion and someone who signs my timesheet
responded 

'That will be considered a possibility; right now you should look into 

making the ASCII files on the mainframe.''... and yes, all fields are 

either text or display numerics w/ sign leading separate.)

 

I recall - but my memory is, admittedly, porous - something about the
DCB 

parameter OPTCD=Q being able to accomplish this but it will require more


jiggery-pokery than I can come up with; when I code an IEBGENER or a 

DFSORT with DD statements like:

 

//INDD DDDISP=SHR,   

// DSN=INPUT.DATASET.INEBCDIC  

//OUTDDDD DSN=OUTPUT.DATASET.INASCII,

//DISP=(,CATLG,CATLG),   

//UNIT=TAPE,RETPD=0,

//DCB=(*.INDD,BUFNO=30,OPTCD=Q) 

 

... I get an ABEND (in the case of DFSORT it is IEC141I 013-70, a
problem 

with the OPEN macro... but the QW text for Return Code 70 (for V=IBM 

P=Z/OS SYSTEM MSGS R=V1R4 I=IEC141I) reads:

 

--begin quoted text:

 

An OPEN macro instruction was issued for a data set on magnetic tape. A 

conflict exists between LABEL parameters on the DD statement, and the 

DCBRECFM, DCBOPTCD, DCBBUFOF, and DCBUSASI fields, which give the 

appearance of mixed ASCII and EBCDIC attributes for the data set; or
TRTCH 

was specified for a 9-track tape.

 

Some examples of conflicts are that for AL tapes the BLKSIZE must be
less 

than 2048, RECFM=V,U and VB cannot be used. For details about AL tape 

restrictions see z/OS DFSMS: Using Magnetic Tapes . Note that most 

utilities (except for IEHINITT) do not support ASCII.

 

--end quoted text

 

(changing UNIT=TAPE,RETPD=0 to UNIT=SYSDA,SPACE=(TRK,(6000,500),RLSE)
does 

not change the error but the salient text for 70 then appears to be 'An 

OPEN macro instruction was issued for a data set not on magnetic tape.  

Either OPTCD=Q was specified, or OPEN was issued for an ISAM data set 

using QSAM.')

 

It appears obvious that under the conditions of my experiment DFSORT is 

falling into the category of 'most utilities'.  Might someone be so kind


as to point me towards a resource from which I may be able to glean a 

solution?

 

Thanks much.

 

(Oh... and among a bunch of Other Stuff a Google search for 'EBCDIC
ASCII 

translation jcl' (no ',  included) returns 

http://www.dbforums.com/archive/index.php/t-327313.html ; this informs, 

among other things, that 'answering a question with a question is no 

answer at all'... it's on the Web, it's gotta be right, right?)

 

DD


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


RULE OF THUMB ?

2006-09-19 Thread John Dawes
Just that I understand correctly the following
   
  If I define the vtoc (below) as
   
  VTOC(0,1,29) -
  INDEX(2,0,45) 
   
  The VTOC starts at cylinder 0 for 29 tracks
  The INDEX starts at cylinder 2 for 45 tracks. 
   
  If for some reason the INDEX was set to 5,0,45.  Would we have a problem with 
response time?  Is there a set rule that the INDEX must be placed after the 
VTOC?


-
On Yahoo!7
  Messenger: Make free PC-to-PC calls to your friends overseas. 

--
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: IEHLIST LISTPDS in an SMS environment

2006-09-19 Thread Bruce Black


With hardly any apology  to John G.; things such as this make it
real hard for me to take the diachronic view.
Gee, Gil, if you are going to use words like diachronic you should at 
least provide a dictionary link gr


http://www.onelook.com/?w=diachronic+ls=a


--
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: RULE OF THUMB ?

2006-09-19 Thread R.S.

John Dawes wrote:


Just that I understand correctly the following
   
  If I define the vtoc (below) as
   
  VTOC(0,1,29) -
  INDEX(2,0,45) 
   
  The VTOC starts at cylinder 0 for 29 tracks
  The INDEX starts at cylinder 2 for 45 tracks. 
   
  If for some reason the INDEX was set to 5,0,45.  Would we have a

problem with response time?  Is there a set rule that the INDEX must be
placed after the VTOC?


Currently there is absolutely no ROT regarding physical placement of 
VTOC/VTOCIX/VVDS structures. Maybe except keeping everything at the 
beginning of plate - just to have free space unfragmented. 3390 is pure 
virtual thing nowadays.


Size can be discussed, especially if you use different models. Otherwise 
it is a little bit pointless - you could save few hundreds cylinders 
which is nothing.
IMHO the best ROT is one size for every model, with possible exception 
for system volumes (SPOOL, PAGE).


KISS (Keep It Simple)


My $0.02
--
Radoslaw Skorupka
Lodz, Poland

--
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: RULE OF THUMB ?

2006-09-19 Thread Bruce Black


 If I define the vtoc (below) as
   
  VTOC(0,1,29) -
  INDEX(2,0,45) 
   
  The VTOC starts at cylinder 0 for 29 tracks
  The INDEX starts at cylinder 2 for 45 tracks. 
   
  If for some reason the INDEX was set to 5,0,45.  Would we have a problem with response time?  Is there a set rule that the INDEX must be placed after the VTOC?
First, the VTOCIX in your example is much too large.  It only needs to 
be a fraction of the size of the VTOC itself, since it is just an index 
into the real VTOC.   The ICKDSF manual has some guidelines for sizing 
the VTOC/VTOCIX, but there is no penalty if the VTOCIX is too large, so 
with a 2 cyl VTOC, I would make the VTOCIX 1 cylinder INDEX(2,0,15).


As for placement, back in the days when disk head movement and seek time 
were important, it made sense to put the VTOCIX right after the VTOC (or 
even right before) since searching for a dataset always involved a 
lookup in the VTOCIX then a read to the VTOC.   This minimized seek 
time.   Today seek time is minimally important, but it still makes sense 
to put them together to maximize free space on the volume. 


--
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: EBCDIC to ASCII OPTCD=Q? (JCL)

2006-09-19 Thread Jim McAlpine

Howard, where is your LABEL parameter on the output tape DD statement.  IIRC
you need to specify LABEL=(1,AL) or somesuch.

Jim McAlpine

On 9/19/06, Howard Brazee [EMAIL PROTECTED] wrote:


The following is being copied from COMP.LANG.COBOL, with permission.



Gah.  Thanks much, Mr Klein; I am trying to do this entirely by

utilities/JCL and I hope to avoid a dedicated COBOL program... if my
hopes

are in vain then I'll start down this path.








--
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: EBCDIC to ASCII OPTCD=Q? (JCL)

2006-09-19 Thread John Kington
Howard,

Try adding LABEL=(1,AL) or LABEL=(1,NL). I think you are getting the
default of 1,SL which
does not work with OPTCD=Q.

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


Re: EBCDIC to ASCII OPTCD=Q? (JCL)

2006-09-19 Thread Bruce Black


Try adding LABEL=(1,AL) or LABEL=(1,NL). I think you are getting the
default of 1,SL which
does not work with OPTCD=Q.
That is correct.  This is from the Macro Instrucionns for Data Sets 
manual; see the last paragraph and note that LABEL=(,AL) assumes OPTCD=Q


Q 
   requests conversion of the tape records between what is stored on 
   tape and what is supplied from/to the problem program. For input  
   requests, conversion is done after the data is read from tape. For
   output requests, conversion is done just before the record is 
   written to tape.  
 
   The Q option implies that the character representation of the data
   on tape differs from that seen by the problem program. Data   
   management converts records according to one of the following 
   techniques:   
 
   O   CCSID Conversion  
 
   If CCSIDs are supplied from any source for ISO/ANSI V4 tapes, 
   records are converted between the CCSID which represents the  
   data on tape and the CCSID as seen by the problem program. You
   can also prevent conversion by supplying a special CCSID. 
 
   O   Default Character Conversion  
 
   If you are using non-ISO/ANSI V4 tapes or if CCSIDs are not   
   supplied by any source, data management converts the records  
   between ASCII code (which represents the data on tape) to 
   EBCDIC code (which is seen by the problem program) using  
   specific tables defined for this default character conversion.
 
 
   Refer to z/OS DFSMS: Using Data Sets, SC26-7410, for a complete   
   description of CCSID conversion and default character conversion. 
 
   Refer to z/OS DFSMS: Using Magnetic Tapes for more information
   about ISO/ANSI labels.
 
   Q is supported only for a magnetic tape that does not have IBM
   standard labels. If the tape has ISO/ANSI/FIPS labels 
   (LABEL=(,AL)), the system assumes OPTCD=Q.


--
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: Why AUTHPGM?

2006-09-19 Thread Paul Gilmartin
In a recent note, Binyamin Dissen said:

 Date: Tue, 19 Sep 2006 10:34:18 +0300
 
 On Mon, 18 Sep 2006 17:51:14 -0600 Paul Gilmartin [EMAIL PROTECTED]
 wrote:
 
 :I am coming to suspect that the reason RETRY fails when I
 :invoke SMP/E from an EXEC under IKJEFT01 is that GIMSMP
 :is absent from AUTHPGM NAMES in SYS1.PARMLIB(IKJTSOnn).
 :I've put in a request to add it.
 
 :But, now I'm curious.  Is there any good rationale that
 :any program with AC=1 in an authorized library shouldn't
 :run with APF authorization when CALLed from TSO.  Is the
 :security provided by the isolated environment incomplete?
 :What happens when a program with AC=0 is (inadvertently)
 :entered in AUTHPGM names and CALLed?
 
 The issue is that AC=1 programs expect to be called as job-step programs and
 may not completely clean up after themselves (expecting the initiator to do
 it).
 
That raises more questions than it answers:

o How justified is that expectation?  Don't numerous authorized
  utilities and authorized user and vendor programs invoke other
  authorized utilities?

o Isn't it equally true that AC=0 programs may fail to clean up
  after themselves?

o When the TMP ATTACHes an AC=0 program (presumably in the non-authorized
  leg) does the TMP clean up after it?  If so, why doesn't the
  TMP likewise clean up after programs run in the isolated environment?

o Does IBM publish a list of IBM programs which are suitable for
  naming in AUTHPGM NAMES, or is the presmption that only programs
  included there as it is distributed by IBM are eligible.

  My immediate concern is with SMP/E.  I've been CALLing it but
  enduring the failure of RETRY and omitting WAIT.  And I know
  SMP/E fails to clean up -- I must do some FREEs before the
  next CALL, or it runs with bogus DDNAMEs.  (I tried PMRing this;
  IBM couldn't reproduce it, nor could I in a suitably small test
  case though it happens regularly in my production.  I continue
  to do OUTTRAP LISTALC, then FREE selected DDNAMEs)

 It is a slight exposure, handled by specifying those programs that are known
 to be well behaved.
 
 :Could a systems programmer so inclined simply use
 :AUTHPGM NAMES( * )?
 
Or the like?

-- 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: RULE OF THUMB ?

2006-09-19 Thread John Kington
John,

I now place the vtoc, vtoc index and vvds at the beginning of the logical
volume. I size the vtoc and vvds
based on the expected number of datasets that will be allocated to the
volume. The size of the index is
based on the size of the vtoc. The only reason that I place all together at
the beginning is to avoid
creating a fragment that may never be used. There is no performance penalty
(or gain) for starting
the vtoc at a certain cylinder address since we now deal with are emulated
devices.
Regards,
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


BMC control-m advanced FTP

2006-09-19 Thread Pommier, Rex R.
 Hi list,

Does anybody out there use BMC's Control-M Advanced FTP product?  If so,
can you tell me just what the product does and what impact it has on
replacing standard FTP?  I'm being pushed by mgmt to replace our FTP
with this and I can't figure out at first look just what it is that
makes this software necessary in my shop.

Thanks.

Rex

--
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: EBCDIC to ASCII OPTCD=Q? (JCL)

2006-09-19 Thread Richard Tsujimoto
IIRC, even if you code LABEL=(1,NL), OPEN checks to see if a label does in 
fact exist.  And, if it does, OPEN will do some verfication of the 
content, which could still lead to problems.  It's been a long time since 
I messed with tape labels, so I could be mistaken.



John Kington [EMAIL PROTECTED] 
Sent by: IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU
09/19/2006 10:21 AM
Please respond to
IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Re: EBCDIC to ASCII OPTCD=Q? (JCL)






Howard,

Try adding LABEL=(1,AL) or LABEL=(1,NL). I think you are getting the
default of 1,SL which
does not work with OPTCD=Q.

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


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


Re: Why AUTHPGM?

2006-09-19 Thread Binyamin Dissen
On Tue, 19 Sep 2006 08:32:27 -0600 Paul Gilmartin [EMAIL PROTECTED]
wrote:

:In a recent note, Binyamin Dissen said:

: Date: Tue, 19 Sep 2006 10:34:18 +0300
 
: On Mon, 18 Sep 2006 17:51:14 -0600 Paul Gilmartin [EMAIL PROTECTED]
: wrote:
 
: :I am coming to suspect that the reason RETRY fails when I
: :invoke SMP/E from an EXEC under IKJEFT01 is that GIMSMP
: :is absent from AUTHPGM NAMES in SYS1.PARMLIB(IKJTSOnn).
: :I've put in a request to add it.
 
: :But, now I'm curious.  Is there any good rationale that
: :any program with AC=1 in an authorized library shouldn't
: :run with APF authorization when CALLed from TSO.  Is the
: :security provided by the isolated environment incomplete?
: :What happens when a program with AC=0 is (inadvertently)
: :entered in AUTHPGM names and CALLed?
 
: The issue is that AC=1 programs expect to be called as job-step programs and
: may not completely clean up after themselves (expecting the initiator to do
: it).
 
:That raises more questions than it answers:

:o How justified is that expectation?  Don't numerous authorized
:  utilities and authorized user and vendor programs invoke other
:  authorized utilities?

Yes, but they are prevented from loading programs from non-APF libraries.

:o Isn't it equally true that AC=0 programs may fail to clean up
:  after themselves?

Yes, but they cannot leave things around that may cause an exposure.

:o When the TMP ATTACHes an AC=0 program (presumably in the non-authorized
:  leg) does the TMP clean up after it?  If so, why doesn't the
:  TMP likewise clean up after programs run in the isolated environment?

An authorized program has the ability to leave things around that are
connected to higher level tasks or that could cause an exposure.

:o Does IBM publish a list of IBM programs which are suitable for
:  naming in AUTHPGM NAMES, or is the presmption that only programs
:  included there as it is distributed by IBM are eligible.

That should be the default.

:  My immediate concern is with SMP/E.  I've been CALLing it but
:  enduring the failure of RETRY and omitting WAIT.  And I know
:  SMP/E fails to clean up -- I must do some FREEs before the
:  next CALL, or it runs with bogus DDNAMEs.  (I tried PMRing this;
:  IBM couldn't reproduce it, nor could I in a suitably small test
:  case though it happens regularly in my production.  I continue
:  to do OUTTRAP LISTALC, then FREE selected DDNAMEs)

I do not believe that SMP/E leaves PC routines or SVC bypasses around.

: It is a slight exposure, handled by specifying those programs that are known
: to be well behaved.
 
: :Could a systems programmer so inclined simply use
: :AUTHPGM NAMES( * )?
 
:Or the like?

Not aware of any exit that will allow this.

--
Binyamin Dissen [EMAIL PROTECTED]
http://www.dissensoftware.com

Director, Dissen Software, Bar  Grill - Israel


Should you use the mailblocks package and expect a response from me,
you should preauthorize the dissensoftware.com domain.

I very rarely bother responding to challenge/response systems,
especially those from irresponsible companies.

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


Re: Why AUTHPGM?

2006-09-19 Thread Paul Gilmartin
In a recent note, Binyamin Dissen said:

 Date: Tue, 19 Sep 2006 17:53:46 +0300
 
 :o Isn't it equally true that AC=0 programs may fail to clean up
 :  after themselves?
 
 Yes, but they cannot leave things around that may cause an exposure.
 
I see.

I believe a better design would mark the programs themselves, such
as AC=2 to indicate APF authorized _and_ TMP-clean rather than
burdening the administrators with maintaining YA list, such as the
ISV entries I see in our AUTHPGM NAMES.

-- 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: EBCDIC to ASCII OPTCD=Q? (JCL)

2006-09-19 Thread Bruce Black


even if you code LABEL=(1,NL), OPEN checks to see if a label does in 
fact exist.  And, if it does, OPEN will do some verfication of the 
content, which could still lead to problems.
If you say NL but the tape that is mounted has labels (standard or ANSI) 
the mount is rejected


--
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: Restrict Operator offline command

2006-09-19 Thread Don Imbriale
I don't think it's a question of lack of sense of humour, but rather the 
excessive noise on this list.  Seemingly every thread deteriorates into 
discussions of ancient hardware/software or semantics and grammar or 
politics or crime.  Hit em up side the head with a bat adds little value 
to the discussion.  So somebody tries to steer it back to relevancy and 
gets chastized for it.  Lose-lose all around.

Don Imbriale

On Tue, 19 Sep 2006 03:46:18 +, Ted MacNEIL [EMAIL PROTECTED] wrote:

The OP talked about an easy-to-make finger check.  If you're going to 
take drastic measures to punish such mistakes:

Ya'no!
Nobody has a sense of humour anymore!


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


Re: Why AUTHPGM?

2006-09-19 Thread Charles Mills
I think the rule is good programmers clean up after themselves; bad ones
don't - AC=1 is irrelevant.

There is only a very weak correlation between AC=1 and being a jobstep
program. Any programmer who assumes that correlation is strong is I think by
definition bad. Anyone who says my program will only ever be run as a
jobstep program is either (a.) doing a bad job of designing the program,
i.e., designing with limited usefulness; (b.) lacking in vision; and/or (c.)
too lazy or rushed to code de-allocates.

Charles

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Paul Gilmartin
Sent: Tuesday, September 19, 2006 7:32 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Why AUTHPGM?


In a recent note, Binyamin Dissen said:

 Date: Tue, 19 Sep 2006 10:34:18 +0300
 
 On Mon, 18 Sep 2006 17:51:14 -0600 Paul Gilmartin
[EMAIL PROTECTED]
 wrote:
 
 :I am coming to suspect that the reason RETRY fails when I
 :invoke SMP/E from an EXEC under IKJEFT01 is that GIMSMP
 :is absent from AUTHPGM NAMES in SYS1.PARMLIB(IKJTSOnn).
 :I've put in a request to add it.
 
 :But, now I'm curious.  Is there any good rationale that
 :any program with AC=1 in an authorized library shouldn't
 :run with APF authorization when CALLed from TSO.  Is the
 :security provided by the isolated environment incomplete?
 :What happens when a program with AC=0 is (inadvertently)
 :entered in AUTHPGM names and CALLed?
 
 The issue is that AC=1 programs expect to be called as job-step programs
and
 may not completely clean up after themselves (expecting the initiator to
do
 it).
 
That raises more questions than it answers:

o How justified is that expectation?  Don't numerous authorized
  utilities and authorized user and vendor programs invoke other
  authorized utilities?

o Isn't it equally true that AC=0 programs may fail to clean up
  after themselves?

--
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: EBCDIC to ASCII OPTCD=Q? (JCL)

2006-09-19 Thread Richard Tsujimoto
What happens if the tape label is AL and you code LABEL=(1,NL)?




Bruce Black [EMAIL PROTECTED] 
Sent by: IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU
09/19/2006 11:15 AM
Please respond to
IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU


To
IBM-MAIN@BAMA.UA.EDU
cc

Subject
Re: EBCDIC to ASCII OPTCD=Q? (JCL)







 even if you code LABEL=(1,NL), OPEN checks to see if a label does in 
 fact exist.  And, if it does, OPEN will do some verfication of the 
 content, which could still lead to problems.
If you say NL but the tape that is mounted has labels (standard or ANSI) 
the mount is rejected

-- 
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: Why AUTHPGM?

2006-09-19 Thread Rob Scott
Paul,

Personally I am a great fan of IKJTSOxx *and* the fact that TSO CALL
de-authorizes the called program by default. 

Is it that much of a pain? 

You only need to update it when installing software and IBM even provide
a dynamic update facility. 
 


Rob Scott
Rocket Software, Inc
275 Grove Street
Newton, MA 02466
617-614-2305
[EMAIL PROTECTED]
http://www.rs.com/portfolio/mxi/
 

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Paul Gilmartin
Sent: 19 September 2006 11:12
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Why AUTHPGM?

In a recent note, Binyamin Dissen said:

 Date: Tue, 19 Sep 2006 17:53:46 +0300
 
 :o Isn't it equally true that AC=0 programs may fail to clean up :  
 after themselves?
 
 Yes, but they cannot leave things around that may cause an exposure.
 
I see.

I believe a better design would mark the programs themselves, such as
AC=2 to indicate APF authorized _and_ TMP-clean rather than burdening
the administrators with maintaining YA list, such as the ISV entries I
see in our AUTHPGM NAMES.

-- 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: Restrict Operator offline command

2006-09-19 Thread Ceruti, Gerard G
Thanks to all who replied , we look into cmdx.

Regards
Gerard Ceruti 

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Don Imbriale
Sent: 19 September 2006 05:15 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Restrict Operator offline command

I don't think it's a question of lack of sense of humour, but rather the

excessive noise on this list.  Seemingly every thread deteriorates into 
discussions of ancient hardware/software or semantics and grammar or 
politics or crime.  Hit em up side the head with a bat adds little
value 
to the discussion.  So somebody tries to steer it back to relevancy and 
gets chastized for it.  Lose-lose all around.

Don Imbriale

On Tue, 19 Sep 2006 03:46:18 +, Ted MacNEIL [EMAIL PROTECTED]
wrote:

The OP talked about an easy-to-make finger check.  If you're going to 
take drastic measures to punish such mistakes:

Ya'no!
Nobody has a sense of humour anymore!


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

Standard Bank Disclaimer and Confidentiality Note

This e-mail, its attachments and any rights attaching hereto are, unless the 
context clearly indicates otherwise, the property of Standard Bank Group Limited
and/or its subsidiaries (the Group). It is confidential, private and intended 
for the addressee only. Should you not be the addressee and receive this e-mail 
by
mistake, kindly notify the sender, and delete this e-mail, immediately and do 
not disclose or use same in any manner whatsoever. Views and opinions
expressed in this e-mail are those of the sender unless clearly stated as those 
of the Group. The Group accepts no liability whatsoever for any loss or
damages whatsoever and howsoever incurred, or suffered, resulting, or arising, 
from the use of this email or its attachments. The Group does not warrant the 
integrity
of this e-mail nor that it is free of errors, viruses, interception or 
interference. Licensed divisions of the Standard Bank Group are authorised 
financial services providers
in terms of the Financial Advisory and Intermediary Services Act, No 37 of 2002 
(FAIS).
For information about the Standard Bank Group Limited visit our website 
http://www.standardbank.co.za
___

--
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: EBCDIC to ASCII OPTCD=Q? (JCL)

2006-09-19 Thread Bruce Black


What happens if the tape label is AL and you code LABEL=(1,NL)?
As I said, if the tape has ANSI labels, and you code NL, the mount is 
rejected.


--
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: CA-Spool Banner Page

2006-09-19 Thread Arthur T.
On 18 Sep 2006 03:09:04 -0700, in bit.listserv.ibm-main 
(Message-ID:[EMAIL PROTECTED]) 
[EMAIL PROTECTED] (Dave Cartwright) wrote:


we are getting rinky-dink new Xerox printers that will 
respond to a RFID tag to output only that User's print.


 So, if you're printing a 200-page report, you have to 
be near the printer during the whole print time?  What an 
appalling waste!  (Or, do you have to merely interrupt 
what you're doing long enough to be near the printer as it 
starts printing your output?)


 I suspect that this was done to try to improve 
security.  I also suspect that it will have the opposite 
effect.  People will leave their ID cards on the printer or 
give them to someone else.  (Hey, Dave, since you're going 
to the printer, take my ID and bring back my output, too.)


 Please tell me if I'm wrong in any of my 
assumptions.  This is one case where I'd prefer to find out 
I'm wrong.  Maybe you're each getting your own printer in 
your own cubicle, so it's not a problem?



--
I cannot receive mail at the address this was sent from.
To reply directly, send to ar23hur at intergate dot 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: CA-Spool Banner Page

2006-09-19 Thread Richard Tsujimoto
I suspect that this was done to try to improve 
security.  I also suspect that it will have the opposite 
effect. 

I have no idea if what you fear will come to pass, but it sure sounds 
funny.  It's
reminiscent of the days when you (or a clerk) down to the output room to 
pickup the
printouts.  The surly person in the window would ask whaddya want? and 
eventually
toss you the output.  Only, in your case, it's a virtual person in the 
output window.

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


Zos 1.7 Exits

2006-09-19 Thread Nir Eliyaho
Hi List.

We are migrating from Zos 1.4 to Zos 1.7 and 
now we have encountered the jes2 exits problem.

Our exit 3 is 20 years old but I have managed to
migrate it. IBM seperated exit 3 into two exits,
exit 3 is activated for jobs received via NJE and 
exit53 is activated for jobs received from internal reader.

Exit53 run in the user environment and like so needs to be
rent. Since our exit is very big and very old I'm not
intersted in making it rent. 

Exit3 dosen't need to be rent (it runs under jes main task)
so I thought that exit53 will call to exit3 which contain 
our exit code(with minor migration changes) using the $call macro.

Is it possible to call from a user env to jes2 env?
Does any one have an exaple he can post me?

Thanks in advanced 
Nir.

--
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: Zos 1.7 Exits

2006-09-19 Thread Thompson, Steve (SCI TW)
-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Nir Eliyaho
Sent: Tuesday, September 19, 2006 10:53 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Zos 1.7 Exits

Hi List.

We are migrating from Zos 1.4 to Zos 1.7 and 
now we have encountered the jes2 exits problem.

Our exit 3 is 20 years old but I have managed to
migrate it. IBM seperated exit 3 into two exits,
exit 3 is activated for jobs received via NJE and 
exit53 is activated for jobs received from internal reader.

Exit53 run in the user environment and like so needs to be
rent. Since our exit is very big and very old I'm not
intersted in making it rent. 
snip

Size and age are not a problem with RENT. I have worked on many things
that are LARGE and OLD and are RENT (and have been RENT for a long time
for a good reason). I currently don't work on JES(2 or 3) exits, but I
have in the past so I am not competent to speak to EXIT3 or EXIT53
specifically at this point.

However, from general knowledge, I suggest you take your exit and
assemble it using the RENT option and see what falls out if anything. If
it passes that test, then I suggest you try it as RENT in a test LPAR.

If it is currently linked as REUSe, only one copy will get loaded, but
if it is actually modifying itself, things could get ugly. And they
could get ugly in weird ways forcing an IPL or corrupted output, or
both.

Arrg. Thar ye have it, matey. A nickels worth of free advice.

Later,
Steve Thompson

--
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: static versus dynamic linking

2006-09-19 Thread john gilmore

Clark Morris wrote:



Assuming that the subroutine is written in COBOL, unless the caller
deletes the subroutine (in COBOL issues a CANCEL for each call) or the
subroutine is coded PROGRAM IS INITIAL to cause being entered in
original state, data is retained between calls.  This is true for both
dynamic and static calls.



Data are retained between calls if they are declared in a COBOL program's 
WORKING-STORAGE section, i.e., if their storage class is static in the 
terminology of PL/I and C; and they are not  retained between calls if 
they are declared in that COBOL program's LOCAL-STORAGE section, i.e., if 
their storage class is automatic.


The other advice proffered in this thread has reflected other confusions, 
misunderstandings, and even radical misconceptions, so many of them as to 
make it worth little.


John Gilmore
Ashland, MA 01721-1817
USA

_
Get today's hot entertainment gossip  http://movies.msn.com/movies/hotgossip

--
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: VSAM replication to Oracle?

2006-09-19 Thread McKown, John
 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:[EMAIL PROTECTED] On Behalf Of Timothy Sipples
 Sent: Tuesday, September 19, 2006 7:48 AM
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: Re: VSAM replication to Oracle?
 
 

snip

 
 I would say that the main appeal of the event publishing 
 technique is the
 quick/no programming/plug-and-play characteristics.  Cheap 
 should be pretty
 quickly determinable, at least in price terms.  (Total cost is another
 question and, as said so many times, can diverge wildly from 
 price.)  There
 will be more CPU instructions -- somehow you have to get the 
 data from VSAM
 into Oracle -- so I think that's unavoidable until IBM 
 releases the zRCP (z
 Reverse Charging Processor) which spits out one gold coin for each
 1,000,000 instructions.  (Yes, IBM engineers are working on that. :-))
 Seriously, if you're sensible about setting event trigger 
 rules then it's
 fine. (And CPU instructions aren't free on any platform. 
 Folks just can't
 measure them very well without SMF. :-))
 
 So (architect hat on) I'd look at that technique as one of 
 the options to
 consider.
 
 I can think of yet another way: transparency.  That is, for 
 the VSAM files
 that have content that must be replicated to Oracle, you migrate those
 specific files to DB2 (using VSAM Transparency for example) 
 then use any of
 the replication solutions (IBM's II Q Rep as an example, and there are
 others, even at IBM) to Oracle.  That path is probably worth 
 exploring if
 you're a DB2 shop (or want to be) and you have plans to store 
 data in DB2
 anyway.  Transparency means your applications aren't changed 
 -- there's
 that cheap/quick/no programmer part again.  The applications 
 still think
 they're talking VSAM.  A slight variation 
 (semi-transparency) is that you
 go ahead and EXEC SQL code the most I/O intense sections (for 
 performance
 reasons) and leave everything else alone -- a 90/10 type of approach.
 
 If you only have to kick out a limited amount of data and could make
 minimal code changes to get the job done, that's another way.  Oracle
 Access Manager for CICS provides an EXEC SQL interface to allow CICS
 programs to write directly to Oracle Database, to pick an 
 example.  (OAM4C
 is an Oracle product. Might be another Oracle z/OS network 
 piece required
 to access an offboard Oracle server, and maybe also Oracle's Pro*
 precompiler, but that's the idea.) Not as simple/quick/no 
 programmer for
 the z/OS programmer, however.  And it's not very clean in the 
 sense that
 you'll have to be in the perpetual coding business when 
 (usually when) the
 business users decide they need something else kicked out for 
 analysis next
 month.
 
 Yet another way, if the users want to run reporting tools 
 directly against
 VSAM data, is to get an ODBC/JDBC interface to VSAM.  All the popular
 reporting tools can access data via ODBC or JDBC, even 
 including simple
 tools like Microsoft Access and Microsoft Excel.  (Others: 
 Crystal Reports,
 Cognos, Business Objects, IBI, etc., etc.)  In the IBM 
 catalog WebSphere
 IICF (Information Integrator Classic Federation) can do that, 
 to pick an
 example.  Another approach in the quick/no 
 programming/plug-and-play zone,
 I would think.  The workload impact will depend on the number 
 of reports,
 frequency of reports, ad hoc nature of the reports, etc.  
 That could get
 very interesting very quickly if those reporting numbers are large.
 
 Lots and lots of ways, each with pros/cons which will be situationally
 dependent.
 
 John, I think you're in Texas, so if you want to bounce ideas off a z
 architect type then I'd suggest Ken Wilson in Austin.  Holler 
 if you don't
 know him and need contact info, although the 800-IBM-4-YOU 
 number should
 work with name and city.
 
 - - - - -
 Timothy Sipples

Thanks for all the ideas and the offer. I'm not in a position to take
you up on the offer due to the fact that it would likely land me in hot
water (poached sysprog, anybody?).

I wish DB2 were an option. However, between doctor visits, I'm
installing Oracle on z/OS right now. No choice. It was literally no
charge due to our Oracle license. I don't know what that license costs
us, but it truly is unlimited WRT where we can install an Oracle
server. 

I do plan to use Oracle's AM4CICS. But directing data directly to a
remote Oracle database will require programming. And the usual question
of what to do if the remote server is down.


--
John McKown
Senior Systems Programmer
HealthMarkets
Keeping the Promise of Affordable Coverage
Administrative Services Group
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, 

QUIESCE / RESTART

2006-09-19 Thread Terry BRuns
Does anyone have recent experience with performing a QUIESCE, followed by 
a PSW Restart? Can this be done on a box running in LPAR mode without 
affecting the other images, is quiesce merely a relic of the past?

The reason I ask is because we had a surprise Quiesce performed on our 
main production lpar last week. One of the DBA's was running some DB2 
QUIESCE TABLESPACE in batch. She was also converting her JCL from using 
SYSIN DD * to SYSIN DD DATA,DLM='##'. She inadvertantly commented out her 
control cards...or so she thought! She only had a //  in front of her 
QUIESCE TABLESPACE. Little did she know that our JES2 parms allow MVS 
commands of this format to be issued. The rest, as they say, is history!

We IPL'd the system immediately, but later on I read that a quiesced system 
can be brought back via a PSW Restart. Can anyone comment on this? Thanks!

Terry Bruns

--
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: QUIESCE / RESTART

2006-09-19 Thread McKown, John
 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:[EMAIL PROTECTED] On Behalf Of Terry BRuns
 Sent: Tuesday, September 19, 2006 12:17 PM
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: QUIESCE / RESTART
 
 
 Does anyone have recent experience with performing a QUIESCE, 
 followed by 
 a PSW Restart? Can this be done on a box running in LPAR mode without 
 affecting the other images, is quiesce merely a relic of the past?
 

I have done the z/OS QUIESCE command on our test system, followed by a
PSW RESTART on the HMC ICON with no particular ill effects. However, it
can result in lost TCPIP sessions and VTAM sessions. In addition,
although the QUIESCE command does wait for all outstanding DASD and Tape
I/O to end before actually loading the WAIT PSW, it does not concern
itself with outstand RESERVEs against DASD volumes. So this can lead to
lock outs with other systems.

--
John McKown
Senior Systems Programmer
HealthMarkets
Keeping the Promise of Affordable Coverage
Administrative Services Group
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: QUIESCE / RESTART

2006-09-19 Thread Gibney, Dave
   It still works, but some applications react poorly to a suspension of
time.
   We've done this to our sandboxes when production needed the cycles.


Dave Gibney  [EMAIL PROTECTED]
System Programmer(509) 335-7359
Information Technology
Washington State University
Pullman, WA 99164-1222

 -Original Message-
 From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
 Behalf Of Terry BRuns
 Sent: Tuesday, September 19, 2006 10:17 AM
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: QUIESCE / RESTART
 
 Does anyone have recent experience with performing a QUIESCE, followed
by
 a PSW Restart? Can this be done on a box running in LPAR mode without
 affecting the other images, is quiesce merely a relic of the past?
 
 The reason I ask is because we had a surprise Quiesce performed on
our
 main production lpar last week. One of the DBA's was running some DB2
 QUIESCE TABLESPACE in batch. She was also converting her JCL from
using
 SYSIN DD * to SYSIN DD DATA,DLM='##'. She inadvertantly commented out
her
 control cards...or so she thought! She only had a //  in front of
her
 QUIESCE TABLESPACE. Little did she know that our JES2 parms allow MVS
 commands of this format to be issued. The rest, as they say, is
history!
 
 We IPL'd the system immediately, but later on I read that a quiesced
 system
 can be brought back via a PSW Restart. Can anyone comment on this?
Thanks!
 
 Terry Bruns
 
 --
 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: RULE OF THUMB ?

2006-09-19 Thread Shmuel Metz (Seymour J.)
In [EMAIL PROTECTED], on
09/20/2006
   at 12:05 AM, John Dawes [EMAIL PROTECTED] said:

  The VTOC starts at cylinder 0 for 29 tracks
  The INDEX starts at cylinder 2 for 45 tracks. 
   
  If for some reason the INDEX was set to 5,0,45.  Would we have a
problem with response time?

You might have a problem with fragmentation, but if 3 cylinders is
enough to make a difference then you need a larger volume.
 
-- 
 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: VSAM space allocation in KB, MB, and RECORDS

2006-09-19 Thread Shmuel Metz (Seymour J.)
In [EMAIL PROTECTED], on 09/17/2006
   at 03:33 PM, john gilmore [EMAIL PROTECTED] said:

In 1964 when JCL was introduced most programmers still had
engineering and  scientific educations, and this approximate
equivalence was unproblematic.   Context was sufficient to make the
necessary distinctions clear: No one  supposed that a kilometer might
contain 1024 meters (instead of 1000) or  that a kilobyte might
contain 1000 bytes (instead of 1024).

In 1964 people used powers of 10 for tape and disk capacities, not
powers of two. They used powers of two for memory sizes. Your argument
might justify the misuse of the SI units in REGION, but not the later
misuse for DASD space.

No one supposed that a kilometer might contain 1024 meters (instead
 of 1000) or  that a kilobyte might contain 1000 bytes (instead of
1024).

By 1968 people were using K for 512 ('100'8), which at the time I
considered truly obscene.
 
-- 
 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: Why AUTHPGM?

2006-09-19 Thread Shmuel Metz (Seymour J.)
In [EMAIL PROTECTED], on 09/18/2006
   at 05:51 PM, Paul Gilmartin [EMAIL PROTECTED] said:

But, now I'm curious.  Is there any good rationale that
any program with AC=1 in an authorized library shouldn't run with APF
authorization when CALLed from TSO.

Is there any reason why it should? It's easy enough for management to
add programs if they wish to do so.

Now, there might be a business case for a requirement to allow
specifying a program name of * as a wildcard in IKJTSOxx. But I
suspect that many shops would prohibit its use.

What happens when a program with AC=0 is (inadvertently) entered in
AUTHPGM names and CALLed?

It runs with AC(0).
 
-- 
 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: Setting environment variables from Rexx running in OMVS?

2006-09-19 Thread Shmuel Metz (Seymour J.)
In [EMAIL PROTECTED], on 09/18/2006
   at 09:05 PM, Paul Gilmartin [EMAIL PROTECTED] said:

Indeed.  The Last Resort is the eval kludge, as used by tset(1):

Cruel, but all very well for a spree (Rev. L D)

It may be ugly, but it should work.
 
-- 
 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: Why AUTHPGM?

2006-09-19 Thread Shmuel Metz (Seymour J.)
In [EMAIL PROTECTED], on 09/19/2006
   at 10:34 AM, Binyamin Dissen [EMAIL PROTECTED] said:

The issue is that AC=1 programs expect to be called as job-step
programs and may not completely clean up after themselves (expecting
the initiator to do it).

Not the ones that I've seen. The standard used to be that all IBM
utilities were written to run as subroutines and they typically
allowed additional parameters when called as subroutines, e.g., ddname
lists. If anything, there are more eyeballs on the behavior of the
authorized programs.

I see it as a management issue; TSO limits the user to the authorized
programs that the installation wants available to him. That has to do
with the purposes of the programs, not just how housebroken they are.
 
-- 
 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: Zos 1.7 Exits

2006-09-19 Thread Shmuel Metz (Seymour J.)
In [EMAIL PROTECTED],
on 09/19/2006
   at 12:27 PM, Thompson, Steve (SCI TW)
[EMAIL PROTECTED] said:

If it is currently linked as REUSe, only one copy will get loaded,
but if it is actually modifying itself, things could get ugly.

It could get uglier if it's currently modifying code outside of
itself, without serialization. The testing should ensure that multiple
copies are running in parallel.
 
-- 
 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: Why AUTHPGM?

2006-09-19 Thread Walt Farrell

On 9/18/2006 7:51 PM, [EMAIL PROTECTED] wrote:

I am coming to suspect that the reason RETRY fails when I
invoke SMP/E from an EXEC under IKJEFT01 is that GIMSMP
is absent from AUTHPGM NAMES in SYS1.PARMLIB(IKJTSOnn).
I've put in a request to add it.

But, now I'm curious.  Is there any good rationale that
any program with AC=1 in an authorized library shouldn't
run with APF authorization when CALLed from TSO. 


We do not know of any integrity problems that would arise if you put 
AC(1) IBM-supplied programs into the AUTHPGM list.  (Note: The AUTHTSF 
list is a different topic.)  Generally it is more a question, I think, 
of whether the program is doing something that you would want run under 
TSO, given the dispatching priority of TSO users, and some environmental 
characteristics (how long the user will be waiting while it runs, for 
example) that determines whether you allow the programs to run under 
TSO/E or not.


It is, in fact, likely that if a program were to cause an integrity 
problem when run in TSO that it would also cause an exposure when run in 
batch.  However, I can envision some odd kinds of effects that could 
pose problems in TSO that would not pose problems in batch, given the 
differences between normal tasks and jobstep tasks.




Is the
security provided by the isolated environment incomplete?


It's not that it's incomplete.  But consider that when a job step 
terminates it goes through a full set of step termination, and step 
termination resource managers.  Other tasks get less cleanup.  TSO/E 
does have a list of things it resets when an APF-authorized program 
terminates, but TSO/E can not possibly know everything that an APF 
program might have decided to do (storage it might allocate from 
authorized subpools, name/token services, etc.), and some of those 
things would get undone at jobstep termination but not during other 
forms of task termination.


If you put a program into AUTHPGM, and its documentation does not say 
that you should not do that, and you experience an integrity problem, 
you should be able to get an integrity APAR open via the IBM Support 
Center (assuming it's an IBM program, of course).




What happens when a program with AC=0 is (inadvertently)
entered in AUTHPGM names and CALLed?


It runs unauthorized.



Could a systems programmer so inclined simply use
AUTHPGM NAMES( * )?


I don't think that is valid syntax.

Walt Farrell, CISSP
z/OS Security Design, IBM

--
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: EBCDIC to ASCII OPTCD=Q? (JCL)

2006-09-19 Thread Howard Brazee
Once again, thanks to all... but I can't even get a tape mounted, the 
SMC0043 tells me that the unit cannot be allocated.

DD

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


Why No S0C7?

2006-09-19 Thread JONES, CHARLIE
We  are on Z 1.4 and COBOL Rel 3.2.0  The Simple Compile and Go below 
Allows me to add 1 to 'ABC' and get 124 with no S0C7.  Is this normal?
Did this test with NUMPROC(NOPFD), NUMPROC(PFD), and NUMPROC(MIG).
All were successful.


//ZCRSCEJA JOB (DAZC1130,ZCRSCEJ),'COBOL4MVS IVP',
// CLASS=A,MSGCLASS=X,NOTIFY=ZCRSCEJ
//*
//RUNIVP EXEC IGYWCLG,PARM.COBOL=RENT,REGION=1400K,
// PARM.LKED='LIST,XREF,LET,MAP',
// GOPGM=USECDE
//COBOL.SYSIN DD *
PROCESS NUMPROC(MIG)
000100 IDENTIFICATION DIVISION.
000200 PROGRAM-ID. USECDE.
003200 ENVIRONMENT DIVISION.
005000 DATA DIVISION.
008400 WORKING-STORAGE SECTION.
   77  COUNTERX  PIC 999 VALUE 0.
   01  BAD-NUMBERPIC 999.
   01  BAD-SPACE REDEFINES BAD-NUMBER  PIC XXX.
011800 PROCEDURE DIVISION.
013200 001-INITIALIZE.
  *THIS STATEMENT WILL CAUSE AN LE-SOC7
   PERFORM 010-LOOPIT UNTIL COUNTERX EQUAL 100.
034200 601-END-RTN.
   DISPLAY 'TESTIT EXECUTED WITH NO S0C7 SUCCESSFULY'.
   GOBACK.
013200 010-LOOPIT.
   MOVE 'ABC'  TO BAD-SPACE.
   ADD 1 TO BAD-NUMBER.
   DISPLAY ' BAD-NUMBER: 'BAD-NUMBER
   ADD 1 TO COUNTERX.
   999-END-RTN.
   EXIT.
//LKED.SYSLIB DD
//GO.SYSOUT DD SYSOUT=*

--
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: QUIESCE / RESTART

2006-09-19 Thread Ed Finnell
 
In a message dated 9/19/2006 12:26:06 P.M. Central Standard Time,  
[EMAIL PROTECTED] writes:

It still  works, but some applications react poorly to a suspension  of
time.
We've done this to our sandboxes when production  needed the cycles.




Probably good time to review JES parms too!
 
AUTH=ALL|SYS|IO|CONS|INFO   
Specifies the MVS operator command groups that are to be  executed. The 
groups include:  
SYS  
system commands  
IO  
input/output commands  
CONS  
console commands  
INFO  
information commands (such as display)  
ALL  
all operator command types  

For an explanation of operator command  groups and the relationship of JES2 
to MVS command groups, refer to _z/OS  JES2 Commands_ 
(http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/DOCNUM/SA22-7526/CCONTENTS?)
  and _z/OS  MVS_ 
(http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/DOCNUM/SA22-7627/CCONTENTS?)
  _System  Commands_ 
(http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/DOCNUM/SA22-7627/CCONTENTS?)
 , respectively.  
This parameter affects JCL statements only. Use the AUTH= parameter of the  
INTRDR and RDR initialization statement to specify the authorization for JES2  
job entry control (JECL) statements. (JES2 control statements begin with /* in 
 columns 1 and 2. JCL statements begin with // in columns 1 and 2). 

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


Re: Why No S0C7?

2006-09-19 Thread Binyamin Dissen
On Tue, 19 Sep 2006 12:48:28 -0500 JONES, CHARLIE [EMAIL PROTECTED]
wrote:

:We  are on Z 1.4 and COBOL Rel 3.2.0  The Simple Compile and Go below 
:Allows me to add 1 to 'ABC' and get 124 with no S0C7.  Is this normal?
:Did this test with NUMPROC(NOPFD), NUMPROC(PFD), and NUMPROC(MIG).
:All were successful.

To force an 0C7, move 'AB ' to BAD-SPACE.

Letter will convert to numbers.

The machine code for below is

  PACK  TEMP,BAD-NUMBER
  APTEMP,=P'1'
  UNPK  BAD-NUMBER,TEMP
  OITEMP+2,C'0'

If you wish to verify numeric, do a CLASS test.

://ZCRSCEJA JOB (DAZC1130,ZCRSCEJ),'COBOL4MVS IVP',
:// CLASS=A,MSGCLASS=X,NOTIFY=ZCRSCEJ
://*
://RUNIVP EXEC IGYWCLG,PARM.COBOL=RENT,REGION=1400K,
:// PARM.LKED='LIST,XREF,LET,MAP',
:// GOPGM=USECDE
://COBOL.SYSIN DD *
:PROCESS NUMPROC(MIG)
:000100 IDENTIFICATION DIVISION.
:000200 PROGRAM-ID. USECDE.
:003200 ENVIRONMENT DIVISION.
:005000 DATA DIVISION.
:008400 WORKING-STORAGE SECTION.
:   77  COUNTERX  PIC 999 VALUE 0.
:   01  BAD-NUMBERPIC 999.
:   01  BAD-SPACE REDEFINES BAD-NUMBER  PIC XXX.
:011800 PROCEDURE DIVISION.
:013200 001-INITIALIZE.
:  *THIS STATEMENT WILL CAUSE AN LE-SOC7
:   PERFORM 010-LOOPIT UNTIL COUNTERX EQUAL 100.
:034200 601-END-RTN.
:   DISPLAY 'TESTIT EXECUTED WITH NO S0C7 SUCCESSFULY'.
:   GOBACK.
:013200 010-LOOPIT.
:   MOVE 'ABC'  TO BAD-SPACE.
:   ADD 1 TO BAD-NUMBER.
:   DISPLAY ' BAD-NUMBER: 'BAD-NUMBER
:   ADD 1 TO COUNTERX.
:   999-END-RTN.
:   EXIT.
://LKED.SYSLIB DD
://GO.SYSOUT DD SYSOUT=*

--
Binyamin Dissen [EMAIL PROTECTED]
http://www.dissensoftware.com

Director, Dissen Software, Bar  Grill - Israel


Should you use the mailblocks package and expect a response from me,
you should preauthorize the dissensoftware.com domain.

I very rarely bother responding to challenge/response systems,
especially those from irresponsible companies.

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


Re: Why No S0C7?

2006-09-19 Thread Mike Bell

easiest to tell from the generated code but I suspect the cause is the lack
of sign for pic 999. COBOL seems to force the sign to x'Fx' before it adds
or subtracts anything.



   77  COUNTERX  PIC 999 VALUE 0.
   01  BAD-NUMBERPIC 999.
   01  BAD-SPACE REDEFINES BAD-NUMBER  PIC XXX.



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


Question re: CA-1 and SMP/E

2006-09-19 Thread Tim Hare
This is just a historical question for those of you who may be informed 
more than I: 

Does anyone know why CA does not use new FMIDs when they have a new 
release of CA-1?  The FMID seems to stay the same whether you're using 
CA-1 release 5.2, 11.0, or 11.5 ;  I'm just curious if anyone knows the 
reasons why this method is used.


Tim Hare
Senior Systems Programmer
Florida Department of Transportation
(850) 414-4209

--
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: Question re: CA-1 and SMP/E

2006-09-19 Thread Schwarz, Barry A
The practice started with R11 and has been carried forward to R11.5.
R5.1 and R5.2 had different FMIDs.  It has caused me no end of problems
at some customer sites.  But then 99%+ of their PTFs are coded ++APAR so
they appear to be missing some very basic SMPE concepts.

-Original Message-
From: Tim Hare [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, September 19, 2006 11:26 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Question re: CA-1 and SMP/E

This is just a historical question for those of you who may be informed
more than I: 

Does anyone know why CA does not use new FMIDs when they have a new
release of CA-1?  The FMID seems to stay the same whether you're using
CA-1 release 5.2, 11.0, or 11.5 ;  I'm just curious if anyone knows the
reasons why this method is used.

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


Re: Why No S0C7?

2006-09-19 Thread Don Imbriale
Instead of MOVE 'ABC' try MOVE SPACES

On Tue, 19 Sep 2006 12:48:28 -0500, JONES, CHARLIE [EMAIL PROTECTED] 
wrote:

We  are on Z 1.4 and COBOL Rel 3.2.0  The Simple Compile and Go below 
Allows me to add 1 to 'ABC' and get 124 with no S0C7.  Is this normal?
Did this test with NUMPROC(NOPFD), NUMPROC(PFD), and NUMPROC(MIG).
All were successful.


//ZCRSCEJA JOB (DAZC1130,ZCRSCEJ),'COBOL4MVS IVP',
// CLASS=A,MSGCLASS=X,NOTIFY=ZCRSCEJ
//*
//RUNIVP EXEC IGYWCLG,PARM.COBOL=RENT,REGION=1400K,
// PARM.LKED='LIST,XREF,LET,MAP',
// GOPGM=USECDE
//COBOL.SYSIN DD *
PROCESS NUMPROC(MIG)
000100 IDENTIFICATION DIVISION.
000200 PROGRAM-ID. USECDE.
003200 ENVIRONMENT DIVISION.
005000 DATA DIVISION.
008400 WORKING-STORAGE SECTION.
   77  COUNTERX  PIC 999 VALUE 0.
   01  BAD-NUMBERPIC 999.
   01  BAD-SPACE REDEFINES BAD-NUMBER  PIC XXX.
011800 PROCEDURE DIVISION.
013200 001-INITIALIZE.
  *THIS STATEMENT WILL CAUSE AN LE-SOC7
   PERFORM 010-LOOPIT UNTIL COUNTERX EQUAL 100.
034200 601-END-RTN.
   DISPLAY 'TESTIT EXECUTED WITH NO S0C7 SUCCESSFULY'.
   GOBACK.
013200 010-LOOPIT.
   MOVE 'ABC'  TO BAD-SPACE.
   ADD 1 TO BAD-NUMBER.
   DISPLAY ' BAD-NUMBER: 'BAD-NUMBER
   ADD 1 TO COUNTERX.
   999-END-RTN.
   EXIT.
//LKED.SYSLIB DD
//GO.SYSOUT DD SYSOUT=*


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


Can you provide?

2006-09-19 Thread Petersen, Jim
I have a hard copy of W28 Nursery School for the
Enterprise-Extender-Impaired -- Please teach me the basicsby Gwen
Dente from the zSeries EXPO dated September 19-23, 2005 in San
Francisco.
 
I know not from whence it came but I sure could use a PDF copy of it or
a link to the PDF copy if someone can provide it.
Thanks in advance.
 



___ 
Jim Petersen
MVS - Lead Systems Engineer 
Home Depot Technology Center
1300 Park Center Drive, Austin, TX 78753
www.homedepot.com
email: [EMAIL PROTECTED] 
512-977-2615 direct
512-977-2930 fax 
210-859-9887 cell 

This message may contain confidential information. The information
contained in this message and any attachments are intended solely for
the use of the addressee(s) named above. If you are not the intended
recipient, any disclosure, copying, distribution or other use of the
contents of this message is strictly prohibited. If you have received
this email in error, please notify the sender immediately by email and
delete all copies of this message

 

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


Re: Why No S0C7?

2006-09-19 Thread Rankin, Bob
The source data contains a valid sign. You will only get a S0C7 abend for an
invalid sign. 

Source data field contains characters 'ABC' this is represented in hex as
x'C1C2C3'. The low order byte contains a sign of 'C' which is interpreted as
a valid sign (positive). COBOL  will pack the field prior to performing the
arithmetic. The result of the pack operations will be x'00123C'. The result
of the add-packed would be x'00124C'. 

So, working as designed.

-Original Message-
From: JONES, CHARLIE [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, September 19, 2006 10:48 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Why No S0C7?

We  are on Z 1.4 and COBOL Rel 3.2.0  The Simple Compile and Go below 
Allows me to add 1 to 'ABC' and get 124 with no S0C7.  Is this normal?
Did this test with NUMPROC(NOPFD), NUMPROC(PFD), and NUMPROC(MIG).
All were successful.


//ZCRSCEJA JOB (DAZC1130,ZCRSCEJ),'COBOL4MVS IVP',
// CLASS=A,MSGCLASS=X,NOTIFY=ZCRSCEJ
//*
//RUNIVP EXEC IGYWCLG,PARM.COBOL=RENT,REGION=1400K,
// PARM.LKED='LIST,XREF,LET,MAP',
// GOPGM=USECDE
//COBOL.SYSIN DD *
PROCESS NUMPROC(MIG)
000100 IDENTIFICATION DIVISION.
000200 PROGRAM-ID. USECDE.
003200 ENVIRONMENT DIVISION.
005000 DATA DIVISION.
008400 WORKING-STORAGE SECTION.
   77  COUNTERX  PIC 999 VALUE 0.
   01  BAD-NUMBERPIC 999.
   01  BAD-SPACE REDEFINES BAD-NUMBER  PIC XXX.
011800 PROCEDURE DIVISION.
013200 001-INITIALIZE.
  *THIS STATEMENT WILL CAUSE AN LE-SOC7
   PERFORM 010-LOOPIT UNTIL COUNTERX EQUAL 100.
034200 601-END-RTN.
   DISPLAY 'TESTIT EXECUTED WITH NO S0C7 SUCCESSFULY'.
   GOBACK.
013200 010-LOOPIT.
   MOVE 'ABC'  TO BAD-SPACE.
   ADD 1 TO BAD-NUMBER.
   DISPLAY ' BAD-NUMBER: 'BAD-NUMBER
   ADD 1 TO COUNTERX.
   999-END-RTN.
   EXIT.
//LKED.SYSLIB DD
//GO.SYSOUT DD SYSOUT=*

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


SYSLOG daily setup

2006-09-19 Thread Mike Szyszka

Hi all,
I have a zos 1.5e systems running a sysplex with 4 lpars. The daily SYSLOG
process is screwed up.
It reads the 4 syslogs and is suppose to write out to 4 different datasets
to dasd.
The lastest syslog dataset is from May, 2005. This is when they upgraded to
z/os 1.5e and has not worked since.

sys2.syslog.sysa.daily.disk
sys2.syslog.sysb.daily.disk
sys2.syslog.sysc.daily.disk
sys2.syslog.sysd.daily.disk

--
Thanks, Mike
(914) - 388-4334

--
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: SYSLOG daily setup

2006-09-19 Thread Ed Finnell
 
In a message dated 9/19/2006 1:40:35 P.M. Central Standard Time,  
[EMAIL PROTECTED] writes:

The  lastest syslog dataset is from May, 2005. This is when they upgraded  to
z/os 1.5e and has not worked since.





Not enough INFO. Have to look at the jobs producing the output and  either 
cut and paste the output or give a failing  code.  

--
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: EBCDIC to ASCII OPTCD=Q? (JCL)

2006-09-19 Thread Richard Peurifoy
Howard Brazee wrote:

 Once again, thanks to all... but I can't even get a tape mounted, the
 SMC0043 tells me that the unit cannot be allocated.

 DD


I think the SMC messages come from SUN/STK SILO (HSC/SMC) software.
I don't know how it decides what units are available for allocation, but
maybe
this will give you a place to look.

Richard

--
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: QUIESCE / RESTART

2006-09-19 Thread Terry BRuns
Probably good time to review JES parms too!

AUTH=ALL|SYS|IO|CONS|INFO
Specifies the MVS operator command groups that are to be  executed. The
groups include:


Yes, I tried to suggest turning off commands from JCL, but management was 
afraid there may be legitimate commands in production jobs. Whatever. They 
chose to whack the QUIESCE command via RACF. 

But getting back to the RESTART, is there a possibility of affecting the 
wrong lpar? Let's say I have two CPC's each with two lpars - one production 
and one test (this is how Lands' End is setup!). I QUIESCE one of the test 
systems. How do I know that the PSW RESTART will restart the right lpar?

According to IBM, the PSW Restart Performs a restart operation on the 
first available central processor(s) of the selected CPC images (except for 
a coupling facility image). A restart interruption will store the current 
program status word (PSW) at real address 8 and fetch a new PSW from real 
address 0 in central storage.

So my question is how do you direct the restart to the desired lpar? 

Terry Bruns
Berbee Information Networks (soon to be a part of CDW!)

--
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: SYSLOG daily setup

2006-09-19 Thread Mike Szyszka

IEF403I DMPLOGDY - STARTED - TIME=13.05.38

$HASP708 DMPLOGDY SYS1 OPEN ERROR - DATA SET WAS NOT CLOSED 214

RC=06 I/O ERROR READING DATA BUFFER

DSNAME=+MASTER+.SYSLOG.STC01644.D229.?


On 9/19/06, Ed Finnell [EMAIL PROTECTED] wrote:



In a message dated 9/19/2006 1:40:35 P.M. Central Standard Time,
[EMAIL PROTECTED] writes:

The  lastest syslog dataset is from May, 2005. This is when they
upgraded  to
z/os 1.5e and has not worked since.





Not enough INFO. Have to look at the jobs producing the output and  either
cut and paste the output or give a failing  code.

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





--
Thanks,
Mike Szyszka
Bear Systems, Inc.
http://BearSystems.com
(845) 679-5412

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


Re: Why AUTHPGM?

2006-09-19 Thread Binyamin Dissen
On Tue, 19 Sep 2006 13:40:58 -0300 Shmuel Metz (Seymour J.)
[EMAIL PROTECTED] wrote:

:In [EMAIL PROTECTED], on 09/19/2006
:   at 10:34 AM, Binyamin Dissen [EMAIL PROTECTED] said:

:The issue is that AC=1 programs expect to be called as job-step
:programs and may not completely clean up after themselves (expecting
:the initiator to do it).

:Not the ones that I've seen. The standard used to be that all IBM
:utilities were written to run as subroutines and they typically
:allowed additional parameters when called as subroutines, e.g., ddname
:lists. If anything, there are more eyeballs on the behavior of the
:authorized programs.

:I see it as a management issue; TSO limits the user to the authorized
:programs that the installation wants available to him. That has to do
:with the purposes of the programs, not just how housebroken they are.

There is no SAF call to see if the particular user can invoke the particular
program in authorized mode.

The list is the same for every user.

Thus I fail to see your conclusion.

--
Binyamin Dissen [EMAIL PROTECTED]
http://www.dissensoftware.com

Director, Dissen Software, Bar  Grill - Israel


Should you use the mailblocks package and expect a response from me,
you should preauthorize the dissensoftware.com domain.

I very rarely bother responding to challenge/response systems,
especially those from irresponsible companies.

--
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: SYSLOG daily setup

2006-09-19 Thread Mike Szyszka

Looks like the write log (W L) was never issued.



On 9/19/06, Mike Szyszka [EMAIL PROTECTED] wrote:


 IEF403I DMPLOGDY - STARTED - TIME=13.05.38

$HASP708 DMPLOGDY SYS1 OPEN ERROR - DATA SET WAS NOT CLOSED 214

RC=06 I/O ERROR READING DATA BUFFER

DSNAME=+MASTER+.SYSLOG.STC01644.D229.?


On 9/19/06, Ed Finnell [EMAIL PROTECTED] wrote:


 In a message dated 9/19/2006 1:40:35 P.M. Central Standard Time,
 [EMAIL PROTECTED] writes:

 The  lastest syslog dataset is from May, 2005. This is when they
 upgraded  to
 z/os 1.5e and has not worked since.




 
 Not enough INFO. Have to look at the jobs producing the output
 and  either
 cut and paste the output or give a failing  code.

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




--
Thanks,
Mike Szyszka
Bear Systems, Inc.
http://BearSystems.com http://bearsystems.com/
(845) 679-5412





--
Thanks,
Mike Szyszka
Bear Systems, Inc.
http://BearSystems.com
(845) 679-5412

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


DLLs in z/OS - sources of information ?

2006-09-19 Thread Thomas Berg
Hi!

We have a third party vendor that is beginning to use DLLs in their z/OS
product. 
As it is used to build/generate some of our applications we will have
coexistence problems
with dynamically called modules.  (As the product requires dynamically
called modules to be 
recompiled and linked as DLLs.)  The generated source is COBOL
(accessing IMS/DB2).

I would be grateful if anyone could point me to sources (links) of
information usable in this
context.
(I have searched through Google but the result isn't too good...)

Also if anyone have experience of migrating to use DLLs and how to deal
with a mixed
DLL/non-DLL environment it would be valuable.

As I have no experience and very limited knowledge of DLLs, I am
interested in both general 
information about how to manage a DLL/non-DLL environment and technical
details about the 
format, generation and execution of DLLs.


TIA
Thomas


Thomas Berg   IT Utveckling   Swedbank AB (Publ) 

--
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: QUIESCE / RESTART

2006-09-19 Thread McKown, John
 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:[EMAIL PROTECTED] On Behalf Of Terry BRuns
 Sent: Tuesday, September 19, 2006 2:19 PM
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: Re: QUIESCE / RESTART
 
snip
 
 But getting back to the RESTART, is there a possibility of 
 affecting the 
 wrong lpar? Let's say I have two CPC's each with two lpars - 
 one production 
 and one test (this is how Lands' End is setup!). I QUIESCE 
 one of the test 
 systems. How do I know that the PSW RESTART will restart the 
 right lpar?
 

snip

 
 So my question is how do you direct the restart to the desired lpar? 
 
 Terry Bruns
 Berbee Information Networks (soon to be a part of CDW!)

Click on that LPAR's ICON on the HMC screen and make sure that only it
is selected. Just like IPL'ing an LPAR.

--
John McKown
Senior Systems Programmer
HealthMarkets
Keeping the Promise of Affordable Coverage
Administrative Services Group
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: EBCDIC to ASCII OPTCD=Q? (JCL)

2006-09-19 Thread Mark Zelden
On Tue, 19 Sep 2006 11:59:42 -0600, Howard Brazee [EMAIL PROTECTED] wrote:

Once again, thanks to all... but I can't even get a tape mounted, the
SMC0043 tells me that the unit cannot be allocated.


There are various reasons you might get that message.  It is from the
SMC component of Sun/STK that is used with their tape robotic 
software.   Without getting into a lot of detail, the easiest way
to bypass SMC (which handles all the tape allocations) is to specify
a unit address in the JCL instead of an estoeric / generic.  

Example: //TAPEDD DD DSN=MY.DSN,DISP=SHR,VOL=123456,UNIT=/5200

(slash needed for 4 digit addresses)

See the SMC manuals for more details.

Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group
mailto: [EMAIL PROTECTED]
z/OS and OS390 expert at http://searchDataCenter.com/ateExperts/
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: SYSLOG daily setup

2006-09-19 Thread Ed Finnell
 
In a message dated 9/19/2006 2:31:45 P.M. Central Standard Time,  
[EMAIL PROTECTED] writes:

Looks  like the write log (W L) was never issued.




Or not authorized, or didn't complete. Guess I'd take it one step at a time  
and see if I could get the W L to work manually. Then
do ==print odsn 'sys2.bigol.syslog'  
 
Might have to look at syslog to see if RACF(ICH) or other messages are  
ascribed to the DUMP job.

--
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: QUIESCE / RESTART

2006-09-19 Thread Terry BRuns
On Tue, 19 Sep 2006 14:37:38 -0500, McKown, John 
[EMAIL PROTECTED] wrote:


 So my question is how do you direct the restart to the desired lpar?


Click on that LPAR's ICON on the HMC screen and make sure that only it
is selected. Just like IPL'ing an LPAR.

Thanks John. We were all hesitant to try this (on one of the test lpars) 
for fear of once again bringing down the production image. We began to try 
it and it appeared (or so we thought) that the PSW Restart function didn't 
work when a single profile was selected. I'll have to go back and check 
this out (not that I don't believe you!!!).

Terry Bruns

--
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: EBCDIC to ASCII OPTCD=Q? (JCL)

2006-09-19 Thread Ed Finnell
 
In a message dated 9/19/2006 2:39:01 P.M. Central Standard Time,  
[EMAIL PROTECTED] writes:

There  are various reasons you might get that message.  It is from the
SMC  component of Sun/STK that is used with their tape robotic  
software.   Without getting into a lot of detail, the easiest  way
to bypass SMC (which handles all the tape allocations) is to  specify
a unit address in the JCL instead of an estoeric / generic.   

Example: //TAPEDD DD  DSN=MY.DSN,DISP=SHR,VOL=123456,UNIT=/5200

(slash needed for 4 digit  addresses)




Can we just FTP to the tape drive as txt and let FTP do the conversion?  
Don't have this setup, but seems more  straightforward.

--
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: DLLs in z/OS - sources of information ?

2006-09-19 Thread Schneiderwent, Craig
If the vendor is CA and the product is AllFusion Gen r7.6, then this
statement of direction from CA may give you some relief.  

 
http://supportconnectw.ca.com/public/cool/gen/infodocs/Gen76zOS-Statement_o
f_Direction.pdf

--
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: Can you provide?

2006-09-19 Thread Chris Mason
Jim

If you Google for Gwen Dente Enterprise Extender, the first hit is a
long list of technical documents/presentations in which you will find
Enterprise Extender Basics: An Introduction to Architecture and to Coding.
Why Gwen changed the title in the abstract to this nondescript text is a
question only she can answer. Once you look inside you'll see it's what you
want.

You can download the .pdf from here:

http://www-03.ibm.com/support/techdocs/atsmastr.nsf/WebIndex/PRS1711

Chris Mason

- Original Message - 
From: Petersen, Jim [EMAIL PROTECTED]
Newsgroups: bit.listserv.ibm-main
To: IBM-MAIN@BAMA.UA.EDU
Sent: Tuesday, 19 September, 2006 8:35 PM
Subject: Can you provide?


 I have a hard copy of W28 Nursery School for the
 Enterprise-Extender-Impaired -- Please teach me the basicsby Gwen
 Dente from the zSeries EXPO dated September 19-23, 2005 in San
 Francisco.

 I know not from whence it came but I sure could use a PDF copy of it or
 a link to the PDF copy if someone can provide it.
 Thanks in advance.




 ___
 Jim Petersen

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


SV: DLLs in z/OS - sources of information ?

2006-09-19 Thread Thomas Berg
Your'e quite right !   :)
Thanks.  

I'm still interested in information about DLLs though.


Thomas Berg   IT Utveckling   Swedbank AB (Publ)   

 -Ursprungligt meddelande-
 Från: IBM Mainframe Discussion List 
 [mailto:[EMAIL PROTECTED] För Schneiderwent, Craig
 Skickat: den 19 september 2006 21:50
 Till: IBM-MAIN@BAMA.UA.EDU
 Ämne: Re: DLLs in z/OS - sources of information ?
 
 If the vendor is CA and the product is AllFusion Gen r7.6, 
 then this statement of direction from CA may give you some relief.  
 
  
 http://supportconnectw.ca.com/public/cool/gen/infodocs/Gen76z
 OS-Statement_o
 f_Direction.pdf
 
 --
 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: QUIESCE / RESTART

2006-09-19 Thread Natarajan Mohan
 You would have to do single object operations from HMC for the CPC you
are trying to control. Then you would have to right click on the LPAR
IMAGE you would like to issue PSW restart agains and select CP's. Make
sure you are only selecting the image you would like your PSW restart
directed, if others are selected, then the images are grouped.

HTH
Natarajan

 [EMAIL PROTECTED] 9/19/2006 12:46 PM 
On Tue, 19 Sep 2006 14:37:38 -0500, McKown, John 
[EMAIL PROTECTED] wrote:


 So my question is how do you direct the restart to the desired
lpar?


Click on that LPAR's ICON on the HMC screen and make sure that only
it
is selected. Just like IPL'ing an LPAR.

Thanks John. We were all hesitant to try this (on one of the test
lpars) 
for fear of once again bringing down the production image. We began to
try 
it and it appeared (or so we thought) that the PSW Restart function
didn't 
work when a single profile was selected. I'll have to go back and check

this out (not that I don't believe you!!!).

Terry Bruns

--
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: Why No S0C7?

2006-09-19 Thread Tom Marchant
On Tue, 19 Sep 2006 11:28:31 -0700, Rankin, Bob [EMAIL PROTECTED] 
wrote:

The source data contains a valid sign. You will only get a S0C7 abend for 
an
invalid sign.

Or an invalid numeric  But you are still correct because the data
also contains valid numerics.  As someone pointed out, spaces will
cause S0C7.  So will HIGH-VALUES.

Note:  LE might give a different result.

Tom Marchant

--
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: SYSLOG daily setup

2006-09-19 Thread Mike Szyszka

Hi Tim,
No, never worked in WI. Born and bred in Chicago. Now living in
NY and working in CT. In the 80's I was working for IBM in Chicago
and Kingston, NY. You mean to tell me there is another Mike
Szyszka in the world? A SP to top it off?

Hi Ed,
I was able to issue the W L cammand manually. Then used XDC
command in SDSF to save the syslog to a data set. So, somewhere
in the scheduling of the daily oper work, the W L is missing.

Thanks to you all
Mike Szyszka



On 9/19/06, Ed Finnell [EMAIL PROTECTED] wrote:



In a message dated 9/19/2006 2:31:45 P.M. Central Standard Time,
[EMAIL PROTECTED] writes:

Looks  like the write log (W L) was never issued.




Or not authorized, or didn't complete. Guess I'd take it one step at a
time
and see if I could get the W L to work manually. Then
do ==print odsn 'sys2.bigol.syslog'

Might have to look at syslog to see if RACF(ICH) or other messages are
ascribed to the DUMP job.

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





--
Thanks,
Mike Szyszka
Bear Systems, Inc.
http://BearSystems.com
(845) 679-5412

--
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: Restrict Operator offline command

2006-09-19 Thread Ted MacNEIL
I don't think it's a question of lack of sense of humour, but rather the 
excessive noise on this list.  Seemingly every thread deteriorates into 
discussions of ancient hardware/software or semantics and grammar or politics 
or crime.  Hit em up side the head with a bat adds little value to the 
discussion.

You're right it does.
But, I was trying to point out (in a round about way), that sometimes 
termination of an employee is the only choice.

The OP pointed out that it happened more than once.
In some cases, once is barely acceptable.

But! Twice? NO WAY!

When in doubt.
PANIC!!

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


ICKDSF ERASE VOLUME Too Slow

2006-09-19 Thread Mark House
I am looking for a fast way to erase (DESTROY) all of the data on a 3390-3 
logical drive on a RAMAC 3.  Following is a description of what we have 
tried.  Thanks for any info. 

We attempting to erase all of the data on a RAMMAC 3.  We have used the 
INIT command with the VALIDATE PURGE parameters as well the 
TRKFMT UNITADDRESS(0169) VERIFY(DBC169) ERASEDATA - 
FROMRANGE(0,0) TOLERATE(ENQFAIL) CYCLES(1) 
Both were slower than molasses.  It took 3 hours (wall time) to erase a 
volume.  We have 500 volumes to erase.  Can you help


Mark House
(402) 778-1966
Technical Development Services
[EMAIL PROTECTED]

This e-mail message and any attachments may contain confidential, 
proprietary or non-public information.  This information is intended 
solely for the designated recipient(s).  If an addressing or transmission 
error has misdirected this e-mail, please notify the sender immediately 
and destroy this e-mail.  Any review, dissemination, use or reliance upon 
this information by unintended recipients is prohibited.  Any opinions 
expressed in this e-mail are those of the author personally.


--
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: ICKDSF ERASE VOLUME Too Slow

2006-09-19 Thread Tim Hare
As perhaps many others will point out, try FDRERASE from Innovation (I 
think I spelled the product name correctly). 


Tim Hare
Senior Systems Programmer
Florida Department of Transportation
(850) 414-4209

--
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: SYSLOG daily setup

2006-09-19 Thread Tim Hare
I'm trying to drum up interest here for using OPERLOG with DASD, rather 
than our current method of periodic W L commands with an external writer 
capturing class L output.   Has anyone had experience with OPERLOG? Are 
there tools for browsing/searching the archived data?

Tim Hare
Senior Systems Programmer
Florida Department of Transportation
(850) 414-4209

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


Production DB2 Problem

2006-09-19 Thread Jacky Bright

Hi ...


I am facing problem in production DB2.

5 Volumes were configured for Database in storage group while creation of
tablespace A.

Later in 1 month these 5 volumes were full and added another 2 volumes,
however Tablespace A could not extend to these newly created volumes.

After performing REORG for Tablespace A , Tablespace VSAM dataset got
extended to these newly created volumes.

Is it necessary to do REORG of Tablespace everytime you add volumes in
storage group.

*Note : Tablespace were created using Storage group and not using volumes
parameter.*
**
What could be the reason for the same ? Please reply urgently


Jacky

--
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: Unicode and DB2 and Enterprise COBOL

2006-09-19 Thread Schiradin,Roland HG-Dir itb-db/dc
Jim, 

I remember their was a bug (e.g.APAR) because 
CONVERSION 1140,1200; /* Latin-1 to UTF-16, *RECLM*   */
CONVERSION 1200,1140; /* UTF-16 to Latin-1, *RECLM*   */
wasn't the same like
CONVERSION 1140,1200,RECLM; /* Latin-1 to UTF-16, *RECLM*   */
CONVERSION 1200,1140,RECLM; /* UTF-16 to Latin-1, *RECLM*   */

We run z/OS R4 with current maintenance and have
CONVERSION 1252,1200,;   /* ASCII WINDOWS   -- UTF-16  */ 
CONVERSION 1200,1252,;   /* UTF-16  -- ASCII WINDOWS   */ 
for Enterprise Cobol 3.4 and 
CONVERSION 1252,1200,ER; /* ASCII WINDOWS   -- UTF-16  */
CONVERSION 1200,1252,ER; /* UTF-16  -- ASCII WINDOWS   */
for DB2V8

D UNI,ALL shows (for these combination)

01252-01200(13488)-R01252-01200(13488)-L
01200(13488)-01252-E01200(13488)-01252-L

Just trust the CUNMIUTL utility and run your Cobol and DB2 
applications. Seems some parts can be shared between Cobol and DB2 among others 
like ISPF, NFS. 

Hopefully in z/OS R8 these conversationt tables will be build undercover on the 
fly. 

Roland

-Original Message-
From: IBM Mainframe Discussion List 
[mailto:[EMAIL PROTECTED] On Behalf Of Jim McAlpine
Sent: Tuesday, September 19, 2006 3:44 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Unicode and DB2 and Enterprise COBOL


OK,  I'm looking at the Enterprise COBOL V3R4 Customization 
Guide chapter 4.4 which has an example of the unicode 
requirements for both DB2 and COBOL which contains the 
following statements -

CONVERSION 1140,1200; /* Latin-1 to UTF-16, *RECLM*   */
CONVERSION 1200,1140; /* UTF-16 to Latin-1, *RECLM*

CONVERSION 1140,1200,ER; /* Latin-1 to UTF-16, ER
CONVERSION 1200,1140,ER; /* UTF-16 to Latin-1, ER

and the following document -

--
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: ICKDSF ERASE VOLUME Too Slow

2006-09-19 Thread Thompson, Steve (SCI TW)
-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of Mark House
Sent: Tuesday, September 19, 2006 3:48 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: ICKDSF ERASE VOLUME Too Slow

I am looking for a fast way to erase (DESTROY) all of the data on a
3390-3 
logical drive on a RAMAC 3.  Following is a description of what we have 
tried.  Thanks for any info. 

We attempting to erase all of the data on a RAMMAC 3.  We have used the 
INIT command with the VALIDATE PURGE parameters as well the 
TRKFMT UNITADDRESS(0169) VERIFY(DBC169) ERASEDATA - 
FROMRANGE(0,0) TOLERATE(ENQFAIL) CYCLES(1) 
Both were slower than molasses.  It took 3 hours (wall time) to erase a 
volume.  We have 500 volumes to erase.  Can you help
snip

Just for fun, try IEBDG against a file the size of the volume (outside
of the VTOC, VTOC-IX and VVDS etc.). See how long it takes. It erases,
by writing over, all the data that is on the volume other than a spot
here and there because of inter-record block gaps.

If this runs rather quickly (I suspect it will), then you might try
re-init of a volume, giving a 1 track VTOC, no Index, and then allocate
a single file (or two) and let IEBDG rip. 

If you use RIPPLE (I think that is the parameter), you will get text
that shifts one byte for each record written. And you will get this for
block after block on the unit.

Later,
Steve Thompson

--
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 question - sharing DASD but not SMS environment

2006-09-19 Thread John M. Cullen
We want to share a few DASD among our four Lpars and have SMS 
doing allocation.  Each Lpar runs z/OS as a monoplex seperate 
from the others.  Two are 1.4 and two are 1.7 right now.  
We do not have any kind of sysplex.  Nor do we have an SMSplex, 
whatever that is. 

We would update SMS rules in every Lpar to indicate these 
volsers in an SMS storage group and set up storageclass, dataclass 
 mgmtclass.  Each high level qualifier would be setup in every 
Lpar's master catalog using an  existing ucat on a non-SMS dasd 
that is online to all lpars.

Would SMS for lpar-P get confused if SMS for lpar-D was allocating 
a file on those dasd at the same time she was?  Does SMS from one 
lpar need to know what SMS from the other lpar is doing?

John Cullen

“'Tis a damn poor mind that cannot think of more than one way 
to spell a word.”
(Andrew Jackson)

--
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: Restrict Operator offline command

2006-09-19 Thread Arthur T.
On 19 Sep 2006 13:26:21 -0700, in bit.listserv.ibm-main 
(Message-ID:[EMAIL PROTECTED]) 
[EMAIL PROTECTED] (Ted MacNEIL) wrote:


I don't think it's a question of lack of sense of humour, 
but rather the excessive noise on this list.  Seemingly 
every thread deteriorates into
discussions of ancient hardware/software or semantics and 
grammar or politics or crime.  Hit em up side the head 
with a bat adds little value to the discussion.


You're right it does.
But, I was trying to point out (in a round about way), 
that sometimes termination of an employee is the only choice.


The OP pointed out that it happened more than once.
In some cases, once is barely acceptable.

But! Twice? NO WAY!


 Yes, even good operators can fat-finger a command 
more than once, given years in which to do it.  And, of 
course, there are enough operators that even if each gets 
only one bite, it can wreak havoc on SLAs.


 We implemented the auto-ops rule after *good* 
operators made the mistake.


 Yes, you can fire people for two typos.  As I said, 
though, all that will do is make sure that no command is 
entered without a lng look to make sure it's 
right.  (Or, you'll have so much turnover that you'll never 
have to worry about what a good operator will do.)  How 
long do you want system start-up and shut-down to take?


 As shown by some of the responses, this problem is 
endemic, rather than the fault of individual operators.  I 
did not object to the humor, per se, but to the idea that 
*any* punishment is correct for this mistake.


 There are other errors for which I've jokingly 
commented about the desirability of breaking someone's 
thumbs.  But it was always when people did things when they 
should have known (or did know) better.  Typos do not fall 
into that category.


 (Speaking of people who should know better, how about 
adding a --  line to separate your sig?)


--
I cannot receive mail at the address this was sent from.
To reply directly, send to ar23hur at intergate dot 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: SV: DLLs in z/OS - sources of information ?

2006-09-19 Thread Steve Comstock

Thomas Berg wrote:

Your'e quite right !   :)
Thanks.  


I'm still interested in information about DLLs though.


Thomas Berg   IT Utveckling   Swedbank AB (Publ)   


You need our class, of course! Creating and Using
DLLs in z/OS; 1 day; multilingual (COBOL, C, PL/I,
Assembler: you choose).

Details at:
http://www.trainersfriend.com/Language_Environment_courses/m525descr.htm

Or better, our longer class Hot Catholic High School
Girls in Bondage (perhaps better known as Secrets of
Inter-Language Communication in z/OS); this three
day course includes the content from the above and a
lot more.

Details at:
http://www.trainersfriend.com/Language_Environment_courses/m520descr.htm

Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

--
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: Restrict Operator offline command

2006-09-19 Thread Ted MacNEIL
(Speaking of people who should know better, how about adding a --  line to 
separate your sig?)

There's one there.
The problem is that I had to switch away from my BlackBerry ID to a yahoo one 
for my BlackBerry, under POP3.
(RIM is learning customer support from CA  MS).

So, I have two sig lines to deal with, and each e-mailer fighting it.

I didn't realise it was a problem, since I don't read my own posts.

When in doubt.
PANIC!!

--
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: ICKDSF ERASE VOLUME Too Slow

2006-09-19 Thread Glenn Miller
Hi Mark,

I have never worked with a RAMAC 3 before, however, a couple of thoughts
come to mind:
If the RAMAC 3 supports either IBM Flashcopy Ver1 ( Volume Level Flashcopy
) or PPRC Ver1,
you could 'setup' some volume(s) with IEBDG as someone else suggested.
Then you could
specify the 'setup' volume(s) as Flashcopy or PPRC source volume(s) to the
volume(s) you
want to 'erase/overlay/etc.'.  Using Flashcopy or PPRC removes the burden
of transfering
all the data to/from the control unit to the processor and back again to
the same control unit.
The control unit would do all the work in the 'background' without a z/OS
image being there
( after the initial Flashcopy or PPRC commands, of course ).

HTH

Glenn Miller

---
This message (including any attachments) is confidential and may be
privileged. If you have received it by mistake please notify the sender by
return e-mail and delete this message from your system. Any unauthorised
use or dissemination of this message in whole or in part is strictly
prohibited. Please note that e-mails are susceptible to change. ABN AMRO
Bank N.V, which has its seat at Amsterdam, the Netherlands, and is
registered in the Commercial Register under number 33002587, including its
group companies, shall not be liable for the improper or incomplete
transmission of the information contained in this communication nor for any
delay in its receipt or damage to your system. ABN AMRO Bank N.V. (or its
group companies) does not guarantee that the integrity of this
communication has been maintained nor that this communication is free of
viruses, interceptions or interference.
---

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


SV: SV: DLLs in z/OS - sources of information ?

2006-09-19 Thread Thomas Berg
 -Ursprungligt meddelande-
 Från: IBM Mainframe Discussion List 
 [mailto:[EMAIL PROTECTED] För Steve Comstock
 Skickat: den 20 september 2006 00:17
 Till: IBM-MAIN@BAMA.UA.EDU
 Ämne: Re: SV: DLLs in z/OS - sources of information ?
 
 Thomas Berg wrote:
  Your'e quite right !   :)
  Thanks.  
  
  I'm still interested in information about DLLs though.
  
 You need our class, of course! Creating and Using DLLs in 
 z/OS; 1 day; multilingual (COBOL, C, PL/I,
 Assembler: you choose).
 
 Details at:
 http://www.trainersfriend.com/Language_Environment_courses/m52
 5descr.htm

I actually saw that course when searching from Google.
Unfortunately I supposed You want to be payed for the information... ;)

 Or better, our longer class Hot Catholic High School Girls 
 in Bondage 

As we are mostly Lutherans, is it possible foir You to rework that course
to Hot Protestantic High School Girls in Bondage ?

 Details at:
 http://www.trainersfriend.com/Language_Environment_courses/m52
 0descr.htm

Your classes seems very interesting though.
In the case a miracle happens and my employer is willing to pay for it,
what do You take for a course here in Stockholm ?

 Kind regards,
 
 -Steve Comstock
 The Trainer's Friend, Inc.
 


Regards,
Thomas

Thomas Berg   IT Utveckling   Swedbank AB (Publ) 

--
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: Production DB2 Problem

2006-09-19 Thread Mike Bell

something wrong here - my experience was that db2 would start using any sms
volume as soon as it was enabled.

I would suggest open an incident with IBM.

Some things to check
in DB2 the STOGROUP should have volumes (*)
the priquty and secqty for the db2 tablespace and index spaces should be
large enough to get to the next dataset limit (whether it is the default 2G
or larger)
were there many small extents because the volumes got fragmented? each
allocation can take up to 5 extents and DB2 is still limited to 251 extents
for a multivolume dataset. once DB2 gets to 251 extents the only way to
clear that is reorg or manual copy.
was there a failure message? - I always issued a -start database spacenam
DB2 command to clear any leftover status from the failure


--
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: Restrict Operator offline command

2006-09-19 Thread Glenn Miller
This discussion answer's an age-old question of the universe:
Why does VM ( VM/ESA, z/VM, etc. ) restrict the range of the device VARY
command?


vary offline 2000-2100
17:36:43 HCPCPS6000E The range of device numbers cannot exceed 256.
Ready(06000); T=0.01/0.01 17:36:43
vary online 2000-2100
17:36:46 HCPCPS6000E The range of device numbers cannot exceed 256.
Ready(06000); T=0.01/0.01 17:36:46


Guess I have an answer.


Glenn Miller

---
This message (including any attachments) is confidential and may be
privileged. If you have received it by mistake please notify the sender by
return e-mail and delete this message from your system. Any unauthorised
use or dissemination of this message in whole or in part is strictly
prohibited. Please note that e-mails are susceptible to change. ABN AMRO
Bank N.V, which has its seat at Amsterdam, the Netherlands, and is
registered in the Commercial Register under number 33002587, including its
group companies, shall not be liable for the improper or incomplete
transmission of the information contained in this communication nor for any
delay in its receipt or damage to your system. ABN AMRO Bank N.V. (or its
group companies) does not guarantee that the integrity of this
communication has been maintained nor that this communication is free of
viruses, interceptions or interference.
---

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


Re: Why AUTHPGM?

2006-09-19 Thread Paul Gilmartin
In a recent note, Walt Farrell said:

 Date: Tue, 19 Sep 2006 14:00:51 -0400
 
 ...  Generally it is more a question, I think,
 of whether the program is doing something that you would want run under
 TSO, given the dispatching priority of TSO users, and some environmental
 characteristics (how long the user will be waiting while it runs, for
 example) that determines whether you allow the programs to run under
 TSO/E or not.
 
Alas, this misses the mark considerably in that it fails to
distinguish between interactive TSO sessions and use of the TMP
in batch.  AUTHPGM NAMES is the same for both, isn't it?

Perhaps for this purpose AUTHPGM should govern only calling
programs from interactive sessions, and batch TMP should be
free to invoke any authorized program, listed or not.

There are similar concerns with dynamic allocation of tape drives.
The administrators' reasonable desire not to allow drives to be
monopolized during programmers' think time should not be addressed
by the crude expedient of prohibiting (or allowing) all dynamic
allocation and mounting of tapes.

-- 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: Question re: CA-1 and SMP/E

2006-09-19 Thread Russell Witt
The reason for the same FMID's is because while we are changing the release
number; it can be done with a simple maintenance upgrade. For example, going
from R5.2 to R11.0 or even to R11.5 does NOT require a complete new install
of the product. Instead, you can simply apply APAR's and/or PTF's.

Starting with r11.5 all published maintenance is now published as PTF's, not
APAR's. Back in R5.2, the published zap's were APAR's and when the modules
were replaced with a service-pack it was sent as a PTF. R11.0 was an in
between type release. Soon after it was released we switched to load-module
only maintenance but there were still some zaps published as well. But with
r11.5, all published maintenance is a module-replacement in PTF form. So
there shouldn't be any problems with that (except for those clients that
want a non-SMP format).

And since official support for r11.0 ends this month, all maintenance going
forward will be PTF format only and module replacement.

Russell Witt
CA-1 Level-2 Support Manager

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED]
Behalf Of Schwarz, Barry A
Sent: Tuesday, September 19, 2006 1:34 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: Question re: CA-1 and SMP/E


The practice started with R11 and has been carried forward to R11.5.
R5.1 and R5.2 had different FMIDs.  It has caused me no end of problems
at some customer sites.  But then 99%+ of their PTFs are coded ++APAR so
they appear to be missing some very basic SMPE concepts.

-Original Message-
From: Tim Hare [mailto:[EMAIL PROTECTED]
Sent: Tuesday, September 19, 2006 11:26 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Question re: CA-1 and SMP/E

This is just a historical question for those of you who may be informed
more than I:

Does anyone know why CA does not use new FMIDs when they have a new
release of CA-1?  The FMID seems to stay the same whether you're using
CA-1 release 5.2, 11.0, or 11.5 ;  I'm just curious if anyone knows the
reasons why this method is used.

--
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: SMS question - sharing DASD but not SMS environment

2006-09-19 Thread Tom Marchant
On Tue, 19 Sep 2006 17:02:25 -0500, John M. Cullen
[EMAIL PROTECTED] wrote:

We want to share a few DASD among our four Lpars and have SMS
doing allocation.  Each Lpar runs z/OS as a monoplex seperate
from the others.  Two are 1.4 and two are 1.7 right now.
We do not have any kind of sysplex.  Nor do we have an SMSplex,
whatever that is.

We would update SMS rules in every Lpar to indicate these
volsers in an SMS storage group and set up storageclass, dataclass
 mgmtclass.  Each high level qualifier would be setup in every
Lpar's master catalog using an  existing ucat on a non-SMS dasd
that is online to all lpars.

Would SMS for lpar-P get confused if SMS for lpar-D was allocating
a file on those dasd at the same time she was?  Does SMS from one
lpar need to know what SMS from the other lpar is doing?

You can run your four monoplexes in a shared SMS configuration with a
single shared SCDS/ACDS and common ACS routines.  SMS is aware of the
other systems, but each acts independantly.  That's what an SMS-Plex
is.  This kind of configuration goes back to the early days of SMS,
and I'd recommend that you do it that way.  When I set up SMS in just
such an environment, we also had a GRS ring in place among the MVS
images.  I forget whether or not it is a requirement.

Are you already running SMS on your four LPARs?

I have never shared volumes between different SMS environments.
Perhaps someone else has something to say about that.

Tom Marchant

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


ServerPac on 3592 tape

2006-09-19 Thread Barry Masuda
Does anyone know when we can order z/OS V1.8 ServerPac on a 3592 tape via
ShopzSeries.  The 10/15/06 date indicates when manufacturing will begin.

Key dates
September 15, 2006 : First date for ordering z/OS V1.8 ServerPac,
SystemPac, and CBPDO using CFSW configuration support, or ShopzSeries, the
Internet ordering tool. Note that most z/OS media (executable code) is
shipped only through Customized Offerings (ServerPac, SystemPac, and
CBPDO).

September 29, 2006 : z/OS V1.8 planned general availability via ServerPac,
CBPDO and SystemPac.

October 15, 2006 : Manufacturing of orders on 3592 tape media will begin.

--
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: Why No S0C7?

2006-09-19 Thread Bill Klein
Neither COBOL nor IBM's COBOL *guarantee* a S0C7 (or other abnormal
termination) when you reference incompatible data - all they promise is
results are undefined.

Having said that, try your sample with both ZWB and NOZWB.  See:
  http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/igy3pg31/2.4.58



JONES, CHARLIE [EMAIL PROTECTED] wrote in message
news:[EMAIL PROTECTED]...
 We  are on Z 1.4 and COBOL Rel 3.2.0  The Simple Compile and Go below 
 Allows me to add 1 to 'ABC' and get 124 with no S0C7.  Is this normal?
 Did this test with NUMPROC(NOPFD), NUMPROC(PFD), and NUMPROC(MIG).
 All were successful.
 
 
 //ZCRSCEJA JOB (DAZC1130,ZCRSCEJ),'COBOL4MVS IVP',
 // CLASS=A,MSGCLASS=X,NOTIFY=ZCRSCEJ
 //*
 //RUNIVP EXEC IGYWCLG,PARM.COBOL=RENT,REGION=1400K,
 // PARM.LKED='LIST,XREF,LET,MAP',
 // GOPGM=USECDE
 //COBOL.SYSIN DD *
 PROCESS NUMPROC(MIG)
 000100 IDENTIFICATION DIVISION.
 000200 PROGRAM-ID. USECDE.
 003200 ENVIRONMENT DIVISION.
 005000 DATA DIVISION.
 008400 WORKING-STORAGE SECTION.
77  COUNTERX  PIC 999 VALUE 0.
01  BAD-NUMBERPIC 999.
01  BAD-SPACE REDEFINES BAD-NUMBER  PIC XXX.
 011800 PROCEDURE DIVISION.
 013200 001-INITIALIZE.
   *THIS STATEMENT WILL CAUSE AN LE-SOC7
PERFORM 010-LOOPIT UNTIL COUNTERX EQUAL 100.
 034200 601-END-RTN.
DISPLAY 'TESTIT EXECUTED WITH NO S0C7 SUCCESSFULY'.
GOBACK.
 013200 010-LOOPIT.
MOVE 'ABC'  TO BAD-SPACE.
ADD 1 TO BAD-NUMBER.
DISPLAY ' BAD-NUMBER: 'BAD-NUMBER
ADD 1 TO COUNTERX.
999-END-RTN.
EXIT.
 //LKED.SYSLIB DD
 //GO.SYSOUT DD SYSOUT=*

--
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: ICKDSF ERASE VOLUME Too Slow

2006-09-19 Thread Bruce Black

Thanks, Tim.  Mark, see our web site
  www.innovationdp.com
for details on FDRERASE

--
Bruce Black
Senior Software Developer
Innovation Data Processing

--
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: ICKDSF ERASE VOLUME Too Slow

2006-09-19 Thread Bruce Black


If the RAMAC 3 supports either IBM Flashcopy Ver1 ( Volume Level Flashcopy
) or PPRC Ver1,

RAMAC 3 is an old subsystem, no flashcopy

--
Bruce Black
Senior Software Developer
Innovation Data Processing

--
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: BMC control-m advanced FTP

2006-09-19 Thread John S. Giltner, Jr.

Pommier, Rex R. wrote:

 Hi list,

Does anybody out there use BMC's Control-M Advanced FTP product?  If so,
can you tell me just what the product does and what impact it has on
replacing standard FTP?  I'm being pushed by mgmt to replace our FTP
with this and I can't figure out at first look just what it is that
makes this software necessary in my shop.

Thanks.

Rex


If this is the same thing that BMC has attempted to sell us, it is a 
program they have that acts like a ftp client, but it runs on 
distributed OS's.  It does NOT run on z/OS, nor does it replace anything 
on z/OS.


If you have a file that resides on z/OS you want to tranfer, this 
product connects to the mainframe FTP sever, issues a get then 
connects to the remote server and issues a put.


It detects if the ftp fails and then, based on your rules will retry 
sending the file.


--
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: EBCDIC to ASCII OPTCD=Q? (JCL)

2006-09-19 Thread John S. Giltner, Jr.
Does the output have to be tape?  Does it have to be written in ASCII 
from the Cobol program?


What about doing OCOPY under TSO to a HFS file?

Howard Brazee wrote:

The following is being copied from COMP.LANG.COBOL, with permission.

 



Gah.  Thanks much, Mr Klein; I am trying to do this entirely by 




utilities/JCL and I hope to avoid a dedicated COBOL program... if my


hopes 




are in vain then I'll start down this path.



 

 

All righty... I've been asked about having a job on an IBM mainframe 


(z/OS) produce ASCII output.

 

(To those who think to inquire 'Why don't you produce EBCDIC output and 


then have ftp translate it during transfer to the target?' my response
is 


'I have made this suggestion and someone who signs my timesheet
responded 

'That will be considered a possibility; right now you should look into 

making the ASCII files on the mainframe.''... and yes, all fields are 


either text or display numerics w/ sign leading separate.)

 


I recall - but my memory is, admittedly, porous - something about the
DCB 


parameter OPTCD=Q being able to accomplish this but it will require more


jiggery-pokery than I can come up with; when I code an IEBGENER or a 


DFSORT with DD statements like:

 

//INDD DDDISP=SHR,   

// DSN=INPUT.DATASET.INEBCDIC  

//OUTDDDD DSN=OUTPUT.DATASET.INASCII,

//DISP=(,CATLG,CATLG),   


//UNIT=TAPE,RETPD=0,

//DCB=(*.INDD,BUFNO=30,OPTCD=Q) 

 


.. I get an ABEND (in the case of DFSORT it is IEC141I 013-70, a
problem 

with the OPEN macro... but the QW text for Return Code 70 (for V=IBM 


P=Z/OS SYSTEM MSGS R=V1R4 I=IEC141I) reads:

 


--begin quoted text:

 

An OPEN macro instruction was issued for a data set on magnetic tape. A 

conflict exists between LABEL parameters on the DD statement, and the 

DCBRECFM, DCBOPTCD, DCBBUFOF, and DCBUSASI fields, which give the 


appearance of mixed ASCII and EBCDIC attributes for the data set; or
TRTCH 


was specified for a 9-track tape.

 


Some examples of conflicts are that for AL tapes the BLKSIZE must be
less 

than 2048, RECFM=V,U and VB cannot be used. For details about AL tape 

restrictions see z/OS DFSMS: Using Magnetic Tapes . Note that most 


utilities (except for IEHINITT) do not support ASCII.

 


--end quoted text

 


(changing UNIT=TAPE,RETPD=0 to UNIT=SYSDA,SPACE=(TRK,(6000,500),RLSE)
does 

not change the error but the salient text for 70 then appears to be 'An 

OPEN macro instruction was issued for a data set not on magnetic tape.  

Either OPTCD=Q was specified, or OPEN was issued for an ISAM data set 


using QSAM.')

 

It appears obvious that under the conditions of my experiment DFSORT is 


falling into the category of 'most utilities'.  Might someone be so kind


as to point me towards a resource from which I may be able to glean a 


solution?

 


Thanks much.

 


(Oh... and among a bunch of Other Stuff a Google search for 'EBCDIC
ASCII 

translation jcl' (no ',  included) returns 

http://www.dbforums.com/archive/index.php/t-327313.html ; this informs, 

among other things, that 'answering a question with a question is no 


answer at all'... it's on the Web, it's gotta be right, right?)

 


DD




--
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: Slow Mainframe Print Output

2006-09-19 Thread John S. Giltner, Jr.
It sounds like they are doing a screen print.  I am not sure about 
Extra, but I know PCOMM has an option to do screen prints in text or 
graphic mode.  In text mode, it just dumps the text characters, in 
graphics mode it generated a graphic picture of the screen.  Least to 
say, graphics mode was slow, slow, slow.




[EMAIL PROTECTED] wrote:

Hey there, I'm wondering if anyone out there can help me out.  Here's
the short version:  Any user printing from a program called Attachmate
EXTRA! 3270 Emulator (version 8) to an IBM series printer (Infoprint
1352/1552) will have slow output.  I'm talking about 1-2 minutes for
one page to print.  First the header page will print...fast...then the
printer will churn and churn and churn...until the page will SLOWLY
print.

We've opened tickets with Microsoft, IBM, and Attachmate, with the
expected results.  Microsoft states that it's a problem with the way
IBM reads the data from the Attachmate program.  IBM states that it's a
problem with the default Microsoft pcl.sep file used for the seperator
page.  Finally, Attachmate says it's a problem with the way IBM
emulates the mainframe data into a PCL format.  Keep in mind, the users
are simply clicking the Print button in the emulation terminal, and
aren't keying in specific mainframe print commands.

Here's our environment:

Users - Windows 2000 SP4 / Windows XP Pro SP2 on a standard company
LAN.

Printing to:

Printer entries added to a clustered print server running Windows 2003
Server.  Each printer is added to the server using Direct IP ports and
shared to the users of the network.

It only affects users of IBM printers printing from the Attachmate
program.  All other print operations from other programs print
normally.  The problem goes away when we disable the seperator page on
the server.  Since management has deemed this unacceptable, we have
to find a way to work around it.  We've taken apart the pcl.sep file
and tried adding commands in line-by-line with no change in results.

Has anyone out there encountered this before?



--
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: SYSLOG daily setup

2006-09-19 Thread Ed Finnell
 
In a message dated 9/19/2006 5:00:23 P.M. Central Standard Time,  
[EMAIL PROTECTED] writes:

was able  to issue the W L cammand manually. Then used XDC
command in SDSF to save  the syslog to a data set. So, somewhere
in the scheduling of the daily oper  work, the W L is missing.




OK! Don't you just love it when they disappear for years at a time...Have a  
good one.

--
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: Question re: CA-1 and SMP/E

2006-09-19 Thread Len Rugen
Dare I ask what was really gained in calling it R11.0  R11.5 vs just
different gen levels?  It's not written anywhere, but I'd say most think if
the FMID is the same, it's the same release. Was the R11 just a marketing
mandate?   It seems to be a common issue in a lot of CA products.

But then someone made millions knocking the Ford off a car and putting
Mercury in it's place, so let's hoist one to those Edsel marketers!



 The reason for the same FMID's is because while we are changing the
release
 number; it can be done with a simple maintenance upgrade. For example,
going
 from R5.2 to R11.0 or even to R11.5 does NOT require a complete new
install
 of the product. Instead, you can simply apply APAR's and/or PTF's.

---
[This E-mail scanned for viruses by Declude Virus]

--
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 question - sharing DASD but not SMS environment

2006-09-19 Thread Richards.Bob
Absolutely, SMS would get confused. Either use one SMS across all four
lpars or stay with one per lpar. The purpose of a shared COMMDS is to
communicate allocation activity between lpars to avoid allocation
collisions such as you envisioned. If you are going to share the usercat
across all lpars anyway, why not merge the four separate SMS' in to one
SMSPLEX? 

Bob Richards 


-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of John M. Cullen
Sent: Tuesday, September 19, 2006 6:02 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: SMS question - sharing DASD but not SMS environment

We want to share a few DASD among our four Lpars and have SMS 
doing allocation.  Each Lpar runs z/OS as a monoplex seperate 
from the others.  Two are 1.4 and two are 1.7 right now.  
We do not have any kind of sysplex.  Nor do we have an SMSplex, 
whatever that is. 

We would update SMS rules in every Lpar to indicate these 
volsers in an SMS storage group and set up storageclass, dataclass 
 mgmtclass.  Each high level qualifier would be setup in every 
Lpar's master catalog using an  existing ucat on a non-SMS dasd 
that is online to all lpars.

Would SMS for lpar-P get confused if SMS for lpar-D was allocating 
a file on those dasd at the same time she was?  Does SMS from one 
lpar need to know what SMS from the other lpar is doing?

John Cullen

'Tis a damn poor mind that cannot think of more than one way 
to spell a word.
(Andrew Jackson)

--
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 
  
  
  
LEGAL DISCLAIMER 
The information transmitted is intended solely for the individual or entity to 
which it is addressed and may contain confidential and/or privileged material. 
Any review, retransmission, dissemination or other use of or taking action in 
reliance upon this information by persons or entities other than the intended 
recipient is prohibited. If you have received this email in error please 
contact the sender and delete the material from any computer. 
  
Seeing Beyond Money is a service mark of SunTrust Banks, Inc. 
[ST:XCL] 
 
 
 
 

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


  1   2   >