Re: leaving early

2019-10-16 Thread Campbell Jay 
Accident 



-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Mitch Mccluhan
Sent: Wednesday, October 16, 2019 7:44 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: leaving early

 ...why did this go out to this group?
 
 
-Original Message-
From: Nai, Dean 
To: IBM-MAIN 
Sent: Wed, Oct 16, 2019 3:16 pm
Subject: leaving early

1 hour comp.

Dean Nai
Senior z/OS Systems Programmer
Technical Services Group
Department of Information Technology
State of New Hampshire
27 Hazen Drive
Concord, NH 03301
 work: 603-271-1529


Statement of Confidentiality: The contents of this message are confidential.
Any unauthorized disclosure, reproduction, use or dissemination (either whole 
or in part) is prohibited. If you are not the intended recipient of this 
message, please notify the sender immediately and delete the message from your 
system.


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

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

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

Re: IBMLink screens screwed up again

2017-11-23 Thread Campbell Jay 
I'm on.

Jay Campbell
MSSD – IZSSB – IOSSS


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of zMan
Sent: Thursday, November 23, 2017 1:35 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: IBMLink screens screwed up again

IBMLink still exists?

On Thu, Nov 23, 2017 at 11:54 AM, Dan Little  wrote:

> Broken again. Anyone else seeing it?
>
> > FO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



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

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

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

Re: Spool file

2017-03-22 Thread Campbell Jay 
Hate inserting myself -
Joe is using zdpt on Linux on his home laptop.
Might change the discussion a little.

Jay Campbell


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of Joseph Reichman
Sent: Wednesday, March 22, 2017 7:23 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: Spool file

My parmlib member points to SPOOL as the volume but everything else shows B2SYS.

SDSF SPOOL DISPLAY S0W1   2% ACT  14095 FRE  13683 LINE 1-2 (2)

 COMMAND INPUT ===>SCROLL ===>
CSR  
 NP   NAME   Status   TGPct TGNum TGUse Command  SAff  Ext LoCylLoTrk

  B2SYS1 ACTIVE   5  3000   164  ANY   00  031B

  B2SYS2 ACTIVE   2 11095   248  ANY   01  0006
  

3.4 Display
DSLIST - Data Sets on volume SPOOL* Row 1 of
6 
Command ===>  Scroll ===>
PAGE 
 

Command - Enter "/" to select action  Message
Volume

---
 SYS1.HASPACE
SPOOL1 
 SYS1.HASPACE
SPOOL2 
 SYS1.HASPACE
SPOOL3 
 SYS1.VTOCIX.SPOOL1
SPOOL1 
 SYS1.VTOCIX.SPOOL2
SPOOL2 
 SYS1.VTOCIX.SPOOL3
SPOOL3
* End of Data Set list

 





  $dspool,long  
  $HASP893 VOLUME(B2SYS1)   
VOLUME(B2SYS1)  STATUS=ACTIVE,DSNAME=SYS1.HASPACE,  
SYSAFF=(ANY),TGNUM=3000,TGINUSE=164,
TRKPERTGB=3,PERCENT=5,RESERVED=NO,  
MAPTARGET=NO
  $HASP893 VOLUME(B2SYS2)   
VOLUME(B2SYS2)  STATUS=ACTIVE,DSNAME=SYS1DisplKCELL=3,VOLUME=B2SYS

  $DSPOLLDEF   

JES parmlib member

SPOOLDEF BUFSIZE=3856,   /* MAXIMUM BUFFER SIZEc*/
 DSNAME=SYS1.HASPACE, 
 FENCE=NO,   /* Don't Force to Min.Vol. oc*/
 SPOOLNUM=32,/* Max. Num. Spool Vols--- c*
 TGBPERVL=5, /* Track Groups per volume in BLOB  ownc*
 TGSIZE=33,  /* 30 BUFFERS/TRACK GROUPwnc*/
 TGSPACE=(MAX=26288, /* Fits TGMs into 4K Page  =(,  c*/
  WARN=80),  /*   =(,% onc*/
 TRKCELL=3,  /* 3 Buffers/Track-cell   c*/
 VOLUME=SPOOL/* SPOOL VOLUME SERIALc*/
<---
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Lizette Koehler
Sent: Wednesday, March 22, 2017 12:23 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Spool file

Only one HASPACE per JES2 Spool volume

Lizette

> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] 
> On Behalf Of Lizette Koehler
> Sent: Tuesday, March 21, 2017 8:55 PM
> To: IBM-MAIN@LISTSERV.UA.EDU 
> Subject: Re: Spool file
> 
> Issue a $DSPOOL,LONG  and see what it shows
> 
> Issue $DSPOOLDEF and see what it shows
> 
> Next go to ISPF 3.4
> 
> Search
> 
> **   in the dataset level
> SPOOL*  in the VOLSER and see what it shows
> 
> I am not clear about your statement:   The spool volumes are still on the
same
> pack.  Please provide a display of what you are seeing.
> 
> 
> Lizette
> 
> 
> > -Original Message-
> > From: IBM Mainframe Discussion List 
> > [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Joseph Reichman
> > Sent: Tuesday, March 21, 2017 7:48 PM
> > To: IBM-MAIN@LISTSERV.UA.EDU 
> > Subject: Re: Spool file
> >
> > I have 3 vols SPOOL1 SPOOL2 and SPOOL3
> >
> > In jes2 parmlib member on the spool def for volume I specify SPOOL 
> > and yet after ipl'ing
> >
> > And then going back to SDSF to look for the  spool volumes are on 
> > still on the same pack
> >
> >
> >
> > > On Mar 21, 2017, at 11:20 AM, Lizette Koehler 
> > >  >
> > wrote:
> > >
> > > The best practice for JES2 Spool file is standalone.  Never put 
> > > anything on the same volume as either the SPOOL Space or the CKPT
> datasets.
> > >
> > > That can lead to unintentional issues.
> > >
> > > Many shops in the past have tended towards multi-use volumes with 
> > > JES2.  This is not recommended.
> > >
> > > With storage arrays, you can code a volume as a MOD9 (9GB, 10,017
> > > Cylinders) and only place the ckpt or the spool space (not both) 
> > > on it. The array will typically only hold the amount of storage on 
> > > the
> > > mod9 as is allocated.  It does not hold the entire 10,017 
> > > cylinders when you only have a 60 cylinder dataset on it.  As the 
> > > volume is grown - the array

Re: TSO LINE COMMAND - EDIT MODE

2016-12-16 Thread Campbell Jay 
In ISPF I use  C  P'='  ' '  n n  ALL

Jay Campbell
MSSD – IZSSB – IOSSS



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of Carmen Vitullo
Sent: Friday, December 16, 2016 10:48 AM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: TSO LINE COMMAND - EDIT MODE

strange, did you just C ¬' ' ' 80 95 ALL 

or the correct format Bill provided
C P'¬' ' ' 80 95 ALL - you need the 'P" picture clause Carmen
- Original Message -

From: "willie bunter" <001409bd2345-dmarc-requ...@listserv.ua.edu>
To: IBM-MAIN@LISTSERV.UA.EDU
Sent: Friday, December 16, 2016 9:45:22 AM
Subject: Re: TSO LINE COMMAND - EDIT MODE 

Bill, 

I tried out your suggestion but it didn't work. I get the message No CHARS '¬' 
found

On Fri, 12/16/16, George, William@FTB  wrote: 

Subject: Re: TSO LINE COMMAND - EDIT MODE
To: IBM-MAIN@LISTSERV.UA.EDU
Received: Friday, December 16, 2016, 10:39 AM 

I believe the command you
need is: C P'¬' ' ' 80 95 ALL
The picture P'¬' finds all NON blank
characters. 

Bill 

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of willie bunter
Sent: Friday,
December 16, 2016 7:15 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: TSO LINE COMMAND - EDIT MODE 

Good Day To All, 

Is there a way of filling
columns 80 95 with blanks? I have sequence commands (please see below for an 
example) which I would like to remove. 

00550003 **
0056
00570001 *
00580003 **
0059
0061 *
00610003 **
0062
00630001 *
00640003 **
0065
00660001 *
00670003 **
0068
00690001 *
0073 **
0071 

I looked at using C P'00' " " 
80 95 however since this is a huge dsn I was wondering if there is a quicker 
way. I also considered pressing the EOF key on my keyboard on every line 
however since the file is quite large it would take me a while. 

Is there a line command I could issue to do what I want to do? I remember in 
ROSCOE I could issue the command FILL 80 95 and it would replace the numbers 
with blank spaces. 

Thanks 

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

__
CONFIDENTIALITY NOTICE: This email from the State of California is for the sole 
use of the intended recipient and may contain confidential and privileged 
information. Any unauthorized review or use, including disclosure or 
distribution, is prohibited. If you are not the intended recipient, please 
contact the sender and destroy all copies of this email. 


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


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


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

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

Re: SMF RECORD TYPE : HELP

2016-11-03 Thread Campbell Jay 
SPOOL shouldn't matter.
Must have had RMFGAT running at the time.
No idea how long your RMF repository holds data.

Jay Campbell
MSSD – IZSSB – IOSSS


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of John Dawes
Sent: Thursday, November 03, 2016 8:40 AM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: SMF RECORD TYPE : HELP

 I was able to access the panel however the job is no longer in the spool 
because it has been sent to $AVRS.


On Thu, 3/11/16, Campbell Jay <james.l.campb...@irs.gov> wrote:

 Subject: Re: SMF RECORD TYPE : HELP
 To: IBM-MAIN@LISTSERV.UA.EDU
 Received: Thursday, 3 November, 2016, 8:32 AM
 
 How about  RMF
 panels   3 - 2 - 5 ?
 Put in
 jobname - then set time for when job was running
 
 Jay Campbell
 MSSD – IZSSB – IOSSS
 
 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu]  On 
