Re: Explination of EUT/FRR

2011-07-18 Thread Binyamin Dissen
On Sun, 17 Jul 2011 16:59:53 -0400 michealbutz michealb...@optonline.net
wrote:

:FRR information is stored off of PSA - not in any task related block. 

:Statement.  As opposed to a SCB Thus  the routine FRR can be  called by a SRB 
or TCB since
:PSA is
:related to the CPU

: Question  What if there is a CPU switch in the routine being protected by 
the FRR

If locked or disabled there ain't no CPU switch. The unit of work does not
lose control (if there is a program check, the FRR gets control which is the
same unit of work).

:When DAS came out (MVS/SP1.3) ESTAE could not operate in other than
:primary=home=secondary. The only way a PC routine could do recovery was thru
:an FRR. Rather than require that these routines get a lock to be protected, a
:secondary FRR stack was created and a bit in PSA that indicated that an EUT
:FRR stack was active. Then, if there is a task switch, the EUT FRR stack is
:saved and restored upon redispatch.

:Question I thought PC routines are protected by a ARR

Young grasshopper, the ARR is a relatively new invention. I doubt that it was
even in XA. ESA, with access registers, made things easier.

:Question  Going back to the first comment if EUT FRR are per TASK how does 
the Z/OS know
:they are
: the secondary since all FRR's   Are Created by SETFRR 

If SETFRR is issued with EUT=YES and EUT is required since this is an enabled
user task a bit is set in the PSA indicating that EUT is active and thus the
FRR stack is saved upon CPU switch.

--
Binyamin Dissen bdis...@dissensoftware.com
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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


HMC emulator

2011-07-18 Thread Alex
Hi,

Is there any HMC emulator availalbe for running on a PC?

I don't mean the Hercules emulator. Because we need to reconfigure 3 LPAR image 
profiles with dedicated CPs among 7 running LPARs in a CPC. We don't want to 
have any impact on other running LPARs when we deactivate/activate new image 
profiles for specific LPARs.  That's to say, let the unrelated LPARs running as 
normally. 

We'd like to test this idea on a emulated environment. 

We welcome any ideas. Much appreciated!

P.S.
If you want to know the details about this test, please refer to the post named 
'PR/SM Logical CP issues'.

Alex

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


Re: Explanation of EUT/FRR

2011-07-18 Thread Binyamin Dissen
On Sun, 17 Jul 2011 17:37:17 -0400 michealbutz michealb...@optonline.net
wrote:

:.1..     TCBRTM1E X'40' - RTM1 IS
:CURRENTLY PROCESSING
:EUT FRR'S FOR THIS
:TASK

:If its enabled for I/O and external interrupts and didn't issue a setlock 
then the
:FRR is a  EUT FRR ?

Unless EUT is specified, the FRR is a regular FRR and will be lost if there is
a task switch.

Specifying EUT=YES causes PSAMFLGS to be set if the environment is EUT.

--
Binyamin Dissen bdis...@dissensoftware.com
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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Explination of EUT/FRR

2011-07-18 Thread Binyamin Dissen
On Sun, 17 Jul 2011 16:22:23 -0500 Jim Thomas j...@thethomasresidence.us
wrote:

:ARR's are only required by PC-ss and then too, only if they're entered in 
:an enabled and unlocked task mode. Don't think we had them back then, hence
:FRR's. 

ARRs are NOT required by PC-ss - ESTAEX works perfectly fine in XMEM mode.
ARRs are a lot cheaper since they do not require any executable instructions
to enable.

:Aside from that, FRR's are LIFO and I believe (though I cannot remember them
:of the top of my bald head) there are TCB flags that indicate their
:presence.

Not aware of any TCB flags that indicate FRRs. There is a PSA flag that
indicates the presence of EUT FRRs. And FRRs, like SCBs, are LIFO.

--
Binyamin Dissen bdis...@dissensoftware.com
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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: HMC emulator

2011-07-18 Thread R.S.

W dniu 2011-07-18 10:50, Alex pisze:

Hi,

Is there any HMC emulator availalbe for running on a PC?

I don't mean the Hercules emulator. Because we need to reconfigure 3 LPAR image 
profiles with dedicated CPs among 7 running LPARs in a CPC. We don't want to 
have any impact on other running LPARs when we deactivate/activate new image 
profiles for specific LPARs.  That's to say, let the unrelated LPARs running as 
normally.

We'd like to test this idea on a emulated environment.


There is no such emulator. You can do anything you need on your live 
system, safely.

Two methods:
a) backup/restore of profiles or simply full backup.
b) create another Reset profile and note modifications for (same 
unfortunately) LPAR profiles. There are so few setting that it's quite 
feasible to simply note the changes on sheet of paper.


Remeber, that all the changes in profiles will NOT affect your running 
systems. You need POR or at least LPAR recycle to make them effective.


--
Radoslaw Skorupka
Lodz, Poland


--
Tre tej wiadomoci moe zawiera informacje prawnie chronione Banku 
przeznaczone wycznie do uytku subowego adresata. Odbiorc moe by jedynie 
jej adresat z wyczeniem dostpu osób trzecich. Jeeli nie jeste adresatem 
niniejszej wiadomoci lub pracownikiem upowanionym do jej przekazania 
adresatowi, informujemy, e jej rozpowszechnianie, kopiowanie, rozprowadzanie 
lub inne dziaanie o podobnym charakterze jest prawnie zabronione i moe by 
karalne. Jeeli otrzymae t wiadomo omykowo, prosimy niezwocznie 
zawiadomi nadawc wysyajc odpowied oraz trwale usun t wiadomo 
wczajc w to wszelkie jej kopie wydrukowane lub zapisane na dysku.

This e-mail may contain legally privileged information of the Bank and is intended solely for business use of the addressee. This e-mail may only be received by the addressee and may not be disclosed to any third parties. If you are not the intended addressee of this e-mail or the employee authorised to forward it to the addressee, be advised that any dissemination, copying, distribution or any other similar activity is legally prohibited and may be punishable. If you received this e-mail by mistake please advise the sender immediately by using the reply facility in your e-mail software and delete permanently this e-mail including any copies of it either printed or saved to hard drive. 


BRE Bank SA, 00-950 Warszawa, ul. Senatorska 18, tel. +48 (22) 829 00 00, fax 
+48 (22) 829 00 33, e-mail: i...@brebank.pl
Sd Rejonowy dla m. st. Warszawy XII Wydzia Gospodarczy Krajowego Rejestru Sdowego, nr rejestru przedsibiorców KRS 025237, NIP: 526-021-50-88. 
Wedug stanu na dzie 01.01.2011 r. kapita zakadowy BRE Banku SA (w caoci wpacony) wynosi 168.346.696 zotych.


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


Re: Lines, Bars and ... mini-bars???

2011-07-18 Thread Binyamin Dissen
On Sun, 17 Jul 2011 18:09:44 -0400 Peter Relson rel...@us.ibm.com wrote:

:The z/OS 1.13 support is for a program to be able to survive the things 
:that programs cannot typically avoid -- such as external and I/O 
:interrupts, page faults.