Behalf Of John Dawes
 Sent: Thursday,
 November 03, 2016 8:23 AM
 To: IBM-MAIN@listserv.ua.edu
 Subject: Re: SMF RECORD TYPE : HELP
 
 Yes, I tried that.  However,
 when I issued the command it was too late (3 minutes after  the job abend).  
This is why I thought by  reading SMF  records would have some info on the 
volume.
 
 
 
 On Thu, 3/11/16, Blake, Daniel J [CTR] 
<00f1be92566d-dmarc-requ...@listserv.ua.edu>
 wrote:
 
  Subject: Re: SMF
 RECORD TYPE : HELP
  To: IBM-MAIN@LISTSERV.UA.EDU
  Received: Thursday, 3 November, 2016, 7:56  AM
  
  Have you tried the
 alloc
  command from the console or SDSF?
  
  D U,,ALLOC,devaddr,1
  
  Thank You
 
 
  
  ;-D an
 
 
  
   
 
 -Original Message-
  From: IBM
 Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]  On Behalf Of John 
Dawes
  Sent: Thursday,
  November 03, 2016 7:53 AM
  To:
 IBM-MAIN@LISTSERV.UA.EDU
  Subject: SMF RECORD TYPE : HELP
  
  G'Day,
 
 
  Could someone suggest how I could obtain  information about a certain DASD 
volume?  I am trying to  trouble shoot a problem of a job failure when 
attempting  to  copy a volume using the following parms.
  
  COPY INDYNAM(SYS012)
 OUTDYNAM(BCD012)
  CANCELERROR      - 
   
     PURGE ALLEXCP
 ALLDATA(*) OPT(4) ADMIN FCNOCOPY
  -    
  
  I get the following
  message:
  
 
 ADR306E
  (043)-SBRTN(01), UNABLE TO COPY THE
 VOLUME BECAUSE OUTPUT  VOLUME BCD012  IS IN USE. TASK IS  TERMINATED
  
  I am trying to
 find out what
  resource was using the volume
 at that time.  I thought that  SMF would be a solution  however I don't see a 
SMF record  type for DASD.
  
  Any
 
 suggestions would be very welcome.
  
  Thanks.
  
 
 --
  For IBM-MAIN subscribe / signoff / archive  access instructions, send email 
to lists...@listserv.ua.edu  with the message: INFO IBM-MAIN
  
  
 
 --
  For IBM-MAIN subscribe / signoff / archive  access instructions,  send email 
to lists...@listserv.ua.edu  with the message: INFO IBM-MAIN
  
 
 --
 For IBM-MAIN subscribe / signoff / archive
 access instructions, send email to lists...@listserv.ua.edu
 with the message: INFO IBM-MAIN
 
 --
 For IBM-MAIN subscribe / signoff / archive
 access instructions,
 send email to lists...@listserv.ua.edu
 with the message: INFO IBM-MAIN
 

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

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

Re: SMF RECORD TYPE : HELP

2016-11-03 Thread Campbell Jay 
Our setup is

Jay Campbell
MSSD – IZSSB – IOSSS



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of John Dawes
Sent: Thursday, November 03, 2016 8:36 AM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: SMF RECORD TYPE : HELP

Thanks for the suggestion.  I am not familiar on how to use.  I sure would like 
to try.

Is it interactive via ISPF?


On Thu, 3/11/16, Campbell Jay <james.l.campb...@irs.gov> wrote:

 Subject: Re: SMF RECORD TYPE : HELP
 To: IBM-MAIN@LISTSERV.UA.EDU
 Received: Thursday, 3 November, 2016, 8:32 AM
 
 How about  RMF
 panels   3 - 2 - 5 ?
 Put in
 jobname - then set time for when job was running
 
 Jay Campbell
 MSSD – IZSSB – IOSSS
 
 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu]  On 
Behalf Of John Dawes
 Sent: Thursday,
 November 03, 2016 8:23 AM
 To: IBM-MAIN@listserv.ua.edu
 Subject: Re: SMF RECORD TYPE : HELP
 
 Yes, I tried that.  However,
 when I issued the command it was too late (3 minutes after  the job abend).  
This is why I thought by  reading SMF  records would have some info on the 
volume.
 
 
 
 On Thu, 3/11/16, Blake, Daniel J [CTR] 
<00f1be92566d-dmarc-requ...@listserv.ua.edu>
 wrote:
 
  Subject: Re: SMF
 RECORD TYPE : HELP
  To: IBM-MAIN@LISTSERV.UA.EDU
  Received: Thursday, 3 November, 2016, 7:56  AM
  
  Have you tried the
 alloc
  command from the console or SDSF?
  
  D U,,ALLOC,devaddr,1
  
  Thank You
 
 
  
  ;-D an
 
 
  
   
 
 -Original Message-
  From: IBM
 Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]  On Behalf Of John 
Dawes
  Sent: Thursday,
  November 03, 2016 7:53 AM
  To:
 IBM-MAIN@LISTSERV.UA.EDU
  Subject: SMF RECORD TYPE : HELP
  
  G'Day,
 
 
  Could someone suggest how I could obtain  information about a certain DASD 
volume?  I am trying to  trouble shoot a problem of a job failure when 
attempting  to  copy a volume using the following parms.
  
  COPY INDYNAM(SYS012)
 OUTDYNAM(BCD012)
  CANCELERROR      - 
   
     PURGE ALLEXCP
 ALLDATA(*) OPT(4) ADMIN FCNOCOPY
  -    
  
  I get the following
  message:
  
 
 ADR306E
  (043)-SBRTN(01), UNABLE TO COPY THE
 VOLUME BECAUSE OUTPUT  VOLUME BCD012  IS IN USE. TASK IS  TERMINATED
  
  I am trying to
 find out what
  resource was using the volume
 at that time.  I thought that  SMF would be a solution  however I don't see a 
SMF record  type for DASD.
  
  Any
 
 suggestions would be very welcome.
  
  Thanks.
  
 
 --
  For IBM-MAIN subscribe / signoff / archive  access instructions, send email 
to lists...@listserv.ua.edu  with the message: INFO IBM-MAIN
  
  
 
 --
  For IBM-MAIN subscribe / signoff / archive  access instructions,  send email 
to lists...@listserv.ua.edu  with the message: INFO IBM-MAIN
  
 
 --
 For IBM-MAIN subscribe / signoff / archive
 access instructions, send email to lists...@listserv.ua.edu
 with the message: INFO IBM-MAIN
 
 --
 For IBM-MAIN subscribe / signoff / archive
 access instructions,
 send email to lists...@listserv.ua.edu
 with the message: INFO IBM-MAIN
 

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

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

Re: SMF RECORD TYPE : HELP

2016-11-03 Thread Campbell Jay 
How about  RMF  panels   3 - 2 - 5 ?
Put in jobname - then set time for when job was running

Jay Campbell
MSSD – IZSSB – IOSSS

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of John Dawes
Sent: Thursday, November 03, 2016 8:23 AM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: SMF RECORD TYPE : HELP

Yes, I tried that.  However, when I issued the command it was too late (3 
minutes after the job abend).  This is why I thought by  reading SMF records 
would have some info on the volume.
 

On Thu, 3/11/16, Blake, Daniel J [CTR] 
<00f1be92566d-dmarc-requ...@listserv.ua.edu> wrote:

 Subject: Re: SMF RECORD TYPE : HELP
 To: IBM-MAIN@LISTSERV.UA.EDU
 Received: Thursday, 3 November, 2016, 7:56 AM
 
 Have you tried the alloc
 command from the console or SDSF?
 
 D U,,ALLOC,devaddr,1
 
 Thank You
 
 
 ;-D an
 
 
  
 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]  On 
Behalf Of John Dawes
 Sent: Thursday,
 November 03, 2016 7:53 AM
 To: IBM-MAIN@LISTSERV.UA.EDU
 Subject: SMF RECORD TYPE : HELP
 
 G'Day,
 
 Could someone suggest how I could obtain  information about a certain DASD 
volume?  I am trying to  trouble shoot a problem of a job failure when 
attempting to  copy a volume using the following parms.
 
 COPY INDYNAM(SYS012) OUTDYNAM(BCD012)
 CANCELERROR      - 
  
    PURGE ALLEXCP ALLDATA(*) OPT(4) ADMIN FCNOCOPY
 -    
 
 I get the following
 message:
 
 ADR306E
 (043)-SBRTN(01), UNABLE TO COPY THE VOLUME BECAUSE OUTPUT  VOLUME BCD012  IS 
IN USE. TASK IS TERMINATED
 
 I am trying to find out what
 resource was using the volume at that time.  I thought that  SMF would be a 
solution however I don't see a SMF record  type for DASD.
 
 Any
 suggestions would be very welcome.
 
 Thanks.
 
 --
 For IBM-MAIN subscribe / signoff / archive  access instructions, send email to 
lists...@listserv.ua.edu  with the message: INFO IBM-MAIN
 
 
 --
 For IBM-MAIN subscribe / signoff / archive  access instructions,  send email 
to lists...@listserv.ua.edu  with the message: INFO IBM-MAIN
 

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

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

Re: Converson of hex value to character

2016-09-12 Thread Campbell Jay 
Have a MACRO laying around here...

 MACRO 
   HX2CH ,   
.* CONVERTS THE HEX FIELD IN '' WHOSE LENGTH   
.* IS IN REGISTER '' TO CHARACTER INTO ''  
.* '' MUST BE BIG ENOUGH TO HOLD THE CHARACTER VERSION OF THE  
.* HEX NUMBER THAT IS BEING CONVERTED (I.E. TWICE THE LENGTH IN '')
AIF   ( GT 1 AND  LT 15).OK 
  
MNOTE 12,'USE ONLY REGS 2 TO 14 FOR SECOND OPERAND' 
  
MEXIT   
  
.OKANOP  
 LR1,  R1 = LENGTH OF HEX FIELD
   BCTR  1,0 ADJUST TO USE AS INDEX 
 
   LA15,(1) R15 -> LAST BYTE OF HEX FLD
 
  AR1,1 DOUBLE TO INDEX CHAR FIELD  
  LA1,(1)  R1 -> LAST 2 BYTES OF CHAR FLD  
  LR0,  R0 = # OF HEX BYTES TO BE CONVERTED 
A MVC   1(1,1),0(15)
   UNPK  0(1,1),0(1,15) 
 
   NI0(1),X'0F' 
   NI1(1),X'0F' 
  BCTR  15,0   
  BCTR  1,0
  BCTR  1,0
 BCT   0,A 
 LR15,
 AR15,15  
 BCTR  15,0   
 EX15,B
 B C+16
B TR(0),C  
C DCC'0123456789ABCDEF'
  MEND 

Jay Campbell
IBM OS Support Section

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of Randy Hudson
Sent: Monday, September 12, 2016 12:59 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: Converson of hex value to character

In article

Re: DEVTYPE INFO=DASD

2016-07-24 Thread Campbell Jay 
Major Maximum Mea Culpa !
I didn't do proper diligence.  : (
No access to Joe's programs... and believed his output.
I've spent the weekend getting IBM's example DEVTYPE MACRO to work.
After  the successful run - My result matches Bill's...
AREA = FFF0 000F F000 01000800

Gold star to Bill Godfrey. 
Joe's got a code problem. 