:If you can get your program up there (whether by yourself or by use of 
:directed load (LOAD with ADDR64), and if it calls no system routines of 
:any kind (whether by branch, SVC, or PC), then have at it.  You cannot 
:LINK, LOAD (wtihout ADDR64), ATTACH, XCTL, SYNCH or IDENTIFY to something 
:above 2G.

I can understand why SVC would not work as there ain't nowhere to save the
full PSW. And branching in AMODE64 to a routine that does not expect it would
lead to astonishment.

But the hardware does the entire PC process. The stack entry has plenty of
room for the entire PSW. One wonders why the residency would have an effect
(with the exception of LOC=RES which may incorrectly determine the RMODE of
the caller).

:This should not be construed to imply that further support will be 
:forthcoming.

--
Binyamin Dissen bdis...@dissensoftware.com
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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Sequence of ON PGMST restart instructions in Control-M job schedule

2011-07-18 Thread Hunkeler Peter (KIUP 4)
We're using Control-M for job scheduling.
We recently had to add some steps to (the end of) an existing job. 

Before that, Control-M should restart the job on the *first* job step in
any 
case, so the schedule definition looked like this:

! ON PGMST ANYSTEP  PROCST  CODES EXERR
A/O   * !
!   DO IFRERUN   FROM $FIRST   .  TO  .
CONFIRM Y !
!   DO
!
! ON PGMST ANYSTEP  PROCST  CODES *
A/O   * !
!   DO SYSOUTOPT C PRM E
FRM R !
!   DO SYSOUTOPT R PRM
FRM   !
!   DO
!


Now, for the additional steps, a restart is to be done on specific steps

depending on the step that had troubles. The changed scheduling
definition looks
like this:
 
! ON PGMST ANYSTEP  PROCST  CODES EXERR
A/O   * !
!   DO IFRERUN   FROM $FIRST   .  TO  .
CONFIRM Y !
!   DO
!
! ON PGMST PVSLOG## PROCST  CODES C U  S***   JFAIL
A/O   * !
!   CODES
!
!   DO IFRERUN   FROM SORTLOG1 .  TO  .
CONFIRM Y !
!   DO
!
! ON PGMST PVSLOG#2 PROCST  CODES C U  S***   JFAIL
A/O !
!   CODES
!
!   DO IFRERUN   FROM PVSLOG#2 .  TO  .
CONFIRM Y !
!   DO
!
! ON PGMST ANYSTEP  PROCST  CODES *
A/O   * !
!   DO SYSOUTOPT C PRM E
FRM R !
!   DO SYSOUTOPT R PRM
FRM   !
!   DO
!

We expected Control-M to propose SORTLOG1 and PVSLOG#2, resp., as
the
steps to restart on in the restart confirmation dialogue. We were
astonished
to see that $FIRST was proposed instead.

The manual is not too specific about this. We understand that the ON
PGMST
are worked sequentially, i.e. top down. Therfore, we expected the
step-specific
IFRERUN to override the ANYSTEP IFRERUN, but it seems the latter is
stronger
than the former.

Does anyone have more insight in how ANYSTEP, $EXERR, $FIRST and
step-specific
instructions related to each other?

--
Peter Hunkeler

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


Re: Explanation of EUT/FRR

2011-07-18 Thread Peter Relson
Question  What if there is a CPU switch in the routine 
being protected by the FRR 

As Binyamin wrote, FRRs are processor-related.  There is a stack.  The 
obvious inference is that if a work unit is undispatched the stack must be 
saved. It is.
When the work unit is redispatched, whether on the same or a different 
processor, the stack must be restored. It is.

Question I thought PC routines are protected by a ARR

PC routines entered in task mode with no locks held and enabled for I/O 
and external interrupts *may* be protected by an ARR. ARRs protect only PC 
routines. Those two statements do not imply that PC routines *are* 
protected by an ARR or that they cannot be protected by some other kind of 
recovery routine (including ESTAEX or IEAARR, both of which are 
ESTAE-type)..

if EUT FRR are per TASK how does the Z/OS know they are 
the secondary since all FRR's are Created by SETFRR 

Each work unit has an FRR stack.  A work unit runs on one processor at a 
time. As discussed earlier, upon dispatch the work unit's FRR stack is 
moved to processor-related storage. Upon undispatch the work unit's FRR 
stack is copied from that storage to work unit-related storage.

there are TCB flags that indicate their presence.

No there are not. But there is a pointer in the TCB to the area that 
contains the saved FRR stack for the task. Similarly, there is a pointer 
associated with an SRB to the area that contains the saved FRR stack for 
the SRB.

Peter Relson
z/OS Core Technology Design

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


Re: Explanation of EUT/FRR

2011-07-18 Thread Binyamin Dissen
On Mon, 18 Jul 2011 07:48:19 -0400 Peter Relson rel...@us.ibm.com wrote:

:Question  What if there is a CPU switch in the routine 
:being protected by the FRR 

:As Binyamin wrote, FRRs are processor-related.  There is a stack.  The 
:obvious inference is that if a work unit is undispatched the stack must be 
:saved. It is.
:When the work unit is redispatched, whether on the same or a different 
:processor, the stack must be restored. It is.

My understanding was that the EUT bit in PSA was added because the FRR stack
was not saved. Perhaps it was not saved in EUT mode and the bit caused even
EUT's to have their FRR stack saved?

--
Binyamin Dissen bdis...@dissensoftware.com
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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


How to merge two differents files with ICETOOL

2011-07-18 Thread Hilario G.
Hello folks,

I need to obtain an output file of 300 bytes from two differents files:

- FILE1 with a lenght of 80
- FILE2 with a lenght of 300

I need to merge both files, first FILE1 and after FILE2. 

I have several tested but I don't find the correct solution.

The last one  JCL that I used, I only obtain FILE2:

//STEP0001  EXEC  PGM=ICETOOL
//TOOLMSG  DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//IN1DD DSN=FILE1,DISP=SHR
//IN2DD DSN=FILE2,DISP=SHR
//OUT   DD DSN=FILE3,SPACE=(CYL,(10,1),RLSE),
// DISP=(NEW,CATLG,DELETE),UNIT=SYSDA,
// DCB=(LRECL=300,RECFM=FB)
//TOOLIN DD *
COPY  FROM(IN1) TO(OUT) USING(CTL1)
COPY  FROM(IN2) TO(OUT) USING(CTL2)
//CTL1CNTL DD *
  INREC FIELDS=(1,80)
//CTL2CNTL DD *
  INREC FIELDS=(1,300)
/*

Where is the error or how to obtain FILE3 with the combination of two different 
files ?

Kind Regards

Hilario Garcia

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


Re: Making Z/OS easier - Effectively replacing JCL with Unix like commands

2011-07-18 Thread Clement Clarke
Thanks for all the questions.  I'll put the questions and answers 
together for convenience.


Paul Gilmartin wrote:

On Sun, 17 Jul 2011 23:35:30 +1000, Clement Clarke wrote:

Isn't much of this what SMS is designed to do nowadays?
You can still use SMS.  Jol uses a simple VSAM file to store the 
information in. It's easy to add or change information.

Do I understand two separate modes of operation, dynamic
and generative?
Yes.  It can generate JCL, or use Dynamic Allocation to run the job in 
Batch, or immediately under TSO.



Does it provide en masse enqueues as JCL does, to avoid
deadlocks?  I suppose this would be intrinsic in a generative
mode.
In Dynamic Allocation mode, there is still some JCL generated to ensure 
this.


In TSO (Immediate mode), it is on a program by program basis.

There is also an Enque instruction which you can use to enque on any 
resource.

How does it interface with JES3 setup processing?
It has instructions to interface with JES3. You can also put any JCL 
statement out as part of the generated JCL.


And there is an extremely flexible Macro language you can use to create 
new English style commands. These commands can effectively do anything 
from running programs in the compiler phase, or have them run at 
execution time. Or even generate JCL card images.

In a dynamic mode, are there any restrictions on running
APF-authorized programs?  Must the interpreter be APF-
authorized?
There is a Jol Execution Monitor.  It must be APF authorized to allow 
authorized programs to run. It uses the same style of ATTACH that the 
Initiator uses.


It also allows Jol to put all important information on the Job Log.  So, 
for example, all Catalog and Delete statement results can be found in 
one place, instead of having to hunt through the JCL listing.

Ia it portable?  In at least a generative mode, can it run
on a non-z platform?  I keep much of my JCL as here-
documents (in-stream files) in self-tailoring shell scripts
on a Solaris platform (could be z/OS Unix except for
performance and flexibility).

There are two main versions.  The Mainframe version written in Assembler.

The PC version is written in C. It will execute on Windows and generate 
Mainframe JCL to submit.


The Linux version is 99% complete.

And does it address more of the recurrent JCL complaints:

o PARM100 characters?

Parameters can be up to 3,000 characters in length.

o In-stream data sets in procedures?  (Ah!  that's coming in
   z/OS 1.13.)?
Instream data is supported.  Not only that - substitution of Symbolic 
Parameters may be done in the card image files to generate utility 
control cards.


And we can use Allocate, Read and Write instructions for any data set at 
Compile Time.  Data can be read directly into Symbolic Variables, and 
tested and manipulated with IF and SET instructions. This facility is 
used, for example, in the SAVESYMS command which saves specified 
Symbolic Variables in a file that can be accessed by another job to 
created a tailored job stream depending on what the first job did.


There is also a Panel instruction that is used to display full screen 
data entry panels, complete with Menu Bars and Pulldown lists. User data 
entered is stored in Symbolic Variables, and can be used as any other 
Symbolic Variable - tested, added to others, and so on.

o Substitution of dynamic system symbols?
Substitution of  Symbolic Parameters.  Jol automatically sets various 
symbols up such as the current day and so on. Symbolic variables can be 
tested, set or used in arithmetic. For example:


If %day = 'Monday' then
Copy Input.Data.Set to Backup.ofMainFile.%day;   /* Note %day in 
Dsname */


User exits can also create any symbols you require.  Exits can be 
written in Assembler or PL/I.

o Symbol substitution in in-stream data sets?

Yes. For example:
Declare X * replace;
This is a card image file.
Today is %year,%month,%day
EOF;

-- gil


Thanks again,

Clem Clarke

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


Re: PR/SM Logical CP issues

2011-07-18 Thread Staller, Allan
snip
Our CPC (2094-S18-708) now has 8 Physical CP and has 1 production LPAR,
2 maintenance LPARs, 2 ICF LPARs and 2 test LPARs running at the moment.
Currently, all LPARs are equipped with shared CPs and have weight values
assigned. The details are as follows. 

production LPAR 1 
initial LCP  8
reserved LCP 10
weight 40
/snip

Are you saying that all LPARs have 8 active(shared)/10 reserved LP's
assigned? 

If so, this is a bad thing to do! PR/SM overhead is excessive (only the
active LP's affect the overhead).
The logical/physical ratio should (ROT) not exceed 2 to 1. 
I have pushed this to 3 to 1 with some very low activity test LPARs
where performance was not critical.

snip
We have referred to the z9 PR/SM planning guide. It's saying we just
need to create new image profiles and deactivate/activate test LPARs.
Then the changes will be available.
/snip

True, as far as it goes. It ignores the changed LP/CP ratios after
activation. The good news is to regain the former performance, just a
reactivation of the original profiles for the test lpars is required.

snip 
Now, we plan to assign each test LPARs with 3 dedicated CPs due to some
test requirements. That is to say, the 2 test LPARs will cost 6 physical
CPs in total.
Meanwhile, however, does this operation have any impact on other LPARs
running in the same CPC? For example, do we need to deactive the
production LPAR and change its image profile. Because there will be only
2 PCPs available for it, however, it has 8 LCPs configured. 
/snip

No. IBM does not prevent you from defining more LP's than CP's. However
the overhead becomes excessive when the LP/CP ratio exceeds (2 to 3) to
1.


Just my $0.02.
YMMV,

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


Re: Making Z/OS easier - Effectively replacing JCL with Unix like commands

2011-07-18 Thread Miklos Szigetvari

Hi

Till now I didn't find a working link to a description/download

On 7/18/2011 2:41 PM, Clement Clarke wrote:
Thanks for all the questions.  I'll put the questions and answers 
together for convenience.


Paul Gilmartin wrote:

On Sun, 17 Jul 2011 23:35:30 +1000, Clement Clarke wrote:

Isn't much of this what SMS is designed to do nowadays?
You can still use SMS.  Jol uses a simple VSAM file to store the 
information in. It's easy to add or change information.

Do I understand two separate modes of operation, dynamic
and generative?
Yes.  It can generate JCL, or use Dynamic Allocation to run the job in 
Batch, or immediately under TSO.



Does it provide en masse enqueues as JCL does, to avoid
deadlocks?  I suppose this would be intrinsic in a generative
mode.
In Dynamic Allocation mode, there is still some JCL generated to 
ensure this.


In TSO (Immediate mode), it is on a program by program basis.

There is also an Enque instruction which you can use to enque on any 
resource.

How does it interface with JES3 setup processing?
It has instructions to interface with JES3. You can also put any JCL 
statement out as part of the generated JCL.


And there is an extremely flexible Macro language you can use to 
create new English style commands. These commands can effectively do 
anything from running programs in the compiler phase, or have them run 
at execution time. Or even generate JCL card images.

In a dynamic mode, are there any restrictions on running
APF-authorized programs?  Must the interpreter be APF-
authorized?
There is a Jol Execution Monitor.  It must be APF authorized to allow 
authorized programs to run. It uses the same style of ATTACH that the 
Initiator uses.


It also allows Jol to put all important information on the Job Log.  
So, for example, all Catalog and Delete statement results can be found 
in one place, instead of having to hunt through the JCL listing.

Ia it portable?  In at least a generative mode, can it run
on a non-z platform?  I keep much of my JCL as here-
documents (in-stream files) in self-tailoring shell scripts
on a Solaris platform (could be z/OS Unix except for
performance and flexibility).

There are two main versions.  The Mainframe version written in Assembler.

The PC version is written in C. It will execute on Windows and 
generate Mainframe JCL to submit.


The Linux version is 99% complete.

And does it address more of the recurrent JCL complaints:

o PARM100 characters?

Parameters can be up to 3,000 characters in length.

o In-stream data sets in procedures?  (Ah!  that's coming in
   z/OS 1.13.)?
Instream data is supported.  Not only that - substitution of Symbolic 
Parameters may be done in the card image files to generate utility 
control cards.


And we can use Allocate, Read and Write instructions for any data set 
at Compile Time.  Data can be read directly into Symbolic Variables, 
and tested and manipulated with IF and SET instructions. This facility 
is used, for example, in the SAVESYMS command which saves specified 
Symbolic Variables in a file that can be accessed by another job to 
created a tailored job stream depending on what the first job did.


There is also a Panel instruction that is used to display full screen 
data entry panels, complete with Menu Bars and Pulldown lists. User 
data entered is stored in Symbolic Variables, and can be used as any 
other Symbolic Variable - tested, added to others, and so on.

o Substitution of dynamic system symbols?
Substitution of  Symbolic Parameters.  Jol automatically sets various 
symbols up such as the current day and so on. Symbolic variables can 
be tested, set or used in arithmetic. For example:


If %day = 'Monday' then
Copy Input.Data.Set to Backup.ofMainFile.%day;   /* Note %day in 
Dsname */


User exits can also create any symbols you require.  Exits can be 
written in Assembler or PL/I.

o Symbol substitution in in-stream data sets?

Yes. For example:
Declare X * replace;
This is a card image file.
Today is %year,%month,%day
EOF;

-- gil


Thanks again,

Clem Clarke

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




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


Re: PR/SM Logical CP issues

2011-07-18 Thread R.S.

W dniu 2011-07-18 14:42, Staller, Allan pisze:

snip
Our CPC (2094-S18-708) now has 8 Physical CP and has 1 production LPAR,
2 maintenance LPARs, 2 ICF LPARs and 2 test LPARs running at the moment.
Currently, all LPARs are equipped with shared CPs and have weight values
assigned. The details are as follows.

production LPAR 1
initial LCP  8
reserved LCP 10
weight 40
/snip

Are you saying that all LPARs have 8 active(shared)/10 reserved LP's
assigned?

If so, this is a bad thing to do! PR/SM overhead is excessive (only the
active LP's affect the overhead).


Can you define excessive or simply tell us how big overhead would you 
expect in such scenario?



The logical/physical ratio should (ROT) not exceed 2 to 1.
I have pushed this to 3 to 1 with some very low activity test LPARs
where performance was not critical.


Let's assume you have 15 LPARs. How would you assign CPs to those LPARs? 
Is it possible to have CP shared between, let's say, 2 LPARs, but not 
other 13?
As far as I know the only choice is SHARED or DEDICATED. Shared by *all* 
LPARs. There is also CF CPU(n),OFFLINE...


[...]

No. IBM does not prevent you from defining more LP's than CP's. However
the overhead becomes excessive when the LP/CP ratio exceeds (2 to 3) to
1.


IBM allows to create 60 LPARs on machines with theoretical limitation 32 
CPs. z/990D32.


Regards
--
Radoslaw Skorupka
Lodz, Poland


--
Tre tej wiadomoci moe zawiera informacje prawnie chronione Banku 
przeznaczone wycznie do uytku subowego adresata. Odbiorc moe by jedynie 
jej adresat z wyczeniem dostpu osób trzecich. Jeeli nie jeste adresatem 
niniejszej wiadomoci lub pracownikiem upowanionym do jej przekazania 
adresatowi, informujemy, e jej rozpowszechnianie, kopiowanie, rozprowadzanie 
lub inne dziaanie o podobnym charakterze jest prawnie zabronione i moe by 
karalne. Jeeli otrzymae t wiadomo omykowo, prosimy niezwocznie 
zawiadomi nadawc wysyajc odpowied oraz trwale usun t wiadomo 
wczajc w to wszelkie jej kopie wydrukowane lub zapisane na dysku.

This e-mail may contain legally privileged information of the Bank and is intended solely for business use of the addressee. This e-mail may only be received by the addressee and may not be disclosed to any third parties. If you are not the intended addressee of this e-mail or the employee authorised to forward it to the addressee, be advised that any dissemination, copying, distribution or any other similar activity is legally prohibited and may be punishable. If you received this e-mail by mistake please advise the sender immediately by using the reply facility in your e-mail software and delete permanently this e-mail including any copies of it either printed or saved to hard drive. 


BRE Bank SA, 00-950 Warszawa, ul. Senatorska 18, tel. +48 (22) 829 00 00, fax 
+48 (22) 829 00 33, e-mail: i...@brebank.pl
Sd Rejonowy dla m. st. Warszawy XII Wydzia Gospodarczy Krajowego Rejestru Sdowego, nr rejestru przedsibiorców KRS 025237, NIP: 526-021-50-88. 
Wedug stanu na dzie 01.01.2011 r. kapita zakadowy BRE Banku SA (w caoci wpacony) wynosi 168.346.696 zotych.


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


Re: How to merge two differents files with ICETOOL

2011-07-18 Thread Elardus Engelbrecht
Hilario G. wrote:

I need to obtain an output file of 300 bytes from two differents files:

- FILE1 with a lenght of 80
- FILE2 with a lenght of 300

I need to merge both files, first FILE1 and after FILE2.

I have several tested but I don't find the correct solution.

Did you supplied to Frank Yaeger what he asked in thread:
'How to obtain a file bigger than 80 chars from two inputs file'

Groete / Greetings
Elardus Engelbrecht

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


Re: PR/SM Logical CP issues

2011-07-18 Thread R.S.

Alex,
1. What about ICF processors? Do you run ICF LPARS on regular CP's?
If yes, then I would strongly recommend to change it. It is strongly 
recomended to use dedicated processors for CF, and ICF engine is much 
cheaper.


2. I don't like idea to dedicate CPs for tests. IMHO t should be enough 
to dedicate CP weight. Such weight can be easily and quickly changed 
from test mode to production mode. And I don't buy the requirement 
- IMHO it's not justified.


3. If you reaaly want to assign 6 CPs for 2 LPARS then all the rest have 
2 CPs. Not so bad, assuming you have ICFs for ICF LPARs. Of course not 
so bad means you can share the CPs, but I don't know your CPU power 
requirements - maybe you need 250 MSU and you have only 160 MSU. The 
number of CPs is not primary issue here.


4. LPAR reactivation. Yes, it is possible. Yes I did it. No, it doesn't 
affect other LPARs. But in your case - change CP from shared to 
dedicated - I believe - you will need to deactivate all LPARs using 
those CPs. However the only risk is failure of the operation - you'd get 
a message saying the change cannot be performed.
BTW: I still suggest to assign equivalent CPU power in shared CPs 
instead of dedicating the CPs.




BTW: I remember I worked on 1 CP. We had 5 LPARs then. It was not very 
strong 9672-RA4 (37 MIPS).


--
Radoslaw Skorupka
Lodz, Poland



W dniu 2011-07-18 05:51, Alex Wang pisze:

Our CPC (2094-S18-708) now has 8 Physical CP and has 1 production LPAR, 2 
maintenance LPARs, 2 ICF LPARs and 2 test LPARs running at the moment. 
Currently, all LPARs are equipped with shared CPs and have weight values 
assigned. The details are as follows.

production LPAR 1
initial LCP  8
reserved LCP 10
weight 40

The maintenance LPARs, ICF LPARs and test LPARs have similar configuration but 
less weight valule specified.

Now, we plan to assign each test LPARs with 3 dedicated CPs due to some test 
requirements. That is to say, the 2 test LPARs will cost 6 physical CPs in 
total.

We have referred to the z9 PR/SM planning guide. It's saying we just need to 
create new image profiles and deactive/active test LPARs. Then the changes will 
be available.

Meanwhile, however, does this operation have any impact on other LPARs running 
in the same CPC? For example, do we need to deactive the production LPAR and 
change its image profile. Because there will be only 2 PCPs available for it, 
however, it has 8 LCPs configured.

That would be great if everyone of you could show me the solid proof of a 
manual or based on your work experience.

Thanks in advance!

P.S.
We also consider a senario saying we have a CPC with only 1 PCP. If we set a 
LPAR with 1 dedicated CP. Can we have another LPAR run in the same CPC with 1 
shared LCP?

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






--
Tre tej wiadomoci moe zawiera informacje prawnie chronione Banku 
przeznaczone wycznie do uytku subowego adresata. Odbiorc moe by jedynie 
jej adresat z wyczeniem dostpu osób trzecich. Jeeli nie jeste adresatem 
niniejszej wiadomoci lub pracownikiem upowanionym do jej przekazania 
adresatowi, informujemy, e jej rozpowszechnianie, kopiowanie, rozprowadzanie 
lub inne dziaanie o podobnym charakterze jest prawnie zabronione i moe by 
karalne. Jeeli otrzymae t wiadomo omykowo, prosimy niezwocznie 
zawiadomi nadawc wysyajc odpowied oraz trwale usun t wiadomo 
wczajc w to wszelkie jej kopie wydrukowane lub zapisane na dysku.

This e-mail may contain legally privileged information of the Bank and is intended solely for business use of the addressee. This e-mail may only be received by the addressee and may not be disclosed to any third parties. If you are not the intended addressee of this e-mail or the employee authorised to forward it to the addressee, be advised that any dissemination, copying, distribution or any other similar activity is legally prohibited and may be punishable. If you received this e-mail by mistake please advise the sender immediately by using the reply facility in your e-mail software and delete permanently this e-mail including any copies of it either printed or saved to hard drive. 


BRE Bank SA, 00-950 Warszawa, ul. Senatorska 18, tel. +48 (22) 829 00 00, fax 
+48 (22) 829 00 33, e-mail: i...@brebank.pl
Sd Rejonowy dla m. st. Warszawy XII Wydzia Gospodarczy Krajowego Rejestru Sdowego, nr rejestru przedsibiorców KRS 025237, NIP: 526-021-50-88. 
Wedug stanu na dzie 01.01.2011 r. kapita zakadowy BRE Banku SA (w caoci wpacony) wynosi 168.346.696 zotych.


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

Re: Making Z/OS easier - Effectively replacing JCL with Unix like commands

2011-07-18 Thread Charles Mills
 The Mainframe version written in Assembler. The PC version is written in
C.

Somewhat OT but why? Why not C on the mainframe? Why two code bases, one
fairly easy to debug and one relatively hard to debug?

I am thrilled with writing software for the mainframe in C (C++ actually)
after years of laboring in assembler.

Charles

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf
Of Clement Clarke
Sent: Monday, July 18, 2011 8:42 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Making Z/OS easier - Effectively replacing JCL with Unix like
commands

Thanks for all the questions.  I'll put the questions and answers together
for convenience.

Paul Gilmartin wrote:
 On Sun, 17 Jul 2011 23:35:30 +1000, Clement Clarke wrote:

 Isn't much of this what SMS is designed to do nowadays?
You can still use SMS.  Jol uses a simple VSAM file to store the information
in. It's easy to add or change information.
 Do I understand two separate modes of operation, dynamic and 
 generative?
Yes.  It can generate JCL, or use Dynamic Allocation to run the job in
Batch, or immediately under TSO.

 Does it provide en masse enqueues as JCL does, to avoid deadlocks?  I 
 suppose this would be intrinsic in a generative mode.
In Dynamic Allocation mode, there is still some JCL generated to ensure
this.

In TSO (Immediate mode), it is on a program by program basis.

There is also an Enque instruction which you can use to enque on any
resource.
 How does it interface with JES3 setup processing?
It has instructions to interface with JES3. You can also put any JCL
statement out as part of the generated JCL.

And there is an extremely flexible Macro language you can use to create new
English style commands. These commands can effectively do anything from
running programs in the compiler phase, or have them run at execution time.
Or even generate JCL card images.
 In a dynamic mode, are there any restrictions on running 
 APF-authorized programs?  Must the interpreter be APF- authorized?
There is a Jol Execution Monitor.  It must be APF authorized to allow
authorized programs to run. It uses the same style of ATTACH that the
Initiator uses.

It also allows Jol to put all important information on the Job Log.  So, for
example, all Catalog and Delete statement results can be found in one place,
instead of having to hunt through the JCL listing.
 Ia it portable?  In at least a generative mode, can it run on a non-z 
 platform?  I keep much of my JCL as here- documents (in-stream files) 
 in self-tailoring shell scripts on a Solaris platform (could be z/OS 
 Unix except for performance and flexibility).
There are two main versions.  The Mainframe version written in Assembler.

The PC version is written in C. It will execute on Windows and generate
Mainframe JCL to submit.

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


Re: Allocations greater than 65535 tracks

2011-07-18 Thread Art Gutowski
On Fri, 15 Jul 2011 19:29:34 +, Mingee, David 
david.min...@libertymutual.com wrote:

Yes, I think the number than causes the failure is cyl 4104?  The math is too 
hard for me.

4369 Cylinders = 65535 Tracks

Regards,
Art Gutowski
Compuware Corporation

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


Re: PR/SM Logical CP issues

2011-07-18 Thread Staller, Allan
SNIP
 snip
 Our CPC (2094-S18-708) now has 8 Physical CP and has 1 production
LPAR,
 2 maintenance LPARs, 2 ICF LPARs and 2 test LPARs running at the
moment.
 Currently, all LPARs are equipped with shared CPs and have weight
values
 assigned. The details are as follows.

 production LPAR 1
 initial LCP  8
 reserved LCP 10
 weight 40
 /snip

 Are you saying that all LPARs have 8 active(shared)/10 reserved LP's
 assigned?

 If so, this is a bad thing to do! PR/SM overhead is excessive (only
the
 active LP's affect the overhead).

Can you define excessive or simply tell us how big overhead would you 
expect in such scenario?
/SNIP

I have seen about 15% of capacity in a large (before corrected)
scenario. YMMV.

SNIP
 The logical/physical ratio should (ROT) not exceed 2 to 1.
 I have pushed this to 3 to 1 with some very low activity test LPARs
 where performance was not critical.

Let's assume you have 15 LPARs. How would you assign CPs to those LPARs?

Is it possible to have CP shared between, let's say, 2 LPARs, but not 
other 13?
As far as I know the only choice is SHARED or DEDICATED. Shared by *all*

LPARs. There is also CF CPU(n),OFFLINE...
/SNIP
IIRC, the meaning of DEDICATED is that work on this group of CPs will
only be dispatched on these CPs. SHARED CPs *may* be dispatched on
DEDICATED processors if resource is available (I am sure someone will
correct me this is not true). This reduces context switch between the
processors and reduces overhead. CF CPU(N),OFFLINE will reduce the
number of logical processors to be dispatched and improve the LP:CP
ratio.

SNIP
[...]
 No. IBM does not prevent you from defining more LP's than CP's.
However
 the overhead becomes excessive when the LP/CP ratio exceeds (2 to 3)
to
 1.

IBM allows to create 60 LPARs on machines with theoretical limitation 32

CPs. z/990D32.
/SNIP

See above. IBM does not prevent you from doing this. However, the
results may not be something desirable. Kathy Walsh and Cheryl Watson
have both consistently recommended that the LP to CP ration be less than
2:1. My experience corresponds with their recommendations.

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


Re: How to merge two differents files with ICETOOL

2011-07-18 Thread John McKown
Do you truly mean merge? That implies that the records have some sort
of key field(s) and you want to interleave the records in the two files
together based on the key(s). Or do you mean concatenate as in create
a new file will all the records of the first file, in their current
order, followed by all the records of the second file, in their current
order? It seems, to me based on your example JCL, you want to
concatenate with an output of 300 bytes. Do you want to pad the 80 byte
records with blanks or x'00's or some other character? 

You're very close! In the CTL1CNTL use the OUTREC command to make the 80
byte records 300 bytes by padding. Something like:

//CTL1CNTL DD *
 OUTREC FIELDS=(1,80,220X)
/*

On Mon, 2011-07-18 at 07:18 -0500, Hilario G. wrote:
 Hello folks,
 
 I need to obtain an output file of 300 bytes from two differents files:
 
 - FILE1 with a lenght of 80
 - FILE2 with a lenght of 300
 
 I need to merge both files, first FILE1 and after FILE2. 
 
 I have several tested but I don't find the correct solution.
 
 The last one  JCL that I used, I only obtain FILE2:
 
 //STEP0001  EXEC  PGM=ICETOOL
 //TOOLMSG  DD SYSOUT=*
 //DFSMSG DD SYSOUT=*
 //IN1DD DSN=FILE1,DISP=SHR
 //IN2DD DSN=FILE2,DISP=SHR
 //OUT   DD DSN=FILE3,SPACE=(CYL,(10,1),RLSE),
 // DISP=(NEW,CATLG,DELETE),UNIT=SYSDA,
 // DCB=(LRECL=300,RECFM=FB)
 //TOOLIN DD *
 COPY  FROM(IN1) TO(OUT) USING(CTL1)
 COPY  FROM(IN2) TO(OUT) USING(CTL2)
 //CTL1CNTL DD *
   INREC FIELDS=(1,80)
 //CTL2CNTL DD *
   INREC FIELDS=(1,300)
 /*
 
 Where is the error or how to obtain FILE3 with the combination of two 
 different files ?
 
 Kind Regards
 
 Hilario Garcia
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html
-- 
John McKown
Maranatha! 

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


Re: Explination of EUT/FRR

2011-07-18 Thread Bill Fairchild
Read what the Authorized Assembler Services Guide has to say about EUT for a 
background info level set.

Bill Fairchild
Rocket Software

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
michealbutz
Sent: Sunday, July 17, 2011 2:46 PM
To: IBM-MAIN@bama.ua.edu
Subject: Explination of EUT/FRR

Hi,


  I have seen these terms EUT Enabled Unlocked Task /FRR and this my 
understanding


  I ASSUME Enabled means Enabled for I/O interrupts BIT 6 of Psw the only way I 
know how to set this is with the LPSW inst

  Unlocked means not holding a Lock  Holding a Lock means using   some Flavor 
of the
SetLock

 Task means running in Task Mode as opposed to a SRB


  When the Term FRR is appended it means this unit of work is protected by a 
FRR   


Thnks in Advance for any clarifications
  

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

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


Re: Explination of EUT/FRR

2011-07-18 Thread Bill Fairchild
The STNSM and STOSM instructions can also be used to disable or enable a CPU 
for I/O and external interrupts.

Bill Fairchild
Rocket Software

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
michealbutz
Sent: Sunday, July 17, 2011 2:46 PM
To: IBM-MAIN@bama.ua.edu
Subject: Explination of EUT/FRR

Hi,


  I have seen these terms EUT Enabled Unlocked Task /FRR and this my 
understanding


  I ASSUME Enabled means Enabled for I/O interrupts BIT 6 of Psw the only way I 
know how to set this is with the LPSW inst

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


Re: Making Z/OS easier - Effectively replacing JCL with Unix like commands

2011-07-18 Thread Gerhard Postpischil

On 7/18/2011 9:22 AM, Charles Mills wrote:

The Mainframe version written in Assembler. The PC version is written in

C.

Somewhat OT but why? Why not C on the mainframe? Why two code bases, one
fairly easy to debug and one relatively hard to debug?


Perhaps there are historical reasons - one version existed long 
before Clement decided to add PC support, and the C route looked 
easier than converting mainframe assembler to PC?



I am thrilled with writing software for the mainframe in C (C++ actually)
after years of laboring in assembler.


Good for you, but some of us have built extensive macro and 
subroutine libraries to use with assembler, and find it as fast 
and easy to use those than to live with (the confining 
limitations of) higher level languages. De gustibus.


Gerhard Postpischil
Bradford, VT

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


Re: need help trying to apply PSP bucket ptf's for z/OS 1.9

2011-07-18 Thread Kurt Quackenbush

I checked my UTILITY ENTRY LKED and it has HIGHEST RETURN CODE,===,4

but my SMPE says:  MAX ACCEPTABLE RC=0


There are three possible sources for the maximum acceptable return code 
for a load module, used in this order:


1) RETURN CODE subentry in the LMOD entry.  Gleaned from the JCLIN if 
specified, this value is stored in the LMOD entry and used whenever the 
subject load module is link edited.  In this situation, LMOD IEAVNPF9 
does indeed have a RETURN CODE subentry of 0 as defined in its JCLIN, 
hence you see the comment MAX ACCEPTABLE RC=0 in the link edit control 
statement output.


2) RETURN CODE subentry in the UTILITY entry.  Defined by you, usually 
with recommendations from the software vendor (for z/OS IBM recommends 
RC=4).  Remember the active UTILITY entry is identified by the active 
OPTIONS entry, and the active OPTIONS entry is either specified on the 
SET command or defined in the TZONE entry as the default OPTIONS entry 
to use for that target zone.


3) SMP/E's default link edit return code.  The default value is 8, which 
is used only if a value was not found in the LMOD entry or the active 
UTILITY entry.


Kurt Quackenbush -- IBM, SMP/E Development

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


Re: Lines, Bars and ... mini-bars???

2011-07-18 Thread Bill Fairchild
He did not say the PC instruction will not work above the bar, nor am I saying 
that it will work above the bar.  He also did not say that branching will not 
work above the bar.  I would add that neither am I saying that branching will 
work above the bar except that I think it is too obvious to us all that 
branching around within the load module above the bar must work.  He said that 
system routines cannot be called from code resident above the bar.  There are 
three current ways to invoke system routines, branching, SVCing, and PCing.  
None of them will work if the code being branched, SVCed, or PCed to is a 
system routine.

Bill Fairchild
Rocket Software

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Binyamin Dissen
Sent: Monday, July 18, 2011 4:31 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Lines, Bars and ... mini-bars???

On Sun, 17 Jul 2011 18:09:44 -0400 Peter Relson rel...@us.ibm.com wrote:

:The z/OS 1.13 support is for a program to be able to survive the things 
:that programs cannot typically avoid -- such as external and I/O 
:interrupts, page faults.

:If you can get your program up there (whether by yourself or by use of 
:directed load (LOAD with ADDR64), and if it calls no system routines of 
:any kind (whether by branch, SVC, or PC), then have at it.  You cannot 
:LINK, LOAD (wtihout ADDR64), ATTACH, XCTL, SYNCH or IDENTIFY to something 
:above 2G.

I can understand why SVC would not work as there ain't nowhere to save the full 
PSW. And branching in AMODE64 to a routine that does not expect it would lead 
to astonishment.

But the hardware does the entire PC process. The stack entry has plenty of room 
for the entire PSW. One wonders why the residency would have an effect (with 
the exception of LOC=RES which may incorrectly determine the RMODE of the 
caller).

:This should not be construed to imply that further support will be 
:forthcoming.

--
Binyamin Dissen bdis...@dissensoftware.com 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 
lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at 
http://bama.ua.edu/archives/ibm-main.html

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


Re: PR/SM Logical CP issues

2011-07-18 Thread Ted MacNEIL
Because there will be only
2 PCPs available for it, however, it has 8 LCPs configured. 
/snip

No. IBM does not prevent you from defining more LP's than CP's. However
the overhead becomes excessive when the LP/CP ratio exceeds (2 to 3) to
1.

Actually, PR/SM does NOT allow this.
If there are only two (physically) available, the max allowed for any LPAR is 
two.
Dedicated CPs are removed from the shared pool.
-
Ted MacNEIL
eamacn...@yahoo.ca
Twitter: @TedMacNEIL

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


z/OS COBOL Programmer/Designer Contractor Want

2011-07-18 Thread Cheryl Watson
(Posting approved by Darren)

We are looking for a very experienced z/OS COBOL programmer/designer for some 
part-time contract work. You can work from home, but need the ability to use 
TN3270 to log into our test system in Dallas. (Evenings and weekends are fine.) 
Because most communication will be via email, you also need fairly good 
communications skills. 

We are developing some software tools in z/OS COBOL, and need the experience of 
someone who considers themselves an expert. You also need to be efficient in 
ISPF and DFSort, because both will be used quite heavily. There is no specific 
time frame for the project, although we are ready to get started now. We'd like 
a commitment of some number of hours per week, but that can vary from two to 
eight (or more), depending on your situation. You will need to sign a 
non-disclosure agreement before starting. We do not have a specific pay rate in 
mind, but will pay what we need for the right experienced person.

Please send your resume, rate requirements, time availability (hours per week 
and when you might be available). If your resume looks promising, we'll send 
you a mutual non-disclosure agreement and request a sample of a COBOL program 
that you've written.

In case you're wondering, we did post this to the COBOL Users Group, but 
without adequate response. While we know that IBM-Main is not loaded with lots 
of COBOL programmers, we think you might know of someone who could be 
interested, could pass this along or post it elsewhere.

Best regards,
Cheryl
==
Cheryl Watson
Watson  Walker, Inc.
www.watsonwalker.com
941-266-6609
==

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


Authors Wanted for Cheryl Watson's Tuning Letter

2011-07-18 Thread Cheryl Watson
(Posting approved by Darren)

We are looking for occasional authors for our Tuning Letter. It's published six 
times a  year. The articles will be similar to those we currently include, but 
will address areas that would require too much research time for me personally. 
If you are interested for writing for us, please send your resume and indicate 
your areas of expertise. If you have already written articles for other 
publications, please send us an example of your writing. (Previously published 
articles are OK, and might be used if you have the right to republish.)  

We are especially interested in performance and usage expertise on DFSMS, GDPS, 
CICS, JES2, sysplex, RMF, Unix, zLinux, ZFS, and Communications Server. The 
articles for our Tuning Letter will need to conform to our standards, such as 
always including an introductory explanation and overview, and providing as 
many specific references as possible.  

Best regards,
Cheryl
==
Cheryl Watson
Watson  Walker, Inc.
www.watsonwalker.com
941-266-6609
==

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


Re: PR/SM Logical CP issues

2011-07-18 Thread Ted MacNEIL
ASHARED CPs *may* be dispatched on
DEDICATED processors if resource is available (I am sure someone will
correct me this is not true).

Assuredly.
Dedicated processors are just that.
Dedicated!
Only the lPAR they're assigned to may run work on them, regardless of the 
activity.
That's why I agree with RS -- use equivalent weights instead.
-
Ted MacNEIL
eamacn...@yahoo.ca
Twitter: @TedMacNEIL

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


Re: PR/SM Logical CP issues

2011-07-18 Thread Staller, Allan
Thanks for correcting my erroneous impression.

snip
ASHARED CPs *may* be dispatched on
DEDICATED processors if resource is available (I am sure someone will
correct me this is not true).

Assuredly.
Dedicated processors are just that.
Dedicated!
Only the lPAR they're assigned to may run work on them, regardless of
the activity.
That's why I agree with RS -- use equivalent weights instead.
/snip

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


Re: Lines, Bars and ... mini-bars???

2011-07-18 Thread Bob Shannon
He did not say the PC instruction will not work above the bar

The Entry Table Entry for a PC routine has not been expanded to 64 bits. Until 
it is, a PC routine cannot be above the Bar. It appears that Amode 64 is 
supported (but not documented) but the PC routine cannot reside above the Bar

Bob Shannon

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


Re: Servicing z/OSMF (Was: A Warning to Anyone Servicing z/OSMF - SOLVED!)

2011-07-18 Thread Edward Jaffe

On 7/16/2011 8:28 PM, Greg Dorner wrote:

I've experienced some strange install/maintenance scenarios with  z/OSMF, but 
have managed so far to get it all put back together again. I went from z/OS 
1.10 to 1.12 with z/OSMF, which was a bit tricky with all the config file 
changes, but I haven't had any problems with PTF's. You just need to NOT take 
the holddata literally. They give you the parameters to run the shell script. 
but the user controlled variables, like config name and location must be 
replaced with those required for your environment. The doc in the hold could be 
worded much better.


The primary intent of my post was to ascertain, from IBM-MAIN participants with 
off-platform WAS maintenance experience, whether similar manual, post-service 
requirements exist on other platforms or if this need is a z/OS idiosyncrasy...


--
Edward E Jaffe
Phoenix Software International, Inc
831 Parkview Drive North
El Segundo, CA 90245
310-338-0400 x318
edja...@phoenixsoftware.com
http://www.phoenixsoftware.com/

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


Re: WLM Resource Group zIIP

2011-07-18 Thread Betsy Jeffery
Thank you Scott; good to know.

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


Re: Lines, Bars and ... mini-bars???

2011-07-18 Thread Paul Gilmartin
On Mon, 18 Jul 2011 14:45:35 +, Bob Shannon wrote:

He did not say the PC instruction will not work above the bar

The Entry Table Entry for a PC routine has not been expanded to 64 bits. Until 
it is, a PC routine cannot be above the Bar. It appears that Amode 64 is 
supported (but not documented) but the PC routine cannot reside above the Bar
 
Is this a hardware restriction?

I had thought the hardware design was running far ahead of the software
in erasing all the lines and bars.  I suppose a linkage vector could reside
below the bar and the bulk of the code above.

I also thought that Linux for z was free of 31- and 24-bit dependencies.
What facility (branch, SVC, or PC) does Linux use for system requests?
(It can't be purely branch because it's necessary at some point to enter
Supervisor state.)

-- gil

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


Re: DFHSM QUESTION - PRIMARY SPACE MANAGEMENT

2011-07-18 Thread willie bunter
Sorry for my delayed response to your questions.  I asked our SMF guru for a 
description of the 2 SMF records in question, here is what I got:
 
136 IGGPOST0 DADSM Alloc.
139 IGGPOST0 DADSM Scratch

I am still looking for the reason.  I think, as most have suggested, that DFHSM 
is the culprit.  However since I do not have the SMF tapes going back to 
October 24 2010 backwrds it is hard to prove the cause of the deletion. 

--- On Wed, 7/13/11, Elardus Engelbrecht elardus.engelbre...@sita.co.za wrote:


From: Elardus Engelbrecht elardus.engelbre...@sita.co.za
Subject: Re: DFHSM QUESTION - PRIMARY SPACE MANAGEMENT
To: IBM-MAIN@bama.ua.edu
Received: Wednesday, July 13, 2011, 11:47 AM


Elardus Engelbrecht wrote:

willie bunter wrote:
I went back as far as July 01 SMF records and nothing showed despite 
searching for records 14 15 17 18 61 62 63 64 65 67 68 136  139

Why SMF record type 138 and 139? What product is generating them?

Aw, f**  s***, I really mean SMF type 136, not 138! Damn that stupid fingers of 
me! ;-D

Groete / Greetings
Elardus Engelbrecht

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

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


Re: DFHSM QUESTION - PRIMARY SPACE MANAGEMENT

2011-07-18 Thread Darth Keller
DFHSM is the culprit.

On behalf of DFHSM, I object.  HSM merely enforces policy.  If there's a 
culprit here, it would be the person(s) who designed the policy or maybe 
applications for not understanding the rules.  They do know there are 
rules, right?

;o)
ddk

This e-mail message and all attachments transmitted with it may
contain legally privileged and/or confidential information intended
solely for the use of the addressee(s). If the reader of this
message is not the intended recipient, you are hereby notified that
any reading, dissemination, distribution, copying, forwarding or
other use of this message or its attachments is strictly
prohibited. If you have received this message in error, please
notify the sender immediately and delete this message and all
copies and backups thereof. Thank you.

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


Re: DFHSM QUESTION - PRIMARY SPACE MANAGEMENT

2011-07-18 Thread willie bunter
Darth,
 
You are spot on.  HSM is doing what it is supposed to do.  I cannot understand 
why the STC didn't use the dsn during all this time.  Although it is in the 
startup the program which calls the dsn hasn't been used at least since October 
24, 2010. 

--- On Mon, 7/18/11, Darth Keller darth.kel...@assurant.com wrote:


From: Darth Keller darth.kel...@assurant.com
Subject: Re: DFHSM QUESTION - PRIMARY SPACE MANAGEMENT
To: IBM-MAIN@bama.ua.edu
Received: Monday, July 18, 2011, 8:25 AM


DFHSM is the culprit.

On behalf of DFHSM, I object.  HSM merely enforces policy.  If there's a 
culprit here, it would be the person(s) who designed the policy or maybe 
applications for not understanding the rules.  They do know there are 
rules, right?

;o)
ddk

This e-mail message and all attachments transmitted with it may
contain legally privileged and/or confidential information intended
solely for the use of the addressee(s). If the reader of this
message is not the intended recipient, you are hereby notified that
any reading, dissemination, distribution, copying, forwarding or
other use of this message or its attachments is strictly
prohibited. If you have received this message in error, please
notify the sender immediately and delete this message and all
copies and backups thereof. Thank you.

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

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


Re: Lines, Bars and ... mini-bars???

2011-07-18 Thread John McKown
z/LINUX uses SVC to invoke the kernel.

Which I find most interesting as it means that, theoretically, one could
write a z/LINUX ABI interface which uses Subsystem SVC screening to run
z/Linux applications on z/OS UNIX.

On Mon, 2011-07-18 at 10:14 -0500, Paul Gilmartin wrote:
 On Mon, 18 Jul 2011 14:45:35 +, Bob Shannon wrote:
 
 He did not say the PC instruction will not work above the bar
 
 The Entry Table Entry for a PC routine has not been expanded to 64 bits. 
 Until it is, a PC routine cannot be above the Bar. It appears that Amode 64 
 is supported (but not documented) but the PC routine cannot reside above the 
 Bar
  
 Is this a hardware restriction?
 
 I had thought the hardware design was running far ahead of the software
 in erasing all the lines and bars.  I suppose a linkage vector could reside
 below the bar and the bulk of the code above.
 
 I also thought that Linux for z was free of 31- and 24-bit dependencies.
 What facility (branch, SVC, or PC) does Linux use for system requests?
 (It can't be purely branch because it's necessary at some point to enter
 Supervisor state.)
 
 -- gil
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html
-- 
John McKown
Maranatha! 

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


Re: Lines, Bars and ... mini-bars???

2011-07-18 Thread Paul Gilmartin
On Mon, 18 Jul 2011 10:34:52 -0500, John McKown wrote:

z/LINUX uses SVC to invoke the kernel.

Which I find most interesting as it means that, theoretically, one could
write a z/LINUX ABI interface which uses Subsystem SVC screening to run
z/Linux applications on z/OS UNIX.

fork()?  Pipes?  Sockets?  Environment variables?  File access?
EBCDIC--ASCII autoconversion?  SYSCALLS back to Classic
facilities and Classic Data Management?

What are the advantages of PC over SVC?  Why did Linux for z
eschew PC and stay with SVC?

-- gil

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


Re: running Assembler I/O macro code as AMODE 31, RMODE ANY

2011-07-18 Thread Shmuel Metz (Seymour J.)
In 4e20f40d.2050...@phoenixsoftware.com, on 07/15/2011
   at 07:14 PM, Edward Jaffe edja...@phoenixsoftware.com said:

There is no way the processor can know in advance which bits will be
on in a  branch target register, so its seems likely that the
pipeline must be flushed  when 'surprise' AMODE switching occurs for
pointer-defined linkage. 

Why would a branch with AMODE switching require more pipeline flushing
than a branch without?
 
-- 
 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Making Z/OS easier - Effectively replacing JCL with Unix like commands

2011-07-18 Thread Shmuel Metz (Seymour J.)
In 3339201005293115.wa.paulgboulderaim@bama.ua.edu, on
07/17/2011
   at 11:13 AM, Paul Gilmartin paulgboul...@aim.com said:

It's pretty hard to tell whether you're a Luddite or merely a
masochist.

Especially if he's neither, just more perceptive than you.
 
-- 
 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Lines, Bars and ... mini-bars???

2011-07-18 Thread John McKown
On Mon, 2011-07-18 at 10:47 -0500, Paul Gilmartin wrote:
 On Mon, 18 Jul 2011 10:34:52 -0500, John McKown wrote:
 
 z/LINUX uses SVC to invoke the kernel.
 
 Which I find most interesting as it means that, theoretically, one could
 write a z/LINUX ABI interface which uses Subsystem SVC screening to run
 z/Linux applications on z/OS UNIX.
 
 fork()?  Pipes?  Sockets?  Environment variables?  File access?
 EBCDIC--ASCII autoconversion?  SYSCALLS back to Classic
 facilities and Classic Data Management?

Well the emulation should take care fork(), pipes, and sockets by doing
conversion from the Linux requirements to the z/OS requirements, then
invoking the z/OS equivalent (if any).

Classic facilities? Well, that's more difficult. Simplest would be to
declare the z/Linux to be a closed world with little or no interface to
classic stuff. Try to run a normal shell script and read a sequential
dataset.

Code translation is a PITA. Environment variables could be kept in
native code points for easy of use by Linux code. Create a new
facility in z/OS UNIX to access ASCII oriented environment variables.
Perhaps ${{varname}} instead of ${varname} which the z/OS UNIX shell
would recognize as varname needs to be translated to UTF-8 or Unicode
before doing a lookup in the environment table, then translate back to
the z/OS UNIX shell's code point for its value. As you say: I hate
EBCDIC!

 
 What are the advantages of PC over SVC?  Why did Linux for z
 eschew PC and stay with SVC?

Don't know. Talk to IBM. Perhaps it was closest to what x86 uses, which
is the INT instruction (INTerrupt).

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

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


CA-1 TMS QUESTION - IEFTMS9 TMC BACKUP REQUIRED

2011-07-18 Thread esmie moo
Good Morning Gentle Readers,
 
I was called because the following message was coming up on the console:
IEFTMS9 TMC BACKUP REQUIRED, AUDIT FILE UTILISATION IS CURRENTLY 82%.
 
I executed the following job:
//STEP1 EXEC PGM=TMSCOPY,REGION=7M  
//TMSRPT DD  SYSOUT=*    
//TMSOPTNS   DD  DISP=SHR,DSN=SYS4.TMS.PARMLIB(TMSOPTNS) 
//DUMPDD DD  DSN=TMS.HESZ94M1(+1),UNIT=TAPE, 
//  LABEL=1,DISP=(,CATLG),DCB=(DUMDSCB,BLKSIZE=32640),   
//  VOL=(,RETAIN)    
//DUMPDD2    DD  DSN=TMS.HESZ94M2(+1),UNIT=TAPE, 
//  LABEL=1,DISP=(,CATLG),DCB=(DUMDSCB,BLKSIZE=32640),   
//  VOL=(,RETAIN),DATACLAS=OFFSITE   
//AUDITDD    DD  DSN=SYS4.TMS.AUDIT,DISP=SHR 
//AUDUMP DD  DSN=AUDIT,UNIT=PASS,DISP=(,PASS), 
// SPACE=(CYL,(20,5)),DCB=BLKSIZE=8880  
//*   
 //STEP2 EXEC PGM=IEBGENER,COND=(0,LT)  
//SYSPRINT   DD  SYSOUT=*  
//SYSUT1 DD  DSN=AUDIT,DISP=(OLD,PASS)   
//SYSUT2 DD  DSN=TMS.HESZ94AF(+1),UNIT=TAPE,LABEL=2,  
//    VOL=REF=*.STEP1.DUMPDD,DISP=(,CATLG),DCB=(DUMDSCB,BLKSIZE=32560) 
//SYSIN  DD  
DUMMY  
//*   
//STEP3 EXEC PGM=IEBGENER,COND=(0,LT)  
//SYSPRINT   DD  SYSOUT=*  
//SYSUT1 DD  DSN=AUDIT,DISP=(OLD,DELETE) 
//SYSUT2 DD  DSN=TMS.HESZ94AF.COPYIDS(+1),UNIT=TAPE,LABEL=2,   
// VOL=REF=*.STEP1.DUMPDD2,DATACLAS=OFFSITE,   
// DISP=(NEW,CATLG),DCB=(DUMDSCB,BLKSIZE=32560)    
//SYSIN  DD  DUMMY 
//*    
 
What I would like to know if this is the correct action to take or should I 
have done something else.  Please advise.
 
Thanks in advance.


 
 

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


Lines, Bars, . . . and mini-bars?!?

2011-07-18 Thread john gilmore
Bob Shannon writes:
 
begin snippet 
The entry table for a PC routine has not been expanded to 64 bits.  Until it 
is, a PC routine cannot be above the Bar.  It appears AMODE 64 is supported 
(but not documented) but the PC routine cannot reside above the bar.
/end snippet
 
His first point is a valid and important one, but I am not sure what the second 
one means.  A 24-bit address can be represented, trivially, as a 64-bit 
address, as can a 31-bit address.  A 64-bit address cannot in general be 
represented as either a 24- or 31-bit one.  I routinely stow tables above the 
bar, using AMODE(64) code resident BELOW the bar to access them.
 
I am sure that Bob Shannon it not himself confused about these issues; but we 
all tend to write things that confuse novices by implicitly confounding AMODE 
and RMODE ones, as evidenced by the strange questions that are asked here.  

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


Re: Lines, Bars and ... mini-bars???

2011-07-18 Thread Bill Fairchild
Having the PC routine above the bar is not the same as having the single PC 
instruction above the bar that is used to invoke the PC routine, wherever the 
PC routine may be loaded.  All that the PC instruction does is generate a 
number and then use that number to index through the linkage table structure to 
find the address of the routine to be called.  Also executing the PC 
instruction in 64-bit addressing mode causes a 63-bit return address to be 
stored somewhere (depending on whether stacking is used or not), so a return to 
the instruction after an above-the-bar PC is possible.  What happens inside the 
called routine is an independent topic.

Bill Fairchild

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Bob Shannon
Sent: Monday, July 18, 2011 9:46 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Lines, Bars and ... mini-bars???

He did not say the PC instruction will not work above the bar

The Entry Table Entry for a PC routine has not been expanded to 64 bits. Until 
it is, a PC routine cannot be above the Bar. It appears that Amode 64 is 
supported (but not documented) but the PC routine cannot reside above the Bar

Bob Shannon

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

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


Need reviewers for new paper: Setting Up the IBM HTTP Server

2011-07-18 Thread Steve Comstock

For years I've suggested to folks they should try the
free (well, included-in-the-price) HTTP server that
comes with z/OS.

Several people have replied that would love some training
in tailoring z/OS UNIX and in setting up the HTTP server.

But those are systems programmer courses and my focus
has always been on the applications side of things.

Finally I've decided to write a paper, a semi-cookbook
if you will, on getting the HTTP server up and running
quickly.

So I've produced a 38-page paper on exactly this. But
I would like some of you systems types to have a look
and see if it is clear and accurate and if there are
better ways to do things and so on, before I publish
the doc on my website.

If you'd be interested in reading / critiquing this
paper, drop me a line off-list and I'll send you a
copy. If you have suggestions that I incorporate I'll
include your name on the acknowledgements page.

Thanks.


--

Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

303-393-8716
http://www.trainersfriend.com

* Special promotion: 15% off on all DB2 training classes
scheduled by September 1, taught by year end 2011

* Check out our entire DB2 curriculum at:
http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm

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


Re: Making Z/OS easier - Effectively replacing JCL with Unix like commands

2011-07-18 Thread Anne Lynn Wheeler
charl...@mcn.org (Charles Mills) writes:
 Somewhat OT but why? Why not C on the mainframe? Why two code bases, one
 fairly easy to debug and one relatively hard to debug?

 I am thrilled with writing software for the mainframe in C (C++ actually)
 after years of laboring in assembler.

the los gatos vlsi lab was using metaware for a lot of (mainframe) vlsi
tool development. two people from the group then di mainframe pascal
compiler ... which eventually evolved into vs/pascal product.

I was working on getting one of the people (responsible for mainframe
pascal) to do C language front-end ... when he left and went to work for
metaware. when the palo alto group was planning on doing BSD unix for
mainframe, I talked them into contracting with metaware for the C
compiler. However, before that mainframe BSD unix shipped, the group was
retargeted to PC/RT ... eventually coming out with AOS (bsd unix
running on pc/rt) ... but still using metaware's c compiler.

the disk division eventually sponsored the posix support on MVS ...  one
of the many things they were doing to try and get around the
stranglehold that the communication group had on the mainframe
datacenter (most of which the communication group vetoed ... since the
communication group had strategic ownership for everything that crossed
the datacenter walls; disk division being hdqtrd in silicon valley
possibly helped with their perspective)

misc past posts mentioning disk division talk at annual, internal,
world-wide communication group conference that started out with the
statement that the communication group was going to be responsible for
the demise of the disk division (the communication group stranglehold
was already resulting in data fleeing the mainframe datacenter to more
distributed computing friendly platforms).
http://www.garlic.com/~lynn/subnetwork.html#terminal

a co-worker that helped with the original CMSBACK (eventually morphs
into today's TSM) ... misc. past posts
http://www.garlic.com/~lynn/submain.html#backup

... left and did a lot of consulting for various silicon valley chip
shops. At one place, he did a lot of work and enhancements for the ATT
C compiler (and some number of other vendor C compilers) for their
operations on mainframe (as part of porting BSD vlsi tools to the
mainframe). At one point he was doing a lot of work doing mainframe
ethernet support as part of supporting SGI graphics workstations for
displaying VLSI designs. The salesman dropped in and asked him what was
going on and after being told, the salesman suggested that he should be
doing token-ring support instead (or otherwise the customer might find
mainframe support and maintenance suffering).  Afterwards, I got a phone
call and had to listen to several hours of comments about the company,
local branch office and salesmen. The next morning, the vlsi company had
big press release that they were moving off mainframe to servers.

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

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


Re: CA-1 TMS QUESTION - IEFTMS9 TMC BACKUP REQUIRED

2011-07-18 Thread Jonathan Goossen
This looks correct. You JCL runs TMSCOPY to backup the TMC and audit 
files. If the audit file gets down to 3 records, your tape processing 
would stop until you ran TMSCOPY.

The message may be due to a much larger tape activity on a one time bases, 
in which case you likely need look no further. But if it is from normal 
growth, then you will start seeing the message more often, in which case 
you will either need to run TMSCOPY more frequently, or expand your audit 
file.

Thank you and have a Terrific day!

Jonathan Goossen, ACS, CL
Tape Specialist
ACT Mainframe Storage Group
Personal: 651-361-4541
Department Support Line: 651-361-

IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu wrote on 07/18/2011 
11:12:59 AM:

 From: esmie moo esmie_...@yahoo.ca
 To: IBM-MAIN@bama.ua.edu
 Date: 07/18/2011 11:18 AM
 Subject: CA-1 TMS QUESTION - IEFTMS9 TMC BACKUP REQUIRED
 Sent by: IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu
 
 Good Morning Gentle Readers,
  
 I was called because the following message was coming up on the console:
 IEFTMS9 TMC BACKUP REQUIRED, AUDIT FILE UTILISATION IS CURRENTLY 82%.
  
 I executed the following job:
 //STEP1 EXEC PGM=TMSCOPY,REGION=7M  
 //TMSRPT DD  SYSOUT=*
 //TMSOPTNS   DD  DISP=SHR,DSN=SYS4.TMS.PARMLIB(TMSOPTNS) 
 //DUMPDD DD  DSN=TMS.HESZ94M1(+1),UNIT=TAPE, 
 //  LABEL=1,DISP=(,CATLG),DCB=(DUMDSCB,BLKSIZE=32640),   
 //  VOL=(,RETAIN)
 //DUMPDD2DD  DSN=TMS.HESZ94M2(+1),UNIT=TAPE, 
 //  LABEL=1,DISP=(,CATLG),DCB=(DUMDSCB,BLKSIZE=32640),   
 //  VOL=(,RETAIN),DATACLAS=OFFSITE   
 //AUDITDDDD  DSN=SYS4.TMS.AUDIT,DISP=SHR 
 //AUDUMP DD  DSN=AUDIT,UNIT=PASS,DISP=(,PASS), 
 // SPACE=(CYL,(20,5)),DCB=BLKSIZE=8880  
 //
 
*   
 //STEP2 EXEC PGM=IEBGENER,COND=(0,LT)  
 //SYSPRINT   DD  SYSOUT=*  
 //SYSUT1 DD  DSN=AUDIT,DISP=(OLD,PASS)   
 //SYSUT2 DD  
DSN=TMS.HESZ94AF(+1),UNIT=TAPE,LABEL=2,  
 //VOL=REF=*.STEP1.DUMPDD,DISP=(,CATLG),DCB=(DUMDSCB,BLKSIZE=32560) 
 //SYSIN  DD  
 DUMMY  
 //*   
 //STEP3 EXEC PGM=IEBGENER,COND=(0,LT)  
 //SYSPRINT   DD  SYSOUT=*  
 //SYSUT1 DD  DSN=AUDIT,DISP=(OLD,DELETE) 
 //SYSUT2 DD  DSN=TMS.HESZ94AF.COPYIDS(+1),UNIT=TAPE,LABEL=2,   
 // VOL=REF=*.STEP1.DUMPDD2,DATACLAS=OFFSITE,   
 // DISP=(NEW,CATLG),DCB=(DUMDSCB,BLKSIZE=32560)
 //SYSIN  DD  DUMMY 
 //*
  
 What I would like to know if this is the correct action to take or 
 should I have done something else.  Please advise.
  
 Thanks in advance.
 
 
  
  
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html


This e-mail message and all attachments transmitted with it may
contain legally privileged and/or confidential information intended
solely for the use of the addressee(s). If the reader of this
message is not the intended recipient, you are hereby notified that
any reading, dissemination, distribution, copying, forwarding or
other use of this message or its attachments is strictly
prohibited. If you have received this message in error, please
notify the sender immediately and delete this message and all
copies and backups thereof. Thank you.

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


Re: How to merge two differents files with ICETOOL

2011-07-18 Thread Frank Yaeger

  
  From:   Frank Yaeger/San Jose/IBM 
  

  
  To: IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu  
  

  
  Date:   07/18/2011 08:09 AM   
  

  
  Subject:Re: How to merge two differents files with ICETOOL
  

  





Sent this morning but hasn't made it to the list, so resending (please
ignore if already posted).

Hilario G. at IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu wrote on
07/18/2011 05:18:02 AM:
 I need to obtain an output file of 300 bytes from two differents files:

 - FILE1 with a lenght of 80
 - FILE2 with a lenght of 300

 I need to merge both files, first FILE1 and after FILE2.

 I have several tested but I don't find the correct solution.

 The last one  JCL that I used, I only obtain FILE2:

 //STEP0001  EXEC  PGM=ICETOOL
 //TOOLMSG  DD SYSOUT=*
 //DFSMSG DD SYSOUT=*
 //IN1DD DSN=FILE1,DISP=SHR
 //IN2DD DSN=FILE2,DISP=SHR
 //OUT   DD DSN=FILE3,SPACE=(CYL,(10,1),RLSE),
 // DISP=(NEW,CATLG,DELETE),UNIT=SYSDA,
 // DCB=(LRECL=300,RECFM=FB)
 //TOOLIN DD *
 COPY  FROM(IN1) TO(OUT) USING(CTL1)
 COPY  FROM(IN2) TO(OUT) USING(CTL2)
 //CTL1CNTL DD *
   INREC FIELDS=(1,80)
 //CTL2CNTL DD *
   INREC FIELDS=(1,300)
 /*

 Where is the error or how to obtain FILE3 with the combination of
 two different files ?

The correct DFSORT JCL would be:

//STEP0001  EXEC  PGM=ICETOOL
//TOOLMSG  DD SYSOUT=*
//DFSMSG  DD SYSOUT=*
//IN1 DD DSN=FILE1,DISP=SHR
//IN2 DD DSN=FILE2,DISP=SHR
//OUT DD DSN=FILE3,SPACE=(CYL,(10,1),RLSE),
//DISP=(MOD,CATLG,DELETE),UNIT=SYSDA
//TOOLIN DD *
COPY  FROM(IN1) TO(OUT) USING(CTL1)
COPY  FROM(IN2) TO(OUT)
//CTL1CNTL DD *
  INREC OVERLAY=(300:X)
/*

Note the use of MOD for // OUT.  Note also that this is not a merge - it
is a copy.
Merge implies that the input files are already in sorted order and the
output
file should be in sorted order.

Frank Yaeger - DFSORT Development Team (IBM) - yae...@us.ibm.com
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration

 = DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort

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


Re: CA-1 TMS QUESTION - IEFTMS9 TMC BACKUP REQUIRED

2011-07-18 Thread esmie moo
Jonathan,
 
Thanks very much for your help.  

--- On Tue, 7/19/11, Jonathan Goossen jonathan.goos...@assurant.com wrote:


From: Jonathan Goossen jonathan.goos...@assurant.com
Subject: Re: CA-1 TMS QUESTION - IEFTMS9 TMC BACKUP REQUIRED
To: IBM-MAIN@bama.ua.edu
Received: Tuesday, July 19, 2011, 4:49 AM


This looks correct. You JCL runs TMSCOPY to backup the TMC and audit 
files. If the audit file gets down to 3 records, your tape processing 
would stop until you ran TMSCOPY.

The message may be due to a much larger tape activity on a one time bases, 
in which case you likely need look no further. But if it is from normal 
growth, then you will start seeing the message more often, in which case 
you will either need to run TMSCOPY more frequently, or expand your audit 
file.

Thank you and have a Terrific day!

Jonathan Goossen, ACS, CL
Tape Specialist
ACT Mainframe Storage Group
Personal: 651-361-4541
Department Support Line: 651-361-

IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu wrote on 07/18/2011 
11:12:59 AM:

 From: esmie moo esmie_...@yahoo.ca
 To: IBM-MAIN@bama.ua.edu
 Date: 07/18/2011 11:18 AM
 Subject: CA-1 TMS QUESTION - IEFTMS9 TMC BACKUP REQUIRED
 Sent by: IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu
 
 Good Morning Gentle Readers,
  
 I was called because the following message was coming up on the console:
 IEFTMS9 TMC BACKUP REQUIRED, AUDIT FILE UTILISATION IS CURRENTLY 82%.
  
 I executed the following job:
 //STEP1     EXEC PGM=TMSCOPY,REGION=7M      
 //TMSRPT     DD  SYSOUT=*                                        
 //TMSOPTNS   DD  DISP=SHR,DSN=SYS4.TMS.PARMLIB(TMSOPTNS)         
 //DUMPDD     DD  DSN=TMS.HESZ94M1(+1),UNIT=TAPE,                 
 //          LABEL=1,DISP=(,CATLG),DCB=(DUMDSCB,BLKSIZE=32640),   
 //          VOL=(,RETAIN)                
 //DUMPDD2    DD  DSN=TMS.HESZ94M2(+1),UNIT=TAPE,                 
 //          LABEL=1,DISP=(,CATLG),DCB=(DUMDSCB,BLKSIZE=32640),   
 //          VOL=(,RETAIN),DATACLAS=OFFSITE                       
 //AUDITDD    DD  DSN=SYS4.TMS.AUDIT,DISP=SHR                     
 //AUDUMP     DD  DSN=AUDIT,UNIT=PASS,DISP=(,PASS),             
 //     SPACE=(CYL,(20,5)),DCB=BLKSIZE=8880  
 //
 
*                                                                               
 //STEP2     EXEC PGM=IEBGENER,COND=(0,LT)                              
 //SYSPRINT   DD  SYSOUT=*                                              
 //SYSUT1     DD  DSN=AUDIT,DISP=(OLD,PASS)                           
 //SYSUT2     DD  
DSN=TMS.HESZ94AF(+1),UNIT=TAPE,LABEL=2,                      
 //    VOL=REF=*.STEP1.DUMPDD,DISP=(,CATLG),DCB=(DUMDSCB,BLKSIZE=32560) 
 //SYSIN      DD  
 DUMMY                                                              
 //*                                               
 //STEP3     EXEC PGM=IEBGENER,COND=(0,LT)                              
 //SYSPRINT   DD  SYSOUT=*                                              
 //SYSUT1     DD  DSN=AUDIT,DISP=(OLD,DELETE)                         
 //SYSUT2     DD  DSN=TMS.HESZ94AF.COPYIDS(+1),UNIT=TAPE,LABEL=2,       
 //     VOL=REF=*.STEP1.DUMPDD2,DATACLAS=OFFSITE,                       
 //     DISP=(NEW,CATLG),DCB=(DUMDSCB,BLKSIZE=32560)                    
 //SYSIN      DD  DUMMY                                                 
 //*                                                                    
  
 What I would like to know if this is the correct action to take or 
 should I have done something else.  Please advise.
  
 Thanks in advance.
 
 
  
  
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html


This e-mail message and all attachments transmitted with it may
contain legally privileged and/or confidential information intended
solely for the use of the addressee(s). If the reader of this
message is not the intended recipient, you are hereby notified that
any reading, dissemination, distribution, copying, forwarding or
other use of this message or its attachments is strictly
prohibited. If you have received this message in error, please
notify the sender immediately and delete this message and all
copies and backups thereof. Thank you.

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

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


Re: Need reviewers for new paper: Setting Up the IBM HTTP Server

2011-07-18 Thread Starr, Alan
Good day Steve,

I'd be interested in reviewing your paper if you feel inclined to send me a 
copy.

Thanks,
Alan

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Steve Comstock
Sent: Monday, July 18, 2011 9:38 AM
To: IBM-MAIN@bama.ua.edu
Subject: Need reviewers for new paper: Setting Up the IBM HTTP Server

For years I've suggested to folks they should try the free (well, 
included-in-the-price) HTTP server that comes with z/OS.

Several people have replied that would love some training in tailoring z/OS 
UNIX and in setting up the HTTP server.

But those are systems programmer courses and my focus has always been on the 
applications side of things.

Finally I've decided to write a paper, a semi-cookbook if you will, on getting 
the HTTP server up and running quickly.

So I've produced a 38-page paper on exactly this. But I would like some of you 
systems types to have a look and see if it is clear and accurate and if there 
are better ways to do things and so on, before I publish the doc on my website.

If you'd be interested in reading / critiquing this paper, drop me a line 
off-list and I'll send you a copy. If you have suggestions that I incorporate 
I'll include your name on the acknowledgements page.

Thanks.


-- 

Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

303-393-8716
http://www.trainersfriend.com

* Special promotion: 15% off on all DB2 training classes
 scheduled by September 1, taught by year end 2011

* Check out our entire DB2 curriculum at:
 http://www.trainersfriend.com/DB2_and_VSAM_courses/DB2curric.htm

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

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


Re: CA-1 TMS QUESTION - IEFTMS9 TMC BACKUP REQUIRED

2011-07-18 Thread Norman Hollander on DesertWiz
One of my best CA colleagues is Russ Witt, who generally follows this list.
He is greatly involved with CA's Tape solutions.  He was my go-to guy for
any product-like questions.  If you don't find your answer here, he'll have
the answer.  You'd also be able to see him in person at Share in Orlando
(shameless plug).

zNorman

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf
Of esmie moo
Sent: Monday, July 18, 2011 Monday 9:13 AM
To: IBM-MAIN@bama.ua.edu
Subject: CA-1 TMS QUESTION - IEFTMS9 TMC BACKUP REQUIRED

Good Morning Gentle Readers,
 
I was called because the following message was coming up on the console:
IEFTMS9 TMC BACKUP REQUIRED, AUDIT FILE UTILISATION IS CURRENTLY 82%.
 
I executed the following job:
//STEP1 EXEC PGM=TMSCOPY,REGION=7M //TMSRPT DD  SYSOUT=*
//TMSOPTNS   DD  DISP=SHR,DSN=SYS4.TMS.PARMLIB(TMSOPTNS)
//DUMPDD DD  DSN=TMS.HESZ94M1(+1),UNIT=TAPE, // 
LABEL=1,DISP=(,CATLG),DCB=(DUMDSCB,BLKSIZE=32640),
//  VOL=(,RETAIN)
//DUMPDD2    DD  DSN=TMS.HESZ94M2(+1),UNIT=TAPE, // 
LABEL=1,DISP=(,CATLG),DCB=(DUMDSCB,BLKSIZE=32640),
//  VOL=(,RETAIN),DATACLAS=OFFSITE //AUDITDD    DD 
DSN=SYS4.TMS.AUDIT,DISP=SHR //AUDUMP DD 
DSN=AUDIT,UNIT=PASS,DISP=(,PASS),
// SPACE=(CYL,(20,5)),DCB=BLKSIZE=8880
//* 
   //STEP2 EXEC PGM=IEBGENER,COND=(0,LT) //SYSPRINT   DD  SYSOUT=*
//SYSUT1 DD  DSN=AUDIT,DISP=(OLD,PASS)
//SYSUT2 DD  DSN=TMS.HESZ94AF(+1),UNIT=TAPE,LABEL=2,
//    VOL=REF=*.STEP1.DUMPDD,DISP=(,CATLG),DCB=(DUMDSCB,BLKSIZE=32560)
//SYSIN  DD  DUMMY
//*
//STEP3 EXEC PGM=IEBGENER,COND=(0,LT) //SYSPRINT   DD  SYSOUT=*
//SYSUT1 DD  DSN=AUDIT,DISP=(OLD,DELETE)
//SYSUT2 DD  DSN=TMS.HESZ94AF.COPYIDS(+1),UNIT=TAPE,LABEL=2,
// VOL=REF=*.STEP1.DUMPDD2,DATACLAS=OFFSITE,
// DISP=(NEW,CATLG),DCB=(DUMDSCB,BLKSIZE=32560)
//SYSIN  DD  DUMMY
//*    
 
What I would like to know if this is the correct action to take or should I
have done something else.  Please advise.
 
Thanks in advance.


 
 

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

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


Re: running Assembler I/O macro code as AMODE 31, RMODE ANY

2011-07-18 Thread Edward Jaffe

On 7/17/2011 11:11 AM, Shmuel Metz (Seymour J.) wrote:

Why would a branch with AMODE switching require more pipeline flushing
than a branch without?


If the target AMODE guessed by the hardware is wrong, then it will have to start 
over again fetching and interpreting the instructions in the correct AMODE.


--
Edward E Jaffe
Phoenix Software International, Inc
831 Parkview Drive North
El Segundo, CA 90245
310-338-0400 x318
edja...@phoenixsoftware.com
http://www.phoenixsoftware.com/

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


Re: How to obtain a file bigger than 80 chars from two inputs file

2011-07-18 Thread Hilario G.
Hello folks,

The additional information for the problem are:

1) FILE1  MEMBER OF A  PDS LRECL=80. FB
2) FILE2  PS LRECL=210, FB
3) OUTPUT=FILE1+FILE2  PS,LRECL=210, FB

FILE1 contains the header data for SMTP protocol.
FILE2 is the attached file sentd via SMTP.

I need to merge FILE1 (LRECL 80, FB) with data file FILE2 (LRECL 210, FB) to 
obtain a PS (LRECL 210, RECFM=FB)-

I hope that anybodoy can help me.

Kind Regards.

Hilario Garcia

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


Re: CA-1 TMS QUESTION - IEFTMS9 TMC BACKUP REQUIRED

2011-07-18 Thread Mark Zelden
On Mon, 18 Jul 2011 09:12:59 -0700, esmie moo esmie_...@yahoo.ca wrote:

Good Morning Gentle Readers,
 
I was called because the following message was coming up on the console:
IEFTMS9 TMC BACKUP REQUIRED, AUDIT FILE UTILISATION IS CURRENTLY 82%.
 
snip

What I would like to know if this is the correct action to take or should I 
have done something else.  Please advise.
 
Thanks in advance.



Correct actions for something like this:

1) Look up message IEFTMS9 from the CA manual and note the action

2) If you don't understand #1, contact the vendor.  

Your statement should I have done... implies you already did this, so it 
doesn't appear to 
be an 0 dark 30 question where you didn't understand the manual and didn't want 
to
wait for a return call from the vendor.  

Mark
--
Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS   
mailto:m...@mzelden.com
Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html 
Systems Programming expert at http://expertanswercenter.techtarget.com/

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


Re: Lines, Bars and ... mini-bars???

2011-07-18 Thread Shmuel Metz (Seymour J.)
In
ofa1775815.a71a18dd-on852578d0.00732c2b-852578d0.0079b...@us.ibm.com,
on 07/17/2011
   at 06:09 PM, Peter Relson rel...@us.ibm.com said:

If you can get your program up there (whether by yourself or by use
of  directed load (LOAD with ADDR64), and if it calls no system
routines of any kind

What about taking exits, e.g., SPIE, STAE exits?
 
-- 
 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Making Z/OS easier - Effectively replacing JCL with Unix like commands

2011-07-18 Thread Shmuel Metz (Seymour J.)
In 4e243efe.2010...@valley.net, on 07/18/2011
   at 10:11 AM, Gerhard Postpischil gerh...@valley.net said:

Good for you, but some of us have built extensive macro and 
subroutine libraries to use with assembler, and find it as fast  and
easy to use those than to live with (the confining  limitations of)
higher level languages.

And some of us don't regard C as a higher level language.
 
-- 
 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Explination of EUT/FRR

2011-07-18 Thread Shmuel Metz (Seymour J.)
In 000701cc44c2$cf0ad6c0$6d208440$@net, on 07/17/2011
   at 04:47 PM, michealbutz michealb...@optonline.net said:

Questions in RED

No. There are no colors in RFC 5322 e-mail.
 
-- 
 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: Explination of EUT/FRR

2011-07-18 Thread Shmuel Metz (Seymour J.)
In tpt727h2cfbmucaoos09907lv33nhft...@4ax.com, on 07/18/2011
   at 12:12 PM, Binyamin Dissen bdis...@dissensoftware.com said:

If locked or disabled there ain't no CPU switch. The unit of work
does not lose control (if there is a program check, the FRR gets
control which is the same unit of work).

True for spin locks, but you can take a page fault while holding a
suspend lock.
 
-- 
 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: How to obtain a file bigger than 80 chars from two inputs file

2011-07-18 Thread Frank Yaeger
Hilario G. at IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu wrote on
07/18/2011 11:57:52 AM:
 The additional information for the problem are:

 1) FILE1  MEMBER OF A  PDS LRECL=80. FB
 2) FILE2  PS LRECL=210, FB
 3) OUTPUT=FILE1+FILE2  PS,LRECL=210, FB

 FILE1 contains the header data for SMTP protocol.
 FILE2 is the attached file sentd via SMTP.

 I need to merge FILE1 (LRECL 80, FB) with data file FILE2 (LRECL
 210, FB) to obtain a PS (LRECL 210, RECFM=FB)-

 I hope that anybodoy can help me.

I thought I had already helped you. Anyway, you can use a
DFSORT/ICETOOL job that like this:

//S1EXEC  PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG  DD SYSOUT=*
//IN1 DD DSN=pds(member),... (FB/80)
//IN2 DD DSN=...  input file2 (FB/210)
//OUT DD DISP=(MOD,CATLG,DELETE),DSN=...  output file (FB/210)
//TOOLIN DD *
COPY FROM(IN1) TO(OUT) USING(CTL1)
COPY FROM(IN2) TO(OUT)
//CTL1CNTL DD *
  INREC OVERLAY=(210:X)
/*

Frank Yaeger - DFSORT Development Team (IBM) - yae...@us.ibm.com
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration

 = DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort

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


Re: CA-1 TMS QUESTION - IEFTMS9 TMC BACKUP REQUIRED

2011-07-18 Thread Gibney, Dave
More correct actions for something like this:

Look in the install/ongoing support sections of the documentation, find where 
it says you should run TMSCOPY on a regular basis and schedule such a job :) 
Make sure you do the other regular maintenance to the TMS that are documented 
in the same section of the manuals.

Add automation to act on the IEFTM99 message with an alert and a special run of 
the TMSCOPY job. 

If this was an out of the ordinary, greater than usual amount of tape activity, 
find out what happened and be sure it was valid,

Dave Gibney
Information Technology Services
Washington State University


 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On
 Behalf Of Mark Zelden
 Sent: Monday, July 18, 2011 12:13 PM
 To: IBM-MAIN@bama.ua.edu
 Subject: Re: CA-1 TMS QUESTION - IEFTMS9 TMC BACKUP REQUIRED
 
 On Mon, 18 Jul 2011 09:12:59 -0700, esmie moo esmie_...@yahoo.ca
 wrote:
 
 Good Morning Gentle Readers,
 
 I was called because the following message was coming up on the console:
 IEFTMS9 TMC BACKUP REQUIRED, AUDIT FILE UTILISATION IS CURRENTLY
 82%.
 
 snip
 
 What I would like to know if this is the correct action to take or should I 
 have
 done something else.  Please advise.
 
 Thanks in advance.
 
 
 
 Correct actions for something like this:
 
 1) Look up message IEFTMS9 from the CA manual and note the action
 
 2) If you don't understand #1, contact the vendor.
 
 Your statement should I have done... implies you already did this, so it
 doesn't appear to
 be an 0 dark 30 question where you didn't understand the manual and didn't
 want to
 wait for a return call from the vendor.
 
 Mark
 --
 Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS
 mailto:m...@mzelden.com
 Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html
 Systems Programming expert at http://expertanswercenter.techtarget.com/
 
 --
 For IBM-MAIN subscribe / signoff / archive access instructions,
 send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
 Search the archives at http://bama.ua.edu/archives/ibm-main.html

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


Re: Making Z/OS easier - Effectively replacing JCL with Unix like commands

2011-07-18 Thread Shmuel Metz (Seymour J.)
In m38vrvy1w2@garlic.com, on 07/18/2011
   at 12:44 PM, Anne  Lynn Wheeler l...@garlic.com said:

However, before that mainframe BSD unix shipped

My understanding is that none of freebsd, netbsd, openbsd[1] can pass
the UNIX® certification from TUG (formerly X-Open).

[1] With corrected capitalization.
 
-- 
 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: running Assembler I/O macro code as AMODE 31, RMODE ANY

2011-07-18 Thread Ed Finnell
IIRC Ray Wicks said they achieve about 91% hit ratio from HSB, but
that was for XA don't know what the numbers are for 64 bit.
 
 
In a message dated 7/18/2011 2:17:31 P.M. Central Daylight Time,  
edja...@phoenixsoftware.com writes:

If the  target AMODE guessed by the hardware is wrong, then it will have to 
start  
over again fetching and interpreting the instructions in the correct  AMODE.



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


Re: running Assembler I/O macro code as AMODE 31, RMODE ANY

2011-07-18 Thread Shmuel Metz (Seymour J.)
In 4e248256.90...@phoenixsoftware.com, on 07/18/2011
   at 11:58 AM, Edward Jaffe edja...@phoenixsoftware.com said:

If the target AMODE guessed by the hardware is wrong, then it will
have to start over again fetching and interpreting the instructions
in the correct AMODE.

Are you saying that the processor starts fetching instructions for the
branch prior to executing it? I would expect the processor to only be
reading ahead from the locations following the branch until it was
ready to perform the branch. Of course, there are techniques to
execute a branch out of sequence, but I see no reason that the AMODE
wouldn't be handled as part of that.

Could one of the IBM processor people comment?
 
-- 
 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 lists...@bama.ua.edu with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Where are J2EE components located in java ?

2011-07-18 Thread Daniel Allen

‰íz{S­©ì}êĝÊŠxjǺà*'µéíO*^µìmþ™ZŠw!j»

Re: Making Z/OS easier - Effectively replacing JCL with Unix like commands

2011-07-18 Thread Paul Gilmartin
On Sun, 17 Jul 2011 19:34:25 +0200, Michel Castelein wrote:

 JCL consists of about 120 words last I checked (not counting those goofy
conditional statements IBM created recently for those who couldn't
comprehend COND codes), average batch job uses about 20 or 25.  ...
 
 It's pretty hard to tell whether you're a Luddite or merely a masochist.

I'm both a Luddite and a masochist, and proud of it.

As upper management perceives, even through media such as airline
magazines, that (some; I'm confident not all) z/OS systems programmers
exhibit public delight in unwillingness to assimilate new technology and
in performing their jobs in a needlessly difficult, even painful manner,
it bodes ill for the future of the platform.

My apologies if I overlooked whimsical intent, as I hope.

-- gil

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


Re: CA-1 TMS QUESTION - IEFTMS9 TMC BACKUP REQUIRED

2011-07-18 Thread Burrell, C. Todd (CDC/OCOO/ITSO) (CTR)
Why don't you just backup the TMC?  Surely you have a daily job that does this 
- and it should clear the AUDIT file when it runs the backup from what I 
remember.  

From Quickref:

Action: Execute the backup program, TMSCOPY. All CA 1 utilities except
TMSCOPY and TMSINIT will abend with a U0008 abend code until the backup is
performed. When the Audit data set has no records left, all jobs requesting a 
tape mount will abend with a system code S7yy until the backup is performed.  

C. Todd Burrell 
PMP, MCSE 2003:Security
MCITP: Enterprise Administrator
MCITP: Enterprise Desktop Admin 7
Security+, Network+
ITIL V3 Foundations
CSC Lead z/OS Systems Programmer
ITSO 
(404) 723-2017 (Cell) 




-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of 
Mark Zelden
Sent: Monday, July 18, 2011 3:13 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: CA-1 TMS QUESTION - IEFTMS9 TMC BACKUP REQUIRED

On Mon, 18 Jul 2011 09:12:59 -0700, esmie moo esmie_...@yahoo.ca wrote:

Good Morning Gentle Readers,
 
I was called because the following message was coming up on the console:
IEFTMS9 TMC BACKUP REQUIRED, AUDIT FILE UTILISATION IS CURRENTLY 82%.
 
snip

What I would like to know if this is the correct action to take or should I 
have done something else.  Please advise.
 
Thanks in advance.



Correct actions for something like this:

1) Look up message IEFTMS9 from the CA manual and note the action

2) If you don't understand #1, contact the vendor.  

Your statement should I have done... implies you already did this, so it 
doesn't appear to 
be an 0 dark 30 question where you didn't understand the manual and didn't want 
to
wait for a return call from the vendor.  

Mark
--
Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS   
mailto:m...@mzelden.com
Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html 
Systems Programming expert at http://expertanswercenter.techtarget.com/

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

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


Where are J2EE components located in java (resolved)

2011-07-18 Thread Daniel Allen

‰íz{S­©ì}êĝÊŠxjǺà*'µéíO*^µìmþ™ZŠw!j»

Re: Making Z/OS easier - Effectively replacing JCL with Unix like commands

2011-07-18 Thread R.S.

W dniu 2011-07-18 22:15, Paul Gilmartin pisze:
[...]

As upper management perceives, even through media such as airline
magazines, that (some; I'm confident not all) z/OS systems programmers
exhibit public delight in unwillingness to assimilate new technology and
in performing their jobs in a needlessly difficult, even painful manner,


I'm not 'upper management', I'm very downlevel manager and I don't read 
airline magazines at all, I prefer some good redbook instead... HOWEVER 
MY OPINION IS EXACTLY AS THE ABOVE!
Yes, majority of mainframe people I ever met do their job in needlessly 
difficult, sometimes even painful manner. SOme of them are absolutely 
unwilling to assimilate anything new, even like DFSMS (is it modern? 
is it cool? did it come from colorful worlds of Windows, Apple etc.?).

Of course there are also people more opne-minded, but the majority...
Oh, someone could say there are old farts and young wolves. No, the 
division is not so simple, I know clever open-minded gray-haired folks 
and young but very old-minded adepts.




it bodes ill for the future of the platform.

Yes, I wish it would be untrue.

--
Radoslaw Skorupka
Lodz, Poland


--
Tre tej wiadomoci moe zawiera informacje prawnie chronione Banku 
przeznaczone wycznie do uytku subowego adresata. Odbiorc moe by jedynie 
jej adresat z wyczeniem dostpu osób trzecich. Jeeli nie jeste adresatem 
niniejszej wiadomoci lub pracownikiem upowanionym do jej przekazania 
adresatowi, informujemy, e jej rozpowszechnianie, kopiowanie, rozprowadzanie 
lub inne dziaanie o podobnym charakterze jest prawnie zabronione i moe by 
karalne. Jeeli otrzymae t wiadomo omykowo, prosimy niezwocznie 
zawiadomi nadawc wysyajc odpowied oraz trwale usun t wiadomo 
wczajc w to wszelkie jej kopie wydrukowane lub zapisane na dysku.

This e-mail may contain legally privileged information of the Bank and is intended solely for business use of the addressee. This e-mail may only be received by the addressee and may not be disclosed to any third parties. If you are not the intended addressee of this e-mail or the employee authorised to forward it to the addressee, be advised that any dissemination, copying, distribution or any other similar activity is legally prohibited and may be punishable. If you received this e-mail by mistake please advise the sender immediately by using the reply facility in your e-mail software and delete permanently this e-mail including any copies of it either printed or saved to hard drive. 


BRE Bank SA, 00-950 Warszawa, ul. Senatorska 18, tel. +48 (22) 829 00 00, fax 
+48 (22) 829 00 33, e-mail: i...@brebank.pl
Sd Rejonowy dla m. st. Warszawy XII Wydzia Gospodarczy Krajowego Rejestru Sdowego, nr rejestru przedsibiorców KRS 025237, NIP: 526-021-50-88. 
Wedug stanu na dzie 01.01.2011 r. kapita zakadowy BRE Banku SA (w caoci wpacony) wynosi 168.346.696 zotych.


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


Re: Making Z/OS easier - Effectively replacing JCL with Unix like commands

2011-07-18 Thread Wayne Driscoll
In my 20 plus year career I have seen a lot more people with mainframe 
backgrounds expressing a willingness to learn and integrate usage of 
non-mainframe technology than I have seen people from an open-systems 
background show a willingness to learn anything about the mainframe.

===
Wayne Driscoll
OMEGAMON DB2 L3 Support/Development
wdrisco(AT)us.ibm.com
===



From:
R.S. r.skoru...@bremultibank.com.pl
To:
IBM-MAIN@bama.ua.edu
Date:
07/18/2011 03:50 PM
Subject:
Re: Making Z/OS easier - Effectively replacing JCL with Unix like commands
Sent by:
IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu



W dniu 2011-07-18 22:15, Paul Gilmartin pisze:
[...]
 As upper management perceives, even through media such as airline
 magazines, that (some; I'm confident not all) z/OS systems programmers
 exhibit public delight in unwillingness to assimilate new technology and
 in performing their jobs in a needlessly difficult, even painful manner,

I'm not 'upper management', I'm very downlevel manager and I don't read 
airline magazines at all, I prefer some good redbook instead... HOWEVER 
MY OPINION IS EXACTLY AS THE ABOVE!
Yes, majority of mainframe people I ever met do their job in needlessly 
difficult, sometimes even painful manner. SOme of them are absolutely 
unwilling to assimilate anything new, even like DFSMS (is it modern? 
is it cool? did it come from colorful worlds of Windows, Apple etc.?).
Of course there are also people more opne-minded, but the majority...
Oh, someone could say there are old farts and young wolves. No, the 
division is not so simple, I know clever open-minded gray-haired folks 
and young but very old-minded adepts.


 it bodes ill for the future of the platform.
Yes, I wish it would be untrue.

-- 
Radoslaw Skorupka
Lodz, Poland


--
Tre tej wiadomoci moe zawiera informacje prawnie chronione Banku 
przeznaczone wycznie do uytku subowego adresata. Odbiorc moe by 
jedynie jej adresat z wyczeniem dostpu osób trzecich. Jeeli nie jeste 
adresatem niniejszej wiadomoci lub pracownikiem upowanionym do jej 
przekazania adresatowi, informujemy, e jej rozpowszechnianie, kopiowanie, 
rozprowadzanie lub inne dziaanie o podobnym charakterze jest prawnie 
zabronione i moe by karalne. Jeeli otrzymae t wiadomo omykowo, 
prosimy niezwocznie zawiadomi nadawc wysyajc odpowied oraz trwale 
usun t wiadomo wczajc w to wszelkie jej kopie wydrukowane lub 
zapisane na dysku.

This e-mail may contain legally privileged information of the Bank and is 
intended solely for business use of the addressee. This e-mail may only be 
received by the addressee and may not be disclosed to any third parties. 
If you are not the intended addressee of this e-mail or the employee 
authorised to forward it to the addressee, be advised that any 
dissemination, copying, distribution or any other similar activity is 
legally prohibited and may be punishable. If you received this e-mail by 
mistake please advise the sender immediately by using the reply facility 
in your e-mail software and delete permanently this e-mail including any 
copies of it either printed or saved to hard drive. 

BRE Bank SA, 00-950 Warszawa, ul. Senatorska 18, tel. +48 (22) 829 00 00, 
fax +48 (22) 829 00 33, e-mail: i...@brebank.pl
Sd Rejonowy dla m. st. Warszawy XII Wydzia Gospodarczy Krajowego 
Rejestru Sdowego, nr rejestru przedsibiorców KRS 025237, NIP: 
526-021-50-88. 
Wedug stanu na dzie 01.01.2011 r. kapita zakadowy BRE Banku SA (w 
caoci wpacony) wynosi 168.346.696 zotych.

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




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


Re: How to obtain a file bigger than 80 chars from two inputs file

2011-07-18 Thread Lizette Koehler
 Hello folks,
 
 The additional information for the problem are:
 
 1) FILE1  MEMBER OF A  PDS LRECL=80. FB
 2) FILE2  PS LRECL=210, FB
 3) OUTPUT=FILE1+FILE2  PS,LRECL=210, FB
 
 FILE1 contains the header data for SMTP protocol.
 FILE2 is the attached file sentd via SMTP.
 
 I need to merge FILE1 (LRECL 80, FB) with data file FILE2 (LRECL 210, FB)
to obtain a
 PS (LRECL 210, RECFM=FB)-
 
 I hope that anybodoy can help me.
 
 Kind Regards.
 
 Hilario Garcia



Hilario,

I think what you really want to do is send via SMTP a file.  The best way
would be to use SAS EMAIL process if you have SAS or XMITP.  Both of these
processes make sending email from the mainframe easy.

SAS is a product you pay for and it is part of the BASE SAS.  XMITP is free.

Lizette

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


Re: Making Z/OS easier - Effectively replacing JCL with Unix like commands

2011-07-18 Thread Sam Siegel
On Mon, Jul 18, 2011 at 2:10 PM, Wayne Driscoll wdri...@us.ibm.com wrote:
 In my 20 plus year career I have seen a lot more people with mainframe
 backgrounds expressing a willingness to learn and integrate usage of
 non-mainframe technology than I have seen people from an open-systems
 background show a willingness to learn anything about the mainframe.

I completely agree with this statement.  It is typically a requirement
of mainframe types to understand open system terminology and then
speak of mainframe using open systems language.  sysplex vs. cluster
is a typical rough and ready analogy.

I've yet to see an open system person have even a vague understanding
of record oriented I/O or PDS processing.

The list goes on and on.


 ===
 Wayne Driscoll
 OMEGAMON DB2 L3 Support/Development
 wdrisco(AT)us.ibm.com
 ===



 From:
 R.S. r.skoru...@bremultibank.com.pl
 To:
 IBM-MAIN@bama.ua.edu
 Date:
 07/18/2011 03:50 PM
 Subject:
 Re: Making Z/OS easier - Effectively replacing JCL with Unix like commands
 Sent by:
 IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu



 W dniu 2011-07-18 22:15, Paul Gilmartin pisze:
 [...]
 As upper management perceives, even through media such as airline
 magazines, that (some; I'm confident not all) z/OS systems programmers
 exhibit public delight in unwillingness to assimilate new technology and
 in performing their jobs in a needlessly difficult, even painful manner,

 I'm not 'upper management', I'm very downlevel manager and I don't read
 airline magazines at all, I prefer some good redbook instead... HOWEVER
 MY OPINION IS EXACTLY AS THE ABOVE!
 Yes, majority of mainframe people I ever met do their job in needlessly
 difficult, sometimes even painful manner. SOme of them are absolutely
 unwilling to assimilate anything new, even like DFSMS (is it modern?
 is it cool? did it come from colorful worlds of Windows, Apple etc.?).
 Of course there are also people more opne-minded, but the majority...
 Oh, someone could say there are old farts and young wolves. No, the
 division is not so simple, I know clever open-minded gray-haired folks
 and young but very old-minded adepts.


 it bodes ill for the future of the platform.
 Yes, I wish it would be untrue.

 --
 Radoslaw Skorupka
 Lodz, Poland


 --
 Tre   tej wiadomo ci mo e zawiera  informacje prawnie chronione Banku
 przeznaczone wy  cznie do u ytku s u bowego adresata. Odbiorc  mo e by
 jedynie jej adresat z wy  czeniem dost pu osób trzecich. Je eli nie jeste
 adresatem niniejszej wiadomo ci lub pracownikiem upowa nionym do jej
 przekazania adresatowi, informujemy,  e jej rozpowszechnianie, kopiowanie,
 rozprowadzanie lub inne dzia anie o podobnym charakterze jest prawnie
 zabronione i mo e by  karalne. Je eli otrzyma e  t  wiadomo   omy kowo,
 prosimy niezw ocznie zawiadomi  nadawc  wysy aj c odpowied  oraz trwale
 usun   t  wiadomo   w  czaj c w to wszelkie jej kopie wydrukowane lub
 zapisane na dysku.

 This e-mail may contain legally privileged information of the Bank and is
 intended solely for business use of the addressee. This e-mail may only be
 received by the addressee and may not be disclosed to any third parties.
 If you are not the intended addressee of this e-mail or the employee
 authorised to forward it to the addressee, be advised that any
 dissemination, copying, distribution or any other similar activity is
 legally prohibited and may be punishable. If you received this e-mail by
 mistake please advise the sender immediately by using the reply facility
 in your e-mail software and delete permanently this e-mail including any
 copies of it either printed or saved to hard drive.

 BRE Bank SA, 00-950 Warszawa, ul. Senatorska 18, tel. +48 (22) 829 00 00,
 fax +48 (22) 829 00 33, e-mail: i...@brebank.pl
 S d Rejonowy dla m. st. Warszawy XII Wydzia  Gospodarczy Krajowego
 Rejestru S dowego, nr rejestru przedsi biorców KRS 025237, NIP:
 526-021-50-88.
 Wed ug stanu na dzie  01.01.2011 r. kapita  zak adowy BRE Banku SA (w
 ca o ci wp acony) wynosi 168.346.696 z otych.

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




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


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


Re: Making Z/OS easier - Effectively replacing JCL with Unix like commands

2011-07-18 Thread Jim Thomas
Hear Hear ... I guess I'm not the only one that feels 
this way ...

I will have a 'nasty-gram' later ... so stay tuned :-)  

Kind Regards

Jim Thomas
617-233-4130 (mobile)
636-294-1014(res)
j...@thethomasresidence.us (Email)


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf
Of Sam Siegel
Sent: Monday, July 18, 2011 4:46 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Making Z/OS easier - Effectively replacing JCL with Unix like
commands

On Mon, Jul 18, 2011 at 2:10 PM, Wayne Driscoll wdri...@us.ibm.com wrote:
 In my 20 plus year career I have seen a lot more people with mainframe
 backgrounds expressing a willingness to learn and integrate usage of
 non-mainframe technology than I have seen people from an open-systems
 background show a willingness to learn anything about the mainframe.

I completely agree with this statement.  It is typically a requirement
of mainframe types to understand open system terminology and then
speak of mainframe using open systems language.  sysplex vs. cluster
is a typical rough and ready analogy.

I've yet to see an open system person have even a vague understanding
of record oriented I/O or PDS processing.

The list goes on and on.


 ===
 Wayne Driscoll
 OMEGAMON DB2 L3 Support/Development
 wdrisco(AT)us.ibm.com
 ===



 From:
 R.S. r.skoru...@bremultibank.com.pl
 To:
 IBM-MAIN@bama.ua.edu
 Date:
 07/18/2011 03:50 PM
 Subject:
 Re: Making Z/OS easier - Effectively replacing JCL with Unix like commands
 Sent by:
 IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu



 W dniu 2011-07-18 22:15, Paul Gilmartin pisze:
 [...]
 As upper management perceives, even through media such as airline
 magazines, that (some; I'm confident not all) z/OS systems programmers
 exhibit public delight in unwillingness to assimilate new technology and
 in performing their jobs in a needlessly difficult, even painful manner,

 I'm not 'upper management', I'm very downlevel manager and I don't read
 airline magazines at all, I prefer some good redbook instead... HOWEVER
 MY OPINION IS EXACTLY AS THE ABOVE!
 Yes, majority of mainframe people I ever met do their job in needlessly
 difficult, sometimes even painful manner. SOme of them are absolutely
 unwilling to assimilate anything new, even like DFSMS (is it modern?
 is it cool? did it come from colorful worlds of Windows, Apple etc.?).
 Of course there are also people more opne-minded, but the majority...
 Oh, someone could say there are old farts and young wolves. No, the
 division is not so simple, I know clever open-minded gray-haired folks
 and young but very old-minded adepts.


 it bodes ill for the future of the platform.
 Yes, I wish it would be untrue.

 --
 Radoslaw Skorupka
 Lodz, Poland


 --
 Tre   tej wiadomo ci mo e zawiera  informacje prawnie chronione Banku
 przeznaczone wy  cznie do u ytku s u bowego adresata. Odbiorc  mo e by
 jedynie jej adresat z wy  czeniem dost pu osób trzecich. Je eli nie jeste
 adresatem niniejszej wiadomo ci lub pracownikiem upowa nionym do jej
 przekazania adresatowi, informujemy,  e jej rozpowszechnianie, kopiowanie,
 rozprowadzanie lub inne dzia anie o podobnym charakterze jest prawnie
 zabronione i mo e by  karalne. Je eli otrzyma e  t  wiadomo   omy kowo,
 prosimy niezw ocznie zawiadomi  nadawc  wysy aj c odpowied  oraz trwale
 usun   t  wiadomo   w  czaj c w to wszelkie jej kopie wydrukowane lub
 zapisane na dysku.

 This e-mail may contain legally privileged information of the Bank and is
 intended solely for business use of the addressee. This e-mail may only be
 received by the addressee and may not be disclosed to any third parties.
 If you are not the intended addressee of this e-mail or the employee
 authorised to forward it to the addressee, be advised that any
 dissemination, copying, distribution or any other similar activity is
 legally prohibited and may be punishable. If you received this e-mail by
 mistake please advise the sender immediately by using the reply facility
 in your e-mail software and delete permanently this e-mail including any
 copies of it either printed or saved to hard drive.

 BRE Bank SA, 00-950 Warszawa, ul. Senatorska 18, tel. +48 (22) 829 00 00,
 fax +48 (22) 829 00 33, e-mail: i...@brebank.pl
 S d Rejonowy dla m. st. Warszawy XII Wydzia  Gospodarczy Krajowego
 Rejestru S dowego, nr rejestru przedsi biorców KRS 025237, NIP:
 526-021-50-88.
 Wed ug stanu na dzie  01.01.2011 r. kapita  zak adowy BRE Banku SA (w
 ca o ci wp acony) wynosi 168.346.696 z otych.

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




 

Re: Making Z/OS easier - Effectively replacing JCL with Unix like commands

2011-07-18 Thread Jim Thomas
I have nothing against anything 'new' and highly doubt that 
other mainframer's do either. Come from the world of Windows 
or Apple ??.. I am not even going to comment on that.

That said, what are we trying to achieve ?? .. the blue screen
of death on the mainframes ?? (be it z/OS, z/VM, z/VSE or even
z/Linux).IMHO, everybody and their mother, to include IBM has
been bent over trying to do the same for at least a decade that 
I can now state. I don't think I need to point out or bring up 
too much evidence on how spectacularly specialized and efficient
the PC world was in populating and letting the world know, how
efficient they were with the 'blue screen of death' and I know that
none of you know what I speak of right ??.  

The 'mainframe' environment has been robust for MANY decades. Is there
anybody that can state the same of the PC environment that everybody
just insists on incorporating into the mainframe world ??. As both,
a former developer and a systems programmer, I can very honestly 
say that we'd (one way or the other) get out of an unwarranted or
unwanted IPL most always (especially with z/OS). 

Can anybody in the server world say that ??. Seems to me that the 
defacto action is always CTRL-ALT-DEL .. be it the 'server' or 
'router' or whatever else. 

By the by ... before Winblows 3.1 came out ... I did a lot of work 
on Novell too ... so I do have some experience, knowledge and 
exposure to what I speak of. 

'old' mainframer's, IMHO, do not have any problems or hesitation
with adapting and or using 'new' technology 'when and if it works'.

Why is CTRL-ALT-DEL a viable option for replacing mainframe for PC
servers when the said company just ends up paying more than they
really did with 'an old mainframe'. On the same token, why is an
IPL of my MVS image (or PLEX) not acceptable ??... it's the same
as CTRL-ALT-DEL is it not ??.  

AFAIK, us old mainframer's ... want to do our jobs, which is to
say, do what we enjoy the most but not want to have to do it repeatedly
or redundantly, over and over and over again. I have spoken (rather
vehemently unfortunately) to many PC developers and WEB developers
that simply could not understand why a given product, system or 
sub-system that I was owned at that point it time, had not been 
completely re-written and 're-complied' ... More often than not,
after a couple of hours, I gave up and said ... 'because I do not 
have to re-write and re-compile the world just to feel important or
justify my job'. 

There is also another thread about wanting 'script's instead of 
JCL... have any of these folks looked into REXX ?? or even CLIST ??.

There was some negativity about DCB's ... oh .. okay .. we don't need
DCB's but .. lets just have a two and a half mile long PATH that each
applications programmer has to maintain and or keep track of. Sure .. 
yep .. it's very simple and applications programmers will keep a track
of them all  my foot !!. 

Were the non mainframe environment at the very least, a little more 
stable, I'd venture to say that most all, if not all, 'old' systems
programmers (or even us 'old' developers) would gladly welcome and 
incorporate required changes. 

Lastly and fully knowing that I'm 'rocking the boat' .. what the heck,
manager's ?? .. management ??. The only comment I'll make (for the 
moment) is that a few years ago, I actually had a ... umm .. manager
call me and get pissed off in about five minutes into the conversation
because he was adamant that 'MVS' meant 'Microsoft Virtual Studio' which
was around a lot longer than MVS on the mainframe ... I asked for his 
academic qualifications and was told that he had an undergrad degree in
Journalism. Of course, I blew it because I asked him if he knew how big
an idiot he was and if he'd be willing to write about his own stupidity in 
the local papers ... Ooops !!. 


Radoslaw, please forgive me but in my experience, nine out ten, supposedly
young and open-minded kids don't have a clue what they speak of. Note 
however, they are not to blame and instead the finger (IMHO) should be 
pointed at the wonderful universities, the business world and of course,
last
but definitely not the least and the very most important, the wonderfully 
smart CEO's that really should (supposedly) be looking out for the company
but 
in reality only look out for their own pockets. I know many a company that 
follows that trend. IOW, if you nose is not crusted extremely brown, you
will
be fired, let go, laid off, or whatever the hell else that somebody in some 
worthless HR department can come up with. Of course, all of this is going to

be in the name of 'saving' the company some money !!. 

I long for the day that the investors wake up !!. 


Kind Regards

Jim Thomas
617-233-4130 (mobile)
636-294-1014(res)
j...@thethomasresidence.us (Email)


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf
Of R.S.
Sent: Monday, July 

Re: Making Z/OS easier - Effectively replacing JCL with Unix like commands

2011-07-18 Thread R.S.

W dniu 2011-07-18 23:10, Wayne Driscoll pisze:

In my 20 plus year career I have seen a lot more people with mainframe
backgrounds expressing a willingness to learn and integrate usage of
non-mainframe technology than I have seen people from an open-systems
background show a willingness to learn anything about the mainframe.


My observation is the same. But it's not related to the previous statement.

BTW: Common joke in (young) mainframe community in Poland:
Why, the hell, does it work in such way???
Just to make mainframe more complicated.
to make it more complicated

Oh, BTW, please don't kill messenger. I never said that I like such 
situation, but I would be dishonest claiming ther things are different.

--
Radoslaw Skorupka
Lodz, Poland


--
Tre tej wiadomoci moe zawiera informacje prawnie chronione Banku 
przeznaczone wycznie do uytku subowego adresata. Odbiorc moe by jedynie 
jej adresat z wyczeniem dostpu osób trzecich. Jeeli nie jeste adresatem 
niniejszej wiadomoci lub pracownikiem upowanionym do jej przekazania 
adresatowi, informujemy, e jej rozpowszechnianie, kopiowanie, rozprowadzanie 
lub inne dziaanie o podobnym charakterze jest prawnie zabronione i moe by 
karalne. Jeeli otrzymae t wiadomo omykowo, prosimy niezwocznie 
zawiadomi nadawc wysyajc odpowied oraz trwale usun t wiadomo 
wczajc w to wszelkie jej kopie wydrukowane lub zapisane na dysku.

This e-mail may contain legally privileged information of the Bank and is intended solely for business use of the addressee. This e-mail may only be received by the addressee and may not be disclosed to any third parties. If you are not the intended addressee of this e-mail or the employee authorised to forward it to the addressee, be advised that any dissemination, copying, distribution or any other similar activity is legally prohibited and may be punishable. If you received this e-mail by mistake please advise the sender immediately by using the reply facility in your e-mail software and delete permanently this e-mail including any copies of it either printed or saved to hard drive. 


BRE Bank SA, 00-950 Warszawa, ul. Senatorska 18, tel. +48 (22) 829 00 00, fax 
+48 (22) 829 00 33, e-mail: i...@brebank.pl
Sd Rejonowy dla m. st. Warszawy XII Wydzia Gospodarczy Krajowego Rejestru Sdowego, nr rejestru przedsibiorców KRS 025237, NIP: 526-021-50-88. 
Wedug stanu na dzie 01.01.2011 r. kapita zakadowy BRE Banku SA (w caoci wpacony) wynosi 168.346.696 zotych.


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


Re: VSAM definition deck from file itself

2011-07-18 Thread John Mattson
Macro4 Insynch has an panel Option for VSAM Utilities which allows you to 
direct the IDCAMS Define to a data set.  There must be others. 

Entry Name   === 'AFITJLM.DELETEME.' 
User Catalog === 
Entry type   === 1   1  - KSDS Cluster5  -  Alternate Index 
  2  - ESDS Cluster6  -  Path 
  3  - RRDS Cluster7  -  Generation Data Group 
  4  - LINEAR Cluster 
Model name   === 
 
Run type === PARM (EXEC, PARM, BOTH) 



From:McKown, John john.mck...@healthmarkets.com
To:IBM-MAIN@bama.ua.edu
Date:07/15/2011 07:13 AM
Subject:VSAM definition deck from file itself
Sent by:IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu



Is there some IBM or vendor utility which can recreate the DEFINE CLUSTER 
/ DEFINE AIX / DEFINE PATH for a given VSAM sphere? We simply don't seem 
to have an accurate set of DEFINE decks for our VSAM files. Or will I need 
to parse up a LISTCAT using REXX?

John McKown
Systems Engineer IV
IT

Administrative Services Group

HealthMarkets(r)

9151 Boulevard 26 * N. Richland Hills * TX 76010
(817) 255-3225 phone *
john.mck...@healthmarkets.com * www.HealthMarkets.com

Confidentiality Notice: This e-mail message may contain confidential or 
proprietary information. If you are not the intended recipient, please 
contact the sender by reply e-mail and destroy all copies of the original 
message. HealthMarkets(r) is the brand name for products underwritten and 
issued by the insurance subsidiaries of HealthMarkets, Inc. -The 
Chesapeake Life Insurance Company(r), Mid-West National Life Insurance 
Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM


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


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


Re: running Assembler I/O macro code as AMODE 31, RMODE ANY

2011-07-18 Thread Edward Jaffe

On 7/18/2011 12:55 PM, Shmuel Metz (Seymour J.) wrote:
Are you saying that the processor starts fetching instructions for the branch 
prior to executing it?


Absolutely! There is a multi-stage pipeline that allows the processor to get 
ahead of the current instruction's execution to fetch and decode instructions, 
resolve addresses, fetch operands, etc. in advance of the actual instruction 
execution. Branch prediction (with a history table or target buffer) is used to 
help ensure the pipeline keeps flowing even when branches are encountered. IIRC, 
some models even fetch down more than one branch target path to minimize the 
performance hit if the first prediction is wrong.


--
Edward E Jaffe
Phoenix Software International, Inc
831 Parkview Drive North
El Segundo, CA 90245
310-338-0400 x318
edja...@phoenixsoftware.com
http://www.phoenixsoftware.com/

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


Re: How to control in an JCL that a file is empty or not exist ?

2011-07-18 Thread John Mattson
I created these a while back for my programmers.  Just use Batch TSO to 
invoke 

=== pass a DD to this one 
/* rexx*/ 
   trace i 
arg dd 
 
/* rexx */ 
x = listdsi( dd FILE) 
 
if (SysUSED = 0) | (SysUSED = 'N/A') then DO 
   trace 
   Say '*** ' 
   Say '*** Dataset IS EMPTY DD: ' dd 
   Say '*** ' 
   exit 6 
End 
exit 0 

(OR) 

=== pass the DSN as a parm. 
/* rexx */ 
/* trace i */ 
arg dsn 
ALLOC DD(MT) DSN('||dsn||') SHR  
if rc  0 then DO 
   Say '*** ' 
   Say '*** Failure to alloc ds: ' dsn 
   Say '*** Either in use, or does not exist ' 
   Say '*** ' 
   exit 12 
End 
 
execio 1 diskr MT (stem rec. finis) 
cc=rc 
free dd(MT) 
if cc  0 then DO 
   Say '*** ' 
   Say '*** Dataset IS EMPTY ds: ' dsn 
   Say '*** ' 
   exit 6 
End 
exit0 

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


Re: accesing output from jes spool

2011-07-18 Thread John Mattson
Totally cool REXX, John.  Thanks.  Remember If the code works borrow 
it. 

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


Re: Making Z/OS easier - Effectively replacing JCL with Unix like commands

2011-07-18 Thread Scott Ford
There are a few of us not sure how many, that are on both sides of the aisle. I 
work in z/OS, Windows and Unix, including Linux and enjoy
and embrace new ideas

Scott J Ford
Software Engineer
http://www.identityforge.com
 

From: Jim Thomas j...@thethomasresidence.us
To: IBM-MAIN@bama.ua.edu
Sent: Monday, July 18, 2011 5:58 PM
Subject: Re: Making Z/OS easier - Effectively replacing JCL with Unix like 
commands

Hear Hear ... I guess I'm not the only one that feels 
this way ...

I will have a 'nasty-gram' later ... so stay tuned :-)  

Kind Regards

Jim Thomas
617-233-4130             (mobile)
636-294-1014                (res)
j...@thethomasresidence.us (Email)


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf
Of Sam Siegel
Sent: Monday, July 18, 2011 4:46 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Making Z/OS easier - Effectively replacing JCL with Unix like
commands

On Mon, Jul 18, 2011 at 2:10 PM, Wayne Driscoll wdri...@us.ibm.com wrote:
 In my 20 plus year career I have seen a lot more people with mainframe
 backgrounds expressing a willingness to learn and integrate usage of
 non-mainframe technology than I have seen people from an open-systems
 background show a willingness to learn anything about the mainframe.

I completely agree with this statement.  It is typically a requirement
of mainframe types to understand open system terminology and then
speak of mainframe using open systems language.  sysplex vs. cluster
is a typical rough and ready analogy.

I've yet to see an open system person have even a vague understanding
of record oriented I/O or PDS processing.

The list goes on and on.


 ===
 Wayne Driscoll
 OMEGAMON DB2 L3 Support/Development
 wdrisco(AT)us.ibm.com
 ===



 From:
 R.S. r.skoru...@bremultibank.com.pl
 To:
 IBM-MAIN@bama.ua.edu
 Date:
 07/18/2011 03:50 PM
 Subject:
 Re: Making Z/OS easier - Effectively replacing JCL with Unix like commands
 Sent by:
 IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu



 W dniu 2011-07-18 22:15, Paul Gilmartin pisze:
 [...]
 As upper management perceives, even through media such as airline
 magazines, that (some; I'm confident not all) z/OS systems programmers
 exhibit public delight in unwillingness to assimilate new technology and
 in performing their jobs in a needlessly difficult, even painful manner,

 I'm not 'upper management', I'm very downlevel manager and I don't read
 airline magazines at all, I prefer some good redbook instead... HOWEVER
 MY OPINION IS EXACTLY AS THE ABOVE!
 Yes, majority of mainframe people I ever met do their job in needlessly
 difficult, sometimes even painful manner. SOme of them are absolutely
 unwilling to assimilate anything new, even like DFSMS (is it modern?
 is it cool? did it come from colorful worlds of Windows, Apple etc.?).
 Of course there are also people more opne-minded, but the majority...
 Oh, someone could say there are old farts and young wolves. No, the
 division is not so simple, I know clever open-minded gray-haired folks
 and young but very old-minded adepts.


 it bodes ill for the future of the platform.
 Yes, I wish it would be untrue.

 --
 Radoslaw Skorupka
 Lodz, Poland


 --
 Tre   tej wiadomo ci mo e zawiera  informacje prawnie chronione Banku
 przeznaczone wy  cznie do u ytku s u bowego adresata. Odbiorc  mo e by
 jedynie jej adresat z wy  czeniem dost pu osób trzecich. Je eli nie jeste
 adresatem niniejszej wiadomo ci lub pracownikiem upowa nionym do jej
 przekazania adresatowi, informujemy,  e jej rozpowszechnianie, kopiowanie,
 rozprowadzanie lub inne dzia anie o podobnym charakterze jest prawnie
 zabronione i mo e by  karalne. Je eli otrzyma e  t  wiadomo   omy kowo,
 prosimy niezw ocznie zawiadomi  nadawc  wysy aj c odpowied  oraz trwale
 usun   t  wiadomo   w  czaj c w to wszelkie jej kopie wydrukowane lub
 zapisane na dysku.

 This e-mail may contain legally privileged information of the Bank and is
 intended solely for business use of the addressee. This e-mail may only be
 received by the addressee and may not be disclosed to any third parties.
 If you are not the intended addressee of this e-mail or the employee
 authorised to forward it to the addressee, be advised that any
 dissemination, copying, distribution or any other similar activity is
 legally prohibited and may be punishable. If you received this e-mail by
 mistake please advise the sender immediately by using the reply facility
 in your e-mail software and delete permanently this e-mail including any
 copies of it either printed or saved to hard drive.

 BRE Bank SA, 00-950 Warszawa, ul. Senatorska 18, tel. +48 (22) 829 00 00,
 fax +48 (22) 829 00 33, e-mail: i...@brebank.pl
 S d Rejonowy dla m. st. Warszawy XII Wydzia  Gospodarczy Krajowego
 Rejestru S dowego, nr rejestru przedsi biorców KRS 025237, NIP:
 526-021-50-88.
 Wed ug stanu na dzie  01.01.2011 r. kapita  zak 

Re: Making Z/OS easier - Effectively replacing JCL with Unix like commands

2011-07-18 Thread John Mattson
EXCELLENT rant, Jim.  Got fired up just reading it. 
I occasionally annoy our local unix and web programmers by reminding them 
that their pay is NOT related to the number of directories they create... 
and reminding them that each level in a path slows down their system.  And 
to even SUGGEST that you put ALL of the executables for an application in 
the SAME directory BLASPHEMY !!!   Each programmer has their various 
types of files squirrled away in various places, and none of them can find 
the other's stuff without a major search.  Amazing to behold.  Oh well, 
all of our problems will be solved when we complete our SAP conversion, so 
I need not worry. 




From:   Jim Thomas j...@thethomasresidence.us
To: IBM-MAIN@bama.ua.edu
Date:   07/18/2011 03:10 PM
Subject:Re: Making Z/OS easier - Effectively replacing JCL with 
Unix like commands
Sent by:IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu



I have nothing against anything 'new' and highly doubt that 
other mainframer's do either. Come from the world of Windows 
or Apple ??.. I am not even going to comment on that.

That said, what are we trying to achieve ?? .. the blue screen
of death on the mainframes ?? (be it z/OS, z/VM, z/VSE or even
z/Linux).IMHO, everybody and their mother, to include IBM has
been bent over trying to do the same for at least a decade that 
I can now state. I don't think I need to point out or bring up 
too much evidence on how spectacularly specialized and efficient
the PC world was in populating and letting the world know, how
efficient they were with the 'blue screen of death' and I know that
none of you know what I speak of right ??. 

The 'mainframe' environment has been robust for MANY decades. Is there
anybody that can state the same of the PC environment that everybody
just insists on incorporating into the mainframe world ??. As both,
a former developer and a systems programmer, I can very honestly 
say that we'd (one way or the other) get out of an unwarranted or
unwanted IPL most always (especially with z/OS). 

Can anybody in the server world say that ??. Seems to me that the 
defacto action is always CTRL-ALT-DEL .. be it the 'server' or 
'router' or whatever else. 

By the by ... before Winblows 3.1 came out ... I did a lot of work 
on Novell too ... so I do have some experience, knowledge and 
exposure to what I speak of. 

'old' mainframer's, IMHO, do not have any problems or hesitation
with adapting and or using 'new' technology 'when and if it works'.

Why is CTRL-ALT-DEL a viable option for replacing mainframe for PC
servers when the said company just ends up paying more than they
really did with 'an old mainframe'. On the same token, why is an
IPL of my MVS image (or PLEX) not acceptable ??... it's the same
as CTRL-ALT-DEL is it not ??. 

AFAIK, us old mainframer's ... want to do our jobs, which is to
say, do what we enjoy the most but not want to have to do it repeatedly
or redundantly, over and over and over again. I have spoken (rather
vehemently unfortunately) to many PC developers and WEB developers
that simply could not understand why a given product, system or 
sub-system that I was owned at that point it time, had not been 
completely re-written and 're-complied' ... More often than not,
after a couple of hours, I gave up and said ... 'because I do not 
have to re-write and re-compile the world just to feel important or
justify my job'. 

There is also another thread about wanting 'script's instead of 
JCL... have any of these folks looked into REXX ?? or even CLIST ??.

There was some negativity about DCB's ... oh .. okay .. we don't need
DCB's but .. lets just have a two and a half mile long PATH that each
applications programmer has to maintain and or keep track of. Sure .. 
yep .. it's very simple and applications programmers will keep a track
of them all  my foot !!. 

Were the non mainframe environment at the very least, a little more 
stable, I'd venture to say that most all, if not all, 'old' systems
programmers (or even us 'old' developers) would gladly welcome and 
incorporate required changes. 

Lastly and fully knowing that I'm 'rocking the boat' .. what the heck,
manager's ?? .. management ??. The only comment I'll make (for the 
moment) is that a few years ago, I actually had a ... umm .. manager
call me and get pissed off in about five minutes into the conversation
because he was adamant that 'MVS' meant 'Microsoft Virtual Studio' which
was around a lot longer than MVS on the mainframe ... I asked for his 
academic qualifications and was told that he had an undergrad degree in
Journalism. Of course, I blew it because I asked him if he knew how big
an idiot he was and if he'd be willing to write about his own stupidity in 

the local papers ... Ooops !!. 


Radoslaw, please forgive me but in my experience, nine out ten, supposedly
young and open-minded kids don't have a clue what they speak of. Note 
however, they are not to blame and instead the 

Re: Making Z/OS easier - Effectively replacing JCL with Unix like commands

2011-07-18 Thread Mark Zelden
On Mon, 18 Jul 2011 16:10:06 -0500, Wayne Driscoll wdri...@us.ibm.com wrote:

In my 20 plus year career I have seen a lot more people with mainframe 
backgrounds expressing a willingness to learn and integrate usage of 
non-mainframe technology than I have seen people from an open-systems 
background show a willingness to learn anything about the mainframe.


I agree 100%, but that may only be because many of the people I've worked 
with over the years have either thought their mainframe jobs might go away 
or actually were going away.  If all the airline magazines pronounced wintel or
*nix was dead or would be dead by the year 2020, I think you  might find the
same thing.

Mark
--
Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS   
mailto:m...@mzelden.com
Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html 
Systems Programming expert at http://expertanswercenter.techtarget.com/

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


Re: HMC emulator

2011-07-18 Thread Alex Wang
Thank you for your advices!

I agree that it's simple to do some tests on a test live sysplex. :-)

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


Re: Making Z/OS easier - Effectively replacing JCL with Unix like commands

2011-07-18 Thread John McKown
I don't, in general. It is more just a step above assembler. Now, if you
want a true HLL, use APL2!

On Mon, 2011-07-18 at 15:21 -0400, Shmuel Metz (Seymour J.) wrote:
 In 4e243efe.2010...@valley.net, on 07/18/2011
at 10:11 AM, Gerhard Postpischil gerh...@valley.net said:
 
 Good for you, but some of us have built extensive macro and 
 subroutine libraries to use with assembler, and find it as fast  and
 easy to use those than to live with (the confining  limitations of)
 higher level languages.
 
 And some of us don't regard C as a higher level language.
  
-- 
John McKown
Maranatha! 

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


Re: Making Z/OS easier - Effectively replacing JCL with Unix like commands

2011-07-18 Thread John McKown
On Mon, 2011-07-18 at 14:45 -0700, Sam Siegel wrote:
 On Mon, Jul 18, 2011 at 2:10 PM, Wayne Driscoll wdri...@us.ibm.com wrote:
  In my 20 plus year career I have seen a lot more people with mainframe
  backgrounds expressing a willingness to learn and integrate usage of
  non-mainframe technology than I have seen people from an open-systems
  background show a willingness to learn anything about the mainframe.
 
 I completely agree with this statement.  It is typically a requirement
 of mainframe types to understand open system terminology and then
 speak of mainframe using open systems language.  sysplex vs. cluster
 is a typical rough and ready analogy.
 
 I've yet to see an open system person have even a vague understanding
 of record oriented I/O or PDS processing.
 
 The list goes on and on.

PDS is a weird beastie. IMO, the closest analogy would be a directory
with very restricted file names. Record I/O might be possible if they
use a looping language like C or Perl to process each row in an SQL
result set.

-- 
John McKown
Maranatha! 

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