Sincere apology to John Eells.
( Didn't mean to falsely contribute to the issue )

Have been restricting myself on postings for a while.
( Keep mouth shut - fool... Open mouth - remove all doubt )
Think I'll restrict my postings even further.
Even on in-house issues.

Sorry All... and Thanks !

Jay Campbell
IBM OS Support Section

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of Bill Godfrey
Sent: Friday, July 22, 2016 10:34 AM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: DEVTYPE INFO=DASD

The result I get from the same DEVTYPE macro is:

FFF0 000F F000 01000800

which differs from the OP in that there are 2 more bytes at the beginning in my 
case.

My results have a fullword for the number of cylinders and a fullword for 
tracks per cylinder, which agrees with all of these manuals:

z/OS 1.10
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DGT2S350/7.2.1.5

z/OS 1.13
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DGT2S380/7.2.1.5

z/OS 2.1 (page 272)
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/download/DGT3S300.pdf

I think the OP is just looking at the wrong address, 2 bytes beyond the correct 
address.

Bill
On Fri, 22 Jul 2016 10:01:32 -0400, John Eells wrote:

>I sent in an RCF this morning with what I thought the book should say, 
>and copied the lead DADSM/CVAF developer (to make sure my correction 
>does not inject some different problem!).
>
>Bill Godfrey wrote:
>> I think the possibility should be considered that the OP may have mistakenly 
>> been looking at the 16 bytes at AREA+2, not AREA. If that happened, and the 
>> missing bytes are hex , the results would be correct for a device with 
>> 65520 cylinders.
>>
>> Bill
>>
>> On Thu, 21 Jul 2016 14:30:41 -0500, Mike Schwab wrote:
>>
>>>>   Volume Data
>>>>   Tracks . :  982,800
>>>
>>> / 15 = 65,520 = X'FFF0'
>>>
>>> On Thu, Jul 21, 2016 at 2:17 PM, Campbell Jay <james.l.campb...@irs.gov> 
>>> wrote:
>>>> Agree with John.
>>>> Doc should say first halfword of bytes 0 - 3  &  4 - 7.
>>>>
>>>> MJI2 e . : IM404A
>>>> Command ===>
>>>>
>>>> Unit . . : 3390
>>>>
>>>>   Volume Data VTOC Data  Free Space   
>>>> TracksCyls
>>>>   Tracks . :  982,800 Tracks  . :   360   Size  . . :  
>>>>269,730  17,974
>>>>   %Used  . :   72   %Used . . : 1Largest . :   
>>>>  67,950   4,530
>>>>   Trks/Cyls:   15Free DSCBS:17,892  Free
>>>>
>>>>   Extents . :  36
>>>>
>>>> Disclaimer: No idea what he's working on
>>>>
>>>> Jay Campbell
>>>> IBM OS Support Section
>>>>
>
>>>>> -Original Message-
>>>>> From: IBM Mainframe Discussion List 
>>>>> [mailto:IBM-MAIN@listserv.ua.edu] On Behalf Of John Eells
>>>>> Sent: Thursday, July 21, 2016 2:35 PM
>>>>> To: IBM-MAIN@listserv.ua.edu
>>>>> Subject: Re: DEVTYPE INFO=DASD
>>>>>
>>>>> I think I understand your confusion.  I'm not sure why you're using the 
>>>>> z/OS V1.10 level of the book.  But in any event, the current (V2.2) level 
>>>>> of the book says this returns, for INFO=DASD:
>>>>>
>>>>> Returns 16 bytes as follows:
>>>>> Bytes 0-3 - Number of cylinders on the device, excluding alternates.
>>>>> 
>>>>>
>>>>> Bytes 4-7 - Number of tracks per cylinder.
>>>>>
>>>>> So one would reasonably expect x'FFF0' to be the number of cylinders, 
>>>>> and x'000FF000' to be the number of tracks per cylinder.  The values of 
>>>>> the first halfwords in each word, however, seem far more reasonable 
>>>>> (possible, even!).  The correct number of tracks/cylinder is definitely 
>>>>> 15.
>>>>>
>>>>> But what is the actual size of the volume?  You can use "V" on 
>>>>> ISPF
>>>&g

Re: DEVTYPE INFO=DASD

2016-07-21 Thread Campbell Jay 
Agree with John.
Doc should say first halfword of bytes 0 - 3  &  4 - 7.

MJI2 e . : IM404A  
Command ===>   
   
Unit . . : 3390
   
 Volume Data VTOC Data  Free Space   Tracks
Cyls
 Tracks . :  982,800 Tracks  . :   360   Size  . . : 
269,730  17,974
 %Used  . :   72   %Used . . : 1Largest . :
67,950   4,530
 Trks/Cyls:   15Free DSCBS:17,892  Free   

Extents . :  36

Disclaimer: No idea what he's working on

Jay Campbell
IBM OS Support Section

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of Reichman Joseph
Sent: Thursday, July 21, 2016 3:09 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: DEVTYPE INFO=DASD

I just got word from Jay Campbell that the device capability is 17,974 cyls I 
am getting back X'FFF0'  or 65,520, Since he is in touch with IBM I would 
suggest you contact him

Thanks  

Joe Reichman
Joe Reichman
 
IT Specialist
Master Files Division
New Carrollton Federal Building, B7-182
OS:CTO:AD:CP:I:IB
Flex M,T,Th,F
Home office (240) 863 - 3965 
Office (240) 613-4350
Cell (917) 748-9693
TOD M - F  7:30 am  - 4:00 pm


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of John Eells
Sent: Thursday, July 21, 2016 2:42 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: DEVTYPE INFO=DASD

Well, yes, but we should get the book right.  So do you mind telling me what 
the actual volume size is, just to confirm?

Reichman Joseph wrote:
> It is the first half word of each has to be
>
> Joe Reichman
> Joe Reichman
>
> IT Specialist
> Master Files Division
> New Carrollton Federal Building, B7-182 OS:CTO:AD:CP:I:IB Flex 
> M,T,Th,F Home office (240) 863 - 3965 Office (240) 613-4350
> Cell (917) 748-9693
> TOD M - F  7:30 am  - 4:00 pm
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] 
> On Behalf Of John Eells
> Sent: Thursday, July 21, 2016 2:35 PM
> To: IBM-MAIN@listserv.ua.edu
> Subject: Re: DEVTYPE INFO=DASD
>
> I think I understand your confusion.  I'm not sure why you're using the z/OS 
> V1.10 level of the book.  But in any event, the current (V2.2) level of the 
> book says this returns, for INFO=DASD:
>
> Returns 16 bytes as follows:
> Bytes 0-3 - Number of cylinders on the device, excluding alternates. 
> 
>
> Bytes 4-7 - Number of tracks per cylinder.
>
> So one would reasonably expect x'FFF0' to be the number of cylinders, and 
> x'000FF000' to be the number of tracks per cylinder.  The values of the first 
> halfwords in each word, however, seem far more reasonable (possible, even!).  
> The correct number of tracks/cylinder is definitely 15.
>
> But what is the actual size of the volume?  You can use "V" on ISPF
> OPT3.4 to see VTOC information, including the volume size in tracks under 
> "Volume data" on the left.  Divide by 15 to get cylinders.  What do you see?
>
> It's likely RCF time...
>
>
> Reichman Joseph wrote:
>> 7.2.15 Marked DEVTYPE-  info form   from DFSMSdfp "Advanced Services"  z/os 
>> V1R10.0
>>
>> Joe Reichman
>> Joe Reichman
>>
>> IT Specialist
>> Master Files Division
>> New Carrollton Federal Building, B7-182 OS:CTO:AD:CP:I:IB Flex 
>> M,T,Th,F Home office (240) 863 - 3965 Office (240) 613-4350
>> Cell (917) 748-9693
>> TOD M - F  7:30 am  - 4:00 pm
>>
>>
>> -Original Message-
>> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] 
>> On Behalf Of Elardus Engelbrecht
>> Sent: Thursday, July 21, 2016 12:52 PM
>> To: IBM-MAIN@listserv.ua.edu
>> Subject: Re: DEVTYPE INFO=DASD
>>
>> Reichman Joseph wrote:
>>
>>> The doc says bytes 0 - 3 is cylinders bytes 0 -3 is FFF0 and 
>>> bytes 4 - 7 000FF000 is tracks per cyl ? am I misreading 
>>> misunderstanding the documentation
>>
>> What docs? Could you be kind to give us the URL of that source of above info 
>> and docs?
>>
>>> I was looking for the capability on a dasd device DEVTYPE
>>> (R6),(AREA,L'AREA),INFOLIST=ILIST2
>>> ILIST2   DEVTYPE INFO=DASD
>>> AREA DSXL16
>>
>> Hmmm, interesting application of that useful macro. I must try out 
>> this little gem next week on my z/OS v2.1 sandbox when I'm returning 
>> to my bread and butter work... ;-)
>>
>>> This was the data returned in area R15 = 0
>>> FFF0 000FF000 0100 0800
>>
>> On what z/OS level were you trying to try out that Assembler snippet? How 
>> did you obtained the contents of that R15? Via a

Re: Bsam VS Qsam for VB records... RDW corruption

2016-07-19 Thread Campbell Jay 
2 threads going here.
IBM is investigating.

IBM has a dump of the bad block.
Length is 31373.
BDW good in the buffer.
Bad when written.
Ongoing.

Jay Campbell
IBM OS Support Section

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of retired mainframer
Sent: Tuesday, July 19, 2016 7:44 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: Bsam VS Qsam for VB records

> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] 
> On Behalf Of Reichman Joseph
> Sent: Tuesday, July 19, 2016 11:48 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Bsam VS Qsam for VB records
> 
> Thanks for all your help I really understand the problem thing is the 
> file is huge and I don’t know by what factor DFSMS blocked and if the 
> blocking is consistent meaning always by the same factor

Since you already posted that you have no data class active and a null SMS 
configuration, it is unlikely that DFSMS has any effect on block size.  If the 
data was written with QSAM, then QSAM performed the blocking (per the DCB 
parameters specified on the DD statement used to identify the output dataset) 
as well as constructing the RDWs and BDW.

You also posted that the problem was with the BDW and not the RDWs.  What do 
you think the problem is?  How did you determine that?  Can you post the first 
8 bytes of the block in question (BDW+RDW, no proprietary data)?

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

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

Re: RDW corruption

2016-07-19 Thread Campbell Jay 
IBM has a dump of the bad block.
Length is 31373.
BDW good in the buffer.
Bad when written.
Ongoing.

Jay Campbell
IBM OS Support Section

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of Barry Merrill
Sent: Tuesday, July 19, 2016 3:12 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: RDW corruption

Our output is VB  LRECL=31996  BLKSIZE=32000.
> Using BUFL=32600 fixes our problem.

It looks like your error is too small a BLKSIZE.

The maximum BLKSIZE for VB or VBS is 32760, NOT your 32000.

If BUFL=32600 then your use of BLKSIZE=32000 is short of the mark.

To read ANY VB file, use RECFM=VB,LRECL=32756,BLKSIZE=32760.

Barry

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Joseph Reichman
Sent: Monday, July 18, 2016 2:40 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: RDW corruption

I know my boss assigned me this problem As an aside if I register my IRS e-mail 
on IBM-Main is there a way not get every e-mail I don't mind it in my personel 
e-mail But I have a lot of other stuff on my irs.gov e-mail



> On Jul 18, 2016, at 3:21 PM, Campbell Jay <james.l.campb...@irs.gov>
wrote:
> 
> Have a current SR open with IBM...   57827 082 000
> Our output is VB  LRECL=31996  BLKSIZE=32000.
> Using BUFL=32600 fixes our problem.
> SR was opened to find out why that works.
> 
> Jay Campbell
> IBM OS Support Section
> 
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] 
> On Behalf Of Joe Reichman
> Sent: Monday, July 18, 2016 3:17 PM
> To: IBM-MAIN@listserv.ua.edu
> Subject: RDW corruption
> 
> Hi,
> 
> 
> 
> I have a program that generates a corrupted RDW The file is a VB file. 
> I coded a synad exit but it didn't take (it was never given control)
> 
> 
> 
> When I go into ISPF and I do a max down I can see where ISPF can't 
> read
the next record as I get "* * * I/O error detected, i/o terminated * * *"
> 
> 
> 
> As there anything/exit I can do to capture this the program seems to go to
> EOJ  
> 
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

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

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

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

Re: RDW corruption

2016-07-18 Thread Campbell Jay 
Correct... our BDW is turning into zeros... our RDW is correct.

Jay Campbell
IBM OS Support Section


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of Mike Schwab
Sent: Monday, July 18, 2016 3:35 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: RDW corruption

Try a IDCAMS PRINT DUMP of the offending record.  Especially examine the BDW 
and RDW at the start of the block.

On Mon, Jul 18, 2016 at 2:21 PM, Campbell Jay <james.l.campb...@irs.gov> wrote:
> Have a current SR open with IBM...   57827 082 000
> Our output is VB  LRECL=31996  BLKSIZE=32000.
> Using BUFL=32600 fixes our problem.
> SR was opened to find out why that works.
>
> Jay Campbell
> IBM OS Support Section
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] 
> On Behalf Of Joe Reichman
> Sent: Monday, July 18, 2016 3:17 PM
> To: IBM-MAIN@listserv.ua.edu
> Subject: RDW corruption
>
> Hi,
>
>
>
> I have a program that generates a corrupted RDW The file is a VB file. 
> I coded a synad exit but it didn't take (it was never given control)
>
>
>
> When I go into ISPF and I do a max down I can see where ISPF can't read the 
> next record as I get "* * * I/O error detected, i/o terminated * * *"
>
>
>
> As there anything/exit I can do to capture this the program seems to 
> go to EOJ
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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

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

Re: RDW corruption

2016-07-18 Thread Campbell Jay 
Have a current SR open with IBM...   57827 082 000
Our output is VB  LRECL=31996  BLKSIZE=32000.
Using BUFL=32600 fixes our problem.
SR was opened to find out why that works.

Jay Campbell
IBM OS Support Section

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of Joe Reichman
Sent: Monday, July 18, 2016 3:17 PM
To: IBM-MAIN@listserv.ua.edu
Subject: RDW corruption

Hi,

 

I have a program that generates a corrupted RDW The file is a VB file. I coded 
a synad exit but it didn't take (it was never given control)

 

When I go into ISPF and I do a max down I can see where ISPF can't read the 
next record as I get "* * * I/O error detected, i/o terminated * * *"

 

As there anything/exit I can do to capture this the program seems to go to
EOJ  


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

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

Re: Command to display Enqueue

2016-07-07 Thread Campbell Jay 
D GRS,RES=(*,filename)

Jay Campbell
IBM OS Support Section

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of FRISBIE, JIM
Sent: Thursday, July 07, 2016 10:52 AM
To: IBM-MAIN@listserv.ua.edu
Subject: Command to display Enqueue

Is there a system command that will show if a specific file is enqueued? And 
even better, who holds the enqueue? We have a nightly batch job that backs up a 
file on System-A and then restores it on System-B. About once a month a TSO 
user (almost always the same Operator) will have that file open, DFDSS can't 
get an exclusive enqueue and issues RC=8. If it can be determined whether the 
file is in use before the job is run, the Operator won't run the job and I 
won't get a phone call at midnight. Even though the documentation says "Fill 
out a Problem Report and DON"T CALL ANYBODY" the Operator persists in calling.



My sleep and the life of the Operator are at risk, any help would be greatly 
appreciated.


Jim Frisbie
Sr Systems Programmer
919-831-4711

This email may contain confidential and privileged material for the sole use of 
the intended recipient. If you are not the intended recipient, please contact 
the sender and delete all copies. Any review or distribution by others is 
strictly prohibited. Personal emails are restricted by policy of the State 
Employees' Credit Union (SECU).  Therefore SECU specifically disclaims any 
responsibility or liability for any personal information or opinions of the 
author expressed in this email.

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

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

Re: owner-ibm-main

2016-06-20 Thread Campbell Jay 
Correct.  Our very own Messaging Gateway.

Jay Campbell
IBM OS Support Section


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of Ron Hawkins
Sent: Monday, June 20, 2016 9:29 AM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: owner-ibm-main

Maybe you should be asking Symantic...

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Campbell Jay
Sent: Sunday, June 19, 2016 11:08 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [IBM-MAIN] owner-ibm-main

Am I being SPAMed ?
They're getting annoying.

Supposedly from  owner-ibm-m...@listserv.ua.edu   sometimes with no From:

Text...

X-Brightmail-Tracker:
H4sIA+NgFlrNLMWRWlGSWpSXmKPExsXCdV5DVffPnbRwg4nfTCxev023WPm/mdHi

4qc9jA7MHkfWHmQOYIzisklJzcksSy3St0vgyujZfYGtgKECRDUwMkxgZFjAyLCKUTYswCjY

19XXMSAg2NfdwEgvpVgvs6g4L7VELz2/bBMjyK7bgbE7GNd8dDzEKMDBqMTD27kiLVyINbGs

uDL3EKMkB5OSKO+e7tRwIb6k/JTKjMTijPii0pzU4kOMEhzMSiK8x28DlfOmJFZWpRblw6Sk

OViUxHk/TXweIiSQnliSmp2aWpBaBJOV4eBQkuCdCtIoWJSanlqRlplTgpBm4uAEGc4DNPw8

2PDigsTc4sx0iPwpRkOOfYtvrGXiuPDsAZC8AiKFWPLy81KlxHkzQBoEQBoySvPgZl5iFJUS

5mVkYGAQ4gG6IzezBCL+ilEc6GVhXgVgUAvxZOaVwG15BXQAE9ABmvOSQQ4oSURISTUwcva0

/D49q2btxbqy0iMKH98kP9qzzmHfzxmPhHKc1V81F7rdqv/AZO1p43tbYp1uYnbjwkpZh73Z

811VFB3OHPtx7fqJjKWybfULRV+vkWuXC/jCE6dgcSBo+ZfnHo75U24eKsg+tZ5XKTrzemfX
JZPZC9vm9W99w5r98r2/Vr8d09zHXnVPlFiKMxINtZiLihMBA4pxRz4CAAA=
Date: Sun Jun 19 12:57:16 2016

Jay Campbell
IBM OS Support Section

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

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

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

Re: owner-ibm-main

2016-06-19 Thread Campbell Jay 
Thanks much.

Jay Campbell
IBM OS Support Section

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of Edward Finnell
Sent: Sunday, June 19, 2016 3:05 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: owner-ibm-main

Definitely you are. The List is not seeing them and as a List member I'm not 
getting them. Get your Network folks to look at full headers and see if they  
can block at a node point or add the 'owner' to your white board list in your  
mailer.
 
 
In a message dated 6/19/2016 1:08:01 P.M. Central Daylight Time, 
james.l.campb...@irs.gov writes:

Am I  being SPAMed ?
They're getting  annoying.

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

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

owner-ibm-main

2016-06-19 Thread Campbell Jay 
Am I being SPAMed ?
They're getting annoying.

Supposedly from  owner-ibm-m...@listserv.ua.edu   sometimes with no From:

Text...

X-Brightmail-Tracker: 
H4sIA+NgFlrNLMWRWlGSWpSXmKPExsXCdV5DVffPnbRwg4nfTCxev023WPm/mdHi
4qc9jA7MHkfWHmQOYIzisklJzcksSy3St0vgyujZfYGtgKECRDUwMkxgZFjAyLCKUTYswCjY
19XXMSAg2NfdwEgvpVgvs6g4L7VELz2/bBMjyK7bgbE7GNd8dDzEKMDBqMTD27kiLVyINbGs
uDL3EKMkB5OSKO+e7tRwIb6k/JTKjMTijPii0pzU4kOMEhzMSiK8x28DlfOmJFZWpRblw6Sk
OViUxHk/TXweIiSQnliSmp2aWpBaBJOV4eBQkuCdCtIoWJSanlqRlplTgpBm4uAEGc4DNPw8
2PDigsTc4sx0iPwpRkOOfYtvrGXiuPDsAZC8AiKFWPLy81KlxHkzQBoEQBoySvPgZl5iFJUS
5mVkYGAQ4gG6IzezBCL+ilEc6GVhXgVgUAvxZOaVwG15BXQAE9ABmvOSQQ4oSURISTUwcva0
/D49q2btxbqy0iMKH98kP9qzzmHfzxmPhHKc1V81F7rdqv/AZO1p43tbYp1uYnbjwkpZh73Z
811VFB3OHPtx7fqJjKWybfULRV+vkWuXC/jCE6dgcSBo+ZfnHo75U24eKsg+tZ5XKTrzemfX
JZPZC9vm9W99w5r98r2/Vr8d09zHXnVPlFiKMxINtZiLihMBA4pxRz4CAAA=
Date: Sun Jun 19 12:57:16 2016

Jay Campbell
IBM OS Support Section

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

Re: QUESTION ABOUT SPACE ABEND

2015-05-29 Thread Campbell Jay 
D37-04

Jay Campbell
IBM OS Support Section
Phone 304-264-7409
Cell304-676-6546
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of John Dawes
Sent: Friday, May 29, 2015 7:22 AM
To: IBM-MAIN@listserv.ua.edu
Subject: QUESTION ABOUT SPACE ABEND

G'Day,

I would like to know what the abend code would be if the dsn did not have 
enough space allocated to it?  Below is an example of a space abend when the 
volume is out of space: For an output data set, all space was used on the 
current volume and no more volumes were specified.:

IEC030I B37-04,IFG0554A,DBA041D,DB041D16,SORTOUT,C6B7,ZL0024,04210011,  178   
WESP.PTNOTES1.SHADOW  
+WER999A BA041DP ,STEP010 ,BA041D16-  UNSUCCESSFUL SORT B37 S 
+REASON=0004 I




Thanks.

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

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

CBT File 102 TAPESCAN S237- 0C on virtual tape

2015-05-14 Thread Campbell Jay 
Maybe I'm playing in the dinosaur bone yard...

Any attempt to run TAPESCAN on a virtual tape volume results in:
IEC527I BLOCK COUNTS:  DEVICE=4,  DCB=9
IEC023I 237-0C, IFG0551H,..
z/OS 2.1   TS7740

I added the Block Count Unequal exit to the DCB EXLST parm.
Basically  RETURN,RC=4   continue processing.
It's not being called... DC  x'' in the middle.

Native tape works fine.
Well - my little tiny test tape did.
When I ran one of the backup tapes...
S0C9-09   kind of expected.
Calculating the number of tape inches.
Too lazy to do the math - but just guessing -
1  3592 = 1  50 foot diameter 6520 BPI round reel.

Enjoy.


Jay Campbell
IBM OS Support Section

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

Re: Extracting SMF records with IFASMFDP

2014-08-13 Thread Campbell Jay 
Correct. The report shows the START and END timestamps of the input data - not 
the output requested.

Jay Campbell
IBM OS Support Section

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of Pommier, Rex
Sent: Wednesday, August 13, 2014 5:58 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: Extracting SMF records with IFASMFDP

Try running the extract again, using TECH.SCRT.PART2 as your input and see what 
dates you get.  I think it MIGHT be giving you the beginning and ending dates 
of the data it found in the input report.

Rex

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Mark Yuhas
Sent: Wednesday, August 13, 2014 4:48 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Extracting SMF records with IFASMFDP

I am attempting to extract a subset of a subset of SMF data for a time period 
from 00:00 to 14:00 on 8/9/2014 (2014221):
//SMFDPTAP  EXEC  PGM=IFASMFDP
//SYSPRINT  DD SYSOUT=*
//DUMPINDD DSN=SE.EN.X02.SCRT.DATA.G2871V00,DISP=SHR
//DUMPOUT   DD DSN=TECH.SCRT.PART2,
// DISP=(,CATLG,DELETE),
// UNIT=SYSALLDA,
// SPACE=(CYL,(5,1),,CONTIG),
// DCB=D.SMF
//SYSIN DD *
INDD(DUMPIN,OPTIONS(DUMP))
OUTDD(DUMPOUT,TYPE(0:255))
DATE(2014221,2014221)
START()
END(1400)
//

When the job runs, I receive this report:

IFA010I SMF DUMP PARAMETERS
IFA010I END(1400) -- SYSIN
IFA010I START() -- SYSIN
IFA010I DATE(2014221,2014221) -- SYSIN
IFA010I OUTDD(DUMPOUT,TYPE(0:255)) -- SYSIN IFA010I INDD(DUMPIN,OPTIONS(DUMP)) 
-- SYSIN IFA020I DUMPOUT  -- TECH.SCRT.PART2
IFA020I DUMPIN   -- SE.EN.X02.SCRT.DATA.G2871V00
   SUMMARY ACTIVITY REPORT
  START DATE-TIME  08/01/2014-00:30:00 END 
DATE-TIME  08/10/2014-00:00:00
  RECORD   RECORDS PERCENT  AVG. RECORD   MIN. RECORD   
MAX. RECORD   RECORDS
TYPE  READOF TOTAL   LENGTHLENGTH   
 LENGTH   WRITTEN
   2 1   .10 %18.0018   
 18 1
   3 1   .10 %18.0018   
 18 1
  70   454 45.58 % 1,950.03   172   
  3,916   270
  89   540 54.22 % 3,403.50   326   
  8,490   329
  TOTAL996   100 % 2,734.1818   
  8,490   601
  NUMBER OF RECORDS IN ERROR   0

The input data set only contains data for 8/9/14 - 2014221.  So, why does the 
report says the Start Date is 08/01/2014?  And the end data is 8/10/24?  I have 
specified a Start Date of 8/9/2014.
Why does the End Date become 8/10/2014 and the end time is 00:00:00 when I have 
specified an end time of 14:00 and a End Date of 2014221 - 8/9/2014?

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

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

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

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

AUTO: Can someone turn Umberto off ?

2014-03-12 Thread Campbell Jay 
Jay Campbell
IBM OS Support Section
Phone 304-264-7409
Cell304-676-6546
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of Umberto Silvestri
Sent: Wednesday, March 12, 2014 5:03 PM
To: IBM-MAIN@listserv.ua.edu
Subject: AUTO: Umberto Silvestri is prepared for DELETION (FREEZE)

Umberto Silvestri is prepared for DELETION (FREEZE)


Note: This is an automated response to your message  Re: z/OS PKI Services 
HostIDMapping format sent on 12/03/2014 18:18:04.

This is the only notification you will receive while this person is away.

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

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

Re: SMF Log Stream

2014-01-22 Thread Campbell Jay 
Google   SMF New Paradigm good start

Enjoy.

Jay Campbell
IBM OS Support Section


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of gsg
Sent: Wednesday, January 22, 2014 4:15 PM
To: IBM-MAIN@listserv.ua.edu
Subject: SMF Log Stream

What are the benefits of converting to SMF Log Streams?

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

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

Re: shark fin

2013-10-14 Thread Campbell Jay 
The Shark fin is about 4 times thicker than I thought it was.
Is there a difference between the white and red Lightning bolts ?
( color... ha ha )... but seriously - different models or something ?
Would it be a violation of any copyright or patent to make your own ?
Didn't see any knockoffs on Ebay.

Jay Campbell
IBM OS Support Section
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of Blaicher, Christopher Y.
Sent: Sunday, October 13, 2013 4:15 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: shark fin

OK, you got me on this one.  What is a Shark Fin?  I know what a Shark device 
is, but what is a Shark Fin?

Chris Blaicher
Principal Software Engineer, Software Development Syncsort Incorporated
50 Tice Boulevard, Woodcliff Lake, NJ 07677
P: 201-930-8260  |  M: 512-627-3803
E: cblaic...@syncsort.com



 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
 On Behalf Of Benjamin Huntsman
 Sent: Thursday, October 10, 2013 7:08 PM
 To: IBM-MAIN@LISTSERV.UA.EDU
 Subject: shark fin

 A little off topic, and not a technical issue, but I figured this
 would be a likely crowd...

 Anyone still have a Shark fin, and might be persuaded to part with it
 for some reasonable consideration?

 Thanks in advance!

 -Ben

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

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



ATTENTION: -

The information contained in this message (including any files transmitted with 
this message) may contain proprietary, trade secret or other  confidential 
and/or legally privileged information. Any pricing information contained in 
this message or in any files transmitted with this message is always 
confidential and cannot be shared with any third parties without prior written 
approval from Syncsort. This message is intended to be read only by the 
individual or entity to whom it is addressed or by their designee. If the 
reader of this message is not the intended recipient, you are on notice that 
any use, disclosure, copying or distribution of this message, in any form, is 
strictly prohibited. If you have received this message in error, please 
immediately notify the sender and/or Syncsort and destroy all copies of this 
message in your possession, custody or control.

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

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

Re: Best Desktop 3D Printers | Digital Trends

2013-10-14 Thread Campbell Jay 
Is it the primary mission of a nanobot to build replicas of itself ?

Jay Campbell
IBM OS Support Section

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of Steve Comstock
Sent: Monday, October 14, 2013 3:51 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: Best Desktop 3D Printers | Digital Trends

On 10/14/2013 1:20 PM, Bass, Walter W wrote:
 Steve Comstock said:
 snip
 Do you suppose you can use a 3D printer to manufacture a 3D printer?
 /snip

 Certainly.  Google REPRAP.

 Bill Bass
 United HealthCare
 Greenville, SC


Very cool. Thanks for the suggestion.

--

Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

303-355-2752
http://www.trainersfriend.com

* We are going out of business effective 30 December, 2013

* To purchase a set of our training materials at terrific prices,
   check out our Going Out Of Business Sale:

 http://www.trainersfriend.com/SpecialSale

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

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

Re: Syncsort v1.4 doesn't support Tape sorting - Need help !

2013-09-03 Thread Campbell Jay 
Step 1 of 26 jobs that run weekly here... all virtual 3490.

IEC205I O4170811,I4172TAM,OSSORT,FILESEQ=1, COMPLETE VOLUME LIST,
DSN=SYS13221.T024827.RA000.I4172TAM.R0536336,
VOLS=V99685,W48653,W49651,W51394,W49733,W51426,W51740,W50789,
VOLS=W53558,W51451,W53648,W54852,W55272,W53187,W58534,W53865,
VOLS=V88953,V49754,V84397,V54602,W57132,W48285,V98618,W61367,
VOLS=W61484,W64410,V37807,V26144,V61036,V32871,V26218,V26564,
VOLS=V32907,V26632,TOTALBLOCKS=3393517

Jay Campbell
IBM OS Support Section


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of Gibney, Dave
Sent: Tuesday, September 03, 2013 3:03 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: Syncsort v1.4 doesn't support Tape sorting - Need help !

Unless you are really out of the ordinary, I would expect the use of SORTWKnn 
on tape to be rare. AFAIK, It's purpose was for large sorts in the ancient days 
of expensive disk. It took extra effort to set-up.
I believe we had one job back in the 80's and it was changed away from TAPESORT 
at some time in the 90's.


Dave Gibney
Information Technology Services
Washington State University



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Ted MacNEIL
Sent: Tuesday, September 03, 2013 11:33 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Syncsort v1.4 doesn't support Tape sorting - Need help !

I hope there's still some sort of centralised control and/or library.
-
Ted MacNEIL
eamacn...@yahoo.ca
Twitter: @TedMacNEIL

-Original Message-
From: Roger Steyn roger.st...@yahoo.com
Sender:   IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU
Date: Tue, 3 Sep 2013 11:29:12
To: IBM-MAIN@LISTSERV.UA.EDU
Reply-To: IBM Mainframe Discussion List IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Syncsort v1.4 doesn't support Tape sorting - Need help !

Yes . That would work fine in the case of scheduled jobs . But in our 
shop,there is one more challenge that we have a lot of Auto-sched jobs (jobs 
that are trigerred externally from an MQ server ).  And i do not know how many 
of them use tape sorting . This makes the task more difficult .







 From: Paul Gilmartin paulgboul...@aim.com
To: IBM-MAIN@LISTSERV.UA.EDU
Sent: Tuesday, September 3, 2013 8:15 PM
Subject: Re: Syncsort v1.4 doesn't support Tape sorting - Need help !


On Tue, 3 Sep 2013 09:34:26 -0500, Eric Bielefeld wrote:

Can't you use a program that will read the members of a pds and search for
UNIT=TAPE  on  SORTWKnn DD statements?  You should be able to search all of
your production libraries fairly quickly to identify all of the jobs.
Hopefully you have standards so that production is all in a small set of
libraries.  I know there is a program on the CBT tape that allows you to do
that.  Since I've retired, I forgot what it was.

SuperC?  (not available from CBT.)

-- gil

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

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

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

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

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

Re: Assember

2013-06-24 Thread Campbell Jay 
Now we need the MACRO/DSECT expansion of IREC and the EQU at label DSLET.

Jay Campbell
IBM OS Support Section
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of Kenneth Wilkerson
Sent: Monday, June 24, 2013 2:19 PM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: Assember

TMI2REC+ISTAT-IREC,SDLET

Is equivalent to:

LA somereg,I2REC somereg is R1-R15
USING IREC,somereg
TM   ISTAT,SDLET
DROP somereg

Kenneth

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Charles Mills
Sent: Monday, June 24, 2013 12:31 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Assember

If you (1) post the 2 or 3 instructions following the TM and (2) post the 
object code that appears in the listing to the left of the instruction then 
we can help you more.

Charles
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Ron Thomas
Sent: Monday, June 24, 2013 8:24 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Assember

Hello.

can some one pls let me know what this assembler code does?

TMI2REC+ISTAT-IREC,SDLET

how the above code work?

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

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

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

Re: Assember

2013-06-24 Thread Campbell Jay 
Ron - probably better served by  assembler-l...@listserv.uga.edu

Jay Campbell
IBM OS Support Section

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of Ron Thomas
Sent: Monday, June 24, 2013 11:24 AM
To: IBM-MAIN@listserv.ua.edu
Subject: Assember

Hello.

can some one pls let me know what this assembler code does?

TMI2REC+ISTAT-IREC,SDLET

how the above code work?

Thanks
Ron

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

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

Re: Gordon Crovitz: Who Really Invented the Internet?

2012-07-25 Thread Campbell Jay 
 

The Cookoo's Egg by Cliff Stoll
Google it... PDF
Damn good read.

Jay Campbell
IBM OS Support Section

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Anne  Lynn Wheeler
Sent: Wednesday, July 25, 2012 7:48 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Gordon Crovitz: Who Really Invented the Internet?

sbire...@rocketsoftware.com (Steve Bireley) writes:
 About 10 years ago I was in a meeting with Vint Cerf and couple of 
 others executive from Worldcom.  One of our sales guys made a joke 
 about Al Gore inventing the Internet.  Instead of starting the 
 meeting, Vint invited us to his office to show us pictures of him with 
 Al Gore (and a bunch of other famous people), and gave us a short 
 history lesson of the Internet and the large role Al Gore played in 
 making the Internet available to the public instead of keeping it for 
 the military and academia.  Though Al's role was only legislative, I 
 found it interesting that Vint Cerf gave him so much credit.

re:
http://www.garlic.com/~lynn/2012j.html#83 Gordon Crovitz: Who Really Invented 
the Internet?

as referenced upthread and old email, the NSFNET backbone funding was coming 
out of funding for the supercomputing efforts to promote better USA global 
computing competitiveness ... originally I was going to get $20m ... but then 
the NSF budget got cut and corporate politics prevented me from doing anything 
directly (and the communication group was spreading mis-information about how 
SNA would apply to NSFNET backbone).

some other articles starting to appear ... like

Obama Was Right: The Government Invented the Internet; Don't believe the 
outrageous conservative claim that every tech innovation came from private 
enterprise.
http://www.slate.com/articles/technology/technology/2012/07/who_invented_the_internet_the_outrageous_conservative_claim_that_every_tech_innovation_came_from_private_enterprise_.html

and

No credit for Uncle Sam in creating Net? Vint Cerf disagrees 
http://news.cnet.com/8301-1023_3-57479781-93/no-credit-for-uncle-sam-in-creating-net-vint-cerf-disagrees/

one of the comments in the article:

You might have ended up with OSI. Many engineers considered this to be an 
overly complex design and it was not very much implemented.

... snip ...

I would suggest that one of the contributing factors for internet breaking free 
for commercial use ... was federal government started to mandate OSI (GOSIP) 
and the elimination of internet/tcpip. at interop88, lots of booths were 
showing OSI products for federal gov.  federal gov.
contractor customers. misc. past posts mentioning interop88
http://www.garlic.com/~lynn/subnetwork.html#88

the other issue was there were a lot of commercial interests contributing 
(unfunded) resources to the NSFNET backbone with motivation to enhance 
environment for the development of the next generation bandwith hungry 
applications ... also mentioned upthread
http://www.garlic.com/~lynn/2012j.html#88 Gordon Crovitz: Who Really Invented 
the Internet?

browsers and html had started to appear ... and companies were being formed to 
produce commercial versions.

mentioned in original post, GML evolution to SGML  then HTML, as well as first 
webserver (on slac's vm370 system) outside europe

one of the early browsers was done at the supercomputer appication 
datacenter/univ (part of the NSF supercomputer effort  NSFNET backbone). 
people left and formed a startup in silicon valley.

for other trivia ... we are doing ha/cmp product along with cluster scaleup ... 
old post with reference to early jan1992 meeting in ellison's conference room
http://www.garlic.com/~lynn/95.html#13

old cluster scaleup related email
http://www.garlic.com/~lynn/lhwemail.html#medusa

possibly within hrs of the last email in above (end Jan1992), the scaleup is 
transferred we are told we can't work on anything with more than four 
processors. within a couple weeks it is announced as supercomputer ... press 
item from 17Feb1992
http://www.garlic.com/~lynn/2001n.html#6000clusters1

we then decide to leave. now two of the other people in the early
jan1992 meeting, also leave and join small client/server startup responsible 
for something called commerce server; we get called in to consult because 
they want to do payment transactions on their server; the startup had also 
invented technology called SSL, the result is now frequently called 
electronic commerce. The startup is also using a corporate name that was used 
at the supercomputer application datacenter/univ ... the univ objects. One of 
the major router vendors in silicon valley has an unused trademarked name that 
is donated for the startups new name.

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

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

Re: SMF volume - follow-up

2012-06-20 Thread Campbell Jay 
This is just type 100 - 102 records on 2 out of 11 LPARS BTW.
For some reason - the word overkill came to mind.
So I decided to conduct Operation Overkill.
36 MAN* datasets per LPAR... MAN0 - MANZ... 3337 cylinders per MAN*.
24 hourly jobs to MOD the DUMPXY contents to virtual tape.
( First job each day is DISP=NEW  just to keep things pretty )

The following day we have a problem.
IEFU29 isseued I SMF every 3 minutes.
Here's what 1 of the 2 LPARs looked like...





Jay Campbell

-Original Message-
From: IBM Mainframe Discussion List [mailto:ibm-m...@bama.ua.edu] On Behalf Of 
Campbell Jay
Sent: Monday, June 11, 2012 6:01 PM
To: ibm-m...@bama.ua.edu
Subject: SMF volume

 
Is anyone else is required to collect and retain 500,000 cylinders + of SMF 
data on an LPAR in one day...
how do you handle the downstream copies ?

Jay Campbell

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

Recall: SMF volume - follow-up

2012-06-20 Thread Campbell Jay 
Campbell Jay would like to recall the message, SMF volume - follow-up.

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